Astuces

[Yak]

eeeehh c'est moi qui a crée ce topic et je floode pas sur les topics 68k ou z80 mais que sur les défouloir
sauf si c'est vous qui commencez à flooder, je réponds

bon allez arrêtez de poster là dessus, au pire faites un autre topic pour flooder !!

Utilise dans ce cas pour te justifier la phrase de Voltaire (oui je suis le prof de francé du phorum ironie ... )
SI tu ne la connais pas va voir dans le topic debat boite mails j'ai des doutes a propos de ta culture

[tama]

nouvelle astuce :
pour faire comme les programmes ASM et supprimer l'indicateur de calcul (en basic pur !) : taper le code suivant

Code: Select all

Text(-1,0,90," " (il y a un espace)


la zone réservée à l'indicateur de calcul sera "overwrite" et il n'apparaitra pas.
(à mettre dans une boucle)

ne marche pas avec les TI83

[tama]

une autre astuce :
pour enlever le "Done" à la fin du programme, mettre le code suivant :

Code: Select all

:ClrHome
:Output(1,1,"") (pas d'espaces)


[tama]

Encore une :

Si une liste est trop longue pour tenir à l'écran, utiliser :

Code: Select all

Pause L1


il est ensuite possible de regarder l'intégrale de la liste avec [] et []

[tama]

(désolé pour le multi-post Mic mais c'est pour éviter que les lecteurs passent à travers )

Il est possible d'enlever les If lorsqu'il s'agit de conditions utilisant "=","=/ " (différent de), ""...

Exemple :

Code: Select all

If A12
A+1-A


peut être remplacé par :

Code: Select all

A+(A12)-A


Explication :
Le TI-OS retourne 2 valeurs (0 et 1) pour une condition au lieu de True ou False pour les 68k :
0 si c'est faux
1 si c'est vrai

A+(A12) :
si A est inférieur à 12 : A12 est vrai donc cette ligne est interprétée comme A+1-A
si A est supérieur ou égal à 12 : A12 est faux donc cette ligne est interprétée comme A+0-A ou A-A (pas de changement)

[tama]

une autre :
pour faire un menu rapide avec plusieurs niveaux de difficulté :
(N pour le niveau)

Code: Select all

0-N
Menu("Niveau","Facile",3,"Moyen",2"Difficile",1)
Lbl 1
N+1-N
Lbl 2
N+1-N
Lbl 3
...


Explication :
Si l'utilisateur choisit "Facile" :
Directement Lbl 3, pas de modification

Si l'utilisateur choisit "Moyen" :
Lbl 2 puis Lbl 3 : N est augmenté de 1

Si l'utilisateur choisit "Difficile" :
Lbl 1 puis Lbl 2 puis Lbl 3 : N+1-N, N+1-N == N est augmenté de 2

Ce code permet d'augmenter la rapidité d'éxécution par rapport à :

Code: Select all

0-N
Menu("Niveau","Facile",3,"Moyen",2"Difficile",1)
Lbl 1
1-N
Goto 3
Lbl 2
2-N
Lbl 3
...


[Yak]

merci ...
juste un truc pour les radins de la mémoire :

Code: Select all

output(1,1,"

c'est plus rappide

[tama]

grâce à ça et à d'autres petits trucs, j'ai repris un programme de l'année dernière (un pendu) et de 3 852 octets, je suis passé à 3 063 (25%)

[M@D_Doc]

pas mal du tout!

[tama]

une autre astuce, c'est pas moi qui l'a trouvé mais bon je la poste pour aider :
pour ceux qui veulent faire une table des meilleurs scores :
on suppose que vous avez déjà le nom des meilleurs joueurs du top 5 (c'est un exemple)

vous voulez :
1.pouce
2.index
3.majeur
4.auriculaire
5.petit doigt

1]Repérer le nom le plus long (ici auriculaire) et compter son nombre de lettres (11)

2]Faire un string (exemple Str9) constitué d'un nouveau nom toutes les 12 lettres (11+1)
"pouce index majeur auriculairepetit doigt-Str9

3]Faire des nombres composés d'une partie entière : le score et d'une partie décimale, la place dans le string (pouce=1;index=2;majeur=3...)

4]Stocker le tout dans une liste et ordonner (ordre croissant ou décroissant)
Utiliser "SortA(" et "SortD("

5]Extraire la partie décimale et la partie entière à l'aide des fonctions "fpart(" et "int(" et afficher à l'endroit correspondant ("int(") la bonne partie du string grâce aux "sub("

ex : pour extraire "majeur"
sub(Str6,12(int(L1(...))-12,12
où ...=la place dans le classement)

je sais pas si c'était très clair...