|
公式原码:
; S4 y2 A: o) Z# p" k v1 \* k/ fR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
& D8 s! g8 i$ Z7 u0 e9 W' r# W( EK:=EMA(R,3);( T( W! b1 Z9 V& ] a
D:=EMA(K,3);0 x$ U9 B$ P$ I' O$ k, r
一年十二倍:20,colorred;
$ `8 ]9 j" p- [' R+ t6 u0 ^/ Q* T1 S. B陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);6 B% g% z6 K5 T: d; I2 F' `- L
N:=IF((陡峭度 > 0.35),6,65);
4 E' P. ?9 r+ t$ v+ ^( j( L3 nVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 20070110));
% a! Y6 ]4 x/ e* G4 Q' n5 O4 xVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 20070110));# N, `: B0 L9 v6 }7 g% S% n
赢利盘:=(WINNER(CLOSE))*(100);
5 s2 ]4 U# E' {( {# L6 C/ t/ K赢利线:=FORCAST(赢利盘,7);
7 U+ ]8 f0 \9 O) p线:=(FORCAST(VAR1A,7))*((DATE < 20070110));
8 P. K3 u: E1 p4 m4 s9 d& f满仓:=((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);' b4 L) m+ _# |4 r2 x
STICKLINE(满仓,0,40,5,0),Color008000;
9 D8 ~% R1 [/ b Q% ?% {, x3 @5 _% QDRAWTEXT(满仓,45,''满仓''),ColorWHITE;% Z3 A8 E: \) X: h) D8 g7 Z+ T
轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);8 K" g5 i9 g9 N( U' s% ~$ y
STICKLINE(轻仓,20,D,4,1),ColorFF00FF;/ `' R" D* H' \' R g
DRAWTEXT(轻仓,45,''轻仓''),ColorFF00FF;
2 T$ L" t; \+ ~& w# 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);* k9 |8 [# N* |6 g& n. \. {9 c
STICKLINE(出击,0,50,3,1),Color44BB00;* ^. o* }# X- j7 {6 b8 ~) P) S
DRAWTEXT(出击,55,''出击''),colorred;
4 Q R: L& f( j1 L进一:CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
# p) R Q+ b! E# w进二:CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
( x4 t" i* K7 Q, k* ?4 [) ?% [低进:=IF(进一 and (D > 赢利线),进二,进一);
( U" m) B$ }. u( uDRAWTEXT(低进,30,''低进''),ColorWHITE;
+ T! J# U1 \ ~! y1 wSTICKLINE(低进,20,30,3,1),Color000080;5 C8 C7 n) V1 t; _0 s# a" }5 k: {8 b
DRAWTEXT(进二,50,''高进''),Color800080;5 y7 z& ?9 a0 R" J
STICKLINE(进二,30,50,3,1),coloryellow; R5 n0 u# h, g: n' o
狂喜:=(30)*(CROSS(VAR1,(-2)));
/ ]% v# Z. G' A$ q$ [STICKLINE(狂喜,0,20,3,1),coloryellow;9 v/ V4 n- |6 J9 G' F0 b* i, F" Z% _4 [
DRAWTEXT(狂喜,(-5),''要涨停''),coloryellow;
# g/ b. [# t4 k' O) d& C0 c狂喜过望:=(50)*((VAR1 = 0));; w' N( W- N3 [2 C. F
恐慌:=(20)*(VAR1 < -94); 7 I; L1 T8 L# l; x! X& r! N
STICKLINE(恐慌,0,(-20),5,0),ColorC1C1C1;0 O1 n0 _+ `" }- n, t
DRAWTEXT(恐慌,(-25),''恐慌''),ColorC1C1C1;
4 [3 x+ U' |5 \. l2 b2 \非常恐慌:=(-40)*(VAR1 = (-100)); 4 F: e; H- p/ A& B: j) c
STICKLINE(非常恐慌,0,(-40),7,1),Color800000; q) @1 J, }; Q( x! P4 u7 @. f
DRAWTEXT(非常恐慌,(-45),''非常恐慌''),ColorGREEN;# @1 p+ T7 I( g- q' W1 h
半仓:=(30)*(CROSS(VAR1,(-94)) and (COUNT(恐慌,5) > 0) and (N = REF(N,1)) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0));
) Y2 p3 D c) y6 i- JSTICKLINE(半仓,0,30,4,1),ColorFFFF00;
, H K N2 n* ]8 {% r* R/ v% EDRAWTEXT(半仓,35,''半仓''),ColorFFFF00;2 W7 Y8 i2 F1 }( ?; t6 r
加仓:=(30)*(CROSS(K,20) and (COUNT(半仓,5) > 0));4 y3 [% z: u5 @0 d# s
STICKLINE(加仓,0,20,6,1),Color808080;1 C& ]+ j2 v8 ?
DRAWTEXT(加仓,25,''加仓''),Color808080;
: e4 Y, Q) ]' o2 h& S背离:=(COUNT(恐慌,2) > 0) and (CLOSE < REF(CLOSE,1)) and (VAR1 > REF(VAR1,1));7 ?! Z* K& f) n
DRAWICON(背离,0,1),ColorFFFFFF;
" @0 Z4 g3 D& _================================================================================================. p( R* F1 B8 r. Y- Q8 I
{一年十二倍--满仓选股 }. Y: H$ U+ E2 f5 j6 i
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);. s$ z' _, l+ T7 L6 Z
K:=EMA(R,3);
$ M9 N. a% q, b7 ~. q' O8 |D:=EMA(K,3);
3 y" {- A: p8 z/ ^; w1 p陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
- q( D5 e2 O3 WN:=IF((陡峭度 > 0.35),6,65);
; K8 l0 s: |5 x- s wVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));- q7 h$ e3 x: D& P
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));+ P0 c! C6 e3 J/ m5 B, Q3 `6 Y: V
赢利盘:=(WINNER(CLOSE))*(100);9 n7 S. U0 J! d" v \
赢利线:=FORCAST(赢利盘,7);
0 ^0 ?3 J g- @线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
$ `6 W: x/ e* Z6 `! m+ N/ r1 e((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);
6 h# z( ]/ ]; _) k9 g, s& K1 W* G=================================================================================================1 f- U: z; g% j
{一年十二倍--低进选股 }' l4 M" L; `5 ^3 v
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);' b+ T3 O3 v4 e3 |& y: E8 O, i
K:=EMA(R,3);
: `, P' K+ C; G# T2 e; L9 YD:=EMA(K,3);2 b5 E' O, B5 J8 Z' Y, i
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
! j& B& w9 F) eN:=IF((陡峭度 > 0.35),6,65);5 I/ w; `: k5 G( Q5 ?/ ]4 e
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
8 w; B2 g8 X& m/ @# R9 XVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
3 M T9 A% Y% E1 v% i/ R: X+ W4 P赢利盘:=(WINNER(CLOSE))*(100);8 {9 }; o: l% g1 _1 J+ _
赢利线:=FORCAST(赢利盘,7);- u& s; \# u5 r& r9 V3 y# I
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
& e4 j$ u- |& e% T轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);# G# H8 q& {. T, B: T
出击:=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);! P! H! Q: u5 n5 o% n9 l ~# I
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
7 R# B7 \- N( X8 V: p进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));8 V4 D) O2 V: Q4 ]
IF(进一 and (D > 赢利线),进二,进一);/ r8 w6 Q% F0 [$ e
================================================================================================0 \2 {: [4 p3 m3 q3 s$ j" X; @! N
{一年十二倍--高进选股 }& S5 V7 h: C9 f6 u9 ?+ t
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);. S2 W0 t& Q% D& @4 | ]
K:=EMA(R,3);) V) F+ j" R6 Y) W$ C
D:=EMA(K,3);
! U Q* I. I1 j- m陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
, x3 H( T: w. X% f! F+ i0 y- PN:=IF((陡峭度 > 0.35),6,65);
2 \; X8 a% J7 l9 KVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
$ U6 d0 `- M7 L1 TVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));3 s/ a# F, ^6 p a8 E
赢利盘:=(WINNER(CLOSE))*(100);
' q: N9 a5 b- e8 |, P' N3 q赢利线:=FORCAST(赢利盘,7);- B( g d( t* N6 w0 v
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));, h) b1 \1 M0 _3 T+ {( w! 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);
2 A$ U3 I6 r8 ?: i7 I出击:=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- a9 L- G H" F( ^5 B7 T& l进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);: P d' I, n1 G2 t& ~
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
9 Z3 t: P+ T! `( H( _. w0 jCROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));7 m: W6 P! E( J% b% B( @
================================================================================================================================
( x0 ]; i0 c. B0 j' i
% d6 Z* n, R. X8 `0 H f{一年十二倍--要涨停选股 }7 ?1 `( a* M C6 ~% N
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
# B8 V5 E# d9 }7 C v$ ?" ?K:=EMA(R,3);
+ U! k6 }1 X; T3 R$ s3 l) A. }0 TD:=EMA(K,3);
. s5 s9 o0 N3 J: u陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
) H. I) H7 D! g* }N:=IF((陡峭度 > 0.35),6,65);
* ]8 G" O1 P' G3 @" P5 V% H' A$ kVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));6 u5 b* ^) J- o' n
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));5 m* H" f$ C/ l2 \( D6 b: T3 ~
赢利盘:=(WINNER(CLOSE))*(100);
2 G" o5 H+ n5 x6 J) T赢利线:=FORCAST(赢利盘,7);) Y) `, \: W' J7 @5 e
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));9 ^( I6 r! q1 q( V1 i2 b9 x: ~1 G$ 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 K! x7 O+ |- ^; x& ] J+ 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);
4 z2 l* ]' x6 J$ x! p9 R进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
7 h [$ N8 H) I' A- N" i4 J进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1)); |