Yaptığım Tüm Yardımlar/Kodlar - Sayfa 5

**L4roXyL** · #41 07 Ekim 2011, 17:05

Tarih: 02-02-2008, 23:19

Bu kod mIRC üzerinden herhangi bir sunucuya bağlanmaya kalktığınızda, eğer dosya.txt-deki rumuzlardan birisi ile bağlanıyorsanız rumuzunu mIRCUser-randomsayı şeklinde değiştirmeye yarar. Genellikle başkalarının scriptlerine güvenlik önlemi için kullanılır.

Kod:

alias -l kntrl { 
  var %s = 1 
  while ($read(dosya.txt,%s)) { 
    if ($regex($1,/ $+ $v1 $+ /i))) { 
      nick $+(mIRCUser,-,$r(1,999)) 
      break 
    } 
    inc %s
  }
}
on *:connect:kntrl $me

**L4roXyL** · #42 07 Ekim 2011, 17:13

Tarih: 03-02-2008, 04:30

Bu kod scriptini açtığınızda belirlediğiniz günlere göre fullname-inizi değiştirmenize olanak sağlar.

Kod:

alias -l days return $replacecs($day,Monday,Pazartesi,Tuesday,Salı,Wedn esday,Çarşamba,Thursday,Perşembe,Friday,Cuma,Satur day,Cumartesi,Sunday,Pazar)
on *:start: {
  if ($days = Pazartesi) set %stnm Pazartesi-ismi.
  if ($days = Salı) set %snm Salı-ismi.
  if ($days = Çarşamba) set %snm Çarşamba-ismi.
  if ($days = Perşembe) set %snm Perşembe-ismi.
  if ($days = Cuma) set %snm Cuma-ismi.
  if ($days = Cumartesi) set %snm Cumartesi-ismi.
  if ($days = Pazar) set %snm Pazar-ismi.
}

**L4roXyL** · #43 07 Ekim 2011, 17:18

Tarih: 03-02-2008, 15:23

Bu kod herhangi bir kullanıcı nickinizi özelden veya kanaldan yazdığı zaman, mIRC simge veya tray konumunda ise, flash ile uyarı almanızı sağlar.

Kod:

on ^*:text:$($+(*,$me,*)):*: {
  if ($regex($appstate,^(minimized|tray)$)) {
    flash -r30 $+($nick,-,$iif(#,#,Özelden)) 
  }
}

**L4roXyL** · #44 07 Ekim 2011, 17:23

Tarih: 08-02-2008, 14:02

Bu kod kanala başkaları tarafından gönderilen text-ler içerisinde dosya.txt dosyasında bulunan "gelen yazı | gidecek yazı" şeklindeki satılarda, "gelen yazı" kısmında arama yapar. Eşleşme bulduğunda, "gidecek yazı" kısmını kişiye cevap olarak atacaktır.

Kod:

on *:text:*:#: {
  if ($read(dosya.txt,s,$1)) { 
    var %s = $gettok($replacecs($read(dosya.txt,$readn),$chr(124),$(|)),2,124) 
    msg # %s 
  }
}

**L4roXyL** · #45 07 Ekim 2011, 17:29

Tarih: 07-02-2008, 19:56

Bu kod belirtilen sayıdan fazla kullanıcı bulunan kanallara girmeye yarar.
Kodu kullanma şekli: /gir <sayı>

Kod:

alias gir .enable #k | list -min $1
#k off
raw *:*:{ 
  if ($numeric = 322) { 
    if ($3 >= 50) join $2 
  } 
  if ($numeric = 323) { 
    .disable #k
  } 
}
#k end

**L4roXyL** · #46 07 Ekim 2011, 17:42

Tarih: 07-02-2008, 23:18

Bu kod kanala giren nicklerin, daha önce hangi nick-lerden giriş yaptığını gösterir.

Kod:

on !*:join:#: { 
  if ($hmatch(#,$+($site,*),0) >= 2) { 
    kntrl # $site $nick 
  } 
  hadd -m # $+($site,½,$nick) 1 
}
alias kntrl { 
  var %1 1,%2 
  while ($hmatch($1,$+($2,*),%1)) {
    var %& = $gettok($v1,2,189) 
    if (%& != $3) { 
      %2 = $addtok(%2,%&,32) 
    } 
    inc %1 
  } 
  $iif($gettok(%2,2,32),echo $colour(join) -t $1 *** Bilgi: $3 nick'i daha önce; %2 nicklerinden giriş yaptı.)
}

**L4roXyL** · #47 07 Ekim 2011, 18:24

Tarih: 08-02-2008, 13:56

Bu kod sunucudan çıkan kullanıcıları ayrı pencerede(@network ve @network2) göstermeye yarar. Kodlardan birisi(on quit) IRCop flagları gerektirmez. Diğeri (on snotice) gerektirir.

Kod:

on *:quit: {
  $iif(!$window(@network),window -Cnak0 @network) 
  echo $colour(quit) -t @network (<= Çıkış) Nick: $nick - tam adresi: $gettok($address($nick,5),2,33)
}
on *:snotice:*client exiting*: { 
  $iif(!$window(@network2),window -Cnak0 @network2) 
  echo $colour(info) -t @network2 (<= Çıkış) Nick: $6 - IP adresi: $remove($gettok($7,2,64),$chr(41))
}

**L4roXyL** · #48 07 Ekim 2011, 19:04

Tarih: 08-02-2008, 20:20

Bu kod sunucuya giren kullanıcıları ayrı sayfada gösterir(@giris). Ve o ayrı sayfadaki nick üzerine tıkladığınızda o kişiyi sunucudan uzaklaştırır(/gline)

Kod:

on *:snotice:*client connect*: {
  $iif(!$window(@giris),window -Cnak0 @giris) 
  echo $colour(info) -t @giris Giriş yaptı: $+($chr(40),$9,$chr(41))
}
on ^*:hotlink:(*):@giris:if ($left($1,1) == $chr(40)) return | else return
on *:hotlink:*:@giris:gline $remove($1,$chr(40),$chr(41)) :gline sebebi.

**L4roXyL** · #49 07 Ekim 2011, 19:13

Tarih: 08-02-2008, 20:57

Bu kod sunucuya giren son kullanıcıyı belirtilen değişkene kayıt eder. Ve status penceresinde son giren kullanıcıya tıkladığınız zaman /gline ile sunucudan uzaklaştırılır.

Kod:

on *:snotice:*client connect*:set %& $9
on ^*:hotlink:%&:status window:return
on *:hotlink:*:*:gline $1 :gline-sebeb.

**L4roXyL** · #50 07 Ekim 2011, 19:16

Tarih: 08-02-2008, 20:45

Bu kod kanala giren kullanıcıya /userip uygulayıp aynı kanalda gerçek IP-sini göstermeye yarar. Bunu yapabilmek için IRCop flaglarına sahip olmalısınız.

Kod:

on ^!*:join:#:haltdef | set %& # | .enable #j | userip $nick
#j off
raw 340:*: {
  haltdef 
  var %n = $gettok($2,1,61) 
  echo $colour(join) -t %& *** Giriş: %n $+($chr(40),$gettok($2,2,43),$chr(41)) 
  .disable #j
}
#j end