";
$mainPages = array(
"http://www.tzxvault.org/index.htm",
"http://www.tzxvault.org/Amstrad/index.htm",
"http://www.tzxvault.org/C16/index.htm",
"http://www.tzxvault.org/C64/index.htm",
"http://www.tzxvault.org/Vic20/index.htm",
);
$pages = array();
foreach ($mainPages as $page)
{
print "load ".$page."\n";
$content = get_data($page);
$content = explode('href="', $content);
array_splice($content, 0, 1);
foreach ($content as $row)
{
$row = explode('"', $row);
$row = $row[0];
print "found ".$row."\n";
$pages[$row] = $row;
}
}
foreach ($pages as $page)
{
print "load ".$page."\n";
$dirs = array();
$new = 0;
$old = 0;
$content = get_data($page);
$content = str_replace(' ', ' ', $content);
$content2 = explode('', $content);
$content2[0] = null;
$content = explode(' 1)
{
$name = explode('', $row);
$name = strip_tags($name[0]);
$name = explode('>', $name);
$name = trim($name[1]);
$addinf = explode('| ', $row);
$publ = explode(' | ', $addinf[1]);
$publ = trim(strip_tags($publ[0]));
if ($publ)
{
$name = $name." (".$publ.")";
}
$year = explode('', $addinf[2]);
$year = trim(strip_tags($year[0]));
if ($year)
{
$name = $name." (".$year.")";
}
$url_split = explode('/', $url);
if ($name)
{
$name = $name.".".$ext[count($ext) - 1];
}
else
{
$name = $url_split[count($url_split) - 1];
}
$url_split[count($url_split) - 1] = null;
$url_split = implode('/', $url_split);
$dirs[$url_split] = $url_split;
if (!$r_query[$url])
{
$found[] = array($url, $name);
$new++;
$r_query[$url] = true;
}
else
{
$old++;
}
}
}
}
foreach ($content2 as $row)
{
if ($row)
{
$name = explode('', $row);
$name = $name[0];
$file = str_replace(' ', '', $name).".zip";
$addinf = explode('', $row);
$publ = explode(' | ', $addinf[1]);
$publ = trim(strip_tags($publ[0]));
if ($publ)
{
$name = $name." (".$publ.")";
}
$year = explode('', $addinf[2]);
$year = trim(strip_tags($year[0]));
if ($year)
{
$name = $name." (".$year.")";
}
foreach($dirs as $dir)
{
$url = $dir.$file;
if (!$r_query[$url])
{
$found[] = array($url, $name.".zip");
$new++;
$r_query[$url] = true;
}
else
{
$old++;
}
}
}
}
print "found new ".$new.", old ".$old."\n";
}
sort($found);
print "";
foreach ($found as $row)
{
print $row[0]."\n";
}
print " | ";
foreach ($found as $row)
{
print "".$row[1]."\n";
}
print " |
";
?>