int main(object me, string arg)
{
object ob;
mapping my;
seteuid(getuid(me));
if(!arg)
ob = me;
else if (wizardp(me)) {
ob = present(arg, environment(me));
if (!ob) ob = find_player(arg);
if (!ob) ob = find_living(arg);
if (!ob) return notify_fail("你要察看谁的状态？\n");
} else
return notify_fail("只有巫师能察看别人的状态。\n");
my = ob->query_entire_dbase();
printf(" 精： %s%4d/ %4d %s(%3d%%)" NOR " 精力： %s%4d / %4d (+%d)\n" NOR,
status_color(my["jing"], my["eff_jing"]), my["jing"], my["eff_jing"],
status_color(my["eff_jing"], my["max_jing"]), my["eff_jing"] * 100 / my["max_jing"],
status_color(my["jingli"], my["max_jingli"]), my["jingli"], my["max_jingli"],
my["jiajin"] );
printf(" 气： %s%4d/ %4d %s(%3d%%)" NOR " 内力： %s%4d / %4d (+%d)\n" NOR,
status_color(my["qi"], my["eff_qi"]), my["qi"], my["eff_qi"],
status_color(my["eff_qi"], my["max_qi"]), my["eff_qi"] * 100 / my["max_qi"],
status_color(my["neili"], my["max_neili"]), my["neili"], my["max_neili"],
my["jiali"] );
printf(" 食物： %s%4d/ %4d " NOR " 潜能： %s%4d / %4d\n" NOR,
status_color(my["food"], ob->max_food_capacity()),
my["food"], ob->max_food_capacity(),
HIY,
(int)ob->query("potential"),
(int)ob->query("max_potential"));
printf(" 饮水： %s%4d/ %4d " NOR " 经验： %s%d\n" NOR,
status_color(my["water"], ob->max_water_capacity()),
my["water"], ob->max_water_capacity(),
HIM,
my["combat_exp"] );
return 1;
}
int main(object me, string arg)
{
object ob;
mapping my;
seteuid(getuid(me));
if(!arg)
ob = me;
else if (wizardp(me)) {
ob = present(arg, environment(me));
if (!ob) ob = find_player(arg);
if (!ob) ob = find_living(arg);
if (!ob) return notify_fail("你要察看谁的状态？\n");
} else
return notify_fail("只有管理员能察看别人的状态。\n");
my = ob->query_entire_dbase();
printf(" 精力 ： %s%4d/ %4d %s(%3d%%)" NOR " 食物： %s%3d%%\n" NOR,
status_color(my["gin"], my["eff_gin"]), my["gin"], my["eff_gin"],
status_color(my["eff_gin"], my["max_gin"]), my["eff_gin"] * 100 / my["max_gin"],
status_color(my["food"], ob->max_food_capacity()),
my["food"] * 100/ ob->max_food_capacity()
);
printf(" 气血 ： %s%4d/ %4d %s(%3d%%)" NOR " 饮水： %s%3d%%\n" NOR,
status_color(my["kee"], my["eff_kee"]), my["kee"], my["eff_kee"],
status_color(my["eff_kee"], my["max_kee"]), my["eff_kee"] * 100 / my["max_kee"],
status_color(my["water"], ob->max_water_capacity()),
my["water"] * 100/ob->max_water_capacity()
);
printf(" 心神 ： %s%4d/ %4d %s(%3d%%)" HIW " 评价： %d\n" NOR,
status_color(my["sen"], my["eff_sen"]), my["sen"], my["eff_sen"],
status_color(my["eff_sen"], my["max_sen"]), my["eff_sen"] * 100 / my["max_sen"],
my["score"]
);
printf(" 灵力 ： %s%4d/ %4d (%4d)" HIR " 杀气： %d\n" NOR,
status_color(my["atman"], my["max_atman"]), my["atman"], my["max_atman"],
my["atman_factor"],
my["bellicosity"]
);
printf(" 内力 ： %s%4d/ %4d (%4d)" HIG " 潜能： %d\n" NOR,
status_color(my["force"], my["max_force"]), my["force"], my["max_force"],
my["force_factor"],
(my["potential"] - my["learned_points"])
);
printf(" 法力 ： %s%4d/ %4d (%4d)"HIM " 经验： %d\n" NOR,
status_color(my["mana"], my["max_mana"]), my["mana"], my["max_mana"],
my["mana_factor"],
my["combat_exp"]
);
return 1;
}
int main(object me, string arg)
{
object ob;
mapping my;
int flag = 0;
seteuid(getuid(me));
if(!arg || arg == me->query("id"))
ob = me;
else
{
ob = present(arg, environment(me));
if (!ob) ob = find_player(arg);
if (!ob) ob = find_living(arg);
if (!ob)
{
ob = new(USER_OB);
seteuid(arg);
export_uid(ob);
flag = 1;
if (!ob->restore())
return notify_fail("没有这个玩家。\n");
}
}
if (!ob->is_character())
return notify_fail("那不是活物。\n");
my = ob->query_entire_dbase();
printf(HIC"≡"HIY"──────────────────────────────"HIC"≡\n"NOR);
printf(HIC"【 精 气 】 %s%4d/ %4d %s(%3d％)" HIC " 【 精 力 】 %s%4d / %4d (+%d)\n" NOR,
status_color(my["jing"], my["eff_jing"]), my["jing"], my["eff_jing"],
status_color(my["eff_jing"], my["max_jing"]), my["eff_jing"] * 100 / my["max_jing"],
status_color(my["jingli"], my["max_jingli"]), my["jingli"], my["max_jingli"],
my["jiajing"] );
printf(HIC"【 气 血 】 %s%4d/ %4d %s(%3d％)" HIC " 【 内 力 】 %s%4d / %4d (+%d)\n" NOR,
status_color(my["qi"], my["eff_qi"]), my["qi"], my["eff_qi"],
status_color(my["eff_qi"], my["max_qi"]), my["eff_qi"] * 100 / my["max_qi"],
status_color(my["neili"], my["max_neili"]), my["neili"], my["max_neili"],
my["jiali"] );
if (ob->query("shen") >=0)
printf(HIR"【 正 气 】%8d" HIC " 【 体 力 】 %s%4d / %4d \n"NOR,
ob->query("shen"),
status_color(my["tili"], my["max_tili"]), my["tili"], my["max_tili"]);
else
printf(HIG"【 戾 气 】%8d" HIC " 【 体 力 】 %s%4d / %4d \n"NOR,
ob->query("shen"),
status_color(my["tili"], my["max_tili"]), my["tili"], my["max_tili"]);
printf(HIW"【 食 物 】 %s%4d/ %4d " HIW " 【 潜 能 】 %s%d\n" NOR,
status_color(my["food"], ob->max_food_capacity()),
my["food"], ob->max_food_capacity(), HIY,
(int)ob->query("potential") - (int)ob->query("learned_points"));
printf(HIW"【 饮 水 】 %s%4d/ %4d " HIW " 【 经 验 】 %s%d\n" NOR,
status_color(my["water"], ob->max_water_capacity()),
my["water"], ob->max_water_capacity(), HIM,
my["combat_exp"] );
printf(HIC"≡"HIY"──────────────────────────────"HIC"≡\n"NOR);
if (flag) {
printf("该玩家目前不在线。\n");
destruct(ob);
}
return 1;
}
int main(object me, string arg)
{ object ob;
object weapon;
string line,skill_type;
mapping my;
int year, day, hour,anger,x;
int attack_points, dodge_points, parry_points;
int i;
if(!arg)
ob = me;
else if (wizardp(me)) {
ob = present(arg, environment(me));
if (!ob) ob = find_player(arg);
if (!ob) ob = find_living(arg);
if (!ob) return notify_fail("你要察看谁的状态？\n");
if( !ob->is_character() || ob->is_corpse() )
return notify_fail("连" + ob->query("name") + "的状态都要查看？你真幽默。\n");
} else
return notify_fail("只有巫师能察看别人的状态。\n");
my = ob->query_entire_dbase();
//printf("[37m─────────────────────────────────────\n[2;37;0m");
printf(HIC" 气血： %s%4d/ %4d %s(%3d%%)" +HIC
" 内力： %s%4d / %4d (%3d%%) (+%d)\n" NOR,
status_color(my["kee"], my["eff_kee"]),my["kee"],my["eff_kee"],
status_color(my["eff_kee"], my["max_kee"]),
my["eff_kee"] * 100 / my["max_kee"],
status_color(my["force"], my["max_force"]),
my["force"], my["max_force"],
my["maximum_force"] ?
my["max_force"] * 100 / my["maximum_force"] : 100,
my["force_factor"] );
printf(HIC" 精神： %s%4d/ %4d %s(%3d%%)" +HIC
" 法力： %s%4d / %4d (%3d%%) (+%d)\n" NOR,
status_color(my["sen"], my["eff_sen"]),my["sen"],my["eff_sen"],
status_color(my["eff_sen"], my["max_sen"]),
my["eff_sen"] * 100 / my["max_sen"],
status_color(my["mana"], my["max_mana"]),
my["mana"], my["max_mana"],
my["maximum_mana"] ?
my["max_mana"] * 100 / my["maximum_mana"] : 100,
my["mana_factor"] );
printf(HIW" 食物： %s%4d/ %4d " +HIW" 武学： %s%d\n" NOR,
status_color(my["food"], ob->max_food_capacity()),
my["food"], ob->max_food_capacity(),
HIY,
my["combat_exp"]);
year = my["daoxing"] / 1000;
day = (my["daoxing"] - year * 1000) / 4;
hour = (my["daoxing"] - year * 1000 - day * 4) * 3;
printf(HIW" 饮水： %s%4d/ %4d " +HIW" 道行： %s",
status_color(my["water"], ob->max_water_capacity()),
my["water"], ob->max_water_capacity(), HIM );
if(year) printf("%s年", chinese_number(year));
if(day) printf("%s天", chinese_number(day));
if(hour) printf("%s时辰", chinese_number(hour));
if(!year && !day && !hour) printf("没有道行");
printf("\n"NOR);
printf(CYN" 潜能： %s%6d " +CYN" 杀气："+HIR" %s%4d\n"NOR,
YEL,
(int)ob->query("potential") - (int)ob->query("learned_points"),
HIR,
my["bellicosity"]);
if( objectp(weapon = ob->query_temp("weapon")) )
skill_type = weapon->query("skill_type");
else
skill_type = "unarmed";
attack_points = COMBAT_D->skill_power(ob, skill_type,SKILL_USAGE_ATTACK);
parry_points = COMBAT_D->skill_power(ob, skill_type,SKILL_USAGE_DEFENSE);
dodge_points = COMBAT_D->skill_power(ob, "dodge",SKILL_USAGE_DEFENSE);
printf(CYN" 兵器： "WHT"%4d " +CYN" 盔甲："WHT" %4d\n"NOR,
ob->query_temp("apply/damage"),ob->query_temp("apply/armor"));
anger=ob->query("anger");
printf(RED" 怒气："NOR);
if( !anger || anger==0 )
printf(GRN"□□□□□□□□□□\n",NOR);
else {
for( x=0;x<anger/10;x++)
{
printf(HIR+BLINK"■"NOR);
}
for( i=0;i<(100-anger)/10;i++)
{
printf(GRN"□"NOR);
}}
printf("\n");
// printf("[37m──────────────────────────"HIC"梦幻西游"NOR"─────────\n[2;37;0m");
return 1;
}
int main(object me, string arg)
{
object ob;
mapping my, exp_data;
int level, old_level, real_exp,pot_reward;
seteuid(getuid(me));
if(!arg) ob = me;
else if (wizardp(me))
{
ob = present(arg, environment(me));
if (!ob) ob = find_player(arg);
if (!ob) ob = find_living(arg);
if (!ob) return notify_fail("��Ҫ�쿴˭��״̬��\n");
}
else
return notify_fail("ֻ�й���Ա�ܲ쿴���˵�״̬��\n");
if (!living(ob))
return notify_fail("������ֻ���������\n");
my = ob->query_entire_dbase();
/* printf(HIC"��"HIY"��������������������������������������������������������"HIC"��\n"NOR);
printf(CYN" "+ my["name"] + "\n"NOR);
printf(HIC"��"HIY"��������������������������������������������������������"HIC"��\n"NOR); */
printf(" ��������%s%5d/ %5d %s(%3d%%)" NOR " ��ʳ�%s%3d%%\n" NOR,
status_color(my["gin"], my["eff_gin"]), my["gin"], my["eff_gin"],
status_color(my["eff_gin"], my["max_gin"]), my["eff_gin"] * 100 / my["max_gin"],
status_color(my["food"], ob->max_food_capacity()),
my["food"] * 100/ob->max_food_capacity()
);
printf(" ����Ѫ��%s%5d/ %5d %s(%3d%%)" NOR " ����ˮ��%s%3d%%\n" NOR,
status_color(my["kee"], my["eff_kee"]), my["kee"], my["eff_kee"],
status_color(my["eff_kee"], my["max_kee"]), my["eff_kee"] * 100 / my["max_kee"],
status_color(my["water"], ob->max_water_capacity()),
my["water"] * 100/ob->max_water_capacity()
);
printf(" ������%s%5d/ %5d %s(%3d%%)" HIW " �����ۡ� %d\n" NOR,
status_color(my["sen"], my["eff_sen"]), my["sen"], my["eff_sen"],
status_color(my["eff_sen"], my["max_sen"]), my["eff_sen"] * 100 / my["max_sen"],
my["score"]
);
printf(" ��������%s%5d/ %5d (%4d)" HIR " ��ɱ���� %d\n" NOR,
status_color(my["atman"], my["max_atman"]), my["atman"], my["max_atman"],
my["atman_factor"],
my["bellicosity"]
);
printf(" ��������%s%5d/ %5d (%4d)" HIG " ��DZ�ܡ� %d\n" NOR,
status_color(my["force"], my["max_force"]), my["force"], my["max_force"],
my["force_factor"],
(my["potential"] - my["learned_points"])
);
if (userp(ob) && my["combat_exp"]>= 10000000) {
real_exp = 10000000 + my["extra_exp"];
exp_data = exp_to_level(real_exp);
printf(" ��������%s%5d/ %5d (%4d)"HIM " ���ȼ��� ��139+%d ��%d.%d����\n" NOR,
status_color(my["mana"], my["max_mana"]), my["mana"], my["max_mana"],
my["mana_factor"],
exp_data["level"]-139,
exp_data["sub"]/10,
exp_data["sub"]%10,
);
} else {
int main(object me, string arg)
{
object ob;
mapping my, exp_data;
int level, old_level, pot_reward;
seteuid(getuid(me));
if(!arg) ob = me;
else
{
ob = present(arg, environment(me));
if (!ob) ob = find_player(arg);
if (!ob) ob = find_living(arg);
if (!ob) return notify_fail("─у╥к▓ь┐┤╦н╡─╫┤╠мг┐\n");
}
my = ob->query_entire_dbase();
/* printf(HIC"б╘"HIY"йдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйд"HIC"б╘\n"NOR);
printf(CYN" "+ my["name"] + "\n"NOR);
printf(HIC"б╘"HIY"йдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйд"HIC"б╘\n"NOR); */
printf(" б╛╛л┴жб┐%s%5d/ %5d %s(%3d%%)" NOR " б╛╩│╬яб┐%s%3d%%\n" NOR,
status_color(my["gin"], my["eff_gin"]), my["gin"], my["eff_gin"],
status_color(my["eff_gin"], my["max_gin"]), my["eff_gin"] * 100 / my["max_gin"],
status_color(my["food"], ob->max_food_capacity()),
my["food"] * 100/ob->max_food_capacity()
);
printf(" б╛╞°╤кб┐%s%5d/ %5d %s(%3d%%)" NOR " б╛╥√╦об┐%s%3d%%\n" NOR,
status_color(my["kee"], my["eff_kee"]), my["kee"], my["eff_kee"],
status_color(my["eff_kee"], my["max_kee"]), my["eff_kee"] * 100 / my["max_kee"],
status_color(my["water"], ob->max_water_capacity()),
my["water"] * 100/ob->max_water_capacity()
);
printf(" б╛╨─╔ёб┐%s%5d/ %5d %s(%3d%%)" HIW " б╛╞└╝█б┐ %d\n" NOR,
status_color(my["sen"], my["eff_sen"]), my["sen"], my["eff_sen"],
status_color(my["eff_sen"], my["max_sen"]), my["eff_sen"] * 100 / my["max_sen"],
my["score"]
);
printf(" б╛┴щ┴жб┐%s%5d/ %5d (%4d)" HIR " б╛╔▒╞°б┐ %d\n" NOR,
status_color(my["atman"], my["max_atman"]), my["atman"], my["max_atman"],
my["atman_factor"],
my["bellicosity"]
);
printf(" б╛─┌┴жб┐%s%5d/ %5d (%4d)" HIG " б╛╟▒─▄б┐ %d\n" NOR,
status_color(my["force"], my["max_force"]), my["force"], my["max_force"],
my["force_factor"],
(my["potential"] - my["learned_points"])
);
exp_data = exp_to_level(my["combat_exp"]);
if (wizardp(me) && me->query("oldexp")) { // ┤╦╧ю╘╩╨эWiz╙├╛╔╙╨╡─╛н╤щ╠х╧╡▓ь┐┤бг
printf(" б╛╖и┴жб┐%s%5d/ %5d (%4d)"HIM " б╛╛н╤щб┐%d\n" NOR,
status_color(my["mana"], my["max_mana"]), my["mana"], my["max_mana"],
my["mana_factor"],
my["combat_exp"]
);
} else
printf(" б╛╖и┴жб┐%s%5d/ %5d (%4d)"HIM " б╛╡╚╝╢б┐ г╠%d ги%d.%dгегй\n" NOR,
status_color(my["mana"], my["max_mana"]), my["mana"], my["max_mana"],
my["mana_factor"],
exp_data["level"],
exp_data["sub"]/10,
exp_data["sub"]%10,
);
// printf(HIC"б╘"HIY"йдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйдйд"HIC"б╘\n"NOR);
level = exp_data["level"];
if (ob == this_player() && level > ob->query("achieved_level")) {
old_level = ob->query("achieved_level");
me->set("level",level);
me->set("achieved_level",level);
write(HIR"\n╣з╧▓гм─у╡─╛н╤щ╡╚╝╢╔╧╔¤╡╜"+chinese_number(me->query("level"))+"╝╢бг\n"NOR);
// ├┐╡╚╝╢╜▒└°╥╗╢и╟▒─▄╓╡бг
pot_reward = level_to_pot(level) - level_to_pot(old_level);
me->add("potential",pot_reward);
write(HIR"─у╡├╡╜┴╦"+pot_reward+"╡у╟▒─▄бг\n"NOR);
write (WHT"╙╔╙┌─у╟┌╤з┐р┴╖гм─у╡─╛л╞°╔ё╓╡╘Ў╝╙┴╦бг\n\n"NOR);
me->save();
if (me->query("gender")==("┼о╨╘"))
message_vision(CYN"$N┐ь└╓╡╪╠°╞Ё╬ш└┤гб б╕ ╣■╣■╣■гм╔¤╝╢┴╦гбб╣\n"NOR,me);
else
message_vision(CYN"$N╡├╥т╡╪╫ў│Ў╩д└√╡─╩╓╩╞ б╕ V б╣ ╦╡: б╕ ╣■╣■╣■гм╔¤╝╢┴╦гбб╣\n"NOR,me);
}
return 1;
}
int main(object me, string arg)
{
object ob;
mapping my;
int year, day, hour;
seteuid(getuid(me));
if(!arg)
ob = me;
else if (wizardp(me)) {
ob = present(arg, environment(me));
if (!ob) ob = find_player(arg);
if (!ob) ob = find_living(arg);
if (!ob) return notify_fail("你要察看谁的状态？\n");
} else
return notify_fail("只有巫师能察看别人的状态。\n");
my = ob->query_entire_dbase();
printf(" 精 ： %s%4d/ %4d %s(%3d%%)" NOR " 灵力： %s%4d / %4d (+%d)\n" NOR,
status_color(my["gin"], my["eff_gin"]), my["gin"], my["eff_gin"],
status_color(my["eff_gin"], my["max_gin"]), my["eff_gin"] * 100 / my["max_gin"],
status_color(my["atman"], my["max_atman"]), my["atman"], my["max_atman"],
my["atman_factor"] );
printf(" 气血： %s%4d/ %4d %s(%3d%%)" NOR " 内力： %s%4d / %4d (+%d)\n" NOR,
status_color(my["kee"], my["eff_kee"]), my["kee"], my["eff_kee"],
status_color(my["eff_kee"], my["max_kee"]), my["eff_kee"] * 100 / my["max_kee"],
status_color(my["force"], my["max_force"]), my["force"], my["max_force"],
my["force_factor"] );
printf(" 精神： %s%4d/ %4d %s(%3d%%)" NOR " 法力： %s%4d / %4d (+%d)\n" NOR,
status_color(my["sen"], my["eff_sen"]), my["sen"], my["eff_sen"],
status_color(my["eff_sen"], my["max_sen"]), my["eff_sen"] * 100 / my["max_sen"],
status_color(my["mana"], my["max_mana"]), my["mana"], my["max_mana"],
my["mana_factor"] );
printf(" 食物： %s%4d/ %4d " NOR " 潜能： %s%d\n" NOR,
//printf(" 食物： %s%4d/ %4d " NOR " 悟力： %s%d\n" NOR,
status_color(my["food"], ob->max_food_capacity()),
my["food"], ob->max_food_capacity(),
HIY,
(int)ob->query("potential") - (int)ob->query("learned_points"));
year = my["daoxing"] / 1000;
day = (my["daoxing"] - year * 1000) / 4;
hour = (my["daoxing"] - year * 1000 - day * 4) * 3;
//printf(" 饮水： %s%4d/ %4d " NOR " 经验： %s%d\n" NOR,
printf(" 饮水： %s%4d/ %4d " NOR " 道行： %s",
//%s年%s天%s时辰\n" NOR,
status_color(my["water"], ob->max_water_capacity()),
my["water"], ob->max_water_capacity(),
HIM );
if(year) printf("%s年", chinese_number(year));
if(day) printf("%s天", chinese_number(day));
if(hour) printf("%s时辰", chinese_number(hour));
if(!year && !day && !hour) printf("你还没有道行。");
//my["daoxing"] );
printf("\n"NOR);
return 1;
}
