*20 /$CHARSIZ OVERLAY FOR FOCAL-12 /PERMITS FULL OR HALF SIZE /CHARACTERS ON THE SCOPE / /WRITTEN BY STEVE WELLCOME /DIGITAL EQUIPMENT CORP. /1 APRIL 70 / /FOR FULL SIZE: SET X=FX() /FOR HALF SIZE: O S / PMODE *411 FX *35 FX-1 *4607 FX, IOF TAD 123 /LOAD 200 IN AC LINC LMODE ESF PDP PMODE CLA ION JMP I 136 /EXIT LISTAPE -1