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

10Beğeni(ler)

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 15 Ağustos 2014, 12:30   #21
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: bad nick koruma ilave




[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Konuyu tamamen okumamışsın,
normalde kod toprak ın paylaştıgı muafip.txt belgesine 88.99.188.222 gibi ip eklemek için yazılmış.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
if !$3 || *#* !iswm $3

burada $3 koşulu olmalı ve $3 ün de içerisinde *#* işareti olması gerektiği, bunlar dahilinde kode işlevini tamamlıyacaktır denilmiş.
Kısacası kodun orjınal hali ip eklemeleri için *.*.* şeklinde olup kucuk değişiklikle muafkanal.txt belgesine #kanala, #kanalb, #kanalc, şeklinde kanal eklettirmek için *.*.* kaldırılıp kanal ibaresi *#* eklenmiş olup
!Muafkanal Ekle #Sohbet
!Muafkanal Ekle #Radyo
gibi çalışmaktadır yukarda belirttiğim gibi *.*.* silinip *#* eklenip amaç olarak sadece muafkanal.txt belgesine
#kanal1
#kanal2
#kanal3
şeklinde eklettirmek amaçlanmıştır..

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Yazgulu Sohbet
Alt 15 Ağustos 2014, 20:24   #22
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: bad nick koruma ilave




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on 1:start:{ hmake badnick hload badnick badnick.db } dialog bad_s { title "Badnick" size -1 -1 80 64 option dbu edit "", 1, 2 1 50 10 button "EKLE", 2, 53 2 25 8 button "Liste", 6, 53 23 25 8 edit "", 3, 2 12 50 10 button "SiL", 4, 53 13 25 8 button "Kapat", 5, 2 43 77 10, ok } on *:dialog:bad_s:*:*: { if $devent == SCLICK { if $did == 2 { hadd -m badnick $r(1000,999999) $did(1).text hsave badnick badnick.db .echo $colour(info) -a $timestamp *** $+(7,$did(1).text,) veritabanına başarıyla eklendi. } if $did == 6 { var %i = 1 while %i <= $hget(badnick,0).item { echo -a %i $+ -) $hget(badnick,%i).data inc %i } } if $did == 4 { var %; $did(3).text if $hfind(badnick,%;,1,W).data { hdel badnick $ifmatch hsave badnick badnick.db .echo $colour(info) -a $timestamp *** $+(4,%;,) Veritabanından silindi. } else { .echo $colour(info) -a $timestamp *** $+(4,%;,) Veritabanında bulunamadı. } } } } on ^*:join:#:{ if ($me ishop $chan) { if !$istok(#muaf1 #muaf2 #muaf3,$chan,32) { if !$istok(nick1 nick2 nick3,$nick,32) { if !$regex($gettok($address($nick,1),2,64),/(admin|oper|helper|global|yardimci|aop|op|ircop|global|sop|founder)/i) { if $hfind(badnick,$nick,1,W).data { .mode # +b $nick .kick # $nick nick değişip tekrar giriniz } } } } } } menu * { - + badnick koruması:/dialog -m bad_s bad_s - }

Basit küçük bir diyalog muaf nick, muaf kanal, muaf host eklenebılır
ekle, sil, listele, şeklinde badnick işlemleride yapılır
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Alt 15 Ağustos 2014, 20:29   #23
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: bad nick koruma ilave




Evet şimdi dikkat ettim muaf kanalmış o zaman a#a gibi eklemeleri engellemek için en sağlıklı yol
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
#?*

yada
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
$regex($3,^#([a-zA-Z0-9ğĞçÇiİşŞüÜöÖ]+$))

gibi bir sorguda yapılabilir

 
Alıntı ile Cevapla

Alt 15 Ağustos 2014, 22:14   #24
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: bad nick koruma ilave




xwerswoodx Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
$regex($3,^#([a-zA-Z0-9ğĞçÇiİşŞüÜöÖ]+$))

gibi bir sorguda yapılabilir

yada :P
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
$regex($3,^#.+) $regex($3,^#\S+$) geriye dönük referans aticaksa :p $regex($3,^(#.+))

kafa karistirmaya gerek yok :p

 
Alıntı ile Cevapla

Alt 26 Ağustos 2014, 16:44   #25
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: bad nick koruma ilave




aLone Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
kullanıcı bölümüne ekleniyor, ALT+R tusuna bastıgınızda acılan panelde yukarı sağda.
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

hocam teşekkürler çok güzel bir kod oldu.
peki biz başka bir rumuzun attığı ban'ı ban listemize ekleyebilirmiyiz?

biz ban attığımızda nasılki oto banlist'e ekleniyorsa.
aynı şekilde ahmet rumuzunun attığı ban benim ban liste eklensin?

 
Alıntı ile Cevapla

Alt 26 Ağustos 2014, 17:57   #26
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: bad nick koruma ilave




bu bölümü sil
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:ban:#: { if $nick == $me { auser badnick $bnick | echo -a $bnick badnick liste eklendi. } }

Bunu ekle
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:ban:#: { auser badnick $bnick | echo -a $bnick badnick liste eklendi. }

bu oto banlar sağlıklı olmaz haberin olsun, yanlışlıkla birine kanalda ban atılsa +b uygulanırsa scriptin oto ekler onu badnick listesine, buda sağlıklı olmaz yinede sana kalmış..

 
Alıntı ile Cevapla

Alt 27 Ağustos 2014, 11:58   #27
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: bad nick koruma ilave




aLone Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
bu bölümü sil
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:ban:#: { if $nick == $me { auser badnick $bnick | echo -a $bnick badnick liste eklendi. } }

Bunu ekle
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:ban:#: { auser badnick $bnick | echo -a $bnick badnick liste eklendi. }

bu oto banlar sağlıklı olmaz haberin olsun, yanlışlıkla birine kanalda ban atılsa +b uygulanırsa scriptin oto ekler onu badnick listesine, buda sağlıklı olmaz yinede sana kalmış..

burada hem bizim attığımız ban hemende belirlediğimiz rumuzun attığı banmı listeye ekleniyor?

mesela hem benim banım eklenecek hemde belirlediğim Ahmet rumuzunun banı listeye eklenecek.
rumuzuma + olarak ahmet'in nickini kod'da nereye yazacağım.

 
Alıntı ile Cevapla

Alt 27 Ağustos 2014, 13:27   #28
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: bad nick koruma ilave




Son verdiğim bölümü aşagıdaki ile değiştir
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:ban:#: { if $nick == $me || $nick == ahmet { auser badnick $bnick | echo -a $bnick badnick liste eklendi. } }


 
Alıntı ile Cevapla

Alt 27 Ağustos 2014, 13:37   #29
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: bad nick koruma ilave




aLone Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Son verdiğim bölümü aşagıdaki ile değiştir
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:ban:#: { if $nick == $me || $nick == ahmet { auser badnick $bnick | echo -a $bnick badnick liste eklendi. } }


benim banımı ekledi fakat belirlediğim rumuzun banını eklemedi.

 
Alıntı ile Cevapla

Alt 27 Ağustos 2014, 13:56   #30
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: bad nick koruma ilave




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
#shilisten on on @*:join:#: { if $level($nick $+ !*@*) == badnick { banall $nick $ulist($nick,badnick,1) kickall $nick KanaLda Girişin Karaliste/Badnick/Inviter Sebebinden Dolayı Yasaklanmıştır. } } on *:part:#: { if $level($nick $+ !*@*) == badnick { mode # +b $ulist($nick,badnick,1) kick # $nick KanaLdan Çıkışın Karaliste/Badnick/Inviter Sebebinden Dolayı Yasaklanmıştır. } } on *:nick: { if $level($newnick $+ !*@*) == badnick { banall $newnick $ulist($newnick,badnick,1) kickall $newnick New-Nick ‘iniz ßad oLarak Tespit ediLdi Nick değiştirerek Tekrar Giriniz ! ßy $me } } #shilisten end alias banall { var %i 1 while %i <= $comchan($1,0) { if $1 !isop $comchan($1,%i) { mode $comchan($1,%i) +b $2- } inc %i } } alias kickall { var %i 1 while %i <= $comchan($1,0) { if $1 !isop $comchan($1,%i) { kick $comchan($1,%i) $1 $2- } inc %i } } menu * { - + Badnick .+ ekLe:/auser badnick $$1 .+ çıkart:/ruser badnick $$1 .+ ListeLe:/ulist badnick + Korumayı .+ Aç:/enable #shilisten | /echo -at biLgi; Badnick Koruması AçıLdı.. .+ Kapat:/disable #shilisten | /echo -at biLgi; Badnick Koruması kapatıLdı.. - } on *:input:*:{ if $1 == !badtara { tara $chan | msg $chan $chan kanalı taranıyor } } on *:ban:#: { if $nick == $me || $nick == ahmet { auser badnick $bnick | echo -a $bnick badnick liste eklendi. ban kullanan nick $nick } } alias tara { var %t = 1, while (%t <= $nick($1,0)) { var %badnick = $nick($1,%t) if ($level($nick($1,%t)) == badnick) { mode $1 +b $ulist(%badnick) | kick $1 %badnick Nick Uygunsuz } inc %t 1 } }

Kodda sorun yok denedim.. komple kopyala remoteye ekle..
if $nick == $me || $nick == ahmet { buradaki ahmet nicki diger istediğin nick tir..

 
Alıntı ile Cevapla

Cevapla

Etiketler
bad, ilave, koruma, nick


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
acil uzun nick koruma LineS mIRC Scripting Sorunları 3 16 Ekim 2018 23:56
Uzun nick Koruma TİGeR mIRC Scripting Sorunları 3 20 Şubat 2012 10:27
Bi bakarmısınız bad nick koruma by_unlucky mIRC Scripting Sorunları 7 26 Ekim 2010 01:14
Usersden Nick Koruma Teori mIRC Scripting Sorunları 5 14 Ağustos 2007 19:20
!dus Nick Koruma Botu goKhaN` mIRC Scripting Sorunları 4 30 Ocak 2007 14:13