通达信点火星空副图指标公式(附源码破译和源码)

发布日期:2024-03-01 15:14    点击次数:67

编程思路破译

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;

B:=MA(C,5)< REF(MA(C,5),3) AND MA(C,5)>REF(MA(C,5),1);

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

注:

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

本站仅提供存储服务,所有内容均由用户发布,如发现有害或侵权内容,请点击举报。