|
一，为解盘照图把图文笔墨没置一下。6 y- M8 j; E" e+ r
二，参数K有三种没置方式，缺省为0。k=0时配景变色，当图面k线周期多时k线
/ n0 t" S+ m$ `3 {8 w 有压缩征象。k=2时配景稳定色无压缩，但会失去表现强弱的配景自功变色。
' S N- O. U' G* b三，k=2时只有熊样线以上的图面变色,无压缩。但要选择体系配景致共同才好4 y9 D7 E( i% P& h8 F4 }
看。(我选的狩猎绿). J. \4 `7 p$ U4 r
' b( N) W, s& c- }( ~ o& K. J , s5 I7 E! X0 o0 [; j( g) ]
1 d+ _# C1 O4 C( G; @' o- Z. E{阳光普照__TDX 参数K(0,2,0) 缺省为0}' u! G U) q4 T3 {+ }
TT:=240/FROMOPEN;
6 _. S& v) I. O. q比:=TT;
0 M4 ]# O. s0 F: B* K, z7 }促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;' a- `) D% \1 X8 n3 U: \
AY2:=EMA(CLOSE,12)-EMA(CLOSE,26);2 [- S7 J5 `# w2 Y# j
AZ2:=EMA(AY2,9);$ g3 X; d. U7 H% v8 K
LT2:=(AY2-AZ2);1 U @9 l, Y- z0 v7 \
L211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;* f: F6 G! O# U$ m& E8 z
ZGD:=HHV(H,80)*0.99;+ H$ [1 B* X0 e- r: M! N8 c
ZGD2:=CONST(ZGD);
3 t! p2 a" m- @ZDD:=LLV(L211,80);! A7 _. q: y: j. H* I n$ R
ZDD2:=CONST(ZDD);
4 Y) N' ^, V7 B/ w7 E+ R9 ^( {5 gYYA4:=MA(CLOSE,20);8 }! v( g2 I3 u
YYA5:=(CLOSE > MA(CLOSE,5));
$ a! B- K" F8 }! C1 [$ iYYA6:=(MA(CLOSE,5) > MA(CLOSE,10));& p, f+ v- C7 g5 {3 V* L/ S0 S. I x
YYA7:=(CLOSE > MA(CLOSE,10));( U& N) C6 W+ n& r/ c0 m; s
YYA8:=(MA(CLOSE,5) > MA(CLOSE,20));
' k$ {+ }$ q: CYYA9:=(CLOSE > MA(CLOSE,20)); V4 t9 {1 w4 x
YYA10:=REF(YYA4,1);
# N! Z+ `) u7 H) hYYA11:=(YYA4 > YYA10);! v9 r! A9 `# _) W( p" h
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)));# G! t8 U* k6 e0 x4 F% F. D
DSLX:=(CLOSE / INDEXC);
0 F {; X2 h! G" M6 P% TDSLX1:=MA(DSLX,5);
, K/ I, B$ _' q9 LDSLX2:=MA(DSLX,10);
( j5 k* z1 K4 i1 r% b2 VYYV1:=MA(VOL,5);+ B- b7 Q6 [4 j W+ ]5 S6 L# b- d
YYV2:=MA(VOL,10);+ R8 w/ A, r* Y, Y
J1:=CONST(IF( YYAVX > 0,200,100));
4 u+ C4 F, {( o5 r4 ]/ t+ GJ2:=CONST(IF( YYAVX > 0,00,100));; z; b+ K* M: s* z+ s- H5 @
J3:=CONST(IF( YYAVX > 0,100,100));
+ c" W6 h4 X$ YZGD3:=IF(K=0,ZGD2,DRAWNULL);1 S- m n4 O2 R. d1 w8 t
ZDD3:=IF(K=0,ZDD2,DRAWNULL);6 r. x M/ z9 L( O
ZGD4:=IF(K=1,ZGD2,DRAWNULL);
7 e5 W% j6 a2 f3 w: _牛背:=MA(C,21);$ v* J* ^2 Q9 I- w* G- c
牛逼:=牛背+2*STD(C,21);
# z- g* c3 o# F4 }9 R) k' s熊样:=牛背-2*STD(C,21);
0 D8 N$ h. P7 s& K( g; w) `牛背2:=IF(C>牛背,牛背,DRAWNULL);
M3 w. ~6 S u! d: F熊样2:=IF(C>牛背,熊样,DRAWNULL);
9 L3 \: M! b" @. uDRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);
/ W8 ~. m5 e: RDRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);
+ S, x& C) ~ rDRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));
8 N3 `6 |/ f6 M牛缰绳:MA(CLOSE,4);
. L- \6 @5 N+ m' U+ D: c+ T牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;
: Z" Y- v* E* c. o1 L- [牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;' z2 I9 J- I @7 s
牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;0 T4 Q; p6 N' A- B( D9 Q7 B. X
AY:=EMA(CLOSE,12)-EMA(CLOSE,26);
: c8 t& p3 y7 HAZ:=EMA(AY,9);
+ n; V$ h% b3 M& j5 bLT:=(AY-AZ);. k& }6 {9 D) j- q1 X; u" i4 Q9 j, |
L21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;2 p3 w1 m' M4 J* E% h
IF(LT,LLV(L,21),DRAWNULL),COLORFFFF00;
~1 s( w q( }! x9 Q/ ~# V% ~STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;9 ^0 g* \" C( N: U, t
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;7 m# I, ^$ E+ v: P# z2 s/ K1 x
STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;. D) H; p$ i* Q& \4 L; `
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
2 x+ @' A/ j0 N/ j; h0 wSTICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE = DSLX1)),1,0));) F- Y" O5 f& s& u% Z* C% L7 [7 k
环境2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
" G. }7 \1 n) T6 o0 w环境3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));! L) z8 @8 W; m. _7 T" G" U
环境4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 = YYV2)) AND (DSLX >= DSLX1)),1,0));
- ]8 H. E) W& U8 J, N; A1 m环境6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));- d" E) C8 u% Q. w, H' j6 @3 |
环境7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
3 A5 B3 { P `% c环境8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
! d: A' r2 b0 q! E/ o环境9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
& F0 S( x" i; @) V) N$ T环境10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));1 c3 G: {; u6 V3 y7 Z3 z+ l+ {
环境11:CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW;+ [# ?6 {2 ~* g1 B" q! E( G L
环境12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));8 H& h% \& `( w3 [4 y
环境13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));# v7 b2 h% V% a
环境14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));# }0 p, S2 I( E* k
环境15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));; u! V% Y8 Q* ^0 j, q4 _ e
环境16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
7 h2 o* U4 G0 j! Q大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0));
0 l1 p5 W6 k ]- m大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));
: ^& t& }! F" w+ B$ m8 ~大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));
4 U# f7 R: ~+ G$ n4 E& {大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));8 r& ^9 x- Y9 M4 N9 S
大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));
' D" R+ y) L7 E* n: X1 x大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));! s1 {4 O5 f3 a' z
大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0));
6 L' Y1 ]5 _0 ^& o大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));& Q8 v# y4 g1 V) M6 t
3 O2 v" o1 J8 `1 A5 h! K1 J) A; QWJ:=(H+L+C)/3;
3 f: g3 v- A9 _1 ^5 B$ O* [. s! jV1:=IF(H=L,1,H-MAX(O,C));# [5 v; t: F$ X2 y
V2:=IF(H=L,1,MAX(C,O)-WJ);6 \0 q" @0 H6 i( V: j2 T3 A
V3:=IF(H=L,1,MIN(O,C)-L);
' b0 ], H8 M- c; rV4:=IF(H=L,1,WJ-MIN(C,O));% l/ J! S6 z$ f A5 [) v( G; b9 ]
V5:=VOL/IF(H=L,4,H-L);2 q5 k, h7 u. H
V6:=(V1*V5);+ P+ [& K# q3 q1 n- N: C
V7:=(V2*V5);+ }: C7 l# u) c, ?( H
V8:=(V3*V5);1 }/ x- |! v4 a. w4 d
V9:=(V4*V5);+ C0 W/ e* H! i+ h# T
买盘1:=DYNAINFO(23)*比;, u2 s9 S# H. g
卖盘1:=DYNAINFO(22)*比;
% k4 [1 |/ ^6 ^# c+ Z( D; G N* U买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));$ v9 T' `3 N% Y' e i; H0 q
卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));
u6 O1 c- ~- |" r; p: _买盘:=IF(ISLASTBAR AND PERIOD=5 AND C=REF(VOL,1);- `+ H' x* I! [/ N0 ]4 Y8 [; \
M1:=CONST(绿灯);* Q3 u. a5 t, R: Q
阑珊:=MFI1.5;6 L$ _6 x" b0 w c' j5 }: o4 n% Y
M6:=CONST(量缩);/ Z0 g0 ?2 _: O1 u) y3 d2 g$ y
卖量大:=(卖盘-买盘)/买盘>0.4;
7 o) P. C# M( `, H$ G' XM7:=CONST(卖量大);
0 q; M0 t3 Z0 n9 a% Z1 ~买量大:=(买盘-卖盘)/卖盘>0.4;2 x, i9 K$ ~& y4 f8 a: V
M8:=CONST(买量大);( t2 N. Z! s9 k8 l5 i. i
TS1:=IF(M1=1,0.03+0.03,0.03);
5 z) _ D0 K6 c0 w& JTS2:=IF(M2=1,TS1+0.03,TS1);- B; z: t: v' i* H' b/ A& g
TS3:=IF(M3=1,TS2+0.03,TS2);
, q: P0 ]+ K; a3 @$ o: {. VTS4:=IF(M4=1,TS3+0.03,TS3);
4 ^9 w+ q8 ]% N+ o2 i) P1 ATS5:=IF(M5=1,TS4+0.03,TS4);
9 p) t* x( Q5 }TS6:=IF(M6=1,TS5+0.03,TS5);
) I1 ~2 u0 B3 `TS7:=IF(M7=1,TS6+0.03,TS6);
n1 U3 ?- A0 ~4 o; n& dTS8:=IF(M8=1,TS7+0.03,TS7);
: V0 p6 ^ ]9 v f" [$ d, F i; W: J* g5 H% {- v! M- a
DRAWTEXT(环境1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,显着走强,中线参加，仓位在2/3左右''),COLORFF00FF;* F( R: A; V1 m( r
DRAWTEXT(环境2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不敷，短线出场，仓位在1/2左右''),COLORFF00FF;
" P5 Z+ `4 E9 r) d: {8 @DRAWTEXT(环境3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价精良，并没有显着走强，短线出场，仓位1/2左右。''),COLORFF00FF;
* R+ S' [0 G+ `$ j- ?4 z2 a5 e+ eDRAWTEXT(环境4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可，量能不敷，未完全走强,短线参加，仓位1/3左右。''),COLORFF00FF;6 R6 L9 G1 O/ c8 o ]
DRAWTEXT(环境5=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏，走势尚可，重仓减泰半，清仓者观望。''),COLORFF0000;, \, B1 f3 x; O3 J* \& H
DRAWTEXT(环境6=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌，显着缩量走势，思量大盘风险，减持或清仓。''),COLORFF0000;
/ G0 L! Z5 o% x7 Y# o7 c6 r1 lDRAWTEXT(环境7=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌，走势显着偏弱，离场观望。''),COLORFF0000;
4 X0 \* B) S1 e; w7 n2 C9 jDRAWTEXT(环境8=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌，走势偏弱，离场观望。''),COLORFFFF00;
4 T' L. C8 j+ sDRAWTEXT(环境9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态精良，强势显着，量能富足，可以继续持有。''),COLOR00FFFF;5 I1 J$ b+ W: Y2 o! T
DRAWTEXT(环境10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势稳定，强势依然，但量能开始转弱，注意风险''),COLOR00FFFF;5 i1 p3 P- R3 O3 b2 n
DRAWTEXT(环境11=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力，但股性偏弱，可思量减仓。''),COLORFFFFFF;' N) f r$ d$ l8 l7 k8 B A/ e$ B
DRAWTEXT(环境12=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱，量能不敷，减持大部门筹码''),COLORFFFF00;
+ `' ~( z9 ] {( E* P9 u& z! l4 JDRAWTEXT(环境13=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳，注意成交量的变革，但现在不恰当参加。''),COLORFFFF00;3 z4 d* l8 D6 n5 M1 h3 q* z
DRAWTEXT(环境14=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明，股价偏弱，注意量能变革，现在不宜参加。''),COLORFFFF00;
+ D5 g; ^2 K2 q" a: E0 P( M7 uDRAWTEXT(环境15=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象，但量能不敷，趋势不明，不恰当操纵''),COLORFFFF00;2 z4 F' a: ~( {# ?7 h
DRAWTEXT(环境16=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱，没有参加代价。''),COLORFFFFFF;' ^6 \* F' ]4 X& f
DRAWTEXT(大盘1 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌，最佳买点，否则审慎参与。''),COLOR00FF00;
M* l" u- |4 S" C$ tDRAWTEXT(大盘2 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强，量能不敷，若前一轮下跌，短线出场1/2，量能放大加仓。''),COLORFF00FF;
0 I- a% b( N- q" A; h3 NDRAWTEXT(大盘3 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏，重仓者可以减去大部门仓位。''),COLORAAAAAA;6 e+ c T; f ?7 @( `3 r+ i
DRAWTEXT(大盘4 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调解，注意风险，短线清仓观望。''),COLORFF0000;
* Y& l0 N3 B+ {DRAWTEXT(大盘5 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势精良，量能理想，可以继续持有强势股。''),COLOR00FFFF;" K* y$ }* D: l% e- ?8 i6 s
DRAWTEXT(大盘6 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态精良，但量能稍显不敷，随时预备减仓''),COLOR00FF00;
x2 k% |: o/ q# {) \7 i& XDRAWTEXT(大盘7 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明，注意成交量变革，现在不相宜出场。''),COLORFFFFFF;
% ~) u+ w6 Y4 R3 S" @" xDRAWTEXT(大盘8 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下，量能萎缩，不恰当出场。''),COLORFFFFFF;
" A+ t/ ?8 ]8 j5 {: D/ nDRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''［绿灯］实计生意业务量增长。MFI促进指数增长。''),COLORFFFFFF;
! B J, O* b; p, UDRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''［阑珊］实计生意业务量淘汰。MFI促进指数淘汰。''),COLORGREEN;4 n0 E6 b. c5 f0 C# p/ h( s7 q4 ]
DRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''［伪装］实计生意业务量淘汰。MFI促进指数增长。''),COLORGREEN;
9 r* X% }3 {, M. D- ^8 BDRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''［蛰伏］实计生意业务量增长。MFI促进指数淘汰。''),COLORYELLOW;% x5 x( e- v2 R0 O
DRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN;
8 V `3 I6 S9 \( u2 r- fDRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW;% c- V" l0 k1 V. o4 a9 Y; `
DRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40％以上;''),COLORGREEN;
. B* P3 }: ~0 M8 ?4 H& ODRAWTEXT(M8 AND CURRBARSCO |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:07