int ask_over()
{
object me,mon;
int bonus,exp,pot,tempp,kar;
me = this_player();
kar = me->query("kar");
if (!me->query_temp("fengyaoover")) {
message_vision("平一指惊讶的对$N说道:“哦! 你再开什么玩笑,我这不是养老院。”\n",me);
return 1;
}
me->delete_temp("fengyaoover");
if (me->query_temp("fengyaow")) {
if(random(kar)>=11)
{
message_vision("平一指哼了一声,对$N说:“你是怎么搞的,乱分药,是想砸我的招牌吗?\n 看在你还努力的份上还是赏你点钱吧。”\n",me);
exp = 10 + random(20);
mon = new("/clone/money/silver");
mon->set_amount(exp);
tell_object(me,HIW"平一指给了你" + chinese_number(exp) + "两白银。 \n"NOR);
mon->move(me);
me->delete_temp("fengyaow");
return 1;
}
message_vision(" 平一指哼了一声,对$N说:你是怎么搞的,乱分药,是想砸我的招牌吗?\n",me);
return 1;
}
message_vision("平一指笑着对$N说:“小兄弟还不错嘛,可以可以,这是你应该得的。”\n",me);
exp = 10 + random(100);
pot = 10 + random(50);
bonus = (int) me->query("combat_exp");
tempp = bonus;
bonus += exp;
me->set("combat_exp", bonus);
bonus = (int) me->query("potential");
bonus += pot;
me->set("potential", bonus);
mon = new("/clone/money/silver");
mon->set_amount(exp);
mon->move(me);
me->start_busy(3);
tell_object(me,"你被奖励了:"HIR + chinese_number(exp) + NOR"点经验,"HIR+ chinese_number(pot) + NOR"点潜能和"HIW+chinese_number(exp) + NOR"两白银。 \n");
bonus=(int) me->query("potential");
return 1;
}
kar 值 在多少给经验阿?
{
object me,mon;
int bonus,exp,pot,tempp,kar;
me = this_player();
kar = me->query("kar");
if (!me->query_temp("fengyaoover")) {
message_vision("平一指惊讶的对$N说道:“哦! 你再开什么玩笑,我这不是养老院。”\n",me);
return 1;
}
me->delete_temp("fengyaoover");
if (me->query_temp("fengyaow")) {
if(random(kar)>=11)
{
message_vision("平一指哼了一声,对$N说:“你是怎么搞的,乱分药,是想砸我的招牌吗?\n 看在你还努力的份上还是赏你点钱吧。”\n",me);
exp = 10 + random(20);
mon = new("/clone/money/silver");
mon->set_amount(exp);
tell_object(me,HIW"平一指给了你" + chinese_number(exp) + "两白银。 \n"NOR);
mon->move(me);
me->delete_temp("fengyaow");
return 1;
}
message_vision(" 平一指哼了一声,对$N说:你是怎么搞的,乱分药,是想砸我的招牌吗?\n",me);
return 1;
}
message_vision("平一指笑着对$N说:“小兄弟还不错嘛,可以可以,这是你应该得的。”\n",me);
exp = 10 + random(100);
pot = 10 + random(50);
bonus = (int) me->query("combat_exp");
tempp = bonus;
bonus += exp;
me->set("combat_exp", bonus);
bonus = (int) me->query("potential");
bonus += pot;
me->set("potential", bonus);
mon = new("/clone/money/silver");
mon->set_amount(exp);
mon->move(me);
me->start_busy(3);
tell_object(me,"你被奖励了:"HIR + chinese_number(exp) + NOR"点经验,"HIR+ chinese_number(pot) + NOR"点潜能和"HIW+chinese_number(exp) + NOR"两白银。 \n");
bonus=(int) me->query("potential");
return 1;
}
kar 值 在多少给经验阿?










