Cevap: başkasının konuşmasını başka kanala aktarma Alıntı: Subzero Nickli Üyeden Alıntı
(Mesaj 1042589705)
Kod:
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 } Mouse ile sag tıkla Takip Diye bişey cıkacak karşına oraya öykünazı ekle sag tarafta @Takip penceresine bak bakalım beşki bu işine yarar. haber veririsn sana zahmet
Örnek ; Kod:
«21:02:09» Nick: BamteliFM Kanal: #Radyo Msg: * BamteliFM su anda online ve istek paneli KAPALIDIR.
«21:02:09» Nick: BamteliFM Kanal: #Radyo Msg: Calan Parca : Aynur Aydin Gunah Sevap
«21:02:09» Nick: BamteliFM Kanal: #Radyo Msg: Radyomuzu 194 kisi dinliyor.
«21:02:09» Nick: BamteliFM Kanal: #Radyo Msg: Rekor DJ : Dj BuKe Rekor : 220 Zamanı : 01 Ocak 2022 Cumartesi - 16:15:21
«21:02:09» Nick: BamteliFM Kanal: #Radyo Msg:
«21:02:09» Nick: BamteliFM Kanal: #Radyo Msg: Radyomuzu Winamp'tan dinlemek için http://radyo.bamtelifm.com:7575/listen.pls
«21:02:09» Nick: BamteliFM Kanal: #Radyo Msg:
«21:02:09» Nick: BamteliFM Kanal: #Radyo Msg: Radyomuzu Web/IOS/Android cihazlarınızdan dinlemek için Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. güzel teşekkür ettim... | Subzero | 01 Ocak 2022 23:19 | Cevap: başkasının konuşmasını başka kanala aktarma | Cevap: başkasının konuşmasını başka kanala aktarma | YouMyCure | 01 Mart 2022 21:13 | Cevap: başkasının konuşmasını başka kanala aktarma Kod:
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- } bu kisimi Kod:
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 $+($nick,.txt) $time Nick: $nick Kanal: $chan Msg: $1- } Değiştir,
Mirc anadizininde nick.txt isimli dosyaya kaydedilir. Alıntı: Giant Nickli Üyeden Alıntı
(Mesaj 1042632549)
| | OperServ | 08 Nisan 2022 02:01 | Cevap: başkasının konuşmasını başka kanala aktarma Merhaba bu koda benden olsun awayken nickini kanalda yazan olursa kayit eder @takips pencersinde
-Ayrica belirlediğin nickler varsa onlarida ekleyebilirsin belirlediğin nicklere yazilan mesajlari gösterir.. Kod:
on *:text:*:#:{
if ($me isin $1-) || (nick isin $1-) || (nick2 isin $1-) {
if (!$window(@Takips)) window -en @Takips
echo -tm @Takips $chan - $nick - $1-
}
} | Giant | 03 Haziran 2022 18:01 | Cevap: başkasının konuşmasını başka kanala aktarma Konuyu abarttıkça abartıyorum... Chat'e bakmamam lazım sadece X nickli user ile derdim.. Takip.. Baloncuk ile onun konuşmalarını takip etmek aklıma geldi.. Tamam ediyorum da fazlalıkları var. Özelime X'in kanalda yazdıklarını yansıtıyorum o konuşmalar da bana baloncuk ile geliyor... Bu şekil işe yarıyor. Fakat fazlalıkları var. Baloncukta nick.txt yazısı var. Özele de çift çift geliyor yazılar. Özelde nick txt yazmasındı.
1. satıra eklediğim kod ;
| msg Unique $+($nick,.txt) $nick $chan $1- Kod:
on *:text:*:*: if $findtok(%takiplist-,$nick,32) { $iif(!$window(@Takip),.window -en @Takip) | .aline @Takip 2 $+ $chr(171) $+ $date $time $+ $chr(187) Nick: $nick Kanal: $chan Msg: $1- | write $+($nick,.txt) $time Nick: $nick Kanal: $chan Msg: $1- | msg Unique $+($nick,.txt) $nick $chan $1- } [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] /watch?v=cGYr_WHuLcs | Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 09:02. | |
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
|