Generateur de profil d'user irc

Soyez le premier à donner votre avis sur cette source.

Snippet vu 3 604 fois - Téléchargée 26 fois

Contenu du snippet

C'est un code qui permet d'éditer le profil des users IRC.

Source / Exemple :


Menu * {
  Gestion Profil:/fil
  Nouveau Profil:/fil
  Voir Profil $$1 :/query $$1
}
alias fil { dialog -m profil profil }
dialog profil {
  title "Générateur de Profils"
  option dbu
  size -1 -1 194 117
  text "Nom :", 1, 11 10 25 8, center
  edit "", 2, 40 9 53 10, autohs
  button "Ajouter", 3, 10 22 34 10
  button "Effacer", 4, 59 22 34 10
  list 5, 10 36 83 73, size
  box "Profils :", 6, 4 1 94 112
  text "Pseudo :", 7, 103 12 25 8, center
  edit "", 8, 131 11 54 10, autohs
  text "Age :", 9, 103  25 25 10, center
  edit "", 10, 131 24 54 10, autohs
  edit "", 11, 131 38 54 10, autohs
  text "Sexe :", 12, 103 39 25 8, center
  edit "", 13, 131 51 54 10, autohs
  text "Ville :", 14, 103 52 25 8, center
  edit "", 15, 102 75 88 26, multi
  text "Description :", 16, 125 65 40 8, center
  button "Fermer", 17, 128 103 37 11, ok
}
ON *:DIALOG:profil:*:*:{
  if ($devent == init) { loadprofil }
  if ($devent == sclick) {
    if ($did == 3) { writeini profil.ini $did(2) infosprofil $did(2) $did(8) $did(10) $did(11) $did(13) $did(15) | did -a $dname 5 $did(2)  }
    if ($did == 4) && ($did(5).seltext) { .remini profil.ini $did(5).seltext | loadprofil | did -r $dname 8,10,11,13,15 }
    if ($did == 5) && ($did(5).seltext) { did -ra $dname 8 $gettok($readini(profil.ini,$did(5).seltext,infosprofil),2,32) | did -ra $dname 10 $gettok($readini(profil.ini,$did(5).seltext,infosprofil),3,32) | did -ra $dname 11 $gettok($readini(profil.ini,$did(5).seltext,infosprofil),4,32) | did -ra $dname 13 $gettok($readini(profil.ini,$did(5).seltext,infosprofil),5,32) | did -ra $dname 15 $gettok($readini(profil.ini,$did(5).seltext,infosprofil),6-,32) }
  }
}
dialog profilpv {
  title "Profil Pv/QUERY"
  option dbu
  size -1 -1 170 22
  text "-=- Profil -=-", 1, 80 2 50 10
  edit "", 2, 2 10 167 10, read
}
ON *:Active:?:{ dialog -m profilpv profilpv | did -ra profilpv 2 $readini(profil.ini,$active,infosprofil) | if (!$readini(profil.ini,$nick,infosprofil)) { did -a profilpv 2 $active n'a pas de profil | halt } }
alias -l loadprofil { did -r profil 5 | var %a = 0, %aa = $ini(profil.ini,0) | while (%aa > %a) { inc %a | did -a profil 5 $ini(profil.ini,%a) } }

Conclusion :


Merci a SornDrixer qui m'a aider :) et ReMi34 pour le dialog :)
Have fun & no ripp...

Enjoy ^^

A voir également

Ajouter un commentaire

Commentaires

tempusus
Messages postés
363
Date d'inscription
dimanche 8 février 2004
Statut
Modérateur
Dernière intervention
9 octobre 2017
1 -
Bonjour,

Systeme interressant. Rien a ajouter de plus que les autres.
Si juste une chose: crois tu possible de sortir le fichier dans un fomat excel par exemple? ou carnet d'adresse windows? Cela serai plutot pas mal à mon avis (cela dit, je ne sais pas si c'est techniquement possible)

7/10

Cordialement

Tempusus
ChAnG-Fu
Messages postés
165
Date d'inscription
dimanche 2 novembre 2003
Statut
Membre
Dernière intervention
1 juillet 2006
-
7/10
Bon travaille, pousse ton systeme encore +
itello
Messages postés
161
Date d'inscription
mardi 13 mai 2003
Statut
Membre
Dernière intervention
13 novembre 2004
-
Bonsoir

__Vesparo________________________
|Voilà un de tes meilleurs addons, bravo!
|Mais certains bugs sont problématiques:
|1-On ne peut pas mettre plusieurs mots d'info (sauf pour description).
|2-On peut ouvrir qu'un seul dialog, alors un >>if $dialog<< ne serais pas de repit
|
|Je donne 7/10 comme Dark-Dragoon.
__Vesparo_________________________
cs_SornDrixer
Messages postés
2087
Date d'inscription
jeudi 12 décembre 2002
Statut
Modérateur
Dernière intervention
30 janvier 2011
2 -
Si on a plusieurs pv en même temps, l'addon bug comme je te l'ai déjà dis, et le dialog ne peut s'ouvrir plusieurs fois.
Donc tu aurais dû essayer d'adopter un autre systeme ;)
Dark-Dragoon
Messages postés
228
Date d'inscription
mercredi 24 septembre 2003
Statut
Membre
Dernière intervention
26 octobre 2004
-
bon pas mal mais pas trop utile ( pour moi )
7/10

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.