User Tools

Site Tools


cdc:nos2.source:opl.opl871:deck:cpumtr

Deck CPUMTR

308 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M01S00001.cpumtr  +++|          IDENT  CPUMTR
00002  M01S00002.cpumtr  +++|          ENTRY  CPUMTR
00003  M01S00003.cpumtr  +++|          SST    PPR,FL,TH,T1,T2,T3,RA
00004  M01S00004.cpumtr  +++|          B1=1
00005  M01S00001.cpum135 +++|          LIST   F
00006  M01S00005.cpumtr  +++|*COMMENT  CPUMTR - CPU MONITOR.
Line S00006 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00007  M02S00006.281l803 ---|          COMMENT COPYRIGHT CONTROL DATA CORP. 1970.
00008  M01S00001.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00009  M01S00007.cpumtr  +++|          TITLE  CPUMTR - CPU MONITOR.
00010  M01S00008.cpumtr  +++|          SPACE  4
00011  M01S00009.cpumtr  +++|***       CPUMTR - CPU MONITOR.
00012  M01S00010.cpumtr  +++|*         G. R. MANSFIELD.   70/12/13.
00013  M01S00011.cpumtr  +++|*         W. E. GOEBEL.      76/01/21.
00014  M01S00012.cpumtr  +++|*         P. T. BARNETT.     80/10/31.
00015  M01S00013.cpumtr  +++|          SPACE  4
00016  M01S00014.cpumtr  +++|***       *CPUMTR* WORKS IN CONJUNCTION WITH *MTR* TO DO
00017  M01S00015.cpumtr  +++|*         THE FOLLOWING TASKS -
00018  M01S00016.cpumtr  +++|*
Line S00017 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
00019  M02S00017.251l664 ---|*         1)  SCHEDULING OF THE CPU FOR JOBS AT CONTROL POINTS.
00020  M01S00001.251l664 +++|*         1)  SCHEDULE THE CPU AMONG ELIGIBLE JOBS AT CONTROL POINTS.
00021  M01S00018.cpumtr  +++|*         2)  PERFORM REQUESTED OPERATIONS BY PP-S
00022  M01S00019.cpumtr  +++|*             (MONITOR FUNCTIONS ABOVE *CPUM*).
00023  M01S00020.cpumtr  +++|*         3)  PERFORM REQUESTED OPERATIONS BY JOBS RUNNING AT
00024  M01S00021.cpumtr  +++|*             CONTROL POINTS (RA+1 REQUESTS).
00025  M01S00022.cpumtr  +++|*         4)  PERFORM REQUESTED OPERATIONS BY *MTR*
00026  M01S00023.cpumtr  +++|*             (STORAGE MOVE, ETC.)
00027  M01S00024.cpumtr  +++|*         5)  PERFORM DATA TRANSFERS FOR BUFFERED MASS STORAGE DEVICES
Line S00025 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
00028  M02S00025.251l664 ---|*             (SUCH AS THE 819, SEE *CIO819* BLOCK FOR AN EXPLANATION
Line S00026 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
00029  M02S00026.251l664 ---|*             OF THE PSEUDO-PP).
00030  M01S00002.251l664 +++|*             (REFER TO THE *CPUCIO* BLOCK FOR AN EXPLANATION OF THE
00031  M01S00003.251l664 +++|*             PSEUDO-PP).
00032  M01S00027.cpumtr  +++|*
00033  M01S00028.cpumtr  +++|*         *CPUMTR* CODE RUNS IN BOTH MONITOR AND PROGRAM MODE.  THE
00034  M01S00029.cpumtr  +++|*         CODE USED IN EITHER MODE IS MOSTLY SEPARATE, BUT IN CERTAIN
00035  M01S00030.cpumtr  +++|*         RARE CASES, CODE IS SHARED BETWEEN THE TWO.  IN BOTH CASES,
00036  M01S00031.cpumtr  +++|*         THE CODE EXECUTES AT AN RA OF 0, AND AN FL OF MACHINE FIELD
00037  M01S00032.cpumtr  +++|*         LENGTH, GIVING *CPUMTR* FULL ACCESS TO ALL OF CM (AND ECS).
00038  M01S00033.cpumtr  +++|*
00039  M01S00034.cpumtr  +++|*         MONITOR MODE CODE EXECUTION IS LIMITED TO FUNCTIONS THAT CAN
Line S00035 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
00040  M02S00035.251l664 ---|*         BE DONE QUICKLY, OR REQUIRES INTERLOCKING.  PROGRAM MODE
00041  M01S00004.251l664 +++|*         BE DONE QUICKLY OR REQUIRE INTERLOCKING.  PROGRAM MODE
00042  M01S00036.cpumtr  +++|*         CODE IS USED FOR PROCESSING FUNCTIONS THAT POTENTIALLY CAN
00043  M01S00037.cpumtr  +++|*         TAKE A LONG TIME (SUCH AS STORAGE MOVE).  PROGRAM MODE
00044  M01S00038.cpumtr  +++|*         *CPUMTR* RUNS AT CONTROL POINT N+1, AND HAS A CPU PRIORITY
00045  M01S00039.cpumtr  +++|*         OF 100B, HIGHER THAN ANY OTHER JOB IN THE SYSTEM.
00046  M01S00040.cpumtr  +++|          SPACE  4,10
00047  M01S00041.cpumtr  +++|**        IMPLEMENTATION NOTES.
00048  M01S00042.cpumtr  +++|*
00049  M01S00043.cpumtr  +++|*         *CPUMTR* IS LOADED AND RELOCATED BY *CPUMLD*.
00050  M01S00044.cpumtr  +++|*         *CPUMLD* SUPPORTS ONLY THE COMMONLY USED LOADER TABLES,
00051  M01S00045.cpumtr  +++|*         INCLUDING 3400 (PIDL), 3600 (ENTR), 4000 (TEXT),
00052  M01S00046.cpumtr  +++|*         4100 (XFILL), 4200 (FILL), 4600 (XFER), AND 7700 (PRFX)
00053  M01S00047.cpumtr  +++|*         LOADER TABLES.  LOADER TABLES SUCH AS 3700 (XTEXT),
00054  M01S00048.cpumtr  +++|*         4300 (REPL), 4400 (LINK), 4500 (XLINK), AND
00055  M01S00049.cpumtr  +++|*         4700 (XREPL) ARE NOT SUPPORTED BY *CPUMLD*.
00056  M01S00050.cpumtr  +++|*         SINCE *BSSZ* INSTRUCTIONS OF 6 OR MORE WORDS GENERATE
00057  M01S00051.cpumtr  +++|*         *REPL* TABLES, USE OF *CON* OR *BSS* INSTRUCTIONS
00058  M01S00052.cpumtr  +++|*         ARE RECOMMENDED AS AN ALTERNATIVE.
00059  M01S00053.cpumtr  +++|*
00060  M01S00054.cpumtr  +++|*         DUE TO THE DEFINITION OF A *CON* INSTRUCTION IN
00061  M01S00055.cpumtr  +++|*         COMPASS 3.0, DATA INSTRUCTIONS CONTAINING RELOCATABLE
00062  M01S00056.cpumtr  +++|*         ADDRESSES SHOULD USE ONLY THE *VFD* INSTRUCTION.
00063  M01S00057.cpumtr  +++|          SPACE  4
00064  M01S00058.cpumtr  +++|****      ASSEMBLY CONSTANTS.
00065  M01S00059.cpumtr  +++|
00066  M01S00060.cpumtr  +++|
00067  M01S00061.cpumtr  +++| NPPCP    EQU    LREC-1      MAXIMUM NUMBER OF PP-S TO A CP
00068  M01S00062.cpumtr  +++| RSHF     EQU    12          SHIFT COUNT TO MOVE RA FIELD
00069  M01S00063.cpumtr  +++|                             OF FLSW TO LOWER BITS
00070  M01S00064.cpumtr  +++| RMSK     EQU    24          FIELD WIDTH OF RA IN CONTROL POINT AREA
00071  M01S00065.cpumtr  +++| MCUR     EQU    40B         MAXIMUM CONSECUTIVE UNIT RESERVE COUNT
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  M01S00066.cpumtr  +++|
00076  M01S00067.cpumtr  +++|****
00077  M01S00068.cpumtr  +++|          SPACE  4
Line S00069 Modification History
M01 (Added by) cpumtr
M02 (Updated by) ns2483
Seq #  *Modification Id* Act 
----------------------------+
00078  M02S00069.ns2483  ---|*         *COMSMTX* PRECEDES ALL OTHER COMMON DECKS IN ORDER TO MAKE
Line S00070 Modification History
M01 (Added by) cpumtr
M02 (Updated by) ns2483
Seq #  *Modification Id* Act 
----------------------------+
00079  M02S00070.ns2483  ---|*         THE *BSSN* MACRO AVAILABLE TO *COMSEJT*.
Line S00071 Modification History
M01 (Added by) cpumtr
M02 (Updated by) ns2483
Seq #  *Modification Id* Act 
----------------------------+
00080  M02S00071.ns2483  ---|
Line S00072 Modification History
M01 (Added by) cpumtr
M02 (Updated by) ns2483
Seq #  *Modification Id* Act 
----------------------------+
00081  M02S00072.ns2483  ---|          QUAL   MTX
Line S00073 Modification History
M01 (Added by) cpumtr
M02 (Updated by) ns2483
Seq #  *Modification Id* Act 
----------------------------+
00082  M02S00073.ns2483  ---|*CALL     COMSMTX
Line S00074 Modification History
M01 (Added by) cpumtr
M02 (Updated by) ns2483
Seq #  *Modification Id* Act 
----------------------------+
00083  M02S00074.ns2483  ---|          QUAL   *
00084  M01S00001.ns2483  +++|*CALL     COMCMAC
00085  M01S00075.cpumtr  +++|*CALL     COMSACC
00086  M01S00001.252l678 +++|*CALL     COMSCIO
00087  M01S00001.ns2322  +++|*CALL     COMSDFS
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  M01S00076.cpumtr  +++|          QUAL   DST
00093  M01S00077.cpumtr  +++|*CALL     COMSDST
00094  M01S00078.cpumtr  +++|          QUAL   *
00095  M01S00079.cpumtr  +++|*CALL     COMSEJT
00096  M01S00080.cpumtr  +++|*CALL     COMSJCE
00097  M01S00001.cpum210 +++|*CALL     COMSLSD
00098  M01S00081.cpumtr  +++|*CALL     COMSMMF
00099  M01S00005.251l664 +++|*CALL     COMSMRT
00100  M01S00082.cpumtr  +++|*CALL     COMSMSP
00101  M01S00002.ns2483  +++|          QUAL   MTX
00102  M01S00003.ns2483  +++|*CALL     COMSMTX
00103  M01S00004.ns2483  +++|          QUAL   *
Line S00083 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00104  M02S00083.252l678 ---|*CALL     COMSCIO
00105  M01S00084.cpumtr  +++|          QUAL   PFM
00106  M01S00085.cpumtr  +++|*CALL     COMSPFM
00107  M01S00086.cpumtr  +++|          QUAL   *
00108  M01S00087.cpumtr  +++|*CALL     COMSREM
00109  M01S00088.cpumtr  +++|*CALL     COMSPRD
00110  M01S00089.cpumtr  +++|*CALL     COMSSCD
00111  M01S00090.cpumtr  +++|*CALL     COMSSSD
00112  M01S00091.cpumtr  +++|          LIST   X
00113  M01S00092.cpumtr  +++|*CALL     COMSHIO
00114  M01S00093.cpumtr  +++|*CALL     COMSMSC
00115  M01S00094.cpumtr  +++|*CALL     COMSLFD
00116  M01S00095.cpumtr  +++|*CALL     COMSSCP
Line S00096 Modification History
M01 (Added by) cpumtr
M02 (Updated by) ns2322
Seq #  *Modification Id* Act 
----------------------------+
00117  M02S00096.ns2322  ---|          LIST   -X
00118  M01S00002.ns2322  +++|          LIST   *
00119  M01S00097.cpumtr  +++|*CALL     COMSSRU
00120  M01S00098.cpumtr  +++|          QUAL   DSL
00121  M01S00099.cpumtr  +++|*CALL     COMSDSL
00122  M01S00100.cpumtr  +++|          QUAL   *
00123  M01S00101.cpumtr  +++|          LIST   X
00124  M01S00102.cpumtr  +++|*CALL     COMS176
00125  M01S00103.cpumtr  +++|*CALL     COMSCPS
00126  M01S00104.cpumtr  +++|*CALL     COMSMTR
00127  M01S00105.cpumtr  +++|          LIST   *
00128  M01S00106.cpumtr  +++|          TITLE  MACRO DEFINITIONS.
00129  M01S00107.cpumtr  +++|          NOREF  .1,.2,.3
00130  M01S00108.cpumtr  +++| BLOCK    SPACE  4,20
00131  M01S00109.cpumtr  +++|**        BLOCK - DEFINE AN OPTIONAL BLOCK OF CPUMTR CODE.
00132  M01S00110.cpumtr  +++|*
00133  M01S00111.cpumtr  +++|*
00134  M01S00112.cpumtr  +++|*         BLOCK  NAME,(TTLE),Q
00135  M01S00113.cpumtr  +++|*         ENTRY  *NAME* = NAME OF BLOCK.
00136  M01S00114.cpumtr  +++|*                *TTLE* = DESCRIPTION TO APPEAR ON TITLE LINE FOLLOWING
00137  M01S00115.cpumtr  +++|*                *CPUMTR - CPU MONITOR *
00138  M01S00116.cpumtr  +++|*                *Q* = QUAL TO BE USED FOR BLOCK IF OTHER THAN *NAME*.
00139  M01S00117.cpumtr  +++|
00140  M01S00118.cpumtr  +++|
00141  M01S00119.cpumtr  +++|          PURGMAC BLOCK
00142  M01S00120.cpumtr  +++|
00143  M01S00121.cpumtr  +++| BLOCK    MACRO  NAME,TTLE,Q
00144  M01S00122.cpumtr  +++| _NAME    TTL    CPUMTR - CPU MONITOR _TTLE
00145  M01S00123.cpumtr  +++|          TITLE
00146  M01S00124.cpumtr  +++|          QUAL   Q NAME
00147  M01S00125.cpumtr  +++|          NOREF  .1,.2,.3
00148  M01S00126.cpumtr  +++|          USE    /_NAME/
00149  M01S00127.cpumtr  +++|          USE    /TREL/
00150  M01S00128.cpumtr  +++|          CON    0
00151  M01S00129.cpumtr  +++|          VFD    42/0L_NAME,18/0
00152  M01S00130.cpumtr  +++|          USE    *
00153  M01S00131.cpumtr  +++|          USE    /TJMP/
00154  M01S00132.cpumtr  +++|          CON    0
00155  M01S00133.cpumtr  +++|          VFD    42/0L_NAME,18/0
00156  M01S00134.cpumtr  +++|          USE    *
00157  M01S00135.cpumtr  +++|          ENDM
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
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 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
00178  M02S00005.271l716 ---|
00179  M01S00001.271l716 +++|*
00180  M01S00006.253l688 +++|*         CONVERT THE ORDINAL FOR TABLE *TAB* IN *XJ* INTO AN OFFSET
Line S00007 Modification History
M01 (Added by) 253l688
M02 (Updated by) ns2731b
Seq #  *Modification Id* Act 
----------------------------+
00181  M02S00007.ns2731b ---|*         IN *XI*.  *I* AND *J* MAY BE EQUAL ONLY IF THE LENGTH OF THE
Line S00008 Modification History
M01 (Added by) 253l688
M02 (Updated by) ns2731b
Seq #  *Modification Id* Act 
----------------------------+
00182  M02S00008.ns2731b ---|*         THE TABLE-S ENTRY IS A POWER OF TWO.
Line S00009 Modification History
M01 (Added by) 253l688
M02 (Updated by) ns2731b
Seq #  *Modification Id* Act 
----------------------------+
00183  M02S00009.ns2731b ---|*         WHEN *XI* AND *XJ* ARE DIFFERENT REGISTERS, *XJ* IS
Line S00010 Modification History
M01 (Added by) 253l688
M02 (Updated by) ns2731b
Seq #  *Modification Id* Act 
----------------------------+
00184  M02S00010.ns2731b ---|*         UNCHANGED.
00185  M01S00001.ns2731b +++|*         IN *XI*.  *XI* AND *XJ* MUST BE DIFFERENT REGISTERS.  THE
00186  M01S00002.ns2731b +++|*         VALUE OF *XJ* IS PRESERVED.
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 (Updated 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 (Updated 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 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00194  M02S00017.271l750 ---| .1       OCTMIC TAB_E,1
00195  M01S00001.271l750 +++|          ERRPL  TAB_E-21B   TABLE ENTRY TOO LONG
00196  M01S00003.ns2731b +++|          ERRZR  I-J         REGISTERS MUST BE DIFFERENT
00197  M01S00002.271l750 +++| .1       OCTMIC TAB_E
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 (Updated by) ns2731b
Seq #  *Modification Id* Act 
----------------------------+
00203  M02S00003.ns2731b ---|          IFNE   I,J,1
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 (Updated by) ns2731b
Seq #  *Modification Id* Act 
----------------------------+
00210  M02S00029.ns2731b ---|          ERRZR  I-J         REGISTERS MUST BE DIFFERENT FOR THIS SIZE
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 (Updated by) ns2731b
Seq #  *Modification Id* Act 
----------------------------+
00215  M02S00034.ns2731b ---|          IFNE   I,J,1
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 (Updated by) ns2731b
Seq #  *Modification Id* Act 
----------------------------+
00220  M02S00039.ns2731b ---|          ERRZR  I-J         REGISTERS MUST BE DIFFERENT FOR THIS SIZE
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 (Updated by) ns2731b
Seq #  *Modification Id* Act 
----------------------------+
00226  M02S00045.ns2731b ---|          ERRZR  I-J         REGISTERS MUST BE DIFFERENT FOR THIS SIZE
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 (Updated by) ns2731b
Seq #  *Modification Id* Act 
----------------------------+
00232  M02S00051.ns2731b ---|          ERRZR  I-J         REGISTERS MUST BE DIFFERENT FOR THIS SIZE
00233  M01S00052.253l688 +++|          BX.I   X.J
00234  M01S00053.253l688 +++|          LX.I   3
00235  M01S00054.253l688 +++|          IX.I   X.I-X.J
00236  M01S00004.271l716 +++| .B       SKIP
00237  M01S00005.271l716 +++| .A10     ENDIF
Line S00006 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2731b
Seq #  *Modification Id* Act 
----------------------------+
00238  M02S00006.ns2731b ---|          IFNE   I,J,1
00239  M01S00007.271l716 +++|          BX.I   X.J
00240  M01S00008.271l716 +++|          LX.I   3
00241  M01S00003.271l750 +++| .B       SKIP
00242  M01S00004.271l750 +++| .A11     ENDIF
Line S00005 Modification History
M01 (Added by) 271l750
M02 (Updated by) ns2731b
Seq #  *Modification Id* Act 
----------------------------+
00243  M02S00005.ns2731b ---|          ERRZR  I-J         REGISTERS MUST BE DIFFERENT FOR THIS SIZE
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 (Updated by) ns2731b
Seq #  *Modification Id* Act 
----------------------------+
00249  M02S00011.ns2731b ---|          ERRZR  I-J         REGISTERS MUST BE DIFFERENT FOR THIS SIZE
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 (Updated by) ns2731b
Seq #  *Modification Id* Act 
----------------------------+
00256  M02S00018.ns2731b ---|          ERRZR  I-J         REGISTERS MUST BE DIFFERENT FOR THIS SIZE
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 (Updated by) ns2731b
Seq #  *Modification Id* Act 
----------------------------+
00264  M02S00026.ns2731b ---|          ERRZR  I-J         REGISTERS MUST BE DIFFERENT FOR THIS SIZE
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 (Updated by) ns2731b
Seq #  *Modification Id* Act 
----------------------------+
00271  M02S00033.ns2731b ---|          ERRZR  I-J         REGISTERS MUST BE DIFFERENT FOR THIS SIZE
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 (Updated by) ns2731b
Seq #  *Modification Id* Act 
----------------------------+
00279  M02S00041.ns2731b ---|          ERRZR  I-J         REGISTERS MUST BE DIFFERENT FOR THIS SIZE
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 (Updated by) ns2731b
Seq #  *Modification Id* Act 
----------------------------+
00286  M02S00048.ns2731b ---|          ERRZR  I-J         REGISTERS MUST BE DIFFERENT FOR THIS SIZE
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 (Updated by) ns2731b
Seq #  *Modification Id* Act 
----------------------------+
00292  M02S00054.ns2731b ---|          IFNE   I,J,1
00293  M01S00055.271l750 +++|          BX.I   X.J
00294  M01S00056.271l750 +++|          LX.I   4
00295  M01S00055.253l688 +++| .B       ENDIF
00296  M01S00056.253l688 +++|          ENDM
00297  M01S00136.cpumtr  +++| ENDBLK   SPACE  4,10
00298  M01S00137.cpumtr  +++|**        ENDBLK - END AN OPTIONAL BLOCK OF CPUMTR CODE.
00299  M01S00138.cpumtr  +++|*
00300  M01S00139.cpumtr  +++|
00301  M01S00140.cpumtr  +++|
00302  M01S00141.cpumtr  +++|          PURGMAC ENDBLK
00303  M01S00142.cpumtr  +++|
00304  M01S00143.cpumtr  +++| ENDBLK   MACRO
00305  M01S00144.cpumtr  +++|          BSS    0
00306  M01S00145.cpumtr  +++|          USE    *
00307  M01S00146.cpumtr  +++|          QUAL
00308  M01S00147.cpumtr  +++|          ENDM
00309  M01S00148.cpumtr  +++| IDIV     SPACE  4,10
00310  M01S00149.cpumtr  +++|**        IXI XJ/XK - INTEGER DIVISION.
00311  M01S00150.cpumtr  +++|*
00312  M01S00151.cpumtr  +++|*         IXI    XJ/XK
00313  M01S00152.cpumtr  +++|*         DIVIDE XJ BY XK TO XI.
00314  M01S00153.cpumtr  +++|*         DESTROYS XJ, XK, B7.
00315  M01S00154.cpumtr  +++|
00316  M01S00155.cpumtr  +++|
00317  M01S00156.cpumtr  +++|          PURGDEF IXX/X
00318  M01S00157.cpumtr  +++|
00319  M01S00158.cpumtr  +++| IXX/X   OPDEF  I,J,K
00320  M01S00159.cpumtr  +++|  PX.J X.J
00321  M01S00160.cpumtr  +++|  PX.K X.K
00322  M01S00161.cpumtr  +++|  NX.K X.K
00323  M01S00162.cpumtr  +++|  FX.I X.J/X.K
00324  M01S00163.cpumtr  +++|  UX.I B7,X.I
00325  M01S00164.cpumtr  +++|  LX.I X.I,B7
00326  M01S00165.cpumtr  +++|  ENDM
00327  M01S00166.cpumtr  +++| MONITOR  SPACE  4,10
00328  M01S00167.cpumtr  +++|**        MONITOR - ISSUE PSEUDO OUTPUT REGISTER *CPUMTR* FUNCTION.
00329  M01S00168.cpumtr  +++|*
00330  M01S00169.cpumtr  +++|*         MONITOR  FC,RAD
00331  M01S00170.cpumtr  +++|*         WHERE  FC = *CPUMTR* FUNCTION CODE.
00332  M01S00171.cpumtr  +++|*                RAD = RETURN ADDRESS, OPTIONAL IF RETURN TO NEXT
00333  M01S00172.cpumtr  +++|*                      LOCATION AFTER MONITOR CALL.
00334  M01S00173.cpumtr  +++|*
00335  M01S00174.cpumtr  +++|*         CALLS  /BUFIO/IMF.
00336  M01S00175.cpumtr  +++|
00337  M01S00176.cpumtr  +++|
00338  M01S00177.cpumtr  +++|          PURGMAC  MONITOR
00339  M01S00178.cpumtr  +++| MONITOR  MACRO  FC,RAD
00340  M01S00179.cpumtr  +++|          LOCAL  MRA
00341  M01S00180.cpumtr  +++|          IFC    NE,$_RAD$B6$,1
00342  M01S00181.cpumtr  +++|          SB6    RAD MRA
00343  M01S00182.cpumtr  +++|          SX1    FC
00344  M01S00183.cpumtr  +++|          EQ     /BUFIO/IMF  ISSUE MONITOR FUNCTION
00345  M01S00184.cpumtr  +++| MRA      BSS    0
00346  M01S00185.cpumtr  +++|          ENDM
00347  M01S00186.cpumtr  +++| ICTE     SPACE  4,10
00348  M01S00187.cpumtr  +++|**        ICTE - INTERNAL CIO FUNCTION CODE TABLE ENTRY.
00349  M01S00188.cpumtr  +++|*
00350  M01S00189.cpumtr  +++|*         ICTE   FC,(FLAGS)
00351  M01S00190.cpumtr  +++|*
00352  M01S00191.cpumtr  +++|*         FC     INTERNAL CIO FUNCTION (DEFINED IN *COMSCIO*).
00353  M01S00192.cpumtr  +++|*
00354  M01S00193.cpumtr  +++|*         FLAGS  FUNCTION FLAGS.
00355  M01S00194.cpumtr  +++|*                BKW = BACKWARD OPERATION.
00356  M01S00195.cpumtr  +++|*                CRW = *READCW*/*WRITECW* OPERATION.
00357  M01S00196.cpumtr  +++|*                EOF = EOF OPERATION - STOP ON EOF FOR READ/SKIP,
00358  M01S00197.cpumtr  +++|*                      FLUSH EOF FOR WRITE OPERATION.
00359  M01S00198.cpumtr  +++|*                EOI = EOI OPERATION - STOP ON EOI FOR READ/SKIP,
00360  M01S00199.cpumtr  +++|*                      FLUSH DATA FROM BUFFER FOR WRITE OPERATION.
00361  M01S00200.cpumtr  +++|*                EOR - EOR OPERATION - STOP OF EOR FOR READ/SKIP,
00362  M01S00201.cpumtr  +++|*                      FLUSH EOR FOR WRITE OPERATION.
00363  M01S00202.cpumtr  +++|*                EXF = FUNCTION LEGAL FOR EXECUTE-ONLY FILE.
00364  M01S00203.cpumtr  +++|*                IOF = REWIND OPERATION (SET IN = OUT = FIRST).
00365  M01S00204.cpumtr  +++|*                LST = *READLS*/*RPHRLS* OPERATION.
00366  M01S00205.cpumtr  +++|*                MSO = MASS STORAGE ONLY FUNCTION.
00367  M01S00206.cpumtr  +++|*                MTO = MAGNETIC TAPE ONLY FUNCTION.
00368  M01S00207.cpumtr  +++|*                NDT = NO DEVICE TYPE RETURNED TO FET.
00369  M01S00208.cpumtr  +++|*                NRW = *READN*/*WRITEN* OPERATION.
00370  M01S00209.cpumtr  +++|*                PRU = PRU OPERATION - STOP ON PRU FOR READ/SKIP,
00371  M01S00210.cpumtr  +++|*                      FLUSH ONLY ONE FULL PRU FOR WRITE.
00372  M01S00211.cpumtr  +++|*                RFE = FUNCTION REQUIRES FNT ENTRY.
00373  M01S00212.cpumtr  +++|*                RWO = REWRITE OPERATION.
00374  M01S00213.cpumtr  +++|*                SKO = SKIP OPERATION.
00375  M01S00214.cpumtr  +++|*                UNL = UNLOAD OPERATION.
00376  M01S00215.cpumtr  +++|*                VFL = VALIDATE FIRST AND LIMIT FET PARAMETERS.
00377  M01S00216.cpumtr  +++|*                VIO = VALIDATE IN AND OUT FET PARAMETERS.
00378  M01S00217.cpumtr  +++|*                XF = EXTENDED FUNCTION LEGAL (3XX/6XX CIO CODE).
00379  M01S00218.cpumtr  +++|
00380  M01S00219.cpumtr  +++|
00381  M01S00220.cpumtr  +++| ICTE     MACRO  FC,FLAGS
00382  M01S00221.cpumtr  +++|          LOCAL  F,FG1,FG2
00383  M01S00222.cpumtr  +++| FG2      SET    0
00384  M01S00223.cpumtr  +++| .A       IFC    NE,$_FC$$
00385  M01S00224.cpumtr  +++| FG1      SET    FC*100B
00386  M01S00225.cpumtr  +++| .B       ECHO   ,F=(FLAGS)
00387  M01S00226.cpumtr  +++|          IFC    EQ,$_F$BKW$,1
00388  M01S00227.cpumtr  +++| FG1      SET    FG1+4000B
00389  M01S00228.cpumtr  +++|          IFC    EQ,$_F$CRW$,1
00390  M01S00229.cpumtr  +++| FG1      SET    FG1+40B
00391  M01S00230.cpumtr  +++|          IFC    EQ,$_F$EOF$,1
00392  M01S00231.cpumtr  +++| FG1      SET    FG1+EOF
00393  M01S00232.cpumtr  +++|          IFC    EQ,$_F$EOI$,1
00394  M01S00233.cpumtr  +++| FG1      SET    FG1+EOI
00395  M01S00234.cpumtr  +++|          IFC    EQ,$_F$EOR$,1
00396  M01S00235.cpumtr  +++| FG1      SET    FG1+EOR
00397  M01S00236.cpumtr  +++|          IFC    EQ,$_F$EXF$,1
00398  M01S00237.cpumtr  +++| FG2      SET    FG2+100B
00399  M01S00238.cpumtr  +++|          IFC    EQ,$_F$IOF$,1
00400  M01S00239.cpumtr  +++| FG2      SET    FG2+200B
00401  M01S00240.cpumtr  +++|          IFC    EQ,$_F$LST$,1
00402  M01S00241.cpumtr  +++| FG1      SET    FG1+20B
00403  M01S00242.cpumtr  +++|          IFC    EQ,$_F$MSO$,1
00404  M01S00243.cpumtr  +++| FG2      SET    FG2+2000B
00405  M01S00244.cpumtr  +++|          IFC    EQ,$_F$MTO$,1
00406  M01S00245.cpumtr  +++| FG2      SET    FG2+1000B
00407  M01S00246.cpumtr  +++|          IFC    EQ,$_F$NDT$,1
00408  M01S00247.cpumtr  +++| FG2      SET    FG2+40B
00409  M01S00248.cpumtr  +++|          IFC    EQ,$_F$NRW$,1
00410  M01S00249.cpumtr  +++| FG1      SET    FG1+20B
00411  M01S00250.cpumtr  +++|          IFC    EQ,$_F$PRU$,1
00412  M01S00251.cpumtr  +++| FG1      SET    FG1+PRU
00413  M01S00252.cpumtr  +++|          IFC    EQ,$_F$RFE$,1
00414  M01S00253.cpumtr  +++| FG2      SET    FG2+400B
00415  M01S00254.cpumtr  +++|          IFC    EQ,$_F$RWO$,1
00416  M01S00255.cpumtr  +++| FG1      SET    FG1+2000B
00417  M01S00256.cpumtr  +++|          IFC    EQ,$_F$SKO$,1
00418  M01S00257.cpumtr  +++| FG1      SET    FG1+2000B
00419  M01S00258.cpumtr  +++|          IFC    EQ,$_F$UNL$,1
00420  M01S00259.cpumtr  +++| FG1      SET    FG1+2000B
00421  M01S00260.cpumtr  +++|          IFC    EQ,$_F$VFL$,1
00422  M01S00261.cpumtr  +++| FG1      SET    FG1+1
00423  M01S00262.cpumtr  +++|          IFC    EQ,$_F$VIO$,1
00424  M01S00263.cpumtr  +++| FG1      SET    FG1+2
00425  M01S00264.cpumtr  +++|          IFC    EQ,$_F$XF$,1
00426  M01S00265.cpumtr  +++| FG2      SET    FG2+4000B
00427  M01S00266.cpumtr  +++| .B       ENDD
00428  M01S00267.cpumtr  +++| .A       ELSE
00429  M01S00268.cpumtr  +++| FG1      SET    7777B
00430  M01S00269.cpumtr  +++| .A       ENDIF
00431  M01S00270.cpumtr  +++|          VFD    12/FG1,12/FG2,6/0
00432  M01S00271.cpumtr  +++|          ENDM
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  M01S00272.cpumtr  +++| PER      SPACE  4,10
00468  M01S00273.cpumtr  +++|**        PER - SET ECS PARITY ERROR PROCESSING PARAMETERS.
00469  M01S00274.cpumtr  +++|*
00470  M01S00275.cpumtr  +++|*
00471  M01S00276.cpumtr  +++|*         PER    X,PROC
00472  M01S00277.cpumtr  +++|*         ENTRY  *X* = EXIT ADDRESS IN CASE OF UNRECOVERABLE ERROR.
Line S00278 Modification History
M01 (Added by) cpumtr
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00473  M02S00278.v23l617 ---|*                *PROC* = ECS ERROR PROCESSOR.
00474  M01S00001.v23l617 +++|*                *PROC* = EXTENDED MEMORY ERROR PROCESSOR.
00475  M01S00279.cpumtr  +++|*                IF PROC IS NOT DEFINED THEN EITHER /ECS/PER OR
00476  M01S00280.cpumtr  +++|*                /PROGRAM/PER IS USED AS THE PROCESSOR DEPENDING ON
00477  M01S00281.cpumtr  +++|*                IF THE CALL IS FROM ECS OR PROGRAM QUAL BLOCK.
00478  M01S00282.cpumtr  +++|
00479  M01S00283.cpumtr  +++|
00480  M01S00284.cpumtr  +++|          PURGMAC  PER
00481  M01S00285.cpumtr  +++|
00482  M01S00286.cpumtr  +++| PER      MACRO  X,PROC
00483  M01S00287.cpumtr  +++|          LOCAL  A
00484  M01S00288.cpumtr  +++|          QUAL   ECS
00485  M01S00289.cpumtr  +++| A        EQU    *+1
00486  M01S00290.cpumtr  +++|          QUAL   *
00487  M01S00291.cpumtr  +++|          RJ     PROC PER
00488  M01S00292.cpumtr  +++| TPER     RMT
00489  M01S00293.cpumtr  +++|          VFD    12/,18/A,12/,18/X
00490  M01S00294.cpumtr  +++| TPER     RMT
00491  M01S00295.cpumtr  +++|          ENDM
Line S00296 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00492  M02S00296.252l678 ---| TVFD     SPACE  4
00493  M01S00006.252l678 +++| TVFD     SPACE  4,25
00494  M01S00297.cpumtr  +++|**        TVFD - DEFINE RELOCATABLE -VFD-.
00495  M01S00298.cpumtr  +++|*
00496  M01S00299.cpumtr  +++|*
Line S00300 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00497  M02S00300.252l678 ---|*         TVFD   N/V,V1,V2,C
00498  M01S00007.252l678 +++|*         TVFD   N/V,V1,C1,V2,C2,V3,C3,V4,C4,V5,C5,V6
00499  M01S00301.cpumtr  +++|*         ENTRY  *N* = BIT COUNT
Line S00302 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00500  M02S00302.252l678 ---|*                *V* = VALUE
Line S00303 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00501  M02S00303.252l678 ---|*                IF *C* IS NOT PRESENT
Line S00304 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00502  M02S00304.252l678 ---|*                *V1* = ADDRESS OF VALUE TO SET DURING PRESET.
Line S00305 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00503  M02S00305.252l678 ---|*                       IF *V1* IS NOT PRESENT THE ORIGIN WILL BE
Line S00306 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00504  M02S00306.252l678 ---|*                       USED FOR RELOCATION.
Line S00307 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00505  M02S00307.252l678 ---|*                IF *C* IS PRESENT THEN
Line S00308 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00506  M02S00308.252l678 ---|*                *V1* = THE DEFAULT VALUE TO BE SET DURING PRESET.
Line S00309 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00507  M02S00309.252l678 ---|*                *V2* = THE ALTERNATE VALUE TO BE SET DURING PRESET.
Line S00310 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00508  M02S00310.252l678 ---|*                *C* = THE ADDRESS OF THE CONDITION WORD IN PRESET
Line S00311 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00509  M02S00311.252l678 ---|*                      WHICH TELLS IF THE DEFAULT OR ALTERNATE
Line S00312 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00510  M02S00312.252l678 ---|*                      VALUE IS TO BE USED.
Line S00313 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00511  M02S00313.252l678 ---|*                      IF THE CONDITION WORD IS NON-ZERO THEN THE
Line S00314 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00512  M02S00314.252l678 ---|*                      DEFAULT VALUE *V1* WILL BE SET DURING PRESET.
Line S00315 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00513  M02S00315.252l678 ---|*                      IF THE CONDITION WORD IS ZERO THEN THE
Line S00316 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00514  M02S00316.252l678 ---|*                      ALTERNATE VALUE WILL BE USED.
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  M01S00317.cpumtr  +++|
00532  M01S00318.cpumtr  +++|
00533  M01S00319.cpumtr  +++|          PURGMAC  TVFD
00534  M01S00320.cpumtr  +++|
Line S00321 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00535  M02S00321.252l678 ---| TVFD     MACRO  V,V1,V2,C
00536  M01S00024.252l678 +++| TVFD     MACRO  V,V1,C1,V2,C2,V3,C3,V4,C4,V5,C5,V6
00537  M01S00057.253l688 +++|          LOCAL  S
00538  M01S00322.cpumtr  +++|*                            EXTRACT FIELD WIDTH
00539  M01S00323.cpumtr  +++| .1       MICRO  1,,/V
00540  M01S00324.cpumtr  +++| .1       MICCNT .1
00541  M01S00325.cpumtr  +++|*                            CHECK FOR RELOCATION REQUIRED
00542  M01S00326.cpumtr  +++| .2       MICRO  .1+2,, V
00543  M01S00058.253l688 +++| .A       IFC    EQ,$V1$$
00544  M01S00327.cpumtr  +++|          VFD    ".1"/".2"
Line S00328 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00545  M02S00328.253l688 ---|          IFC    NE,$V1$$,1
Line S00329 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
M03 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00546  M03S00329.253l688 ---|          SAC    ".1",V1,V2,C
Line S00025 Modification History
M01 (Added by) 252l678
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00547  M02S00025.253l688 ---|          SAC    ".1",V1,C1,V2,C2,V3,C3,V4,C4,V5,C5,V6
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  M01S00330.cpumtr  +++|          ENDM
Line S00331 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00555  M02S00331.252l678 ---| SAC      SPACE  4
Line S00026 Modification History
M01 (Added by) 252l678
M02 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00556  M02S00026.271l750 ---| SAC      SPACE  4,20
00557  M01S00057.271l750 +++| SAC      SPACE  4,40
00558  M01S00332.cpumtr  +++|**        SAC - SUBSTITUTE ADDRESS CONSTANT.
00559  M01S00333.cpumtr  +++|*
00560  M01S00334.cpumtr  +++|*
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 (Added by) cpumtr
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00574  M02S00335.252l678 ---|*         SAC    W,V1,V2,C
00575  M01S00027.252l678 +++|*         SAC    W,V1,C1,V2,C2,V3,C3,V4,C4,V5,C5,V6
Line S00336 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00576  M02S00336.271l750 ---|*         ENTRY  *W*  FIELD WIDTH.
Line S00337 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
M03 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00577  M03S00337.271l750 ---|*                IF *C* IS NOT PRESENT
Line S00028 Modification History
M01 (Added by) 252l678
M02 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00578  M02S00028.271l750 ---|*                IF *C1* IS NOT PRESENT
Line S00338 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00579  M02S00338.271l750 ---|*                *V1* = ADDRESS OF VALUE TO SET DURING PRESET.
Line S00339 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
M03 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00580  M03S00339.271l750 ---|*                IF *C* IS PRESENT THEN
Line S00340 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
M03 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00581  M03S00340.271l750 ---|*                *V1* = THE DEFAULT VALUE TO BE SET DURING PRESET.
Line S00341 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
M03 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00582  M03S00341.271l750 ---|*                *V2* = THE ALTERNATE VALUE TO BE SET DURING PRESET.
Line S00342 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
M03 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00583  M03S00342.271l750 ---|*                *C* = THE ADDRESS OF THE CONDITION WORD IN PRESET
Line S00343 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
M03 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00584  M03S00343.271l750 ---|*                      WHICH TELLS IF THE DEFAULT OR ALTERNATE
Line S00344 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
M03 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00585  M03S00344.271l750 ---|*                      VALUE IS TO BE USED.
Line S00345 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
M03 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00586  M03S00345.271l750 ---|*                      IF THE CONDITION WORD IS NON-ZERO THEN THE
Line S00346 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
M03 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00587  M03S00346.271l750 ---|*                      DEFAULT VALUE *V1* WILL BE SET DURING PRESET.
Line S00347 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
M03 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00588  M03S00347.271l750 ---|*                      IF THE CONDITION WORD IS ZERO THEN THE
Line S00348 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
M03 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00589  M03S00348.271l750 ---|*                      ALTERNATE VALUE WILL BE USED.
Line S00029 Modification History
M01 (Added by) 252l678
M02 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00590  M02S00029.271l750 ---|*                IF *C1* IS PRESENT THEN
Line S00030 Modification History
M01 (Added by) 252l678
M02 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00591  M02S00030.271l750 ---|*                *VI* = THE VALUE TO BE SET DURING PRESET, IF THE
Line S00031 Modification History
M01 (Added by) 252l678
M02 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00592  M02S00031.271l750 ---|*                       CORRESPONDING *CI* IS TRUE.
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 +++|*
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 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00602  M02S00034.271l750 ---|*                       BE USED.  IF THE CONDITION WORD IS ZERO, THE
Line S00035 Modification History
M01 (Added by) 252l678
M02 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00603  M02S00035.271l750 ---|*                       CORRESPONDING VALUE WILL BE USED. THE *CI*S ARE
Line S00036 Modification History
M01 (Added by) 252l678
M02 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00604  M02S00036.271l750 ---|*                       CHECKED IN ORDER, FROM LEFT TO RIGHT, UNTIL A
Line S00037 Modification History
M01 (Added by) 252l678
M02 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00605  M02S00037.271l750 ---|*                       TRUE CONDITION IS FOUND.  IF NONE OF THE
Line S00038 Modification History
M01 (Added by) 252l678
M02 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
00606  M02S00038.271l750 ---|*                       CONDITIONS ARE TRUE, *VN* IS USED.
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 +++|*
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  M01S00349.cpumtr  +++|
00618  M01S00350.cpumtr  +++|
00619  M01S00351.cpumtr  +++|          PURGMAC  SAC
00620  M01S00352.cpumtr  +++|
Line S00353 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00621  M02S00353.252l678 ---| SAC      MACRO  W,V1,V2,C
Line S00042 Modification History
M01 (Added by) 252l678
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00622  M02S00042.253l688 ---| SAC      MACRO  W,V1,C1,V2,C2,V3,C3,V4,C4,V5,C5,V6
00623  M01S00065.253l688 +++|          MACRO  SAC,S,W,V1,C1,V2,C2,V3,C3,V4,C4,V5,C5,V6
00624  M01S00066.253l688 +++|          LOCAL  N
00625  M01S00354.cpumtr  +++|          QUAL   PRESET
00626  M01S00355.cpumtr  +++| .1       SET    *-*P/60
00627  M01S00356.cpumtr  +++| .2       SET    W+*P-*P/60*60
00628  M01S00357.cpumtr  +++|          USE    /TREL/
Line S00358 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00629  M02S00358.252l678 ---| .A       IFC    EQ,$C$$
00630  M01S00043.252l678 +++| .A       IFC    EQ,$C1$$
00631  M01S00359.cpumtr  +++| .3       MICRO  1,1,$V1$
00632  M01S00360.cpumtr  +++| .B       IFC    NE,$".3"$-$
Line S00361 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00633  M02S00361.253l688 ---| +        VFD    6/.2,6/W,18/V1,12/,18/.1
00634  M01S00067.253l688 +++| +        VFD    6/.2,6/W,18/V1,12/2000B,18/.1
00635  M01S00362.cpumtr  +++| .B       ELSE
00636  M01S00363.cpumtr  +++| .3       MICRO  2,,$V1$
Line S00364 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00637  M02S00364.253l688 ---| +        VFD    6/.2,6/W,18/".3",12/4000B,18/.1
00638  M01S00068.253l688 +++| +        VFD    6/.2,6/W,18/".3",12/-2000B,18/.1
00639  M01S00365.cpumtr  +++| .B       ENDIF
00640  M01S00366.cpumtr  +++| .A       ELSE
Line S00367 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00641  M02S00367.252l678 ---| +        VFD    6/.2,6/W,18/C,12/2000B,18/.1
Line S00044 Modification History
M01 (Added by) 252l678
M02 (Updated 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 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00643  M02S00368.253l688 ---| +        JP     V2
Line S00369 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00644  M02S00369.253l688 ---| -        JP     V1
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  M01S00370.cpumtr  +++| .A       ENDIF
00682  M01S00371.cpumtr  +++|          USE    *
00683  M01S00372.cpumtr  +++|          QUAL   *
00684  M01S00373.cpumtr  +++|          ENDM
00685  M01S00374.cpumtr  +++| OPDEFS   SPACE  4
Line S00375 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00686  M02S00375.253l688 ---|*         THE FOLLOWING OPDEFS PROVIDE THE CAPABILITY TO SET THE
Line S00376 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00687  M02S00376.253l688 ---|*         ADDRESS (*K* PORTION) OF A SET INSTRUCTION DURING CPUMTR
Line S00377 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00688  M02S00377.253l688 ---|*         PRESET.  THE ADDRESS PORTION CONTAINS A TAG DEFINED IN
Line S00378 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00689  M02S00378.253l688 ---|*         THE PRESET TABLE OF RELOCATION VALUES.  DURING PRESET THE
Line S00379 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00690  M02S00379.253l688 ---|*         VALUE IN THE TABLE IS ADDED TO THE ADDRESS PORTION OF THE
Line S00380 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00691  M02S00380.253l688 ---|*         INSTRUCTION.
00692  M01S00105.253l688 +++|**        CONDITIONAL ADDRESS SETTING.
00693  M01S00381.cpumtr  +++|*
Line S00382 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00694  M02S00382.253l688 ---|**        CONDITIONAL ADDRESS SETTING.
Line S00383 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00695  M02S00383.253l688 ---|*
Line S00384 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00696  M02S00384.253l688 ---|*         THE CAPABILITY EXISTS TO PRESET THE ADDRESS PORTION OF
Line S00385 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00697  M02S00385.253l688 ---|*         AN INSTRUCTION TO ONE OF TWO POSSIBLE VALUES DEPENDING ON
Line S00386 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00698  M02S00386.253l688 ---|*         A *CONDITION* WORD IN THE PRESET RELOCATION TABLE.
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  M01S00387.cpumtr  +++|*         IN ORDER TO SET THE ADDRESS PORTION CONDITIONALLY A MACRO
00704  M01S00388.cpumtr  +++|*         MUST BE WRITTEN WHICH CALLS THE *SAC* MACRO TO SET THE
00705  M01S00389.cpumtr  +++|*         ADDRESS PORTION OF THE INSTRUCTIONS.
00706  M01S00390.cpumtr  +++|*
Line S00391 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00707  M02S00391.253l688 ---|*         A FULL SET OF MACROES IS AVAILABLE FOR THE JUMP INSTRUCTIONS.
Line S00392 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00708  M02S00392.253l688 ---|*         THE FORM OF A CONDITIONAL JUMP INSTRUCTION IS AS FOLLOWS.
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  M01S00393.cpumtr  +++|*
Line S00394 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00713  M02S00394.253l688 ---|*         TJP    (/PROGRAM/TAG1,/MONITOR/HNG1,MMF)
00714  M01S00113.253l688 +++|*         TA2    MS2W,SCA
00715  M01S00114.253l688 +++|*         TX3    B7+FLSW,TAG
00716  M01S00395.cpumtr  +++|*
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  M01S00396.cpumtr  +++|*         THE RESULTING INSTRUCTION AFTER PRESET WOULD BE -
Line S00397 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00734  M02S00397.253l688 ---|*         JP     /PROGRAM/TAG1  JUMP TO TAG1 IF MMF PRESENT
Line S00398 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00735  M02S00398.253l688 ---|*         JP     /MONITOR/HNG1  JUMP TO HANG IF MMF NOT PRESENT
Line S00399 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00736  M02S00399.253l688 ---|*
Line S00400 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00737  M02S00400.253l688 ---|*         EITHER OR BOTH OF THE PARAMETERS OF A *TJP* INSTRUCTION
Line S00401 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00738  M02S00401.253l688 ---|*         MAY ALSO CONTAIN A REGISTER OR A REGISTER PLUS OFFSET.
Line S00402 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00739  M02S00402.253l688 ---|*         IN SHORT, THE PARAMETERS MAY BE OF ANY FORMAT ALLOWABLE ON
Line S00403 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00740  M02S00403.253l688 ---|*         THE *JP* INSTRUCTION.
Line S00404 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00741  M02S00404.253l688 ---|*
Line S00405 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00742  M02S00405.253l688 ---|*         TJP    (B3+OFFSET,B6,CONDITION)
Line S00406 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00743  M02S00406.253l688 ---|*
Line S00407 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00744  M02S00407.253l688 ---|*         THE RESULTING INSTRUCTION AFTER PRESET WOULD BE -
Line S00408 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00745  M02S00408.253l688 ---|*         JP     B3+OFFSET   IF CONDITION PRESENT
Line S00409 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00746  M02S00409.253l688 ---|*         JP     B6          IF CONDITION NOT PRESENT
Line S00410 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00747  M02S00410.253l688 ---|*
Line S00411 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00748  M02S00411.253l688 ---|*         ALSO MACROES MAY BE DEFINED TO SET THE SHIFT COUNT PORTION
Line S00412 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00749  M02S00412.253l688 ---|*         OF A SHIFT INSTRUCTION.  SINCE THESE ARE RARELY USED THEY
Line S00413 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00750  M02S00413.253l688 ---|*         WILL BE DEFINED ONLY WHEN NEEDED.  THE FORM OF A CONDITIONAL
Line S00414 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00751  M02S00414.253l688 ---|*         SHIFT INSTRUCTION IS IDENTICAL TO THE OTHER CONDITIONAL
Line S00415 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00752  M02S00415.253l688 ---|*         INSTRUCTIONS.
00753  M01S00131.253l688 +++|*         SX0    B3+OFFSET   IF CONDITION PRESENT
00754  M01S00132.253l688 +++|*         SX0    TAG         IF CONDITION NOT PRESENT
00755  M01S00416.cpumtr  +++|
00756  M01S00417.cpumtr  +++|
00757  M01S00418.cpumtr  +++| TAQ      OPDEF  I,L
00758  M01S00419.cpumtr  +++|          SA.I   0
00759  M01S00420.cpumtr  +++|          SAC    18,L
00760  M01S00421.cpumtr  +++|          ENDM
00761  M01S00422.cpumtr  +++|
00762  M01S00423.cpumtr  +++|          PURGDEF TBQ
00763  M01S00424.cpumtr  +++|
00764  M01S00425.cpumtr  +++| TBQ      OPDEF  I,L
00765  M01S00426.cpumtr  +++|          SB.I   0
00766  M01S00427.cpumtr  +++|          SAC    18,L
00767  M01S00428.cpumtr  +++|          ENDM
00768  M01S00429.cpumtr  +++|
00769  M01S00430.cpumtr  +++| TXQ      OPDEF  I,L
00770  M01S00431.cpumtr  +++|          SX.I   0
00771  M01S00432.cpumtr  +++|          SAC    18,L
00772  M01S00433.cpumtr  +++|          ENDM
00773  M01S00434.cpumtr  +++|
00774  M01S00435.cpumtr  +++| TAQ,Q    OPDEF  I,K,L
00775  M01S00436.cpumtr  +++|          SA.I   K
00776  M01S00437.cpumtr  +++|          SAC    18,L
00777  M01S00438.cpumtr  +++|          ENDM
00778  M01S00439.cpumtr  +++|
00779  M01S00440.cpumtr  +++| TBQ,Q    OPDEF  I,K,L
00780  M01S00441.cpumtr  +++|          SB.I   K
00781  M01S00442.cpumtr  +++|          SAC    18,L
00782  M01S00443.cpumtr  +++|          ENDM
00783  M01S00444.cpumtr  +++|
00784  M01S00445.cpumtr  +++| TXQ,Q    OPDEF  I,K,L
00785  M01S00446.cpumtr  +++|          SX.I   K
00786  M01S00447.cpumtr  +++|          SAC    18,L
00787  M01S00448.cpumtr  +++|          ENDM
00788  M01S00449.cpumtr  +++|
00789  M01S00450.cpumtr  +++| TAAQ,Q   OPDEF  I,J,K,L
00790  M01S00451.cpumtr  +++|          SA.I   A.J+K
00791  M01S00452.cpumtr  +++|          SAC    18,L
00792  M01S00453.cpumtr  +++|          ENDM
00793  M01S00454.cpumtr  +++|
00794  M01S00455.cpumtr  +++| TBAQ,Q   OPDEF  I,J,K,L
00795  M01S00456.cpumtr  +++|          SB.I   A.J+K
00796  M01S00457.cpumtr  +++|          SAC    18,L
00797  M01S00458.cpumtr  +++|          ENDM
00798  M01S00459.cpumtr  +++|
00799  M01S00460.cpumtr  +++| TXAQ,Q   OPDEF  I,J,K,L
00800  M01S00461.cpumtr  +++|          SX.I   A.J+K
00801  M01S00462.cpumtr  +++|          SAC    18,L
00802  M01S00463.cpumtr  +++|          ENDM
00803  M01S00464.cpumtr  +++|
00804  M01S00465.cpumtr  +++| TABQ,Q   OPDEF  I,J,K,L
00805  M01S00466.cpumtr  +++|          SA.I   B.J+K
00806  M01S00467.cpumtr  +++|          SAC    18,L
00807  M01S00468.cpumtr  +++|          ENDM
00808  M01S00469.cpumtr  +++|
00809  M01S00470.cpumtr  +++| TBBQ,Q   OPDEF  I,J,K,L
00810  M01S00471.cpumtr  +++|          SB.I   B.J+K
00811  M01S00472.cpumtr  +++|          SAC    18,L
00812  M01S00473.cpumtr  +++|          ENDM
00813  M01S00474.cpumtr  +++|
00814  M01S00475.cpumtr  +++| TXBQ,Q   OPDEF  I,J,K,L
00815  M01S00476.cpumtr  +++|          SX.I   B.J+K
00816  M01S00477.cpumtr  +++|          SAC    18,L
00817  M01S00478.cpumtr  +++|          ENDM
00818  M01S00479.cpumtr  +++|
00819  M01S00480.cpumtr  +++| TAXQ,Q   OPDEF  I,J,K,L
00820  M01S00481.cpumtr  +++|          SA.I   X.J+K
00821  M01S00482.cpumtr  +++|          SAC    18,L
00822  M01S00483.cpumtr  +++|          ENDM
00823  M01S00484.cpumtr  +++|
00824  M01S00485.cpumtr  +++| TBXQ,Q   OPDEF  I,J,K,L
00825  M01S00486.cpumtr  +++|          SB.I   X.J+K
00826  M01S00487.cpumtr  +++|          SAC    18,L
00827  M01S00488.cpumtr  +++|          ENDM
00828  M01S00489.cpumtr  +++|
00829  M01S00490.cpumtr  +++| TXXQ,Q   OPDEF  I,J,K,L
00830  M01S00491.cpumtr  +++|          SX.I   X.J+K
00831  M01S00492.cpumtr  +++|          SAC    18,L
00832  M01S00493.cpumtr  +++|          ENDM
00833  M01S00494.cpumtr  +++|
00834  M01S00495.cpumtr  +++| TAA,Q    OPDEF  I,J,L
00835  M01S00496.cpumtr  +++|          SA.I   A.J+0
00836  M01S00497.cpumtr  +++|          SAC    18,L
00837  M01S00498.cpumtr  +++|          ENDM
00838  M01S00499.cpumtr  +++|
00839  M01S00500.cpumtr  +++| TBA,Q    OPDEF  I,J,L
00840  M01S00501.cpumtr  +++|          SB.I   A.J+0
00841  M01S00502.cpumtr  +++|          SAC    18,L
00842  M01S00503.cpumtr  +++|          ENDM
00843  M01S00504.cpumtr  +++|
00844  M01S00505.cpumtr  +++| TXA,Q    OPDEF  I,J,L
00845  M01S00506.cpumtr  +++|          SX.I   A.J+0
00846  M01S00507.cpumtr  +++|          SAC    18,L
00847  M01S00508.cpumtr  +++|          ENDM
00848  M01S00509.cpumtr  +++|
00849  M01S00510.cpumtr  +++| TAB,Q    OPDEF  I,J,L
00850  M01S00511.cpumtr  +++|          SA.I   B.J+0
00851  M01S00512.cpumtr  +++|          SAC    18,L
00852  M01S00513.cpumtr  +++|          ENDM
00853  M01S00514.cpumtr  +++|
00854  M01S00515.cpumtr  +++| TBB,Q    OPDEF  I,J,L
00855  M01S00516.cpumtr  +++|          SB.I   B.J+0
00856  M01S00517.cpumtr  +++|          SAC    18,L
00857  M01S00518.cpumtr  +++|          ENDM
00858  M01S00519.cpumtr  +++|
00859  M01S00520.cpumtr  +++| TXB,Q    OPDEF  I,J,L
00860  M01S00521.cpumtr  +++|          SX.I   B.J+0
00861  M01S00522.cpumtr  +++|          SAC    18,L
00862  M01S00523.cpumtr  +++|          ENDM
00863  M01S00524.cpumtr  +++|
00864  M01S00525.cpumtr  +++| TAX,Q    OPDEF  I,J,L
00865  M01S00526.cpumtr  +++|          SA.I   X.J+0
00866  M01S00527.cpumtr  +++|          SAC    18,L
00867  M01S00528.cpumtr  +++|          ENDM
00868  M01S00529.cpumtr  +++|
00869  M01S00530.cpumtr  +++| TBX,Q    OPDEF  I,J,L
00870  M01S00531.cpumtr  +++|          SB.I   X.J+0
00871  M01S00532.cpumtr  +++|          SAC    18,L
00872  M01S00533.cpumtr  +++|          ENDM
00873  M01S00534.cpumtr  +++|
00874  M01S00535.cpumtr  +++| TXX,Q    OPDEF  I,J,L
00875  M01S00536.cpumtr  +++|          SX.I   X.J+0
00876  M01S00537.cpumtr  +++|          SAC    18,L
00877  M01S00538.cpumtr  +++|          ENDM
Line S00539 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00878  M02S00539.253l688 ---|          SPACE  4
Line S00540 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00879  M02S00540.253l688 ---|**        DEFINE FORM FOR JUMP INSTRUCTIONS TO SET ADDRESS PORTION
Line S00541 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00880  M02S00541.253l688 ---|*         DURING PRESET.
00881  M01S00542.cpumtr  +++|
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  M01S00543.cpumtr  +++|
Line S00544 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00887  M02S00544.253l688 ---| TJP      MACRO  J,L
00888  M01S00137.253l688 +++|
Line S00138 Modification History
M01 (Added by) 253l688
M02 (Updated 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 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
00890  M02S00001.273l780 ---|          ECHO   ,R=(A2,A3,B3,B4,B6,X0,X1,X2,X3,X4,X5,X6,X7)
00891  M01S00001.273l780 +++|          ECHO   ,R=(A1,A2,A3,B3,B4,B6,X0,X1,X2,X3,X4,X5,X6,X7)
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  M01S00545.cpumtr  +++| .1       MICRO  1,, J
Line S00546 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00950  M02S00546.253l688 ---|          JP     ".1"
Line S00547 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00951  M02S00547.253l688 ---|          SAC    24,L
00952  M01S00196.253l688 +++| .2       MICRO  1,, K
00953  M01S00197.253l688 +++|          GE     ".1",".2",S
00954  M01S00198.253l688 +++| S        SAC    18,L
00955  M01S00548.cpumtr  +++|          ENDM
00956  M01S00549.cpumtr  +++|
Line S00550 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00957  M02S00550.253l688 ---| TEQ      MACRO  L
Line S00551 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00958  M02S00551.253l688 ---|          EQ     0
Line S00552 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00959  M02S00552.253l688 ---|          SAC    18,L
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  M01S00553.cpumtr  +++|          ENDM
00967  M01S00554.cpumtr  +++|
Line S00006 Modification History
M01 (Added by) 251l664
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00968  M02S00006.253l688 ---| TGE      MACRO  J,K,L
00969  M01S00205.253l688 +++| TZR      MACRO  J,L
00970  M01S00206.253l688 +++|          LOCAL  S
00971  M01S00007.251l664 +++| .1       MICRO  1,, J
Line S00008 Modification History
M01 (Added by) 251l664
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00972  M02S00008.253l688 ---| .2       MICRO  1,, K
Line S00009 Modification History
M01 (Added by) 251l664
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00973  M02S00009.253l688 ---|          GE     ".1",".2",0
Line S00010 Modification History
M01 (Added by) 251l664
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00974  M02S00010.253l688 ---|          SAC    18,L
00975  M01S00207.253l688 +++|          ZR     ".1",S
00976  M01S00208.253l688 +++| S        SAC    18,L
00977  M01S00011.251l664 +++|          ENDM
00978  M01S00012.251l664 +++|
Line S00555 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00979  M02S00555.253l688 ---| TGT      MACRO  J,K,L
00980  M01S00209.253l688 +++| TNZ      MACRO  J,L
00981  M01S00210.253l688 +++|          LOCAL  S
00982  M01S00556.cpumtr  +++| .1       MICRO  1,, J
Line S00557 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00983  M02S00557.253l688 ---| .2       MICRO  1,, K
Line S00558 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00984  M02S00558.253l688 ---|          GT     ".1",".2",0
Line S00559 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00985  M02S00559.253l688 ---|          SAC    18,L
00986  M01S00211.253l688 +++|          NZ     ".1",S
00987  M01S00212.253l688 +++| S        SAC    18,L
00988  M01S00560.cpumtr  +++|          ENDM
00989  M01S00561.cpumtr  +++|
Line S00562 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00990  M02S00562.253l688 ---| TZR      MACRO  J,L
00991  M01S00213.253l688 +++| TPL      MACRO  J,L
00992  M01S00214.253l688 +++|          LOCAL  S
00993  M01S00563.cpumtr  +++| .1       MICRO  1,, J
Line S00564 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00994  M02S00564.253l688 ---|          ZR     ".1",0
Line S00565 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00995  M02S00565.253l688 ---|          SAC    18,L
00996  M01S00215.253l688 +++|          PL     ".1",S
00997  M01S00216.253l688 +++| S        SAC    18,L
00998  M01S00566.cpumtr  +++|          ENDM
00999  M01S00567.cpumtr  +++|
Line S00568 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01000  M02S00568.253l688 ---| TNZ      MACRO  J,L
01001  M01S00217.253l688 +++| TNG      MACRO  J,L
01002  M01S00218.253l688 +++|          LOCAL  S
01003  M01S00569.cpumtr  +++| .1       MICRO  1,, J
Line S00570 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01004  M02S00570.253l688 ---|          NZ     ".1",0
Line S00571 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01005  M02S00571.253l688 ---|          SAC    18,L
01006  M01S00219.253l688 +++|          NG     ".1",S
01007  M01S00220.253l688 +++| S        SAC    18,L
01008  M01S00572.cpumtr  +++|          ENDM
Line S00573 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01009  M02S00573.253l688 ---|
Line S00574 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01010  M02S00574.253l688 ---| TPL      MACRO  J,L
Line S00575 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01011  M02S00575.253l688 ---| .1       MICRO  1,, J
Line S00576 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01012  M02S00576.253l688 ---|          PL     ".1",0
Line S00577 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01013  M02S00577.253l688 ---|          SAC    18,L
Line S00578 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01014  M02S00578.253l688 ---|          ENDM
Line S00579 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01015  M02S00579.253l688 ---|
Line S00580 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01016  M02S00580.253l688 ---| TNG      MACRO  J,L
Line S00581 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01017  M02S00581.253l688 ---| .1       MICRO  1,, J
Line S00582 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01018  M02S00582.253l688 ---|          NG     ".1",0
Line S00583 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01019  M02S00583.253l688 ---|          SAC    18,L
Line S00584 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01020  M02S00584.253l688 ---|          ENDM
Line S00585 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01021  M02S00585.253l688 ---|
Line S00586 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01022  M02S00586.253l688 ---|
01023  M01S00221.253l688 +++| OPDEFS   SPACE  4,10
01024  M01S00587.cpumtr  +++|*         THIS INSTRUCTION IS A CONDITIONAL NO-OP.
01025  M01S00588.cpumtr  +++|*         IF THE CONDITION WORD *C* IS NON-ZERO, AN *EQ* TO
01026  M01S00589.cpumtr  +++|*         THE SPECIFIED ADDRESS (*L*) IS ENTERED INTO THIS
01027  M01S00590.cpumtr  +++|*         LOCATION AT PRESET TIME.  OTHERWISE, A *SB0 46000B*
01028  M01S00591.cpumtr  +++|*         IS ENTERED, MAKING THE INSTRUCTION A NO-OP.
01029  M01S00592.cpumtr  +++|
01030  M01S00593.cpumtr  +++| TNO      MACRO  L,C
01031  M01S00594.cpumtr  +++| .1       SET    *P
01032  M01S00595.cpumtr  +++| .A       IFEQ   .1,15
01033  M01S00596.cpumtr  +++|          NO
01034  M01S00597.cpumtr  +++| .A       ENDIF
Line S00598 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01035  M02S00598.253l688 ---|          VFD    12/
Line S00599 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
M03 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01036  M03S00599.253l688 ---|          SAC    12,0400B,6100B,C
Line S00045 Modification History
M01 (Added by) 252l678
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01037  M02S00045.253l688 ---|          SAC    12,0400B,C,6100B
Line S00600 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01038  M02S00600.253l688 ---|          VFD    18/
Line S00601 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
M03 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01039  M03S00601.253l688 ---|          SAC    18,L,046000B,C
Line S00046 Modification History
M01 (Added by) 252l678
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01040  M02S00046.253l688 ---|          SAC    18,L,C,046000B
01041  M01S00222.253l688 +++|          VFD    30/0400000000B+L
01042  M01S00223.253l688 +++|          SAC    30,0400000000B+L,C,6100046000B
01043  M01S00602.cpumtr  +++|          ENDM
Line S00603 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01044  M02S00603.253l688 ---|
Line S00604 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01045  M02S00604.253l688 ---|
01046  M01S00224.253l688 +++| OPDEFS   SPACE  4,10
01047  M01S00605.cpumtr  +++|*         THIS INSTRUCTION IS A CONDITIONAL NO-OP.
01048  M01S00606.cpumtr  +++|*         IF THE CONDITION WORD *C* IS NONZERO, A *NZ B5*
01049  M01S00607.cpumtr  +++|*         TO THE SPECIFIED ADDRESS (*L*) IS ENTERED INTO THIS
01050  M01S00608.cpumtr  +++|*         LOCATION AT PRESET TIME.  OTHERWISE, A *SB0 46000B*
01051  M01S00609.cpumtr  +++|*         IS ENTERED, MAKING THE INSTRUCTION A NO-OP.
01052  M01S00610.cpumtr  +++|
01053  M01S00611.cpumtr  +++| TNZB5    MACRO  L,C
01054  M01S00612.cpumtr  +++| .1       SET    *P
01055  M01S00613.cpumtr  +++| .A       IFEQ   .1,15
01056  M01S00614.cpumtr  +++|          NO
01057  M01S00615.cpumtr  +++| .A       ENDIF
Line S00616 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01058  M02S00616.253l688 ---|          VFD    12/
Line S00617 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
M03 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01059  M03S00617.253l688 ---|          SAC    12,0550B,6100B,C
Line S00047 Modification History
M01 (Added by) 252l678
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01060  M02S00047.253l688 ---|          SAC    12,0550B,C,6100B
Line S00618 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01061  M02S00618.253l688 ---|          VFD    18/
Line S00619 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
M03 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01062  M03S00619.253l688 ---|          SAC    18,L,046000B,C
Line S00048 Modification History
M01 (Added by) 252l678
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01063  M02S00048.253l688 ---|          SAC    18,L,C,046000B
01064  M01S00225.253l688 +++|          NZ     B5,L
01065  M01S00226.253l688 +++|          SAC    30,0550000000B+L,C,6100046000B
01066  M01S00620.cpumtr  +++|          ENDM
Line S00621 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01067  M02S00621.253l688 ---|
Line S00622 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01068  M02S00622.253l688 ---|
Line S00623 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01069  M02S00623.253l688 ---|*         THIS INSTRUCTION IS A CONDITION THREE-WAY JUMP.
Line S00624 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01070  M02S00624.253l688 ---|*         IF CONDITIONAL WORD *C1* IS NON-ZERO, A *JP* TO
Line S00625 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01071  M02S00625.253l688 ---|*         ADDRESS *V1* IS SET IN THIS WORD AT PRESET.
Line S00626 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01072  M02S00626.253l688 ---|*         OTHERWISE, WORD *C2* IS CHECKED - IF IT IS NON-ZERO,
Line S00627 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01073  M02S00627.253l688 ---|*         THEN A *JP* TO ADDRESS *V2* IS SET IN THIS WORD.
Line S00628 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01074  M02S00628.253l688 ---|*         IF NEITHER *C1* OR *C2* ARE NON-ZERO, THEN A *JP*
Line S00629 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01075  M02S00629.253l688 ---|*         TO ADDRESS *V3* IS SET IN THIS POSITION.
Line S00630 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01076  M02S00630.253l688 ---|
Line S00631 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01077  M02S00631.253l688 ---| TJMP     MACRO  V1,C1,V2,C2,V3
Line S00632 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01078  M02S00632.253l688 ---|          QUAL   PRESET
Line S00633 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01079  M02S00633.253l688 ---| .1       SET    *P
Line S00634 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01080  M02S00634.253l688 ---| .B       IFEQ   .1,45
Line S00635 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01081  M02S00635.253l688 ---|          NO
Line S00636 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01082  M02S00636.253l688 ---| .B       ENDIF
Line S00637 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01083  M02S00637.253l688 ---| .C       IFEQ   .1,15
Line S00638 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01084  M02S00638.253l688 ---|          NO
Line S00639 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01085  M02S00639.253l688 ---| .C       ENDIF
Line S00640 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01086  M02S00640.253l688 ---| .1       SET    *P
Line S00641 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01087  M02S00641.253l688 ---| .2       SET    *
Line S00642 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01088  M02S00642.253l688 ---|          JP     0
Line S00643 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01089  M02S00643.253l688 ---|          USE    /TJMP/
Line S00644 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01090  M02S00644.253l688 ---| .A       IFEQ   .1,60
Line S00645 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01091  M02S00645.253l688 ---|+         VFD    1/0
Line S00646 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01092  M02S00646.253l688 ---| .A       ELSE
Line S00647 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01093  M02S00647.253l688 ---|+         VFD    1/1
Line S00648 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01094  M02S00648.253l688 ---| .A       ENDIF
Line S00649 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01095  M02S00649.253l688 ---|          VFD    59/.2
Line S00650 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01096  M02S00650.253l688 ---|+         JP     V1
Line S00651 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01097  M02S00651.253l688 ---|-         VFD    30/C1
Line S00652 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01098  M02S00652.253l688 ---|+         JP     V2
Line S00653 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01099  M02S00653.253l688 ---|-         VFD    30/C2
Line S00654 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01100  M02S00654.253l688 ---|+         JP     V3
Line S00655 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01101  M02S00655.253l688 ---|-         VFD    30/0
Line S00656 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01102  M02S00656.253l688 ---|          USE    *
Line S00657 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01103  M02S00657.253l688 ---|          QUAL   *
Line S00658 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01104  M02S00658.253l688 ---|          ENDM
Line S00659 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01105  M02S00659.253l688 ---|
Line S00660 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01106  M02S00660.253l688 ---| TSB3     MACRO  L
Line S00661 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01107  M02S00661.253l688 ---|          SB3    0
Line S00662 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01108  M02S00662.253l688 ---|          SAC    18,L
Line S00663 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01109  M02S00663.253l688 ---|          ENDM
Line S00664 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01110  M02S00664.253l688 ---|
Line S00665 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01111  M02S00665.253l688 ---| TSB6     MACRO  L
Line S00666 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01112  M02S00666.253l688 ---|          SB6    0
Line S00667 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01113  M02S00667.253l688 ---|          SAC    18,L
Line S00668 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01114  M02S00668.253l688 ---|          ENDM
Line S00669 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
M03 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01115  M03S00669.253l688 ---|
Line S00670 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
M03 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01116  M03S00670.253l688 ---| TSX0     MACRO  L
Line S00671 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
M03 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01117  M03S00671.253l688 ---|          SX0    0
Line S00672 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
M03 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01118  M03S00672.253l688 ---|          SAC    18,L
Line S00673 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
M03 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01119  M03S00673.253l688 ---|          ENDM
Line S00674 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
M03 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01120  M03S00674.253l688 ---|
Line S00675 Modification History
M01 (Added by) cpumtr
M02 (Updated by) 252l678
M03 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01121  M03S00675.253l688 ---| TSX2     MACRO  L
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/cpumtr.txt ยท Last modified: by 127.0.0.1