|
公式原码:9 I- F0 |# f$ P& n6 [) |( X6 y o
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
, X* s9 b( D7 OK:=EMA(R,3);
2 S! w5 B" M4 H" R; OD:=EMA(K,3);
0 l1 H- c/ e0 x; H: G8 q; s一年十二倍:20,colorred;9 D" c# H; W, A: F! u! m
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);0 f8 @- l1 O6 r
N:=IF((陡峭度 > 0.35),6,65);
& ^8 r: Y$ O% j( @/ C4 ^% v2 I) qVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 20070110));
( X! q: z6 D" i. k t* E6 s; \ QVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 20070110));# c9 F6 B+ `% H" x1 @7 T4 L
赢利盘:=(WINNER(CLOSE))*(100);
& ^% j0 `+ z5 Q* e9 A赢利线:=FORCAST(赢利盘,7);
3 B6 h1 y p; b: A$ Y6 L线:=(FORCAST(VAR1A,7))*((DATE < 20070110));, G% X" A& [7 x
满仓:=((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);
8 R, |( A; q# l# gSTICKLINE(满仓,0,40,5,0),Color008000;
( t; g7 l) G. X# y2 k! n- V+ ^% [% HDRAWTEXT(满仓,45,''满仓''),ColorWHITE;: u* a. V9 q$ ^8 y
轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);7 ~* u5 ?& U0 O6 s/ \
STICKLINE(轻仓,20,D,4,1),ColorFF00FF;
. G3 D% f: P% u) M% eDRAWTEXT(轻仓,45,''轻仓''),ColorFF00FF;
2 [ c, T; k$ e; P, 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);; i) J% _) D& y! M& k
STICKLINE(出击,0,50,3,1),Color44BB00;
* z3 m. ?. q o" wDRAWTEXT(出击,55,''出击''),colorred;
7 W; [5 z' U7 {5 Z进一:CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);- F: w6 \: N& ^% u& V$ F$ Q
进二:CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
$ e1 D. A! [% w, B( t* s低进:=IF(进一 and (D > 赢利线),进二,进一);
' {( t v4 _5 \) [' ]DRAWTEXT(低进,30,''低进''),ColorWHITE;% u: f7 B! Z% q8 z: v) Y& b" J
STICKLINE(低进,20,30,3,1),Color000080;( v3 _) w$ g* U( J5 ]' G% C( g
DRAWTEXT(进二,50,''高进''),Color800080; Z' |& j/ `& x8 l8 }% V
STICKLINE(进二,30,50,3,1),coloryellow;. d3 E: I: y' c# W2 e& g
狂喜:=(30)*(CROSS(VAR1,(-2)));" A; y, H( L+ {5 N
STICKLINE(狂喜,0,20,3,1),coloryellow;) y9 [1 m6 Y+ G I9 k( \( s- x
DRAWTEXT(狂喜,(-5),''要涨停''),coloryellow;& x# b) T5 g. N& K2 k
狂喜过望:=(50)*((VAR1 = 0));
# b) T i9 Q5 }4 h恐慌:=(20)*(VAR1 < -94);
" {+ A9 {' y- A* JSTICKLINE(恐慌,0,(-20),5,0),ColorC1C1C1;+ K2 w- J" C% i
DRAWTEXT(恐慌,(-25),''恐慌''),ColorC1C1C1;8 K: i$ i3 e/ G) |/ l3 O* e
非常恐慌:=(-40)*(VAR1 = (-100)); + s5 q" J8 G" S9 q8 R
STICKLINE(非常恐慌,0,(-40),7,1),Color800000;
1 g' M* c. P" j, MDRAWTEXT(非常恐慌,(-45),''非常恐慌''),ColorGREEN;8 [8 Z3 ~* X3 e x {. A
半仓:=(30)*(CROSS(VAR1,(-94)) and (COUNT(恐慌,5) > 0) and (N = REF(N,1)) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0));
E- L- S% w y0 A- E. @2 `, z; K$ XSTICKLINE(半仓,0,30,4,1),ColorFFFF00;
; S' i/ e9 Q* @" |2 cDRAWTEXT(半仓,35,''半仓''),ColorFFFF00;
3 N8 G& U0 u3 }6 W加仓:=(30)*(CROSS(K,20) and (COUNT(半仓,5) > 0));
" Q! e5 C: ~2 W* _ bSTICKLINE(加仓,0,20,6,1),Color808080;
1 O" H6 ]; A" \+ |DRAWTEXT(加仓,25,''加仓''),Color808080;
2 g/ |) n! _. E( J" X; K背离:=(COUNT(恐慌,2) > 0) and (CLOSE < REF(CLOSE,1)) and (VAR1 > REF(VAR1,1));2 G8 A, Z, [3 S3 o. U
DRAWICON(背离,0,1),ColorFFFFFF;9 o* X+ P2 B# y' y
================================================================================================5 c8 t6 a$ @+ n0 T2 l
{一年十二倍--满仓选股 }% {$ h: k3 ^; ], K( }9 T
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
L' f7 |! O$ q6 U4 L/ eK:=EMA(R,3);: z' V& O2 R" v) K7 c) m
D:=EMA(K,3);& R0 ?9 z: {, [# N$ o9 ]" j3 j
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);& \$ f4 w- z7 c0 K. b
N:=IF((陡峭度 > 0.35),6,65);
8 V. R/ T( u4 m1 `; Z. {VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
2 ]+ I! S- Z) D8 E$ u1 y0 D: JVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
' u* `" C5 k" W4 R* F( E4 C赢利盘:=(WINNER(CLOSE))*(100);
: J5 S) Y6 a' G8 @* N5 O- f赢利线:=FORCAST(赢利盘,7);
u" J- u. e7 Z8 _' k) a线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
$ a7 E" Q) g: F6 J' [7 \((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);
& }; m& c& z6 k) Q2 l: V=================================================================================================
6 U! U9 i& I# X. o8 ^2 o: y{一年十二倍--低进选股 }
1 U [5 R' O! T1 H8 AR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);: ?3 S3 T2 s; o) u$ w, ~) k
K:=EMA(R,3);8 v% E% N6 c s4 e" A$ v5 \, D
D:=EMA(K,3);% y+ B, z* Y! U. I7 h
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);9 p, z+ d8 E% t' A) x
N:=IF((陡峭度 > 0.35),6,65);, H) s. P6 K, `3 S
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));3 X* f" P2 ]1 Q4 V" L+ \! a4 j
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
8 o9 g- Q2 u1 G* J$ H' A赢利盘:=(WINNER(CLOSE))*(100);
% S6 X+ d: _; g% R4 Q赢利线:=FORCAST(赢利盘,7);
5 V1 @0 j# f4 b ^: `: G线:=(FORCAST(VAR1A,7))*((DATE < 30070110));% A0 p& q' ~; x" Y" |
轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);1 ^. F* `& M7 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);; E# R6 v: B: e
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);% e+ M8 f0 r3 C4 H& i# n$ V: D) ^
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
J" d; s, b4 H$ [" j3 s' j) n" |IF(进一 and (D > 赢利线),进二,进一);# a& _! r6 R5 x1 y
================================================================================================4 X/ U# Z/ w' ^; K: X
{一年十二倍--高进选股 }
+ l2 H1 I; V& }) `' M" |. hR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);" A' M2 I5 g1 I" i* W$ T! Y
K:=EMA(R,3);1 Z- W8 R1 _9 [4 X6 E& a6 j2 e
D:=EMA(K,3);
4 M: v" b( u. @" y7 j3 B陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);! Z: k* v" T& H7 P9 Z* L; ~
N:=IF((陡峭度 > 0.35),6,65);5 I! e, A% Q7 k ?/ r' S
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
7 f; a" L' K, E+ z1 MVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
3 Y+ }" G. R0 s' g; [! \1 Y赢利盘:=(WINNER(CLOSE))*(100);
* U' k& D5 E, W, Q6 D' G赢利线:=FORCAST(赢利盘,7);
2 [- f; y$ f- v* `* b: P E线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
, O( G; T& T; j$ [轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0); p8 Q, t% |% f
出击:=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);7 k; C# n B( d2 @9 e; N/ v" _; ~
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);+ n+ E! L/ m6 D; ]
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));: m+ @) o% l2 _" q
CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
& ]9 r$ j; Q" h& E. O! `================================================================================================================================: E" _7 @* [- n; Y5 z2 S; J# U! L
3 G1 |$ O9 @7 E! W1 y
{一年十二倍--要涨停选股 }9 `! }) r6 F9 D/ n& t5 ?
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);" U$ B4 M0 h* x6 M
K:=EMA(R,3);
$ L9 f3 c% ^, @% b u* F; ED:=EMA(K,3);
' K) O; J/ H$ H0 \+ V3 g陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
. `7 `, i+ K' p0 a( t$ F, UN:=IF((陡峭度 > 0.35),6,65);
+ C4 l0 k; ^8 E& T$ l5 FVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
2 t7 B$ }* L& Y! }- Q" c; KVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));! V K8 I; Z/ v) i( x
赢利盘:=(WINNER(CLOSE))*(100);
4 k, K+ u. n6 U" R赢利线:=FORCAST(赢利盘,7);; C7 m! _& ?6 F9 C
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));; t& r$ 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);0 `3 S+ X# j( I8 C3 O+ F
出击:=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);* M7 D8 A' X# P4 J3 n
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
0 O6 Y b8 H& K- @进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1)); |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:20