+1 888 340 6572

Miscellaneous > Grid Complete

Article/Author: Omega Research, Inc., 1997

Download: GRID_COMPLETE.ELA

File Includes:

Indicator - Greed Complete 
Function - HighestPriceSoFar
Function - LowestPriceSoFar

Category: Indicator > Miscellaneous

Description:

This Indicator plots a complete grid (Horizontaland Vertical Lines) or a partial grid (Horizontalor Vertical Lines) as specified in the Inputs.The Grid lines that are plotted are fully adjustable.The Vertical Lines are adjustable on a bar by bar basis.The Horizontal Lines are adjustable on a Price basis.The only limitation for this Indicator is that no more than 650 Horizontal Lines can be plotted on any one chart. If this limit is exceeded the Horizontal lines will not be plotted and an error message will appear.

Usage:

Insert the indicator and set it up according to your needs.




Inputs:

H_or_V - specifies which lines will be plotted.("Both" = both lines, "H" = Horizontal, "V" = Vertical)
HInterval - determines the Horizontal Interval basedon price.
VInterval - determines the Vertical Interval based on number of bars.
HColor - specifies the Color of the Horizontal lines.

Format Notes:
Scaling should be set to Screen. Indicator should be plotted in sub-graph 1.
Vertical Line Color set in the Style tab. Horizontal Line Color set in the Inputs.
Horizontal Lines will move if you click and drag.

EasyLanguage Code:
INPUTS: H_OR_V("BOTH"), HINTERVL(1), VINTERVL(5), HCOLOR(TOOL_BLUE);

VARS: HVGRID(0), HIHI(0), LOLO(0), START(0), GRID(0), LCD(LASTCALCDATE), FLAG(TRUE);

IF UPPERSTR(H_OR_V) = "V" THEN
HVGRID = 1;
IF UPPERSTR(H_OR_V) = "H" THEN
HVGRID = -1;
IF UPPERSTR(H_OR_V) = "BOTH" OR UPPERSTR(H_OR_V) = "B" THEN
HVGRID = 2;

IF HVGRID = -1 OR HVGRID = 2 THEN BEGIN
HIHI = HIGHESTPRICESOFAR(HIGH);
LOLO = INTPORTION(LOWESTPRICESOFAR(LOW));
START = LOLO;
IF DATE = LASTCALCDATE AND TIME = LASTCALCTIME AND FLAG THEN BEGIN
WHILE START < HIHI BEGIN
GRID = TL_NEW(D[1], T[1], START, D, T, START);
START = START + HINTERVL;
TL_SETEXTRIGHT(GRID, TRUE);
TL_SETEXTLEFT(GRID, TRUE);
TL_SETCOLOR(GRID, HCOLOR);
END;
FLAG = FALSE;
END;
END;

IF HVGRID = 1 OR HVGRID = 2 THEN BEGIN
IF FRACPORTION(CURRENTBAR / VINTERVL) = 0 THEN BEGIN
PLOT1(1,"GRID");
PLOT2(0, "GRID");
END;
END;