@Ben -> MP
La recherche a retourné 1999 résultats
Aller sur la recherche avancée
- 29 sept. 2020 20:44
- Forum : Je donne, j'échange, j'achète et je vends [réservé aux membres actifs]
- Sujet : Point sur les ventes de CGH
- Réponses : 72
- Vues : 13103
- 29 sept. 2020 13:49
- Forum : Tous les Pockets
- Sujet : Transfert entre 2 HP41 (C et CV) avec le XFUNCTION
- Réponses : 43
- Vues : 4794
- 29 sept. 2020 13:28
- Forum : Tous les Pockets
- Sujet : Transfert entre 2 HP41 (C et CV) avec le XFUNCTION
- Réponses : 43
- Vues : 4794
Re: Transfert entre 2 HP41 (C et CV) avec le XFUNCTION
Dites je rebondis sur le sujet : je viens de remettre des piles dans une 41CX qui n'en avait plus depuis presque 3 semaines, et... pas de Memory lost ! J'ai tout retrouvé nickel dans sa mémoire 8O Le manuel indique que la mémoire est censée être conservée "pendant un court instant" seulement, le te...
- 28 sept. 2020 16:51
- Forum : Tous les Pockets
- Sujet : Photo d'un module OM-53B
- Réponses : 174
- Vues : 20921
- 28 sept. 2020 13:04
- Forum : Tous les Pockets
- Sujet : Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
- Réponses : 40
- Vues : 6701
Re: Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
J'ai une autre version en 22 octets (sans le label) sur HP41C sans aucun registre , qui n'utilise que le pile. Qui dit mieux ? 002 0 X<>Y :: : 0 N 1 1 004* LBL 00 :: : ∑b nn 1 005 2 / ENTER↑ FRC : ∑b nn/2 .n 1 1 1 1 009 ST+ Z ST+ Z - : : ∑b+b nn 2 2 1 012 x>0? GTO 00 : : ∑b+b nn 1 2 014 RDN 0 : : ∑...
- 27 sept. 2020 21:56
- Forum : Tous les Pockets
- Sujet : Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
- Réponses : 40
- Vues : 6701
Re: Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
J'ai une autre version en 22 octets (sans le label) sur HP41C sans aucun registre, qui n'utilise que le pile. Qui dit mieux ?
- 27 sept. 2020 21:30
- Forum : Tous les Pockets
- Sujet : Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
- Réponses : 40
- Vues : 6701
Re: Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
Excellent ! Toute la puissance des machines specialisees :geek: Il n'y a pas cette fonction sur les 48/49/50 ? Oui, la 16C est imparable pour ce genre d'exercice ! :wink: La fonction n'existe pas sur 48, mais je ne suis pas sûr sur les 49 et 50. J'avais regarde a tout hasard si le TIprogrammeur LED...
- 27 sept. 2020 21:13
- Forum : Tous les Pockets
- Sujet : Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
- Réponses : 40
- Vues : 6701
Re: Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
Excellent ! Toute la puissance des machines specialiseesHobiecat a écrit : ↑27 sept. 2020 21:07Le plus rapide, c'est sur HP-16C !
Code : Tout sélectionner
LBL 0 #B RTN
![]()

Il n'y a pas cette fonction sur les 48/49/50 ?
- 27 sept. 2020 21:04
- Forum : Tous les Pockets
- Sujet : Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
- Réponses : 40
- Vues : 6701
Re: Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
Sur PC1500:
Entrez le nombre n puis DEF A et le programme va afficher le resultat.
Ex:
Code : Tout sélectionner
10 "A"AREAD A:C=0
20 IF A LET A=A/2:C=C+(A<>INT A):A=INT A:GOTO 20
30 PRINT C
Ex:
Code : Tout sélectionner
1279 DEF A
9
1968 DEF A
6
0 DEF A
0
- 27 sept. 2020 20:31
- Forum : Tous les Pockets
- Sujet : Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
- Réponses : 40
- Vues : 6701
Re: Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
Plus court et plus rapide
Le code fait 33 octets avec le label, 24 octets sans celui-ci.

Code : Tout sélectionner
01 LBL "MPO96"
02 INT
03 CLST
04 LBL 00
05 X<> L
06 X=0?
07 GTO 01
08 2
09 /
10 FRC
11 ST+ Y
12 ST- L
13 GTO 00
14 LBL 01
15 X<>Y
16 ST+ X
17 END
- 27 sept. 2020 20:14
- Forum : Tous les Pockets
- Sujet : Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
- Réponses : 40
- Vues : 6701
Re: Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
J'aime bien le jeu avec le registre L:, ce qui me donne une idée qui raccourcit encore un peu mon code pour HP-41C: 001*LBL "MPO96" 002 CL∑ 003* LBL 00 004 RCL X 2 ST/ Z MOD ∑+ X<>Y INT X>0? GTO 00 012 RCL 12 013*END Ce qui doit faire 22 octets avec le label alphanumérique global. Oui, bien vu le c...
- 27 sept. 2020 12:11
- Forum : Tous les Pockets
- Sujet : Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
- Réponses : 40
- Vues : 6701
Re: Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
Sur HP41C:
Le programme fait 36 octets avec le label; 27 sans le label "MPO96" 
Code : Tout sélectionner
00 LBL "MPO96"
01 INT
02 CLST
03 LBL 00
04 X<> L
05 X=Y?
06 GTO 01
07 2
08 /
09 FRC
10 ST+ Z
11 ST+ Z
12 ST- L
13 GTO 00
14 LBL 01
15 X<> Z
16 END

- 27 sept. 2020 11:10
- Forum : Tous les Pockets
- Sujet : Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
- Réponses : 40
- Vues : 6701
Re: Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
L'absence des TI-57/58/59 à chaque MPO devient inquiétante. Il y a-t-il encore de ces modèles en fonctionnement. C'est dommage, ce sont des machines qui avaient marquées par leurs performances l'histoire du calcul de poches. Tout a fait d'accord ! Les veberables TI sont absentes et c'est fort domma...
- 27 sept. 2020 09:49
- Forum : Tous les Pockets
- Sujet : SANCO TCP-8300 HS
- Réponses : 50
- Vues : 7379
Re: SANCO TCP-8300 HS
Merci Fabrice pour ce topic fort instructif sur ces reparations que je serai bien incapable de mener.
Ramener un pocket et ses peripheriques a la vie est toujours un instant merveilleux, surtout quand il s'agit d'une piece plutot rare comme le TPC8300.
Ramener un pocket et ses peripheriques a la vie est toujours un instant merveilleux, surtout quand il s'agit d'une piece plutot rare comme le TPC8300.
- 25 sept. 2020 21:03
- Forum : Tous les Pockets
- Sujet : Support pour HP-71B et Pilbox (3D)
- Réponses : 27
- Vues : 3444
Re: Support pour HP-71B et Pilbox (3D)
IL n'y avait pas un module dual-HPIL ? Ca aurait ete sympa, surtout si c'est pour HP71B. Tu mets le HP71B en passif sur les 2 boucles, qui sert de relais entre les 2 controleurs... Bingo ! "HP 82402 Dual HP-IL Adapter for the HP-71B" et le manuel . A voir quand meme si le HP71B peut etre passif au ...