通达信筹码启动未加密选股指标公式源码

源码正文：

HJ_1:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100{XG51};
HJ_2:=SMA(HJ_1,3,1){XG51};
HJ_3:=Sma(HJ_2,3,1){XG51};
HJ_4:=REF(LOW,1){XG51};
HJ_5:=SMA(Abs(LOW-HJ_4),3,1)/SMA(MAX(LOW-HJ_4,0),3,1)*100{XG51};
HJ_6:=ema(IF(CLOSE*1.2,HJ_5*10,HJ_5/10),3){XG51};
HJ_7:=LLV(LOW,30){XG51};
HJ_8:=HHV(HJ_6,30){XG51};
HJ_9:=IF(LLV(LOW,58),1,0){XG51};
HJ_10:=dma((3*HIGH+LOW+OPEN+2*CLOSE)/7,vol/(SUM(AMOUNT,8)/(AMOUNT/VOL/100)/100)){XG51};
HJ_11:=DMA((3*HIGH+LOW+OPEN+2*CLOSE)/7,VOL/(SUM(AMOUNT,13)/(AMOUNT/VOL/100)/100)){XG51};
HJ_12:=DMA((3*HIGH+LOW+OPEN+2*CLOSE)/7,VOL/(SUM(AMOUNT,20)/(AMOUNT/VOL/100)/100)){XG51};
HJ_13:=EMA(EMA(CLOSE,18)-EMA(CLOSE,34),11){XG51};
HJ_14:=EMA(EMA(HJ_13,11),11){XG51};
HJ_15:=2*(HJ_13-HJ_14){XG51};
HJ_16:=100*EMA(EMA(mtm,6),6)/EMA(EMA(ABS(MTM),6),6){XG51};
HJ_17:=100*EMA(EMA(MTM,12),12)/EMA(EMA(ABS(MTM),12),12){XG51};
HJ_18:=100*EMA(EMA(MTM,26),26)/EMA(EMA(ABS(MTM),26),26){XG51};
HJ_19:=(HHV(HIGH,24)-CLOSE)/(HHV(HIGH,24)-LLV(LOW,24))*100{XG51};
HJ_20:=(CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100{XG51};
HJ_21:=(2*CLOSE+HIGH+LOW)/4{XG51};
HJ_22:=LLV(LOW,26){XG51};
HJ_23:=HHV(HIGH,34){XG51};
HJ_24:=EMA((HJ_21-HJ_22)/(HJ_23-HJ_22)*100,16){XG51};
HJ_25:=SMA(SMA(HJ_20,3,1)+3,3,1){XG51};
HJ_26:=EMA(HJ_24,7){XG51};
HJ_27:=SMA(HJ_19,3,1){XG51};
HJ_28:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100{XG51};
HJ_29:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100{XG51};
HJ_30:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100{XG51};
HJ_31:=(HJ_28+HJ_29+HJ_30)/3{XG51};
HJ_32:=IF(HJ_31<=(-20),10,0){XG51};
HJ_33:=HHV(HJ_32,10){XG51};
HJ_34:=LLV(LOW,36){XG51};
HJ_35:=HHV(HIGH,30){XG51};
HJ_36:=EMA((CLOSE-HJ_34)/(HJ_35-HJ_34)*4,4)*25{XG51};
HJ_37:=((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100/2+22)*1{XG51};
HJ_38:=(CLOSE-EMA(AMOUNT,13)/EMA(VOL,13)/100)/(EMA(AMOUNT,13)/EMA(VOL,13)/100)*100{XG51};
HJ_39:=1{XG51};
HJ_41:=1{XG51};
HJ_42:=IF(CLOSE>REF(CLOSE,1),88,0)*HJ_41{XG51};
HJ_43:=IF(CLOSE/REF(CLOSE,1)>1.05 AND HIGH/CLOSE<1.01 AND HJ_42>0,91,0)*HJ_39{XG51};
HJ_44:=FILTER(HJ_43>90,22.5)=1{XG51};
HJ_45:=FILTER(HJ_43>90,35)=1{XG51};
HJ_46:=FILTER(HJ_43>90,45)=1{XG51};
HJ_47:=FILTER(HJ_43>90,67.5)=1{XG51};
HJ_48:=FILTER(HJ_43>90,90)=1{XG51};
HJ_49:=FILTER(HJ_43>90,135)=1{XG51};
HJ_50:=FILTER(HJ_43>90,180)=1{XG51};
HJ_51:=FILTER(HJ_43>90,270)=1{XG51};
选股:HJ_44 AND HJ_45 AND HJ_46 AND HJ_47 AND HJ_48 AND HJ_49*HJ_41{XG51};
stICKLINE(IF(选股,(-120),0),80,0,7,0),COLOR770077{XG51};
STICKLINE(IF(选股,(-120),0),80,0,6,0),COLOR990099{XG51};
STICKLINE(IF(选股,(-120),0),80,0,5,0),COLORBB00BB{XG51};
STICKLINE(IF(选股,(-120),0),80,0,4,0),COLORDD00DD{XG51};
STICKLINE(IF(选股,(-120),0),80,0,3,0),COLORLIMAGENTA{XG51};
STICKLINE(IF(选股,(-120),0),80,0,2,0),COLORDD00DD{X~G-5.1~C~N~{};

源码正文：

M11:=5;M22:=10;M33:=20;M44:=60;P:=vol;VOLUME:=VOL{XG51};
LB:=VOL/REF(ma(VOL,5),1);LJC:=MA(P,M11)>MA(P,M44)*0.9{XG51};
M1:=4;M2:=6;M3:=9;M4:=13;M5:=18;M6:=24;MA5:=MA(C,60){XG51};
MA60:MA(C,60),COLORWHITE,LINETHICK3{XG51};
PB1:(expma(CLOSE,M1)+MA(CLOSE,M1*2)+MA(CLOSE,M1*4))/3{XG51};
PB2:(EXPMA(CLOSE,M2)+MA(CLOSE,M2*2)+MA(CLOSE,M2*4))/3{XG51};
PB3:(EXPMA(CLOSE,M3)+MA(CLOSE,M3*2)+MA(CLOSE,M3*4))/3{XG51};
PB4:(EXPMA(CLOSE,M4)+MA(CLOSE,M4*2)+MA(CLOSE,M4*4))/3{XG51};
PB5:(EXPMA(CLOSE,M5)+MA(CLOSE,M5*2)+MA(CLOSE,M5*4))/3{XG51};
PB6:(EXPMA(CLOSE,M6)+MA(CLOSE,M6*2)+MA(CLOSE,M6*4))/3{XG51};
AAA:=MIN(MIN(MIN(MIN(MIN(PB1,PB2),PB3),PB4),PB5),PB6){XG51};
BBB:=MAX(MAX(MAX(MAX(MAX(PB1,PB2),PB3),PB4),PB5),PB6){XG51};
XG:=(O<AAA OR REF(O<AAA,1)) AND C>BBB{XG51};
P6:=Abs(PB1-PB2)+ABS(PB1-PB3)+ABS(PB1-PB4)
+ABS(PB1-PB5)+ABS(PB1-PB6)+ABS(PB2-PB3)+ABS(PB2-PB4)
+ABS(PB2-PB5)+ABS(PB2-PB6)+ABS(PB3-PB4)
+ABS(PB3-PB5)+ABS(PB3-PB6)+ABS(PB4-PB5)+ABS(PB4-PB6)+ABS(PB5-PB6){XG51};
LXZH:=P6/C<20/100,COLORWHITE{XG51};
SS:=XG AND LB>2.2 AND C>MA5*1.02 AND C<MA5*1.15
AND (CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>3/100 AND C>O*1.02,COLORWHITE{XG51};
DRAWICON(SS,PB1*0.97,1),LINETHICK5{XG51};
DRAWICON(SS,PB1*0.95,1),LINETHICK5{XG51};
DRAWICON(SS,PB1*0.93,1),LINETHICK5{XG51};
DRAWICON(SS,PB1*0.91,1),LINETHICK5{XG51};
DRAWICON(SS,PB1*0.88,1),LINETHICK5{XG51};
DRAWTEXT(SS=1,PB1*0.88,'买入')COLORBLUE{XG51};
JL:=C>MA5 AND LJC AND (LB>2.2 OR REF(LB>2.2,1))
AND (XG OR REF(XG,1)) AND C>MA5*1.02 AND C<MA5*1.15 AND C>O*1.02
AND (LXZH OR REF(LXZH,1))
AND (CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>3/100,COLORWHITE{XG51};
PD:=(JL OR REF(JL,1)),COLORWHITE{XG51};
DRAWICON(PD,PB1*0.97,3){XG51};
DRAWICON(PD,PB1*0.95,3){XG51};
DRAWICON(PD,PB1*0.93,3){XG51};
DRAWICON(PD,PB1*0.91,3){XG51};
DRAWICON(PD,PB1*0.88,3){XG51};
DRAWTEXT(FILTER(PD=1,PB1*0.88),PB1*0.85,'金牛王'),COLORWHITE{X*G_5*1*C*N*{};