Syntax
Public function AddCustomIndicatorCandles( chart_index as integer , ArrOpen as variant , arrHigh as variant , arrLow as variant , arrClose as variant , startPos as integer , optional subwindow as Boolean = true , optional win as long = 0 ,opional indicator as string = "Custom Indicator" , optional UpCandle as OLE_COLOR = -123 , optional DownCAndleColor as OLE_COLOR = -123 ,optional SeriesColor as OLE_COLOR = -123 ) as string
This function is used to add an indicator to the specified chart by giving it 4 buffers arrays and draw them as a candles.
Parameters
| Parameters | Description |
| chart_index | Chart position on the chart windows, 0 means the current chart, value of type integer |
| ArrOpen | The open prices array to be drawn. Value of type Variant. |
| arrHigh | The High prices array to be drawn. Value of type Variant. |
| arrLow | The Low prices array to be drawn. Value of type Variant. |
| arrClose | The close prices array to be drawn. Value of type Variant. |
| startPos | Start position to draw a custom indicator, value of type Integer. |
| Subwindow | Indicates to drawing a custom indicator in separate panel .if the value true, the indicator will be in separate panel, otherwise, it will be in the same panel (current panel). |
| Win | Panel (Sub window) Number.To Get the panel Number base on the series name, you can call GetSubWindow(). Value of type Long. |
| Indicator | Indicator name on data window, if the value not set, the name will appear as Customs indicator, value of type String. |
| UpCandle | color of the UP candles (close price less than high price) |
| DownCAndleColor | color of the down candles(high price less than close price) |
| SeriesColor | The color of the candle which Is not up or down. |
Return value
Returns the indicator name as a value of a string. If the function fails, the returned value will be an empty string, otherwise it will be a string value. To get the detailed error information, one has to call GetLastError().
Sample
Dim indKeyDim vchartIdDim vchartNameDim resultValuePublic Sub Main() Dim OpenArry() Dim highArry() Dim LowArry() Dim CloseArry() vchartId=chartId vchartName=ChartSymbol(Clng(vchartId)) CopyOpen 0,1, bars(0),OpenArry CopyHigh 0,1, bars(0),highArry CopyLow 0,1, bars(0),LowArry CopyClose 0,1, bars(0),CloseArry indKey=AddCustomIndicatorCandles(0, openArry , highArry,lowArray , closeArry ,1,False,0,"Indicator",VbRed,VbBlue)End SubSee Also