一,为解盘照图把图文笔墨没置一下。" ^. A) S: E$ t. I% W
二,参数K有三种没置方式,缺省为0。k=0时配景变色,当图面k线周期多时k线
$ L* `- E% j7 t. z! f 有压缩征象。k=2时配景稳定色无压缩,但会失去表现强弱的配景自功变色。
+ \" `: D3 R% E* E9 @: }4 F2 Q; T三,k=2时只有熊样线以上的图面变色,无压缩。但要选择体系配景致共同才好
: w$ m7 V3 [9 z2 Q9 a( q4 C 看。(我选的狩猎绿)
' m5 Z1 U6 G8 B( q- b: x# e6 Z7 M
3 T( ^ S8 I+ M& n ) O c' e9 Y$ {" ^
. W% }, Z5 L6 e4 ^4 A- D{阳光普照__TDX 参数K(0,2,0) 缺省为0}) U1 U# h& F1 a E& v1 `6 S+ R. a
TT:=240/FROMOPEN;
7 v6 K+ o; k: O+ k) X比:=TT;
# p# ^; _( S% X# T* x促进指数MFL:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;
$ A6 I* E u7 iAY2:=EMA(CLOSE,12)-EMA(CLOSE,26);$ O3 m/ {! C# y) T+ j9 S) X
AZ2:=EMA(AY2,9);3 [- \* A& B7 \* H4 \- X
LT2:=(AY2-AZ2);
) s0 i( `' z% ?* T7 t8 J" P9 P" PL211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
t" i% K7 |+ W9 IZGD:=HHV(H,80)*0.99;5 i P; ]% r6 Y
ZGD2:=CONST(ZGD);4 k Q! T9 y0 E0 y! y* R
ZDD:=LLV(L211,80);1 s$ T I( z( B. ^0 b* K) b6 Z1 Z
ZDD2:=CONST(ZDD);/ s" T4 m+ r5 h& J6 l$ p
YYA4:=MA(CLOSE,20);6 q3 W$ n. g* S0 \
YYA5:=(CLOSE > MA(CLOSE,5));
+ L9 M( Y; s S8 W n5 u' R* nYYA6:=(MA(CLOSE,5) > MA(CLOSE,10));* n3 T; s* S! {1 x1 v
YYA7:=(CLOSE > MA(CLOSE,10));
, r# z( Z' z# ?& T& HYYA8:=(MA(CLOSE,5) > MA(CLOSE,20));+ }% R8 y' e9 U5 G# r
YYA9:=(CLOSE > MA(CLOSE,20));" Z P# H( j. B/ s& M: f! _& p2 b
YYA10:=REF(YYA4,1);1 l+ v$ M; O! C- D( U, w; G4 I
YYA11:=(YYA4 > YYA10);7 k( t) _6 X% r8 T* e3 s1 m! }& m
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)));
6 k6 ?5 D# x0 g2 {/ yDSLX:=(CLOSE / INDEXC);3 ~ X/ N7 q. u
DSLX1:=MA(DSLX,5);
$ f# _# p" R! u* p. mDSLX2:=MA(DSLX,10);* @9 F( i" G; g* \- T7 M1 [; m; j V
YYV1:=MA(VOL,5);
+ }8 V4 `; ^0 f, s3 MYYV2:=MA(VOL,10);
+ I: h$ x, W# l3 hJ1:=CONST(IF( YYAVX > 0,200,100));: r" I) A! w5 v+ m; G; r- G& \$ E7 J
J2:=CONST(IF( YYAVX > 0,00,100));# J* K7 ~, r7 d1 I9 a% i; V1 J# t
J3:=CONST(IF( YYAVX > 0,100,100));
E5 b! \$ b' B, ~; WZGD3:=IF(K=0,ZGD2,DRAWNULL);
4 w7 `0 P" L- Y* m: jZDD3:=IF(K=0,ZDD2,DRAWNULL);$ w4 {, I( J }; A P
ZGD4:=IF(K=1,ZGD2,DRAWNULL);% T9 y, b; @! B7 j
牛背:=MA(C,21);, f, E' c0 w2 l# Y& @& O
牛逼:=牛背+2*STD(C,21);
" E) e/ |" b B) ~3 Z" P6 w5 @* f熊样:=牛背-2*STD(C,21);8 |9 C) y! }/ w) X3 g' b
牛背2:=IF(C>牛背,牛背,DRAWNULL);
$ B: f. h$ c- _& R熊样2:=IF(C>牛背,熊样,DRAWNULL);
0 w1 u) F. d6 B3 A3 EDRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);
! R# }% y3 W. b7 P+ S6 ~DRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);' x# Q& y, R5 t) ^- F' o
DRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));4 ]' L- u# H1 l: y
牛缰绳:MA(CLOSE,4);
4 ?8 ?" t( L4 G$ Z牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;- D c& k* g) e2 U6 H1 Z; x/ V
牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;
+ l+ }! o1 N; e( S, s牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;' Y. X- N: v; B
AY:=EMA(CLOSE,12)-EMA(CLOSE,26);
8 G% [/ e- b( oAZ:=EMA(AY,9);) @) i S$ J) T3 h' n L$ c, f. v
LT:=(AY-AZ);% Z4 N% C1 r: V1 \: i8 x
L21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
# a2 V2 g7 ]* G: ^IF(LT,LLV(L,21),DRAWNULL),COLORFFFF00;! C4 M; C6 h' x1 T- d
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;
4 W) T" T- T! j9 c2 M* vSTICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
+ h4 H# w+ Y5 B/ q1 xSTICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;
' |7 b' j+ _3 ?, j5 o+ ~* o& pSTICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
/ }" u# D( L+ WSTICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE = DSLX1)),1,0));
5 j5 A# E! \, l4 V环境2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));7 l6 V. y1 }: j- |6 D, e
环境3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));/ g% y. q( v: z2 N" L, W
环境4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 = YYV2)) AND (DSLX >= DSLX1)),1,0));8 e$ p, I5 G# ]3 h/ q8 p
环境6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
9 W. I! @0 }, h/ p! A0 ?- J环境7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
( V7 u9 d+ y* z环境8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
( F9 E( y) Y1 C0 R5 e& W/ X+ P环境9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));+ d( ~% t" h% X/ q
环境10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));7 ~: Z8 H& ?! y" J1 |" f' V ~- ^( {
环境11:CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW;7 p" V# i* r1 `; ^+ `
环境12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
% X) Y- J% G9 W( l5 C: \) o& U环境13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));6 @1 d1 Q8 D3 W% n. r$ r
环境14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
! S2 _+ H) q+ x- L* ~环境15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
" ? Q' I0 k2 b& v1 k; S- d0 B$ Q& N' n环境16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
5 a& a) F1 U) @$ t/ L: N6 j大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0));( d0 r: H3 i# h0 ]4 ^6 G
大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));. \$ X! J" v9 Z
大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));$ Z: `: o: `3 a
大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));
! f- B, r- r0 }6 H大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));
) v9 d- _0 @+ i2 Z* o' g1 O大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));
' M, U' j( E8 G大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0));
0 K4 O. q! Z8 H& y大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));
( ?. ]1 w8 H& k& w* @
' m- ^! S: F- oWJ:=(H+L+C)/3;
- s) m4 S% A; @0 n8 d1 x* ^* c7 OV1:=IF(H=L,1,H-MAX(O,C));* w2 i" G* H8 P4 T# ?8 N6 E
V2:=IF(H=L,1,MAX(C,O)-WJ);
+ _# o, I3 y7 g C$ n% v5 jV3:=IF(H=L,1,MIN(O,C)-L);& B. M- L4 I7 R+ {5 K; u R0 n
V4:=IF(H=L,1,WJ-MIN(C,O));
+ s4 u4 ~2 ~4 s$ EV5:=VOL/IF(H=L,4,H-L);
4 i1 U$ D& f0 z+ K. nV6:=(V1*V5);$ i* v& j5 `- x+ h8 _. @7 t1 P
V7:=(V2*V5);
8 L- T! y* q7 D% l6 Y) b' ]4 xV8:=(V3*V5);* h. a4 a/ v/ |4 d4 J. f7 @6 w
V9:=(V4*V5);7 ]& \5 P8 p' L7 a
买盘1:=DYNAINFO(23)*比;
. E6 V T( Z s卖盘1:=DYNAINFO(22)*比;0 }2 x+ P; z4 t
买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));. A, {, ~9 w+ ~
卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));
; ?% s2 b: t% y5 v6 w买盘:=IF(ISLASTBAR AND PERIOD=5 AND C=REF(VOL,1);
( U6 q/ S+ I0 z$ ] w# `' g( aM1:=CONST(绿灯);# @ k) ?% j( s2 o9 {( ^
阑珊:=MFI1.5;
7 E' }. p8 L' p. e/ hM6:=CONST(量缩);
) ]/ O7 n5 U& ^5 c! r卖量大:=(卖盘-买盘)/买盘>0.4;& ?: f& |# o" i" v( V
M7:=CONST(卖量大);4 R+ l# r6 @6 U; S4 o! L
买量大:=(买盘-卖盘)/卖盘>0.4;
% @' i% \$ I" n! W9 E* VM8:=CONST(买量大);
% `) E# ~" E1 E' WTS1:=IF(M1=1,0.03+0.03,0.03);
O& ^4 @. |4 `0 n4 zTS2:=IF(M2=1,TS1+0.03,TS1);+ O4 j z; @! v' s" ^3 I3 v/ f- j
TS3:=IF(M3=1,TS2+0.03,TS2);
; D! ]! ^, m' b1 `# MTS4:=IF(M4=1,TS3+0.03,TS3);/ V, M6 T7 k$ J5 r e/ k
TS5:=IF(M5=1,TS4+0.03,TS4);* S2 p# @2 j& X6 [; `# N
TS6:=IF(M6=1,TS5+0.03,TS5);. ?: y6 I! F8 O( n) {9 ^
TS7:=IF(M7=1,TS6+0.03,TS6);" t% ?8 D+ l0 f- o5 x/ ]
TS8:=IF(M8=1,TS7+0.03,TS7);+ V$ f" j! _ q
& X" p# o4 X1 |1 S; B
DRAWTEXT(环境1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,显着走强,中线参加,仓位在2/3左右''),COLORFF00FF;
8 G2 @: B0 E" U( hDRAWTEXT(环境2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不敷,短线出场,仓位在1/2左右''),COLORFF00FF;: H/ ]$ z5 C6 W1 D4 H: h7 [
DRAWTEXT(环境3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价精良,并没有显着走强,短线出场,仓位1/2左右。''),COLORFF00FF;
+ l: y9 O1 o7 @; l* EDRAWTEXT(环境4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可,量能不敷,未完全走强,短线参加,仓位1/3左右。''),COLORFF00FF;
1 Q0 f9 [* I; I0 W6 N5 e0 g% W5 @DRAWTEXT(环境5=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏,走势尚可,重仓减泰半,清仓者观望。''),COLORFF0000;
% C r: U, F& V( R' RDRAWTEXT(环境6=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌,显着缩量走势,思量大盘风险,减持或清仓。''),COLORFF0000;
6 u3 g S3 p5 ^% n f4 T0 u E8 ~* UDRAWTEXT(环境7=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌,走势显着偏弱,离场观望。''),COLORFF0000;1 e0 a" a/ o- N8 N5 f
DRAWTEXT(环境8=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌,走势偏弱,离场观望。''),COLORFFFF00;/ N1 r" j2 ~$ g$ z K" R5 M
DRAWTEXT(环境9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态精良,强势显着,量能富足,可以继续持有。''),COLOR00FFFF;
! N3 j1 m- E8 xDRAWTEXT(环境10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势稳定,强势依然,但量能开始转弱,注意风险''),COLOR00FFFF;! ^0 e4 @. p B+ B5 f
DRAWTEXT(环境11=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力,但股性偏弱,可思量减仓。''),COLORFFFFFF;' K" n: @; {5 J+ x' G, Z1 u
DRAWTEXT(环境12=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱,量能不敷,减持大部门筹码''),COLORFFFF00;2 d5 ]: P7 V+ X( X5 ^. ^1 y" Y
DRAWTEXT(环境13=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳,注意成交量的变革,但现在不恰当参加。''),COLORFFFF00;6 X9 A7 v* N3 f2 Y% ]
DRAWTEXT(环境14=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明,股价偏弱,注意量能变革,现在不宜参加。''),COLORFFFF00;! Z% H) h4 g& r( g2 r( L
DRAWTEXT(环境15=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象,但量能不敷,趋势不明,不恰当操纵''),COLORFFFF00;
* Y }- x( m: K4 w% s) f2 O, nDRAWTEXT(环境16=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱,没有参加代价。''),COLORFFFFFF;
" s& d5 L v- O4 E. j3 oDRAWTEXT(大盘1 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌,最佳买点,否则审慎参与。''),COLOR00FF00;% s& C0 z5 ]( }
DRAWTEXT(大盘2 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强,量能不敷,若前一轮下跌,短线出场1/2,量能放大加仓。''),COLORFF00FF;
3 C0 y% s5 K) N0 F2 W/ ~, {3 RDRAWTEXT(大盘3 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏,重仓者可以减去大部门仓位。''),COLORAAAAAA;6 p; V0 F, b; s
DRAWTEXT(大盘4 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调解,注意风险,短线清仓观望。''),COLORFF0000;5 B% t7 o( o C. K: a
DRAWTEXT(大盘5 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势精良,量能理想,可以继续持有强势股。''),COLOR00FFFF;
. Z0 h: H. d/ o8 c' qDRAWTEXT(大盘6 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态精良,但量能稍显不敷,随时预备减仓''),COLOR00FF00;
2 v- H" s" a' }1 XDRAWTEXT(大盘7 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明,注意成交量变革,现在不相宜出场。''),COLORFFFFFF;1 k2 x% ?1 H5 y
DRAWTEXT(大盘8 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下,量能萎缩,不恰当出场。''),COLORFFFFFF;% t4 V: c3 k# |4 ^) B/ `+ p
DRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''[绿灯]实计生意业务量增长。MFI促进指数增长。''),COLORFFFFFF;
" e4 p( ?/ z0 O: w1 j- o) I7 U: q5 ODRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''[阑珊]实计生意业务量淘汰。MFI促进指数淘汰。''),COLORGREEN;$ O' J; ?1 `3 D# v
DRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''[伪装]实计生意业务量淘汰。MFI促进指数增长。''),COLORGREEN;) N# \+ e C5 K5 y% e+ X/ l6 x; s
DRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''[蛰伏]实计生意业务量增长。MFI促进指数淘汰。''),COLORYELLOW;
% q3 S2 l5 Z, m+ l& CDRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN;
( w. a, c3 V/ Z: ^/ aDRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW;, v4 D4 ]/ S8 s" G
DRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40%以上;''),COLORGREEN;1 P3 l+ G: |! L
DRAWTEXT(M8 AND CURRBARSCO |