Bonjour,
Peut-on simplifier ce code :
La chaine de caracères entre 254,128 et ,254,192 changeant, n'est-il pas possible de stocker cette chaine quelque part lors de l'appuie sur les boutons , puis de l'appeler à la demande en fonction de la variable 'lemenu' genre :
sauf que stocker la chaine dans b10 ne marche pas.
Merci pour vos réponses.
Peut-on simplifier ce code :
Code:
select case lemenu
case 1
serout C.0, N4800, (254,128,"V : Menu princ. ",254,192,"+/-: Suivant ")
case 2
serout C.0, N4800, (254,128,"V : Menu temp.",254,192,"+/-: Suivant ")
case 3
serout C.0, N4800, (254,128,"V : Menu hygro. ",254,192,"+/-: Suivant ")
case 4
serout C.0, N4800, (254,128,"V : Impression ",254,192,"+/-: Suivant ")
case 10
serout C.0, N4800, (254,128,"V : Menu Options " 254,192,"cellule.: ", #cellul, " ")
case 11
gosub menu11
case 21
serout C.0, N4800, (254,128,"Temps analyse: ",254,192, " ",#purge, " secondes ")
case 79
serout C.0, N4800, (254,128,"--menu systeme--",254,192, " Code: ",#code, " ")
end select
Code:
'si appui sur bouton par exemple :
if pinB.1 = 0 and pinB.2 = 0 then
b10 = "Menu option :"
gosub envoilcd
endif
envoilcd:
serout C.0, N4800, (254,128,b10,254,192,"cellule.: ", #cellul, " ")
return
Merci pour vos réponses.