IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası - Tekil Mesaj gösterimi - Çözüldü !info !nerden gibi hazir kodlari kanala yansitma

Mecnun · 07 Mart 2017, 12:39

Merhaba, öncelikle konuyu yanlış bölüme açmışsınız. Ayrıca bu istedikleriniz forumda kolayca bulabileceğiniz şeyler. Fakat başlık altında sana bir örnekleme yapayım, konuyu yetkili arkadaşlar taşısınlar.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:input:#: { if $1 == .ns { Ns $2 $3-   | set -u3 %Nickserv $chan } }
on 1*:notice:*:?: { if ($nick == Nickserv) && %Nickserv { haltdef | msg %Nickserv   0,2 12,15 NickServ  »5    $1- } }

Bu paylaşmış olduğum kod, ''Nickserv'' servicesine ait tüm komutları kullanabilmemizi sağlıyor.
Kullanım : .ns komut | .ns set komut şeklindedir.
Aklına gelecek her nickserv komutunu kanalda kullanabilirsin buna infoda dahil.

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

Kod: Kodu kopyalamak için üzerine çift tıklayın!

alias htmlfree {  
  var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;)
  return %x  
}
alias nerden { sockopen yerbul 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80  }  
on *:sockopen:yerbul:{  
  sockwrite -n $sockname GET /ip-address-locator.php?lookup= $+ %nrd HTTP/1.1
  sockwrite -n $sockname host: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -n $sockname $crlf  
}  
on *:sockread:yerbul: {  
  var %yerbul
  sockread %yerbul
  if (*<i>*</i><b>* iswm %yerbul) { msg %aktif 4Hostu:2 $gettok($replacecs($htmlfree(%yerbul),Hostname:,@),2,64) }
  if (<i>*</i> <b>* iswm %yerbul) || (<i>*<b>*</b><br />* iswm %yerbul) { msg %aktif 4 $+ $replacecs($gettok($htmlfree(%yerbul),1,58),IP Country,Ülke,Code,Kodu,IP Continent,Kıta,IP Region,Bölge,IP City,Şehir,IP Latitude,Enlem,IP Longitude,Boylam,Organization,Şirket,ISP Provider,Servis Sağlayıcı) $+ : $+ 2 $+ $gettok($htmlfree(%yerbul),2,58) }
}
on *:text:*:#: {
  if ($1 == !nerden) || ($1 == .nerden) && ($2) {
    if ($left($2,1) isnum) { 
      .set -e %nrd $2 | set -e %aktif $active
      .nerden $2
      .timer 1 2 .sockclose nerden  
    }
    else { 
      .userip $2
      .enable #nerdenbul
      set -e %aktif $active
      .nerden $2
      .timer 1 2 .sockclose nerden

    }
  }
}
#nerdenbul off
raw 340:*: {
  set %nrd $gettok($2,2,64)
  .disable #nerdenbul
}
#nerdenbul end

Farklı bir siteye(uzun zamandır kullandığım bir site) göre ayarlamıştım. .nerden ip veya .nerden Nick şeklinde kullanabilirsin veya "!" ünlemde kullanabilirsin (!nerden) şeklinde. Hangi kanalda yaparsan o kanala sonuç verir.
Not: Kodu bu şekilde Scriptine eklersen diğer kullanıcılar tarafından kullanılabilir. Eğer sadece kendin kullanmak istersen ;
Bu Satırı;

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:text:*:#: {

Bunula değiştirin;

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:input:*: {

ikinci kodumuz ise !nerden nick|ip adresi şeklindedir.