Sort TAILOR bods after reset - UOS macro

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

Sort TAILOR bods after reset - UOS macro

Post by suiris »

Are you sick of sorting tailor bods after reset by hand?

The macro below can help you automate that process, currently the macro keeps BRSK, HRSK, Bless deed (leather one) bods, small cloth bods and throws all other bods.
You need 2 empty books and a trash bin. Once completed BRSK bods will be in one book, HRSK + Bless in another, and small cloth (recycle bods) will be left in the source book. If you are sorting full book use empty books for your target. If you are afraid that the macro will throw important bods, you can target another book instead of the trash barrel and give it a manual check after.

Do not check the "loop" checkbox:

Code: Select all

//Initialize section
if not findalias 'initialize'
  headmsg 'Target your source book' 33
  promptalias 'sourcebook'
  headmsg 'Target where to store BRSK BODS' 33
  promptalias 'brsk_book'
  headmsg 'Target where to store HRSK and Bless BoDs' 33
  promptalias 'hrsk_book'
  headmsg 'Target your trashbarrel' 33
  promptalias 'trashbin'
endif
//===================================
// 20small + Large exc spined BOD FILTER
// BRSK BODS
useobject 'sourcebook'
waitforgump 0x54f555df 1500
replygump 0x54f555df 1
waitforgump 0x968739db 1500
replygump 0x968739db 4
waitforgump 0x968739db 1500
replygump 0x968739db 13
waitforgump 0x968739db 1500
replygump 0x968739db 66
waitforgump 0x968739db 1500
replygump 0x968739db 19
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
pause 500
//end filter
while @property 'Contents' 'backpack' < 123
  useobject 'sourcebook'
  waitforgump 0x54f555df 1500
  replygump 0x54f555df 5
  waitforgump 0x54f555df 1500
  if replygump 0x54f555df 5
    waitforgump 0x54f555df 1500
    while @findtype 0x2258 1155 'backpack' 'any'
      waitforproperties 'found' 2500
      if property 'Leather Cap' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Leather Gorget' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Leather Gloves' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Leather Tunic' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Leather Sleeves' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Leather Leggings' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Leather Skirt' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Female Leather Armor' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Leather Shorts' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Leather Bustier' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Studded Bustier' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Studded Armor' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      else
        @moveitem 'found' 'trashbin'
        pause 500
      endif
    endwhile
  else
    break
    pause 200
  endif
endwhile
//================================
//Leather 20x small+ Large
//Keeps bless deed bods
//This will trash 120PS BODs
useobject 'sourcebook'
waitforgump 0x54f555df 1500
replygump 0x54f555df 1
waitforgump 0x968739db 1500
replygump 0x968739db 4
waitforgump 0x968739db 1500
replygump 0x968739db 13
waitforgump 0x968739db 1500
replygump 0x968739db 62
waitforgump 0x968739db 1500
replygump 0x968739db 19
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
pause 500
//end filter
while @property 'Contents' 'backpack' < 123
  useobject 'sourcebook'
  waitforgump 0x54f555df 1500
  replygump 0x54f555df 5
  waitforgump 0x54f555df 1500
  if replygump 0x54f555df 5
    waitforgump 0x54f555df 1500
    while @findtype 0x2258 1155 'backpack' 'any'
      waitforproperties 'found' 2500
      if property 'Studded Gorget' 'found'
        @moveitem 'found' 'hrsk_book'
        pause 500
      elseif property 'Studded Gloves' 'found'
        @moveitem 'found' 'hrsk_book'
        pause 500
      elseif property 'Studded Sleeves' 'found'
        @moveitem 'found' 'hrsk_book'
        pause 500
      elseif property 'Studded Leggings' 'found'
        @moveitem 'found' 'hrsk_book'
        pause 500
      elseif property 'Studded Tunic' 'found'
        @moveitem 'found' 'hrsk_book'
        pause 500
      else
        @moveitem 'found' 'trashbin'
        pause 500
      endif
    endwhile
  else
    break
    pause 200
  endif
endwhile
//================================
//small +large exc leather BODs FILTER
//HRSK + 120PS BODS
useobject 'sourcebook'
waitforgump 0x54f555df 1500
replygump 0x54f555df 1
waitforgump 0x968739db 1500
replygump 0x968739db 4
waitforgump 0x968739db 1500
replygump 0x968739db 13
waitforgump 0x968739db 1500
replygump 0x968739db 62
waitforgump 0x968739db 1500
replygump 0x968739db 7
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
pause 500
//end filter
while @property 'Contents' 'backpack' < 123
  useobject 'sourcebook'
  waitforgump 0x54f555df 1500
  replygump 0x54f555df 5
  waitforgump 0x54f555df 1500
  if replygump 0x54f555df 5
    waitforgump 0x54f555df 1500
    while @findtype 0x2258 1155 'backpack' 'any'
      waitforproperties 'found' 2500
      if property 'Leather Cap' 'found'
        @moveitem 'found' 'hrsk_book'
        pause 500
      elseif property 'Leather Gorget' 'found'
        @moveitem 'found' 'hrsk_book'
        pause 500
      elseif property 'Leather Gloves' 'found'
        @moveitem 'found' 'hrsk_book'
        pause 500
      elseif property 'Leather Tunic' 'found'
        @moveitem 'found' 'hrsk_book'
        pause 500
      elseif property 'Leather Sleeves' 'found'
        @moveitem 'found' 'hrsk_book'
        pause 500
      elseif property 'Leather Leggings' 'found'
        @moveitem 'found' 'hrsk_book'
        pause 500
      elseif property 'Leather Skirt' 'found'
        @moveitem 'found' 'hrsk_book'
        pause 500
      elseif property 'Female Leather Armor' 'found'
        @moveitem 'found' 'hrsk_book'
        pause 500
      elseif property 'Leather Shorts' 'found'
        @moveitem 'found' 'hrsk_book'
        pause 500
      elseif property 'Leather Bustier' 'found'
        @moveitem 'found' 'hrsk_book'
        pause 500
      elseif property 'Studded Bustier' 'found'
        @moveitem 'found' 'hrsk_book'
        pause 500
      elseif property 'Studded Armor' 'found'
        @moveitem 'found' 'hrsk_book'
        pause 500
      else
        @moveitem 'found' 'trashbin'
        pause 500
      endif
    endwhile
  else
    break
    pause 200
  endif
endwhile
//================================
//large cloth BODs FILTER
//TRASH BODS
useobject 'sourcebook'
waitforgump 0x968739db 1500
replygump 0x54f555df 1
waitforgump 0x968739db 1500
replygump 0x968739db 12
waitforgump 0x968739db 1500
replygump 0x968739db 58
waitforgump 0x968739db 1500
replygump 0x968739db 5
waitforgump 0x968739db 1500
replygump 0x968739db 7
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
pause 500
//end filter
while @property 'Contents' 'backpack' < 123
  useobject 'sourcebook'
  waitforgump 0x54f555df 1500
  replygump 0x54f555df 5
  waitforgump 0x54f555df 1500
  if replygump 0x54f555df 5
    waitforgump 0x54f555df 1500
    while @findtype 0x2258 1155 'backpack' 'any'      
        @moveitem 'found' 'trashbin'
        pause 500     
    endwhile
  else
    break
    pause 200
  endif
endwhile
//================================
//spinned 10 BODs FILTER
//TRASH BODS
useobject 'sourcebook'
waitforgump 0x54f555df 1500
replygump 0x54f555df 1
waitforgump 0x968739db 1500
replygump 0x968739db 4
waitforgump 0x968739db 1500
replygump 0x968739db 5
waitforgump 0x968739db 1500
replygump 0x968739db 66
waitforgump 0x968739db 1500
replygump 0x968739db 11
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
pause 500
//end filter
while @property 'Contents' 'backpack' < 123
  useobject 'sourcebook'
  waitforgump 0x54f555df 1500
  replygump 0x54f555df 5
  waitforgump 0x54f555df 1500
  if replygump 0x54f555df 5
    waitforgump 0x54f555df 1500
    while @findtype 0x2258 1155 'backpack' 'any'      
        @moveitem 'found' 'trashbin'
        pause 500     
    endwhile
  else
    break
    pause 200
  endif
endwhile
//================================
//spinned 15 BODs FILTER
//TRASH BODS
useobject 'sourcebook'
waitforgump 0x54f555df 1500
replygump 0x54f555df 1
waitforgump 0x968739db 1500
replygump 0x968739db 4
waitforgump 0x968739db 1500
replygump 0x968739db 5
waitforgump 0x968739db 1500
replygump 0x968739db 66
waitforgump 0x968739db 1500
replygump 0x968739db 15
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
pause 500
//end filter
while @property 'Contents' 'backpack' < 123
  useobject 'sourcebook'
  waitforgump 0x54f555df 1500
  replygump 0x54f555df 5
  waitforgump 0x54f555df 1500
  if replygump 0x54f555df 5
    waitforgump 0x54f555df 1500
    while @findtype 0x2258 1155 'backpack' 'any'      
        @moveitem 'found' 'trashbin'
        pause 500     
    endwhile
  else
    break
    pause 200
  endif
endwhile
//================================
//All 10,15,20 Horned BODS FILTER
//BRSK BODS
useobject 'sourcebook'
waitforgump 0x54f555df 1500
replygump 0x54f555df 1
waitforgump 0x968739db 1500
replygump 0x968739db 4
waitforgump 0x968739db 1500
replygump 0x968739db 13
waitforgump 0x968739db 1500
replygump 0x968739db 70
waitforgump 0x968739db 1500
replygump 0x968739db 7
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
pause 500
//end filter
while @property 'Contents' 'backpack' < 123
  useobject 'sourcebook'
  waitforgump 0x54f555df 1500
  replygump 0x54f555df 5
  waitforgump 0x54f555df 1500
  if replygump 0x54f555df 5
    waitforgump 0x54f555df 1500
    while @findtype 0x2258 1155 'backpack' 'any'
      waitforproperties 'found' 2500
      if property 'Leather Cap' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Leather Gorget' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Leather Gloves' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Leather Tunic' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Leather Sleeves' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Leather Leggings' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Leather Skirt' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Female Leather Armor' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Leather Shorts' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Leather Bustier' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Studded Bustier' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Studded Armor' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      else
        @moveitem 'found' 'trashbin'
        pause 500
      endif
    endwhile
  else
    break
    pause 200
  endif
endwhile
//================================
//All 10,15,20 Barbed BODs FILTER
//BRSK BODS
useobject 'sourcebook'
waitforgump 0x54f555df 1500
replygump 0x54f555df 1
waitforgump 0x968739db 1500
replygump 0x968739db 4
waitforgump 0x968739db 1500
replygump 0x968739db 13
waitforgump 0x968739db 1500
replygump 0x968739db 74
waitforgump 0x968739db 1500
replygump 0x968739db 7
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
pause 500
//end filter
while @property 'Contents' 'backpack' < 123
  useobject 'sourcebook'
  waitforgump 0x54f555df 1500
  replygump 0x54f555df 5
  waitforgump 0x54f555df 1500
  if replygump 0x54f555df 5
    waitforgump 0x54f555df 1500
    while @findtype 0x2258 1155 'backpack' 'any'
      waitforproperties 'found' 2500
      if property 'Leather Cap' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Leather Gorget' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Leather Gloves' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Leather Tunic' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Leather Sleeves' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Leather Leggings' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Leather Skirt' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Female Leather Armor' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Leather Shorts' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Leather Bustier' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Studded Bustier' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      elseif property 'Studded Armor' 'found'
        @moveitem 'found' 'brsk_book'
        pause 500
      else
        @moveitem 'found' 'trashbin'
        pause 500
      endif
    endwhile
  else
    break
    pause 200
  endif
endwhile
//=================================
//All NORMAL large BODS
//TRASH BODS
useobject 'sourcebook'
waitforgump 0x54f555df 15000
replygump 0x54f555df 1
waitforgump 0x968739db 15000
replygump 0x968739db 12
waitforgump 0x968739db 15000
replygump 0x968739db 9
waitforgump 0x968739db 15000
replygump 0x968739db 54
waitforgump 0x968739db 15000
replygump 0x968739db 7
waitforgump 0x968739db 15000
replygump 0x968739db 0
waitforgump 0x54f555df 15000
pause 500
//end filter
while @property 'Contents' 'backpack' < 123
  useobject 'sourcebook'
  waitforgump 0x54f555df 1500
  replygump 0x54f555df 5
  waitforgump 0x54f555df 1500
  if replygump 0x54f555df 5
    waitforgump 0x54f555df 1500
    while @findtype 0x2258 1155 'backpack' 'any'      
        @moveitem 'found' 'trashbin'
        pause 500     
    endwhile
  else
    break
    pause 200
  endif
endwhile
//=================================
@unsetalias 'brsk_book'
@unsetalias 'hrsk_book'
@unsetalias 'sourcebook'
Last edited by suiris on April 8th, 2017, 4:30 pm, edited 3 times in total.
User avatar
Tanya
Posts: 1796

Re: Sort bods after reset - UOS macro

Post by Tanya »

Thank you!
Peerless Hunter
Guide to Whammy - viewtopic.php?f=10&t=314
My youtube channel - /watch?v=sx5zGCbILtA
Weekly Bedlam Spawns - viewtopic.php?f=2&t=9131
Cunnana
Posts: 1005

Re: Sort bods after reset - UOS macro

Post by Cunnana »

Anyone have a BS macro like that?
suiris
Posts: 150

Re: Sort TAILOR bods after reset - UOS macro

Post by suiris »

I have made a BS variant also, but prefer to keep it private for now.
Just look at the one above, it might seem long but it is actually very simple.
With a minimal effort one can change it to suit different needs.
hrs024
Posts: 2634

Re: Sort TAILOR bods after reset - UOS macro

Post by hrs024 »

bump
DISCORD NAME hrs024 #0656
Post Reply