Список форумов AmiSite.ru AmiSite.ru
Форум по Ами
 FAQ  •  Поиск  •  Пользователи  •  Группы   •  Регистрация  •  Профиль  •  Войти и проверить личные сообщения  •  Вход
 Простейшая система Следующая тема
Предыдущая тема
Начать новую тему  Ответить на тему
Автор Сообщение
rcoma



Зарегистрирован: 19.10.2009
Сообщения: 21

СообщениеДобавлено: Вт Ноя 17, 2009 8:11 pm Ответить с цитатой Вернуться к началу

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

_________________
Мой сайт: http://earlytrade.livejournal.com/
Посмотреть профиль Отправить личное сообщение Посетить сайт автора
000
Site Admin


Зарегистрирован: 10.12.2007
Сообщения: 9106

СообщениеДобавлено: Вт Ноя 17, 2009 8:38 pm Ответить с цитатой Вернуться к началу

Код:

Buy = Random() > 0.9;
Sell = 0;
Short = Random() < 0.1;
Cover = 0;
SetPositionSize(1, 4);

ApplyStop(stopTypeLoss, stopModePercent, 2, 1);
ApplyStop(stopTypeProfit, stopModePercent, 5, 1);
ApplyStop(stopTypeTrailing, stopModePercent, 4, 1);

_________________
ceterum censeo carthaginem esse delendam
Удачи. Олег.
Посмотреть профиль Отправить личное сообщение Посетить сайт автора
rcoma



Зарегистрирован: 19.10.2009
Сообщения: 21

СообщениеДобавлено: Ср Ноя 18, 2009 4:06 pm Ответить с цитатой Вернуться к началу

000 писал(а):
Код:

Buy = Random() > 0.9;
Sell = 0;
Short = Random() < 0.1;
Cover = 0;
SetPositionSize(1, 4);

ApplyStop(stopTypeLoss, stopModePercent, 2, 1);
ApplyStop(stopTypeProfit, stopModePercent, 5, 1);
ApplyStop(stopTypeTrailing, stopModePercent, 4, 1);


спасибо, будем разбирацо, ни че не понятно пока что Smile

_________________
Мой сайт: http://earlytrade.livejournal.com/
Посмотреть профиль Отправить личное сообщение Посетить сайт автора
000
Site Admin


Зарегистрирован: 10.12.2007
Сообщения: 9106

СообщениеДобавлено: Сб Фев 27, 2010 6:32 pm Ответить с цитатой Вернуться к началу

Запросто. Для этого есть функция Foreign. Посмотри вот этот код
http://www.amisite.ru/afl/ind/0008.htm

_________________
ceterum censeo carthaginem esse delendam
Удачи. Олег.
Посмотреть профиль Отправить личное сообщение Посетить сайт автора
Shitan



Зарегистрирован: 12.03.2010
Сообщения: 48

СообщениеДобавлено: Ср Май 05, 2010 8:17 pm Ответить с цитатой Вернуться к началу

Что-то не работает. Equity(1); добавил, всё равно не хочет.
Посмотреть профиль Отправить личное сообщение
000
Site Admin


Зарегистрирован: 10.12.2007
Сообщения: 9106

СообщениеДобавлено: Ср Май 05, 2010 9:09 pm Ответить с цитатой Вернуться к началу

Что не хочет? Если только тестировать, то Equity() не надо.

_________________
ceterum censeo carthaginem esse delendam
Удачи. Олег.
Посмотреть профиль Отправить личное сообщение Посетить сайт автора
Shitan



Зарегистрирован: 12.03.2010
Сообщения: 48

СообщениеДобавлено: Ср Май 05, 2010 10:11 pm Ответить с цитатой Вернуться к началу

Работать не хочет. Вот код полностью.
Код:
_SECTION_BEGIN("Price");
SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
Plot( C, "Close", ParamColor("Color", colorBlack ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );
_SECTION_END();

/// Случайный вход


Buy = Random() > 0.9;
Sell = 0;
Short = Random() < 0.1;
Cover = 0;
SetPositionSize(1, 4);

ApplyStop(stopTypeLoss, stopModePercent, 2, 1);
ApplyStop(stopTypeProfit, stopModePercent, 5, 1);
ApplyStop(stopTypeTrailing, stopModePercent, 4, 1);

Buy=ExRem(Buy,Sell);
Sell=ExRem(Sell,Buy);
Short=ExRem(Short,Cover);
Cover=ExRem(Cover,Short);
 
Equity(1);

BuyPrice =  ShortPrice =SellPrice = ShortPrice =  C;

PlotShapes(IIf(Buy,shapeUpArrow,0),5,0,Graph0,-15);
PlotShapes(IIf(Sell,shapeDownArrow,0),4,0,Graph0,-15);
PlotShapes(IIf(Cover,shapeHollowUpArrow,0),5,0,Graph0,-15);
PlotShapes(IIf(Short,shapeHollowDownArrow,0),4,0,Graph0,-15);


Сделок не рисует.
Посмотреть профиль Отправить личное сообщение
000
Site Admin


Зарегистрирован: 10.12.2007
Сообщения: 9106

СообщениеДобавлено: Ср Май 05, 2010 10:25 pm Ответить с цитатой Вернуться к началу

Понятно.
Вот тут
Код:

Buy=ExRem(Buy,Sell);
Sell=ExRem(Sell,Buy);
Short=ExRem(Short,Cover);
Cover=ExRem(Cover,Short);

фильтруются "лишние" сигналы. Не понятно зачем. Функция Equity() их и так фильтрует.
При этом сигналов Sell и Cover в этом месте нет. Т.е. второго Buy Short не будет. Сигналы Sell и Cover появляются только после обработки стопов, а эти занимается функция Equity(), а она стоит после этого блока.
Вывод. Перенести Equity() вперед блока фильтрации лишних сигналов или вообще его убрать.

_________________
ceterum censeo carthaginem esse delendam
Удачи. Олег.
Посмотреть профиль Отправить личное сообщение Посетить сайт автора
Shitan



Зарегистрирован: 12.03.2010
Сообщения: 48

СообщениеДобавлено: Ср Май 05, 2010 10:29 pm Ответить с цитатой Вернуться к началу

Спасибо, разобрался! Заработало. Сечас оптимизатор прикручу.
Посмотреть профиль Отправить личное сообщение
Показать сообщения:      
Начать новую тему  Ответить на тему


 Перейти:   



Следующая тема
Предыдущая тема
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах
Вы не можете вкладывать файлы
Вы не можете скачивать файлы


Powered by phpBB © 2001, 2002 phpBB Group :: FI Theme :: Часовой пояс: GMT + 3

File Attachment © by Meik Sievertsen