(load "/Users/jameswebb/data/lisp/casting-spels-emacs/lisp/wizard-adventure-emacs.el")

(look)

(pickup bucket)

(inventory)

(walk upstairs)

(walk east)

(walk downstairs)

(walk west)

(dunk bucket well)

(pickup chain)

(walk east)

(splash bucket wizard)

(walk upstairs)

(weld chain bucket)

(walk downstairs)

(walk west)

(dunk bucket well)

(walk east)

(splash bucket wizard)