Çevrimdışı

[ 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

 

Çevrimdışı

Denedim ve dediğin şekilde bir sorun olmadı.

 

Çevrimdışı

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

 

Çevrimdışı

Süper Paylaşım Emeğine SağLık...

 

Çevrimdışı

quatro Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

güzel bi çaışma ellerine sağlık bunu kanal yansıtsak !takip #kanal olrak bu mümkünmü ?

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,%
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) { 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 *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
#: { 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..

 

SaintCty Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

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 : Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. ellerine saglık emegi,ne saglık

Sayın hojam paylaşımını ekledim ama sorun veriyor anlayamadım bir türlü mesela Takip Devre Dışı ve

*>*>*> KNS Taninmamis Komut...
*>*>*> RAPOR Taninmamis Komut...

gibi hatalar veriyor neden aCaba Zahmet oLmazsa ilgilenirSen sevinirim Kolay geLsin..

 

Peki bu kısmını da ekledin mi kod sorunsuz çalışıyor;oki

 

yok ekLemedim
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
yaa düşündümde arkadaŞ öyLe diyinCe sandımki sadece o kısım ekleneCek neyse tŞk ettim deneyeyim hemeN
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 

Çevrimdışı

* /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
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 

Çevrimdışı

GüzeL PayLaşım Emeyine SağLık Arkadaşım ...