Amstrad Plus Index du Forum

Amstrad Plus
Découverte de la gamme Old et Plus des Cpc d'Amstrad.

 FAQFAQ   RechercherRechercher   MembresMembres   GroupesGroupes   S’enregistrerS’enregistrer 
 ProfilProfil   Se connecter pour vérifier ses messages privésSe connecter pour vérifier ses messages privés   ConnexionConnexion 

Lz49 / Crunch-Decrunch

 
Poster un nouveau sujet   Répondre au sujet    Amstrad Plus Index du Forum -> Bienvenue sur ce forum -> Programmation
Sujet précédent :: Sujet suivant  
Auteur Message
Ast
Administrateur

Hors ligne

Inscrit le: 05 Sep 2014
Messages: 1 779

MessagePosté le: Mer 25 Jan - 10:47 (2017)    Sujet du message: Lz49 / Crunch-Decrunch Répondre en citant

Salut Roudoudou,

Une question concernant ton lz49crunch/decrunch. J'ai fait quelques tests aujourd'hui en essayant de compresser une page écran.

Pour la partie Crunch : (j'ai laissé volontairement l'adresse que tu avais défini)

call&9000,&c000,&4000 -> Cela devrait compresser normalement les datas contenus à partir de #c000 avec une longueur de #4000
----
Après quelques minutes, il m'affiche que le fichier compressé à une longueur de #585 !
J'ai donc sauvegardé (bank #c0) à partir de #4000 avec une longueur de #585.

1. Le fichier compressé est il présent en #4000 ? Sinon, à partir de quelle adresse ?

Ensuite, j'ai essayé la partie "Decrunching" avec la commande suivante :

call&8000,&4000,&c000 -> Cela devrait décompresser les données à partir de l'adresse source #4000 en destination de #c000 (bank #c0)

Résultat : Une grosse bouse à l'écran...

Où ai-je merdé ? Merci de ta réponse! Okay
_________________
Ast/iMP4CT

"Par le pouvoir du crâne ancestral...."


Revenir en haut
Publicité






MessagePosté le: Mer 25 Jan - 10:47 (2017)    Sujet du message: Publicité

PublicitéSupprimer les publicités ?
Revenir en haut
Ast
Administrateur

Hors ligne

Inscrit le: 05 Sep 2014
Messages: 1 779

MessagePosté le: Mer 25 Jan - 11:28 (2017)    Sujet du message: Lz49 / Crunch-Decrunch Répondre en citant

Roudoudou a écrit:

The crunching routine read data to compress from central memory and put compressed data in extension C4/C5/C6/C7



J'ai bien évidemment essayé de sauvegarder en bank #c4, vu la longueur du fichier compressé (#585) mais cela ne fonctionne toujours pas!
_________________
Ast/iMP4CT

"Par le pouvoir du crâne ancestral...."


Revenir en haut
roudoudou


Hors ligne

Inscrit le: 14 Juil 2016
Messages: 118
Localisation: LYON

MessagePosté le: Mer 25 Jan - 12:43 (2017)    Sujet du message: Lz49 / Crunch-Decrunch Répondre en citant

envoie moi le fichier pour analyse (si c'est pas top secret) je n'ai eu aucun souci jusqu'à présent et je l'utilise toujours


sans faire de sauvegarde, tu peux tester rapidement (d'où les adresses #8000 et #9000 dans mes sources pour les routines)


call #9000,#C000,#4000
out &7f00,&C4
call #8000,#4000,#C000


le fichier en sortie est dans les banks supérieures C4 et éventuellement C5, C6, ...


les deux derniers octets sont (de mémoire) systématiquement #00,#FF


le premier octet est systématiquement le même entre la source et la destination Smile


Revenir en haut
Ast
Administrateur

Hors ligne

Inscrit le: 05 Sep 2014
Messages: 1 779

MessagePosté le: Mer 25 Jan - 12:47 (2017)    Sujet du message: Lz49 / Crunch-Decrunch Répondre en citant

Bin ca ne marche pas !
Le fichier n'est pas top secret:)
J'utilise le code .asm direct sur Cpc.
_________________
Ast/iMP4CT

"Par le pouvoir du crâne ancestral...."


Revenir en haut
roudoudou


Hors ligne

Inscrit le: 14 Juil 2016
Messages: 118
Localisation: LYON

MessagePosté le: Mer 25 Jan - 12:54 (2017)    Sujet du message: Lz49 / Crunch-Decrunch Répondre en citant

si le fichier n'est pas top secret, tu as mon mail que je puisse analyser quel est le problème Smile

Revenir en haut
Ast
Administrateur

Hors ligne

Inscrit le: 05 Sep 2014
Messages: 1 779

MessagePosté le: Mer 25 Jan - 12:57 (2017)    Sujet du message: Lz49 / Crunch-Decrunch Répondre en citant

Je t'envoie ça ! Dsk :-)
_________________
Ast/iMP4CT

"Par le pouvoir du crâne ancestral...."


Revenir en haut
Ast
Administrateur

Hors ligne

Inscrit le: 05 Sep 2014
Messages: 1 779

MessagePosté le: Mer 25 Jan - 13:25 (2017)    Sujet du message: Lz49 / Crunch-Decrunch Répondre en citant

Mail Envoyé !

run"test
_________________
Ast/iMP4CT

"Par le pouvoir du crâne ancestral...."


Revenir en haut
roudoudou


Hors ligne

Inscrit le: 14 Juil 2016
Messages: 118
Localisation: LYON

MessagePosté le: Mer 25 Jan - 21:02 (2017)    Sujet du message: Lz49 / Crunch-Decrunch Répondre en citant

1er test / Je n'ai aucun souci à compresser ton image -> #585 octets ni à la décompresser


2èm test / ton programme TEST.BAS semble OK; pour m'en assurer, j'ajoute une pause en 55 et je compile avec winape crunch et decrunch LZ49 -> RAS


comparaison de tes fichiers binaires avec les miens, le decrunch est plus court et après analyse, il manque le LDI au tout début de la fonction LZ49_decrunch Smile


regarde ton source ou le fichier assemblé, y a ptêtre un bug dans orgams?


ps: je suis allé vérifier que le source "officiel" sur cpcwiki est correct, c'est bien le cas Smile


Revenir en haut
Ast
Administrateur

Hors ligne

Inscrit le: 05 Sep 2014
Messages: 1 779

MessagePosté le: Mer 25 Jan - 21:07 (2017)    Sujet du message: Lz49 / Crunch-Decrunch Répondre en citant

Bizarre ça... la dernière version d'orgams semble merder...
_________________
Ast/iMP4CT

"Par le pouvoir du crâne ancestral...."


Revenir en haut
roudoudou


Hors ligne

Inscrit le: 14 Juil 2016
Messages: 118
Localisation: LYON

MessagePosté le: Mer 25 Jan - 21:25 (2017)    Sujet du message: Lz49 / Crunch-Decrunch Répondre en citant

fais un rapport à Madram Wink

Revenir en haut
Ast
Administrateur

Hors ligne

Inscrit le: 05 Sep 2014
Messages: 1 779

MessagePosté le: Mer 25 Jan - 21:39 (2017)    Sujet du message: Lz49 / Crunch-Decrunch Répondre en citant

T'inquiète, ca ca être fait!
_________________
Ast/iMP4CT

"Par le pouvoir du crâne ancestral...."


Revenir en haut
Ast
Administrateur

Hors ligne

Inscrit le: 05 Sep 2014
Messages: 1 779

MessagePosté le: Mer 25 Jan - 21:52 (2017)    Sujet du message: Lz49 / Crunch-Decrunch Répondre en citant

Je viens de comprendre l'erreur!
Comme tu ne mets aucun espaces, Orgams a prit ton Ldi pour un label.
Je l'avais vu avec d'autres instructions dans ton source et j'avais corrigé.
J'ai simplement oublier de le décaler d'un caractère pour qu'il soit prit pour une instruction plutôt qu'un label...
Hehehe!
_________________
Ast/iMP4CT

"Par le pouvoir du crâne ancestral...."


Revenir en haut
roudoudou


Hors ligne

Inscrit le: 14 Juil 2016
Messages: 118
Localisation: LYON

MessagePosté le: Mer 25 Jan - 22:02 (2017)    Sujet du message: Lz49 / Crunch-Decrunch Répondre en citant

arf, bah c'est de l'assembleur, pas du cobol !

Revenir en haut
Ast
Administrateur

Hors ligne

Inscrit le: 05 Sep 2014
Messages: 1 779

MessagePosté le: Mer 25 Jan - 22:15 (2017)    Sujet du message: Lz49 / Crunch-Decrunch Répondre en citant

Je regrette mais, aucun espace, c'est un label! Mort de Rire
_________________
Ast/iMP4CT

"Par le pouvoir du crâne ancestral...."


Revenir en haut
Ast
Administrateur

Hors ligne

Inscrit le: 05 Sep 2014
Messages: 1 779

MessagePosté le: Dim 5 Fév - 21:23 (2017)    Sujet du message: Lz49 / Crunch-Decrunch Répondre en citant

Test cet après-midi sur des aylists...
Longueur de l'aylist (utilisant des unités de pause, fonction "repeat") #64fa.
Une fois compressée, le fichier a une longueur de #18f2. Waaaaoooo!
La décompression est hyper rapide! Bravo.
Il faudra néanmoins que je vérifie le résultat une fois décompressé car j'ai l'impression que
Le résultat diffère légèrement... ca reste quand même à confirmer.
_________________
Ast/iMP4CT

"Par le pouvoir du crâne ancestral...."


Revenir en haut
Contenu Sponsorisé






MessagePosté le: Aujourd’hui à 13:54 (2017)    Sujet du message: Lz49 / Crunch-Decrunch

Revenir en haut
Montrer les messages depuis:   
Poster un nouveau sujet   Répondre au sujet    Amstrad Plus Index du Forum -> Bienvenue sur ce forum -> Programmation Toutes les heures sont au format GMT + 1 Heure
Page 1 sur 1

 
Sauter vers:  

Index | Panneau d’administration | Creer un forum | Forum gratuit d’entraide | Annuaire des forums gratuits | Signaler une violation | Conditions générales d'utilisation
Powered by phpBB © 2001, 2005 phpBB Group
Traduction par : phpBB-fr.com