北大侠客行MUD论坛

 找回密码
 注册
搜索
热搜: 新手 wiki 升级
查看: 16513|回复: 22

麻烦前辈帮忙看下 这个有没有问题?

[复制链接]
发表于 2010-9-30 10:12:44 | 显示全部楼层 |阅读模式
#include
#include
inherit F_CLEAN_UP;
int main(object me, string arg)
{
string what, who;
object ob, victim;
mapping myfam, vtfam;
int sp, dp;
int nowtime;
object where = environment(me);

seteuid(getuid());
        if ( (!(myfam = me->query("family")) || myfam["family_name"] != "灵鹫宫") )
          return notify_fail("只有灵鹫宫的人才会美容!\n");
if( me->query_temp("beautying") )
  return notify_fail("你正在给人美容!\n");
if( !arg || sscanf(arg, "%s",who)!=1 ) return
  notify_fail("指令格式:makebeauty <人物>\n");
victim = present(who, environment(me));
if( !victim || victim == me) return notify_fail("对象不对。\n");

if( victim->name() != me->query("qtask/target")) return notify_fail(HIY"空中隐隐传来童佬的吼声:师门密技,别擅自乱用!\n"NOR);

        nowtime = (int) me->query("qtask/time") - time();
        if(nowtime<0)return notify_fail(HIR"已经没有时间!何苦费事?\n"NOR);
      //  if( !me->qurey("qtask/time")) return notify_fail(HIR"已经没有时间!何苦费事?\n"NOR);
if( !living(victim) || !objectp(victim))
  return notify_fail("你要给谁美容?\n");
        if ( (vtfam = victim->query("family")) && vtfam["family_name"] == "灵鹫宫" )
                return notify_fail("别在鲁班门前弄大斧!\n");
if( userp(victim))
  return notify_fail("不能给玩家美容!\n");
      
if( me->is_fighting() )
                return notify_fail("打架还能给人美容?别割了别人的脸!\n");
if( victim->is_fighting() )
                return notify_fail(victim->name() + "正在打架,没空理你!\n");
sp = me->query_skill("beauty", 1);
dp = victim->query("sen");
tell_object(me, HIC"你对着" + victim->name() + "的脸仔细的端详一阵.....\n啊!有了,随即伸手在" + victim->name() + "的脸上摩捏起来......\n");
tell_object(victim, me->name() + "对着你的脸一阵端详,似乎若有所思,然后伸出手在你脸上一阵按摩......\n");
message("vision", "只见" + me->name() + "对着" + victim->name() + "的脸一阵端详,似乎若有所思,然后伸出手在你脸上一阵按摩...... \n", environment(me), ({ me, victim }) );
me->set_temp("beautying", 1);
call_out( "compelete_beauty", 5, me, victim, sp, dp);
return 1;
}
private void compelete_beauty(object me, object victim, int sp, int dp)
{
object ob1;
int amount;
int reward;
int dx;
object where = environment(me);
me->delete_temp("beautying");
if( environment(victim) != environment(me) ) {
  tell_object(me, "可惜,你要美容的人已经走了。\n");
  return;
}

   if( random(sp*6/5)    message_vision(victim->name() + "突然感到脸上一阵痛,原来是$N的指甲擦在皮肤上!\n"NOR, me);
         
  tell_object(me, victim->name() + "对你的服务极不满意,决定杀了你泄恨!\n"NOR);
  tell_object(victim, "看来被" + me->name() + "耍了,杀!\n");
    CHANNEL_D->do_channel(victim, "nyj",me->name()+"!"
       +"你想毁我容貌啊?当我好欺负啊?看招!");
  message("vision", victim->name() + "对" + me->name() + "的服务不满,两人打起来了!\n",
   environment(me), ({ me, victim }) );
  victim->kill_ob(me);
                me->kill_ob(victim);
  me->start_busy(3);
  return;

                }
  tell_object(me, victim->name() + "摸了摸光滑的脸蛋,满意地说“谢谢!”\n"NOR);
  tell_object(victim, "在"+me->name()+"的妙手之下,你看起来漂亮多了!\n");
                reward=victim->query("combat_exp")/2500+victim->query("sen")/10+me->query("int");
                if(reward > 1000) reward= random(300)+ 800;
                dx=COMBAT_D->chinese_daoxing(reward);
  me->improve_skill("beauty", random(me->query("int")));
  me->add("combat_exp",reward);
  me->add("potential",reward/4);
  me->delete("qtask");
   
    CHANNEL_D->do_channel(victim, "es",me->name()+"("+me->query("id")+")"
       +"为我美容,我决定奖励她"+exp+"经验."和"+ chinese_number(reward/4)+"点潜能.");
CHANNEL_D->do_channel(victim, "rumor",me->query("name")
       +"为"+victim->name()+"美容得到"+ chinese_number(reward/4)+"点潜能和"+exp+"经验.");

}
int help(object me)
{
write(@HELP
指令格式 : makebeauty <某人>
注意:如果失败,对方会杀你,而你也自动下kill指令,有3秒busy!!
HELP
    );
    return 1;
}
北大侠客行Mud(pkuxkx.net),最好的中文Mud游戏!
发表于 2010-9-30 10:14:05 | 显示全部楼层
看不懂的飘过0
北大侠客行Mud(pkuxkx.net),最好的中文Mud游戏!
发表于 2010-9-30 10:14:10 | 显示全部楼层
你得先告诉别人你遇到什么问题。不可能逐行去读你的代码的
北大侠客行Mud(pkuxkx.net),最好的中文Mud游戏!
 楼主| 发表于 2010-9-30 10:20:12 | 显示全部楼层
我想弄个类似门忠的任务。

达到一定经验后做这个任务
朝廷的是给达官贵人守夜,灵鹫给有需要的人做美容等,成功后加经验,潜能,失败会开打,可以一边打,一边继续做任务 ,如果把NPC给杀了,就失败。

大致是这样的想法
北大侠客行Mud(pkuxkx.net),最好的中文Mud游戏!
发表于 2010-9-30 10:22:54 | 显示全部楼层
原帖由 ivanfox 于 2010-9-30 10:20 AM 发表
我想弄个类似门忠的任务。

达到一定经验后做这个任务
朝廷的是给达官贵人守夜,灵鹫给有需要的人做美容等,成功后加经验,潜能,失败会开打,可以一边打,一边继续做任务 ,如果把NPC给杀了,就失败。

大致是 ...


你。。。真是太巧了,我正想找人做这个。来来来,我们私聊。
北大侠客行Mud(pkuxkx.net),最好的中文Mud游戏!
发表于 2010-9-30 10:23:05 | 显示全部楼层
你跑跑试试,如果报错,把报错发出来,我帮你看
北大侠客行Mud(pkuxkx.net),最好的中文Mud游戏!
发表于 2010-9-30 10:30:37 | 显示全部楼层
难道又有一个要被拖下水?
我还想把狐狸拉成以后活动的负责人呢.
抗议jason拉人行为
北大侠客行Mud(pkuxkx.net),最好的中文Mud游戏!
发表于 2010-9-30 10:32:15 | 显示全部楼层
原帖由 ivanfox 于 2010-9-30 10:20 AM 发表
我想弄个类似门忠的任务。

达到一定经验后做这个任务
朝廷的是给达官贵人守夜,灵鹫给有需要的人做美容等,成功后加经验,潜能,失败会开打,可以一边打,一边继续做任务 ,如果把NPC给杀了,就失败。

大致是 ...

那少林秃驴们是不是给人念佛诵经?
武当牛鼻子是不是降魔卫道?
明教是不是起兵造反?
天地会的绑架朝廷要员?
北大侠客行Mud(pkuxkx.net),最好的中文Mud游戏!
发表于 2010-9-30 10:38:02 | 显示全部楼层
秃驴们去大户家砍死人然后操办白事唱焰口
北大侠客行Mud(pkuxkx.net),最好的中文Mud游戏!
发表于 2010-9-30 10:38:47 | 显示全部楼层
然后武当的假扮茅山的负责赶尸
北大侠客行Mud(pkuxkx.net),最好的中文Mud游戏!
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|北大侠客行MUD ( 京ICP备16065414号-1 )

GMT+8, 2024-11-27 01:38 PM , Processed in 0.011390 second(s), 15 queries .

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表