IRCRehberi.Net- Türkiyenin En iyi IRC ve Genel Forum Sitesi  
 sohbet
derya sohbet


mIRC Scripting Sorunları - Yardım mIRC Scripting ile ilgili sorunlariniza ait güncel yanıtlara bu başlık altından ulaşabilirsiniz.

2Beğeni(ler)
  • 1 Post By Mahrez
  • 1 Post By Mahrez


 
 
Seçenekler Stil
Alt 13 Mayıs 2021, 12:44   #1
NCL
Mahrez - ait Kullanıcı Resmi (Avatar)

Standart Giriş Yansıtma Remote Sorunu.

Merhabalar Değerli, IRCRehberi Kullanıcıları. Öncelikle Hepinize Mutlu Bayramlar diliyorum.

Bahsettiğim giriş yansıtma remotesınde belirtilen kanala bir müddet sonra yansıtmamaya başladı muhtemelen adresten kaynaklı bir sorun diye düşünüyorum bu konuda yardımınızı rica ediyorum sevgiler..

Kod

on ^*!:nick: {
  if $regex($usermode,o) { set %tkp. [ $+ [ $newnick ] ] 1 | who +I $newnick }
}

on *:start: {
  if $isfile(iptakip.63) { hmake iptakip | hload iptakip iptakip.63 }
}

#giriste on
;on *:snotice:*Client connecting on port*:who +I $9
on *:snotice:*: {
  if $regex($1-,/Client connecting (on port|at)/Si) { who +I $token($token($1-,1,40),-1,32) }
  elseif $regex($1-,/Sunucuya baglaniyor\.\.\. Baglanan\: (.+) \((.+)\@(.+)\) \- Port\: (.+)/Si) { who +I $regml(1) }
}
raw 352:*:var %:r $r(1000,99999) | sockopen -e $+(pro,%:r) www.ipaddresslocation.org 443 | sockmark $+(pro,%:r) $+($4,¿,$6)
alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } 
alias gtekrar { who +I $regml(1) }
on *:sockopen:pro*:{ 
  sockwrite -nt $sockname GET $+(/locator.php?lookup=,$token($sock($sockname).mark,1,191)) HTTP/1.1 
  sockwrite -nt $sockname Host: www.ipaddresslocation.org 
  sockwrite -nt $sockname Connection: close
  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 10.0; Win64; x64; rv:87.0) Gecko/20100101 Firefox/87.0
  sockwrite -nt $sockname $crlf
}
on *:sockread:pro*:{
  var %:pro
  sockread %:pro
  if $regex(u,%:pro,/IP Country\x3A\x20(\S+)\x20/Si) { .hadd -m $token($sock($sockname).mark,2,191) Ülke $iif($htmlfree($regml(u,1)) == $null,Belirsiz,$htmlfree($regml(u,1))) }
  if $regex(c,%:pro,/Town\x3A\x20(\S+)\x20/Si) { .hadd -m $token($sock($sockname).mark,2,191) Sehir $iif($htmlfree($regml(c,1)) == $null,Belirsiz,$htmlfree($regml(c,1))) }
  if $regex(i,%:pro,/ISP Provider\x3A\x20(.+)<hr>/Si) {
    var %:isp $iif($htmlfree($regml(i,1)) == $null,Belirsiz,$htmlfree($regml(i,1)))
    var %:n $token($sock($sockname).mark,2,191), %ip $token($sock($sockname).mark,1,191), %ülke $hget(%:n,Ülke), %sehir $hget(%:n,Sehir)
    msg #MersinLi 14,1 Nick:0 %:n 1... 14IP:0 %ip 1... 14Ülke:0 %ülke 1... 14Şehir:0 %sehir 1... 14ISP:0 %:isp  2 $iif($hget(iptakip,%ip),Eski Giriş Bulundu:  $v1) 
    hadd -m iptakip %ip $addtok($hget(iptakip,%ip),%:n,32)
    hsave iptakip iptakip.63
    .hfree -sw %:n
    sockclose $sockname
  }
}
#giriste end
menu menubar {
  +> IP GIRIS
  ..Aç:!if $group(#giriste).status = on { echo 4 -tgae IP NERDEN Zaten AÇIK } | else { /.enable #giriste | echo 4 -tgae IP NERDEN AÇILDI | set %giriste on  }
  ..Kapat:!if $group(#giriste).status = off { echo 4 -tgae IP NERDEN Zaten KAPALI } | else { /.disable #giriste | echo 4 -tgae IP NERDEN KAPATILDI | set %giriste off  }
  ..Durum < $replace($group(#giriste).status, off, Kapalı, on, Açık) >:.
}

menu nicklist   {
  NickKontrol: if $regex($usermode,o) { set %tkp. [ $+ [ $1 ] ] 1 | who +I $$1 }
}
________________

"Fark etmek acıydı ama gerekliydi."
 
Alt 13 Mayıs 2021, 13:10   #2
Standart

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Emeğine sağlık, paylaşım için teşekkürler.

________________

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
 
Alt 13 Mayıs 2021, 13:14   #3
NCL
Mahrez - ait Kullanıcı Resmi (Avatar)

Standart

Alıntı:
KuzenKit Nickli Üyeden Alıntı Mesajı göster
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Emeğine sağlık, paylaşım için teşekkürler.
Sevgili kardeşim var olan kod hakkında yardım istedim saygılar.

________________

"Fark etmek acıydı ama gerekliydi."
 
Alt 16 Mayıs 2021, 17:39   #4
WwW.DamlaChat.Com
YekTa - ait Kullanıcı Resmi (Avatar)

Standart

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] kod yansıtıyor yansıtmada sorun yok aslında ama siteyle alakalı olan sorun bazen sehir belirsiz olarak gösteriyor bazende sorunsuz calısıyor siteye mail attım önceden daha baska hata veriordu suan o hata yok düzeliyor gibi bakalım ama bence senin sorunun ssl kurmadıgın için yansıtmıyor su konuya bak sen

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

 


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 Kapalı
Refbacks are Kapalı





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