498         end;

   498         end;

   499 {$ELSE}

   499 {$ELSE}

   500         AmmoRect.x:= (cScreenWidth shr 1) - AmmoRect.w - AMSlotSize;

   500         AmmoRect.x:= (cScreenWidth shr 1) - AmmoRect.w - AMSlotSize;

   501         AmmoRect.y:= cScreenHeight - (AmmoRect.h + AMSlotSize);

   501         AmmoRect.y:= cScreenHeight - (AmmoRect.h + AMSlotSize);

   502 {$ENDIF}

   502 {$ENDIF}

   503     if (AMAnimType and AMTypeMaskX) <> 0 then AMShiftTargetX:= (cScreenWidth shr 1) - AmmoRect.x

   506     if (AMAnimType and AMTypeMaskX) <> 0 then AMShiftTargetX:= (cScreenWidth shr 1) - AmmoRect.x

   504     else AMShiftTargetX:= 0;

   507     else AMShiftTargetX:= 0;

   505     if (AMAnimType and AMTypeMaskY) <> 0 then AMShiftTargetY:= cScreenHeight        - AmmoRect.y

   508     if (AMAnimType and AMTypeMaskY) <> 0 then AMShiftTargetY:= cScreenHeight        - AmmoRect.y

   506     else AMShiftTargetY:= 0;

   509     else AMShiftTargetY:= 0;

   507     AMShiftX:= AMShiftTargetX;

   511     AMShiftX:= AMShiftTargetX;

   508     AMShiftY:= AMShiftTargetY;

   512     AMShiftY:= AMShiftTargetY;

   509 end;

   513 end;

   510 

   514 

   511 AMAnimState:= (RealTicks - AMAnimStartTime) / AMAnimDuration;

   515 AMAnimState:= (RealTicks - AMAnimStartTime) / AMAnimDuration;