search

the-infocom-files / hollywoodhijinx

Hollywood Hijinx
3 stars 2 forks source link

Incorrect message when picking up the final treasure #52

Open eriktorbjorn opened 2 years ago

eriktorbjorn commented 2 years ago 
>CONFISCATE GRATER
As you confis Mama Maggio's cheese grater you notice a wooden peg and a note
behind it.

This is because the BOKS-BIG-ONE (tester Tomas Bok?) routine usually tries to print the word you used to pick up the object:

               <COND (<EQUAL? .T-OBJ ,RING>
                      <TELL
"As you take" T ,PRSO ", a small peg and a note drop out from
under the model." CR>
                      <MOVE ,PEG-0 ,HERE>
                      <MOVE ,NOTE ,HERE>)
                 (T
                  <TELL "As you ">
                  <PRINTB ,P-PRSA-WORD>
                  <TELL
 T ,PRSO " you notice a wooden peg and a note ">

It should be easy enough to add a couple of special cases here.

eriktorbjorn commented 2 years ago

Another routine that prints a word like this is MOVE-OBJ-DOWN, so that one might be worth looking at too.