// story:shenzhao 凝血神爪

#include <ansi.h>

int give_gift();


mixed *story = ({
        "三軍蜿蜒而行。",
        "“嗯？那寫了什么？”",
        "小兵：報告軍師，上面寫著“落雞坡”三個字。",
        "龐統：嗯... 不好！我的外號是小雞，這里大大的不吉利，火速撤退！",
        "“轟！隆隆！”",
        "張任：嘿嘿！龐統，哪兒跑？以為我們四川這兒想來就來，想走就走？",
        "龐統：魏延將軍呢？",
        "小兵：報告軍師，魏延將軍在前頭，已經出谷了。",
        "龐統：黃忠將軍呢？",
        "小兵：報告軍師，黃老將軍在后頭，還沒有入谷。",
        "龐統：他奶奶的，就我一個不緊不慢，恰好趕在中間！",
        "張任：放箭！",
        "箭如雨下",
        "龐統翻翻白眼，倒在地上，口中吐出兩口鮮血，死了。",
        "......",
        "一年過去了...",
        "十年過去了...",
        "一百年過去了...",
        "一千年過去了...",
        "宏天漫步在山間... 咦？這是什么？",
        "亂堆從中一堆枯骨，中間好像有本書？",
        "宏天翻了出來，發現這本書似乎不是一般的材料書寫的。",
        "“好像很值錢呀”，讓我看看....",
        "“嗯？鬼谷神算？”",
        "宏天看了看說道：“什么破玩意，原來不值錢，隨手把鬼谷神算給扔了”",
        (: give_gift :),
});

void create()
{
        seteuid(getuid());
}



mixed query_story_message(int step)
{
        return step < sizeof(story) ? story[step] : 0;
}

int give_gift()
{
         
        int i;
        object env,ob;
        object *players;
                object gob;
        string msg;

        players = users();
        if (sizeof(players) >= 10)
        {
                for (i = 0; i < 10; i++)
                {
                        ob = players[random(sizeof(players))];
                        if (wizardp(ob)) continue;
                        if (ob->is_fighting()) continue;
                        if (!environment(ob)) continue;
                        if (ob->query_temp("netdead")) continue;
                                
                }
        if(!ob) return 1;
        gob = new(__DIR__"obj/guigu");
        gob->move(ob, 1);
 if (ob)
{
        CHANNEL_D->do_channel(this_object(), "rumor", "聽說" + ob->name(1) +
                              "撿到了奇書《鬼谷神算》。");
}
        STORY_D->remove_story("new10");
      }
        return 1;
}