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 © 2009 15 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«•»-    ############################