home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
GameStar Special 2004 August
/
GSSH0804.iso
/
Geschicklichkeit
/
Enigma
/
Enigma-081.exe
/
data
/
levels
/
ss_esp54.lua
< prev
next >
Wrap
Text File
|
2003-08-05
|
2KB
|
68 lines
-- Smutty Smurf 2003
-- ESPRIT #054
levelw = 20
levelh = 13
create_world(levelw, levelh)
oxyd_default_flavor = "a"
set_actor("ac-blackball", 10,2.5, {player=0})
fill_floor("fl-abyss",0,0,levelw,levelh)
enigma.SlopeForce = 150
enigma.SlopeForce2 = 150
function renderLine( line, pattern)
for i=1, strlen(pattern) do
local c = strsub( pattern, i, i)
if c == "#" then
set_stone("st-actorimpulse", i-1,line)
elseif c=="D" then
set_stone("st-death",i-1,line)
set_item("it-magnet",i-1,line)
elseif c=="W" then
set_stone("st-greenbrown",i-1,line)
elseif c=="1" then
set_floor("fl-gradient", i-1, line, {type=23})
elseif c=="2" then
set_floor("fl-gradient", i-1, line, {type=24})
elseif c=="3" then
set_floor("fl-gradient", i-1, line, {type=21})
elseif c=="5" then
set_floor("fl-gradient", i-1, line, {type=5})
elseif c=="6" then
set_floor("fl-gradient", i-1, line, {type=6})
elseif c=="a" then
set_floor("fl-gradient", i-1, line, {type=24})
set_item("it-wormhole",i-1,line, {targetx=" 2.5",targety="1.5",strength=0,range=0})
elseif c=="b" then
set_floor("fl-gradient", i-1, line, {type=23})
set_item("it-wormhole",i-1,line, {targetx=" 17.5",targety="1.5",strength=0,range=0})
elseif c=="O" then
oxyd(i-1,line)
end
end
end
-- 01234567890123456789
renderLine(00 , "####################")
renderLine(01 , "#555555555666666666#")
renderLine(02 , " #5555O5O56O6O6666# ")
renderLine(03 , " #55353533636366# ")
renderLine(04 , " #55O5O56O6O66# ")
renderLine(05 , " #5535336366# ")
renderLine(06 , " #55O56O66# ")
renderLine(07 , " #333333# ")
renderLine(08 , " #3333# ")
renderLine(09 , " #3333# ")
renderLine(10 , "WWWWWWW#3333#WWWWWWW")
renderLine(11 , "Da2222222211111111bD")
renderLine(12 , "WWWWWWWWWWWWWWWWWWWW")
-- 01234567890123456789
oxyd_shuffle()