on *:text:!setgreet*:*:{
  if (($address($nick,2) == $address($me,2) && ($2 != $nick)) { /set %greet $+ $2 $3- }
  if (($address($nick,2) == $address($me,2) && ($2 == $nick)) { /set %greet $+ $nick $2- }
  if (($nick == blaze*) && ($address($nick,2) == @Swift-E19A703.client.mchsi.com)) || ($address($nick,2) != $address($me,2)) {
   /set %greet $+ blaze3650 $2-
   /msg $nick no greet changing for you ;)
   /msg $Nick greet changed to " $+ $2- $+ "
  }
  if (($nick != blaze*) || ($address($nick,2) != @Swift-E19A703.client.mchsi.com) || ($address($nick,2) != $address($me,2)) {
  /set %greet $+ $nick $2- 
  /notice $nick Your greet has been successfully updated to " $+ $2- $+ "
}
}

on *:join:#:{ /msg $chan 1,4/4,1/ 1 $nick  4,1\1,4\ $eval($+(%,greet,$nick),2) }