|
一，为解盘照图把图文笔墨没置一下。2 z6 g7 n$ q! |9 U0 F7 Z9 m
二，参数K有三种没置方式，缺省为0。k=0时配景变色，当图面k线周期多时k线
~# d& A5 c0 P# H 有压缩征象。k=2时配景稳定色无压缩，但会失去表现强弱的配景自功变色。
! T5 @5 G/ P4 O三，k=2时只有熊样线以上的图面变色,无压缩。但要选择体系配景致共同才好
, ]! u$ m0 J! n 看。(我选的狩猎绿)4 I2 [# S/ ~# N
- ^" `( _, g7 L* W$ v
& ]1 R0 y9 l4 e. n# _* `! u- R4 ` h' n7 ^, v0 `
{阳光普照__TDX 参数K(0,2,0) 缺省为0}8 ?7 u% x7 R: X& ~& q
TT:=240/FROMOPEN;0 B! n" D F: ^; ], H$ q
比:=TT;" R6 {- I0 F3 X# Z$ G4 [
促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;
) w+ ?. m( L' w* x8 C% w( `AY2:=EMA(CLOSE,12)-EMA(CLOSE,26);
" q) A+ {. h+ Z6 z- o% iAZ2:=EMA(AY2,9);$ r5 E. t6 Z1 h! y! y; c
LT2:=(AY2-AZ2);' y+ Z& g) i6 W0 N) [
L211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
/ g" S z9 f/ pZGD:=HHV(H,80)*0.99;
" G1 c1 |1 P2 y' t1 C5 XZGD2:=CONST(ZGD);
* H. j) Z: C' D. S% Q7 w; z% jZDD:=LLV(L211,80);
' R# f+ G- P$ n: V' T5 \ZDD2:=CONST(ZDD); K0 W7 K, i# a, T+ R6 B- [; K
YYA4:=MA(CLOSE,20);
! v0 j( ~4 [5 N: Q- _" G6 }* hYYA5:=(CLOSE > MA(CLOSE,5));
, H$ y9 S# g9 _" qYYA6:=(MA(CLOSE,5) > MA(CLOSE,10));
" D4 @3 N1 h; m0 E2 _2 rYYA7:=(CLOSE > MA(CLOSE,10));
) z& H% I1 }* @YYA8:=(MA(CLOSE,5) > MA(CLOSE,20));7 h y# y% X" [8 t: f! g
YYA9:=(CLOSE > MA(CLOSE,20));
" i. x1 |5 g- M" R# zYYA10:=REF(YYA4,1);4 {' W3 [4 z, Z, w' v
YYA11:=(YYA4 > YYA10);& D( M9 F. W( g' c5 q: o4 E
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)));
) Y$ f/ G9 J( |' jDSLX:=(CLOSE / INDEXC);! j$ X) {- {7 T) u" y5 k/ d
DSLX1:=MA(DSLX,5);4 ` j: i5 u/ Q5 l5 k
DSLX2:=MA(DSLX,10);
2 z& S8 G4 ~+ p5 u+ ]YYV1:=MA(VOL,5);. i5 U& H' y$ `
YYV2:=MA(VOL,10); B: }1 ]7 F# R; [2 T& N" w( B1 w
J1:=CONST(IF( YYAVX > 0,200,100));
/ p: `. d# d/ t/ kJ2:=CONST(IF( YYAVX > 0,00,100));+ \# c2 @! Y+ M" s+ P
J3:=CONST(IF( YYAVX > 0,100,100));
/ @' B# d( P4 z( D! D; H! m5 IZGD3:=IF(K=0,ZGD2,DRAWNULL);* d- R( k/ G+ W, g% I7 r
ZDD3:=IF(K=0,ZDD2,DRAWNULL);7 k# x/ }% \8 C4 a. E
ZGD4:=IF(K=1,ZGD2,DRAWNULL);
, J4 {6 ?; A) }9 W+ |& i, Z9 t1 y牛背:=MA(C,21);& S+ w# i# d1 @! |* w- D. q
牛逼:=牛背+2*STD(C,21);2 b2 f+ F' H1 o, T! w; H. y% [6 g& p4 f
熊样:=牛背-2*STD(C,21);
, H0 d/ U/ o9 t+ H; r4 y2 C6 H& X牛背2:=IF(C>牛背,牛背,DRAWNULL);; Y* |4 R; y2 S+ Y& K
熊样2:=IF(C>牛背,熊样,DRAWNULL);! e% M' R% S$ }1 g- V
DRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);
& `! _+ F0 o! H, x5 \DRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);
* U. N. c; h( Q, c5 y3 b0 n8 |DRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));
" _' S( h1 S9 r Y% o' L) ~. N牛缰绳:MA(CLOSE,4);
: W6 V! M! q; c* Y e' S8 H- i牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;
' `% K7 m p+ y# F- y6 b& H, L牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;
/ a" o. a8 T& j" H$ L" n) H A牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;
. Q9 T4 T# T4 `' M" n7 `+ IAY:=EMA(CLOSE,12)-EMA(CLOSE,26);$ Y2 R: x: c) ^
AZ:=EMA(AY,9);
& b8 }" ~1 ~3 T# MLT:=(AY-AZ);9 _0 e) `; r( i5 v
L21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
7 m4 Q" P9 b3 HIF(LT,LLV(L,21),DRAWNULL),COLORFFFF00; E0 S* C) j8 x0 ]3 x9 H
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;
5 P4 U0 d2 k* j0 BSTICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
) Z1 ]6 o' S* n3 m) m& u7 TSTICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;0 B3 U( a& c9 H1 V9 }
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;( s/ f3 ]5 M0 | m3 x8 I
STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE = DSLX1)),1,0));4 s0 e: ]2 A1 v: j f' N
环境2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));4 U4 g% m; v2 `. Q: Q
环境3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));6 U8 R; H. F: @# V, I
环境4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 = YYV2)) AND (DSLX >= DSLX1)),1,0));
! Q3 N o8 p* m+ l9 L' |环境6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));( A' v4 L* `5 e. Q# K
环境7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
9 D( m# o2 i8 [# A$ j' S) \环境8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));/ n j' u# ?; q' B: h6 c" P7 u
环境9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
0 x& W8 W- [) Q3 f6 `& ?环境10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));" \: F& r$ C( ^3 |0 A% t1 g: u
环境11:CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW;
) m6 j# i# V% a, T% ~环境12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));& Q7 ^9 a. Q2 m5 T+ X
环境13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));( A4 |& m, [ k; z
环境14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
; J1 o* \. n9 R1 P* S环境15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));# G9 Y3 O0 g% H# g
环境16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
+ j1 W* ^2 e+ ?+ P: t# h大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0));
+ P9 s- B& U6 l9 b6 D4 m6 o+ u大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));, q5 t8 Q. U/ R) M1 J$ i, G
大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));
: l& d# M) u( Y r; ~0 X6 P大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));+ Q7 C) \/ p+ p" O) r; D4 X
大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0)); C8 n3 g }$ f8 b
大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));
( R& M5 {- ?( h* T! z3 q7 \大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0));" l! L9 z; j2 W \& b
大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));: z/ V" _" Y1 `+ d
4 X3 V" e0 }) m) `2 y4 }WJ:=(H+L+C)/3;
0 W1 Q, q& q3 SV1:=IF(H=L,1,H-MAX(O,C));
1 P9 P3 s+ |+ s; X- SV2:=IF(H=L,1,MAX(C,O)-WJ);# C4 g6 @* {4 n% o
V3:=IF(H=L,1,MIN(O,C)-L);
8 T+ r4 D. p: m- w" @* n" MV4:=IF(H=L,1,WJ-MIN(C,O));2 y; N2 E# n! x, @! z1 j- F/ s
V5:=VOL/IF(H=L,4,H-L);" G( r/ y- A, r5 Z1 F# L$ z E1 _
V6:=(V1*V5);
- x/ W7 u- Q: o3 ^( ?3 i) i9 \$ GV7:=(V2*V5);
7 ]8 T! J8 g1 Y' r- ?, _V8:=(V3*V5);
6 ~3 \5 m4 Q3 y+ P) Y2 X+ LV9:=(V4*V5);
5 [: T) I7 f' V' K0 M+ V* ~买盘1:=DYNAINFO(23)*比;
( j$ {, L g9 Z9 b# X- j9 g' Z& H卖盘1:=DYNAINFO(22)*比;- W1 g, o* l Z4 A: h0 }
买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));/ v& W8 M5 t0 {
卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));
8 e# E8 s4 F' n1 Y' e7 ~买盘:=IF(ISLASTBAR AND PERIOD=5 AND C=REF(VOL,1);
% D5 `) g4 Z& k9 Y) I) d3 iM1:=CONST(绿灯);
% p3 E2 R8 W) o阑珊:=MFI1.5;
5 Y9 m, X) T6 s; UM6:=CONST(量缩);
1 m4 L2 _) A5 I" |9 c% G卖量大:=(卖盘-买盘)/买盘>0.4;" B" ]& F. J6 A4 ?
M7:=CONST(卖量大);
# n8 G) K* y+ d a' S; B! I5 S0 O买量大:=(买盘-卖盘)/卖盘>0.4;$ N8 M. E J9 P$ b/ \) t
M8:=CONST(买量大);
$ _9 O- P( N0 a: eTS1:=IF(M1=1,0.03+0.03,0.03);
: [0 k4 W) G: i7 H+ x# |TS2:=IF(M2=1,TS1+0.03,TS1);
. @" ?9 a3 ^, I: Y( t& jTS3:=IF(M3=1,TS2+0.03,TS2);
5 R+ ?8 J( C1 l1 p, l+ [% X1 C5 yTS4:=IF(M4=1,TS3+0.03,TS3);
1 A0 h# ?$ e7 NTS5:=IF(M5=1,TS4+0.03,TS4);3 I. T9 q# @9 p
TS6:=IF(M6=1,TS5+0.03,TS5);
/ k* r: z' N) ?6 |TS7:=IF(M7=1,TS6+0.03,TS6);% ?4 g- w- L% |, f# ~' `" J" }
TS8:=IF(M8=1,TS7+0.03,TS7);
& M T/ V7 }0 i! @. k4 @( X% G% o# M# [# _- G
DRAWTEXT(环境1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,显着走强,中线参加，仓位在2/3左右''),COLORFF00FF;
, @- Y& i0 v" `3 FDRAWTEXT(环境2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不敷，短线出场，仓位在1/2左右''),COLORFF00FF;. b2 G1 z; M& h. E( U1 }
DRAWTEXT(环境3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价精良，并没有显着走强，短线出场，仓位1/2左右。''),COLORFF00FF;
; Z' B- K/ V g9 C, m" ~DRAWTEXT(环境4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可，量能不敷，未完全走强,短线参加，仓位1/3左右。''),COLORFF00FF;9 ?- U3 w5 F$ y z. s
DRAWTEXT(环境5=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏，走势尚可，重仓减泰半，清仓者观望。''),COLORFF0000;: E- d% w4 Z+ T
DRAWTEXT(环境6=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌，显着缩量走势，思量大盘风险，减持或清仓。''),COLORFF0000;
( S; X* D( p l+ M2 ^DRAWTEXT(环境7=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌，走势显着偏弱，离场观望。''),COLORFF0000;3 C' m0 N( [. r: b, J1 W9 P' ]
DRAWTEXT(环境8=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌，走势偏弱，离场观望。''),COLORFFFF00;) l. v# u+ x3 V3 ]
DRAWTEXT(环境9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态精良，强势显着，量能富足，可以继续持有。''),COLOR00FFFF;
" O7 j3 i) p6 A z0 ^( K# gDRAWTEXT(环境10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势稳定，强势依然，但量能开始转弱，注意风险''),COLOR00FFFF;9 G4 z7 K, o+ a V6 h9 ^
DRAWTEXT(环境11=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力，但股性偏弱，可思量减仓。''),COLORFFFFFF;* |) a% r9 Z, p
DRAWTEXT(环境12=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱，量能不敷，减持大部门筹码''),COLORFFFF00;- e- b* ~, G) ` O" `6 B
DRAWTEXT(环境13=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳，注意成交量的变革，但现在不恰当参加。''),COLORFFFF00;
1 Z0 B& O+ e' Z- M- q8 aDRAWTEXT(环境14=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明，股价偏弱，注意量能变革，现在不宜参加。''),COLORFFFF00;
3 O$ M4 b0 L3 P- a, XDRAWTEXT(环境15=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象，但量能不敷，趋势不明，不恰当操纵''),COLORFFFF00;' _+ F5 }, G- y8 {/ ^0 c, k: m
DRAWTEXT(环境16=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱，没有参加代价。''),COLORFFFFFF;+ K8 L" D* w/ G0 B: g* P
DRAWTEXT(大盘1 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌，最佳买点，否则审慎参与。''),COLOR00FF00;7 R4 K+ t0 a2 M5 B, g
DRAWTEXT(大盘2 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强，量能不敷，若前一轮下跌，短线出场1/2，量能放大加仓。''),COLORFF00FF;
4 Z2 @# \2 X3 _, A! B' rDRAWTEXT(大盘3 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏，重仓者可以减去大部门仓位。''),COLORAAAAAA;
: I0 ^8 [ a4 B: ?DRAWTEXT(大盘4 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调解，注意风险，短线清仓观望。''),COLORFF0000;7 G; u3 A$ e+ D4 B
DRAWTEXT(大盘5 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势精良，量能理想，可以继续持有强势股。''),COLOR00FFFF;3 D( g2 P) L- e9 E. Z
DRAWTEXT(大盘6 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态精良，但量能稍显不敷，随时预备减仓''),COLOR00FF00;7 e8 m: _6 C+ v p
DRAWTEXT(大盘7 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明，注意成交量变革，现在不相宜出场。''),COLORFFFFFF;
, K2 x8 M) P$ P/ y- S8 b+ cDRAWTEXT(大盘8 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下，量能萎缩，不恰当出场。''),COLORFFFFFF;& v. s z) T, C s" K9 {
DRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''［绿灯］实计生意业务量增长。MFI促进指数增长。''),COLORFFFFFF;- l; A ?3 I, J; y
DRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''［阑珊］实计生意业务量淘汰。MFI促进指数淘汰。''),COLORGREEN;
# x+ K5 t6 b- G2 b) G& O. R+ GDRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''［伪装］实计生意业务量淘汰。MFI促进指数增长。''),COLORGREEN;8 V8 l; X5 w6 I+ f, R
DRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''［蛰伏］实计生意业务量增长。MFI促进指数淘汰。''),COLORYELLOW;
3 y! E# t- N8 T! fDRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN;6 C) P, p9 C, D; B' c
DRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW;- n0 g6 M& C) a6 V
DRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40％以上;''),COLORGREEN;
4 X* A I$ J, V7 w- |6 a) _DRAWTEXT(M8 AND CURRBARSCO |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:07