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



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

СообщениеДобавлено: Пн Май 14, 2012 6:04 pm Ответить с цитатой Вернуться к началу

Здравствуйте! Нашел тут в метастоке интересный кодSadэто Buy)

LE:=Cross(H,Ref(HHV(H,20),-1));
LX:=Cross(Ref(LLV(L,10),-1),L);
trade:=if(prev<=0,
if(LE, Ref(HHV(H,20),-1)-atr(20),0),
if(l<=prev, -1, if(LX, -2, prev)));
cross(trade>0,0.5)

Хочу написать подобный код в ами и сравнить результаты рассчетов. Подскажите пожалуйста аналог prev в ами. Буду очень признателен если кто нибудь накидает черновик этого куска кода))
Посмотреть профиль Отправить личное сообщение
000
Site Admin


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

СообщениеДобавлено: Ср Май 16, 2012 12:45 am Ответить с цитатой Вернуться к началу

Slava8519 писал(а):
Здравствуйте! Нашел тут в метастоке интересный кодSadэто Buy)

LE:=Cross(H,Ref(HHV(H,20),-1));
LX:=Cross(Ref(LLV(L,10),-1),L);
trade:=if(prev<=0,
if(LE, Ref(HHV(H,20),-1)-atr(20),0),
if(l<=prev, -1, if(LX, -2, prev)));
cross(trade>0,0.5)

Хочу написать подобный код в ами и сравнить результаты рассчетов. Подскажите пожалуйста аналог prev в ами. Буду очень признателен если кто нибудь накидает черновик этого куска кода))

Ами функции prev нет.
Томаш её принципиально не делал объясняя, что подобная функция жутко тормозит код.
Можно реализовать функцию prev при помощи цикла.
Я тут поморочился...
Данный код совершенно бессмысленный.

Код:

LE = Cross(H, Ref(HHV(H,20), -1));
LX = Cross(Ref(LLV(L,10),-1),L);

HHV20 = Ref(HHV(H, 20), -1);
ATR20 = ATR(20);

Trade = 0;

for( i = 1; i < BarCount; i++ )
{
   if(trade[i-1] <= 0)
   {
      if(LE[i] == 1)
         trade[i] = HHV20[i] - ATR20[i];
      else
         trade[i] = 0;
   }
   else
   {
      if(L[i] < trade[i-1])
         trade[i] = -1;
      else
      {
         if(LX[i] == 1)
            trade[i] = -2;
         else
            trade[i] = trade[i-1];
      }
   }   
}



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

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


 Перейти:   



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


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

File Attachment © by Meik Sievertsen