Transcription of the Pascal sample code chapter from 1985's Inside Macintosh Volume I