Pamokos

Siuntiniai

Jūsų puslapiui

Dėmesio! Dėmesio! KONKURSAS!

  • Suraskite 7 mėn. katytei jas labai mylinčius šeimininkus ir reklamuokites ifreal.com portale net 6 mėn. nemokamai.
     
  • Reikalavimai dalyviams
    - Konkurse gali dalyvauti visi.
    - Turite nuoširdžiai ir atsakingai ieškoti.
    - Jūsų rasti šeimininkai turi atitikti reikalavimus naujiems šeimininkams.

  • Reikalavimai naujiems šeimininkams
    - Būtų pasiruošę nuoširdžiai, atsakingai ir besąlygiškai rūpintis katyte.
    - Jie turi būti tokie, kuriems nebijotumėte atiduoti savo mylimiausio augintinio.
    - Jeigu šeimininkas nepilnametis - turi turėti tėvų sutikimą.

  • Laimėtojas
    - Nauji šeimininkai atsiimdami katytę turi pranešti dalyvio, kuris juos surado vardą, el. paštą ir telefoną.
    - Konkursas galioja iki tol, kol surasime šeimininkus.

Kreiptis į Eleną (floweriuke@gmail.com, +37069851555)

New Tutorials Skaitliukas

Autorius: ufonautas  Data: 2007-05-29 19:48:32 
Lygis: Pradedantiems  Pamatė: 2176 
Versija: -     


<?php

header("Content-type: image/png");

header("Cache-control: no-store,no-cache,must-revalidate");

$im=imagecreate(87,31);

$fonas=imagecolorallocate($im,255, 255, 255);

imagefilledrectangle($im,0,0,86,30,$fonas);

$failas="skaitliukas.txt";

$failas2="duomenys2.txt";

$data=date("d");

list($a1,$a2,$a3,$a4,$a5,$a6,$a7,$a8,$a9,$a10,$a11,$a12,$a13,$a14)=explode("|",file_get_contents($failas))

list($date,$viso,$snd)=explode("|",file_get_contents($failas2));

if(empty($a1)) { $a1=0; }

if(empty($a2)) { $a2=0; }

if(empty($a3)) { $a3=0; }

if(empty($a4)) { $a4=0; }

if(empty($a5)) { $a5=0; }

if(empty($a6)) { $a6=0; }

if(empty($a7)) { $a7=0; }

if(empty($a8)) { $a8=0; }

if(empty($a9)) { $a9=0; }

if(empty($a10)) { $a10=0; }

if(empty($a11)) { $a11=0; }

if(empty($a12)) { $a12=0; }

if(empty($a13)) { $a13=0; }

if(empty($a14)) { $a14=0; }

if(empty($viso)) { $viso=0; }

if(empty($snd)) { $snd=0; }

if($data!==$date)

{ $ir="1|$a1|$a2|$a3|$a4|$a5|$a6|$a7|$a8|$a9|$a10|$a11|$a12|$a13";

$viso=$viso+1;

$text="$data|$viso|1"; }

if($data==$date) { $a1=$a1+1;

$ir="$a1|$a2|$a3|$a4|$a5|$a6|$a7|$a8|$a9|$a10|$a11|$a12|$a13|$a14";

$viso=$viso+1; $snd=$snd+1;

$text="$data|$viso|$snd"; }

$pradeti=fopen($failas,"w+");

flock($pradeti,LOCK_EX);

fwrite($pradeti,"$ir");

flock($pradeti,LOCK_UN);

fclose($pradeti);

$irasyti=fopen($failas2,"w+");

flock($irasyti,LOCK_EX);

fwrite($irasyti,"$text");

flock($irasyti,LOCK_UN);

fclose($irasyti);

list($a1,$a2,$a3,$a4,$a5,$a6,$a7,$a8,$a9,$a10,$a11,$a12,$a13,$a14)=explode("|",file_get_contents($failas));

$x=explode("|",file_get_contents($failas));

$x=max($x);

$c="27";

$sp=imagecolorallocate($im,128,128,128);

$p=imagecolorallocate($im,108,108,108);

for($for=1;$for<15;$for++) {

$tolis=$for*3-1;

$tolis2=$for*3;

$stulpas=15-$for;

$slp="a$stulpas";

imagefilledrectangle($im,$tolis,29-ceil($c*$$slp/$x),$tolis2,29,$sp);

imagefilledrectangle($im,$tolis,29-ceil($c*$$slp/$x/2),$tolis2,29,$p); }

$j=imagecolorallocate($im,0,0,0);

$b=imagecolorallocate($im,255,255,255);

$style=array($j,$j,$j,$b,$b,$b);

imagesetstyle($im,$style);

imageline($im,0,0,86,0,IMG_COLOR_STYLED);

imageline($im,86,0,86,30,IMG_COLOR_STYLED);

imageline($im,0,30,86,30,IMG_COLOR_STYLED);

imageline($im,0,0,0,30,IMG_COLOR_STYLED);

$g1=87-(7*strlen($viso));

$sn=strlen($snd)+1;

$g2=87-(7*$sn); imagestring($im,2,$g1,0,"$viso",$p);

imagestring($im,2,$g2,10,"+$snd",$p);

imagepng($im);

imagedestroy($im);

?>


Sukuriame tokius failus „skaitliukas.txt“ ir „duomenys2.txt“.

Reklama

Ieško namų!

Gyvūnų skelbimai

Draugų nuorodos

Statistika

pamokų: 473
siuntinių: 315
vartotojų: 8283
autorių: 66
naršo: 0 + 7

Keiskis.lt