Vendor Scavenger Empty by AreYouKidden🐲
Description: Used with 1-5 pack animals, to empty them into a storage shelf. Use when beside a storage shelf, it'll ask you to select shelf first time or if it cannot find it when you are near it.
@setvar 'PauseTime' 750 if not listexists 'ScavAnimals' createlist 'ScavAnimals' endif foreach x in 'ScavAnimals' if not find 'x' 'ground' overhead 'ScavAnimal List cleared' clearlist 'ScavAnimals' endif endfor if list 'ScavAnimals' < 1 overhead 'Scanning for PackAnimals' while findtype 0x0123|0x0124 'ground' 'any' 'any' 2 as 'found' pushlist 'ScavAnimals' 'found' front ignore 'found' endwhile clearignore endif if not find 'ScavShelf' 'ground' overhead 'Select Storage Shelf' setvar 'ScavShelf' endif foreach x in 'ScavAnimals' overhead 'x' menu 'ScavShelf' 0 waitfortarget target 'x' pause 'PauseTime' endfor
