// ════ 同花顺 · 技术指标 四象量能v6 (副图) — 由通达信版单向生成 ════
// 安装: 公式管理 → 技术指标 → 新建 → 名称 四象量能 → 画线方法 副图 → 粘贴 → 测试 → 保存
// 替代成交量副图。柱高=成交量，柱色=筹码与位置状态
// 柱色: 墨绿=低位低获利盘 | 红=高位高获利盘 | 金=强放量大涨(别追) | 蓝=极端放量阴 | 紫=高位缩量阴(中性)
// 字标: 缩=高位地量(+0.62) | 温=高位温和放量(+0.40) | 爆=3倍量阴低位低筹码 | 燃=爆次日确认
//       泄=3倍量阳(派发) | 险=放量涨停(全档-2.0~-2.3) | 拉=拉高(高位最强-2.53) | 地=低位地量 | 吸=吸货链
// 与通达信版的差异: 注释{}→// · 柱宽2→6(同花顺间距10) · 白字改墨绿(白底看不见) · 颜色换柔和版
//                   涨停判定不用 CODELIKE，改用「收盘=最高 且 涨幅≥9.5%」(双创20%涨停同样成立)
//                   去掉 DRAWTEXT_FIX(同花顺未验证)，末行说明改用 DRAWTEXT 落在最后一根
// ════════════════════════════════════════════════
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;
BLDWN:=CLOSE<=REF(CLOSE,1);
// 涨停近似: 收盘=最高 且 涨幅≥9.5% (主板9.5% / 双创19% 都落在这个条件里)
BLZT:=BLST>=0.095 AND CLOSE>=HIGH;
BLUP:=VOL>=BLR1*1.9;
BLUP2:=VOL>=BLR1*2.2;
BLW3:=VOL>=BLR1*3;
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 BLDWN;
BLPURP:=BLWK AND BLDWN AND BLPOS>=70;
// 字标状态(全部按位置分档)
BLDI60:=VOL=LLV(VOL,60) AND REF(LLV(VOL,59),1)>VOL;
BLDI:=BLDI60 AND BLPOS<35;
BLSUO:=BLDI60 AND BLPOS>70;
BLWEN:=VOL>=BLR1*1.5 AND VOL<BLR1*1.9 AND BLPU AND BLST<0.05 AND BLPOS>70;
BLBAO:=BLW3 AND BLDWN AND BLPOS<35 AND BLWIN<10;
BLRAN:=REF(BLBAO,1) AND BLST>=0.05;
BLXIE:=BLW3 AND BLPU;
BLXIAN:=BLUP AND BLZT;
BLLA:=BLV7H<REF(BLV7H,1) AND BLV7H<=-100;
BLXI:=BLXIH>REF(BLXIH,1) AND BLXIH>=50 AND BLPOS<70;
// 读数行(不上图)
成交:VOL,NODRAW;
位置:BLPOS,NODRAW;
筹码:BLWIN,NODRAW;
距本:BLDIST,NODRAW;
// 柱: 顺序=灰 → 墨绿 → 紫 → 蓝 → 金 → 红, 后画覆盖先画; 柱宽 6
STICKLINE(VOL>0,0,VOL,6,0),COLOR555555;
STICKLINE(BLGREEN,0,VOL,6,0),COLOR8FD600;
STICKLINE(BLPURP,0,VOL,6,0),COLORFF4DBA;
STICKLINE(BLBLUE,0,VOL,6,0),COLORFF7D2E;
STICKLINE(BLGOLD,0,VOL,6,0),COLOR2ECBFF;
STICKLINE(BLRED,0,VOL,6,0),COLOR4E3BFF;
// 字标
DRAWTEXT(BLDI,VOL*1.02,'地'),COLORFF7D2E;
DRAWTEXT(BLSUO,VOL*1.02,'缩'),COLOR2ECBFF;
DRAWTEXT(BLWEN,VOL*1.10,'温'),COLOR8FD600;
DRAWTEXT(BLBAO,VOL*1.32,'爆'),COLOR2ECBFF;
DRAWTEXT(BLRAN,VOL*1.32,'燃'),COLOR4E3BFF;
DRAWTEXT(BLXIE,VOL*1.42,'泄'),COLORFF4DBA;
DRAWTEXT(BLXIAN,VOL*1.10,'险'),COLOR4E3BFF;
DRAWTEXT(BLLA,VOL*1.20,'拉'),COLORFF4DBA;
DRAWTEXT(BLXI,VOL*1.18,'吸'),COLOR8FD600;
// 末行说明(替代通达信的 DRAWTEXT_FIX)
DRAWTEXT(ISLASTBAR,VOL*2.4,'位置:'+IF(BLPOS>=70,'高位',IF(BLPOS>=35,'中位','低位'))),COLOR8FD600;