Map Decipher with spyglass recycle

1# This is an automated backup - check out https://outlands.uorazorscripts.com/script/416f04fb-b581-45db-849e-f513fb8304d9 for latest2# Automation by Jaseowns3## Script: Map Decipher with spyglass recycle4## Created by: gmussi#05#############################################6 7# Resource Map Decoder 1.0 by MORTADELAZ8 9# WHAT IT DOES10# - Gets spyglass from the shelf11# - Decipher maps in the backpack12# - Recycles spyglass when there is only 1 use left13# - Put 100% deciphered maps back in the tome14#15# HOW TO USE16# - have any recycling tool in the backpack (sewing kit, tinker tools, etc)17# - put tome in backpack18# - remove maps from it19# - set shelf with spyglass to use20# - run script21#22# !!!!!!!!!!!!!!!!!!!!!!!!!!23# !!!!!!! ATTENTION !!!!!!!!24# !!!!!!!!!!!!!!!!!!!!!!!!!!25# Dont remove ALL maps at once!!! 26# It makes no sense to use avarite spyglass with dullhide map27# You also cant decipher avarhide map with bronze spyglass28# !!!! PLAN ACCORDINGLY !!!!29 30# Take spyglasses from shelf? 1=yes, 0=no31@setvar! spyglass_restock 132 33@setvar! timeout 65034@setvar! short_timeout 20035 36@setvar! ore_gump 336764148437@setvar! skinning_gump 347302923738@setvar! lumber_gump 133280540139@setvar! treasure_gump 152086985140@setvar! fishing_gump 258935794241@clearignore42 43if not listexists undecoded_map_list44    createlist undecoded_map_list45else46    clearlist undecoded_map_list47endif48 49// Refill Spyglasses50if spyglass_restock == 151    if not findtype "spyglass" backpack52        if findtype "storage shelf" ground -1 -1 2 as shelf53            menu shelf 154            wait short_timeout55        endif56 57        for 1258            say "Need spyglass" 3459            wait 500060            if findtype "spyglass" backpack61                break62            endif63        endfor64    endif65endif66 67// Close map gumps68gumpclose ore_gump69gumpclose skinning_gump70gumpclose lumber_gump71gumpclose treasure_gump72gumpclose fishing_gump73 74 75@clearignore76while findtype "map" backpack as resource_map77    getlabel resource_map desc78    overhead desc79    80    if "[100.0%" in desc or "(100.0%" in desc81        if findtype 29104 backpack as tome82            lift resource_map83            wait short_timeout84            drop tome85        else86            overhead "Where tome?"87        endif88    else89        // Find number of undecoded maps left90        if findtypelist undecoded_map_list "map" backpack any91        endif92        for 20093            if list undecoded_map_list = "index"94                @setvar! num_undecoded_maps "index"95                break96            endif97        endfor98        if num_undecoded_maps == 099        elseif num_undecoded_maps == 1100            overhead "{{num_undecoded_maps}} map to decode" 88101        else102            overhead "{{num_undecoded_maps}} maps to decode" 88103        endif104        105        // Check for spyglasses106        if findtype "spyglass" backpack as glass107            @setvar! myglass glass108            dclick glass109        elseif spyglass_restock == 1110            replay111        else112            for 12113                say "Out of Spyglasses!" 34114                wait 5000115            endfor116        endif117        wft 1500118        target resource_map119        120        // Select gump for current map121        @setvar! gumpIdToCheck 0122        if "ore" in desc123            @setvar! gumpIdToCheck ore_gump124        elseif "skinning" in desc125            @setvar! gumpIdToCheck skinning_gump126        elseif "lumber" in desc127            @setvar! gumpIdToCheck lumber_gump128        elseif "treasure" in desc129            @setvar! gumpIdToCheck treasure_gump130        elseif "fishing" in desc131            @setvar! gumpIdToCheck fishing_gump132        else133        overhead "Unknown gump!" 34134        endif135        136        waitforgump gumpIdToCheck 1000137        138        // Decode the map139        overhead "Updating..."140        clearsysmsg141        while gumpexists gumpIdToCheck142            if insysmsg "do not have any spyglasses"143                replay144            endif145            getlabel resource_map desc146            if "[100.0%" in desc or "(100.0%" in desc147                gumpclose gumpIdToCheck148                @ignore resource_map149                else 150                    if find myglass backpack151                    getlabel myglass glasslabel152                    overhead glasslabel153                    if "(1 uses" in glasslabel or "[1 uses" in glasslabel154                        if findtype 4032|4032|3997|7864|4148|4136 as recyclingtool155                            if not gumpexists 949095101156                                if findtype 4032|3997|7864|4148|4136 backpack as recyclerItemKit157                                    dclick recyclerItemKit158                                    waitforgump 949095101 5000159                                endif160                            endif161                            if gumpexists 949095101      162                                gumpresponse 3 949095101163                                wft 500164                                target myglass165                                overhead "Recycling spyglass"166                                replay167                             endif168                        endif169                    endif170                endif171                gumpresponse 4 gumpIdToCheck172                wait timeout173            endif174        endwhile175        176        replay177    endif178    179    wait short_timeout180endwhile