jurjen.ladeniusandClaude Opus 4.8
f3340e86c6
Co-Authored-By: Claude Opus 4.8 <noreply@anthropic.com>
84 lines
2.9 KiB
C
84 lines
2.9 KiB
C
// ────────────────────────────────────────────────────────────────────────────
|
|
// MSXgl example (lVGM variant): play a *light-VGM* track, the MSX-optimized,
|
|
// heavily compressed form of VGM (typically 75-85% smaller than plain VGM).
|
|
// Produce music_lvgm.h from a .vgm with MSXgl's MSXzip tool:
|
|
// MSXzip your.vgm -lVGM -c -o music_lvgm.h -t g_Music
|
|
//
|
|
// Build (from MSXgl/projects/samples/, after copying these files there):
|
|
// bash build.sh s_mymusic_lvgm (Windows: build.bat s_mymusic_lvgm)
|
|
// Run (PSG): openmsx -machine C-BIOS_MSX2+ -cart out/s_mymusic_lvgm.rom
|
|
// Run (MSX-Music): openmsx -machine C-BIOS_MSX2+ -ext fmpac -cart out/s_mymusic_lvgm.rom
|
|
// ────────────────────────────────────────────────────────────────────────────
|
|
#include "msxgl.h"
|
|
#include "psg.h"
|
|
#include "vgm/lvgm_player.h"
|
|
#if (LVGM_USE_SCC)
|
|
#include "scc.h"
|
|
#endif
|
|
#if (LVGM_USE_MSXMUSIC)
|
|
#include "msx-music.h"
|
|
#endif
|
|
#if (LVGM_USE_MSXAUDIO)
|
|
#include "msx-audio.h"
|
|
#endif
|
|
|
|
// Your music as a compressed lVGM C array (g_Music[]), made with MSXzip -lVGM
|
|
#include "music_lvgm.h"
|
|
|
|
#define MSX_GL "\x02\x03\x04\x05"
|
|
#include "font/font_mgl_sample8.h"
|
|
|
|
//-----------------------------------------------------------------------------
|
|
// Program entry point
|
|
void main()
|
|
{
|
|
// Screen
|
|
VDP_SetMode(VDP_MODE_SCREEN1);
|
|
VDP_SetColor2(COLOR_BLACK, COLOR_WHITE);
|
|
VDP_ClearVRAM();
|
|
VDP_EnableVBlank(TRUE);
|
|
|
|
// Init the chips the lVGM player can drive (compiled in via LVGM_USE_*)
|
|
#if (LVGM_USE_SCC)
|
|
SCC_Initialize();
|
|
#endif
|
|
#if (LVGM_USE_MSXMUSIC)
|
|
MSXMusic_Initialize();
|
|
#endif
|
|
#if (LVGM_USE_MSXAUDIO)
|
|
MSXAudio_Initialize();
|
|
#endif
|
|
|
|
// Title
|
|
Print_SetTextFont(g_Font_MGL_Sample8, 1);
|
|
Print_DrawText(MSX_GL " MY MSX MUSIC (lVGM)");
|
|
Print_DrawLineH(0, 1, 32);
|
|
|
|
// Start playing (loop = TRUE) and report what the header decoded to
|
|
bool ok = LVGM_Play(g_Music, TRUE);
|
|
|
|
Print_SetPosition(0, 3);
|
|
Print_DrawFormat("Loaded: %s\n", ok ? "OK" : "INVALID");
|
|
Print_DrawFormat("Freq: %i Hz\n", (g_LVGM_Header->Option & LVGM_OPTION_50HZ) ? 50 : 60);
|
|
Print_DrawFormat("PSG: %c\n", (LVGM_GetDevices() & LVGM_CHIP_PSG) ? '\x0C' : '\x0B');
|
|
Print_DrawFormat("MSX-Mus: %c\n", (LVGM_GetDevices() & LVGM_CHIP_OPLL) ? '\x0C' : '\x0B');
|
|
Print_DrawFormat("Size: %i bytes\n", (u16)sizeof(g_Music));
|
|
|
|
Print_SetPosition(0, 10);
|
|
Print_DrawText("Playing (lVGM), looping...");
|
|
|
|
// Main loop: advance the player once per frame (60 Hz)
|
|
u8 anim = 0;
|
|
while (1)
|
|
{
|
|
Halt(); // wait for VBlank
|
|
LVGM_Decode(); // play one frame of lVGM
|
|
#if (PSG_ACCESS == PSG_INDIRECT)
|
|
PSG_Apply();
|
|
#endif
|
|
|
|
Print_SetPosition(31, 0);
|
|
Print_DrawChar("|/-\\"[(anim++ >> 3) & 3]);
|
|
}
|
|
}
|