Decode T-Maps

//"mapbag" is location of undecoded, "deco bag" is where they are moved too. Don't check "loop" as it is a while statement so will keep going till all maps out of the "mapbag". Thanks Ariakan.

if not @findobject 'mapbag'
  promptalias 'mapbag'
endif
if not @findobject 'decobag'
  promptalias 'decobag'
endif
while @findtype 0x14ec 0x0 'mapbag'
  while not @injournal 'red pin' 'system'
    useobject 'found'
    pause 600
  endwhile
  moveitem 'found' 'decobag'
  pause 600
  ignoreobject 'found'
  clearjournal
endwhile
headmsg 'Done!!' 33
headmsg 'Done!!' 33
headmsg 'Done!!' 33
headmsg 'Done!!' 33
headmsg 'Done!!' 33