Ported to TRS-80 CoCo LOGO.