黄金分割:这是飞狐的指标,请老师改成通达信的指标!

[飞 狐] 4686 3
设置
2449561 Lv.2

专栏

发表于 2011-10-18 08:03 复制 显示全部楼层 正序浏览 |
跳转到指定楼层
先胜黄金分割:这是飞狐的指标,请老师改成通达信的指标!


{先胜黄金分割}
input:H1(158,1,300),P(20,1,100),N8(4,1,100),P1(5,1,100);
主线:=(加权移动平均(收盘价,P1) * 0.98);
VAR1:=乘幂((收盘价 - 主线),1);
VAR2:=简单移动平均(VAR1,3);
VAR3:=开平方(VAR2);
阻力线:=(主线 + (1.96 * VAR3));
支撑线:=(主线 - (1.96 * VAR3));
画分段线(((主线 > 向前引用(主线,1)) AND (阻力线 <> 支撑线)),主线),LINETHICK3,colorFF;
画分段线((主线 < 向前引用(主线,1)),主线),LINETHICK2,colorFF0000;
画图标((主线 > 向前引用(主线,1)),主线,10);
画图标(交叉函数(VAR2,VAR3),(最高价 * 1.035),3);
N1:=系统参数(3);
N:=((N1 - 系统参数(2)) + 1);
HH:=最高值(最高价,N);
LL:=最低值(最低价,N);
最高:HH[N1],colorFF;
最低:LL[N1],colorFF;
(最低 + ((最高 - 最低) * 0.191));
(最低 + ((最高 - 最低) * 0.382));
(最低 + ((最高 - 最低) * 0.5)),colorFF00FF;
(最低 + ((最高 - 最低) * 0.618));
(最低 + ((最高 - 最低) * 0.809));
显示数字((有效值周期数(收盘价) = 系统参数(2)),向前引用(最低,上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),向前引用(最低,上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),2),SHIFT110,colorFFFF;
显示数字((有效值周期数(收盘价) = 系统参数(2)),向前引用((最低 + ((最高 - 最低) * 0.191)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),向前引用((最低 + ((最高 - 最低) * 0.191)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),2),SHIFT110,colorFFFF;
显示数字((有效值周期数(收盘价) = 系统参数(2)),向前引用((最低 + ((最高 - 最低) * 0.382)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),向前引用((最低 + ((最高 - 最低) * 0.382)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),2),SHIFT110,colorFFFF;
显示数字((有效值周期数(收盘价) = 系统参数(2)),向前引用((最低 + ((最高 - 最低) * 0.5)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),向前引用((最低 + ((最高 - 最低) * 0.5)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),2),SHIFT110,colorFFFF;
显示数字((有效值周期数(收盘价) = 系统参数(2)),向前引用((最低 + ((最高 - 最低) * 0.618)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),向前引用((最低 + ((最高 - 最低) * 0.618)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),2),SHIFT110,colorFFFF;
显示数字((有效值周期数(收盘价) = 系统参数(2)),向前引用((最低 + ((最高 - 最低) * 0.809)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),向前引用((最低 + ((最高 - 最低) * 0.809)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),2),SHIFT110,colorFFFF;
显示数字((有效值周期数(收盘价) = 系统参数(2)),向前引用((最低 + ((最高 - 最低) * 1)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),向前引用((最低 + ((最高 - 最低) * 1)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),2),SHIFT110,colorFFFF;
显示文字((有效值周期数(收盘价) = 系统参数(2)),向前引用(最低,上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),'000%↑'),colorFFFF;
显示文字((有效值周期数(收盘价) = 系统参数(2)),向前引用((最低 + ((最高 - 最低) * 0.191)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),'19.1%↑'),colorFFFF;
显示文字((有效值周期数(收盘价) = 系统参数(2)),向前引用((最低 + ((最高 - 最低) * 0.382)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),'38.2%↑'),colorFFFF;
显示文字((有效值周期数(收盘价) = 系统参数(2)),向前引用((最低 + ((最高 - 最低) * 0.5)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),'50%↑'),colorFFFF;
显示文字((有效值周期数(收盘价) = 系统参数(2)),向前引用((最低 + ((最高 - 最低) * 0.618)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),'61.8%↑'),colorFFFF;
显示文字((有效值周期数(收盘价) = 系统参数(2)),向前引用((最低 + ((最高 - 最低) * 0.809)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),'80.9%↑'),colorFFFF;
显示文字((有效值周期数(收盘价) = 系统参数(2)),向前引用((最低 + ((最高 - 最低) * 1)),上一次条件成立位置((有效值周期数(收盘价) = 系统参数(2)))),'100%↑'),colorFFFF;

VAR1:=获利盘比例(收盘价);
VAR2:=(成交量 / 流通盘大小);
VAR3:=(VAR2 / VAR1);
财神线:=条件函数((VAR1 < (N1 / 100)),VAR3,0);
画图标((财神线 > 3),最低价,10),ALIGN5;
VAR1:=获利盘比例(收盘价);
VAR2:=(成交量 / 流通盘大小);
VAR3:=(VAR2 / VAR1);
财神线:=条件函数((VAR1 < (N1 / 100)),VAR3,0);
财神到:=财神线;
画图标((((财神线 < 向前引用((财神线 > 1),1)) AND (财神线 > 0.5)) AND (财神线 < 1)),最高价,1),ALIGN5;
VAR1111:=线性回归预测值(收盘价,5);

画柱线((收盘价 < 开盘价),最高价,最低价,1,0),color8800;
画柱线((收盘价 < 开盘价),最高价,最低价,0,0),colorFF00;
画柱线((收盘价 < 开盘价),收盘价,开盘价,8,0),color8800;
画柱线((收盘价 < 开盘价),收盘价,开盘价,7,0),color9900;
画柱线((收盘价 < 开盘价),收盘价,开盘价,6,0),colorAA00;
画柱线((收盘价 < 开盘价),收盘价,开盘价,5,0),colorBB00;
画柱线((收盘价 < 开盘价),收盘价,开盘价,4,0),colorCC00;
画柱线((收盘价 < 开盘价),收盘价,开盘价,3,0),colorDD00;
画柱线((收盘价 < 开盘价),收盘价,开盘价,2,0),colorEE00;
画柱线((收盘价 < 开盘价),收盘价,开盘价,1,0),colorFF00;
画柱线((收盘价 >= 开盘价),最高价,最低价,1,0),colorFF;
画柱线((收盘价 >= 开盘价),最高价,最低价,0,0),colorEEFF;
画柱线((收盘价 >= 开盘价),收盘价,开盘价,8,0),colorFF;
画柱线((收盘价 >= 开盘价),收盘价,开盘价,7,0),color22FF;
画柱线((收盘价 >= 开盘价),收盘价,开盘价,6,0),color44FF;
画柱线((收盘价 >= 开盘价),收盘价,开盘价,5,0),color66FF;
画柱线((收盘价 >= 开盘价),收盘价,开盘价,4,0),color88FF;
画柱线((收盘价 >= 开盘价),收盘价,开盘价,3,0),colorAAFF;
画柱线((收盘价 >= 开盘价),收盘价,开盘价,2,0),colorCCFF;
画柱线((收盘价 >= 开盘价),收盘价,开盘价,1,0),colorEEFF;


显示数字((系统参数(2) = 数据位置),收盘价,财务数据(33),2),ALIGN5;
显示文字((系统参数(2) = 数据位置),收盘价,'     -收益'),ALIGN5;
显示文字((数据位置 = 系统参数(2)),最高价,('\n所属块:' + 所属板块)),ALIGN4,colorFFFF;
画柱线((收盘价 < 开盘价),最高价,最低价,1,0),color8800;
画柱线((收盘价 < 开盘价),最高价,最低价,0,0),colorFF00;
画柱线((收盘价 < 开盘价),收盘价,开盘价,8,0),color8800;
画柱线((收盘价 < 开盘价),收盘价,开盘价,7,0),color9900;
画柱线((收盘价 < 开盘价),收盘价,开盘价,6,0),colorAA00;
画柱线((收盘价 < 开盘价),收盘价,开盘价,5,0),colorBB00;
画柱线((收盘价 < 开盘价),收盘价,开盘价,4,0),colorCC00;
画柱线((收盘价 < 开盘价),收盘价,开盘价,3,0),colorDD00;
画柱线((收盘价 < 开盘价),收盘价,开盘价,2,0),colorEE00;
画柱线((收盘价 < 开盘价),收盘价,开盘价,1,0),colorFF00;
画柱线((收盘价 >= 开盘价),最高价,最低价,1,0),colorFF;
画柱线((收盘价 >= 开盘价),最高价,最低价,0,0),colorEEFF;
画柱线((收盘价 >= 开盘价),收盘价,开盘价,8,0),colorFF;
画柱线((收盘价 >= 开盘价),收盘价,开盘价,7,0),color22FF;
画柱线((收盘价 >= 开盘价),收盘价,开盘价,6,0),color44FF;
画柱线((收盘价 >= 开盘价),收盘价,开盘价,5,0),color66FF;
画柱线((收盘价 >= 开盘价),收盘价,开盘价,4,0),color88FF;
画柱线((收盘价 >= 开盘价),收盘价,开盘价,3,0),colorAAFF;
画柱线((收盘价 >= 开盘价),收盘价,开盘价,2,0),colorCCFF;
画柱线((收盘价 >= 开盘价),收盘价,开盘价,1,0),colorEEFF;
VAR1:=(((收盘价 + 最高价) + 最低价) / 3);
CB:=简单移动平均(VAR1,4);
A1:=最高值(CB,18);
A2:=最高值(CB,41);
A3:=(最高值(最高价,62) * 0.98);
B1:=最低值(CB,18);
B2:=(最低值(最低价,62) * 1.02);
MID:=简单移动平均(收盘价,20);
UPPER:=(MID + (2 * 估算标准差(收盘价,20)));
LOWER:=(MID - (2 * 估算标准差(收盘价,20)));
VAR18:=((指数平滑移动平均(收盘价,3) - 指数平滑移动平均(收盘价,6)) - ((指数平滑移动平均(收盘价,6) - 指数平滑移动平均(收盘价,12)) * (0 - 100)));
VAR28:=指数平滑移动平均(VAR18,3);
VAR38:=((指数平滑移动平均(收盘价,3) - 指数平滑移动平均(收盘价,6)) - ((指数平滑移动平均(收盘价,24) - 指数平滑移动平均(收盘价,36)) * (0 - 100)));
VAR48:=指数平滑移动平均(VAR38,9);
VAR58:=交叉函数(VAR18,VAR28);
VAR36:=交叉函数(VAR28,VAR18);
画柱线(VAR36,开盘价,收盘价,1.5,0),colorFFFFFF;
画柱线(VAR58,开盘价,收盘价,8,0),colorFF;
画柱线(VAR58,开盘价,(收盘价 - ((收盘价 - 开盘价) * 0.33)),8,0),colorFFFF;
画柱线(VAR58,开盘价,(收盘价 - ((收盘价 - 开盘价) * 0.66)),8,0),LINETHICK2,colorFF00FF;

拐点:=简单移动平均(收盘价,N8);
拐点1:=简单移动平均(收盘价,N8);
GD1:=(向前引用((统计总数((拐点 <= 向前引用(拐点,1)),5) = 5),1) AND (拐点 > 向前引用(拐点,1)));
GD2:=(向前引用((统计总数((拐点1 <= 向前引用(拐点1,1)),5) = 5),1) AND (拐点1 > 向前引用(拐点1,1)));
画图标(GD1,(最低价 * 0.99),8);
画图标(GD1,(最低价 * 0.98),1);
显示文字((系统参数(2) = 数据位置),收盘价,''),ALIGN4,colorFFFF;
KXS:=系统参数(1);
MID:=简单移动平均(收盘价,20);
UPPER:=(MID + (2 * 估算标准差(收盘价,20)));
LOWER:=(MID - (2 * 估算标准差(收盘价,20)));
V1:=(((收盘价 - LOWER) / (UPPER - LOWER)) * 100);
V2:=(V1 - 指数平滑移动平均(V1,5));
K1:=(求和(最低值(V2,4),4) / 4);
V3:=(指数平滑移动平均(V2,64) * 10);
V4:=指数平滑移动平均(((0.4 * V2) * (0 - 1)),3);
V5:=(0 - ((1 * 指数平滑移动平均(V2,39)) * 10));
A:=(V3 > 10);
B:=(V2 > V4);
D:=(V5 > 10);
E:=(((V3 <= 10) OR (V2 <= V4)) OR (V5 <= 10));
KS:=(((收盘价 - 移动平均(收盘价,13,1)) / 移动平均(收盘价,13,1)) * (0 - 100));
RKS:=向前引用(KS,1);
MLS:=((((RKS / KS) > 1.23) AND (RKS > 13)) AND ((收盘价 / 向前引用(收盘价,1)) > 1.03));
开:=开盘价;
高:=最高价;
低:=最低价;
收:=收盘价;
超跌:画柱线((KS > 13),高,低,0,1),LINETHICK2,colorFFFFFF;
反弹:画柱线((MLS = 1),高,低,0,1),LINETHICK2,colorFF00FF;
画柱线((KS > 13),开,收,8,1),LINETHICK2,colorFFFFFF;
画柱线((MLS = 1),开,收,8,1),LINETHICK2,colorFF00FF;
VAR1:=((向前引用(最高价,1) + 向前引用(最低价,1)) / 2);
VAR2:=((向前引用(最高价,1) + 向前引用(最低价,1)) / 2);
VAR3:=(简单移动平均(收盘价,27) + (2 * 估算标准差(收盘价,27)));

显示文字(交叉函数(VAR2,VAR3),(最高价 * 1.02),''),colorFF00;
上:=(简单移动平均(最高价,30) * 1.15);
中1:=(简单移动平均(最高价,3) * 1.03);
中2:=(简单移动平均(最低价,3) * 0.97);
下:=(简单移动平均(最低价,30) * 0.85);
上通道:=(指数平滑移动平均(指数平滑移动平均(指数平滑移动平均(最高价,5),5),5) * 1.05);
显示文字(信号过滤(((最高价 > 上通道) AND (收盘价 < 上通道)),3),(最高价 * 1.04),'●逃'),colorEE00FF;


短期乖离率:=(((收盘价 - 简单移动平均(收盘价,13)) / 简单移动平均(收盘价,13)) * 100);
趋势:=(((5 * 移动平均((((收盘价 - 最低值(最低价,9)) / (最高值(最高价,9) - 最低值(最低价,9))) * 80),5,1)) - (3 * 移动平均(移动平均((((收盘价 - 最低值(最低价,7)) / (最高值(最高价,7) - 最低值(最低价,7))) * 80),5,1),3,1))) - 移动平均(移动平均(移动平均((((收盘价 - 最低值(最低价,20)) / (最高值(最高价,20) - 最低值(最低价,20))) * 80),5,1),3,1),2,1));
趋势1:=简单移动平均(简单移动平均(趋势,5),3);
平衡线:=指数平滑移动平均(指数平滑移动平均(指数平滑移动平均(最高价,3),3),1);
回挡线:=(平衡线 * 0.92);
画图标(((交叉函数(趋势,0) AND (短期乖离率 > 3)) AND ((回挡线 - 向前引用(回挡线,1)) > 0)),最低价,0);
中期大底:=(最低值(最低价,30) * 1.01);
显示文字((((最低价 <= 中期大底) AND ((回挡线 - 向前引用(回挡线,1)) >= (0 - 0.99999))) AND ((收盘价 / 开盘价) > 1.025)),最低价,'买吧'),colorFFFF;
VAR2:=(平衡线 * 0.84);
了结线:=(平衡线 * 1.06);
主线:=加权移动平均(收盘价,8);
VAR1:=乘幂((收盘价 - 主线),1);
VAR2:=简单移动平均(VAR1,3);
VAR3:=开平方(VAR2);
WX:=简单移动平均(收盘价,0);
M1:=(简单移动平均(收盘价,15) * 条件函数((20 < 5),WX,1));
M2:=(简单移动平均(收盘价,20) * 条件函数((20 < 7),WX,1));
显示文字((((((((向前引用(收盘价,1) < M2) AND ((主线 - 向前引用(主线,1)) > 0)) AND ((了结线 - 向前引用(了结线,1)) > 0.01)) AND (最低价 < M2)) AND (收盘价 > M2)) AND ((M1 - 向前引用(M1,1)) > 0)) AND ((收盘价 / 开盘价) > 1.052)),(最低价 - 0.08),'★打劫'),colorFFFF;

MA10:=简单移动平均(收盘价,10);
平均值:=((MA10 / -10) + MA10);
MX:=((平均值 * 2) * 0.54);
MA13:=简单移动平均(收盘价,13);
MA34:=简单移动平均(收盘价,25);
显示文字(信号过滤((((((((上 - 向前引用(上,1)) > 0) AND (短期乖离率 < (0 - 4))) AND (收盘价 < 开盘价)) AND (最低价 <= MA34)) AND (收盘价 < MA13)) AND ((MX - 向前引用(MX,1)) > 0)),1),最低价,'★破多买入'),colorFFFFFF;
短期底:=(最低值(最高价,30) * 0.93);
显示文字((((最低价 <= 短期底) AND (收盘价 < MX)) AND (短期乖离率 > (0 - 8))),(最低价 - 0.15),'★涨20%'),colorFF00;

[ 本帖最后由 包绿天 于 2011-10-18 11:50 编辑 ]

附件

sz.jpg
来自 福建省泉州市

举报

使用道具 扔鸡蛋 回复

1753330
Lv.5

专栏

发表于 2014-1-10 00:26 复制 查看全部楼层 屏蔽
游客,您是(游客)级别,无法查看回复内容,请登录论坛并到新手区学习升级之后才能查看。升级指南请看...
来自 四川省攀枝花市

举报

使用道具 支持 扔鸡蛋 回复

2675828
Lv.1

专栏

发表于 2013-3-9 20:56 复制 查看全部楼层 屏蔽
游客,您是(游客)级别,无法查看回复内容,请登录论坛并到新手区学习升级之后才能查看。升级指南请看...
来自 广东省江门市开平市

举报

使用道具 支持 扔鸡蛋 回复

2449561
Lv.2

专栏

发表于 2011-10-18 17:32 复制 查看全部楼层 屏蔽
游客,您是(游客)级别,无法查看回复内容,请登录论坛并到新手区学习升级之后才能查看。升级指南请看...
来自 福建省泉州市

举报

使用道具 点亮 支持 扔鸡蛋 回复

您需要登录后才可以回帖 登录

本版积分规则 《理想财富服务协议》《免责声明》

楼主
4楼
3楼
2楼
站长推荐 /8
回顶部 到页底
快速回复 返回顶部 返回列表