幺三五改2 通达信主图指标 源码 贴图 自已修改合成的宁俊明135战法主图
指标源代码是从网上下载.本人用多个指标修改合成,喜欢135战法的拿去玩.有天地线通道和买卖点红绿箭头提示,三条均线有趋势变色提示.本人主要用作学习,实战其实只要看均线变色即可.如果嫌K线形态提示过频过多,可自行删除不想要的K线形态代码,代码有详细注释一看就知.新手实战使用的话,短线看13均线变红时考虑介入,中长线看34,55均线变色介入,结合量柱和MACD.至于K线形态名称详解,自己参看宁俊明老师的135战法.祝大家投资愉快
EMA34:MA(C,34),COLORYELLOW;
EMA55:MA(C,55),COLORFF00FF;
天线:MA(REF(HHV(C,30),1),2),COLORLIBLUE;
地线:MA(REF(LLV(C,30),1),2),COLORLIBLUE;
{彩色涨停板}
A:=C-O;
B:=C/REF(C,1) =1.093 AND H=C;
STICKLINE(B,O,O+A/4,3,0),COLORFF99FF;
STICKLINE(B,O+A/4,O+A*2/4,3,0),COLORFF00FF;
STICKLINE(B,O+A*2/4,O+A*3/4,3,0),COLOR9900FF;
STICKLINE(B,O+A*3/4,O+A,3,0),COLOR0000FF;
{见好就收}
Y:=(EMA13-EMA55)/EMA13*100;
JHJX:=REF(Y,1) =10 AND Y
{DRAWICON(JHJX,H,1);}
DRAWTEXT(JHJX,H+0.03,'见好'),COLOR00FF99;
{红杏出墙}
HX1:=EMA34 EMA13 AND EMA55 EMA34;{股价长期下跌，并且远离长期均线}
HX2:=BARSLAST((C-EMA13)/EMA13*100 {收盘价在13均线%6到现在的天数}
HX3:=ABS(1-EMA55/REF(C,1))
HX6:=BARSLAST(CROSS(EMA55,EMA34)) {13日均线下降趋于走平}
HX4:=ABS(1-REF(EMA13,1)/EMA13) 0.004 AND EMA34
HX5:=EMA13 REF(C,1) AND C EMA13 AND C
HX7:=HX1 {AND HX3} AND HX4 AND HX5 ;
HX8:=HX7 AND FILTER(HX7,10);{满足后10天内不标记}
DRAWTEXT(HX8,H,'红杏'),COLORYELLOW;
{蚂蚁上树}{www.9m8.cn 九毛八公式指标网}
BR1:=COUNT(BETWEEN(((C-O)/O)*100,0,5) ,5)=5;{5日内收盘价都比前日收盘价高}
BR2:=(ABS(EMA13-EMA34)+ABS(EMA34-EMA55))/C {主均线相距很近或基本持平}
BR3:=C EMA55 AND COUNT(EMA55 L,5) {股价送上55日均线}
MYSS:=BR1 AND BR2 AND BR3;
DRAWTEXT(MYSS AND FILTER(MYSS,5),H,'蚂蚁'),COLOR00C5FF;
{黑客点击}
DJ1:=EMA13 EMA34 AND EMA55 EMA34;{13日均线大于34日均线，34日均线小于55日均线}
DJ2:=O EMA55;{开盘价大于55日均线}
DJ3:=CROSS(EMA13,EMA55) OR ABS(1-EMA13/EMA55) 0.002;
DJ4:=O C AND REF(C,1)
HKDJ:= DJ2 AND DJ3 AND DJ4;
DRAWTEXT(HKDJ AND FILTER(HKDJ,10),L-0.03,'黑客'),COLORD6BA63;
{红衣侠女}
XN1:=ABS(1-HHV(EMA55,5)/LLV(EMA55,5)) 0.02;
XN2:=CROSS(EMA13,EMA55) OR ABS(1-EMA13/EMA55) 0.002;
XN3:=C O AND V REF(V,1) AND C EMA55;
HYXN:=XN1 AND XN2 AND XN3;
DRAWTEXT(HYXN AND FILTER(HYXN,5),L-0.05,'红衣'),COLOR00FF99;
{海底捞月}
LY1:=COUNT(ABS(1-EMA55/EMA34) 0.1,20)
LY2:=COUNT(CROSS(EMA34,EMA13),40) =1 AND COUNT(CROSS(EMA55,EMA13),40)
LY3:=CROSS(EMA13,EMA55);
HDLY:=LY1 AND LY2 AND LY3;
DRAWTEXT(HDLY AND FILTER(HDLY,5),L-0.25,'捞月'),COLORGREEN;
{均线互换}
JXHH:=BARSLAST(REF(CROSS(EMA55,EMA34),1)) AND CROSS(EMA34,EMA55);
DRAWTEXT(JXHH,L+0.09,'线换'),COLOR0099FF;
{梅开二度}
MKED1:=BARSLAST(REF(CROSS(EMA34,EMA13),1));
MKED2:=COUNT(H =EMA55,MKED1)=MKED1;
MKED:=MKED2 AND CROSS(EMA13,EMA34);
DRAWTEXT(MKED,H+0.02,'梅二'),COLOR0044FF;
{一阳三线}
YY1:=C EMA13 AND EMA13
YY2:=C EMA34 AND EMA34
YY3:=C EMA55 AND EMA55
YYSX:=YY1 AND YY2 AND YY3;
DRAWTEXT(YYSX,H+0.1,'阳三'),COLORRED;
{揭竿而起}
MAX3:=MAX(MAX(EMA13,EMA34),EMA55);
MIN3:=MIN(MIN(EMA13,EMA34),EMA55);
JG1:=C*0.05 ABS(EMA13-EMA34);{13线34线55线接近}
JG2:=C*0.05 ABS(EMA34-EMA55);
JG3:=C =O*1.03 AND C MAX3;{阳线3％}
JG4:=O MIN3 AND MAX3
JG5:=C REF(H,5);
JG6:=(C-EMA34)/EMA34 =0.15;{控制价高}
JG7:=V MA(V,5) AND MA(V,10);
JGEQ:=JG1 AND JG2 AND JG3 AND JG4 AND JG5 AND JG6 AND JG7;
DRAWTEXT(JGEQ,H+0.1,'揭竿'),COLORGREEN;
{三线推进}
MAX4:=MAX(MAX(MAX(EMA13,EMA34),EMA55),H);
MIN4:=MIN(MIN(MIN(EMA13,EMA34),EMA55),L);
SXTJ1:=HHV(MAX4,60);
SXTJ2:=LLV(MIN4,60);
SXTJ3:=EVERY(ABS(1-SXTJ1/SXTJ2) 0.3,20);
SXTJ:=SXTJ3 AND (YYSX OR JGEQ);
DRAWTEXT(SXTJ AND FILTER(SXTJ,10),H+0.25,'三线推进'),COLOR00C5FF;
{浪子回头}
LZ1:=REF(O,2) REF(C,2) AND REF(O,1) REF(C,1) AND O
LZ2:=C =REF(C,1) AND REF(C,1) =REF(C,2);
LZ3:=REF(V,3) MA(V,3);
LZ4:=REF(C,3) EMA13 AND (C EMA55 OR ABS(1-C/EMA55) 0.01);
LZHT:=LZ1 AND LZ2 AND LZ3 AND LZ4;
DRAWTEXT(LZHT AND FILTER(LZHT,5),L-0.1,'浪子'),COLOR00FF99;
{走四方}
ZSF1:=REF(C,4) REF(O,4) AND(REF(C,4) EMA13 OR REF(C,4) EMA34) AND (ABS(1-REF(EMA55,4)/EMA55) 0.01 OR MA(EMA55,4) REF(EMA55,5));
ZSF2:=COUNT(ABS((1-REF(C,1)/C)*100) 3,4)=4 AND REF(V,4)*0.8 MA(V,4);
ZSF:=ZSF1 AND ZSF2;
DRAWTEXT(ZSF AND FILTER(ZSF,4),L-0.05,'走四方'),COLORLIBLUE;
{一枝独秀}
YZ1:=C/O 1.01 AND H/C 1.025 ;{收阳有上影}
YZ2:=EMA13 MAX(EMA34,EMA55) AND C 1.05*EMA13 AND O MA(C,11);{昨收阳 今大于均线}
YZDX:=YZ1 AND YZ2;
DRAWTEXT(YZDX,(H+C)/2,'独秀'),COLOR00FF99;
{独上高楼}
DSGL1:=REF(C,1) =REF(O,1);
DSGL2:=O/REF(C,1) 1.029 AND O/C 1.03 AND O/MAX(EMA13,EMA55) 1.03;
DSGL:=DSGL1 AND DSGL2;
DRAWTEXT(DSGL,(O+C)/2,'高楼'),COLORRED;
{金屋藏娇}
JWCJ1:=O C AND REF(O,1) REF(C,1);
JWCJ2:=O =REF(C,1) AND L =REF(L,1);
JWCJ3:=REF(C,1)/REF(L,1) 1.02;
JWCJ4:=EMA34 EMA13 OR EMA55 EMA13;
JWCJ:=JWCJ1 AND JWCJ2 AND JWCJ3 AND JWCJ4;
DRAWTEXT(JWCJ,LOW-0.2,'藏娇'),COLORYELLOW;
{日月合璧}
RYHB1:=REF(O,1) =REF(C,2) AND REF(O,1) REF(C,1) AND ABS(1-REF(C,1)/REF(L,1)) 0.02;
RYHB2:=C O AND ABS(1-C/REF(O,1)) 0.025 AND ABS(1-O/REF(C,1)) 0.025;
RYHB3:=REF(EMA13,1) EMA13 OR ABS(1-EMA13/REF(EMA13,1)) 0.01 AND (EMA34 EMA13 OR EMA55 EMA13);
RYHB4:=REF(L,1) =LLV(REF(L,1),10);
RYHB:=RYHB1 AND RYHB2 AND RYHB3 AND RYHB4;
DRAWTEXT(RYHB ,L+0.3,'日月'),COLORYELLOW;
{投石问路}
TSWL1:=CROSS(EMA13,EMA34) AND EMA55 EMA13;
DRAWTEXT(TSWL1,H+0.05,'投石'),COLOR0044FF;
{分道扬镳}
FDYB:=CROSS(EMA34,EMA13) AND EMA34 EMA55;
DRAWTEXT(FDYB,L-0.1,'分道'),COLOR0044FF;
{三军集结}
SJJJ3:=REF(EMA55,1) REF(EMA13,1);
SJJJ4:=ABS(1-(MAX(MAX(EMA34,EMA55),EMA13)/MIN(MIN(EMA13,EMA34),EMA55))) 0.005;
SJJJ:=SJJJ3 AND SJJJ4;
DRAWTEXT(SJJJ AND FILTER(SJJJ,5),L-0.1,'三军'),COLOR0044FF;
{突出重围}
TCCW1:=REF(EMA13,1) REF(EMA55,1);
TCCW2:=LLV(REF(EMA13,1),5) EMA13 AND ABS(1-(MAX(MAX(EMA34,EMA55),EMA13)/MIN(MIN(EMA13,EMA34),EMA55))) 0.008;
TCCW:=TCCW1 AND TCCW2;
DRAWTEXT(TCCW AND FILTER(TCCW,5),H+0.01,'突围'),COLOR00FF99;
{明修栈道}
MXZD1:=C/O 1.07;
MXZD2:=EMA13 HHV(REF(EMA13,1),5) AND V HHV(REF(V,1),10) AND V/MA(REF(V,1),5)
MXZD:=MXZD1 AND MXZD2;
DRAWTEXT(MXZD,H-0.25,'栈道'),COLOR00C5FF;
{暗度陈仓}
ADCC1:=O/C 1.05 AND EMA13/EMA55 1.1 AND EMA13 MA(EMA13,5);
ADCC2:=O/REF(C,1) 1.03;{HHV(REF(V,1),5) V AND V/MA(REF(V,1),5) 2}
ADCC:=ADCC1 AND ADCC2;
DRAWTEXT(ADCC,(C+O)/2,'陈仓'),COLOR0099FF;
{破镜重圆}
PJCY1:=REF(O,1)/REF(C,1) 1.02;
PJCY2:=O =REF(C,1) AND C =REF(O,1);
PJCY3:=(ABS(1-REF(C,1)/EMA55) 0.05 OR ABS(1-C/EMA55) 0.05 OR ABS(1-MA(C,2)/EMA55) 0.05);
PJCY4:=EMA13 EMA55 OR EMA13 MA(EMA13,5);
PJCY:=PJCY1 AND PJCY2 AND PJCY3 AND PJCY4;
DRAWTEXT(PJCY,LOW,'重圆'),COLORYELLOW;
{一石二鸟}
YSEN1:=REF(C,2) REF(O,2) AND REF(O,1) REF(C,1) AND O
YSEN2:=REF(C,2) EMA55 AND EMA13 EMA55 AND EMA13 =MA(EMA13,5);
YSEN3:=REF(V,2) REF(V,1) AND REF(V,2)
YSEN:=YSEN1 AND YSEN2 AND YSEN3;
DRAWTEXT(YSEN,H+0.01,'二鸟'),COLORLIBLUE;
{拖泥带水}
TNDS1:=O/REF(C,1) 1.05 AND MIN(C,O)/L 1.03;
TNDS2:=C/MAX(EMA13,EMA55) 1.03 AND C REF(C,1);
TNDS:=TNDS1 AND TNDS2;
DRAWTEXT(TNDS,(O+C)/2,'拖泥'),COLOR00FF99;
{金蝉脱壳}
JCTQ1:=O C AND (EMA13/EMA55 1.1 OR (C/MIN(EMA13,EMA55) 1.1)) AND EMA13 MA(EMA13,5);
JCTQ2:=REF(O,1) =REF(C,2) AND REF(C,1) REF(O,1) AND O =REF(C,1) AND C REF(O,1);
JCTQ:=JCTQ1 AND JCTQ2;
DRAWTEXT(JCTQ,(O+C)/2,'脱壳'),COLORRED;
{一箭穿心}
YJCX:=CROSS(EMA55,EMA13);
DRAWTEXT(YJCX,H+0.1,'穿心'),COLOR0044FF;
{步步高}
BBG1:=C =REF(C,1) AND REF(C,1) =REF(C,2);{3日内收盘价都比前日收盘价高}
BBG2:=V =REF(V,1) AND REF(V,1) =REF(V,2);{3日内量都比前日量高}
BBG3:=COUNT(C =O,3)=3;
BBG:=BBG1 AND BBG2 AND BBG3;
DRAWTEXT(BBG AND FILTER(BBG,3),(C+O)/2-0.1,'步高'),COLOR00FF99;
{双飞燕}
SFY1:=EMA13 EMA34 AND EMA34 EMA55;
SFY2:=REF(O,1) =REF(C,2) AND O =REF(C,1) AND REF(C,2) =REF(O,2);
SFY3:=COUNT(C O AND C/O 1.02,2)=2 OR COUNT(O C AND O/C 1.02,2)=2;
SFY4:=REF(V,1)
SFY:=SFY1 AND SFY2 AND SFY3 AND SFY4;
DRAWTEXT(SFY AND FILTER(SFY,2),L,'双飞燕'),COLORYELLOW;
{三剑客}
SJK1:=EMA13 EMA34 AND EMA34 EMA55;
SJK2:=COUNT(C =O AND O/C 1.03,3)=3 AND COUNT(ABS(1-REF(C,1)/C) 1.03,2)=2;
SJK:=SJK1 AND SJK2;
DRAWTEXT(SJK AND FILTER(SJK,3),L,'三剑客'),COLORYELLOW;
{四星望月}
SXWY1:=COUNT(C =O AND C/O 1.03,4)=4;
SXWY2:=(ABS(EMA13-EMA34)+ABS(EMA34-EMA55))/C {主均线相距很近或基本持平}
SXWY3:=EMA55 EMA13;
SXWY:=SXWY1 AND SXWY2 AND SXWY3;
DRAWTEXT(SXWY AND FILTER(SXWY,5),H,'望月'),COLOR00C5FF;
{星星点灯}
XXDD1:=ABS(1-C/O)*100 =2.5 AND H/MAX(C,O) 1.03 AND REF(C,1)/REF(O,1) 1.05;
XXDD2:=O =REF(C,1) AND ABS(1-REF(EMA13,1)/EMA55)
XXDD:=XXDD1 AND XXDD2;
DRAWTEXT(XXDD,(O+C)/2,'点灯'),COLOR0099FF;
{过河拆桥}
GHCQ1:=O C AND O/C =1.04;
GHCQ2:=O EMA13 AND EMA13
GHCQ3:=EMA13/EMA55 1.1 AND ABS(1-EMA13/MA(EMA13,3)) 0.02;
GHCQ:=GHCQ1 AND GHCQ2 AND GHCQ3;
DRAWTEXT(GHCQ,(O+C)/2,'拆桥'),COLOR0099FF;
{狗急跳墙}
GJTQ1:=O/REF(C,1) 1.02 AND L REF(C,1);
GJTQ2:=V MA(V,5);
GJTQ3:=EMA13/EMA55
GJTQ:=GJTQ1 AND GJTQ2 AND GJTQ3;
DRAWTEXT(GJTQ,(O+C)/2-0.1,'跳墙'),COLOR0099FF;
{双蹄并进}
STBJ1:=CROSS(DMI.PDI,DMI.MDI);
STBJ2:=ABS(1-DMI.ADX/DMI.ADXR)
STBJ:=STBJ1 AND STBJ2;
DRAWTEXT(STBJ,(O+C)/2+0.1,'双蹄并进'),COLORGREEN;
{一剑封喉}
YJFH1:=REF(C,1) =REF(O,1);
YJFH2:=H/MAX(C,O) =1.035 ;
YJFH3:=V/MA(REF(V,1),11) 3 AND EMA13/EMA55 1.05;
YJFH:=YJFH1 AND YJFH2 AND YJFH3;
DRAWTEXT(YJFH,(H+L)/2,'封喉'),COLORRED;
{小鸟依人}
XNYR1:=REF(C,1)/REF(O,1) 1.05;
XNYR2:=O =REF(C,1) AND ABS(1-C/O) 0.02;
XNYR3:=COUNT(JGEQ OR YYSX OR HYXN,10) =1 AND COUNT(JGEQ OR YYSX OR HYXN,2)=0;
XNYR:=XNYR1 AND XNYR2 AND XNYR3;
DRAWTEXT(XNYR,H-0.1,'鸟依人'),COLORLIBLUE;
{立竿见影}
LGJY1:=O =REF(C,1) AND REF(V,1) V AND O
LGJY2:=COUNT(JGEQ OR YYSX OR HYXN,2)=1;
LGJY:=LGJY1 AND LGJY2;
DRAWTEXT(LGJY,H+0.1,'立竿'),COLORLIBLUE;
{节外生枝}
JWSZ1:=EMA13 MAX(EMA34,EMA55) AND EMA13/EMA55 1.1 AND REF(C,1) 1.04*EMA13 AND REF(C,1)/REF(O,1) 1.04;
JWSZ2:=ABS(1-C/O) 0.015 AND ABS(1-REF(C,1)/C) 0.02;
JWSZ:=JWSZ1 AND JWSZ2;
DRAWTEXT(JWSZ,(H+C)/2,'生枝'),COLOR00FF99;
{笑里藏刀}
XLCD1:=REF(H,1)/MAX(REF(C,1),REF(O,1)) 1.04;
XLCD2:=REF(H,1) H AND O =REF(C,1);
XLCD3:=EMA13/EMA55 1.05 AND C/EMA13 1.03;
XLCD:=XLCD1 AND XLCD2 AND XLCD3;
DRAWTEXT(XLCD,(O+C)/2,'藏刀'),COLOR00FF99;
{马失前蹄}
MSQT1:=EMA55/EMA13 1.04 AND EMA13/C 1.03;
MSQT2:=O =REF(L,1) AND REF(O,1)/REF(C,1) 1.03;
MSQT:= MSQT1 AND MSQT2;
DRAWTEXT(MSQT,(O+C)/2,'失蹄'),COLORYELLOW;
{绝处逢生}
JCFS1:=EMA55 EMA13 AND EMA13
JCFS2:=O =REF(L,1) AND C/O 1.05;
JCFS:= JCFS1 AND JCFS2;
DRAWTEXT(JCFS,H,'逢生'),COLORYELLOW;
{一阴三线}
YYSX1:=EMA13 C AND O EMA13;{一阴三线}
YYSX2:=EMA34 C AND O EMA34;
YYSX3:=EMA55 C AND O EMA55;
YYYSX:=YYSX1 AND YYSX2 AND YYSX3;
DRAWTEXT(YYYSX,H+0.25,'阴三'),COLOR00FF99;
{落井下石}
LJXS1:=REF(L,1) O AND EMA13/EMA55 1.05 AND O
DRAWTEXT(LJXS1,H+0.01,'下石'),COLOR00C5FF;
{晨钟暮鼓}{www.9m8.cn 九毛八公式指标网}
CZMG1:=REF(C,1)/REF(O,1) 1.05 AND REF(V,1)/REF(V,2) 2 AND HSL
CZMG2:=C O AND V REF(V,1);
CZMG:=CZMG1 AND CZMG2;
DRAWTEXT(CZMG,H,'暮鼓'),COLORF00FF0;
白马线:MA(C,13),COLORRED,LINETHICK1;
黑马线:MA(C,34),COLORYELLOW,LINETHICK1;
烈马线:MA(C,55),COLOR9933CC,LINETHICK1;
K1:=BACKSET(白马线 REF(白马线,1),2);
波幅变窄:IF(K1,白马线,DRAWNULL),COLOR00CC33,LINETHICK1;
K2:=BACKSET(黑马线 REF(黑马线,1),2);
均线粘合:IF(K2,黑马线,DRAWNULL),COLORFFCC66,LINETHICK1;
K3:=BACKSET(烈马线 REF(烈马线,1),2);
随时变盘:IF(K3,烈马线,DRAWNULL),COLORBLUE,LINETHICK1;
投石叉:DRAWICON(CROSS(白马线,黑马线),黑马线,1);
红客叉:DRAWICON(CROSS(白马线,烈马线),烈马线,1);
互换叉:DRAWICON(CROSS(黑马线,烈马线),烈马线,1);
分道叉:DRAWICON(CROSS(黑马线,白马线),黑马线,2);
穿心叉:DRAWICON(CROSS(烈马线,白马线),烈马线,2);
各为叉:DRAWICON(CROSS(烈马线,黑马线),烈马线,2);
