diff --git a/apps/openmw-mp/CMakeLists.txt b/apps/openmw-mp/CMakeLists.txt
index 75389e2b8..9a90bd744 100644
--- a/apps/openmw-mp/CMakeLists.txt
+++ b/apps/openmw-mp/CMakeLists.txt
@@ -7,7 +7,6 @@ if(UNIX) #temporarily disabled for non-unix
     endif(NOT (${CMAKE_CXX_COMPILER} MATCHES "aarch64" OR ${CMAKE_CXX_COMPILER} MATCHES "arm"))
 endif(UNIX)
 
-option(BUILD_WITH_PAWN "Enable Pawn language" OFF)
 option(ENABLE_BREAKPAD "Enable Google Breakpad for Crash reporting" OFF)
 
 if(ENABLE_BREAKPAD)
@@ -22,25 +21,6 @@ if(ENABLE_BREAKPAD)
     include_directories(${CMAKE_SOURCE_DIR}/extern/breakpad/src ${Breakpad_Headers})
 endif(ENABLE_BREAKPAD)
 
-if(BUILD_WITH_PAWN)
-
-    add_subdirectory(amx)
-
-    #set(Pawn_ROOT ${CMAKE_SOURCE_DIR}/external/pawn/)
-    set(Pawn_INCLUDES ${Pawn_ROOT}/include)
-    set(Pawn_LIBRARY ${Pawn_ROOT}/lib/libamx.a)
-    set(PawnScript_Sources
-            Script/LangPawn/LangPAWN.cpp
-            Script/LangPawn/PawnFunc.cpp)
-    set(PawnScript_Headers ${Pawn_INCLUDES}
-            Script/LangPawn/LangPAWN.hpp
-            )
-
-    set(CMAKE_CXX_FLAGS "${CMAKE_CXX_FLAGS} -DENABLE_PAWN -DPAWN_CELL_SIZE=64")
-    #include_directories(${Pawn_INCLUDES})
-    include_directories("./amx/linux")
-endif(BUILD_WITH_PAWN)
-
 option(BUILD_WITH_LUA "Enable Terra/Lua language" ON)
 option(FORCE_LUA "Use Lua instead Terra" OFF)
 if(BUILD_WITH_LUA)
@@ -93,7 +73,6 @@ set(SERVER
     Script/Functions/Timer.cpp
 
     Script/API/TimerAPI.cpp Script/API/PublicFnAPI.cpp
-        ${PawnScript_Sources}
         ${LuaScript_Sources}
         ${NativeScript_Sources}
 
@@ -103,7 +82,6 @@ set(SERVER_HEADER
         Script/Types.hpp Script/Script.hpp Script/SystemInterface.hpp
         Script/ScriptFunction.hpp Script/Platform.hpp Script/Language.hpp
         Script/ScriptFunctions.hpp Script/API/TimerAPI.hpp Script/API/PublicFnAPI.hpp
-        ${PawnScript_Headers}
         ${LuaScript_Headers}
         ${NativeScript_Headers}
         ${CallFF_INCLUDES}
@@ -194,7 +172,6 @@ target_link_libraries(tes3mp-server
     components
     ${Terra_LIBRARY}
     ${LUA_LIBRARIES}
-    ${Pawn_LIBRARY}
     ${Breakpad_Library}
     ${CallFF_LIBRARY}
 )
diff --git a/apps/openmw-mp/Script/API/PublicFnAPI.cpp b/apps/openmw-mp/Script/API/PublicFnAPI.cpp
index 471d49e2f..c0bc713d8 100644
--- a/apps/openmw-mp/Script/API/PublicFnAPI.cpp
+++ b/apps/openmw-mp/Script/API/PublicFnAPI.cpp
@@ -25,14 +25,6 @@ Public::Public(ScriptFuncLua _public, lua_State *lua, const std::string &name, c
     publics.emplace(name, this);
 }
 
-#if defined(ENABLE_PAWN)
-Public::Public(ScriptFuncPAWN _public, AMX* amx, const std::string& name, char ret_type, const std::string& def): ScriptFunction(_public, amx, ret_type, def)
-{
-    publics.emplace(name, this);
-}
-#endif
-
-
 boost::any Public::Call(const std::string &name, const std::vector<boost::any> &args)
 {
     auto it = publics.find(name);
@@ -67,21 +59,6 @@ bool Public::IsLua(const std::string &name)
 #endif
 }
 
-bool Public::IsPAWN(const std::string &name)
-{
-#if !defined(ENABLE_PAWN)
-    return false;
-#else
-    auto it = publics.find(name);
-
-    if (it == publics.end())
-        throw runtime_error("Public with name \"" + name + "\" does not exist");
-
-    return it->second->script_type == SCRIPT_PAWN;
-#endif
-}
-
-
 void Public::DeleteAll()
 {
     for (auto it = publics.begin(); it != publics.end(); it++)
diff --git a/apps/openmw-mp/Script/API/PublicFnAPI.hpp b/apps/openmw-mp/Script/API/PublicFnAPI.hpp
index cd49185cf..84ceb1dae 100644
--- a/apps/openmw-mp/Script/API/PublicFnAPI.hpp
+++ b/apps/openmw-mp/Script/API/PublicFnAPI.hpp
@@ -17,9 +17,6 @@ private:
     static std::unordered_map<std::string, Public *> publics;
 
     Public(ScriptFunc _public, const std::string &name, char ret_type, const std::string &def);
-#if defined(ENABLE_PAWN)
-    Public(ScriptFuncPAWN _public, AMX* amx, const std::string& name, char ret_type, const std::string& def);
-#endif
 #if defined(ENABLE_LUA)
     Public(ScriptFuncLua _public, lua_State *lua, const std::string &name, char ret_type, const std::string &def);
 #endif
@@ -33,7 +30,6 @@ public:
 
     static const std::string& GetDefinition(const std::string& name);
 
-    static bool IsPAWN(const std::string &name);
     static bool IsLua(const std::string &name);
 
     static void DeleteAll();
diff --git a/apps/openmw-mp/Script/API/TimerAPI.cpp b/apps/openmw-mp/Script/API/TimerAPI.cpp
index bdaf91f74..7489497d9 100644
--- a/apps/openmw-mp/Script/API/TimerAPI.cpp
+++ b/apps/openmw-mp/Script/API/TimerAPI.cpp
@@ -17,14 +17,6 @@ Timer::Timer(ScriptFunc callback, long msec, const std::string& def, std::vector
     end = true;
 }
 
-#if defined(ENABLE_PAWN)
-Timer::Timer(AMX *amx, ScriptFuncPAWN callback, long msec, const std::string &def, std::vector<boost::any> args): ScriptFunction(callback, amx, 'v', def)
-{
-    targetMsec = msec;
-    this->args = args;
-    end = true;
-}
-#endif
 #if defined(ENABLE_LUA)
 Timer::Timer(lua_State *lua, ScriptFuncLua callback, long msec, const std::string& def, std::vector<boost::any> args): ScriptFunction(callback, lua, 'v', def)
 {
@@ -77,30 +69,6 @@ void Timer::Start()
 int TimerAPI::pointer = 0;
 std::unordered_map<int, Timer* > TimerAPI::timers;
 
-#if defined(ENABLE_PAWN)
-int TimerAPI::CreateTimerPAWN(AMX *amx, ScriptFuncPAWN callback, long msec, const string& def, std::vector<boost::any> args)
-{
-    int id = -1;
-
-    for (auto timer : timers)
-    {
-        if (timer.second != nullptr)
-            continue;
-        timer.second = new Timer(amx, callback, msec, def, args);
-        id = timer.first;
-    }
-
-    if (id == -1)
-    {
-        timers[pointer] = new Timer(amx, callback, msec, def, args);
-        id = pointer;
-        pointer++;
-    }
-
-    return id;
-}
-#endif
-
 #if defined(ENABLE_LUA)
 int TimerAPI::CreateTimerLua(lua_State *lua, ScriptFuncLua callback, long msec, const std::string& def, std::vector<boost::any> args)
 {
diff --git a/apps/openmw-mp/Script/API/TimerAPI.hpp b/apps/openmw-mp/Script/API/TimerAPI.hpp
index eec896f6e..b20be12d6 100644
--- a/apps/openmw-mp/Script/API/TimerAPI.hpp
+++ b/apps/openmw-mp/Script/API/TimerAPI.hpp
@@ -22,9 +22,6 @@ namespace mwmp
     public:
 
         Timer(ScriptFunc callback, long msec, const std::string& def, std::vector<boost::any> args);
-#if defined(ENABLE_PAWN)
-        Timer(AMX *amx, ScriptFuncPAWN callback, long msec, const std::string& def, std::vector<boost::any> args);
-#endif
 #if defined(ENABLE_LUA)
         Timer(lua_State *lua, ScriptFuncLua callback, long msec, const std::string& def, std::vector<boost::any> args);
 #endif
@@ -45,9 +42,6 @@ namespace mwmp
     class TimerAPI
     {
     public:
-#if defined(ENABLE_PAWN)
-        static int CreateTimerPAWN(AMX *amx, ScriptFuncPAWN callback, long msec, const std::string& def, std::vector<boost::any> args);
-#endif
 #if defined(ENABLE_LUA)
         static int CreateTimerLua(lua_State *lua, ScriptFuncLua callback, long msec, const std::string& def, std::vector<boost::any> args);
 #endif
diff --git a/apps/openmw-mp/Script/Functions/Worldstate.cpp b/apps/openmw-mp/Script/Functions/Worldstate.cpp
index 2379263e2..7204c07df 100644
--- a/apps/openmw-mp/Script/Functions/Worldstate.cpp
+++ b/apps/openmw-mp/Script/Functions/Worldstate.cpp
@@ -4,6 +4,7 @@
 #include <apps/openmw-mp/Networking.hpp>
 #include <apps/openmw-mp/Player.hpp>
 #include <apps/openmw-mp/Script/ScriptFunctions.hpp>
+#include <fstream>
 
 #include "Worldstate.hpp"
 
diff --git a/apps/openmw-mp/Script/LangPawn/LangPAWN.cpp b/apps/openmw-mp/Script/LangPawn/LangPAWN.cpp
deleted file mode 100644
index f80d72532..000000000
--- a/apps/openmw-mp/Script/LangPawn/LangPAWN.cpp
+++ /dev/null
@@ -1,458 +0,0 @@
-//
-// Created by koncord on 08.05.16.
-//
-
-#include "LangPAWN.hpp"
-
-
-#include <amxmodules.h>
-#include <amxaux.h>
-#include "Script.hpp"
-
-using namespace std;
-
-typedef long NetworkID;
-
-static vector<vector<char>> strings;
-static vector<pair<cell*, double>> floats;
-static pair<cell*, NetworkID*> data = {nullptr, nullptr};
-
-void free_strings() noexcept {
-    strings.clear();
-}
-
-void free_floats() noexcept {
-    for (const auto& value : floats)
-        *value.first = amx_ftoc(value.second);
-
-    floats.clear();
-}
-
-void free_data(unsigned int size) noexcept {
-    if (data.first && data.second)
-        for (unsigned int i = 0; i < size; ++i)
-            data.first[i] = data.second[i];
-
-    data.first = nullptr;
-    data.second = nullptr;
-}
-
-void after_call() noexcept {
-    free_strings();
-    free_floats();
-}
-
-template<typename R>
-void after_call(const R&) noexcept {
-    free_strings();
-    free_floats();
-}
-
-template<>
-void after_call(const unsigned int& result) noexcept {
-    free_strings();
-    free_floats();
-    free_data(result);
-}
-
-template<typename R, unsigned int I, unsigned int F>
-struct PAWN_extract_ {
-    inline static R PAWN_extract(AMX*&&, const cell*&& params) noexcept {
-        return static_cast<R>(forward<const cell*>(params)[I]);
-    }
-};
-
-template<unsigned int I, unsigned int F>
-struct PAWN_extract_<void*, I, F>
-{
-    inline static void* PAWN_extract(AMX *&&amx, const cell *&&params) noexcept
-    {
-        return amx_Address(amx, forward<const cell *>(params)[I]); // fixme: I'm not sure in this fix
-    }
-};
-
-template<unsigned int I, unsigned int F>
-struct PAWN_extract_<double, I, F> {
-    inline static double PAWN_extract(AMX*&&, const cell*&& params) noexcept {
-        return amx_ctof(forward<const cell*>(params)[I]);
-    }
-};
-
-template<unsigned int I, unsigned int F>
-struct PAWN_extract_<const char*, I, F> {
-    inline static const char* PAWN_extract(AMX*&& amx, const cell*&& params) noexcept {
-        int len;
-        cell* source;
-
-        source = amx_Address(amx, params[I]);
-        amx_StrLen(source, &len);
-
-        strings.emplace_back(len + 1);
-        char* value = &strings.back()[0];
-        amx_GetString(value, source, 0, UNLIMITED);
-
-        return value;
-    }
-};
-
-template<unsigned int I, unsigned int F>
-struct PAWN_extract_<double*, I, F> {
-    inline static double* PAWN_extract(AMX*&& amx, const cell*&& params) noexcept {
-        floats.emplace_back(amx_Address(amx, params[I]), 0.00);
-        return &floats.back().second;
-    }
-};
-
-template<unsigned int I, unsigned int F>
-struct PAWN_extract_<NetworkID**, I, F> {
-    inline static NetworkID** PAWN_extract(AMX*&& amx, const cell*&& params) noexcept {
-        constexpr ScriptFunctionData const& F_ = ScriptFunctions::functions[F];
-        static_assert(F_.func.numargs == I, "NetworkID** must be the last parameter");
-        data.first = amx_Address(amx, params[I]);
-        return &data.second;
-    }
-};
-
-template<unsigned int I, unsigned int F>
-struct PAWN_dispatch_ {
-    template<typename R, typename... Args>
-    inline static R PAWN_dispatch(AMX*&& amx, const cell*&& params, Args&&... args) noexcept {
-        constexpr ScriptFunctionData const& F_ = ScriptFunctions::functions[F];
-        auto arg = PAWN_extract_<typename CharType<F_.func.types[I - 1]>::type, I, F>::PAWN_extract(forward<AMX*>(amx), forward<const cell*>(params));
-        return PAWN_dispatch_<I - 1, F>::template PAWN_dispatch<R>(
-                forward<AMX*>(amx),
-                forward<const cell*>(params),
-                arg,
-                forward<Args>(args)...);
-    }
-};
-
-template<unsigned int F>
-struct PAWN_dispatch_<0, F> {
-    template<typename R, typename... Args>
-    inline static R PAWN_dispatch(AMX*&&, const cell*&&, Args&&... args) noexcept {
-        constexpr ScriptFunctionData const& F_ = ScriptFunctions::functions[F];
-        return reinterpret_cast<FunctionEllipsis<R>>(F_.func.addr)(forward<Args>(args)...);
-    }
-};
-
-template<unsigned int I>
-static typename enable_if<ScriptFunctions::functions[I].func.ret == 'v', cell>::type wrapper(AMX* amx, const cell* params) noexcept {
-    PAWN_dispatch_<ScriptFunctions::functions[I].func.numargs, I>::template PAWN_dispatch<void>(forward<AMX*>(amx), forward<const cell*>(params));
-    after_call();
-    return 1;
-}
-
-template<unsigned int I>
-static typename enable_if<ScriptFunctions::functions[I].func.ret == 'f', cell>::type wrapper(AMX* amx, const cell* params) noexcept {
-    double value = PAWN_dispatch_<ScriptFunctions::functions[I].func.numargs, I>::template PAWN_dispatch<double>(forward<AMX*>(amx), forward<const cell*>(params));
-    after_call();
-    return amx_ftoc(value);
-}
-
-template<unsigned int I>
-static typename enable_if<ScriptFunctions::functions[I].func.ret == 's', cell>::type wrapper(AMX* amx, const cell* params) noexcept {
-    const char* value = PAWN_dispatch_<ScriptFunctions::functions[I].func.numargs, I>::template PAWN_dispatch<const char*>(forward<AMX*>(amx), forward<const cell*>(params));
-    after_call();
-
-    if (value) {
-        cell* dest = amx_Address(amx, params[ScriptFunctions::functions[I].func.numargs + 1]);
-        amx_SetString(dest, value, 1, 0, strlen(value) + 1);
-        return 1;
-    }
-
-    return 0;
-}
-
-template<unsigned int I>
-static typename enable_if<ScriptFunctions::functions[I].func.ret != 'v' && ScriptFunctions::functions[I].func.ret != 'f' && ScriptFunctions::functions[I].func.ret != 's', cell>::type wrapper(AMX* amx, const cell* params) noexcept {
-    auto result = PAWN_dispatch_<ScriptFunctions::functions[I].func.numargs, I>::template PAWN_dispatch<typename CharType<ScriptFunctions::functions[I].func.ret>::type>(forward<AMX*>(amx), forward<const cell*>(params));
-    after_call(result);
-    return result;
-}
-
-template<unsigned int I> struct F_ { static constexpr AMX_NATIVE_INFO F{ScriptFunctions::functions[I].name, wrapper<I>}; };
-template<> struct F_<0> { static constexpr AMX_NATIVE_INFO F{"CreateTimer", LangPAWN::CreateTimer}; };
-template<> struct F_<1> { static constexpr AMX_NATIVE_INFO F{"CreateTimerEx", LangPAWN::CreateTimerEx}; };
-template<> struct F_<2> { static constexpr AMX_NATIVE_INFO F{"MakePublic", LangPAWN::MakePublic}; };
-template<> struct F_<3> { static constexpr AMX_NATIVE_INFO F{"CallPublic", LangPAWN::CallPublic}; };
-
-void LangPAWN::LoadProgram(const char *filename)
-{
-    int err = aux_LoadProgram(amx, filename, 0);
-    if (err != AMX_ERR_NONE)
-        throw runtime_error("PAWN script " + string(filename) + " error (" + to_string(err) + "): \"" + string(aux_StrError(err)) + "\"");
-
-    amx_CoreInit(amx);
-    amx_ConsoleInit(amx);
-    amx_FloatInit(amx);
-    amx_TimeInit(amx);
-    amx_StringInit(amx);
-    amx_FileInit(amx);
-
-    constexpr auto functions_n = sizeof(ScriptFunctions::functions) / sizeof(ScriptFunctions::functions[0]);
-
-    amx_Register(amx, functions(IndicesFor<functions_n>{}), functions_n); // TODO: throw if error
-
-}
-
-int LangPAWN::FreeProgram()
-{
-    int err = aux_FreeProgram(amx);
-    delete amx;
-    return err;
-}
-
-bool LangPAWN::IsCallbackPresent(const char *name)
-{
-    int idx;
-    return (amx_FindPublic(amx, name, &idx) == AMX_ERR_NONE);
-}
-
-boost::any LangPAWN::Call(const char *name, const char *argl, int buf, ...)
-{
-    va_list args;
-    va_start(args, buf);
-    cell ret = 0;
-    vector<pair<cell *, char *>> strings;
-
-    try
-    {
-        int idx = 0;
-        int err = 0;
-
-        err = amx_FindPublic(amx, name, &idx);
-
-        if (err != AMX_ERR_NONE)
-            throw runtime_error("PAWN runtime error (" + to_string(err) + "): \"" + string(aux_StrError(err)) + "\".");
-
-        unsigned int len = strlen(argl);
-        vector<cell> args_amx;
-
-        for (unsigned int i = 0; i < len; ++i)
-        {
-            switch (argl[i])
-            {
-                case 'i':
-                    args_amx.emplace_back(va_arg(args, unsigned
-                            int));
-                    break;
-
-                case 'q':
-                    args_amx.emplace_back(va_arg(args, signed
-                            int));
-                    break;
-
-                case 'l':
-                    args_amx.emplace_back(va_arg(args, unsigned
-                    long
-                            long));
-                    break;
-
-                case 'w':
-                    args_amx.emplace_back(va_arg(args, signed
-                    long
-                            long));
-                    break;
-
-                case 'f':
-                {
-                    double value = va_arg(args, double);
-                    args_amx.emplace_back(amx_ftoc(value));
-                    break;
-                }
-
-                case 'p':
-                    args_amx.emplace_back(reinterpret_cast<uintptr_t>(va_arg(args, void*)));
-                    break;
-
-                case 's':
-                    args_amx.emplace_back(reinterpret_cast<uintptr_t>(va_arg(args, char*)));
-                    break;
-
-                default:
-                    throw runtime_error("PAWN call: Unknown argument identifier " + argl[i]);
-            }
-        }
-
-        for (unsigned int i = len; i; --i)
-        {
-            switch (argl[i - 1])
-            {
-                case 's':
-                {
-                    char *string = reinterpret_cast<char *>(static_cast<unsigned int>(args_amx[i - 1]));
-                    cell *store;
-                    amx_PushString(amx, &store, string, 1, 0);
-                    strings.emplace_back(store, string);
-                    break;
-                }
-
-                default:
-                    amx_Push(amx, args_amx[i - 1]);
-                    break;
-            }
-        }
-
-        err = amx_Exec(amx, &ret, idx);
-
-        if (err != AMX_ERR_NONE)
-            throw runtime_error("PAWN runtime error (" + to_string(err) + "): \"" + string(aux_StrError(err)) + "\".");
-
-        if (buf != 0)
-            for (const auto &str : strings)
-                amx_GetString(str.second, str.first, 0, strlen(str.second) + 1);
-
-        if (!strings.empty())
-            amx_Release(amx, strings[0].first);
-    }
-
-    catch (...)
-    {
-        va_end(args);
-
-        if (!strings.empty())
-            amx_Release(amx, strings[0].first);
-
-        throw;
-    }
-
-    return boost::any(ret);
-}
-
-boost::any LangPAWN::Call(const char *name, const char *argl, const std::vector<boost::any> &args)
-{
-    cell ret = 0;
-    cell *str = nullptr;
-
-    try
-    {
-        int idx = 0;
-        int err = 0;
-
-        err = amx_FindPublic(amx, name, &idx);
-
-        if (err != AMX_ERR_NONE)
-            throw runtime_error("PAWN runtime error (" + to_string(err) + "): \"" + string(aux_StrError(err)) + "\".");
-
-        for (intptr_t i = strlen(argl) - 1; i >= 0; i--)
-        {
-            switch (argl[i])
-            {
-                case 'i':
-                {
-                    cell value = (cell) boost::any_cast<unsigned int>(args.at(i));
-                    amx_Push(amx, value);
-                    break;
-                }
-
-                case 'q':
-                {
-                    cell value = (cell) boost::any_cast<signed int>(args.at(i));
-                    amx_Push(amx, value);
-                    break;
-                }
-
-                case 'l':
-                {
-                    cell value = (cell) boost::any_cast<unsigned long long>(args.at(i));
-                    amx_Push(amx, value);
-                    break;
-                }
-
-                case 'w':
-                {
-                    cell value = (cell) boost::any_cast<signed long long>(args.at(i));
-                    amx_Push(amx, value);
-                    break;
-                }
-
-                case 'f':
-                {
-                    double value = boost::any_cast<double>(args.at(i));
-                    amx_Push(amx, amx_ftoc(value));
-                    break;
-                }
-
-                case 'p':
-                {
-                    cell value = (cell) boost::any_cast<void *>(args.at(i));
-                    amx_Push(amx, value);
-                    break;
-                }
-
-                case 's':
-                {
-                    string string_ = boost::any_cast<string>(args.at(i));
-                    cell *store;
-                    amx_PushString(amx, &store, string_.c_str(), 1, 0);
-
-                    if (!str)
-                        str = store;
-
-                    break;
-                }
-
-                default:
-                    throw runtime_error("PAWN call: Unknown argument identifier " + argl[i]);
-            }
-        }
-
-        err = amx_Exec(amx, &ret, idx);
-
-        if (err != AMX_ERR_NONE)
-            throw runtime_error("PAWN runtime error (" + to_string(err) + "): \"" + string(aux_StrError(err)) + "\".");
-
-        if (str)
-            amx_Release(amx, str);
-    }
-
-    catch (...)
-    {
-        if (str)
-            amx_Release(amx, str);
-
-        throw;
-    }
-
-    return ret;
-}
-
-template<size_t... Indices>
-inline AMX_NATIVE_INFO *LangPAWN::functions(indices<Indices...>)
-{
-
-    static AMX_NATIVE_INFO functions_[sizeof...(Indices)]{
-            F_<Indices>::F...
-    };
-
-    static_assert(
-            sizeof(functions_) / sizeof(functions_[0]) == sizeof(ScriptFunctions::functions) / sizeof(ScriptFunctions::functions[0]),
-            "Not all functions have been mapped to PAWN");
-
-    return functions_;
-}
-
-
-lib_t LangPAWN::GetInterface()
-{
-    return reinterpret_cast<lib_t>(amx);
-}
-
-LangPAWN::LangPAWN()
-{
-    //throw std::runtime_error("Pawn is no longer supported, use Terra/Lua!");
-    amx = new AMX();
-}
-
-
-LangPAWN::LangPAWN(AMX *amx)
-{
-    this->amx = amx;
-}
-
-
-LangPAWN::~LangPAWN()
-{
-
-}
diff --git a/apps/openmw-mp/Script/LangPawn/LangPAWN.hpp b/apps/openmw-mp/Script/LangPawn/LangPAWN.hpp
deleted file mode 100644
index 396970ad1..000000000
--- a/apps/openmw-mp/Script/LangPawn/LangPAWN.hpp
+++ /dev/null
@@ -1,46 +0,0 @@
-//
-// Created by koncord on 08.05.16.
-//
-
-#ifndef PLUGINSYSTEM3_LANGPAWN_HPP
-#define PLUGINSYSTEM3_LANGPAWN_HPP
-
-#include "Language.hpp"
-#include <amx.h>
-
-class LangPAWN: public Language
-{
-private:
-    template<std::size_t... Is>
-    struct indices {};
-    template<std::size_t N, std::size_t... Is>
-    struct build_indices : build_indices<N-1, N-1, Is...> {};
-    template<std::size_t... Is>
-    struct build_indices<0, Is...> : indices<Is...> {};
-    template<std::size_t N>
-    using IndicesFor = build_indices<N>;
-
-public:
-    virtual lib_t GetInterface() override;
-    template<std::size_t... Indices>
-    static AMX_NATIVE_INFO* functions(indices<Indices...>);
-
-    AMX *amx;
-public:
-    LangPAWN();
-    LangPAWN(AMX *amx);
-    ~LangPAWN();
-    static cell MakePublic(AMX *amx, const cell *params) noexcept;
-    static cell CallPublic(AMX *amx, const cell *params) noexcept;
-    static cell CreateTimer(AMX *amx, const cell *params) noexcept;
-    static cell CreateTimerEx(AMX *amx, const cell *params) noexcept;
-
-    virtual void LoadProgram(const char *filename) override;
-    virtual int FreeProgram() override;
-    virtual bool IsCallbackPresent(const char *name) override;
-    virtual boost::any Call(const char *name, const char *argl, int buf, ...) override;
-    virtual boost::any Call(const char *name, const char *argl, const std::vector<boost::any> &args) override;
-};
-
-
-#endif //PLUGINSYSTEM3_LANGPAWN_HPP
diff --git a/apps/openmw-mp/Script/LangPawn/PawnFunc.cpp b/apps/openmw-mp/Script/LangPawn/PawnFunc.cpp
deleted file mode 100644
index 3d20fdd32..000000000
--- a/apps/openmw-mp/Script/LangPawn/PawnFunc.cpp
+++ /dev/null
@@ -1,154 +0,0 @@
-//
-// Created by koncord on 09.05.16.
-//
-
-#include <API/PublicFnAPI.hpp>
-#include "LangPAWN.hpp"
-#include "API/TimerAPI.hpp"
-
-using namespace std;
-
-cell LangPAWN::MakePublic(AMX *amx, const cell *params) noexcept
-{
-    int len;
-    cell* source;
-
-    source = amx_Address(amx, params[1]);
-    amx_StrLen(source, &len);
-    vector<char> real;
-    real.reserve(len + 1);
-
-    amx_GetString(&real[0], source, 0, UNLIMITED);
-
-    source = amx_Address(amx, params[2]);
-    amx_StrLen(source, &len);
-    vector<char> name;
-    name.reserve(len + 1);
-
-    amx_GetString(&name[0], source, 0, UNLIMITED);
-
-    cell *ret_addr = amx_Address(amx, params[3]);
-    char ret_type = static_cast<char>(*reinterpret_cast<cell*>(&ret_addr));
-
-    source = amx_Address(amx, params[4]);
-    amx_StrLen(source, &len);
-    vector<char> def;
-    def.reserve(len + 1);
-
-    amx_GetString(&def[0], source, 0, UNLIMITED);
-
-
-
-    Public::MakePublic(&real[0], amx, &name[0], ret_type, &def[0]);
-
-    return 1;
-}
-
-cell LangPAWN::CallPublic(AMX *amx, const cell *params) noexcept
-{
-    int len;
-    cell* source;
-
-    source = amx_Address(amx, params[1]);
-    amx_StrLen(source, &len);
-    vector<char> name;
-    name.reserve(len + 1);
-
-    amx_GetString(&name[0], source, 0, UNLIMITED);
-
-    string def;
-
-    try
-    {
-        def = Public::GetDefinition(&name[0]);
-    }
-    catch (...) { return 0; }
-
-    vector<boost::any> args;
-    unsigned int count = (params[0] / sizeof(cell)) - 1;
-
-    if (count != def.length())
-        throw runtime_error("Script call: Number of arguments does not match definition");
-
-    for (unsigned int i = 0; i < count; ++i)
-    {
-        cell* data = amx_Address(amx, params[i + 2]);
-
-        switch (def[i])
-        {
-            case 'i':
-            {
-                args.emplace_back((unsigned int) *data);
-                break;
-            }
-
-            case 'q':
-            {
-                args.emplace_back((signed int) *data);
-                break;
-            }
-
-            case 'l':
-            {
-                args.emplace_back((unsigned long long) *data);
-                break;
-            }
-
-            case 'w':
-            {
-                args.emplace_back((signed long long) *data);
-                break;
-            }
-
-            case 'f':
-            {
-                args.emplace_back((double) amx_ctof(*data));
-                break;
-            }
-
-            case 'p':
-            {
-                args.emplace_back((void*) data);
-                break;
-            }
-
-            case 's':
-            {
-                amx_StrLen(data, &len);
-                vector<char> str;
-                str.reserve(len + 1);
-                amx_GetString(&str[0], data, 0, UNLIMITED);
-                args.emplace_back(string(&str[0]).c_str());
-                break;
-            }
-
-            default:
-                throw runtime_error("PAWN call: Unknown argument identifier " + def[i]);
-        }
-    }
-
-    boost::any result = Public::Call(&name[0], args);
-    if (result.empty())
-        return 0;
-
-    cell ret = 0;
-
-    if (result.type().hash_code() == typeid(signed int).hash_code())
-        ret = boost::any_cast<signed int>(result);
-    else if (result.type().hash_code() == typeid(unsigned int).hash_code())
-        ret = boost::any_cast<unsigned int>(result);
-    else if (result.type().hash_code() == typeid(double).hash_code())
-        ret = amx_ftoc(result);
-
-    return ret;
-}
-
-cell LangPAWN::CreateTimer(AMX *amx, const cell *params) noexcept
-{
-
-}
-
-cell LangPAWN::CreateTimerEx(AMX *amx, const cell *params) noexcept
-{
-
-}
diff --git a/apps/openmw-mp/Script/Script.cpp b/apps/openmw-mp/Script/Script.cpp
index e17588022..3740487b0 100644
--- a/apps/openmw-mp/Script/Script.cpp
+++ b/apps/openmw-mp/Script/Script.cpp
@@ -5,9 +5,6 @@
 #include "Script.hpp"
 #include "LangNative/LangNative.hpp"
 
-#if defined (ENABLE_PAWN)
-#include "LangPawn/LangPAWN.hpp"
-#endif
 #if defined (ENABLE_LUA)
 #include "LangLua/LangLua.hpp"
 #endif
@@ -34,13 +31,6 @@ Script::Script(const char *path)
         script_type = SCRIPT_CPP;
         lang = new LangNative();
     }
-#if defined (ENABLE_PAWN)
-    else if (strstr(path, ".amx"))
-    {
-        lang = new LangPAWN();
-        script_type = SCRIPT_PAWN;
-    }
-#endif
 #if defined (ENABLE_LUA)
     else if (strstr(path, ".lua") || strstr(path, ".t"))
     {
diff --git a/apps/openmw-mp/Script/Script.hpp b/apps/openmw-mp/Script/Script.hpp
index 9076baea6..6e80c4c47 100644
--- a/apps/openmw-mp/Script/Script.hpp
+++ b/apps/openmw-mp/Script/Script.hpp
@@ -24,7 +24,6 @@ private:
     enum
     {
         SCRIPT_CPP,
-        SCRIPT_PAWN,
         SCRIPT_LUA
     };
 
@@ -93,13 +92,6 @@ public:
 
             if (script->script_type == SCRIPT_CPP)
                 result = reinterpret_cast<FunctionEllipsis<CallBackReturn<I>>>(callback)(std::forward<Args>(args)...);
-#if defined (ENABLE_PAWN)
-            else if (script->script_type == SCRIPT_PAWN)
-            {
-                boost::any any = script->lang->Call(data.name, data.callback.types, B, std::forward<Args>(args)...);
-                result = reinterpret_cast<CallBackReturn<I>> ((int)boost::any_cast<int64_t>(any)); // TODO: WTF?! int?!
-            }
-#endif
 #if defined (ENABLE_LUA)
             else if (script->script_type == SCRIPT_LUA)
             {
@@ -133,10 +125,6 @@ public:
 
             if (script->script_type == SCRIPT_CPP)
                 reinterpret_cast<FunctionEllipsis<CallBackReturn<I>>>(callback)(std::forward<Args>(args)...);
-#if defined (ENABLE_PAWN)
-            else if (script->script_type == SCRIPT_PAWN)
-                script->lang->Call(data.name, data.callback.types, B, std::forward<Args>(args)...);
-#endif
 #if defined (ENABLE_LUA)
             else if (script->script_type == SCRIPT_LUA)
                 script->lang->Call(data.name, data.callback.types, B, std::forward<Args>(args)...);
diff --git a/apps/openmw-mp/Script/ScriptFunction.cpp b/apps/openmw-mp/Script/ScriptFunction.cpp
index c30aae462..5ccd32dbf 100644
--- a/apps/openmw-mp/Script/ScriptFunction.cpp
+++ b/apps/openmw-mp/Script/ScriptFunction.cpp
@@ -14,10 +14,6 @@
 #include "LangLua/LangLua.hpp"
 #endif
 
-#if defined (ENABLE_PAWN)
-#include "LangPawn/LangPAWN.hpp"
-#endif
-
 using namespace std;
 
 ScriptFunction::ScriptFunction(ScriptFunc fCpp,char ret_type, const string &def) :
@@ -33,24 +29,9 @@ ScriptFunction::ScriptFunction(const ScriptFuncLua &fLua, lua_State *lua, char r
 }
 #endif
 
-#if defined (ENABLE_PAWN)
-ScriptFunction::ScriptFunction(const ScriptFuncPAWN &fPawn, AMX *amx, char ret_type, const string &def) :
-        fPawn({amx, fPawn}), def(def), ret_type(ret_type), script_type(SCRIPT_PAWN)
-{
-
-}
-#endif
-
 
 ScriptFunction::~ScriptFunction()
 {
-#if defined (ENABLE_PAWN)
-    if (script_type == SCRIPT_PAWN)
-        fPawn.name.~ScriptFuncPAWN();
-#if defined (ENABLE_LUA)
-    else
-#endif
-#endif
 #if defined (ENABLE_LUA)
     if (script_type == SCRIPT_LUA)
         fLua.name.~ScriptFuncLua();
@@ -63,37 +44,6 @@ boost::any ScriptFunction::Call(const vector<boost::any> &args)
 
     if (def.length() != args.size())
         throw runtime_error("Script call: Number of arguments does not match definition");
-#if defined (ENABLE_PAWN)
-    if (script_type == SCRIPT_PAWN)
-    {
-        LangPAWN langPawn(fPawn.amx);
-        boost::any any = langPawn.Call(fPawn.name.c_str(), def.c_str(), args);
-        result = boost::any();
-
-        cell ret = boost::any_cast<cell>(any);
-
-        switch (ret_type)
-        {
-            case 'i':
-                result = static_cast<unsigned int>(ret);
-                break;
-            case 'q':
-                result = static_cast<signed int>(ret);
-                break;
-            case 's':
-                throw runtime_error("Pawn call: the Pawn does not supported strings in public functions");
-            case 'f':
-
-                result =  static_cast<double>(amx_ctof(ret));
-                break;
-            case 'v':
-                result = boost::any();
-                break;
-            default:
-                throw runtime_error("Pawn call: Unknown return type" + ret_type);
-        }
-    }
-#endif
 #if defined (ENABLE_LUA)
     else if (script_type == SCRIPT_LUA)
     {
diff --git a/apps/openmw-mp/Script/ScriptFunction.hpp b/apps/openmw-mp/Script/ScriptFunction.hpp
index 1884ab8dd..6659d8098 100644
--- a/apps/openmw-mp/Script/ScriptFunction.hpp
+++ b/apps/openmw-mp/Script/ScriptFunction.hpp
@@ -12,14 +12,7 @@
 #include "LangLua/LangLua.hpp"
 #endif
 
-#if defined (ENABLE_PAWN)
-#include <amx.h>
-#endif
-
 typedef unsigned long long(*ScriptFunc)();
-#if defined (ENABLE_PAWN)
-typedef std::string ScriptFuncPAWN;
-#endif
 #if defined (ENABLE_LUA)
 typedef std::string ScriptFuncLua;
 #endif
@@ -30,13 +23,6 @@ protected:
     union
     {
         ScriptFunc fCpp;
-#if defined (ENABLE_PAWN)
-        struct
-        {
-            AMX *amx;
-            ScriptFuncPAWN name;
-        } fPawn;
-#endif
 #if defined (ENABLE_LUA)
         struct
         {
@@ -53,16 +39,12 @@ protected:
     enum
     {
         SCRIPT_CPP,
-        SCRIPT_PAWN,
         SCRIPT_LUA
     };
 
     ScriptFunction(ScriptFunc fCpp, char ret_type, const std::string &def);
 #if defined (ENABLE_LUA)
     ScriptFunction(const ScriptFuncLua &fPawn, lua_State *lua, char ret_type, const std::string &def);
-#endif
-#if defined (ENABLE_PAWN)
-    ScriptFunction(const ScriptFuncPAWN &fPawn, AMX *amx, char ret_type, const std::string &def);
 #endif
     virtual ~ScriptFunction();
 
diff --git a/apps/openmw-mp/Script/ScriptFunctions.hpp b/apps/openmw-mp/Script/ScriptFunctions.hpp
index 495dfa2e4..b52271e00 100644
--- a/apps/openmw-mp/Script/ScriptFunctions.hpp
+++ b/apps/openmw-mp/Script/ScriptFunctions.hpp
@@ -24,7 +24,6 @@
 #include <Script/Functions/Stats.hpp>
 #include <Script/Functions/Worldstate.hpp>
 #include <RakNetTypes.h>
-//#include <amx/amx.h>
 #include <tuple>
 #include <apps/openmw-mp/Player.hpp>
 #include "ScriptFunction.hpp"
diff --git a/apps/openmw-mp/amx/CMakeLists.txt b/apps/openmw-mp/amx/CMakeLists.txt
deleted file mode 100644
index 62602e091..000000000
--- a/apps/openmw-mp/amx/CMakeLists.txt
+++ /dev/null
@@ -1,23 +0,0 @@
-include_directories(./linux)
-
-add_definitions(-DPAWN_CELL_SIZE=64)
-
-set(source_amx
-        amxexec_gcc.c
-        amxfile.c
-        fpattern.c
-        minIni.c
-        amxcons.c
-        amxcore.c
-        amxstring.c
-        amxtime.c
-        amxfloat.c
-        amxaux.c
-        amx.c
-        linux/binreloc.c
-        linux/getch.c
-        )
-
-source_group(amx FILES ${source_amx})
-
-add_library(amx STATIC ${source_amx} )
diff --git a/apps/openmw-mp/amx/amx.c b/apps/openmw-mp/amx/amx.c
deleted file mode 100644
index e8254be48..000000000
--- a/apps/openmw-mp/amx/amx.c
+++ /dev/null
@@ -1,3798 +0,0 @@
-/*  Pawn Abstract Machine (for the Pawn language)
- *
- *  Copyright (c) ITB CompuPhase, 1997-2015
- *
- *  Licensed under the Apache License, Version 2.0 (the "License"); you may not
- *  use this file except in compliance with the License. You may obtain a copy
- *  of the License at
- *
- *      http://www.apache.org/licenses/LICENSE-2.0
- *
- *  Unless required by applicable law or agreed to in writing, software
- *  distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
- *  WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the
- *  License for the specific language governing permissions and limitations
- *  under the License.
- *
- *  Version: $Id: amx.c 5181 2015-01-21 09:44:28Z thiadmer $
- */
-
-#define WIN32_LEAN_AND_MEAN
-#if defined _UNICODE || defined __UNICODE__ || defined UNICODE
-# if !defined UNICODE   /* for Windows API */
-#   define UNICODE
-# endif
-# if !defined _UNICODE  /* for C library */
-#   define _UNICODE
-# endif
-#endif
-
-#include <assert.h>
-#include <stdarg.h>
-#include <stddef.h>     /* for wchar_t */
-#include <stdlib.h>     /* for getenv() */
-#include <string.h>
-#include "osdefs.h"
-#if defined __LINUX__ || defined __FreeBSD__ || defined __OpenBSD__ || defined __APPLE__
-  #include <sclinux.h>
-  #if !defined AMX_NODYNALOAD
-    #include <dlfcn.h>
-  #endif
-  #if defined AMX_JIT
-    #include <sys/types.h>
-    #include <sys/mman.h>
-  #endif
-#endif
-#if defined __LCC__ || defined __LINUX__
-  #include <wchar.h>    /* for wcslen() */
-#endif
-
-#if defined __ECOS__
-  /* eCos puts include files in cyg/package_name */
-  #include <cyg/pawn/amx.h>
-#else
-  #include "amx.h"
-#endif
-
-#if (defined _Windows && !defined AMX_NODYNALOAD) || (defined AMX_JIT && __WIN32__)
-  #include <windows.h>
-#endif
-
-
-/* When one or more of the AMX_funcname macros are defined, we want
- * to compile only those functions. However, when none of these macros
- * is present, we want to compile everything.
- */
-#if defined AMX_ALIGN       || defined AMX_ALLOT        || defined AMX_CLEANUP
-  #define AMX_EXPLIT_FUNCTIONS
-#endif
-#if defined AMX_CLONE       || defined AMX_DEFCALLBACK  || defined AMX_EXEC
-  #define AMX_EXPLIT_FUNCTIONS
-#endif
-#if defined AMX_FLAGS       || defined AMX_INIT         || defined AMX_MEMINFO
-  #define AMX_EXPLIT_FUNCTIONS
-#endif
-#if defined AMX_NAMELENGTH   || defined AMX_NATIVEINFO  || defined AMX_PUSHXXX
-  #define AMX_EXPLIT_FUNCTIONS
-#endif
-#if defined AMX_RAISEERROR   || defined AMX_REGISTER    || defined AMX_SETCALLBACK
-  #define AMX_EXPLIT_FUNCTIONS
-#endif
-#if defined AMX_SETDEBUGHOOK || defined AMX_UTF8XXX     || defined AMX_XXXNATIVES
-  #define AMX_EXPLIT_FUNCTIONS
-#endif
-#if defined AMX_XXXPUBLICS  || defined AMX_XXXPUBVARS   || defined AMX_XXXSTRING
-  #define AMX_EXPLIT_FUNCTIONS
-#endif
-#if defined AMX_XXXTAGS     || defined AMX_XXXUSERDATA
-  #define AMX_EXPLIT_FUNCTIONS
-#endif
-#if !defined AMX_EXPLIT_FUNCTIONS
-  /* no constant set, set them all */
-  #define AMX_ALIGN             /* amx_Align16(), amx_Align32() and amx_Align64() */
-  #define AMX_ALLOT             /* amx_Allot() and amx_Release() */
-  #define AMX_DEFCALLBACK       /* amx_Callback() */
-  #define AMX_CLEANUP           /* amx_Cleanup() */
-  #define AMX_CLONE             /* amx_Clone() */
-  #define AMX_EXEC              /* amx_Exec() */
-  #define AMX_FLAGS             /* amx_Flags() */
-  #define AMX_INIT              /* amx_Init() and amx_InitJIT() */
-  #define AMX_MEMINFO           /* amx_MemInfo() */
-  #define AMX_NAMELENGTH        /* amx_NameLength() */
-  #define AMX_NATIVEINFO        /* amx_NativeInfo() */
-  #define AMX_PUSHXXX           /* amx_Push(), amx_PushAddress(), amx_PushArray() and amx_PushString() */
-  #define AMX_RAISEERROR        /* amx_RaiseError() */
-  #define AMX_REGISTER          /* amx_Register() */
-  #define AMX_SETCALLBACK       /* amx_SetCallback() */
-  #define AMX_SETDEBUGHOOK      /* amx_SetDebugHook() */
-  #define AMX_UTF8XXX           /* amx_UTF8Check(), amx_UTF8Get(), amx_UTF8Len() and amx_UTF8Put() */
-  #define AMX_XXXNATIVES        /* amx_NumNatives(), amx_GetNative() and amx_FindNative() */
-  #define AMX_XXXPUBLICS        /* amx_NumPublics(), amx_GetPublic() and amx_FindPublic() */
-  #define AMX_XXXPUBVARS        /* amx_NumPubVars(), amx_GetPubVar() and amx_FindPubVar() */
-  #define AMX_XXXSTRING         /* amx_StrLen(), amx_GetString() and amx_SetString() */
-  #define AMX_XXXTAGS           /* amx_NumTags(), amx_GetTag() and amx_FindTagId() */
-  #define AMX_XXXUSERDATA       /* amx_GetUserData() and amx_SetUserData() */
-#endif
-#undef AMX_EXPLIT_FUNCTIONS
-#if defined AMX_ANSIONLY
-  #undef AMX_UTF8XXX            /* no UTF-8 support in ANSI/ASCII-only version */
-#endif
-#if defined AMX_NO_NATIVEINFO
-  #undef AMX_NATIVEINFO
-#endif
-#if AMX_USERNUM <= 0
-  #undef AMX_XXXUSERDATA
-#endif
-#if defined AMX_JIT
-  /* JIT is incompatible with macro instructions, packed opcodes and overlays */
-  #if !defined AMX_NO_MACRO_INSTR
-    #define AMX_NO_MACRO_INSTR
-  #endif
-  #if !defined AMX_NO_PACKED_OPC
-    #define AMX_NO_PACKED_OPC
-  #endif
-  #if !defined AMX_NO_OVERLAY
-    #define AMX_NO_OVERLAY
-  #endif
-#endif
-#if (defined AMX_ASM || defined AMX_JIT) && !defined AMX_ALTCORE
-  /* do not use the standard ANSI-C amx_Exec() function */
-  #define AMX_ALTCORE
-#endif
-#if !defined AMX_NO_PACKED_OPC && !defined AMX_TOKENTHREADING
-  #define AMX_TOKENTHREADING    /* packed opcodes require token threading */
-#endif
-
-#if defined AMX_ALTCORE
-  #if defined __WIN32__
-    /* For Watcom C/C++ use register calling convention (faster); for
-     * Microsoft C/C++ (and most other C compilers) use "cdecl".
-     * The important point is that you assemble AMXEXEC.ASM with the matching
-     * calling convention, or the right JIT, respectively.
-     * AMXJITR.ASM is for Watcom's register calling convention, AMXJITS.ASM and
-     * AMXJITSN.ASM are for "cdecl".
-     */
-    #if defined __WATCOMC__ && !defined STACKARGS
-      /* register calling convention; the #pragma tells the compiler into which
-       * registers the parameters should go
-       */
-      extern cell amx_exec_run(AMX *amx,cell *retval,unsigned char *data);
-          #pragma aux amx_exec_run parm [eax] [edx] [ebx];
-      extern int amx_exec_list(const AMX *amx,const cell **opcodelist,int *numopcodes);
-          #pragma aux amx_exec_run parm [eax] [edx] [ebx];
-      extern cell amx_jit_compile(void *pcode, void *jumparray, void *nativecode);
-          #pragma aux amx_exec_run parm [eax] [edx] [ebx];
-      extern cell amx_jit_run(AMX *amx,cell *retval,unsigned char *data);
-          #pragma aux amx_jit_run parm [eax] [edx] [ebx];
-      extern int  amx_jit_list(const AMX *amx,const cell **opcodelist,int *numopcodes);
-          #pragma aux amx_exec_run parm [eax] [edx] [ebx];
-    #elif defined __GNUC__
-      /* force "cdecl" by adding an "attribute" to the declaration */
-      extern cell amx_exec_run(AMX *amx,cell *retval,unsigned char *data) __attribute__((cdecl));
-      extern int amx_exec_list(const AMX *amx,const cell **opcodelist,int *numopcodes) __attribute__((cdecl));
-      extern cell amx_jit_compile(void *pcode, void *jumparray, void *nativecode) __attribute__((cdecl));
-      extern cell amx_jit_run(AMX *amx,cell *retval,unsigned char *data) __attribute__((cdecl));
-      extern int  amx_jit_list(const AMX *amx,const cell **opcodelist,int *numopcodes) __attribute__((cdecl));
-    #else
-      /* force "cdecl" by specifying it as a "function class" with the "__cdecl" keyword */
-      extern cell __cdecl amx_exec_run(AMX *amx,cell *retval,unsigned char *data);
-      extern int __cdecl amx_exec_list(const AMX *amx,const cell **opcodelist,int *numopcodes);
-      extern cell __cdecl amx_jit_compile(void *pcode, void *jumparray, void *nativecode);
-      extern cell __cdecl amx_jit_run(AMX *amx,cell *retval,unsigned char *data);
-      extern int  __cdecl amx_jit_list(const AMX *amx,const cell **opcodelist,int *numopcodes);
-    #endif
-  #else /* __WIN32__ */
-    /* assume no specific calling conventions for other platforms than Windows */
-    extern cell amx_exec_run(AMX *amx,cell *retval,unsigned char *data);
-    extern int amx_exec_list(const AMX *amx,const cell **opcodelist,int *numopcodes);
-    extern cell amx_jit_compile(void *pcode, void *jumparray, void *nativecode);
-    extern cell amx_jit_run(AMX *amx,cell *retval,unsigned char *data);
-    extern int  amx_jit_list(const AMX *amx,const cell **opcodelist,int *numopcodes);
-  #endif /* __WIN32__ */
-#else
-  int amx_exec_list(AMX *amx,const cell **opcodelist,int *numopcodes);
-#endif /* AMX_ALTCORE */
-
-typedef enum {
-  OP_NOP,
-  OP_LOAD_PRI,
-  OP_LOAD_ALT,
-  OP_LOAD_S_PRI,
-  OP_LOAD_S_ALT,
-  OP_LREF_S_PRI,
-  OP_LREF_S_ALT,
-  OP_LOAD_I,
-  OP_LODB_I,
-  OP_CONST_PRI,
-  OP_CONST_ALT,
-  OP_ADDR_PRI,
-  OP_ADDR_ALT,
-  OP_STOR,
-  OP_STOR_S,
-  OP_SREF_S,
-  OP_STOR_I,
-  OP_STRB_I,
-  OP_ALIGN_PRI,
-  OP_LCTRL,
-  OP_SCTRL,
-  OP_XCHG,
-  OP_PUSH_PRI,
-  OP_PUSH_ALT,
-  OP_PUSHR_PRI,
-  OP_POP_PRI,
-  OP_POP_ALT,
-  OP_PICK,
-  OP_STACK,
-  OP_HEAP,
-  OP_PROC,
-  OP_RET,
-  OP_RETN,
-  OP_CALL,
-  OP_JUMP,
-  OP_JZER,
-  OP_JNZ,
-  OP_SHL,
-  OP_SHR,
-  OP_SSHR,
-  OP_SHL_C_PRI,
-  OP_SHL_C_ALT,
-  OP_SMUL,
-  OP_SDIV,
-  OP_ADD,
-  OP_SUB,
-  OP_AND,
-  OP_OR,
-  OP_XOR,
-  OP_NOT,
-  OP_NEG,
-  OP_INVERT,
-  OP_EQ,
-  OP_NEQ,
-  OP_SLESS,
-  OP_SLEQ,
-  OP_SGRTR,
-  OP_SGEQ,
-  OP_INC_PRI,
-  OP_INC_ALT,
-  OP_INC_I,
-  OP_DEC_PRI,
-  OP_DEC_ALT,
-  OP_DEC_I,
-  OP_MOVS,
-  OP_CMPS,
-  OP_FILL,
-  OP_HALT,
-  OP_BOUNDS,
-  OP_SYSREQ,
-  OP_SWITCH,
-  OP_SWAP_PRI,
-  OP_SWAP_ALT,
-  OP_BREAK,
-  OP_CASETBL,
-  /* patched instructions */
-  OP_SYSREQ_D,
-  OP_SYSREQ_ND,
-  /* overlay instructions */
-  OP_CALL_OVL,
-  OP_RETN_OVL,
-  OP_SWITCH_OVL,
-  OP_CASETBL_OVL,
-#if !defined AMX_NO_MACRO_INSTR
-  /* supplemental & macro instructions */
-  OP_LIDX,
-  OP_LIDX_B,
-  OP_IDXADDR,
-  OP_IDXADDR_B,
-  OP_PUSH_C,
-  OP_PUSH,
-  OP_PUSH_S,
-  OP_PUSH_ADR,
-  OP_PUSHR_C,
-  OP_PUSHR_S,
-  OP_PUSHR_ADR,
-  OP_JEQ,
-  OP_JNEQ,
-  OP_JSLESS,
-  OP_JSLEQ,
-  OP_JSGRTR,
-  OP_JSGEQ,
-  OP_SDIV_INV,
-  OP_SUB_INV,
-  OP_ADD_C,
-  OP_SMUL_C,
-  OP_ZERO_PRI,
-  OP_ZERO_ALT,
-  OP_ZERO,
-  OP_ZERO_S,
-  OP_EQ_C_PRI,
-  OP_EQ_C_ALT,
-  OP_INC,
-  OP_INC_S,
-  OP_DEC,
-  OP_DEC_S,
-  /* macro instructions */
-  OP_SYSREQ_N,
-  OP_PUSHM_C,
-  OP_PUSHM,
-  OP_PUSHM_S,
-  OP_PUSHM_ADR,
-  OP_PUSHRM_C,
-  OP_PUSHRM_S,
-  OP_PUSHRM_ADR,
-  OP_LOAD2,
-  OP_LOAD2_S,
-  OP_CONST,
-  OP_CONST_S,
-#endif
-#if !defined AMX_NO_PACKED_OPC
-  /* packed instructions */
-  OP_LOAD_P_PRI,
-  OP_LOAD_P_ALT,
-  OP_LOAD_P_S_PRI,
-  OP_LOAD_P_S_ALT,
-  OP_LREF_P_S_PRI,
-  OP_LREF_P_S_ALT,
-  OP_LODB_P_I,
-  OP_CONST_P_PRI,
-  OP_CONST_P_ALT,
-  OP_ADDR_P_PRI,
-  OP_ADDR_P_ALT,
-  OP_STOR_P,
-  OP_STOR_P_S,
-  OP_SREF_P_S,
-  OP_STRB_P_I,
-  OP_LIDX_P_B,
-  OP_IDXADDR_P_B,
-  OP_ALIGN_P_PRI,
-  OP_PUSH_P_C,
-  OP_PUSH_P,
-  OP_PUSH_P_S,
-  OP_PUSH_P_ADR,
-  OP_PUSHR_P_C,
-  OP_PUSHR_P_S,
-  OP_PUSHR_P_ADR,
-  OP_PUSHM_P_C,
-  OP_PUSHM_P,
-  OP_PUSHM_P_S,
-  OP_PUSHM_P_ADR,
-  OP_PUSHRM_P_C,
-  OP_PUSHRM_P_S,
-  OP_PUSHRM_P_ADR,
-  OP_STACK_P,
-  OP_HEAP_P,
-  OP_SHL_P_C_PRI,
-  OP_SHL_P_C_ALT,
-  OP_ADD_P_C,
-  OP_SMUL_P_C,
-  OP_ZERO_P,
-  OP_ZERO_P_S,
-  OP_EQ_P_C_PRI,
-  OP_EQ_P_C_ALT,
-  OP_INC_P,
-  OP_INC_P_S,
-  OP_DEC_P,
-  OP_DEC_P_S,
-  OP_MOVS_P,
-  OP_CMPS_P,
-  OP_FILL_P,
-  OP_HALT_P,
-  OP_BOUNDS_P,
-#endif
-  /* ----- */
-  OP_NUM_OPCODES
-} OPCODE;
-
-#define NUMENTRIES(hdr,field,nextfield) \
-                        (unsigned)(((hdr)->nextfield - (hdr)->field) / (hdr)->defsize)
-#define GETENTRY(hdr,table,index) \
-                        (AMX_FUNCSTUB *)((unsigned char*)(hdr) + (unsigned)(hdr)->table + (unsigned)index*(hdr)->defsize)
-#define GETENTRYNAME(hdr,entry) \
-                        (char *)((unsigned char*)(hdr) + (unsigned)((AMX_FUNCSTUB*)(entry))->nameofs)
-
-#if !defined NDEBUG
-  static int check_endian(void)
-  {
-    uint16_t val=0x00ff;
-    unsigned char *ptr=(unsigned char *)&val;
-    /* "ptr" points to the starting address of "val". If that address
-     * holds the byte "0xff", the computer stored the low byte of "val"
-     * at the lower address, and so the memory lay out is Little Endian.
-     */
-    assert(*ptr==0xff || *ptr==0x00);
-    #if BYTE_ORDER==BIG_ENDIAN
-      return *ptr==0x00;  /* return "true" if big endian */
-    #else
-      return *ptr==0xff;  /* return "true" if little endian */
-    #endif
-  }
-#endif
-
-#if BYTE_ORDER==BIG_ENDIAN || PAWN_CELL_SIZE==16
-  void amx_Swap16(uint16_t *v)
-  {
-    unsigned char *s = (unsigned char *)v;
-    unsigned char t;
-
-    assert_static(sizeof(*v)==2);
-    /* swap two bytes */
-    t=s[0];
-    s[0]=s[1];
-    s[1]=t;
-  }
-#endif
-
-#if BYTE_ORDER==BIG_ENDIAN || PAWN_CELL_SIZE==32
-  void amx_Swap32(uint32_t *v)
-  {
-    unsigned char *s = (unsigned char *)v;
-    unsigned char t;
-
-    assert_static(sizeof(*v)==4);
-    /* swap outer two bytes */
-    t=s[0];
-    s[0]=s[3];
-    s[3]=t;
-    /* swap inner two bytes */
-    t=s[1];
-    s[1]=s[2];
-    s[2]=t;
-  }
-#endif
-
-#if (BYTE_ORDER==BIG_ENDIAN || PAWN_CELL_SIZE==64) && (defined _I64_MAX || defined HAVE_I64)
-  void amx_Swap64(uint64_t *v)
-  {
-    unsigned char *s = (unsigned char *)v;
-    unsigned char t;
-
-    assert(sizeof(*v)==8);
-
-    t=s[0];
-    s[0]=s[7];
-    s[7]=t;
-
-    t=s[1];
-    s[1]=s[6];
-    s[6]=t;
-
-    t=s[2];
-    s[2]=s[5];
-    s[5]=t;
-
-    t=s[3];
-    s[3]=s[4];
-    s[4]=t;
-  }
-#endif
-
-#if defined AMX_ALIGN || defined AMX_INIT
-uint16_t * AMXAPI amx_Align16(uint16_t *v)
-{
-  assert_static(sizeof(*v)==2);
-  assert(check_endian());
-  #if BYTE_ORDER==BIG_ENDIAN
-    amx_Swap16(v);
-  #endif
-  return v;
-}
-
-uint32_t * AMXAPI amx_Align32(uint32_t *v)
-{
-  assert_static(sizeof(*v)==4);
-  assert(check_endian());
-  #if BYTE_ORDER==BIG_ENDIAN
-    amx_Swap32(v);
-  #endif
-  return v;
-}
-
-#if defined _I64_MAX || defined HAVE_I64
-uint64_t * AMXAPI amx_Align64(uint64_t *v)
-{
-  assert(sizeof(*v)==8);
-  assert(check_endian());
-  #if BYTE_ORDER==BIG_ENDIAN
-    amx_Swap64(v);
-  #endif
-  return v;
-}
-#endif  /* _I64_MAX || HAVE_I64 */
-#endif  /* AMX_ALIGN || AMX_INIT */
-
-#if defined AMX_FLAGS
-int AMXAPI amx_Flags(AMX *amx,uint16_t *flags)
-{
-  AMX_HEADER *hdr;
-
-  *flags=0;
-  if (amx==NULL)
-    return AMX_ERR_FORMAT;
-  hdr=(AMX_HEADER *)amx->base;
-  if (hdr->magic!=AMX_MAGIC)
-    return AMX_ERR_FORMAT;
-  if (hdr->file_version>CUR_FILE_VERSION || hdr->amx_version<MIN_FILE_VERSION)
-    return AMX_ERR_VERSION;
-  *flags=hdr->flags;
-  return AMX_ERR_NONE;
-}
-#endif /* AMX_FLAGS */
-
-#if defined AMX_DEFCALLBACK
-int AMXAPI amx_Callback(AMX *amx, cell index, cell *result, const cell *params)
-{
-#if defined AMX_NATIVETABLE
-  extern AMX_NATIVE const AMX_NATIVETABLE[];
-#endif
-  AMX_HEADER *hdr;
-  AMX_FUNCSTUB *func;
-  AMX_NATIVE f;
-
-  assert(amx!=NULL);
-  hdr=(AMX_HEADER *)amx->base;
-  assert(hdr!=NULL);
-  assert(hdr->magic==AMX_MAGIC);
-  assert(hdr->natives<=hdr->libraries);
-#if defined AMX_NATIVETABLE
-  if (index<0) {
-    /* size of AMX_NATIVETABLE is unknown here, so we cannot verify index */
-    f=(AMX_NATIVETABLE)[-(index+1)];
-  } else {
-#endif
-    assert(index>=0 && index<(cell)NUMENTRIES(hdr,natives,libraries));
-    func=GETENTRY(hdr,natives,index);
-    f=(AMX_NATIVE)(intptr_t)func->address;
-#if defined AMX_NATIVETABLE
-  } /* if */
-#endif
-  assert(f!=NULL);
-
-  /* Now that we have found the function, patch the program so that any
-   * subsequent call will call the function directly (bypassing this
-   * callback).
-   * This trick cannot work in the JIT, because the program would need to
-   * be re-JIT-compiled after patching a P-code instruction.
-   */
-  assert((amx->flags & AMX_FLAG_JITC)==0 || amx->sysreq_d==0);
-  if (amx->sysreq_d!=0) {
-    /* at the point of the call, the CIP pseudo-register points directly
-     * behind the SYSREQ(.N) instruction and its parameter(s)
-     */
-    unsigned char *code=amx->code+(int)amx->cip-sizeof(cell);
-    if (amx->flags & AMX_FLAG_SYSREQN) /* SYSREQ.N has 2 parameters */
-      code-=sizeof(cell);
-    assert(amx->code!=NULL);
-    assert(amx->cip>=4 && amx->cip<(hdr->dat - hdr->cod));
-    assert(sizeof(f)<=sizeof(cell)); /* function pointer must fit in a cell */
-    assert(*(cell*)code==index);
-    #if defined AMX_TOKENTHREADING || !(defined __GNUC__ || defined __ICC || defined AMX_ASM || defined AMX_JIT)
-      assert(!(amx->flags & AMX_FLAG_SYSREQN) && *(cell*)(code-sizeof(cell))==OP_SYSREQ
-             || (amx->flags & AMX_FLAG_SYSREQN) && *(cell*)(code-sizeof(cell))==OP_SYSREQ_N);
-    #endif
-    *(cell*)(code-sizeof(cell))=amx->sysreq_d;
-    *(cell*)code=(cell)(intptr_t)f;
-  } /* if */
-
-  /* Note:
-   *   params[0] == number of bytes for the additional parameters passed to the native function
-   *   params[1] == first argument
-   *   etc.
-   */
-
-  amx->error=AMX_ERR_NONE;
-  *result = f(amx,params);
-  return amx->error;
-}
-#endif /* defined AMX_DEFCALLBACK */
-
-
-#if defined AMX_JIT
-  /* convert from relative addresses to absolute physical addresses */
-  #define RELOC_ABS(base,off)   (*(ucell *)((base)+(int)(off)) += (ucell)(base)+(int)(off)-sizeof(cell))
-#else
-  #define JUMPREL(ip)           ((cell*)((intptr_t)(ip)+*(cell*)(ip)-sizeof(cell)))
-#endif
-#if defined AMX_ASM || defined AMX_JIT
-  #define RELOCATE_ADDR(base,v) ((v)+((ucell)(base)))
-#else
-  #define RELOCATE_ADDR(base,v) (v)
-#endif
-
-#define DBGPARAM(v)     ( (v)=*(cell *)(amx->code+(int)cip), cip+=sizeof(cell) )
-
-#if !defined GETOPCODE
-  #if defined AMX_NO_PACKED_OPC
-    #define GETOPCODE(c)  (OPCODE)(c)
-  #else
-    #define GETOPCODE(c)  (OPCODE)((c) & ((1 << sizeof(cell)*4)-1))
-  #endif
-#endif
-#if !defined GETPARAM_P
-  #define GETPARAM_P(v,o) ( v=((cell)(o) >> (int)(sizeof(cell)*4)) )
-#endif
-
-#if defined AMX_INIT
-
-static int VerifyPcode(AMX *amx)
-{
-  AMX_HEADER *hdr;
-  cell op,cip,tgt,opmask;
-  int sysreq_flg,max_opcode;
-  int datasize,stacksize;
-  const cell *opcode_list;
-  #if defined AMX_JIT
-    int opcode_count=0;
-    int reloc_count=0;
-    int jit_codesize=0;
-  #endif
-
-  assert(amx!=NULL);
-  hdr=(AMX_HEADER *)amx->base;
-  assert(hdr!=NULL);
-  assert(hdr->magic==AMX_MAGIC);
-  amx->flags|=AMX_FLAG_VERIFY;
-  datasize=hdr->hea-hdr->dat;
-  stacksize=hdr->stp-hdr->hea;
-
-  #if defined AMX_ASM && defined AMX_JIT
-    if ((amx->flags & AMX_FLAG_JITC)!=0)
-      jit_codesize=amx_jit_list(amx,&opcode_list,&max_opcode);
-    else
-      amx_exec_list(amx,&opcode_list,&max_opcode);
-  #elif defined AMX_JIT
-    jit_codesize=amx_jit_list(amx,&opcode_list,&max_opcode);
-  #else
-    amx_exec_list(amx,&opcode_list,&max_opcode);
-  #endif
-  #if defined AMX_TOKENTHREADING
-    opcode_list=NULL; /* avoid token translation if token threading is in effect */
-  #endif
-  #if defined AMX_NO_PACKED_OPC
-    opmask= ~0;
-  #else
-    opmask=(1 << sizeof(cell)*4)-1;
-  #endif
-
-  /* sanity checks */
-  assert_static(OP_XCHG==21);
-  assert_static(OP_SMUL==42);
-  assert_static(OP_MOVS==64);
-  #if !defined AMX_NO_MACRO_INSTR
-    assert_static(OP_LIDX==81);
-    assert_static(OP_ZERO_PRI==102);
-    assert_static(OP_LOAD2==120);
-  #endif
-  #if !defined AMX_NO_PACKED_OPC
-    assert_static(OP_LOAD_P_PRI==124);
-    assert_static(OP_ALIGN_P_PRI==141);
-    assert_static(OP_BOUNDS_P==174);
-  #endif
-
-  sysreq_flg=0;
-  if (opcode_list!=NULL) {
-    if (amx->sysreq_d==opcode_list[OP_SYSREQ_D])
-      sysreq_flg=0x01;
-    else if (amx->sysreq_d==opcode_list[OP_SYSREQ_ND])
-      sysreq_flg=0x02;
-  } else {
-    if (amx->sysreq_d==OP_SYSREQ_D)
-      sysreq_flg=0x01;
-    else if (amx->sysreq_d==OP_SYSREQ_ND)
-      sysreq_flg=0x02;
-  } /* if */
-  amx->sysreq_d=0;      /* preset */
-
-  /* start browsing code */
-  assert(amx->code!=NULL);  /* should already have been set in amx_Init() */
-  for (cip=0; cip<amx->codesize; ) {
-    op=*(cell *)(amx->code+(int)cip);
-    if ((op & opmask)>=max_opcode) {
-      amx->flags &= ~AMX_FLAG_VERIFY;
-      return AMX_ERR_INVINSTR;
-    } /* if */
-    /* relocate opcode (only works if the size of an opcode is at least
-     * as big as the size of a pointer (jump address); so basically we
-     * rely on the opcode and a pointer being 32-bit
-     */
-    if (opcode_list!=NULL) {
-      /* verify that opcode_list[op]!=NULL, if it is, this instruction
-       * is unsupported
-       */
-      if (opcode_list[op & opmask]==0) {
-        amx->flags &= ~AMX_FLAG_VERIFY;
-        return AMX_ERR_INVINSTR;
-      } /* if */
-      *(cell *)(amx->code+(int)cip)=opcode_list[op & opmask];
-    } /* if */
-    #if defined AMX_JIT
-      opcode_count++;
-    #endif
-    cip+=sizeof(cell);
-    switch (op & opmask) {
-#if !defined AMX_NO_MACRO_INSTR
-    case OP_PUSHM_C:    /* instructions with variable number of parameters */
-    case OP_PUSHM:
-    case OP_PUSHM_S:
-    case OP_PUSHM_ADR:
-    case OP_PUSHRM_C:
-    case OP_PUSHRM_S:
-    case OP_PUSHRM_ADR:
-      tgt=*(cell*)(amx->code+(int)cip); /* get count */
-      cip+=sizeof(cell)*(tgt+1);
-      break;
-
-    case OP_LOAD2:
-      tgt=*(cell*)(amx->code+(int)cip); /* verify both addresses */
-      if (tgt<0 || tgt>=datasize) {
-        amx->flags &= ~AMX_FLAG_VERIFY;
-        return AMX_ERR_BOUNDS;
-      } /* if */
-      tgt=*(cell*)(amx->code+(int)cip+(int)sizeof(cell));
-      if (tgt<0 || tgt>=datasize) {
-        amx->flags &= ~AMX_FLAG_VERIFY;
-        return AMX_ERR_BOUNDS;
-      } /* if */
-      cip+=sizeof(cell)*2;
-      break;
-
-    case OP_LOAD2_S:
-      tgt=*(cell*)(amx->code+(int)cip); /* verify both addresses */
-      if (tgt<-stacksize || tgt>stacksize) {
-        amx->flags &= ~AMX_FLAG_VERIFY;
-        return AMX_ERR_BOUNDS;
-      } /* if */
-      tgt=*(cell*)(amx->code+(int)cip+(int)sizeof(cell));
-      if (tgt<-stacksize || tgt>stacksize) {
-        amx->flags &= ~AMX_FLAG_VERIFY;
-        return AMX_ERR_BOUNDS;
-      } /* if */
-      cip+=sizeof(cell)*2;
-      break;
-
-    case OP_CONST:
-      tgt=*(cell*)(amx->code+(int)cip); /* verify address */
-      if (tgt<0 || tgt>=datasize) {
-        amx->flags &= ~AMX_FLAG_VERIFY;
-        return AMX_ERR_BOUNDS;
-      } /* if */
-      cip+=sizeof(cell)*2;
-      break;
-
-    case OP_CONST_S:
-      tgt=*(cell*)(amx->code+(int)cip); /* verify both addresses */
-      if (tgt<-stacksize || tgt>stacksize) {
-        amx->flags &= ~AMX_FLAG_VERIFY;
-        return AMX_ERR_BOUNDS;
-      } /* if */
-      cip+=sizeof(cell)*2;
-      break;
-#endif /* !defined AMX_NO_MACRO_INSTR */
-
-#if !defined AMX_NO_PACKED_OPC
-    case OP_LODB_P_I:   /* instructions with 1 parameter packed inside the same cell */
-    case OP_CONST_P_PRI:
-    case OP_CONST_P_ALT:
-    case OP_ADDR_P_PRI:
-    case OP_ADDR_P_ALT:
-    case OP_STRB_P_I:
-    case OP_LIDX_P_B:
-    case OP_IDXADDR_P_B:
-    case OP_ALIGN_P_PRI:
-    case OP_PUSH_P_C:
-    case OP_PUSH_P:
-    case OP_PUSH_P_S:
-    case OP_PUSH_P_ADR:
-    case OP_PUSHR_P_C:
-    case OP_PUSHR_P_S:
-    case OP_PUSHR_P_ADR:
-    case OP_STACK_P:
-    case OP_HEAP_P:
-    case OP_SHL_P_C_PRI:
-    case OP_SHL_P_C_ALT:
-    case OP_ADD_P_C:
-    case OP_SMUL_P_C:
-    case OP_ZERO_P:
-    case OP_ZERO_P_S:
-    case OP_EQ_P_C_PRI:
-    case OP_EQ_P_C_ALT:
-    case OP_MOVS_P:
-    case OP_CMPS_P:
-    case OP_FILL_P:
-    case OP_HALT_P:
-    case OP_BOUNDS_P:
-      break;
-
-    case OP_LOAD_P_PRI: /* data instructions with 1 parameter packed inside the same cell */
-    case OP_LOAD_P_ALT:
-    case OP_STOR_P:
-    case OP_INC_P:
-    case OP_DEC_P:
-      GETPARAM_P(tgt,op); /* verify address */
-      if (tgt<0 || tgt>=datasize) {
-        amx->flags &= ~AMX_FLAG_VERIFY;
-        return AMX_ERR_BOUNDS;
-      } /* if */
-      break;
-
-    case OP_LOAD_P_S_PRI: /* stack instructions with 1 parameter packed inside the same cell */
-    case OP_LOAD_P_S_ALT:
-    case OP_LREF_P_S_PRI:
-    case OP_LREF_P_S_ALT:
-    case OP_STOR_P_S:
-    case OP_SREF_P_S:
-    case OP_INC_P_S:
-    case OP_DEC_P_S:
-      GETPARAM_P(tgt,op); /* verify address */
-      if (tgt<-stacksize || tgt>stacksize) {
-        amx->flags &= ~AMX_FLAG_VERIFY;
-        return AMX_ERR_BOUNDS;
-      } /* if */
-      break;
-
-    case OP_PUSHM_P_C:    /* instructions with variable number of parameters */
-    case OP_PUSHM_P:
-    case OP_PUSHM_P_S:
-    case OP_PUSHM_P_ADR:
-    case OP_PUSHRM_P_C:
-    case OP_PUSHRM_P_S:
-    case OP_PUSHRM_P_ADR:
-      GETPARAM_P(tgt,op); /* verify address */
-      cip+=sizeof(cell)*tgt;
-      break;
-#endif /* !defined AMX_NO_PACKED_OPC */
-
-    case OP_LODB_I:     /* instructions with 1 parameter (not packed) */
-    case OP_CONST_PRI:
-    case OP_CONST_ALT:
-    case OP_ADDR_PRI:
-    case OP_ADDR_ALT:
-    case OP_STRB_I:
-    case OP_ALIGN_PRI:
-    case OP_LCTRL:
-    case OP_SCTRL:
-    case OP_PICK:
-    case OP_STACK:
-    case OP_HEAP:
-    case OP_SHL_C_PRI:
-    case OP_SHL_C_ALT:
-    case OP_MOVS:
-    case OP_CMPS:
-    case OP_FILL:
-    case OP_HALT:
-    case OP_BOUNDS:
-#if !defined AMX_NO_MACRO_INSTR
-    case OP_LIDX_B:
-    case OP_IDXADDR_B:
-    case OP_PUSH_C:
-    case OP_PUSH_ADR:
-    case OP_PUSHR_C:
-    case OP_PUSHR_ADR:
-    case OP_ADD_C:
-    case OP_SMUL_C:
-    case OP_ZERO:
-    case OP_ZERO_S:
-    case OP_EQ_C_PRI:
-    case OP_EQ_C_ALT:
-#endif
-      cip+=sizeof(cell);
-      break;
-
-    case OP_LOAD_PRI:
-    case OP_LOAD_ALT:
-    case OP_STOR:
-#if !defined AMX_NO_MACRO_INSTR
-    case OP_PUSH:
-    case OP_INC:
-    case OP_DEC:
-#endif
-      tgt=*(cell*)(amx->code+(int)cip); /* verify address */
-      if (tgt<0 || tgt>=datasize) {
-        amx->flags &= ~AMX_FLAG_VERIFY;
-        return AMX_ERR_BOUNDS;
-      } /* if */
-      cip+=sizeof(cell);
-      break;
-
-    case OP_LOAD_S_PRI:
-    case OP_LOAD_S_ALT:
-    case OP_LREF_S_PRI:
-    case OP_LREF_S_ALT:
-    case OP_STOR_S:
-    case OP_SREF_S:
-#if !defined AMX_NO_MACRO_INSTR
-    case OP_PUSH_S:
-    case OP_PUSHR_S:
-    case OP_INC_S:
-    case OP_DEC_S:
-#endif
-      tgt=*(cell*)(amx->code+(int)cip); /* verify address */
-      if (tgt<-stacksize || tgt>stacksize) {
-        amx->flags &= ~AMX_FLAG_VERIFY;
-        return AMX_ERR_BOUNDS;
-      } /* if */
-      cip+=sizeof(cell);
-      break;
-
-    case OP_NOP:        /* instructions without parameters */
-    case OP_LOAD_I:
-    case OP_STOR_I:
-    case OP_XCHG:
-    case OP_PUSH_PRI:
-    case OP_PUSH_ALT:
-    case OP_PUSHR_PRI:
-    case OP_POP_PRI:
-    case OP_POP_ALT:
-    case OP_PROC:
-    case OP_RET:
-    case OP_RETN:
-    case OP_SHL:
-    case OP_SHR:
-    case OP_SSHR:
-    case OP_SMUL:
-    case OP_SDIV:
-    case OP_ADD:
-    case OP_SUB:
-    case OP_AND:
-    case OP_OR:
-    case OP_XOR:
-    case OP_NOT:
-    case OP_NEG:
-    case OP_INVERT:
-    case OP_EQ:
-    case OP_NEQ:
-    case OP_SLESS:
-    case OP_SLEQ:
-    case OP_SGRTR:
-    case OP_SGEQ:
-    case OP_INC_PRI:
-    case OP_INC_ALT:
-    case OP_INC_I:
-    case OP_DEC_PRI:
-    case OP_DEC_ALT:
-    case OP_DEC_I:
-    case OP_SWAP_PRI:
-    case OP_SWAP_ALT:
-    case OP_BREAK:
-#if !defined AMX_NO_MACRO_INSTR
-    case OP_LIDX:
-    case OP_IDXADDR:
-    case OP_SDIV_INV:
-    case OP_SUB_INV:
-    case OP_ZERO_PRI:
-    case OP_ZERO_ALT:
-#endif
-      break;
-
-    case OP_CALL:       /* opcodes that need relocation (JIT only), or conversion to position-independent code */
-    case OP_JUMP:
-    case OP_JZER:
-    case OP_JNZ:
-    case OP_SWITCH:
-#if !defined AMX_NO_MACRO_INSTR
-    case OP_JEQ:
-    case OP_JNEQ:
-    case OP_JSLESS:
-    case OP_JSLEQ:
-    case OP_JSGRTR:
-    case OP_JSGEQ:
-#endif
-      tgt=*(cell*)(amx->code+(int)cip)+cip-sizeof(cell);
-      if (tgt<0 || tgt>amx->codesize) {
-        amx->flags &= ~AMX_FLAG_VERIFY;
-        return AMX_ERR_BOUNDS;
-      } /* if */
-      #if defined AMX_JIT
-        reloc_count++;
-        RELOC_ABS(amx->code, cip);  /* change to absolute physical address */
-      #endif
-      cip+=sizeof(cell);
-      break;
-
-#if !defined AMX_NO_OVERLAY
-    /* overlay opcodes (overlays must be enabled) */
-    case OP_SWITCH_OVL:
-      assert(hdr->file_version>=10);
-      tgt=*(cell*)(amx->code+(int)cip)+cip-sizeof(cell);
-      if (tgt<0 || tgt>amx->codesize) {
-        amx->flags &= ~AMX_FLAG_VERIFY;
-        return AMX_ERR_BOUNDS;
-      } /* if */
-      /* drop through */
-    case OP_CALL_OVL:
-      cip+=sizeof(cell);
-      /* drop through */
-    case OP_RETN_OVL:
-      assert(hdr->overlays!=0 && hdr->overlays!=hdr->nametable);
-      #if defined AMX_JIT
-        if ((amx->flags & AMX_FLAG_JITC)!=0)
-          return AMX_ERR_OVERLAY;     /* JIT does not support overlays */
-      #endif
-      if (amx->overlay==NULL)
-        return AMX_ERR_OVERLAY;       /* no overlay callback */
-      break;
-    case OP_CASETBL_OVL: {
-      cell num;
-      DBGPARAM(num);    /* number of records follows the opcode */
-      cip+=(2*num + 1)*sizeof(cell);
-      if (amx->overlay==NULL)
-        return AMX_ERR_OVERLAY;       /* no overlay callback */
-      break;
-    } /* case */
-#endif
-
-    case OP_SYSREQ:
-      cip+=sizeof(cell);
-      sysreq_flg|=0x01; /* mark SYSREQ found */
-      break;
-#if !defined AMX_NO_MACRO_INSTR
-    case OP_SYSREQ_N:
-      cip+=sizeof(cell)*2;
-      sysreq_flg|=0x02; /* mark SYSREQ.N found */
-      break;
-#endif
-
-    case OP_CASETBL: {
-      cell num,offs;
-      int i;
-      DBGPARAM(num);    /* number of records follows the opcode */
-      for (i=0; i<=num; i++) {
-        offs=cip+2*i*sizeof(cell);
-        tgt=*(cell*)(amx->code+(int)offs)+offs-sizeof(cell);
-        if (tgt<0 || tgt>amx->codesize) {
-          amx->flags &= ~AMX_FLAG_VERIFY;
-          return AMX_ERR_BOUNDS;
-        } /* if */
-        #if defined AMX_JIT
-          RELOC_ABS(amx->code, cip+2*i*sizeof(cell));
-          reloc_count++;
-        #endif
-      } /* for */
-      cip+=(2*num + 1)*sizeof(cell);
-      break;
-    } /* case */
-
-    default:
-      amx->flags &= ~AMX_FLAG_VERIFY;
-      return AMX_ERR_INVINSTR;
-    } /* switch */
-  } /* for */
-
-  #if !defined AMX_DONT_RELOCATE
-    /* only either type of system request opcode should be found (otherwise,
-     * we probably have a non-conforming compiler
-     */
-    if ((sysreq_flg==0x01 || sysreq_flg==0x02) && (amx->flags & AMX_FLAG_JITC)==0) {
-      /* to use direct system requests, a function pointer must fit in a cell;
-       * because the native function's address will be stored as the parameter
-       * of SYSREQ.(N)D
-       */
-      if (sizeof(AMX_NATIVE)<=sizeof(cell)) {
-        if (opcode_list!=NULL)
-          amx->sysreq_d=(sysreq_flg==0x01) ? opcode_list[OP_SYSREQ_D] : opcode_list[OP_SYSREQ_ND];
-        else
-          amx->sysreq_d=(sysreq_flg==0x01) ? OP_SYSREQ_D : OP_SYSREQ_ND;
-      } /* if */
-    } /* if */
-  #endif
-
-  #if defined AMX_JIT
-    /* adjust the code size to mean: estimated code size of the native code
-     * (instead of the size of the P-code)
-     */
-    amx->codesize=jit_codesize*opcode_count + hdr->cod + (hdr->stp - hdr->dat);
-    amx->reloc_size=2*sizeof(cell)*reloc_count;
-  #endif
-
-  amx->flags &= ~AMX_FLAG_VERIFY;
-  amx->flags |= AMX_FLAG_INIT;
-  if (sysreq_flg & 0x02)
-    amx->flags |= AMX_FLAG_SYSREQN;
-
-  return AMX_ERR_NONE;
-}
-
-/* definitions used for amx_Init() and amx_Cleanup() */
-#if (defined _Windows || defined __LINUX__ || defined __FreeBSD__ || defined __OpenBSD__ || defined __APPLE__) && !defined AMX_NODYNALOAD
-  typedef int AMXEXPORT (AMXAPI _FAR *AMX_ENTRY)(AMX _FAR *amx);
-#endif
-
-int AMXAPI amx_Init(AMX *amx,void *program)
-{
-  AMX_HEADER *hdr;
-  int err;
-  uint16_t *namelength;
-  unsigned char *data;
-  #if (defined _Windows || defined __LINUX__ || defined __FreeBSD__ || defined __OpenBSD__ || defined __APPLE__) && !defined AMX_NODYNALOAD
-    #if defined _Windows
-      char libname[sNAMEMAX+8]; /* +1 for '\0', +3 for 'amx' prefix, +4 for extension */
-      HINSTANCE hlib;
-    #elif defined __LINUX__ || defined __FreeBSD__ || defined __OpenBSD__ || defined __APPLE__
-      char libname[_MAX_PATH];
-      char *root;
-      void *hlib;
-      #if !defined AMX_LIBPATH
-        #define AMX_LIBPATH     "AMXLIB"
-      #endif
-    #endif
-    int numlibraries;
-    AMX_FUNCSTUB *lib;
-    AMX_ENTRY libinit;
-  #endif
-
-  if ((amx->flags & AMX_FLAG_INIT)!=0)
-    return AMX_ERR_INIT;  /* already initialized (may not do so twice) */
-
-  hdr=(AMX_HEADER *)program;
-  /* the header is in Little Endian, on a Big Endian machine, swap all
-   * multi-byte words
-   */
-  assert(check_endian());
-  #if BYTE_ORDER==BIG_ENDIAN
-    amx_Align32((uint32_t*)&hdr->size);
-    amx_Align16(&hdr->magic);
-    amx_Align16((uint16_t*)&hdr->flags);
-    amx_Align16((uint16_t*)&hdr->defsize);
-    amx_Align32((uint32_t*)&hdr->cod);
-    amx_Align32((uint32_t*)&hdr->dat);
-    amx_Align32((uint32_t*)&hdr->hea);
-    amx_Align32((uint32_t*)&hdr->stp);
-    amx_Align32((uint32_t*)&hdr->cip);
-    amx_Align32((uint32_t*)&hdr->publics);
-    amx_Align32((uint32_t*)&hdr->natives);
-    amx_Align32((uint32_t*)&hdr->libraries);
-    amx_Align32((uint32_t*)&hdr->pubvars);
-    amx_Align32((uint32_t*)&hdr->tags);
-    if (hdr->file_version>=10)
-      amx_Align32((uint32_t*)&hdr->overlays);
-  #endif
-
-  if (hdr->magic!=AMX_MAGIC)
-    return AMX_ERR_FORMAT;
-  if (hdr->file_version>CUR_FILE_VERSION || hdr->amx_version<MIN_FILE_VERSION)
-    return AMX_ERR_VERSION;
-  if (hdr->defsize!=sizeof(AMX_FUNCSTUB))
-    return AMX_ERR_FORMAT;
-  /* check the maximum name length in the separate name table */
-  amx_Align32((uint32_t*)&hdr->nametable);
-  namelength=(uint16_t*)((unsigned char*)program + (unsigned)hdr->nametable);
-  amx_Align16(namelength);
-  if (*namelength>sNAMEMAX)
-    return AMX_ERR_FORMAT;
-  if (hdr->stp<=0)
-    return AMX_ERR_FORMAT;
-  assert(hdr->hea == hdr->size);
-  #if BYTE_ORDER==BIG_ENDIAN
-    if ((hdr->flags & AMX_FLAG_COMPACT)==0) {
-      ucell *code=(ucell *)((unsigned char *)program+(int)hdr->cod);
-      while (code<(ucell *)((unsigned char *)program+(int)hdr->hea))
-        amx_SwapCell(code++);
-    } /* if */
-  #endif
-
-  amx->base=(unsigned char *)program;
-
-  /* set initial values */
-  amx->hlw=hdr->hea - hdr->dat; /* stack and heap relative to data segment */
-  amx->stp=hdr->stp - hdr->dat - sizeof(cell);
-  amx->hea=amx->hlw;
-  amx->stk=amx->stp;
-  #if defined AMX_DEFCALLBACK
-    if (amx->callback==NULL)
-      amx->callback=amx_Callback;
-  #endif
-
-  /* when running P-code from ROM (with the header with the native function
-   * table in RAM), the "code" field must be set to a non-NULL value on
-   * initialization, before calling amx_Init(); in an overlay scheme, the
-   * code field is modified dynamically by the overlay callback
-   */
-  if (amx->code==NULL)
-    amx->code=amx->base+(int)hdr->cod;
-  if (amx->codesize==0)
-    amx->codesize=hdr->dat-hdr->cod;
-
-  /* to split the data segment off the code segment, the "data" field must
-   * be set to a non-NULL value on initialization, before calling amx_Init();
-   * you may also need to explicitly initialize the data section with the
-   * contents read from the AMX file
-   */
-  if (amx->data!=NULL) {
-    data=amx->data;
-    if ((amx->flags & AMX_FLAG_DSEG_INIT)==0 && amx->overlay==NULL)
-      memcpy(data,amx->base+(int)hdr->dat,(size_t)(hdr->hea-hdr->dat));
-  } else {
-    data=amx->base+(int)hdr->dat;
-  } /* if */
-
-  /* Set a zero cell at the top of the stack, which functions
-   * as a sentinel for strings.
-   */
-  * (cell *)(data+(int)(hdr->stp-hdr->dat-sizeof(cell)))=0;
-
-  /* also align all addresses in the public function, public variable,
-   * public tag and native function tables --offsets into the name table
-   * (if present) must also be swapped.
-   */
-  #if BYTE_ORDER==BIG_ENDIAN
-  { /* local */
-    AMX_FUNCSTUB *fs;
-    int i,num;
-
-    fs=GETENTRY(hdr,natives,0);
-    num=NUMENTRIES(hdr,natives,libraries);
-    for (i=0; i<num; i++) {
-      amx_Align32(&fs->address);  /* redundant, because it should be zero */
-      amx_Align32(&fs->nameofs);
-      fs=(AMX_FUNCSTUB*)((unsigned char *)fs+hdr->defsize);
-    } /* for */
-
-    fs=GETENTRY(hdr,publics,0);
-    assert(hdr->publics<=hdr->natives);
-    num=NUMENTRIES(hdr,publics,natives);
-    for (i=0; i<num; i++) {
-      amx_Align32(&fs->address);
-      amx_Align32(&fs->nameofs);
-      fs=(AMX_FUNCSTUB*)((unsigned char *)fs+hdr->defsize);
-    } /* for */
-
-    fs=GETENTRY(hdr,pubvars,0);
-    assert(hdr->pubvars<=hdr->tags);
-    num=NUMENTRIES(hdr,pubvars,tags);
-    for (i=0; i<num; i++) {
-      amx_Align32(&fs->address);
-      amx_Align32(&fs->nameofs);
-      fs=(AMX_FUNCSTUB*)((unsigned char *)fs+hdr->defsize);
-    } /* for */
-
-    fs=GETENTRY(hdr,tags,0);
-    if (hdr->file_version<7) {  /* file version 7 introduced the name table */
-      assert(hdr->tags<=hdr->cod);
-      num=NUMENTRIES(hdr,tags,cod);
-    } else {
-      assert(hdr->tags<=hdr->nametable);
-      num=NUMENTRIES(hdr,tags,nametable);
-    } /* if */
-    for (i=0; i<num; i++) {
-      amx_Align32(&fs->address);
-      amx_Align32(&fs->nameofs);
-      fs=(AMX_FUNCSTUB*)((unsigned char *)fs+hdr->defsize);
-    } /* for */
-  } /* local */
-  #endif
-
-  /* verify P-code and relocate address in the case of the JIT */
-  if ((hdr->flags & AMX_FLAG_OVERLAY)==0) {
-    err=VerifyPcode(amx);
-  } else {
-    int i;
-    err=(amx->overlay==NULL) ? AMX_ERR_OVERLAY : AMX_ERR_NONE;
-    /* load every overlay on initialization and verify explicitly; we must
-     * do this to know whether to use new or old system requests
-     */
-    for (i=0; err==AMX_ERR_NONE && i<(int)((hdr->nametable - hdr->overlays)/sizeof(AMX_OVERLAYINFO)); i++) {
-      err=amx->overlay(amx, i);
-      if (err==AMX_ERR_NONE)
-        err=VerifyPcode(amx);
-    } /* for */
-  } /* if */
-  if (err!=AMX_ERR_NONE)
-    return err;
-
-  /* load any extension modules that the AMX refers to */
-  #if (defined _Windows || defined __LINUX__ || defined __FreeBSD__ || defined __OpenBSD__ || defined __APPLE__) && !defined AMX_NODYNALOAD
-  { /* local */
-    int i;
-    #if defined __LINUX__ || defined __FreeBSD__ || defined __OpenBSD__ || defined __APPLE__
-      root=getenv("AMXLIB");
-    #endif
-    hdr=(AMX_HEADER *)amx->base;
-    numlibraries=NUMENTRIES(hdr,libraries,pubvars);
-    for (i=0; i<numlibraries; i++) {
-      lib=GETENTRY(hdr,libraries,i);
-      libname[0]='\0';
-      #if defined __LINUX__ || defined __FreeBSD__ || defined __OpenBSD__ || defined __APPLE__
-        if (root!=NULL && *root!='\0') {
-          strcpy(libname,root);
-          if (libname[strlen(libname)-1]!='/')
-            strcat(libname,"/");
-        } /* if */
-      #endif
-      strcat(libname,"amx");
-      strcat(libname,GETENTRYNAME(hdr,lib));
-      #if defined _Windows
-        strcat(libname,".dll");
-        #if defined __WIN32__
-          hlib=LoadLibraryA(libname);
-        #else
-          hlib=LoadLibrary(libname);
-          if (hlib<=HINSTANCE_ERROR)
-            hlib=NULL;
-        #endif
-      #elif defined __LINUX__ || defined __FreeBSD__ || defined __OpenBSD__ || defined __APPLE__
-        strcat(libname,".so");
-        hlib=dlopen(libname,RTLD_NOW);
-      #endif
-      if (hlib!=NULL) {
-        /* a library that cannot be loaded or that does not have the required
-         * initialization function is simply ignored
-         */
-        char funcname[sNAMEMAX+9]; /* +1 for '\0', +4 for 'amx_', +4 for 'Init' */
-        strcpy(funcname,"amx_");
-        strcat(funcname,GETENTRYNAME(hdr,lib));
-        strcat(funcname,"Init");
-        #if defined _Windows
-          libinit=(AMX_ENTRY)GetProcAddress(hlib,funcname);
-        #elif defined __LINUX__ || defined __FreeBSD__ || defined __OpenBSD__ || defined __APPLE__
-          libinit=(AMX_ENTRY)dlsym(hlib,funcname);
-        #endif
-        if (libinit!=NULL)
-          libinit(amx);
-      } /* if */
-      lib->address=(ucell)(intptr_t)hlib;
-    } /* for */
-  } /* local */
-  #endif
-
-  return AMX_ERR_NONE;
-}
-
-#if defined AMX_JIT
-
-  #define CODESIZE_JIT    8192  /* approximate size of the code for the JIT */
-
-  #if defined __WIN32__   /* this also applies to Win32 "console" applications */
-
-    #define ALIGN(addr)     (addr)
-
-    #define PROT_READ       0x1         /* page can be read */
-    #define PROT_WRITE      0x2         /* page can be written */
-    #define PROT_EXEC       0x4         /* page can be executed */
-    #define PROT_NONE       0x0         /* page can not be accessed */
-
-    static int mprotect(void *addr, size_t len, int prot)
-    {
-      DWORD prev, p = 0;
-      if ((prot & PROT_WRITE)!=0)
-        p = PAGE_EXECUTE_READWRITE;
-      else
-        p |= PAGE_EXECUTE_READ;
-      return !VirtualProtect(addr, len, p, &prev);
-    }
-
-  #elif defined __LINUX__ || defined __FreeBSD__ || defined __OpenBSD__ || defined __APPLE__
-
-    /* Linux, BSD and OSX already have mprotect() */
-    #define ALIGN(addr) (char *)(((long)addr + sysconf(_SC_PAGESIZE)-1) & ~(sysconf(_SC_PAGESIZE)-1))
-
-  #else
-
-    // TODO: Add cases for Mac OS/X and other operating systems
-
-    /* DOS32 has no imposed limits on its segments */
-    #define ALIGN(addr)     (addr)
-    #define mprotect(addr, len, prot)   (0)
-
-  #endif /* #if defined __WIN32 __ */
-
-int AMXAPI amx_InitJIT(AMX *amx, void *reloc_table, void *native_code)
-{
-  int res;
-  AMX_HEADER *hdr;
-
-  if ((amx->flags & AMX_FLAG_JITC)==0)
-    return AMX_ERR_INIT_JIT;    /* flag not set, this AMX is not prepared for JIT */
-  if (hdr->file_version>MAX_FILE_VER_JIT)
-    return AMX_ERR_VERSION;     /* JIT may not support the newest file version(s) */
-  /* the JIT does not support overlays, but this is already checked in VerifyPcode()
-   * the same goes for macro instructions: not supported in the JIT, but already
-   * checked in VerifyPcode()
-   */
-
-  /* Patching SYSREQ(.N) opcodes to SYSREQ.(N)D cannot work in the JIT, because
-   * the program would need to be re-JIT-compiled after patching a P-code
-   * instruction. If this field is not zero, something went wrong in
-   * VerifyPcode().
-   */
-  assert(amx->sysreq_d==0);
-
-  if (mprotect(ALIGN(amx_jit_compile), CODESIZE_JIT, PROT_READ | PROT_WRITE | PROT_EXEC) != 0)
-    return AMX_ERR_INIT_JIT;
-
-  /* copy the prefix */
-  memcpy(native_code, amx->base, ((AMX_HEADER *)(amx->base))->cod);
-  hdr = native_code;
-
-  /* MP: added check for correct compilation */
-  if ((res = amx_jit_compile(amx->base, reloc_table, native_code)) == 0) {
-    /* update the required memory size (the previous value was a
-     * conservative estimate, now we know the exact size)
-     */
-    amx->codesize = (hdr->dat + hdr->stp + sizeof(cell)) & ~(sizeof(cell)-1);
-    /* The compiled code is relocatable, since only relative jumps are
-     * used for destinations within the generated code, and absolute
-     * addresses are only for jumps into the runtime, which is fixed
-     * in memory.
-     */
-    /* set the new pointers */
-    amx->base = (unsigned char*)native_code;
-    amx->code = amx->base + (int)hdr->cod;
-    amx->cip = hdr->cip;
-  } /* if */
-
-  return (res == 0) ? AMX_ERR_NONE : AMX_ERR_INIT_JIT;
-}
-
-#else /* #if defined AMX_JIT */
-
-int AMXAPI amx_InitJIT(AMX *amx,void *compiled_program,void *reloc_table)
-{
-  (void)amx;
-  (void)compiled_program;
-  (void)reloc_table;
-  return AMX_ERR_INIT_JIT;
-}
-
-#endif  /* #if defined AMX_JIT */
-
-#endif  /* AMX_INIT */
-
-#if defined AMX_CLEANUP
-int AMXAPI amx_Cleanup(AMX *amx)
-{
-  #if (defined _Windows || defined __LINUX__ || defined __FreeBSD__ || defined __OpenBSD__ || defined __APPLE__) && !defined AMX_NODYNALOAD
-    AMX_HEADER *hdr;
-    int numlibraries,i;
-    AMX_FUNCSTUB *lib;
-    AMX_ENTRY libcleanup;
-  #endif
-
-  /* unload all extension modules */
-  #if (defined _Windows || defined __LINUX__ || defined __FreeBSD__ || defined __OpenBSD__ || defined __APPLE__) && !defined AMX_NODYNALOAD
-    hdr=(AMX_HEADER *)amx->base;
-    assert(hdr->magic==AMX_MAGIC);
-    numlibraries=NUMENTRIES(hdr,libraries,pubvars);
-    for (i=0; i<numlibraries; i++) {
-      lib=GETENTRY(hdr,libraries,i);
-      if (lib->address!=0) {
-        char funcname[sNAMEMAX+12]; /* +1 for '\0', +4 for 'amx_', +7 for 'Cleanup' */
-        strcpy(funcname,"amx_");
-        strcat(funcname,GETENTRYNAME(hdr,lib));
-        strcat(funcname,"Cleanup");
-        #if defined _Windows
-          libcleanup=(AMX_ENTRY)GetProcAddress((HINSTANCE)lib->address,funcname);
-        #elif defined __LINUX__ || defined __FreeBSD__ || defined __OpenBSD__ || defined __APPLE__
-          libcleanup=(AMX_ENTRY)dlsym((void*)(intptr_t)lib->address,funcname);
-        #endif
-        if (libcleanup!=NULL)
-          libcleanup(amx);
-        #if defined _Windows
-          FreeLibrary((HINSTANCE)lib->address);
-        #elif defined __LINUX__ || defined __FreeBSD__ || defined __OpenBSD__ || defined __APPLE__
-          dlclose((void*)(intptr_t)lib->address);
-        #endif
-      } /* if */
-    } /* for */
-  #else
-    (void)amx;
-  #endif
-  return AMX_ERR_NONE;
-}
-#endif /* AMX_CLEANUP */
-
-#if defined AMX_CLONE
-int AMXAPI amx_Clone(AMX *amxClone, AMX *amxSource, void *data)
-{
-  AMX_HEADER *hdr;
-  unsigned char _FAR *dataSource;
-
-  if (amxSource==NULL)
-    return AMX_ERR_FORMAT;
-  if (amxClone==NULL)
-    return AMX_ERR_PARAMS;
-  if ((amxSource->flags & AMX_FLAG_INIT)==0)
-    return AMX_ERR_INIT;
-  hdr=(AMX_HEADER *)amxSource->base;
-  if (hdr->magic!=AMX_MAGIC)
-    return AMX_ERR_FORMAT;
-  if (hdr->file_version>CUR_FILE_VERSION || hdr->amx_version<MIN_FILE_VERSION)
-    return AMX_ERR_VERSION;
-
-  /* set initial values */
-  amxClone->base=amxSource->base;
-  amxClone->code=amxSource->code;
-  amxClone->codesize=amxSource->codesize;
-  amxClone->hlw=hdr->hea - hdr->dat; /* stack and heap relative to data segment */
-  amxClone->stp=hdr->stp - hdr->dat - sizeof(cell);
-  amxClone->hea=amxClone->hlw;
-  amxClone->stk=amxClone->stp;
-  if (amxClone->callback==NULL)
-    amxClone->callback=amxSource->callback;
-  if (amxClone->debug==NULL)
-    amxClone->debug=amxSource->debug;
-  amxClone->flags=amxSource->flags;
-
-  /* copy the data segment; the stack and the heap can be left uninitialized */
-  assert(data!=NULL);
-  amxClone->data=(unsigned char _FAR *)data;
-  dataSource=(amxSource->data!=NULL) ? amxSource->data : amxSource->base+(int)hdr->dat;
-  memcpy(amxClone->data,dataSource,(size_t)(hdr->hea-hdr->dat));
-
-  /* Set a zero cell at the top of the stack, which functions
-   * as a sentinel for strings.
-   */
-  * (cell *)(amxClone->data+(int)amxClone->stp) = 0;
-
-  return AMX_ERR_NONE;
-}
-#endif /* AMX_CLONE */
-
-#if defined AMX_MEMINFO
-int AMXAPI amx_MemInfo(AMX *amx, long *codesize, long *datasize, long *stackheap)
-{
-  AMX_HEADER *hdr;
-
-  if (amx==NULL)
-    return AMX_ERR_FORMAT;
-  hdr=(AMX_HEADER *)amx->base;
-  if (hdr->magic!=AMX_MAGIC)
-    return AMX_ERR_FORMAT;
-  if (hdr->file_version>CUR_FILE_VERSION || hdr->amx_version<MIN_FILE_VERSION)
-    return AMX_ERR_VERSION;
-
-  if (codesize!=NULL)
-    *codesize=amx->codesize;
-  if (datasize!=NULL)
-    *datasize=hdr->hea - hdr->dat;
-  if (stackheap!=NULL)
-    *stackheap=hdr->stp - hdr->hea;
-
-  return AMX_ERR_NONE;
-}
-#endif /* AMX_MEMINFO */
-
-#if defined AMX_NAMELENGTH
-int AMXAPI amx_NameLength(AMX *amx, int *length)
-{
-  AMX_HEADER *hdr;
-  uint16_t *namelength;
-
-  assert(amx!=NULL);
-  hdr=(AMX_HEADER *)amx->base;
-  assert(hdr!=NULL);
-  assert(hdr->magic==AMX_MAGIC);
-  namelength=(uint16_t*)(amx->base + (unsigned)hdr->nametable);
-  *length=*namelength;
-  return AMX_ERR_NONE;
-}
-#endif /* AMX_NAMELENGTH */
-
-#if defined AMX_XXXNATIVES
-int AMXAPI amx_NumNatives(AMX *amx, int *number)
-{
-  AMX_HEADER *hdr=(AMX_HEADER *)amx->base;
-  assert(hdr!=NULL);
-  assert(hdr->magic==AMX_MAGIC);
-  assert(hdr->natives<=hdr->libraries);
-  *number=NUMENTRIES(hdr,natives,libraries);
-  return AMX_ERR_NONE;
-}
-
-int AMXAPI amx_GetNative(AMX *amx, int index, char *name)
-{
-  AMX_HEADER *hdr;
-  AMX_FUNCSTUB *func;
-
-  hdr=(AMX_HEADER *)amx->base;
-  assert(hdr!=NULL);
-  assert(hdr->magic==AMX_MAGIC);
-  assert(hdr->natives<=hdr->libraries);
-  if (index>=(cell)NUMENTRIES(hdr,natives,libraries))
-    return AMX_ERR_INDEX;
-
-  func=GETENTRY(hdr,natives,index);
-  strcpy(name,GETENTRYNAME(hdr,func));
-  return AMX_ERR_NONE;
-}
-
-int AMXAPI amx_FindNative(AMX *amx, const char *name, int *index)
-{
-  int idx,last;
-  char pname[sNAMEMAX+1];
-
-  amx_NumNatives(amx, &last);
-  /* linear search, the natives table is not sorted alphabetically */
-  for (idx=0; idx<last; idx++) {
-    amx_GetNative(amx,idx,pname);
-    if (strcmp(pname,name)==0) {
-      *index=idx;
-      return AMX_ERR_NONE;
-    } /* if */
-  } /* for */
-  *index=INT_MAX;
-  return AMX_ERR_NOTFOUND;
-}
-#endif /* AMX_XXXNATIVES */
-
-#if defined AMX_XXXPUBLICS
-int AMXAPI amx_NumPublics(AMX *amx, int *number)
-{
-  AMX_HEADER *hdr=(AMX_HEADER *)amx->base;
-  assert(hdr!=NULL);
-  assert(hdr->magic==AMX_MAGIC);
-  assert(hdr->publics<=hdr->natives);
-  *number=NUMENTRIES(hdr,publics,natives);
-  return AMX_ERR_NONE;
-}
-
-int AMXAPI amx_GetPublic(AMX *amx, int index, char *name, ucell *address)
-{
-  AMX_HEADER *hdr;
-  AMX_FUNCSTUB *func;
-
-  hdr=(AMX_HEADER *)amx->base;
-  assert(hdr!=NULL);
-  assert(hdr->magic==AMX_MAGIC);
-  assert(hdr->publics<=hdr->natives);
-  if (index>=(cell)NUMENTRIES(hdr,publics,natives))
-    return AMX_ERR_INDEX;
-
-  func=GETENTRY(hdr,publics,index);
-  if (name!=NULL)
-    strcpy(name,GETENTRYNAME(hdr,func));
-  if (address!=NULL)
-    *address=func->address;
-  return AMX_ERR_NONE;
-}
-
-int AMXAPI amx_FindPublic(AMX *amx, const char *name, int *index)
-{
-  int first,last,mid,result;
-  char pname[sNAMEMAX+1];
-
-  amx_NumPublics(amx, &last);
-  last--;       /* last valid index is 1 less than the number of functions */
-  first=0;
-  /* binary search */
-  while (first<=last) {
-    mid=(first+last)/2;
-    amx_GetPublic(amx,mid,pname,NULL);
-    result=strcmp(pname,name);
-    if (result>0) {
-      last=mid-1;
-    } else if (result<0) {
-      first=mid+1;
-    } else {
-      *index=mid;
-      return AMX_ERR_NONE;
-    } /* if */
-  } /* while */
-  /* not found, set to an invalid index, so amx_Exec() on this index will fail
-   * with an error
-   */
-  *index=INT_MAX;
-  return AMX_ERR_NOTFOUND;
-}
-#endif /* AMX_XXXPUBLICS */
-
-#if defined AMX_XXXPUBVARS
-int AMXAPI amx_NumPubVars(AMX *amx, int *number)
-{
-  AMX_HEADER *hdr;
-
-  assert(amx!=NULL);
-  hdr=(AMX_HEADER *)amx->base;
-  assert(hdr!=NULL);
-  assert(hdr->magic==AMX_MAGIC);
-  assert(hdr->pubvars<=hdr->tags);
-  *number=NUMENTRIES(hdr,pubvars,tags);
-  return AMX_ERR_NONE;
-}
-
-int AMXAPI amx_GetPubVar(AMX *amx, int index, char *name, cell **address)
-{
-  AMX_HEADER *hdr;
-  AMX_FUNCSTUB *var;
-  unsigned char *data;
-
-  assert(amx!=NULL);
-  hdr=(AMX_HEADER *)amx->base;
-  assert(hdr!=NULL);
-  assert(hdr->magic==AMX_MAGIC);
-  assert(hdr->pubvars<=hdr->tags);
-  if (index>=(cell)NUMENTRIES(hdr,pubvars,tags))
-    return AMX_ERR_INDEX;
-
-  var=GETENTRY(hdr,pubvars,index);
-  strcpy(name,GETENTRYNAME(hdr,var));
-  data=(amx->data!=NULL) ? amx->data : amx->base+(int)hdr->dat;
-  assert(address!=NULL);
-  *address=(cell *)(data+(int)var->address);
-  return AMX_ERR_NONE;
-}
-
-int AMXAPI amx_FindPubVar(AMX *amx, const char *name, cell **address)
-{
-  int first,last,mid,result;
-  char pname[sNAMEMAX+1];
-
-  amx_NumPubVars(amx,&last);
-  last--;       /* last valid index is 1 less than the number of functions */
-  first=0;
-  /* binary search */
-  while (first<=last) {
-    mid=(first+last)/2;
-    amx_GetPubVar(amx,mid,pname,address);
-    result=strcmp(pname,name);
-    if (result>0)
-      last=mid-1;
-    else if (result<0)
-      first=mid+1;
-    else
-      return AMX_ERR_NONE;
-  } /* while */
-  /* not found */
-  assert(address!=NULL);
-  *address=NULL;
-  return AMX_ERR_NOTFOUND;
-}
-#endif /* AMX_XXXPUBVARS */
-
-#if defined AMX_XXXTAGS
-int AMXAPI amx_NumTags(AMX *amx, int *number)
-{
-  AMX_HEADER *hdr=(AMX_HEADER *)amx->base;
-  assert(hdr!=NULL);
-  assert(hdr->magic==AMX_MAGIC);
-  if (hdr->file_version<5) {    /* the tagname table appeared in file format 5 */
-    *number=0;
-    return AMX_ERR_VERSION;
-  } /* if */
-  if (hdr->file_version<7) {    /* file version 7 introduced the name table */
-    assert(hdr->tags<=hdr->cod);
-    *number=NUMENTRIES(hdr,tags,cod);
-  } else {
-    assert(hdr->tags<=hdr->nametable);
-    *number=NUMENTRIES(hdr,tags,nametable);
-  } /* if */
-  return AMX_ERR_NONE;
-}
-
-int AMXAPI amx_GetTag(AMX *amx, int index, char *tagname, cell *tag_id)
-{
-  AMX_HEADER *hdr;
-  AMX_FUNCSTUB *tag;
-
-  hdr=(AMX_HEADER *)amx->base;
-  assert(hdr!=NULL);
-  assert(hdr->magic==AMX_MAGIC);
-  if (hdr->file_version<5) {    /* the tagname table appeared in file format 5 */
-    *tagname='\0';
-    *tag_id=0;
-    return AMX_ERR_VERSION;
-  } /* if */
-
-  if (hdr->file_version<7) {    /* file version 7 introduced the name table */
-    assert(hdr->tags<=hdr->cod);
-    if (index>=(cell)NUMENTRIES(hdr,tags,cod))
-      return AMX_ERR_INDEX;
-  } else {
-    assert(hdr->tags<=hdr->nametable);
-    if (index>=(cell)NUMENTRIES(hdr,tags,nametable))
-      return AMX_ERR_INDEX;
-  } /* if */
-
-  tag=GETENTRY(hdr,tags,index);
-  strcpy(tagname,GETENTRYNAME(hdr,tag));
-  *tag_id=tag->address;
-
-  return AMX_ERR_NONE;
-}
-
-int AMXAPI amx_FindTagId(AMX *amx, cell tag_id, char *tagname)
-{
-  int first,last,mid;
-  cell mid_id;
-
-  #if !defined NDEBUG
-    /* verify that the tagname table is sorted on the tag_id */
-    amx_NumTags(amx, &last);
-    if (last>0) {
-      cell cur_id;
-      amx_GetTag(amx,0,tagname,&cur_id);
-      for (first=1; first<last; first++) {
-        amx_GetTag(amx,first,tagname,&mid_id);
-        assert(cur_id<mid_id);
-        cur_id=mid_id;
-      } /* for */
-    } /* if */
-  #endif
-
-  amx_NumTags(amx, &last);
-  last--;       /* last valid index is 1 less than the number of functions */
-  first=0;
-  /* binary search */
-  while (first<=last) {
-    mid=(first+last)/2;
-    amx_GetTag(amx,mid,tagname,&mid_id);
-    if (mid_id>tag_id)
-      last=mid-1;
-    else if (mid_id<tag_id)
-      first=mid+1;
-    else
-      return AMX_ERR_NONE;
-  } /* while */
-  /* not found */
-  *tagname='\0';
-  return AMX_ERR_NOTFOUND;
-}
-#endif /* AMX_XXXTAGS */
-
-#if defined AMX_XXXUSERDATA
-int AMXAPI amx_GetUserData(AMX *amx, long tag, void **ptr)
-{
-  int index;
-
-  assert(amx!=NULL);
-  assert(tag!=0);
-  for (index=0; index<AMX_USERNUM && amx->usertags[index]!=tag; index++)
-    /* nothing */;
-  if (index>=AMX_USERNUM)
-    return AMX_ERR_USERDATA;
-  *ptr=amx->userdata[index];
-  return AMX_ERR_NONE;
-}
-
-int AMXAPI amx_SetUserData(AMX *amx, long tag, void *ptr)
-{
-  int index;
-
-  assert(amx!=NULL);
-  assert(tag!=0);
-  /* try to find existing tag */
-  for (index=0; index<AMX_USERNUM && amx->usertags[index]!=tag; index++)
-    /* nothing */;
-  /* if not found, try to find empty tag */
-  if (index>=AMX_USERNUM)
-    for (index=0; index<AMX_USERNUM && amx->usertags[index]!=0; index++)
-      /* nothing */;
-  /* if still not found, quit with error */
-  if (index>=AMX_USERNUM)
-    return AMX_ERR_INDEX;
-  /* set the tag and the value */
-  amx->usertags[index]=tag;
-  amx->userdata[index]=ptr;
-  return AMX_ERR_NONE;
-}
-#endif /* AMX_XXXUSERDATA */
-
-#if defined AMX_REGISTER
-static AMX_NATIVE findfunction(char *name, const AMX_NATIVE_INFO *list, int number)
-{
-  int i;
-
-  assert(list!=NULL);
-  for (i=0; list[i].name!=NULL && (i<number || number==-1); i++)
-    if (strcmp(name,list[i].name)==0)
-      return list[i].func;
-  return NULL;
-}
-
-int AMXAPI amx_Register(AMX *amx, const AMX_NATIVE_INFO *list, int number)
-{
-  AMX_FUNCSTUB *func;
-  AMX_HEADER *hdr;
-  int i,numnatives,err;
-  AMX_NATIVE funcptr;
-
-  assert(amx!=NULL);
-  hdr=(AMX_HEADER *)amx->base;
-  assert(hdr!=NULL);
-  assert(hdr->magic==AMX_MAGIC);
-  assert(hdr->natives<=hdr->libraries);
-  numnatives=NUMENTRIES(hdr,natives,libraries);
-
-  err=AMX_ERR_NONE;
-  func=GETENTRY(hdr,natives,0);
-  for (i=0; i<numnatives; i++) {
-    if (func->address==0) {
-      /* this function is not yet located */
-      funcptr=(list!=NULL) ? findfunction(GETENTRYNAME(hdr,func),list,number) : NULL;
-      if (funcptr!=NULL)
-        func->address=(ucell)(intptr_t)funcptr;
-      else
-        err=AMX_ERR_NOTFOUND;
-    } /* if */
-    func=(AMX_FUNCSTUB*)((unsigned char*)func+hdr->defsize);
-  } /* for */
-  if (err==AMX_ERR_NONE)
-    amx->flags|=AMX_FLAG_NTVREG;
-  return err;
-}
-#endif /* AMX_REGISTER */
-
-#if defined AMX_NATIVEINFO
-AMX_NATIVE_INFO * AMXAPI amx_NativeInfo(const char *name, AMX_NATIVE func)
-{
-  static AMX_NATIVE_INFO n;
-  n.name=name;
-  n.func=func;
-  return &n;
-}
-#endif /* AMX_NATIVEINFO */
-
-
-#define STKMARGIN       ((cell)(16*sizeof(cell)))
-
-#if defined AMX_PUSHXXX
-
-int AMXAPI amx_Push(AMX *amx, cell value)
-{
-  AMX_HEADER *hdr;
-  unsigned char *data;
-
-  if (amx->hea+STKMARGIN>amx->stk)
-    return AMX_ERR_STACKERR;
-  hdr=(AMX_HEADER *)amx->base;
-  data=(amx->data!=NULL) ? amx->data : amx->base+(int)hdr->dat;
-  amx->stk-=sizeof(cell);
-  amx->paramcount+=1;
-  *(cell *)(data+(int)amx->stk)=value;
-  return AMX_ERR_NONE;
-}
-
-int AMXAPI amx_PushAddress(AMX *amx, cell *address)
-{
-  AMX_HEADER *hdr;
-  unsigned char *data;
-  cell xaddr;
-
-  /* reverse relocate the address */
-  assert(amx!=NULL);
-  hdr=(AMX_HEADER *)amx->base;
-  assert(hdr!=NULL);
-  assert(hdr->magic==AMX_MAGIC);
-  data=(amx->data!=NULL) ? amx->data : amx->base+(int)hdr->dat;
-  xaddr=(cell)((unsigned char*)address-data);
-  if ((ucell)xaddr>=(ucell)amx->stp)
-    return AMX_ERR_MEMACCESS;
-  return amx_Push(amx,xaddr);
-}
-
-int AMXAPI amx_PushArray(AMX *amx, cell **address, const cell array[], int numcells)
-{
-  cell xaddr,*paddr;
-  int err;
-
-  assert(amx!=NULL);
-  assert(array!=NULL);
-
-  xaddr=amx->hea; /* save, before it is modified by amx_Allot() */
-  err=amx_Allot(amx,numcells,&paddr);
-  if (err==AMX_ERR_NONE) {
-    memcpy(paddr,array,numcells*sizeof(cell));
-    err=amx_Push(amx,xaddr);
-  } /* if */
-  if (address!=NULL)
-    *address=paddr;
-  return err;
-}
-
-int AMXAPI amx_PushString(AMX *amx, cell **address, const char *string, int pack, int use_wchar)
-{
-  cell xaddr,*paddr;
-  int numcells,err;
-
-  assert(amx!=NULL);
-  assert(string!=NULL);
-
-  #if defined AMX_ANSIONLY
-    numcells=strlen(string) + 1;
-  #else
-    numcells= (int)(use_wchar ? wcslen((const wchar_t*)string) : strlen(string)) + 1;
-  #endif
-  if (pack)
-    numcells=(numcells+sizeof(cell)-1)/sizeof(cell);
-  xaddr=amx->hea; /* save, before it is modified by amx_Allot() */
-  err=amx_Allot(amx,numcells,&paddr);
-  if (err==AMX_ERR_NONE) {
-    amx_SetString(paddr,string,pack,use_wchar,numcells);
-    err=amx_Push(amx,xaddr);
-  } /* if */
-  if (address!=NULL)
-    *address=paddr;
-  return err;
-}
-#endif /* AMX_PUSHXXX */
-
-#if defined AMX_EXEC
-
-/* It is assumed that the abstract machine can simply access the memory area
- * for the global data and the stack. If this is not the case, you need to
- * define the macro sets _R() and _W(), for reading and writing to memory.
- */
-#if !defined _R
-  #define _R_DEFAULT            /* mark default memory access */
-  #define _R(base,addr)         (* (cell *)((unsigned char*)(base)+(int)(addr)))
-  #define _R8(base,addr)        (* (unsigned char *)((unsigned char*)(base)+(int)(addr)))
-  #define _R16(base,addr)       (* (uint16_t *)((unsigned char*)(base)+(int)(addr)))
-  #define _R32(base,addr)       (* (uint32_t *)((unsigned char*)(base)+(int)(addr)))
-#endif
-#if !defined _W
-  #define _W_DEFAULT            /* mark default memory access */
-  #define _W(base,addr,value)   ((*(cell *)((unsigned char*)(base)+(int)(addr)))=(cell)(value))
-  #define _W8(base,addr,value)  ((*(unsigned char *)((unsigned char*)(base)+(int)(addr)))=(unsigned char)(value))
-  #define _W16(base,addr,value) ((*(uint16_t *)((unsigned char*)(base)+(int)(addr)))=(uint16_t)(value))
-  #define _W32(base,addr,value) ((*(uint32_t *)((unsigned char*)(base)+(int)(addr)))=(uint32_t)(value))
-#endif
-
-#if -8/3==-2 && 8/-3==-2
-  #define TRUNC_SDIV    /* signed divisions are truncated on this platform */
-#else
-  #define IABS(a)       ((a)>=0 ? (a) : (-a))
-#endif
-
-/* The pseudo-instructions come from the code stream. Normally, these are just
- * accessed from memory. When the instructions must be fetched in some other
- * way, the definition below must be pre-defined.
- * N.B.:
- *   - reading from a code address should increment the instruction pointer
- *     (called "cip")
- *   - only cell-sized accesses occur in code memory
- */
-#if !defined _RCODE
-  #define _RCODE()      ( *cip++ )
-#endif
-
-#if !defined GETPARAM
-  #define GETPARAM(v)   ( v=_RCODE() )   /* read a parameter from the opcode stream */
-#endif
-#if !defined SKIPPARAM
-  #define SKIPPARAM(n)  ( cip=(cell *)cip+(n) ) /* for obsolete opcodes */
-#endif
-
-#define AMXPUSH(v)      ( amx->stk-=sizeof(cell), *(cell*)(data+amx->stk)=(v) )
-#define ABORT(amx,v)    { (amx)->stk=reset_stk; (amx)->hea=reset_hea; return v; }
-
-
-#if !defined AMX_ALTCORE
-int amx_exec_list(AMX *amx,const cell **opcodelist,int *numopcodes)
-{
-  (void)amx;
-  assert(opcodelist!=NULL);
-  *opcodelist=NULL;
-  assert(numopcodes!=NULL);
-  *numopcodes=OP_NUM_OPCODES;
-  return 0;
-}
-#endif
-
-int AMXAPI amx_Exec(AMX *amx, cell *retval, int index)
-{
-  AMX_HEADER *hdr;
-  AMX_FUNCSTUB *func;
-  unsigned char *data;
-  cell reset_stk,reset_hea;
-  int i;
-#if !defined AMX_ALTCORE
-  cell pri,alt,stk,frm,hea;
-  cell *cip,op,offs,val;
-#endif
-
-  assert(amx!=NULL);
-  if ((amx->flags & AMX_FLAG_INIT)==0)
-    return AMX_ERR_INIT;
-  if (amx->callback==NULL)
-    return AMX_ERR_CALLBACK;
-
-  hdr=(AMX_HEADER *)amx->base;
-  assert(hdr!=NULL);
-  assert(hdr->magic==AMX_MAGIC);
-
-  if ((amx->flags & AMX_FLAG_NTVREG)==0) {
-    /* verify that all native functions have been registered (or do not
-     * need registering)
-     */
-    int numnatives;
-    assert(hdr->natives<=hdr->libraries);
-    numnatives=NUMENTRIES(hdr,natives,libraries);
-    func=GETENTRY(hdr,natives,0);
-    for (i=0; i<numnatives && func->address!=0; i++)
-      func=(AMX_FUNCSTUB*)((unsigned char*)func+hdr->defsize);
-    if (i<numnatives)
-      return AMX_ERR_NOTFOUND;
-    amx->flags|=AMX_FLAG_NTVREG;  /* no need to check this again */
-  } /* if */
-  assert((amx->flags & AMX_FLAG_VERIFY)==0);
-
-  /* set up the registers */
-  assert(hdr!=NULL && hdr->magic==AMX_MAGIC);
-  assert(amx->code!=NULL || hdr->overlays!=hdr->nametable);
-  data=(amx->data!=NULL) ? amx->data : amx->base+(int)hdr->dat;
-  reset_stk=amx->stk;
-  reset_hea=amx->hea;
-  amx->error=AMX_ERR_NONE;
-
-  /* get the start address */
-  if (index==AMX_EXEC_MAIN) {
-    if (hdr->cip<0)
-      return AMX_ERR_INDEX;
-    amx->cip=hdr->cip;
-    if (hdr->overlays!=hdr->nametable) {
-      assert(hdr->overlays!=0);
-      assert(amx->overlay!=NULL);
-      amx->ovl_index=(int)hdr->cip;
-      if ((i=amx->overlay(amx,amx->ovl_index))!=AMX_ERR_NONE)
-        return i;
-      amx->cip=0;
-    } /* if */
-  } else if (index==AMX_EXEC_CONT) {
-    /* restore registers reset_stk & reset_hea */
-    reset_stk=amx->reset_stk;
-    reset_hea=amx->reset_hea;
-    if (hdr->overlays!=hdr->nametable) {
-      assert(hdr->overlays!=0);
-      assert(amx->overlay!=NULL);
-      if ((i=amx->overlay(amx,amx->ovl_index))!=AMX_ERR_NONE)
-        return i;
-    } /* if */
-  } else if (index<0) {
-    return AMX_ERR_INDEX;
-  } else {
-    if (index>=(int)NUMENTRIES(hdr,publics,natives))
-      return AMX_ERR_INDEX;
-    func=GETENTRY(hdr,publics,index);
-    amx->cip=func->address;
-    if (hdr->overlays!=hdr->nametable) {
-      assert(hdr->overlays!=0);
-      assert(amx->overlay!=NULL);
-      amx->ovl_index=func->address;
-      if ((i=amx->overlay(amx,amx->ovl_index))!=AMX_ERR_NONE)
-        return i;
-      amx->cip=0;
-    } /* if */
-  } /* if */
-  /* check values just copied */
-  if (amx->stk>amx->stp)
-    return AMX_ERR_STACKLOW;
-  if (amx->hea<amx->hlw)
-    return AMX_ERR_HEAPLOW;
-  assert(check_endian());
-
-  /* sanity checks */
-  assert_static(OP_XCHG==21);
-  assert_static(OP_SMUL==42);
-  assert_static(OP_MOVS==64);
-  #if !defined AMX_NO_MACRO_INSTR
-    assert_static(OP_LIDX==81);
-    assert_static(OP_ZERO_PRI==102);
-    assert_static(OP_LOAD2==120);
-  #endif
-  #if !defined AMX_NO_PACKED_OPC
-    assert_static(OP_LOAD_P_PRI==124);
-    assert_static(OP_ALIGN_P_PRI==141);
-    assert_static(OP_BOUNDS_P==174);
-  #endif
-  #if PAWN_CELL_SIZE==16
-    assert_static(sizeof(cell)==2);
-  #elif PAWN_CELL_SIZE==32
-    assert_static(sizeof(cell)==4);
-  #elif PAWN_CELL_SIZE==64
-    assert_static(sizeof(cell)==8);
-  #else
-    #error Unsupported cell size
-  #endif
-
-  if (index!=AMX_EXEC_CONT) {
-    reset_stk+=amx->paramcount*sizeof(cell);
-    AMXPUSH(amx->paramcount*sizeof(cell));
-    amx->paramcount=0;          /* push the parameter count to the stack & reset */
-    AMXPUSH(0);                 /* return address (for overlays: overlay 0, offset 0) */
-  } /* if */
-  /* check stack/heap before starting to run */
-  if (amx->hea+STKMARGIN>amx->stk)
-    return AMX_ERR_STACKERR;
-
-#if defined AMX_ALTCORE
-
-  /* start running either the ARM or 80x86 assembler abstract machine or the JIT */
-  #if defined AMX_ASM && defined AMX_JIT
-    if ((amx->flags & AMX_FLAG_JITC)!=0)
-      i = amx_jit_run(amx,retval,data);
-    else
-      i = amx_exec_run(amx,retval,data);
-  #elif defined AMX_JIT
-    i = amx_jit_run(amx,retval,data);
-  #else
-    /* also for GNU GCC and Intel C/C++ versions */
-    i = amx_exec_run(amx,retval,data);
-  #endif
-  if (i == AMX_ERR_SLEEP) {
-    amx->reset_stk=reset_stk;
-    amx->reset_hea=reset_hea;
-  } else {
-    /* remove parameters from the stack; do this the "hard" way, because
-     * the assembler version has no internal knowledge of the local
-     * variables, so any "clean" way would be a kludge anyway.
-     */
-    amx->stk=reset_stk;
-    amx->hea=reset_hea;
-  } /* if */
-  return i;
-
-#else
-
-  #define CHKMARGIN()   if (hea+STKMARGIN>stk) return AMX_ERR_STACKERR
-  #define CHKSTACK()    if (stk>amx->stp) return AMX_ERR_STACKLOW
-  #define CHKHEAP()     if (hea<amx->hlw) return AMX_ERR_HEAPLOW
-
-  /* PUSH() and POP() are defined in terms of the _R() and _W() macros */
-  #define PUSH(v)       ( stk-=sizeof(cell), _W(data,stk,v) )
-  #define POP(v)        ( v=_R(data,stk), stk+=sizeof(cell) )
-
-  /* set up registers for ANSI-C core: pri, alt, frm, cip, hea, stk */
-  pri=amx->pri;
-  alt=amx->alt;
-  frm=amx->frm;
-  cip=(cell *)(amx->code+(int)amx->cip);
-  hea=amx->hea;
-  stk=amx->stk;
-
-  /* start running */
-  for ( ;; ) {
-    op=_RCODE();
-    switch (GETOPCODE(op)) {
-    /* core instruction set */
-    case OP_NOP:
-      break;
-    case OP_LOAD_PRI:
-      GETPARAM(offs);
-      pri=_R(data,offs);
-      break;
-    case OP_LOAD_ALT:
-      GETPARAM(offs);
-      alt=_R(data,offs);
-      break;
-    case OP_LOAD_S_PRI:
-      GETPARAM(offs);
-      pri=_R(data,frm+offs);
-      break;
-    case OP_LOAD_S_ALT:
-      GETPARAM(offs);
-      alt=_R(data,frm+offs);
-      break;
-    case OP_LREF_S_PRI:
-      GETPARAM(offs);
-      offs=_R(data,frm+offs);
-      pri=_R(data,offs);
-      break;
-    case OP_LREF_S_ALT:
-      GETPARAM(offs);
-      offs=_R(data,frm+offs);
-      alt=_R(data,offs);
-      break;
-    case OP_LOAD_I:
-      /* verify address */
-      if (pri>=hea && pri<stk || (ucell)pri>=(ucell)amx->stp)
-        ABORT(amx,AMX_ERR_MEMACCESS);
-      pri=_R(data,pri);
-      break;
-    case OP_LODB_I:
-      GETPARAM(offs);
-    __lodb_i:
-      /* verify address */
-      if (pri>=hea && pri<stk || (ucell)pri>=(ucell)amx->stp)
-        ABORT(amx,AMX_ERR_MEMACCESS);
-      switch ((int)offs) {
-      case 1:
-        pri=_R8(data,pri);
-        break;
-      case 2:
-        pri=_R16(data,pri);
-        break;
-      case 4:
-        pri=_R32(data,pri);
-        break;
-      } /* switch */
-      break;
-    case OP_CONST_PRI:
-      GETPARAM(pri);
-      break;
-    case OP_CONST_ALT:
-      GETPARAM(alt);
-      break;
-    case OP_ADDR_PRI:
-      GETPARAM(pri);
-      pri+=frm;
-      break;
-    case OP_ADDR_ALT:
-      GETPARAM(alt);
-      alt+=frm;
-      break;
-    case OP_STOR:
-      GETPARAM(offs);
-      _W(data,offs,pri);
-      break;
-    case OP_STOR_S:
-      GETPARAM(offs);
-      _W(data,frm+offs,pri);
-      break;
-    case OP_SREF_S:
-      GETPARAM(offs);
-      offs=_R(data,frm+offs);
-      _W(data,offs,pri);
-      break;
-    case OP_STOR_I:
-      /* verify address */
-      if (alt>=hea && alt<stk || (ucell)alt>=(ucell)amx->stp)
-        ABORT(amx,AMX_ERR_MEMACCESS);
-      _W(data,alt,pri);
-      break;
-    case OP_STRB_I:
-      GETPARAM(offs);
-    __strb_i:
-      /* verify address */
-      if (alt>=hea && alt<stk || (ucell)alt>=(ucell)amx->stp)
-        ABORT(amx,AMX_ERR_MEMACCESS);
-      switch ((int)offs) {
-      case 1:
-        _W8(data,alt,pri);
-        break;
-      case 2:
-        _W16(data,alt,pri);
-        break;
-      case 4:
-        _W32(data,alt,pri);
-        break;
-      } /* switch */
-      break;
-    case OP_ALIGN_PRI:
-      GETPARAM(offs);
-      #if BYTE_ORDER==LITTLE_ENDIAN
-        if ((size_t)offs<sizeof(cell))
-          pri ^= sizeof(cell)-offs;
-      #endif
-      break;
-    case OP_LCTRL:
-      GETPARAM(offs);
-      switch ((int)offs) {
-      case 0:
-        pri=hdr->cod;
-        break;
-      case 1:
-        pri=hdr->dat;
-        break;
-      case 2:
-        pri=hea;
-        break;
-      case 3:
-        pri=amx->stp;
-        break;
-      case 4:
-        pri=stk;
-        break;
-      case 5:
-        pri=frm;
-        break;
-      case 6:
-        pri=(cell)((unsigned char *)cip-amx->code);
-        break;
-      } /* switch */
-      break;
-    case OP_SCTRL:
-      GETPARAM(offs);
-      switch ((int)offs) {
-      case 0:
-      case 1:
-      case 3:
-        /* cannot change these parameters */
-        break;
-      case 2:
-        hea=pri;
-        break;
-      case 4:
-        stk=pri;
-        break;
-      case 5:
-        frm=pri;
-        break;
-      case 6:
-        cip=(cell *)(amx->code + (int)pri);
-        break;
-      } /* switch */
-      break;
-    case OP_XCHG:
-      offs=pri;         /* offs is a temporary variable */
-      pri=alt;
-      alt=offs;
-      break;
-    case OP_PUSH_PRI:
-      PUSH(pri);
-      break;
-    case OP_PUSH_ALT:
-      PUSH(alt);
-      break;
-    case OP_PUSHR_PRI:
-      PUSH((intptr_t)data+pri);
-      break;
-    case OP_POP_PRI:
-      POP(pri);
-      break;
-    case OP_POP_ALT:
-      POP(alt);
-      break;
-    case OP_PICK:
-      GETPARAM(offs);
-      pri=_R(data,stk+offs);
-      break;
-    case OP_STACK:
-      GETPARAM(offs);
-      alt=stk;
-      stk+=offs;
-      CHKMARGIN();
-      CHKSTACK();
-      break;
-    case OP_HEAP:
-      GETPARAM(offs);
-      alt=hea;
-      hea+=offs;
-      CHKMARGIN();
-      CHKHEAP();
-      break;
-    case OP_PROC:
-      PUSH(frm);
-      frm=stk;
-      CHKMARGIN();
-      break;
-    case OP_RET:
-      POP(frm);
-      POP(offs);
-      /* verify the return address */
-      if ((long)offs>=amx->codesize)
-        ABORT(amx,AMX_ERR_MEMACCESS);
-      cip=(cell *)(amx->code+(int)offs);
-      break;
-    case OP_RETN:
-      POP(frm);
-      POP(offs);
-      /* verify the return address */
-      if ((long)offs>=amx->codesize)
-        ABORT(amx,AMX_ERR_MEMACCESS);
-      cip=(cell *)(amx->code+(int)offs);
-      stk+=_R(data,stk)+sizeof(cell);   /* remove parameters from the stack */
-      break;
-    case OP_CALL:
-      PUSH(((unsigned char *)cip-amx->code)+sizeof(cell));/* skip address */
-      cip=JUMPREL(cip);                 /* jump to the address */
-      break;
-    case OP_JUMP:
-      /* since the GETPARAM() macro modifies cip, you cannot
-       * do GETPARAM(cip) directly */
-      cip=JUMPREL(cip);
-      break;
-    case OP_JZER:
-      if (pri==0)
-        cip=JUMPREL(cip);
-      else
-        SKIPPARAM(1);
-      break;
-    case OP_JNZ:
-      if (pri!=0)
-        cip=JUMPREL(cip);
-      else
-        SKIPPARAM(1);
-      break;
-    case OP_SHL:
-      pri<<=alt;
-      break;
-    case OP_SHR:
-      pri=(ucell)pri >> (int)alt;
-      break;
-    case OP_SSHR:
-      pri>>=alt;
-      break;
-    case OP_SHL_C_PRI:
-      GETPARAM(offs);
-      pri<<=offs;
-      break;
-    case OP_SHL_C_ALT:
-      GETPARAM(offs);
-      alt<<=offs;
-      break;
-    case OP_SMUL:
-      pri*=alt;
-      break;
-    case OP_SDIV:
-      if (pri==0)
-        ABORT(amx,AMX_ERR_DIVIDE);
-      /* use floored division and matching remainder */
-      offs=pri;
-      #if defined TRUNC_SDIV
-        pri=alt/offs;
-        alt=alt%offs;
-      #else
-        val=alt;                /* portable routine for truncated division */
-        pri=IABS(alt)/IABS(offs);
-        if ((cell)(val ^ offs)<0)
-          pri=-pri;
-        alt=val-pri*offs;       /* calculate the matching remainder */
-      #endif
-      /* now "fiddle" with the values to get floored division */
-      if (alt!=0 && (cell)(alt ^ offs)<0) {
-        pri--;
-        alt+=offs;
-      } /* if */
-      break;
-    case OP_ADD:
-      pri+=alt;
-      break;
-    case OP_SUB:
-      pri=alt-pri;
-      break;
-    case OP_AND:
-      pri&=alt;
-      break;
-    case OP_OR:
-      pri|=alt;
-      break;
-    case OP_XOR:
-      pri^=alt;
-      break;
-    case OP_NOT:
-      pri=!pri;
-      break;
-    case OP_NEG:
-      pri=-pri;
-      break;
-    case OP_INVERT:
-      pri=~pri;
-      break;
-    case OP_EQ:
-      pri= pri==alt ? 1 : 0;
-      break;
-    case OP_NEQ:
-      pri= pri!=alt ? 1 : 0;
-      break;
-    case OP_SLESS:
-      pri= pri<alt ? 1 : 0;
-      break;
-    case OP_SLEQ:
-      pri= pri<=alt ? 1 : 0;
-      break;
-    case OP_SGRTR:
-      pri= pri>alt ? 1 : 0;
-      break;
-    case OP_SGEQ:
-      pri= pri>=alt ? 1 : 0;
-      break;
-    case OP_INC_PRI:
-      pri++;
-      break;
-    case OP_INC_ALT:
-      alt++;
-      break;
-    case OP_INC_I:
-      #if defined _R_DEFAULT
-        *(cell *)(data+(int)pri) += 1;
-      #else
-        val=_R(data,pri);
-        _W(data,pri,val+1);
-      #endif
-      break;
-    case OP_DEC_PRI:
-      pri--;
-      break;
-    case OP_DEC_ALT:
-      alt--;
-      break;
-    case OP_DEC_I:
-      #if defined _R_DEFAULT
-        *(cell *)(data+(int)pri) -= 1;
-      #else
-        val=_R(data,pri);
-        _W(data,pri,val-1);
-      #endif
-      break;
-    case OP_MOVS:
-      GETPARAM(offs);
-    __movs:
-      /* verify top & bottom memory addresses, for both source and destination
-       * addresses
-       */
-      if (pri>=hea && pri<stk || (ucell)pri>=(ucell)amx->stp)
-        ABORT(amx,AMX_ERR_MEMACCESS);
-      if ((pri+offs)>hea && (pri+offs)<stk || (ucell)(pri+offs)>(ucell)amx->stp)
-        ABORT(amx,AMX_ERR_MEMACCESS);
-      if (alt>=hea && alt<stk || (ucell)alt>=(ucell)amx->stp)
-        ABORT(amx,AMX_ERR_MEMACCESS);
-      if ((alt+offs)>hea && (alt+offs)<stk || (ucell)(alt+offs)>(ucell)amx->stp)
-        ABORT(amx,AMX_ERR_MEMACCESS);
-      #if defined _R_DEFAULT
-        memcpy(data+(int)alt, data+(int)pri, (int)offs);
-      #else
-        for (i=0; i+4<offs; i+=4) {
-          val=_R32(data,pri+i);
-          _W32(data,alt+i,val);
-        } /* for */
-        for ( ; i<offs; i++) {
-          val=_R8(data,pri+i);
-          _W8(data,alt+i,val);
-        } /* for */
-      #endif
-      break;
-    case OP_CMPS:
-      GETPARAM(offs);
-    __cmps:
-      /* verify top & bottom memory addresses, for both source and destination
-       * addresses
-       */
-      if (pri>=hea && pri<stk || (ucell)pri>=(ucell)amx->stp)
-        ABORT(amx,AMX_ERR_MEMACCESS);
-      if ((pri+offs)>hea && (pri+offs)<stk || (ucell)(pri+offs)>(ucell)amx->stp)
-        ABORT(amx,AMX_ERR_MEMACCESS);
-      if (alt>=hea && alt<stk || (ucell)alt>=(ucell)amx->stp)
-        ABORT(amx,AMX_ERR_MEMACCESS);
-      if ((alt+offs)>hea && (alt+offs)<stk || (ucell)(alt+offs)>(ucell)amx->stp)
-        ABORT(amx,AMX_ERR_MEMACCESS);
-      #if defined _R_DEFAULT
-        pri=memcmp(data+(int)alt, data+(int)pri, (int)offs);
-      #else
-        pri=0;
-        for (i=0; i+4<offs && pri==0; i+=4)
-          pri=_R32(data,alt+i)-_R32(data,pri+i);
-        for ( ; i<offs && pri==0; i++)
-          pri=_R8(data,alt+i)-_R8(data,pri+i);
-      #endif
-      break;
-    case OP_FILL:
-      GETPARAM(offs);
-    __fill:
-      /* verify top & bottom memory addresses (destination only) */
-      if (alt>=hea && alt<stk || (ucell)alt>=(ucell)amx->stp)
-        ABORT(amx,AMX_ERR_MEMACCESS);
-      if ((alt+offs)>hea && (alt+offs)<stk || (ucell)(alt+offs)>(ucell)amx->stp)
-        ABORT(amx,AMX_ERR_MEMACCESS);
-      for (i=(int)alt; (size_t)offs>=sizeof(cell); i+=sizeof(cell), offs-=sizeof(cell))
-        _W32(data,i,pri);
-      break;
-    case OP_HALT:
-      GETPARAM(offs);
-    __halt:
-      if (retval!=NULL)
-        *retval=pri;
-      /* store complete status (stk and hea are already set in the ABORT macro) */
-      amx->frm=frm;
-      amx->pri=pri;
-      amx->alt=alt;
-      amx->cip=(cell)((unsigned char*)cip-amx->code);
-      if (offs==AMX_ERR_SLEEP) {
-        amx->stk=stk;
-        amx->hea=hea;
-        amx->reset_stk=reset_stk;
-        amx->reset_hea=reset_hea;
-        return (int)offs;
-      } /* if */
-      ABORT(amx,(int)offs);
-    case OP_BOUNDS:
-      GETPARAM(offs);
-      if ((ucell)pri>(ucell)offs) {
-        amx->cip=(cell)((unsigned char *)cip-amx->code);
-        ABORT(amx,AMX_ERR_BOUNDS);
-      } /* if */
-      break;
-    case OP_SYSREQ:
-      GETPARAM(offs);
-      /* save a few registers */
-      amx->cip=(cell)((unsigned char *)cip-amx->code);
-      amx->hea=hea;
-      amx->frm=frm;
-      amx->stk=stk;
-      i=amx->callback(amx,offs,&pri,(cell *)(data+(int)stk));
-      if (i!=AMX_ERR_NONE) {
-        if (i==AMX_ERR_SLEEP) {
-          amx->pri=pri;
-          amx->alt=alt;
-          amx->reset_stk=reset_stk;
-          amx->reset_hea=reset_hea;
-          return i;
-        } /* if */
-        ABORT(amx,i);
-      } /* if */
-      break;
-    case OP_SWITCH: {
-      cell *cptr=JUMPREL(cip)+1;/* +1, to skip the "casetbl" opcode */
-      assert(*JUMPREL(cip)==OP_CASETBL);
-      cip=JUMPREL(cptr+1);      /* preset to "none-matched" case */
-      i=(int)*cptr;             /* number of records in the case table */
-      for (cptr+=2; i>0 && *cptr!=pri; i--,cptr+=2)
-        /* nothing */;
-      if (i>0)
-        cip=JUMPREL(cptr+1);    /* case found */
-      break;
-    } /* case */
-    case OP_SWAP_PRI:
-      offs=_R(data,stk);
-      _W32(data,stk,pri);
-      pri=offs;
-      break;
-    case OP_SWAP_ALT:
-      offs=_R(data,stk);
-      _W32(data,stk,alt);
-      alt=offs;
-      break;
-    case OP_BREAK:
-      assert((amx->flags & AMX_FLAG_VERIFY)==0);
-      if (amx->debug!=NULL) {
-        /* store status */
-        amx->frm=frm;
-        amx->stk=stk;
-        amx->hea=hea;
-        amx->cip=(cell)((unsigned char*)cip-amx->code);
-        i=amx->debug(amx);
-        if (i!=AMX_ERR_NONE) {
-          if (i==AMX_ERR_SLEEP) {
-            amx->pri=pri;
-            amx->alt=alt;
-            amx->reset_stk=reset_stk;
-            amx->reset_hea=reset_hea;
-            return i;
-          } /* if */
-          ABORT(amx,i);
-        } /* if */
-      } /* if */
-      break;
-#if !defined AMX_DONT_RELOCATE
-    case OP_SYSREQ_D:    /* see SYSREQ */
-      GETPARAM(offs);
-      /* save a few registers */
-      amx->cip=(cell)((unsigned char *)cip-amx->code);
-      amx->hea=hea;
-      amx->frm=frm;
-      amx->stk=stk;
-      pri=((AMX_NATIVE)(intptr_t)offs)(amx,(cell*)(data+(int)stk));
-      if (amx->error!=AMX_ERR_NONE) {
-        if (amx->error==AMX_ERR_SLEEP) {
-          amx->pri=pri;
-          amx->alt=alt;
-          amx->reset_stk=reset_stk;
-          amx->reset_hea=reset_hea;
-          return AMX_ERR_SLEEP;
-        } /* if */
-        ABORT(amx,amx->error);
-      } /* if */
-      break;
-#endif
-#if !defined AMX_NO_MACRO_INSTR && !defined AMX_DONT_RELOCATE
-    case OP_SYSREQ_ND:    /* see SYSREQ_N */
-      GETPARAM(offs);
-      GETPARAM(val);
-      PUSH(val);
-      /* save a few registers */
-      amx->cip=(cell)((unsigned char *)cip-amx->code);
-      amx->hea=hea;
-      amx->frm=frm;
-      amx->stk=stk;
-      pri=((AMX_NATIVE)(intptr_t)offs)(amx,(cell*)(data+(int)stk));
-      stk+=val+4;
-      if (amx->error!=AMX_ERR_NONE) {
-        if (amx->error==AMX_ERR_SLEEP) {
-          amx->pri=pri;
-          amx->alt=alt;
-          amx->stk=stk;
-          amx->reset_stk=reset_stk;
-          amx->reset_hea=reset_hea;
-          return AMX_ERR_SLEEP;
-        } /* if */
-        ABORT(amx,amx->error);
-      } /* if */
-      break;
-#endif
-
-    /* overlay instructions */
-#if !defined AMX_NO_OVERLAY
-    case OP_CALL_OVL:
-      offs=(cell)((unsigned char *)cip-amx->code+sizeof(cell)); /* skip address */
-      assert(offs>=0 && offs<(1<<(sizeof(cell)*4)));
-      PUSH((offs<<(sizeof(cell)*4)) | amx->ovl_index);
-      amx->ovl_index=(int)*cip;
-      assert(amx->overlay!=NULL);
-      if ((i=amx->overlay(amx,amx->ovl_index))!=AMX_ERR_NONE)
-        ABORT(amx,i);
-      cip=(cell*)amx->code;
-      break;
-    case OP_RETN_OVL:
-      assert(amx->overlay!=NULL);
-      POP(frm);
-      POP(offs);
-      amx->ovl_index=offs & (((ucell)~0)>>4*sizeof(cell));
-      offs=(ucell)offs >> (sizeof(cell)*4);
-      /* verify the index */
-      stk+=_R(data,stk)+sizeof(cell);   /* remove parameters from the stack */
-      i=amx->overlay(amx,amx->ovl_index); /* reload overlay */
-      if (i!=AMX_ERR_NONE || (long)offs>=amx->codesize)
-        ABORT(amx,AMX_ERR_MEMACCESS);
-      cip=(cell *)(amx->code+(int)offs);
-      break;
-    case OP_SWITCH_OVL: {
-      cell *cptr=JUMPREL(cip)+1;  /* +1, to skip the "icasetbl" opcode */
-      assert(*JUMPREL(cip)==OP_CASETBL_OVL);
-      amx->ovl_index=*(cptr+1);   /* preset to "none-matched" case */
-      i=(int)*cptr;               /* number of records in the case table */
-      for (cptr+=2; i>0 && *cptr!=pri; i--,cptr+=2)
-        /* nothing */;
-      if (i>0)
-        amx->ovl_index=*(cptr+1); /* case found */
-      assert(amx->overlay!=NULL);
-      if ((i=amx->overlay(amx,amx->ovl_index))!=AMX_ERR_NONE)
-        ABORT(amx,i);
-      cip=(cell*)amx->code;
-      break;
-    } /* case */
-#endif
-
-    /* supplemental and macro instructions */
-#if !defined AMX_NO_MACRO_INSTR
-    case OP_LIDX:
-      offs=pri*sizeof(cell)+alt;
-      /* verify address */
-      if (offs>=hea && offs<stk || (ucell)offs>=(ucell)amx->stp)
-        ABORT(amx,AMX_ERR_MEMACCESS);
-      pri=_R(data,offs);
-      break;
-    case OP_LIDX_B:
-      GETPARAM(offs);
-      offs=(pri << (int)offs)+alt;
-      /* verify address */
-      if (offs>=hea && offs<stk || (ucell)offs>=(ucell)amx->stp)
-        ABORT(amx,AMX_ERR_MEMACCESS);
-      pri=_R(data,offs);
-      break;
-    case OP_IDXADDR:
-      pri=pri*sizeof(cell)+alt;
-      break;
-    case OP_IDXADDR_B:
-      GETPARAM(offs);
-      pri=(pri << (int)offs)+alt;
-      break;
-    case OP_PUSH_C:
-      GETPARAM(offs);
-      PUSH(offs);
-      break;
-    case OP_PUSH:
-      GETPARAM(offs);
-      PUSH(_R(data,offs));
-      break;
-    case OP_PUSH_S:
-      GETPARAM(offs);
-      PUSH(_R(data,frm+offs));
-      break;
-    case OP_PUSH_ADR:
-      GETPARAM(offs);
-      PUSH(frm+offs);
-      break;
-    case OP_PUSHR_C:
-      GETPARAM(offs);
-      PUSH((intptr_t)data+offs);
-      break;
-    case OP_PUSHR_S:
-      GETPARAM(offs);
-      PUSH((intptr_t)data+_R(data,frm+offs));
-      break;
-    case OP_PUSHR_ADR:
-      GETPARAM(offs);
-      PUSH((intptr_t)data+frm+offs);
-      break;
-    case OP_JEQ:
-      if (pri==alt)
-        cip=JUMPREL(cip);
-      else
-        SKIPPARAM(1);
-      break;
-    case OP_JNEQ:
-      if (pri!=alt)
-        cip=JUMPREL(cip);
-      else
-        SKIPPARAM(1);
-      break;
-    case OP_JSLESS:
-      if (pri<alt)
-        cip=JUMPREL(cip);
-      else
-        SKIPPARAM(1);
-      break;
-    case OP_JSLEQ:
-      if (pri<=alt)
-        cip=JUMPREL(cip);
-      else
-        SKIPPARAM(1);
-      break;
-    case OP_JSGRTR:
-      if (pri>alt)
-        cip=JUMPREL(cip);
-      else
-        SKIPPARAM(1);
-      break;
-    case OP_JSGEQ:
-      if (pri>=alt)
-        cip=JUMPREL(cip);
-      else
-        SKIPPARAM(1);
-      break;
-    case OP_SDIV_INV:
-      if (alt==0)
-        ABORT(amx,AMX_ERR_DIVIDE);
-      /* use floored division and matching remainder */
-      offs=alt;
-      #if defined TRUNC_SDIV
-        pri=pri/offs;
-        alt=pri%offs;
-      #else
-        val=pri;                /* portable routine for truncated division */
-        pri=IABS(pri)/IABS(offs);
-        if ((cell)(val ^ offs)<0)
-          pri=-pri;
-        alt=val-pri*offs;       /* calculate the matching remainder */
-      #endif
-      /* now "fiddle" with the values to get floored division */
-      if (alt!=0 && (cell)(alt ^ offs)<0) {
-        pri--;
-        alt+=offs;
-      } /* if */
-      break;
-    case OP_SUB_INV:
-      pri-=alt;
-      break;
-    case OP_ADD_C:
-      GETPARAM(offs);
-      pri+=offs;
-      break;
-    case OP_SMUL_C:
-      GETPARAM(offs);
-      pri*=offs;
-      break;
-    case OP_ZERO_PRI:
-      pri=0;
-      break;
-    case OP_ZERO_ALT:
-      alt=0;
-      break;
-    case OP_ZERO:
-      GETPARAM(offs);
-      _W(data,offs,0);
-      break;
-    case OP_ZERO_S:
-      GETPARAM(offs);
-      _W(data,frm+offs,0);
-      break;
-    case OP_EQ_C_PRI:
-      GETPARAM(offs);
-      pri= pri==offs ? 1 : 0;
-      break;
-    case OP_EQ_C_ALT:
-      GETPARAM(offs);
-      pri= alt==offs ? 1 : 0;
-      break;
-    case OP_INC:
-      GETPARAM(offs);
-      #if defined _R_DEFAULT
-        *(cell *)(data+(int)offs) += 1;
-      #else
-        val=_R(data,offs);
-        _W(data,offs,val+1);
-      #endif
-      break;
-    case OP_INC_S:
-      GETPARAM(offs);
-      #if defined _R_DEFAULT
-        *(cell *)(data+(int)(frm+offs)) += 1;
-      #else
-        val=_R(data,frm+offs);
-        _W(data,frm+offs,val+1);
-      #endif
-      break;
-    case OP_DEC:
-      GETPARAM(offs);
-      #if defined _R_DEFAULT
-        *(cell *)(data+(int)offs) -= 1;
-      #else
-        val=_R(data,offs);
-        _W(data,offs,val-1);
-      #endif
-      break;
-    case OP_DEC_S:
-      GETPARAM(offs);
-      #if defined _R_DEFAULT
-        *(cell *)(data+(int)(frm+offs)) -= 1;
-      #else
-        val=_R(data,frm+offs);
-        _W(data,frm+offs,val-1);
-      #endif
-      break;
-    case OP_SYSREQ_N:
-      GETPARAM(offs);
-      GETPARAM(val);
-      PUSH(val);
-      /* save a few registers */
-      amx->cip=(cell)((unsigned char *)cip-amx->code);
-      amx->hea=hea;
-      amx->frm=frm;
-      amx->stk=stk;
-      i=amx->callback(amx,offs,&pri,(cell *)(data+(int)stk));
-      stk+=val+4;
-      if (i!=AMX_ERR_NONE) {
-        if (i==AMX_ERR_SLEEP) {
-          amx->pri=pri;
-          amx->alt=alt;
-          amx->stk=stk;
-          amx->reset_stk=reset_stk;
-          amx->reset_hea=reset_hea;
-          return i;
-        } /* if */
-        ABORT(amx,i);
-      } /* if */
-      break;
-    case OP_PUSHM_C:
-      GETPARAM(val);
-      while (val--) {
-        GETPARAM(offs);
-        PUSH(offs);
-      } /* while */
-      break;
-    case OP_PUSHM:
-      GETPARAM(val);
-      while (val--) {
-        GETPARAM(offs);
-        PUSH(_R(data,offs));
-      } /* while */
-      break;
-    case OP_PUSHM_S:
-      GETPARAM(val);
-      while (val--) {
-        GETPARAM(offs);
-        PUSH(_R(data,frm+offs));
-      } /* while */
-      break;
-    case OP_PUSHM_ADR:
-      GETPARAM(val);
-      while (val--) {
-        GETPARAM(offs);
-        PUSH(frm+offs);
-      } /* while */
-      break;
-    case OP_PUSHRM_C:
-      GETPARAM(val);
-      while (val--) {
-        GETPARAM(offs);
-        PUSH((intptr_t)data+offs);
-      } /* while */
-      break;
-    case OP_PUSHRM_S:
-      GETPARAM(val);
-      while (val--) {
-        GETPARAM(offs);
-        PUSH((intptr_t)data+_R(data,frm+offs));
-      } /* while */
-      break;
-    case OP_PUSHRM_ADR:
-      GETPARAM(val);
-      while (val--) {
-        GETPARAM(offs);
-        PUSH((intptr_t)data+frm+offs);
-      } /* while */
-      break;
-    case OP_LOAD2:
-      GETPARAM(offs);
-      pri=_R(data,offs);
-      GETPARAM(offs);
-      alt=_R(data,offs);
-      break;
-    case OP_LOAD2_S:
-      GETPARAM(offs);
-      pri=_R(data,frm+offs);
-      GETPARAM(offs);
-      alt=_R(data,frm+offs);
-      break;
-    case OP_CONST:
-      GETPARAM(offs);
-      GETPARAM(val);
-      _W32(data,offs,val);
-      break;
-    case OP_CONST_S:
-      GETPARAM(offs);
-      GETPARAM(val);
-      _W32(data,frm+offs,val);
-      break;
-#endif  /* AMX_NO_MACRO_INSTR */
-
-#if !defined AMX_NO_PACKED_OPC
-    case OP_LOAD_P_PRI:
-      GETPARAM_P(offs,op);
-      pri=_R(data,offs);
-      break;
-    case OP_LOAD_P_ALT:
-      GETPARAM_P(offs,op);
-      alt=_R(data,offs);
-      break;
-    case OP_LOAD_P_S_PRI:
-      GETPARAM_P(offs,op);
-      pri=_R(data,frm+offs);
-      break;
-    case OP_LOAD_P_S_ALT:
-      GETPARAM_P(offs,op);
-      alt=_R(data,frm+offs);
-      break;
-    case OP_LREF_P_S_PRI:
-      GETPARAM_P(offs,op);
-      offs=_R(data,frm+offs);
-      pri=_R(data,offs);
-      break;
-    case OP_LREF_P_S_ALT:
-      GETPARAM_P(offs,op);
-      offs=_R(data,frm+offs);
-      alt=_R(data,offs);
-      break;
-    case OP_LODB_P_I:
-      GETPARAM_P(offs,op);
-      goto __lodb_i;
-    case OP_CONST_P_PRI:
-      GETPARAM_P(pri,op);
-      break;
-    case OP_CONST_P_ALT:
-      GETPARAM_P(alt,op);
-      break;
-    case OP_ADDR_P_PRI:
-      GETPARAM_P(pri,op);
-      pri+=frm;
-      break;
-    case OP_ADDR_P_ALT:
-      GETPARAM_P(alt,op);
-      alt+=frm;
-      break;
-    case OP_STOR_P:
-      GETPARAM_P(offs,op);
-      _W(data,offs,pri);
-      break;
-    case OP_STOR_P_S:
-      GETPARAM_P(offs,op);
-      _W(data,frm+offs,pri);
-      break;
-    case OP_SREF_P_S:
-      GETPARAM_P(offs,op);
-      offs=_R(data,frm+offs);
-      _W(data,offs,pri);
-      break;
-    case OP_STRB_P_I:
-      GETPARAM_P(offs,op);
-      goto __strb_i;
-    case OP_LIDX_P_B:
-      GETPARAM_P(offs,op);
-      offs=(pri << (int)offs)+alt;
-      /* verify address */
-      if (offs>=hea && offs<stk || (ucell)offs>=(ucell)amx->stp)
-        ABORT(amx,AMX_ERR_MEMACCESS);
-      pri=_R(data,offs);
-      break;
-    case OP_IDXADDR_P_B:
-      GETPARAM_P(offs,op);
-      pri=(pri << (int)offs)+alt;
-      break;
-    case OP_ALIGN_P_PRI:
-      GETPARAM_P(offs,op);
-      #if BYTE_ORDER==LITTLE_ENDIAN
-        if ((size_t)offs<sizeof(cell))
-          pri ^= sizeof(cell)-offs;
-      #endif
-      break;
-    case OP_PUSH_P_C:
-      GETPARAM_P(offs,op);
-      PUSH(offs);
-      break;
-    case OP_PUSH_P:
-      GETPARAM_P(offs,op);
-      PUSH(_R(data,offs));
-      break;
-    case OP_PUSH_P_S:
-      GETPARAM_P(offs,op);
-      PUSH(_R(data,frm+offs));
-      break;
-    case OP_PUSH_P_ADR:
-      GETPARAM_P(offs,op);
-      PUSH(frm+offs);
-      break;
-    case OP_PUSHR_P_C:
-      GETPARAM_P(offs,op);
-      PUSH((intptr_t)data+offs);
-      break;
-    case OP_PUSHR_P_S:
-      GETPARAM_P(offs,op);
-      PUSH((intptr_t)data+_R(data,frm+offs));
-      break;
-    case OP_PUSHR_P_ADR:
-      GETPARAM_P(offs,op);
-      PUSH((intptr_t)data+frm+offs);
-      break;
-    case OP_PUSHM_P:
-      GETPARAM_P(val,op);
-      while (val--) {
-        GETPARAM(offs);
-        PUSH(_R(data,offs));
-      } /* while */
-      break;
-    case OP_PUSHM_P_S:
-      GETPARAM_P(val,op);
-      while (val--) {
-        GETPARAM(offs);
-        PUSH(_R(data,frm+offs));
-      } /* while */
-      break;
-    case OP_PUSHM_P_C:
-      GETPARAM_P(val,op);
-      while (val--) {
-        GETPARAM(offs);
-        PUSH(offs);
-      } /* while */
-      break;
-    case OP_PUSHM_P_ADR:
-      GETPARAM_P(val,op);
-      while (val--) {
-        GETPARAM(offs);
-        PUSH(frm+offs);
-      } /* while */
-      break;
-    case OP_PUSHRM_P_C:
-      GETPARAM_P(val,op);
-      while (val--) {
-        GETPARAM(offs);
-        PUSH((intptr_t)data+offs);
-      } /* while */
-      break;
-    case OP_PUSHRM_P_S:
-      GETPARAM_P(val,op);
-      while (val--) {
-        GETPARAM(offs);
-        PUSH((intptr_t)data+_R(data,frm+offs));
-      } /* while */
-      break;
-    case OP_PUSHRM_P_ADR:
-      GETPARAM_P(val,op);
-      while (val--) {
-        GETPARAM(offs);
-        PUSH((intptr_t)data+frm+offs);
-      } /* while */
-      break;
-    case OP_STACK_P:
-      GETPARAM_P(offs,op);
-      alt=stk;
-      stk+=offs;
-      CHKMARGIN();
-      CHKSTACK();
-      break;
-    case OP_HEAP_P:
-      GETPARAM_P(offs,op);
-      alt=hea;
-      hea+=offs;
-      CHKMARGIN();
-      CHKHEAP();
-      break;
-    case OP_SHL_P_C_PRI:
-      GETPARAM_P(offs,op);
-      pri<<=offs;
-      break;
-    case OP_SHL_P_C_ALT:
-      GETPARAM_P(offs,op);
-      alt<<=offs;
-      break;
-    case OP_ADD_P_C:
-      GETPARAM_P(offs,op);
-      pri+=offs;
-      break;
-    case OP_SMUL_P_C:
-      GETPARAM_P(offs,op);
-      pri*=offs;
-      break;
-    case OP_ZERO_P:
-      GETPARAM_P(offs,op);
-      _W(data,offs,0);
-      break;
-    case OP_ZERO_P_S:
-      GETPARAM_P(offs,op);
-      _W(data,frm+offs,0);
-      break;
-    case OP_EQ_P_C_PRI:
-      GETPARAM_P(offs,op);
-      pri= pri==offs ? 1 : 0;
-      break;
-    case OP_EQ_P_C_ALT:
-      GETPARAM_P(offs,op);
-      pri= alt==offs ? 1 : 0;
-      break;
-    case OP_INC_P:
-      GETPARAM_P(offs,op);
-      #if defined _R_DEFAULT
-        *(cell *)(data+(int)offs) += 1;
-      #else
-        val=_R(data,offs);
-        _W(data,offs,val+1);
-      #endif
-      break;
-    case OP_INC_P_S:
-      GETPARAM_P(offs,op);
-      #if defined _R_DEFAULT
-        *(cell *)(data+(int)(frm+offs)) += 1;
-      #else
-        val=_R(data,frm+offs);
-        _W(data,frm+offs,val+1);
-      #endif
-      break;
-    case OP_DEC_P:
-      GETPARAM_P(offs,op);
-      #if defined _R_DEFAULT
-        *(cell *)(data+(int)offs) -= 1;
-      #else
-        val=_R(data,offs);
-        _W(data,offs,val-1);
-      #endif
-      break;
-    case OP_DEC_P_S:
-      GETPARAM_P(offs,op);
-      #if defined _R_DEFAULT
-        *(cell *)(data+(int)(frm+offs)) -= 1;
-      #else
-        val=_R(data,frm+offs);
-        _W(data,frm+offs,val-1);
-      #endif
-      break;
-    case OP_MOVS_P:
-      GETPARAM_P(offs,op);
-      goto __movs;
-    case OP_CMPS_P:
-      GETPARAM_P(offs,op);
-      goto __cmps;
-    case OP_FILL_P:
-      GETPARAM_P(offs,op);
-      goto __fill;
-    case OP_HALT_P:
-      GETPARAM_P(offs,op);
-      goto __halt;
-    case OP_BOUNDS_P:
-      GETPARAM_P(offs,op);
-      if ((ucell)pri>(ucell)offs) {
-        amx->cip=(cell)((unsigned char *)cip-amx->code);
-        ABORT(amx,AMX_ERR_BOUNDS);
-      } /* if */
-      break;
-#endif /* AMX_NO_PACKED_OPC */
-    default:
-      assert(0);  /* invalid instructions should already have been caught in VerifyPcode() */
-      ABORT(amx,AMX_ERR_INVINSTR);
-    } /* switch */
-  } /* for */
-#endif /* AMX_ALTCORE */
-}
-
-#endif /* AMX_EXEC */
-
-#if defined AMX_SETCALLBACK
-int AMXAPI amx_SetCallback(AMX *amx,AMX_CALLBACK callback)
-{
-  assert(amx!=NULL);
-  assert(callback!=NULL);
-  amx->callback=callback;
-  return AMX_ERR_NONE;
-}
-#endif /* AMX_SETCALLBACK */
-
-#if defined AMX_SETDEBUGHOOK
-int AMXAPI amx_SetDebugHook(AMX *amx,AMX_DEBUG debug)
-{
-  assert(amx!=NULL);
-  amx->debug=debug;
-  return AMX_ERR_NONE;
-}
-#endif /* AMX_SETDEBUGHOOK */
-
-#if defined AMX_RAISEERROR
-int AMXAPI amx_RaiseError(AMX *amx, int error)
-{
-  assert(error>0);
-  amx->error=error;
-  return AMX_ERR_NONE;
-}
-#endif /* AMX_RAISEERROR */
-
-#if defined AMX_ALLOT || defined AMX_PUSHXXX
-int AMXAPI amx_Allot(AMX *amx,int cells,cell **address)
-{
-  AMX_HEADER *hdr;
-  unsigned char *data;
-
-  assert(amx!=NULL);
-  hdr=(AMX_HEADER *)amx->base;
-  assert(hdr!=NULL);
-  assert(hdr->magic==AMX_MAGIC);
-  data=(amx->data!=NULL) ? amx->data : amx->base+(int)hdr->dat;
-
-  if (amx->stk - amx->hea - cells*sizeof(cell) < STKMARGIN)
-    return AMX_ERR_MEMORY;
-  if (address!=NULL)
-    *address=(cell *)(data+(int)amx->hea);
-  amx->hea+=cells*sizeof(cell);
-  return AMX_ERR_NONE;
-}
-
-int AMXAPI amx_Release(AMX *amx,cell *address)
-{
-  AMX_HEADER *hdr;
-  unsigned char *data;
-  cell amx_addr;
-
-  assert(amx!=NULL);
-  hdr=(AMX_HEADER *)amx->base;
-  assert(hdr!=NULL);
-  assert(hdr->magic==AMX_MAGIC);
-  data=(amx->data!=NULL) ? amx->data : amx->base+(int)hdr->dat;
-  amx_addr=(cell)((unsigned char*)address-data);
-  if (amx->hea>amx_addr)
-    amx->hea=amx_addr;
-  return AMX_ERR_NONE;
-}
-#endif /* AMX_ALLOT || AMX_PUSHXXX */
-
-#if defined AMX_XXXSTRING || defined AMX_UTF8XXX
-
-#define CHARBITS        (8*sizeof(char))
-#if PAWN_CELL_SIZE==16
-  #define CHARMASK      (0xffffu << 8*(2-sizeof(char)))
-#elif PAWN_CELL_SIZE==32
-  #define CHARMASK      (0xffffffffuL << 8*(4-sizeof(char)))
-#elif PAWN_CELL_SIZE==64
-  #define CHARMASK      (0xffffffffffffffffuLL << 8*(8-sizeof(char)))
-#else
-  #error Unsupported cell size
-#endif
-
-int AMXAPI amx_StrLen(const cell *cstr, int *length)
-{
-  int len;
-  #if BYTE_ORDER==LITTLE_ENDIAN
-    cell c;
-  #endif
-
-  assert(length!=NULL);
-  if (cstr==NULL) {
-    *length=0;
-    return AMX_ERR_PARAMS;
-  } /* if */
-
-  if ((ucell)*cstr>UNPACKEDMAX) {
-    /* packed string */
-    assert_static(sizeof(char)==1);
-    len=(int)strlen((char *)cstr);      /* find '\0' */
-    assert(check_endian());
-    #if BYTE_ORDER==LITTLE_ENDIAN
-      /* on Little Endian machines, toggle the last bytes */
-      c=cstr[len/sizeof(cell)];         /* get last cell */
-      len=len - len % sizeof(cell);     /* len = multiple of "cell" bytes */
-      while ((c & CHARMASK)!=0) {
-        len++;
-        c <<= 8*sizeof(char);
-      } /* if */
-    #endif
-  } else {
-    for (len=0; cstr[len]!=0; len++)
-      /* nothing */;
-  } /* if */
-  *length = len;
-  return AMX_ERR_NONE;
-}
-#endif
-
-#if defined AMX_XXXSTRING || defined AMX_PUSHXXX
-int AMXAPI amx_SetString(cell *dest,const char *source,int pack,int use_wchar,size_t size)
-{                 /* the memory blocks should not overlap */
-  int i;
-  size_t len;
-
-  assert_static(UNLIMITED>0);
-  #if defined AMX_ANSIONLY
-    (void)use_wchar;
-    len=strlen(source);
-  #else
-    len= use_wchar ? wcslen((const wchar_t*)source) : strlen(source);
-  #endif
-  if (pack) {
-    /* create a packed string */
-    if (size<UNLIMITED/sizeof(cell) && (size_t)len>=size*sizeof(cell))
-      len=size*sizeof(cell)-1;
-    dest[len/sizeof(cell)]=0;   /* clear last bytes of last (semi-filled) cell*/
-    #if defined AMX_ANSIONLY
-      memcpy(dest,source,len);
-    #else
-      if (use_wchar) {
-        for (i=0; i<len; i++)
-          ((char*)dest)[i]=(char)(((wchar_t*)source)[i]);
-      } else {
-        memcpy(dest,source,len);
-      } /* if */
-    #endif
-    /* On Big Endian machines, the characters are well aligned in the
-     * cells; on Little Endian machines, we must swap all cells.
-     */
-    assert(check_endian());
-    #if BYTE_ORDER==LITTLE_ENDIAN
-      for (i=(int)(len/sizeof(cell)); i>=0; i--)
-        amx_SwapCell((ucell *)&dest[i]);
-    #endif
-  } else {
-    /* create an unpacked string */
-    if (size<UNLIMITED && (size_t)len>=size)
-      len=size-1;
-    #if defined AMX_ANSIONLY
-      for (i=0; i<len; i++)
-        dest[i]=(cell)source[i];
-    #else
-      if (use_wchar) {
-        for (i=0; i<len; i++)
-          dest[i]=(cell)(((wchar_t*)source)[i]);
-      } else {
-        for (i=0; i<len; i++)
-          dest[i]=(cell)source[i];
-      } /* if */
-    #endif
-    dest[len]=0;
-  } /* if */
-  return AMX_ERR_NONE;
-}
-#endif
-
-#if defined AMX_XXXSTRING
-int AMXAPI amx_GetString(char *dest,const cell *source,int use_wchar,size_t size)
-{
-  int len=0;
-  #if defined AMX_ANSIONLY
-    (void)use_wchar;    /* unused parameter (if ANSI only) */
-  #endif
-  if ((ucell)*source>UNPACKEDMAX) {
-    /* source string is packed */
-    cell c=0;           /* initialize to 0 to avoid a compiler warning */
-    int i=sizeof(cell)-1;
-    char ch;
-    while ((size_t)len<size) {
-      if (i==sizeof(cell)-1)
-        c=*source++;
-      ch=(char)(c >> i*CHARBITS);
-      if (ch=='\0')
-        break;          /* terminating zero character found */
-      #if defined AMX_ANSIONLY
-        dest[len++]=ch;
-      #else
-        if (use_wchar)
-          ((wchar_t*)dest)[len++]=ch;
-        else
-          dest[len++]=ch;
-      #endif
-      i=(i+sizeof(cell)-1) % sizeof(cell);
-    } /* while */
-  } else {
-    /* source string is unpacked */
-    #if defined AMX_ANSIONLY
-      while (*source!=0 && (size_t)len<size)
-        dest[len++]=(char)*source++;
-    #else
-      if (use_wchar) {
-        while (*source!=0 && (size_t)len<size)
-          ((wchar_t*)dest)[len++]=(wchar_t)*source++;
-      } else {
-        while (*source!=0 && (size_t)len<size)
-          dest[len++]=(char)*source++;
-      } /* if */
-    #endif
-  } /* if */
-  /* store terminator */
-  if ((size_t)len>=size)
-    len=(int)size-1;
-  if (len>=0) {
-    #if defined AMX_ANSIONLY
-      dest[len]='\0';
-    #else
-      if (use_wchar)
-        ((wchar_t*)dest)[len]=0;
-      else
-        dest[len]='\0';
-    #endif
-  } /* IF */
-  return AMX_ERR_NONE;
-}
-#endif /* AMX_XXXSTRING */
-
-#if defined AMX_UTF8XXX
-  #if defined __BORLANDC__
-    #pragma warn -amb -8000     /* ambiguous operators need parentheses */
-  #endif
-/* amx_UTF8Get()
- * Extract a single UTF-8 encoded character from a string and return a pointer
- * to the character just behind that UTF-8 character. The parameters "endptr"
- * and "value" may be NULL.
- * If the code is not valid UTF-8, "endptr" has the value of the input
- * parameter "string" and "value" is zero.
- */
-int AMXAPI amx_UTF8Get(const char *string, const char **endptr, cell *value)
-{
-static const char utf8_count[16]={ 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 2, 2, 3, 4 };
-static const long utf8_lowmark[5] = { 0x80, 0x800, 0x10000L, 0x200000L, 0x4000000L };
-  unsigned char c;
-  cell result;
-  int followup;
-
-  assert(string!=NULL);
-  if (value!=NULL)      /* preset, in case of an error */
-    *value=0;
-  if (endptr!=NULL)
-    *endptr=string;
-
-  c = *(const unsigned char*)string++;
-  if (c<0x80) {
-    /* ASCII */
-    result=c;
-  } else {
-    if (c<0xc0 || c>=0xfe)
-      return AMX_ERR_PARAMS;  /* invalid or "follower" code, quit with error */
-    /* At this point we know that the two top bits of c are ones. The two
-     * bottom bits are always part of the code. We only need to consider
-     * the 4 remaining bits; i.e., a 16-byte table. This is "utf8_count[]".
-     * (Actually the utf8_count[] table records the number of follow-up
-     * bytes minus 1. This is just for convenience.)
-     */
-    assert((c & 0xc0)==0xc0);
-    followup=(int)utf8_count[(c >> 2) & 0x0f];
-    /* The mask depends on the code length; this is just a very simple
-     * relation.
-     */
-    #define utf8_mask   (0x1f >> followup)
-    result= c & utf8_mask;
-    /* Collect the follow-up codes using a drop-through switch statement;
-     * this avoids a loop. In each case, verify the two leading bits.
-     */
-    assert(followup>=0 && followup<=4);
-    switch (followup) {
-    case 4:
-      if (((c=*string++) & 0xc0) != 0x80) goto error;
-      result = (result << 6) | c & 0x3f;
-    case 3:
-      if (((c=*string++) & 0xc0) != 0x80) goto error;
-      result = (result << 6) | c & 0x3f;
-    case 2:
-      if (((c=*string++) & 0xc0) != 0x80) goto error;
-      result = (result << 6) | c & 0x3f;
-    case 1:
-      if (((c=*string++) & 0xc0) != 0x80) goto error;
-      result = (result << 6) | c & 0x3f;
-    case 0:
-      if (((c=*string++) & 0xc0) != 0x80) goto error;
-      result = (result << 6) | c & 0x3f;
-    } /* switch */
-    /* Do additional checks: shortest encoding & reserved positions. The
-     * lowmark limits also depends on the code length; it can be read from
-     * a table with 5 elements. This is "utf8_lowmark[]".
-     */
-    if (result<utf8_lowmark[followup])
-      goto error;
-    if (result>=0xd800 && result<=0xdfff || result==0xfffe || result==0xffff)
-      goto error;
-  } /* if */
-
-  if (value!=NULL)
-    *value=result;
-  if (endptr!=NULL)
-    *endptr=string;
-
-  return AMX_ERR_NONE;
-
-error:
-  return AMX_ERR_PARAMS;
-}
-
-/* amx_UTF8Put()
- * Encode a single character into a byte string. The character may result in
- * a string of up to 6 bytes. The function returns an error code if "maxchars"
- * is lower than the required number of characters; in this case nothing is
- * stored.
- * The function does not zero-terminate the string.
- */
-int AMXAPI amx_UTF8Put(char *string, char **endptr, int maxchars, cell value)
-{
-  assert(string!=NULL);
-  if (endptr!=NULL)     /* preset, in case of an error */
-    *endptr=string;
-
-  if (value<0x80) {
-    /* 0xxxxxxx */
-    if (maxchars < 1) goto error;
-    *string++ = (char)value;
-  } else if (value<0x800) {
-    /* 110xxxxx 10xxxxxx */
-    if (maxchars < 2) goto error;
-    *string++ = (char)((value>>6) & 0x1f | 0xc0);
-    *string++ = (char)(value & 0x3f | 0x80);
-  } else if (value<0x10000) {
-    /* 1110xxxx 10xxxxxx 10xxxxxx (16 bits, BMP plane) */
-    if (maxchars < 3) goto error;
-    if (value>=0xd800 && value<=0xdfff || value==0xfffe || value==0xffff)
-      goto error;       /* surrogate pairs and invalid characters */
-    *string++ = (char)((value>>12) & 0x0f | 0xe0);
-    *string++ = (char)((value>>6) & 0x3f | 0x80);
-    *string++ = (char)(value & 0x3f | 0x80);
-  } else if (value<0x200000) {
-    /* 11110xxx 10xxxxxx 10xxxxxx 10xxxxxx */
-    if (maxchars < 4) goto error;
-    *string++ = (char)((value>>18) & 0x07 | 0xf0);
-    *string++ = (char)((value>>12) & 0x3f | 0x80);
-    *string++ = (char)((value>>6) & 0x3f | 0x80);
-    *string++ = (char)(value & 0x3f | 0x80);
-  } else if (value<0x4000000) {
-    /* 111110xx 10xxxxxx 10xxxxxx 10xxxxxx 10xxxxxx */
-    if (maxchars < 5) goto error;
-    *string++ = (char)((value>>24) & 0x03 | 0xf8);
-    *string++ = (char)((value>>18) & 0x3f | 0x80);
-    *string++ = (char)((value>>12) & 0x3f | 0x80);
-    *string++ = (char)((value>>6) & 0x3f | 0x80);
-    *string++ = (char)(value & 0x3f | 0x80);
-  } else {
-    /* 1111110x 10xxxxxx 10xxxxxx 10xxxxxx 10xxxxxx 10xxxxxx (31 bits) */
-    if (maxchars < 6) goto error;
-    *string++ = (char)((value>>30) & 0x01 | 0xfc);
-    *string++ = (char)((value>>24) & 0x3f | 0x80);
-    *string++ = (char)((value>>18) & 0x3f | 0x80);
-    *string++ = (char)((value>>12) & 0x3f | 0x80);
-    *string++ = (char)((value>>6) & 0x3f | 0x80);
-    *string++ = (char)(value & 0x3f | 0x80);
-  } /* if */
-
-  if (endptr!=NULL)
-    *endptr=string;
-  return AMX_ERR_NONE;
-
-error:
-  return AMX_ERR_PARAMS;
-}
-
-/* amx_UTF8Check()
- * Run through a zero-terminated string and check the validity of the UTF-8
- * encoding. The function returns an error code, it is AMX_ERR_NONE if the
- * string is valid UTF-8 (or valid ASCII for that matter).
- */
-int AMXAPI amx_UTF8Check(const char *string, int *length)
-{
-  int err=AMX_ERR_NONE;
-  int len=0;
-  while (err==AMX_ERR_NONE && *string!='\0') {
-    err=amx_UTF8Get(string,&string,NULL);
-    len++;
-  } /* while */
-  if (length!=NULL)
-    *length=len;
-  return err;
-}
-
-/* amx_UTF8Len()
- * Run through a wide string and return how many 8-bit characters are needed to
- * store the string in UTF-8 format. The returned cound excludes the terminating
- * zero byte. The function returns an error code.
- */
-int AMXAPI amx_UTF8Len(const cell *cstr, int *length)
-{
-  int err;
-
-  assert(length!=NULL);
-  err=amx_StrLen(cstr, length);
-  if (err==AMX_ERR_NONE && (ucell)*cstr<=UNPACKEDMAX) {
-    char buffer[10];  /* maximum UTF-8 code is 6 characters */
-    char *endptr;
-    int len=*length, count=0;
-    while (len-->0) {
-      amx_UTF8Put(buffer, &endptr, sizeof buffer, *cstr++);
-      count+=(int)(endptr-buffer);
-    } /* while */
-    *length=count;
-  } /* while */
-  return err;
-}
-#endif /* AMX_UTF8XXX */
diff --git a/apps/openmw-mp/amx/amx.h b/apps/openmw-mp/amx/amx.h
deleted file mode 100644
index 9000f291c..000000000
--- a/apps/openmw-mp/amx/amx.h
+++ /dev/null
@@ -1,545 +0,0 @@
-/*  Pawn Abstract Machine (for the Pawn language)
- *
- *  Copyright (c) ITB CompuPhase, 1997-2015
- *
- *  Licensed under the Apache License, Version 2.0 (the "License"); you may not
- *  use this file except in compliance with the License. You may obtain a copy
- *  of the License at
- *
- *      http://www.apache.org/licenses/LICENSE-2.0
- *
- *  Unless required by applicable law or agreed to in writing, software
- *  distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
- *  WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the
- *  License for the specific language governing permissions and limitations
- *  under the License.
- *
- *  Version: $Id: amx.h 5181 2015-01-21 09:44:28Z thiadmer $
- */
-
-#ifndef AMX_H_INCLUDED
-#define AMX_H_INCLUDED
-
-#include <stdlib.h>   /* for size_t */
-#include <limits.h>
-
-#if (defined __linux || defined __linux__) && !defined __LINUX__
-  #define __LINUX__
-#endif
-#if defined FREEBSD && !defined __FreeBSD__
-  #define __FreeBSD__
-#endif
-#if defined __LINUX__ || defined __FreeBSD__ || defined __OpenBSD__ || defined __APPLE__
-  #include <sclinux.h>
-#endif
-
-#if defined __GNUC__
- #define GCC_VERSION (__GNUC__ * 10000 \
-                               + __GNUC_MINOR__ * 100 \
-                               + __GNUC_PATCHLEVEL__)
-#endif
-
-#if !defined HAVE_STDINT_H
-  #if (defined __STDC_VERSION__ && __STDC_VERSION__ >= 199901L) \
-      || defined __GNUC__ || defined __LCC__ || defined __DMC__ \
-      || (defined __WATCOMC__ && __WATCOMC__ >= 1200)
-    #define HAVE_STDINT_H 1
-  #endif
-#endif
-#if !defined HAVE_INTTYPES_H
-  #if defined __FreeBSD__ || defined __APPLE__
-    #define HAVE_INTTYPES_H 1
-  #endif
-#endif
-#if defined HAVE_STDINT_H
-  #include <stdint.h>
-#elif defined HAVE_INTTYPES_H
-  #include <inttypes.h>
-#else
-  #if defined __MACH__
-    #include <ppc/types.h>
-  #endif
-  typedef short int           int16_t;
-  typedef unsigned short int  uint16_t;
-  #if defined SN_TARGET_PS2
-    typedef int               int32_t;
-    typedef unsigned int      uint32_t;
-  #else
-    typedef long int          int32_t;
-    typedef unsigned long int uint32_t;
-  #endif
-  #if defined __WIN32__ || defined _WIN32 || defined WIN32
-    typedef __int64           int64_t;
-    typedef unsigned __int64  uint64_t;
-    #define HAVE_I64
-  #endif
-  #if !defined _INTPTR_T_DEFINED
-    #if defined _LP64 || defined WIN64 || defined _WIN64
-      typedef __int64         intptr_t;
-    #else
-      typedef int32_t         intptr_t;
-    #endif
-  #endif
-#endif
-#if defined _LP64 || defined WIN64 || defined _WIN64
-  #if !defined __64BIT__
-    #define __64BIT__
-  #endif
-#endif
-
-#if !defined HAVE_ALLOCA_H
-  #if defined __GNUC__ || defined __LCC__ || defined __DMC__ || defined __ARMCC_VERSION
-    #define HAVE_ALLOCA_H 1
-  #elif defined __WATCOMC__ && __WATCOMC__ >= 1200
-    #define HAVE_ALLOCA_H 1
-  #endif
-#endif
-#if defined HAVE_ALLOCA_H && HAVE_ALLOCA_H
-  #include <alloca.h>
-#elif defined __BORLANDC__
-  #include <malloc.h>
-#endif
-#if defined __WIN32__ || defined _WIN32 || defined WIN32 /* || defined __MSDOS__ */
-  #if !defined alloca
-    #define alloca(n)   _alloca(n)
-  #endif
-#endif
-
-#if !defined assert_static
-  #if (defined __STDC_VERSION__ && __STDC_VERSION__ >= 201112) || GCC_VERSION >= 40600
-    #define assert_static(test) _Static_assert(test, "assert")
-  #else
-    /* see "Compile-Time Assertions" by Greg Miller,
-     * (with modifications to port it to C)
-     */
-    #define _ASSERT_STATIC_SYMBOL_INNER(line) __ASSERT_STATIC_ ## line
-    #define _ASSERT_STATIC_SYMBOL(line) _ASSERT_STATIC_SYMBOL_INNER(line)
-    #define assert_static(test) \
-      do { \
-        typedef char _ASSERT_STATIC_SYMBOL(__LINE__)[ ((test) ? 1 : -1) ]; \
-      } while (0)
-  #endif
-#endif
-
-#if defined  __cplusplus
-extern  "C" {
-#endif
-
-#if defined PAWN_DLL
-  #if !defined AMX_NATIVE_CALL
-    #define AMX_NATIVE_CALL __stdcall
-  #endif
-  #if !defined AMXAPI
-    #define AMXAPI          __stdcall
-  #endif
-  #if !defined AMXEXPORT
-    #define AMXEXPORT       __declspec(dllexport)
-  #endif
-#endif
-
-/* calling convention for native functions */
-#if !defined AMX_NATIVE_CALL
-  #define AMX_NATIVE_CALL
-#endif
-/* calling convention for all interface functions and callback functions */
-#if !defined AMXAPI
-  #if defined STDECL
-    #define AMXAPI      __stdcall
-  #elif defined CDECL
-    #define AMXAPI      __cdecl
-  #elif defined GCC_HASCLASSVISIBILITY
-    #define AMXAPI      __attribute__((visibility("default")))
-  #else
-    #define AMXAPI
-  #endif
-#endif
-#if !defined AMXEXPORT
-  #define AMXEXPORT
-#endif
-
-/* File format version (in CUR_FILE_VERSION)
- *   0 original version
- *   1 opcodes JUMP.pri, SWITCH and CASETBL
- *   2 compressed files
- *   3 public variables
- *   4 opcodes SWAP.pri/alt and PUSHADDR
- *   5 tagnames table
- *   6 reformatted header
- *   7 name table, opcodes SYMTAG & SYSREQ.D
- *   8 opcode BREAK, renewed debug interface
- *   9 macro opcodes
- *  10 position-independent code, overlays, packed instructions
- *  11 relocating instructions for the native interface, reorganized instruction set
- * MIN_FILE_VERSION is the lowest file version number that the current AMX
- * implementation supports. If the AMX file header gets new fields, this number
- * often needs to be incremented. MIN_AMX_VERSION is the lowest AMX version that
- * is needed to support the current file version. When there are new opcodes,
- * this number needs to be incremented.
- * The file version supported by the JIT may run behind MIN_AMX_VERSION. So
- * there is an extra constant for it: MAX_FILE_VER_JIT.
- */
-
-#define CUR_FILE_VERSION 11     /* current file version; also the current AMX version */
-#define MIN_FILE_VERSION 11     /* lowest supported file format version for the current AMX version */
-#define MIN_AMX_VERSION  11     /* minimum AMX version needed to support the current file format */
-#define MAX_FILE_VER_JIT 11     /* file version supported by the JIT */
-#define MIN_AMX_VER_JIT  11     /* AMX version supported by the JIT */
-
-#if !defined PAWN_CELL_SIZE
-  #define PAWN_CELL_SIZE 32     /* by default, use 32-bit cells */
-#endif
-#if PAWN_CELL_SIZE==16
-  typedef uint16_t  ucell;
-  typedef int16_t   cell;
-#elif PAWN_CELL_SIZE==32
-  typedef uint32_t  ucell;
-  typedef int32_t   cell;
-#elif PAWN_CELL_SIZE==64
-  typedef uint64_t  ucell;
-  typedef int64_t   cell;
-  #define HAVE_I64
-#else
-  #error Unsupported cell size (PAWN_CELL_SIZE)
-#endif
-
-#define UNPACKEDMAX   (((cell)1 << (sizeof(cell)-1)*8) - 1)
-#define UNLIMITED     (~1u >> 1)
-
-struct tagAMX;
-typedef cell (AMX_NATIVE_CALL *AMX_NATIVE)(struct tagAMX *amx, const cell *params);
-typedef int (AMXAPI *AMX_CALLBACK)(struct tagAMX *amx, cell index,
-                                   cell *result, const cell *params);
-typedef int (AMXAPI *AMX_DEBUG)(struct tagAMX *amx);
-typedef int (AMXAPI *AMX_OVERLAY)(struct tagAMX *amx, int index);
-typedef int (AMXAPI *AMX_IDLE)(struct tagAMX *amx, int AMXAPI Exec(struct tagAMX *, cell *, int));
-#if !defined _FAR
-  #define _FAR
-#endif
-
-#if defined _MSC_VER
-  #pragma warning(disable:4100)  /* "'%$S' : unreferenced formal parameter" */
-  #pragma warning(disable:4103)  /* disable warning message 4103 that complains
-                                  * about pragma pack in a header file */
-  #pragma warning(disable:4127)  /* "conditional expression is constant" (needed for static_assert) */
-  #pragma warning(disable:4996)  /* POSIX name is deprecated */
-#endif
-
-/* Some compilers do not support the #pragma align, which should be fine. Some
- * compilers give a warning on unknown #pragmas, which is not so fine...
- */
-#if (defined SN_TARGET_PS2 || defined __GNUC__) && !defined AMX_NO_ALIGN
-  #define AMX_NO_ALIGN
-#endif
-
-#if defined __GNUC__
-  #define PACKED        __attribute__((packed))
-#else
-  #define PACKED
-#endif
-
-#if !defined AMX_NO_ALIGN
-  #if defined __LINUX__ || defined __FreeBSD__ || defined __APPLE__
-    #pragma pack(1)         /* structures must be packed (byte-aligned) */
-  #elif defined MACOS && defined __MWERKS__
-    #pragma options align=mac68k
-  #else
-    #pragma pack(push)
-    #pragma pack(1)         /* structures must be packed (byte-aligned) */
-    #if defined __TURBOC__
-      #pragma option -a-    /* "pack" pragma for older Borland compilers */
-    #endif
-  #endif
-#endif
-
-typedef struct tagAMX_NATIVE_INFO {
-  const char _FAR *name;
-  AMX_NATIVE func;
-} PACKED AMX_NATIVE_INFO;
-
-#if !defined AMX_USERNUM
-#define AMX_USERNUM     4
-#endif
-#define sEXPMAX         19  /* maximum name length for file version <= 6 */
-#define sNAMEMAX        31  /* maximum name length of symbol name */
-
-typedef struct tagFUNCSTUB {
-  uint32_t address;
-  uint32_t nameofs;
-} PACKED AMX_FUNCSTUB;
-
-typedef struct tagOVERLAYINFO {
-  int32_t offset;           /* offset relative to the start of the code block */
-  int32_t size;             /* size in bytes */
-} PACKED AMX_OVERLAYINFO;
-
-/* The AMX structure is the internal structure for many functions. Not all
- * fields are valid at all times; many fields are cached in local variables.
- */
-typedef struct tagAMX {
-  unsigned char _FAR *base; /* points to the AMX header, perhaps followed by P-code and data */
-  unsigned char _FAR *code; /* points to P-code block, possibly in ROM or in an overlay pool */
-  unsigned char _FAR *data; /* points to separate data+stack+heap, may be NULL */
-  AMX_CALLBACK callback;    /* native function callback */
-  AMX_DEBUG debug;          /* debug callback */
-  AMX_OVERLAY overlay;      /* overlay reader callback */
-  /* for external functions a few registers must be accessible from the outside */
-  cell cip;                 /* instruction pointer: relative to base + amxhdr->cod */
-  cell frm;                 /* stack frame base: relative to base + amxhdr->dat */
-  cell hea;                 /* top of the heap: relative to base + amxhdr->dat */
-  cell hlw;                 /* bottom of the heap: relative to base + amxhdr->dat */
-  cell stk;                 /* stack pointer: relative to base + amxhdr->dat */
-  cell stp;                 /* top of the stack: relative to base + amxhdr->dat */
-  int flags;                /* current status, see amx_Flags() */
-  /* user data */
-  #if AMX_USERNUM > 0
-    long usertags[AMX_USERNUM];
-    void _FAR *userdata[AMX_USERNUM];
-  #endif
-  /* native functions can raise an error */
-  int error;
-  /* passing parameters requires a "count" field */
-  int paramcount;
-  /* the sleep opcode needs to store the full AMX status */
-  cell pri;
-  cell alt;
-  cell reset_stk;
-  cell reset_hea;
-  /* extra fields for increased performance */
-  cell sysreq_d;            /* relocated address/value for the SYSREQ.D opcode */
-  /* fields for overlay support and JIT support */
-  int ovl_index;            /* current overlay index */
-  long codesize;            /* size of the overlay, or estimated memory footprint of the native code */
-  #if defined AMX_JIT
-    /* support variables for the JIT */
-    int reloc_size;         /* required temporary buffer for relocations */
-  #endif
-} PACKED AMX;
-
-/* The AMX_HEADER structure is both the memory format as the file format. The
- * structure is used internaly.
- */
-typedef struct tagAMX_HEADER {
-  int32_t size;             /* size of the "file" */
-  uint16_t magic;           /* signature */
-  char    file_version;     /* file format version */
-  char    amx_version;      /* required version of the AMX */
-  int16_t flags;
-  int16_t defsize;          /* size of a definition record */
-  int32_t cod;              /* initial value of COD - code block */
-  int32_t dat;              /* initial value of DAT - data block */
-  int32_t hea;              /* initial value of HEA - start of the heap */
-  int32_t stp;              /* initial value of STP - stack top */
-  int32_t cip;              /* initial value of CIP - the instruction pointer */
-  int32_t publics;          /* offset to the "public functions" table */
-  int32_t natives;          /* offset to the "native functions" table */
-  int32_t libraries;        /* offset to the table of libraries */
-  int32_t pubvars;          /* offset to the "public variables" table */
-  int32_t tags;             /* offset to the "public tagnames" table */
-  int32_t nametable;        /* offset to the name table */
-  int32_t overlays;         /* offset to the overlay table */
-} PACKED AMX_HEADER;
-
-#define AMX_MAGIC_16    0xf1e2
-#define AMX_MAGIC_32    0xf1e0
-#define AMX_MAGIC_64    0xf1e1
-#if PAWN_CELL_SIZE==16
-  #define AMX_MAGIC     AMX_MAGIC_16
-#elif PAWN_CELL_SIZE==32
-  #define AMX_MAGIC     AMX_MAGIC_32
-#elif PAWN_CELL_SIZE==64
-  #define AMX_MAGIC     AMX_MAGIC_64
-#endif
-
-enum {
-  AMX_ERR_NONE,
-  /* reserve the first 15 error codes for exit codes of the abstract machine */
-  AMX_ERR_EXIT,         /* forced exit */
-  AMX_ERR_ASSERT,       /* assertion failed */
-  AMX_ERR_STACKERR,     /* stack/heap collision */
-  AMX_ERR_BOUNDS,       /* index out of bounds */
-  AMX_ERR_MEMACCESS,    /* invalid memory access */
-  AMX_ERR_INVINSTR,     /* invalid instruction */
-  AMX_ERR_STACKLOW,     /* stack underflow */
-  AMX_ERR_HEAPLOW,      /* heap underflow */
-  AMX_ERR_CALLBACK,     /* no callback, or invalid callback */
-  AMX_ERR_NATIVE,       /* native function failed */
-  AMX_ERR_DIVIDE,       /* divide by zero */
-  AMX_ERR_SLEEP,        /* go into sleepmode - code can be restarted */
-  AMX_ERR_INVSTATE,     /* no implementation for this state, no fall-back */
-
-  AMX_ERR_MEMORY = 16,  /* out of memory */
-  AMX_ERR_FORMAT,       /* invalid file format */
-  AMX_ERR_VERSION,      /* file is for a newer version of the AMX */
-  AMX_ERR_NOTFOUND,     /* function not found */
-  AMX_ERR_INDEX,        /* invalid index parameter (bad entry point) */
-  AMX_ERR_DEBUG,        /* debugger cannot run */
-  AMX_ERR_INIT,         /* AMX not initialized (or doubly initialized) */
-  AMX_ERR_USERDATA,     /* unable to set user data field (table full) */
-  AMX_ERR_INIT_JIT,     /* cannot initialize the JIT */
-  AMX_ERR_PARAMS,       /* parameter error */
-  AMX_ERR_DOMAIN,       /* domain error, expression result does not fit in range */
-  AMX_ERR_GENERAL,      /* general error (unknown or unspecific error) */
-  AMX_ERR_OVERLAY,      /* overlays are unsupported (JIT) or uninitialized */
-};
-
-#define AMX_FLAG_OVERLAY  0x01  /* all function calls use overlays */
-#define AMX_FLAG_DEBUG    0x02  /* symbolic info. available */
-#define AMX_FLAG_NOCHECKS 0x04  /* no array bounds checking; no BREAK opcodes */
-#define AMX_FLAG_SLEEP    0x08  /* script uses the sleep instruction (possible re-entry or power-down mode) */
-#define AMX_FLAG_CRYPT    0x10  /* file is encrypted */
-#define AMX_FLAG_DSEG_INIT 0x20 /* data section is explicitly initialized */
-#define AMX_FLAG_SYSREQN 0x800  /* script uses new (optimized) version of SYSREQ opcode */
-#define AMX_FLAG_NTVREG 0x1000  /* all native functions are registered */
-#define AMX_FLAG_JITC   0x2000  /* abstract machine is JIT compiled */
-#define AMX_FLAG_VERIFY 0x4000  /* busy verifying P-code */
-#define AMX_FLAG_INIT   0x8000  /* AMX has been initialized */
-
-#define AMX_EXEC_MAIN   (-1)    /* start at program entry point */
-#define AMX_EXEC_CONT   (-2)    /* continue from last address */
-
-#define AMX_USERTAG(a,b,c,d)    ((a) | ((b)<<8) | ((long)(c)<<16) | ((long)(d)<<24))
-
-/* for native functions that use floating point parameters, the following
- * two macros are convenient for casting a "cell" into a "float" type _without_
- * changing the bit pattern
- */
-#if PAWN_CELL_SIZE==32
-  #define amx_ftoc(f)   ( * ((cell*)&f) )   /* float to cell */
-  #define amx_ctof(c)   ( * ((float*)&c) )  /* cell to float */
-#elif PAWN_CELL_SIZE==64
-  #define amx_ftoc(f)   ( * ((cell*)&f) )   /* float to cell */
-  #define amx_ctof(c)   ( * ((double*)&c) ) /* cell to float */
-#else
-  // amx_ftoc() and amx_ctof() cannot be used
-#endif
-
-/* when a pointer cannot be stored in a cell, cells that hold relocated
- * addresses need to be expanded
- */
-#if defined __64BIT__ && PAWN_CELL_SIZE<64
-  #define CELLMASK      (((int64_t)1 << PAWN_CELL_SIZE) - 1)
-  #define amx_Address(amx,addr) \
-                        (cell*)(((int64_t)((amx)->data ? (amx)->data : (amx)->code) & ~CELLMASK) | ((int64_t)(addr) & CELLMASK))
-#elif defined __32BIT__ && PAWN_CELL_SIZE<32
-  #define CELLMASK      ((1L << PAWN_CELL_SIZE) - 1)
-  #define amx_Address(amx,addr) \
-                        (cell*)(((int32_t)((amx)->data ? (amx)->data : (amx)->code) & ~CELLMASK) | ((int32_t)(addr) & CELLMASK))
-#else
-  #define amx_Address(amx,addr) ((void)(amx),(cell*)(addr))
-#endif
-
-#if defined __STDC_VERSION__ && __STDC_VERSION__ >= 199901L
-  /* C99: use variable-length arrays */
-  #define amx_StrParam_Type(amx,param,result,type)                          \
-    int result##_length_;                                                   \
-    amx_StrLen(amx_Address(amx,param),&result##_length_);                   \
-    char result##_vla_[(result##_length_+1)*sizeof(*(result))];             \
-    (result)=(type)result##_vla_;                                           \
-    amx_GetString((char*)(result),amx_Address(amx,param),                   \
-                  sizeof(*(result))>1,result##_length_+1)
-  #define amx_StrParam(amx,param,result) \
-    amx_StrParam_Type(amx,param,result,void*)
-#else
-  /* macro using alloca() */
-  #define amx_StrParam_Type(amx,param,result,type)                          \
-    do {                                                                    \
-      int result##_length_;                                                 \
-      amx_StrLen(amx_Address(amx,param),&result##_length_);                 \
-      if (result##_length_>0 &&                                             \
-          ((result)=(type)alloca((result##_length_+1)*sizeof(*(result))))!=NULL) \
-        amx_GetString((char*)(result),amx_Address(amx,param),               \
-                      sizeof(*(result))>1,result##_length_+1);              \
-      else (result) = NULL;                                                 \
-    } while (0)
-  #define amx_StrParam(amx,param,result) \
-    amx_StrParam_Type(amx,param,result,void*)
-#endif
-
-uint16_t * AMXAPI amx_Align16(uint16_t *v);
-uint32_t * AMXAPI amx_Align32(uint32_t *v);
-#if defined _I64_MAX || defined INT64_MAX || defined HAVE_I64
-  uint64_t * AMXAPI amx_Align64(uint64_t *v);
-#endif
-int AMXAPI amx_Allot(AMX *amx, int cells, cell **address);
-int AMXAPI amx_Callback(AMX *amx, cell index, cell *result, const cell *params);
-int AMXAPI amx_Cleanup(AMX *amx);
-int AMXAPI amx_Clone(AMX *amxClone, AMX *amxSource, void *data);
-int AMXAPI amx_Exec(AMX *amx, cell *retval, int index);
-int AMXAPI amx_FindNative(AMX *amx, const char *name, int *index);
-int AMXAPI amx_FindPublic(AMX *amx, const char *name, int *index);
-int AMXAPI amx_FindPubVar(AMX *amx, const char *name, cell **address);
-int AMXAPI amx_FindTagId(AMX *amx, cell tag_id, char *tagname);
-int AMXAPI amx_Flags(AMX *amx,uint16_t *flags);
-int AMXAPI amx_GetNative(AMX *amx, int index, char *name);
-int AMXAPI amx_GetPublic(AMX *amx, int index, char *name, ucell *address);
-int AMXAPI amx_GetPubVar(AMX *amx, int index, char *name, cell **address);
-int AMXAPI amx_GetString(char *dest,const cell *source, int use_wchar, size_t size);
-int AMXAPI amx_GetTag(AMX *amx, int index, char *tagname, cell *tag_id);
-int AMXAPI amx_GetUserData(AMX *amx, long tag, void **ptr);
-int AMXAPI amx_Init(AMX *amx, void *program);
-int AMXAPI amx_InitJIT(AMX *amx, void *reloc_table, void *native_code);
-int AMXAPI amx_MemInfo(AMX *amx, long *codesize, long *datasize, long *stackheap);
-int AMXAPI amx_NameLength(AMX *amx, int *length);
-AMX_NATIVE_INFO * AMXAPI amx_NativeInfo(const char *name, AMX_NATIVE func);
-int AMXAPI amx_NumNatives(AMX *amx, int *number);
-int AMXAPI amx_NumPublics(AMX *amx, int *number);
-int AMXAPI amx_NumPubVars(AMX *amx, int *number);
-int AMXAPI amx_NumTags(AMX *amx, int *number);
-int AMXAPI amx_Push(AMX *amx, cell value);
-int AMXAPI amx_PushAddress(AMX *amx, cell *address);
-int AMXAPI amx_PushArray(AMX *amx, cell **address, const cell array[], int numcells);
-int AMXAPI amx_PushString(AMX *amx, cell **address, const char *string, int pack, int use_wchar);
-int AMXAPI amx_RaiseError(AMX *amx, int error);
-int AMXAPI amx_Register(AMX *amx, const AMX_NATIVE_INFO *nativelist, int number);
-int AMXAPI amx_Release(AMX *amx, cell *address);
-int AMXAPI amx_SetCallback(AMX *amx, AMX_CALLBACK callback);
-int AMXAPI amx_SetDebugHook(AMX *amx, AMX_DEBUG debug);
-int AMXAPI amx_SetString(cell *dest, const char *source, int pack, int use_wchar, size_t size);
-int AMXAPI amx_SetUserData(AMX *amx, long tag, void *ptr);
-int AMXAPI amx_StrLen(const cell *cstring, int *length);
-int AMXAPI amx_UTF8Check(const char *string, int *length);
-int AMXAPI amx_UTF8Get(const char *string, const char **endptr, cell *value);
-int AMXAPI amx_UTF8Len(const cell *cstr, int *length);
-int AMXAPI amx_UTF8Put(char *string, char **endptr, int maxchars, cell value);
-
-#if PAWN_CELL_SIZE==16
-  void amx_Swap16(uint16_t *v);
-#endif
-#if PAWN_CELL_SIZE==32
-  void amx_Swap32(uint32_t *v);
-#endif
-#if PAWN_CELL_SIZE==64 && (defined _I64_MAX || defined INT64_MAX || defined HAVE_I64)
-  void amx_Swap64(uint64_t *v);
-#endif
-
-#if PAWN_CELL_SIZE==16
-  #define amx_AlignCell(v) amx_Align16((uint16_t*)(v))
-  #define amx_SwapCell(v)  amx_Swap16((uint16_t*)(v))
-#elif PAWN_CELL_SIZE==32
-  #define amx_AlignCell(v) amx_Align32((uint32_t*)(v))
-  #define amx_SwapCell(v)  amx_Swap32((uint32_t*)(v))
-#elif PAWN_CELL_SIZE==64 && (defined _I64_MAX || defined INT64_MAX || defined HAVE_I64)
-  #define amx_AlignCell(v) amx_Align64((uint64_t*)(v))
-  #define amx_SwapCell(v)  amx_Swap64((uint64_t*)(v))
-#else
-  #error Unsupported cell size
-#endif
-
-#define amx_RegisterFunc(amx, name, func) \
-  amx_Register((amx), amx_NativeInfo((name),(func)), 1);
-
-#if !defined AMX_NO_ALIGN
-  #if defined __LINUX__ || defined __FreeBSD__ || defined __APPLE__
-    #pragma pack()    /* reset default packing */
-  #elif defined MACOS && defined __MWERKS__
-    #pragma options align=reset
-  #else
-    #pragma pack(pop) /* reset previous packing */
-  #endif
-#endif
-
-#ifdef  __cplusplus
-}
-#endif
-
-#endif /* AMX_H_INCLUDED */
diff --git a/apps/openmw-mp/amx/amxaux.c b/apps/openmw-mp/amx/amxaux.c
deleted file mode 100644
index f4bebeacc..000000000
--- a/apps/openmw-mp/amx/amxaux.c
+++ /dev/null
@@ -1,164 +0,0 @@
-/*  Support routines for the Pawn Abstract Machine
- *
- *  Copyright (c) ITB CompuPhase, 2003-2011
- *
- *  Licensed under the Apache License, Version 2.0 (the "License"); you may not
- *  use this file except in compliance with the License. You may obtain a copy
- *  of the License at
- *
- *      http://www.apache.org/licenses/LICENSE-2.0
- *
- *  Unless required by applicable law or agreed to in writing, software
- *  distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
- *  WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the
- *  License for the specific language governing permissions and limitations
- *  under the License.
- *
- *  Version: $Id: amxaux.c 4523 2011-06-21 15:03:47Z thiadmer $
- */
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include "amx.h"
-#include "amxaux.h"
-
-size_t AMXAPI aux_ProgramSize(const char *filename)
-{
-  FILE *fp;
-  AMX_HEADER hdr;
-
-  if ((fp=fopen(filename,"rb")) == NULL)
-    return 0;
-  fread(&hdr, sizeof hdr, 1, fp);
-  fclose(fp);
-
-  amx_Align16(&hdr.magic);
-  amx_Align32((uint32_t *)&hdr.stp);
-  return (hdr.magic==AMX_MAGIC) ? (size_t)hdr.stp : 0;
-}
-
-int AMXAPI aux_LoadProgram(AMX *amx, const char *filename, void *memblock)
-{
-  FILE *fp;
-  AMX_HEADER hdr;
-  int result, didalloc;
-
-  /* open the file, read and check the header */
-  if ((fp = fopen(filename, "rb")) == NULL)
-    return AMX_ERR_NOTFOUND;
-  fread(&hdr, sizeof hdr, 1, fp);
-  amx_Align16(&hdr.magic);
-  amx_Align32((uint32_t *)&hdr.size);
-  amx_Align32((uint32_t *)&hdr.stp);
-  if (hdr.magic != AMX_MAGIC) {
-    fclose(fp);
-    return AMX_ERR_FORMAT;
-  } /* if */
-
-  /* allocate the memblock if it is NULL */
-  didalloc = 0;
-  if (memblock == NULL) {
-    if ((memblock = malloc(hdr.stp)) == NULL) {
-      fclose(fp);
-      return AMX_ERR_MEMORY;
-    } /* if */
-    didalloc = 1;
-    /* after amx_Init(), amx->base points to the memory block */
-  } /* if */
-
-  /* read in the file */
-  rewind(fp);
-  fread(memblock, 1, (size_t)hdr.size, fp);
-  fclose(fp);
-
-  /* initialize the abstract machine */
-  memset(amx, 0, sizeof *amx);
-  result = amx_Init(amx, memblock);
-
-  /* free the memory block on error, if it was allocated here */
-  if (result != AMX_ERR_NONE && didalloc) {
-    free(memblock);
-    amx->base = NULL;                   /* avoid a double free */
-  } /* if */
-
-  return result;
-}
-
-int AMXAPI aux_FreeProgram(AMX *amx)
-{
-  if (amx->base!=NULL) {
-    amx_Cleanup(amx);
-    free(amx->base);
-    memset(amx, 0, sizeof(AMX));
-  } /* if */
-  return AMX_ERR_NONE;
-}
-
-char * AMXAPI aux_StrError(int errnum)
-{
-static char *messages[] = {
-      /* AMX_ERR_NONE      */ "(none)",
-      /* AMX_ERR_EXIT      */ "Forced exit",
-      /* AMX_ERR_ASSERT    */ "Assertion failed",
-      /* AMX_ERR_STACKERR  */ "Stack/heap collision (insufficient stack size)",
-      /* AMX_ERR_BOUNDS    */ "Array index out of bounds",
-      /* AMX_ERR_MEMACCESS */ "Invalid memory access",
-      /* AMX_ERR_INVINSTR  */ "Invalid instruction",
-      /* AMX_ERR_STACKLOW  */ "Stack underflow",
-      /* AMX_ERR_HEAPLOW   */ "Heap underflow",
-      /* AMX_ERR_CALLBACK  */ "No (valid) native function callback",
-      /* AMX_ERR_NATIVE    */ "Native function failed",
-      /* AMX_ERR_DIVIDE    */ "Divide by zero",
-      /* AMX_ERR_SLEEP     */ "(sleep mode)",
-      /* AMX_ERR_INVSTATE  */ "Invalid state",
-      /* 14 */                "(reserved)",
-      /* 15 */                "(reserved)",
-      /* AMX_ERR_MEMORY    */ "Out of memory",
-      /* AMX_ERR_FORMAT    */ "Invalid/unsupported P-code file format",
-      /* AMX_ERR_VERSION   */ "File is for a newer version of the AMX",
-      /* AMX_ERR_NOTFOUND  */ "File or function is not found",
-      /* AMX_ERR_INDEX     */ "Invalid index parameter (bad entry point)",
-      /* AMX_ERR_DEBUG     */ "Debugger cannot run",
-      /* AMX_ERR_INIT      */ "AMX not initialized (or doubly initialized)",
-      /* AMX_ERR_USERDATA  */ "Unable to set user data field (table full)",
-      /* AMX_ERR_INIT_JIT  */ "Cannot initialize the JIT",
-      /* AMX_ERR_PARAMS    */ "Parameter error",
-      /* AMX_ERR_DOMAIN    */ "Domain error, expression result does not fit in range",
-      /* AMX_ERR_GENERAL   */ "General error (unknown or unspecific error)",
-      /* AMX_ERR_OVERLAY   */ "Overlays are unsupported (JIT) or uninitialized",
-    };
-  if (errnum < 0 || errnum >= sizeof messages / sizeof messages[0])
-    return "(unknown)";
-  return messages[errnum];
-}
-
-int AMXAPI aux_GetSection(const AMX *amx, int section, cell **start, size_t *size)
-{
-  AMX_HEADER *hdr;
-
-  if (amx == NULL || start == NULL || size == NULL)
-    return AMX_ERR_PARAMS;
-
-  hdr = (AMX_HEADER*)amx->base;
-  switch(section) {
-  case CODE_SECTION:
-    *start = (cell *)(amx->base + hdr->cod);
-    *size = hdr->dat - hdr->cod;
-    break;
-  case DATA_SECTION:
-    *start = (cell *)(amx->data);
-    *size = hdr->hea - hdr->dat;
-    break;
-  case HEAP_SECTION:
-    *start = (cell *)(amx->data + hdr->hea);
-    *size = amx->hea - hdr->hea;
-    break;
-  case STACK_SECTION:
-    *start = (cell *)(amx->data + amx->stk);
-    *size = amx->stp - amx->stk;
-    break;
-  default:
-    return AMX_ERR_PARAMS;
-  } /* switch */
-  return AMX_ERR_NONE;
-}
diff --git a/apps/openmw-mp/amx/amxaux.h b/apps/openmw-mp/amx/amxaux.h
deleted file mode 100644
index 093a96fa6..000000000
--- a/apps/openmw-mp/amx/amxaux.h
+++ /dev/null
@@ -1,50 +0,0 @@
-/*  Support routines for the Pawn Abstract Machine
- *
- *  Copyright (c) ITB CompuPhase, 2003-2011
- *
- *  Licensed under the Apache License, Version 2.0 (the "License"); you may not
- *  use this file except in compliance with the License. You may obtain a copy
- *  of the License at
- *
- *      http://www.apache.org/licenses/LICENSE-2.0
- *
- *  Unless required by applicable law or agreed to in writing, software
- *  distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
- *  WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the
- *  License for the specific language governing permissions and limitations
- *  under the License.
- *
- *  Version: $Id: amxaux.h 4523 2011-06-21 15:03:47Z thiadmer $
- */
-#ifndef AMXAUX_H_INCLUDED
-#define AMXAUX_H_INCLUDED
-
-#include "amx.h"
-
-#ifdef  __cplusplus
-extern  "C" {
-#endif
-
-/* loading and freeing programs */
-size_t AMXAPI aux_ProgramSize(const char *filename);
-int AMXAPI aux_LoadProgram(AMX *amx, const char *filename, void *memblock);
-int AMXAPI aux_FreeProgram(AMX *amx);
-
-/* a readable error message from an error code */
-char * AMXAPI aux_StrError(int errnum);
-
-enum {
-  CODE_SECTION,
-  DATA_SECTION,
-  HEAP_SECTION,
-  STACK_SECTION,
-  /* ----- */
-  NUM_SECTIONS
-};
-int AMXAPI aux_GetSection(const AMX *amx, int section, cell **start, size_t *size);
-
-#ifdef  __cplusplus
-}
-#endif
-
-#endif /* AMXAUX_H_INCLUDED */
diff --git a/apps/openmw-mp/amx/amxcons.c b/apps/openmw-mp/amx/amxcons.c
deleted file mode 100644
index 3f2f812a0..000000000
--- a/apps/openmw-mp/amx/amxcons.c
+++ /dev/null
@@ -1,1448 +0,0 @@
-/* Console output module (terminal I/O) for the Pawn AMX
- *
- *  Since some of these routines go further than those of standard C, they
- *  cannot always be implemented with portable C functions. In other words,
- *  these routines must be ported to other environments.
- *
- *  Copyright (c) ITB CompuPhase, 1997-2015
- *
- *  Licensed under the Apache License, Version 2.0 (the "License"); you may not
- *  use this file except in compliance with the License. You may obtain a copy
- *  of the License at
- *
- *      http://www.apache.org/licenses/LICENSE-2.0
- *
- *  Unless required by applicable law or agreed to in writing, software
- *  distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
- *  WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the
- *  License for the specific language governing permissions and limitations
- *  under the License.
- *
- *  Version: $Id: amxcons.c 5181 2015-01-21 09:44:28Z thiadmer $
- */
-
-#if defined _UNICODE || defined __UNICODE__ || defined UNICODE
-# if !defined UNICODE   /* for Windows */
-#   define UNICODE
-# endif
-# if !defined _UNICODE  /* for C library */
-#   define _UNICODE
-# endif
-#endif
-
-#include <limits.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <assert.h>
-#if defined __WIN32__ || defined _WIN32 || defined WIN32 || defined __MSDOS__
-  #define HAVE_CONIO
-  #include <conio.h>
-  #include <malloc.h>
-#endif
-#if defined USE_CURSES || defined HAVE_CURSES_H
-  #include <curses.h>
-  #if !defined CURSES
-    #define CURSES  1
-  #endif
-#endif
-#include "osdefs.h"
-#if defined __ECOS__
-  /* eCos puts include files in cyg/package_name */
-  #include <cyg/hal/hal_if.h>
-  #include <cyg/infra/diag.h>
-  #include <cyg/hal/hal_diag.h>
-  #include <cyg/pawn/amx.h>
-#else
-  #include "amx.h"
-#endif
-#if defined __WIN32__ || defined _WIN32 || defined WIN32
-  #include <windows.h>
-#endif
-
-#if defined _UNICODE
-# include <tchar.h>
-#elif !defined __T
-  typedef char          TCHAR;
-# define __T(string)    string
-# define _fgetts        fgets
-# define _puttchar      putchar
-# define _stprintf      sprintf
-# define _tcschr        strchr
-# define _tcscpy        strcpy
-# define _tcsdup        strdup
-# define _tcslen        strlen
-# define _tprintf       printf
-#endif
-#include "amxcons.h"
-
-#if defined AMX_TERMINAL
-  #define EOL_CHAR       '\r'
-#endif
-#if defined __WIN32__ || defined _WIN32 || defined WIN32 || defined __MSDOS__
-  #define EOL_CHAR       '\r'
-#endif
-#if !defined EOL_CHAR
-  /* if not a "known" operating system, assume Linux/Unix */
-  #define EOL_CHAR     '\n'
-#endif
-
-#if !defined AMX_STRING_LIB
-
-#if defined AMX_TERMINAL
-  /* required functions are implemented elsewhere */
-  int amx_putstr(const TCHAR *);
-  int amx_putchar(int);
-  int amx_fflush(void);
-  int amx_getch(void);
-  TCHAR *amx_gets(TCHAR *,int);
-  int amx_termctl(int,int);
-  void amx_clrscr(void);
-  void amx_clreol(void);
-  int amx_gotoxy(int x,int y);
-  void amx_wherexy(int *x,int *y);
-  unsigned int amx_setattr(int foregr,int backgr,int highlight);
-  void amx_console(int columns, int lines, int flags);
-  void amx_viewsize(int *width,int *height);
-  int amx_kbhit(void);
-#elif defined CURSES && CURSES != 0
-  /* Use the "curses" library to implement the console */
-  static WINDOW *curseswin;
-  #define amx_putstr(s)       printw("%s",(s))
-  #define amx_putchar(c)      addch(c)
-  #define amx_fflush()        refresh()
-  #define amx_getch()         getch()
-  #define amx_gets(s,n)       getnstr((s),(n))
-  #define amx_clrscr()        clear()
-  #define amx_clreol()        clrtoeol()
-  #define amx_gotoxy(x,y)     move((y)-1,(x)-1)
-  #define amx_console(c,l,f)  ((void)(c),(void)(l),(void)(f))
-  unsigned int amx_setattr(int foregr,int backgr,int highlight)
-  {
-    if (highlight>0)
-      attron(A_STANDOUT);
-    else
-      attroff(A_STANDOUT);
-    //??? in future, also handle colours
-  }
-  void CreateConsole(void);
-  int amx_kbhit(void)
-  {
-    int result;
-    CreateConsole();
-    nodelay(curseswin,TRUE);    /* enter non-blocking state */
-    result=getch();             /* read key (if any) */
-    nodelay(curseswin,FALSE);   /* leave non-blocking state */
-    if (result!=ERR)
-      ungetch(result);          /* a key is waiting, push it back */
-    return (result==ERR) ? 0 : 1;
-  }
-  int amx_termctl(int code,int value)
-  {
-    switch (code) {
-    case 0:           /* query terminal support */
-      return 1;
-    /* case 1: */     /* switch auto-wrap on/off (not supported in curses!) */
-    /* case 2: */     /* create/switch to another console */
-    case 3:           /* set emphasized font */
-      if (value)
-        attron(A_BOLD);
-      else
-        attroff(A_BOLD);
-      return 1;
-    /* case 4: */     /* query whether a terminal is "open" */
-    default:
-      return 0;
-    } /* switch */
-  }
-  void amx_wherexy(int *x,int *y)
-  {
-    int row,col;
-    getyx(curseswin,row,col);
-    if (x!=NULL)
-      *x=col+1;
-    if (y!=NULL)
-      *y=row+1;
-  }
-  void amx_viewsize(int *width,int *height)
-  {
-    int row,col;
-    getmaxyx(curseswin,row,col);
-    if (width!=NULL)
-      *width=col;
-    if (height!=NULL)
-      *height=row;
-  }
-#elif defined VT100 || defined __LINUX__ || defined ANSITERM || defined __ECOS__
-  /* ANSI/VT100 terminal, or shell emulating "xterm" */
-  #if defined __ECOS__
-    #define AMXCONSOLE_NOIDLE
-  #endif
-
-  #if CYGPKG_PAWN_AMXCONSOLE_DIAG==1
-    /* eCos has basically two ways to make simple exchanges with a terminal:
-     * - with the diag_*() functions (no input provided!)
-     * - with f*() functions (fprintf(),fputs(), etc).
-     */
-    #define amx_fflush()
-
-    static int amx_putstr(TCHAR *s)
-    {
-      diag_write_string(s);
-      return 1;
-    }
-    static int amx_putchar(TCHAR c)
-    {
-      diag_write_char(c);
-      return c;
-    }
-    static char amx_getch(void)
-    {
-      char c=-1;
-      HAL_DIAG_READ_CHAR(c);
-      return c;
-    }
-  #else
-
-    #define amx_putstr(s)     fputs((s),stdout)
-    #define amx_putchar(c)    putchar(c)
-    #define amx_fflush()      fflush(stdout)
-    #define amx_getch()       getch()
-    #define amx_gets(s,n)     fgets(s,n,stdin)
-    #define amx_kbhit()       kbhit()
-  #endif
-
-  int amx_termctl(int code,int value)
-  {
-    switch (code) {
-    case 0:             /* query terminal support */
-      return 1;
-
-    case 1:             /* switch "auto-wrap" on or off */
-      if (value)
-        amx_putstr("\033[?7h"); /* enable "auto-wrap" */
-      else
-        amx_putstr("\033[?7l"); /* disable "auto-wrap" */
-      return 1;
-
-    #if 0
-      /* next to swapping buffers, more information should be saved and swapped,
-       * such as the cursor position and the current terminal attributes
-       */
-    case 2:             /* swap console buffers */
-      amx_fflush();
-      if (value==1) {
-        amx_putstr("\033[?47h");
-      } else {
-        amx_putstr("\033[?47l");
-      } /* if */
-      amx_fflush();
-      return 1;
-    #endif
-
-    case 3:             /* set bold/highlighted font */
-      return 0;
-
-    default:
-      return 0;
-    } /* switch */
-  }
-  void amx_clrscr(void)
-  {
-    amx_putstr("\033[2J");
-    amx_fflush();        /* pump through the terminal codes */
-  }
-  void amx_clreol(void)
-  {
-    amx_putstr("\033[K");
-    amx_fflush();        /* pump through the terminal codes */
-  }
-  int amx_gotoxy(int x,int y)
-  {
-    char str[30];
-    _stprintf(str,"\033[%d;%dH",y,x);
-    amx_putstr(str);
-    amx_fflush();        /* pump through the terminal codes */
-    return 1;
-  }
-  void amx_wherexy(int *x,int *y)
-  {
-    int val,i;
-    char str[10];
-
-    assert(x!=NULL && y!=NULL);
-    amx_putstr("\033[6n");
-    amx_fflush();
-    while (amx_getch()!='\033')
-      /* nothing */;
-    val=amx_getch();
-    assert(val=='[');
-    for (i=0; i<8 && (val=amx_getch())!=';'; i++)
-      str[i]=(char)val;
-    str[i]='\0';
-    if (y!=NULL)
-      *y=atoi(str);
-    for (i=0; i<8 && (val=amx_getch())!='R'; i++)
-      str[i]=(char)val;
-    str[i]='\0';
-    if (x!=NULL)
-      *x=atoi(str);
-    #if defined ANSITERM
-      val=amx_getch();
-      assert(val=='\r');    /* ANSI driver adds CR to the end of the command */
-    #endif
-  }
-  unsigned int amx_setattr(int foregr,int backgr,int highlight)
-  {
-    static short current=(0 << 8) | 7;
-    short prev = current;
-    char str[30];
-
-    if (foregr>=0) {
-      _stprintf(str,"\x1b[%dm",foregr+30);
-      amx_putstr(str);
-      current=(current & 0xff00) | (foregr & 0x0f);
-    } /* if */
-    if (backgr>=0) {
-      _stprintf(str,"\x1b[%dm",backgr+40);
-      amx_putstr(str);
-      current=(current & 0x00ff) | ((backgr & 0x0f) << 8);
-    } /* if */
-    if (highlight>=0) {
-      _stprintf(str,"\x1b[%dm",highlight);
-      amx_putstr(str);
-      current=(current & 0x7fff) | ((highlight & 0x01) << 15);
-    } /* if */
-    return prev;
-  }
-  void amx_console(int columns, int lines, int flags)
-  {
-    char str[30];
-
-    (void)flags;
-    /* There is no ANSI code (or VT100/VT220) to set the size of the console
-     * (indeed, the terminal was that of the alphanumeric display). In xterm (a
-     * terminal emulator) we can set the terminal size though, and most
-     * terminals that in use today are in fact emulators.
-     * Putty understands this code too, by many others do not.
-     */
-    sprintf(str,"\033[8;%d;%dt",lines,columns);
-    amx_putstr(str);
-    amx_fflush();
-  }
-  void amx_viewsize(int *width,int *height)
-  {
-    /* a trick to get the size of the terminal is to position the cursor far
-     * away and then read it back
-     */
-    amx_gotoxy(999,999);
-    amx_wherexy(width,height);
-  }
-#elif defined __WIN32__ || defined _WIN32 || defined WIN32
-  /* Win32 console */
-  #define amx_putstr(s)       _tprintf("%s",(s))
-  #define amx_putchar(c)      _puttchar(c)
-  #define amx_fflush()        fflush(stdout)
-  #define amx_gets(s,n)       _fgetts(s,n,stdin)
-
-  int amx_termctl(int code,int value)
-  {
-    switch (code) {
-    case 0:             /* query terminal support */
-      return 1;
-
-    case 1: {           /* switch auto-wrap on/off */
-      /* only works in Windows 2000/XP */
-      HANDLE hConsole=GetStdHandle(STD_OUTPUT_HANDLE);
-      DWORD mode;
-      GetConsoleMode(hConsole,&mode);
-      if (value)
-        mode |= ENABLE_WRAP_AT_EOL_OUTPUT;
-      else
-        mode &= ~ENABLE_WRAP_AT_EOL_OUTPUT;
-      SetConsoleMode(hConsole,mode);
-      return 1;
-    } /* case */
-
-    /* case 2: */     /* create/switch to another console */
-    /* case 3: */     /* set emphasized font */
-    /* case 4: */     /* query whether a terminal is "open" */
-    default:
-      return 0;
-    } /* switch */
-  }
-  void amx_clrscr(void)
-  {
-    COORD coordScreen={0,0};
-    DWORD cCharsWritten;
-    CONSOLE_SCREEN_BUFFER_INFO csbi;
-    DWORD dwConSize;
-    HANDLE hConsole=GetStdHandle(STD_OUTPUT_HANDLE);
-
-    amx_fflush();       /* make sure the I/O buffer is empty */
-    GetConsoleScreenBufferInfo(hConsole,&csbi);
-    dwConSize=csbi.dwSize.X*csbi.dwSize.Y;
-    FillConsoleOutputCharacter(hConsole,' ',dwConSize,coordScreen,&cCharsWritten);
-    FillConsoleOutputAttribute(hConsole,csbi.wAttributes,dwConSize,coordScreen, &cCharsWritten);
-    SetConsoleCursorPosition(hConsole,coordScreen);
-  }
-  void amx_clreol(void)
-  {
-    DWORD cCharsWritten;
-    CONSOLE_SCREEN_BUFFER_INFO csbi;
-    DWORD dwConSize;
-    HANDLE hConsole=GetStdHandle(STD_OUTPUT_HANDLE);
-
-    amx_fflush();       /* make sure all output is written */
-    GetConsoleScreenBufferInfo(hConsole,&csbi);
-    dwConSize=csbi.dwSize.X - csbi.dwCursorPosition.X;
-    FillConsoleOutputCharacter(hConsole,' ',dwConSize,csbi.dwCursorPosition,&cCharsWritten);
-    FillConsoleOutputAttribute(hConsole,csbi.wAttributes,dwConSize,csbi.dwCursorPosition,&cCharsWritten);
-  }
-  int amx_gotoxy(int x,int y)
-  {
-    COORD point;
-    CONSOLE_SCREEN_BUFFER_INFO csbi;
-    HANDLE hConsole=GetStdHandle(STD_OUTPUT_HANDLE);
-
-    GetConsoleScreenBufferInfo(hConsole, &csbi);
-    if (x<=0 || x>csbi.dwSize.X || y<=0 || y>csbi.dwSize.Y)
-      return 0;
-    amx_fflush();       /* make sure all output is written */
-    point.X=(short)(x-1);
-    point.Y=(short)(y-1);
-    SetConsoleCursorPosition(hConsole,point);
-    return 1;
-  }
-  void amx_wherexy(int *x,int *y)
-  {
-    CONSOLE_SCREEN_BUFFER_INFO csbi;
-    amx_fflush();       /* make sure all output is written */
-    GetConsoleScreenBufferInfo(GetStdHandle(STD_OUTPUT_HANDLE), &csbi);
-    if (x!=NULL)
-      *x=csbi.dwCursorPosition.X+1;
-    if (y!=NULL)
-      *y=csbi.dwCursorPosition.Y+1;
-  }
-  unsigned int amx_setattr(int foregr,int backgr,int highlight)
-  {
-    static int ansi_colours[] = { 0, 4, 2, 6, 1, 5, 3, 7 };
-    CONSOLE_SCREEN_BUFFER_INFO csbi;
-    int f,b,h,prev;
-    HANDLE hConsole=GetStdHandle(STD_OUTPUT_HANDLE);
-
-    amx_fflush();       /* make sure all output is written */
-    GetConsoleScreenBufferInfo(hConsole,&csbi);
-    f=csbi.wAttributes & 0x07;
-    b=(csbi.wAttributes >> 4) & 0x0f;
-    h=(csbi.wAttributes & 0x08) ? 1 : 0;
-    prev=(b << 8) | f | (h << 15);
-    if (foregr>=0 && foregr<8)
-      f=ansi_colours[foregr];
-    if (backgr>=0 && backgr<8)
-      b=ansi_colours[backgr];
-    if (highlight>=0)
-      h=highlight!=0;
-    SetConsoleTextAttribute(hConsole, (WORD)((b << 4) | f | (h << 3)));
-    return prev;
-  }
-  void amx_console(int columns, int lines, int flags)
-  {
-    SMALL_RECT rect;
-    COORD dwSize;
-    HANDLE hConsole;
-    (void)flags;
-    dwSize.X=(short)columns;
-    dwSize.Y=(short)lines;
-    hConsole=GetStdHandle(STD_OUTPUT_HANDLE);
-    SetConsoleScreenBufferSize(hConsole,dwSize);
-    rect.Left=0;
-    rect.Top=0;
-    rect.Right=(short)(columns-1);
-    rect.Bottom=(short)(lines-1);
-    SetConsoleWindowInfo(hConsole,TRUE,&rect);
-  }
-  void amx_viewsize(int *width,int *height)
-  {
-    CONSOLE_SCREEN_BUFFER_INFO csbi;
-    GetConsoleScreenBufferInfo(GetStdHandle(STD_OUTPUT_HANDLE),&csbi);
-    if (width!=NULL)
-      *width=(int)csbi.dwSize.X;
-    if (height!=NULL)
-      *height=(int)(csbi.srWindow.Bottom-csbi.srWindow.Top+1);
-  }
-  int amx_getch(void)
-  {
-    TCHAR ch;
-    DWORD count,mode;
-    HANDLE hConsole=GetStdHandle(STD_INPUT_HANDLE);
-    GetConsoleMode(hConsole,&mode);
-    SetConsoleMode(hConsole,mode & ~(ENABLE_LINE_INPUT|ENABLE_ECHO_INPUT));
-    while (ReadFile(hConsole,&ch,1,&count,NULL) && count==0)
-      /* nothing */;
-    SetConsoleMode(hConsole,mode);
-    if (count>0)
-      return ch;
-    return EOF;
-  }
-  int amx_kbhit(void)
-  {
-    DWORD count=0;
-    HANDLE hConsole;
-    hConsole=GetStdHandle(STD_INPUT_HANDLE);
-    if (GetFileType(hConsole)==FILE_TYPE_PIPE) {
-      PeekNamedPipe(hConsole,NULL,0,NULL,&count,NULL);
-    } else {
-      INPUT_RECORD rec;
-      while (PeekConsoleInput(hConsole,&rec,1,&count)) {
-        if (count==0 || (rec.EventType==KEY_EVENT && rec.Event.KeyEvent.bKeyDown))
-          break;
-        ReadConsoleInput(hConsole,&rec,1,&count);
-      }
-    }
-    return (count>0);
-  }
-#else
-  /* assume a streaming terminal; limited features (no colour, no cursor
-   * control)
-   */
-  #define amx_putstr(s)       printf("%s",(s))
-  #define amx_putchar(c)      putchar(c)
-  #define amx_fflush()        fflush(stdout)
-  #define amx_gets(s,n)       fgets(s,n,stdin)
-  #define amx_clrscr()        (void)(0)
-  #define amx_clreol()        (void)(0)
-  #define amx_gotoxy(x,y)     ((void)(x),(void)(y),(0))
-  #define amx_wherexy(x,y)    (*(x)=*(y)=0)
-  #define amx_setattr(c,b,h)  ((void)(c),(void)(b),(void)(h),(0))
-  #define amx_termctl(c,v)    ((void)(c),(void)(v),(0))
-  #define amx_console(c,l,f)  ((void)(c),(void)(l),(void)(f))
-  #define amx_viewsize        (*(x)=80,*(y)=25)
-  #if defined HAVE_CONIO
-    #define amx_getch()       getch()
-    #define amx_kbhit()       kbhit()
-  #else
-    #define amx_getch()       getchar()
-    #define amx_kbhit()       (0)
-  #endif
-#endif
-
-#if !defined AMX_TERMINAL && (defined __WIN32__ || defined _WIN32 || defined WIN32)
-  void CreateConsole(void)
-  { static int createdconsole=0;
-    if (!createdconsole) {
-      AllocConsole();
-      createdconsole=1;
-    } /* if */
-  }
-#elif defined CURSES && CURSES != 0
-  // The Mac OS X build variant uses curses.
-  void CreateConsole(void)
-  { static int createdconsole=0;
-    if (!createdconsole) {
-      curseswin=initscr();
-      if (has_colors())
-        start_color();
-      cbreak();
-      noecho();
-      nonl();
-      scrollok(curseswin,TRUE);
-      intrflush(curseswin,FALSE);
-      keypad(curseswin,TRUE);
-      createdconsole=1;
-    } /* if */
-  }
-#else
-  #define CreateConsole()
-#endif
-
-static int cons_putstr(void *dest,const TCHAR *str)
-{
-  (void)dest;
-  return amx_putstr(str);
-}
-
-static int cons_putchar(void *dest,TCHAR ch)
-{
-  (void)dest;
-  return amx_putchar(ch);
-}
-
-#endif /* AMX_STRING_LIB */
-
-enum {
-  SV_DECIMAL,
-  SV_HEX
-};
-
-static TCHAR *reverse(TCHAR *string,int stop)
-{
-    int start=0;
-    TCHAR temp;
-
-    /* swap the string */
-    stop--;             /* avoid swapping the '\0' byte to the first position */
-    while (stop - start > 0) {
-        temp = string[start];
-        string[start] = string[stop];
-        string[stop] = temp;
-        start++;
-        stop--;
-    } /* while */
-    return string;
-}
-
-/* Converts an integral value to a string, with optional padding with spaces or
- * zeros.
- * The "format" must be decimal or hexadecimal
- * The number is right-aligned in the field with the size of the absolute value
- * of the "width" parameter.
- * If the width value is positive, the string is padded with spaces; if it is
- * negative, it is padded with zeros.
- */
-static TCHAR *amx_strval(TCHAR buffer[], long value, int format, int width)
-{
-    int start, stop;
-    TCHAR temp;
-
-    start = stop = 0;
-    if (format == SV_DECIMAL) {
-        if (value < 0) {
-            buffer[0] = __T('-');
-            start = stop = 1;
-            value = -value;
-        } /* if */
-        do {
-            buffer[stop++] = (TCHAR)((value % 10) + __T('0'));
-            value /= 10;
-        } while (value > 0);
-    } else {
-        /* hexadecimal */
-        unsigned long v = (unsigned long)value; /* copy to unsigned value for shifting */
-        do {
-            buffer[stop] = (TCHAR)((v & 0x0f) + __T('0'));
-            if (buffer[stop] > __T('9'))
-                buffer[stop] += (TCHAR)(__T('A') - __T('0') - 10);
-            v >>= 4;
-            stop++;
-        } while (v != 0);
-    } /* if */
-
-    /* pad to given width */
-    if (width < 0) {
-        temp = __T('0');
-        width = -width;
-    } else {
-        temp = __T(' ');
-    } /* if */
-    while (stop < width)
-        buffer[stop++] = temp;
-
-    buffer[stop] = __T('\0');
-
-    /* swap the string, and we are done */
-    reverse(buffer+start,stop-start);
-    return buffer;
-  }
-
-#if defined FIXEDPOINT
-  #define FIXEDMULT     1000
-  #define FIXEDDIGITS   3
-
-static TCHAR *formatfixed(TCHAR *string,cell value,TCHAR align,int width,TCHAR decpoint,int digits,TCHAR filler)
-{
-  int i, len;
-  cell ipart,v;
-  TCHAR vsign=__T('\0');
-
-  /* make the value positive (but keep the sign) */
-  if (value<0) {
-    value=-value;
-    vsign=__T('-');
-  } /* if */
-
-  /* "prepare" the value so that when it is truncated to the requested
-   * number of digits, the result is rounded towards the dropped digits
-   */
-  assert(digits<INT_MAX);
-  v=FIXEDMULT/2;
-  for (i=0; i<digits; i++)
-    v/=10;
-  value+=v;
-
-  /* get the integer part and remove it from the value */
-  ipart=value/FIXEDMULT;
-  value-=FIXEDMULT*ipart;
-  assert(ipart>=0);
-  assert(value>=0);
-
-  /* truncate the fractional part to the requested number of digits */
-  for (i=FIXEDDIGITS; i>digits; i--)
-    value/=10;
-
-  string[0]=__T('\0');
-
-  /* add sign */
-  i=(int)_tcslen(string);
-  string[i]=vsign;
-  string[i+1]=__T('\0');
-
-  /* add integer part */
-  amx_strval(string+_tcslen(string),(long)ipart,SV_DECIMAL,0);
-
-  /* add fractional part */
-  if (digits>0) {
-    i=(int)_tcslen(string);
-    string[i]=decpoint;
-    amx_strval(string+i+1,(long)value,SV_DECIMAL,-digits);
-  } /* if */
-
-  len=(int)_tcslen(string);
-  if (len<width) {
-    /* pad to the requested width */
-    for (i=len; i<width; i++)
-      string[i]=filler;
-    string[i]=__T('\0');
-    /* optionally move the padding to the beginning of the string, using the handwaving algorithm */
-    if (align!=__T('-')) {
-      assert(i==(int)_tcslen(string));
-      assert(i>=len);
-      reverse(string,len);
-      reverse(string+len,i-len);
-      reverse(string,i);
-    } /* if */
-  } /* if */
-
-  return string;
-}
-#endif
-
-
-static int dochar(AMX *amx,TCHAR ch,cell param,TCHAR sign,TCHAR decpoint,int width,int digits,TCHAR filler,
-                  int (*f_putstr)(void*,const TCHAR *),int (*f_putchar)(void*,TCHAR),void *user)
-{
-  cell *cptr;
-  TCHAR buffer[40];
-  #if defined FLOATPOINT
-    TCHAR formatstring[40];
-  #endif
-
-  #if !defined FIXEDPOINT && !defined FLOATPOINT
-    (void)decpoint;
-  #endif
-  assert(f_putstr!=NULL);
-  assert(f_putchar!=NULL);
-
-  switch (ch) {
-  case __T('c'):
-    cptr=amx_Address(amx,param);
-    width--;            /* single character itself has a with of 1 */
-    if (sign!=__T('-'))
-      while (width-->0)
-        f_putchar(user,filler);
-    f_putchar(user,(TCHAR)*cptr);
-    while (width-->0)
-      f_putchar(user,filler);
-    return 1;
-
-  case __T('d'): {
-    cell value;
-    int length=1;
-    cptr=amx_Address(amx,param);
-    value=*cptr;
-    if (value<0 || sign==__T('+'))
-      length++;
-    if (value<0)
-      value=-value;
-    while (value>=10) {
-      length++;
-      value/=10;
-    } /* while */
-    width-=length;
-    if (sign!=__T('-'))
-      while (width-->0)
-        f_putchar(user,filler);
-    amx_strval(buffer,*cptr,SV_DECIMAL,0);
-    if (sign==__T('+') && *cptr>=0)
-      f_putchar(user,sign);
-    f_putstr(user,buffer);
-    while (width-->0)
-      f_putchar(user,filler);
-    return 1;
-  } /* case */
-
-#if defined FLOATPOINT
-  case __T('f'): /* 32-bit floating point number */
-  case __T('r'): /* if floating point is enabled, %r == %f */
-    /* build a format string */
-    if (digits==INT_MAX)
-      digits=5;
-    else if (digits>25)
-      digits=25;
-    _tcscpy(formatstring,__T("%"));
-    if (sign!=__T('\0'))
-      _stprintf(formatstring+_tcslen(formatstring),__T("%c"),sign);
-    if (width>0)
-      _stprintf(formatstring+_tcslen(formatstring),__T("%d"),width);
-    _stprintf(formatstring+_tcslen(formatstring),__T(".%df"),digits);
-    cptr=amx_Address(amx,param);
-    #if PAWN_CELL_SIZE == 64
-      _stprintf(buffer,formatstring,*(double*)cptr);
-    #else
-      _stprintf(buffer,formatstring,*(float*)cptr);
-    #endif
-    if (decpoint==__T(',')) {
-      TCHAR *ptr=_tcschr(buffer,__T('.'));
-      if (ptr!=NULL)
-        *ptr=__T(',');
-    } /* if */
-    f_putstr(user,buffer);
-    return 1;
-#endif
-
-#if defined FIXEDPOINT
-  #define FIXEDMULT 1000
-  case __T('q'): /* 32-bit fixed point number */
-#if !defined FLOATPOINT
-  case __T('r'): /* if fixed point is enabled, and floating point is not, %r == %q */
-#endif
-    cptr=amx_Address(amx,param);
-    /* format the number */
-    if (digits==INT_MAX)
-      digits=3;
-    else if (digits>25)
-      digits=25;
-    formatfixed(buffer,*cptr,sign,width,decpoint,digits,filler);
-    assert(_tcslen(buffer)<sizeof buffer);
-    f_putstr(user,buffer);
-    return 1;
-#endif
-
-#if !defined FLOATPOINT && !defined FIXEDPOINT
-  case __T('f'):
-  case __T('q'):
-  case __T('r'):
-    f_putstr(user,__T("(no rational number support)"));
-    return 0; /* flag this as an error */
-#endif
-
-  case __T('s'): {
-    AMX_FMTINFO info;
-    memset(&info,0,sizeof info);
-    info.length=digits;
-    info.f_putstr=f_putstr;
-    info.f_putchar=f_putchar;
-    info.user=user;
-    cptr=amx_Address(amx,param);
-    amx_printstring(amx,cptr,&info);
-    return 1;
-  } /* case */
-
-  case __T('x'): {
-    ucell value;
-    int length=1;
-    cptr=amx_Address(amx,param);
-    value=*(ucell*)cptr;
-    while (value>=0x10) {
-      length++;
-      value>>=4;
-    } /* while */
-    width-=length;
-    if (sign!=__T('-'))
-      while (width-->0)
-        f_putchar(user,filler);
-    amx_strval(buffer,(long)*cptr,SV_HEX,0);
-    f_putstr(user,buffer);
-    while (width-->0)
-      f_putchar(user,filler);
-    return 1;
-  } /* case */
-
-  } /* switch */
-  /* error in the string format, try to repair */
-  f_putchar(user,ch);
-  return 0;
-}
-
-enum {
-  FMT_NONE,   /* not in format state; accept '%' */
-  FMT_START,  /* found '%', accept '+', '-' (START), '0' (filler; START), digit (WIDTH), '.' (DECIM), or '%' or format letter (done) */
-  FMT_WIDTH,  /* found digit after '%' or sign, accept digit (WIDTH), '.' (DECIM) or format letter (done) */
-  FMT_DECIM,  /* found digit after '.', accept accept digit (DECIM) or format letter (done) */
-};
-
-static int formatstate(TCHAR c,int *state,TCHAR *sign,TCHAR *decpoint,int *width,int *digits,TCHAR *filler)
-{
-  assert(state!=NULL && sign!=NULL && decpoint!=NULL && width!=NULL && digits!=NULL && filler!=NULL);
-  switch (*state) {
-  case FMT_NONE:
-    if (c==__T('%')) {
-      *state=FMT_START;
-      *sign=__T('\0');
-      *decpoint=__T('.');
-      *width=0;
-      *digits=INT_MAX;
-      *filler=__T(' ');
-    } else {
-      return -1;  /* print a single character */
-    } /* if */
-    break;
-  case FMT_START:
-    if (c==__T('+') || c==__T('-')) {
-      *sign=c;
-    } else if (c==__T('0')) {
-      *filler=c;
-    } else if (c>=__T('1') && c<=__T('9')) {
-      *width=(int)(c-__T('0'));
-      *state=FMT_WIDTH;
-    } else if (c==__T('.') || c==__T(',')) {
-      *decpoint=c;
-      *digits=0;
-      *state=FMT_DECIM;
-    } else if (c==__T('%')) {
-      *state=FMT_NONE;
-      return -1;  /* print literal '%' */
-    } else {
-      return 1;   /* print formatted character */
-    } /* if */
-    break;
-  case FMT_WIDTH:
-    if (c>=__T('0') && c<=__T('9')) {
-      *width=*width*10+(int)(c-__T('0'));
-    } else if (c==__T('.') || c==__T(',')) {
-      *decpoint=c;
-      *digits=0;
-      *state=FMT_DECIM;
-    } else {
-      return 1;   /* print formatted character */
-    } /* if */
-    break;
-  case FMT_DECIM:
-    if (c>=__T('0') && c<=__T('9')) {
-      *digits=*digits*10+(int)(c-__T('0'));
-    } else {
-      return 1;   /* print formatted character */
-    } /* if */
-    break;
-  } /* switch */
-
-  return 0;
-}
-
-int amx_printstring(AMX *amx,cell *cstr,AMX_FMTINFO *info)
-{
-  int i,paramidx=0;
-  int fmtstate=FMT_NONE,width,digits;
-  TCHAR sign,decpoint,filler;
-  int (*f_putstr)(void*,const TCHAR *);
-  int (*f_putchar)(void*,TCHAR);
-  void *user;
-  int skip,length;
-
-  if (info!=NULL) {
-    f_putstr=info->f_putstr;
-    f_putchar=info->f_putchar;
-    user=info->user;
-    skip=info->skip;
-    length=info->length;
-  } else {
-    f_putstr=NULL;
-    f_putchar=NULL;
-    user=NULL;
-    skip=0;
-    length=INT_MAX;
-  } /* if */
-  #if !defined AMX_STRING_LIB
-    if (f_putstr==NULL)
-      f_putstr=cons_putstr;
-    if (f_putchar==NULL)
-      f_putchar=cons_putchar;
-  #else
-    assert(f_putstr!=NULL && f_putchar!=NULL);
-  #endif
-
-  /* if no placeholders appear, we can use a quicker routine */
-  if (info==NULL || info->params==NULL) {
-
-    TCHAR cache[100];
-    int idx=0;
-
-    if ((ucell)*cstr>UNPACKEDMAX) {
-      int j=sizeof(cell)-sizeof(char);
-      char c;
-      /* the string is packed */
-      i=0;
-      for ( ; ; ) {
-        c=(char)((ucell)cstr[i] >> 8*j);
-        if (c==0)
-          break;
-        if (skip>0) {
-          skip--;               /* skip a number of characters */
-        } else {
-          if (length--<=0)
-            break;              /* print up to a certain length */
-          assert(idx<sizeof cache);
-          cache[idx++]=c;
-          if (idx==sizeof cache - 1) {
-            cache[idx]=__T('\0');
-            f_putstr(user,cache);
-            idx=0;
-          } /* if */
-        } /* if */
-        if (j==0)
-          i++;
-        j=(j+sizeof(cell)-sizeof(char)) % sizeof(cell);
-      } /* for */
-    } else {
-      /* unpacked string */
-      for (i=0; cstr[i]!=0; i++) {
-        if (skip-->0)
-          continue;
-        assert(idx<sizeof cache);
-        cache[idx++]=(TCHAR)cstr[i];
-        if (idx==sizeof cache - 1) {
-          cache[idx]=__T('\0');
-          f_putstr(user,cache);
-          idx=0;
-        } /* if */
-      } /* for */
-    } /* if */
-    if (idx>0) {
-      cache[idx]=__T('\0');
-      f_putstr(user,cache);
-    } /* if */
-
-  } else {
-
-    /* check whether this is a packed string */
-    if ((ucell)*cstr>UNPACKEDMAX) {
-      int j=sizeof(cell)-sizeof(char);
-      char c;
-      /* the string is packed */
-      i=0;
-      for ( ; ; ) {
-        c=(char)((ucell)cstr[i] >> 8*j);
-        if (c==0)
-          break;
-        switch (formatstate(c,&fmtstate,&sign,&decpoint,&width,&digits,&filler)) {
-        case -1:
-          f_putchar(user,c);
-          break;
-        case 0:
-          break;
-        case 1:
-          assert(info!=NULL && info->params!=NULL);
-          if (paramidx>=info->numparams)  /* insufficient parameters passed */
-            amx_RaiseError(amx, AMX_ERR_NATIVE);
-          else
-            paramidx+=dochar(amx,c,info->params[paramidx],sign,decpoint,width,digits,filler,
-                             f_putstr,f_putchar,user);
-          fmtstate=FMT_NONE;
-          break;
-        default:
-          assert(0);
-        } /* switch */
-        if (j==0)
-          i++;
-        j=(j+sizeof(cell)-sizeof(char)) % sizeof(cell);
-      } /* for */
-    } else {
-      /* the string is unpacked */
-      for (i=0; cstr[i]!=0; i++) {
-        switch (formatstate((TCHAR)cstr[i],&fmtstate,&sign,&decpoint,&width,&digits,&filler)) {
-        case -1:
-          f_putchar(user,(TCHAR)cstr[i]);
-          break;
-        case 0:
-          break;
-        case 1:
-          assert(info!=NULL && info->params!=NULL);
-          if (paramidx>=info->numparams)  /* insufficient parameters passed */
-            amx_RaiseError(amx, AMX_ERR_NATIVE);
-          else
-            paramidx+=dochar(amx,(TCHAR)cstr[i],info->params[paramidx],sign,decpoint,width,digits,filler,
-                             f_putstr,f_putchar,user);
-          fmtstate=FMT_NONE;
-          break;
-        default:
-          assert(0);
-        } /* switch */
-      } /* for */
-    } /* if */
-
-  } /* if (info==NULL || info->params==NULL) */
-
-  return paramidx;
-}
-
-#if !defined AMX_STRING_LIB
-
-#if defined AMX_ALTPRINT
-/* print(const string[], start=0, end=cellmax) */
-static cell AMX_NATIVE_CALL n_print(AMX *amx,const cell *params)
-{
-  cell *cstr;
-  AMX_FMTINFO info;
-
-  memset(&info,0,sizeof info);
-  info.skip= ((size_t)params[0]>=2*sizeof(cell)) ? (int)params[2] : 0;
-  info.length= ((size_t)params[0]>=3*sizeof(cell)) ? (int)(params[3]-info.skip) : INT_MAX;
-
-  CreateConsole();
-  cstr=amx_Address(amx,params[1]);
-  amx_printstring(amx,cstr,&info);
-  amx_fflush();
-  return 0;
-}
-#else
-/* print(const string[], foreground=-1, background=-1, highlight=-1) */
-static cell AMX_NATIVE_CALL n_print(AMX *amx,const cell *params)
-{
-  cell *cstr;
-  int oldcolours;
-
-  CreateConsole();
-
-  /* set the new colours */
-  oldcolours=amx_setattr((int)params[2],(int)params[3],(int)params[4]);
-
-  cstr=amx_Address(amx,params[1]);
-  amx_printstring(amx,cstr,NULL);
-
-  /* reset the colours */
-  (void)amx_setattr(oldcolours & 0xff,(oldcolours >> 8) & 0x7f,(oldcolours >> 15) & 0x01);
-  amx_fflush();
-  return 0;
-}
-#endif
-
-static cell AMX_NATIVE_CALL n_printf(AMX *amx,const cell *params)
-{
-  cell *cstr;
-  AMX_FMTINFO info;
-
-  memset(&info,0,sizeof info);
-  info.params=params+2;
-  info.numparams=(int)(params[0]/sizeof(cell))-1;
-  info.skip=0;
-  info.length=INT_MAX;
-
-  CreateConsole();
-  cstr=amx_Address(amx,params[1]);
-  amx_printstring(amx,cstr,&info);
-  amx_fflush();
-  return 0;
-}
-
-/* getchar(bool:echo=true) */
-static cell AMX_NATIVE_CALL n_getchar(AMX *amx,const cell *params)
-{
-  int c;
-
-  (void)amx;
-  CreateConsole();
-  c=amx_getch();
-  if (params[1]) {
-    #if defined(SUPPRESS_ECHO)
-      /* For Mac OS X, non-Curses, don't echo the character */
-    #else
-      amx_putchar((TCHAR)c);
-      amx_fflush();
-    #endif
-  } /* if */
-  return c;
-}
-
-/* getstring(string[], size=sizeof string, bool:pack=false) */
-static cell AMX_NATIVE_CALL n_getstring(AMX *amx,const cell *params)
-{
-  int c,chars,max;
-  cell *cptr;
-
-  (void)amx;
-  CreateConsole();
-  chars=0;
-  max=(int)params[2];
-  if (max>0) {
-    #if __STDC_VERSION__ >= 199901L
-      TCHAR str[max];   /* use C99 feature if available */
-    #else
-      TCHAR *str=(TCHAR *)alloca(max*sizeof(TCHAR));
-      if (str==NULL)
-        return chars;
-    #endif
-
-    c=amx_getch();
-    while (c!=EOF && c!=EOL_CHAR && chars<max-1) {
-      str[chars++]=(TCHAR)c;
-      #if defined(SUPPRESS_ECHO)
-        /* For Mac OS X, non-Curses, don't echo the character */
-      #else
-        amx_putchar((TCHAR)c);
-        amx_fflush();
-      #endif
-      if (chars<max-1)
-        c=amx_getch();
-    } /* while */
-
-    if (c==EOL_CHAR)
-      amx_putchar('\n');
-    assert(chars<max);
-    str[chars]='\0';
-
-    cptr=amx_Address(amx,params[1]);
-    amx_SetString(cptr,(char*)str,(int)params[3],sizeof(TCHAR)>1,max);
-
-  } /* if */
-  return chars;
-}
-
-static void acceptchar(int c,int *num)
-{
-  switch (c) {
-  case '\b':
-    amx_putchar('\b');
-    *num-=1;
-    #if defined amx_putchar && (defined __BORLANDC__ || defined __WATCOMC__)
-      /* the backspace key does not erase the
-       * character, so do this explicitly */
-      amx_putchar(' ');     /* erase */
-      amx_putchar('\b');    /* go back */
-    #endif
-    break;
-  case EOL_CHAR:
-    amx_putchar('\n');
-    *num+=1;
-    break;
-  default:
-    #if defined(SUPPRESS_ECHO)
-      /* For Mac OS X, non-Curses, don't echo the character */
-    #else
-      amx_putchar((TCHAR)c);
-    #endif
-    *num+=1;
-  } /* switch */
-  amx_fflush();
-}
-
-static int inlist(AMX *amx,int c,const cell *params,int num)
-{
-  int i, key;
-
-  (void)amx;
-  for (i=0; i<num; i++) {
-    if (i==0) {
-      /* first key is passed by value, others are passed by reference */
-      key = (int)params[i];
-    } else {
-      cell *cptr;
-      cptr=amx_Address(amx,params[i]);
-      key=(int)*cptr;
-    } /* if */
-    if (c==key || c==-key)
-      return key;
-  } /* for */
-  return 0;
-}
-
-static cell AMX_NATIVE_CALL n_getvalue(AMX *amx,const cell *params)
-{
-  cell value;
-  int base,sign,c,d;
-  int chars,n;
-
-  CreateConsole();
-  base=(int)params[1];
-  if (base<2 || base>36)
-    return 0;
-
-  chars=0;
-  value=0;
-  sign=1;       /* to avoid a compiler warning (Microsoft Visual C/C++ 6.0) */
-
-  c=amx_getch();
-  while (c!=EOF) {
-    /* check for sign (if any) */
-    if (chars==0) {
-      if (c=='-') {
-        sign=-1;
-        acceptchar(c,&chars);
-        c=amx_getch();
-      } else {
-        sign=1;
-      } /* if */
-    } /* if */
-
-    /* check end of input */
-    #if EOL_CHAR!='\r'
-      if (c==EOL_CHAR && inlist(amx,'\r',params+2,(int)params[0]/sizeof(cell)-1)!=0)
-        c='\r';
-    #endif
-    if ((chars>1 || chars>0 && sign>0)
-        && (n=inlist(amx,c,params+2,(int)params[0]/sizeof(cell)-1))!=0)
-    {
-      if (n>0)
-        acceptchar(c,&chars);
-      break;
-    } /* if */
-    #if EOL_CHAR!='\r'
-      if (c=='\r')
-        c=EOL_CHAR;
-    #endif
-
-    /* get value */
-    d=base;     /* by default, do not accept the character */
-    if (c>='0' && c<='9') {
-      d=c-'0';
-    } else if (c>='a' && c<='z') {
-      d=c-'a'+10;
-    } else if (c>='A' && c<='Z') {
-      d=c-'A'+10;
-    } else if (c=='\b') {
-      if (chars>0) {
-        value/=base;
-        acceptchar(c,&chars);
-      } /* if */
-    } /* if */
-    if (d<base) {
-      acceptchar(c,&chars);
-      value=value*base + d;
-    } /* if */
-    c=amx_getch();
-  } /* while */
-  return sign*value;
-}
-
-static cell AMX_NATIVE_CALL n_clrscr(AMX *amx,const cell *params)
-{
-  (void)amx;
-  (void)params;
-  CreateConsole();
-  amx_clrscr();
-  return 0;
-}
-
-static cell AMX_NATIVE_CALL n_clreol(AMX *amx,const cell *params)
-{
-  (void)amx;
-  (void)params;
-  CreateConsole();
-  amx_clreol();
-  return 0;
-}
-
-static cell AMX_NATIVE_CALL n_gotoxy(AMX *amx,const cell *params)
-{
-  (void)amx;
-  CreateConsole();
-  return amx_gotoxy((int)params[1],(int)params[2]);
-}
-
-static cell AMX_NATIVE_CALL n_wherexy(AMX *amx,const cell *params)
-{
-  cell *px,*py;
-  int x,y;
-
-  (void)amx;
-  CreateConsole();
-  amx_wherexy(&x,&y);
-  px=amx_Address(amx,params[1]);
-  py=amx_Address(amx,params[2]);
-  *px=x;
-  *py=y;
-  return 0;
-}
-
-static cell AMX_NATIVE_CALL n_setattr(AMX *amx,const cell *params)
-{
-  (void)amx;
-  CreateConsole();
-  (void)amx_setattr((int)params[1],(int)params[2],(int)params[3]);
-  return 0;
-}
-
-static cell AMX_NATIVE_CALL n_consctrl(AMX *amx,const cell *params)
-{
-  (void)amx;
-  CreateConsole();
-  (void)amx_termctl((int)params[1],(int)params[2]);
-  return 0;
-}
-
-static cell AMX_NATIVE_CALL n_console(AMX *amx,const cell *params)
-{
-  (void)amx;
-  CreateConsole();
-  amx_console((int)params[1],(int)params[2],(int)params[3]);
-  return 0;
-}
-
-
-#if !defined AMXCONSOLE_NOIDLE
-static AMX_IDLE PrevIdle = NULL;
-static int idxKeyPressed = -1;
-
-static int AMXAPI amx_ConsoleIdle(AMX *amx, int AMXAPI Exec(AMX *, cell *, int))
-{
-  int err=0, key;
-
-  assert(idxKeyPressed >= 0);
-
-  if (PrevIdle != NULL)
-    PrevIdle(amx, Exec);
-
-  if (amx_kbhit()) {
-    key = amx_getch();
-    amx_Push(amx, key);
-    err = Exec(amx, NULL, idxKeyPressed);
-    while (err == AMX_ERR_SLEEP)
-      err = Exec(amx, NULL, AMX_EXEC_CONT);
-  } /* if */
-
-  return err;
-}
-#endif
-
-#if defined __cplusplus
-  extern "C"
-#endif
-const AMX_NATIVE_INFO console_Natives[] = {
-  { "getchar",   n_getchar },
-  { "getstring", n_getstring },
-  { "getvalue",  n_getvalue },
-  { "print",     n_print },
-  { "printf",    n_printf },
-  { "clrscr",    n_clrscr },
-  { "clreol",    n_clreol },
-  { "gotoxy",    n_gotoxy },
-  { "wherexy",   n_wherexy },
-  { "setattr",   n_setattr },
-  { "console",   n_console },
-  { "consctrl",  n_consctrl },
-  { NULL, NULL }        /* terminator */
-};
-
-int AMXEXPORT AMXAPI amx_ConsoleInit(AMX *amx)
-{
-  #if !defined AMXCONSOLE_NOIDLE
-    /* see whether there is an @keypressed() function */
-    if (amx_FindPublic(amx, "@keypressed", &idxKeyPressed) == AMX_ERR_NONE) {
-      if (amx_GetUserData(amx, AMX_USERTAG('I','d','l','e'), (void**)&PrevIdle) != AMX_ERR_NONE)
-        PrevIdle = NULL;
-      amx_SetUserData(amx, AMX_USERTAG('I','d','l','e'), (void*)amx_ConsoleIdle);
-    } /* if */
-  #endif
-
-  return amx_Register(amx, console_Natives, -1);
-}
-
-int AMXEXPORT AMXAPI amx_ConsoleCleanup(AMX *amx)
-{
-  (void)amx;
-  #if !defined AMXCONSOLE_NOIDLE
-    PrevIdle = NULL;
-  #endif
-  return AMX_ERR_NONE;
-}
-
-#endif /* AMX_STRING_LIB */
diff --git a/apps/openmw-mp/amx/amxcons.h b/apps/openmw-mp/amx/amxcons.h
deleted file mode 100644
index 44ea18bef..000000000
--- a/apps/openmw-mp/amx/amxcons.h
+++ /dev/null
@@ -1,18 +0,0 @@
-#ifndef AMXCONS_H_INCLUDED
-#ifndef AMXCONS_H_INCLUDED
-#define AMXCONS_H_INCLUDED
-
-typedef struct tagFMTINFO {
-  const cell *params;
-  int numparams;
-  int skip;     /* number of characters to skip from the beginning */
-  int length;   /* number of characters to print */
-  /* helper functions */
-  int (*f_putstr)(void *dest,const TCHAR *);
-  int (*f_putchar)(void *dest,TCHAR);
-  void *user;   /* user data */
-} AMX_FMTINFO;
-
-int amx_printstring(AMX *amx,cell *cstr,AMX_FMTINFO *info);
-
-#endif /* AMXCONS_H_INCLUDED */
diff --git a/apps/openmw-mp/amx/amxcore.c b/apps/openmw-mp/amx/amxcore.c
deleted file mode 100644
index 4caa72ff1..000000000
--- a/apps/openmw-mp/amx/amxcore.c
+++ /dev/null
@@ -1,500 +0,0 @@
-/*  Core module for the Pawn AMX
- *
- *  Copyright (c) ITB CompuPhase, 1997-2012
- *
- *  Licensed under the Apache License, Version 2.0 (the "License"); you may not
- *  use this file except in compliance with the License. You may obtain a copy
- *  of the License at
- *
- *      http://www.apache.org/licenses/LICENSE-2.0
- *
- *  Unless required by applicable law or agreed to in writing, software
- *  distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
- *  WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the
- *  License for the specific language governing permissions and limitations
- *  under the License.
- *
- *  Version: $Id: amxcore.c 4708 2012-05-18 12:52:49Z  $
- */
-#if defined _UNICODE || defined __UNICODE__ || defined UNICODE
-# if !defined UNICODE   /* for Windows */
-#   define UNICODE
-# endif
-# if !defined _UNICODE  /* for C library */
-#   define _UNICODE
-# endif
-#endif
-
-#include <stdlib.h>
-#include <string.h>
-#include <limits.h>
-#include <assert.h>
-#include "osdefs.h"
-#if defined __ECOS__
-  /* eCos puts include files in cyg/package_name */
-  #include <cyg/pawn/amx.h>
-  #define  stricmp(a,b) strcasecmp(a,b)
-#else
-  #include "amx.h"
-#endif
-#if defined __WIN32__ || defined _WIN32 || defined WIN32 || defined _Windows
-  #include <windows.h>
-#endif
-
-/* A few compilers do not provide the ANSI C standard "time" functions */
-#if !defined SN_TARGET_PS2 && !defined _WIN32_WCE && !defined __ICC430__
-  #include <time.h>
-#endif
-
-#if defined _UNICODE
-# include <tchar.h>
-#elif !defined __T
-  typedef char          TCHAR;
-# define __T(string)    string
-# define _tcschr        strchr
-# define _tcscpy        strcpy
-# define _tcsdup        strdup
-# define _tcslen        strlen
-#endif
-
-
-#define CHARBITS        (8*sizeof(char))
-typedef unsigned char   uchar;
-
-#if !defined AMX_NOPROPLIST
-typedef struct _property_list {
-  struct _property_list *next;
-  cell id;
-  char *name;
-  cell value;
-} proplist;
-
-static proplist proproot = { NULL, 0, NULL, 0 };
-
-static proplist *list_additem(proplist *root)
-{
-  proplist *item;
-
-  assert(root!=NULL);
-  if ((item=(proplist *)malloc(sizeof(proplist)))==NULL)
-    return NULL;
-  item->name=NULL;
-  item->id=0;
-  item->value=0;
-  item->next=root->next;
-  root->next=item;
-  return item;
-}
-static void list_delete(proplist *pred,proplist *item)
-{
-  assert(pred!=NULL);
-  assert(item!=NULL);
-  pred->next=item->next;
-  assert(item->name!=NULL);
-  free(item->name);
-  free(item);
-}
-static void list_setitem(proplist *item,cell id,char *name,cell value)
-{
-  char *ptr;
-
-  assert(item!=NULL);
-  if ((ptr=(char *)malloc(strlen(name)+1))==NULL)
-    return;
-  if (item->name!=NULL)
-    free(item->name);
-  strcpy(ptr,name);
-  item->name=ptr;
-  item->id=id;
-  item->value=value;
-}
-static proplist *list_finditem(proplist *root,cell id,char *name,cell value,
-                               proplist **pred)
-{
-  proplist *item=root->next;
-  proplist *prev=root;
-
-  /* check whether to find by name or by value */
-  assert(name!=NULL);
-  if (strlen(name)>0) {
-    /* find by name */
-    while (item!=NULL && (item->id!=id || stricmp(item->name,name)!=0)) {
-      prev=item;
-      item=item->next;
-    } /* while */
-  } else {
-    /* find by value */
-    while (item!=NULL && (item->id!=id || item->value!=value)) {
-      prev=item;
-      item=item->next;
-    } /* while */
-  } /* if */
-  if (pred!=NULL)
-    *pred=prev;
-  return item;
-}
-#endif
-
-static cell AMX_NATIVE_CALL numargs(AMX *amx,const cell *params)
-{
-  AMX_HEADER *hdr;
-  uchar *data;
-  cell bytes;
-
-  (void)params;
-  hdr=(AMX_HEADER *)amx->base;
-  data=amx->data ? amx->data : amx->base+(int)hdr->dat;
-  /* the number of bytes is on the stack, at "frm + 2*cell" */
-  bytes= * (cell *)(data+(int)amx->frm+2*sizeof(cell));
-  /* the number of arguments is the number of bytes divided
-   * by the size of a cell */
-  return bytes/sizeof(cell);
-}
-
-static cell AMX_NATIVE_CALL getarg(AMX *amx,const cell *params)
-{
-  AMX_HEADER *hdr;
-  uchar *data;
-  cell value;
-
-  hdr=(AMX_HEADER *)amx->base;
-  data=amx->data ? amx->data : amx->base+(int)hdr->dat;
-  /* get the base value */
-  value= * (cell *)(data+(int)amx->frm+((int)params[1]+3)*sizeof(cell));
-  /* adjust the address in "value" in case of an array access */
-  value+=params[2]*sizeof(cell);
-  /* get the value indirectly */
-  value= * (cell *)(data+(int)value);
-  return value;
-}
-
-static cell AMX_NATIVE_CALL setarg(AMX *amx,const cell *params)
-{
-  AMX_HEADER *hdr;
-  uchar *data;
-  cell value;
-
-  hdr=(AMX_HEADER *)amx->base;
-  data=amx->data ? amx->data : amx->base+(int)hdr->dat;
-  /* get the base value */
-  value= * (cell *)(data+(int)amx->frm+((int)params[1]+3)*sizeof(cell));
-  /* adjust the address in "value" in case of an array access */
-  value+=params[2]*sizeof(cell);
-  /* verify the address */
-  if (value<0 || value>=amx->hea && value<amx->stk)
-    return 0;
-  /* set the value indirectly */
-  * (cell *)(data+(int)value) = params[3];
-  return 1;
-}
-
-static cell AMX_NATIVE_CALL heapspace(AMX *amx,const cell *params)
-{
-  (void)params;
-  return amx->stk - amx->hea;
-}
-
-static cell AMX_NATIVE_CALL funcidx(AMX *amx,const cell *params)
-{
-  char name[64];
-  cell *cstr;
-  int index,err;
-
-  cstr=amx_Address(amx,params[1]);
-  amx_GetString(name,cstr,0,sizeof name);
-  err=amx_FindPublic(amx,name,&index);
-  if (err!=AMX_ERR_NONE)
-    index=-1;   /* this is not considered a fatal error */
-  return index;
-}
-
-void amx_swapcell(cell *pc)
-{
-  union {
-    cell c;
-    #if PAWN_CELL_SIZE==16
-      uchar b[2];
-    #elif PAWN_CELL_SIZE==32
-      uchar b[4];
-    #elif PAWN_CELL_SIZE==64
-      uchar b[8];
-    #else
-      #error Unsupported cell size
-    #endif
-  } value;
-  uchar t;
-
-  assert(pc!=NULL);
-  value.c = *pc;
-  #if PAWN_CELL_SIZE==16
-    t = value.b[0];
-    value.b[0] = value.b[1];
-    value.b[1] = t;
-  #elif PAWN_CELL_SIZE==32
-    t = value.b[0];
-    value.b[0] = value.b[3];
-    value.b[3] = t;
-    t = value.b[1];
-    value.b[1] = value.b[2];
-    value.b[2] = t;
-  #elif PAWN_CELL_SIZE==64
-    t = value.b[0];
-    value.b[0] = value.b[7];
-    value.b[7] = t;
-    t = value.b[1];
-    value.b[1] = value.b[6];
-    value.b[6] = t;
-    t = value.b[2];
-    value.b[2] = value.b[5];
-    value.b[5] = t;
-    t = value.b[3];
-    value.b[3] = value.b[4];
-    value.b[4] = t;
-  #else
-    #error Unsupported cell size
-  #endif
-  *pc = value.c;
-}
-
-static cell AMX_NATIVE_CALL swapchars(AMX *amx,const cell *params)
-{
-  cell c;
-
-  (void)amx;
-  assert((size_t)params[0]==sizeof(cell));
-
-  c=params[1];
-  amx_swapcell(&c);
-  return c;
-}
-
-static cell AMX_NATIVE_CALL core_tolower(AMX *amx,const cell *params)
-{
-  (void)amx;
-  #if defined __WIN32__ || defined _WIN32 || defined WIN32
-    return (cell)CharLower((LPTSTR)params[1]);
-  #elif defined _Windows
-    return (cell)AnsiLower((LPSTR)params[1]);
-  #else
-    if ((unsigned)(params[1]-'A')<26u)
-      return params[1]+'a'-'A';
-    return params[1];
-  #endif
-}
-
-static cell AMX_NATIVE_CALL core_toupper(AMX *amx,const cell *params)
-{
-  (void)amx;
-  #if defined __WIN32__ || defined _WIN32 || defined WIN32
-    return (cell)CharUpper((LPTSTR)params[1]);
-  #elif defined _Windows
-    return (cell)AnsiUpper((LPSTR)params[1]);
-  #else
-    if ((unsigned)(params[1]-'a')<26u)
-      return params[1]+'A'-'a';
-    return params[1];
-  #endif
-}
-
-static cell AMX_NATIVE_CALL core_min(AMX *amx,const cell *params)
-{
-  (void)amx;
-  return params[1] <= params[2] ? params[1] : params[2];
-}
-
-static cell AMX_NATIVE_CALL core_max(AMX *amx,const cell *params)
-{
-  (void)amx;
-  return params[1] >= params[2] ? params[1] : params[2];
-}
-
-static cell AMX_NATIVE_CALL core_clamp(AMX *amx,const cell *params)
-{
-  cell value = params[1];
-  if (params[2] > params[3])  /* minimum value > maximum value ! */
-    amx_RaiseError(amx,AMX_ERR_NATIVE);
-  if (value < params[2])
-    value = params[2];
-  else if (value > params[3])
-    value = params[3];
-  return value;
-}
-
-#if !defined AMX_NOPROPLIST
-static char *MakePackedString(cell *cptr)
-{
-  int len;
-  char *dest;
-
-  amx_StrLen(cptr,&len);
-  dest=(char *)malloc(len+sizeof(cell));
-  amx_GetString(dest,cptr,0,len+sizeof(cell));
-  return dest;
-}
-
-/* getproperty(id=0, const name[]="", value=cellmin, string[]="", size=sizeof string) */
-static cell AMX_NATIVE_CALL getproperty(AMX *amx,const cell *params)
-{
-  cell *cstr;
-  char *name;
-  proplist *item;
-
-  (void)amx;
-  cstr=amx_Address(amx,params[2]);
-  name=MakePackedString(cstr);
-  item=list_finditem(&proproot,params[1],name,params[3],NULL);
-  /* if list_finditem() found the value, store the name */
-  if (item!=NULL && item->value==params[3] && strlen(name)==0) {
-    cstr=amx_Address(amx,params[4]);
-    amx_SetString(cstr,item->name,1,0,params[5]);
-  } /* if */
-  free(name);
-  return (item!=NULL) ? item->value : 0;
-}
-
-/* setproperty(id=0, const name[]="", value=cellmin, const string[]="") */
-static cell AMX_NATIVE_CALL setproperty(AMX *amx,const cell *params)
-{
-  cell prev=0;
-  cell *cstr;
-  char *name;
-  proplist *item;
-
-  cstr=amx_Address(amx,params[2]);
-  name=MakePackedString(cstr);
-  item=list_finditem(&proproot,params[1],name,params[3],NULL);
-  if (item==NULL)
-    item=list_additem(&proproot);
-  if (item==NULL) {
-    amx_RaiseError(amx,AMX_ERR_MEMORY);
-  } else {
-    prev=item->value;
-    if (strlen(name)==0) {
-      free(name);
-      cstr=amx_Address(amx,params[4]);
-      name=MakePackedString(cstr);
-    } /* if */
-    list_setitem(item,params[1],name,params[3]);
-  } /* if */
-  free(name);
-  return prev;
-}
-
-/* deleteproperty(id=0, const name[]="", value=cellmin) */
-static cell AMX_NATIVE_CALL delproperty(AMX *amx,const cell *params)
-{
-  cell prev=0;
-  cell *cstr;
-  char *name;
-  proplist *item,*pred;
-
-  (void)amx;
-  cstr=amx_Address(amx,params[2]);
-  name=MakePackedString(cstr);
-  item=list_finditem(&proproot,params[1],name,params[3],&pred);
-  if (item!=NULL) {
-    prev=item->value;
-    list_delete(pred,item);
-  } /* if */
-  free(name);
-  return prev;
-}
-
-/* existproperty(id=0, const name[]="", value=cellmin) */
-static cell AMX_NATIVE_CALL existproperty(AMX *amx,const cell *params)
-{
-  cell *cstr;
-  char *name;
-  proplist *item;
-
-  (void)amx;
-  cstr=amx_Address(amx,params[2]);
-  name=MakePackedString(cstr);
-  item=list_finditem(&proproot,params[1],name,params[3],NULL);
-  free(name);
-  return (item!=NULL);
-}
-#endif
-
-#if !defined AMX_NORANDOM
-/* This routine comes from the book "Inner Loops" by Rick Booth, Addison-Wesley
- * (ISBN 0-201-47960-5). This is a "multiplicative congruential random number
- * generator" that has been extended to 31-bits (the standard C version returns
- * only 15-bits).
- */
-#define INITIAL_SEED  0xcaa938dbL
-static unsigned long IL_StandardRandom_seed = INITIAL_SEED; /* always use a non-zero seed */
-#define IL_RMULT 1103515245L
-#if defined __BORLANDC__ || defined __WATCOMC__
-  #pragma argsused
-#endif
-static cell AMX_NATIVE_CALL core_random(AMX *amx,const cell *params)
-{
-    unsigned long lo, hi, ll, lh, hh, hl;
-    unsigned long result;
-
-    /* one-time initialization (or, mostly one-time) */
-    #if !defined SN_TARGET_PS2 && !defined _WIN32_WCE && !defined __ICC430__
-        if (IL_StandardRandom_seed == INITIAL_SEED)
-            IL_StandardRandom_seed=(unsigned long)time(NULL);
-    #endif
-
-    (void)amx;
-
-    lo = IL_StandardRandom_seed & 0xffff;
-    hi = IL_StandardRandom_seed >> 16;
-    IL_StandardRandom_seed = IL_StandardRandom_seed * IL_RMULT + 12345;
-    ll = lo * (IL_RMULT  & 0xffff);
-    lh = lo * (IL_RMULT >> 16    );
-    hl = hi * (IL_RMULT  & 0xffff);
-    hh = hi * (IL_RMULT >> 16    );
-    result = ((ll + 12345) >> 16) + lh + hl + (hh << 16);
-    result &= ~LONG_MIN;        /* remove sign bit */
-    if (params[1]!=0)
-        result %= params[1];
-    return (cell)result;
-}
-#endif
-
-
-#if defined __cplusplus
-  extern "C"
-#endif
-const AMX_NATIVE_INFO core_Natives[] = {
-  { "numargs",       numargs },
-  { "getarg",        getarg },
-  { "setarg",        setarg },
-  { "heapspace",     heapspace },
-  { "funcidx",       funcidx },
-  { "swapchars",     swapchars },
-  { "tolower",       core_tolower },
-  { "toupper",       core_toupper },
-  { "min",           core_min },
-  { "max",           core_max },
-  { "clamp",         core_clamp },
-#if !defined AMX_NORANDOM
-  { "random",        core_random },
-#endif
-#if !defined AMX_NOPROPLIST
-  { "getproperty",   getproperty },
-  { "setproperty",   setproperty },
-  { "deleteproperty",delproperty },
-  { "existproperty", existproperty },
-#endif
-  { NULL, NULL }        /* terminator */
-};
-
-int AMXEXPORT AMXAPI amx_CoreInit(AMX *amx)
-{
-  return amx_Register(amx, core_Natives, -1);
-}
-
-int AMXEXPORT AMXAPI amx_CoreCleanup(AMX *amx)
-{
-  (void)amx;
-  #if !defined AMX_NOPROPLIST
-    while (proproot.next!=NULL)
-      list_delete(&proproot,proproot.next);
-  #endif
-  return AMX_ERR_NONE;
-}
diff --git a/apps/openmw-mp/amx/amxexec_gcc.c b/apps/openmw-mp/amx/amxexec_gcc.c
deleted file mode 100644
index a036dbec9..000000000
--- a/apps/openmw-mp/amx/amxexec_gcc.c
+++ /dev/null
@@ -1,1361 +0,0 @@
-/*  Example implementation of an optimized abstract machine.
- *
- *  This abstract machine uses the "labels as values" feature of the GNU GCC
- *  compiler to create a fast "indirect threaded" interpreter. The Intel C/C++
- *  compiler supports this too.
- *
- *  Copyright (c) ITB CompuPhase, 1998-2013
- *
- *  This software is provided "as-is", without any express or implied warranty.
- *  In no event will the authors be held liable for any damages arising from
- *  the use of this software.
- *
- *  Permission is granted to anyone to use this software for any purpose,
- *  including commercial applications, and to alter it and redistribute it
- *  freely, subject to the following restrictions:
- *
- *  1.  The origin of this software must not be misrepresented; you must not
- *      claim that you wrote the original software. If you use this software in
- *      a product, an acknowledgment in the product documentation would be
- *      appreciated but is not required.
- *  2.  Altered source versions must be plainly marked as such, and must not be
- *      misrepresented as being the original software.
- *  3.  This notice may not be removed or altered from any source distribution.
- *
- *  Version: $Id: amxcons.c 3821 2007-10-15 16:54:20Z thiadmer $
- */
-#include <assert.h>
-#include <stddef.h>
-#include <string.h>
-#include "osdefs.h"
-#if defined __ECOS__
-  /* eCos puts include files in cyg/package_name */
-  #include <cyg/pawn/amx.h>
-#else
-  #include "amx.h"
-#endif
-
-#if !(defined __GNUC__ || defined __ICC)
-  #error The GNU GCC or the Intel C/C++ compiler is required for this file.
-#endif
-
-#if !defined sizearray
-  #define sizearray(a)  (sizeof(a)/sizeof((a)[0]))
-#endif
-
-/* It is assumed that the abstract machine can simply access the memory area
- * for the global data and the stack. If this is not the case, you need to
- * define the macro sets _R() and _W(), for reading and writing to memory.
- */
-#if !defined _R
-  #define _R_DEFAULT            /* mark default memory access */
-  #define _R(base,addr)         (* (cell *)((unsigned char*)(base)+(int)(addr)))
-  #define _R8(base,addr)        (* (unsigned char *)((unsigned char*)(base)+(int)(addr)))
-  #define _R16(base,addr)       (* (uint16_t *)((unsigned char*)(base)+(int)(addr)))
-  #define _R32(base,addr)       (* (uint32_t *)((unsigned char*)(base)+(int)(addr)))
-#endif
-#if !defined _W
-  #define _W_DEFAULT            /* mark default memory access */
-  #define _W(base,addr,value)   ((*(cell *)((unsigned char*)(base)+(int)(addr)))=(cell)(value))
-  #define _W8(base,addr,value)  ((*(unsigned char *)((unsigned char*)(base)+(int)(addr)))=(unsigned char)(value))
-  #define _W16(base,addr,value) ((*(uint16_t *)((unsigned char*)(base)+(int)(addr)))=(uint16_t)(value))
-  #define _W32(base,addr,value) ((*(uint32_t *)((unsigned char*)(base)+(int)(addr)))=(uint32_t)(value))
-#endif
-
-#if -8/3==-2 && 8/-3==-2
-  #define TRUNC_SDIV    /* signed divisions are truncated on this platform */
-#else
-  #define IABS(a)       ((a)>=0 ? (a) : (-a))
-#endif
-
-#if !defined GETPARAM
-  #define GETPARAM(v)   ( v=*cip++ )  /* read a parameter from the opcode stream */
-#endif
-#if !defined GETPARAM_P
-  #define GETPARAM_P(v,o) ( v=((cell)(o) >> (int)(sizeof(cell)*4)) )
-#endif
-#if !defined SKIPPARAM
-  #define SKIPPARAM(n)  ( cip=(cell *)cip+(n) ) /* for obsolete opcodes */
-#endif
-
-/* PUSH() and POP() are defined in terms of the _R() and _W() macros */
-#define PUSH(v)         ( stk-=sizeof(cell), _W(data,stk,v) )
-#define POP(v)          ( v=_R(data,stk), stk+=sizeof(cell) )
-
-#define ABORT(amx,v)    { (amx)->stk=reset_stk; (amx)->hea=reset_hea; return v; }
-
-#define STKMARGIN       ((cell)(16*sizeof(cell)))
-#define CHKMARGIN()     if (hea+STKMARGIN>stk) return AMX_ERR_STACKERR
-#define CHKSTACK()      if (stk>amx->stp) return AMX_ERR_STACKLOW
-#define CHKHEAP()       if (hea<amx->hlw) return AMX_ERR_HEAPLOW
-
-#define JUMPREL(ip)     ((cell*)((unsigned long)(ip)+*(cell*)(ip)-sizeof(cell)))
-
-
-#if !defined AMX_NO_PACKED_OPC && !defined AMX_TOKENTHREADING
-  #define AMX_TOKENTHREADING    /* packed opcodes require token threading */
-#endif
-#if defined AMX_TOKENTHREADING
-  #if defined AMX_NO_PACKED_OPC
-    #define NEXT(cip,op) goto *amx_opcodelist[*cip++]
-  #else
-    #define NEXT(cip,op) goto *amx_opcodelist[(op=*cip++) & ((1 << sizeof(cell)*4)-1)]
-  #endif
-#else
-  #if !defined AMX_NO_PACKED_OPC
-    #error Packed opcodes support requires token threading
-  #endif
-  #define NEXT(cip,op)   goto **cip++
-#endif
-
-cell amx_exec_run(AMX *amx,cell *retval,unsigned char *data)
-{
-static const void * const amx_opcodelist[] = {
-        /* core set */
-        &&op_nop,         &&op_load_pri,    &&op_load_alt,    &&op_load_s_pri,
-        &&op_load_s_alt,  &&op_lref_s_pri,  &&op_lref_s_alt,  &&op_load_i,
-        &&op_lodb_i,      &&op_const_pri,   &&op_const_alt,   &&op_addr_pri,
-        &&op_addr_alt,    &&op_stor,        &&op_stor_s,      &&op_sref_s,
-        &&op_stor_i,      &&op_strb_i,      &&op_align_pri,   &&op_lctrl,
-        &&op_sctrl,       &&op_xchg,        &&op_push_pri,    &&op_push_alt,
-        &&op_pushr_pri,   &&op_pop_pri,     &&op_pop_alt,     &&op_pick,
-        &&op_stack,       &&op_heap,        &&op_proc,        &&op_ret,
-        &&op_retn,        &&op_call,        &&op_jump,        &&op_jzer,
-        &&op_jnz,         &&op_shl,         &&op_shr,         &&op_sshr,
-        &&op_shl_c_pri,   &&op_shl_c_alt,   &&op_smul,        &&op_sdiv,
-        &&op_add,         &&op_sub,         &&op_and,         &&op_or,
-        &&op_xor,         &&op_not,         &&op_neg,         &&op_invert,
-        &&op_eq,          &&op_neq,         &&op_sless,       &&op_sleq,
-        &&op_sgrtr,       &&op_sgeq,        &&op_inc_pri,     &&op_inc_alt,
-        &&op_inc_i,       &&op_dec_pri,     &&op_dec_alt,     &&op_dec_i,
-        &&op_movs,        &&op_cmps,        &&op_fill,        &&op_halt,
-        &&op_bounds,      &&op_sysreq,      &&op_switch,      &&op_swap_pri,
-        &&op_swap_alt,    &&op_break,       &&op_casetbl,
-        /* patched instructions */
-        /* if op_sysreq_d and/or op_sysreq_nd are not implemented, their entries
-         * in this table must be NULL
-         */
-        &&op_sysreq_d,    &&op_sysreq_nd,
-        /* overlay instructions */
-        &&op_call_ovl,    &&op_retn_ovl,    &&op_switch_ovl,  &&op_casetbl_ovl,
-        /* supplemental and macro instructions */
-#if !defined AMX_NO_MACRO_INSTR
-        &&op_lidx,        &&op_lidx_b,      &&op_idxaddr,     &&op_idxaddr_b,
-        &&op_push_c,      &&op_push,        &&op_push_s,      &&op_push_adr,
-        &&op_pushr_c,     &&op_pushr_s,     &&op_pushr_adr,   &&op_jeq,
-        &&op_jneq,        &&op_jsless,      &&op_jsleq,       &&op_jsgrtr,
-        &&op_jsgeq,       &&op_sdiv_inv,    &&op_sub_inv,     &&op_add_c,
-        &&op_smul_c,      &&op_zero_pri,    &&op_zero_alt,    &&op_zero,
-        &&op_zero_s,      &&op_eq_c_pri,    &&op_eq_c_alt,    &&op_inc,
-        &&op_inc_s,       &&op_dec,         &&op_dec_s,       &&op_sysreq_n,
-        &&op_pushm_c,     &&op_pushm,       &&op_pushm_s,     &&op_pushm_adr,
-        &&op_pushrm_c,    &&op_pushrm_s,    &&op_pushrm_adr,  &&op_load2,
-        &&op_load2_s,     &&op_const,       &&op_const_s,
-#endif
-#if !defined AMX_NO_PACKED_OPC
-        &&op_load_p_pri,  &&op_load_p_alt,  &&op_load_p_s_pri,&&op_load_p_s_alt,
-        &&op_lref_p_s_pri,&&op_lref_p_s_alt,&&op_lodb_p_i,    &&op_const_p_pri,
-        &&op_const_p_alt, &&op_addr_p_pri,  &&op_addr_p_alt,  &&op_stor_p,
-        &&op_stor_p_s,    &&op_sref_p_s,    &&op_strb_p_i,    &&op_lidx_p_b,
-        &&op_idxaddr_p_b, &&op_align_p_pri, &&op_push_p_c,    &&op_push_p,
-        &&op_push_p_s,    &&op_push_p_adr,  &&op_pushr_p_c,   &&op_pushr_p_s,
-        &&op_pushr_p_adr, &&op_pushm_p_c,   &&op_pushm_p,     &&op_pushm_p_s,
-        &&op_pushm_p_adr, &&op_pushrm_p_c,  &&op_pushrm_p_s,  &&op_pushrm_p_adr,
-        &&op_stack_p,     &&op_heap_p,      &&op_shl_p_c_pri, &&op_shl_p_c_alt,
-        &&op_add_p_c,     &&op_smul_p_c,    &&op_zero_p,      &&op_zero_p_s,
-        &&op_eq_p_c_pri,  &&op_eq_p_c_alt,  &&op_inc_p,       &&op_inc_p_s,
-        &&op_dec_p,       &&op_dec_p_s,     &&op_movs_p,      &&op_cmps_p,
-        &&op_fill_p,      &&op_halt_p,      &&op_bounds_p
-#endif
-};
-  AMX_HEADER *hdr;
-  cell pri,alt,stk,frm,hea;
-  cell reset_stk, reset_hea, *cip;
-  cell offs,val;
-  int num,i;
-  #if !defined AMX_NO_PACKED_OPC
-    int op;
-  #endif
-
-  assert(amx!=NULL);
-  /* HACK: return label table and opcode count (for VerifyPcode()) if amx
-   * structure has the flags set to all ones (see amx_exec_list() above)
-   */
-  if (amx->flags==~0) {
-    assert(sizeof(cell)==sizeof(void *));
-    assert(data==NULL);
-    assert(retval!=NULL);
-    *retval=(cell)amx_opcodelist;
-    return sizearray(amx_opcodelist);
-  } /* if */
-
-  /* set up the registers */
-  hdr=(AMX_HEADER *)amx->base;
-  assert(hdr->magic==AMX_MAGIC);
-  assert(hdr->file_version>=11);
-  cip=(cell*)amx->cip;
-  hea=amx->hea;
-  stk=amx->stk;
-  reset_stk=stk;
-  reset_hea=hea;
-  alt=frm=pri=0;/* just to avoid compiler warnings */
-  num=0;        /* just to avoid compiler warnings */
-
-  /* start running */
-  assert(amx->code!=NULL);
-  assert(data!=NULL);
-  cip=(cell *)(amx->code+(int)amx->cip);
-  NEXT(cip,op);
-
-  op_nop:
-    NEXT(cip,op);
-  op_load_pri:
-    GETPARAM(offs);
-    pri=_R(data,offs);
-    NEXT(cip,op);
-  op_load_alt:
-    GETPARAM(offs);
-    alt=_R(data,offs);
-    NEXT(cip,op);
-  op_load_s_pri:
-    GETPARAM(offs);
-    pri=_R(data,frm+offs);
-    NEXT(cip,op);
-  op_load_s_alt:
-    GETPARAM(offs);
-    alt=_R(data,frm+offs);
-    NEXT(cip,op);
-  op_lref_s_pri:
-    GETPARAM(offs);
-    offs=_R(data,frm+offs);
-    pri=_R(data,offs);
-    NEXT(cip,op);
-  op_lref_s_alt:
-    GETPARAM(offs);
-    offs=_R(data,frm+offs);
-    alt=_R(data,offs);
-    NEXT(cip,op);
-  op_load_i:
-    /* verify address */
-    if (pri>=hea && pri<stk || (ucell)pri>=(ucell)amx->stp)
-      ABORT(amx,AMX_ERR_MEMACCESS);
-    pri=_R(data,pri);
-    NEXT(cip,op);
-  op_lodb_i:
-    GETPARAM(offs);
-  __lodb_i:
-    /* verify address */
-    if (pri>=hea && pri<stk || (ucell)pri>=(ucell)amx->stp)
-      ABORT(amx,AMX_ERR_MEMACCESS);
-    switch (offs) {
-    case 1:
-      pri=_R8(data,pri);
-      break;
-    case 2:
-      pri=_R16(data,pri);
-      break;
-    case 4:
-      pri=_R32(data,pri);
-      break;
-    } /* switch */
-    NEXT(cip,op);
-  op_const_pri:
-    GETPARAM(pri);
-    NEXT(cip,op);
-  op_const_alt:
-    GETPARAM(alt);
-    NEXT(cip,op);
-  op_addr_pri:
-    GETPARAM(pri);
-    pri+=frm;
-    NEXT(cip,op);
-  op_addr_alt:
-    GETPARAM(alt);
-    alt+=frm;
-    NEXT(cip,op);
-  op_stor:
-    GETPARAM(offs);
-    _W(data,offs,pri);
-    NEXT(cip,op);
-  op_stor_s:
-    GETPARAM(offs);
-    _W(data,frm+offs,pri);
-    NEXT(cip,op);
-  op_sref_s:
-    GETPARAM(offs);
-    offs=_R(data,frm+offs);
-    _W(data,offs,pri);
-    NEXT(cip,op);
-  op_stor_i:
-    /* verify address */
-    if (alt>=hea && alt<stk || (ucell)alt>=(ucell)amx->stp)
-      ABORT(amx,AMX_ERR_MEMACCESS);
-    _W(data,alt,pri);
-    NEXT(cip,op);
-  op_strb_i:
-    GETPARAM(offs);
-  __strb_i:
-    /* verify address */
-    if (alt>=hea && alt<stk || (ucell)alt>=(ucell)amx->stp)
-      ABORT(amx,AMX_ERR_MEMACCESS);
-    switch (offs) {
-    case 1:
-      _W8(data,alt,pri);
-      break;
-    case 2:
-      _W16(data,alt,pri);
-      break;
-    case 4:
-      _W32(data,alt,pri);
-      break;
-    } /* switch */
-    NEXT(cip,op);
-  op_align_pri:
-    GETPARAM(offs);
-    #if BYTE_ORDER==LITTLE_ENDIAN
-      if (offs<(int)sizeof(cell))
-        pri ^= sizeof(cell)-offs;
-    #endif
-    NEXT(cip,op);
-  op_lctrl:
-    GETPARAM(offs);
-    switch (offs) {
-    case 0:
-      pri=hdr->cod;
-      break;
-    case 1:
-      pri=hdr->dat;
-      break;
-    case 2:
-      pri=hea;
-      break;
-    case 3:
-      pri=amx->stp;
-      break;
-    case 4:
-      pri=stk;
-      break;
-    case 5:
-      pri=frm;
-      break;
-    case 6:
-      pri=(cell)((unsigned char *)cip - amx->code);
-      break;
-    } /* switch */
-    NEXT(cip,op);
-  op_sctrl:
-    GETPARAM(offs);
-    switch (offs) {
-    case 0:
-    case 1:
-    case 3:
-      /* cannot change these parameters */
-      break;
-    case 2:
-      hea=pri;
-      break;
-    case 4:
-      stk=pri;
-      break;
-    case 5:
-      frm=pri;
-      break;
-    case 6:
-      cip=(cell *)(amx->code + (int)pri);
-      break;
-    } /* switch */
-    NEXT(cip,op);
-  op_xchg:
-    offs=pri;         /* offs is a temporary variable */
-    pri=alt;
-    alt=offs;
-    NEXT(cip,op);
-  op_push_pri:
-    PUSH(pri);
-    NEXT(cip,op);
-  op_push_alt:
-    PUSH(alt);
-    NEXT(cip,op);
-  op_pushr_pri:
-    PUSH(data+pri);
-    NEXT(cip,op);
-  op_pop_pri:
-    POP(pri);
-    NEXT(cip,op);
-  op_pop_alt:
-    POP(alt);
-    NEXT(cip,op);
-  op_pick:
-    GETPARAM(offs);
-    pri=_R(data,stk+offs);
-    NEXT(cip,op);
-  op_stack:
-    GETPARAM(offs);
-    alt=stk;
-    stk+=offs;
-    CHKMARGIN();
-    CHKSTACK();
-    NEXT(cip,op);
-  op_heap:
-    GETPARAM(offs);
-    alt=hea;
-    hea+=offs;
-    CHKMARGIN();
-    CHKHEAP();
-    NEXT(cip,op);
-  op_proc:
-    PUSH(frm);
-    frm=stk;
-    CHKMARGIN();
-    NEXT(cip,op);
-  op_ret:
-    POP(frm);
-    POP(offs);
-    /* verify the return address */
-    if ((long)offs>=amx->codesize)
-      ABORT(amx,AMX_ERR_MEMACCESS);
-    cip=(cell *)(amx->code+(int)offs);
-    NEXT(cip,op);
-  op_retn:
-    POP(frm);
-    POP(offs);
-    /* verify the return address */
-    if ((long)offs>=amx->codesize)
-      ABORT(amx,AMX_ERR_MEMACCESS);
-    cip=(cell *)(amx->code+(int)offs);
-    stk+= _R(data,stk) + sizeof(cell);  /* remove parameters from the stack */
-    NEXT(cip,op);
-  op_call:
-    PUSH(((unsigned char *)cip-amx->code)+sizeof(cell));/* push address behind instruction */
-    cip=JUMPREL(cip);                   /* jump to the address */
-    NEXT(cip,op);
-  op_jump:
-    /* since the GETPARAM() macro modifies cip, you cannot
-     * do GETPARAM(cip) directly */
-    cip=JUMPREL(cip);
-    NEXT(cip,op);
-  op_jzer:
-    if (pri==0)
-      cip=JUMPREL(cip);
-    else
-      SKIPPARAM(1);
-    NEXT(cip,op);
-  op_jnz:
-    if (pri!=0)
-      cip=JUMPREL(cip);
-    else
-      SKIPPARAM(1);
-    NEXT(cip,op);
-  op_shl:
-    pri<<=alt;
-    NEXT(cip,op);
-  op_shr:
-    pri=(ucell)pri >> (ucell)alt;
-    NEXT(cip,op);
-  op_sshr:
-    pri>>=alt;
-    NEXT(cip,op);
-  op_shl_c_pri:
-    GETPARAM(offs);
-    pri<<=offs;
-    NEXT(cip,op);
-  op_shl_c_alt:
-    GETPARAM(offs);
-    alt<<=offs;
-    NEXT(cip,op);
-  op_smul:
-    pri*=alt;
-    NEXT(cip,op);
-  op_sdiv:
-    if (pri==0)
-      ABORT(amx,AMX_ERR_DIVIDE);
-    /* use floored division and matching remainder */
-    offs=pri;
-    #if defined TRUNC_SDIV
-      pri=alt/offs;
-      alt=alt%offs;
-    #else
-      val=alt;                  /* portable routine for truncated division */
-      pri=IABS(alt)/IABS(offs);
-      if ((cell)(val ^ offs)<0)
-        pri=-pri;
-      alt=val-pri*offs;         /* calculate the matching remainder */
-    #endif
-    /* now "fiddle" with the values to get floored division */
-    if (alt!=0 && (cell)(alt ^ offs)<0) {
-      pri--;
-      alt+=offs;
-    } /* if */
-    NEXT(cip,op);
-  op_add:
-    pri+=alt;
-    NEXT(cip,op);
-  op_sub:
-    pri=alt-pri;
-    NEXT(cip,op);
-  op_and:
-    pri&=alt;
-    NEXT(cip,op);
-  op_or:
-    pri|=alt;
-    NEXT(cip,op);
-  op_xor:
-    pri^=alt;
-    NEXT(cip,op);
-  op_not:
-    pri=!pri;
-    NEXT(cip,op);
-  op_neg:
-    pri=-pri;
-    NEXT(cip,op);
-  op_invert:
-    pri=~pri;
-    NEXT(cip,op);
-  op_eq:
-    pri= pri==alt ? 1 : 0;
-    NEXT(cip,op);
-  op_neq:
-    pri= pri!=alt ? 1 : 0;
-    NEXT(cip,op);
-  op_sless:
-    pri= pri<alt ? 1 : 0;
-    NEXT(cip,op);
-  op_sleq:
-    pri= pri<=alt ? 1 : 0;
-    NEXT(cip,op);
-  op_sgrtr:
-    pri= pri>alt ? 1 : 0;
-    NEXT(cip,op);
-  op_sgeq:
-    pri= pri>=alt ? 1 : 0;
-    NEXT(cip,op);
-  op_inc_pri:
-    pri++;
-    NEXT(cip,op);
-  op_inc_alt:
-    alt++;
-    NEXT(cip,op);
-  op_inc_i:
-    #if defined _R_DEFAULT
-      *(cell *)(data+(int)pri) += 1;
-    #else
-      val=_R(data,pri);
-      _W(data,pri,val+1);
-    #endif
-    NEXT(cip,op);
-  op_dec_pri:
-    pri--;
-    NEXT(cip,op);
-  op_dec_alt:
-    alt--;
-    NEXT(cip,op);
-  op_dec_i:
-    #if defined _R_DEFAULT
-      *(cell *)(data+(int)pri) -= 1;
-    #else
-      val=_R(data,pri);
-      _W(data,pri,val-1);
-    #endif
-    NEXT(cip,op);
-  op_movs:
-    GETPARAM(offs);
-  __movs:
-    /* verify top & bottom memory addresses, for both source and destination
-     * addresses
-     */
-    if (pri>=hea && pri<stk || (ucell)pri>=(ucell)amx->stp)
-      ABORT(amx,AMX_ERR_MEMACCESS);
-    if ((pri+offs)>hea && (pri+offs)<stk || (ucell)(pri+offs)>(ucell)amx->stp)
-      ABORT(amx,AMX_ERR_MEMACCESS);
-    if (alt>=hea && alt<stk || (ucell)alt>=(ucell)amx->stp)
-      ABORT(amx,AMX_ERR_MEMACCESS);
-    if ((alt+offs)>hea && (alt+offs)<stk || (ucell)(alt+offs)>(ucell)amx->stp)
-      ABORT(amx,AMX_ERR_MEMACCESS);
-    #if defined _R_DEFAULT
-      memcpy(data+(int)alt, data+(int)pri, (int)offs);
-    #else
-      for (i=0; i+4<offs; i+=4) {
-        val=_R32(data,pri+i);
-        _W32(data,alt+i,val);
-      } /* for */
-      for ( ; i<offs; i++) {
-        val=_R8(data,pri+i);
-        _W8(data,alt+i,val);
-      } /* for */
-    #endif
-    NEXT(cip,op);
-  op_cmps:
-    GETPARAM(offs);
-  __cmps:
-    /* verify top & bottom memory addresses, for both source and destination
-     * addresses
-     */
-    if (pri>=hea && pri<stk || (ucell)pri>=(ucell)amx->stp)
-      ABORT(amx,AMX_ERR_MEMACCESS);
-    if ((pri+offs)>hea && (pri+offs)<stk || (ucell)(pri+offs)>(ucell)amx->stp)
-      ABORT(amx,AMX_ERR_MEMACCESS);
-    if (alt>=hea && alt<stk || (ucell)alt>=(ucell)amx->stp)
-      ABORT(amx,AMX_ERR_MEMACCESS);
-    if ((alt+offs)>hea && (alt+offs)<stk || (ucell)(alt+offs)>(ucell)amx->stp)
-      ABORT(amx,AMX_ERR_MEMACCESS);
-    #if defined _R_DEFAULT
-      pri=memcmp(data+(int)alt, data+(int)pri, (int)offs);
-    #else
-      pri=0;
-      for (i=0; i+4<offs && pri==0; i+=4)
-        pri=_R32(data,alt+i)-_R32(data,pri+i);
-      for ( ; i<offs && pri==0; i++)
-        pri=_R8(data,alt+i)-_R8(data,pri+i);
-    #endif
-    NEXT(cip,op);
-  op_fill:
-    GETPARAM(offs);
-  __fill:
-    /* verify top & bottom memory addresses */
-    if (alt>=hea && alt<stk || (ucell)alt>=(ucell)amx->stp)
-      ABORT(amx,AMX_ERR_MEMACCESS);
-    if ((alt+offs)>hea && (alt+offs)<stk || (ucell)(alt+offs)>(ucell)amx->stp)
-      ABORT(amx,AMX_ERR_MEMACCESS);
-    for (i=(int)alt; offs>=(int)sizeof(cell); i+=sizeof(cell), offs-=sizeof(cell))
-      _W32(data,i,pri);
-    NEXT(cip,op);
-  op_halt:
-    GETPARAM(offs);
-  __halt:
-    if (retval!=NULL)
-      *retval=pri;
-    /* store complete status (stk and hea are already set in the ABORT macro) */
-    amx->frm=frm;
-    amx->pri=pri;
-    amx->alt=alt;
-    amx->cip=(cell)((unsigned char*)cip-amx->code);
-    if (offs==AMX_ERR_SLEEP) {
-      amx->stk=stk;
-      amx->hea=hea;
-      amx->reset_stk=reset_stk;
-      amx->reset_hea=reset_hea;
-      return (int)offs;
-    } /* if */
-    ABORT(amx,(int)offs);
-  op_bounds:
-    GETPARAM(offs);
-    if ((ucell)pri>(ucell)offs) {
-      amx->cip=(cell)((unsigned char *)cip-amx->code);
-      ABORT(amx,AMX_ERR_BOUNDS);
-    } /* if */
-    NEXT(cip,op);
-  op_sysreq:
-    GETPARAM(offs);
-    /* save a few registers */
-    amx->cip=(cell)((unsigned char *)cip-amx->code);
-    amx->hea=hea;
-    amx->frm=frm;
-    amx->stk=stk;
-    num=amx->callback(amx,offs,&pri,(cell *)(data+(int)stk));
-    if (num!=AMX_ERR_NONE) {
-      if (num==AMX_ERR_SLEEP) {
-        amx->pri=pri;
-        amx->alt=alt;
-        amx->reset_stk=reset_stk;
-        amx->reset_hea=reset_hea;
-        return num;
-      } /* if */
-      ABORT(amx,num);
-    } /* if */
-    NEXT(cip,op);
-  op_switch: {
-    cell *cptr=JUMPREL(cip)+1;  /* +1, to skip the "casetbl" opcode */
-    cip=JUMPREL(cptr+1);        /* preset to "none-matched" case */
-    num=(int)*cptr;             /* number of records in the case table */
-    for (cptr+=2; num>0 && *cptr!=pri; num--,cptr+=2)
-      /* nothing */;
-    if (num>0)
-      cip=JUMPREL(cptr+1);      /* case found */
-    NEXT(cip,op);
-    }
-  op_swap_pri:
-    offs=_R(data,stk);
-    _W(data,stk,pri);
-    pri=offs;
-    NEXT(cip,op);
-  op_swap_alt:
-    offs=_R(data,stk);
-    _W(data,stk,alt);
-    alt=offs;
-    NEXT(cip,op);
-  op_break:
-    assert((amx->flags & AMX_FLAG_VERIFY)==0);
-    if (amx->debug!=NULL) {
-      /* store status */
-      amx->frm=frm;
-      amx->stk=stk;
-      amx->hea=hea;
-      amx->cip=(cell)((unsigned char*)cip-amx->code);
-      num=amx->debug(amx);
-      if (num!=AMX_ERR_NONE) {
-        if (num==AMX_ERR_SLEEP) {
-          amx->pri=pri;
-          amx->alt=alt;
-          amx->reset_stk=reset_stk;
-          amx->reset_hea=reset_hea;
-          return num;
-        } /* if */
-        ABORT(amx,num);
-      } /* if */
-    } /* if */
-    NEXT(cip,op);
-  op_casetbl:
-    assert(0);                  /* this should not occur during execution */
-    ABORT(amx,AMX_ERR_INVINSTR);
-  op_sysreq_d:          /* see op_sysreq */
-    #if !defined AMX_DONT_RELOCATE
-      GETPARAM(offs);
-      /* save a few registers */
-      amx->cip=(cell)((unsigned char *)cip-amx->code);
-      amx->hea=hea;
-      amx->frm=frm;
-      amx->stk=stk;
-      pri=((AMX_NATIVE)offs)(amx,(cell *)(data+(int)stk));
-      if (amx->error!=AMX_ERR_NONE) {
-        if (amx->error==AMX_ERR_SLEEP) {
-          amx->pri=pri;
-          amx->alt=alt;
-          amx->reset_stk=reset_stk;
-          amx->reset_hea=reset_hea;
-          return AMX_ERR_SLEEP;
-        } /* if */
-        ABORT(amx,amx->error);
-      } /* if */
-      NEXT(cip,op);
-    #else
-      ABORT(amx,AMX_ERR_INVINSTR);
-    #endif
-  op_sysreq_nd:    /* see op_sysreq_n */
-    #if !defined AMX_NO_MACRO_INSTR && !defined AMX_DONT_RELOCATE
-      GETPARAM(offs);
-      GETPARAM(val);
-      PUSH(val);
-      /* save a few registers */
-      amx->cip=(cell)((unsigned char *)cip-amx->code);
-      amx->hea=hea;
-      amx->frm=frm;
-      amx->stk=stk;
-      pri=((AMX_NATIVE)offs)(amx,(cell *)(data+(int)stk));
-      stk+=val+4;
-      if (amx->error!=AMX_ERR_NONE) {
-        if (amx->error==AMX_ERR_SLEEP) {
-          amx->pri=pri;
-          amx->alt=alt;
-          amx->stk=stk;
-          amx->reset_stk=reset_stk;
-          amx->reset_hea=reset_hea;
-          return AMX_ERR_SLEEP;
-        } /* if */
-        ABORT(amx,amx->error);
-      } /* if */
-      NEXT(cip,op);
-    #else
-      ABORT(amx,AMX_ERR_INVINSTR);
-    #endif
-
-    /* overlay instructions */
-#if !defined AMX_NO_OVERLAY
-  op_call_ovl:
-    offs=(unsigned char *)cip-amx->code+sizeof(cell); /* skip address */
-    assert(offs>=0 && offs<(1<<(sizeof(cell)*4)));
-    PUSH((offs<<(sizeof(cell)*4)) | amx->ovl_index);
-    amx->ovl_index=(int)*cip;
-    assert(amx->overlay!=NULL);
-    if ((num=amx->overlay(amx,amx->ovl_index))!=AMX_ERR_NONE)
-      ABORT(amx,num);
-    cip=(cell*)amx->code;
-    NEXT(cip,op);
-  op_retn_ovl:
-    assert(amx->overlay!=NULL);
-    POP(frm);
-    POP(offs);
-    amx->ovl_index=offs & (((ucell)~0)>>4*sizeof(cell));
-    offs=(ucell)offs >> (sizeof(cell)*4);
-    /* verify the index */
-    stk+=_R(data,stk)+sizeof(cell);   /* remove parameters from the stack */
-    num=amx->overlay(amx,amx->ovl_index); /* reload overlay */
-    if (num!=AMX_ERR_NONE || (long)offs>=amx->codesize)
-      ABORT(amx,AMX_ERR_MEMACCESS);
-    cip=(cell *)(amx->code+(int)offs);
-    NEXT(cip,op);
-  op_switch_ovl: {
-    cell *cptr=JUMPREL(cip)+1;  /* +1, to skip the "icasetbl" opcode */
-    amx->ovl_index=*(cptr+1);   /* preset to "none-matched" case */
-    num=(int)*cptr;             /* number of records in the case table */
-    for (cptr+=2; num>0 && *cptr!=pri; num--,cptr+=2)
-      /* nothing */;
-    if (num>0)
-      amx->ovl_index=*(cptr+1); /* case found */
-    assert(amx->overlay!=NULL);
-    if ((num=amx->overlay(amx,amx->ovl_index))!=AMX_ERR_NONE)
-      ABORT(amx,num);
-    cip=(cell*)amx->code;
-    NEXT(cip,op);
-    }
-#else
-  op_call_ovl:
-  op_retn_ovl:
-  op_switch_ovl:
-    ABORT(amx,AMX_ERR_INVINSTR);
-#endif
-  op_casetbl_ovl:
-    assert(0);                  /* this should not occur during execution */
-    ABORT(amx,AMX_ERR_INVINSTR);
-
-    /* supplemental and macro instructions */
-#if !defined AMX_NO_MACRO_INSTR
-  op_lidx:
-    offs=pri*sizeof(cell)+alt;  /* implicit shift value for a cell */
-    /* verify address */
-    if (offs>=hea && offs<stk || (ucell)offs>=(ucell)amx->stp)
-      ABORT(amx,AMX_ERR_MEMACCESS);
-    pri=_R(data,offs);
-    NEXT(cip,op);
-  op_lidx_b:
-    GETPARAM(offs);
-    offs=(pri << (int)offs)+alt;
-    /* verify address */
-    if (offs>=hea && offs<stk || (ucell)offs>=(ucell)amx->stp)
-      ABORT(amx,AMX_ERR_MEMACCESS);
-    pri=_R(data,offs);
-    NEXT(cip,op);
-  op_idxaddr:
-    pri=pri*sizeof(cell)+alt;
-    NEXT(cip,op);
-  op_idxaddr_b:
-    GETPARAM(offs);
-    pri=(pri << (int)offs)+alt;
-    NEXT(cip,op);
-  op_push_c:
-    GETPARAM(offs);
-    PUSH(offs);
-    NEXT(cip,op);
-  op_push:
-    GETPARAM(offs);
-    PUSH(_R(data,offs));
-    NEXT(cip,op);
-  op_push_s:
-    GETPARAM(offs);
-    PUSH(_R(data,frm+offs));
-    NEXT(cip,op);
-  op_push_adr:
-    GETPARAM(offs);
-    PUSH(frm+offs);
-    NEXT(cip,op);
-  op_pushr_c:
-    GETPARAM(offs);
-    PUSH(data+offs);
-    NEXT(cip,op);
-  op_pushr_s:
-    GETPARAM(offs);
-    PUSH(data+_R(data,frm+offs));
-    NEXT(cip,op);
-  op_pushr_adr:
-    GETPARAM(offs);
-    PUSH(data+frm+offs);
-    NEXT(cip,op);
-  op_jeq:
-    if (pri==alt)
-      cip=JUMPREL(cip);
-    else
-      SKIPPARAM(1);
-    NEXT(cip,op);
-  op_jneq:
-    if (pri!=alt)
-      cip=JUMPREL(cip);
-    else
-      SKIPPARAM(1);
-    NEXT(cip,op);
-  op_jsless:
-    if (pri<alt)
-      cip=JUMPREL(cip);
-    else
-      SKIPPARAM(1);
-    NEXT(cip,op);
-  op_jsleq:
-    if (pri<=alt)
-      cip=JUMPREL(cip);
-    else
-      SKIPPARAM(1);
-    NEXT(cip,op);
-  op_jsgrtr:
-    if (pri>alt)
-      cip=JUMPREL(cip);
-    else
-      SKIPPARAM(1);
-    NEXT(cip,op);
-  op_jsgeq:
-    if (pri>=alt)
-      cip=JUMPREL(cip);
-    else
-      SKIPPARAM(1);
-    NEXT(cip,op);
-  op_sdiv_inv:
-    if (alt==0)
-      ABORT(amx,AMX_ERR_DIVIDE);
-    /* use floored division and matching remainder */
-    offs=alt;
-    #if defined TRUNC_SDIV
-      pri=pri/offs;
-      alt=pri%offs;
-    #else
-      val=pri;                  /* portable routine for truncated division */
-      pri=IABS(pri)/IABS(offs);
-      if ((cell)(val ^ offs)<0)
-        pri=-pri;
-      alt=val-pri*offs;         /* calculate the matching remainder */
-    #endif
-    /* now "fiddle" with the values to get floored division */
-    if (alt!=0 && (cell)(alt ^ offs)<0) {
-      pri--;
-      alt+=offs;
-    } /* if */
-    NEXT(cip,op);
-  op_sub_inv:
-    pri-=alt;
-    NEXT(cip,op);
-  op_add_c:
-    GETPARAM(offs);
-    pri+=offs;
-    NEXT(cip,op);
-  op_smul_c:
-    GETPARAM(offs);
-    pri*=offs;
-    NEXT(cip,op);
-  op_zero_pri:
-    pri=0;
-    NEXT(cip,op);
-  op_zero_alt:
-    alt=0;
-    NEXT(cip,op);
-  op_zero:
-    GETPARAM(offs);
-    _W(data,offs,0);
-    NEXT(cip,op);
-  op_zero_s:
-    GETPARAM(offs);
-    _W(data,frm+offs,0);
-    NEXT(cip,op);
-  op_eq_c_pri:
-    GETPARAM(offs);
-    pri= pri==offs ? 1 : 0;
-    NEXT(cip,op);
-  op_eq_c_alt:
-    GETPARAM(offs);
-    pri= alt==offs ? 1 : 0;
-    NEXT(cip,op);
-  op_inc:
-    GETPARAM(offs);
-    #if defined _R_DEFAULT
-      *(cell *)(data+(int)offs) += 1;
-    #else
-      val=_R(data,offs);
-      _W(data,offs,val+1);
-    #endif
-    NEXT(cip,op);
-  op_inc_s:
-    GETPARAM(offs);
-    #if defined _R_DEFAULT
-      *(cell *)(data+(int)(frm+offs)) += 1;
-    #else
-      val=_R(data,frm+offs);
-      _W(data,frm+offs,val+1);
-    #endif
-    NEXT(cip,op);
-  op_dec:
-    GETPARAM(offs);
-    #if defined _R_DEFAULT
-      *(cell *)(data+(int)offs) -= 1;
-    #else
-      val=_R(data,offs);
-      _W(data,offs,val-1);
-    #endif
-    NEXT(cip,op);
-  op_dec_s:
-    GETPARAM(offs);
-    #if defined _R_DEFAULT
-      *(cell *)(data+(int)(frm+offs)) -= 1;
-    #else
-      val=_R(data,frm+offs);
-      _W(data,frm+offs,val-1);
-    #endif
-    NEXT(cip,op);
-  op_sysreq_n:
-    GETPARAM(offs);
-    GETPARAM(val);
-    PUSH(val);
-    /* save a few registers */
-    amx->cip=(cell)((unsigned char *)cip-amx->code);
-    amx->hea=hea;
-    amx->frm=frm;
-    amx->stk=stk;
-    num=amx->callback(amx,offs,&pri,(cell *)(data+(int)stk));
-    stk+=val+4;
-    if (num!=AMX_ERR_NONE) {
-      if (num==AMX_ERR_SLEEP) {
-        amx->pri=pri;
-        amx->alt=alt;
-        amx->stk=stk;
-        amx->reset_stk=reset_stk;
-        amx->reset_hea=reset_hea;
-        return num;
-      } /* if */
-      ABORT(amx,num);
-    } /* if */
-    NEXT(cip,op);
-  op_pushm_c:
-    GETPARAM(val);
-    while (val--) {
-      GETPARAM(offs);
-      PUSH(offs);
-    } /* while */
-    NEXT(cip,op);
-  op_pushm:
-    GETPARAM(val);
-    while (val--) {
-      GETPARAM(offs);
-      PUSH(_R(data,offs));
-    } /* while */
-    NEXT(cip,op);
-  op_pushm_s:
-    GETPARAM(val);
-    while (val--) {
-      GETPARAM(offs);
-      PUSH(_R(data,frm+offs));
-    } /* while */
-    NEXT(cip,op);
-  op_pushm_adr:
-    GETPARAM(val);
-    while (val--) {
-      GETPARAM(offs);
-      PUSH(frm+offs);
-    } /* while */
-    NEXT(cip,op);
-  op_pushrm_c:
-    GETPARAM(val);
-    while (val--) {
-      GETPARAM(offs);
-      PUSH(data+offs);
-    } /* while */
-    NEXT(cip,op);
-  op_pushrm_s:
-    GETPARAM(val);
-    while (val--) {
-      GETPARAM(offs);
-      PUSH(data+_R(data,frm+offs));
-    } /* while */
-    NEXT(cip,op);
-  op_pushrm_adr:
-    GETPARAM(val);
-    while (val--) {
-      GETPARAM(offs);
-      PUSH(data+frm+offs);
-    } /* while */
-    NEXT(cip,op);
-  op_load2:
-    GETPARAM(offs);
-    pri=_R(data,offs);
-    GETPARAM(offs);
-    alt=_R(data,offs);
-    NEXT(cip,op);
-  op_load2_s:
-    GETPARAM(offs);
-    pri=_R(data,frm+offs);
-    GETPARAM(offs);
-    alt=_R(data,frm+offs);
-    NEXT(cip,op);
-  op_const:
-    GETPARAM(offs);
-    GETPARAM(val);
-    _W(data,offs,val);
-    NEXT(cip,op);
-  op_const_s:
-    GETPARAM(offs);
-    GETPARAM(val);
-    _W(data,frm+offs,val);
-    NEXT(cip,op);
-#endif
-
-#if !defined AMX_NO_PACKED_OPC
-  op_load_p_pri:
-    GETPARAM_P(offs,op);
-    pri=_R(data,offs);
-    NEXT(cip,op);
-  op_load_p_alt:
-    GETPARAM_P(offs,op);
-    alt=_R(data,offs);
-    NEXT(cip,op);
-  op_load_p_s_pri:
-    GETPARAM_P(offs,op);
-    pri=_R(data,frm+offs);
-    NEXT(cip,op);
-  op_load_p_s_alt:
-    GETPARAM_P(offs,op);
-    alt=_R(data,frm+offs);
-    NEXT(cip,op);
-  op_lref_p_s_pri:
-    GETPARAM_P(offs,op);
-    offs=_R(data,frm+offs);
-    pri=_R(data,offs);
-    NEXT(cip,op);
-  op_lref_p_s_alt:
-    GETPARAM_P(offs,op);
-    offs=_R(data,frm+offs);
-    alt=_R(data,offs);
-    NEXT(cip,op);
-  op_lodb_p_i:
-    GETPARAM_P(offs,op);
-    goto __lodb_i;
-  op_const_p_pri:
-    GETPARAM_P(pri,op);
-    NEXT(cip,op);
-  op_const_p_alt:
-    GETPARAM_P(alt,op);
-    NEXT(cip,op);
-  op_addr_p_pri:
-    GETPARAM_P(pri,op);
-    pri+=frm;
-    NEXT(cip,op);
-  op_addr_p_alt:
-    GETPARAM_P(alt,op);
-    alt+=frm;
-    NEXT(cip,op);
-  op_stor_p:
-    GETPARAM_P(offs,op);
-    _W(data,offs,pri);
-    NEXT(cip,op);
-  op_stor_p_s:
-    GETPARAM_P(offs,op);
-    _W(data,frm+offs,pri);
-    NEXT(cip,op);
-  op_sref_p_s:
-    GETPARAM_P(offs,op);
-    offs=_R(data,frm+offs);
-    _W(data,offs,pri);
-    NEXT(cip,op);
-  op_strb_p_i:
-    GETPARAM_P(offs,op);
-    goto __strb_i;
-  op_lidx_p_b:
-    GETPARAM_P(offs,op);
-    offs=(pri << (int)offs)+alt;
-    /* verify address */
-    if (offs>=hea && offs<stk || (ucell)offs>=(ucell)amx->stp)
-      ABORT(amx,AMX_ERR_MEMACCESS);
-    pri=_R(data,offs);
-    NEXT(cip,op);
-  op_idxaddr_p_b:
-    GETPARAM_P(offs,op);
-    pri=(pri << (int)offs)+alt;
-    NEXT(cip,op);
-  op_align_p_pri:
-    GETPARAM_P(offs,op);
-    #if BYTE_ORDER==LITTLE_ENDIAN
-      if ((size_t)offs<sizeof(cell))
-        pri ^= sizeof(cell)-offs;
-    #endif
-    NEXT(cip,op);
-  op_push_p_c:
-    GETPARAM_P(offs,op);
-    PUSH(offs);
-    NEXT(cip,op);
-  op_push_p:
-    GETPARAM_P(offs,op);
-    PUSH(_R(data,offs));
-    NEXT(cip,op);
-  op_push_p_s:
-    GETPARAM_P(offs,op);
-    PUSH(_R(data,frm+offs));
-    NEXT(cip,op);
-  op_push_p_adr:
-    GETPARAM_P(offs,op);
-    PUSH(frm+offs);
-    NEXT(cip,op);
-  op_pushr_p_c:
-    GETPARAM_P(offs,op);
-    PUSH(data+offs);
-    NEXT(cip,op);
-  op_pushr_p_s:
-    GETPARAM_P(offs,op);
-    PUSH(data+_R(data,frm+offs));
-    NEXT(cip,op);
-  op_pushr_p_adr:
-    GETPARAM_P(offs,op);
-    PUSH(data+frm+offs);
-    NEXT(cip,op);
-  op_pushm_p_c:
-    GETPARAM_P(val,op);
-    while (val--) {
-      GETPARAM(offs);
-      PUSH(offs);
-    } /* while */
-    NEXT(cip,op);
-  op_pushm_p:
-    GETPARAM_P(val,op);
-    while (val--) {
-      GETPARAM(offs);
-      PUSH(_R(data,offs));
-    } /* while */
-    NEXT(cip,op);
-  op_pushm_p_s:
-    GETPARAM_P(val,op);
-    while (val--) {
-      GETPARAM(offs);
-      PUSH(_R(data,frm+offs));
-    } /* while */
-    NEXT(cip,op);
-  op_pushm_p_adr:
-    GETPARAM_P(val,op);
-    while (val--) {
-      GETPARAM(offs);
-      PUSH(frm+offs);
-    } /* while */
-    NEXT(cip,op);
-  op_pushrm_p_c:
-    GETPARAM_P(val,op);
-    while (val--) {
-      GETPARAM(offs);
-      PUSH(data+offs);
-    } /* while */
-    NEXT(cip,op);
-  op_pushrm_p_s:
-    GETPARAM_P(val,op);
-    while (val--) {
-      GETPARAM(offs);
-      PUSH(data+_R(data,frm+offs));
-    } /* while */
-    NEXT(cip,op);
-  op_pushrm_p_adr:
-    GETPARAM_P(val,op);
-    while (val--) {
-      GETPARAM(offs);
-      PUSH(data+frm+offs);
-    } /* while */
-    NEXT(cip,op);
-  op_stack_p:
-    GETPARAM_P(offs,op);
-    alt=stk;
-    stk+=offs;
-    CHKMARGIN();
-    CHKSTACK();
-    NEXT(cip,op);
-  op_heap_p:
-    GETPARAM_P(offs,op);
-    alt=hea;
-    hea+=offs;
-    CHKMARGIN();
-    CHKHEAP();
-    NEXT(cip,op);
-  op_shl_p_c_pri:
-    GETPARAM_P(offs,op);
-    pri<<=offs;
-    NEXT(cip,op);
-  op_shl_p_c_alt:
-    GETPARAM_P(offs,op);
-    alt<<=offs;
-    NEXT(cip,op);
-  op_add_p_c:
-    GETPARAM_P(offs,op);
-    pri+=offs;
-    NEXT(cip,op);
-  op_smul_p_c:
-    GETPARAM_P(offs,op);
-    pri*=offs;
-    NEXT(cip,op);
-  op_zero_p:
-    GETPARAM_P(offs,op);
-    _W(data,offs,0);
-    NEXT(cip,op);
-  op_zero_p_s:
-    GETPARAM_P(offs,op);
-    _W(data,frm+offs,0);
-    NEXT(cip,op);
-  op_eq_p_c_pri:
-    GETPARAM_P(offs,op);
-    pri= pri==offs ? 1 : 0;
-    NEXT(cip,op);
-  op_eq_p_c_alt:
-    GETPARAM_P(offs,op);
-    pri= alt==offs ? 1 : 0;
-    NEXT(cip,op);
-  op_inc_p:
-    GETPARAM_P(offs,op);
-    #if defined _R_DEFAULT
-      *(cell *)(data+(int)offs) += 1;
-    #else
-      val=_R(data,offs);
-      _W(data,offs,val+1);
-    #endif
-    NEXT(cip,op);
-  op_inc_p_s:
-    GETPARAM_P(offs,op);
-    #if defined _R_DEFAULT
-      *(cell *)(data+(int)(frm+offs)) += 1;
-    #else
-      val=_R(data,frm+offs);
-      _W(data,frm+offs,val+1);
-    #endif
-    NEXT(cip,op);
-  op_dec_p:
-    GETPARAM_P(offs,op);
-    #if defined _R_DEFAULT
-      *(cell *)(data+(int)offs) -= 1;
-    #else
-      val=_R(data,offs);
-      _W(data,offs,val-1);
-    #endif
-    NEXT(cip,op);
-  op_dec_p_s:
-    GETPARAM_P(offs,op);
-    #if defined _R_DEFAULT
-      *(cell *)(data+(int)(frm+offs)) -= 1;
-    #else
-      val=_R(data,frm+offs);
-      _W(data,frm+offs,val-1);
-    #endif
-    NEXT(cip,op);
-  op_movs_p:
-    GETPARAM_P(offs,op);
-    goto __movs;
-  op_cmps_p:
-    GETPARAM_P(offs,op);
-    goto __cmps;
-  op_fill_p:
-    GETPARAM_P(offs,op);
-    goto __fill;
-  op_halt_p:
-    GETPARAM_P(offs,op);
-    goto __halt;
-  op_bounds_p:
-    GETPARAM_P(offs,op);
-    if ((ucell)pri>(ucell)offs) {
-      amx->cip=(cell)((unsigned char *)cip-amx->code);
-      ABORT(amx,AMX_ERR_BOUNDS);
-    } /* if */
-    NEXT(cip,op);
-#endif
-}
-
-void amx_exec_list(const AMX *amx,const cell **opcodelist,int *numopcodes)
-{
-  /* since the opcode list of the GNU GCC version of the abstract machine core
-   * must be a local variable (as it references code labels, which are local
-   * too), we use a trick to get the opcode list: call amx_Exec() while a
-   * special flags value is set in the AMX header.
-   */
-   int orgflags;
-   AMX *amxptr=(AMX*)amx;
-
-   assert(amx!=NULL);
-   assert(opcodelist!=NULL);
-   assert(numopcodes!=NULL);
-   orgflags=amx->flags;
-   amxptr->flags=~0;
-   *numopcodes=amx_exec_run(amxptr, (cell*)opcodelist, NULL);
-   amxptr->flags=orgflags;
-}
diff --git a/apps/openmw-mp/amx/amxfile.c b/apps/openmw-mp/amx/amxfile.c
deleted file mode 100644
index 4e0f37818..000000000
--- a/apps/openmw-mp/amx/amxfile.c
+++ /dev/null
@@ -1,1274 +0,0 @@
-/* Text file I/O module for the Pawn Abstract Machine
- *
- *  Copyright (c) ITB CompuPhase, 2003-2015
- *
- *  Licensed under the Apache License, Version 2.0 (the "License"); you may not
- *  use this file except in compliance with the License. You may obtain a copy
- *  of the License at
- *
- *      http://www.apache.org/licenses/LICENSE-2.0
- *
- *  Unless required by applicable law or agreed to in writing, software
- *  distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
- *  WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the
- *  License for the specific language governing permissions and limitations
- *  under the License.
- *
- *  Version: $Id: amxfile.c 5181 2015-01-21 09:44:28Z thiadmer $
- */
-#if defined _UNICODE || defined __UNICODE__ || defined UNICODE
-# if !defined UNICODE   /* for Windows */
-#   define UNICODE
-# endif
-# if !defined _UNICODE  /* for C library */
-#   define _UNICODE
-# endif
-#endif
-
-#include <assert.h>
-#include <limits.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <time.h>
-#include <sys/stat.h>
-#include "osdefs.h"
-
-#if defined __BORLANDC__
-#include <dir.h>
-#endif
-#if defined __BORLANDC__ || defined __LINUX__ || defined __FreeBSD__ || defined __OpenBSD__ || defined MACOS || defined __APPLE__
-
-#include <utime.h>
-#include <unistd.h>
-
-#else
-#include <sys/utime.h>
-#endif
-#if defined __WIN32__ || defined __MSDOS__
-#include <malloc.h>
-#endif
-#if defined __WATCOMC__ || defined _MSC_VER
-#include <direct.h>
-#endif
-#if defined __LINUX__ || defined __FreeBSD__ || defined __OpenBSD__ || defined MACOS || defined __APPLE__
-
-#include <dirent.h>
-
-#else
-#include <io.h>
-#endif
-
-#include "amx.h"
-
-#if defined __WIN32__ || defined _Windows
-#include <windows.h>
-#endif
-
-#include "fpattern.c"
-
-#if !defined AMXFILE_VAR
-#define AMXFILE_VAR   "AMXFILE"
-#endif
-
-#if !defined sizearray
-#define sizearray(a)  (sizeof(a)/sizeof((a)[0]))
-#endif
-
-#if defined _UNICODE
-#include <tchar.h>
-#elif !defined __T
-typedef char TCHAR;
-#define __T(string)   string
-#define _tchmod       chmod
-#define _tcscat       strcat
-#define _tcschr       strchr
-#define _tcscmp       strcmp
-#define _tcscpy       strcpy
-#define _tcsdup       strdup
-#define _tcslen       strlen
-#define _tcsncpy      strncpy
-#define _tcsnicmp     strnicmp
-#define _tcspbrk      strpbrk
-#define _tcsrchr      strrchr
-#define _tcstol       strtol
-#define _tfopen       fopen
-#define _tfputs       fputs
-#define _tgetenv      getenv
-#define _tremove      remove
-#define _trename      rename
-#if defined __APPLE__
-#define _tmkdir     mkdir
-#define _trmdir     rmdir
-#define _tstat      stat
-#define _tutime     utime
-#else
-#define _tmkdir     mkdir
-#define _trmdir     rmdir
-#define _tstat      stat
-#define _tutime     utime
-#endif
-#endif
-#if !(defined __WIN32__ || defined _WIN32 || defined WIN32)
-#define _stat(n, b)  stat(n,b)
-#endif
-#if !defined S_ISDIR
-#define S_ISDIR(mode) (((mode) & _S_IFDIR) != 0)
-#endif
-
-#include "minIni.h"
-
-enum filemode
-{
-    io_read, /* file must exist */
-            io_write, /* creates a new file */
-            io_readwrite, /* file must exist */
-            io_append,    /* file must exist, opened for writing only and seek to the end */
-};
-
-enum seek_whence
-{
-    seek_start,
-    seek_current,
-    seek_end,
-};
-
-
-/* This function only stores unpacked strings. UTF-8 is used for
- * Unicode, and packed strings can only store 7-bit and 8-bit
- * character sets (ASCII, Latin-1).
- */
-static size_t fgets_cell(FILE *fp, cell *string, size_t max, int utf8mode)
-{
-    size_t index;
-    fpos_t pos;
-    cell c;
-    int follow, lastcr;
-    cell lowmark;
-
-    assert(sizeof(cell) >= 4);
-    assert(fp != NULL);
-    assert(string != NULL);
-    if (max == 0)
-        return 0;
-
-    /* get the position, in case we have to back up */
-    fgetpos(fp, &pos);
-
-    index = 0;
-    follow = 0;
-    lowmark = 0;
-    lastcr = 0;
-    for (; ;)
-    {
-        assert(index < max);
-        if (index == max - 1)
-            break;                    /* string fully filled */
-        if ((c = fgetc(fp)) == EOF)
-        {
-            if (!utf8mode || follow == 0)
-                break;                  /* no more characters */
-            /* If an EOF happened halfway an UTF-8 code, the string cannot be
-             * UTF-8 mode, and we must restart.
-             */
-            index = 0;
-            fsetpos(fp, &pos);
-            continue;
-        } /* if */
-
-        /* 8-bit characters are unsigned */
-        if (c < 0)
-            c = -c;
-
-        if (utf8mode)
-        {
-            if (follow > 0 && (c & 0xc0) == 0x80)
-            {
-                /* leader code is active, combine with earlier code */
-                string[index] = (string[index] << 6) | ((unsigned char) c & 0x3f);
-                if (--follow == 0)
-                {
-                    /* encoding a character in more bytes than is strictly needed,
-                     * is not really valid UTF-8; we are strict here to increase
-                     * the chance of heuristic dectection of non-UTF-8 text
-                     * (JAVA writes zero bytes as a 2-byte code UTF-8, which is invalid)
-                     */
-                    if (string[index] < lowmark)
-                        utf8mode = 0;
-                    /* the code positions 0xd800--0xdfff and 0xfffe & 0xffff do not
-                     * exist in UCS-4 (and hence, they do not exist in Unicode)
-                     */
-                    if (string[index] >= 0xd800 && string[index] <= 0xdfff
-                        || string[index] == 0xfffe || string[index] == 0xffff)
-                        utf8mode = 0;
-                    index++;
-                } /* if */
-            } else if (follow == 0 && (c & 0x80) == 0x80)
-            {
-                /* UTF-8 leader code */
-                if ((c & 0xe0) == 0xc0)
-                {
-                    /* 110xxxxx 10xxxxxx */
-                    follow = 1;
-                    lowmark = 0x80;
-                    string[index] = c & 0x1f;
-                } else if ((c & 0xf0) == 0xe0)
-                {
-                    /* 1110xxxx 10xxxxxx 10xxxxxx (16 bits, BMP plane) */
-                    follow = 2;
-                    lowmark = 0x800;
-                    string[index] = c & 0x0f;
-                } else if ((c & 0xf8) == 0xf0)
-                {
-                    /* 11110xxx 10xxxxxx 10xxxxxx 10xxxxxx */
-                    follow = 3;
-                    lowmark = 0x10000;
-                    string[index] = c & 0x07;
-                } else if ((c & 0xfc) == 0xf8)
-                {
-                    /* 111110xx 10xxxxxx 10xxxxxx 10xxxxxx 10xxxxxx */
-                    follow = 4;
-                    lowmark = 0x200000;
-                    string[index] = c & 0x03;
-                } else if ((c & 0xfe) == 0xfc)
-                {
-                    /* 1111110x 10xxxxxx 10xxxxxx 10xxxxxx 10xxxxxx 10xxxxxx (31 bits) */
-                    follow = 5;
-                    lowmark = 0x4000000;
-                    string[index] = c & 0x01;
-                } else
-                {
-                    /* this is invalid UTF-8 */
-                    utf8mode = 0;
-                } /* if */
-            } else if (follow == 0 && (c & 0x80) == 0x00)
-            {
-                /* 0xxxxxxx (US-ASCII) */
-                string[index++] = c;
-                if (c == __T('\n'))
-                    break;        /* read newline, done */
-            } else
-            {
-                /* this is invalid UTF-8 */
-                utf8mode = 0;
-            } /* if */
-            if (!utf8mode)
-            {
-                /* UTF-8 mode was switched just off, which means that non-conforming
-                 * UTF-8 codes were found, which means in turn that the string is
-                 * probably not intended as UTF-8; start over again
-                 */
-                index = 0;
-                fsetpos(fp, &pos);
-            } /* if */
-        } else
-        {
-            string[index++] = c;
-            if (c == __T('\n'))
-            {
-                break;                  /* read newline, done */
-            } else if (lastcr)
-            {
-                ungetc(c, fp);           /* carriage return was read, no newline follows */
-                break;
-            } /* if */
-            lastcr = (c == __T('\r'));
-        } /* if */
-    } /* for */
-    assert(index < max);
-    string[index] = __T('\0');
-
-    return index;
-}
-
-static size_t fputs_cell(FILE *fp, cell *string, int utf8mode)
-{
-    size_t count = 0;
-
-    assert(sizeof(cell) >= 4);
-    assert(fp != NULL);
-    assert(string != NULL);
-
-    while (*string != 0)
-    {
-        if (utf8mode)
-        {
-            cell c = *string;
-            if (c < 0x80)
-            {
-                /* 0xxxxxxx */
-                fputc((unsigned char) c, fp);
-            } else if (c < 0x800)
-            {
-                /* 110xxxxx 10xxxxxx */
-                fputc((unsigned char) ((c >> 6) & 0x1f | 0xc0), fp);
-                fputc((unsigned char) (c & 0x3f | 0x80), fp);
-            } else if (c < 0x10000)
-            {
-                /* 1110xxxx 10xxxxxx 10xxxxxx (16 bits, BMP plane) */
-                fputc((unsigned char) ((c >> 12) & 0x0f | 0xe0), fp);
-                fputc((unsigned char) ((c >> 6) & 0x3f | 0x80), fp);
-                fputc((unsigned char) (c & 0x3f | 0x80), fp);
-            } else if (c < 0x200000)
-            {
-                /* 11110xxx 10xxxxxx 10xxxxxx 10xxxxxx */
-                fputc((unsigned char) ((c >> 18) & 0x07 | 0xf0), fp);
-                fputc((unsigned char) ((c >> 12) & 0x3f | 0x80), fp);
-                fputc((unsigned char) ((c >> 6) & 0x3f | 0x80), fp);
-                fputc((unsigned char) (c & 0x3f | 0x80), fp);
-            } else if (c < 0x4000000)
-            {
-                /* 111110xx 10xxxxxx 10xxxxxx 10xxxxxx 10xxxxxx */
-                fputc((unsigned char) ((c >> 24) & 0x03 | 0xf8), fp);
-                fputc((unsigned char) ((c >> 18) & 0x3f | 0x80), fp);
-                fputc((unsigned char) ((c >> 12) & 0x3f | 0x80), fp);
-                fputc((unsigned char) ((c >> 6) & 0x3f | 0x80), fp);
-                fputc((unsigned char) (c & 0x3f | 0x80), fp);
-            } else
-            {
-                /* 1111110x 10xxxxxx 10xxxxxx 10xxxxxx 10xxxxxx 10xxxxxx (31 bits) */
-                fputc((unsigned char) ((c >> 30) & 0x01 | 0xfc), fp);
-                fputc((unsigned char) ((c >> 24) & 0x3f | 0x80), fp);
-                fputc((unsigned char) ((c >> 18) & 0x3f | 0x80), fp);
-                fputc((unsigned char) ((c >> 12) & 0x3f | 0x80), fp);
-                fputc((unsigned char) ((c >> 6) & 0x3f | 0x80), fp);
-                fputc((unsigned char) (c & 0x3f | 0x80), fp);
-            } /* if */
-        } else
-        {
-            /* not UTF-8 mode */
-            fputc((unsigned char) *string, fp);
-        } /* if */
-        string++;
-        count++;
-    } /* while */
-    return count;
-}
-
-static size_t fgets_char(FILE *fp, char *string, size_t max)
-{
-    size_t index;
-    int c, lastcr;
-
-    index = 0;
-    lastcr = 0;
-    for (; ;)
-    {
-        assert(index < max);
-        if (index == max - 1)
-            break;                    /* string fully filled */
-        if ((c = fgetc(fp)) == EOF)
-            break;                    /* no more characters */
-        string[index++] = (char) c;
-        if (c == __T('\n'))
-        {
-            break;                    /* read newline, done */
-        } else if (lastcr)
-        {
-            ungetc(c, fp);             /* carriage return was read, no newline follows */
-            break;
-        } /* if */
-        lastcr = (c == __T('\r'));
-    } /* for */
-    assert(index < max);
-    string[index] = __T('\0');
-
-    return index;
-}
-
-#if (defined __WIN32__ || defined _WIN32 || defined WIN32) && _MSC_VER < 1500
-#if defined _UNICODE
-wchar_t *_wgetenv(wchar_t *name)
-{
-static wchar_t buffer[_MAX_PATH];
-  buffer[0]=L'\0';
-  GetEnvironmentVariable(name,buffer,sizearray(buffer));
-  return buffer[0]!=L'\0' ? buffer : NULL;
-}
-#else
-char *getenv(const char *name)
-{
-static char buffer[_MAX_PATH];
-  buffer[0]='\0';
-  GetEnvironmentVariable(name,buffer,sizearray(buffer));
-  return buffer[0]!='\0' ? buffer : NULL;
-}
-#endif
-#endif
-
-static char *completename(TCHAR *dest, TCHAR *src, size_t size)
-{
-#if defined AMXFILE_VAR
-    TCHAR *prefix, *ptr;
-    size_t len;
-
-    /* only files below a specific path are accessible */
-    prefix = getenv(AMXFILE_VAR);
-
-    /* if no specific path for files is present, use the "temporary" path */
-    if (prefix == NULL)
-        prefix = getenv(__T("tmp"));    /* common under Windows and Unix */
-    if (prefix == NULL)
-        prefix = getenv(__T("temp"));   /* common under Windows */
-    if (prefix == NULL)
-        prefix = getenv(__T("tmpdir")); /* common under Unix */
-
-    /* if no path for files is defined, and no temporary directory exists,
-     * fail the function; this is for security reasons.
-     */
-    if (prefix == NULL)
-        return NULL;
-
-    if (_tcslen(prefix) + 1 >= size) /* +1 because directory separator is appended */
-        return NULL;
-    _tcscpy(dest, prefix);
-    /* append a directory separator (if not already present) */
-    len = _tcslen(dest);
-    if (len == 0)
-        return NULL;              /* empty start directory is not allowed */
-    if (dest[len - 1] != __T(DIRSEP_CHAR) && dest[len - 1] != __T('/') && len + 1 < size)
-    {
-        dest[len] = __T(DIRSEP_CHAR);
-        dest[len + 1] = __T('\0');
-    } /* if */
-    assert(_tcslen(dest) < size);
-
-    /* for DOS/Windows and Unix/Linux, skip everyting up to a comma, because
-     * this is used to indicate a protocol (e.g. file://C:/myfile.txt)
-     */
-#if DIRSEP_CHAR != ':'
-    if ((ptr = _tcsrchr(src, __T(':'))) != NULL)
-    {
-        src = ptr + 1;              /* skip protocol/drive and colon */
-        /* a "drive" specifier is sometimes ended with a vertical bar instead
-         * of a colon in URL specifications
-         */
-        if ((ptr = _tcschr(src, __T('|'))) != NULL)
-            src = ptr + 1;            /* skip drive and vertical bar */
-        while (src[0] == __T(DIRSEP_CHAR) || src[0] == __T('/'))
-            src++;                /* skip slashes behind the protocol/drive letter */
-    } /* if */
-#endif
-
-    /* skip an initial backslash or a drive specifier in the source */
-    if ((src[0] == __T(DIRSEP_CHAR) || src[0] == __T('/')) && (src[1] == __T(DIRSEP_CHAR) || src[1] == __T('/')))
-    {
-        /* UNC path */
-        char separators[] = {__T(DIRSEP_CHAR), __T('/'), __T('\0')};
-        src += 2;
-        ptr = _tcspbrk(src, separators);
-        if (ptr != NULL)
-            src = ptr + 1;
-    } else if (src[0] == __T(DIRSEP_CHAR) || src[0] == __T('/'))
-    {
-        /* simple path starting from the root directory */
-        src++;
-    } /* if */
-
-    /* disallow any "../" specifications in the source path
-     * (the check below should be stricter, but directory names with
-     * trailing periods are rare anyway)
-     */
-    for (ptr = src; *ptr != __T('\0'); ptr++)
-        if (ptr[0] == __T('.') && (ptr[1] == __T(DIRSEP_CHAR) || ptr[1] == __T('/')))
-            return NULL;            /* path name is not allowed */
-
-    /* concatenate the drive letter to the destination path */
-    if (_tcslen(dest) + _tcslen(src) >= size)
-        return NULL;
-    _tcscat(dest, src);
-
-    /* change forward slashes into proper directory separators */
-#if DIRSEP_CHAR != '/'
-    while ((ptr=_tcschr(dest,__T('/')))!=NULL)
-      *ptr=__T(DIRSEP_CHAR);
-#endif
-    return dest;
-
-#else
-    if (_tcslen(src)>=size)
-      return NULL;
-    _tcscpy(dest,src);
-    /* change forward slashes into proper directory separators */
-#if DIRSEP_CHAR!='/'
-      while ((ptr=_tcschr(dest,__T('/')))!=NULL)
-        *ptr=__T(DIRSEP_CHAR);
-#endif
-    return dest;
-#endif
-}
-
-/* File: fopen(const name[], filemode: mode) */
-static cell AMX_NATIVE_CALL n_fopen(AMX *amx, const cell *params)
-{
-    TCHAR *attrib, *altattrib;
-    TCHAR *name, fullname[_MAX_PATH];
-    FILE *f = NULL;
-
-    (void) amx;
-    altattrib = NULL;
-    switch (params[2] & 0x7fff)
-    {
-        case io_read:
-            attrib = __T("rb");
-            break;
-        case io_write:
-            attrib = __T("wb");
-            break;
-        case io_readwrite:
-            attrib = __T("r+b");
-            altattrib = __T("w+b");
-            break;
-        case io_append:
-            attrib = __T("ab");
-            break;
-        default:
-            return 0;
-    } /* switch */
-
-    /* get the filename */
-    amx_StrParam(amx, params[1], name);
-    if (name != NULL && completename(fullname, name, sizearray(fullname)) != NULL)
-    {
-        f = _tfopen(fullname, attrib);
-        if (f == NULL && altattrib != NULL)
-            f = _tfopen(fullname, altattrib);
-    } /* if */
-
-    return (cell) f;
-}
-
-/* fclose(File: handle) */
-static cell AMX_NATIVE_CALL n_fclose(AMX *amx, const cell *params)
-{
-    (void) amx;
-    return fclose((FILE *) params[1]) == 0;
-}
-
-/* fwrite(File: handle, const string[]) */
-static cell AMX_NATIVE_CALL n_fwrite(AMX *amx, const cell *params)
-{
-    size_t r = 0;
-    cell *cptr;
-    char *str;
-    int len;
-
-    (void) amx;
-    cptr = amx_Address(amx, params[2]);
-    amx_StrLen(cptr, &len);
-    if (len == 0)
-        return 0;
-
-    if ((ucell) *cptr > UNPACKEDMAX)
-    {
-        /* the string is packed, write it as an ASCII/ANSI string */
-        if ((str = (char *) alloca(len + 1)) != NULL)
-        {
-            amx_GetString(str, cptr, 0, len);
-            r = fputs(str, (FILE *) params[1]);
-        } /* if */
-    } else
-    {
-        /* the string is unpacked, write it as UTF-8 */
-        r = fputs_cell((FILE *) params[1], cptr, 1);
-    } /* if */
-    return (cell) r;
-}
-
-/* fread(File: handle, string[], size=sizeof string, bool:pack=false) */
-static cell AMX_NATIVE_CALL n_fread(AMX *amx, const cell *params)
-{
-    size_t chars;
-    int max;
-    char *str;
-    cell *cptr;
-
-    max = (int) params[3];
-    if (max <= 0)
-        return 0;
-    if (params[4])
-        max *= sizeof(cell);
-
-    cptr = amx_Address(amx, params[2]);
-    str = (char *) alloca(max);
-    if (str == NULL || cptr == NULL)
-    {
-        amx_RaiseError(amx, AMX_ERR_NATIVE);
-        return 0;
-    } /* if */
-
-    if (params[4])
-    {
-        /* store as packed string, read an ASCII/ANSI string */
-        chars = fgets_char((FILE *) params[1], str, max);
-        assert(chars < max);
-        amx_SetString(cptr, str, 1, 0, max);
-    } else
-    {
-        /* store and unpacked string, interpret UTF-8 */
-        chars = fgets_cell((FILE *) params[1], cptr, max, 1);
-    } /* if */
-
-    assert((int) chars < max);
-    return (cell) chars;
-}
-
-/* fputchar(File: handle, value, bool:utf8 = true) */
-static cell AMX_NATIVE_CALL n_fputchar(AMX *amx, const cell *params)
-{
-    size_t result = 0;
-
-    (void) amx;
-    if (params[3])
-    {
-        cell str[2];
-        str[0] = params[2];
-        str[1] = 0;
-        result = fputs_cell((FILE *) params[1], str, 1);
-    } else
-    {
-        fputc((int) params[2], (FILE *) params[1]);
-    } /* if */
-    assert(result == 0 || result == 1);
-    return (cell) result;
-}
-
-/* fgetchar(File: handle, bool:utf8 = true) */
-static cell AMX_NATIVE_CALL n_fgetchar(AMX *amx, const cell *params)
-{
-    cell str[2];
-    size_t result;
-
-    (void) amx;
-    if (params[2])
-    {
-        result = fgets_cell((FILE *) params[1], str, 2, 1);
-    } else
-    {
-        str[0] = fgetc((FILE *) params[1]);
-        result = (str[0] != EOF);
-    } /* if */
-    assert(result == 0 || result == 1);
-    if (result == 0)
-        return EOF;
-    else
-        return str[0];
-}
-
-#if PAWN_CELL_SIZE == 16
-#define aligncell amx_Align16
-#elif PAWN_CELL_SIZE == 32
-#define aligncell amx_Align32
-#elif PAWN_CELL_SIZE == 64 && (defined _I64_MAX || defined HAVE_I64)
-#define aligncell amx_Align64
-#else
-#error Unsupported cell size
-#endif
-
-/* fblockwrite(File: handle, buffer[], size=sizeof buffer) */
-static cell AMX_NATIVE_CALL n_fblockwrite(AMX *amx, const cell *params)
-{
-    cell *cptr;
-    cell count = 0;
-
-    (void) amx;
-    cptr = amx_Address(amx, params[2]);
-    if (cptr != NULL)
-    {
-        cell max = params[3];
-        ucell v;
-        for (count = 0; count < max; count++)
-        {
-            v = (ucell) *cptr++;
-            if (fwrite(aligncell(&v), sizeof(cell), 1, (FILE *) params[1]) != 1)
-                break;          /* write error */
-        } /* for */
-    } /* if */
-    return count;
-}
-
-/* fblockread(File: handle, buffer[], size=sizeof buffer) */
-static cell AMX_NATIVE_CALL n_fblockread(AMX *amx, const cell *params)
-{
-    cell *cptr;
-    cell count = 0;
-
-    (void) amx;
-    cptr = amx_Address(amx, params[2]);
-    if (cptr != NULL)
-    {
-        cell max = params[3];
-        ucell v;
-        for (count = 0; count < max; count++)
-        {
-            if (fread(&v, sizeof(cell), 1, (FILE *) params[1]) != 1)
-                break;          /* write error */
-            *cptr++ = (cell) *aligncell(&v);
-        } /* for */
-    } /* if */
-    return count;
-}
-
-/* File: ftemp() */
-static cell AMX_NATIVE_CALL n_ftemp(AMX *amx, const cell *params)
-{
-    (void) amx;
-    (void) params;
-    return (cell) tmpfile();
-}
-
-/* fseek(File: handle, position, seek_whence: whence=seek_start) */
-static cell AMX_NATIVE_CALL n_fseek(AMX *amx, const cell *params)
-{
-    int whence;
-    (void) amx;
-    switch (params[3])
-    {
-        case seek_start:
-            whence = SEEK_SET;
-            break;
-        case seek_current:
-            whence = SEEK_CUR;
-            break;
-        case seek_end:
-            whence = SEEK_END;
-            //if (params[2]>0)
-            //  params[2]=-params[2];
-            break;
-        default:
-            return 0;
-    } /* switch */
-    return lseek(fileno((FILE *) params[1]), params[2], whence);
-}
-
-/* bool: fremove(const name[]) */
-static cell AMX_NATIVE_CALL n_fremove(AMX *amx, const cell *params)
-{
-    int r = 1;
-    TCHAR *name, fullname[_MAX_PATH];
-
-    (void) amx;
-    amx_StrParam(amx, params[1], name);
-    if (name != NULL && completename(fullname, name, sizearray(fullname)) != NULL)
-    {
-        /* if this is a directory, try _trmdir() */
-        struct stat stbuf;
-        _tstat(fullname, &stbuf);
-        if (S_ISDIR(stbuf.st_mode))
-            r = _trmdir(fullname);
-        else
-            r = _tremove(fullname);
-    } /* if */
-    return r == 0;
-}
-
-/* bool: fcopy(const source[], const target[]) */
-static cell AMX_NATIVE_CALL n_fcopy(AMX *amx, const cell *params)
-{
-    int r = 1;
-    TCHAR *name, oldname[_MAX_PATH], newname[_MAX_PATH];
-
-    (void) amx;
-    amx_StrParam(amx, params[1], name);
-    if (name != NULL && completename(oldname, name, sizearray(oldname)) != NULL)
-    {
-        amx_StrParam(amx, params[2], name);
-        if (name != NULL && completename(newname, name, sizearray(newname)) != NULL)
-        {
-#if defined __WIN32__
-            r= CopyFile(oldname,newname,FALSE)==FALSE;
-#else
-            TCHAR cmd[2 * _MAX_PATH + 10];
-            sprintf(cmd, "cp %s %s", oldname, newname);
-            r = system(cmd) < 0;
-#endif
-        } /* if */
-    } /* if */
-    return r == 0;
-}
-
-/* bool: frename(const oldname[], const newname[]) */
-static cell AMX_NATIVE_CALL n_frename(AMX *amx, const cell *params)
-{
-    int r = 1;
-    TCHAR *name, oldname[_MAX_PATH], newname[_MAX_PATH];
-
-    (void) amx;
-    amx_StrParam(amx, params[1], name);
-    if (name != NULL && completename(oldname, name, sizearray(oldname)) != NULL)
-    {
-        amx_StrParam(amx, params[2], name);
-        if (name != NULL && completename(newname, name, sizearray(newname)) != NULL)
-            r = _trename(oldname, newname);
-    } /* if */
-    return r == 0;
-}
-
-/* flength(File: handle) */
-static cell AMX_NATIVE_CALL n_flength(AMX *amx, const cell *params)
-{
-    long l, c;
-    int fn = fileno((FILE *) params[1]);
-    c = lseek(fn, 0, SEEK_CUR); /* save the current position */
-    l = lseek(fn, 0, SEEK_END); /* return the file position at its end */
-    lseek(fn, c, SEEK_SET);   /* restore the file pointer */
-    (void) amx;
-    return l;
-}
-
-static int match_optcopy(TCHAR *out, int outlen, const TCHAR *in, int skip)
-{
-    if (out == NULL || skip != 0 || outlen <= 0)
-        return 0;
-    _tcsncpy(out, in, outlen);
-    out[outlen - 1] = '\0';
-    return 1;
-}
-
-static int matchfiles(const TCHAR *path, int skip, TCHAR *out, int outlen)
-{
-    int count = 0;
-    const TCHAR *basename;
-#if DIRSEP_CHAR != '/'
-    TCHAR *ptr;
-#endif
-#if defined __WIN32__
-    HANDLE hfind;
-    WIN32_FIND_DATA fd;
-#else
-    /* assume LINUX, FreeBSD, OpenBSD, or some other variant */
-    DIR *dir;
-    struct dirent *entry;
-    TCHAR dirname[_MAX_PATH];
-#endif
-
-    basename = _tcsrchr(path, DIRSEP_CHAR);
-    basename = (basename == NULL) ? path : basename + 1;
-#if DIRSEP_CHAR != '/'
-    ptr=_tcsrchr(basename,DIRSEP_CHAR);
-    basename=(ptr==NULL) ? basename : ptr+1;
-#endif
-
-#if defined __WIN32__
-    if ((hfind=FindFirstFile(path,&fd))!=INVALID_HANDLE_VALUE) {
-      do {
-        if (fpattern_match(basename,fd.cFileName,-1,FALSE)) {
-          count++;
-          if (match_optcopy(out,outlen,fd.cFileName,skip--))
-            break;
-        } /* if */
-      } while (FindNextFile(hfind,&fd));
-      FindClose(hfind);
-    } /* if */
-#else
-    /* copy directory part only (zero-terminate) */
-    if (basename == path)
-    {
-        _tcscpy(dirname, ".");
-    } else
-    {
-        _tcsncpy(dirname, path, (int) (basename - path));
-        dirname[(int) (basename - path)] = __T('\0');
-    } /* if */
-    if ((dir = opendir(dirname)) != NULL)
-    {
-        while ((entry = readdir(dir)) != NULL)
-        {
-            if (fpattern_match(basename, entry->d_name, -1, TRUE))
-            {
-                count++;
-                if (match_optcopy(out, outlen, entry->d_name, skip--))
-                    break;
-            } /* if */
-        } /* while */
-        closedir(dir);
-    } /* if */
-#endif
-    return count;
-}
-
-/* fexist(const pattern[]) */
-static cell AMX_NATIVE_CALL n_fexist(AMX *amx, const cell *params)
-{
-    int r = 0;
-    TCHAR *name, fullname[_MAX_PATH];
-
-    (void) amx;
-    amx_StrParam(amx, params[1], name);
-    if (name != NULL && completename(fullname, name, sizearray(fullname)) != NULL)
-        r = matchfiles(fullname, 0, NULL, 0);
-    return r;
-}
-
-/* bool: fmatch(filename[], const pattern[], index=0, maxlength=sizeof filename) */
-static cell AMX_NATIVE_CALL n_fmatch(AMX *amx, const cell *params)
-{
-    TCHAR *name, fullname[_MAX_PATH] = "";
-    cell *cptr;
-
-    (void) amx;
-    amx_StrParam(amx, params[2], name);
-    if (name != NULL && completename(fullname, name, sizearray(fullname)) != NULL)
-    {
-        if (!matchfiles(fullname, params[3], fullname, sizearray(fullname)))
-        {
-            fullname[0] = '\0';
-        } else
-        {
-            /* copy the string into the destination */
-            cptr = amx_Address(amx, params[1]);
-            amx_SetString(cptr, fullname, 1, 0, params[4]);
-        } /* if */
-    } /* if */
-    return fullname[0] != '\0';
-}
-
-/* bool: fstat(const name[], &size = 0, &timestamp = 0, &attrib = 0, &inode = 0) */
-static cell AMX_NATIVE_CALL n_fstat(AMX *amx, const cell *params)
-{
-    TCHAR *name, fullname[_MAX_PATH] = "";
-    cell *cptr;
-    int result = 0;
-
-    (void) amx;
-    amx_StrParam(amx, params[1], name);
-    if (name != NULL && completename(fullname, name, sizearray(fullname)) != NULL)
-    {
-        struct stat stbuf;
-        if (_tstat(name, &stbuf) == 0)
-        {
-            cptr = amx_Address(amx, params[2]);
-            *cptr = stbuf.st_size;
-            cptr = amx_Address(amx, params[3]);
-            *cptr = (cell) stbuf.st_mtime;
-            cptr = amx_Address(amx, params[4]);
-            *cptr = stbuf.st_mode;  /* mode/protection bits */
-            cptr = amx_Address(amx, params[5]);
-            *cptr = stbuf.st_ino;   /* inode number, unique id for a file */
-            result = 1;
-        } /* if */
-    } /* if */
-    return result;
-}
-
-/* bool: fattrib(const name[], timestamp=0, attrib=0x0f) */
-static cell AMX_NATIVE_CALL n_fattrib(AMX *amx, const cell *params)
-{
-#if !(defined __WIN32__ || defined _WIN32 || defined WIN32)
-#define _utime(n, t)  utime(n,t)
-#define _utimbuf     utimbuf
-#endif
-    TCHAR *name, fullname[_MAX_PATH] = "";
-    int result = 0;
-
-    (void) amx;
-    amx_StrParam(amx, params[1], name);
-    if (name != NULL && completename(fullname, name, sizearray(fullname)) != NULL)
-    {
-        result = 1;
-        if (params[2] != 0)
-        {
-            struct _utimbuf times;
-            times.actime = (unsigned long) params[2];
-            times.modtime = (unsigned long) params[2];
-            result = result && (_tutime(name, &times) == 0);
-        } /* if */
-        if (params[3] != 0x0f)
-            result = result && (_tchmod(name, (int) params[3]) == 0);
-    } /* if */
-    return result;
-}
-
-/* bool: fcreatedir(const name[]) */
-static cell AMX_NATIVE_CALL n_fcreatedir(AMX *amx, const cell *params)
-{
-    TCHAR *name, fullname[_MAX_PATH] = "";
-    int r = 1;
-
-    (void) amx;
-    amx_StrParam(amx, params[1], name);
-    if (name != NULL && completename(fullname, name, sizearray(fullname)) != NULL)
-    {
-#if defined __WIN32__ || defined __DOS__
-        r=_tmkdir(fullname);
-#else
-        r = _tmkdir(fullname, 0755);
-#endif
-    } /* if */
-    return r == 0;
-}
-
-/* CRC32 functions are adapted from source code from www.networkdls.com
- * The table generation routines are replaced by a hard-coded table, which
- * can be stored in Flash ROM.
- */
-const unsigned long ulCRCTable[256] = // CRC Lookup Table Array
-        {
-                0x00000000Lu, 0x77073096Lu, 0xee0e612cLu, 0x990951baLu,
-                0x076dc419Lu, 0x706af48fLu, 0xe963a535Lu, 0x9e6495a3Lu,
-                0x0edb8832Lu, 0x79dcb8a4Lu, 0xe0d5e91eLu, 0x97d2d988Lu,
-                0x09b64c2bLu, 0x7eb17cbdLu, 0xe7b82d07Lu, 0x90bf1d91Lu,
-                0x1db71064Lu, 0x6ab020f2Lu, 0xf3b97148Lu, 0x84be41deLu,
-                0x1adad47dLu, 0x6ddde4ebLu, 0xf4d4b551Lu, 0x83d385c7Lu,
-                0x136c9856Lu, 0x646ba8c0Lu, 0xfd62f97aLu, 0x8a65c9ecLu,
-                0x14015c4fLu, 0x63066cd9Lu, 0xfa0f3d63Lu, 0x8d080df5Lu,
-                0x3b6e20c8Lu, 0x4c69105eLu, 0xd56041e4Lu, 0xa2677172Lu,
-                0x3c03e4d1Lu, 0x4b04d447Lu, 0xd20d85fdLu, 0xa50ab56bLu,
-                0x35b5a8faLu, 0x42b2986cLu, 0xdbbbc9d6Lu, 0xacbcf940Lu,
-                0x32d86ce3Lu, 0x45df5c75Lu, 0xdcd60dcfLu, 0xabd13d59Lu,
-                0x26d930acLu, 0x51de003aLu, 0xc8d75180Lu, 0xbfd06116Lu,
-                0x21b4f4b5Lu, 0x56b3c423Lu, 0xcfba9599Lu, 0xb8bda50fLu,
-                0x2802b89eLu, 0x5f058808Lu, 0xc60cd9b2Lu, 0xb10be924Lu,
-                0x2f6f7c87Lu, 0x58684c11Lu, 0xc1611dabLu, 0xb6662d3dLu,
-                0x76dc4190Lu, 0x01db7106Lu, 0x98d220bcLu, 0xefd5102aLu,
-                0x71b18589Lu, 0x06b6b51fLu, 0x9fbfe4a5Lu, 0xe8b8d433Lu,
-                0x7807c9a2Lu, 0x0f00f934Lu, 0x9609a88eLu, 0xe10e9818Lu,
-                0x7f6a0dbbLu, 0x086d3d2dLu, 0x91646c97Lu, 0xe6635c01Lu,
-                0x6b6b51f4Lu, 0x1c6c6162Lu, 0x856530d8Lu, 0xf262004eLu,
-                0x6c0695edLu, 0x1b01a57bLu, 0x8208f4c1Lu, 0xf50fc457Lu,
-                0x65b0d9c6Lu, 0x12b7e950Lu, 0x8bbeb8eaLu, 0xfcb9887cLu,
-                0x62dd1ddfLu, 0x15da2d49Lu, 0x8cd37cf3Lu, 0xfbd44c65Lu,
-                0x4db26158Lu, 0x3ab551ceLu, 0xa3bc0074Lu, 0xd4bb30e2Lu,
-                0x4adfa541Lu, 0x3dd895d7Lu, 0xa4d1c46dLu, 0xd3d6f4fbLu,
-                0x4369e96aLu, 0x346ed9fcLu, 0xad678846Lu, 0xda60b8d0Lu,
-                0x44042d73Lu, 0x33031de5Lu, 0xaa0a4c5fLu, 0xdd0d7cc9Lu,
-                0x5005713cLu, 0x270241aaLu, 0xbe0b1010Lu, 0xc90c2086Lu,
-                0x5768b525Lu, 0x206f85b3Lu, 0xb966d409Lu, 0xce61e49fLu,
-                0x5edef90eLu, 0x29d9c998Lu, 0xb0d09822Lu, 0xc7d7a8b4Lu,
-                0x59b33d17Lu, 0x2eb40d81Lu, 0xb7bd5c3bLu, 0xc0ba6cadLu,
-                0xedb88320Lu, 0x9abfb3b6Lu, 0x03b6e20cLu, 0x74b1d29aLu,
-                0xead54739Lu, 0x9dd277afLu, 0x04db2615Lu, 0x73dc1683Lu,
-                0xe3630b12Lu, 0x94643b84Lu, 0x0d6d6a3eLu, 0x7a6a5aa8Lu,
-                0xe40ecf0bLu, 0x9309ff9dLu, 0x0a00ae27Lu, 0x7d079eb1Lu,
-                0xf00f9344Lu, 0x8708a3d2Lu, 0x1e01f268Lu, 0x6906c2feLu,
-                0xf762575dLu, 0x806567cbLu, 0x196c3671Lu, 0x6e6b06e7Lu,
-                0xfed41b76Lu, 0x89d32be0Lu, 0x10da7a5aLu, 0x67dd4accLu,
-                0xf9b9df6fLu, 0x8ebeeff9Lu, 0x17b7be43Lu, 0x60b08ed5Lu,
-                0xd6d6a3e8Lu, 0xa1d1937eLu, 0x38d8c2c4Lu, 0x4fdff252Lu,
-                0xd1bb67f1Lu, 0xa6bc5767Lu, 0x3fb506ddLu, 0x48b2364bLu,
-                0xd80d2bdaLu, 0xaf0a1b4cLu, 0x36034af6Lu, 0x41047a60Lu,
-                0xdf60efc3Lu, 0xa867df55Lu, 0x316e8eefLu, 0x4669be79Lu,
-                0xcb61b38cLu, 0xbc66831aLu, 0x256fd2a0Lu, 0x5268e236Lu,
-                0xcc0c7795Lu, 0xbb0b4703Lu, 0x220216b9Lu, 0x5505262fLu,
-                0xc5ba3bbeLu, 0xb2bd0b28Lu, 0x2bb45a92Lu, 0x5cb36a04Lu,
-                0xc2d7ffa7Lu, 0xb5d0cf31Lu, 0x2cd99e8bLu, 0x5bdeae1dLu,
-                0x9b64c2b0Lu, 0xec63f226Lu, 0x756aa39cLu, 0x026d930aLu,
-                0x9c0906a9Lu, 0xeb0e363fLu, 0x72076785Lu, 0x05005713Lu,
-                0x95bf4a82Lu, 0xe2b87a14Lu, 0x7bb12baeLu, 0x0cb61b38Lu,
-                0x92d28e9bLu, 0xe5d5be0dLu, 0x7cdcefb7Lu, 0x0bdbdf21Lu,
-                0x86d3d2d4Lu, 0xf1d4e242Lu, 0x68ddb3f8Lu, 0x1fda836eLu,
-                0x81be16cdLu, 0xf6b9265bLu, 0x6fb077e1Lu, 0x18b74777Lu,
-                0x88085ae6Lu, 0xff0f6a70Lu, 0x66063bcaLu, 0x11010b5cLu,
-                0x8f659effLu, 0xf862ae69Lu, 0x616bffd3Lu, 0x166ccf45Lu,
-                0xa00ae278Lu, 0xd70dd2eeLu, 0x4e048354Lu, 0x3903b3c2Lu,
-                0xa7672661Lu, 0xd06016f7Lu, 0x4969474dLu, 0x3e6e77dbLu,
-                0xaed16a4aLu, 0xd9d65adcLu, 0x40df0b66Lu, 0x37d83bf0Lu,
-                0xa9bcae53Lu, 0xdebb9ec5Lu, 0x47b2cf7fLu, 0x30b5ffe9Lu,
-                0xbdbdf21cLu, 0xcabac28aLu, 0x53b39330Lu, 0x24b4a3a6Lu,
-                0xbad03605Lu, 0xcdd70693Lu, 0x54de5729Lu, 0x23d967bfLu,
-                0xb3667a2eLu, 0xc4614ab8Lu, 0x5d681b02Lu, 0x2a6f2b94Lu,
-                0xb40bbe37Lu, 0xc30c8ea1Lu, 0x5a05df1bLu, 0x2d02ef8dLu
-        };
-
-///////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-// This function uses the ulCRCTable lookup table to generate a CRC for xData
-
-static unsigned long PartialCRC(unsigned long ulCRC, unsigned char *sBuf, unsigned long lBufSz)
-{
-    while (lBufSz--)
-        ulCRC = (ulCRC >> 8) ^ ulCRCTable[(ulCRC & 0xFF) ^ *sBuf++];
-
-    return ulCRC;
-}
-
-/* filecrc(const name[]) */
-static cell AMX_NATIVE_CALL n_filecrc(AMX *amx, const cell *params)
-{
-    TCHAR *name, fullname[_MAX_PATH] = "";
-    FILE *fp;
-    unsigned char buffer[256];
-    unsigned long ulCRC = 0xffffffff;
-    size_t numread;
-
-    (void) amx;
-    amx_StrParam(amx, params[1], name);
-    if (name != NULL && completename(fullname, name, sizearray(fullname)) != NULL
-        && (fp = _tfopen(fullname, "rb")) != NULL)
-    {
-        do
-        {
-            numread = fread(buffer, sizeof(unsigned char), sizeof buffer, fp);
-            ulCRC = PartialCRC(ulCRC, buffer, (unsigned long) numread);
-        } while (numread == sizeof buffer);
-        fclose(fp);
-    } /* if */
-    return (ulCRC ^ 0xffffffff);
-}
-
-
-const TCHAR default_ini_name[] = "config.ini";
-
-/* readcfg(const filename[]="", const section[]="", const key[], value[], size=sizeof value, const defvalue[]="", bool:packed=false) */
-static cell AMX_NATIVE_CALL n_readcfg(AMX *amx, const cell *params)
-{
-    TCHAR *name, fullname[_MAX_PATH] = "";
-    TCHAR *section, *key, *defvalue;
-    TCHAR *buffer;
-    int size, result = 0;
-    cell *cptr;
-
-    size = (int) params[5];
-    if (size <= 0)
-        return 0;
-    if (params[7])
-        size *= sizeof(cell);
-
-    amx_StrParam(amx, params[1], name);
-    if (name != NULL && *name == '\0')
-        name = (TCHAR *) default_ini_name;
-    if (name != NULL && completename(fullname, name, sizearray(fullname)) != NULL)
-    {
-        amx_StrParam(amx, params[2], section);
-        amx_StrParam(amx, params[3], key);
-        amx_StrParam(amx, params[6], defvalue);
-
-        cptr = amx_Address(amx, params[4]);
-        buffer = (char *) alloca(size);
-        if (buffer == NULL || cptr == NULL)
-        {
-            amx_RaiseError(amx, AMX_ERR_NATIVE);
-            return 0;
-        } /* if */
-        result = ini_gets(section, key, defvalue, buffer, size, fullname);
-        amx_SetString(cptr, buffer, params[7], 0, size);
-    } /* if */
-    return result;
-}
-
-/* readcfgvalue(const filename[]="", const section[]="", const key[], defvalue=0) */
-static cell AMX_NATIVE_CALL n_readcfgvalue(AMX *amx, const cell *params)
-{
-    TCHAR *name, fullname[_MAX_PATH] = "";
-    TCHAR *section, *key;
-    long result = 0;
-
-    (void) amx;
-    amx_StrParam(amx, params[1], name);
-    if (name != NULL && *name == '\0')
-        name = (TCHAR *) default_ini_name;
-    if (name != NULL && completename(fullname, name, sizearray(fullname)) != NULL)
-    {
-        amx_StrParam(amx, params[2], section);
-        amx_StrParam(amx, params[3], key);
-        result = ini_getl(section, key, (long) params[4], fullname);
-    } /* if */
-    return result;
-}
-
-/* writecfg(const filename[]="", const section[]="", const key[], const value[]) */
-static cell AMX_NATIVE_CALL n_writecfg(AMX *amx, const cell *params)
-{
-    TCHAR *name, fullname[_MAX_PATH] = "";
-    TCHAR *section, *key, *value;
-    int result = 0;
-
-    (void) amx;
-    amx_StrParam(amx, params[1], name);
-    if (name != NULL && *name == '\0')
-        name = (TCHAR *) default_ini_name;
-    if (name != NULL && completename(fullname, name, sizearray(fullname)) != NULL)
-    {
-        amx_StrParam(amx, params[2], section);
-        amx_StrParam(amx, params[3], key);
-        amx_StrParam(amx, params[4], value);
-        result = ini_puts(section, key, value, fullname);
-    } /* if */
-    return result;
-}
-
-/* writecfgvalue(const filename[]="", const section[]="", const key[], value) */
-static cell AMX_NATIVE_CALL n_writecfgvalue(AMX *amx, const cell *params)
-{
-    TCHAR *name, fullname[_MAX_PATH] = "";
-    TCHAR *section, *key;
-    int result = 0;
-
-    (void) amx;
-    amx_StrParam(amx, params[1], name);
-    if (name != NULL && *name == '\0')
-        name = (TCHAR *) default_ini_name;
-    if (name != NULL && completename(fullname, name, sizearray(fullname)) != NULL)
-    {
-        amx_StrParam(amx, params[2], section);
-        amx_StrParam(amx, params[3], key);
-        result = ini_putl(section, key, (long) params[4], fullname);
-    } /* if */
-    return result;
-}
-
-/* deletecfg(const filename[]="", const section[]="", const key[]="") */
-static cell AMX_NATIVE_CALL n_deletecfg(AMX *amx, const cell *params)
-{
-    TCHAR *name, fullname[_MAX_PATH] = "";
-    TCHAR *section, *key;
-    int result = 0;
-
-    (void) amx;
-    amx_StrParam(amx, params[1], name);
-    if (name != NULL && *name == '\0')
-        name = (TCHAR *) default_ini_name;
-    if (name != NULL && completename(fullname, name, sizearray(fullname)) != NULL)
-    {
-        amx_StrParam(amx, params[2], section);
-        if (*section == '\0')
-            section = NULL;
-        amx_StrParam(amx, params[3], key);
-        if (*key == '\0')
-            key = NULL;
-        result = ini_puts(section, key, NULL, fullname);
-    } /* if */
-    return result;
-}
-
-#if defined __cplusplus
-extern "C"
-#endif
-AMX_NATIVE_INFO file_Natives[] = {
-        {"fopen",         n_fopen},
-        {"fclose",        n_fclose},
-        {"fwrite",        n_fwrite},
-        {"fread",         n_fread},
-        {"fputchar",      n_fputchar},
-        {"fgetchar",      n_fgetchar},
-        {"fblockwrite",   n_fblockwrite},
-        {"fblockread",    n_fblockread},
-        {"ftemp",         n_ftemp},
-        {"fseek",         n_fseek},
-        {"flength",       n_flength},
-        {"fremove",       n_fremove},
-        {"fcopy",         n_fcopy},
-        {"frename",       n_frename},
-        {"fexist",        n_fexist},
-        {"fmatch",        n_fmatch},
-        {"fstat",         n_fstat},
-        {"fattrib",       n_fattrib},
-        {"filecrc",       n_filecrc},
-        {"fcreatedir",    n_fcreatedir},
-        {"readcfg",       n_readcfg},
-        {"readcfgvalue",  n_readcfgvalue},
-        {"writecfg",      n_writecfg},
-        {"writecfgvalue", n_writecfgvalue},
-        {"deletecfg",     n_deletecfg},
-        {NULL, NULL}        /* terminator */
-};
-
-int AMXEXPORT AMXAPI amx_FileInit(AMX *amx)
-{
-    return amx_Register(amx, file_Natives, -1);
-}
-
-int AMXEXPORT AMXAPI amx_FileCleanup(AMX *amx)
-{
-    (void) amx;
-    return AMX_ERR_NONE;
-}
diff --git a/apps/openmw-mp/amx/amxfloat.c b/apps/openmw-mp/amx/amxfloat.c
deleted file mode 100644
index 48aa21b19..000000000
--- a/apps/openmw-mp/amx/amxfloat.c
+++ /dev/null
@@ -1,379 +0,0 @@
-/*  Float arithmetic for the Pawn Abstract Machine
- *
- *  Copyright (c) Artran, Inc. 1999
- *  Written by Greg Garner (gmg@artran.com)
- *  This file may be freely used. No warranties of any kind.
- *
- * CHANGES -
- * 2002-08-27: Basic conversion of source from C++ to C by Adam D. Moss
- *             <adam@gimp.org> <aspirin@icculus.org>
- * 2003-08-29: Removal of the dynamic memory allocation and replacing two
- *             type conversion functions by macros, by Thiadmer Riemersma
- * 2003-09-22: Moved the type conversion macros to AMX.H, and simplifications
- *             of some routines, by Thiadmer Riemersma
- * 2003-11-24: A few more native functions (geometry), plus minor modifications,
- *             mostly to be compatible with dynamically loadable extension
- *             modules, by Thiadmer Riemersma
- * 2004-01-09: Adaptions for 64-bit cells (using "double precision"), by
- *             Thiadmer Riemersma
- */
-#include <stdlib.h>     /* for atof() */
-#include <stdio.h>      /* for NULL */
-#include <assert.h>
-#include <math.h>
-#include "amx.h"
-
-/*
-  #if defined __BORLANDC__
-    #pragma resource "amxFloat.res"
-  #endif
-*/
-
-#if PAWN_CELL_SIZE==32
-  #define REAL          float
-#elif PAWN_CELL_SIZE==64
-  #define REAL          double
-#else
-  #error Unsupported cell size
-#endif
-
-#define PI  3.1415926535897932384626433832795
-
-/******************************************************************/
-static cell AMX_NATIVE_CALL n_float(AMX *amx,const cell *params)
-{
-    /*
-    *   params[0] = number of bytes
-    *   params[1] = integer value to convert to a float
-    */
-    REAL fValue;
-
-    (void)amx;
-    /* Convert to a float. Calls the compilers long to float conversion. */
-    fValue = (REAL) params[1];
-
-    /* Return the cell. */
-    return amx_ftoc(fValue);
-}
-
-/******************************************************************/
-static cell AMX_NATIVE_CALL n_strfloat(AMX *amx,const cell *params)
-{
-    /*
-    *   params[0] = number of bytes
-    *   params[1] = virtual string address to convert to a float
-    */
-    char szSource[60];
-    cell *pString;
-    REAL fNum;
-    int nLen;
-
-    (void)amx;
-    /* They should have sent us 1 cell. */
-    assert(params[0]/sizeof(cell)==1);
-
-    /* Get the real address of the string. */
-    pString=amx_Address(amx,params[1]);
-
-    /* Find out how long the string is in characters. */
-    amx_StrLen(pString, &nLen);
-    if (nLen == 0 || nLen >= sizeof szSource)
-        return 0;
-
-    /* Now convert the Pawn string into a C type null terminated string */
-    amx_GetString(szSource, pString, 0, sizeof szSource);
-
-    /* Now convert this to a float. */
-    fNum = (REAL)atof(szSource);
-
-    return amx_ftoc(fNum);
-}
-
-/******************************************************************/
-static cell AMX_NATIVE_CALL n_floatmul(AMX *amx,const cell *params)
-{
-    /*
-    *   params[0] = number of bytes
-    *   params[1] = float operand 1
-    *   params[2] = float operand 2
-    */
-    REAL fRes = amx_ctof(params[1]) * amx_ctof(params[2]);
-    (void)amx;
-    return amx_ftoc(fRes);
-}
-
-/******************************************************************/
-static cell AMX_NATIVE_CALL n_floatdiv(AMX *amx,const cell *params)
-{
-    /*
-    *   params[0] = number of bytes
-    *   params[1] = float dividend (top)
-    *   params[2] = float divisor (bottom)
-    */
-    REAL fRes = amx_ctof(params[1]) / amx_ctof(params[2]);
-    (void)amx;
-    return amx_ftoc(fRes);
-}
-
-/******************************************************************/
-static cell AMX_NATIVE_CALL n_floatadd(AMX *amx,const cell *params)
-{
-    /*
-    *   params[0] = number of bytes
-    *   params[1] = float operand 1
-    *   params[2] = float operand 2
-    */
-    REAL fRes = amx_ctof(params[1]) + amx_ctof(params[2]);
-    (void)amx;
-    return amx_ftoc(fRes);
-}
-
-/******************************************************************/
-static cell AMX_NATIVE_CALL n_floatsub(AMX *amx,const cell *params)
-{
-    /*
-    *   params[0] = number of bytes
-    *   params[1] = float operand 1
-    *   params[2] = float operand 2
-    */
-    REAL fRes = amx_ctof(params[1]) - amx_ctof(params[2]);
-    (void)amx;
-    return amx_ftoc(fRes);
-}
-
-/******************************************************************/
-/* Return fractional part of float */
-static cell AMX_NATIVE_CALL n_floatfract(AMX *amx,const cell *params)
-{
-    /*
-    *   params[0] = number of bytes
-    *   params[1] = float operand
-    */
-    REAL fA = amx_ctof(params[1]);
-    fA = fA - (REAL)(floor((double)fA));
-    (void)amx;
-    return amx_ftoc(fA);
-}
-
-/******************************************************************/
-/* Return integer part of float, rounded */
-static cell AMX_NATIVE_CALL n_floatround(AMX *amx,const cell *params)
-{
-    /*
-    *   params[0] = number of bytes
-    *   params[1] = float operand
-    *   params[2] = Type of rounding (integer)
-    */
-    REAL fA = amx_ctof(params[1]);
-
-    (void)amx;
-    switch (params[2])
-    {
-        case 1:       /* round downwards */
-            fA = (REAL)(floor((double)fA));
-            break;
-        case 2:       /* round upwards */
-            fA = (REAL)(ceil((double)fA));
-            break;
-        case 3:       /* round towards zero (truncate) */
-            if ( fA>=0.0 )
-                fA = (REAL)(floor((double)fA));
-            else
-                fA = (REAL)(ceil((double)fA));
-            break;
-        default:      /* standard, round to nearest */
-            fA = (REAL)(floor((double)fA+.5));
-            break;
-    }
-
-    return (cell)fA;
-}
-
-/******************************************************************/
-static cell AMX_NATIVE_CALL n_floatcmp(AMX *amx,const cell *params)
-{
-    /*
-    *   params[0] = number of bytes
-    *   params[1] = float operand 1
-    *   params[2] = float operand 2
-    */
-    REAL fA, fB;
-
-    (void)amx;
-    fA = amx_ctof(params[1]);
-    fB = amx_ctof(params[2]);
-    if (fA == fB)
-        return 0;
-    else if (fA>fB)
-        return 1;
-    else
-        return -1;
-
-}
-
-/******************************************************************/
-static cell AMX_NATIVE_CALL n_floatsqroot(AMX *amx,const cell *params)
-{
-    /*
-    *   params[0] = number of bytes
-    *   params[1] = float operand
-    */
-    REAL fA = amx_ctof(params[1]);
-    fA = (REAL)sqrt(fA);
-    if (fA < 0)
-        return amx_RaiseError(amx, AMX_ERR_DOMAIN);
-    return amx_ftoc(fA);
-}
-
-/******************************************************************/
-static cell AMX_NATIVE_CALL n_floatpower(AMX *amx,const cell *params)
-{
-    /*
-    *   params[0] = number of bytes
-    *   params[1] = float operand 1 (base)
-    *   params[2] = float operand 2 (exponent)
-    */
-    REAL fA = amx_ctof(params[1]);
-    REAL fB = amx_ctof(params[2]);
-    fA = (REAL)pow(fA, fB);
-    (void)amx;
-    return amx_ftoc(fA);
-}
-
-/******************************************************************/
-static cell AMX_NATIVE_CALL n_floatlog(AMX *amx,const cell *params)
-{
-    /*
-    *   params[0] = number of bytes
-    *   params[1] = float operand 1 (value)
-    *   params[2] = float operand 2 (base)
-    */
-    REAL fValue = amx_ctof(params[1]);
-    REAL fBase = amx_ctof(params[2]);
-    (void)amx;
-    if (fValue <= 0.0 || fBase <= 0)
-        return amx_RaiseError(amx, AMX_ERR_DOMAIN);
-    if (fBase == 10.0) // ??? epsilon
-        fValue = (REAL)log10(fValue);
-    else
-        fValue = (REAL)(log(fValue) / log(fBase));
-    return amx_ftoc(fValue);
-}
-
-static REAL ToRadians(REAL angle, int radix)
-{
-    switch (radix)
-    {
-        case 1:         /* degrees, sexagesimal system (technically: degrees/minutes/seconds) */
-            return (REAL)(angle * PI / 180.0);
-        case 2:         /* grades, centesimal system */
-            return (REAL)(angle * PI / 200.0);
-        default:        /* assume already radian */
-            return angle;
-    } /* switch */
-}
-
-/******************************************************************/
-static cell AMX_NATIVE_CALL n_floatsin(AMX *amx,const cell *params)
-{
-    /*
-    *   params[0] = number of bytes
-    *   params[1] = float operand 1 (angle)
-    *   params[2] = float operand 2 (radix)
-    */
-    REAL fA = amx_ctof(params[1]);
-    fA = ToRadians(fA, params[2]);
-    fA = (float)sin(fA);
-    (void)amx;
-    return amx_ftoc(fA);
-}
-
-/******************************************************************/
-static cell AMX_NATIVE_CALL n_floatcos(AMX *amx,const cell *params)
-{
-    /*
-    *   params[0] = number of bytes
-    *   params[1] = float operand 1 (angle)
-    *   params[2] = float operand 2 (radix)
-    */
-    REAL fA = amx_ctof(params[1]);
-    fA = ToRadians(fA, params[2]);
-    fA = (float)cos(fA);
-    (void)amx;
-    return amx_ftoc(fA);
-}
-
-/******************************************************************/
-static cell AMX_NATIVE_CALL n_floattan(AMX *amx,const cell *params)
-{
-    /*
-    *   params[0] = number of bytes
-    *   params[1] = float operand 1 (angle)
-    *   params[2] = float operand 2 (radix)
-    */
-    REAL fA = amx_ctof(params[1]);
-    fA = ToRadians(fA, params[2]);
-    fA = (float)tan(fA);
-    (void)amx;
-    return amx_ftoc(fA);
-}
-
-/******************************************************************/
-static cell AMX_NATIVE_CALL n_floatabs(AMX *amx,const cell *params)
-{
-    REAL fA = amx_ctof(params[1]);
-    fA = (fA >= 0) ? fA : -fA;
-    (void)amx;
-    return amx_ftoc(fA);
-}
-
-/******************************************************************/
-/* return the integer part of a real value, truncated
-/* Return integer part of float, truncated (same as floatround
- * with mode 3)
- */
-static cell AMX_NATIVE_CALL n_floatint(AMX *amx,const cell *params)
-{
-    REAL fA = amx_ctof(params[1]);
-    if ( fA>=0.0 )
-        fA = (REAL)(floor((double)fA));
-    else
-        fA = (REAL)(ceil((double)fA));
-    (void)amx;
-    return (cell)fA;
-}
-
-#if defined __cplusplus
-  extern "C"
-#endif
-const AMX_NATIVE_INFO float_Natives[] = {
-  { "float",       n_float      },
-  { "strfloat",    n_strfloat   },
-  { "floatmul",    n_floatmul   },
-  { "floatdiv",    n_floatdiv   },
-  { "floatadd",    n_floatadd   },
-  { "floatsub",    n_floatsub   },
-  { "floatfract",  n_floatfract },
-  { "floatround",  n_floatround },
-  { "floatcmp",    n_floatcmp   },
-  { "floatsqroot", n_floatsqroot},
-  { "floatpower",  n_floatpower },
-  { "floatlog",    n_floatlog   },
-  { "floatsin",    n_floatsin   },
-  { "floatcos",    n_floatcos   },
-  { "floattan",    n_floattan   },
-  { "floatabs",    n_floatabs   },
-  { "floatint",    n_floatint   },  // also add user-defined operator "="
-  { NULL, NULL }        /* terminator */
-};
-
-int AMXEXPORT AMXAPI amx_FloatInit(AMX *amx)
-{
-  return amx_Register(amx,float_Natives,-1);
-}
-
-int AMXEXPORT AMXAPI amx_FloatCleanup(AMX *amx)
-{
-  (void)amx;
-  return AMX_ERR_NONE;
-}
diff --git a/apps/openmw-mp/amx/amxstring.c b/apps/openmw-mp/amx/amxstring.c
deleted file mode 100644
index 300ec3b80..000000000
--- a/apps/openmw-mp/amx/amxstring.c
+++ /dev/null
@@ -1,1012 +0,0 @@
-/*  String functions for the Pawn Abstract Machine
- *
- *  Copyright (c) ITB CompuPhase, 2005-2015
- *
- *  Licensed under the Apache License, Version 2.0 (the "License"); you may not
- *  use this file except in compliance with the License. You may obtain a copy
- *  of the License at
- *
- *      http://www.apache.org/licenses/LICENSE-2.0
- *
- *  Unless required by applicable law or agreed to in writing, software
- *  distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
- *  WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the
- *  License for the specific language governing permissions and limitations
- *  under the License.
- *
- *  Version: $Id: amxstring.c 5181 2015-01-21 09:44:28Z thiadmer $
- */
-#include <limits.h>
-#include <string.h>
-#include <assert.h>
-#if defined __WIN32__ || defined _WIN32 || defined WIN32 || defined __MSDOS__
-  #include <malloc.h>
-#endif
-#include "osdefs.h"
-#include "amx.h"
-#if defined __WIN32__ || defined _WIN32 || defined WIN32 || defined _Windows
-  #include <windows.h>
-#endif
-
-#define MAX_FORMATSTR   256
-
-#define CHARBITS        (8*sizeof(char))
-
-#if defined _UNICODE
-# include <tchar.h>
-#elif !defined __T
-  typedef char          TCHAR;
-# define __T(string)    string
-# define _tcscat        strcat
-# define _tcschr        strchr
-# define _tcscpy        strcpy
-# define _tcslen        strlen
-#endif
-#include "amxcons.h"
-
-#if !defined isdigit
-# define isdigit(c)     ((unsigned)((c)-'0')<10u)
-#endif
-#if !defined sizearray
-# define sizearray(a)   (sizeof(a) / sizeof((a)[0]))
-#endif
-
-
-/* dest     the destination buffer; the buffer must point to the start of a cell
- * source   the source buffer, this must be aligned to a cell edge
- * len      the number of characters (bytes) to copy
- * offs     the offset in dest, in characters (bytes)
- */
-static int amx_StrPack(cell *dest,cell *source,int len,int offs)
-{
-  int i;
-
-  if ((ucell)*source>UNPACKEDMAX && offs%sizeof(cell)==0) {
-    /* source string is already packed and the destination is cell-aligned */
-    unsigned char* pdest=(unsigned char*)dest+offs;
-    i=(len+sizeof(cell)-1)/sizeof(cell);
-    memmove(pdest,source,i*sizeof(cell));
-    /* zero-terminate */
-    #if BYTE_ORDER==BIG_ENDIAN
-      pdest+=len;
-      for (i=len; i==len || i%sizeof(cell)!=0; i++)
-        *pdest++='\0';
-    #else
-      i=(len/sizeof(cell))*sizeof(cell);
-      pdest+=i;
-      len=(len==i) ? sizeof(cell) : sizeof(cell)-(len-i);
-      assert(len>0 && len<=sizeof(cell));
-      for (i=0; i<len; i++)
-        *pdest++='\0';
-    #endif
-  } else if ((ucell)*source>UNPACKEDMAX) {
-    /* source string is packed, destination is not aligned */
-    cell mask,c;
-    dest+=offs/sizeof(cell);    /* increment whole number of cells */
-    offs%=sizeof(cell);         /* get remainder */
-    mask=(~(ucell)0) >> (offs*CHARBITS);
-    c=*dest & ~mask;
-    for (i=0; i<len+offs+1; i+=sizeof(cell)) {
-      *dest=c | ((*source >> (offs*CHARBITS)) & mask);
-      c=(*source << ((sizeof(cell)-offs)*CHARBITS)) & ~mask;
-      dest++;
-      source++;
-    } /* for */
-    /* set the zero byte in the last cell */
-    mask=(~(ucell)0) >> (((offs+len)%sizeof(cell))*CHARBITS);
-    *(dest-1) &= ~mask;
-  } else {
-    /* source string is unpacked: pack string, from top-down */
-    cell c=0;
-    if (offs!=0) {
-      /* get the last cell in "dest" and mask of the characters that must be changed */
-      cell mask;
-      dest+=offs/sizeof(cell);  /* increment whole number of cells */
-      offs%=sizeof(cell);       /* get remainder */
-      mask=(~(ucell)0) >> (offs*CHARBITS);
-      c=(*dest & ~mask) >> ((sizeof(cell)-offs)*CHARBITS);
-    } /* if */
-    /* for proper alignement, add the offset to both the starting and the ending
-     * criterion (so that the number of iterations stays the same)
-     */
-    assert(offs>=0 && offs<sizeof(cell));
-    for (i=offs; i<len+offs; i++) {
-      c=(c<<CHARBITS) | (*source++ & 0xff);
-      if (i%sizeof(cell)==sizeof(cell)-1) {
-        *dest++=c;
-        c=0;
-      } /* if */
-    } /* for */
-    if (i%sizeof(cell) != 0)    /* store remaining packed characters */
-      *dest=c << (sizeof(cell)-i%sizeof(cell))*CHARBITS;
-    else
-      *dest=0;                  /* store full cell of zeros */
-  } /* if */
-  return AMX_ERR_NONE;
-}
-
-static int amx_StrUnpack(cell *dest,cell *source,int len)
-{
-  /* len excludes the terminating '\0' byte */
-  if ((ucell)*source>UNPACKEDMAX) {
-    /* unpack string, from bottom up (so string can be unpacked in place) */
-    cell c;
-    int i;
-    for (i=len-1; i>=0; i--) {
-      c=source[i/sizeof(cell)] >> (sizeof(cell)-i%sizeof(cell)-1)*CHARBITS;
-      dest[i]=c & UCHAR_MAX;
-    } /* for */
-    dest[len]=0;        /* zero-terminate */
-  } else {
-    /* source string is already unpacked */
-    while (len-->0)
-      *dest++=*source++;
-    *dest=0;
-  } /* if */
-  return AMX_ERR_NONE;
-}
-
-static unsigned char *packedptr(cell *string,int index)
-{
-  unsigned char *ptr=(unsigned char *)(string+index/sizeof(cell));
-  #if BYTE_ORDER==BIG_ENDIAN
-    ptr+=index & (sizeof(cell)-1);
-  #else
-    ptr+=(sizeof(cell)-1) - (index & (sizeof(cell)-1));
-  #endif
-  return ptr;
-}
-
-static cell extractchar(cell *string,int index,int mklower)
-{
-  cell c;
-
-  if ((ucell)*string>UNPACKEDMAX)
-    c=*packedptr(string,index);
-  else
-    c=string[index];
-  if (mklower) {
-    #if defined __WIN32__ || defined _WIN32 || defined WIN32
-      c=(cell)CharLower((LPTSTR)c);
-    #elif defined _Windows
-      c=(cell)AnsiLower((LPSTR)c);
-    #else
-      if ((unsigned int)(c-'A')<26u)
-        c+='a'-'A';
-    #endif
-  } /* if */
-  return c;
-}
-
-/* strlen(const string[])
- */
-static cell AMX_NATIVE_CALL n_strlen(AMX *amx,const cell *params)
-{
-  cell *cptr;
-  int len = 0;
-
-  (void)(amx);
-  cptr=amx_Address(amx,params[1]);
-  amx_StrLen(cptr,&len);
-  return len;
-}
-
-/* strpack(dest[], const source[], maxlength=sizeof dest)
- */
-static cell AMX_NATIVE_CALL n_strpack(AMX *amx,const cell *params)
-{
-  cell *cdest,*csrc;
-  int len,err;
-
-  csrc=amx_Address(amx,params[2]);
-  amx_StrLen(csrc,&len);
-  if ((unsigned)len>params[3]*sizeof(cell)-1)
-    len=params[3]*sizeof(cell)-1;
-
-  cdest=amx_Address(amx,params[1]);
-  err=amx_StrPack(cdest,csrc,len,0);
-  if (err!=AMX_ERR_NONE)
-    return amx_RaiseError(amx,err);
-
-  return len;
-}
-
-/* strunpack(dest[], const source[], maxlength=sizeof dest)
- */
-static cell AMX_NATIVE_CALL n_strunpack(AMX *amx,const cell *params)
-{
-  cell *cdest,*csrc;
-  int len,err;
-
-  csrc=amx_Address(amx,params[2]);
-  amx_StrLen(csrc,&len);
-  assert(len>=0);
-  if (len>=params[3])
-    len=params[3]-1;
-
-  cdest=amx_Address(amx,params[1]);
-  err=amx_StrUnpack(cdest,csrc,len);
-  if (err!=AMX_ERR_NONE)
-    return amx_RaiseError(amx,err);
-
-  return len;
-}
-
-/* strcat(dest[], const source[], maxlength=sizeof dest)
- * packed/unpacked attribute is taken from dest[], or from source[] if dest[]
- * is an empty string.
- */
-static cell AMX_NATIVE_CALL n_strcat(AMX *amx,const cell *params)
-{
-  cell *cdest,*csrc;
-  int len,len2;
-  int packed,err;
-
-  /* calculate number of cells needed for (packed) destination */
-  csrc=amx_Address(amx,params[2]);
-  cdest=amx_Address(amx,params[1]);
-  amx_StrLen(csrc,&len);
-  amx_StrLen(cdest,&len2);
-  packed=(*cdest==0) ? ((ucell)*csrc>UNPACKEDMAX) : ((ucell)*cdest>UNPACKEDMAX);
-  if (packed) {
-    if ((unsigned)(len+len2)>params[3]*sizeof(cell)-1)
-      len=params[3]*sizeof(cell)-len2-1;
-  } else {
-    if (len+len2>params[3]-1)
-      len=params[3]-len2-1;
-  } /* if */
-
-  if (packed) {
-    err=amx_StrPack(cdest,csrc,len,len2);
-  } else {
-    /* destination string must either be unpacked, or empty */
-    assert((ucell)*cdest<=UNPACKEDMAX || len2==0);
-    err=amx_StrUnpack(cdest+len2,csrc,len);
-  } /* if */
-  if (err!=AMX_ERR_NONE)
-    return amx_RaiseError(amx,err);
-
-  return len;
-}
-
-/* strcopy(dest[], const source[], maxlength=sizeof dest)
- * packed/unpacked attribute from source[]
- */
-static cell AMX_NATIVE_CALL n_strcopy(AMX *amx,const cell *params)
-{
-  cell *cdest,*csrc;
-  int len,packed,err;
-
-  /* calculate number of cells needed for (packed) destination */
-  csrc=amx_Address(amx,params[2]);
-  cdest=amx_Address(amx,params[1]);
-  amx_StrLen(csrc,&len);
-  packed=(ucell)*csrc>UNPACKEDMAX;
-  if (packed) {
-    if ((unsigned)len>params[3]*sizeof(cell)-1)
-      len=params[3]*sizeof(cell)-1;
-  } else {
-    if (len>params[3]-1)
-      len=params[3]-1;
-  } /* if */
-
-  if (packed)
-    err=amx_StrPack(cdest,csrc,len,0);
-  else
-    err=amx_StrUnpack(cdest,csrc,len);
-  if (err!=AMX_ERR_NONE)
-    return amx_RaiseError(amx,err);
-
-  return len;
-}
-
-static int compare(cell *cstr1,cell *cstr2,int ignorecase,int length,int offs1)
-{
-  int index;
-  cell c1=0,c2=0;
-
-  for (index=0; index<length; index++) {
-    c1=extractchar(cstr1,index+offs1,ignorecase);
-    c2=extractchar(cstr2,index,ignorecase);
-    assert(c1!=0 && c2!=0); /* string lengths are already checked, so zero-bytes should not occur */
-    if (c1!=c2)
-      break;
-  } /* for */
-
-  if (c1<c2)
-    return -1;
-  if (c1>c2)
-    return 1;
-  return 0;
-}
-
-/* strcmp(const string1[], const string2[], bool:ignorecase=false, length=cellmax)
- */
-static cell AMX_NATIVE_CALL n_strcmp(AMX *amx,const cell *params)
-{
-  cell *cstr1,*cstr2;
-  int len1,len2,len;
-  cell result;
-
-  (void)(amx);
-  cstr1=amx_Address(amx,params[1]);
-  cstr2=amx_Address(amx,params[2]);
-
-  /* get the maximum length to compare */
-  amx_StrLen(cstr1,&len1);
-  amx_StrLen(cstr2,&len2);
-  len=len1;
-  if (len>len2)
-    len=len2;
-  if (len>params[4])
-    len=params[4];
-  if (len==0)
-    return (params[4]==0) ? 0 : len1-len2;
-
-  result=compare(cstr1,cstr2,params[3],len,0);
-  if (result==0 && len!=params[4])
-    result=len1-len2;
-  return result;
-}
-
-/* strfind(const string[], const sub[], bool:ignorecase=false, offset=0)
- */
-static cell AMX_NATIVE_CALL n_strfind(AMX *amx,const cell *params)
-{
-  cell *cstr,*csub;
-  int lenstr,lensub,offs;
-  cell c,f;
-
-  (void)(amx);
-  cstr=amx_Address(amx,params[1]);
-  csub=amx_Address(amx,params[2]);
-
-  /* get the maximum length to compare */
-  amx_StrLen(cstr,&lenstr);
-  amx_StrLen(csub,&lensub);
-  if (lensub==0)
-    return -1;
-
-  /* get the start character of the substring, for quicker searching */
-  f=extractchar(csub,0,params[3]);
-  assert(f!=0);         /* string length is already checked */
-
-  for (offs=(int)params[4]; offs+lensub<=lenstr; offs++) {
-    /* find the initial character */
-    c=extractchar(csub,0,params[3]);
-    assert(c!=0);      /* string length is already checked */
-    if (c!=f)
-      continue;
-    if (compare(cstr,csub,params[3],lensub,offs)==0)
-      return offs;
-  } /* for */
-  return -1;
-}
-
-/* strmid(dest[], const source[], start, end, maxlength=sizeof dest)
- * packed/unpacked attribute is taken from source[]
- */
-static cell AMX_NATIVE_CALL n_strmid(AMX *amx,const cell *params)
-{
-  cell *cdest,*csrc;
-  int len,err;
-  int soffs,doffs;
-  unsigned char *ptr;
-  unsigned char c;
-  int start=params[3];
-  int end=params[4];
-
-  /* calculate number of cells needed for (packed) destination */
-  csrc=amx_Address(amx,params[2]);
-  cdest=amx_Address(amx,params[1]);
-  amx_StrLen(csrc,&len);
-
-  /* clamp the start/end parameters */
-  if (start<0)
-    start=0;
-  else if (start>len)
-    start=len;
-  if (end<start)
-    end=start;
-  else if (end>len)
-    end=len;
-
-  len=end-start;
-  if ((ucell)*csrc>UNPACKEDMAX) {
-    if ((unsigned)len>params[5]*sizeof(cell)-1)
-      len=params[5]*sizeof(cell)-1;
-  } else {
-    if (len>params[5]-1)
-      len=params[5]-1;
-  } /* if */
-
-  if ((ucell)*csrc>UNPACKEDMAX) {
-    /* first align the source to a cell boundary */
-    for (doffs=0,soffs=start; (soffs & (sizeof(cell)-1))!=0 && len>0; soffs++,doffs++,len--) {
-      ptr=packedptr(csrc,soffs);
-      c=*ptr;
-      ptr=packedptr(cdest,doffs);
-      *ptr=c;
-    } /* for */
-    if (len==0) {
-      /* nothing left to do, zero-terminate */
-      ptr=packedptr(cdest,doffs);
-      *ptr='\0';
-      err=AMX_ERR_NONE;
-    } else {
-      err=amx_StrPack(cdest,csrc+soffs/sizeof(cell),len,doffs);
-    } /* if */
-  } else {
-    err=amx_StrUnpack(cdest,csrc+start,len);
-  } /* if */
-  if (err!=AMX_ERR_NONE)
-    return amx_RaiseError(amx,err);
-
-  return len;
-}
-
-/* strdel(string[], start, end)
- */
-static cell AMX_NATIVE_CALL n_strdel(AMX *amx,const cell *params)
-{
-  cell *cstr;
-  int index,offs,length;
-  unsigned char *ptr;
-  unsigned char c;
-
-  (void)(amx);
-  /* calculate number of cells needed for (packed) destination */
-  cstr=amx_Address(amx,params[1]);
-  amx_StrLen(cstr,&length);
-  index=(int)params[2];
-  offs=(int)params[3]-index;
-  if (index>=length || offs<=0)
-    return 0;
-  if (index+offs>length)
-    offs=length-index;
-
-  index--;  /* prepare for increment in the top of the loop */
-  if (((ucell)*cstr>UNPACKEDMAX)) {
-    do {
-      index++;
-      ptr=packedptr(cstr,index+offs);
-      c=*ptr;
-      ptr=packedptr(cstr,index);
-      *ptr=c;
-    } while (c!='\0');
-    if (index==0)
-      *cstr=0;
-  } else {
-    do {
-      index++;
-      cstr[index]=cstr[index+offs];
-    } while (cstr[index]!=0);
-  } /* if */
-
-  return 1;
-}
-
-/* strins(string[], const substr[], offset, maxlength=sizeof string)
- */
-static cell AMX_NATIVE_CALL n_strins(AMX *amx,const cell *params)
-{
-  cell *cstr,*csub;
-  int index,lenstr,lensub,count;
-  unsigned char *ptr;
-  cell c;
-
-  /* calculate number of cells needed for (packed) destination */
-  cstr=amx_Address(amx,params[1]);
-  csub=amx_Address(amx,params[2]);
-  amx_StrLen(cstr,&lenstr);
-  amx_StrLen(csub,&lensub);
-  index=(int)params[3];
-  if (index>lenstr)
-    return amx_RaiseError(amx,AMX_ERR_NATIVE);
-
-  if (*cstr==0) {
-    /* current string is empty (and the insertion point is zero), just make a copy */
-    assert(index==0);
-    if ((ucell)*csub>UNPACKEDMAX)
-      amx_StrPack(cstr,csub,lensub,0);
-    else
-      amx_StrUnpack(cstr,csub,lensub);
-    return 1;
-  } /* if */
-
-  if (((ucell)*cstr>UNPACKEDMAX)) {
-    /* make room for the new characters */
-    for (count=lenstr+lensub; count>index; count--) {
-      ptr=packedptr(cstr,count-lensub);
-      c=*ptr;
-      ptr=packedptr(cstr,count);
-      *ptr=(unsigned char)c;
-    } /* for */
-    /* copy in the new characters */
-    for (count=0; count<lensub; count++) {
-      c=extractchar(csub,count,0);
-      ptr=packedptr(cstr,index+count);
-      *ptr=(unsigned char)c;
-    } /* for */
-  } else {
-    /* make room for the new characters */
-    for (count=lenstr+lensub; count>index; count--)
-      cstr[count]=cstr[count-lensub];
-    /* copy in the new characters */
-    for (count=0; count<lensub; count++) {
-      c=extractchar(csub,count,0);
-      cstr[index+count]=c;
-    } /* for */
-  } /* if */
-
-  return 1;
-}
-
-/* strval(const string[], index=0)
- */
-static cell AMX_NATIVE_CALL n_strval(AMX *amx,const cell *params)
-{
-  TCHAR str[50],*ptr;
-  cell *cstr,result;
-  int len,negate=0;
-  int offset=0;
-
-  (void)(amx);
-  /* get parameters */
-  cstr=amx_Address(amx,params[1]);
-  amx_StrLen(cstr,&len);
-  if ((unsigned)params[0]>=2*sizeof(cell))
-    offset=params[2];
-  if (offset<0)
-    offset=0;
-  else if (offset>=len)
-    offset=len-1;
-
-  /* skip a number of cells */
-  if ((ucell)*cstr>UNPACKEDMAX) {
-    /* packed string */
-    while (offset>=(int)sizeof(cell)) {
-      cstr++;
-      offset-=sizeof(cell);
-      len-=sizeof(cell);
-    } /* while */
-  } else {
-    /* unpacked string, one character per cell */
-    while (offset>0) {
-      cstr++;
-      offset--;
-      len--;
-    } /* while */
-  } /* if */
-
-  amx_GetString(str,cstr,sizeof(TCHAR)>1,sizeof str);
-  assert(offset<(int)sizeof(cell) && offset>=0);
-  ptr=str+offset;
-  result=0;
-  while (*ptr!='\0' && *ptr<=' ')
-    ptr++;              /* skip whitespace */
-  if (*ptr=='-') {      /* handle sign */
-    negate=1;
-    ptr++;
-  } else if (*ptr=='+') {
-    ptr++;
-  } /* if */
-  while (isdigit(*ptr)) {
-    result=result*10 + (*ptr-'0');
-    ptr++;
-  } /* while */
-  if (negate)
-    result=-result;
-  return result;
-}
-
-/* valstr(dest[], value, bool:pack=false) */
-static cell AMX_NATIVE_CALL n_valstr(AMX *amx,const cell *params)
-{
-  TCHAR str[50];
-  cell value,temp;
-  cell *cstr;
-  int len,result,negate=0;
-
-  (void)(amx);
-  /* find out how many digits are needed */
-  len=1;
-  value=params[2];
-  if (value<0) {
-    negate=1;
-    len++;
-    value=-value;
-  } /* if */
-  for (temp=value; temp>=10; temp/=10)
-    len++;
-  assert(len<=sizearray(str));
-
-  /* put in the string */
-  result=len;
-  str[len--]='\0';
-  while (len>=negate) {
-    str[len--]=(char)((value % 10)+'0');
-    value/=10;
-  } /* while */
-  if (negate)
-    str[0]='-';
-  cstr=amx_Address(amx,params[1]);
-  amx_SetString(cstr,str,params[3],sizeof(TCHAR)>1,sizearray(str));
-  return result;
-}
-
-/* ispacked(const string[]) */
-static cell AMX_NATIVE_CALL n_ispacked(AMX *amx,const cell *params)
-{
-  cell *cstr=amx_Address(amx,params[1]);
-  (void)(amx);
-  return *cstr>=UNPACKEDMAX;
-}
-
-
-/* single character decode and encode */
-#define BITMASK 0x3f
-#define DEC(c)  (((c) - ' ') & BITMASK)
-#define ENC(c)  (char)(((c) & BITMASK) == 0 ? 0x60 : ((c) & BITMASK) + ' ')
-
-static int uudecode(unsigned char *target, char *source)
-{
-  int len, retval;
-
-  len = DEC(*source++);
-  retval = len;
-  while (len > 0) {
-    if (len-- > 0)
-      *target++ = (unsigned char)(( DEC(source[0]) << 2 ) | ( DEC(source[1]) >> 4 ));
-    if (len-- > 0)
-      *target++ = (unsigned char)(( DEC(source[1]) << 4 ) | ( DEC(source[2]) >> 2 ));
-    if (len-- > 0)
-      *target++ = (unsigned char)(( DEC(source[2]) << 6 ) | DEC(source[3]) );
-    source += 4;
-  } /* while */
-  return retval;
-}
-
-static int uuencode(char *target, unsigned char *source, int length)
-{
-  int split[4]={0,0,0,0};
-
-  if (length > BITMASK)
-    return 0;                           /* can encode up to 64 bytes */
-
-  *target++ = ENC(length);
-  while (length > 0) {
-    split[0] = source[0] >> 2;          /* split first byte to char. 0 & 1 */
-    split[1] = source[0] << 4;
-    if (length > 1) {
-      split[1] |= source[1] >> 4;       /* split 2nd byte to char. 1 & 2 */
-      split[2] = source[1] << 2;
-      if (length > 2) {
-        split[2] |= source[2] >> 6;     /* split 3th byte to char. 2 & 3 */
-        split[3] = source[2];
-      } /* if */
-    } /* if */
-
-    *target++ = ENC(split[0]);
-    *target++ = ENC(split[1]);
-    if (length > 1)
-      *target++ = ENC(split[2]);
-    if (length > 2)
-      *target++ = ENC(split[3]);
-    source += 3;
-    length -= 3;
-  } /* while */
-
-  *target = '\0';                       /* end string */
-  return 1;
-}
-
-/* uudecode(dest[], const source[], maxlength=sizeof dest)
- * Returns the number of bytes (not cells) decoded; if the dest buffer is
- * too small, not all bytes are stored.
- * Always creates a (packed) array (not a string; the array is not
- * zero-terminated).
- * A buffer may be decoded "in-place"; the destination size is always smaller
- * than the source size.
- * Endian issues (for multi-byte values in the data stream) are not handled.
- */
-static cell AMX_NATIVE_CALL n_uudecode(AMX *amx,const cell *params)
-{
-  cell *cstr;
-  unsigned char dst[BITMASK+2];
-  char src[BITMASK+BITMASK/3+2];
-  int len;
-  size_t size;
-
-  (void)(amx);
-  /* get the source */
-  cstr=amx_Address(amx,params[2]);
-  amx_GetString(src,cstr,0,sizeof src);
-  /* decode */
-  len=uudecode(dst,src);
-  /* store */
-  cstr=amx_Address(amx,params[1]);
-  size=len;
-  if (size>params[3]*sizeof(cell))
-    size=params[3]*sizeof(cell);
-  memcpy(cstr,dst,size);
-  return len;
-}
-
-/* uuencode(dest[], const source[], numbytes, maxlength=sizeof dest)
- * Returns the number of characters encoded, excluding the zero string
- * terminator; if the dest buffer is too small, not all bytes are stored.
- * Always creates a packed string. This string has a newline character at the
- * end. A buffer may be encoded "in-place" if the destination is large enough.
- * Endian issues (for multi-byte values in the data stream) are not handled.
- */
-static cell AMX_NATIVE_CALL n_uuencode(AMX *amx,const cell *params)
-{
-  cell *cstr;
-  unsigned char src[BITMASK+2];
-  char dst[BITMASK+BITMASK/3+2];
-
-  (void)(amx);
-  /* get the source */
-  cstr=amx_Address(amx,params[2]);
-  amx_GetString((char *)src,cstr,0,sizeof src);
-  /* encode (and check for errors) */
-  if (uuencode(dst,src,params[3])) {
-    if (params[4]>0) {
-      cstr=amx_Address(amx,params[1]);
-      *cstr=0;
-    } /* if */
-    return 0;
-  } /* if */
-  /* always add a \n */
-  assert(strlen(dst)+1<sizeof dst);
-  strcat(dst,"\n");
-  /* store */
-  cstr=amx_Address(amx,params[1]);
-  amx_SetString(cstr,dst,1,0,params[4]);
-  return (((params[3]+2)/3) << 2)+2;
-}
-
-/* urldecode(dest[], const source[], maxlength=sizeof dest, bool:pack=false)
- * Returns the number of characters decoded; if the dest buffer is
- * too small, not all bytes are stored.
- * A buffer may be decoded "in-place"; the destination size is always
- * smaller than the source size.
- */
-static cell AMX_NATIVE_CALL n_urldecode(AMX *amx,const cell *params)
-{
-  cell *cstr;
-  TCHAR *str;
-  int idx_src=0,idx_dst=0;
-
-  /* get the source */
-  (void)(amx);
-  amx_StrParam(amx,params[2],str);
-
-  /* decode */
-  while (idx_src!='\0') {
-    assert(idx_dst<=idx_src);
-    if (str[idx_src]=='%') {
-      int p,q;
-      if (str[idx_src+1]>='0' && str[idx_src+1]<='9')
-        p=str[idx_src+1]-'0';
-      else if (str[idx_src+1]>='A' && str[idx_src+1]<='F')
-        p=str[idx_src+1]-'A'+10;
-      else if (str[idx_src+1]>='a' && str[idx_src+1]<='f')
-        p=str[idx_src+1]-'a'+10;
-      else
-        p=-1;
-      if (p>=0) {
-        if (str[idx_src+2]>='0' && str[idx_src+2]<='9')
-          q=str[idx_src+2]-'0';
-        else if (str[idx_src+2]>='A' && str[idx_src+2]<='F')
-          q=str[idx_src+2]-'A'+10;
-        else if (str[idx_src+2]>='a' && str[idx_src+2]<='f')
-          q=str[idx_src+2]-'a'+10;
-        else
-          q=-1;
-      } /* if */
-      if (p>=0 && q >=0) {
-        assert(p<=15 && q<=15);
-        str[idx_dst]=(TCHAR)((p<<4) | q);
-        idx_src+=3;
-      } else {
-        /* invalid '%xx' syntax, copy literal '%' */
-        str[idx_dst]=str[idx_src++];
-      } /* if */
-    } else {
-      str[idx_dst]=str[idx_src++];
-    } /* if */
-    idx_dst++;
-  } /* while */
-  str[idx_dst]='\0';
-
-  /* store */
-  cstr=amx_Address(amx,params[1]);
-  amx_SetString(cstr,str,1,0,params[4]); /* store as packed ot unpacked */
-
-  return idx_dst;
-}
-
-#define INVALIDURI(c) ((c)<','               \
-                       || (c)>'9' && (c)<'A' \
-                       || (c)>'Z' && (c)<'_' \
-                       || (c)>'_' && (c)<'a' \
-                       || (c)>'z' && (unsigned)(c)<0xa1)
-
-#define TOHEX(c)      (TCHAR)((c)<10 ? '0'+(c) : 'A'-10+(c))
-
-/* urlencode(dest[], const source[], maxlength=sizeof dest, bool:pack=false)
- * Returns the number of characters encoded, excluding the zero string
- * terminator; if the dest buffer is too small, not all bytes are stored.
- * Always creates a packed string. This string has a newline character at the
- * end. A buffer may be encoded "in-place" if the destination is large enough.
- * Endian issues (for multi-byte values in the data stream) are not handled.
- */
-static cell AMX_NATIVE_CALL n_urlencode(AMX *amx,const cell *params)
-{
-  cell *cstr;
-  int length,destlen,count,lastwidth;
-  TCHAR *str;
-
-  /* allocate memory and get the source */
-  (void)(amx);
-  if ((length=(int)params[3])==0)
-    return 0;
-  if ((str = (TCHAR*)alloca(length * sizeof(TCHAR)))==NULL)
-    return 0;
-  cstr=amx_Address(amx,params[2]);
-  amx_GetString((char*)str, cstr, sizeof(TCHAR)>1, length);
-
-  /* run through the string and determine the new length */
-  destlen=1;  /* space for the '\0' terminator */
-  lastwidth=0;
-  for (count=0; str[count]!='\0' && destlen<length; count++) {
-    if (INVALIDURI(str[count]))
-      lastwidth=3;
-    else
-      lastwidth=1;
-    destlen+=lastwidth;
-  } /* for */
-  if (destlen>length) {   /* correct for overrun */
-    destlen-=lastwidth;
-    count--;
-  } /* if */
-  assert(destlen<=length);
-  assert(count>=0);
-
-  /* store string terminator */
-  assert(destlen>0);
-  str[--destlen]='\0';
-  /* convert string from end to start */
-  while (--count>=0) {
-    assert(destlen>count);
-    if (INVALIDURI(str[count])) {
-      str[--destlen]=TOHEX(str[count] & 0x0f);
-      str[--destlen]=TOHEX((str[count] >> 4) & 0x0f);
-      str[--destlen]='%';
-    } else {
-      str[--destlen]=str[count];
-    } /* if */
-  } /* while */
-  assert(destlen==0);
-
-  /* store the result */
-  cstr=amx_Address(amx,params[1]);
-  amx_SetString(cstr,str,1,0,params[4]); /* store as packed ot unpacked */
-
-  return (cell)strlen(str);
-}
-
-/* memcpy(dest[], const source[], index=0, numbytes, maxlength=sizeof dest)
- * This function can align byte strings in cell arrays, or concatenate two
- * byte strings in two arrays. The parameter "index" is a byte offset; "numbytes"
- * is the number of bytes to copy. Parameter "maxlength", however, is in cells.
- * This function allows copying in-place, for aligning memory buffers.
- * Endian issues (for multi-byte values in the data stream) are not handled.
- */
-static cell AMX_NATIVE_CALL n_memcpy(AMX *amx,const cell *params)
-{
-  cell *cdest,*csrc;
-  unsigned char *pdest,*psrc;
-
-  (void)(amx);
-  if (params[3]<0 || params[4]<0 || (params[3]+params[4])>params[5]*(int)sizeof(cell))
-    return 0;
-  cdest=amx_Address(amx,params[1]);
-  csrc=amx_Address(amx,params[2]);
-  pdest=(unsigned char*)cdest+params[3];
-  psrc=(unsigned char*)csrc;
-  memmove(pdest,psrc,params[4]);
-  return 1;
-}
-
-#if !defined AMX_NOSTRFMT
-  static int str_putstr(void *dest,const TCHAR *str)
-  {
-    if (_tcslen((TCHAR*)dest)+_tcslen(str)<MAX_FORMATSTR)
-      _tcscat((TCHAR*)dest,str);
-    return 0;
-  }
-
-  static int str_putchar(void *dest,TCHAR ch)
-  {
-    int len=(int)_tcslen((TCHAR*)dest);
-    if (len<MAX_FORMATSTR-1) {
-      ((TCHAR*)dest)[len]=ch;
-      ((TCHAR*)dest)[len+1]='\0';
-    } /* if */
-    return 0;
-  }
-#endif
-
-/* strformat(dest[], size=sizeof dest, bool:pack=false, const format[], {Fixed,_}:...)
- */
-static cell AMX_NATIVE_CALL n_strformat(AMX *amx,const cell *params)
-{
-  #if defined AMX_NOSTRFMT
-    (void)amx;
-    (void)params;
-    return 0;
-  #else
-    cell *cstr;
-    AMX_FMTINFO info;
-    TCHAR output[MAX_FORMATSTR];
-
-    memset(&info,0,sizeof info);
-    info.params=params+5;
-    info.numparams=(int)(params[0]/sizeof(cell))-4;
-    info.skip=0;
-    info.length=MAX_FORMATSTR;  /* max. length of the string */
-    info.f_putstr=str_putstr;
-    info.f_putchar=str_putchar;
-    info.user=output;
-    output[0] = __T('\0');
-
-    cstr=amx_Address(amx,params[4]);
-    amx_printstring(amx,cstr,&info);
-
-    /* store the output string */
-    cstr=amx_Address(amx,params[1]);
-    amx_SetString(cstr,(char*)output,(int)params[3],sizeof(TCHAR)>1,(int)params[2]);
-    return 1;
-  #endif
-}
-
-
-#if defined __cplusplus
-  extern "C"
-#endif
-const AMX_NATIVE_INFO string_Natives[] = {
-  { "ispacked",  n_ispacked },
-  { "memcpy",    n_memcpy },
-  { "strcat",    n_strcat },
-  { "strcmp",    n_strcmp },
-  { "strcopy",   n_strcopy },
-  { "strdel",    n_strdel },
-  { "strfind",   n_strfind },
-  { "strformat", n_strformat },
-  { "strins",    n_strins },
-  { "strlen",    n_strlen },
-  { "strmid",    n_strmid },
-  { "strpack",   n_strpack },
-  { "strunpack", n_strunpack },
-  { "strval",    n_strval },
-  { "uudecode",  n_uudecode },
-  { "uuencode",  n_uuencode },
-  { "urldecode", n_urldecode },
-  { "urlencode", n_urlencode },
-  { "valstr",    n_valstr },
-  { NULL, NULL }        /* terminator */
-};
-
-int AMXEXPORT AMXAPI amx_StringInit(AMX *amx)
-{
-  return amx_Register(amx, string_Natives, -1);
-}
-
-int AMXEXPORT AMXAPI amx_StringCleanup(AMX *amx)
-{
-  (void)amx;
-  return AMX_ERR_NONE;
-}
diff --git a/apps/openmw-mp/amx/amxtime.c b/apps/openmw-mp/amx/amxtime.c
deleted file mode 100644
index f4969d2d1..000000000
--- a/apps/openmw-mp/amx/amxtime.c
+++ /dev/null
@@ -1,480 +0,0 @@
-/*  Date/time module for the Pawn Abstract Machine
- *
- *  Copyright (c) ITB CompuPhase, 2001-2013
- *
- *  Licensed under the Apache License, Version 2.0 (the "License"); you may not
- *  use this file except in compliance with the License. You may obtain a copy
- *  of the License at
- *
- *      http://www.apache.org/licenses/LICENSE-2.0
- *
- *  Unless required by applicable law or agreed to in writing, software
- *  distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
- *  WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the
- *  License for the specific language governing permissions and limitations
- *  under the License.
- *
- *  Version: $Id: amxtime.c 4983 2013-10-21 07:32:57Z  $
- */
-#include <time.h>
-#include <assert.h>
-#include "amx.h"
-#if defined __WIN32__ || defined _WIN32 || defined _Windows
-  #include <windows.h>
-  #include <mmsystem.h>
-#endif
-
-#define CELLMIN   (-1 << (8*sizeof(cell) - 1))
-
-#define SECONDS_PER_MINUTE  60
-#define SECONDS_PER_HOUR    3600
-#define SECONDS_PER_DAY     86400
-#define SECONDS_PER_YEAR    31556952    /* based on 365.2425 days per year */
-
-#if !defined CLOCKS_PER_SEC
-  #define CLOCKS_PER_SEC CLK_TCK
-#endif
-#if defined __WIN32__ || defined _WIN32 || defined WIN32
-  static int timerset = 0;
-  /* timeGetTime() is more accurate on WindowsNT if timeBeginPeriod(1) is set */
-  #define INIT_TIMER()    \
-    if (!timerset) {      \
-      timeBeginPeriod(1); \
-      timerset=1;         \
-    }
-#else
-  #define INIT_TIMER()
-#endif
-static unsigned long timestamp;
-static unsigned long timelimit;
-static int timerepeat;
-
-static const unsigned char monthdays[12] = { 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 };
-
-static int wrap(int value, int min, int max)
-{
-  if (value<min)
-    value=max;
-  else if (value>max)
-    value=min;
-  return value;
-}
-
-static unsigned long gettimestamp(void)
-{
-  unsigned long value;
-
-  #if defined __WIN32__ || defined _WIN32 || defined WIN32
-    value=timeGetTime();        /* this value is already in milliseconds */
-  #elif defined __linux || defined __linux__ || defined __LINUX__ || defined __APPLE__
-    struct timeval tv;
-    gettimeofday(&tv, NULL);
-    value = ((tv.tv_sec * 1000) + (tv.tv_usec / 1000));
-  #else
-    value=clock();
-    #if CLOCKS_PER_SEC<1000
-      /* convert to milliseconds */
-      value=(cell)((1000L * value) / CLOCKS_PER_SEC);
-    #elif CLOCKS_PER_SEC>1000
-      /* convert to milliseconds */
-      value=(cell)(value/(CLOCKS_PER_SEC/1000));
-    #endif
-  #endif
-  return value;
-}
-
-void stamp2datetime(unsigned long sec1970,
-                    int *year, int *month, int *day,
-                    int *hour, int *minute, int *second)
-{
-  int days, seconds;
-
-  /* find the year */
-  assert(year!=NULL);
-  for (*year = 1970; ; *year += 1) {
-    days = 365 + ((*year & 0x03) == 0); /* clumsy "leap-year" routine, fails for 2100 */
-    seconds = days * SECONDS_PER_DAY;
-    if ((unsigned long)seconds > sec1970)
-      break;
-    sec1970 -= seconds;
-  } /* if */
-
-  /* find the month */
-  assert(month!=NULL);
-  for (*month = 1; ; *month += 1) {
-    days = monthdays[*month - 1];
-    seconds = days * SECONDS_PER_DAY;
-    if ((unsigned long)seconds > sec1970)
-      break;
-    sec1970 -= seconds;
-  } /* if */
-
-  /* find the day */
-  assert(day!=NULL);
-  for (*day = 1; sec1970 >= SECONDS_PER_DAY; *day += 1)
-    sec1970 -= SECONDS_PER_DAY;
-
-  /* find the hour */
-  assert(hour!=NULL);
-  for (*hour = 0; sec1970 >= SECONDS_PER_HOUR; *hour += 1)
-    sec1970 -= SECONDS_PER_HOUR;
-
-  /* find the minute */
-  assert(minute!=NULL);
-  for (*minute = 0; sec1970 >= SECONDS_PER_MINUTE; *minute += 1)
-    sec1970 -= SECONDS_PER_MINUTE;
-
-  /* remainder is the number of seconds */
-  assert(second!=NULL);
-  *second = (int)sec1970;
-}
-
-static void settime(cell hour,cell minute,cell second)
-{
-  #if defined __WIN32__ || defined _WIN32 || defined WIN32
-    SYSTEMTIME systim;
-
-    GetLocalTime(&systim);
-    if (hour!=CELLMIN)
-      systim.wHour=(WORD)wrap((int)hour,0,23);
-    if (minute!=CELLMIN)
-      systim.wMinute=(WORD)wrap((int)minute,0,59);
-    if (second!=CELLMIN)
-      systim.wSecond=(WORD)wrap((int)second,0,59);
-    SetLocalTime(&systim);
-  #else
-    /* Linux/Unix (and some DOS compilers) have stime(); on Linux/Unix, you
-     * must have "root" permission to call stime(); many POSIX systems will
-     * have settimeofday() instead
-     */
-    time_t sec1970;
-    struct tm gtm;
-    #if defined __APPLE__ /* also valid for other POSIX systems */
-      struct timeval tv;
-    #endif
-
-    time(&sec1970);
-    gtm=*localtime(&sec1970);
-    if (hour!=CELLMIN)
-      gtm.tm_hour=wrap((int)hour,0,23);
-    if (minute!=CELLMIN)
-      gtm.tm_min=wrap((int)minute,0,59);
-    if (second!=CELLMIN)
-      gtm.tm_sec=wrap((int)second,0,59);
-    sec1970=mktime(&gtm);
-    #if defined __APPLE__ /* also valid for other POSIX systems */
-      tv.tv_sec = sec1970;
-      tv.tv_usec = 0;
-      settimeofday(&tv, 0);
-    #else
-      stime(&sec1970);
-    #endif
-  #endif
-}
-
-static void setdate(cell year,cell month,cell day)
-{
-  int maxday;
-
-  #if defined __WIN32__ || defined _WIN32 || defined WIN32
-    SYSTEMTIME systim;
-
-    GetLocalTime(&systim);
-    if (year!=CELLMIN)
-      systim.wYear=(WORD)wrap((int)year,1970,2099);
-    if (month!=CELLMIN)
-      systim.wMonth=(WORD)wrap((int)month,1,12);
-    maxday=monthdays[systim.wMonth - 1];
-    if (systim.wMonth==2 && ((systim.wYear % 4)==0 && ((systim.wYear % 100)!=0 || (systim.wYear % 400)==0)))
-      maxday++;
-    if (day!=CELLMIN)
-      systim.wDay=(WORD)wrap((int)day,1,maxday);
-    SetLocalTime(&systim);
-  #else
-    /* Linux/Unix (and some DOS compilers) have stime(); on Linux/Unix, you
-     * must have "root" permission to call stime(); many POSIX systems will
-     * have settimeofday() instead
-     */
-    time_t sec1970;
-    struct tm gtm;
-    #if defined __APPLE__ /* also valid for other POSIX systems */
-      struct timeval tv;
-    #endif
-
-    time(&sec1970);
-    gtm=*localtime(&sec1970);
-    if (year!=CELLMIN)
-      gtm.tm_year=year-1900;
-    if (month!=CELLMIN)
-      gtm.tm_mon=month-1;
-    if (day!=CELLMIN)
-      gtm.tm_mday=day;
-    sec1970=mktime(&gtm);
-    #if defined __APPLE__ /* also valid for other POSIX systems */
-      tv.tv_sec = sec1970;
-      tv.tv_usec = 0;
-      settimeofday(&tv, 0);
-    #else
-      stime(&sec1970);
-    #endif
-  #endif
-}
-
-
-/* settime(hour, minute, second)
- * Always returns 0
- */
-static cell AMX_NATIVE_CALL n_settime(AMX *amx, const cell *params)
-{
-  (void)amx;
-  settime(params[1],params[2],params[3]);
-  return 0;
-}
-
-/* gettime(&hour, &minute, &second)
- * The return value is the number of seconds since 1 January 1970 (Unix system
- * time).
- */
-static cell AMX_NATIVE_CALL n_gettime(AMX *amx, const cell *params)
-{
-  time_t sec1970;
-  struct tm gtm;
-  cell *cptr;
-
-  assert(params[0]==(int)(3*sizeof(cell)));
-
-  time(&sec1970);
-
-  /* on DOS/Windows, the timezone is usually not set for the C run-time
-   * library; in that case gmtime() and localtime() return the same value
-   */
-  gtm=*localtime(&sec1970);
-  cptr=amx_Address(amx,params[1]);
-  *cptr=gtm.tm_hour;
-  cptr=amx_Address(amx,params[2]);
-  *cptr=gtm.tm_min;
-  cptr=amx_Address(amx,params[3]);
-  *cptr=gtm.tm_sec;
-
-  /* the time() function returns the number of seconds since January 1 1970
-   * in Universal Coordinated Time (the successor to Greenwich Mean Time)
-   */
-  return (cell)sec1970;
-}
-
-/* setdate(year, month, day)
- * Always returns 0
- */
-static cell AMX_NATIVE_CALL n_setdate(AMX *amx, const cell *params)
-{
-  (void)amx;
-  setdate(params[1],params[2],params[3]);
-  return 0;
-}
-
-/* getdate(&year, &month, &day)
- * The return value is the number of days since the start of the year. January
- * 1 is day 1 of the year.
- */
-static cell AMX_NATIVE_CALL n_getdate(AMX *amx, const cell *params)
-{
-  time_t sec1970;
-  struct tm gtm;
-  cell *cptr;
-
-  assert(params[0]==(int)(3*sizeof(cell)));
-
-  time(&sec1970);
-
-  gtm=*localtime(&sec1970);
-  cptr=amx_Address(amx,params[1]);
-  *cptr=gtm.tm_year+1900;
-  cptr=amx_Address(amx,params[2]);
-  *cptr=gtm.tm_mon+1;
-  cptr=amx_Address(amx,params[3]);
-  *cptr=gtm.tm_mday;
-
-  return gtm.tm_yday+1;
-}
-
-/* tickcount(&granularity)
- * Returns the number of milliseconds since start-up. For a 32-bit cell, this
- * count overflows after approximately 24 days of continuous operation.
- */
-static cell AMX_NATIVE_CALL n_tickcount(AMX *amx, const cell *params)
-{
-  cell *cptr;
-
-  assert(params[0]==(int)sizeof(cell));
-
-  INIT_TIMER();
-  cptr=amx_Address(amx,params[1]);
-  #if defined __WIN32__ || defined _WIN32 || defined WIN32
-    *cptr=1000;                 /* granularity = 1 ms */
-  #else
-    *cptr=(cell)CLOCKS_PER_SEC; /* in Unix/Linux, this is often 100 */
-  #endif
-  return gettimestamp() & 0x7fffffff;
-}
-
-/* delay(milliseconds)
- * Pauses for (at least) the requested number of milliseconds.
- */
-static cell AMX_NATIVE_CALL n_delay(AMX *amx, const cell *params)
-{
-  unsigned long stamp;
-
-  (void)amx;
-  assert(params[0]==(int)sizeof(cell));
-
-  INIT_TIMER();
-  stamp=gettimestamp();
-  while (gettimestamp()-stamp < (unsigned long)params[1])
-    /* nothing */;
-  return 0;
-}
-
-/* settimer(milliseconds, bool: singleshot = false)
- * Sets the delay until the @timer() callback is called. The timer may either
- * be single-shot or repetitive.
- */
-static cell AMX_NATIVE_CALL n_settimer(AMX *amx, const cell *params)
-{
-  (void)amx;
-  assert(params[0]==(int)(2*sizeof(cell)));
-  timestamp=gettimestamp();
-  timelimit=params[1];
-  timerepeat=(int)(params[2]==0);
-  return 0;
-}
-
-/* bool: gettimer(&milliseconds, bool: &singleshot = false)
- * Retrieves the timer set with settimer(); returns true if a timer
- * was set up, or false otherwise.
- */
-static cell AMX_NATIVE_CALL n_gettimer(AMX *amx, const cell *params)
-{
-  cell *cptr;
-
-  assert(params[0]==(int)(2*sizeof(cell)));
-  cptr=amx_Address(amx,params[1]);
-  *cptr=timelimit;
-  cptr=amx_Address(amx,params[2]);
-  *cptr=timerepeat;
-  return timelimit>0;
-}
-
-/* settimestamp(seconds1970) sets the date and time from a single parameter: the
- * number of seconds since 1 January 1970.
- */
-static cell AMX_NATIVE_CALL n_settimestamp(AMX *amx, const cell *params)
-{
-  #if defined __WIN32__ || defined _WIN32 || defined WIN32
-    int year, month, day, hour, minute, second;
-
-    stamp2datetime(params[1],
-                   &year, &month, &day,
-                   &hour, &minute, &second);
-    setdate(year, month, day);
-    settime(hour, minute, second);
-  #else
-    /* Linux/Unix (and some DOS compilers) have stime(); on Linux/Unix, you
-     * must have "root" permission to call stime(); many POSIX systems will
-     * have settimeofday() instead
-     */
-    #if defined __APPLE__ /* also valid for other POSIX systems */
-      struct timeval tv;
-      tv.tv_sec = params[1];
-      tv.tv_usec = 0;
-      settimeofday(&tv, 0);
-    #else
-      time_t sec1970=(time_t)params[1];
-      stime(&sec1970);
-    #endif
-  #endif
-  (void)amx;
-
-  return 0;
-}
-
-/* cvttimestamp(seconds1970, &year, &month, &day, &hour, &minute, &second)
- */
-static cell AMX_NATIVE_CALL n_cvttimestamp(AMX *amx, const cell *params)
-{
-  int year, month, day, hour, minute, second;
-
-  (void)amx;
-  stamp2datetime(params[1],
-                 &year, &month, &day,
-                 &hour, &minute, &second);
-  return 0;
-}
-
-
-#if !defined AMXTIME_NOIDLE
-static AMX_IDLE PrevIdle = NULL;
-static int idxTimer = -1;
-
-static int AMXAPI amx_TimeIdle(AMX *amx, int AMXAPI Exec(AMX *, cell *, int))
-{
-  int err=0;
-
-  assert(idxTimer >= 0);
-
-  if (PrevIdle != NULL)
-    PrevIdle(amx, Exec);
-
-  if (timelimit>0 && (gettimestamp()-timestamp)>=timelimit) {
-    if (timerepeat)
-      timestamp+=timelimit;
-    else
-      timelimit=0;      /* do not repeat single-shot timer */
-    err = Exec(amx, NULL, idxTimer);
-    while (err == AMX_ERR_SLEEP)
-      err = Exec(amx, NULL, AMX_EXEC_CONT);
-  } /* if */
-
-  return err;
-}
-#endif
-
-
-#if defined __cplusplus
-  extern "C"
-#endif
-const AMX_NATIVE_INFO time_Natives[] = {
-  { "gettime",      n_gettime },
-  { "settime",      n_settime },
-  { "getdate",      n_getdate },
-  { "setdate",      n_setdate },
-  { "tickcount",    n_tickcount },
-  { "settimer",     n_settimer },
-  { "gettimer",     n_gettimer },
-  { "delay",        n_delay },
-  { "settimestamp", n_settimestamp },
-  { "cvttimestamp", n_cvttimestamp },
-  { NULL, NULL }        /* terminator */
-};
-
-int AMXEXPORT AMXAPI amx_TimeInit(AMX *amx)
-{
-  #if !defined AMXTIME_NOIDLE
-    /* see whether there is a @timer() function */
-    if (amx_FindPublic(amx,"@timer",&idxTimer) == AMX_ERR_NONE) {
-      if (amx_GetUserData(amx, AMX_USERTAG('I','d','l','e'), (void**)&PrevIdle) != AMX_ERR_NONE)
-        PrevIdle = NULL;
-      amx_SetUserData(amx, AMX_USERTAG('I','d','l','e'), amx_TimeIdle);
-    } /* if */
-  #endif
-
-  return amx_Register(amx, time_Natives, -1);
-}
-
-int AMXEXPORT AMXAPI amx_TimeCleanup(AMX *amx)
-{
-  (void)amx;
-  #if !defined AMXTIME_NOIDLE
-    PrevIdle = NULL;
-  #endif
-  return AMX_ERR_NONE;
-}
diff --git a/apps/openmw-mp/amx/fpattern.c b/apps/openmw-mp/amx/fpattern.c
deleted file mode 100644
index 9ba3c08d4..000000000
--- a/apps/openmw-mp/amx/fpattern.c
+++ /dev/null
@@ -1,1334 +0,0 @@
-/*
- from http://home.flash.net/~dtribble/text/fpattern.htm
- 2000/12/12
- by Perry
- License statement is in comments below
-*/
-
-/******************************************************************************
-* fpattern.c
-*   Functions for matching filename patterns to filenames.
-*
-* Usage
-*   (See "fpattern.h".)
-*
-* Notes
-*   These pattern matching capabilities are modeled after those found in
-*   the UNIX command shells.
-*
-*   'FPAT_DELIM' must be #define'd if pathname separators are to be handled
-*   explicitly.
-*
-* History
-*   1.00 1997-01-03 David Tribble.
-*       First cut.
-*   1.01 1997-01-03 David Tribble.
-*       Added SUB pattern character.
-*       Added fpattern_matchn().
-*   1.02 1997-01-12 David Tribble.
-*       Fixed missing lowercase matching cases.
-*   1.03 1997-01-13 David Tribble.
-*       Pathname separator code is now controlled by FPAT_DELIM macro.
-*   1.04 1997-01-14 David Tribble.
-*       Added QUOTE macro.
-*   1.05 1997-01-15 David Tribble.
-*       Handles special case of empty pattern and empty filename.
-*   1.06 1997-01-26 David Tribble.
-*       Changed range negation character from '^' to '!', ala Unix.
-*   1.07 1997-08-02 David Tribble.
-*       Uses the 'FPAT_XXX' constants.
-*   1.08 1998-06-28 David Tribble.
-*       Minor fixed for MS-VC++ (5.0).
-*
-*   Modifications by Thiadmer Riemersma (optional case-sensitive matching,
-*   optional explicit array length, repeated set syntax), 2005-11-27.
-*
-* Limitations
-*   This code is copyrighted by the author, but permission is hereby
-*   granted for its unlimited use provided that the original copyright
-*   and authorship notices are retained intact.
-*
-*   Other queries can be sent to:
-*       dtribble@technologist.com
-*       david.tribble@beasys.com
-*       dtribble@flash.net
-*
-* Copyright 1997-1998 by David R. Tribble, all rights reserved.
-* Copyright (c) 2005-2015, ITB CompuPhase, all rights reserved.
-* www.compuphase.com
-*
-* Version: $Id: fpattern.c 5181 2015-01-21 09:44:28Z thiadmer $
-*/
-
-
-
-/* System includes */
-#if defined TEST
-    #include <assert.h>
-#elif !defined assert
-    #define assert(e)
-#endif
-#include <string.h>
-
-#include "fpattern.h"
-
-
-/* Local constants */
-
-#ifndef NULL
-# define NULL       ((void *) 0)
-#endif
-
-#ifndef FALSE
-# define FALSE      0
-#endif
-
-#ifndef TRUE
-# define TRUE       1
-#endif
-
-#ifdef FPAT_SUBCLOS
-# if TEST
-#   undef           FPAT_CLOSP
-#   define FPAT_CLOSP  '~'
-# endif
-#endif
-
-
-#define ishexdigit(c)   ( ((c)>='0' && (c)<='9') || ((c)>='a' && (c)<='f') || ((c)>='A' && (c)<='F') )
-#define hexdigit(c)     ( ((c)>='0' && (c)<='9') ? (c) - '0' : 10 + \
-                        ( ((c)>='a' && (c)<='f') ? (c) - 'a' : (c) - 'A' ) )
-#if !defined tolower
-# define tolower(c)     ( (c)>='A' && (c)<='Z' ? (c) - 'A' + 'a' : (c) )
-#endif
-
-#define BITSET(set,idx) ( (set)[(idx)/8] |= (unsigned char)(1 << ((idx) & 7)) )
-#define BITGET(set,idx) ( (set)[(idx)/8] & (1 << ((idx) & 7)) )
-
-/*-----------------------------------------------------------------------------
-* fpattern_isvalid()
-*   Checks that filename pattern 'pat' is a well-formed pattern.
-*
-* Returns
-*   0 (FPAT_INVALID) if 'pat' is an INVALID pattern, 1 or 2 for VALID patterns
-*   (FPAT_CLOSED and FPAT_OPEN respectively).
-*   A valid pattern may be "closed" (with a non-repeating terminator) or
-*   "open-ended" (where the last character in the pattern may be repeated 0 or
-*   more times).
-*
-* Caveats
-*   If 'pat' is NULL, 0 (FPAT_INVALID) is returned.
-*
-*   If 'pat' is empty (""), 1 (FPAT_CLOSED) is returned, and it is considered a
-*   valid (but degenerate) pattern (the only filename it matches is the
-*   empty ("") string).
-*/
-
-int fpattern_isvalid(const char *pat)
-{
-    static const char specialchars[] = { FPAT_QUOTE, FPAT_SET_THRU, FPAT_SET_L,
-                                         FPAT_SET_R, FPAT_MSET_L, FPAT_MSET_R,
-                                         FPAT_ANY, FPAT_NOT, FPAT_CLOS, FPAT_CLOSP,
-                                         '\0' };
-    int     len, open;
-    char    close, pch, pch2;
-    unsigned char mask[256/sizeof(unsigned char)];
-
-    /* Check args */
-    if (pat == NULL)
-        return (FPAT_INVALID);
-
-    open = FALSE;   /* pattern is not open-ended */
-
-    /* Verify that the pattern is valid */
-    for (len = 0;  pat[len] != '\0';  len++)
-    {
-        switch (pat[len])
-        {
-        case FPAT_SET_L:
-#if defined FPAT_MSET_ENABLED
-        case FPAT_MSET_L:
-#endif
-            /* Char set */
-            if (pat[len] == FPAT_SET_L)
-            {
-                open = FALSE;
-                close = FPAT_SET_R;
-            }
-            else
-            {
-                open = TRUE;
-                close = FPAT_MSET_R;
-            }
-            len++;
-            if (pat[len] == FPAT_NOT)
-                len++;          /* Set negation */
-
-            memset(mask,0,sizeof mask);
-            while (pat[len] != close)
-            {
-                pch = pat[len];
-                if (pat[len] == FPAT_QUOTE) {
-                    len++;      /* Quoted char */
-                    pch = pat[len];
-                    if (ishexdigit(pch)) {
-                        len++;  /* Hex digits should come in pairs */
-                        if (!ishexdigit(pat[len]))
-                            return (FPAT_INVALID);
-                        pch2 = pat[len];
-                        pch = (hexdigit(pch) << 4) | hexdigit(pch2);
-                    } else if (strchr(specialchars,pat[len])==NULL) {
-                        return (FPAT_INVALID); /* escaped char should be special char */
-                    } /* if */
-                } /* if */
-                if (pat[len] == '\0')
-                    return (FPAT_INVALID); /* Missing closing bracket */
-                if (BITGET(mask,pch))
-                    return (FPAT_INVALID);
-                BITSET(mask,pch);
-                len++;
-
-                if (pat[len] == FPAT_SET_THRU && (pat[len+1] != FPAT_SET_THRU || pch == FPAT_SET_THRU))
-                {
-                    /* Char range */
-                    len++;
-                    if (pat[len] == FPAT_QUOTE) {
-                        len++;      /* Quoted char */
-                        if (ishexdigit(pat[len])) {
-                            len++;  /* Hex digits should come in pairs */
-                            if (!ishexdigit(pat[len]))
-                                return (FPAT_INVALID);
-                        } else if (strchr(specialchars,pat[len])==NULL) {
-                            return (FPAT_INVALID); /* escaped char should be special char */
-                        } /* if */
-                    } /* if */
-
-                    if (pat[len] == '\0')
-                        return (FPAT_INVALID); /* Missing closing bracket */
-                    if (len<2 || (unsigned char)pat[len-2]>(unsigned char)pat[len]
-                        || (pat[len-2]==pat[len] && pat[len]!=FPAT_SET_THRU))
-                        return (FPAT_INVALID);  /* invalid range (decrementing) */
-                    //??? also set bits of characters in range?
-                    len++;
-                }
-
-                if (pat[len] == '\0')
-                    return (FPAT_INVALID); /* Missing closing bracket */
-            }
-            break;
-
-        case FPAT_QUOTE:
-            /* Quoted char */
-            len++;
-            open = FALSE;
-            if (ishexdigit(pat[len])) {
-                len++;                    /* Hex digits should come in pairs */
-                if (!ishexdigit(pat[len]))
-                    return (FPAT_INVALID);
-            } else if (strchr(specialchars,pat[len])==NULL) {
-                return (FPAT_INVALID);    /* escaped char should be special char */
-            } /* if */
-            if (pat[len] == '\0')
-                return (FPAT_INVALID);    /* Missing quoted char */
-            break;
-
-#if defined FPAT_NOT_ENABLED
-        case FPAT_NOT:
-            /* Negated pattern */
-            len++;
-            open = FALSE;
-            if (pat[len] == '\0')
-                return (FPAT_INVALID);     /* Missing subpattern */
-            break;
-#endif
-
-        case FPAT_CLOS:
-            open = TRUE;
-            break;
-
-        default:
-            /* Valid character */
-            open = FALSE;
-            break;
-        }
-    }
-
-    return (open ? FPAT_OPEN : FPAT_CLOSED);
-}
-
-
-/* NOTA BENE
- * =========
- * To modify the pattern matcher, modify the case-insensitive version and
- * copy it to the case-sensitive version. In steps:
- * - modify the function fpatter_submatch_tolower(), here below
- * - make a copy of the entire function
- * - erase all references to "tolower" in the copy
- */
-
-/*-----------------------------------------------------------------------------
-* fpattern_submatch_tolower()
-*   Attempts to match subpattern 'pat' to subfilename 'fname'.
-*
-* Returns
-*   1 (true) if the subfilename matches, otherwise 0 (false).
-*
-* Caveats
-*   This does not assume that 'pat' is well-formed.
-*
-*   If 'pat' is empty (""), the only filename it matches is the empty ("")
-*   string.
-*
-*   Some non-empty patterns (e.g., "") will match an empty filename ("").
-*/
-
-static int fpattern_submatch_tolower(const char *pat, const char *fname, int flength)
-{
-    int     fch;
-    int     pch, pch2;
-    int     i;
-    int     yes, match;
-    int     lo, hi;
-
-    /* Attempt to match subpattern against subfilename */
-    while (*pat != '\0')
-    {
-        fch = (unsigned char)*fname;
-        pch = (unsigned char)*pat;
-        pat++;
-
-        switch (pch)
-        {
-        case FPAT_ANY:
-            /* Match a single char */
-        #if defined FPAT_DELIM
-            if (fch == FPAT_DEL  ||  fch == FPAT_DEL2  ||  fch == '\0')
-                return (FALSE);
-        #else
-            if (flength == 0)
-                return (FALSE);
-        #endif
-            fname++;
-            flength--;
-            break;
-
-        case FPAT_CLOS:
-            /* Match zero or more chars */
-        #if defined FPAT_DELIM
-            i = 0;
-            while (fname[i] != '\0'  &&
-                    fname[i] != FPAT_DEL  &&  fname[i] != FPAT_DEL2)
-                i++;
-        #else
-            i = flength;
-        #endif
-            while (i >= 0)
-            {
-                if (fpattern_submatch_tolower(pat, fname+i, flength-i))
-                    return (TRUE);
-                i--;
-            }
-            return (FALSE);
-
-    #ifdef FPAT_SUBCLOS
-        case FPAT_CLOSP:
-            /* Match zero or more chars */
-            i = 0;
-            while (i < flength  &&
-        #if defined FPAT_DELIM
-                    fname[i] != FPAT_DEL  &&  fname[i] != FPAT_DEL2  &&
-        #endif
-                    fname[i] != '.')
-                i++;
-            while (i >= 0)
-            {
-                if (fpattern_submatch_tolower(pat, fname+i, flength-i))
-                    return (TRUE);
-                i--;
-            }
-            return (FALSE);
-    #endif
-
-        case FPAT_QUOTE:
-            /* Match a quoted char */
-            assert(*pat != '\0');
-            pch = (unsigned char)*pat;
-            if (ishexdigit(pch)) {
-                pch2 = *++pat;
-                pch = (hexdigit(pch) << 4) | hexdigit(pch2);
-            } /* if */
-            if (tolower(fch) != tolower(pch))
-                return (FALSE);
-            fname++;
-            flength--;
-            pat++;
-            break;
-
-        case FPAT_SET_L:
-            /* Match char set/range */
-            yes = TRUE;
-            if (*pat == FPAT_NOT) {
-               pat++;
-               yes = FALSE; /* Set negation */
-            } /* if */
-
-            /* Look for [s], [-], [abc], [a-c] */
-            match = !yes;
-            while (*pat != FPAT_SET_R) {
-                assert(*pat != '\0');
-                pch = (unsigned char)*pat++;
-                if (pch == FPAT_QUOTE) {
-                    assert(*pat != '\0');
-                    pch = (unsigned char)*pat++;
-                    if (ishexdigit(pch)) {
-                        pch2 = *pat++;
-                        lo = (hexdigit(pch) << 4) | hexdigit(pch2);
-                    } else {
-                        lo = pch;
-                    } /* if */
-                } else {
-                    lo = pch;
-                } /* if */
-
-                if (*pat == FPAT_SET_THRU) {
-                    /* Range */
-                    pat++;
-                    pch = (unsigned char)*pat++;
-
-                    if (pch == FPAT_QUOTE) {
-                        assert(*pat != '\0');
-                        pch = (unsigned char)*pat++;
-                        if (ishexdigit(pch)) {
-                            pch2 = *pat++;
-                            hi = (hexdigit(pch) << 4) | hexdigit(pch2);
-                        } else {
-                            hi = pch;
-                        } /* if */
-                    } else {
-                      hi = pch;
-                    } /* if */
-
-                    /* Compare character to set range */
-                    if (tolower(fch) >= tolower(lo) && tolower(fch) <= tolower(hi)) {
-                        match = yes;
-                        /* skip to the end of the set in the pattern (no need to
-                         * search further once a match is found)
-                         */
-                        while (*pat != FPAT_SET_R) {
-                            assert(*pat != '\0');
-                            pat++;
-                        } /* while */
-                        break;
-                    } /* if */
-                } else {
-                    /* Compare character to single char from set */
-                    if (tolower(fch) == tolower(lo)) {
-                        match = yes;
-                        /* skip to the end of the set in the pattern (no need to
-                         * search further once a match is found)
-                         */
-                        while (*pat != FPAT_SET_R) {
-                            assert(*pat != '\0');
-                            pat++;
-                        } /* while */
-                        break;
-                    } /* if */
-                } /* if */
-
-                assert(*pat != '\0');
-            } /* while */
-
-            if (!match)
-                return (FALSE);
-
-            fname++;
-            flength--;
-            assert(*pat == FPAT_SET_R);
-            pat++;
-            break;
-
-#if defined FPAT_MSET_ENABLED
-        case FPAT_MSET_L:
-            /* Match zero or more characters in a char set/range */
-            yes = TRUE;
-            if (*pat == FPAT_NOT) {
-               pat++;
-               yes = FALSE; /* Set negation */
-            } /* if */
-
-            do {
-                const char *org_pat = pat;
-                /* Look for [s], [-], [abc], [a-c] */
-                match = !yes;
-                while (*pat != FPAT_MSET_R) {
-                    assert(*pat != '\0');
-                    pch = (unsigned char)*pat++;
-                    if (pch == FPAT_QUOTE) {
-                        assert(*pat != '\0');
-                        pch = (unsigned char)*pat++;
-                        if (ishexdigit(pch)) {
-                            pch2 = *pat++;
-                            lo = (hexdigit(pch) << 4) | hexdigit(pch2);
-                        } else {
-                            lo = pch;
-                        } /* if */
-                    } else {
-                        lo = pch;
-                    } /* if */
-
-                    if (*pat == FPAT_SET_THRU) {
-                        /* Range */
-                        pat++;
-                        pch = (unsigned char)*pat++;
-
-                        if (pch == FPAT_QUOTE) {
-                            assert(*pat != '\0');
-                            pch = (unsigned char)*pat++;
-                            if (ishexdigit(pch)) {
-                                pch2 = *pat++;
-                                hi = (hexdigit(pch) << 4) | hexdigit(pch2);
-                            } else {
-                                hi = pch;
-                            } /* if */
-                        } else {
-                            hi = pch;
-                        } /* if */
-
-                        /* Compare character to set range */
-                        if (tolower(fch) >= tolower(lo) && tolower(fch) <= tolower(hi)) {
-                            match = yes;
-                            /* skip to the end of the set in the pattern (no
-                             * need to search further once a match is found)
-                             */
-                            while (*pat != FPAT_MSET_R) {
-                                assert(*pat != '\0');
-                                pat++;
-                            } /* while */
-                            break;
-                        } /* if */
-                    } else {
-                        /* Compare character to single char from the set */
-                        if (tolower(fch) == tolower(lo)) {
-                            match = yes;
-                            /* skip to the end of the set in the pattern (no
-                             * need to search further once a match is found)
-                             */
-                            while (*pat != FPAT_MSET_R) {
-                                assert(*pat != '\0');
-                                pat++;
-                            } /* while */
-                            break;
-                        } /* if */
-                    } /* if */
-
-                    assert(*pat != '\0');
-                } /* while */
-
-                assert(*pat == FPAT_MSET_R);
-
-                if (match) {
-                    fname++;
-                    flength--;
-                    fch = *fname;
-                    if (flength > 0)
-                        pat = org_pat;
-                } /* if */
-
-            } while (match && flength > 0);
-
-            pat++;
-            break;
-#endif /* FPAT_MSET_ENABLED */
-
-#if defined FPAT_NOT_ENABLED
-        case FPAT_NOT:
-            /* Match only if rest of pattern does not match */
-            assert(*pat != '\0');
-            i = fpattern_submatch_tolower(pat, fname, flength);
-            return !i;
-#endif
-
-#if defined FPAT_DELIM
-        case FPAT_DEL:
-    #if FPAT_DEL2 != FPAT_DEL
-        case FPAT_DEL2:
-    #endif
-            /* Match path delimiter char */
-            if (fch != FPAT_DEL  &&  fch != FPAT_DEL2)
-                return (FALSE);
-            fname++;
-            flength--;
-            break;
-#endif
-
-        default:
-            /* Match a (non-null) char exactly */
-            if (tolower(fch) != tolower(pch))
-                return (FALSE);
-            fname++;
-            flength--;
-            break;
-        }
-    }
-
-    /* Check for complete match */
-    if (flength != 0)
-        return (FALSE);
-
-    /* Successful match */
-    return (TRUE);
-}
-
-/*
-* fpattern_submatch()
-*   See fpattern_submatch_tolower()
-*/
-
-static int fpattern_submatch(const char *pat, const char *fname, int flength)
-{
-    int     fch;
-    int     pch, pch2;
-    int     i;
-    int     yes, match;
-    int     lo, hi;
-
-    /* Attempt to match subpattern against subfilename */
-    while (*pat != '\0')
-    {
-        fch = (unsigned char)*fname;
-        pch = (unsigned char)*pat;
-        pat++;
-
-        switch (pch)
-        {
-        case FPAT_ANY:
-            /* Match a single char */
-        #if defined FPAT_DELIM
-            if (fch == FPAT_DEL  ||  fch == FPAT_DEL2  ||  fch == '\0')
-                return (FALSE);
-        #else
-            if (flength == 0)
-                return (FALSE);
-        #endif
-            fname++;
-            flength--;
-            break;
-
-        case FPAT_CLOS:
-            /* Match zero or more chars */
-        #if defined FPAT_DELIM
-            i = 0;
-            while (fname[i] != '\0'  &&
-                    fname[i] != FPAT_DEL  &&  fname[i] != FPAT_DEL2)
-                i++;
-        #else
-            i = flength;
-        #endif
-            while (i >= 0)
-            {
-                if (fpattern_submatch(pat, fname+i, flength-i))
-                    return (TRUE);
-                i--;
-            }
-            return (FALSE);
-
-    #ifdef FPAT_SUBCLOS
-        case FPAT_CLOSP:
-            /* Match zero or more chars */
-            i = 0;
-            while (i < flength  &&
-        #if defined FPAT_DELIM
-                    fname[i] != FPAT_DEL  &&  fname[i] != FPAT_DEL2  &&
-        #endif
-                    fname[i] != '.')
-                i++;
-            while (i >= 0)
-            {
-                if (fpattern_submatch(pat, fname+i, flength-i))
-                    return (TRUE);
-                i--;
-            }
-            return (FALSE);
-    #endif
-
-        case FPAT_QUOTE:
-            /* Match a quoted char */
-            assert(*pat != '\0');
-            pch = (unsigned char)*pat;
-            if (ishexdigit(pch)) {
-                pch2 = *++pat;
-                pch = (hexdigit(pch) << 4) | hexdigit(pch2);
-            } /* if */
-            if ((fch) != (pch))
-                return (FALSE);
-            fname++;
-            flength--;
-            pat++;
-            break;
-
-        case FPAT_SET_L:
-            /* Match char set/range */
-            yes = TRUE;
-            if (*pat == FPAT_NOT) {
-               pat++;
-               yes = FALSE; /* Set negation */
-            } /* if */
-
-            /* Look for [s], [-], [abc], [a-c] */
-            match = !yes;
-            while (*pat != FPAT_SET_R) {
-                assert(*pat != '\0');
-                pch = (unsigned char)*pat++;
-                if (pch == FPAT_QUOTE) {
-                    assert(*pat != '\0');
-                    pch = (unsigned char)*pat++;
-                    if (ishexdigit(pch)) {
-                        pch2 = *pat++;
-                        lo = (hexdigit(pch) << 4) | hexdigit(pch2);
-                    } else {
-                        lo = pch;
-                    } /* if */
-                } else {
-                    lo = pch;
-                } /* if */
-
-                if (*pat == FPAT_SET_THRU) {
-                    /* Range */
-                    pat++;
-                    pch = (unsigned char)*pat++;
-
-                    if (pch == FPAT_QUOTE) {
-                        assert(*pat != '\0');
-                        pch = (unsigned char)*pat++;
-                        if (ishexdigit(pch)) {
-                            pch2 = *pat++;
-                            hi = (hexdigit(pch) << 4) | hexdigit(pch2);
-                        } else {
-                            hi = pch;
-                        } /* if */
-                    } else {
-                      hi = pch;
-                    } /* if */
-
-                    /* Compare character to set range */
-                    if ((fch) >= (lo) && (fch) <= (hi)) {
-                        match = yes;
-                        /* skip to the end of the set in the pattern (no need to
-                         * search further once a match is found)
-                         */
-                        while (*pat != FPAT_SET_R) {
-                            assert(*pat != '\0');
-                            pat++;
-                        } /* while */
-                        break;
-                    } /* if */
-                } else {
-                    /* Compare character to single char from set */
-                    if ((fch) == (lo)) {
-                        match = yes;
-                        /* skip to the end of the set in the pattern (no need to
-                         * search further once a match is found)
-                         */
-                        while (*pat != FPAT_SET_R) {
-                            assert(*pat != '\0');
-                            pat++;
-                        } /* while */
-                        break;
-                    } /* if */
-                } /* if */
-
-                assert(*pat != '\0');
-            } /* while */
-
-            if (!match)
-                return (FALSE);
-
-            fname++;
-            flength--;
-            assert(*pat == FPAT_SET_R);
-            pat++;
-            break;
-
-#if defined FPAT_MSET_ENABLED
-        case FPAT_MSET_L:
-            /* Match zero or more characters in a char set/range */
-            yes = TRUE;
-            if (*pat == FPAT_NOT) {
-               pat++;
-               yes = FALSE; /* Set negation */
-            } /* if */
-
-            do {
-                const char *org_pat = pat;
-                /* Look for [s], [-], [abc], [a-c] */
-                match = !yes;
-                while (*pat != FPAT_MSET_R) {
-                    assert(*pat != '\0');
-                    pch = (unsigned char)*pat++;
-                    if (pch == FPAT_QUOTE) {
-                        assert(*pat != '\0');
-                        pch = (unsigned char)*pat++;
-                        if (ishexdigit(pch)) {
-                            pch2 = *pat++;
-                            lo = (hexdigit(pch) << 4) | hexdigit(pch2);
-                        } else {
-                            lo = pch;
-                        } /* if */
-                    } else {
-                        lo = pch;
-                    } /* if */
-
-                    if (*pat == FPAT_SET_THRU) {
-                        /* Range */
-                        pat++;
-                        pch = (unsigned char)*pat++;
-
-                        if (pch == FPAT_QUOTE) {
-                            assert(*pat != '\0');
-                            pch = (unsigned char)*pat++;
-                            if (ishexdigit(pch)) {
-                                pch2 = *pat++;
-                                hi = (hexdigit(pch) << 4) | hexdigit(pch2);
-                            } else {
-                                hi = pch;
-                            } /* if */
-                        } else {
-                            hi = pch;
-                        } /* if */
-
-                        /* Compare character to set range */
-                        if ((fch) >= (lo) && (fch) <= (hi)) {
-                            match = yes;
-                            /* skip to the end of the set in the pattern (no
-                             * need to search further once a match is found)
-                             */
-                            while (*pat != FPAT_MSET_R) {
-                                assert(*pat != '\0');
-                                pat++;
-                            } /* while */
-                            break;
-                        } /* if */
-                    } else {
-                        /* Compare character to single char from the set */
-                        if ((fch) == (lo)) {
-                            match = yes;
-                            /* skip to the end of the set in the pattern (no
-                             * need to search further once a match is found)
-                             */
-                            while (*pat != FPAT_MSET_R) {
-                                assert(*pat != '\0');
-                                pat++;
-                            } /* while */
-                            break;
-                        } /* if */
-                    } /* if */
-
-                    assert(*pat != '\0');
-                } /* while */
-
-                assert(*pat == FPAT_MSET_R);
-
-                if (match) {
-                    fname++;
-                    flength--;
-                    fch = *fname;
-                    if (flength > 0)
-                        pat = org_pat;
-                } /* if */
-
-            } while (match && flength > 0);
-
-            pat++;
-            break;
-#endif  /* FPAT_MSET_ENABLED */
-
-#if defined FPAT_NOT_ENABLED
-        case FPAT_NOT:
-            /* Match only if rest of pattern does not match */
-            assert(*pat != '\0');
-            i = fpattern_submatch(pat, fname, flength);
-            return !i;
-#endif
-
-#if defined FPAT_DELIM
-        case FPAT_DEL:
-    #if FPAT_DEL2 != FPAT_DEL
-        case FPAT_DEL2:
-    #endif
-            /* Match path delimiter char */
-            if (fch != FPAT_DEL  &&  fch != FPAT_DEL2)
-                return (FALSE);
-            fname++;
-            flength--;
-            break;
-#endif
-
-        default:
-            /* Match a (non-null) char exactly */
-            if ((fch) != (pch))
-                return (FALSE);
-            fname++;
-            flength--;
-            break;
-        }
-    }
-
-    /* Check for complete match */
-    if (flength != 0)
-        return (FALSE);
-
-    /* Successful match */
-    return (TRUE);
-}
-
-
-/*-----------------------------------------------------------------------------
-* fpattern_match()
-*   Attempts to match pattern 'pat' to filename 'fname'. The comparison is case
-* sensitive if 'keepcase' is true, and case insensitive otherwise. The 'flength'
-* parameter allows to check partial strings, or to check strings with embedded
-* zero bytes. When 'flength' is -1, it is set to the string length.
-*
-* Returns
-*   1 (true) if the filename matches, otherwise 0 (false).
-*
-* Caveats
-*   If 'fname' is null, zero (false) is returned.
-*
-*   If 'pat' is null, zero (false) is returned.
-*
-*   If 'pat' is empty (""), the only filename it matches is the empty
-*   string ("").
-*
-*   If 'fname' is empty, the only pattern that will match it is the empty
-*   string ("").
-*
-*   If 'pat' is not a well-formed pattern, zero (false) is returned.
-*
-*   Upper and lower case letters are treated the same; alphabetic
-*   characters are converted to lower case before matching occurs.
-*   Conversion to lower case is dependent upon the current locale setting.
-*/
-
-int fpattern_match(const char *pat, const char *fname, int flength, int keepcase)
-{
-    int     rc;
-
-    /* Check args */
-    if (fname == NULL)
-        return (FALSE);
-
-    if (pat == NULL)
-        return (FALSE);
-
-    /* Verify that the pattern is valid, and get its length */
-    if (!fpattern_isvalid(pat))
-        return (FALSE);
-
-    /* Attempt to match pattern against filename */
-    if (flength < 0)
-        flength = (int)strlen(fname);
-    if (flength == 0)
-        return (pat[0] == '\0');    /* Special case */
-    if (keepcase)
-        rc = fpattern_submatch(pat, fname, flength);
-    else
-        rc = fpattern_submatch_tolower(pat, fname, flength);
-
-    return (rc);
-}
-
-
-/*-----------------------------------------------------------------------------
-* fpattern_matchn()
-*   Attempts to match pattern 'pat' to filename 'fname'.
-*   This operates like fpattern_match() except that it does not verify that
-*   pattern 'pat' is well-formed, assuming that it has been checked by a
-*   prior call to fpattern_isvalid().
-*
-*   NOTA BENE: this function may crash on invalid patterns!
-*   =======================================================
-*
-* Returns
-*   1 (true) if the filename matches, otherwise 0 (false).
-*
-* Caveats
-*   If 'fname' is null, zero (false) is returned.
-*
-*   If 'pat' is null, zero (false) is returned.
-*
-*   If 'pat' is empty (""), the only filename it matches is the empty ("")
-*   string.
-*
-*   If 'pat' is not a well-formed pattern, unpredictable results may occur.
-*
-*   Upper and lower case letters are treated the same; alphabetic
-*   characters are converted to lower case before matching occurs.
-*   Conversion to lower case is dependent upon the current locale setting.
-*
-* See also
-*   fpattern_match().
-*/
-
-int fpattern_matchn(const char *pat, const char *fname, int flength, int keepcase)
-{
-    int     rc;
-
-    /* Check args */
-    if (fname == NULL)
-        return (FALSE);
-
-    if (pat == NULL)
-        return (FALSE);
-
-    /* Assume that pattern is well-formed
-     * NOTA BENE: this function may crash on invalid patterns!
-     */
-    assert(fpattern_isvalid(pat));
-
-    /* Attempt to match pattern against filename */
-    if (flength < 0)
-        flength = (int)strlen(fname);
-    if (keepcase)
-        rc = fpattern_submatch(pat, fname, flength);
-    else
-        rc = fpattern_submatch_tolower(pat, fname, flength);
-
-    return (rc);
-}
-
-/* returns the largest packet that matches the pattern */
-int fpattern_matchcount(const char *pat, const char *fname, int flength, int minlength, int keepcase)
-{
-    int len;
-
-    if (fname == NULL)
-        return (FALSE);
-
-    if (pat == NULL)
-        return (FALSE);
-
-    /* Assume that pattern is well-formed */
-
-    /* Attempt to match pattern against filename */
-    if (flength < 0)
-        flength = (int)strlen(fname);
-
-    if (keepcase) {
-        for (len = flength; len > minlength; len--)
-            if (fpattern_submatch(pat, fname, len))
-                break;
-    } else {
-        for (len = flength; len > minlength; len--)
-            if (fpattern_submatch_tolower(pat, fname, len))
-                break;
-    } /* if */
-
-    return (len > minlength) ? len : 0;
-}
-
-
-/*---------------------------------------------------------------------------*/
-/*---------------------------------------------------------------------------*/
-/*---------------------------------------------------------------------------*/
-
-#ifdef TEST
-
-#include <locale.h>
-#include <stdio.h>
-#if defined _WIN32 || defined __WIN32__ || defined WIN32
-# include <stdlib.h>
-# define sleep(q) Sleep(q*1000)
-# include <windows.h>
-#endif
-
-/* Local variables */
-
-static int  count = 0;
-static int  fails = 0;
-static int  stop_on_fail = FALSE;
-
-
-/*-----------------------------------------------------------------------------
-* test()
-*/
-
-static void test(int expect, const char *fname, const char *pat)
-{
-    int     failed;
-    int     result;
-    char    fbuf[80+1];
-    char    pbuf[80+1];
-
-    count++;
-    printf("%3d. ", count);
-
-    if (fname == NULL)
-    {
-        printf("<null>\n");
-    }
-    else
-    {
-        strcpy(fbuf, fname);
-        printf("\"%s\"\n", fbuf);
-    }
-
-    if (pat == NULL)
-    {
-        printf("     <null>\n");
-    }
-    else
-    {
-        strcpy(pbuf, pat);
-        printf("     \"%s\"\n", pbuf);
-    }
-
-    result = fpattern_match(pat == NULL ? NULL : pbuf,
-                            fname == NULL ? NULL : fbuf,
-                            -1, FALSE);
-
-    failed = (result != expect);
-    printf("    -> %c, expected %c: %s\n",
-        "FT"[!!result], "FT"[!!expect], failed ? "FAIL ***" : "pass");
-
-    if (failed)
-    {
-        fails++;
-
-        if (stop_on_fail)
-            exit(1);
-        sleep(1);
-    }
-
-    printf("\n");
-}
-
-
-/*-----------------------------------------------------------------------------
-* main()
-*   Test driver.
-*/
-
-int main(int argc, char **argv)
-{
-    (void) argc;    /* Shut up lint */
-    (void) argv;    /* Shut up lint */
-
-#if DEBUG
-    dbg_f = stdout;
-#endif
-
-    printf("==========================================\n");
-
-    setlocale(LC_CTYPE, "");
-
-#if 1   /* Set to nonzero to stop on first failure */
-    stop_on_fail = TRUE;
-#endif
-
-    test(0, NULL,   NULL);
-    test(0, NULL,   "");
-    test(0, NULL,   "abc");
-    test(0, "", NULL);
-    test(0, "abc",  NULL);
-
-    test(1, "abc",      "abc");
-    test(0, "ab",       "abc");
-    test(0, "abcd",     "abc");
-    test(0, "Foo.txt",  "Foo.x");
-    test(1, "Foo.txt",  "Foo.txt");
-    test(1, "Foo.txt",  "foo.txt");
-    test(1, "FOO.txt",  "foo.TXT");
-
-    test(1, "a",        "?");
-    test(1, "foo.txt",  "f??.txt");
-    test(1, "foo.txt",  "???????");
-    test(0, "foo.txt",  "??????");
-    test(0, "foo.txt",  "????????");
-
-    test(1, "*",        "`*");
-    test(1, "A[",       "a`[");
-    test(1, "a`x",      "a``x");
-    test(1, "*`?",      "`*```?");
-    test(1, "a*x",      "a`*x");
-    test(1, "a�",       "a`80");
-    test(0, "a�",       "a`8");
-
-#if defined FPAT_DELIM
-    test(0, "",         "/");
-    test(0, "",         "\\");
-    test(1, "/",        "/");
-    test(1, "/",        "\\");
-    test(1, "\\",       "/");
-    test(1, "\\",       "\\");
-
-    test(1, "a/b",      "a/b");
-    test(1, "a/b",      "a\\b");
-
-    test(1, "/",        "*/*");
-    test(1, "foo/a.c",  "f*/*.?");
-    test(1, "foo/a.c",  "*/*");
-    test(0, "foo/a.c",  "/*/*");
-    test(0, "foo/a.c",  "*/*/");
-
-    test(1, "/",        "~/~");
-    test(1, "foo/a.c",  "f~/~.?");
-    test(0, "foo/a.c",  "~/~");
-    test(1, "foo/abc",  "~/~");
-    test(0, "foo/a.c",  "/~/~");
-    test(0, "foo/a.c",  "~/~/");
-#endif
-
-    test(0, "",         "*");
-    test(1, "a",        "*");
-    test(1, "ab",       "*");
-    test(1, "abc",      "**");
-    test(1, "ab.c",     "*.?");
-    test(1, "ab.c",     "*.*");
-    test(1, "ab.c",     "*?");
-    test(1, "ab.c",     "?*");
-    test(1, "ab.c",     "?*?");
-    test(1, "ab.c",     "?*?*");
-    test(1, "ac",       "a*c");
-    test(1, "axc",      "a*c");
-    test(1, "ax-yyy.c", "a*c");
-    test(1, "ax-yyy.c", "a*x-yyy.c");
-    test(1, "axx/yyy.c",    "a*x/*c");
-
-#ifdef FPAT_SUBCLOS
-    test(0, "",         "~");
-    test(1, "a",        "~");
-    test(1, "ab",       "~");
-    test(1, "abc",      "~~");
-    test(1, "ab.c",     "~.?");
-    test(1, "ab.c",     "~.~");
-    test(0, "ab.c",     "~?");
-    test(0, "ab.c",     "?~");
-    test(0, "ab.c",     "?~?");
-    test(1, "ab.c",     "?~.?");
-    test(1, "ab.c",     "?~?~");
-    test(1, "ac",       "a~c");
-    test(1, "axc",      "a~c");
-    test(0, "ax-yyy.c", "a~c");
-    test(1, "ax-yyyvc", "a~c");
-    test(1, "ax-yyy.c", "a~x-yyy.c");
-    test(0, "axx/yyy.c","a~x/~c");
-    test(1, "axx/yyyvc","a~x/~c");
-#endif
-
-#if defined FPAT_NOT_ENABLED
-    test(0, "a",        "!");
-    test(0, "a",        "!a");
-    test(1, "a",        "!b");
-    test(1, "abc",      "!abb");
-    test(0, "a",        "!*");
-    test(1, "abc",      "!*.?");
-    test(1, "abc",      "!*.*");
-    test(0, "",         "!*");      /*!*/
-    test(0, "",         "!*?");     /*!*/
-    test(0, "a",        "!*?");
-    test(0, "a",        "a!*");
-    test(1, "a",        "a!?");
-    test(1, "a",        "a!*?");
-    test(1, "ab",       "*!?");
-    test(1, "abc",      "*!?");
-    test(0, "ab",       "?!?");
-    test(1, "abc",      "?!?");
-    test(0, "a-b",      "!a[-]b");
-    test(0, "a-b",      "!a[x-]b");
-    test(0, "a=b",      "!a[x-]b");
-    test(0, "a-b",      "!a[x`-]b");
-    test(1, "a=b",      "!a[x`-]b");
-    test(0, "a-b",      "!a[x---]b");
-    test(1, "a=b",      "!a[x---]b");
-#endif
-
-    test(1, "abc",      "a[b]c");
-    test(1, "aBc",      "a[b]c");
-    test(1, "abc",      "a[bB]c");
-    test(1, "abc",      "a[bcz]c");
-    test(1, "azc",      "a[bcz]c");
-    test(0, "ab",       "a[b]c");
-    test(0, "ac",       "a[b]c");
-    test(0, "axc",      "a[b]c");
-
-    test(0, "abc",      "a[!b]c");
-    test(0, "abc",      "a[!bcz]c");
-    test(0, "azc",      "a[!bcz]c");
-    test(0, "ab",       "a[!b]c");
-    test(0, "ac",       "a[!b]c");
-    test(1, "axc",      "a[!b]c");
-    test(1, "axc",      "a[!bcz]c");
-
-    test(1, "a1z",      "a[0-9]z");
-    test(0, "a1",       "a[0-9]z");
-    test(0, "az",       "a[0-9]z");
-    test(0, "axz",      "a[0-9]z");
-    test(1, "a2z",      "a[-0-9]z");
-    test(1, "a-z",      "a[-0-9]z");
-    test(1, "a-b",      "a[-]b");
-    test(0, "a-b",      "a[x-]b");
-    test(0, "a=b",      "a[x-]b");
-    test(1, "a-b",      "a[x`-]b");
-    test(0, "a=b",      "a[x`-]b");
-    test(1, "a-b",      "a[x---]b");
-    test(0, "a=b",      "a[x---]b");
-
-    test(0, "a0z",      "a[!0-9]z");
-    test(1, "aoz",      "a[!0-9]z");
-    test(0, "a1",       "a[!0-9]z");
-    test(0, "az",       "a[!0-9]z");
-    test(0, "a9Z",      "a[!0-9]z");
-    test(1, "acz",      "a[!-0-9]z");
-    test(0, "a7z",      "a[!-0-9]z");
-    test(0, "a-z",      "a[!-0-9]z");
-    test(0, "a-b",      "a[!-]b");
-    test(0, "a-b",      "a[!x-]b");
-    test(0, "a=b",      "a[!x-]b");
-    test(0, "a-b",      "a[!x`-]b");
-    test(1, "a=b",      "a[!x`-]b");
-    test(0, "a-b",      "a[!x---]b");
-    test(1, "a=b",      "a[!x---]b");
-
-    test(1, "a!z",      "a[`!0-9]z");
-    test(1, "a3Z",      "a[`!0-9]z");
-    test(0, "A3Z",      "a[`!0`-9]z");
-    test(1, "a9z",      "a[`!0`-9]z");
-    test(1, "a-z",      "a[`!0`-9]z");
-
-    test(1, "ac",       "a{b}c");
-    test(1, "abc",      "a{b}c");
-    test(1, "abbc",     "a{b}c");
-    test(1, "aBbBc",    "a{b}c");
-    test(1, "abc",      "a{bB}c");
-    test(1, "abc",      "a{bpz}c");
-    test(1, "azc",      "a{bcz}");
-    test(0, "ab",       "a{b}c");
-    test(0, "axc",      "a{b}c");
-
-    assert(fpattern_isvalid("a[`[`]]") == 1);
-    assert(fpattern_isvalid("a{`{`}}") == 2);
-    assert(fpattern_isvalid("a[b-z]") == 1);
-    assert(fpattern_isvalid("a?") == 1);
-    assert(fpattern_isvalid("a{b-z}") == 2);
-    assert(fpattern_isvalid("a*") == 2);
-    assert(fpattern_isvalid("a[aba]") == FPAT_INVALID);
-    assert(fpattern_isvalid("a[z-b]") == FPAT_INVALID);
-    assert(fpattern_isvalid("a[b c ]") == FPAT_INVALID);
-    assert(fpattern_isvalid("a[`a]") == FPAT_INVALID);
-
-    assert(fpattern_isvalid("[`80-`ff]") == FPAT_CLOSED);
-    assert(fpattern_isvalid("[`80-`ff]{`00-`7f}") == FPAT_OPEN);
-    assert(fpattern_isvalid("???") == FPAT_CLOSED);
-    test(1, "\x90\x40\x4f", "[`80-`ff]{`00-`7f}");
-    test(0, "\x90\x40\x4f\x90", "[`80-`ff]{`00-`7f}");
-    test(1, "\x90\x40\x4f", "[`80`90]*");
-
-    printf("%d tests, %d failures\n", count, fails);
-    return (fails == 0 ? 0 : 1);
-}
-
-
-#endif /* TEST */
-
-/* End fpattern.c */
diff --git a/apps/openmw-mp/amx/fpattern.h b/apps/openmw-mp/amx/fpattern.h
deleted file mode 100644
index 42f116b73..000000000
--- a/apps/openmw-mp/amx/fpattern.h
+++ /dev/null
@@ -1,184 +0,0 @@
-/******************************************************************************
-* fpattern.h
-*   Functions for matching filename patterns to filenames.
-*
-* Usage
-*   Filename patterns are composed of regular (printable) characters which
-*   may comprise a filename as well as special pattern matching characters:
-*
-*       .       Matches a period (.).
-*           Note that a period in a filename is not treated any
-*            differently than any other character.
-*
-*        ?      Any.
-*           Matches any single character except '/' or '\'.
-*
-*       *       Closure.
-*           Matches zero or more occurences of any characters other
-*           than '/' or '\'.
-*           Leading '*' characters are allowed.
-*
-*       SUB     Substitute (^Z); optionally supported.
-*           Similar to '*', this matches zero or more occurences of
-*           any characters other than '/', '\', or '.'.
-*           Leading '^Z' characters are allowed.
-*
-*       [ab]    Set.
-*           Matches the single character 'a' or 'b'.
-*           If the dash '-' character is to be included, it must
-*           immediately follow the opening bracket '['.
-*           If the closing bracket ']' character is to be included,
-*           it must be preceded by a quote '`'.
-*
-*       [a-z]   Range.
-*           Matches a single character in the range 'a' to 'z'.
-*           Ranges and sets may be combined within the same set of
-*           brackets.
-*
-*       [!R]    Exclusive range.
-*           Matches a single character not in the range 'R'.
-*           If range 'R' includes the dash '-' character, the dash
-*           must immediately follow the caret '!'.
-*
-*       !       Not; optionally supported.
-*           Makes the following pattern (up to the next '/') match
-*           any filename except those what it would normally match.
-*
-*       /       Path separator (UNIX and DOS).
-*           Matches a '/' or '\' pathname (directory) separator.
-*           Multiple separators are treated like a single
-*           separator.
-*           A leading separator indicates an absolute pathname.
-*
-*       \       Path separator (DOS).
-*           Same as the '/' character.
-*           Note that this character must be escaped if used within
-*           string constants ("\\").
-*
-*       \       Quote (UNIX).
-*           Makes the next character a regular (nonspecial)
-*           character.
-*           Note that to match the quote character itself, it must
-*           be quoted.
-*           Note that this character must be escaped if used within
-*           string constants ("\\").
-*
-*       `       Quote (DOS).
-*           Makes the next character a regular (nonspecial)
-*           character.
-*           Note that to match the quote character itself, it must
-*           be quoted.
-*
-*   Upper and lower case alphabetic characters are considered identical,
-*   i.e., 'a' and 'A' match each other.
-*   (What constitutes a lowercase letter depends on the current locale
-*   settings.)
-*
-*   Spaces and control characters are treated as normal characters.
-*
-* Examples
-*   The following patterns in the left column will match the filenames in
-*   the middle column and will not match filenames in the right column:
-*
-*       Pattern Will Match           Will Not Match
-*       ------- ----------           --------------
-*       a       a (only)            (anything else)
-*       a.      a. (only)           (anything else)
-*       a?c     abc, acc, arc, a.c      a, ac, abbc
-*       a*c     ac, abc, abbc, acc, a.c     a, ab, acb, bac
-*       a*      a, ab, abb, a., a.b     b, ba
-*       *       a, ab, abb, a., .foo, a.foo (nothing)
-*       *.      a., ab., abb., a.foo.       a, ab, a.foo, .foo
-*       *.*     a., a.b, ah.bc.foo      a
-*       ^Z      a, ab, abb          a., .foo, a.foo
-*       ^Z.     a., ab., abb.       a, .foo, a.foo
-*       ^Z.*    a, a., .foo, a.foo      ab, abb
-*       *2.c    2.c, 12.c, foo2.c, foo.12.c 2x.c
-*       a[b-z]c abc, acc, azc (only)        (anything else)
-*       [ab0-9]x    ax, bx, 0x, 9x          zx
-*       a[-.]b  a-b, a.b (only)         (anything else)
-*       a[!a-z]b    a0b, a.b, a@b       aab, azb, aa0b
-*       a[!-b]x a0x, a+x, acx           a-x, abx, axxx
-*       a[-!b]x a-x, a!x, abx (only)        (anything else)
-*       a[`]]x  a]x (only)          (anything else)
-*       a``x    a`x (only)          (anything else)
-*       oh`!    oh! (only)          (anything else)
-*       is`?it  is?it (only)        (anything else)
-*       !a?c    a, ac, ab, abb, acb, a.foo      abc, a.c, azc
-*
-* History
-*   1.00 1997-01-03 David Tribble.
-*       First cut.
-*   1.01 1997-01-03 David Tribble.
-*       Added '^Z' pattern character.
-*       Added fpattern_matchn().
-*   1.02 1997-01-26 David Tribble.
-*       Changed range negation character from '^' to '!', ala Unix.
-*   1.03 1997-08-02 David Tribble.
-*       Added 'FPAT_XXX' macro constants.
-*
-* Limitations
-*   This code is copyrighted by the author, but permission is hereby
-*   granted for its unlimited use provided that the original copyright
-*   and authorship notices are retained intact.
-*
-*   Other queries can be sent to:
-*       dtribble@technologist.com
-*       david.tribble@beasys.com
-*       dtribble@flash.net
-*
-* Copyright �1997 by David R. Tribble, all rights reserved.
-*/
-
-
-#ifndef fpattern_h
-#define fpattern_h    1
-
-#ifdef __cplusplus
-extern "C"
-{
-#endif
-
-
-/* Options */
-
-//#define FPAT_DELIM        /* handle path delimiters in a special way */
-//#define FPAT_SUBCLOS      /* support alternative closure */
-//#define FPAT_NOT_ENABLED  /* !pattern is enabled */
-#define FPAT_MSET_ENABLED   /* multi-set/range is enabled */
-
-
-/* Manifest constants */
-
-#define FPAT_QUOTE      '`'   /* Quotes a special char */
-#define FPAT_DEL       '/'    /* Path delimiter (used only when FPAT_DELIM is true) */
-#define FPAT_DEL2      '\\'   /* Path delimiter (used only when FPAT_DELIM is true) */
-#define FPAT_DOT       '.'    /* Dot char */
-#define FPAT_NOT       '!'    /* Exclusion (also used for sets) */
-#define FPAT_ANY       '?'    /* Any one char */
-#define FPAT_CLOS      '*'    /* Zero or more chars */
-#define FPAT_CLOSP     '\x1A' /* Zero or more nondelimiters (used only when FPAT_SUBCLOS is true) */
-#define FPAT_SET_L     '['    /* Set/range open bracket */
-#define FPAT_SET_R     ']'    /* Set/range close bracket */
-#define FPAT_MSET_L    '{'    /* Multi-set/range open bracket */
-#define FPAT_MSET_R    '}'    /* Multi-set/range close bracket*/
-#define FPAT_SET_THRU  '-'    /* Set range of chars */
-
-
-#define FPAT_INVALID    0    /* invalid pattern */
-#define FPAT_CLOSED     1    /* valid pattern */
-#define FPAT_OPEN       2    /* valid pattern */
-
-
-/* Public functions */
-
-extern int fpattern_isvalid(const char *pat);
-extern int fpattern_match(const char *pat, const char *fname, int flength, int keepcase);
-extern int fpattern_matchn(const char *pat, const char *fname, int flength, int keepcase);
-extern int fpattern_matchcount(const char *pat, const char *fname, int flength, int minlength, int keepcase);
-
-#ifdef __cplusplus
-}
-#endif
-
-#endif /* fpattern_h */
diff --git a/apps/openmw-mp/amx/linux/binreloc.c b/apps/openmw-mp/amx/linux/binreloc.c
deleted file mode 100644
index 1f6b3587d..000000000
--- a/apps/openmw-mp/amx/linux/binreloc.c
+++ /dev/null
@@ -1,778 +0,0 @@
-/*
- * BinReloc - a library for creating relocatable executables
- * Written by: Hongli Lai <h.lai@chello.nl>
- * http://autopackage.org/
- *
- * This source code is public domain. You can relicense this code
- * under whatever license you want.
- *
- * See http://autopackage.org/docs/binreloc/ for
- * more information and how to use this.
- */
-
-#ifndef __BINRELOC_C__
-#define __BINRELOC_C__
-
-#ifdef ENABLE_BINRELOC
-#include <sys/types.h>
-#include <sys/stat.h>
-#include <unistd.h>
-#endif /* ENABLE_BINRELOC */
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <limits.h>
-#include <string.h>
-#include "binreloc.h"
-
-#ifdef __cplusplus
-extern "C" {
-#endif /* __cplusplus */
-
-
-/** @internal
- * Find the canonical filename of the executable. Returns the filename
- * (which must be freed) or NULL on error. If the parameter 'error' is
- * not NULL, the error code will be stored there, if an error occured.
- */
-static char *
-_br_find_exe(BrInitError *error)
-{
-#ifndef ENABLE_BINRELOC
-    if (error)
-        *error = BR_INIT_ERROR_DISABLED;
-    return NULL;
-#else
-    char *path, *path2, *line, *result;
-    size_t buf_size;
-    ssize_t size;
-    struct stat stat_buf;
-    FILE *f;
-
-    /* Read from /proc/self/exe (symlink) */
-    if (sizeof (path) > SSIZE_MAX)
-        buf_size = SSIZE_MAX - 1;
-    else
-        buf_size = PATH_MAX - 1;
-    path = (char *) malloc (buf_size);
-    if (path == NULL) {
-        /* Cannot allocate memory. */
-        if (error)
-            *error = BR_INIT_ERROR_NOMEM;
-        return NULL;
-    }
-    path2 = (char *) malloc (buf_size);
-    if (path2 == NULL) {
-        /* Cannot allocate memory. */
-        if (error)
-            *error = BR_INIT_ERROR_NOMEM;
-        free (path);
-        return NULL;
-    }
-
-    strncpy (path2, "/proc/self/exe", buf_size - 1);
-
-    while (1) {
-        int i;
-
-        size = readlink (path2, path, buf_size - 1);
-        if (size == -1) {
-            /* Error. */
-            free (path2);
-            break;
-        }
-
-        /* readlink() success. */
-        path[size] = '\0';
-
-        /* Check whether the symlink's target is also a symlink.
-         * We want to get the final target. */
-        i = stat (path, &stat_buf);
-        if (i == -1) {
-            /* Error. */
-            free (path2);
-            break;
-        }
-
-        /* stat() success. */
-        if (!S_ISLNK (stat_buf.st_mode)) {
-            /* path is not a symlink. Done. */
-            free (path2);
-            return path;
-        }
-
-        /* path is a symlink. Continue loop and resolve this. */
-        strncpy (path, path2, buf_size - 1);
-    }
-
-
-    /* readlink() or stat() failed; this can happen when the program is
-     * running in Valgrind 2.2. Read from /proc/self/maps as fallback. */
-
-    buf_size = PATH_MAX + 128;
-    line = (char *) realloc (path, buf_size);
-    if (line == NULL) {
-        /* Cannot allocate memory. */
-        free (path);
-        if (error)
-            *error = BR_INIT_ERROR_NOMEM;
-        return NULL;
-    }
-
-    f = fopen ("/proc/self/maps", "r");
-    if (f == NULL) {
-        free (line);
-        if (error)
-            *error = BR_INIT_ERROR_OPEN_MAPS;
-        return NULL;
-    }
-
-    /* The first entry should be the executable name. */
-    result = fgets (line, (int) buf_size, f);
-    if (result == NULL) {
-        fclose (f);
-        free (line);
-        if (error)
-            *error = BR_INIT_ERROR_READ_MAPS;
-        return NULL;
-    }
-
-    /* Get rid of newline character. */
-    buf_size = strlen (line);
-    if (buf_size <= 0) {
-        /* Huh? An empty string? */
-        fclose (f);
-        free (line);
-        if (error)
-            *error = BR_INIT_ERROR_INVALID_MAPS;
-        return NULL;
-    }
-    if (line[buf_size - 1] == 10)
-        line[buf_size - 1] = 0;
-
-    /* Extract the filename; it is always an absolute path. */
-    path = strchr (line, '/');
-
-    /* Sanity check. */
-    if (strstr (line, " r-xp ") == NULL || path == NULL) {
-        fclose (f);
-        free (line);
-        if (error)
-            *error = BR_INIT_ERROR_INVALID_MAPS;
-        return NULL;
-    }
-
-    path = strdup (path);
-    free (line);
-    fclose (f);
-    return path;
-#endif /* ENABLE_BINRELOC */
-}
-
-
-/** @internal
- * Find the canonical filename of the executable which owns symbol.
- * Returns a filename which must be freed, or NULL on error.
- */
-static char *
-_br_find_exe_for_symbol(const void *symbol, BrInitError *error)
-{
-#ifndef ENABLE_BINRELOC
-    if (error)
-        *error = BR_INIT_ERROR_DISABLED;
-    return (char *) NULL;
-#else
-#define SIZE PATH_MAX + 100
-    FILE *f;
-    size_t address_string_len;
-    char *address_string, line[SIZE], *found;
-
-    if (symbol == NULL)
-        return (char *) NULL;
-
-    f = fopen ("/proc/self/maps", "r");
-    if (f == NULL)
-        return (char *) NULL;
-
-    address_string_len = 4;
-    address_string = (char *) malloc (address_string_len);
-    found = (char *) NULL;
-
-    while (!feof (f)) {
-        char *start_addr, *end_addr, *end_addr_end, *file;
-        void *start_addr_p, *end_addr_p;
-        size_t len;
-
-        if (fgets (line, SIZE, f) == NULL)
-            break;
-
-        /* Sanity check. */
-        if (strstr (line, " r-xp ") == NULL || strchr (line, '/') == NULL)
-            continue;
-
-        /* Parse line. */
-        start_addr = line;
-        end_addr = strchr (line, '-');
-        file = strchr (line, '/');
-
-        /* More sanity check. */
-        if (!(file > end_addr && end_addr != NULL && end_addr[0] == '-'))
-            continue;
-
-        end_addr[0] = '\0';
-        end_addr++;
-        end_addr_end = strchr (end_addr, ' ');
-        if (end_addr_end == NULL)
-            continue;
-
-        end_addr_end[0] = '\0';
-        len = strlen (file);
-        if (len == 0)
-            continue;
-        if (file[len - 1] == '\n')
-            file[len - 1] = '\0';
-
-        /* Get rid of "(deleted)" from the filename. */
-        len = strlen (file);
-        if (len > 10 && strcmp (file + len - 10, " (deleted)") == 0)
-            file[len - 10] = '\0';
-
-        /* I don't know whether this can happen but better safe than sorry. */
-        len = strlen (start_addr);
-        if (len != strlen (end_addr))
-            continue;
-
-
-        /* Transform the addresses into a string in the form of 0xdeadbeef,
-         * then transform that into a pointer. */
-        if (address_string_len < len + 3) {
-            address_string_len = len + 3;
-            address_string = (char *) realloc (address_string, address_string_len);
-        }
-
-        memcpy (address_string, "0x", 2);
-        memcpy (address_string + 2, start_addr, len);
-        address_string[2 + len] = '\0';
-        sscanf (address_string, "%p", &start_addr_p);
-
-        memcpy (address_string, "0x", 2);
-        memcpy (address_string + 2, end_addr, len);
-        address_string[2 + len] = '\0';
-        sscanf (address_string, "%p", &end_addr_p);
-
-
-        if (symbol >= start_addr_p && symbol < end_addr_p) {
-            found = file;
-            break;
-        }
-    }
-
-    free (address_string);
-    fclose (f);
-
-    if (found == NULL)
-        return (char *) NULL;
-    else
-        return strdup (found);
-#endif /* ENABLE_BINRELOC */
-}
-
-
-#ifndef BINRELOC_RUNNING_DOXYGEN
-#undef NULL
-#define NULL ((void *) 0) /* typecasted as char* for C++ type safeness */
-#endif
-
-static char *exe = (char *) NULL;
-
-
-/** Initialize the BinReloc library (for applications).
- *
- * This function must be called before using any other BinReloc functions.
- * It attempts to locate the application's canonical filename.
- *
- * @note If you want to use BinReloc for a library, then you should call
- *       br_init_lib() instead.
- *
- * @param error  If BinReloc failed to initialize, then the error code will
- *               be stored in this variable. Set to NULL if you want to
- *               ignore this. See #BrInitError for a list of error codes.
- *
- * @returns 1 on success, 0 if BinReloc failed to initialize.
- */
-int
-br_init(BrInitError *error)
-{
-    exe = _br_find_exe(error);
-    return exe != NULL;
-}
-
-
-/** Initialize the BinReloc library (for libraries).
- *
- * This function must be called before using any other BinReloc functions.
- * It attempts to locate the calling library's canonical filename.
- *
- * @note The BinReloc source code MUST be included in your library, or this
- *       function won't work correctly.
- *
- * @param error  If BinReloc failed to initialize, then the error code will
- *               be stored in this variable. Set to NULL if you want to
- *               ignore this. See #BrInitError for a list of error codes.
- *
- * @returns 1 on success, 0 if a filename cannot be found.
- */
-int
-br_init_lib(BrInitError *error)
-{
-    exe = _br_find_exe_for_symbol((const void *) "", error);
-    return exe != NULL;
-}
-
-
-/** Find the canonical filename of the current application.
- *
- * @param default_exe  A default filename which will be used as fallback.
- * @returns A string containing the application's canonical filename,
- *          which must be freed when no longer necessary. If BinReloc is
- *          not initialized, or if br_init() failed, then a copy of
- *          default_exe will be returned. If default_exe is NULL, then
- *          NULL will be returned.
- */
-char *
-br_find_exe(const char *default_exe)
-{
-    if (exe == (char *) NULL)
-    {
-        /* BinReloc is not initialized. */
-        if (default_exe != (const char *) NULL)
-            return strdup(default_exe);
-        else
-            return (char *) NULL;
-    }
-    return strdup(exe);
-}
-
-
-/** Locate the directory in which the current application is installed.
- *
- * The prefix is generated by the following pseudo-code evaluation:
- * \code
- * dirname(exename)
- * \endcode
- *
- * @param default_dir  A default directory which will used as fallback.
- * @return A string containing the directory, which must be freed when no
- *         longer necessary. If BinReloc is not initialized, or if the
- *         initialization function failed, then a copy of default_dir
- *         will be returned. If default_dir is NULL, then NULL will be
- *         returned.
- */
-char *
-br_find_exe_dir(const char *default_dir)
-{
-    if (exe == NULL)
-    {
-        /* BinReloc not initialized. */
-        if (default_dir != NULL)
-            return strdup(default_dir);
-        else
-            return NULL;
-    }
-
-    return br_dirname(exe);
-}
-
-
-/** Locate the prefix in which the current application is installed.
- *
- * The prefix is generated by the following pseudo-code evaluation:
- * \code
- * dirname(dirname(exename))
- * \endcode
- *
- * @param default_prefix  A default prefix which will used as fallback.
- * @return A string containing the prefix, which must be freed when no
- *         longer necessary. If BinReloc is not initialized, or if
- *         the initialization function failed, then a copy of default_prefix
- *         will be returned. If default_prefix is NULL, then NULL will be returned.
- */
-char *
-br_find_prefix(const char *default_prefix)
-{
-    char *dir1, *dir2;
-
-    if (exe == (char *) NULL)
-    {
-        /* BinReloc not initialized. */
-        if (default_prefix != (const char *) NULL)
-            return strdup(default_prefix);
-        else
-            return (char *) NULL;
-    }
-
-    dir1 = br_dirname(exe);
-    dir2 = br_dirname(dir1);
-    free(dir1);
-    return dir2;
-}
-
-
-/** Locate the application's binary folder.
- *
- * The path is generated by the following pseudo-code evaluation:
- * \code
- * prefix + "/bin"
- * \endcode
- *
- * @param default_bin_dir  A default path which will used as fallback.
- * @return A string containing the bin folder's path, which must be freed when
- *         no longer necessary. If BinReloc is not initialized, or if
- *         the initialization function failed, then a copy of default_bin_dir will
- *         be returned. If default_bin_dir is NULL, then NULL will be returned.
- */
-char *
-br_find_bin_dir(const char *default_bin_dir)
-{
-    char *prefix, *dir;
-
-    prefix = br_find_prefix((const char *) NULL);
-    if (prefix == (char *) NULL)
-    {
-        /* BinReloc not initialized. */
-        if (default_bin_dir != (const char *) NULL)
-            return strdup(default_bin_dir);
-        else
-            return (char *) NULL;
-    }
-
-    dir = br_build_path(prefix, "bin");
-    free(prefix);
-    return dir;
-}
-
-
-/** Locate the application's superuser binary folder.
- *
- * The path is generated by the following pseudo-code evaluation:
- * \code
- * prefix + "/sbin"
- * \endcode
- *
- * @param default_sbin_dir  A default path which will used as fallback.
- * @return A string containing the sbin folder's path, which must be freed when
- *         no longer necessary. If BinReloc is not initialized, or if the
- *         initialization function failed, then a copy of default_sbin_dir will
- *         be returned. If default_bin_dir is NULL, then NULL will be returned.
- */
-char *
-br_find_sbin_dir(const char *default_sbin_dir)
-{
-    char *prefix, *dir;
-
-    prefix = br_find_prefix((const char *) NULL);
-    if (prefix == (char *) NULL)
-    {
-        /* BinReloc not initialized. */
-        if (default_sbin_dir != (const char *) NULL)
-            return strdup(default_sbin_dir);
-        else
-            return (char *) NULL;
-    }
-
-    dir = br_build_path(prefix, "sbin");
-    free(prefix);
-    return dir;
-}
-
-
-/** Locate the application's data folder.
- *
- * The path is generated by the following pseudo-code evaluation:
- * \code
- * prefix + "/share"
- * \endcode
- *
- * @param default_data_dir  A default path which will used as fallback.
- * @return A string containing the data folder's path, which must be freed when
- *         no longer necessary. If BinReloc is not initialized, or if the
- *         initialization function failed, then a copy of default_data_dir
- *         will be returned. If default_data_dir is NULL, then NULL will be
- *         returned.
- */
-char *
-br_find_data_dir(const char *default_data_dir)
-{
-    char *prefix, *dir;
-
-    prefix = br_find_prefix((const char *) NULL);
-    if (prefix == (char *) NULL)
-    {
-        /* BinReloc not initialized. */
-        if (default_data_dir != (const char *) NULL)
-            return strdup(default_data_dir);
-        else
-            return (char *) NULL;
-    }
-
-    dir = br_build_path(prefix, "share");
-    free(prefix);
-    return dir;
-}
-
-
-/** Locate the application's localization folder.
- *
- * The path is generated by the following pseudo-code evaluation:
- * \code
- * prefix + "/share/locale"
- * \endcode
- *
- * @param default_locale_dir  A default path which will used as fallback.
- * @return A string containing the localization folder's path, which must be freed when
- *         no longer necessary. If BinReloc is not initialized, or if the
- *         initialization function failed, then a copy of default_locale_dir will be returned.
- *         If default_locale_dir is NULL, then NULL will be returned.
- */
-char *
-br_find_locale_dir(const char *default_locale_dir)
-{
-    char *data_dir, *dir;
-
-    data_dir = br_find_data_dir((const char *) NULL);
-    if (data_dir == (char *) NULL)
-    {
-        /* BinReloc not initialized. */
-        if (default_locale_dir != (const char *) NULL)
-            return strdup(default_locale_dir);
-        else
-            return (char *) NULL;
-    }
-
-    dir = br_build_path(data_dir, "locale");
-    free(data_dir);
-    return dir;
-}
-
-
-/** Locate the application's library folder.
- *
- * The path is generated by the following pseudo-code evaluation:
- * \code
- * prefix + "/lib"
- * \endcode
- *
- * @param default_lib_dir  A default path which will used as fallback.
- * @return A string containing the library folder's path, which must be freed when
- *         no longer necessary. If BinReloc is not initialized, or if the initialization
- *         function failed, then a copy of default_lib_dir will be returned.
- *         If default_lib_dir is NULL, then NULL will be returned.
- */
-char *
-br_find_lib_dir(const char *default_lib_dir)
-{
-    char *prefix, *dir;
-
-    prefix = br_find_prefix((const char *) NULL);
-    if (prefix == (char *) NULL)
-    {
-        /* BinReloc not initialized. */
-        if (default_lib_dir != (const char *) NULL)
-            return strdup(default_lib_dir);
-        else
-            return (char *) NULL;
-    }
-
-    dir = br_build_path(prefix, "lib");
-    free(prefix);
-    return dir;
-}
-
-
-/** Locate the application's libexec folder.
- *
- * The path is generated by the following pseudo-code evaluation:
- * \code
- * prefix + "/libexec"
- * \endcode
- *
- * @param default_libexec_dir  A default path which will used as fallback.
- * @return A string containing the libexec folder's path, which must be freed when
- *         no longer necessary. If BinReloc is not initialized, or if the initialization
- *         function failed, then a copy of default_libexec_dir will be returned.
- *         If default_libexec_dir is NULL, then NULL will be returned.
- */
-char *
-br_find_libexec_dir(const char *default_libexec_dir)
-{
-    char *prefix, *dir;
-
-    prefix = br_find_prefix((const char *) NULL);
-    if (prefix == (char *) NULL)
-    {
-        /* BinReloc not initialized. */
-        if (default_libexec_dir != (const char *) NULL)
-            return strdup(default_libexec_dir);
-        else
-            return (char *) NULL;
-    }
-
-    dir = br_build_path(prefix, "libexec");
-    free(prefix);
-    return dir;
-}
-
-
-/** Locate the application's configuration files folder.
- *
- * The path is generated by the following pseudo-code evaluation:
- * \code
- * prefix + "/etc"
- * \endcode
- *
- * @param default_etc_dir  A default path which will used as fallback.
- * @return A string containing the etc folder's path, which must be freed when
- *         no longer necessary. If BinReloc is not initialized, or if the initialization
- *         function failed, then a copy of default_etc_dir will be returned.
- *         If default_etc_dir is NULL, then NULL will be returned.
- */
-char *
-br_find_etc_dir(const char *default_etc_dir)
-{
-    char *prefix, *dir;
-
-    prefix = br_find_prefix((const char *) NULL);
-    if (prefix == (char *) NULL)
-    {
-        /* BinReloc not initialized. */
-        if (default_etc_dir != (const char *) NULL)
-            return strdup(default_etc_dir);
-        else
-            return (char *) NULL;
-    }
-
-    dir = br_build_path(prefix, "etc");
-    free(prefix);
-    return dir;
-}
-
-
-/***********************
- * Utility functions
- ***********************/
-
-/** Concatenate str1 and str2 to a newly allocated string.
- *
- * @param str1 A string.
- * @param str2 Another string.
- * @returns A newly-allocated string. This string should be freed when no longer needed.
- */
-char *
-br_strcat(const char *str1, const char *str2)
-{
-    char *result;
-    size_t len1, len2;
-
-    if (str1 == NULL)
-        str1 = "";
-    if (str2 == NULL)
-        str2 = "";
-
-    len1 = strlen(str1);
-    len2 = strlen(str2);
-
-    result = (char *) malloc(len1 + len2 + 1);
-    memcpy(result, str1, len1);
-    memcpy(result + len1, str2, len2);
-    result[len1 + len2] = '\0';
-
-    return result;
-}
-
-
-char *
-br_build_path(const char *dir, const char *file)
-{
-    char *dir2, *result;
-    size_t len;
-    int must_free = 0;
-
-    len = strlen(dir);
-    if (len > 0 && dir[len - 1] != '/')
-    {
-        dir2 = br_strcat(dir, "/");
-        must_free = 1;
-    } else
-        dir2 = (char *) dir;
-
-    result = br_strcat(dir2, file);
-    if (must_free)
-        free(dir2);
-    return result;
-}
-
-
-/* Emulates glibc's strndup() */
-static char *
-br_strndup(const char *str, size_t size)
-{
-    char *result = (char *) NULL;
-    size_t len;
-
-    if (str == (const char *) NULL)
-        return (char *) NULL;
-
-    len = strlen(str);
-    if (len == 0)
-        return strdup("");
-    if (size > len)
-        size = len;
-
-    result = (char *) malloc(len + 1);
-    memcpy(result, str, size);
-    result[size] = '\0';
-    return result;
-}
-
-
-/** Extracts the directory component of a path.
- *
- * Similar to g_dirname() or the dirname commandline application.
- *
- * Example:
- * \code
- * br_dirname ("/usr/local/foobar");  --> Returns: "/usr/local"
- * \endcode
- *
- * @param path  A path.
- * @returns     A directory name. This string should be freed when no longer needed.
- */
-char *
-br_dirname(const char *path)
-{
-    char *end, *result;
-
-    if (path == (const char *) NULL)
-        return (char *) NULL;
-
-    end = strrchr(path, '/');
-    if (end == (const char *) NULL)
-        return strdup(".");
-
-    while (end > path && *end == '/')
-        end--;
-    result = br_strndup(path, end - path + 1);
-    if (result[0] == 0)
-    {
-        free(result);
-        return strdup("/");
-    } else
-        return result;
-}
-
-
-#ifdef __cplusplus
-}
-#endif /* __cplusplus */
-
-#endif /* __BINRELOC_C__ */
diff --git a/apps/openmw-mp/amx/linux/binreloc.h b/apps/openmw-mp/amx/linux/binreloc.h
deleted file mode 100644
index d849d392f..000000000
--- a/apps/openmw-mp/amx/linux/binreloc.h
+++ /dev/null
@@ -1,80 +0,0 @@
-/*
- * BinReloc - a library for creating relocatable executables
- * Written by: Hongli Lai <h.lai@chello.nl>
- * http://autopackage.org/
- *
- * This source code is public domain. You can relicense this code
- * under whatever license you want.
- *
- * See http://autopackage.org/docs/binreloc/ for
- * more information and how to use this.
- */
-
-#ifndef __BINRELOC_H__
-#define __BINRELOC_H__
-
-#ifdef __cplusplus
-extern "C" {
-#endif /* __cplusplus */
-
-
-/** These error codes can be returned by br_init(), br_init_lib(), gbr_init() or gbr_init_lib(). */
-typedef enum {
-    /** Cannot allocate memory. */
-    BR_INIT_ERROR_NOMEM,
-    /** Unable to open /proc/self/maps; see errno for details. */
-    BR_INIT_ERROR_OPEN_MAPS,
-    /** Unable to read from /proc/self/maps; see errno for details. */
-    BR_INIT_ERROR_READ_MAPS,
-    /** The file format of /proc/self/maps is invalid; kernel bug? */
-    BR_INIT_ERROR_INVALID_MAPS,
-    /** BinReloc is disabled (the ENABLE_BINRELOC macro is not defined). */
-    BR_INIT_ERROR_DISABLED
-} BrInitError;
-
-
-#ifndef BINRELOC_RUNNING_DOXYGEN
-/* Mangle symbol names to avoid symbol collisions with other ELF objects. */
-    #define br_init             SbCJ22537442193159_br_init
-    #define br_init_lib         SbCJ22537442193159_br_init_lib
-    #define br_find_exe         SbCJ22537442193159_br_find_exe
-    #define br_find_exe_dir     SbCJ22537442193159_br_find_exe_dir
-    #define br_find_prefix      SbCJ22537442193159_br_find_prefix
-    #define br_find_bin_dir     SbCJ22537442193159_br_find_bin_dir
-    #define br_find_sbin_dir    SbCJ22537442193159_br_find_sbin_dir
-    #define br_find_data_dir    SbCJ22537442193159_br_find_data_dir
-    #define br_find_locale_dir  SbCJ22537442193159_br_find_locale_dir
-    #define br_find_lib_dir     SbCJ22537442193159_br_find_lib_dir
-    #define br_find_libexec_dir SbCJ22537442193159_br_find_libexec_dir
-    #define br_find_etc_dir     SbCJ22537442193159_br_find_etc_dir
-    #define br_strcat           SbCJ22537442193159_br_strcat
-    #define br_build_path       SbCJ22537442193159_br_build_path
-    #define br_dirname          SbCJ22537442193159_br_dirname
-
-
-#endif
-int   br_init             (BrInitError *error);
-int   br_init_lib         (BrInitError *error);
-
-char *br_find_exe         (const char *default_exe);
-char *br_find_exe_dir     (const char *default_dir);
-char *br_find_prefix      (const char *default_prefix);
-char *br_find_bin_dir     (const char *default_bin_dir);
-char *br_find_sbin_dir    (const char *default_sbin_dir);
-char *br_find_data_dir    (const char *default_data_dir);
-char *br_find_locale_dir  (const char *default_locale_dir);
-char *br_find_lib_dir     (const char *default_lib_dir);
-char *br_find_libexec_dir (const char *default_libexec_dir);
-char *br_find_etc_dir     (const char *default_etc_dir);
-
-/* Utility functions */
-char *br_strcat  (const char *str1, const char *str2);
-char *br_build_path (const char *dir, const char *file);
-char *br_dirname (const char *path);
-
-
-#ifdef __cplusplus
-}
-#endif /* __cplusplus */
-
-#endif /* __BINRELOC_H__ */
diff --git a/apps/openmw-mp/amx/linux/getch.c b/apps/openmw-mp/amx/linux/getch.c
deleted file mode 100644
index 6dd3959c2..000000000
--- a/apps/openmw-mp/amx/linux/getch.c
+++ /dev/null
@@ -1,104 +0,0 @@
-/* Extremely inefficient but portable POSIX getch() */
-
-#include <stdio.h>
-#include <string.h>
-#include <termios.h>    /* for tcgetattr() and tcsetattr() */
-#include <unistd.h>     /* for read() */
-#include <sys/socket.h>
-#include <sys/types.h>
-#include <sys/time.h>
-#include "getch.h"
-
-#ifndef STDIN_FILENO
-# define STDIN_FILENO 0
-#endif
-
-int
-getch (void)
-{
-  struct termios save_termios;
-  struct termios ios;
-  unsigned char b;
-  int c = 0;
-
-  if (!isatty (STDIN_FILENO))
-    return EOF;
-
-  if (tcgetattr (STDIN_FILENO, &save_termios) < 0)
-    return EOF;
-
-  ios = save_termios;
-  ios.c_lflag &= ~(ICANON | ECHO | ISIG);
-  ios.c_cc[VMIN] = 1;           /* read() will return with one char */
-  ios.c_cc[VTIME] = 0;          /* read() blocks forever */
-
-  if (tcsetattr (STDIN_FILENO, TCSANOW, &ios) < 0)
-    return EOF;
-
-  if (read (STDIN_FILENO, &b, 1) == 1)
-    c = (int)(0xff & b);
-  else
-    c = EOF;
-
-  tcsetattr (STDIN_FILENO, TCSANOW, &save_termios);
-
-  return c;
-}
-
-int
-kbhit (void)
-{
-  struct termios save_termios;
-  struct termios ios;
-  fd_set inp;
-  struct timeval timeout = {0, 0};
-  int result;
-
-  if (!isatty (STDIN_FILENO))
-    return 0;
-
-  if (tcgetattr (STDIN_FILENO, &save_termios) < 0)
-    return 0;
-
-  ios = save_termios;
-  ios.c_lflag &= ~(ICANON | ECHO | ISIG);
-  ios.c_cc[VMIN] = 1;           /* read() will return with one char */
-  ios.c_cc[VTIME] = 0;          /* read() blocks forever */
-
-  if (tcsetattr (STDIN_FILENO, TCSANOW, &ios) < 0)
-    return 0;
-
-  /* set up select() args */
-  FD_ZERO(&inp);
-  FD_SET(STDIN_FILENO, &inp);
-
-  result = select (STDIN_FILENO+1, &inp, NULL, NULL, &timeout) == 1;
-
-  tcsetattr (STDIN_FILENO, TCSANOW, &save_termios);
-
-  return result;
-}
-
-#if defined TEST_GETCH
-int
-main ()
-{
-  int i;
-  char c[4];
-
-  printf("Enter %d keys to continue: ", sizeof c - 1);
-  fflush (stdout);
-
-  memset(c, 0, sizeof c);
-  for (i=0; i<sizeof c - 1; i++)
-    c[i] = getch ();
-
-  printf("Your input: [%s]\n", c);
-
-  printf("Now hit any key to abort: ");
-  while (!kbhit())
-    printf(".");
-
-  return 0;
-}
-#endif
diff --git a/apps/openmw-mp/amx/linux/getch.h b/apps/openmw-mp/amx/linux/getch.h
deleted file mode 100644
index 71cdd83b9..000000000
--- a/apps/openmw-mp/amx/linux/getch.h
+++ /dev/null
@@ -1,15 +0,0 @@
-/* Extremely inefficient but portable POSIX getch(), see getch.c */
-#ifndef GETCH_H
-#define GETCH_H
-
-#if defined __cplusplus
-  extern "C" {
-#endif
-int getch(void);
-int kbhit(void);
-
-#if defined __cplusplus
-}
-#endif
-
-#endif /* GETCH_H */
diff --git a/apps/openmw-mp/amx/linux/sclinux.h b/apps/openmw-mp/amx/linux/sclinux.h
deleted file mode 100644
index a513745a4..000000000
--- a/apps/openmw-mp/amx/linux/sclinux.h
+++ /dev/null
@@ -1,49 +0,0 @@
-/*
- * Things needed to compile under linux.
- *
- * Should be reworked totally to use GNU's 'configure'
- */
-#ifndef SCLINUX_H
-#define SCLINUX_H
-
-/* getchar() is not a 'cool' replacement for MSDOS getch: Linux/unix depends on the features activated or not about the
- * controlling terminal's tty. This means that ioctl(2) calls must be performed, for instance to have the controlling
- * terminal tty's in 'raw' mode, if we want to be able to fetch a single character. This also means that everything must
- * be put back correctly when the function ends. See GETCH.C for an implementation.
- *
- * For interactive use of PawnRun/PawnDbg if would be much better to use GNU's readline package: the user would be able to
- * have a complete emacs/vi like line editing system.
- */
-#if !defined getch && !defined kbhit
-  #include "getch.h"
-#endif
-
-#define stricmp(a,b)    strcasecmp(a,b)
-#define strnicmp(a,b,c) strncasecmp(a,b,c)
-
-/*
- * WinWorld wants '\'. Unices do not.
- */
-#define DIRECTORY_SEP_CHAR      '/'
-#define DIRECTORY_SEP_STR       "/"
-
-/*
- * SC assumes that a computer is Little Endian unless told otherwise. It uses
- * (and defines) the macros BYTE_ORDER and BIG_ENDIAN.
- * For Linux, we must overrule these settings with those defined in glibc.
- */
-#if !defined __BYTE_ORDER
-# include <stdlib.h>
-#endif
-
-#if defined __OpenBSD__ || defined __FreeBSD__ || defined __APPLE__
-# define __BYTE_ORDER    BYTE_ORDER
-# define __LITTLE_ENDIAN LITTLE_ENDIAN
-# define __BIG_ENDIAN    BIG_ENDIAN
-#endif
-
-#if !defined __BYTE_ORDER
-# error "Can't figure computer byte order (__BYTE_ORDER macro not found)"
-#endif
-
-#endif /* SCLINUX_H */
diff --git a/apps/openmw-mp/amx/minGlue.h b/apps/openmw-mp/amx/minGlue.h
deleted file mode 100644
index 2d47d90e0..000000000
--- a/apps/openmw-mp/amx/minGlue.h
+++ /dev/null
@@ -1,31 +0,0 @@
-/*  Glue functions for the minIni library, based on the C/C++ stdio library
- *
- *  Or better said: this file contains macros that maps the function interface
- *  used by minIni to the standard C/C++ file I/O functions.
- *
- *  By CompuPhase, 2008-2014
- *  This "glue file" is in the public domain. It is distributed without
- *  warranties or conditions of any kind, either express or implied.
- */
-
-/* map required file I/O types and functions to the standard C library */
-#include <stdio.h>
-
-#define INI_FILETYPE                    FILE*
-#define ini_openread(filename,file)     ((*(file) = fopen((filename),"rb")) != NULL)
-#define ini_openwrite(filename,file)    ((*(file) = fopen((filename),"wb")) != NULL)
-#define ini_openrewrite(filename,file)  ((*(file) = fopen((filename),"r+b")) != NULL)
-#define ini_close(file)                 (fclose(*(file)) == 0)
-#define ini_read(buffer,size,file)      (fgets((buffer),(size),*(file)) != NULL)
-#define ini_write(buffer,file)          (fputs((buffer),*(file)) >= 0)
-#define ini_rename(source,dest)         (rename((source), (dest)) == 0)
-#define ini_remove(filename)            (remove(filename) == 0)
-
-#define INI_FILEPOS                     long int
-#define ini_tell(file,pos)              (*(pos) = ftell(*(file)))
-#define ini_seek(file,pos)              (fseek(*(file), *(pos), SEEK_SET) == 0)
-
-/* for floating-point support, define additional types and functions */
-#define INI_REAL                        float
-#define ini_ftoa(string,value)          sprintf((string),"%f",(value))
-#define ini_atof(string)                (INI_REAL)strtod((string),NULL)
diff --git a/apps/openmw-mp/amx/minIni.c b/apps/openmw-mp/amx/minIni.c
deleted file mode 100644
index acd778f0f..000000000
--- a/apps/openmw-mp/amx/minIni.c
+++ /dev/null
@@ -1,877 +0,0 @@
-/*  minIni - Multi-Platform INI file parser, suitable for embedded systems
- *
- *  These routines are in part based on the article "Multiplatform .INI Files"
- *  by Joseph J. Graf in the March 1994 issue of Dr. Dobb's Journal.
- *
- *  Copyright (c) CompuPhase, 2008-2015
- *
- *  Licensed under the Apache License, Version 2.0 (the "License"); you may not
- *  use this file except in compliance with the License. You may obtain a copy
- *  of the License at
- *
- *      http://www.apache.org/licenses/LICENSE-2.0
- *
- *  Unless required by applicable law or agreed to in writing, software
- *  distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
- *  WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the
- *  License for the specific language governing permissions and limitations
- *  under the License.
- *
- *  Version: $Id: minIni.c 5181 2015-01-21 09:44:28Z thiadmer $
- */
-
-#if (defined _UNICODE || defined __UNICODE__ || defined UNICODE) && !defined INI_ANSIONLY
-# if !defined UNICODE   /* for Windows */
-#   define UNICODE
-# endif
-# if !defined _UNICODE  /* for C library */
-#   define _UNICODE
-# endif
-#endif
-
-#define MININI_IMPLEMENTATION
-#include "minIni.h"
-#if defined NDEBUG
-  #define assert(e)
-#else
-  #include <assert.h>
-#endif
-
-#if !defined __T || defined INI_ANSIONLY
-  #include <ctype.h>
-  #include <string.h>
-  #include <stdlib.h>
-  #define TCHAR     char
-  #define __T(s)    s
-  #define _tcscat   strcat
-  #define _tcschr   strchr
-  #define _tcscmp   strcmp
-  #define _tcscpy   strcpy
-  #define _tcsicmp  stricmp
-  #define _tcslen   strlen
-  #define _tcsncmp  strncmp
-  #define _tcsnicmp strnicmp
-  #define _tcsrchr  strrchr
-  #define _tcstol   strtol
-  #define _tcstod   strtod
-  #define _totupper toupper
-  #define _stprintf sprintf
-  #define _tfgets   fgets
-  #define _tfputs   fputs
-  #define _tfopen   fopen
-  #define _tremove  remove
-  #define _trename  rename
-#endif
-
-#if defined __linux || defined __linux__
-  #define __LINUX__
-#elif defined FREEBSD && !defined __FreeBSD__
-  #define __FreeBSD__
-#elif defined(_MSC_VER)
-  #pragma warning(disable: 4996)  /* for Microsoft Visual C/C++ */
-#endif
-#if !defined strnicmp && !defined PORTABLE_STRNICMP
-  #if defined __LINUX__ || defined __FreeBSD__ || defined __OpenBSD__ || defined __APPLE__
-    #define strnicmp  strncasecmp
-  #endif
-#endif
-#if !defined _totupper
-  #define _totupper toupper
-#endif
-
-#if !defined INI_LINETERM
-  #if defined __LINUX__ || defined __FreeBSD__ || defined __OpenBSD__ || defined __APPLE__
-    #define INI_LINETERM    __T("\n")
-  #else
-    #define INI_LINETERM    __T("\r\n")
-  #endif
-#endif
-#if !defined INI_FILETYPE
-  #error Missing definition for INI_FILETYPE.
-#endif
-
-#if !defined sizearray
-  #define sizearray(a)    (sizeof(a) / sizeof((a)[0]))
-#endif
-
-enum quote_option {
-  QUOTE_NONE,
-  QUOTE_ENQUOTE,
-  QUOTE_DEQUOTE,
-};
-
-#if defined PORTABLE_STRNICMP
-int strnicmp(const TCHAR *s1, const TCHAR *s2, size_t n)
-{
-  register int c1, c2;
-
-  while (n-- != 0 && (*s1 || *s2)) {
-    c1 = *s1++;
-    if ('a' <= c1 && c1 <= 'z')
-      c1 += ('A' - 'a');
-    c2 = *s2++;
-    if ('a' <= c2 && c2 <= 'z')
-      c2 += ('A' - 'a');
-    if (c1 != c2)
-      return c1 - c2;
-  } /* while */
-  return 0;
-}
-#endif /* PORTABLE_STRNICMP */
-
-static TCHAR *skipleading(const TCHAR *str)
-{
-  assert(str != NULL);
-  while ('\0' < *str && *str <= ' ')
-    str++;
-  return (TCHAR *)str;
-}
-
-static TCHAR *skiptrailing(const TCHAR *str, const TCHAR *base)
-{
-  assert(str != NULL);
-  assert(base != NULL);
-  while (str > base && '\0' < *(str-1) && *(str-1) <= ' ')
-    str--;
-  return (TCHAR *)str;
-}
-
-static TCHAR *striptrailing(TCHAR *str)
-{
-  TCHAR *ptr = skiptrailing(_tcschr(str, '\0'), str);
-  assert(ptr != NULL);
-  *ptr = '\0';
-  return str;
-}
-
-static TCHAR *save_strncpy(TCHAR *dest, const TCHAR *source, size_t maxlen, enum quote_option option)
-{
-  size_t d, s;
-
-  assert(maxlen>0);
-  assert(dest <= source || dest >= source + maxlen);
-  if (option == QUOTE_ENQUOTE && maxlen < 3)
-    option = QUOTE_NONE;  /* cannot store two quotes and a terminating zero in less than 3 characters */
-
-  switch (option) {
-  case QUOTE_NONE:
-    for (d = 0; d < maxlen - 1 && source[d] != '\0'; d++)
-      dest[d] = source[d];
-    assert(d < maxlen);
-    dest[d] = '\0';
-    break;
-  case QUOTE_ENQUOTE:
-    d = 0;
-    dest[d++] = '"';
-    for (s = 0; source[s] != '\0' && d < maxlen - 2; s++, d++) {
-      if (source[s] == '"') {
-        if (d >= maxlen - 3)
-          break;  /* no space to store the escape character plus the one that follows it */
-        dest[d++] = '\\';
-      } /* if */
-      dest[d] = source[s];
-    } /* for */
-    dest[d++] = '"';
-    dest[d] = '\0';
-    break;
-  case QUOTE_DEQUOTE:
-    for (d = s = 0; source[s] != '\0' && d < maxlen - 1; s++, d++) {
-      if ((source[s] == '"' || source[s] == '\\') && source[s + 1] == '"')
-        s++;
-      dest[d] = source[s];
-    } /* for */
-    dest[d] = '\0';
-    break;
-  default:
-    assert(0);
-  } /* switch */
-
-  return dest;
-}
-
-static TCHAR *cleanstring(TCHAR *string, enum quote_option *quotes)
-{
-  int isstring;
-  TCHAR *ep;
-
-  assert(string != NULL);
-  assert(quotes != NULL);
-
-  /* Remove a trailing comment */
-  isstring = 0;
-  for (ep = string; *ep != '\0' && ((*ep != ';' && *ep != '#') || isstring); ep++) {
-    if (*ep == '"') {
-      if (*(ep + 1) == '"')
-        ep++;                 /* skip "" (both quotes) */
-      else
-        isstring = !isstring; /* single quote, toggle isstring */
-    } else if (*ep == '\\' && *(ep + 1) == '"') {
-      ep++;                   /* skip \" (both quotes */
-    } /* if */
-  } /* for */
-  assert(ep != NULL && (*ep == '\0' || *ep == ';' || *ep == '#'));
-  *ep = '\0';                 /* terminate at a comment */
-  striptrailing(string);
-  /* Remove double quotes surrounding a value */
-  *quotes = QUOTE_NONE;
-  if (*string == '"' && (ep = _tcschr(string, '\0')) != NULL && *(ep - 1) == '"') {
-    string++;
-    *--ep = '\0';
-    *quotes = QUOTE_DEQUOTE;  /* this is a string, so remove escaped characters */
-  } /* if */
-  return string;
-}
-
-static int getkeystring(INI_FILETYPE *fp, const TCHAR *Section, const TCHAR *Key,
-                        int idxSection, int idxKey, TCHAR *Buffer, int BufferSize,
-                        INI_FILEPOS *mark)
-{
-  TCHAR *sp, *ep;
-  int len, idx;
-  enum quote_option quotes;
-  TCHAR LocalBuffer[INI_BUFFERSIZE];
-
-  assert(fp != NULL);
-  /* Move through file 1 line at a time until a section is matched or EOF. If
-   * parameter Section is NULL, only look at keys above the first section. If
-   * idxSection is postive, copy the relevant section name.
-   */
-  len = (Section != NULL) ? (int)_tcslen(Section) : 0;
-  if (len > 0 || idxSection >= 0) {
-    idx = -1;
-    do {
-      if (!ini_read(LocalBuffer, INI_BUFFERSIZE, fp))
-        return 0;
-      sp = skipleading(LocalBuffer);
-      ep = _tcschr(sp, ']');
-    } while (*sp != '[' || ep == NULL || (((int)(ep-sp-1) != len || _tcsnicmp(sp+1,Section,len) != 0) && ++idx != idxSection));
-    if (idxSection >= 0) {
-      if (idx == idxSection) {
-        assert(ep != NULL);
-        assert(*ep == ']');
-        *ep = '\0';
-        save_strncpy(Buffer, sp + 1, BufferSize, QUOTE_NONE);
-        return 1;
-      } /* if */
-      return 0; /* no more section found */
-    } /* if */
-  } /* if */
-
-  /* Now that the section has been found, find the entry.
-   * Stop searching upon leaving the section's area.
-   */
-  assert(Key != NULL || idxKey >= 0);
-  len = (Key != NULL) ? (int)_tcslen(Key) : 0;
-  idx = -1;
-  do {
-    if (mark != NULL)
-      ini_tell(fp, mark);   /* optionally keep the mark to the start of the line */
-    if (!ini_read(LocalBuffer,INI_BUFFERSIZE,fp) || *(sp = skipleading(LocalBuffer)) == '[')
-      return 0;
-    sp = skipleading(LocalBuffer);
-    ep = _tcschr(sp, '=');  /* Parse out the equal sign */
-    if (ep == NULL)
-      ep = _tcschr(sp, ':');
-  } while (*sp == ';' || *sp == '#' || ep == NULL
-           || ((len == 0 || (int)(skiptrailing(ep,sp)-sp) != len || _tcsnicmp(sp,Key,len) != 0) && ++idx != idxKey));
-  if (idxKey >= 0) {
-    if (idx == idxKey) {
-      assert(ep != NULL);
-      assert(*ep == '=' || *ep == ':');
-      *ep = '\0';
-      striptrailing(sp);
-      save_strncpy(Buffer, sp, BufferSize, QUOTE_NONE);
-      return 1;
-    } /* if */
-    return 0;   /* no more key found (in this section) */
-  } /* if */
-
-  /* Copy up to BufferSize chars to buffer */
-  assert(ep != NULL);
-  assert(*ep == '=' || *ep == ':');
-  sp = skipleading(ep + 1);
-  sp = cleanstring(sp, &quotes);  /* Remove a trailing comment */
-  save_strncpy(Buffer, sp, BufferSize, quotes);
-  return 1;
-}
-
-/** ini_gets()
- * \param Section     the name of the section to search for
- * \param Key         the name of the entry to find the value of
- * \param DefValue    default string in the event of a failed read
- * \param Buffer      a pointer to the buffer to copy into
- * \param BufferSize  the maximum number of characters to copy
- * \param Filename    the name and full path of the .ini file to read from
- *
- * \return            the number of characters copied into the supplied buffer
- */
-int ini_gets(const TCHAR *Section, const TCHAR *Key, const TCHAR *DefValue,
-             TCHAR *Buffer, int BufferSize, const TCHAR *Filename)
-{
-  INI_FILETYPE fp;
-  int ok = 0;
-
-  if (Buffer == NULL || BufferSize <= 0 || Key == NULL)
-    return 0;
-  if (ini_openread(Filename, &fp)) {
-    ok = getkeystring(&fp, Section, Key, -1, -1, Buffer, BufferSize, NULL);
-    (void)ini_close(&fp);
-  } /* if */
-  if (!ok)
-    save_strncpy(Buffer, (DefValue != NULL) ? DefValue : __T(""), BufferSize, QUOTE_NONE);
-  return (int)_tcslen(Buffer);
-}
-
-/** ini_getl()
- * \param Section     the name of the section to search for
- * \param Key         the name of the entry to find the value of
- * \param DefValue    the default value in the event of a failed read
- * \param Filename    the name of the .ini file to read from
- *
- * \return            the value located at Key
- */
-long ini_getl(const TCHAR *Section, const TCHAR *Key, long DefValue, const TCHAR *Filename)
-{
-  TCHAR LocalBuffer[64];
-  int len = ini_gets(Section, Key, __T(""), LocalBuffer, sizearray(LocalBuffer), Filename);
-  return (len == 0) ? DefValue
-                    : ((len >= 2 && _totupper((int)LocalBuffer[1]) == 'X') ? _tcstol(LocalBuffer, NULL, 16)
-                                                                           : _tcstol(LocalBuffer, NULL, 10));
-}
-
-#if defined INI_REAL
-/** ini_getf()
- * \param Section     the name of the section to search for
- * \param Key         the name of the entry to find the value of
- * \param DefValue    the default value in the event of a failed read
- * \param Filename    the name of the .ini file to read from
- *
- * \return            the value located at Key
- */
-INI_REAL ini_getf(const TCHAR *Section, const TCHAR *Key, INI_REAL DefValue, const TCHAR *Filename)
-{
-  TCHAR LocalBuffer[64];
-  int len = ini_gets(Section, Key, __T(""), LocalBuffer, sizearray(LocalBuffer), Filename);
-  return (len == 0) ? DefValue : ini_atof(LocalBuffer);
-}
-#endif
-
-/** ini_getbool()
- * \param Section     the name of the section to search for
- * \param Key         the name of the entry to find the value of
- * \param DefValue    default value in the event of a failed read; it should
- *                    zero (0) or one (1).
- * \param Buffer      a pointer to the buffer to copy into
- * \param BufferSize  the maximum number of characters to copy
- * \param Filename    the name and full path of the .ini file to read from
- *
- * A true boolean is found if one of the following is matched:
- * - A string starting with 'y' or 'Y'
- * - A string starting with 't' or 'T'
- * - A string starting with '1'
- *
- * A false boolean is found if one of the following is matched:
- * - A string starting with 'n' or 'N'
- * - A string starting with 'f' or 'F'
- * - A string starting with '0'
- *
- * \return            the true/false flag as interpreted at Key
- */
-int ini_getbool(const TCHAR *Section, const TCHAR *Key, int DefValue, const TCHAR *Filename)
-{
-  TCHAR LocalBuffer[2] = __T("");
-  int ret;
-
-  ini_gets(Section, Key, __T(""), LocalBuffer, sizearray(LocalBuffer), Filename);
-  LocalBuffer[0] = (TCHAR)_totupper((int)LocalBuffer[0]);
-  if (LocalBuffer[0] == 'Y' || LocalBuffer[0] == '1' || LocalBuffer[0] == 'T')
-    ret = 1;
-  else if (LocalBuffer[0] == 'N' || LocalBuffer[0] == '0' || LocalBuffer[0] == 'F')
-    ret = 0;
-  else
-    ret = DefValue;
-
-  return(ret);
-}
-
-/** ini_getsection()
- * \param idx         the zero-based sequence number of the section to return
- * \param Buffer      a pointer to the buffer to copy into
- * \param BufferSize  the maximum number of characters to copy
- * \param Filename    the name and full path of the .ini file to read from
- *
- * \return            the number of characters copied into the supplied buffer
- */
-int  ini_getsection(int idx, TCHAR *Buffer, int BufferSize, const TCHAR *Filename)
-{
-  INI_FILETYPE fp;
-  int ok = 0;
-
-  if (Buffer == NULL || BufferSize <= 0 || idx < 0)
-    return 0;
-  if (ini_openread(Filename, &fp)) {
-    ok = getkeystring(&fp, NULL, NULL, idx, -1, Buffer, BufferSize, NULL);
-    (void)ini_close(&fp);
-  } /* if */
-  if (!ok)
-    *Buffer = '\0';
-  return (int)_tcslen(Buffer);
-}
-
-/** ini_getkey()
- * \param Section     the name of the section to browse through, or NULL to
- *                    browse through the keys outside any section
- * \param idx         the zero-based sequence number of the key to return
- * \param Buffer      a pointer to the buffer to copy into
- * \param BufferSize  the maximum number of characters to copy
- * \param Filename    the name and full path of the .ini file to read from
- *
- * \return            the number of characters copied into the supplied buffer
- */
-int  ini_getkey(const TCHAR *Section, int idx, TCHAR *Buffer, int BufferSize, const TCHAR *Filename)
-{
-  INI_FILETYPE fp;
-  int ok = 0;
-
-  if (Buffer == NULL || BufferSize <= 0 || idx < 0)
-    return 0;
-  if (ini_openread(Filename, &fp)) {
-    ok = getkeystring(&fp, Section, NULL, -1, idx, Buffer, BufferSize, NULL);
-    (void)ini_close(&fp);
-  } /* if */
-  if (!ok)
-    *Buffer = '\0';
-  return (int)_tcslen(Buffer);
-}
-
-
-#if !defined INI_NOBROWSE
-/** ini_browse()
- * \param Callback    a pointer to a function that will be called for every
- *                    setting in the INI file.
- * \param UserData    arbitrary data, which the function passes on the the
- *                    \c Callback function
- * \param Filename    the name and full path of the .ini file to read from
- *
- * \return            1 on success, 0 on failure (INI file not found)
- *
- * \note              The \c Callback function must return 1 to continue
- *                    browsing through the INI file, or 0 to stop. Even when the
- *                    callback stops the browsing, this function will return 1
- *                    (for success).
- */
-int  ini_browse(INI_CALLBACK Callback, const void *UserData, const TCHAR *Filename)
-{
-  TCHAR LocalBuffer[INI_BUFFERSIZE];
-  int lenSec, lenKey;
-  enum quote_option quotes;
-  INI_FILETYPE fp;
-
-  if (Callback == NULL)
-    return 0;
-  if (!ini_openread(Filename, &fp))
-    return 0;
-
-  LocalBuffer[0] = '\0';   /* copy an empty section in the buffer */
-  lenSec = (int)_tcslen(LocalBuffer) + 1;
-  for ( ;; ) {
-    TCHAR *sp, *ep;
-    if (!ini_read(LocalBuffer + lenSec, INI_BUFFERSIZE - lenSec, &fp))
-      break;
-    sp = skipleading(LocalBuffer + lenSec);
-    /* ignore empty strings and comments */
-    if (*sp == '\0' || *sp == ';' || *sp == '#')
-      continue;
-    /* see whether we reached a new section */
-    ep = _tcschr(sp, ']');
-    if (*sp == '[' && ep != NULL) {
-      *ep = '\0';
-      save_strncpy(LocalBuffer, sp + 1, INI_BUFFERSIZE, QUOTE_NONE);
-      lenSec = (int)_tcslen(LocalBuffer) + 1;
-      continue;
-    } /* if */
-    /* not a new section, test for a key/value pair */
-    ep = _tcschr(sp, '=');    /* test for the equal sign or colon */
-    if (ep == NULL)
-      ep = _tcschr(sp, ':');
-    if (ep == NULL)
-      continue;               /* invalid line, ignore */
-    *ep++ = '\0';             /* split the key from the value */
-    striptrailing(sp);
-    save_strncpy(LocalBuffer + lenSec, sp, INI_BUFFERSIZE - lenSec, QUOTE_NONE);
-    lenKey = (int)_tcslen(LocalBuffer + lenSec) + 1;
-    /* clean up the value */
-    sp = skipleading(ep);
-    sp = cleanstring(sp, &quotes);  /* Remove a trailing comment */
-    save_strncpy(LocalBuffer + lenSec + lenKey, sp, INI_BUFFERSIZE - lenSec - lenKey, quotes);
-    /* call the callback */
-    if (!Callback(LocalBuffer, LocalBuffer + lenSec, LocalBuffer + lenSec + lenKey, UserData))
-      break;
-  } /* for */
-
-  (void)ini_close(&fp);
-  return 1;
-}
-#endif /* INI_NOBROWSE */
-
-#if ! defined INI_READONLY
-static void ini_tempname(TCHAR *dest, const TCHAR *source, int maxlength)
-{
-  TCHAR *p;
-
-  save_strncpy(dest, source, maxlength, QUOTE_NONE);
-  p = _tcsrchr(dest, '\0');
-  assert(p != NULL);
-  *(p - 1) = '~';
-}
-
-static enum quote_option check_enquote(const TCHAR *Value)
-{
-  const TCHAR *p;
-
-  /* run through the value, if it has trailing spaces, or '"', ';' or '#'
-   * characters, enquote it
-   */
-  assert(Value != NULL);
-  for (p = Value; *p != '\0' && *p != '"' && *p != ';' && *p != '#'; p++)
-    /* nothing */;
-  return (*p != '\0' || (p > Value && *(p - 1) == ' ')) ? QUOTE_ENQUOTE : QUOTE_NONE;
-}
-
-static void writesection(TCHAR *LocalBuffer, const TCHAR *Section, INI_FILETYPE *fp)
-{
-  if (Section != NULL && _tcslen(Section) > 0) {
-    TCHAR *p;
-    LocalBuffer[0] = '[';
-    save_strncpy(LocalBuffer + 1, Section, INI_BUFFERSIZE - 4, QUOTE_NONE);  /* -1 for '[', -1 for ']', -2 for '\r\n' */
-    p = _tcsrchr(LocalBuffer, '\0');
-    assert(p != NULL);
-    *p++ = ']';
-    _tcscpy(p, INI_LINETERM); /* copy line terminator (typically "\n") */
-    if (fp != NULL)
-      (void)ini_write(LocalBuffer, fp);
-  } /* if */
-}
-
-static void writekey(TCHAR *LocalBuffer, const TCHAR *Key, const TCHAR *Value, INI_FILETYPE *fp)
-{
-  TCHAR *p;
-  enum quote_option option = check_enquote(Value);
-  save_strncpy(LocalBuffer, Key, INI_BUFFERSIZE - 3, QUOTE_NONE);  /* -1 for '=', -2 for '\r\n' */
-  p = _tcsrchr(LocalBuffer, '\0');
-  assert(p != NULL);
-  *p++ = '=';
-  save_strncpy(p, Value, INI_BUFFERSIZE - (p - LocalBuffer) - 2, option); /* -2 for '\r\n' */
-  p = _tcsrchr(LocalBuffer, '\0');
-  assert(p != NULL);
-  _tcscpy(p, INI_LINETERM); /* copy line terminator (typically "\n") */
-  if (fp != NULL)
-    (void)ini_write(LocalBuffer, fp);
-}
-
-static int cache_accum(const TCHAR *string, int *size, int max)
-{
-  int len = (int)_tcslen(string);
-  if (*size + len >= max)
-    return 0;
-  *size += len;
-  return 1;
-}
-
-static int cache_flush(TCHAR *buffer, int *size,
-                      INI_FILETYPE *rfp, INI_FILETYPE *wfp, INI_FILEPOS *mark)
-{
-  int terminator_len = (int)_tcslen(INI_LINETERM);
-  int pos = 0;
-
-  (void)ini_seek(rfp, mark);
-  assert(buffer != NULL);
-  buffer[0] = '\0';
-  assert(size != NULL);
-  assert(*size <= INI_BUFFERSIZE);
-  while (pos < *size) {
-    (void)ini_read(buffer + pos, INI_BUFFERSIZE - pos, rfp);
-    while (pos < *size && buffer[pos] != '\0')
-      pos++;            /* cannot use _tcslen() because buffer may not be zero-terminated */
-  } /* while */
-  if (buffer[0] != '\0') {
-    assert(pos > 0 && pos <= INI_BUFFERSIZE);
-    if (pos == INI_BUFFERSIZE)
-      pos--;
-    buffer[pos] = '\0'; /* force zero-termination (may be left unterminated in the above while loop) */
-    (void)ini_write(buffer, wfp);
-  }
-  ini_tell(rfp, mark);  /* update mark */
-  *size = 0;
-  /* return whether the buffer ended with a line termination */
-  return (pos > terminator_len) && (_tcscmp(buffer + pos - terminator_len, INI_LINETERM) == 0);
-}
-
-static int close_rename(INI_FILETYPE *rfp, INI_FILETYPE *wfp, const TCHAR *filename, TCHAR *buffer)
-{
-  (void)ini_close(rfp);
-  (void)ini_close(wfp);
-  (void)ini_remove(filename);
-  (void)ini_tempname(buffer, filename, INI_BUFFERSIZE);
-  (void)ini_rename(buffer, filename);
-  return 1;
-}
-
-/** ini_puts()
- * \param Section     the name of the section to write the string in
- * \param Key         the name of the entry to write, or NULL to erase all keys in the section
- * \param Value       a pointer to the buffer the string, or NULL to erase the key
- * \param Filename    the name and full path of the .ini file to write to
- *
- * \return            1 if successful, otherwise 0
- */
-int ini_puts(const TCHAR *Section, const TCHAR *Key, const TCHAR *Value, const TCHAR *Filename)
-{
-  INI_FILETYPE rfp;
-  INI_FILETYPE wfp;
-  INI_FILEPOS mark;
-  INI_FILEPOS head, tail;
-  TCHAR *sp, *ep;
-  TCHAR LocalBuffer[INI_BUFFERSIZE];
-  int len, match, flag, cachelen;
-
-  assert(Filename != NULL);
-  if (!ini_openread(Filename, &rfp)) {
-    /* If the .ini file doesn't exist, make a new file */
-    if (Key != NULL && Value != NULL) {
-      if (!ini_openwrite(Filename, &wfp))
-        return 0;
-      writesection(LocalBuffer, Section, &wfp);
-      writekey(LocalBuffer, Key, Value, &wfp);
-      (void)ini_close(&wfp);
-    } /* if */
-    return 1;
-  } /* if */
-
-  /* If parameters Key and Value are valid (so this is not an "erase" request)
-   * and the setting already exists, there are two short-cuts to avoid rewriting
-   * the INI file.
-   */
-  if (Key != NULL && Value != NULL) {
-    ini_tell(&rfp, &mark);
-    match = getkeystring(&rfp, Section, Key, -1, -1, LocalBuffer, sizearray(LocalBuffer), &head);
-    if (match) {
-      /* if the current setting is identical to the one to write, there is
-       * nothing to do.
-       */
-      if (_tcscmp(LocalBuffer,Value) == 0) {
-        (void)ini_close(&rfp);
-        return 1;
-      } /* if */
-      /* if the new setting has the same length as the current setting, and the
-       * glue file permits file read/write access, we can modify in place.
-       */
-      #if defined ini_openrewrite
-        /* we already have the start of the (raw) line, get the end too */
-        ini_tell(&rfp, &tail);
-        /* create new buffer (without writing it to file) */
-        writekey(LocalBuffer, Key, Value, NULL);
-        if (_tcslen(LocalBuffer) == (size_t)(tail - head)) {
-          /* length matches, close the file & re-open for read/write, then
-           * write at the correct position
-           */
-          (void)ini_close(&rfp);
-          if (!ini_openrewrite(Filename, &wfp))
-            return 0;
-          (void)ini_seek(&wfp, &head);
-          (void)ini_write(LocalBuffer, &wfp);
-          (void)ini_close(&wfp);
-          return 1;
-        } /* if */
-      #endif
-    } /* if */
-    /* key not found, or different value & length -> proceed (but rewind the
-     * input file first)
-     */
-    (void)ini_seek(&rfp, &mark);
-  } /* if */
-
-  /* Get a temporary file name to copy to. Use the existing name, but with
-   * the last character set to a '~'.
-   */
-  ini_tempname(LocalBuffer, Filename, INI_BUFFERSIZE);
-  if (!ini_openwrite(LocalBuffer, &wfp)) {
-    (void)ini_close(&rfp);
-    return 0;
-  } /* if */
-  ini_tell(&rfp, &mark);
-  cachelen = 0;
-
-  /* Move through the file one line at a time until a section is
-   * matched or until EOF. Copy to temp file as it is read.
-   */
-  len = (Section != NULL) ? (int)_tcslen(Section) : 0;
-  if (len > 0) {
-    do {
-      if (!ini_read(LocalBuffer, INI_BUFFERSIZE, &rfp)) {
-        /* Failed to find section, so add one to the end */
-        flag = cache_flush(LocalBuffer, &cachelen, &rfp, &wfp, &mark);
-        if (Key!=NULL && Value!=NULL) {
-          if (!flag)
-            (void)ini_write(INI_LINETERM, &wfp);  /* force a new line behind the last line of the INI file */
-          writesection(LocalBuffer, Section, &wfp);
-          writekey(LocalBuffer, Key, Value, &wfp);
-        } /* if */
-        return close_rename(&rfp, &wfp, Filename, LocalBuffer);  /* clean up and rename */
-      } /* if */
-      /* Copy the line from source to dest, but not if this is the section that
-       * we are looking for and this section must be removed
-       */
-      sp = skipleading(LocalBuffer);
-      ep = _tcschr(sp, ']');
-      match = (*sp == '[' && ep != NULL && (int)(ep-sp-1) == len && _tcsnicmp(sp + 1,Section,len) == 0);
-      if (!match || Key != NULL) {
-        if (!cache_accum(LocalBuffer, &cachelen, INI_BUFFERSIZE)) {
-          cache_flush(LocalBuffer, &cachelen, &rfp, &wfp, &mark);
-          (void)ini_read(LocalBuffer, INI_BUFFERSIZE, &rfp);
-          cache_accum(LocalBuffer, &cachelen, INI_BUFFERSIZE);
-        } /* if */
-      } /* if */
-    } while (!match);
-  } /* if */
-  cache_flush(LocalBuffer, &cachelen, &rfp, &wfp, &mark);
-  /* when deleting a section, the section head that was just found has not been
-   * copied to the output file, but because this line was not "accumulated" in
-   * the cache, the position in the input file was reset to the point just
-   * before the section; this must now be skipped (again)
-   */
-  if (Key == NULL) {
-    (void)ini_read(LocalBuffer, INI_BUFFERSIZE, &rfp);
-    ini_tell(&rfp, &mark);
-  } /* if */
-
-  /* Now that the section has been found, find the entry. Stop searching
-   * upon leaving the section's area. Copy the file as it is read
-   * and create an entry if one is not found.
-   */
-  len = (Key != NULL) ? (int)_tcslen(Key) : 0;
-  for( ;; ) {
-    if (!ini_read(LocalBuffer, INI_BUFFERSIZE, &rfp)) {
-      /* EOF without an entry so make one */
-      flag = cache_flush(LocalBuffer, &cachelen, &rfp, &wfp, &mark);
-      if (Key!=NULL && Value!=NULL) {
-        if (!flag)
-          (void)ini_write(INI_LINETERM, &wfp);  /* force a new line behind the last line of the INI file */
-        writekey(LocalBuffer, Key, Value, &wfp);
-      } /* if */
-      return close_rename(&rfp, &wfp, Filename, LocalBuffer);  /* clean up and rename */
-    } /* if */
-    sp = skipleading(LocalBuffer);
-    ep = _tcschr(sp, '='); /* Parse out the equal sign */
-    if (ep == NULL)
-      ep = _tcschr(sp, ':');
-    match = (ep != NULL && len > 0 && (int)(skiptrailing(ep,sp)-sp) == len && _tcsnicmp(sp,Key,len) == 0);
-    if ((Key != NULL && match) || *sp == '[')
-      break;  /* found the key, or found a new section */
-    /* copy other keys in the section */
-    if (Key == NULL) {
-      ini_tell(&rfp, &mark);  /* we are deleting the entire section, so update the read position */
-    } else {
-      if (!cache_accum(LocalBuffer, &cachelen, INI_BUFFERSIZE)) {
-        cache_flush(LocalBuffer, &cachelen, &rfp, &wfp, &mark);
-        (void)ini_read(LocalBuffer, INI_BUFFERSIZE, &rfp);
-        cache_accum(LocalBuffer, &cachelen, INI_BUFFERSIZE);
-      } /* if */
-    } /* if */
-  } /* for */
-  /* the key was found, or we just dropped on the next section (meaning that it
-   * wasn't found); in both cases we need to write the key, but in the latter
-   * case, we also need to write the line starting the new section after writing
-   * the key
-   */
-  flag = (*sp == '[');
-  cache_flush(LocalBuffer, &cachelen, &rfp, &wfp, &mark);
-  if (Key != NULL && Value != NULL)
-    writekey(LocalBuffer, Key, Value, &wfp);
-  /* cache_flush() reset the "read pointer" to the start of the line with the
-   * previous key or the new section; read it again (because writekey() destroyed
-   * the buffer)
-   */
-  (void)ini_read(LocalBuffer, INI_BUFFERSIZE, &rfp);
-  if (flag) {
-    /* the new section heading needs to be copied to the output file */
-    cache_accum(LocalBuffer, &cachelen, INI_BUFFERSIZE);
-  } else {
-    /* forget the old key line */
-    ini_tell(&rfp, &mark);
-  } /* if */
-  /* Copy the rest of the INI file */
-  while (ini_read(LocalBuffer, INI_BUFFERSIZE, &rfp)) {
-    if (!cache_accum(LocalBuffer, &cachelen, INI_BUFFERSIZE)) {
-      cache_flush(LocalBuffer, &cachelen, &rfp, &wfp, &mark);
-      (void)ini_read(LocalBuffer, INI_BUFFERSIZE, &rfp);
-      cache_accum(LocalBuffer, &cachelen, INI_BUFFERSIZE);
-    } /* if */
-  } /* while */
-  cache_flush(LocalBuffer, &cachelen, &rfp, &wfp, &mark);
-  return close_rename(&rfp, &wfp, Filename, LocalBuffer);  /* clean up and rename */
-}
-
-/* Ansi C "itoa" based on Kernighan & Ritchie's "Ansi C" book. */
-#define ABS(v)  ((v) < 0 ? -(v) : (v))
-
-static void strreverse(TCHAR *str)
-{
-  int i, j;
-  for (i = 0, j = (int)_tcslen(str) - 1; i < j; i++, j--) {
-    TCHAR t = str[i];
-    str[i] = str[j];
-    str[j] = t;
-  } /* for */
-}
-
-static void long2str(long value, TCHAR *str)
-{
-  int i = 0;
-  long sign = value;
-  int n;
-
-  /* generate digits in reverse order */
-  do {
-    n = (int)(value % 10);              /* get next lowest digit */
-    str[i++] = (TCHAR)(ABS(n) + '0');   /* handle case of negative digit */
-  } while (value /= 10);                /* delete the lowest digit */
-  if (sign < 0)
-    str[i++] = '-';
-  str[i] = '\0';
-
-  strreverse(str);
-}
-
-/** ini_putl()
- * \param Section     the name of the section to write the value in
- * \param Key         the name of the entry to write
- * \param Value       the value to write
- * \param Filename    the name and full path of the .ini file to write to
- *
- * \return            1 if successful, otherwise 0
- */
-int ini_putl(const TCHAR *Section, const TCHAR *Key, long Value, const TCHAR *Filename)
-{
-  TCHAR LocalBuffer[32];
-  long2str(Value, LocalBuffer);
-  return ini_puts(Section, Key, LocalBuffer, Filename);
-}
-
-#if defined INI_REAL
-/** ini_putf()
- * \param Section     the name of the section to write the value in
- * \param Key         the name of the entry to write
- * \param Value       the value to write
- * \param Filename    the name and full path of the .ini file to write to
- *
- * \return            1 if successful, otherwise 0
- */
-int ini_putf(const TCHAR *Section, const TCHAR *Key, INI_REAL Value, const TCHAR *Filename)
-{
-  TCHAR LocalBuffer[64];
-  ini_ftoa(LocalBuffer, Value);
-  return ini_puts(Section, Key, LocalBuffer, Filename);
-}
-#endif /* INI_REAL */
-#endif /* !INI_READONLY */
diff --git a/apps/openmw-mp/amx/minIni.h b/apps/openmw-mp/amx/minIni.h
deleted file mode 100644
index b4860d5f8..000000000
--- a/apps/openmw-mp/amx/minIni.h
+++ /dev/null
@@ -1,152 +0,0 @@
-/*  minIni - Multi-Platform INI file parser, suitable for embedded systems
- *
- *  Copyright (c) CompuPhase, 2008-2012
- *
- *  Licensed under the Apache License, Version 2.0 (the "License"); you may not
- *  use this file except in compliance with the License. You may obtain a copy
- *  of the License at
- *
- *      http://www.apache.org/licenses/LICENSE-2.0
- *
- *  Unless required by applicable law or agreed to in writing, software
- *  distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
- *  WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the
- *  License for the specific language governing permissions and limitations
- *  under the License.
- *
- *  Version: $Id: minIni.h 5181 2015-01-21 09:44:28Z thiadmer $
- */
-#ifndef MININI_H
-#define MININI_H
-
-#include "minGlue.h"
-
-#if (defined _UNICODE || defined __UNICODE__ || defined UNICODE) && !defined INI_ANSIONLY
-  #include <tchar.h>
-  #define mTCHAR TCHAR
-#else
-  /* force TCHAR to be "char", but only for minIni */
-  #define mTCHAR char
-#endif
-
-#if !defined INI_BUFFERSIZE
-  #define INI_BUFFERSIZE  512
-#endif
-
-#if defined __cplusplus
-  extern "C" {
-#endif
-
-int   ini_getbool(const mTCHAR *Section, const mTCHAR *Key, int DefValue, const mTCHAR *Filename);
-long  ini_getl(const mTCHAR *Section, const mTCHAR *Key, long DefValue, const mTCHAR *Filename);
-int   ini_gets(const mTCHAR *Section, const mTCHAR *Key, const mTCHAR *DefValue, mTCHAR *Buffer, int BufferSize, const mTCHAR *Filename);
-int   ini_getsection(int idx, mTCHAR *Buffer, int BufferSize, const mTCHAR *Filename);
-int   ini_getkey(const mTCHAR *Section, int idx, mTCHAR *Buffer, int BufferSize, const mTCHAR *Filename);
-
-#if defined INI_REAL
-INI_REAL ini_getf(const mTCHAR *Section, const mTCHAR *Key, INI_REAL DefValue, const mTCHAR *Filename);
-#endif
-
-#if !defined INI_READONLY
-int   ini_putl(const mTCHAR *Section, const mTCHAR *Key, long Value, const mTCHAR *Filename);
-int   ini_puts(const mTCHAR *Section, const mTCHAR *Key, const mTCHAR *Value, const mTCHAR *Filename);
-#if defined INI_REAL
-int   ini_putf(const mTCHAR *Section, const mTCHAR *Key, INI_REAL Value, const mTCHAR *Filename);
-#endif
-#endif /* INI_READONLY */
-
-#if !defined INI_NOBROWSE
-typedef int (*INI_CALLBACK)(const mTCHAR *Section, const mTCHAR *Key, const mTCHAR *Value, const void *UserData);
-int  ini_browse(INI_CALLBACK Callback, const void *UserData, const mTCHAR *Filename);
-#endif /* INI_NOBROWSE */
-
-#if defined __cplusplus
-  }
-#endif
-
-
-#if defined __cplusplus
-
-#if defined __WXWINDOWS__
-    #include "wxMinIni.h"
-#else
-  #include <string>
-
-  /* The C++ class in minIni.h was contributed by Steven Van Ingelgem. */
-  class minIni
-  {
-  public:
-    minIni(const std::string& filename) : iniFilename(filename)
-      { }
-
-    bool getbool(const std::string& Section, const std::string& Key, bool DefValue=false) const
-      { return ini_getbool(Section.c_str(), Key.c_str(), int(DefValue), iniFilename.c_str()) != 0; }
-
-    long getl(const std::string& Section, const std::string& Key, long DefValue=0) const
-      { return ini_getl(Section.c_str(), Key.c_str(), DefValue, iniFilename.c_str()); }
-
-    int geti(const std::string& Section, const std::string& Key, int DefValue=0) const
-      { return static_cast<int>(this->getl(Section, Key, long(DefValue))); }
-
-    std::string gets(const std::string& Section, const std::string& Key, const std::string& DefValue="") const
-      {
-        char buffer[INI_BUFFERSIZE];
-        ini_gets(Section.c_str(), Key.c_str(), DefValue.c_str(), buffer, INI_BUFFERSIZE, iniFilename.c_str());
-        return buffer;
-      }
-
-    std::string getsection(int idx) const
-      {
-        char buffer[INI_BUFFERSIZE];
-        ini_getsection(idx, buffer, INI_BUFFERSIZE, iniFilename.c_str());
-        return buffer;
-      }
-
-    std::string getkey(const std::string& Section, int idx) const
-      {
-        char buffer[INI_BUFFERSIZE];
-        ini_getkey(Section.c_str(), idx, buffer, INI_BUFFERSIZE, iniFilename.c_str());
-        return buffer;
-      }
-
-#if defined INI_REAL
-    INI_REAL getf(const std::string& Section, const std::string& Key, INI_REAL DefValue=0) const
-      { return ini_getf(Section.c_str(), Key.c_str(), DefValue, iniFilename.c_str()); }
-#endif
-
-#if ! defined INI_READONLY
-    bool put(const std::string& Section, const std::string& Key, long Value) const
-      { return ini_putl(Section.c_str(), Key.c_str(), Value, iniFilename.c_str()) != 0; }
-
-    bool put(const std::string& Section, const std::string& Key, int Value) const
-      { return ini_putl(Section.c_str(), Key.c_str(), (long)Value, iniFilename.c_str()) != 0; }
-
-    bool put(const std::string& Section, const std::string& Key, bool Value) const
-      { return ini_putl(Section.c_str(), Key.c_str(), (long)Value, iniFilename.c_str()) != 0; }
-
-    bool put(const std::string& Section, const std::string& Key, const std::string& Value) const
-      { return ini_puts(Section.c_str(), Key.c_str(), Value.c_str(), iniFilename.c_str()) != 0; }
-
-    bool put(const std::string& Section, const std::string& Key, const char* Value) const
-      { return ini_puts(Section.c_str(), Key.c_str(), Value, iniFilename.c_str()) != 0; }
-
-#if defined INI_REAL
-    bool put(const std::string& Section, const std::string& Key, INI_REAL Value) const
-      { return ini_putf(Section.c_str(), Key.c_str(), Value, iniFilename.c_str()) != 0; }
-#endif
-
-    bool del(const std::string& Section, const std::string& Key) const
-      { return ini_puts(Section.c_str(), Key.c_str(), 0, iniFilename.c_str()) != 0; }
-
-    bool del(const std::string& Section) const
-      { return ini_puts(Section.c_str(), 0, 0, iniFilename.c_str()) != 0; }
-#endif
-
-  private:
-    std::string iniFilename;
-  };
-
-#endif /* __WXWINDOWS__ */
-#endif /* __cplusplus */
-
-#endif /* MININI_H */
diff --git a/apps/openmw-mp/amx/osdefs.h b/apps/openmw-mp/amx/osdefs.h
deleted file mode 100644
index 5e07cd349..000000000
--- a/apps/openmw-mp/amx/osdefs.h
+++ /dev/null
@@ -1,159 +0,0 @@
-/*
- * Platform
- *   __MSDOS__    set when compiling for DOS (not Windows)
- *   _Windows     set when compiling for any version of Microsoft Windows
- *   __WIN32__    set when compiling for Windows95 or WindowsNT (32 bit mode)
- *   __32BIT__    set when compiling in 32-bit "flat" mode (DOS, Windows, ARM)
- *   __64BIT__    set when compiling in 64-bit mode
- *   __ECOS__     set if Pawn was included with the eCos with configtool
- *   __LINUX__    set when compiling for Linux
- *
- * Copyright 1998-2011, ITB CompuPhase, The Netherlands.
- * No usage restrictions, no warranties.
- */
-
-#ifndef _OSDEFS_H
-#define _OSDEFS_H
-
-/* Every compiler uses different "default" macros to indicate the mode
- * it is in. Throughout the source, we use the Borland C++ macros, so
- * the macros of Watcom C/C++ and Microsoft Visual C/C++ are mapped to
- * those of Borland C++.
- */
-#if defined(__WATCOMC__)
-  #if defined(__WINDOWS__) || defined(__NT__)
-    #define _Windows    1
-  #endif
-  #if defined(__386__) || defined(__NT__)
-    #define __32BIT__   1
-  #endif
-  #if defined(_Windows) && defined(__32BIT__)
-    #define __WIN32__   1
-  #endif
-#elif defined(_MSC_VER)
-  #if defined(_WINDOWS) || defined(_WIN32)
-    #define _Windows    1
-  #endif
-  #if defined(_WIN32)
-    #define __WIN32__   1
-    #define __32BIT__   1
-  #endif
-#elif defined __arm__
-  #define __32BIT__     1
-#elif defined __AVR__
-  #define __16BIT__     1
-#endif
-#if !defined __16BIT__ && !defined __32BIT__ && !defined __64BIT__
-  #define __32BIT__     1
-#endif
-
-
-#if (defined __linux || defined __linux__) && !defined __LINUX__
-  #define __LINUX__
-#endif
-/* To be able to eventually set __ECOS__, we have to find a symbol
- * defined in a common place (so including the header file won't break
- * anything for other platforms). <sys/types.h> includes
- * <pkgconf/system.h> and in this later file we can find CYGPKG_PAWN
- * if the Pawn package was included with configtool and so we know
- * that we are compiling for eCos.
- */
-#if defined CCSINFO
-  #include <sys/types.h>
-#endif
-#if defined CYGPKG_PAWN
-  #define __ECOS__      1
-  #define HAVE_ALLOCA_H 0
-#endif
-
-
-#if defined __FreeBSD__
-  #include <sys/endian.h>
-#elif defined __LINUX__
-  #include <endian.h>
-#elif defined __ECOS__
-  #include <cyg/hal/hal_endian.h>
-  #define BIG_ENDIAN    4321
-  #define LITTLE_ENDIAN 1234
-  #if (CYG_BYTEORDER == CYG_LSBFIRST)
-  #define BYTE_ORDER  LITTLE_ENDIAN
-  #else
-    #define BYTE_ORDER  BIG_ENDIAN
-  #endif
-   /*
-    * eCos option management.
-    */
-  #include <pkgconf/pawn.h>
-  #if CYGPKG_PAWN_AMX_ANSIONLY==1
-    #define AMX_ANSIONLY
-  #endif
-  #define PAWN_CELL_SIZE CYGPKG_PAWN_AMX_CELLSIZE
-  #if CYGPKG_PAWN_CORE_RANDOM==0
-    #define AMX_NORANDOM
-  #endif
-  #if CYGPKG_PAWN_CORE_PROPERTY==0
-    #define AMX_NOPROPLIST
-  #endif
-  #if CYGPKG_PAWN_AMX_CONS_FIXEDPOINT==1
-    #define FIXEDPOINT
-  #endif
-  #if CYGPKG_PAWN_AMX_CONS_FLOATPOINT==1
-    #define FLOATPOINT
-  #endif
-#endif
-
-/* Linux now has these */
-#if !defined BIG_ENDIAN
-  #define BIG_ENDIAN    4321
-#endif
-#if !defined LITTLE_ENDIAN
-  #define LITTLE_ENDIAN 1234
-#endif
-
-/* educated guess, BYTE_ORDER is undefined, i386 is common => little endian */
-#if !defined BYTE_ORDER
-  #if defined UCLINUX
-    #define BYTE_ORDER BIG_ENDIAN
-  #else
-    #define BYTE_ORDER LITTLE_ENDIAN
-  #endif
-#endif
-
-#if defined __MSDOS__ || defined __WIN32__ || defined _Windows
-  #define DIRSEP_CHAR '\\'
-#elif defined macintosh /* only the original Macintosh uses ':', OSX uses the '/' */
-  #define DIRSEP_CHAR ':'
-#else
-  #define DIRSEP_CHAR '/'
-#endif
-
-/* _MAX_PATH is sometimes called differently and it may be in limits.h or
- * stdlib.h instead of stdio.h.
- */
-#if !defined _MAX_PATH
-  /* not defined, perhaps stdio.h was not included */
-  #if !defined PATH_MAX
-    #include <stdio.h>
-  #endif
-  #if !defined _MAX_PATH && !defined PATH_MAX
-    /* no _MAX_PATH and no MAX_PATH, perhaps it is in limits.h */
-    #include <limits.h>
-  #endif
-  #if !defined _MAX_PATH && !defined PATH_MAX
-    /* no _MAX_PATH and no MAX_PATH, perhaps it is in stdlib.h */
-    #include <stdlib.h>
-  #endif
-  /* if _MAX_PATH is undefined, try common alternative names */
-  #if !defined _MAX_PATH
-    #if defined MAX_PATH
-      #define _MAX_PATH    MAX_PATH
-    #elif defined _POSIX_PATH_MAX
-      #define _MAX_PATH  _POSIX_PATH_MAX
-    #else
-      /* everything failed, actually we have a problem here... */
-      #define _MAX_PATH  1024
-    #endif
-  #endif
-#endif
-
-#endif  /* _OSDEFS_H */
diff --git a/apps/openmw-mp/main.cpp b/apps/openmw-mp/main.cpp
index 1e69f6542..88142d1c7 100644
--- a/apps/openmw-mp/main.cpp
+++ b/apps/openmw-mp/main.cpp
@@ -200,7 +200,6 @@ int main(int argc, char *argv[])
 
     Utils::printVersion("TES3MP dedicated server", TES3MP_VERSION, version.mCommitHash, TES3MP_PROTO_VERSION);
 
-    setenv("AMXFILE", moddir.c_str(), 1);
     setenv("MOD_DIR", moddir.c_str(), 1); // hack for lua
 
     setenv("LUA_PATH", Utils::convertPath(plugin_home + "/scripts/?.lua" + ";"
diff --git a/files/tes3mp/files/scripts/include/tes3mp.callbacks.inc b/files/tes3mp/files/scripts/include/tes3mp.callbacks.inc
deleted file mode 100644
index e66d97ee2..000000000
--- a/files/tes3mp/files/scripts/include/tes3mp.callbacks.inc
+++ /dev/null
@@ -1,23 +0,0 @@
-forward OnCreate(ID);
-forward OnDestroy(ID);
-forward OnSpawn(ID);
-forward OnActivate(ID, actor);
-forward OnCellChange(ID, cell);
-forward OnItemCountChange(ID, count);
-forward OnItemConditionChange(ID, Float:condition);
-forward OnItemEquippedChange(ID, Bool:equipped);
-forward OnActorValueChange(ID, ActorValue:index, Float:value);
-forward OnActorBaseValueChange(ID, ActorValue:index, Float:value);
-forward OnActorSneak(ID, Bool:sneaking);
-forward OnActorDeath(ID, killer, cause);
-forward OnActorAttack(victim, attacker, weapon, damage);
-forward OnPlayerDisconnect(ID, reason);
-forward OnPlayerRequestGame(ID);
-forward OnPlayerChat(ID, message{});
-
-forward OnClientAuthenticate(const name{}, const pwd{});
-forward OnGameTimeChange(year, month, day, hour);
-forward OnServerInit();
-forward OnServerExit(Bool:error);
-
-forward OnCharGen(ID);
diff --git a/files/tes3mp/files/scripts/include/tes3mp.functions.inc b/files/tes3mp/files/scripts/include/tes3mp.functions.inc
deleted file mode 100644
index c31993a67..000000000
--- a/files/tes3mp/files/scripts/include/tes3mp.functions.inc
+++ /dev/null
@@ -1,30 +0,0 @@
-const Sex: {
-	Male = 0,
-	Female = 1,
-}
-
-const Race: {
-	Argoninan = "Argonian",
-	Breton = "Breton",
-	DarkElf = "Dark Elf",
-	HighElf = "High Elf",
-	Imperial = "Imperial",
-	Khajiit = "Khajiit",
-	Nord = "Nord",
-	Orc = "Orc",
-	Redguard = "Redguard",
-	WoodElf = "Wood Elf"
-}
-
-native Bool:Kick(ID);
-native SetRespawnTime(interval);
-native GetRespawnTime();
-native SetSpawnCell(cell);
-native GetSpawnCell();
-
-native Bool:IsPlayer(ID);
-
-native GetBaseName(ID, message);
-native SetBaseName(ID);
-
-native CharGen(ID);
diff --git a/files/tes3mp/files/scripts/include/tes3mp.inc b/files/tes3mp/files/scripts/include/tes3mp.inc
deleted file mode 100644
index e69de29bb..000000000
diff --git a/files/tes3mp/files/scripts/include/tes3mp.transloc.inc b/files/tes3mp/files/scripts/include/tes3mp.transloc.inc
deleted file mode 100644
index a879b3f91..000000000
--- a/files/tes3mp/files/scripts/include/tes3mp.transloc.inc
+++ /dev/null
@@ -1,10 +0,0 @@
-native Bool:IsCell(cell);
-native Bool:IsInterior(cell);
-
-native GetPosition(ID, Float:x, Float:y, Float:z);
-native SetPosition(ID, Float:x, Float:y, Float:z);
-native GetRotation(ID, Float:x, Float:y, Float:z);
-native SetRotation(ID, Float:x, Float:y, Float:z);
-native SetCell(ID, cell);
-native GetCell(ID);
-
diff --git a/files/tes3mp/files/scripts/include/tes3mp.world.inc b/files/tes3mp/files/scripts/include/tes3mp.world.inc
deleted file mode 100644
index aa1c62542..000000000
--- a/files/tes3mp/files/scripts/include/tes3mp.world.inc
+++ /dev/null
@@ -1,15 +0,0 @@
-native SetGameWeather(weather);
-native SetGameTime(time);
-native SetGameYear(year);
-native SetGameMonth(month);
-native SetGameDay(day);
-native SetGameHour(hour);
-native SetTimeScale(Float:scale);
-
-native GetGameWeather();
-native GetGameTime();
-native GetGameYear();
-native GetGameMonth();
-native GetGameDay();
-native GetGameHour();
-native Float:GetTimeScale();