通达信〖全幅资金筹码动能〗告别多窗口繁琐切换实时捕捉大单成交动向源码

专为A股短线与波段操作设计的通达信副图工具,告别多窗口繁琐切换,在单一界面内便可完成三项核心监控:
- 实时捕捉大单成交动向;
- 衡量多头与空头的实际力量对比;
- 追踪流通筹码的增减趋势。
该指标全面兼容通达信手机版与电脑版,以动态量比区分大单与中小单的交易方向,再通过价格加权算法还原市场的真实多空力度,并结合持仓成本分布推测筹码的变化趋势。图面以红、绿、黄等彩色柱线标明多头、空头、拐头及强势状态,同时提供峰值放量参考线,帮助使用者快速判断主力资金的进出强度。
本指标全部代码不含未来函数,信号稳定不跳变,也无需在不同副图中反复比对。无论是盘后复盘还是盘中扫股,都能高效锁定资金出现异动的对象,是短线识别主力行为、捕捉低吸机会的得力助手。
---
如需加入原指标名称或其他细节,可再补充说明。
 



PEAKVOL:=CONST(IF(V=HHV(V,30),V,REF(V,BARSLAST(V=HHV(V,30))))),COLOR00FF00,POINTDOT;

SINGLEBASE:=(VOL/CLOSE)/3;

BUYSMALLLOW:=SUM((IF(((SINGLEBASE>60) AND C< 15 AND C>REF(C,1)),SINGLEBASE,0)),1);

BUYBIGHIGH:=SUM((IF(((SINGLEBASE>20) AND C>15 AND C>REF(C,1)),SINGLEBASE,0)),1);

BUYTOTAL:(BUYSMALLLOW+BUYBIGHIGH),NODRAW;

SELLSMALLLOW:=SUM((IF(((SINGLEBASE>60) AND C< 15 AND C< REF(C,1)),SINGLEBASE,0)),1);

SELLBIGHIGH:=SUM((IF(((SINGLEBASE>20) AND C>15 AND C< REF(C,1)),SINGLEBASE,0)),1);

SELLTOTAL:(SELLSMALLLOW+SELLBIGHIGH),NODRAW;

NETFLOW:=IF(FINANCE(7)< 5000000000,(BUYTOTAL-SELLTOTAL)/10,0),COLORYELLOW,NODRAW;

STICKLINE(BUYTOTAL ,PEAKVOL+BUYTOTAL*4,PEAKVOL,2,0),COLORRED;

STICKLINE(SELLTOTAL ,PEAKVOL-SELLTOTAL*4,PEAKVOL,2,0),COLORGREEN;

STICKLINE(NETFLOW ,PEAKVOL+NETFLOW*4,PEAKVOL,2,0),COLORYELLOW;

MIDLINE:=PEAKVOL*0.5;

PRICEWEIGHT:=(2*CLOSE+OPEN+HIGH+LOW)*10000;

POWERINDEX:PRICEWEIGHT/EMA(PRICEWEIGHT,4)-1,COLORSTICK,NODRAW;

POWERMAG:=POWERINDEX*800000;

PROFITLINE:STICKLINE(POWERMAG< REF(POWERMAG,1)AND POWERMAG>0,MIDLINE,MIDLINE+POWERMAG,2,0),COLOR33DFDD;

SHORTLINE:STICKLINE(POWERMAG< REF(POWERMAG,1)AND POWERMAG< 0,MIDLINE,MIDLINE+POWERMAG,2,0),COLOR00DD00;

COVERLINE:STICKLINE(POWERMAG>REF(POWERMAG,1)AND POWERMAG< 0,MIDLINE,MIDLINE+POWERMAG,2,0),COLORFFAA00;

LONGLINE:STICKLINE(POWERMAG>REF(POWERMAG,1)AND POWERMAG>0,MIDLINE,MIDLINE+POWERMAG,2,0),COLOR0000DD;

DRAWTEXT_FIX(1,0.980,20,1,', '),COLOR333333;

ZBGS10:=IF(BARSCOUNT(C)>60 AND DYNAINFO(4)>0,POWERMAG=HHV(ABS(POWERMAG),10),0);

ZBGS20:=IF(BARSCOUNT(C)>60 AND DYNAINFO(4)>0,POWERMAG=HHV(ABS(POWERMAG),20),0);

ZBGS30:=IF(BARSCOUNT(C)>60 AND DYNAINFO(4)>0,POWERMAG=HHV(ABS(POWERMAG),30),0);

ZBGS50:=IF(BARSCOUNT(C)>60 AND DYNAINFO(4)>0,POWERMAG=HHV(ABS(POWERMAG),50),0);

ZBGS80:=IF(BARSCOUNT(C)>60 AND DYNAINFO(4)>0,POWERMAG=HHV(ABS(POWERMAG),80),0);

POWERSCORE:(ZBGS10+ZBGS20+ZBGS30+ZBGS50+ZBGS80)/50,LINETHICK,NODRAW;

SUPERPOWER:STICKLINE(ZBGS80,MIDLINE,MIDLINE+POWERMAG,2,0),COLORMAGENTA;

LOWVOL:=PEAKVOL*0.1;

AVGPRICE:=(2*O+H+L+3*C)/7;

CAPBASE:=CAPITAL*AVGPRICE/10;

AVGAMT:=SMA(AMOUNT,10,1)/1000;

MAPRICE:=MA(C*3,5);

CAMT:=AVGAMT*C*3/MAPRICE*1/10;

OAMT:=AVGAMT*O*3/MAPRICE*1/10;

HAMT:=AVGAMT*H*3/MAPRICE*1/10;

LAMT:=AVGAMT*L*3/MAPRICE*1/10;

BALANCECOEF:=(2*OAMT+HAMT+LAMT+3*CAMT)/7;

SMOOTHCAP:=DMA(EMA(CAMT,2),SUM(V,1)*BALANCECOEF);

CAPTREND:=EMA(SMOOTHCAP,2);

TRENDUP:=SMOOTHCAP>CAPTREND;

CAPDIFF:=EMA(CAPBASE-SMOOTHCAP,1);

PREDIFF:=REF(CAPDIFF,1);

DIFFUP:=CAPDIFF>PREDIFF;

YANGCONFIRM:=DIFFUP AND C>O;

DIFFRANGE:=(CAPDIFF-PREDIFF)*0.15;

网:=(SMOOTHCAP-CAPTREND)*150;

REVRANGE:=(PREDIFF-CAPDIFF)*(-1);

INCRANGE:=IF(CAPDIFF>PREDIFF,DIFFRANGE,0);

DECRANGE:=IF(CAPDIFF< PREDIFF,DIFFRANGE,0);

REDRANGE:=IF(TRENDUP AND CAPDIFF< PREDIFF,DIFFRANGE,0);

STRONGRANGE:=IF(TRENDUP AND YANGCONFIRM,网/10,0);








未来函数检测结果
  • 该公式包含未来函数:PEAK
  • 该公式包含未来函数:CAPITAL
  • 该公式包含未来函数:DYNAINFO
  • 该公式包含未来函数:FINANCE



PEAKVOL赋值:如果成交量(手)=30日内成交量(手)的最高值,返回成交量(手),否则返回上次成交量(手)=30日内成交量(手)的最高值距今天数日前的成交量(手)的最后一日取值设为常数,COLOR00FF00,POINTDOT
SINGLEBASE赋值:(成交量(手)/收盘价)/3
BUYSMALLLOW赋值:(如果((SINGLEBASE>60)ANDC<15ANDC>1日前的收盘价),返回SINGLEBASE,否则返回0)的1日累和
BUYBIGHIGH赋值:(如果((SINGLEBASE>20)ANDC>15ANDC>1日前的收盘价),返回SINGLEBASE,否则返回0)的1日累和
输出BUYTOTAL:(BUYSMALLLOW+BUYBIGHIGH),NODRAW
SELLSMALLLOW赋值:(如果((SINGLEBASE>60)ANDC<15ANDC<1日前的收盘价),返回SINGLEBASE,否则返回0)的1日累和
SELLBIGHIGH赋值:(如果((SINGLEBASE>20)ANDC>15ANDC<1日前的收盘价),返回SINGLEBASE,否则返回0)的1日累和
输出SELLTOTAL:(SELLSMALLLOW+SELLBIGHIGH),NODRAW
NETFLOW赋值:如果流通股本(股)<5000000000,返回(BUYTOTAL-SELLTOTAL)/10,否则返回0,画黄色,NODRAW
当满足条件BUYTOTAL时,在PEAKVOL+BUYTOTAL*4和PEAKVOL位置之间画柱状线,宽度为2,0不为0则画空心柱.,画红色
当满足条件SELLTOTAL时,在PEAKVOL-SELLTOTAL*4和PEAKVOL位置之间画柱状线,宽度为2,0不为0则画空心柱.,画绿色
当满足条件NETFLOW时,在PEAKVOL+NETFLOW*4和PEAKVOL位置之间画柱状线,宽度为2,0不为0则画空心柱.,画黄色
MIDLINE赋值:PEAKVOL*0.5
PRICEWEIGHT赋值:(2*收盘价+开盘价+最高价+最低价)*10000
输出POWERINDEX:PRICEWEIGHT/PRICEWEIGHT的4日指数移动平均-1,COLORSTICK,NODRAW
POWERMAG赋值:POWERINDEX*800000
输出PROFITLINE:当满足条件POWERMAG<1日前的POWERMAGANDPOWERMAG>0时,在MIDLINE和MIDLINE+POWERMAG位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR33DFDD
输出SHORTLINE:当满足条件POWERMAG<1日前的POWERMAGANDPOWERMAG<0时,在MIDLINE和MIDLINE+POWERMAG位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR00DD00
输出COVERLINE:当满足条件POWERMAG>1日前的POWERMAGANDPOWERMAG<0时,在MIDLINE和MIDLINE+POWERMAG位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORFFAA00
输出LONGLINE:当满足条件POWERMAG>1日前的POWERMAGANDPOWERMAG>0时,在MIDLINE和MIDLINE+POWERMAG位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR0000DD
当满足条件1时,在横轴0.980纵轴20位置书写文字,COLOR333333
ZBGS10赋值:如果收盘价的有效数据周期数>60ANDDYNAINFO(4)>0,返回POWERMAG=10日内POWERMAG的绝对值的最高值,否则返回0
ZBGS20赋值:如果收盘价的有效数据周期数>60ANDDYNAINFO(4)>0,返回POWERMAG=20日内POWERMAG的绝对值的最高值,否则返回0
ZBGS30赋值:如果收盘价的有效数据周期数>60ANDDYNAINFO(4)>0,返回POWERMAG=30日内POWERMAG的绝对值的最高值,否则返回0
ZBGS50赋值:如果收盘价的有效数据周期数>60ANDDYNAINFO(4)>0,返回POWERMAG=50日内POWERMAG的绝对值的最高值,否则返回0
ZBGS80赋值:如果收盘价的有效数据周期数>60ANDDYNAINFO(4)>0,返回POWERMAG=80日内POWERMAG的绝对值的最高值,否则返回0
输出POWERSCORE:(ZBGS10+ZBGS20+ZBGS30+ZBGS50+ZBGS80)/50,线宽为0,NODRAW
输出SUPERPOWER:当满足条件ZBGS80时,在MIDLINE和MIDLINE+POWERMAG位置之间画柱状线,宽度为2,0不为0则画空心柱.,画洋红色
LOWVOL赋值:PEAKVOL*0.1
AVGPRICE赋值:(2*开盘价+最高价+最低价+3*收盘价)/7
CAPBASE赋值:当前流通股本(手)*AVGPRICE/10
AVGAMT赋值:成交额(元)的10日[1日权重]移动平均/1000
MAPRICE赋值:收盘价*3的5日简单移动平均
CAMT赋值:AVGAMT*收盘价*3/MAPRICE*1/10
OAMT赋值:AVGAMT*开盘价*3/MAPRICE*1/10
HAMT赋值:AVGAMT*最高价*3/MAPRICE*1/10
LAMT赋值:AVGAMT*最低价*3/MAPRICE*1/10
BALANCECOEF赋值:(2*OAMT+HAMT+LAMT+3*CAMT)/7
SMOOTHCAP赋值:以成交量(手)的1日累和*BALANCECOEF为权重CAMT的2日指数移动平均的动态移动平均
CAPTREND赋值:SMOOTHCAP的2日指数移动平均
TRENDUP赋值:SMOOTHCAP>CAPTREND
CAPDIFF赋值:CAPBASE-SMOOTHCAP的1日指数移动平均
PREDIFF赋值:1日前的CAPDIFF
DIFFUP赋值:CAPDIFF>PREDIFF
YANGCONFIRM赋值:DIFFUP AND 收阳线
DIFFRANGE赋值:(CAPDIFF-PREDIFF)*0.15
网赋值:(SMOOTHCAP-CAPTREND)*150
REVRANGE赋值:(PREDIFF-CAPDIFF)*(-1)
INCRANGE赋值:如果CAPDIFF>PREDIFF,返回DIFFRANGE,否则返回0
DECRANGE赋值:如果CAPDIFFREDRANGE赋值:如果TRENDUPANDCAPDIFFSTRONGRANGE赋值:如果TRENDUPANDYANGCONFIRM,返回网/10,否则返回0
输出INCNUM:INCRANGE/100,NODRAW,画红色
输出DECNUM:DECRANGE/100,NO....
联系我们
  • QQ:88652583
  • 邮箱:88652583@qq.com
  • 工作时间:7:30-21:00
  • 微信:88652583或扫描如下二维码
公式网微信联系方式
月度排行
季度排行
半年排行


指标安装下载帮助  -   联系我们  -  乐淘公式网  -  公式网   -  指标公式  -   免责声明  -   隐私政策  -   加入收藏   

广州拓浪网络科技有限公司 @2017-2026 粤ICP备2025457605号-2 乐淘公式网公式网均来源互联网收集整理,如不慎侵犯了你的权益,请联系我们告知,我们将做删除处理
免责声明:乐淘公式网所有指标公式及文章由网络收集,不保障实时性和真实性, 仅供学习研究并不构成投资建议,请勿以此为依据进行股票交易,由此引起的投资亏损与本站无关。
QQ:88652583 微信 88652583
sitemap站点地图