[1.13.X][随机数模块]借助战利品报表生成随机数

本帖最后由 CHElover_C60 于 2019-4-6 19:03 编辑

灵感来源为一次我在写战利品表时的偶然想法
原理：借助战利品表来生成随机损坏值的工具，来生成随机数。

模块功能

本模块适用于随机数的生成，并可加权生成随机数值；自带调试功能，防止出现错误

使用方法
初始化：

生成随机数：

生成加权随机数：

调试模式：

代码解析

战利品表：random.json

函数ran:start 用于建立计分板

函数ran:random 用于产生随机数

tag @s add ran_creating
summon armor_stand ~ -10 ~ {Tags:["ran"]}

summon chest_minecart ~ -10 ~ {LootTable:"ran:random"}
execute positioned ~ -10 ~ run kill @e[sort=nearest,type=chest_minecart,limit=1]
#激活战利品表
scoreboard players set @e[tag=ran] ran 1024
execute positioned ~ -10 ~ as @e[sort=nearest,type=item,nbt={Item:{id:"minecraft:diamond_sword"}},limit=3] store result score @s ran run data get entity @s Item.tag.Damage
execute positioned ~ -10 ~ as @e[sort=nearest,type=item,nbt={Item:{id:"minecraft:diamond_sword"}},limit=1] store success entity @s Item.Count byte 0 run scoreboard players operation @e[tag=ran_creating] ran = @s ran
scoreboard players operation @e[tag=ran_creating] ran *= @e[scores={ran=1024}] ran
execute positioned ~ -10 ~ as @e[sort=nearest,type=item,nbt={Item:{id:"minecraft:diamond_sword"}},limit=1] store success entity @s Item.Count byte 0 run scoreboard players operation @e[tag=ran_creating] ran += @s ran
scoreboard players operation @e[tag=ran_creating] ran *= @e[scores={ran=1024}] ran
execute positioned ~ -10 ~ as @e[sort=nearest,type=item,nbt={Item:{id:"minecraft:diamond_sword"}},limit=1] store success entity @s Item.Count byte 0 run scoreboard players operation @e[tag=ran_creating] ran += @s ran
#采用1024进制（？？？），随机生成一个0~1073741823的随机数
scoreboard players operation @e[tag=ran_creating] ran += @e[tag=ran_creating] ran
execute positioned ~ -10 ~ as @e[sort=nearest,type=item,nbt={Item:{id:"minecraft:stone"}},limit=1,distance=..1] store success entity @s Item.Count byte 0 run scoreboard players add @e[tag=ran_creating] ran 1
#将最初的随机数翻倍，并随机决定是否加上1，得到0~2147483647之间的随机数

scoreboard players operation @s ran_delta = @s ran_max
scoreboard players operation @s ran_delta -= @s ran_min
scoreboard players add @s ran_delta 1
#确定随机数的生成范围
scoreboard players set @e[tag=ran,limit=1] ran 2147483647
scoreboard players operation @e[tag=ran,limit=1] ran /= @e[tag=ran_creating] ran_delta
scoreboard players operation @e[tag=ran_creating] ran /= @e[tag=ran,limit=1] ran
#将2147483647分成数个组，根据所得随机数落在哪一个组来决定随机数的大小
scoreboard players operation @s ran += @s ran_min
#得到指定范围内的随机数

execute positioned ~ -10 ~ run kill @e[sort=nearest,limit=1,type=armor_stand,tag=ran]
tag @s remove ran_creating

execute if score @s ran > @s ran_max run function ran:random
#检查随机数是否落在指定范围内，若不是则重新生成随机数

函数ran:setweight 用于生成随机数组

函数ran:weight 用于随机选取加权数组并生成随机数

函数ran:inputfunction1 用于辅助ran:weight函数选取合适的数组

函数ran:randomdebug 用于分析是否能将ran:random在某个实体上应用

函数ran:weightdebug 用于检测是否能将ran:weight应用在目标实体上

函数ran:inputfunction2 用于协助ran:weightdebug 来检查每个随机数组的数值

tag @e[tag=ran_weight,tag=ran_continue] remove ran_continue
scoreboard players set @e[type=armor_stand,tag=ran_weighting,limit=1] ran_delta 0
execute as @e[tag=ran_weight] if score @s ran_weightid = @e[tag=ran_weighting,limit=1] ran_weightid run scoreboard players add @e[type=armor_stand,tag=ran_weighting,limit=1] ran_delta 1
execute unless score @s ran_delta matches 1 run tellraw @a [{"text":"[\u968F\u673A\u6570\u6A21\u5757] ","color":"aqua"},{"text":"\u9519\u8BEF\uFF1A\u53D1\u73B0 ","color":"red"},{"score":{"name":"@s","objective":"ran_delta"},"color":"red"},{"text":" \u4E2Aweightid\u4E3A","color":"red"},{"score":{"name":"@s","objective":"ran_weightid"},"color":"red"},{"text":"\u7684\u968F\u673A\u6570\u7EC4\u3002","color":"red"}]
execute unless score @s ran_delta matches 1 run tag @s add ran_error
#检查该数组的数量
execute if score @s ran_delta matches 1 as @e[tag=ran_weight] if score @s ran_weightid = @e[tag=ran_weighting,limit=1] ran_weightid if score @s ran_weight matches 1.. run tellraw @a [{"text":"[\u968F\u673A\u6570\u6A21\u5757] ","color":"aqua"},{"text":"weightid\u4E3A ","color":"green"},{"score":{"name":"@s","objective":"ran_weightid"},"color":"green"},{"text":" \u7684\u968F\u673A\u6570\u7EC4\u7684\u6743\u91CD\u4E3A","color":"green"},{"score":{"name":"@s","objective":"ran_weight"},"color":"green"}]
execute if score @s ran_delta matches 1 as @e[tag=ran_weight] if score @s ran_weightid = @e[tag=ran_weighting,limit=1] ran_weightid if score @s ran_weight matches ..0 run tellraw @a [{"text":"[\u968F\u673A\u6570\u6A21\u5757] ","color":"aqua"},{"text":"weightid\u4E3A ","color":"red"},{"score":{"name":"@s","objective":"ran_weightid"},"color":"red"},{"text":" \u7684\u968F\u673A\u6570\u7EC4\u7684\u6743\u91CD\u4E3A","color":"red"},{"score":{"name":"@s","objective":"ran_weight"},"color":"red"}]
execute if score @s ran_delta matches 1 as @e[tag=ran_weight] if score @s ran_weightid = @e[tag=ran_weighting,limit=1] ran_weightid if score @s ran_weight matches ..0 run tellraw @a [{"text":"[\u968F\u673A\u6570\u6A21\u5757] ","color":"aqua"},{"text":"\u9519\u8BEF\uFF1Aweight\u5FC5\u987B\u5927\u4E8E\u6216\u7B49\u4E8E1\u3002","color":"red"}]
execute if score @s ran_delta matches 1 as @e[tag=ran_weight] if score @s ran_weightid = @e[tag=ran_weighting,limit=1] ran_weightid if score @s ran_weight matches ..0 run tag @e[tag=ran_weighting,limit=1] add ran_error
#检查该数组的权重
execute if score @s ran_delta matches 1 as @e[tag=ran_weight] if score @s ran_weightid = @e[tag=ran_weighting,limit=1] ran_weightid unless score @s ran_max matches -2147483648..2147483647 run tag @s add ran_error
execute if score @s ran_delta matches 1 as @e[tag=ran_weight] if score @s ran_weightid = @e[tag=ran_weighting,limit=1] ran_weightid unless score @s ran_max matches -2147483648..2147483647 run tellraw @a [{"text":"[\u968F\u673A\u6570\u6A21\u5757] ","color":"aqua"},{"text":"\u9519\u8BEF\uFF1A ","color":"red"},{"selector":"@s","color":"reset"},{"text":" \u5B9E\u4F53\u7F3A\u5C11\u5206\u6570\uFF1Aran_max","color":"red"}]
execute if score @s ran_delta matches 1 as @e[tag=ran_weight] if score @s ran_weightid = @e[tag=ran_weighting,limit=1] ran_weightid unless score @s ran_min matches -2147483648..2147483647 run tag @s add ran_error
execute if score @s ran_delta matches 1 as @e[tag=ran_weight] if score @s ran_weightid = @e[tag=ran_weighting,limit=1] ran_weightid unless score @s ran_min matches -2147483648..2147483647 run tellraw @a [{"text":"[\u968F\u673A\u6570\u6A21\u5757] ","color":"aqua"},{"text":"\u9519\u8BEF\uFF1A ","color":"red"},{"selector":"@s","color":"reset"},{"text":" \u5B9E\u4F53\u7F3A\u5C11\u5206\u6570\uFF1Aran_min","color":"red"}]
#检查该数组是否存在ran_min与ran_max
execute if score @s ran_delta matches 1 as @e[tag=ran_weight] if score @s ran_weightid = @e[tag=ran_weighting,limit=1] ran_weightid if entity @s[tag=!ran_error] if score @s ran_max >= @s ran_min run tellraw @a [{"text":"[\u968F\u673A\u6570\u6A21\u5757] ","color":"aqua"},{"text":"\u8BE5\u6570\u7EC4\u7684\u5206\u6570\u72B6\u51B5\uFF1A\nran_min:","color":"green"},{"score":{"name":"@s","objective":"ran_min"},"color":"green"},{"text":"\nran_max:","color":"green"},{"score":{"name":"@s","objective":"ran_max"},"color":"green"}]
execute if score @s ran_delta matches 1 as @e[tag=ran_weight] if score @s ran_weightid = @e[tag=ran_weighting,limit=1] ran_weightid if entity @s[tag=!ran_error] if score @s ran_max < @s ran_min run tellraw @a [{"text":"[\u968F\u673A\u6570\u6A21\u5757] ","color":"aqua"},{"text":"\u8BE5\u6570\u7EC4\u7684\u5206\u6570\u72B6\u51B5\uFF1A\nran_min:","color":"red"},{"score":{"name":"@s","objective":"ran_min"},"color":"red"},{"text":"\nran_max:","color":"red"},{"score":{"name":"@s","objective":"ran_max"},"color":"red"},{"text":"\n[\u968F\u673A\u6570\u6A21\u5757] ","color":"aqua"},{"text":"\u9519\u8BEF\uFF1A\u5B9E\u4F53 ","color":"red"},{"selector":"@s","color":"reset"},{"text":" \u5206\u6570\u8BBE\u7F6E\u9519\u8BEF\uFF0C\u8BF7\u786E\u4FDD\u8BE5\u5B9E\u4F53\u7684ran_max\u5927\u4E8Eran_min","color":"red"}]
execute if score @s ran_delta matches 1 as @e[tag=ran_weight] if score @s ran_weightid = @e[tag=ran_weighting,limit=1] ran_weightid if entity @s[tag=!ran_error] if score @s ran_max < @s ran_min run tag @s add ran_error
#检查该数组是的ran_min与ran_max的大小关系
execute as @e[tag=ran_weight] if score @s ran_weightid > @e[tag=ran_weighting,limit=1] ran_weightid run tag @s add ran_continue
execute if entity @e[tag=ran_continue] run scoreboard players add @s ran_weightid 1
execute if entity @e[tag=ran_continue] run function ran:inputfunction2
#检查是否还有更多数组，并循环

复制代码

想说的话

其实如果能看懂我的这个方法的大体思路之后，或许就可以不使用我的模块，自制战利品表来生成随机数。自制战利品表可以通过掉落的概率很轻松地控制每个随机数的可能性大小。但我之所以要把这个作品放出来，也是想给大家提供一个新思路（因为暂未看到bbs内有借助战利品表做随机数的先例（至少我没发现））。这也是我的第一个作品吧，希望能得到大家的认可。不会用图床，图片只能用附件来上传了。

原链接：[随机模块]一个借助战利品表生成随机数的模块（现该模块已更名为随机数模块）
下载地址：https://pan.baidu.com/s/16KkMV76-ikDwxxTuTCkLXA 提取码：q6iq
此为作者自转

[1.13.X][随机数模块]借助战利品报表生成随机数

回复: