veriler TCMB den çekiliyor.
<?
function KurGoster()
{
$dolar = "USD/TRY";
$mark = "EUR/TRY";
$dosya=file("http://www.tcmb.gov.tr/kurlar/today.html?");
for ($i=0; $i<sizeof($dosya); $i++)
{
if(ereg($dolar, $dosya[$i])) {
$alanlar = split("[[:space:]]+" , $dosya[$i]);
echo "<tr><td><font face=Verdana size=1 color=FF0000> Dolar $</td><td align=center><font face=Verdana size=1>".$alanlar[4]."</td><td align=center><font face=Verdana size=1>".$alanlar[5]."</td></tr>";
}
if(ereg($mark, $dosya[$i])) {
$alanlar = split("[[:space:]]+" , $dosya[$i]);
echo "<tr><td><font face=Verdana size=1 color=FF0000> Euro €</td><td align=center><font face=Verdana size=1>".$alanlar[3]."</td><td align=center><font face=Verdana size=1>".$alanlar[4]."</td></tr>";
}
}
}
?>
<table border=0 style="border-width:0; border-collapse: collapse" bordercolor="#111111" cellpadding="0" cellspacing="0" width="150" height="20">
<tr>
<td align="center" width="50" style="border-style: none; border-width: medium">
<p align="left"><b><font face=Verdana size=1>Döviz</td>
<td align="center" width="50" style="border-style: none; border-width: medium">
<font size="1"><b>Alış</b></font></td>
<td align="center" width="50" style="border-style: none; border-width: medium">
<font size="1"><b>Satış</b></font></td></tr>
<?echo KurGoster()?>
</table></font></font></font></font>