A Mondain's Legacy era Ultima Online freeshard.
https://www.uogdemise.com/community/
https://www.uogdemise.com/community/viewtopic.php?f=10&t=21776
fluffhead321 wrote:Hey, I've got about 40 books of 250 (so me a few more, some a few less) BOD reset. Anyone have a script (Steam or EUO) to combine the books to make them 500 each? I could also use a Tailor and Smith script to fill the resets. Thanks!!
fluffhead321 wrote:Hey, I've got about 40 books of 250 (so me a few more, some a few less) BOD reset. Anyone have a script (Steam or EUO) to combine the books to make them 500 each? I could also use a Tailor and Smith script to fill the resets. Thanks!!
fluffhead321 wrote:Hey, I've got about 40 books of 250 (so me a few more, some a few less) BOD reset. Anyone have a script (Steam or EUO) to combine the books to make them 500 each? I could also use a Tailor and Smith script to fill the resets. Thanks!!
Code: Select all
//COMBINE ALL SMITH BOOKS IN PACK
clearignorelist
promptalias 'book1'
ignoreobject 'book1'
while @findtype '0x2259' 'any' 'backpack'
@setalias 'booktoempty' 'found'
if @property 'Deeds in Book' 'booktoempty' > 0
while @property 'Deeds in Book' 'booktoempty' > 0
useobject 'booktoempty'
waitforgump 0x54f555df 1500
while @property 'Deeds in Book' 'booktoempty' > 0 and @property 'Contents' 'backpack' < 123
if counttype 0x2258 1155 'backpack' > 0
sysmsg 'Tailor Bods! Stopping!' 34
stop
endif
replygump 0x54f555df 5
waitforgump 0x54f555df 1500
endwhile
while counttype 0x2258 '1102' 'backpack' > 0
movetype 0x2258 'backpack' 'book1' [(0 0 0)] 1102
pause 100
endwhile
pause 550
endwhile
endif
ignoreobject 'booktoempty'
endwhile
//COMBINE ALL TAILOR BOOKS IN PACK
clearignorelist
promptalias 'book1'
ignoreobject 'book1'
while @findtype '0x2259' 'any' 'backpack'
@setalias 'booktoempty' 'found'
if @property 'Deeds in Book' 'booktoempty' > 0
while @property 'Deeds in Book' 'booktoempty' > 0
useobject 'booktoempty'
waitforgump 0x54f555df 1500
while @property 'Deeds in Book' 'booktoempty' > 0 and @property 'Contents' 'backpack' < 123
if counttype 0x2258 1102 'backpack' > 0
sysmsg 'Blacksmith Bods! Stopping!' 34
stop
endif
replygump 0x54f555df 5
waitforgump 0x54f555df 1500
endwhile
while counttype 0x2258 '1155' 'backpack' > 0
movetype 0x2258 'backpack' 'book1' [(0 0 0)] 1155
pause 100
endwhile
pause 550
endwhile
endif
ignoreobject 'booktoempty'
endwhile