通达信指标公式源码 筹码集中度+主力吸筹副图指标.doc

筹码集中度源码:VAR1:=COST(10)*;VAR2:=IF(YEAR=2001ANDMONTH>7,0,1);九十筹码密集度:(COST(95)-COST(5))/CLOSE*100*VAR2;七十筹码密集度:(COST(85)-COST(15))/CLOSE*100*VAR2;尖峰价:=COST(50);{平均成本线}筹码1:=WINNER(尖峰价*);{}筹码2:=WINNER(尖峰价*);{}筹码集中度:(筹码2-筹码1)*100;上界:100,POINTDOT;主力吸筹:VAR2:=1/WINNER(CLOSE);VAR3:=MA(CLOSE,13);VAR4:=100-ABS((CLOSE-VAR3)/VAR3*100);VAR5:=LLV(LOW,75);VAR6:=HHV(HIGH,75);VAR7:=(VAR6-VAR5)/100;VAR8:=SMA((CLOSE-VAR5)/VAR7,20,1);VAR9:=SMA((OPEN-VAR5)/VAR7,20,1);VARA:=3*VAR8-2*SMA(VAR8,15,1);VARB:=3*VAR9-2*SMA(VAR9,15,1);VARC:=100-VARB;拉升资金:MA(WINNER(CLOSE*)*100,3),COLORYELLOW,;新庄建仓:(100-IF(VAR2>5,IF(VAR2<100,VAR2,VAR4-10),0)),REEN,;VARD:=拉升资金>VAR4;VARE:=REF(LOW,1)*;VARF:=LOW*;VAR10:=(VARF*VOL+VARE*(CAPITAL-VOL))/CAPITAL;VAR11:=EMA(VAR10,30);VAR12:=CLOSE-REF(CLOSE,1);VAR13:=MAX(VAR12,0);VAR14:=ABS(VAR12);VAR15:=SMA(VAR13,7,1)/SMA(VAR14,7,1)*100;VAR16:=SMA(VAR13,13,1)/SMA(VAR14,13,1)*100;VAR17:=BARSCOUNT(CLOSE);VAR18:=SMA(MAX(VAR12,0),6,1)/SMA(ABS(VAR12),6,1)*100;VAR19:=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100;VAR1A:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;VAR1B:=SMA((SMA(VAR1A,4,1)-50)*2,3,1);VAR1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;VAR1D:=SMA(VAR1C,4,1);VAR1E:=SMA(VAR1D,3,1);VAR1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;VAR20:=VAR18<=25ANDVAR19<-95ANDVAR1F>20ANDVAR1B<-30ANDVAR1E<30ANDVAR11-CLOSE>=-<