home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / duffy33.lua < prev    next >
Text File  |  2003-08-27  |  4KB  |  82 lines
  1. levelw=60
  2. levelh=30
  3.  
  4. create_world( levelw, levelh)
  5.  
  6. fill_floor("fl-bluegreen", 0,0,levelw,levelh)
  7.  
  8. function renderLine( line, pattern)
  9.     for i=1, strlen(pattern) do
  10.         local c = strsub( pattern, i, i)
  11.         if c =="#" then
  12.             set_stone( "st-greenbrown", i-1, line)
  13.         elseif c == "o" then
  14.             oxyd( i-1, line)
  15.                 elseif c == "!" then
  16.             abyss(i-1,line)
  17.         elseif c == "=" then
  18.             fill_floor("fl-bluegreen", i-1,line, 1,1)
  19.         elseif c == "+" then
  20.             fill_floor("fl-space", i-1,line, 1,1)
  21.         elseif c == "&" then
  22.             set_stone( "st-greenbrown", i-1, line)
  23.             fill_floor("fl-space", i-1,line, 1,1)
  24.         elseif c == "a" then
  25.               set_stone("st-switch", i-1,line, {action="openclose", target="door1"})
  26.         elseif c == "A" then
  27.             set_stone("st-door", i-1, line , {name="door1", type="v"})
  28.         elseif c == "z" then
  29.             set_actor("ac-blackball", i-1+.5,line+.5, {player=0})
  30.         elseif c == "d" then --1-d
  31.             set_floor("fl-gradient",  i-1,  line, {type=1})
  32.         elseif c == "u" then --2-u
  33.             set_floor("fl-gradient",  i-1,  line, {type=2})
  34.         elseif c == "r" then --3-r
  35.             set_floor("fl-gradient",  i-1,  line, {type=3})
  36.         elseif c == "l" then --4-l
  37.             set_floor("fl-gradient",  i-1,  line, {type=4})
  38.         elseif c == "1" then --ur
  39.             set_floor("fl-gradient",  i-1,  line, {type=11})
  40.         elseif c == "3" then --dl
  41.             set_floor("fl-gradient",  i-1,  line, {type=9})
  42.         elseif c == "7" then --dr
  43.             set_floor("fl-gradient",  i-1,  line, {type=12})
  44.         elseif c == "9" then --ul
  45.             set_floor("fl-gradient",  i-1,  line, {type=10})
  46.         end
  47.     end    
  48. end
  49.  
  50. -- Floor:  " "
  51. -- Border: "#"
  52. -- Oxyd:   "o"
  53.  
  54. renderLine(00,"##########################################################")
  55. renderLine(01,"#!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!uuuuuurruuduulluuuudd!#")
  56. renderLine(02,"#!dddduddldrrdddudddr++lr++lr++lr++l!!!!!!!!!!!!!!!!!!!=!#")
  57. renderLine(03,"#!ouuuduulurruuuduuur++lr++lr++lr++l!l==r++++r==l!!!!!!=!#")
  58. renderLine(04,"#!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!l==r++++r==++==+=+=!#")
  59. renderLine(05,"#!3ddd1!3ddddd1!3dd1!!!!!!3dddddd1!!!!++!!!!!9uu7!!!!!!!!#")
  60. renderLine(06,"#!r===1d3+++++1d1==l!!!!!!r++++++l!!!!++!!!!!!!!!!!!3dd1!#")
  61. renderLine(07,"#!roz=++++++&++++==l!!!!!!r+7uu9+l!!!!++!!!!!!!!!!!!r=+l!#")
  62. renderLine(08,"#!r===7u9+++++7u7==l!!!!!!r+l!!r+l!!!3dd1!=rrr++ll=++==l!#")
  63. renderLine(09,"#!9uuu7!9uuuuu7!93+7!3dddd!+!dd3+l!!!r==l!=!!!!!!!!!93+l!#")
  64. renderLine(10,"#!!!!!!!!!!!!!!!!r+l!r+++++++++++l!!!r==l!=llrr++l=!!r+l!#")
  65. renderLine(11,"#!ar===l==!!!!!!!r+l!r+7uu!+!uuuu7!!!9uu7!!!!!!!!!=!!r+l!#")
  66. renderLine(12,"#!!!!!!!++!!!!!!!r+l!r+l!!r+l!!!!!!!!!!!=rrrr+llll=!!r+l!#")
  67. renderLine(13,"#!3dddddddddddd1!r+1d3+l!!r+l!3ddddddd1!!!!!!!!!!!!!!l+r!#")
  68. renderLine(14,"#!r+7u9l+r++++!l!r+++++l!!!+!!r+++++++dd#udduuddddd1!l+r!#")
  69. renderLine(15,"#!!+l+r1d3dd1++!!9uuuuu7!!r+l!r+3ddd1+++A++++++++++l!l+r!#")
  70. renderLine(16,"#!!+1!+d!r++l+!!!!!!!!!!!!r+1d3+r+++l+uu#duuddu3+++l!rul!#")
  71. renderLine(17,"#!r+++r+l9uu7++l!!!!!!!!!!r+++++r+++l+!!!!!!!!!r+++l!rul!#")
  72. renderLine(18,"#!r+++9u7++++++l7!!!!!!!!!9uuu9+r+++l+ddddd1!!!!+++l!rul!#")
  73. renderLine(19,"#!r+3d1++7u9+7u97uu9!!!!!!!!!!r+9uuu7++++++l!!!r+++!!rul!#")
  74. renderLine(20,"#!r+r!l++l+r+l+rl==r!!!!!7uu9!r+++++++uuu9+l!!!r+++1d3+l!#")
  75. renderLine(21,"#!r+9u7!+1d3+1d3l==r+++++l==r!9uuuuuuu7!!r+l!!!r+++++++l!#")
  76. renderLine(22,"#!9uuuuuuuuuuuuu1dd3+++++l==r!!!!!!!!!!!!r+l!!!9uuuuuuu7!#")
  77. renderLine(23,"#!!!!!!!!!!!!!!!!!!!!!!!!1dd3dddudduddddd3+l!!!!!!!!!!!!!#")
  78. renderLine(24,"##########################################################")
  79.  
  80. fill_floor("fl-space", 40,15, 1,1)
  81.  
  82. oxyd_shuffle()