Комментарии на: Сборник торговых роботов

От: Григорий

Григорий — Thu, 11 Jun 2009 09:59:57 +0000

Спасибо. Но робот который был здесь далеко не совершенен. Поэтому его да же убрали с сайта. Возможно мы выпустим коммерческую версию, в которой будут разные возможности, в том числе уведомления по эл. почте и прочее.

От: Евгений

Евгений — Thu, 11 Jun 2009 09:51:28 +0000

Передам!

От: Andry

Andry — Thu, 11 Jun 2009 09:49:51 +0000

Григорию. Спасибо за Трал-бота! Попробовал Трал-бота на SBERP03 — заработал с первого раза, а вот на FEES не хочет выставлять заявку хотя отклонения превышают указанные иногда в 2-3-4 раза. При этом лог-файл записываются строчки без указания даты-времени в колонке INFO. А QUIK выдает сообщение что инструмент запрещен для шорта. Бумага не заблокированна. И никак не могу понять почему не работает. И отловить тоже пока не получилось. Буду рад если поможете. Учусь.

От: Евгений

Евгений — Thu, 16 Apr 2009 15:27:13 +0000

При выборке данных из таблицы всех сделок QUIK для Qpile не фильтрует данные, а высыпает все в кучу, которые потом нужно фильтровать. Это как раз подсаживает робота. проще дождаться когда разработчики исправят ошибку. Хотя поизвращаться тоже можно

От: Сергей

Сергей — Thu, 16 Apr 2009 14:05:47 +0000

Насколько я понимаю, как (q1*p1+q2*p2+...+qn*pn)/(q1+q2+...qn),

где q — количество бумаг по определенной цене p. Плюс необходимо корректировать на комиссию.

Если стратегия исключительно внутридневная, то данные можно брать из таблицы сделок, но насколько я убедился на собственном опыте, лучше qpile не перегружать, иначе начинаются глюки, особенно если расчет будет по скальперскому роботу с кучей сделок... Хотя может быть все будет работать хорошо)

От: Евгений

Евгений — Thu, 16 Apr 2009 12:54:35 +0000

По какой формуле рассчитывается средневзвешенная цена покупки?

От: Сергей

Сергей — Thu, 16 Apr 2009 06:32:22 +0000

Хотел заметить по поводу средневзвешенной цены покупки! В квике ошибка и ее получиь пока невозможно(. Я спрашивал на форуме, вот ветка:

quik.ru/user/forum/qpile/34726/35304/

вот так(

От: Евгений

Евгений — Thu, 16 Apr 2009 04:02:14 +0000

Валерий!

Необходимо описать подробней что делают функции, и как это использовать.

Выложил в раздел скачать.

От: Валерий

Валерий — Thu, 16 Apr 2009 04:01:07 +0000

Func MovAv (Tag,Date,Time)

result=0

slice = Get_Candle_Ex (Tag, Date, Time)

LineCount = Get_Value (slice,"COUNT")

time = Get_Value (slice,"TIME")

lines = Get_Value (slice,"LINES")

FOR lineID FROM 0 TO LineCount-1

line = Get_Collection_Item (lines, lineID)

close = Get_Value (line,"CLOSE")

result=0+apply_scale (close,4)

end for

end Func

outputline=1

interval=5

hourshift=-3

I=500

output=CREATE_MAP ()

mDatetime=GET_DATETIME ()

candle_data=format_date (mDateTime)

candle_time=format_last_candle_time (mDateTime,interval,hourshift)

times=candle_time-500

slow=MovAv («mov10»,candle_data, candle_time)

fast=MovAv («mov»,candle_data, candle_time)

prevslow=MovAv («mov10»,candle_data, candle_time-I)

prevfast=MovAv («mov»,candle_data, candle_time-I)

output=SET_VALUE (output,"Date",candle_time)

output=SET_VALUE (output,"slow",slow)

output=SET_VALUE (output,"fast",fast)

if (slow> fast)

output=set_value (output,"trend_line","Down" )

SET_ROW_COLOR_EX (outputline,"RGB (255,0,0)", «RGB (255,0,0)», «DEFAULT_COLOR», «DEFAULT_COLOR»)

end if

if (slowprevslow)

output=set_value (output,"trend_line","Sell" )

label_params=create_map ()

label_params=set_value (label_params,"TEXT", «Sell»)

label_params=set_value (label_params,"ALIGNMENT", «LEFT»)

label_params=set_value (label_params,"YVALUE", fast)

label_params=set_value (label_params,"DATE", candle_data)

label_params=set_value (label_params,"TIME", candle_time)

label_params=set_value (label_params,"R", 255)

label_params=set_value (label_params,"G", 0)

label_params=set_value (label_params,"B", 0)

label_params=set_value (label_params,"TRANSPARENCY", 10)

label_params=set_value (label_params,"FONT_FACE_NAME", «Tahoma»)

label_params=set_value (label_params,"FONT_HEIGHT", 12)

label_params=set_value (label_params,"HINT", «Продавай!!!»)

id=ADD_LABEL («mov», label_params)

end if

if (slow=fast) and (prevfast

output=set_value (output,"trend_line","Buy" )

label_params=create_map ()

label_params=set_value (label_params,"TEXT", «Buy»)

label_params=set_value (label_params,"ALIGNMENT", «LEFT»)

label_params=set_value (label_params,"YVALUE", fast)

label_params=set_value (label_params,"DATE", candle_data)

label_params=set_value (label_params,"TIME", candle_time)

label_params=set_value (label_params,"R", 255)

label_params=set_value (label_params,"G", 0)

label_params=set_value (label_params,"B", 0)

label_params=set_value (label_params,"TRANSPARENCY", 10)

label_params=set_value (label_params,"FONT_FACE_NAME", «Tahoma»)

label_params=set_value (label_params,"FONT_HEIGHT", 12)

label_params=set_value (label_params,"HINT", «Покупай!!!»)

id=ADD_LABEL («mov», label_params)

end if

ADD_ITEM (outputline,output)

outputline=outputline+1

END_PROGRAM

PARAMETER Date;

PARAMETER_TITLE Дата;

PARAMETER_DESCRIPTION Last msg;

PARAMETER_TYPE STRING (12);

END

PARAMETER slow;

PARAMETER_TITLE MOV10;

PARAMETER_DESCRIPTION Last msg;

PARAMETER_TYPE NUMERIC (10,5);

END

PARAMETER trend_line;

PARAMETER_TITLE Trend;

PARAMETER_DESCRIPTION Trend;

PARAMETER_TYPE STRING (1024);

END

PARAMETER fast;

PARAMETER_TITLE MOV2;

PARAMETER_DESCRIPTION Last msg;

PARAMETER_TYPE NUMERIC (10,5);

END

END_PORTFOLIO_EX

От: Валерий

Валерий — Thu, 16 Apr 2009 03:58:33 +0000

простенький робот по мовингам (ставит на графике где покупать, где продавать без отправки транзакций) Нужно еще дорабатывать.

Можете не опубликовывать.

PORTFOLIO_EX MOVAV;

DESCRIPTION MOVAV;

CLIENTS_LIST ALL_CLIENTS;

FIRMS_LIST FIRM_ID;

PROGRAM

func format_date (mDateTime)

result=0

tYear = 0+get_value (mDateTime, «YEAR»)

tMonth = 0+get_value (mDateTime, «MONTH»)

tDay = 0+get_value (mDateTime, «DAY»)

if (tMonth < 10)

tMonth = «0» & tMonth

end if

if (tDay < 10)

tDay = «0» & tDay

end if

result = tYear & tMonth & tDay

end func

func format_last_candle_time (mDateTime, interval, hour_shift)

result=0

tHour=0+get_value (mDateTime, «HOUR») + hour_shift

tMin=floor ((0 + get_value (mDateTime, «MIN»)) / interval) * interval

if (tHour < 10)

tHour = «0» & tHour

end if

if (tMin fast)

output=set_value (output,"trend_line","Down" )

SET_ROW_COLOR_EX (outputline,"RGB (255,0,0)", «RGB (255,0,0)», «DEFAULT_COLOR», «DEFAULT_COLOR»)

end if

if (slowprevslow)

output=set_value (output,"trend_line","Sell" )

label_params=create_map ()

label_params=set_value (label_params,"TEXT", «Sell»)

label_params=set_value (label_params,"ALIGNMENT", «LEFT»)

label_params=set_value (label_params,"YVALUE", fast)

label_params=set_value (label_params,"DATE", candle_data)

label_params=set_value (label_params,"TIME", candle_time)

label_params=set_value (label_params,"R", 255)

label_params=set_value (label_params,"G", 0)

label_params=set_value (label_params,"B", 0)

label_params=set_value (label_params,"TRANSPARENCY", 10)

label_params=set_value (label_params,"FONT_FACE_NAME", «Tahoma»)

label_params=set_value (label_params,"FONT_HEIGHT", 12)

label_params=set_value (label_params,"HINT", «Продавай!!!»)

id=ADD_LABEL («mov», label_params)

end if

if (slow=fast) and (prevfast

output=set_value (output,"trend_line","Buy" )

label_params=create_map ()

label_params=set_value (label_params,"TEXT", «Buy»)

label_params=set_value (label_params,"ALIGNMENT", «LEFT»)

label_params=set_value (label_params,"YVALUE", fast)

label_params=set_value (label_params,"DATE", candle_data)

label_params=set_value (label_params,"TIME", candle_time)

label_params=set_value (label_params,"R", 255)

label_params=set_value (label_params,"G", 0)

label_params=set_value (label_params,"B", 0)

label_params=set_value (label_params,"TRANSPARENCY", 10)

label_params=set_value (label_params,"FONT_FACE_NAME", «Tahoma»)

label_params=set_value (label_params,"FONT_HEIGHT", 12)

label_params=set_value (label_params,"HINT", «Покупай!!!»)

id=ADD_LABEL («mov», label_params)

end if

ADD_ITEM (outputline,output)

outputline=outputline+1

END_PROGRAM

PARAMETER Date;

PARAMETER_TITLE Дата;

PARAMETER_DESCRIPTION Last msg;

PARAMETER_TYPE STRING (12);

END

PARAMETER slow;

PARAMETER_TITLE MOV10;

PARAMETER_DESCRIPTION Last msg;

PARAMETER_TYPE NUMERIC (10,5);

END

PARAMETER trend_line;

PARAMETER_TITLE Trend;

PARAMETER_DESCRIPTION Trend;

PARAMETER_TYPE STRING (1024);

END

PARAMETER fast;

PARAMETER_TITLE MOV2;

PARAMETER_DESCRIPTION Last msg;

PARAMETER_TYPE NUMERIC (10,5);

END

END_PORTFOLIO_EX