Dim Player1_Health As Integer = 3503
    Dim Player2_Attack As Integer = -1450
    Dim Percentage As Integer = Math.Abs(Player2_Attack) / Player1_Health * 100
    Dim msg As String = "Player 1 has lost " & Percentage & "% of his original health!"
    Debug.WriteLine(msg)