1130 Commercial Subroutine Package - All about the IBM 1130 ...

ADD 51403A1A3A1DECA3A1 Format: CALL S1403(N)CARRYDECA1 Function: Execute the requested control function on the IBM 1403 Printer, Model 6 orDIV 7, only.DPACKDUNPK Parameter description:EDITFILL N - An integer constant, an integer expression, or an integer variable. The valueGET of this variable corresponds to an available control function.ICOMPIOND Detailed description: If the printer is busy, the subroutine WAITs. Otherwise, or whenKEYBD the printer finishes, the routine executes the requested function and returns control toMOVE the calling program. The control functions and their values are as follows:MPYNCOMP Function ValueNSIGNN2ONEImmediate skip to channel 1 12544PACKPRINTImmediate skip to channel 2 12800PUNCHPUTImmediate skip to channel 3 13056P1403P1442 Immediate skip to channel 4 13312READR2501 Immediate skip to channel 5 13568SKIPSTACK Immediate skip to channel 6 13824SUBS1403 -4— Immediate skip to channel 7 14080TYPERUNPAC Immediate skip to channel 8 14336WHOLEImmediate skip to channel 9 14592Immediate skip to channel 10 14848Immediate skip to channel 11 15104Immediate skip to channel 12 15360Immediate space of 1 space 15616Immediate space of 2 spaces 15872Immediate space of 3 spaces 16128Suppress space after printing 0Normal spacing is one space after printing.