User Tools

Site Tools


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

Deck OSB

8 Modifications

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M01S00001.osb     +++|          IDENT  OSB,OSB
00002  M01S00002.osb     +++|          PERIPH
00003  M01S00001.ns2418  +++|          MACHINE  6,A       INFORM CTI OF CLOCK SUPPORT
00004  M01S00003.osb     +++|          BASE   M
00005  M01S00004.osb     +++|          SST
00006  M01S00005.osb     +++|          TITLE  OSB - OPERATING SYSTEM BOOTSTRAP.
00007  M01S00006.osb     +++|*COMMENT  OSB - OPERATING SYSTEM BOOTSTRAP.
Line S00007 Modification History
M01 (Added by) osb
M02 (Updated by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00008  M02S00007.281l803 ---|          COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1978.
00009  M01S00001.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00010  M01S00008.osb     +++| OSB      SPACE  4,10
00011  M01S00009.osb     +++|*****     OSB - OPERATING SYSTEM BOOTSTRAP.
00012  M01S00010.osb     +++|*
00013  M01S00011.osb     +++|*         P. D. HAAS.        78/07/31.
00014  M01S00012.osb     +++| OSB      SPACE  4,10
00015  M01S00013.osb     +++|***              *OSB* IS THE OPERATING SYSTEM BOOTSTRAP LOADED BY
00016  M01S00014.osb     +++|*         *CTI*.  ITS SOLE PURPOSE IS TO LOAD *DIO* FROM THE DEAD-
00017  M01S00015.osb     +++|*         START MEDIUM TO THE PP ON THE DISPLAY CHANNEL.
00018  M01S00016.osb     +++|          SPACE  4,10
00019  M01S00017.osb     +++|***       OPERATOR MESSAGES.
00020  M01S00018.osb     +++|*
00021  M01S00019.osb     +++|*         *ERROR LOADING -DIO-.*
00022  M01S00020.osb     +++| OSB      SPACE  4,10
00023  M01S00021.osb     +++|*CALL     COMPMAC
00024  M01S00022.osb     +++|*CALL     COMSDSL
00025  M01S00001.241l630 +++|*CALL     COMSMSP
00026  M01S00023.osb     +++|*CALL     COMSPIM
00027  M01S00024.osb     +++| FWDL$    EQU    1           LINK CHANNEL INSTRUCTIONS FORWARD
00028  M01S00025.osb     +++|*CALL     COMPCHL
00029  M01S00026.osb     +++| OSB      SPACE  4,10
00030  M01S00027.osb     +++|****      DIRECT LOCATION ASSIGNMENTS.
00031  M01S00028.osb     +++|
00032  M01S00029.osb     +++|
00033  M01S00030.osb     +++|          LOC    20
00034  M01S00002.241l630 +++| DT       BSS    1           895 DEADSTART READ FLAG
00035  M01S00003.241l630 +++|          ERRNZ  DT-MP       DIRECT CELL LOCATION IN *DIO* MUST MATCH
00036  M01S00031.osb     +++| UN       BSS    4           PHYSICAL DISK ADDRESS
00037  M01S00032.osb     +++| L1       BSS    1           SCRATCH
00038  M01S00033.osb     +++| L2       BSS    1           SCRATCH
00039  M01S00034.osb     +++| AP       BSS    1           DISK ADDRESS POINTER
00040  M01S00035.osb     +++|****
00041  M01S00036.osb     +++| OSB      SPACE  4,10
00042  M01S00037.osb     +++|**        ASSEMBLY CONSTANTS.
00043  M01S00038.osb     +++|
00044  M01S00039.osb     +++|
00045  M01S00040.osb     +++| BUF      EQU    100         BUFFER ADDRESS
00046  M01S00041.osb     +++|          TITLE  MAIN ROUTINE.
00047  M01S00042.osb     +++| OSB      SPACE  4,10
00048  M01S00043.osb     +++|          ORG    DSLA+5*20
00049  M01S00044.osb     +++|
Line S00045 Modification History
M01 (Added by) osb
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00050  M02S00045.v23l617 ---| OSB      LDM    DSPB+10     SET DEADSTART CHANNEL
00051  M01S00001.v23l617 +++| OSB      LDM    DPW10A      DEADSTART CHANNEL
00052  M01S00046.osb     +++|          LPN    37
00053  M01S00047.osb     +++|          STD    CM
00054  M01S00048.osb     +++|          LDC    CH01$       SET ADDRESS OF FIRST CHANNEL INSTRUCTION
00055  M01S00049.osb     +++|          STD    T1
00056  M01S00002.v23l617 +++|          LDM    DCST        SET DISPLAY CONSOLE STATUS
00057  M01S00003.v23l617 +++|          STD    LA
00058  M01S00050.osb     +++|          LDN    0
00059  M01S00051.osb     +++| OSB1     RAD    T1          ADDRESS OF CURRENT CHANNEL INSTRUCTION
00060  M01S00052.osb     +++|          LDI    T1          SAVE LINK TO NEXT INSTRUCTION
00061  M01S00053.osb     +++|          LPN    37
00062  M01S00054.osb     +++|          STD    T2
00063  M01S00055.osb     +++|          LDD    CM          MODIFY CHANNEL INSTRUCTION
00064  M01S00056.osb     +++|          SBD    T2
00065  M01S00057.osb     +++|          RAI    T1
00066  M01S00058.osb     +++|          LDD    T2
00067  M01S00059.osb     +++|          NJN    OSB1        IF MORE INSTRUCTIONS TO MODIFY
00068  M01S00004.241l630 +++|          STD    DT          PRESET NOT 895 DEVICE TYPE
00069  M01S00060.osb     +++|          RJM    RDR         READ DISK (TAPE) RECORD
00070  M01S00061.osb     +++|          ZJN    ERR         IF LOAD ERRORS
00071  M01S00062.osb     +++|          LDM    BUF+5*1+1   CHECK RECORD NAME
00072  M01S00063.osb     +++|          SHN    6
00073  M01S00064.osb     +++|          LMM    BUF+5*1+0
00074  M01S00065.osb     +++|          LMC    3RODI
00075  M01S00066.osb     +++|          NJN    ERR         IF NOT *DIO*
Line S00001 Modification History
M01 (Added by) ns22000
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00076  M02S00001.v23l617 ---|          LDM    HDTB+PPSD
00077  M01S00004.v23l617 +++|          LDM    PPSDA       GET PP SPEED
00078  M01S00002.ns22000 +++|          STD    T3
00079  M01S00067.osb     +++|          LDC    MXRL        TRANSMIT *DIO*
00080  M01S00068.osb     +++|          OAM.   BUF+5*20,CH
00081  M01S00069.osb     +++|          LDN    77          TRANSMIT PARAMETERS
00082  M01S00070.osb     +++|          OAM.   0,CH
00083  M01S00005.v23l617 +++|          DCN.   MR+40
00084  M01S00006.v23l617 +++|          CCF.   *+2,MX      ALLOW *MDD* TO EXECUTE
00085  M01S00071.osb     +++|          DCN.   CH+40
00086  M01S00072.osb     +++|          ACN.   CH
00087  M01S00073.osb     +++|          IAM.   0,CH        INPUT *SET*
00088  M01S00074.osb     +++|
Line S00075 Modification History
M01 (Added by) osb
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00089  M02S00075.v23l617 ---| ERR      LDN    0           HANG PP ON DISPLAY CHANNEL
Line S00076 Modification History
M01 (Added by) osb
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00090  M02S00076.v23l617 ---|          OAN.   CH
Line S00077 Modification History
M01 (Added by) osb
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00091  M02S00077.v23l617 ---|          LDC    UJNI
Line S00078 Modification History
M01 (Added by) osb
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00092  M02S00078.v23l617 ---|          OAN.   CH
Line S00079 Modification History
M01 (Added by) osb
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00093  M02S00079.v23l617 ---| ERR1     DCN.   CH
Line S00080 Modification History
M01 (Added by) osb
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00094  M02S00080.v23l617 ---|          FNC.   7001,CH
Line S00081 Modification History
M01 (Added by) osb
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00095  M02S00081.v23l617 ---|          ACN.   CH
Line S00082 Modification History
M01 (Added by) osb
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00096  M02S00082.v23l617 ---|          LDN    ERRAL       DISPLAY ERROR MESSAGE
Line S00083 Modification History
M01 (Added by) osb
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00097  M02S00083.v23l617 ---|          OAM.   ERRA,CH
Line S00084 Modification History
M01 (Added by) osb
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00098  M02S00084.v23l617 ---|          UJN    ERR1        HANG PP IN LOOP
Line S00085 Modification History
M01 (Added by) osb
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00099  M02S00085.v23l617 ---|
Line S00086 Modification History
M01 (Added by) osb
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00100  M02S00086.v23l617 ---| ERRA     DATA   6000,7500,H*ERROR LOADING -DIO-.*
Line S00087 Modification History
M01 (Added by) osb
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00101  M02S00087.v23l617 ---| ERRAL    EQU    *-ERRA
00102  M01S00007.v23l617 +++| ERR      LDD    LA
00103  M01S00008.v23l617 +++|          ZJN    ERR1        IF DEADSTART FROM CC545 CONSOLE
00104  M01S00009.v23l617 +++|          LCN    0           CLEAR DISPLAY
00105  M01S00010.v23l617 +++|          RJM    CDDP
00106  M01S00011.v23l617 +++|          LCN    77-ERRA+ERR1
00107  M01S00012.v23l617 +++|          RAM    ERRA
00108  M01S00013.v23l617 +++| ERR1     LDC    ERRB        DISPLAY ERROR MESSAGE
00109  M01S00014.v23l617 +++|          RJM    CDDP
00110  M01S00015.v23l617 +++| ERRA     UJN    ERR1        HANG PP IN LOOP
00111  M01S00016.v23l617 +++|
00112  M01S00017.v23l617 +++| ERRB     CON    ERRC
00113  M01S00018.v23l617 +++|          CON    0
00114  M01S00019.v23l617 +++|
00115  M01S00020.v23l617 +++| ERRC     CON    113
00116  M01S00021.v23l617 +++|          DATA   C*ERROR LOADING -DIO-.*
00117  M01S00088.osb     +++|          TITLE  MAJOR SUBROUTINES.
00118  M01S00089.osb     +++| RDR      SPACE  4,10
00119  M01S00090.osb     +++|**        RDR - READ DISK RECORD.
00120  M01S00091.osb     +++|*
00121  M01S00092.osb     +++|*         EXIT   (A) = 0 IF ERROR.
00122  M01S00093.osb     +++|*                (T4) = UNIT NUMBER.
00123  M01S00094.osb     +++|*                (T5) = SEEK FUNCTION + ALGORITHM INDEX.
00124  M01S00095.osb     +++|*
00125  M01S00096.osb     +++|*         USES   T1, T6, T7, UN.
00126  M01S00097.osb     +++|*
00127  M01S00098.osb     +++|*         CALLS  POS, RNS, RTR.
00128  M01S00099.osb     +++|
00129  M01S00100.osb     +++|
00130  M01S00101.osb     +++| RDR4     RJM    RTR         READ TAPE RECORD
00131  M01S00102.osb     +++|
00132  M01S00103.osb     +++| RDR      SUBR               ENTRY/EXIT
Line S00104 Modification History
M01 (Added by) osb
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00133  M02S00104.v23l617 ---|          LDM    DSPB+5
00134  M01S00022.v23l617 +++|          LDM    DPW5A       DEADSTART PANEL WORD 5
00135  M01S00105.osb     +++|          ZJN    RDR4        IF TAPE DEADSTART
Line S00106 Modification History
M01 (Added by) osb
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00136  M02S00106.v23l617 ---|          LDM    DSSB+OSBP+3 SET SEEK FUNCTION
00137  M01S00023.v23l617 +++|          LDM    OSDPA+3     *OSB* SEEK FUNCTION
00138  M01S00107.osb     +++|          STD    T5
00139  M01S00108.osb     +++|          SHN    14
00140  M01S00109.osb     +++|          STM    POSA
Line S00110 Modification History
M01 (Added by) osb
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00141  M02S00110.v23l617 ---|          LDM    DSSB+OSBP+4 *OSB* TRACK
Line S00024 Modification History
M01 (Added by) v23l617
M02 (Updated by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
00142  M02S00024.241l630 ---|          LDM    OSDPA+4     *OSB* TRACK
00143  M01S00005.241l630 +++|          SHN    -14
00144  M01S00006.241l630 +++|          LMN    AIDC
Line S00001 Modification History
M01 (Added by) ns2485
M02 (Updated by) ns2485a
Seq #  *Modification Id* Act 
----------------------------+
00145  M02S00001.ns2485a ---|          ERRNZ  AIDC-12     *OSB* AND *1IS* ALGORITHM INDEX MISMATCH
00146  M01S00007.241l630 +++|          NJN    RDR0        IF NOT 895
00147  M01S00008.241l630 +++|          LDC    2000        SET 895 DEADSTART FLAG ON SEEK
00148  M01S00009.241l630 +++|          STD    DT          SAVE 895 DEADSTART FLAG FOR *DIO*
00149  M01S00001.ns2485b +++|          SHN    6-12
00150  M01S00002.ns2485b +++|          RAM    POSB
00151  M01S00003.ns2485b +++|          SOM    POSC
00152  M01S00010.241l630 +++| RDR0     LDM    OSDPA+4     *OSB* TRACK
00153  M01S00111.osb     +++|          STD    T6
00154  M01S00112.osb     +++|          LDM    DSLA-2      FIRST *DIO* SECTOR FROM *OSB* LINKAGE
00155  M01S00113.osb     +++|          STD    T7
00156  M01S00114.osb     +++|          SHN    21-13
00157  M01S00115.osb     +++|          PJN    RDR1        IF NOT TRACK SWITCH
00158  M01S00116.osb     +++|          SHN    13-21
00159  M01S00117.osb     +++|          STD    T6          SET NEXT TRACK
00160  M01S00118.osb     +++|          LDN    0
00161  M01S00119.osb     +++|          STD    T7
Line S00120 Modification History
M01 (Added by) osb
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00162  M02S00120.v23l617 ---| RDR1     LDM    DSPB+6      SET UNIT NUMBER
00163  M01S00025.v23l617 +++| RDR1     LDM    DPW6A       UNIT NUMBER
00164  M01S00121.osb     +++|          LPN    77
00165  M01S00122.osb     +++|          STD    UN
00166  M01S00123.osb     +++|          STD    T4
Line S00124 Modification History
M01 (Added by) osb
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00167  M02S00124.v23l617 ---|          LDC    DSSB+OSBP+6 SET DISK ADDRESS POINTER
Line S00026 Modification History
M01 (Added by) v23l617
M02 (Updated by) ns2485
Seq #  *Modification Id* Act 
----------------------------+
00168  M02S00026.ns2485  ---|          LDC    OSRPA       DISK ADDRESS POINTER
Line S00002 Modification History
M01 (Added by) ns2485
M02 (Updated by) ns2485a
Seq #  *Modification Id* Act 
----------------------------+
00169  M02S00002.ns2485a ---|          LDC    OSRPA+1     DISK ADDRESS POINTER
00170  M01S00001.ns2485a +++|          LDC    OSRPA       DISK ADDRESS POINTER
00171  M01S00125.osb     +++|          STD    AP
00172  M01S00126.osb     +++|          LDC    BUF         SET BUFFER ADDRESS
00173  M01S00127.osb     +++|          STD    T1
00174  M01S00128.osb     +++|          RJM    POS         POSITION MASS STORAGE
00175  M01S00129.osb     +++| RDR2     LDD    T1          READ NEXT SECTOR
00176  M01S00130.osb     +++|          RJM    RNS
00177  M01S00131.osb     +++|          PJN    RDR3        IF ERROR / EOR
00178  M01S00132.osb     +++|          LDC    DSLN        ADVANCE BUFFER ADDRESS
00179  M01S00133.osb     +++|          RAD    T1
00180  M01S00134.osb     +++|          LMC    BUF+TPLN
00181  M01S00135.osb     +++|          NJN    RDR2        IF NOT GREATER THAN TAPE PRU
00182  M01S00136.osb     +++| RDR3     LJM    RDRX        RETURN
00183  M01S00137.osb     +++| RTR      SPACE  4,10
00184  M01S00138.osb     +++|**        RTR - READ TAPE RECORD.
00185  M01S00139.osb     +++|*
00186  M01S00140.osb     +++|*         EXIT   (A) = 0 IF ERROR.
00187  M01S00141.osb     +++|*                (T6) = 0.
00188  M01S00142.osb     +++|*                (T7) = DEADSTART FUNCTION.
00189  M01S00143.osb     +++|
00190  M01S00144.osb     +++|
00191  M01S00145.osb     +++| RTR      SUBR               ENTRY/EXIT
Line S00146 Modification History
M01 (Added by) osb
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00192  M02S00146.v23l617 ---|          LDM    DSPB+6      SET DEADSTART FUNCTION
00193  M01S00027.v23l617 +++|          LDM    DPW6A       DEADSTART FUNCTION
00194  M01S00147.osb     +++|          STD    T7
00195  M01S00148.osb     +++|          LPC    7000        EXTRACT EQUIPMENT NUMBER
00196  M01S00149.osb     +++|          RAM    RTRA
00197  M01S00150.osb     +++| RTR2     LDN    0           SET TAPE DEADSTART FLAG
00198  M01S00151.osb     +++|          STD    T6
00199  M01S00152.osb     +++|          FNC    40,0
00200  M01S00153.osb     +++| RTRA     EQU    *-1
00201  M01S00154.osb     +++|          LDC    TPLN+4      INPUT TAPE RECORD
00202  M01S00155.osb     +++|          ACN    0
00203  M01S00156.osb     +++|          IAM    BUF,0
00204  M01S00157.osb     +++|          UJN    RTRX        RETURN
00205  M01S00158.osb     +++|          TITLE  SUBROUTINES.
00206  M01S00159.osb     +++| GDS      SPACE  4,10
00207  M01S00160.osb     +++|**        GDS - GET DISK STATUS.
00208  M01S00161.osb     +++|*
00209  M01S00162.osb     +++|*         EXIT   (A) = GENERAL STATUS.
00210  M01S00163.osb     +++|
00211  M01S00164.osb     +++|
00212  M01S00165.osb     +++| GDS      SUBR               ENTRY/EXIT
00213  M01S00166.osb     +++|          FNC    12,0        GET GENERAL STATUS
00214  M01S00167.osb     +++|          ACN    0
00215  M01S00168.osb     +++|          IAN    0
00216  M01S00169.osb     +++|          UJN    GDSX        RETURN
00217  M01S00170.osb     +++| POS      SPACE  4,15
00218  M01S00171.osb     +++|**        POS - POSITION MASS STORAGE.
00219  M01S00172.osb     +++|*
00220  M01S00173.osb     +++|*         ENTRY  (AP) = POINTER TO DISK ADDRESS.
00221  M01S00174.osb     +++|*                (UN) = UNIT NUMBER.
00222  M01S00175.osb     +++|*                (POSA) = SEEK FUNCTION.
00223  M01S00176.osb     +++|*
00224  M01S00177.osb     +++|*         EXIT   (UN+1) = PHYSICAL CYLINDER.
00225  M01S00178.osb     +++|*                (UN+2) = PHYSICAL TRACK.
00226  M01S00179.osb     +++|*                (UN+3) = PHYSICAL SECTOR.
00227  M01S00180.osb     +++|*                (AP) ADVANCED TO NEXT ADDRESS.
00228  M01S00181.osb     +++|*
00229  M01S00182.osb     +++|*         CALLS  GDS.
00230  M01S00183.osb     +++|
00231  M01S00184.osb     +++|
00232  M01S00185.osb     +++| POS      SUBR               ENTRY/EXIT
Line S00186 Modification History
M01 (Added by) osb
M02 (Updated by) ns2485
Seq #  *Modification Id* Act 
----------------------------+
00233  M02S00186.ns2485  ---|          LDI    AP          SET CYLINDER
Line S00003 Modification History
M01 (Added by) ns2485
M02 (Updated by) ns2485a
Seq #  *Modification Id* Act 
----------------------------+
00234  M02S00003.ns2485a ---|          LDM    OSRPA       SET CYLINDER
Line S00004 Modification History
M01 (Added by) ns2485
M02 (Updated by) ns2485a
Seq #  *Modification Id* Act 
----------------------------+
00235  M02S00004.ns2485a ---|          SHN    6
Line S00005 Modification History
M01 (Added by) ns2485
M02 (Updated by) ns2485a
Seq #  *Modification Id* Act 
----------------------------+
00236  M02S00005.ns2485a ---|          STM    OSRPA
Line S00006 Modification History
M01 (Added by) ns2485
M02 (Updated by) ns2485a
Seq #  *Modification Id* Act 
----------------------------+
00237  M02S00006.ns2485a ---|          SHN    6
Line S00007 Modification History
M01 (Added by) ns2485
M02 (Updated by) ns2485a
Seq #  *Modification Id* Act 
----------------------------+
00238  M02S00007.ns2485a ---|          ADM    OSDPA
00239  M01S00002.ns2485a +++|          LDI    AP          SET CYLINDER
00240  M01S00187.osb     +++|          STD    UN+1
Line S00188 Modification History
M01 (Added by) osb
M02 (Updated by) ns2485
Seq #  *Modification Id* Act 
----------------------------+
00241  M02S00188.ns2485  ---|          AOD    AP          ADVANCE ADDRESS POINTER
Line S00189 Modification History
M01 (Added by) osb
M02 (Updated by) ns2485
Seq #  *Modification Id* Act 
----------------------------+
00242  M02S00189.ns2485  ---|          LDI    AP          UNPACK TRACK
Line S00190 Modification History
M01 (Added by) osb
M02 (Updated by) ns2485
Seq #  *Modification Id* Act 
----------------------------+
00243  M02S00190.ns2485  ---|          SHN    14
Line S00008 Modification History
M01 (Added by) ns2485
M02 (Updated by) ns2485a
Seq #  *Modification Id* Act 
----------------------------+
00244  M02S00008.ns2485a ---|          LDI    AP          SET TRACK
00245  M01S00003.ns2485a +++|          AOD    AP          ADVANCE ADDRESS POINTER
Line S00004 Modification History
M01 (Added by) ns2485a
M02 (Updated by) ns2485b
Seq #  *Modification Id* Act 
----------------------------+
00246  M02S00004.ns2485b ---|          LDI    AP          UNPACK TRACK
Line S00005 Modification History
M01 (Added by) ns2485a
M02 (Updated by) ns2485b
Seq #  *Modification Id* Act 
----------------------------+
00247  M02S00005.ns2485b ---|          SHN    14
00248  M01S00004.ns2485b +++|          LDI    AP          UNPACK SECTOR
00249  M01S00005.ns2485b +++|          LPC    77
00250  M01S00006.ns2485b +++| POSB     EQU    *-1
00251  M01S00007.ns2485b +++|*         LPC    177         (IF 895)
00252  M01S00008.ns2485b +++|          STD    UN+3
00253  M01S00009.ns2485b +++|          LDI    AP          SET TRACK
00254  M01S00010.ns2485b +++| POSC     SHN    -6
00255  M01S00011.ns2485b +++|*         SHN    -7          (IF 895)
00256  M01S00011.241l630 +++|          LMD    DT          SET 895 DEADSTART READ FLAG
00257  M01S00191.osb     +++|          STD    UN+2
Line S00192 Modification History
M01 (Added by) osb
M02 (Updated by) ns2485
Seq #  *Modification Id* Act 
----------------------------+
00258  M02S00192.ns2485  ---|          SHN    -14         SET SECTOR
Line S00009 Modification History
M01 (Added by) ns2485
M02 (Updated by) ns2485a
Seq #  *Modification Id* Act 
----------------------------+
00259  M02S00009.ns2485a ---|          AOD    AP          ADVANCE POINTER ADDRESS
Line S00010 Modification History
M01 (Added by) ns2485
M02 (Updated by) ns2485a
Seq #  *Modification Id* Act 
----------------------------+
00260  M02S00010.ns2485a ---|          LDI    AP          SET SECTOR
Line S00006 Modification History
M01 (Added by) ns2485a
M02 (Updated by) ns2485b
Seq #  *Modification Id* Act 
----------------------------+
00261  M02S00006.ns2485b ---|          SHN    -14         SET SECTOR
Line S00193 Modification History
M01 (Added by) osb
M02 (Updated by) ns2485b
Seq #  *Modification Id* Act 
----------------------------+
00262  M02S00193.ns2485b ---|          STD    UN+3
00263  M01S00194.osb     +++|          AOD    AP          ADVANCE POINTER ADDRESS
00264  M01S00195.osb     +++| POS1     FNC    2,0         SEEK FUNCTION
00265  M01S00196.osb     +++| POSA     EQU    *-1
00266  M01S00197.osb     +++|*         FNC    1,0         (1 TO 1 INTERLACE)
00267  M01S00198.osb     +++|          ACN    0
00268  M01S00199.osb     +++|          LDN    4           OUTPUT SEEK PARAMETERS
00269  M01S00200.osb     +++|          OAM    UN,0
00270  M01S00201.osb     +++|          FJM    *,0
00271  M01S00202.osb     +++|          DCN    0+40
00272  M01S00203.osb     +++|          RJM    GDS         GET DISK STATUS
00273  M01S00204.osb     +++|          ZJN    POSX        IF READY
00274  M01S00205.osb     +++|          UJN    POS1        LOOP UNTIL READY
00275  M01S00206.osb     +++| RNS      SPACE  4,10
00276  M01S00207.osb     +++|**        RNS - READ NEXT SECTOR.
00277  M01S00208.osb     +++|*
00278  M01S00209.osb     +++|*         ENTRY  (A) = READ ADDRESS.
00279  M01S00210.osb     +++|*
00280  M01S00211.osb     +++|*         EXIT   (A) = 0 IF ERROR.
00281  M01S00212.osb     +++|*                    .GT. 0 IF EOR.
00282  M01S00213.osb     +++|*                    .LT. 0 IF FULL SECTOR WORD COUNT.
00283  M01S00214.osb     +++|*                (T6) = LOGICAL TRACK FOR NEXT READ.
00284  M01S00215.osb     +++|*                (T7) = LOGICAL SECTOR FOR NEXT READ.
00285  M01S00216.osb     +++|*
00286  M01S00217.osb     +++|*         USES   T3, L1, L2.
00287  M01S00218.osb     +++|*
00288  M01S00219.osb     +++|*         CALLS  GDS, POS.
00289  M01S00220.osb     +++|
00290  M01S00221.osb     +++|
00291  M01S00222.osb     +++| RNS      SUBR               ENTRY/EXIT
00292  M01S00223.osb     +++|          SBN    2           SET READ ADDRESS
00293  M01S00224.osb     +++|          STD    T3
00294  M01S00225.osb     +++|          STM    RNSA
00295  M01S00226.osb     +++|          LDI    T3          SAVE LOCATIONS OVERLAID BY LINKAGE
00296  M01S00227.osb     +++|          STD    L1
00297  M01S00228.osb     +++|          LDM    1,T3
00298  M01S00229.osb     +++|          STD    L2
00299  M01S00230.osb     +++|          FNC    4,0         READ DISK SECTOR
00300  M01S00231.osb     +++|          LDC    DSLN+2
00301  M01S00232.osb     +++|          ACN    0
00302  M01S00233.osb     +++|          IAM    BUF,0
00303  M01S00234.osb     +++| RNSA     EQU    *-1
00304  M01S00235.osb     +++| RNS1     RJM    GDS         GET DISK STATUS
00305  M01S00236.osb     +++|          NJN    RNS1        IF NOT READY
00306  M01S00237.osb     +++|          AOD    T7          ADVANCE LOGICAL SECTOR
00307  M01S00238.osb     +++|          LMI    T3
00308  M01S00239.osb     +++|          ZJN    RNS2        IF MATCHING SECTOR LINKAGE
00309  M01S00240.osb     +++|          LDN    0           SET FIRST SECTOR
00310  M01S00241.osb     +++|          STD    T7
00311  M01S00242.osb     +++|          LDI    T3          SET NEXT TRACK
00312  M01S00243.osb     +++|          STD    T6
00313  M01S00244.osb     +++|          SHN    0-13
00314  M01S00245.osb     +++|          ZJN    RNS3        IF NOT TRACK SWITCH
00315  M01S00246.osb     +++|          RJM    POS         POSITION MASS STORAGE
00316  M01S00247.osb     +++| RNS2     LDD    L1          RESTORE CELLS OVERLAID BY LINKAGE
00317  M01S00248.osb     +++|          STI    T3
00318  M01S00249.osb     +++|          AOD    T3
00319  M01S00250.osb     +++|          LDI    T3
00320  M01S00251.osb     +++|          SHN    -6
00321  M01S00252.osb     +++|          SHN    21-0        SIGN BIT = FULL SECTOR FLAG
00322  M01S00253.osb     +++|          LMD    L2
00323  M01S00254.osb     +++|          STI    T3
00324  M01S00255.osb     +++|          ADN    1           NO ERROR ON EOR
00325  M01S00256.osb     +++| RNS3     LJM    RNSX        RETURN
00326  M01S00257.osb     +++|          SPACE  4,10
00327  M01S00258.osb     +++|          HERE               TERMINATE LINKED CHANNEL INSTRUCTIONS
00328  M01S00259.osb     +++|          SPACE  4,10
00329  M01S00260.osb     +++|          ERRPL  *-DSLA-473  *OSB* OVERFLOWS ONE SECTOR
00330  M01S00261.osb     +++|
00331  M01S00262.osb     +++|          END
cdc/nos2.source/opl.opl871/deck/osb.txt · Last modified: by 127.0.0.1