Spell Scroll sorter

[Experience]

For sorting all those pesky scrolls from the treasure chests

//Author: Experience
//Description: Sort Scrolls by Circle
//Set-up: Have 1 Box with 8 bags inside
if not @findobject 'Scroll Storage'
headmsg 'Target container with the 8 Bags inside'
promptalias 'Scroll Storage'
pause 500
@useobject 'Scroll Storage'
else
@useobject 'Scroll Storage'
endif
if not @findobject 'First Circle'
headmsg 'Target the bag for First Circle'
promptalias 'First Circle'
endif
if not @findobject 'Second Circle'
headmsg 'Target the bag for Second Circle'
promptalias 'Second Circle'
endif
if not @findobject 'Third Circle'
headmsg 'Target the bag for Third Circle'
promptalias 'Third Circle'
endif
if not @findobject 'Fourth Circle'
headmsg 'Target the bag for Fourth Circle'
promptalias 'Fourth Circle'
endif
if not @findobject 'Fifth Circle'
headmsg 'Target the bag for Fifth Circle'
promptalias 'Fifth Circle'
endif
if not @findobject 'Sixth Circle'
headmsg 'Target the bag for Sixth Circle'
promptalias 'Sixth Circle'
endif
if not @findobject 'Seventh Circle'
headmsg 'Target the bag for Seventh Circle'
promptalias 'Seventh Circle'
endif
if not @findobject 'Eighth Circle'
headmsg 'Target the bag for Eighth Circle'
promptalias 'Eighth Circle'
endif
if not @listexists 'FirstCircle'
createlist 'FirstCircle'
@pushlist 'FirstCircle' 0x1f2e // Clumsy
@pushlist 'FirstCircle' 0x1f2f // Create Food
@pushlist 'FirstCircle' 0x1f30 // Feeblemind
@pushlist 'FirstCircle' 0x1f31 // Heal
@pushlist 'FirstCircle' 0x1f32 // Magic Arrow
@pushlist 'FirstCircle' 0x1f33 // Night Sight
@pushlist 'FirstCircle' 0x1f2d // Reactive Armor
@pushlist 'FirstCircle' 0x1f34 // Weaken
endif
if not @listexists 'SecondCircle'
createlist 'SecondCircle'
@pushlist 'SecondCircle' 0x1f35 // Agility
@pushlist 'SecondCircle' 0x1f36 // Cunning
@pushlist 'SecondCircle' 0x1f37 // Cure
@pushlist 'SecondCircle' 0x1f38 // Harm
@pushlist 'SecondCircle' 0x1f39 // Magic Trap
@pushlist 'SecondCircle' 0x1f3a // Magic Untrap
@pushlist 'SecondCircle' 0x1f3b // Protection
@pushlist 'SecondCircle' 0x1f3c // Strength
endif
if not @listexists 'ThirdCircle'
createlist 'ThirdCircle'
@pushlist 'ThirdCircle' 0x1f3d // Bless
@pushlist 'ThirdCircle' 0x1f3e // Fireball
@pushlist 'ThirdCircle' 0x1f3f // Magic Lock
@pushlist 'ThirdCircle' 0x1f40 // Poison
@pushlist 'ThirdCircle' 0x1f41 // Telekinesis
@pushlist 'ThirdCircle' 0x1f42 // Teleport
@pushlist 'ThirdCircle' 0x1f43 // Unlock
@pushlist 'ThirdCircle' 0x1f44 // Wall of Stone
endif
if not @listexists 'FourthCircle'
createlist 'FourthCircle'
@pushlist 'FourthCircle' 0x1f45 // Arch Cure
@pushlist 'FourthCircle' 0x1f46 // Arch Protection
@pushlist 'FourthCircle' 0x1f47 // Curse
@pushlist 'FourthCircle' 0x1f48 // Fire Field
@pushlist 'FourthCircle' 0x1f49 // Greater Heal
@pushlist 'FourthCircle' 0x1f4a // Lightning
@pushlist 'FourthCircle' 0x1f4b // Mana Drain
@pushlist 'FourthCircle' 0x1f4c // Recall
endif
if not @listexists 'FifthCircle'
createlist 'FifthCircle'
@pushlist 'FifthCircle' 0x1f4d // Blade Spirit
@pushlist 'FifthCircle' 0x1f4e // Dispel Field
@pushlist 'FifthCircle' 0x1f4f // Incognito
@pushlist 'FifthCircle' 0x1f50 // Magic Reflection
@pushlist 'FifthCircle' 0x1f51 // Mind Blast
@pushlist 'FifthCircle' 0x1f52 // Paralyze
@pushlist 'FifthCircle' 0x1f53 // Poison Field
@pushlist 'FifthCircle' 0x1f54 // Summon Creature
endif
if not @listexists 'SixthCircle'
createlist 'SixthCircle'
@pushlist 'SixthCircle' 0x1f55 // Dispel
@pushlist 'SixthCircle' 0x1f56 // Energy Bolt
@pushlist 'SixthCircle' 0x1f57 // Explosion
@pushlist 'SixthCircle' 0x1f58 // Invisibility
@pushlist 'SixthCircle' 0x1f59 // Mark
@pushlist 'SixthCircle' 0x1f5a // Mass Curse
@pushlist 'SixthCircle' 0x1f5b // Paralyze Field
@pushlist 'SixthCircle' 0x1f5c // Reveal
endif
if not @listexists 'SeventhCircle'
createlist 'SeventhCircle'
@pushlist 'SeventhCircle' 0x1f5d // Chain Lightning
@pushlist 'SeventhCircle' 0x1f5e // Energy Field
@pushlist 'SeventhCircle' 0x1f5f // Flamestrike
@pushlist 'SeventhCircle' 0x1f60 // Gate Travel
@pushlist 'SeventhCircle' 0x1f61 // Mana Vampire
@pushlist 'SeventhCircle' 0x1f62 // Mass Dispel
@pushlist 'SeventhCircle' 0x1f63 // Meteor Swarm
@pushlist 'SeventhCircle' 0x1f64 // Polymorph
endif
if not @listexists 'EighthCircle'
createlist 'EighthCircle'
@pushlist 'EighthCircle' 0x1f65 // Earthquake
@pushlist 'EighthCircle' 0x1f66 // Energy Vortex
@pushlist 'EighthCircle' 0x1f67 // Ressurrection
@pushlist 'EighthCircle' 0x1f68 // Summon Air Elemental
@pushlist 'EighthCircle' 0x1f69 // Summon Daemon
@pushlist 'EighthCircle' 0x1f6a // Summon Earth Elemental
@pushlist 'EighthCircle' 0x1f6b // Summon Fire Elemental
@pushlist 'EighthCircle' 0x1f6c // Summon Water Elemental
endif
@useobject 'Scroll Storage'
pause 900
for 0 to FirstCircle
if @movetype 'FirstCircle[]' 'backpack' 'First Circle'
pause 800
endif
endfor
for 0 to SecondCircle
if @movetype 'SecondCircle[]' 'backpack' 'Second Circle'
pause 800
endif
endfor
for 0 to ThirdCircle
if @movetype 'ThirdCircle[]' 'backpack' 'Third Circle'
pause 800
endif
endfor
for 0 to FourthCircle
if @movetype 'FourthCircle[]' 'backpack' 'Fourth Circle'
pause 800
endif
endfor
for 0 to FifthCircle
if @movetype 'FifthCircle[]' 'backpack' 'Fifth Circle'
pause 800
endif
endfor
for 0 to SixthCircle
if @movetype 'SixthCircle[]' 'backpack' 'Sixth Circle'
pause 800
endif
endfor
for 0 to SeventhCircle
if @movetype 'SeventhCircle[]' 'backpack' 'Seventh Circle'
pause 800
endif
endfor
for 0 to EighthCircle
if @movetype 'EighthCircle[]' 'backpack' 'Eighth Circle'
pause 800
endif
endfor
headmsg 'I think we are done here'
stop