Quaisquer perguntas de recém-chegados sobre MQL4 e MQL5, ajuda e discussão sobre algoritmos e códigos - página 12
Você está perdendo oportunidades de negociação:
- Aplicativos de negociação gratuitos
- 8 000+ sinais para cópia
- Notícias econômicas para análise dos mercados financeiros
Registro
Login
Você concorda com a política do site e com os termos de uso
Se você não tem uma conta, por favor registre-se
A lógica é esta:
Perdoe minha impertinência) Posso ver um exemplo deste código em algum lugar?
É simples.
//| Автор : Ким Игорь В. aka KimIV, http://www.kimiv.ru |
//+----------------------------------------------------------------------------+
//| Версия : 19.02.2008 |
//| Описание : Возвращает номер бара закрытия последней позиции или -1. |
//+----------------------------------------------------------------------------+
//| Параметры: |
//| sy - наименование инструмента ("" или NULL - текущий символ) |
//| tf - таймфрейм ( 0 - текущий таймфрейм) |
//| op - операция ( -1 - любая позиция) |
//| mn - MagicNumber ( -1 - любой магик) |
//+----------------------------------------------------------------------------+
int NumberOfBarCloseLastPos(string sy="0", int tf=0, int op=-1, int mn=-1) {
datetime t;
int i, k=OrdersHistoryTotal();
if (sy=="" || sy=="0") sy=Symbol();
for (i=0; i<k; i++) {
if (OrderSelect(i, SELECT_BY_POS, MODE_HISTORY)) {
if (OrderSymbol()==sy) {
if (OrderType()==OP_BUY || OrderType()==OP_SELL) {
if (op<0 || OrderType()==op) {
if (mn<0 || OrderMagicNumber()==mn) {
if (t<OrderCloseTime()) t=OrderCloseTime();
}
}
}
}
}
}
return(iBarShift(sy, tf, t, True));
}
Desculpe, talvez eu esteja falando sobre a coisa errada.
Medite sobre este indicador. Tem um monte de variáveis estáticas:
static int cDir=0;
static int pDir=0;
Eles são feitos em vez de amortecedores.
Quando IndicatorCounted()=0 LastTime deve ser zerado (os outros não são necessários, mas desejáveis).
Então, no início do laço, mova os valores:
{
LastTime=Time[i];
pDir=cDir;
}
else
{
cDir=pDir;
}
As variáveis que começam com "c" são o valor atual e com "p" o valor anterior.
Este link não se abrirá - erro 404.
Tentei experimentar com o tempo, mas não funcionou... Eu estava pensando na direção de "como parar os cálculos no último bar", acho que esse é o meu erro. Agora vou pensar em como não fazer uma mudança na última etapa do cálculo antes de mudar a barra atual.
É simples.
//| Автор : Ким Игорь В. aka KimIV, http://www.kimiv.ru |
//+----------------------------------------------------------------------------+
//| Версия : 19.02.2008 |
//| Описание : Возвращает номер бара закрытия последней позиции или -1. |
//+----------------------------------------------------------------------------+
//| Параметры: |
//| sy - наименование инструмента ("" или NULL - текущий символ) |
//| tf - таймфрейм ( 0 - текущий таймфрейм) |
//| op - операция ( -1 - любая позиция) |
//| mn - MagicNumber ( -1 - любой магик) |
//+----------------------------------------------------------------------------+
int NumberOfBarCloseLastPos(string sy="0", int tf=0, int op=-1, int mn=-1) {
datetime t;
int i, k=OrdersHistoryTotal();
if (sy=="" || sy=="0") sy=Symbol();
for (i=0; i<k; i++) {
if (OrderSelect(i, SELECT_BY_POS, MODE_HISTORY)) {
if (OrderSymbol()==sy) {
if (OrderType()==OP_BUY || OrderType()==OP_SELL) {
if (op<0 || OrderType()==op) {
if (mn<0 || OrderMagicNumber()==mn) {
if (t<OrderCloseTime()) t=OrderCloseTime();
}
}
}
}
}
}
return(iBarShift(sy, tf, t, True));
}
Desculpe, talvez eu esteja falando sobre a coisa errada.
Olá! Por favor, me ajude com o algoritmo!
Escrevi um roteiro simples, que calcula o coeficiente de correlação de Pearson. As matrizes são baseadas em preços de fechamento, a partir da primeira barra.
{
int n=25;
int w=18;
double sum_x=0; // Сумма цен закрытия для пары 1
double sum_y=0; // Сумма цен закрытия для пары 2
double Price_Close_x[]; // Массив Price_Close для пары 1
double Price_Close_y[]; // Массив Price_Close для пары 2
double dx[]; // Отклонение от среднего значения для пары 1 dx
double dy[]; // Отклонение от среднего значения для пары 2 dy
double dx2[]; // Квадрат отклонения ср.значения dx2
double dy2[]; // Квадрат отклонения ср.значения dy2
double dxdy[]; // Произведение dx и dy
ArrayResize(Price_Close_x, n);
ArrayResize(Price_Close_y, n);
ArrayResize(dx, n);
ArrayResize(dy, n);
ArrayResize(dx2, n);
ArrayResize(dy2, n);
ArrayResize(dxdy, n);
string sym_x="EURUSD";
string sym_y="GBPUSD";
for(int p=1; p<n; p++)
{
Price_Close_x[p]=iClose(sym_x, PERIOD_H1, p);
Price_Close_y[p]=iClose(sym_y, PERIOD_H1, p);
sum_x=sum_x+Price_Close_x[p];
sum_y=sum_y+Price_Close_y[p];
}
Alert("Sum_x равно ", sum_x);
Alert("Sum_y равно ", sum_y);
double Mx=sum_x/(n-1); // Среднее значение цен закрытия пары 1 Mx
double My=sum_y/(n-1); // Среднее значение цен закрытия пары 2 My
Alert("Mx равно ", Mx);
Alert("My равно ", My);
for(int i=1; i<n; i++)
{
dx[i]=Price_Close_x[i]-Mx;
dy[i]=Price_Close_y[i]-My;
dx2[i]=DoubleToString(dx[i]*dx[i], w);
dy2[i]=DoubleToString(dy[i]*dy[i], w);
dxdy[i]=DoubleToString(dx[i]*dy[i], w);
Alert("Отклонение dx на баре ", i, " равно ", DoubleToString(dx[i], w));
Alert("Отклонение dy на баре ", i, " равно ", DoubleToString(dy[i], w));
Alert("Квадрат dx на баре ", i, " равен ", DoubleToString(dx2[i], w));
Alert("Квадрат dy на баре ", i, " равен ", DoubleToString(dy2[i], w));
Alert("dxdy на баре ", i, " равен ", DoubleToString(dxdy[i], w));
}
double Edx2=0; // Сумма квадратов отклонений Edx2
double Edy2=0; // Сумма квадратов отклонений Edy2
double Edxdy=0; // Сумма произведений отклонений Edxdy
for(int q=0; q<n; q++)
{
Edx2=DoubleToString((Edx2+dx2[q]), w);
Edy2=DoubleToString((Edy2+dy2[q]), w);
Edxdy=DoubleToString((Edxdy+dxdy[q]), w);
}
Alert("Сумма Edx2 равна ", DoubleToString(Edx2, w));
Alert("Сумма Edy2 равна ", DoubleToString(Edy2, w));
Alert("Сумма Edxdy равна ", DoubleToString(Edxdy, w));
double Koef; // Коэффициент Пирсона
Koef=Edxdy/(sqrt(DoubleToString((Edx2*Edy2), w)));
Alert("Коэффициент корреляции Пирсона между ", sym_x, " и ", sym_y, " равен ", DoubleToString(Koef, w));
return;
}
A tabela de preços é levada da primeira barra até a 24ª barra.
Agora eu quero calcular a correlação para 24 barras também, mas pegue a matriz de preços da segunda barra(!).
Sem conhecer o algoritmo, entrei em cada tabela de preços manualmente:
{
Price_Close_x[p]=iClose(sym_x, PERIOD_H1, p);
Price_Close_y[p]=iClose(sym_y, PERIOD_H1, p);
sum_x=sum_x+Price_Close_x[p];
sum_y=sum_y+Price_Close_y[p];
Price_Close_x1[p]=iClose(sym_x, PERIOD_H1, p+1);
Price_Close_y1[p]=iClose(sym_y, PERIOD_H1, p+1);
Price_Close_x2[p]=iClose(sym_x, PERIOD_H1, p+2);
Price_Close_y2[p]=iClose(sym_y, PERIOD_H1, p+2);
Price_Close_x3[p]=iClose(sym_x, PERIOD_H1, p+3);
Price_Close_y3[p]=iClose(sym_y, PERIOD_H1, p+3);
...
...
Price_Close_x24[p]=iClose(sym_x, PERIOD_H1, p+24);
Price_Close_y24[p]=iClose(sym_y, PERIOD_H1, p+24);
}
24 barras é uma chatice, e se eu quiser saber a correlação para 100 barras, é uma chatice entrar em cada matriz.
O que fazer, pessoal?)
Olá! Por favor, você poderia me ajudar com o algoritmo!
for(int p=1; p<n; p+++)Escrevi um roteiro que calcula o coeficiente de correlação de Pearson. Tomei arrays por preços próximos, a partir do primeiro bar
for(int p=1; p<n; p+++)
{
Price_Close_x[p]=iClose(sym_x, PERÍODO_H1, p);
Price_Close_y[p]=iClose(sym_y, PERÍODO_H1, p);
sum_x=sum_x+Price_Close_x[p];
sum_y=sum_y+Price_Close_y[p];
Price_Close_x1[p]=iClose(sym_x, PERÍODO_H1, p+1);
Price_Close_y1[p]=iClose(sym_y, PERÍODO_H1, p+1);
Price_Close_x2[p]=iClose(sym_x, PERÍODO_H1, p+2);
Price_Close_y2[p]=iClose(sym_y, PERÍODO_H1, p+2);
Price_Close_x3[p]=iClose(sym_x, PERÍODO_H1, p+3);
Price_Close_y3[p]=iClose(sym_y, PERÍODO_H1, p+3);
...
Price_Close_x24[p]=iClose(sym_x, PERÍODO_H1, p+24);
Price_Close_y24[p]=iClose(sym_y, PERÍODO_H1, p+24);
}
____________________________________________________________________________
Matriz bidimensional
PriceClose[][2];
int n=24;
ArrayResize(PriceClose,n);
for(int p=0; p<n; p++) {
PriceClose[p][0]=iClose(sym_x, PERIOD_H1, p);
PriceClose[p][1]=iClose(sym_y, PERIOD_H1, p);
sum_x+=PriceClose[p][0];
sum_y+=PriceClose[p][1];
}
Eu não sei onde estou errado...
//| SVA_03.mq4 |
//| Copyright © 2006, MetaQuotes Software Corp. |
//| http://www.metaquotes.net |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2004, MetaQuotes Software Corp."
#property link "http://www.metaquotes.net/"
#property strict
#property indicator_chart_window
#property indicator_buffers 1
#property indicator_color1 Yellow
//---- input parameters
extern int RSIPeriod=14;
extern int Levl=50;
extern int TF=0;
//---- buffers
double MABuffer[];
static datetime TimeN=0;
static datetime TimeX=0;
int StopCalc=0;
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
string short_name;
IndicatorBuffers(1);
SetIndexBuffer(0,MABuffer);
//---- indicator line
SetIndexStyle(0,DRAW_LINE);
//----
//---- name for DataWindow and indicator subwindow label
// short_name="RSI("+IntegerToString(RSIPeriod)+")";
short_name="RSI("+RSIPeriod+")";
IndicatorShortName(short_name);
SetIndexLabel(0,short_name);
return(0);
}
//+------------------------------------------------------------------+
//| Relative Strength Index |
//+------------------------------------------------------------------+
int start()
{
int i,counted_bars=IndicatorCounted();
double rel,negative,positive,sma,x,y,Pos,Neg;
double sumn=0.0,sump=0.0;
//----
if(Bars<=RSIPeriod) return(0);
if(TF!=0)
{
string name=WindowExpertName();
for(i=0; i<Bars-counted_bars+1; i++)
{
int barIndex=iBarShift(NULL,TF,Time[i],false);
MABuffer[i]=iCustom(Symbol(),TF,name,RSIPeriod,Levl,0,0,barIndex);
}
return(0);
}
i=Bars-RSIPeriod-1;
if(counted_bars>=RSIPeriod) i=Bars-counted_bars-1;
datetime TimeC=iTime(NULL,TF,0);
while(i>=0)
{
if(i!=0 && StopCalc==0)
{
sumn=0.0;sump=0.0;
if(i==Bars-RSIPeriod-1)
{
int k=Bars-2;
//---- initial accumulation
while(k>=i)
{
rel=Close[k]-Close[k+1];
if(rel>0) sump+=rel;
else sumn-=rel;
k--;
}
positive=sump/RSIPeriod;
negative=sumn/RSIPeriod;
}
else
{
//---- smoothed moving average
rel=Close[i]-Close[i+1];
if(rel>0) sump=rel;
else sumn=-rel;
positive=(Pos*(RSIPeriod-1)+sump)/RSIPeriod;
negative=(Neg*(RSIPeriod-1)+sumn)/RSIPeriod;
}
x=Pos;
y=Neg;
Pos=positive;
Neg=negative;
if(x>0)sma=Close[i+1]+x;
else sma=Close[i+1]-y;
MABuffer[i]=sma;
Print("Этап 01 i=",i);
}
if(i==0)
{
if(TimeC!=TimeX)
{
rel=Close[i+1]-Close[i+2];
if(rel>0) sump=rel;
else sumn=-rel;
positive=(Pos*(RSIPeriod-1)+sump)/RSIPeriod;
negative=(Neg*(RSIPeriod-1)+sumn)/RSIPeriod;
x=Pos;
y=Neg;
Pos=positive;
Neg=negative;
Print("positive=",positive);
Print("negative=",negative);
if(x>0)sma=Close[i+1]+x;
else sma=Close[i+1]-y;
MABuffer[i]=sma;
Print("Этап 2 i=",i);
TimeX=iTime(NULL,TF,0);
StopCalc=1;
}
}
i--;
}
//----
return(0);
}
//+------------------------------------------------------------------+
os resultados são diferentes da opção 4 - o que está errado?
O link não se abre - erro 404
Tentei experimentar o tempo, mas não funcionou... Eu estava pensando na direção de "como parar o cálculo na última barra", eu acho que esse é o meu erro. Agora vou pensar em como não fazer uma mudança na última etapa do cálculo antes de mudar a barra atual.
O que você é tão pesado e não está girando? Você já recebeu uma solução, tudo o que precisa fazer é sentar e pensar. Conclusão, claro, bem, não há palavras - você viu a palavra Tempo, e concluiu imediatamente que o fez...
Você não precisa de um link ou vai se perder. Tudo o que você precisa está descrito neste post, deixe-me repeti-lo em detalhes:
1. declarar uma variável estática LastTime.
2. declarar um par de variáveis estáticas com os prefixos s e p.
3. Quando IndicatorCounted()=0, anula todas as variáveis criadas nos passos 1 e 2.
4. No início do ciclo, redefinir os valores:
{
LastTime=Time[i];
pDir=cDir;
}
else
{
cDir=pDir;
}
Por que você é tão pesado e não é decisivo? Você já tomou uma decisão, tudo o que precisa fazer é sentar e pensar. A conclusão, claro, bem, não há palavras - a palavra Time viu, e concluiu imediatamente que o fez...
Tudo o que você precisa está escrito neste post, deixe-me repeti-lo em detalhes:
1. declarar uma variável estática LastTime.
2. declarar um par de variáveis estáticas com os prefixos s e p.
3. Quando IndicatorCounted()=0, anula todas as variáveis criadas nos passos 1 e 2.
4. No início do loop, os valores são reinicializados:
{
LastTime=Time[i];
pDir=cDir;
}
else
{
cDir=pDir;
}
Obrigado por querer ajudar!
Não tenho muita experiência em escrever indicadores, por isso há algumas dificuldades - a solução que procuro - como prova meu último código acima.
A variante sugerida por você causa dificuldade, pois não consigo entender quais variáveis me são oferecidas a zero - embora a idéia seja clara - para reter os valores originalmente calculados.
Se você puder explicar porque minha variante não funciona - eu também limito o cálculo a um tick por barra e as variáveis não devem mudar, e espera-se que esta variante seja menos cara, pois o loop não será ocioso em cada tick, ao contrário da variante que você propôs.
A lógica é esta:
Tenho aqui a seguinte nuança: tomei este código (graças a Alekseu Fedotov):
//+----------------------------------------------------------------------------+
//| Автор : Ким Игорь В. aka KimIV, http://www.kimiv.ru |
//+----------------------------------------------------------------------------+
//| Версия : 19.02.2008 |
//| Описание : Возвращает номер бара закрытия последней позиции или -1. |
//+----------------------------------------------------------------------------+
//| Параметры: |
//| sy - наименование инструмента ("" или NULL - текущий символ) |
//| tf - таймфрейм ( 0 - текущий таймфрейм) |
//| op - операция ( -1 - любая позиция) |
//| mn - MagicNumber ( -1 - любой магик) |
//+----------------------------------------------------------------------------+
int NumberOfBarCloseLastPos(string sy="0", int tf=0, int op=-1, int mn=-1) {
datetime t;
int i, k=OrdersHistoryTotal();
if (sy=="" || sy=="0") sy=Symbol();
for (i=0; i<k; i++) {
if (OrderSelect(i, SELECT_BY_POS, MODE_HISTORY)) {
if (OrderSymbol()==sy) {
if (OrderType()==OP_BUY || OrderType()==OP_SELL) {
if (op<0 || OrderType()==op) {
if (mn<0 || OrderMagicNumber()==mn) {
if (t<OrderCloseTime()) t=OrderCloseTime();
}
}
}
}
}
}
return(iBarShift(sy, tf, t, True));
}
E agora eu coloco um cheque:
E aqui está o engate, porque inicialmente o NumberOfBarCloseLastPos será ajustado para "-1". E conseqüentemente, a primeira encomenda nunca será aberta.
O que podemos fazer em tal situação? Ou talvez eu tenha entendido mal alguma coisa?