on $*:TEXT:/^[!](\bgreets\b)/Si:#: {
  if ($nick !isop $chan) {
  notice $nick 10Y7ou do 4not7 have the necessary rights to do this! | halt }
  if ($2 == on) {
    if ($($+(%,greets.,$chan),2) == on) {
    notice $nick 10G7reets are already 4on7 for $chan $+ ! | halt }
    /set $($+(%,greets.,$chan)) on {
  notice $nick 10G7reets are now 4on7 for $chan } }
  if ($2 == off) {
    unset $($+(%,greets.,$chan)) {
      notice $nick 10G7reets are now 4off7 for $chan | halt {
      }
    }
  }
}


on $*:TEXT:/^[!](\bsetgreet\b)/Si:#: {
  if ($2- == $null) { notice $nick 10Y7ou can 4not7 have nothing as a greet! Use !delgreet if you want to delete your greet! | halt }
  set $($+(%,greets.,$address($nick,2))) $2- {
  notice $nick 10Y7our greet has been set to 4::: $2- }
}



on *:JOIN:#: {
  if (!$($+(%,greets.,$chan),2)) { halt }
  else {
  msg $chan $chr(91) $+ $nick $+ $chr(93) $($+(%,greets.,$address($nick,2)),2) }
}


on $*:/^[!]bdelgreet/Si:#: {
  if (!$($+(%,greets.,$address($nick,2))),2) {
    notice $nick 10Y7ou do 4not7 have a greet! Type 4!setgreet <greet>7 if you want a greet! 
  }
  else {
    unset $+(%,greet.,$address($nick,2))
    notice $nick 10Y7our greet has been deleted!
  }
}