RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;( r( h* H: b$ s, e
K:=SMA(RSV,3,1),COLORWHITE;
% T1 u" W9 g+ D1 ~. a* pD:=SMA(K,3,1),COLORYELLOW;; R: d! ^; W% g" ^! _4 b
J:=3*K-2*D,COLORFF00FF;
; E! _. ~; `5 _0 XA:=250;
6 _, n* _8 Y$ f1 {8 w X, kDIFF:=(EMA(CLOSE,12) - EMA(CLOSE,26));
* h% ?8 x: }5 O2 ODEA:=EMA(DIFF,9),COLORBLUE,LINETHICK0;, g# N% r0 y1 t ]5 V
MACD:=2*(DIFF-DEA);
6 a# P, \" G2 A- i( d+ ^MM:=IF(MACD< 0,MACD,0);
& H, y2 T& R" e# c# CJJ:=MM> REF(MM,1);
3 J' Z j* D$ y: tZZ:=REF(JJ,1)=1;
5 z) C; l$ S( L' L" M" ^ n" _, @准备:=(JJ AND ZZ)*DEA;
4 i9 b8 U; Z; E1 U. i$ _STICKLINE(准备=DEA,1,-1,2,1),COLORFFFF00;0 W; M6 M, X2 i4 {
JH:=HHV(MAX(K,MAX(D,J)),A);
. K. z$ e) M( d) F6 uDH:=HHV(MAX(DIFF,DEA),A);- t: ?8 ?! e8 V& f2 d* T
SH:=INTPART(JH/DH)/2;! U$ E& d6 i( [+ y7 } G4 M
DIFF50:=SH*DIFF+50,COLORFFFF00; `4 G# O5 d# e
DEA50:=SH*DEA+50,COLORBLUE;+ `7 Y9 L8 J% T2 f0 h
STICKLINE(DIFF50>DEA50,0,1.5*(DIFF50-DEA50),0,0),COLORRED;
: `# I- D" ^$ f ^$ u# ^# K$ tSTICKLINE(DIFF50REF(1.5*(DIFF50-DEA50),1),1.5*(DIFF50-DEA50),0),
2 ?0 t0 Q4 E$ R3 _% [* V. `& N1 \9 OSTICK,COLORLICYAN;
: T/ i( a, \3 `7 }# W+ w7 m绿柱:IF(1.5*(DIFF50-DEA50)0 AND REF(1.5*(DIFF50-DEA50),1)>REF(1.5*(DIFF50-DEA50),2) AND 1.5*(DIFF50-DEA50)< REF(1.5*(DIFF50-DEA50),1),1,0);
+ ^0 E4 O$ h1 K- k. S缩脚:=IF(1.5*(DIFF50-DEA50)REF(1.5*(DIFF50-DEA50),1),1,0);- Q" r2 j7 n3 i' F( \! F
杀多:=IF(1.5*(DIFF50-DEA50) REF(1.5*(DIFF50-DEA50),2) AND 1.5*(DIFF50-DEA50)0 AND REF(1.5*(DIFF50-DEA50),1)< REF(1.5*(DIFF50-DEA50),2) AND 1.5*(DIFF50-DEA50)>REF(1.5*(DIFF50-DEA50),1),1,0);
* Q$ H: _7 @# L
1 D5 q* e) D' R' T+ X t阻力:=IF(CROSS(C,MA(C,20)) OR CROSS(C,MA(C,60)),1,0);4 v) m: E& `9 N
DRAWTEXT(FILTER(杀多,3) AND 杀多,1.5*(DIFF50-DEA50),'杀多'),COLORFF00FF;
( G) x+ r" q: x; JDRAWTEXT(FILTER(缩头,3) AND 缩头,1.5*(DIFF50-DEA50)+0.2,'卖'),COLORFF00FF;6 ~, ]" T% _$ m0 P7 R
DRAWTEXT(FILTER(诱空,3) AND 诱空,1.5*(DIFF50-DEA50),'?洗盘'),COLOR00FF00;+ ^' X. h) C+ `/ K9 Y
DRAWTEXT(FILTER(缩脚,3) AND 缩脚,1.5*(DIFF50-DEA50)-0.2,'买'),COLOR00FF00;
, N9 I* h& r9 z2 ?- \DRAWTEXT(FILTER(阻力,16) AND 1.5*(DIFF50-DEA50)>=0,1.5*(DIFF50-DEA50)+0.01,'阻力'),COLOR00FFFF;
6 I7 `9 @7 v# z5 F) V6 u1 g$ I
. v8 M5 l" t% h' |% C; N) NVRA:=REF(CLOSE,1);
4 J5 j2 ?2 D7 O* aVRB:=SMA(MAX(CLOSE-VRA,0),6,1)/SMA(ABS(CLOSE-VRA),6,1)*100;
4 W; b! w7 P3 ?# K6 m x# Z+ eVRC:=(2*CLOSE+HIGH+LOW)/4; / `7 B& P! ^4 q! n! I/ o8 z
VR0:=LLV(LOW,34); 6 H2 c3 Y% K% U: Y: Z
VR1:=HHV(HIGH,34);
5 O3 x3 o8 u9 M3 V2 EVR2:=EMA((VRC-VR0)/(VR1-VR0)*100,6); # @ ?) C- k5 j6 n% ]: E
VR3:=EMA(0.667*REF(VR2,1)+0.333*VR2,4); ! K, o( s" E0 F2 b1 G* S
VA1:=(REF(HIGH,1)+REF(LOW,1))/2; " q7 d0 k$ o) y4 D
VA2:=MA(CLOSE,20)+2*STD(CLOSE,20);
, {5 b: m a3 ?VA3:=REF(CLOSE,1); ' p; o) a# a2 T& Z9 l( T: {1 `
VA4:=SMA(MAX(CLOSE-VA3,0),7,1)/SMA(ABS(CLOSE-VA3),7,1)*100; 4 ^' s" F: B7 v9 e7 Y# J) ~
VA5:=CROSS(79,VA4);
0 O1 _5 x' o2 bVA6:=FILTER(VA5,4);
4 C/ o$ Z- u6 `% B- mVVD:=MA(CLOSE,80)-MA(CLOSE,10)/3;
2 ]3 A Z" F7 NVA7:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);
8 d2 C# O! y. p& Z7 j% R& wX1:=CROSS(VA1,VA2) OR VA6; 5 E9 \$ k" Q, z0 N' d4 f7 i! ]
X2:=CROSS(84,VRB); 2 D# H% r' `& k9 S
0 K, S" I0 @! v% e0 ^- C9 o
STICKLINE(X1 OR X2,1.5*(DIFF50-DEA50)*1.05,1.5*(DIFF50-DEA50)*1.08,3,0); - {9 f V4 `* U7 `* c O
Y1:=IF(COUNT(CLOSE0.3 AND COUNT(VA2>VA3,3) AND REF(LOW,1)=LLV(LOW,120) AND CLOSE>OPEN,1,0); + F P* q K) S- l9 z0 ~, a* N( M2 A' o6 s
Y2:=IF(CLOSEMA(VOL,5)/240 AND CLOSE>REF(CLOSE,1)*1.08 AND CLOSEVR3,3) AND REF(LOW,1)=LLV(LOW,120) AND CLOSE>OPEN,1,0); . x3 r" j5 Y- {7 y
0 S0 w! ~4 u2 Z' ESTICKLINE(Y1 OR Y2 OR Y3 OR Y4,1.5*(DIFF50-DEA50)*0.90,1.5*(DIFF50-DEA50)*0.99,3,0);
& X$ H9 p0 @7 X" w( n, B+ V
- I2 C. k1 N4 S5 v' i! oDD:=C=HHV(C,180);
5 a; G) o# |# R. `. EEE:=DEA< REF(DEA,1) AND REF(DEA< REF(DEA,1),1)=1;
! y$ c- P* c/ p8 N! H" hCC:=C> REF(C,1) AND REF(C> REF(C,1),1)=1;
. q" r! E# c0 a( X0 n: U0 s" o上升背离 CC AND EE)*1.5*(DIFF50-DEA50),LINETHICK2,COLORWHITE; " M9 I7 j) Q1 H+ O5 P: `$ L2 m
顶背离:(DD AND EE AND DEA< HHV(DEA,180))*3*ABS(DIFF50-DEA50),STICK,LINETHICK3,COLORGREEN; . }7 T# P5 `/ |* o4 @1 u
FF:=C=LLV(C,180);
4 o% {, j# x0 \* j$ }4 ^! `GG:= DEA> REF(DEA,1) AND REF(DEA> REF(DEA,1),1)=1;
5 k+ l' r% ^; q& J5 \! nLL:=C< REF(C,1) AND REF(C< REF(C,1),1)=1; 6 \" `7 I( d8 r' h1 ^8 J" t* Q5 X
降落背离:(LL AND GG)*1.5*(DIFF50-DEA50),LINETHICK2,COLORYELLOW;
) [8 z% @; U9 N$ j: T底背离:(FF AND GG AND DEA> LLV(DEA,180))*3*(DIFF50-DEA50),STICK,LINETHICK3,COLORRED; |