Time for action – staying in bounds

1. Create a region called Movement Limitations in the Player module:

   #Region "Movement Limitations"
   #End Region

2. Inside the Movement Limitations region, add the clampToWorld() method:

   Private Sub clampToWorld()
     Dim currentX As Single = BaseSprite.WorldLocation.X
     Dim currentY As Single = BaseSprite.WorldLocation.Y
   
     currentX = MathHelper.Clamp(
       currentX,
       0,
       Camera.WorldRectangle.Right - BaseSprite.FrameWidth)
       currentY = MathHelper.Clamp(
         currentY,
         0,
       Camera.WorldRectangle.Bottom - BaseSprite.FrameHeight)
   
     BaseSprite.WorldLocation = New Vector2(currentX, currentY)
   End Sub

3. Add a declaration to the Player module, to define the area in which the camera should attempt to keep the player:

   Private scrollArea As Rectangle = New Rectangle(150, 100, 500, 400)

4. Add the repositionCamera() helper method to the Movement Limitations region of the Player module:

   Private Sub repositionCamera(
     gameTime As GameTime, 
     moveAngle As Vector2)
   
   ...