UO Outlands Razor ScriptsMap Decoder by AreYouKidden🐲
Description from the author:
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
endforWill 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.
Quick Filters
