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


Зарегистрирован: 08.04.2008
Сообщения: 643
Откуда: от "Верблюда"

СообщениеДобавлено: Пн Апр 21, 2008 7:45 am Ответить с цитатой Вернуться к началу

Описание тут http://traderu.blogspot.com/2008/03/blog-post_7826.html, я какбы реализовал, все отрисовалось, а сейчас выдает ошибку, причину понять не могу, да кому хочется C11 = ParamColor( "DEMA Color", colorCycle ); строку сами переделайте ля каждой средней, у каждой будет свой цвет:

SetBarsRequired(100000, 100000);

Per1=Optimize("Per1", 18, 144, 4);
Per2=Optimize("Per2", 18, 62, 2);
Per3=Optimize("Per3", 9, 36, 1);
PerH=Optimize("PerH", 10, 18, 2);
PerL=Optimize("PerL", 8, 18, 2);

Cond1=MA(C,Per1)>MA(C,Per2)>MA(C,Per3);
Cond2=MA(C,Per1)<MA(C,Per2)<MA(C,Per3);
Cond3=EMA(H,PerH)<C;
Cond4=EMA(L,PerH)<C;

Buy = Ref(Cond2 AND Cond3,-1);
Short = Ref(Cond1 AND Cond4,-1);

Sell = Ref(Cond4,-1);
Cover = Ref(Cond3,-1);



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


Plot(C,"Price",colorBlack,styleCandle);
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);

BuyPrice = SellPrice = ShortPrice = CoverPrice = O;

C11 = ParamColor( "DEMA Color", colorCycle );

Plot( MA(C,Per1), "MA1", C11, ParamStyle("Style" ) );
Plot( MA(C,Per2), "MA2", C11, ParamStyle("Style" ) );
Plot( MA(C,Per3), "MA3", C11, ParamStyle("Style" ) );
Plot( EMA(H,PerH), "MAH", C11, ParamStyle("Style" ) );
Plot( EMA(L,PerH), "MAL", C11, ParamStyle("Style" ) );

_________________
Юра
Посмотреть профиль Отправить личное сообщение Отправить e-mail
000
Site Admin


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

СообщениеДобавлено: Пн Апр 21, 2008 7:57 am Ответить с цитатой Вернуться к началу

В Optimize() должно быть 4 цифры (по умолчанию, начало, конец, шаг)

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


Зарегистрирован: 08.04.2008
Сообщения: 643
Откуда: от "Верблюда"

СообщениеДобавлено: Пн Апр 21, 2008 8:24 am Ответить с цитатой Вернуться к началу

000 писал(а):
В Optimize() должно быть 4 цифры (по умолчанию, начало, конец, шаг)


блин это у меня иногда почемуто включается автозамена, не заметил.

Per1=Optimize("Per1", 18, 12,144,4);
Per2=Optimize("Per2", 9, 6,62,2);
Per3=Optimize("Per3", 4, 3,36, 1);
PerH=Optimize("PerH", 4, 3,18, 2);
PerL=Optimize("PerL", 4, 3,18, 2);

_________________
Юра
Посмотреть профиль Отправить личное сообщение Отправить e-mail
000
Site Admin


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

СообщениеДобавлено: Пн Апр 21, 2008 8:32 am Ответить с цитатой Вернуться к началу

Теперь работает?

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


Зарегистрирован: 08.04.2008
Сообщения: 643
Откуда: от "Верблюда"

СообщениеДобавлено: Пн Апр 21, 2008 8:34 am Ответить с цитатой Вернуться к началу

000 писал(а):
Теперь работает?


Per3=Optimize("Per3", 4, 3, 36, 1);
Per1=4*Per3;
Per2=2*Per3;
PerH=Optimize("PerH", 4, 3,18, 2);
PerL=Optimize("PerL", 4, 3,18, 2);

Код да, а вот система ..но. Smile Малость подправил, оптимизацию, чтоб за ее время не постареть.

_________________
Юра
Посмотреть профиль Отправить личное сообщение Отправить e-mail
000
Site Admin


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

СообщениеДобавлено: Пн Апр 21, 2008 8:50 am Ответить с цитатой Вернуться к началу

Цитата:
а вот система ..но

Кто бы сомневался Smile

_________________
ceterum censeo carthaginem esse delendam
Удачи. Олег.
Посмотреть профиль Отправить личное сообщение Посетить сайт автора
Показать сообщения:      
Начать новую тему  Ответить на тему


 Перейти:   



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


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

File Attachment © by Meik Sievertsen