Автор |
Сообщение |
Convergence
Зарегистрирован: 15.02.2017
Сообщения: 31
|
Сообщение удалено. |
Последний раз редактировалось: Convergence (Ср Авг 29, 2018 4:08 pm), всего редактировалось 1 раз |
|
Посмотреть профиль Отправить личное сообщение |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
Ну вопрос же аналогичен предыдущему. И решение соответственно тоже.
Код: |
periods_60m = Param( "Periods 60", 10, 1, 200, 1 );
Ksmooth_60m = Param( "%K avg", 3, 1, 200, 1 );
Dsmooth_60m = Param( "%D avg", 4, 1, 200, 1 );
periods_15m = Param( "Periods 15", 15, 1, 200, 1 );
Ksmooth_15m = Param( "%K avg", 5, 1, 200, 1 );
Dsmooth_15m = Param( "%D avg", 9, 1, 200, 1 );
periods_5m = Param( "Periods 5", 20, 1, 200, 1 );
Ksmooth_5m = Param( "%K avg", 3, 1, 200, 1 );
Dsmooth_5m = Param( "%D avg", 8, 1, 200, 1 );
if(Interval(0) == 3600)
St = StochD( periods_60m , Ksmooth_60m, DSmooth_60m ); //Hourly
else if(Interval(0) == 900)
St = StochD( periods_15m , Ksmooth_15m, DSmooth_15m ); //15 minute
else
St = StochD( periods_5m , Ksmooth_5m, DSmooth_5m ); //5 minute
Plot( St, _DEFAULT_NAME(), Stoch60m, ParamColor( "Color", colorRed ), ParamStyle("Style")); |
|
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Convergence
Зарегистрирован: 15.02.2017
Сообщения: 31
|
Сообщение удалено. |
Последний раз редактировалось: Convergence (Ср Авг 29, 2018 4:08 pm), всего редактировалось 1 раз |
|
Посмотреть профиль Отправить личное сообщение |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
Код: |
periods_60m = Param( "Periods 60", 10, 1, 200, 1 );
Ksmooth_60m = Param( "%K avg", 3, 1, 200, 1 );
Dsmooth_60m = Param( "%D avg", 4, 1, 200, 1 );
periods_15m = Param( "Periods 15", 15, 1, 200, 1 );
Ksmooth_15m = Param( "%K avg", 5, 1, 200, 1 );
Dsmooth_15m = Param( "%D avg", 9, 1, 200, 1 );
periods_5m = Param( "Periods 5", 20, 1, 200, 1 );
Ksmooth_5m = Param( "%K avg", 3, 1, 200, 1 );
Dsmooth_5m = Param( "%D avg", 8, 1, 200, 1 );
if(Interval(0) == 3600)
{
St = StochD( periods_60m , Ksmooth_60m, DSmooth_60m ); //Hourly
color = ColorRed;
и т.д.
}
else if(Interval(0) == 900)
{
St = StochD( periods_15m , Ksmooth_15m, DSmooth_15m ); //15 minute
color = ColorGreen;
и т.д.
}
else
{
St = StochD( periods_5m , Ksmooth_5m, DSmooth_5m ); //5 minute
color = ColorBlue;
и т.д.
}
Plot( St, _DEFAULT_NAME(), Stoch60m, color, ParamStyle("Style"));
|
|
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Convergence
Зарегистрирован: 15.02.2017
Сообщения: 31
|
Сообщение удалено. |
Последний раз редактировалось: Convergence (Ср Авг 29, 2018 4:09 pm), всего редактировалось 1 раз |
|
Посмотреть профиль Отправить личное сообщение |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
Покажи весь свой код. |
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Convergence
Зарегистрирован: 15.02.2017
Сообщения: 31
|
Сообщение удалено. |
Последний раз редактировалось: Convergence (Ср Авг 29, 2018 4:09 pm), всего редактировалось 1 раз |
|
Посмотреть профиль Отправить личное сообщение |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
Код: |
_SECTION_BEGIN("Background_Setting");
SetChartBkGradientFill( ParamColor("BgTop", colorBlack),
ParamColor("BgBottom", colorBlack),ParamColor("titleblock",colorBlack ));
_SECTION_END();
_SECTION_BEGIN("Stochastic %D");
periods = Param( "Periods", 15, 1, 200, 1 );
Ksmooth = Param( "%K avg", 3, 1, 200, 1 );
Dsmooth = Param( "%D avg", 3, 1, 200, 1 );
_SECTION_END();
////////////////////////////////////////////////////////
_SECTION_BEGIN("Stochastic %D 5 minute");
DSP_5m = Param("DSP", -2, -50, 50 );
periods_5m = Param( "Periods", 21, 1, 200, 1 );
Ksmooth_5m = Param( "%K avg", 3, 1, 200, 1 );
Dsmooth_5m = Param( "%D avg", 2, 1, 200, 1 );
_SECTION_END();
_SECTION_BEGIN("Stochastic %D 5 minute A");
DSP_5m_a = Param("DSP", -3, -50, 50 );
periods_5m_a = Param( "Periods", 21, 1, 200, 1 );
Ksmooth_5m_a = Param( "%K avg", 3, 1, 200, 1 );
Dsmooth_5m_a = Param( "%D avg", 2, 1, 200, 1 );
_SECTION_END();
////////////////////////////////////////////////////////
_SECTION_BEGIN("Stochastic %D 15 minute");
DSP_15m = Param("DSP", -1, -50, 50 );
periods_15m = Param( "Periods", 23, 1, 200, 1 );
Ksmooth_15m = Param( "%K avg", 3, 1, 200, 1 );
Dsmooth_15m = Param( "%D avg", 2, 1, 200, 1 );
_SECTION_END();
_SECTION_BEGIN("Stochastic %D 15 minute A");
DSP_15m_a = Param("DSP", -2, -50, 50 );
periods_15m_a = Param( "Periods", 23, 1, 200, 1 );
Ksmooth_15m_a = Param( "%K avg", 3, 1, 200, 1 );
Dsmooth_15m_a = Param( "%D avg", 2, 1, 200, 1 );
_SECTION_END();
////////////////////////////////////////////////////////
_SECTION_BEGIN("Stochastic %D 60 minute");
DSP_60m = Param("DSP", -1, -50, 50 );
periods_60m = Param( "Periods", 12, 1, 200, 1 );
Ksmooth_60m = Param( "%K avg", 3, 1, 200, 1 );
Dsmooth_60m = Param( "%D avg", 4, 1, 200, 1 );
_SECTION_END();
_SECTION_BEGIN("Stochastic %D 60 minute A");
DSP_60m_a = Param("DSP", -2, -50, 50 );
periods_60m_a = Param( "Periods", 10, 1, 200, 1 );
Ksmooth_60m_a = Param( "%K avg", 3, 1, 200, 1 );
Dsmooth_60m_a = Param( "%D avg", 4, 1, 200, 1 );
_SECTION_END();
////////////////////////////////////////////////////////
_SECTION_BEGIN("Stochastic %D 12 hours");
DSP_12h = Param("DSP", -2, -50, 50 );
periods_12h = Param( "Periods", 16, 1, 200, 1 );
Ksmooth_12h = Param( "%K avg", 3, 1, 200, 1 );
Dsmooth_12h = Param( "%D avg", 4, 1, 200, 1 );
_SECTION_END();
_SECTION_BEGIN("Stochastic %D 12 hours A");
DSP_12h_a = Param("DSP", -1, -50, 50 );
periods_12h_a = Param( "Periods", 18, 1, 200, 1 );
Ksmooth_12h_a = Param( "%K avg", 3, 1, 200, 1 );
Dsmooth_12h_a = Param( "%D avg", 4, 1, 200, 1 );
_SECTION_END();
////////////////////////////////////////////////////////
if(Interval(0) == 43200)
{
St = StochD( periods_12h , Ksmooth_12h, DSmooth_12h );
St_a = StochD( periods_12h_a , Ksmooth_12h_a, DSmooth_12h_a );
DSP = DSP_12h;
DSP_a = DSP_12h_a;
}
else if(Interval(0) == 3600)
{
St = StochD( periods_60m , Ksmooth_60m, DSmooth_60m );
St_a = StochD( periods_60m_a , Ksmooth_60m_a, DSmooth_60m_a );
DSP = DSP_60m;
DSP_a = DSP_60m_a;
}
else if(Interval(0) == 900)
{
St = StochD( periods_15m , Ksmooth_15m, DSmooth_15m );
St_a = StochD( periods_15m_a , Ksmooth_15m_a, DSmooth_15m_a );
DSP = DSP_15m;
DSP_a = DSP_15m_a;
}
else if(Interval(0) == 300)
{
St = StochD( periods_5m , Ksmooth_5m, DSmooth_5m );
St_a = StochD( periods_5m_a , Ksmooth_5m_a, DSmooth_5m_a );
DSP = DSP_5m;
DSP_a = DSP_5m_a;
}
else
{
St = StochD( periods , Ksmooth, DSmooth );
St_a = StochD( periods , Ksmooth, DSmooth );
DSP = 0;
DSP_a = 0;
}
Plot( St, _DEFAULT_NAME(), ParamColor( "Color", colorGrey50 ), ParamStyle("Style"), 0, 0, DSP);
Plot( St_a, _DEFAULT_NAME(), ParamColor( "Color A", colorCycle ), ParamStyle("Style"), 0, 0, DSP_a);
_SECTION_BEGIN("Border");
UPline = Param("Upper Limit",90,50,100,1);
DNline = Param("Down Limit",10,0,50,1);
Plot(UPline,"",ParamColor("Upper Limit Color",colorDarkRed),ParamStyle("Upper Limit Style",styleNoLabel|styleDashed ));
Plot(DNline,"",ParamColor("Down Limit Color",colorDarkRed),ParamStyle("Down Limit Style",styleNoLabel|styleDashed ));
Plot(50,"",colorGrey40, styleLine|styleDashed|styleNoLabel);
_SECTION_END();
|
|
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
|
|
Следующая тема
Предыдущая тема
Вы не можете начинать темы Вы не можете отвечать на сообщения Вы не можете редактировать свои сообщения Вы не можете удалять свои сообщения Вы не можете голосовать в опросах Вы не можете вкладывать файлы Вы не можете скачивать файлы
|
|