Tekil Mesaj gösterimi
Alt 01 Temmuz 2015, 16:09   #10
Çevrimdışı
IrCbaStarD
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Arkadaşlar @bankick ayrı pencere yardım




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
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 } } }

/buls #kanal kelime
Kendin kullanmak icin: !ara #kanal #kelime
Baskasinin kullanimi: !bul #kanal #kelime
kanali belirtmelisin.

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet sohbet