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/)
-   -   NickRemotesi (https://www.ircforumlari.net/mirc-scripting-sorunlari/421043-nickremotesi.html)

moonman 23 Ekim 2011 15:29

NickRemotesi
 
Arkadaşlar kolay gelsin özellikle Coderlere sizden isteyeceğim remote şu konuda olacak.
<Admin> !YasakNick add Ahmet
<X-Bot> '' Ahmet '' Nicki Basariyla YasakNick liste eklendi.
Bu şekilde Ekleme Yaptığımda Bota Eklediğim Nickde girenlere GZLINE Atsın istiyorum.
<Admin> !YasakNick del Ahmet
<X-Bot> '' Ahmet '' Nicki Basariyla YasakNick listesinden silindi.
Bu şekilde yaptığımda yasaknick listesinden silsin istiyorum.
NOT: Socket kanal koruma botuna eklenecektir TCL değildir.
ilgilenen arkadaşlara şimdiden Teşekkür ediyorum, Kolay gelsin.
Hash şeklinde düzenlenirse daha makbul olur kod :)

Toprak 23 Ekim 2011 21:37

Cevap: NickRemotesi
 
Alıntı:

moonman Nickli Üyeden Alıntı (Mesaj 1040883696)
Arkadaşlar kolay gelsin özellikle Coderlere sizden isteyeceğim remote şu konuda olacak.
<Admin> !YasakNick add Ahmet
<X-Bot> '' Ahmet '' Nicki Basariyla YasakNick liste eklendi.
Bu şekilde Ekleme Yaptığımda Bota Eklediğim Nickde girenlere GZLINE Atsın istiyorum.
<Admin> !YasakNick del Ahmet
<X-Bot> '' Ahmet '' Nicki Basariyla YasakNick listesinden silindi.
Bu şekilde yaptığımda yasaknick listesinden silsin istiyorum.
NOT: Socket kanal koruma botuna eklenecektir TCL değildir.
ilgilenen arkadaşlara şimdiden Teşekkür ediyorum, Kolay gelsin.

Txt Mi Eklenek Yoksa Hash 'hamı Tam Bi Bilgi VeriSeniz Ona Göre Ko VereBiliim Size.

Toprak 23 Ekim 2011 22:01

Cevap: NickRemotesi
 
Kod:

Forumda Bilgi Paylaşımı Yasakmış :)

moonman 24 Ekim 2011 13:24

Cevap: NickRemotesi
 
GhoSt ilgilendiğin için çok teşekkür ederim, Ama ben bu kodu çalıştıramadım o ilk verdiğin TXT i koydum alias kısmına öyle denedim eklemedi nicki hatta bot cevap bile vermedi sonra alias sw if ($sock($1).status == active) sockwrite -n $1- << bunu en başa koydum O verdiğin kodun başına öyle denedim yine çalışmadı neden acaba :S
Bir örnek vereyim !ident koruması çalışıyor onuda burdan aldım o şekilde yazarsanız çalışabilir bot TXT i tanımadı sanırım
örnek :
#yasakident on
on *:snotice:*: {
if ($level($9) == muafnlist) { halt }
if ($level($9) == muafclist) { halt }
if (connecting isin $1-) {
if $level($remove($gettok($10,1,64),$chr(40))) = yasakident { gzline $+(*@,$gettok($gettok($10,2,64),1,41)) Lamer girisimi $+([,%botnick,]) }
}
}
#yasakident end
on *:text:!ident *:%operkanali: {
if $2 == list {
var %i = 1, %end = $ulist(*,yasakident,0)
.msg $chan - Toplam yasak ident:4 %end
while %i <= %end {
.msg $chan $+(%i,$chr(41)) $iif($ulist(*,yasakident,%i) == $nick,$+(,$v1,),$v1)
inc %i 1
}
}
elseif $2 == add {
if $3 == $null { .msg $chan $+(",$nick,") Lutfen eklenecek yasak ident'i yaziniz. | return }
if $ulist($3,yasakident,1) { .msg $chan $+(",$nick,") Belirtiginiz kritere uyan $+(",,$v1,,") zaten mevcut | return }
if $istok(N,$3,32) { .msg $chan $+(",$nick,") Bu ident eklenemez. | return }
.auser yasakident $3
.msg $chan $+(",,$3,,") Basariyla yasak ident liste eklendi.
}
elseif $2 == del {
if $3 == $null { .msg $chan $+(",$nick,") Lutfen silinecek ident'i yaziniz. | return }
if !$ulist($3,yasakident,1) { .msg $chan $+(",$nick,") Belirtiginiz kritere uyan $+(",,$3,,") Listede mevcut degil. | return }
.ruser yasakident $3
.msg $chan $+(",,$3,,") Yasak ident listten silindi.
}
}
on *:text:!ident *:%operkanali: {
if $2 == on {
if !$read(admin.txt,w,$nick) { .notice $nick 5 $+(",$nick,") , %`^  }
else { enable #yasakident | msg $chan Yasak ident %akt | set %yasakident on } }
if $2 == off {
if !$read(admin.txt,w,$nick) {
.notice $nick 5 $+(",$nick,") , %`^  }
else { disable #yasakident | msg $chan Yasak ident %dakt | set %yasakident off }
}
}
Bu şekildeki !ident koruması hatasız çalışıyor bu şekilde yazma imkanınız varmı remoteyi acaba sizi yorduğum için çok özür dilerim kolay gelsin

moonman 24 Ekim 2011 14:10

Cevap: NickRemotesi
 
GhoSt burdamısın usta ?

moonman 24 Ekim 2011 15:34

Cevap: NickRemotesi
 
Yardımlarınızı Bekliyorum :)

Toprak 24 Ekim 2011 21:14

Cevap: NickRemotesi
 
Alıntı:

moonman Nickli Üyeden Alıntı (Mesaj 1040884964)
GhoSt ilgilendiğin için çok teşekkür ederim, Ama ben bu kodu çalıştıramadım o ilk verdiğin TXT i koydum alias kısmına öyle denedim eklemedi nicki hatta bot cevap bile vermedi sonra alias sw if ($sock($1).status == active) sockwrite -n $1- << bunu en başa koydum O verdiğin kodun başına öyle denedim yine çalışmadı neden acaba :S
Bir örnek vereyim !ident koruması çalışıyor onuda burdan aldım o şekilde yazarsanız çalışabilir bot TXT i tanımadı sanırım
örnek :
#yasakident on
on *:snotice:*: {
if ($level($9) == muafnlist) { halt }
if ($level($9) == muafclist) { halt }
if (connecting isin $1-) {
if $level($remove($gettok($10,1,64),$chr(40))) = yasakident { gzline $+(*@,$gettok($gettok($10,2,64),1,41)) Lamer girisimi $+([,%botnick,]) }
}
}
#yasakident end
on *:text:!ident *:%operkanali: {
if $2 == list {
var %i = 1, %end = $ulist(*,yasakident,0)
.msg $chan - Toplam yasak ident:4 %end
while %i <= %end {
.msg $chan $+(%i,$chr(41)) $iif($ulist(*,yasakident,%i) == $nick,$+(,$v1,),$v1)
inc %i 1
}
}
elseif $2 == add {
if $3 == $null { .msg $chan $+(",$nick,") Lutfen eklenecek yasak ident'i yaziniz. | return }
if $ulist($3,yasakident,1) { .msg $chan $+(",$nick,") Belirtiginiz kritere uyan $+(",,$v1,,") zaten mevcut | return }
if $istok(N,$3,32) { .msg $chan $+(",$nick,") Bu ident eklenemez. | return }
.auser yasakident $3
.msg $chan $+(",,$3,,") Basariyla yasak ident liste eklendi.
}
elseif $2 == del {
if $3 == $null { .msg $chan $+(",$nick,") Lutfen silinecek ident'i yaziniz. | return }
if !$ulist($3,yasakident,1) { .msg $chan $+(",$nick,") Belirtiginiz kritere uyan $+(",,$3,,") Listede mevcut degil. | return }
.ruser yasakident $3
.msg $chan $+(",,$3,,") Yasak ident listten silindi.
}
}
on *:text:!ident *:%operkanali: {
if $2 == on {
if !$read(admin.txt,w,$nick) { .notice $nick 5 $+(",$nick,") , %`^  }
else { enable #yasakident | msg $chan Yasak ident %akt | set %yasakident on } }
if $2 == off {
if !$read(admin.txt,w,$nick) {
.notice $nick 5 $+(",$nick,") , %`^  }
else { disable #yasakident | msg $chan Yasak ident %dakt | set %yasakident off }
}
}
Bu şekildeki !ident koruması hatasız çalışıyor bu şekilde yazma imkanınız varmı remoteyi acaba sizi yorduğum için çok özür dilerim kolay gelsin

Arkadaşım Bu Kod Socket Deglkı Bır Kere Once Yazdıgına Emin Ol Sonra Yardım İste...

moonman 24 Ekim 2011 21:21

Cevap: NickRemotesi
 
mIRC bot bu GhoSt yapabilirmisin tekrardan hash olarak ?

Toprak 24 Ekim 2011 21:29

Cevap: NickRemotesi
 
Arkadaşım Yaparımda Kendin Ugras Yapmayı Dene Yapamazsan Yardım Ederim Sana...

moonman 24 Ekim 2011 21:34

Cevap: NickRemotesi
 
O verdiğim ident örneği remotesinden yapmayı denedim ama olmadı sabahdan beri uğraşıyorum olmuyor :S ve burda bekliyorum sabahdır yardımcı olacak diye birileri başıma ağrı girdi


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

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