通达信神奇柱量选股指标公式源码

通达信神奇柱量选股指标公式源码

源码正文：

倍量:=((vol/REF(VOL,1)>2 AND COUNT(CLOSE>OPEN,1)) OR (LOW>REF(HIGH,1) AND COUNT(OPEN>CLOSE,1) AND VOL/REF(VOL,1)>2)){XG51};
高倍量:=(V=HHV(V,55) AND V/REF(VOL,1)>=3 AND C>REF(C,1)){XG51};
缩量涨:=
COUNT(C>REF(C,1),2)==2 AND COUNT(VOL<REF(VOL,1),2)==2{XG51};
倍缩量:=VOL/REF(VOL,1)<0.5{XG51};
梯量柱3T:=(COUNT(VOL>REF(VOL,1),3)=3 AND COUNT(CLOSE>OPEN,3)=3){XG51};
平量柱:=(V/REF(V,1)>0.97 AND V/REF(V,1)<1.05 AND COUNT(CLOSE>OPEN,2)=2){XG51};
黑太阳:=
(LOW>REF(HIGH,1) AND COUNT(OPEN>CLOSE,1)){XG51};
红太阳:=
(LOW>REF(HIGH,1) AND COUNT(OPEN<CLOSE,1)){XG51};
N:=11{XG51};
HSL:=VOL/CAPITAL*100{XG51};
量能:=SUM(HSL,N){XG51};
涨幅1:=100*(CLOSE-REF(CLOSE,N))/REF(CLOSE,N){XG51};
ma1:=MA(CLOSE,5){XG51};
MA2:=MA(CLOSE,10){XG51};
MA3:=MA(CLOSE,20){XG51};
MA4:=MA(CLOSE,30){XG51};
一阳穿三线:=MA1>O AND MA2>O AND MA3>O AND MA1<C AND MA2<C AND MA3<C AND CLOSE>OPEN{XG51};
AA1:=MA1>O AND MA2>O AND MA3>O AND MA4>O AND MA1<C AND MA2<C AND MA3<C AND MA4<C AND CLOSE>OPEN{XG51};
AA2:=crOSS(MA(V,5),MA(V,10)){XG51};
一阳穿四线:=AA1  AND  AA2{XG51};
P:=40{XG51};
P2:=P/10{XG51};
BAA:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>=P2,NODRAW{XG51};
BAB:=SUMBARS( BAA, 1)-1{XG51};
BBB:=SUMBARS( BAA, 1)NODRAW{XG51};
CAA:=REF(HIGH,BAB){XG51};
CAB:=REF(OPEN,BAB){XG51};
Bac:=IF(CLOSE>=OPEN,CLOSE,OPEN){XG51};
OUTA:=IF( BBB=1 ,0,IF( BBB=2 AND EVERY(BAC<=CAA,1) AND EVERY(LOW>=CAB,1) ,1,IF( BBB=3 AND EVERY(BAC<=CAA,2) AND EVERY(LOW>=CAB,2) ,2,IF( BBB=4 AND EVERY(BAC<=CAA,3) AND EVERY(LOW>=CAB,3) ,3,IF( BBB=5 AND EVERY(BAC<=CAA,4) AND EVERY(LOW>=CAB,4) ,4,IF (BBB=6 AND EVERY(BAC<=CAA,5) AND EVERY(LOW>=CAB,5) ,5,IF (BBB=7 AND EVERY(BAC<=CAA,6) AND EVERY(LOW>=CAB,6) ,6,IF (BBB=8 AND EVERY(BAC<=CAA,7) AND EVERY(LOW>=CAB,7) ,7,IF (BBB=9 AND EVERY(BAC<=CAA,8) AND EVERY(LOW>=CAB,8) ,8,IF( BBB=10 AND EVERY(BAC<=CAA,9) AND EVERY(LOW>=CAB,9) ,9,IF( BBB=11 AND EVERY(BAC<=CAA,10) AND EVERY(LOW>=CAB,10) ,10,IF( BBB=12 AND EVERY(BAC<=CAA,11) AND EVERY(LOW>=CAB,11) ,11,IF( BBB=13 AND EVERY(BAC<=CAA,12) AND EVERY(LOW>=CAB,12) ,12,IF( BBB=14 AND EVERY(BAC<=CAA,13) AND EVERY(LOW>=CAB,13) ,13,IF( BBB=15 AND EVERY(BAC<=CAA,14) AND EVERY(LOW>=CAB,14),14,IF( BBB=16 AND EVERY(BAC<=CAA,15) AND EVERY(LOW>=CAB,15) ,15,IF( BBB=17 AND EVERY(BAC<=CAA,16) AND EVERY(LOW>=CAB,16) ,16,IF( BBB=18 AND EVERY(BAC<=CAA,17) AND EVERY(LOW>=CAB,17) ,17,IF( BBB=19 AND EVERY(BAC<=CAA,18) AND EVERY(LOW>=CAB,18) ,18,IF(BBB=20 AND EVERY(BAC<=CAA,19) AND EVERY(LOW>=CAB,19) ,19,0)))))))))))))))))))){XG51};
开盘:=NOT(DYNAINFO(4)=0){XG51};
单阳不破天数:IF(C>=MA(C,120) AND 开盘,OUTA,0),NODRAW{XG51};
VAR2:=1*AMOUNT{XG51};
月地量:IF(VAR2=LLV(VAR2,20) AND BARSCOUNT(C)>20,0.1,0)COLORRED{XG51};
季地量:IF(VAR2=LLV(VAR2,60) AND BARSCOUNT(C)>60,0.2,0)COLORRED{XG51};
半年地量:IF(VAR2=LLV(VAR2,120) AND BARSCOUNT(C)>120,0.3,0)COLORRED{XG51};
年地量:IF(VAR2=LLV(VAR2,240) AND BARSCOUNT(C)>240,0.4,0)COLORRED{XG51};
月天量:IF(VAR2=HHV(VAR2,20) AND BARSCOUNT(C)>20,0.9,1)COLORRED{XG51};
季天量:IF(VAR2=HHV(VAR2,60) AND BARSCOUNT(C)>60,0.8,1)COLORRED{XG51};
半年天量:IF(VAR2=HHV(VAR2,120) AND BARSCOUNT(C)>120,0.7,1)COLORRED{XG51};
年天量:IF(VAR2=HHV(VAR2,240) AND BARSCOUNT(C)>240,0.6,1)COLORRED{XG51};
stICKLINE(高倍量,0.5,0.85,1,0),COLORWHITE{XG51};
STICKLINE(倍量,0.5,0.75,1,0),COLORWHITE{XG51};
STICKLINE(平量柱,0.48,0.52,4,0),COLORBLUE{XG51};
STICKLINE(梯量柱3T,0.5,0.65,1,0),COLORWHITE{XG51};
STICKLINE(倍缩量,0.5,0.25,1,0),COLORBLUE{XG51};
STICKLINE(缩量涨,0.4,0.5,1,0),COLORFF00FF{XG51};
STICKLINE(黑太阳,0,0.5,2,0),COLORRED{XG51};
STICKLINE(红太阳,0,0.5,2,0),COLORWHITE{XG51};
DRAWTEXT(高倍量,0.8,'  高'),COLORBLUE{XG51};
DRAWTEXT(倍量,0.7,'  倍'),COLORBLUE{XG51};
DRAWTEXT(梯量柱3T,0.6,'  梯'),COLORBLUE{XG51};
DRAWTEXT(平量柱,0.4,'  平'),COLORBLUE{XG51};
DRAWTEXT(倍缩量,0.2,'  倍'),COLORFF00FF{XG51};
DRAWTEXT(缩量涨,0.3,'  缩涨'),COLORFF00FF{XG51};
DRAWTEXT(黑太阳,0.1,'  黑'),COLORRED{XG51};
DRAWTEXT(红太阳,0.1,'  红'),COLORWHITE{XG51};
DRAWTEXT(高倍量  AND CURRBARSCOUNT=1,0.8,'  高倍量'),COLORBLUE{XG51};
DRAWTEXT(倍量  AND CURRBARSCOUNT=1,0.7,'  倍量'),COLORBLUE{XG51};
DRAWTEXT(梯量柱3T  AND CURRBARSCOUNT=1,0.6,'  梯量柱'),COLORBLUE{XG51};
DRAWTEXT(平量柱  AND CURRBARSCOUNT=1,0.4,'  平量柱'),COLORBLUE{XG51};
DRAWTEXT(倍缩量  AND CURRBARSCOUNT=1,0.2,'  倍缩量'),COLORFF00FF{XG51};
DRAWTEXT(缩量涨  AND CURRBARSCOUNT=1,0.3,'  缩量涨'),COLORBLUE{XG51};
DRAWTEXT(黑太阳  AND CURRBARSCOUNT=1,0.4,'  黑太阳'),COLORRED{XG51};
DRAWTEXT(红太阳  AND CURRBARSCOUNT=1,0.4,'  红太阳'),COLORWHITE{XG51};
DRAWTEXT(月天量<=0.9  AND CURRBARSCOUNT=1,0.9,'  天量'),COLORBLUE{XG51};
DRAWTEXT(月地量>=0.1  AND CURRBARSCOUNT=1,0.9,'  地量'),COLORBLUE{XG51};
DRAWTEXT(HSL>1 AND HSL<2 AND ISLASTBAR,0.1,'  少人关注'){XG51};
DRAWTEXT(HSL>2 AND HSL<3 AND ISLASTBAR,0.1,'  成交温和'){XG51};
DRAWTEXT(HSL>3 AND HSL<5 AND ISLASTBAR,0.1,'  交投活跃'){XG51};
DRAWTEXT(HSL>5 AND HSL<8 AND ISLASTBAR,0.1,'  带量'){XG51};
DRAWTEXT(HSL>8 AND HSL<15 AND ISLASTBAR,0.1,'  放量'){XG51};
DRAWTEXT(HSL>15 AND HSL<25 AND ISLASTBAR,0.1,'  巨量'){XG51};
DRAWTEXT(HSL>=25 AND ISLASTBAR,0.1,'  成交怪异'){XG51};
DRAWTEXT(((量能>3*N AND 涨幅1<N) OR (量能<0.5*N AND 涨幅1>3*N)OR (量能>3*N AND 涨幅1>-N AND 涨幅1<0) OR (量能<0.5*N AND 涨幅1<-3*N)) AND ISLASTBAR,0.5,'  注意反转'){XG51};
零轴:0.5,COLORRED{XG51};
STICKLINE(一阳穿三线,0.5,1,1,0),COLORFF00FF{XG51};
DRAWTEXT(一阳穿三线,0.9,'  穿三'),COLORFF00FF{XG51};
STICKLINE(一阳穿四线,0,0.5,1,0),COLORFF00FF{XG51};
DRAWTEXT(一阳穿四线,0.9,'  穿四'),COLORBLUE{XG51};
DRAWTEXT(单阳不破天数>=1,0.4,'☉'),COLORBLUE{XG51};
均价:=(3*C+H+L+O)/6{XG51};
VAR11:=(8*均价+7*REF(均价,1)+6*REF(均价,2)+5*REF(均价,3)+4*REF(均价,4)+3*REF(均价,5)+2*REF(均价,6)+REF(均价,8))/36{XG51};
TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR11{XG51};
立桩量:=FILTER(TJ1,5){XG51};
TJ2:=IF(BArslAST(立桩量)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立桩量)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(立桩量)=3 AND CLOSE>REF(HIGH,3),1,0))){XG51};
突破:=TJ2=1{XG51};
TJ3:=IF(BARSLAST(立桩量)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(立桩量)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(立桩量)=3 AND CLOSE>REF(LOW,3),1,0))){XG51};
三天法则:=TJ3=1{XG51};
成立:=三天法则 AND 突破{XG51};
条件成立:=FILTER(成立,3){XG51};
DRAWTEXT(条件成立,0.85,'成立'),COLORBLUE{X_G+5-1_C_N_{};