Created using   pas2js.   Sources:   Program   unit.