通达信红绿买卖未加密选股指标公式源码

源码正文：

AA:=ema(Ema(CLOSE,8)-EMA(CLOSE,13),3){XG51};
BB:=(AA-REF(AA,1))*10{XG51};
CC:=IF(BB>REF(BB,1),BB,REF(BB,1)){XG51};
stICKLINE(BB>0,0,BB,2,0),COLORWHITE{XG51};
STICKLINE(BB<0,0,BB,2,0),COLORCYAN{XG51};
STICKLINE(CC=BB AND REF(CC,1)>REF(BB,1) AND BB<0,0,BB,1,0),COLORLIMAGENTA{XG51};
STICKLINE(crOSS(BB,0),0,BB,1,0),COLORBLUE{XG51};
DRAWTEXT(CROSS(BB,0),BB*1.3,'买入'),COLORCYAN{XG51};
DRAWTEXT(CROSS(0,BB),BB,'撤离'),COLORBLUE{XG51};
DRAWTEXT(CC=BB AND REF(CC,1)>REF(BB,1) AND BB<0,BB*1.3,'准备'),COLORLIMAGENTA{XG51};
DRAWTEXT(CC=BB AND REF(CC,1)>REF(BB,1) AND BB>0,BB*1.4,'加仓'),COLORLIMAGENTA{XG51};
DRAWTEXT(BB<CC AND REF(CC,1)=REF(BB,1) AND BB>0,BB*1.3,'卖出'),COLORWHITE{X_G*5_1_C_N_{};

源码正文：

VAR1:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21)))){XG51};
VAR2:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21)))){XG51};
VAR3:=(100 - ma(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34)){XG51};
DRAWICON(crOSS(VAR2,MA(VAR3,6)),(LOW * 0.998),8){XG51};
DRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH * 1.013),9){XG51};
DRAWTEXT(CROSS(VAR2,MA(VAR3,6)),(LOW * 0.984),'B '),COLOR4440FF{XG51};
DRAWTEXT(CROSS(MA(VAR3,6),VAR1),(HIGH * 1.035),'S '),COLORFFFF34{XG51};
年:MA(CLOSE,26),COLORCYAN{XG51};
stICKLINE(C>=年 AND C>=O,C,O,7,0),COLORWHITE{XG51};
STICKLINE(C>=年 AND C>=O,H,L,0,0),COLORWHITE{XG51};
STICKLINE(C>=年 AND C<O,C,O,7,1),COLORWHITE{XG51};
STICKLINE(C>=年 AND C<O,O,H,0,0),COLORWHITE{XG51};
STICKLINE(C>=年 AND C<O,C,L,0,0),COLORWHITE{XG51};
STICKLINE(C<年 AND C>O,C,O,7,1),COLORFFFF00{XG51};
STICKLINE(C<年 AND C<=O,C,O,7,1),COLORFFFF00{XG51};
STICKLINE(C<年 AND C<=O,H,L,0,1),COLORFFFF00{XG51};
STICKLINE(C<年 AND C>O,C,H,0,1),COLORFFFF00{XG51};
STICKLINE(C<年 AND C>O,O,L,0,1),COLORFFFF00{X_G~5!1_C_N_{};