通达信VOL加强未加密选股指标公式源码

通达信VOL加强未加密选股指标公式源码

源码正文：

Vvol:=IF(CURRBARSCOUNT=1 AND PERIOD=5,V*240/FROMOPEN,DRAWNULL),NODRAW{XG51};
stICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,VVOL,0,-1,-1),COLOR00C0C0{XG51};
DRAWTEXT_FIX(1,0.00,0,0,'白烛建仓★黄烛加仓★粉烛操盘★红多绿空☆蓝烛清仓☆尾绿出货☆ BY:CHH322')COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.00,0.05,0,'')COLOR00FF00{XG51};
VAR1:=(VOL / (((HIGH - LOW) * 2) - Abs((CLOSE - OPEN)))){XG51};
成交:=VOL{XG51};
买盘:=IF((CLOSE > OPEN),(VAR1 * (HIGH - LOW)),IF((CLOSE < OPEN),(VAR1 * ((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2))){XG51};
卖盘:=IF((CLOSE > OPEN),(0 - (VAR1 * ((HIGH - CLOSE) + (OPEN - LOW)))),IF((CLOSE < OPEN),(0 - (VAR1 * (HIGH - LOW))),(0 - (VOL / 2)))){XG51};
买卖差:=(买盘 + 卖盘){XG51};
STICKLINE((VOL > 0),VOL,0,3,1),COLORFFFFFF{XG51};
STICKLINE((买卖差 > 0),0,买卖差,3,0),COLOR0000FF{XG51};
STICKLINE((买卖差 < 0),0,买卖差,1,0),LINETHICK1,COLOR66FF00{XG51};
量比1:=(VOL / ma(VOL,5)){XG51};
VAR10:=买盘{XG51};
VAR20:=卖盘{XG51};
JX1:=BARSSINCE(买盘){XG51};
JY1:=IF(((121 > JX1) AND (JX1 > 0)),JX1,120){XG51};
JY2:=IF(((4 > JX1) AND (JX1 > 0)),JX1,3){XG51};
VAR30:=MA(VOL,JY2){XG51};
动神:=买盘{XG51};
鬼力:=VAR20{XG51};
神比:=(动神 / VAR30){XG51};
鬼比:=(鬼力 / VAR30){XG51};
VAR2:=(HIGH - LOW){XG51};
VAR3:=ABS((OPEN - CLOSE)){XG51};
VAR4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN)){XG51};
VAR5:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW){XG51};
VAR6:=((VAR3 / VAR2) * VOL){XG51};
VAR7:=((VAR4 / VAR2) * VOL){XG51};
VAR8:=((VAR5 / VAR2) * VOL){XG51};
VAR9:=IF(((VOL / CAPITAL) > 0.001),1,EXP(ABS(LOG(((VOL / CAPITAL) * 100))))){XG51};
VARA:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100){XG51};
VARB:=(((MA(CLOSE,5) > MA(CLOSE,10)) AND (MA(CLOSE,10) > MA(CLOSE,30))) AND (MA(CLOSE,30) > MA(CLOSE,60))){XG51};
VARC:=((MA(CLOSE,5) < MA(CLOSE,10)) AND (MA(CLOSE,10) < MA(CLOSE,30))){XG51};
VARD:=REF(CLOSE,1){XG51};
VARE:=((SMA(MAX((CLOSE - VARD),0),6,1) / SMA(ABS((CLOSE - VARD)),6,1)) * 100){XG51};
VAR40:=((IF((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)),VAR6,动神) + 动神) / 2){XG51};
VAR41:=((IF(((VAR7 > VAR6) AND (VAR7 > VAR8)),VAR7,动神) + 动神) / 2){XG51};
VAR42:=((IF(((VAR8 > VAR6) AND (VAR8 > VAR7)),VAR8,动神) + 动神) / 2){XG51};
VAR50:=((IF((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)),VAR6,鬼力) + 鬼力) / 2){XG51};
三日上攻:=MA((((VAR40 + VAR41) + VAR42) / 3),JY2){XG51};
三日下攻:=MA(VAR50,JY2){XG51};
多头:STICKLINE((CLOSE > MA(CLOSE,30)),0,VOL,3,1),COLOR0000FF{XG51};
空头:STICKLINE((CLOSE < MA(CLOSE,30)),0,VOL,3,1),COLOR00FF00{XG51};
STICKLINE((鬼力 > 0),鬼力,0,3,0),COLORFF3399{XG51};
加仓:STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)),0,VAR6,3,0),COLOR00FFFF{XG51};
减仓:STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)),0,VAR6,3,0),COLORFF0000{XG51};
洗盘:STICKLINE(((VAR8 > VAR6) AND (VAR8 > VAR7)),0,VAR8,3,0),COLORFFFFFF{XG51};
高卖:STICKLINE(((VAR7 > VAR6) AND (VAR7 > VAR8)),0,VAR7,3,0),COLORFF00FF{XG51};
相对地量:=STICKLINE(((VAR9 > 2) AND (VOL < (MA(VOL,5) / 2))),0,VOL,3,0){XG51};
量:V,NODRAW{XG51};
倍量:(V/REF(V,1)>=1.91 AND COUNT(C>O,1)) OR (L>REF(H,1) AND COUNT(O>C,1) AND V/REF(V,1)>=1.91),NODRAW,COLOR3366FF{XG51};
低量:V<=REF(LLV(V,15),1),NODRAW,COLOR7FFF00{XG51};
地量:V<=REF(LLV(V,100),1),NODRAW,COLORWHITE{XG51};
平量:ABS(V-HHV(REF(V,1),5))/HHV(REF(V,1),5)<=0.03 OR ABS(V-REF(V,1))/REF(V,1)<=0.03,NODRAW,COLOR824173{XG51};
倍缩:V<=REF(V,1)*0.5,NODRAW,COLOR5C3317{XG51};
梯量:COUNT(V>REF(V,1),3)=3 AND COUNT(C>O,3)=3,NODRAW,COLOR9932CD{XG51};
缩量涨:COUNT(C>REF(C,1),2)=2 AND COUNT(V<REF(V,1),2)=2,NODRAW,COLOR996600{XG51};
DRAWTEXT(倍量,V*1.06,'倍'),COLOR3366FF{XG51};
DRAWTEXT(低量,V*1.09,'低'),COLOR7FFF00{XG51};
DRAWTEXT(地量,V*1.12,'地'),COLORWHITE{XG51};
DRAWTEXT(平量,V*1.15,'平'),COLOR824173{XG51};
DRAWTEXT(倍缩,V*1.06,'缩'),COLOR5C3317{XG51};
DRAWTEXT(梯量,V*1.18,'梯'),COLOR9932CD{XG51};
DRAWTEXT(缩量涨,V*1.21,'缩涨'),COLOR996600{XG51};
STICKLINE(倍量,0,V,0.1,0),COLOR3366FF{XG51};
STICKLINE(低量,0,V,0.1,0),COLOR7FFF00{XG51};
STICKLINE(地量,0,V,0.1,0),COLORWHITE{XG51};
STICKLINE(平量,0,V,0.1,0),COLOR824173{XG51};
STICKLINE(倍缩,0,V,0.1,0),COLOR5C3317{XG51};
STICKLINE(梯量,0,V,0.1,0),COLOR9932CD{XG51};
STICKLINE(缩量涨,0,V,0.1,0),COLOR996600{XG51};
趋势:VOL,NODRAW{XG51};
MA5:MA(V,5),COLORRED;
MA10:MA(V,10),COLORBLUE;{XG51};
DRAWICON(crOSS(MA5, MA10),MA5,1){XG51};
DRAWICON(CROSS(MA10, MA5),MA10,2){X-G^5.1-C-N-{};

通达信福星送福主图未加密选股指标公式源码

源码正文：

N1:=13{XG51};
VAR1:=REF(C,1){XG51};
VAR2:=SMA(maX(C-VAR1,0),N1,1)/SMA(Abs(C-VAR1),N1,1)*1000{XG51};
VAR3:=DRAWLINE(VAR2>=HHV(VAR2,N1),VAR2,VAR2<=LLV(VAR2,N1),VAR2,1){XG51};
VAR4:=VAR2=VAR3{XG51};
VAR5:=VAR2<REF(VAR2,1){XG51};
RSV:=(C-LLV(L,25))/(HHV(HIGH,25)-LLV(L,25))*100{XG51};
K:=SMA(RSV,4,1){XG51};
D:=SMA(K,4,1){XG51};
J:=4*K-2*D{XG51};
VAR6:=(2*C+H+L)/4{XG51};
VAR7:=ema(EMA(EMA(VAR6,4),4),4){XG51};
VAR8:=(VAR7-REF(VAR7,1))/REF(VAR7,1)*100{XG51};
VAR9:=MA(VAR8,4)+0.03{XG51};
VAR10:=MA(VAR8,1){XG51};
KB:=EMA(C,4)-EMA(C,18){XG51};
DB:=EMA(KB,4){XG51};
AA:=BARSCOUNT(C){XG51};
AH:=HHV(H,120){XG51};
AL:=LLV(L,120){XG51};
A0:=(AH-AL)/30{XG51};
VAR2S:=(2*CLOSE+HIGH+LOW)/4{XG51};
VAR3S:=IF(YEAR>=2099 AND MONTH>2,0,1){XG51};
VAR4S:=LLV(LOW,5); VAR5S:=HHV(HIGH,4){XG51};
散户:=EMA((VAR2S-VAR4S)/(VAR5S-VAR4S)*100,4)*VAR3S{XG51};
庄家:=EMA(0.667*REF(散户,1)+0.333*散户,2)*VAR3S{XG51};
stICKLINE(KB<DB AND DB<REF(DB,1),C,OPEN,3.2,0),COLOR004400{XG51};
STICKLINE(KB<DB AND DB<REF(DB,1),C,OPEN,2.7,0),COLOR006600{XG51};
STICKLINE(KB<DB AND DB<REF(DB,1),C,OPEN,2.1,0),COLOR008800{XG51};
STICKLINE(KB<DB AND DB<REF(DB,1),C,OPEN,1.5,0),COLOR00AA00{XG51};
STICKLINE(KB<DB AND DB<REF(DB,1),C,OPEN,0.9,0),COLOR00CC00{XG51};
STICKLINE(KB<DB AND DB<REF(DB,1),C,OPEN,0.3,0),COLOR00EE00{XG51};
STICKLINE(KB>DB AND DB>REF(DB,1),C,OPEN,3.2,0),COLOR000055{XG51};
STICKLINE(KB>DB AND DB>REF(DB,1),C,OPEN,2.7,0),COLOR000077{XG51};
STICKLINE(KB>DB AND DB>REF(DB,1),C,OPEN,2.1,0),COLOR000099{XG51};
STICKLINE(KB>DB AND DB>REF(DB,1),C,OPEN,1.5,0),COLOR0000BB{XG51};
STICKLINE(KB>DB AND DB>REF(DB,1),C,OPEN,0.9,0),COLOR0000DD{XG51};
STICKLINE(KB>DB AND DB>REF(DB,1),C,OPEN,0.3,0),COLOR0000FF{XG51};
STICKLINE(crOSS(VAR9,VAR10) AND J>65,H,OPEN,3.15,0),COLORAA1100{XG51};
STICKLINE(CROSS(VAR9,VAR10) AND J>65,H,OPEN,2.45,0),COLORAA3300{XG51};
STICKLINE(CROSS(VAR9,VAR10) AND J>65,H,OPEN,1.75,0),COLORAA5500{XG51};
STICKLINE(CROSS(VAR9,VAR10) AND J>65,H,OPEN,1.05,0),COLORAA7700{XG51};
STICKLINE(CROSS(VAR9,VAR10) AND J>65,H,OPEN,0.35,0),COLORAA9900{XG51};
STICKLINE(VAR4 AND VAR5,L,OPEN,3.15,0),COLOR1111FF{XG51};
STICKLINE(VAR4 AND VAR5,L,OPEN,2.45,0),COLOR3333FF{XG51};
STICKLINE(VAR4 AND VAR5,L,OPEN,1.75,0),COLOR5555FF{XG51};
STICKLINE(VAR4 AND VAR5,L,OPEN,1.05,0),COLOR7777FF{XG51};
STICKLINE(VAR4 AND VAR5,L,OPEN,0.35,0),COLOR9999FF{XG51};
STICKLINE(CROSS(散户,庄家) AND 散户<30,L,OPEN,3.15,0),COLOR770077{XG51};
STICKLINE(CROSS(散户,庄家) AND 散户<30,L,OPEN,2.45,0),COLOR990099{XG51};
STICKLINE(CROSS(散户,庄家) AND 散户<30,L,OPEN,1.75,0),COLORBB00BB{XG51};
STICKLINE(CROSS(散户,庄家) AND 散户<30,L,OPEN,1.05,0),COLORDD00DD{XG51};
STICKLINE(CROSS(散户,庄家) AND 散户<30,L,OPEN,0.35,0),COLORFF00FF{XG51};
STICKLINE(CROSS(0.9,1/vol*1000>0.01 AND "kdj.J"<0),L,OPEN,3.15,0),COLOR337777{XG51};
STICKLINE(CROSS(0.9,1/VOL*1000>0.01 AND "kdJ.J"<0),L,OPEN,2.45,0),COLOR339999{XG51};
STICKLINE(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),L,OPEN,1.75,0),COLOR33BBBB{XG51};
STICKLINE(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),L,OPEN,1.05,0),COLOR33DDDD{XG51};
STICKLINE(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),L,OPEN,0.35,0),COLOR33FFFF{XG51};
STICKLINE((AA+0)/34=FLOOR((AA+0)/34),L,OPEN,3.15,1),COLORFFFFFF{XG51};
DRAWTEXT((AA+0)/34=FLOOR((AA+0)/34),L*1,'福星护航'),COLORFFFFFF{XG51};
DRAWTEXT(CROSS(散户,庄家) AND 散户<30,L*1,'吃'),COLORFF00FF{XG51};
DRAWICON(CROSS(VAR9,VAR10) AND J>65,H*1,15),COLORCYAN{XG51};
DRAWTEXT(CROSS(VAR9,VAR10) AND J>65,H*1,' 送福'),COLORBLUE{XG51};
DRAWICON(VAR4 AND VAR5,L*1,9){XG51};
DRAWTEXT(VAR4 AND VAR5,L*1,' 福')COLORFFFFFF{XG51};
DRAWTEXT(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),L*1,'赚钱钱'),COLOR33FFFF{XG51};
B1:=MA(C,1){XG51};
B2:=SMA(SMA(SMA(B1,2,1),2,1),2,1){XG51};
SMA2:=MA(B2,3){XG51};
福星下限:IF(LLV(MA(B2,8),3)<B2,LLV(MA(B2,8),3),B2){XG51};
IF(B2>SMA2,B2,DRAWNULL),COLORWHITE,LINETHICK4{XG51};
IF(B2<SMA2,B2,DRAWNULL),COLORCYAN,LINETHICK4{XG51};
SNAKEA:HHV(MA(B2,1),13),COLORBLUE{XG51};
VAR1A:=(2*CLOSE+HIGH+LOW)/4{XG51};
VAR2A:=MA(VAR1A,7){XG51};
VAR3A:=VAR2A-MA(VAR1A,7/2)<0{XG51};
VAR4A:=VAR2A-MA(VAR1A,7/2)>0{XG51};
VAR5A:=BArslAST(VAR3A){XG51};
VAR6A:=0-BARSLAST(VAR4A){XG51};
VAR7A:=IF(VAR3A<=0,VAR5A,VAR6A){XG51};
STICKLINE(SNAKEA>SMA2 AND B2<SMA2,SNAKEA,SMA2,0,0),COLORYELLOW{XG51};
VAR11A:=(CLOSE*2+HIGH+LOW)/4{XG51};
VAR21A:=EMA(VAR11A,13)-EMA(VAR11A,34){XG51};
VAR31A:=EMA(VAR21A,5){XG51};
VARA:=((REF(VAR9,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VARB:=((REF(VARA,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VARC:=((REF(VARB,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VARD:=((REF(VARC,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VARE:=((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,2))){XG51};
VARF:=((REF(VARE,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR11:=((REF(VAR10,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR12:=((REF(VAR11,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR13:=((REF(VAR12,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR14:=((REF(VAR13,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR15:=((REF(VAR14,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR16:=((REF(VAR15,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR17:=((REF(VAR16,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR18:=((REF(VAR17,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR19:=((REF(VAR18,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR1B:=(REF((((((((((((VARE OR VARF) OR VAR10) OR VAR11) OR VAR12) OR VAR13) OR VAR14) OR VAR15) OR VAR16) OR VAR17) OR VAR18) OR VAR19),1) AND VAR2){XG51};
A13:=EMA(CLOSE,55){XG51};
A14:=MA(CLOSE,75){XG51};
A15:=EMA(A14,3){XG51};
A16:=EMA(A15,3){XG51};
A17:=(HIGH + LOW) / 5{XG51};
A18:=(MA(A17,4)) - (MA(A17,34)){XG51};
A19:=CROSS(A18,0){XG51};
A20:=CROSS(0,A18){XG51};
A21:=BARSLAST(A19){XG51};
A22:=BARSLAST(A20){XG51};
A23:=REF(A19,1){XG51};
A24:=REF(A20,1){XG51};
A25:=BARSLAST(A23){XG51};
A26:=BARSLAST(A24){XG51};
A27:=IF((A25 < A26),(REF((HHV(HIGH,2)),A25)),(REF((LLV(LOW,2)),A26))){XG51};
A28:=(((REF(CLOSE,1)) <= (REF(A27,1))) AND (CLOSE > A27)) AND (A21 < A22){XG51};
A29:=(((REF(CLOSE,1)) >= (REF(A27,1))) AND (CLOSE < A27)) AND (A22 < A21){XG51};
A30:=A28 AND ((COUNT(A28,A21)) = 1){XG51};
A31:=A29 AND ((COUNT(A29,A22)) = 1){XG51};
A32:=A30 AND ((REF(BARSLAST(A31),1)) < (REF(BARSLAST(A30),1))){XG51};
A33:=A31 AND ((REF(BARSLAST(A31),1)) > (REF(BARSLAST(A30),1))){XG51};
ac:=AMOUNT/(VOL){XG51};
YY:=MA(AC,13){XG51};
LLL:=(C-YY)/YY*100{XG51};
MIDC := MA(CLOSE,22){XG51};
UPPERC:= MIDC + 2*STD(C,22){XG51};
LOWERC:= MIDC - 2*STD(C,22){XG51};
BBA:=(C-LOWERC)/(UPPERC-LOWERC){XG51};
BBC:=FORCAST(BBA,3){XG51};
LIFENGcyc:=(REF(LLL,1)<-15 AND REF(BBA,1)<0 AND LLL>REF(LLL,1)){X~G_5=1~C~N~{};