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*:#:{ 
  set %greet [ $+ [ $chan ] ] $2-
  msg $chan $nick has changed his greet to: $2-
}
on *:JOIN:#:{ if (%setgreeting == OFF) { Halt } && (%greet [ $+ [ $chan ] ] == $null) { Halt } 
  msg $chan $+( [,$nick,] ) %greet [ $+ [ $chan ] ] $+ .
}
on *:TEXT:!viewgreet*:#:{ 
  notice $nick 1,0your greet for $chan is: %greet [ $+ [ $chan ] ] $+ .
}