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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Join Flood & Clone Kicker (https://www.ircforumlari.net/mirc-scripting-sorunlari/365-join-flood-amp-clone-kicker.html)

alfa 01 Aralık 2004 15:28

Join Flood & Clone Kicker
 
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

Alience 01 Aralık 2004 16:33

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ı :)
; 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ı :)
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 } }

Alience 01 Aralık 2004 16:40

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

Alience 01 Aralık 2004 16:50

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 :)
.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 :)
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 }
}
}

alfa 01 Aralık 2004 16:55

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

Alience 01 Aralık 2004 17:04

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- }
}

alfa 01 Aralık 2004 17:09

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

alfa 01 Aralık 2004 17:29

+ Bu Timerde Calismiyor Yannis Yaptigimi Sanmıyorum

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

Alience 01 Aralık 2004 18:20

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 :|

alfa 01 Aralık 2004 18:32

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.. ?

Alper 15 Aralık 2004 22:52

SeLam
 
MerhabaLar Bu addonu bende Çok arıyordum ama mirc scripting inden Pek anLamam onun için bu Addonu Bir Dosya olarak yapabiLirmiSin yani ben Sadece Mirc iLe load edeyim. ve ekLenSin YardımCı oLabilirseniz Çok sevinecem. şimdiden Tşk. Ettim

Alience 16 Aralık 2004 00:54

Mirc de remoteye (alt + r) kopyalayarak çalıştırabilirsin. eğer illa loğad edicem diyorsan mirc nin klasorune bir tane txt dosyası ac ve içine pastele sonra mirc ye geç komut olarak //load -rs dosyadı.txt yanlız dosya adında boşluk varsa "dosya adı.txt" şeklinde " işaretlerini kullan.

Alper 16 Aralık 2004 20:37

Re:SeLam
 
Merhaba Tekrardan Yaptım Ama Bu Seferde Raw HataSı veriyor Onu nasıL HaLLedecem YardımCı oLabiLirseniz.

Alience 16 Aralık 2004 20:59

raw hatası dediğin ne onu buraya kopyalamalısın ki birşeyler diyebileyim.

alfa 17 Aralık 2004 09:22

Aliance Sen Bu Join Flood Kodunu Bastan Tam Olarak Toparlayarak Versene Baksana Cok Karısmıs Birbirine Girmis..

Alience 17 Aralık 2004 09:42

1 hafta sonra belki ama gelecek hafta aşırı yoğunum o yüzden yakın zamanlarda benden birşeyler istemeyin :)

Alper 17 Aralık 2004 17:36

Aynen ŞöLe Yazdım

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ı
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 } }

Sonra Veren Hata :

* Timer 1 activated

329:*: Unknown command

* Timer 1 halted

RAW329 Unknown command

[17:36] -> Server: 329:*:

Alience 17 Aralık 2004 18:40

Toplam 2 Eklenti bulunuyor.
yazarken lazım olan kısımları vs silmişsin buyur altakini pastele.


on *:join:#: {
if (($me isop $chan) || ($me ishop $chan)) { clnkick $chan $nick }
}
alias clnkick {
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
}
}
}
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 }
}
raw 352:*: { if (%329) { halt } }
raw 315:*: { if (%329) { unset %329 | halt } }




Bu arada su anlık dialog tamam diğer kısımları inşallah moral bulursam belki tamamlayacağım bir addon ss lere bakın :).
bakalım yine dialogun sonunda iptal etmezsem kafadan bişiler olucak inşallah :)

Alper 18 Aralık 2004 09:43

Tşk. Ettim
 
SaoLaSın. Tşk. Ettim Hata Vermedi. Ama Daha Deneme Şansım oLmadı SaLdırı oLursa inş. Deniyecem : o) saoL.

911 18 Aralık 2004 13:00

dandik yaa kim kullanır bunu :P



saka saka eline saglik :D

Alper 19 Aralık 2004 15:16

SeLam
 
Bişi Daha Soracam Çok oLuyorum BeLki Ama BeLki Yardım edersiniz. Birde Saldırı Sırasında KanaLı Auto +Rmi ye aLacak oLabilir mi YardımCı oLabilirseniz sevinirim.

Alience 19 Aralık 2004 15:24

koddaki

alias clnkick {
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
}
}
}

kısmını

alias clnkick {
var %i = 1
if ($ialchan($address($2,2),$1,0) > 3) {
mode $1 +Rmi
;ekoydukta otomatik kaldırsın dimi :) aşağıdaki kısım 15 sn sonra kaldıracak modu
.timer 1 15 /mode $1 -Rmi
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
}
}
}

Alper 19 Aralık 2004 21:46

Re...
 
Tşk. Ettim ARkadaŞım. Ama Bir Sorum Daha Var oLur mu oLmaz mı Diye Soruyorum. MeseLa 5 tane clone oLunCa Kick.Aşırı FazLa Giriş oLunca +Rmi çünkü Küçük SaLdırıLarda GüzeL Atıyor zaten BöLe FazLa giriş oLunca FLood Dan Düşüyor Bilmiyorum anLatabiLdim mi ama cevabı Bekliyecez.

Alience 21 Aralık 2004 19:07

bu kodda bunu yapmak biraz zor çünkü az clonede atmaya başlıyacağı için daha fazla clone bakamazsın şöle açıklıyım
sepetimiz var bizim korumamız 3 tane aynı renk yumurta girince atıyor ama biz aynı zamanda 10 tane aynı renk yumurta girince ayrı bir şey yapmasını istiyoruz ama 3 tane aynı renk girince atıcağı için 4. aynı renk girdiğinde direk en baştan işlem görücek yok atamamışsa script bu defada sen laga girmişindir zaten +Rmi modunuda koyamayacaksın :)

Bu arada bu yumurta muhabbeti ne alaka nerden çıktı onu bende anlamadım user olarak ta anlatsam aynı mesele ama ilginç ben en iyisi bir yumurta pişirim çoktandır yememiştim ondan olabilir (3.5 ay kadar :))

Alper 21 Aralık 2004 23:11

Bu Kadar olur.
 
auhahuhahuahuahua : o) GüzeL Örnek Cevabımı aLdım saoL :P

911 21 Aralık 2004 23:23

ya ali emce iğrençsin :S ya forum u okuyan var ne yumurta falan valla okuyunca bıle mıdem kaldırmıyo


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 09:52.

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