Generic Light Shield (#160)

     You see a nine-foot length of mirrors, lenses and prisms linked together with shiny 
brass chain.  On a small brass tag you read "producto do Brazil".

     In Samuel Delaney's book, Dhalgren, young gang members wore hologram projectors called 
light shields.  Part of our theme is to use light shields in the place of morphing 
player classes.  This object is the first and simplest form of light shield.  It 
is simply a carried object with an integrating worn_msg.
     
     @activate     Announce the activate_msg and begin to
                           integrate hologram_msg into the players desc.
     
     @deactivate   Announce the deactivate_msg.  The worn shield
                           resumes its appearance as described in shield_msg.

if (this in player.contents)
    if (!this.activated)
        this.activated = 1;
        this.worn_msg = this.hologram_msg;
        amsg = $string_utils:pronoun_sub(this.activate_msg);
        player.location:announce_all(player.name, amsg);
    else
        player:tell(this.name, " is already turned on.");
    endif
else
    player:tell("You cannot turn on a light shield unless you are wearing it.");
endif
.

if (this in player.contents)
    if (this.activated)
        this.worn_msg = this.shield_msg;
        this.activated = 0;
        dmsg = $string_utils:pronoun_sub(this.deactivate_msg);
        player.location:announce_all(player.name, dmsg);
    else
        player:tell(this.name, " is already turned off.");
    endif
else
    player:tell("You must be wearing the light shield to turn it off.");
endif
.