求助把这个论坛里的飞狐公式修改一下,让KT交易师能正常使用。现在KT交易师不能显示黄金分割线和江恩8分线,多谢$ i* o/ U6 D& U! u3 o, w$ C
) a7 T5 M! |4 p2 y6 j, y( C
% P! ~- ]" w; U4 x3 p& X$ @/ v{黄金分割+江恩八分割 调整参数(K=1 为黄金分割;K=2为江恩八分线)}
7 A! k @$ k7 ^7 s2 o9 sinput:w(2,1,3);
' w1 I# r$ R2 B$ o v% E年:=MA(CLOSE,26);0 P" y/ B$ l1 l0 u, N0 n4 q# ]. F
STICKLINE(C>=年 AND C>=O,C,O,7,0),COLORRED;# o8 j' f e# \+ T: h
STICKLINE(C>=年 AND C>=O,H,L,0,0),COLORRED;
) y# ?5 O4 l6 ]- `9 f7 s% ^STICKLINE(C>=年 AND C<O,C,O,7,1),COLORRED;
* Q# W4 e% z4 f+ zSTICKLINE(C>=年 AND C<O,O,H,0,0),COLORRED;
- _5 s: N0 \' G" q; |STICKLINE(C>=年 AND C<O,C,L,0,0),COLORRED;
2 p X, s- _5 x
% y8 x8 X" N% U& B) [& X g% N$ nSTICKLINE(C<年 AND C>O,C,O,7,1),COLORffff00;% i, r3 |0 P5 S9 I0 f
STICKLINE(C<年 AND C<=O,C,O,7,0),COLORffff00;$ t: _; P8 M3 ]
STICKLINE(C<年 AND C<=O,H,L,0,1),COLORffff00;% P( H2 S3 L# N- l% h# C
STICKLINE(C<年 AND C>O,C,H,0,1),COLORffff00;8 ~4 s1 N9 O# U# `4 w; X
STICKLINE(C<年 AND C>O,O,L,0,1),COLORffff00;+ E. A, w- T8 m: ~$ J7 ?
J/ c) l+ {" r* n9 du1:=sysparam(3);" u7 j% a" h; v8 B9 z1 S6 o0 s
u:=u1-sysparam(2)+1;
) E4 w ^: @2 G- k0 |hh:=hhv(H,u);" u$ z- Z$ a. _" s+ h, Z: v* y- k
ll:=llv(L,u);
5 k* D# r4 n: e; ?& `最高:=hh[u1],COLORYELLOW;! r7 s) X# k. g' O
PARTLINE(C and w<>3,最高),COLORYELLOW;/ j. O, U9 Q7 E& P8 c
最低:ll[u1],COLORred;$ h! ~: j# F+ ~6 D" s
PARTLINE(C and w<>3,最低),COLORred;; K/ u* m4 b7 }& [1 i: f
PARTLINE(C and w=1,最低+(最高-最低)*0.191),LINEDOT,COLORWHITE;
$ w( O7 u0 @1 g* g6 A$ U$ d, MPARTLINE(C and w=1,最低+(最高-最低)*0.382),LINEDOT,COLORWHITE;4 f- V, X, R8 k- P, r- K- i
PARTLINE(C and w<>3,最低+(最高-最低)*0.5),COLORGREEN;; N+ M! R$ K0 m3 ]0 u7 [0 W
PARTLINE(C and w=1,最低+(最高-最低)*0.618),LINEDOT,COLORWHITE;; A9 [5 N+ e4 U. A% J5 z7 ^4 |
PARTLINE(C and w=1,最低+(最高-最低)*0.809),LINEDOT,COLORWHITE;
4 }+ |; L+ N) R% ODRAWTEXT(BARSCOUNT(C)=SYSPARAM(3) and w<>3,REF(最低,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'最低↓'),ALIGN2,COLORred;2 T7 r; M& \$ J
DRAWTEXT(BARSCOUNT(C)=SYSPARAM(3) and w<>3,REF(最高,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'最高↑'),ALIGN2,COLORYELLOW;* q/ B1 p" y0 ^: j
* w' R, c' Y! }( u& K& n/ ^
DRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.191)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.191↑'+NUMTOSTR(最低+(最高-最低)*0.191,2)),COLORWHITE;8 F4 Q4 T$ a* w$ G
DRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.382)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.382↑'+NUMTOSTR(最低+(最高-最低)*0.382,2)),COLORWHITE;9 e5 j* D7 s, k# `8 g( A
DRAWTEXT(BARPOS=SYSPARAM(2) and w<>3,REF((最低+(最高-最低)*0.5)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM (2))),' 50% ↑'+NUMTOSTR(最低+(最高-最低)*0.5,2)),COLORGREEN;
0 c; i: s) Q9 S% l$ p0 c- IDRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.618)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.618↑'+NUMTOSTR(最低+(最高-最低)*0.618,2)),COLORWHITE;
0 k, P4 ^7 i( M- }& lDRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.809)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.809↑'+NUMTOSTR(最低+(最高-最低)*0.809,2)),COLORWHITE;3 l' ?% O% M6 b/ W
6 [% \! g0 r: Q9 F& MPARTLINE(C and w=2,最低+(最高-最低)*1/8),LINEDOT,Color0095BC;
3 K$ E- U0 |) \7 T' MPARTLINE(C and w=2,最低+(最高-最低)*1/4),LINEDOT,Color0095BC;% {1 U, x8 ?$ g; U
PARTLINE(C and w=2,最低+(最高-最低)*3/8),LINEDOT,Color0095BC;
3 t* K: k6 o; t: sPARTLINE(C and w=2,最低+(最高-最低)*5/8),LINEDOT,Color0095BC;
4 G3 B! C2 R7 Q; m1 O* `PARTLINE(C and w=2,最低+(最高-最低)*7/8),LINEDOT,Color0095BC;
: l- L7 @: A* ?# zPARTLINE(C and w=2,最低+(最高-最低)*3/4),LINEDOT,Color0095BC;& R( w8 [% Z; A5 V! ~
3 V( J5 B" X+ i6 ^' ]" F8 A4 J
DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*1/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 1/8↑'+NUMTOSTR(最低+(最高-最低)*1/8,2)),Color0095BC;
) \6 {& `+ W# P, G. P$ qDRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*1/4)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 1/4↑'+NUMTOSTR(最低+(最高-最低)*1/4,2)),Color0095BC;
/ P F1 r& e! HDRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*3/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 3/8↑'+NUMTOSTR(最低+(最高-最低)*3/8,2)),Color0095BC;9 |% S. y* ?- k9 y
DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*5/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 5/8↑'+NUMTOSTR(最低+(最高-最低)*5/8,2)),Color0095BC;
% q& K/ b4 S7 K% HDRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*7/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 7/8↑'+NUMTOSTR(最低+(最高-最低)*7/8,2)),Color0095BC;5 C# D+ J, k" k! [+ d& ?
DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*3/4)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 3/4↑'+NUMTOSTR(最低+(最高-最低)*3/4,2)),Color0095BC;
$ d- R2 Z3 p/ X$ `
8 V! S! \6 P& ?1 x. E! E! C/ A0 Y# w$ t' D& U3 K
* i) {/ g: R9 H( [, W9 e, L3 K- ~1 q' g
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);
. @4 c* r' y- ^4 k$ d; GX:=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);
. A3 {. S5 ~/ {# S: y: ?. _7 L/ K! oDRAWTEXT(G,L*0.997,'▲'),ALIGN1,Colorff00ff;. r c& z+ O4 v4 Y0 F
DRAWTEXT(G,L,' ̄'),ALIGN1,Color00ff00;) j4 q; [8 x& Q2 S; B
DRAWTEXT(X,H*1.002,'▼'),ALIGN1,Color00ffff;
+ G" _! P, |# U. hDRAWTEXT(X,H,' ̄'),ALIGN1,Color00ffff;" D9 I/ f$ J4 _1 c1 Z
ED:=barslast(G);
! O* \+ ]* P8 q: Q8 X BEF:=barslast(X);
# Q1 @6 G" n2 B# C! C# J( Y买入到卖出天数:ED,LINETHICK0,ColorFFFFFF;# a3 R }1 S4 L. f6 E9 d
卖出到买入天数:EF,LINETHICK0,ColorFFFFFF; |