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 | Regex | 03 Haziran 2022 18:20 | Cevap: başkasının konuşmasını başka kanala aktarma Alıntı: Giant Nickli Üyeden Alıntı
(Mesaj 1042685422)
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 | msg Unique $+($nick,.txt) kısımlarındaki $+($nick,.txt) bölümünü kaldırırsan o sorun düzelir. .txt'li kısım write ile dosyaya yazdırmada lazım, özele rapor sunarken buna gerek yok. Tam hakim olunmadan uyarlanmaya çalışılmış kod sanırım.
Çift gitme sorununa gelince, kodları bölük pörçük değil de tam eklediğin gibi buraya kopyalarsan; kodu yorumlayıp çift gönderen kısmı çıkartayım ya da farklı bir hata varsa return ile durduralım. | Giant | 03 Haziran 2022 21:14 | Cevap: başkasının konuşmasını başka kanala aktarma Eklediğim kodu kaldırdım şu konu ekledim bilginize işinize yarayabilir.
on *:text:*:#: if $nick == TakipNick { msg BenimNick TekipNick $chan $1- } | cinaryigit | 10 Ağustos 2022 18:03 | Cevap: başkasının konuşmasını başka kanala aktarma Merhaba,
Sizden bir ricam var... Kod:
on *:text:*:#: { if $nick == USER1 {
if $istok(#kanal,#,32) { msg #kanal 4 $+(,#,) $+(<,$nick,>) 2 $1- }
}
} Ben bu kodda "user1" eğer cümle içinde "MERHABA" yazarsa cümlesinin tamamını bana yansıtmasını istiyorum. Her yazdığını değil.
Yardımcı olabilir misiniz?
iyi IF'ler | High | 10 Ağustos 2022 20:13 | Cevap: başkasının konuşmasını başka kanala aktarma Kod kimin bilmiyorum Forumdan almıştım tam olarak istediğin KOD olmasa da istediğin, belirlediğin kişilerin kanal genelinde yazdıklarını pencere de gösterir. Belirlediğin kişilerin kanal geneline yazdıklarını takip edersin aynı şekilde belirlemiş olduğun nick yada nicklere başkalarının yazdıklarını da Takip penceresin de görebilirsin. Kod:
#_nickses on
on *:text:*:#:nickses $chan $nick $1-
on *:action:*:#:nickses $chan $nick $1-
on *:notice:*:#:nickses $chan $nick $1-
#_nickses end
alias nickses {
if $server == irc.Sunucu.net {
if $regex($1,/^#) && $regex(x,$2-,/(Nick1|Nick2|Nick3|Nick4|Nick5)/i) { if ($regml(x,1) ison $1) { $iif(!$window(@Takip),window @Takip) | echo @Takip 11Bulunan Tanım:4 $regml(x,1) 0 $1 12Kanalında4 $+(<,$2,>) 12Tarafından Yazılan:0 $3- } }
if $1 == on { enable #_nickses on | echo -a 4Nick Takip İşlemi Açıldı. }
if $1 == off { disable #_nickses off | echo -a 7Nick Takip İşlemi Durduruldu. }
}
} | cinaryigit | 10 Ağustos 2022 20:30 | Cevap: başkasının konuşmasını başka kanala aktarma Belirlediğim kanalda belirlediğim kişinin cümle içinde kullandığı, benim seçtiğim bir kelime geçerse cümlenin tamamını yansıtsın istiyorum. Kod için teşekkür ederim ama işime yaramaz bu. | Forbidden | 10 Ağustos 2022 22:20 | Cevap: başkasının konuşmasını başka kanala aktarma Kod:
[22:13:18] <Forbidden> merhaba hayırlı geceler
[22:13:18] [KANAL-SESLENEN] : Efsane / #bizbize Kanaldan Size Seslendi/Mesaj: Forbidden #c Kanalında Yazdı Mesajı merhaba hayırlı geceler
[22:13:25] <Forbidden> nasılsınız
[22:13:34] <bozo> merhaba hayırlı geceler
[22:13:36] <bozo> iyiyim siz
#bizbize kanalı
[22:17:56] <&Efsane> Forbidden #c Kanalında Yazdı Mesajı merhaba hayırlı geceler Kod:
on *:text:*:#: {
if ($nick == Forbidden) {
if !$istok(#kanal58,$chan,32) {
if ( *merhaba* iswm $1-) { msg #bizbize 2 $+ $nick 4 $+ $chan 2Kanalında Yazdı 4Mesajı1 $1- }
}
}
} Alıntı: cinaryigit Nickli Üyeden Alıntı
(Mesaj 1042709867)
Belirlediğim kanalda belirlediğim kişinin cümle içinde kullandığı, benim seçtiğim bir kelime geçerse cümlenin tamamını yansıtsın istiyorum. Kod için teşekkür ederim ama işime yaramaz bu. | | cinaryigit | 12 Ağustos 2022 01:28 | Cevap: başkasının konuşmasını başka kanala aktarma Bazı kelimelerde de çalışmasın istiyorsak;
Olanı da unutmuşuz ama çalışıyor test ettim:)
Forbidden tekrar teşekkürler.
Keyifli İF'ler. Kod:
on *:text:*:#: {
if ($nick == Forbidden) {
if !$istok(#kanal58,$chan,32) {
if ( *#kelime* iswm $1-) { <- yakalanacak kelime
if ( *kelime* iswm $1-) { return } <- geçse de yansıtma olmayacak kelime
msg #kanal 2 $+ $nick 4 $+ $chan 2Kanalında Yazdı 4Mesajı1 $1- }
}
}
}
} | Forbidden | 12 Ağustos 2022 12:05 | Cevap: başkasının konuşmasını başka kanala aktarma Alıntı: cinaryigit Nickli Üyeden Alıntı
(Mesaj 1042710201)
Bazı kelimelerde de çalışmasın istiyorsak;
Olanı da unutmuşuz ama çalışıyor test ettim:)
Forbidden tekrar teşekkürler.
Keyifli İF'ler. Kod:
on *:text:*:#: {
if ($nick == Forbidden) {
if !$istok(#kanal58,$chan,32) {
if ( *#kelime* iswm $1-) { <- yakalanacak kelime
if ( *kelime* iswm $1-) { return } <- geçse de yansıtma olmayacak kelime
msg #kanal 2 $+ $nick 4 $+ $chan 2Kanalında Yazdı 4Mesajı1 $1- }
}
}
}
} | Öncelikle merhaba @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ne istegini tam anlıyamadım. Sana ilk verdigim code sadece belirledigin kelimeyi yakalar digerlerini pas geçer. Sanırım sen o belirledigin kelimenin içinde bazı istemedigin kelimeler olursa o belirledigin kelimede pas geçsin demişsin. Kırmızı ile belirttigim yasaklanacak kelimedir. Mavi olan yasaklanacak kelimenin icindeki muaf kelimedir. Alt da verdigim örnek şeklinde muaf kelime gelirse pas geçer. Kod:
[11:32:09] <Forbidden> merhaba Efsane nasılsın
[11:32:24] <Efsane> merhaba Forbidden iyiyim sen nasılsın
[11:32:35] <Forbidden> merhaba Efsane deneme
[11:32:56] <Forbidden> teşekkürler bende iyiyim Efsane
#bizbize kanalı
[11:32:09] <&BOzO> Forbidden #c Kanalında Yazdı Mesajı merhaba Efsane nasılsın Kod:
on *:text:*:#kanal: {
if ($nick == Yazılacaknick) {
if !$istok(#kanal58,$chan,32) {
!if ( *deneme* iswm $1-) { return }
if ( *merhaba* iswm $1-) { msg #kanal 2 $+ $nick 4 $+ $chan 2Kanalında Yazdı 4Mesajı1 $1- }
}
}
} | cinaryigit | 12 Ağustos 2022 16:34 | Cevap: başkasının konuşmasını başka kanala aktarma Merhaba @ [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] verdiğiniz kod çalışıyordu zaten her hangi bir problem yok. Çok teşekkür ederim sanırım bir yanlış anlaşılma oldu:) | Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 07:38. | |
Powered by vBulletin® Version 3.8.8 Beta 3 Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk
|