home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / martin27.lua < prev    next >
Encoding:
Text File  |  2003-02-12  |  1.5 KB  |  54 lines

  1. -- created by Martin Hawlisch
  2.  
  3. levelw = 20
  4. levelh = 13
  5.  
  6. create_world( levelw, levelh)
  7. fill_floor( "fl-brick", 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.         elseif c == "*" then
  17.             set_stone( "st-glass", i-1, line)
  18.     elseif c == "!" then
  19.         set_stone( "st-brick_magic", i-1, line)
  20.         end
  21.     end
  22. end
  23.  
  24. renderLine(  0, "#o#######o########o#")
  25. renderLine(  1, "#!     !*!        !#")
  26. renderLine(  2, "#*!!!! !**!!!!!!  !#")
  27. renderLine(  3, "#  ! ! !*     !  ! #")
  28. renderLine(  4, "#  !   !!!!!! !  !*#")
  29. renderLine(  5, "#!   !      ! ! !!!#")
  30. renderLine(  6, "#*!! !!!! !        #")
  31. renderLine(  7, "#!   !      ! ! !!!#")
  32. renderLine(  8, "#  !   !!!!!! !  !*#")
  33. renderLine(  9, "#  ! ! !*     !  ! #")
  34. renderLine( 10, "#*!!!! !**!!!!!!  !#")
  35. renderLine( 11, "#!     !*!        !#")
  36. renderLine( 12, "#o#######o########o#")
  37.  
  38. oxyd_shuffle()
  39.  
  40. set_item( "it-magicwand", 6,7)
  41. set_stone( "st-switch", 19,6,{on=TRUE,action="onoff", target="laser"})
  42. set_attrib( laser(0,6,TRUE, EAST), "name", "laser")
  43. mirrorp( 1,3,FALSE,FALSE,4)
  44. mirrorp( 1,9,FALSE,FALSE,4)
  45. mirrorp( 9,3,FALSE,FALSE,4)
  46. mirrorp( 9,9,FALSE,FALSE,4)
  47. mirror3( 9,6,FALSE,TRUE,2)
  48. mirror3(18,3,FALSE,FALSE,2)
  49. mirror3(18,9,FALSE,FALSE,2)
  50.  
  51. document( 15,8, "Do not use too much of the magic!")
  52. set_actor("ac-blackball", 15.5, 9.5, {player=0})
  53.  
  54.