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/)
-   -   özel tekrar koruması (https://www.ircforumlari.net/mirc-scripting-sorunlari/12152-ozel-tekrar-korumasi.html)

arananadam1 14 Şubat 2006 20:48

özel tekrar koruması
 
selam arkadaslar bana şöyle bir kod lazimdi

2. tekrarda kanalda uyaracak
3.tekrarda +b yapacak
5.tekrarda kline atacak

simdiden tesekkur arkadaslar

viruS 15 Şubat 2006 01:13

Katiliyorum , Hem Konu acarken biraz düsün , Burdan bukadar Code aldin , Onlari naßiyorsun ciddiden cok merak ediyorum bunlari soylemek üstüme düsmes ama ciddiden bukadar kod aldin burdan bunlari nabiyorsun aldiklarini birlestirsen NoMercy'den fiyaka bot yaparsin?

arananadam1 15 Şubat 2006 01:21

kardes 3 te yakalayamiyor 5 kadar cikiyor kline atsin saldiriyorlar ondan soyledim

arananadam1 15 Şubat 2006 02:14

yardim ederseniz cok sevinirim cok ihtiyacim var.

MaeLStrOm 15 Şubat 2006 12:09

Başlığa özel demişsin ama kanalda banlamadan bahsediyorsun.Tam olarak ne istiyorsun?

arananadam1 15 Şubat 2006 15:05

yani timer cekiyorlar kanala 6-7 tane tekrar oluyor 5 te kline atmasini istiyorum yani şu şekil

2. tekrarda kanalda uyaracak
3. tekrarda #opers kanalina bildirecek
5. tekrarda kline

bu şekil olsada olur tesekkurler cok ihtiyacim var addona saolun

MaeLStrOm 15 Şubat 2006 15:35

on @!*:text:*:#: { inc -u15 $+(%,$nick) [ $+ [ $1- ] ] | if ($+(%,$nick) [ $+ [ $1- ] ] == 2) { msg # $nick Uyarı } | if ($+(%,$nick) [ $+ [ $1- ] ] == 3) { msg #opers $nick Uyarıldı. } | if ($+(%,$nick) [ $+ [ $1- ] ] == 5) { kline $nick | unset $+(%,$nick) [ $+ [ $1- ] ] } | halt }
15 saniye içinde 2 tekrar olursa kanalda uyarı yazılır,3 tekrarda #opers kanalına bildirilir,5. tekrarda kline atılır.(Denemedim)

CipriX 15 Şubat 2006 16:01

hehe harbi komedi :D

arananadam1 15 Şubat 2006 17:18

çalışmıyor abi

MaeLStrOm 15 Şubat 2006 17:55

on @!*:text:*:#: { inc -u15 %püf [ $+ [ $nick ] ] [ $+ [ $1- ] ] | if %püf [ $+ [ $nick ] ] [ $+ [ $1- ] ] == 2 { msg # $nick Uyarı } | if %püf [ $+ [ $nick ] ] [ $+ [ $1- ] ] == 3 { msg #opers $nick Uyarıldı. } | if %püf [ $+ [ $nick ] ] [ $+ [ $1- ] ] == 5 { kline $nick | unset %püf [ $+ [ $nick ] ] [ $+ [ $1- ] ] } | halt }

bu şekilde denermisin

arananadam1 15 Şubat 2006 18:25

ok guzel calisiyor saol tsk ederim arkadas..

arananadam1 15 Şubat 2006 19:27

arkadas birde oplara bu kodu etkisiz kılsın bunada yardim edermisin?
saldirida kanali temizlemek için oplar bunu yapıyor

<sifresiz_nick> .
<sifresiz_nick> .
<sifresiz_nick> .
<sifresiz_nick> .
<sifresiz_nick> .
<sifresiz_nick> .
<sifresiz_nick> .
<sifresiz_nick> .
<sifresiz_nick> .
<sifresiz_nick> .
<sifresiz_nick> .

teşekkurler

arananadam1 15 Şubat 2006 20:00

arkadas calisiyor kod da yeni farkina vardim şöyle bir hata verdi

* /inc: invalid parameters
-
* /inc: invalid parameters
-
* /inc: invalid parameters

MaeLStrOm 15 Şubat 2006 20:34

on @!*:text:*:#: { if $nick isop # { halt } | inc -u15 %püf [ $+ [ $nick ] ] [ $+ [ $1- ] ] | if %püf [ $+ [ $nick ] ] [ $+ [ $1- ] ] == 2 { msg # $nick Uyarı } | if %püf [ $+ [ $nick ] ] [ $+ [ $1- ] ] == 3 { msg #opers $nick Uyarıldı. } | if %püf [ $+ [ $nick ] ] [ $+ [ $1- ] ] == 5 { kline $nick | unset %püf [ $+ [ $nick ] ] [ $+ [ $1- ] ] } | halt }
;kodun çalışması için inc te sorun olmaması gerekir.Tekrar bakarmısın hata var olup olmadığına ve kodun çalışık çalışmadığına.

arananadam1 15 Şubat 2006 22:17

ayni hatayi verdi kardes kusura bakmayin sizide rahatszi ediyorum

MaeLStrOm 15 Şubat 2006 23:05

//inc -u15 %püf [ $+ [ $nick ] ] [ $+ [ $1- ] ]

ben yazdığımda sorun gözükmüyor.Neyse hash table ile bi koruma yazdım.Denedim iş görüyor.Kolay gelsin.
Kod:

on *:join:#:{ if $nick == $me && !$hget($chan) { hmake $chan 100 } }
on *:part:#:{ if $nick == $me && $hget($chan) { hfree $chan }
on *:text:*:#:{ if !$hget($chan,$+($nick,$1-)) { hadd # $+($nick,$1-) 1 } | else { hadd # $+($nick,$1-) $calc($hget($chan,$+($nick,$1-)) + 1) } | if ($hget($chan,$+($nick,$1-)) == 2) { msg # $nick Uyarı } | if ($hget($chan,$+($nick,$1-)) == 3) { msg #opers $nick Uyarıldı } | if ($hget($chan,$+($nick,$1-)) == 5) { kline $nick | hdel # $+($nick,$1-) } }


arananadam1 16 Şubat 2006 00:41

seyyy kod guzel ama tek sorunu süresiz onada bi yardim edermisiniz

MaeLStrOm 16 Şubat 2006 20:37

on @!*:text:*:#: { if $nick isop # { halt } | inc -u15 %püf [ $+ [ $nick ] ] [ $+ [ $1- ] ] | if %püf [ $+ [ $nick ] ] [ $+ [ $1- ] ] == 2 { msg # $nick Uyarı } | if %püf [ $+ [ $nick ] ] [ $+ [ $1- ] ] == 3 { msg #opers $nick Uyarıldı. } | if %püf [ $+ [ $nick ] ] [ $+ [ $1- ] ] == 5 { kline $nick | unset %püf [ $+ [ $nick ] ] [ $+ [ $1- ] ] } | halt }
Çalışıyormuş verdiğim bu kod.Şimdi denedim.


arananadam1 16 Şubat 2006 21:26

abi kod çalışıyor da tek kelime tekrarında çalışıyor

<ramazan> o o
<ramazan> p p
<ramazan> p p
<ramazan> p p
<ramazan> p p
<ramazan> p p
<ramazan> p p

<ali> i
<ali> i
<koruma> ali Uyarı

1 kelimede çalışıyor 2 kelime ve üzeri kelimelerde çalışmıyor :(

MaeLStrOm 16 Şubat 2006 23:09

Hangi kod bu kullandığın arananadam birsuru yazdık

arananadam1 17 Şubat 2006 01:37

on @!*:text:*:#: { if $nick isop # { halt } | inc -u15 %püf [ $+ [ $nick ] ] [ $+ [ $1- ] ] | if %püf [ $+ [ $nick ] ] [ $+ [ $1- ] ] == 2 { msg # $nick Uyarı } | if %püf [ $+ [ $nick ] ] [ $+ [ $1- ] ] == 3 { msg #opers $nick Uyarıldı. } | if %püf [ $+ [ $nick ] ] [ $+ [ $1- ] ] == 5 { kline $nick | unset %püf [ $+ [ $nick ] ] [ $+ [ $1- ] ] } | halt }
Çalışıyormuş verdiğim bu kod.Şimdi denedim.
bu tek kelimede calisiyor kardes 2 kelimelerde calismiyor birde benim bot deop on @!*:text:*:#: buradaki @! bunlari siliyorum inc hatasi veriyor bi yardim edebilirmisin abi

MaeLStrOm 17 Şubat 2006 21:10

$1- yerine $remove($1-,32) yazabilirsin + deop ise @ yi kaldırman yeterli.

arananadam1 17 Şubat 2006 22:20

valla olmuyor abi + @ sildimmi * /inc: invalid parameters hatasi veriyor bi olsa dua edecem sana yinede ederim :)

MaeLStrOm 18 Şubat 2006 04:14

on *:text:*:#: { if $nick isop # { halt } | var %b $remove($1-,$chr(32)) | inc -u15 %püf [ $+ [ $nick ] ] [ $+ [ %b ] ] | if %püf [ $+ [ $nick ] ] [ $+ [ %b ] ] == 2 { msg # $nick Uyarı } | if %püf [ $+ [ $nick ] ] [ $+ [ %b ] ] == 3 { msg #opers $nick Uyarıldı. } | if %püf [ $+ [ $nick ] ] [ $+ [ %b ] ] == 5 { kline $nick | unset %püf [ $+ [ $nick ] ] [ $+ [ %b ] ] } | halt }

arananadam1 18 Şubat 2006 17:16

ok abi hatasiz calisiyor ama /amsg selam gibi her kanala yazdigimda bir kanalda tekrar yapmış gibi algiliyor ona bir çare bulabilirmiyiz bulamazsanizda sorun deil caniniz saolsun teşekkur ederim heşey için

arananadam1 22 Şubat 2006 03:03

/amsg ye karsi cozum yokmu abi

MaeLStrOm 22 Şubat 2006 16:47

Bütün kanallara aynı anda mesaj atanı banlamak mı istiyosun.Nasıl istek bu ya :S

el33t 22 Şubat 2006 21:27

on @*:text:*:#:{
if $nick isreg # {
var %' = $+(%,rpt.,#,.,$nick,.,$replace($strip($1-),$chr(32),$chr(46))) | inc -u15 $(%',1) | var %. = $(%',2)
if %. == 2 { !msg # UYARI: 2 kez tekrar ettin }
if %. == 3 { !msg #opers $nick $chan kanalinda 3 kez tekrar etti. $+([,$1-,]) }
if %. == 5 { !kline $nick 5 kez uyarılmıştın | unset %' }
}
}

arananadam1 23 Şubat 2006 01:04

el33t abi bu kod voice uop larda etkisiz voice ve uoplara da etkili olabilirmi acaba
abi birde su hatasi var

<Serhat> .
<Serhat> .
<abcss> UYARI: Serhat 2 kez tekrar ettin

suan farkettigim , ) £ ( bu 4 karakterde cumle ve sadece karakterde calismiyor kod

<Serhat> ,
<Serhat> ,
<Serhat> ,

arananadam1 23 Şubat 2006 01:54

* Invalid format: $evalnext (line 104, nomercy.txt) bu hatayida sadece ( bu karekterde veriyor

arananadam1 24 Şubat 2006 00:52

abi yardim edermisiniz o kod`a tesekkurler

viruS 24 Şubat 2006 01:05

sen hangi sunucuya takiliyorsun PM olarak atarsan sewinirim ?

arananadam1 25 Şubat 2006 18:11

on @*:text:*:#:{
if $nick isreg # {
var %' = $+(%,rpt.,#,.,$nick,.,$replace($strip($1-),$chr(32),$chr(46))) | inc -u15 $(%',1) | var %. = $(%',2)
if %. == 2 { !msg # UYARI: 2 kez tekrar ettin }
if %. == 3 { !msg #opers $nick $chan kanalinda 3 kez tekrar etti. $+([,$1-,]) }
if %. == 5 { !kline $nick 5 kez uyarılmıştın | unset %' }
}
}


bu koda yardim edermisiniz El33t senin verdigin kod abi cümlede )( , bu üç kelime gectiginde kod çalısmiyor

ve birde * Invalid format: $evalnext (line 104, koruma.txt) bu hatayi sadece ( bu karakterde veriyor yardim edermisin

CipriX 25 Şubat 2006 19:06

offffffffffffffff :) o dediğin zor kodlar için (), Olması Lasım

el33t 26 Şubat 2006 00:35

Benim yazdığım koddaki

Kod:

var %' = $+(%,rpt.,#,.,$nick,.,$replace($strip($1-),$chr(32),$chr(46)))
kısmını

Kod:

var %' = $+(%,rpt.,#,.,$nick,.,$replace($strip($1-),$chr(32),$chr(46),$chr(40),$chr(144),$chr(41),$chr(145),$chr(44),$chr(146)))
ile değiştirirsen soruna çözüm olabilir, eminim daha iyi bir yol vardır ama kodu sil baştan yazmamak için böyle bir yöntem buldum.

Umarım işine yarar..

arananadam1 26 Şubat 2006 01:20

ok abi o sorun kalkti ama tek bir sorun kaldi voicelere ve uoplarda kod calismiyor sadece oplarda calismasin bir de buna yardim edermisin

el33t 26 Şubat 2006 01:24

Yazdığım koddaki;

Kod:

if $nick isreg # {
kısmını

Kod:

if $nick !isop # {


ile değiştirirsen o sorunda çözülecektir.

arananadam1 26 Şubat 2006 01:27

oldu abi cok saolun hepinize tesekkurler

Vatan 26 Şubat 2006 20:51

bir şey dikkatimi çekti =)

Alıntı:

* Invalid format: $evalnext (line 104, nomercy.txt) bu hatayida sadece ( bu karekterde veriyor
Alıntı:

sen hangi sunucuya takiliyorsun PM olarak atarsan sewinirim ?

arananadam1 26 Şubat 2006 22:55

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] buraya takiliyorum abi


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

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net