|
一，为解盘照图把图文笔墨没置一下。
: o8 d1 N1 l, k) ?+ s0 Y二，参数K有三种没置方式，缺省为0。k=0时配景变色，当图面k线周期多时k线% N$ y+ e4 Q8 h' F5 L. z
有压缩征象。k=2时配景稳定色无压缩，但会失去表现强弱的配景自功变色。# p& H" w. w9 o
三，k=2时只有熊样线以上的图面变色,无压缩。但要选择体系配景致共同才好
9 D* J; p8 L/ G- v6 B J- ?* t 看。(我选的狩猎绿)
1 a/ y. u1 F7 }0 c) J: m
8 Z2 o" k2 S+ e: Z. Z. \
0 w a, a: z# p9 e! X; H$ ~, f& y/ g* l7 Y6 q, M$ \
{阳光普照__TDX 参数K(0,2,0) 缺省为0}" b% r( @* M( s7 B, }8 w
TT:=240/FROMOPEN;8 ?2 S, z! s+ a3 o
比:=TT;" f& B7 Y' b: V7 {- N% K
促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;# D8 g; G) Q7 L& C6 f
AY2:=EMA(CLOSE,12)-EMA(CLOSE,26);
+ `8 M2 ?) b Y c) G: U F2 PAZ2:=EMA(AY2,9);
1 }# e& w3 L$ t7 i) Z$ k. ]LT2:=(AY2-AZ2);
" D% }. F6 u2 _L211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
+ H* i4 W g# w5 iZGD:=HHV(H,80)*0.99;
8 \" ]- T9 u. ]9 B& W( }ZGD2:=CONST(ZGD);, g, S( A* B3 j- m7 r
ZDD:=LLV(L211,80);) r8 S9 T6 J* I
ZDD2:=CONST(ZDD);
1 G+ n. [$ K4 Q7 C9 n+ B) MYYA4:=MA(CLOSE,20);
7 { l* M$ y( n) K9 mYYA5:=(CLOSE > MA(CLOSE,5));
" w! N' w9 x1 PYYA6:=(MA(CLOSE,5) > MA(CLOSE,10));
+ r( ?- p1 P9 V/ \YYA7:=(CLOSE > MA(CLOSE,10));
6 I# ^! |6 [2 E1 u6 g% v7 kYYA8:=(MA(CLOSE,5) > MA(CLOSE,20));$ ^4 k8 v* y1 m' Z7 t# y
YYA9:=(CLOSE > MA(CLOSE,20));4 E+ O1 t$ Z9 t- z. x5 r; L9 f
YYA10:=REF(YYA4,1);2 A- ?, U7 ^: O) }& C) M
YYA11:=(YYA4 > YYA10);; g) O% H# W) p, x8 `. l. H8 u
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)));
; ^/ X3 U% P6 G ~6 v) ]* jDSLX:=(CLOSE / INDEXC);
/ [- e$ B. Q: ?3 A' a8 T0 ]2 YDSLX1:=MA(DSLX,5);( {) S: C4 d6 n+ n
DSLX2:=MA(DSLX,10);
9 Z: X; w, |& s- lYYV1:=MA(VOL,5);$ p) D* d! q/ t( b: p
YYV2:=MA(VOL,10);
2 i2 R6 G! e2 H" c; g! a. NJ1:=CONST(IF( YYAVX > 0,200,100));
9 d7 ~0 S: ?' Z. SJ2:=CONST(IF( YYAVX > 0,00,100));
8 C3 w7 l3 v! a) sJ3:=CONST(IF( YYAVX > 0,100,100));) P: b \3 z _ p3 d
ZGD3:=IF(K=0,ZGD2,DRAWNULL);
; V/ ~- B& i0 M+ LZDD3:=IF(K=0,ZDD2,DRAWNULL);
" n' @" u s& Y A( X7 o/ z+ hZGD4:=IF(K=1,ZGD2,DRAWNULL);
! e% {9 N5 u6 j, y牛背:=MA(C,21);
' {- S. e+ g- s0 R牛逼:=牛背+2*STD(C,21);& ?5 b& p( y) w
熊样:=牛背-2*STD(C,21);( J6 j( y0 P8 W9 B% {' H$ |
牛背2:=IF(C>牛背,牛背,DRAWNULL);
% J2 _! C( h2 v$ a5 M. \" o/ l熊样2:=IF(C>牛背,熊样,DRAWNULL);! D8 X2 a0 t9 }1 o( b8 Z% A
DRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);. A# O0 d% ]6 s* _
DRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);
9 T* H5 h+ J9 U5 aDRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));* E( S* C3 j8 J+ J- Y R
牛缰绳:MA(CLOSE,4);# S4 a; |7 }, v# U' R
牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;1 K/ a, H" z/ i J& M& w* i- h
牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;
' H6 T: w8 R; H, G* R# _7 o牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;3 z& G% \( F2 M
AY:=EMA(CLOSE,12)-EMA(CLOSE,26);$ u8 w3 E- H+ O R( k
AZ:=EMA(AY,9);
; w7 V/ g: h* F3 K- w" tLT:=(AY-AZ);: L0 S2 M) ]9 I1 }7 S6 s; v( p9 ?# `
L21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;0 i3 Y! C9 s2 m$ E+ A. Y
IF(LT,LLV(L,21),DRAWNULL),COLORFFFF00;, ?( w! G R( K# @
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;* E. M4 V' }! F
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;) K0 I2 N/ a. Q2 W/ V# n
STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;2 _- z1 I! ]' y" o0 i
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;6 g, w/ Z2 j0 ]2 g
STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE = DSLX1)),1,0));' E1 z4 ^3 q7 L4 |: v! ^
环境2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
* H" Z# N. ~0 ?: M环境3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));+ _$ M1 K R( W: B* r! u
环境4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 = YYV2)) AND (DSLX >= DSLX1)),1,0));' v$ |) I( m; u! s! l, [6 a
环境6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
2 g: \4 e7 r0 i* m* ^环境7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
d: H4 E! H' f环境8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
# k( V% P! `7 }环境9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
$ }" g: q7 S" c( s& ]/ p; O: W环境10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));, M# M# K5 i% Q
环境11:CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW;
- D! A1 i$ @$ e) B: \2 R2 j环境12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));% M+ ^0 Q. T& l4 u
环境13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));$ g' z/ d4 V* h* y! S$ y9 u" R7 m3 X
环境14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));! j, N9 S, F& Y" k$ t
环境15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));7 l. K4 V. h5 S+ G4 E
环境16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
) q( ~- {; j7 n8 f$ A' L( N大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0));4 Z0 C# H8 ], _8 E) x. t0 J. S
大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));4 V# @/ O2 S' a- y* J( U
大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));
% L3 F' f7 G6 C! c0 \5 T+ X大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));8 o% R4 Q5 k9 l6 Y H% O+ O7 D
大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));
1 {7 p: V7 K; S+ Y大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));
s) V" M3 I8 p: F \大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0));& W9 v7 S1 i0 @" u1 v ]' z
大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));8 O0 |5 s; W' u7 |( M0 r2 d
; ~+ D2 A# j H
WJ:=(H+L+C)/3;4 q9 J0 I! G( D+ B( m6 s8 y, q
V1:=IF(H=L,1,H-MAX(O,C));/ s0 H: Q3 ~$ b3 V( P4 j4 ]
V2:=IF(H=L,1,MAX(C,O)-WJ);
/ N+ F4 k- F1 jV3:=IF(H=L,1,MIN(O,C)-L);
& ^' M( W' d5 a6 N+ |+ t/ _V4:=IF(H=L,1,WJ-MIN(C,O));
# R6 A7 G( T% z3 Q3 V- hV5:=VOL/IF(H=L,4,H-L);
8 y. m7 W' d3 M: W* @V6:=(V1*V5);
3 J3 Q9 ~. y9 ^( B. TV7:=(V2*V5);1 R) p8 ?2 X! D* [
V8:=(V3*V5);6 e% _2 l t; x$ u" [" C
V9:=(V4*V5);$ X l6 s2 c7 e6 j5 U
买盘1:=DYNAINFO(23)*比;
- C8 E" V. ]& [卖盘1:=DYNAINFO(22)*比;
2 g) ]7 C# x( a, ]& b8 d买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));0 x i5 o! K/ U: [6 S7 Z
卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));
( f$ @) x. c6 `! O5 Z4 P买盘:=IF(ISLASTBAR AND PERIOD=5 AND C=REF(VOL,1);7 N" a& x9 g4 I5 F2 i
M1:=CONST(绿灯);
! s3 w6 d' ^) x* P/ E阑珊:=MFI1.5;
P R& J1 Z, T$ {1 SM6:=CONST(量缩);
$ }6 P+ g' m7 G/ r( H5 u8 |卖量大:=(卖盘-买盘)/买盘>0.4;
N3 k' {2 |! a! V$ sM7:=CONST(卖量大);
9 |; s3 p# R. o- }0 x5 ]买量大:=(买盘-卖盘)/卖盘>0.4;
% b5 Q8 j) B! g1 QM8:=CONST(买量大);% G: }: U& s' H _+ k6 s
TS1:=IF(M1=1,0.03+0.03,0.03);
: }" u% k. q% e3 X; j4 D6 p; ]TS2:=IF(M2=1,TS1+0.03,TS1);
- R- n& [8 R' L& n8 R% ATS3:=IF(M3=1,TS2+0.03,TS2);6 q. o% a+ j. O% Y4 N5 o) x3 x. e
TS4:=IF(M4=1,TS3+0.03,TS3);7 `. i- v9 o, |
TS5:=IF(M5=1,TS4+0.03,TS4);
# b- u& {& j$ [: i3 h% YTS6:=IF(M6=1,TS5+0.03,TS5);
x' I @# Y Q6 D) ?$ d* BTS7:=IF(M7=1,TS6+0.03,TS6);
3 V7 B5 u, V! MTS8:=IF(M8=1,TS7+0.03,TS7);1 Z; I D4 n0 K S( v+ `1 ?
& Z% j. P6 F4 {- u# m5 QDRAWTEXT(环境1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,显着走强,中线参加，仓位在2/3左右''),COLORFF00FF;4 e# z/ @8 \1 H: Y* \& e% g
DRAWTEXT(环境2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不敷，短线出场，仓位在1/2左右''),COLORFF00FF;
. F1 I0 H# v' u3 e, d7 ~4 j* h8 K7 oDRAWTEXT(环境3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价精良，并没有显着走强，短线出场，仓位1/2左右。''),COLORFF00FF;; M% E! n' u* U- n
DRAWTEXT(环境4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可，量能不敷，未完全走强,短线参加，仓位1/3左右。''),COLORFF00FF;
) f/ {. i p, f) m$ ]) ZDRAWTEXT(环境5=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏，走势尚可，重仓减泰半，清仓者观望。''),COLORFF0000;) Q0 | a3 `5 ], D, _
DRAWTEXT(环境6=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌，显着缩量走势，思量大盘风险，减持或清仓。''),COLORFF0000;
" i ]( Y4 b# j& rDRAWTEXT(环境7=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌，走势显着偏弱，离场观望。''),COLORFF0000;3 |: F4 J5 s) c1 P( T
DRAWTEXT(环境8=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌，走势偏弱，离场观望。''),COLORFFFF00;( v. B: I/ [( W) L- J+ ]( Y) x
DRAWTEXT(环境9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态精良，强势显着，量能富足，可以继续持有。''),COLOR00FFFF;
# o0 p4 S% y! d$ t. wDRAWTEXT(环境10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势稳定，强势依然，但量能开始转弱，注意风险''),COLOR00FFFF;
8 R5 b8 N7 k& R4 l* A9 I' t% w$ ^. XDRAWTEXT(环境11=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力，但股性偏弱，可思量减仓。''),COLORFFFFFF;; {2 E5 \( Y( V& x/ J( D
DRAWTEXT(环境12=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱，量能不敷，减持大部门筹码''),COLORFFFF00;
' a* Q$ `4 P% O: `8 I5 ODRAWTEXT(环境13=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳，注意成交量的变革，但现在不恰当参加。''),COLORFFFF00;$ v4 b+ q9 M8 U) @' O$ t' W
DRAWTEXT(环境14=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明，股价偏弱，注意量能变革，现在不宜参加。''),COLORFFFF00;
$ _* H3 {& [- m# n/ fDRAWTEXT(环境15=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象，但量能不敷，趋势不明，不恰当操纵''),COLORFFFF00;' m, v; X0 f5 N8 S6 ]
DRAWTEXT(环境16=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱，没有参加代价。''),COLORFFFFFF;
) n2 B, G& @7 z- L8 JDRAWTEXT(大盘1 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌，最佳买点，否则审慎参与。''),COLOR00FF00;
& ~4 M9 f) F5 L! u/ zDRAWTEXT(大盘2 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强，量能不敷，若前一轮下跌，短线出场1/2，量能放大加仓。''),COLORFF00FF;
) y! Q" u( S) X9 i( M$ T8 XDRAWTEXT(大盘3 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏，重仓者可以减去大部门仓位。''),COLORAAAAAA;$ L1 f2 ~3 o3 y
DRAWTEXT(大盘4 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调解，注意风险，短线清仓观望。''),COLORFF0000;( Q" l3 A7 E0 s# ]
DRAWTEXT(大盘5 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势精良，量能理想，可以继续持有强势股。''),COLOR00FFFF;
1 I7 f) A4 b* WDRAWTEXT(大盘6 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态精良，但量能稍显不敷，随时预备减仓''),COLOR00FF00;9 V7 e! C, A* o& v- k! z5 n0 A4 X+ a
DRAWTEXT(大盘7 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明，注意成交量变革，现在不相宜出场。''),COLORFFFFFF;* z2 N! j! Q, N7 D/ J
DRAWTEXT(大盘8 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下，量能萎缩，不恰当出场。''),COLORFFFFFF;
3 ?9 w$ c* A) P# f( T$ ?DRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''［绿灯］实计生意业务量增长。MFI促进指数增长。''),COLORFFFFFF;
P) b8 C9 j. S" Z+ x' Z* aDRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''［阑珊］实计生意业务量淘汰。MFI促进指数淘汰。''),COLORGREEN;4 N* I8 F" R) x$ ~% w3 n6 h' D5 g! @
DRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''［伪装］实计生意业务量淘汰。MFI促进指数增长。''),COLORGREEN;
, d, r) t Q: rDRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''［蛰伏］实计生意业务量增长。MFI促进指数淘汰。''),COLORYELLOW;: C0 M+ h6 p* j: a
DRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN;8 P7 ?0 a6 a( r" ?+ t( d0 u
DRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW;1 @6 T8 n. B" D2 G' T
DRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40％以上;''),COLORGREEN;4 G+ w* M8 O$ H# H1 @" c
DRAWTEXT(M8 AND CURRBARSCO |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:07