|
一，为解盘照图把图文笔墨没置一下。
( |: r" W) m. j1 z9 m二，参数K有三种没置方式，缺省为0。k=0时配景变色，当图面k线周期多时k线
P$ s! w0 O8 \ 有压缩征象。k=2时配景稳定色无压缩，但会失去表现强弱的配景自功变色。( U& F' Z1 t$ F* [0 X/ F9 N/ P
三，k=2时只有熊样线以上的图面变色,无压缩。但要选择体系配景致共同才好
6 s. W9 C$ ^: @6 g5 L# F& j 看。(我选的狩猎绿)9 z/ b% k+ F( B- e! \$ R! \
! S* G' F. [$ i1 ^ 3 L% d' C/ J- i4 \, J7 Z# X7 M \
% t$ c, k; V. h3 m) o5 Y{阳光普照__TDX 参数K(0,2,0) 缺省为0}
y- K/ B+ N+ t' @; ?" J- i8 xTT:=240/FROMOPEN;. t. O% O* m9 M$ S O
比:=TT;% p- h& N1 O; ~% v/ K- g6 u
促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;. m! i/ G1 k( }5 g
AY2:=EMA(CLOSE,12)-EMA(CLOSE,26);0 c2 _+ g& u! p! c' N! [4 X, H
AZ2:=EMA(AY2,9);4 R+ p: @+ ~$ A# |$ E0 J [ H1 J
LT2:=(AY2-AZ2);. @: g$ K- b4 ]+ j5 c/ o7 M
L211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
+ ?0 _# P: K. N) p2 o1 ]" V3 T; h1 `! gZGD:=HHV(H,80)*0.99;3 o) }! f( Y/ r9 h! w
ZGD2:=CONST(ZGD);
! @6 ~& H5 ^7 u2 F: l: Z8 [ZDD:=LLV(L211,80);
% S% B5 E4 |0 h0 ~7 U: I' pZDD2:=CONST(ZDD);
& D, u6 H% z( S9 ^% @7 VYYA4:=MA(CLOSE,20);
0 x5 u7 s* V0 L$ |6 T" V6 jYYA5:=(CLOSE > MA(CLOSE,5));
- e/ Y: Z0 z* n- Z: @5 SYYA6:=(MA(CLOSE,5) > MA(CLOSE,10));
( n; }$ q% r2 T3 U" QYYA7:=(CLOSE > MA(CLOSE,10));
% P" `* T% j! I3 CYYA8:=(MA(CLOSE,5) > MA(CLOSE,20));/ M7 \* ?( e2 Z: r5 t
YYA9:=(CLOSE > MA(CLOSE,20)); F9 I; t7 n/ T! T1 R% v
YYA10:=REF(YYA4,1);
2 P0 H0 z M7 G5 p) WYYA11:=(YYA4 > YYA10);
" {4 p7 p' P4 v0 z8 N( x9 @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)));+ e( ~8 P0 `1 A7 q, J9 c) u
DSLX:=(CLOSE / INDEXC);
9 A7 h+ [$ x6 G. ?( d D: [DSLX1:=MA(DSLX,5);
* X% a M; n! t+ R) v- dDSLX2:=MA(DSLX,10);
. O4 ]8 H0 r5 Q1 x4 dYYV1:=MA(VOL,5);
2 Q: u: F1 r6 I/ UYYV2:=MA(VOL,10);
+ Q L. R+ a) e0 V6 R8 \# z# h& dJ1:=CONST(IF( YYAVX > 0,200,100));/ o' ` k( {' z
J2:=CONST(IF( YYAVX > 0,00,100));
5 ^# `( G5 Q9 K1 }5 s! @J3:=CONST(IF( YYAVX > 0,100,100));
' [( T7 O, S) m0 BZGD3:=IF(K=0,ZGD2,DRAWNULL);
6 A' ^" C& a# T, z; ] X; EZDD3:=IF(K=0,ZDD2,DRAWNULL);- o/ Y: D! s# v# s. P( b E
ZGD4:=IF(K=1,ZGD2,DRAWNULL);
7 }: f2 W" \3 o# Q3 K6 X牛背:=MA(C,21);
1 s5 U& R. K* D6 P牛逼:=牛背+2*STD(C,21);; q/ U7 V' }: h2 ~
熊样:=牛背-2*STD(C,21);
. C3 w( ?. o$ N0 t& w4 y6 A牛背2:=IF(C>牛背,牛背,DRAWNULL);+ b3 W% O- f# O+ U8 E' J+ c. D
熊样2:=IF(C>牛背,熊样,DRAWNULL);& v0 U! N! l& k6 N7 [& F8 C9 I
DRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);6 E0 P8 T. r2 ?% j; A
DRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);( V* ~( o9 _! I% v, d+ Q
DRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));4 L) `" k& n3 P" s( w7 i
牛缰绳:MA(CLOSE,4);8 z" v9 M% }2 D0 C4 V
牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;
( B+ B$ V, L, `# O" [8 e& H' k牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;# {/ b3 h$ x! r# p H# U7 m
牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;. I0 i6 V& g4 R, I# q) C
AY:=EMA(CLOSE,12)-EMA(CLOSE,26);
3 U0 Y* H" h, E& ~& v; ~AZ:=EMA(AY,9);+ F" Q, g/ X' I0 r
LT:=(AY-AZ);, w& ]; T$ m1 ~1 n0 u8 o B3 _( X( w" I
L21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;5 n4 n6 {% t- F! _ x! @
IF(LT,LLV(L,21),DRAWNULL),COLORFFFF00;
: p; K8 |& I& z; I8 c( {STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;
+ s$ N1 K) F, @: \( v" A- ]STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;- U: a$ r) a+ F; L- o a5 p
STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;
; E9 o* |: g9 b8 ]3 PSTICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;# O& e$ e! j/ j$ C, V. ~# @# g% a
STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE = DSLX1)),1,0));& F: @) K5 V6 _- I2 C1 ]
环境2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
2 R" g( @5 i, t8 @! |; R环境3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));
0 D1 W2 C4 L3 D8 ^4 P8 s环境4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 = YYV2)) AND (DSLX >= DSLX1)),1,0));, k( P2 E" B: j
环境6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));7 Q! E1 v$ ^* G4 Z7 G4 ^9 ~) B1 o0 Y
环境7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
* s- I$ N% A5 D环境8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));$ \* @5 X8 g5 q/ \0 ~
环境9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));5 |& n# I: g! Y# h* _- ~
环境10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0)); v3 E8 t, h2 n
环境11:CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW;
) m! R& L% p3 _( L- b' [5 y环境12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0)); ^. U! J' Y2 u) a; q
环境13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
) o. }. R; u7 [* \6 B% n/ B# Z环境14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));1 X2 _( A1 P* p6 Z4 |
环境15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
8 n0 p& L2 ~ {8 f环境16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));5 L: V0 }) P" v2 C
大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0));
9 m2 U2 Y5 r- F! N+ |- E V" K大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));
& D+ B# x/ ]: t大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));
3 b( b) E. |' F0 J r大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));
) W( N5 O" g. ?6 g. x R0 C' w大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));* S6 v1 M7 \3 o/ M& o9 Q* D0 N0 ^
大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));
0 M1 R! ?1 B, _$ B0 c. p' x大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0)); e5 s- w. m' ?" t
大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));. m8 u4 Z& i3 C0 T
4 N5 O7 N' h) L; @
WJ:=(H+L+C)/3;
- n* ` A- G; I6 G Y/ o, j9 V wV1:=IF(H=L,1,H-MAX(O,C));" l, H( d8 E7 O/ \
V2:=IF(H=L,1,MAX(C,O)-WJ);
' e0 u7 H& t, {' y. ^; bV3:=IF(H=L,1,MIN(O,C)-L);, p! F3 L* @. ~4 l4 ~
V4:=IF(H=L,1,WJ-MIN(C,O));; Y& D/ {- i6 P) @
V5:=VOL/IF(H=L,4,H-L);0 V7 U" k- W |5 k7 ^5 @
V6:=(V1*V5);
" v; b4 L2 D+ b+ w6 E: Y1 rV7:=(V2*V5);5 n3 \5 S, I8 R) [9 S4 ~8 A- d
V8:=(V3*V5);
7 L* F9 M# l% m/ ~( R3 k, g4 \V9:=(V4*V5);" B, v' i( M5 B, _# w2 Z
买盘1:=DYNAINFO(23)*比;2 H1 N# j" n3 `2 X" S" J
卖盘1:=DYNAINFO(22)*比;, `( [" [* B& n! G
买盘2:=IF(ISLASTBAR AND C>300,(V9+V8)*TT,(V9+V8));" t5 {. w! N+ I5 E+ j) o
卖盘2:=IF(ISLASTBAR AND C>300,(V6+V7)*TT,(V6+V7));
: V* ~6 [+ n: c( y7 v买盘:=IF(ISLASTBAR AND PERIOD=5 AND C=REF(VOL,1);
6 G* |2 s4 l. D& n. ?M1:=CONST(绿灯);
% O7 `8 ~: K2 q; l7 G. U1 u阑珊:=MFI1.5;
/ V5 F& p1 [. c5 ?* ^9 P, Q4 [M6:=CONST(量缩);
, \# A/ N7 d' j9 ]( ?& O& W4 W卖量大:=(卖盘-买盘)/买盘>0.4;
' {5 H- N2 Z, x! o" ?2 V$ dM7:=CONST(卖量大);
/ w5 e- W6 V/ V2 A+ n! {( w买量大:=(买盘-卖盘)/卖盘>0.4; P+ z/ L8 T3 P0 Z% h$ C
M8:=CONST(买量大);* V. m% a8 p; V( j4 M( p! k
TS1:=IF(M1=1,0.03+0.03,0.03);" S. r3 d7 M) S7 e
TS2:=IF(M2=1,TS1+0.03,TS1);
2 B7 g- R# B _! G a! E) ?7 DTS3:=IF(M3=1,TS2+0.03,TS2);0 y5 ?( o- @ ]7 f& R$ z5 P
TS4:=IF(M4=1,TS3+0.03,TS3);
) R [3 U: k( e! K2 ~TS5:=IF(M5=1,TS4+0.03,TS4);' I5 u, {* _ H
TS6:=IF(M6=1,TS5+0.03,TS5);$ s* }" ^ G, g: x* r5 o( u" K
TS7:=IF(M7=1,TS6+0.03,TS6);
) S! F5 R1 ^: H+ {# {) E0 bTS8:=IF(M8=1,TS7+0.03,TS7);
) U$ ?2 N7 }- @6 {
7 i" n+ j7 P3 k1 d5 q! z0 }DRAWTEXT(环境1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,显着走强,中线参加，仓位在2/3左右''),COLORFF00FF;0 k; G a4 j5 @* [
DRAWTEXT(环境2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不敷，短线出场，仓位在1/2左右''),COLORFF00FF;
* S7 h1 y0 |7 dDRAWTEXT(环境3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价精良，并没有显着走强，短线出场，仓位1/2左右。''),COLORFF00FF;
9 u6 u. y2 v, l$ kDRAWTEXT(环境4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可，量能不敷，未完全走强,短线参加，仓位1/3左右。''),COLORFF00FF;: K7 A U/ E* F P
DRAWTEXT(环境5=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏，走势尚可，重仓减泰半，清仓者观望。''),COLORFF0000;
0 u/ q" s4 R! f. J# P2 w( FDRAWTEXT(环境6=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌，显着缩量走势，思量大盘风险，减持或清仓。''),COLORFF0000;; l" }/ m$ e1 y; Q [8 y# o
DRAWTEXT(环境7=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌，走势显着偏弱，离场观望。''),COLORFF0000;+ p1 j. l$ E9 g" y
DRAWTEXT(环境8=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌，走势偏弱，离场观望。''),COLORFFFF00;; a G, j! H" w/ ^# j* z% U0 n% H
DRAWTEXT(环境9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态精良，强势显着，量能富足，可以继续持有。''),COLOR00FFFF;
! G$ I& W) w- t& qDRAWTEXT(环境10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势稳定，强势依然，但量能开始转弱，注意风险''),COLOR00FFFF;
6 e; ~ w F N2 _DRAWTEXT(环境11=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力，但股性偏弱，可思量减仓。''),COLORFFFFFF;
5 W( n S5 `& b3 u# vDRAWTEXT(环境12=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱，量能不敷，减持大部门筹码''),COLORFFFF00;
% H5 @ Q6 D' h kDRAWTEXT(环境13=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳，注意成交量的变革，但现在不恰当参加。''),COLORFFFF00;' H2 a) [4 {) G1 ]) X& a
DRAWTEXT(环境14=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明，股价偏弱，注意量能变革，现在不宜参加。''),COLORFFFF00;
/ w" e6 E8 d7 r& H8 |% i9 S! EDRAWTEXT(环境15=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象，但量能不敷，趋势不明，不恰当操纵''),COLORFFFF00;
. h! D5 G/ V( B- u7 H. BDRAWTEXT(环境16=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱，没有参加代价。''),COLORFFFFFF;4 f& m$ G% f1 B. @ A, u/ Q
DRAWTEXT(大盘1 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌，最佳买点，否则审慎参与。''),COLOR00FF00;& l3 }7 X- F7 A& B x+ W: [5 \
DRAWTEXT(大盘2 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强，量能不敷，若前一轮下跌，短线出场1/2，量能放大加仓。''),COLORFF00FF;/ `. Y* {8 ], R& O2 T. z
DRAWTEXT(大盘3 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏，重仓者可以减去大部门仓位。''),COLORAAAAAA;
0 ~: v4 h* f2 H: cDRAWTEXT(大盘4 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调解，注意风险，短线清仓观望。''),COLORFF0000;, N% p" P5 w1 i% r% A6 B. Z
DRAWTEXT(大盘5 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势精良，量能理想，可以继续持有强势股。''),COLOR00FFFF;, Q4 q9 l: O T) J" p
DRAWTEXT(大盘6 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态精良，但量能稍显不敷，随时预备减仓''),COLOR00FF00;
# r8 b7 A; |1 ]/ o, Y+ [DRAWTEXT(大盘7 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明，注意成交量变革，现在不相宜出场。''),COLORFFFFFF;
: f- u) W$ q! s' I- Y' a" E* B( kDRAWTEXT(大盘8 AND (CLOSE >200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下，量能萎缩，不恰当出场。''),COLORFFFFFF;4 A6 Q0 |6 \) j2 n. b
DRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''［绿灯］实计生意业务量增长。MFI促进指数增长。''),COLORFFFFFF;
4 c/ u* k' v0 T" yDRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''［阑珊］实计生意业务量淘汰。MFI促进指数淘汰。''),COLORGREEN;5 V! n- D5 K' C8 ?/ t( c
DRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''［伪装］实计生意业务量淘汰。MFI促进指数增长。''),COLORGREEN;
: ?8 r% @3 T% \7 fDRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''［蛰伏］实计生意业务量增长。MFI促进指数淘汰。''),COLORYELLOW;
) z. ^* P1 a0 @$ ^" H' KDRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN;& _5 t1 o. N5 @/ Y4 o
DRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW;
8 ?, Q5 l# O$ T: oDRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40％以上;''),COLORGREEN;& Q6 g+ A5 i2 O, |
DRAWTEXT(M8 AND CURRBARSCO |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:01:07