歪虎动平衡副图指标 源码 通达信

S1:=HHV(MA(HIGH,2),2);
S2:=LLV(MA(HIGH,2),1);
SPPP:(S1-S2)/REF(C,1)*100;
SPTEM1:=(MIN(O,C)-L)/(H-L)*100;
SPTEM2:=(H-MAX(O,C))/(H-L)*100;
SPTEM3:=(C-O)/(H-L)*100;
SKJ1:=(SPTEM3>49 AND SPTEM1>0.3*SPTEM2) OR SPTEM3>80;
SKJ2:=(SPTEM3<=49 AND SPTEM3>20 AND SPTEM1>SPTEM2);
SKJ3:=(SPTEM3<=20 AND SPTEM3>-20 AND SPTEM1>1.2*SPTEM2);
SKJ4:=(SPTEM3<-20 AND SPTEM3>-40 AND SPTEM1>2*SPTEM2);
SKJ:=(SKJ1 OR SKJ2 OR SKJ3 OR SKJ4) AND (SPPP>2 OR REF(SPPP,1)>2 );
短买:IF(SUM(SPPP>0,5)=5 AND SUM(SKJ>0,5)=0,5*(SKJ1 OR SKJ2 OR SKJ3 OR SKJ4),5*SKJ),STICK,COLORRED;
X下:=HHV(MA(L,2),1);{好股票WWW.GOODGUPIAO.COM}
X上:=LLV(MA(L,2),2);
XPPP:(X上-X下)/REF(C,1)*100;
XPTEM1:=(MIN(O,C)-L)/(H-L)*100;
XPTEM2:=(H-MAX(O,C))/(H-L)*100;
XPTEM3:=(C-O)/(H-L)*100;
XKJ1:=(XPTEM3<-49 AND SPTEM2>0.3*SPTEM1) OR SPTEM3<-80;
XKJ2:=(SPTEM3>=-49 AND SPTEM3<-20 AND SPTEM1<SPTEM2);
XKJ3:=(SPTEM3>=-20 AND SPTEM3<20 AND SPTEM2>1.2*SPTEM1);
XKJ:=(XKJ1 OR XKJ2 OR XKJ3) AND (XPPP<-2 OR REF(XPPP,1)<-2 );
短卖:(-5)*FILTER(XKJ,0),STICK,COLORGREEN;
下界:-5,POINTDOT,COLORGREEN;
上界:5,POINTDOT,COLORYELLOW;