Un editeur de pseudos


Commenter

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

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 (i0Lo)