Black Friday great discounts start today Learn more
+1 888 340 6572

Miscellaneous > NONPRICEUNIVERSALMR

Article/Author: Omega Research Inc., 1996

Download: NONPRICEUNIVERSALMR.ELA

File Includes: Indicator - NonPriceUniversalMR

Category: Indicator > Miscellaneous

Description:

This indicator plots a different study depending on the number typed in the TYPE input. MR Stands for Moving average Convergence Divergence through Rate of Change.

Usage:

The TYPE and Description of the Indicator can be found at the bottom of your PRINT-LOG. If nothing show up, look into the PRINT-LOG for proper use of the Inputs




Inputs:

Type:
1 - MACD Moving Average Convergence Divergence
2 - Momentum
3 - On BalanceVolume
4 - Percent Range
5 - Range
6 - Rate of Change
Price - the data series to use
Length - the trailing number of bars to use
Other - see below
Miscell - see below

EasyLanguage Code:
INPUT:TYPE(0),PRICE(CLOSE),LENGTH(10),OTHER(0),MISCELL(10);


VALUE3 = PRICE;

IF TYPE = 1 THEN BEGIN
VALUE1 = MACD(PRICE,LENGTH,OTHER);
IF DATE = LASTCALCDATE AND TIME = LASTCALCTIME THEN BEGIN
PRINT(TYPE:2:0," MOVING AVERAGE CONVERGENCE DIVERGENCE");
PRINT(TYPE:2:0," * * USE LENGTH FASTMA, USE OTHER FOR SLOWMA");
END;
END;
IF TYPE = 2 THEN BEGIN
VALUE1 = MOMENTUM(PRICE,LENGTH) ;
IF DATE = LASTCALCDATE AND TIME = LASTCALCTIME THEN
PRINT(TYPE:2:0," MOMENTUM");
END;
IF TYPE = 3 THEN BEGIN
VALUE1 = OBV;
IF DATE = LASTCALCDATE AND TIME = LASTCALCTIME THEN
PRINT(TYPE:2:0," ON BALANCE VOLUME");
END;
IF TYPE = 4 THEN BEGIN
VALUE1 = PERCENTR(LENGTH);
IF DATE = LASTCALCDATE AND TIME = LASTCALCTIME THEN
PRINT(TYPE:2:0," PERCENT RANGE");
END;
IF TYPE = 5 THEN BEGIN
VALUE1 = RANGE;
IF DATE = LASTCALCDATE AND TIME = LASTCALCTIME THEN
PRINT(TYPE:2:0," RANGE");
END;
IF TYPE = 6 THEN BEGIN
VALUE1 = RATEOFCHANGE(PRICE,LENGTH);
IF DATE = LASTCALCDATE AND TIME = LASTCALCTIME THEN
PRINT(TYPE:2:0," ROC RATE OF CHANGE");
END;

IF TYPE > 0 AND TYPE < 7 THEN
PLOT1(VALUE1,"NPUNIVMR");