|
一，为解盘照图把图文笔墨没置一下。
1 Y- s0 v( g, @9 \5 Q @0 P二，参数K有三种没置方式，缺省为0。k=0时配景变色，当图面k线周期多时k线
; X2 N ]# u2 e 有压缩征象。k=2时配景稳定色无压缩，但会失去表现强弱的配景自功变色。/ g/ L: z" a# P4 O
三，k=2时只有熊样线以上的图面变色,无压缩。但要选择体系配景致共同才好
0 w1 x4 k O: b, d) h h 看。(我选的狩猎绿)
, {3 F# t- ~) \- `7 F* Q) Z; S* o8 F5 \/ n! h; v
7 W7 G& }* J2 x. E* }) w# K" P
4 t+ {; Z# s0 n
{阳光普照__TDX 参数K(0,2,0) 缺省为0}
, e* I7 i# ]+ `/ cTT:=240/FROMOPEN;8 C+ G6 w9 Z, G; e$ T6 x
比:=TT;
, F) Z0 A" u% T) N1 m促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;( w: ]0 L9 r- U
AY2:=EMA(CLOSE,12)-EMA(CLOSE,26);
3 D# a; G M |- W& TAZ2:=EMA(AY2,9);
7 k/ i+ o, ^! i$ L: K: fLT2:=(AY2-AZ2);" U" I3 O! X9 n9 w6 f }
L211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
8 ?6 x% I% a* X/ s6 J2 \' s, C( mZGD:=HHV(H,80)*0.99;$ }% A; J& F o; g9 [
ZGD2:=CONST(ZGD);6 n4 s V. h5 v
ZDD:=LLV(L211,80);' |* U/ d" v- i* K
ZDD2:=CONST(ZDD);0 r1 k" Z* k' x0 W, X9 j
YYA4:=MA(CLOSE,20);
. r2 Q. A0 l7 g: S! MYYA5:=(CLOSE > MA(CLOSE,5));
7 ]: l( l; @' Q& k, dYYA6:=(MA(CLOSE,5) > MA(CLOSE,10));
+ H" O# k. U1 g$ y0 o1 l/ ~; O0 x( I0 [YYA7:=(CLOSE > MA(CLOSE,10));; i0 c) z% W" v& a8 Z
YYA8:=(MA(CLOSE,5) > MA(CLOSE,20));
% R3 n( I" v4 A+ o# D! XYYA9:=(CLOSE > MA(CLOSE,20));
: Z3 c- q% v i8 f4 EYYA10:=REF(YYA4,1);
/ B h, ]- A. K% `' WYYA11:=(YYA4 > YYA10);8 h& O; E* S+ z- M& p' \
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)));
/ P4 ~$ e: y, l7 u$ ZDSLX:=(CLOSE / INDEXC);
: B, J$ T& K! Y4 TDSLX1:=MA(DSLX,5); F5 x, O# D+ x; ]% d3 y8 C
DSLX2:=MA(DSLX,10);; }6 [( ~8 M2 w+ G9 P& b
YYV1:=MA(VOL,5);
, R) P8 U7 B1 s" H, iYYV2:=MA(VOL,10);
3 E2 \: l6 O6 H9 vJ1:=CONST(IF( YYAVX > 0,200,100));
; _/ D. }% C) g+ n# @' C' v, G B' UJ2:=CONST(IF( YYAVX > 0,00,100));
3 {# D @! u* ?- f& Z8 d% `- wJ3:=CONST(IF( YYAVX > 0,100,100));" q3 I ]- ]1 a, T( r
ZGD3:=IF(K=0,ZGD2,DRAWNULL);
3 @, M& @% b9 }0 ~ k' V) x- Q3 JZDD3:=IF(K=0,ZDD2,DRAWNULL);. J$ ^4 t. ]6 n! Z7 d
ZGD4:=IF(K=1,ZGD2,DRAWNULL);1 X1 h1 H7 _& q/ Z* K3 x' k4 u- g+ [
牛背:=MA(C,21);6 D* b: K X" p, I$ H; _2 M
牛逼:=牛背+2*STD(C,21);
# B; ~' A" e9 f5 ]$ Z% @- U熊样:=牛背-2*STD(C,21);2 |7 Q* W2 V0 Q7 _- Y6 x4 j! `- ]
牛背2:=IF(C>牛背,牛背,DRAWNULL); E2 @+ s0 M4 e
熊样2:=IF(C>牛背,熊样,DRAWNULL);
) U, `+ ]+ b' j8 U/ D, ]DRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);& z8 G& A" O5 t$ L& E
DRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);
$ A: | v! V# I+ lDRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));- U" f- f& l; n/ X. r6 x9 U
牛缰绳:MA(CLOSE,4);5 T# r- A2 u: R: m
牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;* A7 n1 }- d j- _) L
牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;8 e4 L- L: }: j$ c
牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;
! Q( X; z5 R0 a5 C( mAY:=EMA(CLOSE,12)-EMA(CLOSE,26);* I+ V9 e' u4 z5 M. {- i0 ~
AZ:=EMA(AY,9);% A$ G* }3 r) j2 X
LT:=(AY-AZ);1 v) [. }: F4 G3 k% a6 X2 {
L21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
( w6 F0 {, S1 \$ }IF(LT,LLV(L,21),DRAWNULL),COLORFFFF00;
" o* `; [- C9 t( k) B& m DSTICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;
3 V* R9 V4 y& ^+ d0 ~' K1 }STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
! F: i6 h; \1 i, P, ^STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;
0 D+ k+ r3 j9 f3 wSTICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF; t/ s& i! E# a+ V0 M& t& S1 q
STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE = DSLX1)),1,0));+ c0 i+ T) L1 T; Z. B* u
环境2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
5 U( g+ a# i- i6 f- Q环境3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));* ?( |% Q9 ]" x% o+ G
环境4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 = YYV2)) AND (DSLX >= DSLX1)),1,0));0 h* U3 a* _; |% c& d- B* v
环境6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
: Y+ I: g9 }+ S环境7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));. z% V* `" S' } @( L) Z: {1 J7 p
环境8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));! q8 B2 w/ {3 q* L- S
环境9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));8 M# q b% l* P1 F: i
环境10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));; P7 _8 u3 D6 d! k! U2 [% U
环境11:CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW;+ e% d' ^* @$ g; u9 m+ m
环境12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));6 a) x. g2 i2 u; N( I
环境13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
5 l( j' j- V7 E6 q# M# w3 U9 p环境14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));; R! C! K) o3 ^) u" H" @! M
环境15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));% l* K b1 ~9 ?' v( t: b
环境16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
( t: Z" s5 r2 Q大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0));5 d% d5 b4 S3 i7 z6 | f- i; \5 O
大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));
. u7 e/ D3 [2 z" s2 v大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));* z3 f R2 s; z9 ~" r2 P
大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));% s, _6 \2 s0 b% ^/ ^
大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));* S$ B3 J7 ^2 H
大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));
. j) o1 H4 X. s大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0));
" F& b6 U0 K* O6 H2 J8 D3 ^3 c大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));+ b# G# y! g8 d8 ?' o3 ]
8 s* \& ?( D* x9 YWJ:=(H+L+C)/3;" R$ { E- u6 _0 t$ l* X( P8 M
V1:=IF(H=L,1,H-MAX(O,C));" M$ O3 S) G$ a3 f7 n+ h" _
V2:=IF(H=L,1,MAX(C,O)-WJ);# |3 C: ^" V4 R& P! A8 E" n+ m
V3:=IF(H=L,1,MIN(O,C)-L);
5 K4 i/ j- E( gV4:=IF(H=L,1,WJ-MIN(C,O));" X: i4 I: S5 C5 m9 @: ~( n
V5:=VOL/IF(H=L,4,H-L);% |" X& B! ~; d$ q
V6:=(V1*V5);
0 A- D$ ~! P1 P- S4 K) @V7:=(V2*V5);% d& f2 ~: |# O: L
V8:=(V3*V5);! N& S' a$ ?8 J9 x9 m5 i6 h$ c
V9:=(V4*V5);* ?0 y U% \4 B" g
买盘1:=DYNAINFO(23)*比;
. l% S$ M, F) H. t* B: B$ `8 u卖盘1:=DYNAINFO(22)*比;: x4 h9 r- w6 E4 o7 n {
买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));9 d) Y+ ?# \, R1 E$ R3 j+ ]
卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));# e# ^$ ?8 U1 p, V* v( V
买盘:=IF(ISLASTBAR AND PERIOD=5 AND C=REF(VOL,1);
% \* \7 D2 S1 _& J+ b* a3 K; rM1:=CONST(绿灯);& t' P/ X' \. E
阑珊:=MFI1.5;$ w" P) P' z6 H% f# a) m& V
M6:=CONST(量缩);
6 q- e* q: O% ?9 I3 R卖量大:=(卖盘-买盘)/买盘>0.4; W! s# R' [/ Y8 D
M7:=CONST(卖量大);
! A, A' ?( c" R, l0 ^买量大:=(买盘-卖盘)/卖盘>0.4;
) n' ]2 P3 w) [) kM8:=CONST(买量大);
" p" N6 C- D, c: z& RTS1:=IF(M1=1,0.03+0.03,0.03);+ G/ f- f* U& y5 Y
TS2:=IF(M2=1,TS1+0.03,TS1);
3 \, T8 e* O$ j o6 i; {+ FTS3:=IF(M3=1,TS2+0.03,TS2);. F1 O( L7 U; e' u$ N5 ?" p
TS4:=IF(M4=1,TS3+0.03,TS3);1 `+ z2 N# z0 ]9 {( \ f$ \9 h
TS5:=IF(M5=1,TS4+0.03,TS4);' o% Z1 v2 B% N7 H; H; k
TS6:=IF(M6=1,TS5+0.03,TS5); q# `( N, M& r. ]6 @
TS7:=IF(M7=1,TS6+0.03,TS6);
6 _, D. K. a( z7 [! vTS8:=IF(M8=1,TS7+0.03,TS7);
2 W0 s& Q+ F. F% r- ~1 k+ {% U( i Q; E% P+ U- _
DRAWTEXT(环境1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,显着走强,中线参加，仓位在2/3左右''),COLORFF00FF;! } }0 ^, x2 B4 Y$ S% x
DRAWTEXT(环境2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不敷，短线出场，仓位在1/2左右''),COLORFF00FF;
m$ \; }6 Q3 G, eDRAWTEXT(环境3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价精良，并没有显着走强，短线出场，仓位1/2左右。''),COLORFF00FF;- z3 C* Q0 b% S Z
DRAWTEXT(环境4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可，量能不敷，未完全走强,短线参加，仓位1/3左右。''),COLORFF00FF;
1 J" V4 u5 [# v- K. N" {DRAWTEXT(环境5=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏，走势尚可，重仓减泰半，清仓者观望。''),COLORFF0000;
# k- y: j" [' N- `- m( a# nDRAWTEXT(环境6=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌，显着缩量走势，思量大盘风险，减持或清仓。''),COLORFF0000;3 d" c0 o& u/ Q! G& r9 t
DRAWTEXT(环境7=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌，走势显着偏弱，离场观望。''),COLORFF0000;- O. M5 ]8 {1 D4 l% b R& b8 j
DRAWTEXT(环境8=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌，走势偏弱，离场观望。''),COLORFFFF00;3 A ^4 w% n% i1 \$ \# [
DRAWTEXT(环境9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态精良，强势显着，量能富足，可以继续持有。''),COLOR00FFFF;* d, J9 |* E" Q. {0 B7 M# Q) Y; p
DRAWTEXT(环境10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势稳定，强势依然，但量能开始转弱，注意风险''),COLOR00FFFF;
7 e0 h8 I4 l0 v- |2 ?* YDRAWTEXT(环境11=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力，但股性偏弱，可思量减仓。''),COLORFFFFFF;- c1 Z! J: {+ ~9 T L% j
DRAWTEXT(环境12=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱，量能不敷，减持大部门筹码''),COLORFFFF00;/ n9 _+ v, e; `* ~/ [4 V
DRAWTEXT(环境13=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳，注意成交量的变革，但现在不恰当参加。''),COLORFFFF00;
' o8 v- `6 U. {( |( dDRAWTEXT(环境14=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明，股价偏弱，注意量能变革，现在不宜参加。''),COLORFFFF00;
}; S- N* o) A' u2 i. a& ~8 pDRAWTEXT(环境15=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象，但量能不敷，趋势不明，不恰当操纵''),COLORFFFF00;! j1 s( o' v! I
DRAWTEXT(环境16=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱，没有参加代价。''),COLORFFFFFF;
, {; e; K0 c$ H$ [5 aDRAWTEXT(大盘1 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌，最佳买点，否则审慎参与。''),COLOR00FF00;" T, l- C5 R7 {9 ?- m5 q8 ]. o, W
DRAWTEXT(大盘2 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强，量能不敷，若前一轮下跌，短线出场1/2，量能放大加仓。''),COLORFF00FF;% ?% a( Y, U% e" y- |- ?) s
DRAWTEXT(大盘3 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏，重仓者可以减去大部门仓位。''),COLORAAAAAA;" ~0 v ~5 F; ^, C
DRAWTEXT(大盘4 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调解，注意风险，短线清仓观望。''),COLORFF0000;
8 T4 r" I6 X' C8 ODRAWTEXT(大盘5 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势精良，量能理想，可以继续持有强势股。''),COLOR00FFFF;
6 [% n9 P, X( i9 ]0 D4 y. xDRAWTEXT(大盘6 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态精良，但量能稍显不敷，随时预备减仓''),COLOR00FF00;8 ~! l! k6 s2 w1 B0 N! D H
DRAWTEXT(大盘7 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明，注意成交量变革，现在不相宜出场。''),COLORFFFFFF; z+ C$ G4 H2 E; [) k' W- ~
DRAWTEXT(大盘8 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下，量能萎缩，不恰当出场。''),COLORFFFFFF;4 {3 d" t7 F [9 \7 M( h% _# R$ t
DRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''［绿灯］实计生意业务量增长。MFI促进指数增长。''),COLORFFFFFF;1 B7 W9 U" [1 S |( Q: w! J- E, k
DRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''［阑珊］实计生意业务量淘汰。MFI促进指数淘汰。''),COLORGREEN;
T x/ a- L' Z7 _* mDRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''［伪装］实计生意业务量淘汰。MFI促进指数增长。''),COLORGREEN;
1 `6 R5 g9 t; Z6 ^: H- b8 l/ I/ IDRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''［蛰伏］实计生意业务量增长。MFI促进指数淘汰。''),COLORYELLOW;* K0 y1 Z6 N9 I, B6 P
DRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN;
# \+ U/ E# \# |7 R- s4 ^5 rDRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW;2 g v5 ^! |: E& w6 S
DRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40％以上;''),COLORGREEN; b8 L5 Q/ b5 N' [$ D
DRAWTEXT(M8 AND CURRBARSCO |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:07