通达信【趋势波段】主图指标 轻松锁定波段 源码
波段王是在经典，指标基础上的优化升级，它将的趋势判断优势进一步强化，通过在主图上的直观呈现，让多空力量对比、关键的支撑与压力位置一目了然，方便把握DIEA波段的起始时机，为波段操作提供有力依据。
使用方法：在使用波段王时，重点关注主图上的白线与绿线关系。当白线上穿绿线时，会同步出现黄箭头买入信号，此时便是较为理想的时机。
所属板块:=STRCAT('【所属板块】：',STRCAT(STRCAT(' [行业]—',HYBLOCK),STRCAT(' [概念]—',GNBLOCK)));
风格板块:=STRCAT('【风格板块】：',STRCAT(STRCAT(' [地域]—',DYBLOCK),STRCAT(' [风格]—',FGBLOCK)));
总股本:=STRCAT(STRCAT(' 总股本:',CON2STR(TOTALCAPITAL/1000000,2)),'亿');
流通盘:=STRCAT(STRCAT(' 流通盘:',CON2STR(CAPITAL/1000000,2)),'亿');
全流通:=STRCAT(STRCAT(' 流通比:',CON2STR(CAPITAL/TOTALCAPITAL*100,2)),'％');
市值:=STRCAT(STRCAT(' 流通市值:',CON2STR((CAPITAL/1000000)*C,2)),'亿');
股本市值:=STRCAT('【股本市值】：',STRCAT(STRCAT(STRCAT(总股本,流通盘),全流通),市值));
市盈率:=STRCAT(' 市盈率:',CON2STR(C/FINANCE(33),2));
净资收益率:=STRCAT(' 净资收益率:',CON2STR(FINANCE(33)/FINANCE(34)*100,2));
主营利润率:=STRCAT(' 主营利润率:',CON2STR(FINANCE(23)/FINANCE(20)*100,2));
当前业绩:=STRCAT('【当前业绩】：',STRCAT(STRCAT(市盈率,净资收益率),主营利润率));
DRAWTEXT_FIX(ISLASTBAR,0.005,0.02,0,所属板块),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR ,0.005,0.07,0,风格板块),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.12,0,股本市值),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.17,0,当前业绩),COLORMAGENTA;
CTA1:=(((CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18)))*100);
CTA2:=SMA(CTA1,9,1);
安全线:=EMA(CTA2,3);
H1:=MAX(DYNAINFO(3),DYNAINFO(5));
L1:=MIN(DYNAINFO(3),DYNAINFO(6));
P1:=H1-L1;
DF1:=L1+P1*7/8;
DF2:=L1+P1*0.5/8;
DF3:=(DF2+DF1)/2;
V11:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);
趋势线:=EMA(V11,3),LINETHICK2,COLORLIBLUE;
RSV:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
支撑线:=SMA(RSV,5,1),COLORYELLOW;
MOV0:=(((CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18)))*100);
TQR:=REF(趋势线,1)<11 AND CROSS(趋势线,11) AND C<DF3;
CTB01:=AMOUNT/VOL/100;
CTB02:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
CTB03:=SUM(AMOUNT,15)/CTB01/100;
CTB04:=DMA(CTB02,VOL/CTB03);
CTB05:=(CLOSE-CTB04)/CTB04*100;
DIFD:=(EMA(C,12)-EMA(C,26));
DEAD:=EMA(DIFD,9);
CTB06:=(DIFD-DEAD)*2;
CTB07:=CTB06>REF(CTB06,1);
CTB08:=DIFD>DEAD AND DIFD>REF(DIFD,1) AND DEAD>REF(DEAD,1);
CTB09:=LLV(LOW,35);
CTB10:=HHV(HIGH,35);
CTB11:=EMA((CLOSE-CTB09)/(CTB10-CTB09)*100,3);
CTB12:=EMA(CTB11,3);
CTB13:=MA(CTB12,3);
CTB14:=CTB12>CTB13 AND CTB12>REF(CTB12,1) AND CTB13>REF(CTB13,1);
CTB15:=(HIGH+LOW+CLOSE)/3;
CTB16:=(CTB15-MA(CTB15,14))/(0.015*AVEDEV(CTB15,14));
CTB17:=CTB16>=100 OR (CTB16<100 AND CTB16>REF(CTB16,1));
CTB18:=(CLOSE-FORCAST(CLOSE,20))/CLOSE*100;
CTB19:=IF(CTB18>=0,CTB18,0);
CTB20:=IF(CTB18<0,-CTB18,0);
CTB21:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
CTB22:=(MA(CTB21,30))/CLOSE*100;
CTB23:=CTB22*0.8;
CTB24:=CTB20>CTB23 OR (CTB20<CTB23 AND CTB20>CTB19);
CTB25:=CTB19<CTB23 AND CTB20<CTB19 AND CTB19<REF(CTB19,1);
CTB26:=CTB07 AND CTB08 AND CTB14 AND CTB17;
RQ:=CTB26 AND CTB19>REF(CTB19,1) AND CTB24!=1 AND CTB25!=1 AND CTB05>REF(CTB05,1) AND CTB05>0;
QCTB:=BARSSINCEN(RQ,9)=0;
CTC01:=WMA(CLOSE,55/2);
CTC02:=WMA(CLOSE,55);
CTC03:=2*CTC01-CTC02;
CTC04:=WMA(CTC03,SQRT(55));
CTC05:=EMA(CLOSE,55/2);
CTC06:=EMA(CLOSE,55);
CTC07:=2*CTC05-CTC06;
CTC08:=EMA(CTC07,SQRT(55));
CTC09:=WMA(CLOSE,55/3);
CTC10:=WMA(CLOSE,55/2);
CTC11:=3*CTC09-CTC10-WMA(CLOSE,55);
CTC12:=WMA(CTC11,55);
CTC13:=IF(1=1,CTC04,IF(1=2,CTC08,CTC12));
EMA3:EMA(CLOSE,3),COLORWHITE,LINETHICK3;
MULL:IF(0,REF(CTC13,1),CTC13),COLORRED;
SULL:IF(0,REF(CTC13,2),REF(CTC13,2)),COLORGREEN;
DRAWBAND(MULL,RGB(200,0,0),SULL,RGB(0,200,100));
CTC14:=MAX(MAX(HIGH-LOW,ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
CTC15:=(HIGH+LOW)/2+MA(CTC14,9)*3.9;
CTC16:=(HIGH+LOW)/2-MA(CTC14,9)*3.9;
CTC17:=REF(CTC15,BARSLAST(CTC15<=REF(CTC15,1)));
CTC18:=LLV(CTC15,9*1.5);
CTC19:=IF(CTC18!=REF(CTC18,1) AND CTC17<REF(CTC17,1),CTC17,IF(CTC17=CTC18,CTC17,CTC18));
CTC20:=BARSLAST(CROSS(0.5,CTC15=CTC19))+1;
CTC21:=CROSS(COUNT(CROSS(CLOSE,CTC19) OR CROSS(CLOSE,REF(CTC19,2)) AND CTC15>CTC19,CTC20),0.5);
CTC22:=BARSLAST(CTC21);
CTC23:=BARSLAST(CROSS(HHV(CTC16,CTC22+1),CLOSE));
CTC24:=CROSS(CTC23,CTC22);
CTC25:=CROSS(CTC22,CTC23);
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
SUP:IF(CTC23>CTC22,HHV(CTC16,BARSLAST(CTC24)+1),LLV(CTC15,BARSLAST(CTC25)+1)),COLORGREEN,LINETHICK2;
SUP2:IF(CTC23>CTC22,SUP,DRAWNULL),COLOR0000C8,LINETHICK2;
XG:CROSS(EMA3,SUP) AND (REF(QCTB,1) OR REF(QCTB,2) OR QCTB) AND (REF(TQR,1) OR REF(TQR,2) OR TQR),COLORYELLOW;
DRAWICON(XG,LOW*0.995,34);
