{黄金倍量 量价四象 v3.1  通达信副图  零参数版}
{常量: 倍量1.9 缩量0.85 弱缩0.7 地量60 高位0.7 涨停9.5% 进场60 拉高60 柱宽3.4}
{通达信多数版本不吃中文变量名, 变量全 ASCII 加 BL 前缀}
BLR1:=REF(VOL,1);
BLRC:=REF(CLOSE,1);
BLUP:=VOL>=BLR1*1.9;
BLDN:=VOL<=BLR1*0.85;
BLWK:=VOL<=BLR1*0.7;
BLPU:=CLOSE>BLRC;
BLPD:=CLOSE<=BLRC;
BL3UP:=COUNT(CLOSE>BLRC,3)=3;
{位置分位: 现价在近 250 日区间的位置, 0 最低 1 最高}
BLHH:=HHV(HIGH,250);
BLLL:=LLV(LOW,250);
BLPOS:=IF(BLHH>BLLL,(CLOSE-BLLL)/(BLHH-BLLL),0.5);
{险: 高位涨停后放量, 20 日下跌 57% 回撤 -13%}
BLZT:=CLOSE/BLRC-1>=0.095;
BLRISK:=BLPOS>=0.7 AND BLUP AND BLZT;
{主力清洗买侧 原版 13/10/33, VAR1 用均价, 分母加下限防除零}
BLV1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
BLV2:=SMA(ABS(LOW-BLV1),13,1)/MAX(SMA(MAX(LOW-BLV1,0),10,1),0.0001);
BLV3:=EMA(BLV2,10);
BLV4:=LLV(LOW,33);
BLV5:=EMA(IF(LOW<=BLV4,BLV3,0),3);
{进: 主力进场且强度达 60, 只在位置低于 70% 显示}
{实测 20 日超额: 低位 +1.20pp / 中位 +0.12pp / 高位 -2.25pp}
BLJIN:=BLV5>REF(BLV5,1) AND BLV5>=60 AND BLPOS<0.7;
{主力清洗卖侧 原版 13/10/33}
BLV21:=SMA(ABS(HIGH-BLV1),13,1)/MIN(SMA(MIN(HIGH-BLV1,0),10,1),-0.0001);
BLV31:=EMA(BLV21,10);
BLV41:=HHV(HIGH,33);
BLV51:=EMA(IF(HIGH>=BLV41,BLV31,0),3);
{拉: 高位且主力仍在拉高(强度达 60), 20 日超额 +0.56pp, 是冲顶中继不是卖点}
BLLG:=BLV51<REF(BLV51,1) AND -BLV51>=60 AND BLPOS>=0.7;
{VOLN 只撑纵轴量纲, 不画线}
VOLN:VOL,NODRAW;
{给标记留头部空间, 防文字被截}
BLTOPX:IF(BLRISK OR BLJIN OR BLLG,VOL*1.25,VOL),COLOR6E6E6E,NODRAW;
{两条参考线与柱同量纲, 不会压扁纵轴}
BLTU:BLR1*1.9,COLOR0000FF,DOTLINE;
BLTD:BLR1*0.85,COLOR00AA00,DOTLINE;
{基础柱: 中性灰打底}
STICKLINE(VOL>0,0,VOL,3.4,0),COLOR6E6E6E;
{四象上色: 后画覆盖前画, 条件天然互斥, 不用 NOT}
STICKLINE(BLDN AND BL3UP AND BLPU,0,VOL,3.4,0),COLOR00AA00;
STICKLINE(BLUP AND BLPU,0,VOL,3.4,0),COLOR00CCFF;
STICKLINE(BLUP AND BLPD,0,VOL,3.4,0),COLORFF8800;
STICKLINE(BLWK AND BLPD,0,VOL,3.4,0),COLORC85078;
{四个标记错层显示, 互不遮挡}
BLDL:=VOL=LLV(VOL,60);
DRAWTEXT(BLDL,VOL*1.02,'地'),COLORFF8800;
DRAWTEXT(BLJIN,VOL*1.06,'进'),COLOR00AA00;
DRAWTEXT(BLRISK,VOL*1.12,'险'),COLOR0000FF;
DRAWTEXT(BLLG,VOL*1.18,'拉'),COLORAA00AA;
{位置标签: 同一颜色在高位低位意思相反, 先看这一行}
DRAWTEXT_FIX(BLPOS>=0.7,0.01,0.07,0,'位置 高位'),COLOR0000FF;
DRAWTEXT_FIX(BLPOS>=0.3 AND BLPOS<0.7,0.01,0.07,0,'位置 中位'),COLORAAAAAA;
DRAWTEXT_FIX(BLPOS<0.3,0.01,0.07,0,'位置 低位'),COLOR00AA00;
DRAWTEXT_FIX(1,0.01,0.01,0,'绿=缩量上涨 黄=放量阳 蓝=放量阴 紫=缩量下跌 地=地量 进=主力进场 拉=高位仍拉高 险=高位涨停放量'),COLORAAAAAA;