User Tools

Site Tools


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

Deck DDF

Library Member Format: MODIFY

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M00S00001.ddf     +++|          IDENT  DDF,DDF
00002  M00S00002.ddf     +++|          PERIPH
00003  M00S00003.ddf     +++|          BASE   M
00004  M00S00004.ddf     +++|          SST    BFMS,FNSS,EQSS,FTSS,NSSS,GQSS,FASS,DTSS
00005  M00S00005.ddf     +++|          TITLE DDF - DISPLAY DISK FILE.
00006  M00S00006.ddf     +++|*COMMENT  DDF - DISPLAY DISK FILE.
Line S00007 Modification History
M01 (Removed by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00007  M01S00007.281l803 ---|          COMMENT  COPYRIGHT CONTROL DATA CORPORATION, 1987.
Line S00001 Modification History
M01 (Added by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00008  M01S00001.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00009  M00S00008.ddf     +++| DDF      SPACE  4,10
00010  M00S00009.ddf     +++|***       DDF - DISPLAY DISK FILE.
00011  M00S00010.ddf     +++|*
00012  M00S00011.ddf     +++|*         J. J. EIKUM.       73/03/13.
00013  M00S00012.ddf     +++|*         J. J. EIKUM.       78/11/24.
00014  M00S00013.ddf     +++|*         P. C. HIGGINS.     81/06/08.
00015  M00S00014.ddf     +++|*         P. C. HIGGINS.     84/05/01.
00016  M00S00015.ddf     +++|*         L. K. JACOBS.      84/10/01.
00017  M00S00016.ddf     +++| DDF      SPACE  4,50
00018  M00S00017.ddf     +++|***              DDF PROVIDES THE CAPABILITY TO READ AND DISPLAY THE
00019  M00S00018.ddf     +++|*         CONTENTS OF PHYSICAL DISK SECTORS.  THE CONTENTS OF THE
00020  M00S00019.ddf     +++|*         SECTOR CAN BE CHANGED AND THE SECTOR REWRITTEN.
00021  M00S00020.ddf     +++|*
00022  M00S00021.ddf     +++|*                SEVERAL METHODS ARE PROVIDED TO SPECIFY THE DISK
00023  M00S00022.ddf     +++|*         ADDRESS TO READ.  THE ADDRESS CAN BE SPECIFIED EXPLICITLY
00024  M00S00023.ddf     +++|*         BY ENTERING THE EST ORDINAL, TRACK, AND SECTOR, OR AN FNT,
00025  M00S00024.ddf     +++|*         EJT, OR QFT ORDINAL CAN BE SPECIFIED AND THE BEGINNING OR
00026  M00S00025.ddf     +++|*         CURRENT POSITION WILL BE DISPLAYED.  SEVERAL SCRATCH AREAS
00027  M00S00026.ddf     +++|*         ARE AVAILABLE TO STORE EST ORDINAL, TRACK, AND SECTOR
00028  M00S00027.ddf     +++|*         WHILE READING OTHER LOCATIONS ON MASS STORAGE.  RANDOM
00029  M00S00028.ddf     +++|*         ADRESSING AND PERMANENT FILE REFERENCING COMMANDS ARE ALSO
00030  M00S00029.ddf     +++|*         PROVIDED.  DDF PROVIDES THE CAPABILITY OF PRINTING THE
00031  M00S00030.ddf     +++|*         INFORMATION DISPLAYED.
00032  M00S00031.ddf     +++|*
00033  M00S00032.ddf     +++|*                WARNING.  SINCE THE MASS STORAGE I/O IS DONE BY DDF
00034  M00S00033.ddf     +++|*         ITSELF, THE DISPLAY MAY BLINK DURING THE ACTUAL TRANSFER,
00035  M00S00034.ddf     +++|*         ESPECIALLY IN A BUSY SYSTEM.  IF THE DISK CHANNEL HANGS FOR
00036  M00S00035.ddf     +++|*         ANY REASON, THE CONSOLE WILL BLANK AND THE KEYBOARD WILL BE
00037  M00S00036.ddf     +++|*         INOPERABLE.
00038  M00S00037.ddf     +++|*
00039  M00S00038.ddf     +++|*                WARNING.  SOME OF THE DDF COMMANDS, THE ONES THAT
00040  M00S00039.ddf     +++|*         REQUIRE THE KEYBOARD TO BE UNLOCKED, CAN MAKE CHANGES THAT
00041  M00S00040.ddf     +++|*         MAY CAUSE THE SYSTEM TO HANG OR PERMANENT FILES TO BE LOST.
00042  M00S00041.ddf     +++|*         THESE BAD EFFECTS MAY NOT OCCUR UNTIL SOME TIME AFTER THE
00043  M00S00042.ddf     +++|*         CHANGES HAVE BEEN MADE AND AT THAT TIME IT MAY BE IMPOSSIBLE
00044  M00S00043.ddf     +++|*         TO UNDERSTAND WHAT HAPPENED.  ALSO, IT IS REMOTELY POSSIBLE
00045  M00S00044.ddf     +++|*         TO BLANK THE CONSOLE WHILE USING THESE COMMANDS.  IT IS
00046  M00S00045.ddf     +++|*         IMPORTANT THAT THE DDF USER UNDERSTAND WHAT IS BEING DONE
00047  M00S00046.ddf     +++|*         BEFORE USING THESE COMMANDS.
00048  M00S00047.ddf     +++| DDF      SPACE  4,10
00049  M00S00048.ddf     +++|***       DAYFILE MESSAGES.
00050  M00S00049.ddf     +++|*
00051  M00S00050.ddf     +++|*
00052  M00S00051.ddf     +++|*         * INCORRECT USER ACCESS.* = *SECURITY-UNLOCK* WAS NOT SET
00053  M00S00052.ddf     +++|*         ON A SECURED SYSTEM.
00054  M00S00053.ddf     +++| DDF      SPACE  4,10
00055  M00S00054.ddf     +++|***       OPERATOR MESSAGES.
00056  M00S00055.ddf     +++|*
00057  M00S00056.ddf     +++|*
00058  M00S00057.ddf     +++|*         THE FOLLOWING MESSAGES MAY APPEAR AT THE CONTROL POINT.
00059  M00S00058.ddf     +++|*
00060  M00S00059.ddf     +++|*         * WAITING FOR MEMORY.* = DDF IS WAITING FOR CM TO STORE
00061  M00S00060.ddf     +++|*                THE DISPLAY AND COMMAND PROCESSORS.
00062  M00S00061.ddf     +++|*         *READING EQXXX TP=XXXX CT=XXXX* = SHOWS STATUS OF CHECKOUT
00063  M00S00062.ddf     +++|*                DURING A PACK RECOVERY.
00064  M00S00063.ddf     +++|*
00065  M00S00064.ddf     +++|*
00066  M00S00065.ddf     +++|*         ABOVE THE COMMAND LINE, THE FOLLOWING MESSAGES MAY APPEAR.
00067  M00S00066.ddf     +++|*
00068  M00S00067.ddf     +++|*         *FORMAT ERROR.* = A FORMAT ERROR WAS DETECTED DURING
00069  M00S00068.ddf     +++|*                TRANSLATION OF THE ENTRY.
00070  M00S00069.ddf     +++|*         *INCORRECT ENTRY.* = THE COMMAND WAS NOT LEGAL.
Line S00001 Modification History
M01 (Added by) ddf4
Seq #  *Modification Id* Act 
----------------------------+
00071  M01S00001.ddf4    +++|*         *INCORRECT EQUIPMENT.* = THE EST ORDINAL SPECIFIED EITHER WAS
00072  M01S00002.ddf4    +++|*                NOT MASS STORAGE OR WAS A NULL EQUIPMENT.
00073  M00S00070.ddf     +++|*         *INCORRECT PARAMETER.* = THE PARAMETER IN THE ENTRY WAS
00074  M00S00071.ddf     +++|*                INCORRECT OR TOO LARGE.
00075  M00S00072.ddf     +++|*         *REPEAT ENTRY.* = THE ENTRY WILL NOT BE CLEARED AFTER
00076  M00S00073.ddf     +++|*                EXECUTION.
00077  M00S00074.ddf     +++|*         *SYSTEM BUSY.* = DDF IS WAITING FOR THE SYSTEM TO PROCESS
00078  M00S00075.ddf     +++|*                A REQUEST.
00079  M00S00076.ddf     +++|*         * BYTE NNNN.* = THE DATA SPECIFIED IS IN BYTE NNNN.
00080  M00S00077.ddf     +++|*         * LENGTH = NNNNNNNNB.* = THE *SKIPEI* COMMAND HAS SKIPPED
00081  M00S00078.ddf     +++|*                NNNNNNNN (OCTAL) SECTORS.
00082  M00S00079.ddf     +++|*
00083  M00S00080.ddf     +++|*         THE FOLLOWING MESSAGES TELL WHY THE *SCAN* COMMAND STOPPED.
00084  M00S00081.ddf     +++|*         *LINKAGE BYTE BAD.*
00085  M00S00082.ddf     +++|*         *SYSTEM SECTOR LINKAGE BYTE BAD.*
00086  M00S00083.ddf     +++|*         *TRACK LINK IN WRONG SECTOR.*
00087  M00S00084.ddf     +++|*         *WORD COUNT TOO BIG.*
00088  M00S00085.ddf     +++|*         *TRACK NOT RESERVED.*
00089  M00S00086.ddf     +++|*
00090  M00S00087.ddf     +++|*         THE FOLLOWING MESSAGES MAY APPEAR DURING A PACK RECOVERY.
00091  M00S00088.ddf     +++|*         *ERROR IN TRACK STATUS.*
00092  M00S00089.ddf     +++|*         *END OF EQUIPMENT.*
00093  M00S00090.ddf     +++|*         *SYSTEM SECTOR IN TRACK.*
00094  M00S00091.ddf     +++|*         *NEXT TRACK IN USE.*
00095  M00S00092.ddf     +++|*
00096  M00S00093.ddf     +++|*         SOME COMMANDS READ SEVERAL SECTORS. IF A DISK ERROR IS
00097  M00S00094.ddf     +++|*         ENCOUNTERED WHILE PROCESSING THE COMMAND, PROCESSING STOPS
00098  M00S00095.ddf     +++|*         AND THE ERROR CODE IS DISPLAYED ON THE LEFT SCREEN.
00099  M00S00096.ddf     +++| DDF      SPACE  4,10
00100  M00S00097.ddf     +++|*         COMMON DECKS.
00101  M00S00098.ddf     +++|
00102  M00S00099.ddf     +++|
00103  M00S00100.ddf     +++|*CALL     COMDMAC
00104  M00S00101.ddf     +++|*CALL     COMPMAC
00105  M00S00102.ddf     +++|*CALL     COMSCPS
00106  M00S00103.ddf     +++|*CALL     COMSEJT
00107  M00S00104.ddf     +++|*CALL     COMSLFD
00108  M00S00105.ddf     +++|*CALL     COMSPIM
00109  M00S00106.ddf     +++|*CALL     COMSMSP
00110  M00S00107.ddf     +++|*CALL     COMSMST
00111  M00S00108.ddf     +++|*CALL     COMSPRD
00112  M00S00109.ddf     +++|*CALL     COMSSSD
00113  M00S00110.ddf     +++|*CALL     COMSZOL
00114  M00S00111.ddf     +++| DDF      SPACE  4,10
00115  M00S00112.ddf     +++|**        PROGRAMS CALLED.
00116  M00S00113.ddf     +++|*
00117  M00S00114.ddf     +++|*         DDFILE - DDF UTILITY FUNCTION PROCESSOR.
00118  M00S00115.ddf     +++|*         NOTE - (RA+2) = POINTER TO OUTPUT FILE.
00119  M00S00116.ddf     +++|*                (RA+3) = POINTER TO *DBUF*.
00120  M00S00117.ddf     +++|*                (RA+4) = LWA+1 OF *DDFILE*.
00121  M00S00118.ddf     +++|*                (RA+5) = CPU STATUS WORD - USED TO RECEIVE FUNCTION
00122  M00S00119.ddf     +++|*                         CODE FROM *DDF*.
00123  M00S00120.ddf     +++|*                THE ASSEMBLY CONSTANT *D* (=5) IS USED TO REFERENCE
00124  M00S00121.ddf     +++|*                THESE LOCATIONS.
00125  M00S00122.ddf     +++| DDF      SPACE  4,50
00126  M00S00123.ddf     +++|**        DDF LOADING SEQUENCE.
00127  M00S00124.ddf     +++|*
00128  M00S00125.ddf     +++|*         THE FOLLOWING SEQUENCE IS USED TO INITIALIZE *DDF*.
00129  M00S00126.ddf     +++|*
00130  M00S00127.ddf     +++|*         A) UPON ENTRY *DDF* BRANCHES TO *PRS*.
00131  M00S00128.ddf     +++|*                - CHECK FOR LEGAL USER.
00132  M00S00129.ddf     +++|*                - LOAD *DDFILE*.
00133  M00S00130.ddf     +++|*                - REQUEST FL FOR CM RESIDENT TABLES AND PROCESSOR
00134  M00S00131.ddf     +++|*                  OVERLAYS.
00135  M00S00132.ddf     +++|*                - LOAD RIGHT SCREEN PROCESSOR OVERLAYS TO CM.
00136  M00S00133.ddf     +++|*         B) *PRS* BRANCHES TO *LCP*.
00137  M00S00134.ddf     +++|*                - LOAD AND PRESET EACH COMMAND PROCESSOR OVERLAY, AND
00138  M00S00135.ddf     +++|*                  LOAD COMMAND PROCESSORS TO CM.
00139  M00S00136.ddf     +++|*                - WRITE TABLES TO CM.
00140  M00S00137.ddf     +++|*         C) LOAD RESIDENT OVERLAY.
00141  M00S00138.ddf     +++|*                - PRESET DIRECT CELLS AND CONSTANTS.
00142  M00S00139.ddf     +++|*                - SET CHANNELS AND REQUEST DISPLAY.
00143  M00S00140.ddf     +++|*                - SET EQUIPMENT PARAMETERS FOR DEFAULT FAMILY-S
00144  M00S00141.ddf     +++|*                  LABEL TRACK.
00145  M00S00142.ddf     +++|*                - CLEAR END OF SECTOR BUFFER FOR NEATER DISPLAY.
00146  M00S00143.ddf     +++|*         D) ENTER MAIN LOOP VIA THE READ SECTOR COMMAND PROCESSOR.
00147  M00S00144.ddf     +++|*
00148  M00S00145.ddf     +++|*         DDF LOADING SEQUENCE DIAGRAM -
00149  M00S00146.ddf     +++|*
00150  M00S00147.ddf     +++|*         ORIGINAL PROGRAM
00151  M00S00148.ddf     +++|*
00152  M00S00149.ddf     +++|*         LOC PPFW(1100)----------------------------------------------
00153  M00S00150.ddf     +++|*             DDF(MAIN LOOP)
00154  M00S00151.ddf     +++|*             DLS(LEFT SCREEN DRIVER)
00155  M00S00152.ddf     +++|*             DRS(RIGHT SCREEN DRIVER)
00156  M00S00153.ddf     +++|*         LOC RSPLA---------------------------------------------------
00157  M00S00154.ddf     +++|*             TABLES(TCEF,TCRO)
00158  M00S00155.ddf     +++|*             LCP(LOAD COMMAND PROCESSORS)>>>>>>>>>V>>>>>V>>>>>V>>>>>V
00159  M00S00156.ddf     +++|*         LOC OVL----------------------------------V-----V-----V     V
00160  M00S00157.ddf     +++|*             PRS                                 8XB   8XC   8XD    V
00161  M00S00158.ddf     +++|*             RIGHT SCREEN PROCESSORS              .     .     .     V
00162  M00S00159.ddf     +++|*         LOC RESLA(AFTER  LONGEST-----------------.-----.-----.-----V
00163  M00S00160.ddf     +++|*               SINGLE RIGHT SCREEN                .     .     .    8XA
00164  M00S00161.ddf     +++|*               PROCESSOR)                         .     .     .     .
00165  M00S00162.ddf     +++|*                                                  .     .     .     .
00166  M00S00163.ddf     +++|*                                                  .     .     .     .
00167  M00S00164.ddf     +++|*         LOC CPLA---------------------------------.-----.-----.-----.
00168  M00S00165.ddf     +++|*                                                  .     .     .    PRR
00169  M00S00166.ddf     +++|*                                                  .     .     .     .
00170  M00S00167.ddf     +++|*                                                  .     .     .     .
00171  M00S00168.ddf     +++|*
00172  M00S00169.ddf     +++|*
00173  M00S00170.ddf     +++|*         PP STRUCTURE AFTER LOAD COMPLETE, DURING EXECUTION -
00174  M00S00171.ddf     +++|*
00175  M00S00172.ddf     +++|*         LOC PPFW(1100)--------------------
00176  M00S00173.ddf     +++|*             DDF(MAIN LOOP)
00177  M00S00174.ddf     +++|*             DLS(LEFT SCREEN DRIVER)
00178  M00S00175.ddf     +++|*             DRS(RIGHT SCREEN DRIVER)
00179  M00S00176.ddf     +++|*         LOC RSPLA-------------------------
00180  M00S00177.ddf     +++|*             / CURRENT   /
00181  M00S00178.ddf     +++|*             / RIGHT     /
00182  M00S00179.ddf     +++|*             / SCREEN    /
00183  M00S00180.ddf     +++|*             / PROCESSOR /
00184  M00S00181.ddf     +++|*         LOC RESLA-------------------------
00185  M00S00182.ddf     +++|*               8XA -
00186  M00S00183.ddf     +++|*             RESIDENT
00187  M00S00184.ddf     +++|*             ROUTINES
00188  M00S00185.ddf     +++|*             PKI, ETC.
00189  M00S00186.ddf     +++|*         LOC BFMS--------------------------
00190  M00S00187.ddf     +++|*             SECTOR BUFFER
00191  M00S00188.ddf     +++|*         LOC CPLA--------------------------
00192  M00S00189.ddf     +++|*             / CURRENT   /
00193  M00S00190.ddf     +++|*             / COMMAND   /
00194  M00S00191.ddf     +++|*             / PROCESSOR /
00195  M00S00192.ddf     +++|*
00196  M00S00193.ddf     +++|*
00197  M00S00194.ddf     +++|*         CM STRUCTURE AFTER LOAD COMPLETE, DURING EXECUTION -
00198  M00S00195.ddf     +++|*
00199  M00S00196.ddf     +++|*         ORG-------------------------------------------------
00200  M00S00197.ddf     +++|*             DDFILE(CP PROGRAM)
00201  M00S00198.ddf     +++|*         DDFILE FL-------------------------------------------
00202  M00S00199.ddf     +++|*             TCEF(TABLE OF COMMAND FORMATS)
00203  M00S00200.ddf     +++|*             TCRO(TABLE OF RIGHT SCREEN PROCESSOR OVERLAYS)
00204  M00S00201.ddf     +++|*         DDFILE FL + CMTL------------------------------------
00205  M00S00202.ddf     +++|*             RIGHT SCREEN PROCESSORS
00206  M00S00203.ddf     +++|*             COMMAND PROCESSORS(LOADED FROM OVERLAYS)
00207  M00S00204.ddf     +++| DDF      SPACE  4,10
00208  M00S00205.ddf     +++|****      DIRECT LOCATION ASSIGNMENTS.
00209  M00S00206.ddf     +++|
00210  M00S00207.ddf     +++|
00211  M00S00208.ddf     +++| MC       EQU    T4          MASS STORAGE CHANNEL (NOT A SCRATCH CELL)
00212  M00S00209.ddf     +++| EQ       EQU    T5          EST ORDINAL (NOT A SCRATCH CELL)
00213  M00S00210.ddf     +++| TK       EQU    T6          TRACK (NOT A SCRATCH CELL)
00214  M00S00211.ddf     +++| SC       EQU    T7          SECTOR (NOT A SCRATCH CELL)
00215  M00S00212.ddf     +++| DK       EQU    15          DISPLAY KEYBOARD CONTROL
00216  M00S00213.ddf     +++|*                16          SPARE
00217  M00S00214.ddf     +++|*                17          SPARE
00218  M00S00215.ddf     +++| AB       EQU    20 - 24     ASSEMBLY BUFFER
00219  M00S00216.ddf     +++| UI       EQU    AB+3        USER INDEX
00220  M00S00217.ddf     +++| RI       EQU    AB+3        RANDOM INDEX
00221  M00S00218.ddf     +++| BA       EQU    25 - 26     BUFFER ADDRESS
00222  M00S00219.ddf     +++| RC       EQU    27          REPEAT COUNT
00223  M00S00220.ddf     +++| SB       EQU    30          SYSTEM BUSY FLAG
00224  M00S00221.ddf     +++| CR       EQU    31          CHANNEL RESERVED FLAG
00225  M00S00222.ddf     +++| RS       EQU    32          RIGHT SCREEN DISPLAY
00226  M00S00223.ddf     +++| TA       EQU    33          CM SYNTAX TABLE ADDRESS/100B
00227  M00S00224.ddf     +++| EF       EQU    34          EXECUTE FLAG
00228  M00S00225.ddf     +++| LT       EQU    35          LAST TRACK NUMBER ON EQUIPMENT
00229  M00S00226.ddf     +++| LS       EQU    36          LAST SECTOR NUMBER ON TRACK
00230  M00S00227.ddf     +++| RT       EQU    37          CM TRT RECOVERY TABLE ADDRESS/100B
00231  M00S00228.ddf     +++| KE       EQU    40          KEYBOARD ENTRY
00232  M00S00229.ddf     +++| KI       EQU    41          KEYBOARD BUFFER INDEX
00233  M00S00230.ddf     +++| KM       EQU    42          KEYBOARD MESSAGE POINTER
00234  M00S00231.ddf     +++| CA       EQU    43          CHARACTER ADDRESS
00235  M00S00232.ddf     +++| FN       EQU    44 - 50     FILE NAME
00236  M00S00233.ddf     +++|*         EQU    51 - 57     SPARES
00237  M00S00234.ddf     +++| PF       EQU    60 - 64     PF CONTROL WORD
00238  M00S00235.ddf     +++|*                65          SPARE
00239  M00S00236.ddf     +++| XC       EQU    66          X-COORDINATE (6000B, CH01 ASSUMED)
00240  M00S00237.ddf     +++| YC       EQU    67          Y-COORDINATE
00241  M00S00238.ddf     +++|
00242  M00S00239.ddf     +++|****
00243  M00S00240.ddf     +++| DDF      SPACE  4,20
00244  M00S00241.ddf     +++|**        DIRECT CELL USAGE.
00245  M00S00242.ddf     +++|*
00246  M00S00243.ddf     +++|*         THE FOLLOWING DIRECT CELLS CAN BE USED AS SCRATCH LOCATIONS
00247  M00S00244.ddf     +++|*         BY THE DISPLAY ROUTINES AND COMMAND PROCESSORS.
00248  M00S00245.ddf     +++|*
00249  M00S00246.ddf     +++|*         T0 - T3.
00250  M00S00247.ddf     +++|*         CM - CM+4.
00251  M00S00248.ddf     +++|*         AB - AB+4.
00252  M00S00249.ddf     +++|*         RC.
00253  M00S00250.ddf     +++|*         YC.
00254  M00S00251.ddf     +++|*
00255  M00S00252.ddf     +++|*         THE FOLLOWING DIRECT CELLS CAN BE USED AS SCRATCH LOCATIONS
00256  M00S00253.ddf     +++|*         BY THE COMMAND PROCESSORS ONLY.
00257  M00S00254.ddf     +++|*
00258  M00S00255.ddf     +++|*         FN - FN+4.
00259  M00S00256.ddf     +++| DDF      TITLE  MACRO DEFINITIONS.
00260  M00S00257.ddf     +++|*         MACRO DEFINITIONS.
00261  M00S00258.ddf     +++| ACRDEF   SPACE  4,10
00262  M00S00259.ddf     +++|**        ACRDEF - AUX COMMAND ROUTINE DEFINITION.
00263  M00S00260.ddf     +++|*
00264  M00S00261.ddf     +++|*NAME     ACRDEF
00265  M00S00262.ddf     +++|*
00266  M00S00263.ddf     +++|*         ENTRY  *NAME* = OVERLAY NAME (CM FL RESIDENT).
00267  M00S00264.ddf     +++|*
00268  M00S00265.ddf     +++|*         DEFINES TAG *NAME_M* AS INDEX OF OVERLAY CONTROL WORD IN
00269  M00S00266.ddf     +++|*         TABLE *TCRO*.
00270  M00S00267.ddf     +++|
00271  M00S00268.ddf     +++|
00272  M00S00269.ddf     +++|          PURGMAC  ACRDEF
00273  M00S00270.ddf     +++|
00274  M00S00271.ddf     +++|          MACRO  ACRDEF,NAM
00275  M00S00272.ddf     +++|          CON    /NAM/NAM,NAM_L,0,NAM,0
00276  M00S00273.ddf     +++| .1       SET    *O-TCRO-5
00277  M00S00274.ddf     +++|          QUAL
00278  M00S00275.ddf     +++| NAM_N    EQU    /PRESET/.1/5
00279  M00S00276.ddf     +++|          QUAL   *
00280  M00S00277.ddf     +++|          LOC    .1/5+1
00281  M00S00278.ddf     +++|          ENDM   ACRDEF
00282  M00S00279.ddf     +++| ACROVL   SPACE  4,10
00283  M00S00280.ddf     +++|**        ACROVL - DEFINE AUX COMMAND ROUTINE OVERLAY.
00284  M00S00281.ddf     +++|*
00285  M00S00282.ddf     +++|*NAME     ACROVL LA
00286  M00S00283.ddf     +++|*
00287  M00S00284.ddf     +++|*         ENTRY  *NAME* = NAME OF OVERLAY.  (CM FL RESIDENT)
00288  M00S00285.ddf     +++|*                *LA* = LOAD ADDRESS.
00289  M00S00286.ddf     +++|*
00290  M00S00287.ddf     +++|*         NOTE   IF THE OVERLAY IS TO USE THE RIGHT SCREEN DISPLAY
00291  M00S00288.ddf     +++|*                OVERLAY AREA, SEE COMMENTS ON USE OF THIS AREA
00292  M00S00289.ddf     +++|*                WITH DEFINITION OF SYMBOL *ACRLA*.
00293  M00S00290.ddf     +++|*         NOTE   TO BEGIN A SEQUENCE OF OVERLAYS, THE SYMBOL *ACRA*
00294  M00S00291.ddf     +++|*                MUST BE UNDEFINED OR EQUAL TO ZERO.
00295  M00S00292.ddf     +++|
00296  M00S00293.ddf     +++|
00297  M00S00294.ddf     +++|          PURGMAC  ACROVL
00298  M00S00295.ddf     +++|
00299  M00S00296.ddf     +++|          MACRO  ACROVL,NAM,LA
00300  M00S00297.ddf     +++|          LOC    *O
00301  M00S00298.ddf     +++|          BSS    0
00302  M00S00299.ddf     +++| .A       IF     DEF,//ACRA
00303  M00S00300.ddf     +++| .B       IFNE   //ACRA,0
00304  M00S00301.ddf     +++|          QUAL   *
00305  M00S00302.ddf     +++|          QUAL   PRESET
00306  M00S00303.ddf     +++| .1       SET    *-ACRA+4
00307  M00S00304.ddf     +++| "ACRA"L  EQU    .1/5
00308  M00S00305.ddf     +++| .CMTL    SET    .CMTL+"ACRA"L
00309  M00S00306.ddf     +++|          QUAL   *
00310  M00S00307.ddf     +++| .A       ENDIF
00311  M00S00308.ddf     +++| .B       ENDIF
00312  M00S00309.ddf     +++|          USE    NAM
00313  M00S00310.ddf     +++| .C       IFC    NE,$NAM$$
00314  M00S00311.ddf     +++|          QUAL   PRESET
00315  M00S00312.ddf     +++| NAM      EQU    *
00316  M00S00313.ddf     +++| ACRA     MICRO  1,, NAM
00317  M00S00314.ddf     +++|          QUAL   *
00318  M00S00315.ddf     +++|          QUAL
00319  M00S00316.ddf     +++| ACRA     SET    *
00320  M00S00317.ddf     +++|          QUAL   *
00321  M00S00318.ddf     +++|          QUAL   NAM
00322  M00S00319.ddf     +++|          LOC    LA
00323  M00S00320.ddf     +++| NAM      EQU    *
00324  M00S00321.ddf     +++| .C       ELSE
00325  M00S00322.ddf     +++|          QUAL
00326  M00S00323.ddf     +++| ACRA     SET    0
00327  M00S00324.ddf     +++|          QUAL   *
00328  M00S00325.ddf     +++| .C       ENDIF
00329  M00S00326.ddf     +++|          ENDM   ACROVL
00330  M00S00327.ddf     +++| COMMAND  SPACE  4,10
00331  M00S00328.ddf     +++|**        COMMAND - ENTER COMMAND PROCESSOR.
00332  M00S00329.ddf     +++|*
00333  M00S00330.ddf     +++|*CMD      COMMAND
00334  M00S00331.ddf     +++|*
00335  M00S00332.ddf     +++|*         ENTRY  *CMD* = NAME OF COMMAND PROCESSOR.
00336  M00S00333.ddf     +++|*
00337  M00S00334.ddf     +++|*         NOTE - COMMAND PROCESSORS CANNOT USE LITERALS.
00338  M00S00335.ddf     +++|
00339  M00S00336.ddf     +++|
00340  M00S00337.ddf     +++|          PURGMAC  COMMAND
00341  M00S00338.ddf     +++|
00342  M00S00339.ddf     +++|          MACRO  COMMAND,CMD
00343  M00S00340.ddf     +++|          LOC    *O
00344  M00S00341.ddf     +++|          BSS    0
00345  M00S00342.ddf     +++| .A       IF     DEF,CMDA
00346  M00S00343.ddf     +++|          QUAL   PRESET
00347  M00S00344.ddf     +++| .1       SET    *-/DDF".N"/CMDA+4
00348  M00S00345.ddf     +++| "CMDA"L  EQU    .1/5
00349  M00S00346.ddf     +++| .MCMDL   MAX    .MCMDL,"CMDA"L
00350  M00S00347.ddf     +++| .CMTL    SET    .CMTL+"CMDA"L
00351  M00S00348.ddf     +++|          QUAL   *
00352  M00S00349.ddf     +++| .A       ENDIF
00353  M00S00350.ddf     +++| .B       IFC    NE,$CMD$$
00354  M00S00351.ddf     +++|          QUAL   PRESET
00355  M00S00352.ddf     +++| CMD      EQU    .N*10000+*
00356  M00S00353.ddf     +++| CMDA     MICRO  1,, CMD
00357  M00S00354.ddf     +++|          QUAL   *
00358  M00S00355.ddf     +++| CMDA     SET    *
00359  M00S00356.ddf     +++|          LOC    CPLA
00360  M00S00357.ddf     +++| .B       ENDIF
00361  M00S00358.ddf     +++|          ENDM   COMMAND
00362  M00S00359.ddf     +++| ENTER    SPACE  4,10
00363  M00S00360.ddf     +++|**        ENTER - ENTER SPECIAL SYNTAX.
00364  M00S00361.ddf     +++|*
00365  M00S00362.ddf     +++|*CMD      ENTER  (SYNTAX),D
00366  M00S00363.ddf     +++|*
00367  M00S00364.ddf     +++|*         ENTRY  *CMD* = NAME OF COMMAND PROCESSOR.
00368  M00S00365.ddf     +++|*                *SYNTAX* = SYNTAX OF COMMAND.
00369  M00S00366.ddf     +++|*                IF *D* IS PRESENT, A DUMMY ENTRY IS DEFINED.
00370  M00S00367.ddf     +++|
00371  M00S00368.ddf     +++|
00372  M00S00369.ddf     +++|          PURGMAC  ENTER
00373  M00S00370.ddf     +++|
00374  M00S00371.ddf     +++|          MACRO  ENTER,CMD,SYNTAX,D
00375  M00S00372.ddf     +++| .A       IFC    EQ,$D$$
00376  M00S00373.ddf     +++|          CON    CMD_L*100+CMD/10000,CMD-CMD/10000*10000
00377  M00S00374.ddf     +++| .A       ELSE
00378  M00S00375.ddf     +++| CMD      EQU    *O
00379  M00S00376.ddf     +++|          CON    0,0
00380  M00S00377.ddf     +++| .A       ENDIF
00381  M00S00378.ddf     +++|          ORG    *O-2
00382  M00S00379.ddf     +++| .1       SET    *
00383  M00S00380.ddf     +++|          DATA   Z$SYNTAX$
00384  M00S00381.ddf     +++|      BSSZ   10-*O+.1    FILL REMAINDER OF SYNTAX AREA (15D CHAR MAX)
00385  M00S00382.ddf     +++| .B       IFC    EQ,$D$$
00386  M00S00383.ddf     +++|          CON    CMD_L*100+CMD/10000,CMD-CMD/10000*10000
00387  M00S00384.ddf     +++| .B       ELSE
00388  M00S00385.ddf     +++|          CON    0,0
00389  M00S00386.ddf     +++| .B       ENDIF
00390  M00S00387.ddf     +++| .1       SET    *O-TCEF
00391  M00S00388.ddf     +++|          LOC    .1/5
00392  M00S00389.ddf     +++|          ENDM   ENTER
00393  M00S00390.ddf     +++| INDEX    SPACE  4,40
00394  M00S00391.ddf     +++|**        INDEX - GENERATE INDEXED TABLE.
00395  M00S00392.ddf     +++|*         (MODIFIED VERSION OF MACRO FROM *COMPMAC*.)
00396  M00S00393.ddf     +++|*
00397  M00S00394.ddf     +++|*
00398  M00S00395.ddf     +++|*NAME     INDEX  TYPE,ADDRESS
00399  M00S00396.ddf     +++|*
00400  M00S00397.ddf     +++|*         ENTRY  *NAME* = TABLE NAME.
00401  M00S00398.ddf     +++|*                *TYPE* = OFFSET INTO TABLE FOR THIS ENTRY.
00402  M00S00399.ddf     +++|*                *ADDRESS* = CONTENTS OF THIS ENTRY.
00403  M00S00400.ddf     +++|*
00404  M00S00401.ddf     +++|*         THIS MACRO IS INTENDED TO GENERATE TABLES WHICH ARE INDEXED
00405  M00S00402.ddf     +++|*         BY SYMBOLIC CONSTANTS SUCH AS FILE AND JOB ORIGIN CODES.
00406  M00S00403.ddf     +++|*         IT HAS 3 CALLING SEQUENCES.
00407  M00S00404.ddf     +++|*
00408  M00S00405.ddf     +++|*         IF *NAME* IS PRESENT, THE FWA OF THE TABLE IS SET TO *NAME*.
00409  M00S00406.ddf     +++|*
00410  M00S00407.ddf     +++|*         IF *ADDRESS* IS MISSING, THE TABLE IS TERMINATED WITH AN
00411  M00S00408.ddf     +++|*         *ORG* TO THE END OF THE TABLE.  THIS RESULTS IN ZERO ENTRIES
00412  M00S00409.ddf     +++|*         FOR UNDEFINED ENTRIES IN THE TABLE.
00413  M00S00410.ddf     +++|*
00414  M00S00411.ddf     +++|*         OTHERWISE, A TABLE ENTRY IS MADE AT *INDEX* + *TYPE* OF
00415  M00S00412.ddf     +++|*         *ADDRESS*.
00416  M00S00413.ddf     +++|*
00417  M00S00414.ddf     +++|*         EXAMPLE - TO GENERATE A TABLE FOR PROCESSING FILE TYPES.
00418  M00S00415.ddf     +++|*
00419  M00S00416.ddf     +++|*TFTP     INDEX              BEGIN TABLE
00420  M00S00417.ddf     +++|*
00421  M00S00418.ddf     +++|*         INDEX  PRFT,PRP    PROCESS PRINT FILE AT *PRP*
00422  M00S00419.ddf     +++|*         INDEX  LOFT,LOP    PROCESS LOCAL FILE AT *LOP*
00423  M00S00420.ddf     +++|*
00424  M00S00421.ddf     +++|*         INDEX  MXFT        TERMINATE TABLE AT *TFTP*+*MXFT*
00425  M00S00422.ddf     +++|*
00426  M00S00423.ddf     +++|*         THE CODE PROCESSING THIS TABLE NOTES THAT -
00427  M00S00424.ddf     +++|*         A FILE OF TYPE *MXFT* CANNOT BE PROCESSED,
00428  M00S00425.ddf     +++|*         A TABLE ENTRY = 0, CANNOT BE PROCESSED.
00429  M00S00426.ddf     +++|*
00430  M00S00427.ddf     +++|*         USES   SYMBOL NAME *INDEX*.
00431  M00S00428.ddf     +++|
00432  M00S00429.ddf     +++|
00433  M00S00430.ddf     +++|          PURGMAC  INDEX
00434  M00S00431.ddf     +++|
00435  M00S00432.ddf     +++|          MACRO  INDEX,A,B,C
00436  M00S00433.ddf     +++|.A IFC NE,$A$$
00437  M00S00434.ddf     +++|A BSS 0
00438  M00S00435.ddf     +++|.1 SET A
00439  M00S00436.ddf     +++|.2 SET *O
00440  M00S00437.ddf     +++|.A ELSE
00441  M00S00438.ddf     +++|  ORG .2+B
00442  M00S00439.ddf     +++|  IFC NE,$C$$,2
00443  M00S00440.ddf     +++|  LOC B
00444  M00S00441.ddf     +++|  CON C
00445  M00S00442.ddf     +++|  LOC .1+B
00446  M00S00443.ddf     +++|  BSS 0
00447  M00S00444.ddf     +++|.A ENDIF
00448  M00S00445.ddf     +++|  ENDM  INDEX
00449  M00S00446.ddf     +++| OVERLAY  SPACE  4,10
00450  M00S00447.ddf     +++|**        OVERLAY - DEFINE NEW OVERLAY.
00451  M00S00448.ddf     +++|*
00452  M00S00449.ddf     +++|*         OVERLAY ORG,(TITLE)
00453  M00S00450.ddf     +++|*
00454  M00S00451.ddf     +++|*         ENTRY  *ORG* = ORIGIN ADDRESS OF OVERLAY.
00455  M00S00452.ddf     +++|*                *TITLE* = TITLE FOR OVERLAY.
00456  M00S00453.ddf     +++|
00457  M00S00454.ddf     +++|
00458  M00S00455.ddf     +++|          PURGMAC OVERLAY
00459  M00S00456.ddf     +++|
00460  M00S00457.ddf     +++| OVERLAY  MACRO  O,TEXT
00461  M00S00458.ddf     +++| .N       SET    .N+1
00462  M00S00459.ddf     +++|          ERRNG  1R4-.N      TOO MANY OVERLAYS
00463  M00S00460.ddf     +++| .N       MICRO  .N,1, ABCDEFGHIJKLMNOPQRSTUVWXYZ01234
00464  M00S00461.ddf     +++|          TTL    DDF/8"OVLN"".N" - TEXT
00465  M00S00462.ddf     +++|          TITLE
00466  M00S00463.ddf     +++|          QUAL   DDF".N"
00467  M00S00464.ddf     +++|          IDENT  8"OVLN"".N",O    TEXT
00468  M00S00465.ddf     +++|*COMMENT  DDF - TEXT
Line S00466 Modification History
M01 (Removed by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00469  M01S00466.281l803 ---|          COMMENT  COPYRIGHT CONTROL DATA CORPORATION, 1987.
Line S00002 Modification History
M01 (Added by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00470  M01S00002.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00471  M00S00467.ddf     +++|          ORG    O
00472  M00S00468.ddf     +++|          ENDM   OVERLAY
00473  M00S00469.ddf     +++| RSDEF    SPACE  4,10
00474  M00S00470.ddf     +++|**        RSDEF - RIGHT SCREEN PROCESSOR DEFINITION.
00475  M00S00471.ddf     +++|*
00476  M00S00472.ddf     +++|*NAME     RSDEF  R
00477  M00S00473.ddf     +++|*
00478  M00S00474.ddf     +++|*         ENTRY  *NAME* = PROCESSOR OVERLAY NAME.
00479  M00S00475.ddf     +++|*                *R* = FLAG TO INDICATE PROCESSOR IS RESIDENT, NOT
00480  M00S00476.ddf     +++|*                      AN OVERLAY.
00481  M00S00477.ddf     +++|*
00482  M00S00478.ddf     +++|*         DEFINES TAG *NAME_N* AS INDEX OF OVERLAY CONTROL WORD IN
00483  M00S00479.ddf     +++|*         TABLE *TDPO*.
00484  M00S00480.ddf     +++|
00485  M00S00481.ddf     +++|
00486  M00S00482.ddf     +++|          PURGMAC  RSDEF
00487  M00S00483.ddf     +++|
00488  M00S00484.ddf     +++|          MACRO  RSDEF,NAM,R
00489  M00S00485.ddf     +++| .A       IFC    EQ,$R$$
00490  M00S00486.ddf     +++|          CON    /NAM/NAM,NAM_L,0,NAM,0
00491  M00S00487.ddf     +++| .A       ELSE
00492  M00S00488.ddf     +++|          CON    NAM,0,0,0,0
00493  M00S00489.ddf     +++| .A       ENDIF
00494  M00S00490.ddf     +++| .1       SET    *O-TCRO-5
00495  M00S00491.ddf     +++|          QUAL
00496  M00S00492.ddf     +++| NAM_N    EQU    /PRESET/.1/5
00497  M00S00493.ddf     +++|          QUAL   *
00498  M00S00494.ddf     +++|          LOC    .1/5+1
00499  M00S00495.ddf     +++|          ENDM   RSDEF
00500  M00S00496.ddf     +++| RSOVL    SPACE  4,10
00501  M00S00497.ddf     +++|**        RSOVL - DEFINE RIGHT SCREEN DISPLAY PROCESSOR OVERLAY.
00502  M00S00498.ddf     +++|*
00503  M00S00499.ddf     +++|*NAME     RSOVL  LA
00504  M00S00500.ddf     +++|*
00505  M00S00501.ddf     +++|*         ENTRY  *NAME* = NAME OF PROCESSOR.
00506  M00S00502.ddf     +++|*                *LA* = LOAD ADDRESS.
00507  M00S00503.ddf     +++|*
00508  M00S00504.ddf     +++|*         NOTE - THE DISPLAY PROCESSORS CANNOT USE LITERALS.
00509  M00S00505.ddf     +++|*              - THE ENTRY TO THE ROUTINE IS AT *LA*+1.
00510  M00S00506.ddf     +++|
00511  M00S00507.ddf     +++|
00512  M00S00508.ddf     +++|          PURGMAC  RSOVL
00513  M00S00509.ddf     +++|
00514  M00S00510.ddf     +++|          MACRO  RSOVL,NAM,LA
00515  M00S00511.ddf     +++|          LOC    *O
00516  M00S00512.ddf     +++|          BSS    0
00517  M00S00513.ddf     +++| .A       IF     DEF,//RSPA
00518  M00S00514.ddf     +++|          QUAL   *
00519  M00S00515.ddf     +++|          QUAL   PRESET
00520  M00S00516.ddf     +++| .1       SET    *-RSPA+4
00521  M00S00517.ddf     +++| "RSPA"L  EQU    .1/5
00522  M00S00518.ddf     +++| .MRSPL   MAX    .MRSPL,"RSPA"L
00523  M00S00519.ddf     +++| .CMTL    SET    .CMTL+"RSPA"L
00524  M00S00520.ddf     +++|          QUAL   *
00525  M00S00521.ddf     +++| .A       ENDIF
00526  M00S00522.ddf     +++|          USE    NAM
00527  M00S00523.ddf     +++| .B       IFC    NE,$NAM$$
00528  M00S00524.ddf     +++|          QUAL   PRESET
00529  M00S00525.ddf     +++| NAM      EQU    *
00530  M00S00526.ddf     +++| RSPA     MICRO  1,, NAM
00531  M00S00527.ddf     +++|          QUAL   *
00532  M00S00528.ddf     +++|          QUAL
00533  M00S00529.ddf     +++| RSPA     SET    *
00534  M00S00530.ddf     +++|          QUAL   *
00535  M00S00531.ddf     +++|          QUAL   NAM
00536  M00S00532.ddf     +++|          LOC    LA
00537  M00S00533.ddf     +++| NAM      EQU    *
00538  M00S00534.ddf     +++| .B       ENDIF
00539  M00S00535.ddf     +++|          ENDM   RSOVL
00540  M00S00536.ddf     +++| DDF      SPACE  4,20
00541  M00S00537.ddf     +++|****      ASSEMBLY CONSTANTS.
00542  M00S00538.ddf     +++|
00543  M00S00539.ddf     +++|
00544  M00S00540.ddf     +++| CH       EQU    CHDS        DISPLAY CHANNEL
00545  M00S00541.ddf     +++| D        EQU    5           CPU STATUS WORD
00546  M00S00542.ddf     +++| KBUFL    EQU    32D+2       KEYBOARD BUFFER LENGTH
00547  M00S00543.ddf     +++| NSRA     EQU    6           NUMBER OF SCRATCH REGISTER AREAS
00548  M00S00544.ddf     +++| RCPC     EQU    12D         RIGHT SCREEN - COMMANDS PER COLUMN
00549  M00S00545.ddf     +++| MLPS     EQU    40          MAIN LOOPS PER SECOND ON CC545
00550  M00S00546.ddf     +++|
00551  M00S00547.ddf     +++|
00552  M00S00548.ddf     +++| NAME     MICRO  1,, DDF
00553  M00S00549.ddf     +++| OVLN     MICRO  1,, X
00554  M00S00550.ddf     +++| PNFL     EQU    0           TABLE INDEX FOR LOCAL FNT ACCESS
00555  M00S00551.ddf     +++| .N       SET    0           OVERLAY NUMBER
00556  M00S00552.ddf     +++|          QUAL   PRESET
00557  M00S00553.ddf     +++| .1       SET    0
00558  M00S00554.ddf     +++| .2       SET    0
00559  M00S00555.ddf     +++|          NOREF  .1,.2
00560  M00S00556.ddf     +++| .MRSPL   SET    0           MAXIMUM RIGHT SCREEN PROCESSOR LENGTH
00561  M00S00557.ddf     +++|          NOREF  .MRSPL
00562  M00S00558.ddf     +++| .MCMDL   SET    0           MAXIMUM COMMAND PROCESSOR LENGTH
00563  M00S00559.ddf     +++|          NOREF  .MCMDL
00564  M00S00560.ddf     +++|          QUAL   *
00565  M00S00561.ddf     +++|
00566  M00S00562.ddf     +++|****
00567  M00S00563.ddf     +++|          TITLE  MAIN PROGRAM.
00568  M00S00564.ddf     +++| DDF      SPACE  4,10
00569  M00S00565.ddf     +++|**        DDF - MAIN PROGRAM.
00570  M00S00566.ddf     +++|
00571  M00S00567.ddf     +++|
00572  M00S00568.ddf     +++|          ORG    PPFW
00573  M00S00569.ddf     +++|
00574  M00S00570.ddf     +++| DDF      BSS    0           ENTRY
00575  M00S00571.ddf     +++|          LJM    /PRESET/PRS PRESET PROGRAM
00576  M00S00572.ddf     +++|*         CON    0,**        (IF *DDFILE* NOT LOADED BY PRESET)
00577  M00S00573.ddf     +++|
00578  M00S00574.ddf     +++|*         MAIN LOOP.
00579  M00S00575.ddf     +++|
00580  M00S00576.ddf     +++| DDF1     RJM    DLS         DISPLAY LEFT SCREEN
00581  M00S00577.ddf     +++|          DFIM   (CON RJMI)  PROCESS KEYBOARD FOR 721
00582  M00S00578.ddf     +++|          UJN    *+2
00583  M00S00579.ddf     +++|          CON    PKI
00584  M00S00580.ddf     +++|          RJM    SYS         DISPLAY SYSTEM HEADERS
00585  M00S00581.ddf     +++|          RJM    DRS         DISPLAY RIGHT SCREEN
00586  M00S00582.ddf     +++|          RJM    PSS         PAUSE FOR SYSTEM
00587  M00S00583.ddf     +++|          CFNC   THCF        TRANSFER HIDDEN TO VISIBLE, CLEAR HIDDEN
00588  M00S00584.ddf     +++|          DCN    CH+40
00589  M00S00585.ddf     +++|          RJM    PKI         PROCESS KEYBOARD INPUT
00590  M00S00586.ddf     +++|          RJM    RCP         RECALL COMMAND PROCESSOR IF NECESSARY
00591  M00S00587.ddf     +++|          UJN    DDF1        LOOP
00592  M00S00588.ddf     +++| DPP      SPACE  4,10
00593  M00S00589.ddf     +++|**        DPP - DROP PP.
00594  M00S00590.ddf     +++|
00595  M00S00591.ddf     +++|
00596  M00S00592.ddf     +++| DPP      BSS    0           ENTRY
Line S00001 Modification History
M01 (Added by) ns2618
Seq #  *Modification Id* Act 
----------------------------+
00597  M01S00001.ns2618  +++|          LDN    10          CLEAR *DIS* FLAG
00598  M01S00002.ns2618  +++|          STD    CM+4
00599  M01S00003.ns2618  +++|          LDN    CCTS
00600  M01S00004.ns2618  +++|          STD    CM+1
00601  M01S00005.ns2618  +++|          MONITOR  SJCM
00602  M00S00593.ddf     +++|          MONITOR  DPPM      DROP PP
00603  M00S00594.ddf     +++|          LJM    PPR         EXIT TO PP RESIDENT
00604  M00S00595.ddf     +++| GLOBAL   SPACE  4,10
00605  M00S00596.ddf     +++|*         GLOBAL DATA.
00606  M00S00597.ddf     +++|
00607  M00S00598.ddf     +++|
00608  M00S00599.ddf     +++|          DFIM   (CON C721)
00609  M00S00600.ddf     +++| DCTY     CON    C545        DISPLAY CONSOLE TYPE
00610  M00S00601.ddf     +++|          DFIM   (CON T721)
00611  M00S00602.ddf     +++| CTOS     CON    T545        TOP OF SCREEN
00612  M00S00603.ddf     +++|          DFIM   (CON Y721-YINC)
00613  M00S00604.ddf     +++| CBOS     CON    Y545-YINC   BOTTOM OF SCREEN
00614  M00S00605.ddf     +++|          DFIM   (CON -YINC) SINGLE SPACE FOR 721
00615  M00S00606.ddf     +++| DBLS     CON    -YINC*2     DOUBLE SPACE Y-COORDINATE INCREMENT
00616  M00S00607.ddf     +++|          DFIM   (CON LN08)
00617  M00S00608.ddf     +++| CPFC     CON    LN13        LINE ABOVE FIRST LINE OF PFC
00618  M00S00609.ddf     +++|          TITLE  LEFT SCREEN DISPLAY.
00619  M00S00610.ddf     +++|***       LEFT SCREEN.
00620  M00S00611.ddf     +++|*
00621  M00S00612.ddf     +++|*         THE LEFT SCREEN DISPLAYS INFORMATION ABOUT THE DISK
00622  M00S00613.ddf     +++|*         AND THE CONTROL POINT.  THE LOGICAL ADDRESS ON THE DISK
00623  M00S00614.ddf     +++|*         APPEARS FIRST.  THE LINK BYTE FROM THE TRT FOR
00624  M00S00615.ddf     +++|*         THE CURRENT TRACK IS DISPLAYED AND IS INTENSIFIED IF IT IS
00625  M00S00616.ddf     +++|*         NOT THE SAME AS THE CONTENTS OF THE LINKAGE BYTES.  THE CEN-
00626  M00S00617.ddf     +++|*         TRAL MEMORY ADDRESS, BYTE NUMBER OF THE TRT ENTRY AND
00627  M00S00618.ddf     +++|*         RESERVATION, INTERLOCK, AND PRESERVED FILE STATUSES ARE ALSO
00628  M00S00619.ddf     +++|*         DISPLAYED.
00629  M00S00620.ddf     +++|*
00630  M00S00621.ddf     +++|*         THE FAMILY AND PACK NAMES, AND THE CONTROL POINT
00631  M00S00622.ddf     +++|*         NUMBER AND JSN OF THE ASSOCIATED JOB ARE DISPLAYED.
00632  M00S00623.ddf     +++|*         THE DISK-S PERMITS AND INDIRECT TRACK NUMBERS ARE SHOWN.
00633  M00S00624.ddf     +++|*         IF PRESENT, BOTH CONTROL POINT MESSAGES ARE DISPLAYED.
00634  M00S00625.ddf     +++|*         IF A DISK ERROR OCCURS, THE ERROR CODE RETURNED IN LOCATION
00635  M00S00626.ddf     +++|*         *RDCT* BY THE DRIVER IS DISPLAYED.
00636  M00S00627.ddf     +++|*
00637  M00S00628.ddf     +++|*         THE CONTENTS OF THE SCRATCH REGISTERS, THE PHYSICAL
00638  M00S00629.ddf     +++|*         LOCATION, AND THE HARDWARE STATUS CODE (THE MEANING WILL VARY
00639  M00S00630.ddf     +++|*         DEPENDING ON THE TYPE OF MASS STORAGE) ARE ALSO DISPLAYED.
00640  M00S00631.ddf     +++|*
00641  M00S00632.ddf     +++|*         IF A PACK RECOVERY IS IN PROGRESS, THE TRACK POINTER AND
00642  M00S00633.ddf     +++|*         TRACK RECOVERY WORD ARE DISPLAYED.
00643  M00S00634.ddf     +++| DLS      SPACE  4,15
00644  M00S00635.ddf     +++|**        DLS - DISPLAY LEFT SCREEN.
00645  M00S00636.ddf     +++|*
00646  M00S00637.ddf     +++|*         ENTRY  (RT) = CM RECOVERY DATA TABLE ADDRESS.
00647  M00S00638.ddf     +++|*                       (ZERO IF RECOVERY ROUTINES NOT USED.)
00648  M00S00639.ddf     +++|*
00649  M00S00640.ddf     +++|*         USES   T1, T2, T3, AB - AB+4, CM - CM+4, RC, YC.
00650  M00S00641.ddf     +++|*
00651  M00S00642.ddf     +++|*         CALLS  CTR, DOL, D2S, D4D, D6S, SNT.
00652  M00S00643.ddf     +++|*
00653  M00S00644.ddf     +++|*         MACROS CFNC, DFIM, DISPLA, DISPHD, SFA.
00654  M00S00645.ddf     +++|
00655  M00S00646.ddf     +++|
00656  M00S00647.ddf     +++| DLS      SUBR               ENTRY/EXIT
00657  M00S00648.ddf     +++|          CFNC   SLSF        SELECT LEFT SCREEN, SMALL CHARACTERS
00658  M00S00649.ddf     +++|          DISPHD (DDF.  DISPLAY DISK FILE.)
00659  M00S00650.ddf     +++|          DFIM   (CON LN06),*+1
00660  M00S00651.ddf     +++|          LDC    LN08        OUTPUT COORDINATES
00661  M00S00652.ddf     +++|          STD    YC
00662  M00S00653.ddf     +++|          OAN    CH+40
00663  M00S00654.ddf     +++|          LDD    XC
00664  M00S00655.ddf     +++|          OAN    CH+40
00665  M00S00656.ddf     +++|
00666  M00S00657.ddf     +++|*         DISPLAY DISK ADDRESS DATA.
00667  M00S00658.ddf     +++|
00668  M00S00659.ddf     +++|          DISPLA CH01,,( EST =)
00669  M00S00660.ddf     +++|          LDD    EQ          DISPLAY TOP DIGIT
00670  M00S00661.ddf     +++|          SHN    -6
00671  M00S00662.ddf     +++|          ZJN    DLS1        IF NO UPPER DIGIT
00672  M00S00663.ddf     +++|          ADN    1R0
00673  M00S00664.ddf     +++| DLS1     OAN    CH+40
00674  M00S00665.ddf     +++|          LDD    EQ
00675  M00S00666.ddf     +++|          RJM    D2S         DISPLAY LAST TWO DIGITS
00676  M00S00667.ddf     +++|          DISPLA CH15,,( TK = )
00677  M00S00668.ddf     +++|          LDD    TK
00678  M00S00669.ddf     +++|          RJM    D4D         DISPLAY TRACK NUMBER
00679  M00S00670.ddf     +++|          DISPLA CH30,,(ADDRESS OF TRT =)
00680  M00S00671.ddf     +++|          LDD    TK
00681  M00S00672.ddf     +++|          SHN    -2
00682  M00S00673.ddf     +++| DLSA     ADC    TRTS
00683  M00S00674.ddf     +++|          RJM    D6S         DISPLAY TRT ADDRESS
00684  M00S00675.ddf     +++|          DISPLA ,,(BYTE)
00685  M00S00676.ddf     +++|          LDD    TK
00686  M00S00677.ddf     +++|          LPN    3
00687  M00S00678.ddf     +++|          ADN    1R0
00688  M00S00679.ddf     +++|          OAN    CH+40
00689  M00S00680.ddf     +++|          LCN    YINC        MOVE TO NEXT LINE
00690  M00S00681.ddf     +++|          RAD    YC
00691  M00S00682.ddf     +++|          OAN    CH+40
00692  M00S00683.ddf     +++|          DISPLA CH01,,( TYPE = )
00693  M00S00684.ddf     +++|          SFA    EST,EQ      DISPLAY EQUIPMENT TYPE
00694  M00S00685.ddf     +++|          ADK    EQDE
00695  M00S00686.ddf     +++|          CRD    AB
00696  M00S00687.ddf     +++|          LDD    AB+3
00697  M00S00688.ddf     +++|          OAN    CH+40
00698  M00S00689.ddf     +++|          DISPLA CH15,,( SC = )
00699  M00S00690.ddf     +++|          LDD    SC
00700  M00S00691.ddf     +++|          RJM    D4D         DISPLAY SECTOR NUMBER
00701  M00S00692.ddf     +++|          DISPLA CH30,,(CONTENTS OF TRT = )
00702  M00S00693.ddf     +++|          LDN    0
00703  M00S00694.ddf     +++|          STD    RC
00704  M00S00695.ddf     +++|          RJM    SNT         GET NEXT TRACK LINK
00705  M00S00696.ddf     +++|          STD    T2
00706  M00S00697.ddf     +++|          LDM    BFMS
00707  M00S00698.ddf     +++|          NJN    DLS2        IF NOT EOF/EOI
00708  M00S00699.ddf     +++|          LDM    BFMS+1
00709  M00S00700.ddf     +++| DLS2     SHN    6
00710  M00S00701.ddf     +++|          PJN    DLS3        IF NOT A CHAIN BYTE
00711  M00S00702.ddf     +++|          SHN    -6
00712  M00S00703.ddf     +++|          LMD    T2
00713  M00S00704.ddf     +++|          ZJN    DLS3        IF TRT AND CHAIN BYTE MATCH
00714  M00S00705.ddf     +++|          DFIM   (CFNC BIVF)
00715  M00S00706.ddf     +++|          PSN
00716  M00S00707.ddf     +++|          PSN
00717  M00S00708.ddf     +++|          LDN    3
00718  M00S00709.ddf     +++|          STD    RC
00719  M00S00710.ddf     +++| DLS3     LDC    CH48        OUTPUT X-COORDINATE
00720  M00S00711.ddf     +++|          OAN    CH+40
00721  M00S00712.ddf     +++|          LDD    T2
00722  M00S00713.ddf     +++|          RJM    D4D         OUTPUT VALUE
00723  M00S00714.ddf     +++|          DFIM   (CFNC EIVF)
00724  M00S00715.ddf     +++|          SOD    RC
00725  M00S00716.ddf     +++|          PJN    DLS3        IF REPEAT COUNT NOT COMPLETE
00726  M00S00717.ddf     +++|          PSN
00727  M00S00718.ddf     +++|          PSN
00728  M00S00719.ddf     +++|
00729  M00S00720.ddf     +++|*         DISPLAY TRACK STATUS.
00730  M00S00721.ddf     +++|
00731  M00S00722.ddf     +++|          RJM    CTR         CHECK TRACK RESERVATION BIT
00732  M00S00723.ddf     +++|          STD    T2
00733  M00S00724.ddf     +++|          MJN    DLS4        IF TRACK RESERVED
00734  M00S00725.ddf     +++|          DISPLA CH53,,(NOT),H
00735  M00S00726.ddf     +++| DLS4     DISPLA CH57,,(RESERVED)
00736  M00S00727.ddf     +++|          LCN    YINC
00737  M00S00728.ddf     +++|          RAD    YC
00738  M00S00729.ddf     +++|          OAN    CH+40
00739  M00S00730.ddf     +++|          DISPLA CH01,,( STATE = )
00740  M00S00731.ddf     +++|          LDD    AB
00741  M00S00732.ddf     +++|          LPN    3
00742  M00S00733.ddf     +++|          SHN    1
00743  M00S00734.ddf     +++|          STD    T1
00744  M00S00735.ddf     +++|          LDM    DLSE,T1
00745  M00S00736.ddf     +++|          OAN    CH+40
00746  M00S00737.ddf     +++|          LDM    DLSE+1,T1
00747  M00S00738.ddf     +++|          OAN    CH+40
00748  M00S00739.ddf     +++|          LDD    T2
00749  M00S00740.ddf     +++|          SHN    21-7
00750  M00S00741.ddf     +++|          PJN    DLS6        IF NOT FIRST TRACK PRESERVED FILE
00751  M00S00742.ddf     +++|          DISPLA CH56,,(PRESERVED)
00752  M00S00743.ddf     +++| DLS6     LDD    T2
00753  M00S00744.ddf     +++|          SHN    21-3
00754  M00S00745.ddf     +++|          PJN    DLS7        IF NOT INTERLOCKED
00755  M00S00746.ddf     +++|          LCN    YINC
00756  M00S00747.ddf     +++|          RAD    YC
00757  M00S00748.ddf     +++|          OAN    CH+40
00758  M00S00749.ddf     +++|          DISPLA CH54,,(INTERLOCKED)
00759  M00S00750.ddf     +++|          DFIM   (CON LN11),*+1
00760  M00S00751.ddf     +++| DLS7     LDC    LN15
00761  M00S00752.ddf     +++|          OAN    CH+40
00762  M00S00753.ddf     +++|          SBN    YINC
00763  M00S00754.ddf     +++|          STD    YC
00764  M00S00755.ddf     +++|
00765  M00S00756.ddf     +++|*         DISPLAY FAMILY AND PACK NAMES.
00766  M00S00757.ddf     +++|
00767  M00S00758.ddf     +++|          DISPLA CH01,,(FAMILY = )
00768  M00S00759.ddf     +++|          SFA    EST,PF+4    DISPLAY FAMILY NAME
00769  M00S00760.ddf     +++|          ADK    EQDE
00770  M00S00761.ddf     +++|          CRD    CM
00771  M00S00762.ddf     +++|          LDD    CM+4
00772  M00S00763.ddf     +++|          SHN    3
00773  M00S00764.ddf     +++|          ADK    PFGL
00774  M00S00765.ddf     +++|          CRD    CM
00775  M00S00766.ddf     +++|          LDN    3
00776  M00S00767.ddf     +++|          OAM    CM,CH
00777  M00S00768.ddf     +++|          LDD    CM+3
00778  M00S00769.ddf     +++|          SCN    77
00779  M00S00770.ddf     +++|          OAN    CH+40
00780  M00S00771.ddf     +++|          DISPLA CH22,,( PACK = )
00781  M00S00772.ddf     +++|          LDN    3           DISPLAY PACK NAME
00782  M00S00773.ddf     +++|          OAM    PF,CH
00783  M00S00774.ddf     +++|          LDD    PF+3
00784  M00S00775.ddf     +++|          SCN    77
00785  M00S00776.ddf     +++|          OAN    CH+40
00786  M00S00777.ddf     +++|
00787  M00S00778.ddf     +++|*         DISPLAY CONTROL POINT INFORMATION.
00788  M00S00779.ddf     +++|
00789  M00S00780.ddf     +++|          DISPLA CH42,,( CP = )
00790  M00S00781.ddf     +++|          LDD    CP          DISPLAY CONTROL POINT NUMBER
00791  M00S00782.ddf     +++|          SHN    -7
00792  M00S00783.ddf     +++|          RJM    D2S         DISPLAY TWO DIGITS
00793  M00S00784.ddf     +++|          DISPLA CH55,,(JSN = )
00794  M00S00785.ddf     +++|          LDC    0
00795  M00S00786.ddf     +++| DLSB     EQU    *-1         (ADDRESS OF EJT ENTRY, SET BY *PRS*)
00796  M00S00787.ddf     +++|          CRD    CM
00797  M00S00788.ddf     +++|          LDN    2           DISPLAY JOB SEQUENCE NAME
00798  M00S00789.ddf     +++|          OAM    CM,CH
00799  M00S00790.ddf     +++|
00800  M00S00791.ddf     +++|*         DISPLAY FIRST PERMIT AND DATA TRACK NUMBERS.
00801  M00S00792.ddf     +++|
00802  M00S00793.ddf     +++|          LDD    YC
00803  M00S00794.ddf     +++|          OAN    CH+40
00804  M00S00795.ddf     +++|          DISPLA CH01,,(PERMITS TRACK = )
00805  M00S00796.ddf     +++|          LDD    AB+4
00806  M00S00797.ddf     +++|          SHN    3
00807  M00S00798.ddf     +++|          ADN    ALGL
00808  M00S00799.ddf     +++|          CRD    CM
00809  M00S00800.ddf     +++|          LDD    CM+2
00810  M00S00801.ddf     +++|          RJM    D4D         DISPLAY TRACK NUMBER
00811  M00S00802.ddf     +++|          DISPLA CH26,,( FIRST TRACK INDIRECT CHAIN = )
00812  M00S00803.ddf     +++|          LDD    CM
00813  M00S00804.ddf     +++|          RJM    D4D         DISPLAY TRACK NUMBER
00814  M00S00805.ddf     +++|
00815  M00S00806.ddf     +++|*         DISPLAY CONTROL POINT MESSAGES.
00816  M00S00807.ddf     +++|
00817  M00S00808.ddf     +++|          LCN    YINC*2      OUTPUT COORDINATES
00818  M00S00809.ddf     +++|          RAD    YC
00819  M00S00810.ddf     +++|          OAN    CH+40
00820  M00S00811.ddf     +++|          LDD    XC
00821  M00S00812.ddf     +++|          OAN    CH+40
00822  M00S00813.ddf     +++|          LDD    CP          DISPLAY FIRST MESSAGE LINE
00823  M00S00814.ddf     +++|          ADN    MS1W
00824  M00S00815.ddf     +++|          RJM    DOL         DISPLAY ONE LINE
00825  M00S00816.ddf     +++|          LCN    YINC
00826  M00S00817.ddf     +++|          RAD    YC
00827  M00S00818.ddf     +++|          LDN    2           OUTPUT COORDINATES
00828  M00S00819.ddf     +++|          OAM    XC,CH
00829  M00S00820.ddf     +++|          LDD    CP
00830  M00S00821.ddf     +++|          ADN    MS2W        OUTPUT SECOND MESSAGE LINE
00831  M00S00822.ddf     +++|          RJM    DOL         DISPLAY ONE LINE
00832  M00S00823.ddf     +++|
00833  M00S00824.ddf     +++|*         DISPLAY SCRATCH AREAS.
00834  M00S00825.ddf     +++|
00835  M00S00826.ddf     +++|          LCN    YINC*2      OUTPUT COORDINATES
00836  M00S00827.ddf     +++|          RAD    YC
00837  M00S00828.ddf     +++|          OAN    CH+40
00838  M00S00829.ddf     +++|          DISPLA CH01,,(------------SCRATCH AREAS-------------)
00839  M00S00830.ddf     +++|          LDM    RDCT
Line S00831 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00840  M01S00831.253l688 ---|          LPN    17
Line S00001 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00841  M01S00001.253l688 +++|          LPN    77
00842  M00S00832.ddf     +++|          ZJN    DLS8.1      IF NO ERROR
00843  M00S00833.ddf     +++|          STD    T3
00844  M00S00834.ddf     +++|          DFIM   (CFNC BIVF)
00845  M00S00835.ddf     +++|          PSN
00846  M00S00836.ddf     +++|          PSN
00847  M00S00837.ddf     +++|          LDN    3
00848  M00S00838.ddf     +++|          STD    RC
00849  M00S00839.ddf     +++| DLS8     DISPLA CH44,,(ERROR = )
00850  M00S00840.ddf     +++|          LDM    DLSD,T3
00851  M00S00841.ddf     +++|          OAN    CH+40
00852  M00S00842.ddf     +++|          DFIM   (CFNC EIVF)
00853  M00S00843.ddf     +++|          SOD    RC
00854  M00S00844.ddf     +++|          NJN    DLS8        IF REPEAT COUNT NOT COMPLETE
00855  M00S00845.ddf     +++|          PSN
00856  M00S00846.ddf     +++|          PSN
00857  M00S00847.ddf     +++|          DFIM   (LCN YINC)
00858  M00S00848.ddf     +++| DLS8.1   LCN    YINC*2
00859  M00S00849.ddf     +++|          RAD    YC
00860  M00S00850.ddf     +++|          OAN    CH+40
00861  M00S00851.ddf     +++|          DISPLA CH06,,(EST     TK      SC      COMMENT)
00862  M00S00852.ddf     +++|          LDC    SRA
00863  M00S00853.ddf     +++|          STD    T2
00864  M00S00854.ddf     +++|          LDN    0
00865  M00S00855.ddf     +++|          STD    T3
00866  M00S00856.ddf     +++| DLS9     LCN    YINC
00867  M00S00857.ddf     +++|          RAD    YC
00868  M00S00858.ddf     +++|          OAN    CH+40
00869  M00S00859.ddf     +++|          LDD    XC
00870  M00S00860.ddf     +++|          OAN    CH+40
00871  M00S00861.ddf     +++|          AOD    T3
00872  M00S00862.ddf     +++|          SHN    6
00873  M00S00863.ddf     +++|          OAN    CH+40       DISPLAY SCRATCH AREA LETTER
00874  M00S00864.ddf     +++|          LDI    T2          DISPLAY EST ORDINAL
00875  M00S00865.ddf     +++|          RJM    D6S
00876  M00S00866.ddf     +++|          AOD    T2
00877  M00S00867.ddf     +++|          LDI    T2          DISPLAY TRACK
00878  M00S00868.ddf     +++|          RJM    D6S
00879  M00S00869.ddf     +++|          AOD    T2
00880  M00S00870.ddf     +++|          LDI    T2          DISPLAY SECTOR
00881  M00S00871.ddf     +++|          RJM    D6S
00882  M00S00872.ddf     +++|          LDN    0
00883  M00S00873.ddf     +++|          OAN    CH+40
00884  M00S00874.ddf     +++|          LDN    2           DISPLAY COMMENT
00885  M00S00875.ddf     +++|          RAD    T2
00886  M00S00876.ddf     +++|          LDN    4
00887  M00S00877.ddf     +++|          STD    CM
00888  M00S00878.ddf     +++| DLS10    LDI    T2
00889  M00S00879.ddf     +++|          OAN    CH+40
00890  M00S00880.ddf     +++|          AOD    T2
00891  M00S00881.ddf     +++|          SOD    CM
00892  M00S00882.ddf     +++|          PJN    DLS10       IF MORE COMMENT
00893  M00S00883.ddf     +++|          LDD    T3
00894  M00S00884.ddf     +++|          LMN    NSRA
00895  M00S00885.ddf     +++|          ZJN    DLS11       IF END OF SCRATCH AREAS
00896  M00S00886.ddf     +++|          LJM    DLS9        LOOP FOR REST OF SCRATCH REGISTERS
00897  M00S00887.ddf     +++|
00898  M00S00888.ddf     +++|*         DISPLAY RECOVERY DATA.
00899  M00S00889.ddf     +++|
00900  M00S00890.ddf     +++| DLS11    LDD    RT
00901  M00S00891.ddf     +++|          NJN    DLS12       IF RECOVERY TABLE PRESENT
00902  M00S00892.ddf     +++|          LJM    DLS14       RETURN
00903  M00S00893.ddf     +++|
00904  M00S00894.ddf     +++| DLS12    LCN    YINC*2      OUTPUT COORDINATES
00905  M00S00895.ddf     +++|          RAD    YC
00906  M00S00896.ddf     +++|          OAN    CH+40
00907  M00S00897.ddf     +++|          DISPLA CH01,,(TRACK POINTER = )
00908  M00S00898.ddf     +++|          LDD    RA
00909  M00S00899.ddf     +++|          ADD    RT
00910  M00S00900.ddf     +++|          SHN    6
00911  M00S00901.ddf     +++| DLSC     ADN    RCPW        READ POINTER WORD
00912  M00S00902.ddf     +++|*         ADN    ICPW        IF BUILDING INDIRECT CHAIN
00913  M00S00903.ddf     +++|*         ADN    BSPW        IF IN *BLDSTRT.*
00914  M00S00904.ddf     +++|          CRD    CM
00915  M00S00905.ddf     +++|          LDD    CM
00916  M00S00906.ddf     +++|          RJM    D4D         DISPLAY TRACK POINTER
00917  M00S00907.ddf     +++|          LCN    YINC        OUTPUT COORDINATES
00918  M00S00908.ddf     +++|          RAD    YC
00919  M00S00909.ddf     +++|          OAN    CH+40
00920  M00S00910.ddf     +++|          DISPLA CH01,,(TRACK RECOVERY WORD = )
00921  M00S00911.ddf     +++|          LDD    RA
00922  M00S00912.ddf     +++|          ADD    RT
00923  M00S00913.ddf     +++|          SHN    6
00924  M00S00914.ddf     +++|          ADD    TK
00925  M00S00915.ddf     +++|          ADC    TRCT-4000
00926  M00S00916.ddf     +++|          CRD    CM
00927  M00S00917.ddf     +++|          LDN    CM
00928  M00S00918.ddf     +++|          STD    T3
00929  M00S00919.ddf     +++| DLS13    LDN    0
00930  M00S00920.ddf     +++|          OAN    CH+40
00931  M00S00921.ddf     +++|          LDI    T3
00932  M00S00922.ddf     +++|          RJM    D4D         DISPLAY FOUR DIGITS
00933  M00S00923.ddf     +++|          AOD    T3
00934  M00S00924.ddf     +++|          SBN    CM+5
00935  M00S00925.ddf     +++|          MJN    DLS13       IF MORE OF WORD TO DISPLAY
00936  M00S00926.ddf     +++| DLS14    FJM    *,CH        IF CHANNEL FULL, WAIT
00937  M00S00927.ddf     +++|          DCN    CH+40
00938  M00S00928.ddf     +++|          LJM    DLSX        RETURN
00939  M00S00929.ddf     +++|
00940  M00S00930.ddf     +++|
00941  M00S00931.ddf     +++|          LIST   G
00942  M00S00932.ddf     +++| DLSD     EQU    *-1
00943  M00S00933.ddf     +++|          ECHO   1,ERRCODE=("DREC")
00944  M00S00934.ddf     +++|          CON    EMN._ERRCODE  "TXT._ERRCODE" ERROR
00945  M00S00935.ddf     +++|          LIST   *
00946  M00S00936.ddf     +++|
00947  M00S00937.ddf     +++| DLSE     BSS    0
00948  M00S00938.ddf     +++|          DATA   4HON
00949  M00S00939.ddf     +++|          DATA   4HIDLE
00950  M00S00940.ddf     +++|          DATA   4HOFF
00951  M00S00941.ddf     +++|          DATA   4HDOWN
00952  M00S00942.ddf     +++|          TITLE  RIGHT SCREEN DISPLAY.
00953  M00S00943.ddf     +++|***       RIGHT SCREEN.
00954  M00S00944.ddf     +++|*                THE RIGHT SCREEN DISPLAYS THE CONTENTS OF THE DISK
00955  M00S00945.ddf     +++|*         SECTOR.  THE BYTE NUMBERS ARE THE ACTUAL BYTE NUMBERS FOR
00956  M00S00946.ddf     +++|*         THE PHYSICAL DISK SECTOR (I.E. BYTES 0 AND 1 ARE THE CONTROL
00957  M00S00947.ddf     +++|*         BYTES).  THESE BYTE NUMBERS ARE USED IN THE MEMORY CHANGING
00958  M00S00948.ddf     +++|*         COMMANDS.
00959  M00S00949.ddf     +++|*
00960  M00S00950.ddf     +++|*                THE RIGHT SCREEN IS CHANGED WITH THE RIGHT BLANK OR
00961  M00S00951.ddf     +++|*         TAB KEY.  FOR SOME DISPLAYS THE */* INCREMENTS THE ADDRESSES
00962  M00S00952.ddf     +++|*         DISPLAYED.
00963  M00S00953.ddf     +++| DRS      SPACE  4,15
00964  M00S00954.ddf     +++|**        DRS - DISPLAY RIGHT SCREEN.
00965  M00S00955.ddf     +++|*
00966  M00S00956.ddf     +++|*         ENTRY  (RS) = INDEX INTO TABLE OF RIGHT SCREEN DISPLAYS.
00967  M00S00957.ddf     +++|*                RIGHT SCREEN SELECTED - SMALL CHARACTERS.
00968  M00S00958.ddf     +++|*                CHANNEL ACTIVE.
00969  M00S00959.ddf     +++|*
00970  M00S00960.ddf     +++|*         EXIT   TO DISPLAY ROUTINE.
00971  M00S00961.ddf     +++|*                (T3) = BFMS, BUFFER ADDRESS.
00972  M00S00962.ddf     +++|*
00973  M00S00963.ddf     +++|*         USES   T3.
00974  M00S00964.ddf     +++|*
00975  M00S00965.ddf     +++|*         CALLS  LDO, RIGHT SCREEN PROCESSORS.
00976  M00S00966.ddf     +++|
00977  M00S00967.ddf     +++|
00978  M00S00968.ddf     +++| DRS2     FJM    *,CH        IF CHANNEL FULL, WAIT UNTIL EMPTY
00979  M00S00969.ddf     +++|          DCN    CH+40
00980  M00S00970.ddf     +++|
00981  M00S00971.ddf     +++| DRS      SUBR               ENTRY/EXIT
00982  M00S00972.ddf     +++|          LDM    DRSB        CHECK FOR OVERLAY LOADED
00983  M00S00973.ddf     +++|          LMD    RS
00984  M00S00974.ddf     +++|          ZJN    DRS1        IF DISPLAY UNCHANGED
00985  M00S00975.ddf     +++|          LDD    RS
00986  M00S00976.ddf     +++|          RJM    LDO         LOAD DISPLAY OVERLAY
00987  M00S00977.ddf     +++| DRS1     LDC    BFMS        SET BUFFER ADDRESS
00988  M00S00978.ddf     +++|          STD    T3
00989  M00S00979.ddf     +++|          LJM    **          JUMP TO DISPLAY PROCESSOR
00990  M00S00980.ddf     +++|*         LJM    RSPLA       (NOT FORMATTED DISPLAY)
00991  M00S00981.ddf     +++|*         LJM    DFD         (IF FORMATTED DISPLAY)
00992  M00S00982.ddf     +++| DRSA     EQU    *-1         OVERLAY CONTROL WORD FROM CM TABLE
00993  M00S00983.ddf     +++|
00994  M00S00984.ddf     +++|
00995  M00S00985.ddf     +++|*         CONTROL WORD FROM CM TABLE = (DRSA).
00996  M00S00986.ddf     +++|
00997  M00S00987.ddf     +++|*DRSA     DATA   0           ADDRESS OF LOADED DISPLAY PROCESSOR
00998  M00S00988.ddf     +++|          DATA   0           PROCESSOR LENGTH
00999  M00S00989.ddf     +++|          CON    0,0
01000  M00S00990.ddf     +++|          DATA   0           DISPLAY INDEX
01001  M00S00991.ddf     +++|          ERRNZ  *-DRSA-5    CONTROL WORD MUST BE FIVE BYTES
01002  M00S00992.ddf     +++|
01003  M00S00993.ddf     +++| DRSB     CON    MXDI        CURRENTLY LOADED RIGHT SCREEN DISPLAY ID
01004  M00S00994.ddf     +++|*                            (PRESET TO ILLEGAL ID FOR INITIALIZATION)
01005  M00S00995.ddf     +++|
01006  M00S00996.ddf     +++|
01007  M00S00997.ddf     +++| DIS      HERE               DISPLAY DATA
01008  M00S00998.ddf     +++|
01009  M00S00999.ddf     +++| RSPLA    BSS    0           RIGHT SCREEN PROCESSOR LOAD ADDRESS
01010  M00S01000.ddf     +++|          TITLE  CENTRAL MEMORY RESIDENT TABLES.
01011  M00S01001.ddf     +++|          USE    PRESET
01012  M00S01002.ddf     +++|          QUAL   PRESET
01013  M00S01003.ddf     +++|**        CM TABLES.
01014  M00S01004.ddf     +++|*
01015  M00S01005.ddf     +++| TCEF     SPACE  4,15
01016  M00S01006.ddf     +++|**        TCEF - TABLE OF COMMAND ENTRY FORMATS.
01017  M00S01007.ddf     +++|*
01018  M00S01008.ddf     +++|*         VFD    96/Z*SYNTAX*
01019  M00S01009.ddf     +++|*         VFD    6/L,1/0,5/OVL,12/PP ADDR
01020  M00S01010.ddf     +++|*
01021  M00S01011.ddf     +++|*         AFTER LOAD TO CM
01022  M00S01012.ddf     +++|*         VFD    96/Z*SYNTAX*
01023  M00S01013.ddf     +++|*         VFD    6/L,1/1,17/CM ADDR
01024  M00S01014.ddf     +++|*
01025  M00S01015.ddf     +++|*                L   = COMMAND PROCESSOR LENGTH (CM WORDS).
01026  M00S01016.ddf     +++|*                OVL = LAST CHARACTER OF OVERLAY NAME.
01027  M00S01017.ddf     +++|*                PP/CM ADDR = ADDRESS OF PROCESSOR.
01028  M00S01018.ddf     +++|
01029  M00S01019.ddf     +++|
01030  M00S01020.ddf     +++| TCEF     BSS    0
01031  M00S01021.ddf     +++|          LOC    0
01032  M00S01022.ddf     +++| ARD      ENTER  (AUTOREAD.)
01033  M00S01023.ddf     +++| BTR      ENTER  (BEGINR.)
01034  M00S01024.ddf     +++| BEI      ENTER  (BLDEOI.)
01035  M00S01025.ddf     +++| BLS      ENTER  (BLDSL.)
01036  M00S01026.ddf     +++| BRS      ENTER  (BLDSTRT.)
01037  M00S01027.ddf     +++| BOT      ENTER  (BOT.)
01038  M00S01028.ddf     +++| CTB      ENTER  (CTB.)
01039  M00S01029.ddf     +++| DEP      ENTER  (DEP.)
01040  M00S01030.ddf     +++| DIS      ENTER  (DIS.)
01041  M00S01031.ddf     +++| DRP      ENTER  (DROP.)
01042  M00S01032.ddf     +++| DTK      ENTER  (DTK.)
01043  M00S01033.ddf     +++| EEP      ENTER  (EEP.)
01044  M00S01034.ddf     +++| EET      ENTER  (EJT.)
01045  M00S01035.ddf     +++| EST      ENTER  (EST.)
01046  M00S01036.ddf     +++| EFO      ENTER  (FAMILY.)
01047  M00S01037.ddf     +++| FPE      ENTER  (FIND.)
01048  M00S01038.ddf     +++| FIS      ENTER  (FINDISS.)
01049  M00S01039.ddf     +++| FOV      ENTER  (FINDO.)
01050  M00S01040.ddf     +++| FST      ENTER  (FINDS.)
01051  M00S01041.ddf     +++| FSS      ENTER  (FINDSS.)
01052  M00S01042.ddf     +++| EFB      ENTER  (FNT.)
01053  M00S01043.ddf     +++| EFL      ENTER  (FNTL.)
01054  M00S01044.ddf     +++| EFC      ENTER  (FNTLC.)
01055  M00S01045.ddf     +++| GTT      ENTER  (GETTRT.)
01056  M00S01046.ddf     +++| HOL      ENTER  (HOLD.)
01057  M00S01047.ddf     +++| LSA      ENTER  (LOAD.)
01058  M00S01048.ddf     +++| NAT      ENTER  (NEXTAT.)
01059  M00S01049.ddf     +++| NSS      ENTER  (NEXTSS.)
01060  M00S01050.ddf     +++| EPN      ENTER  (PACKNAM.)
01061  M00S01051.ddf     +++| PRD      ENTER  (PREAD.)
01062  M00S01052.ddf     +++| PTK      ENTER  (PTK.)
01063  M00S01053.ddf     +++| PWT      ENTER  (PWRITE.)
01064  M00S01054.ddf     +++| EIT      ENTER  (QFT.)
01065  M00S01055.ddf     +++| ERA      ENTER  (RANDOM.)
01066  M00S01056.ddf     +++| REC      ENTER  (RECOVER.)
01067  M00S01057.ddf     +++| SCN      ENTER  (SCAN.)
01068  M00S01058.ddf     +++| ELS      ENTER  (SC.*.)
01069  M00S01059.ddf     +++| ESC      ENTER  (SC.)
01070  M00S01060.ddf     +++| SRW      ENTER  (SETRW.)
01071  M00S01061.ddf     +++| STP      ENTER  (SETTP.)
01072  M00S01062.ddf     +++| SPF      ENTER  (SHOWPF.)
01073  M00S01063.ddf     +++| SKE      ENTER  (SKIPEI.)
01074  M00S01064.ddf     +++| SKF      ENTER  (SKIPF.)
01075  M00S01065.ddf     +++| SKR      ENTER  (SKIPR.)
01076  M00S01066.ddf     +++| STB      ENTER  (STB.)
01077  M00S01067.ddf     +++| SSA      ENTER  (STORE.)
01078  M00S01068.ddf     +++| ETK      ENTER  (TK.)
01079  M00S01069.ddf     +++| SCT      ENTER  (UI.)
01080  M00S01070.ddf     +++| WRT      ENTER  (WRITE.)
01081  M00S01071.ddf     +++|
01082  M00S01072.ddf     +++| TCEFA    ENTER  ( ),DUMMY  LISTING FILE COMMANDS
01083  M00S01073.ddf     +++| CLF      ENTER  (LISTING.)
01084  M00S01074.ddf     +++| OUT      ENTER  (OUT.)
01085  M00S01075.ddf     +++| PRT      ENTER  (PRINT.)
01086  M00S01076.ddf     +++| RET      ENTER  (RETURN.)
01087  M00S01077.ddf     +++| REW      ENTER  (REWIND.)
01088  M00S01078.ddf     +++| SID      ENTER  (SETID.)
01089  M00S01079.ddf     +++| SKL      ENTER  (SKIPL.)
01090  M00S01080.ddf     +++|
01091  M00S01081.ddf     +++| .END     ENTER  ,DUMMY      END OF TABLE
01092  M00S01082.ddf     +++|          QUAL
01093  M00S01083.ddf     +++|          LOC    *O
01094  M00S01084.ddf     +++| .1       SET    *-/PRESET/TCEF
01095  M00S01085.ddf     +++| TCEFL    EQU    .1/5        LENGTH OF TABLE
01096  M00S01086.ddf     +++|          QUAL   *
01097  M00S01087.ddf     +++| TDPO     SPACE  4,10
01098  M00S01088.ddf     +++|**        TCRO - TABLE OF CENTRAL RESIDENT OVERLAYS.
01099  M00S01089.ddf     +++|*
01100  M00S01090.ddf     +++|*         VFD    12/ENTRY,12/L,24/ADDR,12/DI
01101  M00S01091.ddf     +++|*
01102  M00S01092.ddf     +++|*                ENTRY = PROCESSOR ENTRY ADDRESS.
01103  M00S01093.ddf     +++|*                L = PROCESSOR LENGTH IN CM WORDS.
01104  M00S01094.ddf     +++|*                    (L=0 IF NOT AN OVERLAY)
01105  M00S01095.ddf     +++|*                ADDR = PP ADDRESS OF CODE BEFORE LOADED TO CM.
01106  M00S01096.ddf     +++|*                     = CM ADDRESS AFTER PRESET.
01107  M00S01097.ddf     +++|*                DI = OPTION (USUALLY A BUFFER INDEX).
01108  M00S01098.ddf     +++|
01109  M00S01099.ddf     +++|
01110  M00S01100.ddf     +++| TCRO     BSS    0
01111  M00S01101.ddf     +++|          LOC    0
01112  M00S01102.ddf     +++| DFB      RSDEF              DISPLAY SECTOR - FIVE BYTES/LINE
01113  M00S01103.ddf     +++| DTB      RSDEF              DISPLAY SECTOR - TEN BYTES/LINE
01114  M00S01104.ddf     +++| DTX      RSDEF              DISPLAY SECTOR - TEXT
01115  M00S01105.ddf     +++| DLC      RSDEF              DISPLAY LEGAL COMMANDS
01116  M00S01106.ddf     +++| DFD      RSDEF              DISPLAY SECTOR - FORMATTED
01117  M00S01107.ddf     +++| DSS      RSDEF              DISPLAY SYSTEM SECTOR FOR *DFD*
01118  M00S01108.ddf     +++| DPE      RSDEF              DISPLAY PFC SECTOR FOR *DFD*
01119  M00S01109.ddf     +++| DEI      RSDEF              DISPLAY EOI SECTOR FOR *DFD*
01120  M00S01110.ddf     +++| MXDO     EQU    *           MAXIMUM DISPLAY OVERLAY INDEX+1
01121  M00S01111.ddf     +++| TAR      ACRDEF             TABLE ACCESS ROUTINES (EJT, FNT, QFT)
01122  M00S01112.ddf     +++| LRR      ACRDEF             LABEL/TRT RECONSTRUCTION SUBROUTINES
01123  M00S01113.ddf     +++|          QUAL
01124  M00S01114.ddf     +++|          LOC    *O
01125  M00S01115.ddf     +++| TCRO     EQU    0+TCEFL     CM ADDRESS OF TABLE
01126  M00S01116.ddf     +++| MXDI     EQU    DFDN+1      MAXIMUM DISPLAY INDEX FOR DISPLAY TOGGLE
01127  M00S01117.ddf     +++| .1       SET    *-/PRESET/TCRO
01128  M00S01118.ddf     +++| TCROL    EQU    .1/5        TABLE LENGTH IN CM WORDS
01129  M00S01119.ddf     +++|          SPACE  4,10
01130  M00S01120.ddf     +++| .1       SET    *-/PRESET/TCEF
01131  M00S01121.ddf     +++| CMTL     EQU    .1/5        CM TABLE AREA LENGTH
01132  M00S01122.ddf     +++|          QUAL   *
01133  M00S01123.ddf     +++| .CMTL    SET    CMTL        ACCUMULATE TOTAL CM REQUIRED
01134  M00S01124.ddf     +++|          TITLE  LOAD COMMAND PROCESSORS.
01135  M00S01125.ddf     +++| LCP      SPACE  4,15
01136  M00S01126.ddf     +++|**        LCP - LOAD COMMAND PROCESSORS.
01137  M00S01127.ddf     +++|*
01138  M00S01128.ddf     +++|*         ENTRY  FROM PRS.
01139  M00S01129.ddf     +++|*                (AB+3 - AB+4) = CM LOAD ADDRESS COMMAND PROCESSORS.
01140  M00S01130.ddf     +++|*                (RC) = 1.
01141  M00S01131.ddf     +++|*                (TA) = CM FWA FOR TABLES.
01142  M00S01132.ddf     +++|*
01143  M00S01133.ddf     +++|*         EXIT   TO RESIDENT OVERLAY PRESET.
01144  M00S01134.ddf     +++|*
01145  M00S01135.ddf     +++|*         USES   AB, AB+3, AB+4, RC, T1.
01146  M00S01136.ddf     +++|*
01147  M00S01137.ddf     +++|*         CALLS  EXR, PSS.
01148  M00S01138.ddf     +++|
01149  M00S01139.ddf     +++|
01150  M00S01140.ddf     +++| LCP3     LDC    CMTL        WRITE TABLES TO CM
01151  M00S01141.ddf     +++|          STD    T1
01152  M00S01142.ddf     +++|          LDD    RA
01153  M00S01143.ddf     +++|          ADD    TA
01154  M00S01144.ddf     +++|          SHN    6
01155  M00S01145.ddf     +++|          CWM    TCEF,T1
01156  M00S01146.ddf     +++|          LDC    3R8"OVLN"A  LOAD RESIDENT ROUTINES OVERLAY
01157  M00S01147.ddf     +++|          RJM    EXR         EXECUTE OVERLAY
01158  M00S01148.ddf     +++|
01159  M00S01149.ddf     +++| LCP      BSS    0
01160  M00S01150.ddf     +++| LCP1     RJM    PSS         PAUSE FOR SYSTEM
01161  M00S01151.ddf     +++|          AOD    RC          ADVANCE OVERLAY NAME
01162  M00S01152.ddf     +++|          SBN    .L+1
01163  M00S01153.ddf     +++|          PJN    LCP3        IF ALL COMMAND OVERLAYS LOADED
01164  M00S01154.ddf     +++|          LDD    RC          LOAD NEXT OVERLAY
01165  M00S01155.ddf     +++|          ADC    2L8"OVLN"
01166  M00S01156.ddf     +++|          RJM    EXR         EXECUTE OVERLAY
01167  M00S01157.ddf     +++|          LDC    TCEF-2      SET COMMAND TABLE ADDRESS
01168  M00S01158.ddf     +++|          STD    AB
01169  M00S01159.ddf     +++| LCP2     LDN    2           CHECK NEXT COMMAND
01170  M00S01160.ddf     +++|          RAD    AB
01171  M00S01161.ddf     +++|          LDI    AB
01172  M00S01162.ddf     +++|          ZJN    LCP1        IF END OF COMMAND TABLE
01173  M00S01163.ddf     +++|          LDN    10          ADVANCE TO OVERLAY ID
01174  M00S01164.ddf     +++|          RAD    AB
01175  M00S01165.ddf     +++|          LDI    AB
01176  M00S01166.ddf     +++|          SHN    21-5
01177  M00S01167.ddf     +++|          MJN    LCP2        IF PROCESSOR ALREADY LOADED
01178  M00S01168.ddf     +++|          STD    T1
01179  M00S01169.ddf     +++|          SHN    5-21
01180  M00S01170.ddf     +++|          LPN    37
01181  M00S01171.ddf     +++|          LMD    RC
01182  M00S01172.ddf     +++|          NJN    LCP2        IF COMMAND PROCESSOR NOT IN THIS OVERLAY
01183  M00S01173.ddf     +++|          LDM    1,AB        SET PP MEMORY ADDRESS
01184  M00S01174.ddf     +++|          STM    LCPA
01185  M00S01175.ddf     +++|          LDI    AB          SET CM ADDRESS INTO TABLE
01186  M00S01176.ddf     +++|          SCN    77
01187  M00S01177.ddf     +++|          LMD    AB+3
01188  M00S01178.ddf     +++|          LMN    40
01189  M00S01179.ddf     +++|          STI    AB
01190  M00S01180.ddf     +++|          LDD    AB+4
01191  M00S01181.ddf     +++|          STM    1,AB
01192  M00S01182.ddf     +++|          LDD    AB+3        WRITE PROCESSOR TO CM
01193  M00S01183.ddf     +++|          SHN    6
01194  M00S01184.ddf     +++|          ADD    RA
01195  M00S01185.ddf     +++|          SHN    6
01196  M00S01186.ddf     +++|          ADD    AB+4
01197  M00S01187.ddf     +++|          CWM    **,T1
01198  M00S01188.ddf     +++| LCPA     EQU    *-1         (PP ADDRESS OF PROCESSOR)
01199  M00S01189.ddf     +++|          LDD    T1          UPDATE CM ADDRESS
01200  M00S01190.ddf     +++|          RAD    AB+4
01201  M00S01191.ddf     +++|          SHN    -14
01202  M00S01192.ddf     +++|          RAD    AB+3
01203  M00S01193.ddf     +++|          LJM    LCP2        LOOP
01204  M00S01194.ddf     +++| PSS      SPACE  4,10
01205  M00S01195.ddf     +++|**        PSS - PAUSE FOR SYSTEM.
01206  M00S01196.ddf     +++|*
01207  M00S01197.ddf     +++|*         EXIT   TO *PPR*, IF ERROR FLAG SET.
01208  M00S01198.ddf     +++|*                (CM+1) = 0 IF ERROR FLAG NOT SET.
01209  M00S01199.ddf     +++|*
01210  M00S01200.ddf     +++|*         MACROS MONITOR, PAUSE.
01211  M00S01201.ddf     +++|
01212  M00S01202.ddf     +++|
01213  M00S01203.ddf     +++| PSS      SUBR               ENTRY/EXIT
01214  M00S01204.ddf     +++|          PAUSE
01215  M00S01205.ddf     +++|          LDD    CM+1
01216  M00S01206.ddf     +++|          ZJN    PSSX        IF ERROR FLAG NOT SET
01217  M00S01207.ddf     +++|          MONITOR  DPPM      DROP PP
01218  M00S01208.ddf     +++|          LJM    PPR         EXIT
01219  M00S01209.ddf     +++| OVL      SPACE  4,10
01220  M00S01210.ddf     +++|**        OVL - COMMAND PROCESSOR OVERLAY LOAD ADDRESS.
01221  M00S01211.ddf     +++|
01222  M00S01212.ddf     +++|
01223  M00S01213.ddf     +++| OVL      EQU    *+5
01224  M00S01214.ddf     +++|          TITLE  PRESET PROGRAM.
01225  M00S01215.ddf     +++| PRS      SPACE  4,10
01226  M00S01216.ddf     +++|**        PRS - PRESET PROGRAM.
01227  M00S01217.ddf     +++|*
01228  M00S01218.ddf     +++|*         EXIT   TO PPR IF ANY ERRORS.
01229  M00S01219.ddf     +++|*                TO LCP TO CONTINUE PRESET.
01230  M00S01220.ddf     +++|*                (AB+3 - AB+4) = CM LOAD ADDRESS COMMAND PROCESSORS.
01231  M00S01221.ddf     +++|*                (RC) = 1.
01232  M00S01222.ddf     +++|*                (TA) = CM FWA FOR TABLES.
01233  M00S01223.ddf     +++|*                (DDF) = 0, IF *DDFILE* NOT LOADED.
01234  M00S01224.ddf     +++|*
01235  M00S01225.ddf     +++|*         USES   CM - CM+4.
01236  M00S01226.ddf     +++|*
01237  M00S01227.ddf     +++|*         CALLS  DFM, CUA, PSS.
01238  M00S01228.ddf     +++|*
01239  M00S01229.ddf     +++|*         MACROS EXECUTE, MONITOR, PAUSE.
01240  M00S01230.ddf     +++|
01241  M00S01231.ddf     +++|
01242  M00S01232.ddf     +++| PRS      BSS    0
Line S00006 Modification History
M01 (Added by) ns2618
Seq #  *Modification Id* Act 
----------------------------+
01243  M01S00006.ns2618  +++|          RJM    CUA         CHECK USER ACCESS
01244  M01S00007.ns2618  +++|          NJN    PRS0        IF JOB HAS NO SYSTEM ORIGIN PRIVILEGES
01245  M00S01233.ddf     +++|          LDK    SSML
01246  M00S01234.ddf     +++|          CRD    CM
01247  M00S01235.ddf     +++|          LDD    CM
01248  M00S01236.ddf     +++|          LPN    7
01249  M00S01237.ddf     +++|          ZJN    PRS1        IF UNSECURED SYSTEM
01250  M00S01238.ddf     +++|          LDK    SSTL
01251  M00S01239.ddf     +++|          CRD    CM
01252  M00S01240.ddf     +++|          LDD    CM
01253  M00S01241.ddf     +++|          SHN    21-11
01254  M00S01242.ddf     +++|          MJN    PRS1        IF *SECURITY-UNLOCK* SET
Line S01243 Modification History
M01 (Removed by) ns2618
Seq #  *Modification Id* Act 
----------------------------+
01255  M01S01243.ns2618  ---|          LDC    PRSE        * INCORRECT USER ACCESS.*
Line S00008 Modification History
M01 (Added by) ns2618
Seq #  *Modification Id* Act 
----------------------------+
01256  M01S00008.ns2618  +++| PRS0     LDC    PRSE        * INCORRECT USER ACCESS.*
01257  M00S01244.ddf     +++|          RJM    DFM         SEND DAYFILE MESSAGE
Line S00001 Modification History
M01 (Added by) ddf3
Seq #  *Modification Id* Act 
----------------------------+
01258  M01S00001.ddf3    +++|          MONITOR ABTM
01259  M00S01245.ddf     +++|          LJM    PPR         EXIT
01260  M00S01246.ddf     +++|
01261  M00S01247.ddf     +++| PRS1     LDN    1           PRESET OVERLAY COUNTER
01262  M00S01248.ddf     +++|          STD    RC
Line S01249 Modification History
M01 (Removed by) ns2618
Seq #  *Modification Id* Act 
----------------------------+
01263  M01S01249.ns2618  ---|          LDN    IRSI
01264  M01S01250.ns2618  ---|          STD    CM+4
01265  M01S01251.ns2618  ---|          LDN    SSIS        SET ID TO INHIBIT ROLLOUT
01266  M01S01252.ns2618  ---|          STD    CM+1
01267  M01S01253.ns2618  ---|          MONITOR  SJCM
01268  M00S01254.ddf     ---|          LDN    10
01269  M00S01255.ddf     ---|          STD    CM+4
01270  M00S01256.ddf     ---|          LDN    SCTS        SET *DIS* FLAG
01271  M00S01257.ddf     ---|          STD    CM+1
01272  M00S01258.ddf     ---|          MONITOR  SJCM
01273  M00S01259.ddf     ---| PRS2     RJM    PSS         PAUSE FOR SYSTEM
01274  M00S01260.ddf     ---|          LDD    FL
01275  M00S01261.ddf     ---|          NJN    PRS3        IF NONZERO FIELD LENGTH
01276  M00S01262.ddf     ---|          LDN    ZERL
01277  M00S01263.ddf     ---|          CRD    CM
01278  M00S01264.ddf     ---|          AOD    CM+1        REQUEST MEMORY
01279  M00S01265.ddf     ---|          MONITOR  RSTM
01280  M00S01266.ddf     ---|          UJN    PRS2        LOOP
01281  M00S01267.ddf     ---|
Line S01268 Modification History
M01 (Removed by) ddf5
Seq #  *Modification Id* Act 
----------------------------+
01282  M01S01268.ddf5    ---| PRS3     LDN    ZERL        CLEAR CPU READY FLAG
Line S00001 Modification History
M01 (Added by) ddf5
Seq #  *Modification Id* Act 
----------------------------+
01283  M01S00001.ddf5    +++| PRS3     RJM    PSS         PAUSE FOR SYSTEM
01284  M01S00002.ddf5    +++|          LDN    ZERL        CLEAR CPU READY FLAG
01285  M00S01269.ddf     +++|          CRD    CM
01286  M00S01270.ddf     +++|          LDD    RA
01287  M00S01271.ddf     +++|          SHN    6
01288  M00S01272.ddf     +++|          ADN    D
01289  M00S01273.ddf     +++|          CWD    CM
01290  M00S01274.ddf     +++|          LDD    CP          WRITE CONTROL CARD TO MESSAGE AREA
01291  M00S01275.ddf     +++|          ADN    MS1W
01292  M00S01276.ddf     +++|          CWM    PRSB,ON
01293  M00S01277.ddf     +++|          CWD    CM
01294  M00S01278.ddf     +++|          ADN    TFSW-MS1W-1 FETCH EJT ORDINAL
01295  M00S01279.ddf     +++|          CRD    CM
01296  M00S01280.ddf     +++|          SFA    EJT,CM
01297  M00S01281.ddf     +++|          STD    CM+4        SET ADDRESS OF EJT ENTRY
01298  M00S01282.ddf     +++|          STM    DLSB
01299  M00S01283.ddf     +++|          SHN    -14
01300  M00S01284.ddf     +++|          STD    CM+3
01301  M00S01285.ddf     +++|          RAM    DLSB-1
01302  M00S01286.ddf     +++|          LDN    0
01303  M00S01287.ddf     +++|          STD    CM+2
01304  M00S01288.ddf     +++|          LDN    1S5+1       SET JOB ADVANCE
01305  M00S01289.ddf     +++|          STD    CM+1
01306  M00S01290.ddf     +++|          LDD    MA
01307  M00S01291.ddf     +++|          CWM    PRSF,ON
01308  M00S01292.ddf     +++|          MONITOR  UTEM
01309  M01S00003.ddf5    +++|          LDD    CM+1        CHECK *UTEM* RESPONSE
01310  M01S00004.ddf5    +++|          NJP    PRS3        IF REJECT
01311  M00S01293.ddf     +++|          RJM    PSS         PAUSE
01312  M00S01294.ddf     +++|          LDN    ZERL
01313  M00S01295.ddf     +++|          CRD    CM
01314  M00S01296.ddf     +++|          LDD    MA          CALL *1AJ* WITH CONTROL CARD IN MS1W
01315  M00S01297.ddf     +++|          CWM    PRSC,ON
01316  M00S01298.ddf     +++|          CWD    CM
01317  M00S01299.ddf     +++|          EXECUTE  1AJ,=
01318  M00S01300.ddf     +++|          MONITOR  RPPM
01319  M00S01301.ddf     +++|          LDD    CM+1
01320  M00S01302.ddf     +++|          ZJN    PRS5        IF PP NOT ASSIGNED
Line S01303 Modification History
M01 (Removed by) ns2618
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01321  M02S01303.271l716 ---|          LDN    60
Line S01304 Modification History
M01 (Removed by) ns2618
Seq #  *Modification Id* Act 
----------------------------+
01322  M01S01304.ns2618  ---|          STD    CM+4
01323  M01S01305.ns2618  ---|          LDN    CPRS        SET CPU PRIORITY
01324  M01S01306.ns2618  ---|          STD    CM+1
01325  M01S01307.ns2618  ---|          MONITOR  SJCM
01326  M00S01308.ddf     ---| PRS4     PAUSE              WAIT UNTIL CPU READY
01327  M00S01309.ddf     ---|          LDD    CM+1
01328  M00S01310.ddf     ---|          ZJN    PRS6        IF ERROR FLAG NOT SET
01329  M00S01311.ddf     ---| PRS5     LDN    0           DISABLE LISTING FILE COMMANDS
01330  M00S01312.ddf     ---|          STM    TCEFA
01331  M00S01313.ddf     ---|          STM    DDF         INDICATE *DDFILE* NOT LOADED
01332  M00S01314.ddf     ---|          STD    CM+1        CLEAR ERROR FLAG
01333  M00S01315.ddf     ---|          MONITOR  CEFM
01334  M00S01316.ddf     ---|          LDN    ZERL
01335  M00S01317.ddf     ---|          UJN    PRS7        REQUEST STORAGE FOR COMMAND PROCESSORS
01336  M00S01318.ddf     ---|
01337  M00S01319.ddf     ---| PRS6     LDD    RA          READ CPU READY FLAG
01338  M00S01320.ddf     ---|          SHN    6
01339  M00S01321.ddf     ---|          ADN    D
01340  M00S01322.ddf     ---|          CRD    CM
01341  M00S01323.ddf     ---|          LDD    CM
01342  M00S01324.ddf     ---|          ZJN    PRS4        IF NOT READY
01343  M00S01325.ddf     ---|
01344  M00S01326.ddf     ---|*         REQUEST FL FOR COMMAND PROCESORS.
01345  M00S01327.ddf     ---|
01346  M00S01328.ddf     ---|          LDD    RA          GET LWA+1 OF DDFILE
01347  M00S01329.ddf     ---|          SHN    6
01348  M00S01330.ddf     ---|          ADN    D-1
01349  M00S01331.ddf     ---| PRS7     CRD    AB
01350  M00S01332.ddf     ---|          LDD    AB+3
01351  M00S01333.ddf     ---|          SHN    14
01352  M00S01334.ddf     ---|          ADD    AB+4
01353  M00S01335.ddf     ---|          ADN    77
01354  M00S01336.ddf     ---|          SHN    -6
01355  M00S01337.ddf     ---|          STD    TA          SET CM TABLE ADDRESS
01356  M00S01338.ddf     ---|          SHN    6
01357  M00S01339.ddf     ---|          ADC    TCMTL+77    CM FL INCREASE REQUIRED
01358  M00S01340.ddf     ---|          SHN    -6
01359  M00S01341.ddf     ---|          STD    AB          (AB) = REQUIRED FL
01360  M00S01342.ddf     ---|          LDD    CP
01361  M00S01343.ddf     ---|          ADN    MS1W
01362  M00S01344.ddf     ---|          CWM    PRSD,TR     * WAITING FOR MEMORY.*
01363  M00S01345.ddf     ---| PRS8     LDN    ZERL
01364  M00S01346.ddf     ---|          CRD    CM
01365  M00S01347.ddf     ---|          LDD    AB          REQUEST STORAGE
01366  M00S01348.ddf     ---|          STD    CM+1
01367  M00S01349.ddf     ---|          MONITOR  RSTM
01368  M00S01350.ddf     ---|          RJM    PSS         PAUSE
01369  M00S01351.ddf     ---|          LDD    AB
01370  M00S01352.ddf     ---|          LMD    FL
01371  M00S01353.ddf     ---|          NJN    PRS8        IF MEMORY NOT OBTAINED
01372  M00S01354.ddf     ---|
01373  M00S01355.ddf     ---|*         LOAD DISPLAY PROCESSOR OVERLAYS TO CM.
01374  M00S01356.ddf     ---|
01375  M00S01357.ddf     ---|          LDD    TA          INITIALIZE OVERLAY ADDRESS POINTER
01376  M00S01358.ddf     ---|          SHN    6
01377  M00S01359.ddf     ---|          ADC    CMTL
01378  M00S01360.ddf     ---|          STD    AB+4
01379  M00S01361.ddf     ---|          SHN    -14
01380  M00S01362.ddf     ---|          STD    AB+3
01381  M00S01363.ddf     ---|          LDN    0
01382  M00S01364.ddf     ---|          STD    AB
01383  M00S01365.ddf     ---| PRS9     LDM    TCRO+1,AB   SET WORD COUNT
01384  M00S01366.ddf     ---|          ZJN    PRS10       IF NOT AN OVERLAY
01385  M00S01367.ddf     ---|          STD    T1
01386  M00S01368.ddf     ---|          LDM    TCRO+3,AB   SET PP MEMORY ADDRESS
01387  M00S01369.ddf     ---|          STM    PRSA
01388  M00S01370.ddf     ---|          LDD    AB+3        SET CM ADDRESS INTO TABLE
01389  M00S01371.ddf     ---|          STM    TCRO+2,AB
01390  M00S01372.ddf     ---|          LDD    AB+4
01391  M00S01373.ddf     ---|          STM    TCRO+3,AB
01392  M00S01374.ddf     ---|          LDD    AB+3        WRITE PROCESSOR TO CM
01393  M00S01375.ddf     ---|          SHN    6
01394  M00S01376.ddf     ---|          ADD    RA
01395  M00S01377.ddf     ---|          SHN    6
01396  M00S01378.ddf     ---|          ADD    AB+4
01397  M00S01379.ddf     ---|          CWM    **,T1
01398  M00S01380.ddf     ---| PRSA     EQU    *-1         (PP ADDRESS OF PROCESSOR)
01399  M00S01381.ddf     ---|          LDD    T1          UPDATE CM ADDRESS
01400  M00S01382.ddf     ---|          RAD    AB+4
01401  M00S01383.ddf     ---|          SHN    -14
01402  M00S01384.ddf     ---|          RAD    AB+3
01403  M00S01385.ddf     ---| PRS10    LDN    5           ADVANCE INDEX
01404  M00S01386.ddf     ---|          RAD    AB
01405  M00S01387.ddf     ---|          SBN    MXDO*5
01406  M00S01388.ddf     ---|          PJN    PRS11       IF END OF TABLE
01407  M00S01389.ddf     ---|          LJM    PRS9        LOOP
01408  M00S01390.ddf     ---| PRS11    LJM    LCP         LOAD COMMAND PROCESSORS FROM OVERLAYS
01409  M00S01391.ddf     ---|
01410  M00S01392.ddf     ---|
01411  M00S01393.ddf     ---| PRSB     VFD    48/8L$DDFILE.,12/0
01412  M00S01394.ddf     ---| PRSC     VFD    18/3R1AJ,6/0,12/2,12/0,12/4
01413  M00S01395.ddf     ---| PRSD     DATA   C* WAITING FOR MEMORY.*
01414  M00S01396.ddf     ---| PRSE     DATA   C* INCORRECT USER ACCESS.*
01415  M00S01397.ddf     ---| PRSF     VFD    12/1,6/6,42/1   SET JOB ADVANCE
01416  M00S01398.ddf     ---|          SPACE  4,10
01417  M00S01399.ddf     ---|**        PRESET COMMON DECKS.
01418  M00S01400.ddf     ---|
01419  M00S01401.ddf     ---|
01420  M00S01402.ddf     ---| QUAL$    EQU    0           DONT REQUALIFY COMMON DECKS
01421  M00S01403.ddf     ---|*CALL     COMPCUA
01422  M00S01404.ddf     ---| EJT$     EQU    0           DEFINE *COMPGFP* ACCESS TO EJT
01423  M00S01405.ddf     ---|*CALL     COMPGFP
01424  M00S01406.ddf     ---|
01425  M00S01407.ddf     ---|
01426  M00S01408.ddf     ---|          QUAL   *           RESUME UNQUALIFIED DEFINITIONS
01427  M00S01409.ddf     ---|          TITLE  RIGHT SCREEN DISPLAY PROCESSOR CM RESIDENT OVERLAYS.
01428  M00S01410.ddf     ---| DFB      SPACE  4,10
01429  M00S01411.ddf     ---|***              FIVE BYTES PER LINE.
01430  M00S01412.ddf     ---|*                THE CONTENTS OF THE SECTOR ARE DISPLAYED BY CENTRAL
01431  M00S01413.ddf     ---|*                MEMORY WORD.  THE BYTE NUMBERS ARE DISPLAYED IN
01432  M00S01414.ddf     ---|*                PARENTHESIS AFTER THE CENTRAL MEMORY WORD NUMBER.
01433  M00S01415.ddf     ---|*                THE */* IS USED TO TOGGLE BETWEEN THE FIRST AND
01434  M00S01416.ddf     ---|*                SECOND HALF OF THE SECTOR.  THE NUMBER OF WORDS
01435  M00S01417.ddf     ---|*                DISPLAYED IS DETERMINED BY THE WORD COUNT IN THE
01436  M00S01418.ddf     ---|*                CONTROL BYTES.
01437  M00S01419.ddf     ---| DFB      SPACE  4,15
01438  M00S01420.ddf     ---|**        DFB - DISPLAY FIVE BYTES/LINE.
01439  M00S01421.ddf     ---|*
01440  M00S01422.ddf     ---|*         ENTRY  CONSOLE FUNCTIONED FOR RIGHT SCREEN.
01441  M00S01423.ddf     ---|*                (DRSA - DRSA+4) = PROCESSOR CONTROL WORD.
01442  M00S01424.ddf     ---|*                (T3) = BUFFER ADDRESS.
01443  M00S01425.ddf     ---|*
01444  M00S01426.ddf     ---|*         EXIT   TO DRS2.
01445  M00S01427.ddf     ---|*
01446  M00S01428.ddf     ---|*         USES   T3, YC, AB - AB+4.
01447  M00S01429.ddf     ---|*
01448  M00S01430.ddf     ---|*         CALLS  DMW, D4D, SPP.
01449  M00S01431.ddf     ---|*
01450  M00S01432.ddf     ---|*         MACROS DISPLA.
01451  M00S01433.ddf     ---|
01452  M00S01434.ddf     ---|
01453  M00S01435.ddf     ---| DFB      RSOVL  RSPLA
01454  M00S01436.ddf     ---|          DISPHD (DDF.  5 BYTES/LINE.)
01455  M00S01437.ddf     ---|          LDM    CTOS        SET TOP OF SCREEN
01456  M00S01438.ddf     ---|          OAN    CH+40
01457  M00S01439.ddf     ---|          SBN    YINC
01458  M00S01440.ddf     ---|          STD    YC
01459  M00S01441.ddf     ---|          DISPLA CH01,,(LINKAGE BYTES = )
01460  M00S01442.ddf     ---|          LDI    T3          DISPLAY CONTROL BYTES
01461  M00S01443.ddf     ---|          RJM    D4D         DISPLAY FOUR DIGITS
01462  M00S01444.ddf     ---|          LDN    0
01463  M00S01445.ddf     ---|          OAN    CH+40
01464  M00S01446.ddf     ---|          LDM    BFMS+1
01465  M00S01447.ddf     ---|          RJM    D4D         DISPLAY FOUR DIGITS
01466  M00S01448.ddf     ---|          RJM    SPP         SET PAGE PARAMETERS
01467  M00S01449.ddf     ---|          ZJN    DFB1        IF NO WORDS TO DISPLAY
01468  M00S01450.ddf     ---|          STD    AB+4
01469  M00S01451.ddf     ---|          LDM    BFMS+1      NUMBER OF WORDS IN SECTOR
01470  M00S01452.ddf     ---|          SBD    AB          - FIRST WORD NUMBER
01471  M00S01453.ddf     ---|          MJN    DFB4        IF NO DATA TO BE DISPLAYED
01472  M00S01454.ddf     ---|          SBD    AB+4        - PAGE SIZE
01473  M00S01455.ddf     ---|          PJN    DFB2        IF FULL PAGE TO BE DISPLAYED
01474  M00S01456.ddf     ---|          RAD    AB+4        ADJUST WORD COUNT TO DISPLAY
01475  M00S01457.ddf     ---| DFB1     ZJN    DFB4        IF NO DATA TO DISPLAY
01476  M00S01458.ddf     ---| DFB2     LCN    YINC        ADVANCE Y-COORDINATE
01477  M00S01459.ddf     ---|          RAD    YC
01478  M00S01460.ddf     ---|          LDD    AB          SET LAST WORD NUMBER + 1
01479  M00S01461.ddf     ---|          ADN    10
01480  M00S01462.ddf     ---|          STD    AB+1
01481  M00S01463.ddf     ---|          LCN    10          DECREMENT WORDS TO DISPLAY
01482  M00S01464.ddf     ---|          RAD    AB+4
01483  M00S01465.ddf     ---|          PJN    DFB3        IF FULL GROUP TO BE DISPLAYED
01484  M00S01466.ddf     ---|          RAD    AB+1        ADJUST LAST WORD NUMBER
01485  M00S01467.ddf     ---|          LDN    0
01486  M00S01468.ddf     ---|          STD    AB+4
01487  M00S01469.ddf     ---| DFB3     LDD    AB          SET FIRST BYTE NUMBER
01488  M00S01470.ddf     ---|          SHN    2           FIRST WORD NUMBER * 5
01489  M00S01471.ddf     ---|          STD    AB+2
01490  M00S01472.ddf     ---|          LDD    AB
01491  M00S01473.ddf     ---|          ADN    2           + 2
01492  M00S01474.ddf     ---|          RAD    AB+2        = FIRST BYTE NUMBER
01493  M00S01475.ddf     ---|          LDN    0           SET DISPLAY MODE
01494  M00S01476.ddf     ---|          STD    AB+3
01495  M00S01477.ddf     ---|          RJM    DMW         DISPLAY MEMORY WORDS
01496  M00S01478.ddf     ---|          LDD    AB+4
01497  M00S01479.ddf     ---|          NJN    DFB2        IF MORE WORDS TO DISPLAY
01498  M00S01480.ddf     ---| DFB4     LJM    DRS2        EXIT
01499  M00S01481.ddf     ---|
01500  M00S01482.ddf     ---|
01501  M00S01483.ddf     ---| DIS      HERE
01502  M00S01484.ddf     ---| DTB      SPACE  4,10
01503  M00S01485.ddf     ---|***              TEN BYTES PER LINE.
01504  M00S01486.ddf     ---|*                THE CONTENTS OF THE SECTOR ARE DISPLAYED 10B BYTES PER
01505  M00S01487.ddf     ---|*                LINE.  THE ENTIRE SECTOR IS DISPLAYED ON THE SCREEN
01506  M00S01488.ddf     ---|*                WITH BYTE NUMBERS.
01507  M00S01489.ddf     ---| DTB      SPACE  4,15
01508  M00S01490.ddf     ---|**        DTB - DISPLAY TEN BYTES/LINE
01509  M00S01491.ddf     ---|*
01510  M00S01492.ddf     ---|*         ENTRY  CONSOLE FUNCTIONED FOR RIGHT SCREEN.
01511  M00S01493.ddf     ---|*                (DRSA - DRSA+4) = PROCESSOR CONTROL WORD.
01512  M00S01494.ddf     ---|*                (T3) = BUFFER ADDRESS.
01513  M00S01495.ddf     ---|*
01514  M00S01496.ddf     ---|*         EXIT   TO DRS2.
01515  M00S01497.ddf     ---|*
01516  M00S01498.ddf     ---|*         USES   T2, T3, XC, YC.
01517  M00S01499.ddf     ---|*
01518  M00S01500.ddf     ---|*         CALLS  D4D, ODC.
01519  M00S01501.ddf     ---|
01520  M00S01502.ddf     ---|
01521  M00S01503.ddf     ---| DTB      RSOVL  RSPLA
01522  M00S01504.ddf     ---|          DISPHD (DDF.  10B BYTES/LINE.)
01523  M00S01505.ddf     ---|          LDC    LN05
01524  M00S01506.ddf     ---|          STD    YC
01525  M00S01507.ddf     ---|          LDM    DCTY        SET FIRST BYTE NUMBER
01526  M00S01508.ddf     ---|          SBK    C545
01527  M00S01509.ddf     ---|          ZJN    DTB1        IF CC545 CONSOLE
01528  M00S01510.ddf     ---|          LDN    0           CLEAR BOTTOM OF SCREEN ADJUSTMENT
01529  M00S01511.ddf     ---|          STM    DTBA
01530  M00S01512.ddf     ---|          LDM    DRSA+4      CHECK PAGE NUMBER FOR 721
01531  M00S01513.ddf     ---|          LPN    1
01532  M00S01514.ddf     ---|          ZJN    DTB1        IF FIRST PAGE
01533  M00S01515.ddf     ---|          LDC    250         SET FIRST BYTE SECOND PAGE
01534  M00S01516.ddf     ---| DTB1     STD    T2
01535  M00S01517.ddf     ---|
01536  M00S01518.ddf     ---|*         OUTPUT ONE LINE.
01537  M00S01519.ddf     ---|
01538  M00S01520.ddf     ---| DTB2     LDN    2           OUTPUT COORDINATES
01539  M00S01521.ddf     ---|          OAM    XC,CH
01540  M00S01522.ddf     ---|          LDD    T2
01541  M00S01523.ddf     ---|          RJM    D4D         DISPLAY BYTE NUMBER
01542  M00S01524.ddf     ---|          LDN    7*XINC
01543  M00S01525.ddf     ---| DTB3     RAD    XC          OUTPUT X-COORDINATE
01544  M00S01526.ddf     ---|          OAN    CH+40
01545  M00S01527.ddf     ---|          LDM    BFMS,T2
01546  M00S01528.ddf     ---|          RJM    D4D         DISPLAY CONTENTS OF BYTE
01547  M00S01529.ddf     ---|          AOD    T2
01548  M00S01530.ddf     ---|          LPN    7
01549  M00S01531.ddf     ---|          ZJN    DTB4        IF END OF LINE
01550  M00S01532.ddf     ---|          LDN    5*XINC
01551  M00S01533.ddf     ---|          UJN    DTB3        LOOP TO DISPLAY REST OF LINE
01552  M00S01534.ddf     ---|
01553  M00S01535.ddf     ---|*         OUTPUT DISPLAY CODE FOR LINE.
01554  M00S01536.ddf     ---|
01555  M00S01537.ddf     ---| DTB4     OAN    CH+40
01556  M00S01538.ddf     ---|          LDC    CH01        RESET X-COORDINATE
01557  M00S01539.ddf     ---|          STD    XC
01558  M00S01540.ddf     ---|          LDC    BFMS-10     SET ADDRESS OF FIRST BYTE
01559  M00S01541.ddf     ---|          ADD    T2
01560  M00S01542.ddf     ---|          STD    T3
01561  M00S01543.ddf     ---|          LDN    10          BYTES TO DISPLAY
01562  M00S01544.ddf     ---|          RJM    ODC         OUTPUT DISPLAY CODE
01563  M00S01545.ddf     ---|          LDD    T2
01564  M00S01546.ddf     ---|          LPN    77
01565  M00S01547.ddf     ---|          NJN    DTB5        IF NOT NEW BLOCK
01566  M00S01548.ddf     ---|
01567  M00S01549.ddf     ---|*         ADVANCE Y-COORDINATE.
01568  M00S01550.ddf     ---|
01569  M00S01551.ddf     ---|          LCN    YINC
01570  M00S01552.ddf     ---|          RAD    YC
01571  M00S01553.ddf     ---| DTB5     LCN    YINC
01572  M00S01554.ddf     ---|          RAD    YC
01573  M00S01555.ddf     ---|          SBM    CBOS
01574  M00S01556.ddf     ---| DTBA     ADN    YINC*4
01575  M00S01557.ddf     ---|          MJN    DTB8        IF AT BOTTOM OF SCREEN
01576  M00S01558.ddf     ---|          LDC    500-1       CHECK FOR END OF DISPLAY
01577  M00S01559.ddf     ---|          SBD    T2
01578  M00S01560.ddf     ---|          MJN    DTB6        IF AT BOTTOM OF SCREEN
01579  M00S01561.ddf     ---|          LJM    DTB2        LOOP
01580  M00S01562.ddf     ---|
01581  M00S01563.ddf     ---|*         DISPLAY LAST TWO BYTES.
01582  M00S01564.ddf     ---|
01583  M00S01565.ddf     ---| DTB6     LDN    2           OUTPUT COORDINATES
01584  M00S01566.ddf     ---|          OAM    XC,CH
01585  M00S01567.ddf     ---|          LDD    T2          DISPLAY BYTE NUMBER
01586  M00S01568.ddf     ---|          RJM    D4D
01587  M00S01569.ddf     ---|          LDN    7*XINC
01588  M00S01570.ddf     ---| DTB7     RAD    XC          OUTPUT X-COORDINATE
01589  M00S01571.ddf     ---|          OAN    CH+40
01590  M00S01572.ddf     ---|          LDM    BFMS,T2     DISPLAY CONTENTS OF BYTE
01591  M00S01573.ddf     ---|          RJM    D4D
01592  M00S01574.ddf     ---|          AOD    T2
01593  M00S01575.ddf     ---|          LPN    1
01594  M00S01576.ddf     ---|          ZJN    DTB9        IF BOTH BYTES DISPLAYED
01595  M00S01577.ddf     ---|          LDN    5*XINC
01596  M00S01578.ddf     ---|          UJN    DTB7        LOOP TO DISPLAY REST OF LINE
01597  M00S01579.ddf     ---|
01598  M00S01580.ddf     ---| DTB8     UJN    DTB10       RETURN
01599  M00S01581.ddf     ---|
01600  M00S01582.ddf     ---| DTB9     LDC    CH49        OUTPUT DISPLAY CODE FOR LAST 2 BYTES
01601  M00S01583.ddf     ---|          OAN    CH+40
01602  M00S01584.ddf     ---|          LDC    BFMS+500
01603  M00S01585.ddf     ---|          STD    T3
01604  M00S01586.ddf     ---|          LDN    2
01605  M00S01587.ddf     ---|          RJM    ODC
01606  M00S01588.ddf     ---|          LDC    CH01        RESET X-COORDINATE
01607  M00S01589.ddf     ---|          STD    XC
01608  M00S01590.ddf     ---| DTB10    LJM    DRS2        RETURN
01609  M00S01591.ddf     ---|
01610  M00S01592.ddf     ---|
01611  M00S01593.ddf     ---| DIS      HERE
01612  M00S01594.ddf     ---| DTX      SPACE  4,10
01613  M00S01595.ddf     ---|***              TEXT.
01614  M00S01596.ddf     ---|*                DISPLAYS THE CONTENTS OF THE SECTOR IN TEXT MODE.
01615  M00S01597.ddf     ---|*                THE AMOUNT OF TEXT TO DISPLAY IS DETERMINED BY THE
01616  M00S01598.ddf     ---|*                WORD COUNT IN THE CONTROL BYTES.
01617  M00S01599.ddf     ---| DTX      SPACE  4,15
01618  M00S01600.ddf     ---|**        DTX - DISPLAY TEXT.
01619  M00S01601.ddf     ---|*
01620  M00S01602.ddf     ---|*         ENTRY  CONSOLE FUNCTIONED FOR RIGHT SCREEN.
01621  M00S01603.ddf     ---|*                (DRSA - DRSA+4) = PROCESSOR CONTROL WORD.
01622  M00S01604.ddf     ---|*                (T3) = BUFFER ADDRESS.
01623  M00S01605.ddf     ---|*
01624  M00S01606.ddf     ---|*         EXIT   TO DRS2.
01625  M00S01607.ddf     ---|*
01626  M00S01608.ddf     ---|*         USES   T1, T2, T3, AB, YC.
01627  M00S01609.ddf     ---|*
01628  M00S01610.ddf     ---|*         CALLS  ODC.
01629  M00S01611.ddf     ---|
01630  M00S01612.ddf     ---|
01631  M00S01613.ddf     ---| DTX      RSOVL  RSPLA
01632  M00S01614.ddf     ---|          DISPHD (DDF.  TEXT MODE DISPLAY.)
01633  M00S01615.ddf     ---|          LDM    CTOS
01634  M00S01616.ddf     ---|          ADN    YINC
01635  M00S01617.ddf     ---|          STD    YC
01636  M00S01618.ddf     ---|          LDM    BFMS        SET WORD COUNT
01637  M00S01619.ddf     ---|          NJN    DTX2        IF DATA TO DISPLAY
01638  M00S01620.ddf     ---| DTX1     LJM    DTX7        RETURN
01639  M00S01621.ddf     ---|
01640  M00S01622.ddf     ---| DTX2     LDM    BFMS+1
01641  M00S01623.ddf     ---|          STD    AB
01642  M00S01624.ddf     ---|          LDM    DCTY        SET FIRST BYTE NUMBER
01643  M00S01625.ddf     ---|          SBK    C545
01644  M00S01626.ddf     ---|          ZJN    DTX3        IF CC545 CONSOLE
01645  M00S01627.ddf     ---|          LDM    DRSA+4      CHECK PAGE NUMBER FOR 721
01646  M00S01628.ddf     ---|          LPN    1
01647  M00S01629.ddf     ---|          ZJN    DTX3        IF FIRST PAGE
01648  M00S01630.ddf     ---|          LDC    -40         DECREMENT NUMBER OF WORDS TO DISPLAY
01649  M00S01631.ddf     ---|          RAD    AB
01650  M00S01632.ddf     ---|          MJN    DTX1        IF NO WORDS TO DISPLAY
01651  M00S01633.ddf     ---|          LDC    240         SET FIRST BYTE SECOND PAGE
01652  M00S01634.ddf     ---| DTX3     ADN    2
01653  M00S01635.ddf     ---|          RAD    T3          FIRST BYTE TO DISPLAY
01654  M00S01636.ddf     ---|          LDN    0
01655  M00S01637.ddf     ---|          STD    T1
01656  M00S01638.ddf     ---| DTX4     LDD    XC
01657  M00S01639.ddf     ---| DTX5     OAN    CH+40
01658  M00S01640.ddf     ---|          LCN    YINC
01659  M00S01641.ddf     ---|          RAD    YC
01660  M00S01642.ddf     ---|          SBM    CBOS
01661  M00S01643.ddf     ---|          MJN    DTX7        IF BOTTOM OF SCREEN REACHED
01662  M00S01644.ddf     ---|          LDD    YC
01663  M00S01645.ddf     ---|          OAN    CH+40
01664  M00S01646.ddf     ---|          LDN    0           INITIALIZE LINE WORD COUNT
01665  M00S01647.ddf     ---|          STD    T2
01666  M00S01648.ddf     ---| DTX6     LDD    T1
01667  M00S01649.ddf     ---|          SBD    AB
01668  M00S01650.ddf     ---|          ZJN    DTX7        IF ALL WORDS DISPLAYED
01669  M00S01651.ddf     ---|          LDN    5
01670  M00S01652.ddf     ---|          RJM    ODC         OUTPUT DISPLAY CODE WORD
01671  M00S01653.ddf     ---|          AOD    T1
01672  M00S01654.ddf     ---|          LDM    -1,T3
01673  M00S01655.ddf     ---|          ZJN    DTX4        IF END OF TEXT LINE
01674  M00S01656.ddf     ---|          AOD    T2
01675  M00S01657.ddf     ---|          SBN    5
01676  M00S01658.ddf     ---|          NJN    DTX6        IF NOT END OF SCREEN LINE
01677  M00S01659.ddf     ---|          LDC    CH05        CONTINUE ON NEXT LINE OF SCREEN
01678  M00S01660.ddf     ---|          UJN    DTX5        LOOP FOR REST OF LINE
01679  M00S01661.ddf     ---|
01680  M00S01662.ddf     ---| DTX7     LJM    DRS2        RETURN
01681  M00S01663.ddf     ---|
01682  M00S01664.ddf     ---|
01683  M00S01665.ddf     ---| DIS      HERE
01684  M00S01666.ddf     ---| DLC      SPACE  4,10
01685  M00S01667.ddf     ---|***              LEGAL COMMANDS.
01686  M00S01668.ddf     ---|*                DISPLAYS A LIST OF THE DDF COMMANDS.
01687  M00S01669.ddf     ---| DLC      SPACE  4,15
01688  M00S01670.ddf     ---|**        DLC - DISPLAY LEGAL COMMANDS.
01689  M00S01671.ddf     ---|*
01690  M00S01672.ddf     ---|*         ENTRY  CONSOLE FUNCTIONED FOR RIGHT SCREEN.
01691  M00S01673.ddf     ---|*                (DRSA - DRSA+4) = PROCESSOR CONTROL WORD.
01692  M00S01674.ddf     ---|*                (TA) = ADDRESS OF COMMAND TABLE IN CM.
01693  M00S01675.ddf     ---|*
01694  M00S01676.ddf     ---|*         EXIT   TO DRS2.
01695  M00S01677.ddf     ---|*
01696  M00S01678.ddf     ---|*         USES   T2, DK, RC, XC, YC, AB - AB+4.
01697  M00S01679.ddf     ---|*
01698  M00S01680.ddf     ---|*         CALLS  DOL.
01699  M00S01681.ddf     ---|
01700  M00S01682.ddf     ---|
01701  M00S01683.ddf     ---| DLC      RSOVL  RSPLA
01702  M00S01684.ddf     ---|          DISPHD (DDF.  LEGAL COMMANDS.)
01703  M00S01685.ddf     ---|          LDN    0           INITIALIZE COMMAND INDEX
01704  M00S01686.ddf     ---|          STD    DK
01705  M00S01687.ddf     ---| DLC1     LDM    CTOS
01706  M00S01688.ddf     ---|          STD    YC
01707  M00S01689.ddf     ---|          LDN    RCPC        COMMANDS PER COLUMN
01708  M00S01690.ddf     ---|          STD    RC
01709  M00S01691.ddf     ---| DLC2     LDN    2           OUTPUT COORDINATES
01710  M00S01692.ddf     ---|          OAM    XC,CH
01711  M00S01693.ddf     ---|          LDD    RA          GET ADDRESS OF COMMAND
01712  M00S01694.ddf     ---|          ADD    TA
01713  M00S01695.ddf     ---|          SHN    6
01714  M00S01696.ddf     ---|          ADD    DK
01715  M00S01697.ddf     ---|          ADN    2           CHECK NEXT COMMAND
01716  M00S01698.ddf     ---|          CRD    AB
01717  M00S01699.ddf     ---|          SBN    2
01718  M00S01700.ddf     ---|          RJM    DOL         DISPLAY COMMAND
01719  M00S01701.ddf     ---|          LDD    AB          CHECK NEXT COMMAND
01720  M00S01702.ddf     ---|          ZJN    DLC3        IF END OF COMMANDS
01721  M00S01703.ddf     ---|          LCN    YINC        ADVANCE Y-COORDINATE
01722  M00S01704.ddf     ---|          RAD    YC
01723  M00S01705.ddf     ---|          LDN    2           ADVANCE COMMAND INDEX
01724  M00S01706.ddf     ---|          RAD    DK
01725  M00S01707.ddf     ---|          SOD    RC
01726  M00S01708.ddf     ---|          NJN    DLC2        IF NOT END OF COLUMN
01727  M00S01709.ddf     ---|          LDC    13D*XINC    ADVANCE X-COORDINATE
01728  M00S01710.ddf     ---|          RAD    XC
01729  M00S01711.ddf     ---|          UJN    DLC1        START NEXT COLUMN
01730  M00S01712.ddf     ---|
01731  M00S01713.ddf     ---| DLC3     LDM    DCTY        RESET COORDINATES
01732  M00S01714.ddf     ---|          SBK    C545
01733  M00S01715.ddf     ---|          ZJN    DLC4        IF CC545 CONSOLE
01734  M00S01716.ddf     ---|          LDN    3*YINC
01735  M00S01717.ddf     ---| DLC4     SBK    3*YINC+RCPC*YINC
01736  M00S01718.ddf     ---|          ADM    CTOS
01737  M00S01719.ddf     ---|          STD    YC
01738  M00S01720.ddf     ---|          LDC    CH01
01739  M00S01721.ddf     ---|          STD    XC
01740  M00S01722.ddf     ---|
01741  M00S01723.ddf     ---|*         OUTPUT SPECIAL CHARACTER COMMANDS.
01742  M00S01724.ddf     ---|
01743  M00S01725.ddf     ---|          LDC    DLCA-1
01744  M00S01726.ddf     ---|          STD    T2
01745  M00S01727.ddf     ---| DLC5     LCN    YINC
01746  M00S01728.ddf     ---|          RAD    YC
01747  M00S01729.ddf     ---|          LDN    2
01748  M00S01730.ddf     ---|          OAM    XC,CH
01749  M00S01731.ddf     ---| DLC6     AOD    T2          DISPLAY LINE
01750  M00S01732.ddf     ---|          LDI    T2
01751  M00S01733.ddf     ---|          OAN    CH+40
01752  M00S01734.ddf     ---|          LPN    77
01753  M00S01735.ddf     ---|          NJN    DLC6        IF NOT END OF LINE
01754  M00S01736.ddf     ---|          LDM    1,T2
01755  M00S01737.ddf     ---|          NJN    DLC5        IF MORE LINES TO DISPLAY
01756  M00S01738.ddf     ---|          LJM    DRS2        RETURN
01757  M00S01739.ddf     ---|
01758  M00S01740.ddf     ---|
01759  M00S01741.ddf     ---| DLCA     BSS    0
01760  M00S01742.ddf     ---|          DATA   Z*+   INCREMENT SECTOR.*
01761  M00S01743.ddf     ---|          DATA   Z*-   DECREMENT SECTOR.*
01762  M00S01744.ddf     ---|          DATA   Z*.   ADVANCE PAST END OF TRACK, ZERO SECTOR.*
01763  M00S01745.ddf     ---|          DATA   Z*,   ADVANCE TO NEXT TRACK IN CHAIN.*
01764  M00S01746.ddf     ---|          DATA   Z*=   ADVANCE PAST EOI.*
01765  M00S01747.ddf     ---|          DATA   Z*8   INCREMENT TRACK.*
01766  M00S01748.ddf     ---|          DATA   Z*9   DECREMENT TRACK.*
01767  M00S01749.ddf     ---|          DATA   Z*/   ADVANCE RIGHT SCREEN.*
01768  M00S01750.ddf     ---|          DATA   Z*SPACE - READ CURRENT SECTOR.*
01769  M00S01751.ddf     ---|          DATA   Z*RIGHT BLANK OR TAB - CHANGE RIGHT DISPLAY.*
01770  M00S01752.ddf     ---|          CON    0
01771  M00S01753.ddf     ---|
01772  M00S01754.ddf     ---|
01773  M00S01755.ddf     ---| DIS      HERE
01774  M00S01756.ddf     ---| DFD      SPACE  4,20
01775  M00S01757.ddf     ---|**        DFD - DISPLAY FORMATTED DATA.
01776  M00S01758.ddf     ---|*
01777  M00S01759.ddf     ---|*         DETERMINES SECTOR TYPE AND CALLS APPROPRIATE FORMATTING
01778  M00S01760.ddf     ---|*         DISPLAY PROCESSOR.
01779  M00S01761.ddf     ---|*
01780  M00S01762.ddf     ---|*         ENTRY  CONSOLE FUNCTIONED FOR RIGHT SCREEN.
01781  M00S01763.ddf     ---|*                (DRSA - DRSA+4) = PROCESSOR CONTROL WORD.
01782  M00S01764.ddf     ---|*                (T3) = BUFFER ADDRESS.
01783  M00S01765.ddf     ---|*
01784  M00S01766.ddf     ---|*         EXIT   TO DRS2.
01785  M00S01767.ddf     ---|*
01786  M00S01768.ddf     ---|*         USES   AB.
01787  M00S01769.ddf     ---|*
01788  M00S01770.ddf     ---|*         CALLS  DEI, DPE, DSS, D4D, LDO.
01789  M00S01771.ddf     ---|*
01790  M00S01772.ddf     ---|*         MACROS DISPLA.
01791  M00S01773.ddf     ---|
01792  M00S01774.ddf     ---|
01793  M00S01775.ddf     ---| DFD      RSOVL  RSPLA
01794  M00S01776.ddf     ---|          DISPHD (DDF.  FORMATTED DISPLAY.)
01795  M00S01777.ddf     ---|          LDM    CTOS
01796  M00S01778.ddf     ---|          OAN    CH+40
01797  M00S01779.ddf     ---|          ADM    DBLS        DOUBLE SPACE
01798  M00S01780.ddf     ---|          ADN    YINC        BACK UP ONE
01799  M00S01781.ddf     ---|          STD    YC
01800  M00S01782.ddf     ---|          DISPLA CH01,,(LINKAGE BYTES = )
01801  M00S01783.ddf     ---|          LDI    T3
01802  M00S01784.ddf     ---|          RJM    D4D         DISPLAY FIRST BYTE
01803  M00S01785.ddf     ---|          LDN    0
01804  M00S01786.ddf     ---|          OAN    CH+40
01805  M00S01787.ddf     ---|          STD    AB
01806  M00S01788.ddf     ---|          LDM    BFMS+1
01807  M00S01789.ddf     ---|          RJM    D4D         DISPLAY SECOND BYTE
01808  M00S01790.ddf     ---|          LDI    T3
01809  M00S01791.ddf     ---|          ZJN    DFD2        IF EOF/EOI SECTOR
01810  M00S01792.ddf     ---|          LDM    BFMS+1
01811  M00S01793.ddf     ---|          ZJN    DFD5        IF EMPTY SECTOR
01812  M00S01794.ddf     ---|          LDI    T3
01813  M00S01795.ddf     ---|          SHN    6
01814  M00S01796.ddf     ---|          ADM    BFMS+1
01815  M00S01797.ddf     ---|          LMC    377777
01816  M00S01798.ddf     ---|          NJN    DFD1        IF NOT SYSTEM SECTOR
01817  M00S01799.ddf     ---|          LDN    DSSN        SELECT SYSTEM SECTOR DISPLAY
01818  M00S01800.ddf     ---|          UJN    DFD3        LOAD PROCESSOR
01819  M00S01801.ddf     ---|
01820  M00S01802.ddf     ---| DFD1     LDN    DPEN        SELECT PFC DISPLAY
01821  M00S01803.ddf     ---|          UJN    DFD3        LOAD PROCESSOR
01822  M00S01804.ddf     ---|
01823  M00S01805.ddf     ---| DFD2     LDM    BFMS+1
01824  M00S01806.ddf     ---|          NJN    DFD5        IF NOT EOI SECTOR
01825  M00S01807.ddf     ---|          LDN    DEIN        SELECT EOI SECTOR DISPLAY
01826  M00S01808.ddf     ---| DFD3     LMM    DFDB
01827  M00S01809.ddf     ---|          ZJN    DFD4        IF PROCESSOR LOADED
01828  M00S01810.ddf     ---|          LMM    DFDB
01829  M00S01811.ddf     ---|          STM    DFDB
01830  M00S01812.ddf     ---|          RJM    LDO         LOAD DISPLAY OVERLAY
01831  M00S01813.ddf     ---|          LDD    CM          SET PROCESSOR ADDRESS
01832  M00S01814.ddf     ---|          STM    DFDA
01833  M00S01815.ddf     ---| DFD4     LJM    **          JUMP TO DISPLAY PROCESSOR
01834  M00S01816.ddf     ---| DFDA     EQU    *-1
01835  M00S01817.ddf     ---|
01836  M00S01818.ddf     ---| DFD5     LJM    DRS2        RETURN
01837  M00S01819.ddf     ---|
01838  M00S01820.ddf     ---|
01839  M00S01821.ddf     ---| DFDB     DATA   0           CURRENT PROCESSOR ID
Line S01822 Modification History
M01 (Removed by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01840  M01S01822.ns2786  ---| CDD      SPACE  4,10
01841  M01S01823.ns2786  ---|**        CDD - CONVERT TO DECIMAL DISPLAY.
01842  M01S01824.ns2786  ---|*
01843  M01S01825.ns2786  ---|*         ENTRY  (A) = 12 BIT BINARY NUMBER.
01844  M01S01826.ns2786  ---|*
01845  M01S01827.ns2786  ---|*         EXIT   (A) = DECIMAL DISPLAY REPRESENTATION OF NUMBER.
01846  M01S01828.ns2786  ---|*
01847  M01S01829.ns2786  ---|*         USES   T2, T3.
01848  M01S01830.ns2786  ---|*
01849  M01S01831.ns2786  ---|*         CALLS  DV5.
01850  M01S01832.ns2786  ---|
01851  M01S01833.ns2786  ---|
01852  M01S01834.ns2786  ---| CDD      SUBR               ENTRY/EXIT
01853  M01S01835.ns2786  ---|          STD    T3
01854  M01S01836.ns2786  ---|          SHN    -1          DIVIDE BY TWO
01855  M01S01837.ns2786  ---|          RJM    DV5         DIVIDE BY FIVE
01856  M01S01838.ns2786  ---|          STD    T2
01857  M01S01839.ns2786  ---|          SHN    2           MULTIPLY BY TEN
01858  M01S01840.ns2786  ---|          ADD    T2
01859  M01S01841.ns2786  ---|          SHN    1
01860  M01S01842.ns2786  ---|          STD    T0
01861  M01S01843.ns2786  ---|          LDD    T3          CONVERT LOWER DIGIT
01862  M01S01844.ns2786  ---|          SBD    T0
01863  M01S01845.ns2786  ---|          ADN    1R0
01864  M01S01846.ns2786  ---|          STD    T3
01865  M01S01847.ns2786  ---|          LDD    T2          CONVERT UPPER DIGIT
01866  M01S01848.ns2786  ---|          ADN    1R0
01867  M01S01849.ns2786  ---|          SHN    6
01868  M01S01850.ns2786  ---|          LMD    T3
01869  M01S01851.ns2786  ---|          UJN    CDDX        RETURN
01870  M00S01852.ddf     ---| DCE      SPACE  4,15
01871  M00S01853.ddf     ---|**        DCE - DISPLAY PF CATALOG ENTRY.
01872  M00S01854.ddf     ---|*
01873  M00S01855.ddf     ---|*         ENTRY  (AB+2) = SET FOR CALL TO DMW.
01874  M00S01856.ddf     ---|*                (T3) = BUFFER ADDRESS.
01875  M00S01857.ddf     ---|*
01876  M00S01858.ddf     ---|*         EXIT   DATA DISPLAYED.
01877  M00S01859.ddf     ---|*
01878  M00S01860.ddf     ---|*         USES   T1, AB, AB+1, CM, YC.
01879  M00S01861.ddf     ---|*
01880  M00S01862.ddf     ---|*         CALLS  DPT, DMW.
01881  M00S01863.ddf     ---|*
01882  M00S01864.ddf     ---|*         MACROS DISPLA.
01883  M00S01865.ddf     ---|
01884  M00S01866.ddf     ---|
01885  M00S01867.ddf     ---| DCE      SUBR               ENTRY/EXIT
01886  M00S01868.ddf     ---|          LDM    CPFC        SET *DMW* PARAMETERS
01887  M00S01869.ddf     ---|          STD    YC
01888  M00S01870.ddf     ---|          LDN    0
01889  M00S01871.ddf     ---|          STD    AB
01890  M00S01872.ddf     ---|          LDN    NWCE
01891  M00S01873.ddf     ---|          STD    AB+1
01892  M00S01874.ddf     ---|          LDC    TPFC
01893  M00S01875.ddf     ---|          STD    AB+3
01894  M00S01876.ddf     ---|          RJM    DMW         DISPLAY MEMORY WORDS
01895  M00S01877.ddf     ---|
01896  M00S01878.ddf     ---|*         DISPLAY DATES AND MODES.
01897  M00S01879.ddf     ---|
01898  M00S01880.ddf     ---|          LDM    DBLS
01899  M00S01881.ddf     ---|          RAD    YC
01900  M00S01882.ddf     ---|          LPC    7777
01901  M00S01883.ddf     ---|          OAN    CH+40
01902  M00S01884.ddf     ---|          LDC    -NWCE*5
01903  M00S01885.ddf     ---|          ADD    T3
01904  M00S01886.ddf     ---|          STD    CM
01905  M00S01887.ddf     ---|          DISPLA CH01,,(CREATED   )
01906  M00S01888.ddf     ---|          LDD    CM          DISPLAY CREATION DATE
01907  M00S01889.ddf     ---|          ADN    FCCD
01908  M00S01890.ddf     ---|          RJM    DPT         DISPLAY PACKED DATE AND TIME
01909  M00S01891.ddf     ---|          DISPLA CH34,,( CT = )
01910  M00S01892.ddf     ---|          LDM    FCCT,CM     DISPLAY FILE CATAGORY
01911  M00S01893.ddf     ---|          SHN    -6
01912  M00S01894.ddf     ---|          STD    T1
01913  M00S01895.ddf     ---|          LDM    DCEA,T1
01914  M00S01896.ddf     ---|          OAN    CH+40
01915  M00S01897.ddf     ---|          DISPLA ,,(    M = )
01916  M00S01898.ddf     ---|          LDM    FCAM,CM     DISPLAY ACCESS MODE
01917  M00S01899.ddf     ---|          LPN    77
01918  M00S01900.ddf     ---|          STD    T1
01919  M00S01901.ddf     ---|          LDM    DCEB,T1
01920  M00S01902.ddf     ---|          OAN    CH+40
01921  M00S01903.ddf     ---|          LCN    YINC
01922  M00S01904.ddf     ---|          RAD    YC
01923  M00S01905.ddf     ---|          OAN    CH+40
01924  M00S01906.ddf     ---|          DISPLA CH01,,(MODIFIED  )
01925  M00S01907.ddf     ---|          LDD    CM          DISPLAY MODIFICATION DATE
01926  M00S01908.ddf     ---|          ADN    FCMD
01927  M00S01909.ddf     ---|          RJM    DPT
01928  M00S01910.ddf     ---|          DISPLA CH35,,(CONTROL   )
01929  M00S01911.ddf     ---|          LDD    CM          DISPLAY CONTROL CHANGE DATE
01930  M00S01912.ddf     ---|          ADN    FCKD
01931  M00S01913.ddf     ---|          RJM    DPT
01932  M00S01914.ddf     ---|          LCN    YINC
01933  M00S01915.ddf     ---|          RAD    YC
01934  M00S01916.ddf     ---|          OAN    CH+40
01935  M00S01917.ddf     ---|          DISPLA CH01,,(ACCESSED  )
01936  M00S01918.ddf     ---|          LDD    CM          DISPLAY LAST ACCESS DATE
01937  M00S01919.ddf     ---|          ADN    FCAD
01938  M00S01920.ddf     ---|          RJM    DPT
01939  M00S01921.ddf     ---|          DISPLA CH35,,(UTILITY   )
01940  M00S01922.ddf     ---|          LDD    CM          DISPLAY UTILITY ACCESS DATE
01941  M00S01923.ddf     ---|          ADN    FCUD
01942  M00S01924.ddf     ---|          RJM    DPT
01943  M00S01925.ddf     ---|          LJM    DCEX        RETURN
01944  M00S01926.ddf     ---|
01945  M00S01927.ddf     ---|
01946  M00S01928.ddf     ---| DCEA     DATA   2HPR        FILE CATAGORIES
01947  M00S01929.ddf     ---|          DATA   2HSP
01948  M00S01930.ddf     ---|          DATA   2HPU
01949  M00S01931.ddf     ---|
01950  M00S01932.ddf     ---| DCEB     DATA   2HWR        ACCESS MODES
01951  M00S01933.ddf     ---|          DATA   2HRD
01952  M00S01934.ddf     ---|          DATA   2HAP
01953  M00S01935.ddf     ---|          DATA   2HEX
01954  M00S01936.ddf     ---|          DATA   2H
01955  M00S01937.ddf     ---|          DATA   2HMD
01956  M00S01938.ddf     ---|          DATA   2HRM
01957  M00S01939.ddf     ---|          DATA   2HRA
01958  M00S01940.ddf     ---| DPT      SPACE  4,10
01959  M00S01941.ddf     ---|**        DPT - DISPLAY PACKED DATE AND TIME.
01960  M00S01942.ddf     ---|*
01961  M00S01943.ddf     ---|*         ENTRY  (A) = ADDRESS OF PACKED DATE AND TIME.
01962  M00S01944.ddf     ---|*
01963  M01S01945.ns2786  ---|*         USES   T0 - T2, AB - AB+4.
Line S00001 Modification History
M01 (Added by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01964  M01S00001.ns2786  +++|*         USES   T1, AB - AB+4.
01965  M00S01946.ddf     +++|*
Line S01947 Modification History
M01 (Removed by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01966  M01S01947.ns2786  ---|*         CALL   CDD, DV5.
Line S00002 Modification History
M01 (Added by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01967  M01S00002.ns2786  +++|*         CALLS  CDD.
01968  M00S01948.ddf     +++|
01969  M00S01949.ddf     +++|
01970  M00S01950.ddf     +++| DPT      SUBR               ENTRY/EXIT
01971  M00S01951.ddf     +++|          STD    T1
01972  M00S01952.ddf     +++|          LDI    T1          CONVERT YEAR
01973  M00S01953.ddf     +++|          SHN    -6
Line S01954 Modification History
M01 (Removed by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01974  M01S01954.ns2786  ---|          ADC    70D
01975  M01S01955.ns2786  ---|          RJM    CDD
Line S00003 Modification History
M01 (Added by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01976  M01S00003.ns2786  +++|          SBN    30D
01977  M01S00004.ns2786  +++|          PJN    DPT1        IF YEAR GREATER THAN 1999
01978  M01S00005.ns2786  +++|          ADC    100D
01979  M01S00006.ns2786  +++| DPT1     RJM    CDD
01980  M00S01956.ddf     +++|          SHN    6
01981  M00S01957.ddf     +++|          LMN    1R/
01982  M00S01958.ddf     +++|          STD    AB+1
01983  M00S01959.ddf     +++|          SHN    -14
01984  M00S01960.ddf     +++|          LMC    2L
01985  M00S01961.ddf     +++|          STD    AB
01986  M00S01962.ddf     +++|          LDI    T1          CONVERT MONTH
01987  M00S01963.ddf     +++|          LPN    77
01988  M00S01964.ddf     +++|          RJM    CDD
01989  M00S01965.ddf     +++|          STD    AB+2
01990  M00S01966.ddf     +++|          AOD    T1
01991  M00S01967.ddf     +++|          LDI    T1          CONVERT DAY
01992  M00S01968.ddf     +++|          SHN    -6
01993  M00S01969.ddf     +++|          RJM    CDD
01994  M00S01970.ddf     +++|          SHN    6
01995  M00S01971.ddf     +++|          LMN    1R.
01996  M00S01972.ddf     +++|          STD    AB+4
01997  M00S01973.ddf     +++|          SHN    -14
01998  M00S01974.ddf     +++|          LMC    2L /
01999  M00S01975.ddf     +++|          STD    AB+3
02000  M00S01976.ddf     +++|          LDN    5           DISPLAY * YY/MM/DD.*
02001  M00S01977.ddf     +++|          OAM    AB,CH
02002  M00S01978.ddf     +++|          LDI    T1          CONVERT HOUR
02003  M00S01979.ddf     +++|          LPN    77
02004  M00S01980.ddf     +++|          RJM    CDD
02005  M00S01981.ddf     +++|          SHN    6
02006  M00S01982.ddf     +++|          LMN    1R.
02007  M00S01983.ddf     +++|          STD    AB+1
02008  M00S01984.ddf     +++|          SHN    -14
02009  M00S01985.ddf     +++|          LMC    2L
02010  M00S01986.ddf     +++|          STD    AB
02011  M00S01987.ddf     +++|          AOD    T1
02012  M00S01988.ddf     +++|          LDI    T1          CONVERT MINUTE
02013  M00S01989.ddf     +++|          SHN    -6
02014  M00S01990.ddf     +++|          RJM    CDD
02015  M00S01991.ddf     +++|          STD    AB+2
02016  M00S01992.ddf     +++|          LDI    T1          CONVERT SECOND
02017  M00S01993.ddf     +++|          LPN    77
02018  M00S01994.ddf     +++|          RJM    CDD
02019  M00S01995.ddf     +++|          SHN    6
02020  M00S01996.ddf     +++|          LMN    1R.
02021  M00S01997.ddf     +++|          STD    AB+4
02022  M00S01998.ddf     +++|          SHN    -14
02023  M00S01999.ddf     +++|          LMC    2L .
02024  M00S02000.ddf     +++|          STD    AB+3
02025  M00S02001.ddf     +++|          LDN    5           DISPLAY * HH/MM/SS.*
02026  M00S02002.ddf     +++|          OAM    AB,CH
02027  M00S02003.ddf     +++|          LJM    DPTX        RETURN
02028  M00S02004.ddf     +++|          SPACE  4,10
02029  M00S02005.ddf     +++|**        *DFD* COMMON DECKS.
02030  M00S02006.ddf     +++|
02031  M00S02007.ddf     +++|
Line S02008 Modification History
M01 (Removed by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
02032  M01S02008.ns2786  ---|*CALL     COMPDV5
Line S00007 Modification History
M01 (Added by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
02033  M01S00007.ns2786  +++|*CALL     COMPCDD
02034  M00S02009.ddf     +++|          SPACE  4,10
02035  M00S02010.ddf     +++|*         PFC TAGS FOR DISPLAYS.
02036  M00S02011.ddf     +++|
02037  M00S02012.ddf     +++|
02038  M00S02013.ddf     +++| TPFC     DATA   10H FCFN/FCUI
02039  M00S02014.ddf     +++|          DATA   10H FCLF/FCBT
02040  M00S02015.ddf     +++|          DATA   10H FCRI/FCCD
02041  M00S02016.ddf     +++|          DATA   10H FCAC/FCMD
02042  M00S02017.ddf     +++|          DATA   10H FCCT/FCAD
02043  M00S02018.ddf     +++|          DATA   10H FCKD
02044  M00S02019.ddf     +++|          DATA   10H FCRS/FCUD
02045  M00S02020.ddf     +++|          DATA   10H FCPW/FCXD
02046  M00S02021.ddf     +++|          DATA   10H FCAF/FCAA
Line S02022 Modification History
M01 (Removed by) ddf2
Seq #  *Modification Id* Act 
----------------------------+
02047  M01S02022.ddf2    ---|          DATA   10H FCAL/FCVC
Line S00001 Modification History
M01 (Added by) ddf2
Seq #  *Modification Id* Act 
----------------------------+
02048  M01S00001.ddf2    +++|          DATA   10H FCAL/FCFC
02049  M00S02023.ddf     +++|          DATA   10H FCCN
02050  M00S02024.ddf     +++|          DATA   10H FCP1
02051  M00S02025.ddf     +++|          DATA   10H FCP2
Line S02026 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
02052  M01S02026.253l688 ---|          DATA   10H FCX5
Line S00002 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
02053  M01S00002.253l688 +++|          DATA   10H FCTF/FCTV
02054  M00S02027.ddf     +++|          DATA   10H FCCW
02055  M00S02028.ddf     +++|          DATA   10H FCIW
02056  M00S02029.ddf     +++|          SPACE  4,10
02057  M00S02030.ddf     +++|*         FNT DISPLAY TAGS.
02058  M00S02031.ddf     +++|
02059  M00S02032.ddf     +++|
02060  M00S02033.ddf     +++| TFNT     DATA   10H FNT
02061  M00S02034.ddf     +++|          DATA   10H FST
02062  M00S02035.ddf     +++|
02063  M00S02036.ddf     +++| DIS      HERE
02064  M00S02037.ddf     +++|          SPACE  4,10
02065  M00S02038.ddf     +++|          QUAL
02066  M00S02039.ddf     +++| .1       SET    *-RSPLA+4
02067  M00S02040.ddf     +++| FDPLA    EQU    RSPLA+.1/5*5  FORMATTED DISPLAY PROCESSOR LOAD ADDRESS
02068  M00S02041.ddf     +++|          QUAL   *
02069  M00S02042.ddf     +++| DSS      SPACE  4,10
02070  M00S02043.ddf     +++|***              SYSTEM SECTOR DISPLAY.
02071  M00S02044.ddf     +++|*                IF THE SECTOR CURRENTLY IN THE BUFFER IS A SYSTEM
02072  M00S02045.ddf     +++|*                SECTOR, THE VARIOUS FIELDS THEREIN ARE DISPLAYED.
02073  M00S02046.ddf     +++| DSS      SPACE  4,15
02074  M00S02047.ddf     +++|**        DSS - DISPLAY SYSTEM SECTOR.
02075  M00S02048.ddf     +++|*
02076  M00S02049.ddf     +++|*         ENTRY  FROM DFD.
02077  M00S02050.ddf     +++|*                CONSOLE FUNCTIONED FOR RIGHT SCREEN.
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/ddf.txt ยท Last modified: (external edit)