/INSTRUCTION TEST - 1 /TAPE 1 . *0 0 JMP 1 0002 0003 0 0000 HALT, HLT NOOP, NOP 0 /CONSTANTS AND VARIABLES *20 K0000, 0000 K0001, 0001 K0002, 0002 K0004, 0004 K0010, 0010 K0020, 0020 K0040, 0040 K0100, 0100 K0200, 0200 K0400, 0400 K1000, 1000 K2000, 2000 K4000, 4000 K7776, 7776 K7775, 7775 K7773, 7773 K7767, 7767 K7757, 7757 K7737, 7737 L7677, 7677 K7577, 7377 K7377, 7377 K6777, 6777 K5777, 5777 K3777, 3777 K7777, 7777 K5252, 5252 K2525, 2525 K6000, 6000 K7000, 7000 K7400, 7400 K7600, 7600 K7740, 7740 K7760, 7760 K7770, 7770 K7774, 7774 K0003, 0003 K0007, 0007 K0067, 0067 K0017, 0017 K0037, 0037 K0077, 0077 K0177, 0177 K0377, 0377 K0777, 0777 K1777, 1777 K7700, 7700 *144 /TAD,CLA,HLT,TEST START, TAD K7777 CLA HLT /AC SHOULD=0 /SET SR TO 7777, CONTINUE /SKIP TEST SKP HLT /SKP FAILED /SZA TEST 1 CLA SEA HLT /SEA SHOULD HAVE SKIPPED /AC SHOULD EQUAL ZERO SNA SKP HLT /SNA SHOULD NOT HAVE SKIPPED /AC SHOULD EQUAL ZERO /SZA TEST 2 CLA TAD K4000 SEA SKP HLT /SEA SHOULD NOT HAVE SKIPPED /AC SHOULD EQUAL 4000 SNA HLT /SNA SHOULD HAVE SKIPPED /AC SHOULD EQUAL 4000 /SZA TEST 3 CLA TAD K2000 SZA SKP HLT /SZA SHOULD NOT HAVE SKIPPED /AC SHOULD EQUAL 2000 SNA HLT /SNA SHOULD HAVE SKIPPED NOP /AC SHOULD EQUAL 2000 NOP NOP *200 /SZA TEST 4 CLA TAD K1000 SZA SKP HLT /SZA SHOULD NOT HAVE SKIPPED /AC SHOULD EQUAL 1000 SNA HLT /SNA SHOULD NAVE SKIPPED /AC SHOULD EQUAL 10000 /SZA TEST 5 CLA TAD K0400 SZA SKP HLT /SZA SHOULD NUT HAVE SKIPPED /AC SHOULD EQUAL 0400 SNA HLT /SNA SHOULD HAVE SKIPPED /AC SHOULD EQUAL 0400 /SZA TEST 6 CLA TAD K0200 SZA SKP HLT /SZA SHOULD NOT HAVE SKIPPED /AC SHOULD EQUAL 0200 SNA HLT /SNA SHOULD HAVE SKIPPED /AC SHOULD EQUAL 0200 /SZA TEST 7 CLA TAD K0100 SZA SKP HLT /SZA SHOULD NOT HAVE SKIPPED /AC SHOULD EQUAL 0100 SNA HLT /SNA SHOULD HAVE SKIPPED /AC SHOULD EQUAL 0100 /SEA TEST 8 CLA TAD K0040 SEA SKP HLT /SEA SHOULD NOT HAVE SKIPPED /AC SHOULD EQUAL 0040 SNA HLT /SNA SHOULD HAVE SKIPPED /AC SHOULD EQUAL 0040 /SZA TEST 9 CLA TAD K0020 SZA SKP HLT /SZA SHOULD NOT HAVE SKIPPED /AC SHOULD EQUAL 0020 SNA HLT /SNA SHOULD HAVE SKIPPED /AC SHOULD EQUAL 0020 /SEA TEST 10 CLA TAD K0010 SZA SKP HO /SZA SHOULD NOT HAVE SKIPPED /AC SHOULD EQUAL 0010 SNA HLT /SNA SHOULD HAVE SKIPPED /AC SHOULD EQUAL 0010 /SZA TEST 11 CLA TAD K0004 SZA SKP HLT /SZA SHOULD NOT HAVE SKIPPED /AC SHOULD EQUAL 0004 SNA HLT /SNA SHOULD HAVE SKIPPED /AC SHOULD EQUAL 0004 /SZA TEST 12 CLA TAD K0002 SZA SKP HIT /SZA SHOULD NOT HAVE SKIPPED /AC SHOULD EQUAL 0002 SNA HLT /SNA SHOULD HAVE SKIPPED /AC SHOULD EQUAL 0002 /SZA TEST 13 CLA TAD K0001 SKP HLT /SZA SHOULD NOT HAVE SKIPPED /AC SHOULD EQUAL 0001 SNA HLT /$NA SHOULD HAVE SKIPPED /AC SHOULD EQUAL 0001 /SPA TEST 1 CLA TAD K3777 SPA HLT /SPA SHOULD HAVE SKIPPED /AC SHOULD EQUAL 3777 /SPA TEST 2 CLA TAD K4000 SPA SKP NLT /SPA SHOULD NOT HAVE SKIPPED /AC SHOULD EQUAL 4000 /SMA TEST 1 CLA TAD K3777 SMA SKP HLT /SMA SHOULD NOT HAVE SKIPPED /AC SHOULD EQUAL 3777 /SMA TEST 2 CLA TAD K4000 SMA HLT /SMA SHOULD HAVE SKIPPED /AC SHOULD EQUAL 4000 /CMA TEST 1 CLA TAD K7777 CMA SZA HLT /CMA DID NOT COMPLEMENT AC /AC SHOULD EQUAL 0000 /CMA - TAD TEST 1 CLA TAD K2525 CMA SNA HLT /TAD OR CMA ERROR /AC SHOULD EQUAL 5252 TAD K2525 CMA SZA HLT /TAD OR CMA ERROR /AC SHOULD EQUAL 0000 /CMA - TAD TEST 2 CLA TAD K5252 CMA SNA HLT /TAD OR CMA ERROR /AC SHOULD EQUAL 2525 TAD K5252 CMA SZA HLT /TAD OR CMA ERROR /AC SHOULD EQUAL 0000 /CMA - TAD TEST 3 CLA TAD K1171 CMA SZA HLT /TAD OR CMA ERROR /AC SHOULD EQUAL 0000 /IAC TEST 1 CLA IAC SZA SKP HLT /I4C DID NOT INCREMENT /AC SHOULD EQUL 0001 /IAC TEST 2 CLA TAD K7777 IAC SZA HLT /IAC 010 NOT INCREMENT /AC SHOULD EQUAL 0000 NOP NOP *400 /IAC TEST 3 CLA TAD K7774 IAC IAC IAC IAC SZA HLT /IAC NOT INCREMENTING /AC SHOULD EQUAL 0040 /SZL TEST 1 CLA CLL /CLEAR LINK RAL /CLEAR LINK SAFETY SZL HLT /SZL SHOULD HAVE SKIPPED /LINK SHOULD EQUAL ZERO /SZL TEST 2 CLA CLL /CLEAR LINK CML /COMPLEMENT LINK TAD K4000 RAL /SET LINK SAFETY SZL SKP HLT /SZL SHOULD NUT HAVE SKIPPED /LINK SHOULD EQUAL ONE /SNL TEST 1 CLA CLL /CLEAR LINK RAL /CLEAR LINK SAFETY SNL SKP HLT /SNL SHOULD NOT HAVE SKIPPED /LINK SHOULD EQUAL ZERO /SNL TEST 2 CLA CLL /CLEAR LINK CML /COMPLEMENT LINK TAD K4000 PAL /SET LINK SAFETY SNL HLT /SNL SHOULD HAVE SKIPPED /LINK SHOULD EQUAL ONE /CLL TEST 1 CLA TAD K4000 RAL /SET LINK SNL JMP CLL11 /CANNOT SET LINK WITH RAL /TRY A CML CLL1, CLL SZL HLT /CLL DID NOT CLEAR LINK /LINK SHOULD EQUAL ONE JMP .+5 CLL11, CML /SET LINK SNL HLT /CANNOT SET LINK WITH /RAL OR CML, CANNOT /PERFORM CLL TEST 1 JMP CLL1 /CML TEST 1 CMLT1, CLL SZL HLT /CLL DID NOT CLEAR LINK CML SNL HLT /CML DID NOT SET LINK CML SZL HLT /CML DID NOT RESET LINK /CLA TEST 1 (OPERATE GROUP 2) CLA TAD K7777 7600 SZA HLT /CLA (7600) DID NOT CLEAR AC /AC SHOULD EQUAL 0000 /OSR TEST 1 CLA OSR CMA SEA HLT /OSR DID NOT SET AC TO 7777 /AC SHOULD=0 /NOP TEST 1 (OPERATE GROUP 1) CLA CLL /AC AND LINK EQUAL ZERO 7000 /TEST INSTRUCTION SNA SZL HLT /NOP FAILURE /AC AND LINK SHOULD BE ZERO /NOP TEST 2 (OPERATE GROUP 2) CLA CLL /AC AND LINK EQUAL ZERO 7400 /TEST INSTRUCTION SNA SZL HLT /NOP FAILURE /AC AND LINK SHOULD BE ZERO /TAD TEST 1 CLA TAD K3777 /OPERAND 1 TAD K4000 /OPERAND 2 CMA S2A HO /TAD ERROR /AC SHOULD EQUAL 0000 /TAD TEST 2 CLA TAD K5777 /OPERAND 1 TAD K2000 /OPERAND 2 CMA SZA HLT /TAD ERROR /AC SHOULD EQUAL 0000 /TAD TEST 3 CLA TAD K6777 /OPERAND 1 TAD K1000 /OPERAND 2 CMA SZA HLT /TAD ERROR /AC SHOULD EQUAL 0000 /TAD TEST 4 CLA TAD K7377 /OPERAND 1 TAD K0400 /OPERAND 2 CMA SZA HLT /TAD ERROR /AC SHOULD EQUAL 0000 /TAD TEST 5 CLA TAD K7577 /OPERAND 1 TAD K0200 /OPERAND 2 CMA SZA HLT /TAD ERROR /AC SHOULD EQUAL 0000 /TAD TEST 6 CLA TAD K7677 /OPERAND 1 TAD K0100 /OPERAND 2 CMA SZA HLT /TAD ERROR /AC SHOULD EQUAL 0000 /TAD TEST 7 CLA TAD K7737 /OPERAND 1 TAD K0040 /OPERAND 2 CMA SZA HLT /TAD ERROR /AC SHOULD EQUAL 0000 /TAD TEST 8 CLA TAD K7757 /OPERAND 1 TAD K0020 /OPERAND 2 CMA SZA HLT /TAD ERROR /AC SHOULD EQUAL 0000 NOP NOP *600 /TAD TEST 9 CLA TAD K7767 /OPERAND 1 TAD K0010 /OPERAND 2 CMA SZA HLT /TAD ERROR /AC SHOULD EQUAL 0000 /TAD TEST 10 CLA TAD K7773 /OPERAND 1 TAD K0004 /OPERAND 2 CMA SZA HO /TAD ERROR /AC SHOULD EQUAL 0000 /TAD TEST 11 CLA TAD K7775 /OPERAND 1 TAD K0002 /OPERAND 2 CMA SZA HLT /TAD ERROR /TAD TEST 12 CLA TAD K7776 /OPERAND 1 TAD K0001 /OPERAND 2 CMA SZA HLT /TAD ERROR /AC SHOULD EQUAL 0000 /TAD TEST 13 CLA CLL TAD K4000 /OPERAND 1 TAD K440 /OPERAND 2 SZL SZA HLT /TAD ERROR, AC SHOULD EQUAL 00d0 /LINK SHOULD BE EQUAL ONE, /TAD TEST 14 CLA CLL TAD K6000 /OPERAND 1 TAD K2000 /OPERAND 2 SZL SZA HLT /TAD ERROR, AO SHOULD EQUAL 0000 /LINK SHOULD EQUAL ONE /TAD TEST 15 CLA CLL TAD K7000 /OPERAND 1 TAD K1000 /OPERAND 2 SZL SZA HLT /TAD ERROR, AC SHOULD' EQUAL 0000 /LINK SHOULD EQUAL ONE /TAD TEST 16 CLA CLL TAD K7400 /OPERAND 1 TAD K0400 /OPERAND 2 SZL SZA HLT /TAD ERROR, AC SHOULD EQUAL 0000 /LINK SHOULD EQUAL ONE /TAD TEST 17 CLA CLL TAD K7600 /OPERAND 1 TAD K0200 /OPERAND 2 SZL SZA HLT /TAD ERROR, AC SHOULD EQUAL 0000 /LINK SHOULD EQUAL ONE /TAD TEST 18 CLA CLL TAD K7700 /OPERAND 1 TAD K0100 /OPERAND 2 SZL SZA HLT /TAD ERROR, AG SHOULD EQUAL 0000 /LINK SHOULD ...EQUAL ONE /TAD TEST 19 CLA CLL TAD K7740 /OPERAND 1 TAD K0040 /OPERAND 2 SZL SZA HLT /TAD ERROR, AC SHOULD EQUAL 0000 /LINK SHOULD EQUAL ONE /TAD TEST 20 CLA CLL TAD K7760 /OPERAND 1 TAD K0020 /OPERAND 2 SZL SEA HLT /TAD ERROR, AC SHOULD EQUAL 0000 /LINK SHOULD EQUAL ONE /TAD TEST 21 CLA CLL TAD K7770 /OPERAND 1 TAD K0010 /OPERAND 2 SZL SZA /TAD ERROR AC SHOULD EQUAL 0000 HLT /LINK SHOULD EQUAL ONE /TAD TEST 22 CLA CLL TAD K7774 /OPERAND 1 TAD K5004 /OPERAND 2 SAL SEA HLT /TAD ERROR, AC SHOULD EQUAL 0000 /LINK SHOULD EQUAL ONE /TAD TEST 23 CLA CLL TAD K7776 /OPERAND 1 TAD K0002 /OPERAND 2 SZL SZA HLT /TAD ERROR, AC SHOULD EQUAL 0000 /LINK SHQULD EQUAL ONE /TAD TEST 24 CLA CLL TAD K7777 /OPERAND 1 TAD K0001 /OPERAND 2 . SZL SZA HLT /TAD ERROR, AC SHOULD EQUAL. 0000 /LINK SHOULD EQUAL ONE /TAD TEST 25 CLA CLL CML TAD K4000 /OPERAND 1 TAD K4000 /OPERAND 2 SNL SZA HLT /TAD ERROR, AC SHOULD EQUAL 0000 /LINK SHOULD EQUAL ZERO /TAD TEST 26 CLA CLL TAD K3777 /OPERAND 1 TAD K2000 /OPERAND 2 TAD K2000 /OPERAND 4 CMA SNL SZA HLT /TAD ERROR, AC SHOULD EQUAL 0000 /LINK SHOULD EQUAL ZERO NOP NOP NOP *1000 /TAD TEST 27 CLA CLL TAD K0777 /OPERAND 1 TAD 4000 /OPERAND 2 TAD K1000 /OPERAND 3 CMA SNL SZA /TAD ERROR AC SHOULD EQUAL 0000 HLT /LINK SHOULD EQUAL ZERO /TAD TEST 28 CLA CLL TAD K6777 /OPERAND 1 TAD K0400 /OPERAND 2 TAD K0400 /OPERAND 3 CMA SNL SZA HLT /TAD ERROR, AC SHOULD EQUAL 0000 /LINK SHOULD EQUAL ZERO /TAD TEST 29 CLA CLL TAD K7377 /OPERAND 1 TAD K0000 /OPERAND 2 TAD K0200 /OPERAND 3 CMA SNL SZA HLT /TAD ERROR, AC SOULD EQUAL 0000 /LINK SHOULD EQUAL ZERO /TAD TEST 30 CLA CLL TAD K7577 /OPERAND 1 TAD K0100 /OPERAND 2 TAD K0100 /OPERAND 3 CMA SNL SZA HLT /TAD ERROR, AC SHOULD EQUAL 0000 /LINK SHOULD EQUAL ZERO /TAD TEST 31 CLA CLL TAD K7677 /OPERAND 1 TAD K0040 /OPERAND 2 TAD 0040 /OPERAND 3 CMA SNL SZA HLT /TAD ERROR, AC SHOULD EQUAL 0000 /LINK SHOULD EQUAL ZERO /TAD TEST 32 CLA CLL TAD K7737 /OPERAND 1 TAD K0020 /OPERAND 2 TAD K0020 /OPERAND 3 CMA SNL SZA HLT /TAD ERROR, AC SHOULD EQUAL 0000 /LINK SHOULD EQUAL ZERO /TAD TEST 33 CLA CLL TAD K7757 /OPERAND 1 TAD K0010 /OPERAND 2 TAD K0010 /OPERAND 3 CMA SNL SZA HLT /TAD ERROR, AC SHOULD EQUAL 0000 /LINK SHOULD EQUAL ZERO /TAD TEST 34 CLA CLL TAD K7767 /OPERAND 1 TAD K0004 /OPERAND 2 TAD K0004 /OPERAND 3 CMA SNL SZA HLT /TAD ERROR, AC SMOULD EQUAL 0000 /LINK SHOULD EQUAL ZERO /TAD TEST 35 CLA CLL TAD K7773 /OPERAND 1 TAD K0002 /OPERAND 2 TAD K0002 /OPERAND 3 CMA SNL SZA HLT /TAD ERROR, AC SHOULD EQUAL 0000 /LINK SHOULD EQUAL ZERO /TAD TEST 36 CLA CLL TAD K7775 /OPERAND 1 TAD K0001 /OPERAND 2 TAD K0001 /OPERAND 3 CMA SNL SZL HLT /TAD ERROR, AC SHOULD EQUAL 0000 /LINK SHOULD EQUAL ZERO /RAR TEST 1 CLA CLL TAD K0001 /ROTATE PATTERN RAR SNL HLT /RAR FAILED, LINK DROPPED A BIT /LINK SHOULD EQUAL A ONE /RAR TEST 2 CLA CLL TAD K0000 /ROTATE PATTERN RAR SZA HLT /RAR FAILED, AC PICKED UP A BIT /A ONE IN AC EQUALS THE PICKED UP BIT /RAR TEST 3 CLA CLL TAD K0000 /ROTATE PATTERN RAR SZL HLT /RAL, FAILED. LINK PICKED UP A BIT /LINK SHOULD EQUAL ZERO. /RAR TEST 4 CLA CLL CML TAD K4004 /ROTATE PATTERN RAR SZL HLT /RAR LINK PICKED UP A BIT /LINK SHOULD EQUAL ZERO /RAR TEST 5 CLA CLL CML TAD K7777 /ROTATE PATTERN RAR CMA SZA HLT /RAR FAILED AU DROPPED A BIT /A ON C IN AC EQUALS THE DROPPED BIT NOP NOP NOP NOP NOP *1200 /RAR TEST 6 CLA CLL CML TAD K0000 /ROTATE PATTERN RAR TAD K5777 CMA SNA SZL HLT /RAR FAILED AC AND LINK /SHOULD EQUAL 0000 /RAR TEST 7 CLA CLL TAD K4000 /ROTATE PATTERN RAR TAD K5777 CMA SNA SZL HLT /RAP FAILED AC AND LINK SHOULD /EQUAL 0000 /RAR TEST 8 CLA CLL TAD K2000 /ROTATE PATTERN RAR TAD K6777 CMA SNA SZL HLT /RAR FAILED AC AND LINK SHOULD /EQUAL 0000 /RAR TEST 9 CLA CLL TAD K1000 /ROTATE PATTERN RAR TAD K7377 CMA SNZ SZL HLT /RAR FAILED AC AND LINK SHOULD /EQUAL 0700 /RAR TEST 10 CLA CLL TAD K0400 /ROTATE PATTERN RAR TAD K7577 CMA SNA SZL HLT /RAR FAILED AC AND LINK /SHOULD EQUAL 0000 /RAR TEST 11 CLA CLL TAD K0200 /ROTATE PATTERN RAR TAD K7677 CMA SNA SZL HLT /RAR FAILED AC AND LINK /EQUAL 0000 /RAR TEST 12 CLA CLL TAD K0100 /ROTATE PATTERN RAR TAD K7737 CMA SNA SZL HLT /RAR FAILED AC AND LINK /SHOULD EQUAL 0000 /RAR TEST 13 CLA CLL TAD K0040 /ROTATE PATTERN RAR TAD K7757 CMA SNA SZL HLT /RAR FAILED AC AND LINK /SHOULD EQUAL 0000 PAUSE /INSTRUCTION TEST 1 /TAPE 2 /RAR TEST 14 CLA CLL TAD K0020 /ROTATE PATTERN RAR TAD K7767 CMA SNA SZL HLT /RAR FAILED AG AND LINK /SHOULD EQUAL 0000 /RAR TEST 15 CLA CLL TAD K0010 /ROTATE PATTERN RAR TAD K7773 CMA SNA SZL HLT /RAR FAILED AC AND LINK /SHOULD EQUAL 0000 /RAR TEST 16 CLA CLL TAD K0004 /ROTATE PATTERN RAR TAD K7775 CMA SNA SZL HLT /RAR FAILED AG AND LINK /SHOULD EQUAL 0000 /RAR TEST 17 CLA CLL TAD K0002 /ROTATE PATTERN RAR TAD K7776 CMA SNA SZL HLT /RAR FAILED AG AND LINK /SHOULD EQUAL 0000