|
公式原码:- m/ N# [ t+ d* ]! R
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
/ k6 @5 q. o# S/ z* \+ z- O8 iK:=EMA(R,3);) M( @- o3 R7 I$ }) U t
D:=EMA(K,3);
! I4 v" Q" A" P' F一年十二倍:20,colorred;! b7 p3 |0 }, c3 n, s0 X
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
# b) A: Z* O* g4 F |& yN:=IF((陡峭度 > 0.35),6,65);
' P; ]' B) H. ]( n, m0 EVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 20070110));
/ l/ I" d6 y2 s# F+ }- T* jVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 20070110));9 j: {* a! J. M) d0 [
赢利盘:=(WINNER(CLOSE))*(100);
6 x3 b( }8 a0 u' v9 ]0 E赢利线:=FORCAST(赢利盘,7);" X* X2 U8 w# a8 ?8 ?6 J s
线:=(FORCAST(VAR1A,7))*((DATE < 20070110));" Z2 Q/ I' `% r
满仓:=((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);
. z' ]2 p: f; Z/ U/ z& Z- E) VSTICKLINE(满仓,0,40,5,0),Color008000;
1 N/ T3 J! {0 gDRAWTEXT(满仓,45,''满仓''),ColorWHITE;
& m, V) a* g5 ~. J/ }4 [% Q2 F轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);- W. X# F6 X# ~3 T: m! k+ W
STICKLINE(轻仓,20,D,4,1),ColorFF00FF;. O+ L& ?! p5 [4 s
DRAWTEXT(轻仓,45,''轻仓''),ColorFF00FF;% @. j7 G" e2 c2 u' B
出击:=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);
6 R8 T# }0 m; \% f/ H+ N' D4 fSTICKLINE(出击,0,50,3,1),Color44BB00;
; o- U4 G5 ~# W( K0 x: CDRAWTEXT(出击,55,''出击''),colorred;
' i; J+ G( x4 B2 ]: r8 e7 [% u进一:CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
1 B3 ]- R5 e4 O+ f. |8 L进二:CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
) N8 j$ [3 P+ A5 [低进:=IF(进一 and (D > 赢利线),进二,进一);/ f6 L, x6 p f& Q& i3 [
DRAWTEXT(低进,30,''低进''),ColorWHITE;
3 h6 W6 d @4 BSTICKLINE(低进,20,30,3,1),Color000080;" v: {0 h2 h/ b9 v1 |! G
DRAWTEXT(进二,50,''高进''),Color800080;
T; e( u ]' G9 }0 t' C6 y3 ^/ l0 CSTICKLINE(进二,30,50,3,1),coloryellow;
6 t1 Y* B5 B5 D2 p+ {; o狂喜:=(30)*(CROSS(VAR1,(-2)));
0 q+ g7 q+ C3 \* v( d2 O9 \( ?/ ~STICKLINE(狂喜,0,20,3,1),coloryellow;
0 o/ J8 X9 L2 {+ O& C+ m" oDRAWTEXT(狂喜,(-5),''要涨停''),coloryellow;$ \8 z. w6 j$ _/ B) p. k9 {- a
狂喜过望:=(50)*((VAR1 = 0)); z8 @3 M0 h$ X9 z2 E3 p
恐慌:=(20)*(VAR1 < -94);
4 ~% c& S$ T8 J vSTICKLINE(恐慌,0,(-20),5,0),ColorC1C1C1;
. e+ m+ H. F& I; |. F. Y" QDRAWTEXT(恐慌,(-25),''恐慌''),ColorC1C1C1;# L; t( }0 g; L c+ E) `5 r
非常恐慌:=(-40)*(VAR1 = (-100));
" M+ d! R+ d! Q) l2 A; P! Y6 ^STICKLINE(非常恐慌,0,(-40),7,1),Color800000;
C) i# K9 d7 yDRAWTEXT(非常恐慌,(-45),''非常恐慌''),ColorGREEN;% q$ c1 U' R0 R9 Z' A/ f( Q. P/ z
半仓:=(30)*(CROSS(VAR1,(-94)) and (COUNT(恐慌,5) > 0) and (N = REF(N,1)) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0));
% l6 D F9 V' s) L9 M% rSTICKLINE(半仓,0,30,4,1),ColorFFFF00;
1 Y7 T- ~; q9 Q1 hDRAWTEXT(半仓,35,''半仓''),ColorFFFF00;
6 y% h- n N4 Q加仓:=(30)*(CROSS(K,20) and (COUNT(半仓,5) > 0));
% U: W l( e0 d9 XSTICKLINE(加仓,0,20,6,1),Color808080;
7 n& U( E! z: V% |DRAWTEXT(加仓,25,''加仓''),Color808080;9 T/ q! _: x; b5 T' H
背离:=(COUNT(恐慌,2) > 0) and (CLOSE < REF(CLOSE,1)) and (VAR1 > REF(VAR1,1));$ }% y& @$ F- O, w' E# A$ _
DRAWICON(背离,0,1),ColorFFFFFF;
% S0 Z% U$ Y- c: L2 f9 z) I) {5 x' @================================================================================================
* w7 J7 T8 e: j p& E) ]: v{一年十二倍--满仓选股 }
2 ^9 F% ~* M/ aR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
; E) v1 n w6 ~4 e9 KK:=EMA(R,3);& w# U& a* D: y1 O& ?2 k
D:=EMA(K,3);
8 j- V! j$ d# Y- {陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);4 ]& S: L" W+ t! n
N:=IF((陡峭度 > 0.35),6,65);" ]& s. n, e8 o
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));& K9 ]" b- F! ^* i
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));# |) H* K, n) A, g7 H: k% W. f
赢利盘:=(WINNER(CLOSE))*(100);
K9 ^1 M" o! v- i赢利线:=FORCAST(赢利盘,7);
8 P* W0 P( i6 V% s7 k% d线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
% R2 J% w- L; }& A((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);
1 S" ~; a0 K# c, S% _=================================================================================================
" R F, w5 _' l" Z5 d# k{一年十二倍--低进选股 }
, e0 p! ~4 X$ k; K5 T8 s% t5 O' PR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
, m/ k2 I7 b/ \) gK:=EMA(R,3);
' z4 e+ k: G- v; _$ M3 fD:=EMA(K,3);5 g* L& J1 I* \# ?6 M
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);1 h1 g0 R6 I7 K* ]- Y7 L6 Q
N:=IF((陡峭度 > 0.35),6,65);! Y3 ], ~$ a) c
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
7 _$ k4 o* A% y" G' X, r% KVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));2 x# Z% f+ m; o
赢利盘:=(WINNER(CLOSE))*(100); ]8 T( z6 ^- R7 w& c" Y4 Z i
赢利线:=FORCAST(赢利盘,7);+ u, g: u9 Z6 y. @! m
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
& L& \0 b6 E0 N# E- U" M轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);9 d( C5 O* `* x( u" 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);
. g# [& I# k0 O2 @进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
9 I8 J% A- A& [. s- K. l. j$ d进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));4 C5 C0 [: F: ^# g) _' d
IF(进一 and (D > 赢利线),进二,进一);
% Z' C5 {/ \: X================================================================================================
1 X( n" ^$ _; I, o* O{一年十二倍--高进选股 }. Y Q$ C) ]% M7 H7 Z+ @* `
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
8 w# O/ O& t5 {9 b0 `, _K:=EMA(R,3);3 k( F' l( g6 }3 h) _ H
D:=EMA(K,3);
( g0 D0 i4 o' u! h陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);4 n' ^% B' p3 Q( H" e4 p: i
N:=IF((陡峭度 > 0.35),6,65);; T' F" Q1 J; s# z$ H! m, M) n! J
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));, N9 a: P3 G7 Q- o
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
2 I" N- C& [, k; \* r/ x/ ]赢利盘:=(WINNER(CLOSE))*(100);
n2 y2 Q2 W) I) s/ y" Z6 `赢利线:=FORCAST(赢利盘,7);
0 J4 }, w9 y6 B线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
- ]0 A) c& s7 ` F q+ m4 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);
' Z* u$ |' x8 S/ J) p0 g n+ k* U出击:=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 i0 G5 C( ~' E2 |% L4 J/ a' M
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
% _. r" j; l* |: M$ a9 L进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
; z2 j' s# q8 |$ n1 LCROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
: X! m) T. G% E, T7 q) J================================================================================================================================! k! u8 {2 R/ i6 r+ R* R) G3 Y3 s
; n2 e) h; c) f% C5 |{一年十二倍--要涨停选股 }
6 P v& V: _, e& ZR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);$ A7 y% y0 y: E
K:=EMA(R,3);2 T) P' h8 e6 h
D:=EMA(K,3);
& R- v3 f- M; H7 _$ Y陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);2 J# _( V4 |' r
N:=IF((陡峭度 > 0.35),6,65);
* `) K2 Y, V! I2 V* F3 f2 t/ PVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));) T8 B F! X: Z2 W2 N9 I; g% A
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));1 D! V$ K3 Y7 v' D/ ?/ l* b
赢利盘:=(WINNER(CLOSE))*(100);
4 U8 }* c4 u! g) k, Y# ]# p' O赢利线:=FORCAST(赢利盘,7);, z/ D+ d7 T( C' M( J. ~) S
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
0 l; Z& X5 y e0 \0 h2 G) W轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);
" Y( _8 T; l4 C6 k* p出击:=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; R, x# _ N8 R
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);# ~8 B/ e" Q0 V- d% O- d7 R
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1)); |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:20