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

落日804452252

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

————————————抽取一件装备———————————-
MOV L$抽奖列表 [木剑,黑铁头盔,圣战手镯,圣战项链]
MOVR N$随机编码 0 4
+ h8 a$ i  |& uGIVE <$STR(L$抽奖列表[<$STR(N$随机编码)>])> 1
. b4 f3 v9 U/ |5 P) `SENDMSG 6 你抽取了一件<$STR(L$抽奖列表[<$STR(N$随机编码)>])>。

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

, G0 ^* J) L; \; t

————————————随机抽取多件装备，并且不重复———————————-
# }3 X" h- O2 a7 s9 LMOV L$抽奖列表 [木剑,黑铁头盔,圣战手镯,圣战项链,降妖除魔戒指,金手镯,铂金戒指]
$ [, l# x' Z2 z# Q( vMOV N$抽取数量 5
LOOPGOTO @_@随机抽取装备 <$STR(N$抽取数量)>

[@_@随机抽取装备]
#IF
0 g* C8 l1 b2 B& B7 ^  [& m#ACT
" j& |) D5 C' w  R7 d+ T  _5 DGetListVarCount L$抽奖列表 N$奖池数量
$ A/ L: L8 p9 I8 YMOVR N$本次抽奖编号 0 <$STR(N$奖池数量)>
' v1 @3 T8 Q4 c" ^7 ?GIVE <$STR(L$抽奖列表[<$STR(N$本次抽奖编号)>])> 1
4 F0 d, S) L4 P8 q1 o5 f) IDEC L$抽奖列表 <$STR(L$抽奖列表[<$STR(N$本次抽奖编号)>])>