Présentation/ProjetsEnCours/DemandeAide

My calculator programs · by **Adriweb** » 24 Jan 2013, 23:30

Je ne connais pas du tout les détails, mais en fait, sur 68k, TI a permis le developpement natif, donc c'est déja et d'une plus "facile" de programmer sur ces machines, n'ayant pas déja d'obstacle à franchir en passant par des failles....

→ **MyCalcs** profile · by **Lionel Debroux** » 25 Jan 2013, 09:16

Je n'en suis pas si sûr...

C'est pourtant un fait

A ce que je sache, la SDL n'est pas portée sur 68k

C'est exact, mais ça n'a pas empêché les gens de faire quantité de librairies graphiques et beaucoup plus de jeux C/ASM que sur Nspire.
De plus, il n'y a pas que les jeux, sur TI-68k: il y avait des lecteurs de documents formattés plus de dix ans avant que TI intègre certains trucs à l'OS 3.2 (et le fasse d'une façon tellement incroyablement stupide et lourde que ce n'est pas simplement de l'incompétence, c'est de la malice), il y a des programmes de maths facilement réalisables en C/ASM, etc.

et elles supportent encore moins la libc que le ndless SDK.

Ce n'est pas nécessairement exact, par exemple pour la gestion des floats.

Je ne connais pas du tout les détails, mais en fait, sur 68k, TI a permis le developpement natif, donc c'est déja et d'une plus "facile" de programmer sur ces machines

Clairement. Disposer de la jump table et d'une API largement stable (et en expansion) au fil des versions facilite le développement.

→ **MyCalcs** profile · by **Orgy** » 25 Jan 2013, 09:45

Bon, mon topic est devenu un champ de bataille entre chrétien, témoins de Jéhovah et autre gens

Enfin bref, voici le code du pavé "tactile" de la ti. J'ai tout recopié donc il se peut que certaines choses soient immondes (genre if qui n'a pas de end...)
Aussi : vu que je n'ai jamais bossé l'optimisation avant d'arriver sur les calculatrices, si vous pouviez me dire quels boucles correspondent mieux à quoi ?

Code: Select all: Programme :: RotateTracker __________________________ 0 -> thêta While thêta =/= 0 0->K codeTouche -> K If K=24 then 1 -> C p rgm CamChanger else if K=25 then 2 -> c prgm camchanger else if K=26 then 3-> C prgm camchanger else if K=34 then 4->C prgm camchanger else 0->F for I,0,20,1 codeTouche->D codeTouche->E E+D+F->F end if F=187 then 3->R //B' prgm Cube else if F= 185 then 4->R //B prgm Cube else if F=154 then 5->R // G' prgm Cube else if F=174 then 6->R // G prgm Cube else if F=147 then 1->R // H' prgm Cube else if F=145 then 2->R // H prgm Cube else if F=178 then 7->R //D' prgm Cube else if F=158 then 8->R //D prgm Cube end end end end end end end end end end end end end

Soyez sévère sur la critique, faut que je progresse non de dju !

→ **MyCalcs** profile · by **Persalteas** » 25 Jan 2013, 10:17

AAAARGH ! ben pour être pas optimisé, c'est pas optimisé !

Je peux te le passer au rouleau compresseur ?

Voilà qui sera plus simple:

Code: Select all: 0 -> thêta While thêta =/= 0 codeTouche -> K (K=24)+2(K=25)+3(K=26)+4(K=34→C If C Then prgm Camchanger Else 0->F for I,0,20 codeTouche->D codeTouche->E E+D+F->F end if F=187 3->R //B' if F= 185 4->R //B if F=154 5->R // G' if F=174 6->R // G if F=147 1->R // H' if F=145 2->R // H if F=178 7->R //D' if F=158 8->R //D prgm Cube end end

Soyez sévère sur la critique, faut que je progresse non de dju !

Je vais me faire plaisir

1) Petit topo sur pourquoi ça sert à rien d'empiler les boucles:

Show/Hide spoilerAfficher/Masquer le spoiler

à chaque fois, tu testes la valeur de la variable F, et si la condition est fausse, tu mets un "Else" pour la suite.
C'est pas bien

tu peux très bien mettre les boucles à la suite des autres, ça évite d'avoir dix millions de Else puis End partout, puisque de toutes façons la valeur de F ne varie pas.

Code: Select all: If F=187 Then trucs à faire End If F=185 Then trucs à faire End If F=154 Then trucs à faire End If F=174 Then trucs à faire End

Deuxièmement, le truc cool en TI-Basic:
- Quand il n'y a qu'une seule instruction entre un "Then" et un "End", on peut enlever ce Then et ce End.

D'où la compression en:

Code: Select all: If F=187 un seul truc à faire If F=185 un seul truc à faire If F=154 un seul truc à faire If F=174 un seul truc à faire

2) Explication de pourquoi ton programme ne va jamais démarrer:

Show/Hide spoilerAfficher/Masquer le spoiler

Ton programme a une structure de ce type au début:

Code: Select all: 0→theta While theta=/=0 choses à faire ... choses à faire ... End

Or, la commande While n'éxécute le contenu de la boucle que et tant que la condition est vraie. Donc vu que tu mets un "0→theta" derrière, je sais pas comment ton programme fait pour démarrer

.

Essaye de remplacer "While" par "Repeat", qui éxécutera la boucle jusqu'à ce que la condition soit vraie.

Ensuite j'avoue que j'ai pas très bien compris ce que tu cherches à faire avec le For...
J'ai pas trop osé y toucher, donc (sauf enlever le "1" qu'on à pas besoin de préciser quand c'est 1).

ça me pique les yeux de voir deux "codetouche" de suite mais si ça se trouve c'est voulu...

J'espère que j'ai été suffisamment sévère

Donc le code à l'état brut:

Show/Hide spoilerAfficher/Masquer le spoiler

Code: Select all: :0→thêta :Repeat non(thêta :codeTouche→K :(K=24)+2(K=25)+3(K=26)+4(K=34→C :If C :Then :prgmCAMCHANG :Else :0→F :For(I,0,20 :codeTouche→D :codeTouche→E :E+D+F→F :End :If F=187:3→R :If F=185:4→R :If F=154:5→R :If F=174:6→R :If F=147:1→R :If F=145:2→R :If F=178:7→R :If F=158:8→R :prgmCUBE :End :End

→ **MyCalcs** profile · by **Orgy** » 25 Jan 2013, 10:43

Je savais que j'avais fait des fautes de frappe

Sinon :
while thêta=0 (je ne sais pas comment j'ai fait pour écrire =/=, certainement le manque de sommeil)
Pour les deux codes touches c'est pour éviter les rotations non-voulues

Merci beaucoup, c'est vraiment avec la calculatrice que j'ai découvert les barrières physiques :=) Je fonce optimiser tous mes programmes par la même occaz".
Merci encore

Edit : Tellement bien compressé qu'il mélange le cube à ma place

Faut que je vérifie si j'ai bien tout réécrit correctement :=)

Edit 2 : Je pense qu'il est nécessaire que je formule l'idée générale du tracker :=) Car il n'y a aucun problème dans ma réécriture et aucun problème de compatibilité avec les deux autres programmes (que je vais mettre ensemble ensuite

) C'est donc un simple malentendu :=)

→ **MyCalcs** profile · by **Orgy** » 05 Feb 2013, 14:11

Bonjour !
N'ayant pas la notice sous la main, quelqu'un pourrait me donner un exemple d'utilisation des fonction
"lignes" :
*ligne(
ligne+(
*ligne+(
>ligne(

Et j'aimerais également savoir si il y avait un symbole % sur cette maudite calculatrice car je le trouve pas dans catalog

Merci d'avance !

→ **MyCalcs** profile · by **Persalteas** » 07 Feb 2013, 15:00

ces fonctions servent à appliquer des opérations a certaines "cases" de matrice particulières.
Par exemple, multiplier la deuxième ligne par 2, ou lui ajouter une valeur.

Et non, il n'y a pas de symbole %. c'est fort dommage, je suis bien d'accord.

Tu peux utiliser le token "I%" dans "finance" à la limite, mais ça demande d'effacer le "I" ensuite...