Un editeur de pseudos

Soyez le premier à donner votre avis sur cette source.

Snippet vu 3 487 fois - Téléchargée 25 fois


Contenu du snippet

Comment se fixer une liste de 10 pseudos tout en nous permettant les modifier simplement ?

Source / Exemple :


;###########################
;     Addnick Config
;###########################

dialog addnick {
  title >> Nicknames Config. <<
  Size -1 -1 241 241
  box "" ,36,1 1 239 215
  text Nickname [1] ,3, 20 30 70 20 
  edit %nick1 ,4, 100 25 115 20,autohs 
  text Nickname [2] ,6, 20 50 70 20 
  edit %nick2 ,7, 100 45 115 20,autohs 
  text Nickname [3] ,9, 20 70 70 20 
  edit %nick3 ,10, 100 65 115 20,autohs 
  text Nickname [4] ,12, 20 90 70 20 
  edit %nick4 ,13, 100 85 115 20,autohs 
  text Nickname [5] ,15,20 110 70 20 
  edit %nick5 ,16, 100 105 115 20,autohs 
  text Nickname [6], 18, 20 130 70 20
  edit %nick6 ,19, 100 125 115 20,autohs 
  text Nickname [7],22,20 150 150 20
  edit %nick7 ,23,100 145 115 20,autohs 
  text Nickname [8], 25,20 170 150 20
  edit %nick8 ,26,100 165 115 20,autohs 
  text Nickname [9],28,20 190 150 20
  edit %nick9 ,29,100 185 115 20,autohs
  button "Register" ,50, 162 220 78 20,ok
  button "Cancel" ,51, 2 220 80 20,cancel
  button "Reset" ,52, 83 220 78 20
}

on 1:dialog:addnick:sclick:*: {
  If ($did == 52) {
    /unset %nick1 %nick2 %nick3 %nick4 %nick5 %nick6 %nick7 %nick8 %nick9
    /did -ra addnick 4
    /did -ra addnick 7
    /did -ra addnick 10
    /did -ra addnick 13
    /did -ra addnick 16
    /did -ra addnick 19
    /did -ra addnick 23
    /did -ra addnick 26
    /did -ra addnick 29
  }
  If ($did == 50) {
    /set %nick1 $did($dname,4)
  }
  If ($did == 50) {
    /set %nick2 $did($dname,7)
  }
  If ($did == 50) {
    /set %nick3 $did($dname,10)
  }
  If ($did == 50) {
    /set %nick4 $did($dname,13)
  }
  if ($did == 50) {
    /set %nick5 $did($dname,16)
  }
  if  ($did == 50) {
    /set %nick6 $did($dname,19)
  }
  if ($did == 50) {
    /set %nick7 $did($dname,23)
  }
  if ($did == 50) {
    /set %nick8 $did($dname,26)
  }
  If ($did == 50) {
    /set %nick9 $did($dname,29)
  }
}
menu menubar {
 Nicks List
 .Config:/dialog -m addnick addnick
 .-
 . %nick1 :/nick %nick1
 . %nick2 :/nick %nick2
 . %nick3 :/nick %nick3
 . %nick4 :/nick %nick4
 . %nick5 :/nick %nick5
 . %nick6 :/nick %nick6
 . %nick7 :/nick %nick7
 . %nick8 :/nick %nick8
 . %nick9 :/nick %nick9
}

A voir également

Ajouter un commentaire Commentaire
Messages postés
427
Date d'inscription
dimanche 6 juillet 2008
Statut
Membre
Dernière intervention
4 mai 2009

je vois pas l'interet d'ajouter les pseudo, et alors ? une fois que tu les a ajouter sa fais quoi ?
t'en fais quoi après ? je vois trop pas l'interet sauf si yavais un profil sur chaques pseudos, mais si non je vois pas l'intêret, alors je met 1/10 dsl

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.