/*    /lib/events/bait_with.c
 *    From the Dead Souls Object Library
 *    Handles putting bait on fishing devices
 *    Created by Blitz@Dead Souls 960116
 *    Version: @(#) bait_with.c 1.2@(#)
 *    Last modified: 97/01/03
 */

#include <lib.h>

private int BaitStrength = 0;

// abstract methods
string GetShort();
static int Destruct();
// end abstract methods

int GetBaitStrength() {
    return BaitStrength;
}

int SetBaitStrength(int x) {
    return (BaitStrength = x);
}

mixed eventBait(object who, object pole) {
    if( !(who && pole) ) {
        return 0;
    }
    if( !pole->eventBait(who, this_object()) ) {
        who->eventPrint(capitalize(pole->GetDefiniteShort()) +
          "remains unbaited.");
        return 1;
    }
    send_messages("bait", "$agent_name $agent_verb $target_name with " +
      GetShort() + ".", who, pole, environment(who));
    Destruct();
    return 1;
}

mixed indirect_bait_obj_with_obj() {
    if( environment() != this_player() ) {
        return "#You don't have that bait!";
    }
    return 1;
}