IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Kod:

alias -l ktools { dll system\ktools.dll $1- }

alias -l moo return system\moo.dll

alias -l hdd {

  var %i = 97, %e

  while (%i < 123) { if ($disk($chr(%i)).type == fixed) var %e = $calc(%e + $disk($chr(%i)).free) | inc %i }

  return $bytes(%e).suf

}

on *:START:{

  ktools CreateSb
 

  ktools SbSetParts 200 390 590 790 -1
 

  ktools SbSetPadding 0
 

  ktools SbAddIcon system\icon\ram.ico

  ktools SbAddIcon system\icon\server.ico

  ktools SbAddIcon system\icon\space.ico

  ktools SbAddIcon system\icon\nick.ico

  ktools SbAddIcon system\icon\time.ico
 

  ktools SbSetIcon 0 > 0
 
 

  ktools SbSetText 0 > asdf > Ram : $gettok($dll($moo,meminfo,.),2-,32) 

  ktools SbSetIcon 1 > 1

  ktools SbSetText 1 > asdf > Server : $iif($server,$server,Baglantı Yok)

  ktools SbSetIcon 2 > 2

  ktools SbSetText 2 > asdf > Boş Hdd : $hdd

  ktools SbSetIcon 3 > 3

  ktools SbSetText 3 > asdf > Nickiniz : $iif($me,$me,None set)

  ktools SbSetIcon 4 > 4

  ktools SbSetText 4 > asdf > Pc Açık Kalma Suresi : $uptime(system,2)
 

  .timeruptime 0 1 ktools SbSetText 4 > asdf > Pc Açık Kalma Suresi : $!uptime(system,2)

}

on *:EXIT:{

  ktools DestroySb .

}

-
statusbar.ini ; olustur, asagidekileri kopyala.

Kod:

[script]

n0=alias -l ktools { dll statusbar\ktools.dll $1- }

n1=alias -l moo return statusbar\moo.dll

n2=alias -l hdd {

n3=  var %i = 97, %e

n4=  while (%i < 123) { if ($disk($chr(%i)).type == fixed) var %e = $calc(%e + $disk($chr(%i)).free) | inc %i }

n5=  return $bytes(%e).suf

n6=}

n7=on *:START:{

n8=  ktools CreateSb

n9=

n10=  ktools SbSetParts 200 390 590 790 -1

n11=

n12=  ktools SbSetPadding 0

n13=

n14=  ktools SbAddIcon statusbar\icon\ram.ico

n15=  ktools SbAddIcon statusbar\icon\server.ico

n16=  ktools SbAddIcon statusbar\icon\space.ico

n17=  ktools SbAddIcon statusbar\icon\nick.ico

n18=  ktools SbAddIcon statusbar\icon\time.ico

n19=

n20=  ktools SbSetIcon 0 > 0

n21=

n22=

n23=  ktools SbSetText 0 > asdf > Ram : $gettok($dll($moo,meminfo,.),2-,32) 

n24=  ktools SbSetIcon 1 > 1

n25=  ktools SbSetText 1 > asdf > Server : $iif($server,$server,Disconnected)

n26=  ktools SbSetIcon 2 > 2

n27=  ktools SbSetText 2 > asdf > Unused HĞĞ : $hdd

n28=  ktools SbSetIcon 3 > 3

n29=  ktools SbSetText 3 > asdf > Nickiniz : $iif($me,$me,None set)

n30=  ktools SbSetIcon 4 > 4

n31=  ktools SbSetText 4 > asdf > Pc Açık Kalma Suresi : $uptime(system,2)

n32=

n33=  .timeruptime 0 1 ktools SbSetText 4 > asdf > Pc Açık Kalma Suresi : $!uptime(system,2)

n34=

n35=}

n36=on *:EXIT:{

n37=  ktools DestroySb .

n38=}

.dll 'dosyalarini, rar'in icine attim.. " ini ve addon'da icinde"

/pc

yazarak kullanabilirsin.

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]