?? tanan.c
字號:
// tanan.c// By Riverinherit ROOM;#include <ansi.h>void create(){ set("short", HIY"水潭岸邊"NOR); set("long", @LONG你站在一片山谷中的一處水潭(tan)岸邊。游目四顧,只見繁花青草,便如一個極大的花園。然而花影不動,幽谷無人,四下里十分安靜。草地上一條蜿蜒的小路鋪滿了鵝卵石(shi),前方不遠處一所茅屋。LONG ); set("item_desc", ([ "tan":HIC"你舉目向潭中望去,但見水潭里面水草晃動,幾條不知名的白魚游來游去。\n"NOR, "shi":"一塊塊大大小小的鵝卵石,你忍不住想撿(jian)起來看看。\n", ])); set("outdoors", "絕情谷"); set("exits", ([ "north" : __DIR__"xiaolu", ])); setup();}void init(){ add_action("do_tiao", "tiao"); add_action("do_jian", "jian"); add_action("do_xiao", "xiao");}int do_tiao(string arg){ object me; me=this_player(); if (me->is_busy() || me->is_fighting()) return notify_fail("你正忙著哪!\n"); if ( !arg || arg != "tan") return notify_fail("你要往哪跳?\n"); message_vision(HIY"$N撲通一聲,涌身跳入了水潭。\n"NOR, me); me->set("water", me->max_water_capacity()+ 100); me->move(__DIR__"tanmian"); tell_room(environment(me), me->name() + "從岸邊跳了下來。\n", ({ me })); return 1;}int do_jian(string arg){ object me,ob; me=this_player(); if (me->is_busy() || me->is_fighting()) return notify_fail("你正忙著哪!\n"); if ( !arg || arg != "shi") return notify_fail("你要撿起什么?\n"); if ((int)me->query_encumbrance() * 100 / (int)me->query_max_encumbrance() >= 100) return notify_fail("你的負荷過重了!\n"); switch (random(3)){ case 0: ob = new(__DIR__"obj/shi1"); break; case 1: ob = new(__DIR__"obj/shi2"); break; case 2: ob = new(__DIR__"obj/shi3"); break; } ob->move(me); message_vision("$N彎下腰,從地上撿起了一塊"+ob->name()+"。\n",me); return 1;}int get_object(object ob){ return userp(ob);}int do_xiao(string arg,object *obj){ object me=this_player(); mapping fam; object *inv = deep_inventory(me); fam = me->query("family"); if (arg) return 0; if( ! fam || fam["family_name"] != "古墓派") return 0; if (me->is_busy() || me->is_fighting()) return notify_fail("你正忙著哪!\n"); obj = filter_array(inv,(:get_object:)); if(sizeof(obj)){ tell_object(me,HIR"你剛想偷偷背個人騎上白雕,結果負重太多,腳下一個絆拴,摔倒在地。\n"NOR); me->unconcious(); return 1; } message_vision(HIW"\n$N當下作哨招雕,只見白雕雙翅一振,高飛入云,盤旋數圈,猛地里從空中疾沖而下。\n"+ "$N騎上白雕后,那白雕厲聲長鳴,穿破云霧,沖上山崖。\n\n"NOR,me); me->move(__DIR__"duanchang"); tell_room(environment(me), me->name() + "從白雕身上跳了下來,白雕雙翅一振,高飛入云。\n", ({ me })); return 1;}
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -