{四象量能 v4｜替代成交量副图｜柱宽2}
{柱色  绿=低位低获利盘(机会)  红=高位高获利盘(危险)  金黄=放量大涨(别追)  蓝=极端放量阴  紫=高位缩量跌}
{字    险=高位放量涨停  拉=拉高(卖出警示)  地=低位地量}
{读数  成交=成交量  位置=250日位置分位  筹码=获利盘  距本=距筹码中位成本}
BLPOS:=IF(HHV(HIGH,250)>LLV(LOW,250),(CLOSE-LLV(LOW,250))/(HHV(HIGH,250)-LLV(LOW,250))*100,50);
BLWIN:=WINNER(CLOSE)*100;
BLDIST:=IF(COST(50)>0,(CLOSE/COST(50)-1)*100,0);
BLR1:=REF(VOL,1);
BLST:=CLOSE/REF(CLOSE,1)-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>REF(CLOSE,1);
{吸货链}
BLV2_ABS:=SMA(ABS(LOW-REF(LOW,1)),3,1);
BLV2_MAX:=SMA(MAX(LOW-REF(LOW,1),0),3,1);
BLV2_CAL:=BLV2_ABS/MAX(BLV2_MAX,0.0001)*100;
BLV3_CAL:=10*EMA(BLV2_CAL,3);
BLXIH:=EMA(IF(LOW<=LLV(LOW,38),(BLV3_CAL+HHV(BLV3_CAL,38)*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_CAL:=BLV2H_ABS/MIN(BLV2H_MIN,-0.0001)*100;
BLV3H_CAL:=10*EMA(BLV2H_CAL,3);
BLV7H:=EMA(IF(HIGH>=HHV(HIGH,38),(BLV3H_CAL+LLV(BLV3H_CAL,38)*2)/2,0),3)/618;
{状态与标记}
BLGREEN:=BLPOS<35 AND BLWIN<10;
BLRED:=BLPOS>80 AND BLWIN>30;
BLGOLD:=BLUP AND BLST>=0.05;
BLBLUE:=BLUP2 AND NOT(BLPU);
BLPURP:=BLWK AND NOT(BLPU) AND BLPOS>=70;
BLXIAN:=BLPOS>=60 AND BLUP AND BLZT;
BLDI:=VOL=LLV(VOL,60) AND REF(LLV(VOL,59),1)>VOL AND BLPOS<35;
BLLA:=BLV7H<REF(BLV7H,1) AND BLV7H<=-100;
{读数}
成交:VOL,NODRAW;
位置:BLPOS,NODRAW;
筹码:BLWIN,NODRAW;
距本:BLDIST,NODRAW;
{柱：后画的覆盖先画的，顺序＝灰 → 绿 → 紫 → 蓝 → 金黄 → 红}
STICKLINE(VOL>0,0,VOL,2,0),COLOR555555;
STICKLINE(BLGREEN,0,VOL,2,0),COLOR00AA00;
STICKLINE(BLPURP,0,VOL,2,0),COLOR7850C8;
STICKLINE(BLBLUE,0,VOL,2,0),COLORFF8800;
STICKLINE(BLGOLD,0,VOL,2,0),COLOR00CCFF;
STICKLINE(BLRED,0,VOL,2,0),COLOR0000FF;
{字}
DRAWTEXT(BLDI,VOL*1.02,'地'),COLOR0088FF;
DRAWTEXT(BLXIAN,VOL*1.10,'险'),COLOR0000FF;
DRAWTEXT(BLLA,VOL*1.18,'拉'),COLORAA00AA;
DRAWTEXT(ISLASTBAR,VOL*2.1,'位置:'+IF(BLPOS>=70,'高位',IF(BLPOS>=35,'中位','低位'))+'  筹码:'+CON2STR(BLWIN,0)+'%'),COLORFFFFFF;
DRAWTEXT_FIX(NOT(BARSCOUNT(CLOSE)>=250),0.01,0.08,0,'数据不足250根'),COLOR00AAFF;