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



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

СообщениеДобавлено: Вс Янв 28, 2024 3:15 pm Ответить с цитатой Вернуться к началу

_SECTION_BEGIN("MAYMACD");
per1 = 12; // Период
p = (Per1+1)/2;

for( i = 1; i < BarCount; i++ )
{
if(i == 1)
EMA1[i] = C[i];
else
{
EMA1[i] = EMA1[i-1]*(1 - 1/p) + C[i]*(1/p);
}
}

//Plot(MA1, "MA1", colorRed);

per2 = 26; // Период
p = (Per2+1)/2;

for( i = 1; i < BarCount; i++ )
{
if(i == 1)
EMA2[i] = C[i];
else
{
EMA2[i] = EMA2[i-1]*(1 - 1/p) + C[i]*(1/p);
}
}

A= (EMA1-EMA2)/(EMA2)*100;
B= EMA(A,9);
L1 = -0.10;
L2 = 0.10;
Plot(A,"",colorBlue,1,styleOwnScale);
Plot(B,"",colorRed,1,styleOwnScale);
_SECTION_END();
Посмотреть профиль Отправить личное сообщение
Aleksandr



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

СообщениеДобавлено: Вс Янв 28, 2024 3:16 pm Ответить с цитатой Вернуться к началу

Aleksandr писал(а):
_SECTION_BEGIN("MAYMACD");
per1 = 12; // Период
p = (Per1+1)/2;

for( i = 1; i < BarCount; i++ )
{
if(i == 1)
EMA1[i] = C[i];
else
{
EMA1[i] = EMA1[i-1]*(1 - 1/p) + C[i]*(1/p);
}
}

//Plot(MA1, "MA1", colorRed);

per2 = 26; // Период
p = (Per2+1)/2;

for( i = 1; i < BarCount; i++ )
{
if(i == 1)
EMA2[i] = C[i];
else
{
EMA2[i] = EMA2[i-1]*(1 - 1/p) + C[i]*(1/p);
}
}

A= (EMA1-EMA2)/(EMA2)*100;
B= EMA(A,9);
L1 = -0.10;
L2 = 0.10;
Plot(A,"",colorBlue,1,styleOwnScale);
Plot(B,"",colorRed,1,styleOwnScale);
_SECTION_END();
Посмотреть профиль Отправить личное сообщение
Aleksandr



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

СообщениеДобавлено: Вс Янв 28, 2024 3:53 pm Ответить с цитатой Вернуться к началу

Aleksandr писал(а):
Aleksandr писал(а):
_SECTION_BEGIN("MAYMACD");
per1 = 12; // Период
p = (Per1+1)/2;

for( i = 1; i < BarCount; i++ )
{
if(i == 1)
EMA1[i] = C[i];
else
{
EMA1[i] = EMA1[i-1]*(1 - 1/p) + C[i]*(1/p);
}
}

//Plot(MA1, "MA1", colorRed);

per2 = 26; // Период
p = (Per2+1)/2;

for( i = 1; i < BarCount; i++ )
{
if(i == 1)
EMA2[i] = C[i];
else
{
EMA2[i] = EMA2[i-1]*(1 - 1/p) + C[i]*(1/p);
}
}

A= (EMA1-EMA2)/(EMA2)*100;
B= EMA(A,9);
L1 = -0.10;
L2 = 0.10;
Plot(A,"",colorBlue,1,styleOwnScale);
Plot(B,"",colorRed,1,styleOwnScale);
_SECTION_END();
Посмотреть профиль Отправить личное сообщение
Aleksandr



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

СообщениеДобавлено: Вс Янв 28, 2024 4:00 pm Ответить с цитатой Вернуться к началу

[quote="Aleksandr"]_SECTION_BEGIN("MAYMACD");
per1 = 12; // Период
p = (Per1+1)/2;

for( i = 1; i < BarCount; i++ )
{
if(i == 1)
EMA1[i] = C[i];
else
{
EMA1[i] = EMA1[i-1]*(1 - 1/p) + C[i]*(1/p);
}
}

//Plot(MA1, "MA1", colorRed);

per2 = 26; // Период
p = (Per2+1)/2;

for( i = 1; i < BarCount; i++ )
{
if(i == 1)
EMA2[i] = C[i];
else
{
EMA2[i] = EMA2[i-1]*(1 - 1/p) + C[i]*(1/p);
}
}

A= (EMA1-EMA2)/(EMA2)*100;
B= EMA(A,9);
L1 = -0.10;
L2 = 0.10;
Plot(A,"",colorBlue,1,styleOwnScale);
Plot(B,"",colorRed,1,styleOwnScale);
_SECTION_END();
это MACDи
Посмотреть профиль Отправить личное сообщение
Aleksandr



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

СообщениеДобавлено: Пн Янв 29, 2024 9:34 am Ответить с цитатой Вернуться к началу

Здравствуйте ! вот код , соединяет Открытие вчерашнего и Сегодняшнего дней
Код:
bi = BarIndex();
NewDay = TimeNum() == 130000; //Day() != Ref(Day(), -1);
firstBi = LastValue(ValueWhen(NewDay, bi, 2));
lastBi = LastValue(ValueWhen(NewDay, bi, 1));
x0 = firstBi; // номер бара откуда начинаем рисовать линию
y0 = Open[firstBi]; // цена откуда начинаем рисовать линию
x1 = lastBi; // Номер бара где заканчивается линия
y1 = Open[lastBi]; // цена на которой заканчивается линия
qq=LineArray( x0, y0, x1, y1, 1);

а это код Macdи
Код:
per1 = 12; // Период
p = (Per1+1)/2;

for( i = 1; i < BarCount; i++ )
{
  if(i == 1)
    EMA1[i] = C[i];
  else
  {
    EMA1[i] = EMA1[i-1]*(1 - 1/p) + C[i]*(1/p);
  }
}

//Plot(MA1, "MA1", colorRed);

per2 = 26; // Период
p = (Per2+1)/2;

for( i = 1; i < BarCount; i++ )
{
  if(i == 1)
    EMA2[i] = C[i];
  else
  {
    EMA2[i] = EMA2[i-1]*(1 - 1/p) + C[i]*(1/p);
  }
}

A= (EMA1-EMA2)/(EMA2)*100;
B= EMA(A,9);

Вопрос вот в чём , каким кодом отобразить зту же линию , но на графике
Macdи ?
Посмотреть профиль Отправить личное сообщение
000
Site Admin


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

СообщениеДобавлено: Ср Янв 31, 2024 11:13 am Ответить с цитатой Вернуться к началу

Встречный вопрос. А зачем такой сложный код Macdи ?

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



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

СообщениеДобавлено: Ср Янв 31, 2024 3:47 pm Ответить с цитатой Вернуться к началу

000 писал(а):
Встречный вопрос. А зачем такой сложный код Macdи ?

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


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

СообщениеДобавлено: Чт Фев 01, 2024 10:00 am Ответить с цитатой Вернуться к началу

Ок. Тебе линию надо соединить точки на МАКДИ? Или на графике МАКДИ нарисовать линии соединяющие цену?

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



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

СообщениеДобавлено: Чт Фев 01, 2024 12:08 pm Ответить с цитатой Вернуться к началу

000 писал(а):
Ок. Тебе линию надо соединить точки на МАКДИ? Или на графике МАКДИ нарисовать линии соединяющие цену?

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


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

СообщениеДобавлено: Пт Фев 02, 2024 4:51 pm Ответить с цитатой Вернуться к началу

После кода МАКДи вставь код рисующий линии и в нем в эти строки
Код:
y0 = Open[firstBi]; // цена откуда начинаем рисовать линию..
.....
y1 = Open[lastBi]; // цена на которой заканчивается линия

замени на
Код:
y0 = A[firstBi]; // цена откуда начинаем рисовать линию..
.....
y1 = A[lastBi]; // цена на которой заканчивается линия

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



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

СообщениеДобавлено: Сб Фев 03, 2024 2:44 pm Ответить с цитатой Вернуться к началу

[quote="Aleksandr"][quote="000"]
После кода МАКДи вставь код рисующий линии и в нем в эти строки
Код:
y0 = Open[firstBi]; // цена откуда начинаем рисовать линию..
.....
y1 = Open[lastBi]; // цена на которой заканчивается линия

замени на
Код:
y0 = A[firstBi]; // цена откуда начинаем рисовать линию..
.....
y1 = A[lastBi]; // цена на которой заканчивается линия

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


 Перейти:   



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


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

File Attachment © by Meik Sievertsen