require "wxruby"

class Array
  def shuffle
    ret, org = Array.new, self.dup
    ret<<org.delete_at(rand(org.length)) while org.length > 0
    return ret
  end
end

class RandomGenApp < Wx::App
  def on_init
    $xrc = Wx::XmlResource.get
    $xrc.init_all_handlers
    $xrc.load("_RandomNumber.xrc")

    RandomGenDialog.new(self).show(true)
  end
end

class RandomGenDialog < Wx::Dialog
  def initialize(parent)
    @coupons = (1..300).to_a

    super()
    $xrc.load_dialog_subclass(self, parent, 'ID_DIALOG')

@number = Wx::Window.find_window_by_id(Wx::xrcid('wxID_STATIC'))
    @btn_select = Wx::Window.find_window_by_id(Wx::xrcid('ID_BUTTON_SELECT'))

    evt_button(@btn_select.get_id) { onBtnPop }
    evt_close() { Wx::get_app.exit_main_loop }
  end
  def onBtnPop
    50.times { @number.set_label(@coupons.shuffle[0].to_s) }
    @number.set_label(@coupons.shuffle.shift.to_s)
  end
end

RandomGenApp.new.main_loop