[转载]主图强势信号与副图弘历进出、弘历彩虹、换手王、操盘王、背离王指标源码
▼
原文地址：主图强势信号与副图弘历进出、弘历彩虹、换手王、操盘王、背离王指标源码
主图强势信号
STICKLINE(KDJ.J>50,O,C,3,0),COLORBLUE;
STICKLINE(KDJ.J,L,H,0,1),COLORBLUE;
STICKLINE(KDJ.J<50,O,C,3,0),COLORLIBLUE;
STICKLINE(KDJ.J<50,L,H,0,1),COLORLIBLUE;
STICKLINE(CROSS(KDJ.J,50),O,C,3,0),COLORRED;
STICKLINE(CROSS(KDJ.J,50),L,H,0,1),COLORRED;
STICKLINE(CROSS(50,KDJ.J),O,C,3,0),COLORYELLOW;
STICKLINE(CROSS(50,KDJ.J),L,H,0,1),COLORYELLOW;
天轨:MA(REF(HHV(O,45),1),2),COLORYELLOW,LINETHICK2;
地轨:MA(REF(LLV(O,45),1),2),COLORMAGENTA,LINETHICK2;
AC:=CLOSE;
AH:=HIGH;
AL:=LOW;
AO:=OPEN;
STICKLINE(AC<=AO,AH,AC,0,0),COLORFF8800;
STICKLINE(AC<=AO,AO,AL,0,0),COLORFF8800;
STICKLINE(AC<=AO,AC,AO,3,0),COLORFF8800;
STICKLINE(AC<=AO,AC,AO,1,0),COLORFFBB11;
STICKLINE(AC>=AO,AH,AC,0,0),COLOR0000FF;
STICKLINE(AC>=AO,AO,AL,0,0),COLOR0000FF;
STICKLINE(AC>AO,AC,AO,3,0),COLOR0000AA;
STICKLINE(AC>AO,AC,AO,1,0),COLOR0033DD;
快线:EMA((CLOSE+LOW)/2,8);
均衡:EMA(EMA((CLOSE+LOW)/2,20),8);
STICKLINE(快线>均衡,快线,均衡,0.1,0),LINETHICK1,COLOR0000FF;
DRAWTEXT(CROSS(快线,均衡),HIGH*1.03,'减仑'),COLOR00FF00;
STICKLINE(快线<均衡,快线,均衡,0.1,0),LINETHICK1,COLOR00FF00;
DRAWTEXT(CROSS(均衡,快线),LOW*0.98,'加仓'),COLOR0000FF;
强弱:EMA(EMA((LOW+CLOSE+HIGH)/3,25),25),LINETHICK2,COLOR008800;
WMA(CLOSE,10),COLORRED;
WMA(CLOSE,20),COLORRED;
WMA(CLOSE,30),COLORRED;
WMA(CLOSE,40),COLORGREEN;
WMA(CLOSE,50),COLORYELLOW;
WMA(CLOSE,60),COLORYELLOW;
WMA(CLOSE,70),COLORYELLOW;
WMA(CLOSE,80),COLORYELLOW;
WMA(CLOSE,150),COLORBLUE;
WMA(CLOSE,160),COLORBLUE;
WMA(CLOSE,180),COLORBLUE;
WMA(CLOSE,200),COLORBLUE;
WMA(CLOSE,300),COLORWHITE;
WMA(CLOSE,320),COLORWHITE;
WMA(CLOSE,340),COLORWHITE;
WMA(CLOSE,389),COLORWHITE;
N:=40;
M1:=100*VOL/CAPITAL;
A1:SUM(M1,N),COLORWHITE;
A2:MA(A1,20),COLORYELLOW;
副图操盘王
b:=(EMA(((O+H+L+C)/4),3)+EMA(((O+H+L+C)/4),6)+EMA(((O+H+L+C)/4),9))/4;
d:=(EMA(((O+H+L+C)/4),5)+EMA(((O+H+L+C)/4),10)+EMA(((O+H+L+C)/4),20))/4;
a1:DRAWTEXT((b>d) AND (REF(b,1) < REF(d,1)), LOW*0.99, '买');
a2:DRAWTEXT((b REF(d,1)), HIGH*1.01, '卖');
STICKLINE((b
STICKLINE((b
STICKLINE((b>d),LOW,HIGH,0.8,0),COLORRED;
STICKLINE((b>d),CLOSE,OPEN,8,0),COLORRED;
副图背离王
A1:=FORCAST(EMA(CLOSE,5),6);
A2:=FORCAST(EMA(CLOSE,8),6);
A3:=FORCAST(EMA(CLOSE,11),6);
A4:=FORCAST(EMA(CLOSE,14),6);
A5:=FORCAST(EMA(CLOSE,17),6);
B:=A1+A2+A3+A4-4*A5;
TOWERC:=EMA(B,2);
FORCAST(EMA(B,3),6),POINTDOT,colorgreen;
FORCAST(EMA(B,4),6),POINTDOT,colorgreen;
FORCAST(EMA(B,5),6),POINTDOT,colorgreen;
FORCAST(EMA(B,6),6),POINTDOT,colorgreen;
FORCAST(EMA(B,7),6),POINTDOT,colorgreen;
FORCAST(EMA(B,8),6),POINTDOT,colorgreen;
FORCAST(EMA(B,9),6),POINTDOT,colorgreen;
FORCAST(EMA(B,10),6),POINTDOT,colorgreen;
FORCAST(EMA(B,11),6),POINTDOT,colorgreen;
FORCAST(EMA(B,12),6),POINTDOT,colorgreen;
FORCAST(EMA(B,13),6),POINTDOT,colorgreen;
FORCAST(EMA(B,14),6),POINTDOT,colorgreen;
FORCAST(EMA(B,15),6),POINTDOT,colorgreen;
FORCAST(EMA(B,16),6),POINTDOT,colorgreen;
FORCAST(EMA(B,17),6),POINTDOT,colorgreen;
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,REF(TOWERC,1),8,0),colorred;
STICKLINE(TOWERC
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,REF(TOWERC,1),5,0),colorred;
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,REF(TOWERC,1),3,0),colorred;
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,REF(TOWERC,1),0,0),colorred;
STICKLINE(TOWERC
STICKLINE(TOWERC
STICKLINE(TOWERC
STICKLINE(TOWERC