]*?>.*?@siU', // Strip style tags properly
'@<[\/\!]*?[^<>]*?>@si', // Strip out HTML tags
'@@', // Strip multi-line comments including CDATA
'@[\s]{2,}@'
);
$text = preg_replace($search, ' ', $text);
$text = str_replace(chr(13)," ",$text);
return $text;
}
function prepare_text($search_text) {
$search_text=get_plain_text($search_text);
$search_text=CentralToWestern($search_text);
$search_text=strtoupper($search_text);
return $search_text;
}
function prepare_url($url)
{
return str_replace(Array(chr(150),chr(141),chr(157),"ť","ľ","č","____","___","__"),Array("-","t","c","t","t","l","c","_","_","_"),str_replace(Array(" ",".",","),"_",strtolower(prepare_text($url))));
}
function prepare_image_size($img,$required_width,$required_height)
{
$addsize="";
list($width, $height, $type, $attr)=getimagesize($img);
if ($width>$required_width || $height>$required_height)
{
if (($width/$required_width) > ($height/$required_height))
{
$addsize=' width="' . $required_width . '"';
}
else
{
$addsize=' height="' . $required_height . '"';
}
}
return $addsize;
}
?>
';
if ($item_info["obrazok"] && file_exists('images/zoznam/' . $item_info["obrazok"]))
{
if ($item_info["url"])
{
$href=$item_info["url"];
}
else
{
$href="/images/zoznam/" . $item_info["obrazok"];
}
$content .= '
';
}
$content .= ' |
';
$content .= '- ';
$postfix="";
if ($item_info["url"])
{
$content .= '';
$postfix='';
}
$content .= ''.$item_info["nazov"].'' . $postfix;
if (!$sponzor && (Time()-strtotime($item_info["creation_date"])<30*24*3600))
{
$content.='' . LS_New . '';
}
$content.='
';
if ($item_info["popis"])
{
$content .= substr($item_info["popis"],0,200);
}
if ($item_info["popis"]!=substr($item_info["popis"],0,200))
{
$content .= "...";
}
if ($item_info["url"])
{
$content .= '
'.$urlText.'
';
}
if ($sponzor)
{
if ($_SESSION['meno'] == "admin")
{
$content .= ' ' . LS_Delete . '';
$content .= ' ' . LS_Update . '' . " V.S.: " . Date("Y") . $item_info["firma_id"];
}
}
else
{
if ($_SESSION['meno'] == "admin")
{
$content .= ' ' . LS_Delete . '';
$content .= ' ' . LS_Update . '';
}
}
$content .= '
';
$content .= ' | ';
$content.= '
' . LS_TopovatZaznam . '';
$content .= ' |
';
return $content;
}
function GetItemDescriptions($item_id,$decription_type_id)
{
return SQL_GetQueryResults("SELECT * FROM tblItemDescriptions WHERE item_id='$item_id' AND decription_type_id='$decription_type_id' order by item_description_id");
}
function GetClassName($state)
{
if ($state==CHORVATSKO)
$defaultName="workleft_hr";
elseif ($state==RAKUSKO)
$defaultName="workleft_at";
else
$defaultName="workleft";
return $defaultName;
}
function PageHeader($title, $description, $keywords,$baseurl="")
{
$result='
' . $title . '
';
if ($baseurl)
{
$result.='';
}
$result.="
";
echo $result;
}
?> Array("country" => "Austrália", "web" => "http://www.rba.gov.au/", "name" => "dolár", "x" => "25"),
"SKK" => Array("country" => "SR", "web" => "http://www.nbs.sk/", "name" => "koruna", "x" => "1"),
"CZK" => Array("country" => "ČR", "web" => "http://www.cnb.cz/", "name" => "koruna", "x" => "1.5"),
"DKK" => Array("country" => "Dánsko", "web" => "http://www.nationalbanken.dk/nb/nb.nsf/alldocs/HPFrameMasterUK", "name" => "koruna", "x" => "6"),
"EUR" => Array("country" => "Európska menová únia", "web" => "http://www.ecb.int/", "name" => "euro", "x" => "43"),
"JPY" => Array("country" => "Japonsko", "web" => "http://www.boj.or.jp./en", "name" => "jen", "x" => "100|35"),
"CAD" => Array("country" => "Kanada", "web" => "http://www.bankofcanada.ca/en", "name" => "dolár", "x" => "28"),
"HUF" => Array("country" => "Maďarsko", "web" => "http://www.mnb.hu/index-a.htm", "name" => "forint", "x" => "100|18"),
"XDR" => Array("country" => "MMF-ZPČ-SDR", "web" => "http://www.imf.org/", "name" => "SDR", "x" => "60"),
"NOK" => Array("country" => "Nórsko", "web" => "http://www.norges-bank.no/english/", "name" => "koruna", "x" => "5.8"),
"PLN" => Array("country" => "Poľsko", "web" => "http://www.nbp.pl/", "name" => "zlotý", "x" => "11"),
"SIT" => Array("country" => "Slovinsko", "web" => "http://www.bsi.si/html/eng/index.html", "name" => "toliar", "x" => "100|20"),
"CHF" => Array("country" => "Švajčiarsko", "web" => "http://www.snb.ch/", "name" => "frank", "x" => "30"),
"SEK" => Array("country" => "Švédsko", "web" => "http://www.riksbank.se/", "name" => "koruna", "x" => "4.7"),
"USD" => Array("country" => "USA", "web" => "http://www.federalreserve.gov/", "name" => "dolár", "x" => "45"),
"GBP" => Array("country" => "Veľká Británia", "web" => "http://www.bankofengland.co.uk/", "name" => "libra", "x" => "70")
);
function round_fine($no)
{
$no = (int)($no * 100);
$res = $no % 100;
if ($res > 50)
{
return (int)($no / 100) + 1;
}
else
{
return (int)($no / 100);
}
}
class Bribor
{
var $data;
var $durations;
//the constructor
function Bribor($start_date, $end_date)
{
$this->data = $this->GetBriborForTimePeriod($start_date, $end_date);
$this->durations = Array(
"BRIBOR 1D" => "e|Deň",
"BRIBOR 2T" => "o|2 týždne",
"BRIBOR 1M" => "e|1 mesiac",
"BRIBOR 3M" => "o|3 mesiace",
"BRIBOR 6M" => "e|6 mesiacov",
"BRIBOR 12M" => "o|12 mesiacov");
}
//gets the structured data for table drawing
function GetBriborForTimePeriod($start_date, $end_date)
{
$sql = "SELECT
entry_date
FROM
tblMarketRates
WHERE
type='sadz'
GROUP BY
entry_date
ORDER BY
entry_date DESC
LIMIT 4,1";
$end_date = SQL_GetFieldValue($sql);
$sql_qry = "SELECT
entry_date,
code_A AS duration,
sum_A AS sum_buy,
sum_B AS sum_sell
FROM
tblMarketRates
WHERE
entry_date >= '$end_date'
AND
entry_date <= '$start_date'
AND
type = 'sadz'
ORDER BY
code_A, entry_date";
//echo $sql_qry;
return SQL_GetQueryResults($sql_qry);
}
function GetTable()
{
$table_html = "";
$table_rows = Array();
$dates = Array();
$date_gathering = true;
$order = array_keys($this->durations);
$even_odd = 'Odd';
reset($this->data);
$duration = "";
while($row = current($this->data))
{
switch($this->durations[$row["duration"]][0])
{
case 'e': { $even_odd = 'Even'; break; }
case 'o': { $even_odd = 'Odd'; break; }
}
$partial = "| ".str_replace(".", ",", sprintf("%0.2f", $row["sum_sell"]))." | "; //";
if ($date_gathering && !in_array($row["entry_date"], $dates))
{
array_push($dates, $row["entry_date"]);
}
else
{
$date_gathering = false;
}
if (!is_array($table_rows[$row["duration"]]))
{
$table_rows[$row["duration"]] = Array();
}
array_push($table_rows[$row["duration"]], $partial);
next($this->data);
}
$date_html = "";
$headings = "";
$count = 0;
reset($dates);
while($date = current($dates))
{
$count+=2;
$date_html .= "" . Date("d.m.", strtotime($date)). " | ";
$headings .= "predaj | "; // ";
next($dates);
}
$table_html .= "| Fixing úrokových sadzieb na trhu korunových depozitov |
";
$table_html .= "| % p.a. |
";
$table_html .= "| | ".$date_html."
";
//$table_html .= "| | ".$headings."
";
reset($order);
while($order_entry = current($order))
{
List($even_odd, $duration) = Explode("|", $this->durations[$order_entry]);
switch($even_odd)
{
case 'e': { $even_odd = 'even'; break; }
case 'o': { $even_odd = 'odd'; break; }
}
$table_html .= "| ".$duration." | ".Implode("", $table_rows[$order_entry])."
";
next($order);
}
$table_html .= "| PRAMEŇ: Národná banka Slovenska |
";
$table_html .= "
";
return $table_html;
}
}
class DailyTable
{
var $date;
var $old_date;
var $mr;
function DailyTable($date)
{
$this->date = $date;
$this->old_date = $date;
$this->mr = new MarketRates();
$this->date = $this->CorrectDate();
}
function GetLastDate()
{
return $this->mr->GetPrevDailyDate($this->date);
}
function CorrectDate()
{
$date = $this->mr->GetNextDailyDate($this->date);
if (empty($date))
{
$date = $this->mr->GetPrevDailyDate($this->date);
}
return $date;
}
function GetSmallTable($which_ones, $added_html = "")
{
global $currencies;
if (TRIM($which_ones[0])=="EUR")
{
$euro_code=array_shift($which_ones);
}
$rates = $this->mr->GetExchangeRateDeltaForCurrencies($which_ones, $this->date);
reset($rates);
$table_html = '';
$row = 'odd';
while(List($code, $rate) = Each($rates))
{
if (empty($code))
{
continue;
}
$table_html .= "";
$amount = $rate["sum_B"];
$delta = $rate["delta"];
if ($delta > 0)
{
$delta = "+".$delta;
$image = "kurz_up.gif";
}
else
{
$image = "kurz_down.gif";
}
$price = str_replace(".", ",", sprintf("%0.3f", $rate["sum_A"]));
$delta = str_replace(".",",", sprintf("%0.2f", $delta));
$table_html .= "![](images/") | ";
$table_html .= "$code | ";
$table_html .= "".$price." | ";
// $table_html .= "".$delta."% | ";
$table_html .= " | ";
$table_html .= "
";
}
$table_html .= $added_html;
$table_html .= "
";
return $table_html;
}
function GetTable()
{
global $currencies;
$mr = new MarketRates();
$rates = $mr->GetDailyRates($this->date);
reset($rates);
if ($this->old_date != $this->date)
{
$table_html .= "Pre deň ".Date("j.n.Y", strtotime($this->old_date))." nemáme záznam v kurzovom lístku. Zobrazuje sa kurzový lístok z ".Date("j.n.Y", strtotime($this->date))."
";
}
$table_html .= "";
$table_html .= "| Kurzový lístok NBS |
";
$table_html .= "| ".Date("j.n.Y", strtotime($this->date))." |
";
$table_html .= "| Štáty - linky na centrálne banky |
Množstvo |
Názov meny |
Kód |
Kurz v EUR |
";
$row = "odd";
while($rate = current($rates))
{
if ($row == "even")
{
$row = "odd";
}
else
{
$row = "even";
}
$table_html .= "";
$web = $currencies[$rate["currency"]]["web"];
$country = $currencies[$rate["currency"]]["country"];
$amount = $rate["amount_A"];
$currency_name = $currencies[$rate["currency"]]["name"];
$code = $rate["currency"];
$price = str_replace(".", ",", sprintf("%0.3f", $rate["amount_B"]));
$table_html .= "| ".$country." | ";
$table_html .= "".$amount." | ";
$table_html .= "".$currency_name." | ";
$table_html .= "".$code." | ";
$table_html .= "".$price." | ";
$table_html .= "
";
next($rates);
}
$table_html .= "| PRAMEŇ: Národná banka Slovenska |
";
$table_html .= "
";
return $table_html;
}
}
class Index
{
var $data;
var $class_caption;
var $subclass_caption;
var $subclasses;
var $table;
var $image;
var $help_date;
var $help_rate;
var $unit;
function correctDates($class, $A, $B, &$start_date, &$end_date)
{
//first start date
$sql_qry = "SELECT
entry_date
FROM
tblMarketRates
WHERE
type = '$class'
AND
code_A = '$A'
AND
code_B = '$B'
AND
entry_date >= '$start_date'
ORDER BY
entry_date ASC
LIMIT 1";
$start_date = SQL_GetFieldValue($sql_qry);
$sql_qry = "SELECT
entry_date
FROM
tblMarketRates
WHERE
type = '$class'
AND
code_A = '$A'
AND
code_B = '$B'
AND
entry_date <= '$end_date'
ORDER BY
entry_date DESC
LIMIT 1";
$end_date = SQL_GetFieldValue($sql_qry);
}
function readData($class, $subclass_A, $subclass_B, &$start_date, &$end_date)
{
$date = $this->getStartDate($class, $subclass_A, $subclass_B);
$max_date = $this->getMaxDate($class, $subclass_A, $subclass_B);
if (strtotime($start_date) < strtotime($date))
{
$period = strtotime($end_date) - strtotime($start_date);
$start_date = Date("Y-m-d", strtotime($date));
$end_date = Date("Y-m-d", strtotime($date) + $period);
}
if (strtotime($max_date) < strtotime($end_date))
{
$period = strtotime($end_date) - strtotime($start_date);
$end_date = Date("Y-m-d", strtotime($max_date));
$start_date = Date("Y-m-d", strtotime($max_date) - $period);
}
if ($this->show_count == "T")
{
$amount_selector = "sum_A";
}
else
{
$amount_selector = "1";
}
$sql_qry =
"SELECT
entry_date,
$amount_selector AS amount,
sum_B AS value
FROM
tblMarketRates
WHERE
type = '$class'
AND
code_A = '$subclass_A'
AND
code_B = '$subclass_B'
AND
entry_date <= '$end_date'
AND
entry_date >= '$start_date'
ORDER BY
entry_date ASC";
$this->data = SQL_GetQueryResults($sql_qry);
$sql_qry =
"SELECT
MAX(entry_date)
FROM
tblMarketRates
WHERE
type = '$class'
AND
code_A = '$subclass_A'
AND
code_B = '$subclass_B'
AND
entry_date < '".$this->data[0]["entry_date"]."'";
$this->help_date = SQL_GetFieldValue($sql_qry);
if (!empty($this->help_date))
{
$sql_qry =
"SELECT
sum_B AS value
FROM
tblMarketRates
WHERE
type = '$class'
AND
code_A = '$subclass_A'
AND
code_B = '$subclass_B'
AND
entry_date = '".$this->help_date."'";
$this->help_rate = SQL_GetFieldValue($sql_qry);
}
else
{
$this->help_rate = 1;
}
}
function getStartDate($class, $subclass_A, $subclass_B)
{
$date = SQL_GetFieldValue("SELECT
MIN(entry_date)
FROM
tblMarketRates
WHERE
type = '$class'
AND
code_A='$subclass_A'
AND
code_B='$subclass_B'");
return $date;
}
function getMaxDate($class, $subclass_A, $subclass_B)
{
/*
if (!empty($max_date) && $max_date != 'total')
{
$max_subquery = " AND entry_date <= '$max_date'";
}
*/
$date = SQL_GetFieldValue("SELECT
MAX(entry_date)
FROM
tblMarketRates
WHERE
type = '$class'
AND
code_A = '$subclass_A'
AND
code_B = '$subclass_B'
");
//if we have some dates beyond today, hide'em
/*
if (strtotime($date) > strtotime(Date("Y-m-d")) && $max_date != 'total')
{
//and return last available date
return $this->GetMaxDate($type, Date("Y-m-d"));
}
*/
return $date;
}
function getSubclassSelect($sel)
{
$html = "";
return $html;
}
function Index($class, $subclass, &$start_date, &$end_date)
{
if (empty($class))
{
return;
}
List($subclass_A, $subclass_B) = Explode("/", $subclass);
$this->readAllSubClasses($class);
$this->readCaptions($class, $subclass_A, $subclass_B);
if ($start_date == "")
{
return;
}
$this->correctDates($class, $subclass_A, $subclass_B, $start_date, $end_date);
if ($this->dateError($class, $subclass_A, $subclass_B, $start_date, $end_date))
{
return;
}
if (!empty($start_date))
{
$this->exec($class, $subclass_A, $subclass_B, $start_date, $end_date);
}
}
function dateError($class, $subclass_A, $subclass_B, $start, $end)
{
$s = strtotime($this->getStartDate($class, $subclass_A, $subclass_B));
$e = strtotime($this->getMaxDate($class, $subclass_A, $subclass_B));
//echo Date("Y-m-d", $s).":".Date("Y-m-d", $e);
$start = strtotime($start);
$end = strtotime($end);
$sql_qry = "SELECT
COUNT(*)
FROM
tblMarketRates
WHERE
type = '$class'
AND
code_A = '$subclass_A'
AND
code_B = '$subclass_B'";
$count = SQL_GetFieldValue($sql_qry);
if ($start >= $end)
{
$this->table = "Počiatočný dátum je neskorší ako koncový.";
$this->image = "";
return true;
}
elseif($end < $s || $e < $start || $count == 0)
{
$this->table = "Na toto obdobie nie sú v databáze záznamy.";
$this->image = "";
return true;
}
return false;
}
function exec($class, $subclass_A, $subclass_B, &$start_date, &$end_date)
{
$this->readData($class, $subclass_A, $subclass_B, $start_date, $end_date);
if (count($this->data))
{
$this->table = "Na toto obdobie nie sú v databáze záznamy.";
$this->image = "";
}
$this->table = $this->drawTable($class, $subclass_A, $subclass_B, $start_date, $end_date);
$image_filename = "rates/".Date("YmdHis").substr(md5(microtime()),0,4).".jpg";
$params = Array("width" => 350, "height" => 200, "x_axis_count" => 3, "y_axis_count" => 3, "filename" => GetSystemOption("C_download_url_images_prefix").$image_filename);
$this->drawImage($start_date, $end_date, $params);
$this->image = "![](".GetSystemOption("C_redis_root_images").$image_filename.")
";
}
function readAllSubClasses($class)
{
$page_type_id = SQL_GetFieldValue("SELECT page_type_id FROM tblPageTypes WHERE page_type_tag = 'market_item'");
$sql_qry = "
SELECT
page_name,
properties
FROM
tblPages PG
WHERE
page_type_id = $page_type_id
AND
properties LIKE '%".$class."%'
ORDER BY
page_id ASC";
$subclasses = SQL_GetQueryResults($sql_qry);
reset($subclasses);
while($sc = current($subclasses))
{
$s = ParseProperties($sc["properties"]);
$s["page_name"] = $sc["page_name"];
$this->subclasses[$s["page_name"]] = $s;
next($subclasses);
}
$this->show_count = $s["show_count"];
}
function readCaptions($class, $subclass_A, $subclass_B)
{
$this->subclass_caption = $subclass_A.(!empty($subclass_B) ? "/".$subclass_B : "");
$this->class_caption = $this->subclasses[$this->subclass_caption]["subclass_name"];
$this->unit = $this->subclasses[$this->subclass_caption]["market_unit"];
}
function drawTable($class, $subclass_A, $subclass_B, &$start_date, &$end_date)
{
//echo $start_date.":".$end_date."
";
reset($this->data);
$this->show_count = false;
$columns = 2;
$html = "";
$html .= "| " . $this->class_caption . " |
";
$html .= "| " . $this->subclass_caption . " |
";
$html .= "| dátum | ";
if ($this->show_count)
{
$html .= "množstvo | ";
}
if (!empty($this->unit))
{
$unit_text = " (".$this->unit.")";
}
else
{
$unit_text = "";
}
$html .= "hodnota".$unit_text." |
";
$even_odd = "Even";
while($row = current($this->data))
{
$html .= "";
$html .= "| ";
$html .= Date("d.m.Y", strtotime($row["entry_date"]));
$html .= " | ";
if ($this->show_count)
{
$html .= "";
$html .= $row["amount"];
$html .= " | ";
}
$html .= "";
$html .= $row["value"];
$html .= " | ";
next($this->data);
if ($even_odd == "Even")
{
$even_odd = "Odd";
}
else
{
$even_odd = "Even";
}
}
$html .= "
";
return $html;
}
function drawImage($period_start, $period_end, $params = Array())
{
$width = $params["width"];
$height = $params["height"];
$x_axis_count = $params["x_axis_count"] + 1;
$y_axis_count = $params["y_axis_count"] + 1;
$filename = $params["filename"];
$graph_width = $width - 65;
$graph_x_start = 60;
$graph_height = $height - 20;
$graph_y_start = 5;
if(empty($filename))
{
Header("Content-type: image/jpeg");
}
$image = ImageCreate($width, $height);
//the colors
$bg_color = ImageColorAllocate ($image, 255, 255, 255);
$color = ImageColorAllocate ($image, 255, 100, 50);
$axis_color = ImageColorAllocate($image, 140, 140, 140);
$text_color = ImageColorAllocate($image, 0, 0, 0);
$time_start = strtotime($period_start);
$time_end = strtotime($period_end);
//now we have the width in days
$time_width = round_fine((($time_end - $time_start) / 86400));
$time_width_secs = $time_end - $time_start;
//get the rates info
$rates = $this->data;
$corr_needed = ($period_start != $rates[0]["entry_date"]) &&
(strtotime($rates[0]["entry_date"]) - strtotime($this->help_date) > 86400);
$base_amount = $rates[0]["amount"];
$min = $max = $rates[0]["value"];
//we're going to do daily walkaround to get the MIN and MAX values to scale the graph...
reset($rates);
while($rate = current($rates))
{
if ($min > $rate["value"])
{
$min = $rate["value"];
}
if ($max < $rate["value"])
{
$max = $rate["value"];
}
next($rates);
}
if ($corr_needed)
{
if ($this->help_rate > $max)
{
$max = $this->help_rate;
}
if ($this->help_rate < $min)
{
$min = $this->help_rate;
}
}
//now we have the min & max value, we can compute the aspect ratios.
$rate_width = ($max - $min);
//draw the axis
//vertical axis first
$delta_x_val = $time_width_secs / $x_axis_count;
$delta_x_gr = $graph_width / $x_axis_count;
$td = 1;
for($i = $time_start, $j = $graph_x_start; $j <= $graph_x_start + $graph_width; $i+= $delta_x_val, $j+= $delta_x_gr)
{
ImageLine($image, $j, $graph_y_start, $j, $graph_y_start + $graph_height, $axis_color);
$td++;
if ($td == 2)
{
$amount = 20;
if ($j + $delta_x_gr > $graph_x_start + $graph_width)
{
$amount = 50;
}
if ($j == $graph_x_start)
{
$amount = 0;
}
ImageString($image, 1, $j - $amount, $graph_y_start + $graph_height + 5, Date("d.m.Y", $i), $text_color);
$td = 0;
}
}
//horizontal axis now
$delta_y_val = $rate_width / $x_axis_count;
$delta_y_gr = $graph_height / $y_axis_count;
for($i = $min, $j = $graph_y_start + $graph_height; $j >= $graph_y_start; $i+= $delta_y_val, $j-= $delta_y_gr)
{
ImageLine($image, $graph_x_start, $j, $graph_x_start + $graph_width, $j, $axis_color);
ImageString($image, 2, 4, $j - 5, sprintf("%.3f", $i), $text_color);
}
//get the X step
$X_step = ($graph_width / $time_width);
if (!$corr_needed)
{
$actual_Y = (($rates[0]["value"] - $min) * $graph_height) / ($rate_width);
$actual_X = $new_X = 0;
}
else
{
$rate = $this->help_rate;
$actual_Y = (($rate - $min) * $graph_height) / ($rate_width);
$actual_X = 0;
$amount = round_fine(((strtotime($rates[0]["entry_date"]) - $time_start) / 86400));
$new_X = $X_step * $amount;
}
imagesetthickness($image, 3);
reset($rates);
$last_date = "";
$decount = 0;
while($rate = current($rates))
{
if (!empty($last_date) && $decount == 0)
{
$t_now = strtotime($rate["entry_date"]);
$t_was = strtotime($last_date);
//how many days?
$decount = round_fine(($t_now - $t_was) / 86400);
//echo "D:[".$rate["entry_date"].",$last_date]".$decount."
";
}
$last_date = $rate["entry_date"];
$value = $rate["value"];
$new_Y = (($value - $min) * $graph_height) / ($rate_width);
if ($decount > 0) $decount--;
if ($decount == 0)
{
next($rates);
ImageLine($image, $graph_x_start + $actual_X,
$graph_y_start + $graph_height - $actual_Y,
$graph_x_start + $new_X,
$graph_y_start + $graph_height - $new_Y, $color);
$actual_X = $new_X;
$actual_Y = $new_Y;
}
$new_X += $X_step;
}
if (!empty($filename))
{
ImageJPEG($image, $filename);
}
else
{
ImageJPEG($image);
}
}
}
class CrossRateHistory
{
var $data;
var $data1;
var $data2;
var $help_rate_1;
var $help_rate_2;
var $help_rate;
var $help_date;
//first start date
function correctDates($c1, $c2, &$start_date, &$end_date)
{
$sql_qry = "SELECT
entry_date
FROM
tblMarketRates
WHERE
type = 'EXR'
AND
code_A = '$c1'
AND
code_B = '$c2'
AND
entry_date >= '$start_date'
ORDER BY
entry_date ASC
LIMIT 1";
$start_date = SQL_GetFieldValue($sql_qry);
$sql_qry = "SELECT
entry_date
FROM
tblMarketRates
WHERE
type = 'EXR'
AND
code_A = '$c1'
AND
code_B = '$c2'
AND
entry_date <= '$end_date'
ORDER BY
entry_date DESC
LIMIT 1";
$end_date = SQL_GetFieldValue($sql_qry);
}
function CrossRateHistory($currency_1, $currency_2, &$start_date, &$end_date)
{
$mr = new MarketRates();
$date = $mr->GetStartDate('EXR');
$max_date = $mr->GetMaxDate('EXR');
if (strtotime($start_date) < strtotime($date))
{
$period = strtotime($end_date) - strtotime($start_date);
$start_date = Date("Y-m-d", strtotime($date));
$end_date = Date("Y-m-d", strtotime($date) + $period);
}
if (strtotime($max_date) < strtotime($end_date))
{
$period = strtotime($end_date) - strtotime($start_date);
$end_date = Date("Y-m-d", strtotime($max_date));
$start_date = Date("Y-m-d", strtotime($max_date) - $period);
}
$this->correctDates($currency_1, $currency_2, $start_date, $end_date);
if ($currency_2 != "SKK")
{
$this->data1 = $mr->GetExchangeRateForTimePeriod($currency_1, "SKK", $start_date, $end_date);
$this->data2 = $mr->GetExchangeRateForTimePeriod($currency_2, "SKK", $start_date, $end_date);
$this->help_rate_1 = $mr->help_rate_1;
$this->help_rate_2 = $mr->help_rate_2;
$this->help_date = $mr->help_date;
$this->ComputeCrossRate();
}
else
{
$this->data = $mr->GetExchangeRateForTimePeriod($currency_1, "SKK", $start_date, $end_date);
$this->help_date = $mr->help_date;
$this->help_rate = $mr->help_rate;
}
}
function GetImageForExchangeRate($curr1, $curr2, $period_start, $period_end, $params = Array())
{
$width = $params["width"];
$height = $params["height"];
$x_axis_count = $params["x_axis_count"] + 1;
$y_axis_count = $params["y_axis_count"] + 1;
$filename = $params["filename"];
$graph_width = $width - 65;
$graph_x_start = 50;
$graph_height = $height - 20;
$graph_y_start = 5;
if(empty($filename))
{
Header("Content-type: image/jpeg");
}
$image = ImageCreate($width, $height);
//the colors
$bg_color = ImageColorAllocate ($image, 255, 255, 255);
$color = ImageColorAllocate ($image, 255, 100, 50);
$axis_color = ImageColorAllocate($image, 140, 140, 140);
$text_color = ImageColorAllocate($image, 0, 0, 0);
$time_start = strtotime($period_start);
$time_end = strtotime($period_end);
//now we have the width in days
$time_width = round_fine((($time_end - $time_start) / 86400));
$time_width_secs = $time_end - $time_start;
//get the rates info
$rates = $this->data;
$corr_needed = ($period_start != $rates[0]["entry_date"]) &&
(strtotime($rates[0]["entry_date"]) - strtotime($this->help_date) > 86400);
$base_amount = $rates[0]["amount_A"];
$min = $max = $rates[0]["amount_B"];
//we're going to do daily walkaround to get the MIN and MAX values to scale the graph...
reset($rates);
while($rate = current($rates))
{
if ($min > $rate["amount_B"])
{
$min = $rate["amount_B"];
}
if ($max < $rate["amount_B"])
{
$max = $rate["amount_B"];
}
next($rates);
}
if ($corr_needed)
{
if ($this->help_rate > $max)
{
$max = $this->help_rate;
}
if ($this->help_rate < $min)
{
$min = $this->help_rate;
}
}
//now we have the min & max value, we can compute the aspect ratios.
$rate_width = ($max - $min);
//draw the axis
//vertical axis first
$delta_x_val = $time_width_secs / $x_axis_count;
$delta_x_gr = $graph_width / $x_axis_count;
$td = 1;
for($i = $time_start, $j = $graph_x_start; $j <= $graph_x_start + $graph_width; $i+= $delta_x_val, $j+= $delta_x_gr)
{
ImageLine($image, $j, $graph_y_start, $j, $graph_y_start + $graph_height, $axis_color);
$td++;
if ($td == 2)
{
$amount = 20;
if ($j + $delta_x_gr > $graph_x_start + $graph_width)
{
$amount = 40;
}
if ($j == $graph_x_start)
{
$amount = 0;
}
ImageString($image, 1, $j - $amount, $graph_y_start + $graph_height + 5, Date("d.m.Y", $i), $text_color);
$td = 0;
}
}
//horizontal axis now
$delta_y_val = $rate_width / $x_axis_count;
$delta_y_gr = $graph_height / $y_axis_count;
for($i = $min, $j = $graph_y_start + $graph_height; $j >= $graph_y_start; $i+= $delta_y_val, $j-= $delta_y_gr)
{
ImageLine($image, $graph_x_start, $j, $graph_x_start + $graph_width, $j, $axis_color);
ImageString($image, 2, 4, $j - 5, sprintf("%.3f", $i), $text_color);
}
//get the X step
$X_step = ($graph_width / $time_width);
if (!$corr_needed)
{
$actual_Y = (($rates[0]["amount_B"] - $min) * $graph_height) / ($rate_width);
$actual_X = $new_X = 0;
}
else
{
$rate = $this->help_rate;
$actual_Y = (($rate - $min) * $graph_height) / ($rate_width);
$actual_X = 0;
$amount = round_fine(((strtotime($rates[0]["entry_date"]) - $time_start) / 86400));
$new_X = $X_step * $amount;
}
imagesetthickness($image, 3);
reset($rates);
$last_date = "";
$decount = 0;
while($rate = current($rates))
{
if (!empty($last_date) && $decount == 0)
{
$t_now = strtotime($rate["entry_date"]);
$t_was = strtotime($last_date);
//how many days?
$decount = round_fine(($t_now - $t_was) / 86400);
//echo "D:[".$rate["entry_date"].",$last_date]".$decount."
";
}
$last_date = $rate["entry_date"];
$value = $rate["amount_B"] / ($rate["amount_A"] / $base_amount);
$new_Y = (($value - $min) * $graph_height) / ($rate_width);
if ($decount > 0) $decount--;
if ($decount == 0)
{
next($rates);
ImageLine($image, $graph_x_start + $actual_X,
$graph_y_start + $graph_height - $actual_Y,
$graph_x_start + $new_X,
$graph_y_start + $graph_height - $new_Y, $color);
$actual_X = $new_X;
$actual_Y = $new_Y;
}
$new_X += $X_step;
}
if (!empty($filename))
{
ImageJPEG($image, $filename);
}
else
{
ImageJPEG($image);
}
}
function ComputeCrossRate()
{
if (!empty($this->help_rate_2))
{
$this->help_rate = (($this->help_rate_1["amount_B"] / $this->help_rate_1["amount_A"])
/
($this->help_rate_2["amount_B"] / $this->help_rate_2["amount_A"]));
}
$res_data = Array();
reset($this->data1);
reset($this->data2);
while($d2 = current($this->data2))
{
$tmp = current($this->data1);
$tmp["code_B"] = $d2["code_A"];
$tmp["amount_B"] = number_format(($tmp["amount_B"] / $tmp["amount_A"]) / ($d2["amount_B"] / $d2["amount_A"]), 3);
$tmp["amount_A"] = 1;
array_push($res_data, $tmp);
next($this->data1);
next($this->data2);
}
$this->data = $res_data;
}
function GetTable()
{
reset($this->data);
$base_amount = $this->data[0]["amount_A"];
$table_html = "";
$table_html .= "
| Dátum |
Množstvo |
Kurz |
";
$row = "odd";
while($data_row = current($this->data))
{
if ($row == "Even")
{
$row = "Odd";
}
else
{
$row = "Even";
}
$table_html .= "";
$date_formatted = Date("d.m.Y", strtotime($data_row["entry_date"]));
$amount = $base_amount;
$price = str_replace(".", ",", sprintf("%0.3f", ($data_row["amount_B"] / $data_row["amount_A"]) * $base_amount));
$table_html .= "| ".$date_formatted." | ";
$table_html .= "".$amount." | ";
$table_html .= "".$price." | ";
$table_html .= "
";
next($this->data);
}
$table_html .= "
";
return $table_html;
}
}
class CurrencyRateHistory extends CrossRateHistory
{
function CurrencyRateHistory($currency, &$start_date, &$end_date)
{
$mr = new MarketRates();
$date = $mr->GetStartDate('EXR');
$max_date = $mr->GetMaxDate('EXR');
if (strtotime($start_date) < strtotime($date))
{
$period = strtotime($end_date) - strtotime($start_date);
$start_date = Date("Y-m-d", strtotime($date));
$end_date = Date("Y-m-d", strtotime($date) + $period);
}
if (strtotime($max_date) < strtotime($end_date))
{
$period = strtotime($end_date) - strtotime($start_date);
$end_date = Date("Y-m-d", strtotime($max_date));
$start_date = Date("Y-m-d", strtotime($max_date) - $period);
}
$this->correctDates($currency, "SKK", $start_date, $end_date);
$this->data = $mr->GetExchangeRateForTimePeriod($currency, "SKK", $start_date, $end_date);
$this->help_rate = $mr->help_rate_1["amount_B"];
$this->help_date = $mr->help_date;
//$this->CrossRateHistory($currency, "SKK", $start_date, $end_date);
}
}
class MarketRates
{
var $help_rate_1;
var $help_rate_2;
var $help_date;
function MarketRates()
{
$this->help_rate_1 = Array();
$this->help_rate_2 = Array();
}
function GetExchangeRateForTimePeriod($currency_A, $currency_B, $period_start, $period_end)
{
$sql_qry = "SELECT
sum_A AS amount_A,
sum_B AS amount_B,
entry_date
FROM
tblMarketRates
WHERE
code_A = '$currency_A'
AND
code_B = '$currency_B'
AND
type = 'EXR'
AND
entry_date >= '$period_start'
AND
entry_date <= '$period_end'
ORDER BY
entry_date ASC
";
$direction_1 = SQL_GetQueryResults($sql_qry);
$help_date = SQL_GetFieldValue("SELECT
MAX(entry_date) as max_date
FROM
tblMarketRates
WHERE
code_A = '$currency_A'
AND
code_B = '$currency_B'
AND
entry_date < '".$direction_1[0]["entry_date"]."'
AND
type = 'EXR'"
);
$this->help_date = $help_date;
$help_rate = SQL_GetQueryResult("SELECT
sum_B AS amount_B,
sum_A AS amount_A
FROM
tblMarketRates
WHERE
code_A = '$currency_A'
AND
code_B = '$currency_B'
AND
entry_date = '".$this->help_date."'
AND
type = 'EXR'");
if (!empty($this->help_rate_1))
{
$this->help_rate_2 = $help_rate;
}
else
{
$this->help_rate_1 = $help_rate;
}
return $direction_1;
}
function GetStartDate($type) //type is 'EXR' or 'BRI'
{
$date = SQL_GetFieldValue("SELECT
MIN(entry_date)
FROM
tblMarketRates
WHERE
type='$type'");
return $date;
}
function GetMaxDate($type, $max_date = "") //type is 'EXR' or 'BRI'
{
if (!empty($max_date) && $max_date != 'total')
{
$max_subquery = " AND entry_date <= '$max_date'";
}
$date = SQL_GetFieldValue("SELECT
MAX(entry_date)
FROM
tblMarketRates
WHERE
type='$type'
$max_subquery
");
//if we have some dates beyond today, hide'em
if (strtotime($date) > strtotime(Date("Y-m-d")) && $max_date != 'total')
{
//and return last available date
return $this->GetMaxDate($type, Date("Y-m-d"));
}
return $date;
}
function GetNextDailyDate($date)
{
$date = SQL_GetFieldValue(
"SELECT
MIN(entry_date)
FROM
tblMarketRates
WHERE
type = 'EXR'
AND
entry_date >= '".$date."'
");
return $date;
}
function GetPrevDailyDate($date)
{
$date = SQL_GetFieldValue(
"SELECT
MAX(entry_date)
FROM
tblMarketRates
WHERE
type = 'EXR'
AND
entry_date <= '".$date."'
");
return $date;
}
function GetLastDate($date)
{
$date = SQL_GetFieldValue(
"SELECT
MAX(entry_date)
FROM
tblMarketRates
WHERE
type = 'EXR'
AND
entry_date <= '".$date."'
");
return $date;
}
function GetExchangeRateDeltaForCurrencies($currencies, &$date)
{
//we select the wanted date
//and another date, just before the wanted date
//so we can compute the interdaily delta
//first, get biggest date <= this date, so we take last existing date
//(for sundays etc)
$date = SQL_GetFieldValue(
"SELECT
entry_date
FROM
tblMarketRates
WHERE
code_A = '".$currencies[0]."'
AND
code_B = 'EUR'
AND
entry_date <= '".$date."'
ORDER BY
entry_date DESC
LIMIT
1");
//first, we need to get the just-before-date, for it is not intended
//to be day-before
$date_before = SQL_GetFieldValue(
"SELECT
entry_date
FROM
tblMarketRates
WHERE
code_A = '".$currencies[0]."'
AND
code_B = 'EUR'
AND
entry_date < '".$date."'
ORDER BY
entry_date DESC
LIMIT
1");
$sql_qry = "SELECT
entry_date,
code_A,
sum_A,
sum_B
FROM
tblMarketRates
WHERE
entry_date <= '$date'
AND
entry_date >= '$date_before'
AND
code_A IN ('".Implode("','", $currencies)."')
AND
code_B = 'EUR'
AND
type = 'EXR'
ORDER BY
code_A,
entry_date DESC";
$rows = SQL_GetQueryResults($sql_qry);
$result = Array();
reset($rows);
while($row = current($rows))
{
//first set info from the first row
$result[$row["code_A"]]["sum_A"] = $row["sum_A"];
$result[$row["code_A"]]["sum_B"] = $row["sum_B"];
$tmp = $row["sum_A"];
next($rows);
$row = current($rows);
$result[$row["code_A"]]["delta"] = $tmp - $row["sum_A"];
next($rows);
}
return $result;
}
function GetExchangeRateForCurrency($currency, $date)
{
$sql_qry = "SELECT
code_B AS currency_B,
sum_A AS amount_A
sum_B AS amount_B
FROM
tblMarketRates
WHERE
entry_date = '$date'
AND
code_A = '$currency'";
return SQL_GetQueryResults($sql_qry);
}
function GetDailyRates($date, $dest_currency = "EUR")
{
global $currencies;
$codes = array_keys($currencies);
$where = "('".Implode("', '", $codes)."')";
/*
//first, get biggest date <= this date, so we take last existing date
$sql_qry = "SELECT
MAX(entry_date)
FROM
tblMarketRates
WHERE
entry_date >= '$date'
AND
code_B = '$dest_currency'
AND
code_A IN $where
AND
code_A <> '$dest_currency'
ORDER BY
entry_date DESC
LIMIT 1";
$date = SQL_GetFieldValue($sql_qry);
*/
$sql_qry = "SELECT
code_A AS currency,
sum_A AS amount_A,
sum_B AS amount_B
FROM
tblMarketRates
WHERE
entry_date = '$date'
AND
code_B = '$dest_currency'
AND
code_A IN $where
AND
code_A <> '$dest_currency'";
return SQL_GetQueryResults($sql_qry);
}
}
?>
');
define (LS_Etarget, 'http://search.etargetnet.com/generic/catalog/catalog.php?c=1&blank=1&ref=795&q=&keywords=');
define (LS_New, "Nové");
$local_keywords=Array(1=>"dovolenka",2=>"organizácie",3=>"zdravie",
4=>"počítače",5=>"priemysel,poľnohospodárstvo",6=>"spravodajstvo",
7=>"kurzy,školy",8=>"ekonomika",9=>"kultúra,divadlá",10=>"veľkoobchod",
11=>"hokej",12=>"politika",13=>"ekológia",14=>"chovateľstvo",
16=>"stravovanie",17=>"byt");
?>