void init()
{
add_action("do_main", "drop");
}
int do_main(string arg)
{
object me=this_player();
object obj, *inv, obj2;
int i, amount;
string item;
if(me->is_busy())
return notify_fail("你正忙着呢．．．\n");
if(!arg) return notify_fail("你要丢弃什么东西？\n");
if(sscanf(arg, "%d %s", amount, item)) {
if( !objectp(obj = present(item, me)) )
return notify_fail("你身上没有这样东西。\n");
if( !obj->query_amount() ) //这里的obj是指什么？obj没有赋值，怎么判断?player还是obj?
return notify_fail( obj->name() + "不能被分开丢弃。\n");
if( amount < 1 )
return notify_fail("东西的数量至少是一个。\n");
if( amount > obj->query_amount() )
return notify_fail("你没有那么多的" + obj->name() + "。\n");
else if( amount == (int)obj->query_amount() )
return do_drop(me, obj);
else {
obj2 = new(base_name(obj));
obj2->set_amount(amount);
if(do_drop(me, obj2)) { // succeed to drop
obj->set_amount( (int)obj->query_amount()-amount );
return 1;
}
return 0;
}
}
if(arg=="all") {
inv = all_inventory(me);
for(i=0; i<sizeof(inv); i++) {
do_drop(me, inv[i]);
}
write("Ok.\n");
return 1;
}
if(!objectp(obj = present(arg, me)))
return notify_fail("你身上没有这样东西。\n");
return do_drop(me, obj);
}
int do_drop(object me, object obj)
{
int count;
object money;
if(me->is_busy())
return notify_fail("你正忙着呢．．．\n");
if (obj->move(environment(me))) {
if((obj->query_temp("d_mana"))>0) {//这个obj是什么？如果是人呢？query_temp又是什么值？
if( obj->query_temp("is_living")==1 )
message_vision("$N将$n从背上放了下来，躺在地上。\n", me, obj);
else {
message_vision( sprintf("$N丢下一%s$n。\n",
undefinedp(obj->query_temp("unit"))?
"个":obj->query_temp("unit")
), me, obj );
}
} else {
if( obj->is_character() )
message_vision("$N将$n从背上放了下来，躺在地上。\n", me, obj);
else {
if (obj->query("id")=="thousand-cash" || obj->query("id")=="gold"
|| obj->query("id")=="silver" || obj->query("id")=="coin")
message_vision( sprintf("$N丢下一%s$n。\n",obj->query("unit")),me, obj );
else { message_vision( sprintf("$N将一%s$n扔进垃圾堆。\n",obj->query("unit")),me,obj);
destruct(obj);
}}
}
return 1;
}
return 0;
}

call obj->query_amount()一下，明白了，比如买2个鸡腿，显示为：
炸鸡腿(Jitui)
炸鸡腿(Jitui)
买2颗药，显示为：
二包金创药(Jinchuang yao)
有些物品是没有amount的。
但是query_temp()是什么鬼？？？

为啥call NPC->query_temp("do_mana")
call NPC->query_temp("is_living")
>d/nanhai/npc/bonze#109 ("和尚")->query_temp("is_living") = 0
>d/nanhai/npc/bonze#109 ("和尚")->query_temp("do_mana") = 0