þþ X;PRINTSCREEN --J.E. WilderX;COPYRIGHT 1988X;BY ANALOG COMPUTING$X;Prints Gr. 0 screen with CTRL-?7(72„INITQ;VKEYBD< P„EXITFQ P P„EXITZQ>†INTRPTÿdP;VKEYBDnQ>†INTRPTxP ‚:Œ†INTRPTQ Ò;KBCODE–R>¦;CTRL-?  H„EXITªQ ;Device in use´R>¾D„EXIT;P: or C:ÈR>ÒD…PRINT;E:,S:or K:Ü „EXIT!æ …PRINTCð5úA5$>„SAVEQ 9;Page 0 IOCB"5,06 I„SAVE@& ;No repeat CTRL-?JQX;Screen MemTPÎ;Pointer^QYhPÏrQ>|PÍ;Line count†.„OPEN$>p;IOCB 7š Q>;Open¤ PB9;Comd®Q>ýÿ;CASBUF¸PD9;Buf Adr Q>ýÌPE9ÖQ>P;P: DeviceàPý;CASBUFê Q>›;EOLôPþþPH9;Buf LenQ>;Output PJ9;AUX1 Vä;CIOV Open&Q> ;PUT REC0 PB9;Comd: „NEXT%>D QÍ;LINENFƒEOLX„LOOPQ@Î7;Screen CharbM>;No inverselR>{v E…SHIFTZ€R>aŠ E„KEEP;>=a”…SHIFTO> ;To ASCIIžR>`¨ D„KEEP_²Q>.;Dot-Unprintable¼„KEEPPý8;CASBUFÆCÐ3Ú)>(ä D„LOOPîOÎ;Screen pnter +40øPÎD  #Ï ƒEOLQ>› Pý8* Vä;CIOV Print line4 G…ERROR> "Í;LineH I„NEXTR…ERRORQ> ;Close\ PB9;Comdf Vä;CIOVp$>z "Í;Line„&ÍŽI„OPEN;Clr printer˜ …REFIL7¢P 9;Page 0 IOCB¬2¶(>À D…REFILÊ7Ô>Þ7è?ò7ü9â;INITAD „INIT