通达信力度强弱模型副图指标公式（附源码破译和源码）
编程思路破译
填充背景
输出NOTEXT顶部标线:120,画棕色
输出NOTEXT底部标线:-80,画棕色
输出力度平衡点:40,画棕色,线宽为2
LDA1赋值:收盘价-1日前的收盘价和0的较大值的9日[1日权重]移动平均/收盘价-1日前的收盘价的绝对值的9日[1日权重]移动平均*100的3日线性回归预测值的18日线性回归预测值
LDA2赋值:LDA1>1日前的LDA1 AND LDA1>40
LDA3赋值:LDA1<=1日前的LDA1 AND LDA1>40
LDA4赋值:LDA1>1日前的LDA1 AND LDA1<=40
LDA5赋值:LDA1<=1日前的LDA1 AND LDA1<=40
当满足条件LDA2时,在40和LDA1位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORFF00FF
当满足条件LDA3时,在40和LDA1位置之间画柱状线,宽度为3,0不为0则画空心柱.,画棕色
当满足条件LDA4时,在40和LDA1位置之间画柱状线,宽度为3,0不为0则画空心柱.,画红色
当满足条件LDA5时,在40和LDA1位置之间画柱状线,宽度为3,0不为0则画空心柱.,画白色
输出趋势平衡线:收盘价-1日前的收盘价和0的较大值的9日[1日权重]移动平均/收盘价-1日前的收盘价的绝对值的9日[1日权重]移动平均*100的26日简单移动平均,画蓝色,线宽为2
力度强弱赋值:(((收盘价 - 收盘价的30日简单移动平均) / 收盘价的30日简单移动平均) * 100)
当满足条件力度强弱>=20时,在8和10位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORFF00FF
当满足条件力度强弱>=0AND力度强弱<20AND力度强弱>6时,在8和10位置之间画柱状线,宽度为3,0不为0则画空心柱.,画红色
当满足条件力度强弱>=0AND力度强弱<20AND力度强弱<=6时,在8和10位置之间画柱状线,宽度为3,1不为0则画空心柱.,COLORDDDDDD
当满足条件力度强弱<=0AND力度强弱>-20时,在8和10位置之间画柱状线,宽度为3,1不为0则画空心柱.,COLORDDDDDD
当满足条件力度强弱<=-20时,在8和10位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORDDDDDD
BD1赋值:(3*收盘价+最低价+开盘价+最高价)/6
BD2赋值:(20*BD1+19*1日前的BD1+18*2日前的BD1+17*3日前的BD1+16*4日前的BD1+15*5日前的BD1+ 14*6日前的BD1+13*7日前的BD1+12*8日前的BD1+11*9日前的BD1+10*10日前的BD1+9*11日前的BD1+ 8*12日前的BD1+7*13日前的BD1+6*14日前的BD1+5*15日前的BD1+4*16日前的BD1+3*17日前的BD1+ 2*18日前的BD1+20日前的BD1)/210
BD3赋值:BD2的6日简单移动平均
BD4赋值:成交量(手)*100/当前流通股本(手)
BD5赋值:BD4的5日简单移动平均
BD6赋值:BD4的55日简单移动平均
BD7赋值:(BD5-BD6)
BD8赋值:(收盘价-BD2)
BD9赋值:BD7+BD8
BD10赋值:成交量(手)的5日指数移动平均
BD11赋值:成交量(手)的50日指数移动平均
OBV赋值:如果收盘价>1日前的收盘价,返回成交量(手),否则返回如果收盘价<1日前的收盘价,返回-成交量(手),否则返回0的历史累和
BD12赋值:OBV的5日指数移动平均
BD13赋值:OBV的50日指数移动平均
BD14赋值:(BD10-BD11)*0.00001
BD15赋值:(BD12-BD13)*0.000001
BD16赋值:BD14+BD15
MID赋值:(3*收盘价+最低价+开盘价+最高价)/6
DKX赋值:(20*MID+19*1日前的MID+18*2日前的MID+17*3日前的MID+ 16*4日前的MID+15*5日前的MID+14*6日前的MID+ 13*7日前的MID+12*8日前的MID+11*9日前的MID+ 10*10日前的MID+9*11日前的MID+8*12日前的MID+ 7*13日前的MID+6*14日前的MID+5*15日前的MID+ 4*16日前的MID+3*17日前的MID+2*18日前的MID+20日前的MID)/210
BD17赋值:DKX的6日简单移动平均
BD18赋值:(DKX-BD17)*1.2
BD19赋值:(收盘价*2+最高价+最低价)/4*10
BD20赋值:BD19的6日指数移动平均-BD19的55日指数移动平均
BD21赋值:BD20的6日指数移动平均
BD22赋值:(BD20-BD21)*0.06
BD23赋值:BD18+BD22
BD24赋值:收盘价的5日简单移动平均>1日前的收盘价的5日简单移动平均
BD25赋值:收盘价的12日指数移动平均>1日前的收盘价的12日指数移动平均
BD26赋值:收盘价的20日简单移动平均>1日前的收盘价的20日简单移动平均
BD27赋值:收盘价的30日简单移动平均>1日前的收盘价的30日简单移动平均
BD28赋值:收盘价的60日简单移动平均>1日前的收盘价的60日简单移动平均
BD29赋值:收盘价的120日简单移动平均>1日前的收盘价的120日简单移动平均
BD30赋值:收盘价的250日简单移动平均>1日前的收盘价的250日简单移动平均
BD31赋值:BD25 + BD26 + BD27 + BD28
BD32赋值:收盘价>BD2 AND BD9>0 AND BD16>0 AND BD23>0
BD33赋值:收盘价<=BD2 OR BD9<=0 OR BD16<=0 OR BD23<=0
力度波动A赋值:BD31=4 AND BD32
力度波动B赋值:BD31=3 AND BD32
力度波动C赋值:BD31< 3 OR BD33
当满足条件力度波动A时,在-2和0位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORFF00FF
当满足条件力度波动B时,在-2和0位置之间画柱状线,宽度为3,0不为0则画空心柱.,画红色
当满足条件力度波动C时,在-2和0位置之间画柱状线,宽度为3,1不为0则画空心柱.,COLORDDDDDD
BD34赋值:收盘价>收盘价的3日简单移动平均 AND BD24 AND BD25 AND BD26 AND BD27 AND BD28
输出一帆风顺:BD34 AND (统计5日中满足BD34的天数=2) AND 1日前的取反,画绿色,NODRAW
当满足条件一帆风顺时,在38位置书写文字,画绿色
当满足条件一帆风顺时,在40和LDA1位置之间画柱状线,宽度为2.06,0不为0则画空心柱.,画绿色
BD35赋值:收盘价>收盘价的5日简单移动平均 AND BD24 AND BD25 AND BD26 AND BD27 AND BD28 AND BD29
BD36赋值:统计5日中满足BD35的天数=2 OR 统计5日中满足BD35的天数=3 OR 统计5日中满足BD35的天数=4 OR 统计9日中满足BD35的天数=2
输出二龙戏珠:BD35 AND BD36 AND 1日前的BD35=0 AND BD32,画黄色,NODRAW
当满足条件二龙戏珠时,在35位置书写文字,画黄色
当满足条件二龙戏珠时,在40和LDA1位置之间画柱状线,宽度为1.36,0不为0则画空心柱.,画黄色
输出三阳开泰:BD32 AND (1日前的BD32=0 OR 1日前的BD32=1) AND BD35 AND 1日前的BD35=0,画红色,NODRAW
当满足条件三阳开泰时,在32位置书写文字,画红色
当满足条件三阳开泰时,在40和LDA1位置之间画柱状线,宽度为0.56,0不为0则画空心柱.,画红色
破界线1赋值:收盘价的21日指数移动平均*4
封印1赋值:行业指数的收盘价的144日指数移动平均/收盘价的144日简单移动平均
临界线赋值:行业指数的收盘价/封印1的21日指数移动平均*4
当满足条件破界线1>临界线时,在-12和-10位置之间画柱状线,宽度为3,0不为0则画空心柱.,画红色
当满足条件破界线1<=临界线时,在-12和-10位置之间画柱状线,宽度为3,1不为0则画空心柱.,COLORDDDDDD
破除临界点赋值:破界线1上穿临界线 AND 破界线1>1日前的破界线1
当满足条件破除临界点时,在-15位置书写文字
破界线2赋值:收盘价的21日指数移动平均*4
封印2赋值:大盘的收盘价的144日指数移动平均/收盘价的144日简单移动平均
结界线赋值:大盘的收盘价/封印2的21日指数移动平均*4
当满足条件破界线2>结界线时,在-22和-20位置之间画柱状线,宽度为3,0不为0则画空心柱.,画红色
当满足条件破界线2<=结界线时,在-22和-20位置之间画柱状线,宽度为3,1不为0则画空心柱.,COLORDDDDDD
破除结界点赋值:破界线2上穿结界线 AND 破界线2>1日前的破界线2
当满足条件破除结界点时,在-25位置书写文字
当满足条件是否最后一个周期时,在40位置书写文字画绿色
当满足条件是否最后一个周期时,在10位置书写文字画绿色
当满足条件是否最后一个周期时,在0位置书写文字画绿色
当满足条件是否最后一个周期时,在-10位置书写文字画绿色
当满足条件是否最后一个周期时,在-20位置书写文字画绿色
当满足条件是否最后一个周期时,在横轴0纵轴0.01位置书写文字,COLORB2FFAA
当满足条件是否最后一个周期时,在横轴0纵轴0.05位置书写文字,画青色
当满足条件是否最后一个周期时,在横轴0.078纵轴0.09位置书写文字,画黄色
当满足条件是否最后一个周期时,在横轴0.078纵轴0.13位置书写文字,COLORFFD1C3
当满足条件是否最后一个周期时,在横轴0.078纵轴0.17位置书写文字,画绿色
当满足条件是否最后一个周期时,在横轴0.078纵轴0.21位置书写文字,画白色
当满足条件是否最后一个周期时,在横轴0纵轴0.72位置书写文字,画黄色
当满足条件是否最后一个周期时,在横轴0.078纵轴0.76位置书写文字,画黄色
当满足条件是否最后一个周期时,在横轴0.078纵轴0.80位置书写文字,画黄色
当满足条件是否最后一个周期时,在横轴0.078纵轴0.84位置书写文字,画黄色
当满足条件是否最后一个周期时,在横轴0.078纵轴0.88位置书写文字,画黄色
当满足条件是否最后一个周期时,在横轴0纵轴0.92位置书写文字,画洋红色
当满足条件是否最后一个周期时,在横轴0.788纵轴0.01位置书写文字,画黄色
当满足条件是否最后一个周期时,在横轴0.788纵轴0.05位置书写文字,画白色
当满足条件是否最后一个周期时,在横轴0.788纵轴0.09位置书写文字,画白色
当满足条件是否最后一个周期时,在横轴0.788纵轴0.13位置书写文字,画白色
程序源码
DRAWGBK(C>0, RGB(310,108,108),RGB(88,30,0),0,'',0);
NOTEXT顶部标线:120,COLORBROWN;
NOTEXT底部标线:-80,COLORBROWN;
力度平衡点:40,COLORBROWN,LINETHICK2;
LDA1:=FORCAST(FORCAST(SMA(MAX(CLOSE-REF(CLOSE,1),0),9,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),9,1)*100,3),18);
LDA2:=LDA1>REF(LDA1,1) AND LDA1>40;
LDA3:=LDA1<=REF(LDA1,1) AND LDA1>40;
LDA4:=LDA1>REF(LDA1,1) AND LDA1<=40;
LDA5:=LDA1<=REF(LDA1,1) AND LDA1<=40;
STICKLINE(LDA2,40,LDA1,3,0),COLORFF00FF;
STICKLINE(LDA3,40,LDA1,3,0),COLORBROWN;
STICKLINE(LDA4,40,LDA1,3,0),COLORRED;
STICKLINE(LDA5,40,LDA1,3,0),COLORWHITE;
趋势平衡线:MA(SMA(MAX(CLOSE-REF(CLOSE,1),0),9,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),9,1)*100,26),COLORBLUE,LINETHICK2;
力度强弱:=(((CLOSE - MA(CLOSE,30)) / MA(CLOSE,30)) * 100);
STICKLINE(力度强弱>=20,8,10,3,0),COLORFF00FF;
STICKLINE(力度强弱>=0 AND 力度强弱< 20 AND 力度强弱>6,8,10,3,0),COLORRED;
STICKLINE(力度强弱>=0 AND 力度强弱< 20 AND 力度强弱<=6,8,10,3,1),COLORDDDDDD;
STICKLINE(力度强弱<=0 AND 力度强弱>-20,8,10,3,1),COLORDDDDDD;
STICKLINE(力度强弱<=-20,8,10,3,0),COLORDDDDDD;
BD1:=(3*CLOSE+LOW+OPEN+HIGH)/6;
BD2:=(20*BD1+19*REF(BD1,1)+18*REF(BD1,2)+17*REF(BD1,3)+16*REF(BD1,4)+15*REF(BD1,5)+ 14*REF(BD1,6)+13*REF(BD1,7)+12*REF(BD1,8)+11*REF(BD1,9)+10*REF(BD1,10)+9*REF(BD1,11)+ 8*REF(BD1,12)+7*REF(BD1,13)+6*REF(BD1,14)+5*REF(BD1,15)+4*REF(BD1,16)+3*REF(BD1,17)+ 2*REF(BD1,18)+REF(BD1,20))/210;
BD3:=MA(BD2,6);
BD4:=V*100/CAPITAL;
BD5:=MA(BD4,5);
BD6:=MA(BD4,55);
BD7:=(BD5-BD6);
BD8:=(C-BD2);
BD9:=BD7+BD8;
BD10:=EMA(V,5);
BD11:=EMA(V,50);
OBV:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE< REF(CLOSE,1),-VOL,0)),0);
BD12:=EMA(OBV,5);
BD13:=EMA(OBV,50);
BD14:=(BD10-BD11)*0.00001;
BD15:=(BD12-BD13)*0.000001;
BD16:=BD14+BD15;
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
DKX:=(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+ 16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+ 13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+ 10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+ 7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+ 4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210;
BD17:=MA(DKX,6);
BD18:=(DKX-BD17)*1.2;
BD19:=(C*2+H+L)/4*10;
BD20:=EMA(BD19,6)-EMA(BD19,55);
BD21:=EMA(BD20,6);
BD22:=(BD20-BD21)*0.06;
BD23:=BD18+BD22;
BD24:=MA(C,5)>REF(MA(C,5),1);
BD25:=EMA(C,12)>REF(EMA(C,12),1);
BD26:=MA(C,20)>REF(MA(C,20),1);
BD27:=MA(C,30)>REF(MA(C,30),1);
BD28:=MA(C,60)>REF(MA(C,60),1);
BD29:=MA(C,120)>REF(MA(C,120),1);
BD30:=MA(C,250)>REF(MA(C,250),1);
BD31:=BD25 + BD26 + BD27 + BD28;
BD32:=C>BD2 AND BD9>0 AND BD16>0 AND BD23>0;
BD33:=C<=BD2 OR BD9<=0 OR BD16<=0 OR BD23<=0;
力度波动A:=BD31=4 AND BD32;
力度波动B:=BD31=3 AND BD32;
力度波动C:=BD31< 3 OR BD33;
STICKLINE(力度波动A,-2,0,3,0),COLORFF00FF;
STICKLINE(力度波动B,-2,0,3,0),COLORRED;
STICKLINE(力度波动C,-2,0,3,1),COLORDDDDDD;
BD34:=C>MA(C,3) AND BD24 AND BD25 AND BD26 AND BD27 AND BD28;
一帆风顺:BD34 AND (COUNT(BD34,5)=2) AND REF(NOT(BD34),1),COLORGREEN,NODRAW;
DRAWTEXT(一帆风顺,38,'↖★'),COLORGREEN;
STICKLINE(一帆风顺,40,LDA1,2.06,0),COLORGREEN;
BD35:=C>MA(C,5) AND BD24 AND BD25 AND BD26 AND BD27 AND BD28 AND BD29;
BD36:=COUNT(BD35,5)=2 OR COUNT(BD35,5)=3 OR COUNT(BD35,5)=4 OR COUNT(BD35,9)=2;
二龙戏珠:BD35 AND BD36 AND REF(BD35=0,1) AND BD32,COLORYELLOW,NODRAW;
DRAWTEXT(二龙戏珠,35,'↖★★'),COLORYELLOW;
STICKLINE(二龙戏珠,40,LDA1,1.36,0),COLORYELLOW;
三阳开泰:BD32 AND (REF(BD32=0,1) OR REF(BD32=1,1)) AND BD35 AND REF(BD35=0,1),COLORRED,NODRAW;
DRAWTEXT(三阳开泰,32,'↖★★★'),COLORRED;
STICKLINE(三阳开泰,40,LDA1,0.56,0),COLORRED;
破界线1:=EMA(C,21)*4;
封印1:=EMA(HY_INDEXC,144)/MA(C,144);
临界线:=EMA(HY_INDEXC/封印1,21)*4;
STICKLINE(破界线1>临界线,-12,-10,3,0),COLORRED;
STICKLINE(破界线1<=临界线,-12,-10,3,1),COLORDDDDDD;
破除临界点:=CROSS(破界线1,临界线) AND 破界线1>REF(破界线1,1);
DRAWTEXT(破除临界点,-15,'↖越过临界');
破界线2:=EMA(C,21)*4;
封印2:=EMA(INDEXC,144)/MA(C,144);
结界线:=EMA(INDEXC/封印2,21)*4;
STICKLINE(破界线2>结界线,-22,-20,3,0),COLORRED;
STICKLINE(破界线2<=结界线,-22,-20,3,1),COLORDDDDDD;
破除结界点:=CROSS(破界线2,结界线) AND 破界线2>REF(破界线2,1);
DRAWTEXT(破除结界点,-25,'↖冲破结界');
DRAWTEXT(ISLASTBAR,40,'★力度平衡点★')COLORGREEN;
DRAWTEXT(ISLASTBAR,10,'★力度强弱★')COLORGREEN;
DRAWTEXT(ISLASTBAR,0,'★力度波动★')COLORGREEN;
DRAWTEXT(ISLASTBAR,-10,'★力度临界★')COLORGREEN;
DRAWTEXT(ISLASTBAR,-20,'★力度结界★')COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0,0.01,0,'★模型设计思路★ 当股价上涨的时候，其内在影响因素很多， 其中力度强弱就是重要因素之一。基于此，准确判定股价上涨力度的强弱，就是判定股价上涨是否 具备持续性的关键环节'),COLORB2FFAA;
DRAWTEXT_FIX(ISLASTBAR,0,0.05,0,'★力度基本判定★ 1.“4柱+1点+1线”： 洋红柱+棕色柱+白色柱+红色柱+力度平衡点+趋势平衡线'),COLORCYAN;
DRAWTEXT_FIX(ISLASTBAR,0.078,0.09,0,'2.洋红柱：代表力度持续增大；棕色柱：代表力度逐渐减小； 白色柱：代表力度明显弱势；红色柱：代表力度开始增大'),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.078,0.13,0,'3.力度平衡点：代表力度变强、变弱的分界点， 在平衡点之上的力度柱，需要重点关注'),COLORFFD1C3;
DRAWTEXT_FIX(ISLASTBAR,0.078,0.17,0,'4.趋势平衡线：代表力度强弱的重要分界线， 在平衡线之上的力度柱，需要进一步重点关注，这是力度增强的象征'),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.078,0.21,0,'5.力度柱在趋势平衡线下方，下跌概率大，宜观望空仓； 趋势平衡线在40之下，加速下跌或者下跌末期的概率大，宜等待转势'),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0,0.72,0,'★力度辅助判定★ 1.分为四个维度：力度强弱、力度波动、 力度临界、力度结界'),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.078,0.76,0,'2.第一维度～力度强弱：顾名思义，股价向上拉升， 必须是有力度的上涨，才能形成上涨趋势。因此，这个维度是判定股价上涨力度是否增强的要素之一。 红色代表上涨力度由弱转强，洋红色代表上涨力度明显增强'),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.078,0.80,0,'3.第二维度～力度波动：顾名思义，就是上涨力度具备了 很大波动空间，才能推动股价不断向上，这也是股价能否上涨的重要特征之一，更是影响股价上涨的 要素之一。洋红色代表力度波动开始加大'),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.078,0.84,0,'4.第三维度～力度临界：是从逆向思维的角度考虑，当出现 股价横盘期间该跌不跌、下跌末期刻意无量下跌等情况，意味着股价内在走势发生改变， 突破弱的极限转为强的状态。红色为信号，伴随越过临界信号更好'),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.078,0.88,0,'5.第四维度～力度结界：是从抽向思维的角度考虑，将市场 的无形力量看作无形压力，如同束缚股价的结界一样。当股价走势悄然冲破结界之时，意味着股价 内在走势发生质变。红色为信号，伴随冲破结界信号更好'),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0,0.92,0,'★力度判定步骤★ 1.力度柱位于40之上；2.力度柱超过趋势平衡线； 3.“四个维度”全部红色，2个红色+2个洋红更好；4.伴随“冲破结界+越过临界”信号更好； 5.出现“打破力度平衡”信号；6.优选“力度结界”红色的个股进行关注'),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.788,0.01,0,'★判断打破力度平衡的3种信号★'),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.788,0.05,0,'1.一帆风顺：绿色力度柱 【等级】★ 力度突增'),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.788,0.09,0,'2.二龙戏珠：黄色力度柱 【等级】★★ 力度大增'),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.788,0.13,0,'3.三阳开泰：红色力度柱 【等级】★★★力度巨增'),COLORWHITE;
该公式包含未来函数:CAPITAL
注：
馆内各种公式为学习编程而保存，实战使用前一定要看其中是否有未来函数并自己亲自测试成功率，决不能依据公式名称的描述和形容去投资，据此入市造成投资损失由投资者自己承担。
发文不易，如获益，欢迎赞赏，赞赏必复！
本站仅提供存储服务，所有内容均由用户发布，如发现有害或侵权内容，请点击举报。