İtem takip etsin adamı ?

[function setmove]
if <src.dir>==0 
var.move=0 -1 0 
elseif <src.dir>==1 
var.move=1 -1 0 
elseif <src.dir>==2 
var.move=1 0 0 
elseif <src.dir>==3 
var.move=1 1 0 
elseif <src.dir>==4 
var.move=0 1 0 
elseif <src.dir>==5 
var.move=-1 1 0 
elseif <src.dir>==6
var.move=-1 0 0 
elseif <src.dir>==7
var.move=-1 -1 0 
endif

[typedef t_soccer_ball] 
on=@step
if !(<src.isplayer>)
iF (rand(250)< 30)
src.say @03c1,6,1 Topu kaybettiniz
endif
ELSE
src.tag0.top=<uid>
if <src.dir>==0 
move=0 -1 0 
elseif <src.dir>==1 
move=1 -1 0 
elseif <src.dir>==2 
move=1 0 0 
elseif <src.dir>==3 
move=1 1 0 
elseif <src.dir>==4 
move=0 1 0 
elseif <src.dir>==5 
move=-1 1 0 
elseif <src.dir>==6
move=-1 0 0 
elseif <src.dir>==7
move=-1 -1 0 
endif
f_step
ENDIF

fistandantilus : Ben de hiç yaratıcılık yokta. Şu problemi çöz desen çözerim ama aynısına benzer bir problem yaz desen yazamam mesela. :)