shang.c

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

#include <ansi.h>
inherit ITEM;
void create()
{
    set_name("萧秋水传奇上册"NOR, ({ "shangbook" }) );
            set("no_put", 1);
            set("value", 0);
    set_weight(1);
    if( clonep() )
            set_default_object(__FILE__);
    else {
	        
            set("unit", "本");
            set("no_put", 1);
            set("material", "paper");
            set("long", "一本由神书合并成的卷册，你可以用(chayue)来查阅它。另外如果你有。。。的话，可以用(try)试试\n");
          }

    setup();
}
void init()
{
   add_action("do_cha","chayue");
   add_action("do_try","try");
}
int do_cha()
{
	object me;
	int exp,pot,score;
	me =this_player();
	exp = 1500+random(500);
	             pot = exp/7;
             score = random(20)+20;
             me->add("combat_exp",exp);
             me->add("potential",pot);
             me->add("score",score);
     	      message_vision("$N仔细地查阅了一遍"+this_object()->query("name")+"。\n", me);
tell_object(me,"你被奖励了：\n" +
             chinese_number(exp) + "点实战经验\n"+
             chinese_number(pot) + "点潜能\n" +
            chinese_number(score)+"点江湖阅历\n");
	destruct(this_object());
return 1;
}
int do_try()
{
	object me,newbook,ob;
	me = this_player();
	newbook =new(__DIR__"zong");
// if (!present("xiabook", me))
    if (!(ob = present("tfyizhan", me)) ||
        !(ob = present("sdmingbu", me)))
    return notify_fail("缺少四大名捕和唐方一战上的拼书方法!\n");

    if (!(ob = present("xiabook", me)) ||
        !(ob = present("tfyizhan", me))||
        !(ob = present("sdmingbu", me)))
	tell_object(me,"书好象没齐.\n");
   else{
        if( ob->query("ownmake"))
	return notify_fail("这里面有假货吧。\n");
        if(userp(ob))
	return notify_fail("这里面有假货吧。\n");
        if( ob->is_character() || ob->is_corpse() )
	return notify_fail("这里面有假货吧。\n");
        message_vision("$N试着把上下两册重新组合成一本，不料竟然成功了。\n", me);
	newbook->move(me);
	destruct(present("xiabook",me));
	destruct(present("tfyizhan",me));
	destruct(present("sdmingbu",me));
	destruct(this_object());}return 1;
}