Çevrimdışı

Soyle bir Koruma İstiyorum Aniden Hızlı Hızlı Kanala Girisler Oldu Koruma Hemen +Rm Ye Alacak Kanali

Sonra Soyle bir Klone Dedektoru İstiyorum 3 Den Fazla Klone girerse Hepsini Teker Teker Kickleyecek Cok Lazim Bana İlgi Gosterirseniz Sevinirim Arkadaslar..

BBide botuma Eklemek İcin Soyle birsey İstiyorum Her 10 Dakkada Bir Kanala Benim yazdıgım Mesajı Atacak

 

Çevrimdışı

Clone kick içinde ufak tefek açıklamalarıda yazdım yazarken girdiğim serverdaki kanalda 2 kişiydik kafama göre test ettim çalışıyor gibi ama sen yinede test et yaarken birşeyleri kaçırmışımdır belki bu arada ial inin açık olması lasım ya /ial on yaz yada remoteye eklediğin yere en ustte on *:connect: { .ial on } yazabilirsin boylece her servere baglandıgında kapalıysada iali acar ial internal address list demek yani mirc tum adresleri hafızasında tutuyor yoksa $address $ialchan vs çalışmaz bilgine



on *:join:#: {
; eğer kanalda opsam || (veya) hopsam(%) komutu uygula (clnkick $chan $nick )
if (($me isop $chan) || ($me isop $chan)) { clnkick $chan $nick }
}
alias clnkick {
; Gelen $1 Kanal olucak
; gelen $2 nick olucak $clnkick($chan,$nick) or /clnkick $chan $nick
; masklar $address($2,2) deki 2 mask yani *!*@host benim favorim ve en mantıklısı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

; ama *!user@host ta olabilir yani 0
; 0: *!user@host
; 1: *!*user@host
; 2: *!*@host
; 3: *!*user@*.host
; 4: *!*@*.host
; 5: nick!user@host
; 6: nick!*user@host
; 7: nick!*@host
; 8: nick!*user@*.host
; 9: nick!*@*.host

var %i = 1
if ($ialchan($address($2,2),$1,0) > 3) {
mode $1 +b $address($2,2)
while (%i <= $ialchan($address($2,2),$1,0)) {
kick $1 $ialchan($address($2,2),$1,%i).nick Clone
inc %i 1
}
}
}
kanala tam girdiğinin garantisi topic end rawı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

raw 329:*: {
var %i = 1
while ([ $ $+ [ %i ] ] != $null) {
if ([ $ $+ [ %i ] ] ischan) {
timer -m 1 15 raw329 [ $ $+ [ %i ] ]
halt
}
inc %i 1
}
}
alias raw329 {
if (($nick($1,0) > 250) && ($input(Kanalın listesi 250 den fazla laga da girebilirsiniz kanala who cekicem diye yinede who cekmek istiyormusunuzu $crlf Not: Eğer çekmezseniz cloner çalışmaz))) {
who $1
set %329 1
}
if ($nick($1,0) <= 250) { who $1 | set %329 1 }
}
;kanalın who mesajları
raw 352:*: { if (%329) { halt } }
;end of wholist rawı
raw 315:*: { if (%329) { unset %329 | halt } }

 

Çevrimdışı

bota her 10 dk da bir mesaj yazdırmak icin timer fonksiyonunu kullanabilirsin şöyleki komut oalrak bota
/timer 0 600 /msg #kanal mesajın
600 demek 60 * 10 yani 60 saniye * 10 oda 10 dk eder
0 da sonsuz dongu en iyisi sen kanala mesajını
on *:join:#kanalın: {
if ($nick == $me) {
/timerbotjoin 0 600 /msg $chan mesajın
}
}
remoteye yazarak gonder bot her kanala girdiginde timer 0 lanıcak ama bu durumda o zaman da en mantıklısı
on *:connect: {
/timerbot-kanalim 0 600 /msgchanbot #kanal mesajın
}
alias msgchanbot {
if ($me ison $1) { .msg $1- }
}
sen bunu ekle

 

Çevrimdışı

bunu hiç denemedim çalışır büyük ihtimalle ayrıca normalde hash kullanarak yazarımda bu sefer tembeliğime gelde variablesle yazdım sen istersen hasha da cevirebilirsin


on *:join:#: {
; eğer kanalda opsam || (veya) hopsam(%) komutu uygula (checkjoin $chan)
if (($me isop $chan) || ($me isop $chan)) {
if ($checkjoin($chan) {
mode $chan +Rm
;koydum +R yi ama sole 5 dk sora kaldırsa iyi olur hani
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

.timerunmode- $+ $chan 1 300 /mode $chan -Rm
}
}
}
alias checkjoin {
;10 sn de 3 den fazla join olursa chek etsin sen bunu sana en uygununu kontrol edip yaz bence
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

if ($+(%checkjoin-,$1) == $null) { set -u8 $+(%checkjoin-,$1) 1 | return $false }
else {
if ($+(%checkjoin-,$1) < 3) { inc $+(%checkjoin-,$1) 1 | return $false }
if ($+(%checkjoin-,$1) == 3) { unset $+(%checkjoin-,$1) | return $true }
}
}

 

Çevrimdışı

Abi Clone Tarayıcın Calısmıyor İkincisi Bana Tam Olarak Soyle Birsey Veririmisin

7 Dakkada 1 Bota Duyuru yaptıracam Botun Ozeline gidecem !Duyuru <Kanal> <Duyuru> Diyecem =>
!Duyuru Yarın #dasdas Toplantısı Vardır Gelin Falan

Bot Bunu timer acacak Her yedi Dakikadar Bir Kanala Yansıtacak

 

Çevrimdışı

clone koruması ne gibi hata verdi iali actınmı ? acık değilse ial çalışmaz yani hiç çalışmaması olamaz en azından ters mantık uyguladıgımda çalışmıştı şoyleki cloneler 3 ten buyuk degilde 3 ten kucukse diye yaptıgımda çalışıyordu iali gozden gecir bence.

öteki için botun remotesine:
on *:text:!duyuru*:?: {
if ($2 == -r) { .timerduyuru off }
else { .timerduyuru 0 420 /.msg $2- }
}

 

Çevrimdışı

Abi Yarım Saat Boyunca Koydum Codeleri Mirce Hiçbir Performans Gostermedi Kesinlikle.. ?

 

Çevrimdışı

+ Bu Timerde Calismiyor Yannis Yaptigimi Sanmıyorum

on Master:tExt:$(* $+ $me duyuru *):*:{ TimEraLfa 0 420 /.msg $3 $4- | Msg $nick Kayıt Edildi ! }

 

Çevrimdışı

clone kick gayet guzel çalışıyor
on *:join:#: {
; eğer kanalda opsam || (veya) hopsam(%) komutu uygula (clnkick $chan $nick )
if (($me isop $chan) || ($me ishop $chan)) { clnkick $chan $nick }
}
kısımını değiştir
on *:join:#: {
if ($me isop $chan) { clnkick $chan $nick }
}
boyle yap oyle dene yoksa bizzat denedim gayet güzel çalışıyor hemde buyur echo edilmişi
mode #kanal +b *!*@ipim
kick #kanal asadsa Clone
kick #kanal Gst1490179027 Clone
kick #kanal nickakaka Clone
kick #kanal UniSon Clone

ayrıca o yazdıgın komutta kendini userliste master olarak ekledinmi? çünkü on * yerine master userleveli belirtmişsin ki özeli yerine tüm heryerde mesaj gelirse diye açmışsın ayrıca komutu değiştirdikten sonra nasıl uyguladın.
Sen yanlış yapmadığına eminsinde ben yazıp denediğimede eminim komutlardaki tek hata 2 tane isop $chan kullanmak olmuş ki oda gozumden kaçmış ama yinede bir şey ifade etmez opsan çalışır ishop olacak onun birisi komutu denemedim dememdeki mana bu idi bir yazım hatası yaptımmı diye neyse eskiden zaten tam kod vermezdim uzun sure herhangi bir foruma girmeyince niye vermediğimide anladım sana diyeceğim artık kodları denildiği gibi koy ki çalıştıktan sonra editleyince çalışmadımı hatanı başkasından çıkarma Neyse sana kolay gelsin inşallah başka birisi bişeyler yazar benden pes :|

 

Çevrimdışı

Abi Tamam Patlamıssın Bana Ya :P Abi Tamam Ben Masterim Merak Etme Hersey Calısıyorda Su Duyuruyu Calıstıramadım Duyuru Ekledigimde Yarım Saat Bekliyorum Hiçbirsey Yapmıyor.. ?