on *:TEXT:!setgreet*:#:{
if ($2 == off) {
write -ds $+ $address($nick,3) "c:/mircsaves/greets.txt"
write "c:/mircsaves/greets.txt" $address($nick,3) off
notice $nick [GREET] You have disabled your greet. To enable it, type !setgreet TEXT.
halt
}
if ($2 == $null) {
notice $nick [GREET] Error! You have to enter a valid text!
}
else {
write -ds $+ $address($nick,3) "c:/mircsaves/greets.txt"
write "c:/mircsaves/greets.txt" $address($nick,3) $2-
notice $nick [GREET] You have changed your greet into:
notice $nick $read("c:/mircsaves/greets.txt", s, $address($nick,3)) $+ .
}
}
on *:JOIN:#:{
if ($read("c:/mircsaves/greets.txt", s, $address($nick,3)) == off) {
halt
}
elseif ($read("c:/mircsaves/greets.txt", s, $address($nick,3)) == $null) {
notice $nick [GREET] You haven't set a greet yet! Type !setgreet TEXT to set a greet, or !setgreet OFF to
disable this message without setting a greet.
}
elseif ($read("c:/mircsaves/greets.txt", s, $address($nick,3)) != $null) {
msg $chan [ $+ $nick $+ ]: $read("c:/mircsaves/greets.txt", s, $address($nick,3))
}
}