Spam script

on 5:TEXT:!spam*:#: {
  set %spamtext $2-
  if ($2 == stop) {
    timerSpam off
    if (%spam_is_running) msg # Stopping spam.
    set %spam_is_running $false
    halt
  }
  if ($2 == settimer) {
    if (%spam_is_running) {
      msg # Spam is currently running. The timer cannot be changed right now.
      halt
    }
    if (($3 isnum) && ($3 >= 10) && ($3 <= 3600)) {
      set %spam_timer $floor($3)
      msg # Spam timer set to %spam_timer seconds.
      halt
    }
    msg # To set the Spam timer, use "!spam settimer <10-3600>". It is currently set at %spam_timer seconds.
    halt
  }

  if (%spam_is_running) {
    msg # Spam is currently in use. If you wish to stop it, type "!spam stop".
    halt
  }
  elseif ($2 == $null) {
    msg # You can start a spam message by typing "!spam <text>". It will be repeated for eternity every %spam_timer seconds until a mod writes "!spam stop". To change the intervals, type "!spam settimer <10-3600>"
    halt
  }
  set %spam_is_running $true
  timerSpam 0 %spam_timer msg # %spamtext (Mods: "!spam stop" to end this message)
  msg # Alright, I will spam this message every %spam_timer seconds. SeemsGood

}