通达信〖多空博弈筹码〗量化分析多空双方的博弈力清晰刻画强弱格局源码
该指标融合了趋势动能、资金流向、价格弹性以及均线排列等多个维度的市场数据，通过量化分析多空双方的博弈力量，清晰刻画市场的强弱格局，并精准定位趋势逆转及极端情绪下的买卖节点。它不仅是一套多空博弈与趋势跟踪的综合工具，更在操作层面提供了明确的信号指引：当博弈力量从低位区间由弱转强时，可视为短线入场时机，若此时出现底背离信号，则做多信号的可靠性进一步增强；相反，当博弈力量从高位区间由强转弱时，触发短线离场信号，若伴随顶背离，则更需果断减仓。此外，一旦博弈力量达到极端强势或弱势的状态，投资者应警惕趋势可能即将反转的风险。
FAST:=12;
SLOW:=26;
MID:=9;
VOLPERIOD:=20;
MONEYPERIOD:=10;
DIFF:=EMA(CLOSE,FAST)-EMA(CLOSE,SLOW);
DEA:=EMA(DIFF,MID);
MACDVAL:=2*(DIFF-DEA);
MACDSTK:=MACDVAL>0 AND MACDVAL>REF(MACDVAL,1);
MACDWEAK:=MACDVAL>0 AND MACDVAL< REF(MACDVAL,1);
MACDGREEN:=MACDVAL< 0 AND MACDVAL< REF(MACDVAL,1);
MACDREV:=MACDVAL< 0 AND MACDVAL>REF(MACDVAL,1);
HIGH20:=HHV(HIGH,20);
LOW20:=LLV(LOW,20);
MID20:=(HIGH20+LOW20)/2;
PRICEPOS:=(CLOSE-LOW20)/(HIGH20-LOW20+0.0001)*100;
VOLCONCENTRATE:=MA(VOL,5)/MA(VOL,60);
CHIPCONCENTRATE:=VOLCONCENTRATE< 0.6 AND PRICEPOS>40 AND PRICEPOS< 60;
TYPICAL:= (HIGH+LOW+CLOSE)/3;
MONEYFLOW:=TYPICAL*VOL;
POSFLOW:=IF(CLOSE>REF(CLOSE,1),MONEYFLOW,0);
NEGFLOW:=IF(CLOSE< REF(CLOSE,1),MONEYFLOW,0);
NETFLOW:=SUM(POSFLOW,MONEYPERIOD)-SUM(NEGFLOW,MONEYPERIOD);
RELNETFLOW:=NETFLOW/(SUM(MONEYFLOW,MONEYPERIOD)+0.0001)*100;
MONEYTREND:=MA(RELNETFLOW,5);
UPSTRENGTH:=SUM(IF(CLOSE>REF(CLOSE,1),CLOSE-REF(CLOSE,1),0),10);
DOWNSTRENGTH:=SUM(IF(CLOSE< REF(CLOSE,1),REF(CLOSE,1)-CLOSE,0),10);
ELASTICITY:=IF(DOWNSTRENGTH>0,UPSTRENGTH/DOWNSTRENGTH,UPSTRENGTH);
ELASTICITYMA:=MA(ELASTICITY,10);
BULLELASTIC:=ELASTICITY>ELASTICITYMA AND ELASTICITY>1.2;
SHORTUP:=CLOSE>MA(CLOSE,5);
MIDUP:=CLOSE>MA(CLOSE,20);
LONGUP:=CLOSE>MA(CLOSE,60);
BREADTH:=SHORTUP+MIDUP+LONGUP;
BULLFACTOR:= IF(MACDSTK,3,IF(MACDWEAK,1,0))+ IF(DIFF>DEA,2,0)+ IF(CLOSE>MA(CLOSE,20),2,0)+ IF(RELNETFLOW>0,2,IF(RELNETFLOW>REF(RELNETFLOW,1),1,0))+ IF(BULLELASTIC,2,0)+ IF(BREADTH>=2,1,0);
BEARFACTOR:= IF(MACDGREEN,3,IF(MACDREV,1,0))+ IF(DIFF< DEA,2,0)+ IF(CLOSE< MA(CLOSE,20),2,0)+ IF(RELNETFLOW< 0,2,IF(RELNETFLOW< REF(RELNETFLOW,1),1,0))+ IF(ELASTICITY< 0.8,2,0)+ IF(BREADTH<=1,1,0);
GAMEVALUE:=BULLFACTOR-BEARFACTOR;
GAMESIG:=EMA(GAMEVALUE,3);
HHPRICE:=HHV(CLOSE,20);
HHGAME:=HHV(GAMEVALUE,20);
TOPDIVERGE:=CLOSE>=HHPRICE AND GAMEVALUE< HHGAME*0.8 AND GAMEVALUE>0;
LLPRICE:=LLV(CLOSE,20);
LLGAME:=LLV(GAMEVALUE,20);
BOTTOMDIVERGE:=CLOSE<=LLPRICE AND GAMEVALUE>LLGAME*1.2 AND GAMEVALUE< 0;
BULLEXTREME:=GAMEVALUE>10 AND GAMEVALUE>REF(GAMEVALUE,1);
BEAREXTREME:=GAMEVALUE< -10 AND GAMEVALUE< REF(GAMEVALUE,1);
TURNBUY:=CROSS(GAMEVALUE,GAMESIG) AND GAMEVALUE< 0 AND GAMEVALUE>-6;
TURNSELL:=CROSS(GAMESIG,GAMEVALUE) AND GAMEVALUE>0 AND GAMEVALUE< 6;
STICKLINE(GAMEVALUE>=0,0,GAMEVALUE,2.5,0),COLOR0000CC;
STICKLINE(GAMEVALUE>=0,0,GAMEVALUE,1.5,0),COLOR0000FF;
STICKLINE(GAMEVALUE>=0,0,GAMEVALUE,0.5,0),COLOR6666FF;
STICKLINE(GAMEVALUE< 0,0,GAMEVALUE,2.5,0),COLOR00AA00;
STICKLINE(GAMEVALUE< 0,0,GAMEVALUE,1.5,0),COLOR00CC00;
STICKLINE(GAMEVALUE< 0,0,GAMEVALUE,0.5,0),COLOR66FF66;
GAMESIG,COLORWHITE,LINETHICK1;
0,COLORGRAY,DOTLINE;
8,COLORRED,DOTLINE;
-8,COLORGREEN,DOTLINE;
12,COLORMAGENTA,DOTLINE;
-12,COLORCYAN,DOTLINE;
DRAWICON(TURNBUY AND GAMEVALUE>-5,GAMEVALUE-0.5,1);
DRAWICON(BOTTOMDIVERGE,GAMEVALUE-0.5,1);
DRAWICON(TURNSELL AND GAMEVALUE< 5,GAMEVALUE+0.5,2);
DRAWICON(TOPDIVERGE,GAMEVALUE+0.5,2);
DRAWTEXT(TURNBUY AND GAMEVALUE>-5,GAMEVALUE-1.5,'买'),COLORYELLOW;
DRAWTEXT(BOTTOMDIVERGE,GAMEVALUE-1.5,'底背'),COLORRED;
DRAWTEXT(TURNSELL AND GAMEVALUE< 5,GAMEVALUE+1.5,'卖'),COLORGREEN;
DRAWTEXT(TOPDIVERGE,GAMEVALUE+1.5,'顶背'),COLORWHITE;
DRAWTEXT(CHIPCONCENTRATE,GAMEVALUE-2,'筹'),COLORMAGENTA;
STICKLINE(GAMEVALUE>10,GAMEVALUE,10,3,0),COLORMAGENTA;
STICKLINE(GAMEVALUE< -10,GAMEVALUE,-10,3,0),COLORCYAN;
未来函数检测结果如下：
该公式没有未来函数
定制指标公式、软件请联系QQ或微信同号：88652583
FAST赋值:12
SLOW赋值:26
MID赋值:9
VOLPERIOD赋值:20
MONEYPERIOD赋值:10
DIFF赋值:收盘价的FAST日指数移动平均-收盘价的SLOW日指数移动平均
DEA赋值:DIFF的MID日指数移动平均
MACDVAL赋值:2*(DIFF-DEA)
MACDSTK赋值:MACDVAL>0 AND MACDVAL>1日前的MACDVAL
MACDWEAK赋值:MACDVAL>0 AND MACDVAL< 1日前的MACDVAL
MACDGREEN赋值:MACDVAL< 0 AND MACDVAL< 1日前的MACDVAL
MACDREV赋值:MACDVAL< 0 AND MACDVAL>1日前的MACDVAL
HIGH20赋值:20日内最高价的最高值
LOW20赋值:20日内最低价的最低值
MID20赋值:(HIGH20+LOW20)/2
PRICEPOS赋值:(收盘价-LOW20)/(HIGH20-LOW20+0.0001)*100
VOLCONCENTRATE赋值:成交量(手)的5日简单移动平均/成交量(手)的60日简单移动平均
赋值:VOLCONCENTRATE< 0.6 AND PRICEPOS>40 AND PRICEPOS< 60
TYPICAL赋值: (最高价+最低价+收盘价)/3
MONEYFLOW赋值:TYPICAL*成交量(手)
POSFLOW赋值:如果收盘价>1日前的收盘价,返回MONEYFLOW,否则返回0
NEGFLOW赋值:如果收盘价<1日前的收盘价,返回MONEYFLOW,否则返回0
NETFLOW赋值:POSFLOW的MONEYPERIOD日累和-NEGFLOW的MONEYPERIOD日累和
RELNETFLOW赋值:NETFLOW/(MONEYFLOW的MONEYPERIOD日累和+0.0001)*100
MONEYTREND赋值:RELNETFLOW的5日简单移动平均
UPSTRENGTH赋值:如果收盘价>1日前的收盘价,返回收盘价-1日前的收盘价,否则返回0的10日累和
DOWNSTRENGTH赋值:如果收盘价<1日前的收盘价,返回1日前的收盘价-收盘价,否则返回0的10日累和
ELASTICITY赋值:如果DOWNSTRENGTH>0,返回UPSTRENGTH/DOWNSTRENGTH,否则返回UPSTRENGTH
ELASTICITYMA赋值:ELASTICITY的10日简单移动平均
BULLELASTIC赋值:ELASTICITY>ELASTICITYMA AND ELASTICITY>1.2
SHORTUP赋值:收盘价>收盘价的5日简单移动平均
MIDUP赋值:收盘价>收盘价的20日简单移动平均
LONGUP赋值:收盘价>收盘价的60日简单移动平均
BREADTH赋值:SHORTUP+MIDUP+LONGUP
BULLFACTOR赋值: 如果MACDSTK,返回3,否则返回如果MACDWEAK,返回1,否则返回0+ 如果DIFF>DEA,返回2,否则返回0+ 如果收盘价>收盘价的20日简单移动平均,返回2,否则返回0+ 如果RELNETFLOW>0,返回2,否则返回如果RELNETFLOW>1日前的RELNETFLOW,返回1,否则返回0+ 如果BULLELASTIC,返回2,否则返回0+ 如果BREADTH>=2,返回1,否则返回0
BEARFACTOR赋值: 如果MACDGREEN,返回3,否则返回如果MACDREV,返回1,否则返回0+ 如果DIFFGAMEVALUE赋值:BULLFACTOR-BEARFACTOR
GAMESIG赋值:GAMEVALUE的3日指数移动平均
HHPRICE赋值:20日内收盘价的最高值
HHGAME赋值:20日内GAMEVALUE的最高值
TOPDIVERGE赋值:收盘价>=HHPRICE AND GAMEVALUE< HHGAME*0.8 AND GAMEVALUE>0
LLPRICE赋值:20日内收盘价的最低值
LLGAME赋值:20日内GAMEVALUE的最低值
BOTTOMDIVERGE赋值:收盘价<=LLPRICE AND GAMEVALUE>LLGAME*1.2 AND GAMEVALUE< 0
BULLEXTREME赋值:GAMEVALUE>10 AND GAMEVALUE>1日前的GAMEVALUE
BEAREXTREME赋值:GAMEVALUE< -10 AND GAMEVALUE< 1日前的GAMEVALUE
TURNBUY赋值:GAMEVALUE上穿GAMESIG AND GAMEVALUE< 0 AND GAMEVALUE>-6
TURNSELL赋值:GAMESIG上穿GAMEVALUE AND GAMEVALUE>0 AND GAMEVALUE< 6
当满足条件GAMEVALUE>=0时,在0和GAMEVALUE位置之间画柱状线,宽度为2.5,0不为0则画空心柱.,COLOR0000CC
当满足条件GAMEVALUE>=0时,在0和GAMEVALUE位置之间画柱状线,宽度为1.5,0不为0则画空心柱.,COLOR0000FF
当满足条件GAMEVALUE>=0时,在0和GAMEVALUE位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLOR6666FF
当满足条件GAMEVALUE<0时,在0和GAMEVALUE位置之间画柱状线,宽度为2.5,0不为0则画空心柱.,COLOR00AA00
当满足条件GAMEVALUE<0时,在0和GAMEVALUE位置之间画柱状线,宽度为1.5,0不为0则画空心柱.,COLOR00CC00
当满足条件GAMEVALUE<0时,在0和GAMEVALUE位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLOR66FF66
GAMESIG,画白色,线宽为1
0,画深灰色,DOTLINE
8,画红色,DOTLINE
-8,画绿色,DOTLINE
12,画洋红色,DOTLINE
-12,画青色,DOTLINE
当满足条件TURNBUYANDGAMEVALUE>-5时,在GAMEVALUE-0.5位置画1号图标
当满足条件BOTTOMDIVERGE时,在GAMEVALUE-0.5位置画1号图标
当满足条件TURNSELLANDGAMEVALUE<5时,在GAMEVALUE+0.5位置画2号图标
当满足条件TOPDIVERGE时,在GAMEVALUE+0.5位置画2号图标
当满足条件TURNBUYANDGAMEVALUE>-5时,在GAMEVALUE-1.5位置书写文字,画黄色
当满足条件BOTTOMDIVERGE时,在GAMEVALUE-1.5位置书写文字,画红色
当满足条件TURNSELLANDGAMEVALUE<5时,在GAMEVALUE+1.5位置书写文字,画绿色
当满足条件TOPDIVERGE时,在GAMEVALUE+1.5位置书写文字,画白色
当满足条件CHIPCONCENTRATE时,在GAMEVALUE-2位置书写文字,画洋红色
当满足条件GAMEVALUE>10时,在GAMEVALUE和10位置之间画柱状线,宽度为3,0不为0则画空心柱.,画洋红色
当满足条件GAMEVALUE<-10时,在GAMEVALUE和-10位置之间画柱状线,宽度为3,0不为0则画空心柱.,画青色
