IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası - Çözüldü Giriş çıkış partlar için ayrı pencere!

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Çözüldü Giriş çıkış partlar için ayrı pencere! (https://www.ircforumlari.net/mirc-scripting-sorunlari/661723-giris-cikis-partlar-icin-ayri-pencere.html)

Giriş çıkış partlar için ayrı pencere!

Merhaba arkadaşlar, ben mirc de bulunduğum kanalların giriş/çıkış/partlarını ayrı @pencere olarak yapmak istiyorum ama o bulunduğum kanala özel. Örneğin #Sohbet kanalındaysam o kanalın giriş çıkışları partları otomatik olarak @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] penceresinde gözüksün yada işte #istanbul kanalındaysam @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] penceresinde gözüksün, onun haricin de sohbet kanalında modeler, kick ve banlar normal aktif penceresinde gözüksün. Böyle bir şey yapmak mümkün mü acaba? Yada daha önce paylaşıldı mı arattım ama bulamadım maalesef. Şimdiden teşekkürlerimi sunuyorum.

Cevap: Giriş çıkış partlar için ayrı pencere!

Alıntı:

incubus Nickli Üyeden Alıntı (Mesaj 1041572172)

Kod:

alias joinpart { window $+(@,$1) | echo -ct $2 $+(@,$1) * $+($3,:) $4 $+($chr(40), $token($address($4,5),2,33), $chr(41)) $5 }

on ^*:join:#:{ joinpart # join Giriş $nick }

on ^*:part:#:{ joinpart # part Part $nick (Part) }

on ^*:quit:{

  tokenize 32 $regsubex(z,$str(.,$comchan($nick,0)),/./g,$comchan($nick,\n) $chr(32)) 

  joinpart $* quit Çıkış $nick (Quit)

}

Cevap: Giriş çıkış partlar için ayrı pencere!

Alıntı:

Feragat Nickli Üyeden Alıntı (Mesaj 1041572403)

Kod:

alias joinpart { window $+(@,$1) | echo -ct $2 $+(@,$1) * $+($3,:) $4 $+($chr(40), $token($address($4,5),2,33), $chr(41)) $5 }

on ^*:join:#:{ joinpart # join Giriş $nick }

on ^*:part:#:{ joinpart # part Part $nick (Part) }

on ^*:quit:{

  tokenize 32 $regsubex(z,$str(.,$comchan($nick,0)),/./g,$comchan($nick,\n) $chr(32)) 

  joinpart $* quit Çıkış $nick (Quit)

}

Çok teşekkürler hocam, çatır çatır çalışıyor. Bu kanallara özel @pencereler de giriş/çıkış vs. yapan nicklerin üstünde sağ tıklayınca ban vs. gibi işlemler yapabilmek için ne yapmak lazım? Bu mümkün mü acaba? Tekrardan ilginiz için teşekkürler. :(clap):

Cevap: Giriş çıkış partlar için ayrı pencere!

Alıntı:

incubus Nickli Üyeden Alıntı (Mesaj 1041572639)

Kodda küçük bir hata vardı, tamamını tekrar eklemeni tavsiye ederim. Açılan kanal giriş çıkışlarını gösteren pencerelerde sonda (Ban) seçeneği var. Çift tıkladığında mode #kanal +b Nick uygular. Buna göre yeni özellikler ekleyebilir ve geliştirebilirsin.

Kod:

[21:23] * Part: guest4827 (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) (Part) (Ban)

[21:24] * Giriş: DiLaNaz (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) (Ban)

[21:24] * Giriş: yakışıklı_007 (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) (Ban)

[21:24] * Çıkış: alican (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) (Quit) (Ban)

Kod:

alias joinpart { window $+(@,$1) | echo -ct $2 $+(@,$1) * $+($3,:) $4 $+($chr(40), $token($address($4,5),2,33), $chr(41)) $5 (Ban) }

on ^*:join:#:{ joinpart # join Giriş $nick }

on ^*:part:#:{ joinpart # part Part $nick (Part) }

on ^*:quit:{

  tokenize 32 $regsubex(z,$str(.,$comchan($nick,0)),/./g,$comchan($nick,\n) $chr(32)) 

  joinpart $* quit Çıkış $nick (Quit)

}
 

on $^*:hotlink:/\x28Ban\x29$/S:@:return

on $*:hotlink:/\x28Ban\x29$/S:@:mode $token($active,1,64) +b $token($hotline,4,32)

Bu kanalın adını döner: $token($active,1,64)
Bu da Nicki döner: $token($hotline,4,32)

Çift tıklamada yapacağın özellikleri bunları baz alarak yaparsın. İyi forumlar.

Cevap: Giriş çıkış partlar için ayrı pencere!

Alıntı:

incubus Nickli Üyeden Alıntı (Mesaj 1041572172)

Hocam Arkadasın dedıgı SekıLde global Noticeleride O pencerelere yonlendırmek mumkunmudur ? MeseLa ( © Global [.....-FM] ......-FM'de şu an çalan parça: 07 Sila Reverans ) . Gibi Noticeleri ilgilenirseniz sevinirim

Cevap: Giriş çıkış partlar için ayrı pencere!

Forumda arama yaparsan konuyla alakalı bir çok konu var. Buyur ;
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Ama yok Kod'a ek olarak istiyorsan. Feragat, 1-2 saat içerinde Online olur yardımcı olacaktır(;

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 14:34 -->-> Daha önceki mesaj 14:27 --

Eğer bulunduğun Sunucu da Oper yetkisine sahipsen ve Status de ki Servis mesajlarından bahsediyorsan da Buyur;

Kod:

alias oflags { if $1 === O return IRC Operatör if $1 === o return Local Operatör if $1 == C return Technical Administrator if $1 === A return Server Administrator if $1 === a return Services Administrator if $1 == N return Network Administrator } on ^1:SNOTICE:*:{ if (whois isin $1-) { if ($window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]is) == $null) { window -ne @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]is } echo 12 -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]is $1- | halt } if (his/her isin $1-) || (Failed isin $1-) || (Denied isin $1-) || (tkl isin $1-) || (Q: isin $1-) || (used isin $1-) || (OperOverride isin $1-) || (Mismatch: isin $1-) || (GECOS isin $1-) || (warning isin $1-) { if ($window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) == $null) { window -ne @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } echo 12 -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $1- | halt } if (Locops isin $1-) || (activated isin $1-) { if ($window(@UyarI) == $null) { window -ne @UyarI } echo 12 -t @UyarI $1- | halt } if (added isin $1-) || (Received isin $1-) { if ($window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) == $null) { window -ne @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } echo 12 -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $1- | halt } if (removed isin $1-) { if ($window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) == $null) { window -ne @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } echo 4 -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $1- | halt } if (banned isin $1-) { if ($window(@Giris/Cikis) == $null) { window -ne @Giris/Cikis } echo 12 -t @Giris/Cikis $1- | halt } if (Connecting isin $1-) { if ($window(@Giris/Cikis) == $null) { window -ne @Giris/Cikis } echo 12 -t @Giris/Cikis $1- | halt } if (exiting isin $1-) || (recvQ isin $1-) { if ($window(@Giris/Cikis) == $null) { window -ne @Giris/Cikis } echo 4 -t @Giris/Cikis $1- | halt } if (Forbidding isin $1-) || (Q:lined isin $1-) { if ($window(@Q-Lined) == $null) { window -ne @Q-Lined } echo 12 -t @Q-Lined $1- | halt } if (Expiring isin $1-) { if ($window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) == $null) { window -ne @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } echo 12 -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $1- | halt } if ([Spamfilter] isin $1-) { if ($window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) == $null) { window -ne @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } echo 12 -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $1- halt } if (is now isin $1-) { if ($window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) == $null) { window -ne @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] } echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $+(4,$1) $+(12,$3) 5ID'ini Kullanarak Oper Oldu :12 $oflags($remove($right($1-,3),$chr(40),$chr(41)))) halt } } pencere isimlerini değiştirebilirsin..

NOT: KOD XcLusive 'a aittir.

Cevap: Giriş çıkış partlar için ayrı pencere!

Kod:

alias joinpart { window $+(@,$1) | echo -ct $2 $+(@,$1) * $+($3,:) $4 $+($chr(40), $token($address($4,5),2,33), $chr(41)) $5 (Ban) }

on ^*:join:#:{ joinpart # join Giriş $nick }

on ^*:part:#:{ joinpart # part Part $nick (Part) }

on ^*:quit:{

  tokenize 32 $regsubex(z,$str(.,$comchan($nick,0)),/./g,$comchan($nick,\n) $chr(32)) 

  joinpart $* quit Çıkış $nick (Quit)

}
 

on $^*:hotlink:/\x28Ban\x29$/S:@:return

on $*:hotlink:/\x28Ban\x29$/S:@:mode $token($active,1,64) +b $token($hotline,4,32)

Bu sadece bizim belirdegimiz Kanalın giriş cıkıslarını göstermesı için ne yapmamız lazım
Biraz deneme yaptım beceremedım
Bide giriş cıkışlar loglanabilirmi

Şimdiden teşekurler.

Cevap: Giriş çıkış partlar için ayrı pencere!

on ^*:join:#:{ joinpart # join Giriş $nick }
on ^*:part:#:{ joinpart # part Part $nick (Part) }

kısımlarında # parametresini tam olarak #kanal şeklinde belirtirseniz, istediğiniz kanalda gerçekleşir.

Cevap: Giriş çıkış partlar için ayrı pencere!

Alıntı:

SuLh Nickli Üyeden Alıntı (Mesaj 1041770005)

Onu bende düşünüp denemiştim ama olmamıştı.

Cevap: Giriş çıkış partlar için ayrı pencere!

Çalışan kod var mı kimsede?