Автор |
Сообщение |
Apple
Зарегистрирован: 24.09.2014
Сообщения: 39
|
000 писал(а): |
Попробуй вот этот код прогнать в АА 1 раз на последнем баре "Explore"
Код: |
Filter = 1;
Acco = "11111-000" ; // ваш счет
Mar = "MICEX_SHR"; // Код площадки
Emi = "LKOH"; // обозначение бумаги
Lot = 1;
Price = 2000;
Dat = Now(1) + " 23:45";
AD = CreateObject("ADLite.AlfaDirect");
OrderNo = AD.CreateLimitOrder (Acco, Mar, Emi, Dat, "Buy comment", "RUR", "B", Lot, Price,
Null, Null, Null, Null,
Null, Null, Null, Null,
Null, Null, Null, Null,
Null, Null, Null, Null, 10);
Msg = "";
if(OrderNo == 0)
Msg = LastResultMsg;
AddColumn(OrderNo, "Ордер", 1.0);
AddTextColumn(Msg, "Сообщение", 1.0);
|
Скажи потом что напишет. Я на счет Dat не уверен. |
что такое AA? |
|
|
Посмотреть профиль Отправить личное сообщение |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Apple
Зарегистрирован: 24.09.2014
Сообщения: 39
|
Выдает ошибку LastResultMsg. |
|
|
Посмотреть профиль Отправить личное сообщение |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
Какая ошибка. Подробнее. |
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
О, бля...
У меня ошибка. Вот так надо
Код: |
Filter = 1;
Acco = "11111-000" ; // ваш счет
Mar = "MICEX_SHR"; // Код площадки
Emi = "LKOH"; // обозначение бумаги
Lot = 1;
Price = 2000;
Dat = Now(1) + " 23:45";
AD = CreateObject("ADLite.AlfaDirect");
OrderNo = AD.CreateLimitOrder (Acco, Mar, Emi, Dat, "Buy comment", "RUR", "B", Lot, Price,
Null, Null, Null, Null,
Null, Null, Null, Null,
Null, Null, Null, Null,
Null, Null, Null, Null, 10);
Msg = "";
if(OrderNo == 0)
Msg = AD.LastResultMsg;
AddColumn(OrderNo, "Ордер", 1.0);
AddTextColumn(Msg, "Сообщение", 1.0);
|
|
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Apple
Зарегистрирован: 24.09.2014
Сообщения: 39
|
В мануле пишут что надо,
ADObj.LastResultMsg.
Сори, я в джунглях.
Короче последний код ошибок не выдает. |
|
|
Посмотреть профиль Отправить личное сообщение |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
Проверь выставляет ли он ордер. По результату напишешь. |
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Apple
Зарегистрирован: 24.09.2014
Сообщения: 39
|
000 писал(а): |
Проверь выставляет ли он ордер. По результату напишешь. |
Олег, в альфе разве не надо скрипт засоввать в <% and %>?
Короче не ставит код заявки. |
|
|
Посмотреть профиль Отправить личное сообщение |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
А чо говорит? В столбце Сообщение что пишет?
Скрипт засовывать надо если это жаба или ВБ. Раньше AFL не мог сам работать с ком и приходилось делать это на жабе или ВБ, но это давно было. Ща я написал средствами чисто AFL поэтому <% %> не надо. |
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
Так что там в столбце "Сообщение"? |
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Apple
Зарегистрирован: 24.09.2014
Сообщения: 39
|
000 писал(а): |
Так что там в столбце "Сообщение"? |
Он не генерит сигнал, нет отчета,нет столбца.
Тему с подключением через com не понимаю. В альфа мануале пишут одно в ами гайде другое. Какая схема:включена альфа+ами с плагином, ами должен на языке api сказать альфе выставить ордер?
Now(1) + " 23:45" Олег мог бы сказать что значит вот эта строка? |
|
|
Посмотреть профиль Отправить личное сообщение |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
Apple писал(а): |
000 писал(а): |
Так что там в столбце "Сообщение"? |
Он не генерит сигнал, нет отчета,нет столбца.
Тему с подключением через com не понимаю. В альфа мануале пишут одно в ами гайде другое. Какая схема:включена альфа+ами с плагином, ами должен на языке api сказать альфе выставить ордер?
Now(1) + " 23:45" Олег мог бы сказать что значит вот эта строка? |
Столбец должен быть не зависимо от того есть сигнал или нет. Если код отработал до конца, то столбец обязан быть.
Эта строка время действия приказа. Now(1) это сегодняшняя дата, а 23:45 это время до которого действие приказа не отменяется. |
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Apple
Зарегистрирован: 24.09.2014
Сообщения: 39
|
Олег, привет
короче в сообщении пишет ошибку:
Overflow while converting variant of type (Single) into type (Integer)
Все таки наверное нельзя напрямую без скрипта, как думаешь? |
|
|
Посмотреть профиль Отправить личное сообщение |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
Ага. Т.е. ему не нравится либо таймаут либо лот...
Надо подумать...
Слишком долго приходится ждать от тебя ответ....
Я теряю нить и интерес.... )))) |
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
Там у Альфы есть какое либо демо? чтобы я сам пробовал. |
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
|