通达信极品成交量组合公式

通达信极品成交量组合公式

源码正文：

VAR1:=(vol / (((HIGH - LOW) * 2) - Abs((CLOSE - OPEN)))){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((买卖差 < 0),0,买卖差,3,0),COLOR33FF33{XG51};
量比:=(VOL / ma(VOL,5)){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};
神比:=(买盘 / 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))); 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};
DRAWTEXT(((DATE > 700101) AND crOSS(84,VARE)),HIGH,'卖出'),COLORF2A3A4{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((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)),0,VAR6,2,0),COLOR00FFFF{XG51};
STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)),0,VAR6,2,0),COLORFF0000{XG51};
STICKLINE(((VAR8 > VAR6) AND (VAR8 > VAR7)),0,VAR8,2,0),COLORFFFFFF{XG51};
STICKLINE(((VAR7 > VAR6) AND (VAR7 > VAR8)),0,VAR7,2,0),COLORFF00FF{XG51};
STICKLINE((VOL > (MA(VOL,5) * 2.5)),0,VOL,1,0){XG51};
STICKLINE((买盘 > 0),买盘,0,1,0),COLOR0000FF{XG51};
上攻均量:=MA(买盘,JY1){XG51};
下攻均量:=MA(卖盘,JY1){XG51};
DRAWTEXT(((((((((VAR7 > VAR6) AND (VARA > 2)) AND (VAR9 > VAR8)) AND (CLOSE > MA(CLOSE,5))) AND (CLOSE > MA(CLOSE,30))) AND (HIGH > MA(CLOSE,60))) AND (VOL > MA(VOL,5))) AND (VAR7 >= MA(VOL,5))),VOL,'出货'){XG51};
DRAWTEXT(((((((VAR8 > VAR6) AND (VAR8 > VAR7)) AND (VARA < (0 - 2))) AND (CLOSE < MA(CLOSE,30))) AND (VAR8 < (MA(VOL,5) / 2))) AND (MA(VOL,5) < MA(VOL,10))),VOL,'低进'){XG51};
DRAWTEXT((((((VAR6 > (MA(VOL,5) * 2)) AND (VAR6 >= VAR7)) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)) OR ((VOL > (MA(VOL,5) * 3)) AND VARB)),VOL,'强势'){XG51};
DRAWTEXT((((((量比 > 1) AND ((买盘 / 三日上攻) > 1.58)) AND IF((三日上攻 > 上攻均量),(三日上攻 > 三日下攻),(三日上攻 > REF(三日上攻,1)))) AND (三日下攻 < REF(三日下攻,1))) AND ((((CLOSE - REF(CLOSE,3)) / REF(CLOSE,3)) * 100) < 14)),(买盘 * 1.3),'或参与'),COLOR99FF00{XG51};
换手％:=((VOL / CAPITAL) * 100){XG51};
DRAWTEXT((((VOL / REF((SUM(VOL,5) / 5),1)) >= 2) AND (换手％ > 1)),(VOL * 1.1),'量变'),COLOR00FFFF{XG51};
涨幅:=100*(CLOSE-REF(CLOSE,1))/REF(CLOSE,1){XG51};
量大涨少卖:=C>REF(C,1) AND V>REF(V,1)AND 涨幅<REF(涨幅,1){XG51};
DRAWTEXT(量大涨少卖,V,'量大涨少卖'){XG51};
VAR0:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN)){XG51};
主买:IF(CLOSE>OPEN,VAR0*(HIGH-LOW),IF(CLOSE<OPEN,VAR0*((HIGH-OPEN)+ (CLOSE-LOW)),VOL/2)),COLORWHITE,POINTDOT{XG51};
AVAR1:=(VOL / (((HIGH - LOW) * 2) - ABS((CLOSE - OPEN)))){XG51};
A买盘:=IF((CLOSE > OPEN),(AVAR1 * (HIGH - LOW)),IF((CLOSE < OPEN),(AVAR1 * ((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2))){XG51};
主买占%:A买盘/10000,COLORWHITE,NODRAW{XG51};
A主卖:IF(CLOSE>OPEN,0-VAR0*((HIGH-CLOSE)+(OPEN- LOW)),IF(CLOSE<OPEN,0-VAR0*(HIGH-LOW),0-VOL/2)),COLOR00FF00,POINTDOT{XG51};
A卖盘:=IF((CLOSE > OPEN),(0 - (VAR1 * ((HIGH - CLOSE) + (OPEN - LOW)))),IF((CLOSE < OPEN),(0 - (VAR1 * (HIGH - LOW))),(0 - (VOL / 2)))){XG51};
主卖占%:-A卖盘/10000,COLOR00FF00,POINTDOT,NODRAW{XG51};
震动调整:=(A买盘 + A卖盘){XG51};
STICKLINE((震动调整 < 1),1,震动调整,3,0),COLOR70DB93{XG51};
市盈率:=IF(FINANCE(33)>0,DYNAINFO(39),0)*0.35{XG51};
每股收益:=IF(FINANCE(33)>0.01,FINANCE(33)*0.65,0){XG51};
参考定价:每股收益*市盈率*4{XG51};
年认同价:=MA(C,240){XG51};
毛利润率:=FINANCE(21)/FINANCE(20){XG51};
成长价值:年认同价*(1+毛利润率),COLORBLUE{XG51};
收益价值:年认同价+FINANCE(33),COLORWHITE{XG51};
回调认同:ema(expma(C,20),13),COLORWHITE{XG51};
DRAWTEXT(((((换手％ <= 1) AND 换手％) AND (DYNAINFO(7) = CLOSE)) AND (DYNAINFO(10) = AMOUNT)),(VOL * 0.618),'地量'){XG51};
DRAWTEXT(((((换手％ <= 2) AND (换手％ > 1)) AND (DYNAINFO(7) = CLOSE)) AND (DYNAINFO(10) = AMOUNT)),(VOL * 0.618),'低靡'){XG51};
DRAWTEXT(((((换手％ <= 3) AND (换手％ > 2)) AND (DYNAINFO(7) = CLOSE)) AND (DYNAINFO(10) = AMOUNT)),(VOL * 0.618),'温和'){XG51};
DRAWTEXT(((((换手％ <= 5) AND (换手％ > 3)) AND (DYNAINFO(7) = CLOSE)) AND (DYNAINFO(10) = AMOUNT)),(VOL * 0.618),'活跃'){XG51};
DRAWTEXT(((((换手％ <= 8) AND (换手％ > 5)) AND (DYNAINFO(7) = CLOSE)) AND (DYNAINFO(10) = AMOUNT)),(VOL * 0.618),'带量'){XG51};
DRAWTEXT(((((换手％ <= 15) AND (换手％ > 8)) AND (DYNAINFO(7) = CLOSE)) AND (DYNAINFO(10) = AMOUNT)),(VOL * 0.618),'放量'){XG51};
DRAWTEXT(((((换手％ <= 25) AND (换手％ > 15)) AND (DYNAINFO(7) = CLOSE)) AND (DYNAINFO(10) = AMOUNT)),(VOL * 0.618),'巨量'){XG51};
VARcyc:=AMOUNT/(100*VOL){XG51};
CYCMAX:=dma(VARCYC,VOL/CAPITAL){XG51};
CYC13:=0.01*EMA(AMOUNT,13)/EMA(VOL,13){XG51};
CYS13:=cys{XG51};
CYSW:=CLOSE/CYCMAX*100-100{XG51};
AA:=INDEXA;AV:=INDEXV;ac:=INDEXC{XG51};
ao:=INDEXO;AH:=INDEXH;AL:=INDEXL{XG51};
M:=CLOSE{XG51};
VAR21:=AA/AV/100{XG51};
VAR22:=(3*AH+AL+AO+2*AC)/7{XG51};
VAR23:=SUM(AA,13)/VAR21/100{XG51};
ACYC:=DMA(VAR22,AV/VAR23){XG51};
ACYS13:=(AC-ACYC)/ACYC*100{XG51};
A4:=CYS13<-17 AND CYSW<-40 AND ACYS13<-8 AND ACYS13<REF(CYS13,1){XG51};
A5:=CYS13<-20 AND CYSW<-40 AND ACYS13<-10 AND ACYS13<REF(ACYS13,1){XG51};
DRAWTEXT(A5>0,M*4.1,'【全仓杀入】'),COLORCYAN{XG51};
DRAWTEXT(A4>0 AND A5<M*5.5,M*3.1,'【分仓介入】'),COLORGREEN{XG51};
VAR31:=HIGH-LOW{XG51};
VAR32:=ABS(OPEN-CLOSE ){XG51};
VAR33:=HIGH-IF(CLOSE>OPEN,CLOSE,O){XG51};
VAR34:=IF(CLOSE>OPEN,O,CLOSE)-LOW{XG51};
VAR35:=(VAR32/VAR31)*VOL{XG51};
VAR36:=(VAR33/VAR31)*VOL{XG51};
VAR37:=(VAR34/VAR31)*VOL{XG51};
V1:=H-L{XG51};
V2:=ABS(O-C){XG51};
V3:=H-IF(C>O,C,O){XG51};
V4:=IF(C>O,O,C)-L{XG51};
V5:=V2/V1*V{XG51};
V6:=V3/V1*V{XG51};
V7:=V4/V1*V{XG51};
M5:=MA(V,5),COLORRED{XG51};
M10:=MA(V,10),COLORBLUE{XG51};
V8:=IF(V/CAPITAL>0.001,1,EXP(ABS(LOG(V/CAPITAL*100)))){XG51};
RSV1:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100{XG51};
K1:=SMA(RSV1,3,1){XG51};
D1:=SMA(K1,3,1){XG51};
J1:=3*K1-2*D1{XG51};
RSV:=(C-LLV(L,26))/(HHV(H,26)-LLV(L,26))*100{XG51};
K:=SMA(RSV, 6, 1){XG51};
D:=SMA(K, 3, 1){XG51};
J:=3*K-2*D{XG51};
LC:=REF(C,1){XG51};
XA:=IF(CROSS(J1,J) AND J<20,-1,0)+IF(CROSS(J,J1) AND J>80,1,0){XG51};
TYP:=(H+L+C)/3{XG51};
CCJ:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14))/2{XG51};
rsi1:=SMA(MAX(C-LC, 0), 6, 1)/SMA(ABS(C-LC), 6, 1)*100{XG51};
K2:=EMA((C-LLV(L,36))/(HHV(H,36)-LLV(L,36))*100, 9){XG51};
XB:=IF(CCJ>100 AND K2>50 AND C>O, 0.5, 0)+IF(RSI1>80 AND K2>50 AND C>O, 0.5, 0){XG51};
RSV3:=(C-LLV(L,100))/(HHV(H,100)-LLV(L,100))*100{XG51};
K13:=SMA(RSV3, 21, 1){XG51};
D13:=SMA(K1, 3, 1){XG51};
J13:=3*K13-2*D13{XG51};
XC:=IF(J13>80 AND RSI1>85, 0.5, 0){XG51};
DRAWTEXT(FILTER(V5>MA(V,5)*2 AND V5>=V6 AND V5>=V7 AND C>O  OR V>MA(VOL,5)*3,2),1.2*V,'强势参与'),COLORWHITE{XG51};
DRAWTEXT(V6>V5 AND V6>V7 AND C>MA(C,5) AND C>MA(C,34) AND H>MA(C,55) AND V>M5 AND V6>MA(V,5),V,'逢高出货'),COLORCYAN{XG51};
DRAWTEXT(VAR36>VAR35 AND  VAR36>VAR37  AND C>MA(C,5) AND C>MA(C,30) AND H>MA(C,60) AND V>MA(V,5) AND VAR6>=MA(V,5),VOL,'逢高出货'),COLORWHITE{XG51};
GJ1:=AMOUNT/VOL/100{XG51};
成本: EMA(EMA(GJ1,2),30),COLORCYAN,NODRAW{XG51};
A1:=SUMBARS(V,CAPITAL){XG51};
CMA:=IF(CAPITAL>0,SUM(AMOUNT,A1)/SUM(V,A1)/100,EMA(C,120)){XG51};
百分百换手均价:CMA,NODRAW,COLORWHITE{X.G?5?1.C.N.{};