Robostock
0
All posts from Robostock
  Robostock in Robostock,

боремся с qpile (день первый)

наслышан о том, что нет ничего хуже, чем написание торговых роботов на qpile.
решил реализовать простого робота на qpile. Т.к. раньше ни чем подобным не занимался решил разбить его реализацию на несколько этапов:
1. написание простого робота, который тупо извлекает данные из таблицы текущих параметров.
2. добавить логику обработки данных
3. добавить выставление заявок.
Каждый из этапов решил опубликовать в сообществе.
Вот первый пример, который извлекает минимальную и максимальну цену из таблицы текущих параметров.

PORTFOLIO_EX idmm;
DESCRIPTION idmm;
CLIENTS_LIST ALL_CLIENTS;
FIRMS_LIST All_FIRMS;

PROGRAM

delete_all_items()
mp = create_map()
min_price = get_value(get_param_ex("EQNE","GAZP","LOW"),"param_value")
max_price = get_value(get_param_ex("EQNE","GAZP","HIGH"),"param_value")
mp = set_value(mp,"SecCode","GAZP")
mp = set_value(mp,"min",min_price)
mp = set_value(mp,"max",max_price)
add_item(0,mp)

END_PROGRAM

PARAMETER SecCode;
PARAMETER_TITLE Код бумаги;
PARAMETER_DESCRIPTION Код бумаги;
PARAMETER_TYPE STRING(16);
END

PARAMETER min;
PARAMETER_TITLE Минимальная цена;
PARAMETER_DESCRIPTION Минимальная цена;
PARAMETER_TYPE NUMERIC(10,3);
END

PARAMETER max;
PARAMETER_TITLE Максимальная цена;
PARAMETER_DESCRIPTION Максимальная цена;
PARAMETER_TYPE NUMERIC(10,3);
END

END_PORTFOLIO_EX