当前所在位置:首页 > 股票配资精选

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

9867

2024-06-03 【 字体:

编程思路破译

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;

注:

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

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

阅读全文
相关推荐

芯源微(688037)业绩喜人,2023年净利润同比增长2517%!涂胶显影设备收入创历史新高,前道领域需求饱满,投资者别错过!

芯源微(688037)业绩喜人,2023年净利润同比增长2517%!涂胶显影设备收入创历史新高,前道领域需求饱满,投资者别错过!
近期资讯:芯源微(688037)披露了2023年度业绩快报。报告显示,公司实现了...

今日120只股长线走稳 站上年线

今日120只股长线走稳 站上年线
  证券时报·数据宝统计,截至今日下午收盘,上证综指3054.64点,收于年线之...

烧到万科身上的火,还能被阻断吗?

烧到万科身上的火,还能被阻断吗?
读者群扩募中,入群请向后台发送名片,谢谢。谢绝单纯围观潜水,大家心平气和地哀叹行...

才40岁实战不到3分钟!中医:脾肾虚弱,30天补回来!

才40岁实战不到3分钟!中医:脾肾虚弱,30天补回来!
说到补肾这个话题,不瞒大家说我还真有一段相关经历,事情要回忆到前年国庆,那段时间...

科华生物百亿仲裁案迎反转 子公司创始人“反客为主”?

科华生物百亿仲裁案迎反转 子公司创始人“反客为主”?
  曾经引起资本市场热议的“百亿仲裁案”,如今戏剧性地迎来反转。1月11日晚间,...

世界技能博物馆落户上海杨浦,看手艺和职业教育的天花板

世界技能博物馆落户上海杨浦,看手艺和职业教育的天花板
工业生产、职业教育也能成为一座大型博物馆展示的主题。今年11月6日开馆的世界技能...

阿根廷航空工会举行罢工 大量航班取消影响数万旅客

阿根廷航空工会举行罢工 大量航班取消影响数万旅客
  南方财经2月29日电,阿根廷三大航空工会当地时间2月28日0时起举行24小时...

2024年3月14日鲁南蔬菜产业有限公司价格行情

2024年3月14日鲁南蔬菜产业有限公司价格行情
(原标题:2024年3月14日鲁南蔬菜产业有限公司价格行情) ...

美股新年强势上涨趋势渐熄 华尔街机构纷纷唱空后市

美股新年强势上涨趋势渐熄 华尔街机构纷纷唱空后市
  美股2023年开局强势,标普500指数年初至今累计上扬7%,以科技股为主的纳...

英伟达RTX 4090显卡的价格在部分亚洲国家飙升60%

英伟达RTX 4090显卡的价格在部分亚洲国家飙升60%
报道称,英伟达的GeForce RTX 4090显卡的价格在亚洲市场飙升,因为人...