stijn

on *:TEXT:!gamble:#[TF]:{
  set %poss $readini(%FB_settings, general, gamble)
  if ($rand(0, 5) > 2) {
    set %pnum $rand(1, %poss)
    set %prize 4You win: $+ $readini(%FB_gamble, %pnum, prize)
    set %new $readini(%FB_gamble, %pnum, nr)
    inc %new
    writeini %FB_gamble %pnum nr %new
  }
  else {
    msg $chan lost
    set %prize 4haha OWNED
  }
  notice $nick %prize
  unset %prize, %poss, %pnum, %new
}