Generated by Answer me with HTML 0.5.10 · 2026-11-07 00:57 · ★ Star on GitHub

四象量能 v6 · 手机版三份公式

手机同花顺两版、手机通达信一版，都能直接复制粘贴

A

三份怎么选

公式 什么时候用 关键差别
手机同花顺 · 素版 手机同花顺，默认用它 用 WINNER/COST 算筹码：绿柱 +0.49、红柱 −1.47
手机同花顺 · 无筹码 装不上，或筹码读数为 0 / 全空 不用筹码函数：绿柱 +0.32、红柱 −0.52
手机通达信 · 素版 手机通达信 柱宽 2、涨停用 CODELIKE 分板
手机端会丢第 2 条及之后的输出线

所以三份都只留 1 条输出线「成交」。位置、筹码、距本改成最后一根 K 线上的三行文字。

B

手机同花顺 · 素版

粘到：公式管理 → 技术指标 → 新建 → 名称「四象量能」→ 画线方法选副图 → 保存。

mobile_THS_v6.txttext
成交:VOL,NODRAW;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);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;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(ISLASTBAR,VOL*2.7,IF(BLPOS>=70,'位置高',IF(BLPOS>=35,'位置中','位置低'))),COLOR8FD600;DRAWTEXT(ISLASTBAR,VOL*2.4,IF(BLWIN>30,'筹码高',IF(BLWIN>10,'筹码中','筹码低'))),COLOR8FD600;DRAWTEXT(ISLASTBAR,VOL*2.1,IF(BLDIST>0,'成本上方','成本下方')),COLOR8FD600;
C

手机同花顺 · 无筹码版

只在上面那份装不上时用。它把「获利盘」这个维度去掉了，绿柱与红柱的力度都会变弱，别默认用它。

mobile_THS_v6_nochip.txttext
成交:VOL,NODRAW;BLPOS:=IF(HHV(HIGH,250)>LLV(LOW,250),(CLOSE-LLV(LOW,250))/(HHV(HIGH,250)-LLV(LOW,250))*100,50);BLWIN:=BLPOS;BLDIST:=CLOSE/MA(CLOSE,60)*100-100;BLR1:=REF(VOL,1);BLST:=CLOSE/REF(CLOSE,1)-1;BLDWN:=CLOSE<=REF(CLOSE,1);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;BLRED:=BLPOS>80;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;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;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(ISLASTBAR,VOL*2.7,IF(BLPOS>=70,'位置高',IF(BLPOS>=35,'位置中','位置低'))),COLOR8FD600;DRAWTEXT(ISLASTBAR,VOL*2.4,IF(CLOSE>MA(CLOSE,60),'均线上','均线下')),COLOR8FD600;DRAWTEXT(ISLASTBAR,VOL*2.1,IF(BLDIST>0,'成本上方','成本下方')),COLOR8FD600;
D

手机通达信 · 素版

粘到：公式管理器 → 技术指标 → 新建 → 名称「四象量能」→ 副图。

mobile_TDX_v6.txttext
成交:VOL,NODRAW;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);BLZT:=IF(CODELIKE('30') OR CODELIKE('68'),BLST>=0.19,BLST>=0.095);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;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,'地'),COLORFF8800;DRAWTEXT(BLSUO,VOL*1.02,'缩'),COLOR00CCFF;DRAWTEXT(BLWEN,VOL*1.10,'温'),COLOR00AA00;DRAWTEXT(BLBAO,VOL*1.32,'爆'),COLOR00CCFF;DRAWTEXT(BLRAN,VOL*1.32,'燃'),COLOR0000FF;DRAWTEXT(BLXIE,VOL*1.42,'泄'),COLOR7850C8;DRAWTEXT(BLXIAN,VOL*1.10,'险'),COLOR0000FF;DRAWTEXT(BLLA,VOL*1.20,'拉'),COLOR7850C8;DRAWTEXT(BLXI,VOL*1.18,'吸'),COLOR00AA00;DRAWTEXT(ISLASTBAR,VOL*2.7,IF(BLPOS>=70,'位置高',IF(BLPOS>=35,'位置中','位置低'))),COLOR00AA00;DRAWTEXT(ISLASTBAR,VOL*2.4,IF(BLWIN>30,'筹码高',IF(BLWIN>10,'筹码中','筹码低'))),COLOR00AA00;DRAWTEXT(ISLASTBAR,VOL*2.1,IF(BLDIST>0,'成本上方','成本下方')),COLOR00AA00;
E

手机上改粗细与字高

  • 柱子太细：把 STICKLINE(...,6,0) 里的 6 调大（同花顺标准间距约 10、通达信约 4，同花顺侧 6 是偏粗一档）。
  • 字压在柱子上：把 VOL*1.32、VOL*1.42 这两档乘 1.2，别动 VOL*1.02 那批贴柱的。
  • 末行文字挤在右边：把最后三条 DRAWTEXT 里的 VOL*2.7 / 2.4 / 2.1 一起调高或调低。