Nick Degişme addonu oto
Kullanımı !nick

[code]alias tmscumleceviri { dialog -m tmscumleceviri tmscumleceviri }
dialog tmscumleceviri {
  title "Cümle Çevirici"
  size -1 -1 177 153
  icon $mircdirTMSResim\cumlecevirici.ico 
  option dbu
  text "AŞAĞIDAKİ BU DİLDEN", 1, 14 15 73 8
  text "ŞU DİLE ÇEVİR", 2, 115 15 94 8
  combo 3, 6 24 72 50, size
  combo 4, 98 23 72 50, size
  box "Çevrilecek Metin", 5, 6 78 167 41
  edit "", 6, 9 87 161 28
  button "Cümle Çevirisini Yap", 7, 6 126 76 21
  button "Diyalogu KAPAT", 8, 98 1

Kullanımı:
Kanalda !imza | !imza nick
Özelde !imza ekle|sil




[code]on *:text:*:*: {
  if $regex($1,/^[!.][iİı]mza$/Si) {
    if $regex(#,/^#/) {
      msg # 7 $iif($2,$2,$nick) 1imza mesajı:4 $iif($2,$iif($hget(imza,$2),$v1,Bulunmuyor),$iif($hget(imza,$nick),$v1,Bulunmuyor))
    }
    else {
      if !$regex($2,/^(ekle|s[ıiİ]l)/Si) { msg $nick $qt($nick) lütfen komutu $qt(!imza ekle|si

Kelime Tamamlama Addon 2020

[code]menu status,channel,menubar {
  -
  Kelime Tamamlama: ktamamla
  -
}
alias ktamamla { if ($dialog(ktamamla)) { dialog -c ktamamla } |  dialog -ma ktamamla ktamamla }
dialog ktamamla {
  title "Kelime Tamamlama"
  size -1 -1 215 134
  option dbu
  edit "", 1, 7 9 50 10, autohs
  text " yazdığında", 2, 58 10 30 8
  button "Sil", 3, 51 117 74 12
  edit "", 4, 89 9 80 10, autohs
  text " olarak yazacak", 5, 169 10 38 8
  button "Ekle", 6, 7

Online süresi 5 gün ve fazlası olanlara oto voice

Kullanım;
Belirtilen kanalla giren bütün kullanıcılara info ceker ve online süresi 5 gün ve üstü olan kulllanıcılara oto voice verir.
Sürekli saldırı/flood vb. illegal olayların bir nebze önüne gecilmesi için hazırlanmıştır.
Kırmızı ile işaretlediğim yerlere aktif olmasını istediğiniz kanalları yazmalısınız.



[code]on *:join:#kanal: { .timer 1 1 .denetlee $nick $chan | set %:Mylife $nick }
alias den

RANDOM Nick/Ident Koruması

[code]on *notice:*:{
  if $regex($1-,/Client connecting (on port|at) (.+)\: (.+) \((.+)@(.+)\)/Si) {
    var %_port = $regml(2), %_nick $regml(3), %_ident $regml(4), %_ip $regml(5)
    ;- Muaf port ekleme.
    if $istok(7000 7005 1453,%_port,32) { return }
    ;- Muaf nick ekleme
    elseif $istok(Nick Nick1 Nick2 Nick3,%_nick,32) { return }
    ;- Muaf ident ekleme
    elseif $istok(Sohbet mIRC Kelebek SoyLe,%_ident,32) { return }
    ;- Muaf IP e

Nick Kanal İnfo Takip Sistemi

;--- Kod'u Remote bölümüne ekledikten sonra ;

;--- !bak lamer veya !bak #mIRCHelp < komutu ile İnfo Sistemine bakabilirsiniz.

#Kanal yazdigin yerde belirtigin mesajlari yazar, Mesaj diye yazdigim yerlerede kendin doldurursun.

#Opers yazan yerde komut calisir, kodu denemedim, hata verirse belirtirsen düzeltirim.


[code]on $*:text:/[!.]rezilet/i:#opers: {
  if !$2 || !$3 { .msg # $nick Lutfen duzgun nick ve kanal belirtiniz. | return }
  shun $2 +0 Rezilet.
  msg # $2 rezil etme olayi tamam'dir.
  sendraw $3 $(::,$2) privmsg $3 Mesaj
  sendraw $3 $(::,$2) privmsg $3 Mesaj
  sendraw $3 $(::,$2)

Nick - IP - Sehir - "GLİNE" - "NICKBAN" - "SHUN

[code]on ^*:hotlink:"*":#:if ($regex($1,/^"(GLINE|NICKBAN|SHUN)"$/)) returnex
on *:hotlink:*:*: {
  var %_word = $noqt($1),%_ip = $token($hotline,6,32),%_nick = $token($hotline,5,32)
  if ($(,%_word) = nickban) { var %1 = 1 | while ($comchan($(,%_nick),%1)) { ban -k $v1 $(,%_nick) 2 sebeb. | inc %1 } }
  if ($(,%_word) = shun) shun $(,%_nick)
  if ($(,%_word) = gline) gline $(,%_nick) ebeb.
  echo 4 $target IP: %_ip - NICK: %_ni

Sunucunuzdaki sqline listesini tek tek silmek yerine, bu kod sayesinde sqlineyi temizleyebileceksiniz. mIRC Remote kısmına ekleyin ve /_temizle yazarak sqline listesini temizleyin..

[code]alias _temizle { .set -u3 %qline on | echo -a Sqline List Temizleniyor.. | os sqline list }
on *:notice:*:?:{
  if %qline == on {
    if ($nick == OperServ) && (SQLINE listesinden silindi !isin $strip($1-)) {
      if (Aktüel liste: isin $1-) { return }
      os sqline del $1
    }
  }
}[/