2063 résultats trouvés

par cgh
28 oct. 2011 10:01
Forum : Tous les Pockets
Sujet : Donner vie à la TI-88
Réponses : 78
Vues : 20682

Re: Donner vie à la TI-88

Si un module standard est fourni avec la calculatrice, et est lisible, un listing des différents programmes (peut être juste un ou deux, pour commencer) "communs" avec ceux de la master library des 58/59 pourrait aider à se faire une idée :idea:
- Nommage des variables, des labels, présentation du code, identation, functions.
De même qu'un exemple d'exécution pour voir si une 58/59 peut suffire de comparaison dans les cas "courants".
par cgh
27 oct. 2011 13:45
Forum : Tous les Pockets
Sujet : Misez p'tit, Optimisez - N°10 (hommage à J. McCarthy)
Réponses : 67
Vues : 29857

Re: Misez p'tit, Optimisez - N°10 (hommage à J. McCarthy)

C.Ret a écrit :Par contre, il y a des points bien pratiques en FORTH, comme cette instruction 'recurse', qui, si j'interprète bien permet de rappeler la function en cours de définition sans avoir à la nommer.
En RPL, on peut utiliser le même code à condition de nommer nominativemetn la fonction par m91, et ne plus changer son nom par la suite. C'est currieux, car le nom de la commande ne sera jamais donné dans lors de la définition en RPL, uniquement lors de la mémorisation:

Code : Tout sélectionner

 « IF DUP 102 < THEN 11 + m91 m91 ELSE 10 - END » 'm91' STO
En fait, tu peux utiliser des variables locales. J'ai fourni le code de cela en page 1. L'avantage est que le nom de la fonction globale peut être changé, sans impacter le code. Mais cela se paie: c'est plus gros !

EDIT : Nan, j'ai dit une bêtise :oops:. Mon code est faux. J'avais nommé la fonction globale 'm91' sous x48. Si le nom, change mon programme plante :(
Va falloir que je relise la documentation de la HP48 !!!!
par cgh
27 oct. 2011 13:20
Forum : Tous les Pockets
Sujet : Donner vie à la TI-88
Réponses : 78
Vues : 20682

Re: Donner vie à la TI-88

Il n'y a pas grand chose sur Datamath Calculator Museum: Ti-78
par cgh
27 oct. 2011 12:55
Forum : Tous les Pockets
Sujet : Donner vie à la TI-88
Réponses : 78
Vues : 20682

Re: Donner vie à la TI-88

Ceci dit, si cela permet d'acquérir ou d'avoir en prêt une TI-88 en état de fonctionnement, pourquoi pas. Mais ce serait plutôt un simulateur (comme free42). L'émulation du CPU qui plus est, nécessite une image de la rom, me paraît impossible. A moins que Texas Instruments ne nous aide... Mais ce n'est pas trop la philosophie de la maison, je crois :(
par cgh
27 oct. 2011 12:29
Forum : Tous les Pockets
Sujet : Misez p'tit, Optimisez - N°10 (hommage à J. McCarthy)
Réponses : 67
Vues : 29857

Re: Misez p'tit, Optimisez - N°10 (hommage à J. McCarthy)

Une version en FORTH (testée sous pfe). Pour ceux qui possèdent le module FORTH pour HP-71B.

Code : Tout sélectionner

: m91
dup 101 < if 11 + recurse recurse else 10 - then
;
Voilà les résultats:

Code : Tout sélectionner

10 m91 . 91 ok
-200 m91 . 91 ok
-20000 m91 . 91 ok
10.3 m91 . 91 ok
700 m91 . 690 ok
par cgh
27 oct. 2011 10:12
Forum : Tous les Pockets
Sujet : Misez p'tit, Optimisez - N°10 (hommage à J. McCarthy)
Réponses : 67
Vues : 29857

Re: Misez p'tit, Optimisez - N°10 (hommage à J. McCarthy)

Oaaah ! 8) Sympa le AI-1000 programmable en LISP. Ca c'est une découverte pour moi... J'avais entendu parler du 2000C qui se programme en C, mais jamais d'un pocket en LISP (hormis les RPL HP).
par cgh
26 oct. 2011 16:47
Forum : Tous les Pockets
Sujet : Misez p'tit, Optimisez - N°9
Réponses : 25
Vues : 12968

Re: Misez p'tit, Optimisez - N°9

Hobiecat a écrit :
cgh a écrit :
Gilles59 a écrit :Sympa de voir un prgm TI57 et optimisé je pense ;)
Ben oui. Elle dormait dans un tiroir. Et puis le sujet était intéressant et pas trop "gros" en pas de programme pour la 57 :)
Le problème des TI57 "dans le tiroir" est qu'elles fonctionnent encore ! Je sais que celle de mon frangin a la maladie des touches à "répétition automatique"... Un grand classique des TI57 il me semble...
En fait, c'est une maladie de toutes les TI de cette époque. De mes 3 TI (57, 58 et 59) aucune n'a le problème aujourd'hui. Par contre ma carte Université TMS990/189, elle, a bien cette "maladie" :( snif !
par cgh
26 oct. 2011 15:17
Forum : Tous les Pockets
Sujet : Misez p'tit, Optimisez - N°10 (hommage à J. McCarthy)
Réponses : 67
Vues : 29857

Re: Misez p'tit, Optimisez - N°10 (hommage à J. McCarthy)

pir2 a écrit :Intéressant, comment on fait pour augmenter la taille de cette pile?
Le pointeur programme et les pointeurs de retour sont stockés dans les registres b et a (adresses 12 et 11 respectivement). Avec un manipulation astucieuse X<>, on peut les mémoriser dans des registres Rxx et donc les rappeler ultérieurement; on a ainsi une pile de retours "presque" infinie. On doit utiliser X<>, car STO et RCL "normalisent" le registre X, ce X<> ne fait pas!

Il y a un programme qui fait cela dans le PPC-ROM.

EDIT: Ce sont les fonctions LR et SR du PPC-ROM.

EDIT2: Un petit lien pour voir ce que c'est: Programmation Synthétique
On peut lire aussi Synthetic Programming par W.C.Wickes (la référence !).
par cgh
26 oct. 2011 14:37
Forum : Tous les Pockets
Sujet : Misez p'tit, Optimisez - N°10 (hommage à J. McCarthy)
Réponses : 67
Vues : 29857

Re: Misez p'tit, Optimisez - N°10 (hommage à J. McCarthy)

charognard a écrit :Je viens de lire l'explication de zpalm. Etonnant que la 41 ne génère pas une erreur et enquille les XEQ hors pile !
-200 ne lui pose aucun problème
Les ingénieurs d'HP qui développaient coconut ont dû utiliser la fonction 91 de McCarthy pour tester :mrgreen:
par cgh
26 oct. 2011 13:56
Forum : Tous les Pockets
Sujet : Misez p'tit, Optimisez - N°10 (hommage à J. McCarthy)
Réponses : 67
Vues : 29857

Re: Misez p'tit, Optimisez - N°10 (hommage à J. McCarthy)

zpalm a écrit :Sur la HP-41 la pile de retour des sous-programmes a une profondeur de 6, ce qui veut dire que l’on ne peut revenir que 6 niveaux en arrière. Donc ça ne devrait pas marcher pour n <47!!

En fait on est sauvé car pour tout n <=90 la valeur est 91, donc lorsque l’on calcule par ex. M(5) on dépasse le nombre de niveaux autorisés, on ne revient donc pas au début des appels comme on peut le voir en passant en mode programme : le programme s’est arrêté sur le dernier RTN du programme. Mais la 41 affiche la bonne valeur : 91.
Il va falloir utiliser la programmation synthétique :idea: pour augmenter la pile de retour des sous-programmes. Comme quoi la présentation faite par gégé lors des pocketicaires s'avère utile :D
par cgh
26 oct. 2011 13:40
Forum : Tous les Pockets
Sujet : Misez p'tit, Optimisez - N°10 (hommage à J. McCarthy)
Réponses : 67
Vues : 29857

Re: Misez p'tit, Optimisez - N°10 (hommage à J. McCarthy)

Sur HP41, on peut encore simplifier:

Code : Tout sélectionner

  01 LBL "MCC"
  02 LBL 00
  03 10
  04 -
  05 90
  06 X<>Y
  07 X>Y?
  08 RTN
  09 21
  10 +
  11 XEQ 00
  12 XEQ 00
  13 END
par cgh
26 oct. 2011 13:27
Forum : Tous les Pockets
Sujet : Misez p'tit, Optimisez - N°10 (hommage à J. McCarthy)
Réponses : 67
Vues : 29857

Re: Misez p'tit, Optimisez - N°10 (hommage à J. McCarthy)

Gilles59 a écrit :RPL/50 (et 48 ?)

Code : Tout sélectionner

« → n 'IFTE(n>100 , n-10 , M(M(n+11)))' » 'M' STO
Testé sur HP50
Cela fonctionne sur HP48SX (enfin sous x48).

J'ai des progrès à faire en programmation RPL, moi... :roll:
par cgh
26 oct. 2011 12:52
Forum : Tous les Pockets
Sujet : Misez p'tit, Optimisez - N°10 (hommage à J. McCarthy)
Réponses : 67
Vues : 29857

Re: Misez p'tit, Optimisez - N°10 (hommage à J. McCarthy)

Ma version sur HP48sx :

Code : Tout sélectionner

«
  « DUP 100 >
    « 10 -
    »
    « 11 + m91 EVAL
m91 EVAL
    » IFTE
  » \-> m91
  « m91 EVAL
  »
»
EDIT: Utilisation de translate = 2
par cgh
26 oct. 2011 09:00
Forum : Tous les Pockets
Sujet : Les versions de 71B
Réponses : 54
Vues : 23004

Re: Les versions de 71B

Hobiecat a écrit :En regardant sur gougueul images, on voit quand même (indépendamment de la qualité des photos) des 71B franchement silver ou franchement gold...
Les numéros de série ou version ne sont pas très significatifs non plus...
Le mystère demeure ! :wink:
Peut être l'usine de production: USA, Singapour ?
par cgh
26 oct. 2011 08:58
Forum : Tous les Pockets
Sujet : Misez p'tit, Optimisez - N°9
Réponses : 25
Vues : 12968

Re: Misez p'tit, Optimisez - N°9

Gilles59 a écrit :Sympa de voir un prgm TI57 et optimisé je pense ;)
Ben oui. Elle dormait dans un tiroir. Et puis le sujet était intéressant et pas trop "gros" en pas de programme pour la 57 :)

Aller à la recherche avancée