fang.c

来自「C实现的MUD,对大家基本入门网络游戏很有帮助!」· C语言 代码 · 共 61 行

#include <ansi.h>
inherit NPC;

void create()
{
	set_name("方先生", ({ "fang xiansheng", "fang", "xiansheng"}));
	set("long", "这位先生年纪不大，正在认真地读书。\n");
	set("gender", "男性");
	set("age", 35);
	set_skill("literate", 60);
	set_temp("apply/attack", 100);
	set_temp("apply/defense", 100);
	set_temp("apply/damage", 20);
	set("combat_exp", 500000);
	setup();
        carry_object("clone/cloth/cloth")->wear();
}
void init()
{
        object ob;
        ::init();
        if( interactive(ob = this_player()) && !is_fighting() ) {
                remove_call_out("greeting");
                call_out("greeting", 1, ob);
        }
}

int recognize_apprentice(object ob)
{
	int money=25, level = ob->query_skill("literate", 1);

	if (level>29) money=50;
	if (level>50) money=100;
	if (level>89) money=1000;
	if (level>119) money=5000;

	ob->delete_temp("mark/literate");
//	switch(MONEY_D->player_pay(ob, money)) {
//		case 0:
//		case 2:
//			write("你现在的学费是每次" + MONEY_D->money_str(money) + "，请备好零钱。\n");
//			return 1;
//	}
	ob->set_temp("mark/literate", 1);
	return 1;
}
void greeting(object ob)
{
	if( !ob || environment(ob) != environment() ) return;

       if ( ob->query_skill("literate") > 60 ) return;

       command("pat "+ob->query("id"));
       command("say 这位" + RANK_D->query_respect(ob)
				+ "，到我这学些知识"HIR"(xue fang literate)"NOR"吧。\n");

}

int is_apprentice_of() {return 1;}