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

/*  scholar.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 
*/

#include 
#include 

// prototypes
mixed do_chat(mixed chat);
varargs string name(int raw);
void kill_ob(object ob);
varargs int is_fighting(object ob);
int query_level();
string rank(string politeness);

int accept_fight(object ob)
{
    if( is_fighting() ) {
        int differ;

        differ = query_level() - (int)ob->query_level();
        if( differ > 10 ) {
            do_chat( name() + "笑著說道：" + ob->rank("respectful")
         + "且少待，" + rank("self") + "自當請教。\n");
            return 0;
        } else {
            do_chat( name() + "說道﹕這位" + ob->rank("respectful") + "難道是想倚多為勝﹖\n");
            return 0;
        }
    }

    if( ob->is_fighting() ) {
do_chat( name() + "說道：切磋武藝，還是單打獨鬥的好，我先在一旁掠陣吧。\n");
return 0;
    }

    if( query_stat_current("kee") < query_stat_maximum("kee") ) {
do_chat( name() + "說道：等會兒，讓我喘口氣。\n");
return 0;
    }

    do_chat( name() + "說道﹕不敢﹐請賜招﹗\n");
    return 1;
}

void
accept_kill(object ob)
{
    do_chat( name() + "說道﹕不知" + rank("self") + "如何得罪了這位"
+ ob->rank("respectful") + "，為什麼非要動手不可呢？\n");
}

void accept_negotiation(object who, string key)
{
    switch(key) {
    case "peace":
        if( !is_killing(who) ) {
            do_chat( name() + "躬身還禮，說道：好說，好說。\n");
            remove_enemy(who);
            who->remove_enemy(this_object());
        }
        else do_chat( name() + "說道：廢話少說，今日不是你死便是我活！\n");
        return;
    case "mercy":
        if( is_killing(who) ) {
            do_chat( name() + "哈哈大笑，說道：既然如此，今天就饒了你。\n");
            remove_killer(who);
            remove_enemy(who);
            who->remove_killer(this_object());
            who->remove_enemy(this_object());
            who->gain_score("martial fame", - who->query_level() * 10);
        }
    }
}

void
win_fight(object ob)
{
    do_chat( name() + "拱手說道：承讓！這位" + ob->rank("respectful")
+ "手下留情，" + rank("self") + "至感盛情。\n");
}