Webmaster Ticaret Forumu İrc İçin Hazır Kodlar Mirc Kodları Mirc de Giriş çıkış partlar için ayrı pencere!
Mirc de Giriş çıkış partlar için ayrı pencere!
Ruzgar
Mirc de Giriş çıkış partlar için ayrı pencere!
2
2747
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
Konuyu Okuyanlar:6 Ziyaretçi
Şuan Offine!
Information 
Şuan Offine!
Ruzgar Emektar Üye
******
Kod:  Tümünü Seç
alias joinpart { window $+(@,$1) | echo -ct $2 $+(@,$1) * $+($3,Smile $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)
}
Mesaj Değerlendirme
Cevapla
Yeyüzünün en zor mesleği insanlarla uğraşmaktır.!   

                                                                                                                                                           [Resim: 20080525141425950.gif]
                                            [Resim: 513.gif]
Şuan Offine!
Şuan Offine!
Ruzgar Emektar Üye
******
Kod:  Tümünü Seç

Now fear not, you're free
Mesaj Değerlendirme
Cevapla
Yeyüzünün en zor mesleği insanlarla uğraşmaktır.!   

                                                                                                                                                           [Resim: 20080525141425950.gif]
                                            [Resim: 513.gif]
Şuan Offine!
Şuan Offine!
Ruzgar Emektar Üye
******
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ştirebilirsiniz.

Kod:  Tümünü Seç
alias joinpart { window $+(@,$1) | echo -ct $2 $+(@,$1) * $+($3,Smile $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$/SAngry:return
on $*:hotlink:/\x28Ban\x29$/SAngry:mode $token($active,1,64) +b $token($hotline,4,32)




Kod:  Tümünü Seç
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(@Whois) == $null) { window -ne @Whois }
echo 12 -t @Whois $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(@OperS) == $null) { window -ne @OperS }
echo 12 -t @OperS $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(@xLine) == $null) { window -ne @xLine }
echo 12 -t @xLine $1- | halt
}
if (removed isin $1-) {
if ($window(@xLine) == $null) { window -ne @xLine }
echo 4 -t @xLine $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(@xLine) == $null) { window -ne @xLine }
echo 12 -t @xLine $1- | halt
}
if ([Spamfilter] isin $1-) {
if ($window(@Spam) == $null) { window -ne @Spam }
echo 12 -t @Spam $1- 
halt
}
if (is now isin $1-) {
if ($window(@OperS) == $null) { window -ne @OperS }
echo -t @OperS $+(4,$1) $+(12,$3) 5ID'ini Kullanarak Oper Oldu :12 $oflags($remove($right($1-,3),$chr(40),$chr(41))))
halt
}
}


pencere isimlerini değiştirebilirsiniz...
Mesaj Değerlendirme
Cevapla
Yeyüzünün en zor mesleği insanlarla uğraşmaktır.!   

                                                                                                                                                           [Resim: 20080525141425950.gif]
                                            [Resim: 513.gif]


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  Oto unban ve kanala giriş Ruzgar 0 1,049 02-04-2016, Saat: 19:14
Son Yorum: Ruzgar
  Mirc Kodlarının Mirce Eklenmesi (Remotelere Kod Ekleme) Ruzgar 0 590 22-03-2016, Saat: 22:05
Son Yorum: Ruzgar
  Kanal için bazı korumalar.(Ayarlanabilir) Ruzgar 0 809 22-03-2016, Saat: 15:01
Son Yorum: Ruzgar
  mIRC Kodlarının mIRC'e Eklenmesi Ruzgar 0 483 22-03-2016, Saat: 14:47
Son Yorum: Ruzgar
  Mirc Scripting Hazır Kodlar Arşiv Ruzgar 0 527 22-03-2016, Saat: 14:40
Son Yorum: Ruzgar

Hızlı Menü: