home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
GameStar Special 2004 August
/
GSSH0804.iso
/
Geschicklichkeit
/
Enigma
/
Enigma-081.exe
/
data
/
levels
/
ss16.lua
< prev
next >
Wrap
Text File
|
2003-09-26
|
2KB
|
45 lines
-- Sven Siggelkow 2003
dofile(enigma.FindDataFile("levels/ant.lua"))
cells={}
cells[" "]=cell{floor="fl-wood"}
cells["#"]=cell{stone="st-brick"}
cells["b"]=cell{stone="st-actorimpulse"}
cells["h"]=cell{parent=cells[" "],item="it-hollow"}
cells["x"]=cell{actor={"ac-blackball",{player=0}}}
level = {
-- 01234567890123456789
"#b################b#",--00
"b b",--01
"# h #",--02
"# #",--03
"# #",--04
"# #",--05
"# x h #",--06
"# #",--07
"# h #",--08
"# #",--09
"# h #",--10
"b b",--11
"#b################b#" --12
}
set_default_parent(cells[" "])
create_world_by_map(level,cells)
local top=set_actor("ac-top", 9,5, {mouseforce=0, range=20, force=-10})
local ac1=set_actor("ac-whiteball-small", 9,6, {player=1, mouseforce=1, controllers=1})
local ac2=set_actor("ac-whiteball-small", 9,7, {player=1, mouseforce=1, controllers=1})
local ac3=set_actor("ac-whiteball-small", 9,8, {player=1, mouseforce=1, controllers=1})
local ac4=set_actor("ac-whiteball-small", 9,9, {player=1, mouseforce=1, controllers=1})
local rotor=set_actor("ac-rotor", 9,11, {mouseforce=2, range=10, force=-10})
AddRubberBand(top, ac1, 6, 1)
AddRubberBand(ac1, ac2, 6, 1)
AddRubberBand(ac2, ac3, 6, 1)
AddRubberBand(ac3, ac4, 6, 1)
AddRubberBand(ac4, rotor, 3, 5)