通达信波动突破主图指标 源码

C1:=EMA(INDEXC,500)/EMA(C,500);
D5:=MA(INDEXC/C1,5);
D20:=MA(INDEXC/C1,20),COLOR33FF00,LINETHICK2;
GD25:=MAX(HHV(D5,150),HHV(D20,150));
DD25:=MIN(LLV(D5,150),LLV(D20,150));
ZGD2:=CONST(MAX(HHV(H,150),GD25))*0.99;
ZDD:=MIN(LLV(L,150),DD25);
ZDD2:=CONST(ZDD);
DRAWBAND(ZGD2,RGB(0,89,150),ZDD2,RGB(0,0,0));
DD:=(ZGD2-ZDD2)/15;{好股票WWW.GOODGUPIAO.COM}
MA20:=MA(CLOSE,20);
MA30:=MA(CLOSE,30);
上火车轨:=MA20>MA30 AND MA20>REF(MA20,1) AND MA30>REF(MA30,1) AND MA20-MA30>REF(MA20-MA30,1);
下火车轨:=MA20<MA30 AND MA20<REF(MA20,1) AND MA30<REF(MA30,1) AND MA30-MA20>REF(MA30-MA20,1);
MA20A:=IF(上火车轨=1,MA20,DRAWNULL);
MA30A:=IF(下火车轨=1,MA30,DRAWNULL);
DRAWBAND(MA20A,RGB(255,69,0),MA30,RGB(0,0,0));
DRAWBAND(MA30A,RGB(0,150,00),MA20,RGB(0,0,0));
DRAWBAND(D5,RGB(150,00,50),D20,RGB(0,30,150));
MA(INDEXC/C1,5);
MA(INDEXC/C1,20),COLOR33FF00,LINETHICK2;
IF(D20>=REF(D20,1),D20,DRAWNULL),COLOR0000FF,LINETHICK2;
MA5:MA(CLOSE,5),COLORFFFFFF;
MA10:MA(C,10),COLOR00FFFF;
MA(CLOSE,20),COLORFF00FF;
MA(CLOSE,30),COLOR00FF00;
MA60:MA(C,60);
MA120:MA(CLOSE,120);
MA250:MA(CLOSE,250),COLORRED;
{波动性突破}
VAR1:=(H-L)/L*100;
VAR2:=REF(VAR1,1) ;
VAR3:=REF(VAR1,2);
VAR4:=VAR2-VAR3;
VAR5:=VAR2+VAR4;
DRAWTEXT((C/REF(C,1)-1)>VAR5 AND MA20>REF(MA20,1) AND C>O,L*0.95,'←波动突破'),COLORRED;
{金印组合}
QH:=REF(H,2);
QL:=REF(L,2);
QO:=REF(O,2);
QC:=REF(C,2);
ZO:=REF(O,1);
ZC:=REF(C,1);
JYZHK:= ABS(QO-QC)/QO<0.02 AND ZO/ZC>1.03 AND ABS(O-C)/O<0.02 AND C>MA(C,30);
JYZHV:=V<REF(V,1) ;
JYZH:=JYZHK AND JYZHV;
DRAWTEXT(JYZH,L,'←金印');
{金冠组合}
JGZHK:=ABS(QO-QC)/QO<0.02 AND ZC/ZO>1.05 AND ABS(O-C)/O<0.02 AND C>MA(C,30);
JGZHV:=REF(V,1)>=2*REF(V,2);
JGZH:=JGZHK AND JGZHV;
DRAWTEXT(JGZH,H*1.02,'←金冠'),COLORYELLOW;
DRAWTEXT(VOL=HHV(VOL,20) ,C ,'←-------量能平台'),COLORYELLOW;
DRAWKLINE(H,O,L,C);
{红柱}
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.8,0) ,COLOR0344BC;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.5,0) ,COLOR0453E6;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR1A68FB;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.5,0) ,COLOR4484FB;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLOR5992FB;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0,0) ,COLOR5992FB;
{阴柱}
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2.8,0 ),COLOR00AA00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2.5,0 ),COLOR00D500;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1.5,0 ),COLOR2BFF2B;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLOR40FF40;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0,0 ),COLOR40FF40;
DRAWTEXT(CURRBARSCOUNT=58,ZGD2-DD,'福如泉涌'),COLORRED;
DRAWTEXT(CURRBARSCOUNT=58,ZGD2-2*DD,'十 万'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=58,ZGD2-3*DD,'年 里'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=58,ZGD2-4*DD,'铸 纵'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=58,ZGD2-5*DD,'就 横'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=58,ZGD2-6*DD,'英 任'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=58,ZGD2-7*DD,'雄 我'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=58,ZGD2-8*DD,'剑 行'),COLOR00FFFF;