|
一，为解盘照图把图文笔墨没置一下。0 Q1 ]- Z6 G5 l5 I/ d
二，参数K有三种没置方式，缺省为0。k=0时配景变色，当图面k线周期多时k线, R% h/ D( V, W, t G- Z
有压缩征象。k=2时配景稳定色无压缩，但会失去表现强弱的配景自功变色。
, U' E* d- \, G% J三，k=2时只有熊样线以上的图面变色,无压缩。但要选择体系配景致共同才好8 ?( x2 r5 x4 u9 {6 f( U: Z
看。(我选的狩猎绿)' W1 n3 N! T' ?0 e- s' ?) _
3 Y$ h0 N! h8 S# i+ o* G # C3 p/ l, F4 R2 B" L
! x; E: V# O& z- R{阳光普照__TDX 参数K(0,2,0) 缺省为0}& i+ Y4 N# X! N% r
TT:=240/FROMOPEN;( M. e U2 T- S+ G/ A! z5 X o
比:=TT;
4 q6 O# @- B. X) D" w* h9 u促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;
0 S# b+ A/ k+ n3 b( D* DAY2:=EMA(CLOSE,12)-EMA(CLOSE,26);* }! ]$ g' _- H8 b' o% m; G
AZ2:=EMA(AY2,9);
- ]. |* a9 ?2 m6 N' cLT2:=(AY2-AZ2);
7 D; c) x. o& [L211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
3 @8 a: Q. _) m' kZGD:=HHV(H,80)*0.99;4 a' |, {0 _0 b" T1 f
ZGD2:=CONST(ZGD);3 G1 j0 T$ m+ k n
ZDD:=LLV(L211,80);
; B+ j. `1 ~/ ~( ?$ j9 U5 ?ZDD2:=CONST(ZDD);1 f' ~/ ?" o5 D+ O, O
YYA4:=MA(CLOSE,20);) q+ u& ~0 p, X4 G, o
YYA5:=(CLOSE > MA(CLOSE,5));! q" A: `5 z7 H3 c
YYA6:=(MA(CLOSE,5) > MA(CLOSE,10));8 o! `8 A& @# v; q6 C. D' i1 S1 m
YYA7:=(CLOSE > MA(CLOSE,10));
- ~# X2 `7 |+ K- O8 cYYA8:=(MA(CLOSE,5) > MA(CLOSE,20));
. {0 {* g; Q9 k1 c1 N2 q8 O( ?YYA9:=(CLOSE > MA(CLOSE,20));
3 k8 S& H, X8 V) iYYA10:=REF(YYA4,1);1 U1 @# U- T0 y- I0 c
YYA11:=(YYA4 > YYA10);
' K8 S' i: |+ A1 l: B3 I$ FYYAVX:=(((((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 t l# f. R* W1 [( @2 _& I
DSLX:=(CLOSE / INDEXC);9 Q) Y5 L* V, V! C c+ z% C
DSLX1:=MA(DSLX,5);
$ c9 {' O$ `/ E0 p2 ~8 j0 mDSLX2:=MA(DSLX,10);9 h& ?2 L0 l3 X% j, V3 r" ~) w
YYV1:=MA(VOL,5);
- e) _' C4 }; }" ~4 @- MYYV2:=MA(VOL,10);( H, l+ K, p+ O3 j
J1:=CONST(IF( YYAVX > 0,200,100));
0 o M/ G# U. XJ2:=CONST(IF( YYAVX > 0,00,100));/ ^$ I! I5 |" ?! A3 _, l$ L
J3:=CONST(IF( YYAVX > 0,100,100));
2 P* m: h' @3 f4 m# F7 t% XZGD3:=IF(K=0,ZGD2,DRAWNULL);6 O- i$ t; \( {( f# H' y: `
ZDD3:=IF(K=0,ZDD2,DRAWNULL);% V- q C# }8 P; c, u
ZGD4:=IF(K=1,ZGD2,DRAWNULL);
( D/ S* H; B! m9 i# o0 x牛背:=MA(C,21);% G5 J- m- \4 H* \2 c& d6 q& a
牛逼:=牛背+2*STD(C,21);
- o4 F, x. S* s* i熊样:=牛背-2*STD(C,21);
0 w( C2 D E+ C+ F" x牛背2:=IF(C>牛背,牛背,DRAWNULL);
4 I5 N7 L* J7 \8 ^- V% w7 i p熊样2:=IF(C>牛背,熊样,DRAWNULL);8 s; C( P( T7 ^7 t! N0 u% G# A
DRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);
! V9 G; ^% c6 ?- ZDRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);
- M! d+ ^! Y" e# ?8 kDRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));* r+ W) l, I m. b
牛缰绳:MA(CLOSE,4);
5 i0 R3 t- Z: |1 c4 h牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;
9 T7 L9 e9 ^8 ~' C4 z a6 f5 K牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;2 M: _8 k2 l# T& y5 O, B8 [
牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;" x& S2 k0 v e+ l" v, e
AY:=EMA(CLOSE,12)-EMA(CLOSE,26);$ }4 n ^9 T& ?0 u6 c& k. y
AZ:=EMA(AY,9);
; [# S% O6 t9 T) p6 m/ i. s% M1 _8 `LT:=(AY-AZ);
. a2 k+ Z; l8 E) C3 B9 F. LL21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;$ p5 s6 y0 y! P# J' Q
IF(LT,LLV(L,21),DRAWNULL),COLORFFFF00;7 {" u7 Y9 O8 u% ?; D+ \6 Q
STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;
! H0 P% O% T) s. mSTICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
' y. H0 f5 B+ D! [- g6 m; QSTICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;
' O7 b: h, z4 X/ \2 n! c p/ q$ ASTICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;
3 w1 R! n) n0 fSTICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE = DSLX1)),1,0));7 L. ]3 p5 ?0 ?0 @8 N9 S# U# B
环境2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
8 P0 T+ i7 r2 c) w环境3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));' z( h b/ h. @* o$ d _9 q6 S
环境4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 = YYV2)) AND (DSLX >= DSLX1)),1,0));
6 a# X; W9 X- J. q5 ]! \* t+ n环境6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
! @4 _: y f+ }+ g环境7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));3 Y* i$ G6 [7 j% H% p
环境8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
3 j* \" Q3 D4 k) T+ { T环境9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
a- [) D6 j5 }0 r) {% L环境10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
" ]# W# i5 d% b环境11:CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW;
6 ?( i @4 V+ n: h4 q5 l环境12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
% E! r F0 [& l$ ~3 F# o9 d环境13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
, B- f: {- s$ R$ ]: J: m9 v* j环境14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
5 L# C! |$ M7 t2 b4 w- v环境15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
: K1 B( K2 m! {/ s" P环境16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
1 N1 C- P L. m! v7 s; ?' q大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0));
0 Q% x- J5 ~. Q! l& Z大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));+ P! B! {( I5 e
大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));
" | l! Y6 @% [1 E6 s& ^大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));
, W( e" d- g. Q4 `) d! t, r大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));
' L( `. m$ b4 `, M0 Q大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));
# \- S) ]4 Q+ l4 _2 G' I大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0));$ R2 G6 p: O4 y% Z6 n4 [
大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));% I; ]. H1 w: ^0 N& C% ?& r
# f3 T- Y1 z4 r( CWJ:=(H+L+C)/3;
# A+ W6 _. l5 H& _7 D1 E8 m, WV1:=IF(H=L,1,H-MAX(O,C));
: s' z, t- T, B/ sV2:=IF(H=L,1,MAX(C,O)-WJ);5 e8 Q9 C- Q( \* `6 a$ L. m
V3:=IF(H=L,1,MIN(O,C)-L);
5 Y6 `, ~* [/ N. g' M3 t0 dV4:=IF(H=L,1,WJ-MIN(C,O));3 I* T3 x% h. r( b! l6 b P8 E
V5:=VOL/IF(H=L,4,H-L);6 r! i) K& X: ~6 s9 U, q& P' v" z
V6:=(V1*V5);/ W/ y* u% Y; u% [. m, X
V7:=(V2*V5);
/ q; h! L, G5 |; PV8:=(V3*V5);) u- ?+ o' G: E6 U( }# c, O9 B
V9:=(V4*V5);
2 }$ W3 b: Q' w4 i3 z) a/ r" y买盘1:=DYNAINFO(23)*比;/ ?$ T L" p& @2 j5 r
卖盘1:=DYNAINFO(22)*比;
0 y6 B$ N, b) |买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));
( t7 o. b4 a8 X" ~" M+ O1 d7 m C卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));9 ^4 q# z7 K: {" w( A5 n! U- L
买盘:=IF(ISLASTBAR AND PERIOD=5 AND C=REF(VOL,1);
' k: a# Q9 v2 W, j+ ?0 q' {4 z0 a/ c" [M1:=CONST(绿灯);' p4 e6 L; }* M. u7 `( C, J
阑珊:=MFI1.5;( F5 p7 [/ j0 \! \
M6:=CONST(量缩);; \/ S5 q* v( ~% _# {# s
卖量大:=(卖盘-买盘)/买盘>0.4;
: Y) x/ M) m3 ~4 V5 yM7:=CONST(卖量大);9 U) s: M( f7 a; [9 h
买量大:=(买盘-卖盘)/卖盘>0.4;
$ x. t" O& Y! w2 I* e" WM8:=CONST(买量大);' J$ B; Z$ S7 P$ ]% x( w' T: ?+ I
TS1:=IF(M1=1,0.03+0.03,0.03);1 Q( w! Y$ [+ e- c' _
TS2:=IF(M2=1,TS1+0.03,TS1);
+ B; e0 I$ i: D: nTS3:=IF(M3=1,TS2+0.03,TS2);
- W$ y; q% Z3 GTS4:=IF(M4=1,TS3+0.03,TS3);
1 j0 }0 }& ?9 f- p! bTS5:=IF(M5=1,TS4+0.03,TS4);
& g3 D/ ~0 `3 v+ YTS6:=IF(M6=1,TS5+0.03,TS5);
: N& N& a. r' U9 vTS7:=IF(M7=1,TS6+0.03,TS6);
7 y( N9 p1 P T8 X9 l. `/ N& QTS8:=IF(M8=1,TS7+0.03,TS7);
1 }7 o9 X" Z5 @: t5 k% F* f: Q2 _$ _/ i% C8 a" i( B' A/ ]; y
DRAWTEXT(环境1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,显着走强,中线参加，仓位在2/3左右''),COLORFF00FF;
; c% O0 Q9 k$ P" A* {. vDRAWTEXT(环境2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不敷，短线出场，仓位在1/2左右''),COLORFF00FF;2 D" ^- a3 A( `! o
DRAWTEXT(环境3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价精良，并没有显着走强，短线出场，仓位1/2左右。''),COLORFF00FF;9 I, a4 }. A' a5 P3 ]
DRAWTEXT(环境4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可，量能不敷，未完全走强,短线参加，仓位1/3左右。''),COLORFF00FF;2 e: ]# X5 Q& b1 z5 V- ~% J
DRAWTEXT(环境5=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏，走势尚可，重仓减泰半，清仓者观望。''),COLORFF0000;9 Z7 b! T! B8 \
DRAWTEXT(环境6=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌，显着缩量走势，思量大盘风险，减持或清仓。''),COLORFF0000;
, m! r4 L; J* A$ O: I7 |8 i' YDRAWTEXT(环境7=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌，走势显着偏弱，离场观望。''),COLORFF0000;
. |' C( |- E' e3 X0 a& fDRAWTEXT(环境8=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌，走势偏弱，离场观望。''),COLORFFFF00;& j; |' a/ o, w; U: ^7 y4 @
DRAWTEXT(环境9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态精良，强势显着，量能富足，可以继续持有。''),COLOR00FFFF;
' j/ c& @2 O2 l$ {" VDRAWTEXT(环境10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势稳定，强势依然，但量能开始转弱，注意风险''),COLOR00FFFF;
% ?- j% w8 U, e6 O( B( UDRAWTEXT(环境11=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力，但股性偏弱，可思量减仓。''),COLORFFFFFF;; t9 z0 A1 C# Y8 h/ x" S
DRAWTEXT(环境12=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱，量能不敷，减持大部门筹码''),COLORFFFF00;4 Y3 D% n8 ~0 v0 E
DRAWTEXT(环境13=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳，注意成交量的变革，但现在不恰当参加。''),COLORFFFF00;- |3 @0 z ~' O3 _' a( n: P
DRAWTEXT(环境14=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明，股价偏弱，注意量能变革，现在不宜参加。''),COLORFFFF00;6 O: J8 \% n; l) a/ p* X( F% {
DRAWTEXT(环境15=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象，但量能不敷，趋势不明，不恰当操纵''),COLORFFFF00;5 U. q0 n& M; q/ D8 j
DRAWTEXT(环境16=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱，没有参加代价。''),COLORFFFFFF;8 t: w- y% a$ i. n! ~/ e
DRAWTEXT(大盘1 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌，最佳买点，否则审慎参与。''),COLOR00FF00;
/ j+ a/ K- a R% E" Y2 C( n* ZDRAWTEXT(大盘2 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强，量能不敷，若前一轮下跌，短线出场1/2，量能放大加仓。''),COLORFF00FF;
" C5 w9 U( ]2 B2 e. R8 g4 w' bDRAWTEXT(大盘3 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏，重仓者可以减去大部门仓位。''),COLORAAAAAA;
3 B) }% B7 j! b. ~; h, t( jDRAWTEXT(大盘4 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调解，注意风险，短线清仓观望。''),COLORFF0000;
$ e# n2 [4 g$ V6 T6 f& SDRAWTEXT(大盘5 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势精良，量能理想，可以继续持有强势股。''),COLOR00FFFF;
" z4 f& ^6 z4 _4 l) l! O: DDRAWTEXT(大盘6 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态精良，但量能稍显不敷，随时预备减仓''),COLOR00FF00;
; c5 b+ T9 y8 L; kDRAWTEXT(大盘7 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明，注意成交量变革，现在不相宜出场。''),COLORFFFFFF;2 x) C9 Y5 ?: C- a( J% }* k7 `+ {# H
DRAWTEXT(大盘8 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下，量能萎缩，不恰当出场。''),COLORFFFFFF;
, K5 o* U7 K7 t# b0 GDRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''［绿灯］实计生意业务量增长。MFI促进指数增长。''),COLORFFFFFF;2 S" S( |% @& T
DRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''［阑珊］实计生意业务量淘汰。MFI促进指数淘汰。''),COLORGREEN;; \: D0 ]* X# x0 o0 H2 T- g
DRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''［伪装］实计生意业务量淘汰。MFI促进指数增长。''),COLORGREEN;, J" ?/ c* R- V, M: j
DRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''［蛰伏］实计生意业务量增长。MFI促进指数淘汰。''),COLORYELLOW;
& D5 g/ n3 Z) `' G& n# tDRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN;/ [9 H0 a& N( \, S3 B1 @* K" H
DRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW;2 }/ G; d" C2 K
DRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40％以上;''),COLORGREEN;
4 E: S) ?: g$ @/ kDRAWTEXT(M8 AND CURRBARSCO |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:07