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

logoslogos

这个是经典的清扬公式，公式统计了高低，底高之间的天数， 请修改公式，我需要统计高-低，低-高的差值，并标注在图上，最好显示在二值之间或高低数值边上，。
根据BAYer的理论，他说股票的每个波动规律都是固定，一旦找到个股的波动规律，你就有福了。我希望各位利用这个清扬波浪，和BAYER的理论一起发财，呵呵。
关于BAYER的理论，有兴趣的话，我在详细说说。先谢谢公式高人了。。。嘻嘻嘻。。。
: L# Z5 f4 h6 l; b2 P
$ K3 b) I6 u+ w  p# d/ Z( [) I[ 本帖最后由 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);{高点}
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线上时可作取舍}
H1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
9 R& s' U5 I4 `) R0 jL1:=(D2 AND NOT(D1 AND E1<E2)); H2:=D1 AND NOT(D2 AND E1>=E2);
X1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,10000),X1));
- c; `6 N3 g" W" |7 T7 d+ m" Y9 rG1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:=I1>REF(I1,1);{过滤后低点}
9 h3 `+ m" v3 pL2:=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));
' G6 F0 H- L- u+ M5 C5 n7 {% aG2:=F2>REF(F2,1); I2:=BACKSET(G2,2); HD:=I2>REF(I2,1);{过滤后高点}
% P! L. ?% Z3 S1 ?. ]7 T8 {/ `* oDRAWLINE(LD,L,HD,H,0),COLORWHITE,LINETHICK1,POINTDOT;
. D9 D, |0 a% r: EDRAWLINE(HD,H,LD,L,0),COLORWHITE,LINETHICK1,POINTDOT;
* F2 H6 H9 W* z! OJ1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HD),BARSLAST(LD))+1); J2:=J1>REF(J1,1);
( d4 ?) Z. U6 X& q, P8 d( S' wDRAWLINE(J2,IF(HD,H,L),ISLASTBAR,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),COLORWHITE,LINETHICK1,POINTDOT;
  R& u( E% s+ B( a8 E' U9 k, A{以上语句为新结构波浪}

- B4 u, I. x0 }2 i) j3 IA3:=H<REF(H,REF(BARSLAST(HD),1)+1);
$ X) A. A! R2 V3 s/ W" BB3:=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);{找出全部长期高点}
+ W- X" I# k, K( t! SA4:=L>REF(L,REF(BARSLAST(LD),1)+1);
" e( ?1 `8 U0 W" p# X+ l0 zB4:=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);{找出全部长期低点}
/ z1 i9 o# ^4 D" t5 s+ C! bDRAWICON(HH,H,10),ALIGN2; DRAWICON(LL,L,12),ALIGN1;
& }6 A4 E' w* Z, w- r. wH3:=HH OR ISLASTBAR OR BARSCOUNT(C)=1; {后面进行过滤，方法同前。只是不用考虑高低点出现在同一K线}
" [# k; Z, R* iX3:=REF(BARSLAST(H3),1)+1; F3:=BACKSET(H3 AND COUNT(LL,X3)>0,LLVBARS(IF(LL,L,POW(10,20)),X3));
" m  w' y0 ]- l; Q5 iG3:=F3>REF(F3,1); I3:=BACKSET(G3,2); LZ:=I3>REF(I3,1),LINETHICK0; {长期低点，也可供引用}
5 R* x4 w0 i) G. M7 `L4:=LZ OR ISLASTBAR OR BARSCOUNT(C)=1;
+ r4 |: |# q  T0 p0 o1 S& G9 `9 ?X4:=REF(BARSLAST(L4),1)+1; F4:=BACKSET(L4 AND COUNT(HH,X4)>0,HHVBARS(IF(HH,H,-POW(10,20)),X4));
- X  z! x' \' K) d% [9 pG4:=F4>REF(F4,1); I4:=BACKSET(G4,2); HZ:=I4>REF(I4,1),LINETHICK0;{长期高点，也可供引用}
) Q" R  y2 `. l& `* d5 fDRAWLINE(HZ,H,LZ,L,0),COLORGREEN,LINETHICK1;
DRAWLINE(LZ,L,HZ,H,0),COLORGREEN,LINETHICK1;{长期连线}
, ^0 V$ n1 X, K: a3 i, y' MK1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HZ),BARSLAST(LZ))+1); K2:=K1>REF(K1,1);
DRAWLINE(K2,IF(HZ,H,L),ISLASTBAR,C,0),COLORGREEN,LINETHICK1; {最后的长期连线，连在收盘价上}
. u. ]/ D* |& F
* u% L% ]' X  Q7 H  ~3 G* W{以下是两条趋势线原码}
/ \" r: i4 F  s9 h+ c( R+ X' W! `3 IUU:=BACKSET(ISLASTBAR,BARSLAST(LD)+1);
VV:=UU>REF(UU,1);
  q6 I* Y7 q+ f" s9 xWW:=BACKSET(VV,REF(BARSLAST(LD),1)+2);
$ E) l6 J7 q4 E$ k1 J, D8 }XX:=WW>REF(WW,1);
DRAWLINE(XX,L,VV,L,1),COLORMAGENTA,LINETHICK1;
UU2:=BACKSET(ISLASTBAR,BARSLAST(HD)+1);
0 B! `" R0 O5 {  i; oVV2:=UU2>REF(UU2,1);
/ X* P4 S, X- ?WW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);
XX2:=WW2>REF(WW2,1);
7 M2 S5 \  d' x7 ~  I$ jDRAWLINE(XX2,H,VV2,H,1),COLORMAGENTA,LINETHICK1;
3 c, V5 {* _9 g, ^% q
前一低:REF(L,BARSLAST(VV)),COLOR99FF66,POINTDOT,LINETHICK3;
前二低:REF(L,BARSLAST(XX)),COLORFF66FF,POINTDOT,LINETHICK3;
前一高:REF(H,BARSLAST(VV2)),COLOR99FF66,POINTDOT,LINETHICK3;
前二高:REF(H,BARSLAST(XX2)),COLORFF66FF,POINTDOT,LINETHICK3;
. E( q8 Q5 f" V' d短高:=REF(H,BARSLAST(VV2)),LINETHICK0;
短低:=REF(L,BARSLAST(VV)),LINETHICK0;
短比: (C-短低)/(短高-短低),LINETHICK0;
/ k& \$ j  O) i; H' c
3 ?  F3 p! C. c2 \1 j  m{以下语句是大盘趋势叠加}
$ q, I8 B* Q# W- T常数:=REF(INDEXC,BARSLAST(VV))/REF(C,BARSLAST(VV));
. i; e  C5 y. e: n叠1:INDEXC/常数,COLORGRAY,LINETHICK0;
PARTLINE(1,叠1),COLORGRAY;
; y8 g' X2 b) F9 n9 w% V" @! i常数2:=REF(INDEXC,BARSLAST(XX))/REF(C,BARSLAST(XX));
叠2:INDEXC/常数2,COLORGRAY,LINETHICK0;
PARTLINE(1,叠2),COLORGRAY;
2 M% W- Y  e* T- y2 h
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;
& p3 a5 g! q, d- Z9 r% V  ?
DRAWNUMBER(HD,H*(1+0.002),H,2),COLORBLUE,ALIGN0;
DRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORBLUE,ALIGN0;
/ s7 [$ v7 F  Y+ m; {
{以下语句为三角形部分}

底:REF(L,BARSLAST(VV)),COLORred,LINETHICK2;
頂:REF(H,BARSLAST(VV2)),COLORGreen,LINETHICK2;
- J5 x" D% `3 X6 `4 _
{下迭三角形：藍色三角形畫完介入}
; t" L5 d: a) K9 X% uStickLine(VV,頂,底,0,0),Colorff6633,linethick3;{}
# s2 N6 K. L& k( v  oDRAWLINE(VV2,H,VV,L,0),Colorff6633,linethick3;{斜}
2 T! q1 ?3 m& P4 vDRAWLINE(VV2,H,VV,頂,0),Colorff6633,linethick3;{?}

{DRAWLINE(c>0,H,VV,L,0),Colorcyan,linethick2;}{斜}
' i* B( y9 C. E/ z4 G1 ]{DRAWLINE(c>1,H,VV,頂,0),Colorcyan,linethick2;}{?}
  g0 j) h# R1 g8 X6 r{上漲三角形：紅色三角形畫完出局}
/ Z) ~$ `" ^* A1 f! YStickLine(VV2 ,頂,底,0,0),Colorred,linethick3;{}
# h- k; d  P5 f/ A+ w1 D" tDRAWLINE(VV,L,VV2,H,0),Colorred,linethick3;{斜}
DRAWLINE(VV,L,VV2,底,0),Colorred,linethick3;{?};

ycng

加这8行
; ~- k3 E8 k! j7 |4 C5 ba1:=ref(h,barslast(hd));
# P  J4 |- Z, D8 K- g! Aa2:=ref(L,barslast(Ld));
' m/ V! G; K8 V5 e/ R7 Cdrawnumber(ld,a2*0.95,(a1-a2),2),colorred;
drawnumber(hd,a1*1.05,(a1-a2),2),colorwhite;
' g& b1 f+ g" D# D2 ka11:=ref(h,barslast(hz));
, u% o8 |1 ]5 A5 V" E3 `a22:=ref(L,barslast(Lz));
drawnumber(Lz,a22*0.87,(a11-a22),2),coloryellow;
drawnumber(hz,a11*1.13,(a11-a22),2),coloryellow;
, t( h) a, J% R. z; N  K, W5 Q
[ 本帖最后由 ycng 于 2011-1-10 18:03 编辑 ]

axcqy

axcqy

原帖由 logoslogos 于 2011-1-10 17:01 发表
" n. c- P) }7 h7 u这个是经典的清扬公式，公式统计了高低，底高之间的天数， 请修改公式，我需要统计高-低，低-高的差值，并标注在图上，最好显示在二值之间或高低数值边上，。
根据BAYer的理论，他说股票的每个波动规律都是固定，一 ...

% j, j5 ?& `0 O" ?+ i$ F很不错的指标; 把字改为白色好看一点

mcwhmm

恒益

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

7 `  w$ l+ P  ?1 r3 V0 s  zDRAWNUMBER(HD,H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),PXUP70,COLORCYAN;
DRAWNUMBER(LD,L,DATEDIFF(REF(DATE,BARSLAST(HD)),DATE),0),PXDN70,COLORCYAN;
DRAWNUMBER(HD,H*(1+0.002),H,2),COLORWHITE,PXUP30,ALIGN0;
DRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORWHITE,PXDN30,ALIGN0;
, ~  N  ], J( D8 H7 m0 s3 G* I2 C源码中叠加大盘趋势（下面源码中绿色的）画成了灰色，改成黄色比较醒目一些：
叠1:INDEXC/常数,COLORYELLOW,LINETHICK0;
PARTLINE(1,叠1),COLORYELLOW;
常数2:=REF(INDEXC,BARSLAST(XX))/REF(C,BARSLAST(XX));
" H* B' a$ l. W% m叠2:INDEXC/常数2,COLORYELLOW,LINETHICK0;
; b9 R. K( o2 D  b0 JPARTLINE(1,叠2),COLORYELLOW;
- E% @0 N2 Z: Q/ d9 ]8 ]* X5 A

/ g* w$ Y6 u' @. w
源码：
/ l4 t3 h( I8 G" MA1:=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);{低点}
8 F) V( T/ d$ c9 i3 wE1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2; E2:=(HIGH+LOW)/2;{高低点出现在同一K线上时可作取舍}
H1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
( I8 a! A' t0 E* R# r2 M) aL1:=(D2 AND NOT(D1 AND E1<E2)); H2:=D1 AND NOT(D2 AND E1>=E2);
% ?0 B& d2 B5 A( M! V4 c' mX1:=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));
G2:=F2>REF(F2,1); I2:=BACKSET(G2,2); HD:=I2>REF(I2,1);{过滤后高点}
DRAWLINE(LD,L,HD,H,0),COLORWHITE,LINETHICK1,POINTDOT;
" M/ {7 X0 k! X" t/ T; d" U8 yDRAWLINE(HD,H,LD,L,0),COLORWHITE,LINETHICK1,POINTDOT;
J1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HD),BARSLAST(LD))+1); J2:=J1>REF(J1,1);
3 T5 l9 H5 ]. e! f+ S5 g3 lDRAWLINE(J2,IF(HD,H,L),ISLASTBAR,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),COLORWHITE,LINETHICK1,POINTDOT;
/ S% M, S3 j$ g# a{以上语句为新结构波浪}
- n7 t1 ^" U1 d* Q: x( {4 O% U
# u, {5 l! \) QA3:=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));
3 {  H8 C! u$ sD3:=A3 AND B3 AND HD; E3:=BACKSET(D3,REF(BARSLAST(HD),1)+2); HH:=E3>REF(E3,1);{找出全部长期高点}
1 t$ M! h. L! BA4:=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);{找出全部长期低点}
DRAWICON(HH,H,10),ALIGN2; DRAWICON(LL,L,12),ALIGN1;
# V$ {" a& y5 P, X( eH3:=HH OR ISLASTBAR OR BARSCOUNT(C)=1; {后面进行过滤，方法同前。只是不用考虑高低点出现在同一K线}
3 a  }' ~5 a: WX3:=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; {长期低点，也可供引用}
) C. X/ {( g: ]8 @- o6 w; ?3 [L4:=LZ OR ISLASTBAR OR BARSCOUNT(C)=1;
+ j/ U1 w: Q! q: _; R4 ]) d! h. eX4:=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;{长期高点，也可供引用}
. d+ r3 r- a7 u( G  v; W  nDRAWLINE(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);
# E# l% B) j* |4 O) }DRAWLINE(K2,IF(HZ,H,L),ISLASTBAR,C,0),COLORGREEN,LINETHICK1; {最后的长期连线，连在收盘价上}

{以下是两条趋势线原码}
* F1 u5 t0 m! CUU:=BACKSET(ISLASTBAR,BARSLAST(LD)+1);
  |/ y6 }- e: Y" C. K: C  cVV:=UU>REF(UU,1);
WW:=BACKSET(VV,REF(BARSLAST(LD),1)+2);
$ h* x* }, n# P( VXX:=WW>REF(WW,1);
DRAWLINE(XX,L,VV,L,1),COLORMAGENTA,LINETHICK1;
UU2:=BACKSET(ISLASTBAR,BARSLAST(HD)+1);
6 {* M7 w$ K5 Z& [' g$ Y; qVV2:=UU2>REF(UU2,1);
; ^' H' o0 |# wWW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);
: P+ m& ], i7 a5 y$ r* IXX2:=WW2>REF(WW2,1);
3 a- C" A! {1 L7 @8 x2 kDRAWLINE(XX2,H,VV2,H,1),COLORMAGENTA,LINETHICK1;
% c2 V# q7 c9 G' C
前一低:REF(L,BARSLAST(VV)),COLOR99FF66,POINTDOT,LINETHICK3;
前二低:REF(L,BARSLAST(XX)),COLORFF66FF,POINTDOT,LINETHICK3;
3 e; o4 A( ^7 n* t) s  C前一高:REF(H,BARSLAST(VV2)),COLOR99FF66,POINTDOT,LINETHICK3;
前二高:REF(H,BARSLAST(XX2)),COLORFF66FF,POINTDOT,LINETHICK3;
短高:=REF(H,BARSLAST(VV2)),LINETHICK0;
短低:=REF(L,BARSLAST(VV)),LINETHICK0;
" P. e1 ^' L% r1 B1 P短比: (C-短低)/(短高-短低),LINETHICK0;
3 ]6 M9 T( }/ V* ^2 W: s
6 u3 Z; u$ H& P2 a% @{以下语句是大盘趋势叠加}
常数:=REF(INDEXC,BARSLAST(VV))/REF(C,BARSLAST(VV));
叠1:INDEXC/常数,COLORGRAY,LINETHICK0;
3 Q! o! H* o1 C' Z+ R5 X! q1 Q7 lPARTLINE(1,叠1),COLORGRAY;
. M9 F0 z3 L/ E0 F/ L6 s5 x常数2:=REF(INDEXC,BARSLAST(XX))/REF(C,BARSLAST(XX));
  v4 d% m) X) x, h! B叠2:INDEXC/常数2,COLORGRAY,LINETHICK0;
PARTLINE(1,叠2),COLORGRAY;
9 R( [; u! v+ b1 h9 C- L
; S/ i% _% U9 k- ZDRAWNUMBER(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;
( x2 s3 p; k6 y5 S( p  m- Y
DRAWNUMBER(HD,H*(1+0.002),H,2),COLORBLUE,ALIGN0;
DRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORBLUE,ALIGN0;
# t, d6 c$ v; X; X1 U( r* B( u
{以下语句为三角形部分}
. A$ ~3 a" d+ U9 e& M
底:REF(L,BARSLAST(VV)),COLORred,LINETHICK2;
4 U. B( C/ q9 v9 J, @頂:REF(H,BARSLAST(VV2)),COLORGreen,LINETHICK2;

{下迭三角形：藍色三角形畫完介入}
StickLine(VV,頂,底,0,0),Colorff6633,linethick3;{}
; x. P* P8 D/ T0 w+ n) H2 QDRAWLINE(VV2,H,VV,L,0),Colorff6633,linethick3;{斜}
$ d- G  ~/ @- h2 p* w+ _$ J0 zDRAWLINE(VV2,H,VV,頂,0),Colorff6633,linethick3;{?}
: d* s+ I0 [( n9 }. v  u
1 H" _! k* R8 k{DRAWLINE(c>0,H,VV,L,0),Colorcyan,linethick2;}{斜}
. d+ D% X) l  ~7 Z) c3 B, u( z{DRAWLINE(c>1,H,VV,頂,0),Colorcyan,linethick2;}{?}
{上漲三角形：紅色三角形畫完出局}
StickLine(VV2 ,頂,底,0,0),Colorred,linethick3;{}
$ o5 b  T/ Q  v! k% o: q" p+ `DRAWLINE(VV,L,VV2,H,0),Colorred,linethick3;{斜}
! C5 r' R' r9 i. I/ \7 iDRAWLINE(VV,L,VV2,底,0),Colorred,linethick3;{?};

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

恒益

BACKSET算不算未来函数？

tupiter

好公式

悠然踏浪

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

hippe

好东东！！

woaigutou

辛苦了

天蓝蓝

" w# z. D; S) b; x
你们改好了，我再装！

adinos

bibihead

统计高-低，低-高的差值
: n! S; m- W  @. u( x/ O----指高-低的值 减去 低-高 的值吗？

0 @' K3 Y& a6 Q' G8 v现在显示的是自然日的差值，要自然日还是交易日？

chaosxu

ycng

加

a1:=ref(h,barslast(hd));
a2:=ref(L,barslast(Ld));
a11:=ref(h,barslast(hz));
% C( Z& h- \5 E$ X# B( A( ]8 e/ ia22:=ref(L,barslast(Lz));
drawtext(ld,a2*0.95,'P '),color009900;
drawnumber(ld,a2*0.95,(a1-a2),2),colorred,shift2;
. q! x2 E; e0 X# M# D0 E3 a- pdrawtext(hd,a1*1.05,'P '),color009900;
9 r( t  l. b6 M' I! l$ zdrawnumber(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;

  [% j, S* v: [2 u& e8 n( |drawtext(ld,a2*0.92,'T '),color999999;
drawnumber(ld,a2*0.92,barslast(hd),0),colorgreen,shift2;
drawtext(hd,a1*1.08,'T '),color999999;
drawnumber(hd,a1*1.08,barslast(Ld),0),colorgreen,shift2;
$ v# r& u5 ^" Rdrawtext(Lz,a22*0.84,'T '),color999999;
drawnumber(Lz,a22*0.84,barslast(hz),0),colorred,shift2;
2 N7 U" D; f8 n1 h: t7 `drawtext(hz,a11*1.17,'T '),color999999;
drawnumber(hz,a11*1.17,barslast(Lz),0),colorred,shift2;

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

bibihead

后面加上这些代码就O了。
网站不给贴，搞个附件上来打开看就可以了。

489km

jwchj

logoslogos

原帖由 bibihead 于 2011-1-10 23:29 发表
" [7 f: ]2 C+ @统计高-低，低-高的差值
, [: f% S' c; t- {" i5 d----指高-低的值 减去 低-高 的值吗？

' k& w8 L3 F5 H! s" n现在显示的是自然日的差值，要自然日还是交易日？

不是统计时间的差值，是统计高-低价格的差值，目的是统计观察价格（空间的）波动距离，
/ f* n! q1 C* R# t5 F8 D# }) K我是要用这个公式去方便验证BAYER的一个股价波动距离的理论。呵呵，多谢！！！

mrgjy1818

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

logoslogos

我一楼没说清楚
我需要统计高-低，低-高的价格差值，谢谢

logoslogos

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

+ G: w& V/ M) GDRAWNUMBER(HD,H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),PXUP70,COLORCYAN;
5 ~8 Q3 f& K" tDRAWNUMBER(LD,L,DATEDIFF(REF(DATE,BARSLAST(HD)),DATE),0),PXDN70,COLORCYAN;
DRAWNUMBER(HD,H*(1+0.002),H,2),COLORWHITE,PXUP30,ALIGN0;
DRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORWHITE,PXDN30,ALIGN0;
9 p2 A# @3 w! ^; ]/ B) c8 H
. C* k7 B% M$ g  o* @% Q2 z呵呵，恰恰相反的需要呢。我希望标识的价格差值距离K线近些，现在距离太远了。谢

何时回头是岸

谢

afafaf

原帖由 ycng 于 2011-1-10 23:56 发表
加
+ o' Y+ X" T% U* U2 a9 b! g
a1:=ref(h,barslast(hd));
a2:=ref(L,barslast(Ld));
a11:=ref(h,barslast(hz));
( L9 m# P( F- aa22:=ref(L,barslast(Lz));
drawtext(ld,a2*0.95,'P '),color009900;
drawnumber(ld,a2*0.95,(a1-a2),2),colorred,shift2 ...

/ x3 b% ~/ z4 B& J+ U& H谢谢ycng兄妙手点缀
+ N$ B! r% r, U1 `- l0 M

散户甲

公式高手不少

axcqy

axcqy

原帖由 于afafaf  2011-1-11 16:06 发表

; {- B0 l& k1 S9 J+ i0 b. f谢谢ycng兄妙手点缀
, r/ _8 W/ s% g; s8 ^0 C& [99290

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

afafaf

原帖由 axcqy 于 2011-1-11 19:49 发表

: j0 e5 O9 K9 p6 s# J, T请问afafaf 兄要修改那条公式才能有这种排列格式呢?谢谢!

% S/ a  l) W: X" @
% r* P0 `, K0 c( p2 aDRAWNUMBER(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;
加
a1:=ref(h,barslast(hd));
a2:=ref(L,barslast(Ld));
! G! R( H) b" F$ ya11:=ref(h,barslast(hz));
) m+ I1 s' v# ^; E$ Ua22:=ref(L,barslast(Lz));
drawtext(ld,a2*0.95,'P '),color009900;
drawnumber(ld,a2*0.95,(a1-a2),2),colorred,shift2;
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;
5 o7 l5 m7 n; Y% V2 tdrawtext(ld,a2*0.92,'T '),color999999;
  W" o9 k2 d! M1 a9 F/ kdrawnumber(ld,a2*0.92,barslast(hd),0),colorgreen,shift2;
% _4 y: U- ^$ a! R3 r  Fdrawtext(hd,a1*1.08,'T '),color999999;
* C: P) A, N6 O) tdrawnumber(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;
drawtext(hz,a11*1.17,'T '),color999999;
drawnumber(hz,a11*1.17,barslast(Lz),0),colorred,shift2;
4 f: K6 K. n# c; a$ ?3 y
[ 本帖最后由 afafaf 于 2011-1-11 21:13 编辑 ]