|
VAR1:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
. @$ _3 {: A: Z+ F! pVAR2:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));: @ t) f! e, }# Q* O3 i" u) {
VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));0 ?0 ~/ f. S9 x( i% q s
DIR1:=ABS(CLOSE-REF(CLOSE,5));
8 j( T* }$ Z) Q: R4 XVIR1:=SUM(ABS(CLOSE-REF(CLOSE,1)),5);) f# o; f- ~7 d1 q3 f0 V! F
ER1:=DIR1/VIR1;
* T* i M; r' p% u0 ]4 w3 P) I' MCS1:=ER1*(0.8-2/8)+2/8;
5 U& {4 B0 D8 R( @+ l% J; p pCQ1:=CS1*CS1;7 B2 A. s- A! K- D5 ^& l6 p* H, s
AMA1:EMA(DMA(CLOSE,CQ1),2) ,COLORWHITE;- v( F- j, Z |$ x& D! }
DIR2:=ABS(CLOSE-REF(CLOSE,10));
6 w2 J7 ^7 U3 g) _* g$ z N! PVIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10);
5 w) e Q. F% T$ _9 F, m4 j% P* pER2:=DIR2/VIR2;
0 ~5 m- p5 A; u A/ b$ kCS2:=ER2*(0.8-2/24)+2/24;1 c5 j; G: r+ k' |, o- N
CQ2:=CS2*CS2;
+ g. ^" `, g% S2 e+ b, `AMA2:EMA(DMA(CLOSE,CQ2),2),COLORGREEN,LINETHICK2;1 y: H8 g7 p1 a) t
AMA3:IF(AMA2/REF(AMA2,1)>0.997,AMA2,DRAWNULL),COLORYELLOW,LINETHICK2;
0 V3 Y1 a3 S% |8 m# Y8 ^AMA4:IF(AMA2/REF(AMA2,1)>1.001,AMA2,DRAWNULL),COLORRED,LINETHICK2;
5 C0 z; p/ `2 u0 ]8 f6 sSTICKLINE((VAR2 < MA(VAR3,6)),CLOSE,OPEN,3,1),COLOR008000;
' U7 b6 c" [' uSTICKLINE((VAR2 > MA(VAR3,6)),OPEN,CLOSE,3,1),COLORRED;* M9 H; g1 w2 Q* r, t8 t/ s
STICKLINE(((OPEN > CLOSE) AND (VAR2 > MA(VAR3,6))),(OPEN * 0.998),(CLOSE * 1.0001),2.3,0),COLOR008000;
# x5 d k& u: m) \! Q' [STICKLINE(((OPEN < CLOSE) AND (VAR2 < MA(VAR3,6))),(CLOSE * 0.998),(OPEN * 1.002),2.3,0),COLORRED;' w! i1 ?* `# D9 u C
STICKLINE(((OPEN > CLOSE) AND (VAR2 < MA(VAR3,6))),CLOSE,OPEN,2.3,0),COLOR008000;' I4 F, b5 U6 f0 o" n/ g
DRAWICON(CROSS(VAR2,MA(VAR3,6)),(LOW - (LOW*0.04)),7);' D5 _% j3 ]: k) v) I& f
DRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH+(HIGH*0.03)),8);
, J( ~# A/ o9 Z7 }( i$ LPT:=REF(H,1)-REF(L,1);- E+ L8 }3 ?0 t7 c) A
CDP:=(REF(H,1)+REF(L,1)+REF(C,1)*2)/4;
$ w) N! }3 T" GAH:=CDP+PT;& ~2 \% F6 F: \7 e( |1 Y& f
AL:=CDP-PT;) F/ [' `6 O6 O# u
NH:=CDP*2-REF(L,1);
8 t6 M3 O7 G' }NL:=CDP*2-REF(H,1);
& K* K; C! @5 \& l" \( x+ g强:IF(AH>REF(C,1)*1.1,REF(C,1)*1.1,AH)NODRAW;" {) H; E, q7 x0 j1 T! r% d& {
阻:IF(NH>强,(强-CDP)*0.618+CDP,NH)NODRAW,COLORCYAN;9 F$ D3 o- ]1 e( }9 A1 Z
M:=IF(AL |