Ideal Formül Yazımında Karşılaşılan Hatalar ve Çözümleri

[ansist]

Arkadaşlar şu formülü sistem tanımlarında indikatör olarak nasıl Yazarım Yardımcı olur musunuz?

IF((ADX(14) > 20 AND ( Mov(C,15,S) > Mov(C,30,S)) AND ( Mov(C,5,S) > Mov(C,30,S)) AND Stoch(5,3) < 30 AND Ref(Stoch(5,3) ,-1) >=30),1,0)

[Sezai KILIÇ]

Arkadaşlar şu formülü sistem tanımlarında indikatör olarak nasıl Yazarım Yardımcı olur musunuz?

IF((ADX(14) > 20 AND ( Mov(C,15,S) > Mov(C,30,S)) AND ( Mov(C,5,S) > Mov(C,30,S)) AND Stoch(5,3) < 30 AND Ref(Stoch(5,3) ,-1) >=30),1,0)

Buyrun

var C = Sistem.GrafikFiyatSec("Kapanis");
var ADX = Sistem.ADX(14);
var Mov5 = Sistem.MA(C, "Simple", 5);
var Mov15 = Sistem.MA(C, "Simple", 15);
var Mov30 = Sistem.MA(C, "Simple", 30);
var Stoch = Sistem.StochasticOsc(5, 3);
var IND = Sistem.Liste(0);

for (int i=1; i < Sistem.BarSayisi; i++)
{
   if (ADX[i] > 20 && Mov15[i] > Mov30[i] && Mov5[i] > Mov30[i] && Stoch[i-1] < 30 && Stoch[i] >= 30)
      IND[i] = 1;
   else
      IND[i] = 0;
}
Sistem.Cizgiler[0].Deger = IND; //  Panal2

[wolvorine]

herkese iyi aksamlar


asagıdaki sistemi robota yazdırdım hata veriyor hata nerde acaba ?

yardımcı olabilir misiniz?

şimdiden teşekkürler


var V = Sistem.GrafikVerileri ;


// hesapla

var Veriler = Sistem.GrafikFiyatsec("Kapanis"); // kapanıs barları oku
var RSI = Sistem.RSI(40);
var yetmis = Sistem.MA(RSI, "Simple", 40);




var x1 = Sistem.Liste(V.Count, 0);

for (int i = 1; i < V.Count; i++)
x1[i] = RSI[i] < yetmis[i] ? -1 : RSI[i]> yetmis[i] ? 1 : x1[i-1] ;





// sistem
var SonYon = "";

for (int i = 1; i<V.Count; i++)
{


if ( x1[i] == 1 && SonYon != "A" ) // AL
{
Sistem.Yon[i] = "A";
SonYon = Sistem.Yon[i];

}



else if ( x1[i] == -1 && SonYon != "F" ) // SAT
{
Sistem.Yon[i] = "F";
SonYon = Sistem.Yon[i];

}



else if ( x1[i] == 0 && (SonYon == "A" || SonYon == "S") ) // FLAT
{
Sistem.Yon[i] = "F";
SonYon = Sistem.Yon[i];

}


}


==========

robot tek satır ise

var Islem =Sistem.RobotViopAktif("SISTEM1", "IMKBH'FMIZP", "IMKBH'FMIZP","5",1);

[Sezai KILIÇ]

herkese iyi aksamlar
asagıdaki sistemi robota yazdırdım hata veriyor hata nerde acaba ?
yardımcı olabilir misiniz?
şimdiden teşekkürler


var V = Sistem.GrafikVerileri ;
// hesapla
var Veriler = Sistem.GrafikFiyatSec("Kapanis"); // kapanıs barları oku
==========

Sistem kodunda 1 küçük hata vardı. Yukarıdaki alıntıda kırmızı yaptığım "s" harfi Büyük "S" olmalı.

Tek Satır Robot fonksiyonunuz hatalı.
Adından da anlaşılacağı gibi (RobotVIOPAktif) Bu fonksiyon VIOP emir gönderim parametrelerini içerir.

Hisse için iki ayrı (Açığa Satış Var Yok) fonksiyon var.
Sisteminizden anladığım AL/KAPAT, AL/KAPAT şeklinde stratejiniz var. O halde AÇIĞA SATIŞ YAPMAYAN TEK SATIR robot kullanacaksınız,

Örnek:

var Islem = Sistem.RobotHisseAktifAcigaYok("SISTEM1", "IMKBH'FMIZP", "IMKBH'FMIZP", "5", 1);

[ansist]

Buyrun

var C = Sistem.GrafikFiyatSec("Kapanis");
var ADX = Sistem.ADX(14);
var Mov5 = Sistem.MA(C, "Simple", 5);
var Mov15 = Sistem.MA(C, "Simple", 15);
var Mov30 = Sistem.MA(C, "Simple", 30);
var Stoch = Sistem.StochasticOsc(5, 3);
var IND = Sistem.Liste(0);

for (int i=1; i < Sistem.BarSayisi; i++)
{
   if (ADX[i] > 20 && Mov15[i] > Mov30[i] && Mov5[i] > Mov30[i] && Stoch[i-1] < 30 && Stoch[i] >= 30)
      IND[i] = 1;
   else
      IND[i] = 0;
}
Sistem.Cizgiler[0].Deger = IND; //  Panal2

Çok teşekkür ederim.

[wolvorine]

Sistem kodunda 1 küçük hata vardı. Yukarıdaki alıntıda kırmızı yaptığım "s" harfi Büyük "S" olmalı.

Tek Satır Robot fonksiyonunuz hatalı.
Adından da anlaşılacağı gibi (RobotVIOPAktif) Bu fonksiyon VIOP emir gönderim parametrelerini içerir.

Hisse için iki ayrı (Açığa Satış Var Yok) fonksiyon var.
Sisteminizden anladığım AL/KAPAT, AL/KAPAT şeklinde stratejiniz var. O halde AÇIĞA SATIŞ YAPMAYAN TEK SATIR robot kullanacaksınız,

Örnek:

var Islem = Sistem.RobotHisseAktifAcigaYok("SISTEM1", "IMKBH'FMIZP", "IMKBH'FMIZP", "5", 1);

sagolun çok teşekkurler Sezai hocam

bu arada altına belirlediğimiz tarihten itibaren başlayan kar-zarar grafiğini nasıl çizdirebiliriz diğer orneklerden aldım tam çalıştıramadım altına nasıl ekliyebiliriz?

çok teşekkurler şimdiden

saygılarımla

[thebaboli]

sagolun çok teşekkurler Sezai hocam

bu arada altına belirlediğimiz tarihten itibaren başlayan kar-zarar grafiğini nasıl çizdirebiliriz diğer orneklerden aldım tam çalıştıramadım altına nasıl ekliyebiliriz?

çok teşekkurler şimdiden

saygılarımla

Sistem.GetiriHesapla("01/01/2016", 0.00);
var KarZarar = Sistem.GetiriKZ;

Sistem.Cizgiler[0].Deger = KarZarar; 

[ansist]

Bu formülü düzeltebilirmisiniz? Hata veriyor

//+------------------------------------------------------------------+
//| LSMA in Color |
//| Copyright © 2004, MetaQuotes Software Corp. |
//| http://www.metaquotes.net/ |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2005, FX Sniper "
#property link "http://www.metaquotes.net/"
//---- indicator settings
#property indicator_chart_window
#property indicator_buffers 3
#property indicator_color1 Yellow
#property indicator_color2 Green
#property indicator_color3 Red
//---- buffers
double ExtMapBuffer1[];
double ExtMapBuffer2[];
double ExtMapBuffer3[];
int width;
//----
extern int Rperiod=34;
extern int Draw4HowLongg=1500;
int Draw4HowLong;
int shift;
int i;
int loopbegin;
double sum[];
int length;
double lengthvar;
double tmp ;
double wt[];
int c;
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
//---- 2 additional buffers are used for counting.
IndicatorBuffers(5);
//---- drawing settings
SetIndexBuffer(2,ExtMapBuffer1);
SetIndexBuffer(1,ExtMapBuffer2);
SetIndexBuffer(0,ExtMapBuffer3);
SetIndexBuffer(3,sum);
SetIndexBuffer(4,wt);
SetIndexStyle(2,DRAW_LINE,STYLE_SOLID,2);
SetIndexStyle(1,DRAW_LINE,STYLE_SOLID,2);
SetIndexStyle(0,DRAW_LINE,STYLE_SOLID,2);
//---- initialization done
return(0);
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
int start()
{
Draw4HowLong=Bars-Rperiod - 5;
length=Rperiod;
loopbegin=Draw4HowLong - length - 1;
//----
for(shift=loopbegin; shift>=0; shift--)
{
sum[1]=0;
for(i=length; i>=1 ;i--)
{
lengthvar=length + 1;
lengthvar/=3;
tmp=0;
tmp =(i - lengthvar)*Close[length-i+shift];
sum[1]+=tmp;
}
wt[shift]=sum[1]*6/(length*(length+1));
//---- COLOR CODING
ExtMapBuffer3[shift]=wt[shift]; //red
ExtMapBuffer2[shift]=wt[shift]; //green
ExtMapBuffer1[shift]=wt[shift]; //yellow
// for(c=loopbegin;c==shift;c++)
// {
if (wt[shift+1] > wt[shift])
{
ExtMapBuffer2[shift+1]=EMPTY_VALUE;
// ObjectCreate("smiley_face", OBJ_ARROW, 0, Time[shift], Low[shift]-Point*20);
// Print("time= ",Time[shift]);
// ObjectSet("smiley_face", OBJPROP_ARROWCODE, 242);
// ObjectSet("smiley_face", OBJPROP_COLOR , Red);
// ObjectSet("smiley_face", OBJPROP_WIDTH , 1);
// ObjectsRedraw();
//ExtMapBuffer3[shift+1] = EMPTY_VALUE;
//ExtMapBuffer3[shift+1] = EMPTY_VALUE;
}
else if (wt[shift+1] < wt[shift])
{
ExtMapBuffer1[shift+1]=EMPTY_VALUE; //-1 red/greem tight
//ExtMapBuffer3[shift+1] = EMPTY_VALUE;
}
else
{
ExtMapBuffer1[shift+1]=CLR_NONE;//EMPTY_VALUE;
ExtMapBuffer2[shift+1]=CLR_NONE;//EMPTY_VALUE;
}
}
return(0);
}
//+------------------------------------------------------------------+