Нужно передать в функцию переменные типа и после изменения вернуть их.
Type bot
Field xbot
Field ybot
End Type
For b.bot=Each bot
Move(b\xbot,b\ybot)
Next
Function Move(x,y)
x=x+1
y=y+1
End Function
Перебор типа внутри функции не подходит.
Переменных больше чем в этом примере.