|
一，为解盘照图把图文笔墨没置一下。
2 c8 m# C8 f8 ?7 t1 M4 I, C二，参数K有三种没置方式，缺省为0。k=0时配景变色，当图面k线周期多时k线
; E8 ^; S$ _9 D c, ] 有压缩征象。k=2时配景稳定色无压缩，但会失去表现强弱的配景自功变色。& r. g% }1 J1 C' @ H+ W
三，k=2时只有熊样线以上的图面变色,无压缩。但要选择体系配景致共同才好
, A5 w& j* U1 u) ]+ ] 看。(我选的狩猎绿)
( C$ A2 [+ K3 d2 M
2 ^& g9 I4 V, D$ o- S$ a ' w* H& u j3 x0 ?
* O* ?" v! p. p* U
{阳光普照__TDX 参数K(0,2,0) 缺省为0}
2 ]2 c7 w! f4 w1 U, F' [9 cTT:=240/FROMOPEN;
" P( z0 c$ w v ~7 j比:=TT;: Z9 O! L# z% h- u" @: u
促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;
. P) T- k3 g3 S, u3 rAY2:=EMA(CLOSE,12)-EMA(CLOSE,26);
( M1 L0 K9 s7 F3 D0 U7 MAZ2:=EMA(AY2,9);
) I1 k9 c# T+ |2 c2 j; aLT2:=(AY2-AZ2);
& p: ]4 i: c* a' s+ D) r% cL211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
7 o& ^0 P3 [2 ~9 {$ _ZGD:=HHV(H,80)*0.99;& z" q. ?7 K! q; Q
ZGD2:=CONST(ZGD);
) Q6 D& M( n# S- T5 g; @. ~% ^ZDD:=LLV(L211,80);
7 Y W3 |1 Z# O! o3 S8 x% F" AZDD2:=CONST(ZDD);
J6 m' h6 ^; U' Y8 z! P* \YYA4:=MA(CLOSE,20);; q2 C" N9 u8 S/ G# n7 i, s- ^
YYA5:=(CLOSE > MA(CLOSE,5));( y% c; g5 t) \0 n% [3 ^
YYA6:=(MA(CLOSE,5) > MA(CLOSE,10));# I. K8 s8 h, D3 V
YYA7:=(CLOSE > MA(CLOSE,10));
$ h; h4 x2 [' I" d: a, D5 U' ^YYA8:=(MA(CLOSE,5) > MA(CLOSE,20));$ t8 {' q: u0 T( z4 u3 h
YYA9:=(CLOSE > MA(CLOSE,20));
4 n% y' E# S* f i2 KYYA10:=REF(YYA4,1);
7 T+ h* d0 i9 k5 L# N3 j5 FYYA11:=(YYA4 > YYA10);* V Y9 P# Q+ e F, Z$ _
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)));
, a- }6 `' w. N6 W2 B2 LDSLX:=(CLOSE / INDEXC);# H7 X3 ^1 \- V: _6 D/ f8 i
DSLX1:=MA(DSLX,5);" j1 q: P' _/ l. z, d) h, \/ _1 _0 h
DSLX2:=MA(DSLX,10);5 i+ _2 l8 l: N7 U0 T7 {
YYV1:=MA(VOL,5);% H; J% \# s+ M7 q+ z' @. S
YYV2:=MA(VOL,10);% i1 f6 z% ?) ?! F) x: X
J1:=CONST(IF( YYAVX > 0,200,100));* E7 v& w& X% l6 o- E
J2:=CONST(IF( YYAVX > 0,00,100)); n9 K; H0 S/ k& ?9 G4 R
J3:=CONST(IF( YYAVX > 0,100,100));
3 A; O' R& o. g, P* ?9 x+ IZGD3:=IF(K=0,ZGD2,DRAWNULL);
+ ~9 r& T. v2 L* `ZDD3:=IF(K=0,ZDD2,DRAWNULL);! d" Z& Y5 @& _* {; o% v+ u
ZGD4:=IF(K=1,ZGD2,DRAWNULL);
4 l7 {- R7 i/ L/ f% E牛背:=MA(C,21);
% M! F+ _- T; y* n0 s5 {) g; e5 g牛逼:=牛背+2*STD(C,21);! |; z! \* P9 B6 x8 z1 ^
熊样:=牛背-2*STD(C,21);
9 W7 d6 y1 @; Z1 [- O( G牛背2:=IF(C>牛背,牛背,DRAWNULL);
1 y7 }" h" d/ c' a- o熊样2:=IF(C>牛背,熊样,DRAWNULL);* _* f) q* L e
DRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);- T0 Y! Z$ _: _& P3 ?& A) W
DRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);
* v g& u% X: O$ R& K( b Z- ODRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));0 w: i; `7 |: ?4 K: c4 a
牛缰绳:MA(CLOSE,4);
- K0 L* H, {* j5 F, X牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;
8 c0 Z' c: m$ P5 ?6 @4 a# [牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;
/ y* i6 M7 h9 j1 g1 X$ n牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;
* m, L) M. a" c1 i1 U$ nAY:=EMA(CLOSE,12)-EMA(CLOSE,26);. o8 O7 L* b2 U. _" z
AZ:=EMA(AY,9);
' d/ o0 | |6 I" S$ h4 W: l o- \LT:=(AY-AZ);* X5 C; ^ v( s% Q
L21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;, ]% e$ d) T/ T* ^
IF(LT,LLV(L,21),DRAWNULL),COLORFFFF00;2 E% ? I4 W r5 ~& ^2 @" L
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;
, D0 S- E$ n* `6 o( { S6 ?STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
C* }& x/ Q" c9 g J" R& c! WSTICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;
8 b# O) R% {) o4 {2 `3 P# w( j2 cSTICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;% d" p% y( s% K; Q( |$ x& ]
STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE = DSLX1)),1,0));
# f8 ^, F; Q- B& Z环境2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));% d! R% r1 T0 I* m {
环境3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));
7 c+ q# y. p1 y1 c- {/ w6 x9 p) i# Q环境4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 = YYV2)) AND (DSLX >= DSLX1)),1,0));' J4 k% X9 C/ z/ _2 M, y
环境6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));' z) F0 G5 o0 V7 u( U
环境7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
! `8 O: F8 ~9 i5 c7 N! @$ u3 p环境8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));4 `4 U6 k$ |+ A: E, c% X9 N; u- R
环境9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
2 I* F: M8 d* k( o; r环境10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));# S8 R! S3 @+ A* A9 J: g; J8 l# Q
环境11:CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW;+ E, C# a3 F: f
环境12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));! G( t! z4 r/ Y# B& n3 U
环境13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));- U$ x; y- Z2 c) D
环境14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
0 Y9 r5 q% `' @8 D/ l环境15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));3 u! U. ?9 u+ j2 T( l9 ~
环境16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));0 s h( `6 g4 }1 o+ m
大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0));
% U- @) ?. r8 H1 O大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));( n9 D+ d5 ~% w5 U% v0 ~! A
大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));! k' f$ w% l5 W
大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));0 ^0 w( v) E; t& Z1 R
大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));
F" J$ B" s9 Y5 g; |; N u大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));+ R1 x8 j. G/ `0 c, g z. M: b5 ]
大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0));
4 ~( q7 `+ `0 C0 ?大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));6 x- U4 W- Q7 k. H6 g
0 Y; D0 \; H& m; E; Y ^% DWJ:=(H+L+C)/3;' ^& y; R, i6 m& s& C
V1:=IF(H=L,1,H-MAX(O,C));$ ?% X" {. S! q t
V2:=IF(H=L,1,MAX(C,O)-WJ);4 V, i3 B! L8 s. w0 [0 ^
V3:=IF(H=L,1,MIN(O,C)-L);
* }6 g9 l8 l9 D( w4 S' `V4:=IF(H=L,1,WJ-MIN(C,O));
- s d) \+ y* W: g& a8 [( N7 aV5:=VOL/IF(H=L,4,H-L);6 u3 ~; l4 S) y" l/ x
V6:=(V1*V5);
& l: V# K, d1 b6 |9 A) k8 bV7:=(V2*V5);. P! Y" D; r6 V6 N1 Z0 o
V8:=(V3*V5);
* s: O3 g, l- KV9:=(V4*V5);: M( f b; c7 K+ y. _' k
买盘1:=DYNAINFO(23)*比;
( ~+ v& m0 P" b: B卖盘1:=DYNAINFO(22)*比; W# O) j6 [+ n; |2 N
买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));" i2 V! x$ U/ U+ _3 r3 A0 l+ z
卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));* ]- c& i1 }# S; M& M
买盘:=IF(ISLASTBAR AND PERIOD=5 AND C=REF(VOL,1);4 W1 j2 E* [% |3 x- F& S2 o
M1:=CONST(绿灯);
! t* {' u1 i8 S1 q阑珊:=MFI1.5;7 u( F X4 {) r: {+ j3 E' S
M6:=CONST(量缩);
! v$ C/ t& B& l8 u( z卖量大:=(卖盘-买盘)/买盘>0.4;3 B$ y/ B. V, W9 c. }( r* B7 Q
M7:=CONST(卖量大);8 W1 X( Y! r: P/ q: g
买量大:=(买盘-卖盘)/卖盘>0.4;
4 _* I+ F/ u* \/ }M8:=CONST(买量大);4 I, H' p- b3 b$ m
TS1:=IF(M1=1,0.03+0.03,0.03);; ]* g3 O J& i
TS2:=IF(M2=1,TS1+0.03,TS1);9 o! K3 a4 h8 c5 j( p
TS3:=IF(M3=1,TS2+0.03,TS2);( z' c5 m) F* E% P" M: J5 W8 s8 ?
TS4:=IF(M4=1,TS3+0.03,TS3);
& E+ D1 R1 g) @% G F cTS5:=IF(M5=1,TS4+0.03,TS4);
! E, ?$ Y+ J8 m: {2 lTS6:=IF(M6=1,TS5+0.03,TS5);
. _9 r; Y6 Q. I! eTS7:=IF(M7=1,TS6+0.03,TS6);- X; o- _4 l) o! {
TS8:=IF(M8=1,TS7+0.03,TS7);
+ U& x, ^# T+ B! K7 O$ z, k$ I2 ^2 D7 G$ ]
DRAWTEXT(环境1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,显着走强,中线参加，仓位在2/3左右''),COLORFF00FF;
u% S2 R: c; k2 ^: P5 t0 xDRAWTEXT(环境2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不敷，短线出场，仓位在1/2左右''),COLORFF00FF;
! ]7 h9 i: h& m8 ?& N5 SDRAWTEXT(环境3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价精良，并没有显着走强，短线出场，仓位1/2左右。''),COLORFF00FF;
* A7 i1 R+ p1 H4 R* V6 G& {6 rDRAWTEXT(环境4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可，量能不敷，未完全走强,短线参加，仓位1/3左右。''),COLORFF00FF;5 P$ v8 o# e- {. I0 j, w2 Z2 D
DRAWTEXT(环境5=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏，走势尚可，重仓减泰半，清仓者观望。''),COLORFF0000;
, S$ U' z M8 A2 q3 F+ H; QDRAWTEXT(环境6=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌，显着缩量走势，思量大盘风险，减持或清仓。''),COLORFF0000;
! w! R1 j) A, ?2 C7 W1 RDRAWTEXT(环境7=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌，走势显着偏弱，离场观望。''),COLORFF0000;
3 t3 L4 V3 g& MDRAWTEXT(环境8=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌，走势偏弱，离场观望。''),COLORFFFF00;- H& Q `( J6 {( v3 t0 S* e
DRAWTEXT(环境9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态精良，强势显着，量能富足，可以继续持有。''),COLOR00FFFF;
% o& X8 o e& O. uDRAWTEXT(环境10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势稳定，强势依然，但量能开始转弱，注意风险''),COLOR00FFFF;
" Y( q' ^7 T* iDRAWTEXT(环境11=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力，但股性偏弱，可思量减仓。''),COLORFFFFFF;
4 w6 G% J: x' i, _. BDRAWTEXT(环境12=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱，量能不敷，减持大部门筹码''),COLORFFFF00;
' x4 f& P4 E( |- ?8 z8 V2 A; NDRAWTEXT(环境13=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳，注意成交量的变革，但现在不恰当参加。''),COLORFFFF00;6 p! g- |$ X2 `/ i7 ]
DRAWTEXT(环境14=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明，股价偏弱，注意量能变革，现在不宜参加。''),COLORFFFF00;
8 `2 t9 c" }/ S, q# z% m4 A' E7 B' A% a. gDRAWTEXT(环境15=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象，但量能不敷，趋势不明，不恰当操纵''),COLORFFFF00;% b4 r/ A' y# l9 b
DRAWTEXT(环境16=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱，没有参加代价。''),COLORFFFFFF;
1 }& L, F5 n/ \9 }1 ^DRAWTEXT(大盘1 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌，最佳买点，否则审慎参与。''),COLOR00FF00;
7 Z) T; w% p8 _DRAWTEXT(大盘2 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强，量能不敷，若前一轮下跌，短线出场1/2，量能放大加仓。''),COLORFF00FF;
! U& _4 Y7 V, N PDRAWTEXT(大盘3 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏，重仓者可以减去大部门仓位。''),COLORAAAAAA;
0 _/ E& g8 C! c, h2 fDRAWTEXT(大盘4 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调解，注意风险，短线清仓观望。''),COLORFF0000;# d! G q, k1 H5 r9 ` i
DRAWTEXT(大盘5 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势精良，量能理想，可以继续持有强势股。''),COLOR00FFFF;" k6 t( ^7 {7 J C' [( R
DRAWTEXT(大盘6 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态精良，但量能稍显不敷，随时预备减仓''),COLOR00FF00;
: S4 |$ W" t2 U' W# i% @( lDRAWTEXT(大盘7 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明，注意成交量变革，现在不相宜出场。''),COLORFFFFFF;
3 O. U! s+ n aDRAWTEXT(大盘8 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下，量能萎缩，不恰当出场。''),COLORFFFFFF;: z% f" F; M4 ^8 {
DRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''［绿灯］实计生意业务量增长。MFI促进指数增长。''),COLORFFFFFF;
; i# ^! _% f8 D3 `! |! z5 pDRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''［阑珊］实计生意业务量淘汰。MFI促进指数淘汰。''),COLORGREEN;& G+ B4 g* q& n& \! T* u9 |5 ^8 e
DRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''［伪装］实计生意业务量淘汰。MFI促进指数增长。''),COLORGREEN;
4 Y5 f! y4 g, i0 x8 @+ ZDRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''［蛰伏］实计生意业务量增长。MFI促进指数淘汰。''),COLORYELLOW;
) v/ C; y! F+ q; c2 X* o4 EDRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN;
, b. r3 f2 l; {, gDRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW;
3 [. T( N4 F7 t9 [( F! BDRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40％以上;''),COLORGREEN;
* g" y! u r9 u! S# ]6 c! ~DRAWTEXT(M8 AND CURRBARSCO |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:07