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

logoslogos

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

1 i* y! o- r* H; ~, U/ m[ 本帖最后由 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);{低点}
" v$ \+ B" H1 t4 |$ IE1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2; E2:=(HIGH+LOW)/2;{高低点出现在同一K线上时可作取舍}
0 I) f% F% s9 LH1:=(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);
0 |4 U4 P- A* e6 ?0 cX1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,10000),X1));
# p# _) P- ~0 v' d9 GG1:=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;
DRAWLINE(HD,H,LD,L,0),COLORWHITE,LINETHICK1,POINTDOT;
( [% ?4 e+ }2 ?& F# l  dJ1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HD),BARSLAST(LD))+1); J2:=J1>REF(J1,1);
0 s. b8 v1 w1 Q' BDRAWLINE(J2,IF(HD,H,L),ISLASTBAR,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),COLORWHITE,LINETHICK1,POINTDOT;
{以上语句为新结构波浪}

A3:=H<REF(H,REF(BARSLAST(HD),1)+1);
" t7 @' V/ x% l$ T% ]B3:=REF(H,REF(BARSLAST(HD),1)+1)>REF(H,REF(BARSLAST(HD),1)+2+REF(BARSLAST(HD),REF(BARSLAST(HD),1)+2));
" O) R$ m5 M( i7 t; ]D3:=A3 AND B3 AND HD; E3:=BACKSET(D3,REF(BARSLAST(HD),1)+2); HH:=E3>REF(E3,1);{找出全部长期高点}
# j3 D/ U4 S- o9 YA4:=L>REF(L,REF(BARSLAST(LD),1)+1);
; K: O8 M$ o  i0 N) H; _6 d9 rB4:=REF(L,REF(BARSLAST(LD),1)+1)<REF(L,REF(BARSLAST(LD),1)+2+REF(BARSLAST(LD),REF(BARSLAST(LD),1)+2));
/ H6 M* Z! \6 c. S8 k3 Y' yD4:=A4 AND B4 AND LD; E4:=BACKSET(D4,REF(BARSLAST(LD),1)+2); LL:=E4>REF(E4,1);{找出全部长期低点}
3 S' F' n! D9 z6 V6 EDRAWICON(HH,H,10),ALIGN2; DRAWICON(LL,L,12),ALIGN1;
* |$ F! L" G/ b# G6 m4 dH3:=HH OR ISLASTBAR OR BARSCOUNT(C)=1; {后面进行过滤，方法同前。只是不用考虑高低点出现在同一K线}
$ t2 K' R2 G  P* O% fX3:=REF(BARSLAST(H3),1)+1; F3:=BACKSET(H3 AND COUNT(LL,X3)>0,LLVBARS(IF(LL,L,POW(10,20)),X3));
' Z* Z# J3 [# @- h6 u: |( TG3:=F3>REF(F3,1); I3:=BACKSET(G3,2); LZ:=I3>REF(I3,1),LINETHICK0; {长期低点，也可供引用}
L4:=LZ OR ISLASTBAR OR BARSCOUNT(C)=1;
0 o( _# b( \. P( {: sX4:=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;
! B) }( \# J; C& P9 Q9 f9 ]- ^DRAWLINE(LZ,L,HZ,H,0),COLORGREEN,LINETHICK1;{长期连线}
K1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HZ),BARSLAST(LZ))+1); K2:=K1>REF(K1,1);
% v$ s' I6 A8 R& N( @$ ^4 R: [! {6 O5 QDRAWLINE(K2,IF(HZ,H,L),ISLASTBAR,C,0),COLORGREEN,LINETHICK1; {最后的长期连线，连在收盘价上}

{以下是两条趋势线原码}
UU:=BACKSET(ISLASTBAR,BARSLAST(LD)+1);
0 J/ J, n. @, n0 P& WVV:=UU>REF(UU,1);
WW:=BACKSET(VV,REF(BARSLAST(LD),1)+2);
4 B/ O4 P2 |" qXX:=WW>REF(WW,1);
, l% n  |' W) e- `DRAWLINE(XX,L,VV,L,1),COLORMAGENTA,LINETHICK1;
& |& b$ k4 @2 i4 q; EUU2:=BACKSET(ISLASTBAR,BARSLAST(HD)+1);
/ H! J+ P( y6 W5 p% m/ `. F8 B; ?( _" Z% BVV2:=UU2>REF(UU2,1);
+ J: Y9 i0 Z) |- r' {: iWW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);
% d- ^8 J( c+ g/ pXX2:=WW2>REF(WW2,1);
9 M: h' J7 n" l7 P' T" b: M' L, U; rDRAWLINE(XX2,H,VV2,H,1),COLORMAGENTA,LINETHICK1;

4 Y- m9 C4 m0 z+ }5 q- ?! O# B1 U4 s前一低: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;
7 G" I  M; v3 B$ P6 J2 m$ O, H% F9 ]短高:=REF(H,BARSLAST(VV2)),LINETHICK0;
短低:=REF(L,BARSLAST(VV)),LINETHICK0;
" X0 B! z; ]+ r6 I短比: (C-短低)/(短高-短低),LINETHICK0;
# ]" t* \* q# l; H0 J  q, A
: X2 E% l, P9 @! N9 w: g! m5 y{以下语句是大盘趋势叠加}
常数:=REF(INDEXC,BARSLAST(VV))/REF(C,BARSLAST(VV));
叠1:INDEXC/常数,COLORGRAY,LINETHICK0;
( n, C& K4 P5 F! EPARTLINE(1,叠1),COLORGRAY;
常数2:=REF(INDEXC,BARSLAST(XX))/REF(C,BARSLAST(XX));
! ]* H9 r, h( o4 n叠2:INDEXC/常数2,COLORGRAY,LINETHICK0;
PARTLINE(1,叠2),COLORGRAY;

; p9 u6 G. M- n( }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;
2 C+ i& {1 q. |; _4 j8 M3 @
) w9 P, T+ s; D4 jDRAWNUMBER(HD,H*(1+0.002),H,2),COLORBLUE,ALIGN0;
" L: e. f) g+ x/ iDRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORBLUE,ALIGN0;
3 j* m2 r' ^/ H, J
: \. ?" t' c3 m' A7 Y- \6 h{以下语句为三角形部分}
' c* t( f8 i3 }8 i" C1 U* F2 m
底:REF(L,BARSLAST(VV)),COLORred,LINETHICK2;
頂:REF(H,BARSLAST(VV2)),COLORGreen,LINETHICK2;
1 t6 A7 O3 \1 f. z7 y# h
{下迭三角形：藍色三角形畫完介入}
StickLine(VV,頂,底,0,0),Colorff6633,linethick3;{}
' Z' d, q* ]+ L( ]! I& Z- K2 q  \+ KDRAWLINE(VV2,H,VV,L,0),Colorff6633,linethick3;{斜}
DRAWLINE(VV2,H,VV,頂,0),Colorff6633,linethick3;{?}
! a3 q* u1 ^2 i, ?
{DRAWLINE(c>0,H,VV,L,0),Colorcyan,linethick2;}{斜}
{DRAWLINE(c>1,H,VV,頂,0),Colorcyan,linethick2;}{?}
{上漲三角形：紅色三角形畫完出局}
StickLine(VV2 ,頂,底,0,0),Colorred,linethick3;{}
' F* w, ~3 u8 U" H7 d8 i' [" K3 k4 GDRAWLINE(VV,L,VV2,H,0),Colorred,linethick3;{斜}
0 `) t& L/ J4 z* ^DRAWLINE(VV,L,VV2,底,0),Colorred,linethick3;{?};

ycng

加这8行
a1:=ref(h,barslast(hd));
$ V3 Q3 w# M* ^+ R- E3 L/ s; ca2:=ref(L,barslast(Ld));
drawnumber(ld,a2*0.95,(a1-a2),2),colorred;
drawnumber(hd,a1*1.05,(a1-a2),2),colorwhite;
a11:=ref(h,barslast(hz));
+ U( V/ j& k: J( d4 G1 Ta22:=ref(L,barslast(Lz));
drawnumber(Lz,a22*0.87,(a11-a22),2),coloryellow;
# O7 k, A2 X5 u, L  Z0 U) l/ s8 B4 zdrawnumber(hz,a11*1.13,(a11-a22),2),coloryellow;
9 p0 S9 w/ w! K, ~! m5 x4 z
[ 本帖最后由 ycng 于 2011-1-10 18:03 编辑 ]

axcqy

axcqy

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

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

mcwhmm

恒益

原公式中红色四句改成以下蓝色的四句，K线上下标注的价格就不会太靠近K线了。
* h& D- ^9 {1 t' S( G* {7 V! A( V+ t
" |5 m6 o. C3 D: F9 HDRAWNUMBER(HD,H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),PXUP70,COLORCYAN;
& g7 Q7 d& O+ b( T' E2 GDRAWNUMBER(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;
# r) o  I8 w% i9 A; `源码中叠加大盘趋势（下面源码中绿色的）画成了灰色，改成黄色比较醒目一些：
叠1:INDEXC/常数,COLORYELLOW,LINETHICK0;
PARTLINE(1,叠1),COLORYELLOW;
5 E0 _. J. I0 G1 X; r常数2:=REF(INDEXC,BARSLAST(XX))/REF(C,BARSLAST(XX));
7 {8 @. p2 Y/ @/ K! E. p) Q5 D叠2:INDEXC/常数2,COLORYELLOW,LINETHICK0;
1 W1 F9 }7 X4 h4 E& ^# WPARTLINE(1,叠2),COLORYELLOW;
) Y( g9 M& ?7 _3 T( [) S

. H; ~1 J5 A' W9 r
源码：
9 Y: H1 ^5 G+ E3 F7 MA1:=REF(HIGH,3)=HHV(HIGH,2*3+1); B1:=FILTER(A1,3); C1:=BACKSET(B1,3+1); D1:=FILTER(C1,3);{高点}
, z2 i) X, R& I0 cA2:=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;
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;
* c! Y* h8 B5 i) _; I! ]X2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2));
- w! e, r$ s& K) mG2:=F2>REF(F2,1); I2:=BACKSET(G2,2); HD:=I2>REF(I2,1);{过滤后高点}
: Y( R. M- w; H2 g- \! ?DRAWLINE(LD,L,HD,H,0),COLORWHITE,LINETHICK1,POINTDOT;
0 G# G+ j+ g$ LDRAWLINE(HD,H,LD,L,0),COLORWHITE,LINETHICK1,POINTDOT;
J1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HD),BARSLAST(LD))+1); J2:=J1>REF(J1,1);
3 M! \% V9 V9 L* H9 K6 [( [: ~6 G+ qDRAWLINE(J2,IF(HD,H,L),ISLASTBAR,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),COLORWHITE,LINETHICK1,POINTDOT;
{以上语句为新结构波浪}
2 |" J3 l2 N; o- i3 R1 S
/ D8 L* e& P* L) ~8 {A3:=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));
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);
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);{找出全部长期低点}
  y& X% C7 G0 l' L' `DRAWICON(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; {长期低点，也可供引用}
' l  l- U/ B5 t" L+ zL4:=LZ OR ISLASTBAR OR BARSCOUNT(C)=1;
8 x% R% {# L# K/ w1 \1 S2 _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;{长期连线}
& C, o1 Q. ]8 y; |0 V5 _; n) MK1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HZ),BARSLAST(LZ))+1); K2:=K1>REF(K1,1);
7 @' v: ?- B9 @DRAWLINE(K2,IF(HZ,H,L),ISLASTBAR,C,0),COLORGREEN,LINETHICK1; {最后的长期连线，连在收盘价上}
7 o; U2 M3 G0 R1 l
{以下是两条趋势线原码}
: ]- B/ ?" ^. ~# J) C* q# jUU:=BACKSET(ISLASTBAR,BARSLAST(LD)+1);
VV:=UU>REF(UU,1);
WW:=BACKSET(VV,REF(BARSLAST(LD),1)+2);
3 T9 c( P4 |7 {$ _XX:=WW>REF(WW,1);
- ^0 l. A, x0 i' i* s+ K7 SDRAWLINE(XX,L,VV,L,1),COLORMAGENTA,LINETHICK1;
; f  i0 j$ F+ Q" i& S2 U% a* jUU2:=BACKSET(ISLASTBAR,BARSLAST(HD)+1);
VV2:=UU2>REF(UU2,1);
WW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);
XX2:=WW2>REF(WW2,1);
& ^8 i" h" ~  QDRAWLINE(XX2,H,VV2,H,1),COLORMAGENTA,LINETHICK1;
) X2 |2 Z7 s6 c* Y0 h
前一低:REF(L,BARSLAST(VV)),COLOR99FF66,POINTDOT,LINETHICK3;
4 p% T+ X0 _8 p( d前二低:REF(L,BARSLAST(XX)),COLORFF66FF,POINTDOT,LINETHICK3;
8 Z1 ~. t8 y& K前一高:REF(H,BARSLAST(VV2)),COLOR99FF66,POINTDOT,LINETHICK3;
4 ^9 O* ?8 Q5 S7 i5 s2 {前二高:REF(H,BARSLAST(XX2)),COLORFF66FF,POINTDOT,LINETHICK3;
7 U0 D# ?2 ?1 Q! _6 l) C7 O# p短高:=REF(H,BARSLAST(VV2)),LINETHICK0;
短低:=REF(L,BARSLAST(VV)),LINETHICK0;
3 W; M$ r- k6 W% H短比: (C-短低)/(短高-短低),LINETHICK0;

{以下语句是大盘趋势叠加}
+ q3 a- g: T, s* j4 R2 R常数:=REF(INDEXC,BARSLAST(VV))/REF(C,BARSLAST(VV));
叠1:INDEXC/常数,COLORGRAY,LINETHICK0;
4 ?( w' C2 ]" N2 |$ LPARTLINE(1,叠1),COLORGRAY;
! p- J8 `" k- Q9 _7 C. E  T/ V常数2:=REF(INDEXC,BARSLAST(XX))/REF(C,BARSLAST(XX));
8 y# ]7 }0 j) u0 x- S2 S6 k1 Q叠2:INDEXC/常数2,COLORGRAY,LINETHICK0;
! W2 O# i, H% S" U- E: j# B0 E* k9 pPARTLINE(1,叠2),COLORGRAY;

7 c  y1 ]$ @. C1 g8 J5 I6 ODRAWNUMBER(HD,1.02*H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),COLORCYAN;
! H1 ?% g* A+ i. }% `( r" N! [DRAWNUMBER(LD,0.98*L,DATEDIFF(REF(DATE,BARSLAST(HD)),DATE),0),COLORCYAN;

DRAWNUMBER(HD,H*(1+0.002),H,2),COLORBLUE,ALIGN0;
) a3 U7 Z+ C2 F3 vDRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORBLUE,ALIGN0;
4 L/ E6 A/ C( Y% G7 p# G7 q
{以下语句为三角形部分}
2 `* D  I5 f- p( k, |
底:REF(L,BARSLAST(VV)),COLORred,LINETHICK2;
* j. g- ]2 N' i( E  b4 G7 `/ B頂:REF(H,BARSLAST(VV2)),COLORGreen,LINETHICK2;
5 r) v# n  q" B2 f* L- h
2 B' K# B8 n/ K- p{下迭三角形：藍色三角形畫完介入}
StickLine(VV,頂,底,0,0),Colorff6633,linethick3;{}
DRAWLINE(VV2,H,VV,L,0),Colorff6633,linethick3;{斜}
8 j" E# a/ L2 t$ C  }6 J4 P% ^DRAWLINE(VV2,H,VV,頂,0),Colorff6633,linethick3;{?}
9 D1 F: Y( ^' M, z( o) x6 A
{DRAWLINE(c>0,H,VV,L,0),Colorcyan,linethick2;}{斜}
{DRAWLINE(c>1,H,VV,頂,0),Colorcyan,linethick2;}{?}
1 L$ y- l5 [2 n, g: d{上漲三角形：紅色三角形畫完出局}
StickLine(VV2 ,頂,底,0,0),Colorred,linethick3;{}
( t. F$ d8 l) F3 \; |- dDRAWLINE(VV,L,VV2,H,0),Colorred,linethick3;{斜}
DRAWLINE(VV,L,VV2,底,0),Colorred,linethick3;{?};

" a. ?: i6 v+ F$ _' n[ 本帖最后由 恒益 于 2011-1-10 20:31 编辑 ]

恒益

BACKSET算不算未来函数？

tupiter

好公式

悠然踏浪

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

hippe

好东东！！

woaigutou

辛苦了

天蓝蓝

) v0 @1 j  u5 U0 b
0 ~* d% I& B- R1 n& a4 a. ?- P你们改好了，我再装！

adinos

bibihead

统计高-低，低-高的差值
----指高-低的值 减去 低-高 的值吗？

现在显示的是自然日的差值，要自然日还是交易日？

chaosxu

ycng

加
* o5 E5 C4 e: l: ?2 L  [) S
: T+ j. n* A) O$ Y: u1 Z+ N' ja1:=ref(h,barslast(hd));
* _/ _- g% e4 Q! A0 J$ q6 |1 f- @a2:=ref(L,barslast(Ld));
  Q# C; {: a. C' ^a11:=ref(h,barslast(hz));
+ K( l" k9 e6 _7 g6 \a22:=ref(L,barslast(Lz));
% r1 _+ l% }; w- K9 l3 U+ Ddrawtext(ld,a2*0.95,'P '),color009900;
/ [; N0 v  u/ T' k. ddrawnumber(ld,a2*0.95,(a1-a2),2),colorred,shift2;
; h$ }# y5 k5 q7 A8 mdrawtext(hd,a1*1.05,'P '),color009900;
5 F7 f& M: d* G' p3 [7 pdrawnumber(hd,a1*1.05,(a1-a2),2),colorwhite,shift2;
# L6 A: I5 L' W( q8 E8 jdrawtext(Lz,a22*0.87,'P '),color009900;
drawnumber(Lz,a22*0.87,(a11-a22),2),coloryellow,shift2;
' V& |. c) T1 n: M% H* Gdrawtext(hz,a11*1.13,'P '),color009900;
' m% K- B" w9 d" I3 Udrawnumber(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;
% v- T# ]# q7 ~/ w5 t+ m! idrawtext(hd,a1*1.08,'T '),color999999;
drawnumber(hd,a1*1.08,barslast(Ld),0),colorgreen,shift2;
& z0 f: \! s5 a0 _: edrawtext(Lz,a22*0.84,'T '),color999999;
drawnumber(Lz,a22*0.84,barslast(hz),0),colorred,shift2;
2 M' P" c) d* edrawtext(hz,a11*1.17,'T '),color999999;
drawnumber(hz,a11*1.17,barslast(Lz),0),colorred,shift2;
. Y) ?; p( C. l' r0 ~, t) t. C
. Z! R) h: s9 l9 F[ 本帖最后由 ycng 于 2011-1-10 23:58 编辑 ]

bibihead

后面加上这些代码就O了。
/ r! b9 X+ l5 Z8 U  {# X8 k  T4 s8 \网站不给贴，搞个附件上来打开看就可以了。

489km

jwchj

logoslogos

原帖由 bibihead 于 2011-1-10 23:29 发表
6 }  r+ b( [4 x1 r( R+ m  M1 G统计高-低，低-高的差值
----指高-低的值 减去 低-高 的值吗？
& w" E3 ?: W4 q$ J) G
现在显示的是自然日的差值，要自然日还是交易日？

不是统计时间的差值，是统计高-低价格的差值，目的是统计观察价格（空间的）波动距离，
我是要用这个公式去方便验证BAYER的一个股价波动距离的理论。呵呵，多谢！！！

mrgjy1818

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

logoslogos

我一楼没说清楚
+ d% A4 ]. M; S; O我需要统计高-低，低-高的价格差值，谢谢

logoslogos

原公式中红色四句改成以下蓝色的四句，K线上下标注的价格就不会太靠近K线了。
0 }8 |/ w% [% W% K; p' b3 A( a
0 K& R1 I# {+ a$ _9 wDRAWNUMBER(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;
; n3 `0 I7 J. gDRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORWHITE,PXDN30,ALIGN0;
( O" f7 e( y$ F9 E2 j1 b
呵呵，恰恰相反的需要呢。我希望标识的价格差值距离K线近些，现在距离太远了。谢

何时回头是岸

谢

afafaf

原帖由 ycng 于 2011-1-10 23:56 发表
- V( w0 K# |! X加
0 o  Y* a' D% d" i# i1 r
a1:=ref(h,barslast(hd));
8 q" G2 w% I4 Y2 j* `a2:=ref(L,barslast(Ld));
. F' O" |% w1 n, I5 La11:=ref(h,barslast(hz));
a22:=ref(L,barslast(Lz));
drawtext(ld,a2*0.95,'P '),color009900;
7 ?4 O3 Z! d  j1 q6 e+ ]7 D* g# G$ ^drawnumber(ld,a2*0.95,(a1-a2),2),colorred,shift2 ...

* _( q) \, F& r$ s; U谢谢ycng兄妙手点缀
' l$ u' L1 l- n( @& P3 v

散户甲

公式高手不少

axcqy

axcqy

原帖由 于afafaf  2011-1-11 16:06 发表
. ^! V( _8 R; y% o& [7 V& F
1 d+ @. Y2 M+ R9 j! d谢谢ycng兄妙手点缀
99290

9 b5 g  `6 V9 Z3 A4 ^请问afafaf 兄要修改那条公式才能有这种排列格式呢?谢谢!

afafaf

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

4 j3 w) t( Y9 L2 M$ e1 n请问afafaf 兄要修改那条公式才能有这种排列格式呢?谢谢!

4 a4 Z, f6 G! E4 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;
加
a1:=ref(h,barslast(hd));
a2:=ref(L,barslast(Ld));
, m9 \* c  _: W9 l: T) Da11:=ref(h,barslast(hz));
2 e" B% U3 S" J' K+ z/ a6 Ta22:=ref(L,barslast(Lz));
drawtext(ld,a2*0.95,'P '),color009900;
5 l+ Z7 C' N& d, O: pdrawnumber(ld,a2*0.95,(a1-a2),2),colorred,shift2;
' e/ z- Y0 z' F' _& sdrawtext(hd,a1*1.05,'P '),color009900;
7 U; A7 Z" O* sdrawnumber(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;
1 G) ?" N5 E# l6 E2 xdrawtext(ld,a2*0.92,'T '),color999999;
. k0 ?, a) {5 b# G0 @4 {drawnumber(ld,a2*0.92,barslast(hd),0),colorgreen,shift2;
drawtext(hd,a1*1.08,'T '),color999999;
! T- D% H8 y* L2 c" vdrawnumber(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;
! C+ B" ?7 g. @" D' Tdrawnumber(hz,a11*1.17,barslast(Lz),0),colorred,shift2;

' P# l3 g. y: M[ 本帖最后由 afafaf 于 2011-1-11 21:13 编辑 ]