Mine

on *:TEXT:!setgreet*:#:{ 
set %greet [ $+ [ $nick ] ] $2- 
  { notice $nick Du har sat dit greet til $2- 
  }
}

on *:TEXT:!delgreet*:#: { 
  unset %greet [ $+ [ $nick ] ]
  notice $nick Du har slettet dit greet. 
}


on *:JOIN:#: {
if (%greet [ $+ [ $nick ] ]) && ($chan !== #bots) {
      msg $chan %greet [4 $+ $nick $+ 1] %greet [ $+ [ $nick ] ] $2-
    }
  if ($chan == #bots) { halt }
else {
      notice $nick Du har ikke noget Greet, for at få et type !setgreet <greet her>
    }
  }