/* /verbs/items/sell.c
* From the Dead Souls Object Library
* Allows a player to sell stuff to a vendor
* Created by Descartes of Borg 9602??
* Version: @(#) sell.c 1.2@(#)
* Last modified: 97/01/03
*/
#include <lib.h>
inherit LIB_VERB;
static void create() {
verb::create();
SetVerb("sell");
SetRules("OBS to LIV", "LIV OBS");
SetErrorMessage("Sell what to whom?");
SetHelp("Syntax: <sell ITEM to LIVING>\n\n"
"When in the presence of vendors, you may buy and sell goods "
"which match the type of goods the vendor in question trades in. "
"The \"sell\" command naturally allows you to sell an item "
"to an interested vendor.\n\n"
"See also: ask, sell, vendors");
}
mixed can_sell_obj_to_liv() {
if( this_player()->GetParalyzed() ) {
return "You cannot do anything.";
}
return this_player()->CanManipulate();
}
mixed can_sell_liv_obs() {
return can_sell_obj_to_liv();
}
mixed do_sell_obj_to_liv(object ob, object vendor) {
return vendor->eventBuy(this_player(), ({ ob }));
}
mixed do_sell_liv_obj(object vendor, object item) {
return do_sell_obj_to_liv(item, vendor);
}
mixed do_sell_obs_to_liv(object array items, object vendor) {
object *obs, *eligible;
obs = filter(items, (: objectp :));
if( !sizeof(obs) ) {
mixed array ua;
ua = unique_array(items, (: $1 :));
foreach(string array 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 sell them.");
eligible = ({});
return 1;
}
return vendor->eventBuy(this_player(), eligible);
}
mixed do_sell_liv_obs(object vendor, object array items) {
return do_sell_obs_to_liv(items, vendor);
}
