home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / martin87.lua < prev    next >
Text File  |  2003-03-18  |  2KB  |  56 lines
  1. -- created by Martin Hawlisch
  2.  
  3. levelw = 20
  4. levelh = 13
  5.  
  6. create_world(levelw, levelh)
  7. fill_floor("fl-himalaya")
  8.  
  9. oxyd_default_flavor = "d"
  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_a",i-1,line,{type="v"})
  16.       elseif c == "O" then
  17.          oxyd( i-1, line)
  18.       elseif c == "+" then
  19.          set_stone("st-shogun",i-1,line, {holes=1})
  20.       end
  21.     end
  22. end
  23.  
  24. set_stone("st-door_a", 1,10, {type="v", name="door1"})
  25. set_stone("st-door_a", 6, 9, {type="v", name="door2"})
  26. set_stone("st-door_a", 6, 5, {type="v", name="door3"})
  27. set_stone("st-door_a", 9,10, {type="v", name="door4"})
  28. set_stone("st-door_a",17, 8, {type="v", name="door5"})
  29. set_stone("st-door_a", 6, 2, {type="v", name="door6"})
  30.  
  31. shogundot1(17,1, {target="door1", action="openclose"})
  32. shogundot1(16,2, {target="door2", action="openclose"})
  33. shogundot1(17,2, {target="door3", action="openclose"})
  34. shogundot1(18,2, {target="door4", action="openclose"})
  35. shogundot1(17,3, {target="door5", action="openclose"})
  36. shogundot1(18,3, {target="door6", action="openclose"})
  37.  
  38. renderLine( 0, "####################")
  39. renderLine( 1, "#OOOOO#     #   #  #")
  40. renderLine( 2, "#       ## ##  +   #")
  41. renderLine( 3, "#OOOOO###  #  + #+ #")
  42. renderLine( 4, "#######   ## ##+# ##")
  43. renderLine( 5, "#         #   +  + #")
  44. renderLine( 6, "# #  ######   #    #")
  45. renderLine( 7, "#  ####   #######  #")
  46. renderLine( 8, "#  #  # #       # ##")
  47. renderLine( 9, "# ##    #  ######  #")
  48. renderLine(10, "# #  #### ##    ## #")
  49. renderLine(11, "#    #        #    #")
  50. renderLine(12, "####################")
  51.  
  52. oxyd_shuffle()
  53.  
  54. set_actor("ac-blackball", 17.5, 7.5, {player=0})
  55.  
  56.