求助把这个论坛里的飞狐公式修改一下,让KT交易师能正常使用。现在KT交易师不能显示黄金分割线和江恩8分线,多谢1 @; U, b. K, _5 e3 N& a
( @' p7 n4 x. R, S% f9 S
+ p( x. _2 ^5 a
{黄金分割+江恩八分割 调整参数(K=1 为黄金分割;K=2为江恩八分线)}
0 _9 c$ r4 n) iinput:w(2,1,3); - ]$ K. Z; x6 k5 c$ { | l
年:=MA(CLOSE,26);2 v, R1 K$ |0 U: H6 j; S& r
STICKLINE(C>=年 AND C>=O,C,O,7,0),COLORRED;. B9 |4 X' B$ ?3 c$ T# J) T! E0 H
STICKLINE(C>=年 AND C>=O,H,L,0,0),COLORRED;) r% t, z7 q5 v+ _! x
STICKLINE(C>=年 AND C<O,C,O,7,1),COLORRED;
9 ?& J y5 w I1 N6 H' L5 H* Y! NSTICKLINE(C>=年 AND C<O,O,H,0,0),COLORRED;
: |# R. |; c4 K$ J2 u! i6 a4 nSTICKLINE(C>=年 AND C<O,C,L,0,0),COLORRED;
# i0 n$ O0 F/ t. ]5 T4 Z( x
+ f( o9 d+ l @( S& n5 y$ |STICKLINE(C<年 AND C>O,C,O,7,1),COLORffff00;* F8 S3 B, r3 c! z% `
STICKLINE(C<年 AND C<=O,C,O,7,0),COLORffff00;
' D, Z+ u/ i* CSTICKLINE(C<年 AND C<=O,H,L,0,1),COLORffff00;2 f% ?: O; s4 W4 `6 P
STICKLINE(C<年 AND C>O,C,H,0,1),COLORffff00;
( f6 ^. P4 w* y* r- R$ Z9 G O7 aSTICKLINE(C<年 AND C>O,O,L,0,1),COLORffff00;/ A. {" r, e) f) P8 T
) f! v3 L; |) xu1:=sysparam(3);
, j3 d) U# K; b4 ku:=u1-sysparam(2)+1;6 A, r, O7 F: G8 K4 R
hh:=hhv(H,u);
+ X' t# o; t' p6 x+ C Sll:=llv(L,u);
( Y3 \: Q: S6 R" @: ?$ A e" z最高:=hh[u1],COLORYELLOW;# a# A# r8 i3 q) Z. e/ g7 w' V& n
PARTLINE(C and w<>3,最高),COLORYELLOW;' M6 ^! ?- c* k; L
最低:ll[u1],COLORred;
. w% e; z' a; P& o7 lPARTLINE(C and w<>3,最低),COLORred;, e% B) v8 {1 i, u
PARTLINE(C and w=1,最低+(最高-最低)*0.191),LINEDOT,COLORWHITE;
8 }/ z! X1 m2 F3 g+ D9 UPARTLINE(C and w=1,最低+(最高-最低)*0.382),LINEDOT,COLORWHITE;
# s5 V, I/ e$ W+ vPARTLINE(C and w<>3,最低+(最高-最低)*0.5),COLORGREEN;" ~0 a% B; q6 b$ e- P- p" ?7 c5 l/ B/ Z
PARTLINE(C and w=1,最低+(最高-最低)*0.618),LINEDOT,COLORWHITE;
7 H" x! D( p: B9 uPARTLINE(C and w=1,最低+(最高-最低)*0.809),LINEDOT,COLORWHITE;( X) X: D1 l M
DRAWTEXT(BARSCOUNT(C)=SYSPARAM(3) and w<>3,REF(最低,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'最低↓'),ALIGN2,COLORred;
" r- z5 W6 n' m8 sDRAWTEXT(BARSCOUNT(C)=SYSPARAM(3) and w<>3,REF(最高,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'最高↑'),ALIGN2,COLORYELLOW;
, B" X& M2 Q# {" G5 v" T% h) q
9 K- x) g4 C& I! }1 u/ oDRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.191)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.191↑'+NUMTOSTR(最低+(最高-最低)*0.191,2)),COLORWHITE;! P2 [/ v x2 x% J% k3 s, R' c6 @
DRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.382)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.382↑'+NUMTOSTR(最低+(最高-最低)*0.382,2)),COLORWHITE;4 m$ a) ^' i6 `
DRAWTEXT(BARPOS=SYSPARAM(2) and w<>3,REF((最低+(最高-最低)*0.5)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM (2))),' 50% ↑'+NUMTOSTR(最低+(最高-最低)*0.5,2)),COLORGREEN;2 `) g. s/ H4 ]9 u6 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;
/ Y9 p+ ~& y% L! |DRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.809)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.809↑'+NUMTOSTR(最低+(最高-最低)*0.809,2)),COLORWHITE;
' t$ {: Q; @1 [9 \) p& O$ }+ v, e; N
PARTLINE(C and w=2,最低+(最高-最低)*1/8),LINEDOT,Color0095BC;
; l0 p# |' g- y+ [& n n' lPARTLINE(C and w=2,最低+(最高-最低)*1/4),LINEDOT,Color0095BC;8 J& I$ o6 q; j2 X
PARTLINE(C and w=2,最低+(最高-最低)*3/8),LINEDOT,Color0095BC;# `- x9 H$ D6 D, H0 l# U, c
PARTLINE(C and w=2,最低+(最高-最低)*5/8),LINEDOT,Color0095BC;! Z, i4 `" w) h* ^: |% Z9 z1 I
PARTLINE(C and w=2,最低+(最高-最低)*7/8),LINEDOT,Color0095BC;" `+ G# q. T) U) G: [$ l
PARTLINE(C and w=2,最低+(最高-最低)*3/4),LINEDOT,Color0095BC;
: S( a+ `5 x7 c H" u2 g+ k4 K( G
* ?0 B3 r1 r$ ?( dDRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*1/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 1/8↑'+NUMTOSTR(最低+(最高-最低)*1/8,2)),Color0095BC;
! O9 V4 }% R J# q; eDRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*1/4)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 1/4↑'+NUMTOSTR(最低+(最高-最低)*1/4,2)),Color0095BC;
9 x; I) @2 y& X- G" y" Y1 J) JDRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*3/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 3/8↑'+NUMTOSTR(最低+(最高-最低)*3/8,2)),Color0095BC;
6 I6 L% q) P. X5 c; j2 fDRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*5/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 5/8↑'+NUMTOSTR(最低+(最高-最低)*5/8,2)),Color0095BC;* {4 S0 u3 v7 R, ?+ {$ X
DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*7/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 7/8↑'+NUMTOSTR(最低+(最高-最低)*7/8,2)),Color0095BC;/ R. |- ]9 ], b3 g4 E4 E* k
DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*3/4)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 3/4↑'+NUMTOSTR(最低+(最高-最低)*3/4,2)),Color0095BC;
6 q% P1 j8 `' f6 J+ v2 n
6 C8 u/ S9 g+ Q! i, c2 H! G8 y4 h+ E R, t( g0 }" {
; \3 X. {, ]# N# @9 L0 H) h& R
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);& ^; T6 H) q' U+ 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);
' T# z2 m9 ~8 p$ C- U' \DRAWTEXT(G,L*0.997,'▲'),ALIGN1,Colorff00ff;0 T$ ~# Z' i, e% n" r( X
DRAWTEXT(G,L,' ̄'),ALIGN1,Color00ff00;
2 q- c& y' @5 o: g' k' sDRAWTEXT(X,H*1.002,'▼'),ALIGN1,Color00ffff;
* `9 D! B3 N* a% x' @DRAWTEXT(X,H,' ̄'),ALIGN1,Color00ffff;
: p# R) _5 R1 J' u) M0 m" _ED:=barslast(G);
' b8 U5 p4 j1 x4 ~1 O7 X3 MEF:=barslast(X);0 P! x9 Y5 r6 F0 `% ?
买入到卖出天数:ED,LINETHICK0,ColorFFFFFF;
3 u+ {# E! h3 g- K卖出到买入天数:EF,LINETHICK0,ColorFFFFFF; |