Написание экспертов и индикаторов - бесплатно! - Страница 533 - Всё для MetaTrader 4

#7981 xMIHAx

Стреляет без предупреждения

Свой человек
259 сообщений

Отправлено 31 March 2012 - 11:30

шяс сделаю
потомучто тот скрипт который вы выложили возвращает время последнего ордера

Наверх

#7982 hills

Не сидит в окопе

Пользователи
99 сообщений

Отправлено 31 March 2012 - 11:31

шяс сделаю
потомучто тот скрипт который вы выложили возвращает время последнего ордера

ясно

Наверх

#7983 xMIHAx

Стреляет без предупреждения

Свой человек
259 сообщений

Отправлено 31 March 2012 - 11:56

ясно

пробуйте
проверка например
if(GetLastOrderOpen()==1) ---- значит бай
if(GetLastOrderOpen()==2) ---- значит сел
if(GetLastOrderOpen()==0) ---- нет закрытых

int GetLastOrderOpen()
   {
   int tip=0;
  	if(OrdersHistoryTotal()!=0)
 		{
        	if(OrderSelect(OrdersHistoryTotal()-1, SELECT_BY_POS, MODE_HISTORY))
       		{
              	if(OrderSymbol()=="OP_BUY")
             		{
                      	tip=1;
             		}
              	if(OrderSymbol()=="OP_SELL")
             		{
                      	tip=2;
             		}
       		}
//также можно добавить проверку на закрытие отложеных
 		}
 		return(tip);
   }

hills, Ira и dre_prayinforyou это нравится

Наверх

#7984 hills

Не сидит в окопе

Пользователи
99 сообщений

Отправлено 31 March 2012 - 11:58

int GetLastOrderOpen()
   {
   int tip=0;
  	if(OrdersHistoryTotal()!=0)
 		{
        	if(OrderSelect(OrdersHistoryTotal()-1, SELECT_BY_POS, MODE_HISTORY))
   			{
              	if(OrderSymbol()=="OP_BUY")
         			{
                      	tip=1;
         			}
              	if(OrderSymbol()=="OP_SELL")
         			{
                      	tip=2;
         			}
   			}
//также можно добавить проверку на закрытие отложеных
 		}
 		return(tip);
   }

Спасибо милчеловек :bow:

буду разбираться и пробовать

Наверх

#7985 xMIHAx

Стреляет без предупреждения

Свой человек
259 сообщений

Отправлено 31 March 2012 - 13:22

Помогите пожалуйста! Необходимо прикрутить Alert к этому "индюку".Звук при пересечении линий 0.81 и -0.81.

пробуйте

Прикрепленные файлы

CandleAverage_v3.mq4 2.94К 38 скачиваний

Ira и dre_prayinforyou это нравится

Наверх

#7986 ale9551

Рвется в бой

Свой человек
149 сообщений

Отправлено 31 March 2012 - 14:13

Огромное Вам спасибо Уважаемый xMIHAx! Всё работает!!!

Наверх

#7987 ale9551

Рвется в бой

Свой человек
149 сообщений

Отправлено 31 March 2012 - 14:16

Уважаемый xMINAx! А не могли бы Вы в качестве дополнения прикрутить Alert вот к этому индюку.Alert(news.wav) на пересечении(касании) голубой пунктирной линии.

Наверх

#7988 ale9551

Рвется в бой

Свой человек
149 сообщений

Отправлено 31 March 2012 - 14:17

Вот индюк

Наверх

#7989 xMIHAx

Стреляет без предупреждения

Свой человек
259 сообщений

Отправлено 31 March 2012 - 14:24

Вот индюк

где индюк то?

Наверх

#7990 ale9551

Рвется в бой

Свой человек
149 сообщений

Отправлено 31 March 2012 - 14:26

Чего-то не получается загрузить индюк Center of Gravity(((

Наверх

#7991 ale9551

Рвется в бой

Свой человек
149 сообщений

Отправлено 31 March 2012 - 14:40

Center of Gravity mq4

Наверх

#7992 ale9551

Рвется в бой

Свой человек
149 сообщений

Отправлено 31 March 2012 - 14:51

Файлы не прикрепляются почему-то(((( Вот код индикатора:

//+------------------------------------------------------------------+
//| Center of Gravity.mq4 |
//| Original Code from NG3110@latchess.com |
//| Linuxser 2007 for TSD http://www.forex-tsd.com/ |
//+------------------------------------------------------------------+
#property copyright "ANG3110@latchess.com"
//---------ang_PR (Din)--------------------
#property indicator_chart_window
#property indicator_buffers 5
#property indicator_color1 RoyalBlue
#property indicator_color2 LimeGreen
#property indicator_color3 LimeGreen
#property indicator_color4 Goldenrod
#property indicator_color5 Goldenrod
//-----------------------------------
extern int bars_back = 125;
extern int m = 2;
extern int i = 0;
extern double kstd = 2.0;
extern int sName = 1102;
//-----------------------
double fx[], sqh[], sql[], stdh[], stdl[];
double ai[10,10], b[10], x[10], sx[20];
double sum;
int ip, p, n, f;
double qq, mm, tt;
int ii, jj, kk, ll, nn;
double sq, std;
//*******************************************
int init()
{
IndicatorShortName("Center of Gravity");
SetIndexStyle(0, DRAW_LINE);
SetIndexBuffer(0, fx);
SetIndexBuffer(1, sqh);
SetIndexBuffer(2, sql);
SetIndexBuffer(3, stdh);
SetIndexBuffer(4, stdl);
p = MathRound(bars_back);
nn = m + 1;
ObjectCreate("pr" + sName, 22, 0, Time[p], fx[p]);
ObjectSet("pr" + sName, 14, 159);
return(0);
}
//----------------------------------------------------------
int deinit()
{
ObjectDelete("pr" + sName);
}
//**********************************************************************************************
int start()
{
int mi;
//-------------------------------------------------------------------------------------------
ip = iBarShift(Symbol(), Period(), ObjectGet("pr" + sName, OBJPROP_TIME1));
p = bars_back;
sx[1] = p + 1;
SetIndexDrawBegin(0, Bars - p - 1);
SetIndexDrawBegin(1, Bars - p - 1);
SetIndexDrawBegin(2, Bars - p - 1);
SetIndexDrawBegin(3, Bars - p - 1);
SetIndexDrawBegin(4, Bars - p - 1);
//----------------------sx-------------------------------------------------------------------
for(mi = 1; mi <= nn * 2 - 2; mi++)
{
sum = 0;
for(n = i; n <= i + p; n++)
{
sum += MathPow(n, mi);
}
sx[mi + 1] = sum;
}
//----------------------syx-----------
for(mi = 1; mi <= nn; mi++)
{
sum = 0.00000;
for(n = i; n <= i + p; n++)
{
if(mi == 1)
sum += Close[n];
else
sum += Close[n] * MathPow(n, mi - 1);
}
b[mi] = sum;
}
//===============Matrix=======================================================================================================
for(jj = 1; jj <= nn; jj++)
{
for(ii = 1; ii <= nn; ii++)
{
kk = ii + jj - 1;
ai[ii, jj] = sx[kk];
}
}
//===============Gauss========================================================================================================
for(kk = 1; kk <= nn - 1; kk++)
{
ll = 0; mm = 0;
for(ii = kk; ii <= nn; ii++)
{
if(MathAbs(ai[ii, kk]) > mm)
{
mm = MathAbs(ai[ii, kk]);
ll = ii;
}
}
if(ll == 0)
return(0);

if(ll != kk)
{
for(jj = 1; jj <= nn; jj++)
{
tt = ai[kk, jj];
ai[kk, jj] = ai[ll, jj];
ai[ll, jj] = tt;
}
tt = b[kk]; b[kk] = b[ll]; b[ll] = tt;
}
for(ii = kk + 1; ii <= nn; ii++)
{
qq = ai[ii, kk] / ai[kk, kk];
for(jj = 1; jj <= nn; jj++)
{
if(jj == kk)
ai[ii, jj] = 0;
else
ai[ii, jj] = ai[ii, jj] - qq * ai[kk, jj];
}
b[ii] = b[ii] - qq * b[kk];
}
}
x[nn] = b[nn] / ai[nn, nn];
for(ii = nn - 1; ii >= 1; ii--)
{
tt = 0;
for(jj = 1; jj <= nn - ii; jj++)
{
tt = tt + ai[ii, ii + jj] * x[ii + jj];
x[ii] = (1 / ai[ii, ii]) * (b[ii] - tt);
}
}
//===========================================================================================================================
for(n = i; n <= i + p; n++)
{
sum = 0;
for(kk = 1; kk <= m; kk++)
{
sum += x[kk + 1] * MathPow(n, kk);
}
fx[n] = x[1] + sum;
}
//-----------------------------------Std-----------------------------------------------------------------------------------
sq = 0.0;
for(n = i; n <= i + p; n++)
{
sq += MathPow(Close[n] - fx[n], 2);
}
sq = MathSqrt(sq / (p + 1)) * kstd;
std = iStdDev(NULL, 0, p, MODE_SMA, 0, PRICE_CLOSE, i) * kstd;
for(n = i; n <= i + p; n++)
{
sqh[n] = fx[n] + sq;
sql[n] = fx[n] - sq;
stdh[n] = fx[n] + std;
stdl[n] = fx[n] - std;
}
//-------------------------------------------------------------------------------
ObjectMove("pr" + sName, 0, Time[p], fx[p]);
//----------------------------------------------------------------------------------------------------------------------------
return(0);
}
//==========================================================================================================================