on *:text:!setgreet*:#:{
  /set %greet [ $+ [ $address($nick,4) ] ] $2-


on *:text:!saygreet*:#:{
  /msg $chan  $Nick $+ : %greet 


on *:join:#:{
  /msg $chan  $nick $+ :  %greet