# This is an automated backup - check out https://outlands.uorazorscripts.com/script/99506828-4642-4532-9337-9e52be9db1dc for latest
# Automation by Jaseowns
## Script: Map Decoder
## Created by: AreYouKidden=2#0403
#############################################

overhead 'Select MapBook'
@setvar 'MapBook'

@removelist 'ToolHues'
@createlist 'ToolHues'
@removelist 'MapHues'
@createlist 'MapHues'
@removelist 'MapGumps'
@createlist 'MapGumps'

pushlist 'ToolHues' 0
pushlist 'ToolHues' 2419
pushlist 'ToolHues' 2406
pushlist 'ToolHues' 2413
pushlist 'ToolHues' 2418
pushlist 'ToolHues' 2213
pushlist 'ToolHues' 2425
pushlist 'ToolHues' 2207
pushlist 'ToolHues' 2219
pushlist 'ToolHues' 1763

pushlist 'MapHues' 0
pushlist 'MapHues' 2091
pushlist 'MapHues' 2904
pushlist 'MapHues' 2651
pushlist 'MapHues' 2799
pushlist 'MapHues' 2796

pushlist 'MapGumps' 1520869851 'front'
pushlist 'MapGumps' 1520869851 'front'
pushlist 'MapGumps' 2589357942 'front'
pushlist 'MapGumps' 3473029237 'front'
pushlist 'MapGumps' 1332805401 'front'
pushlist 'MapGumps' 3367641484 'front'

foreach 'Color' in 'MapHues'
    foreach 'x' in 'MapGumps'
         @setvar 'Gump' 'x' 
    endfor
    poplist 'MapGumps' 'back'

    while findtype '5356' 'backpack' 'Color' as 'Map'
        while find 'Map' 'backpack'

        if not find 'Tool1' 'backpack'
            foreach 'y' in 'ToolHues'
                if @findtype '5365' 'backpack' 'y' as 'found' and not find 'Tool1' 'backpack'
                    @setvar 'Tool1' 'found'
                    @setvar 'Hue1' 'y'
                endif
            endfor
        endif
        if not find 'Tool1' 'backpack'
            overhead 'Low End Tool not found' 33
            stop
        endif
        if not find 'Tool2' 'backpack'
            foreach 'y' in 'ToolHues'
                if @findtype '5365' 'backpack' 'y' as 'found'
                    @setvar 'Tool2' 'found'
                    @setvar 'Hue2' 'y'
                endif
            endfor
        endif
        if not find 'Tool2' 'backpack'
            overhead 'High End Tool not found' 33
            stop
        endif

        overhead 'Using Low End Tool' 'Hue1'
        clearsysmsg 
        dclick 'Tool1'
        pause 100
        wft 5000
        target 'Map'
        pause 100
        waitforgump 'Gump'
        gumpresponse 4
        pause 1500
        
        if insysmsg 'You have reached the maximum'
            clearsysmsg 
            pause 1000
            while find 'Map' 'backpack' and find 'Tool2' 'backpack'
                overhead 'Using High End Tool' 'Hue2'
                clearsysmsg 
                dclick 'Tool2'
                pause 100
                wft 5000
                target 'Map'
                pause 100
                waitforgump 'Gump'
                gumpresponse 4
                pause 1500        

                if insysmsg 'You have reached the maximum accuracy'
                    overhead 'Map Decoded!' 88
                    pause 100
                    lift 'Map' 9999
                    drop 'MapBook'
                    pause 500
                endif
            endwhile
        endif
        endwhile
    endwhile
endfor