Accueil > > > SYSTEM D'AWAY BASIQUE ...
SYSTEM D'AWAY BASIQUE ...
Information sur la source
Description
Ben c'est ma premiere véritable source, je ne la met pas là pour dire "wesh z'avez vu je code !!!", mais plutot pour avoir des critiques constructives ou meme pour me faire lyncher :p A vos pierre ...
(Ps : pour Voila / Wanadoo)
Source
- Menu channel,menubar,query {
- System d'away:/dia away
- }
-
- dialog away {
- title "System d'away - Looser !"
- size -1 -1 122 101
- option dbu
- edit "", 1, 54 7 59 10, center
- text "Raison d'away :", 2, 5 8 42 9
- text "Particule d'away :", 3, 5 21 45 8
- edit "", 4, 54 20 59 10, center
- box "Annonce :", 5, 5 34 113 47
- radio "/ame <Raison>", 6, 9 44 50 10
- radio "/me <Raison>", 7, 9 55 50 10
- radio "/amsg <Raison>", 8, 64 44 50 10
- radio "/msg <Raison>", 9, 64 55 50 10
- radio "Aucune annonce", 10, 35 68 51 10
- button "Partir", 11, 20 86 37 12,
- button "Revenir", 12, 65 86 37 12, ok
- }
-
- on *:dialog:away:init:0:{
- did -c away 10
- }
-
- on *:dialog:away:edit:1:/set %raison $did(away,1)
- on *:dialog:away:edit:4:/set %particule $did(away,4)
-
- on *:dialog:away:sclick:11:{
- if (%raison == $null) { set %raison Pas de raison }
- if ($did(away,6).state == 1) { ame part en away, raison : %raison ! }
- if ($did(away,7).state == 1) { me part en away, raison : %raison ! }
- if ($did(away,8).state == 1) { amsg je part en away, raison : %raison ! }
- if ($did(away,9).state == 1) { msg je part en away, raison : %raison ! }
- set %awayon on
- nick %particule
- /window -aek @Away
- /aline @Away $timestamp 7Looser ! - 14System d'away - 12Raison : %raison
- }
-
- on *:dialog:away:sclick:12:{
- unset %awayon
- unset %raison
- unset %particule
- nick me
- }
-
- on *:text:*:*:{
- if (%awayon == on) {
- if ($me isin $1-) {
- notice $nick 12Je suis Absent, raison :14 %raison
- /aline @Away $timestamp 4 $+ $nick => $1-
- }
- }
- }
Menu channel,menubar,query {
System d'away:/dia away
}
dialog away {
title "System d'away - Looser !"
size -1 -1 122 101
option dbu
edit "", 1, 54 7 59 10, center
text "Raison d'away :", 2, 5 8 42 9
text "Particule d'away :", 3, 5 21 45 8
edit "", 4, 54 20 59 10, center
box "Annonce :", 5, 5 34 113 47
radio "/ame <Raison>", 6, 9 44 50 10
radio "/me <Raison>", 7, 9 55 50 10
radio "/amsg <Raison>", 8, 64 44 50 10
radio "/msg <Raison>", 9, 64 55 50 10
radio "Aucune annonce", 10, 35 68 51 10
button "Partir", 11, 20 86 37 12,
button "Revenir", 12, 65 86 37 12, ok
}
on *:dialog:away:init:0:{
did -c away 10
}
on *:dialog:away:edit:1:/set %raison $did(away,1)
on *:dialog:away:edit:4:/set %particule $did(away,4)
on *:dialog:away:sclick:11:{
if (%raison == $null) { set %raison Pas de raison }
if ($did(away,6).state == 1) { ame part en away, raison : %raison ! }
if ($did(away,7).state == 1) { me part en away, raison : %raison ! }
if ($did(away,8).state == 1) { amsg je part en away, raison : %raison ! }
if ($did(away,9).state == 1) { msg je part en away, raison : %raison ! }
set %awayon on
nick %particule
/window -aek @Away
/aline @Away $timestamp 7Looser ! - 14System d'away - 12Raison : %raison
}
on *:dialog:away:sclick:12:{
unset %awayon
unset %raison
unset %particule
nick me
}
on *:text:*:*:{
if (%awayon == on) {
if ($me isin $1-) {
notice $nick 12Je suis Absent, raison :14 %raison
/aline @Away $timestamp 4 $+ $nick => $1-
}
}
}
Conclusion
Donnez vous en a coeur joie =)
Sources du même auteur
Sources de la même categorie
Commentaires et avis
|
Derniers Blogs
[MSTD10] SHAREPOINT 2010 ET TEAM FOUNDATION SERVER[MSTD10] SHAREPOINT 2010 ET TEAM FOUNDATION SERVER par phil
Un post rapide pour vous informer de la disponibilité de la vidéo de ma présentation sur SharePoint 2010 & Team Foundation Server. http://www.microsoft.com/france/vision/mstechdays10/Webcast.aspx?EID=20215d48-02e3-4d43-8c36-e53505c3b316 Dans la ...
Cliquez pour lire la suite de l'article par phil [MSTD10] SQL SERVER 2008 POUR LES DéVELOPPEURS ET VISUAL STUDIO TEAM SYSTEM DATABASE EDITION[MSTD10] SQL SERVER 2008 POUR LES DéVELOPPEURS ET VISUAL STUDIO TEAM SYSTEM DATABASE EDITION par Miiitch
Lors de cette session que j'ai animé avec Rui , j'ai eu l'occasion de présenter, en plus des nouveautés de SQL Server 2008, comment utiliser l'édition "database" de Visual Studio 2008. Le principe? Avoir les mêmes outils lors que l'on travaille avec une b...
Cliquez pour lire la suite de l'article par Miiitch [WF4] LOCALISER SIMPLEMENT UNE ACTIVITé ET SON DESIGNER WPF[WF4] LOCALISER SIMPLEMENT UNE ACTIVITé ET SON DESIGNER WPF par JeremyJeanson
La localisation . vous connaissez ce system miraculeux qui permet à votre application de s'afficher dans la langue de l'utilisateur (à condition de l'avoir intégrée dans votre programme). Comment mettre en place la localisation dans WF4? Cette question m'...
Cliquez pour lire la suite de l'article par JeremyJeanson [TECHDAYS 2010] WEBCASTS ET SLIDES[TECHDAYS 2010] WEBCASTS ET SLIDES par Audrey
Les webcasts des sessions des Techdays 2010 sont maintenant disponibles en ligne ! Me concernant, voici les slides et le webcast de la session Blend 3 / Skechtflow : Dessinez c'est gagné ! (animée avec Michel Perfetti ) Les slides et le webcast : Blend 3/...
Cliquez pour lire la suite de l'article par Audrey NDEPEND V3. J'ADORE SON INTéGRATION AVEC VS2010NDEPEND V3. J'ADORE SON INTéGRATION AVEC VS2010 par tja
Après une petite introduction à son utilisation que vous pouvez lire ici j'ai également eu envie d'installer ma copie et de jouer un peu avec. Après les premières minutes de son utilisation. J'ai tout de suite ADORE. L'utilisation intuitive sans besoi...
Cliquez pour lire la suite de l'article par tja
Forum
RE : SOUCIRE : SOUCI par WorldDMT
Cliquez pour lire la suite par WorldDMT
Logiciels
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 Konvertor (4.00)KONVERTOR (4.00)Le logiciel est un gestionnaire multimedia affichant, jouant et convertissant plus de 2000 format... Cliquez pour télécharger Konvertor Xlite (v 3.0 build 41150)XLITE (V 3.0 BUILD 41150)c'est un logiciel qui permet de téléphoner par Internet à l'aide d'un compte SIP pratique pour le... Cliquez pour télécharger Xlite Academy System (10.9.3.0)ACADEMY SYSTEM (10.9.3.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System
|