// bandage.c // This is a bandage which you can use on a player to heal up some hit points. // Mobydick@TMI-2, 10-27-92 #include <mudlib.h> inherit OBJECT ; void create() { set ("short", "a bandage") ; set ("long", "If you \"bandage\" a player, that player will get some hit points back.\n") ; set ("id", ({ "bandage", "bandages" }) ) ; set ("value", ({ 5, "silver" }) ) ; set ("mass", 5) ; set ("bulk", 5) ; } void init() { add_action("bandage", "bandage") ; } int bandage (string name) { object target ; int hp, mhp, skill, i ; target = present(name,environment(this_player())) ; if (!target) { notify_fail ("I don't see that here.\n") ; return 0 ; } if (!living(target)) { notify_fail ("Bandages should be used on living objects.\n") ; return 0 ; } target = find_player(name) ; hp = target->query("hit_points") ; mhp = target->query("max_hp") ; if (mhp==hp) { notify_fail (capitalize(name)+" does not need healing.\n") ; return 0 ; } skill = this_player()->query_skill("First aid") ; this_player()->improve_skill("First aid", 5) ; i = random(7)+4+skill/10 ; hp = hp + i ; if (hp>mhp) hp=mhp ; this_player()->set("hit_points", hp) ; write (capitalize(name)+" has been healed.\n") ; tell_object (target, "You are healed by "+this_player()->query("cap_name")+".\n") ; say (this_player()->query("cap_name")+" heals "+capitalize(name)+".\n",target) ; remove() ; return 1 ; }