铁血丹心

 找回密码
 我要成为铁血侠客
搜索
查看: 1815|回复: 6

求大神抬抬手,给个例子学习观摩

[复制链接]
发表于 2012-7-12 15:37 | 显示全部楼层 |阅读模式

马上注册,结交更多侠友!

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

x
比如我用别的外功,让他几率出天下无狗的大招要怎么弄?
【武侠.中国】铁血丹心论坛(大武侠):致力于推广和发展武侠文化,让我们一起努力,做全球最大的武侠社区。
可能是目前为止最好的金庸群侠传MOD游戏交流论坛,各种经典武侠游戏等你来玩,各种开源制作工具等你来实现你的游戏开发之梦。
发表于 2012-7-12 18:41 | 显示全部楼层
  1. --使用降龙十八掌
  2.     if JY.Person[pid]["武功" .. wugongnum] == 26 then         
  3.             --乔峰必出极意,郭靖有(40%),洪七公40%+10%,拳主角40% ivansz:027 40%
  4.       if pid == 50 or (pid == 55 and math.random(10) < 5) or ((T1LEQ(pid) or pid == 69 or pid == 0 and GetS(4, 5, 5, 5) == 1) and JLSD(30, 70, pid)) then
  5.         WAR.Person[id][CC.TXWZ3] = XL18JY[math.random(8)]
  6.         ng = ng + 2500
  7.         WAR.WS = 1
  8.         for i = 1, (level) / 2 + 1 do
  9.           for j = 1, (level) / 2 + 1 do
  10.             SetWarMap(x + i - 1, y + j - 1, 4, 1)
  11.             SetWarMap(x - i + 1, y + j - 1, 4, 1)
  12.             SetWarMap(x + i - 1, y - j + 1, 4, 1)
  13.             SetWarMap(x - i + 1, y - j + 1, 4, 1)
  14.           end
  15.         end
  16.             elseif myrandom(15 + (level), pid) then       
  17.         WAR.Person[id][CC.TXWZ3] = XL18[math.random(6)]
  18.         ng = ng + 2000
  19.         for i = 1, (1 + (level)) / 2 do
  20.           for j = 1, (1 + (level)) / 2 do
  21.             SetWarMap(WAR.Person[WAR.CurID]["坐标X"] + i * 2 - 1, WAR.Person[WAR.CurID]["坐标Y"] + j * 2 - 1, 4, 1)
  22.             SetWarMap(WAR.Person[WAR.CurID]["坐标X"] - i * 2 + 1, WAR.Person[WAR.CurID]["坐标Y"] + j * 2 - 1, 4, 1)
  23.             SetWarMap(WAR.Person[WAR.CurID]["坐标X"] + i * 2 - 1, WAR.Person[WAR.CurID]["坐标Y"] - j * 2 + 1, 4, 1)
  24.             SetWarMap(WAR.Person[WAR.CurID]["坐标X"] - i * 2 + 1, WAR.Person[WAR.CurID]["坐标Y"] - j * 2 + 1, 4, 1)
  25.           end
  26.         end
  27.       end
  28.     end
复制代码
这段代码在War_Fight_Sub(id, wugongnum, x, y)函数里 自己研究吧
【武侠.中国】铁血丹心论坛(大武侠):致力于推广和发展武侠文化,让我们一起努力,做全球最大的武侠社区。
可能是目前为止最好的金庸群侠传MOD游戏交流论坛,各种经典武侠游戏等你来玩,各种开源制作工具等你来实现你的游戏开发之梦。
 楼主| 发表于 2012-7-12 20:03 | 显示全部楼层
本帖最后由 豫B痞子 于 2012-7-12 20:06 编辑

回复 ivansz 的帖子
比如限定只有特系普通攻击触发这个大招
那是不是把触发改成if pid == 0 and GetS(4, 5, 5, 5) == 4 then就行了??

点评

GetS(4, 5, 5, 5) == 4不要这个,那不是所有的主角都能释放了,另外我有点迷了,if JY.Person[pid]["武功" .. wugongnum] == 26定义以后,那不是只有学了这个武功才能放出来,而不是用任意一个武功,都能触发这   发表于 2012-7-12 20:15
GetS(4, 5, 5, 5) == 4 这个好像不需要  发表于 2012-7-12 20:08
对,吧条件改一下 武功编号也可以改  发表于 2012-7-12 20:07
【武侠.中国】铁血丹心论坛(大武侠):致力于推广和发展武侠文化,让我们一起努力,做全球最大的武侠社区。
可能是目前为止最好的金庸群侠传MOD游戏交流论坛,各种经典武侠游戏等你来玩,各种开源制作工具等你来实现你的游戏开发之梦。
 楼主| 发表于 2012-7-12 20:21 | 显示全部楼层
回复 ivansz 的帖子

i老师,表走..............
【武侠.中国】铁血丹心论坛(大武侠):致力于推广和发展武侠文化,让我们一起努力,做全球最大的武侠社区。
可能是目前为止最好的金庸群侠传MOD游戏交流论坛,各种经典武侠游戏等你来玩,各种开源制作工具等你来实现你的游戏开发之梦。
发表于 2012-7-12 20:26 | 显示全部楼层
回复 豫B痞子 的帖子

如果你只想特系主角才能出效果就加 GetS(4,5,5,5) == 4 如果想所有武功都出效果 就把武功判断那个去掉

if pid == 0 and GetS(4,5,5,5) == 4 and JLSD(10,40,pid) then
  ng = ng + 1000
  for i = 1, 6 do
   for j = 1, 6 do
    SetWarMap(x + i - 1, y + j - 1, 4, 1)
    SetWarMap(x - i + 1, y + j - 1, 4, 1)
    SetWarMap(x + i - 1, y - j + 1, 4, 1)
    SetWarMap(x - i + 1, y - j + 1, 4, 1)
   end
  end
   end
【武侠.中国】铁血丹心论坛(大武侠):致力于推广和发展武侠文化,让我们一起努力,做全球最大的武侠社区。
可能是目前为止最好的金庸群侠传MOD游戏交流论坛,各种经典武侠游戏等你来玩,各种开源制作工具等你来实现你的游戏开发之梦。
 楼主| 发表于 2012-7-12 20:27 | 显示全部楼层
回复 ivansz 的帖子

我大概明白了比如
--主角特系大招
    if pid == 0 and GetS(4, 5, 5, 5) == 4 then
      WAR.Person[id][CC.TXDH] = 6
      if WAR.Person[id][CC.TXWZ3] == nil then
        WAR.Person[id][CC.TXWZ3] = ZJTF[4]
      else
        WAR.Person[id][CC.TXWZ3] = ZJTF[4] .. "·" .. WAR.Person[id][CC.TXWZ3]
      end
      ng = ng + 1000
      WAR.WS = 1
      Cls()
      if JY.HEADXZ == 1 then
        lib.PicLoadCache(91, 6, -100, -1, 1)
      else
        lib.PicLoadCache(91, 6, 130, 1, 1)
      end
      ShowScreen()
      lib.Delay(40)
      for i = 12, 24 do
        NewDrawString(-1, -1, ZJTF[4] .. TFSSJ[4], C_GOLD, 25 + i)
        ShowScreen()
        if i == 24 then
          Cls()
          NewDrawString(-1, -1, ZJTF[4] .. TFSSJ[4], C_GOLD, 25 + i)
          ShowScreen()
          lib.Delay(500)
        else
          lib.Delay(1)
        end
      end
      WAR.GCTJ = 1
    end

改一下条件就触发大招了

点评

对头  发表于 2012-7-12 20:44
【武侠.中国】铁血丹心论坛(大武侠):致力于推广和发展武侠文化,让我们一起努力,做全球最大的武侠社区。
可能是目前为止最好的金庸群侠传MOD游戏交流论坛,各种经典武侠游戏等你来玩,各种开源制作工具等你来实现你的游戏开发之梦。
 楼主| 发表于 2012-7-12 20:51 | 显示全部楼层
谢谢老师

点评

支持喜欢研究代码的同学:)  发表于 2012-7-12 23:49
【武侠.中国】铁血丹心论坛(大武侠):致力于推广和发展武侠文化,让我们一起努力,做全球最大的武侠社区。
可能是目前为止最好的金庸群侠传MOD游戏交流论坛,各种经典武侠游戏等你来玩,各种开源制作工具等你来实现你的游戏开发之梦。

本版积分规则

小黑屋|手机版|铁血丹心

GMT+8, 2024-11-24 23:18

Powered by Discuz! X3.4 Licensed

Copyright © 2001-2021, Tencent Cloud.

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