CodeS-SourceS est hébergé par Frontier.fr

Ce site au démarrage

begin process at 2012 02 08 20:20:33

Accueil Codes Tutoriels Forum Livres Emploi Services Connexion

Trouver un code source :

dans

[ Dernières recherches ]

Accueil >

AddOns

> UN PING REPLY AVEC BARRE COLORE EN FONCTION DU PING

UN PING REPLY AVEC BARRE COLORE EN FONCTION DU PING

Information sur la source

Note :
Aucune note

Catégorie :AddOns Niveau :Débutant Date de création :05/06/2002 Date de mise à jour :05/06/2002 01:58:58 Vu :6 557

Auteur : IsHnOuG

Ecrire un message privé

Commentaire sur cette source (2)

Ajouter un commentaire et/ou une note

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

COMPTEUR D'AFFLUENCE SUR VOTRE CANAL AVEC RECORD.

CHOISIR SA MUSIQUE DE DEMARAGE ( DIALOG )

AGENT SOUS MIRC PARLANT

AUTO RE-OP SUR UN DEOP

UN COMPTEUR D'ENTREE SUR VOTE CANAL

Toutes les sources de IsHnOuG

Sources de la même categorie

PACMAN MULTI-JOUEUR EN LIGNE par wims

PROXY&SOCKS SCANNER+LEECHER par independentt

GESTIONNAIRE DE HIGHLIGHT AVANCÉ AVEC IGNORE SALON OU PSEUDO par doob666

AUTOJOIN HTABLE MULTISERVER par doob666

TCL - AJOUT SUPPRESSION DE LOGS par Atok

Toutes les sources de la catégorie AddOns

Commentaires et avis

Commentaire de stevnet le 20/11/2002 21:27:11

c marrant et utile

Commentaire de Exagone le 20/08/2007 09:04:31

Alors les / apres les { c'est inutille !! ^^
sinon bien

Ajouter un commentaire

Nos sponsors

Derniers Blogs

TECHDAYS PARIS 2012 : NOUVELLES TENDANCES DU POSTE DE TRAVAIL - BRING YOUR OWN PC par ROMELARD Fabrice

TECHDAYS PARIS 2012 : SYSTEM CENTER SERVICE MANAGER 2012 VUE D'ENSEMBLE par ROMELARD Fabrice

TECHDAYS PARIS 2012 : PLEINIèRE SECOND JOUR par ROMELARD Fabrice

TECHDAYS PARIS 2012 : RETOUR D'EXPéRIENCE SUR LA MISE EN PLACE D'UN CLOUD PRIVé par ROMELARD Fabrice

TECHDAYS PARIS 2012 : COMMENT SHAREPOINT A SAUVé MES TECHDAYS par ROMELARD Fabrice

Forum

RE : AIDE par Nico26000

RE : AIDE par WorldDMT

RE : AFFICHAGE DES JOIN/PART/QUIT DANS UNE FENêTRE à PART @JPQ ? par WorldDMT

AIDE par Nico26000

RE : ECRIRE D'UNE CERTAINE COULEUR EN FONCTION DU SALON par WorldDMT

Côté IT

Offres d'emploi

Formations Video

Appels d'offres

Fonctionnalites supplementaires sous Joomla
Budget : 800€
Animation interactive pour I phone
Budget : 2 000€
Site web pour projet Haiti
Budget : 10 000€

Logiciels

Academy System (17.2.1.0)
ACADEMY SYSTEM (17.2.1.0)

Logiciel de gestion des établissements. - élèves/étudiants (inscription, dossier, absence...) -...

Cliquez pour télécharger Academy System
Easy-Planning (1.0.0.1)
EASY-PLANNING (1.0.0.1)

Basé sur les mêmes principes que MyPlanning, Easy-Planning permet de créer des plannings sous la ...

Cliquez pour télécharger Easy-Planning
COLLECTOR PLUS (3.00B)
COLLECTOR PLUS (3.00B)

COLLECTOR PLUS version 3.00B est un logiciel utilisant une base de données alimentée par : - L...

Cliquez pour télécharger COLLECTOR PLUS
PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V7.4)
PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V7.4)

PONAMEDIA TV DEVIENS HELLLOOO FLASH LA TV SUR VOTRE ORDINATEUR. Toute une plateforme Multi...

Cliquez pour télécharger PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO
LettresFaciles 2011 (8.0.0.1)
LETTRESFACILES 2011 (8.0.0.1)

LettresFaciles est un logiciel facilitant la création et la rédaction de lettres types. Son inte...

Cliquez pour télécharger LettresFaciles 2011