|
|
求助把这个论坛里的飞狐公式修改一下,让KT交易师能正常使用。现在KT交易师不能显示黄金分割线和江恩8分线,多谢
/ |6 L* Y+ b$ w1 l, g9 M9 }/ `1 ]8 p: q, i* F6 b
8 O9 [. m$ G [. _' J, g! O" ]{黄金分割+江恩八分割 调整参数(K=1 为黄金分割;K=2为江恩八分线)}2 a" F2 ^1 p! e& H
input:w(2,1,3); ' V* O% x, i, [% w0 w
年:=MA(CLOSE,26);
1 d5 p6 i3 I6 {7 t% P5 w0 WSTICKLINE(C>=年 AND C>=O,C,O,7,0),COLORRED;
; t3 x/ E! i2 T* tSTICKLINE(C>=年 AND C>=O,H,L,0,0),COLORRED;2 W: r I9 _$ g, ?% B& ^) U
STICKLINE(C>=年 AND C<O,C,O,7,1),COLORRED;
' s+ T6 p5 B$ qSTICKLINE(C>=年 AND C<O,O,H,0,0),COLORRED;3 [, H1 [5 T7 t) G( |3 K
STICKLINE(C>=年 AND C<O,C,L,0,0),COLORRED;
; M. [8 i5 R7 t ~. h5 n- v7 ]* y. S! ^; D I1 u2 s
STICKLINE(C<年 AND C>O,C,O,7,1),COLORffff00;, K4 e M( E. {
STICKLINE(C<年 AND C<=O,C,O,7,0),COLORffff00;
% B' ^' @3 t; P* I0 x% A( z. ASTICKLINE(C<年 AND C<=O,H,L,0,1),COLORffff00;
( S& [5 b: c T/ r2 CSTICKLINE(C<年 AND C>O,C,H,0,1),COLORffff00;
3 F+ C( g$ O4 I4 o% S& |STICKLINE(C<年 AND C>O,O,L,0,1),COLORffff00;
0 Q* `$ m5 L( j$ `/ {0 Q. ]; a+ L# n' C7 P
u1:=sysparam(3);2 w5 h& x+ \ L. B( X% J
u:=u1-sysparam(2)+1;: [5 C. L- J( R- @7 I) g
hh:=hhv(H,u);
. n% E- ]0 S! u9 K* F5 _1 Tll:=llv(L,u);
t4 h6 h9 M1 \& D# w7 n& r: b最高:=hh[u1],COLORYELLOW;9 o# B% C' M: c: M7 v' w, C4 I4 f
PARTLINE(C and w<>3,最高),COLORYELLOW;! h5 X" x l$ o) h
最低:ll[u1],COLORred;
3 j2 f. V/ M. |& Z A* S+ d1 h: LPARTLINE(C and w<>3,最低),COLORred;$ D8 d" i3 G7 w9 [' P$ V9 b
PARTLINE(C and w=1,最低+(最高-最低)*0.191),LINEDOT,COLORWHITE;
) J T. k% i8 w4 t1 L3 C1 rPARTLINE(C and w=1,最低+(最高-最低)*0.382),LINEDOT,COLORWHITE;
! r; J2 k/ ?# q* z' m& ]6 PPARTLINE(C and w<>3,最低+(最高-最低)*0.5),COLORGREEN;
, ~) j! N P2 Z+ lPARTLINE(C and w=1,最低+(最高-最低)*0.618),LINEDOT,COLORWHITE;
$ W3 e6 `$ a- K5 R% KPARTLINE(C and w=1,最低+(最高-最低)*0.809),LINEDOT,COLORWHITE;
Y1 z' a9 e9 x9 g7 X1 rDRAWTEXT(BARSCOUNT(C)=SYSPARAM(3) and w<>3,REF(最低,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'最低↓'),ALIGN2,COLORred;1 g% K* W: Q2 C& `7 {8 A
DRAWTEXT(BARSCOUNT(C)=SYSPARAM(3) and w<>3,REF(最高,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'最高↑'),ALIGN2,COLORYELLOW;
1 A% _% D2 S# {5 m7 ]8 j, X# ]$ W0 D
: W4 X' R3 ]1 I) S! a: sDRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.191)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.191↑'+NUMTOSTR(最低+(最高-最低)*0.191,2)),COLORWHITE;
) U1 X2 a( t) K+ J* eDRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.382)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.382↑'+NUMTOSTR(最低+(最高-最低)*0.382,2)),COLORWHITE;3 [; d) A5 {( C& @5 H6 t; c
DRAWTEXT(BARPOS=SYSPARAM(2) and w<>3,REF((最低+(最高-最低)*0.5)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM (2))),' 50% ↑'+NUMTOSTR(最低+(最高-最低)*0.5,2)),COLORGREEN;
/ i! I* V& @% f4 U/ h0 ^7 D: Y5 W& ODRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.618)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.618↑'+NUMTOSTR(最低+(最高-最低)*0.618,2)),COLORWHITE;
T) H; X4 e, r- d+ s1 q( wDRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.809)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.809↑'+NUMTOSTR(最低+(最高-最低)*0.809,2)),COLORWHITE;
" A* t4 L4 J! Y L5 B' S/ K8 e: P3 {, o: t5 R3 E" o3 C8 T
PARTLINE(C and w=2,最低+(最高-最低)*1/8),LINEDOT,Color0095BC;* Q9 y M7 M! T2 y# V
PARTLINE(C and w=2,最低+(最高-最低)*1/4),LINEDOT,Color0095BC;& F1 I. S4 @' Q' T
PARTLINE(C and w=2,最低+(最高-最低)*3/8),LINEDOT,Color0095BC;( l# |* s- P8 U9 K
PARTLINE(C and w=2,最低+(最高-最低)*5/8),LINEDOT,Color0095BC;# K: N+ z7 O# W* U% b" t; z
PARTLINE(C and w=2,最低+(最高-最低)*7/8),LINEDOT,Color0095BC;
& R2 h( y" O3 A7 T6 l3 sPARTLINE(C and w=2,最低+(最高-最低)*3/4),LINEDOT,Color0095BC;1 n' Z _" ?8 M6 u8 }7 x- b3 u
+ u& J* O4 E8 ~4 Q
DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*1/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 1/8↑'+NUMTOSTR(最低+(最高-最低)*1/8,2)),Color0095BC;
5 X% ]8 r9 W! a5 rDRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*1/4)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 1/4↑'+NUMTOSTR(最低+(最高-最低)*1/4,2)),Color0095BC;
# i; \: N6 B5 z/ cDRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*3/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 3/8↑'+NUMTOSTR(最低+(最高-最低)*3/8,2)),Color0095BC;( B# P8 \3 F# [; p' y* i; n
DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*5/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 5/8↑'+NUMTOSTR(最低+(最高-最低)*5/8,2)),Color0095BC;
* }% a" u5 R g z. z) D& M, {7 cDRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*7/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 7/8↑'+NUMTOSTR(最低+(最高-最低)*7/8,2)),Color0095BC;
* g7 d) Q% {% Y# z7 l Q" eDRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*3/4)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 3/4↑'+NUMTOSTR(最低+(最高-最低)*3/4,2)),Color0095BC;
Z7 h0 f% z H/ U
) x) X) I* ?* Y* s# E/ r( ]+ t# k
H( y* \ ^$ `. Y; c! Q9 d- q' s% g# W% r2 j! b" g) N" X
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);
% ~8 I$ {. I, I6 \# y) \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);
$ `& Q8 y5 m2 b' u v, @( iDRAWTEXT(G,L*0.997,'▲'),ALIGN1,Colorff00ff;6 x/ R7 K: u* ?! L D. I- w# D
DRAWTEXT(G,L,' ̄'),ALIGN1,Color00ff00;
4 y6 P: y" r+ z7 Z. \. Z- iDRAWTEXT(X,H*1.002,'▼'),ALIGN1,Color00ffff;0 M; F* V( z$ m3 ?$ P! w
DRAWTEXT(X,H,' ̄'),ALIGN1,Color00ffff; |1 c% `6 M1 l7 }6 e) \, ]
ED:=barslast(G);
: O0 S# S' m9 g1 y0 T7 wEF:=barslast(X);
6 T2 d) b8 x4 l0 V0 f0 b/ g/ n9 Q; l买入到卖出天数:ED,LINETHICK0,ColorFFFFFF; I: T0 H5 m _4 ^' D0 q' _
卖出到买入天数:EF,LINETHICK0,ColorFFFFFF; |
评分
-
1
查看全部评分
-
|