大话李白兄请进！！

logoslogos

兄看能把这个飞狐的公式改成博弈能用的吗？
如果博弈不能，能改成大智慧能用的？或文华能用的。麻烦您看看。

logoslogos

logoslogos

从最原始的风车水车磨面开始算起，从有脚踏式织布机开始找到准确年份，从有蒸汽机开始计算工业革命，从左轮手枪正式出现在军队制式装备；资本主义社会最早的开始年份，可能无法精确到日期，但年份还是有历史年鉴可查的！
       机械的使用，是人类社会生产力的重大进步，同时也带动了农工商业的萌芽，随之而来的是雇主与工人的社会阶层出现，随之而来的一系列商业模式的雏形……
- V4 v% F4 |( H1 [$ e) e: G% }
       这一切时间统计的划分，中间有一个粗线条的百年规律，基本上是按照每六七十年繁荣向上，十年鼎盛与侵略，而后二十年的磨难及萧条的深渊！而后再十年左右的恢复重生，，，，，，这次似乎需要不止十年……

静处闲看

K-rsi，只需将飞狐中的公式复制到大智慧即可
顾比倒数线需要DDL文件，记得在大智慧中好象也缺少顾比倒数线需要的函数。

静处闲看

对了，K-RSI请在大智慧的副图中使用。

jun_lan74

大话李白

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

,学了几天，勉强编了。以后再优化吧~
% P: S; K  v# b9 I' K) jSTICKLINE(ISEQUAL AND C>=REF(C,1),C,C,3,1),COLORRED;
STICKLINE(ISEQUAL AND C>=REF(C,1),H,L,0,0),COLORRED;
% ]# R2 |* p2 ySTICKLINE(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;
+ ]! V; y1 M+ P% j( j2 p1 iSTICKLINE(ISUP ,C,O,3,1),COLORRED;
STICKLINE(ISDOWN ,H,L,0,0),COLORFFF000;
9 @9 S. R6 [. ]3 X( U. b( v% ~STICKLINE(ISDOWN ,O,C,3,0),COLORFFF000;
( y3 H* c* @" [" ^- }9 vLC:=REF(CLOSE,1);
; c  s; Y, V1 q3 l7 R) t& \$ jRSI:=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;
  y3 x5 p" Z, h/ z# TSTICKLINE(RSI>HH,O,C,3,0),COLORRED;
STICKLINE(RSI>HH AND O<C,O,L,0.5,0),COLORRED;
5 S  w$ n/ \. I7 \* X9 N3 \STICKLINE(RSI>HH AND O>C,C,L,0.5,0),COLORRED;
  @; F* m& C7 A8 ZSTICKLINE(RSI>HH AND O<C,C,H,0.5,0),COLORRED;
STICKLINE(RSI>HH AND O>C,O,H,0.5,0),COLORRED;

0 Q2 o& b8 I" z/ O[ 本帖最后由 大话李白 于 2010-9-3 15:15 编辑 ]

大话李白

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

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

logoslogos

原帖由 大话李白 于 2010-9-4 00:04 发表
# x7 E7 ?9 t; n1 o
顾比倒数线的我再学习下戴若.顾比的理论，看看能编出来不能。因为这个公式是引用DLL文件的。

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

logoslogos

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

多谢静兄了！！！

大话李白

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

不好意思，改的仓促，没有明白公式的意义，现在发个正确的。效果图如下：
* o8 _! S6 L- O1 S4 v& l' C1 q# c. A1. 飞狐效果图如下：
+ h+ R5 L2 ^; j* g- o+ u1 a6 W5 {
( P1 _0 p- @3 Q9 C. u- X2.博易效果图如下：

& a! N3 J* q1 }$ N; M0 D7 {3.博易原码如下：
LC:=REF(CLOSE,1);
! ?4 l8 I5 r- B  @$ Y2 c; R% ERSI:=SMA(MAX(CLOSE-LC,0),N,1)/SMA(ABS(CLOSE-LC),N,1)*100;
4 `2 ]: p8 k( ]9 p( wSTICKLINE(RSI<LL AND C<=REF(C,1),O,C,4,0),COLORGREEN;
  w) i/ E+ \* e3 F( I1 tSTICKLINE(RSI<LL AND C>REF(C,1),O,C,4,1),COLORGREEN;
- C5 _7 F1 c4 }$ DSTICKLINE(RSI<LL AND C<=O,C,L,0,1),COLORGREEN;
! @, v( L4 w5 _  @7 a- PSTICKLINE(RSI<LL AND C>O,O,L,0,1),COLORGREEN;
STICKLINE(RSI<LL AND C<=O,O,H,0,1),COLORGREEN;
+ b# V' l0 R/ VSTICKLINE(RSI<LL AND C>O,C,H,0,1),COLORGREEN;
9 S  K2 m' E: b8 X+ N  ?' P% ?STICKLINE(RSI<LL AND C<=O,C,L,0,1),COLORGREEN;
1 Q2 s6 d) |& }STICKLINE(RSI>HH AND C<=REF(C,1),O,C,4,0),COLORRED;
- i: I! C, ?5 ]7 G6 e: vSTICKLINE(RSI>HH AND C>REF(C,1),O,C,4,1),COLORRED;
! N6 K0 Q& w- w5 E% ^% J) u# x4 uSTICKLINE(RSI>HH AND C<=O,C,L,0,1),COLORRED;
, ~; g  \8 p: J. q+ H0 }) y1 qSTICKLINE(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;
$ V5 m( x8 a$ O7 e" KSTICKLINE(RSI>LL AND RSI<HH AND C<=O,O,H,0,1),COLORFFFF00;
! p8 h5 \0 A( B6 }# Q; Z, [STICKLINE(RSI>LL AND RSI<HH AND C>O,O,L,0,1),COLORFFFF00;
3 `; ^% j0 Y. i( e/ P' u+ JSTICKLINE(RSI>LL AND RSI<HH AND C>O,C,H,0,1),COLORFFFF00;

大话李白

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

3 A1 K8 b& a+ c3 x+ s
带DLL的看不到有没有未来函数，我要做个没有未来的函数的顾比倒数线。请问顾比倒数线的理念是不是下面图中所示？
0 R- c4 n4 O/ L% w6 V- f8 L0 Q2 O

大话李白

原帖由 logoslogos 于 2010-8-26 10:30 发表
1 D( m/ x$ ^) Z! T兄看能把这个飞狐的公式改成博弈能用的吗？
1 g0 b  O' P9 @8 i如果博弈不能，能改成大智慧能用的？或文华能用的。麻烦您看看。9538295383

8 R' G) J3 o. P在网上搜的顾比倒数线的制做方法，做出了在关键点位的顾比倒数线与DLL的数值一致，效果如下图如下:
6 a  Y5 d2 _* o/ D1 T- w2 Q, f

pengyi

我想要的是09年1月1日之后的高低点，但我写出来的是历史的最高最低点，请教：如何改写这个划线指标？谢谢！
9 h0 l$ t  d, u# J; D+ j
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-5 11:08 发表

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

# j; l9 J0 Q/ W' w! f7 a3 D0 T; p# K0 d
9 _# p/ `" `8 A/ D1 P0 P1 C8 l: q2 [
大话李白兄，高人啊，十分感谢！！！
$ M+ t7 }4 N! l0 L
[ 本帖最后由 logoslogos 于 2010-9-6 19:09 编辑 ]

大话李白

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

! ~2 Y5 y5 T( b: h8 I0 W6 L无引用DLL文件，无复杂编程，但有引用未来函数，且不影响使用效果的顾比倒数线－－－－－底部穿越评价线H3已编写完成。效果如下图：

大话李白

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

0 v1 b" A6 @+ Y- t# ^7 Y; _# G/ P无引用DLL文件，无复杂编程，但有引用未来函数，且不影响使用效果的顾比倒数线－－－－－底部穿越评价线H3已编写完成。效果如下图：

忘贴原码了，下面的图片和原码是用于博易大师。
1.效果图如下：
. i! X8 x- u% k% u
9 ?; D! h. W# h2. 原码如下－－－－－说明，我将这两个公式合在一个公式里了，原码如下：
' }6 j! r, c4 D0 G{RSI五彩K线}
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),N,1)/SMA(ABS(CLOSE-LC),N,1)*100;
4 w( Z6 L+ j/ r( d. s, L7 \$ g' jSTICKLINE(RSI<LL AND C<=REF(C,1),O,C,4,0),COLORGREEN;
4 w& q0 L, W6 Y5 n9 cSTICKLINE(RSI<LL AND C>REF(C,1),O,C,4,1),COLORGREEN;
STICKLINE(RSI<LL AND C<=O,C,L,0,1),COLORGREEN;
; g- ^% S7 _# o. V2 S" }/ w* cSTICKLINE(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;
. o8 C, @7 F# d8 p& v5 ^STICKLINE(RSI<LL AND C<=O,C,L,0,1),COLORGREEN;
" ^# P+ r/ r' d- \2 u9 KSTICKLINE(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;
5 a8 X+ i/ k" o+ Q7 Y& ASTICKLINE(RSI>HH AND C<=O,O,H,0,1),COLORRED;
* G$ A. t6 S  M% \+ y/ c# }& ZSTICKLINE(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;
  J$ H% X; d3 o. @8 tSTICKLINE(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;
5 X8 ], b% ^. fSTICKLINE(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;
0 e/ n* K/ E0 b) y0 h7 ]9 c3 J# d/ k 顶部确认线等有空再编吧，何况，顶部确认的理念我还没有确认是否正确。有知道正确的理念的望告知，谢谢！

大话李白

顾比倒数线顶部确认线是不是这样定义的？

大话李白

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

DA:DATE>=1090101;
HV:HHV(H,DA),PRECISION2,LINETHICK0;
! |6 M3 v/ _. B2 \( A8 |LV:LLV(L,DA),PRECISION2,LINETHICK0;
; C% Q$ ?: S- {  D! h0 E  x8 HAY1 ...

您想改成什么样的？

pengyi

原帖由 大话李白 于 2010-9-7 14:13 发表
, i8 |: ^' i: _4 J) y1 z/ j
! I* {$ r" O+ `4 W! y: N7 I9 a您想改成什么样的？

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

大话李白

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


1.效果图如下：

0 `6 J( F# ?) X$ m3 y3 s! x

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

2.修改后效果图：
9 x) Y* _( f7 H" H
' |1 @6 a# m1 @5 [( v8 l4 \5 ]8 N, C{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;
% }( I. O* q* o* k. f5 }+ i' LSTICKLINE(RSI<LL AND C>O,O,L,0,1),COLORGREEN;
STICKLINE(RSI<LL AND C<=O,O,H,0,1),COLORGREEN;
6 R% b. \9 C& c3 B4 CSTICKLINE(RSI<LL AND C>O,C,H,0,1),COLORGREEN;
7 l0 U9 ]9 r4 {; h+ K: LSTICKLINE(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;
$ q* S9 ?8 n' p7 [" D- oSTICKLINE(RSI>HH AND C<=O,C,L,0,1),COLORRED;
/ w  @* h2 L' J; w" mSTICKLINE(RSI>HH AND C<=O,O,H,0,1),COLORRED;
7 r9 Y( A* A5 y) j# K* GSTICKLINE(RSI>HH AND C>O,O,L,0,1),COLORRED;
STICKLINE(RSI>HH AND C>O,C,H,0,1),COLORRED;
4 x. X7 g9 {. T( b- I5 |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;
{顾比倒线底部确认线}
0 U$ G+ C+ ^' w4 y" e1 [2 @' PA:=ZIG(4,10),PRECIS2;
/ r/ u+ d/ s* r. c1 V7 }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;
' e( e" j: e: YH3:REF(H2,BARSLAST(H2<REF(H2,1))+1),PRECIS2,COLORC0C0C0,LINETHICK0;
PARTLINE(REF(H3,1)>0,H3),COLORWHITE,LINETHICK1;
  u* V4 A' i* e# J' }7 c/ n( TVAR1:=(HIGH+LOW+5*CLOSE)/7;
VL1:=LLV(LOW,21);
VH2:=HHV(HIGH,21);
/ K) x' l# j5 h2 ISK:=EMA((VAR1-VL1)/(VH2-VL1)*100,8);
SD:=EMA(0.667*REF(SK,1)+0.333*SK,1);
4 j: b- w7 j) v$ z. I" |SJ:=3*SK-2*SD;
3 k8 s4 `4 I) f; ]* FPARTLINE(SJ<20 AND REF(H3,1)>0,H3),COLORBLUE,LINETHICK3;

% B& m3 x) q% _2 q  J6 u

samyongq

大话李白兄，你在21楼发的公式，好像不能在飞狐里面使用？能否改成飞狐的？

大话李白

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

{顾比倒线底部确认线}
( X1 y+ z3 Y5 A" ]A:=ZIG(4,10),PRECISION2;
# h5 j2 v7 V+ W( z4 K! R# f7 LH1:=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;
8 ^# \) M7 f1 t: g, q" h0 W0 ?H3:REF(H2,BARSLAST(H2<REF(H2,1))+1),PRECISION2,COLORC0C0C0,LINEDOT,COLORBBBBBB;
Var1:=(HIGH+LOW+5*CLOSE)/7;
8 x8 k; @; ?" q/ D8 ]  L) c# zVL1:=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:37 发表 {顾比倒线底部确认线}A:=ZIG(4,10),PRECISION2;H1:=IF(AREF(A,1) AND REF(A,1)

, I. j' k: C& U* k) {6 k老兄是个热心人，

大话李白

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

DA:DATE>=1090101;
6 c$ Q0 b3 i0 h5 |/ B- S( ]) tHV:HHV(H,DA),PRECISION2,LINETHICK0;
LV:LLV(L,DA),PRECISION2,LINETHICK0;
AY1 ...

# w! W9 p' r& f! g, f* R如果用于飞狐原码应如下：
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 12:00 发表

* u- e  C& \* O' J& ^, m5 p# P' i如果用于飞狐原码应如下：
- U6 ^  b1 Q5 ?# P! H( qDA:=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;
- I" ~2 k! ~, n: c- d/ U3 ?* RSH11:LINEVALUE(L=LA,L ...

- @/ u' t8 }* q  e8 v+ u5 w) e, ?% B不好意思，忘贴效果图了。

pengyi

感谢李白兄。
% g7 V. Y( S4 d' C4 M从显示效果来看，我的思路还是有问题。

logoslogos

顾比倒数线的交易含义
http://wenku.baidu.com/view/2327031b6bd97f192279e92a.html