通达信点火星空副图指标公式(附源码破译和源码)
发布日期:2024-03-01 15:14 点击次数:69
编程思路破译
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;
注:
馆内各种公式为学习编程而保存,实战使用前一定要看其中是否有未来函数并自己亲自测试成功率,决不能依据公式名称的描述和形容去投资,据此入市造成投资损失由投资者自己承担。
本站仅提供存储服务,所有内容均由用户发布,如发现有害或侵权内容,请点击举报。