通达信活跃强度副图指标公式（附源码破译和源码）

编程思路破译

输出强度:收盘价/收盘价的60日简单移动平均*100-100

输出高:15

输出中:10

输出零:0

输出强弱线:如果收盘价>收盘价的5日简单移动平均,返回1,否则返回0+如果收盘价>收盘价的13日简单移动平均,返回1,否则返回0+如果收盘价>收盘价的21日简单移动平均,返回1,否则返回0+如果收盘价>收盘价的34日简单移动平均,返回1,否则返回0+如果收盘价>收盘价的55日简单移动平均,返回1,否则返回0+如果收盘价>收盘价的89日简单移动平均,返回1,否则返回0+如果收盘价>收盘价的144日简单移动平均,返回1,否则返回0+如果收盘价>收盘价的233日简单移动平均,返回1,否则返回0+-3.8,画洋红色,NODRAW

输出主拉:((最高价+最低价+收盘价)/3-15日内(最高价+最低价+收盘价)/3的最低值)/(15日内(最高价+最低价+收盘价)/3的最高值-15日内(最高价+最低价+收盘价)/3的最低值)的2日简单移动平均*100,COLOR000080,NODRAW

VR1赋值:成交额(元)/((最高价-最低价)*2-收盘价-开盘价的绝对值)

庄线赋值:3*(收盘价-34日内最低价的最低值)/(34日内最高价的最高值-34日内最低价的最低值)*100的3日[1日权重]移动平均-2*(收盘价-34日内最低价的最低值)/(34日内最高价的最高值-34日内最低价的最低值)*100的3日[1日权重]移动平均的3日[1日权重]移动平均的6日指数移动平均,画红色,线宽为1

输出散:100*(55日内最高价的最高值-收盘价)/(55日内最高价的最高值-55日内最低价的最低值),画绿色,NODRAW

当满足条件强弱线=4.2AND强度>=15时,在15和强度位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLORFF00FF

当满足条件主拉=100AND强度>=15时,在15和强度位置之间画柱状线,宽度为2,0不为0则画空心柱.,画深灰色

当满足条件散=0AND强度>=15时,在15和强度位置之间画柱状线,宽度为1,0不为0则画空心柱.,画黄色

U_1赋值:(收盘价的3日简单移动平均+收盘价的6日简单移动平均+收盘价的9日简单移动平均)/3

U_2赋值:(收盘价的5日简单移动平均+收盘价的10日简单移动平均+收盘价的15日简单移动平均+收盘价的20日简单移动平均+收盘价的25日简单移动平均+收盘价的30日简单移动平均)/6

如果U_1>1日前的U_1ANDU_1>U_2,返回U_1,否则返回无效数,画红色

U_3赋值:收盘价/1日前的收盘价>=1.098 AND 收盘价=最高价

U_4赋值:统计2日中满足U_3的天数>=1 AND 取反

U_5赋值:U_4的13日过滤,画红色

U_6赋值:统计3日中满足U_3的天数>=2 AND 取反

U_7赋值:U_5 AND 统计18日中满足U_5的天数=1,画红色

U_8赋值:U_6的13日过滤

当满足条件U_7时,在0位置画24号图标

当满足条件U_8时,在0位置画25号图标

输出过头:收盘价上穿1日前的60日内最高价的最高值,NODRAW,画红色

当满足条件过头=1时,在强度*1.5位置书写文字,画青色

输出活跃度:(最高价-如果收盘价>=开盘价,返回收盘价,否则返回开盘价)/如果收盘价>=开盘价,返回收盘价,否则返回开盘价*100+(如果收盘价<=开盘价,返回收盘价,否则返回开盘价-最低价)/最低价*100和(收盘价-1日前的收盘价)/?日前的CLOS的较大值和?的较大值和?的较大值和?的较大值和?的较大值和?的较大值的整数部分,画蓝色,NODRAW

当满足条件活跃度>=99AND强度>14时,在0和10位置之间画柱状线,宽度为1,0不为0则画空心柱.,画淡红色

程序源码

强度:C/MA(C,60)*100-100;

高:15;

中:10;

零:0;

强弱线:IF(C>MA(C,5),1,0)+IF(C>MA(C,13),1,0)+IF(C>MA(C,21),1,0)+IF(C>MA(C,34),1,0)+IF(C>MA(C,55),1,0)+IF(C>MA(C,89),1,0)+IF(C>MA(C,144),1,0)+IF(C>MA(C,233),1,0)+-3.8,COLORMAGENTA,NODRAW;

主拉:MA(((H+L+C)/3-LLV((H+L+C)/3,15))/(HHV((H+L+C)/3,15)-LLV((H+L+C)/3,15)),2)*100,COLOR000080,NODRAW;

VR1:=AMOUNT/((HIGH-LOW)*2-ABS(CLOSE-OPEN));

庄线:=EMA(3*SMA((CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100,3,1)-2*SMA(SMA((CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100,3,1),3,1),6),COLORRED,LINETHICK1;

散:100*(HHV(HIGH,55)-CLOSE)/(HHV(HIGH,55)-LLV(LOW,55)),COLORGREEN,NODRAW;

STICKLINE(强弱线=4.2 AND 强度>=15,15,强度,4,0),COLORFF00FF;

STICKLINE(主拉=100 AND 强度>=15,15,强度,2,0),COLORGRAY;

STICKLINE(散=0 AND 强度>=15,15,强度,1,0),COLORYELLOW;

U_1:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,9))/3;

U_2:=(MA(CLOSE,5)+MA(CLOSE,10)+MA(CLOSE,15)+MA(CLOSE,20)+MA(CLOSE,25)+MA(CLOSE,30))/6;

IF(U_1>REF(U_1,1) AND U_1>U_2,U_1,DRAWNULL),COLORRED;

U_3:=CLOSE/REF(CLOSE,1)>=1.098 AND CLOSE=HIGH;

U_4:=COUNT(U_3,2)>=1 AND NOT(COUNT(U_3,3)>=2);

U_5:=FILTER(U_4,13),COLORRED;

U_6:=COUNT(U_3,3)>=2 AND NOT(COUNT(U_3,4)>=3);

U_7:=U_5 AND COUNT(U_5,18)=1,COLORRED;

U_8:=FILTER(U_6,13);

DRAWICON(U_7,0,24);

DRAWICON(U_8,0,25);

过头:CROSS(C,REF(HHV(H,60),1)),NODRAW,COLORRED;

DRAWTEXT(过头=1,强度*1.5,'过头'),COLORCYAN;

活跃度:INTPART(MAX(MAX(MAX(MAX(MAX(MAX((HIGH-IF(CLOSE>=OPEN,CLOSE,OPEN))/IF(CLOSE>=OPEN,CLOSE,OPEN)*100+(IF(CLOSE<=OPEN,CLOSE,OPEN)-LOW)/LOW*100,(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100),(CLOSE-OPEN)/OPEN*100+(IF(CLOSE<=OPEN,CLOSE,OPEN)-LOW)/LOW*100),(CLOSE-OPEN)/OPEN*100+(HIGH-IF(CLOSE>=OPEN,CLOSE,OPEN))/IF(CLOSE>=OPEN,CLOSE,OPEN)*100),(IF(CLOSE<=OPEN,CLOSE,OPEN)-LOW)/LOW*100),(HIGH-IF(CLOSE>=OPEN,CLOSE,OPEN))/IF(CLOSE>=OPEN,CLOSE,OPEN)*100),(OPEN-REF(CLOSE,1))/REF(CLOSE,1)*100)*10),COLORBLUE,NODRAW;

STICKLINE(活跃度>=99 AND 强度>14,0,10,1,0),COLORLIRED;

注：

       馆内各种公式为学习编程而保存，实战使用前一定要看其中是否有未来函数并自己亲自测试成功率，决不能依据公式名称的描述和形容去投资，据此入市造成投资损失由投资者自己承担。

       发文不易，如获益，欢迎赞赏，赞赏必复！