int die()
{
 object eq,me=this_player();
 eq=clone_object("eq_file");
 eq->set("names",me->query("name"));


 1. eq->move(environment(ppl)); // 移到玩家所在的房間
 2. eq->move(environment(this_object())); // 移到 mob 所在的房間
 3. eq->move_to(this_object()); // 移到 mob 身上
 4. eq->move_to(ppl); // 移到玩家身上


 ::die(); // 再執行原本讓 mob 死掉的函數
 return 1;
}


1 或 2, 玩家只要在 mob 死後 get xxx 就可以拿到.


3 的話玩家在 mob 死後 get all from corpse 就可以拿到.


4 的話打死 mob eq 就會在玩家身上, 這是避免偷撿的寫法.