公式原码:
! q- A; f3 S( h. M/ [- g% nR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
4 x4 Z" T2 K2 Y5 x6 IK:=EMA(R,3);
U, R3 F( o, f1 d% O$ |D:=EMA(K,3);5 y' S4 P" r+ n v+ u; Q
一年十二倍:20,colorred;
* t( R. s7 O; y) D" ?4 t陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
( Y& E1 h7 ~" M9 m# MN:=IF((陡峭度 > 0.35),6,65);
$ j* z) }& G. I) ^! y( RVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 20070110));
1 N4 S' W a4 r9 v9 ^% i; eVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 20070110));: W4 I4 j; n( ~. u0 h n
赢利盘:=(WINNER(CLOSE))*(100);
# G0 Z* V1 W C L& c/ d赢利线:=FORCAST(赢利盘,7);8 {) i9 h( a" r8 }; ~
线:=(FORCAST(VAR1A,7))*((DATE < 20070110));( T2 u$ `( C- G4 P
满仓:=((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);4 |. V- C% W1 m# {, W+ v8 i% r
STICKLINE(满仓,0,40,5,0),Color008000;+ h8 u9 |' t; Q3 c; ^) e( n7 w. Y
DRAWTEXT(满仓,45,''满仓''),ColorWHITE;* ]0 @" P ^8 E
轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);& `/ B, O+ x8 x" I5 q& s
STICKLINE(轻仓,20,D,4,1),ColorFF00FF;8 c" v! R! y* E7 x# z
DRAWTEXT(轻仓,45,''轻仓''),ColorFF00FF;% p8 s, ^4 q$ V" c
出击:=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);" u* a, S. f& G) j- J( W, S
STICKLINE(出击,0,50,3,1),Color44BB00;5 }" D. T8 c6 A: H5 ?$ r
DRAWTEXT(出击,55,''出击''),colorred;
, q5 g% a: c: I z$ L进一:CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);/ l/ V" u% `2 p+ m% ~- v$ M' ]9 V
进二:CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));6 m% L( _% p% W2 b
低进:=IF(进一 and (D > 赢利线),进二,进一);. W8 h+ c2 z5 i& B5 [
DRAWTEXT(低进,30,''低进''),ColorWHITE;' z: t6 }- ^* O* M, y
STICKLINE(低进,20,30,3,1),Color000080;
4 J1 R( h! y# K7 {1 KDRAWTEXT(进二,50,''高进''),Color800080;! A/ y1 [$ r# c1 m
STICKLINE(进二,30,50,3,1),coloryellow;
) ~7 d; D' t! f$ ]% o) X& p狂喜:=(30)*(CROSS(VAR1,(-2)));
# a! ]8 `3 M" g. z, B7 eSTICKLINE(狂喜,0,20,3,1),coloryellow;- S- x3 o0 T- T0 X, T4 R' }
DRAWTEXT(狂喜,(-5),''要涨停''),coloryellow;
/ f2 M) r9 e- j( p狂喜过望:=(50)*((VAR1 = 0));& Y' T$ U: V0 \; r! b0 p. f
恐慌:=(20)*(VAR1 < -94); r! D( l; B; F! j# D) N
STICKLINE(恐慌,0,(-20),5,0),ColorC1C1C1;& E% b3 J5 G; p8 z9 e
DRAWTEXT(恐慌,(-25),''恐慌''),ColorC1C1C1;7 o9 X' N6 T& ]- r- ]7 s6 g2 ^, ~
非常恐慌:=(-40)*(VAR1 = (-100)); + T* l% z; \7 P+ ^0 p3 w
STICKLINE(非常恐慌,0,(-40),7,1),Color800000;
* O$ V# Y4 ~: `0 g/ L% C! |+ T3 mDRAWTEXT(非常恐慌,(-45),''非常恐慌''),ColorGREEN;' ~& W- ~9 u4 {6 T& z+ b
半仓:=(30)*(CROSS(VAR1,(-94)) and (COUNT(恐慌,5) > 0) and (N = REF(N,1)) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0));1 K" u. N% b* m5 K
STICKLINE(半仓,0,30,4,1),ColorFFFF00;0 a5 s( ~! o# @# T$ N% ?: a' @) W
DRAWTEXT(半仓,35,''半仓''),ColorFFFF00;
+ v1 A0 f) d- [( C: \加仓:=(30)*(CROSS(K,20) and (COUNT(半仓,5) > 0));
) v% r* F) @1 E4 b0 _STICKLINE(加仓,0,20,6,1),Color808080;- S/ d; O9 E9 j* x) Y$ V+ v
DRAWTEXT(加仓,25,''加仓''),Color808080;4 r( H# Q' H: H3 J) [/ R
背离:=(COUNT(恐慌,2) > 0) and (CLOSE < REF(CLOSE,1)) and (VAR1 > REF(VAR1,1));
" [. z! @' J7 p9 O3 sDRAWICON(背离,0,1),ColorFFFFFF;' a0 E7 b7 E$ y* C. Q
================================================================================================/ M2 K2 n/ s( z( I
{一年十二倍--满仓选股 }
$ m$ s- ]) F' Z6 x$ @+ f1 G; K) iR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
$ ^% ~1 \2 G& ?5 s1 Y# |/ lK:=EMA(R,3);& p" `! e7 H7 p
D:=EMA(K,3);
4 x( }* l" v& p" t9 L陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
3 U6 F) l/ h. q3 f3 u$ c% _N:=IF((陡峭度 > 0.35),6,65);5 R/ r/ ?1 J# E9 @% }
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));8 h# ~: r9 h; f5 G2 X9 R4 U8 D
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));/ ~* Q# o5 }: n) n2 z. s# W |. V. X
赢利盘:=(WINNER(CLOSE))*(100);) O9 }6 a. e/ A2 C
赢利线:=FORCAST(赢利盘,7);
8 ?! ]0 r/ e5 f' [( x线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
7 W' k1 m9 e6 p((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);' ~6 b3 t9 j- H6 i2 @- h1 {
=================================================================================================
7 G, \; R: D( K{一年十二倍--低进选股 } r, n6 N+ e# Z7 k8 |4 k- D4 w
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
; y/ ]0 z; S; @* E( kK:=EMA(R,3);7 J& v* r5 C& i3 u" p6 }/ y) D
D:=EMA(K,3);
8 m) ~' x$ n9 x% E* S陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
# ^6 H* _* \- B8 @2 u. W W4 tN:=IF((陡峭度 > 0.35),6,65);
5 T. E* g2 R \. c6 p& w% _VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
5 ?! M' G: l; k: L5 {7 gVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
' y" I4 v1 h; N' h5 Z M# K赢利盘:=(WINNER(CLOSE))*(100);* ^; x/ m( ]0 Y! @. W( p- b
赢利线:=FORCAST(赢利盘,7);
: I4 X. q H; |+ _% O线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
9 ^1 Q2 _/ K! x8 E轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);
j! H, P3 T9 @出击:=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);
% B3 t- d- y- X) p- w; ~: F% q" A进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);/ r& O1 _5 _. N: X- `5 S$ S
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
. b: A. S1 C5 r( l7 o* O- h1 s3 Y& MIF(进一 and (D > 赢利线),进二,进一);
/ Z6 o5 U6 I3 q5 ]. K/ U================================================================================================
1 S7 Q( X) q7 Q{一年十二倍--高进选股 }
. Q" E& |- }1 c, P2 a% S# |R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
8 R. W( S- j1 U/ Z9 |K:=EMA(R,3);
" ^ k! V2 R! Y# I* Q; Y' x5 A! R+ b0 mD:=EMA(K,3);
+ ]/ L' S' u# Y4 I x, n2 N陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);* ~& k# m% u0 S0 {4 ?+ T
N:=IF((陡峭度 > 0.35),6,65);, P% O' }8 i1 B
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
8 y1 y+ L9 Z* P5 j7 j. ]; YVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));5 q# ?9 F; _% S) ~
赢利盘:=(WINNER(CLOSE))*(100);! K- U8 t ~$ l0 v. s( _3 l
赢利线:=FORCAST(赢利盘,7);* {( S5 I3 {# a! P7 E
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));2 k0 h0 y8 A7 k7 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);" I, a& x$ N3 ^$ Y! v- g% t
出击:=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);: Y7 n4 g, }8 _/ P% i9 x
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);5 l) s' V( M( q' q5 {
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
& v0 ^9 t* Y/ b6 _7 z# P! |CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));6 B1 r( u5 E0 V$ v% K
================================================================================================================================
; F r/ ^( t6 m
' n8 G4 B" @/ b2 z/ O, k9 j{一年十二倍--要涨停选股 }
" E: p; |4 z& ~9 h3 PR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);2 E s( i F3 D0 J; {3 S2 g
K:=EMA(R,3);: s Y8 ^8 p* F _9 x2 W0 Z% J I
D:=EMA(K,3);
; r3 `' {5 b0 O) q陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);# ^+ J/ b- ]3 p
N:=IF((陡峭度 > 0.35),6,65);
8 B! [. q+ T4 V8 H8 ^2 kVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));7 _: k( G9 l5 J0 q
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
7 w' I0 V1 \, u% q; ~/ [6 y" R赢利盘:=(WINNER(CLOSE))*(100);! ~& @8 {% C9 `' U% R: d; }1 o7 b
赢利线:=FORCAST(赢利盘,7);1 m8 k+ H, @0 c) m$ M3 E+ G" o
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
. w8 n* T$ L( w" g$ v" 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);4 @. `' n' g9 b: N
出击:=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);
$ z) r# T; g4 f进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);4 {* g2 T* u7 ^; s
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1)); |