|
一，为解盘照图把图文笔墨没置一下。
: Y. B Z1 m: u* G) s3 s. B) h二，参数K有三种没置方式，缺省为0。k=0时配景变色，当图面k线周期多时k线8 M) Y* |5 G. K7 J0 J* b" g
有压缩征象。k=2时配景稳定色无压缩，但会失去表现强弱的配景自功变色。
6 Q4 ?% i6 l4 ^: |* ?/ C$ `) A三，k=2时只有熊样线以上的图面变色,无压缩。但要选择体系配景致共同才好1 {5 I" y; h1 ]/ F8 Z
看。(我选的狩猎绿)8 b7 d/ {- p5 C7 ^+ L$ s! E
% a+ f0 k8 j( U9 O$ b( Y% _% t
+ z! R+ H% \! J. `! \: [# M- }) Q6 U4 X/ o( J0 F5 X
{阳光普照__TDX 参数K(0,2,0) 缺省为0}
# J! T. D9 j+ lTT:=240/FROMOPEN;+ x5 J/ X" ~- }. K+ H5 I% X
比:=TT;5 `( A: q$ [* w, d
促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;2 c4 ?4 L3 e% f$ x+ q1 _! u
AY2:=EMA(CLOSE,12)-EMA(CLOSE,26);
/ G( F3 o, ? K4 |- EAZ2:=EMA(AY2,9);* x: i5 u% |' V' ]- }6 p
LT2:=(AY2-AZ2);
" A$ h( j0 k6 o }0 S) O# BL211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
+ r' w% }: s3 ~ZGD:=HHV(H,80)*0.99;" N# {; T' @+ h8 L7 Y- ~- A4 W* G
ZGD2:=CONST(ZGD);
8 g! v2 I/ w: VZDD:=LLV(L211,80);+ [/ o; Z; V! D) U# p, k
ZDD2:=CONST(ZDD);4 L0 q5 w# @/ v, h2 x @3 O
YYA4:=MA(CLOSE,20);* p( Y: ^. _5 F
YYA5:=(CLOSE > MA(CLOSE,5));, ~( U( Z$ q8 B- s+ q7 D# T- `
YYA6:=(MA(CLOSE,5) > MA(CLOSE,10));4 {9 y* N3 m4 H* D$ P
YYA7:=(CLOSE > MA(CLOSE,10));( r" B) H# b9 @! G2 P8 a4 o
YYA8:=(MA(CLOSE,5) > MA(CLOSE,20));7 ^! [ r9 ]3 n0 y
YYA9:=(CLOSE > MA(CLOSE,20));
0 e: I8 o+ |# @. W4 X; XYYA10:=REF(YYA4,1);
! H% {2 X6 A- j# e O, nYYA11:=(YYA4 > YYA10);5 R" @+ y5 u! r
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)));
- ?0 L# W" g$ g0 W" a# cDSLX:=(CLOSE / INDEXC);) r# h. K" {$ Y& G$ v
DSLX1:=MA(DSLX,5);
( r, M- r7 `# Y7 kDSLX2:=MA(DSLX,10);
4 `# P4 K! Y0 A* }9 @8 F, f2 Z3 Y- {YYV1:=MA(VOL,5);
# j% P3 u/ ?% g: E) T. YYYV2:=MA(VOL,10);( @% h0 z1 H+ i2 J, [/ B- V! \8 k' i. b
J1:=CONST(IF( YYAVX > 0,200,100));
8 [, Y$ T4 d# b2 X( W( W2 ~4 fJ2:=CONST(IF( YYAVX > 0,00,100));
$ _ c8 v8 T8 o6 [ Q2 MJ3:=CONST(IF( YYAVX > 0,100,100));& a+ C. q9 h) B& P, `' {
ZGD3:=IF(K=0,ZGD2,DRAWNULL);* F' M" ?% V( v( B B3 \) }- c$ E
ZDD3:=IF(K=0,ZDD2,DRAWNULL);- e! [5 L5 @; x1 ]3 l
ZGD4:=IF(K=1,ZGD2,DRAWNULL);( s; H. w s8 v0 R
牛背:=MA(C,21);1 i, {1 ^- q( Y
牛逼:=牛背+2*STD(C,21);
( w8 b: T8 q9 z6 ~* I, J+ Q0 @( Y熊样:=牛背-2*STD(C,21);
! c9 Y. t4 O+ a牛背2:=IF(C>牛背,牛背,DRAWNULL);# B, V& I% D- o9 A% v
熊样2:=IF(C>牛背,熊样,DRAWNULL);/ y& J( `( W; v) W$ r9 y4 n; ?
DRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);
- U5 @9 e5 W! i* U$ F/ A3 aDRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);+ B& I& b0 r" O. N' P! e
DRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));
! f( f _9 r: e* \3 n# R" @牛缰绳:MA(CLOSE,4);
! z3 j; U( ^* @: X牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;( J) }% N& Q( m9 J, l! i
牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;+ [7 X4 A9 }% y% O9 u- r8 \: b
牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;1 {6 X$ ^" J) I* A* E/ r4 L# }; T
AY:=EMA(CLOSE,12)-EMA(CLOSE,26);( n4 G9 a! A' ^ h1 h7 T& B5 k/ a
AZ:=EMA(AY,9);
. p7 T. L, }+ b2 mLT:=(AY-AZ);
% r; Y+ t. x' n7 CL21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
/ K) n' M5 J7 ?0 A3 bIF(LT,LLV(L,21),DRAWNULL),COLORFFFF00;4 B- |0 _/ ^ S7 h9 ?7 z E
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;5 w& }. ?8 O N7 {1 V P, o9 o8 x
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;6 I; E0 Y) U+ r) O5 }$ h$ w
STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;; s& O+ J8 P8 k4 h9 t7 A
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;* B4 Y+ I: v1 S( m1 K) g w" L: P
STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE = DSLX1)),1,0));
6 z7 r5 S$ q2 i9 Y6 Z, Y环境2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
6 ?$ Y; K( n/ [9 [6 n. R环境3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));8 h3 X5 ^) w h
环境4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 = YYV2)) AND (DSLX >= DSLX1)),1,0));. ^: S2 @2 o+ v0 H/ E" t0 A
环境6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
3 D: w1 }: j! u& N2 r环境7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));$ @" T. `5 c- q- o# U5 M2 n
环境8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
+ r/ S; j' a# i- v" ?& o- [7 \环境9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));0 z, x# E3 o# f( |/ o5 ?
环境10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));; e2 f& Z% m1 r
环境11:CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW;
8 V$ N) L/ I8 H- `) e% d3 ^* A( W环境12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));# f' q j) q7 _- p. B
环境13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));7 a' d( n! _9 c
环境14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
: I* D4 X* D8 R环境15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));- G0 H F. N7 S: G( I
环境16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));; M' ]7 d3 R a% J+ z8 U
大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0));, N5 l+ I! i7 D, I" |
大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));0 R2 P. O0 H6 M+ q- y; x. X
大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));
5 a5 h- v3 @' j' K大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));
. h; ^* i2 y6 D" N5 M3 \3 }1 ^; H" X) O大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));
2 }- n: u, P E4 t) q0 o' }% e大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));
' d) O# B% E( R) l$ B, q( s% Q大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0));6 G7 ^' z* d- P- L
大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));
Y( J/ x+ T+ C9 E+ j0 [
1 }0 s3 \0 f- |' N' SWJ:=(H+L+C)/3;
6 M! d0 \* B5 X- d! Y- E. mV1:=IF(H=L,1,H-MAX(O,C));+ w" m: V% W+ k' {, V% q3 e5 n0 q
V2:=IF(H=L,1,MAX(C,O)-WJ);
+ h2 I/ f! J7 k6 d4 n% b$ KV3:=IF(H=L,1,MIN(O,C)-L);
( _7 }/ N4 d4 I! O) SV4:=IF(H=L,1,WJ-MIN(C,O)); g% d2 Z7 d2 K9 S
V5:=VOL/IF(H=L,4,H-L);( L7 _: m7 X- B, T8 [$ q
V6:=(V1*V5);
3 H1 }5 D/ D( R% x& a+ l4 h! Z' N( yV7:=(V2*V5);
/ m5 Y5 i- K7 F0 gV8:=(V3*V5);
7 |: F& A5 d# G# @8 s: c2 \V9:=(V4*V5);! n# I/ s, o$ O3 X. v
买盘1:=DYNAINFO(23)*比;8 Y x+ }5 b: K% E" p7 {
卖盘1:=DYNAINFO(22)*比;
$ m. t; N/ d. J3 G+ A) e6 u买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));% C2 Z5 ?2 {1 i- |. e# y& d
卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));
9 t0 k# P8 Z! w7 ~: b+ o% h* l, q买盘:=IF(ISLASTBAR AND PERIOD=5 AND C=REF(VOL,1);% C. q, i: X6 E ?9 Y
M1:=CONST(绿灯);" n: A( Z! \3 R) q3 |. ]' D, Q$ z
阑珊:=MFI1.5;& C7 X9 i: l5 { ]
M6:=CONST(量缩);
* J3 H, {1 H8 u( c1 u0 M% q4 N/ A卖量大:=(卖盘-买盘)/买盘>0.4;
/ K. M2 R5 H7 z( S% MM7:=CONST(卖量大);9 O+ \+ |3 J7 a' ^+ A! Y2 c
买量大:=(买盘-卖盘)/卖盘>0.4;
# \( f I: S( R8 J4 F. vM8:=CONST(买量大);' Y! ]5 c; V7 p q
TS1:=IF(M1=1,0.03+0.03,0.03);
8 B% d: O/ h! G3 v' q3 Q' G3 b8 z1 c1 lTS2:=IF(M2=1,TS1+0.03,TS1);
8 V: M6 }- I. h9 r; }6 B5 w( ?6 eTS3:=IF(M3=1,TS2+0.03,TS2);
* U: q0 g+ h8 y( t: _TS4:=IF(M4=1,TS3+0.03,TS3);9 C" v# ]$ ~; `$ b
TS5:=IF(M5=1,TS4+0.03,TS4);
+ s! c0 t! H; d) O3 e* fTS6:=IF(M6=1,TS5+0.03,TS5);
" e. p3 {9 T" n# M- ~! F( VTS7:=IF(M7=1,TS6+0.03,TS6);" d5 y( F) {8 n7 K9 ~
TS8:=IF(M8=1,TS7+0.03,TS7);: \! B- L: y; ?+ P7 [
8 H! [8 Z* \8 EDRAWTEXT(环境1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,显着走强,中线参加，仓位在2/3左右''),COLORFF00FF;
6 |+ |% \' |# rDRAWTEXT(环境2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不敷，短线出场，仓位在1/2左右''),COLORFF00FF;
" w! ]" ?4 K+ VDRAWTEXT(环境3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价精良，并没有显着走强，短线出场，仓位1/2左右。''),COLORFF00FF;* D' a, V5 S! y& G; X: t
DRAWTEXT(环境4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可，量能不敷，未完全走强,短线参加，仓位1/3左右。''),COLORFF00FF;! u) p" N8 x! l. a% o
DRAWTEXT(环境5=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏，走势尚可，重仓减泰半，清仓者观望。''),COLORFF0000;4 l/ V2 u9 I+ L4 z- a
DRAWTEXT(环境6=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌，显着缩量走势，思量大盘风险，减持或清仓。''),COLORFF0000;
* T$ Z# J& @6 d0 J/ d) |' QDRAWTEXT(环境7=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌，走势显着偏弱，离场观望。''),COLORFF0000;+ [2 w, Y& G' n7 [5 ?
DRAWTEXT(环境8=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌，走势偏弱，离场观望。''),COLORFFFF00;
. t% }6 B: L5 u3 u$ T( e. LDRAWTEXT(环境9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态精良，强势显着，量能富足，可以继续持有。''),COLOR00FFFF;3 E% L% g$ O8 t; W# M: ^
DRAWTEXT(环境10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势稳定，强势依然，但量能开始转弱，注意风险''),COLOR00FFFF;
+ U0 K5 {: m, LDRAWTEXT(环境11=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力，但股性偏弱，可思量减仓。''),COLORFFFFFF;
$ R9 B1 m: k6 i/ o8 p3 f! v' ~DRAWTEXT(环境12=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱，量能不敷，减持大部门筹码''),COLORFFFF00;
. B7 G3 k9 ^* T4 H7 Z: aDRAWTEXT(环境13=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳，注意成交量的变革，但现在不恰当参加。''),COLORFFFF00;9 m. `9 ^7 {8 c/ z6 P
DRAWTEXT(环境14=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明，股价偏弱，注意量能变革，现在不宜参加。''),COLORFFFF00;
) X" }& n8 X! B: s! Z, h+ `% DDRAWTEXT(环境15=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象，但量能不敷，趋势不明，不恰当操纵''),COLORFFFF00;
+ Z& K/ \7 [( d: Z$ Z, k* b0 eDRAWTEXT(环境16=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱，没有参加代价。''),COLORFFFFFF;
+ D; g# v: l1 r3 g) Y: e8 b! BDRAWTEXT(大盘1 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌，最佳买点，否则审慎参与。''),COLOR00FF00;
$ Y$ ]0 ^# V( q5 Y2 F; T' ?( qDRAWTEXT(大盘2 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强，量能不敷，若前一轮下跌，短线出场1/2，量能放大加仓。''),COLORFF00FF;
0 i! {( z& x+ Y# B0 TDRAWTEXT(大盘3 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏，重仓者可以减去大部门仓位。''),COLORAAAAAA;) ?( I, O( i$ U0 |4 b
DRAWTEXT(大盘4 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调解，注意风险，短线清仓观望。''),COLORFF0000; E& ?5 m: r9 ~3 ~8 Z
DRAWTEXT(大盘5 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势精良，量能理想，可以继续持有强势股。''),COLOR00FFFF;
( E4 Q/ \6 z1 @/ NDRAWTEXT(大盘6 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态精良，但量能稍显不敷，随时预备减仓''),COLOR00FF00;$ k& R8 K$ @3 K6 e( t2 B
DRAWTEXT(大盘7 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明，注意成交量变革，现在不相宜出场。''),COLORFFFFFF;
, h, k& M; c- n1 L3 o9 a% ?$ w; sDRAWTEXT(大盘8 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下，量能萎缩，不恰当出场。''),COLORFFFFFF;5 ~& \- y) _8 R( y, d9 k7 b: z+ P
DRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''［绿灯］实计生意业务量增长。MFI促进指数增长。''),COLORFFFFFF;1 `' q3 H% ` C& [$ [ ~
DRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''［阑珊］实计生意业务量淘汰。MFI促进指数淘汰。''),COLORGREEN;& s N. b# e2 \' Q& y$ I
DRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''［伪装］实计生意业务量淘汰。MFI促进指数增长。''),COLORGREEN;% T5 N0 ?- X+ C( l
DRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''［蛰伏］实计生意业务量增长。MFI促进指数淘汰。''),COLORYELLOW;
2 M# A3 T7 C8 |" A5 x1 |$ h pDRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN;
. B4 }2 m& I* l7 A$ ?0 aDRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW;
: u$ v9 g" Y: n/ vDRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40％以上;''),COLORGREEN;( l* x) a' `- ?0 L8 g' o+ G% f
DRAWTEXT(M8 AND CURRBARSCO |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:07