|
Bir kanal'ı takip etmeye ne dersiniz? Tarih: 26 Ekim 2007 Cuma Kod'un amacını açıklamak istiyorum; Bir kanal'ı takibe aldınız diyelim? Bu kod bu kanal'da neleri takip eder? 1- Kanal'da voice/halfop/op veren veya alanları.(Tarihleri dahil) 2- Kanal'da ban atan/atılan veya banı açan/açılan'ları.(Tarihleri dahil) 3- Kanal'da atılan ban sayısını. 4- Kanal'a giren kullanıcı sayısını. 5- Kanal'dan çıkan kullanıcı sayısını. 6- Kanal'da bulunupta IRC'den çıkan sayısını. 7- Kanal'a kaç satır text gönderdildiğini. 8- Kanal'da kimin ne zaman nick değiştiğini.(Tarihleri dahil) 9- Kanal'da ne zaman kim tarafından mod değiştirildiğini.(Tarihleri dahil) Ek özellikler; /kns #kanalismi yazarak kanal'da kimin kaç satır yazı yazdığını, /nik #kanalismi yazarak kanal'da kimin ne zaman nick değiştiğini ve yeni nick'ini, /unbn #kanalismi yazarak kanal'da kim tarafından ne zaman ban açıldığını, /bn #kanalismi yazarak kanal'da kim tarafından, ne zaman ban atıldığını, /md #kanalismi yazarak kanal'da kimin, ne zaman, hangi modu, değiştirdiğini, /yetki #kanalismi yazarak kimin kime ne yetki verdiği, tarihleri ile beraber öğrenebilirsiniz. /sıfırla yazarak tüm kayıtları sıfırlıyabilirsiniz. Kod: alias takip {/takip #kanalismi (Kanal'ı takip'e alır) /rapor #kanalismi (Takip sonuçlarını gösterir) Umarım işinize yarar. |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? mükemmel calışma bende komutları daha pratik kullanayım diye menü ekledim cokgüzel oldu eline koluna saglık meselaşöle bişi daha olsaydı 3 kanal takip ediyorum bunlardan birni listeden cıkarmak istiyorum diger ikisi devam takibe istiyorum olsaydı daha hoş olurdu ama bölede güzel menu status,menubar,channel { .(V)Takip ..Takibe Al Kanalı:.takip #$$?="Takibe Alınacak KanaL" ..Rapor Al Kanaldan:rapor #$$?="Takibe Alınacak KanaL" ..Kim Kac Satır Yazmış:.kns #$$?="KanaL Yazınız" ..Kim Nick Degişmiş ve Yeninicki:.nik #$$?="KanaL Yazınız" ..Kim Ne Zaman Ban Acmış:.unbn #$$?="KanaL Yazınız" ..Kim Ne Zaman Ban Atmış:.bn #$$?="KanaL Yazınız" ..Kim Mode Degişmiş Hangi Modeyle:.md #$$?="KanaL Yazınız" ..Kim Kime Yetki Vermiş Ne Zaman:.yetki #$$?="KanaL Yazınız" ..Takip Raporlarını Sıfırla:.sıfırla } usta ben böle menü ekledim direk kontrol edebiliyorum senden farklı bir ricam şu badnick atma konusunuda bi el at şöyle cok seri bir badncik koruması yaz hem hatasız hemde herkesten önce joini algılayıp atsın kanaldan yapsan yapsan bunu sen yapan ::) ellerine saglık emegi,ne saglık |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? bu unreal için sanırım CR için editlesek olurmu kardeş ? |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? Alıntı:
İlk istediğin için; alias skanal { if $1 { hfree $+(yazı,$1) | hfree $1 | echo -a - $1 kanal'ı için takip sona erdirildi. } } /skanal #kanalismi yaptığın zaman o kanal için takip işlemini durdurur. İkinci isteğin için; Hızlı bir koruma istiyorsan, hash tablosu kullanıcaksın. Yani şöyle birşey; alias ekle { if $1 { if $hmatch(nickler,$1) { echo -at $1 kelimesini zaten eklemişsiniz. | halt } | else { hadd -m nickler $1 | echo -at $1 kelimesi badnick listesine eklendi. } } } on @*:join:#: { var %1 = 1,%2 = $hget(nickler,0).item | while %1 <= %2 { if $+(*,$hget(nickler,%1).item,*) iswm $nick { ban -k # $v2 2 rumuzunuz'da $qt($v1) kelimesi algılandı. } | inc %1 } } Kullanımı; /ekle kelime Yani eklediğin kelimelerden herhangi birisi, kanal'a giriş yapan nick rumuzu içerisinde mevcut ise kanal'dan banlıyacaktır. - eXo, CR için bir değişiklik yapılması gerektiğini düşünmüyorum. Tabiki editliyebilirsin. |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? Çok güzel Bir paylaşım saoalsın işime yaracak çok .. |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? Ellerine sağlık üstad :) işime yarayacak şeyler. Teşekkürler. |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? Hacı bunu beLirLediqim bi kanaLda !takip #kanal !rapor #kanal oLarak nasıL uyquLatırım ? ve tabi diqer isLevLeride aynı kanaL uzerinden ! sistemi oLarak uyquLatıcam ? caLıstım ama basaramadım =p |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? on INPUT kullanmalısın. |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? :) L4roXyL yine yapacagini yapiyor ellerine sagLik |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? güzel bi çaışma ellerine sağlık bunu kanal yansıtsak !takip #kanal olrak bu mümkünmü ? |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? Evet mümkün. Kendin içinse, on INPUT başkaları içinse, on TEXT kullanırsın. Forumda bunları yapabilmenin yolları mevcut. Ararsan, bulursun. |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? /Takip #zurna Takip Modu DevreDışı ! |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? /takip #zurna Takip Modu DevreDışı ! yanlış mı ekledım acaba |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? Sorun düzeldi..Eline sağlık [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] çok güzel bir çalışma |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? İkinci isteğin için; Hızlı bir koruma istiyorsan, hash tablosu kullanıcaksın. Yani şöyle birşey; alias ekle { if $1 { if $hmatch(nickler,$1) { echo -at $1 kelimesini zaten eklemişsiniz. | halt } | else { hadd -m nickler $1 | echo -at $1 kelimesi badnick listesine eklendi. } } } on @*:join:#: { var %1 = 1,%2 = $hget(nickler,0).item | while %1 <= %2 { if $+(*,$hget(nickler,%1).item,*) iswm $nick { ban -k # $v2 2 rumuzunuz'da $qt($v1) kelimesi algılandı. } | inc %1 } } Kullanımı; /ekle kelime Yani eklediğin kelimelerden herhangi birisi, kanal'a giriş yapan nick rumuzu içerisinde mevcut ise kanal'dan banlıyacaktır. - usta burda bu badnickleri nereye kaydediyor yavu aradım aradım bulmadım birde siliniyor eklediklerim şimdi diycen madem silindigini biliyon neden nyerini bulmadın cünkü şundan önce ekledigim birkelimeyi ekliyorum kabul ediyor aynı kelime birdaha deniyorum o anda akli zaten diyor neden acaba başka mesela bu bugün eklemişim bir kac gün sonra bakıyom ekli olanlar siliniyor galiba yanlış bişilermi yapıyorum veya scriptte başka neden böyle oluyordur yardım ve ilgin alakan emeklerin için tşkler |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? Nickler isminde hash tablosuna kaydeder. Silinmemesi için; alias ekle { if $1 { if $hmatch(nickler,$1) { echo -at $1 kelimesini zaten eklemişsiniz. | halt } | else { hadd -m nickler $1 1 | hsave -i nickler nickler.db | echo -at $1 kelimesi badnick listesine eklendi. } } } Kalın olarak gösterdiğim yeri eklediğin zaman, mIRC'in ana klasöründe; nickler.db dosyasına kaydeder kelimeleri. Ek olarak on start event'inde verileri tekrar yüklemen lazım bunun için; on *:start: { hload -i nickler nickler.db } Yapman yeterli olur. |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? üstad son hali bumu bi bakıver ilk verdiginde badnickler diye geciyordu son verdiginde nickler diye kısaltmıştın alias ekle { if $1 { if $hmatch(nickler,$1) { echo -at $1 Kelimesini Zaten Eklemişsiniz. | halt } | else { hadd -m nickler $1 1 | hsave -i nickler nickler.db | echo -at $1 Kelimesi Badnick Listesine Eklendi. } } } on *:join:#: { var %1 = 1,%2 = $hget(nickler,0).item | while %1 <= %2 { if $+(*,$hget(nickler,%1).item,*) iswm $nick { ban -k # $v2 2 KuraL Hatası BaDniCk } | inc %1 } } on *:start: { hload -i nickler nickler.db } birde kalın işaretlememişsin ama son verdigin ekde 1 rakamı vardı şu bölüm else { hadd -m nickler $1 1 | hsave -i nickler nickler.db | ilk verdigin kodda bu 1 yoktu son veridigin kalın olanyerleri ekle dedigin yerde var ama kalın yazılmamış olması gerekiyormu yoksa odamı eklenicek ve mircin ana klasörünün içinde nickler diye tex var bunun veya onun nickler yazan yeri başka bişi yapmamın bir sakıncası varmı ilgin alakan yardımların için tşkler ellerin dert görmesin üstad bu şekilde kodu ekledigimde acılışta şu sorunu veriyor /hload: Böyle bir Tablo yok 'nickler' bitmiş halini kontrol edip verebilirmisin bir yerde hatamı yapıyorum |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? Bak şimdi orada'ki 1 değerinin manası yok. Yani eklenmesi daha iyi ama zaten bizim işimiz ITEM ile. Zaten hash tablosunun mantığı şu oluyor; Kod: ITEMS - DATAon *:start: { if $isfile(nickler.db) { hmake nickler 100 | hload -i nickler nickler.db } | else { hmake nickler 100 | hsave -i nickler nickler.db } } Şeklinde yaparsan hata vermiyecektir. |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? usta tablo sorunu düzeldi bu eklenen badnicklerin scirpti kapatıp tekrar baglandıgında hafızada tutmaması sorunu devam ediyor ekliyom badnicki sunucudan cıkıyorum tekrar giriş yapıyorum eklediklerimi yeniden ekliyorum kısacası siliniyor nedense emegin için tşkler kodun son hali; Kod: on *:start: { if $isfile(knickler.db) { hmake knickler 100 | hload -i knickler knickler.db } | else { hmake knickler 100 | hsave -i knickler knickler.db } } |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? on *:start: { if $isfile(badnickler.db) { hmake badnickler 100 | hload -i badnickler badnickler.db } | else { hmake badnickler 100 | hsave -i badnickler badnickler.db } } alias bekle { if $1 { if $hmatch(badnickler,$1) { echo -at $1 Kelimesini Zaten Eklemişsiniz. | halt } | else { hadd -m badnickler $1 1 | hsave -i badnickler badnickler.db | echo -at $1 Kelimesi Badnick Listesine Eklendi. } } } on *:join:#: { var %1 = 1,%2 = $hget(badnickler,0).item | while %1 <= %2 { if $+(*,$hget(badnickler,%1).item,*) iswm $nick { ban -k # $v2 2 sebeb } | inc %1 } } Bu şekilde düzelttim, sorun olmaz. |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? [ 15: 13 : 51 ] *lez* Kelimesi Badnick Listesine Eklendi. [ 15: 14 : 25 ] *gay* Kelimesi Badnick Listesine Eklendi. [ 15: 14 : 37 ] *lez* Kelimesini Zaten Eklemişsiniz. sunucuda baglıyken ikinci kez eklmeye izin vermiyor zaten eklemişsiniz diyor ama sunucudan cıkıp tekrar girdigimde aynı nicki ekleyebiliyorum yani hafıza tutmuyor cık gir yapınca siliyor ekledikler mesela bak usta [ 15: 17 : 11 ] *gay* Kelimesi Badnick Listesine Eklendi. yeniden eklmek zorunda kaldım böle her girişte tekradan eklenirse bir anlamıda olmuyor ilgi ve alakan emeklerin için tşkler |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? Denedim ve dediğin şekilde bir sorun olmadı. |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? belkide sorun bendedir bilmiyorum yardımların ugraşın için cok teşkkür ederim badnickler diye bir yer acıyor nicki ekleyince yanlız işin garip tarafı boş olması o badnick içinde yok belkide sorun ondandır neyse senide yordum sagolasın |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? Süper Paylaşım Emeğine SağLık... |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? Alıntı:
on *:text:*:#:{ if ($nick == Nick) || ($nick == Nick) || ($nick == Nick) || ($nick == Nick) || ($nick == Nick) || ($nick == Nick) { if ($1 == !takip) /takip $2 if ($1 == !yetki) /yetki $2 if ($1 == !nik) /nik $2 if ($1 == !kns) /kns $2 if ($1 == !bn) /bn $2 if ($1 == !unbn) /unban $2 if ($1 == !md) /md $2 if ($1 == !rapor) /rapor $2 if ($1 == !Sıfırla) /sıfırla } } } alias takip { if !$1 { msg $chan Takip listesine alınacak kanal'ı girmediniz. Kullanım şekli; $+($chr(2),/takip #kanalismi,$chr(2)) | halt } if $hget($1) { msg $chan $+($chr(2),$1,$chr(2)) kanal'ı zaten takip listesinde. | halt } if $me !ison $1 { msg $chan $+($chr(2),$1,$chr(2)) kanalında bulunmuyorsunuz. | halt } else { hmake $1 100 | msg $chan $+($chr(2),$1,$chr(2)) kanal'ı takip listesine eklendi. } } on *:quit: { var %1 = 1,%2 = $comchan($me,0) | while %1 <= %2 { if $hget($comchan($me,%1)) { hinc $v1 $+(ayr,½,$v1) 1 } | inc %1 } } on *:nick: { var %= 1,%& = $comchan($me,0) | while %= <= %& { if $hget($comchan($me,%=)) { var %o = $v1 | hinc $v1 $+(nck,½,$v1) 1 | ekle $+(%o,nick,.txt) | write $+(%o,nick,.txt) Tarih: $+($chr(2),$date - $time,$chr(2)) Nick: $+($chr(2),$nick,$chr(2)) - Yeni nick: $+($chr(2),$newnick) } | inc %= } } on !*:join:#: { if $hget(#) { hinc # $+(grs,½,#) 1 } } on *:part:#: { if $hget(#) { hinc # $+(cks,½,#) 1 } } on *:text:*:#: { if $hget(#) { hinc # $+(yz,½,#) 1 | hinc -m $+(yazı,#) $nick 1 } } on *:ban:#: { if $hget(#) { hinc # $+(ban,½,#) 1 | ekle $+(#,ban,.txt) | write $+(#,ban,.txt) Tarih: $+($chr(2),$date - $time,$chr(2)) Banlıyan: $+($chr(2),$nick,$chr(2)) - Banlanan: $+($chr(2),$banmask,$chr(2)) } } on *:unban:#: { if $hget(#) { hinc # $+(unbn,½,#) 1 | ekle $+(#,unban,.txt) | write $+(#,unban,.txt) Tarih: $+($chr(2),$date - $time,$chr(2)) Ban açan: $+($chr(2),$nick,$chr(2)) - Banı açılan: $+($chr(2),$banmask) } } on *:voice:#: { if $hget(#) { hinc # $+(yetki,½,#) 1 | hinc # $+(vc,½,#) 1 | ekle $+(#,yetkiler,.txt) | write $+(#,yetkiler,.txt) Tarih: $+($chr(2),$date - $time,$chr(2)) Voice veren: $+($chr(2),$nick,$chr(2)) - Voice olan: $+($chr(2),$vnick,$chr(2)) } } on *:op:#: { if $hget(#) { hinc # $+(yetki,½,#) 1 | hinc # $+(op,½,#) 1 | ekle $+(#,yetkiler,.txt) | write $+(#,yetkiler,.txt) Tarih: $+($chr(2),$date - $time,$chr(2)) Op'u veren: $+($chr(2),$nick,$chr(2)) - Op olan: $+($chr(2),$opnick,$chr(2)) } } on *:help:#: { if $hget(#) { hinc # $+(yetki,½,#) 1 | hinc # $+(hlp,½,#) 1 | ekle $+(#,yetkiler,.txt) | write $+(#,yetkiler,.txt) Tarih: $+($chr(2),$date - $time,$chr(2)) Halfop'u veren: $+($chr(2),$nick,$chr(2)) - Halfop olan: $+($chr(2),$hnick,$chr(2)) } } on *:devoice:#: { if $hget(#) { hinc # $+(yetki,½,#) 1 | hinc # $+(devc,½,#) 1 | ekle $+(#,yetkiler,.txt) | write $+(#,yetkiler,.txt) Tarih: $+($chr(2),$date - $time,$chr(2)) Voice'u alan: $+($chr(2),$nick,$chr(2)) - Voice'u alınan: $+($chr(2),$vnick,$chr(2)) } } on *:deop:#: { if $hget(#) { hinc # $+(yetki,½,#) 1 | hinc # $+(deop,½,#) 1 | ekle $+(#,yetkiler,.txt) | write $+(#,yetkiler,.txt) Tarih: $+($chr(2),$date - $time,$chr(2)) Op'u alan: $+($chr(2),$nick,$chr(2)) - Op'u alınan: $+($chr(2),$opnick,$chr(2)) } } on *:dehelp:#: { if $hget(#) { hinc # $+(yetki,½,#) 1 | hinc # $+(dehlp,½,#) 1 | ekle $+(#,yetkiler,.txt) | write $+(#,yetkiler,.txt) Tarih: $+($chr(2),$date - $time,$chr(2)) Halfop'u alan: $+($chr(2),$nick,$chr(2)) - Halfop'u alınan: $+($chr(2),$hnick,$chr(2)) } } on *:mode:#: { if $hget(#) { hinc # $+(md,½,#) 1 | ekle $+(#,mode,.txt) | write $+(#,mode,.txt) Tarih: $+($chr(2),$date - $time,$chr(2)) Mod değişen: $+($chr(2),$nick,$chr(2)) - Değişen mod: $+($chr(2),$1-,$chr(2)) } } alias rapor { if !$1 { msg $chan Rapor alınacak kanal ismini girmediniz. Kullanım şekli; $+($chr(2),/rapor #kanalismi,$chr(2)) | halt } if !$hget($1) { msg $chan $+($chr(2),$1,$chr(2)) kanal'ı takip listesinde değil. | halt } else { msg $chan $+($chr(45),$chr(32),[,$chr(2),$1,$chr(2)) kanal'ı için istatist'likler] - msg $chan - msg $chan - Prefixler $+($chr(40),$iif($hget($1,$+(yetki½,$1)),$+($chr(2 ),$hget($1,$+(yetki½,$1)),$chr(2)),$+($chr(2),0,$c hr(2))),$chr(41)) msg $chan - [Voice: $+($iif($hget($1,$+(vc½,$1)),$+($chr(2),$hget($1,$ +(vc½,$1)),$chr(2)),$+($chr(2),0,$chr(2))),]) - [OP: $+($iif($hget($1,$+(op½,$1)),$+($chr(2),$hget($1,$ +(op½,$1)),$chr(2)),$+($chr(2),0,$chr(2))),]) - [Halfop: $+($iif($hget($1,$+(hlp½,$1)),$+($chr(2),$hget($1, $+(hlp½,$1)),$chr(2)),$+($chr(2),0,$chr(2))),]) msg $chan - [Devoice: $+($iif($hget($1,$+(devc½,$1)),$+($chr(2),$hget($1 ,$+(devc½,$1)),$chr(2)),$+($chr(2),0,$chr(2))),]) - [DEOP: $+($iif($hget($1,$+(deop½,$1)),$+($chr(2),$hget($1 ,$+(deop½,$1)),$chr(2)),$+($chr(2),0,$chr(2))),]) - [Dehalfop: $+($iif($hget($1,$+(dehlp½,$1)),$+($chr(2),$hget($ 1,$+(dehlp½,$1)),$chr(2)),$+($chr(2),0,$chr(2))),]) msg $chan - Kim kime ne zaman ne yetkisi vermiş/almış? Görmek için: $+($chr(2),/yetki $1,$chr(2)) yazınız. msg $chan - msg $chan - Giren kullanıcı sayısı: $iif($hget($1,$+(grs½,$1)),$+($chr(2),$hget($1,$+( grs½,$1))),$+($chr(2),Giren kullanıcı yok.)) msg $chan - Ayrılan kullanıcı sayısı: $iif($hget($1,$+(cks½,$1)),$+($chr(2),$hget($1,$+( cks½,$1))),$+($chr(2),Ayrılan kullanıcı yok.)) msg $chan - Çıkan kullanıcı sayısı: $iif($hget($1,$+(ayr½,$1)),$+($chr(2),$hget($1,$+( ayr½,$1))),$+($chr(2),Çıkan kullanıcı yok.)) msg $chan - Nick değişim sayısı: $iif($hget($1,$+(nck½,$1)),$+($chr(2),$hget($1,$+( nck½,$1)),$chr(32),$chr(2), - (Değişen nick'leri görmek için; $+($chr(2),/nik $1,$chr(2)) yazınız.)),$+($chr(2),Nick değişen yok.)) msg $chan - Atılan ban sayısı: $iif($hget($1,$+(ban½,$1)),$+($chr(2),$hget($1,$+( ban½,$1)),$chr(32),$chr(2), - (Kanal'da kim kime ne zaman ban atmış? Öğrenmek için: $+($chr(2),/bn $1,$chr(2)) yazınız.)),$+($chr(2),Atılan ban yok.)) msg $chan - Yazılan satır miktarı: $iif($hget($1,$+(yz½,$1)),$+($chr(2),$hget($1,$+(y z½,$1)),$chr(32),$chr(2), - (Kanal'da kimin kaç satır cümle kurduğunu görmek için: $+($chr(2),/kns $1,$chr(2)) yazınız.)),$+($chr(2),Herhangi bir yazı yazılmamış.)) msg $chan - Açılan ban sayısı: $iif($hget($1,$+(unbn½,$1)),$+($chr(2),$hget($1,$+ (unbn½,$1)),$chr(32),$chr(2), - (Kanal'da kim ne zaman ban açmış? Öğrenmek için: $+($chr(2),/unbn $1,$chr(2)) yazınız.)),$+($chr(2),Açılan ban yok.)) msg $chan - Değişen mod sayısı: $iif($hget($1,$+(md½,$1)),$+($chr(2),$hget($1,$+(m d½,$1)),$chr(32),$chr(2), - (Kanal'da kim hangi mod'u değiştirmiş? Öğrenmek için: $+($chr(2),/md $1,$chr(2)) yazınız.)),$+($chr(2),Değişen mod yok.)) } } alias kns { if !$1 { msg $chan - Lütfen kanal ismi giriniz; $+($chr(2),/kns #kanalismi) | halt } if !$hget($+(yazı,$1)) { msg $chan - Veri bulunamadı. | halt } else { msg $chan - $+($chr(2),$1,$chr(2)) kanalı için; $+($chr(2),$hget($+(yazı,$1),0).item,$chr(2)) adet veri bulundu. | var %& = 1,%&& = $hget($+(yazı,$1),0).item | while %& <= %&& { msg $chan - Nick: $+($chr(2),$hget($+(yazı,$1),%&).item,$chr(2)) - Yazdığı satır miktarı: $+($chr(2),$hget($+(yazı,$1),%&).data,$chr(2)) | inc %& } } } alias bn { if !$1 { msg $chan - Lütfen kanal ismi giriniz; $+($chr(2),/bn #kanalismi) | halt } if !$read($+($1,ban,.txt)) { msg $chan - Veri bulunamadı. | halt } else { msg $chan - $+($chr(2),$1,$chr(2)) kanalı için; $+($chr(2),$hget($1,$+(ban½,$1)),$chr(2)) adet veri bulundu. | var %1 = 1,%2 = $lines($+($1,ban,.txt)) | while %1 <= %2 { msg $chan - $read($+($1,ban,.txt),%1) | inc %1 } } } alias unbn { if !$1 { msg $chan - Lütfen kanal ismi giriniz; $+($chr(2),/unbn #kanalismi) | halt } if !$read($+($1,unban,.txt)) { msg $chan - Veri bulunamadı. | halt } else { msg $chan - $+($chr(2),$1,$chr(2)) kanalı için; $+($chr(2),$hget($1,$+(unbn½,$1)),$chr(2)) adet veri bulundu. | var %s = 1,%x = $lines($+($1,unban,.txt)) | while %s <= %x { msg $chan - $read($+($1,unban,.txt),%s) | inc %s } } } alias yetki { if !$1 { msg $chan - Lütfen kanal ismi giriniz; $+($chr(2),/yetki #kanalismi) | halt } if !$read($+($1,yetkiler,.txt)) { msg $chan - Veri bulunamadı. | halt } else { msg $chan - $+($chr(2),$1,$chr(2)) kanalı için; $+($chr(2),$lines($+($1,yetkiler,.txt)),$chr(2)) adet veri bulundu. | var %q = 1,%r = $lines($+($1,yetkiler,.txt)) | while %q <= %r { msg $chan - $read($+($1,yetkiler,.txt),%q) | inc %q } } } alias md { if !$1 { msg $chan - Lütfen kanal ismi giriniz; $+($chr(2),/md #kanalismi) | halt } if !$read($+($1,mode,.txt)) { msg $chan - Veri bulunamadı. | halt } else { msg $chan - $+($chr(2),$1,$chr(2)) kanalı için; $+($chr(2),$hget($1,$+(md½,$1)),$chr(2)) adet veri bulundu. | var %p = 1,%f = $lines($+($1,mode,.txt)) | while %p <= %f { msg $chan - $read($+($1,mode,.txt),%p) | inc %p } } } alias nik { if !$1 { msg $chan - Lütfen kanal ismi giriniz; $+($chr(2),/nik #kanalismi) | halt } if !$read($+($1,nick,.txt)) { msg $chan - Veri bulunamadı. | halt } else { msg $chan - $+($chr(2),$1,$chr(2)) kanalı için; $+($chr(2),$hget($1,$+(nck½,$1)),$chr(2)) adet veri bulundu. | var %z = 1,%o = $lines($+($1,nick,.txt)) | while %z <= %o { msg $chan - $read($+($1,nick,.txt),%z) | inc %z } } } alias ekle { if !$read(slnck.txt,w,$1) { write slnck.txt $1 } } alias sıfırla { msg $chan - Tüm veriler sıfır'landı. | .hfree -w yazı* | .hfree -w $+($chr(35),*) | var %oo = 1,%aa = $lines(slnck.txt) | while %oo <= %aa { .remove $read(slnck.txt,%oo) | inc %oo } } Not : "Nick" yazan yerLere kuLLanıcak Nickleri beLirtiniz.. |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? Alıntı:
*>*>*> KNS Taninmamis Komut... *>*>*> RAPOR Taninmamis Komut... gibi hatalar veriyor neden aCaba Zahmet oLmazsa ilgilenirSen sevinirim Kolay geLsin.. |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? Kod: alias takip {Peki bu kısmını da ekledin mi kod sorunsuz çalışıyor;oki |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? yok ekLemedim :D yaa düşündümde arkadaŞ öyLe diyinCe sandımki sadece o kısım ekleneCek neyse tŞk ettim deneyeyim hemeN :) |
Yanıt: Bir kanal'ı takip etmeye ne dersiniz? * /hinc: no such table 'nck½' * /hinc: no such table 'ayr½' böyle bişi belirdi statuste nasıl düzeltebilirim?Bu arada L4roXyL Her zaman ki gibi Süpersin ;) |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? GüzeL PayLaşım Emeyine SağLık Arkadaşım ... |
Yanıt: Bir kanal'ı takip etmeye ne dersiniz? Alıntı:
|
Cevap: Bir kanal'ı takip etmeye ne dersiniz? Selamu Aleykum .bu codeyi bayagidir kullaniyordum.cok isime yaradi.ben ayni zamanda kanalda userler yazi yazdiginda her bir cumleye oto puan veriyorum.user 50 cumle yazdiginda kanalda oto voice aliyor.kanala bazen bakamiyorum.kisi kanalda bos bir seyler yazsa bile puan aliyor.buda hos olmuyor.bu sizin code kimin kac satir yazdigini gosteriyor ama ne yazdigini gostermiyor.onuda ekleyebilirmisiniz lutfe,bunun icin su codeyi kullaniyordum.!tara #kanal nick yazinca yazdiklari ozelime geliyordu.ama rapor baska userlerinde ozeline gidiyor hos olmuyor.sizinkini biraz daha gelistirebilirsek cok guzel olacak , alias history { if $window(@History) { clear @History | echo @History $+(1,$str(-,10),14-15-0-[ 15History:,$2, 0 ]-15-14-1,$str(-,5)) } var %i = 1, %nick = $+(<?,$replace($2,|,|,,,^,^,[,[,],]),>,$chr(32)) while (%i <= $line($1,0)) { if $regex($strip($line($1,%i)),%nick) { phistory $2 $line($1,%i) } | inc %i 1 } if $line(@History,0) == 1 { phistory $2 $2 : ye a?it $1 kanal?nda bir bilgi bulunamad?! } } alias phistory { if !$window(@History) { window -aeCk0 @History | echo -m @History $+(1,$str(-,10),14-15-0-[ 15History:,$1, 0 ]-15-14-1,$str(-,5)) } echo @History $2- .msg %taraistek $2- } on *:text:*:#kanal:{ if ($1 == !tara) && (!$istok(LQndRA,OL,Murat,32)) { msg $chan bu komutu kullanmaya yetkili de?ilsiniz | halt } if ($1 == !tara) && ($chr(35) !isin $2) { msg $chan yanl?? kullan?m yapt?n?z "!tara #kanal nick" ?eklinde olmal? | halt } else { set %taraistek $nick | history $2 $3 } } |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? arkadaşlar acaba ben bunu alias mı ekleyecem yoksa remotelerimi alias a ekledim takip #kanal yazdım kabul etmedi komut yok dedi yardımn edermisiniz |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? - Çıkan kullanıcı sayısı: 6 kanalda kimse cıkmadığı halde bunu diyor help please |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? Emeğinize sağlık denedim ve kullanıyorum çok güzel bir hazır cod.Kanalda opların ne kadar çalıştığınıda tespit emiş oluruz :) |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? süpper kod gerçekten ;) |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? tskler bir cok kesimin işine yarıcak bir code tekrar tskler.. |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? yalniz birsey soracaktim code ekli iken bağlantıyı koparıp tekrar sunucuya girdiğimde tüm veriler sıfırlanıyor.bağlantıyı koparıp tekrar girdiğimde kaldıgı yerden devam etmesi mümkünmüdür? |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? Alıntı:
Bu CaLısmıyo !kns #kanal yazınca veri buLunamadı yazı. Ama dierLeri CaLısıyo Hepsi.. |
Cevap: Bir kanal'ı takip etmeye ne dersiniz? Giriş cıkışlarda sıfırlanıyor.. |
| Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 12:29. |
Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk