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

« back to all changes in this revision

Viewing changes to data/levels/duffy28.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=80
3
 
levelh=40
4
 
 
5
 
create_world( levelw, levelh)
6
 
 
7
 
fill_floor("fl-abyss", 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-death", i-1, line)
14
 
                elseif c == "o" then
15
 
                        oxyd( i-1, line)
16
 
                elseif c == "!" then
17
 
                        abyss(i-1,line)
18
 
--                      fill_floor("fl-water", i-1,line, 1,1)
19
 
                elseif c=="z" then
20
 
                        set_actor("ac-blackball", i-.5,line+.5)
21
 
                        fill_floor("fl-leaves", i-1,line,1,1)
22
 
                elseif c==" " then
23
 
                        abyss(i-1,line)
24
 
                elseif c == "s" then
25
 
                        set_item("it-spring1",i-1,line)
26
 
                        fill_floor("fl-leaves", i-1,line,1,1)
27
 
                elseif c=="+" then
28
 
                        set_stone( "st-wood", i-1, line)
29
 
                elseif c=="*" then
30
 
                        set_stone( "st-greenbrown", i-1, line)
31
 
                elseif c=="H" then
32
 
                        set_stone("st-stone_break", i-1,line)
33
 
                elseif c=="9" then
34
 
                        set_stone( "st-floppy", i-1,line,{action="openclose",target="unimportantdoor"})
35
 
                elseif c=="a" then
36
 
                        fill_floor("fl-leaves", i-1,line,1,1)
37
 
                elseif c=="b" then
38
 
                        fill_floor("fl-sand", i-1,line,1,1)
39
 
                elseif c=="c" then
40
 
                        fill_floor("fl-bluegreen", i-1,line,1,1)
41
 
                elseif c=="d" then
42
 
                        fill_floor("fl-inverse", i-1,line, 1,1)
43
 
                elseif c=="e" then
44
 
                        fill_floor("fl-ice_001", i-1,line, 1,1)
45
 
                elseif c=="f" then
46
 
                        fill_floor("fl-marble", i-1,line, 1,1)
47
 
                elseif c=="g" then
48
 
                        fill_floor("fl-wood", i-1,line, 1,1)
49
 
                elseif c=="h" then
50
 
                        fill_floor("fl-hay", i-1,line, 1,1)
51
 
                elseif c=="i" then
52
 
                        fill_floor("fl-dunes", i-1,line, 1,1)
53
 
                elseif c=="j" then
54
 
                        fill_floor("fl-brick", i-1,line, 1,1)
55
 
                elseif c=="k" then
56
 
                        fill_floor("fl-gray", i-1,line, 1,1)
57
 
                elseif c=="l" then
58
 
                        fill_floor("fl-plank", i-1,line, 1,1)
59
 
                elseif c=="m" then
60
 
                        fill_floor("fl-metal",i-1,line, 1,1)
61
 
                elseif c=="n" then
62
 
                        fill_floor("fl-normal", i-1,line, 1,1)
63
 
                elseif c=="O" then
64
 
                        fill_floor("fl-rough", i-1,line, 1,1)
65
 
                elseif c=="p" then
66
 
                        fill_floor("fl-space", i-1,line, 1,1)
67
 
                elseif c=="q" then
68
 
                        fill_floor("fl-bluegreenx", i-1,line, 1,1)
69
 
                elseif c=="r" then
70
 
                        fill_floor("fl-leaves", i-1,line, 1,1)
71
 
                        set_stone("st-chameleon", i-1,line)
72
 
                elseif c=="S" then
73
 
                        fill_floor("fl-floor_001", i-1,line, 1,1)       
74
 
                end
75
 
        end     
76
 
end
77
 
 
78
 
                   
79
 
renderLine(00,"##########################################################")
80
 
renderLine(01,"#            c   #       jjj              #           ff #")
81
 
renderLine(02,"# aaaa bb  ccccc #     jjj j   kkkk   iii #   gg     fff #")
82
 
renderLine(03,"# azsa bbb ccccc #   jjj jjj   kk k   iii # gggg    ffff #")
83
 
renderLine(04,"# aaaa     ccc c #   j jjj j   kkkk   ii  #   ggg    fff #")
84
 
renderLine(05,"#                #   jjj jjj   kkk           d        ff #")
85
 
renderLine(06,"######    ddd     #    jjj j    k      h    ddd          #")
86
 
renderLine(07,"#     ee   ddd    #      jjj           hhh ddddd  #    p #")
87
 
renderLine(08,"#fff eeee dddd    #                         ddd   #   pp #")
88
 
renderLine(09,"#fff eeee  ddd    #   ll       ##########    d    #   pp #")
89
 
renderLine(10,"#f   eee      #####   lllll    #         #        #   pp #")
90
 
renderLine(11,"#ff  eeee  ###    #   olllo   ##  OOOOOO  #####          #")
91
 
renderLine(12,"#fff      #   j    #        ## #  OOOOOO                 #")
92
 
renderLine(13,"#       ##  jjj     #######*  r * OO  OO  jjjjjjj   # dd #")
93
 
renderLine(14,"#ggg   #  jjjjj   #    kkk rrrrr* OO  OO  jjjjj     # dd #")
94
 
renderLine(15,"#ggg  #    jjjjj #   kkkkk rrrrr* OOOOOO   jjj  aa  # dd #")
95
 
renderLine(16,"#gg  # OO   jjjj #    kkkk rrrrr* OOOOOO   j    aaa # dd #")
96
 
renderLine(17,"#gg # OOOO    jj                        e      aaaa #    #")
97
 
renderLine(18,"#gg   OOOO  # jj       qqq #SSSSS#  eeeeee        a #    #")
98
 
renderLine(19,"#      OOO #    #     qqqq #SSSSS# eeeeee #              #")
99
 
renderLine(20,"#      OO  #     pppp  qqq # SSSS#  eeeee #  bbbbb   ccc #")
100
 
renderLine(21,"#mmm      # iiii pppp  qqqq#l  S# nn      #  bbbb   cccc #")
101
 
renderLine(22,"#mmmmmmm # iiiii pppp  qqq #lll nnnnnn    #    bb   cccc #")
102
 
renderLine(23,"#mmmmmm  #  iii           # lll nnnn      #    bb  ccccc #")
103
 
renderLine(24,"##########################################################")
104
 
 
105
 
oxyd_shuffle()
106
 
 
107
 
--through=0
108
 
--function funcc()
109
 
--      through=0
110
 
--      SendMessage(door1, "openclose")
111
 
--      SendMessage(door2, "openclose")
112
 
--      SendMessage(door3, "openclose")
113
 
--      SendMessage(bridge1, "openclose")
114
 
--      SendMessage(bridge2, "openclose")
115
 
--end
 
 
b'\\ No newline at end of file'