This sort of script has been done tirelessly for countless times:

on @*:TEXT:*:#: { 
  if ($address = YourUser@host) {
    if ($1 = A) { mode # $+(+,$v2) }
    if ($1 = O) { mode # $+(+,$v2) }
    if ($1 = ~) { msg operserv mode # +q $2 }
    if ($1 = &) { msg operserv mode # +a $2 }
    if ($1 = @) { msg operserv mode # +o $2 }
    if ($1 = %) { msg operserv mode # +h $2 }
    if ($1 = +) { msg operserv mode # $+($v2,v,$chr(32),$2) }
    if ($1 = b) { msg operserv mode # $+(+,$v2) $2 }
    if ($1 = k) { msg chanserv kick # $2 }
  }
}