|
公式原码:3 ^" V$ H* H. B. T0 z* W
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);7 m# a# z2 a+ A/ ~7 V' G9 }/ X% k
K:=EMA(R,3);
- }" p4 y6 T% g+ }) WD:=EMA(K,3);( X3 b4 ]' D% j; `
一年十二倍:20,colorred;' `# }- f! o6 v$ S& J
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);3 i- k6 C! o7 t' R6 e+ o* e* U: K
N:=IF((陡峭度 > 0.35),6,65);
3 z6 J, P7 @7 N6 M: FVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 20070110));
5 [ w8 K5 j. K* c' U" qVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 20070110));' X- p0 Z( U8 v N% ?
赢利盘:=(WINNER(CLOSE))*(100);* r+ I5 z8 `/ ~4 B
赢利线:=FORCAST(赢利盘,7);4 ]% f1 w: Z4 F$ @
线:=(FORCAST(VAR1A,7))*((DATE < 20070110)); `/ m$ p. U* o, V( K
满仓:=((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);
* ?. D c& i+ R/ `8 g( eSTICKLINE(满仓,0,40,5,0),Color008000;* @+ t+ ^, r2 ^* F" @6 b5 E
DRAWTEXT(满仓,45,''满仓''),ColorWHITE;
& O5 [$ {- G& D+ o: R5 f3 {: S# j 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);0 n: Y6 H0 j+ {& }$ x5 ~9 v" I
STICKLINE(轻仓,20,D,4,1),ColorFF00FF;
1 M4 K" x" l [0 ]& i" n1 {) vDRAWTEXT(轻仓,45,''轻仓''),ColorFF00FF;8 J Q) u+ a: z2 Q0 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);
. x1 Y p) g5 A* b+ _1 |3 _STICKLINE(出击,0,50,3,1),Color44BB00;
9 U2 n/ n/ B4 L% hDRAWTEXT(出击,55,''出击''),colorred;
! J5 j: P' a# z: x. q* ~1 }, n5 e进一:CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);; W9 B& A7 ^2 D8 A- ]' H' N, l
进二:CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));4 W- r3 o" `& m% q \( g3 T
低进:=IF(进一 and (D > 赢利线),进二,进一);% Z. d1 E9 r, {+ {
DRAWTEXT(低进,30,''低进''),ColorWHITE;
& r) D2 \$ y! ~3 h- ^* tSTICKLINE(低进,20,30,3,1),Color000080;
3 k8 L" G+ T# F" YDRAWTEXT(进二,50,''高进''),Color800080;
a3 v Y; Z% q/ ]% i6 ?9 u, k2 W. rSTICKLINE(进二,30,50,3,1),coloryellow;
8 C# U% [/ w5 u& g+ f- `狂喜:=(30)*(CROSS(VAR1,(-2)));
# b0 I1 @: t' M! X, W# nSTICKLINE(狂喜,0,20,3,1),coloryellow;
- |6 @5 X3 h' ~8 V4 EDRAWTEXT(狂喜,(-5),''要涨停''),coloryellow;4 Y' p( u! T1 F& L7 R
狂喜过望:=(50)*((VAR1 = 0));5 X9 b5 U/ N. \
恐慌:=(20)*(VAR1 < -94);
+ Y- X$ ?$ R }# l d4 Y) lSTICKLINE(恐慌,0,(-20),5,0),ColorC1C1C1;9 o* R% C( R, g" Y% m- u
DRAWTEXT(恐慌,(-25),''恐慌''),ColorC1C1C1;
8 m& N/ m: @. A9 J" R' y5 F h非常恐慌:=(-40)*(VAR1 = (-100));
5 O+ E8 t q8 x2 v9 j; L, A. KSTICKLINE(非常恐慌,0,(-40),7,1),Color800000;1 ^0 B! s& q6 ~; ^" l
DRAWTEXT(非常恐慌,(-45),''非常恐慌''),ColorGREEN;5 x9 s- w4 h8 [+ G
半仓:=(30)*(CROSS(VAR1,(-94)) and (COUNT(恐慌,5) > 0) and (N = REF(N,1)) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0));; @% J4 Q+ b5 _
STICKLINE(半仓,0,30,4,1),ColorFFFF00;' _( I6 P+ {) N0 p5 v
DRAWTEXT(半仓,35,''半仓''),ColorFFFF00;
4 x5 L; Y0 ^# f) N, q加仓:=(30)*(CROSS(K,20) and (COUNT(半仓,5) > 0));
+ W/ A. Z+ S }6 G- \3 v/ ?. H# pSTICKLINE(加仓,0,20,6,1),Color808080;4 Z2 [4 N& }6 A: i
DRAWTEXT(加仓,25,''加仓''),Color808080;6 ?8 l4 \) Z, P j4 ]. n
背离:=(COUNT(恐慌,2) > 0) and (CLOSE < REF(CLOSE,1)) and (VAR1 > REF(VAR1,1));
- d9 M7 B, j% F8 GDRAWICON(背离,0,1),ColorFFFFFF;
/ N+ M1 |4 U( ?: O: t" W================================================================================================
6 F7 H( R3 E9 i) L" o{一年十二倍--满仓选股 }6 L0 j. e+ s2 i. x; c7 v: z
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
0 U. ]& [* Q. TK:=EMA(R,3);
# ]: a' t* K: x( G3 q8 J: b( u. E8 ND:=EMA(K,3);
! |5 \3 e) ^, d8 a' y陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);4 X1 ]& j9 r& y2 ]0 |7 A
N:=IF((陡峭度 > 0.35),6,65);
, r! S, Z7 ^! J0 r; qVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));7 }% E7 Q8 C7 k5 c
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
6 _$ \4 E' e( }+ g( H) c赢利盘:=(WINNER(CLOSE))*(100);- H* R/ R8 s b6 h( z+ K' B
赢利线:=FORCAST(赢利盘,7);/ W7 t, b _3 {1 E3 ]" A H% j
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));: G6 Y8 h" g0 K6 _6 H
((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);7 E8 M1 }# Y& |
=================================================================================================
. k# T8 l% ~! H# d, X{一年十二倍--低进选股 }
7 T7 ^: K6 C4 A* k0 rR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);% v# G5 X" X7 L/ s1 u
K:=EMA(R,3);+ `$ G+ m/ S, ]
D:=EMA(K,3);7 `) V+ V& V: G0 D7 W; a6 L
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);& t; E* ^9 ^4 ]+ ]; |' u
N:=IF((陡峭度 > 0.35),6,65);
6 t. y$ K+ g. ?$ K7 nVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
3 F$ y( D" j* ?) Z0 }VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));$ _, t5 g0 ]; r$ Z0 v! O
赢利盘:=(WINNER(CLOSE))*(100);
2 Y& F2 Y5 ]8 ?$ M赢利线:=FORCAST(赢利盘,7);
2 ~' }6 V1 ?3 |8 ^线:=(FORCAST(VAR1A,7))*((DATE < 30070110));; n' T7 I7 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);
% D6 g, y9 V5 Q2 x% S5 Z3 O) I出击:=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);
' U7 R+ ^- ^, R. p4 S+ d进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);& _. ^% S) ]: i& x. {% B" ~
进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));. \# K7 R R" y6 f# |
IF(进一 and (D > 赢利线),进二,进一);
- ]& M" r$ t3 g6 b: D* N================================================================================================# E9 D; j( }; `9 Q$ Q6 ^8 T0 s
{一年十二倍--高进选股 }
3 \9 y* h" N5 n% NR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);; u) o# t% ]# ?5 @9 u$ _
K:=EMA(R,3);
2 G1 J2 p% A/ m6 f5 T5 `( Y! LD:=EMA(K,3);
; w. S" ^7 u: n陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);3 |, Q. K% a8 ?+ ?0 n, m/ [ Q
N:=IF((陡峭度 > 0.35),6,65);# x i0 o, _# f& x* w0 j! I
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
) \6 O5 d5 V. Z7 uVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
: E& v) f3 j V0 M3 K6 M赢利盘:=(WINNER(CLOSE))*(100);
$ t8 R( ]7 ?0 l' l赢利线:=FORCAST(赢利盘,7);! U' A" Q! n* Y$ Q$ r
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));' ?5 S$ n8 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);+ z9 p$ X. q( g, 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);; X& g3 [5 [% u4 v, d) N$ Y: K. ~# D
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
# C6 X+ r3 t3 v5 n1 J进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
3 o$ _# C. c1 b1 ^+ X. S. }5 X3 lCROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
. Z; ~( l2 m" b================================================================================================================================
* b/ m9 Z G8 e6 y# b
, w9 a- }5 @+ Y+ j{一年十二倍--要涨停选股 }
( Z# K4 P& s5 Z8 Z! aR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);! D M5 i& i1 d* Z+ H1 d9 K
K:=EMA(R,3);6 A" |$ s( B5 ~; t/ q. ~5 c% ~! B \
D:=EMA(K,3);% h9 G; m9 ^4 N I
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);6 w7 Z/ H$ X, C8 Z" b3 a2 e. W
N:=IF((陡峭度 > 0.35),6,65);
0 G0 i3 J4 e! u) D- BVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));! e+ O0 h# t, H P$ ?1 k7 h! D4 F
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));. y9 }! q8 q" |" t+ p: i
赢利盘:=(WINNER(CLOSE))*(100);
+ l7 f0 P+ [7 b; K3 Z+ E赢利线:=FORCAST(赢利盘,7);9 C3 B X* I; ?3 c: ]
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
9 @+ A2 U1 z, T% \- @5 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);
" ]9 h8 L$ \. z0 Y出击:=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 t8 |' x u( q3 |进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
3 G5 u' E' C* N4 x! h5 e e V3 ]进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1)); |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:20