|
一，为解盘照图把图文笔墨没置一下。
1 H9 ]( D$ x h+ }二，参数K有三种没置方式，缺省为0。k=0时配景变色，当图面k线周期多时k线
" z* ~( c" n. m 有压缩征象。k=2时配景稳定色无压缩，但会失去表现强弱的配景自功变色。
6 A2 G- }0 ?& W- ]三，k=2时只有熊样线以上的图面变色,无压缩。但要选择体系配景致共同才好 z+ l& g' @% Z2 T* a, e
看。(我选的狩猎绿)
: K& l8 `7 H J! J% [
3 q, p5 B- y; Q8 d
4 L- P# j5 h/ m* ]/ \& J! c* U; k. ]7 g1 T- j0 R- C
{阳光普照__TDX 参数K(0,2,0) 缺省为0}8 h* {# g; ~. H6 s q: u* \ C
TT:=240/FROMOPEN;" d7 K) }& Q) M& E. t% \
比:=TT;+ f2 I( l5 H1 L& ?) h# n
促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;
* p/ K1 _3 ?8 r2 z' Y( E5 }, tAY2:=EMA(CLOSE,12)-EMA(CLOSE,26);
6 s* N4 z% o% z6 o) ~0 Y( ]. A& RAZ2:=EMA(AY2,9);
0 Z p* o# }/ Q& u8 lLT2:=(AY2-AZ2);
- F/ s, p, i! g) g+ `1 f0 B2 M6 o# z+ sL211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
, m: x2 s" S! R5 b e' |+ ~ZGD:=HHV(H,80)*0.99;
7 [% X" k& ]" E/ x" m& w; OZGD2:=CONST(ZGD);
/ E! H2 j- B# ~% q& X" C V+ }) ~5 CZDD:=LLV(L211,80);" p7 w6 r/ ^" \ h. ]) s, f. C! `
ZDD2:=CONST(ZDD);
) g3 F, J/ R! M5 J# C* T' wYYA4:=MA(CLOSE,20);5 b* T" t( f3 u
YYA5:=(CLOSE > MA(CLOSE,5));
" G3 `* o* Z# Y- e4 n6 lYYA6:=(MA(CLOSE,5) > MA(CLOSE,10));
! L: v2 V9 j2 K( X# h0 ^7 `YYA7:=(CLOSE > MA(CLOSE,10));- B9 r. O1 W7 u' Z3 _
YYA8:=(MA(CLOSE,5) > MA(CLOSE,20));
# N- `) v8 j/ s3 AYYA9:=(CLOSE > MA(CLOSE,20));
0 q" q0 z2 ?: I; v- qYYA10:=REF(YYA4,1);9 ?+ Q4 x' s9 b8 g. m! E* ]
YYA11:=(YYA4 > YYA10);
" B4 h, |0 K* }: \0 a# SYYAVX:=(((((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)));4 a% z* b5 H- P/ @ M5 B3 n9 k0 H
DSLX:=(CLOSE / INDEXC);
3 d: a- s K6 Z$ h5 u hDSLX1:=MA(DSLX,5);
# I& A* j( h- VDSLX2:=MA(DSLX,10);/ `' e, Q+ ]( v3 @( K+ v8 l
YYV1:=MA(VOL,5);
7 D3 u7 k$ h8 H0 r8 OYYV2:=MA(VOL,10);1 q1 [0 b' n$ }4 G: s: j
J1:=CONST(IF( YYAVX > 0,200,100));
* u+ G# R- q, S0 ?J2:=CONST(IF( YYAVX > 0,00,100));% u. `' C: k" H3 B' j& c
J3:=CONST(IF( YYAVX > 0,100,100));# a' T. a# r3 Q L L
ZGD3:=IF(K=0,ZGD2,DRAWNULL);2 m/ u0 G! b$ N' j
ZDD3:=IF(K=0,ZDD2,DRAWNULL);/ v4 v$ q- o- K1 E) Q0 _4 |, _6 G- H' t
ZGD4:=IF(K=1,ZGD2,DRAWNULL);
3 g: X% s7 g' X: ~- C, v牛背:=MA(C,21);$ |/ o' O& }, i5 _( m
牛逼:=牛背+2*STD(C,21);# l5 _* K. Q* G! j, v
熊样:=牛背-2*STD(C,21);
. x0 D5 A& K+ o% a/ \牛背2:=IF(C>牛背,牛背,DRAWNULL);+ ~7 y7 m, [1 V3 y Q, n% ^( d
熊样2:=IF(C>牛背,熊样,DRAWNULL);2 [) A: b3 j2 z
DRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);
& L, X, n- O& i% x" i4 Z, |( o) ?DRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);' i/ s1 O" v0 h0 }8 `
DRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));
+ E9 L; l4 a8 Z: S I( x$ d牛缰绳:MA(CLOSE,4);
6 z( m0 F5 Y9 _/ r5 K牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;
w4 [( _+ q) B牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;
7 T0 I# u/ l% o% ~( z牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;
9 p# }5 G- m) h2 }" `5 G7 KAY:=EMA(CLOSE,12)-EMA(CLOSE,26);
. {7 c5 B. `) B; U- AAZ:=EMA(AY,9);
1 u+ x6 m" P& y% d4 Q5 q kLT:=(AY-AZ);' `; _3 A; m+ F: l0 K, F
L21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;$ G" v6 H8 ?) m% ]( [
IF(LT,LLV(L,21),DRAWNULL),COLORFFFF00;" t3 O, ]0 C5 _! I
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;
0 N! m; ^0 `- U& ?& NSTICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;3 B. N# v" J% d, l0 w
STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;% V8 u( g' d8 u7 j F2 n' l
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;) h( x/ w1 _; e+ {5 y1 I
STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE = DSLX1)),1,0));$ t: C! e( b' Z* P9 ]/ {% e, U9 B
环境2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));: e9 p6 c' O2 H0 O5 q5 R X( ]& Q
环境3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));
5 u' v! v( S6 P: z7 R环境4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 = YYV2)) AND (DSLX >= DSLX1)),1,0));2 _& J9 W9 F }0 Q0 m# ~
环境6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));+ _5 O( a' {% A& d* c6 N2 i
环境7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
) C6 D( A% Y' `% ?8 P; }) c环境8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
4 {- t0 z4 g+ ^% W. a环境9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));( @/ R/ A5 a: K. e; p+ R# a3 Z" \
环境10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
( Y; R6 S$ y5 R/ ~( o4 @环境11:CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW;' h- f* w9 C: S0 I- N3 L
环境12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
9 K! D- ~5 ~& n. {2 p8 d环境13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));7 b5 l- V w' a. q# X9 V
环境14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));! i8 u( Z, d. w- T. \
环境15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));! H; n4 t6 \3 w6 ?+ B
环境16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
7 g% C }& M, Q8 x& U: w5 ? |大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0));
% l1 Z) y, G- t6 Y$ n9 W9 I大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));; B, E+ `2 K$ e1 m+ n( M
大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));/ ~7 s, `( S8 v- m& b: P: i
大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));. j+ C/ b( n0 m( p
大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));
, }& u! l! _& g4 h# ?2 i! d大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));* D3 x: i- x+ b1 K5 T) v
大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0));: u4 o$ ~4 y0 F1 M& _
大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));. n7 _3 X _' s/ \ q) r
4 i6 P4 D/ ]4 R5 C9 b r8 L& E8 ]6 e
WJ:=(H+L+C)/3;
7 y4 s: Q$ a# X8 gV1:=IF(H=L,1,H-MAX(O,C));- y; z6 a$ n# B) n9 S9 D( ~) P
V2:=IF(H=L,1,MAX(C,O)-WJ);
5 S. I% J- Y! i7 @3 w( g) {8 WV3:=IF(H=L,1,MIN(O,C)-L);- }3 H- {9 p' U4 s& q2 ]
V4:=IF(H=L,1,WJ-MIN(C,O));6 k8 v$ P$ P/ j+ p, X2 }2 Z
V5:=VOL/IF(H=L,4,H-L);
4 ~5 S% j0 N# n* ?- nV6:=(V1*V5);/ ?" \* p! B- R8 |
V7:=(V2*V5);# w o9 r4 M/ Y$ x
V8:=(V3*V5);
6 k8 m8 f) D% W! b+ Q5 S. RV9:=(V4*V5);$ Y4 t# G5 t$ p3 y
买盘1:=DYNAINFO(23)*比;
8 m& ^; {& {1 N3 r卖盘1:=DYNAINFO(22)*比;, O9 m: `- j, w/ r6 X4 j
买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));3 i8 m; T8 o3 w
卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));2 q' @; I4 ~0 L
买盘:=IF(ISLASTBAR AND PERIOD=5 AND C=REF(VOL,1);% l" H' ]0 M! |9 f
M1:=CONST(绿灯);1 B1 j6 r. R7 w3 l, w; g; F; K, Y
阑珊:=MFI1.5;
0 {1 m ?+ A5 L8 UM6:=CONST(量缩);
; Y( r2 L9 ]3 T( u5 d卖量大:=(卖盘-买盘)/买盘>0.4;0 @, _, \- v! ]! L6 K
M7:=CONST(卖量大);
) p6 q) O/ N# W5 t: W5 F' u6 B1 b4 ]买量大:=(买盘-卖盘)/卖盘>0.4;
- E0 f( r4 T* @8 \6 u" {M8:=CONST(买量大);% j1 N6 {# L) V0 g8 ^0 f
TS1:=IF(M1=1,0.03+0.03,0.03);% S9 {: h, L3 V3 O3 q1 n( A$ z
TS2:=IF(M2=1,TS1+0.03,TS1);' u% W7 d8 A' v% l5 q
TS3:=IF(M3=1,TS2+0.03,TS2);
$ Q' ~3 O' c! V+ }! U( MTS4:=IF(M4=1,TS3+0.03,TS3);
: L+ P6 Z& R* W. k1 r1 iTS5:=IF(M5=1,TS4+0.03,TS4);
% x5 b! u+ _6 Z5 c7 ZTS6:=IF(M6=1,TS5+0.03,TS5);
0 r" ^: m7 X& oTS7:=IF(M7=1,TS6+0.03,TS6);
; r, v; a4 j3 }$ _# s( gTS8:=IF(M8=1,TS7+0.03,TS7);! n+ `! G* \4 }" C: L* ?
: V1 f- g) N- r
DRAWTEXT(环境1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,显着走强,中线参加，仓位在2/3左右''),COLORFF00FF;
' L- x: m& L2 z3 p, L& q2 fDRAWTEXT(环境2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不敷，短线出场，仓位在1/2左右''),COLORFF00FF;4 M+ |# \ G1 o: c8 }
DRAWTEXT(环境3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价精良，并没有显着走强，短线出场，仓位1/2左右。''),COLORFF00FF;& W% C8 t) `* S# S. Z+ \
DRAWTEXT(环境4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可，量能不敷，未完全走强,短线参加，仓位1/3左右。''),COLORFF00FF;
. t2 k3 x( q/ S2 I6 f; _DRAWTEXT(环境5=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏，走势尚可，重仓减泰半，清仓者观望。''),COLORFF0000;
' c' G0 o$ n+ BDRAWTEXT(环境6=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌，显着缩量走势，思量大盘风险，减持或清仓。''),COLORFF0000;: k$ w5 }$ l" I2 j' |
DRAWTEXT(环境7=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌，走势显着偏弱，离场观望。''),COLORFF0000;
F2 Z$ x0 @3 s# B. h" PDRAWTEXT(环境8=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌，走势偏弱，离场观望。''),COLORFFFF00;
$ W. a+ e7 W' m$ cDRAWTEXT(环境9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态精良，强势显着，量能富足，可以继续持有。''),COLOR00FFFF;
* p) V/ W7 u# p _) ]DRAWTEXT(环境10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势稳定，强势依然，但量能开始转弱，注意风险''),COLOR00FFFF;
$ _0 _9 O: n$ ]0 j0 JDRAWTEXT(环境11=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力，但股性偏弱，可思量减仓。''),COLORFFFFFF;- g) G2 u- m1 p9 \4 B6 x
DRAWTEXT(环境12=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱，量能不敷，减持大部门筹码''),COLORFFFF00;+ G# {% c* K9 A; Q1 y( i
DRAWTEXT(环境13=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳，注意成交量的变革，但现在不恰当参加。''),COLORFFFF00;( U6 g( k# D* e4 R" T4 E5 d( O6 `
DRAWTEXT(环境14=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明，股价偏弱，注意量能变革，现在不宜参加。''),COLORFFFF00;
: [9 F* E9 Z; KDRAWTEXT(环境15=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象，但量能不敷，趋势不明，不恰当操纵''),COLORFFFF00;
7 j% D. K/ n) _9 B3 S7 r2 V3 WDRAWTEXT(环境16=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱，没有参加代价。''),COLORFFFFFF;
, R2 V# M9 G! e9 X& P4 rDRAWTEXT(大盘1 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌，最佳买点，否则审慎参与。''),COLOR00FF00; ^% m) H% V6 w8 \/ b8 h! U6 R
DRAWTEXT(大盘2 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强，量能不敷，若前一轮下跌，短线出场1/2，量能放大加仓。''),COLORFF00FF;; t: q0 r) j! O3 N% a+ R X5 D
DRAWTEXT(大盘3 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏，重仓者可以减去大部门仓位。''),COLORAAAAAA;
8 _: U; Y& _0 e/ m! l; s! _1 vDRAWTEXT(大盘4 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调解，注意风险，短线清仓观望。''),COLORFF0000;
0 c$ P! d$ t+ a% vDRAWTEXT(大盘5 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势精良，量能理想，可以继续持有强势股。''),COLOR00FFFF;' c5 i4 D+ L# Q N/ W5 x
DRAWTEXT(大盘6 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态精良，但量能稍显不敷，随时预备减仓''),COLOR00FF00;
) E9 @8 b& a& S- |/ p) @/ }' {DRAWTEXT(大盘7 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明，注意成交量变革，现在不相宜出场。''),COLORFFFFFF;6 S' }) q0 Q7 N7 M
DRAWTEXT(大盘8 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下，量能萎缩，不恰当出场。''),COLORFFFFFF;& ]# D: O7 a4 H
DRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''［绿灯］实计生意业务量增长。MFI促进指数增长。''),COLORFFFFFF;' `" n- s$ W0 B" m4 d. M9 h' Q
DRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''［阑珊］实计生意业务量淘汰。MFI促进指数淘汰。''),COLORGREEN;5 ?# a$ r: @3 k$ X4 ?" M* [
DRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''［伪装］实计生意业务量淘汰。MFI促进指数增长。''),COLORGREEN;9 Q% v: I# f9 E* b4 B. O; Z& @
DRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''［蛰伏］实计生意业务量增长。MFI促进指数淘汰。''),COLORYELLOW;0 h: P1 J. j7 k0 N' w. x
DRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN;
# b5 z5 x' g$ s4 ?. O8 c# }DRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW;4 U m- x: D2 U( N- G f
DRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40％以上;''),COLORGREEN; v! K3 O* ?. B1 @' Z }
DRAWTEXT(M8 AND CURRBARSCO |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:07