,0080121001 IRG MEASUREMENT - WRITE 5500B 0A ,008012,019,026030L0733761001,008012,00110011B361080AB421/340080 1 OF 2 5500B 02 ,037044N000,340344,348349,357,361368/333080 PROG. CHAIN. ROUTINE 2 OF 2 5500B 03 L061S4910012,049L0772772/2772B413 CARD 1 OF 3 5500B 04 ,019026,033,040044,048049/340001 TITLE PRINT ROUTINE CARD 2 OF 3 5500B 05 ,S01S05,S12,S13S17,S18S25,S29S36,S37S41,S45/?99//333080 CARD 3 OF 3 5500B 06 L0313961001B399S691 USE WHEN PROGRAM IS LOADED FROM TAPE 5500B 07 L0314041001BS88 ,, 5500B 08 L0314181001. STOP TO SET UP DR 4 & CHANGE DELAY TIMES5500B 09 L0314191001/332 START TEST 5500B 10 L0314231001/ 5500B 11 L0314241001BS00S521 BR TO TITLE PRINT ROUTINE IF 1 IN S52 5500B 12 L0314321001U%U4R REWIND DRIVE 4 5500B 13 L0314371001,199 SET WM TO LIMIT DELAY INSTR 5500B 14 L0314411001B850 BR TO SET INSTR FOR MINIMUM DELAY 5500B 15 L0314451001M091454 SET TAPE WRITE B ADDR TO S40 5500B 16 L0314521001M085088 SET GAP COUNTER TO 001 5500B 17 L0314591001/299 CLEAR PRINT AREA 5500B 18 L0314631001<452 CLEAR WM FROM B ADDR OF TAPE WRITE INST.5500B 19 L0314671001L%U4S40W WRITE FIRST RECORD OF A PAIR 5500B 20 L0314751001B489 VARIABLE DELAY 5500B 21 L0314801001/489200 ,, 5500B 22 L0314871001/489279 ,, 5500B 23 L0314941001Z199200 ,, 5500B 24 L0315011001Z199200 ,, 5500B 25 L0315081001L%U4/19W WRITE SECOND RECORD OF A PAIR 5500B 26 L0315161001B550L BRANCH IF WRITE ERROR 5500B 27 L0315211001N082467 INSTR USED TO INCREASE DELAY FOR 5500B 28 L0315281001N000000 GROUPS 2, 3, AND 4 5500B 29 L0315351001N000000 ,, 5500B 30 L0315421001B5950861 BR TO WR SPACER REC IF LAST GAP OF GROUP5500B 31 L0315501001A082088 ADD 1 TO GAP COUNTER 5500B 32 L0315571001B570B B ON TO VARY LENGTH OF FIRST REC OF PAIR5500B 33 L0315621001B444 BRANCH TO WRITE NEXT PAIR OF RECORDS 5500B 34 L0315691001U%U4B BACKSPACE 5500B 35 L0315741001U%U4B BACKSPACE 5500B 36 L0315791001U%U4E SKIP 5500B 37 L0315841001B444 BRANCH TO WRITE NEXT PAIR OF RECORDS 5500B 38 L0315891001,452 SUBTR 10 FROM B ADDR OF TAPE WRITE TO 5500B 39 L0315931001A094454 INCREASE LENGTH OF FIRST REC OF PAIR 5500B 40 L0316001001B444 BRANCH TO WRITE NEXT PAIR OF RECORDS 5500B 41 L0316041001U%U4B BACKSPACE 5500B 42 L0316091001U%U4E SKIP 5500B 43 L0316141001L%U4/16W WRITE SPACER RECORD 5500B 44 L0316221001B585L BRANCH IF WRITE ERROR 5500B 45 L0316271001B620 BRANCH TO LOAD NEXT TYPE OF DELAY INSTR 5500B 46 L0316391001L/24460 SET UP DELAY INSTR FOR 1 TO 2 MS DLY 5500B 47 L0316461001M531502 ,, 5500B 48 L0316531001M?91611 ,, 5500B 49 L0316601001B426 BRANCH TO WRITE WITH 1 TO 2 MS DLY 5500B 50 L0316691001L/31467 SET UP DELAY INSTR FOR 2 TO 4 MS DLY 5500B 51 L0316761001D498505 ,, 5500B 52 L0316831001M?95611 ,, 5500B 53 L0316901001B426 BRANCH TO WRITE WITH 2 TO 4 MS DLY 5500B 54 L0316991001L/45474 SET UP DELAY INSTR FOR 4 TO 12 MS DLY 5500B 55 L0317061001L ,, 5500B 56 L0317071001L/66522 ,, 5500B 57 L0317141001L ,, 5500B 58 L0317151001L ,, 5500B 59 L0317161001M?99611 ,, 5500B 60 L0317231001B426 BRANCH TO WRITE WITH 4 TO 12 MS DLY 5500B 61 L0317391001M/71506 SET UP DELAY INSTR FOR 12 MS FIXED DLY 5500B 62 L0317461001M/03611 ,, 5500B 63 L0317531001B426 BRANCH TO WRITE WITH 12 MS FIXED DLY 5500B 64 L0317591001L?79488 SET UP DELAY INSTR FOR 5 SEC FIXED DLY 5500B 65 L0317661001L ,, 5500B 66 L0317671001L ,, 5500B 67 L0317681001L ,, 5500B 68 L0317691001,484 ,, 5500B 69 L0317731001D540529 ALTER INSTR IN 523 TO COUNT 10 GAPS 5500B 70 L0317801001D540577 ALTER INSTR IN 523 TO SUBTR 100 FROM 5500B 71 L0317871001M/07611 B ADDR OF TAPE WRITE INSTRUCTION 5500B 72 L0317941001B426 BRANCH TO WRITE WITH 5 SEC FIXED DLY 5500B 73 L0318101001L196479 SET UP INSTR TO BKSP REWRITE 5500B 74 L0318171001L ,, 5500B 75 L0318181001L ,, 5500B 76 L0318191001L ,, 5500B 77 L0318201001L132519 ,, 5500B 78 L0318271001L ,, 5500B 79 L0318281001L ,, 5500B 80 L0318291001M/11611 ,, 5500B 81 L0318361001B426 BR TO BKSP-REWR SECOND RECORD OF PAIR 5500B 82 L0318491001U%U4M WRITE TAPE MARK 5500B 83 L0318541001U%U4R REWIND 5500B 84 L0318591001B348 BRANCH TO LOAD READ PROGRAM 5500B 85 L0318691001L158488 SET UP INSTRUCTIONS FOR MINIMUM DELAY 5500B 86 L0318761001L158 ,, 5500B 87 L0318801001L ,, 5500B 88 L0318811001L ,, 5500B 89 L0318821001L ,, 5500B 90 L0318831001L172522 ,, 5500B 91 L0318901001L172 ,, 5500B 92 L0318941001L ,, 5500B 93 L0318951001D507529 ,, 5500B 94 L0319021001D582577 ,, 5500B 95 L0319091001M?87611 ,, 5500B 96 L0319161001B426 BRANCH TO BEGIN WRITING WITH MINIMUM DLY5500B 97 L031?711001M104109 CONSTANTS TO MODIFY DELAY INSTRUCTIONS 5500B 98 L031?781001A104109 ,, 5500B 99 L031?851001C100107 ,, 5500B100 L031?921001N0B468/ ,, 5500B101 L031/031001B620B650B680B720 UNCONDITIONAL BRANCH INSTRUCTIONS 5500B102 L031/191001B740B791B830 FOR GROUPS 2 TO 7 5500B103 L031/351001IRG" SPACER RECORD TM IN /19 5500B104 L031/391001B555L CONSTANTS TO MODIFY DELAY INSTR 5500B105 L031/441001C199199 ,, 5500B106 L031/511001Z274275 ,, 5500B107 L031/581001/475200 ,, 5500B108 L031/651001A082474 ,, 5500B109 L031/721001A085481 ,, 5500B110 L031/791001A085488 ,, 5500B111 L031/861001B523 ,, 5500B112 L031/991001 5500B113 L03110110011001 CONSTANT 5500B114 L0311051001XXX GAP COUNTER 5500B115 L0311081001S40 CONSTANT - B ADDR OF FIRST TAPE WR INST 5500B116 L0311111001I90 CONSTANT TO SUBTRACT 10 5500B117 L0311141001I00 CONSTANT TO SUBTRACT 100 5500B118 L03111710015000005 CONSTANTS 5500B119 L0311241001XXXXX ,, 5500B120 L03112910011? ,, 5500B121 L0311341001B5231051 CONSTANTS TO MODIFY DELAY INSTR 5500B122 L0311421001U%U4B ,, 5500B123 L0311471001B468 ,, 5500B124 L0311521001B489 ,, 5500B125 L0311571001/489200 ,, 5500B126 L0311641001/489279 ,, 5500B127 L0311711001Z199200 ,, 5500B128 L0311781001N082467 ,, 5500B129 L0311851001N000000 ,, 5500B130 L0311921001N0000 ,, 5500B131 L0311971001M111106 ,, 5500B132 L0312041001A083106 ,, 5500B133 L0312111001B489 ,, 5500B134 L012S501001| GROUP MARK IN S50 5500B135 ,019027,031,038042B031T98|B399L046352BW04BS88 IRG MEASUREMENT - WRITE 5500B136 ,0080121001 IRG MEASUREMENT - READ 5500B 0A ,008012,019,026030L0653681001,008012,00110011B361080AB421/340080 1 OF 2 5500B 02 ,037044N000,340344,348349,357,361368/333080 PROG. CHAIN. ROUTINE 2 OF 2 5500B 03 L057S4510012,049L0772772/2772