公式原码:
# `1 d& H5 t0 a/ GR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
! h1 @6 r, V8 U5 N8 N& DK:=EMA(R,3);$ ?6 n& ^/ y3 @) S+ ^# J
D:=EMA(K,3);
" |0 B- d9 }- G9 P一年十二倍:20,colorred;8 p! J$ D: ^. O
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
1 |. s6 |- I( ?( ]N:=IF((陡峭度 > 0.35),6,65);1 Z+ H5 o2 e4 V7 I$ V; w# S+ W
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 20070110));+ }3 N' s; r6 ^ S
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 20070110));& V7 L* Y7 V9 E# z
赢利盘:=(WINNER(CLOSE))*(100);) `5 K T' @- K# Y+ r
赢利线:=FORCAST(赢利盘,7);
- s( T8 K, }0 y2 j" D6 Q线:=(FORCAST(VAR1A,7))*((DATE < 20070110));, O8 k; c- Y) y/ K* _( B0 B5 K
满仓:=((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);# ~. p' p6 m+ A" G" r H7 v
STICKLINE(满仓,0,40,5,0),Color008000;0 d, D. S% r# M) P" O G
DRAWTEXT(满仓,45,''满仓''),ColorWHITE;
8 V" E: j4 j6 J/ h: \3 Q) C轻仓:=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" Q5 t! ]- e! M& sSTICKLINE(轻仓,20,D,4,1),ColorFF00FF;
0 h' O4 ^; d; [! i$ F( ~- q7 YDRAWTEXT(轻仓,45,''轻仓''),ColorFF00FF;2 i2 [3 X5 W6 Y" \' m1 k1 @( 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);" H- g3 P$ b: }5 t( S p( W
STICKLINE(出击,0,50,3,1),Color44BB00;3 y0 e i( i. Q1 G! ~2 w3 O
DRAWTEXT(出击,55,''出击''),colorred;
6 [2 T% L# e: T/ W7 F8 O. W% i进一:CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);8 N2 D- a: m" g' f
进二:CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
0 f! Z3 c3 c% {低进:=IF(进一 and (D > 赢利线),进二,进一);
/ b1 e: c) V/ U: u0 e: G- X* mDRAWTEXT(低进,30,''低进''),ColorWHITE;/ p( L3 a* m; K; X+ E
STICKLINE(低进,20,30,3,1),Color000080;- C* r7 o+ p# E' {% |. s/ n/ d! L
DRAWTEXT(进二,50,''高进''),Color800080;
5 S! U5 V3 J. [- v6 HSTICKLINE(进二,30,50,3,1),coloryellow;$ W1 z% i, d7 r, q4 h$ L- C
狂喜:=(30)*(CROSS(VAR1,(-2)));% `) ~2 L9 ?# N! E l# l. A. ~
STICKLINE(狂喜,0,20,3,1),coloryellow;
9 T# `+ k6 _/ w2 E6 W5 ^% a B- oDRAWTEXT(狂喜,(-5),''要涨停''),coloryellow;
; q1 _4 e+ x% F狂喜过望:=(50)*((VAR1 = 0));
; o( |. a5 m4 G7 W' u* v恐慌:=(20)*(VAR1 < -94); 4 T. c% D. d- N/ T$ {
STICKLINE(恐慌,0,(-20),5,0),ColorC1C1C1;$ \- L/ I' Z' s' E4 j1 U
DRAWTEXT(恐慌,(-25),''恐慌''),ColorC1C1C1;+ ^5 l& X5 ?5 ^( S2 w
非常恐慌:=(-40)*(VAR1 = (-100)); ' ?5 R: k' g- |6 e- K0 _- r0 v0 G
STICKLINE(非常恐慌,0,(-40),7,1),Color800000;
/ B1 _# g7 @0 O# k) s$ Q# eDRAWTEXT(非常恐慌,(-45),''非常恐慌''),ColorGREEN;
8 ~. e, p/ H7 ]' q; P& [" S半仓:=(30)*(CROSS(VAR1,(-94)) and (COUNT(恐慌,5) > 0) and (N = REF(N,1)) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0));( L4 y/ ~4 b2 @$ g1 ^3 R
STICKLINE(半仓,0,30,4,1),ColorFFFF00;
% f2 j% c5 ? Q& Q% yDRAWTEXT(半仓,35,''半仓''),ColorFFFF00;
9 ~2 G! n# ~: C) }/ Z, j' }( {加仓:=(30)*(CROSS(K,20) and (COUNT(半仓,5) > 0));& e1 H0 t& d7 H. I7 C
STICKLINE(加仓,0,20,6,1),Color808080;
" P5 o* Z- W1 T! e, hDRAWTEXT(加仓,25,''加仓''),Color808080;% W3 Q9 Q2 Z- ]) t
背离:=(COUNT(恐慌,2) > 0) and (CLOSE < REF(CLOSE,1)) and (VAR1 > REF(VAR1,1));, m% z! v& a( q( t& G2 M
DRAWICON(背离,0,1),ColorFFFFFF;: L0 G: h* {7 r* i! _0 c
================================================================================================
7 @* s5 x& \3 I{一年十二倍--满仓选股 }
* O! k" B3 U' q7 U. pR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);, N# H% V7 Z2 g) F0 F
K:=EMA(R,3);
3 n5 u3 X5 p2 o* c8 v& n4 @D:=EMA(K,3);
8 Q4 [5 `4 m: n5 L' |6 s |陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
# I" ^) ~! V- oN:=IF((陡峭度 > 0.35),6,65);) x1 V0 y' {: [" [
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));3 M+ v" J& s* r) w9 Z
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));- S! N6 Y/ x$ o) k% m% _
赢利盘:=(WINNER(CLOSE))*(100);/ a+ X3 r3 J! W/ {
赢利线:=FORCAST(赢利盘,7);/ F8 X H- k# s$ g
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));: x, k+ d6 G ]% L7 t0 j
((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);
8 b9 K9 }+ a/ ]=================================================================================================
" p: g0 h5 d, x/ I{一年十二倍--低进选股 }* f4 R& N( t/ D
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
8 F9 j. o; r. K7 j# z! B0 ZK:=EMA(R,3);
9 i M) t9 `7 U* e0 M0 m" o+ D" yD:=EMA(K,3);8 ^# q3 c; P' y }
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
/ x/ `* e; k1 g) ]- wN:=IF((陡峭度 > 0.35),6,65);
& d8 l/ E/ x" @; ^2 lVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));+ T( |5 d+ \$ n- f% P$ D8 n
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));% W9 |3 p1 V+ Y; R1 w
赢利盘:=(WINNER(CLOSE))*(100);
5 @$ F& y' v5 s5 J8 d) W; W赢利线:=FORCAST(赢利盘,7);2 J: \4 [! _* u, z8 F: \
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));1 n% u) l$ N1 c% l! D+ H
轻仓:=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( ~! L9 i4 z# u! L
出击:=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+ b8 Z' M& a- T3 @ n进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);, H0 |1 z: l) T* H% A' b
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));5 [; j5 M0 Z$ v' q `6 E
IF(进一 and (D > 赢利线),进二,进一);
5 Q4 W) P1 O; V5 H================================================================================================* N& g; E3 F7 F( `9 w4 o
{一年十二倍--高进选股 }
0 }1 n! M% e' g% q8 g9 j( PR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);- }3 h0 o L3 N# f* [( r+ w4 \3 ?
K:=EMA(R,3);
! e) |8 b* E/ f8 Y! O) MD:=EMA(K,3);+ K3 S. x7 ^4 U1 y# [4 Y
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
& x; ]2 P6 j6 D. A; J, `N:=IF((陡峭度 > 0.35),6,65);
) H* `( V! W) i: e9 [) IVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
7 ^4 ^5 O }3 k) t! X4 A- L AVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
' d* s* T0 P' g赢利盘:=(WINNER(CLOSE))*(100);2 ^- G9 j; N- n5 Q0 r B
赢利线:=FORCAST(赢利盘,7);
, f* z! a/ K& B! s线:=(FORCAST(VAR1A,7))*((DATE < 30070110));. @. C' E. B e ]# R% m; |/ E' 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);
$ _' L. h2 i! Z9 x2 m出击:=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 [4 _* V9 L
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);6 q/ R: {) Q: |+ T1 K/ O: j7 E
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
% n: n& [$ _: [+ B1 o; fCROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));7 `7 s- Q$ [# ^% W' u2 P
================================================================================================================================4 `0 L5 A4 t0 U/ k! r: K: s# ]
! g4 {! N* q$ d' V$ A3 e3 F{一年十二倍--要涨停选股 }
* A* h' O3 ^3 n& uR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);! H, s" t* {8 ~* W
K:=EMA(R,3);# P8 F# b# t3 L
D:=EMA(K,3);
2 i) O0 J" ?' |1 n( Z陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
7 q. R. s7 B( l1 x) _0 D+ [N:=IF((陡峭度 > 0.35),6,65);+ t7 v& z! K" n V9 w
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));8 @) I. x+ J+ `$ t
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));7 o+ t3 y/ a& n! g& E" s8 s4 _& U
赢利盘:=(WINNER(CLOSE))*(100);
) {: p2 H& g0 N1 x9 R3 I* G1 h& ^* W赢利线:=FORCAST(赢利盘,7);( P! l ]' D' t* t$ i
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
; X5 W4 j5 D O' C% J3 u( z* Q, 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);
! {6 ^9 f0 f! M$ V( O2 m8 m/ ]出击:=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 S1 g1 G4 ?' m! b2 n
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
6 r6 x5 h" _ V; Y+ `5 Z7 e& [5 E' \进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1)); |