|
公式原码:& U$ M: A9 o3 @% C. ?4 L9 k
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);5 n1 Q. [- J9 g% i( g
K:=EMA(R,3);$ B* [7 N) e- _/ G0 r
D:=EMA(K,3);; Q2 T9 A+ g6 g/ k0 _2 {* }
一年十二倍:20,colorred;, q. c* a- ]" i! H# @
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);; }6 Z6 a2 c2 w9 @7 B/ Y
N:=IF((陡峭度 > 0.35),6,65);
; t8 \) n. E3 R* S( }VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 20070110)); N) \' |6 D0 H5 b9 Y
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 20070110));( z4 p& r8 G" l/ i9 R: B
赢利盘:=(WINNER(CLOSE))*(100);
1 p9 x( j, S$ G$ |赢利线:=FORCAST(赢利盘,7);
/ }- ` \8 a. e! d3 u' m线:=(FORCAST(VAR1A,7))*((DATE < 20070110));
* I, f( j6 ^# Z3 d满仓:=((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);2 Q& ^" I3 k- S
STICKLINE(满仓,0,40,5,0),Color008000;0 N# x9 q& P; j5 ^4 S! F: w
DRAWTEXT(满仓,45,''满仓''),ColorWHITE;1 w0 Q% N. B9 c, m' S4 s9 T0 ~
轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);
- b( E* u4 F% c$ @$ pSTICKLINE(轻仓,20,D,4,1),ColorFF00FF;+ ^8 u: ]; E# M
DRAWTEXT(轻仓,45,''轻仓''),ColorFF00FF;2 V: p2 E, i8 E# e4 a
出击:=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 A! K( J2 C; @3 ^
STICKLINE(出击,0,50,3,1),Color44BB00;
$ D8 ]& m, k# n% ]/ M! |DRAWTEXT(出击,55,''出击''),colorred;6 T, x: h6 I/ \$ Q
进一:CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
; \! [4 D; Z# }: z u进二:CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1)); z' i, Y& V- M. d
低进:=IF(进一 and (D > 赢利线),进二,进一);3 _3 C5 U: I+ c; c
DRAWTEXT(低进,30,''低进''),ColorWHITE;# U5 {' P" Y' @ f, m8 A
STICKLINE(低进,20,30,3,1),Color000080;) I/ b& i0 x; R+ X! H9 @8 }, A
DRAWTEXT(进二,50,''高进''),Color800080;
1 S5 h$ Z6 S7 O9 B( w3 X! HSTICKLINE(进二,30,50,3,1),coloryellow;# u3 B3 P8 }% t+ Z. m
狂喜:=(30)*(CROSS(VAR1,(-2)));- j$ D& ~( p5 N
STICKLINE(狂喜,0,20,3,1),coloryellow;9 k$ J# a- \$ f! _1 c
DRAWTEXT(狂喜,(-5),''要涨停''),coloryellow;
( t! M! ^, l: c+ T狂喜过望:=(50)*((VAR1 = 0));, e" L# J8 `+ p* t& c# v9 Q$ q
恐慌:=(20)*(VAR1 < -94); $ l3 r" g8 I' p! i9 E0 H- ]
STICKLINE(恐慌,0,(-20),5,0),ColorC1C1C1;# _( a& H4 U! g7 U a
DRAWTEXT(恐慌,(-25),''恐慌''),ColorC1C1C1;
6 z$ u& M( R& X. D非常恐慌:=(-40)*(VAR1 = (-100));
& k) ]+ m7 L1 s; |STICKLINE(非常恐慌,0,(-40),7,1),Color800000;
% S0 Q G) |: {% g# I' MDRAWTEXT(非常恐慌,(-45),''非常恐慌''),ColorGREEN;
& |/ G4 e/ n U- l6 T. Q半仓:=(30)*(CROSS(VAR1,(-94)) and (COUNT(恐慌,5) > 0) and (N = REF(N,1)) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0));2 r$ F$ a3 h6 b8 [2 ]& ~* R
STICKLINE(半仓,0,30,4,1),ColorFFFF00;) ^ ^7 D2 u5 ?- z" q9 t
DRAWTEXT(半仓,35,''半仓''),ColorFFFF00;! d1 J C' ^7 c
加仓:=(30)*(CROSS(K,20) and (COUNT(半仓,5) > 0));$ d* Y( Z7 v9 V" N
STICKLINE(加仓,0,20,6,1),Color808080;1 Z& E3 [7 N- F" E! q. A- H% r9 w
DRAWTEXT(加仓,25,''加仓''),Color808080;
1 T: |7 [1 G, _8 [$ n+ k$ S9 T( p背离:=(COUNT(恐慌,2) > 0) and (CLOSE < REF(CLOSE,1)) and (VAR1 > REF(VAR1,1));
% g, N' K/ U: _# P" ~8 G5 |DRAWICON(背离,0,1),ColorFFFFFF;
* A& b9 ], g9 g7 y$ o================================================================================================- X, s4 m# \* G. N. j) H
{一年十二倍--满仓选股 }
) b5 o! X: }% _R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);2 O4 e! A3 s& v2 [0 Y& v
K:=EMA(R,3);* y, ^9 o' a% B! p0 ]
D:=EMA(K,3);
/ ^4 P. T! Q! p8 e7 C陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
9 a2 H4 a# \ C. P' D0 m3 W# iN:=IF((陡峭度 > 0.35),6,65);
4 d( I( W3 O- J F- E. p+ [# }VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));2 k6 u* }8 r# j' q
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
- ^- p; t3 Q2 ?* t6 m J0 C赢利盘:=(WINNER(CLOSE))*(100);2 f# H% k% i$ {2 m2 a M3 R2 @* V
赢利线:=FORCAST(赢利盘,7);
' V+ C# k( B/ \ \. n线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
2 T- N: p9 \8 d3 g((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);0 }4 x3 y7 l# ^% C* t/ p: M
=================================================================================================' p5 Y; M1 U# `& ]$ ^) I. s
{一年十二倍--低进选股 }) q& P. N4 n7 z) W
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
% ^* L I5 N; g" bK:=EMA(R,3);
7 s9 \9 s) k4 b/ XD:=EMA(K,3);
# M4 n1 b6 C& d) ? m+ o陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
, O0 a7 R. b( M; ?) bN:=IF((陡峭度 > 0.35),6,65);: H' r4 v- O5 i; f. K
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
2 c8 V6 `6 a1 a# QVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));; s1 e. ]/ m9 n' Z) t4 k2 U$ w5 z
赢利盘:=(WINNER(CLOSE))*(100);- c, [& A! T4 O# ]8 z% H# x& v3 v# Q
赢利线:=FORCAST(赢利盘,7);
$ L2 @* D- o) J. ^' K" \" N! x6 P F线:=(FORCAST(VAR1A,7))*((DATE < 30070110));5 @! R7 b+ h* p3 B/ Q3 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);& _) e$ o' g; R! ?" Y: `) O5 U" 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);2 T+ P$ b1 h8 l$ q% I7 F
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);$ [' Q/ V$ `& A' }$ R
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
/ S/ e. N& Y: O* ~' l0 U c$ m: FIF(进一 and (D > 赢利线),进二,进一);
, G8 d) T" A) y% G================================================================================================8 j4 X) i; i5 A% q/ q
{一年十二倍--高进选股 }, z) _7 J9 U0 R- D% \% f2 R& T( [
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);- W% Z; r" J1 X) b
K:=EMA(R,3);7 G8 Z7 e( I& e, Y, s
D:=EMA(K,3);5 K- o- n, _( U `* C7 r7 a
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
* P3 x: B2 g: |8 m1 ]N:=IF((陡峭度 > 0.35),6,65);
3 p) r! l @( Q9 w6 B J4 J9 PVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));9 L# g0 J# N. ~: n7 U
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
, C6 _2 X4 u) E; t赢利盘:=(WINNER(CLOSE))*(100);
5 S9 ^! ^9 W3 P+ _/ Z0 u赢利线:=FORCAST(赢利盘,7); p) J+ Y" b, i1 F! k: D! M0 W3 y3 N' m
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
. O- I/ V, M8 L, D7 T轻仓:=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 p9 B' h& y5 z6 c+ O出击:=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);1 y; O- m9 I6 l1 H- Z
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
- G; L" U, v1 ` l进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
- V% M/ d, b4 @. [, ?4 R5 S& N0 NCROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));) B; v: f: k5 F6 b# w9 f$ j
================================================================================================================================
9 _/ u" q- c! ~) B6 k' l6 M! x
) N; B8 |' j8 O4 r" c{一年十二倍--要涨停选股 } U& y( ?, p/ T9 K6 J# a5 Q* v
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
! M6 f$ q! K5 G5 w g$ IK:=EMA(R,3);7 r# O2 G9 ^3 i. a
D:=EMA(K,3);
( V; Z! q3 m& C6 V$ v) e& Q: M. ?陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
, U6 P- K \9 f! Y" `) T# R7 BN:=IF((陡峭度 > 0.35),6,65);
$ }1 c! c; y9 U) a! nVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
, z, [9 e9 `3 Q2 fVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
6 T3 b% D3 b4 z9 I赢利盘:=(WINNER(CLOSE))*(100);, S! W2 X1 M; \* n/ Y5 ?! K! t
赢利线:=FORCAST(赢利盘,7);: q4 v0 L ~, ~1 I' {7 X }
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));( C1 J/ u* i; {$ M! }2 Q9 Z1 a
轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);
6 k, p, i3 n% ^' l1 E出击:=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 T- h" G3 A0 W1 D+ c
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);+ X. o9 Y% I5 s3 w) B9 ]
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1)); |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:20