home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / martin28.lua < prev    next >
Encoding:
Text File  |  2003-01-05  |  1.7 KB  |  61 lines
  1. -- created by Martin Hawlisch
  2.  
  3. levelw = 20
  4. levelh = 13
  5.  
  6. create_world( levelw, levelh)
  7. fill_floor( "fl-plank", 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 == "o" then
  13.             oxyd( i-1, line)
  14.     elseif c == "#" then
  15.         set_stone( "st-brick", i-1, line)
  16.         end
  17.     end
  18. end
  19.  
  20. renderLine(  0, "############o#######")
  21. renderLine(  1, "#   #  ##  # ##  # #")
  22. renderLine(  2, "#                  #")
  23. renderLine(  3, "## ## ###  # ##  # #")
  24. renderLine(  4, "#  #      #      #o#")
  25. renderLine(  5, "## # ####  # ### ###")
  26. renderLine(  6, "##    o#           #")
  27. renderLine(  7, "#  ###o# # # ### ###")
  28. renderLine(  8, "##   # #         #o#")
  29. renderLine(  9, "##   # # # # ### # #")
  30. renderLine( 10, "#    # #           #")
  31. renderLine( 11, "## #         # # # #")
  32. renderLine( 12, "##o###########o#o###")
  33.  
  34. oxyd_shuffle()
  35.  
  36. shogundot1( 6, 4, {action="openclose", target="door1"})
  37. shogundot1( 7, 4, {action="openclose", target="door2"})
  38. shogundot1( 8, 4, {action="openclose", target="door3"})
  39. shogundot1( 9, 4, {action="openclose", target="door4"})
  40. shogundot1(10, 3, {action="openclose", target="door6"})
  41. shogundot1(10, 5, {action="openclose", target="door7"})
  42. shogundot1( 8, 6, {action="openclose", target="door8"})
  43. shogundot1(11, 6, {action="openclose", target="door5"})
  44.  
  45. set_stone( "st-shogun", 3, 6, {holes=1})
  46. set_stone( "st-shogun",11, 2, {holes=1})
  47. set_stone( "st-shogun",13, 6, {holes=1})
  48.  
  49. doorh( 2,11, {name="door1"})
  50. doorv( 5, 6, {name="door2"})
  51. doorh( 6, 8, {name="door3"})
  52. doorh(14,11, {name="door4"})
  53. doorh(18, 3, {name="door5"})
  54. doorh(12, 1, {name="door6"})
  55. doorh(18, 9, {name="door7"})
  56. doorh(16,11, {name="door8"})
  57.  
  58.  
  59. set_actor("ac-blackball", 9.5, 5.5, {player=0})
  60.  
  61.