有请会飞狐公式的朋友，好消息！！！

logoslogos

这个是经典的清扬公式，公式统计了高低，底高之间的天数， 请修改公式，我需要统计高-低，低-高的差值，并标注在图上，最好显示在二值之间或高低数值边上，。
根据BAYer的理论，他说股票的每个波动规律都是固定，一旦找到个股的波动规律，你就有福了。我希望各位利用这个清扬波浪，和BAYER的理论一起发财，呵呵。
关于BAYER的理论，有兴趣的话，我在详细说说。先谢谢公式高人了。。。嘻嘻嘻。。。

& F9 l$ ~- w" K) ~4 M+ r[ 本帖最后由 logoslogos 于 2011-1-10 17:04 编辑 ]

logoslogos

A1:=REF(HIGH,3)=HHV(HIGH,2*3+1); B1:=FILTER(A1,3); C1:=BACKSET(B1,3+1); D1:=FILTER(C1,3);{高点}
6 i8 U$ d  z  l- L/ EA2:=REF(LOW,3)=LLV(LOW,2*3+1); B2:=FILTER(A2,3); C2:=BACKSET(B2,3+1); D2:=FILTER(C2,3);{低点}
8 V1 [( z7 h: r8 w8 |$ i( H& M) tE1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2; E2:=(HIGH+LOW)/2;{高低点出现在同一K线上时可作取舍}
! F* y8 j- U* _* x* {5 p9 BH1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
( w! {3 Q& W* y9 \4 \0 ]" ~2 ~L1:=(D2 AND NOT(D1 AND E1<E2)); H2:=D1 AND NOT(D2 AND E1>=E2);
* O! d! ~( {: ^7 GX1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,10000),X1));
G1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:=I1>REF(I1,1);{过滤后低点}
L2:=LD OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
X2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2));
: [5 V# ?* w/ I: ^( {. W+ v1 L+ uG2:=F2>REF(F2,1); I2:=BACKSET(G2,2); HD:=I2>REF(I2,1);{过滤后高点}
DRAWLINE(LD,L,HD,H,0),COLORWHITE,LINETHICK1,POINTDOT;
8 M1 l% D8 b3 \" f3 S. u: o0 UDRAWLINE(HD,H,LD,L,0),COLORWHITE,LINETHICK1,POINTDOT;
J1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HD),BARSLAST(LD))+1); J2:=J1>REF(J1,1);
DRAWLINE(J2,IF(HD,H,L),ISLASTBAR,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),COLORWHITE,LINETHICK1,POINTDOT;
5 s" C- `: r+ u3 e, j; M7 e{以上语句为新结构波浪}
5 f' q$ f: w  T- a$ y5 k. n( M  x1 R
7 O, o# W* W& `2 ~6 c3 s" aA3:=H<REF(H,REF(BARSLAST(HD),1)+1);
B3:=REF(H,REF(BARSLAST(HD),1)+1)>REF(H,REF(BARSLAST(HD),1)+2+REF(BARSLAST(HD),REF(BARSLAST(HD),1)+2));
; Y$ f! A  N5 L+ f4 DD3:=A3 AND B3 AND HD; E3:=BACKSET(D3,REF(BARSLAST(HD),1)+2); HH:=E3>REF(E3,1);{找出全部长期高点}
+ m$ n3 y5 v/ k7 G% q, i+ wA4:=L>REF(L,REF(BARSLAST(LD),1)+1);
B4:=REF(L,REF(BARSLAST(LD),1)+1)<REF(L,REF(BARSLAST(LD),1)+2+REF(BARSLAST(LD),REF(BARSLAST(LD),1)+2));
- A5 M; m/ z! v: ^* Y$ ^D4:=A4 AND B4 AND LD; E4:=BACKSET(D4,REF(BARSLAST(LD),1)+2); LL:=E4>REF(E4,1);{找出全部长期低点}
DRAWICON(HH,H,10),ALIGN2; DRAWICON(LL,L,12),ALIGN1;
2 G# \  ~- K  K% {1 \H3:=HH OR ISLASTBAR OR BARSCOUNT(C)=1; {后面进行过滤，方法同前。只是不用考虑高低点出现在同一K线}
X3:=REF(BARSLAST(H3),1)+1; F3:=BACKSET(H3 AND COUNT(LL,X3)>0,LLVBARS(IF(LL,L,POW(10,20)),X3));
6 R) @+ G3 |* eG3:=F3>REF(F3,1); I3:=BACKSET(G3,2); LZ:=I3>REF(I3,1),LINETHICK0; {长期低点，也可供引用}
L4:=LZ OR ISLASTBAR OR BARSCOUNT(C)=1;
X4:=REF(BARSLAST(L4),1)+1; F4:=BACKSET(L4 AND COUNT(HH,X4)>0,HHVBARS(IF(HH,H,-POW(10,20)),X4));
( N* D: F8 e1 Y5 SG4:=F4>REF(F4,1); I4:=BACKSET(G4,2); HZ:=I4>REF(I4,1),LINETHICK0;{长期高点，也可供引用}
3 J, ]7 {' n' ?* \0 k- j; P) M2 ~DRAWLINE(HZ,H,LZ,L,0),COLORGREEN,LINETHICK1;
) j0 q. A8 \* Y7 LDRAWLINE(LZ,L,HZ,H,0),COLORGREEN,LINETHICK1;{长期连线}
* l- m' X+ s6 D! MK1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HZ),BARSLAST(LZ))+1); K2:=K1>REF(K1,1);
9 H( T3 V3 e* S; z2 g& z! N' s. wDRAWLINE(K2,IF(HZ,H,L),ISLASTBAR,C,0),COLORGREEN,LINETHICK1; {最后的长期连线，连在收盘价上}
$ ~8 w& g; i( e' v& o% Z
! k* ?& A7 {% _% e  f9 \{以下是两条趋势线原码}
( q1 n% m( X9 o3 N; ~UU:=BACKSET(ISLASTBAR,BARSLAST(LD)+1);
8 _9 `7 c1 O' I6 S9 nVV:=UU>REF(UU,1);
WW:=BACKSET(VV,REF(BARSLAST(LD),1)+2);
$ K  E1 G: F8 kXX:=WW>REF(WW,1);
! T: B. ]& }2 UDRAWLINE(XX,L,VV,L,1),COLORMAGENTA,LINETHICK1;
( n7 K% V% H- S6 t) SUU2:=BACKSET(ISLASTBAR,BARSLAST(HD)+1);
VV2:=UU2>REF(UU2,1);
WW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);
XX2:=WW2>REF(WW2,1);
DRAWLINE(XX2,H,VV2,H,1),COLORMAGENTA,LINETHICK1;
. b4 S7 g/ b0 D) q
0 A  A. n  C7 @8 j7 V# [3 |前一低:REF(L,BARSLAST(VV)),COLOR99FF66,POINTDOT,LINETHICK3;
前二低:REF(L,BARSLAST(XX)),COLORFF66FF,POINTDOT,LINETHICK3;
+ X  ?5 B- `; n$ B0 |; d前一高:REF(H,BARSLAST(VV2)),COLOR99FF66,POINTDOT,LINETHICK3;
& d( ]1 ], R& V前二高:REF(H,BARSLAST(XX2)),COLORFF66FF,POINTDOT,LINETHICK3;
' a9 N. k" A3 k9 n2 ], x短高:=REF(H,BARSLAST(VV2)),LINETHICK0;
短低:=REF(L,BARSLAST(VV)),LINETHICK0;
短比: (C-短低)/(短高-短低),LINETHICK0;
3 A5 K7 Z' ~6 l* r& [. ~  R8 I
{以下语句是大盘趋势叠加}
3 e+ K9 `4 n1 h! L/ l常数:=REF(INDEXC,BARSLAST(VV))/REF(C,BARSLAST(VV));
叠1:INDEXC/常数,COLORGRAY,LINETHICK0;
PARTLINE(1,叠1),COLORGRAY;
5 V5 f+ y$ R6 P& l  e6 S常数2:=REF(INDEXC,BARSLAST(XX))/REF(C,BARSLAST(XX));
- K/ L! m* C- `2 Z0 {3 }2 e叠2:INDEXC/常数2,COLORGRAY,LINETHICK0;
9 h: k$ l, f7 W% t" D$ XPARTLINE(1,叠2),COLORGRAY;
) ?# Q- C$ T8 L* c3 C# F$ e
% ~6 r, ~" r0 w  KDRAWNUMBER(HD,1.02*H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),COLORCYAN;
" E0 V9 J$ l; B7 tDRAWNUMBER(LD,0.98*L,DATEDIFF(REF(DATE,BARSLAST(HD)),DATE),0),COLORCYAN;

DRAWNUMBER(HD,H*(1+0.002),H,2),COLORBLUE,ALIGN0;
DRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORBLUE,ALIGN0;

{以下语句为三角形部分}
3 K$ e/ J: Z3 {$ L
  V8 ]" h2 R6 \# d* x, P4 q底:REF(L,BARSLAST(VV)),COLORred,LINETHICK2;
; q) N: ~7 V& B: O4 @1 G頂:REF(H,BARSLAST(VV2)),COLORGreen,LINETHICK2;

{下迭三角形：藍色三角形畫完介入}
. ~- a* a( R- `1 H; y, O" bStickLine(VV,頂,底,0,0),Colorff6633,linethick3;{}
) O5 ?; c) r& c5 Y- }3 VDRAWLINE(VV2,H,VV,L,0),Colorff6633,linethick3;{斜}
3 l# |! L3 z; T( DDRAWLINE(VV2,H,VV,頂,0),Colorff6633,linethick3;{?}
7 m. l: J! {; x( ]
{DRAWLINE(c>0,H,VV,L,0),Colorcyan,linethick2;}{斜}
$ _( `  i& e7 b" v% e( r{DRAWLINE(c>1,H,VV,頂,0),Colorcyan,linethick2;}{?}
; F2 F% |: n4 |, `{上漲三角形：紅色三角形畫完出局}
8 E, H. P1 W# E# t, f2 V2 _StickLine(VV2 ,頂,底,0,0),Colorred,linethick3;{}
$ O& I8 n2 L# ~7 N; PDRAWLINE(VV,L,VV2,H,0),Colorred,linethick3;{斜}
9 R: H  }# O/ G/ I4 m' mDRAWLINE(VV,L,VV2,底,0),Colorred,linethick3;{?};

ycng

加这8行
6 t0 E/ V$ v8 O' \; qa1:=ref(h,barslast(hd));
8 N3 c* \" _' C8 d! }a2:=ref(L,barslast(Ld));
6 O) Z5 {+ l' q2 m1 [* N2 {$ Vdrawnumber(ld,a2*0.95,(a1-a2),2),colorred;
& ?+ d/ `2 `/ U( Z6 b6 s0 xdrawnumber(hd,a1*1.05,(a1-a2),2),colorwhite;
a11:=ref(h,barslast(hz));
a22:=ref(L,barslast(Lz));
drawnumber(Lz,a22*0.87,(a11-a22),2),coloryellow;
5 y3 F8 @! L. I1 c! V; hdrawnumber(hz,a11*1.13,(a11-a22),2),coloryellow;
; u. g* _. c. |) j' `" ^3 {
: G6 Y0 X, t! h* P" N. }+ ]& m6 G[ 本帖最后由 ycng 于 2011-1-10 18:03 编辑 ]

axcqy

axcqy

原帖由 logoslogos 于 2011-1-10 17:01 发表
" t- q  R; Q' o/ h+ A$ P1 d这个是经典的清扬公式，公式统计了高低，底高之间的天数， 请修改公式，我需要统计高-低，低-高的差值，并标注在图上，最好显示在二值之间或高低数值边上，。
( s# G3 I, E5 o; f2 [" G6 O4 k" G% \4 P根据BAYer的理论，他说股票的每个波动规律都是固定，一 ...

很不错的指标; 把字改为白色好看一点

mcwhmm

恒益

原公式中红色四句改成以下蓝色的四句，K线上下标注的价格就不会太靠近K线了。
) B& T% S. b9 ^# J* K- l
DRAWNUMBER(HD,H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),PXUP70,COLORCYAN;
/ l: q" @$ o1 v% O  nDRAWNUMBER(LD,L,DATEDIFF(REF(DATE,BARSLAST(HD)),DATE),0),PXDN70,COLORCYAN;
9 t* F, ?+ A& C) h' R* QDRAWNUMBER(HD,H*(1+0.002),H,2),COLORWHITE,PXUP30,ALIGN0;
. l9 s0 N$ K& ^1 pDRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORWHITE,PXDN30,ALIGN0;
源码中叠加大盘趋势（下面源码中绿色的）画成了灰色，改成黄色比较醒目一些：
( H; y0 {' C9 J+ X7 j叠1:INDEXC/常数,COLORYELLOW,LINETHICK0;
PARTLINE(1,叠1),COLORYELLOW;
常数2:=REF(INDEXC,BARSLAST(XX))/REF(C,BARSLAST(XX));
, J; w  v7 Z8 Z0 U$ m叠2:INDEXC/常数2,COLORYELLOW,LINETHICK0;
PARTLINE(1,叠2),COLORYELLOW;
4 E5 R$ [8 f' n$ y/ g1 s( t


$ n9 j3 I1 W. k% X源码：
) V$ G7 T! `; iA1:=REF(HIGH,3)=HHV(HIGH,2*3+1); B1:=FILTER(A1,3); C1:=BACKSET(B1,3+1); D1:=FILTER(C1,3);{高点}
A2:=REF(LOW,3)=LLV(LOW,2*3+1); B2:=FILTER(A2,3); C2:=BACKSET(B2,3+1); D2:=FILTER(C2,3);{低点}
E1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2; E2:=(HIGH+LOW)/2;{高低点出现在同一K线上时可作取舍}
0 u0 V. k" \- e( A3 BH1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
L1:=(D2 AND NOT(D1 AND E1<E2)); H2:=D1 AND NOT(D2 AND E1>=E2);
: Q6 r1 Z% Y+ ?* g! o+ j% v0 UX1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,10000),X1));
+ h# i# C  V; p1 gG1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:=I1>REF(I1,1);{过滤后低点}
L2:=LD OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
: P1 ^: L$ c3 S3 ^X2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2));
G2:=F2>REF(F2,1); I2:=BACKSET(G2,2); HD:=I2>REF(I2,1);{过滤后高点}
DRAWLINE(LD,L,HD,H,0),COLORWHITE,LINETHICK1,POINTDOT;
DRAWLINE(HD,H,LD,L,0),COLORWHITE,LINETHICK1,POINTDOT;
! I! u5 M9 ^/ k/ |/ rJ1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HD),BARSLAST(LD))+1); J2:=J1>REF(J1,1);
2 \6 j. C- ]/ {$ d# B( jDRAWLINE(J2,IF(HD,H,L),ISLASTBAR,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),COLORWHITE,LINETHICK1,POINTDOT;
  W, U& i9 f! z{以上语句为新结构波浪}
- }) c- a. n# H! T, R: L1 O
A3:=H<REF(H,REF(BARSLAST(HD),1)+1);
& g) D$ b3 W: o. T5 NB3:=REF(H,REF(BARSLAST(HD),1)+1)>REF(H,REF(BARSLAST(HD),1)+2+REF(BARSLAST(HD),REF(BARSLAST(HD),1)+2));
D3:=A3 AND B3 AND HD; E3:=BACKSET(D3,REF(BARSLAST(HD),1)+2); HH:=E3>REF(E3,1);{找出全部长期高点}
3 \3 I9 P% Q6 j# \+ C& KA4:=L>REF(L,REF(BARSLAST(LD),1)+1);
B4:=REF(L,REF(BARSLAST(LD),1)+1)<REF(L,REF(BARSLAST(LD),1)+2+REF(BARSLAST(LD),REF(BARSLAST(LD),1)+2));
D4:=A4 AND B4 AND LD; E4:=BACKSET(D4,REF(BARSLAST(LD),1)+2); LL:=E4>REF(E4,1);{找出全部长期低点}
8 V$ Z  r* d2 t9 c7 qDRAWICON(HH,H,10),ALIGN2; DRAWICON(LL,L,12),ALIGN1;
H3:=HH OR ISLASTBAR OR BARSCOUNT(C)=1; {后面进行过滤，方法同前。只是不用考虑高低点出现在同一K线}
X3:=REF(BARSLAST(H3),1)+1; F3:=BACKSET(H3 AND COUNT(LL,X3)>0,LLVBARS(IF(LL,L,POW(10,20)),X3));
G3:=F3>REF(F3,1); I3:=BACKSET(G3,2); LZ:=I3>REF(I3,1),LINETHICK0; {长期低点，也可供引用}
! ]. V; \" r% K5 GL4:=LZ OR ISLASTBAR OR BARSCOUNT(C)=1;
X4:=REF(BARSLAST(L4),1)+1; F4:=BACKSET(L4 AND COUNT(HH,X4)>0,HHVBARS(IF(HH,H,-POW(10,20)),X4));
G4:=F4>REF(F4,1); I4:=BACKSET(G4,2); HZ:=I4>REF(I4,1),LINETHICK0;{长期高点，也可供引用}
DRAWLINE(HZ,H,LZ,L,0),COLORGREEN,LINETHICK1;
DRAWLINE(LZ,L,HZ,H,0),COLORGREEN,LINETHICK1;{长期连线}
K1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HZ),BARSLAST(LZ))+1); K2:=K1>REF(K1,1);
DRAWLINE(K2,IF(HZ,H,L),ISLASTBAR,C,0),COLORGREEN,LINETHICK1; {最后的长期连线，连在收盘价上}
- o# y" m7 h) N) \/ e* G
8 E4 R0 F" @! d{以下是两条趋势线原码}
UU:=BACKSET(ISLASTBAR,BARSLAST(LD)+1);
VV:=UU>REF(UU,1);
WW:=BACKSET(VV,REF(BARSLAST(LD),1)+2);
3 c. _1 p: O9 ~3 N( H9 rXX:=WW>REF(WW,1);
' f2 C( S7 v" ZDRAWLINE(XX,L,VV,L,1),COLORMAGENTA,LINETHICK1;
) h' q' s. Q( C: h" J: u% r2 s4 X' SUU2:=BACKSET(ISLASTBAR,BARSLAST(HD)+1);
VV2:=UU2>REF(UU2,1);
WW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);
XX2:=WW2>REF(WW2,1);
9 y# ?( D& l9 Z  X# E! a+ uDRAWLINE(XX2,H,VV2,H,1),COLORMAGENTA,LINETHICK1;
/ K. C2 `% m5 H8 b
+ j1 T9 k5 D6 O7 U9 \3 z3 {1 R+ d  E前一低:REF(L,BARSLAST(VV)),COLOR99FF66,POINTDOT,LINETHICK3;
前二低:REF(L,BARSLAST(XX)),COLORFF66FF,POINTDOT,LINETHICK3;
$ ~3 ?% s4 u; U前一高:REF(H,BARSLAST(VV2)),COLOR99FF66,POINTDOT,LINETHICK3;
前二高:REF(H,BARSLAST(XX2)),COLORFF66FF,POINTDOT,LINETHICK3;
2 a) V$ U9 D6 Y) p短高:=REF(H,BARSLAST(VV2)),LINETHICK0;
短低:=REF(L,BARSLAST(VV)),LINETHICK0;
8 P; H0 B8 e: |" u5 _/ Y短比: (C-短低)/(短高-短低),LINETHICK0;
7 Z7 K1 W7 S5 c5 \+ A
{以下语句是大盘趋势叠加}
, ~" I4 y6 _- n  n常数:=REF(INDEXC,BARSLAST(VV))/REF(C,BARSLAST(VV));
叠1:INDEXC/常数,COLORGRAY,LINETHICK0;
; g5 U' O' E- a) d. UPARTLINE(1,叠1),COLORGRAY;
常数2:=REF(INDEXC,BARSLAST(XX))/REF(C,BARSLAST(XX));
$ y6 x. ]! @" p/ k3 R7 V叠2:INDEXC/常数2,COLORGRAY,LINETHICK0;
PARTLINE(1,叠2),COLORGRAY;

DRAWNUMBER(HD,1.02*H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),COLORCYAN;
DRAWNUMBER(LD,0.98*L,DATEDIFF(REF(DATE,BARSLAST(HD)),DATE),0),COLORCYAN;
1 [5 E  q; G* e2 B
9 R/ H% F" }( n- zDRAWNUMBER(HD,H*(1+0.002),H,2),COLORBLUE,ALIGN0;
DRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORBLUE,ALIGN0;
' O) j2 C4 [5 O
{以下语句为三角形部分}

底:REF(L,BARSLAST(VV)),COLORred,LINETHICK2;
頂:REF(H,BARSLAST(VV2)),COLORGreen,LINETHICK2;
( j9 h* @! C: s6 Q! X0 o
{下迭三角形：藍色三角形畫完介入}
StickLine(VV,頂,底,0,0),Colorff6633,linethick3;{}
. y9 p  C. a( T1 V8 NDRAWLINE(VV2,H,VV,L,0),Colorff6633,linethick3;{斜}
DRAWLINE(VV2,H,VV,頂,0),Colorff6633,linethick3;{?}
; V+ f4 Y* k, Z# t+ O7 f1 S' ~
- U1 \5 g" U6 s5 {{DRAWLINE(c>0,H,VV,L,0),Colorcyan,linethick2;}{斜}
/ P# L  P6 ~8 p" S{DRAWLINE(c>1,H,VV,頂,0),Colorcyan,linethick2;}{?}
  w, \0 V+ Q3 Y, a$ F& K8 c{上漲三角形：紅色三角形畫完出局}
5 L/ _) W) c5 _5 r% r$ _StickLine(VV2 ,頂,底,0,0),Colorred,linethick3;{}
DRAWLINE(VV,L,VV2,H,0),Colorred,linethick3;{斜}
4 g- P8 n# T0 LDRAWLINE(VV,L,VV2,底,0),Colorred,linethick3;{?};

[ 本帖最后由 恒益 于 2011-1-10 20:31 编辑 ]

恒益

BACKSET算不算未来函数？

tupiter

好公式

悠然踏浪

日期对不上,不是交易日吗?

hippe

好东东！！

woaigutou

辛苦了

天蓝蓝

* h& V" s: h3 ?! N. r$ j" P
你们改好了，我再装！

adinos

bibihead

统计高-低，低-高的差值
----指高-低的值 减去 低-高 的值吗？
2 `* [4 u2 N+ x
! U0 U% p* P+ Z1 ^* J现在显示的是自然日的差值，要自然日还是交易日？

chaosxu

ycng

加
& [" C9 B4 e, [7 J5 C( E5 A
3 o7 W3 a( [/ z- t: va1:=ref(h,barslast(hd));
a2:=ref(L,barslast(Ld));
a11:=ref(h,barslast(hz));
a22:=ref(L,barslast(Lz));
1 ]1 [0 t2 |  Adrawtext(ld,a2*0.95,'P '),color009900;
drawnumber(ld,a2*0.95,(a1-a2),2),colorred,shift2;
0 F. v! u, f* i4 O+ G7 u  ?drawtext(hd,a1*1.05,'P '),color009900;
drawnumber(hd,a1*1.05,(a1-a2),2),colorwhite,shift2;
drawtext(Lz,a22*0.87,'P '),color009900;
drawnumber(Lz,a22*0.87,(a11-a22),2),coloryellow,shift2;
drawtext(hz,a11*1.13,'P '),color009900;
drawnumber(hz,a11*1.13,(a11-a22),2),coloryellow,shift2;
/ P- @$ {$ l% h0 z8 i7 u! Q+ C
" O6 w& v! S$ I; {9 ~drawtext(ld,a2*0.92,'T '),color999999;
  Y, A) G/ o, R2 vdrawnumber(ld,a2*0.92,barslast(hd),0),colorgreen,shift2;
, \" }; D! g# Z  `( V' Pdrawtext(hd,a1*1.08,'T '),color999999;
drawnumber(hd,a1*1.08,barslast(Ld),0),colorgreen,shift2;
drawtext(Lz,a22*0.84,'T '),color999999;
drawnumber(Lz,a22*0.84,barslast(hz),0),colorred,shift2;
8 n4 l; T9 O. h9 ldrawtext(hz,a11*1.17,'T '),color999999;
drawnumber(hz,a11*1.17,barslast(Lz),0),colorred,shift2;

[ 本帖最后由 ycng 于 2011-1-10 23:58 编辑 ]

bibihead

后面加上这些代码就O了。
0 i- f) J6 |$ p3 s) X- h* X网站不给贴，搞个附件上来打开看就可以了。
4 m9 S% Q0 U: |9 O. m

489km

jwchj

logoslogos

原帖由 bibihead 于 2011-1-10 23:29 发表
统计高-低，低-高的差值
" ~* P4 D5 h3 {9 q4 z----指高-低的值 减去 低-高 的值吗？

" r$ h% w- `& P; s, H* i现在显示的是自然日的差值，要自然日还是交易日？

6 C  [5 P; J' M, f7 V不是统计时间的差值，是统计高-低价格的差值，目的是统计观察价格（空间的）波动距离，
$ |! }( U, h+ p0 H) s我是要用这个公式去方便验证BAYER的一个股价波动距离的理论。呵呵，多谢！！！

mrgjy1818

有请高手~~~~~~~~~~~~~~~~~~~~~

logoslogos

我一楼没说清楚
$ f" h! p# ]. B3 V5 A8 o8 X我需要统计高-低，低-高的价格差值，谢谢

logoslogos

原公式中红色四句改成以下蓝色的四句，K线上下标注的价格就不会太靠近K线了。

DRAWNUMBER(HD,H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),PXUP70,COLORCYAN;
DRAWNUMBER(LD,L,DATEDIFF(REF(DATE,BARSLAST(HD)),DATE),0),PXDN70,COLORCYAN;
) t  C- l! R; P4 FDRAWNUMBER(HD,H*(1+0.002),H,2),COLORWHITE,PXUP30,ALIGN0;
DRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORWHITE,PXDN30,ALIGN0;

8 m& b( l' H4 O6 S0 [( }5 u呵呵，恰恰相反的需要呢。我希望标识的价格差值距离K线近些，现在距离太远了。谢

何时回头是岸

谢

afafaf

原帖由 ycng 于 2011-1-10 23:56 发表
) h! u  y# c9 G加
* Q+ h( t' t: G$ W& _
a1:=ref(h,barslast(hd));
a2:=ref(L,barslast(Ld));
a11:=ref(h,barslast(hz));
( w, u3 C5 D6 |6 Oa22:=ref(L,barslast(Lz));
drawtext(ld,a2*0.95,'P '),color009900;
drawnumber(ld,a2*0.95,(a1-a2),2),colorred,shift2 ...

0 F0 _1 Z* G7 F/ x6 d谢谢ycng兄妙手点缀

散户甲

公式高手不少

axcqy

axcqy

原帖由 于afafaf  2011-1-11 16:06 发表
/ x+ q' X3 h0 u& Y+ ?& k# n
谢谢ycng兄妙手点缀
! D: H' U. y& q$ n! K99290

请问afafaf 兄要修改那条公式才能有这种排列格式呢?谢谢!

afafaf

原帖由 axcqy 于 2011-1-11 19:49 发表
. u0 m" z( g% J" s
7 @: P- R$ E, x- x& S: d请问afafaf 兄要修改那条公式才能有这种排列格式呢?谢谢!

( z" i; i# o" ~2 ^5 W4 G, v, lDRAWNUMBER(HD,1.02*H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),COLORCYAN;
DRAWNUMBER(LD,0.98*L,DATEDIFF(REF(DATE,BARSLAST(HD)),DATE),0),COLORCYAN;
  g5 _0 _; {# A6 k- G- L# U加
5 e) P% g* I/ Qa1:=ref(h,barslast(hd));
a2:=ref(L,barslast(Ld));
a11:=ref(h,barslast(hz));
a22:=ref(L,barslast(Lz));
drawtext(ld,a2*0.95,'P '),color009900;
3 ~" q+ I# e/ v# X/ W& G3 vdrawnumber(ld,a2*0.95,(a1-a2),2),colorred,shift2;
( k/ u' e/ G3 Ddrawtext(hd,a1*1.05,'P '),color009900;
* [  z  i) I0 G5 A- Pdrawnumber(hd,a1*1.05,(a1-a2),2),colorwhite,shift2;
drawtext(Lz,a22*0.87,'P '),color009900;
7 U3 G; e( Q9 g- H' _8 z( Cdrawnumber(Lz,a22*0.87,(a11-a22),2),coloryellow,shift2;
  O( B# r$ ?" Kdrawtext(hz,a11*1.13,'P '),color009900;
drawnumber(hz,a11*1.13,(a11-a22),2),coloryellow,shift2;
3 H) A! U  K* j. _3 k; u$ E  {" Wdrawtext(ld,a2*0.92,'T '),color999999;
! N; u$ `6 g+ v1 E/ W# |- x! Sdrawnumber(ld,a2*0.92,barslast(hd),0),colorgreen,shift2;
( G0 T3 Y1 x0 B8 ?5 Ldrawtext(hd,a1*1.08,'T '),color999999;
' c& ^& t7 c! _5 hdrawnumber(hd,a1*1.08,barslast(Ld),0),colorgreen,shift2;
drawtext(Lz,a22*0.84,'T '),color999999;
% P0 v, {2 d9 Q3 n  Z9 Edrawnumber(Lz,a22*0.84,barslast(hz),0),colorred,shift2;
drawtext(hz,a11*1.17,'T '),color999999;
; f$ i' `; U1 [; Y* Edrawnumber(hz,a11*1.17,barslast(Lz),0),colorred,shift2;
" ~" E& Z4 y  x9 T$ t
[ 本帖最后由 afafaf 于 2011-1-11 21:13 编辑 ]