1590 résultats trouvés

par Gilles59
15 juil. 2023 21:19
Forum : Tous les Pockets
Sujet : Misez P'tit, Optimisez - N°29bis (Calcul)
Réponses : 11
Vues : 7908

Re: Misez P'tit, Optimisez - N°29bis (Calcul)

Rpl

Code : Tout sélectionner

3 ENTER ENTER ENTER 10^x / + »
1 touche de plus qu'en RPN, car 3 ENTER en RPL met un seul 3 sur la pile
par Gilles59
01 juil. 2023 17:30
Forum : Tous les Pockets
Sujet : Mais qu'est-ce que c'est ? KEZAKO n° 3
Réponses : 66
Vues : 7927

Re: Mais qu'est-ce que c'est ? KEZAKO n° 3

gleike a écrit : 01 juil. 2023 17:03 On reconnait très clairement un HP-01 en or massif.
Ah pas mal… ca pourrait!

Ou un pocket de forme horizontale?
par Gilles59
01 juil. 2023 15:36
Forum : Tous les Pockets
Sujet : Mais qu'est-ce que c'est ? KEZAKO n° 3
Réponses : 66
Vues : 7927

Re: Mais qu'est-ce que c'est ? KEZAKO n° 3

Est ce que la réponse est dans cette vidéo?

https://youtu.be/Lc_hgMFnZ5E
par Gilles59
25 juin 2023 10:36
Forum : Tous les Pockets
Sujet : Adhesive vinyl overlays - WP31S, WP34S, newRPL
Réponses : 1
Vues : 1085

Adhesive vinyl overlays - WP31S, WP34S, newRPL

https://www.hpmuseum.org/forum/thread-2 ... #pid174211
Ca a l'air très qualitatif et prédécoupé si j'ai bien compris...
par Gilles59
23 juin 2023 12:03
Forum : Frimer - brag - dernières acquisitions
Sujet : RPL encore et encore
Réponses : 6
Vues : 1986

Re: RPL encore et encore

bernouilli92 a écrit : 12 juin 2023 22:08 J'ai longtemps cherché une hp50g bleu dans succès.
Je ne savais que la hp49g+ était identique à la hp50g. On en apprend tous les jours.
IL y a des petites différences entre 49g+ et 50g en dehors de la couleur :
- la 49g+ a 3 piles vs 4 piles pour la 50g qui a donc une meilleure autonomie
- la 50g est alimentée par l'USB quand elle connectée à un PC, pas le 49G+ (à vérifier cependant, mais c'est ce que j'ai lu)
- le clavier ma 49g+ me semble un peu moins agréable (moins "doux") que celui de la 50g (qui est très bon même si en dessous de la grande époque)
- Sinon c'est la même "rom" (enfin flash), même RAM, même lecteur SD intégré ...
par Gilles59
21 juin 2023 09:20
Forum : Tous les Pockets
Sujet : Découverte Ti 95 Procalc
Réponses : 25
Vues : 12600

Re: Découverte Ti 95 Procalc

J'aime bien cette machine originale. Merci pour ces éléments.
Malheureusement guère de temps pour sortir la bête de sa boite :/
par Gilles59
17 juin 2023 16:43
Forum : Tous les Pockets
Sujet : HP RPL - intégrales numériques avec fonction+programme-48G KO, 28S OK
Réponses : 74
Vues : 12126

Re: HP RPL - intégrales numériques avec fonction+programme-48G KO, 28S OK

FLISZT a écrit : 12 juin 2023 20:45 Un "peu" hors topic, mais vu que Gilles59 parlait de raccourcis clavier, en voici d'autres que je connais depuis peu.

Déjà aller dans l'arborescence : PRG>BRCH

Ensuite, avec (Shift Gauche) ou (Shift Droit) + la touche idoine, on obtient directement les séquences suivantes :
Ca fonctionne comme ça aussi sur ma HP48SX (c) 1989 "made in USA" n°série 3042A00978 ;D Donc depuis le début des 48. A voir sur les 28.
D'après ce site https://www.hpmuseum.org/collect.htm#numbers ma 48sx serait donc d'octobre 1990, fabriquée aux USA

PS : quelle merveille le clavier des 48sx. Par contre il me semble que l'écran est de moins en moins contrasté avec les années qui passent
par Gilles59
17 juin 2023 10:24
Forum : Tous les Pockets
Sujet : HP-71B : article (EN)
Réponses : 3
Vues : 1818

Re: HP-71B : article (EN)

Merci... https://archive.org/ est une mine d'or. C'est là en général que je cherche en premier les anciennes docs, CPC, Z80, Turbo pascal, Turbo game etc etc
par Gilles59
11 juin 2023 21:30
Forum : Tous les Pockets
Sujet : Misez p'tit Optimisez n°103 : A*B*C vérification d’une loi contre-intuitive
Réponses : 25
Vues : 14320

Re: Misez p'tit Optimisez n°103 : A*B*C vérification d’une loi contre-intuitive

Bonsoir,
j'ai adapté le programme RPL de c.Ret en newRPL

Code : Tout sélectionner

«
  9 0 CON AXL 
  1 ROT START
    RAND RAND RAND * * MANT DUP2 GET 1 + PUT 
  NEXT
  DUP ΣLIST / 100 * 
»
L'affichage du nombre de décimales voulu se fait en tapant ON & 0..9 (Par ex ON et 3 en même temps fixe 3 décimales ...)

Sur HP50g hardware 100.000 boucles s'exécutent en 12,7 sec : 100000 'MPO' TEVAL
{ 30.4 18.79 13.23 9.8 7.53 6.14 5.32 4.58 4.22 }

Sur le PC 10 millions de boucles d'exécutent en 13,4 sec : (le ratio entre ma HP50 et mon PC est de 1 à 100, aucune émulation la version PC du newRPL est une version compilée pour PC)
{ 30.06 18.82 13.18 9.86 7.72 6.27 5.3 4.62 4.18 }

100 millions de boucles sur PC, en 120 sec, ça ne change plus grand chose :
{ 30.06293 18.80952 13.19835 9.8627 7.7169 6.2753 5.29172 4.6149 4.16769 }

A noter que le newRPL fonctionne sur la prime G1 et vu le processeur ca doit tourner bien plus vite que sur HP50

PS : la commande CRNM ne fonctionne pas de la même façon pour les vecteurs en RPL et newRPL : signalé à l'auteur. Je travaille donc en liste plutot qu'avec un tableau. la commande AXL transforme un tableau en liste et inversement. Premiere fois que j'utilise la commande MANT, merci c.Ret ;D
par Gilles59
11 juin 2023 09:11
Forum : Frimer - brag - dernières acquisitions
Sujet : RPL encore et encore
Réponses : 6
Vues : 1986

Re: RPL encore et encore

Et il y a la 49g+ qui est identique à la 50g mais avec une autonomie moindre et qui n’est pas alimentée par l’usb quand elle est connectée.

Image

Évidemment j’ai les trois. :D
par Gilles59
10 juin 2023 20:32
Forum : Frimer - brag - dernières acquisitions
Sujet : RPL encore et encore
Réponses : 6
Vues : 1986

RPL encore et encore

Une HP50g bleue qui rejoint ses cousines noires, 49g+ or, 49g, et 48Sx. Parfaite pour une utilisation d’été au bord de la mer mdr 🤣
par Gilles59
10 juin 2023 19:55
Forum : Sondages
Sujet : Que veut dire votre pseudo ???
Réponses : 71
Vues : 110294

Re: Que veut dire votre pseudo ???

Hello, Mon pseudo est mon prénom ici mais en général de je choisis NEMO comme pseudo pour deux raisons :
- Evidement le capitaine, car je suis un fan absolu de Jules Verne
- Parce que Nemo veut dire 'personne' en latin ou 'incognito' si on veut.
par Gilles59
10 juin 2023 11:42
Forum : Tous les Pockets
Sujet : HP RPL - intégrales numériques avec fonction+programme-48G KO, 28S OK
Réponses : 74
Vues : 12126

Re: HP RPL - intégrales numériques avec fonction+programme-48G KO, 28S OK

Bonjour,

je suis surpris que ca fonctionne sur HP28. En tout cas sur HP48->50 ça ne fonctionne pas car il y a un moment deux variables qui ont le même nom (Y), mais ne sont pas la même chose. Sur ma 49g+, je ferai :
hp.jpg
hp.jpg (61.25 Kio) Vu 3009 fois
Coté saisie :
'F1(x,y)=x*y' DEFINE ( ça ne fonctionne que sur 49g et plus il me semble, sinon definir la fonction comme vous le faite d'habitude)
puis utiliser Equation Write (EQW) qui est très rapide sur 49g+ 50g

A noter qu'en mode EXACT (RightShift & NUM permet de switcher entre les modes |R= et |R~ et en remplaçant .5 par 1/2) on trouve 15/64
Attention dans EQW à bien saisir la fonction F1 avec 2 arguments F1(Y²,Y) et pas avec un argument complexe F1((Y²,Y))

PS : J'adore EQW sur les 49g+ et 50g. Il est très rapide et combiné au CAS il permet de travailler manupuler facilement tout ou partie d'une équation.
PPS : Les 49-50 (et 48?) gèrent les intégrales doubles ou plus...
PPPS : Je ne comprends pas bien à quoi sert le calcul. calculer le volume d'une partie de la cuve ?
PPPPS : En mode CAS exact, entre un point a et b j'obtiens le résulat (b^4-a^4)/4, ce qui intuitivement ne me semble pas cohérent pour calculer un volume
par Gilles59
07 juin 2023 20:59
Forum : Tous les Pockets
Sujet : Misez p'tit Optimisez n°118 : Discussion à Colney Hatch
Réponses : 13
Vues : 2504

Re: M.P.O. n°118 : Discussion à Colney Hatch

RPL HP 48->50, en 78,5 octets, avec la library LISTEXT https://www.hpcalc.org/details/7971

Code : Tout sélectionner

« {} 0 54 FOR i IF i 3 ^ DUP I→NL LSUM i  ==  THEN + ELSE  DROP END NEXT »
retourne {0,1,512,4913,5832,17576,19683}
par Gilles59
07 juin 2023 20:09
Forum : Tous les Pockets
Sujet : Misez p'tit Optimisez n°118 : Discussion à Colney Hatch
Réponses : 13
Vues : 2504

Re: M.P.O. n°118 : Discussion à Colney Hatch

FLISZT a écrit : 07 juin 2023 02:24

Code : Tout sélectionner

<<
	{ 0 1 512 4913 5832 17576 19683 }
	SWAP
	POS DUP 0 ≠ 
	{ { 0 1 8 17 18 26 27 } SWAP GET } {DROP} IFTE
>>
Et voilà ! :mrgreen:
Mais je n'ai pas l'intention de m'en tenir là…
Ah mais là c'est un peu de la triche quand même parce que dans ce cas :

Code : Tout sélectionner

<< { 0 1 8 17 18 26 27 } DUP 3 ^ 3 ROLL POS IFERR GET THEN DROP2 END >>
;D
76 octets en RPL

Aller à la recherche avancée