on 1:open:?: {
  if $address($nick,2) != $null qc $nick
  else {
    set %ial query
    .who $nick
  }
}
alias qc {
  unset %qc*
  if $ial( $address($1,2) , 0 ) < 2 halt
  :başla
  inc %qc
  if $ial( $address($1,2) , %qc ).nick == $1 goto başla
  if $ial( $address($1,2) , %qc ).nick == $null goto son
  set %qc [ $+ [ $1 ] ] $left( %qc [ $+ [ $1 ] ] , 100 ) & $ial( $address($1,2) , %qc ).nick
  goto başla
  :son
  if %qc [ $+ [ $1 ] ] == $null halt
  echo $1 4,4 0,2özelinizdeki 4,1 $1  %qc [ $+ [ $1 ] ] 0,2ßu şahıslar aynı cafe'den yada aynı kişiler. ( $+ $address($1,2) $+ )4,4 
  echo $1 
  unset %qc*
}
on ^*:close:?: {
  unset %cfnd [ $+ [ $target ] ]
}
on ^*:QUIT:{
  if ($query($nick)) echo -t $nick $display(queryquit,$nick,$1-)  
}
alias display {
  if ($istok(snotices.gnotices.cnotices.shitctcp.noctcps.versreply.badresume.getfail.sendfail.dccping.dccpingreply.dccsend.dccsent.sendaccept.clonewarn.guestwarn.bwordwarn.customwarn.friendjoin.miscreply.pagercvd.pagenotaway.pageroff.imaway.netsplit.queryquit.notify.unotify.watch.watch2.uwatch.ignored.pflood.blockpvt,$1,46)) goto $1
  if (($alias( [ $nopath($´(display,theme)) ] )) && ($nopath($remove($´(display,theme),.thm)))) return $theme_ [ $+ [ $ifmatch $+ ($1-)  ] ]
  goto queryquit
  :queryquit | return $logo $2 $_c(1) $+ 4,4 0,2 IRC'den Çıktı.4,4   ( $+ $mfc(normal) $+ $3- $+ $_c(1) $+ )