KurzovyListok

V tejto téme sa nachádzajú snippety (rozšírenia) pre Etomite.

Moderátor: Moderators

TiBi
Thief
Thief
Príspevky: 8
Dátum registrácie: Št Nov 03, 2005 2:01 pm

KurzovyListok

Príspevok od používateľa TiBi »

Snippet na kurzový lístok z Európskej centrálnej banky. Možnosť vypnúť/zapnúť zobraziť vlajku, kód meny a názov meny.

Kód: Vybrať všetko

// Snippet: KurzovyListok
// Author: TOPZONE, s.r.o.
// Web: http://www.topzone.sk
// Created: 20110506
// Updated: 20110506

$ukazVlajky = true;
$ukazMeny = true;
$ukazNazovMeny = true;
$round = 2;

#Zobrazovanie mien#

$zobraz['USD'] = true;
$zobraz['JPY'] = false;
$zobraz['BGN'] = false;
$zobraz['CZK'] = true;
$zobraz['DKK'] = false;
$zobraz['EEK'] = false;
$zobraz['GBP'] = true;
$zobraz['HUF'] = true;
$zobraz['LTL'] = false;
$zobraz['LVL'] = false;
$zobraz['PLN'] = true;
$zobraz['RON'] = true;
$zobraz['SEK'] = true;
$zobraz['CHF'] = true;
$zobraz['NOK'] = true;
$zobraz['HRK'] = true;
$zobraz['RUB'] = false;
$zobraz['TRY'] = false;
$zobraz['AUD'] = false;
$zobraz['BRL'] = false;
$zobraz['CAD'] = false;
$zobraz['CNY'] = false;
$zobraz['HKD'] = false;
$zobraz['IDR'] = false;
$zobraz['INR'] = false;
$zobraz['KRW'] = false;
$zobraz['MXN'] = false;
$zobraz['MYR'] = false;
$zobraz['NZD'] = false;
$zobraz['PHP'] = false;
$zobraz['SGD'] = false;
$zobraz['THB'] = false;
$zobraz['ZAR'] = false;

# Obrázky vlajok #

$vlajka['USD'] = "images/vlajky/us.png";
$vlajka['JPY'] = "images/vlajky/jp.png";
$vlajka['BGN'] = "images/vlajky/bg.png";
$vlajka['CZK'] = "images/vlajky/cz.png";
$vlajka['DKK'] = "images/vlajky/dk.png";
$vlajka['EEK'] = "images/vlajky/ee.png";
$vlajka['GBP'] = "images/vlajky/gb.png";
$vlajka['HUF'] = "images/vlajky/hu.png";
$vlajka['LTL'] = "images/vlajky/lt.png";
$vlajka['LVL'] = "images/vlajky/lv.png";
$vlajka['PLN'] = "images/vlajky/pl.png";
$vlajka['RON'] = "images/vlajky/ro.png";
$vlajka['SEK'] = "images/vlajky/se.png";
$vlajka['CHF'] = "images/vlajky/cf.png";
$vlajka['NOK'] = "images/vlajky/no.png";
$vlajka['HRK'] = "images/vlajky/hr.png";
$vlajka['RUB'] = "images/vlajky/ru.png";
$vlajka['TRY'] = "images/vlajky/tr.png";
$vlajka['AUD'] = "images/vlajky/au.png";
$vlajka['BRL'] = "images/vlajky/br.png";
$vlajka['CAD'] = "images/vlajky/ca.png";
$vlajka['CNY'] = "images/vlajky/cn.png";
$vlajka['HKD'] = "images/vlajky/hk.png";
$vlajka['IDR'] = "images/vlajky/id.png";
$vlajka['INR'] = "images/vlajky/in.png";
$vlajka['KRW'] = "images/vlajky/kr.png";
$vlajka['MXN'] = "images/vlajky/mx.png";
$vlajka['MYR'] = "images/vlajky/my.png";
$vlajka['NZD'] = "images/vlajky/nz.png";
$vlajka['PHP'] = "images/vlajky/ph.png";
$vlajka['SGD'] = "images/vlajky/sg.png";
$vlajka['THB'] = "images/vlajky/th.png";
$vlajka['ZAR'] = "images/vlajky/za.png";

# Názvy mien #

$menaNazov['USD'] = "americký dolár";
$menaNazov['JPY'] = "japonský jen";
$menaNazov['BGN'] = "bulharský lev";
$menaNazov['CZK'] = "česká koruna";
$menaNazov['DKK'] = "dánska koruna";
$menaNazov['EEK'] = "estónska koruna";
$menaNazov['GBP'] = "libra šterlingov";
$menaNazov['HUF'] = "maďarský forint";
$menaNazov['LTL'] = "litovský litas";
$menaNazov['LVL'] = "lotyšský lats";
$menaNazov['PLN'] = "poľský zlotý";
$menaNazov['RON'] = "nový rumunský lei";
$menaNazov['SEK'] = "švédska koruna";
$menaNazov['CHF'] = "švajčiarsky frank";
$menaNazov['NOK'] = "nórska koruna";
$menaNazov['HRK'] = "chorvátska kuna";
$menaNazov['RUB'] = "ruský rubeľ";
$menaNazov['TRY'] = "turecká líra";
$menaNazov['AUD'] = "austrálsky dolár";
$menaNazov['BRL'] = "brazílsky real";
$menaNazov['CAD'] = "kanadský dolár";
$menaNazov['CNY'] = "čínsky jüan";
$menaNazov['HKD'] = "hongkongský dolár";
$menaNazov['IDR'] = "indonézska rupia";
$menaNazov['INR'] = "indická rupia";
$menaNazov['KRW'] = "juhokórejský won";
$menaNazov['MXN'] = "mexické peso";
$menaNazov['MYR'] = "malajzijský ringgit";
$menaNazov['NZD'] = "novozélandský dolár";
$menaNazov['PHP'] = "filipínske peso";
$menaNazov['SGD'] = "singapurský dolár";
$menaNazov['THB'] = "thajský baht";
$menaNazov['ZAR'] = "juhoafrický rand";

# Koniec nastavení, začiatok skriptu #

function zaokruhli($hodnota,$miesta)
{
   $hodnota = round($hodnota,$miesta);
   $miest = strlen(strstr($hodnota,'.')) - 1;
   $hodnota = $miest < $miesta?($hodnota.str_repeat("0",$miesta-$miest)):$hodnota;
   return $hodnota;
}

# Vytvorenie Objektového modelu kurzového lístku #
$dom = new DomDocument();

$fileUrl = "http://www.ecb.europa.eu/stats/eurofxref/eurofxref-daily.xml";
$AgetHeaders = @get_headers($fileUrl);
if (!preg_match("|200|", $AgetHeaders[0])) {
 return "Kurzový lístok dočasne nedostupný.";
}

$dom->load($fileUrl);
$kurzy = $dom->documentElement->getElementsByTagName('Cube');
$out = '';
$out .= '<table style="width:200px;text-align:center;font-size:13px;">';
$out .= "<tr><th>Mena</th><th>Kurz</th></tr>";
foreach($kurzy as $kurz)
{

  $cas .= $kurz->getAttributeNode('time')->value;
  $mena = $kurz->getAttributeNode('currency')->value;
  $hodnotaKurz = $kurz->getAttributeNode('rate')->value;
  if($mena == "" || !$zobraz[$mena])
  {
    continue;
  }

    if($ukazVlajky != true && $ukazMeny != true && $ukazNazovMeny != true)
    {
      $ukazMeny = true;
    }
$out .= '<tr align="left" valign="top" style="margin-top:8px;border-bottom:1px #000;"><td style="text-align:left;padding-left:15px;">'.($ukazVlajky == true?"<img style=\"margin-top:3px;\" src=\"".$vlajka[$mena]."\">":"").' '.($ukazMeny == true?$mena:"").'<br>'.($ukazNazovMeny == true?$menaNazov[$mena]:"").'</td><td style="text-align:right;padding-right:15px;" valign="top">'.($round != false?zaokruhli($hodnotaKurz,$round):$hodnotaKurz."</td>").'</tr>';
}


$out .= "</table>";
// $out .= "Posledná aktualizácia : ".$cas;
return $out;
Prílohy
vlajky.zip
(20.27 KiB) 385 stiahnutí
Používateľov profilový obrázok
_rasel^
ETOMITE Admin
ETOMITE Admin
Príspevky: 1122
Dátum registrácie: Ut Sep 20, 2005 1:03 am
Bydlisko: Košice (SR)
Kontaktovať používateľa:

Re: KurzovyListok

Príspevok od používateľa _rasel^ »

Ahoj, ďakujem za zdieľanie.
..:: Etomite CMS → Rulezzz !.!.!. ::..
Napísať odpoveď