公式原码:
}. { @2 I. `+ PR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);& z% @0 a" {/ G) g* l; k
K:=EMA(R,3);- I) H8 \' m! |" f0 O! C9 p, Z, M/ e
D:=EMA(K,3);8 p% J8 m+ q# j. d/ D
一年十二倍:20,colorred;
/ ]* @5 \4 K- I% f陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);) ?8 r# \' {" E* z- d6 ]
N:=IF((陡峭度 > 0.35),6,65);
4 x: o) o& j5 r' `* F, |% Y7 aVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 20070110));
! H+ d3 r( R; K: e1 {' x! W @VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 20070110));- q5 L Z! v( x; U1 K1 Y* r
赢利盘:=(WINNER(CLOSE))*(100);/ D0 Z. R5 o' y* ?1 q
赢利线:=FORCAST(赢利盘,7);
2 R1 m) U" ]8 P6 \线:=(FORCAST(VAR1A,7))*((DATE < 20070110));+ }5 C! a- s8 |( Q( }+ h ?1 H! n1 Z
满仓:=((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);
- h2 O" w' `# y3 o: m+ tSTICKLINE(满仓,0,40,5,0),Color008000;
" n1 b1 T/ L. ADRAWTEXT(满仓,45,''满仓''),ColorWHITE;
6 Q5 T/ c" q; c% A6 L) S$ 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);
8 l8 D/ g+ {( ~1 e) ?% H/ CSTICKLINE(轻仓,20,D,4,1),ColorFF00FF;
2 T; ~! O- c; L+ y3 g5 NDRAWTEXT(轻仓,45,''轻仓''),ColorFF00FF;
@2 b8 @, P% D% ~! A6 U- 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);
+ P8 S5 Q. A7 V) X3 ^% USTICKLINE(出击,0,50,3,1),Color44BB00;1 ?" z9 m$ c: K8 x& r3 s
DRAWTEXT(出击,55,''出击''),colorred;: [, c4 V0 Q& k. K: W
进一:CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
4 y# b8 |1 o3 H3 H1 R- d6 |8 V进二:CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
: ], H% Z2 Q1 [9 D低进:=IF(进一 and (D > 赢利线),进二,进一);2 s5 h: X$ v6 T0 R/ s4 A: K0 n& F
DRAWTEXT(低进,30,''低进''),ColorWHITE;
/ F- q0 o" ^# X- X3 [, S5 k3 W% f }STICKLINE(低进,20,30,3,1),Color000080;
$ n1 J3 V/ b0 ~% U pDRAWTEXT(进二,50,''高进''),Color800080;7 G2 ?9 T5 n3 H! f8 K3 D4 t2 c
STICKLINE(进二,30,50,3,1),coloryellow;
( m' u3 ^! U( X7 B狂喜:=(30)*(CROSS(VAR1,(-2)));- Z9 x% o3 H% n) m: o$ m! X+ k
STICKLINE(狂喜,0,20,3,1),coloryellow;
; Z) J9 D- G1 t4 B, \+ uDRAWTEXT(狂喜,(-5),''要涨停''),coloryellow;
2 E" n, u1 Y6 T# J( W狂喜过望:=(50)*((VAR1 = 0));
+ J, i+ h) h. f) ?& d恐慌:=(20)*(VAR1 < -94); 2 e/ ^3 X& o1 p
STICKLINE(恐慌,0,(-20),5,0),ColorC1C1C1;
/ S d3 H0 |2 R jDRAWTEXT(恐慌,(-25),''恐慌''),ColorC1C1C1;. M+ k2 g& J% T, K+ ?2 A5 A
非常恐慌:=(-40)*(VAR1 = (-100));
+ Z7 C* V# p; u5 I: f$ NSTICKLINE(非常恐慌,0,(-40),7,1),Color800000;- |- T5 `0 o) y2 O7 E5 \/ I
DRAWTEXT(非常恐慌,(-45),''非常恐慌''),ColorGREEN;/ C) {- n5 P" x5 T0 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));% s% l7 H. r$ f V6 b2 H4 z& b# H
STICKLINE(半仓,0,30,4,1),ColorFFFF00;4 t1 _8 u! E4 j
DRAWTEXT(半仓,35,''半仓''),ColorFFFF00;
% E6 Q* l- W& ~4 ]; R+ O# L9 ]加仓:=(30)*(CROSS(K,20) and (COUNT(半仓,5) > 0));& z$ Y, c5 B; X% H; l: W- [
STICKLINE(加仓,0,20,6,1),Color808080;
e5 L3 S# M% v0 n {1 r9 U9 U! FDRAWTEXT(加仓,25,''加仓''),Color808080;
# _' A7 U6 v9 d: |8 ]$ f8 C U背离:=(COUNT(恐慌,2) > 0) and (CLOSE < REF(CLOSE,1)) and (VAR1 > REF(VAR1,1));
. v7 {# |1 v3 N6 p- o4 EDRAWICON(背离,0,1),ColorFFFFFF;! H/ ]% t: C: I
================================================================================================
) c# u% m) Z9 Z* y" P" \{一年十二倍--满仓选股 }% r1 p8 J# ?7 T+ G, l- b
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);( z# R% n& X8 w; G/ Z- e
K:=EMA(R,3);
* p3 P# F2 J# ]D:=EMA(K,3);
% s3 v" ~: J' S陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1); I) u& H9 g+ I: Q, _
N:=IF((陡峭度 > 0.35),6,65);7 S) N3 L9 D8 ?* a
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));8 m$ m+ A# t& ^. D
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));/ H- c% z" x, o2 _
赢利盘:=(WINNER(CLOSE))*(100);2 r, D6 k; I1 w* M; T+ I( K
赢利线:=FORCAST(赢利盘,7);
) T6 |3 q, B3 E" f" ]线:=(FORCAST(VAR1A,7))*((DATE < 30070110));. u" H, M" H6 Z0 H0 v
((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);8 M! I, a w: K& d5 Z9 ~
=================================================================================================' \9 {( ?4 | U/ S/ h" O) f
{一年十二倍--低进选股 }
! t8 l; |% {7 f# T8 jR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
# ^. [1 b. w6 a+ wK:=EMA(R,3);
2 L$ J7 e' M. m% u m bD:=EMA(K,3);
+ W: k! A0 m$ S# `7 V& T H陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
' k" B) G7 Z! _& |; YN:=IF((陡峭度 > 0.35),6,65);+ T' R8 S, q! @+ ]
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
8 }7 l2 ]0 o3 |VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
7 ?% n; T2 [% w6 L5 H$ H8 J) c赢利盘:=(WINNER(CLOSE))*(100);
! B( I/ ?* V g赢利线:=FORCAST(赢利盘,7);
8 N6 ]! _; R7 }! F线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
7 o+ O" W5 [8 t* |2 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);
J' N$ y' w; o 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);7 j% S- K) w. o* m5 G: F
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
' j8 N0 A) g& q+ O进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));. Z, F z- ~! ^% v
IF(进一 and (D > 赢利线),进二,进一);
! d5 ~5 s! L( y k. i' E' V( C================================================================================================$ }' V" N9 |- D2 Q! o
{一年十二倍--高进选股 }
0 \: B6 i( z- w3 q [$ VR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
7 f7 k6 x" R5 J1 b2 SK:=EMA(R,3);
4 b$ F- }) t: L) y# r: Q% k% }% N, WD:=EMA(K,3);
# P5 K7 F$ S$ a2 M( |3 A$ ?2 \+ `陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
) q* h- j5 F' H* k- gN:=IF((陡峭度 > 0.35),6,65);
& |4 N$ i9 g2 J( OVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
6 p' {$ }: E/ j6 R( CVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
% o# ^9 S& {2 z2 h赢利盘:=(WINNER(CLOSE))*(100);7 a8 e" b. y2 Q1 O( g
赢利线:=FORCAST(赢利盘,7);
! D6 [0 z7 N$ z6 Q# T线:=(FORCAST(VAR1A,7))*((DATE < 30070110));) f$ h1 n& W% t& x3 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);
) V$ e2 {. B) I% W5 m2 m4 P! o' V' s出击:=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);! {) {9 j) Z3 _, E. j
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);" S# c) G4 ]& P4 @+ V% ^
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));7 [0 o% N9 B( F( m+ n1 W O
CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
( W* [( I3 I$ T+ L! ^================================================================================================================================3 B) V4 g. E( ~6 y/ y6 q- Q! @# w
3 z: t+ j" P: l1 l
{一年十二倍--要涨停选股 }
0 g, e8 y8 M( p8 ^! O/ ?R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);! q3 {0 U' ]( w; {; }0 `
K:=EMA(R,3);
) i0 e: F- D3 GD:=EMA(K,3);
0 {( c9 ^; X# X( ~) h陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);2 Y. c) t7 z3 s' W: Y# z
N:=IF((陡峭度 > 0.35),6,65);
1 F( r! v3 N7 ^ ]VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));* v0 O; x" E/ O- Y& ] R8 C
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));2 B, U: S2 s# K/ ~
赢利盘:=(WINNER(CLOSE))*(100);
. h) z& J- B' K) q. `赢利线:=FORCAST(赢利盘,7);8 K; R( n! s e- }
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));4 r8 @, K: F 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);
, X) c+ ~ A6 q9 A0 r0 a- M8 |6 H2 ~; 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);
3 I. G7 K! w q6 n2 R9 a7 e进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
5 q6 Y. u- J" X4 ]/ Q4 [; y& y进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1)); |