on *:open:?:{
  if !$away { 
    if %qblock == on {
      if ($nick isin %qblst.vip) { halt }
      set %query.last $nick
      if %qdialog == yes {
        qblcheck $nick
        write $qbl $nick $+ $chr(149) $+ $time(hh:nn:ss) $+ $chr(149) $+ $1-
        window -h $nick
        .msg $nick $x3(qblock,wmsg)
        qblock2
      }
      else {
        write $qbl $nick $+ $chr(149) $+ $time(hh:nn:ss) $+ $chr(149) $+ $1-
        window -h $nick
        .msg $nick $x3(qblock,wmsg)
        echo $color(info) -ta QBL: %query.last Ozel Gorusme İsteginde Bulundu Kabul Etmek İcin Ctrl+F12 Red Etmek İcin Shift+F12 Tusuna Basin
      }
    }
  }
}