123 lines
3.1 KiB
Lua
123 lines
3.1 KiB
Lua
--[[
|
|
This file is part of Ice Lua Components.
|
|
|
|
Ice Lua Components is free software: you can redistribute it and/or modify
|
|
it under the terms of the GNU Lesser General Public License as published by
|
|
the Free Software Foundation, either version 3 of the License, or
|
|
(at your option) any later version.
|
|
|
|
Ice Lua Components is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU Lesser General Public License for more details.
|
|
|
|
You should have received a copy of the GNU Lesser General Public License
|
|
along with Ice Lua Components. If not, see <http://www.gnu.org/licenses/>.
|
|
]]
|
|
|
|
print("pkg/base/main_client.lua starting")
|
|
|
|
-- please excuse this hack.
|
|
a1,a2,a3,a4,a5,a6,a7,a8,a9,a10 = ...
|
|
|
|
dofile("pkg/base/lib_gui.lua")
|
|
|
|
do
|
|
local fnlist = {}
|
|
function load_screen_fetch(ftype, fname)
|
|
fnlist[#fnlist+1] = fname
|
|
|
|
local map,r,g,b,dist
|
|
map = common.map_get()
|
|
r,g,b,dist = client.map_fog_get()
|
|
|
|
local old_tick = client.hook_tick
|
|
local old_render = client.hook_render
|
|
local old_key = client.hook_key
|
|
local old_mouse_button = client.hook_mouse_button
|
|
local old_mouse_motion = client.hook_mouse_motion
|
|
|
|
function client.hook_key(key, state, modif)
|
|
-- TODO!
|
|
end
|
|
|
|
function client.hook_mouse_button(button, state)
|
|
-- TODO!
|
|
end
|
|
|
|
function client.hook_mouse_motion(x, y, dx, dy)
|
|
-- TODO!
|
|
end
|
|
|
|
common.map_set(nil)
|
|
client.map_fog_set(85, 85, 85, 127.5)
|
|
local csize, usize, amount
|
|
local obj = common.fetch_start(ftype, fname)
|
|
|
|
local loadstr = "Fetching..."
|
|
|
|
function client.hook_render()
|
|
local i
|
|
local sw,sh
|
|
sw,sh = client.screen_get_dims()
|
|
local koffs = math.max(#fnlist-10,1)
|
|
for i=koffs,#fnlist do
|
|
font_mini.print(2, 2+(i-koffs)*8, 0xFFFFFFFF, "LOAD: "..fnlist[i])
|
|
end
|
|
font_mini.print(2, sh-10, 0xFFFFFFFF, loadstr)
|
|
end
|
|
|
|
function client.hook_tick(sec_current, sec_delta)
|
|
-- TODO!
|
|
print("tick called.")
|
|
return 0.005
|
|
end
|
|
|
|
csize = nil
|
|
usize = nil
|
|
amount = 0.0
|
|
if obj == true then
|
|
while true do
|
|
obj, csize, usize, amount = common.fetch_poll()
|
|
--print("obj:", obj, csize, usize, amount)
|
|
if obj ~= false then break end
|
|
|
|
if csize then
|
|
loadstr = "Fetching... "
|
|
..(math.floor(amount*100.0))
|
|
.."% ("
|
|
..(math.floor(amount*csize))
|
|
.."/"
|
|
..csize
|
|
.." - uncompressed = "
|
|
..usize
|
|
..")"
|
|
end
|
|
end
|
|
end
|
|
|
|
client.hook_tick = old_tick
|
|
client.hook_render = old_render
|
|
client.hook_key = old_key
|
|
client.hook_mouse_button = old_mouse_button
|
|
client.hook_mouse_motion = old_mouse_motion
|
|
|
|
common.map_set(map)
|
|
client.map_fog_set(r,g,b,dist)
|
|
|
|
return obj
|
|
end
|
|
end
|
|
|
|
common.fetch_block = load_screen_fetch
|
|
|
|
function client.hook_tick()
|
|
client.hook_tick = nil
|
|
loadfile("pkg/"..common.base_dir.."/client_start.lua")(a1,a2,a3,a4,a5,a6,a7,a8,a9,a10)
|
|
return 0.005
|
|
end
|
|
|
|
--dofile("pkg/base/client_start.lua")
|
|
print("pkg/base/main_client.lua loaded.")
|
|
|