{四象量能 V7.1 通达信副图 2026-11-08} {改动1: 金黄改为放量/倍量柱色(VOL>=1.9倍, 双向), 不再区分涨跌; 蓝(极端放量阴)随之取消, 已由金黄覆盖} {改动2: 撤掉全部价格护栏。实测"低价更好"是价格分位本身的溢价(最便宜20%无条件+2.86%), 且效力集中在2020年后, 写进公式属于重复计数} {改动3: 金黄只作柱色不作信号。放量1.9倍在各价格档的超额 -2.41 到 +0.23, 无预测力} 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; BLPU:=CLOSE>REF(CLOSE,1); BLFANG:=VOL>=BLR1*1.9; BLW3:=VOL>=BLR1*3; BLZT:=IF(CODELIKE('30') OR CODELIKE('68'),BLST>=0.19,BLST>=0.095); BLDI60:=VOL=LLV(VOL,60) AND REF(LLV(VOL,59),1)>VOL; {吸货链} BLV2A:=SMA(ABS(LOW-REF(LOW,1)),3,1); BLV2M:=SMA(MAX(LOW-REF(LOW,1),0),3,1); BLV2C:=BLV2A/MAX(BLV2M,0.0001)*100; BLV3C:=10*EMA(BLV2C,3); BLXIH:=EMA(IF(LOW<=LLV(LOW,38),(BLV3C+HHV(BLV3C,38)*2)/2,0),3)/618; {拉高链} BLV2H:=SMA(ABS(HIGH-REF(HIGH,1)),3,1)/MIN(SMA(MIN(HIGH-REF(HIGH,1),0),3,1),-0.0001)*100; BLV3H:=10*EMA(BLV2H,3); BLV7H:=EMA(IF(HIGH>=HHV(HIGH,38),(BLV3H+LLV(BLV3H,38)*2)/2,0),3)/618; {柱色 4 档} BLGREEN:=BLPOS<35 AND BLWIN<10; BLRED:=BLPOS>80 AND BLWIN>30; {字 7 个} BLDI:=BLDI60 AND BLPOS<35; BLSUO:=BLDI60 AND BLPOS>70; BLBAO:=BLW3 AND NOT(BLPU) AND BLPOS<35 AND BLWIN<10; BLRAN:=REF(BLBAO,1) AND BLST>=0.05; BLXI:=BLXIH>REF(BLXIH,1) AND BLXIH>=50 AND BLPOS<70; BLLA:=BLV7H30; {读数} 成交:VOL,NODRAW; 位置:BLPOS,NODRAW; 筹码:BLWIN,NODRAW; 距本:BLDIST,NODRAW; {柱: 后画覆盖先画。金黄在下, 绿红在上} STICKLINE(VOL>0,0,VOL,2,0),COLOR555555; STICKLINE(BLFANG,0,VOL,2,0),COLOR00CCFF; STICKLINE(BLGREEN,0,VOL,2,0),COLOR00AA00; STICKLINE(BLRED,0,VOL,2,0),COLOR0000FF; {字} DRAWTEXT(BLDI,VOL*1.02,'地'),COLOR0088FF; DRAWTEXT(BLSUO,VOL*1.02,'缩'),COLOR00CCFF; DRAWTEXT(BLBAO,VOL*1.32,'爆'),COLOR00FFFF; DRAWTEXT(BLRAN,VOL*1.32,'燃'),COLOR0000FF; DRAWTEXT(BLXI,VOL*1.18,'吸'),COLOR00AA00; DRAWTEXT(BLLA,VOL*1.20,'拉'),COLORAA00AA; DRAWTEXT(BLXIAN,VOL*1.10,'险'),COLOR0000FF;