|
以下是通达信主升浪源码副图（无源码的请下载附件导入）
主升浪指标
MA5:=MA(CLOSE,5),POINTDOT,COLOR000000,LINETHICK1;
MA21:=EMA(CLOSE,21);
MID:MA(CLOSE,21),COLOR000000,LINETHICK0;
风险线: MA(CLOSE,13),LINETHICK3,COLORGREEN;
止损线: MA(CLOSE,27),LINETHICK0,COLOREE00EE;
UPPER:MID + 2*STD(C,20),LINETHICK0,COLORFFFFFF;
LOWER:MID - 2*STD(C,20),LINETHICK0,COLORFFFFFF;
H1:=EMA(SLOPE(CLOSE,34)*20+CLOSE,75);
H2:=EMA(CLOSE,8);
VAR1D:=H2-H1;
A:=(3*C+L+O+H)/6;
B:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+REF(A,20))/210;
D:=MA(B,10);
STICKLINE((MA21 > REF(MA21,1)),MA21,MA21,5,6),LINETHICK2,COLOR00FFFF;
STICKLINE(C>=MID AND C>=O,C,O,5,0),COLORRED;
STICKLINE(C>=MID AND C>=O,H,L,0,0),COLORRED;
STICKLINE(C>=MID AND C<O,C,O,5,1),COLORRED;
STICKLINE(C>=MID AND C<O,O,H,0,0),COLORRED;
STICKLINE(C>=MID AND C<O,C,L,0,0),COLORRED;
STICKLINE(C<MID AND C>O,C,O,5,1),COLORFFFF00;
STICKLINE(C<MID AND C<=O,C,O,5,1),COLORFFFF00;
STICKLINE(C<MID AND C<=O,H,L,0,1),COLORFFFF00;
STICKLINE(C<MID AND C>O,C,H,0,1),COLORFFFF00;
STICKLINE(C<MID AND C>O,O,L,0,1),COLORFFFF00;
牛熊线:EMA(C,250),CIRCLEDOT,COLOR999999;
界:MA(CLOSE,21),POINTDOT,COLOR000000,LINETHICK0;
VAR1:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));
VAR2:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));
VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));
DRAWICON(CROSS(VAR2,MA(VAR3,6)),(LOW * 0.95),4),LINETHICK3;
DRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH * 1.05),5),LINETHICK3;
DRAWTEXT(CROSS(VAR2,MA(VAR3,6)),(LOW * 0.988),'Ｂ'),COLORYELLOW,LINETHICK3;
DRAWTEXT(CROSS(MA(VAR3,6),VAR1),(HIGH * 1.02),'Ｓ'),COLOREE00EE,LINETHICK2;
STICKLINE(C>=界 AND C>=O,C,O,5,0),COLORRED;
STICKLINE(C>=界 AND C>=O,H,L,0,0),COLORRED;
STICKLINE(C>=界 AND C<O,C,O,5,1),COLORRED;
STICKLINE(C>=界 AND C<O,O,H,0,0),COLORRED;
STICKLINE(C>=界 AND C<O,C,L,0,0),COLORRED;
STICKLINE(C<界 AND C>O,C,O,5,1),COLORFFFF00;
STICKLINE(C<界 AND C<=O,C,O,5,1),COLORFFFF00;
STICKLINE(C<界 AND C<=O,H,L,0,1),COLORFFFF00;
STICKLINE(C<界 AND C>O,C,H,0,1),COLORFFFF00;
STICKLINE(C<界 AND C>O,O,L,0,1),COLORFFFF00;
DRAWTEXT(CROSS(MA5,界),(LOW * 0.80),'◇底背离'),COLORWHITE;
DRAWTEXT(CROSS(C,止损线)AND 止损线>风险线,(LOW * 0.96),'主升浪'),COLORRED,LINETHICK3;
645244079.jpg
|
