Haziran, 2018 | Türkçe mIRC indir - Resmi mIRC indirme Sitesi

mIRC Popups Menüsü Kanal Kısa Yolları

29 Haziran 2018 • 01:07 OxiGeN Hazır Kodlar

Kanal Modları Popups Menüsü mIRC Popups Menüsü nedir? Bu menü herzaman sağ tıklamalarda kullanılan kısa yolları içerir, aşağıda vereceklerimizi mirciniz de alt+r kısa yolunu kullanın remote menüsü açılacak, açılan menü üst bölümünden popups’a geçiş yaparak bu verdiklerimizi yerleştiriniz. Kullanımı ise operatör olduğunuz kanal geneline sağ tıkladığınız da verdiğimiz kısa yolları göreceksiniz.

menu channel {
  $iif($active != status,$xu($chan) ))
  .$xu($chan) $+ 's Kullan?labilir $xb($xa($chan)): echo -a $xa
  .-
  ..Özel
  ...CTCP( +f [5c#M3]=7 ):/mode # +f [5c#M3]:7
  ...Flood GiriÅŸ( +f [6j#R3]=4 ):/mode # +f [6j#R3]:4
  ...KNOCK( +f [4k]=8 ):/mode # +f [4k]:8
  ...Mesaj Flood Genel( +f [10m#m5]=6 ):/mode # +f [10m#m5]:6
  ...Nick DeÄŸiÅŸtirme( +f [3n#N1]=10 ):/mode # +f [3n#N1]:10
  ...Mesaj Flood 1 kullancÄ±( +f [5t#b]=5):/mode #kanaladÄ± +f [5t#b]:10
  .-
  ..$iif(n isincs $chan(#).mode,$style(1)) +n (Kanalda bulunmayan birinden gelecek mesajlarin bloklandigi kanal): if (n isincs $chan(#).mode) { mode # -n } | else { mode # +n }
  ..$iif(t isincs $chan(#).mode,$style(1)) +t (Sadece +hoaq kiplerini almis kullanicilarin /topic komutunu kullanabilecegi kanal): if (t isincs $chan(#).mode) { mode # -t } | else { mode # +t }
  ..$iif(s isincs $chan(#).mode,$style(1)) +s (Gizli bir kanal): if (s isincs $chan(#).mode) { mode # -s } | else { mode # +s }
  ..$iif(p isincs $chan(#).mode,$style(1)) +p (Ozel bir kanal): if (p isincs $chan(#).mode) { mode # -p } | else { mode # +p }
  ..$iif(i isincs $chan(#).mode,$style(1)) +i (Sadece davetle girilebilen kanal): if (i isincs $chan(#).mode) { mode # -i } | else { mode # +i }
  ..$iif(m isincs $chan(#).mode,$style(1)) +m (Sadece +vhoaq kiplerini almis kullanicilarin konusabilecegi kanal ): if (m isincs $chan(#).mode) { mode # -m } | else { mode # +m }
  ..$iif(l isincs $chan(#).mode,$style(1)) +l (Kanala girebilicek olan maximum kullanici sayisini belirler $chr(8) $chan(#).limit ): if (l isincs $chan(#).mode) { mode # -l } | else { mode # +l $$?=" $m(237) " }
  ..$iif(k isincs $chan(#).mode,$style(1)) +k (<anahtar> = Kanala giris icin gereken anahtar $chr(8) $chan(#).key ): if (k isincs $chan(#).mode) { mode # -k $chan(#).key } | else { mode # +k $$?=" $m(238) " }
  ..$iif(R isincs $chan(#).mode,$style(1)) +R (Sadece kayitli (+r) kullanicilarin girebilecegi kanal.): if (R isincs $chan(#).mode) { mode # -R } | else { mode # +R }
  ..$iif(Q isincs $chan(#).mode,$style(1)) +Q (Kick atilmayan kanal.): if (Q isincs $chan(#).mode) { mode # -Q } | else { mode # +Q }
  ..$iif(N isincs $chan(#).mode,$style(1)) +N (Nick degisikligi yapilamayan kanal): if (N isincs $chan(#).mode) { mode # -N } | else { mode # +N }
  ..$iif(M isincs $chan(#).mode,$style(1)) +M (Sadece kayitli (+r) veya voice'i olan (+v) kullanicilarin konusabilecegi kanal): if (M isincs $chan(#).mode) { mode # -M } | else { mode # +M }
  ..$iif(Y isincs $chan(#).mode,$style(1)) +Y (Yasak kelimelerin sansurlenecegi kanal): if (Y isincs $chan(#).mode) { mode # -Y } | else { mode # +Y }
  ..$iif(g isincs $chan(#).mode,$style(1)) +g (Yasak kelimelerin sansurlenecegi kanal): if (g isincs $chan(#).mode) { mode # -g } | else { mode # +g }
  ..$iif(C isincs $chan(#).mode,$style(1)) +C (CTCp metinlerini engeller): if (C isincs $chan(#).mode) { mode # -C } | else { mode # +C }
  ..$iif(L isincs $chan(#).mode,$style(1)) +L #kanal2 (Kanal linkleme. (kanal dolu ise, sonraki kullanici otomatik olarak <kanal2> girer.)): if (L isincs $chan(#).mode) { mode # -L } | else { mode # +L $$?="YÃ¶nlendirilecek Kanal" }
  ..$iif(f isincs $chan(#).mode,$style(1)) +f ([*]<satir>:<saniye> = Flood korumasi.): if (f isincs $chan(#).mode) { mode # -f } | else { mode # +f $$?=" satÄ±r:saniye 3:5 " }
  ..$iif(u isincs $chan(#).mode,$style(1)) +u (Kanal yonetici kiplerinin gizli oldugu kanal): if (u isincs $chan(#).mode) { mode # -u } | else { mode # +u }
  ..$iif(D isincs $chan(#).mode,$style(1)) +D (/me veya /ame mesajlarinin kanala gonderilmesini engeller): if (D isincs $chan(#).mode) { mode # -D } | else { mode # +D }
  ..$iif(c isincs $chan(#).mode,$style(1)) +c (Kanal icerisinde renk kullanimini engeller): if (c isincs $chan(#).mode) { mode # -c } | else { mode # +c }
  ..$iif(A isincs $chan(#).mode,$style(1)) +A (Sadece Sunucu/Ag yoneticilerinin girebilecegi kanal. (Yoneticiler icin.)): if (A isincs $chan(#).mode) { mode # -A } | else { mode # +A }
  ..$iif(z isincs $chan(#).mode,$style(1)) +z (Sadece Guvenli Baglanti (SSL) kullananlarin girebilecegi kanal): if (z isincs $chan(#).mode) { mode # -z } | else { mode # +z }
  ..$iif(K isincs $chan(#).mode,$style(1)) +K (KNOCK komutuna izin verilmeyen kanal): if (u isincs $chan(#).mode) { mode # -u } | else { mode # +u }
  ..$iif(O isincs $chan(#).mode,$style(1)) +O (Sadece IRCoplarin girebilecegi kanal (Yoneticiler icin.) ): if (K isincs $chan(#).mode) { mode # -K } | else { mode # +K }
  ..$iif(S isincs $chan(#).mode,$style(1)) +S (Renkli yazilarin, renkli kodlardan arindirilip kanala gonderilmesini saglar): if (S isincs $chan(#).mode) { mode # -S } | else { mode # +S }
  ..$iif(V isincs $chan(#).mode,$style(1)) +V (INVITE 'in kapali oldugu kanal): if (V isincs $chan(#).mode) { mode # -V } | else { mode # +V }
  ..$iif(T isincs $chan(#).mode,$style(1)) +T (Noticenin komutunun kullanilamayacagi kanal): if (T isincs $chan(#).mode) { mode # -T } | else { mode # +T }
  ..$iif(u isincs $chan(#).mode,$style(1)) +u (Kanal yonetici kiplerinin gizli oldugu kanal): if (u isincs $chan(#).mode) { mode # -u } | else { mode # +u }
  ..$iif(V isincs $chan(#).mode,$style(1)) +V (Kanalda /invite komutunun kullanımını engeller.): if (V isincs $chan(#).mode) { mode # -V } | else { mode # +V }
  - 
}

alias -l xc return $chan($chan).mode
alias -l xa return $chanmodes
alias -l xs return $style($iif($1 isincs $xc,5,4))
alias -l xm return mode $chan $+($iif($1 isincs $xc,-,+),$1)
alias -l xu return $replace($1,$left($1,2),$upper($left($1,2)))
alias -l xb return $+($chr(91),$1,$chr(93))
alias -l xl return $replace($remove($nick($chan,$1).pnick,$1),+,v,%,h,@,o,&,a,~,q)
alias -l xr return
alias -l xi {
  if (!$1) { return }
  var %a = $left($nick($chan,$1).pnick,1), %b = $replace(%a,~,Owner,&,Admin,@,Operator,%,Half Operator,+,Voiced), %c 
  if ($prop == l) { %c = $xb($+(%a,$chr(32),%b)) }
  if ($prop == h) { %c = $xb($phost($1)) }
  if ($prop == n) { %c = $xb($pident($1)) }
  if ($prop == i) { %c = $xb($pidle($1)) }
  if ($prop == c) { %c = $xb($replace($comchans($1),$chr(32),$chr(44))) }
  if ($prop == a) { %c = $xb($address($1,5)) }
  return %c
}

menu channel {

$iif($active != status,$xu($chan) ))

.$xu($chan) $+ 's Kullan?labilir $xb($xa($chan)): echo -a $xa

..Özel

...CTCP( +f [5c#M3]=7 ):/mode # +f [5c#M3]:7

...Flood GiriÅŸ( +f [6j#R3]=4 ):/mode # +f [6j#R3]:4

...KNOCK( +f [4k]=8 ):/mode # +f [4k]:8

...Mesaj Flood Genel( +f [10m#m5]=6 ):/mode # +f [10m#m5]:6

...Nick DeÄŸiÅŸtirme( +f [3n#N1]=10 ):/mode # +f [3n#N1]:10

...Mesaj Flood 1 kullancÄ±( +f [5t#b]=5):/mode #kanaladÄ± +f [5t#b]:10

..$iif(n isincs $chan(#).mode,$style(1)) +n (Kanalda bulunmayan birinden gelecek mesajlarin bloklandigi kanal): if (n isincs $chan(#).mode) { mode # -n } | else { mode # +n }

..$iif(t isincs $chan(#).mode,$style(1)) +t (Sadece +hoaq kiplerini almis kullanicilarin /topic komutunu kullanabilecegi kanal): if (t isincs $chan(#).mode) { mode # -t } | else { mode # +t }

..$iif(s isincs $chan(#).mode,$style(1)) +s (Gizli bir kanal): if (s isincs $chan(#).mode) { mode # -s } | else { mode # +s }

..$iif(p isincs $chan(#).mode,$style(1)) +p (Ozel bir kanal): if (p isincs $chan(#).mode) { mode # -p } | else { mode # +p }

..$iif(i isincs $chan(#).mode,$style(1)) +i (Sadece davetle girilebilen kanal): if (i isincs $chan(#).mode) { mode # -i } | else { mode # +i }

..$iif(m isincs $chan(#).mode,$style(1)) +m (Sadece +vhoaq kiplerini almis kullanicilarin konusabilecegi kanal ): if (m isincs $chan(#).mode) { mode # -m } | else { mode # +m }

..$iif(l isincs $chan(#).mode,$style(1)) +l (Kanala girebilicek olan maximum kullanici sayisini belirler $chr(8) $chan(#).limit ): if (l isincs $chan(#).mode) { mode # -l } | else { mode # +l $$?=" $m(237) " }

..$iif(k isincs $chan(#).mode,$style(1)) +k (<anahtar> = Kanala giris icin gereken anahtar $chr(8) $chan(#).key ): if (k isincs $chan(#).mode) { mode # -k $chan(#).key } | else { mode # +k $$?=" $m(238) " }

..$iif(R isincs $chan(#).mode,$style(1)) +R (Sadece kayitli (+r) kullanicilarin girebilecegi kanal.): if (R isincs $chan(#).mode) { mode # -R } | else { mode # +R }

..$iif(Q isincs $chan(#).mode,$style(1)) +Q (Kick atilmayan kanal.): if (Q isincs $chan(#).mode) { mode # -Q } | else { mode # +Q }

..$iif(N isincs $chan(#).mode,$style(1)) +N (Nick degisikligi yapilamayan kanal): if (N isincs $chan(#).mode) { mode # -N } | else { mode # +N }

..$iif(M isincs $chan(#).mode,$style(1)) +M (Sadece kayitli (+r) veya voice'i olan (+v) kullanicilarin konusabilecegi kanal): if (M isincs $chan(#).mode) { mode # -M } | else { mode # +M }

..$iif(Y isincs $chan(#).mode,$style(1)) +Y (Yasak kelimelerin sansurlenecegi kanal): if (Y isincs $chan(#).mode) { mode # -Y } | else { mode # +Y }

..$iif(g isincs $chan(#).mode,$style(1)) +g (Yasak kelimelerin sansurlenecegi kanal): if (g isincs $chan(#).mode) { mode # -g } | else { mode # +g }

..$iif(C isincs $chan(#).mode,$style(1)) +C (CTCp metinlerini engeller): if (C isincs $chan(#).mode) { mode # -C } | else { mode # +C }

..$iif(L isincs $chan(#).mode,$style(1)) +L #kanal2 (Kanal linkleme. (kanal dolu ise, sonraki kullanici otomatik olarak <kanal2> girer.)): if (L isincs $chan(#).mode) { mode # -L } | else { mode # +L $$?="YÃ¶nlendirilecek Kanal" }

..$iif(f isincs $chan(#).mode,$style(1)) +f ([*]<satir>:<saniye> = Flood korumasi.): if (f isincs $chan(#).mode) { mode # -f } | else { mode # +f $$?=" satÄ±r:saniye 3:5 " }

..$iif(u isincs $chan(#).mode,$style(1)) +u (Kanal yonetici kiplerinin gizli oldugu kanal): if (u isincs $chan(#).mode) { mode # -u } | else { mode # +u }

..$iif(D isincs $chan(#).mode,$style(1)) +D (/me veya /ame mesajlarinin kanala gonderilmesini engeller): if (D isincs $chan(#).mode) { mode # -D } | else { mode # +D }

..$iif(c isincs $chan(#).mode,$style(1)) +c (Kanal icerisinde renk kullanimini engeller): if (c isincs $chan(#).mode) { mode # -c } | else { mode # +c }

..$iif(A isincs $chan(#).mode,$style(1)) +A (Sadece Sunucu/Ag yoneticilerinin girebilecegi kanal. (Yoneticiler icin.)): if (A isincs $chan(#).mode) { mode # -A } | else { mode # +A }

..$iif(z isincs $chan(#).mode,$style(1)) +z (Sadece Guvenli Baglanti (SSL) kullananlarin girebilecegi kanal): if (z isincs $chan(#).mode) { mode # -z } | else { mode # +z }

..$iif(K isincs $chan(#).mode,$style(1)) +K (KNOCK komutuna izin verilmeyen kanal): if (u isincs $chan(#).mode) { mode # -u } | else { mode # +u }

..$iif(O isincs $chan(#).mode,$style(1)) +O (Sadece IRCoplarin girebilecegi kanal (Yoneticiler icin.) ): if (K isincs $chan(#).mode) { mode # -K } | else { mode # +K }

..$iif(S isincs $chan(#).mode,$style(1)) +S (Renkli yazilarin, renkli kodlardan arindirilip kanala gonderilmesini saglar): if (S isincs $chan(#).mode) { mode # -S } | else { mode # +S }

..$iif(V isincs $chan(#).mode,$style(1)) +V (INVITE 'in kapali oldugu kanal): if (V isincs $chan(#).mode) { mode # -V } | else { mode # +V }

..$iif(T isincs $chan(#).mode,$style(1)) +T (Noticenin komutunun kullanilamayacagi kanal): if (T isincs $chan(#).mode) { mode # -T } | else { mode # +T }

..$iif(u isincs $chan(#).mode,$style(1)) +u (Kanal yonetici kiplerinin gizli oldugu kanal): if (u isincs $chan(#).mode) { mode # -u } | else { mode # +u }

..$iif(V isincs $chan(#).mode,$style(1)) +V (Kanalda /invite komutunun kullanımını engeller.): if (V isincs $chan(#).mode) { mode # -V } | else { mode # +V }

}

alias -l xc return $chan($chan).mode

alias -l xa return $chanmodes

alias -l xs return $style($iif($1 isincs $xc,5,4))

alias -l xm return mode $chan $+($iif($1 isincs $xc,-,+),$1)

alias -l xu return $replace($1,$left($1,2),$upper($left($1,2)))

alias -l xb return $+($chr(91),$1,$chr(93))

alias -l xl return $replace($remove($nick($chan,$1).pnick,$1),+,v,%,h,@,o,&,a,~,q)

alias -l xr return

alias -l xi {

if (!$1) { return }

var %a = $left($nick($chan,$1).pnick,1), %b = $replace(%a,~,Owner,&,Admin,@,Operator,%,Half Operator,+,Voiced), %c

if ($prop == l) { %c = $xb($+(%a,$chr(32),%b)) }

if ($prop == h) { %c = $xb($phost($1)) }

if ($prop == n) { %c = $xb($pident($1)) }

if ($prop == i) { %c = $xb($pidle($1)) }

if ($prop == c) { %c = $xb($replace($comchans($1),$chr(32),$chr(44))) }

if ($prop == a) { %c = $xb($address($1,5)) }

return %c

}

» Devamını Oku

Yorum yaz

BadNick Kick

29 Haziran 2018 • 01:03 OxiGeN Hazır Kodlar

Uyarıdan 30 saniye sonra nick değiştirilmezse kanaldan atılır.

menu nicklist {
  -
  $iif($me !isop #,$style(2)) BadNick Kick { badnick $* }
  -
}

alias badnick {
  say $* 2,0Nickiniz uygunsuzdur.Lütfen /nick yeninick komutunu kullanarak 30 saniye içinde değiştiriniz.
  .timerck $+ $chan $+ $1 1 30 checknick $chan $1
}
alias -l checknick {
  if ($2 ison $1) {
    kick $1 $2 2,0Nickiniz uygunsuzdur.Lütfen /nick yeninick komutunu kullanarak değiştiriniz.
    mode $1 +b $2 $+ !*@*
  }
}
on *:load: { 
  .echo -aq $input(Yapımcı: SaNCaK $+ $crlf $+ $crlf $+ Addon: BadNick Kick $chr(40) $+ v5.4 $+ $chr(41) $+ $crlf $+ $crlf $+ Yapım: 17/10/2014 $+ $crlf $+ $crlf $+ Iletişim: sancak@outlook.com.tr $+ $crlf $+ $crlf $+ Kodu Kullandığınız için Teşekkür ederim,igo,Addon: BadNick Kick $chr(40) $+ v5.4 $+ $chr(41))
  echo -a _____________________________________________________________________________________
  echo -a 4,1[15,1 SaNCaK 4,1] 0,1 Add-On yükleniyor... 
  echo -a 4,1[15,1 SaNCaK 4,1] 0,1 Çalışan mIRC15 $version 0Sistem15 Windows $+ $os 
  echo -a 4,1[15,1 SaNCaK 4,1] 0,1 Coder: 15SaNCaK 0,1 E-Mail: 15sancak@outlook.com.tr 
  echo -a 4,1[00,01 SaNCaK 4,1] 15,1 Copyright 12©15 1999-2017 
  echo -a ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
}
on *:unload: { 
  .echo -aq $input(Author: SaNCaK $+ $crlf $+ $crlf $+ Addon: BadNick Kick $chr(40) $+ v5.4 $+ $chr(41) $+ $crlf $+ $crlf $+ Released at: 17/10/2016 $+ $crlf $+ $crlf $+ Contact: sancak@outlook.com.tr $+ $crlf $+ $crlf $+ Unloading...,igo,Addon: BadNick Kick $chr(40) $+ v5.4 $+ $chr(41))
}

menu nicklist {

$iif($me !isop #,$style(2)) BadNick Kick { badnick $* }

}

alias badnick {

say $* 2,0Nickiniz uygunsuzdur.Lütfen /nick yeninick komutunu kullanarak 30 saniye içinde değiştiriniz.

.timerck $+ $chan $+ $1 1 30 checknick $chan $1

}

alias -l checknick {

if ($2 ison $1) {

kick $1 $2 2,0Nickiniz uygunsuzdur.Lütfen /nick yeninick komutunu kullanarak değiştiriniz.

mode $1 +b $2 $+ !*@*

}

on *:load: {

.echo -aq $input(Yapımcı: SaNCaK $+ $crlf $+ $crlf $+ Addon: BadNick Kick $chr(40) $+ v5.4 $+ $chr(41) $+ $crlf $+ $crlf $+ Yapım: 17/10/2014 $+ $crlf $+ $crlf $+ Iletişim: sancak@outlook.com.tr $+ $crlf $+ $crlf $+ Kodu Kullandığınız için Teşekkür ederim,igo,Addon: BadNick Kick $chr(40) $+ v5.4 $+ $chr(41))

echo -a _____________________________________________________________________________________

echo -a 4,1[15,1 SaNCaK 4,1] 0,1 Add-On yükleniyor...

echo -a 4,1[15,1 SaNCaK 4,1] 0,1 Çalışan mIRC15 $version 0Sistem15 Windows $+ $os

echo -a 4,1[15,1 SaNCaK 4,1] 0,1 Coder: 15SaNCaK 0,1 E-Mail: 15sancak@outlook.com.tr

echo -a 4,1[00,01 SaNCaK 4,1] 15,1 Copyright 12©15 1999-2017

echo -a ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯

}

on *:unload: {

.echo -aq $input(Author: SaNCaK $+ $crlf $+ $crlf $+ Addon: BadNick Kick $chr(40) $+ v5.4 $+ $chr(41) $+ $crlf $+ $crlf $+ Released at: 17/10/2016 $+ $crlf $+ $crlf $+ Contact: sancak@outlook.com.tr $+ $crlf $+ $crlf $+ Unloading...,igo,Addon: BadNick Kick $chr(40) $+ v5.4 $+ $chr(41))

}

» Devamını Oku

Yorum yaz

Girilen Kanalda Arkaplanda Kanal adı/Tarih/Saat

28 Haziran 2018 • 23:46 OxiGeN Hazır Kodlar

on *:START: {
  .timer 0 1 timeback
}
alias timeback {
  window -dHhBp +da @saat 0 0 200 80
  drawtext -rof @saat $rgb(0,51,102) Arial 20 50 30 $time
  drawtext -rof @saat $rgb(0,51,102) Arial 15 15 52 $+($chr(40),$asctime($ctime,dd) $trans(month,$asctime($ctime,mmmm)) $trans(day,$day) $asctime($ctime,yyyy),$chr(41))
  drawsave -b32 @saat $scriptdirsaat.bmp | window -c @saat | background -s $scriptdirsaat.bmp
}
alias trans {
  if ($regex($1,^(day)$)) return $replacecs($day,Monday,Pazartesi,Tuesday,Salı,Wednesday,Çarşamba,Thursday,Perşembe,Friday,Cuma,Saturday,Cumartesi,Sunday,Pazar)
  if ($regex($1,^(month)$)) return $replacecs($asctime($ctime,mmmm),January,Ocak,February,Şubat,March,Mart,April,Nisan,May,Mayıs,June,Haziran,July,Temmuz,August,Ağustos,September,Eylül,October,Ekim,November,Kasım,December,Aralık)
}
on *:join:#: {
  window -phB +d @bg 0 0 600 375
  ;drawrect -ro @bg $rgb(241,111,198) 1 0 0 500 75
  drawtext -ro @bg $rgb(0,51,102) Verdana 20 450 10 #
  drawtext -ro @bg $rgb(0,51,102) Verdana 20 450 30 $time
  drawtext -ro @bg $rgb(0,51,102) Arial 15 410 52 $+($chr(40),$asctime($ctime,dd) $trans(month,$asctime($ctime,mmmm)) $trans(day,$day) $asctime($ctime,yyyy),$chr(41))
  drawsave -b32q100 @bg $qt($scriptdirss.bmp)
  background -c # $shortfn($scriptdirss.bmp)
  window -c @bg
  .remove $shortfn($scriptdirss.bmp)
}

on *:START: {

.timer 0 1 timeback

}

alias timeback {

window -dHhBp +da @saat 0 0 200 80

drawtext -rof @saat $rgb(0,51,102) Arial 20 50 30 $time

drawtext -rof @saat $rgb(0,51,102) Arial 15 15 52 $+($chr(40),$asctime($ctime,dd) $trans(month,$asctime($ctime,mmmm)) $trans(day,$day) $asctime($ctime,yyyy),$chr(41))

drawsave -b32 @saat $scriptdirsaat.bmp | window -c @saat | background -s $scriptdirsaat.bmp

}

alias trans {

if ($regex($1,^(day)$)) return $replacecs($day,Monday,Pazartesi,Tuesday,Salı,Wednesday,Çarşamba,Thursday,Perşembe,Friday,Cuma,Saturday,Cumartesi,Sunday,Pazar)

if ($regex($1,^(month)$)) return $replacecs($asctime($ctime,mmmm),January,Ocak,February,Şubat,March,Mart,April,Nisan,May,Mayıs,June,Haziran,July,Temmuz,August,Ağustos,September,Eylül,October,Ekim,November,Kasım,December,Aralık)

}

on *:join:#: {

window -phB +d @bg 0 0 600 375

;drawrect -ro @bg $rgb(241,111,198) 1 0 0 500 75

drawtext -ro @bg $rgb(0,51,102) Verdana 20 450 10 #

drawtext -ro @bg $rgb(0,51,102) Verdana 20 450 30 $time

drawtext -ro @bg $rgb(0,51,102) Arial 15 410 52 $+($chr(40),$asctime($ctime,dd) $trans(month,$asctime($ctime,mmmm)) $trans(day,$day) $asctime($ctime,yyyy),$chr(41))

drawsave -b32q100 @bg $qt($scriptdirss.bmp)

background -c # $shortfn($scriptdirss.bmp)

window -c @bg

.remove $shortfn($scriptdirss.bmp)

}

» Devamını Oku

Yorum yaz

Badnick Kanala Ozel

28 Haziran 2018 • 23:30 dELi Hazır Kodlar

Sadece Korumayı Açtıgınız kanalda çalışır.

 menu channel {
  -
  $iif($eval($+(%,badnickkontrol.,$network,.,$chan),2)  == $true,$style(1)) BadNick :{ set %badnickkontrol. [ $+ [ $network ] $+ . $+ [ $chan ] ] $iif(%badnickkontrol. [ $+ [ $network ] $+ . $+ [ $chan ] ] == $false,$true,$false) | echo -at 7>4DİKKAT7<  $+ $color(ctcp) Badnick koruması  $+ $color(ctcp) $iif($eval($+(%,badnickkontrol.,$network,.,$chan),2)  == $true, $+($chr(3),00,$chr(44),03,$chr(32),$chan,$chr(32),$chr(3)),$+($chr(3),01,$chr(44),14,$chr(32),$chan,$chr(32),$chr(3))) 4kanalı için $iif($eval($+(%,badnickkontrol.,$network,.,$chan),2)  == $true, $+($chr(3),00,$chr(44),03,$chr(32),ACILDI,$chr(32),$chr(3)),$+($chr(3),01,$chr(44),14,$chr(32),KAPATILDI,$chr(32),$chr(3))) }
  -
}

on BadNick:JOIN:#:{
  if (%badnickkontrol. [ $+ [ $network ] $+ . $+ [ $chan ] ] == $true) { 
    if ($nick($chan,$me,@&~%)) { 
      .mode # +b $nick 
      .kick # $nick 4,1-=^0,1Kufur, hakaret, skype/cam veya cinsellik ifade eden rumuzlari kullanamazsiniz %logo
    } 
  }
}

menu channel {

$iif($eval($+(%,badnickkontrol.,$network,.,$chan),2) == $true,$style(1)) BadNick :{ set %badnickkontrol. [ $+ [ $network ] $+ . $+ [ $chan ] ] $iif(%badnickkontrol. [ $+ [ $network ] $+ . $+ [ $chan ] ] == $false,$true,$false) | echo -at 7>4DİKKAT7< $+ $color(ctcp) Badnick koruması $+ $color(ctcp) $iif($eval($+(%,badnickkontrol.,$network,.,$chan),2) == $true, $+($chr(3),00,$chr(44),03,$chr(32),$chan,$chr(32),$chr(3)),$+($chr(3),01,$chr(44),14,$chr(32),$chan,$chr(32),$chr(3))) 4kanalı için $iif($eval($+(%,badnickkontrol.,$network,.,$chan),2) == $true, $+($chr(3),00,$chr(44),03,$chr(32),ACILDI,$chr(32),$chr(3)),$+($chr(3),01,$chr(44),14,$chr(32),KAPATILDI,$chr(32),$chr(3))) }

}

on BadNick:JOIN:#:{

if (%badnickkontrol. [ $+ [ $network ] $+ . $+ [ $chan ] ] == $true) {

if ($nick($chan,$me,@&~%)) {

.mode # +b $nick

.kick # $nick 4,1-=^0,1Kufur, hakaret, skype/cam veya cinsellik ifade eden rumuzlari kullanamazsiniz %logo

}

Kodların miRC sisteminize eklenmesi; Eklenecek kodu kopyalıyoruz. (Kısayol Tuşu Ctrl + C) Ardından mIRC’imizi açıyoruz ve herhangi bir ekranda Alt + R tuşlarına basıyoruz. mIRC Scripts Editörü açılıyor. [Aliases] [Popups] [Remote] [Users] [Variables] tablarından [Remote] sekmesini tıklıyoruz sonrasında Sol üst menümüzden; ->Dosya (ingilizce için File) –>Yeni (ingilizce için New) Sekmelerine tıklıyoruz boş bir […]

» Devamını Oku

Yorum yaz

Sohbet Mirc Script

28 Haziran 2018 • 03:56 dELi mirc indir, Scriptler, Türkçe mIRC

Sohbet.NET Resmi chat sohbet portalina ait mIRC programını sizlerle ücretsiz olarak paylaşıyoruz. Özellikleri: %100 Türkçe ve türkçe dil desteği ile mircin son türkçe sürümü olan 6.35 ile hazırlanmıştır. -Artık göz yoran gereksiz renk kalabalığı ve kullanılmayan özellikler kaldırılmıştır. -Sade görünümü güzel ve orjinal hali ile beğeni toplayan tema ve görünümler kullanılmıştır. -Kısa ama öz addon ve özellikler ile ince bir […]

» Devamını Oku

Yorum yaz en iyi mirc indir, en yeni mirc, mirc, mirc script, mirc script indir, Türkçe mirc indir, turkce mırc, yeni mIRC, yeni mirc indir

Geveze Mirc Script

28 Haziran 2018 • 03:45 dELi mirc indir, Scriptler, Türkçe mIRC

Geveze Mirc Yükle Merhaba arkadaşlar, bügün sizlere geveze mirc indir ve kurulumunu anlatacağım. Gün içerisinde sıkıldığınızda kafanızdakileri dağıtıp konuşabilecek bir yer mi arıyorsunuz.? O zaman yazımızı takip edin. Işten bunaldınız yada evde çokmu canınız sıkıldı? Tanışacak yeni bay/bayan arkadaş mı arıyorsunuz? Aradığınız her şey bir tık kadar uzaklıkta. Sizlerde Geveze mirc indirip sohbet sunucumuza bağlanarak yeni yüzlerce arkadaş edinebilirsiniz. Peki nedir […]

» Devamını Oku

Yorum yaz Geveze mirc 6.35, Geveze mirc download, geveze mirc yükle

Soyle Mirc Script

28 Haziran 2018 • 03:38 dELi mirc indir, Scriptler, Türkçe mIRC

Soyle Script Mirc İndir Merhaba arkadaşlar; sizlere bugün Soyle Script hakkında bilgi anlatacağız; Neden bu anlatımı yapacağımız dan başlayalım. Kullanımında içinde yaptığınız sohbetin farkını görmenizi sağlayacak açıklamalarda bulunacağız sizlere bir çok insanın beklediği ama uzun zamandan beri peşinden koştuğu açıklamalarda bulunacağım. Bir çok kişinin merakla beklediği artık sizlerle buluşmaya başlıyor ücretsiz olarak yayınladığımız ile sohbet odalarımızın içinde yetişkin insanlarla tanışa […]

» Devamını Oku

Yorum yaz Söyle mirc indir, Soyle Sohbet Programı

1 2 »