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

logoslogos

这个是经典的清扬公式，公式统计了高低，底高之间的天数， 请修改公式，我需要统计高-低，低-高的差值，并标注在图上，最好显示在二值之间或高低数值边上，。
根据BAYer的理论，他说股票的每个波动规律都是固定，一旦找到个股的波动规律，你就有福了。我希望各位利用这个清扬波浪，和BAYER的理论一起发财，呵呵。
关于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);{低点}
E1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2; E2:=(HIGH+LOW)/2;{高低点出现在同一K线上时可作取舍}
, _- f0 U2 _& _3 ZH1:=(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);
- K: P# h: A( f# m7 `X1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,10000),X1));
% ?9 \1 J' F+ fG1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:=I1>REF(I1,1);{过滤后低点}
( P5 S6 b8 V; ], i$ X# h9 cL2:=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;
1 }' `" ?# R' Q0 E( l3 bDRAWLINE(HD,H,LD,L,0),COLORWHITE,LINETHICK1,POINTDOT;
J1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HD),BARSLAST(LD))+1); J2:=J1>REF(J1,1);
$ q* [2 ^8 r' _! jDRAWLINE(J2,IF(HD,H,L),ISLASTBAR,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),COLORWHITE,LINETHICK1,POINTDOT;
{以上语句为新结构波浪}

! b: T% g! I% N) L; S. M4 EA3:=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));
5 U, A' Y0 \" T/ v+ T  o/ qD3:=A3 AND B3 AND HD; E3:=BACKSET(D3,REF(BARSLAST(HD),1)+2); HH:=E3>REF(E3,1);{找出全部长期高点}
# ]; y9 R: r: jA4:=L>REF(L,REF(BARSLAST(LD),1)+1);
8 }7 L  X6 e/ C5 h# ^' G3 xB4:=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;
( k! z. B% u6 o! X, eH3:=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));
G4:=F4>REF(F4,1); I4:=BACKSET(G4,2); HZ:=I4>REF(I4,1),LINETHICK0;{长期高点，也可供引用}
+ Z) S& l+ G. V; l+ j1 K" E, wDRAWLINE(HZ,H,LZ,L,0),COLORGREEN,LINETHICK1;
DRAWLINE(LZ,L,HZ,H,0),COLORGREEN,LINETHICK1;{长期连线}
% c* L" x! f4 F; }$ p% U( x6 }K1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HZ),BARSLAST(LZ))+1); K2:=K1>REF(K1,1);
0 C& V" l/ l7 BDRAWLINE(K2,IF(HZ,H,L),ISLASTBAR,C,0),COLORGREEN,LINETHICK1; {最后的长期连线，连在收盘价上}
$ d* t* I( ?& J0 e$ D5 h# o
{以下是两条趋势线原码}
9 k1 }( H- ?5 ?UU:=BACKSET(ISLASTBAR,BARSLAST(LD)+1);
VV:=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;
UU2:=BACKSET(ISLASTBAR,BARSLAST(HD)+1);
VV2:=UU2>REF(UU2,1);
! B; n: i9 B9 Q1 L/ HWW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);
" r! z  W  v: A5 R/ q2 Y: a4 [XX2:=WW2>REF(WW2,1);
0 i9 i; a: F! E' l  j; U; _DRAWLINE(XX2,H,VV2,H,1),COLORMAGENTA,LINETHICK1;

前一低:REF(L,BARSLAST(VV)),COLOR99FF66,POINTDOT,LINETHICK3;
% i/ k/ C4 b- R5 Y2 K5 `前二低:REF(L,BARSLAST(XX)),COLORFF66FF,POINTDOT,LINETHICK3;
0 B) S2 m' O- E1 L8 v4 F" Q- M前一高:REF(H,BARSLAST(VV2)),COLOR99FF66,POINTDOT,LINETHICK3;
前二高:REF(H,BARSLAST(XX2)),COLORFF66FF,POINTDOT,LINETHICK3;
$ m3 K7 ?6 [1 b3 R% @短高:=REF(H,BARSLAST(VV2)),LINETHICK0;
短低:=REF(L,BARSLAST(VV)),LINETHICK0;
短比: (C-短低)/(短高-短低),LINETHICK0;
( E" x  e& P$ Q
3 ]8 Z3 X2 b2 F6 ]1 z! Z{以下语句是大盘趋势叠加}
9 ?- a6 B% R  ^( X& `+ ?常数:=REF(INDEXC,BARSLAST(VV))/REF(C,BARSLAST(VV));
叠1:INDEXC/常数,COLORGRAY,LINETHICK0;
* g! y& E) U. ~, c8 Z* ~1 KPARTLINE(1,叠1),COLORGRAY;
常数2:=REF(INDEXC,BARSLAST(XX))/REF(C,BARSLAST(XX));
2 K+ f1 Y6 u6 m叠2:INDEXC/常数2,COLORGRAY,LINETHICK0;
PARTLINE(1,叠2),COLORGRAY;
, [- f4 E, V" g9 W5 h  h! W! @
' Y/ e. Y& z0 s( x: ]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;
% U( d) h% r2 A- G, N# |/ l
+ O& e- ~6 u( T, E/ q8 B- z; @$ zDRAWNUMBER(HD,H*(1+0.002),H,2),COLORBLUE,ALIGN0;
$ ]" n- f7 B5 H+ cDRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORBLUE,ALIGN0;

  \' [' w; }6 l1 ^1 e{以下语句为三角形部分}
: g3 Y0 D. X% K2 o) A& P
- u; Z) c  w7 V( C4 A底:REF(L,BARSLAST(VV)),COLORred,LINETHICK2;
頂:REF(H,BARSLAST(VV2)),COLORGreen,LINETHICK2;

+ y7 V" z( G) O- B{下迭三角形：藍色三角形畫完介入}
3 _" Q3 Q& k4 a1 y+ |StickLine(VV,頂,底,0,0),Colorff6633,linethick3;{}
+ d4 B; c- G8 t: ^DRAWLINE(VV2,H,VV,L,0),Colorff6633,linethick3;{斜}
DRAWLINE(VV2,H,VV,頂,0),Colorff6633,linethick3;{?}

{DRAWLINE(c>0,H,VV,L,0),Colorcyan,linethick2;}{斜}
6 X' |6 A# N& j$ I# ~4 u" C" Q{DRAWLINE(c>1,H,VV,頂,0),Colorcyan,linethick2;}{?}
/ D* K" q; B; x. T{上漲三角形：紅色三角形畫完出局}
8 A  d, _% u% b1 P7 e, tStickLine(VV2 ,頂,底,0,0),Colorred,linethick3;{}
. O2 Z7 b5 s/ |% ADRAWLINE(VV,L,VV2,H,0),Colorred,linethick3;{斜}
DRAWLINE(VV,L,VV2,底,0),Colorred,linethick3;{?};

ycng

加这8行
a1:=ref(h,barslast(hd));
( G5 x- Z- q' U; r) i7 Na2:=ref(L,barslast(Ld));
/ U% E1 d5 l, d7 Zdrawnumber(ld,a2*0.95,(a1-a2),2),colorred;
drawnumber(hd,a1*1.05,(a1-a2),2),colorwhite;
a11:=ref(h,barslast(hz));
4 p$ J- Z) S5 R% P5 [" ^a22:=ref(L,barslast(Lz));
drawnumber(Lz,a22*0.87,(a11-a22),2),coloryellow;
3 Q$ ]4 j" E8 h7 [3 E( @* Hdrawnumber(hz,a11*1.13,(a11-a22),2),coloryellow;

0 _. @7 }; i; q3 D8 l[ 本帖最后由 ycng 于 2011-1-10 18:03 编辑 ]

axcqy

axcqy

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

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

mcwhmm

恒益

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

, j' J- b  W& U0 w5 S( cDRAWNUMBER(HD,H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),PXUP70,COLORCYAN;
+ v* a/ U2 b3 E  e& d) uDRAWNUMBER(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;
源码中叠加大盘趋势（下面源码中绿色的）画成了灰色，改成黄色比较醒目一些：
叠1:INDEXC/常数,COLORYELLOW,LINETHICK0;
PARTLINE(1,叠1),COLORYELLOW;
常数2:=REF(INDEXC,BARSLAST(XX))/REF(C,BARSLAST(XX));
叠2:INDEXC/常数2,COLORYELLOW,LINETHICK0;
PARTLINE(1,叠2),COLORYELLOW;
" e/ P6 d* y& c5 {! G
# u1 f' Z& v# Z0 [- t$ K3 Z
+ u' m8 t. E6 h" i0 R8 \1 E; \# U) l
源码：
A1:=REF(HIGH,3)=HHV(HIGH,2*3+1); B1:=FILTER(A1,3); C1:=BACKSET(B1,3+1); D1:=FILTER(C1,3);{高点}
' t9 ]8 ^9 P4 yA2:=REF(LOW,3)=LLV(LOW,2*3+1); B2:=FILTER(A2,3); C2:=BACKSET(B2,3+1); D2:=FILTER(C2,3);{低点}
1 m( l9 w% b. `, Q3 D- p3 gE1:=(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);
8 A, W, o2 m+ a# |3 @X1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,10000),X1));
; X0 X) D& U! q  l8 iG1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:=I1>REF(I1,1);{过滤后低点}
L2:=LD OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
' P$ f' r8 }1 S2 q- P( _X2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2));
, M/ J! i6 `/ G: [, C- rG2:=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( \& D, g  Z7 _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;
2 v4 W+ p8 M- w- g( _2 B, o2 e& N{以上语句为新结构波浪}

8 j, C7 Y2 p% `% c" {& DA3:=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));
; R* {. U# B. t' HD4:=A4 AND B4 AND LD; E4:=BACKSET(D4,REF(BARSLAST(LD),1)+2); LL:=E4>REF(E4,1);{找出全部长期低点}
; C) R0 R% \% \( uDRAWICON(HH,H,10),ALIGN2; DRAWICON(LL,L,12),ALIGN1;
' r$ y2 y8 l/ ]' g% ~/ mH3:=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));
% U  G$ K8 v$ K  M! G) P# TG3:=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));
G4:=F4>REF(F4,1); I4:=BACKSET(G4,2); HZ:=I4>REF(I4,1),LINETHICK0;{长期高点，也可供引用}
DRAWLINE(HZ,H,LZ,L,0),COLORGREEN,LINETHICK1;
- ?9 b, v  n- p& X- t3 l& jDRAWLINE(LZ,L,HZ,H,0),COLORGREEN,LINETHICK1;{长期连线}
- N, W$ q1 c) I/ `* H3 J  `: hK1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HZ),BARSLAST(LZ))+1); K2:=K1>REF(K1,1);
: m4 y/ F; z$ M$ u. eDRAWLINE(K2,IF(HZ,H,L),ISLASTBAR,C,0),COLORGREEN,LINETHICK1; {最后的长期连线，连在收盘价上}
8 ?& q. w% E4 t6 P" W/ T: R) M" L0 j
{以下是两条趋势线原码}
# y/ }* H" U# kUU:=BACKSET(ISLASTBAR,BARSLAST(LD)+1);
VV:=UU>REF(UU,1);
3 @0 W, D; J+ _; N4 wWW:=BACKSET(VV,REF(BARSLAST(LD),1)+2);
XX:=WW>REF(WW,1);
3 }0 r) t$ K$ T2 y6 D0 W$ Y# YDRAWLINE(XX,L,VV,L,1),COLORMAGENTA,LINETHICK1;
UU2:=BACKSET(ISLASTBAR,BARSLAST(HD)+1);
0 `' D/ }6 y& a3 M0 d2 D1 r$ ^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;
/ D8 X2 }8 \$ B- n1 R0 H( p5 W; ]
前一低:REF(L,BARSLAST(VV)),COLOR99FF66,POINTDOT,LINETHICK3;
4 k' C3 V0 _8 l, P# e2 x$ B前二低:REF(L,BARSLAST(XX)),COLORFF66FF,POINTDOT,LINETHICK3;
. O0 `- P$ _8 t前一高:REF(H,BARSLAST(VV2)),COLOR99FF66,POINTDOT,LINETHICK3;
) F' L7 v7 }% i2 h1 I0 l2 b前二高:REF(H,BARSLAST(XX2)),COLORFF66FF,POINTDOT,LINETHICK3;
短高:=REF(H,BARSLAST(VV2)),LINETHICK0;
8 Y3 c7 M, G) Z& J0 b短低:=REF(L,BARSLAST(VV)),LINETHICK0;
' b* T" ~  a0 ?9 J  `* q' H短比: (C-短低)/(短高-短低),LINETHICK0;
. ?: \  Q: U/ F2 a
{以下语句是大盘趋势叠加}
常数:=REF(INDEXC,BARSLAST(VV))/REF(C,BARSLAST(VV));
叠1:INDEXC/常数,COLORGRAY,LINETHICK0;
PARTLINE(1,叠1),COLORGRAY;
8 _" I0 V; E( u# H; ]  Y: b常数2:=REF(INDEXC,BARSLAST(XX))/REF(C,BARSLAST(XX));
叠2:INDEXC/常数2,COLORGRAY,LINETHICK0;
, f- ^0 w  O6 P8 H2 N) ?* f5 f8 rPARTLINE(1,叠2),COLORGRAY;
8 T5 A. ?. D0 Y4 `: F
DRAWNUMBER(HD,1.02*H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),COLORCYAN;
6 q; M5 G) }& @  q1 YDRAWNUMBER(LD,0.98*L,DATEDIFF(REF(DATE,BARSLAST(HD)),DATE),0),COLORCYAN;
1 [) H& w* m& k! {8 A5 Q. m8 i
DRAWNUMBER(HD,H*(1+0.002),H,2),COLORBLUE,ALIGN0;
/ x; [/ ~" A4 O7 }DRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORBLUE,ALIGN0;

, Q% ~" r& c4 u6 o! P{以下语句为三角形部分}
( @1 H# W7 a9 D5 C  N  j
7 X2 H& m0 A. n- _1 R底:REF(L,BARSLAST(VV)),COLORred,LINETHICK2;
8 R0 |7 ]6 e/ `; m, g/ S6 [0 a頂:REF(H,BARSLAST(VV2)),COLORGreen,LINETHICK2;

: \! M: G; `, O7 o{下迭三角形：藍色三角形畫完介入}
StickLine(VV,頂,底,0,0),Colorff6633,linethick3;{}
, q9 b( Q& f% H# V! h$ C- K, GDRAWLINE(VV2,H,VV,L,0),Colorff6633,linethick3;{斜}
( h  d" v! M+ E1 p: J8 @. [0 VDRAWLINE(VV2,H,VV,頂,0),Colorff6633,linethick3;{?}

! V" ?5 R  J5 z/ i{DRAWLINE(c>0,H,VV,L,0),Colorcyan,linethick2;}{斜}
{DRAWLINE(c>1,H,VV,頂,0),Colorcyan,linethick2;}{?}
{上漲三角形：紅色三角形畫完出局}
. i2 k0 j( e; P  a* lStickLine(VV2 ,頂,底,0,0),Colorred,linethick3;{}
DRAWLINE(VV,L,VV2,H,0),Colorred,linethick3;{斜}
DRAWLINE(VV,L,VV2,底,0),Colorred,linethick3;{?};

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

恒益

BACKSET算不算未来函数？

tupiter

好公式

悠然踏浪

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

hippe

好东东！！

woaigutou

辛苦了

天蓝蓝

, g! C  L" E9 o) _/ b7 q- a  l+ H5 J/ {你们改好了，我再装！

adinos

bibihead

统计高-低，低-高的差值
----指高-低的值 减去 低-高 的值吗？
5 E! _- R$ P- Z" u9 o! W' B
  j8 R* z0 o7 H4 d: e% `4 w现在显示的是自然日的差值，要自然日还是交易日？

chaosxu

ycng

加

" u6 Z& w" x! b* Oa1:=ref(h,barslast(hd));
- x, Z, M% O) T0 na2:=ref(L,barslast(Ld));
: Y* E* b# w% u8 za11:=ref(h,barslast(hz));
7 n& p5 ]% G: M+ \" ?. Y8 ea22:=ref(L,barslast(Lz));
8 k8 J. B+ c7 H1 \drawtext(ld,a2*0.95,'P '),color009900;
drawnumber(ld,a2*0.95,(a1-a2),2),colorred,shift2;
drawtext(hd,a1*1.05,'P '),color009900;
4 E% @& T  ?% A+ j. k; h2 Vdrawnumber(hd,a1*1.05,(a1-a2),2),colorwhite,shift2;
drawtext(Lz,a22*0.87,'P '),color009900;
* a; Z; z$ `# c" h0 T7 Bdrawnumber(Lz,a22*0.87,(a11-a22),2),coloryellow,shift2;
drawtext(hz,a11*1.13,'P '),color009900;
$ U; V% F  i3 F, c2 J, ddrawnumber(hz,a11*1.13,(a11-a22),2),coloryellow,shift2;
2 B, p" b; I5 E' o5 @9 R
drawtext(ld,a2*0.92,'T '),color999999;
drawnumber(ld,a2*0.92,barslast(hd),0),colorgreen,shift2;
drawtext(hd,a1*1.08,'T '),color999999;
; H& Q+ N3 y$ }0 Wdrawnumber(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;
* D! ^6 U+ U5 c" r( N
. A0 I, O% _1 H( G8 N[ 本帖最后由 ycng 于 2011-1-10 23:58 编辑 ]

bibihead

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

489km

jwchj

logoslogos

原帖由 bibihead 于 2011-1-10 23:29 发表
6 T* M7 z$ G9 m统计高-低，低-高的差值
----指高-低的值 减去 低-高 的值吗？
5 W* ?- m/ r/ z3 v$ Z- H
2 |# A7 L* q) y% {6 a现在显示的是自然日的差值，要自然日还是交易日？

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

mrgjy1818

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

logoslogos

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

logoslogos

原公式中红色四句改成以下蓝色的四句，K线上下标注的价格就不会太靠近K线了。
; }' ^; U& }, `7 b& p, P( C
DRAWNUMBER(HD,H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),PXUP70,COLORCYAN;
DRAWNUMBER(LD,L,DATEDIFF(REF(DATE,BARSLAST(HD)),DATE),0),PXDN70,COLORCYAN;
1 ^6 l$ J" X0 ^& B! ?( j% j1 kDRAWNUMBER(HD,H*(1+0.002),H,2),COLORWHITE,PXUP30,ALIGN0;
DRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORWHITE,PXDN30,ALIGN0;
0 N. {7 k* y7 q! k+ G) W% J
呵呵，恰恰相反的需要呢。我希望标识的价格差值距离K线近些，现在距离太远了。谢

何时回头是岸

谢

afafaf

原帖由 ycng 于 2011-1-10 23:56 发表
0 y' R+ a) c& q8 c! Z. T加
+ i- {0 z! F+ S9 Q$ {: n: ^
a1:=ref(h,barslast(hd));
) ^% P. S8 h3 y( x+ Ta2:=ref(L,barslast(Ld));
! X5 M3 @5 I: G. @  `a11:=ref(h,barslast(hz));
a22:=ref(L,barslast(Lz));
! b; H3 ^9 p4 @( [2 K6 k4 ^3 `drawtext(ld,a2*0.95,'P '),color009900;
) ^1 y4 n- c. t; udrawnumber(ld,a2*0.95,(a1-a2),2),colorred,shift2 ...

; C9 }2 f) ~( n: g谢谢ycng兄妙手点缀
6 a0 A) K3 s, F" {4 l6 b

散户甲

公式高手不少

axcqy

axcqy

原帖由 于afafaf  2011-1-11 16:06 发表
- K; m' O  |8 A
谢谢ycng兄妙手点缀
99290

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

afafaf

原帖由 axcqy 于 2011-1-11 19:49 发表
% s+ M2 S: O# R& `8 T1 W
请问afafaf 兄要修改那条公式才能有这种排列格式呢?谢谢!

DRAWNUMBER(HD,1.02*H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),COLORCYAN;
& E2 |) q% |: e+ x; QDRAWNUMBER(LD,0.98*L,DATEDIFF(REF(DATE,BARSLAST(HD)),DATE),0),COLORCYAN;
加
a1:=ref(h,barslast(hd));
a2:=ref(L,barslast(Ld));
) ]" W4 C; q( X6 t& N6 ia11:=ref(h,barslast(hz));
a22:=ref(L,barslast(Lz));
" y1 _; ]' R: V8 xdrawtext(ld,a2*0.95,'P '),color009900;
drawnumber(ld,a2*0.95,(a1-a2),2),colorred,shift2;
drawtext(hd,a1*1.05,'P '),color009900;
! _( s- G  V5 Bdrawnumber(hd,a1*1.05,(a1-a2),2),colorwhite,shift2;
( V9 x0 I) ~' K# ?drawtext(Lz,a22*0.87,'P '),color009900;
drawnumber(Lz,a22*0.87,(a11-a22),2),coloryellow,shift2;
drawtext(hz,a11*1.13,'P '),color009900;
5 M% b: ^( y6 @0 L- R9 Jdrawnumber(hz,a11*1.13,(a11-a22),2),coloryellow,shift2;
7 p0 I1 Z) g! k, [3 J  adrawtext(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;
" F6 q4 E0 r: @9 R; z4 f6 n2 Wdrawtext(Lz,a22*0.84,'T '),color999999;
drawnumber(Lz,a22*0.84,barslast(hz),0),colorred,shift2;
# `3 x0 I; G6 i# H7 ^- T2 Tdrawtext(hz,a11*1.17,'T '),color999999;
drawnumber(hz,a11*1.17,barslast(Lz),0),colorred,shift2;

[ 本帖最后由 afafaf 于 2011-1-11 21:13 编辑 ]