mIRC Scripting  


Geri dön   mIRC Scripting > mIRC Scripting > Snippets - Parça kodlar

Snippets - Parça kodlar mIRC Scripting hakkında "parça /ufak kod" niteliği taşıyan kodlarını bulup veya paylaşabileceğiniz bölüm.

Like Tree101Teşekkür
Cevapla
 
LinkBack Seçenekler
  #41  
Alt 07 Ekim 2011, 17:05
Avatar Yok
 DirtyCoder 

mS Puan: 1031
mS Derece: L4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisi
 
Üyelik tarihi: 10 Temmuz 2009
Yaş: 34
Mesajlar: 339
Konular: 100
Eklentiler: 3
Alınan Teşekkür: 143
Yapılan Teşekkür: 0
Standart

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
PamiR buna teşekkür etti.
__________________
C/co/cod/code^man.
Alıntı ile Cevapla
Sponsored Links
  #42  
Alt 07 Ekim 2011, 17:13
Avatar Yok
 DirtyCoder 

mS Puan: 1031
mS Derece: L4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisi
 
Üyelik tarihi: 10 Temmuz 2009
Yaş: 34
Mesajlar: 339
Konular: 100
Eklentiler: 3
Alınan Teşekkür: 143
Yapılan Teşekkür: 0
Standart

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.
}
PamiR buna teşekkür etti.
__________________
C/co/cod/code^man.
Alıntı ile Cevapla
  #43  
Alt 07 Ekim 2011, 17:18
Avatar Yok
 DirtyCoder 

mS Puan: 1031
mS Derece: L4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisi
 
Üyelik tarihi: 10 Temmuz 2009
Yaş: 34
Mesajlar: 339
Konular: 100
Eklentiler: 3
Alınan Teşekkür: 143
Yapılan Teşekkür: 0
Standart

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)) 
  }
}
PamiR buna teşekkür etti.
__________________
C/co/cod/code^man.
Alıntı ile Cevapla
  #44  
Alt 07 Ekim 2011, 17:23
Avatar Yok
 DirtyCoder 

mS Puan: 1031
mS Derece: L4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisi
 
Üyelik tarihi: 10 Temmuz 2009
Yaş: 34
Mesajlar: 339
Konular: 100
Eklentiler: 3
Alınan Teşekkür: 143
Yapılan Teşekkür: 0
Standart

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 
  }
}
PamiR buna teşekkür etti.
__________________
C/co/cod/code^man.
Alıntı ile Cevapla
  #45  
Alt 07 Ekim 2011, 17:29
Avatar Yok
 DirtyCoder 

mS Puan: 1031
mS Derece: L4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisi
 
Üyelik tarihi: 10 Temmuz 2009
Yaş: 34
Mesajlar: 339
Konular: 100
Eklentiler: 3
Alınan Teşekkür: 143
Yapılan Teşekkür: 0
Standart

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
PamiR buna teşekkür etti.
__________________
C/co/cod/code^man.
Alıntı ile Cevapla
  #46  
Alt 07 Ekim 2011, 17:42
Avatar Yok
 DirtyCoder 

mS Puan: 1031
mS Derece: L4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisi
 
Üyelik tarihi: 10 Temmuz 2009
Yaş: 34
Mesajlar: 339
Konular: 100
Eklentiler: 3
Alınan Teşekkür: 143
Yapılan Teşekkür: 0
Standart

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ı.)
}
PamiR buna teşekkür etti.
__________________
C/co/cod/code^man.
Alıntı ile Cevapla
  #47  
Alt 07 Ekim 2011, 18:24
Avatar Yok
 DirtyCoder 

mS Puan: 1031
mS Derece: L4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisi
 
Üyelik tarihi: 10 Temmuz 2009
Yaş: 34
Mesajlar: 339
Konular: 100
Eklentiler: 3
Alınan Teşekkür: 143
Yapılan Teşekkür: 0
Standart

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))
}
PamiR buna teşekkür etti.
__________________
C/co/cod/code^man.
Alıntı ile Cevapla
  #48  
Alt 07 Ekim 2011, 19:04
Avatar Yok
 DirtyCoder 

mS Puan: 1031
mS Derece: L4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisi
 
Üyelik tarihi: 10 Temmuz 2009
Yaş: 34
Mesajlar: 339
Konular: 100
Eklentiler: 3
Alınan Teşekkür: 143
Yapılan Teşekkür: 0
Standart

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.
PamiR buna teşekkür etti.
__________________
C/co/cod/code^man.
Alıntı ile Cevapla
  #49  
Alt 07 Ekim 2011, 19:13
Avatar Yok
 DirtyCoder 

mS Puan: 1031
mS Derece: L4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisi
 
Üyelik tarihi: 10 Temmuz 2009
Yaş: 34
Mesajlar: 339
Konular: 100
Eklentiler: 3
Alınan Teşekkür: 143
Yapılan Teşekkür: 0
Standart

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.
PamiR buna teşekkür etti.
__________________
C/co/cod/code^man.
Alıntı ile Cevapla
  #50  
Alt 07 Ekim 2011, 19:16
Avatar Yok
 DirtyCoder 

mS Puan: 1031
mS Derece: L4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisi
 
Üyelik tarihi: 10 Temmuz 2009
Yaş: 34
Mesajlar: 339
Konular: 100
Eklentiler: 3
Alınan Teşekkür: 143
Yapılan Teşekkür: 0
Standart

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
PamiR buna teşekkür etti.
__________________
C/co/cod/code^man.
Alıntı ile Cevapla
Cevapla

Etiketler
tüm, yaptığım, yardımlar or kodlar

Seçenekler

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Açık
Pingbacks are Açık
Refbacks are Açık



Yasal Uyarı

    5651 sayılı yasada belirtilen "Yer Sağlayıcı" olarak hizmet sunmaktadır. İlgili yasaya göre site yönetiminin tüm içerikleri kontrol etme yükümlülüğü yoktur. Bu sebep ile sitemiz, uyarıları dikkate alarak yasa dışı paylaşımlar hakkında gerekli işlemleri yapmaktadır. Oluşabilecek yasal sorumluluklar üyelerimize aittir. Gerekli şikayet bildirimleri yapabilmek için "burayı" tıklayarak gerekli alanları doldurup yapabilirsiniz.
mIRCScripting©
Powered by vBulletin®
Copyright © 2000-2015, Jelsoft Enterprises Ltd.
SEO by vBSEO 3.6.1

1 2 13 14 16 17 18 19 21 22 23 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 49 50 51 52 54 55 56 57 58 59 60 61 62 63 67 68 69 70 71 72 73 74 75 76