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 
}