logo

Sitemize hoşgeldiniz.
Tarih: 09-22-2020
Saat: 05:15

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 » Titlebar Tracking
    yazarYazar: Admin | tarihTarih: 2 Ekim 2017 / 20:16 | 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 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«•»-    ############################

     

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

    YORUM YAP

    İsim:
    Email:
    Site:
    Yorum:

    seo