|
一，为解盘照图把图文笔墨没置一下。
3 `6 |$ f1 J& @4 J! K2 \二，参数K有三种没置方式，缺省为0。k=0时配景变色，当图面k线周期多时k线; @/ V# q N$ J9 g; i6 `- b
有压缩征象。k=2时配景稳定色无压缩，但会失去表现强弱的配景自功变色。
" ~+ a- S7 I* U" p三，k=2时只有熊样线以上的图面变色,无压缩。但要选择体系配景致共同才好0 a. H8 W3 [( l$ a# s6 \
看。(我选的狩猎绿)
& K+ Q# J. I& P f" k
4 ^3 M3 S5 q5 p9 \% G5 O. X1 B 6 f7 X% J J8 U' p8 L
$ x" g/ G% R7 @2 Q/ w4 t/ i
{阳光普照__TDX 参数K(0,2,0) 缺省为0}
I" D) n' a, {5 o) p+ X" K) BTT:=240/FROMOPEN;: \1 e- L) r( Y; o3 Z4 _. X
比:=TT;5 N8 \+ W3 x' H8 e& U- V q
促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;- k p. Q4 W5 ?) q5 ~$ u$ ]
AY2:=EMA(CLOSE,12)-EMA(CLOSE,26);7 _, x! b# }' z9 j/ b) Q
AZ2:=EMA(AY2,9);2 }* H% R. N7 ?
LT2:=(AY2-AZ2);
& o( \0 o! N, z! iL211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
1 I7 L$ M% p& G; i" p8 }) C, jZGD:=HHV(H,80)*0.99;
4 h& d: K" o: dZGD2:=CONST(ZGD);
( m; Q& g! W* p- P8 K) Q( A5 LZDD:=LLV(L211,80);
; U. `" v% E/ }# X: EZDD2:=CONST(ZDD);
9 E7 B A" D' |- J6 W9 IYYA4:=MA(CLOSE,20);1 i! C( k+ G- G4 O* s# t: q
YYA5:=(CLOSE > MA(CLOSE,5));/ L' E/ Z* U9 W1 _, B
YYA6:=(MA(CLOSE,5) > MA(CLOSE,10));
6 k$ m' V* Q0 [, x. j2 G5 TYYA7:=(CLOSE > MA(CLOSE,10));
$ ? n- I9 X+ K8 a$ BYYA8:=(MA(CLOSE,5) > MA(CLOSE,20));
4 v* ?+ f, s8 [, NYYA9:=(CLOSE > MA(CLOSE,20));
' |( p8 y! D3 J! P1 `, ]4 pYYA10:=REF(YYA4,1);8 S, ~2 l( k/ ]+ |- I0 D/ V
YYA11:=(YYA4 > YYA10);* Q9 i, P4 T# C' _
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)));
0 v4 |6 q; a IDSLX:=(CLOSE / INDEXC);, T- q5 ]. a; {3 I* I
DSLX1:=MA(DSLX,5);1 E" ? _" T% `* o( T
DSLX2:=MA(DSLX,10);
) e, W2 N: ~# QYYV1:=MA(VOL,5);/ B; z& Z+ B2 T; C, j9 c
YYV2:=MA(VOL,10);
' J$ N; ^* B) iJ1:=CONST(IF( YYAVX > 0,200,100));% t9 F2 I( Z/ b( _9 p6 z
J2:=CONST(IF( YYAVX > 0,00,100));
* T b- c* \* u$ F) HJ3:=CONST(IF( YYAVX > 0,100,100));% c0 `1 ^0 \3 i: T+ k8 p
ZGD3:=IF(K=0,ZGD2,DRAWNULL);
/ ~% f) W t8 y: k; r$ hZDD3:=IF(K=0,ZDD2,DRAWNULL);7 e. p+ M6 g# t0 {9 ~- N5 b
ZGD4:=IF(K=1,ZGD2,DRAWNULL);6 R" w; U; x* b4 ]% x
牛背:=MA(C,21);
) W8 N) c" i3 A/ w: I, o% w5 Q牛逼:=牛背+2*STD(C,21);6 Q+ |1 j& I" G2 M
熊样:=牛背-2*STD(C,21);$ K( P! ?% s2 K' E7 i0 x( `
牛背2:=IF(C>牛背,牛背,DRAWNULL);. @3 d4 H+ j9 X3 E+ i8 P: r
熊样2:=IF(C>牛背,熊样,DRAWNULL);
5 ?1 h" e6 m( Y. ADRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);
6 P: a7 M9 r$ ~0 k/ ODRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);! s$ u& d* H( e2 W( w8 R; K
DRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));
3 B8 {# }) p: p9 ?2 b) E; O7 U牛缰绳:MA(CLOSE,4);6 l* J9 n/ c& W0 E4 s6 W
牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;( m! `5 n$ u2 M: |( h- A* j
牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;
: _6 ^. P* S, _6 }牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;9 q ?: ]3 x8 x) x
AY:=EMA(CLOSE,12)-EMA(CLOSE,26);
; ]! e5 f( W$ u& h, }# W2 _' {AZ:=EMA(AY,9);$ _' G$ u" X& W- m3 y( W
LT:=(AY-AZ);
4 G# n. S' O9 N; KL21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
. j: Z& J! N* N$ \. UIF(LT,LLV(L,21),DRAWNULL),COLORFFFF00;+ ]+ f C) p2 x2 w4 D3 o9 \: j
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;: ]: m7 P" v. d7 t$ u
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
# t4 a9 g+ H( x7 M3 [% pSTICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;1 W" J' N, p8 t
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;! u: ?7 C7 T* [# C" n! M' X
STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE = DSLX1)),1,0));
7 y4 J. z' ]8 e+ m4 G3 j: A环境2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
1 s, o" e/ _4 u* E# A, g环境3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));4 N3 c4 S: w* n }
环境4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 = YYV2)) AND (DSLX >= DSLX1)),1,0));
8 H7 y! x, W$ ~5 k, @ x, Z环境6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
6 e- [2 e5 B! S. S7 i7 ]环境7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
7 Z' b( `! G% F& C. `* T! j环境8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));$ f1 L: T& J3 g; x. b, y! }
环境9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));4 Q5 \4 j; c5 Z- [ z
环境10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
# R5 w( ~1 `5 \6 [; A* I' q q& s环境11:CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW;! e8 c1 X) J5 i8 C
环境12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));! [/ c- X O+ p: b" N- d
环境13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));, x& n, s! x* ?
环境14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
, n+ H# x- [( \% y8 x& T5 f环境15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
& S9 z1 m$ d6 e环境16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
/ c# K. ^# r) m大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0));0 @2 I! z) W" K9 w
大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));( Q! m' E% [! {" Z- m
大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));8 q0 g7 M. }5 a
大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));
8 P$ y! Z# d: ~- S$ X! `7 F大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));8 {) Y# |( U0 k1 a f
大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));
- N% ^/ T( P3 x大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0));
4 [9 K# Q( p8 I$ }9 F6 ^' }3 j6 K大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));) e4 w. W: X" g. }8 H
# @8 X7 F1 d& y ^
WJ:=(H+L+C)/3;
: N* F) |) L, p u( D& @' Q3 VV1:=IF(H=L,1,H-MAX(O,C));
4 h1 @8 f9 n" B# mV2:=IF(H=L,1,MAX(C,O)-WJ);
) k( _" b9 L1 o4 L4 W& S6 t5 WV3:=IF(H=L,1,MIN(O,C)-L);( X/ {+ r/ O2 P5 N
V4:=IF(H=L,1,WJ-MIN(C,O));
6 j8 H2 s" c3 b8 oV5:=VOL/IF(H=L,4,H-L);/ a' i2 Q* R4 q
V6:=(V1*V5);
6 m+ u& p0 v1 a- m. dV7:=(V2*V5);) b! A7 E" c* _
V8:=(V3*V5);. A, i/ I3 U5 S6 r2 G. j! ]; C
V9:=(V4*V5);/ l/ ^" L5 ~1 ?. u# I% s
买盘1:=DYNAINFO(23)*比;
+ L3 s& F0 S6 f/ u/ D+ T卖盘1:=DYNAINFO(22)*比;
$ {7 k$ t; c3 c* Z, E买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8)); x+ B, u- [# v* u# N" I5 |
卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));0 ^( D$ c- x; o9 O; o- W
买盘:=IF(ISLASTBAR AND PERIOD=5 AND C=REF(VOL,1);
# h( ?/ C/ }# }, T1 y: o H! T5 GM1:=CONST(绿灯);
$ `( R* I: Z, o5 q, Z5 @8 \+ L阑珊:=MFI1.5;
. i5 f* q( [) cM6:=CONST(量缩);
- p- X; @! P" n6 E6 \1 X卖量大:=(卖盘-买盘)/买盘>0.4;
% z+ I0 a7 w6 }# sM7:=CONST(卖量大);) Y) [8 K% j6 T X
买量大:=(买盘-卖盘)/卖盘>0.4;3 p1 A2 \6 }* z$ F8 X; `+ i
M8:=CONST(买量大);
1 `6 q& ~2 v- [, XTS1:=IF(M1=1,0.03+0.03,0.03);
0 m# |" B; e9 E: w4 z1 }* ITS2:=IF(M2=1,TS1+0.03,TS1);' R" W7 V4 l* D( M5 c- T
TS3:=IF(M3=1,TS2+0.03,TS2);! z% t% G* `- L; O0 r+ O+ _
TS4:=IF(M4=1,TS3+0.03,TS3);
3 l0 O7 w8 N1 {- S% WTS5:=IF(M5=1,TS4+0.03,TS4);
6 T) }; l% U) N' v, Y% L! XTS6:=IF(M6=1,TS5+0.03,TS5);
7 Q% _" }8 R+ f( @" _. }9 M' O5 J- q9 [TS7:=IF(M7=1,TS6+0.03,TS6);
% {& ?( h' e7 u" r dTS8:=IF(M8=1,TS7+0.03,TS7); a" Y% L+ p! O
+ X1 B5 Q3 O: D# e& o( oDRAWTEXT(环境1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,显着走强,中线参加，仓位在2/3左右''),COLORFF00FF;/ }4 q' U. t: |7 v
DRAWTEXT(环境2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不敷，短线出场，仓位在1/2左右''),COLORFF00FF;
4 F3 a% H! N) ~1 p9 A, R. N. i `DRAWTEXT(环境3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价精良，并没有显着走强，短线出场，仓位1/2左右。''),COLORFF00FF;
0 e+ [7 G$ |& j! \2 E9 mDRAWTEXT(环境4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可，量能不敷，未完全走强,短线参加，仓位1/3左右。''),COLORFF00FF;% M2 ~% k2 _1 z i2 T( W3 j
DRAWTEXT(环境5=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏，走势尚可，重仓减泰半，清仓者观望。''),COLORFF0000;
7 h: R' D. Y# @' m; FDRAWTEXT(环境6=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌，显着缩量走势，思量大盘风险，减持或清仓。''),COLORFF0000;
. E0 F2 q- P) F; u) iDRAWTEXT(环境7=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌，走势显着偏弱，离场观望。''),COLORFF0000;
9 S- g, S M+ p& dDRAWTEXT(环境8=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌，走势偏弱，离场观望。''),COLORFFFF00;
4 B! n7 J3 ]6 I l. YDRAWTEXT(环境9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态精良，强势显着，量能富足，可以继续持有。''),COLOR00FFFF;
- k4 H b0 g; c1 D/ s" VDRAWTEXT(环境10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势稳定，强势依然，但量能开始转弱，注意风险''),COLOR00FFFF;/ K6 c2 x/ D8 g6 ]& N7 C
DRAWTEXT(环境11=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力，但股性偏弱，可思量减仓。''),COLORFFFFFF; z* h7 A: g, B( y9 Z, j
DRAWTEXT(环境12=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱，量能不敷，减持大部门筹码''),COLORFFFF00;
! h7 b' _& F; ~" ~- Z( a, dDRAWTEXT(环境13=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳，注意成交量的变革，但现在不恰当参加。''),COLORFFFF00;0 L1 ?3 Q" v* W, L9 w
DRAWTEXT(环境14=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明，股价偏弱，注意量能变革，现在不宜参加。''),COLORFFFF00;& h& P. x8 Z/ ]- [
DRAWTEXT(环境15=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象，但量能不敷，趋势不明，不恰当操纵''),COLORFFFF00;
# Z$ j! q1 S3 Y: a5 }% `6 NDRAWTEXT(环境16=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱，没有参加代价。''),COLORFFFFFF;
& V' w8 R% `& P0 d) d% w$ rDRAWTEXT(大盘1 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌，最佳买点，否则审慎参与。''),COLOR00FF00;
& T, k) I- Q( y5 D& E. ]: ?7 TDRAWTEXT(大盘2 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强，量能不敷，若前一轮下跌，短线出场1/2，量能放大加仓。''),COLORFF00FF;' s8 S' [) F6 s% |7 x4 O
DRAWTEXT(大盘3 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏，重仓者可以减去大部门仓位。''),COLORAAAAAA;
& }- O; ]0 R) n. MDRAWTEXT(大盘4 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调解，注意风险，短线清仓观望。''),COLORFF0000;
( _& c, c) [" TDRAWTEXT(大盘5 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势精良，量能理想，可以继续持有强势股。''),COLOR00FFFF;
6 R3 C$ G j# X: u. |DRAWTEXT(大盘6 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态精良，但量能稍显不敷，随时预备减仓''),COLOR00FF00;( S/ k6 f9 \7 J' j! t5 Y$ E' F
DRAWTEXT(大盘7 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明，注意成交量变革，现在不相宜出场。''),COLORFFFFFF;
4 q8 ~1 S5 `4 r/ m! _ LDRAWTEXT(大盘8 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下，量能萎缩，不恰当出场。''),COLORFFFFFF;
! G5 P$ v5 s8 ^/ X, O% c+ Z0 iDRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''［绿灯］实计生意业务量增长。MFI促进指数增长。''),COLORFFFFFF;- ?. Z6 Y+ A5 w) z4 Z$ \3 B* q
DRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''［阑珊］实计生意业务量淘汰。MFI促进指数淘汰。''),COLORGREEN;% q2 P( n; L4 z5 f' C/ ^' h
DRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''［伪装］实计生意业务量淘汰。MFI促进指数增长。''),COLORGREEN;+ d1 B4 e9 m: j: [* I2 ]" w
DRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''［蛰伏］实计生意业务量增长。MFI促进指数淘汰。''),COLORYELLOW;
, U8 W. e4 \) a7 y7 N8 m" F. }, z( jDRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN;
' K! R/ ^2 I* NDRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW;
5 G- I2 Q# v/ ?$ mDRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40％以上;''),COLORGREEN;" R/ i- a5 m& f: [. n* f
DRAWTEXT(M8 AND CURRBARSCO |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:07