Catégorie :
SupportForum :
TI-82 STATS.frVues : 693
Réponses : 7
Type : discussion
Etat : réponses autorisées
Avertissement :Il s'agit d'une page optimisée pour la navigation mobile. Voir la
page originale.
Programmation graphique
Sangohan38 le 14/02/2009 à 13:00
On peut simplifier ce code:
Code
:EffDessin
:0=>C
:0=>A:0=>B
:Lbl A:0=>C:Texte(A,B,"°"
:codeTouche=>C
:If C=24 ou C=26:B+(C-25)5=>B
:If C=25:A-5=>A
:If C=34:A+5=>A
:Goto A
Sangohan38
coc5 le 14/02/2009 à 17:39
Je te conseils plutôt ce code qui efface également les traces...
Code
EffDessin
While C=/=23
Repeat C
CodeTouche(->C
End
Text(A,B+1,"[4 espace]
max(0,min(90,B+5(K=26) - 5(K=24-> B
max(A,min(57,+5(K=34) - 5(K=25-> A
Text(A,B,"°
End
KillerMapper le 16/02/2009 à 12:21
Le code n'efface pas les traces chez moi...coc5 le 19/02/2009 à 21:09
Normale il faut mettre un espace apres le guillementKillerMapper le 19/02/2009 à 23:41
En fait il en faut plus, moi en mettant 4 espaces ça marche, mais j'ai modifié la valeur des déplacements à 4.
Donc ça serait plutôt 5 espaces pour le code d'exemple je pense.coc5 le 22/02/2009 à 02:03
Euh Oui j'ai marqué n'importe quoi là désolé, c'est corrigé.
C'est ça :
Code
EffDessin
While C=/=23
Repeat C
CodeTouche(->C
End
Text(A,B+1,"[4 espace]
max(0,min(89,B+5(K=26) - 5(K=24-> B
max(A,min(57,+5(K=34) - 5(K=25-> A
Text(A,B,"°
End
Avertissement :Il s'agit d'une page optimisée pour la navigation mobile. Voir la
page originale.