for ($i=0; $i >= -1000; $i--) {
print STDOUT ("$Bxcoord[$i]");
}