|
|
求助把这个论坛里的飞狐公式修改一下,让KT交易师能正常使用。现在KT交易师不能显示黄金分割线和江恩8分线,多谢& I, H( I" E% v6 P4 |& N' h* _) M
* ]- Z9 e0 b: c) g4 L9 S9 C+ e! b4 S
5 G; ]7 w0 y1 ?4 @: L- N{黄金分割+江恩八分割 调整参数(K=1 为黄金分割;K=2为江恩八分线)}
' L( a' P4 D/ D, j; ~input:w(2,1,3);
/ H0 p, c8 @& Z- H4 y/ K6 `4 F0 J年:=MA(CLOSE,26);9 F- _) u* Z2 E0 C; A
STICKLINE(C>=年 AND C>=O,C,O,7,0),COLORRED; B# r+ J: a# M% a+ d( K! l- e# Q
STICKLINE(C>=年 AND C>=O,H,L,0,0),COLORRED;8 [8 ?( Q% d, v8 P3 m
STICKLINE(C>=年 AND C<O,C,O,7,1),COLORRED;1 c7 L& @) L. i0 s* ~
STICKLINE(C>=年 AND C<O,O,H,0,0),COLORRED;
4 H: h/ _8 C$ {4 S0 r$ r8 u; GSTICKLINE(C>=年 AND C<O,C,L,0,0),COLORRED;
+ @1 Y6 Q6 h/ f' I9 c, y2 T( C
STICKLINE(C<年 AND C>O,C,O,7,1),COLORffff00;
; g( ]8 {; N! LSTICKLINE(C<年 AND C<=O,C,O,7,0),COLORffff00;
0 F" {7 W, v- I$ BSTICKLINE(C<年 AND C<=O,H,L,0,1),COLORffff00;
4 ^+ ?$ x2 ?# y5 C" G. pSTICKLINE(C<年 AND C>O,C,H,0,1),COLORffff00;/ V3 O, l& }3 h- U: [
STICKLINE(C<年 AND C>O,O,L,0,1),COLORffff00;
/ H" A, c# X* h, @3 H$ q: R5 O( m: B
' x# k" M. o( ~1 x' eu1:=sysparam(3);
$ q9 U: [2 c( U/ p* o; ]) M2 _1 Vu:=u1-sysparam(2)+1;
0 ~0 o$ \" P( E( ?& d, Nhh:=hhv(H,u);- a6 q4 g4 f. I4 @' ^# {! \
ll:=llv(L,u);
( ^1 e, }/ h/ d, y# S3 F+ O最高:=hh[u1],COLORYELLOW;
! O+ D8 e7 M5 ?PARTLINE(C and w<>3,最高),COLORYELLOW;( f7 @' g* m) _- }' R# x7 n
最低:ll[u1],COLORred;
) S, |4 H. P; {PARTLINE(C and w<>3,最低),COLORred;
3 ^3 m; M K S' D: JPARTLINE(C and w=1,最低+(最高-最低)*0.191),LINEDOT,COLORWHITE;, T8 W$ V3 C# J. A! ]& Q9 a2 L7 J
PARTLINE(C and w=1,最低+(最高-最低)*0.382),LINEDOT,COLORWHITE;
* L. Y* y1 i9 mPARTLINE(C and w<>3,最低+(最高-最低)*0.5),COLORGREEN;- }$ g3 V7 }+ g+ s% T
PARTLINE(C and w=1,最低+(最高-最低)*0.618),LINEDOT,COLORWHITE;
) o! `8 A! w) C2 \3 {0 P" o/ Q: ePARTLINE(C and w=1,最低+(最高-最低)*0.809),LINEDOT,COLORWHITE;
' }9 }2 Y A, }7 _+ } M5 J- H7 UDRAWTEXT(BARSCOUNT(C)=SYSPARAM(3) and w<>3,REF(最低,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'最低↓'),ALIGN2,COLORred;' x% Q) {' H* _1 ]$ u; w
DRAWTEXT(BARSCOUNT(C)=SYSPARAM(3) and w<>3,REF(最高,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'最高↑'),ALIGN2,COLORYELLOW;
" N j* W1 P/ E0 k. N- H
: [' X' T5 x, E ?DRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.191)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.191↑'+NUMTOSTR(最低+(最高-最低)*0.191,2)),COLORWHITE;
K o: q" e7 m) S4 d8 ^1 ADRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.382)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.382↑'+NUMTOSTR(最低+(最高-最低)*0.382,2)),COLORWHITE;" Q: h8 s! N' a3 H* V! j
DRAWTEXT(BARPOS=SYSPARAM(2) and w<>3,REF((最低+(最高-最低)*0.5)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM (2))),' 50% ↑'+NUMTOSTR(最低+(最高-最低)*0.5,2)),COLORGREEN;
9 R& m( G5 o) G* F) M. c3 ODRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.618)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.618↑'+NUMTOSTR(最低+(最高-最低)*0.618,2)),COLORWHITE;
+ ~+ P6 z! G uDRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.809)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.809↑'+NUMTOSTR(最低+(最高-最低)*0.809,2)),COLORWHITE;
9 W. m- `0 ?+ k4 A
; q7 ] ^. V1 ?& j* l* D* xPARTLINE(C and w=2,最低+(最高-最低)*1/8),LINEDOT,Color0095BC;
5 U/ F% h8 p Y- C9 y& h- ~6 APARTLINE(C and w=2,最低+(最高-最低)*1/4),LINEDOT,Color0095BC;2 d- r* r0 b) U! j- l1 d) Z3 o+ t
PARTLINE(C and w=2,最低+(最高-最低)*3/8),LINEDOT,Color0095BC;
6 p0 f% x2 Z0 R7 ?+ T/ f4 gPARTLINE(C and w=2,最低+(最高-最低)*5/8),LINEDOT,Color0095BC;8 U0 E8 ~. O0 P- [
PARTLINE(C and w=2,最低+(最高-最低)*7/8),LINEDOT,Color0095BC;
$ T6 s, ~- W. ]/ a/ |$ s f( Z) HPARTLINE(C and w=2,最低+(最高-最低)*3/4),LINEDOT,Color0095BC;0 A" K/ z/ p6 m, J" J4 S- `. ~. w
: p' t& P; m- `& n5 k0 `
DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*1/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 1/8↑'+NUMTOSTR(最低+(最高-最低)*1/8,2)),Color0095BC;
& ] y/ M$ N6 m7 Y. `1 H) {2 qDRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*1/4)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 1/4↑'+NUMTOSTR(最低+(最高-最低)*1/4,2)),Color0095BC;
5 q3 \" e+ G. Z' ` y- C" j* p6 X4 lDRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*3/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 3/8↑'+NUMTOSTR(最低+(最高-最低)*3/8,2)),Color0095BC;$ S7 r3 w2 v9 z$ [2 x8 c4 F' L
DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*5/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 5/8↑'+NUMTOSTR(最低+(最高-最低)*5/8,2)),Color0095BC;( M' ~7 Z5 x5 ~* q) {6 k3 l) l
DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*7/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 7/8↑'+NUMTOSTR(最低+(最高-最低)*7/8,2)),Color0095BC;
: c: d: w& A% n1 SDRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*3/4)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 3/4↑'+NUMTOSTR(最低+(最高-最低)*3/4,2)),Color0095BC;
2 }- l& S& X* l$ v5 B
2 m: ?/ I0 \4 Y3 D5 |3 g
5 W, j, s5 r# f! c: ^4 M" G( o0 F) ?6 D1 Y2 z! I9 l( D* G5 p* ]
G:=ZIG(3,5)>REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)<=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)<=REF(ZIG(3,5),3);1 W5 t3 Q" H5 C: ?' `( o& y9 H
X:=ZIG(3,5)<REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)>=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)>=REF(ZIG(3,5),3);
$ V: w2 H/ y" l' |( @- ~) l/ PDRAWTEXT(G,L*0.997,'▲'),ALIGN1,Colorff00ff;7 h# ]) p' _( \8 s
DRAWTEXT(G,L,' ̄'),ALIGN1,Color00ff00;
& H% \- U5 W2 g2 p& I' `. f" BDRAWTEXT(X,H*1.002,'▼'),ALIGN1,Color00ffff;8 m+ e3 S R- S$ O5 X6 B q. m
DRAWTEXT(X,H,' ̄'),ALIGN1,Color00ffff;
b% }6 T2 D/ ]ED:=barslast(G);
9 s5 W/ ^5 e7 f0 E w8 ]EF:=barslast(X);7 N# R6 S! g2 d, p% x# }
买入到卖出天数:ED,LINETHICK0,ColorFFFFFF;& ~& M4 a0 s* h5 w' {% Q
卖出到买入天数:EF,LINETHICK0,ColorFFFFFF; |
评分
-
1
查看全部评分
-
|