#include <ansi.h>inherit ROOM;void home( object ob ) ;void create(){    set("short", "海灘");    set("long", @LONG這里就是神龍島了。南邊是一望無際的大海；往北則是一片灌木林。島上的空氣似乎又熱又悶, 咸濕的海風中帶著一股腥臭, 又夾雜了一縷奇特的花香, 聞起來十分怪異。海邊泊著一艘大船(chuan)。LONG );    set("item_desc", ([        "chuan" : "這是神龍島對外聯系的大船。島上的客人或弟子只要\n"                  "上船(enter)就可以回中原。\n",    ]));    set("exits",([        "south" :__DIR__"treen1",        "north" :__DIR__"lin1",        "east" :"/quest/menpaijob/shenlong/dian",    ]));	set("objects", ([		"quest/skills2/wunon/yu/yutan" : 3,	]));     set("outdoors", "shenlong");    setup();}void init(){    add_action("do_enter", "enter");}int do_enter ( string arg ){    object ob ;    string dir;    if( !arg || arg !="chuan" )        {         tell_object(this_player() , "你要 enter 哪兒？\n" ) ;         return 1 ;       }    ob = this_player () ;    message_vision("船夫一見有人上船，忙叫了一聲：開船嘍！\n", ob);    message_vision("船夫升起帆，船就向西方航行。\n", ob);    ob ->move(__DIR__"dahai") ;    tell_object(ob, BLU "你在海上航行了很久很久.......\n" NOR ) ;    call_out("home", 10 , ob );    return 1 ;}void home( object ob ){  tell_object(ob , "大船終于抵達了中原的一個繁華城市。你走下船來。\n" ) ;  ob->move ("/d/city2/haigang") ;}