|
公式原码:+ {" K6 x r8 W
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);; w3 M0 R) O+ Q
K:=EMA(R,3);
& s- o: |! q' ~) f, P1 ~D:=EMA(K,3);) v# Q K. f* J
一年十二倍:20,colorred;
3 I* F3 e; C8 f陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
8 F1 m: |9 I+ @ H9 WN:=IF((陡峭度 > 0.35),6,65);1 B: m6 \5 n3 G! N9 G0 {4 w5 m& H2 I
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 20070110));- w) G$ _% _+ R% z% Q+ w6 U- S
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 20070110));6 ~# Q6 D9 p" E% I' l
赢利盘:=(WINNER(CLOSE))*(100);
/ J2 v# R3 N0 e9 c: p* @* c; H赢利线:=FORCAST(赢利盘,7);/ `" w( V0 S4 D1 e
线:=(FORCAST(VAR1A,7))*((DATE < 20070110));
( s* J" C( p0 K& N, {: c$ ^满仓:=((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);
6 `# x, I; L8 X! NSTICKLINE(满仓,0,40,5,0),Color008000;0 O ^6 b% d& j* Y. E
DRAWTEXT(满仓,45,''满仓''),ColorWHITE;
/ ^& b1 j; D$ {' ?轻仓:=IF((赢利盘 >= 60) and (线 > REF(线,1)) and (REF(线,1) < 20) and (线 < 40) and (COUNT((线 > REF(线,1)),5) = 1) and (REF(N,1) = 6),1,0); ]5 c5 Z% m( o3 W" s% y. P+ @
STICKLINE(轻仓,20,D,4,1),ColorFF00FF;( K% r4 D$ T: o- e1 K
DRAWTEXT(轻仓,45,''轻仓''),ColorFF00FF;
1 n* E J H7 e' Z8 ^出击:=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);
8 \- j, f0 [ \& W/ Q, @$ h) ]STICKLINE(出击,0,50,3,1),Color44BB00;
. @9 r+ p, F k8 mDRAWTEXT(出击,55,''出击''),colorred;4 `- j) g. l7 X' |/ R
进一:CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);- {2 |1 F4 W, x' I1 v7 [ h
进二:CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
0 L! B1 o5 g5 e7 M4 y+ L# E低进:=IF(进一 and (D > 赢利线),进二,进一);) { P3 s/ b. P
DRAWTEXT(低进,30,''低进''),ColorWHITE;; W9 t' B' b9 H
STICKLINE(低进,20,30,3,1),Color000080;
" v( d% z8 X- c! GDRAWTEXT(进二,50,''高进''),Color800080;
4 _* Y! F. q w3 DSTICKLINE(进二,30,50,3,1),coloryellow;3 z* s* U G2 L. N
狂喜:=(30)*(CROSS(VAR1,(-2)));2 E3 K& R3 L7 l# X# `
STICKLINE(狂喜,0,20,3,1),coloryellow;
* L6 [2 \; D7 S9 _8 x3 eDRAWTEXT(狂喜,(-5),''要涨停''),coloryellow;
5 h F# \1 h# Y( p6 o, P4 w狂喜过望:=(50)*((VAR1 = 0));. V: c2 T9 i0 U, @4 \
恐慌:=(20)*(VAR1 < -94); : p& S4 `9 [5 y/ M
STICKLINE(恐慌,0,(-20),5,0),ColorC1C1C1;
7 I" K; u/ K9 ]$ I5 F6 ?" xDRAWTEXT(恐慌,(-25),''恐慌''),ColorC1C1C1;
- C* P" Y y* R1 Q* G# E& k ^非常恐慌:=(-40)*(VAR1 = (-100));
- J: ]; j3 h! j0 w- @STICKLINE(非常恐慌,0,(-40),7,1),Color800000;
6 K* l c! S5 C# C8 EDRAWTEXT(非常恐慌,(-45),''非常恐慌''),ColorGREEN;+ ^- _% ~; {1 i! s! H1 a j9 S; B
半仓:=(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' {& k A" ESTICKLINE(半仓,0,30,4,1),ColorFFFF00;
5 ~8 _. f4 O- o+ f$ V& ]* lDRAWTEXT(半仓,35,''半仓''),ColorFFFF00;9 P5 l1 C/ X: P. i- r% E/ _
加仓:=(30)*(CROSS(K,20) and (COUNT(半仓,5) > 0));2 M+ H, K. G9 ~: h4 ?$ S9 z* L
STICKLINE(加仓,0,20,6,1),Color808080;% A+ _* P' Y3 v' F( o% d7 d% l
DRAWTEXT(加仓,25,''加仓''),Color808080;, e/ g' h) w- F- g; |# A
背离:=(COUNT(恐慌,2) > 0) and (CLOSE < REF(CLOSE,1)) and (VAR1 > REF(VAR1,1));
1 R6 ?( m+ U6 r" V, [DRAWICON(背离,0,1),ColorFFFFFF;" _* \) S* k! [/ F) n
================================================================================================
' R$ Y$ D' K& |9 p* S9 Y{一年十二倍--满仓选股 }
6 ] n+ E- F$ q) ?1 _! JR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);) J( ^ Q i8 U+ Q% f: o
K:=EMA(R,3);; W# ]( b, a6 \) y
D:=EMA(K,3);
, s$ |2 Q" {8 D- W陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
6 }7 d' ?# Q0 _$ z$ \0 {N:=IF((陡峭度 > 0.35),6,65);
. J7 z+ \6 K& _VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));; m: n* w: t7 b8 c0 W! N. M5 z
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
6 O2 i5 q. q7 M! N0 w, d赢利盘:=(WINNER(CLOSE))*(100);3 B" q% s& l- R# Y* B- U- d' Z
赢利线:=FORCAST(赢利盘,7);; `, A( t" H3 }0 K% U0 m; s
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
0 O" {& `0 x# W. R* P9 }9 e L((线 > REF(线,1)) and (线 < 25) and (COUNT((线 > REF(线,1)),5) = 1) and IF((N = 6),(赢利盘 < 60),(赢利盘 < 40)) and (COUNT((赢利线 > 20),20) > 0))*(40);* T6 W- c# A- l' T/ R1 [
=================================================================================================/ G% {+ ^0 d) N% v
{一年十二倍--低进选股 }
; S( f+ X# l0 [, G. dR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
! `7 x% M$ [9 ]- y) p# bK:=EMA(R,3);. Q: R& O# Y; n. R
D:=EMA(K,3);
^7 {$ D2 d. ?陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
/ R/ o. n2 k" ]' t n$ kN:=IF((陡峭度 > 0.35),6,65);3 ?7 a* @ g- D/ w% y( R9 c% V% R
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));+ p. S$ K) h. b: E* N4 y
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));% m5 r! S. k+ h" M$ Q0 n' p8 [
赢利盘:=(WINNER(CLOSE))*(100);, W3 r0 x. h9 F) ^" ~
赢利线:=FORCAST(赢利盘,7);. b+ F: q% \2 A" J& s
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));4 y; }/ e6 L3 q: t7 o& y) }7 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);# R* K0 M& r! X: K k2 \- t* 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);
- ` x8 h/ [* v* d* m5 c进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
( M1 n/ V" q* D进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));3 y4 w: ^, J1 n. B$ n
IF(进一 and (D > 赢利线),进二,进一);
# h( O8 n- ]) S; ]; P' O================================================================================================
: z1 K5 |$ G$ @; c) _; |{一年十二倍--高进选股 }
3 p) w( v9 \: mR:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);5 b2 h4 ~2 A8 R6 b' b
K:=EMA(R,3);
' O( j/ n& l0 a7 UD:=EMA(K,3);4 D: J4 x( g7 V: f5 D
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);2 ~: J1 O% C/ a& v" Y$ ^
N:=IF((陡峭度 > 0.35),6,65);: A5 p3 m$ r! M' _
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));( a$ `' }: p8 e) o
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));2 K, W' \1 s. P
赢利盘:=(WINNER(CLOSE))*(100);$ f% F% o# ~ u/ i
赢利线:=FORCAST(赢利盘,7);2 o. M* M/ B# D/ U* H
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));! b* F4 N) M2 U& c P" r
轻仓:=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) m8 X' K! R$ T
出击:=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 B _, i0 H2 E* T/ B. n进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
2 F7 j3 \3 K! |' A5 P1 }- r8 U! X进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));
/ U1 l4 O/ g& LCROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1));0 g0 x+ Q; G: Z" R2 f& C7 J
================================================================================================================================! B; b. I: H7 z! ^8 {
2 \0 X9 v& ]. V- I5 y
{一年十二倍--要涨停选股 }+ |! j' N& ]3 w, z
R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);7 j) Q( Y6 z p' j
K:=EMA(R,3);
2 v7 {' v" c9 c1 jD:=EMA(K,3);+ D2 m) ^/ j7 E
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);& S" l' }0 x' `
N:=IF((陡峭度 > 0.35),6,65);
, ]$ @4 V# x" @* cVAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE < 30070110));
* j' }& ] ^7 N1 f! d1 x% Z' s: AVAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 30070110));
4 v- w3 w# _0 J' m3 C赢利盘:=(WINNER(CLOSE))*(100);
$ ]( k/ o1 H+ U" o% a8 o赢利线:=FORCAST(赢利盘,7);1 p! o p/ S% t3 n
线:=(FORCAST(VAR1A,7))*((DATE < 30070110));
) G' x3 m3 e8 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);
; J$ C& J; u. X. j/ Q1 |4 A: K) X出击:=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);' m3 @ p( K8 N3 o# \+ s4 Z7 n; R3 d
进一:=CROSS(线,D) and (D > 30) and (D > REF(D,1)) and (D < 80);
2 ?/ Q" [: k- w9 e2 x$ ^- b进二:=CROSS(线,赢利线) and (D > 30) and (赢利线 > 25) and (D > REF(D,1)); |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:20