logo

Sitemize hoşgeldiniz.
Tarih: 09-22-2020
Saat: 03:59

mIRClub | BİLGİ PAYLAŞIM BLOĞU

mIRC Script | Addon | Kısa Kod
Site Map Contacts anasayfa

Üye Panelİ

Anket

    • Sitemi Nasıl Buldunuz (What do you think)?

      Sonuçları görüntüle

      Yükleniyor ... Yükleniyor ...
  • Radyo

    Sayaç ve Dost Sİteler

    En güncel Mobil Sohbet siteniz.
    Sitelerinizi en iyi dizin'e ekleyin.

    TAKVİM

    Ekim 2017
    P S Ç P C C P
     1
    2345678
    9101112131415
    16171819202122
    23242526272829
    3031  

    POPÜler YAZILAR

    SON YORUMLAR

    You are here: Home » miRC Kısa Kodlar » Whois
    yazarYazar: Admin | tarihTarih: 2 Ekim 2017 / 20:31 | etiketEtiketler:
    on *:LOAD: {
      echo -a _____________________________________________________
      echo -a 4,1[15,1 SaNCaK 4,1] 0,1 Loading Add-On... 
      echo -a 4,1[15,1 SaNCaK 4,1] 0,1 Add-on: 09 Whois  15 Add-On 
      echo -a 4,1[15,1 SaNCaK 4,1] 0,1 You are running mIRC $version on $os  $+ .
      echo -a 4,1[15,1 SaNCaK 4,1] 0,1 Copyright © 200915 http://irctr.wordpress.com
      echo -a ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
    }
    alias clonecntrl { who +h $1 | set %jnk $1 }
    alias kanalclone {
      if ($ial($address($1,2),0) == 1) return
      var %nickler = 0 | var %clone = $1
      while (%nickler < $ial($address($1,2),0)) { inc %nickler | var %clone = $addtok(%clone,$ial($address($1,2),%nickler).nick, 44) }
      return %clone
    }
    
    #whocontrol off
    raw 352:*: {
      haltdef
      if %jnk { %cloneleri = $addtok(%cloneleri,$6,32) }
    }
    raw 315:*:if %jnk { haltdef | unset %jnk |   echo -a $timestamp 12|---› 14 Kullandığı nickler:1 $eval(%cloneleri,2) | .disable #whocontrol }
    #whocontrol end
    raw 301:*: {
      haltdef
      echo -a $timestamp 12|---› 14Away Durumu:1 ( $+ $3- $+ )
    }
    raw 307:*: {
      haltdef
      echo -a $timestamp 12|---› 14Kayıt Durumu:1 Bu Nick Kayıtlı ve İdentify Edilmiştir.
    }
    raw 310:*: {
      haltdef
      echo -a 4» IRC Helper
    }
    raw 335:*: {
      echo -a $timestamp 12|---› 14Bot:1 Evet (+B).
      halt
    }
    raw 311:*:{
      haltdef
      echo -a $timestamp 12___[1Whois:1 $2 12] -------------------------------------------------------------•
      ;echo -a $timestamp 12|---› 14Nick:1 $2
      echo -a $timestamp 12|---› 14FullName:1 $6-
      echo -a $timestamp 12|---› 14İp Adresi:1 $3 $+ 04 $+ @ $+ 01 $+ $4
      var %clone = $kanalclone($2)
      if (%clone == $null)   echo -a $timestamp 12|---› 14Kanaldaki Klonları:1 (Clone yok!)
      else   echo -a $timestamp 12|---› 14Clone:1 ( $+ $numtok(%clone,44) $+ ) kişi 04/01 %clone
      haltdef
    }
    raw 312:*:{
      haltdef
      echo -a $timestamp 12|---› 14Server:1 $3
    }
    raw 313:*: {
      haltdef
      echo -a $timestamp 12|---› 14Network Özelliği:1 $4 $5 $6 $7 $8 $9
    }
    raw 314:*:{
      haltdef
      echo -a $timestamp 12¯°--------------------------------------------------------------------------------•
      echo -a $timestamp 12|---› 14Nick:1 $2
      echo -a $timestamp 12|---› 14FullName:1 $6-
      echo -a $timestamp 12|---› 14İp Adresi:1 $3 $+ 04 $+ @ $+ 01 $+ $4
      var %clone = $kanalclone($2)
      if (%clone == $null)   echo -a $timestamp 12|---› 14Kanaldaki Klonları:1  ( Clone yok! )
      else   echo -a $timestamp 12|---› 14Clone:1 ( $+ $numtok(%clone,44) $+ ) kişi 04/01 %clone
      haltdef
    
    }
    raw 317:*:{
      haltdef
      %idle = $replace($duration($3),secs,saniye,sec,saniye,mins ,dakika,min,dakika,hrs,saat,hr,saat,days,gün,day,gün,wks,hafta,wk,hafta)
      %baglanis = $replace($asctime($4),mon,Pazartesi,tue,Salı,wed,Çarşamba,thu,Perşembe,fri,Cuma,sat,Cumartesi,sun,Pazar,jan,Ocak,Feb,Şubat,Mar,Mart,apr,Nisan,May,Mayıs,Jun,Haziran,Jul,Temmuz,Aug,Ağustos,Sep,Eylül,Oct ,Ekim,Nov,Kasım,Dec,Aralık)
      echo -a $timestamp 12|---› 14Bağlandığı Zaman:1 %baglanis
      echo -a $timestamp 12|---› 14Boş Olduğu Süre:1 %idle
      echo -a $timestamp 12|---› 14Bağlandıktan Sonra Geçen Süre:1 $duration($calc($ctime - $4))
    }
    raw 318:*:{
      haltdef
      .timer -h 1 200 echo -a $timestamp 12¯°--------------------------------------------------------------------------------•
    }
    raw 319:*:{
      haltdef
      echo -a $timestamp 12|---› 14Kanalları:1 $3-
      echo -a $timestamp 12|---› 14Ortak kanallar:1 $ortak_k($2) 04/01 Toplam:04 $comchan($2,0) 01Kanal
    }
    
    raw 338:*:{
      haltdef
      echo -a $timestamp 12|---› 14Gerçek İp Adresi:01 $4 $5 $6
      echo -a $timestamp 12|---› 14Gerçek İp:1 $3 $4
    }
    raw 320:*:{
      haltdef
      echo -a $timestamp 12|---› 14Swhois:1 $2-
    }
    raw 330:*: echo -a $timestamp 12|---› 14Durum:1 $2 Nicki $3 Accountuna kayıtlıdır. | halt
    raw 378:*:{
      haltdef
      .enable #whocontrol
      clonecntrl $7
      echo -a $timestamp 12|---› 14Gerçek Ip Adresi:01 $4 $5 $6 $7
    }
    raw 379:*:{
      haltdef
      echo -a $timestamp 12|---› 14Nick modeleri:01 $6
    }
    raw 671:*:{
      haltdef
      echo -a $timestamp 12|---› 14Bağlantı:1 $3-
    }
    raw 327:* {
      echo -a $timestamp 12|---› 14Client Info:1 Java User
      halt
    }
    
    raw 310:* {
      echo -a $timestamp 12|---› 14 Özellikleri • 1 Yardım sever biri gibi duruyor
      halt
    }
    
    raw 325:* {
      echo -a $timestamp 12|---› 14 Özellikleri • 1 Hassas Kulaklara Sahip.
      halt
    }
    
    raw 328:* {
      echo -a $timestamp 12|---› 14 Kullandığı İp Numarası • 1 $7-
      halt
    }
    
    raw 308:* {
      echo -a $timestamp 12|---› 14 Bilgi:1 Servis Ajanı! •
      halt
    }
    alias ortak_k {
      if ($server == $null) {   echo -a $timestamp 12|---› 14Herhangi bir sêrvêr'a bağlı değilsiniz. }
      elseif ($chan($me) == 0) {   echo -a $timestamp 12|---› 14Herhangi bir kanala girmiş değilsiniz. }
      elseif (!$1) {   echo -a $timestamp 12|---› 14Ortak kanallarınızın bulunacağı nick belirtilmedi. }
      elseif ($comchan($1,0) == 0) {   echo -a $timestamp 12|---› 14Beliritlen nick bulunamadı. }
      else {
        var %oid 1
        set %orka $comchan($1,0)
        unset %knms
        while (%oid <= %orka) {
          set %knms $comchan($1,%oid) $+ $chr(32) $+ %knms
          inc %oid
        }
        return %knms
      }
    }
    
    
    

     

    Oppss! Hiç yorum yapılmamış!
    İlk yorumu neden sen yapmıyorsun?

    YORUM YAP

    İsim:
    Email:
    Site:
    Yorum:

    seo