home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / duffy15.lua < prev    next >
Encoding:
Text File  |  2003-10-04  |  4.9 KB  |  112 lines
  1. enigma.ConserveLevel=FALSE                  -- \dh\
  2. levelw=200
  3. levelh=60
  4.  
  5. create_world( levelw, levelh)
  6.  
  7. fill_floor("fl-bluegreen", 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 =="#" then
  13.             set_stone( "st-greenbrown", i-1, line)
  14.         elseif c == "o" then
  15.             oxyd( i-1, line)
  16.                 elseif c == "!" then
  17. --            abyss(i-1,line)
  18.             fill_floor("fl-water", i-1,line, 1,1)
  19.         elseif c == "a" then
  20.             set_item("it-trigger", i-1,line, {action="openclose",target="door1"})
  21.         elseif c == "A" then
  22.             set_stone("st-door", i-1, line , {name="door1", type="v"})
  23.         elseif c == "S" then
  24.             set_stone("st-swap", i-1,line)
  25.         elseif c == "+" then
  26.             fill_floor("fl-bluegreen", i-1,line, 1,1)
  27.         elseif c == "D" then --1-d
  28.             set_floor("fl-gradient",  i-1,  line, {type=1})
  29.         elseif c == "U" then --2-u
  30.             set_floor("fl-gradient",  i-1,  line, {type=2})
  31.         elseif c == "R" then --3-r
  32.             set_floor("fl-gradient",  i-1,  line, {type=3})
  33.         elseif c == "L" then --4-l
  34.             set_floor("fl-gradient",  i-1,  line, {type=4})
  35.         elseif c == "1" then --ur
  36.             set_floor("fl-gradient",  i-1,  line, {type=11})
  37.         elseif c == "3" then --dl
  38.             set_floor("fl-gradient",  i-1,  line, {type=9})
  39.         elseif c == "7" then --dr
  40.             set_floor("fl-gradient",  i-1,  line, {type=12})
  41.         elseif c == "9" then --ul
  42.             set_floor("fl-gradient",  i-1,  line, {type=10})
  43.         elseif c=="0" then
  44.             set_floor("fl-gradient", i-1,line , {type=23})
  45.         elseif c=="5" then
  46.             set_floor("fl-gradient", i-1,line , {type=24})
  47.           elseif c=="b" then
  48.             puzzle(i-1,line,PUZ_0110)
  49.         elseif c=="c" then
  50.             puzzle(i-1,line,PUZ_0101)
  51.         elseif c=="d" then
  52.             puzzle(i-1,line,PUZ_0011)
  53.         elseif c=="e" then
  54.             puzzle(i-1,line,PUZ_1010)
  55.         elseif c=="f" then
  56.             puzzle(i-1,line,PUZ_1001)
  57.         elseif c=="g" then
  58.             puzzle(i-1,line,PUZ_1100)
  59.  
  60.         end
  61.     end
  62. end
  63.  
  64. -- Floor:  " "
  65. -- Border: "#"
  66. -- Oxyd:   "o"
  67.  
  68. renderLine(00,"##########################################################")
  69. renderLine(01,"#!!!!!+!!!!++++++++++++++!!!!!!!!!!!!!!!!!!!!!!!!!#!!!!!!#")
  70. renderLine(02,"#+++++++++!+!!!!+!!!!!!!+!!++++++!!#!!+!!!!!!!!!!!!!!!!!!#")
  71. renderLine(03,"#!+!!!+!+!!++++!!!+++++++++!+!o!+++!!!+!!++++++++++++++!!#")
  72. renderLine(04,"#!+!+!!!+!!+!!+++!!+!+!!!!!!+!!!+!++++++++!!!+!!!!!!!!+!!#")
  73. renderLine(05,"#!+!+++++++++!!!++++!++++++++++++!!!+#!!+!!!!+!!+++++!+!!#")
  74. renderLine(06,"#!+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!+++++!!+++!o!+!!+!!!+++!!#")
  75. renderLine(07,"#!+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!+!!!+!!+!++++++++!!!+!+!!#")
  76. renderLine(08,"#!+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!++++++++++!!!#!!+!!#+!+!!#")
  77. renderLine(09,"#                             #!!!!!!!!!!++++++++++!+!+!!#")
  78. renderLine(10,"#                                    !!!!!!!!!!+!!+!!!!!!#")
  79. renderLine(11,"#                                #   #     !!!+++!+!!!!!!#")
  80. renderLine(12,"#                          o               !!!+!!!+!!!!!!#")
  81. renderLine(13,"#                                    o     !!!+!!!+!!!!!!#")
  82. renderLine(14,"#                                          !!!+!#!+!!!!!!#")
  83. renderLine(15,"#                     o                                  #")
  84. renderLine(16,"#                                                        #")
  85. renderLine(17,"#                        bcccd           o               #")
  86. renderLine(18,"#                   o    e   e                           #")
  87. renderLine(19,"#                        e   e                   #       #")
  88. renderLine(20,"#                        e   e             o             #")
  89. renderLine(21,"#              o         gcccf    o                   #  #")
  90. renderLine(22,"#                                                        #")
  91. renderLine(23,"#                                                        #")
  92. renderLine(24,"#                    o          o                        #")
  93. renderLine(25,"#                o                        #    #         #")
  94. renderLine(26,"#                         o          o                   #")
  95. renderLine(27,"#                                                        #")
  96. renderLine(28,"#                                                  #     #")
  97. renderLine(29,"#                                                        #")
  98. renderLine(30,"#                                                #       #")
  99. renderLine(31,"#                             #            #             #")
  100. renderLine(32,"#                 ############     #                     #")
  101. renderLine(33,"#                 ############                           #")
  102. renderLine(34,"####S#            ############                         ###")
  103. renderLine(35,"#    #             !      a###                         Ao#")
  104. renderLine(36,"##########################################################")
  105.  
  106. oxyd_shuffle()
  107.  
  108. set_actor("ac-blackball", 27.5,19.5, {player=0})
  109. set_actor("ac-whiteball-small",1.5,35.5, {player=0,mouseforce=1})
  110. --set_actor("ac-blackball", 50.5,17.5, {player=0})
  111. --set_actor("ac-blackball", 4.5,30.5, {player=0})
  112.