|
一，为解盘照图把图文笔墨没置一下。0 i0 {$ E; U7 b8 p1 U# n
二，参数K有三种没置方式，缺省为0。k=0时配景变色，当图面k线周期多时k线( c+ n" H( S" ^1 o" K
有压缩征象。k=2时配景稳定色无压缩，但会失去表现强弱的配景自功变色。" l) u! H. ]! {# n7 ?/ v
三，k=2时只有熊样线以上的图面变色,无压缩。但要选择体系配景致共同才好, C( U A5 K4 Y2 l
看。(我选的狩猎绿); u$ C0 n' q/ u1 L3 e4 f
2 i V, B. A) \9 w: S; ?+ E % B6 Q+ e% p! n! E
: N, L1 A7 _& @# p/ v* X5 G ?{阳光普照__TDX 参数K(0,2,0) 缺省为0}! A. r2 M, }. R8 A2 w1 {9 T
TT:=240/FROMOPEN;
$ L& {, F& C& n: V+ ?0 m比:=TT;
! ?% q1 w" v2 c J8 Y' i' T促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;' I5 ^$ R# x3 k. d
AY2:=EMA(CLOSE,12)-EMA(CLOSE,26);% K* n/ @3 [: n1 q9 d8 C! ~
AZ2:=EMA(AY2,9);6 Q: f4 K+ c- g5 y# T1 J
LT2:=(AY2-AZ2);/ {, u# D9 M/ f0 T ~# @* X
L211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
8 ^; V! X/ ^/ Y1 n# i* O' g% qZGD:=HHV(H,80)*0.99;, W3 r6 k( W) Y8 ^% U( t; O& U" I
ZGD2:=CONST(ZGD);
. r2 t' ?+ j& }+ o. S1 @ZDD:=LLV(L211,80);
* t) g6 Y5 R- i% U0 f- L0 sZDD2:=CONST(ZDD);
- k( x: R9 o) t/ \YYA4:=MA(CLOSE,20);4 P" p. ]( v- ]- D
YYA5:=(CLOSE > MA(CLOSE,5));
" Y2 {# U& Q9 ~- ^YYA6:=(MA(CLOSE,5) > MA(CLOSE,10));
/ `& K5 a z! k) i* t" Q; a( SYYA7:=(CLOSE > MA(CLOSE,10));
: g2 P- P; I- S# v: ~) nYYA8:=(MA(CLOSE,5) > MA(CLOSE,20));8 Y, R" a# f- g5 {: }
YYA9:=(CLOSE > MA(CLOSE,20));+ Q$ R4 x: c/ j8 f) ]: F! T) t2 \
YYA10:=REF(YYA4,1);
5 R$ m1 g. m5 _6 N; RYYA11:=(YYA4 > YYA10);
( z3 H6 C- S& F' H/ 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)));
7 L1 ?+ {' }* f( C% O7 t. r9 GDSLX:=(CLOSE / INDEXC);9 B3 F* e9 q9 z9 Z% C
DSLX1:=MA(DSLX,5);
; H0 v. C( A# D- ^% GDSLX2:=MA(DSLX,10);. C, E) t* ?4 u$ x# W6 S
YYV1:=MA(VOL,5);
. B7 _ C. `+ Q2 {; nYYV2:=MA(VOL,10);
6 L0 V5 H0 q5 r) BJ1:=CONST(IF( YYAVX > 0,200,100));
9 a9 @9 D% {( w8 p: ~J2:=CONST(IF( YYAVX > 0,00,100));7 N2 \3 }$ P) N7 I! y
J3:=CONST(IF( YYAVX > 0,100,100));
$ E7 U% y1 i, E; S5 X/ T, }; RZGD3:=IF(K=0,ZGD2,DRAWNULL);7 x2 E1 w4 J1 F% T; R
ZDD3:=IF(K=0,ZDD2,DRAWNULL);
% p% K& K+ L7 a4 [' F: RZGD4:=IF(K=1,ZGD2,DRAWNULL);) }+ ~$ I) T+ P: n. n
牛背:=MA(C,21);" N) }8 `1 _: _) g
牛逼:=牛背+2*STD(C,21);
) m" v: T( ]) O" @: V& j4 ?+ M8 i熊样:=牛背-2*STD(C,21);4 Q8 y4 S4 j! F( {/ S
牛背2:=IF(C>牛背,牛背,DRAWNULL);2 |8 K$ d2 o2 h* d
熊样2:=IF(C>牛背,熊样,DRAWNULL);1 y4 J2 Z' ?: |4 e+ B/ Y
DRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);, ~; C* T' ^8 `6 R/ x' ]" K& `
DRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);
: v l6 x% N' U0 g3 PDRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));
% L$ X+ e+ a5 T3 p+ V牛缰绳:MA(CLOSE,4);% Y' N8 C( N( r! n3 H
牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;1 O* H3 v+ E% ^* b
牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;
2 i) n( t& M+ P6 p牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;/ U" x0 r4 F; E9 X5 |
AY:=EMA(CLOSE,12)-EMA(CLOSE,26);
1 T0 L( J5 R+ i1 D7 t+ _3 Z3 zAZ:=EMA(AY,9);
% G/ z7 X4 b8 f; ^& K& W; k2 l) T PLT:=(AY-AZ);
7 _. Y) Y1 b* z' E, qL21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
* ?; O% P& n3 p& m) n7 RIF(LT,LLV(L,21),DRAWNULL),COLORFFFF00;. x8 c" p: \6 F* L
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;: P4 _; g7 j+ @
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
& d f& V3 N X1 V5 [( G( `STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;
9 W& F0 _, R; r1 RSTICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
; @2 L( e- H' [$ Y+ h4 C6 LSTICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE = DSLX1)),1,0));
7 L6 |( K. B/ @( e" i$ ?, A5 V环境2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));3 w' {; y. @" Y: \; \' [
环境3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));
: O) ^6 h2 Q! n4 _环境4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 = YYV2)) AND (DSLX >= DSLX1)),1,0));8 C+ F# b8 m- O4 N1 Y- A" x
环境6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
8 Y4 Y4 { w. L' ]环境7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));4 V3 O; R% m! v
环境8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0)); T( {1 S" I7 j3 [' T
环境9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
. A& N* z! M1 a+ f! u3 a) D# C环境10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
. |. ?# w! g" i( u; p9 ^4 t6 Q- T环境11:CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW;9 d* w' x5 O) n9 p* d3 O- E
环境12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
2 W1 o' S* Y& b) l环境13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
3 S; T; S( Q# @1 r! Q1 s环境14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));. E# X4 g; J7 Y: _; P( \
环境15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));; g) D: L% A9 D% e
环境16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
( A$ Y/ f" R2 V ?. Q6 n% Z大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0));, T1 f/ N4 n# j, B1 B& r- M
大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));% T; Z# r( d7 V- L+ F
大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));
2 H; v; V5 X0 B大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));: a, ^2 g0 V+ {4 c5 a/ M* U6 ^
大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));2 V0 Y2 E2 n+ J; ?2 p$ Z. G
大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));
5 _ j M- z- c大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0)); R) x" Y7 d" \ J+ i
大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));9 j+ h# E9 y0 ~# b7 a* i3 B
" P9 m3 {; ~6 G1 r$ ~- W
WJ:=(H+L+C)/3;
* a( o+ v( i5 WV1:=IF(H=L,1,H-MAX(O,C));6 h, @9 o7 M1 U
V2:=IF(H=L,1,MAX(C,O)-WJ);
9 D0 s" p6 O5 h0 vV3:=IF(H=L,1,MIN(O,C)-L); r% k" D) v+ W0 u: {/ e
V4:=IF(H=L,1,WJ-MIN(C,O));0 B+ x3 F' J/ E0 A7 T
V5:=VOL/IF(H=L,4,H-L);
4 b# O$ C" ]6 H; i8 s; Z/ q: pV6:=(V1*V5);
. g6 ~$ f1 I/ p( M YV7:=(V2*V5);
0 w3 w- [# T1 U& [3 p5 x5 NV8:=(V3*V5);
' o; h$ x- E$ G! `2 r2 Y8 MV9:=(V4*V5);
, \0 s& V5 G0 ^7 h5 U买盘1:=DYNAINFO(23)*比;6 e d5 |' d' E. X( ^& q5 o9 h6 w0 h
卖盘1:=DYNAINFO(22)*比;
3 t/ c! Q' _' I$ O7 b' H; [买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));. E! m3 ?; k- J! V Z }
卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));+ f; W2 S4 I; R9 u
买盘:=IF(ISLASTBAR AND PERIOD=5 AND C=REF(VOL,1);
& c( O- D& K- fM1:=CONST(绿灯);
: b$ T- x, y2 e! O! t5 _阑珊:=MFI1.5;1 t0 F7 `6 ]0 p& ^
M6:=CONST(量缩);
$ g" K/ S7 _4 \7 f! c卖量大:=(卖盘-买盘)/买盘>0.4;; ^; X; m S! r3 L: M5 a3 D! ?+ t
M7:=CONST(卖量大);6 u3 D L4 I. {1 m6 {
买量大:=(买盘-卖盘)/卖盘>0.4;
. y3 o: P% ^5 w9 s9 nM8:=CONST(买量大);+ F) a$ y- X* _8 v9 g: [' G
TS1:=IF(M1=1,0.03+0.03,0.03);
7 D3 b' b# a6 A h: KTS2:=IF(M2=1,TS1+0.03,TS1);( [; g- _8 g" G1 V( `* ]
TS3:=IF(M3=1,TS2+0.03,TS2);* V0 C4 C; b# ]2 J: q6 i' P
TS4:=IF(M4=1,TS3+0.03,TS3);
+ p3 M/ ]& b" O5 |2 E$ c( F. pTS5:=IF(M5=1,TS4+0.03,TS4);; I l6 X9 T Q* ]
TS6:=IF(M6=1,TS5+0.03,TS5);
+ ?4 X( l. y, a; w6 U# DTS7:=IF(M7=1,TS6+0.03,TS6);% j, B- J( r+ z# T, _5 E
TS8:=IF(M8=1,TS7+0.03,TS7);
; c) c( T1 N2 t# n5 u+ b
5 |1 ^8 j# O2 v0 v4 pDRAWTEXT(环境1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,显着走强,中线参加，仓位在2/3左右''),COLORFF00FF;2 h6 \# Q4 W1 J2 ^) r
DRAWTEXT(环境2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不敷，短线出场，仓位在1/2左右''),COLORFF00FF;! ?# p2 V0 K" J* n% `
DRAWTEXT(环境3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价精良，并没有显着走强，短线出场，仓位1/2左右。''),COLORFF00FF;
1 G2 w) z: R& W9 {! K( O7 F# T9 A1 n9 G' gDRAWTEXT(环境4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可，量能不敷，未完全走强,短线参加，仓位1/3左右。''),COLORFF00FF;0 Y! u8 ]7 U% J3 u. C( a. m, Y
DRAWTEXT(环境5=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏，走势尚可，重仓减泰半，清仓者观望。''),COLORFF0000;
% k) s' t- V$ j {4 ADRAWTEXT(环境6=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌，显着缩量走势，思量大盘风险，减持或清仓。''),COLORFF0000;
: O# n# U9 r# N, w3 t# G* HDRAWTEXT(环境7=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌，走势显着偏弱，离场观望。''),COLORFF0000;
; |2 i$ [4 _( p0 l7 }DRAWTEXT(环境8=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌，走势偏弱，离场观望。''),COLORFFFF00;
4 z! t, k! `6 r7 S* B- SDRAWTEXT(环境9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态精良，强势显着，量能富足，可以继续持有。''),COLOR00FFFF;
* C6 B+ u' ~0 t7 |5 IDRAWTEXT(环境10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势稳定，强势依然，但量能开始转弱，注意风险''),COLOR00FFFF;9 u- Z0 W6 d* L$ u$ |4 n* S. e) \
DRAWTEXT(环境11=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力，但股性偏弱，可思量减仓。''),COLORFFFFFF;
( ~" k1 R3 \ \DRAWTEXT(环境12=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱，量能不敷，减持大部门筹码''),COLORFFFF00;
|$ a( S6 h( X9 z& WDRAWTEXT(环境13=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳，注意成交量的变革，但现在不恰当参加。''),COLORFFFF00;+ m0 n9 {6 z" f8 C: D
DRAWTEXT(环境14=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明，股价偏弱，注意量能变革，现在不宜参加。''),COLORFFFF00;
9 d; ?3 Y& p3 h1 y' G3 ]: E3 ZDRAWTEXT(环境15=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象，但量能不敷，趋势不明，不恰当操纵''),COLORFFFF00;
% ~% l3 j+ Q" kDRAWTEXT(环境16=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱，没有参加代价。''),COLORFFFFFF;
9 N; }& y4 z( p0 C9 {DRAWTEXT(大盘1 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌，最佳买点，否则审慎参与。''),COLOR00FF00;
) x' H% d* S; D3 U9 FDRAWTEXT(大盘2 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强，量能不敷，若前一轮下跌，短线出场1/2，量能放大加仓。''),COLORFF00FF;
* k1 U' x+ u, e% w7 g/ k5 i8 pDRAWTEXT(大盘3 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏，重仓者可以减去大部门仓位。''),COLORAAAAAA;3 Z* d' \7 K R0 d
DRAWTEXT(大盘4 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调解，注意风险，短线清仓观望。''),COLORFF0000;
. h* j, v# m4 LDRAWTEXT(大盘5 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势精良，量能理想，可以继续持有强势股。''),COLOR00FFFF;
! Q$ I1 N& O6 t4 K7 UDRAWTEXT(大盘6 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态精良，但量能稍显不敷，随时预备减仓''),COLOR00FF00;: e! o7 J+ S& \: E% }5 I6 ^
DRAWTEXT(大盘7 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明，注意成交量变革，现在不相宜出场。''),COLORFFFFFF;
% {' C3 _9 Y7 U: O6 r5 GDRAWTEXT(大盘8 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下，量能萎缩，不恰当出场。''),COLORFFFFFF;/ v+ z i& E4 y! m3 w" j
DRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''［绿灯］实计生意业务量增长。MFI促进指数增长。''),COLORFFFFFF;
. c8 n0 y) E! Z9 Q5 |0 X: P6 }* HDRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''［阑珊］实计生意业务量淘汰。MFI促进指数淘汰。''),COLORGREEN;9 @, k( ^* V7 ?+ A, R0 a# c* I
DRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''［伪装］实计生意业务量淘汰。MFI促进指数增长。''),COLORGREEN;! i9 h) ]8 m- `# {& x! j, k# i
DRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''［蛰伏］实计生意业务量增长。MFI促进指数淘汰。''),COLORYELLOW;
3 P0 f3 I2 r* [1 i- ?$ `DRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN;
* A. P/ r! l8 N3 RDRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW;
( v4 o* @; l1 G/ i9 C* H8 lDRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40％以上;''),COLORGREEN;
0 Q& X1 o0 V" `+ j& w: kDRAWTEXT(M8 AND CURRBARSCO |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:07