-- Start log: Tuesday, March 17, 1998 3:06:49 pm CALLMOO time --
____________________
| |
CarstenWizard zeigt ein Plakat: | verbene $5 - thing |
|____________________|
______
| |
CarstenWizard zeigt ein Plakat: | give |
|______|
CarstenWizard sagt: "change arguments to any-none-this, ex. gib Sissel (pronoun) Schluessel"
CarstenWizard sagt: "funktioniert nicht. Komisch, obwohl ich die Praeposition rausgeschmissen und iobj/dobj veraender habe, funktioniert immer noch die alte Form mit "give a to b" "
-------------------------------CarstenWizard-------------------------------
set_task_perms(callers() ? caller_perms() | player);
if (this.location != player)
player:tell("You don't have that!");
elseif (!valid(player.location))
player:tell("I see no \"", dobjstr, "\" here.");
elseif ($command_utils:object_match_failed(who = player.location:match_object(dobjstr), iobjstr))
elseif (who.location != player.location)
player:tell("I see no \"", dobjstr, "\" here.");
elseif (who == player)
player:tell("Give it to yourself?");
else
this:moveto(who);
if (this.location == who)
player:tell("Du gibst ", who:title(), "(den/die)", this:title(), ".");
who:tell(player:titlec(), " ", $gender_utils:get_conj("hands/hand", player), " you ", this:title(), ".");
else
player:tell(who:titlec(), " ", $gender_utils:get_conj("does/do", who), " not want that item.");
endif
endif
---------------------------------finished----------------------------------
-- End log: Tuesday, March 17, 1998 4:00:41 pm CALLMOO time --