equal
deleted
inserted
replaced
293 Result^.Timer:= 5000; |
293 Result^.Timer:= 5000; |
294 end; |
294 end; |
295 gtCluster: Result^.Radius:= 2; |
295 gtCluster: Result^.Radius:= 2; |
296 gtShover: Result^.Radius:= 20; |
296 gtShover: Result^.Radius:= 20; |
297 gtFlame: begin |
297 gtFlame: begin |
298 Result^.Tag:= Counter mod 64; |
298 Result^.Tag:= Counter mod 32; |
299 Result^.Radius:= 1; |
299 Result^.Radius:= 1; |
300 Result^.Health:= 2; |
300 Result^.Health:= 5; |
301 if (Result^.dY.QWordValue = 0) and (Result^.dX.QWordValue = 0) then |
301 if (Result^.dY.QWordValue = 0) and (Result^.dX.QWordValue = 0) then |
302 begin |
302 begin |
303 Result^.dY:= (getrandom - _0_8) * _0_03; |
303 Result^.dY:= (getrandom - _0_8) * _0_03; |
304 Result^.dX:= (getrandom - _0_5) * _0_4 |
304 Result^.dX:= (getrandom - _0_5) * _0_4 |
305 end |
305 end |