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/)
-   -   !ip Nick Yazınca Ip Gösterme Acil Yardım :S (https://www.ircforumlari.net/mirc-scripting-sorunlari/380984-ip-nick-yazinca-ip-gosterme-acil-yardim-s.html)

xMicrosofT 04 Şubat 2011 21:16
!ip Nick Yazınca Ip Gösterme Acil Yardım :S
 
Arkadaslar deminden berri ugrasıyorum da olmuyor

!ip nick yazdıgımda nick nickinin ip adresini #opers e yansıtması cok ugrastım bu sefer size danısim dedim yardımlarınızı bekliyorum

örnek:

#opers kanalına !ip urgy yazdım ve
#opers kanalında
Ip Sonuc:
Nick: [ Urgy ]
Ip: [ 88.451.67.12 ]

Gibi olucak :S

SiLuet 04 Şubat 2011 22:13
Cevap: !ip Nick Yazınca Ip Gösterme Acil Yardım :S
 
Kod:
on *:text:!ip*:#Opers: { who $2 | enable #ipcontrol }
#ipcontrol off
raw 352:*: {
  msg  #opers 4Ip Sonuc:
  msg  #opers 4Nick: $+($chr(91),$6,$chr(93))
  msg  #opers  4Host: $+($chr(91),$4,$chr(93))
  disable #ipcontrol
  halt
}
#ipcontrol end
İşini Görürü Umarım.

CesuryureK 04 Şubat 2011 23:34
Cevap: !ip Nick Yazınca Ip Gösterme Acil Yardım :S
 
Siluet,

Who komutu neticesinde Host verir IP adresi verilmez.
+
Kişi kendisi !Ip Nick diyecek o yüzden Text eventi değil input eventini kullanacağız.
+
Ip adresini almak için Userip komutunu kullanmamız kafi.

Kod:

on *:input:*: {
  if ($1 == !ip) && !$2 { echo -a Nick Belirtmediniz! | halt }
  elseif ($1 == !Ip) && $2 {
    userip $2 | set -u5 %operip on
  }
}
raw 340:*: {
  if (%operip == on) {
    msg #Opers Ip Sonuç Bilgisi
    msg #Opers Nick: $+([,$gettok($2,1,61),])
    msg #Opers IP: $+([,$gettok($2,2,64),])
  }
}

SiLuet 05 Şubat 2011 09:49
Cevap: !ip Nick Yazınca Ip Gösterme Acil Yardım :S
 
Alıntı:
CesuryureK Nickli Üyeden Alıntı (Mesaj 1040671151)
Siluet,

Who komutu neticesinde Host verir IP adresi verilmez.
+
Kişi kendisi !Ip Nick diyecek o yüzden Text eventi değil input eventini kullanacağız.
+
Ip adresini almak için Userip komutunu kullanmamız kafi.

Kod:

on *:input:*: {
  if ($1 == !ip) && !$2 { echo -a Nick Belirtmediniz! | halt }
  elseif ($1 == !Ip) && $2 {
    userip $2 | set -u5 %operip on
  }
}
raw 340:*: {
  if (%operip == on) {
    msg #Opers Ip Sonuç Bilgisi
    msg #Opers Nick: $+([,$gettok($2,1,61),])
    msg #Opers IP: $+([,$gettok($2,2,64),])
  }
}

Coder ile Acemi ARasındaki Farkda Bu Olsa gerek :)
Benim verdiğimde Dolaylıda Olsa Bir Cevapdır ama Senin daha öncede Soyledigin Gibi Yapabildiginin En iyisi ve Direk Sonuca Gitmesi Gerek .
Eyv. Usta Daha Ögrenecegimiz Çok Şey Var.

BeReLi 20 Ocak 2019 16:14
Cevap: !ip Nick Yazınca Ip Gösterme Acil Yardım :S
 
Alıntı:
CesuryureK Nickli Üyeden Alıntı (Mesaj 1040671151)
Siluet,

Who komutu neticesinde Host verir IP adresi verilmez.
+
Kişi kendisi !Ip Nick diyecek o yüzden Text eventi değil input eventini kullanacağız.
+
Ip adresini almak için Userip komutunu kullanmamız kafi.

Kod:

on *:input:*: {
  if ($1 == !ip) && !$2 { echo -a Nick Belirtmediniz! | halt }
  elseif ($1 == !Ip) && $2 {
    userip $2 | set -u5 %operip on
  }
}
raw 340:*: {
  if (%operip == on) {
    msg #Opers Ip Sonuç Bilgisi
    msg #Opers Nick: $+([,$gettok($2,1,61),])
    msg #Opers IP: $+([,$gettok($2,2,64),])
  }
}
Bu Koda ek olarak !nerden ekleyebilirmiyiz peki ?

Alper 20 Ocak 2019 17:12
Cevap: !ip Nick Yazınca Ip Gösterme Acil Yardım :S
 
Alıntı:
Tamer Genc Nickli Üyeden Alıntı (Mesaj 1042027527)
Bu Koda ek olarak !nerden ekleyebilirmiyiz peki ?

Kod:
alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } }
alias nereden {
  var %:r2 = $r(1,999999999999)
  .sockopen $+(pro,%:r2)
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80
  .sockmark $+(pro,%:r2) $1
}
on *:input:*: {
  if ($1 == !ip) && !$2 { echo -a Nick Belirtmediniz! | halt }
  elseif ($1 == !Ip) && $2 {
    userip $2 | set -u5 %operip on
  }
}
raw 340:*: {
  if (%operip == on) {
    if !$istok(%ipnerden,$gettok($2,1,61),32) { set %ipnerden $addtok(%ipnerden,$gettok($2,1,61),32) }
    if !$istok(%ipnerden,$gettok($2,2,64),32) { set %ipnerden $addtok(%ipnerden,$gettok($2,2,64),32) }
    nereden $gettok($2,2,64)
  }
}
on *:sockopen:pro*:{
  sockwrite -nt $sockname GET $+(/ip-address-locator.php?lookup=,$sock($sockname).mark) 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:pro*:{ 
  if ($sockerr) { .sockclose $sockname | return }
  var %:pro
  sockread %:pro
  if (IP Country: isin %:pro) { set %ipnerden $addtok(%ipnerden,$iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)),32) }
  if (IP City: isin %:pro) {
    set %ipnerden $addtok(%ipnerden,$iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)),32)
    msg #Opers Ip Sonuç Bilgisi
    msg #Opers Nick: $+([,$token(%ipnerden,1,32),])
    msg #Opers IP: $+([,$token(%ipnerden,2,32),])
    msg #Opers Ülke: $+([,$token(%ipnerden,3,32),])
    msg #Opers Şehir: $+([,$token(%ipnerden,4,32),])
    unset %ipnerden
  }
}

Bu şekilde dener misin


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

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