Download: FUNCTION-TROUGDIV.ELA
File Includes: Function - TroughDivergence
Category: Function > TroughDivergence
Description:
Inputs:
Strength
OSC
EasyLanguage Code:
INPUTS: STRENGTH(NUMERICSIMPLE), OSC(NUMERICSERIES);
VARS: IC(0), IH(0), IP(0), IL(0), LC(0), LP(0), LH(0), LL(0);
VALUE1=SWINGLOW(1,LOW,STRENGTH,STRENGTH+1);
IF VALUE1<>-1 THEN BEGIN
LP=LC;
LC=VALUE1;
IP=IC;
IC=OSC[STRENGTH];
LH=VALUE2;
LL=VALUE3;
VALUE2=HIGHEST(LOW,STRENGTH+1);
VALUE3=LOWEST(LOW,STRENGTH+1);
IH=VALUE4;
IL=VALUE5;
VALUE4=HIGHEST(OSC,STRENGTH+1);
VALUE5=LOWEST(OSC,STRENGTH+1);
END;
IF LOW>VALUE2 THEN VALUE2=LOW;
IF LOWTHEN VALUE3=LOW;
IF OSC>VALUE4 THEN VALUE4=OSC;
IF OSCTHEN VALUE5=OSC;
IF (LH-LL)=0 OR (IH-IL)=0 THEN TROUGHDIVERGENCE=TROUGHDIVERGENCE[1]
ELSE
TROUGHDIVERGENCE=50*(((IC-IP)/(IH-IL))-((LC-LP)/(LH-LL)));
{COPYRIGHT C 1997, TECHNICAL ANALYSIS, INC.}