|
公式原码:
& I4 o6 d% T4 s* c" J# ~+ CR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
: I4 Y/ Z" a: a, c- dK:=EMA(R,3);, _9 K; d8 y, ?9 M: e4 I' \
D:=EMA(K,3);) [% i: l y8 W) Z9 n
一年十二倍:20,colorred;' A: {3 L2 V; p+ T
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);% E6 I3 n. L; x. \' |
N:=IF((陡峭度 > 0.35),6,65);' R ]4 O9 P# V: l4 W
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 20070110));
( W0 f; {1 ~8 l5 M! g& i# VVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 20070110));
& M( Y$ B8 p$ A2 Z1 R8 l" \. {2 F赢利盘:=(WINNER(CLOSE))*(100);: ^& S, W3 s }2 Z$ q( `8 q
赢利线:=FORCAST(赢利盘,7);+ a. w' c+ b* X! x6 `
线:=(FORCAST(VAR1A,7))*((DATE < 20070110));3 e7 d9 ?( L, k$ {
满仓:=((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);
+ |* Y7 f6 ?, ^- ]& J4 jSTICKLINE(满仓,0,40,5,0),Color008000;; ^" M) E3 N! ?6 P" p9 Y* u) X0 V
DRAWTEXT(满仓,45,''满仓''),ColorWHITE;8 v( O2 d% w$ U4 _5 \
轻仓:=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- U0 R' |8 I( u/ H3 ISTICKLINE(轻仓,20,D,4,1),ColorFF00FF;
% I0 x, w3 J0 D$ J. |DRAWTEXT(轻仓,45,''轻仓''),ColorFF00FF;
1 K- ^- N4 N1 {( W出击:=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 z6 U" _( F7 hSTICKLINE(出击,0,50,3,1),Color44BB00;* {/ X% c0 A' O# r5 T
DRAWTEXT(出击,55,''出击''),colorred;5 J5 }) K. c$ g, K8 M+ Z! u
进一:CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
, [5 o0 H$ y& l3 L2 u' L进二:CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));; _4 s) f# A9 a7 d( C
低进:=IF(进一 and (D > 赢利线),进二,进一);
+ {% k' i+ V7 u2 DDRAWTEXT(低进,30,''低进''),ColorWHITE;8 B- a6 ?1 u4 Q% v4 [! W$ w! u
STICKLINE(低进,20,30,3,1),Color000080;
8 M& U/ w; l1 X: \DRAWTEXT(进二,50,''高进''),Color800080;3 w+ i6 L$ _, q+ Y7 n: b
STICKLINE(进二,30,50,3,1),coloryellow;+ b% g( [3 j2 u: z( e
狂喜:=(30)*(CROSS(VAR1,(-2)));
% u7 ~ L9 o7 t# H4 L8 w4 u0 b" bSTICKLINE(狂喜,0,20,3,1),coloryellow;8 [% s/ E4 j3 C ?5 a( x2 A0 i
DRAWTEXT(狂喜,(-5),''要涨停''),coloryellow;# S( c/ y4 F" \* Y5 W! G
狂喜过望:=(50)*((VAR1 = 0));7 B9 K6 T) n( v8 Z8 `
恐慌:=(20)*(VAR1 < -94); 7 i: @1 l. O6 K* [3 n
STICKLINE(恐慌,0,(-20),5,0),ColorC1C1C1;
) T9 \/ C# Y7 m* |DRAWTEXT(恐慌,(-25),''恐慌''),ColorC1C1C1;) H! v( ?) Y' A/ W. v
非常恐慌:=(-40)*(VAR1 = (-100)); % m2 j# z2 e) [6 A# X
STICKLINE(非常恐慌,0,(-40),7,1),Color800000;& C: L% b3 S$ t- l: P% {
DRAWTEXT(非常恐慌,(-45),''非常恐慌''),ColorGREEN;' P1 B7 k" s4 d, u
半仓:=(30)*(CROSS(VAR1,(-94)) and (COUNT(恐慌,5) > 0) and (N = REF(N,1)) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0));
# W, X4 \) s8 y* q; M$ s/ K sSTICKLINE(半仓,0,30,4,1),ColorFFFF00;( p$ |9 @- G- g- D
DRAWTEXT(半仓,35,''半仓''),ColorFFFF00;& x6 m* n2 S6 l( B e3 f
加仓:=(30)*(CROSS(K,20) and (COUNT(半仓,5) > 0));8 J: q# j! l/ c) Z2 R& U
STICKLINE(加仓,0,20,6,1),Color808080;
, Y/ J7 p& }, y( a+ GDRAWTEXT(加仓,25,''加仓''),Color808080;. x5 T5 A# s: z5 q, h" {
背离:=(COUNT(恐慌,2) > 0) and (CLOSE < REF(CLOSE,1)) and (VAR1 > REF(VAR1,1));
9 a z8 j" P& g! b9 JDRAWICON(背离,0,1),ColorFFFFFF;
& ?9 [- Q5 T& a0 H: U================================================================================================
$ l" U* B" z# V. c0 l+ K. x: R{一年十二倍--满仓选股 }7 Z" p f, j0 f; B6 Q' E
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);# M* W" |% R; @& j" e
K:=EMA(R,3);
9 [ h8 |9 J7 U. M+ RD:=EMA(K,3);; E" e( L, t7 t) k5 r
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
I# K4 b h2 W( |7 r, eN:=IF((陡峭度 > 0.35),6,65);
2 Z# l6 K" z+ c6 U% lVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));1 {& J* t7 m5 u) \' w, B) B. f
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));6 o' m( {; e8 {8 a2 b/ g6 O
赢利盘:=(WINNER(CLOSE))*(100);
4 A) k6 ~% I4 ?- B" K- }& f$ y/ N赢利线:=FORCAST(赢利盘,7);3 g5 Y, I% ~- c+ e3 h
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
) X7 W& U: I' k1 I((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);
# g" [3 R4 ]( V% O2 y- w: A=================================================================================================) y9 E1 z% X& I0 X7 c k1 p
{一年十二倍--低进选股 }
/ g; @; G% }7 c) u) ~" aR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);5 ?- a6 ?: w1 z4 @! V( w% i
K:=EMA(R,3);
$ P4 C# B0 o+ [- D6 OD:=EMA(K,3);
- }6 f7 s$ O' U. A7 L陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);9 N! v* L! W* x( ~. E) [$ g
N:=IF((陡峭度 > 0.35),6,65);
( Y- E2 V- N; v5 u/ Y ZVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
) P$ f8 R& I6 j8 }VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
: [- m$ D9 c& d0 X1 h' ?赢利盘:=(WINNER(CLOSE))*(100);
0 m' F3 H& {# a- S; ~赢利线:=FORCAST(赢利盘,7);
6 f2 `9 a1 m! z$ q线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
1 S2 n4 \7 s5 V6 ?. g0 q轻仓:=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 N7 p, v. l# K. ^& 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);
6 C( l! s+ e# S4 ^ B) n# s进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
q* I5 M* b1 |9 w2 L进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));! s; S) T+ Z9 _" ]; K) F$ ]" @3 p
IF(进一 and (D > 赢利线),进二,进一);6 k. _- ^; T0 F* ~; D' Y
================================================================================================
0 V* G& k; T& I6 V$ J$ i{一年十二倍--高进选股 }- r# R4 ]. E- K+ H) o0 w0 [6 `
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
6 N$ b* x2 m6 _. X7 y- y: j7 zK:=EMA(R,3);
% a2 K/ W2 [4 J% `6 ~ `6 vD:=EMA(K,3);
, q4 W& c3 b6 @陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);1 t+ U6 d1 t) U: e9 H2 a( u
N:=IF((陡峭度 > 0.35),6,65);
0 l/ X1 m; n4 ]) j, U; AVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));- y1 {: l/ f% y* T+ a4 J
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
( m$ G6 p9 \3 V/ V赢利盘:=(WINNER(CLOSE))*(100);
; E1 [ A) v' \: ?3 Y, B& R赢利线:=FORCAST(赢利盘,7);+ a1 \+ N# F! j5 x' k9 A0 @# J$ K; y
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));, D! H. k# w/ o
轻仓:=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 C0 r. \8 Y/ I2 D0 G
出击:=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) }( K/ g& G) Q' C8 U- u
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
0 D* i2 \. g" t& `- {# r进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));! c+ h6 X7 _1 x- D! W1 M
CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));! e. E! A5 U( n9 w5 K9 u
================================================================================================================================, m1 }' P& s8 x- r" c1 X* v2 c
7 u" f" p- {, G
{一年十二倍--要涨停选股 }
$ m* u; p z; l# f' mR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
% m" U1 ~; t5 @4 E+ f% {0 pK:=EMA(R,3);
/ X& ?% l2 B, W$ P( LD:=EMA(K,3);$ N9 Q% P6 H3 T: ]( @5 A
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
6 a2 O: m' u; ?N:=IF((陡峭度 > 0.35),6,65);
1 X% p8 m8 u, cVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));0 L3 x4 A# l0 D& v( m
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));, u4 d" a+ X0 ` I
赢利盘:=(WINNER(CLOSE))*(100);; Q+ B9 z4 P$ u4 F1 B: ?) F
赢利线:=FORCAST(赢利盘,7);) X G1 R. D# C/ `. j
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
8 S9 v U1 v- e8 ]* s9 a* @8 A5 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);
1 ]& Y' x7 A* X4 S' U M出击:=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);
" T: q/ ?, K% ~5 d# U进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);5 [8 L& W- X7 v; o
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1)); |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:20