home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / siegfried88.lua < prev    next >
Text File  |  2003-05-01  |  3KB  |  80 lines
  1. --Siegfried Fennig 01.05.2003 Rev.0
  2.  
  3. levelw = 39
  4. levelh = 25
  5.  
  6. create_world(levelw, levelh)
  7. enigma.ConserveLevel = FALSE
  8. oxyd_default_flavor = "d"
  9. fill_floor("fl-abyss", 0,0, level_width,level_height)
  10.  
  11. function renderLine( line, pattern)
  12.     for i=1, strlen(pattern) do
  13.       local c = strsub( pattern, i, i)
  14.       if c == "r" then
  15.          set_stone("st-rock1",i-1,line)
  16.       elseif c == "o" then
  17.          oxyd( i-1, line)
  18.       elseif c == "S" then
  19.          springboard(i-1,line)
  20.       elseif c == "g" then
  21.          set_floor("fl-gray",i-1,line)
  22.       elseif c == "n" then
  23.          set_floor("fl-gradient",i-1,line,{type=22})
  24.       elseif c == "e" then
  25.          set_floor("fl-gradient",i-1,line,{type=23})
  26.       elseif c == "s" then
  27.          set_floor("fl-gradient",i-1,line,{type=21})
  28.       elseif c == "w" then
  29.          set_floor("fl-gradient",i-1,line,{type=24})
  30.       elseif c == "b" then
  31.          basis(i-1,line)
  32.       elseif c == "a" then
  33.          set_actor("ac-blackball", i-.5,line+.5, {player=0})
  34.       elseif c == "d" then
  35.          document(i-1,line,"")
  36.         end
  37.     end
  38. end
  39.  
  40. function basis(x, y)
  41.        fill_floor("fl-gray", x, y, 3, 3)
  42. end
  43.  
  44. function springboard(x, y)
  45.        set_floor("fl-springboard", x, y)
  46.        set_item("it-springboard", x, y)
  47. end
  48.  
  49. --                        1         2         3
  50. --              012345678901234567890123456789012345678
  51. renderLine(00, "  o                                    ")
  52. renderLine(01, " b  rrrrrrrrrr   b  rrrrrrrrrrrr   b   ")
  53. renderLine(02, "  a eeeeeeeSee      eeeeeeeeeSee      o")
  54. renderLine(03, "    rrrrrrrrrr      rrrrrrrrrrrr       ")
  55. renderLine(04, "                 rgr               rsr ")
  56. renderLine(05, "     b     rrrrrrrgrb     rrrrrrrr rsr ")
  57. renderLine(06, "           wSwwwwwgr      Swwwwwgr rsr ")
  58. renderLine(07, " rnr       rrrrrrrrr      rrrrrrgr rsr ")
  59. renderLine(08, " rnr rgr         rggggr        rgr rsr ")
  60. renderLine(09, " rSr rgr         rsrrrr        rgr rsr ")
  61. renderLine(10, " rnr rgr         rsr           rgr rsr ")
  62. renderLine(11, " rnr rgr         rsr           rgr rsr ")
  63. renderLine(12, " rnr rgr         rsr           rgr rsr ")
  64. renderLine(13, " rnr rgr         rsr           rgr rsr ")
  65. renderLine(14, " rnr rgr         rsr           rgr rsr ")
  66. renderLine(15, " rnr rgr         rsr           rgr rSr ")
  67. renderLine(16, " rnr rgr         rSr           rgr rsr ")
  68. renderLine(17, " rnr rgr         rsr           rgr rsr ")
  69. renderLine(18, " rnr rgrrrrrrrrr     b  rrrrrrrrgr     ")
  70. renderLine(19, " rnr ogeeeeeeeeS        gggggggggo     ")
  71. renderLine(20, " rnr rrrrrrrrrrr        rrrrrrrrrr     ")
  72. renderLine(21, " b     rrrrrrrrrrb     rrrrrrrrrrrrb   ")
  73. renderLine(22, "o      wwSwwwwwww      wwSwwwwwwwww    ")
  74. renderLine(23, "       rrrrrrrrrr      rrrrrrrrrrrr    ")
  75. renderLine(24, "                                    o  ")
  76. --              012345678901234567890123456789012345678
  77. --                        1         2         3
  78.  
  79. oxyd_shuffle()
  80.