内功修炼讨论

vast 发表于 2004-6-3 10:15:55

0.基本设想是这样的：a.所有的内功（基本&特殊）在级别大于180级之后（这里主要考虑到多隆的武功级别比较低,并且内功的修炼持续时间比较长），除了可以向师傅学习之外，还可以靠自己的修炼来提高，如果自己的级别高于师傅的级别或者没有其他东西可供钻研来提升等级的时候，那么修炼就是唯一的提高途径(某些特别设置的内功除外); b.所有的基本外功在等级不低于师傅时，可以通过和师父切磋武功来提高，切磋消耗潜能，速度比修炼快; c.所有特殊外功在任何时候都可以练习，仅受经验和基本外功的影响。
1.取消现有的dz命令，dz命令实现的增加内力功能由dazuo命令完成,dz命令实现的打通任督二脉功能，由xiulian命令完成;
2.dazuo除了可以实现内力的积累这一功能之外，同时具有少量恢复体能的效果，这一功能用于弥补部分内功不具有heal,lifeheal的效果，比专门内功的医疗功能弱，但如果配合高级别的medical技能也可能有比较好的效果（如果有必要还可以设定在打坐时可以减缓某些毒性的发作）;
3.增加xiulian命令，主要用于内功的等级提升，修炼过程中如果受到干扰或者内功等级超过经验限制(或者其他的限制条件)则有可能会走火入魔;
4.qiecuo命令我没有考虑，不过我觉得最好重新写，而不要受现有的learn里面实现切磋功能部分代码的束缚。

讨论：xiulian是否耗潜能？

[附]xiulian.c 代码如下：

// xiulian.c

inherit F_CLEAN_UP;

#include <skill.h>
#include <ansi.h>

int exercising();
int halt_exercise();

int main(object me, string arg)
{
string force;
int force_jibie;

seteuid(getuid());

if ( !stringp(force = me->query_skill_mapped("force") ))
force = "force";

if ( me->is_busy() )
   return notify_fail("你现在正忙着呢。\n");

if ( me->is_fighting() )
   return notify_fail("战斗中忌练内功，否则会走火入魔。\n");

if(me->query_skill("force", 1) < 180)
return notify_fail( "你基本内功等级太低，还无法自行修炼！\n");
force_jibie = me->query_skill( force, 1 );
if ( force_jibie < 180 )
   return notify_fail( "你内功等级太低，还无法自行修炼！\n");

//这个函数用于控制某些只能通过特殊手段学习，或者是想限制学习的最高级别的内功
//需要用到时单独添加在相应的内功文件中即可
if ( SKILL_D( force )->invalid_xiulian(me) )
   return notify_fail("这门内功无法通过自行修炼来提升。\n");

if( (int)me->query("qi") < me->query("max_qi") * 9 / 10)
return notify_fail("你现在的气太少了，无法产生内息运行全身经脉。\n");

if( (int)me->query("jing") * 100 / (int)me->query("max_jing") < 90 )
return notify_fail("你现在精不够，无法控制内息的流动！\n");

   write( HIY"你开始修炼" + to_chinese(force) + "。\n"NOR );

me->set_temp("pending/exercise", 1);
me->set_temp("exercise_cost", 200);
message_vision("$N盘膝坐下，紧闭双目，开始修炼内力。\n", me);
write(HIW"你心中存想，缓缓催动体内气息运行周天。\n"
   "只觉体内一股热气直透上来,你进入了一种玄妙的境界......\n"NOR);
me->start_busy( "exercising", "halt_exercise" );
return 1;
}

int exercising()
{
object me = this_player();
string using_force;
int skill_gain, gift_gain;
int exercise_cost;
int force, max_force, exp, myint, mykar, mycon, level, max_zouhuo;

exercise_cost = me->query_temp("exercise_cost");
if ( !stringp(using_force = me->query_skill_mapped("force") ))
using_force = "force";

level = (int)me->query_skill( using_force, 1 );

exp = me->query("combat_exp");
force = me->query( "neili" );
max_force = me->query( "max_neili" );

myint=me->query("int");
mykar=me->query("kar");
mycon=me->query("con");

   if ( random( 10 ) > 8 )
   tell_object( me,HIW"......你的内息在体内沿着经脉要穴不断运转，感觉你的内力\n"+
   " 正在不断的凝集......\n\n"NOR );
else if ( random( 5 )<1)
   tell_object( me,
HIC"......你只觉天地之精慢慢渗入体内,在百会、人中、神阕、丹田、会阴、命门、玉枕等要穴\n"+
   " 间不住流转，然后散之于四肢体骸......\n\n"NOR);

//修炼过程中受到攻击,有可能走火入魔
if(me->is_fighting() && !random(10))
{
switch ( random( 4 ) )
{
case 0 :
tell_object(me, HIY "你觉得内息有些混乱。\n" NOR );
break;
case 1 :
tell_object(me, HIY "你感觉到内力有失控的迹象。\n" NOR );
break;
case 2 :
tell_object(me, HIY "你觉得有些胸闷头痛，心里很烦躁。\n" NOR );
break;
case 3:
tell_object(me, HIR "由于你在战斗中强行修炼内功，你走火入魔了！\n" NOR );
me->set("max_neili", max_force * 6 / 7);
me->set("eff_neili", me->query("eff_neili") * 6 / 7);
log_file("static/zouhuo",sprintf(" %s(%s) 走火入魔于%s,共失去%d点内力\n", me->query("name"),me->query("id"),ctime(time()),me->query("max_neili")*1/7));
me->set_temp("pending/exercise", 0);
return 0;
break;
}
}

//某些时候有可能大幅度进步
if ( !random( 20 ) )
{
   skill_gain = random( myint + mykar )+ 1;
   if ( !random( 40 ) ) skill_gain += sqrt( max_force );
   me->improve_skill( using_force, skill_gain );
}

//有可能打通任督二脉
      if(!me->query("renduermai") && (random(mykar + myint + mycon)/3 > (20 + random(10))))
{
tell_object( me, HIC"你突然觉得体内的真气流动不同寻常，体内任督二脉\n"
"似欲喷薄而出......\n\n"NOR );
                     if( (level - 300) / 100 + random(1000) > 998)
{
tell_object( me, HIW"终于，你体内的真气冲破十二重楼，完全汇交融合为一体，只觉得全身\n"
"内力充盈，你的任督二脉已经被打通了！\n"NOR );
message( "channel:" + "rumor",HIM + "【江湖传闻】"+me->query("name")+"打通任督二脉！\n\n"NOR,users());
                  me->add("int",1 + random(2));
                  me->add("per",1 + random(2));
                  me->add("con",1 + random(2));
                  me->add("dex",1 + random(2));
                  me->add("kar",1 + random(2));
                  me->add("str",1 + random(2));
me->set("renduermai",1);
            log_file("static/datong",sprintf(" %s(%s) 于%s,打通任督二脉！\n", me->query("name"),me->query("id"),ctime(time())));
me->set_temp("pending/exercise", 0);
return 0;
}
}

if ( exercise_cost >= 10 )
{
/*内功修炼的进度跟悟性、根骨、内功级别、最大内力有关*/
//计算方法影响成长速度需要仔细研究
gift_gain = random(myint + mycon) + 1;
   skill_gain = (force + max_force) / 100;
if(skill_gain < 1) skill_gain = 1;
skill_gain = gift_gain * skill_gain;
   me->improve_skill(using_force, skill_gain/200 );

   me->add_temp( "exercise_cost", -5 );
   return 1;
}
me->set_temp("pending/exercise", 0);
message_vision( HIG"$N将散入经脉的真气收回丹田，深深吸了口气，站了起来。\n"NOR, me );

//用经验来限制走火？
   max_zouhuo = level * level * level /10;
if ( exp < max_zouhuo )
   {
         switch ( random( 4 ) )
         {
         case 0 :
            write( HIY "你觉得内息有些混乱。\n" NOR );
            break;
      case 1 :
            write( HIY "你感觉到内力有失控的迹象。\n" NOR );
            break;
         case 2 :
            write( HIY "你觉得有些胸闷头痛，心里很烦躁。\n" NOR );
            break;
         default :
            break;
         }
         if ( !random( sqrt(sqrt(max_zouhuo - exp)) ))
         {
tell_object(me, RED "你觉得体内的真气突然失去控制，蹿入全身各处经脉，\n"
"你浑身如针刺一般，痛苦之至。\n" NOR);
tell_object(me,HIR "\n你因强行修炼内力，控制不住自己的内息，走火入魔了。\n"NOR );
me->unconcious();
me->set_skill(using_force, level - 1);
me->set_skill("force", me->query_skill("force", 1) - 1);
me->set("max_neili", max_force * 4 / 5);
me->set("eff_neili", me->query("eff_neili") * 4 / 5);
me->set("neili", max_force);
log_file("static/zouhuo",sprintf(" %s(%s) 走火入魔于%s,共失去%d点内力\n", me->query("name"),me->query("id"),ctime(time()),me->query("max_neili")*1/5));
return 0;
         }
   }
   return 0;

}

int halt_exercise()
{
object me = this_player();
int force, max_force, jibie;
string using_force;

if ( !stringp(using_force = me->query_skill_mapped("force") ))
using_force = "force";

// tell_object(me, HIC"你强行将体内运行的真气压回丹田，站起身来。\n"NOR );
//halt命令里面已经有类似的话，此句注释
if ( !random( 30 ))
{
tell_object(me, RED "你觉得体内的真气突然失去控制，蹿入全身各处经脉，\n"
"你浑身如针刺一般，痛苦之至。\n" NOR);
tell_object(me,HIR "\n你因强行修炼内力，控制不住自己的内息，走火入魔了。\n"NOR );
log_file("static/zouhuo",sprintf(" %s(%s) 走火入魔于%s,共失去%d点内力\n", me->query("name"),me->query("id"),ctime(time()),me->query("max_neili")*1/5));
me->unconcious();
me->set_skill(using_force, me->query_skill(using_force, 1) - 1);
me->set_skill("force", me->query_skill("force", 1) - 1);
me->set("max_neili", me->query("max_neili") * 4 / 5);
me->set("eff_neili", me->query("eff_neili") * 4 / 5);
me->set("neili", me->query("max_neili"));
return 0;
}
return 1;
}

int help(object me)
{
write( @HELP

靠自己的运气练功达到提高内功修为的目的。
所修炼的内功级别必须大于180级。
修练时你的精神、体能的值都必须大于 90%。

HELP
);
return 1;
}

zoom 发表于 2004-6-3 17:56:41

Re:内功修炼讨论

这个我以前考虑过，当时主要考虑现在的经验速度调整好之前，最好不要加这种东西，如果速度控制的不好，很可能导致一些想不到的新问题，都像yeah那样，1000级的功夫，到时候就不好办了，所以没有提出来，learn.c中的切磋的问题我也找到了，当时和icer讨论决定暂时不修正，之后icer做的一些削弱公共武功，降低一些任务的奖励等也是和这个相关的改动，notme发贴让我改的时候，我的回贴也是反对意见，没想notme工作效率这么高，一晚上就连通知都发了。

vast的想法很好，既然想做这个，就不应该再受原来的learn的影响。

我的意见还是先处理好经验增长速度，再做这个，不然修炼的速度是否考虑现有东西的影响，如果考虑的太多，难免要影响加它的意义，太慢的话，就没什么意义，不考虑现有系统是不可能的，整个系统应该是完整的。
最好能协调经验增长速度、读书、学习、练习、修炼等等的速度，这些都是相关的，可能还涉及一些其他的，例如master的等级也和这个是相关的。
控制好这些参数，意义是很大的。

就说这么多，这两天还有考试，时间比较少，你们再讨论讨论，如果加就处理好相关的问题，呵呵。另外，现在好象大家都对这个速度有意见。

[ Last edited by zoom on 2004-6-3 at 06:04 PM ]

notme 发表于 2004-6-3 23:34:42

Re:内功修炼讨论

把打坐通二脉的功能转移到修炼的想法很好啊，
不过dz在低等级的时候效果比dazuo好不少，可能玩家会希望保留
对修炼我觉得没必要进行级别限制，低级别的时候玩家自然会去学习的

基本武功方面切磋由于有侠客岛和领悟，都不用潜能，因此不会有人选择去切磋
另外练习时武功都可以通过激发为parry来练习
通过练习和领悟就可以提高基本武功了。
只有切磋music，读书等可能会有市场

除非把练习也改改，特殊武功激发为parry时不能练习
我把我写的 xiulian.c 贴一下
修炼时间为 (特殊内功级别/2 * 4/3 )分钟，比较长
400 级时 240 分钟长一级，可以考虑再缩短一半？

// xiulian.c
// 修炼特殊内功

#include <ansi.h>
#include <skill.h>

inherit F_CLEAN_UP;

int main(object me, string arg)
{
string skill;
int my_skill;
object where =environment(me);

seteuid(getuid());
if(where->query("pigging")) return notify_fail("你还是专心拱猪吧！\n");
if(me->is_busy()) return notify_fail("你现在正忙着呢。\n");
if(me->is_fighting()) return notify_fail("战斗中不能练内功，会走火入魔。\n");
if(me->query("lingjiu/last_xiulian_time"))
   return notify_fail("你现在正在恢复武功，没有精力研究武功。\n");
if(!(skill = me->query_skill_mapped("force")))
   return notify_fail("你必须先用 enable 选择你要用的内功心法。\n");
if(!SKILL_D(skill)->valid_learn(me)) return 0;

my_skill = me->query_skill(skill,1);
if( my_skill * my_skill * my_skill / 10 > (int)me->query("combat_exp") )
   return notify_fail("由于缺乏实战经验，你无法领会更高深的武功。\n" );

if((int)me->query("learned_points") > (int)me->query("potential") - my_skill)
   return notify_fail("你的潜能不足，没法修炼！\n");

me->set_temp("pending/xiulian", 30);
//每次消耗潜能数等于skill级别，高等级时修炼不至于太难
me->add("learned_points", my_skill);
message_vision(HIM"\n$N盘膝坐下，运起丹田之气，开始修炼"+to_chinese(skill)+"......\n\n"NOR, me);
me->start_busy("do_xiulian","halt_xiulian");
return 1;
}

int do_xiulian(object me)
{
string skill;
int my_skill;
//防止中途换内功
if(!(skill = me->query_skill_mapped("force"))) return 0;
my_skill = me->query_skill(skill,1);

if ( !random(7))
{
   tell_object( me,
   MAG"......你摧动真气沿体内经脉流动，在百会、人中、神阕、丹田、会阴、命门、玉枕等要穴\n"+
   "    间不住流转，然后散之于四肢体骸......\n\n"NOR);
}
else if (!random(11))
   tell_object(me,HIW"......你心中默念内功心法，缓缓催动体内气息运行周天。\n"
"    只觉体内一股热气直透上来，你进入了一种玄妙的境界......\n\n"NOR);
if(me->is_fighting() && !random(20) )
{
tell_object(me, HIR "由于你在战斗中强行修炼内功，你走火入魔了！\n" NOR );
   log_file("static/xiulian_zouhuo",
   sprintf("%s(%s) 修炼内功走火于%s,%s等级掉一级。\n",
   me->query("name"),me->query("id"),ctime(time()), to_chinese(skill) ));
   me->set_skill(skill, my_skill-1);
   return 0;
}

if (me->query_temp("pending/xiulian") < 2)
{
   // skill 点潜能换(skill * 0.75 + 先天根骨)点
   me->improve_skill(skill, me->query("con") + random(my_skill * 3/2));
   message_vision( HIG"$N从玄幻之境回过神来，顿觉内功修为增进不小。\n"NOR, me );
   return 0;
}
me->add_temp("pending/xiulian", -1 );
return 1;
}

int halt_xiulian(object me)
{
string skill;
if(!(skill = me->query_skill_mapped("force"))) return 0;

me->delete_temp("pending/xiulian");
tell_object(me,HIR"你强行将内力纳入丹田,缓缓吐了口气,站了起来.\n"NOR);
if ( !random(30) )
{
   tell_object(me,HIY"你由于强行中断修炼，不禁一阵头昏目眩......你走火了！\n"NOR);
   log_file("static/xiulian_zouhuo",
   sprintf("%s(%s) 修炼内功走火于%s,%s等级掉一级。\n",
   me->query("name"),me->query("id"),ctime(time()), to_chinese(skill) ));
   me->set_skill(skill,me->query_skill(skill,1)-1);
}
return 1;
}

int help(object me)
{
tell_object(me,@HELP
修炼内功是后期提高特殊内功的唯一途径，修炼有可能走火，
所以最好在安全的地方修炼以避免走火。
HELP
);
return 1;
}

notme 发表于 2004-6-3 23:48:55

Re:内功修炼讨论

Originally posted by zoom at 2004-6-3 05:56 PM:
这个我以前考虑过，当时主要考虑现在的经验速度调整好之前，最好不要加这种东西，如果速度控制的不好，很可能导致一些想不到的新问题，都像yeah那样，1000级的功夫，到时候就不好办了，所以没有提出来，learn.c中 ...
我觉得速度的调整没法一步到位，不可能想得完美了再推出
对于这个我是先用较慢的速度，看情况再加一点。
宁可推出来时大家都不满意，如果一开始大家就皆大欢喜，说明就太快了

我把切磋改了，是因为想给大家一个希望，心理的作用大于现实的。
因为随着侠客岛和武功，任务方面的修改，削弱了不少。
武功方面需要激发内功，使得好多武功受到限制，如果武功级别没法提高
那就会让玩家失去希望了。
另外判师的也可以看到一线曙光，可以花潜能了。

vast 发表于 2004-6-4 12:39:11

Re:内功修炼讨论

1.速度问题
玩家觉得慢很多时候都是因为某些参数数字化太明显了
搞得很像数字游戏
XO里面很多东西都是用文字来描述的
加上颜色来区分等级，
也就是说在某一等级范围内，看起来都是一样的
这样可能会好一些

2.dz和dazuo功能有重复，感觉不太必要

3.基本功的切磋问题，侠客岛,领悟和切磋应该各有好处
切磋既然要消耗潜能，在速度上就应该有优势

4.特殊外功，关于用parry练的问题，我觉得这个就涉及到一个，武功的编写问题了，现在基本上所有的武功都可以用在parry上，肯定有些不合理，用于招架的功夫应该和攻击的功夫有所区别，不过这个要修改工作量又大了

5.还有一个文化类功夫的问题，以前没考虑到，像literate,music,medical,poison,taoism,buddism,daoxue-xinfa这些东西用切磋来提高显然是不现实的，我认为这些功夫就只能靠学习和读书来提高，能学的最大级别一般不会(也不允许)达到很高，也没有必要很高

6.notme 的 "修炼时间为 (特殊内功级别/2 * 4/3 )分钟 "是怎么算出来的阿？

notme 发表于 2004-6-6 01:57:59

Re:内功修炼讨论

修炼一次每30秒，消耗潜能为内功等级，增长大约为等级*3/4小点
要想长一级就需要(等级*4/3次)修炼，因此时间为(等级×4/3/2)分钟
400级 = 400×4/6 = 266 分钟

页: [1]

北大侠客行MUD论坛's Archiver