【原】通达信黄金炕副图指标公式（附源码破译和源码）

编程思路破译

LCF赋值:1日前的收盘价

RSI5赋值:(((收盘价-LCF)和0的较大值的5日[1日权重]移动平均 / (收盘价-LCF)的绝对值的5日[1日权重]移动平均) * 100)

TR1F赋值:(最高价-最低价)和(最高价-1日前的收盘价)的绝对值的较大值和(最低价-1日前的收盘价)的绝对值的较大值的10日累和

HD赋值:(最高价 - 1日前的最高价)

LD赋值:(1日前的最低价 - 最低价)

DMP赋值:如果((HD>0)AND(HD>LD)),返回HD,否则返回0的10日累和

DMM赋值:如果((LD>0)AND(LD>HD)),返回LD,否则返回0的10日累和

PDI赋值:((DMP * 100) / TR1F)

MDI赋值:((DMM * 100) / TR1F)

ADX赋值:(((MDI-PDI)的绝对值/(MDI+PDI))*100)的5日简单移动平均

AV赋值:(RSI5 + ADX)

DXR赋值:(((ADX + 5日前的ADX) / 2) + RSI5)

WR10赋值:((100 * (60日内最高价的最高值 - 收盘价)) / (60日内最高价的最高值 - 60日内最低价的最低值))

NEWVOL赋值:(RSI5 - WR10)

金坑买入赋值:(AV + NEWVOL)

买入选股赋值:如果金坑买入上穿0,返回1,否则返回0,STICK,画红色

VAR1Z赋值:买入选股的8日[1日权重]移动平均

VAR2Z赋值:VAR1Z的8日[1日权重]移动平均,COLOR0000FF

VAR3Z赋值:VAR2Z的10日[1日权重]移动平均,COLOR00FFFF

金坑赋值:如果VAR2Z上穿VAR3ZAND(VAR2Z<40),返回5,否则返回0*10000,COLOR0000FF,线宽为1

金坑

程序源码

LCF:=REF(CLOSE,1);

RSI5:=((SMA(MAX((CLOSE - LCF),0),5,1) / SMA(ABS((CLOSE - LCF)),5,1)) * 100);

TR1F:=SUM(MAX(MAX((HIGH - LOW),ABS((HIGH - REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),10);

HD:=(HIGH - REF(HIGH,1));

LD:=(REF(LOW,1) - LOW);

DMP:=SUM(IF(((HD > 0) AND (HD > LD)),HD,0),10);

DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),10);

PDI:=((DMP * 100) / TR1F);

MDI:=((DMM * 100) / TR1F);

ADX:=MA(((ABS((MDI - PDI)) / (MDI + PDI)) * 100),5);

AV:=(RSI5 + ADX);

 

DXR:=(((ADX + REF(ADX,5)) / 2) + RSI5);

WR10:=((100 * (HHV(HIGH,60) - CLOSE)) / (HHV(HIGH,60) - LLV(LOW,60)));{10}

NEWVOL:=(RSI5 - WR10);

金坑买入:=(AV + NEWVOL);

买入选股:=IF(CROSS(金坑买入,0),1,0),STICK,COLORRED;{NODRAW}

VAR1Z:=SMA(买入选股,8,1);{3}

VAR2Z:=SMA(VAR1Z,8,1),COLOR0000FF;{3}

VAR3Z:=SMA(VAR2Z,10,1),COLOR00FFFF;{3}

金坑:=IF(CROSS(VAR2Z,VAR3Z) AND (VAR2Z<40),5,0* 10000),COLOR0000FF,LINETHICK1;{40}

金坑;

注：

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

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