通達信【異動波段】主圖/選股指標源碼 通達信異動帶主圖指標顯示今日競價額、今日競價量和競價換手率、異動信號等信息,主圖做了優(yōu)化,去掉了沒用的信息,增加了“臉笑”信號及選股。 




1、異動波段主圖指標: MA5:MA(收盤價,5); 今日競價額:DYNAINFO(15)/10000 ,NODRAW; DRAWTEXT_FIX(1,0.009,0.10,0,STRCAT('今日競價額:',STRCAT(VAR2STR(今日競價額,1),'萬')))COLORMAGENTA; 今日競價量:DYNAINFO(15)/DYNAINFO(4)/100,NODRAW; DRAWTEXT_FIX(1,0.009,0.15,0,STRCAT('當日競價量:',STRCAT(VAR2STR(當日競價量,0),'手')))COLORMAGENTA; 競價換手率:DYNAINFO(15)/OPEN/FINANCE(46)*100,NODRAW; DRAWTEXT_FIX(1,0.009,0.20,0,STRCAT('競價換手率:',STRCAT(VAR2STR(競價換手率,2),' %')))COLORMAGENTA; ABC1:=STRCAT(HYBLOCK,''); ABC2:=STRCAT(ABC1,DYBLOCK); ABC3:=STRCAT(ABC2,''); DRAWTEXT_FIX(ISLASTBAR,0.05,0,0,STRCAT(ABC3,GNBLOCK)),COLORCYAN; DRAWBAND(MA(收盤,3),RGB(155,50,50),MA(收盤,5),RGB(0,91,0)); DRAWBAND(MA(收盤,13),RGB(100,50,100),MA(收盤,15),RGB(0,0,180)); 拉線(H,O,L,C); 紅:MA(收盤,3),COLORBBBBBB{MA3}; 綠:MA(收盤,5),COLORYELLOW{MA5}; AA:=紅>綠; 紫色:MA(收盤,13),COLORFF00CC{MA13}; 藍:MA(CLOSE,15),COLORABFF46{MA15}; BB:=紫>藍; N1:=6;{微信公眾號:股民指標營地} MTM:=C-REF(C,1); ZLGJ:=100*EMA(EMA(MTM,N1),N1)/EMA(EMA(ABS(MTM),N1),N1); 買1:=IF(LLV(ZLGJ,2)=LLV(ZLGJ,7) AND COUNT(ZLGJ<0,2) AND CROSS(ZLGJ,MA(ZLGJ,2)),1,0); 賣1:=IF(HHV(ZLGJ,2)=HHV(ZLGJ,7) AND COUNT(ZLGJ>50,2) AND CROSS(MA(ZLGJ,2),ZLGJ),1,0); 買入:STICKLINE(FILTER(買1=1,5),C,O,1,0),COLORRED; DRAWICON(CROSS(買入,0.1),L*1,5); DRAWICON(FILTER(賣1=1,1),H*1.06,15),COLOR00FF00; STICKLINE(FILTER(賣1=1,1),C,O,1,0),COLOR00FF00; 股民指標:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100; K:=SMA(股民指標,3,1); D:=SMA(K,3,1); J:=3*K-2*D; BDGD:=HHV(J,2)=HHV(J,8) AND J>80; 注意:=IF(CROSS(REF(J-0.01,1),J) AND REF(BDGD,1),1,0); DRAWTEXT(注意 AND 賣1<1,HIGH*1.01,'J'),COLOR00FF00,LINETHICK3; STICKLINE(注意 AND 賣1<1,O,CLOSE,1,0),COLORYELLOW,LINETHICK2; {微信公眾號:股民指標營地} 板后13天內(nèi):=COUNT(C/REF(C,1)>1.099,13)>1; 指標營地:=FILTER(買1=1,5); 錢袋:=板后13天內(nèi) AND 指標營地; {微信公眾號:股民指標營地} 尊重市場:=IF(INBLOCK('科創(chuàng)板'),0.2,IF(INBLOCK('創(chuàng)業(yè)板'),0.2,IF(INBLOCK('ST板塊'),0.05,0.1))); CBA1:=IF(DATE<=1200823,1,0); STICKLINE((C>=ZTPRICE(REF(CLOSE,1),0.1) AND C=H) AND CBA1=1,O,C,2.7,0),COLORFF00FF; STICKLINE((C<=DTPRICE(REF(CLOSE,1),0.1) AND C=L) AND CBA1=1,O,C,2.7,0),COLORBLUE; STICKLINE((C>=ZTPRICE(REF(C,1),尊重市場) AND C=H),O,C,1,0),COLORYELLOW; STICKLINE((C<=DTPRICE(REF(C,1),尊重市場) AND C=L),O,C,1,0),COLORBLUE; STICKLINE((H>=ZTPRICE(REF(C,1),尊重市場) AND C<H) OR (H>=ZTPRICE(REF(CLOSE,1),0.1) AND C<H AND CBA1=1),H,MAX(C,O),0.5,0),COLORMAGENTA;{漲停后回落} STICKLINE((L<=DTPRICE(REF(C,1),尊重市場) AND C>L) OR (L<=DTPRICE(REF(CLOSE,1),0.1) AND C>L AND CBA1=1),L,MIN(C,O),0.5,0),COLORBLUE; 科創(chuàng)業(yè)板:=IF(INBLOCK('創(chuàng)業(yè)板') OR INBLOCK('科創(chuàng)板'),1,0); SZGABC:=IF(INBLOCK('深證A股') AND 科創(chuàng)業(yè)板=0,1,0); 漲停價:=IF(科創(chuàng)業(yè)板=1,ZTPRICE(REF(CLOSE,1),0.2),ZTPRICE(REF(CLOSE,1),0.1)); SJ:=IF(DATE>1220769,1,1); LYDA:=(IF(REF(C,2)=REF(漲停價,2),1.10,REF(C,2)/REF(C,3))+IF(REF(C,1)=REF(漲停價,1),1.10,REF(C,1)/REF(C,2))+IF(C=漲停價,1.10,C/REF(C,1))-3)*100-(REF('399107$C',2)/REF('399107$C',3)+REF('399107$C',1)/REF('399107$C',2)+'399107$C'/REF('399107$C',1)-3)*100;{3天異動} LYD:=IF(LYDA>19.99,1,0);{微信公眾號:股民指標營地} LYDJ:=(REF('399107$C',2)/REF('399107$C',3)+REF('399107$C',1)/REF('399107$C',2)+'399107$C'/REF('399107$C',1)+0.2-IF(REF(C,2)=REF(漲停價,2),1.10,REF(C,2)/REF(C,3))-IF(REF(C,1)=REF(漲停價,1),1.10,REF(C,1)/REF(C,2)))*REF(C,1); XYDA:=(C/REF(C,2)-1)*100-('399107$C'/REF('399107$C',2)-1)*100; XYDB:=(C/REF(C,3)-1)*100-('399107$C'/REF('399107$C',3)-1)*100; XYD:=IF(XYDA>19.99,1,IF(XYDB>19.99,1,0)); XYD價A:=(('399107$C'/REF('399107$C',2)) + 0.2) * REF(C,2); XYD價B:=(('399107$C'/REF('399107$C',3)) + 0.2) * REF(C,3); 異動:=IF(SJ=0 AND LYD=1,1,IF(SJ=1 AND XYD=1,1,0)); DYCYD:=IF(異動=1 AND EXISTR(異動 = 1,10,1)=0,1,0); DECYD:=FILTER(IF(SJ=0 AND LYD=1 AND EXISTR(DYCYD = 1,10,3)=1,1,IF(SJ=1 AND XYDA>19.99 AND EXISTR(DYCYD = 1,10,2),1,IF(SJ=1 AND XYDB>19.99 AND EXISTR(DYCYD = 1,10,3),1,0))),10); DSCYD:=FILTER(IF(SJ=0 AND LYD=1 AND EXISTR(DECYD = 1,10,3)=1,1,IF(SJ=1 AND XYDA>19.99 AND EXISTR(DECYD = 1,10,2),1,IF(SJ=1 AND XYDB>19.99 AND EXISTR(DECYD = 1,10,3),1,0))),10); DS1CYD:=FILTER(IF(SJ=0 AND LYD=1 AND EXISTR(DSCYD = 1,10,3)=1,1,IF(SJ=1 AND XYDA>19.99 AND EXISTR(DSCYD = 1,10,2),1,IF(SJ=1 AND XYDB>19.99 AND EXISTR(DSCYD = 1,10,3),1,0))),10); DWCYD:=FILTER(IF(SJ=0 AND LYD=1 AND EXISTR(DS1CYD = 1,10,3)=1,1,IF(SJ=1 AND XYDA>19.99 AND EXISTR(DS1CYD = 1,10,2),1,IF(SJ=1 AND XYDB>19.99 AND EXISTR(DS1CYD = 1,10,3),1,0))),10); DLCYD:=FILTER(IF(SJ=0 AND LYD=1 AND EXISTR(DWCYD = 1,10,3)=1,1,IF(SJ=1 AND XYDA>19.99 AND EXISTR(DWCYD = 1,10,2),1,IF(SJ=1 AND XYDB>19.99 AND EXISTR(DWCYD = 1,10,3),1,0))),10);{微信公眾號:股民指標營地 } MA1:MA(CLOSE,20);{微信公眾號:股民指標營地} {微信公眾號:股民指標營地} DRAWTEXT(PERIOD=5 AND SZGABC=1 AND DYCYD=1,L,'第一次異動'),COLORYELLOW; DRAWSL(PERIOD=5 AND SJ=0 AND SZGABC=1 AND DYCYD=1,LYDJ,0,1,2),COLORGREEN,LINETHICK2; DRAWSL(PERIOD=5 AND SJ=1 AND SZGABC=1 AND DYCYD=1 AND XYDA>19.99,XYD價A,0,1,2),COLORGREEN,LINETHICK2; DRAWTEXT(PERIOD=5 AND SZGABC=1 AND DECYD=1,L,'第二次異動'),COLORYELLOW; DRAWSL(PERIOD=5 AND SJ=0 AND SZGABC=1 AND DECYD=1,LYDJ,0,1,2),COLORGREEN,LINETHICK2; DRAWSL(PERIOD=5 AND SJ=1 AND SZGABC=1 AND DECYD=1 AND XYDA>19.99,XYD價A,0,1,2),COLORGREEN,LINETHICK2; DRAWTEXT(PERIOD=5 AND SZGABC=1 AND DSCYD=1,L,'第三次異動'),COLORYELLOW; DRAWSL(PERIOD=5 AND SJ=0 AND SZGABC=1 AND DSCYD=1,LYDJ,0,1,2),COLORGREEN,LINETHICK2; DRAWSL(PERIOD=5 AND SJ=1 AND SZGABC=1 AND DSCYD=1 AND XYDA>19.99,XYD價A,0,1,2),COLORGREEN,LINETHICK2; DRAWTEXT(PERIOD=5 AND SZGABC=1 AND DS1CYD=1,L,'第四次異動'),COLORYELLOW; DRAWSL(PERIOD=5 AND SJ=0 AND SZGABC=1 AND DS1CYD=1,LYDJ,0,1,2),COLORGREEN,LINETHICK2; DRAWSL(周期=5 且 SJ=1 且 SZGABC=1 且 DS1CYD=1 且 XYDA>19.99,XYD 價 A,0,1,2),COLORGREEN,LINETHICK2; DRAWTEXT(PERIOD=5 AND SZGABC=1 AND DWCYD=1,L,'第五次異動'),COLORYELLOW; DRAWSL(周期=5 且 SJ=0 且 SZGABC=1 且 DWCYD=1,LYDJ,0,1,2),COLORGREEN,LINETHICK2; DRAWSL(周期=5且SJ=1且SZGABC=1且DWCYD=1且XYDA>19.99,XYD價A,0,1,2),COLORGREEN,LINETHICK2; DRAWTEXT(PERIOD=5 AND SZGABC=1 AND DLCYD=1,L,'第六次異動'),COLORYELLOW; DRAWSL(周期=5且SJ=0且SZGABC=1且DLCYD=1,LYDJ,0,1,2),COLORGREEN,LINETHICK2; DRAWSL(周期=5且SJ=1且SZGABC=1且DLCYD=1且XYDA>19.99,XYD價A,0,1,2),COLORGREEN,LINETHICK2; DRAWSL(PERIOD=5 AND SJ=1 AND SZGABC=1 AND EXISTR(異動 = 1,2,1)=0 AND 漲停價>XYD價B,XYD價B,0,1,2),COLORWHITE,LINETHICK1;
|