mg-door.c

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

// mg-door.c 迷宫大门
#include <ansi.h>
inherit ROOM;
string look_gate();
void create()
{
	set("short", CYN "高昌迷宫" NOR);
	set("long", @LONG
转过了一排树木，只见对面一座石山上嵌著两扇铁铸的大门(gate)，
看来这里就是传说中的是「高昌迷宫」了。
LONG);
	  set("no_sleep_room", 1);
	  set("exits", ([
	        "eastdown" : __DIR__"shulin1",
	  ]));
	  set("item_desc",([           
                "gate" : "门上铁锈斑驳，显是历时已久的旧物。你拉住门环(huan)，试着转动(turn)它。\n", 
	  ]));
          set("outdoors", "西域回疆");
	  setup();
}
void init()
{
	 add_action("do_turn", "turn");
}
int do_turn(string arg)
{  
        object room, me;
        me = this_player();        
        if (query("exits/enter"))
		  return notify_fail("铁已经是打开了。\n");
        if (!arg || arg == "")  return 0;
        if (arg == "huan"){
          if (!me->query_temp("turned")){
             message_vision("$N使劲转动着铁环，发出吱吱的响声，铁门却始终打不开。\n", me);
             me->set_temp("turned", 1);
             return 1;
             }
           message_vision("$N再向左转动铁环，突然铁门轰的一声打开了。\n$N一没留神，差点摔进去。\n", me);
           set("exits/enter", __DIR__"mg1");
           me->delete_temp("turned");
         if(room = load_object(__DIR__"mg1") ) {
             room->set("exits/out", __FILE__);
             message("vision", "里面传来一阵吱吱的响声，铁门被人推开了。\n",room );
             } 
           remove_call_out("close_door");
           call_out("close_door", 8);
           return 1;
           }
}

void close_door()
{
        object room;
        if( !query("exits/enter") ) return;
        message("vision","轰的一声，铁门又自己合上了。\n", this_object() );
        if( room = load_object(__DIR__"mg1") ) {
                room->delete("exits/out");
                message("vision", "铁门又自己合上了。\n", room );
                  }
        delete("exits/out");
}

int valid_leave(object me)
{        
       me->delete_temp("turned");       
       return ::valid_leave(me);
}