cdc:nos2.source:opl.opl871:deck:scrsim
Deck SCRSIM
Library Member Format: MODIFY
Listing Sections
- Deck SCRSIM Start
- Deck SCRSIM Part 1 (Line 1880)
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M00S00001.scrsim +++| IDENT SCRSIM,PW16,SCRSIM 00002 M00S00002.scrsim +++| ABS 00003 M00S00003.scrsim +++| SST 00004 M00S00004.scrsim +++| SYSCOM B1 00005 M00S00005.scrsim +++| ENTRY SCRSIM 00006 M00S00006.scrsim +++| ENTRY RFL= 00007 M00S00007.scrsim +++| ENTRY SSJ= 00008 M00S00008.scrsim +++|*COMMENT SCRSIM - SCR SIMULATOR.
| Line S00009 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00009 M01S00009.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1974.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00010 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00011 M00S00010.scrsim +++| TITLE SCRSIM - STATUS/CONTROL REGISTER SIMULATOR. 00012 M00S00011.scrsim +++| SPACE 4 00013 M00S00012.scrsim +++|*** SCRSIM - STATUS/CONTROL REGISTER SIMULATOR. 00014 M00S00013.scrsim +++|* A. J. BEEKMAN 74/06/13. 00015 M00S00014.scrsim +++| SPACE 4 00016 M00S00015.scrsim +++|*** *SCRSIM* SIMULATES THE CYBER 170 STATUS/CONTROL REGISTERS 00017 M00S00016.scrsim +++|* BY ALLOWING THE OPERATOR TO MANIPULATE THE BITS IN THE ACTUAL 00018 M00S00017.scrsim +++|* S/C REGISTER(S) OF THE CYBER 170 OR THE INTERLOCK REGISTER 00019 M00S00018.scrsim +++|* OF THE CYBER 70. 00020 M00S00019.scrsim +++|* 00021 M00S00020.scrsim +++|* *SCRSIM* DRIVES A *K* DISPLAY THAT ALLOWS THE OPERATOR TO 00022 M00S00021.scrsim +++|* SET AND CLEAR BITS, SET BYTES, AND SET LINES AND AREAS IN 00023 M00S00022.scrsim +++|* HOLDING REGISTERS. THIS ALLOWS THE OPERATOR TO SET UP BOTH 00024 M00S00023.scrsim +++|* REGISTERS COMPLETELY. WHEN *GO.* IS ENTERED, THE ENTIRE 00025 M00S00024.scrsim +++|* HOLDING REGISTER CONTENTS ARE TRANSFERRED INTO THE 00026 M00S00025.scrsim +++|* STATUS/CONTROL REGISTERS OF THE CYBER 170, OR 128 BITS 00027 M00S00026.scrsim +++|* ARE TRANSFERRED INTO THE INTERLOCK REGISTER OF THE CYBER 70. 00028 M00S00027.scrsim +++|* THE PROGRAM IS CALLED FROM THE CONSOLE BY ENTERING X.SCRSIM. 00029 M00S00028.scrsim +++|* 00030 M00S00029.scrsim +++|* COMMANDS CAN BE ENTERED ON THE *K* DISPLAY BY ENTERING 00031 M00S00030.scrsim +++|* K.COMND. WHERE COMND. IS ONE OF THE FOLLOWING- 00032 M00S00031.scrsim +++|* 00033 M00S00032.scrsim +++|* AREA,A,M,Y. 00034 M00S00033.scrsim +++|* BYTE,XX,YYYY. 00035 M00S00034.scrsim +++|* CLEAR,A,B,...,Z. 00036 M00S00035.scrsim +++|* CYCLE,X,T,R. 00037 M00S00036.scrsim +++|* END. 00038 M00S00037.scrsim +++|* GO. 00039 M00S00038.scrsim +++|* LINE,X,Y. 00040 M00S00039.scrsim +++|* READ. 00041 M00S00040.scrsim +++|* SET,A,B,...,Z. 00042 M00S00041.scrsim +++|* STOP. 00043 M00S00042.scrsim +++|* +. 00044 M00S00043.scrsim +++|* 00045 M00S00044.scrsim +++|* THE BITS SET THROUGH THE SIMULATOR ARE LOGGED IN THE ERROR 00046 M00S00045.scrsim +++|* LOG IF AN ERROR BIT (BITS 0-39) IS SET. ERROR LOGGING 00047 M00S00046.scrsim +++|* WILL NOT OCCUR ON A CYBER 70 IF NNNN OF THE IPRDECK ENTRY 00048 M00S00047.scrsim +++|* DELAY,TCNNNN IS ZERO. THE SIMULATOR JOB DAYFILE LISTS ALL 00049 M00S00048.scrsim +++|* COMMANDS ENTERED. 00050 M00S00049.scrsim +++|* 00051 M00S00050.scrsim +++|* BATCH INPUT. 00052 M00S00051.scrsim +++|* 00053 M00S00052.scrsim +++|* THE SIMULATOR MAY BE CALLED FROM BATCH INPUT BY THE
| Line S00053 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00054 M01S00053.v23l617 ---|* CONTROL CARD *SCRSIM*. THE INPUT FILE MUST HAVE A RECORD
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00055 M01S00001.v23l617 +++|* COMMAND *SCRSIM*. THE INPUT FILE MUST HAVE A RECORD 00056 M00S00054.scrsim +++|* CONTAINING THE COMMANDS TO BE PROCESSED, ONE COMMAND PER
| Line S00055 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00057 M01S00055.v23l617 ---|* CARD. DEBUG MODE IS NECESSARY, AND THE USER MUST BE
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00058 M01S00002.v23l617 +++|* COMMAND. DEBUG MODE IS NECESSARY, AND THE USER MUST BE 00059 M00S00056.scrsim +++|* VALIDATED FOR SYSTEM ORIGIN PRIVILEDGES. 00060 M00S00057.scrsim +++| SPACE 4 00061 M00S00058.scrsim +++|*** DAYFILE MESSAGES. 00062 M00S00059.scrsim +++|* 00063 M00S00060.scrsim +++|* * END SIMULATOR.* - OPERATOR HAS ENTERED *STOP.* TO DROP THE 00064 M00S00061.scrsim +++|* SIMULATOR.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00065 M01S00001.ns21000 +++|* 00066 M01S00002.ns21000 +++|* * NO SCR ON MAINFRAME.* - OPERATOR HAS BROUGHT UP 00067 M01S00003.ns21000 +++|* SCR SIMULATOR ON MAINFRAME THAT DOES NOT SUPPORT 00068 M01S00004.ns21000 +++|* STATUS/CONTROL REGISTER. 00069 M00S00062.scrsim +++| SPACE 4 00070 M00S00063.scrsim +++|*** *K* DISPLAY MESSAGES. 00071 M00S00064.scrsim +++|* 00072 M00S00065.scrsim +++|* *CONVERSION ERROR.* - PRESENCE OF CHARACTER AFTER POSTRADIX 00073 M00S00066.scrsim +++|* OR PRESENCE OF 8 OR 9 WITH POSTRADIX OF B. 00074 M00S00067.scrsim +++|* 00075 M00S00068.scrsim +++|* *CYCLE STILL PROCESSING.* - COMMAND OTHER THAN *END* 00076 M00S00069.scrsim +++|* ENTERED BEFORE TOTAL TIME LIMIT IS REACHED. 00077 M00S00070.scrsim +++|*
| Line S00071 Modification History | |
|---|---|
M01 (Removed by) | ns2052 |
Seq # *Modification Id* Act ----------------------------+ 00078 M01S00071.ns2052 ---|* *HFM ERROR N* - *HFM* ERROR, CODE N. SEE *HFM* FOR 00079 M01S00072.ns2052 ---|* DESCRIPTION OF ERROR. 00080 M01S00073.ns2052 ---|*
| Line S00074 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00081 M01S00074.v23l617 ---|* *ILLEGAL BIT NUMBER.* - BIT NUMBER SPECIFIED NOT LEGAL.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00082 M01S00003.v23l617 +++|* *INCORRECT BIT NUMBER.* - BIT NUMBER SPECIFIED NOT VALID. 00083 M00S00075.scrsim +++|*
| Line S00076 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00084 M01S00076.v23l617 ---|* *ILLEGAL BYTE NUMBER.* - BYTE NUMBER SPECIFIED NOT LEGAL.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00085 M01S00004.v23l617 +++|* *INCORRECT BYTE NUMBER.* - BYTE NUMBER SPECIFIED NOT VALID. 00086 M00S00077.scrsim +++|*
| Line S00078 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00087 M01S00078.v23l617 ---|* *ILLEGAL CHARACTER.* - ALPHABETIC CHARACTER OTHER THAN B OR
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00088 M01S00005.v23l617 +++|* *INCORRECT CHARACTER.* - ALPHABETIC CHARACTER OTHER THAN B OR 00089 M00S00079.scrsim +++|* OR D AS POSTRADIX ON DECIMAL VALUES, ALPHABETIC CHARACTER, 00090 M00S00080.scrsim +++|* 8, OR 9 FOUND IN OCTAL VALUE ARGUMENT, OR CHARACTER WITH 00091 M00S00081.scrsim +++|* DISPLAY CODE OF 60B OR ABOVE FOUND. 00092 M00S00082.scrsim +++|*
| Line S00083 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00093 M01S00083.v23l617 ---|* *ILLEGAL COMMAND.* - ENTERED COMMAND NOT LEGAL.
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00094 M01S00006.v23l617 +++|* *INCORRECT COMMAND.* - ENTERED COMMAND NOT LEGAL. 00095 M00S00084.scrsim +++|*
| Line S00085 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00096 M01S00085.v23l617 ---|* *ILLEGAL LINE NUMBER.* - LINE NUMBER SPECIFIED NOT LEGAL.
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00097 M01S00007.v23l617 +++|* *INCORRECT LINE NUMBER.* - LINE NUMBER SPECIFIED NOT LEGAL. 00098 M00S00086.scrsim +++|* 00099 M00S00087.scrsim +++|* *MAXIMUM NUMBER OF ARGUMENTS.* - FIRST 30 BIT NUMBERS ONLY 00100 M00S00088.scrsim +++|* ACCEPTED ON SET OR CLEAR COMMANDS. 00101 M00S00089.scrsim +++|* 00102 M00S00090.scrsim +++|* *NO BITS SPECIFIED.* - NO BIT NUMBERS SPECIFIED ON SET OR 00103 M00S00091.scrsim +++|* CLEAR BIT COMMANDS. 00104 M00S00092.scrsim +++|* 00105 M00S00093.scrsim +++|* *NOT ENOUGH ARGUMENTS.* - TERMINATOR FOUND BEFORE THE CORRECT 00106 M00S00094.scrsim +++|* NUMBER OF ARGUMENTS ENTERED FOR THE COMMAND. 00107 M00S00095.scrsim +++|* 00108 M00S00096.scrsim +++|* *NUMBER OF BITS TOO LARGE.* - NUMBER OF BITS ON AREA COMMAND 00109 M00S00097.scrsim +++|* LARGER THAN NUMBER OF BITS FROM STARTING BIT TO END OF 00110 M00S00098.scrsim +++|* REGISTER. 00111 M00S00099.scrsim +++|* 00112 M00S00100.scrsim +++|* *NUMBER OF CYCLES TOO LARGE.* - NUMBER OF CYCLES ON CYCLE 00113 M00S00101.scrsim +++|* COMMAND IS GREATER THAN 4095. 00114 M00S00102.scrsim +++|* 00115 M00S00103.scrsim +++|* *TIME LIMIT UP.* - TOTAL TIME LIMIT ON CYCLE COMMAND HAS 00116 M00S00104.scrsim +++|* PASSED. INPUT CAN AGAIN BE ACCEPTED BY THE SIMULATOR. 00117 M00S00105.scrsim +++|* 00118 M00S00106.scrsim +++|* *TOO MANY BITS SPECIFIED.* - MORE BITS SPECIFIED THAN CAN 00119 M00S00107.scrsim +++|* BE HELD IN AREA, LINE OR BYTE GIVEN. 00120 M00S00108.scrsim +++| SPACE 4 00121 M00S00109.scrsim +++|*CALL COMCMAC
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00122 M01S00008.v23l617 +++|*CALL COMCDCM 00123 M00S00110.scrsim +++|*CALL COMSPRD 00124 M00S00111.scrsim +++|*CALL COMSSCR 00125 M00S00112.scrsim +++|*CALL COMSSSJ 00126 M00S00113.scrsim +++|*CALL COMSSSD 00127 M00S00114.scrsim +++| TITLE CONSTANTS. 00128 M00S00115.scrsim +++|* CONSTANTS. 00129 M00S00116.scrsim +++| 00130 M00S00117.scrsim +++| MNOP EQU 30 MAXIMUM NUMBER OF PARAMETERS ALLOWED 00131 M00S00118.scrsim +++| IBUFL EQU 101B INPUT BUFFER LENGTH 00132 M00S00119.scrsim +++| OBUFL EQU 101B OUTPUT BUFFER LENGTH 00133 M00S00120.scrsim +++| TITLE HOLDING REGISTERS AND DIRECT LOCATIONS. 00134 M00S00121.scrsim +++| ORG 101B 00135 M00S00122.scrsim +++| 00136 M00S00123.scrsim +++|* HOLDING REGISTERS FOR OPERATOR USE. 00137 M00S00124.scrsim +++| 00138 M00S00125.scrsim +++| PW16 BSSZ 1 CHANNEL 16 PARAMETER WORD 00139 M00S00126.scrsim +++| UHLD BSSZ 4 CHANNEL 16 HOLDING REGISTER 00140 M00S00127.scrsim +++| PW36 BSSZ 1 CHANNEL 36 PARAMETER WORD 00141 M00S00128.scrsim +++| LHLD BSSZ 4 CHANNEL 36 HOLDING REGISTER 00142 M00S00129.scrsim +++| 00143 M00S00130.scrsim +++|* DIRECT LOCATIONS. 00144 M00S00131.scrsim +++| 00145 M00S00132.scrsim +++| K VFD 24/I,18/R,18/L16 *K* DISPLAY CONTROL WORD 00146 M00S00133.scrsim +++| I BSS 8 KEYBOARD INPUT BUFFER 00147 M00S00134.scrsim +++| PARA BSS 30 PARAMETER AREA 00148 M00S00135.scrsim +++| BLNK DIS 4, 00149 M00S00136.scrsim +++| REGF BSSZ 1 REGISTER IN USE FLAG 00150 M00S00137.scrsim +++| CA BSSZ 1 CHANNEL 36 AVAILABLE FLAG 00151 M00S00138.scrsim +++| 00152 M00S00139.scrsim +++|* FETS. 00153 M00S00140.scrsim +++| 00154 M00S00141.scrsim +++| IN BSS 0 00155 M00S00142.scrsim +++| INPUT FILEB IBUF,IBUFL 00156 M00S00143.scrsim +++| 00157 M00S00144.scrsim +++| OT BSS 0 00158 M00S00145.scrsim +++| OUTPUT FILEB OBUF,OBUFL 00159 M00S00146.scrsim +++| 00160 M00S00147.scrsim +++|* SSJ PARAMETER AREA. 00161 M00S00148.scrsim +++| 00162 M00S00149.scrsim +++| SSJ= VFD 12/0,24/-0,12/SCCS,12/IRSI 00163 M00S00150.scrsim +++| BSSZ SSJL-1 00164 M00S00151.scrsim +++| SCRSIM TITLE SCRSIM - MAIN LOOP. 00165 M00S00152.scrsim +++|* SCRSIM - STATUS/CONTROL REGISTER SIMULATOR. 00166 M00S00153.scrsim +++| 00167 M00S00154.scrsim +++| SCRSIM SB1 1 00168 M00S00155.scrsim +++| RJ PRS PRESET 00169 M00S00156.scrsim +++| READ IN,R 00170 M00S00157.scrsim +++| SA1 IN+2 IN 00171 M00S00158.scrsim +++| SA2 A1+B1 OUT 00172 M00S00159.scrsim +++| IX6 X1-X2 00173 M00S00160.scrsim +++| NZ X6,SCS11 IF FET INPUT, BEGIN ROUTINE 00174 M00S00161.scrsim +++| BX6 X6-X6 ZERO FET NAME 00175 M00S00162.scrsim +++| SA6 IN 00176 M00S00163.scrsim +++| SCS1 SA1 I 00177 M00S00164.scrsim +++| ZR X1,SCS11 IF INPUT NOT READY 00178 M00S00165.scrsim +++| 00179 M00S00166.scrsim +++|* DISPLAY INPUT COMMAND. 00180 M00S00167.scrsim +++| 00181 M00S00168.scrsim +++| MESSAGE I,3 ENTER COMMAND IN JOB DAYFILE 00182 M00S00169.scrsim +++| MOVE 3,BLNK,MSGL CLEAR ERROR MESSAGE AREAS 00183 M00S00170.scrsim +++| MOVE 3,BLNK,MSGK 00184 M00S00171.scrsim +++| MOVE 5,I,PARL DISPLAY COMMAND 00185 M00S00172.scrsim +++| MOVE 5,I,PARK 00186 M00S00173.scrsim +++| SA2 BLNK 00187 M00S00174.scrsim +++| SB2 4 00188 M00S00175.scrsim +++| BX6 X2 00189 M00S00176.scrsim +++| SCS2 SA3 PARL+B2 00190 M00S00177.scrsim +++| SA4 PARK+B2 00191 M00S00178.scrsim +++| NZ X3,SCS3 IF NOT ZERO WORD 00192 M00S00179.scrsim +++| SA6 A3+ BLANK OUT ZERO WORD 00193 M00S00180.scrsim +++| SB2 B2-B1 00194 M00S00181.scrsim +++| SA6 A4 00195 M00S00182.scrsim +++| NZ B2,SCS2 IF NOT END OF BUFFER 00196 M00S00183.scrsim +++| 00197 M00S00184.scrsim +++|* FIND CORRECT COMMAND AND PROCESSOR. 00198 M00S00185.scrsim +++| 00199 M00S00186.scrsim +++| SCS3 SA2 I 00200 M00S00187.scrsim +++| SA1 TOCP TABLE OF COMMAND PROCESSORS 00201 M00S00188.scrsim +++| SCS4 BX6 X1 00202 M00S00189.scrsim +++| AX6 18 00203 M00S00190.scrsim +++| MX7 -6 00204 M00S00191.scrsim +++| BX6 -X7*X6 SHIFT COUNT FOR MASK 00205 M00S00192.scrsim +++| SB7 X6 00206 M00S00193.scrsim +++| MX0 1 00207 M00S00194.scrsim +++| AX0 B7 MASK FOR COMMAND 00208 M00S00195.scrsim +++| BX2 X0*X2 00209 M00S00196.scrsim +++| BX1 X0*X1 00210 M00S00197.scrsim +++| BX6 X2-X1 00211 M00S00198.scrsim +++| ZR X6,SCS5 IF CORRECT COMMAND 00212 M00S00199.scrsim +++| SA1 A1+B1 00213 M00S00200.scrsim +++| SA2 A2 00214 M00S00201.scrsim +++| NZ X1,SCS4 IF NOT END OF COMMANDS
| Line S00202 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00215 M01S00202.v23l617 ---| MOVE 3,SCSA,MSGL *ILLEGAL PARAMETER.*
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00216 M01S00009.v23l617 +++| MOVE 3,SCSA,MSGL *INCORRECT PARAMETER.* 00217 M00S00203.scrsim +++| MOVE 3,SCSA,MSGK 00218 M00S00204.scrsim +++| EQ SCS8 00219 M00S00205.scrsim +++| 00220 M00S00206.scrsim +++| SCS5 SB6 7 00221 M00S00207.scrsim +++| SA2 A2 CHECK FOR SEPARATOR 00222 M00S00208.scrsim +++| SB7 B7+B6 SHIFT COUNT FOR COMMAND AND SEPARATOR 00223 M00S00209.scrsim +++| LX2 B7 00224 M00S00210.scrsim +++| SX3 1R+ CHECK FOR *+* COMMAND 00225 M00S00211.scrsim +++| LX3 6 00226 M00S00212.scrsim +++| BX3 X2-X3 00227 M00S00213.scrsim +++| ZR X3,SCS7 IF *+* ONLY 00228 M00S00214.scrsim +++| BX2 -X7*X2 00229 M00S00215.scrsim +++| SX6 X2-1R+ 00230 M00S00216.scrsim +++| NG X6,SCS6 IF ALPHANUMERIC 00231 M00S00217.scrsim +++| SX6 X2-1R# 00232 M00S00218.scrsim +++| NG X6,SCS7 IF SEPARATOR OR TERMINATOR
| Line S00219 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00233 M01S00219.v23l617 ---| SCS6 MOVE 3,SCSA,MSGL *ILLEGAL PARAMETER.*
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00234 M01S00010.v23l617 +++| SCS6 MOVE 3,SCSA,MSGL *INCORRECT PARAMETER.* 00235 M00S00220.scrsim +++| MOVE 3,SCSA,MSGK 00236 M00S00221.scrsim +++| EQ SCS8 00237 M00S00222.scrsim +++| 00238 M00S00223.scrsim +++|* JUMP TO COMMAND PROCESSOR. 00239 M00S00224.scrsim +++| 00240 M00S00225.scrsim +++| SCS7 SA1 A1 00241 M00S00226.scrsim +++| SB7 X1 PROCESSOR ADDRESS 00242 M00S00227.scrsim +++| SX6 SCS8 SET UP RETURN ADDRESS 00243 M00S00228.scrsim +++| SX7 1 SET DISPLAY UPDATE AFTER COMMAND 00244 M00S00229.scrsim +++| SA7 SCSC 00245 M00S00230.scrsim +++| SA6 B7-B1 00246 M00S00231.scrsim +++| JP B7 00247 M00S00232.scrsim +++| 00248 M00S00233.scrsim +++|* RETURN FROM PROCESSOR AND CLEAR INPUT AREA. 00249 M00S00234.scrsim +++| 00250 M00S00235.scrsim +++| SCS8 MOVE 3,MSGL,SCSB+1 00251 M00S00236.scrsim +++| SA1 SCSB+1 00252 M00S00237.scrsim +++| NG X1,SCS9 IF NO ERROR MESSAGE 00253 M00S00238.scrsim +++| MESSAGE SCSB,3 PUT ERROR MESSAGE IN DAYFILE 00254 M00S00239.scrsim +++| SCS9 BX6 X6-X6 CLEAR INPUT AREA 00255 M00S00240.scrsim +++| SB2 B0 00256 M00S00241.scrsim +++| SB3 7 00257 M00S00242.scrsim +++| SCS10 SA6 I+B2 00258 M00S00243.scrsim +++| EQ B2,B3,SCS11 IF END OF BUFFER 00259 M00S00244.scrsim +++| SB2 B2+B1 00260 M00S00245.scrsim +++| EQ SCS10 00261 M00S00246.scrsim +++| 00262 M00S00247.scrsim +++|* READ AND DISPLAY S/C REGISTER CONTENTS. 00263 M00S00248.scrsim +++| 00264 M00S00249.scrsim +++| SCS11 RECALL 00265 M00S00250.scrsim +++| SA1 SCSC CHECK IF TIME TO UPDATE DISPLAY 00266 M00S00251.scrsim +++| SX6 X1-1 00267 M00S00252.scrsim +++| SA6 A1+ 00268 M00S00253.scrsim +++| NZ X6,SCS12 IF NOT TIME TO UPDATE 00269 M00S00254.scrsim +++| RJ DCR DISPLAY CONTENTS OF REGISTER 00270 M00S00255.scrsim +++| SX6 50 RESET DISPLAY UPDATE COUNTER 00271 M00S00256.scrsim +++| SA6 SCSC 00272 M00S00257.scrsim +++| RECALL 00273 M00S00258.scrsim +++| SCS12 SA1 IN CHECK FOR FET INPUT 00274 M00S00259.scrsim +++| ZR X1,SCS1 IF NO FET INPUT 00275 M00S00260.scrsim +++| READC IN,I,8 TRANSFER FET INPUT TO INPUT AREA 00276 M00S00261.scrsim +++| NZ X1,STP IF EOR/EOF, END SIMULATOR 00277 M00S00262.scrsim +++| MESSAGE I,2 DISPLAY AT CONTROL POINT 00278 M00S00263.scrsim +++| EQ SCS1 00279 M00S00264.scrsim +++|
| Line S00265 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00280 M01S00265.v23l617 ---| SCSA DIS 3,ILLEGAL COMMAND.
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00281 M01S00011.v23l617 +++| SCSA DIS 3,INCORRECT COMMAND. 00282 M00S00266.scrsim +++| BSSZ 1 00283 M00S00267.scrsim +++| SCSB DIS 4, ERROR MESSAGE BUFFER 00284 M00S00268.scrsim +++| BSSZ 1 00285 M00S00269.scrsim +++| SCSC CON 1 DISPLAY UPDATE COUNTER 00286 M00S00270.scrsim +++| SPACE 4,5 00287 M00S00271.scrsim +++|** TABLE OF COMMAND PROCESSORS. 00288 M00S00272.scrsim +++|*T 36/ COMMAND,6/ SC,18/ ADDR
Figure
00289 M00S00273.scrsim +++|* 00290 M00S00274.scrsim +++|* SC SHIFT COUNT FOR MASK. 00291 M00S00275.scrsim +++|* ADDR PROCESSOR ADDRESS. 00292 M00S00276.scrsim +++| 00293 M00S00277.scrsim +++| 00294 M00S00278.scrsim +++| TOCP BSS 0 00295 M00S00279.scrsim +++| VFD 36/4LAREA,6/23,18/ARP 00296 M00S00280.scrsim +++| VFD 36/4LBYTE,6/23,18/BYP 00297 M00S00281.scrsim +++| VFD 36/5LCLEAR,6/29,18/CLP 00298 M00S00282.scrsim +++| VFD 36/5LCYCLE,6/29,18/CYP 00299 M00S00283.scrsim +++| VFD 36/2LGO,6/11,18/GOP 00300 M00S00284.scrsim +++| VFD 36/4LLINE,6/23,18/LIP 00301 M00S00285.scrsim +++| VFD 36/4LREAD,6/23,18/REP 00302 M00S00286.scrsim +++| VFD 36/3LSET,6/17,18/SEP 00303 M00S00287.scrsim +++| VFD 36/4LSTOP,6/23,18/STP 00304 M00S00288.scrsim +++| VFD 36/1L+,6/5,18/TOP 00305 M00S00289.scrsim +++| BSSZ 1 00306 M00S00290.scrsim +++| ARP TITLE PARAMETER PROCESSOR SUBROUTINES. 00307 M00S00291.scrsim +++|*** AREA,A,M,Y. 00308 M00S00292.scrsim +++|* SET M BITS IN THE HOLDING REGISTER, FROM BIT A TO 00309 M00S00293.scrsim +++|* A+M-1, TO THE OCTAL VALUE Y. Y MAY BE UP TO M BITS 00310 M00S00294.scrsim +++|* OF OCTAL VALUE. A IS THE STARTING BIT NUMBER (0-203), 00311 M00S00295.scrsim +++|* AND M IS THE NUMBER OF BITS (1-204). A AND M ARE 00312 M00S00296.scrsim +++|* ASSUMED DECIMAL, BUT MAY HAVE A POSTRADIX OF D OR B. 00313 M00S00297.scrsim +++| 00314 M00S00298.scrsim +++|** ARP - SET AREA TO OCTAL VALUE. 00315 M00S00299.scrsim +++|* 00316 M00S00300.scrsim +++|* EXIT AREA IN HOLDING REGISTER SET TO GIVEN OCTAL VALUE. 00317 M00S00301.scrsim +++|* VALUE DISPLAYED ON *K* DISPLAY. 00318 M00S00302.scrsim +++|* 00319 M00S00303.scrsim +++|* USES X - 0, 1, 2, 3, 5, 6, 7. 00320 M00S00304.scrsim +++|* B - 2, 4, 5, 6, 7. 00321 M00S00305.scrsim +++|* A - 0, 1, 2, 3, 5, 6, 7. 00322 M00S00306.scrsim +++|* 00323 M00S00307.scrsim +++|* CALLS GPV, GOV, DYL. 00324 M00S00308.scrsim +++| 00325 M00S00309.scrsim +++| 00326 M00S00310.scrsim +++| DATA 0 RETURN ADDRESS 00327 M00S00311.scrsim +++| ARP BSS 0 00328 M00S00312.scrsim +++| 00329 M00S00313.scrsim +++|* GET PARAMETERS. 00330 M00S00314.scrsim +++| 00331 M00S00315.scrsim +++| SA2 I 00332 M00S00316.scrsim +++| LX2 30 00333 M00S00317.scrsim +++| SA0 B0 00334 M00S00318.scrsim +++| MX0 -6 00335 M00S00319.scrsim +++| BX6 -X0*X2 00336 M00S00320.scrsim +++| SX7 X6-1R) 00337 M00S00321.scrsim +++| ZR X7,ARP15 IF *)* 00338 M00S00322.scrsim +++| SX7 X6-1R. 00339 M00S00323.scrsim +++| ZR X7,ARP15 IF *.* 00340 M00S00324.scrsim +++| SB6 5 CHARACTER COUNTER 00341 M00S00325.scrsim +++| RJ GPV GET PARAMETER VALUE 00342 M00S00326.scrsim +++| ZR X1,ARP11 IF ERROR 00343 M00S00327.scrsim +++| SX7 X6-NBIT
| Line S00328 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00344 M01S00328.v23l617 ---| PL X7,ARP12 IF ILLEGAL BIT NUMBER
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00345 M01S00012.v23l617 +++| PL X7,ARP12 IF INCORRECT BIT NUMBER 00346 M00S00329.scrsim +++| SA6 ARPA SAVE STARTING BIT 00347 M00S00330.scrsim +++| ARP1 SX6 X1-1R) 00348 M00S00331.scrsim +++| ZR X6,ARP15 IF *)* TERMINATOR 00349 M00S00332.scrsim +++| SX6 X1-1R. 00350 M00S00333.scrsim +++| ZR X6,ARP15 IF *.* TERMINATOR 00351 M00S00334.scrsim +++| SX0 A0 00352 M00S00335.scrsim +++| NZ X0,ARP2 IF BOTH PARAMETERS FOUND 00353 M00S00336.scrsim +++| SA0 B1 00354 M00S00337.scrsim +++| RJ GPV GET PARAMETER VALUE 00355 M00S00338.scrsim +++| ZR X1,ARP11 IF ERROR 00356 M00S00339.scrsim +++| SA5 ARPA 00357 M00S00340.scrsim +++| IX7 X5+X6 END BIT + 1 00358 M00S00341.scrsim +++| SX5 205 00359 M00S00342.scrsim +++| IX7 X7-X5 00360 M00S00343.scrsim +++| PL X7,ARP13 IF NUMBER OF BITS TOO LARGE 00361 M00S00344.scrsim +++| SA6 ARPB SAVE NUMBER OF BITS 00362 M00S00345.scrsim +++| EQ ARP1 00363 M00S00346.scrsim +++| 00364 M00S00347.scrsim +++| ARP2 RJ GOV GET OCTAL VALUE 00365 M00S00348.scrsim +++| ZR X2,ARP11 IF ERROR 00366 M00S00349.scrsim +++| SX6 B7+ 00367 M00S00350.scrsim +++| ZR B4,ARP3 IF NO FULL WORD OF VALUE 00368 M00S00351.scrsim +++| SX1 60 NUMBER OF BITS IN A WORD 00369 M00S00352.scrsim +++| SX2 B4+ 00370 M00S00353.scrsim +++| IX7 X2*X1 00371 M00S00354.scrsim +++| IX6 X7+X6 TOTAL NUMBER OF BITS 00372 M00S00355.scrsim +++| ARP3 SA2 ARPB 00373 M00S00356.scrsim +++| IX7 X2-X6 00374 M00S00357.scrsim +++| NG X7,ARP14 IF TOO MANY BITS GIVEN 00375 M00S00358.scrsim +++| 00376 M00S00359.scrsim +++|* INSERT VALUE INTO HOLDING REGISTER. 00377 M00S00360.scrsim +++| 00378 M00S00361.scrsim +++| SA1 REGF 00379 M00S00362.scrsim +++| SA2 ARPA STARTING BIT 00380 M00S00363.scrsim +++| SX6 60 00381 M00S00364.scrsim +++| SX7 X2 00382 M00S00365.scrsim +++| IX6 X7/X6 HOLDING REGISTER WORD 00383 M00S00366.scrsim +++| SX7 60 00384 M00S00367.scrsim +++| IX7 X6*X7 00385 M00S00368.scrsim +++| IX7 X2-X7 00386 M00S00369.scrsim +++| SB5 X7 BIT NUMBER IN WORD 00387 M00S00370.scrsim +++| SA7 A2 SAVE BIT NUMBER IN WORD 00388 M00S00371.scrsim +++| SX7 UHLD+X6 00389 M00S00372.scrsim +++| ZR X1,ARP4 IF CHANNEL 16 REGISTER 00390 M00S00373.scrsim +++| SX7 LHLD+X6 00391 M00S00374.scrsim +++| ARP4 SA0 X7 STARTING ADDRESS 00392 M00S00375.scrsim +++| SA1 A0 00393 M00S00376.scrsim +++| SA3 ARPB NUMBER OF BITS 00394 M00S00377.scrsim +++| SB7 X3+ 00395 M00S00378.scrsim +++| SB6 60 00396 M00S00379.scrsim +++| SA3 GOVA VALUE 00397 M00S00380.scrsim +++| ARP5 SB4 60 00398 M00S00381.scrsim +++| SB4 B5-B4 00399 M00S00382.scrsim +++| SB4 -B4 00400 M00S00383.scrsim +++| GE B7,B4,ARP6 IF ENOUGH BITS TO FILL WORD 00401 M00S00384.scrsim +++| SB4 B7+ 00402 M00S00385.scrsim +++| ARP6 GE B6,B4,ARP7 IF ENOUGH BITS IN VALUE WORD 00403 M00S00386.scrsim +++| SB4 B6+ 00404 M00S00387.scrsim +++| ARP7 SB3 B4-B1 MASK COUNT 00405 M00S00388.scrsim +++| MX0 1 00406 M00S00389.scrsim +++| AX0 B3 00407 M00S00390.scrsim +++| LX2 B4,X0 VALUE WORD MASK 00408 M00S00391.scrsim +++| LX0 B5,X2 HOLDING WORD MASK 00409 M00S00392.scrsim +++| BX7 X2*X3 GET VALUE 00410 M00S00393.scrsim +++| AX3 B4 00411 M00S00394.scrsim +++| LX7 B5 VALUE LEFT SHIFTED 00412 M00S00395.scrsim +++| BX6 -X0*X1 00413 M00S00396.scrsim +++| BX1 X7+X6 MERGE IN VALUE 00414 M00S00397.scrsim +++| SB6 B6-B4 00415 M00S00398.scrsim +++| NZ B6,ARP8 IF NOT END OF VALUE WORD 00416 M00S00399.scrsim +++| SB6 60 00417 M00S00400.scrsim +++| SA3 A3+B1 GET NEXT VALUE WORD 00418 M00S00401.scrsim +++| ARP8 SB5 B5+B4 00419 M00S00402.scrsim +++| SB2 60 00420 M00S00403.scrsim +++| SB2 B5-B2 00421 M00S00404.scrsim +++| NZ B2,ARP9 IF NOT END OF HOLDING WORD 00422 M00S00405.scrsim +++| BX6 X1 00423 M00S00406.scrsim +++| SA6 A1+ SAVE WORD 00424 M00S00407.scrsim +++| SA1 A1+B1 GET NEXT HOLDING REGISTER WORD 00425 M00S00408.scrsim +++| SB5 B0+ 00426 M00S00409.scrsim +++| ARP9 SB7 B7-B4 00427 M00S00410.scrsim +++| NZ B7,ARP5 IF NOT END OF TRANSFER 00428 M00S00411.scrsim +++| BX6 X1 00429 M00S00412.scrsim +++| SA6 A1 SAVE LAST WORD 00430 M00S00413.scrsim +++| 00431 M00S00414.scrsim +++|* DISPLAY ENTIRE AREA. 00432 M00S00415.scrsim +++| 00433 M00S00416.scrsim +++| RJ DYL DISPLAY LINE 00434 M00S00417.scrsim +++| SA1 ARPB NUMBER OF BITS 00435 M00S00418.scrsim +++| SA2 ARPA BIT ORDINAL IN WORD 00436 M00S00419.scrsim +++| SB7 X2-60 00437 M00S00420.scrsim +++| SB6 X1+ 00438 M00S00421.scrsim +++| SB7 -B7+B1 NUMBER OF BITS LEFT IN WORD + 1 00439 M00S00422.scrsim +++| SB5 B6-B7 00440 M00S00423.scrsim +++| ARP10 NG B5,ARP11 IF ENTIRE AREA DISPLAYED 00441 M00S00424.scrsim +++| SB6 B5+B1 NUMBER OF BITS LEFT TO DISPLAY 00442 M00S00425.scrsim +++| SA0 A0+B1 SET NEXT WORD ADDRESS 00443 M00S00426.scrsim +++| RJ DYL DISPLAY LINE 00444 M00S00427.scrsim +++| SB5 B6-61 00445 M00S00428.scrsim +++| EQ ARP10 00446 M00S00429.scrsim +++| 00447 M00S00430.scrsim +++|* RETURN TO MAIN PROCESSOR. 00448 M00S00431.scrsim +++| 00449 M00S00432.scrsim +++| ARP11 SA1 ARP-1 GET RETURN ADDRESS 00450 M00S00433.scrsim +++| SB7 X1+ 00451 M00S00434.scrsim +++| JP B7 00452 M00S00435.scrsim +++|
| Line S00436 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00453 M01S00436.v23l617 ---| ARP12 MOVE 3,ARPD,MSGL *ILLEGAL BIT NUMBER.*
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00454 M01S00013.v23l617 +++| ARP12 MOVE 3,ARPD,MSGL *INCORRECT BIT NUMBER.* 00455 M00S00437.scrsim +++| MOVE 3,ARPD,MSGK 00456 M00S00438.scrsim +++| EQ ARP11 00457 M00S00439.scrsim +++| 00458 M00S00440.scrsim +++| ARP13 MOVE 3,ARPE,MSGL *NUMBER OF BITS TOO LARGE.* 00459 M00S00441.scrsim +++| MOVE 3,ARPE,MSGK 00460 M00S00442.scrsim +++| EQ ARP11 00461 M00S00443.scrsim +++| 00462 M00S00444.scrsim +++| ARP14 MOVE 3,ARPF,MSGL *TOO MANY BITS SPECIFIED.* 00463 M00S00445.scrsim +++| MOVE 3,ARPF,MSGK 00464 M00S00446.scrsim +++| EQ ARP11 00465 M00S00447.scrsim +++| 00466 M00S00448.scrsim +++| ARP15 MOVE 3,ARPC,MSGL *NOT ENOUGH ARGUMENTS.* 00467 M00S00449.scrsim +++| MOVE 3,ARPC,MSGK 00468 M00S00450.scrsim +++| EQ ARP11 00469 M00S00451.scrsim +++| 00470 M00S00452.scrsim +++| ARPA BSSZ 1 STARTING BIT 00471 M00S00453.scrsim +++| ARPB BSSZ 1 NUMBER OF BITS 00472 M00S00454.scrsim +++| ARPC DIS 3,NOT ENOUGH ARGUMENTS. 00473 M00S00455.scrsim +++| BSSZ 1
| Line S00456 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00474 M01S00456.v23l617 ---| ARPD DIS 3,ILLEGAL BIT NUMBER.
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00475 M01S00014.v23l617 +++| ARPD DIS 3,INCORRECT BIT NUMBER. 00476 M00S00457.scrsim +++| BSSZ 1 00477 M00S00458.scrsim +++| ARPE DIS 3,NUMBER OF BITS TOO LARGE. 00478 M00S00459.scrsim +++| BSSZ 1 00479 M00S00460.scrsim +++| ARPF DIS 3,TOO MANY BITS SPECIFIED. 00480 M00S00461.scrsim +++| BSSZ 1 00481 M00S00462.scrsim +++| BYP SPACE 4,16 00482 M00S00463.scrsim +++|*** BYTE,XX,YYYY. 00483 M00S00464.scrsim +++|* SET BYTE XX IN THE HOLDING REGISTER TO THE OCTAL 00484 M00S00465.scrsim +++|* VALUE YYYY. YYYY MAY BE UP TO 12 BITS OF OCTAL 00485 M00S00466.scrsim +++|* VALUE. XX IS THE BYTE NUMBER (0-16), AND IS 00486 M00S00467.scrsim +++|* ASSUMED DECIMAL, BUT MAY HAVE A POSTRADIX OF D OR B. 00487 M00S00468.scrsim +++| 00488 M00S00469.scrsim +++|** BYP - SET BYTE TO OCTAL VALUE. 00489 M00S00470.scrsim +++|* 00490 M00S00471.scrsim +++|* EXIT BYTE SET IN HOLDING REGISTER. 00491 M00S00472.scrsim +++|* VALUE DISPLAYED ON *K* DISPLAY. 00492 M00S00473.scrsim +++|* 00493 M00S00474.scrsim +++|* USES X - 0, 1, 2, 5, 6, 7. 00494 M00S00475.scrsim +++|* B - 2, 6, 7. 00495 M00S00476.scrsim +++|* A - 0, 1, 2, 7. 00496 M00S00477.scrsim +++|* 00497 M00S00478.scrsim +++|* CALLS GPV, GOV, DYL. 00498 M00S00479.scrsim +++| 00499 M00S00480.scrsim +++| 00500 M00S00481.scrsim +++| DATA 0 ENTRY/EXIT 00501 M00S00482.scrsim +++| BYP BSS 0 00502 M00S00483.scrsim +++| SA2 I 00503 M00S00484.scrsim +++| SB6 5 CHARACTER COUNTER 00504 M00S00485.scrsim +++| LX2 30 00505 M00S00486.scrsim +++| MX0 -6 00506 M00S00487.scrsim +++| BX6 -X0*X2 00507 M00S00488.scrsim +++| SX7 X6-1R) 00508 M00S00489.scrsim +++| ZR X7,BYP1 IF *)* 00509 M00S00490.scrsim +++| SX7 X6-1R. 00510 M00S00491.scrsim +++| ZR X7,BYP1 IF *.* 00511 M00S00492.scrsim +++| 00512 M00S00493.scrsim +++|* GET CORRECT BYTE. 00513 M00S00494.scrsim +++| 00514 M00S00495.scrsim +++| RJ GPV GET PARAMETER VALUE 00515 M00S00496.scrsim +++| ZR X1,BYP5 IF ERROR 00516 M00S00497.scrsim +++| SX7 X1-1R) 00517 M00S00498.scrsim +++| ZR X7,BYP1 IF *)* TERMINATOR 00518 M00S00499.scrsim +++| SX7 X1-1R. 00519 M00S00500.scrsim +++| ZR X7,BYP1 IF *.* TERMINATOR 00520 M00S00501.scrsim +++| EQ BYP2 00521 M00S00502.scrsim +++| 00522 M00S00503.scrsim +++| BYP1 MOVE 3,BYPA,MSGL *NOT ENOUGH ARGUMENTS.* 00523 M00S00504.scrsim +++| MOVE 3,BYPA,MSGK 00524 M00S00505.scrsim +++| EQ BYP5 00525 M00S00506.scrsim +++| 00526 M00S00507.scrsim +++| BYP2 SX7 X6-17 00527 M00S00508.scrsim +++| NG X7,BYP3 IF LEGAL BYTE NUMBER
| Line S00509 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00528 M01S00509.v23l617 ---| MOVE 3,BYPB,MSGL *ILLEGAL BYTE NUMBER.*
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00529 M01S00015.v23l617 +++| MOVE 3,BYPB,MSGL *INCORRECT BYTE NUMBER.* 00530 M00S00510.scrsim +++| MOVE 3,BYPB,MSGK 00531 M00S00511.scrsim +++| EQ BYP5 00532 M00S00512.scrsim +++| 00533 M00S00513.scrsim +++| BYP3 SA0 UHLD 00534 M00S00514.scrsim +++| SA1 REGF 00535 M00S00515.scrsim +++| ZR X1,BYP4 IF CHANNEL 16 REGISTER 00536 M00S00516.scrsim +++| SA0 LHLD 00537 M00S00517.scrsim +++| BYP4 SX7 5 00538 M00S00518.scrsim +++| SX5 X6 00539 M00S00519.scrsim +++| IX7 X6/X7 WORD NUMBER 00540 M00S00520.scrsim +++| SB7 X7 00541 M00S00521.scrsim +++| SA0 A0+B7 SET WORD ADDRESS 00542 M00S00522.scrsim +++| SX6 5 00543 M00S00523.scrsim +++| IX6 X6*X7 00544 M00S00524.scrsim +++| IX6 X5-X6 BYTE ORDINAL IN WORD 00545 M00S00525.scrsim +++| SB2 X6 00546 M00S00526.scrsim +++| RJ GOV GET OCTAL VALUE 00547 M00S00527.scrsim +++| ZR X2,BYP5 IF ERROR 00548 M00S00528.scrsim +++| NZ B4,BYP6 IF TOO MANY BITS 00549 M00S00529.scrsim +++| SB7 B7-13 00550 M00S00530.scrsim +++| PL B7,BYP6 IF TOO MANY BITS 00551 M00S00531.scrsim +++| 00552 M00S00532.scrsim +++|* INSERT OCTAL VALUE INTO BYTE. 00553 M00S00533.scrsim +++| 00554 M00S00534.scrsim +++| SA2 GOVA OCTAL VALUE 00555 M00S00535.scrsim +++| SX5 12 00556 M00S00536.scrsim +++| SX7 B2 00557 M00S00537.scrsim +++| IX7 X7*X5 SHIFT COUNT 00558 M00S00538.scrsim +++| SB7 X7 00559 M00S00539.scrsim +++| SA1 A0 GET HOLDING WORD 00560 M00S00540.scrsim +++| MX0 48 00561 M00S00541.scrsim +++| BX6 -X0*X2 00562 M00S00542.scrsim +++| LX0 B7 FORM MASK 00563 M00S00543.scrsim +++| LX6 B7 00564 M00S00544.scrsim +++| BX7 X0*X1 00565 M00S00545.scrsim +++| BX7 X6+X7 INSERT VALUE 00566 M00S00546.scrsim +++| SA7 A0+ 00567 M00S00547.scrsim +++| RJ DYL DISPLAY LINE 00568 M00S00548.scrsim +++| BYP5 SA1 BYP-1 GET RETURN ADDRESS 00569 M00S00549.scrsim +++| SB7 X1+ 00570 M00S00550.scrsim +++| JP B7 00571 M00S00551.scrsim +++| 00572 M00S00552.scrsim +++| BYP6 MOVE 3,BYPC,MSGL *TOO MANY BITS SPECIFIED.* 00573 M00S00553.scrsim +++| MOVE 3,BYPC,MSGK 00574 M00S00554.scrsim +++| EQ BYP5 00575 M00S00555.scrsim +++| 00576 M00S00556.scrsim +++| BYPA DIS 3,NOT ENOUGH ARGUMENTS. 00577 M00S00557.scrsim +++| BSSZ 1
| Line S00558 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00578 M01S00558.v23l617 ---| BYPB DIS 3,ILLEGAL BYTE NUMBER.
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00579 M01S00016.v23l617 +++| BYPB DIS 3,INCORRECT BYTE NUMBER. 00580 M00S00559.scrsim +++| BSSZ 1 00581 M00S00560.scrsim +++| BYPC DIS 3,TOO MANY BITS SPECIFIED. 00582 M00S00561.scrsim +++| BSSZ 1 00583 M00S00562.scrsim +++| CLP SPACE 4,15 00584 M00S00563.scrsim +++|*** CLEAR,A,B,...,Z. 00585 M00S00564.scrsim +++|* CLEAR BITS A,B,...,Z IN THE HOLDING REGISTER, WHERE 00586 M00S00565.scrsim +++|* A,B,...,Z ARE BIT NUMBERS (0-203). DECIMAL VALUES 00587 M00S00566.scrsim +++|* ARE ASSUMED, BUT EACH MAY HAVE A POSTRADIX OF D OR B. 00588 M00S00567.scrsim +++|* IF MORE THAN 30 BIT NUMBERS ARE ENTERED, ONLY THE 00589 M00S00568.scrsim +++|* FIRST 30 WILL BE PROCESSED. ALL OTHERS WILL BE 00590 M00S00569.scrsim +++|* IGNORED. 00591 M00S00570.scrsim +++| 00592 M00S00571.scrsim +++|** CLP - CLEAR BITS IN HOLDING REGISTERS. 00593 M00S00572.scrsim +++|* 00594 M00S00573.scrsim +++|* EXIT BITS CLEARED IN HOLDING REGISTER. 00595 M00S00574.scrsim +++|* BITS DISPLAYED ON *K* DISPLAY. 00596 M00S00575.scrsim +++|* 00597 M00S00576.scrsim +++|* USES X - 0, 1, 2, 6. 00598 M00S00577.scrsim +++|* B - 6, 7. 00599 M00S00578.scrsim +++|* A - 0, 1, 2, 6. 00600 M00S00579.scrsim +++|* 00601 M00S00580.scrsim +++|* CALLS GPV, CBV. 00602 M00S00581.scrsim +++| 00603 M00S00582.scrsim +++| 00604 M00S00583.scrsim +++| DATA 0 RETURN ADDRESS 00605 M00S00584.scrsim +++| CLP BSS 0 00606 M00S00585.scrsim +++| SA2 I 00607 M00S00586.scrsim +++| SB6 B0+ 00608 M00S00587.scrsim +++| LX2 36 00609 M00S00588.scrsim +++| SA0 B0 00610 M00S00589.scrsim +++| MX0 -6 00611 M00S00590.scrsim +++| BX6 -X0*X2 00612 M00S00591.scrsim +++| SX1 X6-1R) 00613 M00S00592.scrsim +++| ZR X1,CLP4 IF *)* 00614 M00S00593.scrsim +++| SX1 X6-1R. 00615 M00S00594.scrsim +++| ZR X1,CLP4 IF *.* 00616 M00S00595.scrsim +++| SB6 6 CHARACTER COUNTER 00617 M00S00596.scrsim +++| 00618 M00S00597.scrsim +++|* GET BIT NUMBERS. 00619 M00S00598.scrsim +++| 00620 M00S00599.scrsim +++| CLP1 RJ GPV GET PARAMETER VALUE 00621 M00S00600.scrsim +++| ZR X1,CLP5 IF ERROR 00622 M00S00601.scrsim +++| SA6 PARA+A0 00623 M00S00602.scrsim +++| SA0 A0+B1 CHECK FOR MAXIMUM NUMBER OF PARAMETERS 00624 M00S00603.scrsim +++| SX0 A0 00625 M00S00604.scrsim +++| SX6 X1-1R) 00626 M00S00605.scrsim +++| ZR X6,CLP3 IF *)* 00627 M00S00606.scrsim +++| SX6 X1-1R. 00628 M00S00607.scrsim +++| ZR X6,CLP3 IF *.* 00629 M00S00608.scrsim +++| SX0 X0-MNOP 00630 M00S00609.scrsim +++| ZR X0,CLP2 IF MAXIMUM NUMBER OF PARAMETERS 00631 M00S00610.scrsim +++| EQ CLP1 00632 M00S00611.scrsim +++| 00633 M00S00612.scrsim +++| CLP2 MOVE 3,CLPA,MSGL *MAXIMUM NUMBER OF ARGUMENTS.* 00634 M00S00613.scrsim +++| MOVE 3,CLPA,MSGK 00635 M00S00614.scrsim +++| CLP3 SB6 A0+ NUMBER OF BITS SPECIFIED 00636 M00S00615.scrsim +++| SA0 UHLD 00637 M00S00616.scrsim +++| SA1 REGF 00638 M00S00617.scrsim +++| ZR X1,CLP4 IF CHANNEL 16 REGISTER 00639 M00S00618.scrsim +++| SA0 LHLD 00640 M00S00619.scrsim +++| CLP4 SX0 B1 SET CLEAR BIT FLAG 00641 M00S00620.scrsim +++| RJ CBV CHANGE BIT VALUES 00642 M00S00621.scrsim +++| CLP5 SA1 CLP-1 GET RETURN ADDRESS 00643 M00S00622.scrsim +++| SB7 X1+ 00644 M00S00623.scrsim +++| JP B7 00645 M00S00624.scrsim +++| 00646 M00S00625.scrsim +++| CLPA DIS 3,MAXIMUM NUMBER OF ARGUMENTS. 00647 M00S00626.scrsim +++| BSSZ 1 00648 M00S00627.scrsim +++| CYP SPACE 4,25 00649 M00S00628.scrsim +++|*** CYCLE,X,T,R. 00650 M00S00629.scrsim +++|* SET BIT X EVERY T PERIODS A TOTAL OF R TIMES. X IS 00651 M00S00630.scrsim +++|* THE BIT NUMBER (0-203) AND R THE NUMBER OF TIMES TO 00652 M00S00631.scrsim +++|* SET THE BIT. R MAY NOT EXCEED 4095. T IS THE 00653 M00S00632.scrsim +++|* NUMBER OF TIME PERIODS FOR EACH CYCLE, ONE PERIOD 00654 M00S00633.scrsim +++|* BEING 16 MILLISECONDS. T=32 IS APPROXIMATELY ONE HALF 00655 M00S00634.scrsim +++|* SECOND. THIS COMMAND ASSUMES CONTROL OF THE 00656 M00S00635.scrsim +++|* SIMULATOR FOR THE TOTAL TIME PERIOD SPECIFIED, AND 00657 M00S00636.scrsim +++|* NO COMMAND WILL BE ACCEPTED EXCEPT *END*. BIT X 00658 M00S00637.scrsim +++|* IS SET IN THE HOLDING REGISTER BY THIS COMMAND. 00659 M00S00638.scrsim +++|* 00660 M00S00639.scrsim +++|* END. 00661 M00S00640.scrsim +++|* END *CYCLE* COMMAND PROCESSING BEFORE R HAS BEEN 00662 M00S00641.scrsim +++|* REACHED. CONTROL OF THE SIMULATOR IS RETURNED TO 00663 M00S00642.scrsim +++|* THE OPERATOR. 00664 M00S00643.scrsim +++| 00665 M00S00644.scrsim +++|** CYP - CYCLE BIT AT GIVEN INTERVAL. 00666 M00S00645.scrsim +++|* 00667 M00S00646.scrsim +++|* EXIT BIT SET ON *K* DISPLAY. 00668 M00S00647.scrsim +++|* 00669 M00S00648.scrsim +++|* USES X - 0, 1, 2, 3, 5, 6, 7. 00670 M00S00649.scrsim +++|* B - 6, 7. 00671 M00S00650.scrsim +++|* A - 0, 1, 2, 3, 5, 6, 7. 00672 M00S00651.scrsim +++|* 00673 M00S00652.scrsim +++|* CALLS GPV, DYL, DEB, SSR. 00674 M00S00653.scrsim +++| 00675 M00S00654.scrsim +++| 00676 M00S00655.scrsim +++| DATA 0 RETURN ADDRESS 00677 M00S00656.scrsim +++| CYP BSS 0 00678 M00S00657.scrsim +++| SA2 I 00679 M00S00658.scrsim +++| SB6 6 CHARACTER COUNT 00680 M00S00659.scrsim +++| LX2 36 00681 M00S00660.scrsim +++| MX0 -6 00682 M00S00661.scrsim +++| BX6 -X0*X2 00683 M00S00662.scrsim +++| SX7 X6-1R) 00684 M00S00663.scrsim +++| ZR X7,CYP2 IF *)* 00685 M00S00664.scrsim +++| SX7 X6-1R. 00686 M00S00665.scrsim +++| ZR X7,CYP2 IF *.* 00687 M00S00666.scrsim +++| SA0 3 00688 M00S00667.scrsim +++| CYP1 RJ GPV GET PARAMETER VALUE 00689 M00S00668.scrsim +++| ZR X1,CYP11 IF ERROR 00690 M00S00669.scrsim +++| SA0 A0-B1 00691 M00S00670.scrsim +++| SX0 A0 00692 M00S00671.scrsim +++| SA6 PARA+A0 SAVE PARAMETER 00693 M00S00672.scrsim +++| ZR X0,CYP3 IF ALL PARAMETERS FOUND 00694 M00S00673.scrsim +++| SX6 X1-1R) 00695 M00S00674.scrsim +++| ZR X6,CYP2 IF *)* TERMINATOR 00696 M00S00675.scrsim +++| SX6 X1-1R. 00697 M00S00676.scrsim +++| ZR X6,CYP2 IF *.* TERMINATOR 00698 M00S00677.scrsim +++| EQ CYP1 00699 M00S00678.scrsim +++| 00700 M00S00679.scrsim +++| CYP2 MOVE 3,CYPA,MSGL *NOT ENOUGH ARGUMENTS.* 00701 M00S00680.scrsim +++| MOVE 3,CYPA,MSGK 00702 M00S00681.scrsim +++| EQ CYP11 00703 M00S00682.scrsim +++| 00704 M00S00683.scrsim +++| CYP3 SA5 PARA+2 BIT NUMBER 00705 M00S00684.scrsim +++| SX7 X5-NBIT 00706 M00S00685.scrsim +++| NG X7,CYP4 IF LEGAL BIT NUMBER
| Line S00686 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00707 M01S00686.v23l617 ---| MOVE 3,CYPB,MSGL *ILLEGAL BIT NUMBER.*
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00708 M01S00017.v23l617 +++| MOVE 3,CYPB,MSGL *INCORRECT BIT NUMBER.* 00709 M00S00687.scrsim +++| MOVE 3,CYPB,MSGK 00710 M00S00688.scrsim +++| EQ CYP11 00711 M00S00689.scrsim +++| 00712 M00S00690.scrsim +++|* SET BIT IN HOLDING REGISTER. 00713 M00S00691.scrsim +++| 00714 M00S00692.scrsim +++| CYP4 SA0 UHLD 00715 M00S00693.scrsim +++| SA1 REGF 00716 M00S00694.scrsim +++| ZR X1,CYP5 IF CHANNEL 16 REGISTER 00717 M00S00695.scrsim +++| SA0 LHLD 00718 M00S00696.scrsim +++| CYP5 SX7 60 00719 M00S00697.scrsim +++| SX6 X5+ 00720 M00S00698.scrsim +++| SA6 CYPI SAVE BIT NUMBER 00721 M00S00699.scrsim +++| IX7 X6/X7 WORD NUMBER 00722 M00S00700.scrsim +++| SB7 X7+ 00723 M00S00701.scrsim +++| SA0 A0+B7 SET WORD ADDRESS 00724 M00S00702.scrsim +++| SX6 60 00725 M00S00703.scrsim +++| IX6 X6*X7 00726 M00S00704.scrsim +++| IX6 X5-X6 BIT ORDINAL IN WORD 00727 M00S00705.scrsim +++| MX0 59 00728 M00S00706.scrsim +++| SB7 X6 00729 M00S00707.scrsim +++| LX0 B7 00730 M00S00708.scrsim +++| SA1 A0 GET HOLDING WORD 00731 M00S00709.scrsim +++| SX7 B1 00732 M00S00710.scrsim +++| LX7 B7 00733 M00S00711.scrsim +++| BX1 X0*X1 00734 M00S00712.scrsim +++| BX6 X7+X1 SET BIT 00735 M00S00713.scrsim +++| SA6 A0+ 00736 M00S00714.scrsim +++| RJ DYL DISPLAY LINE 00737 M00S00715.scrsim +++| 00738 M00S00716.scrsim +++|* GET TIME PARAMETERS. 00739 M00S00717.scrsim +++| 00740 M00S00718.scrsim +++| SA5 PARA+1 TIME INTERVAL 00741 M00S00719.scrsim +++| SX6 X5+ 00742 M00S00720.scrsim +++| SA6 CYPE SAVE INTERVAL 00743 M00S00721.scrsim +++| SA5 A5-B1 NUMBER OF CYCLES 00744 M00S00722.scrsim +++| BX7 X5 00745 M00S00723.scrsim +++| SX5 X5-4096 00746 M00S00724.scrsim +++| PL X5,CYP17 IF NUMBER TOO LARGE 00747 M00S00725.scrsim +++| 00748 M00S00726.scrsim +++|* SEND SET BIT TO STATUS AND CONTROL REGISTER. 00749 M00S00727.scrsim +++| 00750 M00S00728.scrsim +++| CYP6 SA7 CYPF SAVE NUMBER OF CYCLES 00751 M00S00729.scrsim +++| SA1 REGF 00752 M00S00730.scrsim +++| SX6 5 00753 M00S00731.scrsim +++| IX5 X1*X6 00754 M00S00732.scrsim +++| LX1 59 00755 M00S00733.scrsim +++| SA2 CYPI 00756 M00S00734.scrsim +++| SX7 4000B 00757 M00S00735.scrsim +++| BX7 X2+X7 BIT NUMBER AND SET BIT CODE 00758 M00S00736.scrsim +++| LX7 12 00759 M00S00737.scrsim +++| BX6 X1+X7 SET BIT 59 IF CHANNEL 36 00760 M00S00738.scrsim +++| SA6 PW16+X5 SET PARAMETER WORD 00761 M00S00739.scrsim +++| SA0 A6+ 00762 M00S00740.scrsim +++| SA1 CYPE 00763 M00S00741.scrsim +++| SX6 X1-32 00764 M00S00742.scrsim +++| NG X6,CYP13 IF INTERVAL LESS THAN HALF SECOND 00765 M00S00743.scrsim +++| CYP7 RJ SSR SEND SYSTEM REQUEST
| Line S00744 Modification History | |
|---|---|
M01 (Removed by) | ns2052 |
Seq # *Modification Id* Act ----------------------------+ 00766 M01S00744.ns2052 ---| NZ X6,CYP12 IF ERROR 00767 M00S00745.scrsim +++| RTIME CYPG 00768 M00S00746.scrsim +++| SA5 CYPF 00769 M00S00747.scrsim +++| SX5 X5-1 00770 M00S00748.scrsim +++| ZR X5,CYP10 IF TIME LIMIT UP 00771 M00S00749.scrsim +++| SA1 I 00772 M00S00750.scrsim +++| SA2 =5LCYCLE 00773 M00S00751.scrsim +++| BX6 X1-X2 00774 M00S00752.scrsim +++| MX0 30 00775 M00S00753.scrsim +++| BX6 X0*X6 00776 M00S00754.scrsim +++| ZR X6,CYP8 IF NO INPUT ENTERED 00777 M00S00755.scrsim +++| MX0 18 00778 M00S00756.scrsim +++| SA2 =3LEND 00779 M00S00757.scrsim +++| BX6 X1-X2 00780 M00S00758.scrsim +++| BX6 X0*X6 00781 M00S00759.scrsim +++| ZR X6,CYP16 IF *END* 00782 M00S00760.scrsim +++| MOVE 3,CYPJ,MSGL *CYCLE STILL PROCESSING.* 00783 M00S00761.scrsim +++| MOVE 3,CYPJ,MSGK 00784 M00S00762.scrsim +++| 00785 M00S00763.scrsim +++|* LOOP FOR TIME INTERVAL. 00786 M00S00764.scrsim +++| 00787 M00S00765.scrsim +++| CYP8 RTIME CYPH 00788 M00S00766.scrsim +++| SA1 CYPE 00789 M00S00767.scrsim +++| SA2 CYPG GET REAL TIME 00790 M00S00768.scrsim +++| MX7 -32 00791 M00S00769.scrsim +++| AX2 4 00792 M00S00770.scrsim +++| SA3 CYPH GET PRESENT TIME 00793 M00S00771.scrsim +++| BX2 -X7*X2 00794 M00S00772.scrsim +++| AX3 4 00795 M00S00773.scrsim +++| BX3 -X7*X3 00796 M00S00774.scrsim +++| IX3 X3-X2 00797 M00S00775.scrsim +++| IX3 X3-X1 00798 M00S00776.scrsim +++| PL X3,CYP9 IF TIME TO RESET BIT 00799 M00S00777.scrsim +++| RJ DCR DISPLAY CONTENTS OF REGISTER 00800 M00S00778.scrsim +++| RECALL 00801 M00S00779.scrsim +++| EQ CYP8 00802 M00S00780.scrsim +++| 00803 M00S00781.scrsim +++| CYP9 SA5 CYPF DECREMENT NUMBER OF CYCLES 00804 M00S00782.scrsim +++| SX6 X5-1 00805 M00S00783.scrsim +++| SA6 A5 00806 M00S00784.scrsim +++| EQ CYP7 00807 M00S00785.scrsim +++| 00808 M00S00786.scrsim +++| CYP10 MOVE 3,CYPD,MSGL *TIME LIMIT UP.* 00809 M00S00787.scrsim +++| MOVE 3,CYPD,MSGK 00810 M00S00788.scrsim +++| CYP11 RJ DCR DISPLAY CONTENTS OF REGISTER 00811 M00S00789.scrsim +++| SA1 CYP-1 GET RETURN ADDRESS 00812 M00S00790.scrsim +++| SB7 X1+ 00813 M00S00791.scrsim +++| JP B7 00814 M00S00792.scrsim +++|
| Line S00793 Modification History | |
|---|---|
M01 (Removed by) | ns2052 |
Seq # *Modification Id* Act ----------------------------+ 00815 M01S00793.ns2052 ---| CYP12 BX7 -X0*X1 CLEAR ERROR 00816 M01S00794.ns2052 ---| SA7 A1 00817 M01S00795.ns2052 ---| LX6 12 00818 M01S00796.ns2052 ---| SX1 X6 00819 M01S00797.ns2052 ---| RJ COD CONSTANT TO OCTAL DISPLAY CODE 00820 M01S00798.ns2052 ---| BX6 X4 STORE LEFT JUSTIFIED CODE 00821 M01S00799.ns2052 ---| SA6 CYPK+1 00822 M01S00800.ns2052 ---| MOVE 3,CYPK,MSGL *HFM ERROR N* 00823 M01S00801.ns2052 ---| MOVE 3,CYPK,MSGK 00824 M01S00802.ns2052 ---| EQ CYP11 00825 M01S00803.ns2052 ---| 00826 M00S00804.scrsim +++|* PROCESS FUNCTION WITH INTERVAL LESS THAN HALF SECOND. 00827 M00S00805.scrsim +++| 00828 M00S00806.scrsim +++| CYP13 SX1 B1 SET LESS THAN HALF SECOND FLAG 00829 M00S00807.scrsim +++| LX1 58-0 00830 M00S00808.scrsim +++| SA2 CYPE 00831 M00S00809.scrsim +++| LX2 36 00832 M00S00810.scrsim +++| SA3 CYPF 00833 M00S00811.scrsim +++| LX3 24 00834 M00S00812.scrsim +++| BX6 X2+X3 TIME INTERVAL AND LIMIT 00835 M00S00813.scrsim +++| BX6 X1+X6 00836 M00S00814.scrsim +++| SA1 A6 GET PARAMETER WORD 00837 M00S00815.scrsim +++| BX7 X1+X6 00838 M00S00816.scrsim +++| SA7 A6 00839 M00S00817.scrsim +++| RJ SSR SEND SYSTEM REQUEST
| Line S00818 Modification History | |
|---|---|
M01 (Removed by) | ns2052 |
Seq # *Modification Id* Act ----------------------------+ 00840 M01S00818.ns2052 ---| NZ X6,CYP12 IF ERROR 00841 M00S00819.scrsim +++| CYP14 SA1 A0 GET PARAMETER WORD 00842 M00S00820.scrsim +++| LX1 59-58 00843 M00S00821.scrsim +++| PL X1,CYP10 IF TIME LIMIT UP 00844 M00S00822.scrsim +++| SA1 I 00845 M00S00823.scrsim +++| SA2 =5LCYCLE 00846 M00S00824.scrsim +++| BX6 X1-X2 00847 M00S00825.scrsim +++| MX0 30 00848 M00S00826.scrsim +++| BX6 X0*X6 00849 M00S00827.scrsim +++| ZR X6,CYP15 IF NO INPUT ENTERED 00850 M00S00828.scrsim +++| SA2 =3LEND 00851 M00S00829.scrsim +++| BX6 X1-X2 00852 M00S00830.scrsim +++| MX0 18 00853 M00S00831.scrsim +++| BX6 X0*X6 00854 M00S00832.scrsim +++| ZR X6,CYP16 IF *END* 00855 M00S00833.scrsim +++| MOVE 3,CYPJ,MSGL *CYCLE STILL PROCESSING.* 00856 M00S00834.scrsim +++| MOVE 3,CYPJ,MSGK 00857 M00S00835.scrsim +++| CYP15 RECALL 00858 M00S00836.scrsim +++| EQ CYP14 00859 M00S00837.scrsim +++| 00860 M00S00838.scrsim +++|* PROCESS *END* COMMAND. 00861 M00S00839.scrsim +++| 00862 M00S00840.scrsim +++| CYP16 MOVE 5,I,PARL DISPLAY COMMAND 00863 M00S00841.scrsim +++| MOVE 5,I,PARK 00864 M00S00842.scrsim +++| MOVE 4,BLNK,PARL+1 00865 M00S00843.scrsim +++| MOVE 4,BLNK,PARK+1 00866 M00S00844.scrsim +++| MESSAGE I,3 ENTER COMMAND IN JOB DAYFILE 00867 M00S00845.scrsim +++| MOVE 3,BLNK,MSGL CLEAR ANY ERROR MESSAGE 00868 M00S00846.scrsim +++| MOVE 3,BLNK,MSGK 00869 M00S00847.scrsim +++| MX0 59 CLEAR HALF SECOND INTERVAL FLAG 00870 M00S00848.scrsim +++| LX0 58 00871 M00S00849.scrsim +++| SA1 A0 00872 M00S00850.scrsim +++| BX6 X0*X1 00873 M00S00851.scrsim +++| SA6 A1+ 00874 M00S00852.scrsim +++| RECALL 00875 M00S00853.scrsim +++| EQ CYP11 00876 M00S00854.scrsim +++| 00877 M00S00855.scrsim +++| CYP17 MOVE 3,CYPC,MSGL *NUMBER OF CYCLES TOO LARGE.* 00878 M00S00856.scrsim +++| MOVE 3,CYPC,MSGK 00879 M00S00857.scrsim +++| EQ CYP11 00880 M00S00858.scrsim +++| 00881 M00S00859.scrsim +++| CYPA DIS 3,NOT ENOUGH ARGUMENTS. 00882 M00S00860.scrsim +++| BSSZ 1
| Line S00861 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00883 M01S00861.v23l617 ---| CYPB DIS 3,ILLEGAL BIT NUMBER.
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00884 M01S00018.v23l617 +++| CYPB DIS 3,INCORRECT BIT NUMBER. 00885 M00S00862.scrsim +++| BSSZ 1 00886 M00S00863.scrsim +++| CYPC DIS 3,NUMBER OF CYCLES TOO LARGE. 00887 M00S00864.scrsim +++| BSSZ 1 00888 M00S00865.scrsim +++| CYPD DIS 3,TIME LIMIT UP. 00889 M00S00866.scrsim +++| BSSZ 1 00890 M00S00867.scrsim +++| CYPE BSSZ 1 TIME INTERVAL 00891 M00S00868.scrsim +++| CYPF BSSZ 1 NUMBER OF CYCLES 00892 M00S00869.scrsim +++| CYPG BSSZ 1 REAL TIME 00893 M00S00870.scrsim +++| CYPH BSSZ 1 REAL TIME COMPARE 00894 M00S00871.scrsim +++| CYPI BSSZ 1 BIT NUMBER 00895 M00S00872.scrsim +++| CYPJ DIS 3,CYCLE STILL PROCESSING. 00896 M00S00873.scrsim +++| BSSZ 1
| Line S00874 Modification History | |
|---|---|
M01 (Removed by) | ns2052 |
Seq # *Modification Id* Act ----------------------------+ 00897 M01S00874.ns2052 ---| CYPK DIS 3,HFM ERROR 00898 M01S00875.ns2052 ---| BSSZ 1 00899 M00S00876.scrsim +++| GOP SPACE 4,15 00900 M00S00877.scrsim +++|*** GO. 00901 M00S00878.scrsim +++|* THIS COMMAND CAUSES THE CONTENTS OF THE HOLDING 00902 M00S00879.scrsim +++|* REGISTERS TO BE TRANSFERRED TO THE ACTUAL STATUS 00903 M00S00880.scrsim +++|* AND CONTROL REGISTERS OR INTERLOCK REGISTER. NO 00904 M00S00881.scrsim +++|* BITS ARE CHANGED IN VALUE IN THE HOLDING REGISTERS 00905 M00S00882.scrsim +++|* BY THIS COMMAND. 00906 M00S00883.scrsim +++| 00907 M00S00884.scrsim +++|** GOP - TRANSFER HOLDING REGISTERS TO S/C REGISTERS. 00908 M00S00885.scrsim +++|* 00909 M00S00886.scrsim +++|* EXIT HOLDING REGISTERS TRANSFERRED TO PROPER STATUS AND 00910 M00S00887.scrsim +++|* CONTROL REGISTER. 00911 M00S00888.scrsim +++|*
| Line S00889 Modification History | |
|---|---|
M01 (Removed by) | ns2052 |
Seq # *Modification Id* Act ----------------------------+ 00912 M01S00889.ns2052 ---|* USES X - 0, 1, 6.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2052 |
Seq # *Modification Id* Act ----------------------------+ 00913 M01S00001.ns2052 +++|* USES X - 1, 6. 00914 M00S00890.scrsim +++|* B - 7. 00915 M00S00891.scrsim +++|* A - 1, 6. 00916 M00S00892.scrsim +++| 00917 M00S00893.scrsim +++| 00918 M00S00894.scrsim +++| DATA 0 RETURN ADDRESS 00919 M00S00895.scrsim +++| GOP BSS 0 00920 M00S00896.scrsim +++| SA1 CA 00921 M00S00897.scrsim +++| NZ X1,GOP1 IF CHANNEL 36 NOT AVAILABLE 00922 M00S00898.scrsim +++| 00923 M00S00899.scrsim +++|* SEND CHANNEL 36 DATA TO *HFM*. 00924 M00S00900.scrsim +++| 00925 M00S00901.scrsim +++| SX6 B1 SET CHANNEL 36 FLAG IN PARAMETER WORD 00926 M00S00902.scrsim +++| LX6 59-0 00927 M00S00903.scrsim +++| SA6 PW36 00928 M00S00904.scrsim +++| SYSTEM HFM,R,PW36,0
| Line S00905 Modification History | |
|---|---|
M01 (Removed by) | ns2052 |
Seq # *Modification Id* Act ----------------------------+ 00929 M01S00905.ns2052 ---| SA1 PW36 CHECK FOR ERROR 00930 M01S00906.ns2052 ---| MX0 10 00931 M01S00907.ns2052 ---| LX0 -2 00932 M01S00908.ns2052 ---| BX6 X0*X1 00933 M01S00909.ns2052 ---| ZR X6,GOP1 IF NO ERROR 00934 M01S00910.ns2052 ---| BX7 -X0*X1 CLEAR ERROR 00935 M01S00911.ns2052 ---| SA7 A1+ 00936 M01S00912.ns2052 ---| LX6 12 00937 M01S00913.ns2052 ---| SX1 X6 00938 M01S00914.ns2052 ---| RJ COD CONSTANT TO OCTAL DISPLAY CODE 00939 M01S00915.ns2052 ---| BX6 X4 STORE LEFT JUSTIFIED CODE 00940 M01S00916.ns2052 ---| SA6 GOPA+1 00941 M01S00917.ns2052 ---| MOVE 3,GOPA,MSGL *HFM ERROR N* 00942 M01S00918.ns2052 ---| MOVE 3,GOPA,MSGK 00943 M01S00919.ns2052 ---| EQ GOP2 00944 M00S00920.scrsim +++| 00945 M00S00921.scrsim +++|* SEND CHANNEL 16 DATA TO *HFM*. 00946 M00S00922.scrsim +++| 00947 M00S00923.scrsim +++| GOP1 SX6 B0+ CLEAR PARAMETER WORD 00948 M00S00924.scrsim +++| SA6 PW16 00949 M00S00925.scrsim +++| SYSTEM HFM,R,PW16,0
| Line S00926 Modification History | |
|---|---|
M01 (Removed by) | ns2052 |
Seq # *Modification Id* Act ----------------------------+ 00950 M01S00926.ns2052 ---| SA1 PW16 CHECK FOR ERROR 00951 M01S00927.ns2052 ---| MX0 10 00952 M01S00928.ns2052 ---| LX0 -2 00953 M01S00929.ns2052 ---| BX6 X0*X1 00954 M01S00930.ns2052 ---| ZR X6,GOP2 IF NO ERROR 00955 M01S00931.ns2052 ---| BX7 -X0*X1 CLEAR ERROR 00956 M01S00932.ns2052 ---| SA7 A1+ 00957 M01S00933.ns2052 ---| LX6 12 00958 M01S00934.ns2052 ---| SX1 X6 00959 M01S00935.ns2052 ---| RJ COD CONSTANT TO OCTAL DISPLAY CODE 00960 M01S00936.ns2052 ---| BX6 X4 STORE LEFT JUSTIFIED CODE 00961 M01S00937.ns2052 ---| SA6 GOPA+1 00962 M01S00938.ns2052 ---| MOVE 3,GOPA,MSGL *HFM ERROR N* 00963 M01S00939.ns2052 ---| MOVE 3,GOPA,MSGK 00964 M01S00940.ns2052 ---| GOP2 SA1 GOP-1 GET RETURN ADDRESS
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2052 |
Seq # *Modification Id* Act ----------------------------+ 00965 M01S00002.ns2052 +++| SA1 GOP-1 GET RETURN ADDRESS 00966 M00S00941.scrsim +++| SB7 X1+ 00967 M00S00942.scrsim +++| JP B7
| Line S00943 Modification History | |
|---|---|
M01 (Removed by) | ns2052 |
Seq # *Modification Id* Act ----------------------------+ 00968 M01S00943.ns2052 ---| 00969 M01S00944.ns2052 ---| GOPA DIS 3,HFM ERROR 00970 M01S00945.ns2052 ---| BSSZ 1 00971 M00S00946.scrsim +++| LIP SPACE 4,16 00972 M00S00947.scrsim +++|*** LINE,X,Y. 00973 M00S00948.scrsim +++|* SET LINE X OF THE HOLDING REGISTER TO THE OCTAL 00974 M00S00949.scrsim +++|* VALUE Y. Y MAY BE UP TO 60 BITS OF OCTAL VALUE. 00975 M00S00950.scrsim +++|* X IS THE LINE NUMBER (0-3) FROM THE LEFT DISPLAY 00976 M00S00951.scrsim +++|* SCREEN, LINE 0 AT THE TOP, AND LINE 3 AT THE BOTTOM. 00977 M00S00952.scrsim +++| 00978 M00S00953.scrsim +++|** LIP - SET HOLDING REGISTER LINE TO OCTAL VALUE. 00979 M00S00954.scrsim +++|* 00980 M00S00955.scrsim +++|* EXIT SPECIFIED LINE SET TO OCTAL VALUE IN HOLDING REGISTER. 00981 M00S00956.scrsim +++|* VALUE DISPLAYED ON *K* DISPLAY. 00982 M00S00957.scrsim +++|* 00983 M00S00958.scrsim +++|* USES X - 0, 1, 2, 6, 7. 00984 M00S00959.scrsim +++|* B - 6, 7. 00985 M00S00960.scrsim +++|* A - 0, 1, 2, 6. 00986 M00S00961.scrsim +++|* 00987 M00S00962.scrsim +++|* CALLS GPV, GOV, DYL. 00988 M00S00963.scrsim +++| 00989 M00S00964.scrsim +++| 00990 M00S00965.scrsim +++| DATA 0 RETURN ADDRESS 00991 M00S00966.scrsim +++| LIP BSS 0 00992 M00S00967.scrsim +++| SA2 I 00993 M00S00968.scrsim +++| SB6 5 CHARACTER COUNTER 00994 M00S00969.scrsim +++| LX2 30 00995 M00S00970.scrsim +++| MX0 -6 00996 M00S00971.scrsim +++| BX6 -X0*X2 00997 M00S00972.scrsim +++| SX7 X6-1R) 00998 M00S00973.scrsim +++| ZR X7,LIP4 IF *)* 00999 M00S00974.scrsim +++| SX7 X6-1R. 01000 M00S00975.scrsim +++| ZR X7,LIP4 IF *.* 01001 M00S00976.scrsim +++| 01002 M00S00977.scrsim +++|* GET LINE NUMBER AND OCTAL VALUE. 01003 M00S00978.scrsim +++| 01004 M00S00979.scrsim +++| RJ GPV GET PARAMETER VALUE 01005 M00S00980.scrsim +++| ZR X1,LIP2 IF ERROR 01006 M00S00981.scrsim +++| SX7 X6-4
| Line S00982 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01007 M01S00982.v23l617 ---| PL X7,LIP3 IF ILLEGAL LINE NUMBER
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01008 M01S00019.v23l617 +++| PL X7,LIP3 IF INCORRECT LINE NUMBER 01009 M00S00983.scrsim +++| SX7 X1-1R) 01010 M00S00984.scrsim +++| ZR X7,LIP4 IF *)* TERMINATOR 01011 M00S00985.scrsim +++| SX7 X1-1R. 01012 M00S00986.scrsim +++| ZR X7,LIP4 IF *.* TERMINATOR 01013 M00S00987.scrsim +++| SA1 REGF 01014 M00S00988.scrsim +++| SA0 UHLD 01015 M00S00989.scrsim +++| ZR X1,LIP1 IF CHANNEL 16 REGISTER 01016 M00S00990.scrsim +++| SA0 LHLD 01017 M00S00991.scrsim +++| LIP1 SB7 X6 01018 M00S00992.scrsim +++| SA0 A0+B7 LINE ADDRESS 01019 M00S00993.scrsim +++| RJ GOV GET OCTAL VALUE 01020 M00S00994.scrsim +++| ZR X2,LIP2 IF ERROR 01021 M00S00995.scrsim +++| NZ B4,LIP5 IF TOO MANY BITS 01022 M00S00996.scrsim +++| 01023 M00S00997.scrsim +++|* INSERT VALUE INTO HOLDING REGISTER. 01024 M00S00998.scrsim +++| 01025 M00S00999.scrsim +++| SA1 GOVA GET VALUE 01026 M00S01000.scrsim +++| BX6 X1 01027 M00S01001.scrsim +++| SA6 A0 01028 M00S01002.scrsim +++| RJ DYL DISPLAY LINE 01029 M00S01003.scrsim +++| LIP2 SA1 LIP-1 GET RETURN ADDRESS 01030 M00S01004.scrsim +++| SB7 X1+ 01031 M00S01005.scrsim +++| JP B7 01032 M00S01006.scrsim +++|
| Line S01007 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01033 M01S01007.v23l617 ---| LIP3 MOVE 3,LIPA,MSGL *ILLEGAL LINE NUMBER.*
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01034 M01S00020.v23l617 +++| LIP3 MOVE 3,LIPA,MSGL *INCORRECT LINE NUMBER.* 01035 M00S01008.scrsim +++| MOVE 3,LIPA,MSGK 01036 M00S01009.scrsim +++| EQ LIP2 01037 M00S01010.scrsim +++| 01038 M00S01011.scrsim +++| LIP4 MOVE 3,LIPB,MSGL *NOT ENOUGH ARGUMENTS.* 01039 M00S01012.scrsim +++| MOVE 3,LIPB,MSGK 01040 M00S01013.scrsim +++| EQ LIP2 01041 M00S01014.scrsim +++| 01042 M00S01015.scrsim +++| LIP5 MOVE 3,LIPC,MSGL *TOO MANY BITS SPECIFIED.* 01043 M00S01016.scrsim +++| MOVE 3,LIPC,MSGK 01044 M00S01017.scrsim +++| EQ LIP2 01045 M00S01018.scrsim +++|
| Line S01019 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01046 M01S01019.v23l617 ---| LIPA DIS 3,ILLEGAL LINE NUMBER.
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01047 M01S00021.v23l617 +++| LIPA DIS 3,INCORRECT LINE NUMBER. 01048 M00S01020.scrsim +++| BSSZ 1 01049 M00S01021.scrsim +++| LIPB DIS 3,NOT ENOUGH ARGUMENTS. 01050 M00S01022.scrsim +++| BSSZ 1 01051 M00S01023.scrsim +++| LIPC DIS 3,TOO MANY BITS SPECIFIED. 01052 M00S01024.scrsim +++| BSSZ 1 01053 M00S01025.scrsim +++| REP SPACE 4,20 01054 M00S01026.scrsim +++|*** READ. 01055 M00S01027.scrsim +++|* READ THE ACTUAL CONTENTS OF THE S/C REGISTER (OR 01056 M00S01028.scrsim +++|* INTERLOCK REGISTER) ON THE CURRENT CHANNEL INTO THE 01057 M00S01029.scrsim +++|* HOLDING REGISTER. 01058 M00S01030.scrsim +++| 01059 M00S01031.scrsim +++|** REP - READ CURRENT CONTENTS OF S/C OR INTERLOCK REGISTER. 01060 M00S01032.scrsim +++|* 01061 M00S01033.scrsim +++|* EXIT ACTUAL CONTENTS OF S/C REGISTER (OR INTERLOCK REGISTER) 01062 M00S01034.scrsim +++|* ON THE CURRENT CHANNEL SET IN HOLDING REGISTER. 01063 M00S01035.scrsim +++|* 01064 M00S01036.scrsim +++|* USES X - 1, 7. 01065 M00S01037.scrsim +++|* B - 6, 7. 01066 M00S01038.scrsim +++|* A - 0, 1. 01067 M00S01039.scrsim +++|* 01068 M00S01040.scrsim +++|* CALLS DYL, RDR. 01069 M00S01041.scrsim +++| 01070 M00S01042.scrsim +++| 01071 M00S01043.scrsim +++| DATA 0 RETURN ADDRESS 01072 M00S01044.scrsim +++| REP BSS 0 01073 M00S01045.scrsim +++| SX7 UHLD SET HOLDING REGISTER ADDRESS 01074 M00S01046.scrsim +++| SA1 REGF 01075 M00S01047.scrsim +++| ZR X1,REP1 IF CHANNEL 16 01076 M00S01048.scrsim +++| SX7 LHLD SET CHANNEL 36 HOLDING REGISTER ADDRESS 01077 M00S01049.scrsim +++| REP1 RJ RDR READ REGISTER CONTENTS 01078 M00S01050.scrsim +++| SB6 3 01079 M00S01051.scrsim +++| REP2 SA1 RDRB SET LINE ADDRESS 01080 M00S01052.scrsim +++| SA0 X1+B6 01081 M00S01053.scrsim +++| RJ DYL DISPLAY LINE 01082 M00S01054.scrsim +++| SB6 B6-B1 01083 M00S01055.scrsim +++| PL B6,REP2 IF NOT END OF REGISTER 01084 M00S01056.scrsim +++| SA1 REP-1 GET RETURN ADDRESS 01085 M00S01057.scrsim +++| SB7 X1+ 01086 M00S01058.scrsim +++| JP B7 RETURN 01087 M00S01059.scrsim +++| SEP SPACE 4,15 01088 M00S01060.scrsim +++|*** SET,A,B,...,Z. 01089 M00S01061.scrsim +++|* SET BITS A,B,...,Z IN THE HOLDING REGISTER, WHERE 01090 M00S01062.scrsim +++|* A,B,...,Z ARE BIT NUMBERS (0-203). DECIMAL VALUES 01091 M00S01063.scrsim +++|* ARE ASSUMED, BUT EACH MAY HAVE A POSTRADIX OF D OR B. 01092 M00S01064.scrsim +++|* IF MORE THAN 30 BIT NUMBERS ARE ENTERED, ONLY THE 01093 M00S01065.scrsim +++|* FIRST 30 WILL BE PROCESSED. ALL OTHERS WILL BE 01094 M00S01066.scrsim +++|* IGNORED. 01095 M00S01067.scrsim +++| 01096 M00S01068.scrsim +++|** SEP - SET BITS IN HOLDING REGISTERS. 01097 M00S01069.scrsim +++|* 01098 M00S01070.scrsim +++|* EXIT BITS SET IN HOLDING REGISTER. 01099 M00S01071.scrsim +++|* BITS DISPLAYED ON *K* DISPLAY. 01100 M00S01072.scrsim +++|* 01101 M00S01073.scrsim +++|* USES X - 0, 1, 2, 6. 01102 M00S01074.scrsim +++|* B - 6, 7. 01103 M00S01075.scrsim +++|* A - 0, 1, 2, 6. 01104 M00S01076.scrsim +++|* 01105 M00S01077.scrsim +++|* CALLS GPV, CBV. 01106 M00S01078.scrsim +++| 01107 M00S01079.scrsim +++| 01108 M00S01080.scrsim +++| DATA 0 RETURN ADDRESS 01109 M00S01081.scrsim +++| SEP BSS 0 01110 M00S01082.scrsim +++| SA2 I 01111 M00S01083.scrsim +++| SB6 B0+ 01112 M00S01084.scrsim +++| LX2 24 01113 M00S01085.scrsim +++| SA0 B0 01114 M00S01086.scrsim +++| MX0 -6 01115 M00S01087.scrsim +++| BX6 -X0*X2 01116 M00S01088.scrsim +++| SX1 X6-1R) 01117 M00S01089.scrsim +++| ZR X1,SEP4 IF *)* 01118 M00S01090.scrsim +++| SX1 X6-1R. 01119 M00S01091.scrsim +++| ZR X1,SEP4 IF *.* 01120 M00S01092.scrsim +++| SB6 4 CHARACTER COUNTER 01121 M00S01093.scrsim +++| 01122 M00S01094.scrsim +++|* GET BIT NUMBERS. 01123 M00S01095.scrsim +++| 01124 M00S01096.scrsim +++| SEP1 RJ GPV GET PARAMETER VALUE 01125 M00S01097.scrsim +++| ZR X1,SEP5 IF ERROR 01126 M00S01098.scrsim +++| SA6 PARA+A0 01127 M00S01099.scrsim +++| SA0 A0+B1 CHECK FOR MAXIMUM NUMBER OF PARAMETERS 01128 M00S01100.scrsim +++| SX0 A0 01129 M00S01101.scrsim +++| SX6 X1-1R) 01130 M00S01102.scrsim +++| ZR X6,SEP3 IF *)* 01131 M00S01103.scrsim +++| SX6 X1-1R. 01132 M00S01104.scrsim +++| ZR X6,SEP3 IF *.* 01133 M00S01105.scrsim +++| SX0 X0-MNOP 01134 M00S01106.scrsim +++| ZR X0,SEP2 IF MAXIMUM NUMBER OF PARAMETERS 01135 M00S01107.scrsim +++| EQ SEP1 01136 M00S01108.scrsim +++| 01137 M00S01109.scrsim +++| SEP2 MOVE 3,SEPA,MSGL *MAXIMUM NUMBER OF ARGUMENTS.* 01138 M00S01110.scrsim +++| MOVE 3,SEPA,MSGK 01139 M00S01111.scrsim +++| SEP3 SB6 A0+ NUMBER OF BITS SPECIFIED 01140 M00S01112.scrsim +++| SA0 UHLD 01141 M00S01113.scrsim +++| SA1 REGF 01142 M00S01114.scrsim +++| ZR X1,SEP4 IF CHANNEL 16 REGISTER 01143 M00S01115.scrsim +++| SA0 LHLD 01144 M00S01116.scrsim +++| SEP4 SX0 B0 SET SET BIT FLAG 01145 M00S01117.scrsim +++| RJ CBV CHANGE BIT VALUES 01146 M00S01118.scrsim +++| SEP5 SA1 SEP-1 GET RETURN ADDRESS 01147 M00S01119.scrsim +++| SB7 X1+ 01148 M00S01120.scrsim +++| JP B7 01149 M00S01121.scrsim +++| 01150 M00S01122.scrsim +++| SEPA DIS 3,MAXIMUM NUMBER OF ARGUMENTS. 01151 M00S01123.scrsim +++| BSSZ 1 01152 M00S01124.scrsim +++| STP SPACE 4,4 01153 M00S01125.scrsim +++|*** STOP. 01154 M00S01126.scrsim +++|* THIS COMMAND CAUSES THE SIMULATOR TO END PROCESSING. 01155 M00S01127.scrsim +++| 01156 M00S01128.scrsim +++|** STP - END SIMULATOR. 01157 M00S01129.scrsim +++| 01158 M00S01130.scrsim +++| 01159 M00S01131.scrsim +++| DATA 0 RETURN ADDRESS 01160 M00S01132.scrsim +++| STP BSS 0 01161 M00S01133.scrsim +++| MESSAGE STPA *END SIMULATOR.* 01162 M00S01134.scrsim +++| WRITEF OT CAUSE DAYFILE TO PRINT 01163 M00S01135.scrsim +++| ENDRUN 01164 M00S01136.scrsim +++| 01165 M00S01137.scrsim +++| STPA DIS 3, END SIMULATOR. 01166 M00S01138.scrsim +++| TOP SPACE 4,18 01167 M00S01139.scrsim +++|*** +. 01168 M00S01140.scrsim +++|* THIS COMMAND TOGGLES THE *K* DISPLAY BETWEEN THE 01169 M00S01141.scrsim +++|* CHANNEL 16 AND CHANNEL 36 REGISTER DISPLAYS AND ALSO 01170 M00S01142.scrsim +++|* CHANGES THE REGISTER CURRENTLY BEING WORKED ON IF 01171 M00S01143.scrsim +++|* THE SIMULATOR IS BEING OPERATED ON A CYBER 170 WITH 01172 M00S01144.scrsim +++|* TWO S/C REGISTERS. OTHERWISE, NO ACTION IS TAKEN. 01173 M00S01145.scrsim +++|* THE CHANNEL 16 REGISTER IS ASSUMED WHEN THE SIMULATOR 01174 M00S01146.scrsim +++|* BEGINS. THE REGISTER CURRENTLY DISPLAYED IS THE 01175 M00S01147.scrsim +++|* HOLDING REGISTER WHICH THE OTHER COMMANDS AFFECT. 01176 M00S01148.scrsim +++| 01177 M00S01149.scrsim +++|** TOP - TOGGLE REGISTER IN USE. 01178 M00S01150.scrsim +++|* 01179 M00S01151.scrsim +++|* EXIT REGISTER IN USE FLAG TOGGLED. 01180 M00S01152.scrsim +++|* *K* DISPLAY CHANGED TO REFLECT REGISTER BEING USED. 01181 M00S01153.scrsim +++|* 01182 M00S01154.scrsim +++|* USES X - 0, 1, 2, 6, 7. 01183 M00S01155.scrsim +++|* B - 7. 01184 M00S01156.scrsim +++|* A - 1, 2, 6, 7. 01185 M00S01157.scrsim +++| 01186 M00S01158.scrsim +++| 01187 M00S01159.scrsim +++| DATA 0 RETURN ADDRESS 01188 M00S01160.scrsim +++| TOP BSS 0 01189 M00S01161.scrsim +++| MX0 42 01190 M00S01162.scrsim +++| SA2 K CLEAR LEFT SCREEN FIELD 01191 M00S01163.scrsim +++| BX2 X0*X2 01192 M00S01164.scrsim +++| SA1 REGF 01193 M00S01165.scrsim +++| ZR X1,TOP1 IF CHANNEL 16 IN USE 01194 M00S01166.scrsim +++| 01195 M00S01167.scrsim +++|* CHANGE TO CHANNEL 16 DISPLAY FROM CHANNEL 36. 01196 M00S01168.scrsim +++| 01197 M00S01169.scrsim +++| SX7 L16 SET CHANNEL 16 DISPLAY ADDRESS 01198 M00S01170.scrsim +++| BX7 X2+X7 01199 M00S01171.scrsim +++| SA7 A2 01200 M00S01172.scrsim +++| CONSOLE K TOGGLE DISPLAY 01201 M00S01173.scrsim +++| SX6 B0+ SET CHANNEL 16 REGISTER 01202 M00S01174.scrsim +++| SA6 REGF 01203 M00S01175.scrsim +++| EQ TOP2 01204 M00S01176.scrsim +++| 01205 M00S01177.scrsim +++|* CHANGE TO CHANNEL 36 DISPLAY IF AVAILABLE. 01206 M00S01178.scrsim +++| 01207 M00S01179.scrsim +++| TOP1 SA1 CA 01208 M00S01180.scrsim +++| NZ X1,TOP2 IF CHANNEL 36 NOT AVAILABLE 01209 M00S01181.scrsim +++| SX7 L36 SET CHANNEL 36 DISPLAY ADDRESS 01210 M00S01182.scrsim +++| BX7 X2+X7 01211 M00S01183.scrsim +++| SA7 A2 01212 M00S01184.scrsim +++| CONSOLE K TOGGLE DISPLAY 01213 M00S01185.scrsim +++| SX6 B1+ SET CHANNEL 36 REGISTER 01214 M00S01186.scrsim +++| SA6 REGF 01215 M00S01187.scrsim +++| TOP2 SA1 TOP-1 GET RETURN ADDRESS 01216 M00S01188.scrsim +++| SB7 X1+ 01217 M00S01189.scrsim +++| JP B7 01218 M00S01190.scrsim +++| CBV TITLE SECONDARY SUBROUTINES. 01219 M00S01191.scrsim +++|** CBV - CHANGE BIT VALUES. 01220 M00S01192.scrsim +++|* 01221 M00S01193.scrsim +++|* ENTRY (A0) = REGISTER ADDRESS. 01222 M00S01194.scrsim +++|* (X0) = SET/CLEAR BIT FLAG. 01223 M00S01195.scrsim +++|* (B6) = NUMBER OF BITS SPECIFIED. 01224 M00S01196.scrsim +++|* BIT NUMBERS UNPACKED INTO PARA. 01225 M00S01197.scrsim +++|* 01226 M00S01198.scrsim +++|* EXIT SPECIFIED BITS CHANGED IN VALUE. 01227 M00S01199.scrsim +++|* CHANGED BITS DISPLAYED ON *K* DISPLAY. 01228 M00S01200.scrsim +++|* 01229 M00S01201.scrsim +++|* USES X - 1, 6, 7. 01230 M00S01202.scrsim +++|* B - 6, 7. 01231 M00S01203.scrsim +++|* A - 0, 1, 6, 7. 01232 M00S01204.scrsim +++|* 01233 M00S01205.scrsim +++|* CALLS DYL. 01234 M00S01206.scrsim +++| 01235 M00S01207.scrsim +++| 01236 M00S01208.scrsim +++| CBV SUBR ENTRY/EXIT 01237 M00S01209.scrsim +++| SX7 X0+ SAVE FLAG 01238 M00S01210.scrsim +++| SA7 CBVC 01239 M00S01211.scrsim +++| NZ B6,CBV1 IF BITS SPECIFIED 01240 M00S01212.scrsim +++| MOVE 3,CBVA,MSGL *NO BITS SPECIFIED.* 01241 M00S01213.scrsim +++| MOVE 3,CBVA,MSGK 01242 M00S01214.scrsim +++| EQ CBVX 01243 M00S01215.scrsim +++| 01244 M00S01216.scrsim +++|* GET BIT NUMBER. 01245 M00S01217.scrsim +++| 01246 M00S01218.scrsim +++| CBV1 SX7 PARA ADDRESS OF FIRST PARAMETER 01247 M00S01219.scrsim +++| SA7 CBVD 01248 M00S01220.scrsim +++| SX6 A0+ SAVE REGISTER ADDRESS 01249 M00S01221.scrsim +++| SA6 CBVE 01250 M00S01222.scrsim +++| CBV2 SA1 X7+ BIT NUMBER 01251 M00S01223.scrsim +++| SX7 X1-NBIT 01252 M00S01224.scrsim +++| NG X7,CBV3 IF LEGAL BIT NUMBER
| Line S01225 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01253 M01S01225.v23l617 ---| MOVE 3,CBVB,MSGL *ILLEGAL BIT NUMBER.*
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01254 M01S00022.v23l617 +++| MOVE 3,CBVB,MSGL *INCORRECT BIT NUMBER.* 01255 M00S01226.scrsim +++| MOVE 3,CBVB,MSGK 01256 M00S01227.scrsim +++| EQ CBVX 01257 M00S01228.scrsim +++| 01258 M00S01229.scrsim +++|* FIND CORRECT BIT AND SET/CLEAR IT. 01259 M00S01230.scrsim +++| 01260 M00S01231.scrsim +++| CBV3 SX6 60 01261 M00S01232.scrsim +++| SX7 X1 01262 M00S01233.scrsim +++| IX7 X7/X6 WORD NUMBER 01263 M00S01234.scrsim +++| SX6 60 01264 M00S01235.scrsim +++| IX6 X7*X6 01265 M00S01236.scrsim +++| IX6 X1-X6 BIT ORDINAL IN WORD 01266 M00S01237.scrsim +++| SB7 X7 01267 M00S01238.scrsim +++| SA0 A0+B7 WORD ADDRESS 01268 M00S01239.scrsim +++| SA1 A0 01269 M00S01240.scrsim +++| SB7 X6+ 01270 M00S01241.scrsim +++| MX6 59 01271 M00S01242.scrsim +++| LX6 B7 SET UP MASK 01272 M00S01243.scrsim +++| BX7 X6*X1 CLEAR BIT 01273 M00S01244.scrsim +++| SA1 CBVC 01274 M00S01245.scrsim +++| NZ X1,CBV4 IF CLEAR BIT 01275 M00S01246.scrsim +++| SX6 B1+ SET BIT 01276 M00S01247.scrsim +++| LX6 B7 01277 M00S01248.scrsim +++| IX7 X6+X7 01278 M00S01249.scrsim +++| CBV4 SA7 A0 STORE BIT 01279 M00S01250.scrsim +++| RJ DYL DISPLAY LINE 01280 M00S01251.scrsim +++| SB6 B6-B1 01281 M00S01252.scrsim +++| SA1 CBVD SET NEXT PARAMETER ADDRESS 01282 M00S01253.scrsim +++| SX7 X1+B1 01283 M00S01254.scrsim +++| SA7 A1 01284 M00S01255.scrsim +++| SA1 CBVE RESET REGISTER ADDRESS 01285 M00S01256.scrsim +++| SA0 X1 01286 M00S01257.scrsim +++| NZ B6,CBV2 IF NOT END OF PARAMETERS 01287 M00S01258.scrsim +++| EQ CBVX 01288 M00S01259.scrsim +++| 01289 M00S01260.scrsim +++| CBVA DIS 3,NO BITS SPECIFIED. 01290 M00S01261.scrsim +++| BSSZ 1
| Line S01262 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01291 M01S01262.v23l617 ---| CBVB DIS 3,ILLEGAL BIT NUMBER.
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01292 M01S00023.v23l617 +++| CBVB DIS 3,INCORRECT BIT NUMBER. 01293 M00S01263.scrsim +++| BSSZ 1 01294 M00S01264.scrsim +++| CBVC BSSZ 1 SET/CLEAR FLAG 01295 M00S01265.scrsim +++| CBVD BSSZ 1 PARAMETER ADDRESS 01296 M00S01266.scrsim +++| CBVE BSSZ 1 REGISTER ADDRESS 01297 M00S01267.scrsim +++| CDC SPACE 4,8 01298 M00S01268.scrsim +++|** CDC - CONVERT TEN BITS TO DISPLAY CODE. 01299 M00S01269.scrsim +++|* 01300 M00S01270.scrsim +++|* ENTRY (X1) = TEN BITS RIGHT JUSTIFIED. 01301 M00S01271.scrsim +++|* 01302 M00S01272.scrsim +++|* EXIT (X6) = DISPLAY CODED WORD. 01303 M00S01273.scrsim +++|* 01304 M00S01274.scrsim +++|* USES X - 0, 1, 4, 6, 7. 01305 M00S01275.scrsim +++|* B - 7. 01306 M00S01276.scrsim +++| 01307 M00S01277.scrsim +++| 01308 M00S01278.scrsim +++| CDC SUBR ENTRY/EXIT 01309 M00S01279.scrsim +++| BX4 X4-X4 CLEAR ASSEMBLY 01310 M00S01280.scrsim +++| MX0 -1 01311 M00S01281.scrsim +++| SB7 10 01312 M00S01282.scrsim +++| 01313 M00S01283.scrsim +++|* CONVERT ONE BIT AT A TIME TO DISPLAY CODE. 01314 M00S01284.scrsim +++| 01315 M00S01285.scrsim +++| CDC1 BX7 -X0*X1 GET BIT 01316 M00S01286.scrsim +++| LX4 -6 01317 M00S01287.scrsim +++| SX6 X7+1R0 CONVERT BIT TO DISPLAY CODE 01318 M00S01288.scrsim +++| AX1 1 01319 M00S01289.scrsim +++| BX4 X6+X4 ADD TO ASSEMBLY 01320 M00S01290.scrsim +++| SB7 B7-B1 01321 M00S01291.scrsim +++| NZ B7,CDC1 IF NOT TEN BITS 01322 M00S01292.scrsim +++| LX4 -6 01323 M00S01293.scrsim +++| BX6 X4 01324 M00S01294.scrsim +++| EQ CDCX 01325 M00S01295.scrsim +++| GOV SPACE 4,14 01326 M00S01296.scrsim +++|** GOV - GET OCTAL VALUE. 01327 M00S01297.scrsim +++|* 01328 M00S01298.scrsim +++|* ENTRY (A2) = CHARACTER WORD ADDRESS. 01329 M00S01299.scrsim +++|* (X2) = CHARACTER WORD, NEXT CHARACTER LEFT JUSTIFIED. 01330 M00S01300.scrsim +++|* (B6) = CHARACTER COUNT. 01331 M00S01301.scrsim +++|* 01332 M00S01302.scrsim +++|* EXIT (B4) = NUMBER OF FULL CM WORDS OF VALUE. 01333 M00S01303.scrsim +++|* (B7) = NUMBER OF BITS IN LAST WORD OF VALUE. 01334 M00S01304.scrsim +++|* (X2) = 0 IF ERROR. 01335 M00S01305.scrsim +++|* VALUE STORED IN GOVA - GOVA+3. 01336 M00S01306.scrsim +++|* 01337 M00S01307.scrsim +++|* USES X - 0, 2, 3, 4, 6, 7. 01338 M00S01308.scrsim +++|* B - 4, 5, 6, 7. 01339 M00S01309.scrsim +++|* A - 2, 6, 7. 01340 M00S01310.scrsim +++| 01341 M00S01311.scrsim +++| 01342 M00S01312.scrsim +++| GOV SUBR ENTRY/EXIT 01343 M00S01313.scrsim +++| BX6 X6-X6 CLEAR VALUE BUFFER 01344 M00S01314.scrsim +++| SA6 GOVA 01345 M00S01315.scrsim +++| SA6 A6+B1 01346 M00S01316.scrsim +++| SA6 A6+B1 01347 M00S01317.scrsim +++| SA6 A6+B1 01348 M00S01318.scrsim +++| MX0 -6 01349 M00S01319.scrsim +++| BX4 X4-X4 CLEAR ASSEMBLY 01350 M00S01320.scrsim +++| MX0 -6 01351 M00S01321.scrsim +++| SB7 B0 DIGIT COUNTER 01352 M00S01322.scrsim +++| SB4 B0+ WORD COUNTER 01353 M00S01323.scrsim +++| EQ GOV2 01354 M00S01324.scrsim +++| 01355 M00S01325.scrsim +++|* CHECK NEXT CHARACTER. 01356 M00S01326.scrsim +++| 01357 M00S01327.scrsim +++| GOV1 SB6 B6+B1 01358 M00S01328.scrsim +++| SB5 10 01359 M00S01329.scrsim +++| SB5 B6-B5 01360 M00S01330.scrsim +++| NZ B5,GOV2 IF NOT END OF WORD 01361 M00S01331.scrsim +++| SA2 A2+B1 GET NEXT WORD 01362 M00S01332.scrsim +++| SB6 B0 RESET COUNTER 01363 M00S01333.scrsim +++| GOV2 LX2 6 01364 M00S01334.scrsim +++| BX6 -X0*X2 01365 M00S01335.scrsim +++| SX7 X6-1R0 01366 M00S01336.scrsim +++| NG X7,GOV5 IF ALPHABETIC CHARACTER 01367 M00S01337.scrsim +++| SX7 X6-1R8 01368 M00S01338.scrsim +++| NG X7,GOV3 IF OCTAL NUMERIC 01369 M00S01339.scrsim +++| SX7 X6-1R+ 01370 M00S01340.scrsim +++| NG X7,GOV5 IF 8 OR 9 01371 M00S01341.scrsim +++| SX7 X6-1R 01372 M00S01342.scrsim +++| ZR X7,GOV1 IF SPACE 01373 M00S01343.scrsim +++| SX7 X6-1R#
| Line S01344 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01374 M01S01344.v23l617 ---| PL X7,GOV5 IF ILLEGAL CHARACTER
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01375 M01S00024.v23l617 +++| PL X7,GOV5 IF INCORRECT CHARACTER 01376 M00S01345.scrsim +++| BX7 X4 01377 M00S01346.scrsim +++| SB5 B7+B4 01378 M00S01347.scrsim +++| ZR B5,GOVX IF DEFAULT VALUE 01379 M00S01348.scrsim +++| SA7 GOVA+B4 SAVE VALUE 01380 M00S01349.scrsim +++| LX3 57 01381 M00S01350.scrsim +++| SB5 B0 01382 M00S01351.scrsim +++| NG X3,GOV6 IF 3 BIT DIGIT 01383 M00S01352.scrsim +++| LX3 1 01384 M00S01353.scrsim +++| SB5 B1 01385 M00S01354.scrsim +++| NG X3,GOV6 IF 2 BIT DIGIT 01386 M00S01355.scrsim +++| SB5 B5+B1 01387 M00S01356.scrsim +++| EQ GOV6 01388 M00S01357.scrsim +++| 01389 M00S01358.scrsim +++|* ASSEMBLE OCTAL VALUE. 01390 M00S01359.scrsim +++| 01391 M00S01360.scrsim +++| GOV3 SX6 X6-1R0 CONVERT TO BINARY 01392 M00S01361.scrsim +++| LX4 3 01393 M00S01362.scrsim +++| BX4 X4+X6 ADD TO ASSEMBLY 01394 M00S01363.scrsim +++| NZ B7,GOV4 IF NOT FIRST DIGIT OF WORD 01395 M00S01364.scrsim +++| NZ B4,GOV4 IF NOT FIRST WORD 01396 M00S01365.scrsim +++| SX3 X6+ SAVE FIRST DIGIT 01397 M00S01366.scrsim +++| GOV4 SB7 B7+3 01398 M00S01367.scrsim +++| SB5 B7-60 01399 M00S01368.scrsim +++| NZ B5,GOV1 IF NOT A FULL WORD 01400 M00S01369.scrsim +++| BX7 X4 SAVE VALUE 01401 M00S01370.scrsim +++| SB7 B0 01402 M00S01371.scrsim +++| SA7 GOVA+B4 01403 M00S01372.scrsim +++| SB4 B4+B1 01404 M00S01373.scrsim +++| BX4 X4-X4 CLEAR ASSEMBLY 01405 M00S01374.scrsim +++| EQ GOV1 01406 M00S01375.scrsim +++|
| Line S01376 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01407 M01S01376.v23l617 ---| GOV5 MOVE 3,GOVB,MSGL *ILLEGAL CHARACTER.*
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01408 M01S00025.v23l617 +++| GOV5 MOVE 3,GOVB,MSGL *INCORRECT CHARACTER.* 01409 M00S01377.scrsim +++| MOVE 3,GOVB,MSGK 01410 M00S01378.scrsim +++| SX2 B0 01411 M00S01379.scrsim +++| EQ GOVX 01412 M00S01380.scrsim +++| 01413 M00S01381.scrsim +++|* ADJUST NUMBER OF BITS IN VALUE. 01414 M00S01382.scrsim +++| 01415 M00S01383.scrsim +++| GOV6 NZ B7,GOV7 IF NOT EXACTLY A FULL LAST WORD 01416 M00S01384.scrsim +++| SB7 60 01417 M00S01385.scrsim +++| SB4 B4-B1 01418 M00S01386.scrsim +++| GOV7 SB7 B7-B5 ADJUST NUMBER OF BITS 01419 M00S01387.scrsim +++| EQ GOVX 01420 M00S01388.scrsim +++| 01421 M00S01389.scrsim +++| GOVA BSS 4 VALUE
| Line S01390 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01422 M01S01390.v23l617 ---| GOVB DIS 3,ILLEGAL CHARACTER.
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01423 M01S00026.v23l617 +++| GOVB DIS 3,INCORRECT CHARACTER. 01424 M00S01391.scrsim +++| BSSZ 1 01425 M00S01392.scrsim +++| GPV SPACE 4,17 01426 M00S01393.scrsim +++|** GPV - GET PARAMETER VALUE. 01427 M00S01394.scrsim +++|* 01428 M00S01395.scrsim +++|* ENTRY (A2) = CHARACTER WORD ADDRESS. 01429 M00S01396.scrsim +++|* (X2) = CHARACTER WORD, NEXT CHARACTER LEFT JUSTIFIED. 01430 M00S01397.scrsim +++|* (B6) = CHARACTER COUNT. 01431 M00S01398.scrsim +++|* 01432 M00S01399.scrsim +++|* EXIT (X1) = SEPARATOR OR 0 IF ERROR. 01433 M00S01400.scrsim +++|* (X2) = CHARACTER LINE. 01434 M00S01401.scrsim +++|* (A2) = CHARACTER LINE ADDRESS. 01435 M00S01402.scrsim +++|* (B6) = CHARACTER COUNT. 01436 M00S01403.scrsim +++|* (X6) = PARAMETER BINARY VALUE. 01437 M00S01404.scrsim +++|* 01438 M00S01405.scrsim +++|* USES X - 0, 1, 2, 3, 5, 6, 7. 01439 M00S01406.scrsim +++|* B - 4, 5, 6, 7. 01440 M00S01407.scrsim +++|* A - 1, 2, 3, 5, 6. 01441 M00S01408.scrsim +++|* 01442 M00S01409.scrsim +++|* CALLS DXB. 01443 M00S01410.scrsim +++| 01444 M00S01411.scrsim +++| 01445 M00S01412.scrsim +++| GPV SUBR ENTRY/EXIT 01446 M00S01413.scrsim +++| SB4 B0+ 01447 M00S01414.scrsim +++| BX5 X5-X5 CLEAR ASSEMBLY WORD 01448 M00S01415.scrsim +++| MX0 -6 01449 M00S01416.scrsim +++| 01450 M00S01417.scrsim +++|* CHECK NEXT CHARACTER. 01451 M00S01418.scrsim +++| 01452 M00S01419.scrsim +++| GPV1 LX2 6 01453 M00S01420.scrsim +++| BX6 -X0*X2 01454 M00S01421.scrsim +++| SX7 X6-1RB 01455 M00S01422.scrsim +++| ZR X7,GPV3 IF POSTRADIX *B* 01456 M00S01423.scrsim +++| SX7 X6-1RD 01457 M00S01424.scrsim +++| ZR X7,GPV3 IF POSTRADIX *D* 01458 M00S01425.scrsim +++| SX7 X6-1R0 01459 M00S01426.scrsim +++| NG X7,GPV7 IF ALPHABETIC CHARACTER 01460 M00S01427.scrsim +++| SX7 X6-1R+ 01461 M00S01428.scrsim +++| NG X7,GPV3 IF NUMERIC 01462 M00S01429.scrsim +++| SX7 X6-1R 01463 M00S01430.scrsim +++| ZR X7,GPV2 IF SPACE 01464 M00S01431.scrsim +++| SX7 X6-1R#
| Line S01432 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01465 M01S01432.v23l617 ---| PL X7,GPV7 IF ILLEGAL CHARACTER
| Line S00027 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01466 M01S00027.v23l617 +++| PL X7,GPV7 IF INCORRECT CHARACTER 01467 M00S01433.scrsim +++| NZ B4,GPV4 IF NOT EMPTY STRING 01468 M00S01434.scrsim +++| SA5 =1L0 SET DEFAULT VALUE 01469 M00S01435.scrsim +++| EQ GPV5 01470 M00S01436.scrsim +++| 01471 M00S01437.scrsim +++| GPV2 SB6 B6+B1 01472 M00S01438.scrsim +++| SB5 10 01473 M00S01439.scrsim +++| SB5 B6-B5 01474 M00S01440.scrsim +++| NZ B5,GPV1 IF NOT END OF WORD 01475 M00S01441.scrsim +++| SA2 A2+B1 GET NEXT WORD 01476 M00S01442.scrsim +++| SB6 B0 RESET COUNTER 01477 M00S01443.scrsim +++| EQ GPV1 01478 M00S01444.scrsim +++| 01479 M00S01445.scrsim +++|* ASSEMBLE PARAMETER. 01480 M00S01446.scrsim +++| 01481 M00S01447.scrsim +++| GPV3 LX5 6 ADD CHARACTER TO ASSEMBLY 01482 M00S01448.scrsim +++| BX5 X6+X5 01483 M00S01449.scrsim +++| SB4 B4+1 01484 M00S01450.scrsim +++| EQ GPV2 01485 M00S01451.scrsim +++| 01486 M00S01452.scrsim +++| GPV4 LX5 -6 LEFT JUSTIFY NUMBER 01487 M00S01453.scrsim +++| SB4 B4-B1 01488 M00S01454.scrsim +++| NZ B4,GPV4 IF NOT LEFT JUSTIFIED 01489 M00S01455.scrsim +++| GPV5 SA6 GPVA SAVE SEPARATOR 01490 M00S01456.scrsim +++| BX6 X2 SAVE CHARACTER LINE 01491 M00S01457.scrsim +++| SB7 B1 ASSUME DECIMAL 01492 M00S01458.scrsim +++| SA6 GPVB 01493 M00S01459.scrsim +++| RJ DXB DISPLAY CODE TO BINARY 01494 M00S01460.scrsim +++| ZR X4,GPV6 IF NO ERROR 01495 M00S01461.scrsim +++| MOVE 3,GPVC,MSGL *CONVERSION ERROR.* 01496 M00S01462.scrsim +++| MOVE 3,GPVC,MSGK 01497 M00S01463.scrsim +++| SX1 B0 01498 M00S01464.scrsim +++| EQ GPVX 01499 M00S01465.scrsim +++| 01500 M00S01466.scrsim +++|* SET EXIT CONDITIONS. 01501 M00S01467.scrsim +++| 01502 M00S01468.scrsim +++| GPV6 SA1 GPVA RESTORE SEPARATOR 01503 M00S01469.scrsim +++| SA3 GPVB RESTORE CHARACTER LINE 01504 M00S01470.scrsim +++| BX2 X3 01505 M00S01471.scrsim +++| SB6 B6+B1 01506 M00S01472.scrsim +++| SB5 B6-10 01507 M00S01473.scrsim +++| NZ B5,GPVX IF NOT END OF WORD 01508 M00S01474.scrsim +++| SA2 A2+B1 GET NEXT WORD 01509 M00S01475.scrsim +++| SB6 B0 RESET COUNTER 01510 M00S01476.scrsim +++| EQ GPVX 01511 M00S01477.scrsim +++|
| Line S01478 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01512 M01S01478.v23l617 ---| GPV7 MOVE 3,GPVD,MSGL *ILLEGAL CHARACTER.*
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01513 M01S00028.v23l617 +++| GPV7 MOVE 3,GPVD,MSGL *INCORRECT CHARACTER.* 01514 M00S01479.scrsim +++| MOVE 3,GPVD,MSGK 01515 M00S01480.scrsim +++| SX1 B0 01516 M00S01481.scrsim +++| EQ GPVX 01517 M00S01482.scrsim +++| 01518 M00S01483.scrsim +++| GPVA BSSZ 1 SEPARATOR 01519 M00S01484.scrsim +++| GPVB BSSZ 1 CHARACTER LINE 01520 M00S01485.scrsim +++| GPVC DIS 3,CONVERSION ERROR. 01521 M00S01486.scrsim +++| BSSZ 1
| Line S01487 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01522 M01S01487.v23l617 ---| GPVD DIS 3,ILLEGAL CHARACTER.
| Line S00029 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01523 M01S00029.v23l617 +++| GPVD DIS 3,INCORRECT CHARACTER. 01524 M00S01488.scrsim +++| BSSZ 1 01525 M00S01489.scrsim +++| RDR SPACE 4,20 01526 M00S01490.scrsim +++|** RDR - READ REGISTER CONTENTS. 01527 M00S01491.scrsim +++|* 01528 M00S01492.scrsim +++|* ENTRY (X7) = ADDRESS OF DATA BUFFER. 01529 M00S01493.scrsim +++|* ACTUAL CONTENTS OF S/C REGISTER (OR INTERLOCK REGISTER) 01530 M00S01494.scrsim +++|* READ INTO BUFFER. 01531 M00S01495.scrsim +++|* 01532 M00S01496.scrsim +++|* EXIT (RDRB) = ADDRESS OF DATA BUFFER. 01533 M00S01497.scrsim +++|* 01534 M00S01498.scrsim +++|* USES X - 0, 1, 2, 5, 6, 7. 01535 M00S01499.scrsim +++|* B - 7. 01536 M00S01500.scrsim +++|* A - 0, 1, 6, 7. 01537 M00S01501.scrsim +++|* 01538 M00S01502.scrsim +++|* CALLS SSR. 01539 M00S01503.scrsim +++| 01540 M00S01504.scrsim +++| 01541 M00S01505.scrsim +++| RDR SUBR ENTRY/EXIT 01542 M00S01506.scrsim +++| SA7 RDRB SAVE BUFFER ADDRESS 01543 M00S01507.scrsim +++| SX6 B0+ SET READ FUNCTION 01544 M00S01508.scrsim +++| SA6 RDRA 01545 M00S01509.scrsim +++| RDR1 SA1 RDRB SET BUFFER ADDRESS 01546 M00S01510.scrsim +++| SA0 X1+ 01547 M00S01511.scrsim +++| SA1 REGF 01548 M00S01512.scrsim +++| ZR X1,RDR2 IF CHANNEL 16 01549 M00S01513.scrsim +++| 01550 M00S01514.scrsim +++|* READ CHANNEL 36 REGISTER CONTENTS. 01551 M00S01515.scrsim +++| 01552 M00S01516.scrsim +++| MX7 1 SET CHANNEL 36 FLAG 01553 M00S01517.scrsim +++| LX6 12 MERGE IN FUNCTION REQUEST 01554 M00S01518.scrsim +++| BX7 X6+X7 01555 M00S01519.scrsim +++| SA7 PW36 01556 M00S01520.scrsim +++| RJ SSR SEND SYSTEM REQUEST
| Line S01521 Modification History | |
|---|---|
M01 (Removed by) | ns2052 |
Seq # *Modification Id* Act ----------------------------+ 01557 M01S01521.ns2052 ---| NZ X6,RDR1 IF ERROR 01558 M00S01522.scrsim +++| SA1 PW36 GET REPLY 01559 M00S01523.scrsim +++| MX0 -12 01560 M00S01524.scrsim +++| BX6 -X0*X1 01561 M00S01525.scrsim +++| EQ RDR3 SET VALUE IN HOLDING REGISTER 01562 M00S01526.scrsim +++| 01563 M00S01527.scrsim +++|* READ CHANNEL 16 REGISTER CONTENTS. 01564 M00S01528.scrsim +++| 01565 M00S01529.scrsim +++| RDR2 LX6 12 SET FUNCTION REQUEST 01566 M00S01530.scrsim +++| SA6 PW16 01567 M00S01531.scrsim +++| RJ SSR SEND SYSTEM REQUEST
| Line S01532 Modification History | |
|---|---|
M01 (Removed by) | ns2052 |
Seq # *Modification Id* Act ----------------------------+ 01568 M01S01532.ns2052 ---| NZ X6,RDR1 IF ERROR 01569 M00S01533.scrsim +++| SA1 PW16 GET REPLY 01570 M00S01534.scrsim +++| MX0 -12 01571 M00S01535.scrsim +++| BX6 -X0*X1 01572 M00S01536.scrsim +++| 01573 M00S01537.scrsim +++|* SET VALUE IN HOLDING REGISTER. 01574 M00S01538.scrsim +++| 01575 M00S01539.scrsim +++| RDR3 SX7 5 01576 M00S01540.scrsim +++| SA1 RDRA GET BYTE NUMBER 01577 M00S01541.scrsim +++| SX5 X1 01578 M00S01542.scrsim +++| IX7 X1/X7 WORD NUMBER 01579 M00S01543.scrsim +++| SB7 X7 01580 M00S01544.scrsim +++| SA0 A0+B7 SET WORD ADDRESS 01581 M00S01545.scrsim +++| SX1 5 01582 M00S01546.scrsim +++| IX7 X1*X7 01583 M00S01547.scrsim +++| IX1 X5-X7 BYTE ORDINAL IN WORD 01584 M00S01548.scrsim +++| SX5 12 FORM SHIFT COUNT 01585 M00S01549.scrsim +++| IX7 X1*X5 01586 M00S01550.scrsim +++| SB7 X7 01587 M00S01551.scrsim +++| SA1 A0 GET HOLDING WORD 01588 M00S01552.scrsim +++| MX0 48 01589 M00S01553.scrsim +++| BX6 -X0*X6 01590 M00S01554.scrsim +++| LX0 B7 FORM MASK 01591 M00S01555.scrsim +++| LX6 B7 01592 M00S01556.scrsim +++| BX7 X0*X1 01593 M00S01557.scrsim +++| BX7 X6+X7 INSERT VALUE 01594 M00S01558.scrsim +++| SA7 A0 01595 M00S01559.scrsim +++| SA1 RDRA INCREMENT BYTE NUMBER 01596 M00S01560.scrsim +++| SX6 X1+B1 01597 M00S01561.scrsim +++| SA6 A1 01598 M00S01562.scrsim +++| SX7 X6-17 01599 M00S01563.scrsim +++| NG X7,RDR1 IF NOT END OF REGISTER 01600 M00S01564.scrsim +++| EQ RDRX RETURN 01601 M00S01565.scrsim +++| 01602 M00S01566.scrsim +++| RDRA CON 0 READ FUNCTION CODE 01603 M00S01567.scrsim +++| RDRB CON 0 DATA BUFFER ADDRESS 01604 M00S01568.scrsim +++| SSR SPACE 4,7 01605 M00S01569.scrsim +++|** SSR - SEND SYSTEM REQUEST FOR CYCLE OR READ. 01606 M00S01570.scrsim +++|* 01607 M00S01571.scrsim +++|* EXIT SYSTEM REQUEST MADE.
| Line S01572 Modification History | |
|---|---|
M01 (Removed by) | ns2052 |
Seq # *Modification Id* Act ----------------------------+ 01608 M01S01572.ns2052 ---|* (X6) .NE. 0 IF ERROR. 01609 M00S01573.scrsim +++|*
| Line S01574 Modification History | |
|---|---|
M01 (Removed by) | ns2052 |
Seq # *Modification Id* Act ----------------------------+ 01610 M01S01574.ns2052 ---|* USES X - 0, 1, 6.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2052 |
Seq # *Modification Id* Act ----------------------------+ 01611 M01S00003.ns2052 +++|* USES X - 1. 01612 M00S01575.scrsim +++|* A - 1.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2052 |
Seq # *Modification Id* Act ----------------------------+ 01613 M01S00004.ns2052 +++|* 01614 M01S00005.ns2052 +++|* MACROS SYSTEM. 01615 M00S01576.scrsim +++| 01616 M00S01577.scrsim +++| 01617 M00S01578.scrsim +++| SSR SUBR ENTRY/EXIT 01618 M00S01579.scrsim +++| SA1 REGF 01619 M00S01580.scrsim +++| ZR X1,SSR1 IF CHANNEL 16 01620 M00S01581.scrsim +++| 01621 M00S01582.scrsim +++|* SEND CHANNEL 36 CYCLE REQUEST. 01622 M00S01583.scrsim +++| 01623 M00S01584.scrsim +++| SYSTEM HFM,R,PW36,100B
| Line S01585 Modification History | |
|---|---|
M01 (Removed by) | ns2052 |
Seq # *Modification Id* Act ----------------------------+ 01624 M01S01585.ns2052 ---| SA1 PW36 01625 M01S01586.ns2052 ---| EQ SSR2
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | ns2052 |
Seq # *Modification Id* Act ----------------------------+ 01626 M01S00006.ns2052 +++| EQ SSRX RETURN 01627 M00S01587.scrsim +++| 01628 M00S01588.scrsim +++|* SEND CHANNEL 16 CYCLE REQUEST. 01629 M00S01589.scrsim +++| 01630 M00S01590.scrsim +++| SSR1 SYSTEM HFM,R,PW16,100B
| Line S01591 Modification History | |
|---|---|
M01 (Removed by) | ns2052 |
Seq # *Modification Id* Act ----------------------------+ 01631 M01S01591.ns2052 ---| SA1 PW16 01632 M01S01592.ns2052 ---| SSR2 MX0 10 CHECK FOR ERROR CODE 01633 M01S01593.ns2052 ---| LX0 -2 01634 M01S01594.ns2052 ---| BX6 X0*X1 01635 M01S01595.ns2052 ---| EQ SSRX
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | ns2052 |
Seq # *Modification Id* Act ----------------------------+ 01636 M01S00007.ns2052 +++| EQ SSRX RETURN 01637 M00S01596.scrsim +++| TITLE DISPLAY SUBROUTINES. 01638 M00S01597.scrsim +++| DCR SPACE 4,20 01639 M00S01598.scrsim +++|** DCR - DISPLAY CONTENTS OF S/C REGISTER. 01640 M00S01599.scrsim +++|* 01641 M00S01600.scrsim +++|* EXIT ACTUAL CONTENTS OF S/C REGISTER (OR INTERLOCK REGISTER) 01642 M00S01601.scrsim +++|* ON THE CURRENT CHANNEL DISPLAYED ON K-DISPLAY. 01643 M00S01602.scrsim +++|* 01644 M00S01603.scrsim +++|* USES X - 1, 2, 6. 01645 M00S01604.scrsim +++|* B - 2, 3, 4, 6. 01646 M00S01605.scrsim +++|* A - 2, 6. 01647 M00S01606.scrsim +++|* 01648 M00S01607.scrsim +++|* CALLS DYW. 01649 M00S01608.scrsim +++| 01650 M00S01609.scrsim +++| 01651 M00S01610.scrsim +++| DCR3 SA1 DCRB RESTORE PARAMETER WORDS 01652 M00S01611.scrsim +++| SA2 DCRB+1 01653 M00S01612.scrsim +++| BX6 X1 01654 M00S01613.scrsim +++| BX7 X2 01655 M00S01614.scrsim +++| SA6 PW16 01656 M00S01615.scrsim +++| SA7 PW36 01657 M00S01616.scrsim +++| 01658 M00S01617.scrsim +++| DCR SUBR ENTRY/EXIT 01659 M00S01618.scrsim +++| SA1 PW16 SAVE PARAMETER WORDS 01660 M00S01619.scrsim +++| SA2 PW36 01661 M00S01620.scrsim +++| BX6 X1 01662 M00S01621.scrsim +++| BX7 X2 01663 M00S01622.scrsim +++| SA6 DCRB 01664 M00S01623.scrsim +++| SA7 DCRB+1 01665 M00S01624.scrsim +++| SX7 DCRA SET BUFFER ADDRESS 01666 M00S01625.scrsim +++| RJ RDR READ REGISTER CONTENTS 01667 M00S01626.scrsim +++| SA2 DCRA BUFFER ADDRESS 01668 M00S01627.scrsim +++| SB6 3 01669 M00S01628.scrsim +++| SB3 B0+ 01670 M00S01629.scrsim +++| SB4 CH16-1 DISPLAY WORD ADDRESS - 1 01671 M00S01630.scrsim +++| SA1 REGF 01672 M00S01631.scrsim +++| ZR X1,DCR1 IF CHANNEL 16 01673 M00S01632.scrsim +++| SB4 CH36-1 SET CHANNEL 36 DISPLAY WORD ADDRESS - 1 01674 M00S01633.scrsim +++| 01675 M00S01634.scrsim +++|* DISPLAY CONTENTS ON LEFT SCREEN. 01676 M00S01635.scrsim +++| 01677 M00S01636.scrsim +++| DCR1 RJ DYW DISPLAY WORD 01678 M00S01637.scrsim +++| SA2 A2+B1 GET NEXT WORD 01679 M00S01638.scrsim +++| SB4 A7+ SAVE LAST ADDRESS 01680 M00S01639.scrsim +++| SB6 B6-B1 01681 M00S01640.scrsim +++| ZR B6,DCR2 IF END OF TRANSFER 01682 M00S01641.scrsim +++| SB3 B0+ 01683 M00S01642.scrsim +++| EQ DCR1 DISPLAY NEXT WORD 01684 M00S01643.scrsim +++| 01685 M00S01644.scrsim +++| DCR2 SB6 B1 SET ONE LINE 01686 M00S01645.scrsim +++| NG B3,DCR3 IF ENTIRE REGISTER DISPLAYED 01687 M00S01646.scrsim +++| SB3 -B1 SET SHORT LINE FLAG 01688 M00S01647.scrsim +++| SB4 B4+5 01689 M00S01648.scrsim +++| EQ DCR1 DISPLAY NEXT WORD 01690 M00S01649.scrsim +++| 01691 M00S01650.scrsim +++| DCRA BSS 4 S/C REGISTER BUFFER 01692 M00S01651.scrsim +++| DCRB BSS 2 PARAMETER SAVE AREA 01693 M00S01652.scrsim +++| DOC SPACE 4,12 01694 M00S01653.scrsim +++|** DOC - DISPLAY OCTAL WORD. 01695 M00S01654.scrsim +++|* 01696 M00S01655.scrsim +++|* ENTRY (X2) = WORD TO DISPLAY. 01697 M00S01656.scrsim +++|* (B4) = DISPLAY ADDRESS. 01698 M00S01657.scrsim +++|* (B3) = 0 DISPLAY WHOLE LINE. 01699 M00S01658.scrsim +++|* =-1 DISPLAY SHORTENED LINE. 01700 M00S01659.scrsim +++|* 01701 M00S01660.scrsim +++|* EXIT OCTAL VALUE DISPLAYED. 01702 M00S01661.scrsim +++|* 01703 M00S01662.scrsim +++|* USES X - 0, 1, 2, 3, 5, 6, 7. 01704 M00S01663.scrsim +++|* B - 4, 5, 7. 01705 M00S01664.scrsim +++|* A - 3, 7. 01706 M00S01665.scrsim +++| 01707 M00S01666.scrsim +++| 01708 M00S01667.scrsim +++| DOC SUBR ENTRY/EXIT 01709 M00S01668.scrsim +++| MX0 -12 01710 M00S01669.scrsim +++| MX5 -3 01711 M00S01670.scrsim +++| SB4 B4+4 01712 M00S01671.scrsim +++| SB5 5 01713 M00S01672.scrsim +++| ZR B3,DOC1 IF WHOLE LINE 01714 M00S01673.scrsim +++| SB5 2 01715 M00S01674.scrsim +++| 01716 M00S01675.scrsim +++|* DISPLAY WORD IN BYTES. 01717 M00S01676.scrsim +++| 01718 M00S01677.scrsim +++| DOC1 BX6 -X0*X2 GET BYTE 01719 M00S01678.scrsim +++| AX2 12 01720 M00S01679.scrsim +++| SB7 4 01721 M00S01680.scrsim +++| SX1 B0+ CLEAR ASSEMBLY 01722 M00S01681.scrsim +++| DOC2 BX7 -X5*X6 GET DIGIT 01723 M00S01682.scrsim +++| SX7 X7+1R0 CONVERT TO DISPLAY CODE 01724 M00S01683.scrsim +++| LX1 -6 01725 M00S01684.scrsim +++| BX1 X1+X7 ADD TO ASSEMBLY 01726 M00S01685.scrsim +++| AX6 3 01727 M00S01686.scrsim +++| SB7 B7-B1 01728 M00S01687.scrsim +++| NZ B7,DOC2 IF NOT ENTIRE BYTE 01729 M00S01688.scrsim +++| LX1 18 01730 M00S01689.scrsim +++| SA3 B4 GET DISPLAY WORD 01731 M00S01690.scrsim +++| MX7 36 01732 M00S01691.scrsim +++| BX3 X7*X3 01733 M00S01692.scrsim +++| BX7 X1+X3 ADD TO DISPLAY WORD 01734 M00S01693.scrsim +++| SA7 A3 01735 M00S01694.scrsim +++| SB4 B4-B1 01736 M00S01695.scrsim +++| SB5 B5-B1 01737 M00S01696.scrsim +++| NZ B5,DOC1 IF NOT ENTIRE LINE DISPLAYED 01738 M00S01697.scrsim +++| EQ DOCX 01739 M00S01698.scrsim +++| DYL SPACE 4,11 01740 M00S01699.scrsim +++|** DYL - DISPLAY LINE IN HOLDING REGISTER. 01741 M00S01700.scrsim +++|* 01742 M00S01701.scrsim +++|* ENTRY (A0) = WORD ADDRESS. 01743 M00S01702.scrsim +++|* 01744 M00S01703.scrsim +++|* EXIT WORD DISPLAYED AS LINE ON *K* DISPLAY. 01745 M00S01704.scrsim +++|* 01746 M00S01705.scrsim +++|* USES X - 2, 5, 6, 7. 01747 M00S01706.scrsim +++|* B - 3, 4. 01748 M00S01707.scrsim +++|* A - 2. 01749 M00S01708.scrsim +++|* 01750 M00S01709.scrsim +++|* CALLS DYW, DOC. 01751 M00S01710.scrsim +++| 01752 M00S01711.scrsim +++| 01753 M00S01712.scrsim +++| DYL SUBR ENTRY/EXIT 01754 M00S01713.scrsim +++| SX7 A0-LHLD 01755 M00S01714.scrsim +++| SX6 LL00 01756 M00S01715.scrsim +++| PL X7,DYL1 IF CHANNEL 36 REGISTER 01757 M00S01716.scrsim +++| SX7 A0-UHLD 01758 M00S01717.scrsim +++| SX6 UL00 01759 M00S01718.scrsim +++| 01760 M00S01719.scrsim +++|* DISPLAY BINARY VALUE. 01761 M00S01720.scrsim +++| 01762 M00S01721.scrsim +++| DYL1 SX5 12 DISPLAY WORDS PER LINE 01763 M00S01722.scrsim +++| IX5 X7*X5 01764 M00S01723.scrsim +++| IX6 X6+X5 STARTING DISPLAY ADDRESS 01765 M00S01724.scrsim +++| SB4 X6-1 01766 M00S01725.scrsim +++| SA2 A0 HOLDING REGISTER WORD ADDRESS 01767 M00S01726.scrsim +++| SB3 B0 01768 M00S01727.scrsim +++| SX7 X7-3 01769 M00S01728.scrsim +++| NZ X7,DYL2 IF FULL LINE 01770 M00S01729.scrsim +++| SB3 -B1 SET SHORT LINE FLAG 01771 M00S01730.scrsim +++| SB4 B4+5 01772 M00S01731.scrsim +++| DYL2 RJ DYW DISPLAY WORD 01773 M00S01732.scrsim +++| 01774 M00S01733.scrsim +++|* DISPLAY OCTAL VALUE. 01775 M00S01734.scrsim +++| 01776 M00S01735.scrsim +++| SX7 A0-LHLD 01777 M00S01736.scrsim +++| SX6 LOC0 01778 M00S01737.scrsim +++| PL X7,DYL3 IF CHANNEL 36 REGISTER 01779 M00S01738.scrsim +++| SX7 A0-UHLD 01780 M00S01739.scrsim +++| SX6 UOC0 01781 M00S01740.scrsim +++| DYL3 SX5 5 DISPLAY WORDS PER LINE 01782 M00S01741.scrsim +++| IX5 X7*X5 01783 M00S01742.scrsim +++| IX6 X6+X5 STARTING DISPLAY ADDRESS 01784 M00S01743.scrsim +++| SB4 X6 01785 M00S01744.scrsim +++| SA2 A0 HOLDING REGISTER WORD ADDRESS 01786 M00S01745.scrsim +++| SB3 B0 01787 M00S01746.scrsim +++| SX7 X7-3 01788 M00S01747.scrsim +++| NZ X7,DYL4 IF FULL LINE 01789 M00S01748.scrsim +++| SB3 -B1 SET SHORT LINE FLAG 01790 M00S01749.scrsim +++| DYL4 RJ DOC DISPLAY OCTAL WORD 01791 M00S01750.scrsim +++| EQ DYLX 01792 M00S01751.scrsim +++| DYW SPACE 4,15 01793 M00S01752.scrsim +++|** DYW - DISPLAY WORD. 01794 M00S01753.scrsim +++|* 01795 M00S01754.scrsim +++|* ENTRY (X2) = WORD TO DISPLAY. 01796 M00S01755.scrsim +++|* (B4) = DISPLAY ADDRESS - 1. 01797 M00S01756.scrsim +++|* (B3) = 0 DISPLAY WHOLE LINE. 01798 M00S01757.scrsim +++|* =-1 DISPLAY SHORTENED LINE. 01799 M00S01758.scrsim +++|* 01800 M00S01759.scrsim +++|* EXIT (A7) = LAST DISPLAY ADDRESS. 01801 M00S01760.scrsim +++|* WORD DISPLAYED ON *K* DISPLAY. 01802 M00S01761.scrsim +++|* 01803 M00S01762.scrsim +++|* USES X - 0, 1, 2, 3, 5, 6, 7. 01804 M00S01763.scrsim +++|* B - 3, 4. 01805 M00S01764.scrsim +++|* A - 5, 6, 7. 01806 M00S01765.scrsim +++|* 01807 M00S01766.scrsim +++|* CALLS CDC. 01808 M00S01767.scrsim +++| 01809 M00S01768.scrsim +++| 01810 M00S01769.scrsim +++| DYW SUBR ENTRY/EXIT 01811 M00S01770.scrsim +++| ZR B3,DYW1 IF WHOLE WORD 01812 M00S01771.scrsim +++| LX2 36 01813 M00S01772.scrsim +++| 01814 M00S01773.scrsim +++|* DISPLAY BITS 59 - 54 OF FULL WORD FIRST TIME, 01815 M00S01774.scrsim +++|* BITS 23 - 18 SECOND TIME, OR SHORT WORD FIRST TIME. 01816 M00S01775.scrsim +++| 01817 M00S01776.scrsim +++| DYW1 MX0 6 01818 M00S01777.scrsim +++| BX1 X0*X2 GET SIX BITS FOR FIRST WORD 01819 M00S01778.scrsim +++| LX1 6 01820 M00S01779.scrsim +++| RJ CDC CONVERT TO DISPLAY CODE 01821 M00S01780.scrsim +++| MX0 -36 01822 M00S01781.scrsim +++| BX6 -X0*X6 01823 M00S01782.scrsim +++| SA5 B4+B1 01824 M00S01783.scrsim +++| BX7 X0*X5 01825 M00S01784.scrsim +++| BX7 X6+X7 01826 M00S01785.scrsim +++| SA7 A5 SAVE FIRST WORD 01827 M00S01786.scrsim +++| 01828 M00S01787.scrsim +++|* DISPLAY BITS 53 - 45 OF FULL WORD FIRST TIME, 01829 M00S01788.scrsim +++|* BITS 17 - 9 SECOND TIME, OR SHORT WORD FIRST TIME. 01830 M00S01789.scrsim +++| 01831 M00S01790.scrsim +++| LX2 6 01832 M00S01791.scrsim +++| MX0 9 01833 M00S01792.scrsim +++| BX1 X0*X2 GET NINE BITS FOR SECOND WORD 01834 M00S01793.scrsim +++| LX1 9 01835 M00S01794.scrsim +++| RJ CDC CONVERT TO DISPLAY CODE 01836 M00S01795.scrsim +++| MX0 36 01837 M00S01796.scrsim +++| LX0 -6 01838 M00S01797.scrsim +++| BX3 X0*X6 01839 M00S01798.scrsim +++| LX3 6 01840 M00S01799.scrsim +++| SX5 1R 01841 M00S01800.scrsim +++| LX5 18 01842 M00S01801.scrsim +++| BX3 X3+X5 INSERT BLANK 01843 M00S01802.scrsim +++| MX0 -18 01844 M00S01803.scrsim +++| BX6 -X0*X6 01845 M00S01804.scrsim +++| BX7 X3+X6 01846 M00S01805.scrsim +++| SA7 A7+B1 SAVE SECOND WORD 01847 M00S01806.scrsim +++| 01848 M00S01807.scrsim +++|* DISPLAY BITS 44 - 36 OF FULL WORD FIRST TIME, 01849 M00S01808.scrsim +++|* BITS 8 - 0 SECOND TIME, OR SHORT WORD FIRST TIME. 01850 M00S01809.scrsim +++| 01851 M00S01810.scrsim +++| LX2 9 01852 M00S01811.scrsim +++| MX0 9 01853 M00S01812.scrsim +++| BX1 X0*X2 GET NINE BITS FOR THIRD WORD 01854 M00S01813.scrsim +++| LX1 9 01855 M00S01814.scrsim +++| RJ CDC CONVERT TO DISPLAY CODE 01856 M00S01815.scrsim +++| MX0 -54 01857 M00S01816.scrsim +++| BX6 -X0*X6 01858 M00S01817.scrsim +++| SX5 1R 01859 M00S01818.scrsim +++| LX6 6 LEFT JUSTIFY 01860 M00S01819.scrsim +++| BX7 X6+X5 INSERT BLANK 01861 M00S01820.scrsim +++| SA7 A7+B1 SAVE THIRD WORD 01862 M00S01821.scrsim +++| LX2 9 01863 M00S01822.scrsim +++| NZ B3,DYWX IF END OF WORD 01864 M00S01823.scrsim +++| 01865 M00S01824.scrsim +++|* DISPLAY BITS 35 - 26 OF WORD. 01866 M00S01825.scrsim +++| 01867 M00S01826.scrsim +++| MX0 10 01868 M00S01827.scrsim +++| BX1 X0*X2 GET TEN BITS FOR FOURTH WORD 01869 M00S01828.scrsim +++| LX1 10 01870 M00S01829.scrsim +++| RJ CDC CONVERT TO DISPLAY CODE 01871 M00S01830.scrsim +++| SA6 A7+B1 SAVE FOURTH WORD 01872 M00S01831.scrsim +++| 01873 M00S01832.scrsim +++|* DISPLAY BITS 25 - 24. 01874 M00S01833.scrsim +++| 01875 M00S01834.scrsim +++| LX2 10 01876 M00S01835.scrsim +++| MX0 2 01877 M00S01836.scrsim +++| BX1 X0*X2 GET TWO BITS FOR FIFTH WORD 01878 M00S01837.scrsim +++| LX1 2 01879 M00S01838.scrsim +++| RJ CDC CONVERT TO DISPLAY CODE
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/scrsim.txt · Last modified: by 127.0.0.1