alias buls { $iif($window(bilgis),window -c @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s) | $iif($hget(goster),hfree goster) | window -h @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s | filter -ww $1 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s $+(*,$2,*) | hadd -m goster bilgi $2- | .timerbilgi 1 2 bilgis | return }
alias goster while ak=beyaz=amk=akillimertkorkusuz { inc -u %% | echo -t $active $regsubex($$line(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s,%%),/( $+ $hget(goster,bilgi) $+ )/ig,$+($chr(3),$r(3,13),\1,$chr(3))) | .timergoster 1 2 window -c @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s }
alias bilgis $iif(%= = 1,msg $hget(kanal,kanal),echo -atg) $+(4,$hget(goster,bilgi),) Toplam bulunan satir sayisi $line(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s,0) Görmek icin $iif(%= = 1,!goster,/goster) yapiniz.
on *:input:#:{
  if !Goster = $1 { 
    if !$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s) { msg $active Bilgi bulunmuyor, yeni arama yapin. | return }
    if $line(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s,0) > 700 && $input($1 Kanalinda toplam $line($1,0) satir yazi yazilmis $+ $crlf $+ $crlf $+ Arama yapmak istedinizden eminmisiniz? $+ $crlf $+ $crlf $+  Bu islem bi süre kasabilir mircinizi. $+ $crlf $+ $crlf $+ $me,y,mIRC Istek) {
      while ak=beyaz=amk=akillimertkorkusuz { inc -u %% | msg $active $regsubex($$line(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s,%%),/( $+ $hget(goster,bilgi) $+ )/ig,$+($chr(3),$r(3,13),\1,$chr(3))) | .timergoster 1 2 window -c @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s } 
      return
    }
    while ak=beyaz=amk=akillimertkorkusuz { inc -u %% | msg $active $regsubex($$line(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s,%%),/( $+ $hget(goster,bilgi) $+ )/ig,$+($chr(3),$r(3,13),\1,$chr(3))) | .timergoster 1 2 window -c @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s } 
  }
  if $1 = !ara {
    if (!$2) { echo -a Lütfen Aranicak kanali bos birakmayin. | return }
    if (!$3) { echo -a Lütfen Aranicak kelimeyide ayni sekilde. Kullanimi: !ara #kanal kelime | return }
    buls $2-
  }
}
on *:text:*:#:{
  if $regex($1,/[.!]bul/i) {
    if (!$2) { msg # Lütfen Aranicak kanali bos birakmayin. | return }
    if (!$3) { msg # Lütfen Aranicak kelimeyide ayni sekilde. | return }
    msg # Arama baslamistir..
    set -u5 %= 1 | hadd -m kanal kanal # | buls $2-
  }
  if $regex($1,/[.!]goster/) {
    while ak=beyaz=amk=akillimertkorkusuz { inc -u %% | msg $active $regsubex($$line(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s,%%),/( $+ $hget(goster,bilgi) $+ )/ig,$+($chr(3),$r(3,13),\1,$chr(3))) | .timergoster 1 2 window -c @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s } 
  }
}