|
|
求助把这个论坛里的飞狐公式修改一下,让KT交易师能正常使用。现在KT交易师不能显示黄金分割线和江恩8分线,多谢
. g; l) d9 q" @7 S3 p* |/ }1 H* t G1 d# }- p
% S, k5 R" [- n* C& P* C
{黄金分割+江恩八分割 调整参数(K=1 为黄金分割;K=2为江恩八分线)}
; T# d% m* {. ]3 a( Einput:w(2,1,3); 5 X" ~- _2 R4 [+ ~& E
年:=MA(CLOSE,26);
9 ?9 D; O L4 O1 l9 F% TSTICKLINE(C>=年 AND C>=O,C,O,7,0),COLORRED;5 X- n& {& j' @! ~2 w/ J9 g
STICKLINE(C>=年 AND C>=O,H,L,0,0),COLORRED;9 w2 ~1 S7 I8 z+ a
STICKLINE(C>=年 AND C<O,C,O,7,1),COLORRED;
, o! e( [- y9 ^. p) `STICKLINE(C>=年 AND C<O,O,H,0,0),COLORRED;
) L( z; d" |5 |( u: C' W! D1 ~0 \STICKLINE(C>=年 AND C<O,C,L,0,0),COLORRED;2 m. J, o1 s- M0 G5 C3 X4 @
& F+ j$ H7 L; s% j- |: rSTICKLINE(C<年 AND C>O,C,O,7,1),COLORffff00;
) m0 c" R/ r) M% d9 J7 h0 q, O+ c0 xSTICKLINE(C<年 AND C<=O,C,O,7,0),COLORffff00;' o+ W( Q$ q7 J+ B( ]/ v
STICKLINE(C<年 AND C<=O,H,L,0,1),COLORffff00;( @' W5 T p- s
STICKLINE(C<年 AND C>O,C,H,0,1),COLORffff00;
7 H! w5 t( R; L9 k! d/ s0 ~STICKLINE(C<年 AND C>O,O,L,0,1),COLORffff00;# I8 C; R: N; a; m
* p$ s) y' b. `9 a
u1:=sysparam(3);5 E' ?; f2 j `' b/ u
u:=u1-sysparam(2)+1;" h. A, n# p9 q ]4 Y1 w f3 t7 }
hh:=hhv(H,u);
- m; T4 G- Y1 E; d/ |6 nll:=llv(L,u);
9 y8 k+ b! v" m! q/ B3 Q2 Z# ^4 t最高:=hh[u1],COLORYELLOW;
' s" Z) Y, G& \+ a9 i$ I- C: fPARTLINE(C and w<>3,最高),COLORYELLOW;
/ |, H6 d6 f5 y) v1 [! \最低:ll[u1],COLORred;2 @1 ?& V) P/ `1 O1 |% A9 ^
PARTLINE(C and w<>3,最低),COLORred;* z+ ?( R4 q) }9 g i
PARTLINE(C and w=1,最低+(最高-最低)*0.191),LINEDOT,COLORWHITE;
- S- s# D- F1 C! i$ B2 {- @. LPARTLINE(C and w=1,最低+(最高-最低)*0.382),LINEDOT,COLORWHITE;3 P3 X/ d& m3 f& x$ g
PARTLINE(C and w<>3,最低+(最高-最低)*0.5),COLORGREEN;
0 n7 |. l0 {- e' rPARTLINE(C and w=1,最低+(最高-最低)*0.618),LINEDOT,COLORWHITE;- n5 W8 m [) Q* l% Y9 p- `* ?
PARTLINE(C and w=1,最低+(最高-最低)*0.809),LINEDOT,COLORWHITE;/ o+ ~8 s) V$ I9 W3 y6 A$ X+ X- h5 b& @
DRAWTEXT(BARSCOUNT(C)=SYSPARAM(3) and w<>3,REF(最低,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'最低↓'),ALIGN2,COLORred;
9 E- u0 \7 s$ s" f3 m4 ?$ ^. \DRAWTEXT(BARSCOUNT(C)=SYSPARAM(3) and w<>3,REF(最高,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'最高↑'),ALIGN2,COLORYELLOW;
" i! P2 @& B7 s1 `8 K9 J7 d/ Y( a$ b4 H
, C3 `& _! ^- B0 v, [+ ODRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.191)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.191↑'+NUMTOSTR(最低+(最高-最低)*0.191,2)),COLORWHITE;; M: |) e( q3 @! A! r+ 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;
5 a6 Y6 }4 f2 K8 |% u0 c8 N" ?DRAWTEXT(BARPOS=SYSPARAM(2) and w<>3,REF((最低+(最高-最低)*0.5)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM (2))),' 50% ↑'+NUMTOSTR(最低+(最高-最低)*0.5,2)),COLORGREEN;
* v8 c" Z/ I% J1 ZDRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.618)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.618↑'+NUMTOSTR(最低+(最高-最低)*0.618,2)),COLORWHITE;# j5 ^3 M! R9 ^9 x8 O
DRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.809)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.809↑'+NUMTOSTR(最低+(最高-最低)*0.809,2)),COLORWHITE;1 x7 r' P1 O6 W% t6 m4 D$ o6 c
3 B+ n% a' h2 f. R3 U! k* i3 N! i' ?
PARTLINE(C and w=2,最低+(最高-最低)*1/8),LINEDOT,Color0095BC;
( R- _1 E8 a& ^1 M: |PARTLINE(C and w=2,最低+(最高-最低)*1/4),LINEDOT,Color0095BC;' i, z$ u/ X$ j" p
PARTLINE(C and w=2,最低+(最高-最低)*3/8),LINEDOT,Color0095BC;
. D" v, c) f+ K+ c3 Y- [+ V! \0 h6 zPARTLINE(C and w=2,最低+(最高-最低)*5/8),LINEDOT,Color0095BC;7 J( a- V8 a8 O/ ~9 ~" W
PARTLINE(C and w=2,最低+(最高-最低)*7/8),LINEDOT,Color0095BC;4 C0 h9 j! R' b" b3 `/ [" k
PARTLINE(C and w=2,最低+(最高-最低)*3/4),LINEDOT,Color0095BC;" U' S& b. C: U8 v
6 q5 R; [* W" t9 T% JDRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*1/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 1/8↑'+NUMTOSTR(最低+(最高-最低)*1/8,2)),Color0095BC;
2 K. a$ K, N. g, t* D- B) `DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*1/4)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 1/4↑'+NUMTOSTR(最低+(最高-最低)*1/4,2)),Color0095BC;' `8 V% n; M0 k
DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*3/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 3/8↑'+NUMTOSTR(最低+(最高-最低)*3/8,2)),Color0095BC;& F' v' ]7 L$ g3 ?
DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*5/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 5/8↑'+NUMTOSTR(最低+(最高-最低)*5/8,2)),Color0095BC;
" B& ?4 v$ H7 v7 | d' YDRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*7/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 7/8↑'+NUMTOSTR(最低+(最高-最低)*7/8,2)),Color0095BC;
; w) k: M" e' mDRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*3/4)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 3/4↑'+NUMTOSTR(最低+(最高-最低)*3/4,2)),Color0095BC;' n( r. L" h# ]# |4 p6 G1 ?
2 X, Y1 k2 ]+ n# s& g! \. J
- u% z+ R- s6 E8 [! H1 o2 g
) C5 c$ g9 p" l) RG:=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);
" v/ i* P) h+ O% c- wX:=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);* S; s4 n) d L4 \; t
DRAWTEXT(G,L*0.997,'▲'),ALIGN1,Colorff00ff;2 ?! N6 M# i; |! Z
DRAWTEXT(G,L,' ̄'),ALIGN1,Color00ff00;
7 M! l, J5 }6 |8 _2 P- }/ }, ]( n% [$ qDRAWTEXT(X,H*1.002,'▼'),ALIGN1,Color00ffff;
9 W# u! P$ n0 e |7 i+ JDRAWTEXT(X,H,' ̄'),ALIGN1,Color00ffff;
6 Q8 n7 g! t; M5 J: p1 v- D8 e; SED:=barslast(G);
% U# ^; N& I6 r' U/ OEF:=barslast(X);
! O, ]1 n6 q5 H1 M买入到卖出天数:ED,LINETHICK0,ColorFFFFFF;
+ q: f* ?4 e+ ?) y; j& W2 \卖出到买入天数:EF,LINETHICK0,ColorFFFFFF; |
评分
-
1
查看全部评分
-
|