|
一，为解盘照图把图文笔墨没置一下。
# I* {- M- @% s( Z9 c1 K二，参数K有三种没置方式，缺省为0。k=0时配景变色，当图面k线周期多时k线
( K& p# n& c6 `* c 有压缩征象。k=2时配景稳定色无压缩，但会失去表现强弱的配景自功变色。; q k% b# k- ^/ H# b6 M$ I" }
三，k=2时只有熊样线以上的图面变色,无压缩。但要选择体系配景致共同才好' b' g+ ?5 b; q% s
看。(我选的狩猎绿)
$ @: m1 Q" O) {' Y1 B: d4 {
1 b; }3 O, b% G4 W7 }( `
' k+ c: |! z! T$ T% V. N7 M' ?9 C) J" X
3 C/ a2 o' e( I6 [! {5 C: `{阳光普照__TDX 参数K(0,2,0) 缺省为0}% T; V. L7 X" Y8 Z1 H) F6 A
TT:=240/FROMOPEN;
( ^) L5 X4 @/ {; ~比:=TT;
% @* F7 Y: q7 t0 i促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;; h8 c9 r' {" Y! {/ i B2 ~% v( u
AY2:=EMA(CLOSE,12)-EMA(CLOSE,26);/ }+ F3 l6 i- _: n& E, \/ u
AZ2:=EMA(AY2,9);
; Q5 {2 z0 ^, @# ` F. A( z0 c" RLT2:=(AY2-AZ2);
; J) {3 ?3 | B4 {L211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
: X. i3 Y' `& T. B+ l! [2 ~ZGD:=HHV(H,80)*0.99;: \/ T! p" j( ]6 o1 J
ZGD2:=CONST(ZGD);
- I( ~; h" f4 Q7 i: c7 @. oZDD:=LLV(L211,80);
2 L" i8 m0 F' W: a5 ^7 \) v# vZDD2:=CONST(ZDD);: ^2 [5 s9 F7 B7 Y; U3 Q
YYA4:=MA(CLOSE,20);3 i- ~8 L4 Z# F* C% E, Y
YYA5:=(CLOSE > MA(CLOSE,5));% Q' {9 D+ X9 H9 a( P; M5 e
YYA6:=(MA(CLOSE,5) > MA(CLOSE,10));6 e, `2 `$ T4 D+ S/ {6 k' ^2 A# g
YYA7:=(CLOSE > MA(CLOSE,10));# ?' O3 c0 x' b6 d5 H& e
YYA8:=(MA(CLOSE,5) > MA(CLOSE,20));
3 V' D W% w0 _9 i, C9 G3 pYYA9:=(CLOSE > MA(CLOSE,20));
B, V" B+ `( x. MYYA10:=REF(YYA4,1);
: H2 C- d+ X' z8 k5 e) L8 KYYA11:=(YYA4 > YYA10);% j# e$ C3 D9 Z" v' W- P1 a! \6 Y
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)));" z4 L& c l# Y* h
DSLX:=(CLOSE / INDEXC);& P' O6 N2 @4 F; \" @3 T
DSLX1:=MA(DSLX,5);
* c5 k4 m0 m4 H6 m' o4 iDSLX2:=MA(DSLX,10);
3 I: F( S2 [% e9 y& z4 SYYV1:=MA(VOL,5);
8 d4 R; o3 c2 e$ Y$ y. l. EYYV2:=MA(VOL,10);8 h9 t# @. T. l2 \' ?0 X$ }
J1:=CONST(IF( YYAVX > 0,200,100));8 W* Z! c+ K) Y5 A( S
J2:=CONST(IF( YYAVX > 0,00,100));. q) ^9 c$ S5 O# l- @: J7 \
J3:=CONST(IF( YYAVX > 0,100,100));
]& p' B6 J* |% o1 eZGD3:=IF(K=0,ZGD2,DRAWNULL);! q0 }4 [5 f0 E- _* r- c+ {
ZDD3:=IF(K=0,ZDD2,DRAWNULL);
8 \; G& y6 b9 L$ M5 uZGD4:=IF(K=1,ZGD2,DRAWNULL);( z5 t% X0 b# u% L, K3 J
牛背:=MA(C,21);
# V$ S6 P! j: \* g& Q: l牛逼:=牛背+2*STD(C,21);
* {6 L$ d4 Q% d熊样:=牛背-2*STD(C,21);; G; E: U* E E2 b0 A- M8 e8 o" e& O
牛背2:=IF(C>牛背,牛背,DRAWNULL);
9 y$ ~& I) z/ _$ K) Z% s熊样2:=IF(C>牛背,熊样,DRAWNULL);# U! | s6 ] k- K2 q1 d) N
DRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);' u$ m1 J4 X) c0 _: C; U, Y% H0 a, U
DRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);
$ Q. ]; t- l! N, E# j6 A, _5 TDRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));
+ @1 E8 T, ]( G0 I$ G+ u- ]% l牛缰绳:MA(CLOSE,4);
/ b0 _" S: ~; c5 i) p牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;8 M! G7 I+ E$ J
牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;
% f( H" W9 v# F% G$ k: M4 _牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;) r. B1 E( j" Y# U
AY:=EMA(CLOSE,12)-EMA(CLOSE,26);3 z* R: s1 W. z1 Z
AZ:=EMA(AY,9);. D0 F" _8 q4 ~
LT:=(AY-AZ);8 H) C3 m6 O; O F/ ^
L21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;! x; Q& @4 Q A2 B# {. p
IF(LT,LLV(L,21),DRAWNULL),COLORFFFF00;
0 S; c7 w' F! t# ~% jSTICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;
O; X6 J+ S, e4 lSTICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
( ~+ e `' }! i: uSTICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;
6 M4 o Q- U3 A, p. A+ eSTICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
4 H2 U' E9 r( v- y+ f4 h! cSTICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE = DSLX1)),1,0));
% ]- C* k1 T8 b' V$ C环境2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));9 ]8 d- {4 b+ V, t: s4 \
环境3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));) E; Y4 ?: t; n7 _1 v" {
环境4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 = YYV2)) AND (DSLX >= DSLX1)),1,0));- z; l% w& a2 A3 l
环境6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));1 {* w- O* O3 V) a
环境7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
# j% \- b3 V7 C环境8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
& p2 C i$ U- i环境9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));' x" Z4 V( j- r; {& j; K; W
环境10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));0 E% h" X+ R# F- c8 R
环境11:CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW;
: d3 h" @3 a; I# L* r环境12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));7 z' ^7 T; o d, L6 T2 ?# |* a
环境13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
1 x! h8 Q$ ]5 O5 ]环境14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));& M5 Z4 h! F+ d* b l
环境15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));8 {* o% A, X8 } _$ c2 E- g
环境16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));. L" `, w b7 @
大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0));, ]7 l* Q' g9 y8 \3 w
大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));
7 q" T/ T8 u$ [0 x" p大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));
4 w9 a4 |4 \* R大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));& z' F% L9 m- `+ C M
大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));
R' ^" o* V1 c* ~9 R& B, ^4 ~& e大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));
& J. @: a) G. S* E/ g' M+ Y- y大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0));$ b3 ]4 _' l% Y U- y# Z
大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));
3 I3 i! \1 c# J' h1 ~
2 \# L9 T# @/ O( zWJ:=(H+L+C)/3;
: R2 h& G$ P4 v r* LV1:=IF(H=L,1,H-MAX(O,C));
M. e3 x( @- s- s* A3 x9 mV2:=IF(H=L,1,MAX(C,O)-WJ);1 b5 N4 j" h z
V3:=IF(H=L,1,MIN(O,C)-L);" u0 n# ]- h4 h
V4:=IF(H=L,1,WJ-MIN(C,O)); T& o2 }+ O) g$ @( |9 G
V5:=VOL/IF(H=L,4,H-L);
9 [; L* P) G/ Q, E9 m q& n9 D4 ]5 dV6:=(V1*V5);
/ X h/ [& ~3 _; [V7:=(V2*V5);
$ G0 r/ Q2 }7 D; H9 w! X( ?& [V8:=(V3*V5);8 z! B# ]( f9 m
V9:=(V4*V5);
! r* n2 ^: l7 a! G买盘1:=DYNAINFO(23)*比;' Q2 A# l5 }; u4 @
卖盘1:=DYNAINFO(22)*比;' h i4 m+ n& T' {3 E
买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));+ ~5 \* T! F! ~1 u+ d& u
卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));
* N; X5 J1 E, \# m1 F买盘:=IF(ISLASTBAR AND PERIOD=5 AND C=REF(VOL,1);
) t8 g! R' Q/ {# d. n5 FM1:=CONST(绿灯);
( r% X9 p5 P5 [$ {" J: t阑珊:=MFI1.5;
, {+ F! @ `* ~* n+ ~7 YM6:=CONST(量缩);8 C: S3 |5 C7 u0 J. v. ?3 [
卖量大:=(卖盘-买盘)/买盘>0.4;
4 f' L% }* ~$ qM7:=CONST(卖量大);
D5 w! Y. b3 g! G; T+ C6 Z买量大:=(买盘-卖盘)/卖盘>0.4;0 a9 V5 A" w7 P7 p" f. q4 N- j
M8:=CONST(买量大);
' p: z& i6 A7 Y( p1 w* e/ JTS1:=IF(M1=1,0.03+0.03,0.03);
y: F3 E9 w3 I# W/ V2 y1 v1 w% I. x' k3 vTS2:=IF(M2=1,TS1+0.03,TS1);
( b. F2 A' f% A/ X# {- S: qTS3:=IF(M3=1,TS2+0.03,TS2);
& d& S& e- W5 N) a1 L1 G! p" {1 fTS4:=IF(M4=1,TS3+0.03,TS3);
, T; m' y6 d( w5 R. s& H9 I8 sTS5:=IF(M5=1,TS4+0.03,TS4);0 `9 J" D* L9 X% c v2 x1 g5 y
TS6:=IF(M6=1,TS5+0.03,TS5);1 Q; N1 @* D& H) L! n
TS7:=IF(M7=1,TS6+0.03,TS6);
7 B$ s& b$ X5 @3 v4 g) rTS8:=IF(M8=1,TS7+0.03,TS7);
) l1 n3 g6 f* j4 e. V/ K: b1 n2 Z3 h0 l3 o( I2 d) z; T% [7 l
DRAWTEXT(环境1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,显着走强,中线参加，仓位在2/3左右''),COLORFF00FF;
+ m* j2 }1 }) A' V1 Y9 xDRAWTEXT(环境2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不敷，短线出场，仓位在1/2左右''),COLORFF00FF;/ G3 a! {( m4 b; t' E
DRAWTEXT(环境3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价精良，并没有显着走强，短线出场，仓位1/2左右。''),COLORFF00FF;
( g- V% C" N5 d H* b$ DDRAWTEXT(环境4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可，量能不敷，未完全走强,短线参加，仓位1/3左右。''),COLORFF00FF;
6 Y+ O' H2 N) z- U: \# DDRAWTEXT(环境5=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏，走势尚可，重仓减泰半，清仓者观望。''),COLORFF0000;
9 f9 J2 {/ n4 TDRAWTEXT(环境6=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌，显着缩量走势，思量大盘风险，减持或清仓。''),COLORFF0000;* [* H7 Q: a8 B) U
DRAWTEXT(环境7=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌，走势显着偏弱，离场观望。''),COLORFF0000;
. _: Z- m$ P+ sDRAWTEXT(环境8=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌，走势偏弱，离场观望。''),COLORFFFF00;
% r0 V8 f# { A4 C9 a! CDRAWTEXT(环境9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态精良，强势显着，量能富足，可以继续持有。''),COLOR00FFFF;
2 y4 F8 B% k+ p+ Q) H1 tDRAWTEXT(环境10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势稳定，强势依然，但量能开始转弱，注意风险''),COLOR00FFFF;
5 \% [" v- P& x* a! qDRAWTEXT(环境11=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力，但股性偏弱，可思量减仓。''),COLORFFFFFF;& p8 ~8 v1 X6 G% ?) z! v% N
DRAWTEXT(环境12=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱，量能不敷，减持大部门筹码''),COLORFFFF00;0 ]* P/ u( N1 z
DRAWTEXT(环境13=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳，注意成交量的变革，但现在不恰当参加。''),COLORFFFF00;3 G- ~, q8 u$ [* r$ A
DRAWTEXT(环境14=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明，股价偏弱，注意量能变革，现在不宜参加。''),COLORFFFF00;
8 G. M3 ?: {. ~! |8 Z, nDRAWTEXT(环境15=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象，但量能不敷，趋势不明，不恰当操纵''),COLORFFFF00;
* e$ z; [* c7 V% B1 b2 y- |" oDRAWTEXT(环境16=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱，没有参加代价。''),COLORFFFFFF;
. \( Y8 ~" A8 @8 ^# ]. a5 NDRAWTEXT(大盘1 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌，最佳买点，否则审慎参与。''),COLOR00FF00;
" Q7 c& G/ x' [- TDRAWTEXT(大盘2 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强，量能不敷，若前一轮下跌，短线出场1/2，量能放大加仓。''),COLORFF00FF;' Q8 w0 u, }/ h; O! k% D3 G
DRAWTEXT(大盘3 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏，重仓者可以减去大部门仓位。''),COLORAAAAAA;
# V3 }. v5 S" l9 _DRAWTEXT(大盘4 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调解，注意风险，短线清仓观望。''),COLORFF0000;, \2 ~7 h H9 R/ Z5 @1 q
DRAWTEXT(大盘5 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势精良，量能理想，可以继续持有强势股。''),COLOR00FFFF;% ]7 I2 b2 ~# @- c6 W' _2 Q
DRAWTEXT(大盘6 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态精良，但量能稍显不敷，随时预备减仓''),COLOR00FF00;1 o6 q, S) O8 ^2 H: t4 d/ p( m$ Q
DRAWTEXT(大盘7 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明，注意成交量变革，现在不相宜出场。''),COLORFFFFFF;7 h R8 F: g. s( J( y; o
DRAWTEXT(大盘8 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下，量能萎缩，不恰当出场。''),COLORFFFFFF;3 R( l! `# G( n
DRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''［绿灯］实计生意业务量增长。MFI促进指数增长。''),COLORFFFFFF; X# _$ u7 u+ U/ J0 W
DRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''［阑珊］实计生意业务量淘汰。MFI促进指数淘汰。''),COLORGREEN;
b6 @3 C1 H7 S W3 U5 dDRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''［伪装］实计生意业务量淘汰。MFI促进指数增长。''),COLORGREEN;2 k/ D8 V3 {6 D6 K3 b9 V, e8 ]
DRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''［蛰伏］实计生意业务量增长。MFI促进指数淘汰。''),COLORYELLOW; J- o7 P& h6 k* \
DRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN; C" d6 I' v( W9 A; C `* y! v' ^# y
DRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW;1 d* E6 s* Q6 e) ^# L% @/ p6 \
DRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40％以上;''),COLORGREEN;1 Y- l' U+ ]( {6 G
DRAWTEXT(M8 AND CURRBARSCO |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:07