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

logoslogos

这个是经典的清扬公式，公式统计了高低，底高之间的天数， 请修改公式，我需要统计高-低，低-高的差值，并标注在图上，最好显示在二值之间或高低数值边上，。
1 z# u% d. C' i3 N7 h9 D- V根据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);{高点}
5 ]6 K( u& F* D# t2 AA2:=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线上时可作取舍}
- m! P0 U* N# @  W$ C6 {7 X7 RH1:=(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);
7 M0 M  I' G4 ?+ z: W7 G; BX1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,10000),X1));
% H' S" ~  |! y9 S  AG1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:=I1>REF(I1,1);{过滤后低点}
. z5 F9 I9 e, B7 b% bL2:=LD OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
- e8 R0 t, O, IX2:=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;
7 {9 \0 M# v7 V8 S; PJ1:=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;
- M  a% w+ U2 u{以上语句为新结构波浪}
: d. ?% d  h, V' K6 `5 M( @! n
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));
. f3 M% H; P% m# H1 Q7 ?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);
. @" I# |5 y% H) L' ?1 n( \7 [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;
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));
G4:=F4>REF(F4,1); I4:=BACKSET(G4,2); HZ:=I4>REF(I4,1),LINETHICK0;{长期高点，也可供引用}
9 \/ L. a$ _& Z  @DRAWLINE(HZ,H,LZ,L,0),COLORGREEN,LINETHICK1;
2 M, r; {1 O& ?/ x+ _8 PDRAWLINE(LZ,L,HZ,H,0),COLORGREEN,LINETHICK1;{长期连线}
K1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HZ),BARSLAST(LZ))+1); K2:=K1>REF(K1,1);
1 l+ n9 Q* T9 \: o. P% ?' dDRAWLINE(K2,IF(HZ,H,L),ISLASTBAR,C,0),COLORGREEN,LINETHICK1; {最后的长期连线，连在收盘价上}

{以下是两条趋势线原码}
UU:=BACKSET(ISLASTBAR,BARSLAST(LD)+1);
9 J' t3 \0 U! E% V2 o$ TVV:=UU>REF(UU,1);
WW:=BACKSET(VV,REF(BARSLAST(LD),1)+2);
/ f# a1 K0 V5 @% \( g7 HXX:=WW>REF(WW,1);
DRAWLINE(XX,L,VV,L,1),COLORMAGENTA,LINETHICK1;
UU2:=BACKSET(ISLASTBAR,BARSLAST(HD)+1);
VV2:=UU2>REF(UU2,1);
WW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);
$ [) F. s# \# s) q1 i' nXX2:=WW2>REF(WW2,1);
DRAWLINE(XX2,H,VV2,H,1),COLORMAGENTA,LINETHICK1;

前一低:REF(L,BARSLAST(VV)),COLOR99FF66,POINTDOT,LINETHICK3;
: {# Q5 ?2 T+ \- j$ G# b$ ]前二低:REF(L,BARSLAST(XX)),COLORFF66FF,POINTDOT,LINETHICK3;
( d4 H9 I( r8 ?8 M0 Q& H) I前一高:REF(H,BARSLAST(VV2)),COLOR99FF66,POINTDOT,LINETHICK3;
前二高:REF(H,BARSLAST(XX2)),COLORFF66FF,POINTDOT,LINETHICK3;
" A# `( ~$ e, E4 r! I. i2 |短高:=REF(H,BARSLAST(VV2)),LINETHICK0;
5 @) x$ u7 i. _3 v短低:=REF(L,BARSLAST(VV)),LINETHICK0;
短比: (C-短低)/(短高-短低),LINETHICK0;
6 p; T6 z# g# v: V+ l7 B" D: j3 M, ~
8 M9 Y. m" s- p6 k, h{以下语句是大盘趋势叠加}
常数:=REF(INDEXC,BARSLAST(VV))/REF(C,BARSLAST(VV));
2 D  u/ t1 `% y$ S, K叠1:INDEXC/常数,COLORGRAY,LINETHICK0;
8 \& L1 V4 u; W; E6 iPARTLINE(1,叠1),COLORGRAY;
0 l% X. D6 z. Z' b2 J- Z$ v1 l2 i常数2:=REF(INDEXC,BARSLAST(XX))/REF(C,BARSLAST(XX));
4 ^" u5 @; ~" e: A& X& F叠2:INDEXC/常数2,COLORGRAY,LINETHICK0;
- ~3 @: I4 e* D1 QPARTLINE(1,叠2),COLORGRAY;
' i* O$ w( Q- U* @: S1 F% {- y
) f+ f$ A5 Q& b% bDRAWNUMBER(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;
& ]  K. v: u; X. E7 O+ M8 ~& h
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;
8 J" |! S  G* l( k頂:REF(H,BARSLAST(VV2)),COLORGreen,LINETHICK2;
  |0 I" P4 w" g; \+ ?4 H# {* ~. V
" v( W7 u/ S  P5 h; {6 }8 v! A7 `{下迭三角形：藍色三角形畫完介入}
# [7 m% ?( o7 j% [" k' ^StickLine(VV,頂,底,0,0),Colorff6633,linethick3;{}
" u8 O4 m8 Z6 N2 \& T' p7 l% pDRAWLINE(VV2,H,VV,L,0),Colorff6633,linethick3;{斜}
DRAWLINE(VV2,H,VV,頂,0),Colorff6633,linethick3;{?}
4 q* S/ K/ w# C
{DRAWLINE(c>0,H,VV,L,0),Colorcyan,linethick2;}{斜}
{DRAWLINE(c>1,H,VV,頂,0),Colorcyan,linethick2;}{?}
1 d! H% G$ J8 [8 h{上漲三角形：紅色三角形畫完出局}
StickLine(VV2 ,頂,底,0,0),Colorred,linethick3;{}
! h0 t0 S! p; L9 N' |& J, f7 [DRAWLINE(VV,L,VV2,H,0),Colorred,linethick3;{斜}
4 X2 H, K  N3 ]& rDRAWLINE(VV,L,VV2,底,0),Colorred,linethick3;{?};

ycng

加这8行
; l8 z0 ^2 w# }3 h6 oa1:=ref(h,barslast(hd));
a2:=ref(L,barslast(Ld));
( B. @6 w3 K6 g1 `drawnumber(ld,a2*0.95,(a1-a2),2),colorred;
drawnumber(hd,a1*1.05,(a1-a2),2),colorwhite;
0 v1 s) U2 q8 I2 H( U6 sa11:=ref(h,barslast(hz));
3 [7 t1 t0 F. H: t$ l  o. o# sa22:=ref(L,barslast(Lz));
2 T0 X$ t3 ?% X4 ?. m  \5 Jdrawnumber(Lz,a22*0.87,(a11-a22),2),coloryellow;
3 x4 Q  V, m. M9 |: sdrawnumber(hz,a11*1.13,(a11-a22),2),coloryellow;
1 F7 ]9 U; G# }# K7 Y- D( a
! f6 O2 D8 T' p4 L[ 本帖最后由 ycng 于 2011-1-10 18:03 编辑 ]

axcqy

axcqy

原帖由 logoslogos 于 2011-1-10 17:01 发表
( }: j) s& @7 b; m7 o这个是经典的清扬公式，公式统计了高低，底高之间的天数， 请修改公式，我需要统计高-低，低-高的差值，并标注在图上，最好显示在二值之间或高低数值边上，。
- k, b5 H! n+ O; q) f4 `3 O7 |根据BAYer的理论，他说股票的每个波动规律都是固定，一 ...

# c. D* w2 n2 f0 \$ k' q很不错的指标; 把字改为白色好看一点

mcwhmm

恒益

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

4 O" i4 J& |4 ^  MDRAWNUMBER(HD,H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),PXUP70,COLORCYAN;
/ F  }3 v: H/ B9 B+ h2 kDRAWNUMBER(LD,L,DATEDIFF(REF(DATE,BARSLAST(HD)),DATE),0),PXDN70,COLORCYAN;
0 I3 I1 e6 @5 C% D1 b$ N9 \DRAWNUMBER(HD,H*(1+0.002),H,2),COLORWHITE,PXUP30,ALIGN0;
DRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORWHITE,PXDN30,ALIGN0;
源码中叠加大盘趋势（下面源码中绿色的）画成了灰色，改成黄色比较醒目一些：
  w( m6 i3 K0 Q叠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;


! E5 U( k% x! f- L
8 \$ \4 V2 ^& r/ @% \源码：
A1:=REF(HIGH,3)=HHV(HIGH,2*3+1); B1:=FILTER(A1,3); C1:=BACKSET(B1,3+1); D1:=FILTER(C1,3);{高点}
: m: R; f5 E$ QA2:=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线上时可作取舍}
# I0 A3 R7 |! k0 v8 gH1:=(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);
: t* A* O$ Q/ t# X1 j  uX1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,10000),X1));
+ g/ A  L: A) R2 ?1 PG1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:=I1>REF(I1,1);{过滤后低点}
+ P- O5 R5 [; v: c" KL2:=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);{过滤后高点}
& C' q( j. F2 ~+ O) ]- A% s; ?DRAWLINE(LD,L,HD,H,0),COLORWHITE,LINETHICK1,POINTDOT;
+ G& @. S* c: K2 f0 l4 LDRAWLINE(HD,H,LD,L,0),COLORWHITE,LINETHICK1,POINTDOT;
# _! c( F& I. q/ iJ1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HD),BARSLAST(LD))+1); J2:=J1>REF(J1,1);
% E3 z7 V! i0 K& t/ ?DRAWLINE(J2,IF(HD,H,L),ISLASTBAR,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),COLORWHITE,LINETHICK1,POINTDOT;
{以上语句为新结构波浪}
9 {7 z& Y# F4 H9 |! m9 J1 ^
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);{找出全部长期低点}
DRAWICON(HH,H,10),ALIGN2; DRAWICON(LL,L,12),ALIGN1;
& v( y8 h! C, T- S( }5 AH3:=HH OR ISLASTBAR OR BARSCOUNT(C)=1; {后面进行过滤，方法同前。只是不用考虑高低点出现在同一K线}
2 p' j3 B6 g" |9 V6 U8 r4 m* g# u# vX3:=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;
! U! A+ H( P! s/ O4 b2 ~" x# m/ lX4:=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;{长期高点，也可供引用}
. v0 V' \: ~, PDRAWLINE(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);
) O& P+ o7 N5 W0 z! N% PDRAWLINE(K2,IF(HZ,H,L),ISLASTBAR,C,0),COLORGREEN,LINETHICK1; {最后的长期连线，连在收盘价上}
- q3 G; n8 o& P' G6 M. O9 r
{以下是两条趋势线原码}
UU:=BACKSET(ISLASTBAR,BARSLAST(LD)+1);
VV:=UU>REF(UU,1);
WW:=BACKSET(VV,REF(BARSLAST(LD),1)+2);
. F$ G/ e* C& C; jXX:=WW>REF(WW,1);
+ P+ A& O% u+ c9 X( [DRAWLINE(XX,L,VV,L,1),COLORMAGENTA,LINETHICK1;
UU2:=BACKSET(ISLASTBAR,BARSLAST(HD)+1);
" d& M3 {. m8 O! C9 K: a& X4 mVV2:=UU2>REF(UU2,1);
WW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);
5 Z2 X: Q: G& B5 G& \XX2:=WW2>REF(WW2,1);
DRAWLINE(XX2,H,VV2,H,1),COLORMAGENTA,LINETHICK1;
" k% Q# h# \+ f3 ?. x
: j  @: V7 C- l2 m  @, g8 G( c- H前一低:REF(L,BARSLAST(VV)),COLOR99FF66,POINTDOT,LINETHICK3;
前二低:REF(L,BARSLAST(XX)),COLORFF66FF,POINTDOT,LINETHICK3;
) t+ v: l/ ]( u前一高:REF(H,BARSLAST(VV2)),COLOR99FF66,POINTDOT,LINETHICK3;
) Y  w5 g1 J" b; m: A( |6 T前二高:REF(H,BARSLAST(XX2)),COLORFF66FF,POINTDOT,LINETHICK3;
( U( }/ Z$ {1 j" ~短高:=REF(H,BARSLAST(VV2)),LINETHICK0;
: c! x/ P+ ]) d3 T  Q短低:=REF(L,BARSLAST(VV)),LINETHICK0;
短比: (C-短低)/(短高-短低),LINETHICK0;
8 I. V( M6 k' Z3 [5 s
9 b) |7 |4 z, Q" }{以下语句是大盘趋势叠加}
常数:=REF(INDEXC,BARSLAST(VV))/REF(C,BARSLAST(VV));
叠1:INDEXC/常数,COLORGRAY,LINETHICK0;
PARTLINE(1,叠1),COLORGRAY;
常数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;
  r2 h; b, Z$ i4 r9 KDRAWNUMBER(LD,0.98*L,DATEDIFF(REF(DATE,BARSLAST(HD)),DATE),0),COLORCYAN;
% j7 Z# g* u" c0 Y) H) a
DRAWNUMBER(HD,H*(1+0.002),H,2),COLORBLUE,ALIGN0;
DRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORBLUE,ALIGN0;

{以下语句为三角形部分}
5 S9 q+ |8 n- Y% y" ^
! t: `4 {9 g5 e  R% K" N, l) N. B底:REF(L,BARSLAST(VV)),COLORred,LINETHICK2;
: x5 m! g, z# X/ L' F5 Q, t頂:REF(H,BARSLAST(VV2)),COLORGreen,LINETHICK2;

{下迭三角形：藍色三角形畫完介入}
1 P8 i& j/ O& G- k6 yStickLine(VV,頂,底,0,0),Colorff6633,linethick3;{}
, @7 B6 X3 ~/ {1 HDRAWLINE(VV2,H,VV,L,0),Colorff6633,linethick3;{斜}
8 j" _& @' s* D, R) U( ODRAWLINE(VV2,H,VV,頂,0),Colorff6633,linethick3;{?}
* p& w4 L' X) x
{DRAWLINE(c>0,H,VV,L,0),Colorcyan,linethick2;}{斜}
{DRAWLINE(c>1,H,VV,頂,0),Colorcyan,linethick2;}{?}
{上漲三角形：紅色三角形畫完出局}
* K! M. Q0 o$ WStickLine(VV2 ,頂,底,0,0),Colorred,linethick3;{}
$ R' M# |- m2 i, K6 h3 fDRAWLINE(VV,L,VV2,H,0),Colorred,linethick3;{斜}
1 x( H: `1 N  ~DRAWLINE(VV,L,VV2,底,0),Colorred,linethick3;{?};

+ f! ^4 _/ Z3 q8 g[ 本帖最后由 恒益 于 2011-1-10 20:31 编辑 ]

恒益

BACKSET算不算未来函数？

tupiter

好公式

悠然踏浪

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

hippe

好东东！！

woaigutou

辛苦了

天蓝蓝

' m0 k( U1 l. x4 m: x& l5 m
3 @& H5 z+ g0 K% e) c$ `, ~2 I9 t你们改好了，我再装！

adinos

bibihead

统计高-低，低-高的差值
$ `1 Y/ z7 Q% B& C. y----指高-低的值 减去 低-高 的值吗？

2 \# m8 M+ Y2 E9 _' O! E5 E+ a现在显示的是自然日的差值，要自然日还是交易日？

chaosxu

ycng

加

a1:=ref(h,barslast(hd));
a2:=ref(L,barslast(Ld));
a11:=ref(h,barslast(hz));
a22:=ref(L,barslast(Lz));
drawtext(ld,a2*0.95,'P '),color009900;
' q$ R: J) G$ ]  @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;
# c- X, `) `, X* g( [' ddrawnumber(Lz,a22*0.87,(a11-a22),2),coloryellow,shift2;
- R9 U' s, Z- s# W. zdrawtext(hz,a11*1.13,'P '),color009900;
drawnumber(hz,a11*1.13,(a11-a22),2),coloryellow,shift2;
* H+ n1 i5 M; e' ~* u$ j: O& v
drawtext(ld,a2*0.92,'T '),color999999;
: v% J; {* e" A- h% s) e9 ^drawnumber(ld,a2*0.92,barslast(hd),0),colorgreen,shift2;
( p/ s3 p- ~1 Y5 W- k- v8 ^drawtext(hd,a1*1.08,'T '),color999999;
$ E  S( V9 Y) L+ e( Tdrawnumber(hd,a1*1.08,barslast(Ld),0),colorgreen,shift2;
* |4 R) G! [' e; Q3 r& Rdrawtext(Lz,a22*0.84,'T '),color999999;
drawnumber(Lz,a22*0.84,barslast(hz),0),colorred,shift2;
+ Y& ?+ F+ N9 f! Hdrawtext(hz,a11*1.17,'T '),color999999;
2 x# C; n  C- vdrawnumber(hz,a11*1.17,barslast(Lz),0),colorred,shift2;

% [8 O, W( X7 ]' A, \0 Z7 {[ 本帖最后由 ycng 于 2011-1-10 23:58 编辑 ]

bibihead

后面加上这些代码就O了。
! f0 ?' g% J  M! J7 \网站不给贴，搞个附件上来打开看就可以了。

489km

jwchj

logoslogos

原帖由 bibihead 于 2011-1-10 23:29 发表
统计高-低，低-高的差值
----指高-低的值 减去 低-高 的值吗？

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

* @' e9 D7 f! h不是统计时间的差值，是统计高-低价格的差值，目的是统计观察价格（空间的）波动距离，
+ r8 {( p. J6 r' u8 n9 g' O8 P我是要用这个公式去方便验证BAYER的一个股价波动距离的理论。呵呵，多谢！！！

mrgjy1818

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

logoslogos

我一楼没说清楚
% p$ V; h5 c7 g我需要统计高-低，低-高的价格差值，谢谢

logoslogos

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

DRAWNUMBER(HD,H,DATEDIFF(REF(DATE,BARSLAST(LD)),DATE),0),PXUP70,COLORCYAN;
( L* F8 _$ @' G6 F  W  T  hDRAWNUMBER(LD,L,DATEDIFF(REF(DATE,BARSLAST(HD)),DATE),0),PXDN70,COLORCYAN;
9 G, z2 i4 P+ i9 ~2 J) ZDRAWNUMBER(HD,H*(1+0.002),H,2),COLORWHITE,PXUP30,ALIGN0;
DRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORWHITE,PXDN30,ALIGN0;

呵呵，恰恰相反的需要呢。我希望标识的价格差值距离K线近些，现在距离太远了。谢

何时回头是岸

谢

afafaf

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

a1:=ref(h,barslast(hd));
a2:=ref(L,barslast(Ld));
  C4 {" w" P% w2 D2 @( k0 sa11:=ref(h,barslast(hz));
a22:=ref(L,barslast(Lz));
) B5 g1 r, M. R. b! ?6 zdrawtext(ld,a2*0.95,'P '),color009900;
drawnumber(ld,a2*0.95,(a1-a2),2),colorred,shift2 ...

谢谢ycng兄妙手点缀

散户甲

公式高手不少

axcqy

axcqy

原帖由 于afafaf  2011-1-11 16:06 发表
5 k) F3 v. i' o7 Z0 R; o+ X
谢谢ycng兄妙手点缀
99290

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

afafaf

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

; W- \4 k9 b# m& i4 j7 e请问afafaf 兄要修改那条公式才能有这种排列格式呢?谢谢!

. D$ k4 D3 z& T; m% W7 E7 H' ~5 Q) N
, e8 I: \) A1 c% f
, S9 F/ h3 K: R& bDRAWNUMBER(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));
0 b5 v+ c4 H% V+ M( Ma11:=ref(h,barslast(hz));
0 M1 O' o  Y% _/ h2 Q# p6 Ea22:=ref(L,barslast(Lz));
, ]+ A) Q3 ^" \; z! Tdrawtext(ld,a2*0.95,'P '),color009900;
! d7 |+ u! r, P% L, z' n0 bdrawnumber(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;
. f0 k% m' g: U; B/ }drawtext(Lz,a22*0.87,'P '),color009900;
- Y: S" b: B+ l5 D/ x* d" Fdrawnumber(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;
' c' D0 e' [3 U: `" h" _( y+ Ndrawnumber(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;
drawtext(Lz,a22*0.84,'T '),color999999;
* Y+ G9 w& `6 R, `* n0 x" l3 c4 Ldrawnumber(Lz,a22*0.84,barslast(hz),0),colorred,shift2;
/ h1 t# y/ f7 Y4 S+ }drawtext(hz,a11*1.17,'T '),color999999;
drawnumber(hz,a11*1.17,barslast(Lz),0),colorred,shift2;
4 h, y, g' i; @) s9 r' d& `. [
: j  v8 U: b+ Y' v[ 本帖最后由 afafaf 于 2011-1-11 21:13 编辑 ]