|
公式原码:
. t( q* O: d5 f# aR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);, |. |, z7 ~3 L. K, T9 I% B
K:=EMA(R,3); [5 b$ T) a5 a* @; F) W+ }
D:=EMA(K,3); p/ E* B; ?5 N' ? i" R
一年十二倍:20,colorred;
1 y. ~3 K& [; x Z; @陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
' Q/ u1 n) z0 Q9 O$ f+ u2 CN:=IF((陡峭度 > 0.35),6,65);
+ U+ \9 M. Y& M1 H" \6 [1 qVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 20070110));" I1 R9 V4 {, U% P8 d, |
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 20070110));
; t- `8 c3 }: s6 |赢利盘:=(WINNER(CLOSE))*(100);, c7 \% G" i/ ~" s. m3 i
赢利线:=FORCAST(赢利盘,7);0 q, v1 {0 D- w% [
线:=(FORCAST(VAR1A,7))*((DATE < 20070110));$ `5 u6 Y, \9 |) t; ~
满仓:=((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);7 @) ?# V! ]0 P- B9 y2 l
STICKLINE(满仓,0,40,5,0),Color008000;
; d8 a& T( ]/ b1 U/ ~7 u3 n) ] T3 oDRAWTEXT(满仓,45,''满仓''),ColorWHITE;
, Y8 ?8 Y# r& I8 Y( r$ 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);& Y3 D6 j) Z1 D& j
STICKLINE(轻仓,20,D,4,1),ColorFF00FF;
, I5 f. Y' q! P( J* l4 V# ADRAWTEXT(轻仓,45,''轻仓''),ColorFF00FF;. a6 {5 _- v4 O' J; Y; 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 B+ |7 M ?: ]: MSTICKLINE(出击,0,50,3,1),Color44BB00;
6 t* W6 Z% t9 JDRAWTEXT(出击,55,''出击''),colorred;
3 z% s& S# o. }9 s# D: a8 b进一:CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
5 b7 W5 {9 a0 V/ `! ^+ o; L进二:CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));; H8 l( G5 _- m/ |
低进:=IF(进一 and (D > 赢利线),进二,进一);/ Q1 T& r! O I6 U, U$ ~8 O. a
DRAWTEXT(低进,30,''低进''),ColorWHITE;+ B- _* F$ S- i p' F/ l
STICKLINE(低进,20,30,3,1),Color000080;0 @$ O: U& k( w* X5 q4 R! O
DRAWTEXT(进二,50,''高进''),Color800080;
! i$ r$ {9 [+ [' W: K/ H8 PSTICKLINE(进二,30,50,3,1),coloryellow;
. m6 ]9 {3 k( V6 A7 s" E4 n狂喜:=(30)*(CROSS(VAR1,(-2)));
1 n) l, `/ [. p* x$ A' a! u7 r XSTICKLINE(狂喜,0,20,3,1),coloryellow;
( V+ w% O& L1 n0 \/ QDRAWTEXT(狂喜,(-5),''要涨停''),coloryellow;. j0 x! J! U$ `+ C% Y4 O
狂喜过望:=(50)*((VAR1 = 0));* B* b9 L. ^6 }! k
恐慌:=(20)*(VAR1 < -94); ' }1 X& k9 R' q: w7 J
STICKLINE(恐慌,0,(-20),5,0),ColorC1C1C1;. r4 i: ^3 C3 V4 w! o+ c# x8 O- t( x
DRAWTEXT(恐慌,(-25),''恐慌''),ColorC1C1C1;1 x s- U% `5 ^, N
非常恐慌:=(-40)*(VAR1 = (-100)); - c" Y1 T! C b- U
STICKLINE(非常恐慌,0,(-40),7,1),Color800000;
* L) H) V }$ ]! cDRAWTEXT(非常恐慌,(-45),''非常恐慌''),ColorGREEN;: J- \$ N) K7 d# @5 y1 n; l7 [
半仓:=(30)*(CROSS(VAR1,(-94)) and (COUNT(恐慌,5) > 0) and (N = REF(N,1)) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0));" B% T% n2 Y7 r+ w" u( @6 U7 B
STICKLINE(半仓,0,30,4,1),ColorFFFF00; `2 H; t' K0 j
DRAWTEXT(半仓,35,''半仓''),ColorFFFF00;; h; ]- F# g, T8 P9 B
加仓:=(30)*(CROSS(K,20) and (COUNT(半仓,5) > 0));
0 @0 I6 d2 G3 t6 T7 g: VSTICKLINE(加仓,0,20,6,1),Color808080;. s v$ H/ p, A# h
DRAWTEXT(加仓,25,''加仓''),Color808080;
+ f6 s0 d8 d. v" i- H5 i背离:=(COUNT(恐慌,2) > 0) and (CLOSE < REF(CLOSE,1)) and (VAR1 > REF(VAR1,1));
0 I, K9 b3 T2 m, b c6 b# d) I% tDRAWICON(背离,0,1),ColorFFFFFF;
; F# t$ D! k1 D5 ^================================================================================================
3 V; s' r' I6 ^% n! i8 }( x' k, V{一年十二倍--满仓选股 }, k Z- s" h1 i& t
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);4 W( W$ s3 y3 a* Z# G: A: B2 z
K:=EMA(R,3);
9 X a0 G- j+ CD:=EMA(K,3);( ?5 T( a' I" d% y0 s) o$ |
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);% M7 ?+ _, A7 d1 f" S# W5 ]1 S
N:=IF((陡峭度 > 0.35),6,65);! k0 O* k3 m5 |( f' u) x
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
( c5 h# W: R- L+ Y4 e- WVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));0 |6 z2 Q* H' _8 n$ k
赢利盘:=(WINNER(CLOSE))*(100);
. m; w) e4 z8 ~- F" E- Q3 k赢利线:=FORCAST(赢利盘,7);
9 N2 Y$ J0 c9 ?* p5 J6 }, [线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
. u- \0 b1 q& |# h4 m((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);7 t" ^0 L" w! b
=================================================================================================* }& B/ k' ?4 F9 j
{一年十二倍--低进选股 }: Q) m6 Z1 {0 B
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);) \& u2 l6 Y; R+ f9 [1 S* B
K:=EMA(R,3);' \% v4 ?6 W8 j
D:=EMA(K,3);4 r% r8 y1 o& V* {
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
$ N- H# Y' k% ^- F. sN:=IF((陡峭度 > 0.35),6,65);
7 G6 ]1 R. i' w& V$ K$ sVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));3 a# f/ W: Q) D% y0 E, U* e
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
& }& K- e! M7 |2 u9 I赢利盘:=(WINNER(CLOSE))*(100);
6 d1 J8 N+ k8 D- b1 J3 D. J赢利线:=FORCAST(赢利盘,7);
; x3 P1 C' H3 o1 `! d# s% B线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
2 w' L8 Y% G x. P; W; k7 z; C轻仓:=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 I8 Z8 @% M. i& k- }0 R出击:=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);) k& `# v& q2 s9 u% ~
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
7 W: j. P; e4 J0 J进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
+ X8 g$ b: B, ]IF(进一 and (D > 赢利线),进二,进一);0 \5 q& m' m. \- E) G7 @
================================================================================================
7 V; l7 R; A# `/ @/ v8 N{一年十二倍--高进选股 }
" F- Q( j" e/ ~0 F, i1 b/ iR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
$ g$ ]8 ^/ m/ w; F3 A- kK:=EMA(R,3);6 |$ O% w# A* T9 Y
D:=EMA(K,3);
9 h# c! Y6 g1 B9 b1 c$ }7 z陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
* g7 L3 f/ D% ^. G8 ?N:=IF((陡峭度 > 0.35),6,65);6 Q' ?; `, _/ b2 P2 m$ O
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));4 _! D- i& @: n; X0 l* |
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
- S3 c* j% @5 u+ P; t: ^( J `1 K赢利盘:=(WINNER(CLOSE))*(100);
5 Q- k. D3 Y( x" q赢利线:=FORCAST(赢利盘,7);
3 K' A5 j( W4 h- M线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
, O K: q; _4 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);
+ Z% o; Z- {' j' h; {% x1 {出击:=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 X3 U' ?) y3 b+ j: ?: ~
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
s' x& i5 [1 O: i& f0 z) S' X* N进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
1 D1 A. i" y0 `. `0 g$ B0 j& \CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));& d7 m R' n. M! D$ J1 e
================================================================================================================================* Q8 e) a+ H' H+ T" t6 i1 x7 A+ d9 W
9 A5 Q" e3 E. A
{一年十二倍--要涨停选股 }( a O3 l6 J5 A9 c6 d& ^4 T
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);% {- @0 X* q0 Z8 S) m) Y
K:=EMA(R,3);2 f8 B& `$ ], N6 t2 E/ V7 f
D:=EMA(K,3);% P3 }9 t0 h I% d$ {
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);9 g! b4 T1 N5 S* @) d
N:=IF((陡峭度 > 0.35),6,65);8 l( r, x% ?1 l) p
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
7 o( L; J+ U) IVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));# [# F7 W$ G$ ?, S7 a
赢利盘:=(WINNER(CLOSE))*(100);
; D. C' F" X l$ Z3 ~7 o& v% V1 r赢利线:=FORCAST(赢利盘,7);- d2 b; X7 G: C' }6 S r
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
9 ~3 v+ a7 l- j- i( 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);
' O* \1 q' o4 s: ~' |8 m- P0 V出击:=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);
# C0 Q+ _) I) Q; W1 h J2 U- }! V进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);; w' f/ U/ z/ n3 G; `, m. X$ I
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1)); |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:20