for #x +5 5 1
for #y -5 5 1
set lasttargetx charposx +#x
set lasttargety charposy +#y
aend F5 3000 // (last obj wait targ lasttarg)
set timer
set lasttargetkind 3
while_not (lastmsg You finished looping.) or (lastmsg see that.) or (timer > 4000)
end_while
end_for
end_for