GEN-IOL, C$PR, etc.

* 0066-001-H003 (GEN-IOL) DRAWING NO. 41286164-001-01 PAGE 10

0451 * USED TO SELECT AN 8-BIT BYTE FROM THE SPECIFIED TABLE. WHICH IS 0452 * REGARDED AS A 32-WORD TABLE CONTAINING 2 8-BIT BYTES PER WORD. 0453 * THE BYTES BEING NUMBERED FROM 0 TO 63. 0454 * THE X-REGISTER IS NOT USED. 0455 * 0456 * CONVERSION TABLES 0457 * 0458 * A THESE ARE SUITABLE FOR USE WITH THE CHARACTER TABLE LOOK-UP 0459 * ROUTINE. AS THE SERIES 16 PERIPHERAL DEVICE CARD CODE IS 0460 * IDENTICAL WITH THAT USED FOR MAGNETIC TAPE. TABLES WITH DUAL 0461 * NAMES ARE SUPPLIED AND MAY BE USED WHERE APPLICABLE TO SAVE CORE. 0462 * 0463 * INPUT PARITY 0464 * 0465 * BLANK TAPE ('000) IS ALWAYS REGARDED AS HAVING CORRECT PARITY. 0466 * THE ORIGINAL CHARACTER IS PRESERVED IN THE A-REGISTER ON EXIT. 0467 * THE DUMMY ROUTINE ALWAYS TAKES THE NORMAL EXIT. 0468 * THE X-REGISTER IS NOT USED. 0469 * 0470 * OUTPUT PARITY 0471 * 0472 * THE X-REGISTER IS NOT USED. 0473 * 0474 * TEST FRAME 0475 * 0476 * THE CHARACTER IN THE A-REGISTER IS CONVERTED TO FORCED-EIGHT 0477 * PARITY, AND ON EXIT IT WILL BE IN THIS FORM. IT IS COMPARED 0478 * AGAINST NINE SPECIAL CHARACTERS IN A LOOK-UP TABLE, AND THE 0479 * APPROPRIATE EXIT IS TAKEN (SEE 'USE'). 0480 * 0481 * INITIALISE SOURCE 0482 * 0483 * THE CHARACTER COUNT AND TAB COUNT SPECIFIED IN THE CALLING 0484 * SEQUENCE ARE TRANSFERRED TO LOCATIONS C$CC AND C$TC. HOWEVER, 0485 * ONLY THE ADDRESS OF THE TAB TABLE IN THE CALLING SEQUENCE IS 0486 * NOTED. THEREFORE SUBSEQUENT ALTERATION TO THE TAB TABLE WITHIN 0487 * THE CALLING SEQUENCE WILL AFFECT SOURCE FORMAT. 0488 * IT SHOULD BE NOTED THAT ANY INITIALISATION CALL AFFECTS SOURCE 0489 * FORMAT FOR INPUT AND OUTPUT ON BOTH ASR AND HIGH SPEED READER OR 0490 * PUNCH. 0491 * THE X-REGISTER IS NOT USED. 0492 * 0493 * CHARACTER INPUT INITIALISE 0494 * 0495 * THE BUFFER ADDRESS IS RECORDED AND A CHARACTER POINTER SET TO 1. 0496 * THIS POINTER ALWAYS INDICATES THE NEXT CHARACTER POSITION TO BE 0497 * FILLED. AND IS NOT EXTERNALLY DEFINED. 0498 * THE X-REGISTER IS NOT USED. 0499 * 0500 * CHARACTER INPUT TAB