欣喜量价副图公式

源码

额:AMOUNT/100000000,,COLORFFFFFF,NODRAW;
 VAR110:=AMOUNT/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
入亿:IF(CLOSE>OPEN,VAR110*(HIGH-LOW),IF(CLOSE<OPEN,VAR110*((HIGH-OPEN)
 +(CLOSE-LOW)),AMOUNT/2))/100000000,COLORRED,NODRAW;
出亿:IF(CLOSE>OPEN,0-VAR110*((HIGH-CLOSE)+(OPEN-LOW)),
 IF(CLOSE<OPEN,0-VAR110*(HIGH-LOW),0-AMOUNT/2))/100000000,COLOR00FF00,NODRAW;
差亿:入亿+出亿,COLORRED,NODRAW;

{VOL换手}
 {换手:=VOL/CAPITAL*100,POINTDOT COLORMAGENTA;}
 {十换:SUM(换手,10),COLORRED,LINETHICK1,NODRAW;}
 {三十换:SUM(换手,30),COLORGREEN,LINETHICK1,NODRAW;}
 {成交量比%}
 {AA1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));}
 {主买:=IF(CLOSE>OPEN,AA1*(HIGH-LOW),IF(CLOSE<OPEN,AA1*((HIGH-OPEN)+(CLOSE-LOW)),VOL /2)),COLORRED;}
 {量比%:主买/VOL*100,COLOR00FFFF,LINETHICK1,NODRAW;}
量:=V/CONST(HHV(V,90))*30,COLORRED;
 {IF(量<= REF(量,1),量,DRAWNULL),COLORCYAN,LINETHICK2;}

 {粉色}
STICKLINE(CLOSE>=OPEN,0,量*1,2.4,0),COLOR000033;
 STICKLINE(CLOSE>=OPEN,0,量*1,1.6,0),COLOR000055;
 STICKLINE(CLOSE>=OPEN,0,量*1,0.8,0),COLOR000077;
 STICKLINE(CLOSE>=OPEN,0,量*1,0.0,0),COLOR0000DD;
 {蓝色}
STICKLINE(CLOSE<=OPEN,0,量*1,2.4,0),COLOREC0000;
 STICKLINE(CLOSE<=OPEN,0,量*1,1.6,0),COLORFF4600;
 STICKLINE(CLOSE<=OPEN,0,量*1,0.8,0),COLORFF6300;
 STICKLINE(CLOSE<=OPEN,0,量*1,0,0),COLORFF8B00;
 {倍量}
倍量:(量/REF(量,1)>=1.91 AND COUNT(C>O,1)) OR (L>REF(H,1) AND COUNT(O>C,1) AND 量/REF(量,1)>=1.91),NODRAW,COLORYELLOW;
 STICKLINE(倍量,0,量,0.0001,0),COLOR00FFFF;
 DRAWTEXT(倍量,量*0.99,'倍'),COLORYELLOW,LINETHICK1;
 {資金线}
VAR28:=LLV(LOW,21);
 VAR29:=HHV(HIGH,21);
 K:EMA((CLOSE-VAR28)/(VAR29-VAR28)*50,6),COLORRED,LINETHICK1;{红}
IF(K<= REF(K,1),K,DRAWNULL),COLORGREEN,LINETHICK1;{绿}
D:EMA(0.667*REF(K,1)+0.333*K,2),COLORGREEN,LINETHICK1;{绿}
IF(D>= REF(D,1),D,DRAWNULL),COLORMAGENTA,LINETHICK1;{洋红}
 {DRAWICON(LONGCROSS(D,K,0.1),D,2),COLORRED,LINETHICK1;
 DRAWICON(LONGCROSS(K,D,0.1),K,1),COLORGREEN,LINETHICK1;}
 {绝顶公式}
VAR21:=(HHV(HIGH,8)-CLOSE)/(HHV(HIGH,8)-LLV(LOW,8))*100-70;
 VAR22:=SMA(VAR21,8,1)+100;
 VAR23:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
 VAR24:=SMA(VAR23,3,1);
 VAR25:=SMA(VAR24,3,1)+100;
 VAR26:=VAR25-VAR22;
绿:IF(VAR26>100,VAR26-100,0),COLORGREEN,LINETHICK1;{绿,量减}
IF(绿>=REF(绿,1),绿,DRAWNULL),COLORRED,LINETHICK1;
 {红:IF(REF(绿,1)<=绿,绿,REF(绿,1)),COLORRED,LINETHICK0;{红}
 {IF(红<=REF(红,1),红,DRAWNULL),COLORCYAN,LINETHICK0;{青}
青:IF(REF(绿,1)>绿,绿,REF(绿,1)),COLORCYAN,LINETHICK0;{青};
IF(青>=REF(青,1),青,DRAWNULL),COLORMAGENTA,LINETHICK1;{洋红,量增}
 {地量买点}
STICKLINE(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),量<0,-3,1.2,0),COLORCYAN,LINETHICK1;
 DRAWTEXT(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),(量<0-3),'地量'),COLORCYAN,LINETHICK1;
 2.5,COLOR00FFFF,LINETHICK1;
 DRAWTEXT(ISLASTBAR,26,'强弱'),COLORRED,LINETHICK1;
 25,COLOR00FFFF,LINETHICK1;
 45,COLORLICYAN,LINETHICK1;
 -5,COLORWHITE;

Q_1:=C-REF(C,1);
 Q_2:=100*EMA(EMA(Q_1,6),6)/EMA(EMA(ABS(Q_1),6),6);
 Q_3:=CROSS(EMA(C,19),EMA(C,7));
 Q_4:=CROSS(EMA(C,7),EMA(C,19));
 Z1:=L=LLV(L,BARSLAST(Q_3)+1);
 Z2:=LLV(L,BARSLAST(Q_3)+1);
 Z3:=H=HHV(H,BARSLAST(Q_4)+1);
 Z4:=HHV(H,BARSLAST(Q_4)+1);
 Q_A:DRAWLINE(Z1,Z2,Z3,Z4,0),COLORMAGENTA,LINETHICK2;

Y1:=H=HHV(H,BARSLAST(Q_4)+1);
 Y2:=HHV(H,BARSLAST(Q_4)+1);
 Y3:=L=LLV(L,BARSLAST(Q_3)+1);
 Y4:=LLV(L,BARSLAST(Q_3)+1);
 Q_B:DRAWLINE(Y1,Y2,Y3,Y4,0),COLORCYAN,LINETHICK2;
 X1:=LLV(Q_2,2)=LLV(Q_2,7);
 X2:=COUNT(Q_2<0,2);
 X3:=CROSS(Q_2,MA(Q_2,2));
 X4:=REF(Q_B,1)<REF(Q_B,2);
 X5:=Q_A>REF(Q_B,1);
买进:=(X1 AND X2 AND X3) AND X4 AND X5;
 TJ:=IF(Q_A<REF(Q_A,1) AND Q_B=Q_A,1,0);
 TJ1:=IF(Q_B<REF(Q_B,1) AND Q_B=Q_A,1,0);
 IF(REF(TJ1,1)=0 AND TJ1>=1,45,-5),STICK,COLORRED,LINETHICK1;
堪称一绝:IF(REF(TJ,1)=0 AND TJ>=1,45,0),STICK,COLORGREEN,LINETHICK1;
 {持币:IF(Q_B<REF(Q_B,1) AND Q_B<Q_A,0,0),STICK,COLORRED;}
 STICKLINE(Q_B<REF(Q_B,1),0,-5,0,0)COLORGREEN;