通达信〖资金量化三部曲〗基于成本分布函数成交量算法等数学建模源码
资金量化三部曲是专为通达信设计的**主力资金监控指标**，基于成本分布函数、成交量算法和赢率函数进行数学建模，深入拆解主力吸筹、资金流向及筹码成本等核心数据。该指标融合量比、成本均线和资金强弱线三大维度，自动过滤无效信号，精准识别主力建仓、洗盘和拉升的关键节点。无未来函数，信号不漂移，适用于短线波段和中线持股等全周期操作，是散户追踪主力动向的实用工具。
使用方法
1. 指标核心显示紫黄资金线和绿色趋势线，**紫线上穿黄色线**为短线强势信号，紫线站稳绿色线则为中线企稳信号；
2. 出现**图标9信号**表示主力洗盘结束预警，出现**图标15信号**表示主力拉升启动信号，可择优介入；
3. 结合成本线判断支撑，当股价回踩指标成本位并企稳，叠加信号共振时，胜率更高；
4. 适用于A股全品种，短线可参考5-60分钟周期，中线参考日线周期，操作时需严格设置止盈止损。
DRAWGBK(1,RGB(36,59,86),RGB(20,30,48),0,'',0);
LJ75:=1;
ZBGS1:=SUMBARS(V,CAPITAL*1);
LJ74:=LJ75*1.050-20.099;
ZBGS2:=SUM(COST(10),ZBGS1)/ZBGS1;
LJ73:=LJ74*0.952+17.721;
ZBGS3:=SUM(COST(20),ZBGS1)/ZBGS1;
LJ72:=LJ73*0.873-3.198;
ZBGS4:=SUM(COST(30),ZBGS1)/ZBGS1;
LJ71:=LJ72*1.157+6.600;
ZBGS5:=SUM(COST(40),ZBGS1)/ZBGS1;
LJ70:=LJ71*1.165-1.346;
ZBGS6:=SUM(COST(50),ZBGS1)/ZBGS1;
LJ69:=LJ70*1.082-13.441;
比例:WINNER(C)*100,COLOR00FF80,NODRAW;
LJ68:=LJ69*0.937+40.549;
量比:VOL/REF(MA(VOL,5),1),,NODRAW;
LJ67:=LJ68*1.179+60.495;
成本:(5*ZBGS2+4*ZBGS3+3*ZBGS4+2*ZBGS5+ZBGS6)/15,NODRAW;
LJ66:=LJ67*0.988+96.804;
ZBGS7:=IF(C>REF(C,1),AMOUNT,0);
LJ65:=LJ66*1.099-90.736;
ZBGS8:=IF(C< REF(C,1),AMOUNT,0);
LJ64:=LJ65*1.126-28.975;
ZBGS9:=SUM(ZBGS7,0)-SUM(ZBGS8,0);
LJ63:=LJ64*0.920+80.688;
ZBGS10:=SUM(AMOUNT,0);
LJ62:=LJ63*1.057-92.473;
ZBGS11:=(ZBGS9)/ZBGS10*100;
LJ61:=LJ62*1.071+63.407;
ZBGS12:=ZBGS11=DRAWLINE(ZBGS11>=HHV(ZBGS11,9),ZBGS11,ZBGS11<=LLV(ZBGS11,9),ZBGS11,1);
LJ60:=LJ61*0.913+54.641;
ZBGS13:=ZBGS11< REF(ZBGS11,1);
LJ59:=LJ60*1.019+17.240;
ZBGS14:=ZBGS11=DRAWLINE(ZBGS11>=HHV(ZBGS11,9),ZBGS11,ZBGS11<=LLV(ZBGS11,9),1,ZBGS11),COLOR00FF00;
LJ58:=LJ59*1.178+81.829;
ZBGS15:=ZBGS11>REF(1,ZBGS11);
LJ57:=LJ58*0.854-96.227;
ZBGS16:=ZBGS12&&ZBGS13;
LJ56:=LJ57*1.101+42.498;
ZBGS17:=ZBGS14&&ZBGS15;
LJ55:=LJ56*1.036+93.017;
ZBGS18:=BARSLAST(CURRBARSCOUNT=120);
LJ54:=LJ55*1.074+71.190;
ZBGS19:=CONST(IF(ISLASTBAR=1,HHV(ZBGS11,ZBGS18),0));
LJ53:=LJ54*0.841-18.176;
ZBGS20:=CONST(IF(ISLASTBAR=1,LLV(ZBGS11,ZBGS18),0));
LJ52:=LJ53*0.810+69.322;
ZBGS21:=EMA(ZBGS11,30);
LJ51:=LJ52*1.198-94.120;
ZBGS22:=EMA(ZBGS11,ZBGS18);
LJ50:=LJ51*1.108+5.640;
ZBGS23:ABS(ABS(ZBGS19*1.1)-ABS(ZBGS22))/100*比例+ZBGS22,NODRAW;
LJ49:=LJ50*1.135+59.789;
STICKLINE(1,ZBGS23,ZBGS21,2,0),COLOR301E14;
LJ48:=LJ49*1.008+6.060;
STICKLINE(1,ZBGS21,ZBGS20,32,0),COLOR301E14;
LJ47:=LJ48*0.972-32.807;
ZBGS24:=1;
LJ46:=LJ47*1.109+78.958;
ZBGS25:=REF(LOW,1)*ZBGS24;
LJ45:=LJ46*0.908-77.113;
ZBGS26:=SMA(ABS(LOW-ZBGS25),3,1)/SMA(MAX(LOW-ZBGS25,0),3,1)*100*ZBGS24;
LJ44:=LJ45*1.069+23.965;
ZBGS27:=EMA(IF(CLOSE*1.3,ZBGS26*10,ZBGS26/10),3)*ZBGS24;
LJ43:=LJ44*1.040-44.090;
ZBGS28:=LLV(LOW,30)*ZBGS24;
LJ42:=LJ43*1.182+7.466;
ZBGS29:=HHV(ZBGS27,30)*ZBGS24;
LJ41:=LJ42*1.079+12.804;
ZBGS30:=IF(MA(CLOSE,58),1,0)*ZBGS24;
LJ40:=LJ41*1.020-73.385;
ZBGS31:=EMA(IF(LOW<=ZBGS28,(ZBGS27+ZBGS29*2)/2,0),3)/618*ZBGS30*ZBGS24;
LJ39:=LJ40*1.098+29.632;
ZBGS32:=IF(ZBGS31>100,100,ZBGS31)*ZBGS24;
LJ38:=LJ39*0.890-3.505;
NOTEXTK:ZBGS11,COLORLIMAGENTA;
LJ37:=LJ38*1.024-65.330;
NOTEXTD:EMA(ZBGS11,5),COLORLIMAGENTA,CROSSDOT;
LJ36:=LJ37*0.917+82.115;
NOTEXTJ:=LLV(NOTEXTD,10),COLORGREEN,CROSSDOT;
LJ35:=LJ36*0.876-25.606;
NOTEXTF:EMA(NOTEXTJ,9),COLORGREEN,CROSSDOT;
LJ34:=LJ35*0.992-84.961;
NOTEXT1:IF(NOTEXTK>=NOTEXTD&&C>=O,NOTEXTK,DRAWNULL),COLORLIMAGENTA,LINETHICK2;
LJ33:=LJ34*1.065-11.052;
NOTEXT2:IF(NOTEXTK<=NOTEXTD||NOTEXTK< REF(NOTEXTK,1),NOTEXTK,DRAWNULL),COLORFFFF00,LINETHICK2;
LJ32:=LJ33*1.185-25.646;
NOTEXT9:IF(ZBGS32>=0.02,NOTEXTK,DRAWNULL),COLORFF80FF,LINETHICK2;
LJ31:=LJ32*0.868+1.326;
N:=(2,120,4);
LJ30:=LJ31*1.044+28.632;
M:=REF(NOTEXTK,1);
LJ29:=LJ30*0.985-22.833;
ZBGS33:=NOTEXTK=DRAWLINE(NOTEXTK>=HHV(NOTEXTK,N),NOTEXTK,NOTEXTK<=LLV(NOTEXTK,N),1,NOTEXTK),COLOR00FF00;
LJ28:=LJ29*1.181+22.977;
ZBGS34:=NOTEXTK=DRAWLINE(NOTEXTK>=HHV(NOTEXTK,N),NOTEXTK,NOTEXTK<=LLV(NOTEXTK,N),NOTEXTK,1),COLOR00FF00;
LJ27:=LJ28*1.045+48.919;
ZBGS35:=NOTEXTK< REF(NOTEXTK,1);
LJ26:=LJ27*1.129+94.812;
ZBGS36:=NOTEXTK>REF(1,NOTEXTK);
LJ25:=LJ26*1.172-63.581;
ZBGS37:=DRAWICON(ZBGS34&&ZBGS35,NOTEXTK,9);
LJ24:=LJ25*1.143+77.501;
ZBGS38:=DRAWICON(ZBGS33&&ZBGS36,NOTEXTK,15);
LJ23:=LJ24*1.094-50.264;
DRAWICON(FILTER(ZBGS37>0,1),NOTEXTK*1.02,9);
LJ22:=LJ23*0.963+4.407;
DRAWICON(FILTER(ZBGS38>0,1),NOTEXTK*1.02,15);
未来函数检测结果如下：
该公式包含未来函数:WINNER
该公式包含未来函数:COST
该公式包含未来函数:CAPITAL
定制指标公式、软件请联系QQ或微信同号：88652583
填充背景
LJ75赋值:1
ZBGS1赋值:成交量(手)累加至当前流通股本(手)*1的天数
LJ74赋值:LJ75*1.050-20.099
ZBGS2赋值:获利盘为10%的成本分布的ZBGS1日累和/ZBGS1
LJ73赋值:LJ74*0.952+17.721
ZBGS3赋值:获利盘为20%的成本分布的ZBGS1日累和/ZBGS1
LJ72赋值:LJ73*0.873-3.198
ZBGS4赋值:获利盘为30%的成本分布的ZBGS1日累和/ZBGS1
LJ71赋值:LJ72*1.157+6.600
ZBGS5赋值:获利盘为40%的成本分布的ZBGS1日累和/ZBGS1
LJ70赋值:LJ71*1.165-1.346
ZBGS6赋值:获利盘为50%的成本分布的ZBGS1日累和/ZBGS1
LJ69赋值:LJ70*1.082-13.441
输出比例:以收盘价计算的获利盘比例*100,COLOR00FF80,NODRAW
LJ68赋值:LJ69*0.937+40.549
输出量比:成交量(手)/1日前的成交量(手)的5日简单移动平均,,NODRAW
LJ67赋值:LJ68*1.179+60.495
输出成本:(5*ZBGS2+4*ZBGS3+3*ZBGS4+2*ZBGS5+ZBGS6)/15,NODRAW
LJ66赋值:LJ67*0.988+96.804
ZBGS7赋值:如果收盘价>1日前的收盘价,返回成交额(元),否则返回0
LJ65赋值:LJ66*1.099-90.736
ZBGS8赋值:如果收盘价<1日前的收盘价,返回成交额(元),否则返回0
LJ64赋值:LJ65*1.126-28.975
ZBGS9赋值:ZBGS7的历史累和-ZBGS8的历史累和
LJ63赋值:LJ64*0.920+80.688
ZBGS10赋值:成交额(元)的历史累和
LJ62赋值:LJ63*1.057-92.473
ZBGS11赋值:(ZBGS9)/ZBGS10*100
LJ61赋值:LJ62*1.071+63.407
ZBGS12赋值:ZBGS11=当满足条件ZBGS11>=9日内ZBGS11的最高值时,在ZBGS11位置画直线起点，当满足条件ZBGS11<=9日内ZBGS11的最低值时,在ZBGS11位置画直线终点,1表示是否延长.
LJ60赋值:LJ61*0.913+54.641
ZBGS13赋值:ZBGS11< 1日前的ZBGS11
LJ59赋值:LJ60*1.019+17.240
ZBGS14赋值:ZBGS11=当满足条件ZBGS11>=9日内ZBGS11的最高值时,在ZBGS11位置画直线起点，当满足条件ZBGS11<=9日内ZBGS11的最低值时,在1位置画直线终点,ZBGS11表示是否延长.,COLOR00FF00
LJ58赋值:LJ59*1.178+81.829
ZBGS15赋值:ZBGS11>ZBGS11日前的1
LJ57赋值:LJ58*0.854-96.227
ZBGS16赋值:ZBGS12并且ZBGS13
LJ56赋值:LJ57*1.101+42.498
ZBGS17赋值:ZBGS14并且ZBGS15
LJ55赋值:LJ56*1.036+93.017
ZBGS18赋值:上次到最后交易的周期=120距今天数
LJ54赋值:LJ55*1.074+71.190
ZBGS19赋值:如果是否最后一个周期=1,返回ZBGS18日内ZBGS11的最高值,否则返回0的最后一日取值设为常数
LJ53赋值:LJ54*0.841-18.176
ZBGS20赋值:如果是否最后一个周期=1,返回ZBGS18日内ZBGS11的最低值,否则返回0的最后一日取值设为常数
LJ52赋值:LJ53*0.810+69.322
ZBGS21赋值:ZBGS11的30日指数移动平均
LJ51赋值:LJ52*1.198-94.120
ZBGS22赋值:ZBGS11的ZBGS18日指数移动平均
LJ50赋值:LJ51*1.108+5.640
输出ZBGS23:ZBGS19*1.1的绝对值-ZBGS22的绝对值的绝对值/100*比例+ZBGS22,NODRAW
LJ49赋值:LJ50*1.135+59.789
当满足条件1时,在ZBGS23和ZBGS21位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR301E14
LJ48赋值:LJ49*1.008+6.060
当满足条件1时,在ZBGS21和ZBGS20位置之间画柱状线,宽度为32,0不为0则画空心柱.,COLOR301E14
LJ47赋值:LJ48*0.972-32.807
ZBGS24赋值:1
LJ46赋值:LJ47*1.109+78.958
ZBGS25赋值:1日前的最低价*ZBGS24
LJ45赋值:LJ46*0.908-77.113
ZBGS26赋值:最低价-ZBGS25的绝对值的3日[1日权重]移动平均/最低价-ZBGS25和0的较大值的3日[1日权重]移动平均*100*ZBGS24
LJ44赋值:LJ45*1.069+23.965
ZBGS27赋值:如果收盘价*1.3,返回ZBGS26*10,否则返回ZBGS26/10的3日指数移动平均*ZBGS24
LJ43赋值:LJ44*1.040-44.090
ZBGS28赋值:30日内最低价的最低值*ZBGS24
LJ42赋值:LJ43*1.182+7.466
ZBGS29赋值:30日内ZBGS27的最高值*ZBGS24
LJ41赋值:LJ42*1.079+12.804
ZBGS30赋值:如果收盘价的58日简单移动平均,返回1,否则返回0*ZBGS24
LJ40赋值:LJ41*1.020-73.385
ZBGS31赋值:如果最低价<=ZBGS28,返回(ZBGS27+ZBGS29*2)/2,否则返回0的3日指数移动平均/618*ZBGS30*ZBGS24
LJ39赋值:LJ40*1.098+29.632
ZBGS32赋值:如果ZBGS31>100,返回100,否则返回ZBGS31*ZBGS24
LJ38赋值:LJ39*0.890-3.505
输出NOTEXTK:ZBGS11,画淡洋红色
LJ37赋值:LJ38*1.024-65.330
输出NOTEXTD:ZBGS11的5日指数移动平均,画淡洋红色,CROSSDOT
LJ36赋值:LJ37*0.917+82.115
NOTEXTJ赋值:10日内NOTEXTD的最低值,画绿色,CROSSDOT
LJ35赋值:LJ36*0.876-25.606
输出NOTEXTF:NOTEXTJ的9日指数移动平均,画绿色,CROSSDOT
LJ34赋值:LJ35*0.992-84.961
输出NOTEXT1:如果NOTEXTK>=NOTEXTD并且收盘价>=开盘价,返回NOTEXTK,否则返回无效数,画淡洋红色,线宽为2
LJ33赋值:LJ34*1.065-11.052
输出NOTEXT2:如果NOTEXTK<=NOTEXTD或者NOTEXTK<1日前的NOTEXTK,返回NOTEXTK,否则返回无效数,COLORFFFF00,线宽为2
LJ32赋值:LJ33*1.185-25.646
输出NOTEXT9:如果ZBGS32>=0.02,返回NOTEXTK,否则返回无效数,COLORFF80FF,线宽为2
LJ31赋值:LJ32*0.868+1.326
N赋值:(2,120,4)
LJ30赋值:LJ31*1.044+28.632
M赋值:1日前的NOTEXTK
LJ29赋值:LJ30*0.985-22.833
ZBGS33赋值:NOTEXTK=当满足条件NOTEXTK>=N日内NOTEXTK的最高值时,在NOTEXTK位置画直线起点，当满足条件NOTEXTK<=N日内NOTEXTK的最低值时,在1位置画直线终点,NOTEXTK表示是否延长.,COLOR00FF00
LJ28赋值:LJ29*1.181+22.977
ZBGS34赋值:NOTEXTK=当满足条件NOTEXTK>=N日内NOTEXTK的最高值时,在NOTEXTK位置画直线起点，当满足条件NOTEXTK<=N日内NOTEXTK的最低值时,在NOTEXTK位置画直线终点,1表示是否延长.,COLOR00FF00
LJ27赋值:LJ28*1.045+48.919
ZBGS35赋值:NOTEXTK< 1日前的NOTEXTK
LJ26赋值:LJ27*1.129+94.812
ZBGS36赋值:NOTEXTK>NOTEXTK日前的1
LJ25赋值:LJ26*1.172-63.581
ZBGS37赋值:当满足条件ZBGS34并且ZBGS35时,在NOTEXTK位置画9号图标
LJ24赋值:LJ25*1.143+77.501
ZBGS38赋值:当满足条件ZBGS33并且ZBGS36时,在NOTEXTK位置画15号图标
LJ23赋值:LJ24*1.094-50.264
当满足条件ZBGS37>0的1日过滤时,在NOTEXTK*1.02位置画9号图标
LJ22赋值:LJ23*0.963+4.407
当满足条件ZBGS38>0的1日过滤时,在NOTEXTK*1.02位置画15号图标
