Code:
on *:TEXT:!bet *:#: {
  var %file bets.ini
  var %topic $+($chan,.,$nick)
  var %points $calc($readini(Points.ini,%topic,Points) + $3)
  if ($2 != close) {
    if ($2 isnum) {
      writeini %file $2 $nick $3
      writeini -n Points.ini %topic Points $calc($readini(Points.ini,%topic,Points) - $3)
      msg # $nick has wagered on color $2 for $3 dollars!
    }
  else {
    var %winners $ini(%file,$2,0)
    while (%winners) {
      var % winner $ini(%file,$2,%winners)
      var %wins %wins %winner
      writeini -n Points.ini %topic Points %points
      dec %winners
    }
    msg # The winners are: %wins 
    unset %firstdeath
  }
 }
}


Could be improved but here's a basic skeleton. I can't access MIRC right now but I'll post a better version later.

Last edited by Newbie; 09/02/15 10:39 PM.