gmlg1.c

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

// Room: /u/xdd/gumu/gmlg1.c
// by shang and xdd  97/6
// Modify By River 98/08/29
#include <ansi.h>
#include <room.h>
inherit ROOM;

void create()
{
       set("short", HIC"石室"NOR);
       set("long", @LONG
这是一间密闭的石室，室中点着灯火，石室奇小，仅容一人周转，此处供
古墓弟子修炼入门武功，天罗地网势。室内有三只麻雀。
LONG        );

       set("exits", ([
            "north" : __DIR__"liangong",
            "south" : __DIR__"gmlg2",
       ]));

//       create_door("north", "石门", "south", DOOR_CLOSED);
       
       setup();
}

void init()
{
          add_action("do_zhuo", "zhuo");
}

int do_zhuo(string arg)
{
          mapping fam;
          object me = this_player();
          int i;
          if (!living(me)) return 0;
          if (!(fam = me->query("family")) || fam["family_name"] != "古墓派")
           return notify_fail("你不是古墓传人，如何能领悟古墓武功？\n");
          if ( arg == "maque") {
          if ( (int)me->query_skill("dodge", 1) > 51 )
            return notify_fail("你不用在这里浪费时间精力了。\n");
          if ( (int)me->query("jing") < 20 )
            return notify_fail("你太累了, 先休息一下。\n");
//          if ( me->query("potential") > me->query("max_pot"))   
//             me->set("potential", me->query("max_pot"));   
          i = me->query_skill("dodge", 1) / 5;
          me->receive_damage("jing", 5 + random(10));
          me->receive_damage("jing", 5 + random(10));
          if ( random(i) > 2 ) {
                 write("你气喘吁吁，累得满头大汗，别说捉到，连羽毛也碰不到一根。\n");
                 }
          else {
                 write("你累得满头大汗，终於抓到了麻雀。\n");
                 me->improve_skill("dodge", (int)(me->query_int()/2) +
                            (int)(me->query_int()/2) );
                 if(me->query("combat_exp") < 100000){
                 me->add("potential", random(2));
//               me->add("combat_exp", random(5));
                 return 1;
                 }
               }
          return 1;
          }
        return notify_fail("你要捉什么？\n");
}