İDEAL veri terminalinde /Sistem/İndikatör/Robot

[ferit618]

MegaFxProfit fx indikatörünü ideale çevirecek bir babayiğit arıyorum.Kodlar aşağıda:

#property copyright "Cracked by Forex Winners"
#property link "Forex Winners"

#property indicator_separate_window
#property indicator_buffers 6
#property indicator_color1 Black
#property indicator_color2 Lime
#property indicator_color3 Red
#property indicator_color4 Yellow
#property indicator_color5 Lime
#property indicator_color6 Red

extern bool ALERTS = TRUE;
extern bool SoundAlerts = TRUE;
extern string SoundAlertFile = "alert.wave";
extern bool eMailAlerts = TRUE;
int G_bars_96;
int Gi_100 = 21;
double G_ibuf_104[];
double G_ibuf_108[];
double G_ibuf_112[];
double G_ibuf_116[];
double G_ibuf_120[];
double G_ibuf_124[];

// E37F0136AA3FFAF149B351F6A4C948E9
int init() {
SetIndexStyle(0, DRAW_NONE);
SetIndexStyle(1, DRAW_LINE, EMPTY, 3);
SetIndexStyle(2, DRAW_LINE, EMPTY, 3);
SetIndexStyle(3, DRAW_LINE, EMPTY, 3);
SetIndexStyle(4, DRAW_ARROW, EMPTY, 2);
SetIndexArrow(4, 225);
SetIndexStyle(5, DRAW_ARROW, EMPTY, 2);
SetIndexArrow(5, 226);
IndicatorDigits(Digits + 0);
SetIndexBuffer(0, G_ibuf_104);
SetIndexBuffer(1, G_ibuf_108);
SetIndexBuffer(2, G_ibuf_112);
SetIndexBuffer(3, G_ibuf_116);
SetIndexBuffer(4, G_ibuf_120);
SetIndexBuffer(5, G_ibuf_124);
IndicatorShortName("MEGAFXPROFIT © www.megafxprofit.com");
SetIndexLabel(0, NULL);
SetIndexLabel(1, NULL);
SetIndexLabel(2, NULL);
SetIndexLabel(3, NULL);
SetIndexLabel(4, NULL);
return (0);
}

// EA2B2676C28C0DB26D39331A336C6B92
int start() {
double Ld_0;
double Ld_8;
double Ld_16;
string Ls_104;
string Ls_112;
string Ls_120;
int Li_24 = IndicatorCounted();
double Ld_28 = 0;
double Ld_36 = 0;
double Ld_unused_44 = 0;
double Ld_unused_52 = 0;
double Ld_60 = 0;
double Ld_unused_68 = 0;
double low_76 = 0;
double high_84 = 0;
if (Li_24 > 0) Li_24--;
int Li_92 = Bars - Li_24;
for (int Li_96 = 0; Li_96 < Li_92; Li_96++) {
high_84 = High[iHighest(NULL, 0, MODE_HIGH, Gi_100, Li_96)];
low_76 = Low[iLowest(NULL, 0, MODE_LOW, Gi_100, Li_96)];
Ld_16 = (High[Li_96] + Low[Li_96]) / 2.0;
Ld_28 = 0.66 * ((Ld_16 - low_76) / (high_84 - low_76) - 0.5) + 0.67 * Ld_36;
Ld_28 = MathMin(MathMax(Ld_28, -0.999), 0.999);
G_ibuf_104[Li_96] = MathLog((Ld_28 + 1.0) / (1 - Ld_28)) / 2.0 + Ld_60 / 2.0;
Ld_36 = Ld_28;
Ld_60 = G_ibuf_104[Li_96];
}
bool Li_100 = TRUE;
for (Li_96 = Li_92 - 2; Li_96 >= 0; Li_96--) {
G_ibuf_116[Li_96] = 0;
Ld_8 = G_ibuf_104[Li_96 + 1];
Ld_0 = G_ibuf_104[Li_96 + 2];
if ((Ld_8 < 0.0 && Ld_0 > 0.0) || Ld_8 < 0.0) {
Li_100 = FALSE;
if (Ld_8 < 0.0 && Ld_0 > 0.0) {
Ls_104 = Symbol() + ", TF:" + f0_0(Period());
Ls_112 = Ls_104 + ", MEGAFXPROFIT SELL SIGNAL for Level: " + Ld_8;
Ls_120 = Ls_112 + " @ " + TimeToStr(TimeLocal(), TIME_SECONDS);
if (Bars > G_bars_96) {
G_bars_96 = Bars;
f0_1(Ls_120, Ls_112);
}
}
}
if ((Ld_8 > 0.0 && Ld_0 < 0.0) || Ld_8 > 0.0) {
Li_100 = TRUE;
if (Ld_8 > 0.0 && Ld_0 < 0.0) {
Ls_104 = Symbol() + ", TF:" + f0_0(Period());
Ls_112 = Ls_104 + ", MEGAFXPROFIT BUY SIGNAL for Level: " + Ld_8;
Ls_120 = Ls_112 + " @ " + TimeToStr(TimeLocal(), TIME_SECONDS);
if (Bars > G_bars_96) {
G_bars_96 = Bars;
f0_1(Ls_120, Ls_112);
}
}
}
if (!Li_100) {
G_ibuf_112[Li_96] = Ld_8;
G_ibuf_108[Li_96] = 0.0;
} else {
G_ibuf_108[Li_96] = Ld_8;
G_ibuf_112[Li_96] = 0.0;
}
}
for (Li_96 = 0; Li_96 < Li_92; Li_96++) {
if (G_ibuf_108[Li_96] > 0.0 && G_ibuf_108[Li_96 + 1] == 0.0) G_ibuf_120[Li_96] = G_ibuf_108[Li_96];
if (G_ibuf_112[Li_96] < 0.0 && G_ibuf_112[Li_96 + 1] == 0.0) G_ibuf_124[Li_96] = G_ibuf_112[Li_96];
}
return (0);
}

// FF3DED0DF4360E36577F1A7C4D36796A
void f0_1(string As_0, string As_8) {
if (ALERTS) Alert(As_0);
if (SoundAlerts) PlaySound(SoundAlertFile);
if (eMailAlerts) SendMail(As_8, As_0);
}

// A9BA851E539886467D4ECFDDCA93F414
string f0_0(int Ai_0) {
switch (Ai_0) {
case 1:
return ("M1");
case 5:
return ("M5");
case 15:
return ("M15");
case 30:
return ("M30");
case 60:
return ("H1");
case 240:
return ("H4");
case 1440:
return ("D1");
case 10080:
return ("W1");
case 43200:
return ("MN1");
}
WindowRedraw();
return (Period());
}

[KOSA]

Sen bu kodla napıyorsun?

[ferit618]

Sen bu kodla napıyorsun?

İfade açık olmasada üzerime alındım.Verdiğim kod Megafxprofit adlı fx indikatörünün mt4 dilindeki kodlarıdır.İdeal diline çevirecek bir babayiğit arıyorum!

[kenten]

robotları radore datacenterdeki serverlarda çalıştıran arkadaşlar için , haftasonu radorede sıkıntılar oldu, serverları kontrol altında tutmakta fayda var. vps inizi x bir firmadan satın almış olabilirsiniz. firma makinaları radorede tutuyorsa sorun sizi etkiler.

[yatirimci]

Herkese selamlar iyi çalışmalar dilerim.yapmak istediğim şey şu;2 adet 1 dk.lik--2 adet 2 dk.lik--2 adet 5 dk.lik ve 3 adet 10 dk.lik toplam 9 sistemimin yönlerini (al-sat-flat) total olarak bakıp tek sinyal elde ediyorum.yani birbirlerine filtre olarak kullanıyorum.orneğin 5 i al da 1 i satta,3 ü flat iken;nette4 al ile total yön 4 al ile al olarak gerçekleşiyor.versiyonlarını biliyorsunuz zaten.sonuçta nette 1 fazla al da ise al, bir fazla satta ise sat olunca sat sinyali geliyor.sistemler tek tek kullanılıyor repaint yapmıyorlar.hepsinden gelen sinyalleri tek sinyal olarak manuel kullanıyorum.bunu nasıl otomatize edebilirim?yani her 1 dakikada 9 sistemin durumuna tek tek bakacak ve total sinyal al mı sat mı flat mı belirleyecek o sinyali sürdürecek.ne zaman durum değiştiyse o 1 dakikalık barın sonunda sinyali değiştirecek.böyle bir robot kodu nasıl yazılabilir?(dikkat birleşik sistem kodu istemiyorum,sadecepoz.ları kontrol edip emir göndercek robot kodunu oluşturmak amacım) Sayın üstadlar bir el atarsanız sevinirim.çok kişide kulanır diye düşünüyorum,çünkü maxdd. de çok düşüyor böylece.....

Selamlar,

Tek bir formule indirmenize gerek yok, kullandıgınız makine guclu ise tum sistemleri oto al/sat baglarsınız. Teorik olarak yapılacak tüm işlemler sonucu hepsinin toplamını verir. Ancak bu durumda manuel durumdan farklı olarak daha fazla komisyon ve kayma maliyetiniz olur
Saygılar
YTD

[ASAP]

Sonunda çözdüm












kadar*tekrar*et

yap


sağa*dön*↻ ▾


sola*dön*↺ ▾

ileri*git

eğer

önde*yol*varsa ▾
yap

eğer

önde*yol*varsa ▾
yap
değilse


ileri*git

kadar*tekrar*et

yap

eğer

önde*yol*varsa ▾
yap
değilse


sağa*dön*↻ ▾


sağa*dön*↻ ▾

eğer

sağda*yol*varsa*↻ ▾
yap
değilse


sağa*dön*↻ ▾

eğer

solda*yol*varsa*↺ ▾
yap


sola*dön*↺ ▾

ileri*git



Tebrikler!
Bu seviyeyi 16 satır JavaScript ile çözdünüz:
moveForward();
while (notDone()) {
if (isPathForward()) {
if (isPathRight()) {
turnRight();
} else {
if (isPathLeft()) {
turnLeft();
}
}
moveForward();
} else {
turnRight();
turnRight();
}
}

Geç gördüm ama...
O kadar satırla herkes çözer

Tebrikler!
Bu seviyeyi 8 satır JavaScript ile çözdünüz:

while (notDone()) {
if (isPathLeft()) {
turnLeft();
moveForward();
} else {
turnRight();
}
}
Bir sonraki mücadeleye hazır mısın?

[ferit618]

Aşağıdaki indikatörde bir yerde hata yapmışım. YArdımcı olacaklara şimdiden teşekkürler....

var V = Sistem.GrafikVerileri ;
var C = Sistem.GrafikFiyatOku(V, "Kapanis") ;
var H = Sistem.GrafikFiyatOku(V, "Yuksek") ;
var L = Sistem.GrafikFiyatOku(V, "Dusuk") ;
var Bars = V.Count;

var a =Sistem.MA(V,"Exp",20);
var b =Sistem.MA(V,"Exp",100);
var k =0;
k=(a-b)/(a+b);
var m =Sistem.MA(k,"Exp",8);

Sistem.Cizgiler[0].Deger = k; Sistem.Cizgiler[0].Aciklama="voli";
Sistem.Cizgiler[1].Deger = m; Sistem.Cizgiler[1].Aciklama="average";
Sistem.Cizgiler[2].Deger = Sistem.Liste(0); Sistem.Cizgiler[2].Aciklama="Axis";

[stradivarius]

Aşağıdaki indikatörde bir yerde hata yapmışım. YArdımcı olacaklara şimdiden teşekkürler....

var V = Sistem.GrafikVerileri ;
var C = Sistem.GrafikFiyatOku(V, "Kapanis") ;
var H = Sistem.GrafikFiyatOku(V, "Yuksek") ;
var L = Sistem.GrafikFiyatOku(V, "Dusuk") ;
var Bars = V.Count;

var a =Sistem.MA(V,"Exp",20);
var b =Sistem.MA(V,"Exp",100);
var k =0;
k=(a-b)/(a+b);
var m =Sistem.MA(k,"Exp",8);

Sistem.Cizgiler[0].Deger = k; Sistem.Cizgiler[0].Aciklama="voli";
Sistem.Cizgiler[1].Deger = m; Sistem.Cizgiler[1].Aciklama="average";
Sistem.Cizgiler[2].Deger = Sistem.Liste(0); Sistem.Cizgiler[2].Aciklama="Axis";

k listesini tanimlayip hesaplattirmaniz lazim. ayrica grafik verileri yerine, kapanis degerlerinin ma sini almaniz lazim c yi yani. (v icinde yanilmiyorsam ohlc hepsi tutuluyor).
bi de kesirli olan ifadenin anladigim kadariyla ema si degil basit hareketli ortalamayi almak gerekiyor. degerlerin exp i hesaplanamiyor ya da anlamali degil, zannedersem.

var V = Sistem.GrafikVerileri ;
var C = Sistem.GrafikFiyatOku(V, "Kapanis") ;
var H = Sistem.GrafikFiyatOku(V, "Yuksek") ;
var L = Sistem.GrafikFiyatOku(V, "Dusuk") ;
var Bars = V.Count;

var a =Sistem.MA(C,"Exp",20); // C
var b =Sistem.MA(C,"Exp",100); // C
var k =Sistem.Liste(V.Count,0); // liste tanimla

for(int i=10; i<V.Count; i++){ // listenin degerlerini bul..
k[i]=(a[i]-b[i])/(a[i]+b[i]);
}

var m = Sistem.MA(k,"Simple", 8); // simple

Sistem.Cizgiler[0].Deger = k;
Sistem.Cizgiler[1].Deger = m;