+ {6 i& I/ F( C# E: T+ C
" r7 ^0 V* n; h/ o9 B




| 函数: | LLV(X,N) |
| 别名: | 最低值3 c6 R- a- k1 g. {' I6 }# x; Y; ] |
| 参数: | X为数组,N为计算周期% U5 h8 g4 A5 E' `6 d7 y- ~ |
| 返回: | 返回数组 |
| 说明: | 求N周期内X最低值,N=0则从第一个有效值开始。 |
| 示例: | LLV(LOW,25) 表示求25日最低价 |
原帖由 xyzabc 于 2010-8-12 09:01 发表2 P8 E/ x, O8 u7 k
DL18:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01*8*AY1,0,1),COLORGREEN,LINEDOT;& E' |% t% K: t3 ] k# l6 P+ R1 n
这些都是相同的语句,区别在于斜率不同,顺序的按照8、4、3、2、1、1/2、1/3、1/4、1/8排列,想改倍率的在这里改。5 }8 y0 Y. Q; g9 L7 A
想 ...
原帖由 大话李白 于 2010-8-11 12:14 发表& R5 G1 f* w `0 Q
江恩角度线及原码
一、原码原理:) I- a4 O. e: j- z# {
根据一日跌一点、一周跌一点、一月跌一点......总之一个周期跌一点(百分之一点哟~)的理论编写而成。这个原理是否正确,我尚不知,听大家都这样说,我就这样编了。9 ~1 N& n0 f$ \6 X" n( e9 |
9 y" v- u5 @5 n: D6 O2 C1 {4 j- s
...
{成交堆积}. `8 F+ H& [ n4 M8 M
a0:=BARSCOUNT(c);, @5 b; @& L! ^# O0 [
a3:=SYSPARAM(3);
a2:=SYSPARAM(2);
a4:=SYSPARAM(4);
a5:=SYSPARAM(5);2 A+ Y$ R* n, g; P6 X$ _' G
a6:=SYSPARAM(1);
n0:=a3-a2;
nn:=a0-a2;
h1:=(a4-a5)/8;
h2:=h1/4;2 [5 g: D) ~0 f( r
l1:=llv(l,n0);
ll2:=l1[a3];
y0:=a0>=a2;
vv:=if(y0=1 and a6>=a0,v,0);
c1:=if(BETWEEN(c,a4-0*h1,a4-1*h1),vv,0);; z" |# J5 K* a4 H; d5 O: t7 C; _
c2:=if(BETWEEN(c,a4-1*h1,a4-2*h1),vv,0);
c3:=if(BETWEEN(c,a4-2*h1,a4-3*h1),vv,0);& u% b) T$ G+ A( A9 f) _5 L
c4:=if(BETWEEN(c,a4-3*h1,a4-4*h1),vv,0);
c5:=if(BETWEEN(c,a4-4*h1,a4-5*h1),vv,0);7 t3 O. z+ n+ ~; g3 s9 ]" ?
c6:=if(BETWEEN(c,a4-5*h1,a4-6*h1),vv,0);, G* m' u9 q0 x" M" N: Q3 W. I
c7:=if(BETWEEN(c,a4-6*h1,a4-7*h1),vv,0);
c8:=if(BETWEEN(c,a4-7*h1,a4-8*h1),vv,0);) n6 k: X8 D4 L! N" c1 t; t2 }7 p. }8 Y
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));2 m8 y; q, y+ G: X& S0 e
v2:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c2,n0),0),2));/ J( b8 ?! Y, e% \9 `2 k: \. X
v3:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c3,n0),0),2));
v4:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c4,n0),0),2));/ d! d9 ^' d5 S w6 ~, ~7 D
v5:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c5,n0),0),2));' A9 `6 x$ Z( M* `
v6:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c6,n0),0),2));
v7:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c7,n0),0),2));% P' D) F, y l% S* ?# S" o
v8:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c8,n0),0),2));; J, B- C4 m! p) f$ `7 L W' g
v9:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c9,n0),0),2));
v10:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c10,n0),0),2));" s' O6 L+ |% G
av0:=max(v1,max(v2,max(v3,max(v4,max(v5,max(v6,max(v7,max(v8,max(v9,v10)))))))));, f- j1 G) i$ O3 |. }( J
x1:=v1/av0>=nn/n0 and nn>=0;3 H6 @3 S7 ^: s' ^/ w* x( Z
x2:=v2/av0>=nn/n0 and nn>=0;
x3:=v3/av0>=nn/n0 and nn>=0;
x4:=v4/av0>=nn/n0 and nn>=0;
x5:=v5/av0>=nn/n0 and nn>=0;
x6:=v6/av0>=nn/n0 and nn>=0;
x7:=v7/av0>=nn/n0 and nn>=0;
x8:=v8/av0>=nn/n0 and nn>=0;
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;3 G- S+ [; h) S4 y- S4 K7 W( H
FILLRGN(v4/av0>=nn/n0 and nn>=0,a4-3*h1,a4-3.05*h1),Color883D88;. \& @* a v# T
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;3 S+ i3 I* V2 |. L! B+ q
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;# t% Y2 s0 |' ~% Z: w( N
DRAWNUMBER(FILTER(refx(x1<ref(x1,1),6) and v1>0,10),a4,a4-0*h1,2),COLOR00FF00;. ]. ?1 X( X- ^) p! ^) i
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;/ i& ~% j% a, @: d% h
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;. |$ y7 J) K. I' b) }" O
DRAWNUMBER(FILTER(refx(x8<ref(x8,1) and x8>0,5),10),ll2+1*4*h2,a4-7*h1,2),COLOR00FF00;
{下降江恩角度线A}
AY1:=REF(H,BARSLAST(H=HHV(H,0))),PRECISION2;
DL18:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01*8*AY1,0,1),COLORBLUE,LINEDOT;( ~! Y$ V" c3 f& }+ U
DL14:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01*4*AY1,0,1),COLORBLUE,LINEDOT;+ ]; Y9 S* Q( n& n! J% X5 v
DL13:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01*3*AY1,0,1),COLORBLUE,LINEDOT;
DL12:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01*2*AY1,0,1),COLORBLUE,LINEDOT; h- ]) Z* u# n9 O% Y/ V
DL11:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01*AY1,0,1),COLORBLUE,LINETHICK1;" r7 l! M! p6 C" |, p$ Y1 v
DL21:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01/2*AY1,0,1),COLORBLUE,LINEDOT;
DL31:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01/3*AY1,0,1),COLORBLUE,LINEDOT;9 X! `( q, C& V3 ]
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;- x# R2 {+ V9 a2 E. u" X
{上升江恩角度线A} e8 Q7 d) u% k$ \- C
BY1:=LLV(L,BARSLAST(H=HHV(H,0))),PRECISION2;: R& ]$ b" k4 {6 E7 }
UL18:LINEVALUE(L=BY1,BY1,REF(L,1)=BY1,BY1+0.01/8*BY1,0,1),COLORYELLOW,LINEDOT;
UL14:LINEVALUE(L=BY1,BY1,REF(L,1)=BY1,BY1+0.01/4*BY1,0,1),COLORYELLOW,LINEDOT;8 @: U8 |% t x' t3 W7 [
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;9 C# a4 A9 z5 S: i$ \0 e# c: q
UL21:LINEVALUE(L=BY1,BY1,REF(L,1)=BY1,BY1+0.01*2*BY1,0,1),COLORYELLOW,LINEDOT;
UL31:LINEVALUE(L=BY1,BY1,REF(L,1)=BY1,BY1+0.01*3*BY1,0,1),COLORYELLOW,LINEDOT;2 i0 @# _7 C2 N* Q6 L
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;
UL118:LINEVALUE(L=BY2,BY2,REF(L,1)=BY2,BY2+0.01*8*BY2,0,1),COLOR006699,LINEDOT;
UL114:LINEVALUE(L=BY2,BY2,REF(L,1)=BY2,BY2+0.01*4*BY2,0,1),COLOR006699,LINEDOT;" a/ h/ F: Q: G6 y* A
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;
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; l1 e: ]7 r+ ?2 Z
UL131:LINEVALUE(L=BY2,BY2,REF(L,1)=BY2,BY2+0.01/3*BY2,0,1),COLOR006699,LINEDOT;, Y, Y) _* K9 I
UL141:LINEVALUE(L=BY2,BY2,REF(L,1)=BY2,BY2+0.01/4*BY2,0,1),COLOR006699,LINEDOT;" q4 i# _& ?* S9 V% ` c
UL181:LINEVALUE(L=BY2,BY2,REF(L,1)=BY2,BY2+0.01/8*BY2,0,1),COLOR006699,LINEDOT;

为了大家在短期的波段中能使用到这样的江恩角度线,发一个波段江恩成本角度线公式的原码。
{成交堆积}: [* p* `1 s! ^ A4 d# ?
a0:=BARSCOUNT(c);
a3:=SYSPARAM(3);& j! V$ W( v5 E: O, D: T8 `5 c
a2:=SYSPARAM(2);
a4:=SYSPARAM(4);6 h' h) d- ?/ H5 t" M
a5:=SYSPARAM(5);
a6:=SYSPARAM(1);
n0:=a3-a2;6 K8 D/ v7 S2 L4 @! q
nn:=a0-a2;
h1:=(a4-a5)/8;+ s3 F5 k( N- H% Z% F6 |9 j3 b# V5 R
h2:=h1/4;
l1:=llv(l,n0);
ll2:=l1[a3]; }+ ?/ t4 |8 e8 z4 g% e
y0:=a0>=a2;
vv:=if(y0=1 and a6>=a0,v,0);
c1:=if(BETWEEN(c,a4-0*h1,a4-1*h1),vv,0);7 h0 b L/ W) W
c2:=if(BETWEEN(c,a4-1*h1,a4-2*h1),vv,0);# z& |! R& [3 \( j8 C3 B
c3:=if(BETWEEN(c,a4-2*h1,a4-3*h1),vv,0);) w. k% u* x! s4 G
c4:=if(BETWEEN(c,a4-3*h1,a4-4*h1),vv,0);2 m. U* w* k2 r7 ^4 @
c5:=if(BETWEEN(c,a4-4*h1,a4-5*h1),vv,0);# z Q: `" f" [1 T+ R
c6:=if(BETWEEN(c,a4-5*h1,a4-6*h1),vv,0);
c7:=if(BETWEEN(c,a4-6*h1,a4-7*h1),vv,0);- o- H7 O* b8 p2 N: s
c8:=if(BETWEEN(c,a4-7*h1,a4-8*h1),vv,0);( r9 H& v' I/ G! M9 P1 m2 B
c9:=if(BETWEEN(c,a4-8*h1,a4-9*h1),vv,0);% q8 t* q0 w/ n/ f
c10:=if(BETWEEN(c,a4-9*h1,a4-10*h1),vv,0);, J0 G" y! T8 z
v1:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c1,n0),0),2));
v2:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c2,n0),0),2));# k) E& G# T& f3 L
v3:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c3,n0),0),2));% S4 a( X! [4 U
v4:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c4,n0),0),2));- b5 s2 p3 ^ C1 k& z! `( {
v5:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c5,n0),0),2));9 s- {3 s; n; g9 B( U
v6:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c6,n0),0),2));. ^- f7 a8 I) J% P' V) U8 ~& k" i
v7:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c7,n0),0),2));
v8:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c8,n0),0),2));8 k) d7 f5 M4 r& |
v9:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c9,n0),0),2));/ |/ ?3 L8 C# I
v10:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c10,n0),0),2));6 O! a" o; m3 Q9 O% z
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;! n4 z% Y. h6 u- f" }2 T
x2:=v2/av0>=nn/n0 and nn>=0;
x3:=v3/av0>=nn/n0 and nn>=0;1 P3 A$ d, i2 @" l# E1 ]& ?9 k
x4:=v4/av0>=nn/n0 and nn>=0;
x5:=v5/av0>=nn/n0 and nn>=0;( L7 c" p! W2 @/ ^. j' i5 k+ o
x6:=v6/av0>=nn/n0 and nn>=0;4 T X' B$ k2 T8 ?1 ?
x7:=v7/av0>=nn/n0 and nn>=0;, B6 A& A0 [1 z4 r" r$ w- Z
x8:=v8/av0>=nn/n0 and nn>=0;$ i" P I) l8 u7 U, i
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;! Q$ u. q* A+ D+ ?
FILLRGN(v4/av0>=nn/n0 and nn>=0,a4-3*h1,a4-3.05*h1),Color883D88;1 C* E9 M# c8 A2 N3 n: N8 s
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;- O, u# Y) S0 L% J# j8 D' q; _
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;# @4 s/ Y( x5 R4 ~) x
DRAWNUMBER(FILTER(refx(x1<ref(x1,1),6) and v1>0,10),a4,a4-0*h1,2),COLOR00FF00;3 G: y- |. N! B9 k( P$ `
DRAWNUMBER(FILTER(refx(x2<ref(x2,1),6) and v2>0,10),(a4-1*h1),a4-1*h1,2),COLOR00FF00;" y2 m+ o, r" F6 J5 f3 Z
DRAWNUMBER(FILTER(refx(x3<ref(x3,1),6) and v3>0,10),(a4-2.7*3*h2),a4-2*h1,2),COLOR00FF00;4 e- G7 J T# E+ R4 `" K' F
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;) m7 g7 J9 K$ }7 U* Y( t
DRAWNUMBER(FILTER(refx(x7<ref(x7,1),6) and v7>0,10),(a4-24*h2),a4-6*h1,2),COLOR00FF00;$ b7 f$ M; C! Q3 Z1 A; w
DRAWNUMBER(FILTER(refx(x8<ref(x8,1) and x8>0,5),10),ll2+1*4*h2,a4-7*h1,2),COLOR00FF00;
{江恩下降角度线}
AY1:=REF(H,BARSLAST(DATE=P1));) a5 A' R! G8 b9 a8 B/ Y- n, b
DOWNLINE18:LINEVALUE(DATE=P1,AY1,DATE=P2,AY1-0.01*8*AY1,0,1),COLORGREEN,LINEDOT;5 k. Q2 }0 g4 ~# M c. t9 l, A
DOWNLINE14:LINEVALUE(DATE=P1,AY1,DATE=P2,AY1-0.01*4*AY1,0,1),COLORGREEN,LINEDOT;
DOWNLINE13:LINEVALUE(DATE=P1,AY1,DATE=P2,AY1-0.01*3*AY1,0,1),COLORGREEN,LINEDOT;& O: A# ]& ?4 y! t+ d! V8 T' ?
DOWNLINE12:LINEVALUE(DATE=P1,AY1,DATE=P2,AY1-0.01*2*AY1,0,1),COLORGREEN,LINEDOT;$ W+ P$ Y: }! `" i$ _0 \" t1 N
DOWNLINE11:LINEVALUE(DATE=P1,AY1,DATE=P2,AY1-0.01*AY1,0,1),COLORGREEN,LINETHICK1;4 `, u+ \9 q, z3 k k7 k0 R u
DOWNLINE21:LINEVALUE(DATE=P1,AY1,DATE=P2,AY1-0.01/2*AY1,0,1),COLORGREEN,LINEDOT;2 I; P3 ~1 a5 }+ X# E
DOWNLINE31:LINEVALUE(DATE=P1,AY1,DATE=P2,AY1-0.01/3*AY1,0,1),COLORGREEN,LINEDOT;0 D) S) j! y" N& S3 N
DOWNLINE41:LINEVALUE(DATE=P1,AY1,DATE=P2,AY1-0.01/4*AY1,0,1),COLORGREEN,LINEDOT;
DOWNLINE81:LINEVALUE(DATE=P1,AY1,DATE=P2,AY1-0.01/8*AY1,0,1),COLORGREEN,LINEDOT;
{江恩下降角度线}) D% @$ ?, j$ Q0 |% h: ~
BY1:=REF(L,BARSLAST(DATE=N1));
UPLINE18:LINEVALUE(DATE=N1,BY1,DATE=N2,BY1+0.01/8*BY1,0,1),COLORYELLOW,LINEDOT;
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;0 k- q# O2 K$ ^/ G( {& h
UPLINE12:LINEVALUE(DATE=N1,BY1,DATE=N2,BY1+0.01/2*BY1,0,1),COLORYELLOW,LINEDOT;3 ~. |, S# y" r, A: w
UPLINE11:LINEVALUE(DATE=N1,BY1,DATE=N2,BY1+0.01*BY1,0,1),COLORYELLOW,LINETHICK1;4 T1 @$ `% F) S8 `" l8 S, v$ J
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;
UPLINE41:LINEVALUE(DATE=N1,BY1,DATE=N2,BY1+0.01*4*BY1,0,1),COLORYELLOW,LINEDOT;
UPLINE81:LINEVALUE(DATE=N1,BY1,DATE=N2,BY1+0.01*8*BY1,0,1),COLORYELLOW,LINEDOT;
参数设置见下图:! c2 ^% z: n$ s% n
[attach]94981[/attach], W( Q. f/ {2 m* O# e- e
[attach]94982[/attach]
自2009年08月04日以来的上证江恩角度线如下图:7 }2 M" w2 I# t/ \& F
[attach]94983[/attach]

原帖由 大话李白 于 2010-8-13 00:56 发表, M! s( m& y+ _5 v M R
950094 a% Z$ D& G9 Y) z
, @0 J) F; L2 i
跌破6124.04点以来的DL81线,将向下寻求支撑。


FU1:POW(SQRT(LLV(L,BARSLAST(DATE=1100702)+1))+0.25,2),COLORWHITE,LINETHICK3;
这句原码是找到自2010年07月02日以来的最低价处,以该价位开平方后+0.25后求2次方得到的一个数。原理可能与江恩的开方相类似吧!![]()
然后再编一个自2010年07月02日以来涨幅的排序指标,找到阶段内涨幅最大的和最小的股票。以便观察上面题到的江恩原理的这个横线对涨幅的影响。涨幅排序指标原码如下: V2 N! M* {/ j+ A+ |$ @3 e; C- C
ZQ:=BARSLAST(DATE<=1100702);3 A! }! i, ? U+ r, f3 Y
A:=IF(DATE>=1100702 AND DATE<=1100818,C,0);* |& B8 H2 I1 `4 Q7 Q
LA:=LLV(A,ZQ);% R9 G8 {8 e; b) ]
HB:=HHV(A,ZQ);: L6 z4 q6 R; q. n
阶段涨幅排序:HHV((HB/LA-1)*100,ZQ);0 X. c4 x9 b" H: o6 @0 Q/ ^& j$ D
- e. d: ?, y8 J, l; r* ^ D- o
做好这两个指标后对A股进行排序。前20名和后20名图片如下:

B:=TROUGHBARS(2,16.18,1)=0;# i" F. q6 T/ C. C7 ?5 `8 v
UL:=SUM(B,0);
LU:=UL[datacount]-UL+1;
DA1:=BARSLAST(LU=1 AND REF(LU,1)>1)+1;2 Z2 d% z- z5 n( U# Q* a
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;
H1:=HHV(IF(LU=2,H,0),DATEL2),PRECISION2;7 }- g8 J; |+ e- |
DATEH1:=BARSLAST(H=H1)+1;$ @; ^# r4 l; o6 U
DXL:=LINEVALUE(LU=2 AND REF(LU,1)>2,L,DATEH1=1,H,0,1);
D18:LINEVALUE(DATEH1=1,H,DATEH1=2,REF(H,1)-(REF(H,1)-REF(DXL,2))/8,0,1),COLORGREEN,LINEDOT;' U q4 }' f( o) ^ h
D14:LINEVALUE(DATEH1=1,H,DATEH1=2,REF(H,1)-(REF(H,1)-REF(DXL,2))/4,0,1),COLORGREEN,LINEDOT;' V7 }5 s' j6 i6 T+ K9 S% m6 ~
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;0 H, c, g6 `2 Q2 G9 e
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;8 o1 n6 M: y% p# y
//临界Z:POW(SQRT(L1)+0.25,2),COLORFF00FF,CIRCLEDOT;
//临界D:POW(SQRT(H1)-0.25,2),LINETHICK0;; G) [0 s0 s. S) @0 ]: v
//PARTLINE(D11<>0,临界D),COLORBLUE,CIRCLEDOT;
ZXL:=LINEVALUE(DATEH1=1,H,LU=1 AND REF(LU,1)>1,L,0,1);
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;) T+ h2 I/ \8 l: L0 N
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;) t% I! u4 u1 \' O) m8 |
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;8 Q+ i" }) @2 ?# p: C3 U$ l
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;2 N- ~* R% @! P' r4 S$ g" @- G
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;
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;; o: @2 c" u2 b2 t/ D8 R# e1 O @
{成本堆积}/ f z# ]8 R- C& `6 s. _
a0:=BARSCOUNT(c);4 Q: Y$ x. T/ d: e! G( }
a3:=SYSPARAM(3);
a2:=SYSPARAM(2);7 {6 A! h+ V4 h- T+ i- Z
a4:=SYSPARAM(4);% S2 x9 C% }- F( Y2 R. S; n
a5:=SYSPARAM(5);6 X/ h' m: i4 o1 m y$ q
a6:=SYSPARAM(1);
n0:=a3-a2;$ Y6 M: U5 p" {! v; {
nn:=a0-a2;
h1:=(a4-a5)/8;9 u1 Y2 O* D6 v' J+ m" P, W
h2:=h1/4;
l1:=llv(l,n0);: X* n+ [ D0 l# Z7 Z( b
ll2:=l1[a3];# B2 v( L/ t( Z, S2 q" R/ p# V
y0:=a0>=a2;
vv:=if(y0=1 and a6>=a0,v,0);. H5 N8 t7 o: A* o+ o4 {2 R5 c
c1:=if(BETWEEN(c,a4-0*h1,a4-1*h1),vv,0);
c2:=if(BETWEEN(c,a4-1*h1,a4-2*h1),vv,0);& g3 o: u7 S3 `% f
c3:=if(BETWEEN(c,a4-2*h1,a4-3*h1),vv,0);
c4:=if(BETWEEN(c,a4-3*h1,a4-4*h1),vv,0);) b9 z6 Z" o h# W, N
c5:=if(BETWEEN(c,a4-4*h1,a4-5*h1),vv,0);: h( p- i) ^5 Y4 ~5 e
c6:=if(BETWEEN(c,a4-5*h1,a4-6*h1),vv,0);
c7:=if(BETWEEN(c,a4-6*h1,a4-7*h1),vv,0);% m: h# C, C J* T$ }& M
c8:=if(BETWEEN(c,a4-7*h1,a4-8*h1),vv,0);9 B- l7 Z; }( i& v3 S1 v
c9:=if(BETWEEN(c,a4-8*h1,a4-9*h1),vv,0);9 C0 J+ G3 H: j& R0 @+ @% _
c10:=if(BETWEEN(c,a4-9*h1,a4-10*h1),vv,0);8 C8 J2 o; ~( c* p; ^+ z% _
v1:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c1,n0),0),2));
v2:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c2,n0),0),2));. s' t5 v4 g" D" d* h
v3:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c3,n0),0),2));
v4:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c4,n0),0),2));4 R; i# i, |2 \& y1 S! o7 r
v5:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c5,n0),0),2));( z' q G5 b* c# h
v6:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c6,n0),0),2));
v7:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c7,n0),0),2));
v8:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c8,n0),0),2));( V2 e; Y: [6 J" H( k- h
v9:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c9,n0),0),2));8 b) Z6 m+ Y4 H* c
v10:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c10,n0),0),2));
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;. V3 T* T# s, H: \
x3:=v3/av0>=nn/n0 and nn>=0;# n, `* [' [4 l
x4:=v4/av0>=nn/n0 and nn>=0;2 u$ D9 K L3 p, I- r) q
x5:=v5/av0>=nn/n0 and nn>=0;, t$ f! g( \! O9 ~8 Z
x6:=v6/av0>=nn/n0 and nn>=0;+ O7 C* u9 L6 P- V' U% G1 f
x7:=v7/av0>=nn/n0 and nn>=0;% ~# J: ?# a x/ S$ X" x
x8:=v8/av0>=nn/n0 and nn>=0;* F7 f, k6 H# g6 x$ s% I7 Z- Q
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;4 [; @0 s0 E, K7 K+ L6 y
FILLRGN(v4/av0>=nn/n0 and nn>=0,a4-3*h1,a4-3.05*h1),Color883D88;$ e% R3 W" d, i6 C- Z& O
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;, U" p, [: k) ]( V9 N8 G4 R6 |7 \
FILLRGN(v7/av0>=nn/n0 and nn>=0,a4-6*h1,a4-6.05*h1),color804000;% S" U% t3 @! x- K& a/ G4 D
FILLRGN(v8/av0>=nn/n0 and nn>=0,a4-7*h1,a4-7.05*h1),color003377;9 \7 d3 x9 a/ T5 i J
DRAWNUMBER(FILTER(refx(x1<ref(x1,1),6) and v1>0,10),a4,a4-0*h1,2),COLOR00FF00;+ i: Q6 {$ j2 L/ M& `% Y- s5 D5 ?9 z
DRAWNUMBER(FILTER(refx(x2<ref(x2,1),6) and v2>0,10),(a4-1*h1),a4-1*h1,2),COLOR00FF00;+ ]; Z3 D$ ^1 M; \1 w
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;$ d) c2 Q% O8 o+ `) g) i6 j
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;
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 发表2 \: |5 K0 ^4 `3 d2 P) M
建议 是不是 可以 【%】作为斜率呢? 1%
毕竟 指数有几百点时,也有几千点,将来可能有几万点呀?是不是?


原帖由 大话李白 于 2010-8-23 13:30 发表9 n' b0 j2 ?( v4 B4 m3 s
书中提到的波动率=(历史最高价-历史最低价)/交易天数。编写成公式原码如下:HV:HHV(H,0),PRECISION2,LINETHICK0;& E* r: X- t4 U0 Y' S
LV:LLV(L,0),PRECISION2,LINETHICK0;
SUMC:SUM(C>0,0),LINETHICK0;: i- P6 M+ p( h s3 M0 t
波动率C:(HV-LV)/SUMC,LI ...

原帖由 大话李白 于 2010-8-23 13:54 发表
同理,可做出你认为较重要的高低点的江恩角度线。原码及效果图如下。HV:HHV(H,0),PRECISION2,LINETHICK0;
LV:LLV(L,0),PRECISION2,LINETHICK0;* F2 ]) J0 @0 i8 X: d* U2 \
SUMC:SUM(C>0,0),LINETHICK0;
波动率C:(HV-LV)/SUMC,LINETHICK0;D01 ...

原帖由 大话李白 于 2010-8-23 13:58 发表
, L! v1 g- H, K, T+ F: ~% {
问题来了,到底哪一个是正确的呢?高手们是哪何绘出江恩角度线呢?是根据底点或高点出来后再运行一段时间后绘图。
还是根据波动率从一点引出江恩角度线呢?![]()
原帖由 大话李白 于 2010-8-23 14:13 发表! K: E1 p% J) a% @6 |% Q
首先请版主原谅没在一个贴内贴完所有的图,因为无法批量上传附件。
第一根对后市的影响效果图:

原帖由 大话李白 于 2010-8-23 14:21 发表/ \8 T% o' I! v/ Q: c4 G
, W9 B- z0 e Z8 `. E6 i! Z3 X* M
第五根对后市的影响效果图:

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

这个贴要顶,开放的态度一股清流
$ M( c9 X; o6 i( D

辛苦了 辛苦了 辛苦了
心中充满感激^^
- V2 e8 q) u5 q1 L- I8 }
% O$ a4 E! z' H7 }/ {& t




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