1 |
-- Sven Siggelkow 2003 |
-- Sven Siggelkow 2003 |
2 |
-- ESPRIT #074 |
-- ESPRIT #074 |
3 |
|
|
4 |
levelw = 20 |
levelw = 20 |
5 |
levelh = 13 |
levelh = 13 |
6 |
create_world(levelw, levelh) |
create_world(levelw, levelh) |
7 |
oxyd_default_flavor = "b" |
oxyd_default_flavor = "b" |
8 |
set_actor("ac-blackball", 10,4.5, {player=0}) |
set_actor("ac-blackball", 10,4.5, {player=0}) |
9 |
set_actor("ac-whiteball-small", 3.5,8.5, {player=0, mouseforce=1}) |
set_actor("ac-killerball", 3.5,8.5, {player=0, mouseforce=1, controllers=1}) |
10 |
set_actor("ac-whiteball-small", 16.5,8.5, {player=0, mouseforce=1}) |
set_actor("ac-killerball", 16.5,8.5, {player=0, mouseforce=1, controllers=1}) |
11 |
fill_floor("fl-space",0,0,levelw,levelh) |
fill_floor("fl-space",0,0,levelw,levelh) |
12 |
|
|
13 |
function renderLine( line, pattern) |
function renderLine( line, pattern) |
14 |
for i=1, strlen(pattern) do |
for i=1, strlen(pattern) do |
15 |
local c = strsub( pattern, i, i) |
local c = strsub( pattern, i, i) |
16 |
if c == "I" then |
if c == "I" then |
17 |
set_stone("st-invisible", i-1,line) |
set_stone("st-invisible", i-1,line) |
18 |
elseif c=="#" then |
elseif c=="#" then |
19 |
set_floor("fl-metal", i-1, line) |
set_floor("fl-metal", i-1, line) |
20 |
elseif c=="O" then |
elseif c=="O" then |
21 |
oxyd(i-1,line) |
oxyd(i-1,line) |
22 |
end |
end |
23 |
end |
end |
24 |
end |
end |
25 |
-- 01234567890123456789 |
-- 01234567890123456789 |
26 |
renderLine(00 , "IIIIIIIIIIIIIIIIIIII") |
renderLine(00 , "IIIIIIIIIIIIIIIIIIII") |
27 |
renderLine(01 , "I I") |
renderLine(01 , "I I") |
28 |
renderLine(02 , "I I") |
renderLine(02 , "I I") |
29 |
renderLine(03 , "I I") |
renderLine(03 , "I I") |
30 |
renderLine(04 , "I # O ## O # I") |
renderLine(04 , "I # O ## O # I") |
31 |
renderLine(05 , "I I") |
renderLine(05 , "I I") |
32 |
renderLine(06 , "IO OO OI") |
renderLine(06 , "IO OO OI") |
33 |
renderLine(07 , "I I") |
renderLine(07 , "I I") |
34 |
renderLine(08 , "I # O ## O # I") |
renderLine(08 , "I # O ## O # I") |
35 |
renderLine(09 , "I I") |
renderLine(09 , "I I") |
36 |
renderLine(10 , "I I") |
renderLine(10 , "I I") |
37 |
renderLine(11 , "I I") |
renderLine(11 , "I I") |
38 |
renderLine(12 , "IIIIIIIIIIIIIIIIIIII") |
renderLine(12 , "IIIIIIIIIIIIIIIIIIII") |
39 |
-- 01234567890123456789 |
-- 01234567890123456789 |
40 |
|
|
41 |
oxyd_shuffle() |
oxyd_shuffle() |