intfiction.org

++ apple: Food, Thing 'apple' 'apple'
    "The apple is so pretty, it looks as though it was plucked from the Garden of Eden. 
    Actually, it looks a little too perfect.  "
    dobjFor(Eat)
    {
        verify()
        {
            dangerous;
        }
        action()
        {           
            "Not only did it look good, it was full of poison. ";
            finishGameMsg(ftDeath, [finishOptionCredits]);
        }
    }
;

#charset "us-ascii"

#include <adv3.h>
#include <en_us.h>

versionInfo: GameID
    IFID = 'foo'
;

gameMain: GameMainDef
    initialPlayerChar = me
;

startRoom: Room 'The Cottage'
;

+ me: Actor
;

++ apple: Food 'apple' 'apple'
    "The apple is so pretty, it looks as though it was plucked from the Garden of Eden. 
    Actually, it looks a little too perfect.  "
    dobjFor(Eat)
    {
        verify()
        {
            dangerous;
        }
        check()
        {
            "Are you sure? ";
            if(!yesOrNo()) failCheck('You have second thoughts. ');
        }
        action()
        {           
            "Not only did it look good, it was full of poison. ";
            finishGameMsg(ftDeath, [finishOptionCredits]);
        }
    }
;