search

the-infocom-files / ballyhoo

Ballyhoo
5 stars 4 forks source link

GLOBAL-NET-F PUT inconsistency #50

Open eriktorbjorn opened 4 years ago

eriktorbjorn commented 4 years ago

GLOBAL-NET-F handles "PUT object IN NET" like this:

           (<AND <VERB? PUT>
             <PRSI? ,GLOBAL-NET>>
        <PERFORM ,V?DROP ,PRSO>
        <RTRUE>)

Which works fine while balancing on the tightrope:

>LOOK
You are standing, perched precariously high above the arena floor, a couple of
baby steps across the tightrope.

>PUT MASK IN NET
It falls, luckily for the sake of whoever may later dive into the net, to the
ground below.

But not so well when you're standing on the platform:

>LOOK
Platform
You're standing on a small, unstable platform which is suspended high above the
arena floor by guy wires converging on it from all directions. A rope ladder
dangles from the platform and the tightrope stretches east to the opposite
platform.

>PUT MASK IN NET
Dropped.

The "It falls ..." message is printed by IDROP:

           (<AND <EQUAL? ,HERE ,TIGHTROPE-ROOM>
                 <NOT <PRSO? ,BALLOON ,WATER>>
             <NOT <EQUAL? ,PRSI ,PLATFORM ,BUCKET ,DRESS>>
             <NOT <VERB? GIVE>>
             <NOT <FSET? ,PRSO ,WORNBIT>>>
        <MOVE ,PRSO ,RING>
        <COND (<AND <PRSO? BUCKET>
                <IN? ,WATER ,BUCKET>>
               <MOVE ,WATER ,LOCAL-GLOBALS>)>
        <TELL "It falls">
        <COND (<OR <IN? ,NET ,RING>
               <IN? ,NET ,MUNRAB>>
               <TELL 
", luckily for the sake of whoever may later dive into the net,">)>
            <TELL " to the " D ,GROUND " below." CR>)

Though extending this condition to cover "PUT object IN NET" seems a bit messy to me, so I don't know...