|
'')
{
if (stristr($f,'_s.jpg') !== false and strcmp(substr($f,0,4),$bn) > 0 and strcmp(substr($f,0,4),$nextnr) < 0)
{
$nextnr = substr($f,0,4);
$nextfile = substr($f,0,strlen($f) - 6);
}
if (stristr($f,'_s.jpg') !== false and strcmp(substr($f,0,4),$bn) < 0 and strcmp(substr($f,0,4),$prevnr) > 0)
{
$prevnr = substr($f,0,4);
$prevfile = substr($f,0,strlen($f) - 6);
}
}
else
{
if (stristr($f,'_s.jpg') !== false and strcmp(substr($f,0,2),$g) == 0)
array_push($files,$f);
}
closedir($dir);
sort($grps);
sort($files);
print '[ Hem ] ';
foreach($grps as $f)
{
$gtmp = substr($f,0,2);
if (is_file('jessika/'.$gtmp.'_grp.txt'))
$gt = file_get_contents('jessika/'.$gtmp.'_grp.txt');
else
$gt = 'Grupp '.$gtmp;
if (strcmp($g,$gtmp) == 0 and $b == '')
print '[ '.$gt.' ] ';
else
print '[ '.$gt.' ] ';
}
if ($b <> '')
{
print '
'.Chr(13);
if ($nextfile <> '')
print '[ Nästa bild ] ';
else
print '[ Nästa bild ] ';
if ($prevfile <> '')
print '[ Föregående bild ] ';
else
print '[ Föregående bild ] ';
}
print '
';
if ($b <> '')
{
print '
'.Chr(13);
if (is_file('jessika/'.$b.'.txt'))
print file_get_contents('jessika/'.$b.'.txt').Chr(13);
print ''.Chr(13);
}
else if (count($files) > 0)
{
if (is_file('jessika/'.$g.'_grpdata.txt'))
{
$gs = intval(file_get_contents('jessika/'.$g.'_grpdata.txt'));
if ($gs < 1 or $gs > 6)
$gs = 4;
}
else
$gs = 4;
$gc = intval((count($files) + $gs - 1) / $gs);
reset($files);
print ''.Chr(13);
while (false !== current($files))
{
$bhtml = '';
$thtml = '';
for ($i = 0; $i < $gs; $i++)
{
if (false !== current($files))
{
$f = current($files);
$b = substr($f,0,strlen($f) - 6);
$bhtml = $bhtml.' | '.Chr(13);
$thtml = $thtml.'';
if (is_file('jessika/'.$b.'.txt'))
$thtml = $thtml.Chr(13).file_get_contents('jessika/'.$b.'.txt');
else if (isset($_GET['fixtext']))
{
$f = fopen('jessika/'.$b.'.txt','w');
fclose($f);
}
$thtml = $thtml.' | '.Chr(13);
}
else
{
$bhtml = $bhtml.' | ';
$thtml = $thtml.' | ';
}
next($files);
}
print ''.Chr(13).$bhtml.' '.Chr(13).$thtml.' '.Chr(13);
if (false !== current($files))
print '
| '.Chr(13);
}
print '
'.Chr(13);
print '(klicka på en bild för att se en förstoring)
'.Chr(13);
}
}
?>
|
|
