share/hedgewars/Data/Scripts/Multiplayer/ShoppaMap.lua
changeset 8980 37f4cdd9cd2c
parent 8975 188a71ceda72
child 8981 6213f45b5ead
equal deleted inserted replaced
8979:860836494821 8980:37f4cdd9cd2c
   342 function onGameInit()
   342 function onGameInit()
   343     MapGen = 2
   343     MapGen = 2
   344     TemplateFilter = 0
   344     TemplateFilter = 0
   345     TotGen = 0
   345     TotGen = 0
   346     Tries = 0
   346     Tries = 0
   347     if GetRandom(2) == 0 then
   347     if band(GameFlags,gfBottomBorder) == 0 and GetRandom(2) == 0 then
   348         AddPoint(-50,2030,10)
   348         AddPoint(-50,2010,7)
   349         AddPoint(4150,2030)
   349         AddPoint(4150,2010)
   350         for i = 0,GetRandom(3) do
   350         for i = 0,GetRandom(3) do
   351             x = GetRandom(4096)
   351             x = GetRandom(4096)
   352             AddPoint(x,2200,GetRandom(50),true)
   352             w = GetRandom(40)+10
       
   353             AddPoint(x,2200,w,true)
   353             AddPoint(x,1900)
   354             AddPoint(x,1900)
   354         end
   355             AddCollision(x,2010,w*10+6,76)
   355     end
   356         end
   356         
   357     end
   357         
   358         
   358     if GetRandom(2) == 0 then
   359     if GetRandom(2) == 0 then
   359         l = GetRandom(3)+1
   360         l = GetRandom(3)+1
   360         w = GetRandom(200)+200
   361         w = GetRandom(200)+200
   361         h = GetRandom(350)+200
   362         h = GetRandom(350)+200