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

logoslogos

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

; Z& H6 ^6 i2 A8 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);{高点}
- v+ `7 f* k5 R) y; ?4 w5 b( AA2:=REF(LOW,3)=LLV(LOW,2*3+1); B2:=FILTER(A2,3); C2:=BACKSET(B2,3+1); D2:=FILTER(C2,3);{低点}
  Z! Q7 c  `9 v6 z7 o7 j# A% jE1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2; E2:=(HIGH+LOW)/2;{高低点出现在同一K线上时可作取舍}
4 d8 O7 p+ z) w+ i" l# ~+ h  yH1:=(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);
( ~: S8 Q3 M6 L" ^- k5 MX1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,10000),X1));
4 f) Z% d3 {5 x) A5 P# f5 J+ KG1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:=I1>REF(I1,1);{过滤后低点}
4 z# d3 j( u, W' T/ z+ xL2:=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);{过滤后高点}
) L% Z) k9 `; N: Z, B, \DRAWLINE(LD,L,HD,H,0),COLORWHITE,LINETHICK1,POINTDOT;
DRAWLINE(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;
7 [% `5 N) ^$ F5 W9 x' ^( P{以上语句为新结构波浪}

6 y# x) y/ p; VA3:=H<REF(H,REF(BARSLAST(HD),1)+1);
7 S, ?/ Z% ^1 mB3:=REF(H,REF(BARSLAST(HD),1)+1)>REF(H,REF(BARSLAST(HD),1)+2+REF(BARSLAST(HD),REF(BARSLAST(HD),1)+2));
& o- j6 _' s2 j  r' [D3:=A3 AND B3 AND HD; E3:=BACKSET(D3,REF(BARSLAST(HD),1)+2); HH:=E3>REF(E3,1);{找出全部长期高点}
0 w& L1 ^# y3 z* Q, ZA4:=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;
: s, Z) S* D. X; e+ qH3:=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));
- ]; C9 R0 _5 U2 e5 dG3:=F3>REF(F3,1); I3:=BACKSET(G3,2); LZ:=I3>REF(I3,1),LINETHICK0; {长期低点，也可供引用}
7 s0 d1 ^! R1 g) h4 t' IL4:=LZ OR ISLASTBAR OR BARSCOUNT(C)=1;
+ T: }3 c' z+ _6 U5 xX4:=REF(BARSLAST(L4),1)+1; F4:=BACKSET(L4 AND COUNT(HH,X4)>0,HHVBARS(IF(HH,H,-POW(10,20)),X4));
, P! K9 @6 e6 D+ j' }G4:=F4>REF(F4,1); I4:=BACKSET(G4,2); HZ:=I4>REF(I4,1),LINETHICK0;{长期高点，也可供引用}
DRAWLINE(HZ,H,LZ,L,0),COLORGREEN,LINETHICK1;
" Z# {$ ?: v3 O2 n, }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; {最后的长期连线，连在收盘价上}
7 P# f7 F$ n: V+ T# I& R
, j6 ~  l% N3 K* d0 D{以下是两条趋势线原码}
UU:=BACKSET(ISLASTBAR,BARSLAST(LD)+1);
VV:=UU>REF(UU,1);
7 }; n0 r# ?0 K1 {: w9 L1 U) k& K7 `" \WW:=BACKSET(VV,REF(BARSLAST(LD),1)+2);
XX:=WW>REF(WW,1);
DRAWLINE(XX,L,VV,L,1),COLORMAGENTA,LINETHICK1;
2 `1 W) p2 l! z6 oUU2:=BACKSET(ISLASTBAR,BARSLAST(HD)+1);
5 v( @7 u3 i+ W+ Y; cVV2:=UU2>REF(UU2,1);
WW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);
% W2 L: P, D& bXX2:=WW2>REF(WW2,1);
: N% ^# P+ u) i2 TDRAWLINE(XX2,H,VV2,H,1),COLORMAGENTA,LINETHICK1;
( i, n: O$ u" z) `% @
前一低:REF(L,BARSLAST(VV)),COLOR99FF66,POINTDOT,LINETHICK3;
  a" F% O3 S( `  u8 g9 l! |前二低:REF(L,BARSLAST(XX)),COLORFF66FF,POINTDOT,LINETHICK3;
前一高:REF(H,BARSLAST(VV2)),COLOR99FF66,POINTDOT,LINETHICK3;
前二高:REF(H,BARSLAST(XX2)),COLORFF66FF,POINTDOT,LINETHICK3;
; x" D# C% A% @5 c短高:=REF(H,BARSLAST(VV2)),LINETHICK0;
4 ^/ R5 K( k: U5 V' _短低:=REF(L,BARSLAST(VV)),LINETHICK0;
短比: (C-短低)/(短高-短低),LINETHICK0;
: ~" P: {6 W: L( C. _' R4 V3 q
{以下语句是大盘趋势叠加}
0 x7 A: t& w: h  r( k! ], Z常数:=REF(INDEXC,BARSLAST(VV))/REF(C,BARSLAST(VV));
# l5 \( }+ f* d$ q叠1:INDEXC/常数,COLORGRAY,LINETHICK0;
PARTLINE(1,叠1),COLORGRAY;
- w9 u' b- N% b' y! K( K5 Q  u9 ]常数2:=REF(INDEXC,BARSLAST(XX))/REF(C,BARSLAST(XX));
叠2:INDEXC/常数2,COLORGRAY,LINETHICK0;
) m, n7 [) T/ U+ t0 v: Q3 tPARTLINE(1,叠2),COLORGRAY;
. R9 D+ f3 C: o" [8 s3 @$ {
* k) Z1 e( h* `- w8 U& `5 |, GDRAWNUMBER(HD,1.02*H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),COLORCYAN;
" D0 X. b' @8 W7 g3 |% Z2 J6 EDRAWNUMBER(LD,0.98*L,DATEDIFF(REF(DATE,BARSLAST(HD)),DATE),0),COLORCYAN;

( W% B" U' P, G& g1 g& W+ m2 uDRAWNUMBER(HD,H*(1+0.002),H,2),COLORBLUE,ALIGN0;
DRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORBLUE,ALIGN0;
" x+ E: v0 E) x6 F$ L- k1 O
5 O8 n0 o  R: k+ S+ h& W) H4 j{以下语句为三角形部分}

) E! G- k' P; L/ `底:REF(L,BARSLAST(VV)),COLORred,LINETHICK2;
頂:REF(H,BARSLAST(VV2)),COLORGreen,LINETHICK2;

{下迭三角形：藍色三角形畫完介入}
+ r3 f/ }7 u0 C! F! b: PStickLine(VV,頂,底,0,0),Colorff6633,linethick3;{}
) G: X2 z/ \  f+ A4 GDRAWLINE(VV2,H,VV,L,0),Colorff6633,linethick3;{斜}
DRAWLINE(VV2,H,VV,頂,0),Colorff6633,linethick3;{?}
, C* K+ H" y  n
7 U* t! _' Y5 D8 N{DRAWLINE(c>0,H,VV,L,0),Colorcyan,linethick2;}{斜}
{DRAWLINE(c>1,H,VV,頂,0),Colorcyan,linethick2;}{?}
. x$ ]8 f/ m* P9 m. I# w! o. u{上漲三角形：紅色三角形畫完出局}
StickLine(VV2 ,頂,底,0,0),Colorred,linethick3;{}
DRAWLINE(VV,L,VV2,H,0),Colorred,linethick3;{斜}
DRAWLINE(VV,L,VV2,底,0),Colorred,linethick3;{?};

ycng

加这8行
4 |* l* ^  _' i. n  ka1:=ref(h,barslast(hd));
a2:=ref(L,barslast(Ld));
. j4 I# s& v: ~  B$ W' Y. O9 _5 T) Ddrawnumber(ld,a2*0.95,(a1-a2),2),colorred;
drawnumber(hd,a1*1.05,(a1-a2),2),colorwhite;
a11:=ref(h,barslast(hz));
& N7 Y. l0 W7 q9 N9 @a22:=ref(L,barslast(Lz));
; H# O8 v6 r+ pdrawnumber(Lz,a22*0.87,(a11-a22),2),coloryellow;
3 E  f; }4 P; ?4 P6 w/ xdrawnumber(hz,a11*1.13,(a11-a22),2),coloryellow;
1 G- s2 W! O9 a8 U7 \
2 S# c4 F8 x  v[ 本帖最后由 ycng 于 2011-1-10 18:03 编辑 ]

axcqy

axcqy

原帖由 logoslogos 于 2011-1-10 17:01 发表
/ |$ l$ y2 j- d! L这个是经典的清扬公式，公式统计了高低，底高之间的天数， 请修改公式，我需要统计高-低，低-高的差值，并标注在图上，最好显示在二值之间或高低数值边上，。
" t8 m4 n, o: u, G5 y; ~' f根据BAYer的理论，他说股票的每个波动规律都是固定，一 ...

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

mcwhmm

恒益

原公式中红色四句改成以下蓝色的四句，K线上下标注的价格就不会太靠近K线了。
9 N; q6 s+ H+ J
DRAWNUMBER(HD,H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),PXUP70,COLORCYAN;
6 e7 _, P/ K2 g! E- J6 x2 [8 EDRAWNUMBER(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;
. l2 s4 X% a+ s9 G源码中叠加大盘趋势（下面源码中绿色的）画成了灰色，改成黄色比较醒目一些：
9 Z: c3 H3 m+ f* s3 U叠1:INDEXC/常数,COLORYELLOW,LINETHICK0;
PARTLINE(1,叠1),COLORYELLOW;
常数2:=REF(INDEXC,BARSLAST(XX))/REF(C,BARSLAST(XX));
0 }6 q& s: w" \叠2:INDEXC/常数2,COLORYELLOW,LINETHICK0;
6 P8 w  p9 c' b8 UPARTLINE(1,叠2),COLORYELLOW;
  e9 O5 u! r0 f1 h$ D) b

2 L; j" ~7 y- c+ l  I% @8 b5 D- a
源码：
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);{低点}
' {+ I' J2 e8 |5 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;
L1:=(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));
G1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:=I1>REF(I1,1);{过滤后低点}
L2:=LD OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
; p' H( \! H( j! n" DX2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2));
& p! p/ T" ^- x, WG2:=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;
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;
+ @; e4 ?( j* @( R, a# ?{以上语句为新结构波浪}
& m$ p# x2 ^- c$ G5 t" ]
A3:=H<REF(H,REF(BARSLAST(HD),1)+1);
8 q1 |' S% j+ T, g: y- oB3:=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);{找出全部长期高点}
A4:=L>REF(L,REF(BARSLAST(LD),1)+1);
7 J" m1 Z0 c  I  }* hB4:=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);{找出全部长期低点}
) Q0 e4 j4 O% \% M& c: ^+ pDRAWICON(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; {长期低点，也可供引用}
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));
0 a6 m% Q3 k$ g9 a& dG4:=F4>REF(F4,1); I4:=BACKSET(G4,2); HZ:=I4>REF(I4,1),LINETHICK0;{长期高点，也可供引用}
/ C0 u6 B# T  c+ u- x; ^: hDRAWLINE(HZ,H,LZ,L,0),COLORGREEN,LINETHICK1;
+ v4 Y% a# C; V' ^" ~+ ^+ M% TDRAWLINE(LZ,L,HZ,H,0),COLORGREEN,LINETHICK1;{长期连线}
" p% S( Q$ A6 ~7 m: ]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; {最后的长期连线，连在收盘价上}

; i& h; t( b/ W* m{以下是两条趋势线原码}
$ Z/ o6 j6 Z) z8 B+ @' UUU:=BACKSET(ISLASTBAR,BARSLAST(LD)+1);
0 }$ r1 a, P8 V2 `VV:=UU>REF(UU,1);
WW:=BACKSET(VV,REF(BARSLAST(LD),1)+2);
XX:=WW>REF(WW,1);
) P8 C" W. U4 ~6 \- h+ WDRAWLINE(XX,L,VV,L,1),COLORMAGENTA,LINETHICK1;
# _8 c9 j# {* A- M" AUU2:=BACKSET(ISLASTBAR,BARSLAST(HD)+1);
VV2:=UU2>REF(UU2,1);
WW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);
# @$ o7 z1 K( ]4 ?XX2:=WW2>REF(WW2,1);
( b, o- Z+ O4 R7 I. }6 TDRAWLINE(XX2,H,VV2,H,1),COLORMAGENTA,LINETHICK1;
' X! K5 n* k0 ~* c( G7 _. T
( W$ j5 ?: Z0 y& x) B; V前一低:REF(L,BARSLAST(VV)),COLOR99FF66,POINTDOT,LINETHICK3;
" A* `: {, G/ L1 u前二低:REF(L,BARSLAST(XX)),COLORFF66FF,POINTDOT,LINETHICK3;
前一高:REF(H,BARSLAST(VV2)),COLOR99FF66,POINTDOT,LINETHICK3;
0 G. Y+ ~; I4 j前二高:REF(H,BARSLAST(XX2)),COLORFF66FF,POINTDOT,LINETHICK3;
0 I6 n1 ]& q% Q& x8 `短高:=REF(H,BARSLAST(VV2)),LINETHICK0;
短低:=REF(L,BARSLAST(VV)),LINETHICK0;
5 e& q! ~0 E$ x- n8 c& ]短比: (C-短低)/(短高-短低),LINETHICK0;

3 E9 t" I- x7 u- k5 R{以下语句是大盘趋势叠加}
2 H1 G9 `5 Y; }常数:=REF(INDEXC,BARSLAST(VV))/REF(C,BARSLAST(VV));
叠1:INDEXC/常数,COLORGRAY,LINETHICK0;
PARTLINE(1,叠1),COLORGRAY;
1 G+ L$ V; M3 h: Q8 h; C' O常数2:=REF(INDEXC,BARSLAST(XX))/REF(C,BARSLAST(XX));
6 Q! o! j* I+ E叠2:INDEXC/常数2,COLORGRAY,LINETHICK0;
9 J7 `, z3 I1 L1 h& O% K7 DPARTLINE(1,叠2),COLORGRAY;

  x2 \% s0 P6 p( |+ H% wDRAWNUMBER(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;
' F/ g3 ?: K+ C! C5 @0 c7 R- d+ L
" G. J& N' l# Q! uDRAWNUMBER(HD,H*(1+0.002),H,2),COLORBLUE,ALIGN0;
DRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORBLUE,ALIGN0;
, F2 y5 d5 V/ m  y, a9 d/ ]( b9 P
$ @+ Q9 c" @# q9 n5 u{以下语句为三角形部分}

底:REF(L,BARSLAST(VV)),COLORred,LINETHICK2;
4 v& z# Z, m- `. Z1 p$ }頂:REF(H,BARSLAST(VV2)),COLORGreen,LINETHICK2;

; Y6 ^9 ~7 F+ [{下迭三角形：藍色三角形畫完介入}
StickLine(VV,頂,底,0,0),Colorff6633,linethick3;{}
$ S7 j! `; R" C: a2 }, b% _DRAWLINE(VV2,H,VV,L,0),Colorff6633,linethick3;{斜}
DRAWLINE(VV2,H,VV,頂,0),Colorff6633,linethick3;{?}

- t) z: Q- G4 V{DRAWLINE(c>0,H,VV,L,0),Colorcyan,linethick2;}{斜}
& _; `2 K/ r8 N: m{DRAWLINE(c>1,H,VV,頂,0),Colorcyan,linethick2;}{?}
{上漲三角形：紅色三角形畫完出局}
* q/ W9 _6 \2 U" m! T# d+ fStickLine(VV2 ,頂,底,0,0),Colorred,linethick3;{}
7 Y/ ]9 ?$ L) tDRAWLINE(VV,L,VV2,H,0),Colorred,linethick3;{斜}
DRAWLINE(VV,L,VV2,底,0),Colorred,linethick3;{?};

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

恒益

BACKSET算不算未来函数？

tupiter

好公式

悠然踏浪

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

hippe

好东东！！

woaigutou

辛苦了

天蓝蓝

7 I6 i4 R1 r$ Q+ z
你们改好了，我再装！

adinos

bibihead

统计高-低，低-高的差值
% I" a# k* n9 j" p) M$ {1 i----指高-低的值 减去 低-高 的值吗？
8 n, E' V- A4 ?6 u1 w# O
# P# B# y- D: Y: z现在显示的是自然日的差值，要自然日还是交易日？

chaosxu

ycng

加

! l, k- L. X2 p! B; b$ g9 sa1:=ref(h,barslast(hd));
, ^- e  O/ z* m+ I2 B' ]& I* _1 Na2:=ref(L,barslast(Ld));
' j" J* X. [# r" M! }; ra11:=ref(h,barslast(hz));
a22:=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;
- x+ p# r" I7 c. h2 v' Y: w9 hdrawtext(Lz,a22*0.87,'P '),color009900;
7 C2 w/ L' ?, m3 h1 {5 Bdrawnumber(Lz,a22*0.87,(a11-a22),2),coloryellow,shift2;
5 B6 v2 k1 Q  x; a! V9 M) Idrawtext(hz,a11*1.13,'P '),color009900;
drawnumber(hz,a11*1.13,(a11-a22),2),coloryellow,shift2;
4 D$ M4 j6 ]: ?3 i  Y
drawtext(ld,a2*0.92,'T '),color999999;
drawnumber(ld,a2*0.92,barslast(hd),0),colorgreen,shift2;
* [& }0 H* b5 \3 L8 k/ Bdrawtext(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;
drawtext(hz,a11*1.17,'T '),color999999;
drawnumber(hz,a11*1.17,barslast(Lz),0),colorred,shift2;
; w" D1 U- N# ]: u
[ 本帖最后由 ycng 于 2011-1-10 23:58 编辑 ]

bibihead

后面加上这些代码就O了。
网站不给贴，搞个附件上来打开看就可以了。
& x9 P4 n+ e$ Y( }  j+ y  P1 i

489km

jwchj

logoslogos

原帖由 bibihead 于 2011-1-10 23:29 发表
" j  }/ c8 v1 i0 B统计高-低，低-高的差值
----指高-低的值 减去 低-高 的值吗？

( [/ p. c1 Q+ M" q: @: B  p现在显示的是自然日的差值，要自然日还是交易日？

不是统计时间的差值，是统计高-低价格的差值，目的是统计观察价格（空间的）波动距离，
/ Q4 r6 Q% T3 A+ q. ]4 L9 ?我是要用这个公式去方便验证BAYER的一个股价波动距离的理论。呵呵，多谢！！！

mrgjy1818

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

logoslogos

我一楼没说清楚
/ w8 G) h# R3 _% S' K+ |我需要统计高-低，低-高的价格差值，谢谢

logoslogos

原公式中红色四句改成以下蓝色的四句，K线上下标注的价格就不会太靠近K线了。
) y0 j8 E3 u6 V7 }4 _+ N$ b
DRAWNUMBER(HD,H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),PXUP70,COLORCYAN;
DRAWNUMBER(LD,L,DATEDIFF(REF(DATE,BARSLAST(HD)),DATE),0),PXDN70,COLORCYAN;
7 L; p6 \$ F8 ^) E2 v0 gDRAWNUMBER(HD,H*(1+0.002),H,2),COLORWHITE,PXUP30,ALIGN0;
, v) H% d+ b5 x" HDRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORWHITE,PXDN30,ALIGN0;

. n0 @, e* f& q/ C% {# K呵呵，恰恰相反的需要呢。我希望标识的价格差值距离K线近些，现在距离太远了。谢

何时回头是岸

谢

afafaf

原帖由 ycng 于 2011-1-10 23:56 发表
加

$ o% a' w4 |" x0 @+ P# b% n0 va1:=ref(h,barslast(hd));
2 W4 l9 ?7 W% b1 va2:=ref(L,barslast(Ld));
a11:=ref(h,barslast(hz));
a22:=ref(L,barslast(Lz));
drawtext(ld,a2*0.95,'P '),color009900;
drawnumber(ld,a2*0.95,(a1-a2),2),colorred,shift2 ...

谢谢ycng兄妙手点缀
* c8 }  Q9 D4 k7 b9 |

散户甲

公式高手不少

axcqy

axcqy

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

% J  H, [$ x8 p/ W0 j" y" u0 |5 \+ y谢谢ycng兄妙手点缀
2 c6 I  Q- ]( Z. i$ @5 ?& N99290

4 d  Z4 [: t, v' P5 ]请问afafaf 兄要修改那条公式才能有这种排列格式呢?谢谢!

afafaf

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

, }6 \5 Z% h3 s% Z$ K- Z. D. I请问afafaf 兄要修改那条公式才能有这种排列格式呢?谢谢!

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;
加
0 r: L% E7 d9 Q% Qa1:=ref(h,barslast(hd));
a2:=ref(L,barslast(Ld));
a11:=ref(h,barslast(hz));
a22:=ref(L,barslast(Lz));
% T, L3 D" f8 l" }drawtext(ld,a2*0.95,'P '),color009900;
% F5 m' ]2 c* d7 ^drawnumber(ld,a2*0.95,(a1-a2),2),colorred,shift2;
  t( e. A, v0 q* Xdrawtext(hd,a1*1.05,'P '),color009900;
! `; C4 m6 l# m# J! Wdrawnumber(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;
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;
9 @2 E# h7 {6 t  F6 ]) ?7 Ddrawtext(Lz,a22*0.84,'T '),color999999;
. Q& E, E/ Z. D' g; d( u/ M) ~drawnumber(Lz,a22*0.84,barslast(hz),0),colorred,shift2;
drawtext(hz,a11*1.17,'T '),color999999;
. \; `1 F; |8 [+ b0 {# L8 b4 ldrawnumber(hz,a11*1.17,barslast(Lz),0),colorred,shift2;

9 c' \5 |+ H9 [1 x$ O. K( V5 r[ 本帖最后由 afafaf 于 2011-1-11 21:13 编辑 ]