Unused Code

Code in BattleShip/src

Unused code is commented out using 'Code.ect()

DeploymentController.vb

Line 118 - 119 & 122 -123

        If _currentDirection = Direction.LeftRight Then
            SwinGame.DrawBitmap(GameImage("LeftRightButton"), LEFT_RIGHT_BUTTON_LEFT, TOP_BUTTONS_TOP)
            'SwinGame.DrawText("U/D", Color.Gray, GameFont("Menu"), UP_DOWN_BUTTON_LEFT, TOP_BUTTONS_TOP)
            'SwinGame.DrawText("L/R", Color.White, GameFont("Menu"), LEFT_RIGHT_BUTTON_LEFT, TOP_BUTTONS_TOP)
        Else
            SwinGame.DrawBitmap(GameImage("UpDownButton"), LEFT_RIGHT_BUTTON_LEFT, TOP_BUTTONS_TOP)
            'SwinGame.DrawText("U/D", Color.White, GameFont("Menu"), UP_DOWN_BUTTON_LEFT, TOP_BUTTONS_TOP)
            'SwinGame.DrawText("L/R", Color.Gray, GameFont("Menu"), LEFT_RIGHT_BUTTON_LEFT, TOP_BUTTONS_TOP)
        End If

Line 133 - 135 & 138 - 139

 If sn = _selectedShip Then
                    SwinGame.DrawBitmap(GameImage("SelectedShip"), SHIPS_LEFT, SHIPS_TOP + i * SHIPS_HEIGHT)
                    '    SwinGame.FillRectangle(Color.LightBlue, SHIPS_LEFT, SHIPS_TOP + i * SHIPS_HEIGHT, SHIPS_WIDTH, SHIPS_HEIGHT)
                    'Else
                    '    SwinGame.FillRectangle(Color.Gray, SHIPS_LEFT, SHIPS_TOP + i * SHIPS_HEIGHT, SHIPS_WIDTH, SHIPS_HEIGHT)
                End If

                'SwinGame.DrawRectangle(Color.Black, SHIPS_LEFT, SHIPS_TOP + i * SHIPS_HEIGHT, SHIPS_WIDTH, SHIPS_HEIGHT)
                'SwinGame.DrawText(sn.ToString(), Color.Black, GameFont("Courier"), SHIPS_LEFT + TEXT_OFFSET, SHIPS_TOP + i * SHIPS_HEIGHT)

Line 146 - 147

 'SwinGame.FillRectangle(Color.LightBlue, PLAY_BUTTON_LEFT, PLAY_BUTTON_TOP, PLAY_BUTTON_WIDTH, PLAY_BUTTON_HEIGHT)
 'SwinGame.DrawText("PLAY", Color.Black, GameFont("Courier"), PLAY_BUTTON_LEFT + TEXT_OFFSET, PLAY_BUTTON_TOP)

GameController.vb

Line 84

 'AddHandler _human.PlayerGrid.Changed, AddressOf GridChanged

Line 107 Unused parameter

''' <param name="args">not used</param>
    Private Sub GridChanged(ByVal sender As Object, ByVal args As EventArgs)

UtilityFunctions.vb

Line 121

'If small Then fillColor = _SMALL_SHIP Else fillColor = _LARGE_SHIP

MenuController.vb

Line 117

'SwinGame.DrawText("Main Menu", Color.White, GameFont("ArialLarge"), 50, 50)

Line 127

'SwinGame.DrawText("Paused", Color.White, GameFont("ArialLarge"), 50, 50)

Line 140

'SwinGame.DrawText("Settings", Color.White, GameFont("ArialLarge"), 50, 50)

Line 173

'SwinGame.FillRectangle(Color.White, btnLeft, btnTop, BUTTON_WIDTH, BUTTON_HEIGHT)

Code in BattleShip/src/Model

None So far