王牌柱副圖源碼

donglianghua 2023-03-25 發(fā)布于山東

展開全文

VOLUME:VOL,VOLSTICK;

{ 顯色假陽假陰、倍量陽 }
A:=C>O AND O<REF(C,1);{低開高走,收陽}

A1:=REF(O>C,1) AND C<REF((O+C)/2,1) AND A;{低開高走、且收盤不過昨日陰半的假陽真陰}

A2:=C<REF(C,1) AND A;{顯性假陽真陰}

A3:=AMO/VOL/100<REF(C,1) AND NOT(A2) AND A;{隱性假陽真陰}

假陽真陰:=A1 OR A2 OR A3;

STICKLINE(假陽真陰,VOL,0,-1,0),COLOR808000;

B:=C<O AND O>REF(C,1);

B1:=C>REF(C,1) AND B;{顯性假陰真陽}

B2:=AMOUNT/V/100>REF(C,1) AND NOT(B1) AND B;

假陰真陽:=B1 OR B2;
STICKLINE(假陰真陽,VOL,0,-1,0),COLORMAGENTA;

倍量陽:=V/REF(V,1)>=1.9 AND C>O AND NOT(假陽真陰);
STICKLINE(倍量陽,V,0,-1,0),COLOR0000E1;{畫倍量陽}

{ 標注量型數(shù)字 }
百低:=V=LLV(V,100);
DRAWTEXT(百低,V*1.3,'1');

BS:V/REF(V,1),NODRAW ;

倍量:=BS>=1.9 OR REF(BS=0,1) AND NOT(百低);
DRAWTEXT(倍量 OR REF(V,1)=O,V*1.1,'B');

縮量三一:=BS<=2/3 AND BS>0.55 AND NOT(百低) AND NOT(REF(BS=0,1)) ;
DRAWTEXT(縮量三一,V*1.1,'3') ;

縮量二一:=BS<=0.55 AND NOT(百低) AND NOT(REF(BS=0,1));
DRAWTEXT(縮量二一,V*1.1,'2');

平量:=BS>0.95 AND BS<1.05 AND NOT(百低);
DRAWTEXT(平量,V*1.1,'P');