BagIt (script)

This module will bag any item in any container you tell it too and return where you want. If the item doesn't fit in the container you designate or that container is not found it attempts to "stow" the item so ensure you have a default container.

#-------------------------------------------------------
# BAGIT module usage
# SetVariable ITEM2BAG [item to put in container]
# SetVariable GO2BAG [container to put the item in]
# SetVariable BAGITRETURN [script section to return to]
# GoTo BAGIT
#-------------------------------------------------------
#-------------------------------------------------------

BAGITW:
Pause 1
BAGIT:
Matchre OPENGO2BAG /is closed|that's closed|What were you referring to/i
Matchre STOWITEM2BAG /no matter how you arrange|You can't fit|too long to fit|There isn't any more room/i
Matchre %BAGITRETURN% /which is inside your|in your/i
Matchre BAGITW /Sorry,|\.\.\.wait/i
put put my %ITEM2BAG% in my %GO2BAG%
MatchWait

OPENGO2BAGW:
Pause 1
OPENGO2BAG:
Matchre BAGIT /you open|till it opens/i
Match STOWITEM2BAG What were you referring to
Matchre OPENGO2BAGW /Sorry,|\.\.\.wait/i
put open my %GO2BAG%
MatchWait

STOWITEM2BAGW:
Pause 1
STOWITEM2BAG:
Matchre DROPITEM /no matter how you arrange|You can't fit|too long to fit|There isn't any more room/i
Match %BAGITRETURN% in your
Matchre STOWITEM2BAGW /Sorry,|\.\.\.wait/i
put stow %ITEM2BAG
MatchWait

DROPITEMW:
Pause 1
DROPITEM:
Match %BAGITRETURN% you drop
Match CURSEDITEM unable
Matchre DROPITEMW /Sorry,|\.\.\.wait/i
put drop my %ITEM2BAG%
MatchWait

CURSEDITEM:
ECHO You are probably holding cursed item!
Exit

# END BAGIT Module
#-------------------------------------------------------
#-------------------------------------------------------

#E.G.

BAGGEM:
SetVariable ITEM2BAG diopside
SetVariable GO2BAG gem pouch
SetVariable BAGITRETURN LOOK4MORE
GoTo BAGIT

LOOK4MORE:
ECHO %ITEM2BAG% has been pouched in %GO2BAG% (Assuming you were holding a diopside)
put look
exit