home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / siegfried98.lua < prev    next >
Encoding:
Text File  |  2003-07-06  |  2.9 KB  |  83 lines
  1. --Siegfried Fennig 05.07.2003 Rev.0
  2.  
  3. levelw = 20
  4. levelh = 13
  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 =="A" then
  15.          set_item("it-vortex-open", i-1,line, {targetx = 10.5, targety =  5.5})
  16.       elseif c == "B" then
  17.          set_item("it-vortex-open", i-1,line, {targetx = 10.5, targety =  6.5})
  18.       elseif c == "C" then
  19.          set_item("it-vortex-open", i-1,line, {targetx =  2.5, targety =  3.5})
  20.       elseif c == "D" then
  21.          set_item("it-vortex-open", i-1,line, {targetx = 17.5, targety =  3.5})
  22.       elseif c == "E" then
  23.          set_item("it-vortex-open", i-1,line, {targetx = 11.5, targety =  7.5})
  24.       elseif c == "F" then
  25.          set_item("it-vortex-open", i-1,line, {targetx =  9.5, targety =  7.5})
  26.       elseif c == "G" then
  27.          set_item("it-vortex-open", i-1,line, {targetx = 10.5, targety =  6.5})
  28.       elseif c == "H" then
  29.          set_item("it-vortex-open", i-1,line, {targetx = 17.5, targety =  9.5})
  30.       elseif c == "I" then
  31.          set_item("it-vortex-open", i-1,line, {targetx =  9.5, targety =  7.5})
  32.       elseif c == "J" then
  33.          set_item("it-vortex-open", i-1,line, {targetx =  8.5, targety =  6.5})
  34.       elseif c == "K" then
  35.          set_item("it-vortex-open", i-1,line, {targetx =  2.5, targety =  9.5})
  36.       elseif c == "L" then
  37.          set_item("it-vortex-open", i-1,line, {targetx =  8.5, targety =  7.5})
  38.       elseif c == "M" then
  39.          set_item("it-vortex-open", i-1,line, {targetx = 10.5, targety =  6.5})
  40.       elseif c == "N" then
  41.          set_item("it-vortex-open", i-1,line, {targetx =  9.5, targety =  5.5})
  42.       elseif c == "O" then
  43.          set_item("it-vortex-open", i-1,line, {targetx = 10.5, targety =  5.5})
  44.       elseif c == "P" then
  45.          set_item("it-vortex-open", i-1,line, {targetx =  8.5, targety =  7.5})
  46.       elseif c == "o" then
  47.          oxyd( i-1, line)
  48.       elseif c == "1" then
  49.          basis1(i-1, line)
  50.       elseif c == "2" then
  51.          basis2(i-1, line)
  52.         end
  53.     end
  54. end
  55.  
  56. function basis1 ( x, y)
  57.          fill_floor("fl-stwood",x,y, 3, 3)
  58. end
  59.  
  60. function basis2 ( x, y)
  61.          fill_floor("fl-stwood",x,y, 6, 5)
  62. end
  63.  
  64. --              01234567890123456789
  65. renderLine(00, "                    ")
  66. renderLine(01, "o                  o")
  67. renderLine(02, " 1              1   ")
  68. renderLine(03, "  A              E  ")
  69. renderLine(04, "       2            ")
  70. renderLine(05, "        NOBDa       ")
  71. renderLine(06, "        KPCM        ")
  72. renderLine(07, "        JGHF        ")
  73. renderLine(08, " 1              1   ")
  74. renderLine(09, "  L              I  ")
  75. renderLine(10, "                    ")
  76. renderLine(11, "o                  o")
  77. renderLine(12, "                    ")
  78. --              01234567890123456789
  79.  
  80. oxyd_shuffle()
  81.  
  82. set_actor("ac-blackball", 9.5, 6.5, {player=0})
  83.