|
一，为解盘照图把图文笔墨没置一下。
9 W5 o) I& X2 Q/ S二，参数K有三种没置方式，缺省为0。k=0时配景变色，当图面k线周期多时k线
# m4 Z& @! X: z$ p 有压缩征象。k=2时配景稳定色无压缩，但会失去表现强弱的配景自功变色。
- K2 q7 g! Z |* G9 N1 r4 Q1 r8 h1 a三，k=2时只有熊样线以上的图面变色,无压缩。但要选择体系配景致共同才好
& n0 y' p; ~/ [* q. ]7 L 看。(我选的狩猎绿)) g4 a2 M8 G0 ~" w7 f* |5 v
/ ~ L/ a- g; I
8 P, V, V7 Z7 V) U4 }5 z' [5 }, I1 u3 [( C" b, e) A
{阳光普照__TDX 参数K(0,2,0) 缺省为0} J/ \$ M. J6 i" q
TT:=240/FROMOPEN;$ z' ?- d2 J m f
比:=TT;5 k7 U5 @7 n# P1 @1 |( U0 I
促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;; ^4 K. @1 J( W9 p% p6 L% |
AY2:=EMA(CLOSE,12)-EMA(CLOSE,26);1 } q& L2 a9 F0 h0 q; s! l# F
AZ2:=EMA(AY2,9);
2 L& Q) j: P% DLT2:=(AY2-AZ2);7 d' \ {! h( p) M- X
L211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
# p4 y2 I$ G7 m. D/ r. j& |ZGD:=HHV(H,80)*0.99;, ^& S3 S8 M! R2 g5 v) F/ C
ZGD2:=CONST(ZGD);
3 z7 w; M2 X+ p, l1 yZDD:=LLV(L211,80);
! ~! J# ^. p$ W+ R; jZDD2:=CONST(ZDD);
8 e% q% K' |) |+ {+ h( h. OYYA4:=MA(CLOSE,20);+ `9 W c. I& S, w$ `+ G; X
YYA5:=(CLOSE > MA(CLOSE,5));
5 i) b9 ^. s, m8 BYYA6:=(MA(CLOSE,5) > MA(CLOSE,10));
, |7 e0 U3 S6 g2 P+ vYYA7:=(CLOSE > MA(CLOSE,10)); V1 l* R2 J2 V( q9 T
YYA8:=(MA(CLOSE,5) > MA(CLOSE,20));" |6 k5 G9 b. L# J S0 ]6 s
YYA9:=(CLOSE > MA(CLOSE,20));
5 A9 n7 C' D' {, X# ZYYA10:=REF(YYA4,1);* z! V7 }4 T) Y1 F% {
YYA11:=(YYA4 > YYA10);
0 p8 ^; C/ ^5 ` |( ZYYAVX:=(((((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)));3 B8 f7 E# c5 R# t5 U
DSLX:=(CLOSE / INDEXC);, O; O& p3 A! [, U3 F+ r' k) |. |
DSLX1:=MA(DSLX,5);
; W/ _. k3 F* w9 M+ v0 f5 [1 ^) X7 ^! iDSLX2:=MA(DSLX,10);
! {% Q5 a1 U3 \( b" T' P, ZYYV1:=MA(VOL,5);
: l, {( K% w. w* L, Q) aYYV2:=MA(VOL,10);$ y: |* K# H. \$ L6 ~
J1:=CONST(IF( YYAVX > 0,200,100));4 p$ s$ G; Q% | J5 T5 @3 l0 }( t
J2:=CONST(IF( YYAVX > 0,00,100));
" ~9 `, p) G0 X: ~( m* Z+ P0 j$ AJ3:=CONST(IF( YYAVX > 0,100,100));
, t- A) [( {4 uZGD3:=IF(K=0,ZGD2,DRAWNULL);
* F$ q8 \" k9 Z) t4 x: ^* D% E: X( wZDD3:=IF(K=0,ZDD2,DRAWNULL);; `4 s( d% H( t6 ~8 N) j7 w) W
ZGD4:=IF(K=1,ZGD2,DRAWNULL);
& R" V! q8 b. \' B8 ]5 o% |牛背:=MA(C,21);; `" D: ~2 ?; P, r& r% u
牛逼:=牛背+2*STD(C,21);) r4 S8 }9 k8 c# ~. q L) l8 c- c
熊样:=牛背-2*STD(C,21);
6 e8 z t9 h0 e' z2 x! X8 o( J牛背2:=IF(C>牛背,牛背,DRAWNULL);
& ^* e! E( {: L p* f! ~2 D熊样2:=IF(C>牛背,熊样,DRAWNULL);
' d) B( C1 K( V7 kDRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);- K6 m) p6 ~5 M
DRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);
" Z/ ~* b" l! |6 S2 k: Q) uDRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));
3 r* d- O7 q$ ?1 Z牛缰绳:MA(CLOSE,4);
% ~8 }. D0 V. Z& @/ p, k牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;
. d; X% p( `, r! F牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;/ R! {- W% q0 f7 |+ K A( F
牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;2 z- n2 }8 f5 C" v) `% p
AY:=EMA(CLOSE,12)-EMA(CLOSE,26);! d, p$ W. D/ Q3 n5 l
AZ:=EMA(AY,9);" a7 q# P5 h! A
LT:=(AY-AZ);: v' |% B4 K; Q7 K+ W: W# H+ Q1 h
L21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;5 D% r* F+ |9 r' @, D6 T
IF(LT,LLV(L,21),DRAWNULL),COLORFFFF00;
1 L+ ]6 a9 `4 ~STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;
/ \! O W- N. _0 C8 X: ySTICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
, N. i7 e6 t. @2 y# n0 ISTICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;* |# U: v, |" I s* z+ L/ U
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;& A% h0 U7 a2 X. @
STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE = DSLX1)),1,0));
; q% v3 W# |" m/ x V环境2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));& y; x; |8 V) G' z
环境3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));9 g/ p/ n w. T: s$ W
环境4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 = YYV2)) AND (DSLX >= DSLX1)),1,0));' y* p7 u6 Q2 N9 q# [8 A: ]
环境6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
# t* W. X2 {+ r8 `- u& b9 s9 a. [环境7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
! n" n4 V7 }! d1 h9 Z! E6 ?环境8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));5 a: q1 K( b0 K/ P, M. K( N- H
环境9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));* p9 F0 h5 z7 K$ k# w0 o1 I
环境10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));+ {, R7 }5 [' F- x3 D$ q
环境11:CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW;
. [! F2 _" E+ P4 `6 b环境12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));9 B$ ~8 `; O4 x5 m" W! F4 H/ s8 S
环境13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
6 ^7 e% T0 A( z; x" Q5 h环境14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));7 B7 @' r3 G/ e3 i
环境15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));. W5 d, J* G- e6 d
环境16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
: o) M& n7 W! w: i0 C7 m$ l. }大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0));
' U$ o3 x3 J; F1 ]大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));
/ [5 f4 R& i* z# {! C大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));
: e7 w% R4 h$ m+ [0 g4 G8 [$ ^8 ]大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));
5 H) ~8 \5 G4 Q8 v/ s9 b4 M p3 o大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));* S! W, h9 |0 `7 i& r- _1 c
大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));; ^- i8 W7 Q. d3 t8 N
大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0));2 H" K* o( K, y4 k- {( M9 w, W. z/ j
大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));
# n8 [0 ^1 I8 z# @3 K6 T1 C" n* E9 D( T# f2 j/ i! z9 j. j! [
WJ:=(H+L+C)/3;
9 N( H- h7 {: d/ zV1:=IF(H=L,1,H-MAX(O,C));
; j7 J* e! A1 x5 o$ d0 H' OV2:=IF(H=L,1,MAX(C,O)-WJ);9 d1 F" x4 D+ B( i4 x2 h4 ~; w
V3:=IF(H=L,1,MIN(O,C)-L);; o- T8 G4 H/ ^1 z0 }
V4:=IF(H=L,1,WJ-MIN(C,O));; I! v. J0 a2 |% e$ |
V5:=VOL/IF(H=L,4,H-L);/ O5 L% ^ L2 K4 T
V6:=(V1*V5);
( N! v1 m0 E; _2 m; aV7:=(V2*V5);
) F* e4 S6 Q& ^7 d& d5 G. h5 P8 ^V8:=(V3*V5);: | m7 f& D' N" L0 l" ]- @- h! }
V9:=(V4*V5);# O0 `3 `$ h$ c. x3 E H% g
买盘1:=DYNAINFO(23)*比;, \* |7 G" ?5 a j& d$ g6 L
卖盘1:=DYNAINFO(22)*比;& o, j i6 z W: Y2 k4 r# _4 c/ O
买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));
3 b( ?; w* l0 P9 E( k: O4 }/ Q# p卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));
9 Q* o; S8 u5 ^买盘:=IF(ISLASTBAR AND PERIOD=5 AND C=REF(VOL,1);
" `" L' c9 g% o8 {; W6 Q6 `" cM1:=CONST(绿灯);
( f$ x9 G6 j! V* @! e阑珊:=MFI1.5;
: e6 c7 U- x+ XM6:=CONST(量缩);
0 {8 c7 @8 Q8 Y) z' K# K/ p卖量大:=(卖盘-买盘)/买盘>0.4;8 L0 O; l; q6 S' g9 V9 R
M7:=CONST(卖量大);
0 n+ y3 w9 |6 _- ?2 }4 D+ v买量大:=(买盘-卖盘)/卖盘>0.4;
4 `% p& v& g' eM8:=CONST(买量大);1 w4 c" E# X2 Q0 p! Y* Y
TS1:=IF(M1=1,0.03+0.03,0.03);
6 B* j8 W6 I! z: G# q6 wTS2:=IF(M2=1,TS1+0.03,TS1);
; Z! F( `8 }' R( nTS3:=IF(M3=1,TS2+0.03,TS2);
' [, T$ C7 X/ E; F* }TS4:=IF(M4=1,TS3+0.03,TS3);
6 Y5 v* a9 K& t& R9 [+ PTS5:=IF(M5=1,TS4+0.03,TS4);
1 {+ B' I9 w% u% L6 [TS6:=IF(M6=1,TS5+0.03,TS5);, n) ^" x4 A- r0 u7 `
TS7:=IF(M7=1,TS6+0.03,TS6);: X: h5 W% M! I9 f( i2 ]
TS8:=IF(M8=1,TS7+0.03,TS7);
2 W: P5 K* J# \) k) M' Z
( R8 D! q& l0 W7 W4 k4 {DRAWTEXT(环境1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,显着走强,中线参加，仓位在2/3左右''),COLORFF00FF;, S% v/ z7 k. t+ J: `1 A7 y
DRAWTEXT(环境2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不敷，短线出场，仓位在1/2左右''),COLORFF00FF;
, ?: {% i& w. A* q# T8 WDRAWTEXT(环境3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价精良，并没有显着走强，短线出场，仓位1/2左右。''),COLORFF00FF;
" I2 P/ L5 Y0 W' W" I. MDRAWTEXT(环境4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可，量能不敷，未完全走强,短线参加，仓位1/3左右。''),COLORFF00FF;
4 p+ ^# s ?5 ZDRAWTEXT(环境5=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏，走势尚可，重仓减泰半，清仓者观望。''),COLORFF0000;
' m6 ?( f/ u1 i* ADRAWTEXT(环境6=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌，显着缩量走势，思量大盘风险，减持或清仓。''),COLORFF0000;
: ^% P L3 K: s6 U1 [% @DRAWTEXT(环境7=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌，走势显着偏弱，离场观望。''),COLORFF0000;) Q$ F8 X6 e# M$ Q
DRAWTEXT(环境8=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌，走势偏弱，离场观望。''),COLORFFFF00;5 F/ I2 o& t" N: y) x$ m$ M
DRAWTEXT(环境9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态精良，强势显着，量能富足，可以继续持有。''),COLOR00FFFF;
6 {0 y; n' U8 R0 O2 _& pDRAWTEXT(环境10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势稳定，强势依然，但量能开始转弱，注意风险''),COLOR00FFFF;
* B3 U) b# R" {# D8 M9 rDRAWTEXT(环境11=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力，但股性偏弱，可思量减仓。''),COLORFFFFFF;9 W$ e( m5 z, F1 f6 `& ]& N
DRAWTEXT(环境12=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱，量能不敷，减持大部门筹码''),COLORFFFF00;
' `$ f% R; ]' x$ R- x2 ]+ q* u& `DRAWTEXT(环境13=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳，注意成交量的变革，但现在不恰当参加。''),COLORFFFF00;9 F, B$ p8 @# \ P/ |
DRAWTEXT(环境14=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明，股价偏弱，注意量能变革，现在不宜参加。''),COLORFFFF00;" j' y7 Y: c$ t7 H6 \
DRAWTEXT(环境15=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象，但量能不敷，趋势不明，不恰当操纵''),COLORFFFF00;4 }, @% g7 j- P5 ]
DRAWTEXT(环境16=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱，没有参加代价。''),COLORFFFFFF;
/ k/ O4 E( q6 H7 P8 f0 SDRAWTEXT(大盘1 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌，最佳买点，否则审慎参与。''),COLOR00FF00;; L% u" l3 Y: k8 }; `
DRAWTEXT(大盘2 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强，量能不敷，若前一轮下跌，短线出场1/2，量能放大加仓。''),COLORFF00FF;
( `4 F5 ]: [1 {6 }0 R- cDRAWTEXT(大盘3 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏，重仓者可以减去大部门仓位。''),COLORAAAAAA;3 {# T1 {: {# d; u) ^5 {
DRAWTEXT(大盘4 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调解，注意风险，短线清仓观望。''),COLORFF0000;
3 p, C+ f8 T- B+ e2 kDRAWTEXT(大盘5 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势精良，量能理想，可以继续持有强势股。''),COLOR00FFFF;
' D9 r$ Y' V! ]" l5 yDRAWTEXT(大盘6 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态精良，但量能稍显不敷，随时预备减仓''),COLOR00FF00;
/ K0 G( C0 Z7 e. f& kDRAWTEXT(大盘7 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明，注意成交量变革，现在不相宜出场。''),COLORFFFFFF;
- K, L2 k7 M, h1 c$ F6 r! l& Q* nDRAWTEXT(大盘8 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下，量能萎缩，不恰当出场。''),COLORFFFFFF;
/ ^9 o# N ]# z5 s7 fDRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''［绿灯］实计生意业务量增长。MFI促进指数增长。''),COLORFFFFFF;
\9 S* Q' }5 |# j% ?DRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''［阑珊］实计生意业务量淘汰。MFI促进指数淘汰。''),COLORGREEN;# H4 z2 I: C# X" I
DRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''［伪装］实计生意业务量淘汰。MFI促进指数增长。''),COLORGREEN;
. \2 B% N3 W5 q5 ?' T! ADRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''［蛰伏］实计生意业务量增长。MFI促进指数淘汰。''),COLORYELLOW;( q6 B1 o( d/ k6 ~5 Z) a( W
DRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN;( U8 d2 \4 k; w. N0 t# x, [
DRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW;
& r% t' Z; K+ H/ P0 I5 f6 wDRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40％以上;''),COLORGREEN;
* c5 q# j$ r6 v+ P# |" v1 i5 ODRAWTEXT(M8 AND CURRBARSCO |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:07