~ubuntu-branches/ubuntu/intrepid/enigma/intrepid

« back to all changes in this revision

Viewing changes to data/levels/duffy21.lua

  • Committer: Bazaar Package Importer
  • Author(s): Erich Schubert
  • Date: 2005-08-28 15:30:09 UTC
  • mfrom: (1.1.1 upstream)
  • Revision ID: james.westby@ubuntu.com-20050828153009-sky64kb6tcq37xt5
Tags: 0.92.1-1
* New upstream subversion checkout
* Remove menu.s3m, which we are allowed to distributed but not to modify
  also copyright notice is confusing... (Closes: #321669)
* Rebuild with new libzipios (Closes: #325405)
  I hope this works without a versioned build-dependency
* Added "enigma replaces enigma-data" for upgrades (Closes: #308558)
* Added notes about the fonts copyright.
* updated to policy 3.6.2.1 (no changes)

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
 
2
 
levelw=50
3
 
levelh=30
4
 
 
5
 
create_world( levelw, levelh)
6
 
 
7
 
fill_floor("fl-metal", 0,0,levelw,levelh)
8
 
 
9
 
function renderLine( line, pattern)
10
 
    for i=1, strlen(pattern) do
11
 
        local c = strsub( pattern, i, i)
12
 
        if c =="#" then
13
 
            set_stone( "st-greenbrown", i-1, line)
14
 
        elseif c == "o" then
15
 
            oxyd( i-1, line)
16
 
        elseif c == "D" then
17
 
            set_stone( "st-death", i-1, line)
18
 
        elseif c == "!" then
19
 
            --                  abyss(i-1,line)
20
 
            fill_floor("fl-water", i-1,line, 1,1)
21
 
        elseif c == " " then
22
 
            abyss(i-1,line)
23
 
        elseif c=="w" then
24
 
            set_actor("ac-whiteball-small", i-.5,line+.5, {player=0, mouseforce=1})
25
 
        elseif c=="H" then
26
 
            hollow(i-1,line)
27
 
        elseif c=="*" then
28
 
            set_stone("st-greenbrown",i-1,line)
29
 
        elseif c=="r" then
30
 
            set_floor("fl-gradient", i-1,line , {type=23})
31
 
        elseif c=="l" then
32
 
            set_floor("fl-gradient", i-1,line , {type=24})
33
 
 
34
 
        elseif c=="R" then
35
 
            set_floor("fl-gradient", i-1,line , {type=23})
36
 
            set_actor("ac-whiteball-small", i-.5,line+.5, {player=0})
37
 
        elseif c=="L" then
38
 
            set_floor("fl-gradient", i-1,line , {type=24})
39
 
            set_actor("ac-whiteball-small", i-.5,line+.5, {player=0})
40
 
        elseif c=="x" then
41
 
            set_floor("fl-metal", i-1,line)
42
 
        elseif c=="X" then
43
 
            set_floor("fl-metal", i-1,line)
44
 
            set_actor("ac-whiteball-small", i-.5,line+.5, {player=0})
45
 
        end
46
 
    end 
47
 
end
48
 
 
49
 
 
50
 
renderLine(00,"   ###    ###       ")
51
 
renderLine(01," ###r#o####r#o##### ")
52
 
renderLine(02," DrrrrrrrrRrrrrrrr# ")
53
 
renderLine(03," ##r##o######o##r## ")
54
 
renderLine(04,"  ###    ###   ###  ")
55
 
renderLine(05," ##x##o###x##o##### ")
56
 
renderLine(06," DxxxxxxxxxxxxxxxxD ")
57
 
renderLine(07," #####o###x##o##x## ")
58
 
renderLine(08,"  ###    ###   ###  ")
59
 
renderLine(09," ##l##o###l##o##### ")
60
 
renderLine(10," #llllllllLlllllllD ")
61
 
renderLine(11," #####o#l####o##l## ")
62
 
renderLine(12,"       ###     ###  ")
63
 
 
64
 
oxyd_shuffle()
65
 
 
66
 
set_actor("ac-whiteball-small", 10.5,6.5, {player=0})
 
 
b'\\ No newline at end of file'