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

30Beğeni(ler)

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 06 Nisan 2023, 15:51   #31
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Mobil ban ekleme sistemi




@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...], version numarası

__________________
Dünya Tanrı'nın bir görünümü değil, Şeytan'ın bir yalanı'dır
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Yazgulu Sohbet
Alt 15 Haziran 2023, 18:19   #32
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Mobil ban ekleme sistemi




MasteR06 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!
menu * { Version Koruması .Aç:/.enable #Version | echo -a Version koruması açıldı.. .Kapat:/.disable #Version | echo -a Version koruması kapatıldı.. } #Version off on *:snotice:*:{ if $regex($1-,/Client connecting (on port|at) (.+)\: (.+) \((.+)@(.+)\)/Si) { ctcp $strip($6) version } } } on *:ctcpreply:*version*: { var %:uid $token($1-,-1,32) if $hget(banlist,%:uid) { msg #Opers 5[VERSION] $nick yasak id numarasi 2 ( %:uid ) ile giriş yapmaya çalıştı... gzline $nick 0 Version Ban Listesine Eklendiniz. } else { .hadd -m mban $nick %:uid } } on *:input:#Opers:{ if $regex($1,/^[.!]mban/Si) { if $2 = ekle { .hadd -m banlist $hget(mban,$3) $3 msg # 5[VERSION] $hget(mban,$3) id numarasi ile $3 girişleri yasaklandı. gzline $3 0 Version Ban Listesine Eklendiniz. } if $2 = list { var %w = 1 | while %w <= $hget(banlist,0).item { msg # 5[VERSION] ID: $hget(banlist,%w).item Nick: $hget(banlist,%w).data inc %w } } if $2 = sil { msg # 5[VERSION] $3 id numaralı mobilban listesinden silindi nick: $hget(banlist,$3) .hdel banlist $3 } } } #Version end

Bu kod işinizi görecektir.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:input:#Opers:{

ile siz kullanabilirsiniz.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#Opers:{

olarak değiştirirseniz diğer yöneticiler kullanabilir.


Version Çekiyor. Ama herhangi bir cvp gelmiyor. dolasıyla Opersede bilgi gelmiyor
[18:04] -> [Onur5172] VERSION
[18:10] -> [Ayse] VERSION


Konu Joop tarafından (15 Haziran 2023 Saat 18:20 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 15 Haziran 2023, 19:59   #33
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Mobil ban ekleme sistemi




Sunucuya bağlanırken server'ın attığı mesajı gönderirsen yardımcı olur arkadaşlar.

Joop Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Version Çekiyor. Ama herhangi bir cvp gelmiyor. dolasıyla Opersede bilgi gelmiyor
[18:04] -> [Onur5172] VERSION
[18:10] -> [Ayse] VERSION


__________________
Şüphe tek gerçektir!
 
Alıntı ile Cevapla

Alt 20 Haziran 2023, 14:44   #34
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Mobil ban ekleme sistemi




Merhaba Joop, aşağıda MobilBan Sistemini paylaşıyorum. Çalışır durum da yalnız birkaç konuya değinmekte fayda var %100 doğru sonuç vermemekte. Ekleme yaptığın da takibinde olman da fayda var. Ben Gline olarak ayarlamıştım dilersen Gline yazan kısımları Shun ile değiştir. En azından kullanıcı Sunucudan atılmadan hatalı olduğunu düşündüğün Ban'ı açar muaf eklersin gerek görürsen. Birde mIRC ve Pc ile Web üzerinden girişler de Version almaman normal. Yani sadece Mobil üzerinden giren kullanıcılar için Version karşılığı alırsın.
Paylaşacağım kod da Muaf Nick, İdent ve İp eklemek için ayrı 3 KOD yazmıştı arkadaşım onlarla birlikte paylaşıyorum.
Muaf Nick, İdent ve İP eklemek için Kod bilgili bir Coder arkadaş tarafından düzenlenir ise daha kullanışlı olacağını düşünüyorum. Kod da benim yapamadığım bir diğer eksik ise. Ekleme yaptığınız da eklenen Version numara tanımlanmıyor o yüzden list çektiğiniz de Version numaraları benzer olduğu için biraz göz yorucu ve can sıkıcı oluyor. Aktif görev aldığım bir Sunucu yok. O yüzden test etme şansım olmadı. Sorun olur ise konu altında belirtebilirsin.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
menu * { MobilBAN System .Aç:/.enable #Version | echo -a 4MobilBAN2 System aktif edildi. .Kapat:/.disable #Version | echo -a 7MobilBAN2 System deaktif edildi. } #Version off on *:snotice:*:{ if $regex($1-,/Client connecting (on port|at) (.+)\: (.+) \((.+)@(.+)\)/Si) { var %_port = $regml(2), %_nick $regml(3), %_ident $regml(4), %_ip $regml(5) if $hget(MuafNick,%_nick) || $hget(MuafIP,%_ip) || $hget(Muafident,%_ident) { return } ctcp %_nick version } } on *:ctcpreply:*version*: { var %:uid $token($1-,-1,32) if $hget(banlist,%:uid) { msg #Xline 11-> 0[5YASAKLI GiRiŞ0]2 Giriş yapmaya çalışan kullanıcı4 $nick 2Uygulanan işlem:4 G:LiNED echo #Güvenlik $timestamp 11-> 5[VERSION]0 $nick 2yasak id numarasi 0 ( %:uid ) 2ile giriş yapmaya çalıştı. Gline $nick 0 2Sunucu kurallarına uymadığınız için girişiniz,4 Yasaklanmıştır. } else { .hadd -m mban $nick %:uid } } on *:input:#:{ if $regex($1,/^[.!]mban/Si) { if $2 = ekle { .hadd -m banlist $hget(mban,$3) $3 hsave banlist banlist.bf msg #Güvenlik 11-> 5[VERSION]0 $hget(mban,$3) 2Yasaklanan Versiona ait Nick0 $3 2Version bilgileri listeye eklendi. Gline $3 0 2Sunucu kurallarına uymadığınız için girişiniz,4 Yasaklanmıştır. } if $2 = list { var %w = 1 | while %w <= $hget(banlist,0).item { msg # 11-> 5[VERSION]4 ID:0 $hget(banlist,%w).item 4Nick:0 $hget(banlist,%w).data inc %w } } if $2 = sil { msg # 5[VERSION]0 $3 2id numaralı4 MobilBAN2 listesinden silindi 4Nick:0 $hget(banlist,$3) .hdel banlist $3 hsave banlist banlist.bf } } } #Version end Kullanımı : !mban ekle nick !mban sil nick !mban list on *:start: { hmake banlist $iif($isfile(banlist.bf),hload banlist banlist.bf) }

MUAF Nick Ekleme :
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:input:#:{ if $regex($1,/^[.!]muafnick/Si) { if !$regex($2,/^(ekle|s[ıiİ]l|list)$/Si) { msg # 11[!.&]7muafnick4 <ekle|sil|list>7 olarak belirtiniz. | return } elseif $regex($2,/^ekle$/Si) { if !$regex($3,/./i) { msg # 4Lütfen Nick belirtiniz.7 ÖRNEK;0[!.]4muafnick0 <ekle> <Nick> | return } elseif $hget(MuafNick,$strip($3)) { msg # 11->0 $+(,$strip($3),) 7Nickli kullanıcı Muaf listesinde ekli. | return } var %n = $left($md5($calc($ctime * $rand(1000,9999))),$r(10,25)) .hadd -m MuafNick $strip($3) %n .hsave -o MuafNick MuafNick.high msg # 11->0 $+(,$strip($3),) 4Nickli kullanıcı muaf listesine eklendi. } elseif $regex($2,/^s[ıiİ]l$/Si) { if !$regex($3,/./i) { msg # 4Lütfen Nick belirtiniz.7 ÖRNEK;4 [!.]muafnick0 <sil> <Nick> | return } elseif !$hget(MuafNick,$strip($3)) { msg # 11->0 $+(,$strip($3),) 7Nickli kulllanıcı muaf listesinde ekli değil. | return } .hdel -m MuafNick $strip($3) .hsave -o MuafNick MuafNick.high msg # 11->0 $+(,$strip($3),) 7Nickli kullanıcı muaf listesinden silindi. } elseif $regex($2,/^l[ıiİ]st$/Si) { if ($hget(MuafNick,0).data == 0) { msg # 7Muaf Nick listesinde kayıt bulunmamaktadır. | return } msg # 11Muaf Nick Listesi msg #  var %i = 1 | while (%i <= $hget(MuafNick,0).data) { msg # 11->0 $+(%i,-4,$chr(41), ) $hget(MuafNick,%i).item inc %i } msg #  msg # 11Muaf Nick listesi sonu } } } on *:start: { hmake muafnick $iif($isfile(MuafNick.high),hload muafnick MuafNick.high) }

Muaf İdent Ekleme:
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:input:#:{ if $regex($1,/^[.!]muafident/Si) { if !$regex($2,/^(ekle|s[ıiİ]l|list)$/Si) { msg # 7[!.&]muafident4 <ekle|sil|list>7 olarak belirtiniz. | return } elseif $regex($2,/^ekle$/Si) { if !$regex($3,/./i) { msg # 4Lütfen ident belirtiniz.7 ÖRNEK;4[!.]muafident0 <ekle> <ident> | return } elseif $hget(Muafident,$strip($3)) { msg # 11->0 $+(,$strip($3),) 7identi muaf listesinde ekli. | return } var %n = $left($md5($calc($ctime * $rand(1000,9999))),$r(10,25)) .hadd -m Muafident $strip($3) %n .hsave -o Muafident Muafident.high msg # 11->0 $+(,$strip($3),) 4identi muaf listesine eklendi. } elseif $regex($2,/^s[ıiİ]l$/Si) { if !$regex($3,/./i) { msg # 4Lütfen ident belirtiniz.7 ÖRNEK;4[!.]muafident0 <sil> <ident> | return } elseif !$hget(Muafident,$strip($3)) { msg # 11->0 $+(,$strip($3),) 7identi muaf listesinde ekli değil. | return } .hdel -m Muafident $strip($3) .hsave -o Muafident Muafident.high msg # 11->0 $+(,$strip($3),) 7identi muaf listesinden silindi. } elseif $regex($2,/^l[ıiİ]st$/Si) { if ($hget(Muafident,0).data == 0) { msg # 7Muaf ident listesinde kayıt bulunmamaktadır. | return } msg # 11Muaf ident Listesi msg #  var %i = 1 | while (%i <= $hget(Muafident,0).data) { msg # 11->0 $+(%i,-4,$chr(41),) $hget(Muafident,%i).item inc %i } msg #  msg # 11Muaf Ident listesinin sonu } } } on *:start: { hmake muafident $iif($isfile(Muafident.high),hload muafident Muafident.high) }

Muaf İp Ekleme:

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:input:#:{ if $regex($1,/^[.!]muafip/Si) { if !$regex($2,/^(ekle|s[ıiİ]l|list)$/Si) { msg # 11[!.&]7muafip4 <ekle|sil|list>7 olarak belirtiniz. | return } elseif $regex($2,/^ekle$/Si) { if !$regex($3,/\d+\.\d+\.\d+\.\d+/i) { msg # 4Lütfen IP belirtiniz.7 ÖRNEK;0[!.]4muafip0 <ekle> <IP> | return } elseif $hget(MuafIP,$strip($3)) { msg # 11->0 $+(,$strip($3),) 4IP adresi7 muaf4 IP7 listesinde ekli. | return } var %n = $left($md5($calc($ctime * $rand(1000,9999))),$r(10,25)) .hadd -m MuafIP $strip($3) %n .hsave -o MuafIP MuafIP.high msg # 11->0 $+( ,$strip($3),) 4Muaf ip listesine eklendi. } elseif $regex($2,/^s[ıiİ]l$/Si) { if !$regex($3,/\d+\.\d+\.\d+\.\d+/i) { msg # 4Lütfen IP belirtiniz.7 ÖRNEK;4[!.]muafip0 <sil> <IP> | return } elseif !$hget(MuafIP,$strip($3)) { msg # 11->0 $+(,$strip($3),) 4IP adresi 7muaf IP4 listesinde ekli değil. | return } .hdel -m MuafIP $strip($3) .hsave -o MuafIP MuafIP.high msg # 11->0 $+(,$strip($3),) 4IP adresi 7muaf IP4 listesinden silindi. } elseif $regex($2,/^l[ıiİ]st$/Si) { if ($hget(MuafIP,0).data == 0) { msg # 7Muaf IP listesinde4 kayıt bulunmamaktadır. | return } msg # 11Muaf IP Listesi msg #  var %i = 1 | while (%i <= $hget(MuafIP,0).data) { msg # 11->0 $+(%i,-4,$chr(41),) $hget(MuafIP,%i).item inc %i } msg #  msg # 11Muaf IP listesi sonu } } } - on *:start: { hmake muafip $iif($isfile(MuafIP.high),hload muafip MuafIP.high) }


__________________
Dünya Tanrı'nın bir görünümü değil, Şeytan'ın bir yalanı'dır

Konu High tarafından (20 Haziran 2023 Saat 14:50 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Cevapla

Etiketler
mobil ban ekleme sistemi


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
Bilginiz dışında açılmış adınıza kayıtlı mobil hat var mı? Mobil hat sorgulama nasıl yapılır? YaRen Mobil Hatlar 0 02 Nisan 2019 13:34
En Güvenli Mobil İşletim Sistemi Hangisi? oMeN Cep Telefonu İşletim Sistemi 0 29 Aralık 2017 11:32
Mobil ödeme sistemi LG GPay gelecek ay tanıtılacak yoSun Cep Telefonlar 0 19 Kasım 2015 08:57
Samsung’dan Yeni Mobil İşletim Sistemi AngeLus Samsung 0 11 Kasım 2009 11:37
Access Ekleme Sistemi RedLine Servisler 5 06 Nisan 2008 16:34