on *:TEXT:!Register:#: {
  if ($readini(username.ini, Nicks, $nick) == $address) {
    notice $nick 4Error, this username is already registered!
    halt
  }
  else {
    writeini username.ini Nicks $nick $address
    writeini username.ini Join $nick 4Error: No join message set! Please use !setjoin to create one! Your join message is the message displayed once you join $chan! Type !setjoin
    notice $nick 9You have been registered! Please use !setjoin for more commands.
    auser R $nick
  }
}

on R:TEXT:!Setjoin *:#: {
  if ($readini(username.ini, Nicks, $nick) == $address) {
    writeini username.ini Join $nick $2-
    notice $nick 9Your join message is4 " $2- "!
  }
  else {
    notice $nick 4Error: You are not registered!
  }
}

on A:INPUT:#: {
  if ($1 == !op) { cs aop # ADD $2 | kick $active $2 | auser O }
  if ($1 == !deop) { cs aop # DEL $2 | kick $active $2 }
  if ($1 == !hop) { cs hop # ADD $2 | kick $active $2 }
  if ($1 == !dehop) { cs hop # DEL $2 | kick $active $2 }
  if ($1 == !kick) { kick $active $2 }
  if ($1 == !ban) { ban $active $address($2,2) }
  if ($1 == !kb) { ban $active $2 | kick $active $2 }
  if ($1 == !unban) { mode $active -b $address($2,2) }
  if ($1 == !voice) { mode $active +v $2 }
  if ($1 == !devoice) { mode $active -v $2 }
}

on *:TEXT:!start*:#:{
  /enable #game
  /set %game on
  /set %guess $rand(1,100)
  /msg $chan 11The higher/lower Is On Type !guess <number> To play. All Numbers Are Between 1 And 100.
  if (%game == on) { msg $chan 4Error! Low High game is already started! }

}
#game on
on *:TEXT:!guess*:#:{
  if ( $2 < %guess ) msg $chan  7Too Low, Please try A higher number!
  elseif ( $2 > %guess ) msg $chan 7Too High, Please try A Lower number!
  elseif ( $2 == %guess ) { msg $chan 9Correct! %guess was the correct number! $nick wins!
    unset %game
    unset %guess
    disable #game
  }
}
#game end
on *:TEXT:!stop*:#:{
  /msg $chan 1H14igher/Lower Game Has Been Stopped By $nick
  /disable #game
  /unset %guess
}

on *:TEXT:*:#: {
  if (%rps == on) {
    if ($1 == !rock) || ($1 == !paper) || ($1 == scissors) {
      set %answer $rand(1,3)
      set %attack $1
      if (%check == %answer) { set %result Draw }
      if (%attack == !rock) && (%answer == 2) { set %result You Lose }
      if (%attack == !rock) && (%answer == 3) { set %result You Win }
      if (%attack == !paper) && (%answer == 1) { set %result You Win }
      if (%attack == !paper) && (%answer == 3) { set %result You Lose }
      if (%attack == !scissors) && (%answer == 1) { set %result You Lose }
      if (%attack == !scissors) && (%answer == 2) { set %result You Win }
      if (%answer == 1) { set %botattack Rock }
      if (%answer == 2) { set %botattack Paper }
      if (%answer == 3) { set %botattack Scissors }
      if (%attack == !rock) { set %check 1 }
      if (%attack == !paper) { set %check 2 }
      if (%attack == !scissors) { set %check 3 }
      .timer 1 0.1 msg $chan 7Bot chooses %botattack $+ ! %result $+ !
    }
  }
}


alias enable {
  set %rps on
}

alias disable {
  set %rps off
}

on A:TEXT:!*:#: {
  if ($1 == !op) { cs aop # ADD $2 | kick $active $2 }
  if ($1 == !deop) { cs aop # DEL $2 | kick $active $2 }
  if ($1 == !hop) { cs hop # ADD $2 | kick $active $2 }
  if ($1 == !dehop) { cs hop # DEL $2 | kick $active $2 }
  if ($1 == !kick) { kick $active $2 }
  if ($1 == !ban) { ban $active $address($2,2) }
  if ($1 == !kb) { ban $active $2 | kick $active $2 }
  if ($1 == !unban) { mode $active -b $address($2,2) }
  if ($1 == !voice) { mode $active +v $2 }
  if ($1 == !devoice) { mode $active -v $2 }
}

on *:Join:#TD: {
  msg $chan 9 $+ $nick has joined $chan! Type !help for more information!
}

on *:Join:#TD: {