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