equal
deleted
inserted
replaced
1075 end; |
1075 end; |
1076 |
1076 |
1077 if ((Gear^.State and gstWait) = 0) and |
1077 if ((Gear^.State and gstWait) = 0) and |
1078 (prevState <> Gear^.State) then |
1078 (prevState <> Gear^.State) then |
1079 begin |
1079 begin |
1080 Gear^.State:= gstWait; |
1080 Gear^.State:= Gear^.State or gstWait; |
1081 Gear^.Timer:= 150 |
1081 Gear^.Timer:= 150 |
1082 end else |
1082 end else |
1083 begin |
1083 begin |
1084 if Gear^.Timer = 0 then |
1084 if Gear^.Timer = 0 then |
1085 begin |
1085 begin |
1086 Gear^.State:= 0; |
1086 Gear^.State:= Gear^.State and not gstWait; |
1087 Gear^.Active:= false; |
1087 Gear^.Active:= false; |
1088 AddGearCI(Gear); |
1088 AddGearCI(Gear); |
1089 exit |
1089 exit |
1090 end else dec(Gear^.Timer) |
1090 end else dec(Gear^.Timer) |
1091 end; |
1091 end; |
1105 if (Gear^.State and gstHHDriven) = 0 then |
1105 if (Gear^.State and gstHHDriven) = 0 then |
1106 doStepHedgehogFree(Gear) |
1106 doStepHedgehogFree(Gear) |
1107 else |
1107 else |
1108 begin |
1108 begin |
1109 with Gear^.Hedgehog^ do |
1109 with Gear^.Hedgehog^ do |
1110 if Team^.hasGone then TeamGoneEffect(Team^); |
1110 if Team^.hasGone then |
1111 doStepHedgehogDriven(Gear) |
1111 TeamGoneEffect(Team^) |
|
1112 else |
|
1113 doStepHedgehogDriven(Gear) |
1112 end; |
1114 end; |
1113 end; |
1115 end; |