on !1:JOIN:#clannies:/notice $nick Welcome to Clannie IRC Channel. For a list of commands type !help

on 1:TEXT:!add*:#:{
  if ($readini(matches.ini,$nick,admin)) {
    notice $nick You already have a game on the bot | halt
  }
  else {
    if ($3) {
      if (!$timer(checkmatches)) { timercheckmatches 0 10 checkmatches }
      writeini matches.ini $nick admin $nick
      writeini matches.ini $nick clan $2
      writeini matches.ini $nick time $3
      notice $nick Your game has been added to the Bot.
    }
  }
}
alias checkmatches {
  var %i = 1
  while (%i <= $ini(matches.ini,0) ) {
    if ($time(tt) == $remove($readini(matches.ini,$ini(matches.ini,%i),time),1,2,3,4,5,6,7,8,9,0)) {
      if ($time(h) > $remove($readini(matches.ini,$ini(matches.ini,%i),time),am,pm)) {
        notice $readini(matches.ini,$ini(matches.ini,%i),admin) Your game has expired.
        remini matches.ini $ini(matches.ini,%i)
      }

    }
    inc %i
  }
}
on 1:TEXT:!set*:#clannies:{
  if ($nick isop $chan)  {
    set $2 $3
  }
}
on 1:TEXT:!help:#clannies:{
  notice $nick Clannie Bot Made By Murkee
  notice $nick Type !add (Clan) (Time [Add AM or PM])
  notice $nick Type !listgames For a list of the clans looking for games!}
}

on 1:TEXT:!listgames:#clannies: {
  var %i = 1
  while (%i <= $ini(matches.ini,0) ) {
    msg $chan Team $readini(matches.ini,$ini(matches.ini,%i),clan) Wants to play at $readini(matches.ini,$ini(matches.ini,%i),time) $+ . Contact $readini(matches.ini,$ini(matches.ini,%i),admin)
    inc %i
  }
}


on 1:TEXT:!foundgame:#clannies:{
  if ($readini(matches.ini,$nick,admin)) {
    remini matches.ini $nick
    notice $nick Your game has been removed from the Bot.
  }
  else {
    notice $nick You don't have a game on the bot.
  }
}


on 1:TEXT:!reset:#clannies: {
  if ($nick isop $chan) {
    remove matches.ini
  }
}