|
N 1 100 8); m- c& m2 E1 a" N5 |6 k+ K7 n, Z$ d
7 {5 w7 g* a" [7 y0 v o
ZGD:=HHV(H,50);3 e. W# h5 W: T; {* x* N- s! X
ZGD2:=CONST(ZGD)*1.08;0 b% m! `4 N7 X
ZDD:=LLV(L,50);' k: e9 K6 I3 c% c
ZDD2:=CONST(ZDD)*0.9;
) W3 L: [! r* S. yDRAWBAND(ZGD2,RGB(100,100,100),ZDD2,RGB(00,00,00));! r* Z9 ?* M! }9 l" V
GJ:=(C+H+L+O)/4;4 b, ]( ~; |6 O) w
嫡阻力:=L+(GJ-L)+(C-L);& W6 X; u! h" }/ X. [
嫡支持:=L+(C-GJ);$ L/ {8 o7 ?% N: p, h. o" j# C
本日阻力:REF(嫡阻力 , 1),NODRAW;$ x+ m9 ^4 @ d5 n# m
本日支持:REF(嫡支持 , 1),NODRAW;
' w4 @0 w; [' ~0 A下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);
1 M7 u B H3 G% _7 p3 a; u8 bRRRSV:=SMA(下档线,3,1);
, |0 p& H1 M+ K4 N; ~" h$ w1 ]KKK:=SMA(RRRSV,3,1);# p4 y- f5 h, ] [0 X- i
DDDDD:=((3 * RRRSV) - (2 * KKK));6 ~% h1 a; v( P+ N/ _2 @
JJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);; U2 C! B! J v9 e! d% s2 F; E& l
RSV24:=SMA(JJ12,3,1);% D0 I& F" @% z( N& y
K24:=SMA(RSV24,3,1);
+ v9 f [; N( TD24:=((3 * RSV24) - (2 * K24));: P8 Z# Q* j Y d; @% B5 X
压力2:=IF(CROSS(D24,DDDDD),HIGH,REF(HIGH,BARSLAST(CROSS(D24,DDDDD)))),COLORFFFFFF;
- ?* c# D! Q4 a) c压力位:IF(ISLASTBAR,压力2,DRAWNULL),NODRAW;
- ^# W+ Z3 ~" f底部:=LLV(HIGH,30),COLOR00FF00;
0 ~7 @+ ?; N# J& B* V7 M底部位:IF(ISLASTBAR,底部,DRAWNULL),NODRAW;" |' o8 o4 J @" ~" {; b
AA:=REF(H,N)=HHV(H,2*N+1);
' w0 j1 { F# O2 F3 u0 tQY:=BACKSET(AA,N+1);: E5 R: ~7 h3 h3 w1 W6 O; U
CC:=FILTER(QY,N) AND H=HHV(H,N+1);
0 m4 \7 }: P4 K8 |DDD:BARSLAST(CC),NODRAW;
f' z$ E2 w4 w/ C6 e! \GDTS:IF(CC,CURRBARSCOUNT,0),NODRAW;
( b# N, p! U% {DINGBUTS:IF(DDD,REF(GDTS,DDD),GDTS),NODRAW;" p; ^* z! Y3 C# r6 s
GDCS1:CONST(DINGBUTS),NODRAW;
" f) e K) `; T0 C6 t0 S: Q ]GDCS13:=CONST(REF(HIGH,GDCS1-1));
* N9 ?$ |0 G) S9 z5 yDINGBUTS1:REF(DINGBUTS,DDD+1),NODRAW;5 V( b7 e" O$ l$ g( j6 m/ e
GDCS2:=CONST(DINGBUTS1);. l& L% n9 s, b: `
GDCS23:=CONST(REF(HIGH,DINGBUTS1-1));) T2 r6 q: w+ H, a: \+ o
XG1:=BACKSET(ISLASTBAR,GDCS1);( \: @" i4 V7 u, y; ]( T1 o
XG2:=BACKSET(ISLASTBAR,DINGBUTS1);( C1 n+ R! Z) l6 q8 x4 k' U
高点压力:=DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1) ,COLORBLUE,LINETHICK1;. k+ e E# t& f
AA1:=REF(L,N)=LLV(L,2*N+1);
7 }3 R8 K# _5 h% S KQY1:=BACKSET(AA1,N+1);
# Y/ K$ k) ^ i! h6 U+ i$ U* gCC1:=FILTER(QY1,N) AND L=LLV(L,N+1);
8 v$ M" _! A. m. y, b) X aDD1:=BARSLAST(CC1);' Y& q; D( v7 C S. f3 P- O
DDTS:=IF(CC1,CURRBARSCOUNT,0);
# M# [2 n1 U7 _1 \' y" W" ADDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);
& W% e. g7 j* M: D# tDDCS1:=CONST(DDTS1);
8 }* g& n4 ^) u# yDDCS13:=CONST(REF(L,DDCS1-1));1 e6 `9 Q; o3 [ [- `5 n
DDTS2:=REF(DDTS1,DD1+1);
! u& h& _ h% a7 n; U6 d! yDDCS2:=CONST(DDTS2);, a( j% q# n" B: P" [- N
DDCS23:=CONST(REF(L,DDTS2-1));
$ I- P: R) u: z$ h; b# z& aXD1:=BACKSET(ISLASTBAR,DDCS1);
+ T9 E+ Q5 k* O( [4 ZXD2:=BACKSET(ISLASTBAR,DDTS2);% }' D( |% k5 F, t
低点支持:=DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1),COLORBLUE,LINETHICK1;
5 j7 t3 p( m% G# \ z, gDRAWBAND(高点压力,RGB(00,00,100),低点支持,RGB(00,00,00));
. Z4 ~' C" _- E# W; L7 b0 h: j3 E7 lZGSTAR:=(高点压力+低点支持)/2;
" T9 i) K! q/ p' g g+ {ZGEND:=CONST((高点压力+低点支持)/2);
( ^/ ]0 S8 g& o$ ^8 Q% dSTARDAY:=IF(DDCS2=本日阻力,本日阻力,本日阻力,10,1),LINETHICK2,COLOR0000FF;
, ]5 a" U5 m1 {% ySTICKLINE(ISLASTBAR AND C=本日支持,本日支持,本日支持,10,1),LINETHICK2,COLORFF00FF;! o; M, W) K3 y+ P& |# ~
STICKLINE(ISLASTBAR AND C |