<?php
/**
 * @author     Chajak
 */
class Slozenka{
    //kde se nachazi obrazek se slozenkou (relativne k tomuto souboru)
    const IMG_PATH = "./slozenka.gif";
    
    //velikost pisma (1-5)
    const FONT_SIZE = 5;
    
    //nemenit
    private $image = FALSE;
    private $zobraz = TRUE;
    private $pripona;
    private $barva;
    
    private $predcisli;
    private $ucet;
    private $kod;

    private $jmeno;
    private $prijmeni;
    private $ulice;
    private $mesto;
    private $psc;
    

    private $exponent = array(0 => array(""), 3 => array("tisic", "tisice", "tisic"), 6 => array("milion", "miliony", "milionu"));
    private $jednotky = array(0 => "nula", "jedna", "dva", "tri", "ctyri", "pet", "sest", "sedm", "osm", "devet");
    private $stovky = array(0 => "sto", "ste", "sta", "set");

    //rozměry polí pro zapisování    
    private $pole_castka = Array(728, 47, 958, 81);
    private $pole_castka_m = Array(50, 202, 250, 240);
    
    private $pole_halire = Array(962, 47, 1016, 81);
    private $pole_halire_m = Array(286, 202, 344, 240);
    
    private $pole_predcisli = Array(726, 95, 900, 133);
    
    private $pole_ucet = Array(903, 95, 1193, 133);
    private $pole_ucet_m = Array(75, 405, 300, 433);
    
    private $pole_kod = Array(726, 146, 842, 184);
    
    private $pole_vs = Array(903, 146, 1193, 184);
    private $pole_vs_m = Array(75, 434, 175, 460);
    
    private $pole_ss = Array(903, 193, 1193, 232);
    private $pole_ss_m = Array(75, 461, 175, 487);
    
    private $pole_ks = Array(726, 194, 842, 232);
    
    private $pole_jmeno = Array(726, 277, 1222, 315);
    private $pole_prijmeni = Array(726, 320, 1222, 358);
    
    private $pole_adresa_1 = Array(726, 361, 1222, 399);
    private $pole_adresa_1_m = Array(10, 497, 365, 523);
    
    private $pole_adresa_2 = Array(726, 402, 1222, 440);
    private $pole_adresa_2_m = Array(10, 526, 365, 552);
    
    private $pole_adresa_3 = Array(726, 443, 1222, 481);
    private $pole_adresa_3_m = Array(10, 553, 365, 579);
    
    private $pole_zprava_1 = Array(369, 320, 721, 358);
    private $pole_zprava_2 = Array(369, 362, 721, 400);
    
    private $pole_majitel_1 = Array(367, 208, 715, 240);
    private $pole_majitel_2 = Array(367, 240, 715, 272);
    private $pole_majitel_3 = Array(367, 272, 715, 304);
    
    private $pole_majitel_1_m = Array(10, 308, 358, 340);
    private $pole_majitel_2_m = Array(10, 340, 358, 372);
    private $pole_majitel_3_m = Array(10, 372, 358, 404);
    
    private $pole_slovy_1 = Array(10, 245, 358, 273);
    private $pole_slovy_2 = Array(10, 273, 270, 302);
    
    //velikost polí pro zapisování
    private $delka_castka = 8;
    private $delka_halire = 2;
    private $delka_predcisli = 6;
    private $delka_ucet = 10;
    private $delka_kod = 4;
    private $delka_vs = 10;
    private $delka_ss = 10;
    private $delka_ks = 4;
    private $delka_jmeno = 17;
    private $delka_prijmeni = 17;
    private $delka_adresa_1 = 17;
    private $delka_adresa_2 = 17;
    private $delka_adresa_3 = 17;
    private $delka_adresa_1_m = 34;
    private $delka_adresa_2_m = 34;
    private $delka_adresa_3_m = 34;
    private $delka_zprava_1 = 12;
    private $delka_zprava_2 = 12;
    private $delka_majitel_1 = 24;
    private $delka_majitel_2 = 24;
    private $delka_majitel_3 = 24;
    private $delka_slovy_1 = 34;
    private $delka_slovy_2 = 34; 
    
    public function __construct($another_path = ""){
        //nechce vlastni obrazek?
        if(!empty($another_path))
            $obrazek = $another_path;
        else
            $obrazek = Slozenka::IMG_PATH;
    
        //existuje vubec soubor? Jestli ne, vypis chybu a nepokracuj
        if(!file_exists($obrazek)){
            echo "Soubor [".$obrazek."] neexistuje.";
            return false;
        }

        //urcime priponu souboru, kvuli funkci, kterou pouzit
        $pripona = strtolower(pathinfo($obrazek, PATHINFO_EXTENSION));
        switch($pripona){
            case "gif":
                $this->image = imagecreatefromgif($obrazek);
                $this->pripona = "gif";     
            break;
            case "jpg":
            case "jpeg":
                $this->image = imagecreatefromjpeg($obrazek);
                $this->pripona = "jpeg";     
            break;
            case "png":
                $this->image = imagecreatefrompng($obrazek);
                $this->pripona = "png";    
            break;
        }
        
        if(!$this->image){
            echo "Nepodarilo se vytvorit obrazek ze souboru.";
            return false;
        }
        
        //zaklad je cerna barva (mozno zmenit funkci)
        $this->nastav_barvu(0, 0, 0);
        
        return true;                
    }
    
    public function nastav_barvu($r, $g, $B){
        if(!$this->image)
            return $this->error_neni_nacten();
            
        $this->barva = imagecolorallocate($this->image, $r, $g, $B);
    }
    
    private function error_neni_nacten(){
        echo "Obrazek neni nacten.";
        $this->zobraz = FALSE;
        return false;
    }
    
    private function error_neni_cislo($cislo){
        echo "Hodnota [".$cislo."] neni cislo.";
        $this->zobraz = FALSE;
        return false;
    }
    
    private function error_moc_dlouhe($cislo, $delka){
        echo "Cislo nebo text [".$cislo."] je moc dlouhe. [".strlen($cislo)." > ".$delka."]";
        $this->zobraz = FALSE;
        return false;    
    }
    
    private function test_cisla($cislo, $delka){
        if(!is_numeric($cislo))
            return $this->error_neni_cislo($cislo);
            
        if(strlen($cislo) > $delka)
            return $this->error_moc_dlouhe($cislo, $delka);
            
        return true;    
    }
    
    private function test_textu($text, $delka){    
        if(strlen($text) > $delka)
            return $this->error_moc_dlouhe($text, $delka);
            
        return true;
    }
    
    /**
    * Using edited code from:
    *             
    * Numbers_Words
    *
    * PHP version 4
    *
    * Copyright (c) 1997-2006 The PHP Group
    *
    * This source file is subject to version 3.0 of the PHP license,
    * that is bundled with this package in the file LICENSE, and is
    * available at through the world-wide-web at
    * http://www.php.net/license/3_0.txt.
    * If you did not receive a copy of the PHP license and are unable to
    * obtain it through the world-wide-web, please send a note to
    * license@php.net so we can mail you a copy immediately.
    *
    * @category Numbers
    * @package  Numbers_Words
    * @author   Petr 'PePa' Pavel <petr.pavel@pepa.info>
    * @license  PHP 3.0 http://www.php.net/license/3_0.txt
    * @version  CVS: $Id: lang.cs.php 269648 2008-11-25 02:45:52Z clockwerx $
    * @link     http://pear.php.net/package/Numbers_Words
    * @editor        Chajak    
    */
    
    private function cislo_na_slova($num, $power = 0, $powsuffix = ""){
        $ret = "";
        $num = trim($num);
        $num = preg_replace("/^0+/", "", $num);
        
        if(strlen($num) > 3){
            $curp = $maxp = strlen($num)-1;
            for($p = $maxp; $p > 0; --$p){
                if(isset($this->exponent[$p])){
                    $snum = substr($num, $maxp - $curp, $curp - $p + 1);
                    $snum = preg_replace("/^0+/", "", $snum);
                    if($snum !== ""){
                        $cursuffix = $this->exponent[$power][count($this->exponent[$power])-1];
                        if($powsuffix != "")
                            $cursuffix .= " ".$powsuffix;
                        $ret .= $this->cislo_na_slova($snum, $p, $cursuffix);
                    }
                    $curp = $p - 1;
                    continue;
                }
            }
            $num = substr($num, $maxp - $curp, $curp - $p + 1);
            if($num == 0)
                return $ret;
        }
        elseif($num == 0 || $num == "")
            return " ".$this->jednotky[0];
    
        $h = $t = $d = 0;
    
        switch(strlen($num)){
            case 3: $h = (int)substr($num, -3, 1);
            case 2: $t = (int)substr($num, -2, 1);
            case 1: $d = (int)substr($num, -1, 1); break;
            case 0: return; break;
        }
    
        if($h){
            if($h == 1)
                $ret .= " ".$this->stovky[0];
            elseif($h == 2)
                $ret .= " dve"." ".$this->stovky[1];
            elseif(($h > 1) && ($h < 5))
                $ret .= " ".$this->jednotky[$h]." ".$this->stovky[2];
            else
                $ret .= " ".$this->jednotky[$h]." ".$this->stovky[3];
        }

        switch($t){
            case 2:    case 3: case 4: $ret .= " ".$this->jednotky[$t]."cet"; break;
            case 5: $ret .= " padesat"; break;
            case 6: $ret .= " sedesat"; break;
            case 7: $ret .= " sedmdesat"; break;
            case 8: $ret .= " osmdesat"; break;
            case 9: $ret .= " devadesat"; break;
            case 1:
                switch ($d){
                    case 0: $ret .= " deset"; break;
                    case 1: $ret .= " jedenact"; break;
                    case 4: $ret .= " ctrnact"; break;
                    case 5: $ret .= " patnact"; break;
                    case 9: $ret .= " devatenact"; break;
                    case 2: case 3: case 6: case 7: case 8: $ret .= " ".$this->jednotky[$d]."nact"; break;
                }
            break;
        }
    
        if(($t != 1) && ($d > 0) && (($power == 0) || ($num > 1)))
            $ret .= " ".$this->jednotky[$d];
    
        if($power > 0){
            if(isset($this->exponent[$power]))
                $lev = $this->exponent[$power];

            if(!isset($lev) || !is_array($lev))
                return null;
        
            if($num == 1)
                $idx = 0;
            elseif((($num > 1) && ($num < 5)) || ((intval($t.$d) > 1) && (intval($t.$d) < 5)))
                $idx = 1;
            else
                $idx = 2;
    
            $ret .= " ".$lev[$idx];
        }
    
        if($powsuffix != "")
            $ret .= " ".$powsuffix;
        
        return $ret;
    }
    
    
    private function vepis_text($pole_kam, $text, $max_delka, $reverse = FALSE){
        if(!$this->image)
            return $this->error_neni_nacten();
        
        $text = (String)$text;
        
        $vyska_pole = $pole_kam[3] - $pole_kam[1];
        $sirka_pole = $pole_kam[2] - $pole_kam[0];
        
        $y_pismena = $pole_kam[1] + $vyska_pole / 2 - Slozenka::FONT_SIZE;
        $x_posun = $sirka_pole / $max_delka;

        if($reverse){
            $x_pismena = $pole_kam[2] - $x_posun / 1.7;
            for($i = strlen($text) - 1; $i >= 0; $i--){
                imagestring($this->image, Slozenka::FONT_SIZE, $x_pismena, $y_pismena, $text{$i}, $this->barva);
                $x_pismena -= $x_posun;
            }
        }    
        else{
            $x_pismena = $pole_kam[0] + $x_posun / 2.7;
            for($i = 0; $i < strlen($text); $i++){
                imagestring($this->image, Slozenka::FONT_SIZE, $x_pismena, $y_pismena, $text{$i}, $this->barva);
                $x_pismena += $x_posun;
            }
        }
        
        return true;                    
    }
    
    /* START - FUNKCE K UZITI */
    public function nacti($pole){
        if(!is_array($pole))
            return false;
        
        foreach($pole as $key => $val){
            $method_name = "vepis_".$key;
            if(method_exists(__CLASS__, $method_name)){
                $this->{$method_name}($val);    
            }
        }
    }
    
    public function vepis_castka($castka, $male = TRUE){
        if(!$this->test_cisla($castka, $this->delka_castka))
            return false;
        
        $navic = "";
        for($i = strlen($castka); $i < $this->delka_castka; $i++){
            $navic .= "=";    
        }
        
        $this->castka = $castka;    
        $this->vepis_text($this->pole_castka, $navic.$castka, $this->delka_castka, TRUE);
    
        if($male)
            $this->vepis_text($this->pole_castka_m, "=".$navic.$castka, $this->delka_castka, TRUE);    
    }
    
    public function vepis_halire($castka, $male = TRUE){
        if(!$this->test_cisla($castka, $this->delka_halire))
            return false;
            
        $this->vepis_text($this->pole_halire, $castka, $this->delka_halire, TRUE);
        if($male)
            $this->vepis_text($this->pole_halire_m, $castka, $this->delka_halire, TRUE);
    }
    
    public function vepis_predcisli($cislo){
        if(!$this->test_cisla($cislo, $this->delka_predcisli))
            return false;
        
        $this->predcisli = $cislo;    
        $this->vepis_text($this->pole_predcisli, $cislo, $this->delka_predcisli, TRUE);
    }
    
    public function vepis_ucet($cislo){
        if(!$this->test_cisla($cislo, $this->delka_ucet))
            return false;
        
        $this->ucet = $cislo;    
        $this->vepis_text($this->pole_ucet, $cislo, $this->delka_ucet, TRUE);
    }
    
    public function vepis_kod($cislo){
        if(!$this->test_cisla($cislo, $this->delka_kod))
            return false;
        
        $this->kod = $cislo;    
        $this->vepis_text($this->pole_kod, $cislo, $this->delka_kod, TRUE);
    }
    
    public function vepis_vs($cislo, $male = TRUE){
        if(!$this->test_cisla($cislo, $this->delka_vs))
            return false;
            
        $this->vepis_text($this->pole_vs, $cislo, $this->delka_vs, TRUE);
        if($male)
            $this->vepis_text($this->pole_vs_m, $cislo, $this->delka_vs, FALSE);
    }
    
    public function vepis_ss($cislo, $male = TRUE){
        if(!$this->test_cisla($cislo, $this->delka_ss))
            return false;
            
        $this->vepis_text($this->pole_ss, $cislo, $this->delka_ss, TRUE);
        if($male)
            $this->vepis_text($this->pole_ss_m, $cislo, $this->delka_ss, FALSE);
    }
    
    public function vepis_ks($cislo){
        if(!$this->test_cisla($cislo, $this->delka_ks))
            return false;
            
        $this->vepis_text($this->pole_ks, $cislo, $this->delka_ks, TRUE);
    }
    
    public function vepis_jmeno($text){
        if(!$this->test_textu($text, $this->delka_jmeno))
            return false;
        
        $this->jmeno = $text;
        $this->vepis_text($this->pole_jmeno, $text, $this->delka_jmeno, FALSE);
    }
    
    public function vepis_prijmeni($text){
        if(!$this->test_textu($text, $this->delka_prijmeni))
            return false;
        
        $this->prijmeni = $text;
        $this->vepis_text($this->pole_prijmeni, $text, $this->delka_prijmeni, FALSE);
    }
    
    public function vepis_ulice($text){
        if(!$this->test_textu($text, $this->delka_adresa_1))
            return false;
        
        $this->ulice = $text;
        $this->vepis_text($this->pole_adresa_1, $text, $this->delka_adresa_1, FALSE);
    }
    
    public function vepis_mesto($text){
        if(!$this->test_textu($text, $this->delka_adresa_2))
            return false;
        
        $this->mesto = $text;
        $this->vepis_text($this->pole_adresa_2, $text, $this->delka_adresa_2, FALSE);
    }
    
    public function vepis_psc($text){
        if(!$this->test_textu($text, $this->delka_adresa_3))
            return false;
        
        $this->psc = $text;
        $this->vepis_text($this->pole_adresa_3, $text, $this->delka_adresa_3, FALSE);
    }
    
    public function vepis_zprava($text){
        if(!$this->test_textu($text, $this->delka_zprava_1 + $this->delka_zprava_2))
            return false;
            
        if(strlen($text) > $this->delka_zprava_1){
            $this->vepis_text($this->pole_zprava_1, substr($text, 0, $this->delka_zprava_1), $this->delka_zprava_1, FALSE);
            $this->vepis_text($this->pole_zprava_2, substr($text, $this->delka_zprava_1), $this->delka_zprava_2, FALSE);
        }
        else{
            $this->vepis_text($this->pole_zprava_1, $text, $this->delka_zprava_1, FALSE);
        }
    }
    
    public function vepis_majitel($text){
        if(!$this->test_textu($text, $this->delka_majitel_1 + $this->delka_majitel_2 + $this->delka_majitel_3 + 2))
            return false;
    
        $pole_textu = explode(";", $text);
        $i = 1;
        foreach($pole_textu as $jednotlive){
            $delka_t = "delka_majitel_".$i;
            $pole_t = "pole_majitel_".$i;
            
            if(!$this->test_textu($jednotlive, $this->{$delka_t}))
                return false;

            $this->vepis_text($this->{$pole_t}, $jednotlive, $this->{$delka_t}, FALSE);
            $this->vepis_text($this->{$pole_t."_m"}, $jednotlive, $this->{$delka_t}, FALSE);    
            $i++;
        }
    }
    
    public function vepis_adresa_mala(){
        if(!$this->image)
            return $this->error_neni_nacten();
        
        $this->vepis_text($this->pole_adresa_1_m, $this->jmeno." ".$this->prijmeni, $this->delka_adresa_1_m, FALSE);
        $this->vepis_text($this->pole_adresa_2_m, $this->ulice, $this->delka_adresa_2_m, FALSE);
        $this->vepis_text($this->pole_adresa_3_m, $this->mesto." ".$this->psc, $this->delka_adresa_3_m, FALSE);
    }
    
    public function vepis_ucet_maly(){
        if(!$this->image)
            return $this->error_neni_nacten();
        
        if(!empty($this->predcisli))
            $text = $this->predcisli."-";
        
        $text .= $this->ucet."/".$this->kod;
        
        $this->vepis_text($this->pole_ucet_m, $text, $this->delka_predcisli + $this->delka_ucet + $this->delka_kod + 2, FALSE);
    }
    
    public function vepis_slovy(){
        if(!$this->image)
            return $this->error_neni_nacten();
            
        $slovy = "=".trim($this->cislo_na_slova($this->castka));
        
        if(!$this->test_textu($slovy, $this->delka_slovy_1 + $this->delka_slovy_2))
            return false;
        
        $pole_slov = explode(" ", $slovy);
        $druhy = FALSE;
        $len = 0;
        $text_1 = "";
        $text_2 = "";
        foreach($pole_slov as $slovo){
            if($len + strlen($slovo) <= $this->delka_slovy_1 AND !$druhy){
                $text_1 .= $slovo." ";
                $len += strlen($slovo)+1;
            }
            else{
          $druhy = TRUE;
            }
            
            if($druhy){
                $text_2 .= $slovo." ";    
            }
        }
        $this->vepis_text($this->pole_slovy_1, trim($text_1), $this->delka_slovy_1, FALSE);
        $this->vepis_text($this->pole_slovy_2, trim($text_2), $this->delka_slovy_2, FALSE);    
    }
    /* KONEC - FUNKCE K UZITI */

    public function zobraz(){
        if(!$this->image)
            return $this->error_neni_nacten();
        
        if($this->zobraz){
            header("Content-Type: image/".$this->pripona);
            switch($this->pripona){
                case "gif":
                    imagegif($this->image);     
                break;
                case "jpeg":
                    imagejpeg($this->image);     
                break;
                case "png":
                    imagepng($this->image);    
                break;
            }
            
            imagedestroy($this->image);
        }
    }
}
?>

$a = new Slozenka();
$a->vepis_castka(250);
//00 totiz neni cislo
$a->vepis_halire("00");
$a->vepis_predcisli(111111);
$a->vepis_ucet(1234567890);
//0300 totiz neni cislo
$a->vepis_kod("0300");
$a->vepis_ss(1234567890);
$a->vepis_vs(9876543210);
//0358totiz neni cislo
$a->vepis_ks("0358");
$a->vepis_jmeno("Jan");
$a->vepis_prijmeni("Novak");
$a->vepis_ulice("Zitna 3");
$a->vepis_mesto("Praha");
$a->vepis_psc(16000);
$a->vepis_zprava("Zde zprava pro prijemce");
$a->vepis_majitel("Petr Stastny;Jecna 2;Praha 16000");
$a->vepis_ucet_maly();
$a->vepis_adresa_mala();
$a->vepis_slovy();
$a->zobraz();

$pole = Array(
    "castka" => 250,
    "halire" => "00",
    "predcisli" => 111111,
    "ucet" => 1234567890,
    "kod" => "0300",
    "ss" => 1234567890,
    "vs" => 9876543210,
    "ks" => "0358",
    "jmeno" => "Jan",
    "prijmeni" => "Novak",
    "ulice" => "Zitna 3",
    "mesto" => "Praha",
    "psc" => 16000,
    "zprava" => "Zde zprava pro prijemce",
    "majitel" => "Petr Stastny;Jecna 2;Praha 16000",
    "ucet_maly" => "",
    "adresa_mala" => "",
    "slovy" => ""
);

$a = new Slozenka();
$a->nacti($pole);
$a->zobraz();