equal
deleted
inserted
replaced
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:= Gear^.State and not (gstWait or gstLoser or gstWinner); |
1086 Gear^.State:= Gear^.State and not (gstWait or gstLoser or gstWinner or gstAttacked); |
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; |