Так не пробовал?
sub fastloot()
var t,i
t=1000
dim LootingItem[18]
uo.Print('loot...')
uo.set('finddistance','3')
LootingItem[0]='0x0EED' ## gp
LootingItem[1]='0x1F1C' ## Сиды
LootingItem[2]='0x14EB' ## Карты
LootingItem ...