Created using   pas2js.   Sources:   Program.