飞蛾梦幻全套源码最新修改

mahaohao

666666666666666666666666

ZYG513716652

我是来给大佬加油的

hfzxxxh2

zj648277517 发表于 2020-10-12 21:53
打野成功了。其他的要怎么加？

凡是有
for n=1,#id组 do
    local id=id组[n]  的，加在 local id=id组[n]下面一行，经验按角色的方法加
凡是没有   
for n=1,#id组 do
    local id=id组[n]  的，就加在
经验 =
的下一行。

hfzxxxh2

wsx123 发表于 2020-10-12 18:36
帮派熔炼技能出错

找到了，在帮派图标点出来的，除了熔炼技巧还有灵石技巧，这两个没有开放，故意设置的联系GM的提示。许多技能都是能研究的，这两个以后再说吧。

zj648277517

hfzxxxh2 发表于 2020-10-12 21:47
刷野加成功没有，加好刷新这个位置后，到野外打一下怪，看助战是否得经验？成功后再加其它位置

打野成功了。其他的要怎么加？

hfzxxxh2

zj648277517 发表于 2020-10-12 21:29
那类似下面这种，是不是在经验=后面加？
           玩家数据.角色:取消任务(任务id)
            loc ...

刷野加成功没有，加好刷新这个位置后，到野外打一下怪，看助战是否得经验？成功后再加其它位置

hfzxxxh2

wsx123 发表于 2020-10-12 18:36
帮派熔炼技能出错

这个界面你是在帮里哪个NPC点出来的，我没有找到哪个NPC能点到这个界面。

zj648277517

hfzxxxh2 发表于 2020-10-12 21:23
一是可能没有加对位置，使变量不正常，二是可能是加的位置关于id 没有被正常识别出来。先加在刷野的那段 ...

那类似下面这种，是不是在经验=后面加？
           玩家数据[id].角色:取消任务(任务id)
            local 经验=0
            local 银子=0
            local 储备=0
            if 玩家数据[id].角色.数据.等级<=5 then
              经验=10000*3
              银子=1000
              储备=3000
            elseif 玩家数据[id].角色.数据.等级<=10 then
              经验=15000*3
              银子=2000
              储备=5000
            elseif 玩家数据[id].角色.数据.等级<=15 then
              经验=20000*3
              银子=3000
              储备=70000

修改后是不是下面这样才对？
           玩家数据[id].角色:取消任务(任务id)
            local 经验=0
            local 银子=0
            local 储备=0
            if 玩家数据[id].角色.数据.等级<=5 then
              经验=10000*3
            if 玩家数据[id].队伍~=0  then

           助战获得经验 = qz(奖励经验*奖励参数)
           --local 队伍id = 玩家数据[id].队伍
           for j=1,#玩家数据[id].助战.数据 do
               if 玩家数据[id].助战.数据[j].参战 == true then

                   玩家数据[id].助战.数据[j].当前经验 = 玩家数据[id].助战.数据[j].当前经验 + 助战获得经验
                   发送数据(玩家数据[id].连接id,27,{文本="#W/你的助战#R/"..玩家数据[id].助战.数据[j].名称.."#W/获得了#R/"..助战获得经验.."#W/经验",频道="xt"})
                   while(玩家数据[id].助战.数据[j].当前经验>=玩家数据[id].助战.数据[j].最大经验) do
                      if 玩家数据[id].助战.数据[j].等级>=玩家数据[id].角色.数据.等级 then
                        break
                      end
                      玩家数据[id].助战:升级(j)
                      发送数据(玩家数据[id].连接id,27,{文本="#W/你的助战#R/"..玩家数据[id].助战.数据[j].名称.."#W/等级提升到了#R/"..玩家数据[id].助战.数据[j].等级.."#W/级",频道="xt"})
                   end

               end
           end
      end
              银子=1000
              储备=3000
            elseif 玩家数据[id].角色.数据.等级<=10 then
              经验=15000*3
if 玩家数据[id].队伍~=0  then

           助战获得经验 = qz(奖励经验*奖励参数)
           --local 队伍id = 玩家数据[id].队伍
           for j=1,#玩家数据[id].助战.数据 do
               if 玩家数据[id].助战.数据[j].参战 == true then

                   玩家数据[id].助战.数据[j].当前经验 = 玩家数据[id].助战.数据[j].当前经验 + 助战获得经验
                   发送数据(玩家数据[id].连接id,27,{文本="#W/你的助战#R/"..玩家数据[id].助战.数据[j].名称.."#W/获得了#R/"..助战获得经验.."#W/经验",频道="xt"})
                   while(玩家数据[id].助战.数据[j].当前经验>=玩家数据[id].助战.数据[j].最大经验) do
                      if 玩家数据[id].助战.数据[j].等级>=玩家数据[id].角色.数据.等级 then
                        break
                      end
                      玩家数据[id].助战:升级(j)
                      发送数据(玩家数据[id].连接id,27,{文本="#W/你的助战#R/"..玩家数据[id].助战.数据[j].名称.."#W/等级提升到了#R/"..玩家数据[id].助战.数据[j].等级.."#W/级",频道="xt"})
                   end

               end
           end
      end
              银子=2000
              储备=5000
            elseif 玩家数据[id].角色.数据.等级<=15 then
              经验=20000*3
if 玩家数据[id].队伍~=0  then

           助战获得经验 = qz(奖励经验*奖励参数)
           --local 队伍id = 玩家数据[id].队伍
           for j=1,#玩家数据[id].助战.数据 do
               if 玩家数据[id].助战.数据[j].参战 == true then

                   玩家数据[id].助战.数据[j].当前经验 = 玩家数据[id].助战.数据[j].当前经验 + 助战获得经验
                   发送数据(玩家数据[id].连接id,27,{文本="#W/你的助战#R/"..玩家数据[id].助战.数据[j].名称.."#W/获得了#R/"..助战获得经验.."#W/经验",频道="xt"})
                   while(玩家数据[id].助战.数据[j].当前经验>=玩家数据[id].助战.数据[j].最大经验) do
                      if 玩家数据[id].助战.数据[j].等级>=玩家数据[id].角色.数据.等级 then
                        break
                      end
                      玩家数据[id].助战:升级(j)
                      发送数据(玩家数据[id].连接id,27,{文本="#W/你的助战#R/"..玩家数据[id].助战.数据[j].名称.."#W/等级提升到了#R/"..玩家数据[id].助战.数据[j].等级.."#W/级",频道="xt"})
                   end

               end
           end
      end
              银子=3000
              储备=70000

hfzxxxh2

zj648277517 发表于 2020-10-12 21:14
楼主，我按照你说的，一一添加了，这些代码，但是战斗后不正常结算了。。。直接卡在战斗画面，是怎么回事 ...

一是可能没有加对位置，使变量不正常，二是可能是加的位置关于id 没有被正常识别出来。先加在刷野的那段代码中，这段代码容易加，这个成功了再加别的地方。在战斗处理类：

function 战斗处理类:奖励事件(id)
if self.战斗类型==100001 or self.战斗类型==100007 then
     if self.地图等级<=0 then self.地图等级=1 end
     local 奖励经验=qz(self.地图等级*50*#self.参战玩家*(self.头领数量*0.1+1))--刷野战斗
     local 奖励参数=self:取野外等级差(self.地图等级,玩家数据[id].角色.数据.等级)
      if 玩家数据[id].队伍~=0  then

           助战获得经验 = qz(奖励经验*奖励参数)
           --local 队伍id = 玩家数据[id].队伍
           for j=1,#玩家数据[id].助战.数据 do
               if 玩家数据[id].助战.数据[j].参战 == true then

                   玩家数据[id].助战.数据[j].当前经验 = 玩家数据[id].助战.数据[j].当前经验 + 助战获得经验
                   发送数据(玩家数据[id].连接id,27,{文本="#W/你的助战#R/"..玩家数据[id].助战.数据[j].名称.."#W/获得了#R/"..助战获得经验.."#W/经验",频道="xt"})
                   while(玩家数据[id].助战.数据[j].当前经验>=玩家数据[id].助战.数据[j].最大经验) do
                      if 玩家数据[id].助战.数据[j].等级>=玩家数据[id].角色.数据.等级 then
                        break
                      end
                      玩家数据[id].助战:升级(j)
                      发送数据(玩家数据[id].连接id,27,{文本="#W/你的助战#R/"..玩家数据[id].助战.数据[j].名称.."#W/等级提升到了#R/"..玩家数据[id].助战.数据[j].等级.."#W/级",频道="xt"})
                   end

               end
           end
      end

     玩家数据[id].角色:添加经验(qz(奖励经验*奖励参数),"野外")
红色是加的代码。

zj648277517

hfzxxxh2 发表于 2020-10-12 12:52
关于助战在战斗中随角色获得经验的源码：
把下面这段代码加在任务处理类和战斗处理类相应的地方，共同的 ...

楼主，我按照你说的，一一添加了，这些代码，但是战斗后不正常结算了。。。直接卡在战斗画面，是怎么回事。。。

hfzxxxh2

rxwsxhld 发表于 2020-10-12 20:34
服务端启动ip为："nil:8080"  -->失败！
[string "./main.lua"]:848: attempt to concatenate global '版 ...

还要把客户端源码中的 分区 中的  self.服务器数据[n]={mc=self.小分区分类[n][4],状态=1,x=0,y=0,背景=0,ip=连接ip,dk=8080}   也要改成9080，才能登录游戏

hfzxxxh2

rxwsxhld 发表于 2020-10-12 20:34
服务端启动ip为："nil:8080"  -->失败！
[string "./main.lua"]:848: attempt to concatenate global '版 ...

8080端口，你的计算机这个端口可能被占用了。在服务端的main中找到  服务端参数.端口=8080，把8080换成9080，启动服务端试试，如果成功，编译一下服务端。如果还不行，再换9081，9082一个个的试，直到服务端启动正常。

rxwsxhld

服务端启动ip为："nil:8080"  -->失败！
[string "./main.lua"]:848: attempt to concatenate global '版本' (a nil value)..//按F4或双击此行可转到错误代码页。//
这是怎么个情况？

rxwsxhld

服务端启动ip为："nil:8080"  -->失败！ [string "./main.lua"]:848: attempt to concatenate global '版本' (a nil value)..//按F4或双击此行可转到错误代码页。//

wsx123

帮派熔炼技能出错

a83739972

如果能分享一下你改的源码就好了

a83739972

hfzxxxh2 发表于 2020-10-12 12:52
关于助战在战斗中随角色获得经验的源码：
把下面这段代码加在任务处理类和战斗处理类相应的地方，共同的 ...

非常感谢  我慢慢测试

hfzxxxh2

a83739972 发表于 2020-10-11 20:20
总的来说已经很不错了  我只能轻微改一下部分参数    不懂编程不敢动的太大  那三个新门派无所谓修复与否 ...

关于助战在战斗中随角色获得经验的源码：
把下面这段代码加在任务处理类和战斗处理类相应的地方，共同的特点：就是加在战斗结束后或者任务完成后角色所得经验的那段代码前后都行。但是，各个位置代码情况不一样，要根据情况进行相应的修改调整，不然会出错或者不起作用。例如：
for n=1,#id组 do
    local id=id组[n]
    if 玩家数据[id].队伍~=0  then

       for j=1,#玩家数据[id].助战.数据 do--玩家数据[id].角色.数据.助战
           助战获得经验 = 玩家数据[id].助战.数据[j].等级*玩家数据[id].助战.数据[j].等级*15
           if 玩家数据[id].助战.数据[j].参战 == true  then
               玩家数据[id].助战.数据[j].当前经验 = 玩家数据[id].助战.数据[j].当前经验 + 助战获得经验
               发送数据(玩家数据[id].连接id,27,{文本="#W/你的助战#R/"..玩家数据[id].助战.数据[j].名称.."#W/获得了#R/"..助战获得经验.."#W/经验",频道="xt"})
               while(玩家数据[id].助战.数据[j].当前经验>=玩家数据[id].助战.数据[j].最大经验) do
                  if 玩家数据[id].助战.数据[j].等级>=玩家数据[id].角色.数据.等级 then
                    break
                  end
                  玩家数据[id].助战:升级(j)
                  发送数据(玩家数据[id].连接id,27,{文本="#W/你的助战#R/"..玩家数据[id].助战.数据[j].名称.."#W/等级提升到了#R/"..玩家数据[id].助战.数据[j].等级.."#W/级",频道="xt"})
               end
           end
       end
    end
上面的代码中的   local id=id组[n]先给ID传递值，所以，代码一定要加在这句的后面。其它地方没有先给ID传递值的单元，就把代码加在   经验=的下面。要加的地方很多，凡是需要让助战得经验的任务，战斗，包括刷野，捉鬼等，都需要一一加进去。要加的代码就是：

if 玩家数据[id].队伍~=0  then

         for j=1,#玩家数据[id].助战.数据 do--玩家数据[id].角色.数据.助战
             助战获得经验 = 经验
             if 玩家数据[id].助战.数据[j].参战 == true  then
                 玩家数据[id].助战.数据[j].当前经验 = 玩家数据[id].助战.数据[j].当前经验 + 助战获得经验
                 发送数据(玩家数据[id].连接id,27,{文本="#W/你的助战#R/"..玩家数据[id].助战.数据[j].名称.."#W/获得了#R/"..助战获得经验.."#W/经验",频道="xt"})
                 while(玩家数据[id].助战.数据[j].当前经验>=玩家数据[id].助战.数据[j].最大经验) do
                    if 玩家数据[id].助战.数据[j].等级>=玩家数据[id].角色.数据.等级 then
                      break
                    end
                    玩家数据[id].助战:升级(j)
                    发送数据(玩家数据[id].连接id,27,{文本="#W/你的助战#R/"..玩家数据[id].助战.数据[j].名称.."#W/等级提升到了#R/"..玩家数据[id].助战.数据[j].等级.."#W/级",频道="xt"})
                 end
             end
         end
      end
要加多少经验，根据角色所得的经验参照设置。

__Y_Q

感谢楼主分享!

zj648277517

hfzxxxh2 发表于 2020-10-12 10:54
你的认为完全对，游戏就是要在慢慢的体验中感受，在磨炼中享受成就和角色的成长，这个过程才会使游戏充满 ...

楼主能否提供一下助战跟随角色经验的代码，或者思路，自己试了下，貌似不行。

也不知道大佬能不能修复任务，我觉得任务也是梦幻的精髓之一啊