Select Code to Download

# cycle through 16 x and 16 y values,
# which generate a total of 256 tile indexes
...
        }
    }
}

my ($rx,$ry,$y,$x,$tile);

...
        ++$tile_index;
    }
}