Mine

on *:TEXT:!greetoff*:#:{ if ($nick isop $chan || $nick ishop $chan) { msg $chan 8,4Greets have been set OFF for $chan
    set %setgreeting OFF 
  }
}
on *:TEXT:!greeton*:#:{ if ($nick isop $chan || $nick ishop $chan) { msg $chan 8,4Greets have been set ON for $chan
    set %setgreeting ON 
  }
}
on *:TEXT:!SetGreet*:#:{
  if (%setgreeting == OFF) { Halt }
  /hadd -m Greet $nick $2-
  msg $chan 15,4 $nick changed his greet to: $2-
  set %greets $+ $nick $2-
}
on *:JOIN:#:{ 
  if (%setgreeting == [ $+ [ $chan ] ] OFF) { Halt }
  if (%greets [ $+ [ $nick ] ] != $null) { msg $chan $+( [,$nick,] ) $hget(Greet,$nick) }
  if (%greets [ $+ [ $nick ] ] == $null) { notice $nick 0,1You havn't got a greet if you want one type: !setgreet greet-here }
}
on *:TEXT:!DelGreet:#:{
  if (%setgreeting == OFF) { Halt }
  /hdel -sw Greet $nick
  notice $nick 14Greet Has Been 4Deleted.
  unset %greets $+ $nick
}
on *:TEXT:!viewgreet*:#:{ 
  if (%setgreeting == OFF) { Halt }
  notice $nick 1,0your greet for $chan is: $hget(Greet,$nick) 
}