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 / Exemple :
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 =)
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.