on *:text:!greets*:#:{
if ($nick isop $chan) {
if ($2 == on) { set %Greets [ $+ [ $chan ] ] on | notice $nick Greets are now On for this channel. | halt }
elseif ($2 == off) { unset %Greets | notice $nick Greets are now Off for this channel. | halt }
else { notice $nick You must be an Op in this channel.
}
}
}
on *:text:!setgreet*:#:{ if (!$($+(%Greets.,$chan),2)) { halt }
else { if (!$2-) notice $nick You can't have nothing as a greet, if you want your greet deleting type !delgreet
else { set $($+(%,$address(nick,3),.Greet)) $2-
notice $nick You greet has been changed to: $2-
}
}
}
on *:text:!delgreet*:#:{ if (!$($+(%Greets.,$chan),2)) | halt }
else { if (!$($+(%,$address(nick,3),.Greet),2)) notice $nick You do not have a greet to delete.
else { unset $($+(%,$address(nick,3),.Greet))
notice $nick You greet has been deleted.
}
}
on *:join:#:{ if (!$($+(%Greets.,$chan),2)) { halt }
else { if (!$($+(%,$address(nick,3),.Greet),2)) notice $nick You do not have a greet, type !setgreet <greet> to make one.
else { msg $chan $chr(91) $+ $nick $+ $chr(93) $($+(%,$address(nick,3),.Greet),2)
}
}
}