[UOSteam]Alamiester's AutoDirtToBowl v0.3
Code: Select all
//[UOSteam]Alamiester's AutoDirtToBowl v0.3//
//Updated bowl type to stackable bowls.//
//Stand over a dirt area on map, start script and click on dirt the first time when curser pops up.//
//09JUN2022//
@usetype '0x26b9' 'Any' 'Backpack' '3'
@waitingfortarget!
pause 200
while @findtype! '0x26b9' 'Any' 'Backpack' 'Any' '3'
@usetype '0x26b9' 'Any' 'Backpack' '3'
pause 200
@targettile! 'last'
@waitingfortarget!
waitfortarget 200
sysmsg 'One bowl filled with dirt.' 20
pause 200
endwhile
@canceltarget!
Code: Select all
//[UOSteam]Alamiester's PitcherFiller v0.2//
//added a promt to target water trough for the first time.//
//make sure you are next to a water trough, and have the pitchers you wanna fill in your pack. dont forget to check the loop box.//
//11JUN2022//
if not @findobject 'WaterTrough' and not inrange 'WaterTrough' '2'
promptalias 'WaterTrough'
sysmsg '*****Target the Water Trough!*****' '2165'
endif
if @inrange 'WaterTrough' '2'
if not @findtype! '0xff6' '0' 'backpack'
sysmsg '*****No Empty Pitchers*****' '2165'
stop
else
@usetype! '0xff6' '0' 'backpack'
pause 500
@target! 'WaterTrough'
pause 1000
endif
sysmsg '*****Pitcher Filled*****' '2165'
endif
@canceltarget!
if not @inrange 'WaterTrough' '2'
headmsg 'Get closer to the Water Trough...'
stop
endif
Code: Select all
//[UOSteam]Alamiester's PitcherSprinkler Filler v0.2//
//added a promt to target water trough for the first time.//
//you must have a water sprinkler and a couple full water pitchers in your backpack, and also be standing next to a water trough.//
//11JUN2022//
if not findalias 'WaterTrough'
promptalias 'WaterTrough'
sysmsg '*****Target Your Water Trough!*****' '2165'
endif
while not @injournal! 'You Completely fill the sprinkler.'
if not @findtype! 0x1f9d 0 backpack
sysmsg '*****No Full Pitchers*****' '2165'
while not @findobject 'WaterTrough' and not inrange 'WaterTrough' '2'
promptalias 'WaterTrough'
endif
if @inrange 'WaterTrough' '2'
if not @findtype! '0xff6' '0' 'backpack'
sysmsg '*****No Empty Pitchers*****' '2165'
else
@usetype! '0xff6' '0' 'backpack'
pause 500
@target! 'WaterTrough'
pause 1000
endif
sysmsg '*****Pitcher Filled*****' '2165'
endif
@canceltarget!
if not @inrange 'WaterTrough' '2'
headmsg 'Get closer to the Water Trough...'
stop
endwhile
stop
else
@usetype! 0x1f9d 0 backpack
pause 1000
@targettype! 0xe7a 1152 0
pause 1000
endif
sysmsg '*****Sprinkler Filled*****' '2165'
endwhile
@canceltarget!
@clearjournal!
Code: Select all
//[UOSteam]Alamiester's AutoPlantSeed v0.1//
//09JUN2022//
//This is for batch planting seeds into pots on the ground. You need to use object inspector to see the seed color and change your color with '66'. Plants a 5x5 grid if your standing in the middle.//
@usetype '0xdcf' '66' 'backpack' '2'
pause 200
@targetground! '0x1602' '194' '2'
waitfortarget 500
pause 200
Code: Select all
//[UOSteam]Alamiester's AutoWaterDirt v0.2//
//27JUN2022//
//You need a couple pitchers of water in your pack, and bowls full of hard dirt. it will refill water pitchers while standing next to a water trough, until out of hard dirt bowls.//
if not findalias 'WaterTrough'
promptalias 'WaterTrough'
sysmsg '*****Target Your Water Trough!*****' '2165'
endif
while not @injournal! 'You Completely fill'
if not @findtype! 0x1602 0 backpack
sysmsg '*****No Dry Dirt Bowls!*****' '2165'
while not @findobject 'WaterTrough' and not inrange 'WaterTrough' '2'
promptalias 'WaterTrough'
endif
if @inrange 'WaterTrough' '2'
if not @findtype! '0xff6' '0' 'backpack'
else
@usetype! '0xff6' '0' 'backpack'
pause 500
@target! 'WaterTrough'
pause 1000
endif
sysmsg '*****Pitcher Filled!*****' '2165'
endif
@canceltarget!
if not @inrange 'WaterTrough' '2'
headmsg 'Get closer to the Water Trough...'
stop
endwhile
stop
else
@usetype! 0x1f9d 0 backpack
pause 1000
@targettype! 0x1602 0 backpack
pause 1000
endif
sysmsg '*****Dirt Bowl Filled.*****' '2165'
endwhile
//@unsetalias 'watertrough'
@canceltarget!
@clearjournal!
Code: Select all
//[UOSteam]Alamiester's AutoSeedToBox v0.1//
//13DEC2017//
if not @findobject 'SeedBox'
promptalias 'SeedBox'
endif
pause 500
@removelist 'Seeds'
if not listexists 'Seeds'
createlist 'Seeds'
endif
@pushlist 'Seeds' 0xdcf // Seeds
while @findtype 0xdcf 'Any' 'backpack' 'Any'
for 0 to Seeds
if @inrange 'SeedBox' 2
if @movetype Seeds[] 'backpack''SeedBox' 'Any' 'Any' 'Any'
pause 100
endif
endif
if not @inrange 'SeedBox' '2'
headmsg 'Move closer to Seed Box, Stopping...'
stop
endif
sysmsg 'Moving Seed.' 20
pause 100
endfor
pause 100
endwhile