#debug 10

var storage haversack
var buy large chest
var container chest
var trash basket

Start:

Buy.Chest:
	put buy %buy
	waitforre ^You decide to purchase the chest

Open.Chest:
	put open my %container
	waitforre ^The large chest feels momentarily heavier as you open it.

Coins:
	put get coin
	matchre Coins ^You pick up
	matchre Gems ^What were you|^I could not find
	matchwait

Gems:
	put fill my pouch with my %container
	waitforre ^You open your

Materials:
  	put inv my %container
	matchre Nugget nugget
	matchre Lump lump
	matchre Fragment fragment
	matchre Shard shard
	matchre Tear tear
	matchre Bar bar
	matchre Drop.That.Sack ^There's nothing inside
	matchre Store.That.Sack INVENTORY HELP
	matchwait

##################
##### Metals #####
##################

Shard:
	var get shard
	goto Get
Lump:
	var get lump
	goto Get
Fragment:
	var get fragment
	goto Get
Nugget:
	var get nugget
	goto Get
Bar:
	var get bar
	goto Get
Tear:
	var get tear
	goto Get

##########################


Get:
	put get my %get from my %container
	pause .5
        if ("$lefthand" != "Empty") then put #echo >Log Green *Earned a $lefthand
	pause .1
	put put my %get in %storage
	pause .5
	goto Materials

Store.That.Sack:
	put put sack in my %storage
	pause .5
	put stow my %container
	pause .5
	goto Start

Drop.That.Sack:
	pause .5
	put put my %container in %trash
	pause .5
        if ("$lefthand" != "Empty") then put stow left
	pause .2
        if ("$righthand" != "Empty") then put stow
	goto Start