Play .pt3 files

[Duefectu]

Hello, based on the megaman-sample, I'm trying to play a .pt3 ong with this code:

`' MusicTest

include

print at 0,0;"Music Test";

MusicTest()

dim n as uinteger Bucle: for n=0 to 10000 print at 1,0;n;" " next n goto Bucle

sub MusicTest() ASM di END ASM

MMU8(7,46)
LoadSD("ptplay000",$e000,1617,0)        ' File from MegaMan demo
LoadSD("Music.1.pt3",$E86e,3000,0)  ' My pt3 file

asm 
;ld bc,65533 : ld a,254 : out (c),a 
call $e000
;ld bc,65533 : ld a,255 : out (c),a
end asm 

end sub `

I attached all the sample files. Thanks for your time!

MusicTest.zip

[Duefectu]

I solved!