设为首页收藏本站提交工单

 找回密码
 立即注册
折翼天使社区»论坛首页 › 折翼天使服务中心 › 交流探讨 › 求助一个随机给属性脚本，百分百给，只不过是随机， ...
12下一页
返回列表 发新帖
查看: 119|回复: 13

求助一个随机给属性脚本，百分百给，只不过是随机，

[复制链接]
快乐云朵

211

主题

562

回帖

214

积分

中级会员

积分
214
发表于 2026-3-28 18:02:33 | 显示全部楼层 |阅读模式
;---------------------这是第一种
#if
#ACT
LockUpdateItem  boxitem1
SetCustomItemText boxitem1  
SetCustomItemAbil boxitem1 0 0 151
SetCustomItemAbil boxitem1 0 1 3
SetCustomItemAbil boxitem1 0 2 1
SetCustomItemAbil boxitem1 0 3 1
SetCustomItemValue boxitem1 0 = 5
SetCustomItemAbil boxitem1 1 0 151
SetCustomItemAbil boxitem1 1 1 4
SetCustomItemAbil boxitem1 1 2 2
SetCustomItemAbil boxitem1 1 3 1
SetCustomItemValue boxitem1 1 = 5
SetCustomItemAbil boxitem1 2 0 151
SetCustomItemAbil boxitem1 2 1 5
SetCustomItemAbil boxitem1 2 2 3
SetCustomItemAbil boxitem1 2 3 1
SetCustomItemValue boxitem1 2 = 5
SetCustomItemAbil boxitem1 3 0 146
SetCustomItemAbil boxitem1 3 1 8
SetCustomItemAbil boxitem1 3 2 4
SetCustomItemAbil boxitem1 3 3 0
SetCustomItemValue boxitem1 3 = 1000
CHANGEITEMNAMECOLOR boxitem1  253
CHANGEITEMUPGRADECOUNT boxitem1 = 1
UpdateItem boxitem1
BREAK
;--------------------这是第二种
#if
#ACT
LockUpdateItem  boxitem1
SetCustomItemText boxitem1  
SetCustomItemAbil boxitem1 0 0 151
SetCustomItemAbil boxitem1 0 1 3
SetCustomItemAbil boxitem1 0 2 1
SetCustomItemAbil boxitem1 0 3 1
SetCustomItemValue boxitem1 0 = 50
SetCustomItemAbil boxitem1 1 0 151
SetCustomItemAbil boxitem1 1 1 4
SetCustomItemAbil boxitem1 1 2 2
SetCustomItemAbil boxitem1 1 3 1
SetCustomItemValue boxitem1 1 = 50
SetCustomItemAbil boxitem1 2 0 151
SetCustomItemAbil boxitem1 2 1 5
SetCustomItemAbil boxitem1 2 2 3
SetCustomItemAbil boxitem1 2 3 1
SetCustomItemValue boxitem1 2 = 50
SetCustomItemAbil boxitem1 3 0 146
SetCustomItemAbil boxitem1 3 1 8
SetCustomItemAbil boxitem1 3 2 4
SetCustomItemAbil boxitem1 3 3 0
SetCustomItemValue boxitem1 3 = 10000
CHANGEITEMNAMECOLOR boxitem1  253
CHANGEITEMUPGRADECOUNT boxitem1 = 1
UpdateItem boxitem1
BREAK
我有十种 这个自定义属性， 我用的是自定义OK框，每次鉴定 浪费一个 鉴定石头，然后随机给他一种属性，
来个大佬 帮帮我吧，
回复

举报

帅气小狗

253

主题

583

回帖

255

积分

中级会员

积分
255
发表于 2026-3-28 18:02:33 | 显示全部楼层
RANDOMEX 1 2  百分之50几率 给第一种属性，
RANDOMEX 1 10  百分之10的几率 给他们第二种属性，
我如何通过这个方式给他们 属性，十种属性我已经弄好了。这种方式怎么给，
回复

举报

可爱小鸟

0

主题

557

回帖

9

积分

新手上路

积分
9
发表于 2026-3-28 18:02:33 | 显示全部楼层
q381084525 发表于 2021-12-21 09:43 我说的是固定给的属性，第一种给你 10点，第二种20点，第三种30点。，
#ACT
MOV N$检测状态 0
#IF
RANDOMEX 10 100
#ACT
MOV N$检测状态 1
;----------------------
MOV N$属性1颜色 151
MOV N$属性1代码 3
MOV N$属性1位置 1
MOV N$属性1显示 1
MOV N$属性1数值 5
;----------------------
MOV N$属性2颜色 151
MOV N$属性2代码 4
MOV N$属性2位置 2
MOV N$属性2显示 1
MOV N$属性2数值 5
;----------------------
MOV N$属性3颜色 151
MOV N$属性3代码 5
MOV N$属性3位置 3
MOV N$属性3显示 1
MOV N$属性3数值 5
;----------------------
MOV N$属性4颜色 151
MOV N$属性4代码 8
MOV N$属性4位置 4
MOV N$属性4显示 1
MOV N$属性4数值 1000
#IF
RANDOMEX 20 100
#ACT
MOV N$检测状态 1
;----------------------
MOV N$属性1颜色 151
MOV N$属性1代码 3
MOV N$属性1位置 1
MOV N$属性1显示 1
MOV N$属性1数值 50
;----------------------
MOV N$属性2颜色 151
MOV N$属性2代码 4
MOV N$属性2位置 2
MOV N$属性2显示 1
MOV N$属性2数值 50
;----------------------
MOV N$属性3颜色 151
MOV N$属性3代码 5
MOV N$属性3位置 3
MOV N$属性3显示 1
MOV N$属性3数值 50
;----------------------
MOV N$属性4颜色 151
MOV N$属性4代码 8
MOV N$属性4位置 4
MOV N$属性4显示 0
MOV N$属性4数值 100000
#IF
LARGE N$检测状态 0
#ACT
LockUpdateItem  boxitem1
SetCustomItemText boxitem1  
;----------------------
SetCustomItemAbil boxitem1 0 0 N$属性1颜色
SetCustomItemAbil boxitem1 0 1 N$属性1代码
SetCustomItemAbil boxitem1 0 2 N$属性1位置
SetCustomItemAbil boxitem1 0 3 N$属性1显示
SetCustomItemValue boxitem1 0 = N$属性1数值
;----------------------
SetCustomItemAbil boxitem1 1 0 N$属性2颜色
SetCustomItemAbil boxitem1 1 1 N$属性21代码
SetCustomItemAbil boxitem1 1 2 N$属性2位置
SetCustomItemAbil boxitem1 1 3 N$属性2显示
SetCustomItemValue boxitem1 1 = N$属性2数值
;----------------------
SetCustomItemAbil boxitem1 2 0 N$属性3颜色
SetCustomItemAbil boxitem1 2 1 N$属性3代码
SetCustomItemAbil boxitem1 2 2 N$属性3位置
SetCustomItemAbil boxitem1 2 3 N$属性3显示
SetCustomItemValue boxitem1 2 = N$属性3数值
;----------------------
SetCustomItemAbil boxitem1 3 0 N$属性4颜色
SetCustomItemAbil boxitem1 3 1 N$属性4代码
SetCustomItemAbil boxitem1 3 2 N$属性4位置
SetCustomItemAbil boxitem1 3 3 N$属性4显示
SetCustomItemValue boxitem1 3 = N$属性4数值
;----------------------
CHANGEITEMNAMECOLOR boxitem1  253
CHANGEITEMUPGRADECOUNT boxitem1 = 1
;----------------------
SENDMSG 6 鉴定成功.
UpdateItem boxitem1
BREAK
#ELSEACT
SENDMSG 6 鉴定失败
以为你再说啥呢。原来是这种简单的几率
回复

举报

勇敢小鹿

230

主题

519

回帖

246

积分

中级会员

积分
246
发表于 2026-3-28 18:02:33 | 显示全部楼层
这样。。。
#ACT
MOVR N$一条值 0 9
MOVR N$二条值 0 9
MOVR N$三条值 0 9
MOVR N$亖条值 0 9
SetCustomItemAbil boxitem1 1 1 <$STR(N$一条值)>
SetCustomItemAbil boxitem1 1 2 <$STR(N$二条值)>
SetCustomItemAbil boxitem1 1 3 <$STR(N$三条值)>
SetCustomItemAbil boxitem1 1 4 <$STR(N$亖条值)>
亖条自定义属性每次随机加0-8
回复

举报

大方小狗

0

主题

554

回帖

0

积分

新手上路

积分
0
发表于 2026-3-28 18:02:33 | 显示全部楼层
天府彧龍 发表于 2021-12-21 07:42 这样。。。
#ACT
MOVR N$一条值 0 9
#ACT
;随机获取1-10的4个不同值。保存至N1开始的4个变量里
GetMultiRandomNumber 1 11 4 N1 M1
SetCustomItemAbil boxitem1 1 1 <$STR(N1)>
SetCustomItemAbil boxitem1 2 1 <$STR(N2)>
SetCustomItemAbil boxitem1 3 1 <$STR(N3)>
SetCustomItemAbil boxitem1 4 1 <$STR(N4)>
但这种方法不合理的，他的范围只能是固定的一个范围，例如1-10里面的值
但是如果你的属性为：10 15 27 39 42 60，类似这种无规律的随机其中几个
那么我建议里使用文本读取
;获取文本里4组不重复的数字，保存至N1开始的4个变量
GetMultiRandomText ..\\QuestDiary\\测试.txt 4 S1 N1
SetCustomItemAbil boxitem1 1 1 <$STR(N1)>
SetCustomItemAbil boxitem1 2 1 <$STR(N2)>
SetCustomItemAbil boxitem1 3 1 <$STR(N3)>
SetCustomItemAbil boxitem1 4 1 <$STR(N4)>
回复

举报

可爱月亮

251

主题

546

回帖

889

积分

高级会员

积分
889
发表于 2026-3-28 18:02:33 | 显示全部楼层
天府彧龍 发表于 2021-12-21 07:42 这样。。。
#ACT
MOVR N$一条值 0 9
我说的是固定给的属性，第一种给你 10点，第二种20点，第三种30点。，
回复

举报

大方小猪

216

主题

548

回帖

235

积分

中级会员

积分
235
发表于 2026-3-28 18:02:33 | 显示全部楼层
q381084525 发表于 2021-12-21 09:55 RANDOMEX 1 2  百分之50几率 给第一种属性，
RANDOMEX 1 10  百分之10的几率 给他们第二种属性，
我如何 ...
#IF
RANDOMEX 1 2
#ACT
第一种属性
break(每段必须加，不然会执行多段)
#IF
RANDOMEX 1 10
#ACT
第二种属性
...................
回复

举报

勤奋小鸟

0

主题

602

回帖

467

积分

中级会员

积分
467
发表于 2026-3-28 18:02:33 | 显示全部楼层
;---------------------这是第一种
#if
#ACT
LockUpdateItem  boxitem1
SetCustomItemText boxitem1  
SetCustomItemAbil boxitem1 0 0 151
SetCustomItemAbil boxitem1 0 1 3
SetCustomItemAbil boxitem1 0 2 1
SetCustomItemAbil boxitem1 0 3 1
SetCustomItemValue boxitem1 0 = 5
SetCustomItemAbil boxitem1 1 0 151
SetCustomItemAbil boxitem1 1 1 4
SetCustomItemAbil boxitem1 1 2 2
SetCustomItemAbil boxitem1 1 3 1
SetCustomItemValue boxitem1 1 = 5
SetCustomItemAbil boxitem1 2 0 151
SetCustomItemAbil boxitem1 2 1 5
SetCustomItemAbil boxitem1 2 2 3
SetCustomItemAbil boxitem1 2 3 1
SetCustomItemValue boxitem1 2 = 5
SetCustomItemAbil boxitem1 3 0 146
SetCustomItemAbil boxitem1 3 1 8
SetCustomItemAbil boxitem1 3 2 4
SetCustomItemAbil boxitem1 3 3 0
SetCustomItemValue boxitem1 3 = 1000
CHANGEITEMNAMECOLOR boxitem1  253
CHANGEITEMUPGRADECOUNT boxitem1 = 1
UpdateItem boxitem1
BREAK
;--------------------这是第二种
#if
#ACT
LockUpdateItem  boxitem1
SetCustomItemText boxitem1  
SetCustomItemAbil boxitem1 0 0 151
SetCustomItemAbil boxitem1 0 1 3
SetCustomItemAbil boxitem1 0 2 1
SetCustomItemAbil boxitem1 0 3 1
SetCustomItemValue boxitem1 0 = 50
SetCustomItemAbil boxitem1 1 0 151
SetCustomItemAbil boxitem1 1 1 4
SetCustomItemAbil boxitem1 1 2 2
SetCustomItemAbil boxitem1 1 3 1
SetCustomItemValue boxitem1 1 = 50
SetCustomItemAbil boxitem1 2 0 151
SetCustomItemAbil boxitem1 2 1 5
SetCustomItemAbil boxitem1 2 2 3
SetCustomItemAbil boxitem1 2 3 1
SetCustomItemValue boxitem1 2 = 50
SetCustomItemAbil boxitem1 3 0 146
SetCustomItemAbil boxitem1 3 1 8
SetCustomItemAbil boxitem1 3 2 4
SetCustomItemAbil boxitem1 3 3 0
SetCustomItemValue boxitem1 3 = 10000
CHANGEITEMNAMECOLOR boxitem1  253
CHANGEITEMUPGRADECOUNT boxitem1 = 1
UpdateItem boxitem1
BREAK
我有十种 这个自定义属性， 我用的是自定义OK框，每次鉴定 浪费一个 鉴定石头，然后随机给他一种属性，
来个大佬 帮帮我吧，
回复

举报

机智小猪

0

主题

511

回帖

427

积分

中级会员

积分
427
发表于 2026-3-28 18:02:33 | 显示全部楼层
q381084525 发表于 2021-12-21 09:43 我说的是固定给的属性，第一种给你 10点，第二种20点，第三种30点。，
#ACT
MOV N$检测状态 0
#IF
RANDOMEX 10 100
#ACT
MOV N$检测状态 1
;----------------------
MOV N$属性1颜色 151
MOV N$属性1代码 3
MOV N$属性1位置 1
MOV N$属性1显示 1
MOV N$属性1数值 5
;----------------------
MOV N$属性2颜色 151
MOV N$属性2代码 4
MOV N$属性2位置 2
MOV N$属性2显示 1
MOV N$属性2数值 5
;----------------------
MOV N$属性3颜色 151
MOV N$属性3代码 5
MOV N$属性3位置 3
MOV N$属性3显示 1
MOV N$属性3数值 5
;----------------------
MOV N$属性4颜色 151
MOV N$属性4代码 8
MOV N$属性4位置 4
MOV N$属性4显示 1
MOV N$属性4数值 1000
#IF
RANDOMEX 20 100
#ACT
MOV N$检测状态 1
;----------------------
MOV N$属性1颜色 151
MOV N$属性1代码 3
MOV N$属性1位置 1
MOV N$属性1显示 1
MOV N$属性1数值 50
;----------------------
MOV N$属性2颜色 151
MOV N$属性2代码 4
MOV N$属性2位置 2
MOV N$属性2显示 1
MOV N$属性2数值 50
;----------------------
MOV N$属性3颜色 151
MOV N$属性3代码 5
MOV N$属性3位置 3
MOV N$属性3显示 1
MOV N$属性3数值 50
;----------------------
MOV N$属性4颜色 151
MOV N$属性4代码 8
MOV N$属性4位置 4
MOV N$属性4显示 0
MOV N$属性4数值 100000
#IF
LARGE N$检测状态 0
#ACT
LockUpdateItem  boxitem1
SetCustomItemText boxitem1  
;----------------------
SetCustomItemAbil boxitem1 0 0 N$属性1颜色
SetCustomItemAbil boxitem1 0 1 N$属性1代码
SetCustomItemAbil boxitem1 0 2 N$属性1位置
SetCustomItemAbil boxitem1 0 3 N$属性1显示
SetCustomItemValue boxitem1 0 = N$属性1数值
;----------------------
SetCustomItemAbil boxitem1 1 0 N$属性2颜色
SetCustomItemAbil boxitem1 1 1 N$属性21代码
SetCustomItemAbil boxitem1 1 2 N$属性2位置
SetCustomItemAbil boxitem1 1 3 N$属性2显示
SetCustomItemValue boxitem1 1 = N$属性2数值
;----------------------
SetCustomItemAbil boxitem1 2 0 N$属性3颜色
SetCustomItemAbil boxitem1 2 1 N$属性3代码
SetCustomItemAbil boxitem1 2 2 N$属性3位置
SetCustomItemAbil boxitem1 2 3 N$属性3显示
SetCustomItemValue boxitem1 2 = N$属性3数值
;----------------------
SetCustomItemAbil boxitem1 3 0 N$属性4颜色
SetCustomItemAbil boxitem1 3 1 N$属性4代码
SetCustomItemAbil boxitem1 3 2 N$属性4位置
SetCustomItemAbil boxitem1 3 3 N$属性4显示
SetCustomItemValue boxitem1 3 = N$属性4数值
;----------------------
CHANGEITEMNAMECOLOR boxitem1  253
CHANGEITEMUPGRADECOUNT boxitem1 = 1
;----------------------
SENDMSG 6 鉴定成功.
UpdateItem boxitem1
BREAK
#ELSEACT
SENDMSG 6 鉴定失败
以为你再说啥呢。原来是这种简单的几率
回复

举报

勤奋小羊

225

主题

540

回帖

229

积分

中级会员

积分
229
发表于 2026-3-28 18:02:33 | 显示全部楼层
这样。。。
#ACT
MOVR N$一条值 0 9
MOVR N$二条值 0 9
MOVR N$三条值 0 9
MOVR N$亖条值 0 9
SetCustomItemAbil boxitem1 1 1 <$STR(N$一条值)>
SetCustomItemAbil boxitem1 1 2 <$STR(N$二条值)>
SetCustomItemAbil boxitem1 1 3 <$STR(N$三条值)>
SetCustomItemAbil boxitem1 1 4 <$STR(N$亖条值)>
亖条自定义属性每次随机加0-8
回复

举报

下一页 »
12下一页
返回列表 发新帖

© 2026 折翼天使社区 版权所有