#include <ansi.h>int give_gift();mixed *story = ({        "王母娘娘做壽，玉帝大擺酒席，山珍海味無所不用其極，飯前準備",        "小菜，飯中大菜，飯后甜點吃的諸位天神直打飽嗝，席上幺五喝六",        "觥籌交錯，仙酒仙果芳香彌散，沁入肺腑，天界瑤池，非人間可比！",        "酒酣耳熱時，玉帝招侍衛一干人等，要取蟠桃祝壽，太白金星和太",        "上老君并托塔天王李靖去御花園。",        "李靖：“紅孩兒！”",        "紅孩兒：“孩兒在！”",        "“你爬樹摘桃子去！”",        "紅孩兒摘了一個桃子，不敢自己偷吃，沒辦法只好扔過來，剛好打在",        "太白金星頭上。",        "“你這孩子也太調皮了，怎么可以這樣欺負老人家呢？你看看哎呀太",        "白金星都一大把年紀了，就算平時不給你買巧克力你也不應該這樣嘛",        "這蟠桃都是天上幾千年才結果的神樹啊，不可以這樣隨便扔嘛，就算",        "亂扔果皮紙屑也是不應該的呀，你看看我還沒說完你就又打到我的頭",        "了，哎呀……”",        "“都怪我管教無方，使兩位仙君……紅孩兒，你給我好好干活！”",        "紅孩兒憤憤地摘了一個蟠桃用力拋了過來，結果越過三人頭頂，掉下",        "去了……”",        (: give_gift :),        HIM"聽說天庭掉下來一個蟠桃……”"NOR,});void create(){        seteuid(getuid());}mixed query_story_message(int step){        return step < sizeof(story) ? story[step] : 0;}int give_gift(){        STORY_D->give_gift("/clone/gift/obj/pantao", 1,                           HIM "\n一顆蟠桃從天而降，掉到你的面前。\n\n" NOR);        return 0;}