User Tools

Site Tools


cdc:nos2.source:opl.opl871:deck:ddf.003

Deck DDF Part 003

10 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
06197  M01S06130.ddf     +++|          CRD    CM          READ TRACK RECOVERY WORD
06198  M01S06131.ddf     +++|          RJM    ASD         GET BYTE NUMBER
06199  M01S06132.ddf     +++|          LDD    AB+4
06200  M01S06133.ddf     +++|          STD    RC
06201  M01S06134.ddf     +++|          SBN    5
06202  M01S06135.ddf     +++|          PJN    SRW2        IF OUT OF RANGE
06203  M01S06136.ddf     +++|          AOD    CA          ADVANCE CHARACTER ADDRESS
06204  M01S06137.ddf     +++|          RJM    ASD         ASSEMBLE NEW VALUE
06205  M01S06138.ddf     +++|          LDD    AB+4
06206  M01S06139.ddf     +++|          STM    CM,RC
06207  M01S06140.ddf     +++|          RJM    /LRR/STA    SET TABLE ADDRESS
06208  M01S06141.ddf     +++|          CWD    CM          SAVE TRACK RECOVERY WORD
06209  M01S06142.ddf     +++|          LJM    RET         RETURN
06210  M01S06143.ddf     +++|
06211  M01S06144.ddf     +++| SRW2     LJM    ERR2        *INCORRECT PARAMETER.*
06212  M01S06145.ddf     +++| STP      SPACE  4,10
06213  M01S06146.ddf     +++|***       SETTP.NNNN.
06214  M01S06147.ddf     +++|*         SETS RECOVERY TRACK POINTER FOR *RECOVER.*, *NEXTAT.*,
06215  M01S06148.ddf     +++|*         *NEXTSS.*, AND *SETRW.*  COMMANDS TO *NNNN*.
06216  M01S06149.ddf     +++|
06217  M01S06150.ddf     +++|
06218  M01S06151.ddf     +++| STP      COMMAND
06219  M01S06152.ddf     +++|          LDD    RT
06220  M01S06153.ddf     +++|          NJN    STP1        IF TABLES ALLOCATED
06221  M01S06154.ddf     +++|          LJM    ERR4        *INCORRECT ENTRY.*
06222  M01S06155.ddf     +++|
06223  M01S06156.ddf     +++| STP1     ADD    RA          READ POINTER WORD
06224  M01S06157.ddf     +++|          SHN    6
06225  M01S06158.ddf     +++|          ADN    RCPW
06226  M01S06159.ddf     +++|          CRD    CM
06227  M01S06160.ddf     +++|          RJM    ASD         ASSEMBLE VALUE
06228  M01S06161.ddf     +++|          LDD    AB+4
06229  M01S06162.ddf     +++|          LPC    3777
06230  M01S06163.ddf     +++|          LMC    4000
06231  M01S06164.ddf     +++|          STD    CM
06232  M01S06165.ddf     +++|          STD    TK
06233  M01S06166.ddf     +++|          LDD    RA          SAVE UPDATED POINTER WORD
06234  M01S06167.ddf     +++|          ADD    RT
06235  M01S06168.ddf     +++|          SHN    6
06236  M01S06169.ddf     +++|          ADN    RCPW
06237  M01S06170.ddf     +++|          CWD    CM
06238  M01S06171.ddf     +++|          LDN    0
06239  M01S06172.ddf     +++|          STD    SC
06240  M01S06173.ddf     +++|          RJM    RSB         READ SECTOR TO BUFFER
06241  M01S06174.ddf     +++|          LJM    RET         RETURN
06242  M01S06175.ddf     +++|          SPACE  4,10
06243  M01S06176.ddf     +++|          COMMAND            TERMINATE COMMANDS
06244  M01S06177.ddf     +++| LRR      SPACE  4,10
06245  M01S06178.ddf     +++|**        LRR - LABEL/TRT RECONSTRUCTION SUBROUTINES.
06246  M01S06179.ddf     +++|*
06247  M01S06180.ddf     +++|*         THE FOLLOWING ROUTINES ARE SAVED IN CENTRAL TO BE LOADED
06248  M01S06181.ddf     +++|*         AT THE END OF THE RIGHT SCREEN PROCESSOR AREA AS NEEDED.
06249  M01S06182.ddf     +++|
06250  M01S06183.ddf     +++|
06251  M01S06184.ddf     +++| LRR      ACROVL ACRLA
06252  M01S06185.ddf     +++| CEI      SPACE  4,15
06253  M01S06186.ddf     +++|**        CEI - CHECK EOI SECTOR.
06254  M01S06187.ddf     +++|*
06255  M01S06188.ddf     +++|*         ENTRY  (AB - AB+4) = TRACK RECOVERY WORD.
06256  M01S06189.ddf     +++|*                (FN - FN+4) = RECOVERY POINTERS.
06257  M01S06190.ddf     +++|*
06258  M01S06191.ddf     +++|*         EXIT   (A) = 0  IF INDIRECT CHAIN.
06259  M01S06192.ddf     +++|*                RECOVERY POINTERS UPDATED.
06260  M01S06193.ddf     +++|*
06261  M01S06194.ddf     +++|*         USES   T1, CM - CM+4.
06262  M01S06195.ddf     +++|*
06263  M01S06196.ddf     +++|*         CALLS  STA.
06264  M01S06197.ddf     +++|
06265  M01S06198.ddf     +++|
06266  M01S06199.ddf     +++| CEI      SUBR               ENTRY/EXIT
06267  M01S06200.ddf     +++|          LDD    SC
06268  M01S06201.ddf     +++|          STD    AB+3
06269  M01S06202.ddf     +++|          AOD    AB          SET EOI STATUS
06270  M01S06203.ddf     +++|          LDD    SC
06271  M01S06204.ddf     +++|          LMN    LS
06272  M01S06205.ddf     +++|          ZJN    CEIX        IF AT END OF TRACK
06273  M01S06206.ddf     +++|          AOD    SC
06274  M01S06207.ddf     +++|          RJM    RSB         READ SECTOR TO BUFFER
06275  M01S06208.ddf     +++|          ZJN    CEI1        IF NO READ ERROR
06276  M01S06209.ddf     +++|          RJM    SRP         SAVE RECOVERY POINTERS
06277  M01S06210.ddf     +++|          RJM    /LRR/RDM    RESUME DISPLAY MODE
06278  M01S06211.ddf     +++|          LJM    RET         RETURN
06279  M01S06212.ddf     +++|
06280  M01S06213.ddf     +++| CEI1     LDN    2
06281  M01S06214.ddf     +++|          STD    T1
06282  M01S06215.ddf     +++|          SOD    SC
06283  M01S06216.ddf     +++|          LDM    BFMS
06284  M01S06217.ddf     +++|          ADM    BFMS+1
06285  M01S06218.ddf     +++|          NJN    CEI3        IF NOT ANOTHER EOI SECTOR
06286  M01S06219.ddf     +++| CEI2     LDM    BFMS+FNEI,T1  CHECK FOR FILENAME *IMS*
06287  M01S06220.ddf     +++|          LMM    CEIB,T1
06288  M01S06221.ddf     +++|          NJN    CEI3        IF NOT CATALOG/PERMIT/DATA TRACK
06289  M01S06222.ddf     +++|          SOD    T1
06290  M01S06223.ddf     +++|          PJN    CEI2        IF CHECK NOT COMPLETE
06291  M01S06224.ddf     +++|          AOD    AB          SET IMS EOI STATUS
06292  M01S06225.ddf     +++| CEI3     LDN    0           FORCE EOI STATUS FOR *SNS*
06293  M01S06226.ddf     +++|          STM    BFMS
06294  M01S06227.ddf     +++|          STM    BFMS+1
06295  M01S06228.ddf     +++|          LJM    CEIX        RETURN
06296  M01S06229.ddf     +++|
06297  M01S06230.ddf     +++|
06298  M01S06231.ddf     +++| CEIB     DATA   Z*IMS*
06299  M01S06232.ddf     +++| CSS      SPACE  4,15
06300  M01S06233.ddf     +++|**        CSS - CHECK SYSTEM SECTOR.
06301  M01S06234.ddf     +++|*
06302  M01S06235.ddf     +++|*         ENTRY  (AB - AB+4) = TRACK RECOVERY WORD.
06303  M01S06236.ddf     +++|*                (FN - FN+4) = RECOVERY POINTERS.
06304  M01S06237.ddf     +++|*
06305  M01S06238.ddf     +++|*         EXIT   (A) = 0  IF INDIRECT CHAIN.
06306  M01S06239.ddf     +++|*                RECOVERY POINTERS UPDATED.
06307  M01S06240.ddf     +++|*
06308  M01S06241.ddf     +++|*         USES   T1, CM - CM+4.
06309  M01S06242.ddf     +++|*
06310  M01S06243.ddf     +++|*         CALLS  STA, ERR.
06311  M01S06244.ddf     +++|
06312  M01S06245.ddf     +++|
06313  M01S06246.ddf     +++| CSS      SUBR               ENTRY/EXIT
06314  M01S06247.ddf     +++|          LDD    RA          READ MST RECOVERY AREA
06315  M01S06248.ddf     +++|          ADD    RT
06316  M01S06249.ddf     +++|          SHN    6
06317  M01S06250.ddf     +++|          ADN    ALGL
06318  M01S06251.ddf     +++|          CRD    CM
06319  M01S06252.ddf     +++|          ADN    SSDW-ALGL   SAVE FNT/FST/DATE/TIME
06320  M01S06253.ddf     +++|          CWM    FNSS,TR
06321  M01S06254.ddf     +++|          LDD    FN          SET LINKAGE
06322  M01S06255.ddf     +++|          STD    AB+1
06323  M01S06256.ddf     +++|          STD    AB+2
06324  M01S06257.ddf     +++|          LDM    FNSS+4      SET FILE TYPE
06325  M01S06258.ddf     +++|          SHN    -6
06326  M01S06259.ddf     +++|          STD    T1
06327  M01S06260.ddf     +++|          SHN    6
06328  M01S06261.ddf     +++|          RAD    AB
06329  M01S06262.ddf     +++|          LDD    T1
06330  M01S06263.ddf     +++|          LMN    SYFT
06331  M01S06264.ddf     +++|          NJN    CSSX        IF NOT SPECIAL FILE
06332  M01S06265.ddf     +++|          LDN    2
06333  M01S06266.ddf     +++|          STD    T1
06334  M01S06267.ddf     +++| CSS1     LDM    FNSS,T1     CHECK FOR FILENAME *LABEL*
06335  M01S06268.ddf     +++|          LMM    CSSA,T1
06336  M01S06269.ddf     +++|          NJN    CSS2        IF NOT LABEL SECTOR
06337  M01S06270.ddf     +++|          SOD    T1
06338  M01S06271.ddf     +++|          PJN    CSS1        IF CHECK NOT COMPLETE
06339  M01S06272.ddf     +++|          LDN    1           ALGL BYTE POINTER
06340  M01S06273.ddf     +++|          UJN    CSS6        SAVE TRACK
06341  M01S06274.ddf     +++|
06342  M01S06275.ddf     +++| CSS2     LDN    2
06343  M01S06276.ddf     +++|          STD    T1
06344  M01S06277.ddf     +++| CSS3     LDM    FNSS,T1     CHECK FOR FILENAME *DATA*
06345  M01S06278.ddf     +++|          LMM    CSSB,T1
06346  M01S06279.ddf     +++|          NJN    CSS4        IF NOT INDIRECT CHAIN
06347  M01S06280.ddf     +++|          SOD    T1
06348  M01S06281.ddf     +++|          PJN    CSS3        IF CHECK NOT COMPLETE
06349  M01S06282.ddf     +++|          LDN    0           ALGL BYTE POINTER
06350  M01S06283.ddf     +++|          UJN    CSS6        SAVE TRACK
06351  M01S06284.ddf     +++|
06352  M01S06285.ddf     +++| CSS4     LDN    2
06353  M01S06286.ddf     +++|          STD    T1
06354  M01S06287.ddf     +++|          LDM    FNSS+3
06355  M01S06288.ddf     +++|          LMM    CSSC+3
06356  M01S06289.ddf     +++|          SCN    77
06357  M01S06290.ddf     +++|          NJN    CSS7        IF NOT PERMIT CHAIN
06358  M01S06291.ddf     +++| CSS5     LDM    FNSS,T1     CHECK FOR FILENAME *PERMIT*
06359  M01S06292.ddf     +++|          LMM    CSSC,T1
06360  M01S06293.ddf     +++|          NJN    CSS7        IF NOT PERMIT CHAIN
06361  M01S06294.ddf     +++|          SOD    T1
06362  M01S06295.ddf     +++|          PJN    CSS5        IF CHECK NOT COMPLETE
06363  M01S06296.ddf     +++|          LDN    2           ALGL BYTE POINTER
06364  M01S06297.ddf     +++|
06365  M01S06298.ddf     +++|*         SAVE TRACK IN PROPER *ALGL* BYTE.
06366  M01S06299.ddf     +++|
06367  M01S06300.ddf     +++| CSS6     STD    T1
06368  M01S06301.ddf     +++|          LDD    TK          SAVE TRACK POINTER
06369  M01S06302.ddf     +++|          STM    CM,T1
06370  M01S06303.ddf     +++|          LDD    RA
06371  M01S06304.ddf     +++|          ADD    RT
06372  M01S06305.ddf     +++|          SHN    6
06373  M01S06306.ddf     +++|          ADN    ALGL
06374  M01S06307.ddf     +++|          CWD    CM
06375  M01S06308.ddf     +++|          RJM    SRP         SAVE RECOVERY POINTERS
06376  M01S06309.ddf     +++|          LDD    T1
06377  M01S06310.ddf     +++|          ZJN    CSS7        IF INDIRECTS
06378  M01S06311.ddf     +++|          LMN    1
06379  M01S06312.ddf     +++|          NJN    CSS7        IF NOT LABEL
06380  M01S06313.ddf     +++|          RJM    RDM         RESUME DISPLAY MODE
06381  M01S06314.ddf     +++|          LDC    CSSA        *LABEL*
06382  M01S06315.ddf     +++|          LJM    ERR         OUTPUT MESSAGE
06383  M01S06316.ddf     +++|
06384  M01S06317.ddf     +++| CSS7     LJM    CSSX        EXIT
06385  M01S06318.ddf     +++|
06386  M01S06319.ddf     +++|
06387  M01S06320.ddf     +++| CSSA     DATA   Z*LABEL*
06388  M01S06321.ddf     +++| CSSB     DATA   Z*DATA*
06389  M01S06322.ddf     +++| CSSC     DATA   Z*PERMIT*
06390  M01S06323.ddf     +++| RDM      SPACE  4,10
06391  M01S06324.ddf     +++|**        RDM - RESUME DISPLAY.
06392  M01S06325.ddf     +++|*
06393  M01S06326.ddf     +++|*         RESETS PARAMETERS AND REQUESTS DISPLAY.
06394  M01S06327.ddf     +++|*
06395  M01S06328.ddf     +++|*         USES   T3.
06396  M01S06329.ddf     +++|*
06397  M01S06330.ddf     +++|*         CALLS  CSB, RDC, MDC.
06398  M01S06331.ddf     +++|
06399  M01S06332.ddf     +++|
06400  M01S06333.ddf     +++| RDM      SUBR               ENTRY/EXIT
06401  M01S06334.ddf     +++|          LDD    MA          SAVE DISK DATA
06402  M01S06335.ddf     +++|          CWD    T3
06403  M01S06336.ddf     +++|          RJM    RDC         REQUEST DISPLAY CHANNEL
06404  M01S06337.ddf     +++|          RJM    CSB         CLEAR SCREEN BUFFER
06405  M01S06338.ddf     +++|          LDD    MA          RESTORE DISK DATA
06406  M01S06339.ddf     +++|          CRD    T3
06407  M01S06340.ddf     +++|          UJN    RDMX        RETURN
06408  M01S06341.ddf     +++| RRP      SPACE  4,10
06409  M01S06342.ddf     +++|**        RRP - RESTORE RECOVERY POINTERS.
06410  M01S06343.ddf     +++|*
06411  M01S06344.ddf     +++|*         ENTRY  (TK) = CURRENT TRACK.
06412  M01S06345.ddf     +++|*
06413  M01S06346.ddf     +++|*         EXIT   (AB - AB+4) = TRACK RECOVERY WORD.
06414  M01S06347.ddf     +++|*                (FN - FN+4) = RECOVERY POINTERS.
06415  M01S06348.ddf     +++|
06416  M01S06349.ddf     +++|
06417  M01S06350.ddf     +++| RRP      SUBR               ENTRY/EXIT
06418  M01S06351.ddf     +++|          LDD    RA
06419  M01S06352.ddf     +++|          ADD    RT
06420  M01S06353.ddf     +++|          SHN    6
06421  M01S06354.ddf     +++| RRPA     ADN    RCPW
06422  M01S06355.ddf     +++|*         ADN    ICPW        IF INDIRECT CHAIN RECOVERY
06423  M01S06356.ddf     +++|*         ADN    BSPW        IF GENERATION OF TRT (BLDSTRT.)
06424  M01S06357.ddf     +++|          CRD    FN
06425  M01S06358.ddf     +++|          RJM    STA         SET TABLE ADDRESS
06426  M01S06359.ddf     +++|          CRD    AB          READ TRACK RECOVERY WORD
06427  M01S06360.ddf     +++|          UJN    RRPX        RETURN
06428  M01S06361.ddf     +++| SRP      SPACE  4,10
06429  M01S06362.ddf     +++|**        SRP - SAVE RECOVERY POINTERS.
06430  M01S06363.ddf     +++|*
06431  M01S06364.ddf     +++|*         ENTRY  (TK) = CURRENT TRACK.
06432  M01S06365.ddf     +++|*                (AB - AB+4) = TRACK RECOVERY WORD.
06433  M01S06366.ddf     +++|*                (FN - FN+4) = RECOVERY POINTERS.
06434  M01S06367.ddf     +++|*
06435  M01S06368.ddf     +++|*         EXIT   WORDS STORED IN CM RECOVERY AREA.
06436  M01S06369.ddf     +++|
06437  M01S06370.ddf     +++|
06438  M01S06371.ddf     +++| SRP      SUBR               ENTRY/EXIT
06439  M01S06372.ddf     +++|          RJM    STA         SET TABLE ADDRESS
06440  M01S06373.ddf     +++|          CWD    AB          SAVE TRACK RECOVERY WORD
06441  M01S06374.ddf     +++|          LDD    RA          SAVE RECOVERY PARAMETERS
06442  M01S06375.ddf     +++|          ADD    RT
06443  M01S06376.ddf     +++|          SHN    6
06444  M01S06377.ddf     +++| SRPA     ADN    RCPW
06445  M01S06378.ddf     +++|*         ADN    ICPW        IF INDIRECT CHAIN RECOVERY
06446  M01S06379.ddf     +++|*         ADN    BSPW        IF GENERATION OF TRT (BLDSTRT.)
06447  M01S06380.ddf     +++|          CWD    FN
06448  M01S06381.ddf     +++|          UJN    SRPX        RETURN
06449  M01S06382.ddf     +++| STA      SPACE  4,10
06450  M01S06383.ddf     +++|**        STA - SET TABLE ADDRESS.
06451  M01S06384.ddf     +++|*
06452  M01S06385.ddf     +++|*         EXIT   (A) = CM ADDRESS FOR CURRENT TRACK RECOVERY WORD.
06453  M01S06386.ddf     +++|
06454  M01S06387.ddf     +++|
06455  M01S06388.ddf     +++| STA      SUBR               ENTRY/EXIT
06456  M01S06389.ddf     +++|          LDD    RA
06457  M01S06390.ddf     +++|          ADD    RT
06458  M01S06391.ddf     +++|          SHN    6
06459  M01S06392.ddf     +++|          ADD    TK
06460  M01S06393.ddf     +++|          ADC    TRCT-4000
06461  M01S06394.ddf     +++|          UJN    STAX        RETURN
06462  M01S06395.ddf     +++| WSM      SPACE  4,10
06463  M01S06396.ddf     +++|**        WSM - WRITE STATUS MESSAGE.
06464  M01S06397.ddf     +++|*
06465  M01S06398.ddf     +++|*         WRITES MESSAGE TO MS1W FOR RECOVERY STATUS.
06466  M01S06399.ddf     +++|
06467  M01S06400.ddf     +++|
06468  M01S06401.ddf     +++| WSM      SUBR               ENTRY/EXIT
06469  M01S06402.ddf     +++|          LDD    EQ          SET EST IN MESSAGE
06470  M01S06403.ddf     +++|          SHN    -6
06471  M01S06404.ddf     +++|          ADC    2RQ0
06472  M01S06405.ddf     +++|          STM    WSMA+5
06473  M01S06406.ddf     +++|          LDD    EQ
06474  M01S06407.ddf     +++|          RJM    C2D         CONVERT TO DISPLAY
06475  M01S06408.ddf     +++|          STM    WSMA+6
06476  M01S06409.ddf     +++|          LDD    FN          SET TRACK POINTER IN MESSAGE
06477  M01S06410.ddf     +++|          SHN    -6
06478  M01S06411.ddf     +++|          RJM    C2D         CONVERT TO DISPLAY
06479  M01S06412.ddf     +++|          STM    WSMA+11
06480  M01S06413.ddf     +++|          LDD    FN
06481  M01S06414.ddf     +++|          RJM    C2D         CONVERT TO DISPLAY
06482  M01S06415.ddf     +++|          STM    WSMA+12
06483  M01S06416.ddf     +++|          LDD    FN+1        SET CURRENT TRACK IN MESSAGE
06484  M01S06417.ddf     +++|          SHN    -6
06485  M01S06418.ddf     +++|          RJM    C2D         CONVERT TO DISPLAY
06486  M01S06419.ddf     +++|          STM    WSMA+15
06487  M01S06420.ddf     +++|          LDD    FN+1
06488  M01S06421.ddf     +++|          RJM    C2D         CONVERT TO DISPLAY
06489  M01S06422.ddf     +++|          STM    WSMA+16
06490  M01S06423.ddf     +++|          LDN    ZERL
06491  M01S06424.ddf     +++|          CRD    CM
06492  M01S06425.ddf     +++|          LDD    CP          WRITE MESSAGE TO MS1W
06493  M01S06426.ddf     +++|          ADN    MS1W
06494  M01S06427.ddf     +++|          CWM    WSMA,TR
06495  M01S06428.ddf     +++|          CWD    CM          SET EOL
06496  M01S06429.ddf     +++|          LJM    WSMX        RETURN
06497  M01S06430.ddf     +++|
06498  M01S06431.ddf     +++|
06499  M01S06432.ddf     +++| WSMA     DATA   30H READING EQXXX TP=XXXX CT=XXXX
06500  M01S06433.ddf     +++|          SPACE  4,10
06501  M01S06434.ddf     +++|          ACROVL             END OF OVERLAY
06502  M01S06435.ddf     +++|          ERRNG  MACRL-/PRESET/LRRL  *LRR* OVERFLOWS DISPLAY OVL AREA
06503  M01S06436.ddf     +++|          SPACE  4,10
06504  M01S06437.ddf     +++|          OVERFLOW  /PRESET/OVL
06505  M01S06438.ddf     +++|          QUAL   *
06506  M01S06439.ddf     +++|          SPACE  4,10
06507  M01S06440.ddf     +++|          QUAL
06508  M01S06441.ddf     +++| .L       EQU    .N          LAST OVERLAY LETTER
06509  M01S06442.ddf     +++| MCMDL    EQU    /PRESET/.MCMDL  MAXIMUM COMMAND PROCESSOR LENGTH
06510  M01S06443.ddf     +++| TCMTL    EQU    /PRESET/.CMTL    TOTAL CM REQUIRED FOR RESIDENT OVLS
06511  M01S06444.ddf     +++|          SPACE  4,10
06512  M01S06445.ddf     +++|          ERRNG  EPFW-CPLA-MCMDL*5  COMMAND(S) OVERFLOW ERROR PROCESSOR
06513  M01S06446.ddf     +++| DDF      TTL    DDF - DISPLAY DISK FILE.
06514  M01S06447.ddf     +++|          END
cdc/nos2.source/opl.opl871/deck/ddf.003.txt ยท Last modified: by 127.0.0.1