|
N 1 100 8)! X9 W4 t8 X5 r2 D' o1 R9 P
! {) ?+ _" O, q+ q8 h3 Z3 W
ZGD:=HHV(H,50);1 W9 r9 C, N( V+ B. n! Z! P$ U
ZGD2:=CONST(ZGD)*1.08;3 I% S: R8 y' ?; X5 j. P+ E
ZDD:=LLV(L,50);
$ I# U- S! }- }* UZDD2:=CONST(ZDD)*0.9;4 s6 E E9 u) J3 Y
DRAWBAND(ZGD2,RGB(100,100,100),ZDD2,RGB(00,00,00));& O; I' Q# S8 p! q; R6 U& u
GJ:=(C+H+L+O)/4;
2 x" T/ C: b N u3 N嫡阻力:=L+(GJ-L)+(C-L);. k- g* S; g2 M& B
嫡支持:=L+(C-GJ);+ I8 u" {+ `0 R8 O! t# a) W) ?8 f
本日阻力:REF(嫡阻力 , 1),NODRAW;' N) z0 o& T3 t1 U/ J* D
本日支持:REF(嫡支持 , 1),NODRAW;- b* _/ [0 S- h$ p$ `" j4 j
下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);
3 ^6 u+ S F% M6 t0 i$ tRRRSV:=SMA(下档线,3,1);; ^9 ^; R! K* ~
KKK:=SMA(RRRSV,3,1);
: n( w" a( Z* u* X6 mDDDDD:=((3 * RRRSV) - (2 * KKK));
3 v: c( i/ N- @- CJJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);
2 v) X# ]) |4 iRSV24:=SMA(JJ12,3,1);! m# t$ B9 x& i* A' O
K24:=SMA(RSV24,3,1);
3 z8 U3 E0 e. {0 x$ j# |D24:=((3 * RSV24) - (2 * K24));
" X7 Y0 c; V4 ?! B压力2:=IF(CROSS(D24,DDDDD),HIGH,REF(HIGH,BARSLAST(CROSS(D24,DDDDD)))),COLORFFFFFF;
2 }# t/ O" k9 K9 v1 I9 r8 H0 y压力位:IF(ISLASTBAR,压力2,DRAWNULL),NODRAW;1 u8 `6 I# E& u* f6 a6 H0 e
底部:=LLV(HIGH,30),COLOR00FF00;
6 o) E$ h; ^6 M, w# M5 p# }* Y底部位:IF(ISLASTBAR,底部,DRAWNULL),NODRAW;
: {" A k- N( k) nAA:=REF(H,N)=HHV(H,2*N+1);
7 }$ X. {2 L' D0 F& yQY:=BACKSET(AA,N+1);
7 D' K$ L. Z. c$ DCC:=FILTER(QY,N) AND H=HHV(H,N+1);
6 t& V% P' a! x: gDDD:BARSLAST(CC),NODRAW;2 O1 W3 b0 L+ u3 f4 K$ o9 o$ e
GDTS:IF(CC,CURRBARSCOUNT,0),NODRAW;
) @9 F' `) @) Y1 u* CDINGBUTS:IF(DDD,REF(GDTS,DDD),GDTS),NODRAW;
7 G- r& ^0 r1 Y7 S; W; W6 S, hGDCS1:CONST(DINGBUTS),NODRAW;
+ O4 K+ B1 N5 v4 h( _' `# \GDCS13:=CONST(REF(HIGH,GDCS1-1));0 o/ ]* L: x2 }( o* }
DINGBUTS1:REF(DINGBUTS,DDD+1),NODRAW;' Y; v7 e( R! a/ t, X3 x
GDCS2:=CONST(DINGBUTS1);' {4 n) k% T- |3 e
GDCS23:=CONST(REF(HIGH,DINGBUTS1-1));0 K: B6 b H2 S' l' I7 L
XG1:=BACKSET(ISLASTBAR,GDCS1);2 y% P5 Y4 V6 T7 \7 v9 x$ ~
XG2:=BACKSET(ISLASTBAR,DINGBUTS1);, J1 ]7 u4 j7 M) l3 ]/ J
高点压力:=DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1) ,COLORBLUE,LINETHICK1;' G$ i0 l7 S& A' l
AA1:=REF(L,N)=LLV(L,2*N+1);7 @# R* e; Q; ~5 F5 {
QY1:=BACKSET(AA1,N+1);, V$ A5 ?9 n; n. e/ {' B) j
CC1:=FILTER(QY1,N) AND L=LLV(L,N+1);8 ^7 ~" w: h4 n: a( F; J# K
DD1:=BARSLAST(CC1);
$ D3 k$ S: U5 F* l" Z' c, sDDTS:=IF(CC1,CURRBARSCOUNT,0);- W7 C4 w( n; l; N0 s
DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);
& l( j( x' ? ~" |DDCS1:=CONST(DDTS1);
. G: ^' {% l$ a/ d {' u* nDDCS13:=CONST(REF(L,DDCS1-1));! q, d, p: c+ ]! d2 D; H
DDTS2:=REF(DDTS1,DD1+1);
$ X, v* D7 f$ H8 e0 z& Z1 KDDCS2:=CONST(DDTS2);+ \8 t) n( A3 c$ M" u
DDCS23:=CONST(REF(L,DDTS2-1));
' u8 h) Z' E/ V$ [6 ~XD1:=BACKSET(ISLASTBAR,DDCS1);
/ n: l8 n- @0 a! c" w0 e; M! wXD2:=BACKSET(ISLASTBAR,DDTS2);2 ]! c* Q. W# P/ O' a& U
低点支持:=DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1),COLORBLUE,LINETHICK1;
- n& Y4 \, ^6 D# qDRAWBAND(高点压力,RGB(00,00,100),低点支持,RGB(00,00,00));
" [1 y% t | l zZGSTAR:=(高点压力+低点支持)/2;
9 q4 x$ ]& c: ~+ I; Z. ^1 PZGEND:=CONST((高点压力+低点支持)/2);# t; u4 { H) T* ^. Q
STARDAY:=IF(DDCS2=本日阻力,本日阻力,本日阻力,10,1),LINETHICK2,COLOR0000FF;
* m3 z6 C+ j$ h# t2 CSTICKLINE(ISLASTBAR AND C=本日支持,本日支持,本日支持,10,1),LINETHICK2,COLORFF00FF;
2 b' @8 V. f+ ^ J; i0 k! bSTICKLINE(ISLASTBAR AND C |