logo

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

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

    Eylül 2020
    P S Ç P C C P
     123456
    78910111213
    14151617181920
    21222324252627
    282930  

    POPÜler YAZILAR

    SON YORUMLAR

    You are here: Home
    yazarYazar: Admin | tarihTarih: 2 Ekim 2017 / 20:31
    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
      }
    }
    
    
    

     

    yazarYazar: Admin | tarihTarih: 2 Ekim 2017 / 20:16
    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 Titlebar Tracking  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 Coder: 15SaNCaK 0,1 E-Mail: 15SaNCaK@SaNCaK.gen.tr 
      echo -a 4,1[15,1 SaNCaK 4,1] 0,1 Copyright © 200915 http://www.sancak.gen.tr
      echo -a ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
    }
    menu menubar,status {
      Titlebar ( $+ $iif(%SaNCaK.Titlebar.status,On,Off) $+ ):dialog -m SaNCaK.Titlebar SaNCaK.Titlebar
      }
    
      ;############################      -«•»SaNCaK ScripT«•»-    ############################
    alias -l SZ.logo {
      return $Gettok(%tmp,$iif($1 == -n,1,$iif($1 == -a,1-2,1-)),32)
    }
    alias -l SZ.xduration return $remove($replace($duration($1),secs,s,mins,m,hrs,h,days,d,wks,w,wk,w,min,m,sec,s,hr,h,day,d),$chr(32)))
    alias SaNCaK.Titlebar {
      if ($1) .timerSaNCaK.Titlebar.update 0 1 SaNCaK.Titlebar
      else {
        var %ctr = 1,%tmp
        if (%SaNCaK.Titlebar.umode) %tmp = $addtok(%tmp,$+([Usermodes:,$iif($usermode,$ifmatch,N/A),]),32)
        if (%SaNCaK.Titlebar.online) %tmp = $addtok(%tmp,$+([Online:,$SZ.xduration($uptime(server,3)),]),32)
        if (%SaNCaK.Titlebar.away) %tmp = $addtok(%tmp,$+([Away:,$iif($away,Evet,Hayır),]),32)
        if (%SaNCaK.Titlebar.uptime) %tmp = $addtok(%tmp,$+([PC Uptime:,$SZ.xduration($uptime(system,3)),]),32)
        if (%SaNCaK.Titlebar.daytime) %tmp = $addtok(%tmp,$+([Day & Time:,$day @ $time(h:nnt),]),32)
        titlebar $iif(%SaNCaK.Titlebar.status,%tmp)
      }
    }
    on *:START: SaNCaK.Titlebar -yepperz
    
    dialog SaNCaK.Titlebar {
      title "SaNCaK Script Titlebar Özellikleri"
      size -1 -1 199 33
      option dbu
      box "", 1, 2 2 194 18
      check "User Mod", 2, 5 8 37 10, flat
      check "Online Time", 3, 44 8 37 10, flat
      check "Away Durum", 4, 82 8 39 10, flat
      check "Pc Uptime", 5, 123 8 35 10, flat
      check "GünZaman", 6, 158 8 36 10, flat
      check "Başlangıçta Çalıştır", 7, 4 22 60 10, flat
      button "&Kaydet", 10, 164 21 30 10, ok flat
    }
    
    
    on 1:dialog:SaNCaK.Titlebar:*:*: {
      if ($devent == init) {
        ; init routines
        var %ctr = 1,%tmp = umode,online,away,uptime,daytime,status
        while ($Gettok(%tmp,%ctr,44)) {
          if (%SaNCaK.Titlebar. [ $+ [ $ifmatch ] ] ) did -c $dname $calc(%ctr + 1)
          inc %ctr
        }
      }
      elseif ($devent == sclick) {
        ; sclick routines
    
        if ($did == 10) {
          set %SaNCaK.Titlebar.umode $iif($did(2).state == 1,$true,$false)
          set %SaNCaK.Titlebar.online $iif($did(3).state == 1,$true,$false)
          set %SaNCaK.Titlebar.away $iif($did(4).state == 1,$true,$false)
          set %SaNCaK.Titlebar.uptime $iif($did(5).state == 1,$true,$false)
          set %SaNCaK.Titlebar.daytime $iif($did(6).state == 1,$true,$false)
    
          if ($did(7).state == 1) {
            set %SaNCaK.Titlebar.status $true
            SaNCaK.Titlebar -b0riNg
          }
          else {
            set %SaNCaK.Titlebar.status $false
            .timerSaNCaK.Titlebar.update off
          }
        }
        if ($did == 11) run http://irctr.wordpress.com
        if ($did == 13) run http://irctr.wordpress.com
      }
      elseif ($devent == dclick) {
        ; dclick routines
    
        if ($did == 11) run http://irctr.wordpress.com
        if ($did == 13) run http://irctr.wordpress.com
      }
    }
    ;############################      -«•»SaNCaK ScripT«•»-    ############################

     

    seo