Mine

on *:START:{ 
  /if (!$hget(greet)) { /hmake greet } 
  /if ($exists(greet.hsh)) { /hload greet greet.hsh } 
} 
on *:EXIT:{ 
  /hsave greet greet.hsh 
} 
on *:TEXT:!greet*:#:{ 
  /if ($1 == !greet) { 
    /if ($2-) { 
      /if (!$hget(greet,$address($nick,2))) { 
        /hadd greet $address($nick,2) $2- 
        /.notice $nick Greet message changed to: $2- 
      } 
      /elseif ($hget(greet,$address($nick,2))) { 
        /hdel greet $address($nick,2) 
        /hadd greet $address($nick,2) $2- 
        /.notice $nick Greet message changed to: $2- 
      } 
    } 
    /elseif (!$2-) { 
      /if ($hget(greet,$address($nick,2))) { 
        /hdel greet $address($nick,2) 
        /.notice $nick Greet message deleted 
      } 
    } 
  } 
} 
on *:JOIN:#:{ 
  /if ($hget(greet,$address($nick,2))) { 
    /msg $chan ( $+ $nick $+ ) $hget(greet,$address($nick,2))) 
  } 
}