1
2-- -----------------------------------------------------------------
3-- Init
4-- -----------------------------------------------------------------
5local function prog_init()
6    initModels()
7    sound_playMusic("music/rybky01.ogg")
8    local nehraje = true
9
10    -- -------------------------------------------------------------
11    local function prog_init_room()
12	local i;
13	local zbyva = 70+random(70);
14
15        room.misto = 0
16	room.uvod = true
17	room.ptafaze = -1
18
19        return function()
20	  if no_dialog() and isReady(small) and isReady(big) then
21	    zbyva = zbyva-1
22	  end
23	  if zbyva == 0 then
24	    room.ptafaze = room.ptafaze+1
25	    zbyva = 100+random(100)
26	    addm(0, "m-otazka"..room.ptafaze)
27	    if room.ptafaze==4 then room.ptafaze=0 end
28	    addv(5, "v-odpoved"..room.ptafaze)
29	  end
30
31	  if room.uvod then
32	    i = random(4)
33	    if i ~= 0 then
34	      addm(10, "m-zvlastni")
35	      addv(2, "v-zadne")
36	      if random(3) ~= 0 then
37	        addm(4, "m-zeme")
38	      end
39	    end
40	    if i ~= 1 then
41	      addm(30, "m-uvedomit")
42	      if random(3) ~= 0 then
43	        addv(0, "v-nad")
44	      end
45	      addm(0, "m-predmet")
46	      if random(3) ~= 0 then
47	        addv(10, "v-krehci")
48	      end
49	    end
50	    room.uvod = false
51	  end
52
53	  room.misto = room.misto+1
54	  if room.misto == 37 then room.misto = 0 end
55	  model_setViewShift(room.index, 0, room.misto)
56        end
57
58
59    end
60    -- --------------------
61    local update_table = {}
62    local subinit
63    subinit = prog_init_room()
64    if subinit then
65        table.insert(update_table, subinit)
66    end
67    return update_table
68end
69local update_table = prog_init()
70
71
72-- -----------------------------------------------------------------
73-- Update
74-- -----------------------------------------------------------------
75function prog_update()
76    for key, subupdate in pairs(update_table) do
77        subupdate()
78    end
79end
80
81