N 1 100 8)
, x1 A; t% G/ Z) g5 v" p8 c( p! r5 d' p3 ?
ZGD:=HHV(H,50);
2 q1 K* Z9 |; D9 v. i& f0 U( xZGD2:=CONST(ZGD)*1.08;
/ l" i/ L. Q5 P0 A6 WZDD:=LLV(L,50);
" W, e8 e8 }: j7 U0 u% U# ZZDD2:=CONST(ZDD)*0.9;
; q- b9 m$ c* g. ?, w b" KDRAWBAND(ZGD2,RGB(100,100,100),ZDD2,RGB(00,00,00));
1 e. I5 [$ {3 W1 m) s8 yGJ:=(C+H+L+O)/4;
, h5 m- w( y' \9 d# G嫡阻力:=L+(GJ-L)+(C-L);# J/ X" O h+ v9 a( I
嫡支持:=L+(C-GJ);
' ^- ]' y! F+ P d. ?0 e9 y2 x本日阻力:REF(嫡阻力 , 1),NODRAW;
3 K% U6 c5 R8 l6 S6 T' H本日支持:REF(嫡支持 , 1),NODRAW;) |2 f8 {: q; U- x" e0 b/ a
下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);; P5 {! l4 X1 \+ m! t
RRRSV:=SMA(下档线,3,1);4 o) i' P% Q! Y" x
KKK:=SMA(RRRSV,3,1);
4 {5 e+ L5 |2 s/ k4 J. o. |DDDDD:=((3 * RRRSV) - (2 * KKK));- e0 b y7 z! G5 m
JJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);
3 `. k* l$ W$ p1 g! F6 U, URSV24:=SMA(JJ12,3,1);! a4 i' V$ t; W) ^+ e
K24:=SMA(RSV24,3,1);
2 \$ x( K& z9 i# Y: lD24:=((3 * RSV24) - (2 * K24));
1 x8 w8 ?+ D% k' ~1 D7 v$ A" z; F7 B6 B压力2:=IF(CROSS(D24,DDDDD),HIGH,REF(HIGH,BARSLAST(CROSS(D24,DDDDD)))),COLORFFFFFF;; B. s+ y9 r5 T
压力位:IF(ISLASTBAR,压力2,DRAWNULL),NODRAW;
& e. N! ?; F; H# R: I底部:=LLV(HIGH,30),COLOR00FF00;8 E g a( P5 \3 y A. l3 r
底部位:IF(ISLASTBAR,底部,DRAWNULL),NODRAW;7 v1 z+ @* j, Z6 G8 N' ~
AA:=REF(H,N)=HHV(H,2*N+1);
. \- e0 ^0 q/ ], O9 s( vQY:=BACKSET(AA,N+1);
: r& w' y" k( V6 N# S/ @" G2 |; OCC:=FILTER(QY,N) AND H=HHV(H,N+1);
" U: I! g) Z9 T+ S( W3 V9 YDDD:BARSLAST(CC),NODRAW;
$ P( \% _( S+ x5 P) _6 BGDTS:IF(CC,CURRBARSCOUNT,0),NODRAW;
4 Y6 r9 Z+ A( r# ^1 vDINGBUTS:IF(DDD,REF(GDTS,DDD),GDTS),NODRAW;
. j) U" d) z1 v z# r& I' wGDCS1:CONST(DINGBUTS),NODRAW;1 f: Y- [) O" G4 T( k4 `+ y2 C
GDCS13:=CONST(REF(HIGH,GDCS1-1));5 O3 f% s. P! X4 l' F
DINGBUTS1:REF(DINGBUTS,DDD+1),NODRAW;) p$ I9 M: `8 f* K& V5 W& y; V, t
GDCS2:=CONST(DINGBUTS1);
' S- ?. c& T4 D; b* ]; BGDCS23:=CONST(REF(HIGH,DINGBUTS1-1));2 M7 a3 Z. e# `* s4 P
XG1:=BACKSET(ISLASTBAR,GDCS1);
# j( ^& b; J1 E& l. oXG2:=BACKSET(ISLASTBAR,DINGBUTS1);" n" T% D/ _# Y8 ~ Y
高点压力:=DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1) ,COLORBLUE,LINETHICK1;
. ~) P2 }0 @1 j( dAA1:=REF(L,N)=LLV(L,2*N+1);
6 s) m1 w1 _; G( x2 _& XQY1:=BACKSET(AA1,N+1);
$ @9 V( w. r9 f* N/ dCC1:=FILTER(QY1,N) AND L=LLV(L,N+1);
$ B+ z: |( @% H" t* S9 mDD1:=BARSLAST(CC1);1 b+ m4 a/ o# o( G3 I5 Q Y/ w$ P/ W
DDTS:=IF(CC1,CURRBARSCOUNT,0);
# ]" {) P z, |! f. T: ^9 ODDTS1:=IF(DD1,REF(DDTS,DD1),DDTS); x6 Z: G+ A; d4 t- B% \% t
DDCS1:=CONST(DDTS1);
1 U& S( T9 X% QDDCS13:=CONST(REF(L,DDCS1-1));8 m1 C; Q3 \" b6 f" M3 K+ d# M
DDTS2:=REF(DDTS1,DD1+1);
4 D! w# X$ Q5 O" j' y' {! ^3 bDDCS2:=CONST(DDTS2);2 e* ?3 D8 k4 T# q z6 f; g* N2 ?$ E
DDCS23:=CONST(REF(L,DDTS2-1));5 q) ~; ]4 h) u
XD1:=BACKSET(ISLASTBAR,DDCS1);
5 { A @8 Y k% t, `XD2:=BACKSET(ISLASTBAR,DDTS2);
$ S# e" F; }: t低点支持:=DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1),COLORBLUE,LINETHICK1;
9 l0 w5 Z4 N2 f+ u9 B2 _! _DRAWBAND(高点压力,RGB(00,00,100),低点支持,RGB(00,00,00));, w$ `6 ~% O4 h
ZGSTAR:=(高点压力+低点支持)/2;
( [2 T! z! p0 \) v) xZGEND:=CONST((高点压力+低点支持)/2);/ F+ R+ r6 q1 l. i# j% k
STARDAY:=IF(DDCS2=本日阻力,本日阻力,本日阻力,10,1),LINETHICK2,COLOR0000FF;
. e7 [' F+ t1 l- q* X' b% e: f( l2 U! OSTICKLINE(ISLASTBAR AND C=本日支持,本日支持,本日支持,10,1),LINETHICK2,COLORFF00FF;- G% \0 n l0 M7 Q: s0 b' N
STICKLINE(ISLASTBAR AND C |