1
<?php
2
/**
3
 *   Funkcje pliku:
4
 *   Spell book - activation and deactivafion of spells and echance items
5
 *
6
 *   @name                 : czary.php                            
7
 *   @copyright            : (C) 2004,2005,2006 Vallheru Team based on Gamers-Fusion ver 2.5
8
 *   @author               : thindil <thindil@users.sourceforge.net>
9
 *   @version              : 1.3
10
 *   @since                : 30.10.2006
11
 *
12
 */
13
14
//
15
//
16
//       This program is free software; you can redistribute it and/or modify
17
//   it under the terms of the GNU General Public License as published by
18
//   the Free Software Foundation; either version 2 of the License, or
19
//   (at your option) any later version.
20
//
21
//   This program is distributed in the hope that it will be useful,
22
//   but WITHOUT ANY WARRANTY; without even the implied warranty of
23
//   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
24
//   GNU General Public License for more details.
25
//
26
//   You should have received a copy of the GNU General Public License
27
//   along with this program; if not, write to the Free Software
28
//   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
29
//
30
// $Id: czary.php 797 2006-10-30 14:40:25Z thindil $
31
32
$title = "Księga czarów"; 
33
require_once("includes/head.php");
34
require_once("includes/checkexp.php");
35
36
/**
37
* Get the localization for game
38
*/
39
require_once("languages/".$player -> lang."/czary.php");
40
if ($player -> clas != 'Mag')
41
   {
42
       error (YOU_ARE_NOT_MAGICIAN);
43
   }
44
/**
45
* Assign variable to template
46
*/
47
$smarty -> assign("Message", '');
48
49
$czarb = $db -> Execute("SELECT * FROM czary WHERE gracz=".$player -> id." AND status='E' AND typ='B'");
50
if ($czarb -> fields['id']) 
51
{
52
    $smarty -> assign ("Battle", B_SPELL.$czarb -> fields['nazwa']." (+".$czarb -> fields['obr']." x ".B_DAMAGE.") | <a href=czary.php?deakt=".$czarb -> fields['id'].">".S_DEACTIV."</a><br />");
53
} 
54
    else 
55
{
56
    $smarty -> assign ("Battle", B_SPELL.S_NONE."<br />");
57
}
58
$czarb -> Close();
59
60
$czaro = $db -> Execute("SELECT * FROM czary WHERE gracz=".$player -> id." AND status='E' AND typ='O'");
61
if ($czaro -> fields['id']) 
62
{
63
    $smarty -> assign ("Defence", D_SPELL.$czaro -> fields['nazwa']." (+".$czaro -> fields['obr']." x ".D_DEFENSE.") | <a href=czary.php?deakt=".$czaro -> fields['id'].">".S_DEACTIV."</a><br />");
64
} 
65
    else 
66
{
67
    $smarty -> assign ("Defence", D_SPELL.S_NONE."<br />");
68
}
69
$czaro -> Close();
70
71
if (isset($_GET['deakt'])) 
72
{
73
    if (!ereg("^[1-9][0-9]*$", $_GET['deakt'])) 
74
    {
75
        error (ERROR);
76
    }
77
    $czary1 = $db -> Execute("SELECT * FROM czary WHERE id=".$_GET['deakt']);
78
    if (!$czary1 -> fields['id']) 
79
    {
80
        error (NO_SPELL);
81
    }
82
83
    if ($player -> id != $czary1 -> fields['gracz']) 
84
    {
85
        error (NOT_YOUR);
86
    }
87
    $db -> Execute("UPDATE czary SET status='U' WHERE id=".$czary1 -> fields['id']);
88
    $czary1 -> Close();
89
}
90
91
$arrname1 = array();
92
$arrpower1 = array();
93
$arrid1 = array();
94
$i = 0;
95
$czary = $db -> Execute("SELECT * FROM czary WHERE gracz=".$player -> id." AND status='U' AND typ='B'");
96
while (!$czary -> EOF) 
97
{
98
    $arrname1[$i] = $czary -> fields['nazwa'];
99
    $arrpower1[$i] = $czary -> fields['obr'];
100
    $arrid1[$i] = $czary -> fields['id'];
101
    $czary -> MoveNext();
102
    $i = $i + 1;
103
}
104
$czary -> Close();
105
106
$arrname2 = array();
107
$arrpower2 = array();
108
$arrid2 = array();
109
$i = 0;
110
$czaryo = $db -> Execute("SELECT * FROM czary WHERE gracz=".$player -> id." AND status='U' AND typ='O'");
111
while (!$czaryo -> EOF) 
112
{
113
    $arrname2[$i] = $czaryo -> fields['nazwa'];
114
    $arrpower2[$i] = $czaryo -> fields['obr'];
115
    $arrid2[$i] = $czaryo -> fields['id'];
116
    $czaryo -> MoveNext();
117
    $i = $i + 1;
118
}
119
$czaryo -> Close();
120
121
122
$arrname3 = array();
123
$arrefect = array();
124
$arrid3 = array();
125
$i = 0;
126
$czaryu = $db -> Execute("SELECT * FROM czary WHERE gracz=".$player -> id." AND typ='U'");
127
while (!$czaryu -> EOF) 
128
{
129
    if ($czaryu -> fields['nazwa'] == E_SPELL1) 
130
    {
131
        $arrefect[$i] = S_EFECT1;
132
    }
133
    if ($czaryu -> fields['nazwa'] == E_SPELL2) 
134
    {
135
        $arrefect[$i] = S_EFECT2;
136
    }
137
    if ($czaryu -> fields['nazwa'] == E_SPELL3) 
138
    {
139
        $arrefect[$i] = S_EFECT3;
140
    }
141
    $arrname3[$i] = $czaryu -> fields['nazwa'];
142
    $arrid3[$i] = $czaryu -> fields['id'];
143
    $czaryu -> MoveNext();
144
    $i = $i + 1;
145
}
146
$czaryu -> Close();
147
148
/**
149
* Enchace items
150
*/
151
if (isset($_GET['cast'])) 
152
{
153
    if (!ereg("^[1-9][0-9]*$", $_GET['cast'])) 
154
    {
155
        error (ERROR);
156
    }
157
    $czary = $db -> Execute("SELECT * FROM czary WHERE id=".$_GET['cast']);
158
    if (!$czary -> fields['id']) 
159
    {
160
        error (NO_SPELL);
161
    }
162
    if ($player -> id != $czary -> fields['gracz']) 
163
    {
164
        error (NOT_YOUR);
165
    }
166
    if ($player -> level < $czary -> fields['poziom']) 
167
    {
168
        error (TO_LOW_L);
169
    }
170
    if ($player -> mana < $czary -> fields['poziom']) 
171
    {
172
        error (NO_MANA);
173
    }
174
    if ($player -> clas != 'Mag') 
175
    {
176
        error (YOU_ARE_NOT_MAGICIAN);
177
    }
178
179
    $arriname = array();
180
    $arriamount = array();
181
    $arriid = array();
182
    $i = 0;
183
    $arritem = $db -> Execute("SELECT `name`, `id`, `amount` FROM `equipment` WHERE `owner`=".$player -> id." AND `status`='U' AND `magic`='N' AND `type`!='I'");
184
    while (!$arritem -> EOF) 
185
    {
186
        $arriname[$i] = $arritem -> fields['name'];
187
        $arriamount[$i] = $arritem -> fields['amount'];
188
        $arriid[$i] = $arritem -> fields['id'];
189
        $arritem -> MoveNext();
190
        $i = $i + 1;
191
    }
192
    $arritem -> Close();
193
    if (isset($_GET['step']) && $_GET['step'] == 'items') 
194
    {
195
        if (!isset($_POST['item']) || !ereg("^[1-9][0-9]*$", $_POST['item'])) 
196
        {
197
            error (ERROR);
198
        }
199
        $arritem = $db -> Execute("SELECT * FROM `equipment` WHERE id=".$_POST['item']);
200
        $arrPrefixname = array(I_DRAGON, I_DRAGON2, I_DRAGON3, I_ELVES, I_ELVES2, I_ELVES3, I_DWARVES, I_DWARVES2, I_DWARVES3);
201
        $arrSurfixname = array(I_COPPER, I_BRONZE, I_BRASS, I_IRON, I_STEEL, I_HAZEL, I_YEW, I_ELM, I_HARDER, I_COMPOSITE);
202
        $strName = $arritem -> fields['name'];
203
        foreach ($arrPrefixname as $strPrefixname)
204
        {
205
            $strName = str_replace($strPrefixname, "", $strName);
206
        }
207
        foreach ($arrSurfixname as $strSurfixname)
208
        {
209
            $strName = str_replace($strSurfixname, "", $strName);
210
        }
211
        if ($arritem -> fields['type'] != 'R' && $arritem -> fields['type'] != 'B')
212
        {
213
            $strName = $strName.I_COPPER;
214
            $objBonus = $db -> Execute("SELECT `power`, `maxwt`, `szyb`, `zr` FROM `equipment` WHERE `owner`=0 AND `name`='".$strName."'");
215
        }
216
            else
217
        {
218
            if ($arritem -> fields['type'] == 'B')
219
            {
220
                $strName = $strName.I_HAZEL;
221
            }
222
            $objBonus = $db -> Execute("SELECT `power`, `maxwt`, `szyb`, `zr` FROM `bows` WHERE `name`='".$strName."'");
223
        }
224
        if (!$arritem -> fields['id']) 
225
        {
226
            error (NO_ITEM);
227
        }
228
        if ($arritem -> fields['owner'] != $player -> id) 
229
        {
230
            error (NOT_YOUR);
231
        }
232
        if ($arritem -> fields['magic'] == 'Y') 
233
        {
234
            error (IS_MAGIC);
235
        }
236
        $arrspell = $db -> Execute("SELECT nazwa, poziom FROM czary WHERE nazwa='".$_POST['spell']."' AND gracz=".$player -> id);
237
        if ($player -> energy < $arrspell -> fields['poziom']) 
238
        {
239
            error (NO_ENERGY);
240
        }
241
        $arrType1 = array('W', 'H', 'B');
242
        $arrType2 = array('A', 'S');
243
        $arrType3 = array('L', 'R');
244
        if (in_array($arritem -> fields['type'], $arrType1)) 
245
        {
246
            $name = "Magiczny ".$arritem -> fields['name'];
247
        } 
248
            elseif (in_array($arritem -> fields['type'], $arrType2)) 
249
        {
250
            $name = "Magiczna ".$arritem -> fields['name'];
251
        } 
252
            elseif (in_array($arritem -> fields['type'], $arrType3)) 
253
        {
254
            $name = "Magiczne ".$arritem -> fields['name'];
255
        } 
256
            else 
257
        {
258
            error (NO_ENCHANCE);
259
        }
260
261
        /**
262
         * Add bless
263
         */
264
        $objBless = $db -> Execute("SELECT `bless`, `blessval` FROM `players` WHERE `id`=".$player -> id);
265
        if ($objBless -> fields['bless'] == 'cast')
266
        {
267
            $player -> magic = $player -> magic + $objBless -> fields['blessval'];
268
            $db -> Execute("UPDATE `players` SET `bless`='', `blessval`=0 WHERE `id`=".$player -> id);
269
        }
270
        $objBless -> Close();
271
272
        $chance = ($player -> magic - $arritem -> fields['minlev'] - $arrspell -> fields['poziom'] + rand(1,100));
273
        $bonus = ceil($player -> magic / $arrspell -> fields['poziom']);
274
275
        $magic = ($arrspell -> fields['poziom'] / 100);
276
if ($arrspell -> fields['nazwa'] == E_SPELL1) // increase item's durability
277
        {
278
            if ($arritem -> fields['type'] == 'R') 
279
            {
280
                error (NOT_ABLE2);
281
            }
282
            if ($chance > 100) 
283
            {
284
                $maxbonus = ($objBonus -> fields['maxwt'] * 5);
285
                if ($bonus > $maxbonus) 
286
                {
287
                    $bonus = $maxbonus;
288
                }
289
                $smarty -> assign ("Message", YOU_RISE2.$arritem -> fields['name'].FOR_A.$bonus.NOW_IS.(25*$czary -> fields['poziom']).S_EXP.$magic.S_CAST);
290
                $maxdur = $arritem -> fields['maxwt'] + $bonus;
291
                $dur = $arritem -> fields['wt'] + $bonus;
292
                $test = $db -> Execute("SELECT id FROM equipment WHERE name='".$name."' AND wt=".$dur." AND type='".$arritem -> fields['type']."' AND status='U' AND owner=".$player -> id." AND power=".$arritem -> fields['power']." AND zr=".$arritem -> fields['zr']." AND szyb=".$arritem -> fields['szyb']." AND maxwt=".$maxdur." AND poison=".$arritem -> fields['poison']." AND magic='Y' AND ptype='".$arritem -> fields['ptype']."' AND repair=".$arritem -> fields['repair']);
293
                if (!$test -> fields['id']) 
294
                {
295
                    $db -> Execute("INSERT INTO equipment (owner, name, power, type, cost, zr, wt, minlev, maxwt, amount, magic, poison, szyb, ptype, twohand, repair) VALUES(".$player -> id.",'".$name."',".$arritem -> fields['power'].",'".$arritem -> fields['type']."',".$arritem -> fields['cost'].",".$arritem -> fields['zr'].",".$dur.",".$arritem -> fields['minlev'].",".$maxdur.",1,'Y',".$arritem -> fields['poison'].",".$arritem -> fields['szyb'].",'".$arritem -> fields['ptype']."', '".$arritem -> fields['twohand']."', ".$arritem -> fields['repair'].")") or error(E_DB);
296
                } 
297
                    else 
298
                {
299
                    $db -> Execute("UPDATE equipment SET amount=amount+1 WHERE id=".$test -> fields['id']);
300
                }
301
                $test -> Close();
302
                checkexp($player -> exp,25*$czary -> fields['poziom'],$player -> level,$player -> race,$player -> user,$player -> id,0,0,$player -> id,'magia',$magic);
303
            } 
304
                else 
305
            {
306
                $db -> Execute("UPDATE players SET magia=magia+0.01 WHERE id=".$player -> id);
307
                $smarty -> assign ("Message", YOU_TRY.$arritem -> fields['name'].BUT_FAIL);
308
            }
309
        }
310
        if ($arrspell -> fields['nazwa'] == E_SPELL2) // increase item's power
311
        {
312
            if ($arritem -> fields['type'] == 'B') 
313
            {
314
                error (NOT_ABLE1);
315
            }
316
            if ($chance > 100) 
317
            {
318
                $maxbonus = ($objBonus -> fields['power'] * 5);
319
                if ($bonus > $maxbonus) 
320
                {
321
                    $bonus = $maxbonus;
322
                }
323
                $power = $arritem -> fields['power'] + $bonus;
324
                $smarty -> assign ("Message", YOU_RISE.$arritem -> fields['name'].FOR_A.$bonus.NOW_IS.(25*$czary->fields['poziom']).S_EXP.$magic.S_CAST);
325
                $test = $db -> Execute("SELECT id FROM equipment WHERE name='".$name."' AND wt=".$arritem -> fields['wt']." AND type='".$arritem -> fields['type']."' AND status='U' AND owner=".$player -> id." AND power=".$power." AND zr=".$arritem -> fields['zr']." AND szyb=".$arritem -> fields['szyb']." AND maxwt=".$arritem -> fields['maxwt']." AND poison=".$arritem -> fields['poison']." AND ptype='".$arritem -> fields['ptype']."' AND magic='Y' AND repair=".$arritem -> fields['repair']);
326
                if (!$test -> fields['id']) 
327
                {
328
                    $db -> Execute("INSERT INTO equipment (owner, name, power, type, cost, zr, wt, minlev, maxwt, amount, magic, poison, szyb, ptype, twohand, repair) VALUES(".$player -> id.",'".$name."',".$power.",'".$arritem -> fields['type']."',".$arritem -> fields['cost'].",".$arritem -> fields['zr'].",".$arritem -> fields['wt'].",".$arritem -> fields['minlev'].",".$arritem -> fields['maxwt'].",1,'Y',".$arritem -> fields['poison'].",".$arritem -> fields['szyb'].",'".$arritem -> fields['ptype']."', '".$arritem -> fields['twohand']."', ".$arritem -> fields['repair'].")") or error(E_DB);
329
                } 
330
                    else 
331
                {
332
                    if ($arritem -> fields['type'] != 'R')
333
                    {
334
                        $db -> Execute("UPDATE `equipment` SET `amount`=`amount`+1 WHERE `id`=".$test -> fields['id']);
335
                    }
336
                        else
337
                    {
338
                        $db -> Execute("UPDATE `equipment` SET `wt`=`wt`+".$arritem -> fields['wt']." WHERE `id`=".$test -> fields['id']);
339
                    }
340
                }
341
                $test -> Close();
342
                checkexp($player -> exp,25*$czary -> fields['poziom'],$player -> level,$player -> race,$player -> user,$player -> id,0,0,$player -> id,'magia',$magic);
343
            } 
344
                else 
345
            {
346
                $db -> Execute("UPDATE players SET magia=magia+0.01 WHERE id=".$player -> id);
347
                $smarty -> assign ("Message", YOU_TRY.$arritem -> fields['name'].BUT_FAIL);
348
            }
349
        }
350
        if ($arrspell -> fields['nazwa'] == E_SPELL3) // increase item's speed or agility
351
        {
352
            if ($chance > 100) 
353
            {
354
                if ($arritem -> fields['type'] == 'W' || $arritem -> fields['type'] == 'B') 
355
                {
356
                    $maxbonus = ($objBonus -> fields['szyb'] * 5);
357
                    if ($bonus > $maxbonus) 
358
                    {
359
                        $bonus = $maxbonus;
360
                    }       
361
                    $speed = $arritem -> fields['szyb'] + $bonus;
362
                    $agi = $arritem -> fields['zr'];
363
                    $text = YOU_RISE3;
364
                } 
365
                    elseif ($arritem -> fields['type'] == 'A' || $arritem -> fields['type'] == 'L') 
366
                {
367
                    if ($objBonus -> fields['zr'] < 0)
368
                    {
369
                        $intBonus = ($objBonus -> fields['zr'] * -1);
370
                    }
371
                        else
372
                    {
373
                        $intBonus = $objBonus -> fiedlds['zr'];
374
                    }
375
                    $maxbonus = ($intBonus * 5);
376
                    if ($bonus > $maxbonus) 
377
                    {
378
                        $bonus = $maxbonus;
379
                    }
380
                    if ($arritem -> fields['zr'] < 0)
381
                    {
382
                        $agi = $arritem -> fields['zr'] - $bonus;
383
                    }
384
                        else
385
                    {
386
                        $agi = $arritem -> fields['zr'] + $bonus;
387
                    }
388
                    $speed = $arritem -> fields['szyb'];
389
                    $text = YOU_RISE4;
390
                } 
391
                    else 
392
                {
393
                    error (NOT_ABLE3);
394
                }
395
                $smarty -> assign ("Message", $text." ".$arritem -> fields['name']." o ".$bonus.NOW_IS.(25*$czary -> fields['poziom']).S_EXP.$magic.S_CAST);
396
                $test = $db -> Execute("SELECT id FROM equipment WHERE name='".$name."' AND wt=".$arritem -> fields['wt']." AND type='".$arritem -> fields['type']."' AND status='U' AND owner=".$player -> id." AND power=".$arritem -> fields['power']." AND zr=".$agi." AND szyb=".$speed." AND maxwt=".$arritem -> fields['maxwt']." AND poison=".$arritem -> fields['poison']." AND magic='Y' AND ptype='".$arritem -> fields['ptype']."' AND repair=".$arritem -> fields['repair']);
397
                if (!$test -> fields['id']) 
398
                {
399
                    $db -> Execute("INSERT INTO equipment (owner, name, power, type, cost, zr, wt, minlev, maxwt, amount, magic, poison, szyb, twohand, repair) VALUES(".$player -> id.",'".$name."',".$arritem -> fields['power'].",'".$arritem -> fields['type']."',".$arritem -> fields['cost'].",".$agi.",".$arritem -> fields['wt'].",".$arritem -> fields['minlev'].",".$arritem -> fields['maxwt'].",1,'Y',".$arritem -> fields['poison'].",".$speed.", '".$arritem -> fields['twohand']."', ".$arritem -> fields['repair'].")") or error(E_DB);
400
                } 
401
                    else 
402
                {
403
                    $db -> Execute("UPDATE equipment SET amount=amount+1 WHERE id=".$test -> fields['id']);
404
                }
405
                checkexp($player -> exp,$bonus,$player -> level,$player -> race,$player -> user,$player -> id,0,0,$player -> id,'magia',$magic);
406
            } 
407
                else 
408
            {
409
                $db -> Execute("UPDATE players SET magia=magia+0.01 WHERE id=".$player -> id);
410
                $smarty -> assign ("Message", YOU_TRY.$arritem -> fields['name'].BUT_FAIL);
411
            }
412
        }
413
        $db -> Execute("UPDATE `players` SET `pm`=`pm`-".$arrspell -> fields['poziom'].", `energy`=`energy`-".$arrspell -> fields['poziom']." WHERE id=".$player -> id);
414
        $arrspell -> Close();
415
        $amount = $arritem -> fields['amount'] - 1;
416
        if ($amount > 0) 
417
        {
418
            $db -> Execute("UPDATE equipment SET amount=amount-1 WHERE id=".$arritem -> fields['id']);
419
        } 
420
            else 
421
        {
422
            $db -> Execute("DELETE FROM equipment WHERE id=".$arritem -> fields['id']);
423
        }
424
        $objBonus -> Close();
425
        $arritem -> Close();
426
    }
427
    $smarty -> assign(array("Spellid" => $czary -> fields['id'], 
428
        "Spellname" => $czary -> fields['nazwa'], 
429
        "Itemname" => $arriname, 
430
        "Itemamount" => $arriamount, 
431
        "Itemid" => $arriid,
432
        "Cast2" => CAST,
433
        "Spell" => SPELL,
434
        "Ona" => ON_A,
435
        "Iamount" => I_AMOUNT));
436
    $czary -> Close();
437
}
438
439
/**
440
* Activate battle and defense spells
441
*/
442
if (isset($_GET['naucz'])) 
443
{
444
    if (!ereg("^[1-9][0-9]*$", $_GET['naucz'])) 
445
    {
446
        error (ERROR);
447
    }
448
    $czary = $db -> Execute("SELECT * FROM czary WHERE id=".$_GET['naucz']);
449
    if (!$czary -> fields['id']) 
450
    {
451
        error (NO_SPELL);
452
    }
453
    if ($player -> id != $czary -> fields['gracz']) 
454
    {
455
        error (NOT_YOUR);
456
    }
457
    if ($player -> level < $czary -> fields['poziom']) 
458
    {
459
        error (TOO_LOW_L);
460
    }
461
    if ($player -> clas != 'Mag') 
462
    {
463
        error (ONLY_MAGE);
464
    }
465
    $db -> Execute("UPDATE czary SET status='U' WHERE gracz=".$player -> id." AND typ='".$czary -> fields['typ']."' AND status='E'");
466
    $db -> Execute("UPDATE czary SET status='E' WHERE id=".$czary -> fields['id']." AND gracz=".$player -> id);
467
    $smarty -> assign (array("Name" => $czary -> fields['nazwa'],
468
        "Youuse" => YOU_USE));
469
    $czary -> Close();
470
}
471
472
/**
473
* Initialization of variables
474
*/
475
if (!isset($_GET['deakt'])) 
476
{
477
    $_GET['deakt'] = '';
478
}
479
if (!isset($_GET['naucz'])) 
480
{
481
    $_GET['naucz'] = '';
482
}
483
if (!isset($_GET['cast'])) 
484
{
485
    $_GET['cast'] = '';
486
}
487
488
/**
489
* Assign variables to template and display page
490
*/
491
$smarty -> assign(array("Deaktiv" => $_GET['deakt'], 
492
    "Learn" => $_GET['naucz'], 
493
    "Bname" => $arrname1, 
494
    "Bpower" => $arrpower1,
495
    "Bid" => $arrid1, 
496
    "Dname" => $arrname2, 
497
    "Dpower" => $arrpower2, 
498
    "Did" => $arrid2, 
499
    "Uname" => $arrname3, 
500
    "Ueffect" => $arrefect,
501
    "Uid" => $arrid3, 
502
    "Cast" => $_GET['cast'],
503
    "Arefresh" => S_REFRESH,
504
    "Usedspells" => USED_SPELLS,
505
    "Spellbook" => SPELL_BOOK,
506
    "Bspells" => B_SPELLS,
507
    "Dspells" => D_SPELLS,
508
    "Espells" => E_SPELLS,
509
    "Usethis" => USE_THIS,
510
    "Bdamage" => B_DAMAGE,
511
    "Ddefense" => D_DEFENSE,
512
    "Castthis" => CAST_THIS));
513
$smarty -> display ('czary.tpl');
514
515
require_once("includes/foot.php");
516
?>