home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / martin88.lua < prev    next >
Text File  |  2003-03-18  |  4KB  |  92 lines
  1. -- created by Martin Hawlisch
  2.  
  3. levelw = 20
  4. levelh = 13
  5.  
  6. create_world(levelw, levelh)
  7. fill_floor("fl-rough")
  8.  
  9. oxyd_default_flavor = "b"
  10.  
  11. function renderLine( line, pattern)
  12.     for i=1, strlen(pattern) do
  13.       local c = strsub( pattern, i, i)
  14.       if c =="#" then
  15.          set_stone("st-door_b",i-1,line,{type="v"})
  16.       elseif c == "~" then
  17.          set_stone("st-door_b",i-1,line,{type="v"})
  18.       elseif c == "O" then
  19.          oxyd( i-1, line)
  20.       elseif c == "+" then
  21.          set_stone("st-shogun",i-1,line, {holes=1})
  22.       elseif c == " " then
  23.          set_floor("fl-sand", i-1, line)
  24.       end
  25.     end
  26. end
  27.  
  28. set_stone("st-door_b", 1,7, {type="v", name="door1"})
  29. set_stone("st-door_b", 6,9, {type="v", name="door2"})
  30. set_stone("st-door_b",14,7, {type="v", name="door3"})
  31. set_stone("st-door_b",11,4, {type="v", name="door4"})
  32.  
  33. set_stone("st-door_b", 8,2, {type="v", name="floor8"})
  34. set_stone("st-door_b", 8,3, {type="v", name="floor11"})
  35. set_stone("st-door_b", 8,4, {type="v", name="floor15"})
  36. set_stone("st-door_b", 8,5, {type="v", name="floor5"})
  37. set_stone("st-door_b", 8,6, {type="v", name="floor10"})
  38. set_stone("st-door_b", 8,7, {type="v", name="floor14"})
  39. set_stone("st-door_b", 9,7, {type="v", name="floor3"})
  40. set_stone("st-door_b",10,7, {type="v", name="floor9"})
  41. set_stone("st-door_b",10,6, {type="v", name="floor13"})
  42. set_stone("st-door_b",10,5, {type="v", name="floor16"})
  43. set_stone("st-door_b",10,4, {type="v", name="floor7"})
  44. set_stone("st-door_b",10,3, {type="v", name="floor12"})
  45. set_stone("st-door_b", 9,10, {type="v", name="floor1"})
  46. set_stone("st-door_b", 8,10, {type="v", name="floor2"})
  47. set_stone("st-door_b", 7,10, {type="v", name="floor4"})
  48. set_stone("st-door_b", 7, 9, {type="v", name="floor6"})
  49.  
  50. shogundot1( 2, 2, {target="door1", action="openclose"})
  51. shogundot1( 2, 1, {target="floor1", action="openclose"})
  52. shogundot1( 4, 1, {target="floor2", action="openclose"})
  53. shogundot1( 5, 1, {target="floor3", action="openclose"})
  54. shogundot1( 5, 2, {target="floor4", action="openclose"})
  55.  
  56. shogundot1( 1,11, {target="floor5", action="openclose"})
  57. shogundot1( 2,11, {target="floor6", action="openclose"})
  58. shogundot1( 3,11, {target="door2", action="openclose"})
  59. shogundot1( 4,11, {target="floor7", action="openclose"})
  60.  
  61. shogundot1(16,10, {target="floor8", action="openclose"})
  62. shogundot1(16,11, {target="floor9", action="openclose"})
  63. shogundot1(17,11, {target="floor10", action="openclose"})
  64. shogundot1(18,11, {target="door3", action="openclose"})
  65. shogundot1(18,10, {target="floor11", action="openclose"})
  66.  
  67. shogundot1(14,3, {target="floor12", action="openclose"})
  68. shogundot1(14,4, {target="floor13", action="openclose"})
  69. shogundot1(15,3, {target="floor14", action="openclose"})
  70. shogundot1(15,4, {target="floor15", action="openclose"})
  71. shogundot1(16,3, {target="door4", action="openclose"})
  72. shogundot1(16,4, {target="floor16", action="openclose"})
  73.  
  74. renderLine( 0, "~######~~~~~~~#####~")
  75. renderLine( 1, "~#----#~O~~####---##")
  76. renderLine( 2, "~#--+-#O O~#-+-+---#")
  77. renderLine( 3, "###--+## ~~#-#-+-#-#")
  78. renderLine( 4, "#-+--+-# ~  -#-+-#-#")
  79. renderLine( 5, "#-#+##-# ~ #---+-+-#")
  80. renderLine( 6, "#------# O ##---####")
  81. renderLine( 7, "# ######   ### #####")
  82. renderLine( 8, "#-----#~~~##-------#")
  83. renderLine( 9, "##+-+-  ~~#---#+#+-#")
  84. renderLine(10, "#--++##    -++---+-#")
  85. renderLine(11, "#----#~~~~#--###---#")
  86. renderLine(12, "##############~#####")
  87.  
  88. oxyd_shuffle()
  89.  
  90. set_actor("ac-blackball", 4.5, 6.5, {player=0})
  91.  
  92.