// dong2.c// bbb 1997/07/16// COOL@SJ,9808inherit ROOM;string look_yuxiang();string look_zi();string look_shoe();string look_left();string look_right();void create(){    set("short", "內(nèi)室");        set("long", @LONG眼前突然一亮，一個宮裝美女，手持長劍，劍尖對準了你的胸膛。細看之下，原來是一座玉像（yuxiang)。東壁寫了許多字（zi），筆法飄逸，似以極強腕力以利器寫成，西壁鑲了六塊大水晶，水晶外綠水隱隱，映得石室中比第一間石室亮了數(shù)倍。LONG        );        set("exits", ([                "out" : __DIR__"dong1",        ]));        set("valid_startroom",1);                set("item_desc",([                "left"          :       (: look_left :),                "right" :               (: look_right :),                "zi"            :       (: look_zi :),                "yuxiang"       :       (: look_yuxiang :),        ]));        setup();}void init(){        add_action("do_ketou", "ketou");}int do_ketou(string arg){       object me;       me=this_player();       if (!me->query_temp("lbwb1/yuxiang")) return 0;       if ( me->query("dali/fail") > 3) return 0;       if( !arg || arg != "yuxiang" ) return 0;               if( arg=="yuxiang" ) {           message_vision("$N口中數(shù)著，恭恭敬敬的向玉像磕起頭來。\n", this_player());           if(!me->query_temp("lbwb1/left") || !me->query_temp("lbwb1/right")) {                write("你對著玉像一個頭磕下去，似乎發(fā)現(xiàn)玉像的左腳（left)、右腳（right)繡得有字。 \n");                return 1;            }           if( me->query_temp("ketou_trigger") > 15             && me->query_temp("ketou_trigger") < 17 ) {               message_vision("$N看見蒲團上的薄草早已破裂，不由伸手進去，里面什么也沒有，好象已經(jīng)被取走了。\n",me);               me->delete_temp("lbwb1");               me->delete("ketou_trigger");               return 1;           }           if (!me->query("dali/meet_dy1")             || !me->query("dali/pass")) {                      me->set_temp("duanyu/find1",1);               me->add_temp("ketou_trigger", 1);               return 1;           }                  return 1;       }}string look_left(){        object me;         me=this_player();       me->set_temp("lbwb1/left",1);          return "磕首百遍，供我驅(qū)策。\n";}string look_right(){        object me;         me=this_player();       me->set_temp("lbwb1/right",1);          return "遵行我命，百死無悔。 \n";}string look_zi(){       return "洞中無日月，人間至樂也 -- 逍遙子為秋水妹書。\n";}string look_yuxiang(){           object me;         me=this_player();       me->set_temp("lbwb1/yuxiang",1);           return "那是一座白玉雕成的玉像，與真人一般大小，身上淡黃綢衫微微顫動，更奇的是一對眸子瑩然有光，神采飛揚。  \n";}