N 1 100 8)
: y- X' B8 s) p: s: X/ f; O1 u p- d
ZGD:=HHV(H,50);: K) O: d! n/ J; J5 w Y0 c
ZGD2:=CONST(ZGD)*1.08;
' j) G- O; I3 b7 j, h0 g. UZDD:=LLV(L,50);$ n1 e4 h% D5 ?$ V' _2 Y' q
ZDD2:=CONST(ZDD)*0.9;
. @8 ~* c1 \* r2 a& A1 f0 [DRAWBAND(ZGD2,RGB(100,100,100),ZDD2,RGB(00,00,00));- t' {: X3 b. I/ z$ y7 B
GJ:=(C+H+L+O)/4;
, c& D8 g. J( o+ h嫡阻力:=L+(GJ-L)+(C-L);
3 |% O7 i2 z; Q }% D- N, r嫡支持:=L+(C-GJ);
$ n/ p* {% u! i/ d a7 C: E" {% u本日阻力:REF(嫡阻力 , 1),NODRAW;
. a# {% k1 _& a. i! V本日支持:REF(嫡支持 , 1),NODRAW;
, V; h6 E% S* o5 k* s& _下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);
, o1 q3 s2 c7 N, J5 qRRRSV:=SMA(下档线,3,1);
2 v: M8 i- j r$ gKKK:=SMA(RRRSV,3,1);
2 Z# e5 X9 n' I4 O, d' s6 qDDDDD:=((3 * RRRSV) - (2 * KKK));8 M' S8 P( ~* Z- w6 U
JJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);
- [. H" |- q4 {* ?: N3 m$ wRSV24:=SMA(JJ12,3,1);
2 r" K# Q5 @* C! sK24:=SMA(RSV24,3,1);' l9 Z6 D/ }+ G$ E+ N
D24:=((3 * RSV24) - (2 * K24));$ b _5 X) m7 R) L) |' U
压力2:=IF(CROSS(D24,DDDDD),HIGH,REF(HIGH,BARSLAST(CROSS(D24,DDDDD)))),COLORFFFFFF;4 W; `$ \! p% W# @
压力位:IF(ISLASTBAR,压力2,DRAWNULL),NODRAW; g6 I3 @( y9 b% p" }, N/ e
底部:=LLV(HIGH,30),COLOR00FF00;7 s& G4 a( k1 B9 K" F6 U8 _
底部位:IF(ISLASTBAR,底部,DRAWNULL),NODRAW;: O- t) B$ R; S9 D/ ?
AA:=REF(H,N)=HHV(H,2*N+1);
+ V# l5 S# x9 l0 p: i7 DQY:=BACKSET(AA,N+1);
/ L Y5 H- q i7 qCC:=FILTER(QY,N) AND H=HHV(H,N+1);
2 i+ q; G. r3 L6 z D ?( }DDD:BARSLAST(CC),NODRAW;
& f: I4 ?) S% [9 UGDTS:IF(CC,CURRBARSCOUNT,0),NODRAW;+ T; C, r$ P4 _( g, c5 M. q7 g7 `
DINGBUTS:IF(DDD,REF(GDTS,DDD),GDTS),NODRAW;
2 y9 e- E4 _9 r( l$ S* n: JGDCS1:CONST(DINGBUTS),NODRAW;) j3 K! _" u0 I0 l9 ^5 w
GDCS13:=CONST(REF(HIGH,GDCS1-1));
9 g/ q; X" @3 B& b2 K) M" E3 GDINGBUTS1:REF(DINGBUTS,DDD+1),NODRAW;6 {9 L; f4 L9 E
GDCS2:=CONST(DINGBUTS1);
) p" E8 ~1 {/ ]+ H0 iGDCS23:=CONST(REF(HIGH,DINGBUTS1-1));
' U1 C( f! t H3 \XG1:=BACKSET(ISLASTBAR,GDCS1);7 Y8 N0 U' _ E# S
XG2:=BACKSET(ISLASTBAR,DINGBUTS1);
& r6 u8 J+ S3 V2 c# x高点压力:=DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1) ,COLORBLUE,LINETHICK1;
4 W" E/ H. i& ?, p) fAA1:=REF(L,N)=LLV(L,2*N+1);! S$ m8 }- l% v9 c3 V( S
QY1:=BACKSET(AA1,N+1);1 w( Y; Z6 @5 Y# ~, j/ A$ j
CC1:=FILTER(QY1,N) AND L=LLV(L,N+1);9 Q0 W2 ^# E0 Z3 O! \3 u
DD1:=BARSLAST(CC1);
7 V2 }6 g) q A" }2 [% kDDTS:=IF(CC1,CURRBARSCOUNT,0);
3 r% t: F e: a; g7 HDDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);0 k4 S* p" o7 _! ?4 O. u+ D8 E- G* J
DDCS1:=CONST(DDTS1);
$ q1 `; c4 m/ S! ?* x( n/ H+ QDDCS13:=CONST(REF(L,DDCS1-1));
" G$ g T) T! T `9 c/ P' V6 ]DDTS2:=REF(DDTS1,DD1+1);) z( F6 s9 U0 d6 ~- G
DDCS2:=CONST(DDTS2);8 M1 T; g% F7 Z2 ?. d' R
DDCS23:=CONST(REF(L,DDTS2-1));& d9 o: M; F4 I1 e; S
XD1:=BACKSET(ISLASTBAR,DDCS1);, V+ m5 k( I) W' X
XD2:=BACKSET(ISLASTBAR,DDTS2);, @& v# j4 y7 h$ L1 H" W
低点支持:=DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1),COLORBLUE,LINETHICK1;6 r; n4 m. z! f* o* P% g; i
DRAWBAND(高点压力,RGB(00,00,100),低点支持,RGB(00,00,00));
+ b. }) |3 I5 G% @) Z, QZGSTAR:=(高点压力+低点支持)/2;$ I) O ^4 p% k9 K! K9 M. @
ZGEND:=CONST((高点压力+低点支持)/2);& J& G5 n9 F3 `; N3 \
STARDAY:=IF(DDCS2=本日阻力,本日阻力,本日阻力,10,1),LINETHICK2,COLOR0000FF;7 p4 {6 ~7 o1 B2 j; I% k
STICKLINE(ISLASTBAR AND C=本日支持,本日支持,本日支持,10,1),LINETHICK2,COLORFF00FF;2 I6 B9 G& i/ x) C2 I7 U
STICKLINE(ISLASTBAR AND C |