|
一，为解盘照图把图文笔墨没置一下。
9 U! m* j" Q3 N: O! _二，参数K有三种没置方式，缺省为0。k=0时配景变色，当图面k线周期多时k线( I9 u3 e9 h& e) |
有压缩征象。k=2时配景稳定色无压缩，但会失去表现强弱的配景自功变色。
3 s7 \* O5 v. P% c4 d/ D) u% v- C三，k=2时只有熊样线以上的图面变色,无压缩。但要选择体系配景致共同才好
- \! R$ l* _3 l 看。(我选的狩猎绿)
* u" E6 W0 t4 u8 C, B- ~7 Q; h
+ C# x \ C0 G1 ]* x( {6 V " e0 C7 }* x7 Z$ v) h* J6 D
6 H' c& v& q0 W
{阳光普照__TDX 参数K(0,2,0) 缺省为0}' t: E7 E' D p1 t
TT:=240/FROMOPEN;' A$ {2 Q1 D+ {5 g9 E7 k. |3 c+ J" q% q
比:=TT;
9 _- J3 y1 N! L% N$ k5 S' K促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED; h) J Z/ F" M, E
AY2:=EMA(CLOSE,12)-EMA(CLOSE,26);6 e0 o" d2 w8 p9 M
AZ2:=EMA(AY2,9);
7 e: Y0 i+ T4 @6 B% e" fLT2:=(AY2-AZ2);9 s4 s! x% ?. D2 V
L211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
+ k7 j- j/ ?# o; T: CZGD:=HHV(H,80)*0.99;
7 }1 m" ^) \7 R5 b3 xZGD2:=CONST(ZGD);6 ~" l: P# I0 t9 M
ZDD:=LLV(L211,80);
' Z7 k4 V2 d6 CZDD2:=CONST(ZDD);0 Q9 ?1 w8 l1 ^. z. _, u* O4 W
YYA4:=MA(CLOSE,20);
9 u( C% \7 `0 y% ^% `YYA5:=(CLOSE > MA(CLOSE,5));% ^6 X* T6 b! z$ g5 R
YYA6:=(MA(CLOSE,5) > MA(CLOSE,10));
8 A% `' t$ t) n5 u. P2 Q5 NYYA7:=(CLOSE > MA(CLOSE,10));
+ _! J$ y8 Z- w ~% tYYA8:=(MA(CLOSE,5) > MA(CLOSE,20));, p! s% w+ }! j6 b t6 q! |
YYA9:=(CLOSE > MA(CLOSE,20));
5 k) Q w7 L8 @5 E. q$ t$ }YYA10:=REF(YYA4,1);3 M! }+ T) W; d3 r) R) u
YYA11:=(YYA4 > YYA10);. k, d. `3 Z, A+ Z& Y. o
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)));
' J2 r5 e7 N- o; S% |DSLX:=(CLOSE / INDEXC);
% S% ~% V8 N8 c. |. EDSLX1:=MA(DSLX,5);
4 X* M' l D% ?5 F9 sDSLX2:=MA(DSLX,10);
$ k' g* {' f8 D" }# E, ]8 wYYV1:=MA(VOL,5);( F. y. E0 v: W& j& p U0 E' Y
YYV2:=MA(VOL,10);
e, _8 J; F/ L, E/ G* b% B6 X" aJ1:=CONST(IF( YYAVX > 0,200,100));
, g; a$ j9 C9 P w9 S0 S$ L! d, h* MJ2:=CONST(IF( YYAVX > 0,00,100));( m! F* c h* H! H c% n# ~8 S
J3:=CONST(IF( YYAVX > 0,100,100));# [; E1 G9 `! S5 h
ZGD3:=IF(K=0,ZGD2,DRAWNULL);" @( o3 V- b; Y% u1 Q4 S* I
ZDD3:=IF(K=0,ZDD2,DRAWNULL);- t5 L" l# H$ x3 V% d* K3 m2 I
ZGD4:=IF(K=1,ZGD2,DRAWNULL);6 g7 O7 ]8 F8 I8 }0 g- k
牛背:=MA(C,21);. c) k' X) @& N* G; Z. q. q# K" Z) j
牛逼:=牛背+2*STD(C,21);
% l: m( F+ M& Q熊样:=牛背-2*STD(C,21);
, X! j; a- H3 s$ K" p' j牛背2:=IF(C>牛背,牛背,DRAWNULL);
' e2 w$ Q! J* h3 S. N熊样2:=IF(C>牛背,熊样,DRAWNULL);% \/ m# \( F+ z; A7 Z, s
DRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);
" r1 f% c& [8 c0 ]" w. M! o4 y! qDRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);8 ]* m4 A' u5 w$ r. H$ C
DRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));2 D1 j: K% X6 s3 E, a" R. a
牛缰绳:MA(CLOSE,4);2 @' o0 b4 H6 s7 f, j
牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;
: I, l* Q9 t: } d( U牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;
" ~! w* K# d# }* \' g牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;
4 j1 f# h( L2 z4 [AY:=EMA(CLOSE,12)-EMA(CLOSE,26);
8 N2 e+ _% u7 R/ K7 f* M% b pAZ:=EMA(AY,9);$ x6 Z/ x) Z% {: N3 ^% W
LT:=(AY-AZ);" ?; H' ]7 \2 F0 D( r3 X
L21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
. E& i6 O! G0 r2 d( _! WIF(LT,LLV(L,21),DRAWNULL),COLORFFFF00;8 O9 _; L3 T% f' e
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;* C% y- I; `2 O% C* u6 k) ~- D9 a
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
1 p; @- h0 ?" p5 iSTICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;8 e+ v9 D$ W4 [2 q# {+ y: Z( z
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
6 j/ K y: F2 s4 b# @STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE = DSLX1)),1,0));7 e. R5 s2 Z7 i; {. Y* _9 W2 f6 s r1 g
环境2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
7 L/ ^: x( S" p环境3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));
9 H4 g; z- ], V" Q3 W: ^; v环境4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 = YYV2)) AND (DSLX >= DSLX1)),1,0));1 A3 p Q3 ]. Z3 \8 C3 o
环境6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
! [& q1 R. K# s6 `6 v! F5 h7 H环境7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));+ p/ i z$ I: P% ]/ o6 T6 Y: [, A
环境8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));& K6 c' O. r# w8 b
环境9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
1 \: s" S. G$ R5 x环境10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));+ e/ C& ]& A9 X# G, C
环境11:CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW;
) e& X$ f, @. `& i5 { O环境12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
6 ?- j' |4 w h8 y环境13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
5 D8 \0 c% l* S" H/ a0 [& v* Q环境14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
! p$ T7 X+ i& |; Z: d环境15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));# C6 M" H) S( ?+ m0 Z# p$ H
环境16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));$ f' a3 j' x) u$ V. V6 J7 }' j
大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0));, B2 y' S z# m3 ?. `! v& a0 L$ C
大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));! _* g* v$ K1 A. p& T4 l
大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));
( S- R E2 m, s5 R' W1 z3 x大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));
3 P& E" ]. h' Q: v6 Z0 M% l3 k/ G大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));6 E. Z$ G2 c9 S0 i6 Z! m3 x V
大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));
- f7 C9 ]. n: W! ?6 X- B4 k& T大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0));
# L6 @2 \) v, B7 u1 a$ y/ i! a |. W大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));
2 K8 A2 i' _( z
4 P# [9 V% X" N& o* ]& zWJ:=(H+L+C)/3;' m' }# v( H# J1 F6 @, O5 X
V1:=IF(H=L,1,H-MAX(O,C));
* `* S$ a5 x @V2:=IF(H=L,1,MAX(C,O)-WJ);
# N" E1 N: ~, i6 V/ J7 u! jV3:=IF(H=L,1,MIN(O,C)-L);
3 J! R% q8 J5 h- X/ }V4:=IF(H=L,1,WJ-MIN(C,O));6 ?, c# G1 Z" U4 j
V5:=VOL/IF(H=L,4,H-L);) o' q6 }# r0 s4 i1 K" }8 o
V6:=(V1*V5);
: w$ j* p% O9 DV7:=(V2*V5);' `6 M! l H" B3 J! d; m
V8:=(V3*V5);
3 |; B/ i' u9 U+ a; t% ~ \5 {V9:=(V4*V5);
9 R0 G4 x. B2 k" D Y! _买盘1:=DYNAINFO(23)*比;9 g0 Q, o* [ D' s3 I* ], i
卖盘1:=DYNAINFO(22)*比;' z$ E: X( I7 \% w4 d H+ q1 N
买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));
! T. d1 @5 }( I H+ J# v. S; k卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));) |" r5 M8 n Z
买盘:=IF(ISLASTBAR AND PERIOD=5 AND C=REF(VOL,1);3 x. P7 |% T. r& h& ?% P, a
M1:=CONST(绿灯);
7 K3 }# M& i. S阑珊:=MFI1.5;
8 N7 k# U% [9 W! {; G7 x& Y5 D) ]7 OM6:=CONST(量缩);
5 V3 ^1 o( Q& F卖量大:=(卖盘-买盘)/买盘>0.4;
8 T: c( s- [' {M7:=CONST(卖量大);
/ v' F( B G+ n买量大:=(买盘-卖盘)/卖盘>0.4;
3 c- {7 W$ F9 \- V; A3 f7 lM8:=CONST(买量大);
* d4 D; c! ~3 ^TS1:=IF(M1=1,0.03+0.03,0.03);! f6 \. k) F! x- z) G3 L7 w
TS2:=IF(M2=1,TS1+0.03,TS1);
; p! F0 T' V& \& |4 c5 STS3:=IF(M3=1,TS2+0.03,TS2);
7 G/ [3 E0 b( w* {8 m$ @TS4:=IF(M4=1,TS3+0.03,TS3);: t& f) a Z! T5 `+ E) I
TS5:=IF(M5=1,TS4+0.03,TS4);# Y! c+ j. }/ V. y- {+ j4 ^
TS6:=IF(M6=1,TS5+0.03,TS5);+ T- y( D) u3 F* k# G
TS7:=IF(M7=1,TS6+0.03,TS6);
; S. g `6 x& {2 eTS8:=IF(M8=1,TS7+0.03,TS7);
4 H$ ]/ c: d/ z. O( V2 @/ O0 y# i" F. J
DRAWTEXT(环境1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,显着走强,中线参加，仓位在2/3左右''),COLORFF00FF;
' g) O+ N, P, u3 zDRAWTEXT(环境2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不敷，短线出场，仓位在1/2左右''),COLORFF00FF;
6 o8 p P. |" \' b3 N$ p9 o- aDRAWTEXT(环境3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价精良，并没有显着走强，短线出场，仓位1/2左右。''),COLORFF00FF;
. r* H! r0 N0 B9 b. N; jDRAWTEXT(环境4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可，量能不敷，未完全走强,短线参加，仓位1/3左右。''),COLORFF00FF;% ?2 S2 e1 l7 g+ t: @, w
DRAWTEXT(环境5=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏，走势尚可，重仓减泰半，清仓者观望。''),COLORFF0000;3 _. ?$ W% p* [4 Y+ r
DRAWTEXT(环境6=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌，显着缩量走势，思量大盘风险，减持或清仓。''),COLORFF0000;
% @ W4 O% `* K+ t- ]$ @9 ]! HDRAWTEXT(环境7=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌，走势显着偏弱，离场观望。''),COLORFF0000;
+ L4 ?# x' Z& A4 q: c/ q0 _, fDRAWTEXT(环境8=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌，走势偏弱，离场观望。''),COLORFFFF00;' `5 P% X E3 z$ j% D3 E
DRAWTEXT(环境9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态精良，强势显着，量能富足，可以继续持有。''),COLOR00FFFF;* T! g/ y6 u2 s! \
DRAWTEXT(环境10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势稳定，强势依然，但量能开始转弱，注意风险''),COLOR00FFFF;9 v; ?( F9 x, K8 M# Y
DRAWTEXT(环境11=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力，但股性偏弱，可思量减仓。''),COLORFFFFFF;
) E5 A/ Q# @: Q7 SDRAWTEXT(环境12=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱，量能不敷，减持大部门筹码''),COLORFFFF00;
, U! G. p2 }6 c! {/ J2 y" l+ VDRAWTEXT(环境13=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳，注意成交量的变革，但现在不恰当参加。''),COLORFFFF00;
; j/ L1 @# H$ K* P+ GDRAWTEXT(环境14=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明，股价偏弱，注意量能变革，现在不宜参加。''),COLORFFFF00;
2 d# x' M1 b; M) S2 k HDRAWTEXT(环境15=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象，但量能不敷，趋势不明，不恰当操纵''),COLORFFFF00;, X4 D$ A$ }9 F: @8 {( h
DRAWTEXT(环境16=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱，没有参加代价。''),COLORFFFFFF;7 \, F5 s3 J3 I
DRAWTEXT(大盘1 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌，最佳买点，否则审慎参与。''),COLOR00FF00;
$ S& [+ x* }0 jDRAWTEXT(大盘2 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强，量能不敷，若前一轮下跌，短线出场1/2，量能放大加仓。''),COLORFF00FF;
+ f9 |1 [7 [5 D8 |% JDRAWTEXT(大盘3 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏，重仓者可以减去大部门仓位。''),COLORAAAAAA;& X' f3 p" H. q: w7 l# o
DRAWTEXT(大盘4 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调解，注意风险，短线清仓观望。''),COLORFF0000;
5 a; s) M: m6 C! y3 q! h4 XDRAWTEXT(大盘5 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势精良，量能理想，可以继续持有强势股。''),COLOR00FFFF; f7 ]* K: O5 k \* f0 E! s; |% Z: I
DRAWTEXT(大盘6 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态精良，但量能稍显不敷，随时预备减仓''),COLOR00FF00;
$ P. @( o' W2 aDRAWTEXT(大盘7 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明，注意成交量变革，现在不相宜出场。''),COLORFFFFFF;% \. E4 Y& ]' s7 C
DRAWTEXT(大盘8 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下，量能萎缩，不恰当出场。''),COLORFFFFFF;
- m; h7 T: W% p* Z3 m wDRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''［绿灯］实计生意业务量增长。MFI促进指数增长。''),COLORFFFFFF;- I% h* N# b @+ j0 z4 M
DRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''［阑珊］实计生意业务量淘汰。MFI促进指数淘汰。''),COLORGREEN;/ v8 x) n# G6 i) Q$ V4 q7 s
DRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''［伪装］实计生意业务量淘汰。MFI促进指数增长。''),COLORGREEN;3 g" O3 b S! @- D/ m
DRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''［蛰伏］实计生意业务量增长。MFI促进指数淘汰。''),COLORYELLOW;' f: @! _, t7 j8 J/ r( h
DRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN;
2 m! D2 _& k0 X3 u7 cDRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW;4 [. q% v) Z& |) w% p7 [6 j& j
DRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40％以上;''),COLORGREEN;
! J8 U* A/ S' t4 o: QDRAWTEXT(M8 AND CURRBARSCO |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:07