求助把这个论坛里的飞狐公式修改一下,让KT交易师能正常使用。现在KT交易师不能显示黄金分割线和江恩8分线,多谢. h$ p O; ?6 U) ]% l8 }
$ ?+ c7 t( N5 ~7 n
$ N( N& I/ @; r+ w c8 r8 r
{黄金分割+江恩八分割 调整参数(K=1 为黄金分割;K=2为江恩八分线)}
) X, D, z* U' W9 I" Einput:w(2,1,3); 7 w9 {$ i! u. \9 y
年:=MA(CLOSE,26);
0 z" Y N7 J( N) \( XSTICKLINE(C>=年 AND C>=O,C,O,7,0),COLORRED;" [! O( o; W# N4 _' d! c
STICKLINE(C>=年 AND C>=O,H,L,0,0),COLORRED;
, o. x+ u" s4 F# K jSTICKLINE(C>=年 AND C<O,C,O,7,1),COLORRED;
5 b* i2 n x$ GSTICKLINE(C>=年 AND C<O,O,H,0,0),COLORRED;
0 S, {; \0 R" X0 l( b7 t8 [, |$ aSTICKLINE(C>=年 AND C<O,C,L,0,0),COLORRED;
7 B4 r5 l2 O+ l( t$ g9 P, b6 n& Y5 i5 O/ I) D# c9 |
STICKLINE(C<年 AND C>O,C,O,7,1),COLORffff00;3 h( G- U( M, p/ t+ z) `# ^# C5 d! w
STICKLINE(C<年 AND C<=O,C,O,7,0),COLORffff00;- e2 D7 E+ u, P- l1 ?3 N
STICKLINE(C<年 AND C<=O,H,L,0,1),COLORffff00;8 l. W+ ^" y: `1 D5 Q9 \
STICKLINE(C<年 AND C>O,C,H,0,1),COLORffff00;
* G5 G5 i- C! V& v7 j8 X$ nSTICKLINE(C<年 AND C>O,O,L,0,1),COLORffff00;
' P& @0 f& r$ L! A9 P$ c9 u t% X' ^; a4 {
u1:=sysparam(3);
+ T4 D, S* ^/ F, P2 @, l( Au:=u1-sysparam(2)+1;
" L+ n8 N: Y2 f% [$ K' F) H/ Ghh:=hhv(H,u);
9 u: B" W2 ]# }6 l: m. M5 v1 {ll:=llv(L,u);8 ]7 x1 K: d6 h* o0 b
最高:=hh[u1],COLORYELLOW;5 b& X. D& J- ^2 v! `( ?. p
PARTLINE(C and w<>3,最高),COLORYELLOW;
1 r0 W4 d$ F$ Z3 B% s最低:ll[u1],COLORred;% n, e/ J3 S- I( j7 q2 n: |
PARTLINE(C and w<>3,最低),COLORred;
* ]1 ~- B7 v+ u5 Y2 ZPARTLINE(C and w=1,最低+(最高-最低)*0.191),LINEDOT,COLORWHITE;
, ?3 Z- w' n* p) X. ?4 Z) F' [PARTLINE(C and w=1,最低+(最高-最低)*0.382),LINEDOT,COLORWHITE;, d; i6 l* L, M8 P9 i4 W- p
PARTLINE(C and w<>3,最低+(最高-最低)*0.5),COLORGREEN;
% h, J! y( a+ v$ `. F2 T8 F" fPARTLINE(C and w=1,最低+(最高-最低)*0.618),LINEDOT,COLORWHITE;( O; l* u7 v3 B% O5 c* y
PARTLINE(C and w=1,最低+(最高-最低)*0.809),LINEDOT,COLORWHITE;8 B3 {. E1 m. c' o
DRAWTEXT(BARSCOUNT(C)=SYSPARAM(3) and w<>3,REF(最低,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'最低↓'),ALIGN2,COLORred;* Q7 U2 o, E; c! z
DRAWTEXT(BARSCOUNT(C)=SYSPARAM(3) and w<>3,REF(最高,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'最高↑'),ALIGN2,COLORYELLOW;
5 E9 l; E0 \; D' r1 l* \! K. S( M6 U+ K9 e8 M8 ^) F$ V" S( }0 j/ R
DRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.191)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.191↑'+NUMTOSTR(最低+(最高-最低)*0.191,2)),COLORWHITE;
3 d* @4 ~7 y6 E5 Z; @DRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.382)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.382↑'+NUMTOSTR(最低+(最高-最低)*0.382,2)),COLORWHITE;% P1 P2 p( T" E
DRAWTEXT(BARPOS=SYSPARAM(2) and w<>3,REF((最低+(最高-最低)*0.5)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM (2))),' 50% ↑'+NUMTOSTR(最低+(最高-最低)*0.5,2)),COLORGREEN;
/ t3 M8 _8 N: YDRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.618)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.618↑'+NUMTOSTR(最低+(最高-最低)*0.618,2)),COLORWHITE;. A4 S8 ^- ?; @1 I* j, ]9 {
DRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.809)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.809↑'+NUMTOSTR(最低+(最高-最低)*0.809,2)),COLORWHITE;
: [* W0 J3 j$ |* B3 j1 [4 B4 i$ m* g& m5 w' X* M, J; ?2 E, a$ q6 u' B( \
PARTLINE(C and w=2,最低+(最高-最低)*1/8),LINEDOT,Color0095BC;
1 r- p) W( G5 h6 e& c# |+ WPARTLINE(C and w=2,最低+(最高-最低)*1/4),LINEDOT,Color0095BC;4 b- Y& Z' d5 N, G% D9 u4 I, m
PARTLINE(C and w=2,最低+(最高-最低)*3/8),LINEDOT,Color0095BC;# `$ i/ K* I* J
PARTLINE(C and w=2,最低+(最高-最低)*5/8),LINEDOT,Color0095BC;
6 j3 l! M2 V9 @4 M) q; p! SPARTLINE(C and w=2,最低+(最高-最低)*7/8),LINEDOT,Color0095BC;
$ c- Z9 t5 a& D5 Z& XPARTLINE(C and w=2,最低+(最高-最低)*3/4),LINEDOT,Color0095BC;- B. S/ ?$ c' }1 q! n
( u% U5 Z% I7 u7 _
DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*1/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 1/8↑'+NUMTOSTR(最低+(最高-最低)*1/8,2)),Color0095BC;
$ r+ Z& t0 ^/ s# w/ k! O: y. h1 yDRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*1/4)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 1/4↑'+NUMTOSTR(最低+(最高-最低)*1/4,2)),Color0095BC;$ i, k" N' ~% U8 {/ d3 Z
DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*3/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 3/8↑'+NUMTOSTR(最低+(最高-最低)*3/8,2)),Color0095BC; y" y$ F; u, T, G# c2 U' u
DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*5/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 5/8↑'+NUMTOSTR(最低+(最高-最低)*5/8,2)),Color0095BC;1 k" h/ Q( l, J
DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*7/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 7/8↑'+NUMTOSTR(最低+(最高-最低)*7/8,2)),Color0095BC;
: u0 U+ q. [4 p7 MDRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*3/4)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 3/4↑'+NUMTOSTR(最低+(最高-最低)*3/4,2)),Color0095BC;+ f3 C: r1 b" J; Z
5 [2 e3 r r- X6 v
, V, C6 O! }: L# E* M$ z( G9 g
8 `- L$ R5 G) Z9 l8 n9 g% k7 JG:=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);
6 S0 e7 d) Q+ T1 j5 @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);
1 J( T# ?% e$ Q" yDRAWTEXT(G,L*0.997,'▲'),ALIGN1,Colorff00ff;
& K- n d% r8 `7 q, |2 ?DRAWTEXT(G,L,' ̄'),ALIGN1,Color00ff00;
" h, M* \! p: Z2 TDRAWTEXT(X,H*1.002,'▼'),ALIGN1,Color00ffff;
. O: ^' [- n; E9 x6 aDRAWTEXT(X,H,' ̄'),ALIGN1,Color00ffff;
& N7 o% `: d' b* f& Y' tED:=barslast(G);
' A& P- t) v' f) |EF:=barslast(X);
4 T0 R1 O5 f* r买入到卖出天数:ED,LINETHICK0,ColorFFFFFF;
8 I& Z$ {! N4 n2 x! T* i卖出到买入天数:EF,LINETHICK0,ColorFFFFFF; |