很多地方出现clonep这个函数
查了下：
定义
名称:
clonep() - 检查给定的一个变数是否为复制的物件.
语法:
int clonep( void | mixed arg );
整数 clonep( 无参数 | 混合 arg );
用法:
如果参数 arg 有设定 objectp() 和 O_CLONE 旗标 (flag),
此函式就传回「真」 (true) 的值 (也就是 1). MUD 的
驱动程式 (driver) 会对经由 new(3) (clone_object(3))
创造出来的物件, 设定 O_CLONE 旗标. clonep() 函式
对於主物件 (master copy, 经由 call_other(3) 载入) 不
会传回「真」值. 请注意, 如果 clonep() 传回「真」值,
则 file_name() 对此物件传回的档案名称会加上 #n ( n
为整数). clonep() 不加上参数则预定物件为 this_object().
参考:
virtualp(3), userp(3), wizardp(3), objectp(3), new(3),
clone_object(3), call_other(3), file_name(3)
翻译:
Spock @ FF 97.Jan.27. (printed 3/16/95)
还是对其理解不透，谁能结合下面的代码，说下clonep函数到底起了什么作用？
void create()
{
set_name("巨蟒", ({ "ju mang", "mang" }));
set("race", "野兽");
set("long", "一条庞大无比, 色彩斑斓的巨蟒。 浑身发出阵阵强烈的腥臭味。\n");
set("attitude", "aggressive");
set("str", 70);
set("con", 50);
set("max_qi", 800);
set("no_get","巨蟒对你而言太重啦，你无法拿动");
set("combat_exp", 200000);
set_temp("apply/attack", 50);
set_temp("apply/damage", 50);
set_temp("apply/armor", 50);
setup();
if (clonep() && !random(2)) carry_object(MEDICINE_D("renshen-guo"));
}