var BOX.TYPES Start|coffer|trunk|chest|strongbox|skippet|caddy|crate|casket|box|Done
var Count 0

echo ****************************
echo **
echo ** .disarmground <say/speak>
echo **
echo ****************************

DISARM:
math Count add 1
eval DISARM.BOX element("%BOX.TYPES","%Count")
if %DISARM.BOX = Done then goto DONE
if %DISARM.BOX = Start then goto DISARM
counter set 1
if_1 then send say Starting to disarm %DISARM.BOXs now..
goto DISARM.START

DISARM.COUNTER.ADD:
counter add 1
goto DISARM.START

DISARM.ANNOUNCE:
pause 1
send SAY Up to the tenth %DISARM.BOX is done, moving on to the next.
pause 1
goto DISARM

DISARM.START:
if %c = 1 then var BOX.COUNT FIRST
if %c = 2 then var BOX.COUNT SECOND
if %c = 3 then var BOX.COUNT THIRD
if %c = 4 then var BOX.COUNT FOURTH
if %c = 5 then var BOX.COUNT FIFTH
if %c = 6 then var BOX.COUNT SIXTH
if %c = 7 then var BOX.COUNT SEVENTH
if %c = 8 then var BOX.COUNT EIGHTH
if %c = 9 then var BOX.COUNT NINTH
if %c = 10 then var BOX.COUNT TENTH
if %c = 11 then goto DISARM.ANNOUNCE
gosub DISARM.ID
gosub DISARM.CAREFUL
gosub clear
goto DISARM.COUNTER.ADD

DISARM.ID:
pause 1
var LAST DISARM.ID
matchre DISARM.CAREFUL not yet fully|at your skill
matchre PAUSE ^\.\.\.wait|^Sorry, you may only type
matchre DISARM.ID fails to reveal to you|fails to reveal to you what type
matchre RETURN You guess it is already disarmed|Surely any fool|Even your memory can not be that short|Somebody has already located
matchre DISARM Disarm what?|Disarm what\?|need to have the item in your hands or placed
matchre DISARM.CAREFUL You can disarm the|You believe that the|good shot at disarming|You think this trap|has the edge|should not take
matchre RETURN Roundtime
send DISARM %BOX.COUNT %DISARM.BOX ID
matchwait

DISARM.CAREFUL:
pause 1
var LAST DISARM.CAREFUL
matchre PAUSE ^\.\.\.wait|^Sorry, you may only type
matchre DISARM.ID You believe that the %DISARM.BOX is not yet fully|not yet fully
matchre DISARM.CAREFUL fumbling fails to disarm|This is not likely to be a good thing|unable to make any
matchre RETURN You are certain the %DISARM.BOX is not trapped|You guess it is already disarmed|DISARM HELP for syntax help|Roundtime
matchre DISARM Disarm what?|Disarm what\?|need to have the item in your hands or placed
SEND DISARM %BOX.COUNT %DISARM.BOX CAREFUL
matchwait 10
goto DISARM.CAREFUL

PAUSE:
pause
goto %LAST

RETURN:
pause 0.5
return

DONE:
if_1 then send say Done!  Make sure to identify them in case any were missed.
echo **
echo ** DONE!
echo **
send #flash