|
一，为解盘照图把图文笔墨没置一下。( E- ~4 I5 D0 N
二，参数K有三种没置方式，缺省为0。k=0时配景变色，当图面k线周期多时k线4 c* W R+ L& `
有压缩征象。k=2时配景稳定色无压缩，但会失去表现强弱的配景自功变色。
0 a& r: R7 x* D. @三，k=2时只有熊样线以上的图面变色,无压缩。但要选择体系配景致共同才好' b1 I% Q0 O% t5 B
看。(我选的狩猎绿)2 U3 e8 m8 ^$ g! O# A* q
* Q8 l' d! v: d! L$ l$ A6 b
& O/ D+ e# @; J/ P) E3 J7 P: l5 k6 l8 G: Z9 G+ z
{阳光普照__TDX 参数K(0,2,0) 缺省为0}2 w: {7 ^0 `0 x% e: P1 M) o
TT:=240/FROMOPEN;. j% f" ?" X: c" m! I* X
比:=TT;
4 |2 d5 |9 h& ~% Y促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;7 O5 Y/ _ I4 j* f3 m
AY2:=EMA(CLOSE,12)-EMA(CLOSE,26);3 L' ] T8 {+ u' B j5 @
AZ2:=EMA(AY2,9);
- A b; G, ?* i7 WLT2:=(AY2-AZ2);0 u$ T. e- R, _% e$ |' _3 Z' v
L211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
0 N) a `* _& o) K! t1 L `ZGD:=HHV(H,80)*0.99;7 s+ y0 O, g. l1 F- S
ZGD2:=CONST(ZGD);) D7 M+ w5 g# C0 y" O0 W* g0 i! A
ZDD:=LLV(L211,80);: \( ?- U1 X( v' f8 W. f/ m
ZDD2:=CONST(ZDD);
- r. C- m8 e |6 vYYA4:=MA(CLOSE,20);
6 c e: A: O, v- B8 m% y0 i6 KYYA5:=(CLOSE > MA(CLOSE,5));
$ T5 i) I5 @" m5 \3 H z3 L. lYYA6:=(MA(CLOSE,5) > MA(CLOSE,10));
9 ~4 m. k8 ^7 J$ i! \3 a' }YYA7:=(CLOSE > MA(CLOSE,10));
% T* K# W' A Y6 p$ _0 e0 m. vYYA8:=(MA(CLOSE,5) > MA(CLOSE,20));- V h$ p, k( }; |2 @
YYA9:=(CLOSE > MA(CLOSE,20));( Y; s1 |( N; Z- E b# n2 W6 g
YYA10:=REF(YYA4,1);: ^! Q0 T# D T" [( x" e
YYA11:=(YYA4 > YYA10);
: G6 i7 _+ P* ^( P6 D/ j3 c1 CYYAVX:=(((((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)));
8 U$ i; @, Z# ~7 y U6 ^DSLX:=(CLOSE / INDEXC);0 y) m8 X3 s4 ~! ]5 A
DSLX1:=MA(DSLX,5);6 k1 I ^. c7 ~2 @/ @, `$ Z
DSLX2:=MA(DSLX,10);3 |4 t' Q, ?& l$ c! _ ?$ |
YYV1:=MA(VOL,5);, L" y5 D. ~! D" |
YYV2:=MA(VOL,10);
1 x5 ?2 v8 Z1 uJ1:=CONST(IF( YYAVX > 0,200,100));" H" K$ e6 y3 i% B- f4 B' Z
J2:=CONST(IF( YYAVX > 0,00,100));
W. e& Y; o' J9 I, N. b9 E) RJ3:=CONST(IF( YYAVX > 0,100,100));
$ w; e0 O2 @0 v3 R3 L: n2 |ZGD3:=IF(K=0,ZGD2,DRAWNULL);) ~7 N$ C( O* k2 ^/ W, w& ]- ~
ZDD3:=IF(K=0,ZDD2,DRAWNULL);
4 r- e# }* B R# ~7 W, V9 i" HZGD4:=IF(K=1,ZGD2,DRAWNULL);
* m% w% N; z# L7 d* E t% m牛背:=MA(C,21);- v% O+ U" t/ ]" v: J
牛逼:=牛背+2*STD(C,21);3 ~2 w+ |* m: h( @. M1 B
熊样:=牛背-2*STD(C,21);: ^$ }8 \: r5 U
牛背2:=IF(C>牛背,牛背,DRAWNULL);8 ^- i4 o$ j* c$ n5 P) ^9 C
熊样2:=IF(C>牛背,熊样,DRAWNULL);
$ I+ u7 L; u' N1 [5 \DRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);3 D: k7 Y l3 k* n; J3 S
DRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);1 c0 P9 n9 R# a+ v: u2 b' L
DRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));
; n8 h& B7 u" n1 l5 A7 w牛缰绳:MA(CLOSE,4);
7 e2 W- ^3 L9 I- p/ s! i" F; ~牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;
$ ?& n- f! h3 a4 G牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;& _! x- q! d) v, M- N
牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;
0 E( d$ d. D' p7 A& W& A, |5 l& ]& QAY:=EMA(CLOSE,12)-EMA(CLOSE,26);
7 l$ X, [: X1 ]- p VAZ:=EMA(AY,9);
0 c. \& e7 p2 I5 b5 a: n2 H& s1 @LT:=(AY-AZ);
$ d. s8 b7 ]; f8 dL21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
4 v& E3 i$ F$ Q* jIF(LT,LLV(L,21),DRAWNULL),COLORFFFF00;
$ E; J, L6 h6 R1 ^& v+ l* K2 WSTICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;* j8 j! ]6 O# [0 j& _8 e( g h
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;$ r% V+ m0 y) P0 Q
STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;. y: N& o0 C* f
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
; N8 g% F# t4 O! \6 T; D% eSTICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE = DSLX1)),1,0));" d8 L& ^/ Q3 n9 k7 i+ J
环境2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
! U7 l5 N1 `1 G2 O4 L3 S. K环境3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));4 |1 ?: X3 @2 S" F7 {
环境4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 = YYV2)) AND (DSLX >= DSLX1)),1,0));; _: A4 J2 b/ Q+ K3 s2 q! M. K% H" w
环境6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
* o7 R$ r) r* D; `2 N; u# k+ y# K- W环境7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));. |- y k% G) E* r' q; ]+ G& y
环境8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
q4 N# `* y- x, W3 e# V环境9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));6 j! H& k, n! {+ S" o9 @
环境10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
, K5 c! L- {9 ^) i: b- Z环境11:CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW;
9 w" c s J! x环境12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));5 C. y% z, y" g
环境13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));: b! b( K+ q6 d1 t
环境14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));7 {" Q# c) g2 M& D/ ~3 K7 d' L6 }
环境15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));2 \5 I$ E/ O/ ~" I" T
环境16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
& q, [/ c5 X. c8 ^5 B大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0));
# G. n6 s2 a& D0 I大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));4 F* c2 C. i- s, |+ {
大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));
. u* {/ o1 s" n, W0 X大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));: P3 i" b" T- F# K
大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));2 O3 l H% G( _" c6 E8 B6 c
大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));
$ q; [; f+ P0 O% e) j6 f( d6 L9 C- ?大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0));6 K2 U$ D3 ]. Y* U" r
大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));; P. R) `0 K5 b- C7 E
$ u Q" H/ s; x. M1 B" [* @
WJ:=(H+L+C)/3;1 ]7 q* z |: {$ t
V1:=IF(H=L,1,H-MAX(O,C));0 L) ]/ `" D5 _ r7 O
V2:=IF(H=L,1,MAX(C,O)-WJ);4 g% M! D# U4 ~* ~: }/ i) \
V3:=IF(H=L,1,MIN(O,C)-L);' X* g. F/ T" ]8 _; L) }
V4:=IF(H=L,1,WJ-MIN(C,O));, j3 l% D' L) b$ l( e
V5:=VOL/IF(H=L,4,H-L);3 N7 {9 A* y" V6 G1 \
V6:=(V1*V5);: E# D% z' Z a* f5 F8 P l
V7:=(V2*V5);6 u" |1 d% o/ y0 P) E. \
V8:=(V3*V5);
! @& u" D3 |6 m' R" K1 I& y5 QV9:=(V4*V5);) g. ^) A& V7 S; X1 K4 |
买盘1:=DYNAINFO(23)*比;0 z. d# M( G' R' N' x
卖盘1:=DYNAINFO(22)*比;
! B- g4 G, s/ n/ d6 S; s% w7 C r, ~买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));& G, i- H1 q2 [0 h$ V( [
卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));: |! ^$ U% S. m. c3 r' c
买盘:=IF(ISLASTBAR AND PERIOD=5 AND C=REF(VOL,1);9 M( c9 Q0 Z4 v5 e# L& A6 [ F
M1:=CONST(绿灯);
& q1 V- ? I3 G! Q! w0 [ t阑珊:=MFI1.5;
3 Y; R: r. o- r# n3 j1 RM6:=CONST(量缩);
7 |. c% U& h1 f7 b6 y# Q8 R/ R% X! q卖量大:=(卖盘-买盘)/买盘>0.4;* O2 z) J$ K- J* F" v! H: P
M7:=CONST(卖量大);
* _9 G5 q0 \) G0 h买量大:=(买盘-卖盘)/卖盘>0.4;
: Z* F6 D" Y G1 x4 i4 I( qM8:=CONST(买量大);& `" c1 I& w5 F5 R
TS1:=IF(M1=1,0.03+0.03,0.03);
6 ]/ K/ o2 j, R8 Q0 q: UTS2:=IF(M2=1,TS1+0.03,TS1);
, }4 D" D! F( L0 i0 G# x. |TS3:=IF(M3=1,TS2+0.03,TS2);
$ O, {& |' y5 i0 z# `TS4:=IF(M4=1,TS3+0.03,TS3);& M7 o) K! q- H& f% X1 O
TS5:=IF(M5=1,TS4+0.03,TS4);
7 J& z6 c6 ?# D4 K2 O( ITS6:=IF(M6=1,TS5+0.03,TS5);
0 z: ]+ p) {7 Z1 X Q; qTS7:=IF(M7=1,TS6+0.03,TS6);# _8 T1 B% _ q
TS8:=IF(M8=1,TS7+0.03,TS7);/ T, o* d4 d* }
5 p9 g; l! _: }0 U
DRAWTEXT(环境1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,显着走强,中线参加，仓位在2/3左右''),COLORFF00FF;
. Y- o( w0 z2 o0 e8 h0 N m gDRAWTEXT(环境2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不敷，短线出场，仓位在1/2左右''),COLORFF00FF;1 s) K, v7 c3 [8 f) q
DRAWTEXT(环境3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价精良，并没有显着走强，短线出场，仓位1/2左右。''),COLORFF00FF;' r3 M' v: i. ?1 ?( I# U7 t
DRAWTEXT(环境4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可，量能不敷，未完全走强,短线参加，仓位1/3左右。''),COLORFF00FF;
R+ D |/ ], X- y8 ]$ d. zDRAWTEXT(环境5=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏，走势尚可，重仓减泰半，清仓者观望。''),COLORFF0000;
: I6 [9 a+ V% Z& P6 EDRAWTEXT(环境6=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌，显着缩量走势，思量大盘风险，减持或清仓。''),COLORFF0000;
A3 U! g2 x: _0 {6 c! nDRAWTEXT(环境7=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌，走势显着偏弱，离场观望。''),COLORFF0000;
9 ~' ^6 f2 N$ n( x7 h4 VDRAWTEXT(环境8=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌，走势偏弱，离场观望。''),COLORFFFF00;
( J+ m" o) H# S% v) p1 s9 m, l4 ~4 E0 f5 tDRAWTEXT(环境9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态精良，强势显着，量能富足，可以继续持有。''),COLOR00FFFF;
* W, c2 G9 `8 {' g( |0 g$ A4 IDRAWTEXT(环境10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势稳定，强势依然，但量能开始转弱，注意风险''),COLOR00FFFF;- b/ N0 ?; S, |& i
DRAWTEXT(环境11=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力，但股性偏弱，可思量减仓。''),COLORFFFFFF;
: l6 [( A& x! N' yDRAWTEXT(环境12=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱，量能不敷，减持大部门筹码''),COLORFFFF00;; s. Q4 A2 R. s" i
DRAWTEXT(环境13=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳，注意成交量的变革，但现在不恰当参加。''),COLORFFFF00;
/ U, X$ g; ~* O& {# A# Z% iDRAWTEXT(环境14=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明，股价偏弱，注意量能变革，现在不宜参加。''),COLORFFFF00;$ C6 w6 T! z; b' G
DRAWTEXT(环境15=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象，但量能不敷，趋势不明，不恰当操纵''),COLORFFFF00;
6 \% V a' ?" s/ bDRAWTEXT(环境16=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱，没有参加代价。''),COLORFFFFFF;* U( Q. ^1 S, e X
DRAWTEXT(大盘1 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌，最佳买点，否则审慎参与。''),COLOR00FF00;
. W( e8 q( I) p6 eDRAWTEXT(大盘2 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强，量能不敷，若前一轮下跌，短线出场1/2，量能放大加仓。''),COLORFF00FF;
# s# @, R5 m: h0 MDRAWTEXT(大盘3 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏，重仓者可以减去大部门仓位。''),COLORAAAAAA;
' U) a3 [7 V0 F, G: H* qDRAWTEXT(大盘4 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调解，注意风险，短线清仓观望。''),COLORFF0000;' w5 {! [3 \" J6 y
DRAWTEXT(大盘5 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势精良，量能理想，可以继续持有强势股。''),COLOR00FFFF;
: L8 R- {$ Y" IDRAWTEXT(大盘6 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态精良，但量能稍显不敷，随时预备减仓''),COLOR00FF00;6 ~& P3 W+ p8 u
DRAWTEXT(大盘7 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明，注意成交量变革，现在不相宜出场。''),COLORFFFFFF;
& n$ y- t7 D7 G: QDRAWTEXT(大盘8 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下，量能萎缩，不恰当出场。''),COLORFFFFFF;
9 r, `/ C: r. ?8 c6 k& {DRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''［绿灯］实计生意业务量增长。MFI促进指数增长。''),COLORFFFFFF;
) s- E$ j) N. A8 I# cDRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''［阑珊］实计生意业务量淘汰。MFI促进指数淘汰。''),COLORGREEN;
5 H/ K3 l( Q9 ^- f, @DRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''［伪装］实计生意业务量淘汰。MFI促进指数增长。''),COLORGREEN;/ F4 [5 m4 ^7 r0 j, C
DRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''［蛰伏］实计生意业务量增长。MFI促进指数淘汰。''),COLORYELLOW;% }$ c. k6 ]9 x
DRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN;* v( u: p( _, [1 j6 k$ @
DRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW; w- y( f/ J9 d
DRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40％以上;''),COLORGREEN;
6 b$ d1 O6 i$ N" z: |DRAWTEXT(M8 AND CURRBARSCO |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:07