La recherche a retourné 2107 résultats

par cgh
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 : 4020

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 ?
par cgh
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 : 4020

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...
par cgh
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 : 4020

Re: Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?

Hobiecat a écrit :
27 sept. 2020 21:07
Le plus rapide, c'est sur HP-16C !

Code : Tout sélectionner

LBL 0
#B
RTN
:mrgreen:
Excellent ! Toute la puissance des machines specialisees :geek:
Il n'y a pas cette fonction sur les 48/49/50 ?
par cgh
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 : 4020

Re: Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?

Sur PC1500:

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
Entrez le nombre n puis DEF A et le programme va afficher le resultat.
Ex:

Code : Tout sélectionner

1279 DEF A
9
1968 DEF A
6
0 DEF A
0
par cgh
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 : 4020

Re: Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?

Plus court et plus rapide 8)

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
Le code fait 33 octets avec le label, 24 octets sans celui-ci.
par cgh
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 : 4020

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...
par cgh
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 : 4020

Re: Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?

Sur HP41C:

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
Le programme fait 36 octets avec le label; 27 sans le label "MPO96" :)
par cgh
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 : 4020

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...
par cgh
27 sept. 2020 09:49
Forum : Tous les Pockets
Sujet : SANCO TCP-8300 HS
Réponses : 49
Vues : 3490

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.
par cgh
25 sept. 2020 21:03
Forum : Tous les Pockets
Sujet : Support pour HP-71B et Pilbox (3D)
Réponses : 27
Vues : 2024

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 ...
par cgh
25 sept. 2020 21:00
Forum : Tous les Pockets
Sujet : Support pour HP-71B et Pilbox (3D)
Réponses : 27
Vues : 2024

Re: Support pour HP-71B et Pilbox (3D)

La seule autre solution est de mettre une HP-71B en mode passif (non-contrôleur) dans l'équation. Ex.#1: [HP-41 contrôleur] <-> [cable HP-IL] <-> [HP-71 passif] Ex.#2: [HP-75 contrôleur] <-> [cable HP-IL] <-> [HP-71 passif] Ex.#3: [HP-71 contrôleur] <-> [cable HP-IL] <-> [HP-71 passif] IL n'y avait...
par cgh
25 sept. 2020 20:16
Forum : Je donne, j'échange, j'achète et je vends [réservé aux membres actifs]
Sujet : Recherche d'un PB-1000
Réponses : 24
Vues : 1532

Re: Recherche d'un PB-1000

D'autre part, j'ai toujours trouvé que la documentation Casio (3 manuels) était peu pédagogique et insuffisante pour exploiter vraiment la machine. C'est dommage. Casio et la documentation, ca fait 2 ! Malheureusement ! J'ai toujours trouve leurs manuels auxquels j'ai eu acces mediocres: aussi bien...
par cgh
25 sept. 2020 20:02
Forum : Tous les Pockets
Sujet : Support pour HP-71B et Pilbox (3D)
Réponses : 27
Vues : 2024

Re: Support pour HP-71B et Pilbox (3D)

Les limitations des contrôleurs HP-IL initiaux (HP-41 & HP-75) nous obligent à bâtir deux boucles HP-IL et relier celles-ci avec une interface qui va servir de pont entre les boucles. Exemple avec RS-232: Boucle #1 : [Contrôleur #1] <-> [cable HP-IL] <-> [82164A RS-232 #1] Boucle #2 : [Contrôleur #...
par cgh
25 sept. 2020 19:41
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 : 57
Vues : 5642

Re: Point sur les ventes de CGH

Arg, vous avez de la chance : Mondial Relay "est embouteillé dans son site logistique" mais "va me remettre mon colis dans le plus bref délais" :mrgreen: :mrgreen: Qui ira le plus vite pour faire les 50 derniers km : Mondial Relais, le confinement, ou mes besoins spatulaire, la neige commencant a b...
par cgh
25 sept. 2020 11:18
Forum : Tous les Pockets
Sujet : Support pour HP-71B et Pilbox (3D)
Réponses : 27
Vues : 2024

Re: Support pour HP-71B et Pilbox (3D)

Tout ce que vous voulez savoir sur le mode analyseur/scope sans jamais oser le demander :geek:

Aller sur la recherche avancée