";
#Odd
print "000000{$o}05, Rack {$o} Row 05
";
for($i=0;$i<14;$i++)
{
$i++;
$z = leadzero($i);
print "{$z}{$y}03{$o}05, {$z}{$y}03{$o}05
";
}
$r++;
$e = leadzero($r);
#Even
print "000000{$e}05, Rack {$e} Row 05
";
for($i=1;$i<15;$i++)
{
$i++;
$z = leadzero($i);
print "{$z}{$y}03{$e}05, {$z}{$y}03{$e}05
";
}
$r++;
}
?>