This better work.

on *:OPEN:?: { 
  msg $nick ( [PM Blocker] You do not have authorization to talk to me. Please wait for authentication, or if rejected, leave me alone. )  
  timer 1 0 acceptq $timestamp $nick 

} 
alias acceptq { 
  set %acc $input( $1 will you accept a query from $+($2,?),yqdv,Accept Query ) 
  acceptqcheck $1 $2 
} 
alias acceptqcheck { 
  if ( %acc == $yes ) { 
    msg $2 ( Authentication confirmed, you may now speak with me. ) 
    window -a $2 
  } 
  if ( %acc == $no ) { 
    msg $2 ( Authentication rejected, it seems I do not wish to speak with you. ) 
    window -c $2 
  } 
  unset %acc 
}