Originally Posted by
seagunner
Merhaba, deneme yapıyorum biraz uğraştım dönüştürme ile ilgili hata verdi. Düzeltmeye uğraşırken, buraya yazacak durumu da kalmadı kodun
sonunu getiremedim. Çeviri konusunda yardım lütfen.
x0:=(H+L+C)/3;
X1:=MOV(X0,258,E);
X2:=MOV(abs(X0-X1),5,E);
X3:=(X0-X1)/(0.015*X2);
X4:=mov(X3,21,E);
X5:=mov(X4,3,S);
X6:=(X4-X5);
X4;X5;X6
buyrun, yalniz bu kod ne is yapiyor?
Kod:
var V = Sistem.GrafikVerileri;
var C = Sistem.GrafikFiyatOku(V, "Kapanis");
var H = Sistem.GrafikFiyatOku(V, "Yuksek" );
var L = Sistem.GrafikFiyatOku(V, "Dusuk" );
var X0 = Sistem.Liste(0);
var X2 = Sistem.Liste(0);
var X3 = Sistem.Liste(0);
var X6 = Sistem.Liste(0);
for (int i = 1; i < V.Count; i++) {
X0[i] = (C[i]+H[i]+L[i]) / 3;
}
var X1 = Sistem.MA(X0, "Exp", 258);
for (int i = 1; i < V.Count; i++) {
X2[i] = Math.Abs(X0[i]-X1[i]);
}
var MAX2 = Sistem.MA(X2, "Exp", 5);
for (int i = 1; i < V.Count; i++) {
X3[i] = (X0[i] - X1[i]) / (0.015f * MAX2[i]) ;
}
var X4 = Sistem.MA(X3, "Simple", 21);
var X5 = Sistem.MA(X4, "Simple", 3);
for (int i = 1; i < V.Count; i++) {
X6[i] = X4[i] - X5[i] ;
}
Sistem.Cizgiler[0].Deger = X4;
Sistem.Cizgiler[1].Deger = X5;
Sistem.Cizgiler[2].Deger = X6;