Lagbar en mdx, très très belle!

Commenter

Contenu du snippet

Bon, la dernière source que j'ai ajouté n'était pas originale, je le reconnais, alors j'ai décidé d'en faire une ORIGINALE! Je ne pense pas avoir déjà vu de LagBar en mdx (seulement dans certains scripts) alors voilà, j'en ai fait une. C'est un dialog qui s'ouvrira lors de la connexion et qui s'incrustera à côté de la toolbar de mIRC. Pour que ça fasse beau, vaut mieux mettre un fond noir pour la toolbar et la switchbar de mIRC, pour les utilisateurs un peu plus avancés, changez les codes $rgb. Le code de lag n'est pas de moi, je l'ai trouvé je ne sais plus où (sûrement ici) mais le dialog et tous les autres trucs sont de moi.

Source / Exemple : 


alias mdx {
  var %dll = $mircdirmdx $+ \mdx.dll
  return $dll(%dll,$1,$2-)
}
dialog lag {
  size 550 40 175 0
  title "Lag"
  text "Lag:",1,6 3 25 17
  text "",2,33 3 33 17
  text "30 0 100",3,68 3 100 16
}
on *:dialog:lag:init:00:{
  mdx SetMircVersion $version
  mdx MarkDialog lag 
  mdx SetDialog lag bgcolor $rgb(0,0,0)
  mdx SetDialog lag style tool
  mdx SetColor 1,2 text $rgb(255,255,255)
  mdx SetColor 1,2 background $rgb(0,0,0)
  mdx SetColor 1,2 textbg $rgb(0,0,0)
  mdx SetControlMDX lag 3 ProgressBar smooth  > $mircdirMDX\ctl_gen.mdx
  did -i lag 3 1 barcolor $rgb(255,0,0)
  did -i lag 3 1 bgcolor $rgb(0,0,0)
  did -a lag 3 1
}
on *:disconnect:{
  dialog -x lag lag
}
on *:connect:{
  .timer 0 3 lm
  dialog -m lag lag
}
alias lm { 
  .ctcpreply $me LC $ticks
}
ON *:CTCPREPLY:LC &: { 
  set %lag $calc(($ticks -$2) / 1000),-3) s
  did -a lag 2 %lag
  if (%lag > 4.00 s) { did -a lag 3 100 }
  if (%lag <= 4.00 s) && (%lag > 3.00 s) { did -a lag 3 90 }
  if (%lag <= 3.00 s) && (%lag > 2.00 s) { did -a lag 3 80 }
  if (%lag <= 2.00 s) && (%lag > 1.00 s) { did -a lag 3 70 }
  if (%lag <= 1.00 s) && (%lag > 0.90 s) { did -a lag 3 60 }
  if (%lag <= 0.90 s) && (%lag > 0.70 s) { did -a lag 3 50 }
  if (%lag <= 0.70 s) && (%lag > 0.50 s) { did -a lag 3 40 }
  if (%lag <= 0.50 s) && (%lag > 0.30 s) { did -a lag 3 30 }
  if (%lag <= 0.30 s) && (%lag > 0.10 s) { did -a lag 3 20 }
  if (%lag <= 0.10 s) && (%lag > 0.01 s) { did -a lag 3 10 }
  if (%lag <= 0.01 s) { did -a lag 3 1 }
  halt
}

Conclusion :


Pour faire marcher la lagbar, il vous faut placer les 4 fichiers *.mdx et le fichier MDX.dll dans un dossier appellé mdx et contenu dans votre script bien sûr, vous trouverez ces fichiers un peu partout, ya qua chercher un peu ;)

J'espère que ça vous plaira et que vous trouvez ma source "originale"!

Enjoy, KOLANTA

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (cs_KOLANTA)