equal
deleted
inserted
replaced
4203 |
4203 |
4204 // This jiggles gears, to ensure a portal connection just placed under a gear takes effect. |
4204 // This jiggles gears, to ensure a portal connection just placed under a gear takes effect. |
4205 iterator:= GearsList; |
4205 iterator:= GearsList; |
4206 while iterator <> nil do |
4206 while iterator <> nil do |
4207 begin |
4207 begin |
4208 if iterator^.Kind <> gtPortal then |
4208 if (iterator^.Kind <> gtPortal) and |
|
4209 ((iterator^.Hedgehog <> CurrentHedgehog) or ((iterator^.Message and gmAllStoppable) = 0)) then |
4209 begin |
4210 begin |
4210 iterator^.Active:= true; |
4211 iterator^.Active:= true; |
4211 if iterator^.dY.QWordValue = _0.QWordValue then iterator^.dY.isNegative:= false; |
4212 if iterator^.dY.QWordValue = _0.QWordValue then iterator^.dY.isNegative:= false; |
4212 iterator^.State:= iterator^.State or gstMoving; |
4213 iterator^.State:= iterator^.State or gstMoving; |
4213 DeleteCI(iterator); |
4214 DeleteCI(iterator); |