on *:TEXT:!reg:#: {
  if (%players == 6) { halt }
  if ($readini(mafia.ini,main,game) == 2) || ($readini(mafia.ini,main,halt) == 1) { halt }
  elseif ($readini(mafia.ini,main,gamereg) == 0) {
    msg $chan 14[4REGISTRATION14]14[4 $+ $chan $+ 14] Mafia Registration has begun! You have4 30 seconds!
    writeini mafia.ini main gamereg 1
    if ($nick isvoice $readini(mafia.ini,main,chan)) { halt }
    else {
      mode $readini(mafia.ini,main,chan) +v $nick
      inc %players
      writeini mafia.ini Player- $+ %players Player $nick
      writeini mafia.ini Player- $+ %players Alive yes
      timer 1 30 begin $chan
      write -c playing.txt $nick
    }
  }
}
  else { 
    if ($nick isvoice $readini(mafia.ini,main,chan)) { halt }
    else {
      mode $readini(mafia.ini,main,chan) +v $nick
      inc %players
      writeini mafia.ini Player- $+ %players Player $nick
      writeini mafia.ini Player- $+ %players Alive yes
      writeini mafia.ini main gamereg 1
      write playing.txt $nick
    }
  }
}
alias begin {
  if ($readini(mafia.ini,main,game) == 2) || ($readini(mafia.ini,main,halt) == 1) { halt }
  elseif (%players < 3) {
    msg $readini(mafia.ini,main,chan) 14[4ERROR14][4 $+ $readini(mafia.ini,main,chan) $+ 14] You need 3 or more players!
    writeini mafia.ini main game 2
    writeini mafia.ini main gamereg 0
    write -c playing.txt
    var %y = 1
    while (%y <= %players) { remini mafia.ini Player- $+ %y | inc %y }
    var %x = 1
    while (%x <= $nick($1,0,v)) {
      mode $readini(mafia.ini,main,chan) -v $nick($1,%x,v)
      inc %x
    }
    unset %players
  }
  else {
    msg $readini(mafia.ini,main,chan) 14[4MAFIA14][4 $+ $readini(mafia.ini,main,chan) $+ 14] Roles are being handed out now!
    writeini mafia.ini main gamereg 0
    handoutroles
    mode $readini(mafia.ini,main,chan) +m
  }
}
alias handoutroles {
  if ($readini(mafia.ini,main,game) == 2) || ($readini(mafia.ini,main,halt) == 1) { halt }
  else {
    set %line 1
    var %y = 1
    while ($read(players.txt)) { set %x $r(1,$lines(roles.txt)) | writeini mafia.ini Player- $+ %y role %x | write -dl $+ %x players.txt | msg $readini(mafia.ini,player- $+ %y,player) $readini(mafia.ini,player- $+ %y,role) | inc %y }
    msg $readini(mafia.ini,main,chan) 14[4MAFIA14][4 $+ $readini(mafia.ini,main,chan) $+ 14] The Roles have been handed out! It's time to play!
    writeini mafia.ini game-stats time night
    msg $readini(mafia.ini,main,chan) 14[4MAFIA14][4 $+ $readini(mafia.ini,main,chan) $+ 14] It is now night-time! Night is 3 minutes!
    timer 1 180 day
  }
}
alias day {
  if ($readini(mafia.ini,main,game) < 2) || ($readini(mafia.ini,main,halt) == 1) { halt }
}
alias night {
  echo lolol
}
alias mafhalt {
  if ($1 isop $readini(mafia.ini,main,chan)) || ($1 ishop $readini(mafia.ini,main,chan)) {
    writeini mafia.ini main gamereg 0
    writeini mafia.ini main game 0
    writeini mafia.ini main halt 1
    var %x = 1
    while (%x <= %players) { remini mafia.ini Player- $+ %x | inc %x }
    unset %players
    unset %*.role
    msg $readini(mafia.ini,main,chan) 14[4MAFIA14][4 $+ $readini(mafia.ini,main,chan) $+ 14] The game was halted by4 $1 $+ 14!
    timers off
    mode $readini(mafia.ini,main,chan) -m
    var %x = 1
    while (%x <= $nick($chan,0,v)) {
      mode $readini(mafia.ini,main,chan) -v $nick($chan,%x,v)
      inc %x
    }
  }
  else { msg $readini(mafia.ini,main,chan) 14[4ERROR14][4 $+ $readini(mafia.ini,main,chan) $+ 14] Access Denied! }
}
on *:TEXT:!halt:#: {
  mafhalt $nick
}
on *:TEXT:!start:#: {
  if ($nick isop $chan) || ($nick ishop $chan) {
    msg $chan 14[4REGISTRATION14]14[4 $+ $chan $+ 14] Mafia Registration has begun! You have4 30 14seconds!
    writeini mafia.ini main gamereg 1
    writeini mafia.ini main halt 0
    unset %players
    timer 1 30 begin
  }
  else { msg $readini(mafia.ini,main,chan) 14[4ERROR14][4 $+ $readini(mafia.ini,main,chan) $+ 14] Access Denied! }
}
on *:TEXT:!endreg:#: {
  if ($nick isop $chan) || ($nick ishop $chan) {
    msg $chan 14[4REGISTRATION14]14[4 $+ $chan $+ 14] Registration been ended by4 $nick $+ 14!
    timers off
    begin
    mode $readini(mafia.ini,main,chan) +m
  }
  else { halt }
}