Code
Decode"music.mp3"
soundMM=LoadSound("Temp.bin")
PlaySound soundMM
Repeat
Until KeyHit(1)
End
Function Decode(Filename$)
FileBuffer = CreateBank(FileSize(Filename))
File = OpenFile(Filename)
Size = FileSize(Filename)
ReadBytes FileBuffer,File,0,Size
CloseFile File
File=WriteFile("Temp.bin")
WriteBytes FileBuffer,File,0,Size
CloseFile File
FreeBank FileBuffer
End Function
Вот держи код!!! Опишу суть кода, Функция Decode(Filename$) у нас отвечает за считывание файла и тут же его сохронения без потери данных, при сохранение можешь использовать любой формат хоть bb после функцию Decode(Filename$) вызываешь в коде программы только уже с считаным файлом и сохраненным, в моем примере этот файл Temp.bin ну а дальше взависимости что у тебя за файл, в моем примере это файл с раширением mp3 после чего он же становиться temp.bin далее вызываю temp.bin как обыкновенный музыкальный файл...Расписывать я конечно не ас но думаю суть понял