阳光飞狐

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

 找回密码
 手机注册

手机动态码快速登录

手机号快速注册登录

查看: 10380|回复: 61
打印 上一主题 下一主题

有请会飞狐公式的朋友,好消息!!!

[复制链接]
跳转到指定楼层
1#
发表于 2011-1-10 17:01:23 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
这个是经典的清扬公式,公式统计了高低,底高之间的天数 请修改公式,我需要统计高-低,低-高的差值,并标注在图上,最好显示在二值之间或高低数值边上,
; ~! y3 Q, W7 n! A  m/ l2 s' ^+ k1 v根据BAYer的理论,他说股票的每个波动规律都是固定,一旦找到个股的波动规律,你就有福了。我希望各位利用这个清扬波浪,和BAYER的理论一起发财,呵呵。* h* B  h2 l4 e* b
关于BAYER的理论,有兴趣的话,我在详细说说。先谢谢公式高人了。。。嘻嘻嘻。。。' @7 E5 L- \9 ]! Z
& h- g) }( n: r/ ?* g+ H
[ 本帖最后由 logoslogos 于 2011-1-10 17:04 编辑 ]

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?手机注册 手机动态码快速登录

x

评分

3

查看全部评分

2#
 楼主| 发表于 2011-1-10 17:09:13 | 只看该作者
A1:=REF(HIGH,3)=HHV(HIGH,2*3+1); B1:=FILTER(A1,3); C1:=BACKSET(B1,3+1); D1:=FILTER(C1,3);{高点}, Y+ c0 X( W0 {4 @; g8 H4 h' m, l, ]
A2:=REF(LOW,3)=LLV(LOW,2*3+1); B2:=FILTER(A2,3); C2:=BACKSET(B2,3+1); D2:=FILTER(C2,3);{低点}, ?7 H& t: w' ~: @! D+ p
E1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2; E2:=(HIGH+LOW)/2;{高低点出现在同一K线上时可作取舍}
! C; M( P& n# o/ j" J4 t) SH1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
- \+ g7 Q. m; U$ {! U9 S+ iL1:=(D2 AND NOT(D1 AND E1<E2)); H2:=D1 AND NOT(D2 AND E1>=E2);3 i8 E. j0 ^: c6 K
X1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,10000),X1));  e: d+ t! x1 t- ~. {# q
G1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:=I1>REF(I1,1);{过滤后低点}
* Z1 v+ {" f7 r! @, J" H( q6 I5 d* `L2:=LD OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
; m/ `" w7 }) T! v9 E7 m" FX2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2));
! Z+ R3 n; \( A8 }) N5 c6 d" w$ p; F3 WG2:=F2>REF(F2,1); I2:=BACKSET(G2,2); HD:=I2>REF(I2,1);{过滤后高点}5 h% U# T) y% O8 z3 t
DRAWLINE(LD,L,HD,H,0),COLORWHITE,LINETHICK1,POINTDOT;* u/ \1 ~" j: k5 E1 r0 X
DRAWLINE(HD,H,LD,L,0),COLORWHITE,LINETHICK1,POINTDOT;) J5 U$ E: l. b; o& ]' b
J1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HD),BARSLAST(LD))+1); J2:=J1>REF(J1,1);
: v! w/ ?; K; dDRAWLINE(J2,IF(HD,H,L),ISLASTBAR,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),COLORWHITE,LINETHICK1,POINTDOT;9 p' d7 h# J8 _- i7 W* ^% u
{以上语句为新结构波浪}9 g/ [2 J& n3 E- L4 K6 I
8 B7 |5 w0 n3 P9 r6 l# r
A3:=H<REF(H,REF(BARSLAST(HD),1)+1);; R( G. u7 P1 ^. z
B3:=REF(H,REF(BARSLAST(HD),1)+1)>REF(H,REF(BARSLAST(HD),1)+2+REF(BARSLAST(HD),REF(BARSLAST(HD),1)+2));
1 b5 h2 J* ?  qD3:=A3 AND B3 AND HD; E3:=BACKSET(D3,REF(BARSLAST(HD),1)+2); HH:=E3>REF(E3,1);{找出全部长期高点}: ^/ k: K! E, _  x( i9 O
A4:=L>REF(L,REF(BARSLAST(LD),1)+1);* J& B9 G" z$ P0 t4 V; m/ @
B4:=REF(L,REF(BARSLAST(LD),1)+1)<REF(L,REF(BARSLAST(LD),1)+2+REF(BARSLAST(LD),REF(BARSLAST(LD),1)+2));
; |7 b) l8 e5 q8 C; s2 z5 p  AD4:=A4 AND B4 AND LD; E4:=BACKSET(D4,REF(BARSLAST(LD),1)+2); LL:=E4>REF(E4,1);{找出全部长期低点}
) K' j8 D8 s+ L5 WDRAWICON(HH,H,10),ALIGN2; DRAWICON(LL,L,12),ALIGN1;
6 w3 |* I: c1 k" }, EH3:=HH OR ISLASTBAR OR BARSCOUNT(C)=1; {后面进行过滤,方法同前。只是不用考虑高低点出现在同一K线}
/ U$ n& D: x- S4 J# D1 O+ U. AX3:=REF(BARSLAST(H3),1)+1; F3:=BACKSET(H3 AND COUNT(LL,X3)>0,LLVBARS(IF(LL,L,POW(10,20)),X3));
' E; o7 }" D# S3 y  _G3:=F3>REF(F3,1); I3:=BACKSET(G3,2); LZ:=I3>REF(I3,1),LINETHICK0; {长期低点,也可供引用}  f3 g' s+ N. u, q$ ]
L4:=LZ OR ISLASTBAR OR BARSCOUNT(C)=1;: j& r* T( L. C8 D% m
X4:=REF(BARSLAST(L4),1)+1; F4:=BACKSET(L4 AND COUNT(HH,X4)>0,HHVBARS(IF(HH,H,-POW(10,20)),X4));
- _' Y  r1 Z5 X0 \* S6 L/ LG4:=F4>REF(F4,1); I4:=BACKSET(G4,2); HZ:=I4>REF(I4,1),LINETHICK0;{长期高点,也可供引用}
& H6 k1 i9 V  F4 p1 b* {8 f9 DDRAWLINE(HZ,H,LZ,L,0),COLORGREEN,LINETHICK1; 1 d  Y. G9 `% N/ o$ o5 h
DRAWLINE(LZ,L,HZ,H,0),COLORGREEN,LINETHICK1;{长期连线}4 K: t7 L1 x/ B: Q1 T
K1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HZ),BARSLAST(LZ))+1); K2:=K1>REF(K1,1);1 _7 R+ C) M# E4 Z5 x
DRAWLINE(K2,IF(HZ,H,L),ISLASTBAR,C,0),COLORGREEN,LINETHICK1; {最后的长期连线,连在收盘价上}
# u% a7 Y. Y4 R" N) W, c3 y( c
! X; X* w+ v( i) y+ ^+ }* l" L{以下是两条趋势线原码}1 [, Q+ @" B- h; d( k& G
UU:=BACKSET(ISLASTBAR,BARSLAST(LD)+1);
% w5 G+ V& l- X4 I& VVV:=UU>REF(UU,1);
' @" A" I% y4 X3 s4 _, @- WWW:=BACKSET(VV,REF(BARSLAST(LD),1)+2);; N6 O" p* Z7 f! Z) K" v& D# Q
XX:=WW>REF(WW,1);% }9 Z$ @4 Y% I& @0 n
DRAWLINE(XX,L,VV,L,1),COLORMAGENTA,LINETHICK1;# L' F  [& E& l4 _0 W. I
UU2:=BACKSET(ISLASTBAR,BARSLAST(HD)+1);" z1 {8 h- g6 @$ `1 E3 |! \3 c
VV2:=UU2>REF(UU2,1);
$ S. h( I1 P9 F7 ^' F& eWW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);* F  O% e) I% O3 [( o; P) x
XX2:=WW2>REF(WW2,1);
0 {$ g$ ~3 u  k8 j2 SDRAWLINE(XX2,H,VV2,H,1),COLORMAGENTA,LINETHICK1;
$ X" i0 ^# }2 m: z+ ]1 j* Q* x8 i: J( j7 O' O: ^
前一低:REF(L,BARSLAST(VV)),COLOR99FF66,POINTDOT,LINETHICK3;: ^6 x& a; U1 H9 }1 L7 h
前二低:REF(L,BARSLAST(XX)),COLORFF66FF,POINTDOT,LINETHICK3;5 w* k3 _% R. Z/ j* N; Z% o
前一高:REF(H,BARSLAST(VV2)),COLOR99FF66,POINTDOT,LINETHICK3;. ^6 o2 i+ m& N2 o7 f, Y7 O
前二高:REF(H,BARSLAST(XX2)),COLORFF66FF,POINTDOT,LINETHICK3;5 X+ m# N. _9 }' @6 M1 h
短高:=REF(H,BARSLAST(VV2)),LINETHICK0;! x& x3 |* p9 {" D1 e
短低:=REF(L,BARSLAST(VV)),LINETHICK0;
' i% R$ V$ O+ [0 S短比: (C-短低)/(短高-短低),LINETHICK0;
2 l' s$ N; b! Q* e5 F! K7 u9 M: h9 d" g
{以下语句是大盘趋势叠加}
, Y* n2 q' A1 R. e3 }. g$ h9 [常数:=REF(INDEXC,BARSLAST(VV))/REF(C,BARSLAST(VV));
. `6 F* A: U( p$ ~$ R叠1:INDEXC/常数,COLORGRAY,LINETHICK0;
( j* ~: e  w2 A9 RPARTLINE(1,叠1),COLORGRAY;# G  b: B" X; B4 k) ^, H% _& O
常数2:=REF(INDEXC,BARSLAST(XX))/REF(C,BARSLAST(XX));$ H8 x+ {9 }1 ]  J& E/ P  Q' {
叠2:INDEXC/常数2,COLORGRAY,LINETHICK0;
' ~! I: ]# _  uPARTLINE(1,叠2),COLORGRAY;
- i& m4 k/ x) H! B$ T$ Y% C- y: V$ N( j* w* n0 b' I! d$ U7 E. Z
DRAWNUMBER(HD,1.02*H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),COLORCYAN;% a$ ~+ M: b% U1 H% u* i
DRAWNUMBER(LD,0.98*L,DATEDIFF(REF(DATE,BARSLAST(HD)),DATE),0),COLORCYAN;
! ]4 M+ a+ U5 Y  y% D# m5 v- i
/ p+ D$ U9 q: eDRAWNUMBER(HD,H*(1+0.002),H,2),COLORBLUE,ALIGN0;9 o! B/ `; G7 a/ p# @* R: B
DRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORBLUE,ALIGN0;
1 b; b' @5 q  e* c# w" Q7 ]# F- |6 B' }& U4 o
{以下语句为三角形部分}
% h, w6 s; G& @% b% c! b( A7 m" G- z& N/ i% ]+ a
底:REF(L,BARSLAST(VV)),COLORred,LINETHICK2;
7 S" h0 @& r1 W5 Z) J$ @# D! M頂:REF(H,BARSLAST(VV2)),COLORGreen,LINETHICK2;; J+ W  c5 K. {6 W% k

2 \0 Z8 s" j5 U6 T* g: E- N7 S{下迭三角形:藍色三角形畫完介入}
8 v$ r1 T; [" l" o  Q; MStickLine(VV,頂,底,0,0),Colorff6633,linethick3;{}
9 O& K+ G; @! V+ cDRAWLINE(VV2,H,VV,L,0),Colorff6633,linethick3;{斜}
, {; [( Z7 x* H6 p/ w& @DRAWLINE(VV2,H,VV,頂,0),Colorff6633,linethick3;{?}3 L+ q1 {, F& a! N4 G

4 a% b9 C/ y% J/ T) K8 F{DRAWLINE(c>0,H,VV,L,0),Colorcyan,linethick2;}{斜}
  K$ g* ]; i1 g" y2 y- P- P{DRAWLINE(c>1,H,VV,頂,0),Colorcyan,linethick2;}{?}6 Z8 J1 `6 L& }! j
{上漲三角形:紅色三角形畫完出局}  {+ `  r5 G3 Z$ C* A* u* G
StickLine(VV2 ,頂,底,0,0),Colorred,linethick3;{}( _/ T' u/ ]9 ^4 @6 A: y
DRAWLINE(VV,L,VV2,H,0),Colorred,linethick3;{斜}
2 [* V% l& K1 y( tDRAWLINE(VV,L,VV2,底,0),Colorred,linethick3;{?};

评分

4

查看全部评分

3#
发表于 2011-1-10 17:53:51 | 只看该作者
加这8行+ m0 A; v) V; }9 C
a1:=ref(h,barslast(hd));
5 y0 `, F' I( d- x2 [" R* d/ ea2:=ref(L,barslast(Ld));
1 {* k1 t* d+ D  Q- t% Y1 vdrawnumber(ld,a2*0.95,(a1-a2),2),colorred;! d5 V$ z& }  m! S, r6 Y! [+ f
drawnumber(hd,a1*1.05,(a1-a2),2),colorwhite;
! C5 G% k+ @6 h$ ?& l$ g3 qa11:=ref(h,barslast(hz));
- A9 |  y: G* Ia22:=ref(L,barslast(Lz));
9 ]8 `7 J. c6 [9 ?4 ]% R- h$ ydrawnumber(Lz,a22*0.87,(a11-a22),2),coloryellow;
' \6 n" a6 \4 bdrawnumber(hz,a11*1.13,(a11-a22),2),coloryellow;
( }2 G! M! ~( w+ ?" c
  I2 W; u) `2 l. _: M[ 本帖最后由 ycng 于 2011-1-10 18:03 编辑 ]

评分

2

查看全部评分

4#
发表于 2011-1-10 19:22:45 | 只看该作者
5#
发表于 2011-1-10 19:42:38 | 只看该作者
原帖由 logoslogos 于 2011-1-10 17:01 发表
' k: S! r* \* t2 h1 u" a这个是经典的清扬公式,公式统计了高低,底高之间的天数, 请修改公式,我需要统计高-低,低-高的差值,并标注在图上,最好显示在二值之间或高低数值边上,。0 Y( y/ P4 M! ^0 n, S. x
根据BAYer的理论,他说股票的每个波动规律都是固定,一 ...
. F1 j0 l* O6 |* p5 x4 ^
很不错的指标; 把字改为白色好看一点

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?手机注册 手机动态码快速登录

x
6#
发表于 2011-1-10 20:13:18 | 只看该作者
7#
发表于 2011-1-10 20:23:19 | 只看该作者
原公式中红色四句改成以下蓝色的四句,K线上下标注的价格就不会太靠近K线了。) K. q) P8 S+ }, o  a1 r* s5 X

+ R, j6 u0 F/ ~DRAWNUMBER(HD,H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),PXUP70,COLORCYAN;
1 }9 M+ S! N- o4 K) b' ~, wDRAWNUMBER(LD,L,DATEDIFF(REF(DATE,BARSLAST(HD)),DATE),0),PXDN70,COLORCYAN;
" M) J! R1 g9 ^# o
DRAWNUMBER(HD,H*(1+0.002),H,2),COLORWHITE,PXUP30,ALIGN0;/ g8 U- \7 ^1 t9 \* x
DRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORWHITE,PXDN30,ALIGN0;
# z! a" [8 T/ c/ `3 X
源码中叠加大盘趋势(下面源码中绿色的)画成了灰色,改成黄色比较醒目一些:* Z  C2 R4 M7 w
叠1:INDEXC/常数,COLORYELLOW,LINETHICK0;
* B+ q7 |+ \5 ]4 ~4 o# YPARTLINE(1,叠1),COLORYELLOW;# T. @, ^8 U/ f& ~
常数2:=REF(INDEXC,BARSLAST(XX))/REF(C,BARSLAST(XX));
( ?6 P1 o" C4 f7 E5 Y3 P叠2:INDEXC/常数2,COLORYELLOW,LINETHICK0;
6 p4 }3 C9 }3 J) t* r, r: k0 i- nPARTLINE(1,叠2),COLORYELLOW;$ m3 n. Y# L! i3 ?1 r0 t
& x, O/ B1 `1 {$ }
! T, ]- b0 \/ s9 {0 i

4 y$ C& g6 F* Q5 M源码:9 c  I: n, G9 J0 A# X' k5 e
A1:=REF(HIGH,3)=HHV(HIGH,2*3+1); B1:=FILTER(A1,3); C1:=BACKSET(B1,3+1); D1:=FILTER(C1,3);{高点}
' A( N% f: a3 R1 F! [- oA2:=REF(LOW,3)=LLV(LOW,2*3+1); B2:=FILTER(A2,3); C2:=BACKSET(B2,3+1); D2:=FILTER(C2,3);{低点}$ Q0 U# H" n4 z1 l' `1 Q1 G
E1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2; E2:=(HIGH+LOW)/2;{高低点出现在同一K线上时可作取舍}. t& Z& k% b1 T, i5 |: {9 Z
H1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
, o, \/ e; G7 R5 AL1:=(D2 AND NOT(D1 AND E1<E2)); H2:=D1 AND NOT(D2 AND E1>=E2);" `9 @; s  B% w% a3 y$ f' ~
X1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,10000),X1));& |3 _; u2 y5 r* p  m
G1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:=I1>REF(I1,1);{过滤后低点}% p% h. I! W9 B5 J; v
L2:=LD OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;6 S9 W$ R0 Z/ ^! z* K* z( [
X2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2));
& N' H1 i  w0 Y- u4 a9 eG2:=F2>REF(F2,1); I2:=BACKSET(G2,2); HD:=I2>REF(I2,1);{过滤后高点}
9 X/ |/ ~/ y: H6 @DRAWLINE(LD,L,HD,H,0),COLORWHITE,LINETHICK1,POINTDOT;
+ t7 d* h" G0 T9 fDRAWLINE(HD,H,LD,L,0),COLORWHITE,LINETHICK1,POINTDOT;
& B; t5 n, S3 }! I  z1 j% C# _J1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HD),BARSLAST(LD))+1); J2:=J1>REF(J1,1);
; u6 ~# g* Y5 R! n+ p# K0 GDRAWLINE(J2,IF(HD,H,L),ISLASTBAR,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),COLORWHITE,LINETHICK1,POINTDOT;
2 J' X. w7 m$ Y! V# Z' Z: o{以上语句为新结构波浪}
* _( i) }9 ^* p9 V0 W) |
! A) e' z* O$ D" u  z2 n" {$ I) JA3:=H<REF(H,REF(BARSLAST(HD),1)+1);; ~' e# J' Y. _: z. ?7 C
B3:=REF(H,REF(BARSLAST(HD),1)+1)>REF(H,REF(BARSLAST(HD),1)+2+REF(BARSLAST(HD),REF(BARSLAST(HD),1)+2));
2 n: f: R0 T7 j8 gD3:=A3 AND B3 AND HD; E3:=BACKSET(D3,REF(BARSLAST(HD),1)+2); HH:=E3>REF(E3,1);{找出全部长期高点}2 b' o* ^' A0 o* M5 R+ E) i2 s6 h) v
A4:=L>REF(L,REF(BARSLAST(LD),1)+1);
/ D0 G6 i: S( x0 r9 wB4:=REF(L,REF(BARSLAST(LD),1)+1)<REF(L,REF(BARSLAST(LD),1)+2+REF(BARSLAST(LD),REF(BARSLAST(LD),1)+2));
, H2 _6 [+ g! l4 |. k/ e0 S" JD4:=A4 AND B4 AND LD; E4:=BACKSET(D4,REF(BARSLAST(LD),1)+2); LL:=E4>REF(E4,1);{找出全部长期低点}
5 P1 Y5 K2 F: |" a0 P( A! sDRAWICON(HH,H,10),ALIGN2; DRAWICON(LL,L,12),ALIGN1;- P5 I) A2 y) z. C, i, L5 C" d
H3:=HH OR ISLASTBAR OR BARSCOUNT(C)=1; {后面进行过滤,方法同前。只是不用考虑高低点出现在同一K线}
2 r9 I' L  L) _# OX3:=REF(BARSLAST(H3),1)+1; F3:=BACKSET(H3 AND COUNT(LL,X3)>0,LLVBARS(IF(LL,L,POW(10,20)),X3));+ _$ J7 l% ?) q) P% `. I
G3:=F3>REF(F3,1); I3:=BACKSET(G3,2); LZ:=I3>REF(I3,1),LINETHICK0; {长期低点,也可供引用}
1 {  I2 y0 q) ~" N+ `" BL4:=LZ OR ISLASTBAR OR BARSCOUNT(C)=1;
3 A2 F* A, T) r! X2 {( aX4:=REF(BARSLAST(L4),1)+1; F4:=BACKSET(L4 AND COUNT(HH,X4)>0,HHVBARS(IF(HH,H,-POW(10,20)),X4));
9 m* W1 H# c* I0 ]" hG4:=F4>REF(F4,1); I4:=BACKSET(G4,2); HZ:=I4>REF(I4,1),LINETHICK0;{长期高点,也可供引用}0 A3 ~; }' _1 {5 K6 k; W+ n6 z! P$ L
DRAWLINE(HZ,H,LZ,L,0),COLORGREEN,LINETHICK1; ) x8 B7 m, S3 j& F
DRAWLINE(LZ,L,HZ,H,0),COLORGREEN,LINETHICK1;{长期连线}
6 k: Q3 P& C  T7 Y' c, a# dK1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HZ),BARSLAST(LZ))+1); K2:=K1>REF(K1,1);
  Y$ i  [8 E1 M8 C1 S) c. uDRAWLINE(K2,IF(HZ,H,L),ISLASTBAR,C,0),COLORGREEN,LINETHICK1; {最后的长期连线,连在收盘价上}
/ U8 c9 u! A4 E# l* U! z% n1 i% r( B+ v6 z2 Q/ }- S5 z
{以下是两条趋势线原码}
/ I( l" l" t7 Y8 S+ wUU:=BACKSET(ISLASTBAR,BARSLAST(LD)+1);* G. r) ?9 ^, z7 V- \" {$ A3 D/ m
VV:=UU>REF(UU,1);3 Z& A. E4 P2 w+ q: o
WW:=BACKSET(VV,REF(BARSLAST(LD),1)+2);
3 ^. ^0 P2 t/ Q' j" s9 hXX:=WW>REF(WW,1);
, ?- y6 U8 G0 YDRAWLINE(XX,L,VV,L,1),COLORMAGENTA,LINETHICK1;
5 h; g  O1 f. g' c" Y! C, WUU2:=BACKSET(ISLASTBAR,BARSLAST(HD)+1);: ^$ G7 x" L  w, ?
VV2:=UU2>REF(UU2,1);) Q" f5 H4 T+ {/ Z" e0 O
WW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);+ r- H/ o$ Y6 P2 M5 A6 l; v$ {
XX2:=WW2>REF(WW2,1);7 T; n$ U- g" O# {7 ]& H4 b0 d
DRAWLINE(XX2,H,VV2,H,1),COLORMAGENTA,LINETHICK1;
8 O8 T& S7 V+ p* E; e. n: Z1 U3 C4 C/ W' m1 H8 s% \
前一低:REF(L,BARSLAST(VV)),COLOR99FF66,POINTDOT,LINETHICK3;
& A4 N# a# {  @前二低:REF(L,BARSLAST(XX)),COLORFF66FF,POINTDOT,LINETHICK3;
# s0 z, y" O" b前一高:REF(H,BARSLAST(VV2)),COLOR99FF66,POINTDOT,LINETHICK3;
9 H; Y& s! Z3 A8 T) B0 F  v/ G" C前二高:REF(H,BARSLAST(XX2)),COLORFF66FF,POINTDOT,LINETHICK3;
; |' J9 ^: J. q5 _& p/ W% l- y  l短高:=REF(H,BARSLAST(VV2)),LINETHICK0;0 T% J4 V& w) M# N7 A# J2 ]4 X; e1 c
短低:=REF(L,BARSLAST(VV)),LINETHICK0;
: \& D  _1 w8 Q3 ^' R& ^( m短比: (C-短低)/(短高-短低),LINETHICK0;
8 x0 {8 _& q  c$ X; I
) E) H4 R4 i; z2 L" k% b( [{以下语句是大盘趋势叠加}) {3 R: r0 B# ^; Y# m! L( z! }
常数:=REF(INDEXC,BARSLAST(VV))/REF(C,BARSLAST(VV));3 X. `& ^7 m- {8 b/ H' \
叠1:INDEXC/常数,COLORGRAY,LINETHICK0;9 a( A) w* ]+ H. U  C
PARTLINE(1,叠1),COLORGRAY;
7 Q+ r& I& C; V; J* e( F' U常数2:=REF(INDEXC,BARSLAST(XX))/REF(C,BARSLAST(XX));" M$ n! [8 T0 s5 w$ |
叠2:INDEXC/常数2,COLORGRAY,LINETHICK0;+ ^4 ]+ `3 M) ?8 U/ J8 K/ I" R7 Q
PARTLINE(1,叠2),COLORGRAY;* i# o/ Z) K2 c9 R1 z
) Y) y: E4 w& x) \
DRAWNUMBER(HD,1.02*H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),COLORCYAN;
2 G4 C8 Y& w$ jDRAWNUMBER(LD,0.98*L,DATEDIFF(REF(DATE,BARSLAST(HD)),DATE),0),COLORCYAN;0 ?2 |+ K0 E1 e4 A

* d& O) E% }3 c! b! J& c; F, S9 WDRAWNUMBER(HD,H*(1+0.002),H,2),COLORBLUE,ALIGN0;/ `9 [* s2 L- U4 l/ O8 u- j
DRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORBLUE,ALIGN0;/ |- A* N, F& ~* Q" J% ~

% H0 X- F) i, k8 K1 g) Y
{以下语句为三角形部分}
: o3 p& ~  Q/ x5 S- x# }, v; a5 J" K3 }# U$ x
底:REF(L,BARSLAST(VV)),COLORred,LINETHICK2;
4 y; n: C& j6 E% F! b, W6 x頂:REF(H,BARSLAST(VV2)),COLORGreen,LINETHICK2;
) W8 Q% M# a4 }/ t7 O. N* H- e: a& I: l/ \8 E. W; t  M3 Z4 _
{下迭三角形:藍色三角形畫完介入}
+ b* `1 _2 X  t) ]+ QStickLine(VV,頂,底,0,0),Colorff6633,linethick3;{}
% k. M7 f! k. |+ g% f6 ZDRAWLINE(VV2,H,VV,L,0),Colorff6633,linethick3;{斜}
* E/ X! |! l' ?1 D, p8 c* vDRAWLINE(VV2,H,VV,頂,0),Colorff6633,linethick3;{?}  j+ J$ U* C% A2 T6 |
$ O( C4 M: N3 z+ {7 i* C! t
{DRAWLINE(c>0,H,VV,L,0),Colorcyan,linethick2;}{斜}
" t4 f0 A: S4 H{DRAWLINE(c>1,H,VV,頂,0),Colorcyan,linethick2;}{?}
. G+ ]' _2 @: f/ C# @1 y{上漲三角形:紅色三角形畫完出局}
, P! L: b0 y% h4 h# D$ B  L! x0 N. vStickLine(VV2 ,頂,底,0,0),Colorred,linethick3;{}
7 c2 \* H) N8 B- l( HDRAWLINE(VV,L,VV2,H,0),Colorred,linethick3;{斜}  t5 N- P2 m, {! k3 v5 G8 ^% n
DRAWLINE(VV,L,VV2,底,0),Colorred,linethick3;{?};
; j( \3 U$ J, U; F
& a2 n- C- C) g[ 本帖最后由 恒益 于 2011-1-10 20:31 编辑 ]
8#
发表于 2011-1-10 20:41:42 | 只看该作者
BACKSET算不算未来函数?
9#
发表于 2011-1-10 20:54:10 | 只看该作者
好公式
10#
发表于 2011-1-10 21:09:10 | 只看该作者
日期对不上,不是交易日吗?
11#
发表于 2011-1-10 21:53:07 | 只看该作者
好东东!!
12#
发表于 2011-1-10 22:02:18 | 只看该作者
辛苦了
13#
发表于 2011-1-10 22:39:15 | 只看该作者
, t; _: l' |& m7 }% o2 J  K* s
* U) C4 w& v2 S
你们改好了,我再装!
14#
发表于 2011-1-10 23:08:41 | 只看该作者
15#
发表于 2011-1-10 23:29:50 | 只看该作者
统计高-低,低-高的差值
& v2 M: @/ c' j# i----指高-低的值 减去 低-高 的值吗?- e2 R8 c! o' U/ j& S. v
) [5 r4 |7 m6 P* N
现在显示的是自然日的差值,要自然日还是交易日?
16#
发表于 2011-1-10 23:33:44 | 只看该作者
17#
发表于 2011-1-10 23:56:38 | 只看该作者
& t8 G# E6 X+ c+ D: c4 g; y
* T5 Q' u2 I+ `: A* ?, Q9 \+ P1 t
a1:=ref(h,barslast(hd));
1 X7 _5 ^1 o0 N: @0 F$ fa2:=ref(L,barslast(Ld));
/ u/ A% s- z# ^6 K- @' U/ C- la11:=ref(h,barslast(hz));
- j+ }% c5 ^4 b; |% o* Xa22:=ref(L,barslast(Lz));
0 K. Q5 a4 R! \- [. n, P0 Qdrawtext(ld,a2*0.95,'P '),color009900;
# W5 n+ }& b6 @# r) i6 xdrawnumber(ld,a2*0.95,(a1-a2),2),colorred,shift2;
7 e7 m  L+ d( f# zdrawtext(hd,a1*1.05,'P '),color009900;" \9 H. L  y0 ^/ o7 c" B5 U$ m
drawnumber(hd,a1*1.05,(a1-a2),2),colorwhite,shift2;
& h' d' H4 @4 W6 ]8 `drawtext(Lz,a22*0.87,'P '),color009900;' n) B6 ~/ N: V( o
drawnumber(Lz,a22*0.87,(a11-a22),2),coloryellow,shift2;
5 C7 C( _3 O# J: pdrawtext(hz,a11*1.13,'P '),color009900;/ Y2 E/ W2 l( W# A, E
drawnumber(hz,a11*1.13,(a11-a22),2),coloryellow,shift2;0 U, @" U/ J, x- ^- C: h8 j7 E$ r

2 A7 e2 r% ?" K( P7 D% O5 xdrawtext(ld,a2*0.92,'T '),color999999;
, Y2 n8 M& W* c: V+ A& d2 Ndrawnumber(ld,a2*0.92,barslast(hd),0),colorgreen,shift2;
5 a* J$ T8 G* w7 F( ~0 Kdrawtext(hd,a1*1.08,'T '),color999999;7 {0 I& r5 a8 N4 [2 I8 Y
drawnumber(hd,a1*1.08,barslast(Ld),0),colorgreen,shift2;
: m8 M% t' M- L& b& ?, b$ U6 cdrawtext(Lz,a22*0.84,'T '),color999999;5 f* U1 g7 n. H/ x. n
drawnumber(Lz,a22*0.84,barslast(hz),0),colorred,shift2;
0 V7 t3 i) W5 D4 {drawtext(hz,a11*1.17,'T '),color999999;4 Y8 Y) ]% r( m
drawnumber(hz,a11*1.17,barslast(Lz),0),colorred,shift2;
$ H2 Q, ]; h% C8 ~4 R2 ]5 E: M
$ V6 C- n5 I5 ^9 y# a) @1 }" p[ 本帖最后由 ycng 于 2011-1-10 23:58 编辑 ]

评分

1

查看全部评分

18#
发表于 2011-1-11 00:09:21 | 只看该作者
后面加上这些代码就O了。
- W- x, x% d  Y6 Z' W, p: d网站不给贴,搞个附件上来打开看就可以了。4 B6 E2 z) l5 ^9 P0 ^+ b

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?手机注册 手机动态码快速登录

x
19#
发表于 2011-1-11 01:42:56 | 只看该作者
20#
发表于 2011-1-11 05:36:56 | 只看该作者
21#
 楼主| 发表于 2011-1-11 10:47:07 | 只看该作者
原帖由 bibihead 于 2011-1-10 23:29 发表 . f0 M3 X9 f0 H+ [2 Z$ _
统计高-低,低-高的差值# n" j+ R. T3 D, Q
----指高-低的值 减去 低-高 的值吗?
7 T5 e. d- }' n  e5 u8 p8 ?8 z7 q
4 F( S% B. E: ~* Y3 W3 t3 w' w& b现在显示的是自然日的差值,要自然日还是交易日?
/ \  ?, i' C8 [9 a* H
不是统计时间的差值,是统计高-低价格的差值,目的是统计观察价格(空间的)波动距离,
4 ]/ h/ m: r5 n0 H( h6 f8 P1 M我是要用这个公式去方便验证BAYER的一个股价波动距离的理论。呵呵,多谢!!!
22#
发表于 2011-1-11 10:48:43 | 只看该作者
有请高手~~~~~~~~~~~~~~~~~~~~~
23#
 楼主| 发表于 2011-1-11 10:50:15 | 只看该作者
我一楼没说清楚
, W/ [; H# d! B) @. K8 _7 E我需要统计高-低,低-高的价格差值,谢谢
24#
 楼主| 发表于 2011-1-11 11:13:20 | 只看该作者
原公式中红色四句改成以下蓝色的四句,K线上下标注的价格就不会太靠近K线了。
8 f4 l2 q$ E5 y/ N% U
+ n! D6 [0 V: }6 T8 n8 a: \DRAWNUMBER(HD,H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),PXUP70,COLORCYAN;. T. c' c* g7 m: z; R5 L' C
DRAWNUMBER(LD,L,DATEDIFF(REF(DATE,BARSLAST(HD)),DATE),0),PXDN70,COLORCYAN;7 E" T$ `! p) I- s5 X: c2 u3 F
DRAWNUMBER(HD,H*(1+0.002),H,2),COLORWHITE,PXUP30,ALIGN0;
1 M1 n5 S7 r* n( c: v( q  p# qDRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORWHITE,PXDN30,ALIGN0;) w' G7 @: A6 ]
+ M* {6 F6 O! R0 P  r4 F
呵呵,恰恰相反的需要呢。我希望标识的价格差值距离K线近些,现在距离太远了。谢
25#
发表于 2011-1-11 14:36:25 | 只看该作者
26#
发表于 2011-1-11 16:06:07 | 只看该作者
原帖由 ycng 于 2011-1-10 23:56 发表
$ H  ^+ I3 |2 F5 V8 U. I- v0 c) \6 m8 }/ o
1 J8 A4 ~' x- N; U" T" X
a1:=ref(h,barslast(hd));
: O5 k8 w" W6 t7 j" W/ pa2:=ref(L,barslast(Ld));
6 n' @1 y$ p" W! j& F( z' Oa11:=ref(h,barslast(hz));* N5 W% |  t- `' j
a22:=ref(L,barslast(Lz));; ]) L" S6 H5 Q7 `0 a5 v- O9 T
drawtext(ld,a2*0.95,'P '),color009900;3 U: j% V# w5 ]- n; X3 G
drawnumber(ld,a2*0.95,(a1-a2),2),colorred,shift2 ...

( e+ T+ f( E) Q; R谢谢ycng兄妙手点缀- ]( W* s& K9 D  s% a% H; Y  C; }

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?手机注册 手机动态码快速登录

x
27#
发表于 2011-1-11 16:58:39 | 只看该作者
公式高手不少
28#
发表于 2011-1-11 19:30:23 | 只看该作者
29#
发表于 2011-1-11 19:49:29 | 只看该作者
原帖由 于afafaf  2011-1-11 16:06 发表
; ~6 r! [) M9 l; p: {4 C, N* `' t" ~* R3 Z. R1 `' _$ `  v
谢谢ycng兄妙手点缀, U/ G' @2 G$ b; d% ?# t! F
99290

9 w- Z( P5 S, h7 n请问afafaf 兄要修改那条公式才能有这种排列格式呢?谢谢!
30#
发表于 2011-1-11 21:12:01 | 只看该作者
原帖由 axcqy 于 2011-1-11 19:49 发表 - T4 l* U- y, U0 `4 C( Y

2 x3 V- |0 R% A; ]3 Y请问afafaf 兄要修改那条公式才能有这种排列格式呢?谢谢!

  S8 a% Y1 n9 Y. l7 G
( G6 v. i/ H' |. P& L( U- m3 S% \; ?) |& o* R
DRAWNUMBER(HD,1.02*H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),COLORCYAN;
( }6 X& g: L# n6 x" {- IDRAWNUMBER(LD,0.98*L,DATEDIFF(REF(DATE,BARSLAST(HD)),DATE),0),COLORCYAN;
0 [- O2 m& a, F+ R+ ]1 Z9 B  \' T% D* G3 E( ?$ h* V  j
a1:=ref(h,barslast(hd));! ~$ {7 |6 @9 j' s$ m
a2:=ref(L,barslast(Ld));* x/ x5 D0 }* d' t+ d
a11:=ref(h,barslast(hz));
5 b: y9 @, v  g: J8 Wa22:=ref(L,barslast(Lz));  h3 N2 w' @% k  A4 ~
drawtext(ld,a2*0.95,'P '),color009900;" J& Z/ k6 x9 h- \; k
drawnumber(ld,a2*0.95,(a1-a2),2),colorred,shift2;  F' Z3 B9 O& B9 c1 q# S7 O% m
drawtext(hd,a1*1.05,'P '),color009900;2 H1 S4 i8 W  f8 J" ?" E$ B5 A! D
drawnumber(hd,a1*1.05,(a1-a2),2),colorwhite,shift2;
% w, h+ X* t! T7 f) |: [, ?drawtext(Lz,a22*0.87,'P '),color009900;
& h( w, j" p# wdrawnumber(Lz,a22*0.87,(a11-a22),2),coloryellow,shift2;7 s( l1 q) H5 ?7 D! d
drawtext(hz,a11*1.13,'P '),color009900;
9 z2 |4 n. I1 E1 ]. x: xdrawnumber(hz,a11*1.13,(a11-a22),2),coloryellow,shift2;* {. K+ ~6 j  \
drawtext(ld,a2*0.92,'T '),color999999;6 Z6 q# ], p- o- w& z3 s8 W: K
drawnumber(ld,a2*0.92,barslast(hd),0),colorgreen,shift2;; R5 W7 ^$ m) F( t! A" U, J
drawtext(hd,a1*1.08,'T '),color999999;
* T/ A( [; {- t* r9 @% w3 Mdrawnumber(hd,a1*1.08,barslast(Ld),0),colorgreen,shift2;
  h3 K" C7 Y3 ?, R- Tdrawtext(Lz,a22*0.84,'T '),color999999;% D+ B& X0 _" u! ?2 i% X: T
drawnumber(Lz,a22*0.84,barslast(hz),0),colorred,shift2;
8 S9 Y9 B/ V' I) Udrawtext(hz,a11*1.17,'T '),color999999;0 c. J! ^7 v  `2 v
drawnumber(hz,a11*1.17,barslast(Lz),0),colorred,shift2;
6 R+ y5 X8 j" _: C! x' U. l5 Q" a, i4 V& a# ~2 y* }
[ 本帖最后由 afafaf 于 2011-1-11 21:13 编辑 ]

评分

2

查看全部评分

您需要登录后才可以回帖 登录 | 手机注册 手机动态码快速登录

本版积分规则

QQ|小黑屋|手机版|Archiver|【阳光飞狐】 ( 网站ICP编号:京ICP备06013475号-7 )

GMT+8, 2026-9-2 23:31 , Processed in 0.165140 second(s), 20 queries .

Powered by Discuz! X3.2 Licensed

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表