通达信『蚂蚁上树』主图+选股指标。突破上轨加速上树 波段操作无未来函数不漂移 源码分享

MA5:=MA(C,5);

MA10:=MA(C,10);

MA20:=MA(C,20);

gspt1:=EMA(CLOSE,7);

gspt2:=EMA(CLOSE,14);

gspt3:=EMA(CLOSE,25);

gspt4:=EMA(CLOSE,45);

gspt5:=gspt1>gspt2;

STICKLINE(C/REF(C,1)>1.095,C,O,2,0),COLOR0000FF;

DRAWTEXT(C/REF(C,1)>1.095,L*0.96,' ★加速上树'),COLORLIRED;

STICKLINE(H< REF(LOW,0),H,REF(LOW,0),10,0);

STICKLINE(LOW>REF(H,0) ,LOW,REF(H,0),10,0);

STICKLINE(C=O,H,L,0,0);

STICKLINE((C=O)AND(C>REF(C,0)),C,O,8,0);

STICKLINE((C=O)AND(C< REF(C,0)),C,O,8,0);

STICKLINE(CROSS(gspt1,gspt2) AND gspt5,CLOSE,OPEN,2,0),COLORMAGENTA;

DRAWICON(CROSS(gspt1,gspt2) AND gspt5,L*1.002,9);

DRAWTEXT(CROSS(gspt1,gspt2) AND gspt5,L*0.98,' ★蚂蚁上树'),COLOR00FFFF;

STICKLINE(CROSS(gspt3,gspt1),CLOSE,OPEN,2,0),COLORFF0000;

gspt6:=ABS((2*CLOSE+H+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);

DRAWTEXT_FIX(1,0.980,20,1,'分析家公式网http://www.70822.com'),COLOR333333;

gspt7:=DMA(CLOSE,gspt6);

上轨:(1+7/100)*gspt7,DOTLINE,COLOR00FF00;

下轨:(1-7/100)*gspt7,DOTLINE,COLOR00FF00;

中轨:(上轨+下轨)/2,DOTLINE,COLOR00FF00;

FK:(1+14/100)*gspt7,DOTLINE,COLORGRAY;

CD:(1-14/100)*gspt7,DOTLINE,COLORGRAY;

DRAWNUMBER(ISLASTBAR,上轨,上轨),COLOR00FFFF;

DRAWNUMBER(ISLASTBAR,下轨,下轨),COLORFFFF00;

DRAWNUMBER(ISLASTBAR,中轨,中轨),COLOR00FF00;

DRAWNUMBER(ISLASTBAR,FK,FK),COLOR0000FF;

DRAWNUMBER(ISLASTBAR,CD,CD),COLORWHITE;

上轨绿:IF(上轨>=REF(上轨,1),上轨,DRAWNULL),DOTLINE,COLOR00FF00,LINETHICK1;

上轨红:IF(上轨>=REF(上轨,1),上轨,DRAWNULL),DOTLINE COLORRED,LINETHICK1;

中轨绿:IF(中轨>=REF(中轨,1), 中轨,DRAWNULL),DOTLINE,COLOR00FF00,LINETHICK1;

中轨红:IF(中轨>=REF(中轨,1), 中轨,DRAWNULL),DOTLINE COLORRED, LINETHICK1;

下轨绿:IF(下轨>=REF(下轨,1), 下轨,DRAWNULL),DOTLINE,COLOR00FF00,LINETHICK1;

下轨红:IF(下轨>=REF(下轨,1), 下轨,DRAWNULL),DOTLINE COLORRED,LINETHICK1;

IF(gspt1>REF(gspt1,1),gspt1,DRAWNULL),COLORRED,LINETHICK2;

IF(gspt1< REF(gspt1,1),gspt1,DRAWNULL),COLOR00FF00,LINETHICK2;

gspt1:=EMA(C,7);

gspt2:=EMA(C,14);

gspt3:=EMA(C,25);

gspt4:=EMA(C,45);

gspt5:=gspt1>gspt2;

gspt6:=NOT(CODELIKE('4'));

gspt7:=NOT(CODELIKE('688'));

gspt8:=IF(NAMELIKE('S'),0,1);

gspt9:=IF(NAMELIKE('*'),0,1);

gspt10:=NOT(CODELIKE('8'));

gspt11:=gspt6 AND gspt8 AND gspt7 AND gspt9 AND gspt10;