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

 Kayıt ol  Topluluk
5Beğeni(ler)
  • 3 Post By aLone
  • 1 Post By Alper
  • 1 Post By CoCoRiCo

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 06 Ocak 2017, 14:04   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
muaf host, ident




Hayırlı Cumalar.
Bu kod userliste ekledigim iplere islem yapıyor. userlist cogaldıkca kasmaya baslıyor artık ayrıca hic bi muaf eklentisi yok malesef.
buna proxy.txt dosyası olusturup normal ve wilcard ilede ekleyebilecegimiz bi hale getirebilirmiyiz lütfen.
birde muafhost.txt muafnick.txt muafident.txt entegre edebilirsek minnettar kalırım.

#proxy on
off *:snotice:*: {
if ($level($9) == muafnlist) { halt }
if ($level($9) == muafclist) { halt }
if (connecting isin $1-) {
var %:ip $remove($gettok($10,2,64),$chr(41))
if $level($remove($gettok($10,2,64),$chr(41))) == proxy {
.gzline $9 : yasak
inc %istabutun
inc %istaProxy
}
else {
var %:ip $remove($gettok($10,2,64),$chr(41))
hadd -m ckontrol %:ip $9
halt
}
}
}
#proxy end

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklam ver Benimmekan Mobil Sohbet
Alt 10 Ocak 2017, 22:35   #2
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: muaf host, ident




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:snotice:*: { if ($level($9) == muafnick) { halt } if (connecting isin $1-) { if $hfind(prox,$9,1,W).data { if !$hget(prx,$9) { .hinc -msu20 prx $9 echo -a gzline $9 1d Proxy olarak algılandınız.. msg #admin Proxy Nick Girisi - Bulunan Veri: $+([,$chr(32),$hget(prox,$hfind(prox,$9,1,W).data),$chr(32),]) } } var %:ips $remove($gettok($10,2,64),$chr(41)) if ($level(%:ips) == muafips) { halt } if $hfind(proxip,%:ips,1,W).data { if !$hget(prxip,%:ips) { .hinc -msu20 prxip %:ips echo -a gzline $+(*@,%:ips) 1d Proxy olarak algılandınız.. msg #admin Proxy IP Girisi - Bulunan Veri: $+([,$chr(32),$hget(proxip,$hfind(proxip,%:ips,1,W).data),$chr(32),]) } } } } on *:text:*:#admin:{ if $regex($1,/^[!\.]pr[oO]xyn[ıiİ][cçÇ]k$/Si) { if $regex($2,/^ekle$/Si) { if (!$3) { msg # Lütfen nick belirtiniz | return } if $hfind(prox,$strip($3),0,W).data { msg # $qt($nick) Eklemek istediğiniz Nick Zaten Listede mevcut $+([,$chr(32),$hget(prox,$hfind(prox,$strip($3),1,W).data),$chr(32),]) Eslesen Veri. | return } var %n = $left($calc($ctime * $rand(1000,9999)),7) .hadd -m prox %n $strip($3) .hsave -o prox prox.hs msg # Proxy Listesine Eklenen Kayıt: $strip($3) } if $regex($2,/^s[ıiİ]l$/Si) { if (!$3) { msg # $qt($nick) Lütfen Nick belirtin | return } if !$hfind(prox,$strip($3),0,W).data { msg # $strip($3) Proxy Nick Listesinde Bulunmamaktadır. | return } .hdel -m prox $hfind(prox,$strip($3),1,W).data .hsave -o prox prox.hs msg # Proxy Listesinden Silinen Kayıt: $strip($3) } if $regex($2,/^l[ıiİ]st$/Si) { if ($hget(prox,0).data == 0) { msg # Proxy Nick Listesi bos. | return } msg # - var %:ya = 1 | while (%:ya <= $hget(prox,0).data) { msg # %:ya $+ ) [ $hget(prox,%:ya).data ] | inc %:ya } msg # - } } if $regex($1,/^[!\.]pr[oO]xy[ıiİ]p$/Si) { if $regex($2,/^ekle$/Si) { if (!$3) { msg # Lütfen IP belirtin | return } if $hfind(proxip,$strip($3),0,W).data { msg # $qt($nick) Eklemek istediğiniz IP Zaten Listede mevcut $+([,$chr(32),$hget(proxip,$hfind(proxip,$strip($3),1,W).data),$chr(32),]) Eslesen Veri.. | return } var %:r = $left($calc($ctime * $rand(1000,9999)),7) .hadd -m proxip %:r $strip($3) .hsave -o proxip proxip.hs msg # Proxy IP Listesine Eklenen Kayıt: $strip($3) } if $regex($2,/^s[ıiİ]l$/Si) { if (!$3) { msg # Lütfen IP belirtin | return } if !$hfind(proxip,$strip($3),0,W).data { msg # $strip($3) Proxy IP Listesinde Bulunmamaktadır. | return } .hdel -m proxip $hfind(proxip,$strip($3),1,W).data .hsave -o proxip proxip.hs msg # Proxy IP Listesinden Silinen Kayıt: $strip($3) } if $regex($2,/^l[ıiİ]st$/Si) { if ($hget(proxip,0).data == 0) { msg # Proxy IP Listesi bos. | return } msg # - var %:g = 1 | while (%:g <= $hget(proxip,0).data) { msg # %:g $+ ) [ $hget(proxip,%:g).data ] | inc %:g } msg # - } } if $regex($1,/^[!\.]m[uU]afn[ıiİ][cçÇ]k$/Si) { if $2 == list { .msg $chan listeleniyor. var %:mnck = 1, %mnc = $ulist(*,muafnick,0) .msg $chan - Toplam Muaf Nick Sayısı:4 %mnc while %:mnck <= %mnc { .msg $chan $+(%:mnck,$chr(41)) $iif($ulist(*,muafnick,%:mnck) == $nick,$+(,$v1,),$v1) inc %:mnck 1 } } if $2 == ekle { if $3 == $null { .msg $chan $+(",$nick,") Lütfen eklenecek nicki yazınız | return } if $ulist($3,muafnick,1) { .msg $chan $+(",$nick,") Belirtiginiz kritere uyan $+(",,$3,,") zaten mevcut | return } .auser muafnick $3- .msg $chan $+(",,$3,,") Muaf Nick Listesine Eklendi } if $2 == sil { if $3 == $null { .msg $chan $+(",$nick,") Lütfen silinecek Nicki Yazınız | return } .ruser muafnick $3- | msg $chan $+(",,$3,,") Muaf nick Listesinden Silindi } } if $regex($1,/^[!\.]m[uU]af[ıiİ]p$/Si) { if $2 == list { .msg $chan listeleniyor. var %:mips = 1, %mip = $ulist(*,muafips,0) .msg $chan - Toplam Muaf IP Sayısı:4 %mip while %:mips <= %mip { .msg $chan $+(%:mips,$chr(41)) $iif($ulist(*,muafips,%:mips) == $nick,$+(,$v1,),$v1) inc %:mips 1 } } if $2 == ekle { if $3 == $null { .msg $chan $+(",$nick,") Lütfen eklenecek IP - HOST yazınız | return } if $ulist($3,muafips,1) { .msg $chan $+(",$nick,") Belirtiginiz kritere uyan $+(",,$3,,") zaten mevcut | return } .auser muafips $3- .msg $chan $+(",,$3,,") Muaf IP Listesine Eklendi } if $2 == sil { if $3 == $null { .msg $chan $+(",$nick,") Lütfen silinecek IP - HOST Yazınız | return } .ruser muafips $3- | msg $chan $+(",,$3,,") Muaf IP Listesinden Silindi } } } on *:start:{ $iif(!$isfile(prox.hs),.write prox.hs) | .hmake prox 100 | .hload prox prox.hs | ykle } alias ykle { $iif(!$isfile(proxip.hs),.write proxip.hs) | .hmake proxip 100 | .hload proxip proxip.hs } ;#Kullanım sekli - Proxy ekle sil list bölümü ;!proxynick ekle nick - !proxynick sil nick - !proxynick list ; ;!proxyip ekle IP - !proxyip sil IP - !proxyip list ; ;Kullanım Sekli - Muaf nick IP ekle sil list bölümü ;!muafnick ekle nick - !muafnick sil nick - !muafnick list ;!muafip ekle ip-adresi - !muafip sil ip-adresi !muafip list ;muaf yada proxy eklerken *nick* *88.78* gibi ekleyebilirsin. ;kodeyi remoteye ekledikten sonra scripti kapatıp tekrar aç. ; istegin doğrultusunda düzenleyebiliriz, detaylı olarak denemedim hata olursa bildirirsin

bu arada echo olarak ayarladım denerken kaza olmasın diye echo bolumunu kaldırırsan işlem yapar

 
Alıntı ile Cevapla

Alt 17 Ocak 2017, 17:12   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: muaf host, ident




@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Allah razı olsun teşekkürler eline sağlık

Ben kendime göre düzenledim eklediğim hostlar var onuda eklenti olarak ekledim belki sıfırdan kullanmak isteyen olur diye.

Düzenlediğim yer Text kısmını input olarak değiştirdim. Birde mesaj kısmına timer ekledim.


Alıntı:
[ 17:01:57 ] <pC`kOpAt> !proxyip ekle *.unitymediagroup.de
[ 17:01:58 ] <pC`kOpAt> Proxy IP Listesine Eklenen Kayıt: *.unitymediagroup.de

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:snotice:*: { if ($level($9) == muafnick) { halt } if (connecting isin $1-) { if $hfind(prox,$9,1,W).data { if !$hget(prx,$9) { .hinc -msu20 prx $9 gzline $9 1d Proxy olarak algılandınız.. msg #XLine Proxy Nick Girisi - Bulunan Veri: $+([,$chr(32),$hget(prox,$hfind(prox,$9,1,W).data),$chr(32),]) } } var %:ips $remove($gettok($10,2,64),$chr(41)) if ($level(%:ips) == muafips) { halt } if $hfind(proxip,%:ips,1,W).data { if !$hget(prxip,%:ips) { .hinc -msu20 prxip %:ips gzline $+(*@,%:ips) 1d Proxy olarak algılandınız.. msg #XLine Proxy IP Girisi - Bulunan Veri: $+([,$chr(32),$hget(proxip,$hfind(proxip,%:ips,1,W).data),$chr(32),]) } } } } on *:input:*:{ if $regex($1,/^[!\.]pr[oO]xyn[ıiİ][cçÇ]k$/Si) { if $regex($2,/^ekle$/Si) { if (!$3) { .timer -h 1 500 msg # Lütfen nick belirtiniz | return } if $hfind(prox,$strip($3),0,W).data { .timer -h 1 500 msg # $qt($nick) Eklemek istediğiniz Nick Zaten Listede mevcut $+([,$chr(32),$hget(prox,$hfind(prox,$strip($3),1,W).data),$chr(32),]) Eslesen Veri. | return } var %n = $left($calc($ctime * $rand(1000,9999)),7) .hadd -m prox %n $strip($3) .hsave -o prox prox.hs .timer -h 1 500 msg # Proxy Listesine Eklenen Kayıt: $strip($3) } if $regex($2,/^s[ıiİ]l$/Si) { if (!$3) { .timer -h 1 500 msg # $qt($nick) Lütfen Nick belirtin | return } if !$hfind(prox,$strip($3),0,W).data { .timer -h 1 500 msg # $strip($3) Proxy Nick Listesinde Bulunmamaktadır. | return } .hdel -m prox $hfind(prox,$strip($3),1,W).data .hsave -o prox prox.hs .timer -h 1 500 msg # Proxy Listesinden Silinen Kayıt: $strip($3) } if $regex($2,/^l[ıiİ]st$/Si) { if ($hget(prox,0).data == 0) { .timer -h 1 500 msg # Proxy Nick Listesi bos. | return } .timer -h 1 500 msg # - var %:ya = 1 | while (%:ya <= $hget(prox,0).data) { .timer -h 1 500 msg # %:ya $+ ) [ $hget(prox,%:ya).data ] | inc %:ya } .timer -h 1 500 msg # - } } if $regex($1,/^[!\.]pr[oO]xy[ıiİ]p$/Si) { if $regex($2,/^ekle$/Si) { if (!$3) { .timer -h 1 500 msg # Lütfen IP belirtin | return } if $hfind(proxip,$strip($3),0,W).data { .timer -h 1 500 msg # $qt($nick) Eklemek istediğiniz IP Zaten Listede mevcut $+([,$chr(32),$hget(proxip,$hfind(proxip,$strip($3),1,W).data),$chr(32),]) Eslesen Veri.. | return } var %:r = $left($calc($ctime * $rand(1000,9999)),7) .hadd -m proxip %:r $strip($3) .hsave -o proxip proxip.hs .timer -h 1 500 msg # Proxy IP Listesine Eklenen Kayıt: $strip($3) } if $regex($2,/^s[ıiİ]l$/Si) { if (!$3) { .timer -h 1 500 msg # Lütfen IP belirtin | return } if !$hfind(proxip,$strip($3),0,W).data { .timer -h 1 500 msg # $strip($3) Proxy IP Listesinde Bulunmamaktadır. | return } .hdel -m proxip $hfind(proxip,$strip($3),1,W).data .hsave -o proxip proxip.hs .timer -h 1 500 msg # Proxy IP Listesinden Silinen Kayıt: $strip($3) } if $regex($2,/^l[ıiİ]st$/Si) { if ($hget(proxip,0).data == 0) { .timer -h 1 500 msg # Proxy IP Listesi bos. | return } .timer -h 1 500 msg # - var %:g = 1 | while (%:g <= $hget(proxip,0).data) { .timer -h 1 500 msg # %:g $+ ) [ $hget(proxip,%:g).data ] | inc %:g } .timer -h 1 500 msg # - } } if $regex($1,/^[!\.]m[uU]afn[ıiİ][cçÇ]k$/Si) { if $2 == list { .timer -h 1 500 msg $chan listeleniyor. var %:mnck = 1, %mnc = $ulist(*,muafnick,0) .timer -h 1 500 msg $chan - Toplam Muaf Nick Sayısı:4 %mnc while %:mnck <= %mnc { .timer -h 1 500 msg $chan $+(%:mnck,$chr(41)) $iif($ulist(*,muafnick,%:mnck) == $nick,$+(,$v1,),$v1) inc %:mnck 1 } } if $2 == ekle { if $3 == $null { .timer -h 1 500 msg $chan $+(",$nick,") Lütfen eklenecek nicki yazınız | return } if $ulist($3,muafnick,1) { .timer -h 1 500 msg $chan $+(",$nick,") Belirtiginiz kritere uyan $+(",,$3,,") zaten mevcut | return } .auser muafnick $3- .timer -h 1 500 msg $chan $+(",,$3,,") Muaf Nick Listesine Eklendi } if $2 == sil { if $3 == $null { .timer -h 1 500 msg $chan $+(",$nick,") Lütfen silinecek Nicki Yazınız | return } .ruser muafnick $3- | .timer -h 1 500 msg $chan $+(",,$3,,") Muaf nick Listesinden Silindi } } if $regex($1,/^[!\.]m[uU]af[ıiİ]p$/Si) { if $2 == list { .timer -h 1 500 msg $chan listeleniyor. var %:mips = 1, %mip = $ulist(*,muafips,0) .timer -h 1 500 msg $chan - Toplam Muaf IP Sayısı:4 %mip while %:mips <= %mip { .timer -h 1 500 msg $chan $+(%:mips,$chr(41)) $iif($ulist(*,muafips,%:mips) == $nick,$+(,$v1,),$v1) inc %:mips 1 } } if $2 == ekle { if $3 == $null { .timer -h 1 500 msg $chan $+(",$nick,") Lütfen eklenecek IP - HOST yazınız | return } if $ulist($3,muafips,1) { .timer -h 1 500 msg $chan $+(",$nick,") Belirtiginiz kritere uyan $+(",,$3,,") zaten mevcut | return } .auser muafips $3- .timer -h 1 500 msg $chan $+(",,$3,,") Muaf IP Listesine Eklendi } if $2 == sil { if $3 == $null { .timer -h 1 500 msg $chan $+(",$nick,") Lütfen silinecek IP - HOST Yazınız | return } .ruser muafips $3- | .timer -h 1 500 msg $chan $+(",,$3,,") Muaf IP Listesinden Silindi } } } on *:start:{ $iif(!$isfile(prox.hs),.write prox.hs) | .hmake prox 100 | .hload prox prox.hs | ykle } alias ykle { $iif(!$isfile(proxip.hs),.write proxip.hs) | .hmake proxip 100 | .hload proxip proxip.hs } ;#Kullanım sekli - Proxy ekle sil list bölümü ;!proxynick ekle nick - !proxynick sil nick - !proxynick list ; ;!proxyip ekle IP - !proxyip sil IP - !proxyip list ; ;Kullanım Sekli - Muaf nick IP ekle sil list bölümü ;!muafnick ekle nick - !muafnick sil nick - !muafnick list ;!muafip ekle ip-adresi - !muafip sil ip-adresi !muafip list ;muaf yada proxy eklerken *nick* *88.78* gibi ekleyebilirsin. ;kodeyi remoteye ekledikten sonra scripti kapatıp tekrar aç. ; istegin doğrultusunda düzenleyebiliriz, detaylı olarak denemedim hata olursa bildirirsin


Burdan İndir Bu forumdaki ekleri görübilmek için 25 mesaja sahip olmanız gerekir. Sizin 0 Mesajınız var.
 
Alıntı ile Cevapla

Alt 17 Ocak 2017, 18:05   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: muaf host, ident




pckopat kodda zaten ip ekleme mevcuttu zaten. gözünüzden kacmıs herhalde.
bende input olarak degistirdim vs msg'lerin hepsini echo -a yaptım.
sadece irc girislerine islem yaptıgı icin kullanma sansım olmadı. arsive kaldırdım.
ama bi cok kisinin isine yarıcagından eminim.
Allah razı olsun arkadaslar.

 
Alıntı ile Cevapla

Alt 17 Ocak 2017, 18:54   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: muaf host, ident




nikotin01 Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
pckopat kodda zaten ip ekleme mevcuttu zaten. gözünüzden kacmıs herhalde.
bende input olarak degistirdim vs msg'lerin hepsini echo -a yaptım.
sadece irc girislerine islem yaptıgı icin kullanma sansım olmadı. arsive kaldırdım.
ama bi cok kisinin isine yarıcagından eminim.
Allah razı olsun arkadaslar.

Ekleme olayını biliyorum hazır eklenmiş olsun diye ekledim hani belki başka biri bu konu yeni kullanmaya başlar uğraşmasın diye eklemiştim. Ben denedim biraz önce çalışıyor ama gzline olarak atmadı kline e çevirince attı.

 
Alıntı ile Cevapla

Alt 07 Mayıs 2017, 12:09   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: muaf host, ident




son yapılan her iki code ' de hem input hem text olmak üzere ikiside silme işlemini gerçekleştirmiyor.yoksa bu hatayı sadece benmi alıyorum? Silindi deniliyor ama list yaptıgımızda yine çıkıyor ve txtlerde kayıtlı gözüküyor

 
Alıntı ile Cevapla

Alt 07 Mayıs 2017, 23:04   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: muaf host, ident




Bununla ilgilenecek birisi yokmu?

 
Alıntı ile Cevapla

Alt 25 Mayıs 2017, 10:54   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: muaf host, ident




Güncellermisin.

 
Alıntı ile Cevapla

Alt 26 Mayıs 2017, 08:30   #9
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: muaf host, ident




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

__________________
2b|!2b=?
 
Alıntı ile Cevapla

Cevapla

Etiketler
host, ident, muaf nick


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

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
txt okutmalı muaf ident ve host rewal mIRC Scripting Sorunları 5 03 Ekim 2015 17:17
Random ident muaf ekleme. KivanC mIRC Scripting Sorunları 5 15 Mayıs 2012 16:37
Unreal Muaf ident worker Unreal IRCd 1 21 Haziran 2011 12:23
Muaf ident yardım Emrax mIRC Scripting Sorunları 5 11 Mart 2010 20:17
Muaf ident sorunu yardım Emrax mIRC Scripting Sorunları 17 11 Mart 2010 12:37