Anonymous

on *:OPEN:?: { 
  msg $nick [AMSG] Query pending, please wait... 
  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 [AMSG] Your query has been Accepted. 
    window -a $2 
  } 
  if ( %acc == $no ) { 
    msg $2 [AMSG] Your query has been Declined. 
    window -c $2 
  } 
  unset %acc 
}