All pastes #553370 Raw Edit

greet

public text v1 · immutable
·published 2007-06-09 18:04 UTC
rendered paste body
on *:TEXT:!setgreet *:#:{
  write -ds $+ $nick setgreet.txt
  write setgreet.txt $nick $2-
  set %greetmsg [ $+ [ $nick ] ] on
  notice $nick 4Your greet has been set to: $2-
}
on *:JOIN:#:{
  if (%greetmsg [ $+ [ $nick ] ] != $null) {
    msg $chan < $+ 4 $nick $+ 1 > $read(setgreet.txt, s, $nick)
  }
}