Neler yeni
MEGAForum - Teknoloji Forumu

Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı yada giriş yapmalısınız. Forum üye olmak tamamen ücretsizdir.

NickCompleter (Nick Tamamlayıcı)

SaNCaK

MFC Üyesi
  • Üyelik Tarihi
    7 Kas 2017
  • Mesajlar
    35
  • MFC Puanı
    0
PHP:
on *:load: { 
  .echo -aq $input(Author: SaNCaK $+ $crlf $+ $crlf $+ Addon: NickCompleter $chr(40) $+ v5.4 $+ $chr(41) $+ $crlf $+ $crlf $+ Released at: 03 28 2014 $+ $crlf $+ $crlf $+ Contact: sancak@outlook.com.tr $+ $crlf $+ $crlf $+ Thank you for using this Addon,igo,Addon: NickCompleter $chr(40) $+ v5.4 $+ $chr(41))
  .echo -s _____________________________________________________
  .echo -s 0,1 Loading NickCompleter Add-On... 
  .echo -s 0,1 You are running mIRC $version on Windows $+ $os  $+ .
  .echo -s ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
}
on *:unload: { 
  .echo -aq $input(Author: SaNCaK $+ $crlf $+ $crlf $+ Addon: NickCompleter $chr(40) $+ v5.4 $+ $chr(41) $+ $crlf $+ $crlf $+ Released at: 03 28 2014 $+ $crlf $+ $crlf $+ Contact: sancak@outlook.com.tr $+ $crlf $+ $crlf $+ Unloading...,igo,Addon: NickCompleter $chr(40) $+ v5.4 $+ $chr(41))
}
Menu Menubar { 
$iif(%NickCompleter,$style(1))  ▶ NickCompleter ( $+ $iif(%NickCompleter,On,Off) $+ ) {
    if (%NickCompleter) { unset %NickCompleter | .disable #NickCompleter | echo -a $timestamp 9,1Nick Completer 4CLOSE }
    else { set %NickCompleter on | .enable #NickCompleter | echo -a $timestamp 9,1Nick Completer 3OPEN }
  }
}

#NickCompleter on
alias NickCompleter {
  var %r = $r(1,$len($1)) 
  if ($1 isvo #) { return [04+ $+ $chr(3) $+ 02 $+ $left($1,$calc(%r - 1)) $+ $chr(31) $+ $chr(3) $+ $gettok(02 03 04 05 06 07 10 12 13,$r(1,10),32)  $+ $+ $mid($1,%r,1) $+ $chr(15) $+ $chr(3) $+ 02 $+ $right($1,$calc(-1 * %r)) $+ $chr(15) $+ ]
    halt 
  } 
  elseif ($1 isop #) {  return [04@ $+ $chr(3) $+ 02 $+ $left($1,$calc(%r - 1)) $+ $chr(31) $+ $chr(3) $+ $gettok(02 03 04 05 06 07 10 12 13,$r(1,10),32)  $+ $+ $mid($1,%r,1) $+ $chr(15) $+ $chr(3) $+ 02 $+ $right($1,$calc(-1 * %r)) $+ $chr(15) $+ ]
    halt
  }
  elseif ($1 ishop #) {  return [04% $+ $chr(3) $+ 02 $+ $left($1,$calc(%r - 1)) $+ $chr(31) $+ $chr(3) $+ $gettok(02 03 04 05 06 07 10 12 13,$r(1,10),32)  $+ $+ $mid($1,%r,1) $+ $chr(15) $+ $chr(3) $+ 02 $+ $right($1,$calc(-1 * %r)) $+ $chr(15) $+ ]
    halt
  }
  else { 
    return [[ $+ $chr(3) $+ 02 $+ $left($1,$calc(%r - 1)) $+ $chr(31) $+ $chr(3) $+ $gettok(02 03 04 05 06 07 10 12 13,$r(1,10),32)  $+ $+ $mid($1,%r,1) $+ $chr(15) $+ $chr(3) $+ 02 $+ $right($1,$calc(-1 * %r)) $+ $chr(15) $+ ] $2- 
    halt
  }
}
on *:INPUT:*:{
  if ($server != $null) {
    if ($inpaste) || ($ctrlenter) || ($left($1,1) != /) && (c !isin $active(#).mode) {
      var %max = $numtok($1-,32)
      var %c = 0
      var %sentence = $1-
      while (%c <= %max) {
        inc %c
        if ($gettok($1-,%c,32) ison $active) {
          var %sentence = $replace(%sentence,$gettok($1-,%c,32),$NickCompleter(  [ $+ [ $gettok($1-,%c,32) ] $+ ]  ))
        }
      }
      msg $active %sentence | halt
    }
  }
}
#NickCompleter end

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 ekran karşımızda, ekrana sağ tıklayıp yapıştırı tıklıyoruz. (Kısayol Tuşu Ctrl + V) Son Olarak Tamam [OK] butonuna tıklıyoruz ve kodumuzu eklemiş oluyoruz.
 
Üst Alt