equal
deleted
inserted
replaced
144 Pos:= (Pos + Ammoz[AmmoType].PosCount - 1) mod Ammoz[AmmoType].PosCount |
144 Pos:= (Pos + Ammoz[AmmoType].PosCount - 1) mod Ammoz[AmmoType].PosCount |
145 else |
145 else |
146 if (Gear^.Message and gm_Right )<>0 then |
146 if (Gear^.Message and gm_Right )<>0 then |
147 Pos:= (Pos + 1) mod Ammoz[AmmoType].PosCount |
147 Pos:= (Pos + 1) mod Ammoz[AmmoType].PosCount |
148 else exit; |
148 else exit; |
149 StepTicks:= 350; |
149 StepTicks:= 200; |
150 exit |
150 exit |
151 end; |
151 end; |
152 if ((Gear^.Message and gm_LJump ) <> 0) then |
152 if ((Gear^.Message and gm_LJump ) <> 0) then |
153 begin |
153 begin |
154 Gear^.Message:= 0; |
154 Gear^.Message:= 0; |