First of all, why are you working with so many lists? You have tons of lists initialized right there, it isn't good at all!
proc/lview(list,range,centerx,centery) . = list() for(var/X in (centerx-range) to (centerx+range)) for(var/Y in (centery-range) to (centery+range)) . += list[X][Y]
That should work. Just keep in mind what you're doing is just not that good in BYOND; just with that there you're about 1/6 of the way to hitting the list limit.
That should work. Just keep in mind what you're doing is just not that good in BYOND; just with that there you're about 1/6 of the way to hitting the list limit.