LongBlackForm

Description

This function determines whether a down day qualifies as a long form. The real body must be greater than the CLONGREAL constant, or 60 percent. You can adjust this test by modifying the CLONGREAL constant.

Formulas

LongBlackForm(instrument, targetBar)={

  return = FALSE

  if BodyPercent(instrument, targetBar) > CLONG then {

    if abs(RealBody(instrument, targetBar)) > CLONGREAL then {

      if vchart(instrument.last[GetBar(targetBar)]) < vchart(instrument.open[GetBar(targetBar)]) then {

        if vchart(instrument.open[GetBar(targetBar)]) < vchart(instrument.high[GetBar(targetBar)]) then {

          if vchart(instrument.last[GetBar(targetBar)]) >= vchart(instrument.low[GetBar(targetBar)]) then return = TRUE

        }

        if vchart(instrument.last[GetBar(targetBar)]) > vchart(instrument.low[GetBar(targetBar)]) then {

          if vchart(instrument.open[GetBar(targetBar)]) <=   vchart(instrument.high[GetBar(targetBar)]) then return = TRUE

        }

      }

    }

  }

  return

}

Parameters

instrument

An instrument.

targetBar

The index of the bar you want to evaluate. 0 is the current bar, 1 is the first bar back, etc.

Return Value

TRUE or FALSE

Examples

...

    if LongBlackForm($1, targetBar) == TRUE then begin

...

Comments