Tüm döviz kurlarını ytl ye çevirme fonksiyonu

‘ABD DOLARI’,
‘aud’ => ‘AVUSTRALYA DOLARI’,
‘dkk’ => ‘DANİMARKA KRONU’,
‘eur’ => ‘EURO’,
‘gbp’ => ‘İNGİLİZ STERLİNİ’,
‘chf’ => ‘İSVİÇRE FRANGI’,
‘sek’ => ‘İSVEÇ KRONU’,
‘cad’ => ‘KANADA DOLARI’,
‘kwd’ => ‘KUVEYT DİNARI’,
‘nok’ => ‘NORVEÇ KRONU’,
‘sar’ => ‘SUUDİ ARABİSTAN RİYALİ’,
);

function doviz_to_ytl($miktar, $tur)
{
$baglanti = implode(”, file(‘http://www.tcmb.gov.tr/kurlar/today.html’));
preg_match(‘#’.$tur.'[[:space:]]+([0-9.]+)[[:space:]]+([0-9.]+)#’, $baglanti, $doviz);
$alis = $doviz[1];
$satis = $doviz[2];
$ytl = ($miktar * $alis);

return $ytl;
}

$doviz_miktar = 1;
$doviz_tip = $doviz_arr[‘usd’];
$doviz_to_ytl = doviz_to_ytl($doviz_miktar, $doviz_tip);

// 1 ABD DOLARI = 1.4746 Yeni Türk Lirası
echo $doviz_miktar.’ ‘.$doviz_tip.’ = ‘.$doviz_to_ytl.’ Yeni Türk Lirası’;

?>