|
公式原码:
4 z# r0 ^! }* s0 W @! oR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);$ ^0 P7 ~5 [. F3 v5 X
K:=EMA(R,3);
3 t8 B3 v/ B# a/ }+ ^1 UD:=EMA(K,3);
$ }! a$ @$ |" {; U0 S0 n一年十二倍:20,colorred;. u! N$ h9 s- U5 y" q* [& z
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
6 f+ P5 J; `5 `6 G0 H" ?6 P' v$ wN:=IF((陡峭度 > 0.35),6,65);2 N. J* Q. j0 c/ B
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 20070110));
8 }8 t: s) e! ~; kVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 20070110));
9 ~) {5 s) A# m9 @; V6 _赢利盘:=(WINNER(CLOSE))*(100);
. Q) |. S$ L+ m7 V. K赢利线:=FORCAST(赢利盘,7);
8 Q% H/ U0 H3 f" r5 X线:=(FORCAST(VAR1A,7))*((DATE < 20070110));
; ? j! z6 \9 ? ` W( s满仓:=((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);2 L( U+ m+ x) ^, m
STICKLINE(满仓,0,40,5,0),Color008000;
! N' h# Z! B( e3 W6 p& y3 SDRAWTEXT(满仓,45,''满仓''),ColorWHITE;
! m% N* v1 Q8 r- x, u7 ^8 U2 X0 i轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);- H1 [+ R9 ~% v. m
STICKLINE(轻仓,20,D,4,1),ColorFF00FF;
/ C/ b7 t, U, }5 f! FDRAWTEXT(轻仓,45,''轻仓''),ColorFF00FF; k" S* H& g, W7 y# t5 i: d
出击:=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; @. s! F- [* l$ bSTICKLINE(出击,0,50,3,1),Color44BB00;( c& x/ ?. c: K: @
DRAWTEXT(出击,55,''出击''),colorred;! h- a& [* `( |+ z0 D% \
进一:CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
9 w: g- X0 |( @! n2 R. X% l进二:CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
1 n9 D. ^3 {0 k" V2 r" e* o低进:=IF(进一 and (D > 赢利线),进二,进一);
" }2 R- k, L# m# m( h2 iDRAWTEXT(低进,30,''低进''),ColorWHITE;8 I% F: A7 [3 p* Q0 B& r9 d
STICKLINE(低进,20,30,3,1),Color000080;3 x" G8 ` \, a; o/ N: n ^1 j
DRAWTEXT(进二,50,''高进''),Color800080;6 ?% }5 N. `1 z( w% `
STICKLINE(进二,30,50,3,1),coloryellow;
" {: f" D& E1 E+ x1 _( F9 x% p狂喜:=(30)*(CROSS(VAR1,(-2)));- U. m7 z5 o5 U
STICKLINE(狂喜,0,20,3,1),coloryellow;
) c; \+ V# B% a: |2 ~9 |- C+ JDRAWTEXT(狂喜,(-5),''要涨停''),coloryellow;
! T# r! B6 m" f% f _, l- u狂喜过望:=(50)*((VAR1 = 0));$ {1 B2 j: V: H4 V
恐慌:=(20)*(VAR1 < -94);
: P* E% s! [( E2 W7 |7 ~3 T; M. LSTICKLINE(恐慌,0,(-20),5,0),ColorC1C1C1;
" z. ?1 e/ m- J# Q* t! ?DRAWTEXT(恐慌,(-25),''恐慌''),ColorC1C1C1;4 n* g# N+ E: U/ I
非常恐慌:=(-40)*(VAR1 = (-100));
% ~* r4 `. m% B+ K8 PSTICKLINE(非常恐慌,0,(-40),7,1),Color800000;
0 y8 ]# h) H, n& G& H& d# NDRAWTEXT(非常恐慌,(-45),''非常恐慌''),ColorGREEN;
. M: z C( j: R5 J2 @半仓:=(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" @6 ~8 z8 ?/ y. E( uSTICKLINE(半仓,0,30,4,1),ColorFFFF00;
9 n8 e6 @/ [9 |" m) BDRAWTEXT(半仓,35,''半仓''),ColorFFFF00;
" `6 e* ?5 e) c3 ?+ l! C5 m加仓:=(30)*(CROSS(K,20) and (COUNT(半仓,5) > 0));) O' n/ Z. K" K \6 n6 ^% \
STICKLINE(加仓,0,20,6,1),Color808080;0 K, X9 t9 u, G9 A
DRAWTEXT(加仓,25,''加仓''),Color808080;
^, B/ y7 D @背离:=(COUNT(恐慌,2) > 0) and (CLOSE < REF(CLOSE,1)) and (VAR1 > REF(VAR1,1));
6 ~8 s* Y: i- c# w1 l7 YDRAWICON(背离,0,1),ColorFFFFFF;+ ^% B0 J" t, t. g1 u X$ y
================================================================================================
( r3 b0 b( S O4 e. |/ Y' s{一年十二倍--满仓选股 }! L& W; z0 _. n. r* S; V
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
9 ~6 }% D; t0 R# m# ?+ G j: S' L3 EK:=EMA(R,3);- u$ R( H W+ S
D:=EMA(K,3);' G, X$ C& G1 ^" }# S7 G
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);, D- K% V8 z- q+ Z
N:=IF((陡峭度 > 0.35),6,65);( `1 S; `6 L. x7 k1 x
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));- N, p+ R) r6 v
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
6 h3 x9 j9 F8 N, ~; S# k$ F赢利盘:=(WINNER(CLOSE))*(100);% Y: ?1 q8 N) o' ?
赢利线:=FORCAST(赢利盘,7);
7 Y9 r" H G; X) g' ]3 g9 }; b$ l7 D线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
" }8 c5 s: a) I5 _6 g((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);! O9 Z4 I2 f6 U/ E) ]
=================================================================================================: P. a! n) ~! R- B, F
{一年十二倍--低进选股 }; ]. Y$ w# @! l
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
( |) l. B7 u2 C6 j% p0 lK:=EMA(R,3);" J2 @ y( k2 T# ]! c% O
D:=EMA(K,3);1 b6 ~3 f! q& `; j$ Q+ d" R5 d- X
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);1 N) R) t0 i/ o0 L# k
N:=IF((陡峭度 > 0.35),6,65);
7 }4 V# Y3 S4 lVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));, D( a* n% N( m* S1 h4 ^6 }
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
: H( z7 ~7 p( Q! C赢利盘:=(WINNER(CLOSE))*(100);
) j! [1 |+ j" C8 M f; C# k赢利线:=FORCAST(赢利盘,7);9 w* c$ r, K# C) a+ r% U/ a
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));, E( O" t9 {! d5 C5 x0 {
轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);
2 W% `4 v# C. B* V5 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);
( c* J: v: ^5 F- k6 t; ~' }6 v, q, J6 T进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
2 W- c. S" ]! @! }) {进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
4 e4 Y6 d+ i' d3 B' mIF(进一 and (D > 赢利线),进二,进一);
' ?7 E x4 s% Y( X================================================================================================
, M3 d- ^8 X1 u$ x{一年十二倍--高进选股 }
4 s0 h% a* w5 ?3 f# V/ ]9 J1 jR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
' O/ A! l9 U! o7 m& ZK:=EMA(R,3);
4 C3 V7 D* Y5 xD:=EMA(K,3);5 `, K% I4 i7 d( ~
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);' B; D1 |% C9 c* K8 T
N:=IF((陡峭度 > 0.35),6,65);2 D: }4 |. d! F/ W
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));; E0 F0 }3 W+ P* v. M
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
' Q C5 w7 p" W/ }( W( z赢利盘:=(WINNER(CLOSE))*(100);
0 `/ U6 I; b. w0 g2 ]赢利线:=FORCAST(赢利盘,7);* H2 z& e7 I) z, Y- r8 O) k
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));% a( r+ @+ U/ r0 F" Y! y! `% E
轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0);
' v9 s4 Y( l5 J8 {出击:=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);# t0 f4 a, s; E; m
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);0 B' \$ o8 X( Z9 i. c3 ~
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
H3 l9 A: ?+ q) QCROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
; R: [2 ]& e; o6 D5 j1 \+ M================================================================================================================================* e) X6 I" w/ }* Z6 H
2 |/ { h) K8 D4 E2 O$ t" i& Q, V{一年十二倍--要涨停选股 }& f0 m; v' H9 u" N
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
/ o5 U% L( P6 q8 `. m+ ?K:=EMA(R,3);
# I; k( b% D1 K5 G( RD:=EMA(K,3);0 m! P& {( U0 l8 z( C7 ~
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);( U. ~6 b0 K' n/ r* q
N:=IF((陡峭度 > 0.35),6,65);
$ r4 T' Q* m; ~ |; |& f1 y8 GVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
6 @9 R" Y' i$ o9 _# JVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110)); M; N3 C; `: v) `
赢利盘:=(WINNER(CLOSE))*(100);
Y; ] E( |( r7 R7 M# N* C赢利线:=FORCAST(赢利盘,7);
" A1 Y) }7 {8 a6 v线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
* r; Y% p, L4 ` }/ {轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0); Q3 w; k) W9 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);" G: `; ~' d( J8 H7 }. P
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
( }# w+ N0 B5 W) e6 l4 p/ N( |进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1)); |