通达信短线红绿买卖选股指标公式源码

通达信短线红绿买卖选股指标公式源码

源码正文：

TTJ:=200;TNB:=7;TNS:=7{XG51};
VR1:=0.1{XG51};
VR2:=0.1{XG51};
CS1:=(2*CLOSE+HIGH+LOW)/4*(VR1+0.001){XG51};
CS2:=ema(CS1,4)*(VR2){XG51};
CS3:=Ema(CS2,4){XG51};
CS4:=EMA(CS3,4){XG51};
JS0:=(CS4-REF(CS4,1))/REF(CS4,1)*100*(VR2){XG51};
短波0:=JS0{XG51};
JS1:=MA(JS0,2){XG51};
短波1:=JS1{XG51};
JS2:=MA(JS0,1){XG51};
短波2:=JS2{XG51};
红实波:=JS0>=0 AND JS0>REF(JS0,1),COLORWHITE{XG51};
红空波:=JS0>=0 AND JS0<=REF(JS0,1),COLORLICYAN{XG51};
绿波:=JS0<0 AND JS1>=JS2,COLORCYAN,NODRAW{XG51};
蓝波:=JS0<0 AND JS1<=JS2,COLORYELLOW,NODRAW{XG51};
X1:=0.0{XG51};
Y1:=0.00{XG51};
DQ1:=0;
JJ1:=0.05;
涨:=短波0>REF(短波0,1){XG51};
跌:=短波0<REF(短波0,1){XG51};
红涨:=红实波{XG51};
连涨:=BArslAst(短波0>REF(短波0,1) AND REF(短波0,1)<REF(短波0,2))*涨+1*涨,COLORWHITE{XG51};
连跌:=BARSLAST(短波0<REF(短波0,1) AND REF(短波0,1)>REF(短波0,2))*跌+1*跌,COLORCYAN,NODRAW{XG51};
红连涨:=BARSLAST(红实波 AND REF(红实波,1)=0)*红涨+1*红涨,COLORFF00FF{XG51};
买:=crOSS(短波0,REF(短波0,1)){XG51};
卖:=CROSS(-短波0,-REF(短波0,1)){XG51};
红卖:=CROSS(-短波0,-REF(短波0,1)) AND 红空波{XG51};
连涨N:=IF(卖=1,REF(连涨,1),0){XG51};
连跌N:=IF(买=1,REF(连跌,1),0){XG51};
红连涨N:=IF(红卖=1,REF(红连涨,1),0){XG51};
连涨0:=IF(连涨>0,连涨,DRAWNULL),COLORWHITE,CIRCLEDOT{XG51};
连跌0:=IF(连跌>0,-连跌,DRAWNULL),COLORCYAN,CIRCLEDOT{XG51};
红连涨0:=IF(红连涨>0,红连涨,DRAWNULL),COLORFF00FF,CIRCLEDOT,LINETHICK2{XG51};
IF(连涨>0,连涨,DRAWNULL),COLORWHITE,CIRCLEDOT{XG51};
IF(连跌>0,-连跌,DRAWNULL),COLORCYAN,CIRCLEDOT{XG51};
IF(红连涨>0,红连涨,DRAWNULL),COLORFF00FF,CIRCLEDOT,LINETHICK2{XG51};
久跌买:=连跌>=TNB AND C/REF(C,1)>1 {XG51};
STICKLINE(久跌买 AND COUNT(久跌买,TNB)=1,0,连跌0,1,0),COLORWHITE;{XG51};
DRAWTEXT(久跌买 AND COUNT(久跌买,TNB)=1,连跌0,'  注意买'),COLORWHITE{XG51};
DRAWTEXT(久跌买 AND COUNT(久跌买,TNB)=1 AND C>MA(C,20) AND C>dkx,连跌0+2,'  很准'),COLORLIMAGENTA{XG51};
久涨抛:=连涨>=TNS AND C/REF(C,1)<1.01{XG51};
STICKLINE(久涨抛 AND COUNT(久涨抛,TNS)=1,0,连涨,1,0),COLORCYAN;{XG51};
DRAWTEXT(久涨抛 AND COUNT(久涨抛,TNS)=1,连涨-1,'  注意卖'),COLORCYAN{XG51};
买强:=连涨-红连涨<=1 AND 红连涨=1 AND (REF(连跌,1)>=3 OR REF(连跌,2)>=3) AND L/DKX<1.03{XG51};
STICKLINE(买强,0,2,1,0),COLORLIMAGENTA{XG51};
DRAWTEXT(买强 ,1,'  快速买'),COLORLIMAGENTA{XG51};
获利了结0:=(BARSLAST(买强=1)<=4 AND BARSLAST(买强=1)>2 AND H/DKX>1.08)
OR (BARSLAST(买强=1)<=4 AND 连跌=1)  {XG51};
获利了结1:=EXIST(获利了结0,5)=0 AND BARSLAST(买强=1)=5{XG51};
STICKLINE(获利了结0 OR 获利了结1,0,-2,1,0),COLORCYAN{XG51};
DRAWTEXT(获利了结0 OR 获利了结1 ,-2,'  快速卖'),COLORCYAN{X~G?5*1~C~N~{};