Çözüldü Nick Takip Remotesi - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Style35 · 25 Temmuz 2018, 15:45

Arkadaşlar selam, kolay gelsin. İstedigimiz bir nickin bulundugu tüm ortak kanallarda yazdıgı mesajları ayrı bir pencerede görebilirmiyiz acaba? mesela özlem nicki benim de buludugum tum kanallarda ne yazarsa yazsın tek bir pencerede toplansın, mümkün müdür böyle bir şey? tesekkürler..

BlackForce · 26 Temmuz 2018, 22:45

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

on *:text:*:*: if $findtok(%takiplist-,$nick,32) { $iif(!$window(@Takip),.window -en @Takip) | .aline @Takip 2 $+ $chr(171) $+ $time $+ $chr(187) Nick: $nick Kanal: $chan Msg: $1- }
dialog takiplist {
  title "Takip nick listesi"
  size -1 -1 133 150
  option dbu
  edit "", 11, 17 44 60 10
  list 3, 17 54 60 69
  button "Ekle", 4, 85 46 32 12
  button "Sil", 5, 85 66 33 12
  box "Takip edilecek nick'i yaziniz..", 9, 2 32 129 115
  button "Tamam", 10, 12 128 111 15, ok
}
menu status,channel,query {
  -
  Takip Listesi: dialog $iif(!$dialog(takiplist),-m takiplist,-v) takiplist
}
alias takiplist { .dialog -m takiplist takiplist } 
on *:dialog:takiplist:init:*:{ 
  if (%takiplist-) .didtok $dname 3 32 $ifmatch 
} 
on *:dialog:takiplist:sclick:*: {
  if ($did == 4) { if ($did(11) != $null) { set -u %sk $did(11) | if (%sk) && (!$istok(%takiplist-,%sk,32)) { .set %takiplist- $addtok(%takiplist-,%sk,32) | .notify %sk | .notify on | did -a $dname 3 %sk | did -r $dname 11 } } } 
  if ($did == 5) { if ($did(3).sel > 0) { .set %takiplist- $remtok(%takiplist-,$did(3).seltext,1,32) | .notify -r $did(3).seltext | did -d $dname 3 $did(3).sel | did -c $dname 3 1 } } 
}
on ^*:NOTIFY: { $iif(!$window(@Takip),.window -en @Takip) | .aline @Takip 2Takip listesindeki  $nick  nick'i şu anda sunucuda. Tarih/Saat $date $+ / $+ $time }
on ^*:UNOTIFY: { $iif(!$window(@Takip),.window -en @Takip) | .aline @Takip 2Takip listesindeki  $nick  nick'i sunucudan çıkış yaptı. Tarih/Saat $date $+ / $+ $time }

Menüden istediğin nickleri ekleyebilirsin.

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Style35 · 27 Temmuz 2018, 13:38

Hocam harikasınız. çok işime yaradı teşekkür derim sağolasınız.

YouMyCure · 27 Temmuz 2018, 21:10

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

Arkadaşlar selam, kolay gelsin. İstedigimiz bir nickin bulundugu tüm ortak kanallarda yazdıgı mesajları ayrı bir pencerede görebilirmiyiz acaba? mesela özlem nicki benim de buludugum tum kanallarda ne yazarsa yazsın tek bir pencerede toplansın, mümkün müdür böyle bir şey? tesekkürler..

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

on *:Text:*:*: {
  if $nick == TAKIP_NICK { 
    window @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ı
    echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ı $+([,$time,]) $+(4,$chan) $+(2,$nick,5) $1-
  }
}

TAKIP_NICK yazan yere o kişinin nickini yazarak şu şekilde görüntüleyebilirsin;

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Style35 · 01 Ağustos 2018, 19:05

Çok teşekkürler hocam. Peki bu pencerenin logunu tutmamız mumkun mudur?

BlackForce · 01 Ağustos 2018, 19:22

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

Çok teşekkürler hocam. Peki bu pencerenin logunu tutmamız mumkun mudur?

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

on *:start: /notify on | echo -a 9Notify takip listesi için aktif edildi. 
on *:text:*:*: if $findtok(%takiplist-,$nick,32) { $iif(!$window(@Takip),.window -en @Takip) | .aline @Takip 2 $+ $chr(171) $+ $time $+ $chr(187) Nick: $nick Kanal: $chan Msg: $1- | write takiplog.txt $chr(171) $+ $time $+ $chr(187) Nick: $nick Kanal: $chan Msg: $1- }
dialog takiplist {
  title "Takip nick listesi"
  size -1 -1 133 150
  option dbu
  edit "", 11, 17 44 60 10
  list 3, 17 54 60 69
  button "Ekle", 4, 85 46 32 12
  button "Sil", 5, 85 66 33 12
  box "Takip edilecek nick'i yaziniz..", 9, 2 32 129 115
  button "Tamam", 10, 12 128 111 15, ok
}
menu status,channel,query {
  -
  Takip Listesi: dialog $iif(!$dialog(takiplist),-m takiplist,-v) takiplist
}
alias takiplist { .dialog -m takiplist takiplist } 
on *:dialog:takiplist:init:*:{ 
  if (%takiplist-) .didtok $dname 3 32 $ifmatch 
} 
on *:dialog:takiplist:sclick:*: {
  if ($did == 4) { if ($did(11) != $null) { set -u %sk $did(11) | if (%sk) && (!$istok(%takiplist-,%sk,32)) { .set %takiplist- $addtok(%takiplist-,%sk,32) | .notify %sk | .notify on | did -a $dname 3 %sk | did -r $dname 11 } } } 
  if ($did == 5) { if ($did(3).sel > 0) { .set %takiplist- $remtok(%takiplist-,$did(3).seltext,1,32) | .notify -r $did(3).seltext | did -d $dname 3 $did(3).sel | did -c $dname 3 1 } } 
}
on ^*:NOTIFY: { $iif(!$window(@Takip),.window -en @Takip) | .aline @Takip 2Takip listesindeki  $nick  nick'i şu anda sunucuda. Tarih/Saat $date $+ / $+ $time | write takiplog.txt Takip listesindeki $nick nick'i $date $+ / $+ $time tarihinde sunucuya giriş yapti. }
on ^*:UNOTIFY: { $iif(!$window(@Takip),.window -en @Takip) | .aline @Takip 2Takip listesindeki  $nick  nick'i sunucudan çıkış yaptı. Tarih/Saat $date $+ / $+ $time | write takiplog.txt Takip listesindeki $nick nick'i $date $+ / $+ $time tarihinde sunucudan çıkış yapti. }

Arkadasin paylastigi icin;

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

on *:Text:*:*: {
  if $nick == TAKIP_NICK { 
    window @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ı
    echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ı $+([,$time,]) $+(4,$chan) $+(2,$nick,5) $1-
    write takiplog.txt $+([,$time,]) $chan $nick $1-
  }
}

takiplog.txt'nin içine loglanır boyle hocam

Style35 · 01 Ağustos 2018, 19:26

BlackForce 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!

on *:start: /notify on | echo -a 9Notify takip listesi için aktif edildi. 
on *:text:*:*: if $findtok(%takiplist-,$nick,32) { $iif(!$window(@Takip),.window -en @Takip) | .aline @Takip 2 $+ $chr(171) $+ $time $+ $chr(187) Nick: $nick Kanal: $chan Msg: $1- | write takiplog.txt $chr(171) $+ $time $+ $chr(187) Nick: $nick Kanal: $chan Msg: $1- }
dialog takiplist {
  title "Takip nick listesi"
  size -1 -1 133 150
  option dbu
  edit "", 11, 17 44 60 10
  list 3, 17 54 60 69
  button "Ekle", 4, 85 46 32 12
  button "Sil", 5, 85 66 33 12
  box "Takip edilecek nick'i yaziniz..", 9, 2 32 129 115
  button "Tamam", 10, 12 128 111 15, ok
}
menu status,channel,query {
  -
  Takip Listesi: dialog $iif(!$dialog(takiplist),-m takiplist,-v) takiplist
}
alias takiplist { .dialog -m takiplist takiplist } 
on *:dialog:takiplist:init:*:{ 
  if (%takiplist-) .didtok $dname 3 32 $ifmatch 
} 
on *:dialog:takiplist:sclick:*: {
  if ($did == 4) { if ($did(11) != $null) { set -u %sk $did(11) | if (%sk) && (!$istok(%takiplist-,%sk,32)) { .set %takiplist- $addtok(%takiplist-,%sk,32) | .notify %sk | .notify on | did -a $dname 3 %sk | did -r $dname 11 } } } 
  if ($did == 5) { if ($did(3).sel > 0) { .set %takiplist- $remtok(%takiplist-,$did(3).seltext,1,32) | .notify -r $did(3).seltext | did -d $dname 3 $did(3).sel | did -c $dname 3 1 } } 
}
on ^*:NOTIFY: { $iif(!$window(@Takip),.window -en @Takip) | .aline @Takip 2Takip listesindeki  $nick  nick'i şu anda sunucuda. Tarih/Saat $date $+ / $+ $time | write takiplog.txt Takip listesindeki $nick nick'i $date $+ / $+ $time tarihinde sunucuya giriş yapti. }
on ^*:UNOTIFY: { $iif(!$window(@Takip),.window -en @Takip) | .aline @Takip 2Takip listesindeki  $nick  nick'i sunucudan çıkış yaptı. Tarih/Saat $date $+ / $+ $time | write takiplog.txt Takip listesindeki $nick nick'i $date $+ / $+ $time tarihinde sunucudan çıkış yapti. }

Arkadasin paylastigi icin;

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

on *:Text:*:*: {
  if $nick == TAKIP_NICK { 
    window @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ı
    echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ı $+([,$time,]) $+(4,$chan) $+(2,$nick,5) $1-
    write takiplog.txt $+([,$time,]) $chan $nick $1-
  }
}

takiplog.txt'nin içine loglanır boyle hocam

Hocam ellerinize sağlık. Çok teşekkür ederim, kolay gelsin.

YouMyCure · 01 Ağustos 2018, 20:08

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

Çok teşekkürler hocam. Peki bu pencerenin logunu tutmamız mumkun mudur?

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

on *:Text:*:*: {
  if $nick == TAKIP_NICK { 
mkdir windowlogs
    window @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ı
    echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ı $+([,$time,]) $+(4,$chan) $+(2,$nick,5) $1-
write $+($mircdir,/windowlogs/,$gettok($date,1,$asc(/)),$gettok($date,2,$asc(/)),$gettok($date,3,$asc(/)),.txt) $1-
  }
alias benimlog { run $mircdir/windowlogs }
}

şeklinde yaparsan mirc klasörünün icersine windowlogs klasoru olusturur ve bunun içerine;
31072018.txt
01082018.txt
02082018.txt
gibi dosyalar oluşturup günlük içerisine ekler.

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

/benimlog

komutu ile log klasörüne gidebilirsin

Tinba · 13 Ağustos 2018, 01:07

Bunu Bota Nasıl Editlerim Örnek #Admin Kanalında !takip Ekle YouMyCure !takip sil YouMyCure Yazıp Kanal Genellerinde YouMyCure Yazdıklarını Nasıl Takip Ederim

YouMyCure · 13 Ağustos 2018, 12:35

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

Bunu Bota Nasıl Editlerim Örnek #Admin Kanalında !takip Ekle YouMyCure !takip sil YouMyCure Yazıp Kanal Genellerinde YouMyCure Yazdıklarını Nasıl Takip Ederim

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

on *:Text:*:*: {
  if ($chan == #Admin) {
    if $regex($1,/^[!.]tak[ıiİ]p$/Si) {
      if $2 == ekle {
        if !$hget(takip) { hmake takip 100 }
        hadd takip $3
        notice $nick $3 takip list eklendi
      }
      if $2 == sil {
        hdel takip $3
        notice $nick $3 takip list silindi
      }
      if $2 == list {
        var %i 1
        while %i <= $hget(takip,0).data {
          notice $nick $hget(takip,%i).data
          inc %i
        }
      }
    }
  }
  var %q 1
  while %q <= $hget(takip,0).data {
  if $nick == $hget(takip,%i).data { 
  mkdir windowlogs
    window $+(@,$hget(takip,%i).data)
    echo $+(@,$hget(takip,%i).data) $+([,$time,]) $+(4,$chan) $+(2,$nick,5) $1-
    write $+($mircdir,/windowlogs/,$gettok($date,1,$asc(/)),$gettok($date,2,$asc(/)),$gettok($date,3,$asc(/)),.txt) $1-
  }
  inc %1
  } 
  alias benimlog { run $mircdir/windowlogs }
}

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Çözüldü Bad Nick Remotesi	Khal	mIRC Scripting Sorunları	3	04 Şubat 2015 16:05
Nick kayıt remotesi ile ilgili sorun	Freya	mIRC Scripting Sorunları	1	15 Ocak 2014 15:17
uzun nick remotesi uzun harfLi nick	LanetLy	mIRC Scripting Hazır Kodlar	7	20 Şubat 2012 11:37
Nick Flood Remotesi	BirDiLimAsK	mIRC Scripting Sorunları	10	17 Kasım 2011 14:50

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.