通达信操盘手一红主图选股指标公式源码

通达信操盘手一红主图选股指标公式源码

源码正文：

ma1:MA(CLOSE,5),COLORWHITE{XG51};
MA2:MA(CLOSE,10),COLORWHITE{XG51};
IF(MA1<REF(MA1,1),MA1,DRAWNULL),COLORCYAN{XG51};
IF(MA2<REF(MA2,1),MA2,DRAWNULL),COLORCYAN{XG51};
天使:=ema(C,2),COLOR000000{XG51};
魔鬼:=EMA(SLOPE(C,21)*20+C,42),COLOR000000{XG51};
买:=crOSS(天使,魔鬼){XG51};
卖:=CROSS(魔鬼,天使){XG51};
DRAWTEXT(买,L-0.3,'B'),COLORBLUE{XG51};
DRAWICON(卖,H+0.5,2){XG51};
DRAWTEXT(卖,H*1.05,'S'),COLORRED{XG51};
stICKLINE(天使>=魔鬼,LOW,HIGH,0.01,0),COLOR0000DD{XG51};
STICKLINE(天使>=魔鬼,CLOSE,OPEN,2,1),COLORWHITE{XG51};
STICKLINE(天使<魔鬼,LOW,HIGH,0.01,0),COLORFFDD00{XG51};
STICKLINE(天使<魔鬼,CLOSE,OPEN,2,0),COLORFFFF00{XG51};
STICKLINE(CROSS(天使,魔鬼),OPEN,CLOSE,2.5,0),COLORBLUE{XG51};
STICKLINE(CROSS(魔鬼,天使),OPEN,CLOSE,2.5,0),COLORRED{XG51};
A1A:=EMA(CLOSE, 9){XG51};
A1B:=((A1A - EMA(CLOSE, 5)) < 0){XG51};
A1C:=((A1A - EMA(CLOSE, 5)) > 0){XG51};
A1D:=BArslAST(A1B){XG51};
A1E:=BARSLAST(A1C){XG51};
A1F:=IF((A1E > 0),(CLOSE - REF(CLOSE, 1)) / REF(CLOSE, 1) *  100,0){XG51};
A20:=SUM(A1F,0){XG51};
A21:=IF((A1D > 0),(0 -  2),0){XG51};
A22:=IF((A1E > 0),SUM((CLOSE - REF(CLOSE, 1)) / REF(CLOSE, 1) *  100,A1E),0){XG51};
A23:=A22 / A1E{XG51};
A25:=EMA(EMA(EMA(CLOSE, 3), 3), 3){XG51};
多方:((A25 - REF(A25, 1)) + A25)COLOR0000FF,LINETHICK2{XG51};
空方:MA(多方, 15)COLORFF49FF{XG51};
DRAWTEXT(CROSS(多方,空方),L-0.3,'&uarr;买')COLOR0000FF{XG51};
DRAWICON(((REF(A21, 1) = (0 -  2)) AND (A21 = 0)),L-0.9, 38){XG51};
DRAWICON(((REF(A1E, 1) > 0) AND (A1E = 0)),H+0.5, 39){X*G!5+1*C*N*{};