equal
deleted
inserted
replaced
3225 end; |
3225 end; |
3226 gi := gi^.NextGear |
3226 gi := gi^.NextGear |
3227 end; |
3227 end; |
3228 ////////////////////////////////////////////////////////////////////// |
3228 ////////////////////////////////////////////////////////////////////// |
3229 Gear^.doStep := @doStepCakeExpl; |
3229 Gear^.doStep := @doStepCakeExpl; |
3230 if partyEpicness > 6 then |
3230 if (partyEpicness > 6) and (abs(90 - abs(trunc(Gear^.DirAngle))) < 20) then |
3231 begin |
3231 begin |
3232 for i := 0 to (2 * partyEpicness) do |
3232 for i := 0 to (2 * partyEpicness) do |
3233 begin |
3233 begin |
3234 sparkles:= AddVisualGear(hwRound(Gear^.X), hwRound(Gear^.Y), vgtEgg, 1); |
3234 sparkles:= AddVisualGear(hwRound(Gear^.X), hwRound(Gear^.Y), vgtEgg, 1); |
3235 if sparkles <> nil then |
3235 if sparkles <> nil then |