ES2 MUD LIB :: 東方故事二(ES2) 天朝帝國 mudlib 瀏覽展示

/*  describe.c

    Copyright (C) 1994-2000 Annihilator 

    This program is a part of ES2 mudlib. Permission is granted to use,
    modify, copy or distribute this program provided this copyright notice
    remains intact and subject to the restriction that this program MAY
    NOT be used in any way for monetary gain.

    Details of terms and conditions is available in the Copyright.ES2 file.
    If you don't receive this file along with this program, write to the
    primary author of ES2 mudlib: Annihilator 
*/

inherit F_CLEAN_UP;

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

int main(object me, string arg)
{
    string *txt;

    if( !arg ) return notify_fail("指令格式﹕describe <描述>\n");

    txt = explode(arg, "\n");
    if( (strlen(arg) > 400) || (sizeof(txt) > 8) )
        return notify_fail("您的敘述太長了﹐請控制在八行、兩百字以內。\n");

    arg = implode(txt, "\n") + "\n";

    me->set("long", arg);
    write("Ok。\n");
    return 1;
}

int help()
{
    write(@TEXT
指令格式﹕describe <描述>

這個指令讓你設定當別人用 look 指令看你時﹐對你的描述﹐通常當你
的描述超過一行時可以用 to describe 的方式來輸入。
TEXT
    );
    return 1;
}