Curufea's Homepage

#include <adv.t>
#include <gameinfo.t>
#include <std.t>


/* 
 *   Retrieve the card-catalog information for the game.  This information
 *   is written to a file called GameInfo.txt during preinit, and can then
 *   be stored in the compiled .gam file for retrieval by automated tools.
 *   This information is useful for archive maintainers and other
 *   searching and browsing tools.  
 */
getGameInfo: function
{
    /* build and return the game information list */
    return ['Name', 'Simon vs Jack',
            'Byline', 'by Peter Cobcroft',
            'Desc', 'The misadventures of an almost competant Technomage.',
            'Version', '1.0',
            'ReleaseDate', getGameInfoToday(),
            'Language', 'en-US',
            'PresentationProfile', 'Text'];
}

startroom: room

    sdesc = "Pilot’s cabin"
    ldesc =
    {
        "An austere but functional area. Small in size, but large in gothic arches. A single high backed chair faces the control board on which various controls are inset. In one corner is the hologram projector for the warning bard. The dominant colour throughout the room is black. On one wall you can can see your staff holder, used for recharging your staff.";

         if (staff.isIn(staffHolder))
            " Currently your staff rests in it.";
    }

    /* 
     *   To the north is the hallway.  Set the "north" property to the
     *   destination room object.  Other direction properties that we
     *   could set: east, west, north, up, down, plus the diagonals: ne,
     *   nw, se, sw.  We can also set "in" and "out".  
     */

    south = accesscorridor
;

staffHolder: fixeditem
    location = startroom
    sdesc = "staff holder"
    noun = 'staff' 'holder'
    adjective = 'rack'
    ldesc =
    {
        "It's a rack similar to those found near pool tables to hold pool ques.  But more techy with flashy arcane symbols on it, painted black with a silver trim.";
        if (staff.isIn(self))
            "Your staff is currently plugged into the holder. ";
    }
    isqcontainer = true
;


chair: chairitem
    location = startroom
    sdesc = "wooden chair"
    noun = 'chair'
    adjective = 'straight-backed' 'wooden'
;


staff: item
    sdesc = "technomage staff"
    location = staffHolder
    noun = 'staff' 'rod' 
    adjective = 'wizards' 'technomages' 
    ldesc = "It's a large metallic technomage staff. Covered in arcane runes and a small sticker saying 'this end towards enemy' - you've learnt your lessons the hard way. "
;

controls: fixeditem
    location = startroom
    noun = 'controls' 'lights' 'dials' 'switches' 'levers'
    adjective = 'bright' 'space'
    sdesc = "controls"
    isThem = true
    adesc = "an high tech control device"
;

accesscorridor: room
    sdesc = "Access Corridor"
    ldesc = "Tell tale lights on the sides of this black walled crossroads blink on and off. Giving feedback on the state of the ship and your location within it. It is even possible to summon a hologramatical map of the ship, but as it consists of just four rooms and an airlock, you’ve never really seen the point."

    west = quarters
    east = storageroom
    sw = airlock
    se = engineroom
    north = startroom
;

quarters: room
    sdesc = "Quarters"
    ldesc = "Ever hopeful, this cabin contains a king sized bed as well as a closet. The black walls have slightly less blinking lights than the rest of the ship because they keep you awake at night."
    east = accesscorridor
;

storageroom: room
    sdesc = "Storage Room"
    ldesc = "Much like the rest of a Technomage ship, this room seems bigger on the outside than the inside. The walls are black as are most of the shelves. Luckily for your sanity the items stored here are not black."
    west= accesscorridor
;

airlock: room
    sdesc = "Airlock"
    ldesc = "Like most Technomage ships, the Airlock opens downwards with double doors. It is far more impressive than a standard set of double doors as you get to lower and raise yourself on your invisible levitation platform."
    ne= accesscorridor
;

airlockDoor: doorway
    location = airlock
    noun = 'door'
    adjective = 'airlock'
    sdesc = "airlock door"
    doordest =
    {
        "It's a little bit colder and a whole lot more airless than you normally like outside. ";
        return nil;
    }
;

engineroom: room
    sdesc = "Engine room"
    ldesc = "This rather claustrophobic room is jammed with strange and exotic looking machinery. Black, silver and almost organic in style."
    nw= accesscorridor
;


accesspanel: fixeditem, openable
    location = engineroom
    noun = 'access' 'panel' 'engine' 'door'
    adjective = 'large' 'black' 'metal' 
    sdesc = "access panel"
    ldesc =
    {
        "It's an access panel into the inner workings of the engine.  The door is currently <<
        self.isopen ? "open" : "closed">>. ";

        /* list my contents if there's anything inside */
        if (self.isopen && itemcnt(self.contents) != 0)
            "Inside the engine you can see <<listcont(self)>>. ";
    }

    /* it starts off closed */
    isopen = nil
;

circuitboard: item
    location = accesspanel
    sdesc = "circuit board"
    ldesc = "It's a sheet of plasticised silicate compounds embedded with doped superconductive materials and crystal latice components. "
    noun = 'circuit' 'board' 
    adjective = 'silicate' 'superconductive' 'superconductor'

;