|
公式原码:
5 r/ q* e/ h) A$ k9 _# dR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
: q7 u; Z) o/ x; p jK:=EMA(R,3);. G, E G% k- \5 A+ D
D:=EMA(K,3);
1 X9 f% ~- A0 q- H一年十二倍:20,colorred;* Y, V, A( M5 f# \ D
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
- Y+ N+ F( f2 X0 fN:=IF((陡峭度 > 0.35),6,65);
0 ?* t3 L0 @. O, E, F3 ~% N) P7 ?, TVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 20070110));0 {, y1 S0 \$ k6 h, ?
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 20070110));7 o1 h) B' o* p# j9 u* t4 A
赢利盘:=(WINNER(CLOSE))*(100);
+ J* j/ u& a- l; X; h3 Z& l4 w% h* X赢利线:=FORCAST(赢利盘,7);7 ~, k' i/ M8 ]& A% }
线:=(FORCAST(VAR1A,7))*((DATE < 20070110));
8 \; b+ ?3 l( O6 A; K; |满仓:=((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);
' X. t7 Z% [* z* g8 P8 W1 @STICKLINE(满仓,0,40,5,0),Color008000;
. ~8 Q! N6 H1 u8 lDRAWTEXT(满仓,45,''满仓''),ColorWHITE;! f- E5 s' J5 m1 K4 c/ N
轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);5 e+ k% d Q7 W4 P9 G& V: i% k% m. x
STICKLINE(轻仓,20,D,4,1),ColorFF00FF;
9 Z3 c, s7 b1 ^( [0 S0 }DRAWTEXT(轻仓,45,''轻仓''),ColorFF00FF;
6 n/ s: z1 m G出击:=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);
4 h, M+ k/ @; ~' C' FSTICKLINE(出击,0,50,3,1),Color44BB00;
# g9 R$ h; P' C, o- f4 T6 [DRAWTEXT(出击,55,''出击''),colorred;- W9 l: Y* [" x) e2 R2 k$ o9 g! Z5 Y
进一:CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
6 Z' P# O# y; _, ]% k( {进二:CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));. L: w; R6 }) _* E; G7 Y7 P' V
低进:=IF(进一 and (D > 赢利线),进二,进一);
9 p, g8 t7 |4 h1 R4 W) e& ]DRAWTEXT(低进,30,''低进''),ColorWHITE;
& N4 Q- F5 [* |STICKLINE(低进,20,30,3,1),Color000080;8 ]! `6 y$ L+ ]) L. ]
DRAWTEXT(进二,50,''高进''),Color800080;. Q, l D. M$ A' `: q
STICKLINE(进二,30,50,3,1),coloryellow;
- M ?9 O: n( s* U/ d8 e( ~( S狂喜:=(30)*(CROSS(VAR1,(-2)));) x8 G J# g2 c
STICKLINE(狂喜,0,20,3,1),coloryellow;
0 `. @+ Y; W1 q }* E( B2 P% GDRAWTEXT(狂喜,(-5),''要涨停''),coloryellow;' k5 N2 U7 E9 z) L- {2 }
狂喜过望:=(50)*((VAR1 = 0));2 t/ i0 C( t- _7 M- b) `1 S& M
恐慌:=(20)*(VAR1 < -94);
5 F( V4 e$ A( I: M+ N) ASTICKLINE(恐慌,0,(-20),5,0),ColorC1C1C1;
9 C9 i6 n9 f4 iDRAWTEXT(恐慌,(-25),''恐慌''),ColorC1C1C1;
, \7 \6 W+ q/ s! ^非常恐慌:=(-40)*(VAR1 = (-100)); 1 x: @" z( a# `3 @0 b" m
STICKLINE(非常恐慌,0,(-40),7,1),Color800000;5 b& \6 y6 U0 a Z+ O6 i/ r) i) H
DRAWTEXT(非常恐慌,(-45),''非常恐慌''),ColorGREEN;
& s) H+ x+ K2 P# @. P" 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));
1 ? C; S0 o$ j: R0 y. P5 HSTICKLINE(半仓,0,30,4,1),ColorFFFF00;
/ l: A3 v& O: }& ] YDRAWTEXT(半仓,35,''半仓''),ColorFFFF00;' D2 P8 H4 W' y# P$ ?& m8 a
加仓:=(30)*(CROSS(K,20) and (COUNT(半仓,5) > 0));- C' F" |+ @& o
STICKLINE(加仓,0,20,6,1),Color808080;# Y5 C' B& k" m5 W. n0 P$ c$ N
DRAWTEXT(加仓,25,''加仓''),Color808080;
3 V' L7 S" u; `背离:=(COUNT(恐慌,2) > 0) and (CLOSE < REF(CLOSE,1)) and (VAR1 > REF(VAR1,1));
: Q9 H0 C0 r/ u1 S+ \: MDRAWICON(背离,0,1),ColorFFFFFF;6 p) U- d" Q! F. s' z8 X
================================================================================================
; F8 {5 d; v8 u" {4 T* V{一年十二倍--满仓选股 }
6 ?. m0 T! m9 j. \R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
: M6 O, X2 s8 j( Q; r: D% i+ J6 EK:=EMA(R,3);
; w+ N7 m, b. n3 g HD:=EMA(K,3);
( e4 }6 A5 \& q$ A陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
! b8 S( `) b$ \4 s4 s# L# R' |! D. rN:=IF((陡峭度 > 0.35),6,65);2 J6 G/ y1 y9 l
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
& D8 O9 j! \4 K! gVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
3 h6 A1 H1 \; x7 P赢利盘:=(WINNER(CLOSE))*(100); E3 u& N3 X) U
赢利线:=FORCAST(赢利盘,7);
5 Z( u( {) L. |! G" I) W线:=(FORCAST(VAR1A,7))*((DATE < 30070110));4 _" V, v: {9 c& a0 ?, x9 w
((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);
3 R. m4 a: ]' m: [=================================================================================================
- g' L9 {$ S8 T$ e- H( O; I6 q{一年十二倍--低进选股 }
& l5 v: H5 k8 |/ U' t2 Z( ?/ sR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);. M: ~) p. G) i9 J& `5 C
K:=EMA(R,3);
9 ?; i6 M" m# BD:=EMA(K,3);; i. c7 M) Q. U2 Y4 ^! @0 U7 C1 I
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);) n4 g. k% |7 D9 b7 r: u! S& g
N:=IF((陡峭度 > 0.35),6,65);
7 Y Y2 `: g3 xVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));5 t+ q# E- c- h$ {( s* k% s6 T
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));5 m9 c1 [5 ^, D* t$ A$ K. B
赢利盘:=(WINNER(CLOSE))*(100);
! V0 y, v" W" s3 `) F赢利线:=FORCAST(赢利盘,7);
' C0 x5 L) j3 w: e6 S线:=(FORCAST(VAR1A,7))*((DATE < 30070110));1 \3 x. ~- P2 m2 G
轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);/ r8 l8 Q% x" r8 L9 j" u X
出击:=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);
3 y$ Q/ Z5 f0 I p, B' X* k进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);% p: D' _9 L' Z# e
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
6 K8 A2 k3 Z4 ?- }0 Y( yIF(进一 and (D > 赢利线),进二,进一);: Q: [' b- \! n
================================================================================================, W. l# c- ~2 |; A# X' h
{一年十二倍--高进选股 }
7 S2 g$ \8 g5 h) V yR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);# j1 M9 Z" c7 R- ?2 j
K:=EMA(R,3);4 n( |3 V5 o; t
D:=EMA(K,3);* s1 J" X4 N% L' s; Y/ @. a
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);. W! Y/ e E/ c1 G' D1 p
N:=IF((陡峭度 > 0.35),6,65);& T6 ^# o: B9 N1 D
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
5 z( R) Z, T, m g% G3 W: yVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));3 k& R' |! l( m. ?7 F
赢利盘:=(WINNER(CLOSE))*(100);" ~, T! g( C0 B. |% [ |: q I- \! L
赢利线:=FORCAST(赢利盘,7);
8 o" h4 m( k8 k0 a& y1 v9 ~ J线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
h k9 M# ^2 ?0 t; 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);4 p* n U7 I2 y
出击:=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);
6 T- }& K* l2 j9 q6 H; M! q进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
( x: ~/ P3 b6 l/ m' R. {' h进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
5 ^1 Y, V* r) _+ C- H" j' L2 N% }CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));/ c2 `6 ~" M2 \
================================================================================================================================
R9 d( X: h8 \! c5 T* K! M
; X4 h9 |; P. F s$ D' D{一年十二倍--要涨停选股 }
' ~$ t7 A3 }) o! MR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);% h/ `/ k$ }& v, e0 ~0 e
K:=EMA(R,3);7 ]7 U o0 Z7 D9 d7 j& Q( w+ a
D:=EMA(K,3);( D9 O2 [, |7 h6 ?& q* b: o8 y
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
- ^: d) u Z( z- A: K$ tN:=IF((陡峭度 > 0.35),6,65);9 y8 j2 E- w4 s/ _$ U+ W1 X
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
4 b" E2 \, _4 d0 n) ?VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));9 ?& g! p6 v5 y! P% a; \: B
赢利盘:=(WINNER(CLOSE))*(100);" f# [9 v" L" `- u
赢利线:=FORCAST(赢利盘,7);( V" w; @" |8 ~& d5 {- q% ]$ h
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
' R, }- O1 Q/ {" [$ _轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);
3 O8 r" M% Z. o: _出击:=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);
8 G' E# k, ?- k# f进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);7 N2 |" ~4 Z3 b3 S
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1)); |