|
一，为解盘照图把图文笔墨没置一下。
' ~& N S) ?0 A* b ?二，参数K有三种没置方式，缺省为0。k=0时配景变色，当图面k线周期多时k线
6 o- r; w% ? o; P; y; l* n 有压缩征象。k=2时配景稳定色无压缩，但会失去表现强弱的配景自功变色。3 m" I; T6 I% s& B9 E. x
三，k=2时只有熊样线以上的图面变色,无压缩。但要选择体系配景致共同才好
7 {- F7 ~ Z/ a 看。(我选的狩猎绿)6 e7 D( n( q; ?, A8 x+ |$ _
9 R- w ^% F* { / s1 T ]$ r+ h0 t; j
/ U' i: a, B& X0 F: I/ U{阳光普照__TDX 参数K(0,2,0) 缺省为0}+ L# [4 m& ~3 O
TT:=240/FROMOPEN;! ^3 x' _/ |8 _# w2 s
比:=TT;
% g; ^% C$ |8 o6 ?( ^" }促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;3 M J7 {$ y8 @: k/ G7 V' h
AY2:=EMA(CLOSE,12)-EMA(CLOSE,26);" F) c# H: a+ g/ P$ L& i C
AZ2:=EMA(AY2,9);
, p( O" ?$ z# a3 }3 z% pLT2:=(AY2-AZ2);
7 X( p0 q8 E& K, P& h2 \$ wL211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;% O8 y3 L0 c0 P
ZGD:=HHV(H,80)*0.99;
& A7 ?! y5 Y# ^# y% _ZGD2:=CONST(ZGD);8 s9 O3 A- T) v5 d4 _1 Z- m6 z' P
ZDD:=LLV(L211,80);/ S) v V6 e! {- r4 }: V5 }
ZDD2:=CONST(ZDD);
4 A; K2 C+ a& x" g' OYYA4:=MA(CLOSE,20);! e8 l& F3 o5 T& D \; J2 X& |
YYA5:=(CLOSE > MA(CLOSE,5));
! i& s ?7 `; g- s3 uYYA6:=(MA(CLOSE,5) > MA(CLOSE,10));3 ]5 S! x5 [ a& l
YYA7:=(CLOSE > MA(CLOSE,10));3 _' z7 r* p- Y/ h9 j
YYA8:=(MA(CLOSE,5) > MA(CLOSE,20));
2 p" M* I8 N3 }, B1 @) wYYA9:=(CLOSE > MA(CLOSE,20));
) p- [8 G. I$ q# JYYA10:=REF(YYA4,1);1 y1 D% z- V2 ^# J. i
YYA11:=(YYA4 > YYA10);, m' x' _# Q+ N7 b% u1 S
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)));
* h6 e' J0 E& g" |6 _DSLX:=(CLOSE / INDEXC);
% T- Y. g( S( }7 ^! J4 XDSLX1:=MA(DSLX,5); U1 P) ~. r2 g' v% z7 B+ Z
DSLX2:=MA(DSLX,10);8 x3 Y# Y" ~& `' U. y& ?
YYV1:=MA(VOL,5);% [! w& x5 r4 Z8 m/ H1 U
YYV2:=MA(VOL,10);1 `* Z( k0 p. W2 @2 A3 {1 D
J1:=CONST(IF( YYAVX > 0,200,100));
! P$ P @8 F% L# X* \- \J2:=CONST(IF( YYAVX > 0,00,100));$ C% ]6 C7 I# r6 f) f! g4 }
J3:=CONST(IF( YYAVX > 0,100,100));/ l6 B! J2 F4 G/ f
ZGD3:=IF(K=0,ZGD2,DRAWNULL);' p( F/ V3 w9 X3 d% {
ZDD3:=IF(K=0,ZDD2,DRAWNULL);- ?( K9 z- i* L! l3 @# ?
ZGD4:=IF(K=1,ZGD2,DRAWNULL);. Z# q; c7 I0 X! k' W
牛背:=MA(C,21); D: Z0 A* k9 {2 A7 v
牛逼:=牛背+2*STD(C,21);
$ B. y' Q1 k6 X" J3 ?) F8 ]6 H8 P熊样:=牛背-2*STD(C,21);+ ? x5 {- M6 U5 R* g% B. J
牛背2:=IF(C>牛背,牛背,DRAWNULL);
1 h' m$ J( T" e3 l熊样2:=IF(C>牛背,熊样,DRAWNULL);* C! m$ ?. d8 v& d7 g1 b k+ W0 Z- n
DRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);
6 [+ W1 d4 g3 wDRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);) H q* F5 ~2 h8 Z8 `7 H, c6 O8 L
DRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));. G J1 y( L- Y0 r4 ~) \% K
牛缰绳:MA(CLOSE,4);
- Y+ ?8 A$ g( d2 V2 E1 }: A0 ~! Z牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;1 g- ]: N) b1 `/ d% R8 z6 [8 P! P
牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;+ g+ a, G& n' E5 \
牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;. p& u/ F {7 Z* v
AY:=EMA(CLOSE,12)-EMA(CLOSE,26);
) r: [) x8 c! \8 ?* w0 D% xAZ:=EMA(AY,9);% l1 E( z0 e$ c) F' t- `3 j8 [
LT:=(AY-AZ);
3 R% W8 g3 b# Y5 f5 Q# TL21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
& m9 G! \# X5 H; v# W, ?3 WIF(LT,LLV(L,21),DRAWNULL),COLORFFFF00;
# a/ u4 X/ D$ @- A" E7 N0 K% oSTICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;
- l. j% n0 u9 U. }- \STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
& _+ @% D1 x* X) u% y* I0 BSTICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;
6 ?' @! f4 x; ?: [STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
2 R6 H. p! {/ j9 fSTICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE = DSLX1)),1,0));
4 x1 X$ }3 {. p: t环境2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
2 S+ N" L1 g1 r! Z7 P环境3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));: z2 v# X: _# L$ s$ ^5 q, y6 q/ X6 z0 g
环境4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 = YYV2)) AND (DSLX >= DSLX1)),1,0));0 w' d* Z& x% z% E* h1 i; b
环境6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
- }" G) l9 H l# A- [8 I, B环境7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
, h1 d' _* b9 Z( T2 n, b环境8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
# k, {" Q0 r* r' \* p环境9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
. L( u% Y! c3 D: { w7 k+ C环境10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
& X* j J5 j* K: `; ?: C环境11:CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW;
$ {! y/ A4 `/ `' o环境12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));- t: C7 ^% o2 y9 D: ?5 S
环境13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));% p- W4 U$ @$ s4 H
环境14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));4 i+ R% c* s9 y! e- G% t
环境15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
p* \. ?# B/ }2 H5 i2 b+ S5 t0 A- _9 [环境16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0)); z1 T" S, k1 G- B* ~6 G' m& b
大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0));
: @/ Y. ~& E' }大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));
) c* s$ y9 ]) T) N9 M大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));
' ?- z' k! I7 t) g8 @大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));
. X/ N" W6 R) G/ Y+ C9 L5 p2 Q大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));
: O0 |; I, l4 _' D大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));
2 V$ c6 d8 v1 C9 A, y* v大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0));+ i! U+ @* D! @( F) {1 N
大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));; `1 Z, q5 X, F9 ~3 R
. V" H# w/ [4 W. I+ x
WJ:=(H+L+C)/3;
" K9 O, V( R, a4 o7 OV1:=IF(H=L,1,H-MAX(O,C));
7 K6 ?0 K) w; T W% B- cV2:=IF(H=L,1,MAX(C,O)-WJ);
% i+ @' [: z6 u- x% jV3:=IF(H=L,1,MIN(O,C)-L);
1 v1 L" K8 P$ z7 OV4:=IF(H=L,1,WJ-MIN(C,O));3 K, V5 h1 J( Q# n% Z7 |( a
V5:=VOL/IF(H=L,4,H-L);" E) r: q; N- m; P5 [; B* n& J
V6:=(V1*V5);+ t' v- Y- l( Y$ C `2 T
V7:=(V2*V5);
?8 `' q9 u1 m9 y; i7 R9 |V8:=(V3*V5);, h* ~ s1 _( l- N% [
V9:=(V4*V5);
" R- M9 T1 R4 N9 J6 O0 |$ X买盘1:=DYNAINFO(23)*比;: z; m0 I3 Q$ V4 y- K" L; z# _
卖盘1:=DYNAINFO(22)*比;
6 L, }2 c: v% ~2 `买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));
* d& j! m& E3 E1 I& l卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));
/ U1 s2 s* U# d6 N" |' @$ ~买盘:=IF(ISLASTBAR AND PERIOD=5 AND C=REF(VOL,1);
8 f; c- S# }9 t$ }% YM1:=CONST(绿灯);7 ^1 }9 j" l4 e* x1 A5 [
阑珊:=MFI1.5;5 {) j5 Z4 N% R) {! v; W3 o
M6:=CONST(量缩);
1 S4 l( \1 ]8 G4 x& _. Z卖量大:=(卖盘-买盘)/买盘>0.4;- w, f9 b4 `: U" {3 ]( s1 \
M7:=CONST(卖量大);
7 F; ^4 Y1 f# G! W8 B- \买量大:=(买盘-卖盘)/卖盘>0.4;: u' T6 Y8 i, e4 f [$ K( {
M8:=CONST(买量大);0 P Q* H# F p1 b
TS1:=IF(M1=1,0.03+0.03,0.03);- s& _( ^* I- X8 |4 [
TS2:=IF(M2=1,TS1+0.03,TS1);
" {* P) A6 c; ]3 Z* t3 `TS3:=IF(M3=1,TS2+0.03,TS2);; K6 K/ `; d4 s8 h0 N8 D; V0 d
TS4:=IF(M4=1,TS3+0.03,TS3);
, j, e/ d0 K Q4 c, E/ a1 G" I$ YTS5:=IF(M5=1,TS4+0.03,TS4);7 e& m& j* f* x+ w# [" H4 J3 f4 Q% e% n
TS6:=IF(M6=1,TS5+0.03,TS5);
' n0 A; a5 E _/ R! ATS7:=IF(M7=1,TS6+0.03,TS6);
1 _/ m$ p) {6 b2 a+ wTS8:=IF(M8=1,TS7+0.03,TS7);- ~$ `( L- J5 @7 e, M
, M2 S; y, t9 B- ^- [0 a! S
DRAWTEXT(环境1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,显着走强,中线参加，仓位在2/3左右''),COLORFF00FF;! o( J2 x! c( L( S/ C, @
DRAWTEXT(环境2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不敷，短线出场，仓位在1/2左右''),COLORFF00FF; w3 N/ P$ H) {2 L* Q: b- C
DRAWTEXT(环境3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价精良，并没有显着走强，短线出场，仓位1/2左右。''),COLORFF00FF;
7 o+ W% g) a4 }9 l+ ?) K. wDRAWTEXT(环境4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可，量能不敷，未完全走强,短线参加，仓位1/3左右。''),COLORFF00FF;+ e. F& e7 B$ W5 O4 G# o
DRAWTEXT(环境5=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏，走势尚可，重仓减泰半，清仓者观望。''),COLORFF0000;) g7 o/ y. I7 F; s! S0 g
DRAWTEXT(环境6=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌，显着缩量走势，思量大盘风险，减持或清仓。''),COLORFF0000;
8 B+ S3 A. s- HDRAWTEXT(环境7=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌，走势显着偏弱，离场观望。''),COLORFF0000;
: I: b- V2 y1 [6 y p7 ]DRAWTEXT(环境8=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌，走势偏弱，离场观望。''),COLORFFFF00;
0 {2 b( {( J. j1 hDRAWTEXT(环境9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态精良，强势显着，量能富足，可以继续持有。''),COLOR00FFFF;
0 w; D& |: ]/ p4 _. \1 rDRAWTEXT(环境10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势稳定，强势依然，但量能开始转弱，注意风险''),COLOR00FFFF;; n1 V% F6 Y' _0 S7 O! y% O
DRAWTEXT(环境11=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力，但股性偏弱，可思量减仓。''),COLORFFFFFF;
3 J# B) V4 x" I! H) ~. N) }DRAWTEXT(环境12=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱，量能不敷，减持大部门筹码''),COLORFFFF00;# Y! _+ j/ [+ W, [( f: a
DRAWTEXT(环境13=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳，注意成交量的变革，但现在不恰当参加。''),COLORFFFF00;! q+ O( ^* k* `% W+ P& t( W
DRAWTEXT(环境14=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明，股价偏弱，注意量能变革，现在不宜参加。''),COLORFFFF00;
+ I' j& W! D" Y0 ^) kDRAWTEXT(环境15=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象，但量能不敷，趋势不明，不恰当操纵''),COLORFFFF00;
' v! M. O" d. W6 \+ b- l" V4 s7 bDRAWTEXT(环境16=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱，没有参加代价。''),COLORFFFFFF;* Z Q! w5 w U9 }3 z5 |0 F1 ?
DRAWTEXT(大盘1 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌，最佳买点，否则审慎参与。''),COLOR00FF00;
7 j6 N6 M, J8 ]) X/ ~DRAWTEXT(大盘2 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强，量能不敷，若前一轮下跌，短线出场1/2，量能放大加仓。''),COLORFF00FF;& ^8 V Z, x* D5 |0 C
DRAWTEXT(大盘3 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏，重仓者可以减去大部门仓位。''),COLORAAAAAA;% e5 C1 R+ R% j s k8 G8 J% z
DRAWTEXT(大盘4 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调解，注意风险，短线清仓观望。''),COLORFF0000;% x) ^6 v) ]3 \# U
DRAWTEXT(大盘5 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势精良，量能理想，可以继续持有强势股。''),COLOR00FFFF;
$ F. I6 g6 q# a c: L) Q) aDRAWTEXT(大盘6 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态精良，但量能稍显不敷，随时预备减仓''),COLOR00FF00;6 T+ ^+ W% K3 G* }, K9 t4 H2 B
DRAWTEXT(大盘7 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明，注意成交量变革，现在不相宜出场。''),COLORFFFFFF;) I4 h0 j, m8 `- J
DRAWTEXT(大盘8 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下，量能萎缩，不恰当出场。''),COLORFFFFFF;7 ^# M1 L0 W" I* x: B c. h: \
DRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''［绿灯］实计生意业务量增长。MFI促进指数增长。''),COLORFFFFFF;, f. D7 B. d$ f$ R* }+ l
DRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''［阑珊］实计生意业务量淘汰。MFI促进指数淘汰。''),COLORGREEN;
8 H% Z; e/ y9 ZDRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''［伪装］实计生意业务量淘汰。MFI促进指数增长。''),COLORGREEN;* g, j2 o& W. [2 [" n; M0 `
DRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''［蛰伏］实计生意业务量增长。MFI促进指数淘汰。''),COLORYELLOW;- Y' E! u) |7 {% F" w' C: _) f
DRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN;
3 }6 \1 ~, t! u0 c3 H! s) C( K7 uDRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW;
# C8 B( P! m9 L% ^* f0 D7 UDRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40％以上;''),COLORGREEN;! b( ?) [% r5 P( x0 u7 v L8 K
DRAWTEXT(M8 AND CURRBARSCO |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:07