deop iken otoların çalışması
 

Merhaba Sayın Coderler belki aradigim konu burda vardir ama bulamadim.. şöyle açıklıyayım sizlere. ben ircopum kanalalrda deop iken birisi kanalda küfür ettiginde veya badnickli biri girdiginde o kişiyi nasıl atarim ve badnick ile giren kisiyi cinsellik ve *** kanalına oto nasıl ajoinlerim

----------

yokmu acaba bilen birisi?

----------

yokmu acaba bilen birisi?

Cevap: deop iken otoların çalışması
 

koruma kodlarını buraya kopyalarsan bakabilirim.

Cevap: deop iken otoların çalışması
 

koruma kodlari derken? remote yimi

Cevap: deop iken otoların çalışması
 

($me isop $chan) &&
bu satırı değişirsen sorun çözülüyor
remotenden bul koruma kodlarını

----------

veya deop olsanda f tuşu ile atabilirsin

/f11 /cs op #kanal $me | /mode # +b $$1 | /kick # $$1 Kurallara Uyunuz. | /cs deop #kanal $me

Cevap: deop iken otoların çalışması
 

on @Badnick:JOIN:#:{ .timer 1 300 mode $chan -b $nick
/opme /chanserv op $chan $me
/ping /ctcp $$1 ping
/finger /ctcp $$1 finger
/op /mode # +ooo $$1 $2 $3
/deop /mode # -ooo $$1 $2 $3
/j /join #$$1 $2-
/n /names #$$1
/w /whois $$1
/p /part #
/k /kick # $$1 $2-
/b /ban # $$1
/kb /ban $$1 2 | /kick # $$1
/q /query $$1
/s /server
/pass /nickserv identify $1
/cs /chanserv $1-
/ns /nickserv $1-
/ms /memoserv $1-
/os /operserv $1-
/rs /rootserv $1-
/F1 /gline $1 1gülümsemeyi, 4Sevgi; 1haketmeyi, 12Vefa; 1hatırlamayı, 4Dostluk; 1paylaşmayı bilen için vardır.12Sen ise Dostluk Kurallarini Aştin Dostum
/f2 /mode # +b $$1 | /kick # $$1 4Global Kanallarda Bu Tarz Nick Yasaktir 12/Nick YeniNick 1Seklinde Lutfen Nickinizi Degistirin
/F3 /gline $1 dışarı..!Sunucumuzda..!! 4Trojen Atmak, Flood Yapmak, Clone Sokmak, Reklam Yapmak ve Global Kanallarda Rahatasız Edici Kelimeler Kullanmak Yasaktır.
/f4 $$1 | /Say $$1 4Global Kanallarda Bu Tarz Kelimeler Kullanmak Yasaktir 12Lütfen Seviyeli Sohbet Ediniz 1Aksi Taktirde Sizi Uzaklastirmak Zorunda Kalacagim
/F5 /nick $$?="Yeni Nickiniz?"
/f6 /mode # +v $$1 | /Say $$1 $active 4KanaLina Ho$ geLdiniz... Size 12lRC ve Servisler hakkinda Nasil Yardimci Olabilirim
/f7 /say $$1 :4 Baska Sorununuz Yoksa Lütfen Bekleme Yapmayiniz?
/f8 /mode # -v $$1 | /say $$1 : Lütfen 4 $active KanaLinda BekLeme Yapmayiniz... 12 :/Part $active
/alias F9 /sajoin $* #Cinsellik
/F10 /ban $$1 2 | /kick # $$1 4Global Kanallarda Bu Tarz Kelimeler Kullanmak Yasaktir 12Lütfen Seviyeli Sohbet Ediniz
/F11 /quit %çıkış | exit
/F12 /dialog -m yardimci yardimci

bu aliases deki yazilar burdakinimi deiscem valla benim script cok karisik bir sürü kod alip koydum

Cevap: deop iken otoların çalışması
 

on @Badnick:JOIN:#:{ .timer 1 300 mode $chan +b $nick

@ i silipte kaydedip denermisin

Cevap: deop iken otoların çalışması
 

on @*:join:#:if $kotunick($nick) { mode # +b $nick | kick # $nick %kckmsg }
#NickDeğiş on
on *:NICK:{ if $kotunick($newnick) { var %_ = 1, %< = $v1 | while $comchan($newnick,%_) { if $me isop $v1 { mode $v2 +b %< | kick $v2 $newnick %kckmsg } | inc %_ } } }
#NickDeğiş end
alias kotunick { var %_ = 1 | while $read(nickler.txt,%_) { if $v1 iswm $1 { return $v1 } | inc %_ } | return $false }
alias krt {
if $1 ischan && $me isop $1 {
var %` = $lines(Nickler.txt)
while %` {
if $fline($1,$read(Nickler.txt,%`),0,1) >= 1 { var %~ = $ifmatch | while %~ { if $line($1,$fline($1,$read(Nickler.txt,%`),%~,1),1) isreg $1 { mode $1 +b $+($read(Nickler.txt,%`),!*@*) | kick $1 $line($1,$fline($1,$read(Nickler.txt,%`),%~,1),1) %kckmsg } | dec %~ } }
dec %`
}
}
}
#oto-tara on
on *:OP:#:if $opnick == $me { krt $chan }
#oto-tara end
;-----------------------------------------
on *:LOAD:{
echo -a $timestamp *** Kötü Rumuz Koruması başarıyla yüklendi.
echo -a $timestamp *** -----------------
run notepad.exe nickler.txt
set %oto-tara on
set %NickDeğiş on
set %kckmsg Kick mesajınız
}
on *:UNLOAD:{
echo -a $timestamp *** Kötü Rumuz Koruması kaldırıldı.
unset %oto-tar
unset %NickDeğiş
unset %kckmsg
}
%kckmsg Kick mesajınız
on @Badnick:JOIN:#:{
if ($ulist($nick,koruma,0) >= 1) { return }
elseif !$istok(#Canimhelp,$chan,32) {
mode $chan +b $nick
kick $chan $nick Rumuzunuz KanaL Seviyesine Uygun Degil.
}
}
on *:NICK:{
if ($ulist($+($newnick,!*@*),koruma,0) >= 1) { return }
else {
if $ulist($+($newnick,!*@*),badnick,0) {
var %Cnk = 1
while $comchan($newnick,%Cnk) {
var %e = $v1
if $me isop %e && !$istok(#Canimhelp,%e,32) {
mode %e +b $newnick
kick %e $newnick Gecmis oldugunuz rumuz kanal Seviyesine uygun degil.
}
inc %Cnk
}
}
}
}


Buda Remote

Cevap: deop iken otoların çalışması
 

on *:join:#:if $kotunick($nick) { /cs kick # +b $nick | kick # $nick %kckmsg }
#NickDeğiş on
on *:NICK:{ if $kotunick($newnick) { var %_ = 1, %< = $v1 | while $comchan($newnick,%_) { if $me isop $v1 { mode $v2 +b %< | kick $v2 $newnick %kckmsg } | inc %_ } } }
#NickDeğiş end
alias kotunick { var %_ = 1 | while $read(nickler.txt,%_) { if $v1 iswm $1 { return $v1 } | inc %_ } | return $false }
alias krt {
if $1 ischan && $me isop $1 {
var %` = $lines(Nickler.txt)
while %` {
if $fline($1,$read(Nickler.txt,%`),0,1) >= 1 { var %~ = $ifmatch | while %~ { if $line($1,$fline($1,$read(Nickler.txt,%`),%~,1),1) isreg $1 { mode $1 +b $+($read(Nickler.txt,%`),!*@*) | kick $1 $line($1,$fline($1,$read(Nickler.txt,%`),%~,1),1) %kckmsg } | dec %~ } }
dec %`
}
}
}
#oto-tara on
on *:OP:#:if $opnick == $me { krt $chan }
#oto-tara end
;-----------------------------------------
on *:LOAD:{
echo -a $timestamp *** Kötü Rumuz Koruması başarıyla yüklendi.
echo -a $timestamp *** -----------------
run notepad.exe nickler.txt
set %oto-tara on
set %NickDeğiş on
set %kckmsg Kick mesajınız
}
on *:UNLOAD:{
echo -a $timestamp *** Kötü Rumuz Koruması kaldırıldı.
unset %oto-tar
unset %NickDeğiş
unset %kckmsg
}
%kckmsg Kick mesajınız
on Badnick:JOIN:#:{
if ($ulist($nick,koruma,0) >= 1) { return }
elseif !$istok(#Canimhelp,$chan,32) {
mode $chan +b $nick
kick $chan $nick Rumuzunuz KanaL Seviyesine Uygun Degil.
}
}
on *:NICK:{
if ($ulist($+($newnick,!*@*),koruma,0) >= 1) { return }
else {
if $ulist($+($newnick,!*@*),badnick,0) {
var %Cnk = 1
while $comchan($newnick,%Cnk) {
var %e = $v1
if $me isop %e && !$istok(#Canimhelp,%e,32) {
mode %e +b $newnick
kick %e $newnick Gecmis oldugunuz rumuz kanal Seviyesine uygun degil.
}
inc %Cnk
}
}
}
}

ircopsan bu işe yaraması lazım bot sayesinde deopkende atabiliyor olman lazım. kopyalayıp deneyebilirsin denemedim ben ama.

Cevap: deop iken otoların çalışması
 

lütfen denermisiniz daha ircop deilim bakamiyorum

Cevap: deop iken otoların çalışması
 

benim yetkim yok biyerde ama çalışacaktır çünkü sen bota uygulatıyorsun bu kod sayesınde komutu.
@ iken uyguluyor kodu optan indiğimde ve listedeki kötu nıck gırdıgınde de uyguluyor fakat cs ye @ olmadıgım için erişim sağlayamıyorum ve atamıyorum gördüğün gibi.
ircop ken cs ye erişim sağlarsın kanalda op olmana gerek yok.

0,5 [00:37] [ Notice - 15ChanServ 0] 5 SERHAT #NucLeaR kanalinda oplandi.
[00:37] * SERHAT sets mode: +b LoRDGuaRD!*@*
4*** [00:37] LoRDGuaRD 12,4 SERHAT tarafından kicklendi. (Kick mesajınız4)
[00:37] * SERHAT sets mode: -b LoRDGuaRD!*@*
[00:37] * SERHAT sets mode: -o SERHAT
10*** [00:37] Giriş: LoRDGuaRD (ideod@IP.6824F14E.5A05D3DD.552A2CFF)
12*** [00:37] Clone Tespit Edildi: (Nick: 4LoRDGuaRD12 /4 4SERHAT 12<-> 12IP: (*!*@IP.6824F14E.5A05D3DD.552A2CFF)12 - (2)
0,5 [00:37] [ Notice - 15ChanServ 0] 5 +b nick'i su anda kullanimda degil.
12*** 4( #NucLeaR ) 12Kanalında Operator Değilsin!