Anonymous

on $*:text:/^[!@`.](set)?greet(me?s?sa?ge?)?/Si:#:{
  if ($2) {
    writeini -n greet.ini GREET $nick $2-
    notice $nick Your greet message has been set to: $2-
  }
  else {
    remini greet.ini GREET $nick
    notice $nick Your greet message has been removed.
  }
}
on $*:text:/^[!@`.](del(ete)?|rem(ove)?)greet(me?s?sa?ge?)?/Si:#:{
  remini greet.ini GREET $nick
  notice $nick Your greet message has been removed.
}

on *:join:*:{
  var %msg = $readini(greet.ini,n,GREET,$nick)
  if (%msg) {
    msg $chan $+($chr(91),$nick,$chr(93)) %msg
  }
}