/* /verbs/items/drop.c * from the Dead Souls Object Library * drop OBJ * drop OBS * drop WRD WRD * created by Descartes of Borg 960113 */ #include <lib.h> #include "include/drop.h" inherit LIB_VERB; static void create() { verb::create(); SetVerb("drop"); SetSynonyms("put down"); SetRules("OBS", "WRD WRD"); SetErrorMessage("Drop what?"); SetHelp("Syntax: <drop ITEM>\n" " <drop all>\n" " <drop all ITEM TYPE>\n" " <drop AMOUNT CURRENCY>\n\n" "Allows you to drop something you have, or to drop an amount of " "some currency you have on you.\n\n" "See also: get, put"); } mixed can_drop_obj(object ob) { return this_player()->CanManipulate(); } mixed can_drop_wrd_wrd(string num, string curr) { int amt; if( !num || !curr ) return 0; if( (amt = to_int(num)) < 1 ) return "You cannot do that!"; if( (int)this_player()->GetCurrency(curr) < amt ) return "You don't have that much " + curr + "."; if(this_player()->GetLevel() < 4) return "Newbies can't drop money."; return this_player()->CanManipulate(); } mixed do_drop_obj(object ob) { return (mixed)ob->eventDrop(this_player()); } mixed do_drop_obs(mixed *res) { object *obs, *eligible; mixed tmp; if( !sizeof(res) ) { this_player()->eventPrint("You don't have any to drop!"); return 1; } obs = filter(res, (: objectp :)); if( !sizeof(obs) ) { mixed *ua; ua = unique_array(res, (: $1 :)); foreach(string *list in ua) this_player()->eventPrint(list[0]); return 1; } eligible=filter(obs, (: (!($1->GetWorn()) && environment($1) == this_player()) :)); if(!sizeof(eligible)){ write("Remove or unwield items before trying to drop them."); eligible = ({}); return 1; } foreach(object ob in eligible) if( (tmp = (mixed)ob->eventDrop(this_player())) != 1 ) { if( stringp(tmp) ) this_player()->eventPrint(tmp); else this_player()->eventPrint("You cannot drop " + (string)ob->GetShort() + "."); } return 1; } mixed do_drop_wrd_wrd(string num, string curr) { object pile, env; int amt; amt = to_int(num); env = environment(this_player()); pile = new(LIB_PILE); pile->SetPile(curr, amt); if( !((int)pile->eventMove(env)) || (int)this_player()->AddCurrency(curr, -amt) == -1 ) { this_player()->eventPrint("Something prevents your action."); pile->eventDestruct(); return 1; } this_player()->eventPrint("You drop " + amt + " " + curr + "."); environment(this_player())->eventPrint((string)this_player()->GetName() + " drops some " + curr + ".", this_player()); return 1; }