单挑难6的20大不是梦-新人DIY修改兵器值+增加秘籍

金庸群侠传MOD游戏 黑山群侠传
1

首先感谢WYJK886，在他的帖子里，新人学到不少东西。
自己DIY如下:
1、 将DIY.LUA文件复制到黑山群侠传/SCRIPT/下，替换原有DIY.LUA。
2、 进入游戏，系统-我的代码-确定-保存。
3、 增加猪脚兵器拳、指、剑、刀、奇到150；武常100；品德100；神照、九阴、九阳、易筋经、86、降龙、黯然、六脉、越女、独孤、太极套、左右、斗转、天罗、凌波、打狗、一阳、玄铁等秘籍各一本；金钱30000；天王丹99；屠龙刀一把。
4、 请适度修改，仅供娱乐.

2

详细的修改见附件

人物兵器属性及增加秘籍修改.zip (12.6 KB)

3

新人学习一下是。

4

啊，这个改的好强

5

…代码有点儿小问题。不要直接用JY.Base[“物品xx”]=xx来添加物品，应该用instruct_2指令添加。否则，

JY.Base["物品4"]=71

假如人物持有物品超过4个，第四个物品就会被覆盖掉。稍微修改了一下

local itemlist = {71,83,84,85,86,87,96,97,98,113,114,115,116,117,118,167,169,235,265,278,295,72,43,8,79,271,282,252,}

for _, thingid in ipairs(itemlist) do
   if not instruct_18(thingid) then
   instruct_2(thingid,1)
   end
end

--加钱
instruct_2(174,30000)
6

哈哈 谢谢大神指导 我是新手 刚学DIY 是有问题 只能开始使用我的DIY，再次使用就会覆盖原有物品和属性 。你的是直接增加 ，这个比我的要好，学习中

7

local r = JYMsgBox(“请选择”, "你选择你想要执行的代码 ", {“得秘笈”,“洗武功”,“学左右”,“改资质”,“待定 3”}, 5, 0)
if r == 1 then
instruct_32(174, 10000) ----钱
instruct_32(8, 500) ----天王保命丹
instruct_32(35, 500) —黑血神针
instruct_32(17, 500) ----天山雪莲
。。。。（此处省略N个FOR循环）
Cls() --清屏
elseif r == 2 then 。。。。
Cls() --清屏
elseif r == 3 then
JY.Person[0][“左右互搏”] = 1
Cls() --清屏
elseif r == 4 then
JY.Person[0][“资质”] = InputNum(“输入资质”,1,100)
Cls() --清屏
elseif r == 5 then
Cls() --清屏
end

不破坏了 删掉代码了

2 个赞
8

原来玩蓝大 龙人的时候 写了好多DIY 可惜都没保存了

9

这串代码不觉明历

10

改的很强。。。

11

第一个是 得到所有秘笈和装备
第二个是 洗掉猪脚身上的武功（属性还在）
local c = InputNum(“输入武功”,1,12)
JY.Person[0][“武功” .. c] = 0
JY.Person[0][“武功等级” .. c] = 0
Cls() --清屏

稍微精简了点
第三个是 猪脚直接学会左右
。。。。。

12

要是能把秘籍和武器细分出来就好。

13

同事有个疑问，for i=264,264 do instruct_32(i, 1)
end这段函数是统一修改的方式吗，修改序号是264-264smile

14

多谢大大指出问题，有时间我再把我的帖子修一修

15

你说的 这个是添加物品方式 用for循环 一下添加多个 264,264 就是添加A到B中间的所有物品

秘籍和兵器分开 比较麻烦 主要是物品编码 不是按照循序来的

如果你有兴趣 可以自己一个一个看

貌似所有物品也就300个不到

你写个测试代码 自己记录下

for i=1,300 do
say(i,0,0)
instruct_2(i, 1)
end

16

好的，多谢。。

17

看看，学习一下

18

感谢分享smile
19

学习一下，每次修改都闪退

20

多謝大大無私分享