Tailor bod turn in

Share your guides, how-tos, FAQs, and so forth. This is not for support -- post questions in General Discussion.
Post Reply
Souced
Posts: 145

Tailor bod turn in

Post by Souced »

i am sure that they are out there would someone like to post one please and steam version of course
My parents said I could be anything when I grew up, I picked Asshole! How am I doing?
hrs024 likes this.
Top
suiris
Posts: 150

Re: Tailor bod turn in

Post by suiris »

I use this one, it works very well for me.
You will need dye tub, bonded beetle, and runebook. The script uses chivalry to recall and does not make check for skill or spell fizzle so make sure your chivalry is sufficient. The first rune in the book should be your bank location and the second one should be your vendor location.
I recommend against using Luna as your location as there are too much ppl there and you will get location blocked quite often.

The script navigates your char to the vendor so choosing a location with less obstacles is a good practice.
The script calls the name of the vendor to make it stop moving around. Make sure you put the name of the vendor you chose to use (look for the comment in the code).

loop checkbox should be checked.

Code: Select all

if 'mounted'
  useobject 'self'
  pause 1000
endif
//init phase
if not @findalias 'INIT_Tailor'
  headmsg 'Target your beetle'
  promptalias 'beetle' 
  headmsg 'Target the VENDOR'
  promptalias 'vendor' 
  headmsg 'Target your dye tub'
  promptalias 'dyeTub' 
  headmsg 'Target your runebook'
  promptalias 'runebook tailor' 
  @setalias 'INIT_Tailor' 'self'
endif
// end of initialization phase
if not timerexists 'feedPet'
  createtimer 'feedPet'
endif
if not @findalias 'applyfilter'
  if not @findalias 'BulkSource'
    promptalias 'BulkSource'
  endif
  if not @findalias 'BulkDestination'
    promptalias 'BulkDestination'
  endif
  @useobject 'BulkSource'
  waitforgump 0x54f555df 15000
  replygump 0x54f555df 1
  waitforgump 0x968739db 15000
  replygump 0x968739db 4
  waitforgump 0x968739db 15000
  replygump 0x968739db 5
  waitforgump 0x968739db 15000
  replygump 0x968739db 54
  waitforgump 0x968739db 15000
  replygump 0x968739db 7
  waitforgump 0x968739db 15000
  replygump 0x968739db 0
  waitforgump 0x54f555df 15000
  pause 1000
  createtimer 'walkTime'
  settimer 'walkTime' 0
  @setalias 'applyfilter' 'self'
  //END OF FILTER SECTION
endif
// Hourly feed the beetle
if timer 'feedPet' >= 3600000
  pause 1500
  feed 'beetle' 'Meat' 'any' 1
  pause 500
  if injournal 'happier'
    settimer 'feedPet' 0
    sysmsg 'Pet Fed' 33
    clearjournal
  else
    sysmsg 'Out of Meat!' 33
    useobject 'beetle'
    clearjournal
    stop
  endif
endif
//book check
if property '50' 'BulkDestination'
  sysmsg 'Need to empty book'
  @setalias 'EmptyBeetle' 'self'
elseif property '100' 'BulkDestination'
  sysmsg 'Need to empty book'
  @setalias 'EmptyBeetle' 'self'
elseif property '150' 'BulkDestination'
  sysmsg 'Need to empty book'
  @setalias 'EmptyBeetle' 'self'
elseif property '200' 'BulkDestination'
  sysmsg 'Need to empty book'
  @setalias 'EmptyBeetle' 'self'
elseif property '250' 'BulkDestination'
  sysmsg 'Need to empty book'
  @setalias 'EmptyBeetle' 'self'
elseif property '300' 'BulkDestination'
  sysmsg 'Need to empty book'
  @setalias 'EmptyBeetle' 'self'
elseif property '350' 'BulkDestination'
  sysmsg 'Need to empty book'
  @setalias 'EmptyBeetle' 'self'
elseif property '400' 'BulkDestination'
  sysmsg 'Need to empty book'
  @setalias 'EmptyBeetle' 'self'
elseif property '450' 'BulkDestination'
  sysmsg 'Need to empty book'
  @setalias 'EmptyBeetle' 'self'
elseif property '500' 'BulkDestination'
  sysmsg 'Need to empty book'
  @setalias 'EmptyBeetle' 'self'
elseif property 'Deeds in Book: 0' 'BulkSource'
  sysmsg 'No more bods in your book for swapping'
  pause 1000
  @contextmenu 'BulkDestination' 'Name'
  waitforprompt 5000
  @promptmsg 'CHECK AND RESEW'
  sysmsg 'Script finishing... Good Luck!'
  sysmsg 'Script Total Time:'
  timermsg 'walkTime' 34
  @unsetalias 'BulkSource'
  @unsetalias 'BulkDestination'
  @unsetalias 'applyfilter'
  useobject 'beetle'
  stop
endif
// end of book check
//emtpy beetle
if @findalias 'EmptyBeetle'
  pause 800
  @useobject 'runebook tailor'
  waitforgump 0x554b87f3 15000
  @replygump 0x554b87f3 7 // using first rune to go to bank
  pause 1500
  waitforcontext 'beetle' 10 5000
  pause 1500
  msg 'bank'
  @movetype 0x1767 'beetle' 'bank'
  pause 1000
  @movetype 0xeed 'beetle' 'bank'
  pause 2000
  @useobject 'runebook tailor'
  waitforgump 0x554b87f3 5000
  @replygump 0x554b87f3 13 //using second rune to go to vendor
  @unsetalias 'EmptyBeetle'
endif
//end of emtpy beetle section
if 'mounted'
  useobject 'self'
endif
//movetovendor
while not @inrange 'vendor' 1
  if @x 'vendor' > x 'self' and @y 'vendor' > y 'self'
    walk 'Southeast'
  elseif @x 'vendor' < x 'self' and @y 'vendor' > y 'self'
    walk 'Southwest'
  elseif @x 'vendor' > x 'self' and @y 'vendor' < y 'self'
    walk 'Northeast'
  elseif @x 'vendor' < x 'self' and @y 'vendor' < y 'self'
    walk 'Northwest'
  elseif @x 'vendor' > x 'self' and @y 'vendor' == y 'self'
    walk 'East'
  elseif @x 'vendor' < x 'self' and @y 'vendor' == y 'self'
    walk 'West'
  elseif @x 'vendor' == x 'self' and @y 'vendor' > y 'self'
    walk 'South'
  elseif @x 'vendor' == x 'self' and @y 'vendor' < y 'self'
    walk 'North'
  endif
  msg 'Maia' // <----Put the name of the vendor here
endwhile
// end of move to vendor
waitforcontext 'Vendor' 1 15000
pause 800
if @injournal 'An offer may be available'
  sysmsg 'try later'
  @clearjournal
else
  pause 800
  @replygump 0x9bade6ea 1
  @replygump 0xbe0dad1e 1
endif
//storebod
pause 800
if @findtype 0x2258 1155 'backpack'
  @setalias 'bod' 'found'
  @moveitem 'bod' 'BulkDestination'
  pause 400
  @unsetalias 'bod'
  @ignoreobject 'found'
endif
// end of take bod from vendor
//getbod from book and returnbod
pause 800
@useobject 'BulkSource'
waitforgump 0x54f555df 15000
@replygump 0x54f555df 5
waitforgump 0x54f555df 15000
@replygump 0x54f555df 0
pause 800
if @findtype 0x2258 1155 'backpack'
  @setalias 'bod' 'found'
  @ignoreobject 'found'
  pause 800
  @moveitem 'bod' 'vendor'
  if @injournal 'have to wait a few seconds'
    pause 6000
    @clearjournal
    @moveitem 'bod' 'vendor'
  endif
endif
//
//check what prize you have
pause 800
@useobject 'dyeTub'
waitfortarget 15000
pause 800
@targettype 0x1767
@canceltarget
pause 800
@movetypeoffset 0x170d 'backpack' 'ground' 2
pause 800
@movetype 0xeed 'backpack' 'beetle'
pause 800
@movetype 0x1767 'backpack' 'beetle'
pause 800
hrs024 likes this.
Top
Souced
Posts: 145

Re: Tailor bod turn in

Post by Souced »

thanks
My parents said I could be anything when I grew up, I picked Asshole! How am I doing?
hrs024
Posts: 2634

Re: Tailor bod turn in

Post by hrs024 »

this script freezes my client after i have 50 bods in my turnin book, after saying i need to empy book? any way to remedy this??
DISCORD NAME hrs024 #0656
hrs024
Posts: 2634

Re: Tailor bod turn in

Post by hrs024 »

it also just drops gold and cloth on floor when beetle is full?
DISCORD NAME hrs024 #0656
suiris
Posts: 150

Re: Tailor bod turn in

Post by suiris »

if it dumps gold an cloth on the floor, then it means something is wrong and it was unable to empty the beetle.
Check if it recalls when destination book has 50,100,150,200 etc. bods.
hrs024
Posts: 2634

Re: Tailor bod turn in

Post by hrs024 »

yeah it does not recall, it just says empty book and freezes? im not a scriptor so i dunno why it does not recall? i got chiv and my runebook is setup as you said in the post? any remedy to this.. i am aware there is something wrong lol
DISCORD NAME hrs024 #0656
suiris
Posts: 150

Re: Tailor bod turn in

Post by suiris »

Open UOSteam, go to macros, on bottom right there is a button "active objects" press it and look for "runebook tailor", check its value. Then type "-info" in game and target your runebook, check its ID, verify if they are the same.
If they are not the same or the "runebook tailor" is missing, remove "INIT_tailor" object from active objects list and restart the script. Make sure you select the proper runebook when prompted and your bank rune is the first one and the vendor rune is the second one.
hrs024
Posts: 2634

Re: Tailor bod turn in

Post by hrs024 »

ok il try that, tyvm
DISCORD NAME hrs024 #0656
navarthelol
Posts: 94

Re: Tailor bod turn in

Post by navarthelol »

suiris wrote:I use this one, it works very well for me.
You will need dye tub, bonded beetle, and runebook. The script uses chivalry to recall and does not make check for skill or spell fizzle so make sure your chivalry is sufficient. The first rune in the book should be your bank location and the second one should be your vendor location.
I recommend against using Luna as your location as there are too much ppl there and you will get location blocked quite often.

The script navigates your char to the vendor so choosing a location with less obstacles is a good practice.
The script calls the name of the vendor to make it stop moving around. Make sure you put the name of the vendor you chose to use (look for the comment in the code).

loop checkbox should be checked.
hi Suiris, your script works good, it's nice and fast :) Hope you don't mind but I've simplified it a little to avoid complexity of needing to use rune book and beetle, instead it will just camp luna and deposit everything into the bank

regards,

Code: Select all

//init phase
if not @findalias 'INIT_Tailor'
  headmsg 'Target your secure'
  promptalias 'secure' 
  headmsg 'Target the VENDOR'
  promptalias 'vendor' 
  headmsg 'Target your dye tub'
  promptalias 'dyeTub' 
  headmsg 'Target your runebook'
  promptalias 'runebook tailor' 
  @setalias 'INIT_Tailor' 'self'
endif
if not @findalias 'applyfilter'
  if not @findalias 'BulkSource'
    promptalias 'BulkSource'
  endif
  if not @findalias 'BulkDestination'
    promptalias 'BulkDestination'
  endif
  @useobject 'BulkSource'
  waitforgump 0x54f555df 15000
  replygump 0x54f555df 1
  waitforgump 0x968739db 15000
  replygump 0x968739db 4
  waitforgump 0x968739db 15000
  replygump 0x968739db 5
  waitforgump 0x968739db 15000
  replygump 0x968739db 54
  waitforgump 0x968739db 15000
  replygump 0x968739db 7
  waitforgump 0x968739db 15000
  replygump 0x968739db 0
  waitforgump 0x54f555df 15000
  pause 1000
  createtimer 'walkTime'
  settimer 'walkTime' 0
  @setalias 'applyfilter' 'self'
  //END OF FILTER SECTION
endif
//book check
if property 'Deeds in Book: 0' 'BulkSource'
  sysmsg 'No more bods in your book for swapping'
  pause 1000
  @contextmenu 'BulkDestination' 'Name'
  waitforprompt 5000
  @promptmsg 'CHECK AND RESEW'
  sysmsg 'Script finishing... Good Luck!'
  sysmsg 'Script Total Time:'
  timermsg 'walkTime' 34
  @unsetalias 'BulkSource'
  @unsetalias 'BulkDestination'
  @unsetalias 'applyfilter'
  useobject 'beetle'
  stop
endif
// end of book check
//movetovendor
while not @inrange 'vendor' 1
  if @x 'vendor' > x 'self' and @y 'vendor' > y 'self'
    walk 'Southeast'
  elseif @x 'vendor' < x 'self' and @y 'vendor' > y 'self'
    walk 'Southwest'
  elseif @x 'vendor' > x 'self' and @y 'vendor' < y 'self'
    walk 'Northeast'
  elseif @x 'vendor' < x 'self' and @y 'vendor' < y 'self'
    walk 'Northwest'
  elseif @x 'vendor' > x 'self' and @y 'vendor' == y 'self'
    walk 'East'
  elseif @x 'vendor' < x 'self' and @y 'vendor' == y 'self'
    walk 'West'
  elseif @x 'vendor' == x 'self' and @y 'vendor' > y 'self'
    walk 'South'
  elseif @x 'vendor' == x 'self' and @y 'vendor' < y 'self'
    walk 'North'
  endif
  msg 'Thomas' // <----Put the name of the vendor here
endwhile
// end of move to vendor
waitforcontext 'Vendor' 1 15000
pause 800
if @injournal 'An offer may be available'
  sysmsg 'try later'
  @clearjournal
else
  pause 800
  @replygump 0x9bade6ea 1
  @replygump 0xbe0dad1e 1
endif
//storebod
pause 800
if @findtype 0x2258 1155 'backpack'
  @setalias 'bod' 'found'
  @moveitem 'bod' 'BulkDestination'
  pause 400
  @unsetalias 'bod'
  @ignoreobject 'found'
endif
// end of take bod from vendor
//getbod from book and returnbod
pause 800
@useobject 'BulkSource'
waitforgump 0x54f555df 15000
@replygump 0x54f555df 5
waitforgump 0x54f555df 15000
@replygump 0x54f555df 0
pause 800
if @findtype 0x2258 1155 'backpack'
  @setalias 'bod' 'found'
  @ignoreobject 'found'
  pause 800
  @moveitem 'bod' 'vendor'
  if @injournal 'have to wait a few seconds'
    pause 6000
    @clearjournal
    @moveitem 'bod' 'vendor'
  endif
endif
//check what prize you have
msg 'bank'
pause 800
@useobject 'dyeTub'
waitfortarget 15000
pause 800
@targettype 0x1767
@canceltarget
pause 800
@movetypeoffset 0x170d 'backpack' 'ground' 2
pause 800
@movetype 0xeed 'backpack' 'secure'
pause 800
@movetype 0x1767 'backpack' 'secure'
pause 800
Sabata and hrs024 like this.
Top
hrs024
Posts: 2634

Re: Tailor bod turn in

Post by hrs024 »

bump
DISCORD NAME hrs024 #0656
Post Reply