ON *:TEXT:!SetGreet*:#:{
  if ($2 == $null) { 
    notice $nick 13!SetGreet <Greet Here> 
    halt 
  } 
  if ($read(greet.txt, s, $nick) == $null) { 
    write Greet.Txt $nick $2- 
    notice $nick 10Greet Saved for13 $nick 
    halt 
  } 
  else { 
    write -ds $+ $nick Greet.txt 
    write Greet.Txt $nick $2- 
    notice $nick 10Greet Saved for13 $nick 
  } 
}