|
一，为解盘照图把图文笔墨没置一下。
. }) T9 h* {" d" ?: l二，参数K有三种没置方式，缺省为0。k=0时配景变色，当图面k线周期多时k线7 m+ [" ^, B/ R- a7 s' l2 B( F6 m: r
有压缩征象。k=2时配景稳定色无压缩，但会失去表现强弱的配景自功变色。& p. v' _* H+ u) L+ W9 m3 S
三，k=2时只有熊样线以上的图面变色,无压缩。但要选择体系配景致共同才好
, Q* @4 C/ ?! L/ z 看。(我选的狩猎绿)
# w$ F; Q: M7 A' U1 L, g* b7 t [9 i- r. U
5 h; `. v7 I% W$ y* S
) V B! V: e; P0 x6 ?: c6 N
{阳光普照__TDX 参数K(0,2,0) 缺省为0}
2 g, c$ B2 T! x- s. O5 KTT:=240/FROMOPEN;
5 x8 R; q; f1 {/ e; V% D1 {" M比:=TT;/ G" `6 R- h9 C: y1 Y
促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;
+ I. g- i/ [& ?- f0 HAY2:=EMA(CLOSE,12)-EMA(CLOSE,26);
* s1 s! }9 c! |* o8 z1 g9 b2 J/ B& f6 gAZ2:=EMA(AY2,9);
7 m2 T" _& A" X! ]9 v! d) |LT2:=(AY2-AZ2);, y1 b5 o2 L& t: L
L211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;4 H) h- Y* r* [; J w( p
ZGD:=HHV(H,80)*0.99;
* s$ L5 w4 ~0 i8 E! B9 @ZGD2:=CONST(ZGD);9 U1 k/ D8 V. ~# K
ZDD:=LLV(L211,80);2 _' W5 l, Z1 Y: I+ X0 d7 C
ZDD2:=CONST(ZDD);$ J, `" C7 T0 b3 `
YYA4:=MA(CLOSE,20);
( C# M2 G+ V4 S G* a. o: S, v0 o0 yYYA5:=(CLOSE > MA(CLOSE,5));0 C7 N/ o+ L+ H3 G; r
YYA6:=(MA(CLOSE,5) > MA(CLOSE,10));; I, _; Y" E; k p! k
YYA7:=(CLOSE > MA(CLOSE,10));
- q' n g" \ F. e, N. Z7 W8 ^7 uYYA8:=(MA(CLOSE,5) > MA(CLOSE,20));
3 @/ o1 Z0 [6 H& fYYA9:=(CLOSE > MA(CLOSE,20));
7 m$ }* q# L2 S- M1 f' ^, K3 wYYA10:=REF(YYA4,1);
: c, h4 [4 ?. L, q; |$ Y$ BYYA11:=(YYA4 > YYA10);
" p( D+ [% |/ |& Y2 F, SYYAVX:=(((((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)));& d8 w6 o% t. l" }& }
DSLX:=(CLOSE / INDEXC);6 l( v) Y0 \1 M
DSLX1:=MA(DSLX,5);
% X0 X" s$ a5 u+ ?5 C9 Y3 vDSLX2:=MA(DSLX,10);
% Q, A# B" X* a1 |2 uYYV1:=MA(VOL,5);6 x" n: Z# w. u+ h! [7 z* b' Y
YYV2:=MA(VOL,10);! ~# d) ^3 C& P' i @( O& @, K. v% f
J1:=CONST(IF( YYAVX > 0,200,100));
: c1 s c" A6 a3 aJ2:=CONST(IF( YYAVX > 0,00,100));
; S, ^% b) r | F7 BJ3:=CONST(IF( YYAVX > 0,100,100));8 ?. T3 J! ]% g, I) b4 Q
ZGD3:=IF(K=0,ZGD2,DRAWNULL);
! Y, }. h" S# a& IZDD3:=IF(K=0,ZDD2,DRAWNULL);8 w7 P8 _6 W9 g. m1 Q9 a
ZGD4:=IF(K=1,ZGD2,DRAWNULL);
2 M1 |# y+ X C: y% M牛背:=MA(C,21);7 j0 z" {( h* a0 [( B2 g* U
牛逼:=牛背+2*STD(C,21);
4 ^& Z( Z* ~ i2 P' A) i3 {熊样:=牛背-2*STD(C,21);
' J/ z2 {8 p* l7 B4 g牛背2:=IF(C>牛背,牛背,DRAWNULL);
4 Q4 U; Q9 U8 ?熊样2:=IF(C>牛背,熊样,DRAWNULL);
1 _# K# z( y4 ~1 n, ZDRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);
1 E+ W5 [/ ]/ I$ o- N3 ~3 h0 ODRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);
j2 F$ i8 o) A8 x0 u7 x% ]DRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));/ f+ a% M: U" G
牛缰绳:MA(CLOSE,4);
* _" t; s9 t9 J* r3 j5 L( q" L牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;
. X1 u# b+ I' B) I1 s! b牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;
! U* Y/ b/ J9 X' w( U% Q2 H9 M牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;
( E! ^: o7 s6 F! PAY:=EMA(CLOSE,12)-EMA(CLOSE,26);
* m* i% L; G- L) y7 G4 \4 Y# i% JAZ:=EMA(AY,9);. H/ Y& ?4 w2 T/ p* Q. M( G# ~% ^* G
LT:=(AY-AZ);0 }3 X& ^. \* s0 R( T; |
L21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;3 o4 b0 l% ~9 W: ^) y; {
IF(LT,LLV(L,21),DRAWNULL),COLORFFFF00;# G7 ?2 v1 l* U/ n( R
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;
& u: `& [4 |6 O/ C) HSTICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;8 S, U8 w7 f! }7 f8 |% J- e4 d0 [9 z
STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;2 M, w# _; L* G' `' o1 R' C. c# v
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
; Y5 z. C4 `# J( L9 k+ q/ D7 kSTICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE = DSLX1)),1,0));
, u7 D* e9 ^- l0 h: I% _环境2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
, {6 `+ F5 J# l. e& \. L# N环境3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));( d+ m! p2 V" D7 f$ M& v$ A
环境4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 = YYV2)) AND (DSLX >= DSLX1)),1,0));+ t1 z4 Z" b+ p5 P' K/ w- \
环境6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));. k* v4 x' ]2 {, @& Q
环境7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));' r! j2 |1 ]; P3 [2 ]* b
环境8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
; S5 ^1 |- ^% p8 }$ ?+ ]0 |环境9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));, u8 t/ S; m0 }5 C4 U! ?
环境10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));2 D- t) O7 E' D" Y# Q4 u, c5 V
环境11:CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW;
& x. X6 r. r1 Q9 j1 g4 g环境12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));% r+ |- K1 ~! x
环境13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
! }6 R! V, ^" e+ L环境14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));; B+ {5 ^9 f# y i/ c
环境15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));5 u- K6 G/ z3 r5 l0 N9 V5 |
环境16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));' z2 C5 \" }9 o; F! E1 ^
大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0));
4 d8 }' J3 q; q1 _大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));8 O9 E2 h7 z+ U/ i% l
大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));% n" t) q$ a6 K9 N4 w& c( I
大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));+ I9 j) o5 N4 i/ \. @
大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));1 S8 L; M0 n! s2 V- k
大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));
! {% L- D5 M0 W( Z$ k: n" [6 |" M大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0));
: f5 X3 L. g# ` T大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));& S) S& R9 h7 ~9 z- Y7 a
* o1 ^" P) v# q4 u1 L
WJ:=(H+L+C)/3;- T; T' J5 U. S/ [
V1:=IF(H=L,1,H-MAX(O,C));
7 N# j! }( q* J$ r D' x5 `6 }V2:=IF(H=L,1,MAX(C,O)-WJ);
6 a. @* w) u; Y* y7 |) NV3:=IF(H=L,1,MIN(O,C)-L);
4 e R" S# }- B7 j0 W3 R9 MV4:=IF(H=L,1,WJ-MIN(C,O));& H7 M- j8 f/ b6 @. E, S
V5:=VOL/IF(H=L,4,H-L);8 v# B# X' B$ s+ ^# i2 D. q& f
V6:=(V1*V5);+ J: A$ W j. H7 r4 d7 Z: U
V7:=(V2*V5);
& P& a* D( M5 u6 aV8:=(V3*V5);
4 W% H3 N4 j2 f3 t3 aV9:=(V4*V5);. w9 c$ p3 z9 x! e
买盘1:=DYNAINFO(23)*比;7 w, E" @" y+ v, B
卖盘1:=DYNAINFO(22)*比;" f2 [0 R. n# W2 }% \
买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));
4 R( t; m& c! _; b2 u D卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));
" t7 s/ A- z9 Z/ w7 p9 H& ]买盘:=IF(ISLASTBAR AND PERIOD=5 AND C=REF(VOL,1);
* f" g0 C2 o8 U7 wM1:=CONST(绿灯);
) m$ C4 Z# p& m e阑珊:=MFI1.5;+ y3 Q) c7 j, @2 F. w" \! [( O- q5 E
M6:=CONST(量缩);
" c) L6 Z% f5 ~) p卖量大:=(卖盘-买盘)/买盘>0.4;' {( q2 c/ q0 z7 M5 ^: a, x
M7:=CONST(卖量大);
% G# ?( R9 P7 |买量大:=(买盘-卖盘)/卖盘>0.4;
" f" }% T) _) Q* i! w9 hM8:=CONST(买量大);
8 c# O7 V' x) B* f& TTS1:=IF(M1=1,0.03+0.03,0.03);
: F" b+ f( B# P. S6 I6 |+ O+ ` Q' t5 ?& RTS2:=IF(M2=1,TS1+0.03,TS1);3 O8 s* L- E5 B: u9 N- P5 S' h! a
TS3:=IF(M3=1,TS2+0.03,TS2);( F7 d( X" k) V. w, M& a
TS4:=IF(M4=1,TS3+0.03,TS3);; U9 A) A+ N h& T2 T. O! {9 h; h: {
TS5:=IF(M5=1,TS4+0.03,TS4);
% s* N1 ^8 I$ G7 z8 B8 C. w# hTS6:=IF(M6=1,TS5+0.03,TS5);
5 t/ e4 R! H/ y1 j0 k1 k' ITS7:=IF(M7=1,TS6+0.03,TS6);
+ o+ E& G W1 Z) |1 v) ZTS8:=IF(M8=1,TS7+0.03,TS7);' Z8 G" k3 O! a
4 I C5 b1 t+ P7 b w2 t' xDRAWTEXT(环境1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,显着走强,中线参加，仓位在2/3左右''),COLORFF00FF;' ^' H6 \" I. m, x5 ?
DRAWTEXT(环境2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不敷，短线出场，仓位在1/2左右''),COLORFF00FF;
; ^* P/ Q, i+ A/ Y5 wDRAWTEXT(环境3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价精良，并没有显着走强，短线出场，仓位1/2左右。''),COLORFF00FF;# c6 Q# R3 c7 v) y% i- v
DRAWTEXT(环境4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可，量能不敷，未完全走强,短线参加，仓位1/3左右。''),COLORFF00FF;
% g" W5 t1 B) h# f$ tDRAWTEXT(环境5=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏，走势尚可，重仓减泰半，清仓者观望。''),COLORFF0000;
" Y8 u& B6 h+ [: b" o+ SDRAWTEXT(环境6=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌，显着缩量走势，思量大盘风险，减持或清仓。''),COLORFF0000;! V* S/ u+ T, [. n& k$ |0 ]
DRAWTEXT(环境7=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌，走势显着偏弱，离场观望。''),COLORFF0000;
8 c9 `9 [# a" R; ^" lDRAWTEXT(环境8=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌，走势偏弱，离场观望。''),COLORFFFF00;
7 ^( G9 v7 q& fDRAWTEXT(环境9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态精良，强势显着，量能富足，可以继续持有。''),COLOR00FFFF;
/ Z+ w$ t! V5 w) ^1 u" h! BDRAWTEXT(环境10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势稳定，强势依然，但量能开始转弱，注意风险''),COLOR00FFFF;# b, r' I( ?; e1 |! `1 l& _. q! _
DRAWTEXT(环境11=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力，但股性偏弱，可思量减仓。''),COLORFFFFFF;* V P; X* D1 ^) L, i
DRAWTEXT(环境12=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱，量能不敷，减持大部门筹码''),COLORFFFF00;
6 p% u% j0 A! ]: H1 ]: o5 JDRAWTEXT(环境13=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳，注意成交量的变革，但现在不恰当参加。''),COLORFFFF00;% q |7 N) R+ i7 u+ h
DRAWTEXT(环境14=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明，股价偏弱，注意量能变革，现在不宜参加。''),COLORFFFF00;, B2 K1 I7 D7 ?1 Y; `
DRAWTEXT(环境15=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象，但量能不敷，趋势不明，不恰当操纵''),COLORFFFF00;
: e% Z G, h- c4 X& D& S7 Z2 eDRAWTEXT(环境16=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱，没有参加代价。''),COLORFFFFFF;
, \, g9 `7 `: ]6 Q0 y0 H1 }DRAWTEXT(大盘1 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌，最佳买点，否则审慎参与。''),COLOR00FF00;5 w) j' S+ S4 b6 w& H! b3 ~
DRAWTEXT(大盘2 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强，量能不敷，若前一轮下跌，短线出场1/2，量能放大加仓。''),COLORFF00FF;+ M6 J* n: w; }" K0 Y; j. v
DRAWTEXT(大盘3 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏，重仓者可以减去大部门仓位。''),COLORAAAAAA;3 ~( Q- k4 [4 R' c# W8 H; B( c
DRAWTEXT(大盘4 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调解，注意风险，短线清仓观望。''),COLORFF0000;0 t- Q* ]/ P: R2 V. P- g. O1 t
DRAWTEXT(大盘5 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势精良，量能理想，可以继续持有强势股。''),COLOR00FFFF;
1 }, Y3 |% N' g1 dDRAWTEXT(大盘6 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态精良，但量能稍显不敷，随时预备减仓''),COLOR00FF00;' Q+ P/ q3 n/ m
DRAWTEXT(大盘7 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明，注意成交量变革，现在不相宜出场。''),COLORFFFFFF;
$ [! g3 `# \! ~$ O- I" X$ j, V" j2 n% yDRAWTEXT(大盘8 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下，量能萎缩，不恰当出场。''),COLORFFFFFF;( e! U$ H l0 \, Y X
DRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''［绿灯］实计生意业务量增长。MFI促进指数增长。''),COLORFFFFFF;
4 y7 a' u9 A: S0 k7 J2 [6 HDRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''［阑珊］实计生意业务量淘汰。MFI促进指数淘汰。''),COLORGREEN;
! U) \4 g0 \7 V1 _DRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''［伪装］实计生意业务量淘汰。MFI促进指数增长。''),COLORGREEN;
( i. p* r! ^* u) W' Y% u0 TDRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''［蛰伏］实计生意业务量增长。MFI促进指数淘汰。''),COLORYELLOW;
}8 X( j5 j3 w0 p: I, ?, V% KDRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN;
1 p# m3 o' ?- X" Y. [7 |$ }DRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW;
1 R7 F" D; W, \' s8 r2 h; H; C) PDRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40％以上;''),COLORGREEN;( u2 h% F. o: k/ H, e
DRAWTEXT(M8 AND CURRBARSCO |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:07