home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
GameStar Special 2004 August
/
GSSH0804.iso
/
Geschicklichkeit
/
Enigma
/
Enigma-081.exe
/
data
/
levels
/
ss9.lua
< prev
next >
Wrap
Text File
|
2003-09-12
|
2KB
|
52 lines
-- Sven Siggelkow 2003
levelw = 20
levelh = 13
create_world(levelw, levelh)
oxyd_default_flavor = "a"
set_actor("ac-blackball", 8.5,6.5, {player=0})
enigma.ConserveLevel=FALSE
fill_floor("fl-himalaya", 0,0, levelw,levelh)
fill_floor("fl-leaves", 14,7, 4,3)
fill_items( "it-burnable", 1, 1, 18, 11)
enigma.KillItem(16,7)
enigma.KillItem(17,8)
enigma.KillItem(16,9)
function renderLine( line, pattern)
for i=1, strlen(pattern) do
local c = strsub( pattern, i, i)
if c == "#" then
set_stone("st-wood", i-1,line)
elseif c =="P" then
set_stone("st-pull", i-1,line)
elseif c =="f" then
set_item("it-burnable-ignited", i-1,line)
elseif c=="O" then
oxyd(i-1,line)
elseif c=="." then
set_item("it-seed", i-1,line)
elseif c=="o" then
set_item("it-seed_nowood", i-1,line)
end
end
end
-- 01234567890123456789
renderLine(00 , "####################")
renderLine(01 , "#Of # # O#")
renderLine(02 , "#f ### o #")
renderLine(03 , "# # o P #")
renderLine(04 , "# #")
renderLine(05 , "# # #")
renderLine(06 , "# #. #")
renderLine(07 , "# . . #")
renderLine(08 , "# P #")
renderLine(09 , "# # #")
renderLine(10 , "# o . # o #")
renderLine(11 , "#O .O#")
renderLine(12 , "####################")
-- 01234567890123456789