抽奖代码的简单示例
快捷键:空格键,没点一次随机从三名幸运者中选择一位!
Labels := ["One", "Two", "Three"] Space:: if !Current.MaxIndex() Current := Labels.Clone() Random, X, 1, Current.MaxIndex() gosub % Current.RemoveAt(X) return One: MsgBox 1号中奖 return Two: MsgBox 2号中奖 return Three: MsgBox 3号中奖 return
表示有惊喜!
代码越来越犀利了!!