equal
deleted
inserted
replaced
567 AllInactive:= false; |
567 AllInactive:= false; |
568 t:= GearsList; |
568 t:= GearsList; |
569 while t <> nil do |
569 while t <> nil do |
570 begin |
570 begin |
571 if (t^.Kind = gtHedgehog) or (t^.Kind = gtExplosives) then |
571 if (t^.Kind = gtHedgehog) or (t^.Kind = gtExplosives) then |
572 t^.Active:= true; |
572 begin |
|
573 if t^.Kind = gtHedgehog then CheckIce(t); |
|
574 t^.Active:= true |
|
575 end; |
573 t:= t^.NextGear |
576 t:= t^.NextGear |
574 end |
577 end |
575 end; |
578 end; |
576 |
579 |
577 |
580 |