Парсер текущих курсов валют банка Монголии

Парсер на PHP текущих курсов валют банка Монголии. Запрашивает и парсит веб-страницу с курсами валют устанавливаемыми ежедневно. Форматы отдаваемых данных и дополнительные функции найдете здесь http://shaman.asiadata.ru/script/currency

function currency_bom_get_rates() {
  $url = 'http://www.mongolbank.mn/eng/dblistofficialdailyrate.aspx';
  $result = array();
  if (($datafetch = currency_http_request($url)) && ($html = $datafetch->data)) {
        $tables = preg_split('/<table[^>]*>/is', $html);
        $trs = array_slice($tables, 12, 37);
        $lines = array();
    foreach($trs as $i=>$l) {
          $l = preg_replace('/<\/span>.*/is', '', $l);
          $c = spliti ('<td[^>]*>', $l);
          $lines[] = currency_clear_array($c);
    }
    $date = date('Ymd');
    $dtable = isSet ($tables[11]) ? $tables[11] : "";
    $months = array('Jan'=>'01', 'Feb'=>'02', 'Mar'=>'03', 'Apr'=>'04', 'May'=>'05', 'Jun'=>'06', 'Jul'=>'07', 'Aug'=>'08', 'Sep'=>'09', 'Oct'=>'10', 'Nov'=>'11', 'Dec'=>'12');
        if(preg_match('/(Jan|Feb|Mar|Apr|May|Jun|Jul|Aug|Sep|Oct|Nov|Dec) ([0-9]{1,2}), ([0-9][0-9][0-9][0-9])/', $dtable, $regs)) {
          $date = $regs[3].$months[$regs[1]].$regs[2];
        }
        foreach ($lines as $line) {
      $line[2] = str_replace(array(' ', ','), '', $line[2]);
      if ($line[1] && ($line[2] > 0)) {
         $result[] = curency_prepare_rate(array(
           'country'=>'MN',
           'bank'=>'BOM',
           'fromvalue'=>1,
           'fromcurrency'=>$line[1],
           'tovalue'=>doubleval($line[2]),
           'tocurrency'=>'MNT',
           'date'=>$date,
         ));
        }
     }
   }
   return $result;
}

Сайт банка Монголии: www.mongolbank.mn
Веб-страница с ежедневными курсами валют:
http://www.mongolbank.mn/eng/dblistofficialdailyrate.aspx
Количество отдаваемых курсов валют:
июль 2012 - 37
сегодня – http://currency.servisator.ru/ru/rate/Mongolia