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

SKIPADDA1A3Format: CALL SKIP(N)A1DECA3A1Function: Execute the requested control function on the IBM 1132 Printer CARRYDECA1Parameter description:DIVDPACKN - An integer constant, an integer expression, or an integer variable. The DUNPKvalue of this variable corresponds to an available control function. EDITFILLDetailed description: If the printer is busy, the subroutine WAITs. Otherwise, or when GETthe printer finishes, the routine executes the requested function and returns control to ICOMPthe calling program. The control functions and their values are as follows: IONDKEYBDFunctionValue MOVEMPYImmediate skip to channel 112544 NCOMPNSIGNImmediate skip to channel 212800 NZONEPACKImmediate skip to channel 313056 PRINTPUNCHImmediate skip to channel 413312 PUTP1403Immediate skip to channel 513568 P1442READImmediate skip to channel 613824 R2501SKIPImmediate skip to channel 914592 STACKSUBImmediate skip to channel 12 15360 51403TYPERImmediate space of 1 space15616 UNPACWHOLEImmediate space of 2 spaces15872Immediate space of 3 spacesSuppress space after printing161280Normal spacing is one space after printing.Example: NUMBR=12544CALL SKIP(NUMBR)The carriage skips until a punch in channel 1 of the carriage control tape is encountered(normally this is at the top of a page).-79-11111 lIrrurn I Pi, iiilliii.iIIIIIIIIIIIIIIII111,1,1111111,1-minNIVIIIIIMIIMMIP1111111.0111111.11111110111111.111111.11.1.1111111.11.0111111•1111•11MNIIMIIPIPAINVIRM,