{四象量能 v3｜副图｜柱宽2｜参数按全市场实测重定}
{柱色  金黄=放量涨  红=放量大涨(涨幅>=5%)  蓝=极端放量阴  绿=低位缩量涨  紫=中高位缩量跌}
{字    地=低位地量  险=高位放量涨停  吸=低位吸货  拉=拉高(卖出警示)}
{读数  成交=成交量  位=250日位置分位(0最低 1最高)  放=放量线  缩=缩量线}
BLR1:=REF(VOL,1);
BLRC:=REF(CLOSE,1);
BLST:=CLOSE/BLRC-1;
BLZT:=IF(CODELIKE('30') OR CODELIKE('68'),BLST>=0.19,BLST>=0.095);
BLUP:=VOL>=BLR1*1.9;
BLUP2:=VOL>=BLR1*2.2;
BLDN:=VOL<=BLR1*0.8;
BLWK:=VOL<=BLR1*0.7;
BLPU:=CLOSE>BLRC;
BLHH:=HHV(HIGH,250);
BLLL:=LLV(LOW,250);
BLPOS:=IF(BLHH>BLLL,(CLOSE-BLLL)/(BLHH-BLLL),0.5);
BLIDX:=INDEXC/REF(INDEXC,20)-1;
{险：高位放量涨停}
BLRISK:=BLPOS>=0.6 AND BLUP AND BLZT;
{吸货}
BLV2_ABS:=SMA(ABS(LOW-REF(LOW,1)),3,1);
BLV2_MAX:=SMA(MAX(LOW-REF(LOW,1),0),3,1);
BLV2_SAFE:=MAX(BLV2_MAX,0.0001);
BLV2_CAL:=BLV2_ABS/BLV2_SAFE*100;
BLV3_CAL:=10*EMA(BLV2_CAL,3);
BLV4_LOW:=LLV(LOW,38);
BLV5_MAX:=HHV(BLV3_CAL,38);
BLXIH:=EMA(IF(LOW<=BLV4_LOW,(BLV3_CAL+BLV5_MAX*2)/2,0),3)/618;
{拉高}
BLV2H_ABS:=SMA(ABS(HIGH-REF(HIGH,1)),3,1);
BLV2H_MIN:=SMA(MIN(HIGH-REF(HIGH,1),0),3,1);
BLV2H_SAFE:=MIN(BLV2H_MIN,-0.0001);
BLV2H_CAL:=BLV2H_ABS/BLV2H_SAFE*100;
BLV3H_CAL:=10*EMA(BLV2H_CAL,3);
BLV4H_HIGH:=HHV(HIGH,38);
BLV5H_MIN:=LLV(BLV3H_CAL,38);
BLV7H:=EMA(IF(HIGH>=BLV4H_HIGH,(BLV3H_CAL+BLV5H_MIN*2)/2,0),3)/618;
{地量确认}
BLDL:=VOL=LLV(VOL,60) AND REF(LLV(VOL,59),1)>VOL AND BLPOS<0.35;
{吸货只在低位且大盘未过热时显示}
BLXOK:=BLXIH>REF(BLXIH,1) AND BLXIH>=50 AND BLPOS<0.3 AND BLIDX<0.03;
BLLG:=BLV7H<REF(BLV7H,1) AND BLV7H<=-100;
{读数}
成交:VOL,NODRAW;
位:BLPOS,NODRAW;
放:BLR1*1.9,COLOR0000FF,DOTLINE;
缩:BLR1*0.8,COLOR00AA00,DOTLINE;
{柱：放量越大涨越危险，缩量上涨只在低位才有正超额}
STICKLINE(VOL>0,0,VOL,2,0),COLOR6E6E6E;
STICKLINE(BLUP AND BLPU AND BLST>=0.05,0,VOL,2,0),COLOR0000FF;
STICKLINE(BLUP AND BLPU AND BLST<0.05,0,VOL,2,0),COLOR00CCFF;
STICKLINE(BLUP2 AND NOT(BLPU),0,VOL,2,0),COLORFF8800;
STICKLINE(BLDN AND BLPU AND BLPOS<0.35,0,VOL,2,0),COLOR00AA00;
STICKLINE(BLWK AND NOT(BLPU) AND BLPOS>=0.3,0,VOL,2,0),COLOR7850C8;
{字}
DRAWTEXT(BLDL,VOL*1.02,'地'),COLOR0088FF;
DRAWTEXT(BLXOK,VOL*1.06,'吸'),COLOR00AA00;
DRAWTEXT(BLRISK,VOL*1.12,'险'),COLOR0000FF;
DRAWTEXT(BLLG,VOL*1.18,'拉'),COLORAA00AA;
DRAWTEXT(ISLASTBAR,VOL*2.1,'位置:'+IF(BLPOS>=0.7,'高位',IF(BLPOS>=0.3,'中位','低位'))),COLORFFFFFF;