|
一，为解盘照图把图文笔墨没置一下。
# I' U8 V5 T9 ~6 V8 f; o二，参数K有三种没置方式，缺省为0。k=0时配景变色，当图面k线周期多时k线
1 i; B% z0 v- C1 [. {7 X( S 有压缩征象。k=2时配景稳定色无压缩，但会失去表现强弱的配景自功变色。5 z) y" O6 I8 U1 M" |9 j$ Y9 @
三，k=2时只有熊样线以上的图面变色,无压缩。但要选择体系配景致共同才好
" w: s3 V0 O1 U 看。(我选的狩猎绿)% @3 ^0 a- c6 C2 L
- d4 z/ j6 ]4 b. y. G9 R# y7 h4 b 1 D$ u* F( }7 m) b0 d6 O1 V2 \
; ~0 A5 W M( Q5 u2 H' W
{阳光普照__TDX 参数K(0,2,0) 缺省为0}5 k. Y1 L' z, C% a" @
TT:=240/FROMOPEN;7 ?( W: J; e: k3 o# x
比:=TT;+ n2 w/ `% T+ @- a
促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;
' w3 K( Z: N, L/ JAY2:=EMA(CLOSE,12)-EMA(CLOSE,26);2 P7 ]" h0 Z2 D( p* V/ h
AZ2:=EMA(AY2,9);; w/ |1 `. T8 M6 G3 j7 K. o1 q
LT2:=(AY2-AZ2);
$ v; i6 X1 Z4 {5 I' iL211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
+ O6 [" ^0 V" m8 X. XZGD:=HHV(H,80)*0.99;% k( b; W; p) R2 n
ZGD2:=CONST(ZGD);1 _5 w/ g; g7 t9 s; K
ZDD:=LLV(L211,80);
! J& A3 [* |; sZDD2:=CONST(ZDD);
7 t# i+ o; o8 S! S' ZYYA4:=MA(CLOSE,20);
7 }* \3 T1 v" O4 c% rYYA5:=(CLOSE > MA(CLOSE,5));4 E# t+ `$ j+ G8 O
YYA6:=(MA(CLOSE,5) > MA(CLOSE,10));" [$ ^& Q2 ^% u* [8 x$ I) {
YYA7:=(CLOSE > MA(CLOSE,10));, U# n5 R) Q- p& ]6 @
YYA8:=(MA(CLOSE,5) > MA(CLOSE,20));+ L0 b/ ^/ v4 o0 M$ W- ?" q8 B4 ^
YYA9:=(CLOSE > MA(CLOSE,20));9 X0 i4 d- A: U; }# d! ~
YYA10:=REF(YYA4,1);% G1 c# }+ U+ X
YYA11:=(YYA4 > YYA10);. d4 O @8 O/ [; y
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)));
2 k$ x) C, U" T# {4 t9 }& ?, }) {DSLX:=(CLOSE / INDEXC);
* F' j. G: Z" g% cDSLX1:=MA(DSLX,5);
4 n% y" E* {7 i8 m9 WDSLX2:=MA(DSLX,10);
1 N2 r8 g# |2 q% q dYYV1:=MA(VOL,5);2 ~2 P$ e1 o1 V0 a9 s
YYV2:=MA(VOL,10);" f: Z+ N3 n; H$ a) W
J1:=CONST(IF( YYAVX > 0,200,100));' w* a, q+ z2 s2 {3 f: `; |
J2:=CONST(IF( YYAVX > 0,00,100));9 j# L* A- n: \, n! M- m
J3:=CONST(IF( YYAVX > 0,100,100));/ V" E2 ?/ P, P7 ^# Y i1 e
ZGD3:=IF(K=0,ZGD2,DRAWNULL);
' M l7 W! T( R1 \. ]ZDD3:=IF(K=0,ZDD2,DRAWNULL);% d' B2 X+ B- |$ F* A; G9 j
ZGD4:=IF(K=1,ZGD2,DRAWNULL);
! R4 D0 l; E* m9 [0 P' E# Y; m牛背:=MA(C,21);* e* b5 h3 w& W6 x) H; p
牛逼:=牛背+2*STD(C,21);
/ o0 `$ I0 ~) R, Q5 y熊样:=牛背-2*STD(C,21);
7 g) }* m) s7 g# D$ ^' d( j牛背2:=IF(C>牛背,牛背,DRAWNULL);
( l- o5 U$ N- A9 i7 D! ^熊样2:=IF(C>牛背,熊样,DRAWNULL);, ^7 t# j; E0 q2 E8 |
DRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);
- G S% M+ y& _DRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);: s! J# b% O2 @ `# U+ O+ U
DRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));. P" i- F4 @0 e! U( L2 Q
牛缰绳:MA(CLOSE,4);
$ L! k+ Q+ C2 p, O9 E E牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;
4 S: l' g, i' a4 z: J- h牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;
) g, {# P9 L8 \2 N( k5 ~牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;
6 l2 h8 `7 w7 f6 T" k0 F4 [4 \* X0 `AY:=EMA(CLOSE,12)-EMA(CLOSE,26);, K. B5 o- W1 I$ K
AZ:=EMA(AY,9);* O6 {5 C, S* Q
LT:=(AY-AZ);
6 N& |; p% o" G8 ?" [L21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
, X0 T" l( c; fIF(LT,LLV(L,21),DRAWNULL),COLORFFFF00;
/ D5 ]- F4 z2 E. X" U) z; VSTICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;
& C' H7 x A x, k6 i4 ]STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
V0 y5 L3 O. OSTICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;1 {9 o0 ^6 t9 H( r6 e$ E
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
* ]! T! [) J0 Z1 |; n; D) _STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE = DSLX1)),1,0));
/ C4 B$ R5 @4 R( w& K5 B& S环境2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));% m: v& L1 |( o/ t8 r3 a6 I( P
环境3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));
% q" h; w Y! _( }环境4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 = YYV2)) AND (DSLX >= DSLX1)),1,0));
4 A4 d' B- e1 c- b o. e环境6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
- V5 ]9 {0 _3 V环境7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));/ M0 F( j1 }- b) C9 n7 ^
环境8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));$ j: e9 j/ X- P/ ~& n4 r/ p
环境9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));; d# f2 ?3 A/ V
环境10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));: M$ U3 r1 m" e' H
环境11:CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW;
( ]0 {- ^& Y+ d/ y+ ^& ^7 t环境12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
1 \' G( a9 V: R! H& s* @' d7 G环境13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
& Z/ n" [. q2 B环境14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
) w4 |& \6 r2 l' v2 O. i- t! Y6 E Z环境15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
/ {! V6 n, l: J/ @ ~; D环境16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
, x# w) g( M6 Q0 J$ I. }. \: L% m大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0)); \$ |7 |9 y: Z: [+ A; |8 D
大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));
) N# t3 v9 j S% H大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));
' a7 Z e! H/ l E5 a4 r大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));1 W5 K4 U; Y3 R5 S# B3 @1 \: L0 q, Y
大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));
8 G/ Q& S, c$ g& v- O \大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));
7 @) U% y! _) c! J大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0));
1 _4 Y6 l& F% d大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));
) y1 V5 L* p* U2 f3 h% M+ p
: Y3 p5 O) c& l$ A4 ~WJ:=(H+L+C)/3;
2 |* V- j/ |" |$ s+ _6 {V1:=IF(H=L,1,H-MAX(O,C));# I: ?1 h. I; P. k5 q1 ~
V2:=IF(H=L,1,MAX(C,O)-WJ); Z; z) K( w- u( p' j- Y7 R
V3:=IF(H=L,1,MIN(O,C)-L);5 [1 }0 ~! U# C6 `1 I
V4:=IF(H=L,1,WJ-MIN(C,O));8 O! V/ W5 s" w! u2 q2 N% f
V5:=VOL/IF(H=L,4,H-L);
; R) I6 q+ _$ g$ U$ oV6:=(V1*V5);
' r" d5 p$ n3 D& QV7:=(V2*V5);
, Y1 I; C- q/ t" f" f. bV8:=(V3*V5);* U8 N2 h2 ]! g5 K* ], |
V9:=(V4*V5);
) H/ l# i4 P6 L1 c买盘1:=DYNAINFO(23)*比;7 t* J! k* \" b0 [3 x
卖盘1:=DYNAINFO(22)*比;
3 W/ g7 P% B# q8 h7 W2 [买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));" T8 d, z3 k8 C: S) }
卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));
' @7 B& \6 i0 R; V5 d1 q& `2 X买盘:=IF(ISLASTBAR AND PERIOD=5 AND C=REF(VOL,1);; O0 L/ |' P5 d
M1:=CONST(绿灯);' T7 w; y! t' L9 e- \6 M
阑珊:=MFI1.5;4 T) G" t2 n; [- @$ F1 r
M6:=CONST(量缩);
9 d1 T8 d+ @5 \6 f- g, F1 f卖量大:=(卖盘-买盘)/买盘>0.4;& B) G- b8 b, L* g0 r; A# ?
M7:=CONST(卖量大);& o4 }7 J7 @; @, \' Z5 U: ~6 n
买量大:=(买盘-卖盘)/卖盘>0.4;
) Q1 e7 J' A* f- l& Y9 W/ cM8:=CONST(买量大);
' F: D8 E" V9 H9 b- Z" a: wTS1:=IF(M1=1,0.03+0.03,0.03);
2 E$ @& b1 D) ?& MTS2:=IF(M2=1,TS1+0.03,TS1);
" K: e6 x0 i; P, aTS3:=IF(M3=1,TS2+0.03,TS2); I1 X, Q9 i1 \( u
TS4:=IF(M4=1,TS3+0.03,TS3);6 X) T Y$ `, u
TS5:=IF(M5=1,TS4+0.03,TS4);
* M( D, @' o* [# G+ N( @& ~" fTS6:=IF(M6=1,TS5+0.03,TS5);: ~2 W4 K3 X: U3 k( y5 g0 T; S
TS7:=IF(M7=1,TS6+0.03,TS6);
9 l$ |7 v# S# o$ w2 xTS8:=IF(M8=1,TS7+0.03,TS7);
9 Q l. a3 w! F2 j- S1 s, j* E$ T% s+ E% l( A, b
DRAWTEXT(环境1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,显着走强,中线参加，仓位在2/3左右''),COLORFF00FF; Z) t3 f! Q' M' P2 Q
DRAWTEXT(环境2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不敷，短线出场，仓位在1/2左右''),COLORFF00FF;
1 G) O9 Z2 c: l; l& @! iDRAWTEXT(环境3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价精良，并没有显着走强，短线出场，仓位1/2左右。''),COLORFF00FF;4 |. R) P/ G( S4 G G4 f" y% G
DRAWTEXT(环境4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可，量能不敷，未完全走强,短线参加，仓位1/3左右。''),COLORFF00FF;) |2 o% e& M1 s$ i' _2 c
DRAWTEXT(环境5=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏，走势尚可，重仓减泰半，清仓者观望。''),COLORFF0000;
" ^0 a7 n- G2 |DRAWTEXT(环境6=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌，显着缩量走势，思量大盘风险，减持或清仓。''),COLORFF0000;2 M6 @ v% W4 a* H1 d
DRAWTEXT(环境7=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌，走势显着偏弱，离场观望。''),COLORFF0000;& r! D+ g9 y5 X
DRAWTEXT(环境8=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌，走势偏弱，离场观望。''),COLORFFFF00;* A- f; y- P* P& X
DRAWTEXT(环境9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态精良，强势显着，量能富足，可以继续持有。''),COLOR00FFFF;3 p4 S. l# G# \; v
DRAWTEXT(环境10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势稳定，强势依然，但量能开始转弱，注意风险''),COLOR00FFFF;' @* E+ w, S9 y) T
DRAWTEXT(环境11=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力，但股性偏弱，可思量减仓。''),COLORFFFFFF;" o' b0 N% L' _5 h
DRAWTEXT(环境12=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱，量能不敷，减持大部门筹码''),COLORFFFF00;$ b* U, ^8 |7 m7 s( K
DRAWTEXT(环境13=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳，注意成交量的变革，但现在不恰当参加。''),COLORFFFF00;. b+ L+ F- j6 z# s
DRAWTEXT(环境14=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明，股价偏弱，注意量能变革，现在不宜参加。''),COLORFFFF00;
6 v$ m, f) F& n+ [7 X2 H" N: v. _DRAWTEXT(环境15=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象，但量能不敷，趋势不明，不恰当操纵''),COLORFFFF00;
( {3 m, O2 K+ k1 ~DRAWTEXT(环境16=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱，没有参加代价。''),COLORFFFFFF;
' y" B& r2 y$ l) {+ b. TDRAWTEXT(大盘1 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌，最佳买点，否则审慎参与。''),COLOR00FF00;
0 u$ J$ g9 a- [DRAWTEXT(大盘2 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强，量能不敷，若前一轮下跌，短线出场1/2，量能放大加仓。''),COLORFF00FF;8 `; v w- g2 t9 A, M5 R6 p! b
DRAWTEXT(大盘3 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏，重仓者可以减去大部门仓位。''),COLORAAAAAA;
3 O# |3 p1 k( ]% V0 l# e, iDRAWTEXT(大盘4 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调解，注意风险，短线清仓观望。''),COLORFF0000;1 \: i# u t- Q5 `5 p8 O
DRAWTEXT(大盘5 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势精良，量能理想，可以继续持有强势股。''),COLOR00FFFF;
. [- Y6 L7 m5 `0 o* G1 b* t' ]DRAWTEXT(大盘6 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态精良，但量能稍显不敷，随时预备减仓''),COLOR00FF00;
( T z$ q( g* ~! X3 \DRAWTEXT(大盘7 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明，注意成交量变革，现在不相宜出场。''),COLORFFFFFF;/ D, q. x' Q( a. R. F' @
DRAWTEXT(大盘8 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下，量能萎缩，不恰当出场。''),COLORFFFFFF;* O0 z4 R1 N! a7 B6 u- ~, t* v2 r
DRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''［绿灯］实计生意业务量增长。MFI促进指数增长。''),COLORFFFFFF;* y8 m2 S+ p& q8 |% Q# R! X8 W
DRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''［阑珊］实计生意业务量淘汰。MFI促进指数淘汰。''),COLORGREEN;
; ~3 _7 J h2 w# z# iDRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''［伪装］实计生意业务量淘汰。MFI促进指数增长。''),COLORGREEN;
( M2 ^! p2 {+ h5 s1 e. D" h/ n! Q% vDRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''［蛰伏］实计生意业务量增长。MFI促进指数淘汰。''),COLORYELLOW;9 P' T+ W# e- X5 i- L
DRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN;. w" p2 Q9 R$ `) b
DRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW;! J! a* \: ? w5 U9 [+ @: n* T' ?$ y
DRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40％以上;''),COLORGREEN;
X) z v: q" b& k, H" M* s" PDRAWTEXT(M8 AND CURRBARSCO |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:07