|
公式原码:
7 t# @, ?0 y6 O0 Q6 ^R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
- v4 R5 g$ D! k A3 p4 \K:=EMA(R,3);
. C- j, A+ Q) C: l. {. YD:=EMA(K,3);
; h. e2 I: I" a& j j$ o$ V6 u一年十二倍:20,colorred;
+ Q, q& T9 c% M/ k; g8 r# h陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
/ d' B% u5 l' H4 M* L3 [* a- dN:=IF((陡峭度 > 0.35),6,65);
n8 f7 ^% J) |8 EVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 20070110));" l \) }1 F" t1 K: s a
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 20070110));$ O2 D# `1 i/ ]. J1 h% i
赢利盘:=(WINNER(CLOSE))*(100);
8 G% }7 R( E- Y$ S1 Z赢利线:=FORCAST(赢利盘,7); U% ~; V; {$ |1 u6 ^
线:=(FORCAST(VAR1A,7))*((DATE < 20070110));
" L- z/ e7 d6 Z- R3 z! _' ]5 T满仓:=((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);
2 u# c i+ d4 _3 z' I+ ~STICKLINE(满仓,0,40,5,0),Color008000;# I' T% x, @3 Q+ \5 Q
DRAWTEXT(满仓,45,''满仓''),ColorWHITE;
7 T h# Y3 l- b8 K5 ]3 W( E- j轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);
' x) f/ X0 W5 G& HSTICKLINE(轻仓,20,D,4,1),ColorFF00FF;
6 w; r# }$ e- k# }5 WDRAWTEXT(轻仓,45,''轻仓''),ColorFF00FF;5 K6 S) i) \8 j/ u K/ p+ V
出击:=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' I1 A* S# l, T) Y
STICKLINE(出击,0,50,3,1),Color44BB00;
5 Q2 e8 i9 G, H1 q& o5 rDRAWTEXT(出击,55,''出击''),colorred;8 {; r' {8 x, b H- R& m- I9 ]' C
进一:CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
`) ?" ?6 \' z进二:CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
, Y" b0 }+ |( G8 a% {低进:=IF(进一 and (D > 赢利线),进二,进一);9 U0 q/ H0 P8 G% J
DRAWTEXT(低进,30,''低进''),ColorWHITE;* g+ S8 R( D3 w
STICKLINE(低进,20,30,3,1),Color000080;. \: p+ B0 J @5 ?: S
DRAWTEXT(进二,50,''高进''),Color800080;
9 |& _( E) J* K1 e6 w) B8 O6 _7 uSTICKLINE(进二,30,50,3,1),coloryellow;
4 T7 I+ M0 v6 I狂喜:=(30)*(CROSS(VAR1,(-2)));- m) @) u: ], P( [
STICKLINE(狂喜,0,20,3,1),coloryellow;0 o/ Z( c/ |% C3 T
DRAWTEXT(狂喜,(-5),''要涨停''),coloryellow;
( o. `8 J2 B+ W狂喜过望:=(50)*((VAR1 = 0));
% ~# Q2 p% s& M" O2 ?恐慌:=(20)*(VAR1 < -94);
$ l4 k) ~9 O$ X! y) T% CSTICKLINE(恐慌,0,(-20),5,0),ColorC1C1C1;. z2 k5 p0 S1 y- g/ ?
DRAWTEXT(恐慌,(-25),''恐慌''),ColorC1C1C1;
( |" d9 W: t1 l% d. r& k3 }7 X& P非常恐慌:=(-40)*(VAR1 = (-100)); ! U' t' ~, e) z! t
STICKLINE(非常恐慌,0,(-40),7,1),Color800000;2 [* l9 L, ~4 I4 P/ N
DRAWTEXT(非常恐慌,(-45),''非常恐慌''),ColorGREEN;
6 N9 {3 _1 S: G3 i8 o5 R6 X半仓:=(30)*(CROSS(VAR1,(-94)) and (COUNT(恐慌,5) > 0) and (N = REF(N,1)) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0)); q$ w( y( q( t# v& }
STICKLINE(半仓,0,30,4,1),ColorFFFF00;+ |5 E! s% B' ]( s, I6 [
DRAWTEXT(半仓,35,''半仓''),ColorFFFF00;
$ m9 F) B$ n2 m" Y加仓:=(30)*(CROSS(K,20) and (COUNT(半仓,5) > 0));. ]' c5 r8 Q" ?: }, P) F0 W5 W
STICKLINE(加仓,0,20,6,1),Color808080;2 P5 N! v& ]* o/ J9 g% ]% ~
DRAWTEXT(加仓,25,''加仓''),Color808080;
* Y8 @. n3 m+ s, l- d7 d背离:=(COUNT(恐慌,2) > 0) and (CLOSE < REF(CLOSE,1)) and (VAR1 > REF(VAR1,1));
9 v8 h' s2 l- U+ x! C; i# V% ]DRAWICON(背离,0,1),ColorFFFFFF;
! a: B: N! t; Z9 L$ r/ C================================================================================================$ y) q0 P V! I' T- }8 i
{一年十二倍--满仓选股 }. p; e7 Q* Y0 K. j5 ^
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);( g, r# u3 g# T. l; w8 q. q
K:=EMA(R,3);% J1 j: S7 W N- u0 o" ~& V
D:=EMA(K,3);$ C7 P) d9 i; C' h7 f* ]
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
. V! e5 M4 a+ |# D# d# mN:=IF((陡峭度 > 0.35),6,65);
' N8 h# L5 c" Y9 G4 Q3 jVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
! Y: j4 E" ^: e6 ^4 Q4 _VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
1 G* Q) d% G/ m, e2 Z赢利盘:=(WINNER(CLOSE))*(100);, r: G, y# A$ J/ J2 R0 i* V
赢利线:=FORCAST(赢利盘,7);
% k1 ~% C. U. }. y6 D5 U/ K* x, P# ?线:=(FORCAST(VAR1A,7))*((DATE < 30070110));2 Z1 G7 n3 }6 E! c( [0 {
((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);6 y6 z# R2 U0 R( {+ J. g1 s4 k. ?% q
=================================================================================================6 o, ]+ T% w2 a, \3 j
{一年十二倍--低进选股 }) n9 [3 z4 S+ T( U
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
# F6 m4 s4 U6 ]( h! aK:=EMA(R,3);' R, r2 v- Q8 {
D:=EMA(K,3);
/ q" ^ D! h. [2 W( L陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
- G3 E& x ~ E5 i- tN:=IF((陡峭度 > 0.35),6,65);
- P/ g1 d2 `$ b9 ]VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
' u. e ^3 S8 {$ E; y, q/ kVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
8 r0 A6 |5 K0 v3 x" z$ Y8 i赢利盘:=(WINNER(CLOSE))*(100);: I" E7 I3 z$ b0 J! [: F c
赢利线:=FORCAST(赢利盘,7);
' U7 O% K* p4 m' O线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
) k/ Q* f4 ^+ `0 t7 F轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);, w1 X* G5 h5 D1 J9 E
出击:=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);
* T8 t) l) k# c; |6 Q9 w进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);* Q- E, ]0 L, \" n/ V4 u3 H4 w
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));2 n2 c; V" A' Q' H0 N! E' N5 p
IF(进一 and (D > 赢利线),进二,进一);0 o' N# |( }, E- F& M5 A0 ^
================================================================================================+ K2 L3 W9 x1 ~5 b- C$ B
{一年十二倍--高进选股 }
3 O* ~1 V9 ^" ~$ s9 u: ]- HR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);2 O( H N$ z* u
K:=EMA(R,3);
5 Q: b; R2 V1 z# g% \8 kD:=EMA(K,3);5 Q+ }) w3 N8 n/ ]
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
% @, L$ r3 v, z6 wN:=IF((陡峭度 > 0.35),6,65);
! [& \7 i# y' b9 PVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
& |/ x# p9 d) J1 L8 I5 uVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
( z$ R: m' i) J# Z, `/ S- P赢利盘:=(WINNER(CLOSE))*(100);
+ y! ?$ m8 Q4 Q3 x: Z赢利线:=FORCAST(赢利盘,7);! a0 Z( F9 L( @& |6 P# j7 T- X1 i9 Y
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));4 n8 I. R& }6 S. d% _$ O) y6 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);! h7 F3 O3 B3 c9 w2 b2 ]
出击:=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);
! C+ ]8 G5 B4 a1 p* E1 M进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
4 y- C! d2 G2 \进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));9 z' D9 g% p8 p/ a- Z
CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));: _$ o( C! V4 H5 \9 F9 v9 t
================================================================================================================================
( c1 n- v& h7 g {* L$ o" Q8 b6 N$ b
g" f1 |5 p# }& h- K: L{一年十二倍--要涨停选股 }
# S) h5 a; J$ ~6 ?R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);9 I* w4 s8 J) }0 {6 n
K:=EMA(R,3);
' A, s, D K) l# eD:=EMA(K,3);/ k5 @# p9 `7 H8 ?
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
* _+ C$ B2 ]' ]/ Y5 q* xN:=IF((陡峭度 > 0.35),6,65);
: S3 r$ m$ a9 A6 h6 g( wVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));9 T4 F+ g! g. s8 ?( u1 H- g7 d
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));* ]0 j/ D3 O$ _& z
赢利盘:=(WINNER(CLOSE))*(100);
% n* ^. R9 A3 k" W, j- l0 n( z& _赢利线:=FORCAST(赢利盘,7);! Q! Q* e) g+ T' A* W- @+ E4 V8 R3 a
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));( P! t K7 a/ i; 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);( |+ R" j. h- }0 c& 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);0 b' ?- ^+ S" I% W6 m2 S3 J. `/ ?
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);4 Z! t8 q6 @) E1 l2 |3 R
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1)); |