A silly demo in Applesoft BASIC