|
一，为解盘照图把图文笔墨没置一下。
/ N3 x d: [2 V/ M- H2 M二，参数K有三种没置方式，缺省为0。k=0时配景变色，当图面k线周期多时k线" p$ k+ u& x8 D+ Q9 R6 E; \ H& Q t
有压缩征象。k=2时配景稳定色无压缩，但会失去表现强弱的配景自功变色。# a8 J, O& W: h! D5 o; Y
三，k=2时只有熊样线以上的图面变色,无压缩。但要选择体系配景致共同才好# E% r" U- ~8 x$ c! i1 N
看。(我选的狩猎绿)$ z( Y# W8 I) I z, |& {5 b& h) M
1 @: X3 e) k. h2 q, F
! N- X4 ]. R0 S2 I: U. |
, O6 x" d- [+ ]: V{阳光普照__TDX 参数K(0,2,0) 缺省为0}! t) ?+ D3 Q0 P6 g, T
TT:=240/FROMOPEN;9 L8 ^7 R& U/ ~* l8 T
比:=TT;
$ R- O D, r# O" Q/ ~5 Z' v促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;( b# n* q* ?! [+ D0 c0 Z2 M
AY2:=EMA(CLOSE,12)-EMA(CLOSE,26);1 B: |/ z! Q7 Y: d. m# l( S8 j
AZ2:=EMA(AY2,9);
/ C6 o( H H. g \$ h) dLT2:=(AY2-AZ2);
8 O9 M, _! v; j" l v' p. k7 w JL211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
0 ^% }6 @; [. g8 a4 x. X% fZGD:=HHV(H,80)*0.99;8 m$ L. Y# F% s2 b
ZGD2:=CONST(ZGD);
; B" \. s& s b+ u8 GZDD:=LLV(L211,80);
1 C' ]2 `4 U/ p* Z- M+ w# E0 d. ?ZDD2:=CONST(ZDD);& S0 C2 N: o/ V: \8 [+ _
YYA4:=MA(CLOSE,20);
- g, N0 a7 G6 ]" I6 g2 _0 lYYA5:=(CLOSE > MA(CLOSE,5));
' i0 A9 ?7 e4 P6 tYYA6:=(MA(CLOSE,5) > MA(CLOSE,10));* W: B8 G; L: u
YYA7:=(CLOSE > MA(CLOSE,10));
E. ^* ]8 v: |, [7 DYYA8:=(MA(CLOSE,5) > MA(CLOSE,20));2 ^: U* Z- F( q8 D' Q' l0 A$ V
YYA9:=(CLOSE > MA(CLOSE,20));( j/ d( ~4 d4 \ J+ e! E' X
YYA10:=REF(YYA4,1);
; \! g4 i3 m! S- X2 j1 c. JYYA11:=(YYA4 > YYA10);
, R% T- r1 i2 X, t; tYYAVX:=(((((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)));' S7 H' R9 M9 v5 q9 b
DSLX:=(CLOSE / INDEXC);- n7 n0 q( _& q
DSLX1:=MA(DSLX,5);( K- A. h2 i1 |% m
DSLX2:=MA(DSLX,10);
" s6 W/ d& y O3 v7 s$ ]YYV1:=MA(VOL,5);
" r y6 u# ^3 _! vYYV2:=MA(VOL,10);& r: S& N( O, y; v
J1:=CONST(IF( YYAVX > 0,200,100));
7 D1 L+ o2 i% B4 T/ ^J2:=CONST(IF( YYAVX > 0,00,100));" w! I. U! L& L1 p" p. ^ G6 h
J3:=CONST(IF( YYAVX > 0,100,100));
; @6 a8 ~$ x- L( ?0 S1 MZGD3:=IF(K=0,ZGD2,DRAWNULL);
/ C8 `% h2 i6 O2 f0 FZDD3:=IF(K=0,ZDD2,DRAWNULL);; R& ?0 n' [- i6 S; f6 k* `$ p
ZGD4:=IF(K=1,ZGD2,DRAWNULL);/ _# ~6 ~5 {4 E& ?
牛背:=MA(C,21);
- f7 |: Q: k! N; {牛逼:=牛背+2*STD(C,21);
# q. K: Z9 m0 ?# R9 Q8 n% r熊样:=牛背-2*STD(C,21);: O- K2 Q/ E9 r9 @7 O
牛背2:=IF(C>牛背,牛背,DRAWNULL);
' B0 R5 q- H, J熊样2:=IF(C>牛背,熊样,DRAWNULL);3 H* @8 r! T% M5 A$ x) J; h
DRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);% c3 r/ j+ u% W3 ^" Q, `' ~
DRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);' c/ Q8 j; \% B$ Z# d; p
DRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));
0 W5 e2 t1 V) j" P) \! l, Q& B, @牛缰绳:MA(CLOSE,4);' a i+ }$ g* u# v# v& q+ A
牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;9 D7 A/ s9 Z9 l# Y2 p, N
牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;- D% Q5 V3 J( Q: W1 _2 P! H8 Q7 w
牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;
$ W+ p0 \7 |% R# B8 rAY:=EMA(CLOSE,12)-EMA(CLOSE,26);
1 N6 u9 {' `0 Z" GAZ:=EMA(AY,9);
, f; `* M4 b- DLT:=(AY-AZ);
0 S8 e- t4 I7 x/ J! W7 cL21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
5 W- V- `- N! ]) B, }8 uIF(LT,LLV(L,21),DRAWNULL),COLORFFFF00;1 g- T* Q. F& o9 m
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;
; H6 p% O* ]( fSTICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
1 K" e; r8 f8 gSTICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;
9 M% }* c) J4 j$ f* v1 L+ \STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;/ r m% U b0 x: e( {* R6 {
STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE = DSLX1)),1,0));; E' G/ A6 \+ k4 H4 Q
环境2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));4 s7 [! Q3 z0 ^8 H. {
环境3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));" b$ O/ L) C8 U$ X S/ E
环境4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 = YYV2)) AND (DSLX >= DSLX1)),1,0));
) P3 V v) F* ~9 ^2 C+ X环境6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));* `& d, R% g5 ~ [# @' d" R8 @% k
环境7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));$ K3 s; j0 p" A+ ~6 K
环境8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
4 y; |0 y% T# E& Y$ e环境9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
3 E7 k* G7 g2 D) l环境10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));& I# G3 z3 N; d$ x1 s$ _
环境11:CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW;$ u$ p' @: k0 v5 ]5 a
环境12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));+ _9 ~+ U; @0 i: X. C G
环境13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));6 S) g8 H* H2 A: \, F
环境14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));3 n. P! J3 r: f1 f
环境15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));8 g- V( `: N2 w) V. t5 R( l6 B0 A. l
环境16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));4 p) W* M9 c! @; e! J
大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0));
8 d9 `3 p- w5 }( r: m( t+ e% u6 R0 i大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));
* F7 I8 S4 q/ q大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));
; r6 b& p& a% F9 [/ Q大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));1 ^1 }" x# ]9 a- e
大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));" i7 Y# q6 h; i% P$ {4 W
大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));9 O, k7 X: v+ u8 [
大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0));8 X9 P R0 n9 o' D/ Q/ l
大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0)); z! B+ @) k ^6 D
/ j6 l, x7 \6 B; j$ d! ^6 ~
WJ:=(H+L+C)/3;
4 C2 B" K. {. jV1:=IF(H=L,1,H-MAX(O,C));
( U5 o3 e- v9 c! L/ \: TV2:=IF(H=L,1,MAX(C,O)-WJ);
# \) N$ E6 Y# R! a9 u! q0 wV3:=IF(H=L,1,MIN(O,C)-L);) c) v6 f, ]& P% o2 ~8 I0 q3 a/ f& |
V4:=IF(H=L,1,WJ-MIN(C,O));& h5 b4 c# M/ b- u! W/ [
V5:=VOL/IF(H=L,4,H-L);
' E, T' ?$ N" ~9 E) X: F9 f: I# QV6:=(V1*V5);% o% `: B% X7 ^ i( [
V7:=(V2*V5);7 d$ h$ p. \; D" t
V8:=(V3*V5);2 I4 h# P1 j+ z$ R+ l1 B" q
V9:=(V4*V5);0 \ @% i5 c6 G4 ]% \! ^8 e# g
买盘1:=DYNAINFO(23)*比;
; `; p4 o, u5 ?卖盘1:=DYNAINFO(22)*比;# D1 }3 A6 T4 G+ L
买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));
% J7 y; i, l3 i5 c# M* {9 q卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));* {9 U" e2 D9 _4 p/ o( {6 o
买盘:=IF(ISLASTBAR AND PERIOD=5 AND C=REF(VOL,1);
. o; y2 a7 g' @M1:=CONST(绿灯);
) T+ j" b$ B( j阑珊:=MFI1.5;
5 M4 P( A/ b* G' C5 tM6:=CONST(量缩);) o1 ^3 K0 n3 @" O
卖量大:=(卖盘-买盘)/买盘>0.4;
( _, _0 R% ?5 I. f" }M7:=CONST(卖量大);6 k$ l7 k% ^& Z' k3 [2 {- k
买量大:=(买盘-卖盘)/卖盘>0.4;' Y0 C9 @- ^) C& g- K* D
M8:=CONST(买量大);
) r! k4 R! t/ A; VTS1:=IF(M1=1,0.03+0.03,0.03);5 n6 C3 i! C2 K9 v6 j
TS2:=IF(M2=1,TS1+0.03,TS1);, [6 b- J; f) \
TS3:=IF(M3=1,TS2+0.03,TS2);. C" e/ D4 l5 O
TS4:=IF(M4=1,TS3+0.03,TS3);
- Y9 y5 ~8 v) z& m! sTS5:=IF(M5=1,TS4+0.03,TS4);* b8 g' C5 V6 M" x- t; y
TS6:=IF(M6=1,TS5+0.03,TS5);
, ^1 f3 t6 ]/ e( P% YTS7:=IF(M7=1,TS6+0.03,TS6);- j; u# y& O* W* v* M# e
TS8:=IF(M8=1,TS7+0.03,TS7);
2 @8 D) r" T% c8 b0 O
& ^+ q; e3 S# S5 s; T. m6 U+ m# PDRAWTEXT(环境1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,显着走强,中线参加，仓位在2/3左右''),COLORFF00FF;
U/ ^( A7 z9 V6 S7 O) |DRAWTEXT(环境2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不敷，短线出场，仓位在1/2左右''),COLORFF00FF;. V0 r- w* G: w- v0 Y
DRAWTEXT(环境3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价精良，并没有显着走强，短线出场，仓位1/2左右。''),COLORFF00FF;) m" r) R: W9 f0 }2 K+ U" A
DRAWTEXT(环境4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可，量能不敷，未完全走强,短线参加，仓位1/3左右。''),COLORFF00FF;: U" Q, ?" p, f/ N
DRAWTEXT(环境5=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏，走势尚可，重仓减泰半，清仓者观望。''),COLORFF0000;
; v" c' Q4 U, {" ^DRAWTEXT(环境6=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌，显着缩量走势，思量大盘风险，减持或清仓。''),COLORFF0000;. g1 }) O+ `7 n" s( m6 N: U
DRAWTEXT(环境7=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌，走势显着偏弱，离场观望。''),COLORFF0000;
5 w \" ^7 h, p: j5 Q* aDRAWTEXT(环境8=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌，走势偏弱，离场观望。''),COLORFFFF00;
( w0 \& i- J0 s: ADRAWTEXT(环境9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态精良，强势显着，量能富足，可以继续持有。''),COLOR00FFFF;2 t; P7 U" j2 g# h. x
DRAWTEXT(环境10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势稳定，强势依然，但量能开始转弱，注意风险''),COLOR00FFFF;
; B$ ~& \+ M7 {2 C( [DRAWTEXT(环境11=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力，但股性偏弱，可思量减仓。''),COLORFFFFFF;
' h6 ]. l! _7 i- c8 v/ w/ `4 R/ R- }DRAWTEXT(环境12=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱，量能不敷，减持大部门筹码''),COLORFFFF00;
% k1 B* U7 d% I0 Z9 p8 lDRAWTEXT(环境13=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳，注意成交量的变革，但现在不恰当参加。''),COLORFFFF00;
' l* Q% M3 @2 }5 C( ^/ \& ^( \DRAWTEXT(环境14=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明，股价偏弱，注意量能变革，现在不宜参加。''),COLORFFFF00;
+ k. B* a7 H7 M( N3 z; iDRAWTEXT(环境15=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象，但量能不敷，趋势不明，不恰当操纵''),COLORFFFF00;+ V& | `0 }1 t" B. o2 w# @
DRAWTEXT(环境16=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱，没有参加代价。''),COLORFFFFFF;
6 M7 N' w1 z4 Q7 t/ K) ZDRAWTEXT(大盘1 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌，最佳买点，否则审慎参与。''),COLOR00FF00; v5 x. N" ?& ?' m1 q1 B
DRAWTEXT(大盘2 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强，量能不敷，若前一轮下跌，短线出场1/2，量能放大加仓。''),COLORFF00FF;
: B& v1 k& v* e0 U( O) jDRAWTEXT(大盘3 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏，重仓者可以减去大部门仓位。''),COLORAAAAAA;
) O: f4 B1 i) L% J% s* fDRAWTEXT(大盘4 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调解，注意风险，短线清仓观望。''),COLORFF0000;
; f; N* G1 R9 oDRAWTEXT(大盘5 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势精良，量能理想，可以继续持有强势股。''),COLOR00FFFF;
* L7 q9 x/ j5 W1 C6 n; WDRAWTEXT(大盘6 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态精良，但量能稍显不敷，随时预备减仓''),COLOR00FF00;; f+ D4 p* F. D: u# T
DRAWTEXT(大盘7 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明，注意成交量变革，现在不相宜出场。''),COLORFFFFFF;
1 c& C& e- j& V, ~$ rDRAWTEXT(大盘8 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下，量能萎缩，不恰当出场。''),COLORFFFFFF;3 D$ h1 j" A# O5 P4 z0 O
DRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''［绿灯］实计生意业务量增长。MFI促进指数增长。''),COLORFFFFFF; x7 x+ s8 R L4 w
DRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''［阑珊］实计生意业务量淘汰。MFI促进指数淘汰。''),COLORGREEN;) Z8 Z; v: d" J7 Z7 m7 _
DRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''［伪装］实计生意业务量淘汰。MFI促进指数增长。''),COLORGREEN;
`8 \! ]) r* B( Q* g. ^" _DRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''［蛰伏］实计生意业务量增长。MFI促进指数淘汰。''),COLORYELLOW;. y' L2 Y. j+ ]' ]: J! I) |* M
DRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN;
* u% D( E- n+ z; R4 A/ O* g9 t# `DRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW;
7 Q' j5 l4 S* [+ o& sDRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40％以上;''),COLORGREEN;
- T9 z* k! Z0 oDRAWTEXT(M8 AND CURRBARSCO |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:07