|
|
求助把这个论坛里的飞狐公式修改一下,让KT交易师能正常使用。现在KT交易师不能显示黄金分割线和江恩8分线,多谢9 S$ x- d: i1 |: J- C; a
3 v$ b4 X9 u; G6 L4 K" X9 u
) t' U. J1 D3 @# O* ]( o* v{黄金分割+江恩八分割 调整参数(K=1 为黄金分割;K=2为江恩八分线)}
9 P3 p4 O( ?: Y; f, s6 a8 j8 ginput:w(2,1,3); $ y* y G5 S$ A1 C' l. u
年:=MA(CLOSE,26);
" Z3 {3 K7 ^2 V- x2 ?" L7 LSTICKLINE(C>=年 AND C>=O,C,O,7,0),COLORRED;
1 ~8 b3 w: r9 q3 d$ @: U! LSTICKLINE(C>=年 AND C>=O,H,L,0,0),COLORRED;. c; D3 y$ g, V! Z6 a
STICKLINE(C>=年 AND C<O,C,O,7,1),COLORRED;
/ X0 h8 k) c) s, z3 Z" a) q. d7 lSTICKLINE(C>=年 AND C<O,O,H,0,0),COLORRED;
: V: D' y2 C3 O% E hSTICKLINE(C>=年 AND C<O,C,L,0,0),COLORRED;/ J4 p; r3 U h2 n
/ e* `* ]( X; X3 |! G
STICKLINE(C<年 AND C>O,C,O,7,1),COLORffff00;) J/ o- t9 [8 N# Z
STICKLINE(C<年 AND C<=O,C,O,7,0),COLORffff00;5 X# e& n% b8 W7 _( d' A v
STICKLINE(C<年 AND C<=O,H,L,0,1),COLORffff00;+ U, b" F( M6 ~" ?
STICKLINE(C<年 AND C>O,C,H,0,1),COLORffff00;) E. _+ X. q3 D) Z! T1 ^- e; e
STICKLINE(C<年 AND C>O,O,L,0,1),COLORffff00;
4 x& m* P/ J0 A# e% \& C
* X- c* M$ @# y7 ?u1:=sysparam(3);
, S' L1 y' Q8 i2 Q" y& D& Nu:=u1-sysparam(2)+1;/ z3 V7 N6 j$ f8 p$ p# v S
hh:=hhv(H,u);/ B+ {4 Y% h' a: b
ll:=llv(L,u);
. y' O/ ^7 {# O) m0 B( }& F( D最高:=hh[u1],COLORYELLOW;
' b J, `# D& l3 v5 n4 ePARTLINE(C and w<>3,最高),COLORYELLOW;
5 G S+ I* O$ N W最低:ll[u1],COLORred;
0 H$ h- `( G" y, f9 D' APARTLINE(C and w<>3,最低),COLORred;
% e$ J }) d! W# m9 T: Y) ]7 iPARTLINE(C and w=1,最低+(最高-最低)*0.191),LINEDOT,COLORWHITE;0 d) [1 Q; \2 R0 ~/ ^ Q
PARTLINE(C and w=1,最低+(最高-最低)*0.382),LINEDOT,COLORWHITE;0 l9 y% L% j) ?3 C" Y4 b
PARTLINE(C and w<>3,最低+(最高-最低)*0.5),COLORGREEN;) `5 I9 Y+ D: _2 z9 X8 r) l3 t; w8 n
PARTLINE(C and w=1,最低+(最高-最低)*0.618),LINEDOT,COLORWHITE;
! Y7 T. F, I0 d# LPARTLINE(C and w=1,最低+(最高-最低)*0.809),LINEDOT,COLORWHITE;) Z7 i1 {+ _0 g9 D$ S3 w
DRAWTEXT(BARSCOUNT(C)=SYSPARAM(3) and w<>3,REF(最低,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'最低↓'),ALIGN2,COLORred;, c7 I6 y# q' k9 Q0 t
DRAWTEXT(BARSCOUNT(C)=SYSPARAM(3) and w<>3,REF(最高,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'最高↑'),ALIGN2,COLORYELLOW;0 l+ F7 C0 [9 c# F( e& @: e
6 ]" j% ?* f+ _% k% W5 j5 F. o9 JDRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.191)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.191↑'+NUMTOSTR(最低+(最高-最低)*0.191,2)),COLORWHITE;0 `- `$ x. M! P8 E: R7 C$ 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;
3 j" e5 g7 R0 R* a# QDRAWTEXT(BARPOS=SYSPARAM(2) and w<>3,REF((最低+(最高-最低)*0.5)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM (2))),' 50% ↑'+NUMTOSTR(最低+(最高-最低)*0.5,2)),COLORGREEN;7 |, k0 M+ p! i. B4 U
DRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.618)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.618↑'+NUMTOSTR(最低+(最高-最低)*0.618,2)),COLORWHITE;' k+ \) j6 J 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;
9 S- o$ S" t( B$ L4 g3 g! J4 }5 u4 s+ o& }# V! Y: B A
PARTLINE(C and w=2,最低+(最高-最低)*1/8),LINEDOT,Color0095BC;
- }. ]: Z! F) V9 g, z2 F; IPARTLINE(C and w=2,最低+(最高-最低)*1/4),LINEDOT,Color0095BC;3 f1 N5 N" J7 j6 d
PARTLINE(C and w=2,最低+(最高-最低)*3/8),LINEDOT,Color0095BC;: S. H) K. v$ P% w$ E6 |
PARTLINE(C and w=2,最低+(最高-最低)*5/8),LINEDOT,Color0095BC;
$ E( o# P2 @) ^7 wPARTLINE(C and w=2,最低+(最高-最低)*7/8),LINEDOT,Color0095BC;
9 W% ]4 w8 k% a0 U' y s2 |PARTLINE(C and w=2,最低+(最高-最低)*3/4),LINEDOT,Color0095BC;' y! K. `$ r) \. p( i* r" E9 | h
! m: _9 J. N( I" e: 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;
& y# t: W0 i1 I6 L( S |DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*1/4)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 1/4↑'+NUMTOSTR(最低+(最高-最低)*1/4,2)),Color0095BC;- b7 s: P# [ O. J, K, N$ l
DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*3/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 3/8↑'+NUMTOSTR(最低+(最高-最低)*3/8,2)),Color0095BC;
9 \3 D7 @* ?; n5 r) O0 n1 MDRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*5/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 5/8↑'+NUMTOSTR(最低+(最高-最低)*5/8,2)),Color0095BC;
! U/ |5 Z% L9 i/ h. x* Z2 f2 ^5 ]DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*7/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 7/8↑'+NUMTOSTR(最低+(最高-最低)*7/8,2)),Color0095BC;4 z n4 p0 ?: v; v
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 o, O w- O3 A8 P8 s, x1 P) G7 g( H# U4 e
9 L; }# j' k: s" j% d6 o: L4 z' W4 K0 ]$ 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);
" C! ?5 C) \5 j, C" i4 [9 ^3 FX:=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);
' b! Z9 Z. T$ G3 QDRAWTEXT(G,L*0.997,'▲'),ALIGN1,Colorff00ff;
4 k# w' i% h6 h% EDRAWTEXT(G,L,' ̄'),ALIGN1,Color00ff00;
+ z0 _2 T6 u6 H* eDRAWTEXT(X,H*1.002,'▼'),ALIGN1,Color00ffff;
* b; @3 S& M. h/ P) GDRAWTEXT(X,H,' ̄'),ALIGN1,Color00ffff;0 m/ b* B3 s; _* D0 o3 }
ED:=barslast(G);
$ O5 C9 e+ j2 t9 E. @8 T6 H4 |EF:=barslast(X);6 c$ y! v, `2 |! ?2 a& p/ l
买入到卖出天数:ED,LINETHICK0,ColorFFFFFF;
( q) T7 Q3 n1 ^% L3 D0 @; X卖出到买入天数:EF,LINETHICK0,ColorFFFFFF; |
评分
-
1
查看全部评分
-
|