home *** CD-ROM | disk | FTP | other *** search
-
- -- -----------------------------------------------------------------
- -- Init
- -- -----------------------------------------------------------------
- local function prog_init()
- initModels()
- local pokus = getRestartCount()
-
-
- -- -------------------------------------------------------------
- local function prog_init_room()
- local pom1, pom2, pomb1, pomb2 = 0, 0, false, false
-
- room.houk = -1
- room.citac = random(40) + 40
- local bgfaze
-
- return function()
- pom1 = 0
- if room.citac > 0 then
- room.citac = room.citac - 1
- end
- if room.houk == -1 then
- if valec.dir == dir_left then
- room.houk = room.houk + 1
- elseif room.citac == 0 and isReady(small) then
- addm(0, "steel-m-"..random(2))
- room.citac = -1
- else
- end
- else
- switch(math.mod(room.houk, 10)){
- [2] = function()
- room:talk("steel-x-redalert", VOLUME_FULL)
- bgfaze = 1
- pom1 = 1
- end,
- [4] = function()
- room:talk("steel-x-redalert", VOLUME_FULL)
- end,
- [9] = function()
- bgfaze = 2
- pom1 = 1
- end,
- }
- room.houk = room.houk + 1
- end
- if pom1 == 1 then
- for key, model in pairs(getModelsTable()) do
- if model ~= small and model ~= big then
- model.afaze = bgfaze
- model:updateAnim()
- end
- end
- game_changeBg("images/"..codename.."/steel-pozadi"..bgfaze..".png")
- end
- end
- end
-
- -- --------------------
- local update_table = {}
- local subinit
- subinit = prog_init_room()
- if subinit then
- table.insert(update_table, subinit)
- end
- return update_table
- end
- local update_table = prog_init()
-
-
- -- -----------------------------------------------------------------
- -- Update
- -- -----------------------------------------------------------------
- function prog_update()
- for key, subupdate in pairs(update_table) do
- subupdate()
- end
- end
-
-