[NEW] Audio support:

- playmusic(filename)
- pausemusic()
- resumemusic()
- stopmusic()

lua.cpp

@@ -638,6 +638,27 @@ extern "C" {
         return 1;
     }
 
+    static int cpp_playmusic(lua_State *L) {
+        const char* str = luaL_checkstring(L, 1);
+        playmusic(str);
+        return 0;
+    }
+
+    static int cpp_pausemusic(lua_State *L) {
+        pausemusic();
+        return 0;
+    }
+
+    static int cpp_resumemusic(lua_State *L) {
+        resumemusic();
+        return 0;
+    }
+
+    static int cpp_stopmusic(lua_State *L) {
+        stopmusic();
+        return 0;
+    }
+
 }
 
 lua_State *L;
@@ -732,6 +753,11 @@ void push_lua_funcs() {
     lua_pushcfunction(L,cpp_freadw);    lua_setglobal(L, "freadw");
     lua_pushcfunction(L,cpp_freadb);    lua_setglobal(L, "freadb");
 
+    lua_pushcfunction(L,cpp_playmusic);    lua_setglobal(L, "playmusic");
+    lua_pushcfunction(L,cpp_pausemusic);    lua_setglobal(L, "pausemusic");
+    lua_pushcfunction(L,cpp_resumemusic);    lua_setglobal(L, "resumemusic");
+    lua_pushcfunction(L,cpp_stopmusic);    lua_setglobal(L, "stopmusic");
+
     lua_pushinteger(L, 0);              lua_setglobal(L, "KEY_UNKNOWN");
     lua_pushinteger(L, 4);              lua_setglobal(L, "KEY_A");
     lua_pushinteger(L, 5);              lua_setglobal(L, "KEY_B");