IRCForumlarý - IRC ve mIRC Kullanýcýlarýnýn Buluþma Noktasý

IRCForumlarý - IRC ve mIRC Kullanýcýlarýnýn Buluþma Noktasý (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunlarý (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   þehir takip (https://www.ircforumlari.net/mirc-scripting-sorunlari/433241-sehir-takip.html)

Gulsum 02 Mayýs 2012 11:05

Cevap: þehir takip
 
çalýþmadý.

muratt_aziz 02 Mayýs 2012 20:50

Cevap: þehir takip
 
mircinde kanal özel farketmez sað týklayýp Þehir Takip yazýsý üzerine gelip sekmesini týkla ardýndan þu þekilde komut gir

//set %halat 176.55.156.5 | klk

Eðer buþekildede BÝR SONUÇ alamaz isen sorun kodlamayala ilgili deðil demektir

Gulsum 03 Mayýs 2012 00:23

Cevap: þehir takip
 
burda verilen türkçe mirc 6.35 kullanýyorum herhangi bi oynama yapmadým rawlarla.olmadý verdiðin. ben zaten yeni code istemiyorum benim istediðim aþþaðýdaki vermiþ olduðum code þehir takibi nick takibi felan deðil konyuyu buraya actým sadece.bu code whois cektiðim kiþinin hangi þehirde yaþadýðýný gösteriyo.bu codenin önceden çok güzel çalýþýyo iken þimdi çalýþmamasýnýn sebebi nedir.düzeltilebilirmi.

on *:sockopen:city*: {
var %komut sockwrite -nt $sockname
%komut GET $+(/ip/,$token($sock($sockname).mark,2,42)) HTTP1.1/
%komut Host: whatismyipaddress.com
%komut $crlf
}
on *:sockread:city*: {
var %/ | sockread %/
if ($regex(%/,State/Region)) set %ipsehir [ $+ [ $token($sock($sockname).mark,2,42) ] ] $token($remove(%/,<tr>,<th>,</tr>,</th>,</td>,<td>),2,58)
if ($regex(%/,City:)) set %ipyer [ $+ [ $token($sock($sockname).mark,2,42) ] ] $token($remove(%/,<tr>,<th>,</tr>,</th>,</td>,<td>),2,58)
}
on *:sockclose:city*: {
var %nick $token($sock($sockname).mark,1,42), %ip $token($sock($sockname).mark,2,42)
echo -as Bilgi:2 %nick 6IP:2 %ip 6Sehir:2 %ipsehir [ $+ [ $token($sock($sockname).mark,2,42) ] ] 6Yer:2 %ipyer [ $+ [ $token($sock($sockname).mark,2,42) ] ]
unset %ipsehir [ $+ [ $token($sock($sockname).mark,2,42) ] ] %ipyer [ $+ [ $token($sock($sockname).mark,2,42) ] ]
}
alias cit {
var %rand $rand(0,99999)
sockopen $+(city,%rand) whatismyipaddress.com 80
sockmark $+(city,%rand) $1
}
raw 378:*: { cit $+($2,*,$gettok($gettok($1-,2,64),2,32)) | haltdef }
alias city {
if ($1 == on) { set %city on | echo -ea Giris-City Sistem Open! }
if ($1 == off) { set %city off | echo -ea Giris-City Sistem Deopen! }
}

muratt_aziz 03 Mayýs 2012 22:31

Cevap: þehir takip
 
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

sizin verdiðiniz kod'un verileri aldýðý site den alýnan cvplar bunlar
ip ülke þehir ve kordinatlarý

Ben bir ip takip veya nick takipten bahsetmedim verdiðim kod da çalýþýyor ilkkez kod yazmýyorum


//set %halat 176.55.156.5 | klk bunu yaz deme sebebim Kod senin mircte çalýþýyormu bakmaktý çalýþmýyor dedin kime dene dediysem çalýþýyor dedi iþte kanýtý resimde herkes gibi size yardýmcý olmaktý amaç bu tür kodlarýn yazarlarý sizler gibilerin butür tavýrlarý yüzüne artýk kod yazmýyor yardýmda bulunmuyor Acaba neden nerde kod yazan coderler Ben söyliyim yaptýklarý yardýmlar karþýlýðý aldýklarý tavýrlar yüzüne gerek duymuyorlar yazmaya

ha Þunuda diyeyim mirc editleyenler bir cok konu ve postta cvp atanlarýn yüzde 10 u kod yazamýyor gercek coderler az sayýda size kolay gelsin artýk


Alýntý:

muratt_aziz Nickli Üyeden Alýntý (Mesaj 1041107544)
mircinde kanal özel farketmez sað týklayýp Þehir Takip yazýsý üzerine gelip sekmesini týkla ardýndan þu þekilde komut gir

//set %halat 176.55.156.5 | klk

Eðer buþekildede BÝR SONUÇ alamaz isen sorun kodlamayala ilgili deðil demektir


Gulsum 04 Mayýs 2012 00:32

Cevap: þehir takip
 
whois cektiðim kiþinin ip adresi bu Baðlandýðý IP : 178.233.232.115
codun gösterdiði ise bu
IP Address: 176.55.156.5
Vodafone Telekomunikasyon A.S.Organization
Ülke: Turkey
Þehir: Samsun
Enlem: 41.2867
Boylam: 36.33

Z-Lined 04 Mayýs 2012 08:55

Cevap: þehir takip
 
Yahu Verdiðiniz kodlar Cidden ÇAlýþmýyor. Whois Cekýyorum ßir Cevap Vermiyor
//set %halat 176.55.156.5 | klk Murat_Aziz Bunu Yap Demiþsin Onu Yapýnca Bu Seferde Kime Whois Çeksen Ayný Yerleri Veriyor. Düzgün Verseniz Þu kodu Olmazmý? : )

Gulsum 04 Mayýs 2012 11:50

Cevap: þehir takip
 
yardýmlarýn için teþekkür ederim . ama ben verdiðim codun çalýþmama sebebini bulmak istiyorum farklý code istemiyorum aþþaðýdakini düzeltemezmiyiz.
on *:sockopen:city*: {
var %komut sockwrite -nt $sockname
%komut GET $+(/ip/,$token($sock($sockname).mark,2,42)) HTTP1.1/
%komut Host: whatismyipaddress.com
%komut $crlf
}
on *:sockread:city*: {
var %/ | sockread %/
if ($regex(%/,State/Region)) set %ipsehir [ $+ [ $token($sock($sockname).mark,2,42) ] ] $token($remove(%/,<tr>,<th>,</tr>,</th>,</td>,<td>),2,58)
if ($regex(%/,City:)) set %ipyer [ $+ [ $token($sock($sockname).mark,2,42) ] ] $token($remove(%/,<tr>,<th>,</tr>,</th>,</td>,<td>),2,58)
}
on *:sockclose:city*: {
var %nick $token($sock($sockname).mark,1,42), %ip $token($sock($sockname).mark,2,42)
echo -as Bilgi:2 %nick 6IP:2 %ip 6Sehir:2 %ipsehir [ $+ [ $token($sock($sockname).mark,2,42) ] ] 6Yer:2 %ipyer [ $+ [ $token($sock($sockname).mark,2,42) ] ]
unset %ipsehir [ $+ [ $token($sock($sockname).mark,2,42) ] ] %ipyer [ $+ [ $token($sock($sockname).mark,2,42) ] ]
}
alias cit {
var %rand $rand(0,99999)
sockopen $+(city,%rand) whatismyipaddress.com 80
sockmark $+(city,%rand) $1
}
raw 378:*: { cit $+($2,*,$gettok($gettok($1-,2,64),2,32)) | haltdef }
alias city {
if ($1 == on) { set %city on | echo -ea Giris-City Sistem Open! }
if ($1 == off) { set %city off | echo -ea Giris-City Sistem Deopen! }
}

muratt_aziz 05 Mayýs 2012 00:00

Cevap: þehir takip
 
Daha öncede dediðim gibi sunuculardan birinde en az oper gerekliki ben takýlmýyorum sunuculara

2: whois rawlarý genellikle raw 378 $3 denk gelmektedirki bu sunucuya göre deðiþmektedir 311 $3 $4 de olabildiði gibi gercek ipin bulunduðu raw ve $1 cinsinden denk geldiði veriye bakýlmalý

3: vermiþ olduðunuz kod þehir ülke olarakmý yanýt veriiyordu size kordinatlarý da istiyormusunuz

þu þekilde denermisiniz kodu
Kod:

on *:sockopen:city*: {
  on *:sockopen:city*: {
    sockwrite -n $sockname GET /ip/ $+ %halat HTTP/1.1
    sockwrite -n $sockname Accept: text/html, application/xhtml+xml, */*
    sockwrite -n $sockname Accept-Language: tr-TR
    sockwrite -n $sockname User-Agent: Mozilla/5.0 (compatible; MSIE 9.0; Windows NT 6.1; WOW64; Trident/5.0)
    sockwrite -n $sockname Host: whatismyipaddress.com
    sockwrite -n $sockname DNT: 1
    sockwrite -n $sockname Connection: Keep-Alive
    sockwrite -n $sockname $crlf
  }
}
on *:sockread:city*: {
  var %/ | sockread %/
  if <meta name="description" content="Location: isin %/ {
    set %ipyer $gettok($gettok(%tt,2,58),2,32)
    set %ipsehir $gettok($gettok(%tt,2,58),1,32)
    set %Baðlantý $gettok($gettok(%tt,2,58),15-,32)
  }
}
on *:sockclose:city*: {
  var %nick $token($sock($sockname).mark,1,42), %ip $token($sock($sockname).mark,2,42)
  echo -as Baðlantý türü:2 %Baðlantý
  echo -as Bilgi:2 %nick 6IP:2 %ip 6Sehir:2 %ipsehir [ $+ [ $token($sock($sockname).mark,2,42) ] ] 6Yer:2 %ipyer [ $+ [ $token($sock($sockname).mark,2,42) ] ]
  unset %ipsehir [ $+ [ $token($sock($sockname).mark,2,42) ] ] %ipyer [ $+ [ $token($sock($sockname).mark,2,42) ] ]
}
alias cit {
  var %rand $rand(0,99999)
  sockopen $+(city,%rand) whatismyipaddress.com 80
  sockmark $+(city,%rand) $1
}
raw 378:*: { set %halat $remove($3,@,*) | cit %halat | haltdef }
alias city {
  if ($1 == on) { set %city on | echo -ea Giris-City Sistem Open! }
  if ($1 == off) { set %city off | echo -ea Giris-City Sistem Deopen! }
}


Gulsum 05 Mayýs 2012 00:19

Cevap: þehir takip
 
olmadý þöle gsteriyo
Baðlantý türü:
Bilgi: is IP: Sehir: Yer:
hiçbi bilgi yok

muratt_aziz 05 Mayýs 2012 18:23

Cevap: þehir takip
 
sunucu whois raw ve nolarý bulmak için yapman gereken birkac iþlem var

öncelikle miricnde /debug @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] komutunu gir
Ardýndan whois cekbirine @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] penceresinde gercek ip yani kiþinin ip sinni olduðu satýrý buraya kopyala

örnek ben whois cekince aldýðým veriler @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] penceresindekiler þunlar

> IRC.sunucu.Com WHOIS yqq
<- :IRC.sunucu.Com 311 yqq yqq _______ DC8A94B0.A3539D4D.B40E5340.IP * :Û©ÛžÛ© Û©ÛžÛ©
<- :IRC.sunucu.Com 378 yqq yqq : [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 176.55.141.207 adresinden baðlantý kuruyor
<- :IRC.sunucu.Com 319 yqq yqq :#Sohbet #Kelime #Radyo
<- :IRC.sunucu.Com 312 yqq yqq IRC.sunucu.Com :sunucu.Com IRC Server
<- :IRC.sunucu.Com 318 yqq yqq :Kiþi bilgi (/WHOIS) bilgisi sonu

Görüldüðü gibi raw 378 ip adresine takavvul ediyor Bu 311 de olabilir $3 veya $4 de de deng gelebilir bunu bilmeliyiz þuandaki sýkýntý ip adresini alamamamýz socket verilerinde bir sorun yok


Tüm Zamanlar GMT +3 Olarak Ayarlanmýþ. Þuanki Zaman: 14:28.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk