cdc:nos2.source:opl.opl871:deck:cpumtr
Deck CPUMTR
Library Member Format: MODIFY
Listing Sections
- Deck CPUMTR Start
- Deck CPUMTR Part 1 (Line 1426)
- Deck CPUMTR Part 2 (Line 2835)
- Deck CPUMTR Part 3 (Line 4189)
- Deck CPUMTR Part 4 (Line 5202)
- Deck CPUMTR Part 5 (Line 6708)
- Deck CPUMTR Part 6 (Line 8299)
- Deck CPUMTR Part 7 (Line 9638)
- Deck CPUMTR Part 8 (Line 10916)
- Deck CPUMTR Part 9 (Line 11967)
- Deck CPUMTR Part 10 (Line 13138)
- Deck CPUMTR Part 11 (Line 14282)
- Deck CPUMTR Part 12 (Line 15410)
- Deck CPUMTR Part 13 (Line 16567)
- Deck CPUMTR Part 14 (Line 17788)
- Deck CPUMTR Part 15 (Line 19052)
- Deck CPUMTR Part 16 (Line 20073)
- Deck CPUMTR Part 17 (Line 21429)
- Deck CPUMTR Part 18 (Line 22828)
- Deck CPUMTR Part 19 (Line 24227)
- Deck CPUMTR Part 20 (Line 25696)
- Deck CPUMTR Part 21 (Line 26966)
- Deck CPUMTR Part 22 (Line 28134)
- Deck CPUMTR Part 23 (Line 29251)
- Deck CPUMTR Part 24 (Line 30351)
- Deck CPUMTR Part 25 (Line 31361)
- Deck CPUMTR Part 26 (Line 32485)
- Deck CPUMTR Part 27 (Line 33477)
- Deck CPUMTR Part 28 (Line 34727)
- Deck CPUMTR Part 29 (Line 36372)
- Deck CPUMTR Part 30 (Line 38175)
- Deck CPUMTR Part 31 (Line 39467)
- Deck CPUMTR Part 32 (Line 41032)
- Deck CPUMTR Part 33 (Line 42467)
- Deck CPUMTR Part 34 (Line 44089)
- Deck CPUMTR Part 35 (Line 45392)
- Deck CPUMTR Part 36 (Line 46832)
- Deck CPUMTR Part 37 (Line 47923)
- Deck CPUMTR Part 38 (Line 49530)
- Deck CPUMTR Part 39 (Line 50976)
- Deck CPUMTR Part 40 (Line 52390)
- Deck CPUMTR Part 41 (Line 53539)
- Deck CPUMTR Part 42 (Line 54779)
- Deck CPUMTR Part 43 (Line 56002)
- Deck CPUMTR Part 44 (Line 57163)
- Deck CPUMTR Part 45 (Line 58215)
- Deck CPUMTR Part 46 (Line 59341)
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M00S00001.cpumtr +++| IDENT CPUMTR 00002 M00S00002.cpumtr +++| ENTRY CPUMTR 00003 M00S00003.cpumtr +++| SST PPR,FL,TH,T1,T2,T3,RA 00004 M00S00004.cpumtr +++| B1=1
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | cpum135 |
Seq # *Modification Id* Act ----------------------------+ 00005 M01S00001.cpum135 +++| LIST F 00006 M00S00005.cpumtr +++|*COMMENT CPUMTR - CPU MONITOR.
| Line S00006 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00007 M01S00006.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1970.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00008 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00009 M00S00007.cpumtr +++| TITLE CPUMTR - CPU MONITOR. 00010 M00S00008.cpumtr +++| SPACE 4 00011 M00S00009.cpumtr +++|*** CPUMTR - CPU MONITOR. 00012 M00S00010.cpumtr +++|* G. R. MANSFIELD. 70/12/13. 00013 M00S00011.cpumtr +++|* W. E. GOEBEL. 76/01/21. 00014 M00S00012.cpumtr +++|* P. T. BARNETT. 80/10/31. 00015 M00S00013.cpumtr +++| SPACE 4 00016 M00S00014.cpumtr +++|*** *CPUMTR* WORKS IN CONJUNCTION WITH *MTR* TO DO 00017 M00S00015.cpumtr +++|* THE FOLLOWING TASKS - 00018 M00S00016.cpumtr +++|*
| Line S00017 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00019 M01S00017.251l664 ---|* 1) SCHEDULING OF THE CPU FOR JOBS AT CONTROL POINTS.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00020 M01S00001.251l664 +++|* 1) SCHEDULE THE CPU AMONG ELIGIBLE JOBS AT CONTROL POINTS. 00021 M00S00018.cpumtr +++|* 2) PERFORM REQUESTED OPERATIONS BY PP-S 00022 M00S00019.cpumtr +++|* (MONITOR FUNCTIONS ABOVE *CPUM*). 00023 M00S00020.cpumtr +++|* 3) PERFORM REQUESTED OPERATIONS BY JOBS RUNNING AT 00024 M00S00021.cpumtr +++|* CONTROL POINTS (RA+1 REQUESTS). 00025 M00S00022.cpumtr +++|* 4) PERFORM REQUESTED OPERATIONS BY *MTR* 00026 M00S00023.cpumtr +++|* (STORAGE MOVE, ETC.) 00027 M00S00024.cpumtr +++|* 5) PERFORM DATA TRANSFERS FOR BUFFERED MASS STORAGE DEVICES
| Line S00025 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00028 M01S00025.251l664 ---|* (SUCH AS THE 819, SEE *CIO819* BLOCK FOR AN EXPLANATION 00029 M01S00026.251l664 ---|* OF THE PSEUDO-PP).
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00030 M01S00002.251l664 +++|* (REFER TO THE *CPUCIO* BLOCK FOR AN EXPLANATION OF THE 00031 M01S00003.251l664 +++|* PSEUDO-PP). 00032 M00S00027.cpumtr +++|* 00033 M00S00028.cpumtr +++|* *CPUMTR* CODE RUNS IN BOTH MONITOR AND PROGRAM MODE. THE 00034 M00S00029.cpumtr +++|* CODE USED IN EITHER MODE IS MOSTLY SEPARATE, BUT IN CERTAIN 00035 M00S00030.cpumtr +++|* RARE CASES, CODE IS SHARED BETWEEN THE TWO. IN BOTH CASES, 00036 M00S00031.cpumtr +++|* THE CODE EXECUTES AT AN RA OF 0, AND AN FL OF MACHINE FIELD 00037 M00S00032.cpumtr +++|* LENGTH, GIVING *CPUMTR* FULL ACCESS TO ALL OF CM (AND ECS). 00038 M00S00033.cpumtr +++|* 00039 M00S00034.cpumtr +++|* MONITOR MODE CODE EXECUTION IS LIMITED TO FUNCTIONS THAT CAN
| Line S00035 Modification History | |
|---|---|
M01 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00040 M01S00035.251l664 ---|* BE DONE QUICKLY, OR REQUIRES INTERLOCKING. PROGRAM MODE
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00041 M01S00004.251l664 +++|* BE DONE QUICKLY OR REQUIRE INTERLOCKING. PROGRAM MODE 00042 M00S00036.cpumtr +++|* CODE IS USED FOR PROCESSING FUNCTIONS THAT POTENTIALLY CAN 00043 M00S00037.cpumtr +++|* TAKE A LONG TIME (SUCH AS STORAGE MOVE). PROGRAM MODE 00044 M00S00038.cpumtr +++|* *CPUMTR* RUNS AT CONTROL POINT N+1, AND HAS A CPU PRIORITY 00045 M00S00039.cpumtr +++|* OF 100B, HIGHER THAN ANY OTHER JOB IN THE SYSTEM. 00046 M00S00040.cpumtr +++| SPACE 4,10 00047 M00S00041.cpumtr +++|** IMPLEMENTATION NOTES. 00048 M00S00042.cpumtr +++|* 00049 M00S00043.cpumtr +++|* *CPUMTR* IS LOADED AND RELOCATED BY *CPUMLD*. 00050 M00S00044.cpumtr +++|* *CPUMLD* SUPPORTS ONLY THE COMMONLY USED LOADER TABLES, 00051 M00S00045.cpumtr +++|* INCLUDING 3400 (PIDL), 3600 (ENTR), 4000 (TEXT), 00052 M00S00046.cpumtr +++|* 4100 (XFILL), 4200 (FILL), 4600 (XFER), AND 7700 (PRFX) 00053 M00S00047.cpumtr +++|* LOADER TABLES. LOADER TABLES SUCH AS 3700 (XTEXT), 00054 M00S00048.cpumtr +++|* 4300 (REPL), 4400 (LINK), 4500 (XLINK), AND 00055 M00S00049.cpumtr +++|* 4700 (XREPL) ARE NOT SUPPORTED BY *CPUMLD*. 00056 M00S00050.cpumtr +++|* SINCE *BSSZ* INSTRUCTIONS OF 6 OR MORE WORDS GENERATE 00057 M00S00051.cpumtr +++|* *REPL* TABLES, USE OF *CON* OR *BSS* INSTRUCTIONS 00058 M00S00052.cpumtr +++|* ARE RECOMMENDED AS AN ALTERNATIVE. 00059 M00S00053.cpumtr +++|* 00060 M00S00054.cpumtr +++|* DUE TO THE DEFINITION OF A *CON* INSTRUCTION IN 00061 M00S00055.cpumtr +++|* COMPASS 3.0, DATA INSTRUCTIONS CONTAINING RELOCATABLE 00062 M00S00056.cpumtr +++|* ADDRESSES SHOULD USE ONLY THE *VFD* INSTRUCTION. 00063 M00S00057.cpumtr +++| SPACE 4 00064 M00S00058.cpumtr +++|**** ASSEMBLY CONSTANTS. 00065 M00S00059.cpumtr +++| 00066 M00S00060.cpumtr +++| 00067 M00S00061.cpumtr +++| NPPCP EQU LREC-1 MAXIMUM NUMBER OF PP-S TO A CP 00068 M00S00062.cpumtr +++| RSHF EQU 12 SHIFT COUNT TO MOVE RA FIELD 00069 M00S00063.cpumtr +++| OF FLSW TO LOWER BITS 00070 M00S00064.cpumtr +++| RMSK EQU 24 FIELD WIDTH OF RA IN CONTROL POINT AREA 00071 M00S00065.cpumtr +++| MCUR EQU 40B MAXIMUM CONSECUTIVE UNIT RESERVE COUNT
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | cpum244 |
Seq # *Modification Id* Act ----------------------------+ 00072 M01S00001.cpum244 +++| SDUD EQU 100 UNABLE TO RELEASE WRITE ACCESS DELAY (MS) 00073 M01S00002.cpum244 +++| SDWD EQU 100 DEVICE WRITE ACCESS REQUESTED DELAY (MS) 00074 M01S00003.cpum244 +++| SDMD EQU 4 *MTE* WAIT DELAY FOR WRITE ACCESS (MS) 00075 M00S00066.cpumtr +++| 00076 M00S00067.cpumtr +++|**** 00077 M00S00068.cpumtr +++| SPACE 4
| Line S00069 Modification History | |
|---|---|
M01 (Removed by) | ns2483 |
Seq # *Modification Id* Act ----------------------------+ 00078 M01S00069.ns2483 ---|* *COMSMTX* PRECEDES ALL OTHER COMMON DECKS IN ORDER TO MAKE 00079 M01S00070.ns2483 ---|* THE *BSSN* MACRO AVAILABLE TO *COMSEJT*. 00080 M01S00071.ns2483 ---| 00081 M01S00072.ns2483 ---| QUAL MTX 00082 M01S00073.ns2483 ---|*CALL COMSMTX 00083 M01S00074.ns2483 ---| QUAL *
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2483 |
Seq # *Modification Id* Act ----------------------------+ 00084 M01S00001.ns2483 +++|*CALL COMCMAC 00085 M00S00075.cpumtr +++|*CALL COMSACC
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00086 M01S00001.252l678 +++|*CALL COMSCIO
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2322 |
Seq # *Modification Id* Act ----------------------------+ 00087 M01S00001.ns2322 +++|*CALL COMSDFS
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00088 M01S00002.252l678 +++| QUAL DSL 00089 M01S00003.252l678 +++|*CALL COMSDSL 00090 M01S00004.252l678 +++| QUAL * 00091 M01S00005.252l678 +++| DSCP EQU /DSL/DSCP DEADSTART CONTROL POINT 00092 M00S00076.cpumtr +++| QUAL DST 00093 M00S00077.cpumtr +++|*CALL COMSDST 00094 M00S00078.cpumtr +++| QUAL * 00095 M00S00079.cpumtr +++|*CALL COMSEJT 00096 M00S00080.cpumtr +++|*CALL COMSJCE
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | cpum210 |
Seq # *Modification Id* Act ----------------------------+ 00097 M01S00001.cpum210 +++|*CALL COMSLSD 00098 M00S00081.cpumtr +++|*CALL COMSMMF
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00099 M01S00005.251l664 +++|*CALL COMSMRT 00100 M00S00082.cpumtr +++|*CALL COMSMSP
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2483 |
Seq # *Modification Id* Act ----------------------------+ 00101 M01S00002.ns2483 +++| QUAL MTX 00102 M01S00003.ns2483 +++|*CALL COMSMTX 00103 M01S00004.ns2483 +++| QUAL *
| Line S00083 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00104 M01S00083.252l678 ---|*CALL COMSCIO 00105 M00S00084.cpumtr +++| QUAL PFM 00106 M00S00085.cpumtr +++|*CALL COMSPFM 00107 M00S00086.cpumtr +++| QUAL * 00108 M00S00087.cpumtr +++|*CALL COMSREM 00109 M00S00088.cpumtr +++|*CALL COMSPRD 00110 M00S00089.cpumtr +++|*CALL COMSSCD 00111 M00S00090.cpumtr +++|*CALL COMSSSD 00112 M00S00091.cpumtr +++| LIST X 00113 M00S00092.cpumtr +++|*CALL COMSHIO 00114 M00S00093.cpumtr +++|*CALL COMSMSC 00115 M00S00094.cpumtr +++|*CALL COMSLFD 00116 M00S00095.cpumtr +++|*CALL COMSSCP
| Line S00096 Modification History | |
|---|---|
M01 (Removed by) | ns2322 |
Seq # *Modification Id* Act ----------------------------+ 00117 M01S00096.ns2322 ---| LIST -X
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2322 |
Seq # *Modification Id* Act ----------------------------+ 00118 M01S00002.ns2322 +++| LIST * 00119 M00S00097.cpumtr +++|*CALL COMSSRU 00120 M00S00098.cpumtr +++| QUAL DSL 00121 M00S00099.cpumtr +++|*CALL COMSDSL 00122 M00S00100.cpumtr +++| QUAL * 00123 M00S00101.cpumtr +++| LIST X 00124 M00S00102.cpumtr +++|*CALL COMS176 00125 M00S00103.cpumtr +++|*CALL COMSCPS 00126 M00S00104.cpumtr +++|*CALL COMSMTR 00127 M00S00105.cpumtr +++| LIST * 00128 M00S00106.cpumtr +++| TITLE MACRO DEFINITIONS. 00129 M00S00107.cpumtr +++| NOREF .1,.2,.3 00130 M00S00108.cpumtr +++| BLOCK SPACE 4,20 00131 M00S00109.cpumtr +++|** BLOCK - DEFINE AN OPTIONAL BLOCK OF CPUMTR CODE. 00132 M00S00110.cpumtr +++|* 00133 M00S00111.cpumtr +++|* 00134 M00S00112.cpumtr +++|* BLOCK NAME,(TTLE),Q 00135 M00S00113.cpumtr +++|* ENTRY *NAME* = NAME OF BLOCK. 00136 M00S00114.cpumtr +++|* *TTLE* = DESCRIPTION TO APPEAR ON TITLE LINE FOLLOWING 00137 M00S00115.cpumtr +++|* *CPUMTR - CPU MONITOR * 00138 M00S00116.cpumtr +++|* *Q* = QUAL TO BE USED FOR BLOCK IF OTHER THAN *NAME*. 00139 M00S00117.cpumtr +++| 00140 M00S00118.cpumtr +++| 00141 M00S00119.cpumtr +++| PURGMAC BLOCK 00142 M00S00120.cpumtr +++| 00143 M00S00121.cpumtr +++| BLOCK MACRO NAME,TTLE,Q 00144 M00S00122.cpumtr +++| _NAME TTL CPUMTR - CPU MONITOR _TTLE 00145 M00S00123.cpumtr +++| TITLE 00146 M00S00124.cpumtr +++| QUAL Q NAME 00147 M00S00125.cpumtr +++| NOREF .1,.2,.3 00148 M00S00126.cpumtr +++| USE /_NAME/ 00149 M00S00127.cpumtr +++| USE /TREL/ 00150 M00S00128.cpumtr +++| CON 0 00151 M00S00129.cpumtr +++| VFD 42/0L_NAME,18/0 00152 M00S00130.cpumtr +++| USE * 00153 M00S00131.cpumtr +++| USE /TJMP/ 00154 M00S00132.cpumtr +++| CON 0 00155 M00S00133.cpumtr +++| VFD 42/0L_NAME,18/0 00156 M00S00134.cpumtr +++| USE * 00157 M00S00135.cpumtr +++| ENDM
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | cpum131 |
Seq # *Modification Id* Act ----------------------------+ 00158 M01S00001.cpum131 +++| BSSZ SPACE 4,10 00159 M01S00002.cpum131 +++|** BSSZ - REDEFINE *BSSZ* PSEUDO INSTRUCTION. 00160 M01S00003.cpum131 +++|* 00161 M01S00004.cpum131 +++|* THE REDEFINED *BSSZ* PSEUDO INSTRUCTION WILL ISSUE AN 00162 M01S00005.cpum131 +++|* ASSEMBLY ERROR IF THE RESULTING BINARY CANNOT BE LOADED 00163 M01S00006.cpum131 +++|* BY *CPUMLD*. 00164 M01S00007.cpum131 +++| 00165 M01S00008.cpum131 +++| 00166 M01S00009.cpum131 +++| BSSZ. OPSYN BSSZ SAVE OLD DEFINITION 00167 M01S00010.cpum131 +++| 00168 M01S00011.cpum131 +++| PURGMAC BSSZ 00169 M01S00012.cpum131 +++| 00170 M01S00013.cpum131 +++| BSSZ MACRO EXP 00171 M01S00014.cpum131 +++| BSSZ. EXP 00172 M01S00015.cpum131 +++| ERRPL EXP-6 *CPUMLD* CANNOT LOAD THIS *CPUMTR* 00173 M01S00016.cpum131 +++| BSSZ ENDM
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00174 M01S00001.253l688 +++| CFI SPACE 4,10 00175 M01S00002.253l688 +++|** CXI XJ,TAB - CONVERT A TABLE ORDINAL TO AN OFFSET. 00176 M01S00003.253l688 +++|* 00177 M01S00004.253l688 +++|* CXI XJ,TAB
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00178 M02S00005.271l716 ---|
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00179 M01S00001.271l716 +++|*
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00180 M01S00006.253l688 +++|* CONVERT THE ORDINAL FOR TABLE *TAB* IN *XJ* INTO AN OFFSET
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | ns2731b |
Seq # *Modification Id* Act ----------------------------+ 00181 M02S00007.ns2731b ---|* IN *XI*. *I* AND *J* MAY BE EQUAL ONLY IF THE LENGTH OF THE 00182 M02S00008.ns2731b ---|* THE TABLE-S ENTRY IS A POWER OF TWO. 00183 M02S00009.ns2731b ---|* WHEN *XI* AND *XJ* ARE DIFFERENT REGISTERS, *XJ* IS 00184 M02S00010.ns2731b ---|* UNCHANGED.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2731b |
Seq # *Modification Id* Act ----------------------------+ 00185 M01S00001.ns2731b +++|* IN *XI*. *XI* AND *XJ* MUST BE DIFFERENT REGISTERS. THE 00186 M01S00002.ns2731b +++|* VALUE OF *XJ* IS PRESERVED.
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00187 M01S00011.253l688 +++| 00188 M01S00012.253l688 +++| 00189 M01S00013.253l688 +++| PURGDEF CXX,Q 00190 M01S00014.253l688 +++| 00191 M01S00015.253l688 +++| CXX,Q OPDEF I,J,TAB
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00192 M02S00016.271l716 ---| ERRPL TAB_E-10B TABLE ENTRY IS TOO LONG
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00193 M02S00002.271l750 ---| ERRPL TAB_E-11B TABLE ENTRY TOO LONG
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00194 M02S00017.271l750 ---| .1 OCTMIC TAB_E,1
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00195 M01S00001.271l750 +++| ERRPL TAB_E-21B TABLE ENTRY TOO LONG
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2731b |
Seq # *Modification Id* Act ----------------------------+ 00196 M01S00003.ns2731b +++| ERRZR I-J REGISTERS MUST BE DIFFERENT
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00197 M01S00002.271l750 +++| .1 OCTMIC TAB_E
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00198 M01S00018.253l688 +++| .A".1" SKIP 00199 M01S00019.253l688 +++| .A0 ENDIF 00200 M01S00020.253l688 +++| ERR TABLE ENTRIES ARE DEFINED AS ZERO LENGTH 00201 M01S00021.253l688 +++| .B SKIP 00202 M01S00022.253l688 +++| .A1 ENDIF
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2731b |
Seq # *Modification Id* Act ----------------------------+ 00203 M02S00003.ns2731b ---| IFNE I,J,1
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00204 M01S00023.253l688 +++| BX.I X.J 00205 M01S00024.253l688 +++| .B SKIP 00206 M01S00025.253l688 +++| .A2 ENDIF 00207 M01S00026.253l688 +++| LX.I X.J,B1 00208 M01S00027.253l688 +++| .B SKIP 00209 M01S00028.253l688 +++| .A3 ENDIF
| Line S00029 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | ns2731b |
Seq # *Modification Id* Act ----------------------------+ 00210 M02S00029.ns2731b ---| ERRZR I-J REGISTERS MUST BE DIFFERENT FOR THIS SIZE
| Line S00030 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00211 M01S00030.253l688 +++| LX.I X.J,B1 00212 M01S00031.253l688 +++| IX.I X.I+X.J 00213 M01S00032.253l688 +++| .B SKIP 00214 M01S00033.253l688 +++| .A4 ENDIF
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | ns2731b |
Seq # *Modification Id* Act ----------------------------+ 00215 M02S00034.ns2731b ---| IFNE I,J,1
| Line S00035 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00216 M01S00035.253l688 +++| BX.I X.J 00217 M01S00036.253l688 +++| LX.I 2 00218 M01S00037.253l688 +++| .B SKIP 00219 M01S00038.253l688 +++| .A5 ENDIF
| Line S00039 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | ns2731b |
Seq # *Modification Id* Act ----------------------------+ 00220 M02S00039.ns2731b ---| ERRZR I-J REGISTERS MUST BE DIFFERENT FOR THIS SIZE
| Line S00040 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00221 M01S00040.253l688 +++| BX.I X.J 00222 M01S00041.253l688 +++| LX.I 2 00223 M01S00042.253l688 +++| IX.I X.I+X.J 00224 M01S00043.253l688 +++| .B SKIP 00225 M01S00044.253l688 +++| .A6 ENDIF
| Line S00045 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | ns2731b |
Seq # *Modification Id* Act ----------------------------+ 00226 M02S00045.ns2731b ---| ERRZR I-J REGISTERS MUST BE DIFFERENT FOR THIS SIZE
| Line S00046 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00227 M01S00046.253l688 +++| LX.I X.J,B1 00228 M01S00047.253l688 +++| IX.I X.I+X.J 00229 M01S00048.253l688 +++| LX.I 1 00230 M01S00049.253l688 +++| .B SKIP 00231 M01S00050.253l688 +++| .A7 ENDIF
| Line S00051 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | ns2731b |
Seq # *Modification Id* Act ----------------------------+ 00232 M02S00051.ns2731b ---| ERRZR I-J REGISTERS MUST BE DIFFERENT FOR THIS SIZE
| Line S00052 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00233 M01S00052.253l688 +++| BX.I X.J 00234 M01S00053.253l688 +++| LX.I 3 00235 M01S00054.253l688 +++| IX.I X.I-X.J
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00236 M01S00004.271l716 +++| .B SKIP 00237 M01S00005.271l716 +++| .A10 ENDIF
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2731b |
Seq # *Modification Id* Act ----------------------------+ 00238 M02S00006.ns2731b ---| IFNE I,J,1
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00239 M01S00007.271l716 +++| BX.I X.J 00240 M01S00008.271l716 +++| LX.I 3
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00241 M01S00003.271l750 +++| .B SKIP 00242 M01S00004.271l750 +++| .A11 ENDIF
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731b |
Seq # *Modification Id* Act ----------------------------+ 00243 M02S00005.ns2731b ---| ERRZR I-J REGISTERS MUST BE DIFFERENT FOR THIS SIZE
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00244 M01S00006.271l750 +++| BX.I X.J 00245 M01S00007.271l750 +++| LX.I 3 00246 M01S00008.271l750 +++| IX.I X.I+X.J 00247 M01S00009.271l750 +++| .B SKIP 00248 M01S00010.271l750 +++| .A12 ENDIF
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731b |
Seq # *Modification Id* Act ----------------------------+ 00249 M02S00011.ns2731b ---| ERRZR I-J REGISTERS MUST BE DIFFERENT FOR THIS SIZE
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00250 M01S00012.271l750 +++| BX.I X.J 00251 M01S00013.271l750 +++| LX.I 2 00252 M01S00014.271l750 +++| IX.I X.I+X.J 00253 M01S00015.271l750 +++| LX.I 1 00254 M01S00016.271l750 +++| .B SKIP 00255 M01S00017.271l750 +++| .A13 ENDIF
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731b |
Seq # *Modification Id* Act ----------------------------+ 00256 M02S00018.ns2731b ---| ERRZR I-J REGISTERS MUST BE DIFFERENT FOR THIS SIZE
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00257 M01S00019.271l750 +++| BX.I X.J 00258 M01S00020.271l750 +++| LX.I 2 00259 M01S00021.271l750 +++| IX.I X.I+X.J 00260 M01S00022.271l750 +++| LX.I 1 00261 M01S00023.271l750 +++| IX.I X.I+X.J 00262 M01S00024.271l750 +++| .B SKIP 00263 M01S00025.271l750 +++| .A14 ENDIF
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731b |
Seq # *Modification Id* Act ----------------------------+ 00264 M02S00026.ns2731b ---| ERRZR I-J REGISTERS MUST BE DIFFERENT FOR THIS SIZE
| Line S00027 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00265 M01S00027.271l750 +++| BX.I X.J 00266 M01S00028.271l750 +++| LX.I 1 00267 M01S00029.271l750 +++| IX.I X.I+X.J 00268 M01S00030.271l750 +++| LX.I 2 00269 M01S00031.271l750 +++| .B SKIP 00270 M01S00032.271l750 +++| .A15 ENDIF
| Line S00033 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731b |
Seq # *Modification Id* Act ----------------------------+ 00271 M02S00033.ns2731b ---| ERRZR I-J REGISTERS MUST BE DIFFERENT FOR THIS SIZE
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00272 M01S00034.271l750 +++| BX.I X.J 00273 M01S00035.271l750 +++| LX.I 1 00274 M01S00036.271l750 +++| IX.I X.I+X.J 00275 M01S00037.271l750 +++| LX.I 2 00276 M01S00038.271l750 +++| IX.I X.I+X.J 00277 M01S00039.271l750 +++| .B SKIP 00278 M01S00040.271l750 +++| .A16 ENDIF
| Line S00041 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731b |
Seq # *Modification Id* Act ----------------------------+ 00279 M02S00041.ns2731b ---| ERRZR I-J REGISTERS MUST BE DIFFERENT FOR THIS SIZE
| Line S00042 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00280 M01S00042.271l750 +++| BX.I X.J 00281 M01S00043.271l750 +++| LX.I 3 00282 M01S00044.271l750 +++| IX.I X.I-X.J 00283 M01S00045.271l750 +++| LX.I 1 00284 M01S00046.271l750 +++| .B SKIP 00285 M01S00047.271l750 +++| .A17 ENDIF
| Line S00048 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731b |
Seq # *Modification Id* Act ----------------------------+ 00286 M02S00048.ns2731b ---| ERRZR I-J REGISTERS MUST BE DIFFERENT FOR THIS SIZE
| Line S00049 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00287 M01S00049.271l750 +++| BX.I X.J 00288 M01S00050.271l750 +++| LX.I 4 00289 M01S00051.271l750 +++| IX.I X.I-X.J 00290 M01S00052.271l750 +++| .B SKIP 00291 M01S00053.271l750 +++| .A20 ENDIF
| Line S00054 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2731b |
Seq # *Modification Id* Act ----------------------------+ 00292 M02S00054.ns2731b ---| IFNE I,J,1
| Line S00055 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00293 M01S00055.271l750 +++| BX.I X.J 00294 M01S00056.271l750 +++| LX.I 4
| Line S00055 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00295 M01S00055.253l688 +++| .B ENDIF 00296 M01S00056.253l688 +++| ENDM 00297 M00S00136.cpumtr +++| ENDBLK SPACE 4,10 00298 M00S00137.cpumtr +++|** ENDBLK - END AN OPTIONAL BLOCK OF CPUMTR CODE. 00299 M00S00138.cpumtr +++|* 00300 M00S00139.cpumtr +++| 00301 M00S00140.cpumtr +++| 00302 M00S00141.cpumtr +++| PURGMAC ENDBLK 00303 M00S00142.cpumtr +++| 00304 M00S00143.cpumtr +++| ENDBLK MACRO 00305 M00S00144.cpumtr +++| BSS 0 00306 M00S00145.cpumtr +++| USE * 00307 M00S00146.cpumtr +++| QUAL 00308 M00S00147.cpumtr +++| ENDM 00309 M00S00148.cpumtr +++| IDIV SPACE 4,10 00310 M00S00149.cpumtr +++|** IXI XJ/XK - INTEGER DIVISION. 00311 M00S00150.cpumtr +++|* 00312 M00S00151.cpumtr +++|* IXI XJ/XK 00313 M00S00152.cpumtr +++|* DIVIDE XJ BY XK TO XI. 00314 M00S00153.cpumtr +++|* DESTROYS XJ, XK, B7. 00315 M00S00154.cpumtr +++| 00316 M00S00155.cpumtr +++| 00317 M00S00156.cpumtr +++| PURGDEF IXX/X 00318 M00S00157.cpumtr +++| 00319 M00S00158.cpumtr +++| IXX/X OPDEF I,J,K 00320 M00S00159.cpumtr +++| PX.J X.J 00321 M00S00160.cpumtr +++| PX.K X.K 00322 M00S00161.cpumtr +++| NX.K X.K 00323 M00S00162.cpumtr +++| FX.I X.J/X.K 00324 M00S00163.cpumtr +++| UX.I B7,X.I 00325 M00S00164.cpumtr +++| LX.I X.I,B7 00326 M00S00165.cpumtr +++| ENDM 00327 M00S00166.cpumtr +++| MONITOR SPACE 4,10 00328 M00S00167.cpumtr +++|** MONITOR - ISSUE PSEUDO OUTPUT REGISTER *CPUMTR* FUNCTION. 00329 M00S00168.cpumtr +++|* 00330 M00S00169.cpumtr +++|* MONITOR FC,RAD 00331 M00S00170.cpumtr +++|* WHERE FC = *CPUMTR* FUNCTION CODE. 00332 M00S00171.cpumtr +++|* RAD = RETURN ADDRESS, OPTIONAL IF RETURN TO NEXT 00333 M00S00172.cpumtr +++|* LOCATION AFTER MONITOR CALL. 00334 M00S00173.cpumtr +++|* 00335 M00S00174.cpumtr +++|* CALLS /BUFIO/IMF. 00336 M00S00175.cpumtr +++| 00337 M00S00176.cpumtr +++| 00338 M00S00177.cpumtr +++| PURGMAC MONITOR 00339 M00S00178.cpumtr +++| MONITOR MACRO FC,RAD 00340 M00S00179.cpumtr +++| LOCAL MRA 00341 M00S00180.cpumtr +++| IFC NE,$_RAD$B6$,1 00342 M00S00181.cpumtr +++| SB6 RAD MRA 00343 M00S00182.cpumtr +++| SX1 FC 00344 M00S00183.cpumtr +++| EQ /BUFIO/IMF ISSUE MONITOR FUNCTION 00345 M00S00184.cpumtr +++| MRA BSS 0 00346 M00S00185.cpumtr +++| ENDM 00347 M00S00186.cpumtr +++| ICTE SPACE 4,10 00348 M00S00187.cpumtr +++|** ICTE - INTERNAL CIO FUNCTION CODE TABLE ENTRY. 00349 M00S00188.cpumtr +++|* 00350 M00S00189.cpumtr +++|* ICTE FC,(FLAGS) 00351 M00S00190.cpumtr +++|* 00352 M00S00191.cpumtr +++|* FC INTERNAL CIO FUNCTION (DEFINED IN *COMSCIO*). 00353 M00S00192.cpumtr +++|* 00354 M00S00193.cpumtr +++|* FLAGS FUNCTION FLAGS. 00355 M00S00194.cpumtr +++|* BKW = BACKWARD OPERATION. 00356 M00S00195.cpumtr +++|* CRW = *READCW*/*WRITECW* OPERATION. 00357 M00S00196.cpumtr +++|* EOF = EOF OPERATION - STOP ON EOF FOR READ/SKIP, 00358 M00S00197.cpumtr +++|* FLUSH EOF FOR WRITE OPERATION. 00359 M00S00198.cpumtr +++|* EOI = EOI OPERATION - STOP ON EOI FOR READ/SKIP, 00360 M00S00199.cpumtr +++|* FLUSH DATA FROM BUFFER FOR WRITE OPERATION. 00361 M00S00200.cpumtr +++|* EOR - EOR OPERATION - STOP OF EOR FOR READ/SKIP, 00362 M00S00201.cpumtr +++|* FLUSH EOR FOR WRITE OPERATION. 00363 M00S00202.cpumtr +++|* EXF = FUNCTION LEGAL FOR EXECUTE-ONLY FILE. 00364 M00S00203.cpumtr +++|* IOF = REWIND OPERATION (SET IN = OUT = FIRST). 00365 M00S00204.cpumtr +++|* LST = *READLS*/*RPHRLS* OPERATION. 00366 M00S00205.cpumtr +++|* MSO = MASS STORAGE ONLY FUNCTION. 00367 M00S00206.cpumtr +++|* MTO = MAGNETIC TAPE ONLY FUNCTION. 00368 M00S00207.cpumtr +++|* NDT = NO DEVICE TYPE RETURNED TO FET. 00369 M00S00208.cpumtr +++|* NRW = *READN*/*WRITEN* OPERATION. 00370 M00S00209.cpumtr +++|* PRU = PRU OPERATION - STOP ON PRU FOR READ/SKIP, 00371 M00S00210.cpumtr +++|* FLUSH ONLY ONE FULL PRU FOR WRITE. 00372 M00S00211.cpumtr +++|* RFE = FUNCTION REQUIRES FNT ENTRY. 00373 M00S00212.cpumtr +++|* RWO = REWRITE OPERATION. 00374 M00S00213.cpumtr +++|* SKO = SKIP OPERATION. 00375 M00S00214.cpumtr +++|* UNL = UNLOAD OPERATION. 00376 M00S00215.cpumtr +++|* VFL = VALIDATE FIRST AND LIMIT FET PARAMETERS. 00377 M00S00216.cpumtr +++|* VIO = VALIDATE IN AND OUT FET PARAMETERS. 00378 M00S00217.cpumtr +++|* XF = EXTENDED FUNCTION LEGAL (3XX/6XX CIO CODE). 00379 M00S00218.cpumtr +++| 00380 M00S00219.cpumtr +++| 00381 M00S00220.cpumtr +++| ICTE MACRO FC,FLAGS 00382 M00S00221.cpumtr +++| LOCAL F,FG1,FG2 00383 M00S00222.cpumtr +++| FG2 SET 0 00384 M00S00223.cpumtr +++| .A IFC NE,$_FC$$ 00385 M00S00224.cpumtr +++| FG1 SET FC*100B 00386 M00S00225.cpumtr +++| .B ECHO ,F=(FLAGS) 00387 M00S00226.cpumtr +++| IFC EQ,$_F$BKW$,1 00388 M00S00227.cpumtr +++| FG1 SET FG1+4000B 00389 M00S00228.cpumtr +++| IFC EQ,$_F$CRW$,1 00390 M00S00229.cpumtr +++| FG1 SET FG1+40B 00391 M00S00230.cpumtr +++| IFC EQ,$_F$EOF$,1 00392 M00S00231.cpumtr +++| FG1 SET FG1+EOF 00393 M00S00232.cpumtr +++| IFC EQ,$_F$EOI$,1 00394 M00S00233.cpumtr +++| FG1 SET FG1+EOI 00395 M00S00234.cpumtr +++| IFC EQ,$_F$EOR$,1 00396 M00S00235.cpumtr +++| FG1 SET FG1+EOR 00397 M00S00236.cpumtr +++| IFC EQ,$_F$EXF$,1 00398 M00S00237.cpumtr +++| FG2 SET FG2+100B 00399 M00S00238.cpumtr +++| IFC EQ,$_F$IOF$,1 00400 M00S00239.cpumtr +++| FG2 SET FG2+200B 00401 M00S00240.cpumtr +++| IFC EQ,$_F$LST$,1 00402 M00S00241.cpumtr +++| FG1 SET FG1+20B 00403 M00S00242.cpumtr +++| IFC EQ,$_F$MSO$,1 00404 M00S00243.cpumtr +++| FG2 SET FG2+2000B 00405 M00S00244.cpumtr +++| IFC EQ,$_F$MTO$,1 00406 M00S00245.cpumtr +++| FG2 SET FG2+1000B 00407 M00S00246.cpumtr +++| IFC EQ,$_F$NDT$,1 00408 M00S00247.cpumtr +++| FG2 SET FG2+40B 00409 M00S00248.cpumtr +++| IFC EQ,$_F$NRW$,1 00410 M00S00249.cpumtr +++| FG1 SET FG1+20B 00411 M00S00250.cpumtr +++| IFC EQ,$_F$PRU$,1 00412 M00S00251.cpumtr +++| FG1 SET FG1+PRU 00413 M00S00252.cpumtr +++| IFC EQ,$_F$RFE$,1 00414 M00S00253.cpumtr +++| FG2 SET FG2+400B 00415 M00S00254.cpumtr +++| IFC EQ,$_F$RWO$,1 00416 M00S00255.cpumtr +++| FG1 SET FG1+2000B 00417 M00S00256.cpumtr +++| IFC EQ,$_F$SKO$,1 00418 M00S00257.cpumtr +++| FG1 SET FG1+2000B 00419 M00S00258.cpumtr +++| IFC EQ,$_F$UNL$,1 00420 M00S00259.cpumtr +++| FG1 SET FG1+2000B 00421 M00S00260.cpumtr +++| IFC EQ,$_F$VFL$,1 00422 M00S00261.cpumtr +++| FG1 SET FG1+1 00423 M00S00262.cpumtr +++| IFC EQ,$_F$VIO$,1 00424 M00S00263.cpumtr +++| FG1 SET FG1+2 00425 M00S00264.cpumtr +++| IFC EQ,$_F$XF$,1 00426 M00S00265.cpumtr +++| FG2 SET FG2+4000B 00427 M00S00266.cpumtr +++| .B ENDD 00428 M00S00267.cpumtr +++| .A ELSE 00429 M00S00268.cpumtr +++| FG1 SET 7777B 00430 M00S00269.cpumtr +++| .A ENDIF 00431 M00S00270.cpumtr +++| VFD 12/FG1,12/FG2,6/0 00432 M00S00271.cpumtr +++| ENDM
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | cpum221 |
Seq # *Modification Id* Act ----------------------------+ 00433 M01S00001.cpum221 +++| JSNMASK SPACE 4,20 00434 M01S00002.cpum221 +++|** JSNMASK - DEFINE CHARACTER MASK FOR ONE CHARACTER OF JSN. 00435 M01S00003.cpum221 +++|* 00436 M01S00004.cpum221 +++|* 00437 M01S00005.cpum221 +++|* JSNMASK LO,HI,EX 00438 M01S00006.cpum221 +++|* ENTRY *LO* = LOWEST CHARACTER TO APPEAR IN THIS POSITION. 00439 M01S00007.cpum221 +++|* *HI* = HIGHEST CHARACTER TO APPEAR IN THIS POSITION. 00440 M01S00008.cpum221 +++|* *EX* = CHARACTERS TO BE EXCLUDED FROM THIS POSITION. 00441 M01S00009.cpum221 +++| 00442 M01S00010.cpum221 +++| 00443 M01S00011.cpum221 +++| PURGMAC JSNMASK 00444 M01S00012.cpum221 +++| 00445 M01S00013.cpum221 +++| JSNMASK MACRO LO,HI,EX 00446 M01S00014.cpum221 +++| IFC EQ,$LO$$ 00447 M01S00015.cpum221 +++| .1 DECMIC 1RA DEFAULT LOWEST CHARACTER 00448 M01S00016.cpum221 +++| ELSE 00449 M01S00017.cpum221 +++| ERRNG 1R_LO-1RA VALUE IS TOO LOW 00450 M01S00018.cpum221 +++| .1 DECMIC 1R_LO LOWEST CHARACTER ALLOWABLE 00451 M01S00019.cpum221 +++| ENDIF 00452 M01S00020.cpum221 +++| IFC EQ,$HI$$ 00453 M01S00021.cpum221 +++| .2 DECMIC 1RZ DEFAULT HIGHEST CHARACTER 00454 M01S00022.cpum221 +++| ELSE 00455 M01S00023.cpum221 +++| ERRNG 1R9-1R_HI VALUE IS TOO HIGH 00456 M01S00024.cpum221 +++| .2 DECMIC 1R_HI HIGHEST CHARACTER ALLOWABLE 00457 M01S00025.cpum221 +++| ENDIF 00458 M01S00026.cpum221 +++| .2 DECMIC ".2"+1 BIT FOR HIGHEST CHARACTER + 1 00459 M01S00027.cpum221 +++| .3 MICRO 1,, -0-1S".2"+1S".1" 00460 M01S00028.cpum221 +++| ECHO 4,CH=(EX) CHARACTERS TO EXCLUDE 00461 M01S00029.cpum221 +++| IFGE 1R_CH,".1",3 00462 M01S00030.cpum221 +++| IFLT 1R_CH,".2",2 00463 M01S00031.cpum221 +++| .4 DECMIC 1R_CH 00464 M01S00032.cpum221 +++| .3 MICRO 1,, ".3"+1S".4" 00465 M01S00033.cpum221 +++| VFD 60/".3" EXCLUDED CHARACTER MASK 00466 M01S00034.cpum221 +++| ENDM 00467 M00S00272.cpumtr +++| PER SPACE 4,10 00468 M00S00273.cpumtr +++|** PER - SET ECS PARITY ERROR PROCESSING PARAMETERS. 00469 M00S00274.cpumtr +++|* 00470 M00S00275.cpumtr +++|* 00471 M00S00276.cpumtr +++|* PER X,PROC 00472 M00S00277.cpumtr +++|* ENTRY *X* = EXIT ADDRESS IN CASE OF UNRECOVERABLE ERROR.
| Line S00278 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00473 M01S00278.v23l617 ---|* *PROC* = ECS ERROR PROCESSOR.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00474 M01S00001.v23l617 +++|* *PROC* = EXTENDED MEMORY ERROR PROCESSOR. 00475 M00S00279.cpumtr +++|* IF PROC IS NOT DEFINED THEN EITHER /ECS/PER OR 00476 M00S00280.cpumtr +++|* /PROGRAM/PER IS USED AS THE PROCESSOR DEPENDING ON 00477 M00S00281.cpumtr +++|* IF THE CALL IS FROM ECS OR PROGRAM QUAL BLOCK. 00478 M00S00282.cpumtr +++| 00479 M00S00283.cpumtr +++| 00480 M00S00284.cpumtr +++| PURGMAC PER 00481 M00S00285.cpumtr +++| 00482 M00S00286.cpumtr +++| PER MACRO X,PROC 00483 M00S00287.cpumtr +++| LOCAL A 00484 M00S00288.cpumtr +++| QUAL ECS 00485 M00S00289.cpumtr +++| A EQU *+1 00486 M00S00290.cpumtr +++| QUAL * 00487 M00S00291.cpumtr +++| RJ PROC PER 00488 M00S00292.cpumtr +++| TPER RMT 00489 M00S00293.cpumtr +++| VFD 12/,18/A,12/,18/X 00490 M00S00294.cpumtr +++| TPER RMT 00491 M00S00295.cpumtr +++| ENDM
| Line S00296 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00492 M01S00296.252l678 ---| TVFD SPACE 4
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00493 M01S00006.252l678 +++| TVFD SPACE 4,25 00494 M00S00297.cpumtr +++|** TVFD - DEFINE RELOCATABLE -VFD-. 00495 M00S00298.cpumtr +++|* 00496 M00S00299.cpumtr +++|*
| Line S00300 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00497 M01S00300.252l678 ---|* TVFD N/V,V1,V2,C
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00498 M01S00007.252l678 +++|* TVFD N/V,V1,C1,V2,C2,V3,C3,V4,C4,V5,C5,V6 00499 M00S00301.cpumtr +++|* ENTRY *N* = BIT COUNT
| Line S00302 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00500 M01S00302.252l678 ---|* *V* = VALUE 00501 M01S00303.252l678 ---|* IF *C* IS NOT PRESENT 00502 M01S00304.252l678 ---|* *V1* = ADDRESS OF VALUE TO SET DURING PRESET. 00503 M01S00305.252l678 ---|* IF *V1* IS NOT PRESENT THE ORIGIN WILL BE 00504 M01S00306.252l678 ---|* USED FOR RELOCATION. 00505 M01S00307.252l678 ---|* IF *C* IS PRESENT THEN 00506 M01S00308.252l678 ---|* *V1* = THE DEFAULT VALUE TO BE SET DURING PRESET. 00507 M01S00309.252l678 ---|* *V2* = THE ALTERNATE VALUE TO BE SET DURING PRESET. 00508 M01S00310.252l678 ---|* *C* = THE ADDRESS OF THE CONDITION WORD IN PRESET 00509 M01S00311.252l678 ---|* WHICH TELLS IF THE DEFAULT OR ALTERNATE 00510 M01S00312.252l678 ---|* VALUE IS TO BE USED. 00511 M01S00313.252l678 ---|* IF THE CONDITION WORD IS NON-ZERO THEN THE 00512 M01S00314.252l678 ---|* DEFAULT VALUE *V1* WILL BE SET DURING PRESET. 00513 M01S00315.252l678 ---|* IF THE CONDITION WORD IS ZERO THEN THE 00514 M01S00316.252l678 ---|* ALTERNATE VALUE WILL BE USED.
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00515 M01S00008.252l678 +++|* *V* = BASE VALUE TO WHICH A *VI* WILL BE ADDED. 00516 M01S00009.252l678 +++|* IF *C1* IS NOT PRESENT 00517 M01S00010.252l678 +++|* *V1* = ADDRESS OF VALUE TO BE ADDED DURING PRESET. 00518 M01S00011.252l678 +++|* IF *C1* IS PRESENT THEN 00519 M01S00012.252l678 +++|* *VI* = THE VALUE TO BE ADDED DURING PRESET, IF THE 00520 M01S00013.252l678 +++|* CORRESPONDING *CI* IS TRUE. 00521 M01S00014.252l678 +++|* *CI* = THE ADDRESS OF THE CONDITION WORD IN PRESET 00522 M01S00015.252l678 +++|* WHICH TELLS IF THE CORRESPONDING VALUE IS TO BE 00523 M01S00016.252l678 +++|* BE USED. IF THE CONDITION WORD IS ZERO, THE 00524 M01S00017.252l678 +++|* CORRESPONDING VALUE WILL BE USED. THE *CI*S ARE 00525 M01S00018.252l678 +++|* CHECKED IN ORDER, FROM LEFT TO RIGHT, UNTIL A 00526 M01S00019.252l678 +++|* TRUE CONDITION IS FOUND. IF NONE OF THE 00527 M01S00020.252l678 +++|* CONDITIONS ARE TRUE, *VN* IS USED. 00528 M01S00021.252l678 +++|* *VN* = THE DEFAULT VALUE TO BE SET DURING PRESET. 00529 M01S00022.252l678 +++|* IT IS THE LAST VALUE SPECIFIED AND MUST NOT 00530 M01S00023.252l678 +++|* HAVE A CONDITION ASSOCIATED WITH IT. 00531 M00S00317.cpumtr +++| 00532 M00S00318.cpumtr +++| 00533 M00S00319.cpumtr +++| PURGMAC TVFD 00534 M00S00320.cpumtr +++|
| Line S00321 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00535 M01S00321.252l678 ---| TVFD MACRO V,V1,V2,C
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00536 M01S00024.252l678 +++| TVFD MACRO V,V1,C1,V2,C2,V3,C3,V4,C4,V5,C5,V6
| Line S00057 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00537 M01S00057.253l688 +++| LOCAL S 00538 M00S00322.cpumtr +++|* EXTRACT FIELD WIDTH 00539 M00S00323.cpumtr +++| .1 MICRO 1,,/V 00540 M00S00324.cpumtr +++| .1 MICCNT .1 00541 M00S00325.cpumtr +++|* CHECK FOR RELOCATION REQUIRED 00542 M00S00326.cpumtr +++| .2 MICRO .1+2,, V
| Line S00058 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00543 M01S00058.253l688 +++| .A IFC EQ,$V1$$ 00544 M00S00327.cpumtr +++| VFD ".1"/".2"
| Line S00328 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00545 M01S00328.253l688 ---| IFC NE,$V1$$,1
| Line S00329 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00546 M02S00329.253l688 ---| SAC ".1",V1,V2,C
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00547 M02S00025.253l688 ---| SAC ".1",V1,C1,V2,C2,V3,C3,V4,C4,V5,C5,V6
| Line S00059 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00548 M01S00059.253l688 +++| .A ELSE 00549 M01S00060.253l688 +++| VFD ".1"/S+".2" 00550 M01S00061.253l688 +++| S SAC ".1",V1,C1,V2,C2,V3,C3,V4,C4,V5,C5,V6 00551 M01S00062.253l688 +++| IF -DEF,S,1 00552 M01S00063.253l688 +++| ERRNZ ".2" 0 V MUST BE ZERO IN A CONDITIONAL *VFD* 00553 M01S00064.253l688 +++| .A ENDIF 00554 M00S00330.cpumtr +++| ENDM
| Line S00331 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00555 M01S00331.252l678 ---| SAC SPACE 4
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00556 M02S00026.271l750 ---| SAC SPACE 4,20
| Line S00057 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00557 M01S00057.271l750 +++| SAC SPACE 4,40 00558 M00S00332.cpumtr +++|** SAC - SUBSTITUTE ADDRESS CONSTANT. 00559 M00S00333.cpumtr +++|* 00560 M00S00334.cpumtr +++|*
| Line S00058 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00561 M01S00058.271l750 +++|* THERE ARE TWO FORMS OF THE *SAC* MACRO. IF TWO PARAMETERS 00562 M01S00059.271l750 +++|* ARE SPECIFIED, *SAC* CAUSES A PRESET DETERMINED VALUE TO BE 00563 M01S00060.271l750 +++|* ADDED TO A SPECIFIED FIELD. IF MORE THAN TWO PARAMETERS ARE 00564 M01S00061.271l750 +++|* SECIFIED, *SAC* CAUSES A SPECIFIED VALUE TO BE SUBSTITUTED 00565 M01S00062.271l750 +++|* INTO THE FIELD ACCORDING TO A PRESET DETERMINED CONDITION. 00566 M01S00063.271l750 +++|* 00567 M01S00064.271l750 +++|* SAC W,V 00568 M01S00065.271l750 +++|* 00569 M01S00066.271l750 +++|* ENTRY *W* = FIELD WIDTH. 00570 M01S00067.271l750 +++|* 00571 M01S00068.271l750 +++|* *V* = ADDRESS OF WORD IN PRESET WHOSE VALUE WILL BE 00572 M01S00069.271l750 +++|* ADDED TO THE SPECIFIED FIELD. 00573 M01S00070.271l750 +++|*
| Line S00335 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00574 M01S00335.252l678 ---|* SAC W,V1,V2,C
| Line S00027 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00575 M01S00027.252l678 +++|* SAC W,V1,C1,V2,C2,V3,C3,V4,C4,V5,C5,V6
| Line S00336 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00576 M01S00336.271l750 ---|* ENTRY *W* FIELD WIDTH.
| Line S00337 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00577 M02S00337.271l750 ---|* IF *C* IS NOT PRESENT
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00578 M02S00028.271l750 ---|* IF *C1* IS NOT PRESENT
| Line S00338 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00579 M01S00338.271l750 ---|* *V1* = ADDRESS OF VALUE TO SET DURING PRESET.
| Line S00339 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00580 M02S00339.271l750 ---|* IF *C* IS PRESENT THEN 00581 M02S00340.271l750 ---|* *V1* = THE DEFAULT VALUE TO BE SET DURING PRESET. 00582 M02S00341.271l750 ---|* *V2* = THE ALTERNATE VALUE TO BE SET DURING PRESET. 00583 M02S00342.271l750 ---|* *C* = THE ADDRESS OF THE CONDITION WORD IN PRESET 00584 M02S00343.271l750 ---|* WHICH TELLS IF THE DEFAULT OR ALTERNATE 00585 M02S00344.271l750 ---|* VALUE IS TO BE USED. 00586 M02S00345.271l750 ---|* IF THE CONDITION WORD IS NON-ZERO THEN THE 00587 M02S00346.271l750 ---|* DEFAULT VALUE *V1* WILL BE SET DURING PRESET. 00588 M02S00347.271l750 ---|* IF THE CONDITION WORD IS ZERO THEN THE 00589 M02S00348.271l750 ---|* ALTERNATE VALUE WILL BE USED.
| Line S00029 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00590 M02S00029.271l750 ---|* IF *C1* IS PRESENT THEN 00591 M02S00030.271l750 ---|* *VI* = THE VALUE TO BE SET DURING PRESET, IF THE 00592 M02S00031.271l750 ---|* CORRESPONDING *CI* IS TRUE.
| Line S00071 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00593 M01S00071.271l750 +++|* 00594 M01S00072.271l750 +++|* ENTRY *W* = FIELD WIDTH. 00595 M01S00073.271l750 +++|* 00596 M01S00074.271l750 +++|* *VI* = THE VALUE TO BE SUBSTITUTED INTO THE SPECIFIED 00597 M01S00075.271l750 +++|* FIELD DURING PRESET, IF THE CORRESPONDING *CI* 00598 M01S00076.271l750 +++|* IS TRUE. 00599 M01S00077.271l750 +++|*
| Line S00032 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00600 M01S00032.252l678 +++|* *CI* = THE ADDRESS OF THE CONDITION WORD IN PRESET 00601 M01S00033.252l678 +++|* WHICH TELLS IF THE CORRESPONDING VALUE IS TO BE
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00602 M02S00034.271l750 ---|* BE USED. IF THE CONDITION WORD IS ZERO, THE 00603 M02S00035.271l750 ---|* CORRESPONDING VALUE WILL BE USED. THE *CI*S ARE 00604 M02S00036.271l750 ---|* CHECKED IN ORDER, FROM LEFT TO RIGHT, UNTIL A 00605 M02S00037.271l750 ---|* TRUE CONDITION IS FOUND. IF NONE OF THE 00606 M02S00038.271l750 ---|* CONDITIONS ARE TRUE, *VN* IS USED.
| Line S00078 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 00607 M01S00078.271l750 +++|* BE USED. IF THE CONDITION WORD IS NON-ZERO 00608 M01S00079.271l750 +++|* (THE CONDITION IS TRUE), THE CORRESPONDING 00609 M01S00080.271l750 +++|* VALUE WILL BE USED. THE *CI*S ARE CHECKED IN 00610 M01S00081.271l750 +++|* ORDER, FROM LEFT TO RIGHT, UNTIL A TRUE 00611 M01S00082.271l750 +++|* CONDITION IS FOUND. IF NONE OF THE CONDITIONS 00612 M01S00083.271l750 +++|* ARE TRUE, *VN* IS USED. 00613 M01S00084.271l750 +++|*
| Line S00039 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00614 M01S00039.252l678 +++|* *VN* = THE DEFAULT VALUE TO BE SET DURING PRESET. 00615 M01S00040.252l678 +++|* IT IS THE LAST VALUE SPECIFIED AND MUST NOT 00616 M01S00041.252l678 +++|* HAVE A CONDITION ASSOCIATED WITH IT. 00617 M00S00349.cpumtr +++| 00618 M00S00350.cpumtr +++| 00619 M00S00351.cpumtr +++| PURGMAC SAC 00620 M00S00352.cpumtr +++|
| Line S00353 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00621 M01S00353.252l678 ---| SAC MACRO W,V1,V2,C
| Line S00042 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00622 M02S00042.253l688 ---| SAC MACRO W,V1,C1,V2,C2,V3,C3,V4,C4,V5,C5,V6
| Line S00065 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00623 M01S00065.253l688 +++| MACRO SAC,S,W,V1,C1,V2,C2,V3,C3,V4,C4,V5,C5,V6 00624 M01S00066.253l688 +++| LOCAL N 00625 M00S00354.cpumtr +++| QUAL PRESET 00626 M00S00355.cpumtr +++| .1 SET *-*P/60 00627 M00S00356.cpumtr +++| .2 SET W+*P-*P/60*60 00628 M00S00357.cpumtr +++| USE /TREL/
| Line S00358 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00629 M01S00358.252l678 ---| .A IFC EQ,$C$$
| Line S00043 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00630 M01S00043.252l678 +++| .A IFC EQ,$C1$$ 00631 M00S00359.cpumtr +++| .3 MICRO 1,1,$V1$ 00632 M00S00360.cpumtr +++| .B IFC NE,$".3"$-$
| Line S00361 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00633 M01S00361.253l688 ---| + VFD 6/.2,6/W,18/V1,12/,18/.1
| Line S00067 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00634 M01S00067.253l688 +++| + VFD 6/.2,6/W,18/V1,12/2000B,18/.1 00635 M00S00362.cpumtr +++| .B ELSE 00636 M00S00363.cpumtr +++| .3 MICRO 2,,$V1$
| Line S00364 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00637 M01S00364.253l688 ---| + VFD 6/.2,6/W,18/".3",12/4000B,18/.1
| Line S00068 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00638 M01S00068.253l688 +++| + VFD 6/.2,6/W,18/".3",12/-2000B,18/.1 00639 M00S00365.cpumtr +++| .B ENDIF 00640 M00S00366.cpumtr +++| .A ELSE
| Line S00367 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00641 M01S00367.252l678 ---| + VFD 6/.2,6/W,18/C,12/2000B,18/.1
| Line S00044 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00642 M02S00044.253l688 ---| + VFD 6/.2,6/W,18/C1,12/2000B,18/.1
| Line S00368 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00643 M01S00368.253l688 ---| + JP V2 00644 M01S00369.253l688 ---| - JP V1
| Line S00069 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00645 M01S00069.253l688 +++| + VFD 6/.2,6/W,18/C1,12/2000B+N,18/.1 00646 M01S00070.253l688 +++| .B IFLE W,24D 00647 M01S00071.253l688 +++| + JP V1 FIRST ALTERNATE 00648 M01S00072.253l688 +++| - JP V6 V5 V4 V3 V2 V1 00649 M01S00073.253l688 +++| .1 SET 1 00650 M01S00074.253l688 +++| .D ECHO ,V=(V2,V3,V4,V5,V6),C=(C2,C3,C4,C5,) 00651 M01S00075.253l688 +++| .E IFC NE,$C$$ 00652 M01S00076.253l688 +++| + JP V NEXT ALTERNATE 00653 M01S00077.253l688 +++| - VFD 30/C 00654 M01S00078.253l688 +++| .1 SET .1+1 00655 M01S00079.253l688 +++| .E ELSE 00656 M01S00080.253l688 +++| STOPDUP 00657 M01S00081.253l688 +++| IFC EQ,$V$$,1 00658 M01S00082.253l688 +++| ERR NO DEFAULT HAS BEEN SPECIFIED 00659 M01S00083.253l688 +++| .E ENDIF 00660 M01S00084.253l688 +++| .D ENDD 00661 M01S00085.253l688 +++| N EQU .1 00662 M01S00086.253l688 +++| .B ELSE 00663 M01S00087.253l688 +++| + VFD 30/V1 ALTERNATE 00664 M01S00088.253l688 +++| - VFD 30/V2 DEFAULT 00665 M01S00089.253l688 +++| N EQU 1 00666 M01S00090.253l688 +++| .B ENDIF 00667 M01S00091.253l688 +++| .A ENDIF 00668 M01S00092.253l688 +++| 00669 M01S00093.253l688 +++| .A IFC NE,$S$$ 00670 M01S00094.253l688 +++| .B IFC EQ,$C1$$ 00671 M01S00095.253l688 +++| QUAL 00672 M01S00096.253l688 +++| S EQU 0 00673 M01S00097.253l688 +++| QUAL * 00674 M01S00098.253l688 +++| .B ELSE 00675 M01S00099.253l688 +++| SAC RMT 00676 M01S00100.253l688 +++| QUAL 00677 M01S00101.253l688 +++| S EQU V1 00678 M01S00102.253l688 +++| QUAL * 00679 M01S00103.253l688 +++| RMT 00680 M01S00104.253l688 +++| .B ENDIF 00681 M00S00370.cpumtr +++| .A ENDIF 00682 M00S00371.cpumtr +++| USE * 00683 M00S00372.cpumtr +++| QUAL * 00684 M00S00373.cpumtr +++| ENDM 00685 M00S00374.cpumtr +++| OPDEFS SPACE 4
| Line S00375 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00686 M01S00375.253l688 ---|* THE FOLLOWING OPDEFS PROVIDE THE CAPABILITY TO SET THE 00687 M01S00376.253l688 ---|* ADDRESS (*K* PORTION) OF A SET INSTRUCTION DURING CPUMTR 00688 M01S00377.253l688 ---|* PRESET. THE ADDRESS PORTION CONTAINS A TAG DEFINED IN 00689 M01S00378.253l688 ---|* THE PRESET TABLE OF RELOCATION VALUES. DURING PRESET THE 00690 M01S00379.253l688 ---|* VALUE IN THE TABLE IS ADDED TO THE ADDRESS PORTION OF THE 00691 M01S00380.253l688 ---|* INSTRUCTION.
| Line S00105 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00692 M01S00105.253l688 +++|** CONDITIONAL ADDRESS SETTING. 00693 M00S00381.cpumtr +++|*
| Line S00382 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00694 M01S00382.253l688 ---|** CONDITIONAL ADDRESS SETTING. 00695 M01S00383.253l688 ---|* 00696 M01S00384.253l688 ---|* THE CAPABILITY EXISTS TO PRESET THE ADDRESS PORTION OF 00697 M01S00385.253l688 ---|* AN INSTRUCTION TO ONE OF TWO POSSIBLE VALUES DEPENDING ON 00698 M01S00386.253l688 ---|* A *CONDITION* WORD IN THE PRESET RELOCATION TABLE.
| Line S00106 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00699 M01S00106.253l688 +++|* THE CAPABILITY EXISTS TO PRESET THE ADDRESS PORTION OF AN 00700 M01S00107.253l688 +++|* INSTRUCTION TO A VALUE DETERMINED DURING DEADSTART OR TO ONE 00701 M01S00108.253l688 +++|* OF SEVERAL VALUES DEPENDING ON A *CONDITION* WORD IN THE 00702 M01S00109.253l688 +++|* PRESET RELOCATION TABLE. 00703 M00S00387.cpumtr +++|* IN ORDER TO SET THE ADDRESS PORTION CONDITIONALLY A MACRO 00704 M00S00388.cpumtr +++|* MUST BE WRITTEN WHICH CALLS THE *SAC* MACRO TO SET THE 00705 M00S00389.cpumtr +++|* ADDRESS PORTION OF THE INSTRUCTIONS. 00706 M00S00390.cpumtr +++|*
| Line S00391 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00707 M01S00391.253l688 ---|* A FULL SET OF MACROES IS AVAILABLE FOR THE JUMP INSTRUCTIONS. 00708 M01S00392.253l688 ---|* THE FORM OF A CONDITIONAL JUMP INSTRUCTION IS AS FOLLOWS.
| Line S00110 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00709 M01S00110.253l688 +++|* AN EXTENSIVE SET OF OPDEFS IS AVAILABLE FOR UNCONDITIONALLY 00710 M01S00111.253l688 +++|* PRESETTING THE SET INSTRUCTIONS. THERE ARE MANY FORMS OF THE 00711 M01S00112.253l688 +++|* INSTRUCTIONS DEFINED. SOME EXAMPLES ARE - 00712 M00S00393.cpumtr +++|*
| Line S00394 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00713 M01S00394.253l688 ---|* TJP (/PROGRAM/TAG1,/MONITOR/HNG1,MMF)
| Line S00113 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00714 M01S00113.253l688 +++|* TA2 MS2W,SCA 00715 M01S00114.253l688 +++|* TX3 B7+FLSW,TAG 00716 M00S00395.cpumtr +++|*
| Line S00115 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00717 M01S00115.253l688 +++|* THE RESULTING INSTRUCTIONS AFTER PRESET WOULD BE - 00718 M01S00116.253l688 +++|* SA2 MS2W + CONTENTS OF */PRESET/SCA* 00719 M01S00117.253l688 +++|* SX3 B7+FLSW + CONTENTS OF */PRESET/TAG* 00720 M01S00118.253l688 +++|* 00721 M01S00119.253l688 +++|* IN MOST CASES THE FIRST PARAMETER CAN BE A CONSTANT, A 00722 M01S00120.253l688 +++|* REGISTER, THEIR SUM OR DIFFERENCE, OR OMITTED ALTOGETHER. 00723 M01S00121.253l688 +++|* THE SECOND PARAMETER (OR ONLY PARAMETER) IS PASSED TO THE 00724 M01S00122.253l688 +++|* *SAC* MACRO. REFER TO ITS DOCUMENTATION FOR THE POSSIBLE 00725 M01S00123.253l688 +++|* OPTIONS. 00726 M01S00124.253l688 +++|* 00727 M01S00125.253l688 +++|* A SMALLER COLLECTION OF MACROS PERMITS THE CONDITIONAL 00728 M01S00126.253l688 +++|* PRESETTING OF SET INSTRUCTIONS. ANY OR ALL OF THE PARAMETERS 00729 M01S00127.253l688 +++|* MAY CONTAIN A VALUE, A B-REGISTER, OR THEIR SUM. 00730 M01S00128.253l688 +++|* 00731 M01S00129.253l688 +++|* TSX0 (B3+OFFSET,CONDITION,TAG) 00732 M01S00130.253l688 +++|* 00733 M00S00396.cpumtr +++|* THE RESULTING INSTRUCTION AFTER PRESET WOULD BE -
| Line S00397 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00734 M01S00397.253l688 ---|* JP /PROGRAM/TAG1 JUMP TO TAG1 IF MMF PRESENT 00735 M01S00398.253l688 ---|* JP /MONITOR/HNG1 JUMP TO HANG IF MMF NOT PRESENT 00736 M01S00399.253l688 ---|* 00737 M01S00400.253l688 ---|* EITHER OR BOTH OF THE PARAMETERS OF A *TJP* INSTRUCTION 00738 M01S00401.253l688 ---|* MAY ALSO CONTAIN A REGISTER OR A REGISTER PLUS OFFSET. 00739 M01S00402.253l688 ---|* IN SHORT, THE PARAMETERS MAY BE OF ANY FORMAT ALLOWABLE ON 00740 M01S00403.253l688 ---|* THE *JP* INSTRUCTION. 00741 M01S00404.253l688 ---|* 00742 M01S00405.253l688 ---|* TJP (B3+OFFSET,B6,CONDITION) 00743 M01S00406.253l688 ---|* 00744 M01S00407.253l688 ---|* THE RESULTING INSTRUCTION AFTER PRESET WOULD BE - 00745 M01S00408.253l688 ---|* JP B3+OFFSET IF CONDITION PRESENT 00746 M01S00409.253l688 ---|* JP B6 IF CONDITION NOT PRESENT 00747 M01S00410.253l688 ---|* 00748 M01S00411.253l688 ---|* ALSO MACROES MAY BE DEFINED TO SET THE SHIFT COUNT PORTION 00749 M01S00412.253l688 ---|* OF A SHIFT INSTRUCTION. SINCE THESE ARE RARELY USED THEY 00750 M01S00413.253l688 ---|* WILL BE DEFINED ONLY WHEN NEEDED. THE FORM OF A CONDITIONAL 00751 M01S00414.253l688 ---|* SHIFT INSTRUCTION IS IDENTICAL TO THE OTHER CONDITIONAL 00752 M01S00415.253l688 ---|* INSTRUCTIONS.
| Line S00131 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00753 M01S00131.253l688 +++|* SX0 B3+OFFSET IF CONDITION PRESENT 00754 M01S00132.253l688 +++|* SX0 TAG IF CONDITION NOT PRESENT 00755 M00S00416.cpumtr +++| 00756 M00S00417.cpumtr +++| 00757 M00S00418.cpumtr +++| TAQ OPDEF I,L 00758 M00S00419.cpumtr +++| SA.I 0 00759 M00S00420.cpumtr +++| SAC 18,L 00760 M00S00421.cpumtr +++| ENDM 00761 M00S00422.cpumtr +++| 00762 M00S00423.cpumtr +++| PURGDEF TBQ 00763 M00S00424.cpumtr +++| 00764 M00S00425.cpumtr +++| TBQ OPDEF I,L 00765 M00S00426.cpumtr +++| SB.I 0 00766 M00S00427.cpumtr +++| SAC 18,L 00767 M00S00428.cpumtr +++| ENDM 00768 M00S00429.cpumtr +++| 00769 M00S00430.cpumtr +++| TXQ OPDEF I,L 00770 M00S00431.cpumtr +++| SX.I 0 00771 M00S00432.cpumtr +++| SAC 18,L 00772 M00S00433.cpumtr +++| ENDM 00773 M00S00434.cpumtr +++| 00774 M00S00435.cpumtr +++| TAQ,Q OPDEF I,K,L 00775 M00S00436.cpumtr +++| SA.I K 00776 M00S00437.cpumtr +++| SAC 18,L 00777 M00S00438.cpumtr +++| ENDM 00778 M00S00439.cpumtr +++| 00779 M00S00440.cpumtr +++| TBQ,Q OPDEF I,K,L 00780 M00S00441.cpumtr +++| SB.I K 00781 M00S00442.cpumtr +++| SAC 18,L 00782 M00S00443.cpumtr +++| ENDM 00783 M00S00444.cpumtr +++| 00784 M00S00445.cpumtr +++| TXQ,Q OPDEF I,K,L 00785 M00S00446.cpumtr +++| SX.I K 00786 M00S00447.cpumtr +++| SAC 18,L 00787 M00S00448.cpumtr +++| ENDM 00788 M00S00449.cpumtr +++| 00789 M00S00450.cpumtr +++| TAAQ,Q OPDEF I,J,K,L 00790 M00S00451.cpumtr +++| SA.I A.J+K 00791 M00S00452.cpumtr +++| SAC 18,L 00792 M00S00453.cpumtr +++| ENDM 00793 M00S00454.cpumtr +++| 00794 M00S00455.cpumtr +++| TBAQ,Q OPDEF I,J,K,L 00795 M00S00456.cpumtr +++| SB.I A.J+K 00796 M00S00457.cpumtr +++| SAC 18,L 00797 M00S00458.cpumtr +++| ENDM 00798 M00S00459.cpumtr +++| 00799 M00S00460.cpumtr +++| TXAQ,Q OPDEF I,J,K,L 00800 M00S00461.cpumtr +++| SX.I A.J+K 00801 M00S00462.cpumtr +++| SAC 18,L 00802 M00S00463.cpumtr +++| ENDM 00803 M00S00464.cpumtr +++| 00804 M00S00465.cpumtr +++| TABQ,Q OPDEF I,J,K,L 00805 M00S00466.cpumtr +++| SA.I B.J+K 00806 M00S00467.cpumtr +++| SAC 18,L 00807 M00S00468.cpumtr +++| ENDM 00808 M00S00469.cpumtr +++| 00809 M00S00470.cpumtr +++| TBBQ,Q OPDEF I,J,K,L 00810 M00S00471.cpumtr +++| SB.I B.J+K 00811 M00S00472.cpumtr +++| SAC 18,L 00812 M00S00473.cpumtr +++| ENDM 00813 M00S00474.cpumtr +++| 00814 M00S00475.cpumtr +++| TXBQ,Q OPDEF I,J,K,L 00815 M00S00476.cpumtr +++| SX.I B.J+K 00816 M00S00477.cpumtr +++| SAC 18,L 00817 M00S00478.cpumtr +++| ENDM 00818 M00S00479.cpumtr +++| 00819 M00S00480.cpumtr +++| TAXQ,Q OPDEF I,J,K,L 00820 M00S00481.cpumtr +++| SA.I X.J+K 00821 M00S00482.cpumtr +++| SAC 18,L 00822 M00S00483.cpumtr +++| ENDM 00823 M00S00484.cpumtr +++| 00824 M00S00485.cpumtr +++| TBXQ,Q OPDEF I,J,K,L 00825 M00S00486.cpumtr +++| SB.I X.J+K 00826 M00S00487.cpumtr +++| SAC 18,L 00827 M00S00488.cpumtr +++| ENDM 00828 M00S00489.cpumtr +++| 00829 M00S00490.cpumtr +++| TXXQ,Q OPDEF I,J,K,L 00830 M00S00491.cpumtr +++| SX.I X.J+K 00831 M00S00492.cpumtr +++| SAC 18,L 00832 M00S00493.cpumtr +++| ENDM 00833 M00S00494.cpumtr +++| 00834 M00S00495.cpumtr +++| TAA,Q OPDEF I,J,L 00835 M00S00496.cpumtr +++| SA.I A.J+0 00836 M00S00497.cpumtr +++| SAC 18,L 00837 M00S00498.cpumtr +++| ENDM 00838 M00S00499.cpumtr +++| 00839 M00S00500.cpumtr +++| TBA,Q OPDEF I,J,L 00840 M00S00501.cpumtr +++| SB.I A.J+0 00841 M00S00502.cpumtr +++| SAC 18,L 00842 M00S00503.cpumtr +++| ENDM 00843 M00S00504.cpumtr +++| 00844 M00S00505.cpumtr +++| TXA,Q OPDEF I,J,L 00845 M00S00506.cpumtr +++| SX.I A.J+0 00846 M00S00507.cpumtr +++| SAC 18,L 00847 M00S00508.cpumtr +++| ENDM 00848 M00S00509.cpumtr +++| 00849 M00S00510.cpumtr +++| TAB,Q OPDEF I,J,L 00850 M00S00511.cpumtr +++| SA.I B.J+0 00851 M00S00512.cpumtr +++| SAC 18,L 00852 M00S00513.cpumtr +++| ENDM 00853 M00S00514.cpumtr +++| 00854 M00S00515.cpumtr +++| TBB,Q OPDEF I,J,L 00855 M00S00516.cpumtr +++| SB.I B.J+0 00856 M00S00517.cpumtr +++| SAC 18,L 00857 M00S00518.cpumtr +++| ENDM 00858 M00S00519.cpumtr +++| 00859 M00S00520.cpumtr +++| TXB,Q OPDEF I,J,L 00860 M00S00521.cpumtr +++| SX.I B.J+0 00861 M00S00522.cpumtr +++| SAC 18,L 00862 M00S00523.cpumtr +++| ENDM 00863 M00S00524.cpumtr +++| 00864 M00S00525.cpumtr +++| TAX,Q OPDEF I,J,L 00865 M00S00526.cpumtr +++| SA.I X.J+0 00866 M00S00527.cpumtr +++| SAC 18,L 00867 M00S00528.cpumtr +++| ENDM 00868 M00S00529.cpumtr +++| 00869 M00S00530.cpumtr +++| TBX,Q OPDEF I,J,L 00870 M00S00531.cpumtr +++| SB.I X.J+0 00871 M00S00532.cpumtr +++| SAC 18,L 00872 M00S00533.cpumtr +++| ENDM 00873 M00S00534.cpumtr +++| 00874 M00S00535.cpumtr +++| TXX,Q OPDEF I,J,L 00875 M00S00536.cpumtr +++| SX.I X.J+0 00876 M00S00537.cpumtr +++| SAC 18,L 00877 M00S00538.cpumtr +++| ENDM
| Line S00539 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00878 M01S00539.253l688 ---| SPACE 4 00879 M01S00540.253l688 ---|** DEFINE FORM FOR JUMP INSTRUCTIONS TO SET ADDRESS PORTION 00880 M01S00541.253l688 ---|* DURING PRESET. 00881 M00S00542.cpumtr +++|
| Line S00133 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00882 M01S00133.253l688 +++| OPDEFS SPACE 4,10 00883 M01S00134.253l688 +++|** THE FOLLOWING *ECHO* PSEUDO-OP DEFINES A SET OF MACROS THAT 00884 M01S00135.253l688 +++|* PERMITS THE REGISTERS IN THE LIST TO BE SET WITH CONDITIONAL 00885 M01S00136.253l688 +++|* VALUES. 00886 M00S00543.cpumtr +++|
| Line S00544 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00887 M01S00544.253l688 ---| TJP MACRO J,L
| Line S00137 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00888 M01S00137.253l688 +++|
| Line S00138 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
M02 (Removed by) | ns2677 |
Seq # *Modification Id* Act ----------------------------+ 00889 M02S00138.ns2677 ---| ECHO ,R=(A2,B3,B4,B6,X0,X1,X2,X3,X4,X5,X6,X7)
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2677 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 00890 M02S00001.273l780 ---| ECHO ,R=(A2,A3,B3,B4,B6,X0,X1,X2,X3,X4,X5,X6,X7)
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 00891 M01S00001.273l780 +++| ECHO ,R=(A1,A2,A3,B3,B4,B6,X0,X1,X2,X3,X4,X5,X6,X7)
| Line S00139 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00892 M01S00139.253l688 +++| 00893 M01S00140.253l688 +++| PURGMAC TS_R 00894 M01S00141.253l688 +++| 00895 M01S00142.253l688 +++| TS_R MACRO L,M THE *M* SHOULD BE REMOVED LATER 00896 M01S00143.253l688 +++| LOCAL T 00897 M01S00144.253l688 +++| S_R T+B0 00898 M01S00145.253l688 +++| IFC NE,$M$$,4 THIS IS TRANSITIONAL CODE ** 00899 M01S00146.253l688 +++| IFEQ L,0,1 ** 00900 M01S00147.253l688 +++| T SAC 21,M "TWOPARS" "SEQNO" ** 00901 M01S00148.253l688 +++| ELSE 1 ** 00902 M01S00149.253l688 +++| T SAC 21,L 00903 M01S00150.253l688 +++| ENDM 00904 M01S00151.253l688 +++| 00905 M01S00152.253l688 +++| ENDD 00906 M01S00153.253l688 +++| OPDEFS SPACE 4 00907 M01S00154.253l688 +++|** JUMP MACROS. 00908 M01S00155.253l688 +++|* 00909 M01S00156.253l688 +++|* A FULL SET OF MACROS IS AVAILABLE FOR THE JUMP INSTRUCTIONS. 00910 M01S00157.253l688 +++|* THE FORM OF A CONDITIONAL JUMP INSTRUCTION IS AS FOLLOWS. 00911 M01S00158.253l688 +++|* 00912 M01S00159.253l688 +++|* TNZ X4,(/ISD/SUB3,ISD,/LSPMMF/SUB2,MMF,/MONITOR/PPRX) 00913 M01S00160.253l688 +++|* 00914 M01S00161.253l688 +++|* THE RESULTING INSTRUCTION AFTER PRESET WOULD BE - 00915 M01S00162.253l688 +++|* NZ X4,/ISD/SUB3 JUMP TO SUB3 IF ISD PRESENT 00916 M01S00163.253l688 +++|* NZ X4,/LSPMMF/SUB2 JUMP TO SUB2 IF MMF PRESENT 00917 M01S00164.253l688 +++|* NZ X4,/MONITOR/PPRX OTHERWISE JUMP TO PPRX 00918 M01S00165.253l688 +++|* 00919 M01S00166.253l688 +++|* ANY OR ALL OF THE PARAMETERS OF A *TJP* INSTRUCTION MAY ALSO 00920 M01S00167.253l688 +++|* CONTAIN A REGISTER OR A REGISTER PLUS OFFSET. THE PARAMETERS 00921 M01S00168.253l688 +++|* MAY BE ANY ALLOWED ON THE *JP* INSTRUCTION. 00922 M01S00169.253l688 +++|* 00923 M01S00170.253l688 +++|* TJP (/PROGRAM/TAG1,MMF,/MONITOR/HNG1) 00924 M01S00171.253l688 +++|* 00925 M01S00172.253l688 +++|* THE RESULTING INSTRUCTION AFTER PRESET WOULD BE - 00926 M01S00173.253l688 +++|* JP 0+/PROGRAM/TAG1 JUMP TO TAG1 IF MMF PRESENT 00927 M01S00174.253l688 +++|* JP 0+/MONITOR/HNG1 JUMP TO HNG1 IF MMF NOT PRESENT 00928 M01S00175.253l688 +++| 00929 M01S00176.253l688 +++| 00930 M01S00177.253l688 +++| TJP MACRO L,M THE *M* SHOULD BE REMOVED LATER 00931 M01S00178.253l688 +++| LOCAL S 00932 M01S00179.253l688 +++| JP S 00933 M01S00180.253l688 +++| IFC NE,$M$$,4 THIS IS TRANSITIONAL CODE ** 00934 M01S00181.253l688 +++|0 ERR *TJP* CAN HAVE ONLY ONE PARAMETER ** 00935 M01S00182.253l688 +++| IFEQ L,0,1 ** 00936 M01S00183.253l688 +++| S SAC 24,M ** 00937 M01S00184.253l688 +++| ELSE 1 ** 00938 M01S00185.253l688 +++| S SAC 24,L 00939 M01S00186.253l688 +++| ENDM 00940 M01S00187.253l688 +++| 00941 M01S00188.253l688 +++| TEQ MACRO L 00942 M01S00189.253l688 +++| LOCAL S 00943 M01S00190.253l688 +++| EQ S 00944 M01S00191.253l688 +++| S SAC 18,L 00945 M01S00192.253l688 +++| ENDM 00946 M01S00193.253l688 +++| 00947 M01S00194.253l688 +++| TGE MACRO J,K,L 00948 M01S00195.253l688 +++| LOCAL S 00949 M00S00545.cpumtr +++| .1 MICRO 1,, J
| Line S00546 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00950 M01S00546.253l688 ---| JP ".1" 00951 M01S00547.253l688 ---| SAC 24,L
| Line S00196 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00952 M01S00196.253l688 +++| .2 MICRO 1,, K 00953 M01S00197.253l688 +++| GE ".1",".2",S 00954 M01S00198.253l688 +++| S SAC 18,L 00955 M00S00548.cpumtr +++| ENDM 00956 M00S00549.cpumtr +++|
| Line S00550 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00957 M01S00550.253l688 ---| TEQ MACRO L 00958 M01S00551.253l688 ---| EQ 0 00959 M01S00552.253l688 ---| SAC 18,L
| Line S00199 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00960 M01S00199.253l688 +++| TGT MACRO J,K,L 00961 M01S00200.253l688 +++| LOCAL S 00962 M01S00201.253l688 +++| .1 MICRO 1,, J 00963 M01S00202.253l688 +++| .2 MICRO 1,, K 00964 M01S00203.253l688 +++| GT ".1",".2",S 00965 M01S00204.253l688 +++| S SAC 18,L 00966 M00S00553.cpumtr +++| ENDM 00967 M00S00554.cpumtr +++|
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00968 M02S00006.253l688 ---| TGE MACRO J,K,L
| Line S00205 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00969 M01S00205.253l688 +++| TZR MACRO J,L 00970 M01S00206.253l688 +++| LOCAL S
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00971 M01S00007.251l664 +++| .1 MICRO 1,, J
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00972 M02S00008.253l688 ---| .2 MICRO 1,, K 00973 M02S00009.253l688 ---| GE ".1",".2",0 00974 M02S00010.253l688 ---| SAC 18,L
| Line S00207 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00975 M01S00207.253l688 +++| ZR ".1",S 00976 M01S00208.253l688 +++| S SAC 18,L
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00977 M01S00011.251l664 +++| ENDM 00978 M01S00012.251l664 +++|
| Line S00555 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00979 M01S00555.253l688 ---| TGT MACRO J,K,L
| Line S00209 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00980 M01S00209.253l688 +++| TNZ MACRO J,L 00981 M01S00210.253l688 +++| LOCAL S 00982 M00S00556.cpumtr +++| .1 MICRO 1,, J
| Line S00557 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00983 M01S00557.253l688 ---| .2 MICRO 1,, K 00984 M01S00558.253l688 ---| GT ".1",".2",0 00985 M01S00559.253l688 ---| SAC 18,L
| Line S00211 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00986 M01S00211.253l688 +++| NZ ".1",S 00987 M01S00212.253l688 +++| S SAC 18,L 00988 M00S00560.cpumtr +++| ENDM 00989 M00S00561.cpumtr +++|
| Line S00562 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00990 M01S00562.253l688 ---| TZR MACRO J,L
| Line S00213 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00991 M01S00213.253l688 +++| TPL MACRO J,L 00992 M01S00214.253l688 +++| LOCAL S 00993 M00S00563.cpumtr +++| .1 MICRO 1,, J
| Line S00564 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00994 M01S00564.253l688 ---| ZR ".1",0 00995 M01S00565.253l688 ---| SAC 18,L
| Line S00215 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00996 M01S00215.253l688 +++| PL ".1",S 00997 M01S00216.253l688 +++| S SAC 18,L 00998 M00S00566.cpumtr +++| ENDM 00999 M00S00567.cpumtr +++|
| Line S00568 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01000 M01S00568.253l688 ---| TNZ MACRO J,L
| Line S00217 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01001 M01S00217.253l688 +++| TNG MACRO J,L 01002 M01S00218.253l688 +++| LOCAL S 01003 M00S00569.cpumtr +++| .1 MICRO 1,, J
| Line S00570 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01004 M01S00570.253l688 ---| NZ ".1",0 01005 M01S00571.253l688 ---| SAC 18,L
| Line S00219 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01006 M01S00219.253l688 +++| NG ".1",S 01007 M01S00220.253l688 +++| S SAC 18,L 01008 M00S00572.cpumtr +++| ENDM
| Line S00573 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01009 M01S00573.253l688 ---| 01010 M01S00574.253l688 ---| TPL MACRO J,L 01011 M01S00575.253l688 ---| .1 MICRO 1,, J 01012 M01S00576.253l688 ---| PL ".1",0 01013 M01S00577.253l688 ---| SAC 18,L 01014 M01S00578.253l688 ---| ENDM 01015 M01S00579.253l688 ---| 01016 M01S00580.253l688 ---| TNG MACRO J,L 01017 M01S00581.253l688 ---| .1 MICRO 1,, J 01018 M01S00582.253l688 ---| NG ".1",0 01019 M01S00583.253l688 ---| SAC 18,L 01020 M01S00584.253l688 ---| ENDM 01021 M01S00585.253l688 ---| 01022 M01S00586.253l688 ---|
| Line S00221 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01023 M01S00221.253l688 +++| OPDEFS SPACE 4,10 01024 M00S00587.cpumtr +++|* THIS INSTRUCTION IS A CONDITIONAL NO-OP. 01025 M00S00588.cpumtr +++|* IF THE CONDITION WORD *C* IS NON-ZERO, AN *EQ* TO 01026 M00S00589.cpumtr +++|* THE SPECIFIED ADDRESS (*L*) IS ENTERED INTO THIS 01027 M00S00590.cpumtr +++|* LOCATION AT PRESET TIME. OTHERWISE, A *SB0 46000B* 01028 M00S00591.cpumtr +++|* IS ENTERED, MAKING THE INSTRUCTION A NO-OP. 01029 M00S00592.cpumtr +++| 01030 M00S00593.cpumtr +++| TNO MACRO L,C 01031 M00S00594.cpumtr +++| .1 SET *P 01032 M00S00595.cpumtr +++| .A IFEQ .1,15 01033 M00S00596.cpumtr +++| NO 01034 M00S00597.cpumtr +++| .A ENDIF
| Line S00598 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01035 M01S00598.253l688 ---| VFD 12/
| Line S00599 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01036 M02S00599.253l688 ---| SAC 12,0400B,6100B,C
| Line S00045 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01037 M02S00045.253l688 ---| SAC 12,0400B,C,6100B
| Line S00600 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01038 M01S00600.253l688 ---| VFD 18/
| Line S00601 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01039 M02S00601.253l688 ---| SAC 18,L,046000B,C
| Line S00046 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01040 M02S00046.253l688 ---| SAC 18,L,C,046000B
| Line S00222 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01041 M01S00222.253l688 +++| VFD 30/0400000000B+L 01042 M01S00223.253l688 +++| SAC 30,0400000000B+L,C,6100046000B 01043 M00S00602.cpumtr +++| ENDM
| Line S00603 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01044 M01S00603.253l688 ---| 01045 M01S00604.253l688 ---|
| Line S00224 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01046 M01S00224.253l688 +++| OPDEFS SPACE 4,10 01047 M00S00605.cpumtr +++|* THIS INSTRUCTION IS A CONDITIONAL NO-OP. 01048 M00S00606.cpumtr +++|* IF THE CONDITION WORD *C* IS NONZERO, A *NZ B5* 01049 M00S00607.cpumtr +++|* TO THE SPECIFIED ADDRESS (*L*) IS ENTERED INTO THIS 01050 M00S00608.cpumtr +++|* LOCATION AT PRESET TIME. OTHERWISE, A *SB0 46000B* 01051 M00S00609.cpumtr +++|* IS ENTERED, MAKING THE INSTRUCTION A NO-OP. 01052 M00S00610.cpumtr +++| 01053 M00S00611.cpumtr +++| TNZB5 MACRO L,C 01054 M00S00612.cpumtr +++| .1 SET *P 01055 M00S00613.cpumtr +++| .A IFEQ .1,15 01056 M00S00614.cpumtr +++| NO 01057 M00S00615.cpumtr +++| .A ENDIF
| Line S00616 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01058 M01S00616.253l688 ---| VFD 12/
| Line S00617 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01059 M02S00617.253l688 ---| SAC 12,0550B,6100B,C
| Line S00047 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01060 M02S00047.253l688 ---| SAC 12,0550B,C,6100B
| Line S00618 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01061 M01S00618.253l688 ---| VFD 18/
| Line S00619 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01062 M02S00619.253l688 ---| SAC 18,L,046000B,C
| Line S00048 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01063 M02S00048.253l688 ---| SAC 18,L,C,046000B
| Line S00225 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01064 M01S00225.253l688 +++| NZ B5,L 01065 M01S00226.253l688 +++| SAC 30,0550000000B+L,C,6100046000B 01066 M00S00620.cpumtr +++| ENDM
| Line S00621 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01067 M01S00621.253l688 ---| 01068 M01S00622.253l688 ---| 01069 M01S00623.253l688 ---|* THIS INSTRUCTION IS A CONDITION THREE-WAY JUMP. 01070 M01S00624.253l688 ---|* IF CONDITIONAL WORD *C1* IS NON-ZERO, A *JP* TO 01071 M01S00625.253l688 ---|* ADDRESS *V1* IS SET IN THIS WORD AT PRESET. 01072 M01S00626.253l688 ---|* OTHERWISE, WORD *C2* IS CHECKED - IF IT IS NON-ZERO, 01073 M01S00627.253l688 ---|* THEN A *JP* TO ADDRESS *V2* IS SET IN THIS WORD. 01074 M01S00628.253l688 ---|* IF NEITHER *C1* OR *C2* ARE NON-ZERO, THEN A *JP* 01075 M01S00629.253l688 ---|* TO ADDRESS *V3* IS SET IN THIS POSITION. 01076 M01S00630.253l688 ---| 01077 M01S00631.253l688 ---| TJMP MACRO V1,C1,V2,C2,V3 01078 M01S00632.253l688 ---| QUAL PRESET 01079 M01S00633.253l688 ---| .1 SET *P 01080 M01S00634.253l688 ---| .B IFEQ .1,45 01081 M01S00635.253l688 ---| NO 01082 M01S00636.253l688 ---| .B ENDIF 01083 M01S00637.253l688 ---| .C IFEQ .1,15 01084 M01S00638.253l688 ---| NO 01085 M01S00639.253l688 ---| .C ENDIF 01086 M01S00640.253l688 ---| .1 SET *P 01087 M01S00641.253l688 ---| .2 SET * 01088 M01S00642.253l688 ---| JP 0 01089 M01S00643.253l688 ---| USE /TJMP/ 01090 M01S00644.253l688 ---| .A IFEQ .1,60 01091 M01S00645.253l688 ---|+ VFD 1/0 01092 M01S00646.253l688 ---| .A ELSE 01093 M01S00647.253l688 ---|+ VFD 1/1 01094 M01S00648.253l688 ---| .A ENDIF 01095 M01S00649.253l688 ---| VFD 59/.2 01096 M01S00650.253l688 ---|+ JP V1 01097 M01S00651.253l688 ---|- VFD 30/C1 01098 M01S00652.253l688 ---|+ JP V2 01099 M01S00653.253l688 ---|- VFD 30/C2 01100 M01S00654.253l688 ---|+ JP V3 01101 M01S00655.253l688 ---|- VFD 30/0 01102 M01S00656.253l688 ---| USE * 01103 M01S00657.253l688 ---| QUAL * 01104 M01S00658.253l688 ---| ENDM 01105 M01S00659.253l688 ---| 01106 M01S00660.253l688 ---| TSB3 MACRO L 01107 M01S00661.253l688 ---| SB3 0 01108 M01S00662.253l688 ---| SAC 18,L 01109 M01S00663.253l688 ---| ENDM 01110 M01S00664.253l688 ---| 01111 M01S00665.253l688 ---| TSB6 MACRO L 01112 M01S00666.253l688 ---| SB6 0 01113 M01S00667.253l688 ---| SAC 18,L 01114 M01S00668.253l688 ---| ENDM
| Line S00669 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01115 M02S00669.253l688 ---| 01116 M02S00670.253l688 ---| TSX0 MACRO L 01117 M02S00671.253l688 ---| SX0 0 01118 M02S00672.253l688 ---| SAC 18,L 01119 M02S00673.253l688 ---| ENDM 01120 M02S00674.253l688 ---| 01121 M02S00675.253l688 ---| TSX2 MACRO L 01122 M02S00676.253l688 ---| SX2 0 01123 M02S00677.253l688 ---| SAC 18,L 01124 M02S00678.253l688 ---| ENDM 01125 M02S00679.253l688 ---| 01126 M02S00680.253l688 ---| TSX6 MACRO L 01127 M02S00681.253l688 ---| SX6 0 01128 M02S00682.253l688 ---| SAC 18,L 01129 M02S00683.253l688 ---| ENDM
| Line S00684 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01130 M01S00684.253l688 ---|
| Line S00227 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01131 M01S00227.253l688 +++| OPDEFS SPACE 4,10 01132 M01S00228.253l688 +++|* THESE MACROS PERMIT SETTING THE COUNT IN A SHIFT OR MASK 01133 M01S00229.253l688 +++|* INSTRUCTION. THE FORM OF THESE INSTRUCTIONS IS IDENTICAL TO 01134 M01S00230.253l688 +++|* THE OTHER CONDITIONAL INSTRUCTIONS. 01135 M01S00231.253l688 +++|*
| Line S00049 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01136 M02S00049.271l750 ---|* WHEN USING THE *TLX* OR *TMX* MACROS IN THE FORM 01137 M02S00050.271l750 ---|* TLX1 (M,N,CONDITION)
| Line S00085 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01138 M01S00085.271l750 +++|* WHEN USING THE *TAX*, *TLX*, OR *TMX* MACROS IN THE FORM 01139 M01S00086.271l750 +++|* 01140 M01S00087.271l750 +++|* TLX1 (M,N,CONDITION) 01141 M01S00088.271l750 +++|*
| Line S00051 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01142 M01S00051.252l678 +++|* MAKE SURE THAT *M* AND *N* ARE POSITIVE. FOR EXAMPLE 01143 M01S00052.252l678 +++|* *TLX0 (-6,0,ESM)* SHOULD BE *TLX0 (60-6,0,ESM)*. 01144 M01S00053.252l678 +++|
| Line S00089 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01145 M01S00089.271l750 +++| 01146 M01S00090.271l750 +++| ECHO ,R=(0,1,2,3,4,5,6,7) 01147 M01S00091.271l750 +++| 01148 M01S00092.271l750 +++| TAX_R MACRO J,L 01149 M01S00093.271l750 +++| LOCAL S 01150 M01S00094.271l750 +++| IFC EQ,*L**,3 01151 M01S00095.271l750 +++| AX_R S 01152 M01S00096.271l750 +++| S SAC 6,J 01153 M01S00097.271l750 +++| ELSE 4 01154 M01S00098.271l750 +++| AX_R J 01155 M01S00099.271l750 +++| S SAC 6,L 01156 M01S00100.271l750 +++| IF -DEF,S,1 01157 M01S00101.271l750 +++| ERR ONLY ONE PARAMETER IS PERMITTED ON A CONDITIONAL SHIFT 01158 M01S00102.271l750 +++| ENDM 01159 M01S00103.271l750 +++| 01160 M01S00104.271l750 +++| ENDD
| Line S00232 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01161 M01S00232.253l688 +++|
| Line S00685 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01162 M01S00685.252l678 ---| TLX0 MACRO L 01163 M01S00686.252l678 ---| LX0 0 01164 M01S00687.252l678 ---| SAC 6,L 01165 M01S00688.252l678 ---| ENDM 01166 M01S00689.252l678 ---| 01167 M01S00690.252l678 ---| TLX2 MACRO J,L 01168 M01S00691.252l678 ---| LX2 J 01169 M01S00692.252l678 ---| SAC 6,L 01170 M01S00693.252l678 ---| ENDM 01171 M01S00694.252l678 ---| 01172 M01S00695.252l678 ---| TLX5 MACRO L 01173 M01S00696.252l678 ---| LX5 0 01174 M01S00697.252l678 ---| SAC 6,L 01175 M01S00698.252l678 ---| ENDM
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2219 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01176 M02S00001.252l678 ---| TLX6 MACRO L 01177 M02S00002.252l678 ---| LX6 0 01178 M02S00003.252l678 ---| SAC 6,L 01179 M02S00004.252l678 ---| ENDM
| Line S00054 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01180 M01S00054.252l678 +++| ECHO ,R=(0,1,2,3,4,5,6,7) 01181 M01S00055.252l678 +++| 01182 M01S00056.252l678 +++| TLX_R MACRO J,L
| Line S00233 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01183 M01S00233.253l688 +++| LOCAL S
| Line S00057 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01184 M01S00057.252l678 +++| IFC EQ,*L**,3
| Line S00058 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01185 M02S00058.253l688 ---| LX_R 0 01186 M02S00059.253l688 ---| SAC 6,J 01187 M02S00060.253l688 ---| ELSE 2
| Line S00234 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01188 M01S00234.253l688 +++| LX_R S 01189 M01S00235.253l688 +++| S SAC 6,J 01190 M01S00236.253l688 +++| ELSE 4
| Line S00061 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01191 M01S00061.252l678 +++| LX_R J
| Line S00062 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01192 M02S00062.253l688 ---| SAC 6,L
| Line S00237 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01193 M01S00237.253l688 +++| S SAC 6,L 01194 M01S00238.253l688 +++| IF -DEF,S,1 01195 M01S00239.253l688 +++| ERR ONLY ONE PARAMETER IS PERMITTED ON A CONDITIONAL SHIFT
| Line S00063 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01196 M01S00063.252l678 +++| ENDM 01197 M01S00064.252l678 +++| 01198 M01S00065.252l678 +++| ENDD 01199 M00S00699.cpumtr +++|
| Line S00066 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01200 M02S00066.253l688 ---| ECHO ,R=(0,1,2,3,4,5,6,7) 01201 M02S00067.253l688 ---| 01202 M02S00068.253l688 ---| TSX_R MACRO J,L 01203 M02S00069.253l688 ---| IFC EQ,*L**,3 01204 M02S00070.253l688 ---| SX_R 0 01205 M02S00071.253l688 ---| SAC 18,J 01206 M02S00072.253l688 ---| ELSE 2 01207 M02S00073.253l688 ---| SX_R J 01208 M02S00074.253l688 ---| SAC 18,L 01209 M02S00075.253l688 ---| ENDM 01210 M02S00076.253l688 ---| 01211 M02S00077.253l688 ---| ENDD 01212 M02S00078.253l688 ---| 01213 M00S00700.cpumtr +++| TMX3 MACRO L
| Line S00701 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01214 M01S00701.253l688 ---| MX3 0 01215 M01S00702.253l688 ---| SAC 6,L 01216 M01S00703.253l688 ---| ENDM 01217 M01S00704.253l688 ---| 01218 M01S00705.253l688 ---| TSA2 MACRO L 01219 M01S00706.253l688 ---| SA2 0 01220 M01S00707.253l688 ---| SAC 18,L
| Line S00240 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01221 M01S00240.253l688 +++| LOCAL S 01222 M01S00241.253l688 +++| MX3 S 01223 M01S00242.253l688 +++| S SAC 6,L 01224 M00S00708.cpumtr +++| ENDM 01225 M00S00709.cpumtr +++| CME SPACE 4,10 01226 M00S00710.cpumtr +++|** THE FOLLOWING MACROS DEFINE INSTRUCTIONS FOR 01227 M00S00711.cpumtr +++|* READING AND WRITING CENTRAL MEMORY. THESE INSTRUCTIONS 01228 M00S00712.cpumtr +++|* SHOULD BE USED WHEN ADDRESSING A USER-S FIELD LENGTH, 01229 M00S00713.cpumtr +++|* OR FOR ANY ADDRESSING OUTSIDE LOW CORE. THESE 01230 M00S00714.cpumtr +++|* INSTRUCTIONS ARE MODIFIED AT PRESET TIME TO USE 01231 M00S00715.cpumtr +++|* THE STANDARD *SAI XJ* OPCODE IF RUNNING ON A MAINFRAME 01232 M00S00716.cpumtr +++|* WITH UP TO 262K OF CENTRAL MEMORY. OTHERWISE, IT IS 01233 M00S00717.cpumtr +++|* SET TO A NEW OPCODE THAT ALLOWS ADDRESSING OF ADDRESSES 01234 M00S00718.cpumtr +++|* LARGER THAN 18 BITS. NOTE THAT THE SAME CONVENTIONS 01235 M00S00719.cpumtr +++|* FOR REGISTER USAGE (I.E. 1,2,3,4,5 FOR READING CM; 01236 M00S00720.cpumtr +++|* 6,7 FOR WRITING CM) STILL EXIST FOR CODE THAT CAN 01237 M00S00721.cpumtr +++|* RUN IN EITHER MODE. 01238 M00S00722.cpumtr +++| 01239 M00S00723.cpumtr +++| 01240 M00S00724.cpumtr +++| ERRMC MACRO 01241 M00S00725.cpumtr +++| .A IF -DEF,CME$ 01242 M00S00726.cpumtr +++| ERR INVALID OP-CODE 01243 M00S00727.cpumtr +++| .A ENDIF 01244 M00S00728.cpumtr +++| ENDM 01245 M00S00729.cpumtr +++| 01246 M00S00730.cpumtr +++| EXREAD MACRO I,J 01247 M00S00731.cpumtr +++| .1 MICRO 1,1, J 01248 M00S00732.cpumtr +++| .A IFC NE,$".1"$X$ 01249 M00S00733.cpumtr +++| ERR ILLEGAL SOURCE OPERAND 01250 M00S00734.cpumtr +++| .A ENDIF 01251 M00S00735.cpumtr +++| .2 MICRO 2,2, J
| Line S00736 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01252 M01S00736.253l688 ---| VFD 15/
| Line S00243 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01253 M01S00243.253l688 +++| VFD 15/660_I_".2"B
| Line S00737 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01254 M01S00737.252l678 ---| SAC 15,660_I_".2"B,53_I_".2"0B,CME
| Line S00079 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01255 M01S00079.252l678 +++| SAC 15,660_I_".2"B,CME,53_I_".2"0B 01256 M00S00738.cpumtr +++| ENDM 01257 M00S00739.cpumtr +++| 01258 M00S00740.cpumtr +++| EXWRIT MACRO I,J 01259 M00S00741.cpumtr +++| .1 MICRO 1,1, J 01260 M00S00742.cpumtr +++| .A IFC NE,$".1"$X$ 01261 M00S00743.cpumtr +++| ERR ILLEGAL SOURCE OPERAND 01262 M00S00744.cpumtr +++| .A ENDIF 01263 M00S00745.cpumtr +++| .2 MICRO 2,2, J
| Line S00746 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01264 M01S00746.253l688 ---| VFD 15/
| Line S00244 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 01265 M01S00244.253l688 +++| VFD 15/670_I_".2"B
| Line S00747 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01266 M01S00747.252l678 ---| SAC 15,670_I_".2"B,53_I_".2"0B,CME
| Line S00080 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01267 M01S00080.252l678 +++| SAC 15,670_I_".2"B,CME,53_I_".2"0B 01268 M00S00748.cpumtr +++| ENDM 01269 M00S00749.cpumtr +++| 01270 M00S00750.cpumtr +++| 01271 M00S00751.cpumtr +++| ERX0 MACRO J 01272 M00S00752.cpumtr +++| ERRMC 01273 M00S00753.cpumtr +++| EXREAD 0,J 01274 M00S00754.cpumtr +++| ENDM 01275 M00S00755.cpumtr +++| 01276 M00S00756.cpumtr +++| ERX1 MACRO J 01277 M00S00757.cpumtr +++| EXREAD 1,J 01278 M00S00758.cpumtr +++| ENDM 01279 M00S00759.cpumtr +++| 01280 M00S00760.cpumtr +++| ERX2 MACRO J 01281 M00S00761.cpumtr +++| EXREAD 2,J 01282 M00S00762.cpumtr +++| ENDM 01283 M00S00763.cpumtr +++| 01284 M00S00764.cpumtr +++| ERX3 MACRO J 01285 M00S00765.cpumtr +++| EXREAD 3,J 01286 M00S00766.cpumtr +++| ENDM 01287 M00S00767.cpumtr +++| 01288 M00S00768.cpumtr +++| ERX4 MACRO J 01289 M00S00769.cpumtr +++| EXREAD 4,J 01290 M00S00770.cpumtr +++| ENDM 01291 M00S00771.cpumtr +++| 01292 M00S00772.cpumtr +++| ERX5 MACRO J 01293 M00S00773.cpumtr +++| EXREAD 5,J 01294 M00S00774.cpumtr +++| ENDM 01295 M00S00775.cpumtr +++| 01296 M00S00776.cpumtr +++| ERX6 MACRO J 01297 M00S00777.cpumtr +++| ERRMC 01298 M00S00778.cpumtr +++| EXREAD 6,J 01299 M00S00779.cpumtr +++| ENDM 01300 M00S00780.cpumtr +++| 01301 M00S00781.cpumtr +++| ERX7 MACRO J 01302 M00S00782.cpumtr +++| ERRMC 01303 M00S00783.cpumtr +++| EXREAD 7,J 01304 M00S00784.cpumtr +++| ENDM 01305 M00S00785.cpumtr +++| 01306 M00S00786.cpumtr +++| 01307 M00S00787.cpumtr +++| EWX0 MACRO J 01308 M00S00788.cpumtr +++| ERRMC 01309 M00S00789.cpumtr +++| EXWRIT 0,J 01310 M00S00790.cpumtr +++| ENDM 01311 M00S00791.cpumtr +++| 01312 M00S00792.cpumtr +++| EWX1 MACRO J 01313 M00S00793.cpumtr +++| ERRMC 01314 M00S00794.cpumtr +++| EXWRIT 1,J 01315 M00S00795.cpumtr +++| ENDM 01316 M00S00796.cpumtr +++| 01317 M00S00797.cpumtr +++| EWX2 MACRO J 01318 M00S00798.cpumtr +++| ERRMC 01319 M00S00799.cpumtr +++| EXWRIT 2,J 01320 M00S00800.cpumtr +++| ENDM 01321 M00S00801.cpumtr +++| 01322 M00S00802.cpumtr +++| EWX3 MACRO J 01323 M00S00803.cpumtr +++| ERRMC 01324 M00S00804.cpumtr +++| EXWRIT 3,J 01325 M00S00805.cpumtr +++| ENDM 01326 M00S00806.cpumtr +++| 01327 M00S00807.cpumtr +++| EWX4 MACRO J 01328 M00S00808.cpumtr +++| ERRMC 01329 M00S00809.cpumtr +++| EXWRIT 4,J 01330 M00S00810.cpumtr +++| ENDM 01331 M00S00811.cpumtr +++| 01332 M00S00812.cpumtr +++| EWX5 MACRO J 01333 M00S00813.cpumtr +++| ERRMC 01334 M00S00814.cpumtr +++| EXWRIT 5,J 01335 M00S00815.cpumtr +++| ENDM 01336 M00S00816.cpumtr +++| 01337 M00S00817.cpumtr +++| EWX6 MACRO J 01338 M00S00818.cpumtr +++| EXWRIT 6,J 01339 M00S00819.cpumtr +++| ENDM 01340 M00S00820.cpumtr +++| 01341 M00S00821.cpumtr +++| EWX7 MACRO J 01342 M00S00822.cpumtr +++| EXWRIT 7,J 01343 M00S00823.cpumtr +++| ENDM 01344 M00S00824.cpumtr +++| SPACE 4,10
| Line S00105 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01345 M01S00105.271l750 +++|** THE FOLLOWING OPDEF GENERATES AN 016 INSTRUCTION TO READ THE 01346 M01S00106.271l750 +++|* FREE RUNNING COUNTER TO THE SPECIFIED X REGISTER ON A 180 01347 M01S00107.271l750 +++|* MACHINE. ON OTHER MACHINES A *BXI XI-XI* INSRUCTION IS 01348 M01S00108.271l750 +++|* GENERATED TO SET THE X REGISTER TO 0. 01349 M01S00109.271l750 +++| 01350 M01S00110.271l750 +++| 01351 M01S00111.271l750 +++| RCX OPDEF P1 01352 M01S00112.271l750 +++| VFD 9/016B,3/P1,3/0
| Line S00113 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
M02 (Removed by) | cpum224 |
Seq # *Modification Id* Act ----------------------------+ 01353 M02S00113.cpum224 ---| SAC 15,016_P1_0B,CME,17_P1_P1_P1_B
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | cpum224 |
Seq # *Modification Id* Act ----------------------------+ 01354 M01S00001.cpum224 +++| SAC 15,016_P1_0B,CME,13_P1_P1_P1_B
| Line S00114 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01355 M01S00114.271l750 +++| ENDM 01356 M01S00115.271l750 +++| SPACE 4,10 01357 M00S00825.cpumtr +++|** DEFINE OPCODES.
| Line S00826 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01358 M01S00826.271l750 ---| 01359 M01S00827.271l750 ---| 01360 M01S00828.271l750 ---|* READ MICROSECOND COUNTER. 01361 M01S00829.271l750 ---| 01362 M01S00830.271l750 ---| RCX CPOP 0,016B,020B 01363 M00S00831.cpumtr +++| 01364 M00S00832.cpumtr +++| 01365 M00S00833.cpumtr +++|* TRAP INSTRUCTION. 01366 M00S00834.cpumtr +++| 01367 M00S00835.cpumtr +++| RTX,Q OPDEF P1,K 01368 M00S00836.cpumtr +++|+ VFD 9/017B,3/P1,18/K,30/0 01369 M00S00837.cpumtr +++| ENDM 01370 M00S00838.cpumtr +++| 01371 M00S00839.cpumtr +++| 01372 M00S00840.cpumtr +++|* INVALIDATE CACHE. 01373 M00S00841.cpumtr +++|* 01374 M00S00842.cpumtr +++|* P1 = 1/ F,59/ ADDR. 01375 M00S00843.cpumtr +++|* F = CENTRAL MEMORY/EXTENDED MEMORY INDICATOR (0 IF CM). 01376 M00S00844.cpumtr +++|* ADDR = RAC/RAE (RAC IF *F* = 0). 01377 M00S00845.cpumtr +++|* P2 = BLOCK LENGTH.
| Line S00846 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01378 M01S00846.271l750 ---|* K = EI SUBFUNCTION (703B).
| Line S00116 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01379 M01S00116.271l750 +++|* K = EI SUBFUNCTION (703B TO INVALIDATE SELECTED CACHE; 01380 M01S00117.271l750 +++|* 40000B TO INVALIDATE ALL CACHE ON THE OTHER CPU). 01381 M00S00847.cpumtr +++| 01382 M00S00848.cpumtr +++| ICX,X,Q OPDEF P1,P2,K 01383 M00S00849.cpumtr +++|+ VFD 9/017B,3/P1,3/P2,15/K,30/0 01384 M00S00850.cpumtr +++| ENDM
| Line S00851 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01385 M01S00851.271l750 ---| SPACE 4,10
| Line S00118 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01386 M01S00118.271l750 +++| OPDEFS SPACE 4,10 01387 M01S00119.271l750 +++|* TIC - CONDITIONALLY INVALIDATE CACHE. 01388 M01S00120.271l750 +++|* 01389 M01S00121.271l750 +++|* THIS INSTRUCTION IS A CONDITIONAL NO-OP. IF THE CONDITION 01390 M01S00122.271l750 +++|* WORD *C* IS NONZERO, AN *IC 40000B* INSTRUCTION (WHICH 01391 M01S00123.271l750 +++|* INVALIDATES ALL CACHE ON THE OTHER CPU) IS ENTERED INTO 01392 M01S00124.271l750 +++|* THIS LOCATION AT PRESET TIME. OTHERWISE, TWO *SB0 46000B* 01393 M01S00125.271l750 +++|* INSTRUCTIONS ARE ENTERED, MAKING THIS WORD A NO-OP. 01394 M01S00126.271l750 +++|* 01395 M01S00127.271l750 +++|* NOTE - WHEN UPDATING A SEQUENCE OF WORDS TERMINATING IN AN 01396 M01S00128.271l750 +++|* INTERLOCK WORD, THIS INSTRUCTION IS NORMALLY ISSUED JUST 01397 M01S00129.271l750 +++|* BEFORE THE LAST WRITE. SINCE THE CACHE INVALIDATE 01398 M01S00130.271l750 +++|* OPERATION TIES UP THE OTHER CPU FOR 5 MICROSECONDS (ON A 01399 M01S00131.271l750 +++|* 960), THIS SEQUENCE OF INSTRUCTIONS ALLOWS THE FINAL WRITE 01400 M01S00132.271l750 +++|* TO PROCEED IN PARALLEL WITH THE PURGE. THIS MINIMIZES 01401 M01S00133.271l750 +++|* CACHE PURGE OVERHEAD WHILE STILL ENSURING DATA INTEGRITY. 01402 M01S00134.271l750 +++| 01403 M01S00135.271l750 +++| 01404 M01S00136.271l750 +++| TIC MACRO C 01405 M01S00137.271l750 +++|+ VFD 30/0170040000B *IC 40000B* 01406 M01S00138.271l750 +++| SAC 30,0170040000B,C,6100046000B 01407 M01S00139.271l750 +++| VFD 30/0 01408 M01S00140.271l750 +++| SAC 30,0,C,6100046000B 01409 M01S00141.271l750 +++| ENDM 01410 M00S00852.cpumtr +++| EXP SPACE 4 01411 M00S00853.cpumtr +++|** EXP - GENERATE EXCHANGE PACKAGE. 01412 M00S00854.cpumtr +++| 01413 M00S00855.cpumtr +++| 01414 M00S00856.cpumtr +++| PURGMAC EXP 01415 M00S00857.cpumtr +++|
| Line S00858 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01416 M01S00858.271l750 ---| EXP MACROE P,A0,RA,A1,B1,FL,A2,B2,EM,A3,B3,RAX,A4,B4,FLX,A5,B5,MA, 01417 M01S00859.271l750 ---|,A6,B6,EA,A7,B7,X0,X1,X2,X3,X4,X5,X6,X7
| Line S00142 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01418 M01S00142.271l750 +++| EXP MACROE P,A0,B0,RA,A1,B1,FL,A2,B2,EM,A3,B3,RAX,A4,B4,FLX,A5,B5, 01419 M01S00143.271l750 +++|,MA,A6,B6,EA,A7,B7,X0,X1,X2,X3,X4,X5,X6,X7 01420 M00S00860.cpumtr +++| LOCAL A
| Line S00144 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01421 M01S00144.271l750 +++| MACREF EXP 01422 M00S00861.cpumtr +++| A BSS 0 01423 M00S00862.cpumtr +++| + VFD 24/P 01424 M00S00863.cpumtr +++| VFD 18/A0
| Line S00864 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01425 M01S00864.271l750 ---| VFD 18/0
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/cpumtr.txt · Last modified: by 127.0.0.1