System d'away basique ...

Commenter

Contenu du snippet

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 =)

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_Asthar)