公式原码:
4 I, y+ k# R' c1 A4 {4 JR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
3 q* C- o' @! |: J$ h# dK:=EMA(R,3);
7 s# E4 T$ O" `" z% Z+ ~! [$ sD:=EMA(K,3);4 l5 k$ @+ u5 S
一年十二倍:20,colorred;
) y5 L& s4 x. {$ ^陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);" s& l# |& T# C* V/ B# D
N:=IF((陡峭度 > 0.35),6,65);# o6 F/ I) C1 ^( t+ D) S
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 20070110));
% G' g8 n! a, b9 U7 O7 W, jVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 20070110));
9 L8 ~; E+ j4 A6 ~1 T2 ^赢利盘:=(WINNER(CLOSE))*(100);
) T4 H5 E8 Z9 m: y* V5 V赢利线:=FORCAST(赢利盘,7);
1 h! r) S$ B, V线:=(FORCAST(VAR1A,7))*((DATE < 20070110));$ j# w1 ~/ E( g$ v+ s
满仓:=((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);
1 h- u) v! U5 MSTICKLINE(满仓,0,40,5,0),Color008000;* w! g' l: y8 H9 a& U* x! d
DRAWTEXT(满仓,45,''满仓''),ColorWHITE;- H* | i5 i* Q% u% ~7 |6 J6 r
轻仓:=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' a+ I" S% TSTICKLINE(轻仓,20,D,4,1),ColorFF00FF;
% R9 y! t8 g/ c, v3 wDRAWTEXT(轻仓,45,''轻仓''),ColorFF00FF;
8 x8 ~9 X7 r; a- C) 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 o: {& b. c) @7 Z
STICKLINE(出击,0,50,3,1),Color44BB00;
( j. n6 I$ g) a2 }: zDRAWTEXT(出击,55,''出击''),colorred;, A. h$ ^- [' d: I
进一:CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);8 ?" O0 |7 d. g
进二:CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));8 h* U- V+ m: m0 h5 P
低进:=IF(进一 and (D > 赢利线),进二,进一);: E& ]) Q5 D1 d
DRAWTEXT(低进,30,''低进''),ColorWHITE;
) @% y* Q- a1 V7 s6 HSTICKLINE(低进,20,30,3,1),Color000080;& `' k8 L- Z1 j7 q# H% J$ W
DRAWTEXT(进二,50,''高进''),Color800080;
Z/ ?% l6 `2 Y* b3 A( cSTICKLINE(进二,30,50,3,1),coloryellow;: u8 p4 D' s! M" P
狂喜:=(30)*(CROSS(VAR1,(-2)));
8 l2 y) }1 K* u4 Z; aSTICKLINE(狂喜,0,20,3,1),coloryellow;
2 \+ k9 V) S, n7 t7 {DRAWTEXT(狂喜,(-5),''要涨停''),coloryellow;- ?8 w- H: @0 E
狂喜过望:=(50)*((VAR1 = 0));2 l! ~5 M( k& P
恐慌:=(20)*(VAR1 < -94);
2 i+ ^: K% b- }5 y+ L8 S: d1 a/ uSTICKLINE(恐慌,0,(-20),5,0),ColorC1C1C1;2 x y7 g4 H- Y
DRAWTEXT(恐慌,(-25),''恐慌''),ColorC1C1C1;
+ J- N0 T; u! m6 Q' {+ E4 W非常恐慌:=(-40)*(VAR1 = (-100));
/ o* q# o4 y. {% o$ f d! {; YSTICKLINE(非常恐慌,0,(-40),7,1),Color800000;
7 _3 F1 E `1 R1 U) ~DRAWTEXT(非常恐慌,(-45),''非常恐慌''),ColorGREEN;% n$ A2 |) W1 O$ c
半仓:=(30)*(CROSS(VAR1,(-94)) and (COUNT(恐慌,5) > 0) and (N = REF(N,1)) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0));
: {6 u$ Y) z# |$ m' _STICKLINE(半仓,0,30,4,1),ColorFFFF00;
( y) J6 l4 Y( n7 SDRAWTEXT(半仓,35,''半仓''),ColorFFFF00;
# K; M7 q) Y5 C* M. d/ g加仓:=(30)*(CROSS(K,20) and (COUNT(半仓,5) > 0)); P$ E+ y Z5 r8 B1 C6 s! @6 g
STICKLINE(加仓,0,20,6,1),Color808080;1 ]) x' R. x& Z" t4 n
DRAWTEXT(加仓,25,''加仓''),Color808080;
2 \5 C Q9 Y$ h背离:=(COUNT(恐慌,2) > 0) and (CLOSE < REF(CLOSE,1)) and (VAR1 > REF(VAR1,1));
" ?+ n1 w, d/ E3 ? YDRAWICON(背离,0,1),ColorFFFFFF;+ S }& [( N' v6 h, v+ X+ w
================================================================================================
q# Q+ P" y+ q. r' C: l( T{一年十二倍--满仓选股 }
; V7 S; X2 |( a3 ^. M' YR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);: i( c2 t) h3 S+ t
K:=EMA(R,3);
: ^7 {; k T' _: P+ D0 n* `D:=EMA(K,3);
0 n. L3 q8 \8 [! K6 B y陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
9 p4 i# r6 i+ N0 r4 YN:=IF((陡峭度 > 0.35),6,65);' D J5 j4 k7 o
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));# }. j' n k2 f6 r% m( H
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
( H8 u2 z. H, j5 }. [赢利盘:=(WINNER(CLOSE))*(100);
4 `( v0 V5 T6 M" k6 j1 q赢利线:=FORCAST(赢利盘,7);: `6 F/ S: V% c5 c4 g" b
线:=(FORCAST(VAR1A,7))*((DATE < 30070110)); U% b- _* _" n3 y! n
((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);
8 X) z# V5 B9 N8 P=================================================================================================
* N7 ]$ w& t& ?+ g{一年十二倍--低进选股 }1 ?) r- P; M% V- k( o2 j
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
% w! @8 W) _& W. F% ~- SK:=EMA(R,3);
8 f. H2 X# F1 r- qD:=EMA(K,3);! m G& n# N+ d% u1 B, H8 a7 Q* b3 y
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);1 v% D1 o0 m0 M. m0 f: l
N:=IF((陡峭度 > 0.35),6,65);! V( J( |* k4 z8 A) X
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
9 j4 G7 W0 `) H5 E7 N+ @VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
8 [( P+ n/ t8 I) @) c赢利盘:=(WINNER(CLOSE))*(100);9 v& W" A y3 w$ }. _* \7 L
赢利线:=FORCAST(赢利盘,7);
; ^8 C( t& I. B7 {, Y& D线:=(FORCAST(VAR1A,7))*((DATE < 30070110));3 Y+ M1 h% k8 w0 \0 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);
2 r& \$ k3 _2 |+ U6 }9 c% q出击:=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) `) u$ ~4 t3 ]# M1 p
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
2 | R: `. l8 Q" x1 ?$ y$ R进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));# z0 f7 ^+ |# p6 t; v6 i
IF(进一 and (D > 赢利线),进二,进一);
/ m; Q" o6 R, x8 X================================================================================================
' e" _0 Q6 W0 `3 O7 w( u2 }{一年十二倍--高进选股 }, j0 @+ H6 B; z/ `" m% J2 D$ r/ T
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);$ Q" l+ b3 T) n* G, x' g
K:=EMA(R,3);1 k& {6 G: g) J( \3 A6 T
D:=EMA(K,3);8 [; Y# X( `, j3 N( C
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
% X# e4 n0 T) w0 M& e) L) M& `N:=IF((陡峭度 > 0.35),6,65);
! B. u9 A2 p4 BVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
. O/ m( G( d1 O0 U6 ^' Y9 \VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
7 g, \0 h! n" M! j9 @赢利盘:=(WINNER(CLOSE))*(100);$ X/ w) {' Y- Q0 t2 f) W
赢利线:=FORCAST(赢利盘,7);
5 r! ~( q6 m( U7 h线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
- @! c a1 I7 A! @4 n3 [9 p4 }轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);/ P* _0 g" l0 s! K
出击:=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);
& {" M! b+ m& f* e进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);# b+ i5 y8 O+ C+ Q* L, H" y' i
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
4 J/ h( c4 X5 _1 g$ K+ Q- Z: P* i/ k" qCROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
! a9 U" ~ x C4 o/ M- W& P================================================================================================================================
( S' c9 b! z5 i( F5 D, q8 S% m( }; {/ _! V2 C7 N" ] b0 a" Y
{一年十二倍--要涨停选股 }$ W9 `: p, x* s* p! X/ ?9 F
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
! _5 G+ x/ @+ P( eK:=EMA(R,3);
8 r2 }9 v* F; Q+ C, [D:=EMA(K,3);5 r$ f9 I) Y8 `- C: ?/ @
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);6 D. f7 R! P9 _& C1 @, y, C! u
N:=IF((陡峭度 > 0.35),6,65);
) \; i8 h1 i. H8 E5 C4 XVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));+ m8 o) ?" S( j) O) z/ |
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
& j0 \9 v f! N7 _赢利盘:=(WINNER(CLOSE))*(100);
: L( Q' @; K U1 ^; D8 [赢利线:=FORCAST(赢利盘,7);, o! S# A$ t8 A
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));- F% Q! z& ^0 z6 N7 i1 d. @
轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);, n! c; | m$ ^1 z0 b- h
出击:=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);
. o5 \$ d/ ~2 ]. T: l进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
- U! O5 ~1 W' g1 h进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1)); |