Lore Page Organizer by FewUnderstandThis

# Lore Page Organizer by @FewUnderstandThis # Requires containers for lore books, lore page source, lore page overflow clearsysmsg clearignore # Create lists overhead 'Compiling lists...' ## Dungeons removelist 'dungeons' createlist 'dungeons' pushlist 'dungeons' 'aegis keep' pushlist 'dungeons' 'cavernam' pushlist 'dungeons' 'darkmire temple' pushlist 'dungeons' 'inferno' pushlist 'dungeons' 'the mausoleum' pushlist 'dungeons' 'mount petram' pushlist 'dungeons' 'nusero' pushlist 'dungeons' 'ossuary' pushlist 'dungeons' 'pulma' pushlist 'dungeons' 'shadowspire cathedral' ## Towns removelist 'towns' createlist 'towns' pushlist 'towns' 'anchor' pushlist 'towns' 'andaria' pushlist 'towns' 'cambria' pushlist 'towns' 'corpse creek' pushlist 'towns' 'horseshoe bay' pushlist 'towns' 'outpost' pushlist 'towns' 'prevalia' pushlist 'towns' 'shelter island' pushlist 'towns' 'terran' ## Volumes, must check 10 before 1 removelist 'volumes' createlist 'volumes' pushlist 'volumes' 'vol 10' pushlist 'volumes' 'vol 1' pushlist 'volumes' 'vol 2' pushlist 'volumes' 'vol 3' pushlist 'volumes' 'vol 4' pushlist 'volumes' 'vol 5' pushlist 'volumes' 'vol 6' pushlist 'volumes' 'vol 7' pushlist 'volumes' 'vol 8' pushlist 'volumes' 'vol 9' # Set containers overhead 'Set book container:' 1150 setvar books wait 250 overhead 'Set page source container:' 1150 setvar source wait 250 overhead 'Set page overflow container:' 1150 setvar overflow wait 250 # Organizer overhead 'Organizing...' 1150 while findtype 'parchment' 'source' as page getlabel page pageLabel overhead '---' 1150 overhead pageLabel if 'creatures of' in pageLabel while find page 'source' and findtype 29107 'books' as book getlabel book bookLabel foreach d in 'dungeons' if d in pageLabel and d in bookLabel overhead 'Match!' 1150 lift page wait 500 drop book wait 500 if insysmsg 'already contains that page' overhead 'Already in book...' 1150 elseif insysmsg 'add the lore page' overhead 'Success!' 1150 else overhead 'CHECK SCRIPT!' 38 endif clearsysmsg endif endfor ignore book endwhile elseif 'tales of' in pageLabel while find page 'source' and findtype 29106 'books' 2236 as book getlabel book bookLabel foreach d in 'dungeons' if d in pageLabel and d in bookLabel overhead 'Match!' 1150 lift page wait 500 drop book wait 500 if insysmsg 'already contains that page' overhead 'Already in book...' 1150 elseif insysmsg 'add the lore page' overhead 'Success!' 1150 else overhead 'CHECK SCRIPT!' 38 endif clearsysmsg endif endfor ignore book endwhile elseif 'history of' in pageLabel while find page 'source' and findtype 29108 'books' as book getlabel book bookLabel foreach t in 'towns' if t in pageLabel and t in bookLabel overhead 'Match!' 1150 lift page wait 500 drop book wait 500 if insysmsg 'already contains that page' overhead 'Already in book...' 1150 elseif insysmsg 'add the lore page' overhead 'Success!' 1150 else overhead 'CHECK SCRIPT!' 38 endif clearsysmsg endif endfor ignore book endwhile elseif 'outlands mythology' in pageLabel while find page 'source' and findtype 29106 'books' 2261 as book getlabel book bookLabel foreach v in 'volumes' if v in pageLabel and v in bookLabel overhead 'Match!' 1150 lift page wait 500 drop book wait 500 if insysmsg 'already contains that page' overhead 'Already in book...' 1150 elseif insysmsg 'add the lore page' overhead 'Success!' 1150 else overhead 'CHECK SCRIPT!' 38 endif clearsysmsg endif endfor ignore book endwhile endif # Move to overflow if no room in books if find page 'source' overhead 'To overflow...' 1150 lift page wait 500 drop 'overflow' -1 -1 -1 wait 500 endif clearignore endwhile overhead '---' 1150 overhead 'Organizer complete!' 1150 overhead 'Organizer complete!' 1150 overhead 'Organizer complete!' 1150