";

	if ($_POST["lines"])
	{
		$lines = explode("\r\n", "\r\n".stripslashes($_POST["lines"]));
		$lines = array_flip($lines);

		//print_r($lines);

		$r_query = array_flip($r_query);
		foreach($r_query as $row)
		{
			$row = explode("/", $row);

			$part1 = $row[count($row) - 2];
			$part2 = $row[count($row) - 1];
			$ext = explode(".", $part2);
			$ext = $ext[count($ext) - 1];
			$part2 = substr($part2, 0, -(strlen($ext) + 1));

			if ($lines[$part2.".".$ext])
			{
				print "rename \"".$part2.".".$ext."\" \"".str_replace('_', ' ', $part1." (".$part2.").".$ext)."\"\n";
			}
			if ($lines[$part2])
			{
				print "rename \"".$part2."\" \"".str_replace('_', ' ', $part1." (".$part2.")")."\"\n";
			}
        }
	}

	print "

";

	$newfiles = array(
		'ftp://ftp.scs-trc.net/pub/c64/ALL-FILES.TXT',
	);

	foreach ($newfiles as $newfile)
	{
		print "load ".$newfile."\n";
		$query = get_data($newfile);
 		$query = explode("\n", $query);

		$old = 0;
		$new = 0;

		foreach ($query as $row)
		{
    		if ($r_query[$row])
			{
				$old++;
			}
			else
			{
				$found[] = $row;
				$new++;
			}
		}

		print $found[0]."\nC64
";

		$found[0] = null;

		foreach ($found as $row)
		{
			if ($row && !substr_count(strtolower($row), '/dtv/'))
			{
				print $row."\n";
			}
		}

		print "
";

		foreach ($found as $row)
		{
			if ($row && !substr_count(strtolower($row), '/dtv/'))
			{
				$row2 = explode("/", $row);

				print "".str_replace('_', ' ', $row2[count($row2) - 1])."\n";
			}
		}

		print "
";

		foreach ($found as $row)
		{
			if ($row && !substr_count(strtolower($row), '/dtv/'))
			{
				$row2 = explode("/", $row);
				$title = explode(".", $row2[count($row2) - 1]);
				$ext = $title[count($title) - 1];
				$title[count($title) - 1] = null;
				$title = implode(".", $title);
	
				print "".str_replace('_', ' ', $row2[count($row2)-2]." (".substr($title, 0, -1)).").".$ext."\n";
			}
		}
	
		print "
C64 DTV
";
	
		$found[0] = null;
	
		foreach ($found as $row)
		{
			if ($row && substr_count(strtolower($row), '/dtv/'))
			{
				print $row."\n";
			}
		}
	
		print "
";
	
		foreach ($found as $row)
		{
			if ($row && substr_count(strtolower($row), '/dtv/'))
			{
				$row2 = explode("/", $row);
	
				print "".str_replace('_', ' ', $row2[count($row2) - 1])."\n";
			}
		}
	
		print "
";
	
		foreach ($found as $row)
		{
			if ($row && substr_count(strtolower($row), '/dtv/'))
			{
				$row2 = explode("/", $row);
				$title = explode(".", $row2[count($row2) - 1]);
				$ext = $title[count($title) - 1];
				$title[count($title) - 1] = null;
				$title = implode(".", $title);
	
				print "".str_replace('_', ' ', $row2[count($row2) - 2]." (".substr($title, 0, -1)).").".$ext."\n";
			}
		}
	
		print "
";
	
		print "found new:".$new.", old:".$old."\n\n";
	}

}
else
{
	print "
";
	print "load search\n";
	print "load rename\n";

}

?>