PureBasic

Merci Zorro, ce sujet concerne pas mal de monde lorsque souhaite migrer de PB LTS vers la dernière version. Toutefois, même si ton exemple est fonctionnel, il me semble important de rappeler que la fonction Ascii() réserve un espace mémoire qu'il convient de libérer avec FreeMemory() si l'on en fait ...

Bonjour,
même si le topic n'est pas tout jeune, il se trouve que le sujet m'intéresse en ce moment. Ainsi, je me permet d'intervenir ici pour confirmer que le code de Guimauve ne fonctionne pas chez moi non plus. Du moins jusqu'à ce que je remplace ce petit point:
Case 2 ; Le bouton droit de la ...

Bonjour,
comme je cherchais une fonction de rotation à droite et que je ne l'ai pas trouvé ici, je vous propose la mienne:
Procedure.a Ror(valeur.a)
ProcedureReturn ((valeur >> 1) & %01111111) + ((valeur << 7) & %10000000)
EndProcedure
Si vous avez d'autre approche, je suis preneur.

C'est bon, j'ai compris d’où vient le problème!
Le code qui m'a servi de base est bogué (fallait y penser ...) !!
Après avoir corrigé le problème sur la réutilisation du dictionnaire, les données obtenu n'étaient toujours pas conforme et pour cause. Dans le code C la routine s'arrête dès que je ne ...

Merci pour l'astuce, elle devrait me reservir même si le commentaire de la notice laisse un doute sur sa viabilité:
"Si un entier est passé en argument et que sa valeur est grande une perte de précision sera constatée"
c'est un peu flou tout de même ...

Ce qui est dommage en fait, c'est que PB ne ...

Je viens de trouver une "erreur" dans ma conversion:
no_clear_flag = $01 & 1
...
If ~no_clear_flag
dans le code en C la variable no_clear_flag est un integer non signé et il semble que lorsque l'on fait un NOT sur cette variable=1 alors le résultat est 0. Elle se comporte donc comme une variable ...

Justement c'est une des question que je me pose ... il s'agit dans pour mon problème du mode de compression QUICK de DMS et à part l'algo LZH utilisé pour le mode HEAVY 1/2 et le RLE pour le mode SIMPLE, pour le reste je ne sais pas...

Je travail sur une routine alternative pour voir ....

ça m’intéresse ce que tu fais, mais malheureusement le C n'est pas de mon rayon :s
Dommage en effet :wink:

Aurais-tu plus d'infos sur la formule mathématique utilisée ?

J'ai un doute sur la traduction de

control += *source++ << (8 + shift);
control += *source++ << shift;


C'est le *source ...

Bonjour,
j'ai adapté, pour les besoins de mon projet, une routine de décompression écrite à l'origine en C. Je pense l'avoir pas trop mal converti mais je rencontre un problème que je n'arrive pas à identifier. La décompression est correcte à 99% mais ce n'est pas un résultat acceptable, vous en ...

Je l'ai lu et t'en remercie. J'avais précédemment fait des recherches par google (je sais c'est le mal, sic) avant de m'inscrire sur le forum pour le présent sujet. Je n'ai donc pas effectué de recherche pour ces deux fonctions par les fonction buildin du forum :oops:

J'utilise ces deux fonctions ...

J'ai cherché, certainement pas comme il faut, et suis tombé le plus souvent sur des solution ASM. Je ne critique pas le langage lui même, c'est juste que l'utilisation qu'en font les utilisateurs, certainement en quête de performance, amène à des solutions 100% Inteloutside :twisted: alors qu'à ...

Crashdisk a écrit :Pas cool pour un langage qui se veut portable...

non?

Merci à tous pour vos pistes et éléments de réponse.
J'avais déjà compris que le goto, c'était le mal et je n'en utilise pas, par ailleurs, un avertissement est présent dans l'aide.
Je trouve par contre dommage qu'il n'y est pas de note sur le fait que le couple Select/EndSelect ne devrait pas être ...

G-Rom a écrit :Bonjour et bienvenu(e)

Break

Break?! Break arrêt une boucle et là dans mon exemple il n'y en a pas...
C'était votre réponse ou juste une façon de m'envoyer balader....?

Bonjour,
je suis confronté à un problème lors que je suis entre la fonction "Select" et "EndSelect".
Lorsque je suis avec une valeur=1 pas de problème mais dès que je fais un "Return" avant le "EndSelect" avec valeur=2 ou 3 ça "plante"!
Si une solution est facile à trouver, j'aurai voulu comprendre ...