on *:TEXT:!setgreet*:#: { 
  set %greet [ $+ [ $nick ] ] $2- 
  notice $nick Your greet message has been set to: $2- 
} 

on *:TEXT:!delgreet*:#: { 
  unset %greet [ $+ [ $nick ] ] 
  notice $nick Your greet has been deleted 
} 

on *:JOIN:#: { 
  if (%greet [ $+ [ $nick ] ]) msg $chan [ $+ 4 $nick  $+ ]: %greet [ $+ [ $nick ] ] 
  else notice $chan 0You dont have a greet type !setgreet -greet- to set one 
  else notice $chan 8to get red of  your old greet type `delgreet
} 
