[±9007199254740992] ([±2^53])

  100,000,000,000,000 (max: lua docs)
9,007,199,254,740,992 (max: double-precision IEEE 754)

        4,294,967,296 (2^32) — тип int
9,007,199,254,740,992 (2^53) — тип double
      000,000,000,000        — поле ORDERNO, тип INTEGER, 12 цифр

  int N  =  lua_tonumber(L,  -  1 );  

  typedef double lua_Number;
lua_Number lua_tonumber (lua_State  * L, int index);
  

   # define INT_MIN     ( -  2147483647   -   1 ) / *  minimum (signed) int value  * /  

int N = lua_tonumber(L, -1);

typedef double lua_Number;
lua_Number lua_tonumber (lua_State *L, int index);

#define INT_MIN     (-2147483647 - 1) /* minimum (signed) int value */

void msg_ToQuik(lua_State *L, std::string msg, int num)
{
   lua_settop(L, 0);
   lua_getglobal(L, "message");
   lua_pushfstring(L, msg.c_str());
   lua_pushnumber(L, num);
   lua_call(L, 2, 0);
}

function main()
   for i = getNumberOf("orders")-1,0,-1 do
      T = getItem("orders",i);
      if T.sec_code == "ROSN" and
         bit.test(T.flags,0) then
         message(tostring(T.order_num));
      end;
   end;
end;

#include <Windows.h>
#include <thread>

#define LUA_LIB
#define LUA_BUILD_AS_DLL
extern "C" {
#include "Lua\lauxlib.h"
#include "Lua\lua.h"
}




BOOL APIENTRY DllMain(HANDLE hModule, DWORD  ul_reason_for_call, LPVOID lpReserved)
{
   return TRUE;
}

static struct luaL_reg ls_lib[] = {
   { NULL, NULL }
};

#include <bitset>
extern "C" LUALIB_API int luaopen_test_addition(lua_State *L)
{
   auto _test = [](int bit_num, int bit_test)
   {
      std::bitset<16> bits(bit_num);

      return bits[bit_test] == 1;
   };
   lua_settop(L, 0);
   lua_getglobal(L, "getNumberOf");
   lua_pushfstring(L, "orders");
   lua_call(L, 1, 1);

   int length = (int)lua_tonumber(L, -1);
   lua_settop(L, 0);
   for (size_t i = 0; i < length; i++)
   {
      lua_getglobal(L, "getItem");
      lua_pushfstring(L, "orders");
      lua_pushnumber(L, i);
      lua_call(L,2,1);

      lua_getfield(L, -1, "sec_code");
      std::string sc = lua_tostring(L, -1);
      lua_remove(L, -1);
      lua_getfield(L, -1, "flags");
      int f = lua_tonumber(L, -1);
      lua_remove(L, -1);

      if (sc.compare("ROSN") == 0 && _test(f, 0))
      {
         lua_getfield(L, -1, "order_num");
         int N = lua_tonumber(L, -1);
         lua_remove(L, -1);

         msg_ToQuik(L, std::to_string(N), 1);
      }
      lua_settop(L, 0);
   }

   return 0;
}