|
公式原码:4 b# C, Z4 { F
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);% Y" E$ O6 i H7 Z
K:=EMA(R,3);/ N7 B; l5 s2 d6 R
D:=EMA(K,3);
5 s8 D8 j( s* [6 t D* p/ O& f7 s一年十二倍:20,colorred;
d8 d9 `) w2 f8 G陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);9 R: W) A* h% @+ f
N:=IF((陡峭度 > 0.35),6,65);
& |2 ~9 b: V% Y9 k& I5 WVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 20070110));/ _* x; m/ ?3 @& L' k$ z0 Y
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 20070110));
+ r) u: k& N1 m j5 ~赢利盘:=(WINNER(CLOSE))*(100);5 i' O& T2 x" `3 O
赢利线:=FORCAST(赢利盘,7);& f$ X9 p0 \- q3 V: E. e; c
线:=(FORCAST(VAR1A,7))*((DATE < 20070110));$ L: r. }% R( g1 o3 x
满仓:=((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);9 m* d5 _& h: ^6 Z0 b# j
STICKLINE(满仓,0,40,5,0),Color008000;# {% P6 J* T" H
DRAWTEXT(满仓,45,''满仓''),ColorWHITE;$ f; i% O+ f1 N v! 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);
d" |- M0 y) x8 ~STICKLINE(轻仓,20,D,4,1),ColorFF00FF;) |: i- D; H+ N; d$ D5 T: q; u9 h
DRAWTEXT(轻仓,45,''轻仓''),ColorFF00FF;
/ A8 r' f! N7 T' x6 B1 v/ 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);, a$ b* j! N0 F# t2 t( _
STICKLINE(出击,0,50,3,1),Color44BB00;
( S# Q9 C" H, p) T, {; Z5 YDRAWTEXT(出击,55,''出击''),colorred; h( R/ O' ~, C
进一:CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);0 @' |! }' O% D) ~& v
进二:CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));8 d, n$ z. L5 W. X) F
低进:=IF(进一 and (D > 赢利线),进二,进一);
9 Y7 m# p9 ~6 U3 a( d! _DRAWTEXT(低进,30,''低进''),ColorWHITE;3 Z+ E4 ]! C2 s: f7 |
STICKLINE(低进,20,30,3,1),Color000080;
- v- m/ j' a$ p% z! X: \# P2 ADRAWTEXT(进二,50,''高进''),Color800080;% x8 u6 V' P! ]! l+ ~/ M: l
STICKLINE(进二,30,50,3,1),coloryellow;
: o, M( T% v# \3 a* c3 H2 G% H. ]1 k狂喜:=(30)*(CROSS(VAR1,(-2)));: X6 L' v/ ]) x& a9 E
STICKLINE(狂喜,0,20,3,1),coloryellow;
% U% K% W' _1 J5 o9 L0 vDRAWTEXT(狂喜,(-5),''要涨停''),coloryellow;
8 J" I' Q/ O, j2 V& c7 f狂喜过望:=(50)*((VAR1 = 0));' W: k% C* L: E3 K' @
恐慌:=(20)*(VAR1 < -94);
\+ k% d& k* k2 `9 U8 `* ^STICKLINE(恐慌,0,(-20),5,0),ColorC1C1C1;! v7 b( F) @9 m/ F: K& n7 L
DRAWTEXT(恐慌,(-25),''恐慌''),ColorC1C1C1;: T' J8 K# E- }% H( z
非常恐慌:=(-40)*(VAR1 = (-100));
" b1 W$ T0 }$ bSTICKLINE(非常恐慌,0,(-40),7,1),Color800000;
. g8 A# C3 K, O1 D% UDRAWTEXT(非常恐慌,(-45),''非常恐慌''),ColorGREEN;
6 M! [; [3 d: c* T; U' S: R半仓:=(30)*(CROSS(VAR1,(-94)) and (COUNT(恐慌,5) > 0) and (N = REF(N,1)) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0));
! |( Q8 N$ v7 A; Q! `5 R' KSTICKLINE(半仓,0,30,4,1),ColorFFFF00;
! }. ~% ^! a9 c' [DRAWTEXT(半仓,35,''半仓''),ColorFFFF00;
) M0 ?6 m; F' m8 [加仓:=(30)*(CROSS(K,20) and (COUNT(半仓,5) > 0));" t8 Y ^9 n2 Y& `
STICKLINE(加仓,0,20,6,1),Color808080;
$ T7 c7 }' M9 zDRAWTEXT(加仓,25,''加仓''),Color808080;
& Z. d1 Y! C3 ~4 g% y9 ~. p背离:=(COUNT(恐慌,2) > 0) and (CLOSE < REF(CLOSE,1)) and (VAR1 > REF(VAR1,1));
/ w/ a6 P* E7 _" S/ `DRAWICON(背离,0,1),ColorFFFFFF;/ H: h( T4 C( K8 w! x! J
================================================================================================9 L% {5 l, u( b1 u% f) w5 l
{一年十二倍--满仓选股 }( C1 q O$ L" o5 w, t: Z; Z$ `& ^
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
* F O" G8 r% F! j. R- s, N. [( w* PK:=EMA(R,3);
5 ^9 i' X: l4 d7 ^% t! F$ OD:=EMA(K,3);
3 Z1 `3 d2 n: N1 J# [陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
- O3 c$ F: K0 b* |N:=IF((陡峭度 > 0.35),6,65);/ L! |3 n$ A# P' p; l
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));! b8 i9 S5 Q8 j& b6 J1 o9 Y" N
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));% a' p% [% J2 R1 [0 }
赢利盘:=(WINNER(CLOSE))*(100);# e- q; N& ]$ F$ j" A
赢利线:=FORCAST(赢利盘,7);( u& _% Q# ]6 P Q
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));, U# o5 _# p9 \" y+ g6 j
((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);' Y r4 ^1 Y! D* U3 k' b
=================================================================================================
( }" @) G. {" [6 T{一年十二倍--低进选股 }( g# r6 x( G) C" K3 B' P+ f
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);4 O# i% Z8 M) s8 M8 W
K:=EMA(R,3);
* b8 ^# Z2 N' |* kD:=EMA(K,3);$ |5 K, a( }0 o4 [
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);: i( ]3 N6 C% t9 L* A& Q
N:=IF((陡峭度 > 0.35),6,65);
! f2 ]5 v, u" L; x7 C: v+ B. oVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
9 x; }) I8 R# v3 k0 e9 a) Z; yVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
+ C* N: f8 n# ~; P赢利盘:=(WINNER(CLOSE))*(100);
+ x8 m) N* k8 y% u! ]赢利线:=FORCAST(赢利盘,7);
! p N* R9 [8 d2 {- N; A6 F线:=(FORCAST(VAR1A,7))*((DATE < 30070110));: d E" Q1 F+ G/ i6 {
轻仓:=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 Q( j' ]( [( U) a5 z
出击:=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);
k! F3 V# M8 x- G) m7 |' d( b- X进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);1 Q; f/ s5 m/ O/ y
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));% V8 X7 B8 C! P4 j9 J3 W/ k
IF(进一 and (D > 赢利线),进二,进一);
) O) w( E; d. N6 O2 b" x i j================================================================================================$ M4 J* ^5 B+ m% O" U( M
{一年十二倍--高进选股 }" X( O& {, x1 E0 h
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
6 Q& `9 Y2 Q) b) v$ n+ G5 z+ SK:=EMA(R,3);
) O* Q5 J# ]% z1 h) ]: D f# ~3 o+ ~D:=EMA(K,3);
# R; [. y$ C6 H$ W( X! }8 `/ l' c陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
: s9 \9 y0 ^. C; [8 f, pN:=IF((陡峭度 > 0.35),6,65);) n% r+ n; a2 S5 S4 ^) w
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));1 d8 B' L7 ~8 K) ?( B. y& k% o
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
( S9 s8 @2 L, o* Y" P0 h赢利盘:=(WINNER(CLOSE))*(100);; Z+ e# P% [ {0 N t z* {* t
赢利线:=FORCAST(赢利盘,7);
3 q# g- I6 p( m9 c6 L0 J- G: u线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
8 `. w d) N' K4 ~+ p轻仓:=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 D7 ?+ X% ~' W3 r) I( C% I' 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);
* F5 M( i* M+ u# C0 s" |进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);' v9 ]6 g$ Q" {+ z" [
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));" @7 @- o) g- D
CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));2 G+ g4 B4 p8 Y4 L) W4 u5 u
================================================================================================================================
4 O v0 Z2 ^( y2 u a' Z3 @1 {! p% T9 L1 M8 G' S
{一年十二倍--要涨停选股 }
' ]6 M% n* |7 T& v1 TR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
" F) y. D8 R1 t4 hK:=EMA(R,3);/ M# l! s8 P5 R
D:=EMA(K,3);. p% p# O0 U. ]
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
, e% ^$ g' E" A$ x! [N:=IF((陡峭度 > 0.35),6,65);
+ ~+ r s4 d, w$ LVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
z; ]' M, N( BVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
- L1 q7 v; G V1 C赢利盘:=(WINNER(CLOSE))*(100);
, u4 c# [4 \3 G+ n5 I5 U赢利线:=FORCAST(赢利盘,7);
* x; ^ H' q8 i5 D4 f线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
& Q) ]4 u" H" Q4 J! k9 y* Z轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);% z. r8 z: d1 |7 L; X4 ]
出击:=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);! }# F- _: ?- h3 ]% `4 N3 `
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
0 I! a1 y* t2 k# u. r# w0 o7 q进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1)); |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:20