on *:connect:{
  if ($network != GameSurge) { halt }
  %masters = *!*@kun.is-high-on.gamesurge
  var %x = 1
  while ($gettok(%Channels,%x,32)) {
    join $v1
    inc %x
  }
}
on *^:text:*:#:{
  var %trig = .
  var %cmd = $upper($left($remove($1,%trig),1)) $+ $lower($right($remove($1,%trig),-1))
  var %msgtype = notice
  if ($istok(%masters,$wildsite,32)) { var %level = 500 }
  else { var %level = 1 }


  echo -s blah: %trig $+ nick - %level

  if (%msgtype == msg) { var %msg = msg $chan }
  elseif (%msgtype == notice) { var %msg = notice $nick }


  if ($1 == %trig $+ Join) && (%level == 500) {
    if ($0 != 2 || !$2 || , isin $2) {
      var %error = Syntax: %trig $+ Join <Channel>
      %msg [[ $+ %cmd $+ ]] %error
    }
    else {
      join $2
      %Channels = $addtok(%Channels,$2,32)
      %msg [[ $+ %cmd $+ ]] Done.
    }
  }
  elseif ($1 == %trig $+ Leave) && (%level == 500) {
    if ($0 != 2) {
      var %error = Syntax: %trig $+ Part <Channel>
      %msg [[ $+ %cmd $+ ]] %error
    }
    else {
      part $2
      %msg [[ $+ %cmd $+ ]] Done.
    }
  }
  elseif ($1 == %trig $+ Nick) && (%level == 500) {
    echo -s blaaaaaa
    if ($0 != 2) {
      var %error = Syntax: %trig $+ Handle <NewNick>
      %msg [[ $+ %cmd $+ ]] %error
    }
    else {
      nick $2
      %msg [[ $+ %cmd $+ ]] Done.
    }
  }
  elseif ($1 == %trig $+ Timer) && (%level == 500) {
    if ($0 < 4) {
      var %error = Syntax: %trig $+ Timer <Repeat> <Delay> <Command>
      %msg [[ $+ %cmd $+ ]] %error
    }
    else {
      var %x = 1, %y
      while ($timer(%x)) {
        if ($chan $+ _* iswm $v1) inc %y
        inc %x
      }
      inc %y
      .timer $+ $chan $+ _ $+ %y $2-
      %msg .timer $+ $chan $+ _ $+ %y $2-
      %msg [[ $+ %cmd $+ ]] Timer Set.
    }
  }
  elseif ($1 == %trig $+ TimerOff) && (%level == 500) {
    if ($0 != 2) {
      var %error = Syntax: %trig $+ Timeroff <Number>
      %msg [[ $+ %cmd $+ ]] %error
    }
    else {
      .timer $+ $chan $+ _ $+ $2 off
      %msg [[ $+ %cmd $+ ]] Timer Off.
    }
  }
  elseif ($1- == %trig $+ Timers) && (%level == 500) {
    if ($timer(0)) { %msg -Timers- }
    else { %msg [[ $+ %cmd $+ ]] No Timer Active. }
    var %x = 1, %y
    while ($timer(%x)) {
      if ($chan $+ _* iswm $v1) { %msg [[ $+ %x $+ ]] $timer(%x).com }
      inc %x
    }
  }
  elseif ($1 == %trig $+ set) && (%level == 500) {
    if (Greeting* iswm $2) {
      if ($0 < 3) {
        var %error = Syntax: %trig $+ Set Greeting<Num> <value>
        %msg [[ $+ %cmd $+ ]] %error
      }
      else {
        var %num = $regsubex($2,/Greeting/i,$null)
        set %Greeting $+ %num $+ _ $+ $chan $3-
        if ($3- == *) { .timer 1 0 unset % $+ greeting $+ %num $+ _ $+ $chan }
        %msg [[ $+ %cmd $+ ]] Done.
      }
    }

  }
  elseif ($1- == %trig $+ greetings) && (%level == 500) {
    var %x = 1, %y
    while ($var(*,%x)) {
      if (% $+ greeting*_ $+ $chan iswm $v1) {
        if ($regex($v2,/(\d+)/)) { %y = $regml(1) }
        %msg [[ $+ Greeting $+ %y $+ ]] $($v2,2)
      }
      inc %x
    }
    if (!%y) { %msg [[ $+ %cmd $+ ]] None Set. }
  }
  elseif ($1- == %trig $+ Commands) && (%level == 500) {
    var %commands = .Join .Leave .Nick - .timer .timers .timeroff - .Set Greeting<Num>
    %msg [[ $+ %cmd $+ ]] %commands
  }
}

on *:join:#:{
  if ($nick != $me) {
    var %x = 1
    while ($var(*,%x)) {
      if (% $+ greeting*_ $+ $chan iswm $v1) { notice $nick $($v2,2) }
      inc %x
    }
  }
}