equal
deleted
inserted
replaced
2057 1: FollowGear := AddGear(hwRound(Gear^.X), hwRound(Gear^.Y), gtMine, 0, cBombsSpeed * |
2057 1: FollowGear := AddGear(hwRound(Gear^.X), hwRound(Gear^.Y), gtMine, 0, cBombsSpeed * |
2058 Gear^.Tag, _0, 0); |
2058 Gear^.Tag, _0, 0); |
2059 2: for i:= -19 to 19 do |
2059 2: for i:= -19 to 19 do |
2060 FollowGear := AddGear(hwRound(Gear^.X) + i div 3, hwRound(Gear^.Y), gtFlame, 0, |
2060 FollowGear := AddGear(hwRound(Gear^.X) + i div 3, hwRound(Gear^.Y), gtFlame, 0, |
2061 _0_001 * i, _0, 0); |
2061 _0_001 * i, _0, 0); |
|
2062 3: FollowGear := AddGear(hwRound(Gear^.X), hwRound(Gear^.Y), gtDrill, 0, cBombsSpeed * |
|
2063 Gear^.Tag, _0, 0); |
|
2064 //4: FollowGear := AddGear(hwRound(Gear^.X), hwRound(Gear^.Y), gtWaterMelon, 0, cBombsSpeed * |
|
2065 // Gear^.Tag, _0, 5000); |
2062 end; |
2066 end; |
2063 Gear^.dX := Gear^.dX + int2hwFloat(30 * Gear^.Tag) |
2067 Gear^.dX := Gear^.dX + int2hwFloat(30 * Gear^.Tag) |
2064 end; |
2068 end; |
2065 |
2069 |
2066 if (GameTicks and $3F) = 0 then |
2070 if (GameTicks and $3F) = 0 then |