Divers

~~~~~~~~ emule stats complet ~~~~~~~~                       

alias loademule {
  var %emule_temp = $sdir(c:\,Veuillez sélectionner le répertoire d'eMule)
  if (!%emule_temp) { echo -a ** 10Il est nécessaire de sélectionner le 7dossier 10d'7eMule10. Recommencez ! Merci.. | did -b sw 30 | halt }
  else {
    if ($exists(%emule_temp $+ onlinesig.dat)) { set %emule_dir %emule_temp | echo -a 10Le 7repertoire 10que vous avez sélectionné a été 7validé 10! Merci.. |  set %emule.grafica off | halt }
    else { echo -a 10Vous devez sélectionner le 7Répertoire10 d'eMule! Vérifiez que vous avez activé 7"Avtiver Online-Signature"10 dans 7Préférences - Général10 de emule! Merci.. |  did -b sw 30 | halt }
  }
}
alias emule.dir return %emule_dir $+ $1
alias em.server { return $gettok($emule.read,2,124) }
alias em.ip return $gettok($emule.read,3,124) 
alias em.port return $gettok($emule.read,4,124)
alias em.down return $gettok($emule.read2,1,124)
alias emule.read return $read($emule.dir(onlinesig.dat),1)
alias emule.read2 {
  if ($len($read($emule.dir(onlinesig.dat),0)) == 1) { var %emule.line = 1 }
  else { var %emule.line = 2 }
  return $replace($read($emule.dir(onlinesig.dat),%emule.line),$chr(44),$chr(46))
}
alias emule.pref return $readini($emule.dir(config/preferences.ini),$1,$2)
alias em.version { if ($emule.pref(eMule,AppVersion)) return v $+ $emule.pref(eMule,AppVersion) }
alias em.up return $gettok($emule.read2,2,124)
alias em.cola return $gettok($emule.read2,3,124)
alias emule.infos {
  if ($len($read($emule.dir(onlinesig.dat),0)) == 1) {
    var %emule.saca = Déconnecté
    if (%emule.saca == Déconnecté)  { 
      did -a sw 22 %emule.saca
      did -a sw 26 -
      did -a sw 29 -
      did -a sw 33 -
      did -a sw 36 -
    }
    halt
  }
  else { var %emule.saca = $em.server  }
  did -a sw 22 %emule.saca
  did -a sw 26 $em.down  Kb/s
  did -a sw 29 $em.up Kb/s
  did -a sw 33 $em.cola
  did -a sw 36 $findfile($emule.pref(eMule,TempDir),*.part,0)
}
alias emule {
  emule_timer
  if ($len($read($emule.dir(onlinesig.dat),0)) == 1) { var %emule.saca = $chr(32) 12Serveur:13 Ma mule est 4Déconnectée 12! $chr(32) }
  else { var %emule.saca = 12Serveur: 13[4 $em.server 13] 12IP:13 [4 $em.ip $+   13 ]12 Port: 13[4  $em.port $+  13 ] }
  scid $scid($activecid) | msg $active 12Stats eMule: 
  scid $scid($activecid) | msg $active 12Version:13 [4 $em.version 7]  
  scid $scid($activecid) | msg $active %emule.saca 
  scid $scid($activecid) | msg $active 12Download: 13[4 $em.down  $+ Ko/s 13] 12Record: 13[4 %emule_downT $+ Ko/s 13] 12Moyenne: 13[4 $round($calc(%emule_down / %emule_media),1) $+ Ko/s 13] 
  scid $scid($activecid) | msg $active 12Upload: 13[4 $em.up $+ Ko/s  13] 12Record: 13[4 %emule_upT $+ Ko/s 13] 12Moyenne: 13[4 $round($calc(%emule_up / %emule_media),1) $+ Ko/s 13] 
  scid $scid($activecid) | msg $active 12J'ai:13 [4 $findfile($emule.pref(eMule,TempDir),*.part,0) 13] 12fichier(s) en téléchargement.
}
alias emule_timer {
  .timerEMULE 1 5 emule_timer
  if ($emule.read2) {
    if (!%emule_media) { set %emule_media 1 }
    if (!%emule_down) { set %emule_down $em.down } | if (!%emule_downT) { set %emule_downT $em.down }
    if (!%emule_up) { set %emule_up $em.up } | if (!%emule_upT) { set %emule_upT $em.up }
    if (!%emule_cola) { set %emule_cola $em.cola } | if (!%emule_colaT) { set %emule_colaT $em.cola }
    inc %emule_media 
    set %emule_down $calc(%emule_down + $em.down) | if (%emule_downT < $em.down) { set %emule_downT $em.down }
    set %emule_up $calc(%emule_up + $em.up) | if (%emule_upT < $em.up) { set %emule_upT $em.up }
    set %emule_cola $calc(%emule_cola + $em.cola) | if (%emule_colaT < $em.cola) { set %emule_colaT $em.cola }
  }
}
}