equal
deleted
inserted
replaced
1091 with Gear^.Hedgehog^ do |
1091 with Gear^.Hedgehog^ do |
1092 if Team^.hasGone then TeamGoneEffect(Team^); |
1092 if Team^.hasGone then TeamGoneEffect(Team^); |
1093 doStepHedgehogDriven(Gear) |
1093 doStepHedgehogDriven(Gear) |
1094 end; |
1094 end; |
1095 end; |
1095 end; |
1096 |
|
1097 procedure doStepHedgehogReturn(Gear: PGear); |
|
1098 begin |
|
1099 if (Gear^.Timer > 0) and ((GameTicks mod 20) = 0) then dec(Gear^.Timer) |
|
1100 else if (Gear^.Timer = 0) then |
|
1101 begin |
|
1102 Gear^.doStep:= @doStepHedgehog; |
|
1103 Gear^.State:= Gear^.State and not gstTmpFlag; |
|
1104 end |
|
1105 end; |
|