C++ create_door函数代码示例

void create_house()
{
  int debx = 412, deby = 494, compt = 0;
  while(compt < 3){
    deby -= 44;
    object wall = create_wall(debx,deby);
    w_house = insert(wall, w_house);
    compt ++;
  }
  compt = 0;
  deby -= 44;
  while(compt < 6){
    object wall = create_ceiling(debx,deby);
    w_house = insert(wall, w_house);
    compt ++;
    debx += 60;
  }
  compt = 0;
  debx -= 60;
  deby += 44;
  while(compt < 3){
    object wall = create_wall(debx,deby);
    w_house = insert(wall, w_house);
    deby += 44;
    compt ++;
  }
  debx = 429;
  deby = 494;
  object door = create_door(debx,deby);
  d_house = insert(door, d_house);
  debx += 300;
  door = create_door(debx,deby);
  d_house = insert(door, d_house);
}

void create() {
  seteuid(getuid());
  set("light", 1);
  set("short", "The entrance hall.");
  set("long", @ENDLONG
This hallway appears to be the only way into or
out of this building.  It's low stone walls make
it even more oppressive.  It's light in here, but
there are no torches on the walls.
ENDLONG
  );
  set("item_desc", ([
    "walls" : "They are made of a dark brown stone.\n",
    "light" : "It seems to be coming from nowhere in particular.\n",
    "floor" : "It is well worn from use.\n",
  ]));
set("smell", (["default" : "It's dusty in here.\n",
]));
  set("listen", (["default" : "You hear the wind from outside.\n",
  ]));
  set("exits", ([
    "north" : "d/Dark/Nest/level1/first_hall",
    "south" : "d/Dark/Nest/level1/main1",
  ]));
::create();
create_door("south", "north", "It's a heavy metal door", "locked", "none", 30);
create_door("north", "south", "It's a banded wooden door", "locked", "none", 20);
}

void create()
{
	set("short", "石室");
	set("long", @LONG
这是一条小小的甬道，周围都是石壁，极为坚硬，看来不是什么武
功能打破的。石室里伸手不见无指，顺着石壁你摸索着，好象周围有石
门。
LONG );
	set("exits", ([
		"south" : __DIR__"midao1",
		"north" : __DIR__"midao9",
		"east"  : __DIR__"midao6",
		"west"  : __DIR__"midao8",
	]));
	set("no_clean_up", 0);
	set("no_drop", 1);
	set("coor/x", -52030);
	set("coor/y", 1070);
	set("coor/z", 90);
	setup();
	create_door("south", "石门", "north", DOOR_CLOSED);
	create_door("north", "石门", "south", DOOR_CLOSED);
	create_door("east",  "石门", "west",  DOOR_CLOSED);
	create_door("west",  "石门", "east",  DOOR_CLOSED);
	replace_program(ROOM);
}

void create()
{
    set("short", "走廊");
    set("long", @LONG
走廊东边木门后连着华山男弟子的休息室，西边门后是女弟子的休息
室。南边是华山掌门的寝室，弟子皆不准进去。北边则是客厅。
LONG
    );

    set("exits", ([
	"east" : __DIR__"nanshi",
	"west" : __DIR__"nushi",
	"south" : __DIR__"buwei2",
	"north" : __DIR__"zoulang1",
    ]));

    set("objects", ([
        CLASS_D("huashan") + "/dayou" : 1,
    ]));

    create_door("east", "木门", "west", DOOR_CLOSED);
    create_door("west", "木门", "east", DOOR_CLOSED);	

    set("no_clean_up", 0);

	set("cost", 1);
    setup();
    //replace_program(ROOM);
}

void create()
{
        set("short", "小径");
        set("long",@LONG
尚书府的小径走到这似乎到了尽头。小径的东边是一间小屋，平
时房门总是关的，每天按时由一名又聋又哑的仆役送饭进去，其他人
一概不让入内。南边不远处就是尚书府庭院了。
LONG
        );

        set("exits", ([
                "east" :        __DIR__"xiaowu",
		"south":	__DIR__"road2",
                ]));

	set("objects", ([
		__DIR__"npc/huyuan":	1,
		]) );

	set("outdoors", "city");
	
	create_door ("east", "小木门", "west", DOOR_CLOSED);

        setup();
        replace_program(ROOM);
}

void create()
{
        set("short", "草地");
        set("long", @LONG
庭园深深，夜色如墨，似乎到处都是人影。只觉得风吹树叶，
连大地也在低沉地呻吟。前面厢房木窗的裂缝里，已透出灰蒙蒙的
灯光，门犹在不住摇蔽。林木间左转右转，就来到一座假山，从假
山的中间穿过去，则是一座鬼气森森的楼阁。
LONG
        );
        set("exits", ([ /* sizeof() == 4 */
  "west" : __DIR__"guan",
  "east" : __DIR__"hyuan",

   ]));



        set("objects", ([
       
        __DIR__"npc/bandit1" : 1,
        __DIR__"npc/bandit2" : 1,
        __DIR__"npc/bandit3" : 1,
        __DIR__"npc/bandit4" : 1,
        __DIR__"npc/bandit5" : 1,
                        ]) );

        set("outdoors", "sharen");
        set("no_death_penalty",1);
        set("coor/y",-430);
        set("coor/z",0);
        set("coor/x",-15);
        setup();
        create_door("west", "青铜门", "east", DOOR_CLOSED); 
} 

void create ()
{
  set ("short", "北天门");
  set ("long", @LONG

    这里是天宫的北门。玉皇大帝的宝座是坐北朝南的，所以除了有
特殊圣旨或玉帝的亲信之外，没人敢从这里出入。比起南天门来，北
边可就冷清多了。虽然如此，北天门造的可丝毫不含糊。鲜红的大门
上镶着闪闪发光的铜钉，显得威武非凡。护国天王领着大力天丁和众
天兵，一丝不苟的巡逻着。

LONG);

  set("item_desc", ([ /* sizeof() == 1 */
  "south" : (: look_door,     "south" :),
]));
  set("objects", ([ /* sizeof() == 4 */
//  __DIR__"npc/tian-ding2" : 1,
//  __DIR__"npc/tian-ding1" : 1,
  __DIR__"npc/hg-tianwang" : 1,
  __DIR__"npc/tian-bing" : 4,
]));
  set("outdoors", 1);
  set("exits", ([ /* sizeof() == 3 */
  "west" : __DIR__"nw1",
  "south" : __DIR__"beimenting",
  "north" : __DIR__"yun",
  "east" : __DIR__"ne1",
]));
create_door("south", "北天门", "north", DOOR_CLOSED);

  setup();
}

void create()
{
set("short", WHT"怡然厅"NOR);
set("long", @LONG
大厅布置的简单别致，大厅两旁各安置着两张红木椅子和茶几
正前方挂着此居主人当年纵横天下所用的刀剑，刀剑下方安置着
香坛，里面燃放着香料，幽幽的香味让大厅显得格外的宁静和舒
适。
LONG
);
        set("exits", ([
"west" : __DIR__"mars3",
"east" : __DIR__"mars4",
"south" : __DIR__"mars1",

]));
set("objects", ([

       ]) );
           set("item_desc", ([
                "door": "一扇清雅的木门，造型别致，似乎可以打开(open)。\n",
                "木门": "一扇清雅的木门，造型别致，似乎可以打开(open)。\n",
        ]) );
        create_door("south", "木门", "north", DOOR_CLOSED);
        set("coor/x",X_COOR);
   	set("coor/y",Y_COOR);
        set("coor/z",Z_COOR);
/*        set("room_flag",R_FLAG);
        set("owner", OWNER);
        set("class", CLASS); */
        set("indoors","residence");
        setup();
}

void create()
{
        set("short", "琴室");
        set("long", @LONG
房中一阵檀香，一床(bed)一几，陈设简单，床上挂了纱帐，甚
是陈旧，已呈黄色。几上放着一张瑶琴。东面是一个月洞门(door)，
通向梅庄的後回廊。
LONG
        );
        set("exits", ([
		"east" : __DIR__"huilang",
	]));

	set("objects", ([
		__DIR__"npc/huang" : 1,
		__DIR__"npc/obj/yaoqin" : 1,
	]));
        set("item_desc", ([
                "bed" : "普普通通的一张床。\n",
		"door" : "门上似乎并未上锁。\n",
        ]));
        create_door("east","月洞门","west", DOOR_CLOSED);

        set("no_clean_up", 0);

	set("cost", 0);
	setup();
//        replace_program(ROOM);
}

void create ()
{
  set ("short", "南天门");
  set ("long", @LONG

这里就是天宫的南门，只见金光万道，瑞气千条。你一时间觉
得有些不知所措，定了定神，才发现门是琉璃造就，宝玉妆成。
气派非凡。进了这一道门，就是天宫了。往门内望去，只见云
遮雾绕，一座座宫殿隐隐约约地看不大清晰。增长天王手持长
枪，正带着几个天兵天将在这里巡逻。

LONG);

  set("item_desc", ([ /* sizeof() == 1 */
  "north" : (: look_door,     "north" :),
]));
  set("objects", ([ /* sizeof() == 4 */
  __DIR__"npc/zz-tianwang" : 1,
//  __DIR__"npc/tian-ding2" : 1,
//  __DIR__"npc/tian-ding1" : 1,
  __DIR__"npc/tian-bing" : 4,
]));
  set("outdoors", 1);

  set("exits", ([ /* sizeof() == 3 */
  "west" : __DIR__"sw1",
  "north" : __DIR__"nanmenting",
  "east" : __DIR__"se1",
]));
create_door("north", "南天门", "south", DOOR_CLOSED);

  setup();
}

void create()
{
        set("short", "金狮镖局大厅");
        set("long", @LONG
大红地毯，珍奇古玩，高悬字画，表明这里的主人不但性情豪爽，广交朋友，
且非大字不识，目中无人之辈。上首一狮皮交椅，左右各明烛闪烁。一古木书案
横于椅前，上面整齐的堆着一卷卷镖局压镖的货票。
LONG
        );
        set("exits", ([ /* sizeof() == 4 */
  "west" : __DIR__"goldlion",
  "east" : __DIR__"ginhall",
  "north" : __DIR__"gmoney",
]));
        set("objects", ([
        __DIR__"npc/" : 1,
                        ]) );

        set("coor/x",20);
        set("coor/y",40);
        set("coor/z",-300);
        setup();
        create_door("north", "铁门", "south", DOOR_CLOSED);

}

void create ()
{
   set ("short", "西偏殿");
   set ("long", @LONG

西偏殿主要用来堆放一些布道上香的常用物品。殿北楠木桌上有
一对青铜的烛台，上有红烛轻燃。隔着西边的雕花木门是西廊，
隐约可听到竹林中的风声。东边就回到宝殿。
LONG);

   set("exits", 
   ([ //sizeof() == 4
     "north" : __DIR__"jiangjing",
     "east" : __DIR__"zhengdian",
     "west" : __DIR__"westway2",
   ]));
   
   set("objects", 
   ([ //sizeof() == 1
     //__DIR__"npc/qingfeng" : 1,
   ]));

create_door("west", "雕花木门", "east", DOOR_CLOSED);

   //set("outdoors", "wuzhuang");

   setup();
}

void create()

{
        set("short", "林间空地");
        set("long", @LONG
往前走仍然是无边无际的林子，并不浓密，偶尔可以见到伐木人留下的篝火，
或是一块块只留下树根的空地。面前就是这么块空地，奇怪的是，空地中央竟然摆
着张小桌子。桌子上摆着些纸人纸马，还有一柄纸刀。用白纸糊成的刀，但刀柄却
涂成了黑色。没有人声，只有箫杀之意。空地旁有一间小屋。
LONG
        );
        set("exits", ([ 
		"north" : __DIR__"woods2",
		"south" : __DIR__"woodcabin",
	]));
        set("item_desc", ([
        	"table": "一张桌子上摆着些纸人纸马，还有一柄纸刀。用白纸糊成的刀，但刀柄却涂
成了黑色。\n",
        	"桌子" : "一张桌子上摆着些纸人纸马，还有一柄纸刀。用白纸糊成的刀，但刀柄却涂
成了黑色。\n",
        
	]) );
	set("outdoors", "zangbei");
        set("coor/x",-1620);
        set("coor/y",670);
        set("coor/z",0);
	set("map","zbwest");
	setup();
	create_door("south","door","木门","north",DOOR_CLOSED);
}

void create ()
{
   set ("short", "西小廊");
   set ("long", @LONG

这是大殿西厢的一条长廊，向北连到后院。小廊上是木板铺地，
打扫的极为干净，走在上面发出吱吱的响声。走廊两面的木格内
雕着一些山水人物。东面有一道小门通向西偏店。
LONG);

   set("exits", 
   ([ //sizeof() == 4
     "south" : __DIR__"westway1",
     "north" : __DIR__"westway3",
     "east" : __DIR__"wpiandian",
   ]));
   
   set("objects", 
   ([ //sizeof() == 1
     //__DIR__"npc/qingfeng" : 1,
     //__DIR__"npc/mingyue" : 1,
   ]));
create_door("east", "雕花木门", "west", DOOR_CLOSED);


//   set("outdoors", "wuzhuang");

   setup();
}

void create ()
{
	set ("short", "东偏殿");
	set ("long", @LONG

东偏殿主要是待客奉茶之用。殿内摆着几对檀木椅。木壁之上挂
了几幅字画。中有一幅大书：“清虚人事少，寂静道心生”，写
得是灵妙非常，落款袁天罡。
LONG);

	set("exits", 
	([ //sizeof() == 4
		"east" : __DIR__"eastway2",
		"west" : __DIR__"zhengdian",
		"north" : __DIR__"shuofa",
	]));
	
	set("objects", 
	([ //sizeof() == 1
		//__DIR__"npc/qingfeng" : 1,
		__DIR__"npc/mingyue" : 1,
	]));

create_door("east", "雕花木门", "west", DOOR_CLOSED);
	//set("outdoors", "wuzhuang");

	setup();
}