|
A1:=CAPITAL;
* Z& E' h2 D3 |. u! K. yA2:=(((H + L) + O) + C) / 4; n' ]( P* c8 {
A3:=(((INDEXH + INDEXL) + INDEXO) + INDEXC) / 4;: Q; B. D1 m7 t L
A4:=(A2 - (REF(A2,1))) / (REF(A2,1));
4 d% D+ d7 x, h: |A5:=(A3 - (REF(A3,1))) / (REF(A3,1));( B. f( N! O' ~; N. w: q7 [( n
A6:=(((SUM(A4,10)) + (SUM(A5,10))) / 10) * 1000;
, f6 j% P8 \. E. L/ a; c; n LA7:=IF(((A6 > 0) AND (A6 < 75)),A6,(IF((A6 > 75),75,0)));, O* D+ |/ M1 T$ U/ J# Q0 {
A8:=IF(((A6 < 0) AND (A6 > -75)),REVERSE(A6),(IF((A6 < -75),75,0)));/ m% X; \5 D, S3 R4 e; n4 q
STICKLINE(A8,150,(150 - A8),3,1),COLOR825200;# H: r$ w) u+ f m" o+ N; B8 {
STICKLINE(A7,150,(150 - A7),3,1),COLOR7A67CF;5 k' M/ O4 m% S7 V) t
{A9:=(VOL * (((A2 * 2) - HIGH) - LOW)) / (HIGH - LOW);
4 ^8 b1 o8 Q7 Z4 f6 J% m) i y KA10:=IF(((HIGH = LOW) AND (A2 < (REF(A2,1)))),(-1 * VOL),VOL);# o7 A4 Y& B) j' X
A11:=IF((HIGH = LOW),A10,A9);
+ y$ z! J8 |( A( a# v7 V! ~A12:=SUM(A11,11);" W7 {9 U; E- J& S
A13:=(A12 / (A1 * 11)) * 10000;
; q+ u( Q6 W$ RA14:=IF(((A13 < 150) AND (A13 > -150)),A13,150);
$ _: p: X! G7 z5 ], L: ZA15:=IF((A14 > 0),A14,0);3 g8 }1 {9 g, a( _" q! K" R, L
A16:=IF((A14 < 0),REVERSE(A14),0);
0 i4 Q0 H$ n7 j- F* S7 kSTICKLINE((A14 > 0),0,A15,3,1),COLORYELLOW;- m3 ]$ G' j! `" r9 [! [
STICKLINE((A14 < 0),0,A16,3,0),COLOR2E9F15;}: |7 n& P; B U
A17:=(SUM((A2 * VOL),16)) / (SUM(VOL,16));+ e+ h8 l6 c& k
A18:=(SUM((A2 * VOL),11)) / (SUM(VOL,11));
& d$ [! G( ?" W* _7 H! bA19:=(SUM((A2 * VOL),6)) / (SUM(VOL,6));
! k4 m$ |% ~) d1 CA20:=((SUM((A2 * VOL),7)) - (A2 * VOL)) / ((SUM(VOL,7)) - VOL);& |1 I5 I z3 a7 G8 E6 N+ _+ v- r
A21:=((A18 - A17) / A2) * 1000;0 h1 o- C" i" `. m! L6 g. ?
A22:=IF((A21 > 50),50,(IF((A21 < -50),-50,A21)));0 I" J/ g! N/ W; E0 ^
A23:=((A19 - A18) / A2) * 1000;, [/ S. U4 H c7 C5 E4 i
A24:=IF((A23 > 50),50,(IF((A23 < -50),-50,A23)));
0 |2 Q* B2 D, N9 a/ ]A25:=((((A19 - A20) / A20) * 5) / 4) * 1000;( z$ \- M# X' s# `6 b5 Y# D: P9 z
A26:=IF((A25 > 50),50,(IF((A25 < -50),-50,A25)));
* ?3 s+ U/ G! Y1 @- }" q: pA27:=(A22 + A24) + A26;
* D- M: }1 q- o; }5 C8 b红柱线:IF((A27 > 0),A27,0),COLOR003ADB,LINETHICK2;0 S/ w$ m; S. R; W" g5 j+ U
兰柱线:IF((A27 < 0),REVERSE(A27),0),COLORE99A2C,LINETHICK2;
, a* I+ {+ U, z; H2 E{A28:=IF((兰柱线 < 150),兰柱线,(IF((兰柱线 = 150),65,0)));4 X* u2 {" [) A9 ]
A29:=IF((兰柱线 = 150),60,0);8 t g. M; z. Y6 |8 J; @; L, T) |3 ?
A30:=IF((红柱线 < 150),红柱线,(IF((红柱线 = 150),65,0)));* w) H \0 W: J
A31:=IF((红柱线 = 150),60,0);5 _0 D/ v5 u/ ]6 m1 j1 I
A32:=(((红柱线 > (REF(红柱线,1))) AND (红柱线 > 49)) AND (CLOSE < (REF(CLOSE,1)))) AND ((OPEN < (REF(CLOSE,1))) OR ((OPEN = (REF(CLOSE,1))) AND ((HIGH / (REF(CLOSE,1))) < 1.02)));
) _$ x4 j/ M6 v) b) V6 TDRAWICON(A32,90,9),COLORGREEN;}
! @" I2 N5 w0 ]: E{超跌短线买点 兰柱线 = 150) AND ((CLOSE < OPEN) OR (CLOSE > OPEN)),COLORRED;; ]# u2 A0 ^* v( E5 u, P9 c
A33:=SUMBARS(VOL,(A1 * 0.8));
. G# e* M1 A$ `: x. {. _, l# b$ iA34:=IF((A33 < 9),9,A33);
2 v* q; N9 x" S0 R- n$ \A35:=HHV(A2,A34);! ?5 A* M9 `5 t2 r' O
A36:=LLV(A2,A34);
( z, z) H3 h; Y# o) `A37:=IF((A35 = A36),0,((100 * (A2 - A36)) / (A35 - A36)));}* f1 ], o4 ^ \3 f2 D# [
{中趋势线:(1.5 * (SUM(A37,6))) / 6,LINETHICK2,COLORRED;( \1 z/ {2 }" [' q' z: e
长趋势线:(SUM(中趋势线,6)) / 6,LINETHICK2,COLORGREEN;}
1 g% s U) s! ?: p5 V n$ r{A38:=((HIGH - A2) > (A2 - LOW)) OR ((HIGH = LOW) AND (LOW < (REF(CLOSE,1))));( Q; S; p. H8 l5 ]! o9 y
A39:=FILTER(A38,5);}. a/ y% N7 o$ V. N- C+ g
A40:=EMA((((CLOSE - (LLV(LOW,25))) / ((HHV(HIGH,25)) - (LLV(LOW,25)))) * 4),4);
6 M% `/ ? f9 R- r( t{DRAWTEXT((FILTER((A40 > 3.6),10)),155,'思量出货'),COLORGREEN;}
# |( F" f1 U( I( d/ ]7 P0 G( U; |{DRAWTEXT((FILTER((A40 < 0.25),5)),30,'思量买入'),COLORRED;
3 N* l/ K! F, H" O/ P2 zA42:=(EMA((((CLOSE - (LLV(LOW,33))) / ((HHV(HIGH,21)) - (LLV(LOW,33)))) * 100),20)) * 0.998;2 R1 f6 ^3 ?" i* Z
A43:=EMA(((0.667 * (REF(A42,1))) + (0.333 * A42)),1);
# J5 A( c! C- g: f/ }9 n: nSTICKLINE((A43 < 20),20,(20 + 20),4,0),COLORMAGENTA;8 S$ `) w, Q$ M6 E
DRAWTEXT((超跌短线买点 = 1),60,'超跌短线买点'),COLORWHITE;
0 c2 L+ _0 d5 q9 P; ~DRAWTEXT((A32 = 1),60,'超强短线买点'),COLORYELLOW;
0 g. `1 y! L0 E I2 N买方能量:(A15),COLORYELLOW,LINETHICK1;};
! V: C6 T5 C5 r7 B! t{新加}
7 E/ P0 C8 _7 D3 NMACD:="MACD.MACD"(12,26,9)*25;
* q# X3 E3 R a9 R7 g7 SSTICKLINE((MACD>0),MACD,0,3,1),COLOR003ADB,LINETHICK2;4 ^7 L3 |. K! \# F5 G1 B
STICKLINE((MACD < 0),MACD,0,3,1),COLORE99A2C,LINETHICK2;+ q" Z6 n% a4 Z- v/ V& [4 V, t
STICKLINE(( "MACD.MACD"(12,26,9)>"MACD.DIF"(12,26,9) AND MACD < 0 ),MACD,0,3,1),COLORFF00FF,LINETHICK2;
- v) p6 L) l: l) ?DIF负:IF("MACD.DIF"(12,26,9) |