牛市追张2( 选股公式 源码 测试图)

{牛市追涨2}
input:m(2,1,10);
N:=22;jj:=(HIGH+LOW+CLOSE)/3;qj0:=vol/IF(HIGH=LOW,4,HIGH-LOW);
qj1:=IF(CAPITAL=0,qj0*(jj-MIN(CLOSE,OPEN)),qj0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));
qj2:=IF(CAPITAL=0,qj0*(MIN(OPEN,CLOSE)-LOW),qj0*IF(HIGH=LOW,1,(jj-MIN(CLOSE,OPEN))));
qj3:=IF(CAPITAL=0,qj0*(HIGH-MAX(OPEN,CLOSE)),qj0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));
qj4:=IF(CAPITAL=0,qj0*(MAX(CLOSE,OPEN)-jj),qj0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-jj)));
DDX:=((qj1+qj2)-(qj3+qj4))/sum(vol,60);
not(STRFIND(stkname,'ST',1)>0) and c>ref(c,1)*1.025
and CROSS("DMI.PDI","DMI.MDI")
and count("DMI.PDI">"DMI.MDI",8)=1
and cross(v/240,ma(v,5)/240)
and cross("kd.k","kd.d")
and all(ddx>0,m);