Автор |
Сообщение |
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
У меня тут ни Ами ни хелпера нет, нол примерно так
Код: |
Pre_Buy = Ref (O, -1) > Ref (O, -2);
Position = 0;
for (i = 1; i < BarCount; i++)
{
if(position == 0)
{
if(Pre_Buy[i] == 1)
{
Buy[i] = 1;
Position = 1;
PriceBuy = Open[i];
}
else
{
if(Open[i] > PriceBuy)
{
Sell[i] = 1;
Position = 0;
}
}
}
BuyPrice = O;
SellPrice = O;
|
|
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Griff
Зарегистрирован: 20.03.2008
Сообщения: 56
|
На самом деле считается очень странно, хотя и вроде логично, по крайней мере ничего противоречивого не вижу.
PriceBuy = Open[i]
Запоминается цена для сравнения...
if (Open[i] > PriceBuy)
Тут сравнивается цена открытия. Так как продажа может быть только на следующий день, то все вроде нормально.
Сигнал к покупке не может появиться пока не произойдет продажа...
Получается в итоге, что в большенстве случаев тупо продается на следующий день. При тестировани на LKOH с 01.01.2003 по 01.01.2008 присутствуют 6 сделок по четыре бара, где в 3-х случая продается с минусом, а в остальных 3-х просто передерживается на 1 день. В остальных случаях просто продается на следующий день.
Это были мысли вслух |
|
|
Посмотреть профиль Отправить личное сообщение |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
Сейчас проверил. Там была ошибочка, нехватало скобки. Вот исправленый код
Код: |
Pre_Buy = Ref(Open, -1) > Ref(Open, -2);
Position = 0;
for (i = 1; i < BarCount; i++)
{
if(position == 0)
{
if(Pre_Buy[i] == 1)
{
Buy[i] = 1;
Position = 1;
PriceBuy = Open[i];
}
}
else
{
if(Open[i] > PriceBuy)
{
Sell[i] = 1;
Position = 0;
}
}
}
BuyPrice = Open;
SellPrice = Open;
|
Все считает правильно. |
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Griff
Зарегистрирован: 20.03.2008
Сообщения: 56
|
000 писал(а): |
нехватало скобки |
Есть такое
Хм, странно.
У меня получается такой результат, хотя по идее продаж с убытком быть не должно:
Видимо у меня что-то не то в настройках, сейчас попробую разобраться.
Кстати, а что это за цифры в скобочках в столбце "Trade", около типа позиции? |
|
|
Посмотреть профиль Отправить личное сообщение |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
Цитата: |
Хм, странно.
У меня получается такой результат, хотя по идее продаж с убытком быть не должно:
|
Проверь настройки на закладке Trades. Delay должен быть везде установлен 0. И еще проверь не включены ли стопы.
Цитата: |
Кстати, а что это за цифры в скобочках в столбце "Trade", около типа позиции?
|
Хм. Не знаю. У меня их нет. |
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Griff
Зарегистрирован: 20.03.2008
Сообщения: 56
|
Не выходит каменный цветок. Прибил Ами, поставил снова с минимумом всего для тестирования, и фиг.
На закладке Trades везде установлен 0.
На закладке Stops все disabled.
Еще обратил внимания на то, что около типа позиции он показывает не только какие-то левые цифры, но и в некоторых случаях пишет profit, stop loss, n-bar и trail
Выходит, что все-таки где-то стоят настройки |
|
|
Посмотреть профиль Отправить личное сообщение |
|
Сергей
Зарегистрирован: 16.03.2008
Сообщения: 168
|
Griff писал(а): |
Не выходит каменный цветок. Прибил Ами, поставил снова с минимумом всего для тестирования, и фиг.
На закладке Trades везде установлен 0.
На закладке Stops все disabled.
Еще обратил внимания на то, что около типа позиции он показывает не только какие-то левые цифры, но и в некоторых случаях пишет profit, stop loss, n-bar и trail
Выходит, что все-таки где-то стоят настройки |
Убери в тексте программы настройки стопов) |
|
|
Посмотреть профиль Отправить личное сообщение |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
Действительно. А точно в код больше ничего не добавлено? |
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Griff
Зарегистрирован: 20.03.2008
Сообщения: 56
|
В коде точно ничего нет. Создал новый файл и скопировал с форума код
Хм, может какой-то косяк при копировании и вставке, попробую перебить код в рукопашную, а вдруг поможет, хотя, скорее всего, нет.
Цитата: |
...попробую перебить код в рукопашную... |
Попробовал, ничего не изменилось. |
|
|
Посмотреть профиль Отправить личное сообщение |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
Какая версия Ами? |
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Griff
Зарегистрирован: 20.03.2008
Сообщения: 56
|
000 писал(а): |
Какая версия Ами? |
Версия: 5.00.1 (14 сентября 2007) |
|
|
Посмотреть профиль Отправить личное сообщение |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
Наконец удалось получить такой же результат. Буду разбираться. |
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Griff
Зарегистрирован: 20.03.2008
Сообщения: 56
|
Интересно. Что для этого потребовалось сломать? |
|
|
Посмотреть профиль Отправить личное сообщение |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
Пока похоже это зависит от данных. |
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
Вроде заработало после вот таких дополнений
Код: |
Pre_Buy = Nz(Ref(Open, -1) > Ref(Open, -2), 0);
Sell = 0;
Position = 0;
for (i = 1; i < BarCount; i++)
{
if(Position == 0)
{
if(Pre_Buy[i] == 1)
{
Buy[i] = 1;
Position = 1;
PriceBuy = Open[i];
}
}
else
{
if(Open[i] > PriceBuy)
{
Sell[i] = 1;
Position = 0;
}
}
}
BuyPrice = Open;
SellPrice = Open;
|
|
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
|