Menu
What's new
UOGamers Community

This is a sample guest message. Register a free account today to become a member! Once signed in, you'll be able to participate on this site by adding your own topics and posts, as well as connect with other members through your own private inbox!

  • To obtain new Razor updates, please reinstall Razor from our new website.

Smith and Tailor Bod Turnin - UOSteam

deathviper

deathviper

Sorceror
Tailor - I modified Kraz's long ago not the cleanest but I never went back to clean it up. I have turned in many hundreds of thousands of bods with it. If you have timing issues you might have to adjust some pauses for latency.

You do need to be within distance of the trash can to throw shoes away.

// Modified By Deathviper Guts by: Kraz
// Description: Tailoring BOD Delivery
//UNSETALIAS's
unsetalias 'BOD Source'
unsetalias 'BOD Destination'
unsetalias 'Tailor'
unsetalias 'DumpGoldClothBag'
unsetalias 'TrashCan'
if not @findobject 'BOD Source'
promptalias 'BOD Source'
endif
if not @findobject 'BOD Destination'
promptalias 'BOD Destination'
endif
if not @findobject 'Tailor'
promptalias 'Tailor'
endif
if not @findobject 'DumpGoldClothBag'
promptalias 'DumpGoldClothBag'
endif
if not @findobject 'TrashCan'
promptalias 'TrashCan'
endif
for 0 to 20000000
if not timerexists 'Delivery'
settimer 'Delivery' 5000
endif
// Check if NPC is in range
while not @inrange 'Tailor' 2
sysmsg 'Tailor is too far away.'
pause 2500
endwhile
//world save 'The world will save in 10 seconds.'
if @injournal '10 seconds.' 'system'
replygump 0x54f555df 0
// msg 'The book is empty!'
sysmsg 'World Saving, Pausing Script'
pause 30000
clearjournal
else
endif
if timer 'Delivery' >= 5000
// Search new BOD to deliver
if @feed 'Tailor' 0x2258
//changed from 250
waitforcontext 'Tailor' 1 1500
//changed from 250
waitforgump 'any' 1500
//sean added slight pause
pause 1000 //changed from 250
replygump 'any' 1
// Rewards
pause 1000
//move gold to bank box
@movetype 0xeed 'backpack' 'bank'
pause 1000
//find cloth
if @findtype 0x1767 '1151' 'backpack' or @findtype 0x1767 '1154' 'backpack'
while @findtype 0x1767 'any' 'backpack'
@moveitem 'found' 'DumpGoldClothBag'
pause 1000
endwhile
endif
if @findtype 0x1767 '1266' 'backpack'
while @findtype 0x1767 'any' 'backpack'
@moveitem 'found' 'DumpGoldClothBag'
pause 1000
endwhile
endif
if @findtype 0x1767 '1150' 'backpack' or @findtype 0x1767 '1161' 'backpack'
while @findtype 0x1767 'any' 'backpack'
@moveitem 'found' 'DumpGoldClothBag'
pause 1000
else
while @findtype 0x1767 'any' 'backpack'
//use dye tub on cloth
if @usetype! 0xfab
waitfortarget 1500
target! 'found'
endif
@moveitem 'found' 'DumpGoldClothBag'
pause 1000
endwhile
endif
//sean add below to move items to clothbag
//sewing kits
if @findtype 0xf9d
// Move all existing BODs into the BOB
while @findtype 0xf9d 'any' 'backpack'
moveitem 'found' 'DumpGoldClothBag'
pause 800
endwhile
endif
//Checks
if @findtype 0x14f0
// Move all existing BODs into the BOB
while @findtype 0x14f0 'any' 'backpack'
moveitem 'found' 'DumpGoldClothBag'
pause 800
//double click check to make gold
usetype 0x14f0 52 'DumpGoldClothBag'
endwhile
endif
//Trash Shoes
if @findtype 0x170d
while @findtype 0x170d 'any' 'backpack'
// moveitemoffset 'found' 'ground' 1 0 0
moveitem 'found' 'TrashCan'
pause 800
endwhile
endif
//sean add above to move items to clothbag
@movetype 0x2258 'backpack' 'BOD Destination'
pause 1000
//close bod gump
replygump 0x54f555df 0
settimer 'Delivery' 0
elseif not property 'Deeds In Book: 0' 'BOD Source'
useobject! 'BOD Source'
waitforgump 0x54f555df 15000
replygump 0x54f555df 5
//added pause sean might not need
pause 500
//close bod gump
replygump 0x54f555df 0
pause 1000
else
sysmsg 'No more BODs to deliver!' 25
stop
endif
endif
endfor
 
Last edited:
deathviper

deathviper

Sorceror
Smith....

// Author: Kraz
// Modified By: Deathviper
// Description: Tailoring BOD Delivery
unsetalias 'BOD Source'
unsetalias 'BOD Destination'
//unsetalias 'Smith'
unsetalias 'DumpGoldClothBag'
//unsetalias 'SmithTrashCan'
// Open bank box
while not @findlayer 'self' 29
sysmsg 'Banker is too far away.'
msg 'bank'
pause 2500
endwhile
if not @findobject 'BOD Source'
promptalias 'BOD Source'
endif
if not @findobject 'BOD Destination'
promptalias 'BOD Destination'
endif
if not @findobject 'Smith'
promptalias 'Smith'
endif
if not @findobject 'DumpGoldClothBag'
promptalias 'DumpGoldClothBag'
endif
if not @findobject 'SmithTrashCan'
promptalias 'SmithTrashCan'
endif
if not timerexists 'Delivery'
settimer 'Delivery' 5200
endif
for 0 to 5000000
// Check if NPC is in range
while not @inrange 'Smith' 2
sysmsg 'Smith is too far away.'
pause 2500
endwhile
//world save 'The world will save in 10 seconds.'
if @injournal '10 seconds.' 'system'
replygump 0x54f555df 0
// msg 'The book is empty!'
sysmsg 'World Saving, Pausing Script'
pause 30000
clearjournal
else
endif
if timer 'Delivery' >= 5200
// Search new BOD to deliver
if @feed 'Smith' 0x2258
//changed from 500
waitforcontext 'Smith' 1 1500
//changed from 500
waitforgump 'any' 1500
replygump 'any' 1
// Rewards
pause 1000
//close bod gump
replygump 0x54f555df 0
//move gold to bank box
@movetype 0xeed 'backpack' 'bank'
pause 1000
//sean REWARDS below
//move checks
if @findtype 0x14f0
while @findtype 0x14f0 'any' 'backpack'
moveitem 'found' 'DumpGoldClothBag'
pause 800
//double click check to make gold
usetype 0x14f0 52 'DumpGoldClothBag'
//(graphic) [color] [source] [range or search level]
endwhile
endif
//move POF
if @findtype 0x1006
while @findtype 0x1006 'any' 'backpack'
moveitem 'found' 'DumpGoldClothBag'
pause 800
endwhile
endif
//move hammers
//move dull copper hammers to trash
if @findtype 0x13e3 '2419' 'backpack'
@moveitem 'found' 'SmithTrashCan'
pause 800
endif
//move all other hammers to bank box bag
if @findtype 0x13e3 'any' 'backpack'
while @findtype 0x13e3 'any' 'backpack'
moveitem 'found' 'DumpGoldClothBag'
pause 800
endwhile
endif
//move ash hammers
// if @findtype 0x13e4
// while @findtype 0x13e4 'any' 'backpack'
// moveitem 'found' 'DumpGoldClothBag'
// pause 800
// endwhile
// endif
//sturdy pickaxe move to trash
if @findtype 0xe86
while @findtype 0xe86 'any' 'backpack'
moveitem 'found' 'SmithTrashCan'
pause 800
endwhile
endif
//sturdy shovel move to trash
if @findtype 0xf39
while @findtype 0xf39 'any' 'backpack'
moveitem 'found' 'SmithTrashCan'
pause 800
endwhile
endif
//gloves of mining
if @findtype 0x13c6
while @findtype 0x13c6 'any' 'backpack'
moveitem 'found' 'SmithTrashCan'
pause 800
endwhile
endif
//prospectors tool
if @findtype 0xfb4
while @findtype 0xfb4 'any' 'backpack'
moveitem 'found' 'SmithTrashCan'
pause 800
endwhile
endif
//gargoyle pickaxe
if @findtype 0xe85
while @findtype 0xe85 'any' 'backpack'
moveitem 'found' 'SmithTrashCan'
pause 800
endwhile
endif
//mining gloves
if @findtype 0x13d5
while @findtype 0x13d5 'any' 'backpack'
moveitem 'found' 'SmithTrashCan'
pause 800
endwhile
endif
//mining gloves +5
if @findtype 0x13eb
while @findtype 0x13eb 'any' 'backpack'
moveitem 'found' 'SmithTrashCan'
pause 800
endwhile
endif
//sean REWARDS above
@movetype 0x2258 'backpack' 'BOD Destination'
pause 1000
//close bod gump
replygump 0x54f555df 0
settimer 'Delivery' 0
elseif not property 'Deeds In Book: 0' 'BOD Source'
useobject! 'BOD Source'
waitforgump 0x54f555df 15000
replygump 0x54f555df 5
pause 1000
else
sysmsg 'No more BODs to deliver!' 25
stop
endif
endif
endfor
 
Last edited:
You must log in or register to reply here.
Top