|
|
求助把这个论坛里的飞狐公式修改一下,让KT交易师能正常使用。现在KT交易师不能显示黄金分割线和江恩8分线,多谢9 Q+ H& k$ C7 F' J$ C: v- E: D4 K( X
' X$ W& G! R' P. k0 {) L
7 A2 N' X3 |; i$ C; y
{黄金分割+江恩八分割 调整参数(K=1 为黄金分割;K=2为江恩八分线)}0 X% W/ L" v7 o3 `. U2 R8 W
input:w(2,1,3); ' t! d7 A" Z: b! A+ i
年:=MA(CLOSE,26);
! H7 |. z" o" H) m+ F# {, }STICKLINE(C>=年 AND C>=O,C,O,7,0),COLORRED;
0 p0 H+ K& J. A3 R q# N7 aSTICKLINE(C>=年 AND C>=O,H,L,0,0),COLORRED;
' X! e* U: j3 q# jSTICKLINE(C>=年 AND C<O,C,O,7,1),COLORRED;7 Q" v& V( h, {; i) ~" X( t6 Z
STICKLINE(C>=年 AND C<O,O,H,0,0),COLORRED;
! ], C8 h: I8 Y$ vSTICKLINE(C>=年 AND C<O,C,L,0,0),COLORRED; y. D) O' t" t% ?8 `: [; C
5 g+ n, |' C, L1 e8 V) hSTICKLINE(C<年 AND C>O,C,O,7,1),COLORffff00;
1 W9 G3 `: Q' T% h4 c, R7 \' ySTICKLINE(C<年 AND C<=O,C,O,7,0),COLORffff00;: E* W3 y0 O( u4 B3 s* ^
STICKLINE(C<年 AND C<=O,H,L,0,1),COLORffff00;2 ]7 @1 [4 H) M' U- ^
STICKLINE(C<年 AND C>O,C,H,0,1),COLORffff00;' D6 K A4 x1 e! C
STICKLINE(C<年 AND C>O,O,L,0,1),COLORffff00;+ o. O% U* {0 H
" w" }* N2 [9 f, F- @& o# h3 M) cu1:=sysparam(3);2 @0 \# [3 L+ I$ P! E9 N
u:=u1-sysparam(2)+1;& O! u* Z7 _) Y& l, H" G
hh:=hhv(H,u);
% Y" D, j8 r2 f8 [2 Vll:=llv(L,u);# P H4 P) W; y9 V7 Q
最高:=hh[u1],COLORYELLOW;
5 M) g: e+ F; w" ^3 UPARTLINE(C and w<>3,最高),COLORYELLOW;, X: v3 M( V1 F" C5 o1 s
最低:ll[u1],COLORred;
" E' X3 t: U' K! ?: n/ [5 E7 k! rPARTLINE(C and w<>3,最低),COLORred;7 H% ?% y/ v5 t$ r6 f6 V9 V4 D
PARTLINE(C and w=1,最低+(最高-最低)*0.191),LINEDOT,COLORWHITE;
- O- ]9 I% X; k6 b7 o. ~" wPARTLINE(C and w=1,最低+(最高-最低)*0.382),LINEDOT,COLORWHITE;7 q `" D$ W& K& F( n+ F* |. C' j: k
PARTLINE(C and w<>3,最低+(最高-最低)*0.5),COLORGREEN;$ ~' L, D6 o% V! `; W
PARTLINE(C and w=1,最低+(最高-最低)*0.618),LINEDOT,COLORWHITE;. A3 K: d" R7 g8 }6 g8 k
PARTLINE(C and w=1,最低+(最高-最低)*0.809),LINEDOT,COLORWHITE;% o7 f; N9 h5 r+ X
DRAWTEXT(BARSCOUNT(C)=SYSPARAM(3) and w<>3,REF(最低,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'最低↓'),ALIGN2,COLORred;
. A) p# C; X0 R! CDRAWTEXT(BARSCOUNT(C)=SYSPARAM(3) and w<>3,REF(最高,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'最高↑'),ALIGN2,COLORYELLOW;
# p4 a# d: J l! e2 H5 W$ { g
$ w5 n# i1 E) w; t: U: O: Y& k' hDRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.191)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.191↑'+NUMTOSTR(最低+(最高-最低)*0.191,2)),COLORWHITE;# v+ l6 `' a7 _$ M, p* F
DRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.382)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.382↑'+NUMTOSTR(最低+(最高-最低)*0.382,2)),COLORWHITE;
, k ]- c; n- |8 J. ~DRAWTEXT(BARPOS=SYSPARAM(2) and w<>3,REF((最低+(最高-最低)*0.5)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM (2))),' 50% ↑'+NUMTOSTR(最低+(最高-最低)*0.5,2)),COLORGREEN; G! B1 R5 V3 x6 J
DRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.618)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.618↑'+NUMTOSTR(最低+(最高-最低)*0.618,2)),COLORWHITE;8 s# J6 @( |' c# E4 t7 L; i
DRAWTEXT(BARPOS=SYSPARAM(2) and w=1,REF((最低+(最高-最低)*0.809)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'黄金 0.809↑'+NUMTOSTR(最低+(最高-最低)*0.809,2)),COLORWHITE;) q- q" M4 f) r! [0 H! w
+ h3 j0 o. |! k0 ]" z1 q) b0 ?PARTLINE(C and w=2,最低+(最高-最低)*1/8),LINEDOT,Color0095BC;; S; s' B/ X# j4 o7 m7 T
PARTLINE(C and w=2,最低+(最高-最低)*1/4),LINEDOT,Color0095BC;/ Y; x! P+ d8 `/ @% s
PARTLINE(C and w=2,最低+(最高-最低)*3/8),LINEDOT,Color0095BC;
3 Y a3 E) U- k8 PPARTLINE(C and w=2,最低+(最高-最低)*5/8),LINEDOT,Color0095BC;# f" O; c5 ]$ j" J+ c
PARTLINE(C and w=2,最低+(最高-最低)*7/8),LINEDOT,Color0095BC;
- C# o* E: y) rPARTLINE(C and w=2,最低+(最高-最低)*3/4),LINEDOT,Color0095BC;8 t* r) S3 m* w1 {; h
8 [& D! K7 _+ u2 w( O! TDRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*1/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 1/8↑'+NUMTOSTR(最低+(最高-最低)*1/8,2)),Color0095BC; A+ [9 x% |: H; f3 h
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 Q" H, q9 A" s0 @+ S
DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*3/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 3/8↑'+NUMTOSTR(最低+(最高-最低)*3/8,2)),Color0095BC;. I0 M+ ~6 K* i* _; j
DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*5/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 5/8↑'+NUMTOSTR(最低+(最高-最低)*5/8,2)),Color0095BC;
6 d2 h4 l4 l+ T4 d2 LDRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*7/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 7/8↑'+NUMTOSTR(最低+(最高-最低)*7/8,2)),Color0095BC;9 X$ G. n0 \7 ]
DRAWTEXT(BARPOS=SYSPARAM(2) and w=2,REF((最低+(最高-最低)*3/4)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 3/4↑'+NUMTOSTR(最低+(最高-最低)*3/4,2)),Color0095BC;
# T0 O/ j! _' b( Y5 g8 Y O' I7 O! ?" I/ e3 N/ }( K
2 v1 W1 y; V. a8 K1 X$ |7 h% C& [! E+ f! p
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);; u. B4 G/ c! p6 Q5 ]5 J
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 T, Z5 ]- A9 q% C HDRAWTEXT(G,L*0.997,'▲'),ALIGN1,Colorff00ff;1 e4 D* R$ W! H( c- v
DRAWTEXT(G,L,' ̄'),ALIGN1,Color00ff00;2 L; j0 ?% `& x5 l+ O3 f& c- \
DRAWTEXT(X,H*1.002,'▼'),ALIGN1,Color00ffff;
) P) {0 x6 f% ~! K; }: QDRAWTEXT(X,H,' ̄'),ALIGN1,Color00ffff;1 `. v+ L& L7 t0 D/ t) ?
ED:=barslast(G);
0 f2 J2 T0 V! o, U- O0 WEF:=barslast(X);3 r, C5 S7 q# V4 K
买入到卖出天数:ED,LINETHICK0,ColorFFFFFF;0 c$ ]8 w. h1 V. l2 {& W! t; o& I
卖出到买入天数:EF,LINETHICK0,ColorFFFFFF; |
评分
-
1
查看全部评分
-
|