cdc:nos2.source:opl.opl871:deck:set.001
Deck SET Part 001
79 Modifications
Listing Sections
- Deck SET Start
- Deck SET Part 1 (Line 1828)
- Deck SET Part 2 (Line 3572)
- Deck SET Part 3 (Line 5361)
- Deck SET Part 4 (Line 6950)
- Deck SET Part 5 (Line 8641)
- Deck SET Part 6 (Line 10343)
- Deck SET Part 7 (Line 12092)
- Deck SET Part 8 (Line 13894)
- Deck SET Part 9 (Line 15559)
- Deck SET Part 10 (Line 17279)
- Deck SET Part 11 (Line 19111)
- Deck SET Part 12 (Line 20923)
- Deck SET Part 13 (Line 22598)
- Deck SET Part 14 (Line 24445)
- Deck SET Part 15 (Line 25986)
Source
Seq # *Modification Id* Act ----------------------------+ 01828 M00S01580.set +++| LDD DH 01829 M00S01581.set +++| RJM EPP EXCLUDE D/S TAPE CHANNEL PP 01830 M00S01582.set +++| LDM .PPL 01831 M00S01583.set +++| LMC 6407 REMOVE PP-S 0, 1, 2, 10 01832 M00S01584.set +++| PRSC EQU *-1 01833 M00S01585.set +++| RJM MSB 01834 M00S01586.set +++| PJN PRS15 IF PP FOUND 01835 M00S01587.set +++| LDM .PPL+1 01836 M00S01588.set +++| LMC 6000 CHECK UPPER BANK 01837 M00S01589.set +++| PRSD EQU *-1 01838 M00S01590.set +++| RJM MSB 01839 M00S01591.set +++| PJN PRS14 IF PP FOUND 01840 M00S01592.set +++| LDC =C* NOT ENOUGH PP-S FOR DEADSTART.* 01841 M00S01593.set +++| JMP DSE DISPLAY ERROR AND HANG 01842 M00S01594.set +++| 01843 M00S01595.set +++| PRS14 ADN 20 SET NEW ALTERNATE PP NUMBER 01844 M00S01596.set +++| PRS15 STM .APP 01845 M00S01597.set +++| ADC MAPS*10000 MOVE PP FUNCTION 01846 M00S01598.set +++| RJM APM 01847 M00S01599.set +++| CHKAPE CHECK ALTERNATE PP ERROR 01848 M00S01600.set +++| 01849 M00S01601.set +++|* IDLE CPU(S) AWAY FROM LOCATION 0. 01850 M00S01602.set +++| 01851 M00S01603.set +++| PRS16 LDN 20 EXCHANGE PACKAGE LENGTH 01852 M00S01604.set +++| STD T1 01853 M00S01605.set +++| LDD HN SAVE EXCHANGE PACKAGE AREA 01854 M00S01606.set +++| CRM MBUF,T1 01855 M00S01607.set +++| LDN CPSL STORE CPU IDLE PROGRAM 01856 M00S01608.set +++| CWM PRSA,ON 01857 M00S01609.set +++| LDD HO CHECK CPU TYPE 01858 M00S01610.set +++| SHN 21-11 01859 M00S01611.set +++| MJN PRS18 IF CYBER 176 (CPU STOPPED) 01860 M00S01612.set +++| LDD HO 01861 M00S01613.set +++| LPN 2 01862 M00S01614.set +++| NJN PRS17 IF CPU 1 OFF / NON-EXISTENT
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01863 M01S00010.271l750 +++| LDM DCPC 01864 M01S00011.271l750 +++| NJN PRS17 IF DUAL 170-STATE CPUS WITH CACHE 01865 M00S01615.set +++| LDD HN STORE EXCHANGE PACKAGE 01866 M00S01616.set +++| CWM PRSB,T1
| Line S01617 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01867 M01S01617.271l750 ---| SBN 20 EXCHANGE CPU 1 01868 M01S01618.271l750 ---| EXN 1
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01869 M01S00012.271l750 +++| SBN 20 01870 M01S00013.271l750 +++| EXN 1 EXCHANGE CPU 1 01871 M00S01619.set +++| SBN 1 WAIT EXCHANGE COMPLETE 01872 M00S01620.set +++| NJN *-1 01873 M00S01621.set +++| LDD HO 01874 M00S01622.set +++| LPN 1 01875 M00S01623.set +++| NJN PRS18 IF CPU 0 OFF 01876 M00S01624.set +++| PRS17 LDD HN STORE EXCHANGE PACKAGE 01877 M00S01625.set +++| CWM PRSB,T1 01878 M00S01626.set +++| SBN 20 EXCHANGE CPU 0 01879 M00S01627.set +++| EXN 0 01880 M00S01628.set +++| SBN 1 WAIT EXCHANGE COMPLETE 01881 M00S01629.set +++| NJN *-1 01882 M00S01630.set +++| PRS18 LDD HN RESTORE EXCHANGE PACKAGE AREA 01883 M00S01631.set +++| CWM MBUF,T1 01884 M00S01632.set +++| LDN 0 CLEAR LOCATION 0 01885 M00S01633.set +++| CWD ZR 01886 M01S00014.271l750 +++| 01887 M01S00015.271l750 +++|* START BUFFER PP. 01888 M01S00016.271l750 +++| 01889 M00S01634.set +++| RJM DCB DEFINE CM BUFFER SPACE 01890 M00S01635.set +++| STM IBUF+/BPP/EA
| Line S01636 Modification History | |
|---|---|
M01 (Removed by) | set81 |
Seq # *Modification Id* Act ----------------------------+ 01891 M01S01636.set81 ---| ADN 20 RA/100 OF *TDDB* TABLE
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | set81 |
Seq # *Modification Id* Act ----------------------------+ 01892 M01S00003.set81 +++| .ESBL EQU ESTE*ESMX+77 CM BUFFER SIZE PLUS ROUNDING FACTOR 01893 M01S00004.set81 +++| ESTBL EQU .ESBL/100 CM BUFFER LENGTH/100B FOR EST 01894 M01S00005.set81 +++| ADK ESTBL RA/100 OF *TDDB* TABLE 01895 M00S01637.set +++| STD ET 01896 M00S01638.set +++| STM IBUF+/BPP/MA
| Line S01639 Modification History | |
|---|---|
M01 (Removed by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 01897 M01S01639.284l847 ---| ADN 41
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | 284l847 |
M02 (Removed by) | set81 |
Seq # *Modification Id* Act ----------------------------+ 01898 M02S00018.set81 ---| ADN TDDCL*10B+1
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | set81 |
Seq # *Modification Id* Act ----------------------------+ 01899 M01S00006.set81 +++| .CTBL EQU 3*CTALL+77 CM BUFFER SIZE PLUS ROUNDING FACTOR 01900 M01S00007.set81 +++| CTABL EQU .CTBL/100 CM BUFFER LENGTH/100 FOR CHANNEL TABLES 01901 M01S00008.set81 +++| ADK TDDBL+CTABL 01902 M00S01640.set +++| STM IBUF+/BPP/FA 01903 M00S01641.set +++| LDC IBUFL TRANSMIT PP BUFFER PROGRAM 01904 M00S01642.set +++| OAM IBUF,BC 01905 M00S01643.set +++| FJM *,BC WAIT OUTPUT COMPLETE 01906 M00S01644.set +++| DCN BC 01907 M00S01645.set +++| LDD EB CLEAR EST ASSEMBLY BUFFER 01908 M00S01646.set +++| SHN 6 01909 M00S01647.set +++| STD CA+1 01910 M00S01648.set +++| SHN -14 01911 M00S01649.set +++| STD CA
| Line S01650 Modification History | |
|---|---|
M01 (Removed by) | set81 |
Seq # *Modification Id* Act ----------------------------+ 01912 M01S01650.set81 ---| LDC 2000+4100 CLEAR EQUIPMENT AND CHANNEL BUFFERS
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | set81 |
Seq # *Modification Id* Act ----------------------------+ 01913 M01S00009.set81 +++| LDC ESTBL*100+TDDBL*100+CTABL*100 01914 M00S01651.set +++| RJM CLS 01915 M00S01652.set +++| LDD LE ENTER EST CONSTANTS 01916 M00S01653.set +++| SHN 1 01917 M00S01654.set +++| STD T1 01918 M00S01655.set +++| LDD EB 01919 M00S01656.set +++| SHN 6 01920 M00S01657.set +++| CWM EBTA,T1
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2691 |
Seq # *Modification Id* Act ----------------------------+ 01921 M01S00001.ns2691 +++| LDN CFGL SET EXTENDED MEMORY MODE INTO *CFGL* 01922 M01S00002.ns2691 +++| CRD AB 01923 M00S01658.set +++| LDD HO 01924 M00S01659.set +++| LPC 4100
| Line S01660 Modification History | |
|---|---|
M01 (Removed by) | ns2691 |
Seq # *Modification Id* Act ----------------------------+ 01925 M01S01660.ns2691 ---| ZJN PRS19 IF CYBER 865/875 01926 M01S01661.ns2691 ---| IJM SET1,CHSC IF SCR CHANNEL INACTIVE 01927 M01S01662.ns2691 ---| LDN CFGL SET EXTENDED MEMORY MODE INTO *CFGL* 01928 M01S01663.ns2691 ---| CRD AB
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2691 |
Seq # *Modification Id* Act ----------------------------+ 01929 M01S00003.ns2691 +++| NJN PRS19 IF NOT CYBER 865/875 01930 M01S00004.ns2691 +++| LDN 1 FORCE ESM MODE 01931 M01S00005.ns2691 +++| UJN PRS20 SET MODE IN *CFGL* 01932 M01S00006.ns2691 +++| 01933 M01S00007.ns2691 +++| PRS19 IJM SET1,CHSC IF SCR CHANNEL INACTIVE
| Line S01664 Modification History | |
|---|---|
M01 (Removed by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 01934 M01S01664.272l774 ---| LDN FCRD+ESMM/14 READ SCR EXTENDED MEMORY MODE
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 01935 M01S00004.272l774 +++| LDN /SCR/FCRD+/SCR/ESMM/14 READ SCR EXTENDED MEMORY MODE 01936 M00S01665.set +++| OAN CHSC 01937 M00S01666.set +++| IAN CHSC
| Line S01667 Modification History | |
|---|---|
M01 (Removed by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 01938 M01S01667.272l774 ---| SHN -ESMM+ESMM/14*14
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 01939 M01S00005.272l774 +++| SHN -/SCR/ESMM+/SCR/ESMM/14*14 01940 M00S01668.set +++| LPN 1
| Line S01669 Modification History | |
|---|---|
M01 (Removed by) | ns2691 |
Seq # *Modification Id* Act ----------------------------+ 01941 M01S01669.ns2691 ---| SHN 12-0
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | ns2691 |
Seq # *Modification Id* Act ----------------------------+ 01942 M01S00008.ns2691 +++| PRS20 SHN 12-0 01943 M00S01670.set +++| RAD AB+3 INSERT MODE BIT 01944 M00S01671.set +++| LDN CFGL 01945 M00S01672.set +++| CWD AB
| Line S01673 Modification History | |
|---|---|
M01 (Removed by) | ns2691 |
Seq # *Modification Id* Act ----------------------------+ 01946 M01S01673.ns2691 ---| PRS19 LJM SET1 PROCESS TEXT DECKS
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | ns2691 |
Seq # *Modification Id* Act ----------------------------+ 01947 M01S00009.ns2691 +++| LJM SET1 PROCESS TEXT DECKS 01948 M00S01674.set +++| SPACE 4,10 01949 M00S01675.set +++|* SCRATCH BUFFER. 01950 M00S01676.set +++| 01951 M00S01677.set +++| MBUFL MAX MLED,CTALL*5,100*5 01952 M00S01678.set +++| MBUF EQU 7777-MBUFL 01953 M00S01679.set +++| DBUF EQU MBUF+APDL 01954 M00S01680.set +++| CDD SPACE 4,10 01955 M00S01681.set +++|** CDD - CHECK DISPLAY DRIVER. 01956 M00S01682.set +++|* 01957 M00S01683.set +++|* ENTRY (T2) = *SCD* PP NUMBER IF CDC721 CONSOLE. 01958 M00S01684.set +++|* (T7) = 77. 01959 M00S01685.set +++|* (CM - CM+4) = 0. 01960 M00S01686.set +++|* 01961 M00S01687.set +++|* MACROS MDIN. 01962 M00S01688.set +++| 01963 M00S01689.set +++| 01964 M00S01690.set +++| CDD SUBR ENTRY/EXIT 01965 M00S01691.set +++| LDD T2 01966 M00S01692.set +++| LPN 1 SET PORT NUMBER IN EST ENTRY 01967 M00S01693.set +++| RAM EBTA+5*DSEQ*ESTE+5*EQDE+4
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | ns2557 |
Seq # *Modification Id* Act ----------------------------+ 01968 M01S00008.ns2557 +++| LPN 1 01969 M01S00009.ns2557 +++| SHN 4 01970 M01S00010.ns2557 +++| STM SCIP 01971 M00S01694.set +++| LDD T2 EXTRACT *SCD* PP NUMBER 01972 M00S01695.set +++| SHN -6 01973 M00S01696.set +++| STM .DCS 01974 M00S01697.set +++| CDD1 ZJN CDDX IF DEADSTART FROM CC545 CONSOLE 01975 M00S01698.set +++| RAM CDDA 01976 M00S01699.set +++| LPN 37 MODIFY CHANNEL INSTRUCTIONS 01977 M00S01700.set +++| RAM CDDB 01978 M00S01701.set +++| LDN 3 INITIALIZE *SCD* 01979 M00S01702.set +++| CDDA OAM. T7,0 01980 M00S01703.set +++| CDDB DCN. 0 01981 M00S01704.set +++| AOM EBTA+5*DSEQ*ESTE+5*EQAE+2 01982 M00S01705.set +++| MDIN MODIFY DISPLAY GENERATORS 01983 M00S01706.set +++| UJP CDD1 RETURN 01984 M00S01707.set +++| CLK SPACE 4,10 01985 M00S01708.set +++|** CLK - PROCESS CTI CLOCK. 01986 M00S01709.set +++|* 01987 M00S01710.set +++|* EXIT (DTEL) = CTI-SUPPLIED DATE. 01988 M00S01711.set +++|* (TIML) = CTI-SUPPLIED TIME. 01989 M00S01712.set +++|* (PDTL) = CTI-SUPPLIED *FRC* VALUE. 01990 M00S01713.set +++|* 01991 M00S01714.set +++|* CALLS IAF. 01992 M00S01715.set +++| 01993 M00S01716.set +++| 01994 M00S01717.set +++| CLK SUBR ENTRY/EXIT 01995 M00S01718.set +++| LDM C8XX CHECK MAINFRAME TYPE 01996 M00S01719.set +++| NJN CLKX IF NOT CYBER 180 01997 M00S01720.set +++| LDN CLKS REQUEST CTI CLOCK INFORMATION 01998 M00S01721.set +++| RJM IAF 01999 M00S01722.set +++| LDN PDTL 02000 M00S01723.set +++| CWM MBUF+10,ON WRITE CTI-SUPPLIED *FRC* VALUE 02001 M00S01724.set +++| ADK TIML-PDTL-1 02002 M00S01725.set +++| CWM MBUF+3,ON WRITE CTI-SUPPLIED TIME 02003 M00S01726.set +++| ADK DTEL-TIML-1 02004 M00S01727.set +++| CWM MBUF,ON WRITE CTI-SUPPLIED DATE 02005 M00S01728.set +++| UJN CLKX RETURN 02006 M00S01729.set +++| CSB SPACE 4,10 02007 M00S01730.set +++|** CSB - COUNT SET BITS. 02008 M00S01731.set +++|* 02009 M00S01732.set +++|* ENTRY (A) = COMPLEMENT OF BYTE TO COUNT. 02010 M00S01733.set +++|* 02011 M00S01734.set +++|* EXIT (A) = NUMBER OF ZERO BITS IN LOWER 12 BITS. 02012 M00S01735.set +++|* 02013 M00S01736.set +++|* USES T1, T2. 02014 M00S01737.set +++| 02015 M00S01738.set +++| 02016 M00S01739.set +++| CSB2 LDD T2 NUMBER OF BITS SET 02017 M00S01740.set +++| 02018 M00S01741.set +++| CSB SUBR ENTRY/EXIT 02019 M00S01742.set +++| LMC 7777 COMPLEMENT ENTRY 02020 M00S01743.set +++| STD T1 SAVE ENTRY CONDITION 02021 M00S01744.set +++| LDN 0 02022 M00S01745.set +++| STD T2 RESET COUNTER 02023 M00S01746.set +++| CSB1 LDD T1 02024 M00S01747.set +++| ZJN CSB2 IF NO MORE BITS SET 02025 M00S01748.set +++| SHN 21-0 SHIFT OFF LAST BIT 02026 M00S01749.set +++| STD T1 02027 M00S01750.set +++| SHN 0-21 INCREMENT COUNTER 02028 M00S01751.set +++| RAD T2 02029 M00S01752.set +++| UJN CSB1 LOOP FOR NEXT BIT 02030 M00S01753.set +++| DCB SPACE 4,15 02031 M00S01754.set +++|** DCB - DEFINE CM BUFFER SPACE. 02032 M00S01755.set +++|* 02033 M00S01756.set +++|* EXIT (A) = (EB) = RA/100 FOR EST BUFFER. 02034 M00S01757.set +++|* 02035 M00S01758.set +++|* USES T1, AB - AB+4. 02036 M00S01759.set +++|* 02037 M00S01760.set +++|* CALLS API, IDF. 02038 M00S01761.set +++|* 02039 M00S01762.set +++|* MACROS CFNC, CHKAPE, DFIM. 02040 M00S01763.set +++| 02041 M00S01764.set +++|
| Line S01765 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02042 M01S01765.271l716 ---| DCB2 LDN CMCL STORE *MABL* WORD 02043 M01S01766.271l716 ---| CRD AB 02044 M01S01767.271l716 ---| ADN MABL-CMCL
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02045 M01S00016.271l716 +++| DCB2 LDN CSWL FETCH *MABL* DATA 02046 M01S00017.271l716 +++| CRD AB 02047 M01S00018.271l716 +++| CWD ZR 02048 M01S00019.271l716 +++| ADN MABL-CSWL STORE *MABL* WORD 02049 M00S01768.set +++| CWD AB 02050 M00S01769.set +++| LDD AB+2 SET BUFFER LIMIT 02051 M00S01770.set +++| SHN 14 02052 M00S01771.set +++| LMD AB+3 02053 M00S01772.set +++| MJN DCB3 IF MEMORY SIZE .GT. 64 MBYTES 02054 M00S01773.set +++| SBK 4001 02055 M00S01774.set +++| MJN DCB4 IF MEMORY SIZE .LE. 131K WORDS 02056 M00S01775.set +++| DCB3 LCN 1 02057 M00S01776.set +++| DCB4 ADC 4001 02058 M00S01777.set +++| STM IBUF+/BPP/BL 02059 M00S01778.set +++| SBK EBFL SET RA FOR *EBUT* TABLE 02060 M00S01779.set +++| STD EB 02061 M00S01780.set +++| 02062 M00S01781.set +++| DCB SUBR ENTRY/EXIT 02063 M00S01782.set +++| LDD RS 02064 M00S01783.set +++| LPN SYMK 02065 M00S01784.set +++| LMN SYCM 02066 M00S01785.set +++| NJN DCB2 IF SYSTEM NOT RECOVERED FROM CM 02067 M00S01786.set +++| LDN LROF 02068 M00S01787.set +++| RJM IDF INITIATE SEARCH FOR *RCM* 02069 M00S01788.set +++| CFNC SLMF SELECT LEFT SCREEN - MEDIUM CHARACTERS 02070 M00S01789.set +++| DCB1 LDN DCBAL DISPLAY MESSAGE 02071 M00S01790.set +++| OAM DCBA,CH 02072 M00S01791.set +++| CFNC THCF TRANSFER HIDDEN AND CLEAR 02073 M00S01792.set +++| LDC SBNI+1 DELAY 02074 M00S01793.set +++| NJN *-1 02075 M00S01794.set +++| AJM DCB1,TC IF *DIO* BUSY 02076 M00S01795.set +++| DCN CH 02077 M00S01796.set +++| 02078 M00S01797.set +++|* SUSPEND ALTERNATE PP. 02079 M00S01798.set +++| 02080 M00S01799.set +++| LDM .APP MODIFY *APP* CHANNEL INSTRUCTIONS 02081 M00S01800.set +++| SHN 14 02082 M00S01801.set +++| LMC CTAC 02083 M00S01802.set +++| RJM MCI 02084 M00S01803.set +++| LDK ZERL CLEAR *DSCL* 02085 M00S01804.set +++| CRD CM 02086 M00S01805.set +++| LDK DSCL 02087 M00S01806.set +++| CWD CM 02088 M00S01807.set +++| LDK RPCS*10000+DSCL REMOVE PP FROM CHANNEL 02089 M00S01808.set +++| RJM APM 02090 M00S01809.set +++| CHKAPE CHECK ALTERNATE PP ERROR 02091 M00S01810.set +++| LJM ROV1 LOAD AND EXECUTE *RCM* 02092 M00S01811.set +++| 02093 M00S01812.set +++| DFIM (CON LN12) 02094 M00S01813.set +++| DCBA CON LN19,CH06 02095 M00S01814.set +++| DATA C*RECOVERY IN PROGRESS.* 02096 M00S01815.set +++| DCBAL EQU *-DCBA
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02097 M01S00005.261l700 +++| DDV SPACE 4,10 02098 M01S00006.261l700 +++|** DDV - DETERMINE *DFT* VERSION. 02099 M01S00007.261l700 +++|* 02100 M01S00008.261l700 +++|* EXIT (DFTV) = 0, IF VERSION 3 *DFT* PRESENT. 02101 M01S00009.261l700 +++|* (DFSZ) = SIZE OF *DFT/OS* BUFFER, IF VERSION 4 OR 02102 M01S00010.261l700 +++|* ABOVE *DFT* PRESENT. 02103 M01S00011.261l700 +++|* 02104 M01S00012.261l700 +++|* TO *DSE* IF THE SIZE OF THE *DFT/OS* BUFFER FROM THE 02105 M01S00013.261l700 +++|* DESCRIPTOR IS GREATER THAN 7777B. 02106 M01S00014.261l700 +++|* 02107 M01S00015.261l700 +++|* CALLS IAF. 02108 M01S00016.261l700 +++| 02109 M01S00017.261l700 +++| 02110 M01S00018.261l700 +++| DDV SUBR ENTRY/EXIT 02111 M01S00019.261l700 +++| LDM C8XX 02112 M01S00020.261l700 +++| NJN DDVX IF NOT CYBER 180 02113 M01S00021.261l700 +++| LDN DFTS GET *DFT* DESCRIPTOR 02114 M01S00022.261l700 +++| RJM IAF ISSUE ALTERNATE PP FUNCTION 02115 M01S00023.261l700 +++| LDM MBUF 02116 M01S00024.261l700 +++| ZJN DDVX IF NO DESCRIPTOR RETURNED 02117 M01S00025.261l700 +++| LDM DBUF+DFVR SAVE *DFT* VERSION
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02118 M02S00026.271l716 ---| LPN 1
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02119 M01S00020.271l716 +++| SHN 21-0 02120 M01S00021.271l716 +++| PJN DDVX IF VERSION 3 *DFT* 02121 M01S00022.271l716 +++| SHN 0-5 02122 M01S00023.271l716 +++| LPN 77 02123 M01S00024.271l716 +++| NJN DDV0 IF NOT *DFT* VERSION 4 02124 M01S00025.271l716 +++| LDN 4 02125 M01S00026.271l716 +++| DDV0 SBN 3 *DFT* VERISON 3 = 0
| Line S00027 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02126 M01S00027.261l700 +++| STM DFTV
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02127 M02S00028.271l716 ---| ZJN DDVX IF VERSION 3 *DFT*
| Line S00029 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02128 M01S00029.261l700 +++| LDM DBUF+DFSI SAVE *DFT/OS* BUFFER SIZE 02129 M01S00030.261l700 +++| NJN DDV1 IF *DFT/OS* BUFFER SIZE TOO LARGE 02130 M01S00031.261l700 +++| LDM DBUF+DFSI+1 02131 M01S00032.261l700 +++| STM DFSZ 02132 M01S00033.261l700 +++| UJN DDVX RETURN 02133 M01S00034.261l700 +++| 02134 M01S00035.261l700 +++| DDV1 LDC DDVA *DFT BUFFER TOO LARGE* 02135 M01S00036.261l700 +++| LJM DSE DISPLAY ERROR AND HANG 02136 M01S00037.261l700 +++| 02137 M01S00038.261l700 +++| 02138 M01S00039.261l700 +++| DDVA DATA C*DFT BUFFER TOO LARGE* 02139 M00S01816.set +++| EPP SPACE 4,10 02140 M00S01817.set +++|** EPP - EXCLUDE PP FROM THOSE TO WHICH *APP* MAY BE MOVED. 02141 M00S01818.set +++|* 02142 M00S01819.set +++|* ENTRY (A) = 7/, 5/CHANNEL. 02143 M00S01820.set +++|* 02144 M00S01821.set +++|* USES T1. 02145 M00S01822.set +++| 02146 M00S01823.set +++| 02147 M00S01824.set +++| EPP SUBR ENTRY/EXIT 02148 M00S01825.set +++| LPN 37 02149 M00S01826.set +++| SHN 22-4 02150 M00S01827.set +++| STD T1 02151 M00S01828.set +++| SHN 4-22 02152 M00S01829.set +++| LMD TH 02153 M00S01830.set +++| ERRNZ SHNI-1000 CODE ASSUMES *SHNI* = 1000 02154 M00S01831.set +++| STM EPPA 02155 M00S01832.set +++| LDN 1 SET PP MASK 02156 M00S01833.set +++| EPPA SHN ** 02157 M00S01834.set +++| STM EPPB 02158 M00S01835.set +++| STM EPPC 02159 M00S01836.set +++| LDM .PPL,T1 02160 M00S01837.set +++| LPC ** 02161 M00S01838.set +++| EPPB EQU *-1 02162 M00S01839.set +++| EPP1 NJN EPPX IF PP OFF 02163 M00S01840.set +++| LDM EPPD,T1 02164 M00S01841.set +++| STD T1 02165 M00S01842.set +++| LDI T1 02166 M00S01843.set +++| LPC ** 02167 M00S01844.set +++| EPPC EQU *-1 02168 M00S01845.set +++| NJN EPP1 IF PP ALREADY DESELECTED 02169 M00S01846.set +++| LDM EPPC DESELECT PP 02170 M00S01847.set +++| RAI T1 02171 M00S01848.set +++| UJN EPP1 RETURN 02172 M00S01849.set +++| 02173 M00S01850.set +++| EPPD CON PRSC,PRSD 02174 M00S01851.set +++| IAF SPACE 4,10 02175 M00S01852.set +++|** IAF - ISSUE FUNCTION TO ALTERNATE PP. 02176 M00S01853.set +++|* 02177 M00S01854.set +++|* ENTRY (A) = FUNCTION CODE. 02178 M00S01855.set +++|* 02179 M00S01856.set +++|* EXIT (A) = 0. 02180 M00S01857.set +++|* 02181 M00S01858.set +++|* ERROR TO *DSE* IF ALTERNATE PP ERROR. 02182 M00S01859.set +++|* 02183 M00S01860.set +++|* CALLS API. 02184 M00S01861.set +++| 02185 M00S01862.set +++| 02186 M00S01863.set +++| IAF SUBR ENTRY/EXIT 02187 M00S01864.set +++| SHN 14 02188 M00S01865.set +++| LMC MBUF APPEND BUFFER ADDRESS TO REQUEST 02189 M00S01866.set +++| RJM API 02190 M00S01867.set +++| ZJN IAFX IF NO ERROR 02191 M00S01868.set +++| JMP DSE DISPLAY ERROR AND HANG 02192 M00S01869.set +++| MCI SPACE 4,10 02193 M00S01870.set +++|** MCI - MODIFY CHANNEL INSTRUCTIONS. 02194 M00S01871.set +++|* 02195 M00S01872.set +++|* ENTRY (A) = 6/ CHANNEL NUMBER, 02196 M00S01873.set +++|* 12/ ADDRESS OF INSTRUCTION LIST. 02197 M00S01874.set +++|* 02198 M00S01875.set +++|* USES T0, T1, T2. 02199 M00S01876.set +++| 02200 M00S01877.set +++| 02201 M00S01878.set +++| MCI1 STD T2 SET INSTRUCTION ADDRESS 02202 M00S01879.set +++| LDI T2 MODIFY INSTRUCTION 02203 M00S01880.set +++| SCN 37 02204 M00S01881.set +++| LMD T0 02205 M00S01882.set +++| STI T2 02206 M00S01883.set +++| AOD T1 ADVANCE LIST ADDRESS 02207 M00S01884.set +++| MCI2 LDI T1 02208 M00S01885.set +++| NJN MCI1 IF NOT END OF LIST 02209 M00S01886.set +++| 02210 M00S01887.set +++| MCI SUBR ENTRY/EXIT 02211 M00S01888.set +++| STD T1 SET LIST ADDRESS 02212 M00S01889.set +++| SHN -14 02213 M00S01890.set +++| STD T0 SET CHANNEL 02214 M00S01891.set +++| UJN MCI2 ENTER LOOP 02215 M00S01892.set +++| MSB SPACE 4,10 02216 M00S01893.set +++|** MSB - DETERMINE MOST SIGNIFICANT BIT. 02217 M00S01894.set +++|* 02218 M00S01895.set +++|* ENTRY (A) = COMPLEMENT OF BYTE TO CHECK. 02219 M00S01896.set +++|* 02220 M00S01897.set +++|* EXIT (A) = NUMBER OF MOST SIGNIFICANT BIT, IF FOUND. 02221 M00S01898.set +++|* (A) .LT. 0 IF ALL BITS ARE ZERO. 02222 M00S01899.set +++|* 02223 M00S01900.set +++|* USES T1, T2, T3. 02224 M00S01901.set +++| 02225 M00S01902.set +++| 02226 M00S01903.set +++| MSB2 SOD T2 MOST SIGNIFICANT BIT 02227 M00S01904.set +++| 02228 M00S01905.set +++| MSB SUBR ENTRY/EXIT 02229 M00S01906.set +++| LMC 7777 COMPLEMENT ENTRY 02230 M00S01907.set +++| STD T1 SAVE ENTRY CONDITION 02231 M00S01908.set +++| LDN 0 02232 M00S01909.set +++| STD T2 RESET MOST SIGNIFICANT BIT 02233 M00S01910.set +++| STD T3 RESET BIT COUNTER 02234 M00S01911.set +++| MSB1 AOD T3 INCREMENT BIT COUNTER 02235 M00S01912.set +++| LDD T1 02236 M00S01913.set +++| ZJN MSB2 IF NO MORE BITS ARE SET 02237 M00S01914.set +++| SHN 21-0 SHIFT OFF LEAST SIGNIFICANT BIT 02238 M00S01915.set +++| STD T1 02239 M00S01916.set +++| PJN MSB1 IF BIT IS NOT SET 02240 M00S01917.set +++| LDD T3 UPDATE MOST SIGNIFICANT BIT 02241 M00S01918.set +++| STD T2 02242 M00S01919.set +++| UJN MSB1 LOOP FOR NEXT BIT
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02243 M01S00017.271l750 +++| RWR SPACE 4,10 02244 M01S00018.271l750 +++|** READ / WRITE ENVIRONMENTAL CONTROL REGISTER. 02245 M01S00019.271l750 +++|* 02246 M01S00020.271l750 +++|* ENTRY (A) = *RMRF* TO READ REGISTER, 02247 M01S00021.271l750 +++|* = *WMRF* TO WRITE REGISTER. 02248 M01S00022.271l750 +++|* 02249 M01S00023.271l750 +++|* EXIT (RBUF) = REGISTER CONTENTS. 02250 M01S00024.271l750 +++| 02251 M01S00025.271l750 +++| 02252 M01S00026.271l750 +++| RWR SUBR ENTRY/EXIT 02253 M01S00027.271l750 +++| LMM CMCC 02254 M01S00028.271l750 +++| FAN. MR FUNCTION MAINTENANCE CHANNEL 02255 M01S00029.271l750 +++| LPN 20 02256 M01S00030.271l750 +++| ERRNZ RMRF+20-WMRF CODE DEPENDS ON VALUE 02257 M01S00031.271l750 +++| SHN 3 02258 M01S00032.271l750 +++| LMC IAMI+MR FORM I/O INSTRUCTION 02259 M01S00033.271l750 +++| STM RWRA 02260 M01S00034.271l750 +++| ACN. MR 02261 M01S00035.271l750 +++| LDN 0 02262 M01S00036.271l750 +++| OAN. MR SEND MEMORY *EC* REGISTER NUMBER 02263 M01S00037.271l750 +++| LDK /IOU/ECMR 02264 M01S00038.271l750 +++| OAN. MR 02265 M01S00039.271l750 +++| FJM. *,MR IF CHANNEL BUSY, WAIT 02266 M01S00040.271l750 +++| DCN. MR 02267 M01S00041.271l750 +++| ACN. MR READ / WRITE REGISTER 02268 M01S00042.271l750 +++| LDN 10 02269 M01S00043.271l750 +++| RWRA IAM. RBUF,MR 02270 M01S00044.271l750 +++| UJP RWRX RETURN 02271 M01S00045.271l750 +++| 02272 M01S00046.271l750 +++| 02273 M01S00047.271l750 +++| RBUF EQU MBUF+500-10
| Line S01920 Modification History | |
|---|---|
M01 (Removed by) | ns2730 |
Seq # *Modification Id* Act ----------------------------+ 02274 M01S01920.ns2730 ---| SHO SPACE 4,10
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2730 |
Seq # *Modification Id* Act ----------------------------+ 02275 M01S00002.ns2730 +++| SHO SPACE 4,15 02276 M00S01921.set +++|** SHO - SET HARDWARE OPTIONS.
| Line S01922 Modification History | |
|---|---|
M01 (Removed by) | ns2730 |
Seq # *Modification Id* Act ----------------------------+ 02277 M01S01922.ns2730 ---|* 02278 M01S01923.ns2730 ---|* ENTRY (DBUF) = MAINFRAME DESCRIPTOR. 02279 M00S01924.set ---|* 02280 M00S01925.set ---|* EXIT (A) = 0 IF CYBER 180 MAINFRAME OR CM RECOVERY. 02281 M00S01926.set ---|* (HO) = HARDWARE OPTIONS. 02282 M00S01927.set ---|* (DFTA) = DEFAULT *DFT* VALUES SET.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2730 |
Seq # *Modification Id* Act ----------------------------+ 02283 M01S00003.ns2730 +++|* (DCPC) .NE. 0, IF DUAL-NOS-CPU CACHE MACHINE. 02284 M01S00004.ns2730 +++|* (DCPS) .NE. 0, IF DUAL-NOS-CPU SELECTED IN *CIP*. 02285 M01S00005.ns2730 +++|* CYBER 180 CPU(S) STARTED. 02286 M00S01928.set +++|*
| Line S01929 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02287 M01S01929.271l750 ---|* USES T1, T2, T4, AB - AB+4.
| Line S00048 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2730 |
Seq # *Modification Id* Act ----------------------------+ 02288 M02S00048.ns2730 ---|* USES T2, T4, AB - AB+4.
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | ns2730 |
Seq # *Modification Id* Act ----------------------------+ 02289 M01S00006.ns2730 +++|* ERROR TO *DSE* IF CPU MODEL NOT FOUND. 02290 M01S00007.ns2730 +++|* 02291 M01S00008.ns2730 +++|* USES HO, T2, T4, AB - AB+4. 02292 M00S01930.set +++|* 02293 M00S01931.set +++|* CALLS IAF. 02294 M00S01932.set +++| 02295 M00S01933.set +++|
| Line S01934 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02296 M01S01934.261l700 ---| SHO7 LDN PMNTL-1 02297 M01S01935.261l700 ---| STD T2 02298 M01S01936.261l700 ---| SHO8 LDM PMNT,T2
| Line S00040 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02299 M01S00040.261l700 +++| SHO7 LDN PMNTL SEARCH TABLE OF PROCESSOR MODELS 02300 M01S00041.261l700 +++| STD T2 02301 M01S00042.261l700 +++| SHO8 SOD T2 02302 M01S00043.261l700 +++| PJN SHO9 IF NOT END OF TABLE 02303 M01S00044.261l700 +++| LDC SHOH *CPU MODEL NOT FOUND* 02304 M01S00045.261l700 +++| LJM DSE DISPLAY ERROR AND HANG 02305 M01S00046.261l700 +++| 02306 M01S00047.261l700 +++| SHO9 LDM PMNT,T2 CHECK NEXT TABLE ENTRY 02307 M01S00048.261l700 +++| LPC 377 EXTRACT MODEL NUMBER 02308 M01S00049.261l700 +++| STM CMDL 02309 M00S01937.set +++| LMC 0 PROCESSOR MODEL NUMBER 02310 M00S01938.set +++| SHOF EQU *-1
| Line S01939 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02311 M01S01939.261l700 ---| LPC 377 02312 M01S01940.261l700 ---| ZJN SHO9 IF MATCH 02313 M01S01941.261l700 ---| SOD T2 02314 M01S01942.261l700 ---| NJN SHO8 IF NOT END OF TABLE 02315 M01S01943.261l700 ---| SHO9 LDM PMNT,T2 02316 M01S01944.261l700 ---| LPC 377 EXTRACT MODEL NUMBER 02317 M01S01945.261l700 ---| STM CMDL
| Line S00050 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02318 M01S00050.261l700 +++| NJN SHO8 IF NO MATCH 02319 M01S00051.261l700 +++| LDD T2 SET DEFAULT DEDICATED *DFT* STATUS 02320 M01S00052.261l700 +++| SBN PMNTA 02321 M01S00053.261l700 +++| SHN 0-21 02322 M01S00054.261l700 +++| SHN 13-0 02323 M01S00055.261l700 +++| RAM DFTA+1 02324 M00S01946.set +++| LDM PMNT,T2 SET 990 FLAG IF 990 PROCESSOR 02325 M00S01947.set +++| SCN 77 02326 M00S01948.set +++| SHN 12-6
| Line S01949 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02327 M01S01949.261l700 ---| STM DFTA+1
| Line S00056 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02328 M01S00056.261l700 +++| RAM DFTA+1 02329 M00S01950.set +++| SHN 6-12-10 02330 M00S01951.set +++| STD T2 02331 M00S01952.set +++| SHN 2 MULTIPLY BY 5 02332 M00S01953.set +++| RAD T2 02333 M00S01954.set +++| RAM DFTA 02334 M00S01955.set +++| LPN 77 02335 M00S01956.set +++| ERRNZ NUMR-20 CODE ASSUMES *NUMR* = 20 02336 M00S01957.set +++| SHN 4 MULTIPLY BY *NUMR*+1 02337 M00S01958.set +++| RAD T2 02338 M00S01959.set +++| RAM DFTA+1 SET DEFAULT TOTAL SIZE OF M/R BUFFERS
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | set66 |
Seq # *Modification Id* Act ----------------------------+ 02339 M01S00001.set66 +++| SHOJ UJN SHO11 RETURN 02340 M01S00002.set66 +++|* PSN (IF CM RECOVERY) 02341 M01S00003.set66 +++| RJM VCC VERIFY CPU CONFIGURATION 02342 M00S01960.set +++| UJN SHO11 RETURN 02343 M00S01961.set +++|
| Line S01962 Modification History | |
|---|---|
M01 (Removed by) | set66 |
Seq # *Modification Id* Act ----------------------------+ 02344 M01S01962.set66 ---| SHO10 LDK MABL FETCH MAINFRAME ATTRIBUTE INFORMATION
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | set66 |
Seq # *Modification Id* Act ----------------------------+ 02345 M01S00004.set66 +++| SHO10 STM SHOJ SET *PSN* 02346 M01S00005.set66 +++| LDK MABL FETCH MAINFRAME ATTRIBUTE INFORMATION 02347 M00S01963.set +++| CRD AB 02348 M00S01964.set +++| LDD AB+1 RECOVER HARDWARE OPTIONS 02349 M01S00006.set66 +++| STM VCCA 02350 M00S01965.set +++| STD HO
| Line S01966 Modification History | |
|---|---|
M01 (Removed by) | set66 |
Seq # *Modification Id* Act ----------------------------+ 02351 M01S01966.set66 ---| SOM SHOB DISABLE HARDWARE OPTION CHANGE 02352 M00S01967.set ---| LDM C8XX 02353 M01S01968.set66 ---| ZJN SHO1 IF CYBER 180 MAINFRAME
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | set66 |
M02 (Removed by) | set66b |
Seq # *Modification Id* Act ----------------------------+ 02354 M02S00007.set66b ---| NJN SHO11 IF NOT CYBER 180 MAINFRAME 02355 M02S00008.set66b ---| LDD HO SET CPU STATUS TO LOGICAL STATUS 02356 M02S00009.set66b ---| SCN 3 02357 M02S00010.set66b ---| LMM .CPU 02358 M02S00011.set66b ---| STD HO 02359 M02S00012.set66b ---| UJN SHO1 DETERMINE CPU STATUS 02360 M02S00013.set66b ---|
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | set66b |
M02 (Removed by) | ns2730 |
Seq # *Modification Id* Act ----------------------------+ 02361 M02S00001.ns2730 ---| ZJN SHO1 IF CYBER 180 MAINFRAME
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | ns2730 |
Seq # *Modification Id* Act ----------------------------+ 02362 M01S00009.ns2730 +++| ZJP SHO1 IF CYBER 180 MAINFRAME 02363 M00S01969.set +++| SHO11 LDN 0 02364 M00S01970.set +++| 02365 M00S01971.set +++| SHO SUBR ENTRY/EXIT 02366 M01S00010.ns2730 +++| LDN GPDS REQUEST GLOBAL PROCESSOR DESCRIPTOR 02367 M01S00011.ns2730 +++| RJM IAF 02368 M01S00012.ns2730 +++| LDM DBUF+CPSF CHECK FOR DUAL-NOS-CPU SELECTED 02369 M01S00013.ns2730 +++| LPN 10 02370 M01S00014.ns2730 +++| RAM SHOB 02371 M01S00015.ns2730 +++| LDN MFDS REQUEST MAINFRAME DESCRIPTOR 02372 M01S00016.ns2730 +++| RJM IAF 02373 M00S01972.set +++| LDM DBUF+PCPF 02374 M00S01973.set +++| LPN 3 02375 M00S01974.set +++| STM .CPU 02376 M00S01975.set +++| STM .CPU+1 PRESET LOGICAL STATUS = PHYSICAL STATUS 02377 M00S01976.set +++| LDD RS 02378 M00S01977.set +++| LPN SYMK CHECK DEADSTART LEVEL 02379 M00S01978.set +++| LMN SYCM
| Line S01979 Modification History | |
|---|---|
M01 (Removed by) | set66 |
Seq # *Modification Id* Act ----------------------------+ 02380 M01S01979.set66 ---| ZJN SHO10 IF CM RECOVERY
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | set66 |
Seq # *Modification Id* Act ----------------------------+ 02381 M01S00014.set66 +++| ZJP SHO10 IF CM RECOVERY 02382 M00S01980.set +++| LDM C8XX 02383 M00S01981.set +++| NJN SHOX IF NOT CYBER 180 MAINFRAME 02384 M00S01982.set +++| STM SHOE 02385 M00S01983.set +++| LDM .CPU 02386 M00S01984.set +++| ADC 720 APPEND CME, NO STACK, CMU STATUS 02387 M00S01985.set +++| STD HO 02388 M00S01986.set +++| 02389 M00S01987.set +++|* START CYBER 180 CPU(S). 02390 M00S01988.set +++| 02391 M00S01989.set +++| SHO1 LDN 0 STORE IDLE PROGRAM AT LOCATION ZERO 02392 M00S01990.set +++| CWM SHOC,ON 02393 M00S01991.set +++| SHO2 AOM SHOA ADVANCE PROCESSOR MASK 02394 M00S01992.set +++| LMN 3 02395 M00S01993.set +++| LPN 3 02396 M00S01994.set +++| ZJP SHO7 IF TWO PROCESSORS CHECKED 02397 M00S01995.set +++| LDD HO 02398 M00S01996.set +++| LMN 3 CHECK HARDWARE OPTIONS 02399 M00S01997.set +++| SHOA LPN 0
| Line S00049 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02400 M01S00049.271l750 +++|* LPN 1 (CPU 0) 02401 M01S00050.271l750 +++|* LPN 2 (CPU 1) 02402 M00S01998.set +++| ZJN SHO2 IF CPU NOT PRESENT 02403 M00S01999.set +++| STD T4 02404 M00S02000.set +++| SHN -1 SET PROCESSOR NUMBER 02405 M00S02001.set +++| STM MBUF 02406 M00S02002.set +++| LDN CPDS REQUEST CPU DESCRIPTOR 02407 M00S02003.set +++| RJM IAF 02408 M00S02004.set +++| LDM DBUF+PSTA CHECK PROCESSOR STATUS
| Line S02005 Modification History | |
|---|---|
M01 (Removed by) | set66 |
Seq # *Modification Id* Act ----------------------------+ 02409 M01S02005.set66 ---| LPN 1 02410 M01S02006.set66 ---| SHOG SHN ** UPDATE CPU ON/OFF STATUS
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | set66 |
Seq # *Modification Id* Act ----------------------------+ 02411 M01S00015.set66 +++| LPC 1001 CHECK FOR OFF AND/OR DOWN
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | set66 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02412 M02S00016.271l750 ---| ZJN SHO2.1 IF PROCESSOR ON AND UP 02413 M02S00017.271l750 ---| SHOB LDN 1 UPDATE CPU ON/OFF STATUS 02414 M02S00018.271l750 ---|* LDN 2 (IF SECOND CPU)
| Line S00051 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02415 M01S00051.271l750 +++| ZJN SHO3 IF PROCESSOR ON AND UP 02416 M01S00052.271l750 +++| SHO2.1 LDD T4 UPDATE CPU ON/OFF STATUS 02417 M00S02007.set +++| RAM .CPU+1
| Line S02008 Modification History | |
|---|---|
M01 (Removed by) | set66 |
Seq # *Modification Id* Act ----------------------------+ 02418 M01S02008.set66 ---| AOM SHOG ADVANCE TO NEXT CPU
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | set66 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02419 M02S00019.271l750 ---| SHO2.1 AOM SHOB ADVANCE TO NEXT CPU
| Line S02009 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02420 M01S02009.271l750 ---| LDM DBUF+PSTA CHECK CYBER 170 STATE
| Line S02010 Modification History | |
|---|---|
M01 (Removed by) | set66 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02421 M02S02010.271l750 ---| SHOB LPN 3 02422 M02S02011.271l750 ---| ZJN SHO4 IF C170 STATE CPU AVAILABLE 02423 M02S02012.271l750 ---| SHO3 LDD T4
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | set66 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02424 M02S00020.271l750 ---| LPC 1003 02425 M02S00021.271l750 ---| ZJN SHO4 IF C170 STATE CPU AVAILABLE, ON AND UP 02426 M02S00022.271l750 ---| SHO3 LDD T4 DISABLE PROCESSOR
| Line S00053 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02427 M01S00053.271l750 +++| LDD T4 DISABLE PROCESSOR 02428 M00S02013.set +++| RAD HO
| Line S02014 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02429 M01S02014.271l750 ---| LJM SHO2 CHECK NEXT PROCESSOR
| Line S00054 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02430 M01S00054.271l750 +++| UJP SHO2 CHECK NEXT PROCESSOR 02431 M01S00055.271l750 +++| 02432 M01S00056.271l750 +++|* SET UP TO START SECOND CPU ON CACHE MACHINE. 02433 M01S00057.271l750 +++| 02434 M01S00058.271l750 +++| SHO3 LDM DBUF+HDMN SET PROCESSOR MODEL NUMBER 02435 M01S00059.271l750 +++| SHN -4 02436 M01S00060.271l750 +++| STM SHOF 02437 M01S00061.271l750 +++| SHN -4 02438 M01S00062.271l750 +++| LMN 0#1 02439 M01S00063.271l750 +++| NJN SHO3.2 IF NOT P1 PROCESSOR 02440 M01S00064.271l750 +++| STM ISPF SET ISMD-CAPABLE PROCESSOR FLAG 02441 M01S00065.271l750 +++| SHO3.1 LJM SHO4 START CPU 02442 M01S00066.271l750 +++| 02443 M01S00067.271l750 +++| SHO3.2 LDM SHOA 02444 M01S00068.271l750 +++| LPN 2 02445 M01S00069.271l750 +++| ZJN SHO3.1 IF NOT PROCESSING CPU 1 02446 M01S00070.271l750 +++| LDM SHOF CHECK PROCESSOR MODEL NUMBER 02447 M01S00071.271l750 +++| LMC 0#3A
| Line S00072 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
M02 (Removed by) | ns2730 |
Seq # *Modification Id* Act ----------------------------+ 02448 M02S00072.ns2730 ---| NJN SHO2.1 IF NOT 960-32, DO NOT START CPU 02449 M02S00073.ns2730 ---| LDN CPSL SET IDLE PROGRAM FOR CPU1 OF CACHE MACHINE
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | ns2730 |
Seq # *Modification Id* Act ----------------------------+ 02450 M01S00017.ns2730 +++| ZJN SHO3.5 IF 960-32 02451 M01S00018.ns2730 +++| LMN 0#32&0#3A 02452 M01S00019.ns2730 +++| ZJN SHO3.3 IF 870 02453 M01S00020.ns2730 +++| LMC 0#41&0#32 02454 M01S00021.ns2730 +++| ZJN SHO3.3 IF 990 MODEL B 02455 M01S00022.ns2730 +++| LMN 0#44&0#41 02456 M01S00023.ns2730 +++| NJN SHO3.4 IF NOT 994, DO NOT START CPU 02457 M01S00024.ns2730 +++| SHO3.3 LDN 0 02458 M01S00025.ns2730 +++|* LDN 10 (DUAL-NOS-CPU SELECTED IN *CIP*) 02459 M01S00026.ns2730 +++| SHOB EQU *-1 02460 M01S00027.ns2730 +++| STM DCPS SET DUAL-NOS-CPU SELECTED FLAG 02461 M01S00028.ns2730 +++| NJN SHO3.5 IF DUAL-NOS-CPU SELECTED 02462 M01S00029.ns2730 +++| SHO3.4 LJM SHO2.1 DO NOT START SECOND CPU 02463 M01S00030.ns2730 +++| 02464 M01S00031.ns2730 +++| SHO3.5 LDN CPSL SET IDLE PROGRAM FOR CPU1 OF CACHE MACHINE
| Line S00074 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02465 M01S00074.271l750 +++| CWM PRSA,ON 02466 M01S00075.271l750 +++| STM DCPC SET DUAL 170-STATE CPUS WITH CACHE FLAG 02467 M01S00076.271l750 +++| SCF. *,MR GET MAINTENANCE CHANNEL 02468 M01S00077.271l750 +++| LDK RMRF READ ENVIRONMENTAL CONTROL REGISTER 02469 M01S00078.271l750 +++| RJM RWR 02470 M01S00079.271l750 +++| DCN. MR 02471 M01S00080.271l750 +++| LDM RBUF+4 ENABLE PORT TO SECOND CPU 02472 M01S00081.271l750 +++| SCN 40 02473 M01S00082.271l750 +++| STM RBUF+4 02474 M01S00083.271l750 +++| LDK WMRF WRITE *EC* REGISTER 02475 M01S00084.271l750 +++| RJM RWR 02476 M01S00085.271l750 +++| FJM. *,MR IF CHANNEL BUSY, WAIT 02477 M01S00086.271l750 +++| DCN. MR 02478 M01S00087.271l750 +++| CCF. *,MR RELEASE CHANNEL 02479 M01S00088.271l750 +++| 02480 M01S00089.271l750 +++|* START CPU. 02481 M00S02015.set +++| 02482 M00S02016.set +++| SHO4 LDM DBUF+MCTC START CPU 02483 M00S02017.set +++| STM P2CC 02484 M00S02018.set +++| SCF. SHO4,MR REQUEST CHANNEL FLAG 02485 M00S02019.set +++| LMN /IOU/MRSP
| Line S02020 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02486 M01S02020.271l750 ---| FAN. MR 02487 M01S02021.271l750 ---| LDM DBUF+HDMN SET PROCESSOR MODEL NUMBER 02488 M01S02022.271l750 ---| SHN -4 02489 M01S02023.271l750 ---| STD T1 02490 M01S02024.271l750 ---| STM SHOF 02491 M01S02025.271l750 ---| LDN SHODL CHECK IF PROCESSOR SUPPORTS ISMD DEVICES 02492 M01S02026.271l750 ---| STD T2
| Line S00090 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02493 M01S00090.271l750 +++| FAN. MR START CPU 02494 M00S02027.set +++| CCF. *+2,MR
| Line S02028 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02495 M01S02028.271l750 ---| SHOE UJN SHO5 SET ISMD STATUS
| Line S00091 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02496 M01S00091.271l750 +++| UJN SHO6 CHECK NEXT PROCESSOR 02497 M00S02029.set +++|* PSN (NON - CM RECOVERY) 02498 M01S00092.271l750 +++| SHOE EQU *-1 02499 M00S02030.set +++| LDD HO 02500 M00S02031.set +++| LPN 10
| Line S02032 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02501 M01S02032.271l750 ---| NJN SHO5 IF CMU SIMULATION OFF
| Line S00093 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02502 M01S00093.271l750 +++| NJN SHO6 IF CMU SIMULATION OFF 02503 M00S02033.set +++| LDM DBUF+CPOP 02504 M00S02034.set +++| LPN 10 ADJUST CMU STATUS 02505 M00S02035.set +++| RAD HO
| Line S02036 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02506 M01S02036.271l750 ---| SHO5 SOD T2 02507 M01S02037.271l750 ---| MJN SHO6 IF END OF TABLE 02508 M01S02038.271l750 ---| LDM SHOD,T2 02509 M01S02039.271l750 ---| LMD T1 02510 M01S02040.271l750 ---| LPN 77 02511 M01S02041.271l750 ---| NJN SHO5 IF NO MATCH 02512 M01S02042.271l750 ---| STM ISPF 02513 M00S02043.set ---| SHO6 LJM SHO2 CHECK NEXT PROCESSOR 02514 M00S02044.set ---| 02515 M00S02045.set ---| 02516 M00S02046.set ---| SHOC VFD 12/0400,18/0,15/61000,15/46000
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2642 |
Seq # *Modification Id* Act ----------------------------+ 02517 M01S00001.ns2642 +++| PMNT SPACE 4,20 02518 M00S02047.set +++|** PMNT - TABLE OF PROCESSOR MODEL NUMBERS. 02519 M00S02048.set +++|* 02520 M00S02049.set +++|*T, 4/ E, 8/ M.
Figure
02521 M00S02050.set +++|* 02522 M00S02051.set +++|* E = ENTRIES PER MAINTENANCE REGISTER BUFFER. 02523 M00S02052.set +++|* M = PROCESSOR MODEL NUMBER.
| Line S00057 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02524 M01S00057.261l700 +++|* 02525 M01S00058.261l700 +++|* MODELS WHICH REQUIRE DEDICATED *DFT* STATUS AS THE DEFAULT 02526 M01S00059.261l700 +++|* MUST APPEAR AT THE START OF THE TABLE. THIS INCLUDES MODELS 02527 M01S00060.261l700 +++|* 96X AND 99X. 02528 M00S02053.set +++| 02529 M00S02054.set +++| 02530 M00S02055.set +++| PMNT BSS 0
| Line S02056 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02531 M01S02056.261l700 ---| VFD 4/6,8/100 CYBER 180-990 THIS MUST BE THE FIRST ENTRY 02532 M01S02057.261l700 ---| VFD 4/6,8/101 CYBER 180-990 MODEL B 02533 M01S02058.261l700 ---| VFD 4/5,8/64 CYBER 180-840 02534 M01S02059.261l700 ---| VFD 4/5,8/67 CYBER 180-840S 02535 M01S02060.261l700 ---| VFD 4/5,8/63 CYBER 180-850 02536 M01S02061.261l700 ---| VFD 4/5,8/62 CYBER 180-860 02537 M01S02062.261l700 ---| VFD 4/5,8/61 CYBER 170-845 02538 M01S02063.261l700 ---| VFD 4/5,8/65 CYBER 170-845S 02539 M01S02064.261l700 ---| VFD 4/5,8/60 CYBER 170-855 02540 M01S02065.261l700 ---| VFD 4/5,8/66 CYBER 170-855S 02541 M01S02066.261l700 ---| VFD 4/3,8/40 CYBER 170-835 02542 M01S02067.261l700 ---| SHOD BSS 0 TABLE FOR *ISD* PROCESSORS 02543 M01S02068.261l700 ---| VFD 4/3,8/24 CYBER 180-810 02544 M01S02069.261l700 ---| VFD 4/3,8/23 CYBER 180-830 02545 M01S02070.261l700 ---| VFD 4/3,8/22 CYBER 170-825
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2545 |
M02 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02546 M02S00001.261l700 ---| VFD 4/3,8/26 CYBER 180-825S
| Line S02071 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02547 M01S02071.261l700 ---| VFD 4/3,8/21 CYBER 170-815
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2540 |
M02 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02548 M02S00001.261l700 ---| VFD 4/3,8/25 CYBER 180-815S
| Line S00061 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02549 M01S00061.261l700 +++| VFD 4/6,8/0#40 CYBER 180-990 02550 M01S00062.261l700 +++| VFD 4/6,8/0#41 CYBER 180-990 MODEL B
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2603 |
Seq # *Modification Id* Act ----------------------------+ 02551 M01S00001.ns2603 +++| VFD 4/6,8/0#44 CYBER 180-994
| Line S00063 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
M02 (Removed by) | ns2642 |
Seq # *Modification Id* Act ----------------------------+ 02552 M02S00063.ns2642 ---| VFD 4/6,8/0#3A CYBER 180-960
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2642 |
Seq # *Modification Id* Act ----------------------------+ 02553 M01S00002.ns2642 +++| VFD 4/6,8/0#3B CYBER 180-960-11 02554 M01S00003.ns2642 +++| VFD 4/6,8/0#3A CYBER 180-960-31/32
| Line S00064 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02555 M01S00064.261l700 +++| PMNTA EQU *-PMNT END OF DEFAULT DEDICATED *DFT* MODELS 02556 M01S00065.261l700 +++| VFD 4/5,8/0#34 CYBER 180-840 02557 M01S00066.261l700 +++| VFD 4/5,8/0#37 CYBER 180-840S 02558 M01S00067.261l700 +++| VFD 4/5,8/0#33 CYBER 180-850 02559 M01S00068.261l700 +++| VFD 4/5,8/0#32 CYBER 180-860 02560 M01S00069.261l700 +++| VFD 4/5,8/0#31 CYBER 180-845 02561 M01S00070.261l700 +++| VFD 4/5,8/0#35 CYBER 180-845S 02562 M01S00071.261l700 +++| VFD 4/5,8/0#30 CYBER 180-855 02563 M01S00072.261l700 +++| VFD 4/5,8/0#36 CYBER 180-855S 02564 M01S00073.261l700 +++| VFD 4/3,8/0#20 CYBER 180-835
| Line S00074 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02565 M02S00074.271l750 ---| SHOD BSS 0 TABLE FOR *ISD* PROCESSORS
| Line S00075 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02566 M01S00075.261l700 +++| VFD 4/3,8/0#14 CYBER 180-810 02567 M01S00076.261l700 +++| VFD 4/3,8/0#13 CYBER 180-830 02568 M01S00077.261l700 +++| VFD 4/3,8/0#12 CYBER 180-825 02569 M01S00078.261l700 +++| VFD 4/3,8/0#16 CYBER 180-825S 02570 M01S00079.261l700 +++| VFD 4/3,8/0#11 CYBER 180-815 02571 M01S00080.261l700 +++| VFD 4/3,8/0#15 CYBER 180-815S 02572 M00S02072.set +++| PMNTL EQU *-PMNT LENGTH OF TABLE
| Line S02073 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02573 M01S02073.271l750 ---| SHODL EQU *-SHOD LENGTH OF *ISD* TABLE 02574 M00S02074.set ---|
| Line S00081 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 02575 M01S00081.261l700 +++| SHOH DATA C*CPU MODEL NOT FOUND*
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | set66 |
Seq # *Modification Id* Act ----------------------------+ 02576 M01S00023.set66 +++| VCC SPACE 4,10 02577 M01S00024.set66 +++|** VCC - VERIFY CPU CONFIGURATION. 02578 M01S00025.set66 +++|* 02579 M01S00026.set66 +++|* ENTRY (VCCA) = ORIGINAL (HO) FROM PRIOR DEADSTART. 02580 M01S00027.set66 +++|* 02581 M01S00028.set66 +++|* EXIT (A) = ORIGINAL (HO). 02582 M01S00029.set66 +++|* 02583 M01S00030.set66 +++|* ERROR TO *DSE* IF CPU STATE CHANGE. 02584 M01S00031.set66 +++|* 02585 M01S00032.set66 +++|* USES CM - CM+4. 02586 M01S00033.set66 +++| 02587 M01S00034.set66 +++| 02588 M01S00035.set66 +++| VCC2 LDM VCCA CHECK CPU STATE CHANGE 02589 M01S00036.set66 +++| LMD HO 02590 M01S00037.set66 +++| LPN 3 02591 M01S00038.set66 +++| ZJN VCC3 IF CPU STATUS HAS NOT CHANGED 02592 M01S00039.set66 +++| LMN 3 02593 M01S00040.set66 +++| NJN VCC1 IF CPU STATUSES HAVE NOT SWAPPED 02594 M01S00041.set66 +++| VCC3 LDC ** RESTORE (HO) 02595 M01S00042.set66 +++| VCCA EQU *-1 02596 M01S00043.set66 +++| STD HO 02597 M01S00044.set66 +++| 02598 M01S00045.set66 +++| VCC SUBR ENTRY/EXIT 02599 M01S00046.set66 +++| LDN SSTL CHECK NOS/VE STATUS 02600 M01S00047.set66 +++| CRD CM 02601 M01S00048.set66 +++| LDD CM+3 02602 M01S00049.set66 +++| SHN 0-13 02603 M01S00050.set66 +++| NJN VCC2 IF NOS/VE DISABLED 02604 M01S00051.set66 +++| LDM VCCA CHECK CPU STATE CHANGE FOR CPU 0 02605 M01S00052.set66 +++| LMD HO 02606 M01S00053.set66 +++| LPN 1
| Line S00054 Modification History | |
|---|---|
M01 (Added by) | set66 |
M02 (Removed by) | set66a |
Seq # *Modification Id* Act ----------------------------+ 02607 M02S00054.set66a ---| ZJN VCC2 IF CPU 0 AVAILABLE
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | set66a |
Seq # *Modification Id* Act ----------------------------+ 02608 M01S00001.set66a +++| ZJN VCC3 IF CPU 0 AVAILABLE
| Line S00055 Modification History | |
|---|---|
M01 (Added by) | set66 |
Seq # *Modification Id* Act ----------------------------+ 02609 M01S00055.set66 +++| VCC1 LDC VCCB *CPU STATE CHANGE.* 02610 M01S00056.set66 +++| JMP DSE DISPLAY ERROR AND HANG 02611 M01S00057.set66 +++| 02612 M01S00058.set66 +++| 02613 M01S00059.set66 +++| VCCB DATA C*CPU STATE CHANGE.* 02614 M00S02075.set +++| SPACE 4,10 02615 M00S02076.set +++|** COMMON DECKS. 02616 M00S02077.set +++| 02617 M00S02078.set +++| 02618 M00S02079.set +++| QUAL 02619 M00S02080.set +++| API$ SET 1 SELECT ALTERNATE PP REQUEST INTERFACE 02620 M00S02081.set +++| APM$ SET 1 SELECT ALTERNATE PP MANAGEMENT ROUTINE 02621 M00S02082.set +++| QUAL * 02622 M00S02083.set +++|*CALL COMPAPI 02623 M00S02084.set +++| TRCO SPACE 4,10 02624 M00S02085.set +++|** TRCO - TABLE OF RECOVERY OPTIONS. 02625 M00S02086.set +++|* ENTRY = 1 WORD. 02626 M00S02087.set +++|* INDEXED WITH RECOVERY MODE. 02627 M00S02088.set +++|* 02628 M00S02089.set +++|*T, 12/ RO
Figure
02629 M00S02090.set +++|* RO RECOVERY OPTIONS 02630 M00S02091.set +++| 02631 M00S02092.set +++| 02632 M00S02093.set +++| TRCO BSS 0 02633 M00S02094.set +++| LOC 0 02634 M00S02095.set +++| 02635 M00S02096.set +++| CON 0 02636 M00S02097.set +++| CON FLTB+SYTB 02637 M00S02098.set +++| CON FLTB 02638 M00S02099.set +++| CON JBCM+FLCM+SYCM 02639 M00S02100.set +++| 02640 M00S02101.set +++| LOC *O 02641 M00S02102.set +++| 02642 M00S02103.set +++| 02643 M00S02104.set +++| EBTA CON 0,0,0,2RRD,0 *RD* 02644 M00S02105.set +++| CON 0,0,0,0,0 02645 M00S02106.set +++| CON 0,CH+4000,0,2RDS,7000 *DS* 02646 M00S02107.set +++| CON 0,0,0,0,0 02647 M00S02108.set +++| CON 2000,0,0,2RNE,0 *NE* 02648 M00S02109.set +++| CON 0,0,0,7,0 02649 M00S02110.set +++| CON 2000,0,0,2RTE,0 *TE* 02650 M00S02111.set +++| CON 0,0,0,7,0 02651 M00S02112.set +++| CON 2000,0,0,2RTT,NIAC *TT* 02652 M00S02113.set +++| CON 0,0,0,7,0 02653 M00S02114.set +++| 02654 M00S02115.set +++| 02655 M00S02116.set +++| NIAC EQU 200 DEFAULT NUMBER OF NETWORK CONNECTIONS 02656 M00S02117.set +++| SPACE 4,10 02657 M00S02118.set +++| ERRZR BC-12 INCORRECT CHANNEL DEFINITION 02658 M00S02119.set +++| SPACE 4,10 02659 M00S02120.set +++|** CPU IDLE PROGRAMS. 02660 M00S02121.set +++| 02661 M00S02122.set +++| 02662 M00S02123.set +++| PRSA VFD 12/0400,18/CPSL,30/0 02663 M00S02124.set +++| SPACE 4,10 02664 M00S02125.set +++|** EXCHANGE PACKAGE. 02665 M00S02126.set +++| 02666 M00S02127.set +++| 02667 M00S02128.set +++| PRSB VFD 6/0,18/CPSL,36/0 02668 M00S02129.set +++| VFD 60/0 02669 M00S02130.set +++| VFD 6/0,18/200,36/0 02670 M00S02131.set +++| VFD 60/0 02671 M00S02132.set +++| VFD 60/0 02672 M00S02133.set +++| VFD 60/0 02673 M00S02134.set +++| VFD 60/0 02674 M00S02135.set +++| 02675 M00S02136.set +++| 02676 M00S02137.set +++| USE LITERALS 02677 M00S02138.set +++| TITLE PP BUFFER IDLER PROGRAM. 02678 M00S02139.set +++| IBUF BSS 0 02679 M00S02140.set +++| QUAL BPP 02680 M00S02141.set +++| MACROS SPACE 4,10 02681 M00S02142.set +++|** MACRO DEFINITIONS. 02682 M00S02143.set +++| 02683 M00S02144.set +++| 02684 M00S02145.set +++|** TBLM = GENERATE TABLE OF DEFAULT CONTROLWARE TYPES 02685 M00S02146.set +++|* TO LOAD. 02686 M00S02147.set +++|* 02687 M00S02148.set +++|* TBLM EQ 02688 M00S02149.set +++|* EQ = MASS STORAGE EQUIPMENT MNEMONIC. 02689 M00S02150.set +++| 02690 M00S02151.set +++| 02691 M00S02152.set +++| TBLM MACRO EQ 02692 M00S02153.set +++| VFD 12/2R_EQ 02693 M00S02154.set +++| VFD 12/C"FW_EQ" 02694 M00S02155.set +++| ENDM 02695 M00S02156.set +++| SPACE 4,10 02696 M00S02157.set +++|** ASSEMBLY CONSTANTS. 02697 M00S02158.set +++| 02698 M00S02159.set +++| 02699 M00S02160.set +++| Y545 EQU //Y545-YINC BOTTOM OF SCREEN - CC545 02700 M00S02161.set +++| Y721 EQU //Y721-YINC BOTTOM OF SCREEN - CDC721 02701 M00S02162.set +++| SPACE 4,10 02702 M00S02163.set +++|**** DIRECT LOCATION ASSIGNMENTS. 02703 M00S02164.set +++| 02704 M00S02165.set +++| 02705 M00S02166.set +++| LOC 0 02706 M00S02167.set +++| CON IDL-1 START ADDRESS - 1 02707 M00S02168.set +++| BSS 2 02708 M00S02169.set +++| CB BSS 5 DAYFILE AND SYSTEM DEFAULT FAMILY BUFFER 02709 M00S02170.set +++| WB BSS 5 CM WORD BUFFER 02710 M00S02171.set +++| BA CON 0 BUFFER ADDRESS 02711 M00S02172.set +++| BL CON 0 BUFFER LIMIT 02712 M00S02173.set +++| DB CON 0 DISPLAY BUFFER INDEX 02713 M00S02174.set +++| LN CON 0 LINE NUMBER 02714 M00S02175.set +++| LL CON 0 LINE LIMIT 02715 M00S02176.set +++| WC CON 0 PRU WORD COUNT 02716 M00S02177.set +++| SX CON 6 CONSTANT SIX
| Line S02178 Modification History | |
|---|---|
M01 (Removed by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 02717 M01S02178.284l847 ---| FR CON 4 CONSTANT FOUR
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 02718 M01S00019.284l847 +++| DV CON TDDCL MASS STORAGE DESCRIPTOR TABLE LENGTH 02719 M00S02179.set +++| ON CON 1 CONSTANT ONE 02720 M00S02180.set +++| PA CON 0 PROCESSOR ADDRESS 02721 M00S02181.set +++| FD CON 0 FULL DISPLAY STATUS 02722 M00S02182.set +++| FP CON 0 FUNCTION PARAMETER 02723 M00S02183.set +++| SN CON 0 SCREEN NUMBER 02724 M00S02184.set +++| DN CON -0 DECK NUMBER 02725 M00S02185.set +++| 02726 M00S02186.set +++| TDBP BSS 0 TABLE OF DISPLAY BUFFER PARAMETERS 02727 M00S02187.set +++| CON GDH INSTRUCTION DECK DISPLAY 02728 M00S02188.set +++| FA CON 0 FIRST BUFFER ADDRESS 02729 M00S02189.set +++| FW CON 0 FIRST BUFFER LINE COUNT 02730 M00S02190.set +++| FI CON 0 DISPLAY INDEX 02731 M00S02191.set +++| CON RTL TEXT DECK DISPLAY 02732 M00S02192.set +++| SA CON 0 SECOND BUFFER ADDRESS 02733 M00S02193.set +++| SW CON 0 SECOND BUFFER LINE COUNT 02734 M00S02194.set +++| SI CON 0 DISPLAY INDEX 02735 M00S02195.set +++| CON 0 EST DISPLAY 02736 M00S02196.set +++| EA CON 0 EST BUFFER ADDRESS 02737 M00S02197.set +++| EW CON NOPE EST EQUIPMENT COUNT 02738 M00S02198.set +++| EI CON 0 DISPLAY INDEX 02739 M00S02199.set +++| CON GMD MASS STORAGE DISPLAY 02740 M00S02200.set +++| MA CON 0 MST PARAMETER BUFFER ADDRESS 02741 M00S02201.set +++| MW CON NOPE DISPLAY CONTROL 02742 M00S02202.set +++| CON 0 DISPLAY INDEX 02743 M00S02203.set +++| CON GID MASS STORAGE INITIALIZATION DISPLAY 02744 M00S02204.set +++| CON 0 MST PARAMETER BUFFER ADDRESS 02745 M00S02205.set +++| IW CON NOPE DISPLAY CONTROL 02746 M00S02206.set +++| CON 0 DISPLAY INDEX 02747 M00S02207.set +++| CON GTD MASS STORAGE ERROR THRESHOLD DISPLAY 02748 M00S02208.set +++| CON 0 MST PARAMETER BUFFER ADDRESS 02749 M00S02209.set +++| TW CON NOPE DISPLAY CONTROL 02750 M00S02210.set +++| CON 0 DISPLAY INDEX 02751 M00S02211.set +++| CON GCD CONTROLWARE STATUS DISPLAY 02752 M00S02212.set +++| CON 0 BUFFER ADDRESS 02753 M00S02213.set +++| CW CON 0 DISPLAY CONTROL 02754 M00S02214.set +++| CON 0 DISPLAY INDEX 02755 M00S02215.set +++| CON 0 END OF DISPLAYS 02756 M00S02216.set +++| 02757 M00S02217.set +++| CV CON 0 CLOCK VALUE 02758 M00S02218.set +++| ET CON 0 ELAPSED TIME 02759 M00S02219.set +++| BSS 77-* 02760 M00S02220.set +++| YY CON YCSH Y-COORDINATE 02761 M00S02221.set +++| XX CON CH01 X-COORDINATE 02762 M00S02222.set +++| LBUF EQU YY+2 LINE BUFFER 02763 M00S02223.set +++| BSS KBUFL/2 02764 M00S02224.set +++| CON 0 02765 M00S02225.set +++|**** 02766 M00S02226.set +++| IDL SPACE 4,10 02767 M00S02227.set +++|** IDL - IDLER. 02768 M00S02228.set +++| 02769 M00S02229.set +++| 02770 M00S02230.set +++| IDL IAN BC INPUT FUNCTION REQUEST 02771 M00S02231.set +++| STD T1 02772 M00S02232.set +++| LDM TFCN,T1 PROCESS FUNCTION 02773 M00S02233.set +++| STM IDLA 02774 M00S02234.set +++| IAN BC INPUT PARAMETER 02775 M00S02235.set +++| LJM * 02776 M00S02236.set +++| IDLA EQU *-1 02777 M00S02237.set +++| TFCN SPACE 4 02778 M00S02238.set +++|** TFCN - FUNCTION PROCESSORS. 02779 M00S02239.set +++| 02780 M00S02240.set +++| 02781 M00S02241.set +++| TFCN BSS 0 02782 M00S02242.set +++| LOC 0 02783 M00S02243.set +++| DFIM (CON RSP1) 02784 M00S02244.set +++| CON RSP RESET PP 02785 M00S02245.set +++| CON IFB INPUT FIRST BUFFER 02786 M00S02246.set +++| CON ISB INPUT SECOND BUFFER 02787 M00S02247.set +++| CON DDD DISPLAY BUFFER DATA 02788 M00S02248.set +++| CON UEC UPDATE EQUIPMENT COUNT 02789 M00S02249.set +++| CON ONL OUTPUT NEXT LINE 02790 M00S02250.set +++| CON RCL REPLACE CURRENT LINE 02791 M00S02251.set +++| CON ANL ADD NEXT LINE 02792 M00S02252.set +++| CON ADB ADVANCE BUFFER 02793 M00S02253.set +++| CON ADD ADVANCE DISPLAY 02794 M00S02254.set +++| CON RPS RESET POINTERS ON SECOND BUFFER 02795 M00S02255.set +++| LOC *L+TFCN 02796 M00S02256.set +++| TIDP SPACE 4,10 02797 M00S02257.set +++|** TIDP - TABLE OF INITIAL DISPLAY PROCESSORS. 02798 M00S02258.set +++| 02799 M00S02259.set +++| 02800 M00S02260.set +++| TIDP BSS 0 02801 M00S02261.set +++| LOC 0 02802 M00S02262.set +++| CMRD CON GDH CMRDECK 02803 M00S02263.set +++| EQPD CON EQP EQPDECK 02804 M00S02264.set +++| APRD CON ADP APRDECK 02805 M00S02265.set +++| IPRD CON GDH IPRDECK 02806 M00S02266.set +++| LOC *L+TIDP 02807 M00S02267.set +++| SPACE 4,10 02808 M00S02268.set +++|** DISPLAY SUBROUTINES. 02809 M00S02269.set +++| 02810 M00S02270.set +++| 02811 M00S02271.set +++| FNC DSUB 02812 M00S02272.set +++| RSP SPACE 4 02813 M00S02273.set +++|** RSP - RESET PP. 02814 M00S02274.set +++| 02815 M00S02275.set +++| 02816 M00S02276.set +++| RSP1 CFNC SLSF SELECT LEFT SCREEN - SMALL CHARACTERS 02817 M00S02277.set +++| DISPLA CH20,LN15,(INITIALIZING SYSTEM LOAD.) 02818 M00S02278.set +++| CFNC THCF TRANSFER HIDDEN AND CLEAR 02819 M00S02279.set +++| DFIM (CON SDCF),*+1 02820 M00S02280.set +++| RSP LDC DDCF CLEAR DISPLAY CONTROLLER 02821 M00S02281.set +++| CFNC 02822 M00S02282.set +++| LDC 1000 02823 M00S02283.set +++| OAN BC 02824 M00S02284.set +++| SBN 1 02825 M00S02285.set +++| NJN *-1 02826 M00S02286.set +++| DCN CH 02827 M00S02287.set +++| IAM 0,BC 02828 M00S02288.set +++| IFB SPACE 4 02829 M00S02289.set +++|** IFB - INPUT FIRST BUFFER. 02830 M00S02290.set +++| 02831 M00S02291.set +++| 02832 M00S02292.set +++| IFB STD DN SET DECK TYPE 02833 M00S02293.set +++| LDN FA UNPACK INSTRUCTION DECK 02834 M00S02294.set +++| RJM UTD 02835 M00S02295.set +++| ADN 7 SET SECOND BUFFER ADDRESS 02836 M00S02296.set +++| SHN -3 02837 M00S02297.set +++| ADD FA 02838 M00S02298.set +++| STD SA 02839 M00S02299.set +++| LDN 0 SET DISPLAY POINTER TO FIRST BUFFER 02840 M00S02300.set +++| STD DB 02841 M00S02301.set +++| STD EA-1 DISABLE EQPDECK DISPLAYS 02842 M00S02302.set +++| LDM TIDP,DN SET INITIAL DISPLAY PROCESSOR 02843 M00S02303.set +++| STD SA-1 02844 M00S02304.set +++| JMP IDL RETURN 02845 M00S02305.set +++| ISB SPACE 4 02846 M00S02306.set +++|** ISB - INPUT SECOND BUFFER. 02847 M00S02307.set +++| 02848 M00S02308.set +++| 02849 M00S02309.set +++| ISB LDN SA UNPACK TEXT DECK 02850 M00S02310.set +++| RJM UTD 02851 M00S02311.set +++| JMP IDL RETURN 02852 M00S02312.set +++| DDD SPACE 4,10 02853 M00S02313.set +++|** DDD - DISPLAY DEADSTART DATA. 02854 M00S02314.set +++| 02855 M00S02315.set +++| 02856 M00S02316.set +++| DDD LDM TDBP+3,DB SET BUFFER INDEX 02857 M00S02317.set +++| STD T1 02858 M00S02318.set +++| LDN 1 02859 M00S02319.set +++| STD SN 02860 M00S02320.set +++| IAN. 14 SET INITIAL CLOCK VALUE 02861 M00S02321.set +++| STD CV 02862 M00S02322.set +++| LDC SLSF SELECT LEFT SCREEN - SMALL CHARACTERS 02863 M00S02323.set +++| DDD1 CFNC 02864 M00S02324.set +++| LDM TDBP,DB SET PROCESSOR ADDRESS 02865 M00S02325.set +++| STD PA 02866 M00S02326.set +++| LDC BL01 SET Y-COORDINATE 02867 M00S02327.set +++| STD YY 02868 M00S02328.set +++| DDD3 RJM 0,PA FETCH DISPLAY LINE 02869 M00S02329.set +++| MJN DDD9 IF FORMAT EFFECTOR ENCOUNTERED 02870 M00S02330.set +++| NJN DDD6 IF NOT END OF DISPLAY 02871 M00S02331.set +++| DDD4 STD FD 02872 M00S02332.set +++| DDD5 RJM CDP COMPLETE DISPLAY PROCESSING 02873 M00S02333.set +++| DCN BC 02874 M00S02334.set +++| JMP IDL RETURN 02875 M00S02335.set +++| 02876 M00S02336.set +++| DDD6 OAM. YY,CH OUTPUT DISPLAY LINE 02877 M00S02337.set +++| DFIM (UJN DDD8) 02878 M00S02338.set +++| IAN. 14 READ CLOCK 02879 M00S02339.set +++| STD T0 02880 M00S02340.set +++| SBD CV 02881 M00S02341.set +++| PJN DDD7 IF NO OVERFLOW 02882 M00S02342.set +++| ADC 10000 02883 M00S02343.set +++| DDD7 SHN -11 02884 M00S02344.set +++| ZJN DDD8 IF NOT HALF MILLISECOND ELAPSED 02885 M00S02345.set +++| RAD ET 02886 M00S02346.set +++| LDD T0 02887 M00S02347.set +++| STD CV SET NEW CLOCK VALUE 02888 M00S02348.set +++| DDD8 AOD T1 02889 M00S02349.set +++| STD FD ADVANCE FULL DISPLAY STATUS 02890 M00S02350.set +++| LMM TDBP+2,DB 02891 M00S02351.set +++| ZJN DDD4 IF END OF DATA IN BUFFER 02892 M00S02352.set +++| LCN YINC 02893 M00S02353.set +++| RAD YY ADVANCE Y-COORDINATE 02894 M00S02354.set +++| DFIM (ADC -Y721) 02895 M00S02355.set +++| ADC -Y545 02896 M00S02356.set +++| PJN DDD3 IF NOT BOTTOM OF SCREEN 02897 M00S02357.set +++| DDD9 SOD SN 02898 M00S02358.set +++| MJN DDD5 IF RIGHT SCREEN DISPLAYED 02899 M00S02359.set +++| FJM. *,CH 02900 M00S02360.set +++| DCN. CH 02901 M00S02361.set +++| LDC SRSF SELECT RIGHT SCREEN 02902 M00S02362.set +++| LJM DDD1 DISPLAY RIGHT SCREEN 02903 M00S02363.set +++| UEC SPACE 4,10 02904 M00S02364.set +++|** UEC - UPDATE EQUIPMENT COUNT. 02905 M00S02365.set +++| 02906 M00S02366.set +++| 02907 M00S02367.set +++| UEC STD EW UPDATE EQUIPMENT LIMIT 02908 M00S02368.set +++| DCN BC 02909 M00S02369.set +++| STD MW 02910 M00S02370.set +++| STD IW 02911 M00S02371.set +++| STD TW 02912 M00S02372.set +++| JMP IDL RETURN 02913 M00S02373.set +++| ONL SPACE 4 02914 M00S02374.set +++|** ONL - OUTPUT NEXT LINE. 02915 M00S02375.set +++| 02916 M00S02376.set +++| 02917 M00S02377.set +++| ONL AOD LN ADVANCE LINE NUMBER 02918 M00S02378.set +++| LMD SW 02919 M00S02379.set +++| ZJN ONL1 IF END OF DATA 02920 M00S02380.set +++| LDD SA 02921 M00S02381.set +++| SHN 3 02922 M00S02382.set +++| ADD LN READ NEXT LINE 02923 M00S02383.set +++| SHN 3 02924 M00S02384.set +++| ONL1 CRM LBUF,SX 02925 M00S02385.set +++| LDN LBUFL+1 OUTPUT LINE 02926 M00S02386.set +++| OAM LBUF,BC 02927 M00S02387.set +++| AJM *,BC WAIT OUTPUT COMPLETE 02928 M00S02388.set +++| JMP IDL RETURN 02929 M00S02389.set +++| RCL SPACE 4,10 02930 M00S02390.set +++|** RCL - REPLACE CURRENT LINE. 02931 M00S02391.set +++| 02932 M00S02392.set +++| 02933 M00S02393.set +++| RCL LDD LN REPLACE LINE 02934 M00S02394.set +++| RJM ADL 02935 M00S02395.set +++| JMP IDL RETURN 02936 M00S02396.set +++| ANL SPACE 4 02937 M00S02397.set +++|** ANL - ADD NEXT LINE. 02938 M00S02398.set +++| 02939 M00S02399.set +++| 02940 M00S02400.set +++| ANL LDD SW ADD LINE 02941 M00S02401.set +++| RJM ADL 02942 M00S02402.set +++| ZJN ANL1 IF BUFFER FULL 02943 M00S02403.set +++| AOD SW ADVANCE LINE COUNT 02944 M00S02404.set +++| ANL1 JMP IDL RETURN 02945 M00S02405.set +++| ADB SPACE 4,10 02946 M00S02406.set +++|** ADB - ADVANCE BUFFER. 02947 M00S02407.set +++| 02948 M00S02408.set +++| 02949 M00S02409.set +++| ADB LDD FD 02950 M00S02410.set +++| ZJN ADB1 IF NOT FULL DISPLAY 02951 M00S02411.set +++| LMM TDBP+2,DB 02952 M00S02412.set +++| ZJN ADB1 IF END OF BUFFER 02953 M00S02413.set +++| LDD FD 02954 M00S02414.set +++| ADB1 STM TDBP+3,DB RESET BUFFER INDEX 02955 M00S02415.set +++| ADB2 DCN BC 02956 M00S02416.set +++| JMP IDL RETURN 02957 M00S02417.set +++| ADD SPACE 4,10 02958 M00S02418.set +++|** ADD - ADVANCE DISPLAY. 02959 M00S02419.set +++| 02960 M00S02420.set +++| 02961 M00S02421.set +++| ADD LDN SA-FA ADVANCE DISPLAY POINTER 02962 M00S02422.set +++| RAD DB 02963 M00S02423.set +++| LDM TDBP,DB 02964 M00S02424.set +++| NJN ADD1 IF NOT END OF DISPLAYS 02965 M00S02425.set +++| STD DB RESET FIRST DISPLAY 02966 M00S02426.set +++| ADD1 JMP ADB2 RETURN 02967 M00S02427.set +++| RPS SPACE 4,10 02968 M00S02428.set +++|** RPS - RESET POINTERS ON SECOND BUFFER. 02969 M00S02429.set +++| 02970 M00S02430.set +++| 02971 M00S02431.set +++| RPS STD FP 02972 M00S02432.set +++| LDN 0 RESET LINE NUMBER 02973 M00S02433.set +++| STD LN 02974 M00S02434.set +++| JMP ADB2 RETURN 02975 M00S02435.set +++| ADL SPACE 4,10 02976 M00S02436.set +++|** ADL - ADD DISPLAY LINE. 02977 M00S02437.set +++|* 02978 M00S02438.set +++|* ENTRY (A) = LINE NUMBER. 02979 M00S02439.set +++|* 02980 M00S02440.set +++|* EXIT (A) = FIRST BYTE OF NEW LINE. 02981 M00S02441.set +++|* 02982 M00S02442.set +++|* USES T1, T2. 02983 M00S02443.set +++|* 02984 M00S02444.set +++|* CALLS CLB. 02985 M00S02445.set +++| 02986 M00S02446.set +++| 02987 M00S02447.set +++| ADL1 IAN BC INPUT CHARACTER 02988 M00S02448.set +++| SHN 6 02989 M00S02449.set +++| STI T2 ASSEMBLE DISPLAY LINE 02990 M00S02450.set +++| ADL2 IAN BC 02991 M00S02451.set +++| ZJN ADL3 IF END OF DATA 02992 M00S02452.set +++| RAI T2 02993 M00S02453.set +++| AOD T2 ADVANCE LINE ADDRESS 02994 M00S02454.set +++| LMC LBUF+LBUFL 02995 M00S02455.set +++| NJN ADL1 IF LINE NOT COMPLETE 02996 M00S02456.set +++| ADL3 DCN BC 02997 M00S02457.set +++| LDD T1 CHECK LINE LIMIT 02998 M00S02458.set +++| LMD LL 02999 M00S02459.set +++| ZJN ADLX IF BUFFER FULL 03000 M00S02460.set +++| LDD SA 03001 M00S02461.set +++| SHN 3 03002 M00S02462.set +++| ADD T1 STORE NEW LINE 03003 M00S02463.set +++| SHN 3 03004 M00S02464.set +++| CWM LBUF,SX 03005 M00S02465.set +++| LDM LBUF 03006 M00S02466.set +++| 03007 M00S02467.set +++| ADL SUBR ENTRY/EXIT 03008 M00S02468.set +++| STD T1 SAVE LINE NUMBER 03009 M00S02469.set +++| OAN BC 03010 M00S02470.set +++| RJM CLB CLEAR LINE BUFFER 03011 M00S02471.set +++| UJN ADL2 ASSEMBLE LINE 03012 M00S02472.set +++| ADP SPACE 4,10 03013 M00S02473.set +++|** ADP - INITIAL APRDECK DISPLAY PROCESSOR. 03014 M00S02474.set +++|* 03015 M00S02475.set +++|* ENTRY (FP) = EST ORDINAL. 03016 M00S02476.set +++|* 03017 M00S02477.set +++|* EXIT SEE *RTL*. 03018 M00S02478.set +++|* (PA) = RTL. 03019 M00S02479.set +++|* (YY) = COORDINATE FOR NEXT TEXT DECK LINE. 03020 M00S02480.set +++|* 03021 M00S02481.set +++|* CALLS GEL, RTL. 03022 M00S02482.set +++| 03023 M00S02483.set +++| 03024 M00S02484.set +++| ADP SUBR ENTRY/EXIT 03025 M00S02485.set +++| LCN YINC 03026 M00S02486.set +++| RAD YY 03027 M00S02487.set +++| LDN EDHAA OUTPUT DISPLAY HEADER 03028 M00S02488.set +++| OAM EDHA,CH 03029 M00S02489.set +++| LDD FP GENERATE EQUIPMENT DISPLAY LINE 03030 M00S02490.set +++| STD T1 03031 M00S02491.set +++| RJM GEL 03032 M00S02492.set +++| OAM YY,CH DISPLAY EQUIPMENT STATUS 03033 M00S02493.set +++| LCN 2*YINC 03034 M00S02494.set +++| RAD YY 03035 M00S02495.set +++| LDD SI RESTORE TEXT DECK LINE NUMBER 03036 M00S02496.set +++| STD T1 03037 M00S02497.set +++| LDC RTL CHANGE DISPLAY PROCESSOR 03038 M00S02498.set +++| STD PA 03039 M00S02499.set +++| RJM RTL READ TEXT LINE 03040 M00S02500.set +++| UJN ADPX RETURN 03041 M00S02501.set +++| CCD SPACE 4,10 03042 M00S02502.set +++|** CCD - CONVERT CHANNEL FOR DISPLAY. 03043 M00S02503.set +++|* 03044 M00S02504.set +++|* ENTRY (A) = CHANNEL DATA. 03045 M00S02505.set +++|* (WB - WB+4) = EST DATA. 03046 M00S02506.set +++|*
| Line S02507 Modification History | |
|---|---|
M01 (Removed by) | set68 |
Seq # *Modification Id* Act ----------------------------+ 03047 M01S02507.set68 ---|* EXIT (A) = 0 IF NOT CONCURRENT CHANNEL. 03048 M01S02508.set68 ---|* = (T2) = LINE ADDRESS ADJUSTED.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | set68 |
Seq # *Modification Id* Act ----------------------------+ 03049 M01S00001.set68 +++|* EXIT (A) = (T2) = LINE ADDRESS ADJUSTED. 03050 M00S02509.set +++|* 03051 M00S02510.set +++|* USES BA. 03052 M00S02511.set +++|* 03053 M00S02512.set +++|* CALLS C2D. 03054 M00S02513.set +++| 03055 M00S02514.set +++| 03056 M00S02515.set +++| CCD SUBR ENTRY/EXIT 03057 M00S02516.set +++| STD BA 03058 M00S02517.set +++| LPN 40 03059 M00S02518.set +++| ZJN CCD1 IF NOT A CONCURRENT CHANNEL 03060 M00S02519.set +++| LDN 1R &1RC 03061 M00S02520.set +++| CCD1 LMC 2R 03062 M00S02521.set +++| STI T2 03063 M00S02522.set +++| AOD T2 03064 M00S02523.set +++| LDD BA CONVERT CHANNEL NUMBER 03065 M00S02524.set +++| LPN 37 03066 M00S02525.set +++| RJM C2D 03067 M01S00002.set68 +++| SOD T2 03068 M00S02526.set +++| LDD BA CHECK TYPE OF CHANNEL 03069 M00S02527.set +++| LPN 40
| Line S02528 Modification History | |
|---|---|
M01 (Removed by) | set68 |
Seq # *Modification Id* Act ----------------------------+ 03070 M01S02528.set68 ---| ZJN CCDX IF NOT CONCURRENT CHANNEL
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | set68 |
Seq # *Modification Id* Act ----------------------------+ 03071 M01S00003.set68 +++| ZJN CCD2 IF NOT CONCURRENT CHANNEL 03072 M00S02529.set +++| LDD BA 03073 M00S02530.set +++| SHN 0-7 EXTRACT PORT NUMBER 03074 M00S02531.set +++| LPN 1 03075 M00S02532.set +++| ADC 2R-A CONVERT TO A OR B
| Line S02533 Modification History | |
|---|---|
M01 (Removed by) | set68 |
Seq # *Modification Id* Act ----------------------------+ 03076 M01S02533.set68 ---| STM -1,T2
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | set68 |
Seq # *Modification Id* Act ----------------------------+ 03077 M01S00004.set68 +++| STI T2 03078 M01S00005.set68 +++| AOD T2 03079 M00S02534.set +++| LDC 2R. ADJUST SEPARATOR 03080 M00S02535.set +++| STI T2
| Line S02536 Modification History | |
|---|---|
M01 (Removed by) | set68 |
Seq # *Modification Id* Act ----------------------------+ 03081 M01S02536.set68 ---| LDN 2 ADVANCE ADDRESS 03082 M01S02537.set68 ---| RAD T2 03083 M01S02538.set68 ---| UJN CCDX RETURN
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | set68 |
Seq # *Modification Id* Act ----------------------------+ 03084 M01S00006.set68 +++| CCD2 LDD BA CHECK CHANNEL STATE 03085 M01S00007.set68 +++| SHN 21-12 03086 M01S00008.set68 +++| PJN CCD3 IF CHANNEL IS NOT DOWN 03087 M01S00009.set68 +++| LDC 2R* INDICATE CHANNEL DOWN 03088 M01S00010.set68 +++| STI T2 03089 M01S00011.set68 +++| CCD3 AOD T2 ADVANCE ADDRESS 03090 M01S00012.set68 +++| UJP CCDX EXIT 03091 M00S02539.set +++| CDI SPACE 4,10 03092 M00S02540.set +++|** CDI - CHECK DISPLAY INDEX. 03093 M00S02541.set +++|* 03094 M00S02542.set +++|* ENTRY (T1) = DISPLAY INDEX. 03095 M00S02543.set +++|* (EW) = CURRENT EQUIPMENT COUNT. 03096 M00S02544.set +++| 03097 M00S02545.set +++| 03098 M00S02546.set +++| CDI SUBR ENTRY/EXIT 03099 M00S02547.set +++| LDD T1 03100 M00S02548.set +++| SBD EW 03101 M00S02549.set +++| MJN CDIX IF INDEX BELOW LIMIT 03102 M00S02550.set +++| LDN 0 03103 M00S02551.set +++| STD T1 SET INDEX TO FIRST PAGE OF DISPLAY 03104 M00S02552.set +++| STM TDBP+3,DB 03105 M00S02553.set +++| UJN CDIX RETURN 03106 M00S02554.set +++| CDP SPACE 4,10 03107 M00S02555.set +++|** CDP - COMPLETE DISPLAY PROCESSING. 03108 M00S02556.set +++|* 03109 M00S02557.set +++|* ENTRY (ET) = ELAPSED TIME FOR DISPLAY GENERATION. 03110 M00S02558.set +++|* 03111 M00S02559.set +++|* EXIT (ET) = 0. 03112 M00S02560.set +++|* 03113 M00S02561.set +++|* MACROS CFNC, DFIM. 03114 M00S02562.set +++| 03115 M00S02563.set +++| 03116 M00S02564.set +++| CDP SUBR ENTRY/EXIT 03117 M00S02565.set +++| CFNC THCF 03118 M00S02566.set +++| DCN. CH 03119 M00S02567.set +++| DFIM (UJN CDPX) 03120 M00S02568.set +++| LDN 21DS1 CALCULATE REFRESH DELAY 03121 M00S02569.set +++| SBD ET 03122 M00S02570.set +++| PJN CDP1 IF REFRESH TIME NOT EXCEEDED 03123 M00S02571.set +++| LDN 0 03124 M00S02572.set +++| CDP1 SHN 10-1 POSITION DELAY VALUE 03125 M00S02573.set +++| CDPA EQU CDP1 03126 M00S02574.set +++| ZJN CDP2 IF REFRESH CYCLE AT LIMIT 03127 M00S02575.set +++| SBN 1 03128 M00S02576.set +++| NJN *-1 DELAY 03129 M00S02577.set +++| CDP2 STD ET 03130 M00S02578.set +++| UJN CDPX RETURN 03131 M00S02579.set +++| CLB SPACE 4,10 03132 M00S02580.set +++|** CLB - CLEAR LINE BUFFER. 03133 M00S02581.set +++|* 03134 M00S02582.set +++|* EXIT (T2) = LBUF. 03135 M00S02583.set +++| 03136 M00S02584.set +++| 03137 M00S02585.set +++| CLB SUBR ENTRY/EXIT 03138 M00S02586.set +++| LDN 0 03139 M00S02587.set +++| CRM LBUF,SX 03140 M00S02588.set +++| LDC LBUF SET BUFFER ADDRESS 03141 M00S02589.set +++| STD T2 03142 M00S02590.set +++| UJN CLBX RETURN 03143 M00S02591.set +++| C1D SPACE 4,10 03144 M00S02592.set +++|** C1D - CONVERT ONE DIGIT. 03145 M00S02593.set +++|* 03146 M00S02594.set +++|* ENTRY (A) = VALUE TO CONVERT. 03147 M00S02595.set +++|* (T2) = ADDRESS TO STORE CONVERSION. 03148 M00S02596.set +++|* 03149 M00S02597.set +++|* EXIT (A) = (T2) ADVANCED. 03150 M00S02598.set +++| 03151 M00S02599.set +++| 03152 M00S02600.set +++| C1D SUBR ENTRY/EXIT 03153 M00S02601.set +++| LPN 7 03154 M00S02602.set +++| ADC 2R 0 CONVERT DIGIT 03155 M00S02603.set +++| STI T2 03156 M00S02604.set +++| AOD T2 ADVANCE ADDRESS 03157 M00S02605.set +++| LDC 2R. 03158 M00S02606.set +++| STI T2 STORE SEPARATOR 03159 M00S02607.set +++| AOD T2 03160 M00S02608.set +++| UJN C1DX RETURN 03161 M00S02609.set +++| C2D SPACE 4,10 03162 M00S02610.set +++|** C2D - CONVERT TWO DIGITS. 03163 M00S02611.set +++|* 03164 M00S02612.set +++|* ENTRY (A) = VALUE TO CONVERT. 03165 M00S02613.set +++|* (T2) = ADDRESS TO STORE CONVERSION. 03166 M00S02614.set +++|* 03167 M00S02615.set +++|* EXIT (A) = (T2) ADVANCED. 03168 M00S02616.set +++| 03169 M00S02617.set +++| 03170 M00S02618.set +++| C2D SUBR ENTRY/EXIT 03171 M00S02619.set +++| LPN 77 03172 M00S02620.set +++| STD T0 CONVERT DIGITS 03173 M00S02621.set +++| SHN 3 03174 M00S02622.set +++| LMD T0 03175 M00S02623.set +++| SCN 70 03176 M00S02624.set +++| ADC 2R00 STORE CONVERSION 03177 M00S02625.set +++| STI T2 03178 M00S02626.set +++| AOD T2 ADVANCE ADDRESS 03179 M00S02627.set +++| LDC 2R. 03180 M00S02628.set +++| STI T2 STORE SEPARATOR 03181 M00S02629.set +++| AOD T2 03182 M00S02630.set +++| UJN C2DX RETURN 03183 M00S02631.set +++| D4S SPACE 4,10 03184 M00S02632.set +++|** D4S - DISPLAY 4 DIGITS WITH LEADING ZERO SUPPRESSION. 03185 M00S02633.set +++|* ROUTINE ADAPTED FROM *COMDDIS*. 03186 M00S02634.set +++|* 03187 M00S02635.set +++|* ENTRY (A) = VALUE TO BE CONVERTED. 03188 M00S02636.set +++|* (T2) = BUFFER INDEX. 03189 M00S02637.set +++|* 03190 M00S02638.set +++|* EXIT (T2) ADVANCED. 03191 M00S02639.set +++|* 03192 M00S02640.set +++|* USES T2. 03193 M00S02641.set +++| 03194 M00S02642.set +++| 03195 M00S02643.set +++| D4S SUBR ENTRY/EXIT 03196 M00S02644.set +++| STD T0 03197 M00S02645.set +++| SHN -6 03198 M00S02646.set +++| ZJN D4S2 IF FIRST TWO DIGITS ARE ZERO 03199 M00S02647.set +++| SHN -3 03200 M00S02648.set +++| ZJN D4S1 IF FIRST DIGIT IS ZERO 03201 M00S02649.set +++| ADN 1R0 03202 M00S02650.set +++| SHN 14 03203 M00S02651.set +++| D4S1 ADD T0 03204 M00S02652.set +++| SHN -6 03205 M00S02653.set +++| SCN 70 03206 M00S02654.set +++| ADN 1R0 03207 M00S02655.set +++| D4S2 STI T2 STORE UPPER DIGIT(S) 03208 M00S02656.set +++| AOD T2 03209 M00S02657.set +++| LDD T0 03210 M00S02658.set +++| ZJN D4S4 IF ALL FOUR DIGITS ARE ZERO 03211 M00S02659.set +++| SHN -3 03212 M00S02660.set +++| ZJN D4S3 IF FIRST THREE DIGITS ARE ZERO 03213 M00S02661.set +++| LPN 7 03214 M00S02662.set +++| ADN 1R0 03215 M00S02663.set +++| SHN 6 03216 M00S02664.set +++| D4S3 LMD T0 03217 M00S02665.set +++| SCN 7 03218 M00S02666.set +++| LMD T0 03219 M00S02667.set +++| D4S4 ADN 1R0 STORE LOWER DIGIT(S) 03220 M00S02668.set +++| STI T2 03221 M00S02669.set +++| AOD T2 03222 M00S02670.set +++| LDC 2R. STORE SEPARATOR 03223 M00S02671.set +++| STI T2 03224 M00S02672.set +++| AOD T2 03225 M00S02673.set +++| LJM D4SX RETURN 03226 M00S02674.set +++| EQP SPACE 4,10 03227 M00S02675.set +++|** EQP - INITIAL EQPDECK DISPLAY PROCESSOR. 03228 M00S02676.set +++|* 03229 M00S02677.set +++|* EXIT SEE *GDH*. 03230 M00S02678.set +++|* EST DISPLAY ENABLED. 03231 M00S02679.set +++|* 03232 M00S02680.set +++|* CALLS GDH. 03233 M00S02681.set +++| 03234 M00S02682.set +++| 03235 M00S02683.set +++| EQP SUBR ENTRY/EXIT 03236 M00S02684.set +++| LDC GED ENABLE EQPDECK DISPLAYS 03237 M00S02685.set +++| STD EA-1 03238 M00S02686.set +++| LDC GDH CHANGE PROCESSOR ADDRESS 03239 M00S02687.set +++| STD SA-1 03240 M00S02688.set +++| RJM GDH 03241 M00S02689.set +++| UJN EQPX RETURN 03242 M00S02690.set +++| GCD SPACE 4,15 03243 M00S02691.set +++|** GCD - INITIATE CONTROLWARE STATUS DISPLAY. 03244 M00S02692.set +++|* 03245 M00S02693.set +++|* ENTRY (T1) = CHANNEL NUMBER. 03246 M00S02694.set +++|* (EW) = CURRENT EQUIPMENT COUNT. 03247 M00S02695.set +++|* 03248 M00S02696.set +++|* EXIT SEE *GCL*. 03249 M00S02697.set +++|* (A) = 0 IF NO MORE CHANNELS 03250 M00S02698.set +++|* (PA) = GCL. 03251 M00S02699.set +++|* (YY) = COORDINATE FOR NEXT DISPLAY. 03252 M00S02700.set +++|* 03253 M00S02701.set +++|* USES FP, PA, T0, T1, T2. 03254 M00S02702.set +++|* 03255 M00S02703.set +++|* CALLS GCL, REP, SCT. 03256 M00S02704.set +++| 03257 M00S02705.set +++| 03258 M00S02706.set +++| GCD6 RJM GCL GENERATE CONTROLWARE STATUS LINE 03259 M00S02707.set +++| ZJN GCDX IF NO MORE CHANNELS 03260 M00S02708.set +++| STD T2 03261 M00S02709.set +++| LCN YINC ADJUST Y-COORDINATE 03262 M00S02710.set +++| RAD YY 03263 M00S02711.set +++| LDN EDHDA OUTPUT DISPLAY HEADER 03264 M00S02712.set +++| OAM EDHD,CH 03265 M00S02713.set +++| LDC GCL CHANGE PROCESSOR ADDRESS 03266 M00S02714.set +++| STD PA 03267 M00S02715.set +++| LDD T2 03268 M00S02716.set +++| 03269 M00S02717.set +++| GCD SUBR ENTRY/EXIT 03270 M00S02718.set +++| LDD T1 03271 M00S02719.set +++| NJN GCD6 IF CONTROLWARE TABLE PROCESSED 03272 M00S02720.set +++| GCD1 LDN CTALL 03273 M00S02721.set +++| STD FP 03274 M00S02722.set +++| LDD MA READ CONTROLWARE STATUSES
| Line S02723 Modification History | |
|---|---|
M01 (Removed by) | set81 |
Seq # *Modification Id* Act ----------------------------+ 03275 M01S02723.set81 ---| ADN 10*TDDCL
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | set81 |
Seq # *Modification Id* Act ----------------------------+ 03276 M01S00010.set81 +++| ADN TDDBL 03277 M00S02724.set +++| SHN 6 03278 M00S02725.set +++| CRM TCCS,FP 03279 M00S02726.set +++| GCD2 RJM REP READ EQUIPMENT PARAMETERS 03280 M00S02727.set +++| ZJN GCD5 IF NOT MASS STORAGE 03281 M00S02728.set +++| LDD WB+1 03282 M00S02729.set +++| LMN 37 03283 M00S02730.set +++| ZJN GCD5 IF ISMD CHANNELS NOT YET SPECIFIED 03284 M00S02731.set +++| LDD WB+3 03285 M00S02732.set +++| RJM SCT SEARCH CONTROLWARE TABLE 03286 M00S02733.set +++| ZJN GCD5 IF NOT FOUND 03287 M00S02734.set +++| LDD WB+1 SET CHANNEL 03288 M00S02735.set +++| LPN 77 03289 M00S02736.set +++| GCD3 STD FP 03290 M00S02737.set +++| LDI T2 DEFAULT CONTROLWARE FOR LOAD 03291 M00S02738.set +++| SBM TCCS,FP 03292 M00S02739.set +++| MJN GCD4 IF OTHER DEFAULT HAS PRIORITY 03293 M00S02740.set +++| RAM TCCS,FP 03294 M00S02741.set +++| GCD4 LDD WB+2 03295 M00S02742.set +++| LPN 77 03296 M00S02743.set +++| SHN 14 03297 M00S02744.set +++| STD WB+2 03298 M00S02745.set +++| SHN 6 03299 M00S02746.set +++| NJN GCD3 IF NOT END OF CHANNELS 03300 M00S02747.set +++| GCD5 AOD T1 03301 M00S02748.set +++| LMD EW 03302 M00S02749.set +++| NJN GCD2 IF MORE EQUIPMENT TO CHECK 03303 M00S02750.set +++| STD T1 SET CHANNEL NUMBER 03304 M00S02751.set +++| LJM GCD6 GENERATE CONTROLWARE STATUS LINE 03305 M00S02752.set +++| GCL SPACE 4,15 03306 M00S02753.set +++|** GCL - GENERATE CONTROLWARE STATUS DISPLAY LINE. 03307 M00S02754.set +++|* 03308 M00S02755.set +++|* ENTRY (T1) = CHANNEL NUMBER. 03309 M00S02756.set +++|* 03310 M00S02757.set +++|* EXIT (A) = 0 IF NO MORE CHANNELS. 03311 M00S02758.set +++|* = LENGTH OF DISPLAY LINE (INCLUDING COORDINATES). 03312 M00S02759.set +++|* (T1) = CHANNEL NUMBER. 03313 M00S02760.set +++|* (LBUF) = DISPLAY LINE. 03314 M00S02761.set +++|* 03315 M00S02762.set +++|* USES FP, T1, T2, YY. 03316 M00S02763.set +++|* 03317 M00S02764.set +++|* CALLS CLB. 03318 M00S02765.set +++| 03319 M00S02766.set +++| 03320 M00S02767.set +++| GCL4 AOD T2 INCREMENT ASSEMBLY ADDRESS 03321 M00S02768.set +++| LDD T1 03322 M00S02769.set +++| LPN 40 03323 M00S02770.set +++| ZJN GCL5 IF NOT A CONCURRENT CHANNEL 03324 M00S02771.set +++| LDN 1R &1RC 03325 M00S02772.set +++| GCL5 LMC 2R 03326 M00S02773.set +++| STI T2 03327 M00S02774.set +++| AOD T2 03328 M00S02775.set +++| LDD T1 CONVERT CHANNEL NUMBER 03329 M00S02776.set +++| LPN 37 03330 M00S02777.set +++| RJM C2D 03331 M00S02778.set +++| LDN 4 INCREMENT POSITION 03332 M00S02779.set +++| RAD T2 03333 M00S02780.set +++| LDM TLCS-1,FP SET CONTROLWARE RECORD TYPE 03334 M00S02781.set +++| STI T2 03335 M00S02782.set +++| AOD T2 ADJUST POSITION 03336 M00S02783.set +++| LDD T2 SET LENGTH OF DISPLAY LINE 03337 M00S02784.set +++| SBN YY 03338 M00S02785.set +++| 03339 M00S02786.set +++| GCL SUBR ENTRY/EXIT 03340 M00S02787.set +++| RJM CLB CLEAR LINE BUFFER 03341 M00S02788.set +++| LDD T1 03342 M00S02789.set +++| UJN GCL2 CONTINUE 03343 M00S02790.set +++| 03344 M00S02791.set +++| GCL1 AOD T1 03345 M00S02792.set +++| GCLA LMN 0 03346 M00S02793.set +++| GCL2 EQU GCLA 03347 M00S02794.set +++| NJN GCL3 IF MORE TO DISPLAY 03348 M00S02795.set +++| STM GCLB 03349 M00S02796.set +++| UJN GCLX RETURN 03350 M00S02797.set +++| 03351 M00S02798.set +++| GCL3 LDM TCCS,T1 03352 M00S02799.set +++| ZJN GCL1 IF CONTROLWARE NOT SPECIFIED 03353 M00S02800.set +++| LPN 77 03354 M00S02801.set +++| STD FP 03355 M00S02802.set +++| AOM GCLB 03356 M00S02803.set +++| SBN 22 03357 M00S02804.set +++| NJP GCL4 IF NOT END OF LEFT SCREEN 03358 M00S02805.set +++| DFIM (LDC Y721) 03359 M00S02806.set +++| LDC Y545 ADJUST Y-COORDINATE FOR BLANK LINE 03360 M00S02807.set +++| STD YY 03361 M00S02808.set +++| SOD T1 03362 M00S02809.set +++| LDN 3 03363 M00S02810.set +++| UJN GCLX RETURN 03364 M00S02811.set +++| 03365 M00S02812.set +++| 03366 M00S02813.set +++| GCLB CON 0 03367 M00S02814.set +++| TDCW SPACE 4,10 03368 M00S02815.set +++|** TDCW - TABLE OF DEFAULT CONTROLWARE. 03369 M00S02816.set +++| 03370 M00S02817.set +++| 03371 M00S02818.set +++| TDCW BSS 0 03372 M00S02819.set +++| LIST G 03373 M00S02820.set +++| 03374 M00S02821.set +++| TBL "MSEQ" 03375 M00S02822.set +++| LIST * 03376 M00S02823.set +++| PURGMAC TBLM 03377 M00S02824.set +++| 03378 M00S02825.set +++| CON 0 END OF TABLE 03379 M00S02826.set +++| TLCS SPACE 4,10 03380 M00S02827.set +++|** TLCS - TABLE OF CONTROLWARE RECORD TYPES TO LOAD. 03381 M00S02828.set +++| 03382 M00S02829.set +++| 03383 M00S02830.set +++| TLCS BSS 0 03384 M00S02831.set +++| LOC CLHT 03385 M00S02832.set +++| CLHT CON 2RHT LOAD HALF TRACK CONTROLWARE 03386 M00S02833.set +++| CNHT CON 2RNH NO LOAD HALF TRACK CONTROLWARE 03387 M00S02834.set +++| CLFT CON 2RFT LOAD FULL TRACK CONTROLWARE 03388 M00S02835.set +++| CNFT CON 2RNF NO LOAD FULL TRACK CONTROLWARE 03389 M00S02836.set +++| CLFM CON 2RFM LOAD FMD CONTROLWARE 03390 M00S02837.set +++| CNFM CON 2RNM NO LOAD FMD CONTROLWARE 03391 M00S02838.set +++| CLAD CON 2RAD LOAD FSC ADAPTOR CONTROLWARE 03392 M00S02839.set +++| CNAD CON 2RNA NO LOAD FSC ADAPTOR CONTROLWARE 03393 M00S02840.set +++| CLPH CON 2RPH LOAD DEMA/PFMD CONTROLWARE 03394 M00S02841.set +++| CNPH CON 2RNP NO LOAD DEMA/PFMD CONTROLWARE 03395 M00S02842.set +++| CLID CON 2RID LOAD 7255 ADAPTOR CONTROLWARE 03396 M00S02843.set +++| CNID CON 2RNI NO LOAD 7255 ADAPTOR CONTROLWARE 03397 M00S02844.set +++| CLCC CON 2RCC LOAD 7165 ADAPTOR CONTROLWARE 03398 M00S02845.set +++| CNCC CON 2RCN NO LOAD 7165 ADAPTOR CONTROLWARE 03399 M00S02846.set +++| CLND CON 2R LOAD NAD CONTROLWARE 03400 M00S02847.set +++| CNND CON 2RNN NO LOAD NAD CONTROLWARE 03401 M00S02848.set +++| CON 2R (LOAD CONTROL MODULE - N/A) 03402 M00S02849.set +++| CON 2R (NO LOAD CONTROL MODULE - N/A) 03403 M00S02850.set +++| CLM8 CON 2RM8 LOAD 7990 CONTROLWARE 03404 M00S02851.set +++| CNM8 CON 2RN8 NO LOAD 7990 CONTROLWARE 03405 M00S02852.set +++| CLCX CON 2R LOAD CCC/NIP CONTROLWARE 03406 M00S02853.set +++| CNCX CON 2RNX NO LOAD CCC/NIP CONTROLWARE 03407 M00S02854.set +++| CLCT CON 2R LOAD CCC/698 CONTROLWARE 03408 M00S02855.set +++| CNCT CON 2RNT NO LOAD CCC/698 CONTROLWARE 03409 M00S02856.set +++| LOC *L+TLCS-1 03410 M00S02857.set +++| GDH SPACE 4,10 03411 M00S02858.set +++|** GDH - GENERATE DISPLAY HEADER. 03412 M00S02859.set +++|* 03413 M00S02860.set +++|* ENTRY (T1) = LINE NUMBER. 03414 M00S02861.set +++|* 03415 M00S02862.set +++|* EXIT SEE *RTL*. 03416 M00S02863.set +++|* (PA) = RTL. 03417 M00S02864.set +++|* 03418 M00S02865.set +++|* CALLS RTL. 03419 M00S02866.set +++| 03420 M00S02867.set +++| 03421 M00S02868.set +++| GDH SUBR ENTRY/EXIT 03422 M00S02869.set +++| LDM TDBP+1,DB 03423 M00S02870.set +++| SHN 6 FETCH DECK NAME 03424 M00S02871.set +++| CRM DHDR+2,ON 03425 M00S02872.set +++| LDN DHDRL DISPLAY NAME 03426 M00S02873.set +++| OAM. DHDR,CH 03427 M00S02874.set +++| LDD T1 03428 M00S02875.set +++| NJN GDH1 IF NOT FIRST PAGE OF DECK 03429 M00S02876.set +++| AOD T1 03430 M00S02877.set +++| GDH1 LDC RTL CHANGE PROCESSOR ADDRESS 03431 M00S02878.set +++| STD PA 03432 M00S02879.set +++| RJM RTL 03433 M00S02880.set +++| UJN GDHX RETURN 03434 M00S02881.set +++| GED SPACE 4,10 03435 M00S02882.set +++|** GED - INITIATE EST DISPLAY. 03436 M00S02883.set +++|* 03437 M00S02884.set +++|* EXIT SEE *GEL*. 03438 M00S02885.set +++|* (PA) = GEL. 03439 M00S02886.set +++|* (YY) = COORDINATE FOR NEXT DISPLAY LINE. 03440 M00S02887.set +++|* 03441 M00S02888.set +++|* CALLS CDI, GEL. 03442 M00S02889.set +++| 03443 M00S02890.set +++| 03444 M00S02891.set +++| GED SUBR ENTRY/EXIT 03445 M00S02892.set +++| RJM CDI CHECK DISPLAY INDEX 03446 M00S02893.set +++| LCN YINC 03447 M00S02894.set +++| RAD YY 03448 M00S02895.set +++| LDN EDHAA OUTPUT DISPLAY HEADER 03449 M00S02896.set +++| OAM EDHA,CH 03450 M00S02897.set +++| LDC GEL CHANGE PROCESSOR ADDRESS 03451 M00S02898.set +++| STD PA 03452 M00S02899.set +++| RJM GEL GENERATE EST DISPLAY LINE 03453 M00S02900.set +++| UJN GEDX RETURN 03454 M00S02901.set +++| GEL SPACE 4,10 03455 M00S02902.set +++|** GEL - GENERATE EST DISPLAY LINE. 03456 M00S02903.set +++|* 03457 M00S02904.set +++|* ENTRY (T1) = EST ORDINAL. 03458 M00S02905.set +++|* 03459 M00S02906.set +++|* EXIT (A) = LENGTH OF DISPLAY LINE (INCLUDING COORDINATES). 03460 M00S02907.set +++|* (LBUF) = DISPLAY LINE. 03461 M00S02908.set +++|* 03462 M00S02909.set +++|* USES BA, T2. 03463 M00S02910.set +++|* 03464 M00S02911.set +++|* CALLS CCD, C1D, C2D, IEL, REP. 03465 M00S02912.set +++| 03466 M00S02913.set +++| 03467 M00S02914.set +++| GEL5 LDD T2 SET LENGTH OF DISPLAY LINE 03468 M00S02915.set +++| SBN YY 03469 M00S02916.set +++| 03470 M00S02917.set +++| GEL SUBR ENTRY/EXIT 03471 M00S02918.set +++| RJM REP READ EQUIPMENT PARAMETERS 03472 M00S02919.set +++| RJM IEL INITIALIZE DISPLAY LINE 03473 M00S02920.set +++| ZJN GEL5 IF EQUIPMENT UNDEFINED 03474 M00S02921.set +++| LDD WB 03475 M00S02922.set +++| LPN 3 EXTRACT EQUIPMENT STATUS 03476 M00S02923.set +++| SHN 1 03477 M00S02924.set +++| STD BA SET INDEX 03478 M00S02925.set +++| LDM GELA,BA 03479 M00S02926.set +++| STI T2 03480 M00S02927.set +++| AOD T2 03481 M00S02928.set +++| LDM GELA+1,BA SET STATUS IN DISPLAY LINE 03482 M00S02929.set +++| STI T2 03483 M00S02930.set +++| AOD T2 03484 M00S02931.set +++| LDD WB 03485 M00S02932.set +++| SHN 0-13 03486 M00S02933.set +++| NJN GEL2 IF MASS STORAGE 03487 M00S02934.set +++| LDD WB+4 03488 M00S02935.set +++| SHN -11 03489 M00S02936.set +++| RJM C1D CONVERT EQUIPMENT (CONTROLLER) NUMBER
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 03490 M01S00020.284l847 +++| AOD T2 03491 M00S02937.set +++| LDD WB+4
| Line S02938 Modification History | |
|---|---|
M01 (Removed by) | set79 |
Seq # *Modification Id* Act ----------------------------+ 03492 M01S02938.set79 ---| LPN 17
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | set79 |
Seq # *Modification Id* Act ----------------------------+ 03493 M01S00001.set79 +++| LPN 77 03494 M00S02939.set +++| UJN GEL3 CONVERT UNIT NUMBER 03495 M00S02940.set +++|
| Line S02941 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03496 M01S02941.271l716 ---| GEL2 LDN 0 NULL CONTROLLER NUMBER
| Line S00027 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03497 M01S00027.271l716 +++| GEL2 LDM MSTB+DVPR CONTROLLER NUMBER 03498 M01S00028.271l716 +++| SHN -11 03499 M00S02942.set +++| RJM C1D
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 03500 M01S00021.284l847 +++| SOD T2 BACK UP FOR SECOND CONTROLLER DISPLAY
| Line S02943 Modification History | |
|---|---|
M01 (Removed by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 03501 M01S02943.284l847 ---| LDM MSTB+DVUN+3 CONVERT UNIT NUMBER
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | 284l847 |
Seq # *Modification Id* Act ----------------------------+ 03502 M01S00022.284l847 +++| LDM MSTB+DVPR 03503 M01S00023.284l847 +++| SHN 21-5 03504 M01S00024.284l847 +++| PJN GEL2.1 IF NO SECOND CONTROLLER 03505 M01S00025.284l847 +++| RJM C1D CONVERT SECOND CHANNEL CONTROLLER NUMBER 03506 M01S00026.284l847 +++| UJN GEL2.2 CONVERT UNIT NUMBER 03507 M01S00027.284l847 +++| 03508 M01S00028.284l847 +++| GEL2.1 LDN 2 SKIP SECOND CONTROLLER FIELD 03509 M01S00029.284l847 +++| RAD T2 03510 M01S00030.284l847 +++| GEL2.2 LDM MSTB+DVUN+3 CONVERT UNIT NUMBER 03511 M00S02944.set +++| GEL3 RJM C2D 03512 M00S02945.set +++| LDD WB+1 CONVERT PRIMARY CHANNEL 03513 M00S02946.set +++| LMN 37 03514 M00S02947.set +++| ZJN GEL4 IF CHANNEL NOT SPECIFIED 03515 M00S02948.set +++| LDD WB+1 03516 M00S02949.set +++| RJM CCD CONVERT CHANNEL NUMBER 03517 M00S02950.set +++| LDD WB+2 03518 M00S02951.set +++| ZJN GEL4 IF NO 2ND CHANNEL 03519 M00S02952.set +++| RJM CCD 03520 M00S02953.set +++| GEL4 LJM GEL5 SET LENGTH OF DISPLAY LINE 03521 M00S02954.set +++| GELA SPACE 4,10 03522 M00S02955.set +++|* EQUIPMENT STATUS. 03523 M00S02956.set +++| 03524 M00S02957.set +++| GELA DATA 4H ON 03525 M00S02958.set +++| DATA 4HIDLE 03526 M00S02959.set +++| DATA 4H OFF 03527 M00S02960.set +++| DATA 4HDOWN 03528 M00S02961.set +++| GID SPACE 4,10 03529 M00S02962.set +++|** GID - INITIATE MASS STORAGE INITIALIZATION DISPLAY. 03530 M00S02963.set +++|* 03531 M00S02964.set +++|* EXIT SEE *GIL*. 03532 M00S02965.set +++|* (A) = 0 IF END OF MASS STORAGE EQUIPMENT. 03533 M00S02966.set +++|* (PA) = GIL. 03534 M00S02967.set +++|* (YY) = COORDINATE FOR NEXT DISPLAY LINE. 03535 M00S02968.set +++|* 03536 M00S02969.set +++|* USES PA, T2, YY. 03537 M00S02970.set +++|* 03538 M00S02971.set +++|* CALLS CDI, GIL. 03539 M00S02972.set +++| 03540 M00S02973.set +++| 03541 M00S02974.set +++| GID SUBR ENTRY/EXIT 03542 M00S02975.set +++| LDN EDHCA OUTPUT DISPLAY HEADER 03543 M00S02976.set +++| OAM EDHC,CH 03544 M00S02977.set +++| RJM CDI CHECK DISPLAY INDEX 03545 M00S02978.set +++| RJM GIL GENERATE LINE 03546 M00S02979.set +++| ZJN GIDX IF NO MORE MASS STORAGE 03547 M00S02980.set +++| STD T2 03548 M00S02981.set +++| LCN YINC ADJUST Y-COORDINATE 03549 M00S02982.set +++| RAD YY 03550 M00S02983.set +++| LDC GIL CHANGE PROCESSOR ADDRESS 03551 M00S02984.set +++| STD PA 03552 M00S02985.set +++| LDD T2 03553 M00S02986.set +++| UJN GIDX RETURN 03554 M00S02987.set +++| GIL SPACE 4,15 03555 M00S02988.set +++|** GIL - GENERATE MASS STORAGE INITIALIZATION LINE. 03556 M00S02989.set +++|* 03557 M00S02990.set +++|* ENTRY (T1) = EST ORDINAL. 03558 M00S02991.set +++|* (EW) = CURRENT EQUIPMENT COUNT. 03559 M00S02992.set +++|* 03560 M00S02993.set +++|* EXIT (A) = 0 IF NO MORE MASS STORAGE EQUIPMENT. 03561 M00S02994.set +++|* = LENGTH OF DISPLAY LINE (INCLUDING COORDINATES). 03562 M00S02995.set +++|* (T1) = MASS STORAGE EST ORDINAL. 03563 M00S02996.set +++|* (LBUF) = DISPLAY LINE. 03564 M00S02997.set +++|* 03565 M00S02998.set +++|* USES FP, T0, T2. 03566 M00S02999.set +++|* 03567 M00S03000.set +++|* CALLS C1D, C2D, IML, SBS. 03568 M00S03001.set +++| 03569 M00S03002.set +++| 03570 M00S03003.set +++| GIL SUBR ENTRY/EXIT 03571 M00S03004.set +++| RJM IML
Proceed to Part 2
cdc/nos2.source/opl.opl871/deck/set.001.txt · Last modified: by 127.0.0.1