|
公式原码:0 t, J G3 [$ _
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);# ^) B8 M1 a4 s& d8 W! w( O
K:=EMA(R,3);' d/ N; a2 n0 V% D. c( n
D:=EMA(K,3);
5 E$ e! i9 U/ `, Q1 [" O9 f一年十二倍:20,colorred;& n9 n7 F- q u. W( d4 a9 V
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);/ j* K9 }) r- M% z, ^
N:=IF((陡峭度 > 0.35),6,65);) g' q& G9 y& L
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 20070110));
' Q+ C- y9 `* e- J. LVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 20070110));* I) I& p8 ^9 e: o
赢利盘:=(WINNER(CLOSE))*(100);
$ g1 K$ C* R6 }) ^/ p* M1 o" }! x赢利线:=FORCAST(赢利盘,7);
6 d# U5 r( l; L- h& q+ K线:=(FORCAST(VAR1A,7))*((DATE < 20070110));- l% Q! X7 ^0 S0 b0 R9 M* T v
满仓:=((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);
3 Q: g3 j" M; A# w3 B7 {STICKLINE(满仓,0,40,5,0),Color008000;
1 D. ?; I8 _& I4 WDRAWTEXT(满仓,45,''满仓''),ColorWHITE;
0 k; C- `$ |4 J l轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);% q+ q1 a* T- j
STICKLINE(轻仓,20,D,4,1),ColorFF00FF;$ A) y+ M0 c5 k! |5 M* R; X. ]
DRAWTEXT(轻仓,45,''轻仓''),ColorFF00FF;
6 G1 S( d' ], r出击:=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);
) A6 ~) f$ |' t3 ]4 F, N' xSTICKLINE(出击,0,50,3,1),Color44BB00;
* r# h1 g6 [( ^: ?DRAWTEXT(出击,55,''出击''),colorred;( \, f8 c! i- b4 j3 f: P
进一:CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);/ L& d' ]3 Z& v2 n2 X+ t1 u4 i1 J
进二:CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));4 ^' J5 v/ u6 P V' e
低进:=IF(进一 and (D > 赢利线),进二,进一);6 D( l! `/ u: I1 W @( O0 ?% B
DRAWTEXT(低进,30,''低进''),ColorWHITE;
# y8 F: m7 B6 ?" a$ SSTICKLINE(低进,20,30,3,1),Color000080;
- Z3 j' h w9 W1 ?% Y( J* N1 [DRAWTEXT(进二,50,''高进''),Color800080;
3 g% A z$ j! a1 fSTICKLINE(进二,30,50,3,1),coloryellow;. n' j* m' X% v1 k/ d. F/ V( J9 N. e# T
狂喜:=(30)*(CROSS(VAR1,(-2)));
( @( e) n; O$ F- }STICKLINE(狂喜,0,20,3,1),coloryellow;: [& ^* ^0 q/ U; A# x
DRAWTEXT(狂喜,(-5),''要涨停''),coloryellow;7 ?8 K8 P0 G9 L
狂喜过望:=(50)*((VAR1 = 0));6 w, m S5 Z+ J, t' P
恐慌:=(20)*(VAR1 < -94); 8 h3 e- f! ^$ n0 r# m' E# H
STICKLINE(恐慌,0,(-20),5,0),ColorC1C1C1;
e: A* j$ ]: o6 ]; d. kDRAWTEXT(恐慌,(-25),''恐慌''),ColorC1C1C1;
5 P9 H, H$ {$ s1 R非常恐慌:=(-40)*(VAR1 = (-100)); ) q" J; Q& ?/ H$ [' i
STICKLINE(非常恐慌,0,(-40),7,1),Color800000;# ^% s4 V$ i7 ]! F: O
DRAWTEXT(非常恐慌,(-45),''非常恐慌''),ColorGREEN;+ ?* t9 G. Y' f, Y; \, R: W
半仓:=(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 p0 N3 m* N. h9 D# a# eSTICKLINE(半仓,0,30,4,1),ColorFFFF00;
. q4 w2 G; l. E; A4 fDRAWTEXT(半仓,35,''半仓''),ColorFFFF00;5 b p* d1 I+ j J8 @" W3 s
加仓:=(30)*(CROSS(K,20) and (COUNT(半仓,5) > 0));: Z+ ]; k' I" z/ o! [
STICKLINE(加仓,0,20,6,1),Color808080;# Z/ V/ s t# p( i
DRAWTEXT(加仓,25,''加仓''),Color808080;
M& P% A% O# ?- \! C背离:=(COUNT(恐慌,2) > 0) and (CLOSE < REF(CLOSE,1)) and (VAR1 > REF(VAR1,1));
* W! `4 |$ M4 U9 VDRAWICON(背离,0,1),ColorFFFFFF;
. i% A* n p: }) X. [1 F9 a================================================================================================5 N6 g+ I! E6 \' C( Z6 L& L: j
{一年十二倍--满仓选股 }% y3 N! r9 t: R( y. l5 B
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);5 E: @$ d0 g$ C
K:=EMA(R,3);2 c) I) g8 B# w* K, c4 o6 g
D:=EMA(K,3);4 Z+ i+ \! \) U. @9 l
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);! ^9 j6 E0 N( \& e3 W( ^9 x
N:=IF((陡峭度 > 0.35),6,65);
' V1 S6 O. T$ ]$ |VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
6 Z. a/ y$ ?! DVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));$ Y; _7 w, [& V8 V; q4 f+ }
赢利盘:=(WINNER(CLOSE))*(100);
. w+ @" o, j' X' Q0 W# ~赢利线:=FORCAST(赢利盘,7);
2 }7 G) h5 k/ z# ~/ P* Z: v- e线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
g+ I* |. `: l, v5 b' w: h! \((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);
5 @2 U* c/ P* \) b# T- k=================================================================================================
1 f. u6 o i* k( |{一年十二倍--低进选股 }0 Z% a3 J% E$ m
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100); d: R! y3 f* |! M8 M& w
K:=EMA(R,3);
: N* ?% m& B' j$ } aD:=EMA(K,3);
. x3 v( w2 x) J: {# `( G陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
% s8 r: O; t4 [$ F" AN:=IF((陡峭度 > 0.35),6,65);' V5 D) i4 j" d( T
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));$ q: _9 x: M/ Q( k* ], C
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));7 Z0 x8 d/ h5 C( ?
赢利盘:=(WINNER(CLOSE))*(100);6 ?; |( ]" l7 g7 j# h
赢利线:=FORCAST(赢利盘,7);% ]7 Y6 _( [2 h0 l
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));+ j) A# x9 F, j( e( G( K7 ?
轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0); m0 h- [ 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);
" ~+ A% L$ \; q; R$ G5 L7 Q进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);: j, b& R! Q0 G8 l0 R* a
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
$ m3 O) }1 }' _+ H: }6 BIF(进一 and (D > 赢利线),进二,进一);
6 T$ r5 Q! \' w================================================================================================
5 k1 l" t0 ]+ W4 l3 A1 o6 o{一年十二倍--高进选股 }
/ M; P1 G- l1 BR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
$ O0 [& I, ?+ v1 d0 u6 aK:=EMA(R,3);& m- J% R9 Z6 c) k! ]
D:=EMA(K,3);' {0 n+ y% [3 ^6 P" t3 H4 c4 ~
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
. w$ g5 l$ \+ i7 B6 y* DN:=IF((陡峭度 > 0.35),6,65);/ U. V0 N/ u) R3 ]" d7 N% ?0 ^
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
6 N( ~2 I3 o; w7 ZVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
) S* B$ }4 K \" l! i赢利盘:=(WINNER(CLOSE))*(100);
4 }. W: ?% w2 {6 z4 s赢利线:=FORCAST(赢利盘,7);
3 O( P" r4 I+ t- a0 u6 |线:=(FORCAST(VAR1A,7))*((DATE < 30070110));% i+ |* u6 v+ U) P3 Y: U, h& M
轻仓:=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" `: m" Y5 ?* E1 i( F9 {" x; Z出击:=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);; q, M+ h x# O% ? h* E" j f; d
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
2 y# t0 v B+ J8 p- D进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
% M1 X J B) s5 Z! _# B1 G% x# kCROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));$ C# `5 {. ^( ]% c
================================================================================================================================' H' q7 W/ N8 n# v! z: L' ]: d0 E
$ s& G; a6 c% a* w% S3 l
{一年十二倍--要涨停选股 }
J( _& M& a7 Q% f. lR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
" E; C9 d a) A& o% TK:=EMA(R,3);
" f- J' ^; }5 H6 T0 y, ]D:=EMA(K,3);
7 P: @' e: R, Y4 p/ g( C陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);4 _+ z0 Z# s* q- I" y e
N:=IF((陡峭度 > 0.35),6,65);
1 ?& I) z$ _0 V FVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));+ j7 c& W% k. |1 t+ a
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
5 N/ y! K4 N" [* _$ F1 i: ~4 s1 g赢利盘:=(WINNER(CLOSE))*(100);
% ]+ Z( ]# j! z+ n( s赢利线:=FORCAST(赢利盘,7);
( P; O: r5 }/ T线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
2 u" E# N* a" G) l! u; t) t3 K轻仓:=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 D0 r; Q; q; d! ~) d6 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);* i4 k: V p1 N" J; s: R
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);% z" M: g, m8 ]; l/ p$ c+ K* P
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1)); |