将135战法大智慧主图改成通达信

[复制链接]
查看93 | 回复0 | 2022-7-24 06:57:01 | 显示全部楼层 |阅读模式

135战法主图通达信

13:MA(C,13),COLORRED;
34:MA(C,34),COLORYELLOW;
55:MA(C,55),COLOR9933CC;
 K1:=BACKSET(13<REF(13,1),2);
 IF(13,K1,RGB(150,255,200));
 K2:=BACKSET(34<REF(34,1),2);
 IF(34,K2,RGB(120,120,120));
 K3:=BACKSET(55<REF(55,1),2);
 IF(55,K3,RGB(150,0,250));
 JW1:=C<OPEN AND REF(C,1)<REF(OPEN,1);
 JW2:=OPEN<REF(C,1) AND C>REF(L,1);
 JW3:=O<EMA(C,13) AND O<EMA(C,34) AND O<EMA(C,55);
 JW:=JW1 AND JW2 AND JW3;
 DRAWTEXT(JW,LOW-0.1,'←金屋藏娇'),COLORYELLOW;
 AR1:=55>34 AND 34>13;
AR2:=BARSLAST((C-13)/13*100<-6);
 AR3:=13>=REF(13,1);
 AR4:=COUNT(CROSS(C,13),AR2)=1;
 AR5:=AR1 AND AR2 AND AR3 AND AR4;
 AR6:=AR5 AND FILTER(AR5,10);
 DRAWTEXT(AR6,L-0.0,'←红杏出墙'),COLORYELLOW;
 BR1:=COUNT(BETWEEN((C-REF(C,1))/REF(C,1)*100,0,5) ,5)=5;
 BR2:=ABS((13-34)+(34-55))/C<0.2;
 BR3:=C>55 AND (REF(C,1)<REF(55,1) OR REF(C,2)<REF(55,2) OR REF(C,3)<REF(55,3) OR REF(C,4)<REF(55,4) OR REF(C,5)<REF(55,5));BR4:=BR1 AND BR2 AND BR3;
 DRAWTEXT(BR4 AND FILTER(BR4,10),H+0.0,'←蚂蚁上树'),COLOR00C5FF;
 TS1:=CROSS(MA(C,13),MA(C,34));{13线上穿34线}
TS2:=MA(C,13)<MA(C,55);
 TS:=TS1 AND TS2;
 DRAWTEXT(TS,34-0.0,'←投石问路'),COLORF00FF0;
 DRAWTEXT(REF((MAX(MA(C,1),MA(C,55))-MIN(MA(C,1),MA(C,55)))/MIN(MA(C,1),MA(C,55))*1000<60,1) AND EMA((EMA(CLOSE,12)-EMA(CLOSE,26)),9)<REF(EMA((EMA(CLOSE,12)-EMA(CLOSE,26)),9),1) AND REF((CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100<-1,1) AND (CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>3,L-0.02,'←破镜重圆');
Y:=(MA(C,13)-MA(C,55))/MA(C,13)*100;
 YY1:=C>MA(C,13) AND OPEN<MA(C,13);{一阳三线} 
YY3:=C>MA(C,34) AND OPEN<MA(C,34);
 YY5:=C>MA(C,55) AND OPEN<MA(C,55);
 DRAWTEXT(YY1 AND YY5 AND YY3,LOW-0.05,'←阳穿三线'),COLORRED;
 SJ1:=ABS(MA(CLOSE,13)-MA(CLOSE,34))<C*0.01;{13线34线55线接近} 
SJ2:=ABS(MA(CLOSE,34)-MA(CLOSE,55))<C*0.01; 
 SJ3:=CROSS(MA(CLOSE,13),MA(CLOSE,55));{13线上穿55线} 
DRAWTEXT(SJ1 AND SJ2 AND SJ3,HIGH+0.05,'←三军集结'),COLORRED;
 JG1:=ABS(MA(C,13)-MA(C,34))<C*0.02 AND ABS(MA(C,13)-MA(C,55))<C*0.02;
 JG2:=O>MA(C,13) OR O=MA(C,13);
 JG3:=C/OPEN>1.03; {阳线3%} 
JG:=JG1 AND JG2 AND JG3;
 DRAWTEXT(JG,H+0.0,'←揭竿而起'),COLORYELLOW;
 HR2:=13>=REF(13,3) AND 34>=REF(34,1) AND 55>=REF(55,1) AND CROSS(C,13) AND CROSS(C,34) AND CROSS(C,55);
DRAWTEXT(HR2 AND FILTER(HR2,10),H+0.1,'←三线推进'),COLORFFC8FF;
 MK1:=MA(C,13)>MA(C,55) AND MA(C,34)>MA(C,55);
 MK:=TS1 AND MK1;
 DRAWTEXT(MK,34-0.0,'←梅开二度'),COLORF00FF0;
 DRAWTEXT(CROSS(34,55),55-0.0,'←均线互换'),COLOR0099FF;
 YZ1:=C/O>1.02 AND H/C>1.02 AND O/L<1.02;{收阳有上影}
YZ2:=REF(C,1)>REF(O,1) AND O>MA(C,11);{昨收阳 今大于均线}
YZ:=YZ1 AND YZ2 AND Y>10;
 DRAWTEXT(YZ,H+0.02,'←一支独秀'),COLORF00FF0;
 DS1:=OPEN/C>1.04 AND O/REF(C,1)>1.03;{高开收阴}
DS2:=V*100/CAPITAL>0.08 AND Y>8;{换手高涨幅大}
DS:=DS1 AND DS2;
 DRAWTEXT(DS,HIGH+0.0,'←独上高楼'),COLORGREEN;
 YJ1:=H/O>1.04;
 YJ2:=ABS(C-O)<C*0.03;
 YJ3:=C/EMA(C,13)>1.1;
 YJ:=YJ1 AND YJ2 AND DS2 AND YJ3 AND YZ2;
 DRAWTEXT(YJ,HIGH+0.1,'←一剑封喉'),COLORRED;
 T:=(MA(C,13)-MA(C,55))/MA(C,13)*100;
 NN1:=C<MA(C,13) AND OPEN>MA(C,13);
 TT3:=C<MA(C,34) AND OPEN>MA(C,34);
 TT5:=C<MA(C,55) AND OPEN>MA(C,55);
 DRAWTEXT(NN1 AND TT5 AND TT3,H+0.0,'←阴破三线'),COLORBLUE;
 DRAWTEXT(CROSS(13,55),55-0.0,'←红衣侠女'),COLORYELLOW;
 W1:=REF(OPEN,1)>REF(C,1);
 W2:=C>REF(OPEN,1);
 W3:=C>OPEN;
 Y1:=VOL/MINUTE;
 Y2:=REF(VOL,1)/240;
 DRAWTEXT(W1 AND W2 AND W3 AND Y1>Y2,L-0.0,'←双覆盖'),COLORFF00FF;
 DRAWICON(CROSS(13,34),34,1);
 DRAWICON(CROSS(13,55),55,1);
 DRAWICON(CROSS(34,55),55,1);
 DRAWICON(CROSS(34,13),34,2);
 DRAWICON(CROSS(55,13),55,2);
 DRAWICON(CROSS(55,34),55,2);

 

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则