Alıntı Originally Posted by Orhan AKDOĞAN Yazıyı Oku
PHP Code:
 //Veriler
var Sistem.GrafikVerileri;
var 
Sistem.GrafikFiyatSec("Kapanis");
var 
Sistem.GrafikFiyatSec("YUksek");
var 
Sistem.GrafikFiyatSec("Dusuk");
var 
Sistem.GrafikFiyatSec("Açılış");

// İndikatörler
var ORU Lib.OrhanRPrice(Sistem50,  80 );    
var 
ORA Lib.OrhanRPrice(Sistem50, -80 );  
var 
HH Sistem.HHV(3,H);
var 
LL Sistem.LLV(3,L);
var 
MA Sistem.MA(C"Exp"35);

// Değişkenler
var OrBolge Sistem.Liste(0);
var 
OrYon Sistem.Liste(0);
var 
OrASSistem.Liste(0);
var 
OrSSSistem.Liste(0);

var AS= 
Sistem.Liste(0);
var 
SSSistem.Liste(0);

//Strateji
var SonYon="";
for (
int i 2i<Sistem.BarSayisii++) 
{
   
//Kontrol
   
if( C[i] > ORU[i] ) OrBolge[i] = 3; else if( C[i] <= ORU[i] && C[i] >= ORA[i] ) OrBolge[i] = 2; else if( C[i] < ORA[i] ) OrBolge[i] = 1;
   if( 
OrBolge[i-1] - OrBolge[i]>0OrYon[i] =-1; else if( OrBolge[i-1] - OrBolge[i]<0OrYon[i] =1; else OrYon[i] =OrYon[i-1]; 
   
OrAS[i] = (OrYon[i-1] ==?  O[i]: ((C[i-1] < ORA[i-1]) ? ORA[i-1]: (C[i-1] <= ORU[i-1] && C[i-1] >= ORA[i-1]) ? ORU[i-1] : O[i]));
   
OrSS[i] = (OrYon[i-1] ==-?  O[i]  : ((C[i-1] > ORU[i-1]) ? ORU[i-1]: (C[i-1] <= ORU[i-1] && C[i-1] >= ORA[i-1]) ? ORA[i-1] : O[i]));

        AS[
i] =    new float[] {  
                                  
O[i]
                                , 
OrAS[i
                                , 
HH[i-1]
                                , 
MA[i-1]
                               }.
Max();

        
SS[i] =    new float[] {  
                                  
O[i
                                , 
OrSS[i]
                                , 
LL[i-1]
                                , 
MA[i-1]
                         }.
Min();


            if (  
H[i] >= AS[i]  && SonYon != "A" )  
            {
                
Sistem.Yon[i] = "A";
                
Sistem.Seviye[i]= AS[i];
                
SonYon Sistem.Yon[i];
            }


            else if ( 
L[i] <= SS[i]   &&   SonYon != "S" 
            {
                
Sistem.Yon[i] = "S";
                
Sistem.Seviye[i]= SS[i];
                
SonYon Sistem.Yon[i];
            }
}

//Çizgiler
Sistem.Cizgiler[0].Deger  ORU//Panel 1             
Sistem.Cizgiler[1].Deger  ORA//Panel 1 
Sistem.Cizgiler[2].Deger  OrYon

https://prnt.sc/lsokqx


https://prnt.sc/lsolqc
üstat bunun matriks/metastock bulabilirmiyiz. ?