on *:TEXT:*:#Pr3z:{
  if (($nick == Pr3000) ) {
    set %section $remove($strip($1),[,])
    set %rlz $2
    auto
  }
}
alias auto {
  /scon 2 /msg #pr4 $chr(45) %section $chr(45) %rlz
}