gbook1.c

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

#include <ansi.h>
inherit ITEM;
void create()
{
    set_name(HIG"古龙精选集上册"NOR, ({ "gulong booka" }) );
            set("no_put", 1);
            set("value", 0);
    set_weight(1);
    if( clonep() )
            set_default_object(__FILE__);
    else {
	        
            set("shenshu",1);
            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(string arg)
{
	object me;
	int exp,pot,score;
	me =this_player();
 	if (!id(arg))
	return notify_fail("你要查什么？\n");

	exp = 2100+random(1000);
	             pot = exp/3;
             score = random(200)+100;
             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(string arg)
{
	object me,newbook,ob;
	me = this_player();
 	if (!id(arg))
	return notify_fail("你要试什么？\n");

	newbook =new(__DIR__"gbook");

    if (!(ob = present("gulong bookb", me))
        )
	tell_object(me,"书好象没齐.\n");
   else{
        if( ob->query("ownmake"))
	return notify_fail("这里面有假货吧。\n");
        if( !ob->query("shenshu"))
	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("gulong bookb",me));
	destruct(this_object());}return 1;
}