nolove1050129047.c

C实现的MUD,对大家基本入门网络游戏很有帮助!

// a skeleton for user rooms
inherit ROOM;
void create()
{
set("short", "大话西游");
set("long", @LONG
    这里是大话西游的大陆之一东胜神州，四块大陆中最美丽的世外桃源，有丹
崖怪石、削壁奇峰，瑶草奇花不谢、青松翠柏长春。有诗赞曰："仙桃常结果，
修竹每留云。"
    这里人迹罕至，自古以来就生存着许多奇异生物。丹崖上，彩凤双鸣。削壁
前，麒麟独卧。桥头锦鸡鸣，涧尾龙戏珠。林中有寿鹿仙狐，树上有灵禽玄鹤。
一条涧壑藤萝密，四面原堤草色新。灵物们因敬天理地进而在天地的变化中吸日
月精华而生、食自然之果而长，由此孕育了许多的鬼灵精怪，其实力可不能小窥
哦。虽然说神州上大多是善良的仙灵，但是也难免有些害群之马，常常跑到与之
说，便认为东胜神洲是魔族的衍生地。

LONG
);
        set("exits", ([
"east" : "/p/residence/nolove1050130228",
"west" : "/p/residence/nolove1050130005",
"south" : "/p/residence/nolove1050129266",
"eastdown" : "/p/guangchang.c",
]));
set("objects", ([
       "/p/npc/weishi":2,
       ]) );
	set("owner", "nolove");
	set("class", "大话西游　");
	set("valid_startroom",1);

//	set("no_fight",1);

setup();
}
void init()
{
	add_action("do_invite","invite");
	//add_action("do_setowner","setowner");
}
int valid_enter(object me)
{
	int flag;
// always let owner go in:
	 if((string)me->query("class") != (string)query("class")
	&&(string)query("invite") != (string)me->query("id")
	&&(string)me->query("id") != (string)query("owner"))
	return 1;	

}
int do_invite(string arg)
{
	object me;
	me= this_player();
	if((string)me->query("id") != (string)query("owner"))
	return 0;
	set("invite",arg);
	write("你邀请"+arg+"来你的房间。\n");
	return 1;
}

/*int do_setowner(string arg)
{
	string oldowner;
	oldowner = (string)query("owner");
	set("owner",arg);
	write("你将房间的主人暂时设为"+arg+"。\n");
	call_out("set_back",60, oldowner);
	return 1;
}

int set_back(string oldowner)
{
	set("owner", oldowner);
	return 1;
}
*/
varargs int valid_leave(object me, string dir)
{
	object *inv,kicker;
	int sizeinv,n,tt;



        if ((int)me->query_condition("killer")>1)
        {
        write("你正在被通辑中，不能进入自己的门派。\n");
        write("你被几个弟子打了出去。\n");
	call_out("kicking", 0, me);
        me->unconcious();
	return notify_fail("你不能进去!\n");
        }

        if ( me->query("family/family_name") != (string)query("class"))
        {
        write("这是别人的门派,你不能乱走。\n");
        write("你被几个弟子打了出去。\n");
	call_out("kicking", 0, me);
        me->unconcious();
	return notify_fail("你不能进去!\n");
        }
        else {
		inv=all_inventory(me);
		sizeinv=sizeof(inv);
	
		while (sizeinv--)
		{
       			if (inv[sizeinv]->is_character() && userp(inv[sizeinv])  )  
     				return notify_fail("你想进去拐卖人口？\n");
       		
		}
        return ::valid_leave(me, dir);
        }
}

void kicking(object me)
{
        me->move("d/city/wumiao");
}