renaming objects

//renames objects
//first select the first object in a group of objects to be renamed

int $qty = 145;

int $i = 1;
while ($i < $qty){
//renames the object
rename panel1;
//selects the next object
pickWalk -d right;
$i++;
}