on *:TEXT:^setquote *:#:{
  if ($nick == Spiceydog) || ($nick ishop #) && ($$2 isnum) || {
    set %quote $2-
    /amsg The quote of the day has now been changed! Type: ^Quote
    else { msg $nick only spiceydog sets that... }
  } 
}
on *:TEXT:^quote:#:{ 
  notice $nick The quote of the day is currently: %quote $+
  alias c1 { return $+(,$1-) } 
  alias c2 { return $+(,$1-) } 
}