41 lines
739 B
C
41 lines
739 B
C
/**
|
|
* Copyright (c) 2017 rxi
|
|
*
|
|
* This library is free software; you can redistribute it and/or modify it
|
|
* under the terms of the MIT license. See LICENSE for details.
|
|
*/
|
|
|
|
#include <dos.h>
|
|
#include <time.h>
|
|
#include "luaobj.h"
|
|
#include "vgm.h"
|
|
|
|
int l_vgm_load(lua_State *L) {
|
|
const char *filename = luaL_checkstring(L, 1);
|
|
const char *err = VgmLoad(filename);
|
|
if (err)
|
|
luaL_error(L, err);
|
|
return 1;
|
|
}
|
|
|
|
int l_vgm_play(lua_State *L) {
|
|
VgmPlay();
|
|
return 1;
|
|
}
|
|
|
|
int l_vgm_stop(lua_State *L) {
|
|
VgmStop();
|
|
return 1;
|
|
}
|
|
|
|
int luaopen_vgm(lua_State *L) {
|
|
luaL_Reg reg[] = {
|
|
{"VgmLoad", l_vgm_load},
|
|
{"VgmPlay", l_vgm_play},
|
|
{"VgmStop", l_vgm_stop},
|
|
{0, 0},
|
|
};
|
|
luaL_newlib(L, reg);
|
|
return 1;
|
|
}
|