La recherche a retourné 1424 résultats

par Gilles59
26 sept. 2020 23:09
Forum : Tous les Pockets
Sujet : Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
Réponses : 49
Vues : 9567

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

Une version pour Casio FX-602P en 16 pas en comptant l'entête (15 sinon) [P0] MAC LBL0 = / 2 - x=0 GOTO9 FRAC x=0 GOTO0 ISZ GOTO0 LBL9 MR00 Ca doit s'adapter facilement en RPN ;D EDIT : je cafouille complétement en RPN avec ma 41L... Faudra que je lise la doc de HP41 lol ! L'idée c'est : 0 STO 00 RD...
par Gilles59
26 sept. 2020 22:18
Forum : Tous les Pockets
Sujet : Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
Réponses : 49
Vues : 9567

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

bernouilli92 a écrit :
26 sept. 2020 22:15
Il manque un SWAP DROP à la fin. Ou je crois qu’il une autre commande qui fait la même chose sur hp50.
Oui, c'est NIP ;D Mais j'aimais bien laisser l'affichage en binaire en plus du calcul
par Gilles59
26 sept. 2020 21:34
Forum : Tous les Pockets
Sujet : Misez p'tit Optimisez n°96 : Combien de bits à un dans cet entier ?
Réponses : 49
Vues : 9567

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

Version RPL HP50g, mais c'est un peu de la gruge ;D

Code : Tout sélectionner

« BIN R->B ->STR "1" DUP SREPL  »
31,5 octets

en NewRPL c'est un peu différent :

Code : Tout sélectionner

« #0b SWAP + ->STR "1" DUP SREPL »
40 octets

Une version 603P sera plus amusante ;D
par Gilles59
26 sept. 2020 18:02
Forum : Tous les Pockets
Sujet : NewRPL
Réponses : 21
Vues : 10536

Re: NewRPL

Bonjour Gilles, Cela semble très intéressant merci :) ;D j'ai retesté les vitesses. La comparaison avec la 50g "de base" est délicate car l'augmentation est très différente suivant le type de programme. Sur des programme de type calculs numériques massif avec de la trigo et autre, c'est autour de 2...
par Gilles59
26 sept. 2020 16:57
Forum : Tous les Pockets
Sujet : NewRPL
Réponses : 21
Vues : 10536

Re: NewRPL

Je remonte ce sujet ;D J'ai bien "stressé" la version 1360 du NewRPL. Et bien le NewRPL est aujourd'hui très stable, complet et vraiment impressionnant. La connexion en USB fonctionne bien. La carte SD est reconnue et infiniment plus rapide : peut même gérer des fichiers séquentiel ou par blocs de d...
par Gilles59
26 sept. 2020 13:35
Forum : Tous les ordinateurs
Sujet : Nouveau jeu d'aventure textuel rétro
Réponses : 13
Vues : 3890

Re: Nouveau jeu d'aventure textuel rétro

Super... vais tester çà ;D J'adore ce type jeux. même si je préférerai en français.
Mais les liens "démo jouable" et autres ne fonctionnent pas :/
par Gilles59
23 sept. 2020 23:18
Forum : Tous les Pockets
Sujet : Misez p'tit Optimisez n°94 : les nombres de Motzkin
Réponses : 39
Vues : 9452

Re: Misez p'tit Optimisez n°94 : les nombres de Motzkin

* comment on supprime un message? *
par Gilles59
22 sept. 2020 23:57
Forum : Tous les ordinateurs
Sujet : Jeux de reflexions sous MSDOS / EGA / Souris
Réponses : 0
Vues : 1695

Jeux de reflexions sous MSDOS / EGA / Souris

J'ai retrouvé dans les WebArchives des Freewares que j'avais développé dans les années 1990. Ca fonctionne sur les vieux PC MDSOS avec une carte graphique (EGA mini) et souris. La carte SoundBlaster est reconnue. Ca fonctionne nickel avec DOSBOX. Présentation vidéo et explication : https://youtu.be/...
par Gilles59
20 sept. 2020 18:55
Forum : Tous les Pockets
Sujet : début bien difficile sur HP 50G !
Réponses : 66
Vues : 22923

Re: début bien difficile sur HP 50G !

Hello, Je réouvre ce post pour une question de débutant :) Familiarisé avec les HP48, je rencontre un soucis à la noix avec les 49g+ et 50g. Voici un exemple : "Chaine" TYPE me renvoie 2. avec ce foutu . (point) Comment puis-je faire pour ne pas l'avoir ou alors le transformer en 2 tout simplement ...
par Gilles59
19 sept. 2020 23:26
Forum : Tous les Pockets
Sujet : Misez p'tit Optimisez n°94 : les nombres de Motzkin
Réponses : 39
Vues : 9452

Re: Misez p'tit Optimisez n°94 : les nombres de Motzkin

Avec l'algorithme de Gégé ma HP50g en NewRPL trouve Motzkin(260) : - en 0,058 sec pour 32 chiffres significatifs. Le même programme en RPL tourne en 6,99s soit 120 fois plus lentement avec 12 chiffres significatifs! (0 sec. sur l'émulateur, qui est plutôt un simulateur en fait ... ou une version du ...
par Gilles59
19 sept. 2020 18:43
Forum : Tous les Pockets
Sujet : Misez p'tit Optimisez n°94 : les nombres de Motzkin
Réponses : 39
Vues : 9452

Re: Misez p'tit Optimisez n°94 : les nombres de Motzkin

Bonjour à tous. C.RET, on peut encore gagner 2 pas dans le programme 602P (ça fait quand même 6,7% lol) : . Le AC est inutile. . La séquence ... MR01 x 1 M+01 / MR01 peut s'écrire ... MR01 / 1 M+01 MR01 On peut aussi gagner une petite seconde en plus des 2 pas pour 100 P0 comme suit: [P0] x=0 1 Min0...
par Gilles59
19 sept. 2020 17:22
Forum : Tous les Pockets
Sujet : Remplacement d'écran sur HP48sx
Réponses : 35
Vues : 14435

Re: Remplacement d'écran sur HP48sx

Sujet très intéressant ! Il faudrait que je fasse çà pour ma bonne vieille 48SX. L'écran est vraiment très peu contrasté :/ Je me demande aussi comment je supportai une telle lenteur à l'époque :O Par contre le clavier :D Quelle merveille! Je l'aime bien aussi parce qu'elle est "Made in USA". Toute ...
par Gilles59
19 sept. 2020 15:37
Forum : Tous les Pockets
Sujet : Misez p'tit Optimisez n°91 : balade du cavalier
Réponses : 143
Vues : 32980

Re: Misez p'tit Optimisez n°91 : balade du cavalier

Beau sujet... Je me suis dis avant de parcourir les contributions : "Beau sujet pour vérifier les perf du NewRPL sur la récursivité"... Autant dire une recherche brutale pas très MPO quoique... le code est compact. J'ai été fort justement puni car j'attends encore la réponse. Ce n'est pas très étonn...
par Gilles59
14 sept. 2020 22:46
Forum : Tous les Pockets
Sujet : Misez p'tit Optimisez n°93 : somme récursive des chiffres d'un entier (racine digitale)
Réponses : 40
Vues : 10424

Re: Misez p'tit Optimisez n°93 : somme récursive des chiffres d'un entier (racine digitale)

Intéressant ce NewRPL :geek: Oui. Il est très complet maintenant. Pas de mode graphique encore mais: -environ 100 fois plus rapide que du RPL sur un hdw hp50g, et même plus pour les traitements de liste par exemple ou les programmes récursifs. Ça tourne aussi vite qu’une hp prime (même plus vite pa...
par Gilles59
13 sept. 2020 22:39
Forum : Tous les Pockets
Sujet : Misez p'tit Optimisez n°93 : somme récursive des chiffres d'un entier (racine digitale)
Réponses : 40
Vues : 10424

Re: Misez p'tit Optimisez n°93 : somme récursive des chiffres d'un entier (racine digitale)

Salut tout le monde... Ca fait un bail que je n'étais pas venu suite à divers problèmes (résolus!) et je vois que les passionnés sont toujours là ! Ca fait plaisir :D Bon j'ai ressorti ma HP50g en NewRPL. Ma première solution récursive et bien lourde : « -> n « IF 'n>9' THEN 0 0 n SIZE 1 - FOR s n s...

Aller sur la recherche avancée