Fix shroud parsing functions

Addresses #5885

src/scripting/game_lua_kernel.cpp

@@ -790,7 +790,7 @@ static int intf_parse_shroud_bitmap(lua_State* L)
 	std::set<map_location> locs;
 	for(int x = 1; x <= temp.width(); x++) {
 		for(int y = 1; y <= temp.height(); y++) {
-			if(temp.value(x, y)) {
+			if(!temp.value(x, y)) {
 				locs.emplace(x, y, wml_loc());
 			}
 		}

src/scripting/lua_common.cpp

@@ -754,7 +754,7 @@ std::set<map_location> luaW_check_locationset(lua_State* L, int idx)
 	}
 	lua_len(L, idx);
 	int len = luaL_checkinteger(L, -1);
-	for(int i = 1; i < len; i++) {
+	for(int i = 1; i <= len; i++) {
 		lua_geti(L, idx, i);
 		locs.insert(luaW_checklocation(L, -1));
 		lua_pop(L, 1);