|
一，为解盘照图把图文笔墨没置一下。) F1 p* p: i2 I' N6 ?# @4 q7 h. x
二，参数K有三种没置方式，缺省为0。k=0时配景变色，当图面k线周期多时k线& a, k& a3 R r6 k
有压缩征象。k=2时配景稳定色无压缩，但会失去表现强弱的配景自功变色。
) Q, \" _- G; R Q9 d p! K. e- g9 X9 `三，k=2时只有熊样线以上的图面变色,无压缩。但要选择体系配景致共同才好6 C0 S- ]& t# |4 p) O4 d
看。(我选的狩猎绿)% Z( v& R/ H& M- z5 ~
8 F' j5 b6 \( F/ F5 @( E
1 _6 ]; I9 a+ x3 [
$ O9 p) m, H; d2 |/ {7 k% r{阳光普照__TDX 参数K(0,2,0) 缺省为0}
+ d, i& ^& Y0 k" U( D( MTT:=240/FROMOPEN;
% P" |; _& f1 S比:=TT;
1 \5 [8 d1 W; v/ y7 x促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;" _( \+ B; ?+ A) \4 L; |
AY2:=EMA(CLOSE,12)-EMA(CLOSE,26);
6 K' q+ e: X, b' `AZ2:=EMA(AY2,9);
) h6 s6 N3 g! A( \7 J/ E6 zLT2:=(AY2-AZ2);
7 p( a; x9 f- S2 P2 i- HL211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
5 ?* P, K+ H3 AZGD:=HHV(H,80)*0.99;0 Y, g: D2 |) q& } D8 w _" x2 R1 p5 i. e
ZGD2:=CONST(ZGD);0 F) S1 C+ d% O/ B( v2 P' O! Y. z
ZDD:=LLV(L211,80);. T; d+ ~4 ?: |) I
ZDD2:=CONST(ZDD);
( O* e' [, m" Z( ]YYA4:=MA(CLOSE,20);
5 ~1 P9 v$ h5 g/ CYYA5:=(CLOSE > MA(CLOSE,5));5 j" p# a3 M+ }- j
YYA6:=(MA(CLOSE,5) > MA(CLOSE,10));. J# G7 W% c# B% b$ b
YYA7:=(CLOSE > MA(CLOSE,10));
( J9 l8 d. T$ E! t8 s3 yYYA8:=(MA(CLOSE,5) > MA(CLOSE,20));
9 X* H4 Q: n9 }2 x# J) dYYA9:=(CLOSE > MA(CLOSE,20));
7 V) t' i! r% j' n- s1 DYYA10:=REF(YYA4,1);
v- M$ p7 O5 `9 V5 f! YYYA11:=(YYA4 > YYA10);
, H) }& M+ U8 Q" cYYAVX:=(((((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)));% v! E$ J; W8 c) A
DSLX:=(CLOSE / INDEXC);$ `' o E) X1 U: M+ o2 e" Y
DSLX1:=MA(DSLX,5);
, H: x. Y) F3 g* UDSLX2:=MA(DSLX,10);
) _& T: X4 T4 F; @5 G; q3 K( OYYV1:=MA(VOL,5);$ h$ I1 P0 i e7 g4 v
YYV2:=MA(VOL,10);
! r% b6 O3 L+ ^. i/ qJ1:=CONST(IF( YYAVX > 0,200,100));6 g$ [: B6 u; I1 O" }6 y( O$ M
J2:=CONST(IF( YYAVX > 0,00,100));! X+ i4 Y8 N( d+ l! K" _
J3:=CONST(IF( YYAVX > 0,100,100));
( L8 R, L( Q$ j* L1 t. UZGD3:=IF(K=0,ZGD2,DRAWNULL);
3 o9 }" m6 q' `- v, xZDD3:=IF(K=0,ZDD2,DRAWNULL);0 E# O+ X! T, a; s
ZGD4:=IF(K=1,ZGD2,DRAWNULL);6 Q) V( c& ]4 f9 \
牛背:=MA(C,21);8 n r/ C4 X! r8 y. K+ u3 ~
牛逼:=牛背+2*STD(C,21);- w2 |0 N# V8 ?, s( p* @
熊样:=牛背-2*STD(C,21);; b+ h( [0 a# `& n
牛背2:=IF(C>牛背,牛背,DRAWNULL);
! D ?7 K l: Z% g熊样2:=IF(C>牛背,熊样,DRAWNULL);
) D$ P6 S5 {7 `: C2 q) u& PDRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);
1 M) }; z- j" i* c1 G% X% XDRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);
+ V, \5 G$ r$ R1 W0 b& yDRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));
& I8 z7 B6 V% c$ l$ F# j6 c牛缰绳:MA(CLOSE,4);
$ a1 h- J5 Y- a; C- Z0 ?; ^牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;
' k6 i% H. k! H. H牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;/ i% a# A9 ~/ \* b1 H+ u6 m
牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;
0 @0 P" q$ ?0 vAY:=EMA(CLOSE,12)-EMA(CLOSE,26);
% x( t* R+ q" w$ a2 y3 |AZ:=EMA(AY,9);
$ \7 C" [. a6 ~) d; U% hLT:=(AY-AZ);. c) Q4 C: n* N1 O# C: R5 d W& y
L21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;( r4 V8 {1 }9 K0 [
IF(LT,LLV(L,21),DRAWNULL),COLORFFFF00;) w6 y& ~+ y" W1 z
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;2 u9 z: y- ^& V, r' m1 |# u( P
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
3 U+ K& h8 m: l: HSTICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;$ E/ |! h) l- L, q2 _: J
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
* {' s! s4 k: y1 O' ZSTICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE = DSLX1)),1,0));; Y+ L1 K. P; n
环境2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));8 e* Y# w& m0 s" r0 H
环境3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));
5 { A1 F1 U/ V8 T7 W8 L环境4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 = YYV2)) AND (DSLX >= DSLX1)),1,0));$ O8 j# e5 \/ D1 e0 a/ T
环境6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));- T1 K4 o/ L* B7 m) |0 T# \
环境7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));2 O& y" G, [1 r0 _$ |9 b& h9 P% O
环境8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
! n) M) k% s6 A! Y4 `# K- }6 ~环境9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));; ^* @- O7 b( z9 a, J$ H+ f5 d
环境10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
1 `8 @, I; t, p环境11:CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW;
' \" y* R" H2 ~, x+ J K环境12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));( I2 a. @/ l/ N2 y4 w3 L( W; D
环境13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));. R Y3 ]/ q3 W
环境14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
- `5 S q! i0 Y环境15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));' d: t9 f: |1 r e7 y2 d, s
环境16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0)); Q$ `* \2 f, u6 P
大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0));7 u5 ]& \- O4 }7 C: e( B
大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));
# P: `, y& `/ m0 `8 Y7 X大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));( s- ]4 F$ U2 S) K
大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));$ y i0 R8 z2 ^! R
大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));% f& x6 T1 E, g$ [" d! L8 C
大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));2 r% L. b4 y! m" T
大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0));3 U- a. b9 B7 q% G7 |
大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));, o! }0 x; ~4 P; w( t
) J( @% l+ s9 |9 ~, m
WJ:=(H+L+C)/3;0 g9 ]# U* @0 D* D
V1:=IF(H=L,1,H-MAX(O,C));7 o ?+ j) n$ E( b
V2:=IF(H=L,1,MAX(C,O)-WJ);+ g: H4 C" v3 f2 }) E" u2 V0 b$ k
V3:=IF(H=L,1,MIN(O,C)-L);0 d6 W4 r7 q8 m3 B! t
V4:=IF(H=L,1,WJ-MIN(C,O));
) w3 f4 ~; O' W5 a% @3 JV5:=VOL/IF(H=L,4,H-L);+ L, _ H+ B1 U. ^
V6:=(V1*V5);4 t& G% }/ D& P8 A/ f$ ~: \) p
V7:=(V2*V5);$ c, Q* H; k2 L O# t: l3 i
V8:=(V3*V5);/ e% a3 N- c, n, i# B( O
V9:=(V4*V5);8 a# p& l2 D3 P
买盘1:=DYNAINFO(23)*比;
/ v* c; Z8 m/ h2 i卖盘1:=DYNAINFO(22)*比;* T. a9 X3 i0 _- }$ I& {" w
买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));' E* u+ b8 ~( l
卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));
, j {- [, p' z) Q+ I/ E买盘:=IF(ISLASTBAR AND PERIOD=5 AND C=REF(VOL,1);3 D" K8 r& ?% _
M1:=CONST(绿灯);
9 b, N/ F* ~' x1 A+ y& M! Y阑珊:=MFI1.5;
4 S- \; B* I* s |- cM6:=CONST(量缩);
9 H# H( j; |9 L g2 ~4 z' p卖量大:=(卖盘-买盘)/买盘>0.4;
5 J7 ]! n# E0 E4 ^; C7 i( O* o% HM7:=CONST(卖量大);$ F% M! k/ |' z# J
买量大:=(买盘-卖盘)/卖盘>0.4;
' w2 }9 h) ~' j+ aM8:=CONST(买量大);- F. `0 a' Q3 L+ _: c6 t: d
TS1:=IF(M1=1,0.03+0.03,0.03);
; c0 G9 I6 p" O5 wTS2:=IF(M2=1,TS1+0.03,TS1);
: R" ] X d4 C( L$ aTS3:=IF(M3=1,TS2+0.03,TS2);
5 @; U1 _6 M) V3 a* q! STS4:=IF(M4=1,TS3+0.03,TS3); ?+ o6 o2 X: t! i4 z
TS5:=IF(M5=1,TS4+0.03,TS4);$ a8 t1 T! Z' n6 l8 R) h$ k9 ~. |: L
TS6:=IF(M6=1,TS5+0.03,TS5);
1 h' L1 ~+ g& V, D5 Q( Z7 wTS7:=IF(M7=1,TS6+0.03,TS6);# n6 |9 |: o! B! E& l' ^/ U# j
TS8:=IF(M8=1,TS7+0.03,TS7);
9 X5 I5 W; P- V) _) R$ s6 ?( s4 R4 X8 ~' |
DRAWTEXT(环境1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,显着走强,中线参加，仓位在2/3左右''),COLORFF00FF;5 |* _( y- q3 ~8 q2 }& p
DRAWTEXT(环境2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不敷，短线出场，仓位在1/2左右''),COLORFF00FF;* f6 x# e! F0 v
DRAWTEXT(环境3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价精良，并没有显着走强，短线出场，仓位1/2左右。''),COLORFF00FF;
1 ^8 P; i8 C4 X/ B" mDRAWTEXT(环境4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可，量能不敷，未完全走强,短线参加，仓位1/3左右。''),COLORFF00FF;1 q' ?7 v$ R; x) d
DRAWTEXT(环境5=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏，走势尚可，重仓减泰半，清仓者观望。''),COLORFF0000;8 P c5 l y; e
DRAWTEXT(环境6=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌，显着缩量走势，思量大盘风险，减持或清仓。''),COLORFF0000;0 x: ]" ~" o; h# q
DRAWTEXT(环境7=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌，走势显着偏弱，离场观望。''),COLORFF0000;. V @7 Z" u, {$ N2 R! n
DRAWTEXT(环境8=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌，走势偏弱，离场观望。''),COLORFFFF00;
9 K' O/ M9 S) g% K1 Z9 wDRAWTEXT(环境9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态精良，强势显着，量能富足，可以继续持有。''),COLOR00FFFF;- B( T: j1 ]( t% f5 W
DRAWTEXT(环境10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势稳定，强势依然，但量能开始转弱，注意风险''),COLOR00FFFF;
4 Y' y. e1 b- {- M' M4 H3 wDRAWTEXT(环境11=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力，但股性偏弱，可思量减仓。''),COLORFFFFFF;0 [) |3 c2 @/ X" s
DRAWTEXT(环境12=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱，量能不敷，减持大部门筹码''),COLORFFFF00;
0 k6 H- u# i$ d& i2 hDRAWTEXT(环境13=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳，注意成交量的变革，但现在不恰当参加。''),COLORFFFF00;) ^: R8 l. F- E: |1 w2 O
DRAWTEXT(环境14=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明，股价偏弱，注意量能变革，现在不宜参加。''),COLORFFFF00;' n% C/ D/ ~2 _2 |9 O8 `$ G0 q
DRAWTEXT(环境15=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象，但量能不敷，趋势不明，不恰当操纵''),COLORFFFF00;
; U. v) V5 k- _2 W- I' g3 |DRAWTEXT(环境16=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱，没有参加代价。''),COLORFFFFFF;9 [- V/ z% k7 R" H% [0 K' ?
DRAWTEXT(大盘1 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌，最佳买点，否则审慎参与。''),COLOR00FF00;2 R, w% A, m: _
DRAWTEXT(大盘2 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强，量能不敷，若前一轮下跌，短线出场1/2，量能放大加仓。''),COLORFF00FF;
! g( \+ H' T2 P( q) Y8 `( [ RDRAWTEXT(大盘3 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏，重仓者可以减去大部门仓位。''),COLORAAAAAA;0 M, N0 A& U! y8 L* y
DRAWTEXT(大盘4 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调解，注意风险，短线清仓观望。''),COLORFF0000;+ \1 B8 Q) F6 n* W% l) x) I
DRAWTEXT(大盘5 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势精良，量能理想，可以继续持有强势股。''),COLOR00FFFF;
) _9 \% I5 y/ a- B7 r$ XDRAWTEXT(大盘6 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态精良，但量能稍显不敷，随时预备减仓''),COLOR00FF00;
$ X3 g% ?3 Q; }( r. I# ?5 g2 jDRAWTEXT(大盘7 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明，注意成交量变革，现在不相宜出场。''),COLORFFFFFF;
8 b% o, D2 f% t# MDRAWTEXT(大盘8 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下，量能萎缩，不恰当出场。''),COLORFFFFFF;
B- X& J( m( `9 Z# S m: `6 z" vDRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''［绿灯］实计生意业务量增长。MFI促进指数增长。''),COLORFFFFFF;
# o( z2 d2 ?0 {8 h7 @DRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''［阑珊］实计生意业务量淘汰。MFI促进指数淘汰。''),COLORGREEN;
0 l8 f. } v9 x$ E# g0 EDRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''［伪装］实计生意业务量淘汰。MFI促进指数增长。''),COLORGREEN;
+ z$ S* L6 E3 ]/ ?DRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''［蛰伏］实计生意业务量增长。MFI促进指数淘汰。''),COLORYELLOW;
# ?) Z G' u* u1 {DRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN;
7 f- `, k6 ~# K; c6 e7 SDRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW;
# l2 h z, K4 D( S9 K( ODRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40％以上;''),COLORGREEN;5 c' m& @' \ w7 \, H, t4 U! @
DRAWTEXT(M8 AND CURRBARSCO |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:07