}6 Z: k. E+ f/ `3 D
! |! l4 j: h. r7 \9 Z
+ l8 ?8 v/ ~! a2 r, k; l5 ]+ m




| 函数: | LLV(X,N) |
| 别名: | 最低值+ }' d ^- ~5 P/ M* ]5 ` |
| 参数: | X为数组,N为计算周期7 \6 J) @# M5 H: H) o |
| 返回: | 返回数组 |
| 说明: | 求N周期内X最低值,N=0则从第一个有效值开始。 |
| 示例: | LLV(LOW,25)6 o) U5 @4 \: k7 M8 `9 J 表示求25日最低价 |
原帖由 xyzabc 于 2010-8-12 09:01 发表4 O: ^0 R# s: j" Y( h* U8 D
DL18:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01*8*AY1,0,1),COLORGREEN,LINEDOT;
这些都是相同的语句,区别在于斜率不同,顺序的按照8、4、3、2、1、1/2、1/3、1/4、1/8排列,想改倍率的在这里改。
想 ...
原帖由 xyzabc 于 2010-8-12 09:13 发表$ P, D* y5 H2 T0 S/ L# x6 C" s
引入成功,但是图与楼主的不一致,是不是参数不同?普通坐标下是抛物线,对数坐标下触点与楼主的不同。
原帖由 xyzabc 于 2010-8-12 01:28 发表9 K v+ ], g6 h2 s
3 g: v' b9 ^/ z5 Q: I# k
已经按照这个方法改参数成功。现在只差找到准确的参数值了。
原帖由 大话李白 于 2010-8-11 12:14 发表
江恩角度线及原码
|8 i; \1 `: p* F& W0 [
一、原码原理:
根据一日跌一点、一周跌一点、一月跌一点......总之一个周期跌一点(百分之一点哟~)的理论编写而成。这个原理是否正确,我尚不知,听大家都这样说,我就这样编了。
- X/ q7 p7 A3 u: J2 H% E3 K5 Z
...
{成交堆积}
a0:=BARSCOUNT(c);
a3:=SYSPARAM(3);1 u& |) {1 }! P6 O* O
a2:=SYSPARAM(2);, K2 s" y9 D8 }8 u6 o# _: ~
a4:=SYSPARAM(4);
a5:=SYSPARAM(5);
a6:=SYSPARAM(1);/ i, N8 U2 v4 N. M# N# \/ K. o- K
n0:=a3-a2;4 U7 q$ L4 G/ T9 F& K8 h3 Q
nn:=a0-a2;
h1:=(a4-a5)/8;
h2:=h1/4; ~1 `) {& H% s5 b& h
l1:=llv(l,n0);) Z8 I: z C- `- j) E8 ^8 m
ll2:=l1[a3];
y0:=a0>=a2;
vv:=if(y0=1 and a6>=a0,v,0);2 b: F) o: v* Z) B" P+ n) M
c1:=if(BETWEEN(c,a4-0*h1,a4-1*h1),vv,0);; E$ o" u' v0 G
c2:=if(BETWEEN(c,a4-1*h1,a4-2*h1),vv,0);4 v4 g2 ~. O; H+ ~' s9 q8 ~
c3:=if(BETWEEN(c,a4-2*h1,a4-3*h1),vv,0);) X7 C. V! I) D2 Z$ T! W
c4:=if(BETWEEN(c,a4-3*h1,a4-4*h1),vv,0);
c5:=if(BETWEEN(c,a4-4*h1,a4-5*h1),vv,0); s' K. H0 z& r4 t+ N
c6:=if(BETWEEN(c,a4-5*h1,a4-6*h1),vv,0);
c7:=if(BETWEEN(c,a4-6*h1,a4-7*h1),vv,0);2 E6 _7 w( e. ~8 ?/ r5 T
c8:=if(BETWEEN(c,a4-7*h1,a4-8*h1),vv,0);
c9:=if(BETWEEN(c,a4-8*h1,a4-9*h1),vv,0);
c10:=if(BETWEEN(c,a4-9*h1,a4-10*h1),vv,0);
v1:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c1,n0),0),2));
v2:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c2,n0),0),2));- }. i& {, f7 S+ y: [. W8 m
v3:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c3,n0),0),2));
v4:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c4,n0),0),2));; a, z5 X7 n& v5 ^
v5:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c5,n0),0),2));/ D2 S! E( y- k4 w
v6:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c6,n0),0),2));5 a7 k o- o9 J8 X
v7:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c7,n0),0),2));
v8:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c8,n0),0),2));
v9:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c9,n0),0),2));) O( z4 d, X! x4 P
v10:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c10,n0),0),2));: Y0 Z9 Q; D' X( r; _
av0:=max(v1,max(v2,max(v3,max(v4,max(v5,max(v6,max(v7,max(v8,max(v9,v10)))))))));
x1:=v1/av0>=nn/n0 and nn>=0;
x2:=v2/av0>=nn/n0 and nn>=0;
x3:=v3/av0>=nn/n0 and nn>=0;
x4:=v4/av0>=nn/n0 and nn>=0;2 \; i0 i+ q" S" V1 U, y" `' f' ^5 L* t
x5:=v5/av0>=nn/n0 and nn>=0;
x6:=v6/av0>=nn/n0 and nn>=0;$ P; O+ D* X# `* ^, O3 T
x7:=v7/av0>=nn/n0 and nn>=0;
x8:=v8/av0>=nn/n0 and nn>=0;! {5 `3 U" K4 R+ R' {8 x# v% |
FILLRGN(v1/av0>=nn/n0 and nn>=0,a4-0*h1,a4-0.05*h1),Color002288;
FILLRGN(v2/av0>=nn/n0 and nn>=0,a4-1*h1,a4-1.05*h1),Color806000;
FILLRGN(v3/av0>=nn/n0 and nn>=0,a4-2*h1,a4-2.05*h1),Color808300;
FILLRGN(v4/av0>=nn/n0 and nn>=0,a4-3*h1,a4-3.05*h1),Color883D88;& m- O. `* C& n" B' D3 }
FILLRGN(v5/av0>=nn/n0 and nn>=0,a4-4*h1,a4-4.05*h1),Color006868;: v% |8 j& T6 }: F5 w' M
FILLRGN(v6/av0>=nn/n0 and nn>=0,a4-5*h1,a4-5.05*h1),color777700;$ ^' T' |2 f( R/ v" w0 [5 [
FILLRGN(v7/av0>=nn/n0 and nn>=0,a4-6*h1,a4-6.05*h1),color804000;
FILLRGN(v8/av0>=nn/n0 and nn>=0,a4-7*h1,a4-7.05*h1),color003377;
DRAWNUMBER(FILTER(refx(x1<ref(x1,1),6) and v1>0,10),a4,a4-0*h1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x2<ref(x2,1),6) and v2>0,10),(a4-1*h1),a4-1*h1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x3<ref(x3,1),6) and v3>0,10),(a4-2.7*3*h2),a4-2*h1,2),COLOR00FF00;4 M: ^0 R. U* O; a# y- a! ^
DRAWNUMBER(FILTER(refx(x4<ref(x4,1),6) and v4>0,10),(a4-12*h2),a4-3*h1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x5<ref(x5,1),6) and v5>0,10),(a4-16*h2),a4-4*h1,2),COLOR00FF00;8 J. @' U3 U5 q9 d# \! B) u
DRAWNUMBER(FILTER(refx(x6<ref(x6,1),6) and v6>0,10),(a4-20*h2),a4-5*h1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x7<ref(x7,1),6) and v7>0,10),(a4-24*h2),a4-6*h1,2),COLOR00FF00;' @/ x1 V V# J2 N2 `
DRAWNUMBER(FILTER(refx(x8<ref(x8,1) and x8>0,5),10),ll2+1*4*h2,a4-7*h1,2),COLOR00FF00;+ x. O0 T7 T) M" ]2 ^
{下降江恩角度线A}$ {! N! Y8 T4 T2 ?: ]9 q
AY1:=REF(H,BARSLAST(H=HHV(H,0))),PRECISION2;, K+ h/ x1 j" W8 a( R
DL18:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01*8*AY1,0,1),COLORBLUE,LINEDOT;
DL14:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01*4*AY1,0,1),COLORBLUE,LINEDOT;, f) F! u t1 F
DL13:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01*3*AY1,0,1),COLORBLUE,LINEDOT;: G/ s! }/ s# }4 l, [ z
DL12:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01*2*AY1,0,1),COLORBLUE,LINEDOT;
DL11:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01*AY1,0,1),COLORBLUE,LINETHICK1;/ e( _5 H! {3 f: a" h( M
DL21:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01/2*AY1,0,1),COLORBLUE,LINEDOT;5 W' G/ A# S7 ~6 @" K: n) e
DL31:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01/3*AY1,0,1),COLORBLUE,LINEDOT;
DL41:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01/4*AY1,0,1),COLORBLUE,LINEDOT;
DL81:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01/8*AY1,0,1),COLORBLUE,LINEDOT;- k4 ?7 P$ Z$ U. p- q. S
{上升江恩角度线A}
BY1:=LLV(L,BARSLAST(H=HHV(H,0))),PRECISION2;/ |, K/ z0 h9 N7 V: `3 C5 \: K3 H3 q
UL18:LINEVALUE(L=BY1,BY1,REF(L,1)=BY1,BY1+0.01/8*BY1,0,1),COLORYELLOW,LINEDOT;. F$ d% X$ j+ |! r" _
UL14:LINEVALUE(L=BY1,BY1,REF(L,1)=BY1,BY1+0.01/4*BY1,0,1),COLORYELLOW,LINEDOT;/ L5 A. M; I" ?9 e
UL13:LINEVALUE(L=BY1,BY1,REF(L,1)=BY1,BY1+0.01/3*BY1,0,1),COLORYELLOW,LINEDOT;
UL12:LINEVALUE(L=BY1,BY1,REF(L,1)=BY1,BY1+0.01/2*BY1,0,1),COLORYELLOW,LINEDOT;
UL11:LINEVALUE(L=BY1,BY1,REF(L,1)=BY1,BY1+0.01*BY1,0,1),COLORYELLOW,LINETHICK1;
UL21:LINEVALUE(L=BY1,BY1,REF(L,1)=BY1,BY1+0.01*2*BY1,0,1),COLORYELLOW,LINEDOT; x. e$ b: i- z J. Y4 j0 d: b
UL31:LINEVALUE(L=BY1,BY1,REF(L,1)=BY1,BY1+0.01*3*BY1,0,1),COLORYELLOW,LINEDOT;0 D0 b6 J$ P. X% w* S* P4 i; N
UL41:LINEVALUE(L=BY1,BY1,REF(L,1)=BY1,BY1+0.01*4*BY1,0,1),COLORYELLOW,LINEDOT;
UL81:LINEVALUE(L=BY1,BY1,REF(L,1)=BY1,BY1+0.01*8*BY1,0,1),COLORYELLOW,LINEDOT;
{上升江恩角度线B}
BY2:=LLV(L,0),PRECISION2;0 C/ \3 R: v* y7 n
UL118:LINEVALUE(L=BY2,BY2,REF(L,1)=BY2,BY2+0.01*8*BY2,0,1),COLOR006699,LINEDOT;: X& q, E) T7 h' i. y$ u. o" |
UL114:LINEVALUE(L=BY2,BY2,REF(L,1)=BY2,BY2+0.01*4*BY2,0,1),COLOR006699,LINEDOT;
UL113:LINEVALUE(L=BY2,BY2,REF(L,1)=BY2,BY2+0.01*3*BY2,0,1),COLOR006699,LINEDOT;
UL112:LINEVALUE(L=BY2,BY2,REF(L,1)=BY2,BY2+0.01*2*BY2,0,1),COLOR006699,LINEDOT;; K* q9 N. Y1 ?. u2 M
UL111:LINEVALUE(L=BY2,BY2,REF(L,1)=BY2,BY2+0.01*BY2,0,1),COLOR006699,LINETHICK1;
UL121:LINEVALUE(L=BY2,BY2,REF(L,1)=BY2,BY2+0.01/2*BY2,0,1),COLOR006699,LINEDOT;
UL131:LINEVALUE(L=BY2,BY2,REF(L,1)=BY2,BY2+0.01/3*BY2,0,1),COLOR006699,LINEDOT;
UL141:LINEVALUE(L=BY2,BY2,REF(L,1)=BY2,BY2+0.01/4*BY2,0,1),COLOR006699,LINEDOT;, P% b# E' H* P* S+ T. _3 q
UL181:LINEVALUE(L=BY2,BY2,REF(L,1)=BY2,BY2+0.01/8*BY2,0,1),COLOR006699,LINEDOT;

为了大家在短期的波段中能使用到这样的江恩角度线,发一个波段江恩成本角度线公式的原码。
{成交堆积}
a0:=BARSCOUNT(c);# U3 c7 {1 {- G$ p) _8 ]
a3:=SYSPARAM(3);& \2 H* G" x& h% S0 U- P! D! G
a2:=SYSPARAM(2);0 R" d8 d1 j& y: F4 T, P. L" Y
a4:=SYSPARAM(4);
a5:=SYSPARAM(5);
a6:=SYSPARAM(1);% s0 V! h+ i% h% _$ ^2 s2 X
n0:=a3-a2;3 ~4 N' p" s4 L
nn:=a0-a2;
h1:=(a4-a5)/8;
h2:=h1/4;
l1:=llv(l,n0);- `) D) K8 h1 K0 M, [7 j
ll2:=l1[a3];
y0:=a0>=a2;0 z$ |7 z1 Y: b2 Q' L
vv:=if(y0=1 and a6>=a0,v,0);& _( d5 H! J$ o' S8 ~7 c9 y
c1:=if(BETWEEN(c,a4-0*h1,a4-1*h1),vv,0);* i8 S" l* V; i1 A7 j0 E' h# Z
c2:=if(BETWEEN(c,a4-1*h1,a4-2*h1),vv,0);
c3:=if(BETWEEN(c,a4-2*h1,a4-3*h1),vv,0); B8 h/ n5 v( x5 I
c4:=if(BETWEEN(c,a4-3*h1,a4-4*h1),vv,0);/ B6 @, {! A' } i; h* q
c5:=if(BETWEEN(c,a4-4*h1,a4-5*h1),vv,0);
c6:=if(BETWEEN(c,a4-5*h1,a4-6*h1),vv,0);
c7:=if(BETWEEN(c,a4-6*h1,a4-7*h1),vv,0);
c8:=if(BETWEEN(c,a4-7*h1,a4-8*h1),vv,0);
c9:=if(BETWEEN(c,a4-8*h1,a4-9*h1),vv,0);
c10:=if(BETWEEN(c,a4-9*h1,a4-10*h1),vv,0);) X, m3 D3 @# q" A+ ?
v1:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c1,n0),0),2));
v2:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c2,n0),0),2));
v3:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c3,n0),0),2));
v4:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c4,n0),0),2));
v5:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c5,n0),0),2));6 d% x {0 Q6 |4 V3 p
v6:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c6,n0),0),2));
v7:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c7,n0),0),2));1 l" c- @# [& S7 \
v8:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c8,n0),0),2));4 X/ M* X' x& j
v9:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c9,n0),0),2));
v10:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c10,n0),0),2));$ W1 T! B7 i4 @+ g: O5 O
av0:=max(v1,max(v2,max(v3,max(v4,max(v5,max(v6,max(v7,max(v8,max(v9,v10)))))))));( A+ y& R; k8 F
x1:=v1/av0>=nn/n0 and nn>=0;2 ?+ g2 m3 `! k% q9 h" g$ E+ ^
x2:=v2/av0>=nn/n0 and nn>=0;! k9 [% K! Q4 D) n9 T/ H4 w
x3:=v3/av0>=nn/n0 and nn>=0;
x4:=v4/av0>=nn/n0 and nn>=0; _1 U$ x& \+ E$ L# ~ X5 R8 ]5 I
x5:=v5/av0>=nn/n0 and nn>=0;5 ^, I) W& ]" s* W' z5 a2 a! q `
x6:=v6/av0>=nn/n0 and nn>=0;
x7:=v7/av0>=nn/n0 and nn>=0;% n' t- d9 I# B$ H: c
x8:=v8/av0>=nn/n0 and nn>=0;, l1 }/ J: ^2 u; ]$ i; w/ R
FILLRGN(v1/av0>=nn/n0 and nn>=0,a4-0*h1,a4-0.05*h1),Color002288;
FILLRGN(v2/av0>=nn/n0 and nn>=0,a4-1*h1,a4-1.05*h1),Color806000;* }+ ?0 \ z* G. H* j
FILLRGN(v3/av0>=nn/n0 and nn>=0,a4-2*h1,a4-2.05*h1),Color808300;9 T8 \0 R9 s, t9 R. V
FILLRGN(v4/av0>=nn/n0 and nn>=0,a4-3*h1,a4-3.05*h1),Color883D88;8 J8 S7 S# n% G
FILLRGN(v5/av0>=nn/n0 and nn>=0,a4-4*h1,a4-4.05*h1),Color006868;
FILLRGN(v6/av0>=nn/n0 and nn>=0,a4-5*h1,a4-5.05*h1),color777700;
FILLRGN(v7/av0>=nn/n0 and nn>=0,a4-6*h1,a4-6.05*h1),color804000;
FILLRGN(v8/av0>=nn/n0 and nn>=0,a4-7*h1,a4-7.05*h1),color003377;! k2 Z3 U" d9 M$ g1 i# w5 j, t
DRAWNUMBER(FILTER(refx(x1<ref(x1,1),6) and v1>0,10),a4,a4-0*h1,2),COLOR00FF00;( m. T I$ A4 l. m7 E! y
DRAWNUMBER(FILTER(refx(x2<ref(x2,1),6) and v2>0,10),(a4-1*h1),a4-1*h1,2),COLOR00FF00;+ q/ k- v9 _) l& n$ a
DRAWNUMBER(FILTER(refx(x3<ref(x3,1),6) and v3>0,10),(a4-2.7*3*h2),a4-2*h1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x4<ref(x4,1),6) and v4>0,10),(a4-12*h2),a4-3*h1,2),COLOR00FF00;/ d6 Z% V) y/ A: D
DRAWNUMBER(FILTER(refx(x5<ref(x5,1),6) and v5>0,10),(a4-16*h2),a4-4*h1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x6<ref(x6,1),6) and v6>0,10),(a4-20*h2),a4-5*h1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x7<ref(x7,1),6) and v7>0,10),(a4-24*h2),a4-6*h1,2),COLOR00FF00;& f# t6 ^4 t* s- a' K1 Q
DRAWNUMBER(FILTER(refx(x8<ref(x8,1) and x8>0,5),10),ll2+1*4*h2,a4-7*h1,2),COLOR00FF00;
{江恩下降角度线}5 b9 u2 g9 m3 W9 S |) ^5 @
AY1:=REF(H,BARSLAST(DATE=P1));
DOWNLINE18:LINEVALUE(DATE=P1,AY1,DATE=P2,AY1-0.01*8*AY1,0,1),COLORGREEN,LINEDOT;1 ?% y3 s& s' G% ~; e2 V
DOWNLINE14:LINEVALUE(DATE=P1,AY1,DATE=P2,AY1-0.01*4*AY1,0,1),COLORGREEN,LINEDOT;" o; A4 j3 z* @
DOWNLINE13:LINEVALUE(DATE=P1,AY1,DATE=P2,AY1-0.01*3*AY1,0,1),COLORGREEN,LINEDOT;- P6 s8 G( Y8 s/ l- Q K* @( U# \
DOWNLINE12:LINEVALUE(DATE=P1,AY1,DATE=P2,AY1-0.01*2*AY1,0,1),COLORGREEN,LINEDOT;
DOWNLINE11:LINEVALUE(DATE=P1,AY1,DATE=P2,AY1-0.01*AY1,0,1),COLORGREEN,LINETHICK1;2 C8 W5 C q8 ?0 H% z$ `
DOWNLINE21:LINEVALUE(DATE=P1,AY1,DATE=P2,AY1-0.01/2*AY1,0,1),COLORGREEN,LINEDOT;
DOWNLINE31:LINEVALUE(DATE=P1,AY1,DATE=P2,AY1-0.01/3*AY1,0,1),COLORGREEN,LINEDOT;0 s D. u, a2 E9 A+ J# W( s
DOWNLINE41:LINEVALUE(DATE=P1,AY1,DATE=P2,AY1-0.01/4*AY1,0,1),COLORGREEN,LINEDOT;* _8 F7 m1 m5 _# W5 e9 N
DOWNLINE81:LINEVALUE(DATE=P1,AY1,DATE=P2,AY1-0.01/8*AY1,0,1),COLORGREEN,LINEDOT;
{江恩下降角度线}5 K+ y; r; |# f4 q& L- |% I
BY1:=REF(L,BARSLAST(DATE=N1));; z' u+ I9 P- u( F! w G1 T9 F
UPLINE18:LINEVALUE(DATE=N1,BY1,DATE=N2,BY1+0.01/8*BY1,0,1),COLORYELLOW,LINEDOT;8 X* \3 G$ W5 _7 ]% N! }3 G0 L
UPLINE14:LINEVALUE(DATE=N1,BY1,DATE=N2,BY1+0.01/4*BY1,0,1),COLORYELLOW,LINEDOT;
UPLINE13:LINEVALUE(DATE=N1,BY1,DATE=N2,BY1+0.01/3*BY1,0,1),COLORYELLOW,LINEDOT;
UPLINE12:LINEVALUE(DATE=N1,BY1,DATE=N2,BY1+0.01/2*BY1,0,1),COLORYELLOW,LINEDOT;, s' G, _5 u1 _) X, D
UPLINE11:LINEVALUE(DATE=N1,BY1,DATE=N2,BY1+0.01*BY1,0,1),COLORYELLOW,LINETHICK1;' z* D9 O e3 K/ o1 H
UPLINE21:LINEVALUE(DATE=N1,BY1,DATE=N2,BY1+0.01*2*BY1,0,1),COLORYELLOW,LINEDOT;
UPLINE31:LINEVALUE(DATE=N1,BY1,DATE=N2,BY1+0.01*3*BY1,0,1),COLORYELLOW,LINEDOT;' r+ ?0 E* M7 ?6 v
UPLINE41:LINEVALUE(DATE=N1,BY1,DATE=N2,BY1+0.01*4*BY1,0,1),COLORYELLOW,LINEDOT;; ?; z+ Q! E5 @6 r& E- V% D
UPLINE81:LINEVALUE(DATE=N1,BY1,DATE=N2,BY1+0.01*8*BY1,0,1),COLORYELLOW,LINEDOT;
参数设置见下图:
[attach]94981[/attach]
[attach]94982[/attach]
自2009年08月04日以来的上证江恩角度线如下图:6 v, x& |* n* H
[attach]94983[/attach]



FU1:POW(SQRT(LLV(L,BARSLAST(DATE=1100702)+1))+0.25,2),COLORWHITE,LINETHICK3;
这句原码是找到自2010年07月02日以来的最低价处,以该价位开平方后+0.25后求2次方得到的一个数。原理可能与江恩的开方相类似吧!![]()
然后再编一个自2010年07月02日以来涨幅的排序指标,找到阶段内涨幅最大的和最小的股票。以便观察上面题到的江恩原理的这个横线对涨幅的影响。涨幅排序指标原码如下:
ZQ:=BARSLAST(DATE<=1100702);
A:=IF(DATE>=1100702 AND DATE<=1100818,C,0);
LA:=LLV(A,ZQ);! U3 [) k3 O ]+ u8 V
HB:=HHV(A,ZQ);6 Q% O; w- y& E. i e& {
阶段涨幅排序:HHV((HB/LA-1)*100,ZQ);& g& {3 ]. S7 |# w: a8 w
做好这两个指标后对A股进行排序。前20名和后20名图片如下:

, j6 H7 [9 @7 M2 S+ w) b" L) OB:=TROUGHBARS(2,16.18,1)=0;
UL:=SUM(B,0);
LU:=UL[datacount]-UL+1;
DA1:=BARSLAST(LU=1 AND REF(LU,1)>1)+1;
L1:=REF(L,BARSLAST(LU=1 AND REF(LU,1)>1)),PRECISION2;
DA2:=BARSLAST(LU=2 AND REF(LU,1)>2)+1,LINETHICK0;
L2:=REF(L,BARSLAST(LU=2 AND REF(LU,1)>2)),PRECISION2;6 H, f1 @5 f4 T @2 e& A
H1:=HHV(IF(LU=2,H,0),DATEL2),PRECISION2;
DATEH1:=BARSLAST(H=H1)+1;1 o) Q9 q+ T) F4 @
DXL:=LINEVALUE(LU=2 AND REF(LU,1)>2,L,DATEH1=1,H,0,1);. x$ k- E) p/ k
D18:LINEVALUE(DATEH1=1,H,DATEH1=2,REF(H,1)-(REF(H,1)-REF(DXL,2))/8,0,1),COLORGREEN,LINEDOT; \/ F9 N& R2 l: ~, y4 Z" a
D14:LINEVALUE(DATEH1=1,H,DATEH1=2,REF(H,1)-(REF(H,1)-REF(DXL,2))/4,0,1),COLORGREEN,LINEDOT;% H4 }' O& c1 |2 ?9 l9 P' C
D13:LINEVALUE(DATEH1=1,H,DATEH1=2,REF(H,1)-(REF(H,1)-REF(DXL,2))/3,0,1),COLORGREEN,LINEDOT;
D12:LINEVALUE(DATEH1=1,H,DATEH1=2,REF(H,1)-(REF(H,1)-REF(DXL,2))/2,0,1),COLORGREEN,LINEDOT;
D11:LINEVALUE(DATEH1=1,H,DATEH1=2,REF(H,1)-(REF(H,1)-REF(DXL,2)),0,1),COLORGREEN,LINETHICK1;
D21:LINEVALUE(DATEH1=1,H,DATEH1=2,REF(H,1)-(REF(H,1)-REF(DXL,2))*2,0,1),COLORGREEN,LINEDOT;
//D31:LINEVALUE(DATEH1=1,H,DATEH1=2,REF(H,1)-(REF(H,1)-REF(DXL,2))*3,0,1),COLORGREEN,LINEDOT;
//D41:LINEVALUE(DATEH1=1,H,DATEH1=2,REF(H,1)-(REF(H,1)-REF(DXL,2))*4,0,1),COLORGREEN,LINEDOT;
//D81:LINEVALUE(DATEH1=1,H,DATEH1=2,REF(H,1)-(REF(H,1)-REF(DXL,2))*8,0,1),COLORGREEN,LINEDOT;
//临界Z:POW(SQRT(L1)+0.25,2),COLORFF00FF,CIRCLEDOT;- t/ S3 J, ~1 ?$ Y& |
//临界D:POW(SQRT(H1)-0.25,2),LINETHICK0;
//PARTLINE(D11<>0,临界D),COLORBLUE,CIRCLEDOT;3 _1 p8 Z% A5 {4 ]/ v# f0 k
ZXL:=LINEVALUE(DATEH1=1,H,LU=1 AND REF(LU,1)>1,L,0,1);# K. x$ p. W6 q7 O
Z18:LINEVALUE(LU=1 AND REF(LU,1)>1,L,REF(LU,1)=1 AND REF(LU,2)=2,REF(L,1)+(REF(ZXL,2)-REF(L,1))/8,0,1),COLORYELLOW,LINEDOT;6 B3 l9 T/ P* Z7 z4 w5 P/ _% Y9 v
Z14:LINEVALUE(LU=1 AND REF(LU,1)>1,L,REF(LU,1)=1 AND REF(LU,2)=2,REF(L,1)+(REF(ZXL,2)-REF(L,1))/4,0,1),COLORYELLOW,LINEDOT;
Z13:LINEVALUE(LU=1 AND REF(LU,1)>1,L,REF(LU,1)=1 AND REF(LU,2)=2,REF(L,1)+(REF(ZXL,2)-REF(L,1))/3,0,1),COLORYELLOW,LINEDOT;" @" U/ N7 ]9 p# W
Z12:LINEVALUE(LU=1 AND REF(LU,1)>1,L,REF(LU,1)=1 AND REF(LU,2)=2,REF(L,1)+(REF(ZXL,2)-REF(L,1))/2,0,1),COLORYELLOW,LINEDOT;
Z11:LINEVALUE(LU=1 AND REF(LU,1)>1,L,REF(LU,1)=1 AND REF(LU,2)=2,REF(L,1)+(REF(ZXL,2)-REF(L,1)),0,1),COLORYELLOW,LINETHICK1;
Z21:LINEVALUE(LU=1 AND REF(LU,1)>1,L,REF(LU,1)=1 AND REF(LU,2)=2,REF(L,1)+(REF(ZXL,2)-REF(L,1))*2,0,1),COLORYELLOW,LINEDOT;
Z31:LINEVALUE(LU=1 AND REF(LU,1)>1,L,REF(LU,1)=1 AND REF(LU,2)=2,REF(L,1)+(REF(ZXL,2)-REF(L,1))*3,0,1),COLORYELLOW,LINEDOT;% Y3 }1 g; E& n5 g- Q& V% {
Z41:LINEVALUE(LU=1 AND REF(LU,1)>1,L,REF(LU,1)=1 AND REF(LU,2)=2,REF(L,1)+(REF(ZXL,2)-REF(L,1))*4,0,1),COLORYELLOW,LINEDOT;+ R' O) u+ O' q' n6 ?
Z81:LINEVALUE(LU=1 AND REF(LU,1)>1,L,REF(LU,1)=1 AND REF(LU,2)=2,REF(L,1)+(REF(ZXL,2)-REF(L,1))*8,0,1),COLORYELLOW,LINEDOT;
{成本堆积}
a0:=BARSCOUNT(c);7 @) V7 g0 g& \# T& B' K; {
a3:=SYSPARAM(3);- U0 W9 i5 j* b& o: l
a2:=SYSPARAM(2);7 Z' s: Y1 |/ [& q& @
a4:=SYSPARAM(4);5 K( q* I' G! J
a5:=SYSPARAM(5);
a6:=SYSPARAM(1);
n0:=a3-a2;- j: a* h, W- _
nn:=a0-a2;
h1:=(a4-a5)/8;
h2:=h1/4;2 y- x- r t2 c1 S9 V
l1:=llv(l,n0);: P' q+ l! h$ u
ll2:=l1[a3];! k2 H+ m4 F& f0 Q% ^$ u
y0:=a0>=a2;' v S: j* N7 \" S+ `8 u
vv:=if(y0=1 and a6>=a0,v,0);8 [2 x; g+ V4 s4 c" H1 v b
c1:=if(BETWEEN(c,a4-0*h1,a4-1*h1),vv,0);" b0 |7 Z3 Q: [) Y5 n2 S
c2:=if(BETWEEN(c,a4-1*h1,a4-2*h1),vv,0);
c3:=if(BETWEEN(c,a4-2*h1,a4-3*h1),vv,0);7 s# e8 f% ?* p- r' a7 j, x
c4:=if(BETWEEN(c,a4-3*h1,a4-4*h1),vv,0);; {" t" f0 [+ a9 _- x
c5:=if(BETWEEN(c,a4-4*h1,a4-5*h1),vv,0);" @$ _# n8 A) O! S8 ]' {; V5 a; K
c6:=if(BETWEEN(c,a4-5*h1,a4-6*h1),vv,0);
c7:=if(BETWEEN(c,a4-6*h1,a4-7*h1),vv,0);4 C, D: G9 Q n4 ]
c8:=if(BETWEEN(c,a4-7*h1,a4-8*h1),vv,0);
c9:=if(BETWEEN(c,a4-8*h1,a4-9*h1),vv,0);
c10:=if(BETWEEN(c,a4-9*h1,a4-10*h1),vv,0);$ N3 ^0 N$ Y. {$ e3 _
v1:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c1,n0),0),2));
v2:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c2,n0),0),2));# I4 N; E: H8 K* c
v3:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c3,n0),0),2));
v4:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c4,n0),0),2));
v5:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c5,n0),0),2));
v6:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c6,n0),0),2));8 k7 e" V7 r& v. @
v7:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c7,n0),0),2));
v8:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c8,n0),0),2));/ B0 C! c; c- ?; g8 P
v9:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c9,n0),0),2));
v10:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c10,n0),0),2));0 E4 f5 w& K% v& G9 d' M3 t& C
av0:=max(v1,max(v2,max(v3,max(v4,max(v5,max(v6,max(v7,max(v8,max(v9,v10)))))))));0 @6 ^ _. p# s" }; [0 _
x1:=v1/av0>=nn/n0 and nn>=0;8 E) U( u: ?" S! h3 x% [
x2:=v2/av0>=nn/n0 and nn>=0;7 y0 C; ` W; N7 U9 `/ l' X: {2 f
x3:=v3/av0>=nn/n0 and nn>=0;: I0 q( V* v* F! T; v
x4:=v4/av0>=nn/n0 and nn>=0;9 B: p; x9 [* p2 p9 w2 h
x5:=v5/av0>=nn/n0 and nn>=0;* a6 s# ~* w; d, s3 } R; A
x6:=v6/av0>=nn/n0 and nn>=0;
x7:=v7/av0>=nn/n0 and nn>=0;
x8:=v8/av0>=nn/n0 and nn>=0;5 {* B5 @- S7 c; Z- x, Z6 \
FILLRGN(v1/av0>=nn/n0 and nn>=0,a4-0*h1,a4-0.05*h1),Color002288;
FILLRGN(v2/av0>=nn/n0 and nn>=0,a4-1*h1,a4-1.05*h1),Color806000;8 D; @% J0 Z# ]9 e5 O
FILLRGN(v3/av0>=nn/n0 and nn>=0,a4-2*h1,a4-2.05*h1),Color808300;
FILLRGN(v4/av0>=nn/n0 and nn>=0,a4-3*h1,a4-3.05*h1),Color883D88;
FILLRGN(v5/av0>=nn/n0 and nn>=0,a4-4*h1,a4-4.05*h1),Color006868;
FILLRGN(v6/av0>=nn/n0 and nn>=0,a4-5*h1,a4-5.05*h1),color777700;
FILLRGN(v7/av0>=nn/n0 and nn>=0,a4-6*h1,a4-6.05*h1),color804000;) I! f& D$ p2 q+ d: y5 p% s
FILLRGN(v8/av0>=nn/n0 and nn>=0,a4-7*h1,a4-7.05*h1),color003377;) s6 K; Y. w7 ?- I& `; G
DRAWNUMBER(FILTER(refx(x1<ref(x1,1),6) and v1>0,10),a4,a4-0*h1,2),COLOR00FF00;& H! J+ y3 }; v9 m
DRAWNUMBER(FILTER(refx(x2<ref(x2,1),6) and v2>0,10),(a4-1*h1),a4-1*h1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x3<ref(x3,1),6) and v3>0,10),(a4-2.7*3*h2),a4-2*h1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x4<ref(x4,1),6) and v4>0,10),(a4-12*h2),a4-3*h1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x5<ref(x5,1),6) and v5>0,10),(a4-16*h2),a4-4*h1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x6<ref(x6,1),6) and v6>0,10),(a4-20*h2),a4-5*h1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x7<ref(x7,1),6) and v7>0,10),(a4-24*h2),a4-6*h1,2),COLOR00FF00;0 K0 Q2 G* g/ n% [* r P. M
DRAWNUMBER(FILTER(refx(x8<ref(x8,1) and x8>0,5),10),ll2+1*4*h2,a4-7*h1,2),COLOR00FF00;
[attach]95241[/attach]
辛苦了 辛苦了 辛苦了


原帖由 zero-zero 于 2010-8-22 00:34 发表
建议 是不是 可以 【%】作为斜率呢? 1%
$ |8 {" {" i q9 f( \8 Q
毕竟 指数有几百点时,也有几千点,将来可能有几万点呀?是不是?


原帖由 大话李白 于 2010-8-23 13:30 发表2 ~" [, M- A, w8 { n9 ~ a( \
书中提到的波动率=(历史最高价-历史最低价)/交易天数。编写成公式原码如下:HV:HHV(H,0),PRECISION2,LINETHICK0;% U: s1 ]) T7 T, l% X: t
LV:LLV(L,0),PRECISION2,LINETHICK0;1 B3 h- a% K; N. I+ M* M
SUMC:SUM(C>0,0),LINETHICK0;
波动率C:(HV-LV)/SUMC,LI ...

原帖由 大话李白 于 2010-8-23 13:54 发表
同理,可做出你认为较重要的高低点的江恩角度线。原码及效果图如下。HV:HHV(H,0),PRECISION2,LINETHICK0;
LV:LLV(L,0),PRECISION2,LINETHICK0;0 k+ v3 J$ ^& w* V3 j) D* C% M7 M' ^
SUMC:SUM(C>0,0),LINETHICK0;' w5 ]' j7 n- q& M' g
波动率C:(HV-LV)/SUMC,LINETHICK0;D01 ...

原帖由 大话李白 于 2010-8-23 13:58 发表
9 U& G$ H/ g# b+ D
% T# \7 L, g1 V, p2 {4 D
问题来了,到底哪一个是正确的呢?高手们是哪何绘出江恩角度线呢?是根据底点或高点出来后再运行一段时间后绘图。
还是根据波动率从一点引出江恩角度线呢?![]()
原帖由 大话李白 于 2010-8-23 14:13 发表% @. T5 R6 G$ X% A3 C6 o4 [
首先请版主原谅没在一个贴内贴完所有的图,因为无法批量上传附件。
第一根对后市的影响效果图:

原帖由 大话李白 于 2010-8-23 14:17 发表7 } E- U7 U. S& O N2 R* D/ Z
9 f; o T1 u5 s w L
第三根对后市的影响效果图:这根个人感觉毫无用处。![]()
原帖由 大话李白 于 2010-8-23 14:19 发表( t3 Q# G; U8 l0 r: |6 a; s
7 O: D8 ]% ^3 ^& s9 W+ d" G1 J
第四根对后市的影响效果图:

原帖由 cyjawyt 于 2010-8-23 15:13 发表
呵呵,SUMC:SUM(C>0,0)这个貌似不对吧,交易天数个人领悟的是主图显示K线的高点与低点之间的交易天数,即上下两根角度线起点之间的交易日差,不该是所有K线的个数。而楼主的SUMC明显....呵呵,仅个人理解~![]()
原帖由 minsdren 于 2010-8-23 14:35 发表
文件尺寸: 小于 1472.65625 kb - O a% F2 C9 a% p
可用扩展名: gif, jpg, png, rar, txt, php, zip, mid, alg, swf, torrent

这个贴要顶,开放的态度一股清流

辛苦了 辛苦了 辛苦了
心中充满感激^^







| 欢迎光临 【阳光飞狐__与财富同行】 (http://bbs.88158.cn/) | Powered by Discuz! X3.2 |