|
一，为解盘照图把图文笔墨没置一下。1 o7 I3 \. {+ B9 t
二，参数K有三种没置方式，缺省为0。k=0时配景变色，当图面k线周期多时k线
! y) O' |* b, D( q! J 有压缩征象。k=2时配景稳定色无压缩，但会失去表现强弱的配景自功变色。' k' ^( a5 [. C) ]& {
三，k=2时只有熊样线以上的图面变色,无压缩。但要选择体系配景致共同才好6 l* \' o9 W: w: U4 z" z
看。(我选的狩猎绿)
0 c% _: g: f, z* `9 x; W9 }! N9 [5 \- @' f1 K$ N
' U2 L: [( m0 ~0 z
/ Q; e" t0 U3 ?. N8 M- V6 T
{阳光普照__TDX 参数K(0,2,0) 缺省为0}
% V, V! K0 q! Z* V9 y; vTT:=240/FROMOPEN;
: e4 y0 j( l+ N# H; s" F比:=TT;
- H- A( E. R0 [# V/ r' X- ^促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;
9 U/ ~1 F: ]8 w. b e7 X$ bAY2:=EMA(CLOSE,12)-EMA(CLOSE,26);. U) J9 e4 n$ j9 A9 ~1 {5 d
AZ2:=EMA(AY2,9);1 ~* A6 X2 y+ ~
LT2:=(AY2-AZ2);
% v0 k9 I& O5 p8 m XL211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
a! t! Q! E2 Z' d8 TZGD:=HHV(H,80)*0.99;
. k) g4 [" @& M7 E5 S& S+ uZGD2:=CONST(ZGD);
9 t: H- g8 U% U" D# pZDD:=LLV(L211,80);9 Q, o6 r/ ~6 g( c# g2 \
ZDD2:=CONST(ZDD);0 E! ]( l1 l# {' @
YYA4:=MA(CLOSE,20);/ O; x, u* V& H3 y' f$ |
YYA5:=(CLOSE > MA(CLOSE,5));
5 M* \# X) Q" j. c$ v) V& CYYA6:=(MA(CLOSE,5) > MA(CLOSE,10));
$ ]5 `& s: ?. F- TYYA7:=(CLOSE > MA(CLOSE,10));
& j& j1 T7 p0 s9 M, MYYA8:=(MA(CLOSE,5) > MA(CLOSE,20));
% {6 }1 x4 j1 i/ i/ G; jYYA9:=(CLOSE > MA(CLOSE,20));7 X1 D9 w7 U( Q4 m0 u |
YYA10:=REF(YYA4,1);0 Y# \$ Y# W9 O1 h
YYA11:=(YYA4 > YYA10);* x5 L( R- C; 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)));
& [8 [$ w8 s# Q$ \' o/ Q, ~DSLX:=(CLOSE / INDEXC);
* d3 C) O* O* O5 w3 o% jDSLX1:=MA(DSLX,5);% e" d1 [0 s5 k+ H5 V! X
DSLX2:=MA(DSLX,10);
8 W9 z/ a6 F3 I- r8 x" AYYV1:=MA(VOL,5);" L, l+ \) {3 L& o* ~% c5 b
YYV2:=MA(VOL,10);
9 K! l- t9 m7 G' [' e; RJ1:=CONST(IF( YYAVX > 0,200,100));3 O! v$ L( y7 j$ Y0 L" t9 S
J2:=CONST(IF( YYAVX > 0,00,100));
. d/ s2 I9 i- ^7 V: `1 F$ Z8 wJ3:=CONST(IF( YYAVX > 0,100,100));" z3 e7 X! w( M7 p: I5 t3 ~# h
ZGD3:=IF(K=0,ZGD2,DRAWNULL);$ b7 C9 S) O0 a
ZDD3:=IF(K=0,ZDD2,DRAWNULL);* N8 ]5 m: G T' b8 G. m" L
ZGD4:=IF(K=1,ZGD2,DRAWNULL);
" }" E0 g3 q, T- }2 j- d牛背:=MA(C,21);
# C( a3 ], @: ^牛逼:=牛背+2*STD(C,21);
6 S' s( E+ J/ ?) A熊样:=牛背-2*STD(C,21);: @& @ A; ^' \3 E! B7 N* Y3 f
牛背2:=IF(C>牛背,牛背,DRAWNULL);8 ]1 e" i7 R1 K" b: S9 w
熊样2:=IF(C>牛背,熊样,DRAWNULL);
) M% R& W2 l/ L; K- nDRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);4 N3 y1 o+ a1 @, M9 q* h- k
DRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);* Q9 n& }0 _/ K- N4 r
DRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));* h* a U( o+ I: t( U4 l) b
牛缰绳:MA(CLOSE,4);7 b2 q* f# K4 V* ~, R) f
牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;
* |% V- E/ z, V% b牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;( @. ~. K# P! q5 ^- b p
牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;3 q" x! I3 J) \+ t. H# e" p
AY:=EMA(CLOSE,12)-EMA(CLOSE,26);' [4 N; D; [- q. I* r# f
AZ:=EMA(AY,9);# c4 H7 c& r) W4 n' [; k
LT:=(AY-AZ);
$ \7 \' E. U, Z" q" H8 iL21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
$ s8 U# x! H9 q" Y' nIF(LT,LLV(L,21),DRAWNULL),COLORFFFF00;0 z1 k+ k- g7 c) F4 G) }) l
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;
, _" |* X! o# g6 y0 @& Z, jSTICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
' P, D/ f) }, }STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;
& L" S# i) O" _ N8 M( [STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;/ x" @6 |$ h5 d, Q5 k7 J
STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE = DSLX1)),1,0));- g# G# p* e) b% x
环境2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));- g# M: w! Y1 @. O
环境3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));
8 [- e! Z" x& [0 f环境4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 = YYV2)) AND (DSLX >= DSLX1)),1,0));) _: g, C. A: f9 Z( L7 d) t [/ Q
环境6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
3 r3 K& L3 Z f& `) ]环境7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));! ]1 G: e5 F9 v* A# K
环境8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
5 V; N+ Q' h5 ~环境9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
4 r+ p, E6 U# g, O& c7 Q4 S k环境10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));! t+ ]! f, i7 [9 j" Q
环境11:CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW;
' Q+ |1 S9 L4 I; F1 k# ~3 g+ | O环境12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));7 o/ p5 q3 n# u
环境13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
/ _: j- x, H- U2 S# N. w8 K( g% G9 h& }: k环境14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
: ^! X1 w" e5 ~1 V2 q环境15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
: R6 {5 s: S4 W/ ?( R: E# {环境16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
0 F% C% @* i* ?2 ~: h& L3 |大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0));
/ E% r1 A% C1 |% e大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));1 r% w$ ?3 K# i
大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));! c y c* A# i5 B
大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));$ t: F5 o5 W2 B/ g, r
大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));+ m3 H$ a4 f9 {3 t. C/ `
大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));1 }/ U @% ^0 N h4 Z. c
大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0));
! g* w. u4 Z/ S$ ~' s) @3 ?' }大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));
, W3 S; s( f, W g! L( [9 G6 c
* A+ b7 _- F" `3 ^! K6 a8 LWJ:=(H+L+C)/3;2 Z! W# Q/ D" l* n0 }" C* ~* ?3 g
V1:=IF(H=L,1,H-MAX(O,C));% I( |* W! F& W$ A- u; B' f
V2:=IF(H=L,1,MAX(C,O)-WJ);
; f- C+ A$ {0 b1 @V3:=IF(H=L,1,MIN(O,C)-L);/ S. m; W3 E/ E# @. A/ p
V4:=IF(H=L,1,WJ-MIN(C,O));
, u1 {$ V- W3 c7 _: N: Q/ N0 LV5:=VOL/IF(H=L,4,H-L);2 W5 a# O! J& L8 S0 i# C. x8 ?/ j
V6:=(V1*V5);& L2 P m! |* y% W4 R. t* L7 G1 m
V7:=(V2*V5);
+ H; ]3 c& A/ Q0 i/ yV8:=(V3*V5);3 ~4 a c$ S; _ ^# E' M
V9:=(V4*V5);
) s) I t6 ^/ ^& W( f买盘1:=DYNAINFO(23)*比;2 H0 h, {$ h8 U, e# B$ A" L" ]
卖盘1:=DYNAINFO(22)*比;3 a7 u7 [3 @& K, x" _- T! B+ e9 F
买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));" W5 x% H- _8 u: ]5 Y* r
卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));
7 T- R6 |, S# I$ S/ B; v买盘:=IF(ISLASTBAR AND PERIOD=5 AND C=REF(VOL,1);. y2 S/ R( i3 u2 ~+ N; Z
M1:=CONST(绿灯);
9 {$ Y! X4 A l+ h7 e阑珊:=MFI1.5;
$ ?% D1 N2 Z# dM6:=CONST(量缩);* I& D2 p+ [* G v
卖量大:=(卖盘-买盘)/买盘>0.4;
% U j0 K8 q+ Z* k2 T0 S, rM7:=CONST(卖量大);
% _* t8 R k+ T$ O" o买量大:=(买盘-卖盘)/卖盘>0.4;5 P9 ~ [; l$ D# w$ @' |
M8:=CONST(买量大);
5 g. G! u' `7 V4 k3 |" U5 S" { ETS1:=IF(M1=1,0.03+0.03,0.03);* g9 X/ f4 G$ p2 Z/ G( x7 j
TS2:=IF(M2=1,TS1+0.03,TS1);
F+ _5 C% I: |1 Z6 m$ u6 Q0 B8 O% GTS3:=IF(M3=1,TS2+0.03,TS2);: h& S" C; ?7 i1 e. @* _
TS4:=IF(M4=1,TS3+0.03,TS3);
b+ H) \4 W3 k$ r k* N1 }8 _: n) u" PTS5:=IF(M5=1,TS4+0.03,TS4);
3 Z& N/ U9 Z( T6 n2 C$ ^TS6:=IF(M6=1,TS5+0.03,TS5);4 ?4 o2 y! L2 [
TS7:=IF(M7=1,TS6+0.03,TS6);
% T. \8 X/ B- r0 MTS8:=IF(M8=1,TS7+0.03,TS7);
$ ]( N4 Y2 p: o
0 u" J- S: p# A5 o9 P7 EDRAWTEXT(环境1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,显着走强,中线参加，仓位在2/3左右''),COLORFF00FF;' l1 u' [2 t" K
DRAWTEXT(环境2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不敷，短线出场，仓位在1/2左右''),COLORFF00FF;5 @* n1 u! u5 X0 o% z) _ D
DRAWTEXT(环境3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价精良，并没有显着走强，短线出场，仓位1/2左右。''),COLORFF00FF;
0 d" E! H/ @0 O0 e% D) ~0 p( vDRAWTEXT(环境4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可，量能不敷，未完全走强,短线参加，仓位1/3左右。''),COLORFF00FF;! k# ~( H: @ q! ^7 o* \9 J) J
DRAWTEXT(环境5=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏，走势尚可，重仓减泰半，清仓者观望。''),COLORFF0000;+ }) `) Z1 d+ W& Z
DRAWTEXT(环境6=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌，显着缩量走势，思量大盘风险，减持或清仓。''),COLORFF0000;
. w' X2 \! [2 F$ ^6 M! m8 BDRAWTEXT(环境7=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌，走势显着偏弱，离场观望。''),COLORFF0000;0 v( F% p; j0 k+ i
DRAWTEXT(环境8=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌，走势偏弱，离场观望。''),COLORFFFF00;
: k0 ]! [$ s& V$ a: c8 t% p5 ~& i: tDRAWTEXT(环境9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态精良，强势显着，量能富足，可以继续持有。''),COLOR00FFFF;) t. L. `# \( V @! ^
DRAWTEXT(环境10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势稳定，强势依然，但量能开始转弱，注意风险''),COLOR00FFFF;# c8 F6 i* A% Z S$ x) U9 e4 c
DRAWTEXT(环境11=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力，但股性偏弱，可思量减仓。''),COLORFFFFFF;1 Z! V- h) c) g: U& s
DRAWTEXT(环境12=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱，量能不敷，减持大部门筹码''),COLORFFFF00;) D' N( @; l% I* K# @* ~
DRAWTEXT(环境13=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳，注意成交量的变革，但现在不恰当参加。''),COLORFFFF00;3 @# L K+ \2 A. F3 w
DRAWTEXT(环境14=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明，股价偏弱，注意量能变革，现在不宜参加。''),COLORFFFF00;- t* U8 D, }" e6 q0 z B" }( N
DRAWTEXT(环境15=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象，但量能不敷，趋势不明，不恰当操纵''),COLORFFFF00;! z; F' m3 t- \ J0 k
DRAWTEXT(环境16=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱，没有参加代价。''),COLORFFFFFF;
; ^. D. V4 M7 Z9 [% M8 x7 b; NDRAWTEXT(大盘1 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌，最佳买点，否则审慎参与。''),COLOR00FF00;
; b' p# X4 {' B7 w2 k: |8 wDRAWTEXT(大盘2 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强，量能不敷，若前一轮下跌，短线出场1/2，量能放大加仓。''),COLORFF00FF;
- F; Q& @* `( R; ^: y pDRAWTEXT(大盘3 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏，重仓者可以减去大部门仓位。''),COLORAAAAAA;
6 V- V8 B/ K- y' U2 x* p8 @1 _DRAWTEXT(大盘4 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调解，注意风险，短线清仓观望。''),COLORFF0000;2 u" s' x7 X6 e) K' B! _
DRAWTEXT(大盘5 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势精良，量能理想，可以继续持有强势股。''),COLOR00FFFF;/ g S- ~6 A% F3 M# i
DRAWTEXT(大盘6 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态精良，但量能稍显不敷，随时预备减仓''),COLOR00FF00;' Z! r a7 c! ]0 h2 B7 A
DRAWTEXT(大盘7 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明，注意成交量变革，现在不相宜出场。''),COLORFFFFFF;; i- \8 V$ S8 U! c, [) \1 H6 b, e
DRAWTEXT(大盘8 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下，量能萎缩，不恰当出场。''),COLORFFFFFF;" k/ s9 t, R4 q7 g) J, D* S
DRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''［绿灯］实计生意业务量增长。MFI促进指数增长。''),COLORFFFFFF;$ Q) n, s9 z7 J3 s* {
DRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''［阑珊］实计生意业务量淘汰。MFI促进指数淘汰。''),COLORGREEN;! N% z$ t9 g3 D p$ g
DRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''［伪装］实计生意业务量淘汰。MFI促进指数增长。''),COLORGREEN;
5 q$ p) s5 z2 x: n- J$ {& B; \DRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''［蛰伏］实计生意业务量增长。MFI促进指数淘汰。''),COLORYELLOW;
, x6 H- z! H K# @2 g3 \DRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN;
6 y5 j3 T5 v: Q. o$ F% c' I1 MDRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW;: O# @# Y6 E" S( A' ?
DRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40％以上;''),COLORGREEN;
0 q ~4 ^1 i/ P7 n0 V5 rDRAWTEXT(M8 AND CURRBARSCO |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:07