Back to "map" tags

Map Decoder by AreYouKidden🐲

Description: Will decode all maps in backpack, and put them in MapBook (or container) that you select using the lowest quality spyglass in your backpack to decode to max, then finishing it off with the highest quality spyglass.

Suggested Use: One type of map at a time so you can select the mapbook.

1overhead 'Select MapBook'
2@setvar 'MapBook'
3
4@removelist 'ToolHues'
5@createlist 'ToolHues'
6@removelist 'MapHues'
7@createlist 'MapHues'
8@removelist 'MapGumps'
9@createlist 'MapGumps'
10
11pushlist 'ToolHues' 0
12pushlist 'ToolHues' 2419
13pushlist 'ToolHues' 2406
14pushlist 'ToolHues' 2413
15pushlist 'ToolHues' 2418
16pushlist 'ToolHues' 2213
17pushlist 'ToolHues' 2425
18pushlist 'ToolHues' 2207
19pushlist 'ToolHues' 2219
20pushlist 'ToolHues' 1763
21
22pushlist 'MapHues' 0
23pushlist 'MapHues' 2091
24pushlist 'MapHues' 2904
25pushlist 'MapHues' 2651
26pushlist 'MapHues' 2799
27pushlist 'MapHues' 2796
28
29pushlist 'MapGumps' 1520869851 'front'
30pushlist 'MapGumps' 1520869851 'front'
31pushlist 'MapGumps' 2589357942 'front'
32pushlist 'MapGumps' 3473029237 'front'
33pushlist 'MapGumps' 1332805401 'front'
34pushlist 'MapGumps' 3367641484 'front'
35
36foreach 'Color' in 'MapHues'
37    foreach 'x' in 'MapGumps'
38         @setvar 'Gump' 'x' 
39    endfor
40    poplist 'MapGumps' 'back'
41
42    while findtype '5356' 'backpack' 'Color' as 'Map'
43        while find 'Map' 'backpack'
44
45        if not find 'Tool1' 'backpack'
46            foreach 'y' in 'ToolHues'
47                if @findtype '5365' 'backpack' 'y' as 'found' and not find 'Tool1' 'backpack'
48                    @setvar 'Tool1' 'found'
49                    @setvar 'Hue1' 'y'
50                endif
51            endfor
52        endif
53        if not find 'Tool1' 'backpack'
54            overhead 'Low End Tool not found' 33
55            stop
56        endif
57        if not find 'Tool2' 'backpack'
58            foreach 'y' in 'ToolHues'
59                if @findtype '5365' 'backpack' 'y' as 'found'
60                    @setvar 'Tool2' 'found'
61                    @setvar 'Hue2' 'y'
62                endif
63            endfor
64        endif
65        if not find 'Tool2' 'backpack'
66            overhead 'High End Tool not found' 33
67            stop
68        endif
69
70        overhead 'Using Low End Tool' 'Hue1'
71        clearsysmsg 
72        dclick 'Tool1'
73        pause 100
74        wft 5000
75        target 'Map'
76        pause 100
77        waitforgump 'Gump'
78        gumpresponse 4
79        pause 1500
80        
81        if insysmsg 'You have reached the maximum'
82            clearsysmsg 
83            pause 1000
84            while find 'Map' 'backpack' and find 'Tool2' 'backpack'
85                overhead 'Using High End Tool' 'Hue2'
86                clearsysmsg 
87                dclick 'Tool2'
88                pause 100
89                wft 5000
90                target 'Map'
91                pause 100
92                waitforgump 'Gump'
93                gumpresponse 4
94                pause 1500        
95
96                if insysmsg 'You have reached the maximum accuracy'
97                    overhead 'Map Decoded!' 88
98                    pause 100
99                    lift 'Map' 9999
100                    drop 'MapBook'
101                    pause 500
102                endif
103            endwhile
104        endif
105        endwhile
106    endwhile
107endfor