|
公式原码:
h3 P+ }+ u- J" g( oR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
5 K8 P$ t9 T K. D4 r6 d% MK:=EMA(R,3);
! {0 s/ g' b) X0 y! j0 h0 a$ N: wD:=EMA(K,3);
% @5 p& ^+ I$ b/ ?一年十二倍:20,colorred;5 D- q4 f' ~& s
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
* X& {( E; ]$ x+ m0 ON:=IF((陡峭度 > 0.35),6,65);+ M: ?- T, ~" N' O1 t! H
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 20070110));$ e' g, K: {: w W
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 20070110));9 ]) M2 A1 }4 B+ i' B
赢利盘:=(WINNER(CLOSE))*(100);7 B- F: }4 a* |# a4 d
赢利线:=FORCAST(赢利盘,7);
& W% X+ J& a7 \1 u0 i线:=(FORCAST(VAR1A,7))*((DATE < 20070110));7 U d& y! n0 Z n8 _1 r
满仓:=((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);
5 l3 E& y$ @) |9 LSTICKLINE(满仓,0,40,5,0),Color008000;+ F3 d% Q8 I: G6 O6 p# W
DRAWTEXT(满仓,45,''满仓''),ColorWHITE;% g) j. V) }9 ]. G, W: 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);* F; W' O8 A+ X
STICKLINE(轻仓,20,D,4,1),ColorFF00FF;
5 c2 H; J( I' ~ [+ k+ f WDRAWTEXT(轻仓,45,''轻仓''),ColorFF00FF;
- G. M* I. m( l3 D. f& 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);
$ n1 I) J5 h1 WSTICKLINE(出击,0,50,3,1),Color44BB00;
) q5 Q6 f5 v" l, FDRAWTEXT(出击,55,''出击''),colorred;- z1 D3 t; ?" f& H# A* Q0 Z
进一:CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);# h* D" s" H( t- O J, P- f
进二:CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
+ H2 {! R- @9 q7 ^& A N4 ^低进:=IF(进一 and (D > 赢利线),进二,进一);2 B* z8 {7 \) Y5 r! B' B3 g
DRAWTEXT(低进,30,''低进''),ColorWHITE;! r S# h6 o! {1 _ {" U
STICKLINE(低进,20,30,3,1),Color000080;8 M- z3 a* P1 W/ k H" Z/ _
DRAWTEXT(进二,50,''高进''),Color800080;) S: X ~; e+ \3 ]! Q& T
STICKLINE(进二,30,50,3,1),coloryellow;9 e5 H$ }" s2 Y% L1 @: H5 g9 O8 n) Y
狂喜:=(30)*(CROSS(VAR1,(-2)));
0 r( S0 Q6 {/ Z% D) q* I: N+ bSTICKLINE(狂喜,0,20,3,1),coloryellow; u" O( S* ?; v
DRAWTEXT(狂喜,(-5),''要涨停''),coloryellow;
/ ~1 W0 P7 j+ \狂喜过望:=(50)*((VAR1 = 0));
, U3 S! i+ U. g1 o4 `! x& d- D# q恐慌:=(20)*(VAR1 < -94); 1 x6 F' j1 M) x5 {0 I
STICKLINE(恐慌,0,(-20),5,0),ColorC1C1C1;
2 {3 `5 }- M: {5 {# }6 i& t/ Z y0 VDRAWTEXT(恐慌,(-25),''恐慌''),ColorC1C1C1;
L+ Y* N i) N" p) A) B非常恐慌:=(-40)*(VAR1 = (-100)); , r+ n* s" X6 U5 R
STICKLINE(非常恐慌,0,(-40),7,1),Color800000;
8 g% y+ T$ G2 D4 Z% Y' g0 |DRAWTEXT(非常恐慌,(-45),''非常恐慌''),ColorGREEN;
1 X3 H; S9 h. Z( 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));3 W' y. q2 m# Q; F) `0 B5 k
STICKLINE(半仓,0,30,4,1),ColorFFFF00;6 a0 B/ a Y2 M2 r
DRAWTEXT(半仓,35,''半仓''),ColorFFFF00;# H5 |& h# v0 z4 b
加仓:=(30)*(CROSS(K,20) and (COUNT(半仓,5) > 0));# {, Q( r. l& Y" W7 r
STICKLINE(加仓,0,20,6,1),Color808080;4 U5 R! D1 M7 x- g) U* ` W2 H
DRAWTEXT(加仓,25,''加仓''),Color808080;
, f Q: L# Q- q" _5 T+ o7 M背离:=(COUNT(恐慌,2) > 0) and (CLOSE < REF(CLOSE,1)) and (VAR1 > REF(VAR1,1));
! Z6 s- o, M( ` D9 ^4 LDRAWICON(背离,0,1),ColorFFFFFF;
/ Q: ?! K" R: b" W4 H================================================================================================
5 E) R/ X6 `5 z9 U; h* m{一年十二倍--满仓选股 }
% X& V5 H" Z) F3 t- g. [5 TR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
8 v7 c" v% { t& U7 U) ]+ O! ^* dK:=EMA(R,3);1 |1 a% Z: Y( \$ {9 r9 j3 G
D:=EMA(K,3);
& `& p6 a0 W: T3 z& c3 m: b! F陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
" L$ u' j5 D$ P9 gN:=IF((陡峭度 > 0.35),6,65);: Z7 y" a* p4 j) U! B
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110)); v& p! B" J" Q: z4 ~, w
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));0 t$ Q" m' h w( k f
赢利盘:=(WINNER(CLOSE))*(100);1 m2 E. R& e$ i* U8 e9 z- L! ~, Q8 N
赢利线:=FORCAST(赢利盘,7);: V. w% g1 Y5 z
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
3 x0 p3 ^/ B |* z" d6 a$ m+ X# z((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);6 b5 P K" a* G* K- d
=================================================================================================& v8 Z: Z* D/ o- O) g2 `
{一年十二倍--低进选股 }
Y* o* D) \' \0 H, k! E7 DR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);/ C( \0 Z& X+ Z8 I( W, l+ O/ j
K:=EMA(R,3);
; O. E0 k6 B" @" XD:=EMA(K,3);
; E4 T% j' o/ D! g T' v/ _陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
0 |1 e+ k2 W+ |# m. L4 fN:=IF((陡峭度 > 0.35),6,65);
4 F H. E- [, Q# x3 }8 XVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));5 |; [$ K% h( C& s; z5 y" a
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
2 v" m& _$ _* L( a7 P6 x赢利盘:=(WINNER(CLOSE))*(100);4 g; Q- t6 {5 ^6 a7 ? q
赢利线:=FORCAST(赢利盘,7);
. D0 E0 B* o" C- E$ R; r. H线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
( {! ]1 ]) d9 }3 b轻仓:=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 G0 s$ J6 ~# b! e1 @
出击:=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);* m6 w' q2 @6 H8 Z! Z
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);5 N1 P; _8 k: r( z9 ] W
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
) B" Q7 m" N* ~0 K7 DIF(进一 and (D > 赢利线),进二,进一);
" X" C2 I5 O! M& z( J================================================================================================8 j/ ~' h; Q1 b. [8 j
{一年十二倍--高进选股 }; F8 ]- t$ ?$ O2 G! y) [
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);* b$ D) J" Q# {# c# i
K:=EMA(R,3);
9 M1 Y& R9 m5 q* R9 FD:=EMA(K,3);
! H: y' b% u; p0 q. z陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);( c+ l, U8 D9 @
N:=IF((陡峭度 > 0.35),6,65);7 h- n8 W* b6 [- h+ X
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
% w5 E0 s8 z+ \( c$ P9 oVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));. k! M4 n$ q/ {4 V- C: E
赢利盘:=(WINNER(CLOSE))*(100);/ W" _' o3 K8 z. C5 v4 Z2 I
赢利线:=FORCAST(赢利盘,7);
( n3 K7 w. ?9 X3 A4 @线:=(FORCAST(VAR1A,7))*((DATE < 30070110));2 \& ~2 O5 P0 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);
3 J! y+ g& U) y# }, i, ?( y出击:=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);( v3 H; Y" [6 n4 m- |7 R, S
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
' L3 C# \ p% l+ ?! c进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
[, W% l2 U! f/ Q% LCROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
- z6 O( |' B8 T3 L* g9 x! l. T================================================================================================================================
9 | j. R% G8 \* K/ P; ^! x, K7 p
' n K, K# p) V% n6 g{一年十二倍--要涨停选股 }
. H5 t$ G& |7 G3 W& s- B$ w/ DR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);$ b1 r" a* ^4 @1 I3 [3 I2 E
K:=EMA(R,3);, \0 d" s- n$ Y+ H& N& F& B& P. }
D:=EMA(K,3);
9 A8 y2 n7 z, ^: m6 p: r$ r陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
9 V Z* _) ]4 t, h$ NN:=IF((陡峭度 > 0.35),6,65);) j/ d9 z- S0 W4 f4 C! y( u
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
8 b8 p+ \& k$ q* c5 F5 _VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
' k/ d# @! H3 X; i赢利盘:=(WINNER(CLOSE))*(100);
. ^+ O: ^1 ?: F' e1 }赢利线:=FORCAST(赢利盘,7);, N& `% |. H, o) G
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));0 D c" Y* f( O7 |7 n' P7 ~
轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);5 {7 m5 p8 S+ j% A8 t* I5 G! F 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);0 A# ~4 D- ]6 q' I+ S' G- {
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
P% }* Z2 A' \& x进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1)); |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:20