equal
deleted
inserted
replaced
1565 if ((Gear^.State and gstDrowning) = 0) and (x and LAND_WIDTH_MASK = 0) and (y and LAND_HEIGHT_MASK = 0) then |
1565 if ((Gear^.State and gstDrowning) = 0) and (x and LAND_WIDTH_MASK = 0) and (y and LAND_HEIGHT_MASK = 0) then |
1566 begin |
1566 begin |
1567 if Gear^.Kind = gtMinigunBullet then |
1567 if Gear^.Kind = gtMinigunBullet then |
1568 begin |
1568 begin |
1569 doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 5, |
1569 doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 5, |
1570 Gear^.Hedgehog, EXPLNoDamage{ or EXPLDontDraw or EXPLNoGfx}); |
1570 Gear^.Hedgehog, (EXPLNoDamage or EXPLDoNotTouchHH){ or EXPLDontDraw or EXPLNoGfx}); |
1571 VGear := AddVisualGear(hwRound(Gear^.X + Gear^.dX * 5), hwRound(Gear^.Y + Gear^.dY * 5), vgtBulletHit); |
1571 VGear := AddVisualGear(hwRound(Gear^.X + Gear^.dX * 5), hwRound(Gear^.Y + Gear^.dY * 5), vgtBulletHit); |
1572 end |
1572 end |
1573 else |
1573 else |
1574 VGear := AddVisualGear(hwRound(Gear^.X), hwRound(Gear^.Y), vgtBulletHit); |
1574 VGear := AddVisualGear(hwRound(Gear^.X), hwRound(Gear^.Y), vgtBulletHit); |
1575 |
1575 |