YM_player

[Zorro]

pour les plus vieux, Ym est un format de music qui avait court entre autre sur Atari St,Amstrad etc...
un bon site pour en recuperer :
http://www.genesis8bit.fr/frontend/music.php

je suis un peut Le musée des vieux codes

et un code nommé YM Engine By Leonard avait été fait en PureBasic Version 3.81
celui-si avait été repris par KarlKox , et mis a jour pour la Version 3.81

bon apres une bonne heure de boulot , voici le code transformé en Purebasic 5.71 par mes soins
comme ce code utilise une DLL j'ai du faire une Archive pour que vous ayez tout
j'en ai profité pour ajouter quelques fichier *.ym pour le test

l'archive est ici , j'ai aussi deja compilé le prg si vous voulez tester sans attendre

http://michel.dobro.free.fr/Purebasic/YmPlayer-PB.zip

[zaphod_b]

Pour afficher les infos en unicode (lignes 149-153) et a compiler en x86 à cause de la DLL :

Code : Tout sélectionner

SetGadgetText(#title, PeekS(info\pSongName,-1,#PB_Ascii))   
SetGadgetText(#artist, PeekS(info\pSongAuthor,-1,#PB_Ascii))    
SetGadgetText(#comment, PeekS(info\pSongComment,-1,#PB_Ascii))            
SetGadgetText(#type, PeekS(info\pSongType,-1,#PB_Ascii))     
SetGadgetText(#replayer, PeekS(info\pSongPlayer,-1,#PB_Ascii))      

[Zorro]

j'avais essayé ça, mais chez moi ça n'avait pas marché ....
peut etre encore une incompatibilité avec mon IDE ....

et Fred qui disait que l'unicode ne posait pas de probleme

[Kwai chang caine]

Il avait raison...qu'est ce qui cause des problèmes à FRED en prog dans PB ??? si ce n'est ceux qui l'utilise

Edit: Sympas, on se croirait en plein jeu de mes années de jeunesse.
Moi le bouton open, je l'aurais mis à gauche...mais c'est cool
Merci Zorro

[jmg49]

Merci, il est très bien ce player,

YmPlugin.pbi fait bien le boulot, je l'utiliserai certainement pour de prochains codes,