Çevrimdışı

el33t ustamın bu konuda bir kodesi var ama calışmıyor kod şu:

on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
AN:#:{ inc $+(%,ban.,#,.,$nick) }
alias getban { if $me ison $1 { var %; = 1, %: | while $var($+(%,ban.,$1,.*),%
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
{ %: = $addtok(%:,$+($gettok($v1,3,46),:,$($v1,2)),32) | inc %; } | return $iif(%:,Ban listesi durumu[Ban atan:ban sayısı]> %:,$1 kanalında ban atan yok.) } }
on *:text:NeLix Ban List:#:{ if $istok(NeLix NeLix2,$nick,32) { msg # $getban(#) } }


şimdi benim ricam mesela #izmir kanalındaki opları sopların yani operraörlerin attıgı banları #izmirop kanalında ben master olmam şartıyla
tabi !badrapor yazdıgımda adnonu yükledigim botumun kanal genelinde hangi nick onlinen oldugu süreyle birlikte attıgı ban sayısının cıkması örnek

[16:08] <benimnick> !badkontrol
[16:08] <botum> ahmet 2saat 10 dakkadır online attıgı ban sayısı:6
[16:08] <botum> mehmet 20 dakkadır onlinen attıgı ban sayısı:13
[16:08] <botum> nazlı 1 saat 5 dakkadır onlien attıgı ban sayısı:30


yani böyle bir kod ben uzun zamandır ircdeyim ama adnonlara yeni merak sardım inşalla siz degerli ustalarım sayesinde ögrenecem yardım ederseniz memnun olurum ilgilerinize ve emeklerinize tşkler.not (acemi oldugum için detaylı anlatırsanız mümkünse sagolun)

 

raw 317:*:{
.set %baglantisaat $remove($calc($gettok($asctime($4,HH:nn:ss),1,58) - $gettok($time,1,58)),-)
.set %baglantidakika $remove($calc($gettok($asctime($4,HH:nn:ss),2,58) - $gettok($time,2,58)),-)
.set %baglantisaniye $remove($calc($gettok($asctime($4,HH:nn:ss),3,58) - $gettok($time,3,58)),-)
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
AN:#:{ inc $+(%,ban.,#,.,$nick) }
alias getban { if $me ison $1 { var %; = 1, %: | while $var($+(%,ban.,$1,.*),%
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
{ %: = $addtok(%:,$+($gettok($v1,3,46),:,$($v1,2)),32) | inc %; } | .whois $gettok(%:,1,58) | .set %nik $remove($gettok(%:,1,58),) | return $iif(%:,Ban listesi durumu> %nik %baglantisaat Saat %baglantidakika Dakika %baglantisaniye Saniyedir Online Attığı Ban: $gettok(%:,2,58),$1 kanalında ban atan yok.) } }
on *:text:NeLix Ban List:#:{ if $istok(NeLix NeLix2,$nick,32) { msg # $getban(#) } }

el33t'in yazdığı kodun &#252;zerine ekledim eğer o &#231;alışıyorsa bu &#231;alışıyordur denedim tek 1 nick ile &#231;alışıyor 2 nicki denemedim sen dene bakalım

<CipriX> Ban listesi durumu> CipriX 0 Saat 14 Dakika 19 Saniyedir Online Attığı Ban: 3

 

Çevrimdışı

CipriX Nickli Üyeden Alıntı

raw 317:*:{ .set %baglantisaat $remove($calc($gettok($asctime($4,HH:nn:ss),1,58) - $gettok($time,1,58)),-) .set %baglantidakika $remove($calc($gettok($asctime($4,HH:nn:ss),2,58) - $gettok($time,2,58)),-) .set %baglantisaniye $remove($calc($gettok($asctime($4,HH:nn:ss),3,58) - $gettok($time,3,58)),-) } on * Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. AN:#:{ inc $+(%,ban.,#,.,$nick) } alias getban { if $me ison $1 { var %; = 1, %: | while $var($+(%,ban.,$1,.*),% Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. { %: = $addtok(%:,$+($gettok($v1,3,46),:,$($v1,2)),32) | inc %; } | .whois $gettok(%:,1,58) | .set %nik $remove($gettok(%:,1,58),) | return $iif(%:,Ban listesi durumu> %nik %baglantisaat Saat %baglantidakika Dakika %baglantisaniye Saniyedir Online Attığı Ban: $gettok(%:,2,58),$1 kanalında ban atan yok.) } } on *:text:NeLix Ban List:#:{ if $istok(NeLix NeLix2,$nick,32) { msg # $getban(#) } } el33t'in yazdığı kodun üzerine ekledim eğer o çalışıyorsa bu çalışıyordur denedim tek 1 nick ile çalışıyor 2 nicki denemedim sen dene bakalım <CipriX> Ban listesi durumu> CipriX 0 Saat 14 Dakika 19 Saniyedir Online Attığı Ban: 3

ustam tşk ederim yanlız bana şunu izah edermisin
1 benim nickim ahmet diyelim tam olarak nerelere yazacam
2 #izmir kanalındaki banları saymasını ordaki operatörlerin attıkları ban ve online süreleri vermem için başka mesela bu kodu #izmirop kanalında uygulayacam #izmirop kanalının genelinde ahmet Ban List mi yazcam tarif ederseni
z tam olrak sizide yoruyorum kusuruma bakmayın İlgi ve yardımlarınız için tşk

ha bu arada ben nasıl uyguladım onuda söleyim
kodu aldım
alt+r ile remoteye attım ve üstünde şöle kanal ve isim degiştim ü
yanlışım nerde

raw 317:*:{
.set %baglantisaat $remove($calc($gettok($asctime($4,HH:nn:ss),1,58) - $gettok($time,1,58)),-)
.set %baglantidakika $remove($calc($gettok($asctime($4,HH:nn:ss),2,58) - $gettok($time,2,58)),-)
.set %baglantisaniye $remove($calc($gettok($asctime($4,HH:nn:ss),3,58) - $gettok($time,3,58)),-)
}
#hehe off
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
#izmir:{
inc $+(%,ban.,#,.,$nick)
.whois $nick
.write hehe.txt $nick %topla $+(%,baglantisaat,.,$nick) Saat $+(%,baglantidakika,.,$nick) Dakika $+(%,baglantisaniye,.,$nick) Kadar Online.. Attığı Ban Sayısı: $+(%,ban.,#,.,$nick)
}
#hehe end
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
AN:#izmir:{ inc $+(%,ban.,#,.,$nick) }
alias getban { if $me ison $1 { var %; = 1, %: | while $var($+(%,ban.,$1,.*),% { %: = $addtok(%:,$+($gettok($v1,3,46),:,$($v1,2)),32) | inc %; } | .whois $gettok(%:,1,58) | .set %nik $remove($gettok(%:,1,58),) | return $iif(%:,Ban listesi durumu> %nik %baglantisaat Saat %baglantidakika Dakika %baglantisaniye Saniyedir Online Attığı Ban: $gettok(%:,2,58),$1 kanalında ban atan yok.) } }
on *:text:ahmet Ban List:#:{ if $istok(ahmet ahmet2,$nick,32) { msg # $getban(#) } }

burda tek degiştigim nickim ahmet ve ban atılan kanal olarak izmir yanlışım nedir acaba ustam bir yardımcı olursan tşk

 

on *:text:NeLix Ban List:#:{ if $istok(NeLix NeLix2,$nick,32) { msg # $getban(#) } }

Ahmet Mehmet vs.. 1. Kalın yere 2. Kalın Yere #IzmirOp

 

Çevrimdışı

CipriX Nickli Üyeden Alıntı

on *:text:NeLix Ban List:#:{ if $istok(NeLix NeLix2,$nick,32) { msg # $getban(#) } } Ahmet Mehmet vs.. 1. Kalın yere 2. Kalın Yere #IzmirOp

ustam tşk cıldıracam nerde hata yapıyorum bilmiyorum
bak ustam son halini kopyalıyorum benim nickim ahmet
oplarımın nickleride ali,memet
mesajı almak istedigim kanalda #izmirop
#izmir kanalındaki atılan banların durumunu görmek istiyorum
kod editli hali

raw 317:*:{
.set %baglantisaat $remove($calc($gettok($asctime($4,HH:nn:ss),1,58) - $gettok($time,1,58)),-)
.set %baglantidakika $remove($calc($gettok($asctime($4,HH:nn:ss),2,58) - $gettok($time,2,58)),-)
.set %baglantisaniye $remove($calc($gettok($asctime($4,HH:nn:ss),3,58) - $gettok($time,3,58)),-)
}
#hehe off
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
#:{
inc $+(%,ban.,#,.,$nick)
.whois $nick
.write hehe.txt $nick %topla $+(%,baglantisaat,.,$nick) Saat $+(%,baglantidakika,.,$nick) Dakika $+(%,baglantisaniye,.,$nick) Kadar Online.. Attığı Ban Sayısı: $+(%,ban.,#,.,$nick)
}
#hehe end
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
AN:#:{ inc $+(%,ban.,#,.,$nick) }
alias getban { if $me ison $1 { var %; = 1, %: | while $var($+(%,ban.,$1,.*),% { %: = $addtok(%:,$+($gettok($v1,3,46),:,$($v1,2)),32) | inc %; } | .whois $gettok(%:,1,58) | .set %nik $remove($gettok(%:,1,58),) | return $iif(%:,Ban listesi durumu> %nik %baglantisaat Saat %baglantidakika Dakika %baglantisaniye Saniyedir Online Attığı Ban: $gettok(%:,2,58),$1 kanalında ban atan yok.) } }
on *:text:ahmet Ban List:#:{ if $istok(ali mehmet,$nick,32) { msg #izmirop $getban(#) } }

aynen bu şekil remoteye ekliyorum ve aliye ban attırıyorum #izmirop kanal geneline şöyle yazıyorum ahmet Ban List ama ne bircevap nede başka bir yanıt yani bir icraat yok sen kodun üstünde uygularmısın ustam ahmey ban list yazyorum cıkmıyor senide yoruyorum ama yaptıgın ve sabrın allah razı olsun senden

 

Çevrimdışı

kodda sorun yoksa ki arkadas denemis write ile dosyaya yazdirirken sorun cikmis olabilir(mircin bulundugu klasore gore)
write $+($shortfn($mircdir),dosya.txt) seklinde dene birde.

 

write durumu yok

#hehe off
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
#:{
inc $+(%,ban.,#,.,$nick)
.whois $nick
.write hehe.txt $nick %topla $+(%,baglantisaat,.,$nick) Saat $+(%,baglantidakika,.,$nick) Dakika $+(%,baglantisaniye,.,$nick) Kadar Online.. Attığı Ban Sayısı: $+(%,ban.,#,.,$nick)
}
#hehe end

burayı başka bir şey i&#231;in denemiştim arkadaşlar burayı sileceksin Kardeş..

 

Çevrimdışı

CipriX Nickli Üyeden Alıntı

write durumu yok #hehe off on * Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. #:{ inc $+(%,ban.,#,.,$nick) .whois $nick .write hehe.txt $nick %topla $+(%,baglantisaat,.,$nick) Saat $+(%,baglantidakika,.,$nick) Dakika $+(%,baglantisaniye,.,$nick) Kadar Online.. Attığı Ban Sayısı: $+(%,ban.,#,.,$nick) } #hehe end burayı başka bir şey için denemiştim arkadaşlar burayı sileceksin Kardeş..

anlaşıldı ustam ben bu konuda gayet beceriksiz bir adamım
neyaptıysaam olmadı dedigin gibi yaptım kodun o bölümünbü cıkardım
yine olmadı yine olmadı #izmirop kanal genelinde bu raporu alamadım
ahmet ban list yazıyorum hiç bir hareket yok yani şimdi benim nickim ahmet
master olarak ben ne yapacamda ban listesini kanalda verecek
birde ben mircin içine ayrıca ahmet ban list diye bir tex dosyasımı acacam
dedigin yerileri şöle ayarladım alt+r remoteye uyguladım olmadı
kodun son hali
kod:

raw 317:*:{
.set %baglantisaat $remove($calc($gettok($asctime($4,HH:nn:ss),1,58) - $gettok($time,1,58)),-)
.set %baglantidakika $remove($calc($gettok($asctime($4,HH:nn:ss),2,58) - $gettok($time,2,58)),-)
.set %baglantisaniye $remove($calc($gettok($asctime($4,HH:nn:ss),3,58) - $gettok($time,3,58)),-)
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
AN:#:{ inc $+(%,ban.,#,.,$nick) }
alias getban { if $me ison $1 { var %; = 1, %: | while $var($+(%,ban.,$1,.*),% { %: = $addtok(%:,$+($gettok($v1,3,46),:,$($v1,2)),32) | inc %; } | .whois $gettok(%:,1,58) | .set %nik $remove($gettok(%:,1,58),) | return $iif(%:,Ban listesi durumu> %nik %baglantisaat Saat %baglantidakika Dakika %baglantisaniye Saniyedir Online Attığı Ban: $gettok(%:,2,58),$1 kanalında ban atan yok.) } }
on *:text:ahmet Ban List:#:{ if $istok(ahmet ahmet2 ,$nick,32) { msg #izmirop $getban(#) } }


rapor alacagım yer #izmirop kanalı benim istedigim sadece #izmir kanalındaki atılan banlar
#izmirop kanalının genelinde bu raporu nasıl alcam seninde örnek verdigin gibi
<CipriX> Ban listesi durumu> CipriX 0 Saat 14 Dakika 19 Saniyedir Online Attığı Ban: 3
bu nu nasıl yapacam dogrusu strese girdim allah razı olsun senden yardımcı olmuyorsan
heralde kafasız olan benim sana zahmet şunu detaylı bir anlatırmısın ustam ilgileriniz ve yardımlarınız için herekse tşk ederim

 

(ahmet ahmet2 ,$nick,32)

Burda senin nickler var inş ?

 

Çevrimdışı

CipriX Nickli Üyeden Alıntı

(ahmet ahmet2 ,$nick,32) Burda senin nickler var inş ?

nick derken benim şahsi şu anda birtane nickim var oda ahmet
ustam benim ncikim ahmet zaten &#246;yle denedim olmadı yine
ben bu kodu bota atıyorum degilmi bota atıyorum ve ayrı bir programdan ahmet nickiyle giriş yapıyorum #izmirop kanalında bu raporu g&#246;remiyorum detaylı bilgi verirsen ustam m&#252;mk&#252;nse senide yordum kusuruma bakma allah razı olsun şimdiden


raw 317:*:{
.set %baglantisaat $remove($calc($gettok($asctime($4,HH:nn:ss),1,58) - $gettok($time,1,58)),-)
.set %baglantidakika $remove($calc($gettok($asctime($4,HH:nn:ss),2,58) - $gettok($time,2,58)),-)
.set %baglantisaniye $remove($calc($gettok($asctime($4,HH:nn:ss),3,58) - $gettok($time,3,58)),-)
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
AN:#:{ inc $+(%,ban.,#,.,$nick) }
alias getban { if $me ison $1 { var %; = 1, %: | while $var($+(%,ban.,$1,.*),% { %: = $addtok(%:,$+($gettok($v1,3,46),:,$($v1,2)),32) | inc %; } | .whois $gettok(%:,1,58) | .set %nik $remove($gettok(%:,1,58),) | return $iif(%:,Ban listesi durumu> %nik %baglantisaat Saat %baglantidakika Dakika %baglantisaniye Saniyedir Online Attığı Ban: $gettok(%:,2,58),$1 kanalında ban atan yok.) } }
on *:text:ahmet Ban List:#:{ if $istok(ahmet ahmet2 ,$nick,32) { msg #izmirop $getban(#) } }


rapor alacagım yer #izmirop kanalı benim istedigim sadece #izmir kanalındaki atılan banlar
#izmirop kanalının genelinde bu raporu nasıl alcam seninde &#246;rnek verdigin gibi
<CipriX> Ban listesi durumu> CipriX 0 Saat 14 Dakika 19 Saniyedir Online Attığı Ban: 3
bu nu nasıl yapacam dogrusu strese girdim allah razı olsun senden yardımcı olmuyorsan
heralde kafasız olan benim sana zahmet şunu detaylı bir anlatırmısın ustam ilgileriniz ve yardımlarınız i&#231;in herkese tşk ederim