|
一，为解盘照图把图文笔墨没置一下。5 o4 e. f @7 C' ]
二，参数K有三种没置方式，缺省为0。k=0时配景变色，当图面k线周期多时k线/ D, J6 c! G R# ~5 m5 t
有压缩征象。k=2时配景稳定色无压缩，但会失去表现强弱的配景自功变色。
& j9 v* w! }) V9 u! R& V三，k=2时只有熊样线以上的图面变色,无压缩。但要选择体系配景致共同才好
( Y% \* P# e+ }. s) X2 G% n 看。(我选的狩猎绿)+ F7 I, B% V) K$ e+ b
; y+ H; z0 p: t
9 L: ~& ]! i/ P
* l* R, ]1 K8 Y3 V% W
{阳光普照__TDX 参数K(0,2,0) 缺省为0}
" i/ v8 ?; i% A! b( wTT:=240/FROMOPEN; G- R+ w) E9 Y
比:=TT;
4 ~+ `( n7 a* f7 n L9 y3 K9 ]促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;9 y! p6 z) _. y7 A; H* Q
AY2:=EMA(CLOSE,12)-EMA(CLOSE,26);
% `8 d- r5 e7 ?8 R# GAZ2:=EMA(AY2,9);
7 h9 E- L6 l J9 d# ] GLT2:=(AY2-AZ2);5 _ H9 G4 F0 P" d
L211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;* h+ X/ N2 S; R7 x- j
ZGD:=HHV(H,80)*0.99;$ J8 m% C" V. O* U: w' d
ZGD2:=CONST(ZGD);( o3 p) W0 K4 y8 o) O" Z
ZDD:=LLV(L211,80);
$ W1 ~* {9 ?' ]7 }4 e0 O3 W6 m4 RZDD2:=CONST(ZDD);
/ {9 a% p: D g4 o$ `YYA4:=MA(CLOSE,20);7 ?8 I: Z5 x: D. X1 t
YYA5:=(CLOSE > MA(CLOSE,5));# ~( x1 E! u+ }# |- x `; a
YYA6:=(MA(CLOSE,5) > MA(CLOSE,10));
& p' l- q w7 f A% H& bYYA7:=(CLOSE > MA(CLOSE,10));
! q( a: i- e- a% p" b) c) z$ FYYA8:=(MA(CLOSE,5) > MA(CLOSE,20));, @% `# M9 w2 Z/ @( w
YYA9:=(CLOSE > MA(CLOSE,20));
# f. i5 S- u# [" G" f( Z) gYYA10:=REF(YYA4,1);8 g2 g6 o+ r* u9 y* s
YYA11:=(YYA4 > YYA10);. B$ E: E$ _; \0 N/ Z2 }
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)));
6 Q% g5 I, ~- w7 }DSLX:=(CLOSE / INDEXC);
3 w2 Z* F( |; [* ^DSLX1:=MA(DSLX,5);
, Y7 i* q6 s/ C9 T8 hDSLX2:=MA(DSLX,10);
]1 `* B9 e0 @2 bYYV1:=MA(VOL,5);
+ }) Y% ?! o ?' F/ T$ q# Z; `4 ~5 N7 kYYV2:=MA(VOL,10);1 [" ]4 [. A `! ^1 s9 x1 a( c
J1:=CONST(IF( YYAVX > 0,200,100));, a- S$ r! K3 ~% H Q4 H, o
J2:=CONST(IF( YYAVX > 0,00,100));: h9 U# Y7 j. [ c: m
J3:=CONST(IF( YYAVX > 0,100,100));
6 e4 d7 Z4 R0 E0 DZGD3:=IF(K=0,ZGD2,DRAWNULL);
+ t/ E" T$ R* t4 L% _+ Z+ mZDD3:=IF(K=0,ZDD2,DRAWNULL);
A( e+ y: z' [) _" y8 SZGD4:=IF(K=1,ZGD2,DRAWNULL);. D6 `9 |! v- [4 f% F
牛背:=MA(C,21);
9 [! r6 F+ }8 P( f8 [& C牛逼:=牛背+2*STD(C,21);" l9 b8 _5 Z' {* u) W8 c
熊样:=牛背-2*STD(C,21);( @' s( P9 d# X( t. J2 ~1 V
牛背2:=IF(C>牛背,牛背,DRAWNULL);& `- ]- Z* [, B4 s
熊样2:=IF(C>牛背,熊样,DRAWNULL);* p. y, r$ F& E
DRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);
" v8 y3 F9 y) PDRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);5 v! I/ E3 r# J. G5 A- h/ L! ~9 o l
DRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));
2 z. s0 z$ q! U& d3 S5 v牛缰绳:MA(CLOSE,4);
' d) l" I$ ?/ k( E! g2 p牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;
" _& d7 x- y/ {$ Q9 i牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;
3 r* K" Q- O7 b7 y P1 s9 _牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;
; D0 R7 a0 W" c2 [AY:=EMA(CLOSE,12)-EMA(CLOSE,26);: b; T4 S5 Y1 g2 n- T4 ~/ }0 \
AZ:=EMA(AY,9);
# e, K4 F& D' CLT:=(AY-AZ);! N% ]+ |. y! p+ K. w+ N
L21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;! u# z! R, {" p# w. D/ B& F. A
IF(LT,LLV(L,21),DRAWNULL),COLORFFFF00;6 t' M6 y, B; n
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;3 c. g9 L9 Z W, d# @% V. Y
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;! L: b# T+ Z0 W1 s$ Y
STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;: M1 ]' _/ u, W6 t: O
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
: b# P2 A0 W. b Z: P. HSTICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE = DSLX1)),1,0));- H& A3 n: h! a
环境2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));, g+ ]- j1 ?4 p! ~
环境3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));( A" t: u$ r& c2 ?/ l6 f
环境4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 = YYV2)) AND (DSLX >= DSLX1)),1,0));( |0 j8 ^- L# {# V( x1 R0 p
环境6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
- \) I3 l/ y! X# b环境7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
/ ?+ V; C8 I `4 U- T+ z0 W, J环境8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
% m! o: ]: u4 n" v. A6 |环境9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));4 S# r. }! W! o& N
环境10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));7 q# S; c& E& `( v- u) h' f5 O
环境11:CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW;; t0 x6 |9 z y
环境12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));' S$ L0 b3 `& o1 x
环境13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
8 g/ v$ b" f9 \/ W" T, U0 o环境14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
$ L, o) I# | A, Q( B( s o0 u环境15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
: o; E) f, y5 ~9 L) T9 [环境16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
+ [+ X+ x$ V7 r4 }. J7 w& L大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0)); {7 C ?3 K- W. Z' ~% y
大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));
* X8 H3 Q$ {: D# U, d8 l' e大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));+ G# m2 f8 i* G0 g
大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));
( _3 V! T6 j/ B- h) M* ^大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));
1 @) w9 h2 J% K6 e大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));9 i( O: w) E6 h) K% s' S
大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0));1 s: y. o) [9 Z% z
大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));' c% h% b/ l* L$ e5 N( X
2 b6 Q! T ~1 k; L2 K l- C2 e
WJ:=(H+L+C)/3;+ `* r/ U! g( j1 L
V1:=IF(H=L,1,H-MAX(O,C));
4 M- m! K H5 y& ]& o" YV2:=IF(H=L,1,MAX(C,O)-WJ);. D- `+ _& I3 N# Q) P! q3 ~; w& L/ C) K
V3:=IF(H=L,1,MIN(O,C)-L);
: w7 Z) i$ n" l- e1 p% [V4:=IF(H=L,1,WJ-MIN(C,O));
1 R" I5 z$ @, D' `V5:=VOL/IF(H=L,4,H-L);
5 B4 n% q( U2 R2 [V6:=(V1*V5);
( i. l/ O. l1 P" MV7:=(V2*V5);
( V# P# E7 L7 ^V8:=(V3*V5);- M6 x* a8 A' R% ~8 A
V9:=(V4*V5);
* m- O+ q8 c: V买盘1:=DYNAINFO(23)*比;
2 c+ D7 F( J5 [4 f8 N L' f) j9 z+ q卖盘1:=DYNAINFO(22)*比;0 `- Z% M- m1 ?( y$ M
买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));
* N# x* H! a3 s5 S+ }卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));
& M0 D& g0 F) i9 r买盘:=IF(ISLASTBAR AND PERIOD=5 AND C=REF(VOL,1);7 p% ^/ B5 z! x+ v1 K I$ r
M1:=CONST(绿灯);9 o: Z. a5 {! d2 O: |8 H1 g
阑珊:=MFI1.5;8 w8 O2 m* D8 V, H! Q8 K
M6:=CONST(量缩);2 F& U0 B" t, B
卖量大:=(卖盘-买盘)/买盘>0.4;9 B( H, C: U' S+ ]4 H
M7:=CONST(卖量大);
G- w+ ?/ }1 c+ [; w买量大:=(买盘-卖盘)/卖盘>0.4;
( j! r0 P. ?, C* IM8:=CONST(买量大);
$ _7 x$ b: S, iTS1:=IF(M1=1,0.03+0.03,0.03);
/ B9 `! m0 v2 X" m& lTS2:=IF(M2=1,TS1+0.03,TS1);
6 F) K) o2 g/ T" X* [3 d. {& W$ mTS3:=IF(M3=1,TS2+0.03,TS2);# L3 ~# K; {# W1 [
TS4:=IF(M4=1,TS3+0.03,TS3);
9 M9 a6 U- J3 vTS5:=IF(M5=1,TS4+0.03,TS4);
" Y9 k% A' A/ n4 s, [3 A2 YTS6:=IF(M6=1,TS5+0.03,TS5);; N9 R3 P1 A! B: _9 B' A7 y/ `
TS7:=IF(M7=1,TS6+0.03,TS6);
$ O! u7 k& x: T& D2 ETS8:=IF(M8=1,TS7+0.03,TS7);
6 f$ h( D* t, {( Y5 B1 m# w7 m* N
DRAWTEXT(环境1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,显着走强,中线参加，仓位在2/3左右''),COLORFF00FF;0 \1 ^% U) h2 \) Z6 M. q
DRAWTEXT(环境2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不敷，短线出场，仓位在1/2左右''),COLORFF00FF;8 k& f% U* ?# R8 _' t
DRAWTEXT(环境3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价精良，并没有显着走强，短线出场，仓位1/2左右。''),COLORFF00FF;
# G2 d% u. ~7 A% _% tDRAWTEXT(环境4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可，量能不敷，未完全走强,短线参加，仓位1/3左右。''),COLORFF00FF;
8 f% X5 |9 F0 n/ ^7 BDRAWTEXT(环境5=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏，走势尚可，重仓减泰半，清仓者观望。''),COLORFF0000;) y/ G/ {5 a! h5 t
DRAWTEXT(环境6=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌，显着缩量走势，思量大盘风险，减持或清仓。''),COLORFF0000;
X# r4 {; Q" L2 w4 w8 d3 |4 iDRAWTEXT(环境7=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌，走势显着偏弱，离场观望。''),COLORFF0000;' F8 Z# a# D+ F* v8 {
DRAWTEXT(环境8=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌，走势偏弱，离场观望。''),COLORFFFF00;
3 a1 ?' b' O3 l/ yDRAWTEXT(环境9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态精良，强势显着，量能富足，可以继续持有。''),COLOR00FFFF;
: j4 L( M% K+ ~4 H" d5 \$ IDRAWTEXT(环境10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势稳定，强势依然，但量能开始转弱，注意风险''),COLOR00FFFF;
8 m0 Q+ z( |5 y) N$ @2 yDRAWTEXT(环境11=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力，但股性偏弱，可思量减仓。''),COLORFFFFFF;
! ?3 L* {2 E. A6 h& J" NDRAWTEXT(环境12=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱，量能不敷，减持大部门筹码''),COLORFFFF00; `( z y/ r# W [7 `& Y! a
DRAWTEXT(环境13=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳，注意成交量的变革，但现在不恰当参加。''),COLORFFFF00;$ C# _& S- c' l9 e0 @2 n% p% w
DRAWTEXT(环境14=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明，股价偏弱，注意量能变革，现在不宜参加。''),COLORFFFF00;2 e2 @& H, n( T" c1 b3 i
DRAWTEXT(环境15=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象，但量能不敷，趋势不明，不恰当操纵''),COLORFFFF00;
% i' k; \; F& E! c3 ~+ U( Z2 QDRAWTEXT(环境16=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱，没有参加代价。''),COLORFFFFFF;
" i) \7 D9 l: ?' n3 y. NDRAWTEXT(大盘1 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌，最佳买点，否则审慎参与。''),COLOR00FF00;) M- `' }8 N* T6 u) E
DRAWTEXT(大盘2 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强，量能不敷，若前一轮下跌，短线出场1/2，量能放大加仓。''),COLORFF00FF;3 ?) n A5 A, S# ^% t
DRAWTEXT(大盘3 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏，重仓者可以减去大部门仓位。''),COLORAAAAAA;$ q6 q: q, [; ^8 Y% F+ \! L
DRAWTEXT(大盘4 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调解，注意风险，短线清仓观望。''),COLORFF0000;4 L7 N: `5 X, X7 v. E1 Y6 a4 Y# s
DRAWTEXT(大盘5 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势精良，量能理想，可以继续持有强势股。''),COLOR00FFFF;
- [: t' C% f2 w" IDRAWTEXT(大盘6 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态精良，但量能稍显不敷，随时预备减仓''),COLOR00FF00;
: S, m3 k, w& @$ cDRAWTEXT(大盘7 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明，注意成交量变革，现在不相宜出场。''),COLORFFFFFF;, t( b# y5 f; G7 ^: }. E
DRAWTEXT(大盘8 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下，量能萎缩，不恰当出场。''),COLORFFFFFF;! I; i( @8 `& l$ F
DRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''［绿灯］实计生意业务量增长。MFI促进指数增长。''),COLORFFFFFF;
7 W& n! A4 I/ F8 T8 {DRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''［阑珊］实计生意业务量淘汰。MFI促进指数淘汰。''),COLORGREEN;( V6 N3 o1 I. I+ X
DRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''［伪装］实计生意业务量淘汰。MFI促进指数增长。''),COLORGREEN;" e' D+ r! E: r M$ p$ y; a3 d
DRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''［蛰伏］实计生意业务量增长。MFI促进指数淘汰。''),COLORYELLOW;0 ^" [5 G6 A v# ?+ q2 ^6 D$ ?
DRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN;0 |$ w" ]3 V0 F) N
DRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW; x: E5 F$ P6 I5 j- Q3 F
DRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40％以上;''),COLORGREEN;
" k; a# I: s# I; S6 HDRAWTEXT(M8 AND CURRBARSCO |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:07
