翎风引擎 使用数组做一个列表抽取功能

落日804452252

来源 西伯利亚的忠犬-狗哥

————————————抽取一件装备———————————-
MOV L$抽奖列表 [木剑,黑铁头盔,圣战手镯,圣战项链]
. T6 B7 Q9 y4 fMOVR N$随机编码 0 4
1 o' n: \# T" r3 U) x0 T& S9 BGIVE <$STR(L$抽奖列表[<$STR(N$随机编码)>])> 1
% [' O' T' k( r) p9 w( E  rSENDMSG 6 你抽取了一件<$STR(L$抽奖列表[<$STR(N$随机编码)>])>。

————————————随机触发技能———————————-
MOV L$触发技能列表 [13,22,35,44]
MOVR N$随机编码 0 4
releasemagicEX <$STR(L$触发技能列表[<$STR(N$随机编码)>])> 0 3 1
SENDMSG 6 你的攻击随机触发了ID为<$STR(L$触发技能列表[<$STR(N$随机编码)>])>的技能。

0 Q9 S& ^, D' Y. {* D) {/ I- G

————————————随机抽取多件装备，并且不重复———————————-
8 Z( P+ {. a  e- pMOV L$抽奖列表 [木剑,黑铁头盔,圣战手镯,圣战项链,降妖除魔戒指,金手镯,铂金戒指]
! q% A5 \9 d7 X& J& D) r- `/ ~( _: nMOV N$抽取数量 5
LOOPGOTO @_@随机抽取装备 <$STR(N$抽取数量)>

[@_@随机抽取装备]
; L" a( a0 `/ a' \) ?8 o* }8 c' v#IF
#ACT
% r  ?7 _0 F! i" uGetListVarCount L$抽奖列表 N$奖池数量
MOVR N$本次抽奖编号 0 <$STR(N$奖池数量)>
- P; @& {2 N5 V0 T* IGIVE <$STR(L$抽奖列表[<$STR(N$本次抽奖编号)>])> 1
DEC L$抽奖列表 <$STR(L$抽奖列表[<$STR(N$本次抽奖编号)>])>