求助把这个论坛里的飞狐公式修改一下,让KT交易师能正常使用。现在KT交易师不能显示黄金分割线和江恩8分线,多谢
o" k4 F* I2 ?* o7 T0 V3 [7 c
0 o; j5 g7 o3 [, U( L9 `# y7 `: |" A4 V" {" O2 `! H+ J# R* V, I
{黄金分割+江恩八分割 调整参数(K=1 为黄金分割;K=2为江恩八分线)}7 Q7 Y1 P8 G8 ~8 b0 B5 h
input:w(2,1,3);
2 {! {8 Q l' c# M/ o" P年:=MA(CLOSE,26);) G" _: A$ ~+ o$ {
STICKLINE(C>=年 AND C>=O,C,O,7,0),COLORRED;& d2 e( e. m- |
STICKLINE(C>=年 AND C>=O,H,L,0,0),COLORRED;
% x! F6 G6 ?" \; GSTICKLINE(C>=年 AND C<O,C,O,7,1),COLORRED;
" I4 l! ~8 M/ E; j3 \7 ?STICKLINE(C>=年 AND C<O,O,H,0,0),COLORRED;, P# Q! D9 [+ o7 \$ i
STICKLINE(C>=年 AND C<O,C,L,0,0),COLORRED;) l, h6 ] n3 ^6 f
' G/ R) Z: F+ f1 ^ t* E+ p
STICKLINE(C<年 AND C>O,C,O,7,1),COLORffff00;
6 N5 o* Y2 T% f7 b ^" i3 }STICKLINE(C<年 AND C<=O,C,O,7,0),COLORffff00;" |9 m9 {6 d( q% L, X) G
STICKLINE(C<年 AND C<=O,H,L,0,1),COLORffff00;
0 E0 Y' ], ~, `+ K" T4 kSTICKLINE(C<年 AND C>O,C,H,0,1),COLORffff00;& }% l- G# Q8 E( r
STICKLINE(C<年 AND C>O,O,L,0,1),COLORffff00;2 [" e9 a0 e8 J# p
, Q" q: @" o7 ^+ `* P2 x0 O2 S
u1:=sysparam(3);9 [, F7 b2 V3 ]4 U4 H
u:=u1-sysparam(2)+1;/ c( [3 f+ l7 X& ?& o2 G" a
hh:=hhv(H,u);
0 h" m* P- K5 t& e1 W1 w' sll:=llv(L,u);7 }7 w8 h: ^9 p; j
最高:=hh[u1],COLORYELLOW;# r2 P7 k& l% D2 |. f
PARTLINE(C and w<>3,最高),COLORYELLOW;3 E" ~+ I, t0 b; x
最低:ll[u1],COLORred;
: n" _& e9 j9 L! H: _PARTLINE(C and w<>3,最低),COLORred;
0 @4 Q, Y6 ~9 _6 k- |& xPARTLINE(C and w=1,最低+(最高-最低)*0.191),LINEDOT,COLORWHITE;
2 q6 v0 p, y2 l1 e3 WPARTLINE(C and w=1,最低+(最高-最低)*0.382),LINEDOT,COLORWHITE;' S5 N0 d# S; t- d0 m
PARTLINE(C and w<>3,最低+(最高-最低)*0.5),COLORGREEN;2 k) Y. w4 m$ p
PARTLINE(C and w=1,最低+(最高-最低)*0.618),LINEDOT,COLORWHITE;
3 h# x& g: `) U3 f! [/ ?PARTLINE(C and w=1,最低+(最高-最低)*0.809),LINEDOT,COLORWHITE;% n$ \$ ^8 P) n3 ?- m. ~
DRAWTEXT(BARSCOUNT(C)=SYSPARAM(3) and w<>3,REF(最低,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'最低↓'),ALIGN2,COLORred;9 v5 g8 j: [; q
DRAWTEXT(BARSCOUNT(C)=SYSPARAM(3) and w<>3,REF(最高,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'最高↑'),ALIGN2,COLORYELLOW;1 _: l# `& A; t& ?8 C* z4 ]+ }
- g6 J, f& `! N2 Z' H t" j# R5 q
DRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.191)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.191↑'+NUMTOSTR(最低+(最高-最低)*0.191,2)),COLORWHITE;
" R% c% @. M' TDRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.382)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.382↑'+NUMTOSTR(最低+(最高-最低)*0.382,2)),COLORWHITE;8 R7 ?' B3 c) o! C" h
DRAWTEXT(BARPOS=SYSPARAM(2) and w<>3,REF((最低+(最高-最低)*0.5)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM (2))),' 50% ↑'+NUMTOSTR(最低+(最高-最低)*0.5,2)),COLORGREEN;' Q! a- r- D, p# r/ A" L( t, n g/ O
DRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.618)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.618↑'+NUMTOSTR(最低+(最高-最低)*0.618,2)),COLORWHITE;2 m' d" _, O8 {$ g% k
DRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.809)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.809↑'+NUMTOSTR(最低+(最高-最低)*0.809,2)),COLORWHITE;
. A5 W3 x/ `% y" ~# q# O' w; ~5 l/ Z! V
PARTLINE(C and w=2,最低+(最高-最低)*1/8),LINEDOT,Color0095BC;
+ D7 O6 s5 v. w+ W4 b( XPARTLINE(C and w=2,最低+(最高-最低)*1/4),LINEDOT,Color0095BC;) ^4 ~- h- U+ O' U
PARTLINE(C and w=2,最低+(最高-最低)*3/8),LINEDOT,Color0095BC;9 k! S( U# X2 j/ }6 B
PARTLINE(C and w=2,最低+(最高-最低)*5/8),LINEDOT,Color0095BC;1 W) Z) [7 m/ K1 p: q h
PARTLINE(C and w=2,最低+(最高-最低)*7/8),LINEDOT,Color0095BC;( }4 r9 u; }! M8 S+ j: d* z
PARTLINE(C and w=2,最低+(最高-最低)*3/4),LINEDOT,Color0095BC;$ Z8 ~$ c$ L) {8 L, S! _, X9 w
/ S8 W0 Y( W! N5 ~DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*1/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 1/8↑'+NUMTOSTR(最低+(最高-最低)*1/8,2)),Color0095BC;
% ?9 E3 r9 D x0 v" x" }; vDRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*1/4)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 1/4↑'+NUMTOSTR(最低+(最高-最低)*1/4,2)),Color0095BC;
- _4 N* s/ `2 A' J; S: l1 E* qDRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*3/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 3/8↑'+NUMTOSTR(最低+(最高-最低)*3/8,2)),Color0095BC;
7 Z5 B: |* E( z9 C9 E" j& C+ }DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*5/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 5/8↑'+NUMTOSTR(最低+(最高-最低)*5/8,2)),Color0095BC;! r& a; {* N0 E* J9 V2 @
DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*7/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 7/8↑'+NUMTOSTR(最低+(最高-最低)*7/8,2)),Color0095BC;% j1 ^5 z5 t& T
DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*3/4)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 3/4↑'+NUMTOSTR(最低+(最高-最低)*3/4,2)),Color0095BC;
' Y' y# T7 m: q7 T* J* J# _; b v- k. U
' g: S& P8 K) j/ }1 f" f
% s5 r% Z5 b4 _9 ]- l
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 C. K# ]1 a; |0 t4 E' JX:=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);
/ n# g* G- h4 ^& p4 EDRAWTEXT(G,L*0.997,'▲'),ALIGN1,Colorff00ff;
9 T' f' G# T3 ? ~DRAWTEXT(G,L,' ̄'),ALIGN1,Color00ff00;
B3 M7 ]" B3 R* L. |( xDRAWTEXT(X,H*1.002,'▼'),ALIGN1,Color00ffff;
; l; ~' q7 g; P/ QDRAWTEXT(X,H,' ̄'),ALIGN1,Color00ffff;5 _5 \) z+ B/ E: F% n7 j4 V
ED:=barslast(G);" _5 J3 M) s* N4 E; J
EF:=barslast(X);
$ Z8 _) _4 ^2 H" a5 I% q买入到卖出天数:ED,LINETHICK0,ColorFFFFFF;$ Q# x- n- j: G5 P) n4 Z
卖出到买入天数:EF,LINETHICK0,ColorFFFFFF; |