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

logoslogos

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

[ 本帖最后由 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);{低点}
. w& u* Z8 V& ~. q$ CE1:=(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;
2 G9 ~, b) }! z8 jX2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2));
  o& k. O8 ~1 d' A8 }, ?G2:=F2>REF(F2,1); I2:=BACKSET(G2,2); HD:=I2>REF(I2,1);{过滤后高点}
/ L; ]0 [; \  ^, q; l- E4 r# F  oDRAWLINE(LD,L,HD,H,0),COLORWHITE,LINETHICK1,POINTDOT;
DRAWLINE(HD,H,LD,L,0),COLORWHITE,LINETHICK1,POINTDOT;
! e: }2 X: Y2 GJ1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HD),BARSLAST(LD))+1); J2:=J1>REF(J1,1);
: \% N" \8 u4 T: q* TDRAWLINE(J2,IF(HD,H,L),ISLASTBAR,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),COLORWHITE,LINETHICK1,POINTDOT;
+ r* O% P, [( d9 C# M{以上语句为新结构波浪}

A3:=H<REF(H,REF(BARSLAST(HD),1)+1);
' }- X' ^/ _: ZB3:=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);
% m0 s1 B$ o2 s! aB4:=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;
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));
' A( W( ^, ^7 [* @; H7 xG3:=F3>REF(F3,1); I3:=BACKSET(G3,2); LZ:=I3>REF(I3,1),LINETHICK0; {长期低点，也可供引用}
) a( t; g: ]" \5 }8 T  zL4:=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; {最后的长期连线，连在收盘价上}

{以下是两条趋势线原码}
" V) U  @7 g( Q, H; E2 e% A0 I$ yUU:=BACKSET(ISLASTBAR,BARSLAST(LD)+1);
4 [5 N( O) |$ ^* Z7 V& t# K" AVV:=UU>REF(UU,1);
WW:=BACKSET(VV,REF(BARSLAST(LD),1)+2);
XX:=WW>REF(WW,1);
DRAWLINE(XX,L,VV,L,1),COLORMAGENTA,LINETHICK1;
8 e! [8 V3 _" v; G) d+ kUU2:=BACKSET(ISLASTBAR,BARSLAST(HD)+1);
VV2:=UU2>REF(UU2,1);
WW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);
( R1 U1 z: ?4 dXX2:=WW2>REF(WW2,1);
  ?5 p4 X+ N6 S7 pDRAWLINE(XX2,H,VV2,H,1),COLORMAGENTA,LINETHICK1;

前一低: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;
. H  G; M' h( l短高:=REF(H,BARSLAST(VV2)),LINETHICK0;
6 V- I. S6 z8 I+ U8 O- Y短低:=REF(L,BARSLAST(VV)),LINETHICK0;
短比: (C-短低)/(短高-短低),LINETHICK0;
5 Q+ q2 W9 ?4 g! x, q$ s8 c
5 T& x5 y7 k+ _/ h{以下语句是大盘趋势叠加}
常数:=REF(INDEXC,BARSLAST(VV))/REF(C,BARSLAST(VV));
$ c) X) m7 [. s4 Z& G  D# f% k! ]叠1:INDEXC/常数,COLORGRAY,LINETHICK0;
, y5 _) ^& R% M$ X# B( F: p. kPARTLINE(1,叠1),COLORGRAY;
3 e2 F! n3 @! q, s1 v4 L' g常数2:=REF(INDEXC,BARSLAST(XX))/REF(C,BARSLAST(XX));
/ {# E# U3 U/ t. F, l5 a, O  i叠2:INDEXC/常数2,COLORGRAY,LINETHICK0;
PARTLINE(1,叠2),COLORGRAY;
) ?& P$ R% Q4 X" Z1 O! D  \
) L! R  X8 W8 @. g' H, N; fDRAWNUMBER(HD,1.02*H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),COLORCYAN;
2 ]% o: I6 f. X: E. V, fDRAWNUMBER(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;

{以下语句为三角形部分}

底:REF(L,BARSLAST(VV)),COLORred,LINETHICK2;
頂:REF(H,BARSLAST(VV2)),COLORGreen,LINETHICK2;

{下迭三角形：藍色三角形畫完介入}
StickLine(VV,頂,底,0,0),Colorff6633,linethick3;{}
8 ^$ Z( A0 \7 H, F1 H* {DRAWLINE(VV2,H,VV,L,0),Colorff6633,linethick3;{斜}
1 q$ A4 ]( T- p* i+ KDRAWLINE(VV2,H,VV,頂,0),Colorff6633,linethick3;{?}

{DRAWLINE(c>0,H,VV,L,0),Colorcyan,linethick2;}{斜}
{DRAWLINE(c>1,H,VV,頂,0),Colorcyan,linethick2;}{?}
4 X$ g* _$ c* U9 o$ v{上漲三角形：紅色三角形畫完出局}
StickLine(VV2 ,頂,底,0,0),Colorred,linethick3;{}
$ Q/ D# {: `" Y* b, pDRAWLINE(VV,L,VV2,H,0),Colorred,linethick3;{斜}
DRAWLINE(VV,L,VV2,底,0),Colorred,linethick3;{?};

ycng

加这8行
a1:=ref(h,barslast(hd));
& s5 J5 ^, u' ^* \1 i2 S' Xa2:=ref(L,barslast(Ld));
' j6 y+ V9 H( `4 f. w. wdrawnumber(ld,a2*0.95,(a1-a2),2),colorred;
/ I6 V; x. w, _/ v& Wdrawnumber(hd,a1*1.05,(a1-a2),2),colorwhite;
% a0 y( G. A- }7 m2 Y# k/ n% Na11:=ref(h,barslast(hz));
0 l9 U9 D4 g2 z6 x$ k( a1 Ea22:=ref(L,barslast(Lz));
! i0 A# N! x  n5 T+ w, n3 adrawnumber(Lz,a22*0.87,(a11-a22),2),coloryellow;
drawnumber(hz,a11*1.13,(a11-a22),2),coloryellow;
3 h( c" W) s  e) w( b
$ }" ]% Z% p+ ?( `[ 本帖最后由 ycng 于 2011-1-10 18:03 编辑 ]

axcqy

axcqy

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

* B. o' z. O0 A+ k% U+ S+ V很不错的指标; 把字改为白色好看一点

mcwhmm

恒益

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

DRAWNUMBER(HD,H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),PXUP70,COLORCYAN;
' M& o; ~8 T( IDRAWNUMBER(LD,L,DATEDIFF(REF(DATE,BARSLAST(HD)),DATE),0),PXDN70,COLORCYAN;
3 r5 s/ _, ~, ]/ z, Z) n, CDRAWNUMBER(HD,H*(1+0.002),H,2),COLORWHITE,PXUP30,ALIGN0;
DRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORWHITE,PXDN30,ALIGN0;
源码中叠加大盘趋势（下面源码中绿色的）画成了灰色，改成黄色比较醒目一些：
叠1:INDEXC/常数,COLORYELLOW,LINETHICK0;
  s) S3 R7 M  d2 jPARTLINE(1,叠1),COLORYELLOW;
  _) Y4 ^, x* ^( `$ A常数2:=REF(INDEXC,BARSLAST(XX))/REF(C,BARSLAST(XX));
叠2:INDEXC/常数2,COLORYELLOW,LINETHICK0;
PARTLINE(1,叠2),COLORYELLOW;
# l8 A# Z' Z" D/ E% F


# ]. L. ]) R# Y$ n6 S! B源码：
5 X" c6 j1 h6 m0 N9 }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线上时可作取舍}
+ ?3 b2 X% M; C( f  zH1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
6 ?9 _( m2 T# ?8 U4 G- C0 yL1:=(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);{过滤后低点}
& q4 F" s% j# r- S" PL2:=LD OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
6 F" s) J! w0 {3 W! d! bX2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2));
2 z- u9 |2 g% M' u) {( N0 wG2:=F2>REF(F2,1); I2:=BACKSET(G2,2); HD:=I2>REF(I2,1);{过滤后高点}
/ ~* M2 G0 d5 H. K- \  WDRAWLINE(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;
{以上语句为新结构波浪}
. G- M6 B9 ~: a/ @
. j$ J! {# r. ?: y$ jA3:=H<REF(H,REF(BARSLAST(HD),1)+1);
7 F3 T- E2 u, A) J1 _& @) ^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);{找出全部长期高点}
: t; Z* ^; ]) b( xA4:=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));
" C1 b* _1 L  rD4:=A4 AND B4 AND LD; E4:=BACKSET(D4,REF(BARSLAST(LD),1)+2); LL:=E4>REF(E4,1);{找出全部长期低点}
3 }' s" R: A+ q& |, L" W/ wDRAWICON(HH,H,10),ALIGN2; DRAWICON(LL,L,12),ALIGN1;
9 N8 d1 R$ W) N5 I, p8 z( G* o% uH3:=HH OR ISLASTBAR OR BARSCOUNT(C)=1; {后面进行过滤，方法同前。只是不用考虑高低点出现在同一K线}
! F+ u* Q9 t8 v! I8 y' FX3:=REF(BARSLAST(H3),1)+1; F3:=BACKSET(H3 AND COUNT(LL,X3)>0,LLVBARS(IF(LL,L,POW(10,20)),X3));
/ ]2 ^: U7 s3 |G3:=F3>REF(F3,1); I3:=BACKSET(G3,2); LZ:=I3>REF(I3,1),LINETHICK0; {长期低点，也可供引用}
- A. m3 \2 C0 Z6 K2 _* HL4:=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;
4 n: c! x; ~" g' J& P* TDRAWLINE(LZ,L,HZ,H,0),COLORGREEN,LINETHICK1;{长期连线}
K1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HZ),BARSLAST(LZ))+1); K2:=K1>REF(K1,1);
- g* t( ~7 g& X. Z+ z8 U* o4 ADRAWLINE(K2,IF(HZ,H,L),ISLASTBAR,C,0),COLORGREEN,LINETHICK1; {最后的长期连线，连在收盘价上}

1 `& g1 M& Y! T3 d- u8 h$ |{以下是两条趋势线原码}
  {4 F3 m, W$ Z3 `UU:=BACKSET(ISLASTBAR,BARSLAST(LD)+1);
5 L7 p7 j4 Y& K+ L- ^VV:=UU>REF(UU,1);
1 [& L" y) v6 G( s* @" `& KWW:=BACKSET(VV,REF(BARSLAST(LD),1)+2);
XX:=WW>REF(WW,1);
DRAWLINE(XX,L,VV,L,1),COLORMAGENTA,LINETHICK1;
UU2:=BACKSET(ISLASTBAR,BARSLAST(HD)+1);
VV2:=UU2>REF(UU2,1);
: s, S. o& H- ~2 l6 {3 v, tWW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);
6 ^: Z" R7 b, qXX2:=WW2>REF(WW2,1);
DRAWLINE(XX2,H,VV2,H,1),COLORMAGENTA,LINETHICK1;
  }' t3 R; r, f: x( T* y
6 U% B3 n; f. n3 {! c前一低:REF(L,BARSLAST(VV)),COLOR99FF66,POINTDOT,LINETHICK3;
5 x1 S+ e* U% X前二低:REF(L,BARSLAST(XX)),COLORFF66FF,POINTDOT,LINETHICK3;
前一高:REF(H,BARSLAST(VV2)),COLOR99FF66,POINTDOT,LINETHICK3;
前二高:REF(H,BARSLAST(XX2)),COLORFF66FF,POINTDOT,LINETHICK3;
3 l4 l4 S  o& x% I6 g8 O短高:=REF(H,BARSLAST(VV2)),LINETHICK0;
短低:=REF(L,BARSLAST(VV)),LINETHICK0;
短比: (C-短低)/(短高-短低),LINETHICK0;

{以下语句是大盘趋势叠加}
常数:=REF(INDEXC,BARSLAST(VV))/REF(C,BARSLAST(VV));
& E1 e; [( a" t: {) ~/ A% e叠1:INDEXC/常数,COLORGRAY,LINETHICK0;
& h6 G: Q( ]. k: E- {8 w1 O: jPARTLINE(1,叠1),COLORGRAY;
( C3 j9 m6 U" V" d常数2:=REF(INDEXC,BARSLAST(XX))/REF(C,BARSLAST(XX));
叠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;
% }. r4 ~$ \4 S' S: f  o
% u' J0 j2 H+ I0 l+ I  PDRAWNUMBER(HD,H*(1+0.002),H,2),COLORBLUE,ALIGN0;
DRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORBLUE,ALIGN0;
5 B8 d( r; O9 ~4 s* d: q
9 v$ f' n; p. b4 L8 b! J{以下语句为三角形部分}

底:REF(L,BARSLAST(VV)),COLORred,LINETHICK2;
頂:REF(H,BARSLAST(VV2)),COLORGreen,LINETHICK2;
( }/ p4 {- t% y6 P& I( {+ T
8 |) n* C) Q# a* H+ ?( J( k# B{下迭三角形：藍色三角形畫完介入}
StickLine(VV,頂,底,0,0),Colorff6633,linethick3;{}
& Z# A5 o  ~% j! UDRAWLINE(VV2,H,VV,L,0),Colorff6633,linethick3;{斜}
8 p: r8 K: `4 O+ o' _. MDRAWLINE(VV2,H,VV,頂,0),Colorff6633,linethick3;{?}
2 A' i5 S# |. \" q8 V  F& e5 U* M
{DRAWLINE(c>0,H,VV,L,0),Colorcyan,linethick2;}{斜}
# J/ I+ ]/ f/ r3 i8 p7 C% t6 m0 s{DRAWLINE(c>1,H,VV,頂,0),Colorcyan,linethick2;}{?}
0 C2 p& _8 G5 {1 o( y( S+ H8 K{上漲三角形：紅色三角形畫完出局}
2 p, i- J) D! q6 Y1 j+ WStickLine(VV2 ,頂,底,0,0),Colorred,linethick3;{}
DRAWLINE(VV,L,VV2,H,0),Colorred,linethick3;{斜}
/ T5 r0 M6 G  h. {  T5 {DRAWLINE(VV,L,VV2,底,0),Colorred,linethick3;{?};
" ?' s8 u) o3 E
2 `" H! _2 s4 t" M, U. l[ 本帖最后由 恒益 于 2011-1-10 20:31 编辑 ]

恒益

BACKSET算不算未来函数？

tupiter

好公式

悠然踏浪

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

hippe

好东东！！

woaigutou

辛苦了

天蓝蓝

+ N" r) r" O  u# F0 G6 L% e
你们改好了，我再装！

adinos

bibihead

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

8 S3 R8 B& v$ o现在显示的是自然日的差值，要自然日还是交易日？

chaosxu

ycng

加

a1:=ref(h,barslast(hd));
a2:=ref(L,barslast(Ld));
a11:=ref(h,barslast(hz));
$ ?$ D" j2 o8 Q2 ^( J/ va22:=ref(L,barslast(Lz));
drawtext(ld,a2*0.95,'P '),color009900;
8 V1 {9 u7 C; Y2 H7 W9 sdrawnumber(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;
# Z* |4 }" m- I/ fdrawnumber(Lz,a22*0.87,(a11-a22),2),coloryellow,shift2;
drawtext(hz,a11*1.13,'P '),color009900;
' Q! w( F$ E5 @& b( Cdrawnumber(hz,a11*1.13,(a11-a22),2),coloryellow,shift2;
" f5 P8 U( w/ Y$ E4 `. r1 e' E9 t/ C
, F5 j! k* d$ v. M4 U7 Ldrawtext(ld,a2*0.92,'T '),color999999;
( ?6 P; n/ @4 z: Q4 u( Xdrawnumber(ld,a2*0.92,barslast(hd),0),colorgreen,shift2;
6 [* v, [2 h. z3 T! x) G' T8 |drawtext(hd,a1*1.08,'T '),color999999;
drawnumber(hd,a1*1.08,barslast(Ld),0),colorgreen,shift2;
- ^" `2 }( I) y2 Bdrawtext(Lz,a22*0.84,'T '),color999999;
$ D9 R7 [$ @. ]drawnumber(Lz,a22*0.84,barslast(hz),0),colorred,shift2;
/ k1 `9 W4 X/ V  Kdrawtext(hz,a11*1.17,'T '),color999999;
drawnumber(hz,a11*1.17,barslast(Lz),0),colorred,shift2;

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

bibihead

后面加上这些代码就O了。
! ~) X; T# y6 h9 U3 N网站不给贴，搞个附件上来打开看就可以了。
2 F6 I. A, j. \

489km

jwchj

logoslogos

原帖由 bibihead 于 2011-1-10 23:29 发表
9 N4 d' Q  N+ t3 d) c$ U9 D统计高-低，低-高的差值
; Y: ~( Z: |! w1 V: s3 N  G9 W2 X----指高-低的值 减去 低-高 的值吗？

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

* {. L& m+ a1 i不是统计时间的差值，是统计高-低价格的差值，目的是统计观察价格（空间的）波动距离，
& p- q! w- w% l: _* y我是要用这个公式去方便验证BAYER的一个股价波动距离的理论。呵呵，多谢！！！

mrgjy1818

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

logoslogos

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

logoslogos

原公式中红色四句改成以下蓝色的四句，K线上下标注的价格就不会太靠近K线了。
0 i8 i# q! C6 K% ]
  `# f; X  a1 z( CDRAWNUMBER(HD,H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),PXUP70,COLORCYAN;
0 X- G, i+ W8 q/ G* |: J) t! 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;
6 a: D; M# e3 _0 u" q( p% z
( a; C( a, [7 V+ Q0 E呵呵，恰恰相反的需要呢。我希望标识的价格差值距离K线近些，现在距离太远了。谢

何时回头是岸

谢

afafaf

原帖由 ycng 于 2011-1-10 23:56 发表
9 u& X9 d5 C- V# S2 S3 e+ ]2 k加
8 d9 C2 S; \+ D2 E
a1:=ref(h,barslast(hd));
# U3 `/ X4 b- {) da2:=ref(L,barslast(Ld));
a11:=ref(h,barslast(hz));
' _: N( w) r2 O- w' }1 h2 wa22:=ref(L,barslast(Lz));
( T  w8 Q. R5 Q! `% S+ [drawtext(ld,a2*0.95,'P '),color009900;
drawnumber(ld,a2*0.95,(a1-a2),2),colorred,shift2 ...

9 t; ?) T' d* O0 C8 ~% C谢谢ycng兄妙手点缀

散户甲

公式高手不少

axcqy

axcqy

原帖由 于afafaf  2011-1-11 16:06 发表
! ~! R& |; B, U9 e; V" j% G
谢谢ycng兄妙手点缀
99290

6 ^6 s% l/ E2 e! H$ a8 x请问afafaf 兄要修改那条公式才能有这种排列格式呢?谢谢!

afafaf

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

5 r1 ]6 h! |2 e请问afafaf 兄要修改那条公式才能有这种排列格式呢?谢谢!

3 v$ {/ W: ^) R2 N% i" T
DRAWNUMBER(HD,1.02*H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),COLORCYAN;
  J& ~" X; \: ?# o$ k( aDRAWNUMBER(LD,0.98*L,DATEDIFF(REF(DATE,BARSLAST(HD)),DATE),0),COLORCYAN;
加
a1:=ref(h,barslast(hd));
a2:=ref(L,barslast(Ld));
/ @- g9 Z  ~) fa11:=ref(h,barslast(hz));
8 A- r: g5 n  O3 F: y6 ka22:=ref(L,barslast(Lz));
6 q% I) a2 q9 g6 X6 Ddrawtext(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;
  J2 U; J* V. p. Ldrawnumber(Lz,a22*0.87,(a11-a22),2),coloryellow,shift2;
" r2 L, O. I( O! Y" Sdrawtext(hz,a11*1.13,'P '),color009900;
drawnumber(hz,a11*1.13,(a11-a22),2),coloryellow,shift2;
2 U  d: l/ V" t  h+ t3 Rdrawtext(ld,a2*0.92,'T '),color999999;
drawnumber(ld,a2*0.92,barslast(hd),0),colorgreen,shift2;
drawtext(hd,a1*1.08,'T '),color999999;
& f& J! z+ ~! C# Q5 |. H& Y+ p1 P9 idrawnumber(hd,a1*1.08,barslast(Ld),0),colorgreen,shift2;
9 E* z# f' _# udrawtext(Lz,a22*0.84,'T '),color999999;
drawnumber(Lz,a22*0.84,barslast(hz),0),colorred,shift2;
drawtext(hz,a11*1.17,'T '),color999999;
3 j/ y2 T$ S' C0 ]6 Odrawnumber(hz,a11*1.17,barslast(Lz),0),colorred,shift2;

, P% i0 u" }' f4 q* H/ y! K# b[ 本帖最后由 afafaf 于 2011-1-11 21:13 编辑 ]