Auteur Sujet: Script mIRC en Xchat  (Lu 2284 fois)

0 Membres et 1 Invité sur ce sujet

spike

  • Messages: 547
  • Boinc'eur Respectable
  • ****
  •   
Script mIRC en Xchat
« le: 14 août 2004 à 02:24 »
Voilà le script (celui de boinc.dk) en traduit et un peut modif à ma façon. Si qqu'un peut le refaire en Xchat ça serait cool pr bcp de monde.
Notez que le > dans les noms sous les projets je passent pas donc faudrait revoir ça  :whistle:

[cpp]
on *:load: { if (!%f) set %path $sdir(C:,Dossier Boinc ?) | echo Statistiques Boinc Chargée }

menu channel,query {
  .-
  .Boinc
  ..Status:boinc
  ..Info Processeur:boinccpu
}


alias hrs {
  if ($1 isnum)  {
    return $+(,$int($calc($1 /3600)),,h) $+(,$right(0 $+ $int($calc($1% 3600/60)),2),,m)
  }
  else { return N/A }
}
alias path { return $+(%path,/client_state.xml) }
alias del { return $gettok($gettok($read($path,w,* $+ $1 $+ *),-1,62),1,60) }

alias path2 { return $+(%path,/slots/0/state.sah) }
alias del2 { return $gettok($gettok($read($path2,w,* $+ $1 $+ *),-1,62),1,60) }


alias boinc {
  var %name = $del()
  var %team = $del()
  if (%team == /team_name) var %team = N/A
  var %tc = $round($del(),2)
  var %ueacgc = $round($del(),2)
  var %projekt = $del()
  var %pcid = $del()
  if ($del() == 0) var %regdate = N/A
  else var %regdate = $asctime($del())
  var %progress = $calc($remove($del(),0.)/10000)
  if ($left($gettok(%progress,2,46),-2) != $null) var %progressa = $gettok(%progress,1,46) $+ . $+ $left($gettok(%progress,2,46),-2) $+ %
  else var %progressa = $gettok(%progress,1,46) $+ %
  var %time = $hrs($del())
  var %cputime = $del2(