|
一，为解盘照图把图文笔墨没置一下。% t% R, d- L4 D
二，参数K有三种没置方式，缺省为0。k=0时配景变色，当图面k线周期多时k线* ]1 Y, }7 }2 R) h
有压缩征象。k=2时配景稳定色无压缩，但会失去表现强弱的配景自功变色。
! s6 {4 j- I8 d+ H- A) _三，k=2时只有熊样线以上的图面变色,无压缩。但要选择体系配景致共同才好
_9 m) ^& t2 i0 _* M; H 看。(我选的狩猎绿)
$ S5 U7 m4 y9 E
! K0 u- w+ d, K& Q! ^4 R3 V5 h; u+ P
8 ?0 ?1 @, P7 t- Z8 P1 I/ C& C) X. r" ~% M. Z6 V8 v9 G8 s
{阳光普照__TDX 参数K(0,2,0) 缺省为0}* Y2 N1 l+ T) W- e* N4 u
TT:=240/FROMOPEN;
3 A0 c# c/ B1 O2 u, H1 A比:=TT;: a, c0 o( L: c. X) Y- ]* \
促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;' J2 h: p, r8 f1 i& J8 H% J' R& Y
AY2:=EMA(CLOSE,12)-EMA(CLOSE,26);
; i& W6 K2 f6 J. H( q4 |# P! GAZ2:=EMA(AY2,9);; _3 m: }% D' C% O1 l( x$ {
LT2:=(AY2-AZ2);$ M6 I8 ~/ S* M) E& T4 S0 l8 L
L211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;6 O# }" q3 I% X& N4 I8 Q
ZGD:=HHV(H,80)*0.99;7 D" z* v8 B( h
ZGD2:=CONST(ZGD);
7 y, \3 k8 |; @8 i* yZDD:=LLV(L211,80);
+ w' `4 _/ ^* @ZDD2:=CONST(ZDD);
3 }8 I8 Y0 d1 w6 oYYA4:=MA(CLOSE,20);1 k4 z! L* b- f# I- V
YYA5:=(CLOSE > MA(CLOSE,5));
$ q6 C7 j) |/ A4 t, K" VYYA6:=(MA(CLOSE,5) > MA(CLOSE,10));/ I% F# k4 f. W1 ~9 @
YYA7:=(CLOSE > MA(CLOSE,10));2 Q+ l% }* L8 h" k2 m, Y3 H
YYA8:=(MA(CLOSE,5) > MA(CLOSE,20));
0 O; d5 j0 v! j5 @, K) f' fYYA9:=(CLOSE > MA(CLOSE,20));
1 Q6 `8 I1 g; b8 y' JYYA10:=REF(YYA4,1);
" o+ d; T$ U& eYYA11:=(YYA4 > YYA10);
( O* F; Y- q1 W7 v( ?YYAVX:=(((((IF(YYA5,10,(0 - 10)) + IF(YYA6,10,(0 - 10))) + IF(YYA7,10,(0 - 10))) + IF(YYA8,10,(0 - 10))) + IF(YYA9,10,(0 - 10))) + IF(YYA11,10,(0 - 10)));2 F8 O0 m( K7 o7 \- K6 p* B5 [
DSLX:=(CLOSE / INDEXC);
( g4 k) L0 c8 C# Y- K M' P; EDSLX1:=MA(DSLX,5);
4 \1 Z+ F( N) J* ]( mDSLX2:=MA(DSLX,10);
) b' Z1 F# l6 c& I. LYYV1:=MA(VOL,5);0 t3 o" B$ `* O/ ~, h
YYV2:=MA(VOL,10);
9 T' J' C- e0 z) u: y$ C# ?J1:=CONST(IF( YYAVX > 0,200,100));
/ K' @ j' T$ a, GJ2:=CONST(IF( YYAVX > 0,00,100));
9 u$ @/ T. e% C7 q _# N! {J3:=CONST(IF( YYAVX > 0,100,100)); R( g6 }; P7 l. z1 K! [0 L
ZGD3:=IF(K=0,ZGD2,DRAWNULL);
- l+ T6 ]5 \& q- p9 P3 {7 P- G% ]; NZDD3:=IF(K=0,ZDD2,DRAWNULL);
4 e0 o N. a& |& y: \- l" }- v1 `ZGD4:=IF(K=1,ZGD2,DRAWNULL);" w, Y" U" q2 Y( s/ N/ {) _) o7 I
牛背:=MA(C,21);
# _- t' ]/ P/ G w7 c% E牛逼:=牛背+2*STD(C,21);
y6 |) W: {; ]8 l& Y+ D熊样:=牛背-2*STD(C,21);" P2 X9 W, b2 r' K1 ^3 k3 F G$ c8 w
牛背2:=IF(C>牛背,牛背,DRAWNULL);$ l7 w/ g6 y3 g( b0 L; c7 h
熊样2:=IF(C>牛背,熊样,DRAWNULL);1 ]* P6 R- n! ]8 O7 K& W
DRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);# @& D7 `1 C- N4 P. _: c
DRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);% X( t& v& C2 E9 ?- S: {
DRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));
' _) G2 T! Z" c: i% i% }/ S牛缰绳:MA(CLOSE,4);
7 `7 `2 p# t+ b牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;
+ K1 }# n4 Q% k& h8 f牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;) o" V( }( W$ q( P, Q
牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;
/ ^0 k5 d0 W/ CAY:=EMA(CLOSE,12)-EMA(CLOSE,26);, F7 U, ] |3 r/ s) f/ r: b
AZ:=EMA(AY,9);
0 S+ o- W( v. V2 o9 wLT:=(AY-AZ); n2 J" C% k: F; ^% O! j
L21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
_* e: E1 e4 r; K; ` X8 ^4 S% n8 lIF(LT,LLV(L,21),DRAWNULL),COLORFFFF00;
* ^# _9 Q( }5 K1 | G+ y9 C) SSTICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;
4 G. [4 o. w0 q: c) W5 \! O5 vSTICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
7 I7 b* y9 N. z+ J5 FSTICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;
) H0 j6 w' Y- x' b7 WSTICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
6 F; W+ b7 r* o: P/ A/ dSTICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE = DSLX1)),1,0));) l: I9 p$ q! y8 s4 s
环境2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0)); G$ \- H1 z. L* ?, \
环境3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));/ D" l6 s1 D% A
环境4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 = YYV2)) AND (DSLX >= DSLX1)),1,0));
7 U+ @: Y, I4 ~ a5 v环境6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));( h' g8 E! T A: |. t, g0 w
环境7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));7 N' O ^; V; P6 }
环境8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
# i$ O* O2 P/ _' o环境9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));' G, `) U, K5 H X% O
环境10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));8 D/ ?' m* L6 \3 E9 W
环境11:CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW;
' X& L7 V" K9 G环境12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
; _$ k* ^5 x+ V& z1 g" G- W环境13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));+ D8 O9 r: t5 z2 c- ?
环境14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
) r+ Y, y/ a7 Q& K环境15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
3 E: R2 ?, ~- J$ X环境16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));# |) X" y/ e* x7 k
大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0));/ B# b( u+ P5 j
大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));. h( g' V$ Q8 ?
大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));% Z: ^ o& o9 B" t, ?
大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));7 b9 P9 F* A0 F ~" U, c
大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));
4 x3 h8 J4 R! Q$ S大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));
2 T" ]3 \& E4 D大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0));
9 ~1 t4 ~8 R d( A' M" U2 j大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));
# m( i5 B& S7 g S; O7 L! `1 q3 X
WJ:=(H+L+C)/3;, B" k4 O6 H0 K/ g: \; \
V1:=IF(H=L,1,H-MAX(O,C));
A1 `- M+ ?4 ]8 `( j6 E% ?V2:=IF(H=L,1,MAX(C,O)-WJ);) z* P4 v9 l4 s2 D. u
V3:=IF(H=L,1,MIN(O,C)-L);
; I+ O) W/ J0 `9 b# eV4:=IF(H=L,1,WJ-MIN(C,O));- G8 I: |6 y. w5 r( V- Q# F4 z
V5:=VOL/IF(H=L,4,H-L);" ]8 E: c, A9 R! V
V6:=(V1*V5);( e6 d6 b3 H' Z" }
V7:=(V2*V5);. j$ o) x1 \: Q
V8:=(V3*V5);! F2 O' n& g% C& _- f- Q
V9:=(V4*V5);" A* j0 ^5 ?) E+ q' O. v+ k8 {
买盘1:=DYNAINFO(23)*比;
2 v1 P) o3 m& G卖盘1:=DYNAINFO(22)*比;
( H2 [. e$ Q" u* g4 \& U6 h5 w T' s买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));8 C& M* }0 T2 Q9 h" O& H8 N2 B' `+ E
卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));& V9 J. b/ |- J0 [' u9 s1 c% I
买盘:=IF(ISLASTBAR AND PERIOD=5 AND C=REF(VOL,1);
7 I# k' G2 s) P& r* RM1:=CONST(绿灯);
* R( w6 L" h9 h5 S* r2 N阑珊:=MFI1.5;4 I3 e2 U/ K: [# e" I4 U9 {* U" q
M6:=CONST(量缩);4 \, ?; `: @ n3 f% k& g c- ~* Q
卖量大:=(卖盘-买盘)/买盘>0.4;" @/ p% k2 G9 Z/ |& l( m8 w
M7:=CONST(卖量大);
) o; x. L* S$ A$ S* t9 u买量大:=(买盘-卖盘)/卖盘>0.4;' v5 G' ?- W# x; R8 J2 l
M8:=CONST(买量大);- G, a# A/ Z; k" ^) |& |1 s
TS1:=IF(M1=1,0.03+0.03,0.03);% u5 x5 ^1 M. R7 X
TS2:=IF(M2=1,TS1+0.03,TS1);; [( Q9 f5 H% s: `
TS3:=IF(M3=1,TS2+0.03,TS2);+ H* F0 _- B3 x: j0 G7 o' f
TS4:=IF(M4=1,TS3+0.03,TS3);4 [, O! Z' X, R$ }7 c
TS5:=IF(M5=1,TS4+0.03,TS4); _; M0 [, V& v }4 A
TS6:=IF(M6=1,TS5+0.03,TS5);
% e. Y# R( y. k) r0 `1 K1 kTS7:=IF(M7=1,TS6+0.03,TS6);
& Q; `6 J% F7 J5 b# [1 x+ i& KTS8:=IF(M8=1,TS7+0.03,TS7);* y6 M. O: s* z2 }) e6 z
. G! Y% T" i# B5 h& J9 H9 n3 l: cDRAWTEXT(环境1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,显着走强,中线参加，仓位在2/3左右''),COLORFF00FF;2 S8 n, O# @$ C" @5 q
DRAWTEXT(环境2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不敷，短线出场，仓位在1/2左右''),COLORFF00FF;
* u+ f* P. `8 I% qDRAWTEXT(环境3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价精良，并没有显着走强，短线出场，仓位1/2左右。''),COLORFF00FF;
* h( {! j: Z% L: j! b, K' aDRAWTEXT(环境4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可，量能不敷，未完全走强,短线参加，仓位1/3左右。''),COLORFF00FF;
5 C$ G0 G% ~+ [8 O. `DRAWTEXT(环境5=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏，走势尚可，重仓减泰半，清仓者观望。''),COLORFF0000;1 \, m" m& Z( l& W) w# b
DRAWTEXT(环境6=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌，显着缩量走势，思量大盘风险，减持或清仓。''),COLORFF0000;$ f7 n) o2 n1 W7 w7 f. o& }
DRAWTEXT(环境7=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌，走势显着偏弱，离场观望。''),COLORFF0000;
] p2 F6 L6 m) oDRAWTEXT(环境8=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌，走势偏弱，离场观望。''),COLORFFFF00;
* L& @. t( y( o' S6 bDRAWTEXT(环境9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态精良，强势显着，量能富足，可以继续持有。''),COLOR00FFFF;
# y& I3 q% D8 u6 QDRAWTEXT(环境10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势稳定，强势依然，但量能开始转弱，注意风险''),COLOR00FFFF;
! v1 d8 n b5 j0 s0 c, fDRAWTEXT(环境11=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力，但股性偏弱，可思量减仓。''),COLORFFFFFF;
! m9 |: B4 O- ?; RDRAWTEXT(环境12=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱，量能不敷，减持大部门筹码''),COLORFFFF00;
8 [; o x' p2 f3 y- f0 {DRAWTEXT(环境13=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳，注意成交量的变革，但现在不恰当参加。''),COLORFFFF00;: R* g' Q# H; u/ m8 C7 ^; V
DRAWTEXT(环境14=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明，股价偏弱，注意量能变革，现在不宜参加。''),COLORFFFF00;
- A7 F) F7 K5 P. p) gDRAWTEXT(环境15=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象，但量能不敷，趋势不明，不恰当操纵''),COLORFFFF00;! d% L9 }# k3 Y6 @$ U8 _( Y; r7 J
DRAWTEXT(环境16=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱，没有参加代价。''),COLORFFFFFF;
' \# z( x; ?, f" E' H2 YDRAWTEXT(大盘1 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌，最佳买点，否则审慎参与。''),COLOR00FF00;- s' p* A/ P, {2 V
DRAWTEXT(大盘2 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强，量能不敷，若前一轮下跌，短线出场1/2，量能放大加仓。''),COLORFF00FF;$ K2 c: `5 [/ L( x% J% s4 N
DRAWTEXT(大盘3 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏，重仓者可以减去大部门仓位。''),COLORAAAAAA;9 R6 E) {7 X% \1 J1 f6 D3 V
DRAWTEXT(大盘4 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调解，注意风险，短线清仓观望。''),COLORFF0000;
- I9 x9 R' ~) ?2 Z* L1 @DRAWTEXT(大盘5 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势精良，量能理想，可以继续持有强势股。''),COLOR00FFFF;; @( A9 u9 U- e2 |; C
DRAWTEXT(大盘6 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态精良，但量能稍显不敷，随时预备减仓''),COLOR00FF00;
; M) m* c+ A; x* LDRAWTEXT(大盘7 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明，注意成交量变革，现在不相宜出场。''),COLORFFFFFF;
6 i5 H' h& Y; E3 U" {DRAWTEXT(大盘8 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下，量能萎缩，不恰当出场。''),COLORFFFFFF;
, E% n) A* R6 D0 C: H$ O; EDRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''［绿灯］实计生意业务量增长。MFI促进指数增长。''),COLORFFFFFF;
5 G E5 ~6 b& N* E4 ~DRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''［阑珊］实计生意业务量淘汰。MFI促进指数淘汰。''),COLORGREEN;
# c1 v+ V- [% mDRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''［伪装］实计生意业务量淘汰。MFI促进指数增长。''),COLORGREEN;7 D& j, G+ C5 {! k8 Q4 ~0 a6 A
DRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''［蛰伏］实计生意业务量增长。MFI促进指数淘汰。''),COLORYELLOW;1 d4 |9 i% |& g: y p
DRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN;
9 }( h r. ?8 f' L4 }DRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW;4 R, G! L0 ?5 s* F
DRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40％以上;''),COLORGREEN;! g7 K8 s. l; V
DRAWTEXT(M8 AND CURRBARSCO |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:07