Files
mtapi/mq4/MtApi.mq4
T

4306 lines
238 KiB
Plaintext
Executable File

#property copyright "Vyacheslav Demidyuk"
#property link "http://mtapi4.net/"
#property version "1.7"
#property description "MtApi connection expert"
#include <WinUser32.mqh>
#include <stdlib.mqh>
#include <json.mqh>
#import "MTConnector.dll"
bool initExpert(int expertHandle, int port, string symbol, double bid, double ask, string& err);
bool deinitExpert(int expertHandle, string& err);
bool updateQuote(int expertHandle, string symbol, double bid, double ask, string& err);
bool sendEvent(int expertHandle, int eventType, string payload, string& err);
bool sendIntResponse(int expertHandle, int response);
bool sendBooleanResponse(int expertHandle, int response);
bool sendDoubleResponse(int expertHandle, double response);
bool sendStringResponse(int expertHandle, string response);
bool sendVoidResponse(int expertHandle);
bool sendDoubleArrayResponse(int expertHandle, double& values[], int size);
bool sendIntArrayResponse(int expertHandle, int& values[], int size);
bool sendLongResponse(int expertHandle, long response);
bool getCommandType(int expertHandle, int& res);
bool getIntValue(int expertHandle, int paramIndex, int& res);
bool getDoubleValue(int expertHandle, int paramIndex, double& res);
bool getStringValue(int expertHandle, int paramIndex, string& res);
bool getBooleanValue(int expertHandle, int paramIndex, int& res);
#import
extern int Port = 8222;
int ExpertHandle;
string message;
bool isCrashed = FALSE;
bool IsRemoteReadyForTesting = false;
string symbolValue;
string commentValue;
string msgValue;
string captionValue;
string filenameValue;
string ftp_pathValue;
string subjectValue;
string some_textValue;
string nameValue;
string prefix_nameValue;
string requestValue;
int barsCount;
int priceCount;
int volumeCount;
int timeCount;
int index;
int paramIndex;
int arraySize;
int pCommandType;
int cmdValue;
int slippageValue;
int ticketValue;
int oppositeValue;
int magicValue;
int expirationValue;
int arrow_colorValue;
int colorValue;
int indexValue;
int selectValue;
int poolValue;
int errorCodeValue;
int typeValue;
int flagValue;
int millisecondsValue;
int dateValue;
int timeValue;
int timeframeValue;
int shiftValue;
int periodValue;
int applied_priceValue;
int modeValue;
int deviationValue;
int bands_shiftValue;
int ma_periodValue;
int ma_methodValue;
int ma_shiftValue;
int jaw_periodValue;
int jaw_shiftValue;
int teeth_periodValue;
int teeth_shiftValue;
int lips_periodValue;
int lips_shiftValue;
int tenkan_senValue;
int kijun_senValue;
int senkou_span_bValue;
int fast_ema_periodValue;
int slow_ema_periodValue;
int signal_periodValue;
int KperiodValue;
int DperiodValue;
int slowingValue;
int methodValue;
int price_fieldValue;
int exactValue;
int startValue;
int countValue;
int totalValue;
int tempIntValue;
int timeArray[];
int intValuesArray[];
double result;
double lotsValue;
double volumeValue;
double priceValue;
double stoplossValue;
double takeprofitValue;
double valueValue;
double check_value;
double deviationDoubleValue;
double stepValue;
double maximumValue;
double tempDoubleValue;
double priceArray[];
double volumeArray[];
double doubleValuesArray[];
int _lastBarOpenTime;
class MtOrder
{
public:
int getTicket() { return _ticket; }
string getSymbol() { return _symbol; }
int getOperation() { return _operation; }
double getOpenPrice() { return _openPrice; }
double getClosePrice() { return _closePrice; }
double getLots() { return _lots; }
double getProfit() { return _profit; }
string getComment() { return _comment; }
double getCommission() { return _commission; }
int getMagicNumber() { return _magicNumber; }
datetime getOpenTime() { return _openTime; }
datetime getCloseTime() { return _closeTime; }
double getSwap() { return _swap; }
datetime getExpiration() { return _expiration; }
double getTakeProfit() { return _takeProfit; }
double getStopLoss() { return _stopLoss; }
static bool isLong(int operation)
{
if (operation == OP_BUY || operation == OP_BUYLIMIT || operation == OP_BUYSTOP)
return true;
return false;
}
JSONObject* CreateJson()
{
JSONObject *jo = new JSONObject();
jo.put("Ticket", new JSONNumber(_ticket));
jo.put("Symbol", new JSONString(_symbol));
jo.put("Operation", new JSONNumber(_operation));
jo.put("OpenPrice", new JSONNumber(_openPrice));
jo.put("ClosePrice", new JSONNumber(_closePrice));
jo.put("Lots", new JSONNumber(_lots));
jo.put("Profit", new JSONNumber(_profit));
jo.put("Comment", new JSONString(_comment));
jo.put("Commission", new JSONString(_commission));
jo.put("MagicNumber", new JSONNumber(_magicNumber));
jo.put("Commission", new JSONString(_commission));
jo.put("MagicNumber", new JSONNumber(_magicNumber));
jo.put("MtOpenTime", new JSONNumber(_openTime));
jo.put("MtCloseTime", new JSONNumber(_closeTime));
jo.put("Swap", new JSONNumber(_swap));
jo.put("MtExpiration", new JSONNumber(_expiration));
jo.put("TakeProfit", new JSONNumber(_takeProfit));
jo.put("StopLoss", new JSONNumber(_stopLoss));
return jo;
}
static MtOrder* LoadOrder(int index, int select, int pool)
{
MtOrder* order = NULL;
if (OrderSelect(index, select, pool))
{
order = new MtOrder();
order._ticket = OrderTicket();
order._symbol = OrderSymbol();
order._operation = OrderType();
order._openPrice = OrderOpenPrice();
order._closePrice = OrderClosePrice();
order._lots = OrderLots();
order._profit = OrderProfit();
order._comment = OrderComment();
order._commission = OrderCommission();
order._magicNumber = OrderMagicNumber();
order._openTime = OrderOpenTime();
order._closeTime = OrderCloseTime();
order._swap = OrderSwap();
order._expiration = OrderExpiration();
order._takeProfit = OrderTakeProfit();
order._stopLoss = OrderStopLoss();
}
return order;
}
private:
int _ticket;
string _symbol;
int _operation;
double _openPrice;
double _closePrice;
double _lots;
double _profit;
string _comment;
double _commission;
int _magicNumber;
datetime _openTime;
datetime _closeTime;
double _swap;
datetime _expiration;
double _takeProfit;
double _stopLoss;
};
class MtTimeBar
{
public:
MtTimeBar(string symbol, datetime openTime, datetime closeTime, double open, double close, double high, double low)
{
_symbol = symbol;
_openTime = openTime;
_closeTime = closeTime;
_open = open;
_close = close;
_high = high;
_low = low;
}
string getSymbol() { return _symbol; }
datetime getOpenTime() { return _openTime; }
datetime getCloseTime() { return _closeTime; }
double getOpen() { return _open; }
double getClose() { return _close; }
double getHigh() { return _high; }
double getLow() { return _low; }
JSONObject* CreateJson()
{
JSONObject *jo = new JSONObject();
jo.put("Symbol", new JSONString(_symbol));
jo.put("MtOpenTime", new JSONNumber(_openTime));
jo.put("MtCloseTime", new JSONNumber(_closeTime));
jo.put("Open", new JSONNumber(_open));
jo.put("Close", new JSONNumber(_close));
jo.put("High", new JSONNumber(_high));
jo.put("Low", new JSONNumber(_low));
return jo;
}
private:
string _symbol;
datetime _openTime;
datetime _closeTime;
double _open;
double _close;
double _high;
double _low;
};
class MtSession
{
public:
static MtSession* LoadSession(string symbol, int day, int index, int type)
{
MtSession *session = new MtSession(symbol, day, index, type);
if (type == QUOTE)
{
session._hasData = SymbolInfoSessionQuote(symbol, day, index, session._from, session._to);
}
else
{
session._hasData = SymbolInfoSessionTrade(symbol, day, index, session._from, session._to);
}
return session;
}
JSONObject* CreateJson()
{
JSONObject *jo = new JSONObject();
jo.put("Symbol", new JSONString(_symbol));
jo.put("DayOfWeek", new JSONNumber(_dayOfWeek));
jo.put("Index", new JSONNumber(_index));
jo.put("MtFromTime", new JSONNumber(_from));
jo.put("MtToTime", new JSONNumber(_to));
jo.put("HasData", new JSONBool(_hasData));
jo.put("Type", new JSONNumber(_type));
return jo;
}
private:
string _symbol;
int _dayOfWeek;
int _index;
datetime _from;
datetime _to;
bool _hasData;
int _type;
MtSession(string symbol, int day, int index, int type)
{
_symbol = symbol;
_dayOfWeek = day;
_index = index;
_type = type;
}
};
enum MtSessionType
{
QUOTE,
TRADE
};
enum MtEventTypes
{
LAST_TIME_BAR_EVENT = 1
};
int preinit()
{
StringInit(message,200,0);
StringInit(symbolValue,200,0);
StringInit(commentValue,200,0);
StringInit(msgValue,200,0);
StringInit(captionValue,200,0);
StringInit(filenameValue,200,0);
StringInit(ftp_pathValue,200,0);
StringInit(subjectValue,200,0);
StringInit(some_textValue,200,0);
StringInit(nameValue,200,0);
StringInit(prefix_nameValue,200,0);
StringInit(requestValue, 500, "\0");
return (0);
}
int init() {
preinit();
if (IsDllsAllowed() == FALSE)
{
MessageBox("Dlls not allowed.", "MtApi", MB_OK);
isCrashed = TRUE;
return (1);
}
if (IsLibrariesAllowed() == FALSE)
{
MessageBox("Libraries not allowed.", "MtApi", MB_OK);
isCrashed = TRUE;
return (1);
}
if (IsTradeAllowed() == FALSE)
{
MessageBox("Trade not allowed.", "MtApi", MB_OK);
isCrashed = TRUE;
return (1);
}
ExpertHandle = WindowHandle(Symbol(), Period());
if (!initExpert(ExpertHandle, Port, Symbol(), Bid, Ask, message))
{
MessageBox(message, "MtApi", MB_OK);
isCrashed = TRUE;
return(1);
}
if (executeCommand() == 1)
{
isCrashed = TRUE;
return (1);
}
//--- Backtesting mode
if (IsTesting())
{
Print("Waiting on remote client...");
//wait for command (BacktestingReady) from remote side to be ready for work
while(!IsRemoteReadyForTesting)
{
executeCommand();
//This section uses a while loop to simulate Sleep() during Backtest.
unsigned int viSleepUntilTick = GetTickCount() + 100; //100 milliseconds
while(GetTickCount() < viSleepUntilTick)
{
//Do absolutely nothing. Just loop until the desired tick is reached.
}
}
}
//---
_lastBarOpenTime = Time[0];
return (0);
}
int deinit() {
if (isCrashed == 0)
{
if (!deinitExpert(ExpertHandle, message))
{
MessageBox(message, "MtApi", MB_OK);
isCrashed = TRUE;
return (1);
}
}
return (0);
}
int start()
{
updateQuote(ExpertHandle, Symbol(), Bid, Ask, message);
if (_lastBarOpenTime != Time[0])
{
Print("start() new bar: _lastBarOpenTime = ", _lastBarOpenTime, "; Time[0] = ", Time[0]);
double open = Open[1];
double close = Close[1];
double high = High[1];
double low = Low[1];
MtTimeBar* timeBar = new MtTimeBar(Symbol(), _lastBarOpenTime, Time[0], open, close, high, low);
sendLastTimeBartEvent(timeBar);
delete timeBar;
_lastBarOpenTime = Time[0];
}
if (IsTesting())
{
while(true)
{
int executedCommand = executeCommand();
if (executedCommand == 0) break;
}
}
return (0);
}
void OnTimer()
{
while(true)
{
int executedCommand = executeCommand();
if (executedCommand == 0)
{
return;
}
}
}
void sendLastTimeBartEvent(MtTimeBar* timeBar)
{
JSONObject* json = timeBar.CreateJson();
sendEvent(ExpertHandle, (int)LAST_TIME_BAR_EVENT, json.toString(), message);
Print("Send LastTimeBar event: payload = ", json.toString());
delete json;
}
int executeCommand()
{
pCommandType = 0;
if (!getCommandType(ExpertHandle, pCommandType))
{
Print("[ERROR] getCommandType");
return (0);
}
int commandType = pCommandType;
if (commandType > 0)
{
Print("executeCommand: commnad type = ", commandType);
}
switch (commandType)
{
case 0:
//NoCommand
break;
case 155: //Request
{
if (!getStringValue(ExpertHandle, 0, requestValue))
{
PrintParamError("Request");
}
string response = "";
if (requestValue != "")
{
Print("executeCommand: incoming request = ", requestValue);
response = OnRequest(requestValue);
}
sendStringResponse(ExpertHandle, response);
}
break;
case 151: //OrderCloseAll
if (!sendBooleanResponse(ExpertHandle, OrderCloseAll()))
{
PrintResponseError("OrderCloseAll");
}
break;
case 3: // OrderCloseBy
if (!getIntValue(ExpertHandle, 0, ticketValue))
{
PrintParamError("ticket");
}
if (!getIntValue(ExpertHandle, 1, oppositeValue))
{
PrintParamError("opposite");
}
if (!getIntValue(ExpertHandle, 2, colorValue))
{
PrintParamError("color");
}
if (!sendBooleanResponse(ExpertHandle, OrderCloseBy(ticketValue, oppositeValue, colorValue)))
{
PrintResponseError("OrderCloseBy");
}
break;
case 4: // OrderClosePrice
if (!sendDoubleResponse(ExpertHandle, OrderClosePrice()))
{
PrintResponseError("OrderClosePrice");
}
break;
case 1004: // OrderClosePriceByTicket
result = 0;
if (OrderSelectByTicketFromCommand())
{
result = OrderClosePrice();
}
else
{
PrintResponseError("OrderClosePriceByTicket");
}
if (!sendDoubleResponse(ExpertHandle, result))
{
PrintResponseError("OrderClosePriceByTicket");
}
break;
case 5: //OrderCloseTime
if (!sendIntResponse(ExpertHandle, OrderCloseTime()))
{
PrintResponseError("OrderCloseTime");
}
break;
case 6: //OrderComment
if (!sendStringResponse(ExpertHandle, OrderComment()))
{
PrintResponseError("OrderComment");
}
break;
case 7: //OrderCommission
if (!sendDoubleResponse(ExpertHandle, OrderCommission()))
{
PrintResponseError("OrderCommission");
}
break;
case 8: //OrderDelete
if (!getIntValue(ExpertHandle, 0, ticketValue))
{
PrintParamError("ticket");
}
if (!getIntValue(ExpertHandle, 1, arrow_colorValue))
{
PrintParamError("arrow_color");
}
if (!sendDoubleResponse(ExpertHandle, OrderDelete(ticketValue, arrow_colorValue)))
{
PrintResponseError("OrderDelete");
}
break;
case 9: //OrderExpiration
if (!sendIntResponse(ExpertHandle, OrderExpiration()))
{
PrintResponseError("OrderExpiration");
}
break;
case 10: //OrderLots
if (!sendDoubleResponse(ExpertHandle, OrderLots()))
{
PrintResponseError("OrderLots");
}
break;
case 11: //OrderMagicNumber
if (!sendIntResponse(ExpertHandle, OrderMagicNumber()))
{
PrintResponseError("OrderMagicNumber");
}
break;
case 12: //OrderModify
if (!getIntValue(ExpertHandle, 0, ticketValue))
{
PrintParamError("ticket");
}
if (!getDoubleValue(ExpertHandle, 1, priceValue))
{
PrintParamError("price");
}
if (!getDoubleValue(ExpertHandle, 2, stoplossValue))
{
PrintParamError("stoploss");
}
if (!getDoubleValue(ExpertHandle, 3, takeprofitValue))
{
PrintParamError("takeprofit");
}
if (!getIntValue(ExpertHandle, 4, expirationValue))
{
PrintParamError("expiration");
}
if (!getIntValue(ExpertHandle, 5, arrow_colorValue))
{
PrintParamError("arrow_color");
}
if (!sendBooleanResponse(ExpertHandle, OrderModify(ticketValue, priceValue, stoplossValue, takeprofitValue, expirationValue, arrow_colorValue)))
{
PrintResponseError("OrderModify");
}
break;
case 13: //OrderOpenPrice
if (!sendDoubleResponse(ExpertHandle, OrderOpenPrice()))
{
PrintResponseError("OrderOpenPrice");
}
break;
case 1013: // OrderOpenPriceByTicket
result = 0;
if (OrderSelectByTicketFromCommand())
{
result = OrderOpenPrice();
}
else
{
PrintResponseError("OrderOpenPriceByTicket");
}
if (!sendDoubleResponse(ExpertHandle, result))
{
PrintResponseError("OrderOpenPriceByTicket");
}
break;
case 14: //OrderOpenTime
if (!sendIntResponse(ExpertHandle, OrderOpenTime()))
{
PrintResponseError("OrderOpenTime");
}
break;
case 15: //OrderPrint
OrderPrint();
sendVoidResponse(ExpertHandle);
break;
case 16: //OrderProfit
if (!sendDoubleResponse(ExpertHandle, OrderProfit()))
{
PrintResponseError("OrderProfit");
break;
}
break;
case 17: //OrderSelect
indexValue = 0;
selectValue = 0;
poolValue = 0;
if (!getIntValue(ExpertHandle, 0, indexValue))
{
PrintParamError("index");
}
if (!getIntValue(ExpertHandle, 1, selectValue))
{
PrintParamError("select");
}
if (!getIntValue(ExpertHandle, 2, poolValue))
{
PrintParamError("pool");
}
if (!sendBooleanResponse(ExpertHandle, OrderSelect(indexValue, selectValue, poolValue)))
{
PrintResponseError("OrderSelect");
}
break;
case 18: //OrdersHistoryTotal
if (!sendIntResponse(ExpertHandle, OrdersHistoryTotal()))
{
PrintResponseError("OrdersHistoryTotal");
}
break;
case 19: //OrderStopLoss
if (!sendDoubleResponse(ExpertHandle, OrderStopLoss()))
{
PrintResponseError("OrderStopLoss");
}
break;
case 20: //OrdersTotal
if (!sendIntResponse(ExpertHandle, OrdersTotal()))
{
PrintResponseError("OrdersTotal");
}
break;
case 21: //OrderSwap
if (!sendDoubleResponse(ExpertHandle, OrderSwap()))
{
PrintResponseError("OrderSwap");
}
break;
case 22: //OrderSymbol
if (!sendStringResponse(ExpertHandle, OrderSymbol()))
{
PrintResponseError("OrderSymbol");
}
break;
case 23: //OrderTakeProfit
if (!sendDoubleResponse(ExpertHandle, OrderTakeProfit()))
{
PrintResponseError("OrderTakeProfit");
}
break;
case 24: //OrderTicket
if (!sendIntResponse(ExpertHandle, OrderTicket()))
{
PrintResponseError("OrderTicket");
}
break;
case 25: //OrderType
if (!sendIntResponse(ExpertHandle, OrderType()))
{
PrintResponseError("OrderType");
}
break;
case 26: //GetLastError
if (!sendIntResponse(ExpertHandle, GetLastError()))
{
PrintResponseError("GetLastError");
}
break;
case 27: //IsConnected
if (!sendBooleanResponse(ExpertHandle, IsConnected()))
{
PrintResponseError("IsConnected");
}
break;
case 28: //IsDemo
if (!sendBooleanResponse(ExpertHandle, IsDemo()))
{
PrintResponseError("IsDemo");
}
break;
case 29: //IsDllsAllowed
if (!sendBooleanResponse(ExpertHandle, IsDllsAllowed()))
{
PrintResponseError("IsDllsAllowed");
}
break;
case 30: //IsExpertEnabled
if (!sendBooleanResponse(ExpertHandle, IsExpertEnabled()))
{
PrintResponseError("IsExpertEnabled");
}
break;
case 31: //IsLibrariesAllowed
if (!sendBooleanResponse(ExpertHandle, IsLibrariesAllowed()))
{
PrintResponseError("IsLibrariesAllowed");
}
break;
case 32: //IsOptimization
if (!sendBooleanResponse(ExpertHandle, IsOptimization()))
{
PrintResponseError("IsOptimization");
}
break;
case 33: //IsStopped
if (!sendBooleanResponse(ExpertHandle, IsStopped()))
{
PrintResponseError("IsStopped");
}
break;
case 34: //IsTesting
if (!sendBooleanResponse(ExpertHandle, IsTesting()))
{
PrintResponseError("IsTesting");
}
break;
case 35: //IsTradeAllowed
if (!sendBooleanResponse(ExpertHandle, IsTradeAllowed()))
{
PrintResponseError("IsTradeAllowed");
}
break;
case 36: //IsTradeContextBusy
if (!sendBooleanResponse(ExpertHandle, IsTradeContextBusy()))
{
PrintResponseError("IsTradeContextBusy");
}
break;
case 37: //IsVisualMode
if (!sendBooleanResponse(ExpertHandle, IsVisualMode()))
{
PrintResponseError("IsVisualMode");
}
break;
case 38: //UninitializeReason
if (!sendIntResponse(ExpertHandle, UninitializeReason()))
{
PrintResponseError("UninitializeReason");
}
break;
case 39: //ErrorDescription
if (!getIntValue(ExpertHandle, 0, errorCodeValue))
{
PrintParamError("errorCode");
}
if (!sendStringResponse(ExpertHandle, ErrorDescription(errorCodeValue)))
{
PrintResponseError("ErrorDescription");
}
break;
case 40: //AccountBalance
if (!sendDoubleResponse(ExpertHandle, AccountBalance()))
{
PrintResponseError("AccountBalance");
}
break;
case 41: //AccountCredit
if (!sendDoubleResponse(ExpertHandle, AccountCredit()))
{
PrintResponseError("AccountCredit");
}
break;
case 42: //AccountCompany
if (!sendStringResponse(ExpertHandle, AccountCompany()))
{
PrintResponseError("AccountCompany");
}
break;
case 43: //AccountCurrency
if (!sendStringResponse(ExpertHandle, AccountCurrency()))
{
PrintResponseError("AccountCurrency");
}
break;
case 44: //AccountEquity
if (!sendDoubleResponse(ExpertHandle, AccountEquity()))
{
PrintResponseError("AccountEquity");
}
break;
case 45: //AccountFreeMargin
if (!sendDoubleResponse(ExpertHandle, AccountFreeMargin()))
{
PrintResponseError("AccountFreeMargin");
}
break;
case 46: //AccountFreeMarginCheck
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, cmdValue))
{
PrintParamError("cmd");
}
if (!getDoubleValue(ExpertHandle, 2, volumeValue))
{
PrintParamError("volume");
}
if (!sendDoubleResponse(ExpertHandle, AccountFreeMarginCheck(symbolValue, cmdValue, volumeValue)))
{
PrintResponseError("AccountFreeMarginCheck");
}
break;
case 47: //AccountFreeMarginMode
if (!sendDoubleResponse(ExpertHandle, AccountFreeMarginMode()))
{
PrintResponseError("AccountFreeMarginMode");
}
break;
case 48: //AccountLeverage
if (!sendIntResponse(ExpertHandle, AccountLeverage()))
{
PrintResponseError("AccountLeverage");
}
break;
case 49: //AccountMargin
if (!sendDoubleResponse(ExpertHandle, AccountMargin()))
{
PrintResponseError("AccountMargin");
}
break;
case 50: //AccountName
if (!sendStringResponse(ExpertHandle, AccountName()))
{
PrintResponseError("AccountName");
}
break;
case 51: //AccountNumber
if (!sendIntResponse(ExpertHandle, AccountNumber()))
{
PrintResponseError("AccountNumber");
}
break;
case 52: //AccountProfit
if (!sendDoubleResponse(ExpertHandle, AccountProfit()))
{
PrintResponseError("AccountProfit");
}
break;
case 53: //AccountServer
if (!sendStringResponse(ExpertHandle, AccountServer()))
{
PrintResponseError("AccountServer");
}
break;
case 54: //AccountStopoutLevel
if (!sendIntResponse(ExpertHandle, AccountStopoutLevel()))
{
PrintResponseError("AccountStopoutLevel");
}
break;
case 55: //AccountStopoutMode
if (!sendIntResponse(ExpertHandle, AccountStopoutMode()))
{
PrintResponseError("AccountStopoutMode");
}
break;
case 56: //Alert
if (!getStringValue(ExpertHandle, 0, msgValue))
{
PrintParamError("msg");
}
Alert(msgValue);
sendBooleanResponse(ExpertHandle, true);
break;
case 57: //Comment
if (!getStringValue(ExpertHandle, 0, msgValue))
{
PrintParamError("msg");
}
Comment(msgValue);
sendBooleanResponse(ExpertHandle, true);
break;
case 58: //GetTickCount
if (!sendIntResponse(ExpertHandle, GetTickCount()))
{
PrintResponseError("GetTickCount");
}
break;
case 59: //MarketInfo
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, typeValue))
{
PrintParamError("type");
}
if (!sendDoubleResponse(ExpertHandle, MarketInfo(symbolValue, typeValue)))
{
PrintResponseError("MarketInfo");
}
break;
case 60: //MessageBox
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!sendIntResponse(ExpertHandle, MessageBox(symbolValue)))
{
PrintResponseError("MessageBox");
}
break;
case 61: //MessageBoxA
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getStringValue(ExpertHandle, 1, captionValue))
{
PrintParamError("caption");
}
if (!getIntValue(ExpertHandle, 2, flagValue))
{
PrintParamError("flag");
}
if (!sendIntResponse(ExpertHandle, MessageBox(symbolValue, captionValue, flagValue)))
{
PrintResponseError("MessageBox");
}
break;
case 62: //PlaySound
if (!getStringValue(ExpertHandle, 0, filenameValue))
{
PrintParamError("filename");
}
PlaySound(filenameValue);
sendBooleanResponse(ExpertHandle, true);
break;
case 63: //Print
if (!getStringValue(ExpertHandle, 0, msgValue))
{
PrintParamError("msg");
}
Print(msgValue);
sendBooleanResponse(ExpertHandle, true);
break;
case 64: //SendFTP
if (!getStringValue(ExpertHandle, 0, filenameValue))
{
PrintParamError("filename");
}
if (!sendBooleanResponse(ExpertHandle, SendFTP(filenameValue)))
{
PrintResponseError("SendFTP");
}
break;
case 65: //SendFTPA
if (!getStringValue(ExpertHandle, 0, filenameValue))
{
PrintParamError("filename");
}
if (!getStringValue(ExpertHandle, 1, ftp_pathValue))
{
PrintParamError("ftp_path");
}
if (!sendBooleanResponse(ExpertHandle, SendFTP(filenameValue, ftp_pathValue)))
{
PrintResponseError("SendFTP");
}
break;
case 66: //SendMail
if (!getStringValue(ExpertHandle, 0, subjectValue))
{
PrintParamError("subject");
}
if (!getStringValue(ExpertHandle, 1, some_textValue))
{
PrintParamError("some_text");
}
SendMail(subjectValue, some_textValue);
break;
case 67: //Sleep
if (!getIntValue(ExpertHandle, 0, millisecondsValue))
{
PrintParamError("milliseconds");
}
Sleep(millisecondsValue);
break;
case 68: //TerminalCompany
if (!sendStringResponse(ExpertHandle, TerminalCompany()))
{
PrintResponseError("TerminalCompany");
}
break;
case 69: //TerminalName
if (!sendStringResponse(ExpertHandle, TerminalName()))
{
PrintResponseError("TerminalName");
}
break;
case 70: //TerminalPath
if (!sendStringResponse(ExpertHandle, TerminalPath()))
{
PrintResponseError("TerminalPath");
}
break;
case 71: //Day
if (!sendIntResponse(ExpertHandle, Day()))
{
PrintResponseError("Day");
}
break;
case 72: //DayOfWeek
if (!sendIntResponse(ExpertHandle, DayOfWeek()))
{
PrintResponseError("DayOfWeek");
}
break;
case 73: //DayOfYear
if (!sendIntResponse(ExpertHandle, DayOfYear()))
{
PrintResponseError("DayOfYear");
}
break;
case 74: //Hour
if (!sendIntResponse(ExpertHandle, Hour()))
{
PrintResponseError("Hour");
}
break;
case 75: //Minute
if (!sendIntResponse(ExpertHandle, Minute()))
{
PrintResponseError("Minute");
}
break;
case 76: //Month
if (!sendIntResponse(ExpertHandle, Month()))
{
PrintResponseError("Month");
}
break;
case 77: //Seconds
if (!sendIntResponse(ExpertHandle, Seconds()))
{
PrintResponseError("Seconds");
}
break;
case 78: //TimeCurrent
if (!sendIntResponse(ExpertHandle, TimeCurrent()))
{
PrintResponseError("TimeCurrent");
}
break;
case 79: //TimeDay
if (!getIntValue(ExpertHandle, 0, dateValue))
{
PrintParamError("date");
}
if (!sendIntResponse(ExpertHandle, TimeDay(dateValue)))
{
PrintResponseError("TimeDay");
}
break;
case 80: //TimeDayOfWeek
if (!getIntValue(ExpertHandle, 0, dateValue))
{
PrintParamError("date");
}
if (!sendIntResponse(ExpertHandle, TimeDayOfWeek(dateValue)))
{
PrintResponseError("TimeDayOfWeek");
}
break;
case 81: //TimeDayOfYear
if (!getIntValue(ExpertHandle, 0, dateValue))
{
PrintParamError("date");
}
if (!sendIntResponse(ExpertHandle, TimeDayOfYear(dateValue)))
{
PrintResponseError("TimeDayOfYear");
}
break;
case 82: //TimeHour
if (!getIntValue(ExpertHandle, 0, timeValue))
{
PrintParamError("time");
}
if (!sendIntResponse(ExpertHandle, TimeHour(timeValue)))
{
PrintResponseError("TimeHour");
}
break;
case 83: //TimeLocal
if (!sendIntResponse(ExpertHandle, TimeLocal()))
{
PrintResponseError("TimeLocal");
}
break;
case 84: //TimeMinute
if (!getIntValue(ExpertHandle, 0, timeValue))
{
PrintParamError("time");
}
if (!sendIntResponse(ExpertHandle, TimeMinute(timeValue)))
{
PrintResponseError("TimeMinute");
}
break;
case 85: //TimeMonth
if (!getIntValue(ExpertHandle, 0, timeValue))
{
PrintParamError("time");
}
if (!sendIntResponse(ExpertHandle, TimeMonth(timeValue)))
{
PrintResponseError("TimeMonth");
}
break;
case 86: //TimeSeconds
if (!getIntValue(ExpertHandle, 0, timeValue))
{
PrintParamError("time");
}
if (!sendIntResponse(ExpertHandle, TimeSeconds(timeValue)))
{
PrintResponseError("TimeSeconds");
}
break;
case 87: //TimeYear
if (!getIntValue(ExpertHandle, 0, timeValue))
{
PrintParamError("time");
}
if (!sendIntResponse(ExpertHandle, TimeYear(timeValue)))
{
PrintResponseError("TimeYear");
}
break;
case 88: //Year
if (!sendIntResponse(ExpertHandle, Year()))
{
PrintResponseError("Year");
}
break;
case 89: //GlobalVariableCheck
if (!getStringValue(ExpertHandle, 0, nameValue))
{
PrintParamError("name");
}
if (!sendBooleanResponse(ExpertHandle, GlobalVariableCheck(nameValue)))
{
PrintResponseError("GlobalVariableCheck");
}
break;
case 90: //GlobalVariableDel
if (!getStringValue(ExpertHandle, 0, nameValue))
{
PrintParamError("name");
}
if (!sendBooleanResponse(ExpertHandle, GlobalVariableDel(nameValue)))
{
PrintResponseError("GlobalVariableDel");
}
break;
case 91: //GlobalVariableGet
if (!getStringValue(ExpertHandle, 0, nameValue))
{
PrintParamError("name");
}
if (!sendDoubleResponse(ExpertHandle, GlobalVariableGet(nameValue)))
{
PrintResponseError("GlobalVariableGet");
}
break;
case 92: //GlobalVariableName
if (!getIntValue(ExpertHandle, 0, indexValue))
{
PrintParamError("index");
}
if (!sendStringResponse(ExpertHandle, GlobalVariableName(indexValue)))
{
PrintResponseError("GlobalVariableName");
}
break;
case 93: //GlobalVariableSet
if (!getStringValue(ExpertHandle, 0, nameValue))
{
PrintParamError("name");
}
if (!getDoubleValue(ExpertHandle, 1, valueValue))
{
PrintParamError("value");
}
if (!sendIntResponse(ExpertHandle, GlobalVariableSet(nameValue, valueValue)))
{
PrintResponseError("GlobalVariableSet");
}
break;
case 94: //GlobalVariableSetOnCondition
if (!getStringValue(ExpertHandle, 0, nameValue))
{
PrintParamError("name");
}
if (!getDoubleValue(ExpertHandle, 1, valueValue))
{
PrintParamError("value");
}
if (!getDoubleValue(ExpertHandle, 2, check_value))
{
PrintParamError("check_value");
}
if (!sendBooleanResponse(ExpertHandle, GlobalVariableSetOnCondition(nameValue, valueValue, check_value)))
{
PrintResponseError("GlobalVariableSetOnCondition");
}
break;
case 95: //GlobalVariablesDeleteAll
if (!getStringValue(ExpertHandle, 0, prefix_nameValue))
{
PrintParamError("prefix_name");
}
if (!sendIntResponse(ExpertHandle, GlobalVariablesDeleteAll(prefix_nameValue)))
{
PrintResponseError("GlobalVariablesDeleteAll");
}
break;
case 96: //GlobalVariablesTotal
if (!sendIntResponse(ExpertHandle, GlobalVariablesTotal()))
{
PrintResponseError("GlobalVariablesTotal");
}
break;
case 97: //iAC
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iAC(symbolValue, timeframeValue, shiftValue)))
{
PrintResponseError("iAC");
}
break;
case 98: //iAD
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iAD(symbolValue, timeframeValue, shiftValue)))
{
PrintResponseError("iAD");
}
break;
case 99: //iAlligator
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iAD(symbolValue, timeframeValue, shiftValue)))
{
PrintResponseError("iAD");
}
break;
case 100: //iADX
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, periodValue))
{
PrintParamError("period");
}
if (!getIntValue(ExpertHandle, 3, applied_priceValue))
{
PrintParamError("applied_price");
}
if (!getIntValue(ExpertHandle, 4, modeValue))
{
PrintParamError("mode");
}
if (!getIntValue(ExpertHandle, 5, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iADX(symbolValue, timeframeValue, periodValue, applied_priceValue, modeValue, shiftValue)))
{
PrintResponseError("iADX");
}
break;
case 101: //iATR
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, periodValue))
{
PrintParamError("period");
}
if (!getIntValue(ExpertHandle, 3, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iATR(symbolValue, timeframeValue, periodValue, shiftValue)))
{
PrintResponseError("iATR");
}
break;
case 102: //iAO
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iAO(symbolValue, timeframeValue, shiftValue)))
{
PrintResponseError("iAO");
}
break;
case 103: //iBearsPower
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, periodValue))
{
PrintParamError("period");
}
if (!getIntValue(ExpertHandle, 3, applied_priceValue))
{
PrintParamError("applied_price");
}
if (!getIntValue(ExpertHandle, 4, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iBearsPower(symbolValue, timeframeValue, periodValue, applied_priceValue, shiftValue)))
{
PrintResponseError("iBearsPower");
}
break;
case 104: //iBands
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, periodValue))
{
PrintParamError("period");
}
if (!getIntValue(ExpertHandle, 3, deviationValue))
{
PrintParamError("deviation");
}
if (!getIntValue(ExpertHandle, 4, bands_shiftValue))
{
PrintParamError("bands_shift");
}
if (!getIntValue(ExpertHandle, 5, applied_priceValue))
{
PrintParamError("applied_price");
}
if (!getIntValue(ExpertHandle, 6, modeValue))
{
PrintParamError("mode");
}
if (!getIntValue(ExpertHandle, 7, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iBands(symbolValue, timeframeValue, periodValue, deviationValue, bands_shiftValue, applied_priceValue, modeValue, shiftValue)))
{
PrintResponseError("iBands");
}
break;
case 105: //iBandsOnArray
{
paramIndex = 0;
arraySize = 0;
getIntValue(ExpertHandle, paramIndex, countValue);
paramIndex++;
arraySize = countValue;
ArrayResize(doubleValuesArray, arraySize);
for(index = 0; index < arraySize; index++)
{
getDoubleValue(ExpertHandle, paramIndex, tempDoubleValue);
paramIndex++;
doubleValuesArray[index] = tempDoubleValue;
}
getIntValue(ExpertHandle, paramIndex, totalValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, periodValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, deviationValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, bands_shiftValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, modeValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, shiftValue);
paramIndex++;
if (!sendDoubleResponse(ExpertHandle, iBandsOnArray(doubleValuesArray, totalValue, periodValue, deviationValue, bands_shiftValue, modeValue, shiftValue)))
{
PrintResponseError("iBandsOnArray");
}
}
break;
case 106: //iBullsPower
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, periodValue))
{
PrintParamError("period");
}
if (!getIntValue(ExpertHandle, 3, applied_priceValue))
{
PrintParamError("applied_price");
}
if (!getIntValue(ExpertHandle, 4, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iBullsPower(symbolValue, timeframeValue, periodValue, applied_priceValue, shiftValue)))
{
PrintResponseError("iBullsPower");
}
break;
case 107: //iCCI
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, periodValue))
{
PrintParamError("period");
}
if (!getIntValue(ExpertHandle, 3, applied_priceValue))
{
PrintParamError("applied_price");
}
if (!getIntValue(ExpertHandle, 4, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iCCI(symbolValue, timeframeValue, periodValue, applied_priceValue, shiftValue)))
{
PrintResponseError("iCCI");
}
break;
case 108: //iCCIOnArray
{
paramIndex = 0;
arraySize = 0;
getIntValue(ExpertHandle, paramIndex, countValue);
paramIndex++;
arraySize = countValue;
ArrayResize(doubleValuesArray, arraySize);
for(index = 0; index < arraySize; index++)
{
getDoubleValue(ExpertHandle, paramIndex, tempDoubleValue);
paramIndex++;
doubleValuesArray[index] = tempDoubleValue;
}
getIntValue(ExpertHandle, paramIndex, totalValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, periodValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, shiftValue);
paramIndex++;
if (!sendDoubleResponse(ExpertHandle, iCCIOnArray(doubleValuesArray, totalValue, periodValue, shiftValue)))
{
PrintResponseError("iCCIOnArray");
}
}
break;
case 109: //iCustom (int list parameters)
{
paramIndex = 0;
arraySize = 0;
getStringValue(ExpertHandle, paramIndex, symbolValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, timeframeValue);
paramIndex++;
getStringValue(ExpertHandle, paramIndex, nameValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, countValue);
paramIndex++;
arraySize = countValue;
ArrayResize(intValuesArray, arraySize);
for(index = 0; index < arraySize; index++)
{
getIntValue(ExpertHandle, paramIndex, tempIntValue);
paramIndex++;
intValuesArray[index] = tempIntValue;
}
getIntValue(ExpertHandle, paramIndex, modeValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, shiftValue);
paramIndex++;
switch(arraySize)
{
case 0:
sendDoubleResponse(ExpertHandle, iCustom(symbolValue, timeframeValue, nameValue, totalValue, modeValue, shiftValue));
break;
case 1:
sendDoubleResponse(ExpertHandle, iCustom(symbolValue, timeframeValue, nameValue
, intValuesArray[0]
, totalValue, modeValue, shiftValue));
break;
case 2:
sendDoubleResponse(ExpertHandle, iCustom(symbolValue, timeframeValue, nameValue
, intValuesArray[0]
, intValuesArray[1]
, totalValue, modeValue, shiftValue));
break;
case 3:
sendDoubleResponse(ExpertHandle, iCustom(symbolValue, timeframeValue, nameValue
, intValuesArray[0]
, intValuesArray[1]
, intValuesArray[2]
, totalValue, modeValue, shiftValue));
break;
case 4:
sendDoubleResponse(ExpertHandle, iCustom(symbolValue, timeframeValue, nameValue
, intValuesArray[0]
, intValuesArray[1]
, intValuesArray[2]
, intValuesArray[3]
, totalValue, modeValue, shiftValue));
break;
case 5:
sendDoubleResponse(ExpertHandle, iCustom(symbolValue, timeframeValue, nameValue
, intValuesArray[0]
, intValuesArray[1]
, intValuesArray[2]
, intValuesArray[3]
, intValuesArray[4]
, totalValue, modeValue, shiftValue));
break;
case 6:
sendDoubleResponse(ExpertHandle, iCustom(symbolValue, timeframeValue, nameValue
, intValuesArray[0]
, intValuesArray[1]
, intValuesArray[2]
, intValuesArray[3]
, intValuesArray[4]
, intValuesArray[5]
, totalValue, modeValue, shiftValue));
break;
case 7:
sendDoubleResponse(ExpertHandle, iCustom(symbolValue, timeframeValue, nameValue
, intValuesArray[0]
, intValuesArray[1]
, intValuesArray[2]
, intValuesArray[3]
, intValuesArray[4]
, intValuesArray[5]
, intValuesArray[6]
, totalValue, modeValue, shiftValue));
break;
case 8:
sendDoubleResponse(ExpertHandle, iCustom(symbolValue, timeframeValue, nameValue
, intValuesArray[0]
, intValuesArray[1]
, intValuesArray[2]
, intValuesArray[3]
, intValuesArray[4]
, intValuesArray[5]
, intValuesArray[6]
, intValuesArray[7]
, totalValue, modeValue, shiftValue));
break;
case 9:
sendDoubleResponse(ExpertHandle, iCustom(symbolValue, timeframeValue, nameValue
, intValuesArray[0]
, intValuesArray[1]
, intValuesArray[2]
, intValuesArray[3]
, intValuesArray[4]
, intValuesArray[5]
, intValuesArray[6]
, intValuesArray[7]
, intValuesArray[8]
, totalValue, modeValue, shiftValue));
break;
case 10:
default:
sendDoubleResponse(ExpertHandle, iCustom(symbolValue, timeframeValue, nameValue
, intValuesArray[0]
, intValuesArray[1]
, intValuesArray[2]
, intValuesArray[3]
, intValuesArray[4]
, intValuesArray[5]
, intValuesArray[6]
, intValuesArray[7]
, intValuesArray[8]
, intValuesArray[9]
, totalValue, modeValue, shiftValue));
}
}
break;
case 10109: //iCustom (double list parameters)
{
paramIndex = 0;
arraySize = 0;
getStringValue(ExpertHandle, paramIndex, symbolValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, timeframeValue);
paramIndex++;
getStringValue(ExpertHandle, paramIndex, nameValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, countValue);
paramIndex++;
arraySize = countValue;
ArrayResize(doubleValuesArray, arraySize);
for(index = 0; index < arraySize; index++)
{
getDoubleValue(ExpertHandle, paramIndex, tempDoubleValue);
paramIndex++;
doubleValuesArray[index] = tempDoubleValue;
}
getIntValue(ExpertHandle, paramIndex, modeValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, shiftValue);
paramIndex++;
switch(arraySize)
{
case 0:
sendDoubleResponse(ExpertHandle, iCustom(symbolValue, timeframeValue, nameValue, totalValue, periodValue, shiftValue));
break;
case 1:
sendDoubleResponse(ExpertHandle, iCustom(symbolValue, timeframeValue, nameValue
, doubleValuesArray[0]
, totalValue, periodValue, shiftValue));
break;
case 2:
sendDoubleResponse(ExpertHandle, iCustom(symbolValue, timeframeValue, nameValue
, doubleValuesArray[0]
, doubleValuesArray[1]
, totalValue, periodValue, shiftValue));
break;
case 3:
sendDoubleResponse(ExpertHandle, iCustom(symbolValue, timeframeValue, nameValue
, doubleValuesArray[0]
, doubleValuesArray[1]
, doubleValuesArray[2]
, totalValue, periodValue, shiftValue));
break;
case 4:
sendDoubleResponse(ExpertHandle, iCustom(symbolValue, timeframeValue, nameValue
, doubleValuesArray[0]
, doubleValuesArray[1]
, doubleValuesArray[2]
, doubleValuesArray[3]
, totalValue, periodValue, shiftValue));
break;
case 5:
sendDoubleResponse(ExpertHandle, iCustom(symbolValue, timeframeValue, nameValue
, doubleValuesArray[0]
, doubleValuesArray[1]
, doubleValuesArray[2]
, doubleValuesArray[3]
, doubleValuesArray[4]
, totalValue, periodValue, shiftValue));
break;
case 6:
sendDoubleResponse(ExpertHandle, iCustom(symbolValue, timeframeValue, nameValue
, doubleValuesArray[0]
, doubleValuesArray[1]
, doubleValuesArray[2]
, doubleValuesArray[3]
, doubleValuesArray[4]
, doubleValuesArray[5]
, totalValue, periodValue, shiftValue));
break;
case 7:
sendDoubleResponse(ExpertHandle, iCustom(symbolValue, timeframeValue, nameValue
, doubleValuesArray[0]
, doubleValuesArray[1]
, doubleValuesArray[2]
, doubleValuesArray[3]
, doubleValuesArray[4]
, doubleValuesArray[5]
, doubleValuesArray[6]
, totalValue, periodValue, shiftValue));
break;
case 8:
sendDoubleResponse(ExpertHandle, iCustom(symbolValue, timeframeValue, nameValue
, doubleValuesArray[0]
, doubleValuesArray[1]
, doubleValuesArray[2]
, doubleValuesArray[3]
, doubleValuesArray[4]
, doubleValuesArray[5]
, doubleValuesArray[6]
, doubleValuesArray[7]
, totalValue, periodValue, shiftValue));
break;
case 9:
sendDoubleResponse(ExpertHandle, iCustom(symbolValue, timeframeValue, nameValue
, doubleValuesArray[0]
, doubleValuesArray[1]
, doubleValuesArray[2]
, doubleValuesArray[3]
, doubleValuesArray[4]
, doubleValuesArray[5]
, doubleValuesArray[6]
, doubleValuesArray[7]
, doubleValuesArray[8]
, totalValue, periodValue, shiftValue));
break;
case 10:
default:
sendDoubleResponse(ExpertHandle, iCustom(symbolValue, timeframeValue, nameValue
, doubleValuesArray[0]
, doubleValuesArray[1]
, doubleValuesArray[2]
, doubleValuesArray[3]
, doubleValuesArray[4]
, doubleValuesArray[5]
, doubleValuesArray[6]
, doubleValuesArray[7]
, doubleValuesArray[8]
, doubleValuesArray[9]
, totalValue, periodValue, shiftValue));
}
}
break;
case 110: //iDeMarker
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, periodValue))
{
PrintParamError("period");
}
if (!getIntValue(ExpertHandle, 3, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iDeMarker(symbolValue, timeframeValue, periodValue, shiftValue)))
{
PrintResponseError("iDeMarker");
}
break;
case 111: //iEnvelopes
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, ma_periodValue))
{
PrintParamError("ma_period");
}
if (!getIntValue(ExpertHandle, 3, ma_methodValue))
{
PrintParamError("ma_method");
}
if (!getIntValue(ExpertHandle, 4, ma_shiftValue))
{
PrintParamError("ma_shift");
}
if (!getIntValue(ExpertHandle, 5, applied_priceValue))
{
PrintParamError("applied_price");
}
if (!getDoubleValue(ExpertHandle, 6, deviationDoubleValue))
{
PrintParamError("deviation");
}
if (!getIntValue(ExpertHandle, 7, modeValue))
{
PrintParamError("mode");
}
if (!getIntValue(ExpertHandle, 8, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iEnvelopes(symbolValue, timeframeValue, ma_periodValue, ma_methodValue,
ma_shiftValue, applied_priceValue, deviationDoubleValue, modeValue,
shiftValue)))
{
PrintResponseError("iEnvelopes");
}
break;
case 112: //iEnvelopesOnArray
{
paramIndex = 0;
arraySize = 0;
getIntValue(ExpertHandle, paramIndex, countValue);
paramIndex++;
arraySize = countValue;
ArrayResize(doubleValuesArray, arraySize);
for(index = 0; index < arraySize; index++)
{
getDoubleValue(ExpertHandle, paramIndex, tempDoubleValue);
paramIndex++;
doubleValuesArray[index] = tempDoubleValue;
}
getIntValue(ExpertHandle, paramIndex, totalValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, ma_periodValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, ma_methodValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, ma_shiftValue);
paramIndex++;
getDoubleValue(ExpertHandle, paramIndex, deviationDoubleValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, modeValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, shiftValue);
paramIndex++;
if (!sendDoubleResponse(ExpertHandle, iEnvelopesOnArray(doubleValuesArray, totalValue, ma_periodValue, ma_methodValue, ma_shiftValue, deviationDoubleValue, modeValue, shiftValue)))
{
PrintResponseError("iEnvelopesOnArray");
}
}
break;
case 113: //iForce
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, periodValue))
{
PrintParamError("period");
}
if (!getIntValue(ExpertHandle, 3, ma_methodValue))
{
PrintParamError("ma_method");
}
if (!getIntValue(ExpertHandle, 4, applied_priceValue))
{
PrintParamError("applied_price");
}
if (!getIntValue(ExpertHandle, 5, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iForce(symbolValue, timeframeValue, periodValue, ma_methodValue,
applied_priceValue, shiftValue)))
{
PrintResponseError("iForce");
}
break;
case 114: //iFractals
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, modeValue))
{
PrintParamError("mode");
}
if (!getIntValue(ExpertHandle, 3, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iFractals(symbolValue, timeframeValue, modeValue, shiftValue)))
{
PrintResponseError("iFractals");
}
break;
case 115: //iGator
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, jaw_periodValue))
{
PrintParamError("jaw_period");
}
if (!getIntValue(ExpertHandle, 3, jaw_shiftValue))
{
PrintParamError("jaw_shift");
}
if (!getIntValue(ExpertHandle, 4, teeth_periodValue))
{
PrintParamError("teeth_period");
}
if (!getIntValue(ExpertHandle, 5, teeth_shiftValue))
{
PrintParamError("teeth_shift");
}
if (!getIntValue(ExpertHandle, 6, lips_periodValue))
{
PrintParamError("lips_period");
}
if (!getIntValue(ExpertHandle, 7, lips_shiftValue))
{
PrintParamError("lips_shift");
}
if (!getIntValue(ExpertHandle, 8, ma_methodValue))
{
PrintParamError("ma_method");
}
if (!getIntValue(ExpertHandle, 9, applied_priceValue))
{
PrintParamError("applied_price");
}
if (!getIntValue(ExpertHandle, 10, modeValue))
{
PrintParamError("mode");
}
if (!getIntValue(ExpertHandle, 11, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iGator(symbolValue, timeframeValue, jaw_periodValue, jaw_shiftValue
, teeth_periodValue, teeth_shiftValue, lips_periodValue, lips_shiftValue
, ma_methodValue, applied_priceValue, modeValue, shiftValue)))
{
PrintResponseError("iGator");
}
break;
case 116: //iIchimoku
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, tenkan_senValue))
{
PrintParamError("tenkan_sen");
}
if (!getIntValue(ExpertHandle, 3, kijun_senValue))
{
PrintParamError("kijun_sen");
}
if (!getIntValue(ExpertHandle, 4, senkou_span_bValue))
{
PrintParamError("senkou_span_b");
}
if (!getIntValue(ExpertHandle, 5, modeValue))
{
PrintParamError("mode");
}
if (!getIntValue(ExpertHandle, 6, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iIchimoku(symbolValue, timeframeValue, tenkan_senValue, kijun_senValue
, senkou_span_bValue, modeValue, shiftValue)))
{
PrintResponseError("iIchimoku");
}
break;
case 117: //iBWMFI
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iBWMFI(symbolValue, timeframeValue, shiftValue)))
{
PrintResponseError("iBWMFI");
}
break;
case 118: //iMomentum
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, periodValue))
{
PrintParamError("period");
}
if (!getIntValue(ExpertHandle, 3, applied_priceValue))
{
PrintParamError("applied_price");
}
if (!getIntValue(ExpertHandle, 4, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iMomentum(symbolValue, timeframeValue, periodValue, applied_priceValue
, shiftValue)))
{
PrintResponseError("iMomentum");
}
break;
case 119: //iMomentumOnArray
{
paramIndex = 0;
arraySize = 0;
getIntValue(ExpertHandle, paramIndex, countValue);
paramIndex++;
arraySize = countValue;
ArrayResize(doubleValuesArray, arraySize);
for(index = 0; index < arraySize; index++)
{
getDoubleValue(ExpertHandle, paramIndex, tempDoubleValue);
paramIndex++;
doubleValuesArray[index] = tempDoubleValue;
}
getIntValue(ExpertHandle, paramIndex, totalValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, periodValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, shiftValue);
paramIndex++;
if (!sendDoubleResponse(ExpertHandle, iMomentumOnArray(doubleValuesArray, totalValue, periodValue, shiftValue)))
{
PrintResponseError("iMomentumOnArray");
}
}
break;
case 120: //iMFI
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, periodValue))
{
PrintParamError("period");
}
if (!getIntValue(ExpertHandle, 3, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iMFI(symbolValue, timeframeValue, periodValue, shiftValue)))
{
PrintResponseError("iMFI");
}
break;
case 121: //iMA
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, periodValue))
{
PrintParamError("period");
}
if (!getIntValue(ExpertHandle, 3, ma_shiftValue))
{
PrintParamError("ma_shift");
}
if (!getIntValue(ExpertHandle, 4, ma_methodValue))
{
PrintParamError("ma_method");
}
if (!getIntValue(ExpertHandle, 5, applied_priceValue))
{
PrintParamError("applied_price");
}
if (!getIntValue(ExpertHandle, 6, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iMA(symbolValue, timeframeValue, periodValue, ma_shiftValue
, ma_methodValue, applied_priceValue, shiftValue)))
{
PrintResponseError("iMA");
}
break;
case 122: //iMAOnArray
{
paramIndex = 0;
arraySize = 0;
getIntValue(ExpertHandle, paramIndex, countValue);
paramIndex++;
arraySize = countValue;
ArrayResize(doubleValuesArray, arraySize);
for(index = 0; index < arraySize; index++)
{
getDoubleValue(ExpertHandle, paramIndex, tempDoubleValue);
paramIndex++;
doubleValuesArray[index] = tempDoubleValue;
}
getIntValue(ExpertHandle, paramIndex, totalValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, periodValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, ma_shiftValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, ma_methodValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, shiftValue);
paramIndex++;
if (!sendDoubleResponse(ExpertHandle, iMAOnArray(doubleValuesArray, totalValue, periodValue, ma_shiftValue, ma_methodValue, shiftValue)))
{
PrintResponseError("iMAOnArray");
}
}
break;
case 123: //iOsMA
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, fast_ema_periodValue))
{
PrintParamError("fast_ema_period");
}
if (!getIntValue(ExpertHandle, 3, slow_ema_periodValue))
{
PrintParamError("slow_ema_period");
}
if (!getIntValue(ExpertHandle, 4, signal_periodValue))
{
PrintParamError("signal_period");
}
if (!getIntValue(ExpertHandle, 5, applied_priceValue))
{
PrintParamError("applied_price");
}
if (!getIntValue(ExpertHandle, 6, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iOsMA(symbolValue, timeframeValue, fast_ema_periodValue, slow_ema_periodValue
, signal_periodValue, applied_priceValue, shiftValue)))
{
PrintResponseError("iOsMA");
}
break;
case 124: //iMACD
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, fast_ema_periodValue))
{
PrintParamError("fast_ema_period");
}
if (!getIntValue(ExpertHandle, 3, slow_ema_periodValue))
{
PrintParamError("slow_ema_period");
}
if (!getIntValue(ExpertHandle, 4, signal_periodValue))
{
PrintParamError("signal_period");
}
if (!getIntValue(ExpertHandle, 5, applied_priceValue))
{
PrintParamError("applied_price");
}
if (!getIntValue(ExpertHandle, 6, modeValue))
{
PrintParamError("mode");
}
if (!getIntValue(ExpertHandle, 7, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iMACD(symbolValue, timeframeValue, fast_ema_periodValue, slow_ema_periodValue
, signal_periodValue, applied_priceValue, modeValue, shiftValue)))
{
PrintResponseError("iMACD");
}
break;
case 125: //iOBV
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, applied_priceValue))
{
PrintParamError("applied_price");
}
if (!getIntValue(ExpertHandle, 3, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iOBV(symbolValue, timeframeValue, applied_priceValue, shiftValue)))
{
PrintResponseError("iOBV");
}
break;
case 126: //iSAR
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getDoubleValue(ExpertHandle, 2, stepValue))
{
PrintParamError("step");
}
if (!getDoubleValue(ExpertHandle, 3, maximumValue))
{
PrintParamError("maximum");
}
if (!getIntValue(ExpertHandle, 4, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iSAR(symbolValue, timeframeValue, stepValue, maximumValue, shiftValue)))
{
PrintResponseError("iSAR");
}
break;
case 127: //iRSI
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, periodValue))
{
PrintParamError("period");
}
if (!getIntValue(ExpertHandle, 3, applied_priceValue))
{
PrintParamError("applied_price");
}
if (!getIntValue(ExpertHandle, 4, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iRSI(symbolValue, timeframeValue, periodValue, applied_priceValue, shiftValue)))
{
PrintResponseError("iRSI");
}
break;
case 128: //iRSIOnArray
{
paramIndex = 0;
arraySize = 0;
getIntValue(ExpertHandle, paramIndex, countValue);
paramIndex++;
arraySize = countValue;
ArrayResize(doubleValuesArray, arraySize);
for(index = 0; index < arraySize; index++)
{
getDoubleValue(ExpertHandle, paramIndex, tempDoubleValue);
paramIndex++;
doubleValuesArray[index] = tempDoubleValue;
}
getIntValue(ExpertHandle, paramIndex, totalValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, periodValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, shiftValue);
paramIndex++;
if (!sendDoubleResponse(ExpertHandle, iRSIOnArray(doubleValuesArray, totalValue, periodValue, shiftValue)))
{
PrintResponseError("iRSIOnArray");
}
}
break;
case 129: //iRVI
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, periodValue))
{
PrintParamError("period");
}
if (!getIntValue(ExpertHandle, 3, modeValue))
{
PrintParamError("mode");
}
if (!getIntValue(ExpertHandle, 4, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iRVI(symbolValue, timeframeValue, periodValue, modeValue, shiftValue)))
{
PrintResponseError("iRVI");
}
break;
case 130: //iStdDev
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, ma_periodValue))
{
PrintParamError("ma_period");
}
if (!getIntValue(ExpertHandle, 3, ma_shiftValue))
{
PrintParamError("ma_shift");
}
if (!getIntValue(ExpertHandle, 4, ma_methodValue))
{
PrintParamError("ma_method");
}
if (!getIntValue(ExpertHandle, 5, applied_priceValue))
{
PrintParamError("applied_price");
}
if (!getIntValue(ExpertHandle, 6, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iStdDev(symbolValue, timeframeValue, ma_periodValue, ma_shiftValue
, ma_methodValue, applied_priceValue, shiftValue)))
{
PrintResponseError("iStdDev");
}
break;
case 131: //iStdDevOnArray
{
paramIndex = 0;
arraySize = 0;
getIntValue(ExpertHandle, paramIndex, countValue);
paramIndex++;
arraySize = countValue;
ArrayResize(doubleValuesArray, arraySize);
for(index = 0; index < arraySize; index++)
{
getDoubleValue(ExpertHandle, paramIndex, tempDoubleValue);
paramIndex++;
doubleValuesArray[index] = tempDoubleValue;
}
getIntValue(ExpertHandle, paramIndex, totalValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, ma_periodValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, ma_shiftValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, ma_methodValue);
paramIndex++;
getIntValue(ExpertHandle, paramIndex, shiftValue);
paramIndex++;
if (!sendDoubleResponse(ExpertHandle, iStdDevOnArray(doubleValuesArray, totalValue, ma_periodValue, ma_shiftValue, ma_methodValue, shiftValue)))
{
PrintResponseError("iStdDevOnArray");
}
}
break;
case 132: //iStochastic
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, KperiodValue))
{
PrintParamError("%Kperiod");
}
if (!getIntValue(ExpertHandle, 3, DperiodValue))
{
PrintParamError("%Dperiod");
}
if (!getIntValue(ExpertHandle, 4, slowingValue))
{
PrintParamError("slowing");
}
if (!getIntValue(ExpertHandle, 5, methodValue))
{
PrintParamError("method");
}
if (!getIntValue(ExpertHandle, 6, price_fieldValue))
{
PrintParamError("price_field");
}
if (!getIntValue(ExpertHandle, 7, modeValue))
{
PrintParamError("mode");
}
if (!getIntValue(ExpertHandle, 8, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iStochastic(symbolValue, timeframeValue, KperiodValue, DperiodValue
, slowingValue, methodValue, price_fieldValue, modeValue, shiftValue)))
{
PrintResponseError("iStochastic");
}
break;
case 133: //iWPR
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, periodValue))
{
PrintParamError("period");
}
if (!getIntValue(ExpertHandle, 3, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iWPR(symbolValue, timeframeValue, periodValue, shiftValue)))
{
PrintResponseError("iWPR");
}
break;
case 134: //iBars
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!sendIntResponse(ExpertHandle, iBars(symbolValue, timeframeValue)))
{
PrintResponseError("iBars");
}
break;
case 135: //iBarShift
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, timeValue))
{
PrintParamError("time");
}
if (!getIntValue(ExpertHandle, 3, exactValue))
{
PrintParamError("exact");
}
if (!sendIntResponse(ExpertHandle, iBarShift(symbolValue, timeframeValue, timeValue, exactValue)))
{
PrintResponseError("iBarShift");
}
break;
case 136: //iClose
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iClose(symbolValue, timeframeValue, shiftValue)))
{
PrintResponseError("iClose");
}
break;
case 137: //iHigh
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iHigh(symbolValue, timeframeValue, shiftValue)))
{
PrintResponseError("iHigh");
}
break;
case 138: //iHighest
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, typeValue))
{
PrintParamError("type");
}
if (!getIntValue(ExpertHandle, 3, countValue))
{
PrintParamError("count");
}
if (!getIntValue(ExpertHandle, 4, startValue))
{
PrintParamError("count");
}
if (!sendIntResponse(ExpertHandle, iHighest(symbolValue, timeframeValue, typeValue, countValue, startValue)))
{
PrintResponseError("iHighest");
}
break;
case 139: //iLow
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iLow(symbolValue, timeframeValue, shiftValue)))
{
PrintResponseError("iLow");
}
break;
case 140: //iLowest
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, typeValue))
{
PrintParamError("type");
}
if (!getIntValue(ExpertHandle, 3, countValue))
{
PrintParamError("count");
}
if (!getIntValue(ExpertHandle, 4, startValue))
{
PrintParamError("count");
}
if (!sendIntResponse(ExpertHandle, iLowest(symbolValue, timeframeValue, typeValue, countValue, startValue)))
{
PrintResponseError("iLowest");
}
break;
case 141: //iOpen
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iOpen(symbolValue, timeframeValue, shiftValue)))
{
PrintResponseError("iOpen");
}
break;
case 142: //iTime
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, shiftValue))
{
PrintParamError("shift");
}
if (!sendIntResponse(ExpertHandle, iTime(symbolValue, timeframeValue, shiftValue)))
{
PrintResponseError("iTime");
}
break;
case 143: //iVolume
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
if (!getIntValue(ExpertHandle, 2, shiftValue))
{
PrintParamError("shift");
}
if (!sendDoubleResponse(ExpertHandle, iVolume(symbolValue, timeframeValue, shiftValue)))
{
PrintResponseError("iVolume");
}
break;
case 144: //iCloseArray
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
barsCount = iBars(symbolValue, timeframeValue);
priceCount = ArrayResize(priceArray, barsCount);
for(index = 0; index < priceCount; index++)
{
priceArray[index] = iClose(symbolValue, timeframeValue, index);
}
if (!sendDoubleArrayResponse(ExpertHandle, priceArray, priceCount))
{
PrintResponseError("iCloseArray");
}
break;
case 145: //iHighArray
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
barsCount = iBars(symbolValue, timeframeValue);
priceCount = ArrayResize(priceArray, barsCount);
for(index = 0; index < priceCount; index++)
{
priceArray[index] = iHigh(symbolValue, timeframeValue, index);
}
if (!sendDoubleArrayResponse(ExpertHandle, priceArray, priceCount))
{
PrintResponseError("iHighArray");
}
break;
case 146: //iLowArray
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
barsCount = iBars(symbolValue, timeframeValue);
priceCount = ArrayResize(priceArray, barsCount);
for(index = 0; index < priceCount; index++)
{
priceArray[index] = iLow(symbolValue, timeframeValue, index);
}
if (!sendDoubleArrayResponse(ExpertHandle, priceArray, priceCount))
{
PrintResponseError("iLowArray");
}
break;
case 147: //iOpenArray
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
barsCount = iBars(symbolValue, timeframeValue);
priceCount = ArrayResize(priceArray, barsCount);
for(index = 0; index < priceCount; index++)
{
priceArray[index] = iOpen(symbolValue, timeframeValue, index);
}
if (!sendDoubleArrayResponse(ExpertHandle, priceArray, priceCount))
{
PrintResponseError("iOpenArray");
}
break;
case 148: //iVolumeArray
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
barsCount = iBars(symbolValue, timeframeValue);
volumeCount = ArrayResize(volumeArray, barsCount);
for(index = 0; index < volumeCount; index++)
{
volumeArray[index] = iVolume(symbolValue, timeframeValue, index);
}
if (!sendDoubleArrayResponse(ExpertHandle, volumeArray, volumeCount))
{
PrintResponseError("iVolumeArray");
}
break;
case 149: //iTimeArray
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, timeframeValue))
{
PrintParamError("timeframe");
}
barsCount = iBars(symbolValue, timeframeValue);
timeCount = ArrayResize(timeArray, barsCount);
for(index = 0; index < timeCount; index++)
{
timeArray[index] = iTime(symbolValue, timeframeValue, index);
}
if (!sendIntArrayResponse(ExpertHandle, timeArray, timeCount))
{
PrintResponseError("iTimeArray");
}
break;
case 150: //RefreshRates
if (!sendBooleanResponse(ExpertHandle, RefreshRates()))
{
PrintResponseError("RefreshRates");
}
break;
case 153: //TerminalInfoString
if (getIntValue(ExpertHandle, 0, typeValue))
{
PrintParamError("property_id");
}
if (!sendStringResponse(ExpertHandle, TerminalInfoString(typeValue)))
{
PrintResponseError("TerminalInfoString");
}
break;
case 154: //SymbolInfoString
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (getIntValue(ExpertHandle, 1, typeValue))
{
PrintParamError("prop_id");
}
if (!sendStringResponse(ExpertHandle, SymbolInfoString(symbolValue, typeValue)))
{
PrintResponseError("SymbolInfoString");
}
break;
case 156: //BacktestingReady
if (IsTesting())
{
Print("Remote client is ready for backteting");
IsRemoteReadyForTesting = true;
sendBooleanResponse(ExpertHandle, true);
}
else
{
sendBooleanResponse(ExpertHandle, false);
}
break;
case 200: //SymbolsTotal
if (!getBooleanValue(ExpertHandle, 0, selectValue))
{
PrintParamError("select");
}
if (!sendIntResponse(ExpertHandle, SymbolsTotal(selectValue)))
{
PrintResponseError("SymbolsTotal");
}
break;
case 201: //SymbolName
if (!getIntValue(ExpertHandle, 0, indexValue))
{
PrintParamError("index");
}
if (!getBooleanValue(ExpertHandle, 1, selectValue))
{
PrintParamError("select");
}
if (!sendStringResponse(ExpertHandle, SymbolName(indexValue, selectValue)))
{
PrintResponseError("SymbolName");
}
break;
case 202: //SymbolSelect
if (!getStringValue(ExpertHandle, 0, symbolValue))
{
PrintParamError("symbol");
}
if (!getBooleanValue(ExpertHandle, 1, selectValue))
{
PrintParamError("select");
}
if (!sendBooleanResponse(ExpertHandle, SymbolSelect(symbolValue, selectValue)))
{
PrintResponseError("SymbolSelect");
}
break;
case 203: //SymbolInfoInteger
{
string symbol;
int prop_id;
StringInit(symbol, 200, 0);
if (!getStringValue(ExpertHandle, 0, symbol))
{
PrintParamError("symbol");
}
if (!getIntValue(ExpertHandle, 1, prop_id))
{
PrintParamError("prop_id");
}
if (!sendLongResponse(ExpertHandle, SymbolInfoInteger(symbol, prop_id)))
{
PrintResponseError("SymbolInfoInteger");
}
}
break;
case 204: //TerminalInfoInteger
{
int propId;
if (!getIntValue(ExpertHandle, 0, propId))
{
PrintParamError("propId");
}
if (!sendIntResponse(ExpertHandle, TerminalInfoInteger(propId)))
{
PrintResponseError("TerminalInfoInteger");
}
}
break;
default:
Print("Unknown command type = ", commandType);
sendVoidResponse(ExpertHandle);
break;
}
return (commandType);
}
bool OrderSelectByTicketFromCommand()
{
bool selected = false;
ticketValue = 0;
if (!getIntValue(ExpertHandle, 0, ticketValue))
{
PrintParamError("ticket");
return (false);
}
selected = OrderSelect(ticketValue, SELECT_BY_TICKET);
return (selected);
}
void PrintParamError(string paramName)
{
Print("[ERROR] parameter: ", paramName);
}
void PrintResponseError(string commandName)
{
Print("[ERROR] response: ", commandName);
}
bool OrderCloseAll()
{
int total = OrdersTotal();
for(int i = total-1; i >= 0; i--)
{
if (OrderSelect(i, SELECT_BY_POS))
{
int type = OrderType();
switch(type)
{
//Close opened long positions
case OP_BUY: OrderClose( OrderTicket(), OrderLots(), MarketInfo(OrderSymbol(), MODE_BID), 5, Red );
break;
//Close opened short positions
case OP_SELL: OrderClose( OrderTicket(), OrderLots(), MarketInfo(OrderSymbol(), MODE_ASK), 5, Red );
break;
}
}
}
return (true);
}
string CreateErrorResponse(int code, string message)
{
JSONObject *joResponse = new JSONObject();
joResponse.put("ErrorCode", new JSONNumber(code));
joResponse.put("ErrorMessage", new JSONString(message));
string result = joResponse.toString();
delete joResponse;
return result;
}
string CreateSuccessResponse(string responseName, JSONValue* responseBody)
{
JSONObject *joResponse = new JSONObject();
joResponse.put("ErrorCode", new JSONNumber(ERR_NO_ERROR));
if (responseBody != NULL)
{
joResponse.put(responseName, responseBody);
}
string result = joResponse.toString();
delete joResponse;
return result;
}
string OnRequest(string json)
{
string response = "";
JSONParser *parser = new JSONParser();
JSONValue *jv = parser.parse(json);
if(jv == NULL)
{
Print("OnRequest [ERROR]:" + (string)parser.getErrorCode() + parser.getErrorMessage());
}
else
{
if(jv.isObject())
{
JSONObject *jo = jv;
int requestType = jo.getInt("RequestType");
Print("OnRequest: RequestType = ", requestType);
switch(requestType)
{
case 1: //GetOrder
response = ExecuteRequest_GetOrder(jo);
break;
case 2: //GetOrders
response = ExecuteRequest_GetOrders(jo);
break;
case 3: //OrderSend
response = ExecuteRequest_OrderSend(jo);
break;
case 4: //OrderClose
response = ExecuteRequest_OrderClose(jo);
break;
case 5: //OrderCloseBy
response = ExecuteRequest_OrderCloseBy(jo);
break;
case 6: //OrderDelete
response = ExecuteRequest_OrderDelete(jo);
break;
case 7: //OrderModify
response = ExecuteRequest_OrderModify(jo);
break;
case 8: //iCustom
response = ExecuteRequest_iCustom(jo);
break;
case 9: //CopyRates
response = ExecuteRequest_CopyRates(jo);
break;
case 10: //Session
response = ExecuteRequest_Session(jo);
break;
case 11: //SeriesInfoInteger
response = ExecuteRequest_SeriesInfoInteger(jo);
break;
case 12: //SymbolInfoDouble
response = ExecuteRequest_SymbolInfoDouble(jo);
break;
case 13: //SymbolInfoTick
response = ExecuteRequest_SymbolInfoTick(jo);
break;
default:
Print("OnRequest [WARNING]: Unknown request type ", requestType);
response = CreateErrorResponse(-1, "Unknown request type");
break;
}
}
delete jv;
}
delete parser;
Print("OnRequest: Response = ", response);
return response;
}
string ExecuteRequest_GetOrder(JSONObject *jo)
{
if (jo.getValue("Index") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Index");
if (jo.getValue("Select") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Select");
if (jo.getValue("Pool") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Pool");
int index = jo.getInt("Index");
int select = jo.getInt("Select");
int pool = jo.getInt("Pool");
MtOrder* order = MtOrder::LoadOrder(index, select, pool);
if (order == NULL)
return CreateErrorResponse(GetLastError(), "GetOrder failed");
string response = CreateSuccessResponse("Order", order.CreateJson());
delete order;
return response;
}
string ExecuteRequest_GetOrders(JSONObject *jo)
{
if (jo.getValue("Pool") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Pool");
int pool = jo.getInt("Pool");
int total = (pool == MODE_HISTORY) ? OrdersHistoryTotal() : OrdersTotal();
JSONArray* joOrders = new JSONArray();
for(int pos = 0; pos < total; pos++)
{
MtOrder* order = MtOrder::LoadOrder(pos, SELECT_BY_POS, pool);
if (order == NULL)
{
delete joOrders;
return CreateErrorResponse(GetLastError(), "GetOrders failed");
}
joOrders.put(pos, order.CreateJson());
delete order;
}
return CreateSuccessResponse("Orders", joOrders);
}
string ExecuteRequest_OrderSend(JSONObject *jo)
{
if (jo.getValue("Symbol") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Symbol");
if (jo.getValue("Cmd") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Cmd");
if (jo.getValue("Volume") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Volume");
string symbol = jo.getString("Symbol");
int cmd = jo.getInt("Cmd");
double volume = jo.getDouble("Volume");
double price;
JSONValue *jvPrice = jo.getValue("Price");
if (jvPrice != NULL)
{
price = jvPrice.getDouble();
}
else
{
int mode = MtOrder::isLong(cmd) ? MODE_ASK : MODE_BID;
price = MarketInfo(symbol, mode);
}
JSONValue *jvSlippage = jo.getValue("Slippage");
double slippage = (jvSlippage != NULL) ? jvSlippage.getDouble() : 1;
JSONValue *jvStoploss = jo.getValue("Stoploss");
double stoploss = (jvStoploss != NULL) ? jvStoploss.getDouble() : 0;
JSONValue *jvTakeprofit = jo.getValue("Takeprofit");
double takeprofit = (jvTakeprofit != NULL) ? jvTakeprofit.getDouble() : 0;
JSONValue *jvComment = jo.getValue("Comment");
string comment = (jvComment != NULL) ? jvComment.getString() : NULL;
JSONValue *jvMagic = jo.getValue("Magic");
int magic = (jvMagic != NULL) ? jvMagic.getInt() : 0;
JSONValue *jvExpiration = jo.getValue("Expiration");
int expiration = (jvExpiration != NULL) ? jvExpiration.getInt() : 0;
JSONValue *jvArrowColor = jo.getValue("ArrowColor");
int arrowcolor = (jvArrowColor != NULL) ? jvArrowColor.getInt() : clrNONE;
int ticket = OrderSend(symbol, cmd, volume, price, slippage, stoploss, takeprofit, comment, magic, expiration, arrowcolor);
if(ticket < 0)
return CreateErrorResponse(GetLastError(), "OrderSend failed");
JSONValue* jvTicket = new JSONNumber(ticket);
return CreateSuccessResponse("Ticket", jvTicket);
}
string ExecuteRequest_OrderClose(JSONObject *jo)
{
if (jo.getValue("Ticket") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Ticket");
int ticket = jo.getInt("Ticket");
double price;
JSONValue *jvPrice = jo.getValue("Price");
if (jvPrice != NULL)
{
price = jvPrice.getDouble();
}
else
{
if (OrderSelect(ticket, SELECT_BY_TICKET))
{
string symbol = OrderSymbol();
int mode = MtOrder::isLong(OrderType()) ? MODE_BID : MODE_ASK;
price = MarketInfo(symbol, mode);
}
else
{
return CreateErrorResponse(-1, "Failed select order to get current price");
}
}
double lots;
JSONValue *jvLots = jo.getValue("Lots");
if (jvLots != NULL)
{
lots = jvLots.getDouble();
}
else
{
if (OrderSelect(ticket, SELECT_BY_TICKET))
{
lots = OrderLots();
}
else
{
return CreateErrorResponse(-1, "Failed select order to get lots of order");
}
}
JSONValue *jvSlippage = jo.getValue("Slippage");
double slippage = (jvSlippage != NULL) ? jvSlippage.getDouble() : 1;
JSONValue *jvArrowColor = jo.getValue("ArrowColor");
int arrowcolor = (jvArrowColor != NULL) ? jvArrowColor.getInt() : clrNONE;
if (!OrderClose(ticket, lots, price, slippage, arrowcolor))
return CreateErrorResponse(GetLastError(), "OrderClose failed");
return CreateSuccessResponse("", NULL);
}
string ExecuteRequest_OrderCloseBy(JSONObject *jo)
{
if (jo.getValue("Ticket") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Ticket");
if (jo.getValue("Opposite") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Opposite");
int ticket = jo.getInt("Ticket");
int opposite = jo.getInt("Opposite");
JSONValue *jvArrowColor = jo.getValue("ArrowColor");
int arrowcolor = (jvArrowColor != NULL) ? jvArrowColor.getInt() : CLR_NONE;
if (!OrderCloseBy(ticket, opposite, arrowcolor))
return CreateErrorResponse(GetLastError(), "OrderCloseBy failed");
return CreateSuccessResponse("", NULL);
}
string ExecuteRequest_OrderDelete(JSONObject *jo)
{
if (jo.getValue("Ticket") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Ticket");
int ticket = jo.getInt("Ticket");
JSONValue *jvArrowColor = jo.getValue("ArrowColor");
int arrowcolor = (jvArrowColor != NULL) ? jvArrowColor.getInt() : CLR_NONE;
if (!OrderDelete(ticket, arrowcolor))
return CreateErrorResponse(GetLastError(), "OrderDelete failed");
return CreateSuccessResponse("", NULL);
}
string ExecuteRequest_OrderModify(JSONObject *jo)
{
if (jo.getValue("Ticket") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Ticket");
if (jo.getValue("Price") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Price");
if (jo.getValue("Stoploss") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Stoploss");
if (jo.getValue("Takeprofit") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Takeprofit");
if (jo.getValue("Expiration") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Expiration");
int ticket = jo.getInt("Ticket");
double price = jo.getDouble("Price");
double stoploss = jo.getDouble("Stoploss");
double takeprofit = jo.getDouble("Takeprofit");
int expiration = jo.getInt("Expiration");
JSONValue *jvArrowColor = jo.getValue("ArrowColor");
int arrowcolor = (jvArrowColor != NULL) ? jvArrowColor.getInt() : CLR_NONE;
if (!OrderModify(ticket, price, stoploss, takeprofit, expiration, arrowcolor))
return CreateErrorResponse(GetLastError(), "OrderModify failed");
return CreateSuccessResponse("", NULL);
}
string ExecuteRequest_iCustom(JSONObject *jo)
{
if (jo.getValue("Symbol") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Symbol");
if (jo.getValue("Timeframe") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Timeframe");
if (jo.getValue("Name") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Name");
if (jo.getValue("Mode") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Mode");
if (jo.getValue("Shift") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Shift");
string symbol = jo.getString("Symbol");
int timeframe = jo.getInt("Timeframe");
string name = jo.getString("Name");
int mode = jo.getInt("Mode");
int shift = jo.getInt("Shift");
if (jo.getValue("Params") == NULL)
{
result = iCustom(symbol, timeframe, name, mode, shift);
}
else
{
JSONArray *jaParams = jo.getArray("Params");
int size = jaParams.size();
if (size < 0 || size > 10)
return CreateErrorResponse(-1, "Parameter's count is out of range.");
if (jo.getValue("ParamsType") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter ParamsType");
int paramsType = jo.getInt("ParamsType");
switch (paramsType)
{
case 0: //Int
{
int intParams[];
ArrayResize(intParams, size);
for (int i = 0; i < size; i++)
{
intParams[i] = jaParams.getInt(i);
}
result = iCustomT(symbol, timeframe, name, intParams, size, mode, shift);
}
break;
case 1: //Double
{
int doubleParams[];
ArrayResize(doubleParams, size);
result = iCustomT(symbol, timeframe, name, doubleParams, size, mode, shift);
}
break;
case 2: //String
{
string stringParams[];
ArrayResize(stringParams, size);
result = iCustomT(symbol, timeframe, name, stringParams, size, mode, shift);
}
break;
case 3: //Boolean
{
string boolParams[];
ArrayResize(boolParams, size);
result = iCustomT(symbol, timeframe, name, boolParams, size, mode, shift);
}
break;
default:
return CreateErrorResponse(-1, "Unsupported type of iCustom parameters.");
break;
}
}
return CreateSuccessResponse("Value", new JSONNumber(result));
}
template<typename T>
double iCustomT(string symbol, int timeframe, string name, T &p[], int count, int mode, int shift)
{
switch(count)
{
case 0:
return iCustom(symbol, timeframe, name, mode, shift);
break;
case 1:
return iCustom(symbol, timeframe, name, p[0], mode, shift);
case 2:
return iCustom(symbol, timeframe, name, p[0], p[1], mode, shift);
case 3:
return iCustom(symbol, timeframe, name, p[0], p[1], p[2], mode, shift);
case 4:
return iCustom(symbol, timeframe, name, p[0], p[1], p[2], p[3], mode, shift);
case 5:
return iCustom(symbol, timeframe, name, p[0], p[1], p[2], p[3], p[4], mode, shift);
case 6:
return iCustom(symbol, timeframe, name, p[0], p[1], p[2], p[3], p[4], p[5], mode, shift);
case 7:
return iCustom(symbol, timeframe, name, p[0], p[1], p[2], p[3], p[4], p[5], p[6], mode, shift);
case 8:
return iCustom(symbol, timeframe, name, p[0], p[1], p[2], p[3], p[4], p[5], p[6], p[7], mode, shift);
case 9:
return iCustom(symbol, timeframe, name, p[0], p[1], p[2], p[3], p[4], p[5], p[6], p[7], p[8], mode, shift);
case 10:
return iCustom(symbol, timeframe, name, p[0], p[1], p[2], p[3], p[4], p[5], p[6], p[7], p[8], p[9], mode, shift);
default:
return 0;
}
}
string ExecuteRequest_CopyRates(JSONObject *jo)
{
if (jo.getValue("Timeframe") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Timeframe");
if (jo.getValue("SymbolName") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter SymbolName");
if (jo.getValue("CopyRatesType") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter CopyRatesType");
string symbolName = jo.getString("SymbolName");
int timeFrame = jo.getInt("Timeframe");
int copyRatesType = jo.getInt("CopyRatesType");
MqlRates rates[];
ArraySetAsSeries(rates,true);
int copied = 0;
if (copyRatesType == 1)
{
if (jo.getValue("StartPos") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter StartPos");
if (jo.getValue("Count") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Count");
copied = CopyRates(symbolName, timeFrame, jo.getInt("StartPos"), jo.getInt("Count"), rates);
}
else if (copyRatesType == 2)
{
if (jo.getValue("StartTime") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter StartTime");
if (jo.getValue("Count") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Count");
copied = CopyRates(symbolName, timeFrame, (datetime)jo.getInt("StartTime"), jo.getInt("Count"), rates);
}
else if (copyRatesType == 3)
{
if (jo.getValue("StartTime") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter StartTime");
if (jo.getValue("StopTime") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter StopTime");
copied = CopyRates(symbolName, timeFrame, (datetime)jo.getInt("StartTime"), (datetime)jo.getInt("StopTime"), rates);
}
else
{
return CreateErrorResponse(-1, "Unsupported type of CopyRates.");
}
if(copied < 0)
{
return CreateErrorResponse(GetLastError(), "CopyRates failed.");
}
JSONArray* jaRates = new JSONArray();
for(int i = 0; i < copied; i++)
{
JSONObject *joRate = new JSONObject();
joRate.put("MtTime", new JSONNumber(rates[i].time));
joRate.put("Open", new JSONNumber(rates[i].open));
joRate.put("High", new JSONNumber(rates[i].high));
joRate.put("Low", new JSONNumber(rates[i].low));
joRate.put("Close", new JSONNumber(rates[i].close));
joRate.put("TickVolume", new JSONNumber(rates[i].tick_volume));
joRate.put("Spread", new JSONNumber(rates[i].spread));
joRate.put("RealVolume", new JSONNumber(rates[i].real_volume));
jaRates.put(i, joRate);
}
return CreateSuccessResponse("Rates", jaRates);
}
string ExecuteRequest_Session(JSONObject *jo)
{
if (jo.getValue("Symbol") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Symbol");
if (jo.getValue("DayOfWeek") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter DayOfWeek");
if (jo.getValue("SessionIndex") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter SessionIndex");
if (jo.getValue("SessionType") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter SessionType");
string symbolName = jo.getString("Symbol");
int dayOfWeek = jo.getInt("DayOfWeek");
int sessionIndex = jo.getInt("SessionIndex");
int sessionType = jo.getInt("SessionType");
MtSession* session = MtSession::LoadSession(symbolName, dayOfWeek, sessionIndex, sessionType);
string responce = CreateSuccessResponse("Session", session.CreateJson());
delete session;
return responce;
}
string ExecuteRequest_SeriesInfoInteger(JSONObject *jo)
{
if (jo.getValue("SymbolName") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter SymbolName");
if (jo.getValue("Timeframe") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Timeframe");
if (jo.getValue("PropId") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter PropId");
string symbolName = jo.getString("SymbolName");
int timeframe = jo.getInt("Timeframe");
int propId = jo.getInt("PropId");
long value = 0;
if (!SeriesInfoInteger(symbolName, timeframe, propId, value))
return CreateErrorResponse(GetLastError(), "SeriesInfoInteger failed");
return CreateSuccessResponse("Value", new JSONNumber(value));
}
string ExecuteRequest_SymbolInfoDouble(JSONObject *jo)
{
if (jo.getValue("SymbolName") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter SymbolName");
if (jo.getValue("PropId") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter PropId");
string symbolName = jo.getString("SymbolName");
int propId = jo.getInt("PropId");
double value = 0;
if (!SymbolInfoDouble(symbolName, propId, value))
return CreateErrorResponse(GetLastError(), "SymbolInfoDouble failed");
return CreateSuccessResponse("Value", new JSONNumber(value));
}
string ExecuteRequest_SymbolInfoTick(JSONObject *jo)
{
if (jo.getValue("Symbol") == NULL)
return CreateErrorResponse(-1, "Undefinded mandatory parameter Symbol");
string symbol = jo.getString("Symbol");
MqlTick tick;
if (!SymbolInfoTick(symbol, tick))
return CreateErrorResponse(GetLastError(), "SymbolInfoDouble failed");
JSONObject *joTick = new JSONObject();
joTick.put("MtTime", new JSONNumber(tick.time));
joTick.put("Bid", new JSONNumber(tick.bid));
joTick.put("Ask", new JSONNumber(tick.ask));
joTick.put("Last", new JSONNumber(tick.last));
joTick.put("Volume", new JSONNumber(tick.volume));
return CreateSuccessResponse("Tick", joTick);
}