Digital PDFs
Documents
Guest
Register
Log In
XX-BDFD9-E7
February 1969
52 pages
Original
2.9MB
view
download
Document:
MAINDEC-08-D2PE-D
Order Number:
XX-BDFD9-E7
Revision:
0
Pages:
52
Original Filename:
http://bitsavers.org/pdf/dec/pdp12/diagnostics_set2/MAINDEC-08-D2PE-D.pdf
OCR Text
.. .. IDENTIFICATION Product Code: MAINDEC-08-D2PE-D Product Name: Family-of-8 ASR 33/35 Teletype Tests Part 1 ~~ Date Created: February 21, 1969 Maintainer: Diagnostic Group • ( ,,_ " c --------------- - - - - . . ("- 1. ABSTRACT The Family-of-8 ASR33/35 Teletype Tests Part 1 is the first part of a two part package used to test the ASR33, ASR33TY, or ASR35 Teletype when attached to a Fa mi ly-of-8 system. Part 1 contains nine selectable programs numbered from 0 to 10 (octal). The programs are selected by means of the switch register (SR). The programs available are: PRGO Basic Input Logic Tests PRGl Basic Output Logic Tests PRG2 Reader Test PRG3 Test Tape Generator. Punches tape with characters stored in locations 0021 and 0022. PRG4 Test Tape Generator. Punches Binary Count Pattern test tape. PRG5 Reader Exerciser. Reads Binary Count pattern tape in random length blocks, and with fixed stalls between characters. The stall is determined at random. PRG6 Reader Exerciser. Reads Binary Count pattern tape. Fixed sta 11 between characters. Sta II count is taken from LOC 0023. PRG7 Reader Exerciser. Reads tape punched with any 2 test characters. Random length blocks and fixed sta 11 between characters. The stal I is determined at random. PRG10 Reader Exerciser. Reads tape punched with any 2 test characters. Fixed sta II betwei;:n characters. Sta II count taken from LOC 0023. PRGl l ASR33TY Automatic Reader option test. Checks for correct response to READER ON, and READER OFF commands. PRG12 ASR33TY Automatic Punch option test. Checks for correct response to PUNCH ON and PUNCH OFF commands 2. REQUIREMENTS 2. l Equipment Standard PDP-8/S, PDP-8 or PDP-8/I with ASR33, ASR33TY, or ASR35 Teletype. NOTE Programs PRGO through PRG 10 are not written specifically for the ASR33TY Teletype. Whenever these programs are run, be sure to lock the punch and reader in their ON position. In the case of the reader, use a heavy rubber band to keep the reader switch in the ON position. c - -------------- - _____________ ___ - - -··, -----~~- • 2.2 • Storage Locations 0000 through 2341 are used. 3. LOADING PROCEDURE 3 .1 Method The Binary Loader is used to load the program. 4. STARTING PROCEDURE (PRGO) 4. 1 Control Switch Settings (PRGO) 4.2 SRO Halt at end of routine. Routine number in AC. SRl Select routine whose number is set in SR6 through SRl 1. SR2 Loop program • SR6 through SR 11 Routine number to be selected. Starting Addresses (PRGO) This program starts at LOC 0200. 4.3 Program and/or Operator Action (PRGO) a. Insure Teletype is on-line. b. Load binary count pattern test tape in reader. c. Turn on reader. d. Load address 0200. e. Set SR to 0000. f. Press START. g. Program halts at LOC 0232 to permit setting of options. h. Select desired options, if any, in SR. For normal run SR should be 0000. Press CONTINUE. i. Program is executed and halts at LOC 0274, program end halt, if no loop options are selected and if no errors occur. 5. OPERA TING PROCEDURE (PRGO) 2 ------~ --- ----- --- ·----~ - ------------- • ( ( 5. l Program and/or Operator Action (PRGO) 5.1. l Normal Halts (PRGO) LOC 0232 SR SET ha It. Occurs to permit setting of desired options. LOC 0274 Program end halt. Occurs if no "loop program" option is set. Set desired options and press CONTJN UE. Jf no options are set, this ha It reoccurs. LOC 0320 Routine end hall. Occurs at end of routine if SRO= l. To proceed, press CONTil"-IUE, 6. ERRORS (PRGO) 6. l Error Ha Its and Description (PRGO) LOC 0177 Incorrect program number se iecl·ed. Set SR to 0000 and press CONTINUE. LOC 0255 Nonexistent routine s!:'lected. Set correct routine number in SR6 through SR 11 and press CONTINUE. LOC 1221 PRGO, routine 0 error hall-. KCC imtruction failed 1·0 clear the AC. Pressing CONTINUE enters scope loop that set& AC to ali ls, issues KCC to clear AC, and repeats. Manua ! restart. LOC 1244 PRGO, routine l error halt. 200 ms after KRB instruction the flag is not set, or KSF instruction failed to skip on flag '- 1. Pressing CONTINUE repeats the test. LOC 1267 PRGO, routine 2 error ha It A. Same as PRGO, routine 1 error ha It. LOC 1271 PRGO / routine 2 error ha It B. KSF instruction failed to skip with flag '- 1. Pressing CONTINUE enters scoµi:: loop that skips on flag continuously. Manua i Restart. LOC 1320 PRGO, routine3errorha!tA. Same as PRGO, routine 1 error halt. LOC 1322 PRGO, routine 3 error ha It B. KCC failed to reset, or KSf instruction skipped with flag "'0. Pressing CONTINUE enters scope loop that clears the flag and skips on flag continuously. Manual restart. LOC 1345 PRGO, routine 4, error halt A. Unexpected interrupt. Turn off any device that may be causin9 an interrupt (other than the Teletype}. Pressing CONTINUE repeats the test. LOC 1362 PRGO, routine 4, error halt B. With reader flag =1 and interrupt enabled, no interrupt occum~d. Pressing CONTINUE anlers scope loop that turns on interrupt continuously. fl.,\::Jnual restart. LOC 1417 PRGO, routine 5, error hult. Timing error. Flag not -l 110 ms after KRB command. Pressing CONTINUE enters scope loop that reads tape continuously to aid in timing adjustment. Manual restart. 3 c ----· -~ .., ...... .,,.---~---- LOC 1457 PRGO, routine 6, error halt A. Reread error. A reread of the Teletype buffer did not match with the original read. New character is displayed in AC. Press CONTINUE. LOC 1462 PRGO, routine 6, error halt B. Follow up halt to PRGO, routine 6, error halt A. The "old" character is displayed in AC. Pressing CONTINUE enters scope loop that reads the teletype buffer continuously. tv\anua I restart. 4A. STARTING PROCEDURES (PRGl) 4. lA Control Switch Settings (PRGl) 4.2A SRO Ha It at end of routine. Routine number in AC. SRl Select routine whose number is set in SR6 through SR 11. SR2 Loop program. SR6 through SRl 1 Routine number to be selected. Starting Addresses (PRG 1) This program starts at LOC 0200. 4.3A Program and/or Operator Action (PRG 1) a. Insure Teletype is on-line. b. Insure reader is off. c. Insure that there is paper in teleprinter. d. Load address 0200. e. Set SR to 0001. f. Press START. g. Program halts at LOC 0232 to permit setting of options. h. Select desired options, if any, in SR. For normal run SR should be 0000. Press CONTINUE. i. Program is executed and halts at LOC 0274, program end halt, if no loop options are selected and if no errors occur. 5.A OPERATING PROCEDURE (PRGl) 5. lA Program and/or Operator Action (PRG 1) 4 ___ - - : ---------- c 5.1.lA ( Normal Halts (PRGl) LOC 0232 SR SET ha It. Occ!i:·'.; to r<~nnf! CONTINUE. LOC 0274 Program end halL Occurs if no "loop program" option is seL Set desired options and press CONTINUE. If no options are set, the halt reoccurs. LOC 0320 Routine end ha It. Occurs at end of routine if SRO '' I • To proceed, press CONTINUE. 6 .A ERRORS (PRG l) 6. lA Error Halts and Description (PRGl} LOC 0177 Incorrect program number selected. Set SR to 0001 and press CON- TINUE. LOC 0255 None>dsrent routi no sdected. Set corrccl' roui·i ne number in S R6 through SR11 and press CONTINUE. LOC 1627 LOC 1631 PRG 1, routine 0, cwor ho!t A. 200 ms aHer TLS command the flag is not 1, or TSF command faiied to skifJ. COi'-.ITit-..JUE repeats the test. PRG 1, routine error ha it B. With CONTINUE enters scope uously. Manua I restart. skip. 4.B = 1, TSF command failed to that ~kips on contin- LOC 1651 PRG 1, routine l e1ror ha It. TCF command foiled to dear flag, or TSF comrr1and sk with = 0. CONTINUE enters scope loop that clears the flag and then skips on continuously. l'v'onual restart. LOC 1676 PRGl, routine 2 ~HTOr hail" TCF command foiled to clear flag. Pressing CONTINUE enl·ers scope tho!· issues TCF command continuously. Manua I restart. LOC 1717 PRG 1, routine 3, error ha It A. device that may be on be off). Press CONTINUE to repeat rest. LOC 1734 PRG l, routine 3, error ha ii' B. no interrupt occurred. LOC 1765 PRG l , rouH ne 4 error halt, error. F not TLS command. Pressing CONTINUE enters scope printer/punch , to aid restart. Turn off any reader must WHh I, nnd CONTINUE enters scope turns on interrupl· continuously. Manua I resrorL STARTING PROCEDURES (PRG2) 5 enabled, that l lO ms cifter that rnns the • lv\anual . 4.18 4.28 c. Control Switch Settings {PRG2) SRO Halt at end of routine. Routine number in AC. SRl Select routine whose number is set in SR6 through SR 11. SR2 Loop program. SR6 through SRl 1 Routine number to be selected. Starting Addresses {PRG2) This program starts ar LOC 0200. 4.38 Program and/or Operator Action {PRG2) a. Insure Teletype is on-line. b. Load binary count pattern test tape in reader. c. Turn on reader. d. Load address 0200. e. Set SR to 0002. f. Press START g. Program halts at LOC 0232 to permit setting of options. h. Set desired options, if any, in SR. For normal run, SR should be 0000. Press CON- TINUE. i. Program is executed and halts at LOC 0274, program end halt, if no loop options are set, and if no errors occur. 5.8 OPERATING PROCEDURE (PRG2) 5. 18 Program and/or Operator Action {PRG2) 5. 1. 18 Norma I Ha Its (PRG2) LOC 6.8 0232 SR SET halt. Occurs to permit setting of desired options. Press CONTINUE. LOC 0274 Program end halt. Occurs if no "loop program" option is set, set options and press CONTINUE. If no options are set, this halt reoccurs. LOC 0320 Routine end halt. Occurs at end of routine if SRO= 1. To proceed press CONTINUE. ERRORS (PRG2) 6 0 ( ( 6. lB Error Ha Its and Description (PRG2) LOC 0177 Incorrect program number selected. Set SR to 0002 and press CONTINUE. LOC 0255 Nonexistent routine selected. Set correct routine number in SR6 through SRll and press CONTINUE. LOC 0564 Unable to sync. Sync subroutine hos not found on a 11 1's character within 256 characters. Press CONTINUE to retry. LOC 2030 PRG2, routine 0, error halt A. Read error. Bad character in AC. Press CONTINUE. LOC 2033 PRG2, routine 0, error halt B. Follow up halt. Expected character in AC. Pressing CONTINUE resumes test. LOC 2062 PRG2, routine 1, error ha It A. Read error. Bad character in AC. Press CONTINUE. LOC 2065 PRG2, routine 1, error halt B. Follow up halt. Expected character in AC. Pressing CONTINUE resumes test. LOC 2120 PRG2, routine 2, error ha It A. Read error. Bad character in AC. Press CONTINUE. LOC 2123 PRG2, routine 2, error halt B. Follow up halt. Expected character AC. Pressing CONTINUE resumes test. 4.C STARTING PROCEDURES (PRG3) 4.1.C Control Switch Settings (PRG3) None 4.2C Starting Addresses (PRG3) This program starts at LOC 0200. 4 .3C Program and/or Operator Action (PRG3) a. Insure Teletype is on-line. b. Turn off teletype reader. c. Load blank tape in punch. d. Turn on punch. e. Deposit in LOC 0021 and 0022 (8), the 8-bit code for characters to be punched. f. Load address 0200. g. Set SR to 0003. 7 c h. Press START. i. Program punches tape unti I stopped by user. 5.C OPERATING PROCEDURE (PRG3) 5. lC Program and/or Operator Action (PRG3) c 5.1.lC Normal Halts (PRG3) None 6 .C ERRORS (PRG3) 6 . lC Error Ha I ts and Description (PR G3) LOC 0177 Incorrect program number selected. Set SR to 0003 and press CONTINUE. 4.D STARTING PROCEDURES (PRG4) 4. lD Control Switch Settings (PRG4) c None 4.2D Starting Addresses (PRG4) This program starts at LOC 0200. 4.3D Program and/or Operator Action (PRG4) a. Insure Teletype is on-line. b. Turn off teletype reader. c. Load blank tape in punch. d. Turn on punch. e• Load address 0200. f. Set SR to 0004. g. Press START. h. Program punches binary count pattern test tape until stopped user. 8 0 ( 5.D OPERA TING PROCEDURE (PRG4) 5. 1D Program and/or Operator Action (PRG4) 5. 1. 1D Norma I Ha Its (PRG4) None. 6. D ERRORS (PRG4) 6. lD Error Halts and Description (PRG4) LOC 0177 ( Incorrect program number selected. Set SR to 0004 and press CONTINUE. 4.E STARTING PROCEDURES (PRG5) 4. lE Control Switch Settings (PRG5) 4.2E SRO Ha It. Program ha Its with accumulated error count in AC. SR5 Halt on error. Program halts if read-error occurs. Starting Addresses (PRG5) This program starts at LOC 0200. 4.3E Program and/or Operator Action (PRG5) a. Insure Teletype is on-line. b. Load binary count pattern test tape in reader. c. Turn on reader. d. Load address 0200. e. Set SR to 0005. f. Press START. g. Program runs continuously until stopped, unless a read error occurs with SR5 = 1, or SRO is set to 1 • 5.E OPERATING PROCEDURE (PRG5) 9 c 5. lE Program and/or Operator Action (PRG5) 5.l.1E Normal Halts LOC 1115 Ha It. Accumulated errors in AC. Occurs if SRO = l • Press CONTINUE to proceed. 6. E ERRORS (PRG5) 6. 1E Error Ha Its and Description (PRG5) LOC 0177 Incorrect program number selected. Set SR to 0005 and press CONTINUE. LOC 1110 Read error ha It. Occurs if SR5 = 1. Press CONTINUE to proceed. 4.F STARTING PROCEDURES (PRG6) 4. lF Control Switch Settings (PRG6) 4.2F c SRO Halt. Program halts with accumulated error count in AC. SR5 Ha It on error. Program ha Its if read error occurs. c Starting Addresses (PRG6) This program starts at LOC 0200. 4.3F Program and/or Operator Action (PRG6) a. Insure Teletype is on-line. b. Load binary count pattern test tape in reader. c• Turn on reader. d. Deposit in LOC 0023 the desired stall count in 2's complement form. A count of -1 gives a 1ms stall, etc. e. Load address 0200. f. Set SR to 0006. g. Press START. h. Program runs continuously unti I stopped, unless a read error occurs with SR5 = 1, or SRO is set to 1. 10 c 5.F OPERATING PROCEDURE (PRG6) 5. lF Program and/or Operator Action (PRG6) 5. 1. 1F Norma I Ha Its (PRG6) LOC 1115 Halt. Accumulated errors in AC. Occurs if SRO= 1. Press CONTINUE to proceed. 6.F ERRORS (PRG6) 6.lF Error Halts and Description (PRG6) LOC 0177 Incorrect program number selected. Set SR to 0006 and press CONTINUE. LOC 1110 Read error ha It. Occurs if SRS = 1. Press CONTINUE to proceed. 4.G STARTING PROCEDURES (PRG7) 4. lG Control Switch Settings (PRG7) 4.2G SRO Ha It. Program ha Its with accumulated error count in AC. SR5 Halt on error. Program halts if read error occurs. Starting Addresses (PRG7) This program starts at LOC 0200. 4 .3G Program and/or Operator Action (PRG7) a. Insure Teletype is on-line. b. Load reader with 2-character test tape. c. Turn on reader. d. test tape. Deposit in location 0021 and 0022 the 8-bit codes for the character punched in the e. Load address 0200. f. Set SR to 0007. g. Press START h. Program runs continuously until stopped, unless a read error occurs with SR5 = 1, or SRO is set to 1 . 11 5.G OPERA TING PROCEDURE (PRG7) 5. l G Program and/or Operator Action (PRG7) c 5.1.lG Normal Halts (PRG7) LOC 1115 Ha It. Accumulated errors in AC. Occurs if SRO = 1 • Press CONTINUE to proceed. 6.G ERRORS (PRG7) 6. l G Error Ha Its and Description (PRG7) LOC 0177 Incorrect program number selected. Set SR to 0007 and press CONTINUE. LOC ll 10 Read error ha It. Occurs if SRS= 1. Press CONTINUE to proceed. LOC 1137 Align error halt. Insure that correct tape is used, and check Step 4.3Gd. 4.H STARTING PROCEDURES (PRG 10) 4. lH Control Switch Settings (PRG 10) 4.2H c SRO Ha It. Program halts with accumulated error count in AC. SRS Halt on error. Program halts if read error occurs. Starting Addresses (PRG 10) This program starts at LOC 0200. 4.3H Program and/or Operator Action (PRG 10) a. Insure Teletype is on-line. b. Load reader with 2-character test tape. c. Turn on reader d. Deposit in LOC 0023 the desired stall count in 2's complement form. A count of -1 gives al ms stall, etc. e. Load address 0200. f. Set SR to 0010. 12 c :: g. h. is set to 1 • Press START. Program runs continuously unti I stopped, unless a read error occurs with SRS ·~ 1, or SRO 5. H OPERA TING PROCEDURE (PRG 10) 5. l H Norma I Ha Its (PRG 10) LOC 1115 Halt. Accumulated errors in AC. Occurs is SRO= 1. Press CONTINUE to proceed. 6. H ERRORS (PR G 10) 6. lH Error Halts and Description (PRG 10) LOC 0177 Incorrect program number selected. Set SR to 0007 and press CONTINUE. LOC 1110 Read error halt. Occurs if SR5 = 1. Press CONTINUE 1·0 proceed. LOC 1137 Align error halt. Insure that correct tape is used, and check Step 4.3Hd. 13 (. 4.I STARTING PROCEDURES (PRG 11) 4. lI Control Switch Settings (PRG 11) c None 4.2! Starting Addresses (PRG 11) Th is program starts at LOC 0200. 4.31 Program and/or Operator Action (PRG 11) a. Insure that Teletype is on-line. b. Load reader.with any test tape loop. c. Turn on reader by pushing the momentary contact switch to the START position. d. Make sure that teletype punch is not locked on. e • Load Address 0200. f. Set SR to OOll. g. Press ST ART h. Program runs continuously until stopped, unless an error halt occurs. 5. I OPERATING PROCEDURE (PRG I l) 5.11 Normal Halts (PRG 11) None 6.I ERRORS (PRG 1 I) 6.11 Error halts and Description (PRG I I) LOC 2212 Reader flag not set after approximately I JO ms after KCC command issued after READER ON command. Probably the READER ON command failed to turn on the reader. Press CONTINUE to proceed. LOC 2227 Reader flag was set after approximately I JO ms after KCC command issued after READER OFF command. Probably the READER OFF command failed to turn off the reader. Press CONTINUE to proceed. 14 c I~ ( 4.J STARTING PROCEDURES (PRG 12) 4. lJ Control Switch Settings (PRG 12) None 4.2J Starting Addresses (PRG 12) This program starts at LOC 0200. 4.3j Program and/or Operator Action (PRG 12) a. With Teletype off-line, punch a section of blank leader about 6 inches long. Return Teletype to on-line position. b. Load Ieader on reader, leaving very Iittle slack between punch and reader. c. Turn on reader by pushing the momemtary contact switch to the START position. d. Make sure that teletype punch is not locked on. e. Load address 0200. f. Set SR to 0012. g. Press ST ART h. Program runs continuously until stopped, unless an error halt occurs. 5.J OPERATING PROCEDURE (PRG 12) 5. lJ Normal Halts (PRG 12) None 6.J ERRORS (PRG 12) 6. lJ Error halts and Description (PRG 12) LOC 2337 6 .2J Reader failed to read a rubout. Reader failed to read correctly if character on tape is a rubout. If tape character is a rubout, the PUNCH FEED OFF command failed to stop the punch from feeding. Check for other similar failures. To be correct, the punched tape should contain all rubouts. Press CONTINUE to proceed. Other Errors (PRG 12) Failure of the PUNCH FEED ON command will eventually be detected by the tightening of the slack between the reader and punch. The longer the program is run the better the chances are of detecting the problem, if present. 15 c c 7. RESTRICTIONS 7. I Starting Restrictions All programs must be started at LOC 0200. 7 .2 Operating Restrictions PRGO and PRG I must be run prior to executing any other programs. Problems detected during execution of PRGO and PRG I should be corrected as they occur. PRG I I must precede PRG 12 execution. 8. MISCELLANEOUS 8. l Execution Time PRGO execution time: 1 minute PRG 1 execution time: 20 seconds PRG2 execution time: 18 minutes PRG3 through PRG 12 are continuous run programs. 8.2 c Test Tapes MAINDEC-08-D2G3-PT Binary Count Pattern test tape is provided with this program. For convenience in use, the tape should be spliced into a loop, making sure that the pattern is matched at the splice point. 9. PROGRAM DESCRIPTION The Family-of-8 ASR33/35 Teletype Tests, Part 1, consists of 11 programs numbered from 0 to 12 (octal). 9. I PRGO - Basic Input Logic Tests This program contains 7 routines numbered from 0 to 6 (octal). RTNO Checks that KCC command is able to clear the AC. Test is done 1000 times. RTNl Issues KCC,. waits 200 ms and checks for flag = 1. A failure to skip on flag indicates that flag is not 1, or KSF command failure to skip. 16 c 9 .2 RTN2 Checks ability of KSF command to skip with flag= 1. Done 1000 times. RTN3 Checks that KSF command does not skip with flag = 0. Done 500 times. RTN4 Checks that no other device can cause an interrupt, and then checks that the reader is capable of interrupting. RTN5 Timing Test. RTN6 Reads a character from tape and saves it. It then rereads the TTI statically 1000 times to check for consistent reading from TTL 256 characters are read in this manner. PRG 1 - Basic Output logic Tests This program contains five routines numbered from 0 to 4. 9.3 RTNO Issues TLS, waits 200 ms, and chec:ks for flag= 1. A failure to skip indicates that flag is not 1, or KSF command failed. If this part is satisfied the routine skips on flag = 1, 1000 times. Failure to skip indicates TSF failure. RTNl Checks that TSF command does not skip with flag = 0. Done 1000 times. RTN2 Checks that TCF command clears flag. Done 100 times. RTN3 Checks that no other device can cause an interrupt, and then checks that the printer/punch is able to interrupt. RTN4 Timing Test. PRG2 - Reader Test This program contains three routines numbered from 0 to 2. 9 .4 RTNO Reads 4095 characters of binary count pattern, at full speed. RTNl Reads 2000 characters of binary count patterns with random stalls between characters. RTN2 Reads 100 random-length character blocks. Fixed stall between characters in a block. Stall is changed for each block and is determined at random. PRG3 - Test Tape Generator This program punches test tape with characters whose code is stored in LOC 0021 and 0022. 9 .5 PRG4 - Test Tape Generator Punches binary count pattern test tape. 17 9.6 PRGS - Reader Exerciser This program reads binary count pattern test tape, in random length blocks, and with fixed c stalls between characters. Sta II is determined at random. 9 .7 PRG6 - Reader Exerciser Reads binary count pattern test tape. Fixed sta 11 between characters. Sta 11 count is taken from LOC 0023 . 9 .8 PRG7 - Reader Exerciser Reads test tcpe punched with any two test characters, random length blocks, and fixed sta II between characters. Stall is determined at random. 9. 9 PRG l 0 - Reader Exerciser Reads test tape punched with any two test characters. Fixed sta II between characters. Sta II count taken from LOC 0023. 9. JO PRG 11 - ASR33TY Automatic Reader Option Test Checks for correct response to READER ON, and READER OFF commands by checking for C ,l correct state of reader flag I JO ms after issuing KCC command which is preceded by one of the reader control commands. The coder control commands used are: READER ON - 221 READER OFF - 223 9. JI PRG12-ASR33TY Automatic Punch Option Test Checks for correct operation of PUNCH FEED ON and PUNCH FEED OFF commands by punching rubouts with the punch feed on, and a II O's characters with the punch feed off. The resulting tape should contain all rubouts. The tape is verified by running it through the reader at the same time. The punch control commands used are: PUNCH FEED ON - 222 PUNCH FEED OFF - 224 18 0 ~ ;) A.,.1.ll Vi,53 lb: lb 21-FttJ-o9 IFA~iLY 0~ o ~ ~ PAGE "" ASHj3/S5 TELlTYPE TfSTS - PAH1 1 I /CUPYrdu•d 190'1, (JIG!TAL E.Ou!PMENT crRPQi'.;A 1 !"'\I, ''AY\JARl1, I /PKG~1-dAS I l; /PHGl-dA~lC MASS, INPUT CU\ITROL LOG l C TE.ST - C uSlS Rf AC'ER) OUTPUT C0N1HOL LOGIC TEST - IJS(5 °R!~TEPl /PHG~-REAJ~H TEST IP f.i G..5 - T t. S T T APE (,I:. NE RA T 0 R , P ti NCH ES C n NT E \ T S J F L 0 C <l V 21 A,~ il '0 2 2 /PHG4-Tt.S T TAPE G(l>J(RATOR, PUNCHES ti I NARY COl"'JT PAT TF R\I Tl:.ST T~p> /PHG~-REAJ~H EXl:.HC!SFR, REAQS 8!NAPY COU~T PATTER\! TfST TAPE !~ QA~00M I L~•GTrl HLOCKS, STALLS ~ITH FIXED OFLAY ~fTwEEN C~ARACTFRS, STALL I JS U!FFERENT FOR EAC~ 8LOC~, /PHG6->lEAcJr_R 1:.XERCISER READS ti I NARY CQllNT PATHR', FIXEIJ STAI L HF TWEEN ChA'<ACTt"'IS, /PHG7-REAi.Jf_H EXE"1C!SER, READS TAPE PllNCHEO BY DRG3, TEST iJATA MUST tlf STnRrn I I~ LDC ~021 ANO ~022, PANOOM LEN~TM ~LCCKS, FIXEn STALL RET~f(h I CHAHACTERS 1 STALL DIFFERENT FOR EACH Bl DC~ /PRG10•SA~f AS PRG7, 8UT FIXED STALL BETWEE~ CHARACTERS (Nn RANQnM L[NGTM ~L0C~SI /PkG11-AS~33TY AUTOM 4 Tlc READER OPTION TEST /PkG12•ASR~3TY AUTDMAT1C PU~CH OPT10N TEST I /Sk OPT!o~s I /SR0•HA~T AT £NQ OF ROUTINE, ROUTINE NUM8EP IN AC /SH1·SELECT RUUTINE WHOSE NUMBER IS SET IN SR6 TD SR11 /Sk2•L00P PROGRAM /SH5•HA~T nN ERROR /SH6·SR11·ROUT!NE NUM8ER TO BE SELECTED, ---------- ;1A1,,1;, V133 21-n.B-69 •J 18110 PAGE 2 lrAM1LY-0r-d ASMj3/J5 'EL[TYPE TESTS-PART 1 ,/)~ 2lfll :rn.10 :l0t10 21 ;J "1 50~1 210212 211iltl2 3c1213 :ll003 00~5 21c12l!:> 54~l2 210216 £10ll0 21020 21J21 0060 J000 ~022 21~23 0000 0000 21024 02!>7 3025 0313 0322 0333 21020 21026 2l027 21030 21031 0032 00 33 7766 21035 21036 2J037 2)040 0000 0'1137 1200 1600 2'1100 1'110'11 0043 0044 0045 0046 1f/J06 UJ13 0047 1060 2200 21050 21051 --~-' 0017 21034 0041 01rH2 ("') 0345 0232 0400 UJ31 1042 2244 ,,.,,.'0 J '.P 1 ? 3 ·~ J>''P I 2 t~ •2;.,, l(SlAMT, PTt.MP, PTl:.MP11 OE.1.AYMt CHAIN, SHLT, SE TC TR, 0LY1SC1 0LY1"1S, SRSTt RANON01 PRGMSK1 PRGL.lMt PRGNUM1 PSW, PRGTAB1 e /USER PROGRAM START, 2! .:) .(l Ct-iA I Ni~ SHALT STCTR Di.YSC Di.VMS SrlSET RANGEN 17 /CHAIN RTN ENTRY, /HAL.T TEST ENTRY /SET COUNTER E~TRY /DELAY SECONDS ENTRY /DELAY MILLISECS E~TRY •12 0 PRGTAB PRGID PRG1 PRG2 P~G3 PRG4 PRG5 PRG6 PRG7 P~GU'! PRG11 PRG12 0 c -- ---- ---:.:~--, ":..:' ~ :>A_:Ll ;J.;52 JJ;3 iJ"154 ZIJ55 2Z56 ('!J 3 7 21;)50 ilJH 3.1!:2 3;;)53 il054 V1S3 21-n.8•69 -~0 \, 0 '-'0.:0 1 E. ~1 p. :077 TSl'MSt<, 77 SR=>M~t<, ,l~L'il .J0'10 30 .~0 :iei J0 ll '3 ,] 0 i10J0 J0J0 J.i:55 Zl0~10 7444 "'° 70 7764 J0<J0 2'iii71 3£1J0 oc72 337 3 '1000 3077 2'.J74 7740 01.:J!Zl t075 3'd76 <JJ 77 3U0 3Hl a1212 13240 75'10 7510 00~0 ilH3 iHhl0 iHHl0 31(}4 tJH5 7634 20£10 312'~ 2ll ~~a l <'< '11 CPl[), CJr<TST1 .., RT"• N0 , i1 '\iXTST, Sec TR MSCTR! M!LCTR1 MIL11 KPl:i 1 KPtlS T£1'1Q 1 TEMR, FLAG, K71 1 M4 <l 1 c11c:.1 !Zl ~ C240, SKIPMA1 SKlPPA, Cif1A, CTf1B• ;~ I SCNT, Kl001 K21c.i01tl, 1·1 ci ~ PAGE " /wORK ILOCATIOl\JS /SR 6-1~ lNARLE MASK /5Ro;i MA K IIDEt\TlFilS CPU /FOR CURRlNT TEST ADDRFSS /FOR CURRENT TEST NUM8ER /FOR NlXT TlST ALlORESS ISEcONOS cou~1TER /MlLL!SECUNUS COUNTER L.' 0 -s34 -14 0 0 0 71 ""40 1111'1 /FOR 1 MSlC CONSTANT /POPS 1 MSFC CONSTANT IPDP8S 1 MSEC CONSTANT lcONSTAt'llTS /FOR /TYPE /CHARACTER !STRING /SUHRQLITINE ~40 SMA SPA 0 0 0 /COUNTER A, /COUNTER H, .. 144 2~~10 I <')453 <l110 3111 0531 iJ112 25212 iHl3 13520 2114 <"0i'0 ll465 06.'l0 7401 3115 n16 n17 vi /1 J l<H.l l1.:Jo6 3;)67 Tt,_:'1pl, 18: l. 6 s y f\l.C • 5-Yl\J~ INPATT I GETPT, CHt.CK 1 CRC.:NT, OLYCNT1 Pf"LAG I UPUNCH1 UM0V£, MR1jQUT1 I 'l I TPT G£TPTT CrlCK CHRCMT DL.CNT 0 PUNCH MOVE .. ,5 77 /ENTRY TO SYNC TAPE RTN, /ENTRY TO INITIATE PATTERN /ENTRY TO GET PATTERN CHAR, ~ ~Ai.121 V133 21-F!:.i:l-69 <:Jl 77 * 177 /C~NTROI. 2ll77 ll2(10 ll2"1 a22'2 J2213 212 214 £'12 ll 5 02ll6 2!2"7 2l210 "211 "'212 21213 <l214 i21215 21216 0217 ll220 21221 0222 21223 0224 2'225 21226 J.1P 177 A•\10 PRGMSK PRGr\IUM '1\,;A TA l1 PRGi\IUM TAJ PSW OCA 1452 3231 TAL) I Tt::MP OCA PRGALlR Ci.A CLL CMA RAR Sr>A CLA lur J.'IP 5222 1066 74Hl rt.MP I +3 TAlJ KP8 S!\P TAD KPBS DCA Mill 1067 3065 4516 0005 0001 JMS I UMOVI:. 5 1 ·2 JMP I 7776 5631 0000 7602 PRGADR1 2l SRSET, HLT Cl.A 7200 GETfWY 1 CLA 0247 2125121 3251 21252 <.l2 5 3 3254 J255 21256 102121 312161 4276 7604 7004 7500 5457 I 00:.4 7041 1060 7650 5457 112161 7001 764121 INC~HN1 IINITIAl.ltE /INTERRUPT, /AREA, +1 TAD KSTART DCA lliXTST JMS FORwO LAS RAL /SET ADDRESS or lST lsroRE Ar NxTST SMA /ROUTINE SELECT? /NO, START WITH 1ST RTN /YES JMP I CURTST LAS A.\iO TSTMSK Cl A TAD RTNNO S'iA Cl..A J'1P I CURTST TA:J i\JXTST !AC SO CLA J'IP GETRLlY+.S 7604 52.56 74212 5233 \i~~~ER LAS 30~2 735121 7710 P~OGRA'1 LAS AvJ PRGMSK T'<') PRGL!M S'1A <;CA 2'23121 2'231 2'232 ll246 - ~];, /!~CORRECT 1-il,.T START I PAGE 4 ~ 0 UTINI:. 2'227 2'233 il234 il235 21236 3237 0240 ll241 ll242 0243 <'1244 21245 0 74£12 7604 012133 10.54 7540 5117 76£14 ;;J lil .5 .3 30.55 1035 1036 1d 116 Hi.T ROUTI~E /READ SR /JS IT THIS RTN? /YES, GO DO IT INO /IS THIS LAST TR~? IND /YES, INCORRECT R00Tl\E NO, J'1° GETROY 0 ~ . ,.., -'A..,12! y133 21 •Vl:.t:l•69 J257 4313 76!04 7006 7630 5233 1061 701tl1 7640 5236 76'14 7006 7710 5233 741tl2 5257 00el0 73!00 1461 3060 2061 1061 CHA!~N, ;1260 "2H <'262 21263 '1264 2J 2 !i5 2J266 iJ2~7 21270 il271 3272 iJ2 73 3274 21275 n16 21277 2132!0 iJJ{)1 2J32'2 21333 .11334 332'5 iJJ216 2l32!7 21310 21311 21312 30!)2 2061 1061 3057 14!'>2 3061 5676 J~S 18116 SHALT LA" PAGE ~ ~ /HALT? (SH~) IR£Af) SR !<TL stL cL A J"1P Gl::.. TRJY TAJ l\/XTST !AC SO CL.A JMP GETRLlY+.5 LAC: RTL SPA CLA JMP Gl::.. TRJY PRl>END1 '1L T JMP CHAl\JN FOKWIJ, 0 Ci.A CLL TAD l NXTST OCA RTNNO JSt NXTST TAIJ ~XTST DCA TEMP tSi1 NXTST TAO l\iXTST DCA CURfST TAD I TEMP OCA NXTST JMP J F"QRWL) ISELEcT ROUTINE? CSRll /yEs /LAST ROUTINE? /NO, /LOOP PROGRAM? (SR2l /YES /ENO OF PROGRAM HALT /GET NEXT RTN NO /STORE AT RTNNO /SET CURRENT /RTN NUMRER /SET CURRENT IRTN ADDR, /SET NEXT /RTN ADOR, /EX IT ~ V133 21-F"l:.8-09 .,,313 210<Hl SHALT, ~314 76J4 7H0 5713 U60 74Z2 5713 ~A;,,12! 21315 <J316 ;:1317 21320 21321 0 ..~;;,.,_~.:- 21322 '1323 21324 21325 21326 21327 21330 21331 21332 21333 21334 21335 21336 21~37 21 40 21341 21342 73icHl 1733 3062 4345 6030 2062 5337 i343 344 0345 0346 21347 21350 213'1 21352 21353 21354 21355 21356 0357 2333 5733 0000 73i'l0 1023 3063 1065 3064 2064 5353 2063 5351 5745 002'0 72210 1722 3052 2322 1722 3452 2322 5722 Cl0i00 18116 i1 LAS S'IA CLA J-'1fl I SHAI. T rAfl RTNNO HL.T J"lP I SHALT STcTR , Dl.YMSr /REArJ SR lloiALT? CSR0l /UNCONDITIONAL HALT /EXJT,SJ .. 10L <S~0 : l> iJ YL. A AD l STCTR DCA EMP 1 s~ hcrR TAD 1 STCTR DCA I TEMP IS~ STCTR JMP 1 STCTR DLYSC, PAGE 6 /GET CTR ADDR /ANO sAvE Ar rEMP /GET COUNT ANO /STORE PER CCTEMP) /EXIT "' Cl.L Cl.A TALl 1 01.vsc OCA SCCT~ JMS DI.VMS .. 175~ ISl SCCTR Jl1P , .. 3 /GET SECONDS COUNT /STORE AT SCCTR /GO DELAY 11 SECOND <1000 HSEC>, /DONE DELAYING? !Sil 01.vsc /YES JMP I 01.YSC /EX IT 0 CL.A CLL TAD DELAYM OCA HSCTR TAD HIL.1 DCA MJLcTR ISi! -Mll.CTR JMP 1 •1 IS~ MSCTR JMP 1 •5 JMP I OL.YMS /GET MS COUNT /STORE IN MSCTR /GET 1 MS CONSTANT /STORE IN MILcTR /DELAYED 1 MSEC? /DONE DELAYING? /EXIT 0 ~ (') .:1·,.;i.·1•21 f133 1 214''10 ?1•-1' t: B>--6 Q• lcf.: 1.-!i *', 1t7+l ~' P~E. ·, /ilANlJQM \JJ' tiErl \it."it.t-IATOK SU8RQUT!NE £)4'2l0 J4'2!1 J4'~i2 i!4'213'. '1¢21.if 214215 2142!6 214217 21410 21411 0412 tl413 21414 £'!415 Ht6 21'417 (}420 21'4it 21422 ~423 3424 21425 3426 ~427 a43S 21431 21432 21433 21434 21435 21436 21437 ('1440 21441 21442 21443 .l0k10 72JO 1242 KA•~i.;t:. tlj I CLA r .. ,.. RANT'iu TA·l RA!\!ut.X StA CLA J"IP RANTAL) TA.l RANT::lL DCA RANDl:.X TAil flANC:JN CL.L hAL 1ti2 7 7'6"40 5215 1231 3227 1230 71~4 7430 70k11 3230 1230 1627 3627 1243 7010 1627 Sil RANTAD1 22'l1 3243 1243 ss0e i144l 6543 RA 1'IOEX1 RANCONe 3432 6543 3210 0765 5432 2107 76?4 4321 1076 7336 RANT~L1 :ll000 .1 !AC DCA RANCO~ TAil RANCON Ul1 [ RA"IOlX DCA I RA'iDt.x TAD RANSAI/ RAR TAil I RA'i0£X rs.i RANOEX DCA RANSAI/ TAD RANSAV JMP I RA'iGEN RANTND 6543 ,+1 6~4J 321w:l li'll 65 5432 2lll7 7b':l4 4321 1i076 RANTND1 RANS AV 1 •1 0 ~ • _ "A..,121 V133 /SUBROUT!~l 214 44 21445 3446 l)447 <:l4;0 2451 0452 JIJ0i1 INITPT, 0377 PTl, PTMSK 1 J~()0 GEIPTT1 0 72(}0 1250 3251 1251 ------ /EXIT 21 377 TO PROVIDE NlXT BINARY COUNT PATTE~N CHARACTER IIN AC) C(.. A TAO PHJ DCA PT1 TAD PT! !AC A:~D PTMSK JCA p I Vl TAD PT1 JMP I GETPTT 7~211 J252 325k:l 1251 5653 210210 2114 6046 72210 1114 7640 7410 5277 6041 5271 6042 3114 5665 PuNCH, 2152'2 00e0 4432 3317 7450 53213 7041 31(}3 1n2 3052 11 '13 3452 23c2 57<l2 CH~CNT1 3077 C~MSK, /GET PT0 /STORE AT PT1 /GET PT! /INcREMENT ACCUMULATOR /LIMIT TO 8 BITS lsTORE Ar PT0 /GET PT! /EX IT ONE CHARACTER SUBRoUTINE (CHAR IN AC) I ro !Sr PFLAG TLS Cl.A TAD PFLAG StA CLA Sl'\P /SET PFLAG /PUNCH PRINT /FLAG RESET? /NO JMP ,•3 /YES, TSF' /DONE PR I NTl NG /NO, /YES, RESET PUNCH/PRINTER FLAG /RESET PF LAG, /EX IT, JMP , .. 5 rev DGA PfLAG JMP l PU"JCH /SUBROUT!~E <:~~:::;:-..1f;~~ = () e /pU~CH/pRl~T 0 /SET PT0 JMP I IN!TPT PTJ, 2!465 21466 ill467 21470 21471 21472 21473 3474 21475 2!476 21477 2152'0 215:H 215ll3 215214 215215 215216 215i'7 21510 21511 21 1'12 3513 .:l514 21515 3516 21517 TO IN!TlALliE BINARY COUNT PATTERN 0CA PT0 /SUBROUT!~i "1453 21454 21455 21456 21457 21460 21461 21452 21463 21464 PAGE 8 ~ CLA 72Zel 3250 5644 Zi3J0 J0210 ldll6 21·HB .. 69 TO GENERATE RANDOM CHARACTER COUNT, (NOT MORE THAN 77<8)) 0 JMS I RANDNO AND CRMSK /GO GENERATE RANDOM NUMBER /REMnvE HIGH ORDER 6 BITS S~A JMP CHRCNT+1 Cl A DCA SCNT TAO l CHRCNT DCA TEMP TAD SCNT OCA I TEMP !St CHRC"iT jMP l CHRCNT 77 l2•s COMPLEMENT IT /STORE AT SPECIFIED ADnRESS /SET UP EXIT /EX IT 0 c-, ___:_"::~-~ ~ ~ ~ 'A-121 Vl.53 18: 16 21-nd-09 /SutlKOJT ! ,, G~i\Jl~ATE TL) PAGE·-.,_ RANDOM DlLAY C0U\T ('. 0 T .... 0 RE TH A,,, I 21'.:>20 2J':l?1 21':122 21':Ii?3 J':)74 2l525 21526 Ll527 ;'':)30 0':13~ 7153 ill533 21534 21735 0?36 0'::>37 0540 21541 0542 0543 05441 3545 i10 ,:10 L)L (.;;'14 l , 4432 21330 J JMP 5321 c !>\ 704 '::>720 0~H'l0 iJLC~T+ 1 ncA flt.LAYM ,) \1 j..1 I DLCN T 3023 0000 3345 1731 7041 1345 2331 7640 5343 2331 5731 1345 5731 •JL n1SK s '\ ~ 7 4 :>0 0277 s l RA \JLJ\J() A\_- DLYMSK1 IG 0 GE. l\J ER ATE RA"< I~ 0 ,. \ u' aE..( /MASK OUT U\JGlS!RE.r ~ITS, /t:[RO? /YES, GET ANQTM[R ~J"BlR /2'S cnMPLFMENT IT /EXIT 2 77 /SJ 8 Rul.!T I,,_ TU ci.JMPARE c<Ac' TO cONTENTS STi.H[;' AT CALL+l I CHGK, 21 /STORE AC AT wCHK OCA wCHK /GET COMPARE DATA TA'l I CHCK /2'5 COMPLEMENT IT Cl A /ADO c<wCHK) TALl wCHK /SET UP FOR UNEQUAL EXIT !St CHCK /EQUAL (AC : 0) StA CLA /NO J'IP I +3 /YEs, SET UP FOR EQUAL EXIT !St CHCK /EQUAL EXIT JMP I CriCK /RESTORE AC TAD WCHK jMP I criCK /UNEQUAL EXIT wCHK 1 J /SYNC O'J TAPE su~ROUT!NE -I ll546 :il547 2!550 ll551 2J552 21553 21554 21555 3556 0557 21?60 21561 0000 4426 13566 7400 6032 6031 5353 6034 1117 7640 7410 5746 iil562 ll563 21564 3565 2'566 2366 5352 7402 5347 00~j0 SYNK1 0 JMS l SET CTR crsK •4<'0 SYNKA 1 KCC KSF J<~P I '"1 K-<S /SET COUNT OF /•256 <DEC> IN ICTSK /CLEAR AC @ND FLAG /READV? INO, TEST AGAIN /YES, READ TAD MRBOUT St A CLA 1377? SKP J "IP I SY·'JK !Si' CTSK SYNKA ,J-IP H1,. T Cn:>K, J'1P SYNK+l -~ /YES, EXIT /BUMP CHAR CTR +1 /GO READ AGA!N /256 CHARS READ, CAN•T SYNC IGO TO SRST /CHAR COUNTER '777<8ll, . • ;iA._17' 21620 216211 J6212 216213 tl67i4 216215 2l6ll6 216217 21610 ll611 21612 2!613 21614 21615 21616 21617 21620 21621 21622 21623 £1624 21625 Vl.33 21-Ft..B-69 J6'10 *, 177*1 210.t0 M()V( 1 72<10 1660 3223 2260 1600 32.24 22210 16ll0 3225 22210 72ill0 1623 3624 2223 2224 2225 5213 5630 210<:'10 21000 210<:'10 ltl116 PAGE 10 /Svtll'!Oi.J TI \r TU MUVE VAR!A8LE i CLA TA1; I MOVE DCA FAOQR 1 ·st TAil f)CA !St TAJ '1QVEA I MOVE I MOVE TADDK MOVE 1 MOVE JCA MCTR l~t MUVt. CLA TA iJ I FAUDR DCA I TAD OR !Sf FADUR !Si' T40DR I St MCTR ,J,~ P MOv EA JMP Fi\Ul)R, TALlDR 1 MClR1 1 MOVE LE~GTH ~ATA /GET "FROM A1DR" ;STORE AT FA;1QR FIELD~ A~D 1GET "TO AOUR" A~D 1 sTDRE AT TA'10R, /GET "'10VE cnu~T" ISTQRE AT MCTR, /SET UP FOR EXIT, AN~ /GET ttFROM" ~ORD /STORE AT "TO" LOCATIO~ /+1 TO °FR0'1" ADDR 1+1 TQ "TO" aDOR /ALL WORDS MOVED} IND, GD MOVE AGAIN /YES, EXIT 21 0 21 • ~ --~~--<=---=~,,.;;~~-:-:- ~ ~--- - () ~ " ~ ~ ~ .:>AUil 10210 10211 hJil2 1""'3 l,t:l2'4 11£lil5 V1S3 21-rLB-C.9 10l'•l '" "12d:'I 1021 l!llif, PAGE :i.' 177+1 /Pl-\Jl;RAM \'.'M'"'lR s, Pui\JCHEs HST TAPt. w!Th ;> Cr;ARACH.RS Is p E. c I F I E ,) I \j s y '1 t:lO L l c L 0 c AT I 0"' s p TE Mp I A"J [) p T ~ Mp 1 • "'<G3 t CL :1 TA' PTfMP I t1PJNCH TA 'l p TE M ;.J 1 J'·" I lJPl.!NCH JW PRG5 J''" 451? 1022 4515 52 ~li(l !GET C ( PTE.MP l I PU NCH C C P Tl::. ~· P ) /GET C<PTEMP1l /PUNCH C<PTEMP1l IREPFAT, I /P>-<OGRA'1 10il6 10 il7 72.:1 0 H.JHl 1°11 1 ~\2 4510 H>13 l!f.114 1015 45;Q7 4515 5210 4506 3317 45(17 1020 6032 4513 4512 1021 1022 0101 4510 1023 1024 1025 3276 4430 4271 1kl16 1017 i~~~ §~~~ 1030 PRG41 ?217 1037 1040 1041 PR~6 1 4507 6032 45H1 3276 44.HJ 4271 5235 PLJ1>.;Cr1Es UPLINCH J~1S l J~!P ·-2 TEST TAP!:. WJTH ~!\/ARY COuNT PATTERN, /!N!TIALJ2E P!NARY COU~T PATTE.R\/ /GET BINARY COllNT CHARACTE.R, /PUNCH CHARACTER /REPEAT, I /PRQGRA~ 45J6 3317 4, /PKQGRAM '-HEADS COU~T PATTERN-RANDOM NU~8ERED GROU~S, I FiXt.U RA~DOM UELAY BETWEEN C~ARACTFRS IN A GPOUP, pRG5, J~s I sY~C /5Y~C TApl DCA EHRCTR /CLEAR ERROR COUNTER JMS I [NPATT /INIT!ALl~E PATTERN, KCC /START READER SR10A 1 J>IS l OLYCNT /GENERATE DELAY COUNT JMS I CRCNT /GO ~ENERATE AND STORE CTRA /RANDOM CHAR, COUNT SRTJtl 1 JMS I GETPT /GET PATTERN CHAR, OCA SBSP /STORE AT SBSP, J1S I DLYlMS /GO nELAY J>1S R~ADCK /GO READ AND CHECK CHAP, !Sf CTRA /GROUP DONE? J1P SHT0~ /NO, JMP SRT0A /yE5, START AGAIN I lk:l31 1032 Hl33 1034 1035 1036 WMt!t.R CL" Y"3 I !·\/PATT J'1S l GE. TPT SR11A 1 6•READS COUNT PATTERN-FIXED DELAY BETWEFN /SYNC TAPE /CLEAR ERROR COUNTER DCA ERRCTR J>ls I I ,,,.pATT /lNlT!ALltE pATTER~ KCC /START READER /GET PATTERN CHAR, JMS I G£TPT /STORE AT St)SP f"JCA StlSP J'-':S I DLYlMS !GO DELAY /GO READ AND CHECK CHAR, JMS Rt.ADCK JMP SRT1A /REPEAT JMS I SYNC CHARACTER~ ~A.12' Vl33 21-Ft.B-69 ldll!'> /P~OGRA~ I I I~ 1J42 1J43 1,14 4 1045 11<!46 h'47 105(; 1()51 H52 1053 1J54 1055 Hl36 1il57 72Jfl 3317 4320. 6032 4513 4512 J1.:: 1 4350 3276 PRG71 SR12A, I 1065 1066 1067 1070 6032 4350 3wHll2l 1075 4511 1076 2!030 1077 532'1 5311 2317 11211 SRTJA, 4430 4271 5264 6031 5272 1130 PRG10 1 3276 1071 1072 1tl73 1074 I READCK 1 UH 3317 76;/)4 112!5 ui6 112!7 1110 1111 1112 1113 1114 1115 1116 1117 SBSp, 0 -~i~;;:~~--- , .. 1 JMS Ql JMP I CHlCK JMP I ERRCNT IQFLOw, RESET TO 7777, SR I /HALT ON ERROR? Ht. T /YES, JMP l RE.ADCK ill I~,C, /INCREMENT ERROR COUNTER /READ 1'1 ERKCTR1 /ERROR, NO MATCH, GQ CLA CMA OCA ERRCTR LAS A'\10 SR5MSK S~A CLA HLT ~000 /READY? /rEsT AGAIN, /READ CLEAR AC ANO FLAG, /GO CHECK CHARACTER WORD, •3 74i:l2 5671 /START RE.ArlER tGE\JERATl DELAY cOU~T !GO GE~ERATE ANO STORE /RA\JDOM CHAR cnu~T /GET CHARACHR IST8RE AT SBSP IGO DELAY /GO READ ANO CHECK CHAR IGRQlJP DONE? /NO, /YES START AGAIN I ERRC'H JMP HL TTST ERRCNT1 IS2 ERRCTR 1317 5671 COU~TER f3 HLfTST1 LAS SM 4 CLA J P l RE. ADCK TAD ERRCTR 77~0 /CLEAR ERRnR I 1~ ~ SA~£ AS SRT2 1 BUT F!XED DELAY HETwEEN CHARS, uELAY lS SPECIFIED IN LDC - DELAYM, CLA DCA ERRCTR /CLEAR ERROR COUNTER, jMS ALIGN I KCC /START READER JMS GIVE /SET CHARACTER, OCA S8SP /STORE AT SBSP JMS I OLY1MS /GO DELAY JMS READCK /GO READ ANO CHECK CHAR, JMP SRT3A /REPEAT, KR fl ~fll55 7640 702 7604 J,•1S G!Vt: UCA S8SP JMo 1133 7240 5305 JMS I OL Yc\JT I CRCNT KSF 6036 1 21 2 J.'1 :: JMP SRT2tl .J~1P SRT2A /PROGRAM 72'10 3317 4320 CLA DCA ERRCTR .J~S ALfG\J i<CC JMS l OL Y1"1S J,_,5 Rt:AOCI\ !St! CTRA 443~ 4271 2101 5251 5246 I 1060 1061 1062 1063 1064 ~EAOS C~A~S ~RO~ TAPE A~O ~ATCHES A~AJ~ST ChARS TEMP AND TEvPl, RANDOM OllAY ~ETwEE' CHARS, - C TRA SRl28, PAGE 12 /READ SR /HALT? INO EXIT IGEf ERROR COUNT /HALT, ERROR cnu~T JN AC /EX IT, /ERROR COUNTER ,-..... ') c ( ~ ~ "A-17 V133 112C 11?1 1122 1123 1124 1125 1126 1127 1130 1131 1132 1133 1134 1135 1136 1137 1140 1141 1142 1143 1144 1145 1146 1147 1150 1151 1152 1153 1154 :'\0J0 21-F ttl-bl.J lbll6 PAGE lu I AL l ~\;I 72<l0 CLL 6051 53 l'2 6034 7041 3347 1347 1021 76'.50 5341 134 7 112122 KS' j v ~· ".,-; C1A 76':>0 5344 74.:l2 5321 7040 3346 5720 3346 All, Al2 1 5720 0000 IN Ll, 2l0i'.l0 2102'0 ATt.MP, GIVE, 11~2 5750 1HST AGAIN, /REA0 CHARACTER, IZ'S COMPLEME\IT ! T' ISTJ><E AT A TE."4 P, IT CHAR l/\J PTE.Mp? /YES, INO, /IS IT CHAR IN PTEMPl? /YE.S, /NO, ERROR, IRE.PEAT, /JS /5Ei 11\JD Tn •1 /SET !ND TO ?, '~ 0 J DCA J.\10 TAJ PTEMPt JMP I GIV H~~ ~~§~ 7040 3346 nc:i. ATEMP T A,J ATE MP r.>:• PTEMP <; ~i\ Cl A .l'1P All TA~1 ATE.MP TAJ PTEMP1 S\iA CLA JMP AL2 1-n. T JMP Al!GIJ+l CMA [1 CA I ill D JMP I AL l G•\I DCA !NO JMP I AL! GN CLA !St I ·~D JMP ,+4 72 ,10 2346 5357 3346 1157 1H0 1151 IREAlY? '-1 /IS IND :: •1? /NO, /YES, /GET CHAR FROM TEMPl /EXIT, C,'I A OCA IND TA'1 PTEMP J.'1P I G!V£ Hl2l I /SET !ND TO -1, /GET CHAR FROM T[MP, /EX IT, ~ --=-~=~..,__, .:>Ai..121 vl33 21-F"t.8•69 12~lk) *• 1271121 12111 12212 12213 12214 4426 ~rn 20 121'.l5 56214 :0232 12215 12216 00.:10 1225 12ll7 1210 1211 1212 1213 1214 1215 4426 J1"1 6030 7240 6032 7440 5221 2101 18116 PAGE 14 117+1 /P"Ot,HA'1 i I A::)R J3/.55 TELETYPE ~ASIC I~PLT TlSTS, /P!'?OG'(A'1 CHECKS INPUT !OT•S, INTERRUPT, A~~ READER ISlT KSTART TQ l~JTIAL PHGC, J'1S l SlTCTH IROtJT!NE A(li..lPESS, .; ::i T A>i T T!Ml~G PiOTS,~ J"P I • + 1 S.-<SE. T /GO START HST I 1216 1217 122121 1221 1222 1223 1224 1225 1226 724121 6032 5222 0001 1246 4426 0023 747121 1227 123121 1231 1232 1233 1234 1235 1236 1237 1240 1241 1242 1243 1244 5235 5424 7402 1245 5232 ~ -~··?~$._~. 5212 5424 7402 4426 0101 7634 612132 4430 6031 5244 P0TS;', :~ PiTSl /ISSUE -:cc w!TH AC=7777, AC SHOULf1 GO TC<, /AC ~QT ~ INDICATES KCC FAILURE, TEST rs OQ~E 1~00 TIMES. J'1S I SETCTR /SET COUNT OF CTRA 1~10~0 COECl IN -1750 /CTRA CLA CMA /SET AC TO 7777 KCC /CLEAR AC AND FLAG StA /JS AC = ~? J'1P P0E0 INO ERROP GO TO P0F~ !St CTRA /DONE? J'1P 1 w5 /NO, REPEAT J'1P I CrlAlN /CHAIN H~T /TST0 ERR HALT, KCC DID P0t.01 /NOT RESULT !N AC = 0 /SET A TO 7777 Cl.A CMA /CLEAR AC AND FLAG KCC ji"\p I "2 /RpEAT P0TS1, 1 PlTS2 /ISSUE KCC, WAIT 2~0 MSEC FQR FLAG TO SET, /SKIP o~ FLAG, FAILURE To SKIP INDICATES /THAT FLAG IS NOT SET, OR KSF FAILURE, /TlST IS wONE 1~~ TIMES, J"'S I SETCTR /SET DELAYM DELAYM /TO •2~0 w31~ P0lS1A1 J~S I SETCTR CfRA ~144 P0TS1B1 KCC J~S l DLYlMS KSF JMP PdEl rs~ CTRA J~P P0TS1B 2101 J~P P0l1, l CH4!~ ~~T J~P P0TS1A /GO SET COUNT OF 1~100 CDECl IN /CTRA /CLEAR AC ANO FLAG /GO DELAY /SKIP ON FLAG = 1 /ERROR, GO TO El /ALL DONE? IN0 1 REPEAT /CHAIN /TST1 ERROR ~ALT, FLAG IS NOT /SET, OR KSF FAILED /RESTARTING TEST, rJ 0 ~ >A~l~ l.2'o 1247 ·r t:.d-6.,_ VljJ 21 ;•0.,2 1275 Pi IS~, io:1ri /J~Sul KC~, J~ ~All ~LAG ~~0 l~l.:J MSl:.C FQ~ FLAG Tn RE Sl:.T, rIMES To vEQ!Fy crNSI"r~~T I Sl:.TCTR 4426 J'1') JJ23 7410 1 h3 4426 .11<'.ll iJt..LAYM - j HJ Jh<; 1 Sl:.TCTR CHA 12~il 11:"!51 1262 12!-3 1264 1265 1266 1267 6 0 -~kl -17:"' P~IS2A1 44Si:l 60.51 5267 60.51 5271 KCC DLYlMS JMS KsF JMP P"'E211 KS> jMf.' P,OE2tl !Si! CTRA 21·'1 5262 5424 J.'W 1 74.:J2 P0t.2A I JMP l HL T 1270 1271 5256 74212 P01:.2t:l, HL.T 1272 60.Sl ua ~~~~ ~ 2 1231.l 12?1 1252 6032 r P~T~3 /S~I~ I 12';4 1255 1256 1257 PAGI:. -3 CHAIN JM!,' pt0T52A KSF JMP JMP ··1 , .. 2 SK!PPl~G. ISfT LJELAYM /TO • 2illlll IGO SET CUUNT OF l~~J 1 c n1:.c > I 'II /(';TRA Ir.LEAR AC !GO DELAY AN~ FLAG /5Klp oN FLAG = 1 /DID NOT SKIP, GO TO E?A /SKIP ON fLAG = 1 IUIO NOT SKIP, GO TO E2B I ALL DONE? /NO I REPEAT /CHAIN /TST2 ERROR HALT, FLAG /NOT SET OR KSF FAILURE", ITST2 ERR HALT Bo IKSF' FAILURE /SKIP ON FLAG = 1 /REPEAT /REPEAT .:>A .. 121 1275 1276 V133 21 ·HB-69 00<.'13 1327 pi()IS.5, 18:16 pAGE 16 -~ P.:lTS4 I /ISSUE KCC, ~AIT 2~J MSECS FUR FLAG TO SET, /Vl:.RIFY THAT FLAG IS SET, RESET FLAG (KCCl AND /SKIP ON ~LAG 50~ T!~ES To VERIFY THAT NO /SKIP OCCuRS w!TH FLAG = 0, I 1277 4426 1320 .'1023 7470 13<'1 132'2 13t:'l3 13214 13l'5 13(16 13 2'7 1310 1311 1312 JMS I SETCTri DELAYM ...H0 4426 3101 7014 6032 4430 6031 5320 6032 6031 1317 1320 1321 1322 1323 1324 1325 1326 ~ ~.u-.-:~.e.~~- --- 2101 5312 5424 7402 JMS I SUCTri CTRA /SET COUNT OF -.764 ICTRA /CLEAR FLAG IGO DELAY P0TS3A1 KCC JMS I DI. YlMS KSF JMP P0E3A KCC KSF JMP •"'2 JMP PidE3t:S IS2 CTRA JMP t .. 4 JMP I CHAIN i~t~ §H~ 1315 1316 /SET OELATM /TO -200, P01:.3A I Hl.T JMP Pi<:lTS3A /-500 CDECJ IN /READY? /NO, ERROR /YES, RESET FLAG /READY? /NO I OK /YES, ERROR /ALL DONE TESTING? IN0 1 REPEAT /YES, CHAIN /TST3 ERR HALT At FLAG /NOT SET OR KSF FAILURE /TRY AGAIN /TST3 ERR HALT B, FLAG /FAILED TO RESET1 OR KSF /SKIPPED ERRONEOUSLY, 5305 7402 P01:.3t:S, 6032 6031 5323 5323 /TURN oFF READER BHoRE ENTERING /S\;QPE LOOP, /CLEAR FLAG AND AC KCC /SKIP ON FLAG : 1 KSF JMP 1 ,.2 /REPEAT /REPEAT JMP ... 3 HL,T . () c ~ :iA:,.lll l.527 l ..S 3 kl V1..S3 21-~t.tl-64 00;14 P0rs<+, 14 ~JC /THIS u:2 1363 1364 1365 4426 4 ~Oul !N[ 2 p,_,1;_4A P0 TS4A1 /CLEAR PUNCH/PR(~TFR !-""LAG /CL[AR READER FLAG AFTER /JT COMES UP TC• KCC K SF ,J,1P I -1 /CLEAR REAOEh FLAG /ENABLE INTERRUPT KC~: I iJ \ 1\H)P P0t.4A, 4426 2!101 6030 4426 12101112 iur J."\P 1 +3 HLT JMP P0TS4A JMS I SETCTR CTRA .. 1750 J.'1S I Sl TCTR 2 P1tlTS481 10\J 701110 7402 P01'-41:3, NOP Hl. T KCC l(SF JMP I -1 4426 JMS I SETCTR 3002 13Hl 2 1.571 1372 1373 5360 5424 /UNEXPECTEO INTERRUPT /TRY AGAIN /SET CTRA TO /-1J!Ml1 /SET INTERRUPT /TO Pl{)TS4C, /READER FLAG FAILED TO INTERRUPT, /OR INTERRUPT SYSTEM ~ALFUNCTION /SET INTERRUPT RETUR~ /TD P0TS4C-1, I O·\i NOP JMP 1 ,.2 I 21r_i1 ~ETURN /WAIT FOR R£AOER FLAG /TD SET /ENABLE INTERRUPT Pl()TS4C-l /Sl:OPE l.OOP 602i1 7000 5366 /TURN OF!-"" INTERRUPT P-.ITS4C 1371 6032 6031 5356 6001 1366 1367 1370 CA~ CAU::iE AN ll\JTE.,RUPT, TH [ RE A0 ER r LAG I s c Ap A1:3 l E 0 r I ~TE p ,.( l 'p T I 'JG • /SET !'Hf RRUPT RETl 1l'..l\o /TO P0E4A 1 CHt.CKS THAT NO OTHEK uEV!C!:. T '1 £ ,, (_, rl E c Ks THAT yt.; I SI:. TCTK 30~2 1345 6042 60.52 6031 5336 6032 6001 7000 6002 5347 74e2 5334 ~ ~ PAGE '.1. P.,·TS') I A"D 1331 1332 1.533 1334 1335 1336 1337 1340 1341 1342 1343 1344 1345 1346 1347 1350 1351 1352 1353 1B4 1355 1356 1357 1360 16: lb P 0 TS4C, !S>1 CTRA Jo"IP P1.HS48 J 'i p I Crf A I N /DONE? /ND,REPEAT .>A.1J 1/133 21-~ Et::l-69 14?0 *. 1n.1 c:, 14?1 14 .,~ ..JcJ:> 1424 14Z2 47!3 4426 <10z3 14Z:5 14ll6 14 (17 1410 1411 1412 1413 1414 1415 1416 1417 4426 J1J1 7634 6032 443{) 6031 5217 2101 5213 5424 7402 1420 1421 1422 1423 6032 6031 5221 5220 18:16 PAGE 18 P0TS5, P0lS6 /RtAOER Tl~ING TtST, CHEC~S THAT READER FLAG IS =1 !I.JO /LATl:..R THA~ 110 ~ILL!SECO~OS AFTE~ KCC JNSTRUCT!O"i ( s ISSUFIJ, I l 4~4 ~ 7o22 JMS I SE.TCTR 01:..LAYM -156 J1'1S I St:. TCTR CfRA .. 144 P0TS:>A, KCC JMS I DL Yl"IS KSF JMP PiaES I St CTRA JMP P<:lTS:>A JMP I CHAl~ P0t5, HLT KCC KSF JMP , .. 1 JMP ,•3 !SET OELAYM /T0- 11 ? !SET COU\JT OF /-1J<' <DEC> ! N ICTRA /ST ART READER I CLEAR PC FLAG IGO DELAY 110 MILLISECS /TST5 ERR HALT, FLAG NOT=l /11J MSECS AFTER KCC INSTRUCTION, /START READER, CLEAR FLAG, AC, /Fl 4 G:1? /NO, TEST AGAIN /yEs, REPEAT, () 0 ( rl ~ ~ •, id:P PAGE 19 11' V153 21-Fl:.H-60 l424 1425 ll0L'0 .:>J Tso I 7 777 /Rt:.AtJ ~~~ '[FfE~lNT CHARACTERS, FACH CHARACTER JS READ 10J~ Tl~ES /T0 Vl~IFY CONS!STl~CY OF READIN~ FROM TTJ, 1426 1427 1430 1,431 1432 l,433 4426 ~A_ 7 I I/ I .'.lllll 7400 6032 60,H 1436 1437 5232 6034 3266 4426 2l102 1440 6030 1441 72"'0 6034 1434 1435 1442 1443 1444 1445 1446 1447 1450 5256 1451 21rt2 5241 211.31 5231 1452 1453 1454 1455 1456 1457 5424 1267 741il2 J"IS 1 5t:. rem c' -4 '"'" 'iil "0rs6A, KCC KSF J~P ,-1 K-'I<; P0TS6B 1 OCA wTS6A JMS I St TCTR CT><tl -17"J0 CLA P0t:.6A, DC A wTS6d TA\1 WTS6d CIA TA'l wTS6 A StA CLA JMP Pi6[6A !Sc CTRtl JMP PidTSol:I IS~ CTRA ,JMP PitlTS6A JMP I CHAIN TAO WTS6d 3267 1267 7041 1266 7640 /:> 1462 7402 1463 1464 1465 1466 1467 72fll0 6034 5263 :;,0()0 0000 1266 Pi3t:.61:1, I I IN HLT /TST6 ERR HALT A, AC DISPLAYS /INCORRECTLY READ CHAR, DEPRESS /KEY CONTINUE CL.A TAtJ WTS6A HL.T Cl.A KRS JMP WfS6A, WTS6t:l, / .. HH'10 <OEC l IR£AD CHARACTER, /SAVE AT WTS6B /GET IT HACK I /2'S COMPLEMENT IT /ADO EXPEcTEo CHAR /RESULT 0? I /NO, ERROR, GO TO E6A, /READ CHAR 1000 TIMES? l~O, GO READ IT AGAI~, /YES, READ 256 Dlff, Cl-lARS? /NO, /YES, CHAIN I 72id0 /CT!~B I(~-- I 1460 1461 ISE.T COUNT OF /-256(lJECl /IN CTqA /CLEAR AC, FLAG, START RDR' IRE.AD ? /NO, tEST AGAIN, /READ CHARACTER, /SAVE AT WTS6A, /SET COUNT OF 0 0 , .. z /TST6 ERR HALT 81 AC DISPLAYS /WHAT THE CORRECT CHAR SHOULD /SE, /READ CHARACTER IL :iA.,.1l V133 16.lkJ 16210 4426 1~~2 ~1020 162:3 16Z4 16'15 56l4 21-n.s-69 * I 18l10 PAGE 20 17/+1 1 1 ASRJ3/.S5 TELE.TYPE BASIC OUTPllT TfSTS, /PRQGRA'1 CHECKS OUTPUT IOT1S 1 INTERRUPT, AND TIMING, PRli11 JMS I SETCTR /SET KSTAHT TO INITIAL KSTMH /ROtJTINE ADUPESS, PlTSe' J~P I ,+1 /GO START TEST /P~OGRAM J232 S~SET I 16215 16216 162'7 16Hl 1611 1612 1613 1614 J0<l0 PlfS~. 1635 PlTSl /11 TLS A·~o WA IT 2;d0 MS1:. s i:-OR FLAG TO Sf. r I SK l p ON i:-LAG=l ( TSF l, /TSF SHOULD SKIP, OR ERR8R HALT PlE0A OCCURS, FLAG NOT SFT, OR T~F FAILURE, 12 1 WITH F'LAG=l• SKIP ON FLAG 1000 TIMES TO TEST FOR CONSISTENT SKIPPING, /FAILURE TO SKIP CAUSE.S ERROR HALT P1E08 1 JMS I SETCTR /-~00 TO DELAYM Dl:.LAYM 4426 21023 7470 4426 .. 31 rd CT~A 1615 a1 il1 60.S0 7200 1616 1617 6046 4430 1620 6041 i~~2 ~i~i 1623 1624 1625 1626 1627 1630 1631 1632 1633 1634 0 ".di:---~.~ ·- V1 5231 2101 5222 5424 7602 5215 76"'2 6041 5232 5232 JMS I 51:.TCTR •1750 Pl TS:!IA1 CLA Ti,.S DL.Y1MS JMS TSF JMP P rnA P1 TSk:lB, TSF" l JMP P1E013 rs~ CTRA JMP P1TS0B JMP I CHAIN Plt:.IZIA Hi,. T CL.A ' jMP P1TSk:'IA P1[0"' HL.T CLA TSF JMP I •1 JMP 1 •2 /-1000 TO CTRA /CLEAR AC /START PRINTER/PUNCH /DELAY 200 MSECS, /F'LAG=l? /lljO, ERROR /FLAG=l? /ERROR, F"AILED TO SKIP, /DONE? INO, REPEAT, /YES, CHAIN /ERR HALT A FLAG NQT:1 AFTER 1200 MS s,'oR TSr vAJLUR /ERR HAt~ 8 1 TSF' VAIL.ED SKIP /SCOPE LOOP, SK[PS ON /FLAG CONTtNUOUSLY1 r& ~ 0 ~~ Vi33 21-Ft.8•69 1635 1036 30(;1 1656 PllS1, 1637 1640 1641 1642 1043 1644 1645 1646 1047 1650 1651 4426 .21101 6030 6042 6041 7 41kl 52'1 2101 5243 5424 7602 1052 1653 1654 1655 6042 6041 5253 5253 PAGE 21 ~ 1 PlTS2 TCF TO /l~SUE /SKIP 18116 CLEA~ FLAG, SKIP ON FLAG 1000 TivES TO VERIFY THAT WITH FLAG=0 JMS I SETCTR /-1000 TO CTPA Cf RA ~ ~n occu~S ,.17';H~ /CLEAR FLAG T C1- Pl IS lA 1 TSI- SKP JMP PlEl l~t. CTRA JMP P1TS1A JMP I CHAIN P1t..11 HLT CLA TCF T~F JMP , .. 1 JMP , -2 /ERR HALT, AFTER CLEAR FLAG <TCFl, ITSF INSTRUCTION SKIPPFD, /SCOPELOOP, CLEARS FLAG, /AON THEN SKIPS ON FLAG /CONTINUOUSLY, I 1656 1657 f ~~~ 1660 1661 1662 1663 1664 1665 1666 1667 1670 1671 1672 1673 1674 1675 1676 4426 0101 7634 7200 6046 6041 5265 6042 6041 741121 5276 21ill1 5263 5424 7602 1677 1n0 6042 5277 P11S2, 2 P1TS3 /ISSUE TLS, WAIT FOR FLAG TO SET, CLEAR FLAG CTcFlo SKIP ON FLAG=1,NO SKIP /SHOULD OCCUR, IF SKIP OCCURS, TCF INSTRUCTION (CLEAR FLAG), FAILED, JMS I SETCTR /-10~ TO CTRA CTRA Pl TS2A I ... 144 CL.A Tl,,S rsr JMP 1 •1 TCF TSF Sl'(P J">!P PlE2 I St CTRA JMP PlTSZA JMP l CHAIN Ptt..21 HLT CLA TCF J~P 1"1 /ERR HALT, TCF FAILED TO RESET /FLAG, /SCOPE LOOP, CLEARS FLAG /CO~Tl~UOUSLY, :>A.17 V133 21-F!:.l:l-69 17 711 ,Hrn3 1746 p1TS3, 17212 172l 3 4426 17?4 J002 172l6 1717 6032 6046 6041 1ns 17C7 17Hl 1711 1712 1713 1714 1715 1716 1717 74kl2 1720 1721 1722 1723 1724 1725 1726 1727 5306 4426 01kl1 6030 4426 0002 1743 6046 6041 5330 6001 7000 7402 1730 1731 1732 17:53 1134 1735 '1736 1737 1740 i~:~ 1743 1744 1745 4426 00;:)2 1742 6001 7000 5340 2101 5332 5424 PAGE 22 3 P1TS4 /THIS MOUT!Nf CH~CKS T~AT NO OTHER OEV!CF CA~ CAUSE A~ JNTFMRUPT, /AND THEN CHECKS THAT THE PUNCH/PRINTER FLAG CA~ causE AN l~TERRUPT, J'1S l SETCTR /SET INTFHRUPT RFTURN TQ ? IP1£3A Pl[3A P1TSJA, KCC /CLEAR READER FLAG JF UP, TLS TS~ J~iP 5310 6042 6001 70£10 60<'.12 5321 1cl:1 f- 1 -1 Tcr I O'·J P1t.3A, NOP !OF J.'1P I +3 HLT JMP P1TS3A JMS l SETCTR CTRA .. 175e J•'1S I SETCTR 2 PlTS3C TLS TSF JMP , ""l P1rs:rn, IO'' Pl!:.31:.l 1 NOP HL T JMS 2 l S(TCTR PU1~CH/PR!NTFH /ENABLf I NTERRlJPTS, FLAG loISAsLE !NT£RRUPTS /UNEXPECTED INTERRUPT, /TRY AGAIN, ;-1000 TO CTRA I IS[T 1NTERRUPT R[TURN /To plTS3C /START PUNCH/PRINTER IF"LAG UP? /NO I TEST AGA l N /YES, ENABLE INTERRUPT /PRINTER FLAG FAILED TO INTERRUPT /QR INTERRUPT MALFUNCTION, /SET INTERRUPT RETURN ITO P1TS3C·1 P1TS3C .. 1 1 Ofl. NOP JMP /CLEAR , /SCOPE LOOP, .,z Pl TS3C 1 I St CTRA J'iP P1TS38 JMP l CHA!·'< /DONE? INO, REPEAT /YES, CHAIN -1 ~ ~-.~:.~_:;::-;-·- ('J 0 • ~ ;;,A1..l .' 1746 1747 175J 17,1 1752 17 33 1754 17 ;i; 1756 l. 7' 7 17S0 1761 1752 1763 1764 1755 1756 1757 17 HJ 1771 Vl33 ..:1-F Ltl-6'1 h).J4 77 77 Plrs4, 4426 il02.5 -1 ':lb J"'S I CT1H J l til 7634 443J 6041 5365 21a1 53?6 5424 6046 6041 5367 5366 S l TC f K /-1.P TQ CTRA -144 P11S4A, I S T ART P 11 '\J CH I P R l ,, T E R TL" j"1C, Plt.4, ~ . i 4 7177 ne.1.AHI 4426 7 6 iil2 ~ pAGE. '-. /PUNCH/PH!~TEH llM!~G TEST, CHEC~S THAT FLAG 15:1 NO LATER 1110 MILLISECO\jus AFTl~ TLS INSTHUCT!O~ J1S l S~TCIR /-110 TO JELAYM 7622 6~46 l tl: 1 ~ I llL y l 'IS /GO 0ELAy 11? MSECS, T ::,f· /FLAG=l? J .1P P lE 4 I S,Z CTRA J,,1p pl T54A /\JO I ERROR. /YES, 001\,E? j"iP ! CHA I \i HLT CLA Tt.~ rsi.JMP J'IP I., 1 ,~3 /\in• REpEAT 1 /yt5, CHAll\J /ERR HALT, FLAG ~QT 1 110 MSECS /AFTFR TLS l'JSTRl!CT!llN, /SCOPE LOOP, START PRI~TER IFL,G:1? /\10, CHECK AGAIN lyES REPEAT' TMA~ -~~~,=-, ;)A.1? 2J~0 Vl33 21-FE.8•69 2i:h'0 *• 177+1 4426 2~1 ;i l ~0 2k; 2 ~J 212 20..'5 2<ltl3 56t4 2~(14 J232 18l16 PAGE. 24 /PKQGRA~ 2. ASRJj/j~ TELETYPf REAJEq TEST, CHECKS Ad!L!TY nF REArEq /TJ CQRRFCfLY READ AT FULL SDEEO A~O WITH qANOO~ STALLS, DR~2• JMS I SETCTR /SET KSTART TO !~ITJAL KSTART /ROUT!~E ADDRESS, P2TSr /GO START TEST J>1P I ,+1 S"iSI:. T I 2Jil5 20il6 3000 2055 P 2 TS 0, /~EXT RT~ AODR. /RtAU 4,09, CHARACTl:.RS, AT FULL SP£Eu, MATCHING EACH CHARACTER /RtAu AGA!~ST COUNT PATTERN I 2i0n 2010 2iH1 2012 2k'.l13 20 4 2015 2016 2017 2020 2021 2022 2023 2024 2025 2026 2027 2k!30 4~.:16 4426 lll1 210-'1 603~ 45tl 45Hl 3223 6031 5217 6036 4511 0000 5230 2101 5215 5424 74~2 ,, P~TS1 JMS 1 snc JMS l SE.TCHI CT~A ~ 1777 KCC JMS I INPATT P2TS0A, JMS I GETPT OCA St:l0 K5F JMP i "1 KR>-! JMS l CHE.CK SBl:l, P2T08, P2t01 0 JMP P2Eill I S2 CTRA JMP P2TS~A JMP I CHAIN HI.. T IGO SYNC TAPE /SET COUNT OF /-4~95<DECl IN /CTRA /ST ART READER /GO !NlT!All~E PATTERN /GET PATTERN cHARAcTER /STORE AT St:l0 /READY? IND, TEST AGAIN /YES, READ CHARACTER IGO CHEC~ FOR CORRECT MATCH /CORRECT CHAR HERE GO TO P2Efi'i /ERROR, /QK, ALL DONE? IND, REPEAT /yEs, CHAIN AC CO!IJTA I NS /TST10 ERR HALT, /CHAR THAT oro NOT MATCH /AGAINST PATTERN, [PRESS /KEY CONT l NUE 2031 2032 2033 2034 <" ~,-;--._-:_"f~_~:;-=- 7200 1223 702 5225 CLA TAD St:ll2J HI., T J"IP P2T0tl /GET CORRECT CHARACTER /AC CONTAINS THE EXPECTED () C~ARACTER 0 r') -'A_ll' 2J35 ? ,; 3 6 VlS3 21-F t.d-t>CJ z" .31 ~21S1, 2<167 10:11) PAGE. ~ C- I 2 J 4 ii 2 ..: 41 2042 2J43 2.14 4 2£45 2J46 2" 4 7 2<150 2.;151 2052 2J53 2J54 2456 2t? J"'" I 4060 CT'<A -572J 60S2 KCC bl .Jl J,v, <.; 45~'7 451Z P2fS1A• J,vl <.; JHP ,-1 4511 j,15 2~62 74"'2 I I ,'JPA TT I c;t. TpT JMS l 0LY1'1S K Rri 2060 2061 Si::TClR KSF 6 ~ :~ 6 30'10 snc DCA Sd1 JMc; I DLYC'JT 3255 4513 4430 6031 5251 5262 2101 5245 5424 2057 J'1S I 45J6 4426 581, P2Tltl 1 P2ll1 • \ l PdT St' /Rt.AU <!.:ll< C'' A RACTI:. ~ S .J ! T H RANll 0 M 11 1:. LAY HE T 1' F: E~ Crl ARACTE. RS , /MATCH t.ACri CMARACrlR RlAD AGA!N~l Cf1U\JT PA TTE><N 2~37 ~ I CHECK 0 J"IP P2El !St CTRA JMp p2Ts1A Ji1P l Ct-!AlN Hl.. T 2~63 7230 2~64 2J65 1255 74J2 Ci,. A TAIJ Sl:H Hi.. T 21:166 52?7 J.'1P P2T1d /TO SYNC TAPE ISE T COU,\ T OF /-21.~?0 ( llEC) PJ /CTRA /START REAnlR IINJT!ALltF PATTERN /GET PATTERN cHARAcTER /STORE AT Stj1 /GENERATE RANDOM DELAY /DELAY /REAf'lY? /NO, TEST AGAIN /YES READ CHARACTER /GO tHECK FOR CORRECT MATCH /CORRECT CHAR HERE /ERROR, GO TO P2E1 /l')K I ALL DONE? ~~~s. CHAIN ITST1 ERR HALT, AC CQ\JTA INS /CHARACTER THAT O!D NQT MATCH /AGAINST PATTERN, IJEPRESS I KEY CONT I NUE /GET CORRECT CHARACTER /AC CONTAINS THE EXPECTED /CHARACTER --- - V1S3 21-Ft.tl-69 z.:,5 7 c0.:i2 P2rs2, 2iJ7J 7777 2ci71 2Kl72 45.16 4426 .:>A.,1:' 18:16 -- - - -~::::::~2' PAGE z6 2 7777 IRtAu W!Tri RANnOM STALL 8ET~[E~ RANunM cHARAcTER GROUPS /1<lliJ (,,RQ1JPS RlAJ, I J"1S I 5Y\IC ,pi<> I Sl TCTR /GO Sy\JC TAPE /SET COUilJT or 2073 ~lJl CTRA /-10~ 2J74 7634 6:032 45{7 4513 4512 ii102 -144 /CTRA /START READER /!NlT!AL!iE PATTERN /SET RANOOM DELAY /SET RANDOM CHARACTER /COUNT l N CTRl:l /GET PATTERN CHARACTfR /ANO STORt AT S82 IGO DELAY NO Of" IRE AO\'? /NO TEST AGAlf\J IR[AO CHARACTER /CHECK fOR CORRECT MATCH /AGAINST SB2 CONTENTS /ERROR, GO TO P2E2 /QK, ALL CHARS f"QR GROUP DONE? /NO /YES, ALL GROUPS DONE? /NO /YES, CHAIN /TST2 ERROR HALT, AC CONTAINS CHAR THAT /DID NOT MATCH AGAINST PATTERN, uEPRESS KEY IC:DNTINUE 2<:.175 Ztl76 2~77 212Ji.3 21~1 2U2 212!3 21"4 21<'5 45hl 3311 4430 6031 21i:16 53~5 2U7 2110 6036 4511 2111 2112 2!030 2113 2114 2115 2116 2117 2120 ~H~ 2123 2124 5320 212l2 53ll2 2131 5277 5424 7402 KCC Jl"iS I [;11PAfT P2TS2At JMS I OLYCNT J'IS I CRCNT CT Rd P2TS281 JMS l GETPT OCA SB2 JMS l DL YlMS KSF ,.JMP ,.1 KRB ' JMS l CHECK St32, P2r2c, P2t.2, 0 J"IP P2E2 l St CTRB JMP P2TS2B !St CTRA JMP P21'S2A JMP I CHAIN HLT Ci,.A TAD St:i2 Hl,.T JMP P2T2C 1 2 210 1311 74©2 5315 <DEC) !N /GET CORRECT CHARACTER /AC CONTAINS THE EXPTECTED CHARACTER I ,. c - --:-_.~q~--;-~~-=--- - () 0 f ~ ;:, A. l ~· vl..S3 22ce'i(; 18: lri 21-Ft.d-69 ~ ~ PAGE. .. ,- p,..,,f;_ /PRGll, AS~33Ty AUTu~ATlC READER OPT!O~ TEST, /Crl£CKS THAf ~EAJlR FLAG RESPO~DS TO KCC AFTER "RlAJl~ O~" cnM~A~D. /A~D THAT FLA~ JJE.S \JOT RESP0f\JO TO KCC AFTE~ HUEAJER OFF" COMMA\", /A llSl !S JONE ~ET~El~ 1 A~Q 7 CHARACTE.qS AFT~R EACH RE~JFR C0f\JTRnL /C\.JMMA''lu, TEST IS CQ>,,;T11111Jr)U5 RtlNf\Jlf\JG, FA!Ll'~ES ARE l'<D!CATF:) tiY HAL re;, I 222'C 2 2;" l 2U2 22J3 22:'4 2U5 22£'6 22?7 2210 2211 2212 3237 1236 P~l•ll 1 TA~) CRP I ·"I T Ail RURO \J J""" TTOUT J,~s I DL. YlMS J1~S 1233 4311 4430 2213 2214 2215 1101 KGC JMS HLT !St J"'lP TALl DCA CLA CTRd , -? CTRA CTR8 TAO RDROFF 5 2 i:l7 4311 J 1'1'5 TTOUT 6032 KCC 4430 J"1S 6i\..S2 KCC 443kJ 6031 7410 KSF 2242 2243 i21223 i21222 0224 i0J0 00n i21377 76521 7610 DL YlMS Sl\P 141,. T CU 7602 211:'2 5223 5203 ~221 ! DL YlMS JMS I IS! CTRti JMP , "'6 J>'1P PRGll+.S I 2233 2234 2235 2236 2237 2240 2241 I OL YlMS KS~ ~H~ ~2~i 2220 2221 22?2 2223 2224 2225 2226 2227 223i21 2231 2232 SPFLAG PGHJF F J"1S TT0UT 4311 4273 6032 4430 6031 76.:l2 21<'l2 :JCA RORQN, RDRQFF 1 PCHQN 1 PCHQFF, SP~LAG1 K0U07, K0.577, 1<7050' K701~1 221 22.3 ?.22 224 0 7 37l 7o50 761/d IC:LEAR SPFLAG, /TLIR"< OFF PU~ICH FE.fD IINIT!AL!tE DELAY (1 1\1 RF A n E R A~D CHAR C0U~T, I Tl' ~ ~' /WAIT AN ADDITIONAL 11? MSECS, /ISSUE READER START, /DELAY 110 MSECS, /FLAG UP? /NO, ERROR, FLAG SMOULD RE UP /DONE FOR N CHARACTER? /NO, REPEAT, /YES REI OAD CHAR COUNT 11 NTO CTRB, ITURf\J OFF' READER I /CLEAR READER F'LAG 1 /DELAY 110 MSECS /ISSUE READER START /WAIT 110 MSECS 1 /FLAG UP? /NO, OK, /YES, HALT, F'LAG SHOULD BE DOWN IDOl\IE N TIMES /NO, REPEAT /YES, START OVER, ' ' -;_~~--~- .:>Ai.1 'l Vl-53 Hi: 16 21-FEtl-69 /pMG121 AS~33TY AUTu~TIC PAGE 21' pU\JCH QPTlo\ TEST IC HECKS 0 PU-IA T I 0 -~ 0 F Al J TOM AT l C Pl' \JC H 8 Y i-' U~,CH I ' G rt l Id 0 UT S "' l TH ;PCHONr A~~ ALL ~ 1 5 CHARACTERS ~lTH PCHOr, THE TAPE RESuLTl\J~ /SHOULU HAVE ALL RUdOUTS, AS THE TAPf SHOULD NOT ADVANCE /WHE\J PJNCH!NG w!TH PCMOFF, THE READER JS USED rn CHECK THr /TAPE, ~EPEATEO FAILURE OF THE Pl•~CH Fr[D TO TllRN ON WILL /EVENTUALLY 8E !\JDICATEO av T!G"TtNING QF SLACK RETw~EN /REALlEM A«i1 PUNCH I I 2244 2245 2246 2247 2250 2251 2252 2253 2254 2255 2236 2257 226" 2261 2262 2263 2264 2265 2266 2267 2270 2271 2272 1242 3326 4273 1256 4311 1233 4311 4311 21r:l2 5253 1241 4311 11211 31"12 1235 3237 1235 4311 1241 4311 2102 5266 5246 PRG12, TAO K765.1 DCA TTOL.ITA CRP! IJ PCHOFF TTOUT RDRO"-l TTOUT TTOLJT CTRt:l ,-2 KllJ3 71 TTOUT CTRA CTRt:l PCHON SPFLAG PCH01\l TTOUT Kkl377 TTOUT CTRd JMS TALl J;iS TA\J J"'1<; JMS !Sil ,JMP TAi) JMS TAlJ OCA TAD DCA TAD JMS TAD JMS !St JMP , ... 3 JMP PRG1<:+~ /GET (S\JA CLA) CODE ANl1 /SET AT TTOUTA, /JN!T!ALltE DELAY AND rMAR COUNT, /TURN OFF PU"CH rEED /TUR~ ON REAnER, /pU~CH ALL ~·S CHAR, IOONE FOR N 0 CHARS? REPEAT, ' ' " (1 ' PU'IJCH A RUBOUT /YES. /RELOAD CHAR COUNT /INTO CTRd /SET SPFLAG /TURN ON PUNCH FEED, /PU!\JCH A RUBOUT /DONE FOR N RUBOUTS? INO, REPEAT, /YES, START OVER, I 2273 2274 2275 2276 2277 23<'10 232!1 232!2 23ll3 232!4 232!5 232!6 232!7 23H:l 30~0 4426 3023 7622 4432 £124"1 7450 5277 7041 3101 111:11 31n 3237 5673 /SUB TO !NITIALltE DELAY CAUSED AND S[T cHAR cOUNT CRP}N 1 0 /-110 TO OELAYM JMS I SE TCTR OELAYM ·156 JMS ! RANDNO A 1 ~Q S:\JA JMP CIA CJCA TAD DCA OCA /GET RANDOM NUMBER K001:J/ I .,3 CTRA CTRA CTRt:l SPFLAG J·'1P I CRP!N /STILL NON•0? /NO, /SET IN Cm A /AND CTRR /CLEAR SPFLAG /EXIT l ~ () 0 f ~ .JA.ll 2.511 2312 2313 2314 2315 2316 2317 2320 2321 2322 2323 2324 23?5 2.526 2327 2330 2331 2332 2333 2334 2335 2.536 2337 2340 2341 v 1.53 2!1<h'fZ 6046 6<"l41 5313 6J42 72Jtl 12.57 76:i0 5711 6032 6031 5323 6034 76'::>0 5711 1243 3326 6034 1117 7650 5711 6034 74~2 7230 5711 21-~ t:..tl-69 1~:10 ;SU8 10 0~TPLT I I~ Sf_ 1 , ~rA~ A /THAT l T I c, T ruu T, TL..c, T;:,V J •JP ~J PAGE , JATA J TELEPR l "H.K;PllNC:H. IF SPFLAG A CHA~ACT~R FR0M TAPE READER AND CHECK "IJ~OJT, • -1 TC~ CLA TAi1 SPFt.AG c;~A CLA J'IP I TIOUT KGC i<::, t JMP .-1 KKS nuur A, S ,, A Cl. A j.-iP I TT OUT TALJ K761" DCA TTOUTA KRS TAD MRBOUT c;:...A CL A J"1P I TTOUT KRS Hl. T CLA JMP 1 TT OUT /OUTPUT CHM:i, IOOi\JE? /'JO' wA IT /YES, CLEAR FLAG, 1.,u!\JCH o"<? INO, E~IT, /YES, TART READER, /FLAG UP? /"JO' wAIT /YES, READ CHAR /QR CSKP CLA) Ir.HAR IS 0, EXIT, /GET (SKP CLA) AND !SET AT TTOUTA, /REREAD CHAR, /TAO (•377 /wAS IT A RUROUT? /yEs, OK, /f\JO, ERROR, REREAD CHAR, /DISPLAY CHAR, /EXIT, r-, 1 ,. 0 c ~ ~ w ~ ~ Q ~ ~ ~ ~ 1 .I ! J _.., 18116 ;;iA.12! VU3 21-Fltl-69 l ."1" :24c l l '< l 1144 112C 1147 ,J075 .~ ,)7 6 '1 u V l A ::;,.141 \I 71024 H'"'t'OliT 0257 3551 21111 J5l2 2!056 '-1112 3517 2273 01211 r~SCTf< "'-c' • i... .l.L 2 4L. ! G\1 AT:: '1 ::> :; l 0 L\ :>u I -.r, :H:K ::H::C<. :i-1~C\IT ::: P ! Ll ::R:::c.ir :R "1S"i :::R :i ! \1 :::nA ::nd '1 C I " ·~ l L1 ~1JLCTR "-1 J \j t.. ~1xTST P,tt0 p <-t 1 P.'.JE 2A P<.t2tl PM 3A Pl/JF. 38 PM4A P.OF48 :::TSK ~102 2!566 ::u~TST 2!0?7 P~!F JE!.A VM 21023 p,::r 6H JL'.:N T JL'\'l '15 JLYl.SC ir.1520 0027 P.oTSt: P.:JTSi PJTS1A 2!113 P~TS1tj 0345 P<ilTS2 PillTS2A Pi<JTS3 P.:lTS3A PiOTS4 P.llTS4A PiOTS4t:l P0TS4C P0TS5 P0TS5A P.OTSI\ P0TS6A PitiS6t::l JUC\IT JLYMS JLYMSK ~1030 J1.. vs: 2!530 2l333 ER~CTR >AJiJ~ 1101 1117 2!623 i:K'(C'llT •o~wJ 21iil72 21276 :;t,: TPT 13110 •t..AG :;uPn 21453 '.;URJY i1233 :; I VE 1150 1111 21215 -11,. TT ST Iu l N::;RTN !NJ I ,\JI T=> T ! N:l!A iT 21255 1146 '(22J~q v444 £1107 2240 2241 2'liil4 3105 '{ 76lil 2243 065il <.77 2242 0073 '3 l1066 -<,PSS -<,Sn=<T ?067 002 k~ '<ii:lil.:17 '<03 77 "i121~ ~p pJ[5 6A P1[0A PlHJB PlEl PH2 Pl[,5A Plf.38 PH4 P1TS0 P1TS0A Pl TS~'ti P1TS1 P1TS1A PlTS2 PlTS?.A Pl TS,~ PAGE ,.. ~ ~'1TS3A 17•6 ~A'JT' l) "442 1752 RLlRl)FF RtlPQ'I ? 2 3 )~ Rl:.ADCK Hl 71 14Hl PlTS3t3 P1TS3C P1TS4 P1TS4A P2E.J P2r1 P2F2 P2 T.:l8 P2TlFl r2r2c P2TS•' P2TS<1A P2TS1 P2TS1A P2TS2 P2TS2A P2TS2H PC HOFF PC HON PFlAG PRG0 PRGl PRGlQI PRG11 PRG12 PRr,z PRG3 PRG4 PRG5 PRG6 PRG7 PRGAOR PR GENO 14~4 PRGL!M 14-51 1441 1627 16.51 16?1 1670 1717 1764 176? 16"15 1615 1622 1635 1643 16?6 1663 PRGMSK 1031 Hl42 0231 0274 0034 0033 PRGNlJM ~3035 1014 (b2:::0 t-i/!6'.) l064 l60'3 t:6U l117 <1063 6061 12"1 124 <; 1267 12/1 1.520 1322 1.54'.J 1362 1417 14'6 1462 12 <J::> 1225 12.32 1235 1246 1256 1275 1305 1327 1334 136!0 1371 14;!)0 17~1 174 3 1746 17'J6 20321 }.ii Al Sd "I '.) .1? 3 ?.0'5") s r:lj 20?') SNC:P ?111 1l'l7 6 2057 SCCTP SG'J T 22105 ·' 1r3 SlTCTR v'.b? 6 2.:115 SdALT SrlLT Sr< l PMA SK!PPA <;PF LAG ?115 ?0:)5 ?J4 5 2067 2vJ7 7 21"'2 ;?236 2235 0114 12 (Ji{) 1600 1060 2201!1 ?244 2 2!"" 0 1000 SH2 '1 451 :1 0? 1 ~427 RA~'Gf:N ;1!03 2 ;' 4 (1 ;zj 9ANSAV RANT AD t<ANTPL ;14 4 3 ;· 415 ,14 31 H)35 032'2 TEMP1 ,~ 2 QI" "' 1ei6 0546 f-'552 V\6?4 V\115 2 Ol0"53 TEMQ TEMR TSTMSK nnur TT OUT A 007"1 UMnVE UPllNCH 0116 WCl-IK ~JTS6" RA ND~l 0 1L'l22 SR'f3A WTS6A ><ANDEX ''031 1 v:l 1 7 START STCTP i1iiJ?2 [1465 ?237 1046 1051 1 il)f,4 0452 ;;430 n077 ,, 17' 0 ,,\ 2 3 2 SY~!C 0450 31 3 SRSET SR<:;T SRT0 A SRTiiJR SiHiA SRT2A SRT2R SYNK SYNKA TAODR TEMP vli2J 31 r> .,lv:l?5 ~~0'55 1~13 f~036 ·' 0 f, 2 SR"iMSK U!V\6 PRGTA8 PTEMP PTFF'.Dl PTMSK PUNCH RANCON r; T '>J \i" ?062 ?120 PSW p TQI PT:i 2n4 0'071 ''05 4 ?311 ?326 0115 ,15 45 1466 1467 I •1 C\J I 0-0 t ·::O ..J l;._ I ..... C\J 'Jl .., "> ..... > '.:'.) :? ""' 0 ':l (/) w "'' ..... .t <( " u '•' 1-- -0 !) (\J n .. IJ'l w w ,_ .;J ,..., rn '.l:: 0 '.l:: '.l:: .... :::> r w 1-- IY 0 I u :::i 0£ z '.l'. n :·. 'I 1 I
Home
Privacy and Data
Site structure and layout ©2025 Majenko Technologies