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

落日804452252

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

————————————抽取一件装备———————————-
MOV L$抽奖列表 [木剑,黑铁头盔,圣战手镯,圣战项链]
* S( a; k4 V1 E2 v2 `MOVR N$随机编码 0 4
GIVE <$STR(L$抽奖列表[<$STR(N$随机编码)>])> 1
& Q5 \& `  M# d" ?SENDMSG 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$随机编码)>])>的技能。

————————————随机抽取多件装备，并且不重复———————————-
1 _3 q# D/ U0 G) B; h2 k) R" ?MOV L$抽奖列表 [木剑,黑铁头盔,圣战手镯,圣战项链,降妖除魔戒指,金手镯,铂金戒指]
* K: h7 `) i  e- gMOV N$抽取数量 5
- V2 q6 K4 G! |% j  K+ ?+ eLOOPGOTO @_@随机抽取装备 <$STR(N$抽取数量)>

[@_@随机抽取装备]
$ k5 e/ M/ P/ s6 [% R#IF
5 k0 \$ B9 w3 r: n& Z# F  l#ACT
' i, y  y: M( s1 M0 V. IGetListVarCount L$抽奖列表 N$奖池数量
MOVR N$本次抽奖编号 0 <$STR(N$奖池数量)>
GIVE <$STR(L$抽奖列表[<$STR(N$本次抽奖编号)>])> 1
) ~2 ], l* I9 Q7 }5 h7 vDEC L$抽奖列表 <$STR(L$抽奖列表[<$STR(N$本次抽奖编号)>])>

; J* X  g! y" ?# C) _