home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
GameStar Special 2004 August
/
GSSH0804.iso
/
Geschicklichkeit
/
Enigma
/
Enigma-081.exe
/
data
/
levels
/
martin28.lua
< prev
next >
Wrap
Text File
|
2003-01-05
|
2KB
|
61 lines
-- created by Martin Hawlisch
levelw = 20
levelh = 13
create_world( levelw, levelh)
fill_floor( "fl-plank", 0, 0, levelw, levelh)
function renderLine( line, pattern)
for i=1, strlen(pattern) do
local c = strsub( pattern, i, i)
if c == "o" then
oxyd( i-1, line)
elseif c == "#" then
set_stone( "st-brick", i-1, line)
end
end
end
renderLine( 0, "############o#######")
renderLine( 1, "# # ## # ## # #")
renderLine( 2, "# #")
renderLine( 3, "## ## ### # ## # #")
renderLine( 4, "# # # #o#")
renderLine( 5, "## # #### # ### ###")
renderLine( 6, "## o# #")
renderLine( 7, "# ###o# # # ### ###")
renderLine( 8, "## # # #o#")
renderLine( 9, "## # # # # ### # #")
renderLine( 10, "# # # #")
renderLine( 11, "## # # # # #")
renderLine( 12, "##o###########o#o###")
oxyd_shuffle()
shogundot1( 6, 4, {action="openclose", target="door1"})
shogundot1( 7, 4, {action="openclose", target="door2"})
shogundot1( 8, 4, {action="openclose", target="door3"})
shogundot1( 9, 4, {action="openclose", target="door4"})
shogundot1(10, 3, {action="openclose", target="door6"})
shogundot1(10, 5, {action="openclose", target="door7"})
shogundot1( 8, 6, {action="openclose", target="door8"})
shogundot1(11, 6, {action="openclose", target="door5"})
set_stone( "st-shogun", 3, 6, {holes=1})
set_stone( "st-shogun",11, 2, {holes=1})
set_stone( "st-shogun",13, 6, {holes=1})
doorh( 2,11, {name="door1"})
doorv( 5, 6, {name="door2"})
doorh( 6, 8, {name="door3"})
doorh(14,11, {name="door4"})
doorh(18, 3, {name="door5"})
doorh(12, 1, {name="door6"})
doorh(18, 9, {name="door7"})
doorh(16,11, {name="door8"})
set_actor("ac-blackball", 9.5, 5.5, {player=0})