Away système évolué, simple et clair :)

Soyez le premier à donner votre avis sur cette source.

Vue 3 519 fois - Téléchargée 144 fois

Description

Alors comme indiqué dans le titre, c'est un système d'away... mais attendez un peu avant de gueuler!

J'ai essayé de m'appliquer tant au niveau de la prog qu'au niveau de l'utilité de ce dialog pr finalement en faire un outil rapide et (allons jusque là! :)) agréable à utiliser :
Il permet de spécifier bien entendu un message d'away au choix, mais aussi un message de répondeur pour les PVS, et aussi un suffixe à ajouter à votre pseudo, qui sera enlevé une fois votre absence terminée.

En outre, tant que l'away système est activé, il stocke tous les messages provenant des salons dans lequel votre pseudo a été prononcé, et il suffit pour les voir de cliquer sur le bouton "Messages" affublé du nombre de messages reçus. Sans bugs pour moi, mais si vous en voyez n'hésitez pas à me les faire signaler :)

Je tiens aussi à dire que c'est ma première source "officielle", car c'est la toute première que je poste (j'en ai en réalité codé un paquet d'autres :p), donc soyez indulgents! En revanche, si vous remarquez quoi que ce soit au niveau de l'optimisation du code, soyez gentils de me faire parvenir vos suggestions :)... Bien entendu, une note serait sympathique ^^

Voilà voilà :p

Source / Exemple :


alias console {
  dialog -m console console
}

dialog console {
  size -1 -1 160 500
  title "Away Système"
  icon 1,0 0 160 1500,images\bgdock.png,noborder
  button "Partir",2,5 124 60 25,flat
  button "Revenir",3,75 124 60 25,flat, ok
  button "Messagerie(0)",11,5 154 130 25,flat
  text "Raison de l'absence",5,10 4 110 22 8
  edit %awayraison,6,5 19 130 22 15,autohs
  text "Message du répondeur",7,10 44 110 22 8
  edit %repawaymsg,8,5 59 130 22 15,autohs
  text "Ajouter au pseudo",9,10 84 110 22 8
  edit %awaynick,10,5 99 130 22 15,autohs
}

#rep off
on *:open:?: {
  msg $nick 7,0(>>Répondeur d'absence<<) 14[> $+ 10 $+ %repawaymsg $+ 14,0<]
}
#rep end

#msgserv off
on *:text:*:*: {
  if ($me isin $strip($1-)) {
    write textes\messagerie.txt 10,0 $+ $timestamp 4 $+ $nick 10sur 4 $+ $chan 14[> $+ $1- $+ 14,0<]
    did -r away 11
    did -a away 11 Messages( $+ $lines(textes\messagerie.txt) $+ )
  }
}
#msgserv end

on *:dialog:console:sclick:*: {
  if ($did == 11) { messagerievoir }
  if ($did == 2) {
    set %awayraison $did(away,6)
    set %repawaymsg $did(away,8).text
    set %awaynick $did(away,10).text
    set %actunick $me
    set %awaytime $time
    //nick $me $+ %awaynick
    enable #rep | enable #msgserv
    ame 10,0est 7(>>away<<) 10pour la raison suivante 14[>  $+ 1 $+ %awayraison $+ 14,0 <]10 à 14[> $+ 1 %awaytime $+ 14,0<]
    set %awayminutes 0 | timer1 0 60 /inc %awayminutes 1
    set %awayheures 0 | timer11 0 3600 /inc %awayheures 1
    timer111 0 3600 /set %awayminutes 0
    set %awaysecondes 0 | timer1111 0 1 /inc %awaysecondes 1 | timer11111 0 60 /set %awaysecondes 0
  }
  if ($dname == 3) {
    ame 10,0est revenu; la raison de son absence était : 14[>  $+ 1 $+ %awayraison $+ 14,0 <]10. Il est partit pendant 14[> $+ 1 %awayheures $+ h %awayminutes $+ min %awaysecondes $+ sec $+ 14,0 <]
    disable #rep
    disable #msgserv
    unset %awayraison 
    unset %repawaymsg 
    unset %awaynick
    unset %awaybacktime
    unset %awaytime - awaybacktime
    nick %actunick
    unset %actunick
    unset %awayheures
    unset %awayminutes
    unset %awaysecondes
    write -c textes\messagerie.txt
  }
  if ($did == 11) {
    if ($window(@Messages)) { clear @Messages }
    if (!$window(@Messages)) { window @Messages }
    loadbuf @Messages $shortfn(textes\messagerie.txt)
  }
}

on *:dialog:console:init: {
  dll dlls\MDX.dll SetMircVersion $version
  dll dlls\MDX.dll MarkDialog $dname
  dll dlls\MDX.dll SetColor $dname 2,3,5,7,9,11 textbg $rgb(51,153,102)
  dll dlls\MDX.dll SetColor $dname 2,3,5,7,9,11 background $rgb(192,192,192)
}

Conclusion :


boarf j'ai pas trop de site où exposer mes créations donc voilà quoi :p, et puis j'en ai assez dit dans l'en-tête non? :D

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

MJ92
Messages postés
185
Date d'inscription
lundi 23 janvier 2006
Statut
Membre
Dernière intervention
14 décembre 2014

Hum... évolué... mouais, perso je préfère "me prendre la tête" (car c'est pas le cas) avec le /away et un message que tu tape sur mIRC, qui est également visible lors d'un /whois, que d'utilisé un addon qui fait 80 lignes, et qui, peut être optimiser je pense ... alors que sur mIRC t'as /away message pour l'activer et /away pour le désactiver ...

Bref... Bonne continuation.
Panthouffle
Messages postés
281
Date d'inscription
jeudi 21 juillet 2005
Statut
Membre
Dernière intervention
14 avril 2008

Y'a des choses qui cloche dans le titre de ton code "AWAY SYSTÈME ÉVOLUÉ, SIMPLE ET CLAIR :)"
évolué et simple à la fois, et on dit "système d'absence" (limite "système d'away"), sinon j'préfère changer mon nick moi même plutôt que d'utiliser un addon qui m'allongerais la tâche..
cs_Huitre
Messages postés
290
Date d'inscription
mardi 21 janvier 2003
Statut
Membre
Dernière intervention
29 février 2008

lol.

1/10.

Voir les commentaires des 15 derniers away system (qui sont aussi mals codés).
cs_KiNdErMaXi
Messages postés
1052
Date d'inscription
samedi 10 juillet 2004
Statut
Membre
Dernière intervention
30 novembre 2009
2
Je rajouterai qu'il faut utiliser les identifieurs mIRC au lieu de set des var inutiles

$away $awaymsg $awaytime

Dans ton cas, tu gagne 4 variables il me semble
cs_PaDa
Messages postés
1804
Date d'inscription
mardi 15 juillet 2003
Statut
Membre
Dernière intervention
22 septembre 2009
3
Le titre m'a intrigué, mais finalement c'est rigolo. J'te mets 1/10 étant donné que comme d'hab, cette source ne tient aucun compte des deux remarques systématiques ici : PAS DE VARS GLOBALES, et REGROUPEZ VOS ON DIALOG.
Je suppose qu'ArKanis a tout dit sinon, j'ai pas lu.
Courage camarades =]

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.