通达信波段做股主图源码

MA4:=MA(CLOSE,60);
MA55:=MA(CLOSE,120);
DRAWBAND(MA4,RGB(100,10,0),MA55,RGB(40,90,10));
N1:=IF(BARSCOUNT(C)>=10,10,BARSCOUNT(C));
DRAWKLINE(H,O,L,C);
N:=IF(BARSCOUNT(C)>=45,45,BARSCOUNT(C));
STICKLINE(C>=MA(C,N),MA(C,N),MA(C,N*0.78),4,0),COLORYELLOW;
STICKLINE(C DRAWKLINE(H,O,L,C);
MA5:MA(CLOSE,5);
MA10:MA(CLOSE,10),COLORCYAN;
MA20:MA(CLOSE,20);
MA60:MA(CLOSE,60);
MA120:MA(CLOSE,120);
VVA1:=((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8)))*(100);
VVA2:=((CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21)))*(100);
VVA3:=((CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)))*(100);
上升VVA4:=MAX(VVA1,VVA2);
上升VVA5:=MAX(上升VVA4,VVA3);
上升VVA6:=EMA(上升VVA5,3);
上升位置1:=REF(上升VVA6,1),COLOR00FFFF;
上升位置2:=REF(上升VVA6,2),COLOR00FFFF;
上升位置3:=REF(上升VVA6,3),COLOR00FFFF;
上升高位置4:=MAX(上升位置1,上升位置2),COLOR00FFFF;
上升高位置:=MAX(上升高位置4,上升位置3),COLOR00FFFF;
下跌VVA4:=MIN(VVA1,VVA2);
下跌VVA5:=MIN(下跌VVA4,VVA3);
下跌VVA6:=EMA(下跌VVA5,3);
下跌位置1:=REF(下跌VVA6,1),COLOR00FFFF;
下跌位置2:=REF(下跌VVA6,2),COLOR00FFFF;
下跌位置3:=REF(下跌VVA6,3),COLOR00FFFF;
下跌低位置4:=MIN(下跌位置1,下跌位置2),COLOR00FFFF;
下跌低位置:=MIN(下跌低位置4,下跌位置3),COLOR00FFFF;
上升短高点5:=MAX(REF(C,1),REF(C,2));
上升短高点:=MAX(上升短高点5,REF(C,3));
上升短低点5:=MIN(REF(C,4),REF(C,5));
上升短低点:=MIN(上升短低点5,REF(C,6));
上升涨幅5:=(上升短高点-上升短低点)/上升短低点*100;
上升短期高点8:=MAX(REF(C,1),REF(C,2));
上升短期高点:=MAX(上升短期高点8,REF(C,3));
上升短期低点8:=MIN(REF(C,7),REF(C,8));
上升短期低点:=MIN(上升短期低点8,REF(C,9));
上升涨幅8:=(上升短期高点-上升短期低点)/上升短期低点*100;
上升中期高点21:=MAX(REF(C,1),REF(C,2));
上升中期高点:=MAX(上升中期高点21,REF(C,3));
上升中期低点21:=MIN(REF(C,20),REF(C,21));
上升中期低点:=MIN(上升中期低点21,REF(C,22));
上升涨幅21:=(上升中期高点-上升中期低点)/上升中期低点*100;
上升长期高点34:=MAX(REF(C,1),REF(C,2));
上升长期高点:=MAX(上升长期高点34,REF(C,3));
上升长期低点34:=MIN(REF(C,33),REF(C,34));
上升长期低点:=MIN(上升长期低点34,REF(C,35));
上升涨幅34:=(上升长期高点-上升长期低点)/上升长期低点*100;

上升涨幅1:=IF((上升涨幅8>10 OR 上升涨幅21>20 OR 上升涨幅34>30),1,0);
上升涨幅2:=IF((上升涨幅8>5 OR 上升涨幅21>10 OR 上升涨幅34>15),1,0);
上升涨幅:=IF(CAPITAL=0,上升涨幅2,上升涨幅1);
下跌短低点5:=MIN(REF(C,1),REF(C,2));
下跌短低点:=MIN(下跌短低点5,REF(C,3));
下跌短高点5:=MAX(REF(C,4),REF(C,5));
下跌短高点:=MAX(下跌短高点5,REF(C,6));
下跌跌幅5:=(下跌短高点-下跌短低点)/下跌短低点*100;

下跌短期低点8:=MIN(REF(C,1),REF(C,2));
下跌短期低点:=MIN(下跌短期低点8,REF(C,3));
下跌短期高点8:=MAX(REF(C,7),REF(C,8));
下跌短期高点:=MAX(下跌短期高点8,REF(C,9));
下跌跌幅8:=(下跌短期高点-下跌短期低点)/下跌短期低点*100;

下跌中期低点21:=MIN(REF(C,1),REF(C,2));
下跌中期低点:=MIN(下跌中期低点21,REF(C,3));
下跌中期高点21:=MAX(REF(C,20),REF(C,21));
下跌中期高点:=MAX(下跌中期高点21,REF(C,22));
下跌跌幅21:=(下跌中期高点-下跌中期低点)/下跌中期低点*100;

下跌长期低点34:=MIN(REF(C,1),REF(C,2));
下跌长期低点:=MIN(下跌长期低点34,REF(C,3));
下跌长期高点34:=MAX(REF(C,33),REF(C,34));
下跌长期高点:=MAX(下跌长期高点34,REF(C,35));
下跌跌幅34:=(下跌长期高点-下跌长期低点)/下跌长期低点*100;
下跌跌幅:=IF((下跌跌幅8>10 OR 下跌跌幅21>20 OR 下跌跌幅34>30),1,0);

STICKLINE( C STICKLINE( C

QN1:=MA(C,13);
QN:=ATAN((QN1-REF(QN1,1)))*180/2;

QN2:=MA(C,21);
QN3:=ATAN((QN2-REF(QN2,1)))*180/2;

MIN1:=MIN(QN1,QN2);
MAX1:=MAX(QN1,QN2);
开炮1:=IF(LMAX1 AND C>REF(C,1) AND VOL>MA(VOL,5) AND (C-REF(C,1))/REF(C,1)*100>3,1,0);
STICKLINE(开炮1>0,C,O,3,1),COLOR0066BB;
STICKLINE(开炮1>0,C,O,2,1),COLOR0066BB;
涨幅10:=(HHV(H,10)-LLV(L,10))/LLV(L,10)*100,NODRAW;
DRAWTEXT(开炮1>0 AND 下跌低位置<25 AND 下跌跌幅>0,L*0.97,'开炮'),COLOR0000FF;
短买:=LQN1 AND C>REF(C,1) AND MA(C,5)>REF(MA(C,5),1) AND 开炮1=0;
DRAWICON(短买 AND 下跌低位置<25 AND 下跌跌幅>0,L,1),COLOR0000FF;

撤退:=IF(H>MAX1 AND C3,1,0);
STICKLINE(撤退>0,C,O,3,1),COLOR008800;
STICKLINE(撤退>0,C,O,2,1),COLOR008800;

DRAWTEXT(撤退>0 AND 上升高位置>75 AND 上升涨幅>0,H*1.02,'撤退'),COLORGREEN;
短卖:=H>QN1 AND C DRAWICON(短卖 AND 上升高位置>75 AND 上升涨幅>0,H,2),COLORGREEN;

AAS:=BARSLAST(MA60>MA20 AND (MA20=MA10 OR MA20>MA10));
BBS:=REF(COUNT(C CC:=CROSS(C,MA60) AND VOL>MA(VOL,5) AND (C-REF(C,1))/REF(C,1)*100>3;
芙蓉出水:=BB AND CC,COLOR00FF00;
STICKLINE(芙蓉出水,O,C,3,1),COLORFF00FF;
STICKLINE(芙蓉出水,O,C,2,1),COLORFF00FF;
DRAWTEXT(芙蓉出水,L,'芙蓉出水'),COLORFF00FF;
{超短压力线（加入主图即可）}
B:=BARSLAST(C>O AND C>REF(C,1));
A1C:=CONST(REF(C,B));
超短压力价:=DRAWLINE(CURRBARSCOUNT=B+10 AND C TT:=IF(LOW<=LLV(LOW,3),HHV(HIGH,3),HHV(HIGH,3));
下降压力线:DRAWLINE(HIGH>=HHV(HIGH,10),HIGH, ISLASTBAR,TT,1),LINETHICK2,COLORFF00FF;
SS1:=短卖 AND 上升高位置>75 AND 上升涨幅>0;
SS2:=H>MAX1 AND C3;
SS3:=IF((SS1>0 OR SS1>0),MA(C,5),DRAWNULL);
水平压力线:DRAWLINE((SS1>0 OR SS1>0),MA(C,5), ISLASTBAR,SS3,1),LINETHICK2,COLORFF00FF;
{财务数据}
DRAWTEXT_FIX(ISLASTBAR,0.18,0.01,1,'上市日期:'),COLOR00FF00;
DRAWNUMBER_FIX(ISLASTBAR,0.18,0.01,0,FINANCE(42)),COLOR00FF00;
DRAWTEXT_FIX(1,0.01,0.13,0,EXTERNSTR(0,1)),COLORRED;
DRAWTEXT_FIX(1,0.26,0.01,0,EXTERNSTR(0,2)),COLORDD00DD;
DRAWTEXT_FIX(1,0.01,0.066,0,EXTERNSTR(0,3)),COLOR00DD00;
DRAWTEXT_FIX(ISLASTBAR ,0.06,0.01,1,DYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR ,0.065,0.01,0,HYBLOCK),COLORYELLOW;

总额:=AMOUNT;
买:=IF(O=C AND (C-REF(C,1))/REF(C,1)*100>9.8,AMOUNT,AMOUNT/((H-L)*2-ABS(O-C))*(C-L));
买%:=买/AMOUNT*100;
流入:=AMOUNT*买%/10000000000;
流出:=AMOUNT/100000000-流入;
净流:=(流入-流出);
总额3:=SUM(AMOUNT,3);
流入3:=SUM(流入,3);
流出3:=SUM(流出,3);
净流3:=SUM(流入-流出,3);
总额5:=SUM(AMOUNT,5);
流入5:=SUM(流入,5);
流出5:=SUM(流出,5);
净流5:=SUM(流入-流出,5);
总额10:=SUM(AMOUNT,10);
流入10:=SUM(流入,10);
流出10:=SUM(流出,10);
净流10:=SUM(流入-流出,10);
画:=CONST(FINDHIGH(总额10,0,190,1));
DRAWTEXT_FIX(1,0.71,0.07,0,'净流(亿):'),COLORMAGENTA,LINETHICK1;
DRAWTEXT_FIX(1,0.78,0.05,0,'1日'),COLORMAGENTA,LINETHICK1;
DRAWTEXT_FIX(1,0.83,0.05,0,'3日'),COLORMAGENTA,LINETHICK1;
DRAWTEXT_FIX(1,0.88,0.05,0,'5日'),COLORMAGENTA,LINETHICK1;
DRAWTEXT_FIX(1,0.93,0.05,0,'10日'),COLORMAGENTA,LINETHICK1;
DRAWNUMBER_FIX(1,0.78,0.10,0,CONST((净流))),COLORYELLOW;
DRAWNUMBER_FIX(1,0.83,0.10,0,CONST((净流3))),COLORYELLOW;
DRAWNUMBER_FIX(1,0.88,0.10,0,CONST((净流5))),COLORYELLOW;
DRAWNUMBER_FIX(1,0.93,0.10,0,CONST((净流10))),COLORYELLOW;