midao3.c

来自「C实现的MUD,对大家基本入门网络游戏很有帮助!」· C语言 代码 · 共 62 行

#include <ansi.h>
inherit ROOM;
void create()
{
        set("short", HIR"秘道"NOR);
        set("long", @LONG
这条阴暗的秘道在山腹中曲折延伸，不知通往何处。这里的石壁非常
潮湿，看来附近有水源。
LONG);        
        set("exits", ([
              "westdown" : __FILE__,
              "north" : __DIR__"midao4",
              "south" : __DIR__"midao4",
              "eastup" : __FILE__,
        ]));
        setup(); 
}

void init()
{    
  	object me = this_player();
     	if (random(me->query("kar")) <10 && me->query_con() < 35){ 
        	tell_object(me, HIB "你忽然感到呼吸一紧，原来是这里的空气污浊、流通不畅。\n" NOR );      
             	tell_room(environment(me), me->name()+"突然脸色变得极为难看，并深深地吸了口气。\n" NOR,({ me }));
//             	me->receive_damage("neili", 50);
             	me->receive_damage("jing", 50);
             	me->receive_wound("jing", 20);
             	}           
}


int valid_leave(object me, string dir)
{
        if ( dir == "north") me->add_temp("mark/steps",1);
        if ( dir == "westdown") me->add_temp("mark/step",1);   
        if ( dir == "south") me->add_temp("mark/steps",-1);
        if ( dir == "eastup") me->add_temp("mark/step",-1);
        if ((me->query_temp("mark/steps") >= 3) &&
           (me->query_temp("mark/step") >=4)){
            	me->move(__DIR__"tianjing");
            	me->delete_temp("mark/steps");
            	me->delete_temp("mark/step");
            	return notify_fail("你正走着，突然发现前面好象有了一些光亮。\n");
            	}  
     	if ((me->query_temp("mark/steps") <= -3) &&
        (me->query_temp("mark/step") <=-4)){  
                me->move(__DIR__"midao2");
           	me->delete_temp("mark/steps");
           	me->delete_temp("mark/step");
           	return notify_fail("你正走着，突然发现前面的道路有些变化。\n");
        	}
    	if ((me->query_temp("mark/steps") >= 10) ||
         (me->query_temp("mark/step") >= 10) ||
         (me->query_temp("mark/steps") <= -10) ||
         (me->query_temp("mark/step") <= -10)){  
                me->move(__DIR__"midao7");
           	me->delete_temp("mark/steps");
           	me->delete_temp("mark/step");
           	return notify_fail("你正走着，突然发现前面的道路有些变化。\n");
        	}
        return ::valid_leave(me,dir);
}