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



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

СообщениеДобавлено: Пн Авг 16, 2010 10:40 pm Ответить с цитатой Вернуться к началу

Никак не могу добиться чтобы срабатывал вывод текста при смене условия, помогите пож.

Код:

EndDay = Day() != Ref(Day(),1);
ODS = TimeFrameGetPrice( "O", inDaily, 0 );
OD = TimeFrameGetPrice( "O", inDaily, -1 );
CD = TimeFrameGetPrice( "C", inDaily, -1 );
HD = TimeFrameGetPrice( "H", inDaily, -1 );
LD = TimeFrameGetPrice( "L", inDaily, -1 );


X=(OD>CD AND ODS < LD);
Y=(OD<CD AND ODS > HD);

if (X=1 OR Y=1)
FazaText = "---PAUSE !!!---";

else
{

FazaText = "---WARNING, ACTION!!!---";
}

Buy   =OD>CD AND  ODS < LD AND Ref(C,-1)> LD;
Sell  = Ref(L ,-1)> (HD+LD)/2 OR Ref(C,-1)<LLV(O,100);
Short = OD<CD AND ODS > HD AND Ref(C,-1) < HD;
Cover = Ref(H ,-1)< (HD+LD)/2 OR  Ref(C,-1)> HHV(O,100);


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

GfxTextOut( FazaText,10, Status("pxheight")/14 );
PlotShapes(IIf(Buy>0,shapeUpArrow,shapeNone),colorGreen);
PlotShapes(IIf(Sell>0,shapeDownArrow,shapeNone),colorRed);
PlotShapes(IIf(Short>0,shapeHollowDownArrow,shapeNone),colorRed);
PlotShapes(IIf(Cover>0,shapeHollowUpArrow,shapeNone),colorGreen);

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


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

СообщениеДобавлено: Вт Авг 17, 2010 12:33 am Ответить с цитатой Вернуться к началу

Код:

X = (OD > CD AND ODS < LD);
Y = (OD < CD AND ODS > HD);

if (LastValue(X) == 1 OR LastValue(Y) == 1)
  FazaText = "---PAUSE !!!---";
else
  FazaText = "---WARNING, ACTION!!!---";

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



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

СообщениеДобавлено: Вт Авг 17, 2010 7:25 am Ответить с цитатой Вернуться к началу

Большое спасибо, то что надо.

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


 Перейти:   



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


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

File Attachment © by Meik Sievertsen