Anonymous

on *:TEXT:*:*: {
  if ($left($1,1) !isin @!.) halt
  if ($chan == #[tdw] || $chan == #^destany^) {
    if ($nick !isreg $chan) {
      if ($right($1,-1) == banditos) var %style = banditosevent
      elseif ($right($1,-1) == kq) var %style = kqevent
      elseif ($right($1,-1) == site) var %style = forum
      elseif ($right($1,-1) == runescape) var %style = runescape
      elseif ($right($1,-1) == runehq) var %style = runehq
      elseif ($right($1,-1) == runeheadquorters) var %style = runehq
      elseif ($right($1,-1) == commands) var %style = commands
      elseif ($right($1,-1) == command) var %style = commands
      elseif ($right($1,-1) == setgreet) var %style = greet
    }
  }
  if ($nick isop #[tdw] || $nick ishop #[tdw]) {
    if ($right($1,-1) == set) var %style = setevent
  }
  if (%style == greet) { hadd greet $nick $2- | notice $nick your Greet is set as: $hget(greet,$nick)
    hsave -o greet greet.htb
  }
  if (%style == commands) { msg $nick The commands are:
    msg $nick !site - Gives the link to the 7TDW Site
    timer 1 1 msg $nick !runescape - Gives the link to the 7RuneScape Site
    timer 1 1 msg $nick !runehq - Gives the link to the 7Rune Head Quorters Site
    timer 1 1 msg $nick !kq - displays the next 7Kalphite Queen event.
    timer 1 1 msg $nick !Banditos - displays the next 7Bandos event.
  }
  if (%style == banditosevent) { notice $nick The next 4Bandos Event is: $iif(%banditoes,%banditoes,None Set at this time)
  }
  if (%style == kqevent) { notice $nick The next 4Kalphite Queen Event is: $iif(%kalphite,%kalphite,None Set at this time)
  }
  if (%style == forum) { notice $nick 7The Destiny Warriors website can be found at: 4http://z4.invisionfree.com/TheDestinyWarriors/index.php?act=idx
  }
  if (%style == runescape) { notice $nick The 7RuneScape website can be found at: 4www.runescape.come
  }
  if (%style == runehq) { notice $nick The 7Runeheadquorters site can be found at: 4www.runehq.com
  }
  if (%style == setevent) {
    if ($2 == bandos) { set %banditoes $3- | notice $nick the 4Bandos event is set as:6 %banditoes 
      /close -m $nick
    }
    elseif ($2 == kq) { set %kalphite $3- | notice $nick the 4Kalphite Queen event is set as:6 %kalphite 
      /close -m $nick
    }
    else { notice $nick please either choose bandos or kq as the event you are setting. Thank you.
    }
  }
}
on *:JOIN:#[tdw]: {
  if ($isfile(greet.htb)) hload greet greet.htb
  if ($hget(greet,$nick)) { msg $chan $hget(greet,$nick)
  }
}