What is this code doing?

[chalky]

Application.StatusBar = "Calculating Year 1"
Sheets("Assumptions").Range("G10") = 0
Do While Sheets("Financial Statements").Range("G70") < Sheets("Assumptions").Range("G70")
Sheets("Assumptions").Range("G10") = Sheets("Assumptions").Range("G10") + 0.0005
Loop