【原】通达信牛股启动红箭指标公式源码编程思路破译

编程思路破译:

LC赋值:1日前的收盘价

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

TR1赋值:(最高价-最低价)和(最高价-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) / TR1)

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

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

AV赋值:(RSI5 + ADX)

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

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

NEWVOL赋值:(RSI5 - WR10)

回家种田赋值:(AV + NEWVOL)

输出回家种田选股:如果回家种田上穿0,返回1,否则返回0,STICK,画红色

VAR1赋值:回家种田选股的3日[1日权重]移动平均

输出VAR2:VAR1的3日[1日权重]移动平均,COLOR0000FF

输出VAR3:VAR2的3日[1日权重]移动平均,COLOR00FFFF

输出放牛去了:如果VAR2上穿VAR3AND(VAR2<40),返回5,否则返回0*10000,COLOR0000FF,线宽为2

当满足条件放牛去了时,在0和2.5位置之间画柱状线,宽度为8,0不为0则画空心柱.,画红色

当满足条件放牛去了时,在0.45和4.0位置之间画柱状线,宽度为2,0不为0则画空心柱.,画红色

RSV赋值:(((收盘价 - 9日内最低价的最低值) / (9日内最高价的最高值 - 9日内最低价的最低值)) * 50)

K赋值:RSV的3日[1日权重]移动平均

D赋值:K的3日[1日权重]移动平均

J赋值:3*K-2*D

X赋值:2日内J的最低值=8日内J的最低值

输出秋天梦想: 如果J上穿3,返回1,否则返回0,STICK,COLORFFFF00

当满足条件秋天梦想时,在0和1位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR009999

当满足条件秋天梦想时,在0和1位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR00DDDD

当满足条件秋天梦想时,在0和1位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR00FFFF

输出解放全中国: 如果回家种田<5,返回-0.2,否则返回0,STICK,COLOR00FF00,线宽为1

输出解放全中国日:当满足条件解放全中国时,在0和-0.2位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR00FF00,线宽为6

A赋值:统计7日中满足收盘价的60日简单移动平均上穿收盘价的5日简单移动平均的天数=1

B赋值:收盘价的5日简单移动平均<3日前的收盘价的5日简单移动平均 AND 收盘价的5日简单移动平均>1日前的收盘价的5日简单移动平均

A AND B AND 成交量(手)>1日前的成交量(手)*1.3

程序源码:

LC:=REF(CLOSE,1);

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

TR1:=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) / TR1);

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

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

AV:=(RSI5 + ADX);

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

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

NEWVOL:=(RSI5 - WR10);

回家种田:=(AV + NEWVOL);

回家种田选股:IF(CROSS(回家种田,0),1,0),STICK,COLORRED;

VAR1:=SMA(回家种田选股,3,1);

VAR2:SMA(VAR1,3,1),COLOR0000FF;

VAR3:SMA(VAR2,3,1),COLOR00FFFF;

放牛去了:IF(CROSS(VAR2,VAR3) AND (VAR2<40),5,0* 10000),COLOR0000FF,LINETHICK2;

STICKLINE(放牛去了,0,2.5,8,0),COLORRED;

STICKLINE(放牛去了,0.45,4.0,2,0),COLORRED;

RSV:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 50);

K:=SMA(RSV,3,1);

D:=SMA(K,3,1);

J:=3*K-2*D;

X:=LLV(J,2)=LLV(J,8);

秋天梦想: IF(CROSS(J,3),1,0),STICK,COLORFFFF00;

STICKLINE(秋天梦想,0,1,3,0),COLOR009999;

STICKLINE(秋天梦想,0,1,2,0),COLOR00DDDD;

STICKLINE(秋天梦想,0,1,1,0),COLOR00FFFF;

解放全中国: IF(回家种田<5,-0.2,0),STICK,COLOR00FF00,LINETHICK1;

解放全中国日:STICKLINE(解放全中国,0,-0.2,3,0),COLOR00FF00,LINETHICK6;

A:=COUNT(CROSS(MA(C,60),MA(C,5)),7)=1;{7日内5日线跌破60日均线}

B:=MA(C,5)<REF(MA(C,5),3) AND MA(C,5)>REF(MA(C,5),1);{5日均线拐头}

A AND B AND V>REF(V,1)*1.3;