You will need 6 empty books as i wanted my bods sorted to different books for different rewards, you can always use less by targeting same book multiple times. The script is made to keep anything above copper hammer, above ASH +15 and PS 120.
Copper, bronze, ASH hammers, 120PS and PoFs are sorted in different books, everything else (gold hammer and above) goes to the last book.
It's quite long (1250 lines) and i won't be supporting it in any way. Use on your own risk, you can use another book instead of trash to avoid loosing bods you might want.
leave "loop" checkbox unchecked
Code: Select all
if not findalias 'initialize'
headmsg 'Target your source book' 33
promptalias 'sourcebook'
headmsg 'Target where to store copper hammers BODS' 33
promptalias 'copper_book'
headmsg 'Target where to store bronze hammers BODS' 33
promptalias 'bronze_book'
headmsg 'Target where to store ASH hammers BODS' 33
promptalias 'ASH_book'
headmsg 'Target where to store 120PS BODs' 33
promptalias 'PS_book'
headmsg 'Target where to store PoF BODS' 33
promptalias 'PoF_book'
headmsg 'Target where to store other good BODS' 33
promptalias 'good_book'
headmsg 'Target your trashbarrel' 33
promptalias 'trashbin'
endif
//=================================
//All Large normal quality BODS
//Trash bods
//=================================
useobject 'sourcebook'
waitforgump 0x54f555df 1500
replygump 0x54f555df 1
waitforgump 0x968739db 1500
replygump 0x968739db 12
waitforgump 0x968739db 1500
replygump 0x968739db 9
waitforgump 0x968739db 1500
replygump 0x968739db 6
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 1102 'backpack' 'any'
@moveitem 'found' 'trashbin'
pause 500
endwhile
else
break
pause 200
endif
endwhile
//==============================
//Large Iron
//throws everything
//==============================
useobject 'sourcebook'
waitforgump 0x54f555df 15000
replygump 0x54f555df 1
waitforgump 0x968739db 15000
replygump 0x968739db 12
waitforgump 0x968739db 15000
replygump 0x968739db 13
waitforgump 0x968739db 15000
replygump 0x968739db 10
waitforgump 0x968739db 15000
replygump 0x968739db 7
waitforgump 0x968739db 15000
replygump 0x968739db 0
waitforgump 0x54f555df 15000
pause 500
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 1102 'backpack' 'any'
@moveitem 'found' 'trashbin'
pause 500
endwhile
else
break
pause 200
endif
endwhile
//===============================
//Small + Large x10 dull copper
//================================
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 14
waitforgump 0x968739db 1500
replygump 0x968739db 11
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
pause 500
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 1102 'backpack' 'any'
waitforproperties 'found' 2500
if property 'Chainmail Coif' 'found'
@moveitem 'found' 'bronze_book'
pause 500
elseif property 'Chainmail Leggings' 'found'
@moveitem 'found' 'bronze_book'
pause 500
elseif property 'Chainmail Tunic' 'found'
@moveitem 'found' 'bronze_book'
pause 500
else
@moveitem 'found' 'trashbin'
pause 500
endif
endwhile
else
break
pause 200
endif
endwhile
//=============================
//Small + Large x15 dull copper
//=============================
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 14
waitforgump 0x968739db 1500
replygump 0x968739db 15
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
pause 500
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 1102 'backpack' 'any'
waitforproperties 'found' 2500
if property 'Chainmail Coif' 'found'
@moveitem 'found' 'bronze_book'
pause 500
elseif property 'Chainmail Leggings' 'found'
@moveitem 'found' 'bronze_book'
pause 500
elseif property 'Chainmail Tunic' 'found'
@moveitem 'found' 'bronze_book'
pause 500
else
@moveitem 'found' 'trashbin'
pause 500
endif
endwhile
else
break
pause 200
endif
endwhile
//================================
//Small + Large x20 dull copper
//Keeps Ringmail for copper hammers
//Keeps Platemail for ASH 15
//Keeps other smalls for PoF
//================================
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 14
waitforgump 0x968739db 1500
replygump 0x968739db 19
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
pause 500
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 1102 'backpack' 'any'
waitforproperties 'found' 2500
if property 'Ringmail Gloves' 'found'
@moveitem 'found' 'copper_book'
pause 500
elseif property 'Ringmail Tunic' 'found'
@moveitem 'found' 'copper_book'
pause 500
elseif property 'Ringmail Sleeves' 'found'
@moveitem 'found' 'copper_book'
pause 500
elseif property 'Ringmail Leggings' 'found'
@moveitem 'found' 'copper_book'
pause 500
elseif property 'Platemail Arms' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Legs' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Plate Helm' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Gorget' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Gloves' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Tunic' 'found'
@moveitem 'found' 'ASH_book'
pause 500
else
if property 'Large Bulk Order' 'found'
@moveitem 'found' 'trashbin'
pause 500
else
@moveitem 'found' 'PoF_book'
pause 500
endif
endif
endwhile
else
break
pause 200
endif
endwhile
//===========================
//Small + Large x20 shadow iron
//===========================
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 18
waitforgump 0x968739db 1500
replygump 0x968739db 19
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
pause 500
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 1102 'backpack' 'any'
waitforproperties 'found' 2500
if property 'Ringmail Gloves' 'found'
@moveitem 'found' 'bronze_book'
pause 500
elseif property 'Ringmail Tunic' 'found'
@moveitem 'found' 'bronze_book'
pause 500
elseif property 'Ringmail Sleeves' 'found'
@moveitem 'found' 'bronze_book'
pause 500
elseif property 'Ringmail Leggings' 'found'
@moveitem 'found' 'bronze_book'
pause 500
elseif property 'Platemail Arms' 'found'
@moveitem 'found' 'PS_book'
pause 500
elseif property 'Platemail Legs' 'found'
@moveitem 'found' 'PS_book'
pause 500
elseif property 'Plate Helm' 'found'
@moveitem 'found' 'PS_book'
pause 500
elseif property 'Platemail Gorget' 'found'
@moveitem 'found' 'PS_book'
pause 500
elseif property 'Platemail Gloves' 'found'
@moveitem 'found' 'PS_book'
pause 500
elseif property 'Platemail Tunic' 'found'
@moveitem 'found' 'PS_book'
pause 500
else
@moveitem 'found' 'trashbin'
pause 500
endif
endwhile
else
break
pause 200
endif
endwhile
//================================
//Small + Large x10,x15 shadow iron
//=================================
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 18
waitforgump 0x968739db 1500
replygump 0x968739db 7
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
pause 500
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 1102 'backpack' 'any'
waitforproperties 'found' 2500
if property 'Ringmail Gloves' 'found'
@moveitem 'found' 'copper_book'
pause 500
elseif property 'Ringmail Tunic' 'found'
@moveitem 'found' 'copper_book'
pause 500
elseif property 'Ringmail Sleeves' 'found'
@moveitem 'found' 'copper_book'
pause 500
elseif property 'Ringmail Leggings' 'found'
@moveitem 'found' 'copper_book'
pause 500
elseif property 'Platemail Arms' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Legs' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Plate Helm' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Gorget' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Gloves' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Tunic' 'found'
@moveitem 'found' 'ASH_book'
pause 500
else
if property 'Large Bulk Order' 'found'
@moveitem 'found' 'trashbin'
pause 500
else
@moveitem 'found' 'PoF_book'
pause 500
endif
endif
endwhile
else
break
pause 200
endif
endwhile
//Small + Large x20 Copper
//=========================
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 22
waitforgump 0x968739db 1500
replygump 0x968739db 19
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
pause 500
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 1102 'backpack' 'any'
waitforproperties 'found' 2500
if property 'Chainmail Coif' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Chainmail Leggings' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Chainmail Tunic' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Arms' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Legs' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Plate Helm' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Gorget' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Gloves' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Tunic' 'found'
@moveitem 'found' 'good_book'
pause 500
else
@moveitem 'found' 'trashbin'
pause 500
endif
endwhile
else
break
pause 200
endif
endwhile
//=========================
//Small + Large x10,x15 Copper
//=========================
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 22
waitforgump 0x968739db 1500
replygump 0x968739db 7
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
pause 500
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 1102 'backpack' 'any'
waitforproperties 'found' 2500
if property 'Ringmail Gloves' 'found'
@moveitem 'found' 'bronze_book'
pause 500
elseif property 'Ringmail Tunic' 'found'
@moveitem 'found' 'bronze_book'
pause 500
elseif property 'Ringmail Sleeves' 'found'
@moveitem 'found' 'bronze_book'
pause 500
elseif property 'Ringmail Leggings' 'found'
@moveitem 'found' 'bronze_book'
pause 500
elseif property 'Platemail Arms' 'found'
@moveitem 'found' 'PS_book'
pause 500
elseif property 'Platemail Legs' 'found'
@moveitem 'found' 'PS_book'
pause 500
elseif property 'Plate Helm' 'found'
@moveitem 'found' 'PS_book'
pause 500
elseif property 'Platemail Gorget' 'found'
@moveitem 'found' 'PS_book'
pause 500
elseif property 'Platemail Gloves' 'found'
@moveitem 'found' 'PS_book'
pause 500
elseif property 'Platemail Tunic' 'found'
@moveitem 'found' 'PS_book'
pause 500
else
@moveitem 'found' 'trashbin'
pause 500
endif
endwhile
else
break
pause 200
endif
endwhile
//========================
//Small + Large x20 bronze
//========================
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 26
waitforgump 0x968739db 1500
replygump 0x968739db 19
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
pause 500
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 1102 'backpack' 'any'
waitforproperties 'found' 2500
if property 'Chainmail Coif' 'found'
@moveitem 'found' 'PS_book'
pause 500
elseif property 'Chainmail Leggings' 'found'
@moveitem 'found' 'PS_book'
pause 500
elseif property 'Chainmail Tunic' 'found'
@moveitem 'found' 'PS_book'
pause 500
elseif property 'Platemail Arms' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Legs' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Plate Helm' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Gorget' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Gloves' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Tunic' 'found'
@moveitem 'found' 'ASH_book'
pause 500
else
@moveitem 'found' 'trashbin'
pause 500
endif
endwhile
else
break
pause 200
endif
endwhile
//==========================
//Small + Large x10,x15 bronze
//===========================
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 26
waitforgump 0x968739db 1500
replygump 0x968739db 7
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
pause 500
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 1102 'backpack' 'any'
waitforproperties 'found' 2500
if property 'Chainmail Coif' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Chainmail Leggings' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Chainmail Tunic' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Arms' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Legs' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Plate Helm' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Gorget' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Gloves' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Tunic' 'found'
@moveitem 'found' 'good_book'
pause 500
else
@moveitem 'found' 'trashbin'
pause 500
endif
endwhile
else
break
pause 200
endif
endwhile
//======================================
//Small + Large x20 gold
//======================================
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 34
waitforgump 0x968739db 1500
replygump 0x968739db 19
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
pause 500
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 1102 'backpack' 'any'
waitforproperties 'found' 2500
if property 'Ringmail Gloves' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Ringmail Tunic' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Ringmail Sleeves' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Ringmail Leggings' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Chainmail Coif' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Chainmail Leggings' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Chainmail Tunic' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Arms' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Legs' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Plate Helm' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Gorget' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Gloves' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Tunic' 'found'
@moveitem 'found' 'good_book'
pause 500
else
@moveitem 'found' 'copper_book'
pause 500
endif
endwhile
else
break
pause 200
endif
endwhile
//==========================
//Small + large x10,x15 gold
//==========================
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 34
waitforgump 0x968739db 1500
replygump 0x968739db 7
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
pause 500
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 1102 'backpack' 'any'
waitforproperties 'found' 2500
if property 'Chainmail Coif' 'found'
@moveitem 'found' 'PS_book'
pause 500
elseif property 'Chainmail Leggings' 'found'
@moveitem 'found' 'PS_book'
pause 500
elseif property 'Chainmail Tunic' 'found'
@moveitem 'found' 'PS_book'
pause 500
elseif property 'Platemail Arms' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Legs' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Plate Helm' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Gorget' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Gloves' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Tunic' 'found'
@moveitem 'found' 'good_book'
pause 500
else
@moveitem 'found' 'trashbin'
pause 500
endif
endwhile
else
break
pause 200
endif
endwhile
//=============================
//Small + Large x20 agapite
//=============================
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 38
waitforgump 0x968739db 1500
replygump 0x968739db 19
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
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 1102 'backpack' 'any'
waitforproperties 'found' 2500
if property 'Ringmail Gloves' 'found'
@moveitem 'found' 'PS_book'
pause 500
elseif property 'Ringmail Tunic' 'found'
@moveitem 'found' 'PS_book'
pause 500
elseif property 'Ringmail Sleeves' 'found'
@moveitem 'found' 'PS_book'
pause 500
elseif property 'Ringmail Leggings' 'found'
@moveitem 'found' 'PS_book'
pause 500
elseif property 'Chainmail Coif' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Chainmail Leggings' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Chainmail Tunic' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Arms' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Legs' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Plate Helm' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Gorget' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Gloves' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Tunic' 'found'
@moveitem 'found' 'ASH_book'
pause 500
else
@moveitem 'found' 'bronze_book'
pause 500
endif
endwhile
else
break
pause 200
endif
endwhile
//==============================
//Small + Large x10,x15 agapite
//==============================
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 38
waitforgump 0x968739db 1500
replygump 0x968739db 7
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
pause 500
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 1102 'backpack' 'any'
waitforproperties 'found' 2500
if property 'Ringmail Gloves' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Ringmail Tunic' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Ringmail Sleeves' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Ringmail Leggings' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Chainmail Coif' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Chainmail Leggings' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Chainmail Tunic' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Arms' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Legs' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Plate Helm' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Gorget' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Gloves' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Tunic' 'found'
@moveitem 'found' 'good_book'
pause 500
else
@moveitem 'found' 'trashbin'
pause 500
endif
endwhile
else
break
pause 200
endif
endwhile
//==================================================
//Small + Large x20 Verite
//Throws away the small ones ones not part of a set
//==================================================
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 42
waitforgump 0x968739db 1500
replygump 0x968739db 19
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
pause 500
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 1102 'backpack' 'any'
waitforproperties 'found' 2500
if property 'Ringmail Gloves' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Ringmail Tunic' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Ringmail Sleeves' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Ringmail Leggings' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Chainmail Coif' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Chainmail Leggings' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Chainmail Tunic' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Arms' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Legs' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Plate Helm' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Gorget' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Gloves' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Tunic' 'found'
@moveitem 'found' 'good_book'
pause 500
else
@moveitem 'found' 'trashbin'
pause 500
endif
endwhile
else
break
pause 200
endif
endwhile
//============================
//Small + Large x10,x15 Verite
//============================
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 42
waitforgump 0x968739db 1500
replygump 0x968739db 7
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
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 1102 'backpack' 'any'
waitforproperties 'found' 2500
if property 'Ringmail Gloves' 'found'
@moveitem 'found' 'PS_book'
pause 500
elseif property 'Ringmail Tunic' 'found'
@moveitem 'found' 'PS_book'
pause 500
elseif property 'Ringmail Sleeves' 'found'
@moveitem 'found' 'PS_book'
pause 500
elseif property 'Ringmail Leggings' 'found'
@moveitem 'found' 'PS_book'
pause 500
elseif property 'Chainmail Coif' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Chainmail Leggings' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Chainmail Tunic' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Arms' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Legs' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Plate Helm' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Gorget' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Gloves' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Tunic' 'found'
@moveitem 'found' 'ASH_book'
pause 500
else
@moveitem 'found' 'bronze_book'
pause 500
endif
endwhile
else
break
pause 200
endif
endwhile
//=================================================
//Small + Large x20 Valorite
//Throws away the small ones ones not part of a set
//=================================================
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 46
waitforgump 0x968739db 1500
replygump 0x968739db 19
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
pause 500
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 1102 'backpack' 'any'
waitforproperties 'found' 2500
if property 'Ringmail Gloves' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Ringmail Tunic' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Ringmail Sleeves' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Ringmail Leggings' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Chainmail Coif' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Chainmail Leggings' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Chainmail Tunic' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Arms' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Legs' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Plate Helm' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Gorget' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Gloves' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Tunic' 'found'
@moveitem 'found' 'good_book'
pause 500
else
@moveitem 'found' 'trashbin'
pause 500
endif
endwhile
else
break
pause 200
endif
endwhile
//============================================
//Small + Large x10,x15 Valorite
//Throws away the small ones not part of a set
//=============================================
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 46
waitforgump 0x968739db 1500
replygump 0x968739db 7
waitforgump 0x968739db 1500
replygump 0x968739db 0
waitforgump 0x54f555df 1500
pause 500
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 1102 'backpack' 'any'
waitforproperties 'found' 2500
if property 'Ringmail Gloves' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Ringmail Tunic' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Ringmail Sleeves' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Ringmail Leggings' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Chainmail Coif' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Chainmail Leggings' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Chainmail Tunic' 'found'
@moveitem 'found' 'ASH_book'
pause 500
elseif property 'Platemail Arms' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Legs' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Plate Helm' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Gorget' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Gloves' 'found'
@moveitem 'found' 'good_book'
pause 500
elseif property 'Platemail Tunic' 'found'
@moveitem 'found' 'good_book'
pause 500
else
@moveitem 'found' 'trashbin'
pause 500
endif
endwhile
else
break
pause 200
endif
endwhile
sysmsg 'Sorting Complete!!' 33