- Code: Tout sélectionner
Define tiloginv2()=
Prgm
:Lbl start
:Text "Welcome to the TI Login V2"
:Goto id
:
:Lbl id
:Request "Username : .... (List : '1')",a
:
:If a="info" Then
:Goto uinfo
:EndIf
:
:Lbl uinfo
:Text "User list : Rafal(2) ; Guest (3)"
:Goto id
:EndPrgm
Le code n'est pas complet, mais il plante déjà après le premier label au niveau de la commande 'Request'.
Merci de vos réponses, Matthieu.