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 Tree9Teşekkür
  • 6 Post By CoCoRiCo
  • 2 Post By CoCoRiCo
  • 1 Post By CoCoRiCo
Cevapla
 
LinkBack Seçenekler
  #1  
Alt 10 Haziran 2015, 16:20
CoCoRiCo - ait Kullanıcı Resmi (Avatar)
 Chief 

mS Puan: 571
mS Derece: CoCoRiCo ÇalışkanCoCoRiCo ÇalışkanCoCoRiCo ÇalışkanCoCoRiCo ÇalışkanCoCoRiCo ÇalışkanCoCoRiCo Çalışkan
 
Üyelik tarihi: 10 Temmuz 2009
Bulunduğu yer: \xml:http\
Yaş: 41
Mesajlar: 135
Konular: 22
Eklentiler: 0
Alınan Teşekkür: 85
Yapılan Teşekkür: 19
Standart IP counter - IP Kontör

Epeydir kod paylaşmamıştım.. bununla yeninden bi başlangıç yapalım..
geliştirmek üzere yadıgım bi kod.. sizler ihtiyacınıza göre düzenlersiniz..

Ne işe yarar IP adreslerini başlanğıçtan bitişe kadar + 1 olarak artırır

/ipc
Kod:
alias ipc {
  .timer_prix 0 1 ipc
  if $regex(ip,$1,/^(?: (?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\.){3}(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)$/g) {
    if $gettok($1,1,46) < 1 { echo ** Hatalı ip.. Class A "1" den düşük olamaz. orn: 1.0.0.0 | return }
    set %d¨ $gettok($1,4,46) |  set %c¨ $gettok($1,3,46) | set %b¨ $gettok($1,2,46) |  set %a¨ $gettok($1,2,46)
  }

  $iif(!%d¨,set %d¨ 0) 
  ;class D
  $iif(!%c¨,set %c¨ 0)
  ;class C
  $iif(!%b¨,set %b¨ 0) 
  ;class B
  $iif(!%a¨,set %a¨ 1)
  ;class A
  if %d¨ < 256  {  inc %d¨   }
  if %d¨ == 256 && %c¨ < 256 { inc %c¨ | unset %d¨ }
  if %c¨ == 256 && %b¨ < 256 { inc %b¨ | unset %d¨,%c¨ }
  if %b¨ == 256 && %a¨ < 256 { inc %a¨ | unset %b¨,%c¨,%d¨ }
  if %a¨ == 256 && %a¨ < 256 { inc %a¨ | unset %b¨,%c¨,%d¨ }
   if %a¨ == 255 && %b¨ == 255 && %c¨ == 255 &&  %d¨ == 255 { echo : IPTamamlandı | unset %*¨* | timer_prix off }
  $iif(!%d¨,set %d¨ 0) 
  $iif(!%c¨,set %c¨ 0)
  $iif(!%b¨,set %b¨ 0) 
  $iif(!%a¨,set %a¨ 1)
  echo $+(%a¨,.,%b¨,.,%c¨,.,%d¨)

}
IrCbaStarD, fav, Feragat ve 3 diğerleri buna teşekkür ettiler.
__________________
3m2t
//alias $str($+(alias,$chr(32)),4) | alias
Alıntı ile Cevapla
Sponsored Links
  #2  
Alt 11 Haziran 2015, 09:51
Avatar Yok
fav fav isimli Üye şimdilik offline konumundadır

mS Puan: 11
mS Derece: fav
 
Üyelik tarihi: 11 Eylül 2011
Mesajlar: 40
Konular: 16
Eklentiler: 1
Alınan Teşekkür: 1
Yapılan Teşekkür: 17
Standart

eline sağlık birazdaha acıklayabilirmisin hocam

PBIP Unknown command

/if: Yetersiz veya eksik parametre (Satır 19, script15.ini)

sanırım benim saksı basmadı olayı

PBIP kısmını nerede kullanıcaz

Konu fav tarafından (11 Haziran 2015 Saat 09:53 ) değiştirilmiştir.
Alıntı ile Cevapla
  #3  
Alt 11 Haziran 2015, 11:49
CoCoRiCo - ait Kullanıcı Resmi (Avatar)
 Chief 

mS Puan: 571
mS Derece: CoCoRiCo ÇalışkanCoCoRiCo ÇalışkanCoCoRiCo ÇalışkanCoCoRiCo ÇalışkanCoCoRiCo ÇalışkanCoCoRiCo Çalışkan
 
Üyelik tarihi: 10 Temmuz 2009
Bulunduğu yer: \xml:http\
Yaş: 41
Mesajlar: 135
Konular: 22
Eklentiler: 0
Alınan Teşekkür: 85
Yapılan Teşekkür: 19
Standart

şimdi calışır durumda timer'daki alias adını yanlıs yazmısım
IrCbaStarD ve ¿ buna teşekkür ettiler.
__________________
3m2t
//alias $str($+(alias,$chr(32)),4) | alias
Alıntı ile Cevapla
  #4  
Alt 13 Haziran 2015, 17:01
Avatar Yok
 Headcoder 

mS Puan: 41
mS Derece: IrCbaStarD
 
Üyelik tarihi: 28 Kasım 2009
Mesajlar: 13
Konular: 9
Eklentiler: 0
Alınan Teşekkür: 25
Yapılan Teşekkür: 13
Standart

@CoCoRiCo abi kullanmayi akil edene cok faydali bi kod ;$
Alıntı ile Cevapla
  #5  
Alt 13 Haziran 2015, 17:30
¿ - ait Kullanıcı Resmi (Avatar)
¿ ¿ isimli Üye şimdilik offline konumundadır
 WebKeeper 

mS Puan: 1
mS Derece: ¿
 
Üyelik tarihi: 28 Mayıs 2015
Mesajlar: 2
Konular: 1
Eklentiler: 0
Alınan Teşekkür: 4
Yapılan Teşekkür: 11
Standart

Abi simdi bu kod tam olarak napiyor, IP'ye kontor mu ? atiyor. Anlamadi ben, şlajfşlajflşafa
__________________

Alıntı ile Cevapla
  #6  
Alt 15 Haziran 2015, 08:35
CoCoRiCo - ait Kullanıcı Resmi (Avatar)
 Chief 

mS Puan: 571
mS Derece: CoCoRiCo ÇalışkanCoCoRiCo ÇalışkanCoCoRiCo ÇalışkanCoCoRiCo ÇalışkanCoCoRiCo ÇalışkanCoCoRiCo Çalışkan
 
Üyelik tarihi: 10 Temmuz 2009
Bulunduğu yer: \xml:http\
Yaş: 41
Mesajlar: 135
Konular: 22
Eklentiler: 0
Alınan Teşekkür: 85
Yapılan Teşekkür: 19
Standart

hahahah yok.. türkçede kontör deyince sadece telefon kontörü geliyor akla.
aslında çok işe yarar bi kod..
¿ buna teşekkür etti.
__________________
3m2t
//alias $str($+(alias,$chr(32)),4) | alias
Alıntı ile Cevapla
Cevapla

Etiketler
counter, kontör

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