28 résultats trouvés

par Sharpounet
14 mai 2018 23:43
Forum : Tous les Pockets
Sujet : Misez p'tit Optimisez n°83 : Fabuleuses fractions
Réponses : 22
Vues : 19872

Re: Misez p'tit Optimisez n°83 : Fabuleuses fractions

@jxano : merci pour ta suggestion pour la génération des permutations qui m'a donnée une autre idée d'algorithme avec seulement 2 niveaux de boucles imbriquées, une boucle de 1023456789 à 9876543210, puis un rangement de chaque chiffre dans un tableau (j'ai utilisé une autre méthode en passant par des chaines de caractères) puis un comptage du nombre de chiffres différents dans le nombre. Si ça fait moins de 10, ce n'est pas une permutation.
Code super compact !
Si a[0..9] est le tableau contenant les dix chiffres dont on cherche à savoir s'ils sont tous différents, v[0..9] le tableau des chiffres utilisés :
v[k]=1 si le chiffre k est présent dans le nombre de 10 chiffres, 0 sinon.

for(j=0;j<10;j++) v[j]=0;
compte=0;
for(j=0;j<10;j++) v[a[j]]=1;
for(j=0;j<10;j++) compte+=v[j];// si compte = 10 : c'est une permutation

Par contre, c'est beaucoup plus lent.Je suis encore en c sur mon pc récent. Sur un pocket, ça doit méchamment ramer !
par Sharpounet
13 mai 2018 19:23
Forum : Tous les Pockets
Sujet : Misez p'tit Optimisez n°83 : Fabuleuses fractions
Réponses : 22
Vues : 19872

Re: Misez p'tit Optimisez n°83 : Fabuleuses fractions

Hello,
je viens de venir à bout de ce mpo en trichant totalement puisque j'ai fait mon programme en c sur un pc relativement récent (3-4h de labeur pour près de 120 lignes quand-même !)
J'avais commencé en basic sur un PC-G850V et ai vite été limité par exemple par les nombres maximum d'imbrication de boucles (qu'on peut certes contourner en remplaçant les FOR NEXT par des boucles "manuelles" avec des GOTO)
Mon programme trouve 634 couples de fractions, (sachant que mathématiquement, il y en a moins car des solutions faisant intervenir 1/2 = 2/4 = 3/6 sont comptées autant de fois. Dis autrement, pas de simplification des fractions). C.Ret, tu trouves le même nombre de solutions ?

Il y a peut-être une approche plus simple mais il me semble que l'on ne peut pas échapper au problème de générer l'ensemble des permutations de 10 chiffres (il y en a 10!=3628800) et j'ai voulu l'écrire sans récursivité d'où 10 boucles imbriquées pour installer chaque chiffre de 0 à 9 dans une des 10 positions disponibles. Après, je découpe chaque permutation en 4 paquets pour former les 2 numérateurs et dénominateurs candidats (84 combinaisons possibles) puis je regarde si les deux fractions ainsi composées répondent.
Il s'agit d'une approche totalement bourrine avec exploration de toutes les possibilités alors que quelques considérations mathématiques simples devraient permettent de réduire l'espace de recherche je pense.
Quelques couples de fractions non triviales trouvées :
34/51 + 269/807
795/810 + 6/324
678/904 + 13/52

Prochaine étape : porter le code c sur un pocket (en basic ou c) et voir en combien de temps ça tourne car sur un pc récent, le résultat est quasi instantané !

C.Ret, je serais preneur d'un algorithme non récursif permettant de générer les permutations simplement
Edit : je m'aperçois que mon programme ramène aussi les solutions où 0 est en première position de la permutation : les fractions trouvées dans ce cas n'utilisent pas le 0 car 0n = n mais c'est pas trop dur à éliminer des solutions renvoyées
par Sharpounet
24 nov. 2017 18:55
Forum : Tous les Pockets
Sujet : Doc Sharp PC-G850vs
Réponses : 79
Vues : 90824

Re: Doc Sharp PC-G850vs

Je suis d'accord. Le problème vient à mon avis d'une incohérence entre les types de variables déclarées et les formats d'affichage utilisés dans la clause printf.

Voir par exemple : https://www.ltam.lu/cours-c/prg-c42.htm
par Sharpounet
24 nov. 2017 18:15
Forum : Tous les Pockets
Sujet : Doc Sharp PC-G850vs
Réponses : 79
Vues : 90824

Re: Doc Sharp PC-G850vs

Bonjour samourai37,

à la ligne 210 tu fais un printf...%o. Tu voulais vraiment un affichage en octal de ta variable e ?
par Sharpounet
20 oct. 2017 09:15
Forum : Tous les Pockets
Sujet : Achat groupé câble USB-SHARP PC-1600
Réponses : 14
Vues : 11995

Re: Achat groupé câble USB-SHARP PC-1600

Bonjour,

je suis intéressé.

Merci à toi !

Sharpounet
par Sharpounet
18 oct. 2017 16:44
Forum : A quoi t'as joué hier ?
Sujet : À discuter avec Emmanuel Viau
Réponses : 8
Vues : 12781

Re: À discuter avec Emmanuel Viau

Merci !
Je me revois encore il y a 33 ans (!!!!!) signer mon contrat de cession de logiciel avec lui (cf. ma présentation)
Il est toujours aussi calme et cool !
par Sharpounet
18 oct. 2017 10:13
Forum : Tous les Pockets
Sujet : retour d'expérience : USB pour PC-1600 & PC-1500
Réponses : 55
Vues : 50817

Re: retour d'expérience : USB pour PC-1600 & PC-1500

Bonjour,

Je précise que je serais tout à fait intéressé pour une commande groupée de câble PC1600-USB.
MacVador, je suis allé sur le site japonais que tu as donné en lien mais je n'ai pas vu d'email. Tu fais comment pour communiquer avec lui ?
Thank's
par Sharpounet
07 oct. 2017 18:53
Forum : Tous les Pockets
Sujet : Conseils réparation CE-1600P
Réponses : 41
Vues : 29715

Re: Conseils réparation CE-1600P

Merci pour ta proposition. A vrai dire, tant que l'interface cassette marche, je ne suis pas trop ennuyé. Et puis je vais essayer aussi d'utiliser la rs-232.
Je finirai donc peut-être par céder mes 1600F. A suivre...
par Sharpounet
07 oct. 2017 18:48
Forum : Tous les Pockets
Sujet : retour d'expérience : USB pour PC-1600 & PC-1500
Réponses : 55
Vues : 50817

Re: retour d'expérience : USB pour PC-1600 & PC-1500

Merci beaucoup pour ces infos MacVador !
Du coup je serais tenté de lui en acheter un aussi, mais je suis sur PC , pas Mac.
Sur le forum, un certain Ralph, d'outre Rhin, est également réputé pour daire des cables de ce type sur commande.
par Sharpounet
06 oct. 2017 21:45
Forum : Tous les Pockets
Sujet : Conseils réparation CE-1600P
Réponses : 41
Vues : 29715

Re: Conseils réparation CE-1600P

Merci, mais franchement, je vois pas trop ce que je pourrais metttre comme image. J'ai tout remonté sans difficulté, le problème c'est que courroie ou pas courroie, quand un CE1600F est enfiché dans un CE1600P, l'allumage du 1600P (par l'allumage du PC1600 préalablement inséré) doit provoquer l'allumage de la petite led verte sur le 1600F et là, plus rien et ce message CHECK 5.
Et ca me fait pareil avec mon autre CE1600F ( qui avait aussi la courroie fondue).
Bref, je soupçonne maintenant le CE1600P.
Heureusement, l'interface cassette fonctionne parfaitement. Je croise les doigts !
par Sharpounet
06 oct. 2017 18:02
Forum : Tous les Pockets
Sujet : PC1600 : un petit Moniteur/Assembleur
Réponses : 2
Vues : 3079

PC1600 : un petit Moniteur/Assembleur

Hello,

bon, histoire de ne peux pas faire qu'acheter et accumuler des pockets sharps comme raconté dans ma présentation, j'essaie un peu de les programmer aussi.
Je tenais à partager avec le forum ma première version d'un petit projet qui me tenait à coeur.
Il 's'agit d'un petit environnement moniteur + assembleur avec gestion de codes d'erreurs, écrits intégralement en assembleur (+un petit bout en basic pour positionner les paramètres et l'affichage des messages d'erreur).
Je sais que ce type de programme existe déjà (j'en ai vu des similaires sur un site allemand), mais l'intérêt résidait bien dans leur réalisation, pas dans le résultat.
Mon assembleur me semble assez rapide : + de 100 lignes de source assembleur par seconde assemblées en double passe.
Les instructions sont saisies en début de programme Basic derrière une apostrophe de commentaire, finissent par une directive 'END puis un CALL est à appeler après avoir renseigné manuellement les adresses de début de source Basic (je crois que je vais pouvoir automatiser ça) et le lieu de destination des codes machines (équivalent directive ORG)
Ce n'est qu'une première version, avec toutes les instructions Z80 pas encore prises en compte -j'ai fait l'impasse sur les instructions que je n'utilise jamais comme par exemple, pas de BIT ou de SET), les valeurs et adresses 16 bits sont impérativement en hexa et les valeurs 8 bits en décimal.

Le tout, tables des mnémoniques assembleur comprises, tient en 6-7 Ko.
Voici quelques écrans :
Image
Image
Image
Image
par Sharpounet
06 oct. 2017 16:08
Forum : Tous les Pockets
Sujet : Conseils réparation CE-1600P
Réponses : 41
Vues : 29715

Re: Conseils réparation CE-1600P

MacVador a écrit : 30 sept. 2017 15:36
Sharpounet a écrit : 28 sept. 2017 21:26 Bonsoir,

petite question concernant le changement de courroie du lecteur de disquettes.
...
Hello,
j'ai eu peur au début mais non, ça va presque tout seul. Il doit y avoir une dizaine de vis : 4 pour ouvrir le boîtier, 3 pour enlever la petite carte électronique, déboiter la nappe du connecteur de la carte qui part avec ses diodes, 3 vis dans les silentblock, enlever le blindage métallique en feuille, 1 vis qui tient la carte électronique qu'il faut glisser délicatement…
J'ai vu pire en démontage de bidules divers…
Merci pour tes explications rassurantes. Du coup,je me suis relancé dans le démontage (sans courroie de rechange sous le coude, en essayant le "coup" du remplacement provisoire par un élastique à cheveux).
Hé bien j'ai réussi le démontage-remontage tout seul comme un grand, comme quoi tu avais raison ! (et tes indications m'ont aidé) L'ancienne courroie était comme prévu complètement H.S.
La mauvaise nouvelle, c'est que après remontage, ça ne marche toujours pas et j'ai même un "régression" : la diode verte ne s'allume plus et j'ai un "CHECK 5" à l'allumage de la CE-1600P. J'en déduis que mon 1600F n'est plus alimenté/connecté à la 1600P et là, je ne sais plus quoi faire.
Je crois que je vais finir par revendre à prix symbolique mes 1600F avec les disquettes à plus bricoleur/connaisseur que moi.
par Sharpounet
28 sept. 2017 21:26
Forum : Tous les Pockets
Sujet : Conseils réparation CE-1600P
Réponses : 41
Vues : 29715

Re: Conseils réparation CE-1600P

Bonsoir,

petite question concernant le changement de courroie du lecteur de disquettes.
Préambule : je suis une grosse tâche en bricolage.
Néanmoins, j'avais commencé à démonter mon lecteur et le nombre de vis à enlever, ou plus globalement le nombre d'opérations à faire pour atteindre cet ensemble d'engrenages où on change la courroie m'avait paru très long. Je me suis arrêté avant de l'atteindre, ayant peur de ne pas être capable de tout remonter.
Est-ce-que il y aurait pas un piège du genre, je suis parti du mauvais coté ou c'est simplement parceque j'ai pas l'habitude ?
Une façon de me repondre serait de me donner l'ordre de grandeur du nombre de vis à dévisser.
Merci d'avance !
par Sharpounet
25 sept. 2017 22:28
Forum : Tous les Pockets
Sujet : Conseils réparation CE-1600P
Réponses : 41
Vues : 29715

Re: Conseils réparation CE-1600P

MacVador a écrit : 21 sept. 2017 21:26 Sinon, je suis en attente du Japon d'un câble USB vers PC-1500 ... J'ai eu par lui un USB PC-1600 qui marche bien. Je ferai un petit rapport de tout ça dans le forum un de ces 4.
Hé bien je serai tres interessé ! J'ai en effet essayé de relier un pc-1600 à mon pc via un ce133T et un cable rs-232-usb avec driver fourni mais j'ai rien réussi à transférer pour l'instant.
par Sharpounet
02 sept. 2017 14:19
Forum : Tous les Pockets
Sujet : Différences Sharp PC-G850 V/VS
Réponses : 3
Vues : 6700

Différences Sharp PC-G850 V/VS

Bonjour,

je viens de transférer plusieurs sources (via ma EA-129C - très pratique !) depuis un G850V vers un G850VS.
Après plusieurs essais de rapidité (exécution de programmes BASIC avec calculs, graphismes,..., assemblage d'un source assembleur assez long, exécution de programmes en langage machine,...) : je ne vois absolument aucune différence de rapidité entre les 2 machines alors que je croyais que le VS était plus rapide. J'ai pu qualifier au passage une compatibilité totale du point de vue de mes programmes.
J'ai dû notamment mal interpréter le fameux article de Charognard sur le PC-G850 où il y a page 16 un tableau comparatif de rapidités, avec un PC-G850V(c) plus rapide que le PC-G850V. Quelqu'un sait à quoi correspond ce (c) dans le tableau ?
Finalement, le VS n'est-il qu'un V produit plus récemment par Sharp mais absolument identique ?
Merci de vos lumières

Sharpounet

Aller à la recherche avancée