| Автор |
Сообщение |
commenced
Советник
Зарегистрирован: 08.04.2008
Сообщения: 643
Откуда: от "Верблюда"
|
| Код: |
Opt1 = Optimize("opt1", 50, 50,150,10);
Opt2 = Optimize("opt2",20, 10,150,10);
Opt3 = Optimize("opt3", 110, 50,150,10);
Opt4 = Optimize("opt4", 100, 10,150,10);
x = (H+L)/2;
y = (x/Ref(x,-Opt1))*100;
Buy = Cross((x/Ref(x,-Opt1))*100,MA((x/Ref(x,-Opt1))*100,Opt2)) AND (x/Ref(x,-Opt1))*100<Opt3;
Short = Cross(MA((x/Ref(x,-Opt1))*100,Opt2),(x/Ref(x,-Opt1))*100) AND (x/Ref(x,-Opt1))*100>Opt4;
Sell = Short;
Cover = Buy;
BuyPrice = SellPrice = ShortPrice = CoverPrice = C;
Buy = ExRem(Buy,Sell);
Sell = ExRem(Sell,Buy);
Short = ExRem(Short,Cover);
Cover = ExRem(Cover,Short);
PlotShapes(IIf(Buy,shapeUpArrow,0),5,0,1,-3);
PlotShapes(IIf(Sell,shapeDownArrow,0),4,0,1,-3);
PlotShapes(IIf(Cover,shapeHollowUpArrow,0),5,0,1,-3);
PlotShapes(IIf(Short,shapeHollowDownArrow,0),4,0,1,-3);
Plot( Opt3, "Верх", colorBlue );
Plot( Opt4, "Низ", colorRed );
Plot( y, "Стохостик", colorGreen );
|
Только со значками где покупка продажа косяк, почемуто смещены вниз сильно, попытался подставлять разное смещение и слои непомогло.
Из графика будет понятен принцип системы. Систему не оптимизировал. |
_________________
Юра |
|
| Посмотреть профиль Отправить личное сообщение Отправить e-mail |
|
настырный
Зарегистрирован: 15.06.2008
Сообщения: 67
|
| commenced писал(а): |
Только со значками где покупка продажа косяк, почемуто смещены вниз сильно, попытался подставлять разное смещение и слои непомогло.
Из графика будет понятен принцип системы. Систему не оптимизировал. |
Привет!
что б стрелки не скакали, как блохи,  попробуй вот так:
| Код: |
PlotShapes(IIf(Buy,shapeUpArrow,0),5,0,y,-3);
PlotShapes(IIf(Sell,shapeDownArrow,0),4,0,y,3);
PlotShapes(IIf(Cover,shapeHollowUpArrow,0),5,0,y,-15);
PlotShapes(IIf(Short,shapeHollowDownArrow,0),4,0,y,15);
|
|
|
|
| Посмотреть профиль Отправить личное сообщение |
|
commenced
Советник
Зарегистрирован: 08.04.2008
Сообщения: 643
Откуда: от "Верблюда"
|
| настырный писал(а): |
| commenced писал(а): |
Только со значками где покупка продажа косяк, почемуто смещены вниз сильно, попытался подставлять разное смещение и слои непомогло.
Из графика будет понятен принцип системы. Систему не оптимизировал. |
Привет!
что б стрелки не скакали, как блохи, попробуй вот так:
| Код: |
PlotShapes(IIf(Buy,shapeUpArrow,0),5,0,y,-3);
PlotShapes(IIf(Sell,shapeDownArrow,0),4,0,y,3);
PlotShapes(IIf(Cover,shapeHollowUpArrow,0),5,0,y,-15);
PlotShapes(IIf(Short,shapeHollowDownArrow,0),4,0,y,15);
|
|
Спасибо. |
_________________
Юра |
|
| Посмотреть профиль Отправить личное сообщение Отправить e-mail |
|
Teema
Зарегистрирован: 01.04.2009
Сообщения: 184
|
Уважаемый commenced, подскажите пожалуйста где можно подробнее познакомиться с этой системой. Описание и т.п. Если можно!
По графику ничего не понял. |
|
|
| Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Teema
Зарегистрирован: 01.04.2009
Сообщения: 184
|
Потихоньку начал разбираться.
При тестировании выяснилось, что не работает условие прописанное
через AND. Т. е. проходят все сделки.
Посмотрите пожалуйста в чем проблема.
Для полной прорисовки графиков добавил такой код:
Plot( MA(y,opt2), "MA", colorRed ); |
|
|
| Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Teema
Зарегистрирован: 01.04.2009
Сообщения: 184
|
Посмотрел внимательно. Условия > < поменял наоборот
для того, чтобы покупка проходила по условиям ниже опт4
а продажа выше опт3.
Ничего что с собой разговариваю?
Решил на этой системе учиться. |
|
|
| Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
Немного переписал под себя для проверки. Все работает
| Код: |
Opt1 = Optimize("opt1", 50, 50, 150, 10);
Opt2 = Optimize("opt2",20, 10, 150, 10);
Opt3 = Optimize("opt3", 110, 50, 150, 10);
Opt4 = Optimize("opt4", 100, 10, 150, 10);
x = (H+L)/2;
y = x/Ref(x, -Opt1)*100;
q = x/Ref(x, -Opt1)*100;
Buy = Cross(q, MA(q, Opt2)) AND q < Opt3;
Short = Cross(MA(q, Opt2), q) AND q > Opt4;
Sell = Short;
Cover = Buy;
BuyPrice = SellPrice = ShortPrice = CoverPrice = C;
Buy = ExRem(Buy,Sell);
Sell = ExRem(Sell,Buy);
Short = ExRem(Short,Cover);
Cover = ExRem(Cover,Short);
Plot(C, "", colorBlack, styleCandle);
PlotShapes(IIf(Buy,shapeUpArrow,0),5,0,C,-3);
PlotShapes(IIf(Sell,shapeDownArrow,0),4,0,C,-3);
PlotShapes(IIf(Cover,shapeHollowUpArrow,0),5,0,C,-3);
PlotShapes(IIf(Short,shapeHollowDownArrow,0),4,0,C,-3);
|
|
_________________
ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
| Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Teema
Зарегистрирован: 01.04.2009
Сообщения: 184
|
Неправильно сформулировал. Поменял не знаки а условия:
Покупка если... и у < опт4;
Продажа если... и у > опт3. |
|
|
| Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Teema
Зарегистрирован: 01.04.2009
Сообщения: 184
|
Я подумал, что покупал бы если средняя ушла ниже. С продажей наоборот. А так получается что колбасим в боковике. По логике системы так получается.
Спасибо за ответ, только-что увидел.
Сейчас посмотрю. |
|
|
| Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Teema
Зарегистрирован: 01.04.2009
Сообщения: 184
|
Во! Протестировал то, что я сказал. Ни одной убыточной оптимизации на GZM9.
Нет. Все как всегда. Много нулевых вариантов, поэтому до убыточных не дошел. |
Последний раз редактировалось: Teema (Ср Апр 29, 2009 4:23 am), всего редактировалось 1 раз |
|
| Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
| Teema писал(а): |
| Во! Протестировал то, что я сказал. Ни одной убыточной оптимизации на GZM9. |
Ух ты... Тоже чтоли протестировать? |
_________________
ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
| Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Teema
Зарегистрирован: 01.04.2009
Сообщения: 184
|
Нафига написал? Хоть бы денег сначала заработал!
А код- очень интересно откуда взялся. Очень!
Скромно поменяны условия входа и выхода. Типа незаметно.
Автор колись пожалуйста. |
|
|
| Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Teema
Зарегистрирован: 01.04.2009
Сообщения: 184
|
Олег! Протестируй пожалуйста. Я ведь недавно тут сижу.
(Хотя денег на фортсе слито достаточно). |
|
|
| Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Teema
Зарегистрирован: 01.04.2009
Сообщения: 184
|
Не, что то не то. Наверное чудес на свете не бывает.
Поставил оптимизированные параметры, а сделки начали между уровнями опт3и опт4 проходить. Потому что после оптимизации они сами местами поменялись.
 |
|
|
| Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
Попробовал на 15 мин на SPFB.GAZR одним лотом. Уменьшил число оптов для скорости
| Код: |
Opt1 = Optimize("opt1", 100, 50, 150, 50);
Opt2 = Optimize("opt2",80, 10, 150, 10);
Opt3 = Optimize("opt3", 150, 50, 150, 50);
Opt4 = Optimize("opt4", 140, 10, 150, 10);
SetPositionSize(1, 4);
x = (H+L)/2;
y = x/Ref(x, -Opt1)*100;
q = x/Ref(x, -Opt1)*100;
Buy = Cross(q, MA(q, Opt2)) AND q < Opt3;
Short = Cross(MA(q, Opt2), q) AND q > Opt4;
Sell = Short;
Cover = Buy;
BuyPrice = SellPrice = ShortPrice = CoverPrice = C;
Buy = ExRem(Buy,Sell);
Sell = ExRem(Sell,Buy);
Short = ExRem(Short,Cover);
Cover = ExRem(Cover,Short);
Plot(C, "", colorBlack, styleCandle);
PlotShapes(IIf(Buy,shapeUpArrow,0),5,0,C,-3);
PlotShapes(IIf(Sell,shapeDownArrow,0),4,0,C,-3);
PlotShapes(IIf(Cover,shapeHollowUpArrow,0),5,0,C,-3);
PlotShapes(IIf(Short,shapeHollowDownArrow,0),4,0,C,-3);
|
При лучшем раскладе получается только одна сделка (((
Убрал условия AND q < Opt3; и AND q > Opt4;
Сделок стало много....
И даже прибыль дает. Только мало.  |
_________________
ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
| Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
|
|
|
Следующая тема
Предыдущая тема
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах
Вы не можете вкладывать файлы
Вы не можете скачивать файлы
|
|
