通达信牛刀小试指标公式源码副图

通达信牛刀小试指标公式源码副图

GL:=IF(NAMELIKE(ST) OR NAMELIKE(*ST),0,1) AND IF(CODELIKE(688),0,1);JJ:=(H+L+C)/3;AD0:=vol/IF(H=L,4,H-L);J:="kdj.J";AD1:=IF(CAPITAL=0,AD0*(JJ-MIN(C,O)),AD0*(MIN(O,C)-L));AD2:=IF(CAPITAL=0,AD0*(MIN(O,C)-L),AD0*(JJ-MIN(C,O)));AD3:=AD0*(H-MAX(O,C));AD4:=AD0*(MAX(C,O)-JJ);AD5:=AD1+AD2;AD6:=AD3+AD4;YF:=(AD5-AD6)/(AD5+AD6)*100;YF1:=((AD1+AD2)-(AD3+AD4))/SUM(VOL,10)*100;YF2:=YF*17;YF3:=((AD2+AD4)-(AD1+AD3))/SUM(VOL,10)*100;XG1:=crOSS(J,0) AND ((YF1>0 AND YF3>0) OR YF2>400);VAR1:=LLV(LOW,13);VAR2:=HHV(HIGH,13);VAR3:=SMA((CLOSE-VAR1)/(VAR2-VAR1)*100,5,1);VAR4:=SMA((VAR2-CLOSE)/(VAR2-VAR1)*100,5,1);VAR5:=SMA(MAX(CLOSE-REF(CLOSE,1),0),5,1)/SMA(Abs(CLOSE-REF(CLOSE,1)),5,1)*100;XG2:=CROSS(EMA(VAR5,3), VAR3) AND VAR4>65;XG3:=CROSS(0.9,1/VOL*1000>0.01 AND "kdJ.J"<0);DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);DEA:=EMA(DIF,9);macd:=(DIF-DEA)*2;XG4:=MACD>REF(MACD,1);XG:=XG1 AND XG2 AND XG3 AND C>REF(C,1) AND GL AND XG4;DRAWTEXT(XG=1,1, 小试),COLORYELLOW;