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

Etiketlenen Kullanıcılar

19Beğeni(ler)

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 12 Mayıs 2017, 13:05   #11
Çevrimdışı
Set
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Join Eventi




elhale Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Bu hatayı alıyorum

* kfs H Mibbit@8.34.78.194 :1 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
* /if: invalid format

Bir hata görmedim ben , bende sorunsuz şekilde çalışıyor , eğer hata devam ediyorsa özelden ulaşın bakayım hataya , öyle bir hata almadım cunki ben

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver
Alt 12 Mayıs 2017, 14:17   #12
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Join Eventi




Set Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Bir hata görmedim ben , bende sorunsuz şekilde çalışıyor , eğer hata devam ediyorsa özelden ulaşın bakayım hataya , öyle bir hata almadım cunki ben


Başka bir mirc'de çalıştım ve işe yaradı. Ama bir ülke eklediğimde ve tekrar bağlanırsa otomatik olarak yasaklanmaz.

 
Alıntı ile Cevapla

Alt 12 Mayıs 2017, 20:02   #13
Çevrimdışı
Set
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Join Eventi




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

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:snotice:*Client connecting on port*:if !$hget(giris,$9) { who +I $9 } on ^*:join:#: { if o isin $usermode && $nick !== $me { if $hget(giris,$nick) { echo # $+($chr(3),$color(join)) $timestamp ** Giris: $nick $tam($hget(ident,$nick),$hget(giris,$nick))) 1 $hget(sehir,$nick) $cesitler($hget(ulke,$nick)) if $ulkekont($hget(ulke,$nick)) { ban -k # $nick 2 4Banlandınız. } haltdef } else { hadd -m chan $nick $addtok($hget(chan,$nick),#,32) if !$sock($+(nrdbul,$nick)) { who +I $nick } haltdef } } } raw 352:*:bul $4 $6 $3 | hadd -m ident $6 $3 | haltdef alias bul { sockopen $+(nrdbul,$2)
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 sockmark $+(nrdbul,$2) $+($2,*,$1,*,$3) } alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } on *:sockopen:nrdbul*:{ sockwrite -nt $sockname GET $+(/ip-address-locator.php?lookup=,$token($sock($sockname).mark,2,42)) HTTP/1.1 sockwrite -nt $sockname Host:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -nt $sockname Connection: keep-alive sockwrite -nt $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8 sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/40.0.2214.111 Safari/537.36 sockwrite -nt $sockname $crlf } on *:sockread:nrdbul*:{ var %x | sockread %x if $regex(%x,/<i>IP Country:</i> <b>(.*?)</b>/i) { hadd -mu5 $sockname webulke $iif($regml(1),$v1,Belirsiz) } if $regex(%x,/<i>IP City: <b>(.*?)</b>/i) { hadd -mu5 $sockname websehir $iif($regml(1),$v1,Belirsiz) } if $regex(%x,/<i>ISP Provider:</i> <b>(.*?)</b>/i) { hadd -mu5 $sockname webisp $regml(1) hadd -mu5 $sockname webnick $token($sock($sockname).mark,1,42) hadd -mu5 $sockname webip $token($sock($sockname).mark,2,42) hadd -mu5 $sockname webident $token($sock($sockname).mark,3,42) hadd -mu5 $sockname webchan $hget(chan,$hget($sockname,webnick)) if $hget(chan,$hget($sockname,webnick)) { hdel -m chan $v1 hadd -m giris $hget($sockname,webnick) $hget($sockname,webip) hadd -m sehir $hget($sockname,webnick) $+($chr(40),,$hget($sockname,webulke),-,$hget($sockname,websehir),,$chr(41)) hadd -m ulke $hget($sockname,webnick) $hget($sockname,webulke) tokenize 32 $hget($sockname,webchan) echo $* $+($chr(3),$color(join)) $timestamp Giris: ** $hget($sockname,webnick) $tam($hget($sockname,webident),$hget(giris,$hget($sockname,webnick))) 1 $hget(sehir,$hget($sockname,webnick)) $cesitler($hget($sockname,webulke)) if $ulkekont($hget($sockname,webulke)) { tokenize 32 $hget($sockname,webchan) ban -k $* $hget($sockname,webnick) 2 4Banlandınız. } } sockclose $sockname } } alias cesitler { return - 4"Nick-Ban" 2&4 "IP-Banla" 2&4 "Tum-Kanallardan-At" 2&4 "Shun" 2&4 "Gzline" 2&4 $iif(!$ulkekont($1),"Ulke-Ekle","Ulke-Sil") - } alias ulkekont { if $hfind(banulke,$1,1,W).data { return 1 } } alias tam { return $+($chr(40),$1,@,$2,$chr(41)) } alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } on ^*:hotlink:*"*:#:if ($regex($1,/"(Nick|IP|Gzline|Shun|Ulke)(.+)"$/)) return on *:hotlink:*:*: { var %nick $token($hotline,5,32), %islem $remove($1,") if (%islem == nick-ban) { ban -k $active %nick 1 4 Nick-Ban } if (%islem == ip-banla) { ban -k $active %nick 2 4IP-Ban } if (%islem == shun) { echo -a shun %nick 4Shunlandin } if (%islem == tum-kanallardan-at) { tokenize 32 $regsubex($str(a,$comchan(%nick,0)),/./g,$chr(32) $comchan(%nick,\n) ) ban -k $* %nick 4Tum kanallardan ban. } if (%islem == gzline) { gzline %nick +0 4sunucudan uzaklastirildiniz. } if (%islem == ulke-ekle) { var %rand $rand(0,9999) if $hfind(banulke,$hget(ulke,%nick),1,W).data { echo -a $hget(ulke,%nick) - zaten yasakli ulke listesinde. | return } hadd -m banulke %rand $hget(ulke,%nick) hsave -m banulke banulke.63 echo -a ** $hget(ulke,%nick) - banli listeye eklendi. } if (%islem == ulke-sil) { var %rand $rand(0,9999) if !$hfind(banulke,$hget(ulke,%nick),1,W).data { echo -a $hget(ulke,%nick) - zaten yasakli ulke listesinde bulunmuyor. | return } hdel -m banulke $hfind(banulke,$hget(ulke,%nick),1,W).data hsave -m banulke banulke.63 echo -a ** $hget(ulke,%nick) - ban listesinden silindi. } } on *:start: { if $isfile(banluke.63) { hmake banulke | hload banulke banulke.63 } }


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 10 Ekim 2019, 18:17   #14
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Join Eventi




@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] üstad çok güzel code yazmışsınız, teşekkürler. Statüste şöyle bir uyarı alıyorum sürekli;

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
* /sockopen: 'nrddbulUzmnÇvş' Soket Kullanılıyor (Satır 20, script34.txt) alias bul { sockopen $+(nrddbul,$2)
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 <-- Satır 20 sockmark $+(nrddbul,$2) $+($2,*,$1,*,$3) }

bunun sebebi nedir? Şimdiden teşekkür ederim.

 
Alıntı ile Cevapla

Alt 10 Ekim 2019, 18:22   #15
Çevrimdışı
Set
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Join Eventi




Fredyyy Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] üstad çok güzel code yazmışsınız, teşekkürler. Statüste şöyle bir uyarı alıyorum sürekli;

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
* /sockopen: 'nrddbulUzmnÇvş' Soket Kullanılıyor (Satır 20, script34.txt) alias bul { sockopen $+(nrddbul,$2)
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 <-- Satır 20 sockmark $+(nrddbul,$2) $+($2,*,$1,*,$3) }

bunun sebebi nedir? Şimdiden teşekkür ederim.

O kısmı boyle degiştirip denermisin, denemedim ama o hata'yı tekrar yansitmaz tahminen, dönüs saglarsın herhangi sorunda

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias bul { var %socks = $+(nrddbul,$2) if !$sock(%socks) { sockopen %socks
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 sockmark %socks $+($2,*,$1,*,$3) } }


 
Alıntı ile Cevapla

Alt 10 Ekim 2019, 18:38   #16
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Join Eventi




Teşekkürler hatayı kesti. İyi çalışmalar dilerim.

 
Alıntı ile Cevapla

Alt 14 Ekim 2019, 21:40   #17
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Join Eventi




kodu remoteye ekleyince girisler kanallarda gorunmuyor statuste /who cekip duruyor her girene
nerde hata var?

ayrica bazi kanalari muaf ekleyebilirmiyiz?

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:snotice:*Client connecting on port*:if !$hget(giris,$9) { who +I $9 } on ^*:join:#: { if o isin $usermode && $nick !== $me { if $hget(giris,$nick) { echo # $+($chr(3),$color(join)) $timestamp ** Giris: $nick $tam($hget(ident,$nick),$hget(giris,$nick))) 1 $hget(sehir,$nick) $cesitler($hget(ulke,$nick)) | haltdef } else { hadd -m chan $nick $addtok($hget(chan,$nick),#,32) if !$sock($+(nrdbul,$nick)) { who +I $nick } haltdef } } } alias bul { var %socks = $+(nrddbul,$2) if !$sock(%socks) { sockopen %socks
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 sockmark %socks $+($2,*,$1,*,$3) } } alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } on *:sockopen:nrdbul*:{ sockwrite -nt $sockname GET $+(/ip-address-locator.php?lookup=,$token($sock($sockname).mark,2,42)) HTTP/1.1 sockwrite -nt $sockname Host:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -nt $sockname Connection: keep-alive sockwrite -nt $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8 sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/40.0.2214.111 Safari/537.36 sockwrite -nt $sockname $crlf } on *:sockread:nrdbul*:{ var %x | sockread %x if $regex(%x,/<i>IP Country:</i> <b>(.*?)</b>/i) { hadd -mu5 $sockname webulke $iif($regml(1),$v1,Belirsiz) } if $regex(%x,/<i>IP City: <b>(.*?)</b>/i) { hadd -mu5 $sockname websehir $iif($regml(1),$v1,Belirsiz) } if $regex(%x,/<i>ISP Provider:</i> <b>(.*?)</b>/i) { hadd -mu5 $sockname webisp $regml(1) hadd -mu5 $sockname webnick $token($sock($sockname).mark,1,42) hadd -mu5 $sockname webip $token($sock($sockname).mark,2,42) hadd -mu5 $sockname webident $token($sock($sockname).mark,3,42) hadd -mu5 $sockname webchan $hget(chan,$hget($sockname,webnick)) if $hget(chan,$hget($sockname,webnick)) { hdel -m chan $v1 hadd -m giris $hget($sockname,webnick) $hget($sockname,webip) hadd -m sehir $hget($sockname,webnick) $+($chr(40),,$hget($sockname,webulke),-,$hget($sockname,websehir),,$chr(41)) hadd -m ulke $hget($sockname,webnick) $hget($sockname,webulke) tokenize 32 $hget($sockname,webchan) echo $* $+($chr(3),$color(join)) $timestamp Giris: ** $hget($sockname,webnick) $tam($hget($sockname,webident),$hget(giris,$hget($sockname,webnick))) 1 $hget(sehir,$hget($sockname,webnick)) $cesitler($hget($sockname,webulke)) } sockclose $sockname } } alias cesitler { return - 4"Nick-Ban" 2&4 "IP-Banla" 2&4 "Shun" 2&4 "Gzline" 2&4 $iif(!$ulkekont($1),"Ulke-Ekle","Ulke-Sil" - "Tum-Kanallardan-At") - } alias ulkekont { if $hfind(banulke,$1,1,W).data { return 1 } } alias tam { return $+($chr(40),$1,@,$2,$chr(41)) } alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } on ^*:hotlink:*"*:#:if ($regex($1,/"(Nick|IP|Gzline|Shun|Ulke)(.+)"$/)) return on *:hotlink:*:*: { var %nick $token($hotline,5,32), %islem $remove($1,") if (%islem == nick-ban) { ban -k $active %nick 1 4 Nick-Ban } if (%islem == ip-banla) { ban -k $active %nick 2 4IP-Ban } if (%islem == shun) { echo -a shun %nick 4Shunlandin } if (%islem == tum-kanallardan-at) { tokenize 32 $regsubex($str(a,$comchan(%nick,0)),/./g,$chr(32) $comchan(%nick,\n) ) ban -k $* %nick 4Tum kanallardan ban. } if (%islem == gzline) { gzline %nick +0 4sunucudan uzaklastirildiniz. } if (%islem == ulke-ekle) { var %rand $rand(0,9999) if $hfind(banulke,$hget(ulke,%nick),1,W).data { echo -a $hget(ulke,%nick) - zaten yasakli ulke listesinde. | return } hadd -m banulke %rand $hget(ulke,%nick) hsave -m banulke banulke.63 echo -a ** $hget(ulke,%nick) - banli listeye eklendi. } if (%islem == ulke-sil) { var %rand $rand(0,9999) if !$hfind(banulke,$hget(ulke,%nick),1,W).data { echo -a $hget(ulke,%nick) - zaten yasakli ulke listesinde bulunmuyor. | return } hdel -m banulke $hfind(banulke,$hget(ulke,%nick),1,W).data hsave -m banulke banulke.63 echo -a ** $hget(ulke,%nick) - ban listesinden silindi. } } on *:start: { if $isfile(banluke.63) { hmake banulke | hload banulke banulke.63 } }



Konu OperServ tarafından (14 Ekim 2019 Saat 21:45 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 14 Ekim 2019, 21:52   #18
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Join Eventi




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
raw 352:*:bul $4 $6 $3 | hadd -m ident $6 $3 | haltdef

bu (RAW) satırı silmişsiniz sanırım.

 
Alıntı ile Cevapla

Alt 14 Ekim 2019, 22:23   #19
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Join Eventi




hayir oldugu gibi ekledim birseyi silmedim

 
Alıntı ile Cevapla

Cevapla

Etiketler
bulucu, eventi, join, şehir


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
Güncel Aynı dosyada birden fazla on *:join:#:{ eventi nasıl çalışır Askeribo mIRC Scripting Sorunları 35 10 Mayıs 2016 12:56
Join eventi ile echo sorunu ? Hayat mIRC Scripting Sorunları 8 05 Şubat 2009 00:53
connect eventi mrksmn mIRC Scripting Sorunları 4 28 Temmuz 2007 01:29
Multi join | Mass Clone Join Kuruması.. CoCoRiCo mIRC Scripting Hazır Kodlar 4 12 Aralık 2005 08:29