如何把复刻版的修炼武功秘籍的经验改成叠加的?

killer_zingy · 发表于 2009-8-2 05:21

马上注册，结交更多侠友！

您需要登录才可以下载或查看，没有账号？我要成为铁血侠客

x

winson7891大神说要这样改, 但我找不到大说的那段代码, 请问到底是在那个文件里的?
这是他的原话

//Hey, In the procedure "CheckBook", You'll found following codes from line 1852:

   if (Rrole[rnum].ExpForBook >= needexp) and (mlevel < 10) then
   begin
      redraw;
      sdl_updaterect(screen, 0, 0, screen.w, screen.h);
      EatOneItem(rnum, inum);
      waitanykey;
      redraw;
      sdl_updaterect(screen, 0, 0, screen.w, screen.h);

      if mnum > 0 then
      instruct_33(rnum, mnum, 1);
      Rrole[rnum].ExpForBook := 0;
      //ShowStatus(rnum);
      //waitanykey;
   end;

//You seen that this segment process once only cos it's a it...else statement only, and it clearup the ExpForBook at the end , just modify it to be a loop and DONOT clearup Exp!

//modify the segment above to be like this:

while (Rrole[rnum].ExpForBook >= needexp) and (mlevel < 10) do
   begin
      redraw;
      sdl_updaterect(screen, 0, 0, screen.w, screen.h);
      EatOneItem(rnum, inum);
      waitanykey;
      redraw;
      sdl_updaterect(screen, 0, 0, screen.w, screen.h);

      if mnum > 0 then
      instruct_33(rnum, mnum, 1);
      rrole[rnum].ExpForBook := rrole[rnum].ExpForBook - needexp;
      //Rrole[rnum].ExpForBook := 0;  //cancel it
      //ShowStatus(rnum);
      //waitanykey;
   end;

//OK, the program can run but not yet test~
//cos I'm sleepy, Good night~~hahaha~~

[发帖际遇]: killer_zingy偷拍五岳并派大会内幕，登上铁血晚报头条，刷新当晚销量，得到银两28。

winson7891 · 发表于 2009-8-2 05:31

1，在kys_battle

2，找不到就试试搜索procedure的名字，用ctrl+f

3，不要叫我大神，担当不起~

[发帖际遇]: winson7891扮成吴天德，骗得银两1。

killer_zingy · 发表于 2009-8-2 05:43

谢谢啦
ps: 为什么我认为你担当起呢?
原因只有一个. 因为只有你, 才会每天熬夜到凌晨4点还在回答我的问题!

killer_zingy · 发表于 2009-8-2 06:08

事实证明, 你的代码能行. 不过还有一个问题, 那就是如果经验足够的话, 战斗结束后有时秘籍会无休止的炼下去, 所以有什么办法能改成像群芳一样只能修炼10次吗?

南宫梦 · 发表于 2009-8-2 09:06

每人修炼10次的方法：
让每个秘籍都能修炼出武功
让这个无攻击力
最好在战斗时选武功的时候再做个判断，如果该武功无效果就不显示，这样就能使武功选单简洁很多了

如果是每个秘籍只能10人修炼
可以在物品属性中找一个无用的字节记录修炼次数
每有新人修炼成功
就让该记录加1
然后再在判断是否可以装备那里加上如果该记录为10，则不能修炼

[发帖际遇]: 南宫梦替小昭千里送信给张无忌,赶到光明顶得到奖励银两34