【阳光飞狐__与财富同行】

标题: 大话李白兄请进！！ [打印本页]

作者: logoslogos 时间: 2010-8-26 18:30
标题: 大话李白兄请进！！
兄看能把这个飞狐的公式改成博弈能用的吗？
如果博弈不能，能改成大智慧能用的？或文华能用的。麻烦您看看。[attach]95382[/attach][attach]95383[/attach]

作者: logoslogos 时间: 2010-8-27 08:20

作者: logoslogos 时间: 2010-8-27 08:20
从最原始的风车水车磨面开始算起，从有脚踏式织布机开始找到准确年份，从有蒸汽机开始计算工业革命，从左轮手枪正式出现在军队制式装备；资本主义社会最早的开始年份，可能无法精确到日期，但年份还是有历史年鉴可查的！
机械的使用，是人类社会生产力的重大进步，同时也带动了农工商业的萌芽，随之而来的是雇主与工人的社会阶层出现，随之而来的一系列商业模式的雏形……

这一切时间统计的划分，中间有一个粗线条的百年规律，基本上是按照每六七十年繁荣向上，十年鼎盛与侵略，而后二十年的磨难及萧条的深渊！而后再十年左右的恢复重生，，，，，，这次似乎需要不止十年……

作者: 静处闲看 时间: 2010-8-27 08:55
K-rsi，只需将飞狐中的公式复制到大智慧即可
顾比倒数线需要DDL文件，记得在大智慧中好象也缺少顾比倒数线需要的函数。

作者: 静处闲看 时间: 2010-8-27 09:01
对了，K-RSI请在大智慧的副图中使用。

作者: jun_lan74 时间: 2010-8-27 09:22

作者: 大话李白 时间: 2010-9-3 22:51

原帖由 logoslogos 于 2010-8-26 10:30 发表
兄看能把这个飞狐的公式改成博弈能用的吗？
如果博弈不能，能改成大智慧能用的？或文华能用的。麻烦您看看。9538295383

,学了几天，勉强编了。以后再优化吧~
STICKLINE(ISEQUAL AND C>=REF(C,1),C,C,3,1),COLORRED;
STICKLINE(ISEQUAL AND C>=REF(C,1),H,L,0,0),COLORRED;
STICKLINE(ISEQUAL AND C<REF(C,1),C,C,3,1),COLORFFFF99;
STICKLINE(ISEQUAL AND C<REF(C,1),H,L,0,0),COLORFFFF99;
STICKLINE(ISUP ,H,L,0,0),COLORRED;
STICKLINE(ISUP ,C,O,3,1),COLORRED;
STICKLINE(ISDOWN ,H,L,0,0),COLORFFF000;
STICKLINE(ISDOWN ,O,C,3,0),COLORFFF000;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),N,1)/SMA(ABS(CLOSE-LC),N,1)*100;
STICKLINE(RSI<LL,O,C,3,0),COLORGREEN;
STICKLINE(RSI<LL AND O<C,O,L,0.5,0),COLORGREEN;
STICKLINE(RSI<LL AND O>C,C,L,0.5,0),COLORGREEN;
STICKLINE(RSI<LL AND O>C,O,H,0.5,0),COLORGREEN;
STICKLINE(RSI<LL AND O<C,C,H,0.5,0),COLORGREEN;
STICKLINE(RSI>HH,O,C,3,0),COLORRED;
STICKLINE(RSI>HH AND O<C,O,L,0.5,0),COLORRED;
STICKLINE(RSI>HH AND O>C,C,L,0.5,0),COLORRED;
STICKLINE(RSI>HH AND O<C,C,H,0.5,0),COLORRED;
STICKLINE(RSI>HH AND O>C,O,H,0.5,0),COLORRED;

[ 本帖最后由大话李白于 2010-9-3 15:15 编辑 ]

作者: 大话李白 时间: 2010-9-4 00:04

原帖由 logoslogos 于 2010-8-26 10:30 发表
兄看能把这个飞狐的公式改成博弈能用的吗？
如果博弈不能，能改成大智慧能用的？或文华能用的。麻烦您看看。9538295383

顾比倒数线的我再学习下戴若.顾比的理论，看看能编出来不能。因为这个公式是引用DLL文件的。

作者: logoslogos 时间: 2010-9-4 06:20

原帖由 大话李白 于 2010-9-4 00:04 发表

顾比倒数线的我再学习下戴若.顾比的理论，看看能编出来不能。因为这个公式是引用DLL文件的。

抱歉！现在我把飞狐里那个DLL文件传上来，看有帮助吗？[attach]95742[/attach]

作者: logoslogos 时间: 2010-9-4 06:22

原帖由 静处闲看 于 2010-8-27 09:01 发表
对了，K-RSI请在大智慧的副图中使用。

多谢静兄了！！！

作者: 大话李白 时间: 2010-9-4 22:21

原帖由 logoslogos 于 2010-8-26 10:30 发表
兄看能把这个飞狐的公式改成博弈能用的吗？
如果博弈不能，能改成大智慧能用的？或文华能用的。麻烦您看看。9538295383

不好意思，改的仓促，没有明白公式的意义，现在发个正确的。效果图如下：
1. 飞狐效果图如下：

2.博易效果图如下：

3.博易原码如下：
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),N,1)/SMA(ABS(CLOSE-LC),N,1)*100;
STICKLINE(RSI<LL AND C<=REF(C,1),O,C,4,0),COLORGREEN;
STICKLINE(RSI<LL AND C>REF(C,1),O,C,4,1),COLORGREEN;
STICKLINE(RSI<LL AND C<=O,C,L,0,1),COLORGREEN;
STICKLINE(RSI<LL AND C>O,O,L,0,1),COLORGREEN;
STICKLINE(RSI<LL AND C<=O,O,H,0,1),COLORGREEN;
STICKLINE(RSI<LL AND C>O,C,H,0,1),COLORGREEN;
STICKLINE(RSI<LL AND C<=O,C,L,0,1),COLORGREEN;
STICKLINE(RSI>HH AND C<=REF(C,1),O,C,4,0),COLORRED;
STICKLINE(RSI>HH AND C>REF(C,1),O,C,4,1),COLORRED;
STICKLINE(RSI>HH AND C<=O,C,L,0,1),COLORRED;
STICKLINE(RSI>HH AND C<=O,O,H,0,1),COLORRED;
STICKLINE(RSI>HH AND C>O,O,L,0,1),COLORRED;
STICKLINE(RSI>HH AND C>O,C,H,0,1),COLORRED;
STICKLINE(RSI>LL AND RSI<HH AND C<=REF(C,1),O,C,4,0),COLORFFFF00;
STICKLINE(RSI>LL AND RSI<HH AND C>REF(C,1),O,C,4,1),COLORFFFF00;
STICKLINE(RSI>LL AND RSI<HH AND C<=O,C,L,0,1),COLORFFFF00;
STICKLINE(RSI>LL AND RSI<HH AND C<=O,O,H,0,1),COLORFFFF00;
STICKLINE(RSI>LL AND RSI<HH AND C>O,O,L,0,1),COLORFFFF00;
STICKLINE(RSI>LL AND RSI<HH AND C>O,C,H,0,1),COLORFFFF00;

作者: 大话李白 时间: 2010-9-4 23:38

原帖由 logoslogos 于 2010-8-26 10:30 发表
兄看能把这个飞狐的公式改成博弈能用的吗？
如果博弈不能，能改成大智慧能用的？或文华能用的。麻烦您看看。9538295383

带DLL的看不到有没有未来函数，我要做个没有未来的函数的顾比倒数线。请问顾比倒数线的理念是不是下面图中所示？

作者: 大话李白 时间: 2010-9-5 11:08

原帖由 logoslogos 于 2010-8-26 10:30 发表
兄看能把这个飞狐的公式改成博弈能用的吗？
如果博弈不能，能改成大智慧能用的？或文华能用的。麻烦您看看。9538295383

在网上搜的顾比倒数线的制做方法，做出了在关键点位的顾比倒数线与DLL的数值一致，效果如下图如下:

作者: pengyi 时间: 2010-9-5 17:12
标题: 李白兄，请帮忙改写
我想要的是09年1月1日之后的高低点，但我写出来的是历史的最高最低点，请教：如何改写这个划线指标？谢谢！

DA:DATE>=1090101;
HV:HHV(H,DA),PRECISION2,LINETHICK0;
LV:LLV(L,DA),PRECISION2,LINETHICK0;
AY1:=REF(H,BARSLAST(H=HHV(H,DA))),PRECISION2;
XJ11:LINEVALUE(H=HHV(H,DA),AY1,REF(H,1)=HHV(H,DA),AY1-0.01*AY1,0,1),COLORBLUE,LINETHICK1;
BY1:=REF(H,BARSLAST(L=LLV(L,DA))),PRECISION2;
SH11:LINEVALUE(L=LLV(L,DA),BY1,REF(L,1)=LLV(L,DA),BY1+0.01*BY1,0,1),COLORBLUE,LINETHICK1;

作者: logoslogos 时间: 2010-9-6 19:06

原帖由 大话李白 于 2010-9-5 11:08 发表

在网上搜的顾比倒数线的制做方法，做出了在关键点位的顾比倒数线与DLL的数值一致，效果如下图如下:

大话李白兄，高人啊，十分感谢！！！

[ 本帖最后由 logoslogos 于 2010-9-6 19:09 编辑 ]

作者: 大话李白 时间: 2010-9-7 10:58

原帖由 logoslogos 于 2010-8-26 10:30 发表
兄看能把这个飞狐的公式改成博弈能用的吗？
如果博弈不能，能改成大智慧能用的？或文华能用的。麻烦您看看。9538295383

无引用DLL文件，无复杂编程，但有引用未来函数，且不影响使用效果的顾比倒数线－－－－－底部穿越评价线H3已编写完成。效果如下图：

作者: 大话李白 时间: 2010-9-7 11:05

原帖由 大话李白 于 2010-9-7 02:58 发表

无引用DLL文件，无复杂编程，但有引用未来函数，且不影响使用效果的顾比倒数线－－－－－底部穿越评价线H3已编写完成。效果如下图：

忘贴原码了，下面的图片和原码是用于博易大师。
1.效果图如下：

2. 原码如下－－－－－说明，我将这两个公式合在一个公式里了，原码如下：
{RSI五彩K线}
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),N,1)/SMA(ABS(CLOSE-LC),N,1)*100;
STICKLINE(RSI<LL AND C<=REF(C,1),O,C,4,0),COLORGREEN;
STICKLINE(RSI<LL AND C>REF(C,1),O,C,4,1),COLORGREEN;
STICKLINE(RSI<LL AND C<=O,C,L,0,1),COLORGREEN;
STICKLINE(RSI<LL AND C>O,O,L,0,1),COLORGREEN;
STICKLINE(RSI<LL AND C<=O,O,H,0,1),COLORGREEN;
STICKLINE(RSI<LL AND C>O,C,H,0,1),COLORGREEN;
STICKLINE(RSI<LL AND C<=O,C,L,0,1),COLORGREEN;
STICKLINE(RSI>HH AND C<=REF(C,1),O,C,4,0),COLORRED;
STICKLINE(RSI>HH AND C>REF(C,1),O,C,4,1),COLORRED;
STICKLINE(RSI>HH AND C<=O,C,L,0,1),COLORRED;
STICKLINE(RSI>HH AND C<=O,O,H,0,1),COLORRED;
STICKLINE(RSI>HH AND C>O,O,L,0,1),COLORRED;
STICKLINE(RSI>HH AND C>O,C,H,0,1),COLORRED;
STICKLINE(RSI>LL AND RSI<HH AND C<=REF(C,1),O,C,4,0),COLORFFFF00;
STICKLINE(RSI>LL AND RSI<HH AND C>REF(C,1),O,C,4,1),COLORFFFF00;
STICKLINE(RSI>LL AND RSI<HH AND C<=O,C,L,0,1),COLORFFFF00;
STICKLINE(RSI>LL AND RSI<HH AND C<=O,O,H,0,1),COLORFFFF00;
STICKLINE(RSI>LL AND RSI<HH AND C>O,O,L,0,1),COLORFFFF00;
STICKLINE(RSI>LL AND RSI<HH AND C>O,C,H,0,1),COLORFFFF00;
{顾比倒线底部确认线}
A:=ZIG(4,10),PRECIS2;
H1:=IF(A<REF(A,1),REF(H,1),REF(H,BARSLAST(A>REF(A,1) AND REF(A,1)<REF(A,2))+1)),PRECIS2;
H2:=IF(H1<REF(H1,1),REF(H1,1),REF(H1,BARSLAST(H1<REF(H1,1))+1)),PRECIS2;
H3:REF(H2,BARSLAST(H2<REF(H2,1))+1),PRECIS2;

顶部确认线等有空再编吧，何况，顶部确认的理念我还没有确认是否正确。有知道正确的理念的望告知，谢谢！

作者: 大话李白 时间: 2010-9-7 12:25
顾比倒数线顶部确认线是不是这样定义的？

作者: 大话李白 时间: 2010-9-7 14:13

原帖由 pengyi 于 2010-9-5 09:12 发表
我想要的是09年1月1日之后的高低点，但我写出来的是历史的最高最低点，请教：如何改写这个划线指标？谢谢！

DA:DATE>=1090101;
HV:HHV(H,DA),PRECISION2,LINETHICK0;
LV:LLV(L,DA),PRECISION2,LINETHICK0;
AY1 ...

您想改成什么样的？

作者: pengyi 时间: 2010-9-7 14:52

原帖由 大话李白 于 2010-9-7 14:13 发表

您想改成什么样的？

改成飞狐用的就成。谢谢先。

作者: 大话李白 时间: 2010-9-7 15:46

原帖由 大话李白 于 2010-9-7 03:05 发表

1.效果图如下：

经调试，请将原码改为下面的，在博易大师内，起始的三、四个交易日的H3输出是0。改后虽输出也是0，但不显示了，不会产生主图画面的扭曲。下面是修改前后效果对照图：
1.修改前效果图:

2.修改后效果图：

{RSI五彩K线}
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),N,1)/SMA(ABS(CLOSE-LC),N,1)*100;
STICKLINE(RSI<LL AND C<=REF(C,1),O,C,4,0),COLORGREEN;
STICKLINE(RSI<LL AND C>REF(C,1),O,C,4,1),COLORGREEN;
STICKLINE(RSI<LL AND C<=O,C,L,0,1),COLORGREEN;
STICKLINE(RSI<LL AND C>O,O,L,0,1),COLORGREEN;
STICKLINE(RSI<LL AND C<=O,O,H,0,1),COLORGREEN;
STICKLINE(RSI<LL AND C>O,C,H,0,1),COLORGREEN;
STICKLINE(RSI<LL AND C<=O,C,L,0,1),COLORGREEN;
STICKLINE(RSI>HH AND C<=REF(C,1),O,C,4,0),COLORRED;
STICKLINE(RSI>HH AND C>REF(C,1),O,C,4,1),COLORRED;
STICKLINE(RSI>HH AND C<=O,C,L,0,1),COLORRED;
STICKLINE(RSI>HH AND C<=O,O,H,0,1),COLORRED;
STICKLINE(RSI>HH AND C>O,O,L,0,1),COLORRED;
STICKLINE(RSI>HH AND C>O,C,H,0,1),COLORRED;
STICKLINE(RSI>LL AND RSI<HH AND C<=REF(C,1),O,C,4,0),COLORFFFF00;
STICKLINE(RSI>LL AND RSI<HH AND C>REF(C,1),O,C,4,1),COLORFFFF00;
STICKLINE(RSI>LL AND RSI<HH AND C<=O,C,L,0,1),COLORFFFF00;
STICKLINE(RSI>LL AND RSI<HH AND C<=O,O,H,0,1),COLORFFFF00;
STICKLINE(RSI>LL AND RSI<HH AND C>O,O,L,0,1),COLORFFFF00;
STICKLINE(RSI>LL AND RSI<HH AND C>O,C,H,0,1),COLORFFFF00;
{顾比倒线底部确认线}
A:=ZIG(4,10),PRECIS2;
H1:=IF(A<REF(A,1),REF(H,1),REF(H,BARSLAST(A>REF(A,1) AND REF(A,1)<REF(A,2))+1)),PRECIS2;
H2:=IF(H1<REF(H1,1),REF(H1,1),REF(H1,BARSLAST(H1<REF(H1,1))+1)),PRECIS2;
H3:REF(H2,BARSLAST(H2<REF(H2,1))+1),PRECIS2,COLORC0C0C0,LINETHICK0;
PARTLINE(REF(H3,1)>0,H3),COLORWHITE,LINETHICK1;
VAR1:=(HIGH+LOW+5*CLOSE)/7;
VL1:=LLV(LOW,21);
VH2:=HHV(HIGH,21);
SK:=EMA((VAR1-VL1)/(VH2-VL1)*100,8);
SD:=EMA(0.667*REF(SK,1)+0.333*SK,1);
SJ:=3*SK-2*SD;
PARTLINE(SJ<20 AND REF(H3,1)>0,H3),COLORBLUE,LINETHICK3;

作者: samyongq 时间: 2010-9-7 16:21
大话李白兄，你在21楼发的公式，好像不能在飞狐里面使用？能否改成飞狐的？

作者: 大话李白 时间: 2010-9-7 16:37

原帖由 samyongq 于 2010-9-7 08:21 发表
大话李白兄，你在21楼发的公式，好像不能在飞狐里面使用？能否改成飞狐的？

{顾比倒线底部确认线}
A:=ZIG(4,10),PRECISION2;
H1:=IF(A<REF(A,1),REF(H,1),REF(H,BARSLAST(A>REF(A,1) AND REF(A,1)<REF(A,2))+1)),PRECISION2;
H2:=IF(H1<REF(H1,1),REF(H1,1),REF(H1,BARSLAST(H1<REF(H1,1))+1)),PRECISION2;
H3:REF(H2,BARSLAST(H2<REF(H2,1))+1),PRECISION2,COLORC0C0C0,LINEDOT,COLORBBBBBB;
Var1:=(HIGH+LOW+5*CLOSE)/7;
VL1:=LLV(LOW,21);
VH2:=HHV(HIGH,21);
SK:=EMA((Var1-VL1)/(VH2-VL1)*100,8);
SD:=EMA(0.667*REF(SK,1)+0.333*SK,1);
SJ:=3*Sk-2*SD;
PARTLINE(SJ<20,H3),COLORBLUE,LINETHICK3;
[/quote]
飞狐原码如上。

作者: samyongq 时间: 2010-9-7 16:44

原帖由 大话李白 于 2010-9-7 16:37 发表 {顾比倒线底部确认线}A:=ZIG(4,10),PRECISION2;H1:=IF(AREF(A,1) AND REF(A,1)

老兄是个热心人，

作者: 大话李白 时间: 2010-9-7 20:00

原帖由 pengyi 于 2010-9-5 09:12 发表
我想要的是09年1月1日之后的高低点，但我写出来的是历史的最高最低点，请教：如何改写这个划线指标？谢谢！

DA:DATE>=1090101;
HV:HHV(H,DA),PRECISION2,LINETHICK0;
LV:LLV(L,DA),PRECISION2,LINETHICK0;
AY1 ...

如果用于飞狐原码应如下：
DA:=IF(DATE>1081231,1,0);
DAA:=SUM(DA,0);
LA:=LLV(L,DAA);
HA:=HHV(H,DAA);
XJ11:LINEVALUE(H=HA,H,REF(H,1)=HA,Ha-0.01*HA,0,1),COLORBLUE,LINETHICK1;
SH11:LINEVALUE(L=LA,L,REF(L,1)=LA,L+0.01*LA,0,1),COLORBLUE,LINETHICK1;

作者: 大话李白 时间: 2010-9-7 20:04

原帖由 大话李白 于 2010-9-7 12:00 发表

如果用于飞狐原码应如下：
DA:=IF(DATE>1081231,1,0);
DAA:=SUM(DA,0);
LA:=LLV(L,DAA);
HA:=HHV(H,DAA);
XJ11:LINEVALUE(H=HA,H,REF(H,1)=HA,Ha-0.01*HA,0,1),COLORBLUE,LINETHICK1;
SH11:LINEVALUE(L=LA,L ...

不好意思，忘贴效果图了。

作者: pengyi 时间: 2010-9-7 21:56
感谢李白兄。
从显示效果来看，我的思路还是有问题。

作者: logoslogos 时间: 2010-9-8 08:52
顾比倒数线的交易含义
http://wenku.baidu.com/view/2327031b6bd97f192279e92a.html

欢迎光临【阳光飞狐__与财富同行】 (http://bbs.88158.cn/)