|
公式原码:
; h# O7 O4 z1 iR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
: {/ {4 h! I0 Z5 yK:=EMA(R,3);9 j* j0 ^9 c1 ?" k
D:=EMA(K,3);0 s; R9 t. m7 l' _0 i
一年十二倍:20,colorred;
7 f) E s/ H/ s( k陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
* y- l' W/ F6 A9 d7 ]8 d6 a- gN:=IF((陡峭度 > 0.35),6,65);
& k6 e k6 T7 ~4 b6 A3 H0 zVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 20070110));
2 o5 o) B$ L5 T! x7 ~; ~! uVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 20070110));
/ Q+ c9 P; M" S) X# `' u- e& r4 J/ a6 \赢利盘:=(WINNER(CLOSE))*(100);0 K @; \$ n u; y& c
赢利线:=FORCAST(赢利盘,7);
/ a2 c7 J$ D' V6 k! b9 v c9 |线:=(FORCAST(VAR1A,7))*((DATE < 20070110));- ~7 d1 P& c4 k8 m: f# G" ~8 R
满仓:=((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);
* {- ~1 w' L& X) R! x) CSTICKLINE(满仓,0,40,5,0),Color008000;
8 Y* T0 {5 G$ L0 W& F1 h- h" qDRAWTEXT(满仓,45,''满仓''),ColorWHITE;
. q. u0 s, `" t b$ ]9 I& ^; _轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);
7 l/ F- Z5 p/ I. ^+ U2 {STICKLINE(轻仓,20,D,4,1),ColorFF00FF;
* p% t- w/ ?$ B" g$ U7 v9 q3 F" zDRAWTEXT(轻仓,45,''轻仓''),ColorFF00FF;
+ Y9 ?0 P Q9 O s- W: T8 D出击:=CROSS(线,20) and IF((COUNT(CROSS(K,D),3) = 1) and (D < 40),1,(线 > D) or (K > D) and (D < 60)) and IF((N = 6),(赢利盘 < 70),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0);
2 z; Y5 U+ s4 ]% g! |4 M4 XSTICKLINE(出击,0,50,3,1),Color44BB00;# U0 _. t U; o/ P! J: N- v
DRAWTEXT(出击,55,''出击''),colorred;2 F3 ~/ z" k/ X' f- \; z1 x
进一:CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
5 o$ C$ J/ k! i, \' H5 n4 b进二:CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));: u6 q+ b$ P$ B2 J) t- w
低进:=IF(进一 and (D > 赢利线),进二,进一);
$ y- v6 n& k/ A7 c# m, DDRAWTEXT(低进,30,''低进''),ColorWHITE; E( y8 |% T- C$ j
STICKLINE(低进,20,30,3,1),Color000080;
, ~+ ]( C. l- r9 l3 g! EDRAWTEXT(进二,50,''高进''),Color800080;5 ~9 o& Q0 x v( ?. V* S3 B
STICKLINE(进二,30,50,3,1),coloryellow;1 p- w& I/ M, v q9 t. e% Z6 n$ i, e
狂喜:=(30)*(CROSS(VAR1,(-2)));- M5 f' W% c E/ t; |8 q, m7 D' w ?, C
STICKLINE(狂喜,0,20,3,1),coloryellow;
& Z0 o7 m9 U3 [9 NDRAWTEXT(狂喜,(-5),''要涨停''),coloryellow;
) f; c- q' f5 b& S1 H4 `狂喜过望:=(50)*((VAR1 = 0));
* ]2 ?/ |# a& }; R) q恐慌:=(20)*(VAR1 < -94);
! A4 K% C6 I5 B: J8 R! `! lSTICKLINE(恐慌,0,(-20),5,0),ColorC1C1C1;7 Z. f% y( f5 |& s: `" k4 t
DRAWTEXT(恐慌,(-25),''恐慌''),ColorC1C1C1;4 Q& D' E" i0 W& D
非常恐慌:=(-40)*(VAR1 = (-100)); : Z4 a" n3 }" R% }1 j7 C0 t1 n/ s+ E
STICKLINE(非常恐慌,0,(-40),7,1),Color800000;
' y6 P- h0 N, S: v/ O1 n; lDRAWTEXT(非常恐慌,(-45),''非常恐慌''),ColorGREEN;
7 n1 R0 Z7 e$ O# ?- f, p( @半仓:=(30)*(CROSS(VAR1,(-94)) and (COUNT(恐慌,5) > 0) and (N = REF(N,1)) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0));
7 n5 o& l7 C' ~2 h/ }STICKLINE(半仓,0,30,4,1),ColorFFFF00;; O1 N& Y) v0 P' d7 v
DRAWTEXT(半仓,35,''半仓''),ColorFFFF00;3 B+ |3 Z; H9 o3 ^6 K: h2 j
加仓:=(30)*(CROSS(K,20) and (COUNT(半仓,5) > 0));3 l7 }7 Q) \5 `- u( f. ? q
STICKLINE(加仓,0,20,6,1),Color808080;
R1 N0 |3 D+ GDRAWTEXT(加仓,25,''加仓''),Color808080;9 @) R* G( j& E. L5 V. Z
背离:=(COUNT(恐慌,2) > 0) and (CLOSE < REF(CLOSE,1)) and (VAR1 > REF(VAR1,1));$ h% e4 z# r* i0 F8 M: k$ B* s
DRAWICON(背离,0,1),ColorFFFFFF;
% w. W( P* O/ y) E7 M% B% {================================================================================================
2 n, M1 _; w, L: Q, v: l! G{一年十二倍--满仓选股 }
. W. W6 d9 m g% j" l- nR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
. o# u/ l* h; {& C( i( v! B1 A, xK:=EMA(R,3);
+ |. [- e3 W) {+ [. S, {D:=EMA(K,3);3 V! u7 ^! E! h6 N, L0 K$ E9 c- Z
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);- E% V0 ]" Y& H
N:=IF((陡峭度 > 0.35),6,65);
$ H" o% |! B9 D# z( T: qVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));3 P# E8 C. ?& f$ h* E
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
$ Z) z( ?" h ]+ b9 O赢利盘:=(WINNER(CLOSE))*(100);
1 Q' \ V4 T9 m5 L& B6 P9 Q赢利线:=FORCAST(赢利盘,7);
3 u9 E6 ~4 D T+ r l线:=(FORCAST(VAR1A,7))*((DATE < 30070110));, B& J' z- `5 ~+ C1 V( ?
((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);
4 ~! F2 V, f$ I0 U=================================================================================================
$ M) b' ~' ]+ g" s d, M; s{一年十二倍--低进选股 }
1 D2 b3 u0 D+ w- K+ p+ _. HR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);. `! K# T* N: k$ r
K:=EMA(R,3);
1 g9 y9 v* q' O) m" m7 ~D:=EMA(K,3);
; u; {, p {: D3 v' U陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
; N* B4 S' V. K1 n7 r' l6 R% F w9 h! SN:=IF((陡峭度 > 0.35),6,65);
6 B, }8 o) |4 h8 w$ YVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
3 e# @2 N, K$ S6 w( NVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
: c: a0 d) o. t赢利盘:=(WINNER(CLOSE))*(100);
8 R4 c1 S; w8 g x赢利线:=FORCAST(赢利盘,7);
1 z6 G$ F2 u# p! d9 F线:=(FORCAST(VAR1A,7))*((DATE < 30070110));* v, f. \' Z t
轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);
; v( h, ]$ [7 c6 [8 U出击:=CROSS(线,20) and IF((COUNT(CROSS(K,D),3) = 1) and (D < 40),1,(线 > D) or (K > D) and (D < 60)) and IF((N = 6),(赢利盘 < 70),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0);% i3 B6 R4 c7 M4 Q
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
) M( f1 s; o: T4 [进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
4 O" e1 r# I* _IF(进一 and (D > 赢利线),进二,进一);
8 h; r' H; g+ @: f( b( u================================================================================================7 \* F0 g; y$ W5 Y9 O) Z
{一年十二倍--高进选股 }
' _# u/ P' P! s7 UR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
1 U: W# U. |- g6 Y$ p* I% @K:=EMA(R,3);7 l6 q6 x9 k$ [& |7 }( E7 c5 U# u
D:=EMA(K,3);
4 ]( r) `6 h1 h. d" ]; Y: _/ e% u陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);6 M# U+ H+ {. K P) }
N:=IF((陡峭度 > 0.35),6,65);
" G$ X; `) z' K4 O! I1 kVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
* L6 [$ y! c6 XVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));1 h) X7 m, X \8 W) U
赢利盘:=(WINNER(CLOSE))*(100);
8 X4 A: U9 i" I3 T- s赢利线:=FORCAST(赢利盘,7);
% W, O5 [1 o W# U线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
1 P3 d0 b: o3 _/ e5 C6 ?0 a轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);8 y% X2 Q. w, [6 W6 D3 a& }
出击:=CROSS(线,20) and IF((COUNT(CROSS(K,D),3) = 1) and (D < 40),1,(线 > D) or (K > D) and (D < 60)) and IF((N = 6),(赢利盘 < 70),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0);
; r' R- c! W0 ]$ t进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);7 }9 m( U- d+ W2 B. n
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1)); c' z) x" K8 S. N: ^7 F% L
CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));, \+ M z- B4 e% H+ j2 Z! m2 N
================================================================================================================================% f0 s3 p3 t, s" o5 |; Z9 X
) e1 ^5 U7 w, c/ D9 s
{一年十二倍--要涨停选股 }7 q" x2 z" ?+ C# e1 `
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
; `% Z) J3 K/ x9 Y, fK:=EMA(R,3);
5 k7 p. p6 M* a: L- X7 sD:=EMA(K,3);
' F- ]/ P' P9 e陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
* \$ K( }& j8 I+ _7 [N:=IF((陡峭度 > 0.35),6,65);
% e7 ?& a% n" LVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
g+ H! c$ i6 R+ RVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));" A- Z8 ?( o1 E
赢利盘:=(WINNER(CLOSE))*(100);) n: n, K8 E! H0 J
赢利线:=FORCAST(赢利盘,7);
& @- s4 d8 G* X线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
4 _( \4 t; C( k4 T( K9 i. }; z轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);
1 f+ ?2 b8 H$ }8 j出击:=CROSS(线,20) and IF((COUNT(CROSS(K,D),3) = 1) and (D < 40),1,(线 > D) or (K > D) and (D < 60)) and IF((N = 6),(赢利盘 < 70),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0);1 x; K* q% Q% V$ \2 H$ D
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);2 u* J; i# K" \" y8 @1 [2 O2 r
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1)); |