#include <lib.h>
#include <vendor_types.h>
inherit LIB_PIPE;

void create(){
    ::create();
    SetKeyName("magic pipe");
    SetId( ({"sigpipe","magical pipe","pipe of insight"}) );
    SetAdjectives( ({"magic","magical","kalinash's", "sig", "smoking"}) );
    SetShort("a magic pipe");
    SetLong("This is a handsome pipe for smoking, made of ivory. There "
      "is some sort of inscription written on it.");
    SetMass(20);
    SetBaseCost("silver", 300);
    SetVendorType(VT_TREASURE);
    SetRadiantLight(1);
    SetMaxFuel(300);
    SetItems( ([
        "inscription" : "An inscription on the pipe you can read.",
      ]) );
    SetRead( ([
        "default" : "Try: read inscription on pipe",
        "inscription" : "Kalinash's Pipe of Insight",
      ]) );
    SetLanguage("common");
    SetFuelAmount(50);
    SetRefuelable(1);
    SetFuelType("smokable material");
}

void init(){
    ::init();
}

varargs mixed eventLight(object who, object tool){
    SetBaseCost("silver", 1);
    return ::eventLight(who, tool);
}

mixed eventSmoke(object who, object what){
    if(!GetLit()){
        write("It is not lit!");
        return 1;
    }
    write("You smoke your "+remove_article(GetShort())+".");
    say(who->GetName()+" smokes from "+possessive(who)+" "
      +remove_article(GetShort())+".");
    if((((time() - GetLastPuff()) > 10) && random(100) < 25) ||
      creatorp(this_player())){
        object bonus = new(LIB_BONUS);
        object *kbonuses = filter(all_inventory(this_player()),
          (: stringp($1->GetBonusName()) && 
            $1->GetBonusName() == "kpipe_bonus" :) );
        if(sizeof(kbonuses) > 9) return bonus->eventDestruct();
        bonus->SetBonusName("kpipe_bonus");
        bonus->SetStats( ([ 
            "intelligence" : 1,
            "wisdom" : 1,
            "strength" : -1,
            "durability" : -1,
          ]) );
        bonus->SetBonusDuration(300);
        if(bonus->eventMove(who)){
            write("You feel you have a slightly better understanding"+ 
              " of the world.");
        }
    }    
    lastpuff = time();
    eventDecreaseFuel(1);
    if( !GetFuelAmount() ) eventBurnOut();
    return 1;
}

int eventBreak(){
    return 0;
}