[UOSteam] Snowball Fight
Posted: Wed Jan 04, 2023 8:24 pm
This macro will try to throw a snowball at each person within 10 tiles. Once all have been tried, it loops and tries everyone again. It requires you to have "A Pile of Snow" in your backpack. Sadly few carry such an item these days. It's been many years since there were any large scale pillow or snowball fights in UOEX.
Code: Select all
//*******************
// GreenBar's Snowball Fight
//*******************
// Search for PWT
//*******************
if @findtype 0x913 1153 backpack and property "A Pile Of Snow" found
@setalias "a_snow_pile" found
else
sysmsg "A Pile of Snow Not found in Backpack
stop
endif
//Ingore yourself
ignoreobject self
//Main Loop
while not dead self
@clearjournal
if @findtype 0x190 any ground any 10 or @findtype 0x191 any ground any 10
useobject a_snow_pile
waitfortarget 5000
@target found
//Warning: NEITHER REMOVE NOR REDUCE the following pause.
pause 500
if @injournal "you can only throw a snowball at something that can throw one back."
elseif @injournal "Target cannot be seen"
else
//snow pile cool down wait
pause 5600
endif
@ignoreobject found
else
headmsg "Round Complete, Once Again!" 38
clearignorelist
ignoreobject self
pause 500
endif
@canceltarget
endwhile