通达信乘风趋势主图

通达信乘风趋势主图

乘风趋势主图执行的是趋势为王，只做多头的理念。均线采用我习惯的5、13、21、34、55参数，以MA34作为多空判断线，信号点采用了我发过的KDJ介入为基础，并以多空线来定义抄底、回抽、确认、加仓等介入信号，卖出信号则以RSI作为参考提示，主图并叠加了MACD柱子。


CCC:=IF(CAPITAL>0,AMOUNT/VOL/100,C);
底线:10*(HHV(HIGH,13)-LLV(LOW,13))/100+LLV(LOW,13),COLORffabcd,LINETHICK0;
m55:MA(CLOSE,55),colorFF0080,LINETHICK0;
m34:MA(CLOSE,34),color0000ff,LINETHICK0;
m21:MA(CLOSE,21),color00FFff,LINETHICK0;
m13:MA(CLOSE,13),colorffFFFF,LINETHICK0;
m5:ma(c,5),colorff00ff,LINETHICK0;


FILLRGN(c,底线,llv(l,13)),color004000;

tjaa:=BARSLAST(ref(cross("RSI.RSI1",22) and c>o,1));
R准备:=l<ref(o,tjaa+1) and "RSI.RSI1">22 and "RSI.RSI1"<ref("RSI.RSI1",1) and BARSLAST(cross("RSI.RSI1",22)and c>o)+1>5 and BARSLAST(cross("RSI.RSI1",22)and c>o)+1<25;
tja1:=BARSLAST(ref(cross("KDJ.J",0),1));
J准备:=l<ref(o,tja1+1) and "KDJ.J">0 and "KDJ.J"<ref("KDJ.J",1) and BARSLAST(cross("KDJ.J",0))+1>5 and BARSLAST(cross("KDJ.J",0))+1<10;
STICKLINE(R准备 AND J准备,(0.93*SYSPARAM(5)),(0.93*SYSPARAM(5))*1.03,30,0),colorFF0080;
R卖1:="RSI.RSI1">80 and "RSI.RSI2"<80;
R卖2:="RSI.RSI1">85 and "RSI.RSI2">80;
STICKLINE("RSI.RSI1">80,h*1.01,l*0.99,10,0),color555555;
STICKLINE(R卖1,h*1.01,l*0.99,10,0),color00ff00;
STICKLINE(R卖2,h*1.01,l*0.99,10,0),colorff0000;


PARTLINE(c,m34),Colorred,LINETHICK2,PRECISION2;
PARTLINE(m34<ref(m34,1),m34),Colorfff333,LINETHICK2,PRECISION2;
底线,COLORffabcd,LINETHICK1;


{空心红}
STICKLINE(C,H,L,1,0),COLORff0000;
STICKLINE(C,C,O,8,0),COLORff0000;
STICKLINE(C>o,C,O,8,1),COLORff0000;
STICKLINE(C>O and (m34>=ref(m34,1) or ccc>m34),H,L,1,0),COLORRED;
STICKLINE(C>O and (m34>=ref(m34,1) or ccc>m34),C,O,8,1),COLORRED;
STICKLINE(C<=O and (m34>=ref(m34,1) or ccc>m34),H,L,1,0),COLORCYAN;
STICKLINE(C<=O and (m34>=ref(m34,1) or ccc>m34),C,O,8,1),COLORCYAN;
STICKLINE(C>O and (m34>=ref(m34,1) or ccc>m34) AND C>=M13,H,L,1,0),COLORFFC0DD;
STICKLINE(C>O and (m34>=ref(m34,1) or ccc>m34) AND C>=M13,C,O,8,0),COLORFFC0DD;
STICKLINE(C<=O and (m34>=ref(m34,1) or ccc>m34) AND C>=M13,H,L,1,0),COLORDDDDDD;
STICKLINE(C<=O and (m34>=ref(m34,1) or ccc>m34) AND C>=M13,C,O,8,1),COLORDDDDDD;
STICKLINE(L<ma(c,34) and (m34>=ref(m34,1) or ccc>m34) AND ma(c,21)>ref(ma(c,21),1) and ma(c,21)>ma(c,34),C,O,8,0),COLOR00FFFF;
STICKLINE(L<ma(c,34) and (m34>=ref(m34,1) or ccc>m34) AND ma(c,21)>ref(ma(c,21),1) and ma(c,21)>ma(c,34) AND C<O,C,O,8,1),COLOR00FFFF;


PARTLINE(m34>m55,m55),colorff0080;

PARTLINE(m21>=m34 and m21<REF(m21,1) ,m21),COLOR33FF33,LINETHICK1,PRECISION2;
PARTLINE(m21>=m34 and m21>=REF(m21,1),m21),COLOR00ffff,LINETHICK1,PRECISION2;
PARTLINE(m21<m34 and m21<REF(m21,1),m21),COLOR33FF33,LINETHICK1,LINEDOT;
PARTLINE(m21<m34 and m21>=REF(m21,1),m21),COLOR00ffff,LINETHICK1,LINEDOT;


PARTLINE(m13>=m34 and m13>=ref(m13,1),m13),Colorffffff,LINETHICK1,PRECISION2;
PARTLINE(m13>=m34 and m13<ref(m13,1),m13),COLORff5959,LINETHICK1;
PARTLINE(m13<m34 and m13>=ref(m13,1),m13),Colorffffff,LINETHICK1,LINEDOT;
PARTLINE(m13<m34 and m13<ref(m13,1),m13),COLORff5959,LINETHICK1,LINEDOT;

PARTLINE(m5>=m34 and m5>=ref(m5,1),m5),COLORff00ff,PRECISION2,LINETHICK1;
PARTLINE(m5>=m34 and m5<ref(m5,1),m5),COLORCYAN,LINETHICK1;
PARTLINE(m5<m34 and m5>=ref(m5,1),m5),COLORff00ff,LINEDOT,LINETHICK1;
PARTLINE(m5<m34 and m5<ref(m5,1),m5),COLORCYAN,LINETHICK1,LINEDOT;


抄底:=REF(COUNT("KDJ.K"<ref("KDJ.K",1),5)>=5,1) AND COUNT("KDJ.K"<30,5)>=2 AND COUNT("KDJ.J"<0,3)>0 AND CROSS("KDJ.J",0);
DRAWTEXT(抄底 and not((ccc>m34 or m34>ref(m34,1))),l*0.98,'抄\n底'),COLOR00ffff,ALIGN;
DRAWTEXT(抄底 and (ccc>m34 or m34>ref(m34,1)),l*0.98,'确\n认'),COLORred,ALIGN;
tj00:=BARSLAST(ref(cross("KDJ.K","KDJ.D") and ref("KDJ.K",1)<35,1));
加仓:=c<ref(c,tj00+1)*1.1 and ref("KDJ.K",1)<60 and (tj00+1)<25 and (tj00+1)>5 and "KDJ.K">ref("KDJ.K",tj00+1) and cross("KDJ.K","KDJ.D");
DRAWTEXT(加仓 and not((ccc>m34 or m34>ref(m34,1))),l*0.98,'回\n抽'),COLOR5599ff,ALIGN;
DRAWTEXT(加仓 and (ccc>m34 or m34>ref(m34,1)),l*0.98,'加\n仓'),COLORff00ff,ALIGN;
DRAWICON(CROSS("KDJ.J",0) and (ccc>m34 or m34>ref(m34,1)),l*0.97,8),ALIGN;

{主图MACD}
DIFFZ:=EMA((EMA(CLOSE,12)-EMA(CLOSE,26)),1);
DEAZ:=EMA(DIFFZ,9),COLOR00AA88;
MACDZ:=3*(DIFFZ-DEAZ);
STICKLINE(MACDZ>0 AND MACDZ>REF(MACDZ,1),(0.93*SYSPARAM(5)),MACDZ+(0.93*SYSPARAM(5)),8,0),COLORFF00FF;
STICKLINE(MACDZ>0 AND MACDZ<=REF(MACDZ,1),(0.93*SYSPARAM(5)),MACDZ+(0.93*SYSPARAM(5)),8,1),COLORFF00FF;
STICKLINE(MACDZ<0 AND MACDZ>REF(MACDZ,1),(0.93*SYSPARAM(5)),MACDZ+(0.93*SYSPARAM(5)),8,1),COLORDDDDDD;
STICKLINE(MACDZ<0 AND MACDZ<=REF(MACDZ,1),(0.93*SYSPARAM(5)),MACDZ+(0.93*SYSPARAM(5)),8,0),COLORDDDDDD;
PARTLINE(MACDZ>0 AND DIFFZ>0,(0.9*SYSPARAM(5))),CROSSDOT,COLOR0000FF,LINETHICK1;
PARTLINE(MACDZ<=0 AND DIFFZ>0,(0.9*SYSPARAM(5))),CROSSDOT,COLOR00FFFF,LINETHICK1;
PARTLINE(MACDZ>0 AND DIFFZ<=0,(0.9*SYSPARAM(5))),CROSSDOT,COLORFF55DD,LINETHICK1;
PARTLINE(MACDZ<=0 AND DIFFZ<=0,(0.9*SYSPARAM(5))),CROSSDOT,COLOR66DD66,LINETHICK1;