原帖由 大话李白 于 2010-8-11 12:14 发表 ![]()
9 J: u3 W& b! k, @4 I" t江恩角度线及原码
2 U, F" I! ~$ p4 J! g6 ~: p$ x- K3 P5 K* F& ?' E/ U: |
一、原码原理:
@3 v, @( Q7 K5 l 根据一日跌一点、一周跌一点、一月跌一点......总之一个周期跌一点(百分之一点哟~)的理论编写而成。这个原理是否正确,我尚不知,听大家都这样说,我就这样编了。
8 D( y- G( j% r! C
& P" N D* f- _: a3 {* k* i... ' S: y5 _4 V) v& Y3 g& f$ h
下面的原码是今天加了个成交堆积原码的公式,大家用着玩吧!
4 N5 Y) ?$ w* V# `0 k$ ]/ D5 _{成交堆积}
4 @0 H( S* R' ia0:=BARSCOUNT(c);, a M# q4 ?6 N1 ^: i* d: G: r
a3:=SYSPARAM(3);% F& y2 \1 Y8 {6 S; E" F
a2:=SYSPARAM(2);0 I& \+ a5 x0 z2 ]% ?
a4:=SYSPARAM(4);' W: q" f9 f$ _% }2 z: P1 K: u
a5:=SYSPARAM(5);) ]7 z) t8 Q3 R3 E
a6:=SYSPARAM(1);" ], m& F" G+ Y: u1 R t
n0:=a3-a2;
- v- D$ T1 [4 f' m" C! z8 s4 jnn:=a0-a2;
/ N" h t2 k0 yh1:=(a4-a5)/8;* Y8 F( f9 a4 ?% n/ M* X
h2:=h1/4;
/ U& {! Y+ {6 @; `' B/ Ll1:=llv(l,n0);
3 d) V9 V6 } K3 q P8 all2:=l1[a3];
1 B! |+ v0 G5 `2 {# O; d) Jy0:=a0>=a2;
C0 B+ d- p+ c# ]( k" k2 xvv:=if(y0=1 and a6>=a0,v,0);/ }% |5 Z9 k( z i8 p- \& m& n
c1:=if(BETWEEN(c,a4-0*h1,a4-1*h1),vv,0);
& j' k7 j! G' E$ j# y* ec2:=if(BETWEEN(c,a4-1*h1,a4-2*h1),vv,0);
7 }, p. c- l- ?c3:=if(BETWEEN(c,a4-2*h1,a4-3*h1),vv,0);
- m6 ^& z0 x) a, w+ ^" B' i' \c4:=if(BETWEEN(c,a4-3*h1,a4-4*h1),vv,0);5 o; p' H: X" f5 V4 K
c5:=if(BETWEEN(c,a4-4*h1,a4-5*h1),vv,0);
! x0 E1 M6 _. G, O" jc6:=if(BETWEEN(c,a4-5*h1,a4-6*h1),vv,0);
( u( f, v. k% sc7:=if(BETWEEN(c,a4-6*h1,a4-7*h1),vv,0);
& e4 `2 r) A8 r' oc8:=if(BETWEEN(c,a4-7*h1,a4-8*h1),vv,0);
+ P d" m# [7 N3 f0 j8 [c9:=if(BETWEEN(c,a4-8*h1,a4-9*h1),vv,0);6 D, o1 i, A) ] X
c10:=if(BETWEEN(c,a4-9*h1,a4-10*h1),vv,0);& n$ j( D( Q$ ^
v1:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c1,n0),0),2));+ y6 _: F. f" H$ y: j( E
v2:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c2,n0),0),2));" a% T8 j8 Z, w3 D( p7 }/ e
v3:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c3,n0),0),2));
: w2 E! {# n( I9 @v4:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c4,n0),0),2));5 F9 q+ ~2 ?; B: N+ W( E
v5:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c5,n0),0),2));- Y/ j/ `1 E# }6 y' U- _1 M2 @5 l
v6:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c6,n0),0),2));$ ]2 Q# s% n. V9 X0 n5 A
v7:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c7,n0),0),2));
7 Z; z8 D( ]/ s+ d; uv8:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c8,n0),0),2));
2 n/ }2 L! f: g" P& Mv9:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c9,n0),0),2));
& n1 K6 l& R, lv10:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c10,n0),0),2));
+ _& h6 h+ N- C5 D; J2 S9 Tav0:=max(v1,max(v2,max(v3,max(v4,max(v5,max(v6,max(v7,max(v8,max(v9,v10)))))))));
4 ~2 U4 |9 Z+ W# lx1:=v1/av0>=nn/n0 and nn>=0;6 J: F' z9 i& j) M/ K: }
x2:=v2/av0>=nn/n0 and nn>=0;
3 M' f9 b2 p ]; d4 \& p) qx3:=v3/av0>=nn/n0 and nn>=0;
0 O( y4 d0 ?7 `, u: a* M6 _x4:=v4/av0>=nn/n0 and nn>=0;
$ s6 f9 n+ Z1 t9 d8 M3 rx5:=v5/av0>=nn/n0 and nn>=0;+ x, _! ^! S" N; ~6 B a2 v
x6:=v6/av0>=nn/n0 and nn>=0;0 y% W. N2 z) _* q! `- ^5 n3 y1 F6 [
x7:=v7/av0>=nn/n0 and nn>=0;! Z9 b+ g! q6 u. I' D; S$ Z
x8:=v8/av0>=nn/n0 and nn>=0;
' w8 j& m2 w/ D8 o( i& q, u2 TFILLRGN(v1/av0>=nn/n0 and nn>=0,a4-0*h1,a4-0.05*h1),Color002288;
* M% ~; D& x! C. nFILLRGN(v2/av0>=nn/n0 and nn>=0,a4-1*h1,a4-1.05*h1),Color806000;
W C# ]: _5 ^+ T* U" I' P+ U7 T9 WFILLRGN(v3/av0>=nn/n0 and nn>=0,a4-2*h1,a4-2.05*h1),Color808300;
* ]2 R5 C; T3 @9 @. g9 PFILLRGN(v4/av0>=nn/n0 and nn>=0,a4-3*h1,a4-3.05*h1),Color883D88;" r/ U$ Y! u3 J! h7 A8 H( Y
FILLRGN(v5/av0>=nn/n0 and nn>=0,a4-4*h1,a4-4.05*h1),Color006868;6 e7 i i* d. D+ K
FILLRGN(v6/av0>=nn/n0 and nn>=0,a4-5*h1,a4-5.05*h1),color777700;2 p& n3 b$ `) y. o4 j
FILLRGN(v7/av0>=nn/n0 and nn>=0,a4-6*h1,a4-6.05*h1),color804000;
& }# Q& e1 B2 U, mFILLRGN(v8/av0>=nn/n0 and nn>=0,a4-7*h1,a4-7.05*h1),color003377;
% C! E" l2 T" g YDRAWNUMBER(FILTER(refx(x1<ref(x1,1),6) and v1>0,10),a4,a4-0*h1,2),COLOR00FF00; t* B$ T+ L% t6 f3 Q0 q1 Q
DRAWNUMBER(FILTER(refx(x2<ref(x2,1),6) and v2>0,10),(a4-1*h1),a4-1*h1,2),COLOR00FF00;
2 i3 w. e+ M, A& O+ R9 G2 xDRAWNUMBER(FILTER(refx(x3<ref(x3,1),6) and v3>0,10),(a4-2.7*3*h2),a4-2*h1,2),COLOR00FF00;/ O+ K! W* j. ^8 Y, w
DRAWNUMBER(FILTER(refx(x4<ref(x4,1),6) and v4>0,10),(a4-12*h2),a4-3*h1,2),COLOR00FF00;
% n. e. o; h! c4 ]/ v- r5 t! oDRAWNUMBER(FILTER(refx(x5<ref(x5,1),6) and v5>0,10),(a4-16*h2),a4-4*h1,2),COLOR00FF00;, D4 Z3 g/ O6 I$ `: B+ c0 W: e7 k
DRAWNUMBER(FILTER(refx(x6<ref(x6,1),6) and v6>0,10),(a4-20*h2),a4-5*h1,2),COLOR00FF00;
) Y6 o( e7 L' ~% z+ T- k& XDRAWNUMBER(FILTER(refx(x7<ref(x7,1),6) and v7>0,10),(a4-24*h2),a4-6*h1,2),COLOR00FF00;, x2 m/ c' I1 e* z) J- n+ C
DRAWNUMBER(FILTER(refx(x8<ref(x8,1) and x8>0,5),10),ll2+1*4*h2,a4-7*h1,2),COLOR00FF00;
h' H4 z7 f' { ~{下降江恩角度线A}
) p4 Y' X& o: c! e4 NAY1:=REF(H,BARSLAST(H=HHV(H,0))),PRECISION2;
& \3 Q& Q- D k! I% X" `: dDL18:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01*8*AY1,0,1),COLORBLUE,LINEDOT;; N: l: d( S! s5 g, `+ C
DL14:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01*4*AY1,0,1),COLORBLUE,LINEDOT;. ?, u# l+ Y; W& p+ ?
DL13:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01*3*AY1,0,1),COLORBLUE,LINEDOT;$ v* s0 U7 Z9 ^7 x
DL12:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01*2*AY1,0,1),COLORBLUE,LINEDOT;
* D- m- y. x hDL11:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01*AY1,0,1),COLORBLUE,LINETHICK1;6 ~' ~# C! p* e8 _8 G
DL21:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01/2*AY1,0,1),COLORBLUE,LINEDOT;3 b/ q- X. v9 g& d) e
DL31:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01/3*AY1,0,1),COLORBLUE,LINEDOT;. V7 T; D& s1 g) k9 u9 u% J3 x" t
DL41:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01/4*AY1,0,1),COLORBLUE,LINEDOT;
' k- Q4 |$ E5 \# g2 R: \4 zDL81:LINEVALUE(H=HHV(H,0),AY1,REF(H,1)=HHV(H,0),AY1-0.01/8*AY1,0,1),COLORBLUE,LINEDOT;
1 V; R1 A3 v* N# ^) N3 ~{上升江恩角度线A}
7 Z! g* g4 c: H9 s4 jBY1:=LLV(L,BARSLAST(H=HHV(H,0))),PRECISION2;- }2 Q' S) s& T1 X8 ?) j8 {' y
UL18:LINEVALUE(L=BY1,BY1,REF(L,1)=BY1,BY1+0.01/8*BY1,0,1),COLORYELLOW,LINEDOT;
3 J s7 s# a- n0 B- N" KUL14:LINEVALUE(L=BY1,BY1,REF(L,1)=BY1,BY1+0.01/4*BY1,0,1),COLORYELLOW,LINEDOT;
2 k# L M6 b( r% Z7 N8 g# aUL13:LINEVALUE(L=BY1,BY1,REF(L,1)=BY1,BY1+0.01/3*BY1,0,1),COLORYELLOW,LINEDOT;$ |9 N& P2 z K2 @- \
UL12:LINEVALUE(L=BY1,BY1,REF(L,1)=BY1,BY1+0.01/2*BY1,0,1),COLORYELLOW,LINEDOT;
% k$ g8 ?8 a A# R* v8 _/ eUL11:LINEVALUE(L=BY1,BY1,REF(L,1)=BY1,BY1+0.01*BY1,0,1),COLORYELLOW,LINETHICK1;
Y- p6 A( P0 ?2 HUL21:LINEVALUE(L=BY1,BY1,REF(L,1)=BY1,BY1+0.01*2*BY1,0,1),COLORYELLOW,LINEDOT;
9 W) g; q# c) f; E: N# ~& n# AUL31:LINEVALUE(L=BY1,BY1,REF(L,1)=BY1,BY1+0.01*3*BY1,0,1),COLORYELLOW,LINEDOT;
, E/ L+ B. l, ]$ C7 x$ K: E2 JUL41:LINEVALUE(L=BY1,BY1,REF(L,1)=BY1,BY1+0.01*4*BY1,0,1),COLORYELLOW,LINEDOT;
) g6 ?) N) e c$ p* F. q7 J* j, j& FUL81:LINEVALUE(L=BY1,BY1,REF(L,1)=BY1,BY1+0.01*8*BY1,0,1),COLORYELLOW,LINEDOT;
3 n+ A$ {0 d s* O{上升江恩角度线B}
' P3 k J1 C2 M( O( @. S5 MBY2:=LLV(L,0),PRECISION2;8 s" Z4 t% g1 }) i$ g' H
UL118:LINEVALUE(L=BY2,BY2,REF(L,1)=BY2,BY2+0.01*8*BY2,0,1),COLOR006699,LINEDOT;
! i' K \: Z' R9 C1 |3 Q5 S Y, MUL114:LINEVALUE(L=BY2,BY2,REF(L,1)=BY2,BY2+0.01*4*BY2,0,1),COLOR006699,LINEDOT;
7 G5 x) k7 o9 f- q/ D3 g: M, eUL113:LINEVALUE(L=BY2,BY2,REF(L,1)=BY2,BY2+0.01*3*BY2,0,1),COLOR006699,LINEDOT;6 m, J! y) X# Q" H2 e7 L* \
UL112:LINEVALUE(L=BY2,BY2,REF(L,1)=BY2,BY2+0.01*2*BY2,0,1),COLOR006699,LINEDOT;
" a& o8 [, f4 fUL111:LINEVALUE(L=BY2,BY2,REF(L,1)=BY2,BY2+0.01*BY2,0,1),COLOR006699,LINETHICK1;
- z/ G( ]; I$ W- F$ PUL121:LINEVALUE(L=BY2,BY2,REF(L,1)=BY2,BY2+0.01/2*BY2,0,1),COLOR006699,LINEDOT;
" h* ]3 H0 g' X! L2 nUL131:LINEVALUE(L=BY2,BY2,REF(L,1)=BY2,BY2+0.01/3*BY2,0,1),COLOR006699,LINEDOT;
4 A; T/ Z) e4 SUL141:LINEVALUE(L=BY2,BY2,REF(L,1)=BY2,BY2+0.01/4*BY2,0,1),COLOR006699,LINEDOT;0 r0 ^$ s4 ^! {- x$ h
UL181:LINEVALUE(L=BY2,BY2,REF(L,1)=BY2,BY2+0.01/8*BY2,0,1),COLOR006699,LINEDOT;
" L" }" q* h! P! I& T" e/ i/ M0 e& T) U. I4 {, w" L
$ Z5 b7 H) t) `5 y) v) N
$ }; e! t6 q0 _- ?& I
K0 o% m9 w6 g- A4 n3 {
) E+ m r5 F5 U% v4 O& v$ h由下图可知,大盘自3181.66以来,目前在DL81线上展开整理。成交密集区上沿2644,贴图如下:4 _8 ]: D, S: Z. \9 I. X
|