Stuff

on *:OPEN:?: {
  msg $nick ( Prive Blocker - Even geduld alstublieft tot u geaccepteerd word \*/ Please Be Patient until your accepted )
  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 ( Jou prive bericht is geaccepteerd \*/ Your prive message is accepted )
    window -a $2
  }
  if ( %acc == $no ) {
    msg $2 ( Jou prive bericht is niet geaccepteerd, gaarne permissie te vragen \*/ Your prive message is declined, ask permission first )
    window -c $2
  }
  unset %acc
}