Accueil > > > UN PING REPLY AVEC BARRE COLORE EN FONCTION DU PING
 UN PING REPLY AVEC BARRE COLORE EN FONCTION DU PING
 Information sur la source
 Description
voila ceci est un script qui n'est pas de moi, je ne me rappel plus de qui il est mais je le remerci.
ce script permet d'envoyer un reply a une personne qui demande a etre pinger avec a cote une barre de couleur en fonction du ping qu'il a.
plus le ping est bas plus la barre est verte, plus le ping est haut plus elle est rouge ( avec degrade )
 Source
- on *:text:!pingme:#: {
- .ctcp $nick ping
- set %pingchan $chan
- set %pingnick $nick
- }
-
- on *:text:!ping*:#: {
- if ($2 == $null) || ($2 = me) {
- .ctcp $nick ping
- set %pingchan $chan
- set %pingnick $nick
- }
- if ($2 != $null) {
- ctcp $2 ping
- set %pingchan $chan
- set %pingnick $2
- }
- }
- on *:ctcpreply:*ping*: {
- set %pingy $calc($ctime - $2)
- if (%pingy == 0) { /notice %pingnick Ping Reply 0,1 %pingnick 9,1 000 Seconds 15 }
- if (%pingy == 1) { /notice %pingnick Ping Reply 0,1 %pingnick 9,115,1 001 Second 15 }
- if (%pingy == 2) { /notice %pingnick Ping Reply 0,1 %pingnick 9,115,1 002 Seconds 15 }
- if (%pingy == 3) { /notice %pingnick Ping Reply 0,1 %pingnick 9,115,1 003 Seconds 15 }
- if (%pingy == 4) { /notice %pingnick Ping Reply 0,1 %pingnick 9,1815,1 004 Seconds 15 }
- if (%pingy == 5) { /notice %pingnick Ping Reply 0,1 %pingnick 9,1815,1 005 Seconds 15 }
- if (%pingy == 6) { /notice %pingnick Ping Reply 0,1 %pingnick 9,1815,1 006 Seconds 15 }
- if (%pingy == 7) { /notice %pingnick Ping Reply 0,1 %pingnick 9,1815,1 007 Seconds 15 }
- if (%pingy == 8) { /notice %pingnick Ping Reply 0,1 %pingnick 9,18715,1 008 Seconds 15 }
- if (%pingy == 9) { /notice %pingnick Ping Reply 0,1 %pingnick 9,18715,1 009 Seconds 15 }
- if (%pingy == 10) { /notice %pingnick Ping Reply 0,1 %pingnick 9,18715,1 0010 Seconds 15 }
- if (%pingy == 11) { /notice %pingnick Ping Reply 0,1 %pingnick 9,18715,1 0011 Seconds 15 }
- if (%pingy == 12) { /notice %pingnick Ping Reply 0,1 %pingnick 9,187415,1 0012 Seconds 15 }
- if (%pingy == 13) { /notice %pingnick Ping Reply 0,1 %pingnick 9,187415,1 0013 Seconds 15 }
- if (%pingy == 14) { /notice %pingnick Ping Reply 0,1 %pingnick 9,187415,1 0014 Seconds 15 }
- if (%pingy == 15) { /notice %pingnick Ping Reply 0,1 %pingnick 9,187415,1 0015 Seconds 15 }
- if (%pingy > 15) { /notice %pingnick Ping Reply 0,1 %pingnick 4,1 00Over 15 Seconds 15 }
-
- }
on *:text:!pingme:#: {
.ctcp $nick ping
set %pingchan $chan
set %pingnick $nick
}
on *:text:!ping*:#: {
if ($2 == $null) || ($2 = me) {
.ctcp $nick ping
set %pingchan $chan
set %pingnick $nick
}
if ($2 != $null) {
ctcp $2 ping
set %pingchan $chan
set %pingnick $2
}
}
on *:ctcpreply:*ping*: {
set %pingy $calc($ctime - $2)
if (%pingy == 0) { /notice %pingnick Ping Reply 0,1 %pingnick 9,1 000 Seconds 15 }
if (%pingy == 1) { /notice %pingnick Ping Reply 0,1 %pingnick 9,115,1 001 Second 15 }
if (%pingy == 2) { /notice %pingnick Ping Reply 0,1 %pingnick 9,115,1 002 Seconds 15 }
if (%pingy == 3) { /notice %pingnick Ping Reply 0,1 %pingnick 9,115,1 003 Seconds 15 }
if (%pingy == 4) { /notice %pingnick Ping Reply 0,1 %pingnick 9,1815,1 004 Seconds 15 }
if (%pingy == 5) { /notice %pingnick Ping Reply 0,1 %pingnick 9,1815,1 005 Seconds 15 }
if (%pingy == 6) { /notice %pingnick Ping Reply 0,1 %pingnick 9,1815,1 006 Seconds 15 }
if (%pingy == 7) { /notice %pingnick Ping Reply 0,1 %pingnick 9,1815,1 007 Seconds 15 }
if (%pingy == 8) { /notice %pingnick Ping Reply 0,1 %pingnick 9,18715,1 008 Seconds 15 }
if (%pingy == 9) { /notice %pingnick Ping Reply 0,1 %pingnick 9,18715,1 009 Seconds 15 }
if (%pingy == 10) { /notice %pingnick Ping Reply 0,1 %pingnick 9,18715,1 0010 Seconds 15 }
if (%pingy == 11) { /notice %pingnick Ping Reply 0,1 %pingnick 9,18715,1 0011 Seconds 15 }
if (%pingy == 12) { /notice %pingnick Ping Reply 0,1 %pingnick 9,187415,1 0012 Seconds 15 }
if (%pingy == 13) { /notice %pingnick Ping Reply 0,1 %pingnick 9,187415,1 0013 Seconds 15 }
if (%pingy == 14) { /notice %pingnick Ping Reply 0,1 %pingnick 9,187415,1 0014 Seconds 15 }
if (%pingy == 15) { /notice %pingnick Ping Reply 0,1 %pingnick 9,187415,1 0015 Seconds 15 }
if (%pingy > 15) { /notice %pingnick Ping Reply 0,1 %pingnick 4,1 00Over 15 Seconds 15 }
}
 Conclusion
%pingchan = au nom du canal ou la personne a taper !ping
%pingnick = le nom de la personne qui a demande a etre pinger
juste que la tout va bien :p
set %pingy $calc($ctime - $2) ceci calcul le ping de la personne qui a demande le ping
et le if (%pingy == 0) { /notice %pingnick Ping Reply 0,1 %pingnick 9,1 000 Seconds 15 }
test la variable %pingypour savoir si elle est == a 0 ( autrement dit si le ping est de 0 ) il envois le message /notice %pingnick Ping Reply 0,1 %pingnick a la personne et les sont la barre et les couleur a y mettre selon le ping de la personne ...
ainsi de suite
 Sources du même auteur
 Sources de la même categorie
 Commentaires et avis
|
Derniers Blogs
 [WF4] PASSAGE D'ARGUMENTS LITERAL, VISUALBASICVALUE OU LAMBDAVALUE?[WF4] PASSAGE D'ARGUMENTS LITERAL, VISUALBASICVALUE OU LAMBDAVALUE? par JeremyJeanson
Avec la sortie de la RC de Visual Studio 2010, Microsoft a mis un peu les points sur le i en ce qui concernait le passage d'arguments. Mais nous somme un certain nombre à avoir pris ce changement comme un méchant coup dur. Pour résumer la situation : à la...
Cliquez pour lire la suite de l'article par JeremyJeanson [RIA SERVICES] INCLUDE ET DOMAINDATASOURCE[RIA SERVICES] INCLUDE ET DOMAINDATASOURCE par Audrey
Dans un de mes articles précédents , j'avais parlé des DomainDataSource avec RIA Services dans le cas d'une interface Maître - Détail. Dans le même principe, je vais parler d'une autre manière de mettre en forme ce cas d'interface avec RIA Services. Et po...
Cliquez pour lire la suite de l'article par Audrey ZUNE : VERSION ZUNE SOFTWARE V 4.2 ET LA SOCIALISATIONZUNE : VERSION ZUNE SOFTWARE V 4.2 ET LA SOCIALISATION par ROMELARD Fabrice
Une des nouveautés de la version V 3.0 était l'apparition de l'onglet Social qui ne fonctionnait que si le MarketPlace était activé sur son poste. Cela limitait donc son intérêt, car hors du cadre commercial USA-CANADA, peu de monde trouva...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice PRATIQUE DE SILVERLIGHT PAR ERIC AMBROSIPRATIQUE DE SILVERLIGHT PAR ERIC AMBROSI par MPOWARE
Je viens de finir la lecture du dernier livre d'
Eric Ambrosi
éditions PEARSON
Son livre donne une approche pratique de Silverlight qui sera aussi bien comprise par le développeur que par le designeur.
Tous les aspects du développement RIA sont abor...
Cliquez pour lire la suite de l'article par MPOWARE APPRENDRE à DéVELOPPER POUR LES MOBILES AVEC LA NOUVELLE GéNéRATION .NETAPPRENDRE à DéVELOPPER POUR LES MOBILES AVEC LA NOUVELLE GéNéRATION .NET par odewit
2 déclinaisons de Silverlight et 2 déclinaisons de Mono permettent dorénavant (ou permettront prochainement) de développer des applications .NET mobiles pour les principales plates-formes du marché :
Silverlight pour Symbian, basé sur Silverlight 2...
Cliquez pour lire la suite de l'article par odewit
Logiciels
 Academy System (10.9.4.0)ACADEMY SYSTEM (10.9.4.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System Xilisoft Convertisseur Vidéo Ultimate (5.1.39.0305)XILISOFT CONVERTISSEUR VIDéO ULTIMATE (5.1.39.0305)Xilisoft Convertisseur Vidéo Ultimate est un outil puissant de conversion vidéo, facile à utilise... Cliquez pour télécharger Xilisoft Convertisseur Vidéo Ultimate Xilisoft DVD Ripper Ultimate (5.0.64.0304)XILISOFT DVD RIPPER ULTIMATE (5.0.64.0304)Xilisoft DVD Ripper Ultimate est un logiciel excellent pour copier et convertir DVD vers presque ... Cliquez pour télécharger Xilisoft DVD Ripper Ultimate Rigs of Rods (63.3)RIGS OF RODS (63.3)c'est un jeu de multi-simulation camions,autobus voitures, avions, bateaux, hélicoptère avec défo... Cliquez pour télécharger Rigs of Rods
|