+1 888 340 6572

Miscellaneous > NONPRICEUNIVERSALSU

Article/Author: Omega Research Inc., 1996

Download: NONPRICEUNIVERSALSU.ELA

File Includes: Indicator - NonPriceUniversalSU

Category: Indicator > Miscellaneous

Description:

This indicator plots a different study depending on the number typed in the TYPE input. SU Stands for Standard Deviation through Ultimate Oscillator.

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 - Standard Deviation
2 - Stochastics FAST, K and D
3 - Stochastics SLOW, K and D
4 - Summation
5 - Swing Index
6 - Ultimate Oscillator
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);


VALUE5 = OTHER;

IF TYPE = 1 THEN BEGIN
VALUE1 = STDDEV(PRICE,LENGTH);
IF DATE = LASTCALCDATE AND TIME = LASTCALCTIME THEN
PRINT(TYPE:2:0," STANDARD DEVIATION");
END;
IF TYPE = 2 THEN BEGIN
VALUE1 = FASTK(LENGTH);
VALUE2 = FASTD(LENGTH);
VALUE3 = OTHER;
VALUE4 = MISCELL;
IF DATE = LASTCALCDATE AND TIME = LASTCALCTIME THEN BEGIN
PRINT(TYPE:2:0," STOCHASTICS FAST");
PRINT(TYPE:2:0," * * USE OTHER FOR SELLZONE AND MISCELL FOR BUYZONE * *");
END;
END;
IF TYPE = 3 THEN BEGIN
VALUE1 = SLOWK(LENGTH);
VALUE2 = SLOWD(LENGTH);
VALUE3 = OTHER;
VALUE4 = MISCELL;
IF DATE = LASTCALCDATE AND TIME = LASTCALCTIME THEN BEGIN
PRINT(TYPE:2:0," STOCHASTICS SLOW");
PRINT(TYPE:2:0," * * USE OTHER FOR SELLZONE AND MISCELL FOR BUYZONE * *");
END;
END;
IF TYPE = 4 THEN BEGIN
VALUE1 = SUMMATION(PRICE,LENGTH);
IF DATE = LASTCALCDATE AND TIME = LASTCALCTIME THEN
PRINT(TYPE:2:0," SUMMATION");
END;
IF TYPE = 5 THEN BEGIN
VALUE1 = SWINGINDEX;
IF DATE = LASTCALCDATE AND TIME = LASTCALCTIME THEN
PRINT(TYPE:2:0," SWING INDEX");
END;
IF TYPE = 6 THEN BEGIN
IF VALUE5 < MAXBARSBACK THEN
VALUE1 = ULTIMATEOSC(LENGTH,VALUE5,MISCELL);
IF DATE = LASTCALCDATE AND TIME = LASTCALCTIME THEN BEGIN
PRINT(TYPE:2:0," ULTIMATE OSCILLATOR");
PRINT(TYPE:2:0," * * USE LENGTH FOR AVG1, OTHER FOR AVG2 AND MISCELL FOR AVG3 * *");
END;
END;

IF TYPE > 0 AND TYPE < 7 AND TYPE <> 2 AND TYPE <> 3 THEN
PLOT1(VALUE1,"NPUNIVSU") ELSE IF TYPE = 2 THEN BEGIN
PLOT1(VALUE1,"NPUNIVSU");
PLOT2(VALUE2,"PLOT2");
PLOT3(VALUE3,"SELLZONE");
PLOT4(VALUE4,"BUYZONE");
END ELSE IF TYPE = 3 THEN BEGIN
PLOT1(VALUE1,"NPUNIVSU");
PLOT2(VALUE2,"PLOT2");
PLOT3(VALUE3,"SELLZONE");
PLOT4(VALUE4," ");
END;