Forum

Le programme gégé enfin réalisé : PROG 3 U=1;V=2; "initialisation Lbl 1: IF(U+V==3)THEN{GOSUB PROG 4;}; IF(U+V>=4)THEN{GOSUB PROG 5;}; IF(U+V==2)THEN {PRINT "ABC";END}; GOTO 1 END PROG 4 U=0;V=4; FOR(Y=1;Y=<5;Y++){ Z= Y*2 - 1; GOSUB PROG 6;}; END PROG 5 U=0;V=2; FOR(Y=4;Y>=1;Y--){ Z= Y*2; GOSUB PROG...

badaze a écrit :Et avec

Code : Tout sélectionner

Y = Z+1;
SWAP(A[Z], A[Y]);

Ce n'était pas évident pour moi que ça ne marcherait pas, venant du Qbasic.

http://www.hostingpics.net/viewer.php?i ... AM1074.jpg

A quoi t'as joué hier ? trier des chiffres

Je crains que cette machine ne puisse pas faire de SWAP depuis un sous-programme ou je sais pas, SWAP(A[X],A[Y]) va marcher, mais si les indices viennent d'un autre programme... moi je n'y arrive pas si quelqu'un pouvait vérifier... En tout cas SWAP(A[Z], A[Z+1]) j'ai l'impression qu'il confond A[Z+...

J'ai étudié le tri sur Wikipedia il y a quelques années, j'ai pas mal programmé en Qbasic, pour le HP 200lx...

Mais là ou bien la machine est buguée ou bien je suis bugué..

Y a pas plus simple...ya pu rien qui marche.

J'ai essayé un programme du genre gégé... ça ne marche pas pour le moment : - U et V sont deux flag qui fonctionnent sur le mode du chmod en linux, ce qui permet de se passer de AND, OR qui n'existent pas sur cette machine. - Y est un offset. INUTILE PROG 3 U=1;V=2; "initialisation Lbl 1: IF(U+V==3)...

1) Le système des blocs { } ne supporte pas l'évasion. 2) La machine bug assez souvent, notamment le prog 2, déjà 2 fois... la ligne de programme s'efface en partie. Inutile de la rééditer c'est le plantage assuré avec perte de données. En cas de doute, DEL le prog... bon éventuellement j'ai fait un...

Bonjour, De mémoire ce qui est limitant sur cette machine est la mémoire fort restreinte, tu ne peux pas avoir plusieurs "projets" en même temps, et l'écran trop petit. Le langage est sympa mais le tout est contraignant... Donnes-nous tes impressions. G.E. Yo, A priori mon propre cerveau fonctionne...

Je confirme ce bug avec la hp g9: http://www.hpmuseum.org/cgi-sys/cgiwrap/hpmuseum/archv017.cgi?read=114698 Impossible de construire des boucles avec IF, parce que le GOTO qui sort du bloc IF crée une NEST er à la troisième fois ! N=0 Lbl 0: IF(1)THEN{N=N+1} GOTO 0 N=0 Lbl0: IF(1)THEN{N=N+1;GOTO 0} ...

J'ai racheté ça : http://www.ebay.com/itm/NEW-BATTERY-CASE-FOR-HP-41C-HP-41CV-HP-41CX-CALCULATORS-EXCELLENT-REPLICA-/261358914861?ssPageName=ADME:L:OC:FR:3160 NEW BATTERY CASE FOR HP 41C HP 41CV HP 41CX CALCULATORS, EXCELLENT REPLICA J'avais pas trop d'idées de bricolage... il aurait fallu une alim ...

ledudu a écrit :Impressionnantes ces photos...

C'est 1 par jour les Juvamines en tout cas....faut pas en abuser.

Il s'était racheté une 39g par la suite, et avait été assez déçu, c'est un adepte du RPN...

Ok il s'avère que l'un des ressorts qui pressent les piles sur leurs contacts dans le boîtier est cassé... !

C'est une CX en plus...

En plus les contacts sont un peu corrodés, j'ai gratté le vert de cuivre là, avec un couteau... il va falloir racheter le boîtier à piles ou refaire un ressort.

Pas d'adressage indirecte sur la Hp 9g, de sorte que

GOTO Lbl n ne va pas marcher, ce qui complique tout sur une machine déjà restreinte en mémoire, détail râlant quoi

Promis je vais poster quelques photos dés que possible.

voilà :

http://img4.hostingpics.net/pics/739849SAM1072.jpg
http://img4.hostingpics.net/pics/496968SAM1073.jpg

Le dessous est normal, il n'y a pas de dégâts externes... et aucun module mémoire. Un jour elle ne s'est plus allumée.

Bonjour, sur la table de nuit de mon père gît une calculette de ce genre, sous un paquet de Juvamine et un morceau de savon, une couche de poussière accumulée depuis qu'il est à la retraite lui sert carrément de linceul (oui c'est triste) ... donc. Elle ne s'allume plus. Est il possible de la ranime...

Effectivement il existe un algo du type gégé, il reste à le mettre au point...

Une fenêtre de 2 indices consécutifs monte et redescend.