User Tools

Site Tools


Action unknown: copypageplugin__copy
cdc:nos2.source:opl.opl871:deck:6dx

Deck 6DX

Library Member Format: MODIFY

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M00S00001.6dx     +++|          IDENT  6DX,MSFW
00002  M00S00002.6dx     +++|          PERIPH
00003  M00S00003.6dx     +++|          BASE   MIXED
00004  M00S00004.6dx     +++|          SST
00005  M00S00005.6dx     +++|          TITLE  6DX - UEM DRIVER.
00006  M00S00006.6dx     +++|*COMMENT  6DX - UEM DRIVER.
Line S00007 Modification History
M01 (Removed by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00007  M01S00007.281l803 ---|          COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1981.
Line S00001 Modification History
M01 (Added by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00008  M01S00001.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00009  M00S00008.6dx     +++|          SPACE  4,10
00010  M00S00009.6dx     +++|*****     6DX - UEM DRIVER.
00011  M00S00010.6dx     +++|*         C. B. LOSCHEIDER.  81/03/04.
00012  M00S00011.6dx     +++|          SPACE  4,10
00013  M00S00012.6dx     +++|***       6DX PROVIDES THE CAPABILITY TO ACCESS UEM.
00014  M00S00013.6dx     +++|          SPACE  4,10
00015  M00S00014.6dx     +++|***       ORGANIZATION OF UEM.
00016  M00S00015.6dx     +++|*         UEM IS TREATED AS A SINGLE DEVICE.
00017  M00S00016.6dx     +++|*
00018  M00S00017.6dx     +++|*         EQUIPMENT TYPE IS *DE*.
00019  M00S00018.6dx     +++|*
Line S00019 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00020  M01S00019.252l678 ---|*         SECTORS/TRACK = 16D.
Line S00001 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00021  M01S00001.252l678 +++|*         SECTORS/TRACK = SLDE (20B, 40B, 100B, OR 200B).
00022  M00S00020.6dx     +++|*
Line S00021 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00023  M01S00021.252l678 ---|*         WORDS/TRACK = 2020B.
Line S00002 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00024  M01S00002.252l678 +++|*         WORDS/TRACK = 101B*SLDE.
00025  M00S00022.6dx     +++|          SPACE  4,10
00026  M00S00023.6dx     +++|**        ENTRY CONDITIONS.
00027  M00S00024.6dx     +++|*
00028  M00S00025.6dx     +++|*
00029  M00S00026.6dx     +++|*         (T5) = EST ORDINAL.
00030  M00S00027.6dx     +++|*         (T6) = TRACK.
00031  M00S00028.6dx     +++|*         (T7) = SECTOR.
00032  M00S00029.6dx     +++|          SPACE  4,10
00033  M00S00030.6dx     +++|*CALL     COMPMAC
00034  M00S00031.6dx     +++|*CALL     COMSDFS
00035  M00S00032.6dx     +++|*CALL     COMSMSP
00036  M00S00033.6dx     +++|*CALL     COMSPIM
00037  M00S00034.6dx     +++|          SPACE  4,10
00038  M00S00035.6dx     +++|*         ASSEMBLY CONSTANTS.
00039  M00S00036.6dx     +++|
00040  M00S00037.6dx     +++|
00041  M00S00038.6dx     +++| DEC      MICRO  1,, 6DX     DECK NAME
00042  M00S00039.6dx     +++|          EJECT
00043  M00S00040.6dx     +++|**        ENTRY POINT TRANSFERS.
00044  M00S00041.6dx     +++|
00045  M00S00042.6dx     +++|
00046  M00S00043.6dx     +++|          ORG    MSFW
00047  M00S00044.6dx     +++|
00048  M00S00045.6dx     +++|          CON    PRS         PRESET ADDRESS
00049  M00S00046.6dx     +++|
00050  M00S00047.6dx     +++|
00051  M00S00048.6dx     +++| RDS      CON    0           ENTRY
00052  M00S00049.6dx     +++|          UJN    RDS.        ENTER DRIVER
00053  M00S00050.6dx     +++|
00054  M00S00051.6dx     +++|
00055  M00S00052.6dx     +++| WDS      CON    0           ENTRY
00056  M00S00053.6dx     +++|          UJN    WDS.        ENTER DRIVER
00057  M00S00054.6dx     +++| EMS      SPACE  4,10
00058  M00S00055.6dx     +++|**        EMS - END MASS STORAGE OPERATION.
00059  M00S00056.6dx     +++|*
00060  M00S00057.6dx     +++|*         EXIT   (A) = 0.
Line S00003 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00061  M01S00003.252l678 +++|*                (UEMG) = EM SHIFT FOR CALCULATING HEADER ADDRESS.
00062  M01S00004.252l678 +++|*                (UEMH) = EM SHIFT FOR CALCULATING EM ADDRESS.
00063  M00S00058.6dx     +++|
00064  M00S00059.6dx     +++|
00065  M00S00060.6dx     +++| .EMS     SUBR               ENTRY/EXIT
00066  M00S00061.6dx     +++|          LDN    0
00067  M00S00062.6dx     +++|          STM    CHRV
00068  M00S00063.6dx     +++|          UJN    .EMSX       RETURN
00069  M00S00064.6dx     +++| RDS      SPACE  4,10
00070  M00S00065.6dx     +++|**        RDS - READ SECTOR.
00071  M00S00066.6dx     +++|*
00072  M00S00067.6dx     +++|*         ENTRY  (A) = BUFFER ADDRESS FOR SECTOR.
00073  M00S00068.6dx     +++|*
00074  M00S00069.6dx     +++|*         EXIT   (A) = 0 IF TRANSFER COMPLETE.
00075  M00S00070.6dx     +++|*                    = ERROR CODE IF ERROR OCCURRED.
00076  M00S00071.6dx     +++|*
00077  M00S00072.6dx     +++|*         CALLS  UEM.
00078  M00S00073.6dx     +++|
00079  M00S00074.6dx     +++|
00080  M00S00075.6dx     +++| RDS.     LPC    7777
00081  M00S00076.6dx     +++|          UJN    UEM         SET BUFFER ADDRESSES
00082  M00S00077.6dx     +++| WDS      SPACE  4,10
00083  M00S00078.6dx     +++|**        WDS - WRITE SECTOR.
00084  M00S00079.6dx     +++|*
00085  M00S00080.6dx     +++|*         ENTRY  (A) = BUFFER ADDRESS FOR SECTOR.
00086  M00S00081.6dx     +++|*
00087  M00S00082.6dx     +++|*         EXIT   (A) = 0 IF TRANSFER COMPLETE.
00088  M00S00083.6dx     +++|*                    = ERROR CODE IF ERROR OCCURRED.
00089  M00S00084.6dx     +++|*
00090  M00S00085.6dx     +++|*         CALLS  UEM.
00091  M00S00086.6dx     +++|
00092  M00S00087.6dx     +++|
00093  M00S00088.6dx     +++| WDS.     LPC    7777
00094  M00S00089.6dx     +++|          LMC    1S15
00095  M00S00090.6dx     +++|*         UJN    UEM         SET BUFFER ADDRESSES
00096  M00S00091.6dx     +++| UEM      SPACE  4,15
00097  M00S00092.6dx     +++|**        UEM - UEM TRANSFER.
00098  M00S00093.6dx     +++|*
00099  M00S00094.6dx     +++|*         ENTRY  (A) = 3/ O,3/,12/ BUFFER ADDRESS.
00100  M00S00095.6dx     +++|*                      O = 0 FOR READ REQUEST.
00101  M00S00096.6dx     +++|*                        = 1 FOR WRITE REQUEST.
Line S00005 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00102  M01S00005.252l678 +++|*                (UEMG) = EM SHIFT FOR CALCULATING HEADER ADDRESS.
00103  M01S00006.252l678 +++|*                (UEMH) = EM SHIFT FOR CALCULATING EM ADDRESS.
00104  M00S00097.6dx     +++|*
00105  M00S00098.6dx     +++|*         EXIT   (A) .LT. 0, IF UNRECOVERED ERROR.
00106  M00S00099.6dx     +++|*
00107  M00S00100.6dx     +++|*         MACROS MSERR.
00108  M00S00101.6dx     +++|
00109  M00S00102.6dx     +++|
00110  M00S00103.6dx     +++| UEM      STM    UEMD        SET BUFFER ADDRESS FOR HEADER
00111  M00S00104.6dx     +++|          ADN    2
00112  M00S00105.6dx     +++|          STM    UEME
00113  M00S00106.6dx     +++|          SHN    -17         SAVE READ/WRITE FLAG FOR *7DX*
00114  M00S00107.6dx     +++|          STI    D1
00115  M00S00108.6dx     +++|          SHN    1           SET RETURN INDEX
00116  M00S00109.6dx     +++|          STD    CM
00117  M00S00110.6dx     +++|          ERRNZ  RDS+2-WDS   CODE DEPENDS ON VALUE
00118  M00S00111.6dx     +++|          SHN    7-1         SET READ / WRITE INSTRUCTIONS
00119  M00S00112.6dx     +++|          LMC    CRMI+ON
00120  M00S00113.6dx     +++|          STM    UEMD-1
00121  M00S00114.6dx     +++|          LMN    HN&ON
00122  M00S00115.6dx     +++|          STM    UEME-1
00123  M00S00116.6dx     +++|          LDM    RDS,CM      SET RETURN ADDRESS
00124  M00S00117.6dx     +++|          STM    UEMF
Line S00118 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00125  M01S00118.252l678 ---|          LDD    T6          HEADER ADDRESS = TRACK * 2020 + SECTOR
00126  M01S00119.252l678 ---|          LPC    3777
00127  M01S00120.252l678 ---|          SHN    4
00128  M01S00121.252l678 ---|          STD    CM+1
00129  M01S00122.252l678 ---|          SHN    -6
00130  M01S00123.252l678 ---|          STD    CM
00131  M01S00124.252l678 ---|          SHN    -6
00132  M01S00125.252l678 ---|          RAD    CM
00133  M00S00126.6dx     +++|          LDC    **          LARGEST TRACK VALUE
00134  M00S00127.6dx     +++| UEMA     EQU    *-1
00135  M00S00128.6dx     +++|          SBD    T6
00136  M00S00129.6dx     +++|          MJN    UEM1        IF TRACK TOO LARGE
Line S00130 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00137  M01S00130.252l678 ---|          LDN    SLDP
00138  M01S00131.252l678 ---|          SBD    T7
00139  M01S00132.252l678 ---|          PJN    UEM2        IF SECTOR OK
Line S00007 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00140  M01S00007.252l678 +++|          LDD    T7
00141  M01S00008.252l678 +++|          SBM    SLM
00142  M01S00009.252l678 +++|          MJN    UEM2        IF SECTOR OKAY
00143  M00S00133.6dx     +++|
00144  M00S00134.6dx     +++|*         INVALID MASS STORAGE ADDRESS.
00145  M00S00135.6dx     +++|
00146  M00S00136.6dx     +++| UEM1     LDN    ADDE        SET ADDRESS ERROR
00147  M00S00137.6dx     +++|          STM    ERRA
00148  M00S00138.6dx     +++|          MSERR  7DX         CALL *7DX* ERROR PROCESSOR
00149  M00S00139.6dx     +++|
00150  M00S00140.6dx     +++|*         VALID MASS STORAGE ADDRESS.
00151  M00S00141.6dx     +++|
Line S00142 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00152  M01S00142.252l678 ---| UEM2     LDD    CM+1
00153  M01S00143.252l678 ---|          LPN    77
00154  M01S00144.252l678 ---|          SHN    6
00155  M01S00145.252l678 ---|          ADD    T7
00156  M01S00146.252l678 ---|          RAD    CM+1
00157  M01S00147.252l678 ---|          SHN    -14
00158  M01S00148.252l678 ---|          RAD    CM
Line S00010 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00159  M01S00010.252l678 +++| UEM2     LDD    T6          HEADER ADDRESS = TRACK*101B*SLDE+SECTOR
00160  M01S00011.252l678 +++|          LPC    3777
00161  M01S00012.252l678 +++|          SHN    1
00162  M01S00013.252l678 +++|          STD    CM+1
00163  M01S00014.252l678 +++|          SHN    6
00164  M01S00015.252l678 +++|          RAD    CM+1
00165  M01S00016.252l678 +++|          SHN    -14
00166  M01S00017.252l678 +++| UEMG     SHN    4-1
00167  M01S00018.252l678 +++|*         SHN    4-1+EMTS    (EMTS = TRACK SHIFT)
00168  M01S00019.252l678 +++|          STD    CM
00169  M01S00020.252l678 +++|          LDD    CM+1
00170  M01S00021.252l678 +++| UEMH     SHN    4-1
00171  M01S00022.252l678 +++|*         SHN    4-1+EMTS    (EMTS = TRACK SHIFT)
00172  M01S00023.252l678 +++|          LMD    T7          ADD SECTOR NUMBER
00173  M01S00024.252l678 +++|          STD    CM+1
00174  M01S00025.252l678 +++|          SHN    -14
00175  M01S00026.252l678 +++|          RAD    CM
00176  M00S00149.6dx     +++|          LDC    0           CM ADDR = HEADER ADDR + UEM BASE ADDR
00177  M00S00150.6dx     +++| UEMB     EQU    *-1
00178  M00S00151.6dx     +++|          RAD    CM+1
00179  M00S00152.6dx     +++|          SHN    -14
00180  M00S00153.6dx     +++|          ADC    0
00181  M00S00154.6dx     +++| UEMC     EQU    *-1
00182  M00S00155.6dx     +++|          RAD    CM
00183  M00S00156.6dx     +++|          SRD    CM+2        SAVE R-REGISTER
Line S00157 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00184  M01S00157.252l678 ---|          LDD    CM+1        PUT UPPER 15 ADDR BITS IN R-REGISTER
Line S00027 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00185  M01S00027.252l678 +++|          LDD    CM+1        PUT UPPER 18 ADDR BITS IN R-REGISTER
00186  M00S00158.6dx     +++|          SCN    77
00187  M00S00159.6dx     +++|          SHN    6
00188  M00S00160.6dx     +++|          LMD    CM
00189  M00S00161.6dx     +++|          SHN    6
00190  M00S00162.6dx     +++|          STD    T2
00191  M00S00163.6dx     +++|          SHN    -14
00192  M00S00164.6dx     +++|          STD    T1
00193  M00S00165.6dx     +++|          LRD    T1
00194  M00S00166.6dx     +++|          LDD    CM+1        PUT LOWER 6 ADDR BITS IN A-REGISTER
00195  M00S00167.6dx     +++|          LPN    77
00196  M00S00168.6dx     +++|          STD    CM+1
00197  M00S00169.6dx     +++|          LMC    400000
00198  M00S00170.6dx     +++|          CRM    *,ON        READ/WRITE HEADER
00199  M00S00171.6dx     +++| UEMD     EQU    *-1
Line S00172 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00200  M01S00172.252l678 ---|          LDD    T7          DATA ADDRESS = HEADER + 20 + 77 * SECTOR
Line S00028 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00201  M01S00028.252l678 +++|          LDD    T7          DATA ADDRESS = HEADER + SLDE +77 * SECTOR
00202  M00S00173.6dx     +++|          SHN    6
00203  M00S00174.6dx     +++|          SBD    T7
Line S00175 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00204  M01S00175.252l678 ---|          ADN    SLDP
Line S00029 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00205  M01S00029.252l678 +++|          ADM    SLM
00206  M00S00176.6dx     +++|          ADD    CM+1
00207  M00S00177.6dx     +++|          LMC    400000
00208  M00S00178.6dx     +++|          CRM    *,HN        READ/WRITE DATA
00209  M00S00179.6dx     +++| UEME     EQU    *-1
00210  M00S00180.6dx     +++|          LRD    CM+2        RESTORE R-REGISTER
00211  M00S00181.6dx     +++|          LDN    0           INDICATE NO ERRORS
00212  M00S00182.6dx     +++|          STM    CHRV
00213  M00S00183.6dx     +++| UEM3     LJM    *           RETURN
00214  M00S00184.6dx     +++| UEMF     EQU    *-1
00215  M00S00185.6dx     +++| PRS      SPACE  4,10
00216  M00S00186.6dx     +++|**        PRS - PRESET.
00217  M00S00187.6dx     +++|*
00218  M00S00188.6dx     +++|*         ENTRY  (CM - CM+4) = EST ENTRY.
00219  M00S00189.6dx     +++|
00220  M00S00190.6dx     +++|
Line S00191 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00221  M01S00191.252l678 ---| PRS      LDC    UEML        GET UEM BASE ADDRESS
Line S00030 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00222  M01S00030.252l678 +++| PRS      LDK    MEFL        SET EM SHIFT
00223  M01S00031.252l678 +++|          CRM    PRSA,ON
00224  M01S00032.252l678 +++|          LDM    PRSA+2
00225  M01S00033.252l678 +++|          SHN    -5
00226  M01S00034.252l678 +++|          LPN    3
00227  M01S00035.252l678 +++|          ADC    SHNI+4-1
00228  M01S00036.252l678 +++|          STM    UEMG        UPDATE SHIFT INSTRUCTIONS
00229  M01S00037.252l678 +++|          STM    UEMH
00230  M01S00038.252l678 +++|          LDC    UEML        GET UEM BASE ADDRESS
00231  M00S00192.6dx     +++|          CRM    PRSA,ON
00232  M00S00193.6dx     +++|          LDM    PRSA
Line S00194 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00233  M01S00194.252l678 ---|          SHN    21-2+UESF
Line S00039 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00234  M01S00039.252l678 +++|          SHN    21-2
00235  M00S00195.6dx     +++|          STM    UEMC
00236  M00S00196.6dx     +++|          SHN    13-21
00237  M00S00197.6dx     +++|          SCN    77
00238  M00S00198.6dx     +++|          STM    UEMB
00239  M00S00199.6dx     +++|          LDD    CM+4        SET LARGEST TRACK
00240  M00S00200.6dx     +++|          SHN    3
00241  M00S00201.6dx     +++|          ADK    TDGL
00242  M00S00202.6dx     +++|          CRM    PRSA,ON
00243  M00S00203.6dx     +++|          SOM    PRSA
00244  M00S00204.6dx     +++|          ADC    4000
00245  M00S00205.6dx     +++|          STM    UEMA
00246  M00S00206.6dx     +++|          LJM    SMSX        RETURN
00247  M00S00207.6dx     +++|
00248  M00S00208.6dx     +++| PRSA     BSS    0           FIVE BYTES FOR READING LARGEST TRACK
Line S00209 Modification History
M01 (Removed by) ns2352
Seq #  *Modification Id* Act 
----------------------------+
00249  M01S00209.ns2352  ---|          ERRNG  PPFW-5-*-5  OVERFLOW OF PRSA
Line S00001 Modification History
M01 (Added by) ns2352
Seq #  *Modification Id* Act 
----------------------------+
00250  M01S00001.ns2352  +++| .1       SET    *+5+4-MSFW  CHECK FOR OVERFLOW
00251  M01S00002.ns2352  +++| .1       SET    .1/5
00252  M01S00003.ns2352  +++| .1       SET    MSFW+.1*5
00253  M01S00004.ns2352  +++| .2       SET    PPFW-5-*-5  BYTES AVAILABLE BEFORE OVERFLOW
00254  M01S00005.ns2352  +++|          ERRNG  PPFW-5-.1   DRIVER OVERFLOWS INTO *PPFW*-5
Line S00210 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00255  M01S00210.252l678 ---| 7DX      MSOVL  7714,T2,EPFW-1,(UEM ERROR PROCESSOR.)
Line S00040 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00256  M01S00040.252l678 +++| 7DX      MSOVL  7702,T2,EPFW-1,(UEM ERROR PROCESSOR.)
00257  M00S00211.6dx     +++|          SPACE  4,10
00258  M00S00212.6dx     +++|*****     7DX - UEM ERROR PROCESSOR.
00259  M00S00213.6dx     +++|*         C. B. LOSCHEIDER.  81/03/04.
00260  M00S00214.6dx     +++|          SPACE  4,10
00261  M00S00215.6dx     +++|***       *7DX* IS CALLED WHEN AN UNRECOVERABLE UEM ABORT
00262  M00S00216.6dx     +++|*         HAS OCCURRED. THE ONLY ERROR WHICH MAY OCCUR
00263  M00S00217.6dx     +++|*         IS AN ADDRESSING ERROR.
00264  M00S00218.6dx     +++|          SPACE  4,10
00265  M00S00219.6dx     +++|          QUAL
00266  M00S00220.6dx     +++| BEGIN    BSSN   PRS
00267  M00S00221.6dx     +++| ERRA     BSSN   1           ERROR FLAG WORD
00268  M00S00222.6dx     +++|          ERRNG  DEFW-*      *7DX*/COMMON ERROR PROCESSOR CONFLICT
00269  M00S00223.6dx     +++| END      BSSN
00270  M00S00224.6dx     +++|          QUAL   *
00271  M00S00225.6dx     +++| MSE      SPACE  4,25
00272  M00S00226.6dx     +++|**        MSE - MASS STORAGE ERROR PROCESSOR.
00273  M00S00227.6dx     +++|*
00274  M00S00228.6dx     +++|*         ENTRY  ((D1)) = 0 IF READ, 1 IF WRITE.
00275  M00S00229.6dx     +++|*                (UEMD) = PP BUFFER ADDRESS OF HEADER.
00276  M00S00230.6dx     +++|*                (ERRA) = ERROR CODE AS DEFINED IN *COMSMSP*.
00277  M00S00231.6dx     +++|*                (T1) = UEMD.
00278  M00S00232.6dx     +++|*                (T2) = ERRA.
00279  M00S00233.6dx     +++|*                (T5) = EQUIPMENT.
00280  M00S00234.6dx     +++|*                (T6) = LOGICAL TRACK.
00281  M00S00235.6dx     +++|*                (T7) = LOGICAL SECTOR.
00282  M00S00236.6dx     +++|*
Line S00237 Modification History
M01 (Removed by) ns2741
Seq #  *Modification Id* Act 
----------------------------+
00283  M01S00237.ns2741  ---|*         EXIT   (T2) = READ BUFFER ADDRESS FOR *7EL*.
Line S00001 Modification History
M01 (Added by) ns2741
Seq #  *Modification Id* Act 
----------------------------+
00284  M01S00001.ns2741  +++|*         EXIT   (T2) = READ BUFFER ADDRESS FOR *7EK*.
00285  M00S00238.6dx     +++|*                (DEDT) = 8/0, 4/*6DX* DRIVER TYPE.
00286  M00S00239.6dx     +++|*                (DEEC) = ERROR CODE.
00287  M00S00240.6dx     +++|*                (DENR) = 0.
00288  M00S00241.6dx     +++|*                (DERC) = 0.
00289  M00S00242.6dx     +++|*                (DERW) = 1 IF WRITE REQUEST, 0 IF READ REQUEST.
00290  M00S00243.6dx     +++|*                (DEST) = 0.
00291  M00S00244.6dx     +++|*                (DEWR) = 0.
Line S00245 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00292  M01S00245.253l688 ---|*                (RDCT) = 7/0, 1/1, 4/0.
Line S00001 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00293  M01S00001.253l688 +++|*                (RDCT) = 5/0, 1/1, 6/0.
00294  M00S00246.6dx     +++|*                (MB+2) = DRIVER DEPENDENT PART OF BML MESSAGE.
00295  M00S00247.6dx     +++|*                         24/0, 12/W, 24/A.
00296  M00S00248.6dx     +++|*                         W = WORD COUNT.
00297  M00S00249.6dx     +++|*                         A = EXTENDED MEMORY ERROR ADDRESS.
00298  M00S00250.6dx     +++|*
00299  M00S00251.6dx     +++|*         USES   T2, CM - CM+4.
00300  M00S00252.6dx     +++|*
00301  M00S00253.6dx     +++|*         MACROS MSERR.
00302  M00S00254.6dx     +++|
00303  M00S00255.6dx     +++|
00304  M00S00256.6dx     +++| DDX      ENTRY              *7DX* ENTRY
00305  M00S00257.6dx     +++|
00306  M00S00258.6dx     +++|          LDI    D1          SET READ/WRITE FLAG
00307  M00S00259.6dx     +++|          STM    DERW
00308  M00S00260.6dx     +++|          LDK    /COMSDFS/D6DX  SAVE DRIVER TYPE
00309  M00S00261.6dx     +++|          STM    DEDT
Line S00262 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00310  M01S00262.253l688 ---|          LDN    20          SET *RECOVERY IN PROGRESS* FLAG
Line S00002 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00311  M01S00002.253l688 +++|          LDD    HN          SET RECOVERY IN PROGRESS FLAG
00312  M00S00263.6dx     +++|          STM    RDCT
00313  M00S00264.6dx     +++|          LDI    T2          SET ERROR CODE
00314  M00S00265.6dx     +++|          STM    DEEC
Line S00266 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00315  M01S00266.252l678 ---|          LDD    T6          HEADER ADDRESS = TRACK * 2020B + SECTOR
Line S00041 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00316  M01S00041.252l678 +++|          LDK    MEFL
00317  M01S00042.252l678 +++|          CRD    CM
00318  M01S00043.252l678 +++|          LDD    CM+2
00319  M01S00044.252l678 +++|          SHN    -5
00320  M01S00045.252l678 +++|          LPN    3
00321  M01S00046.252l678 +++|          RAM    DDXA
00322  M01S00047.252l678 +++|          LDD    T6          HEADER ADDRESS = TRACK*101B*SLDE+SECTOR
00323  M00S00267.6dx     +++|          LPC    3777
Line S00268 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00324  M01S00268.252l678 ---|          SHN    4
Line S00048 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
00325  M01S00048.252l678 +++| DDXA     SHN    4
00326  M01S00049.252l678 +++|*         SHN    4+EMTS      (EMTS = TRACK SHIFT)
00327  M00S00269.6dx     +++|          STD    CM+4
00328  M00S00270.6dx     +++|          SHN    -6
00329  M00S00271.6dx     +++|          STD    CM+3
00330  M00S00272.6dx     +++|          SHN    -6
00331  M00S00273.6dx     +++|          RAD    CM+3
00332  M00S00274.6dx     +++|          LDD    CM+4
00333  M00S00275.6dx     +++|          LPN    77
00334  M00S00276.6dx     +++|          SHN    6
00335  M00S00277.6dx     +++|          ADD    T7
00336  M00S00278.6dx     +++|          RAD    CM+4
00337  M00S00279.6dx     +++|          SHN    -14
00338  M00S00280.6dx     +++|          RAD    CM+3
00339  M00S00281.6dx     +++|          LDN    1           SAVE WORD COUNT FOR BML MESSAGE
00340  M00S00282.6dx     +++|          STD    CM+2
00341  M00S00283.6dx     +++|          LDN    0           CLEAR UNUSED FIELDS IN BML MESSAGE
00342  M00S00284.6dx     +++|          STD    CM+1
00343  M00S00285.6dx     +++|          STD    CM
00344  M00S00286.6dx     +++|          STM    DENR        INITIALIZE *NON-RECOVERABLE ERROR* FLAG
00345  M00S00287.6dx     +++|          STM    DERC        INITIALIZE RETRY COUNT
00346  M00S00288.6dx     +++|          STM    DEST        INITIALIZE ERROR PROCESSING CONTROL WORD
00347  M00S00289.6dx     +++|          ERRNZ  RTC.AD      *7DX* ASSUMES NO RETRY WILL BE ATTEMPTED
00348  M00S00290.6dx     +++|          STM    DEWR        INITIALIZE *DATA WRITTEN/READ* FLAG
00349  M00S00291.6dx     +++|          LDI    T1          SET ADDRESS OF BUFFER HEADER
00350  M00S00292.6dx     +++|          STD    T2
00351  M00S00293.6dx     +++|          LDD    MA          SAVE DEPENDENT PART OF BML MESSAGE
00352  M00S00294.6dx     +++|          ADN    2
00353  M00S00295.6dx     +++|          CWD    CM
Line S00296 Modification History
M01 (Removed by) ns2741
Seq #  *Modification Id* Act 
----------------------------+
00354  M01S00296.ns2741  ---|          MSERR  7EL         EXECUTE *7EL*
Line S00002 Modification History
M01 (Added by) ns2741
Seq #  *Modification Id* Act 
----------------------------+
00355  M01S00002.ns2741  +++|          MSERR  7EK         EXECUTE *7EK*
00356  M00S00297.6dx     +++|
00357  M00S00298.6dx     +++|
00358  M00S00299.6dx     +++|          ERRNG  10000-*     *7DX* HAS OVERFLOWED
00359  M00S00300.6dx     +++|          BSS    10000-*     SPARES (ADJUST ORIGIN BY 5 AS REQUIRED)
00360  M00S00301.6dx     +++|          CON    DDX-1       (T0) = ENTRY ADDRESS - 1
00361  M00S00302.6dx     +++|          CON    UEMD        (T1) = BUFFER HEADER ADDRESS
00362  M00S00303.6dx     +++|          CON    ERRA        (T2) = ADDRESS OF WORD CONTAINING
00363  M00S00304.6dx     +++|                                    ERROR FLAG
00364  M00S00305.6dx     +++|          ERRNZ  LN-*        ILLEGAL PROGRAM LENGTH
00365  M00S00306.6dx     +++|          QUAL   *
00366  M00S00307.6dx     +++|          END
cdc/nos2.source/opl.opl871/deck/6dx.txt ยท Last modified: by 127.0.0.1