share/hedgewars/Data/Maps/ClimbHome/map.lua
changeset 10585 eaccc445c473
parent 10581 f0b4c14a3c62
child 10587 1dac23b5fe3b
equal deleted inserted replaced
10584:f44ec13e3082 10585:eaccc445c473
   108     YouWon = false
   108     YouWon = false
   109     YouLost = false
   109     YouLost = false
   110     tauntNoo = false
   110     tauntNoo = false
   111     recordBroken = false
   111     recordBroken = false
   112     if CurrentHedgehog ~= nil then
   112     if CurrentHedgehog ~= nil then
   113 	if CurrentHedgehog ~= dummyHog then
   113         SetGearPosition(CurrentHedgehog, 1951,32640)
   114             SetGearPosition(CurrentHedgehog, 1951,32640)
   114         if not HogsAreInvulnerable then SetEffect(CurrentHedgehog,heInvulnerable,0) end
   115 	    if not HogsAreInvulnerable then SetEffect(CurrentHedgehog,heInvulnerable,0) end
   115         AddVisualGear(19531,32640,vgtExplosion,0,false)
   116             AddVisualGear(19531,32640,vgtExplosion,0,false)
   116         SetState(CurrentHedgehog,band(GetState(CurrentHedgehog),bnot(gstInvisible)))
   117             SetState(CurrentHedgehog,band(GetState(CurrentHedgehog),bnot(gstInvisible)))
   117         SetWeapon(amRope)
   118             SetWeapon(amRope)
   118         ready = true
   119             ready = true
       
   120         else
       
   121             ParseCommand("/skip")
       
   122 	end
       
   123     end
   119     end
   124     for f,i in pairs(Fire) do
   120     for f,i in pairs(Fire) do
   125         DeleteGear(f)
   121         DeleteGear(f)
   126     end
   122     end
   127     for s,i in pairs(Stars) do
   123     for s,i in pairs(Stars) do
   172 
   168 
   173 
   169 
   174 function onGameTick20()
   170 function onGameTick20()
   175     local x,y;
   171     local x,y;
   176     if math.random(20) == 1 then AddVisualGear(2012,56,vgtSmoke,0,false) end
   172     if math.random(20) == 1 then AddVisualGear(2012,56,vgtSmoke,0,false) end
       
   173     if CurrentHedgehog == dummyHog then
       
   174         ParseCommand("/skip")
       
   175     end
   177 
   176 
   178     --if BoomFire ~= nil then
   177     --if BoomFire ~= nil then
   179     --    for f,i in pairs(BoomFire) do
   178     --    for f,i in pairs(BoomFire) do
   180     --        if band(GetState(f),gstCollision~=0) then DeleteGear(f) end
   179     --        if band(GetState(f),gstCollision~=0) then DeleteGear(f) end
   181     --    end
   180     --    end