the-infocom-files / bureaucracy

Bureaucracy
8 stars 2 forks source link

You can retrieve your wallet from inaccessible spots, as long as there's anything in it #25

Open eriktorbjorn opened 1 year ago

eriktorbjorn commented 1 year ago
>PUT WALLET IN TROUGH
The wallet slides out the back of the mailbox and lands in the trough.

The llama sniffs at the wallet suspiciously, snorts and ignores it.

>TAKE WALLET
The llama licks you. You are horribly aware that the llama's tongue is directly
connected to the llama's insides. You quickly pull your hand out of the mailbox.

[Your blood pressure just went up.]

>TAKE BEEZER CARD FROM WALLET
[taking the wallet first]

You take the Beezer card out of the wallet.

>FIND WALLET
You're holding it.

This is because the wallet has a helpful container routine, IN-WALLET:

<DEFINE IN-WALLET ("OPT" CONTEXT)
  <COND (<==? .CONTEXT ,M-CONT>
     <COND (<NOT <IN? ,WALLET ,PLAYER>>
        <SAY-TAKING ,WALLET <>>
        <MOVE ,WALLET ,PLAYER>
        <MAKE ,WALLET ,OPENED>)>)>

Not sure how to fix that, really. Oddly enough, "TAKE BEEZER CARD FROM WALLET" did not work.