IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  sohbet

2Beğeni(ler)
  • 1 Post By Mudin
  • 1 Post By Mudin

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 05 Ekim 2009, 22:41   #1
Çevrimdışı
Leo
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
oto ban açmak




selam arkadaslar mirc e otomatik ban açmasi için bir addon eklemek istemiştim 15 dk suresi dolan banlari otomatik açacak nasil yapa bilirim?

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 05 Ekim 2009, 23:47   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: oto ban açmak




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
raw 367:*: { var %sure $ctime - $5 if %sure >= 750 { inc %c.say hadd c.temp $+(ip.,%c.say) $3 } } raw 368:*: { if (%c.say >= 1) { c.unban $2 } } alias c.unban { var %bc $1 if (!$hget(c.temp,0).item) { halt } if ($hget(c.temp,0).item >= 10) { var %s = 10 } else { var %s = $hget(c.temp,0).item } var %i = 1,%c while (%i <= %s) { %c = $addtok(%c,$hget(c.temp,$hget(c.temp,1).item),32) hdel c.temp $hget(c.temp,1).item inc %i } mode %bc - $+ $str(b,%s) %c .timer -h 1 1 c.unban %bc } on *:start: ilk alias ilk { if (!$hget(c.temp)) { hmake c.temp 1000 } else { hfree c.temp | hmake c.temp 1000 } set %c.say 0 } menu * { Aktif Kanalda Süresi Dolan Banlari Ac! : mode $chan +b } on *:join:#: { if $nick == $me { write chan.txt $chan } } on *: part:#: { if $nick == $me { write -ds $chan chan.txt } } alias sureunban { var %chansfile = chan.txt var %line = 1, %total = $lines(%chansfile) while (%line <= %total) { var %data = $read -l $+ %line %chansfile if (%data != $null) { _queue mode %data +b } inc %line inc %sur } %names.enddata = %data } alias _queue { inc %queue.count if ($timer(.queue) == $null) { hadd -m queue count 1 hadd -m queue 1 $1- _doqueue 1 } else { var %queue.count = $calc($hget(queue,count) + 1) hadd -m queue %queue.count $1- hadd -m queue count %queue.count } } alias _doqueue { if ($hget(queue,$1) != $null) { .timer.queue -m 1 $calc((4 - $gettok(3 2 1,$1,32)) * 500) _doqueue $calc($1 + 1) $ifmatch .hdel -s queue $1 } else hfree queue }


__________________
Lucifer dediler bana, kötülüğü anlatmak için. Halbuki, ışık ve güzelliği anlatırdı Lucifer. Ben kötüyüm bu düzen için; ama değilim asla kötülük.
 
Alıntı ile Cevapla

Alt 06 Ekim 2009, 00:07   #3
Pentagram
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Yüzdesi:(%)
Cevap: oto ban açmak




Pek anlamam kodlardan felan ama vakti zamanında lazım olduğu için elimde şöyle bir kod var.daha kısa bir şey hem.işini görür mü bilmiyorum ama benim işimi görüyordu.süresi konusunda bir bilgim yok ama.Buyur:

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on @*:ban:#kanaladı: /mode $chan -b $2

daha kullanışlı gibi bir üstteki kullanıcının verdiği koddan.birden fazla kanal için yapabilirsin ayrı ayrı ama.tabi ayne kodda birden fazla kanalı belirtmek mümkündür ama dedim ya o kadarını anlamadığım için ben her kanal için ayrı ayrı yapıyordum
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)). kodu eklemen yeterlidir o kendisi süresi geldiğinde otomatik açıyor banları.senin her hangi bir işlem yapmana gerek yok ayrıca.

 
Alıntı ile Cevapla

Alt 06 Ekim 2009, 00:55   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: oto ban açmak




on @*
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
#: .timer 1 900 mode $chan -b $2

Şu şekilde yaparsan atılan banları 15 dakika içerisinde açar.

 
Alıntı ile Cevapla

Alt 05 Eylül 2012, 22:40   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: oto ban açmak




merhaba belirlediğim kanala girip op olduğumda ban liste bakıp süresi 15 dakka ve üstü olan banları acıp vede kanala girdiğim o dakikadan itibaren atılan her banı 15 dakka sonra geri acıcak bi cod varmı elinizde, paylaşabilirmisiniz.

 
Alıntı ile Cevapla

Alt 05 Eylül 2012, 23:03   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: oto ban açmak




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias kontrol { var %1 1 while %1 <= $ibl($1,0) { var %time $calc($gettok($time,2,58) - $gettok($time($ibl($1,%1).ctime),2,58)) if %time >= 15 { mode $1 -b $ibl($1,%1) } inc %1 } } on *:op:#:kontrol # on *:ban:#:{ if $count($nick(#,$me).pnick,@,%) { if ($1 == +b && $nick != $me) { $+(.timer,#,$2) 1 900 mode # -b $2- } } }



Konu Mudin tarafından (06 Eylül 2012 Saat 16:05 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 05 Eylül 2012, 23:27   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: oto ban açmak




Alabilirsin

 
Alıntı ile Cevapla

Alt 06 Eylül 2012, 14:53   #8
Çevrimdışı
Cpu
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: oto ban açmak




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on @*:BAN:#:{ if $ibl(#,0) >= 45 { echo 4 -a $+([,#,]) kanalı ban listesinde 45'den fazla kişi var, ilk 30 ban açılıyor. var %s = $ibl(#,0), %y = $calc($ibl(#,0) - 30) | while %s >= %y { %' = $addtok(%',$ibl(#,%s),32) | dec %s } | while %' { mode # $+(-,$str(b,6))} $gettok(%',1-6,32) | %' = $deltok(%',1-6,32) } } }


Bende de böyle bir kod var 45 banda ilk atılan banların 30 unu açar son atılan banları kaldırmaz.

 
Alıntı ile Cevapla

Cevapla

Etiketler
acmak, mirc download, mirc indir, oto


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
sözlük açmak Ocean IF Sözlük 5 29 Ocak 2019 13:16
ban açmak Leo mIRC Scripting Sorunları 3 12 Temmuz 2009 19:05