通达信神针+解盘主图未加密选股指标公式源码

源码正文：

AA05:ma(C,5),COLORFFFFFF{XG51};
五日乖离率:=(C-AA05)/AA05*100{XG51};
BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416{XG51};
速度5:=SMA(ema((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1){XG51};
加速度5:EMA((速度5-REF(速度5,1)),3),NODRAW{XG51};
AA10:MA(C,10);AA20:=MA(C,20){XG51};
BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416{XG51};
AA30:MA(C,30){XG51};
三拾日乖离率:(C-AA30)/AA30*100,NODRAW{XG51};
VAR1:=(AA20-AA30)>REF((AA20-AA30),1) AND AA20>REF(AA20,1) AND AA30>REF(AA30,1){XG51};
VAR2:=(AA30-AA20)<REF((AA30-AA20),1) AND AA20<REF(AA20,1) AND AA30<REF(AA30,1){XG51};
BB30:=ATAN((AA30/REF(AA30,1)-1)*100)*180/3.1416{XG51};
强势狙击:=FILTER(BB30>30 AND BB10>45 AND crOSS(BB05,60),10){XG51};
加仓:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND AA05>REF(AA05,1) AND 三拾日乖离率>REF(三拾日乖离率,1) AND AA10>REF(AA10,1)
AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1) ,10) {XG51};
清仓:=FILTER(COUNT(CROSS(30,BB05),5)>=1 AND (C>AA30 OR O>AA30) AND AA05<REF(AA05,1) AND 三拾日乖离率<REF(三拾日乖离率,1) AND AA10<REF(AA10,1),10){XG51};
DRAWTEXT(加仓 ,LOW*0.98,'←加仓'),COLORWHITE{XG51};
JC:=CROSS(0,五日乖离率) AND 三拾日乖离率<REF(三拾日乖离率,1) AND AA10>REF(AA10,1) {XG51};
减仓:=FILTER(JC,10){XG51};
MR:=COUNT(CROSS(五日乖离率,0),3)>=1 AND 三拾日乖离率>REF(三拾日乖离率,1) AND AA05>REF(AA05,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)<AA30{XG51};
买入:=FILTER(MR,10){XG51};
DRAWTEXT(减仓,HIGH*1.02,'←减仓'),COLORGREEN{XG51};
DRAWTEXT(买入,LOW*0.98,'←买入'),COLORBLUE{XG51};
DRAWTEXT(清仓 ,HIGH*1.02,'←清仓'),COLORCYAN{XG51};
DRAWTEXT(强势狙击,LOW*0.98,'←强势狙击'),COLORBLUE{XG51};
VAR21:=MAX(Abs(HIGH-AMOUNT/vol/100),ABS(AMOUNT/VOL/100-LOW)){XG51};
VAR3:=ABS((OPEN+CLOSE)/2-AMOUNT/VOL/100){XG51};
MV:=(VAR21+VAR3)/AMOUNT*VOL*100*50{XG51};
支撑价:LLV(LOW,19),LINETHICK3 , COLOR00FF00{XG51};
阻力价:HHV(HIGH,19),COLORYELLOW, LINETHICK3{XG51};
VARB1:=EMA(CLOSE,12)-EMA(CLOSE,26){XG51};
VARB2:=EMA(VARB1,9){XG51};
VARB3:=(CLOSE*2.5/100+CLOSE){XG51};
VAR4:EMA(C,3), LINETHICK3,COLORWHITE{XG51};
VAR5:=LLV(HIGH,240){XG51};
VAR6:=100*(CLOSE-VAR5)/VAR5{XG51};
VAR7:=REF(LLV(CLOSE,480),1){XG51};
VAR8:=REF(HHV(CLOSE,480),1){XG51};
VAR9:=100*(CLOSE-VAR7)/(VAR8-VAR7){XG51};
VARA:=(CLOSE-LLV(CLOSE,981))/(HHV(CLOSE,981)-LLV(CLOSE,981))*100{XG51};
VARB:=(CLOSE-LLV(CLOSE,393))/(HHV(CLOSE,393)-LLV(CLOSE,393))*100{XG51};
VARC:=(CLOSE-LLV(LOW,981))/(HHV(HIGH,981)-LLV(LOW,981))*100{XG51};
VARD:=(CLOSE-LLV(LOW,393))/(HHV(HIGH,393)-LLV(LOW,393))*100{XG51};
VARE:=VARC>98.5 OR VARD>98.5{XG51};
VARF:=EMA(100*(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100)),5)/4{XG51};
VAR13:=VARA=0 AND VARC=0 AND VAR6<0{XG51};
VAR14:=VARA=100 AND VARC=100{XG51};
VAR15:=VARB=0 OR VARD=0 AND VAR9<0{XG51};
VAR16:=VARB=100 AND VARD=100{XG51};
VAR17:=VAR6<0 AND VAR9<0{XG51};
VAR18:=VAR13 AND VAR15{XG51};
VAR19:=VAR14 AND VAR16{XG51};
VAR1B:=SMA(MAX(CLOSE-REF(CLOSE,1),0),49,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100{XG51};
VAR1C:=SMA(MAX(CLOSE-REF(CLOSE,1),0),14,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),14,1)*100{XG51};
VAR1D:=BARSCOUNT(CLOSE){XG51};
VAR1E:=VAR1B<20 AND VAR1C<23 AND VAR1D>35{XG51};
VAR1F:=VAR1E AND COUNT(VAR1E,1)=1{XG51};
VAR20:=REF(CLOSE,1){XG51};
VARB21:=SMA(MAX(CLOSE-VAR20,0),34,1)/SMA(ABS(CLOSE-VAR20),7,1)*100{XG51};
VAR22:=SMA(MAX(CLOSE-VAR20,0),13,1)/SMA(ABS(CLOSE-VAR20),13,1)*100{XG51};
VAR23:=BARSCOUNT(CLOSE){XG51};
VAR24:=VARB21<20 AND VAR22<23 AND VAR23>35{XG51};
VAR25:=VARA=0 AND VARF<1.2 AND VAR17{XG51};
VAR27:=VAR18 AND VARF<1.2 AND VAR17{XG51};
VAR29:=SUM(HIGH-OPEN,77)/SUM(OPEN-LOW,77)*100{XG51};
VAR2A:=SUM(MAX(0,HIGH-REF(CLOSE,1)),77)/SUM(MAX(0,REF(CLOSE,1)-LOW),77)*100{XG51};
VAR2B:=CROSS(VAR29,69) AND CROSS(VAR2A,80)<150{XG51};
VAR2C:=VAR24 AND VAR1F AND COUNT(VAR24,30)=1{XG51};
买点:=VAR25 AND VAR2B{XG51};
绝对卖点:=(VAR19 OR VARA)AND VARF>23 OR VARE {XG51};
VAR2D:=VAR1F AND VAR2C AND VAR25{XG51};
股海万元户:=(CLOSE/REF(CLOSE,1)>1.04 AND (CLOSE>10.8 AND CLOSE<10.83 OR CLOSE>6.86 AND CLOSE<6.88 OR CLOSE>13.82 AND CLOSE<13.84 OR CLOSE>7.28 AND CLOSE<7.3 OR CLOSE>12.4 AND CLOSE<12.42 OR CLOSE>22.33 AND CLOSE<22.35 OR CLOSE>4.68 AND CLOSE<4.7 OR CLOSE>26.29 AND CLOSE<26.31 OR CLOSE>7.65 AND CLOSE<7.67 OR CLOSE>13.4 AND CLOSE<13.42 OR CLOSE>7.58 AND CLOSE<7.6 OR CLOSE>20.43 AND CLOSE<20.45 OR CLOSE>19.57 AND CLOSE<19.59 OR CLOSE>6.26 AND CLOSE<6.28 OR CLOSE>7.14 AND CLOSE<7.16 OR CLOSE>6.61 AND CLOSE<6.63 OR CLOSE>11.9 AND VOL<11.92 OR CLOSE>6.7 AND CLOSE<6.72 OR CLOSE>8.19 AND CLOSE<8.21)){XG51};
DRAWTEXT(FILTER(绝对卖点>0,3),H,'别贪'), COLOR00FF00{XG51};
DRAWTEXT(股海万元户>0,L,'☆追涨'),COLORBLUE {XG51};
DRAWICON(买点>0,L,4){XG51};
DRAWTEXT(买点>0,L,'扫描神针'),COLORF00FF0{XG51};
DRAWTEXT(VARF<0.7 AND VAR27 AND VAR25>0,L,'万元'),COLORBLUE{XG51};
stICKLINE(VAR2D>0,O,C,10,0), COLORBLUE{XG51};
DRAWTEXT(VAR2D>0,L,'大方神针'),COLORWHITE{XG51};
DRAWICON(COUNT(REF(VAR4,1)<REF(VAR4,2),5)=5 AND VAR4>REF(VAR4,1),L*0.98,4){XG51};
DRAWICON(FILTER(COUNT(VAR6<0,5)AND CROSS(VAR6,0)AND VARF>REF(VARF,1)AND C>O,3),L,1){XG51};
DRAWICON(FILTER(REF(VAR4,1)>REF(VAR4,2)AND VAR4<REF(VAR4,1)AND VARF>17 AND VARB1>VARB2,5),H,2){XG51};
DRAWICON(阻力价>REF(阻力价,1)AND CROSS(阻力价,VARB3)AND C<O,H*1.02,5){X^G_5_1^C^N^{};

源码正文：

均换手率:ma(vol/CAPITAL*100,5),COLORFFFFFF,NODRAW{XG51};
虚拟成交量:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*210/FROMOPEN,DRAWNULL),NODRAW{XG51};
stICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,虚拟成交量,0,2,-1),COLOR00C0C0{XG51};
总量:VOL,NODRAW{XG51};
TJ1:=H=L AND C>REF(C,1) OR C>REF(C,5) OR C>REF(C,9) OR C>REF(C,17){XG51};
TJ2:=H=L AND C<REF(C,1) OR C<REF(C,5) OR C<REF(C,9) OR C<REF(C,17){XG51};
EE:=IF(TJ1,0.0001,IF(TJ2,-0.0001,0)){XG51};
JGL_DTC:=(C-OPEN+EE)/(2*(H-L)+Abs(C-O)+3*0.0001){XG51};
主买:VOL*(1+JGL_DTC)/2,COLORWHITE,NODRAW{XG51};
主卖:VOL*(1-JGL_DTC)/2,COLORFFFF80,NODRAW{XG51};
MAVOL1:MA(V,5)COLORRED{XG51};
MAVOL2:MA(V,55)COLORBLUE{XG51};
MAVOL3:MA(V,135)COLORCYAN{XG51};
DG1:=(crOSS(MAVOL1,MAVOL2));DG2:=(CROSS(MAVOL1,MAVOL3)){XG51};
DRAWICON(DG1,VOL*1.05,1){XG51};
DRAWICON(DG2,VOL*1.1,13){XG51};
STICKLINE(C>=REF(C,1) AND MAVOL1<MAVOL3 AND V<MAVOL1,VOL,0,7,0),COLOR333333{XG51};
STICKLINE(C<REF(C,1) AND MAVOL1<MAVOL3 AND V<MAVOL1,VOL,0,7,0),COLOR333333{XG51};
STICKLINE(IF(BARSCOUNT(C)=1,C<O,C<REF(C,1)),0,VOL,2,0),COLOR880000{XG51};
STICKLINE(IF(BARSCOUNT(C)=1,C<O,C<REF(C,1)),0,VOL,1,0),COLORBB0000{XG51};
STICKLINE(IF(BARSCOUNT(C)=1,C<O,C<REF(C,1)),0,VOL,0.5,0),COLORDD0000{XG51};
STICKLINE(IF(BARSCOUNT(C)=1,C<O,C<REF(C,1)),0,VOL,0.25,0)COLORFF0000{XG51};
STICKLINE(IF(BARSCOUNT(C)=1,C>=O,C>=REF(C,1)),0,VOL,2,0),COLOR008800{XG51};
STICKLINE(IF(BARSCOUNT(C)=1,C>=O,C>=REF(C,1)),0,VOL,1,0),COLOR00AA00{XG51};
STICKLINE(IF(BARSCOUNT(C)=1,C>=O,C>=REF(C,1)),0,VOL,0.5,0),COLOR00DD00{XG51};
STICKLINE(IF(BARSCOUNT(C)=1,C>=O,C>=REF(C,1)),0,VOL,0.25,0),COLOR00FF00{XG51};
STICKLINE(主买>0,0,主买,2,0),COLOR000088{XG51};
STICKLINE(主买>0,0,主买,1,0),COLOR0000AA{XG51};
STICKLINE(主买>0,0,主买,0.5,0),COLOR0000DD{XG51};
STICKLINE(主买>0,0,主买,0.25,0),COLOR0000FF{XG51};
IF(VOL/MA(VOL,60)*100>100,VOL,VOL/0),STICK,COLORRED{XG51};
量增价平转阳:=VOL>REF(V,1) AND ABS(C-REF(C,1))/REF(C,1)<=0.005{XG51};
量增价升买入:=VOL>REF(V,1) AND C>REF(C,1){XG51};
量平价升续买:=ABS(VOL-REF(VOL,1))/REF(VOL,1)<=0.05 AND C>REF(C,1){XG51};
量减价升持有:=VOL<REF(V,1) AND C>REF(C,1){XG51};
量减价平警戒:=VOL<REF(V,1) AND ABS(C-REF(C,1))/REF(C,1)<=0.005{XG51};
量减价跌卖出:=VOL<REF(V,1) AND C<REF(C,1){XG51};
量平价跌续卖:=ABS(VOL-REF(VOL,1))/REF(VOL,1)<=0.05 AND C<REF(C,1){XG51};
量增价跌弃卖:=VOL>REF(V,1) AND C<REF(C,1){XG51};
量梯级递增上:=VOL>REF(V,1) AND REF(V,1)>REF(VOL,2){XG51};
量梯级递减下:=VOL<REF(V,1) AND REF(V,1)<REF(VOL,2){XG51};
ZGD:=HHV(V,80)*1{XG51};
ZGD2:=CONST(ZGD){XG51};
情况1:=CONST(IF(量增价平转阳,1,0)){XG51};
情况2:=CONST(IF(量增价升买入,1,0)){XG51};
情况3:=CONST(IF(量平价升续买,1,0)){XG51};
情况4:=CONST(IF(量减价升持有,1,0)){XG51};
情况5:=CONST(IF(量减价平警戒,1,0)){XG51};
情况6:=CONST(IF(量减价跌卖出,1,0)){XG51};
情况7:=CONST(IF(量平价跌续卖,1,0)){XG51};
情况8:=CONST(IF(量增价跌弃卖,1,0)){XG51};
情况9:=CONST(IF(量梯级递增上,1,0)){XG51};
情况10:=CONST(IF(量梯级递减下,1,0)){XG51};
DRAWTEXT(情况1=1 AND CURRBARSCOUNT=60,ZGD2-(ZGD2*0.1),'量增价平'),COLORLIMAGENTA{XG51};
DRAWTEXT(情况2=1 AND CURRBARSCOUNT=60,ZGD2-(ZGD2*0.4),'量增价升'),COLORLIMAGENTA{XG51};
DRAWTEXT(情况3=1 AND CURRBARSCOUNT=60,ZGD2-(ZGD2*0.2),'量平价升'),COLORLIMAGENTA{XG51};
DRAWTEXT(情况4=1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.3),'量减价升'),COLORLIMAGENTA{XG51};
DRAWTEXT(情况5=1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.1),'量减价平'),COLORLIMAGENTA{XG51};
DRAWTEXT(情况6=1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.3),'量减价跌'),COLORLIMAGENTA{XG51};
DRAWTEXT(情况7=1 AND CURRBARSCOUNT=60,ZGD2-(ZGD2*0.2),'量平价跌'),COLORLIMAGENTA{XG51};
DRAWTEXT(情况8=1 AND CURRBARSCOUNT=60,ZGD2-(ZGD2*0.4),'量增价跌'),COLORLIMAGENTA{XG51};
DRAWTEXT(情况9=1 AND CURRBARSCOUNT=60,ZGD2-(ZGD2*0.5),'量梯递增'),COLORLIMAGENTA{XG51};
DRAWTEXT(情况10=1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.5),'量梯递减'),COLORLIMAGENTA{X*G.5=1*C*N*{};