User Tools

Site Tools


cdc:nos2.source:opl.opl871:deck:0mf

Deck 0MF

Library Member Format: MODIFY

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M00S00001.0mf     +++|          IDENT  0MF,ILDX
00002  M00S00002.0mf     +++|          PERIPH J
00003  M00S00003.0mf     +++|          BASE   M
00004  M00S00004.0mf     +++|          SST
00005  M00S00005.0mf     +++|*COMMENT  0MF - INITIALIZE MMF LINK DEVICE.
Line S00006 Modification History
M01 (Removed by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00006  M01S00006.281l803 ---|          COMMENT COPYRIGHT CONTROL DATA CORP. 1975.
Line S00001 Modification History
M01 (Added by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00007  M01S00001.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
Line S00007 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00008  M01S00007.ns22000 ---|          TITLE  0MF - INITIALIZE MMF LINK DEVICE
Line S00001 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00009  M01S00001.ns22000 +++|          TITLE  0MF - INITIALIZE MMF LINK DEVICE.
00010  M00S00008.0mf     +++|          SPACE  4
00011  M00S00009.0mf     +++|***       0MF - INITIALIZE MMF LINK DEVICE.
00012  M00S00010.0mf     +++|*         P. D. HAAS         75/07/14.
00013  M00S00011.0mf     +++|          SPACE  4
00014  M00S00012.0mf     +++|***              0MF IS RESPONSIBLE FOR INITIALIZATION OF THE
00015  M00S00013.0mf     +++|*         MULTI-MAINFRAME LINK DEVICE (ECS).
00016  M00S00014.0mf     +++|          SPACE  4
00017  M00S00015.0mf     +++|***       ENTRY CONDITIONS.
00018  M00S00016.0mf     +++|*
00019  M00S00017.0mf     +++|*
Line S00018 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00020  M01S00018.ns22000 ---|*         (EQ) = ECS EQUIPMENT NUMBER.
Line S00002 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00021  M01S00002.ns22000 +++|*         (EQ) = ECS EST ORDINAL.
Line S00001 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00022  M01S00001.283l840 +++|*         (RS) = RECOVERY STATUS.
00023  M00S00019.0mf     +++|*         (TW) = CONSTANT TW0.
Line S00002 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00024  M01S00002.283l840 +++|*         (P1) = TOTAL NUMBER OF DEVICES TO PRESET.
00025  M01S00003.283l840 +++|*         (P2) = NUMBER OF BUFFERED DEVICES TO PRESET.
00026  M01S00004.283l840 +++|*         (CN - CN+4) = *ALGL* WORD OF MST FOR ECS.
Line S00020 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00027  M01S00020.ns22000 ---|*         (LM) = LINK DEVICE MST POINTER.
00028  M00S00021.0mf     +++|*         (FN - FN+4) = EST ENTRY FOR ECS.
Line S00022 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00029  M01S00022.283l840 ---|*         (P2) = NUMBER OF DEVICES TO PRESET FOR.
00030  M01S00023.283l840 ---|*         (CN - CN+4) = *ALGL* WORD OF MST FOR ECS.
00031  M00S00024.0mf     +++|          SPACE  4
00032  M00S00025.0mf     +++|***       EXIT CONDITIONS.
00033  M00S00026.0mf     +++|*
00034  M00S00027.0mf     +++|*
00035  M00S00028.0mf     +++|*         ECS RESIDENT INITIALIZED.
00036  M00S00029.0mf     +++|*         *PRSI* INTERLOCK CLEARED.
Line S00005 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00037  M01S00005.283l840 +++|*         (QT) = CURRENT *DAT* TRACK.
00038  M01S00006.283l840 +++|*         (QI) = CURRENT *DAT* INDEX.
00039  M01S00007.283l840 +++|*         (BAEI - BAEI+4) = IMAGE OF *BAET* ENVIRONMENT TABLE WORD.
00040  M00S00030.0mf     +++|          SPACE  4
00041  M00S00031.0mf     +++|*CALL     COMPMAC
00042  M00S00032.0mf     +++|*CALL     COMPREL
00043  M00S00033.0mf     +++|*CALL     COMSCPS
00044  M00S00034.0mf     +++|*CALL     COMSMSP
00045  M00S00035.0mf     +++|*CALL     COMSMST
00046  M00S00036.0mf     +++|          LIST   X
Line S00003 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00047  M01S00003.ns22000 +++| MMF$     EQU    1           INITIALIZE COMSMMF DIRECT CELLS
00048  M00S00037.0mf     +++|*CALL     COMSMMF
Line S00038 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00049  M01S00038.283l840 ---|          LIST   -X
Line S00008 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00050  M01S00008.283l840 +++|          LIST   *
00051  M00S00039.0mf     +++|*CALL     COMSZOL
Line S00040 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00052  M01S00040.ns22000 ---|          SPACE  4
00053  M01S00041.ns22000 ---|****      DIRECT LOCATION ASSIGNMENTS.
00054  M01S00042.ns22000 ---|
00055  M01S00043.ns22000 ---|
00056  M01S00044.ns22000 ---| FS       EQU    20 - 24     CM WORD BUFFER (5 LOCATIONS)
00057  M01S00045.ns22000 ---| EL       EQU    25          ECS LABEL TRACK
00058  M01S00046.ns22000 ---| TW       EQU    27          CONSTANT TWO
00059  M01S00047.ns22000 ---| CN       EQU    30 - 34     CM WORD BUFFER (5 LOCATIONS)
00060  M01S00048.ns22000 ---| QT       EQU    35          QUEUED FILE TRACK (4DA)
00061  M01S00049.ns22000 ---| QS       EQU    36          QUEUED FILE SECTOR (4DA)
00062  M01S00050.ns22000 ---| QI       EQU    37          QUEUE INDEX (4DA)
00063  M01S00051.ns22000 ---| FN       EQU    40 - 44     EST ENTRY
00064  M01S00052.ns22000 ---| LM       EQU    47          LINK DEVICE MST POINTER
00065  M01S00053.ns22000 ---| EQ       EQU    IR+3        EQUIPMENT NUMBER
00066  M01S00054.ns22000 ---| RS       EQU    IR+4        RECOVERY STATUS
00067  M01S00055.ns22000 ---| EP       EQU    60 - 61     EST POINTER
00068  M01S00056.ns22000 ---| CA       EQU    64 - 65     CENTRAL ADDRESS
00069  M01S00057.ns22000 ---| P1       EQU    66          SCRATCH
00070  M01S00058.ns22000 ---| P2       EQU    67          SCRATCH
00071  M01S00059.ns22000 ---|
00072  M01S00060.ns22000 ---|****
00073  M00S00061.0mf     +++|          TITLE  MAIN ROUTINE.
00074  M00S00062.0mf     +++|**        ILD - MAIN ROUTINE.
00075  M00S00063.0mf     +++|
00076  M00S00064.0mf     +++|
00077  M00S00065.0mf     +++|          ORG    5
00078  M00S00066.0mf     +++|
00079  M00S00067.0mf     +++| ILD      SUBR               ENTRY/EXIT
Line S00001 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00080  M01S00001.252l678 +++|          SFA    EST,EQ
00081  M01S00002.252l678 +++|          ADK    EQAE
00082  M01S00003.252l678 +++|          CRD    CM
00083  M01S00004.252l678 +++|          LDD    CM+2        PRESET EM TRACK SHIFT COUNT
00084  M01S00005.252l678 +++|          SHN    -6
Line S00006 Modification History
M01 (Added by) 252l678
M02 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00085  M02S00006.283l840 ---|          LPN    3           MASK OFF EXTENDED MEMORY SHIFT COUNT
Line S00009 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00086  M01S00009.283l840 +++|          LPN    3
Line S00007 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00087  M01S00007.252l678 +++|          RAM    ILDF
Line S00068 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00088  M01S00068.283l840 ---|          LDD    LA
Line S00010 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00089  M01S00010.283l840 +++|          STM    ILDH
00090  M01S00011.283l840 +++|          LDD    LA          BIAS INSTRUCTIONS BY LOAD ADDRESS
00091  M00S00069.0mf     +++|          RAM    ILDA
00092  M00S00070.0mf     +++|          STM    ILDB
00093  M00S00071.0mf     +++|          STM    ILDC
Line S00012 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00094  M01S00012.283l840 +++|
00095  M01S00013.283l840 +++|*         RESERVE DAT/FAT TRACK CHAIN.
00096  M01S00014.283l840 +++|
00097  M00S00072.0mf     +++|          LDN    ZERL
00098  M00S00073.0mf     +++|          CRD    CM
Line S00074 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00099  M01S00074.ns22000 ---|          LDD    EQ          SET EQUIPMENT NUMBER IN REQUEST
Line S00004 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00100  M01S00004.ns22000 +++|          LDD    EQ          SET EST ORDINAL IN REQUEST
00101  M00S00075.0mf     +++|          STD    CM+1
00102  M00S00076.0mf     +++|          LDD    RS
00103  M00S00077.0mf     +++|          NJN    ILD2        IF RECOVERY SELECTED
00104  M00S00078.0mf     +++|          LDD    CN+4
00105  M00S00079.0mf     +++|          ZJN    ILD1        IF NO DAT/FAT TRACK CHAIN
00106  M00S00080.0mf     +++|          STD    CM+2
00107  M00S00081.0mf     +++|          MONITOR DTKM       RELEASE DAT/FAT TRACK CHAIN
Line S00082 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00108  M01S00082.283l840 ---|
00109  M01S00083.283l840 ---|*         RESERVE DAT/FAT TRACK CHAIN.
00110  M01S00084.283l840 ---|
Line S00085 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00111  M01S00085.ns22000 ---| ILD1     LDD    EQ          SET EQUIPMENT NUMBER
Line S00005 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00112  M01S00005.ns22000 +++| ILD1     LDD    EQ          SET EST ORDINAL
00113  M00S00086.0mf     +++|          STD    CM+1
Line S00087 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00114  M01S00087.283l840 ---|          SOD    P2          CONVERT TRACK COUNT TO SECTOR COUNT
Line S00088 Modification History
M01 (Removed by) 252l678
M02 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00115  M02S00088.283l840 ---|          SHN    4
Line S00008 Modification History
M01 (Added by) 252l678
M02 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00116  M02S00008.283l840 ---| ILDF     SHN    4
Line S00015 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00117  M01S00015.283l840 +++|          LDD    P1          NUMBER OF SHARED DEVICES
00118  M01S00016.283l840 +++| ILDF     SHN    4           CONVERT TRACK COUNT TO SECTOR COUNT
Line S00009 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00119  M01S00009.252l678 +++|*         SHN    4+EMSC      (EMSC = EM TRACK SHIFT COUNT)
Line S00089 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00120  M01S00089.283l840 ---|          ADN    1
Line S00017 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00121  M01S00017.283l840 +++|          ADN    1           ADDITIONAL TRACK FOR DAT-S AND FAT-S
00122  M00S00090.0mf     +++|          STD    CM+4
Line S00018 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00123  M01S00018.283l840 +++|          SHN    -14
00124  M01S00019.283l840 +++|          STD    CM+3
00125  M00S00091.0mf     +++|          MONITOR RTCM
00126  M00S00092.0mf     +++|          LDD    CM+4        SET FIRST TRACK IN *ALGL*
00127  M00S00093.0mf     +++|          STD    CN+4
00128  M00S00094.0mf     +++|          STD    CM+2
00129  M00S00095.0mf     +++|          LDN    SPFS        SET PRESERVED FILE STATUS
00130  M00S00096.0mf     +++|          STD    CM+3
00131  M00S00097.0mf     +++|          LDC    4000        INCLUDE CHECKPOINT REQUEST
00132  M00S00098.0mf     +++|          RAD    CM+1
00133  M00S00099.0mf     +++|          MONITOR STBM
00134  M00S00100.0mf     +++| ILD2     LDD    FN+4        STORE DEVICE ALLOCATION WORD
00135  M00S00101.0mf     +++|          SHN    3
00136  M00S00102.0mf     +++|          ADN    ALGL
00137  M00S00103.0mf     +++|          CWD    CN
00138  M00S00104.0mf     +++|          SBN    ALGL-SDGL   GET SHARED DEVICE WORD
00139  M00S00105.0mf     +++|          CRD    FS
00140  M00S00106.0mf     +++|          ADN    PFGL-SDGL   READ PF DESCRIPTOR WORD
00141  M00S00107.0mf     +++|          CRM.   ILDD,ON
00142  M00S00108.0mf     +++| ILDA     EQU    *-1
Line S00109 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00143  M01S00109.283l840 ---|          LDD    CN+4        SET *DAT* TRACK FOR LINK DEVICE
00144  M01S00110.283l840 ---|          SHN    21-1        REMOVE TRACK BIT
00145  M01S00111.283l840 ---|          LMD    TH
00146  M01S00112.283l840 ---|          STD    T0          SET WORD INDEX
00147  M01S00113.283l840 ---|          SHN    1-21
00148  M01S00114.283l840 ---|          STD    T1          SET BYTE INDEX
Line S00020 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00149  M01S00020.283l840 +++|
00150  M01S00021.283l840 +++|*         SETUP *DAET* IN ENVIRONMENT TABLE SECTOR.
00151  M01S00022.283l840 +++|
Line S00115 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00152  M01S00115.ns22000 ---|          LDD    LM          READ TRT WORD
Line S00006 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00153  M01S00006.ns22000 +++|          LDD    FN+4        READ TRT WORD
00154  M00S00116.0mf     +++|          SHN    3
Line S00117 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00155  M01S00117.ns22000 ---|          ADN    MSTL
Line S00007 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00156  M01S00007.ns22000 +++|          ADN    TRLL
00157  M01S00008.ns22000 +++|          CRD    CM
00158  M01S00009.ns22000 +++|          LDD    CM+3
00159  M01S00010.ns22000 +++|          LPN    77
00160  M01S00011.ns22000 +++|          RAM    ILDE        SET FWA OF TRT
Line S00023 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00161  M01S00023.283l840 +++|          STM    SNTA
Line S00012 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00162  M01S00012.ns22000 +++|          LPN    77
00163  M01S00013.ns22000 +++|          SHN    14
00164  M01S00014.ns22000 +++|          LMD    CM+4
00165  M01S00015.ns22000 +++|          STM    ILDE+1
Line S00118 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00166  M01S00118.283l840 ---|          ADD    T0
00167  M01S00119.283l840 ---|          CRD    CM
00168  M01S00120.283l840 ---|          LDM.   CM,T1       EXTRACT NEXT TRACK
Line S00024 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00169  M01S00024.283l840 +++|          STM    SNTA+1
00170  M01S00025.283l840 +++|          LDD    CN+4        SET *DAT* TRACK FOR LINK DEVICE
00171  M01S00026.283l840 +++|          RJM    SNT         SET NEXT TRACK
00172  M00S00121.0mf     +++|          STM    ILDD+4      SET TRACK IN *DAT* ENTRY
00173  M00S00122.0mf     +++|          STD    QT
00174  M00S00123.0mf     +++|          STD    T6
00175  M00S00124.0mf     +++|          LDN    0
Line S00010 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00176  M01S00010.252l678 +++|          STD    T7
00177  M00S00125.0mf     +++|          RJM    CEA         CONVERT ECS ADDRESS
00178  M00S00126.0mf     +++|          LDD    CM+3
00179  M00S00127.0mf     +++|          STD    FS
00180  M00S00128.0mf     +++|          LDD    CM+4        SET ABSOLUTE MST/TRT ADDRESS
00181  M00S00129.0mf     +++|          STD    FS+1
00182  M00S00130.0mf     +++|          LDD    HN          SET ONE TRT ACCESS
00183  M00S00131.0mf     +++|          STD    FS+4
00184  M00S00132.0mf     +++|          LDD    FN+4        STORE DRIVER ACTIVITY WORD
00185  M00S00133.0mf     +++|          SHN    3
00186  M00S00134.0mf     +++|          ADN    SDGL
00187  M00S00135.0mf     +++|          CWD    FS
00188  M00S00136.0mf     +++|          LDD    CN+4        SET FIRST TRACK IN *DAT* CHAIN
00189  M00S00137.0mf     +++|          STD    T6
Line S00138 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00190  M01S00138.283l840 ---|          STD    P1
Line S00027 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00191  M01S00027.283l840 +++|          STM    ILDG
00192  M00S00139.0mf     +++|          LDN    ZERL
00193  M00S00140.0mf     +++|          CRD    FS
Line S00141 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00194  M01S00141.283l840 ---|          LDN    0
Line S00028 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00195  M01S00028.283l840 +++|          LDN    0           SET WORD COUNT
00196  M00S00142.0mf     +++|          STD    CM+1
00197  M00S00143.0mf     +++|          LDD    QT          SET CURRENT TRACK IN *DAET* IMAGE
00198  M00S00144.0mf     +++|          STD    FS
00199  M00S00145.0mf     +++|          LDN    2           SET *DAT* INDEX
00200  M00S00146.0mf     +++|          STD    QI
00201  M00S00147.0mf     +++|          STD    FS+4
00202  M00S00148.0mf     +++|          LDD    MA          MOVE *DAET* IMAGE TO BUFFER
00203  M00S00149.0mf     +++|          CWD    FS
00204  M00S00150.0mf     +++|          STD    CM+2        SET BUFFER ADDRESS
00205  M00S00151.0mf     +++|          LDD    CN+1        SET LABEL TRACK
00206  M00S00152.0mf     +++|          STD    T6
Line S00029 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00207  M01S00029.283l840 +++|          STM    ILDK
Line S00153 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00208  M01S00153.252l678 ---|          LDC    ETLT*100+DAET  CONVERT ADDRESS OF ENVIRONMENT TABLE
Line S00011 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00209  M01S00011.252l678 +++|          LDN    ETLT        CONVERT ENVIRONMENT TABLE SECTOR ADDRESS
00210  M01S00012.252l678 +++|          STD    T7
00211  M00S00154.0mf     +++|          RJM    CEA
Line S00013 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00212  M01S00013.252l678 +++|          LDN    DAET
00213  M01S00014.252l678 +++|          RAD    CM+4
00214  M01S00015.252l678 +++|          SHN    -14
Line S00016 Modification History
M01 (Added by) 252l678
M02 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00215  M02S00016.283l840 ---|          RAD    CM+3
Line S00155 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00216  M01S00155.283l840 ---|          LDC    WECS*1000   SET WRITE FUNCTION
Line S00030 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00217  M01S00030.283l840 +++|          ADC    WECS*1000   SET WRITE FUNCTION
00218  M00S00156.0mf     +++|          RAD    CM+3
00219  M00S00157.0mf     +++|          MONITOR ECSM       STORE *DAET* WORD
00220  M00S00158.0mf     +++|          LDD    RA          STORE *DAT* ENTRY IN CM COPY OF *DAT*
00221  M00S00159.0mf     +++|          SHN    6
00222  M00S00160.0mf     +++|          ADD    CA+1
00223  M00S00161.0mf     +++|          CWM.   ILDD,TW
00224  M00S00162.0mf     +++| ILDC     EQU    *-1
00225  M00S00163.0mf     +++|          LDD    TH          ADVANCE TRT BUFFER ADDRESS
00226  M00S00164.0mf     +++|          RAD    CA+1
00227  M00S00165.0mf     +++|
00228  M00S00166.0mf     +++|*         STORE MST/TRT FOR LINK DEVICE IN ECS.
00229  M00S00167.0mf     +++|
00230  M00S00168.0mf     +++|          LDC    500-5*MSTL
00231  M00S00169.0mf     +++|          STD    T7
00232  M00S00170.0mf     +++| ILD3     LDN    0           CLEAR BUFFER
00233  M00S00171.0mf     +++|          STM.   BFMS+1+5*MSTL,T7
00234  M00S00172.0mf     +++|          SOD    T7
00235  M00S00173.0mf     +++|          NJN    ILD3
Line S00174 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00236  M01S00174.ns22000 ---|          LDD    EQ          SET ECS EQUIPMENT NUMBER
Line S00016 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00237  M01S00016.ns22000 +++|          LDD    EQ          SET ECS EST ORDINAL
00238  M00S00175.0mf     +++|          STD    T5
00239  M00S00176.0mf     +++|          LDD    QT          SET MST/TRT TRACK
00240  M00S00177.0mf     +++|          STD    T6
Line S00178 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00241  M01S00178.253l688 ---|          LDN    MLUNL+MLDUL SET UNLOAD STATUS IN LOCAL MST BLOCKS
00242  M01S00179.253l688 ---|          STM.   BFMS+2+5*STLL+5*LLLL
00243  M01S00180.253l688 ---|          STM.   BFMS+2+5*STLL+2*5*LLLL
00244  M01S00181.253l688 ---|          STM.   BFMS+2+5*STLL+3*5*LLLL
Line S00001 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00245  M01S00001.253l688 +++|          LDN    MXMF-1
00246  M01S00002.253l688 +++|          STD    T0
00247  M01S00003.253l688 +++|          LDK    5*LLLL
00248  M01S00004.253l688 +++|          STD    T1
00249  M01S00005.253l688 +++| ILD3.1   LDN    MLUNL+MLDUL SET UNLOAD STATUS
00250  M01S00006.253l688 +++|          STM.   BFMS+2+5*STLL,T1
00251  M01S00007.253l688 +++|          LDN    5*LLLL
00252  M01S00008.253l688 +++|          RAD    T1
00253  M01S00009.253l688 +++|          SOD    T0
00254  M01S00010.253l688 +++|          NJN    ILD3.1      IF MORE LOCAL AREAS
00255  M00S00182.0mf     +++|          LDD    HN          SET FULL SECTOR WORD COUNT
00256  M00S00183.0mf     +++|          STM.   BFMS+1
00257  M00S00184.0mf     +++|          LDN    MSTL        SET LENGTH OF MST
00258  M00S00185.0mf     +++|          STD    T1
00259  M00S00186.0mf     +++|          LDD    FN+4        READ MST TO PP BUFFER
00260  M00S00187.0mf     +++|          SHN    3
Line S00188 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00261  M01S00188.ns22000 ---|          ADN    TDGL
Line S00017 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00262  M01S00017.ns22000 +++|          ADK    TDGL
00263  M00S00189.0mf     +++|          CRD    CN
00264  M00S00190.0mf     +++|          CRM.   BFMS+2,T1
00265  M00S00191.0mf     +++|          LDM.   BFMS+2+5*MDGL  SET 16-WORD PFC FLAG
00266  M00S00192.0mf     +++|          LPC    6777
00267  M00S00193.0mf     +++|          LMD    TH
00268  M00S00194.0mf     +++|          STM.   BFMS+2+5*MDGL
00269  M00S00195.0mf     +++|          LDD    FN+4        UPDATE MST IN CMR
00270  M00S00196.0mf     +++|          SHN    3
00271  M00S00197.0mf     +++|          ADN    MDGL
00272  M00S00198.0mf     +++|          CWM.   BFMS+2+5*MDGL,ON
Line S00199 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00273  M01S00199.ns22000 ---|          LCN    77-MSTL     INITIALIZE TRT INDEX
00274  M01S00200.ns22000 ---|          STD    CN+4
Line S00201 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00275  M01S00201.242l642 ---|          SETMS  WRITE,NE
Line S00001 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00276  M01S00001.242l642 +++|          SETMS  IO,(DF,NS)
00277  M00S00202.0mf     +++|          LDN    0
Line S00018 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00278  M01S00018.ns22000 +++|          STD    CN+4
00279  M00S00203.0mf     +++|          UJN    ILD6        ENTER LOOP WITH (A) = 0
00280  M00S00204.0mf     +++|
00281  M00S00205.0mf     +++| ILD4     SBD    HN          DECREMENT BLOCK COUNT
00282  M00S00206.0mf     +++|          PJN    ILD5        IF ANOTHER FULL SECTOR
00283  M00S00207.0mf     +++|          ADD    HN
00284  M00S00208.0mf     +++|          STM.   BFMS+1      SET SHORT SECTOR
00285  M00S00209.0mf     +++|          LDN    0
00286  M00S00210.0mf     +++| ILD5     STD    CN+2
Line S00211 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00287  M01S00211.ns22000 ---|          LDD    HN          ADVANCE TRT ADDRESS
00288  M01S00212.ns22000 ---|          RAD    CN+4
00289  M01S00213.ns22000 ---|          LDD    FN+4        READ NEXT BLOCK
00290  M01S00214.ns22000 ---|          SHN    3
Line S00019 Modification History
M01 (Added by) ns22000
M02 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00291  M02S00019.283l840 ---| ILDE     LDC    0           READ NEXT BLOCK
Line S00031 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00292  M01S00031.283l840 +++| ILDE     LDC    **          (FWA OF TRT)
00293  M00S00215.0mf     +++|          ADD    CN+4
Line S00216 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00294  M01S00216.283l840 ---|          CRM.   BFMS+2,HN
Line S00032 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00295  M01S00032.283l840 +++|          CRM.   BFMS+2,HN   READ NEXT BLOCK
Line S00020 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00296  M01S00020.ns22000 +++|          LDD    HN          ADVANCE TRT ADDRESS
00297  M01S00021.ns22000 +++|          RAD    CN+4
00298  M00S00217.0mf     +++|          AOD    T7          ADVANCE SECTOR
00299  M00S00218.0mf     +++| ILD6     ADN    1
00300  M00S00219.0mf     +++|          STM.   BFMS
00301  M00S00220.0mf     +++|          LDC    BFMS        WRITE NEXT SECTOR
00302  M00S00221.0mf     +++|          RJM.   WDS
00303  M00S00222.0mf     +++|          LDD    CN+2
00304  M00S00223.0mf     +++|          NJN    ILD4        LOOP TO END OF TRT
00305  M00S00224.0mf     +++|          LDD    FN+4        GET TRT LENGTH FROM MST
00306  M00S00225.0mf     +++|          SHN    3
Line S00226 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00307  M01S00226.ns22000 ---|          ADN    TDGL
Line S00022 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00308  M01S00022.ns22000 +++|          ADK    TDGL
00309  M00S00227.0mf     +++|          CRD    CN
00310  M00S00228.0mf     +++|          LDN    MRST-1      INITIALIZE MRT SECTOR
00311  M00S00229.0mf     +++|          STD    T7
00312  M00S00230.0mf     +++|          LDD    CN+2        SET MRT LENGTH
00313  M00S00231.0mf     +++|          ADN    7
00314  M00S00232.0mf     +++|          SHN    -3
00315  M00S00233.0mf     +++|          STM.   BFMS+1
00316  M00S00234.0mf     +++|          LDC    500         BUFFER LENGTH
00317  M00S00235.0mf     +++|          STD    T1
00318  M00S00236.0mf     +++| ILD7     LDN    0           CLEAR BUFFER
00319  M00S00237.0mf     +++|          STM.   BFMS+1,T1
00320  M00S00238.0mf     +++|          SOD    T1
00321  M00S00239.0mf     +++|          NJN    ILD7
00322  M00S00240.0mf     +++|          LDN    MXMF        SET LOOP COUNT
00323  M00S00241.0mf     +++|          STD    CN
00324  M00S00242.0mf     +++|
00325  M00S00243.0mf     +++|*         CLEAR MRT SECTORS FOR *MXMF* MAINFRAMES.
00326  M00S00244.0mf     +++|
00327  M00S00245.0mf     +++| ILD8     AOD    T7          ADVANCE MRT SECTOR
00328  M00S00246.0mf     +++|          ADN    1           SET NEXT SECTOR IN LINKAGE
00329  M00S00247.0mf     +++|          STM.   BFMS
00330  M00S00248.0mf     +++|          LDC    BFMS        CLEAR MRT
00331  M00S00249.0mf     +++|          RJM.   WDS
00332  M00S00250.0mf     +++|          SOD    CN
Line S00251 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00333  M01S00251.252l678 ---|          NJN    ILD8        LOOP FOR 4 MRTS
Line S00017 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00334  M01S00017.252l678 +++|          NJN    ILD8        IF NOT *MXMF* MRT-S CLEARED
00335  M00S00252.0mf     +++|          STD    T7
00336  M00S00253.0mf     +++|          LCN    20          CLEAR RECOVERY IN PROGRESS FLAG
00337  M00S00254.0mf     +++|          RAM    ILDD+11
Line S00255 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00338  M01S00255.283l840 ---|          LDD    P1          SET DAT/FAT TRACK
Line S00033 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00339  M01S00033.283l840 +++|          LDC    **          SET DAT/FAT TRACK
00340  M01S00034.283l840 +++| ILDG     EQU    *-1
00341  M00S00256.0mf     +++|          STD    T6
00342  M00S00257.0mf     +++|          LDD    MA          MOVE LINK DEVICE DAT ENTRY TO BUFFER
00343  M00S00258.0mf     +++|          CWM.   ILDD,TW
00344  M00S00259.0mf     +++| ILDB     EQU    *-1
00345  M00S00260.0mf     +++|          LDD    MA
00346  M00S00261.0mf     +++|          CRM.   BFMS+2,TW
00347  M00S00262.0mf     +++|          LDD    HN
00348  M00S00263.0mf     +++|          STM.   BFMS+1
00349  M00S00264.0mf     +++|
00350  M00S00265.0mf     +++|*         INITIALIZE DAT/FAT TRACK.
00351  M00S00266.0mf     +++|
00352  M00S00267.0mf     +++| ILD9     LDD    T7          SET SECTOR IN LINK BYTE
00353  M00S00268.0mf     +++|          ADN    1
00354  M00S00269.0mf     +++| ILD10    STM.   BFMS
00355  M00S00270.0mf     +++|          LDC    BFMS
00356  M00S00271.0mf     +++|          RJM.   WDS         WRITE NEXT SECTOR
00357  M00S00272.0mf     +++|          LDN    ZERL
00358  M00S00273.0mf     +++|          CRM.   BFMS+2,ON
00359  M00S00274.0mf     +++|          LDN    ZERL
00360  M00S00275.0mf     +++|          CRM.   BFMS+2+5,ON
00361  M00S00276.0mf     +++|          AOD    T7          ADVANCE TO NEXT SECTOR
Line S00277 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00362  M01S00277.252l678 ---|          SBN    SLDE-1
Line S00018 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00363  M01S00018.252l678 +++|          ADN    1
00364  M01S00019.252l678 +++|          SBM.   SLM
00365  M00S00278.0mf     +++|          MJN    ILD9        IF NOT LAST SECTOR
00366  M00S00279.0mf     +++|          NJN    ILD11       IF LAST SECTOR WRITTEN
00367  M00S00280.0mf     +++|          STM.   BFMS+1      SET EOI SECTOR
00368  M00S00281.0mf     +++|          UJN    ILD10
00369  M00S00282.0mf     +++|
00370  M00S00283.0mf     +++| ILD11    ENDMS              END MASS STORAGE OPERATION
Line S00284 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00371  M01S00284.283l840 ---|          LCN    PRSI        CLEAR *PRSI* INTERLOCK
Line S00035 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00372  M01S00035.283l840 +++|
00373  M01S00036.283l840 +++|*         RESERVE BRT/BDT/BAT TRACK CHAIN.
00374  M01S00037.283l840 +++|
00375  M01S00038.283l840 +++|          LDD    FN+4        GET BRT/BDT/BAT TRACK CHAIN POINTER
00376  M01S00039.283l840 +++|          SHN    3
00377  M01S00040.283l840 +++|          ADN    NVGL
00378  M01S00041.283l840 +++|          CRD    CN
00379  M01S00042.283l840 +++|          LDN    ZERL
00380  M01S00043.283l840 +++|          CRD    CM
00381  M01S00044.283l840 +++|          LDD    EQ          SET EST ORDINAL IN REQUEST
00382  M01S00045.283l840 +++|          STD    CM+1
00383  M01S00046.283l840 +++|          LDD    RS
00384  M01S00047.283l840 +++|          NJP    ILD13       IF RECOVERY SELECTED
00385  M01S00048.283l840 +++|          LDD    CN+3
00386  M01S00049.283l840 +++|          ZJN    ILD12       IF NO BRT/BDT/BAT TRACK CHAIN
00387  M01S00050.283l840 +++|          STD    CM+2
00388  M01S00051.283l840 +++|          MONITOR DTKM       RELEASE BRT/BDT/BAT TRACK CHAIN
00389  M01S00052.283l840 +++|          STD    CN+3        CLEAR POINTER
00390  M01S00053.283l840 +++| ILD12    LDD    EQ          SET EST ORDINAL
00391  M01S00054.283l840 +++|          STD    CM+1
00392  M01S00055.283l840 +++|          LDD    P2          NUMBER OF SHARED BUFFERED DEVICES
00393  M01S00056.283l840 +++|          ZJN    ILD13       IF NO SHARED BUFFERED DEVICES
00394  M01S00057.283l840 +++|          ADN    1           ADDITIONAL TRACK FOR BRT-S
00395  M01S00058.283l840 +++| ILDH     SHN    4           CONVERT TRACK COUNT TO SECTOR COUNT
00396  M01S00059.283l840 +++|*         SHN    4+EMSC      (EMSC = EM TRACK SHIFT COUNT)
00397  M01S00060.283l840 +++|          ADN    1           ADDITIONAL TRACKS FOR BDT-S
00398  M01S00061.283l840 +++|          STD    CM+4
00399  M01S00062.283l840 +++|          SHN    -14
00400  M01S00063.283l840 +++|          STD    CM+3
00401  M01S00064.283l840 +++|          MONITOR RTCM
00402  M01S00065.283l840 +++|          LDD    CM+4        SET FIRST TRACK IN *NVGL*
00403  M01S00066.283l840 +++|          STD    CN+3
00404  M01S00067.283l840 +++|          STD    CM+2
00405  M01S00068.283l840 +++|          LDN    SPFS        SET PRESERVED FILE STATUS
00406  M01S00069.283l840 +++|          STD    CM+3
00407  M01S00070.283l840 +++|          LDC    4000        INCLUDE CHECKPOINT REQUEST
00408  M01S00071.283l840 +++|          RAD    CM+1
00409  M01S00072.283l840 +++|          MONITOR STBM
00410  M01S00073.283l840 +++| ILD13    LDD    FN+4        STORE *NVGL*
00411  M01S00074.283l840 +++|          SHN    3
00412  M01S00075.283l840 +++|          ADN    NVGL
00413  M01S00076.283l840 +++|          CWD    CN
00414  M01S00077.283l840 +++|
00415  M01S00078.283l840 +++|*         SETUP *BAET* IN ENVIRONMENT TABLE SECTOR.
00416  M01S00079.283l840 +++|
00417  M01S00080.283l840 +++|          LDN    ZERL
00418  M01S00081.283l840 +++|          CRD    FS
00419  M01S00082.283l840 +++|          LDD    P2
00420  M01S00083.283l840 +++|          ZJN    ILD14       IF NO SHARED BUFFERED DEVICES
00421  M01S00084.283l840 +++|          LDD    CN+3        FIRST TRACK OF BRT/BDT/BAT TRACK CHAIN
00422  M01S00085.283l840 +++|          STD    FS          SET BRT TRACK INTO *BAET* IMAGE
00423  M01S00086.283l840 +++|          RJM    SNT         SET NEXT TRACK
00424  M01S00087.283l840 +++|          STD    FS+1        SET BDT TRACK INTO *BAET* IMAGE
00425  M01S00088.283l840 +++|          RJM    SNT         SET NEXT TRACK
00426  M01S00089.283l840 +++|          STD    FS+4        SET FIRST BAT TRACK INTO *BAET* IMAGE
00427  M01S00090.283l840 +++| ILD14    LDD    MA          MOVE *BAET* IMAGE TO BUFFER
00428  M01S00091.283l840 +++|          STD    CM+2        SET BUFFER ADDRESS
00429  M01S00092.283l840 +++|          CWD    FS
00430  M01S00093.283l840 +++|          CRM.   BAEI,ON     SAVE *BAET* IMAGE
00431  M01S00094.283l840 +++|          LDN    0           SET WORD COUNT
00432  M01S00095.283l840 +++|          STD    CM+1
00433  M01S00096.283l840 +++|          LDC    **          SET LABEL TRACK
00434  M01S00097.283l840 +++| ILDK     EQU    *-1
00435  M01S00098.283l840 +++|          STD    T6
00436  M01S00099.283l840 +++|          LDN    ETLT        CONVERT ENVIRONMENT TABLE SECTOR ADDRESS
00437  M01S00100.283l840 +++|          STD    T7
00438  M01S00101.283l840 +++|          RJM    CEA
00439  M01S00102.283l840 +++|          LDN    BAET
00440  M01S00103.283l840 +++|          RAD    CM+4
00441  M01S00104.283l840 +++|          SHN    -14
00442  M01S00105.283l840 +++|          ADC    WECS*1000   SET WRITE FUNCTION
00443  M01S00106.283l840 +++|          RAD    CM+3
00444  M01S00107.283l840 +++|          MONITOR ECSM       STORE *BAET* WORD
00445  M01S00108.283l840 +++|
00446  M01S00109.283l840 +++|*         ENABLE BRT PROCESSING IN *MTE*.
00447  M01S00110.283l840 +++|
00448  M01S00111.283l840 +++|          LDD    P2
00449  M01S00112.283l840 +++|          ZJN    ILD15       IF NO SHARED BUFFERED DEVICES
00450  M01S00113.283l840 +++|          LDD    FS          SET BRT TRACK
00451  M01S00114.283l840 +++|          STD    CM+4
00452  M01S00115.283l840 +++|          LDD    FS+1        SET BDT TRACK
00453  M01S00116.283l840 +++|          STD    CM+3
00454  M01S00117.283l840 +++|          LDN    0
00455  M01S00118.283l840 +++|          STD    CM+2
00456  M01S00119.283l840 +++|          LDN    EBRS        ENABLE BRT PROCESSING
00457  M01S00120.283l840 +++|          STD    CM+1
00458  M01S00121.283l840 +++|          MONITOR  MTEM
00459  M01S00122.283l840 +++|
00460  M01S00123.283l840 +++| ILD15    LCN    PRSI        CLEAR *PRSI* INTERLOCK
00461  M00S00285.0mf     +++|          RJM    IFR
00462  M00S00286.0mf     +++|          LJM    ILDX        RETURN
00463  M00S00287.0mf     +++|
Line S00124 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00464  M01S00124.283l840 +++|
00465  M00S00288.0mf     +++| ILDD     VFD    42/0LMMFLINK,6/0,12/0
00466  M00S00289.0mf     +++|          VFD    60/20
Line S00125 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
00467  M01S00125.283l840 +++|          TITLE  SUBROUTINES.
00468  M01S00126.283l840 +++| SNT      SPACE  4,10
00469  M01S00127.283l840 +++|**        SNT - SET NEXT TRACK IN EXTENDED MEMORY TRACK CHAIN.
00470  M01S00128.283l840 +++|*
00471  M01S00129.283l840 +++|*         ENTRY  (A) = TRACK NUMBER.
00472  M01S00130.283l840 +++|*                (SNTA) = CM ADDRESS OF TRT.
00473  M01S00131.283l840 +++|*
00474  M01S00132.283l840 +++|*         EXIT   (A) = TRACK NUMBER OF NEXT TRACK IN CHAIN.
00475  M01S00133.283l840 +++|*
00476  M01S00134.283l840 +++|*         USES   T1, CM - CM+4.
00477  M01S00135.283l840 +++|
00478  M01S00136.283l840 +++|
00479  M01S00137.283l840 +++| SNT      SUBR               ENTRY/EXIT
00480  M01S00138.283l840 +++|          SHN    21-1        REMOVE TRACK BIT
00481  M01S00139.283l840 +++|          LMD    TH
00482  M01S00140.283l840 +++|          STD    T0          SET WORD INDEX
00483  M01S00141.283l840 +++|          SHN    1-21
00484  M01S00142.283l840 +++|          STD    T1          SET BYTE INDEX
00485  M01S00143.283l840 +++| SNTA     LDC    **          (FWA OF TRT)
00486  M01S00144.283l840 +++|          ADD    T0
00487  M01S00145.283l840 +++|          CRD    CM
00488  M01S00146.283l840 +++|          LDM.   CM,T1       EXTRACT NEXT TRACK
00489  M01S00147.283l840 +++|          UJN    SNTX        RETURN
Line S00290 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00490  M01S00290.252l678 ---| CEA      TITLE  SUBROUTINES.
00491  M01S00291.252l678 ---|**        CEA - CONVERT ECS ADDRESS.
00492  M01S00292.252l678 ---|*
00493  M01S00293.252l678 ---|*         ENTRY  (A) = SECTOR NUMBER * 100 + SECTOR WORD.
00494  M01S00294.252l678 ---|*                (T6) = TRACK.
00495  M01S00295.252l678 ---|*
00496  M01S00296.252l678 ---|*         EXIT   (CM+3 - CM+4) = ABSOLUTE ECS ADDRESS.
00497  M01S00297.252l678 ---|*
00498  M01S00298.252l678 ---|*         USES   T0.
00499  M01S00299.252l678 ---|
00500  M01S00300.252l678 ---|
00501  M01S00301.252l678 ---| CEA      SUBR               ENTRY/EXIT
00502  M01S00302.252l678 ---|          ADN    20          ADJUST FOR LINKAGE WORDS
00503  M01S00303.252l678 ---|          STD    CM+4
00504  M01S00304.252l678 ---|          LDD    T6          CLEAR TRACK BIT
00505  M01S00305.252l678 ---|          LPC    3777
00506  M01S00306.252l678 ---|          STD    T0
00507  M01S00307.252l678 ---|          SHN    6
00508  M01S00308.252l678 ---|          RAD    T0          TRACK * 101
00509  M01S00309.252l678 ---|          SHN    -10
00510  M01S00310.252l678 ---|          SCN    17
00511  M01S00311.252l678 ---|          STD    CM+3
00512  M01S00312.252l678 ---|          LDD    T0
00513  M01S00313.252l678 ---|          SHN    4           TRACK * 2020
00514  M01S00314.252l678 ---|          RAD    CM+4
00515  M01S00315.252l678 ---|          SHN    -14
00516  M01S00316.252l678 ---|          RAD    CM+3
00517  M01S00317.252l678 ---|          UJN    CEAX        RETURN
00518  M00S00318.0mf     +++|          SPACE  4
00519  M00S00319.0mf     +++|**        COMMON DECKS.
00520  M00S00320.0mf     +++|
00521  M00S00321.0mf     +++|
Line S00020 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00522  M01S00020.252l678 +++|*CALL     COMPCEA
00523  M00S00322.0mf     +++|*CALL     COMPIFR
00524  M00S00323.0mf     +++|          SPACE  4,10
00525  M00S00324.0mf     +++|          OVERFLOW 5,ZMFL
00526  M00S00325.0mf     +++|          END
cdc/nos2.source/opl.opl871/deck/0mf.txt ยท Last modified: (external edit)