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/)
-   -   Koruma kodunda Sorun (https://www.ircforumlari.net/mirc-scripting-sorunlari/442523-koruma-kodunda-sorun.html)

XDie 11 Ocak 2012 19:05

Cevap: Koruma kodunda Sorun
 
tamam atmadi teşekkürler ama statüste şunu yazıyor

* /if: Geçersiz format (Satır 8, a.txt)
-

on @*:join:#:{
if $nick isop $chan || $nick isvoice $chan || { goto end }
if $Death(isimsiz,$nick,badnick.txt) { .kick $chan $nick 2Yasak nick }
}

on @*:join:#:{
if $nick isop $chan || $nick isvoice $chan || { goto end }
if $Death(isimsiz,$nick,kufur.txt) { .kick $chan $nick 0,4 Yasak Kelime Kullandınız. }
}


bu sekilde yaptim

toXic 11 Ocak 2012 19:07

Cevap: Koruma kodunda Sorun
 
if death'ami geliyor nick'e mi geliyor? 8. satiri gösterirmisin tam olarak.

Alıntı:

on @*:join:#:{
if $nick isop $chan || $nick isvoice $chan || { goto end }
if $Death(isimsiz,$nick,badnick.txt) { .kick $chan $nick 2Yasak nick }

}
Kod:

on @*:join:#:{

if ($me isop $chan) || ($nick !isop $chan) || ($nick !issop $chan) || ($nick !ishop $chan)  { goto end }
if $Death(isimsiz,$nick,badnick.txt) { .kick $chan $nick 2Yasak nick }
}


XDie 11 Ocak 2012 19:16

alias Death {
if !$istok(isimsiz ,$1,32) { return $false }
goto $1
:isimsiz
var %· = 1 | while $read($3,%·) { if $v1 iswm $2 { return $true } | inc %· } | return $false)
}
on @*:join:#:{
if $nick isop $chan || $nick isvoice $chan || { goto end }
if $Death(isimsiz,$nick,badnick.txt) { .kick $chan $nick 2Yasak nick }
}

on @*:join:#:{
if $nick isop $chan || $nick isvoice $chan || { goto end }
if $Death(isimsiz,$nick,kufur.txt) { .kick $chan $nick 0,4 Yasak Kelime Kullandınız. }
}

şuan kanaldan atmıyo bile eski haline getirince attı

toXic 11 Ocak 2012 19:25

Cevap: Koruma kodunda Sorun
 
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

XDie 11 Ocak 2012 19:33

Cevap: Koruma kodunda Sorun
 
badnick ile ne alakası var toxic hocam benim anlatmak istedigimin

alias Death {
if !$istok(isimsiz ,$1,32) { return $false }
goto $1
:isimsiz
var %· = 1 | while $read($3,%·) { if $v1 iswm $2 { return $true } | inc %· } | return $false)
}
on @*:join:#:{ if $Death(isimsiz,$nick,badnick.txt) { .kick $chan $nick 2Yasak nick }
}
on @*:text:*:#:if $Death(isimsiz,$1-,kufur.txt) { .mode $chan +b $wildsite | kick # $nick 0,4 Yasak Kelime Kullandınız.! }

alias Death { dialog -m Death Death }
dialog Death {
title "BadNick & Kufur Koruma Sistemi ßy Death"
size -1 -1 226 102
option dbu
list 2, 38 22 70 58, size
list 5, 118 22 70 58, size
edit "", 10, 38 12 70 10
edit "", 11, 118 12 70 10
box "BAD NICK", 6, 5 3 107 81
box "KUFUR", 7, 114 3 107 81
button "T A M A M", 1, 38 87 148 12,ok
button "EKLE", 3, 10 14 24 28
button "KALDIR", 4, 10 45 24 28
button "EKLE", 8, 192 14 24 28
button "KALDIR", 9, 192 45 24 28
}
on *:dialog: Death:INIT:*: {
if ($isfile(badnick.txt) == $false) { write -c badnick.txt } | else { loadbuf -o $dname 2 badnick.txt }
if ($isfile(kufur.txt) == $false) { write -c kufur.txt } | else { loadbuf -o $dname 5 kufur.txt }
if (%badnick) .didtok $dname 2 32 $ifmatch
if (%kufur) .didtok $dname 5 32 $ifmatch
}
on *:dialog: Death:sclick:*:{
if ($did == 3) { write badnick.txt $did(10) | did -a $dname 2 $did(10) | did -r $dname 10 }
if ($did == 8) { write kufur.txt $did(11) | did -a $dname 5 $did(11) | did -r $dname 11 }
if ($did == 4) { write -dl $+ $did(2).sel badnick.txt | did -d $dname 2 $did(2).sel }
if ($did == 9) { write -dl $+ $did(5).sel kufur.txt | did -d $dname 5 $did(5).sel }

}
on *:dialog: Death:sclick:1:{
set %badnick $didtok($dname,2,44)
set %kufur $didtok($dname,5,44)
}



Ben Burda Diyorumki.. Oplara Voicesi Olanlara Ve Halfopu Olanlara Ban Atılmasın
ve bunlar dışında olupta kanalda küfür edenler atılsın ve 5 dakika sonra oto açılsın

Narsinha 11 Ocak 2012 19:59

Cevap: Koruma kodunda Sorun
 
Kod:

if $nick isop $chan || $nick isvoice $chan || { goto end }
sondaki || fazla

yerleri

Kod:

if $nick isop $chan || $nick isvoice $chan || $nick ishop $chan  { return }
değiştir dene birde.

XDie 11 Ocak 2012 20:07

Cevap: Koruma kodunda Sorun
 
yine olmadı..

XDie 11 Ocak 2012 20:13

Cevap: Koruma kodunda Sorun
 
a.txt diye metin belgesi açtım

alias {
if !$istok(isimsiz ,$1,32) { return $false }
goto $1
:isimsiz
var %· = 1 | while $read($3,%·) { if $v1 iswm $2 { return $true } | inc %· } | return $false)
}
on @*:join:#:{ if $(isimsiz,$nick,badnick.txt) { .kick $chan $nick 2Yasak nick }
}
on @*:text:*:#:if $(isimsiz,$1-,kufur.txt) { .mode $chan +b $wildsite | kick # $nick 0,4 Yasak Kelime Kullandınız.! }

bu kodu yerlestirdim calisiyor ama dedigim gibi ( @,+,% ) olanları atıyor yine

toXic 11 Ocak 2012 21:30

Cevap: Koruma kodunda Sorun
 
Kod:

alias {
if !$istok(isimsiz ,$1,32) { return $false }
goto $1
:isimsiz
var %· = 1 | while $read($3,%·) { if $v1 iswm $2 { return $true } | inc %· } | return $false)
}
if $nick isop $chan || $nick isvoice $chan || $nick ishop $chan  { return }
on @*:join:#:{ if $(isimsiz,$nick,badnick.txt) { .kick $chan $nick 2Yasak nick }
}
if $nick isop $chan || $nick isvoice $chan || $nick ishop $chan  { return }
on @*:text:*:#:if $(isimsiz,$1-,kufur.txt) { .mode $chan +b $wildsite | kick # $nick 0,4 Yasak Kelime Kullandınız.! }

Bu şekilde çalişmasi lazim.

XDie 11 Ocak 2012 21:45

Cevap: Koruma kodunda Sorun
 
olmadı kanalda kim girse atar oldu.. onun icin başka bir konu açmıştım

bana oyle bir kod yapilmasi lazimki
kod.txt diye metin belgesi açacam içinde şu korumalar olacak
1) küfür edenler kick+ban atılacak kufur.txt den
2) halfop,voice ve op olanlar atılmayacak
3) atılan banlar 5 dakika sonra açılacak
4) ban atıldıktan sonra kanalda küfür ettiği icin banlandı yazacak Nomercy gibi
yalnız kufur.txt e şu şekilde küfürler ekliyorum
kufur*
*kufur*
* kufur *
* k u f u r *
*k.ü.f.ü.r*


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

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