on *:TEXT:!setgreet*:#:{
 set %greet [ $+ [ $nick ] ] $2-
notice $nick your greet has been changed to %greet[ $+ [ $nick ] ]
 }
on *:JOIN:#:{
 msg $chan %greet [ $+ [ $nick ] ] 
}