Trailing-Edge
-
PDP-10 Archives
-
AP-4178E-RM
-
swskit-sources/setspd.lis
There is 1 other file named setspd.lis in the archive. Click here to see a list.
SET SPEED AND RETURN TIME OF DA MACRO M1108 16-JAN-78 19:03
TABLE OF CONTENTS
2- 51 MACRO DEFINITIONS
SET SPEED AND RETURN TIME OF DA MACRO M1108 16-JAN-78 19:03 PAGE 1
1 .TITLE SET SPEED AND RETURN TIME OF DAY TO 10 PROGRAM
2 .IDENT "V010020"
3 ;
4 ;
5 ;
6 ;
7 ;
8 ; COPYRIGHT (C) 1975, 1978 BY
9 ; DIGITAL EQUIPMENT CORPORATION, MAYNARD MASS.
10 ;
11 ; THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED
12 ; ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE INCLUSION
13 ; OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER COPIES THERE-
14 ; OF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY OTHER PERSON.
15 ; NO TITLE TO OR OWNERSHIP OF THE SOFTWARE IS HEREBY TRANSFERRED.
16 ;
17 ; THE INFORMATION CONTAINED IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT
18 ; NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT
19 ; CORPORATION.
20 ;
21 ; DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS
22 ; SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPILED BY DIGITAL.
23 ;
24 ;
25 ;
26 ;
27 ;
28 ;
29 ; MODULE: SET SPEED AND RETURN TIME OF DAY
30 ;
31 ; VERSION: V010-02
32 ;
33 ; AUTHOR: R. MCLEAN
34 ;
35 ; DATE: 19 NOV 75
36 ;
37 ;
38 ; THIS MODULE CONTAINS:
39 ;
40 ; 1 -- THE CODE REQUIRED TO SET THE TIME IN THE 10 AND
41 ; SET THE SPEED TABLE FOR THE 10 AFTER RESTART
42 ;
43 ; MODIFICATIONS:
44 ;
45 ; NO. DATE PROGRAMMER PURPOSE
46 ; --- ---- ---------- -------
47 ; 001 14-MAR-77 R. BELANGER CHANGE TO REFERENCE
48 ; DLS INSTEAD OF DH TABLE
49 ; 002 15-JUL-77 R. BELANGER ADD AUTO-BAUD SUPPORT
SET SPEED AND RETURN TIME OF DA MACRO M1108 16-JAN-78 19:03 PAGE 2
MACRO DEFINITIONS
51 .SBTTL MACRO DEFINITIONS
52 ;
53 ; MACROS
54 ;
55 .MCALL CALL,RETURN,WSIG$S,CLEF$S,EXIT$S
56 .MCALL QIOW$,DIR$,RQST$,.ENB6,.INH6,$DEF
57 .LIST MEB
58
59 000000 $DEF
SET SPEED AND RETURN TIME OF DA MACRO M1108 16-JAN-78 19:03 PAGE 3
MACRO DEFINITIONS
61 ;+
62 ; .STSPD -- NON-RESIDENT EXECUTIVE ROUTINE TO SET LINE SPEEDS
63 ;
64 ; THIS ROUTINE IS LOADED AND CALLED AS A TASK WHEN:
65 ;
66 ; 1. THE FRONT-END RELOADS THE KL
67 ; 2. AN AUTO-BAUD LINE HAS CONNECTED
68 ;
69 ; IF THE KL HAS BEEN RELOADED, ALL LINE SPEEDS ARE REPORTED. IF A LINE
70 ; HAS BEEN AUTO-BAUDED, THE SPEED FOR ONLY THAT LINE IS REPORTED.
71 ;
72 ; THE DECISIION TO REPORT ALL LINE SPEEDS OR ONLY AUTO-BAUD LINE SPEEDS
73 ; IS DETERMINED BY THE STATE OF ".ABFLG"
74 ;
75 ; ".ABFLG" .LE. 0 -- REPORT ALL LINE SPEEDS
76 ; ".ABFLG" .GT. 0 -- REPORT ONLY AUTO-BAUD LINE SPEEDS
77 ;
78 ; LINES WHICH ARE TO BE AUTO-BAUDED ARE FLAGGED BY HAVING BIT 15 SET
79 ; IN "STSW0".
80 ;
81 ; REGISTER SUMMARY:
82 ;
83 ; R0 -- COUNT OF LINES IN THE DLS TABLE
84 ; R1 -- TEMPORARY
85 ; R2 -- TEMPORARY
86 ; R3 -- TEMPORARY
87 ; R4 -- COUNT OF LINES TO BE AUTO-BAUDED
88 ; R5 -- ADDRESS OF DLS ENTRY FOR THE CURRENT LINE
89 ;-
90
91 000000 .STSPD::
92 000000 016705 000000G MOV .DQDLS,R5 ; +++001 FIND TABLE ADDRESS OF THE FIRST ENTRY
93 000004 016700 000016G MOV .DQDLS+16,R0 ; +++001 FIND THE NUMBER OF LINES TO DO
94 000010 001562 BEQ 100$ ; +++002 NO LINES !!
95 000012 105067 000465 CLRB UNIT ;CLEAR THE UNIT NUMBER
96 000016 .INH6 ; +++002 DISALLOW INTERRUPTS
000016 013746 177776 MOV @#PS,-(SP)
000022 112737 000300 177776 MOVB #300,@#PS
97 000030 016704 000000G MOV .ABCNT,R4 ;;; +++002 GET COUNT OF AUTO-BAUD LINES
98 000034 005067 000000G CLR .ABCNT ;;; +++002 RESET THE COUNTER
99 000040 .ENB6 ;;; +++002 ALLOW INTERRUPTS
000040 012637 177776 MOV (SP)+,@#PS
100 000044 10$:
101 000044 022705 000000G CMP #DHTBL,R5 ; +++001 IS THIS A DH11??
102 000050 101410 BLOS 20$ ; +++001 YES -- GO ON
103 000052 005767 000000G TST .ABFLG ; +++002 NO -- AUTO-BAUD FLAGGED??
104 000056 100131 BPL 90$ ; +++002 YES -- TRY THE NEXT LINE
105 000060 005067 000420 CLR INPSPD ; +++001 NO -- CLEAR INPUT SPEED
106 000064 005067 000416 CLR OUTSPD ; +++001 AND OUTPUT SPEED
107 000070 000432 BR 40$ ; +++001 AND SET IT
108 ;
109 000072 20$: ; +++001
110 000072 016502 000000G MOV STSW0(R5),R2 ;FIND THE SPEED
111 000076 005767 000000G TST .ABFLG ; +++002 AUTO-BAUD FLAGGED??
112 000102 003402 BLE 30$ ; +++002 NO -- GO ON
113 000104 005702 TST R2 ; +++002 YES -- THIS LINE??
114 000106 100115 BPL 90$ ; +++002 NO -- TRY THE NEXT LINE
SET SPEED AND RETURN TIME OF DA MACRO M1108 16-JAN-78 19:03 PAGE 3-1
MACRO DEFINITIONS
115 000110 30$: ; +++002
116 000110 010246 MOV R2,-(SP) ;SAVE THE SPEED
117 000112 006202 ASR R2 ;FIND THE INPUT SPEED
118 000114 006202 ASR R2
119 000116 006202 ASR R2
120 000120 006202 ASR R2
121 000122 006202 ASR R2
122 000124 042702 177741 BIC #177741,R2 ;MASK OFF JUNK
123 000130 016267 000620' 000346 MOV SPDTBL(R2),INPSPD
124 000136 012602 MOV (SP)+,R2 ;RESTORE SPEED
125 000140 006202 ASR R2 ;WORK ON OUTPUT SPEED
126 000142 000302 SWAB R2
127 000144 042702 177741 BIC #177741,R2
128 000150 016267 000620' 000330 MOV SPDTBL(R2),OUTSPD ;SET OUTPUT SPEED
129 000156 40$:
130 000156 042765 100000 000000G BIC #100000,STSW0(R5) ; +++002 RESET FLAG
131 000164 032767 000000G 000002G BIT #EF.PR1,.COMEF+2 ; +++002 ARE WE IN PRIMARY PROTOCOL??
132 000172 001446 BEQ 70$ ; +++002 NO -- COMPLAIN AND EXIT
133 000174 005067 000310 CLR REMOTE ; YES -- CLEAR REMOTE FLAG (ASSUME NOT REMOTE)
134 000200 032765 000000G 000000G BIT #TT.RMT,STSW1(R5) ;LOOK FOR REMOTE
135 000206 001412 BEQ 50$ ;NOT REMOTE
136 000210 052767 100000 000272 BIS #100000,REMOTE ;SET REMOTE FLAG
137 000216 032765 000000G 000000G BIT #TT.ABL,STSW1(R5) ; +++002 IS THIS AN AUTO-BAUD LINE??
138 000224 001403 BEQ 50$ ; +++002 NO -- GO ON
139 000226 052767 040000 000254 BIS #040000,REMOTE ; +++002 YES -- FLAG IT
140 000234 50$:
141 000234 010046 MOV R0,-(SP)
142 000236 012703 000000G MOV #D.CDLS,R3 ; +++001 SET UP FOR DATA LINE SCANNER
143 000242 012702 000001 MOV #1,R2 ;USE EVENT FLAG #1
144 000246 012701 100000G MOV #BC.STS+100000,R1 ;SET SPEED ON LINES
145 000252 012700 000502' MOV #SIZE,R0 ;SET UP THE BUFFER ADDRESS AND
146 000256 CALL ..STIN ;START INDIRECT FUNCTION
000256 004767 000000G JSR PC,..STIN
147 000262 103412 BCS 70$ ;NO GOOD...
148 000264 012600 MOV (SP)+,R0 ;RESTORE R0
149 000266 016701 000000G MOV .CRTSK,R1 ;GET ATL NODE
150 000272 60$:
151 000272 030261 000000G BIT R2,A.EF(R1) ;IS OPERATION COMPLETE ?
152 000276 001012 BNE 80$ ;YES, GO ON TO NEXT
153 000300 WSIG$S ;WAIT FOR AN EVENT
000300 012746 MOV (PC)+,-(SP)
000302 061 001 .BYTE 49.,1
000304 104375 EMT 375
154 000306 000771 BR 60$ ; +++002 LOOK FOR THE FLAG
155 ;
156 000310 70$:
157 000310 DIR$ #SPMSG ;COMPLAIN
000310 012746 000520' MOV #SPMSG,-(SP)
000314 104375 EMT 375
158 000316 005067 000000G CLR .ABCNT ; +++002 RESET AUTO-BAUD COUNT
159 000322 000462 BR 120$ ;EXIT -- CHANGE OF PROTOCOL
160 ;
161 000324 80$:
162 000324 040261 000000G BIC R2,A.EF(R1) ;TURN OFF FLAG
163 000330 005767 000000G TST .ABFLG ; +++002 AUTO-BAUD FLAGGED??
164 000334 003402 BLE 90$ ; +++002 NO -- GO ON
165 000336 005304 DEC R4 ; +++002 YES -- COUNT THIS LINE
SET SPEED AND RETURN TIME OF DA MACRO M1108 16-JAN-78 19:03 PAGE 3-2
MACRO DEFINITIONS
166 000340 001406 BEQ 100$ ; +++002 AND EXIT IF DONE
167 000342 90$: ; +++002
168 000342 105267 000135 INCB UNIT ;UPDATE UNIT
169 000346 062705 000010 ADD #10,R5 ;POINT TO NEXT TTY ENTRY
170 000352 005300 DEC R0 ; COUNT THIS LINE
171 000354 001233 BNE 10$ ; CONTINUE...
172 000356 100$:
173 000356 005767 000000G TST .ABFLG ; +++002 AUTO-BAUD FLAGGED??
174 000362 003404 BLE 110$ ; +++002 NO -- JUST EXIT
175 000364 005767 000000G TST .ABCNT ; +++002 YES -- ARE WE REALLY DONE??
176 000370 001203 BNE .STSPD ; +++002 NO -- START FROM THE TOP AGAIN
177 000372 000436 BR 120$ ; +++002 YES -- EXIT
178 ;
179 000374 110$: ; +++002
180 000374 012703 000000G MOV #D.CCLK,R3 ; +++002 SEND THE TIME OF DAY
181 000400 005002 CLR R2 ;NO EVENT FLAG THIS TIME
182 000402 012701 100000G MOV #100000+BC.HTD,R1 ;RETURN TIME OF DAY
183 000406 012700 000000G MOV #.CLKSW,R0 ;SEND TIME TO 10
184 000412 012710 000014 MOV #14,@R0 ;PUT IN SIZE
185 000416 CALL ..STIN ;START FUNCTION
000416 004767 000000G JSR PC,..STIN
186 000422 103732 BCS 70$
187 000424 016767 000000G 000064 MOV .KLERW,KLERR
188 000432 012703 000000G MOV #D.CCPU,R3 ;DEVICE CPU ERROR
189 000436 005002 CLR R2 ;DON'T WAIT FOR THIS ONE EITHER
190 000440 012701 100000G MOV #100000+BC.HDS,R1
191 000444 012700 000512' MOV #DEVERS,R0
192 000450 CALL ..STIN ;START FUNCTION
000450 004767 000000G JSR PC,..STIN
193 000454 103715 BCS 70$
194 000456 005067 000000G CLR .KLERW
195 000462 DIR$ #RQKLX ; REQUEST "KLXFR"
000462 012746 000654' MOV #RQKLX,-(SP)
000466 104375 EMT 375
196 000470 120$: ; +++002
197 000470 005067 000000G CLR .ABFLG ; +++002 CLEAR THE INTERLOCK
198 000474 EXIT$S ;EXIT (BYE)
000474 012746 MOV (PC)+,-(SP)
000476 063 001 .BYTE 51.,1
000500 104375 EMT 375
199 ;
200 000502 SIZE:
201 000502 006 .BYTE 6
202 000503 UNIT:
203 000503 000 .BYTE 0
204 000504 INPSPD:
205 000504 000000 .WORD 0
206 000506 OUTSPD:
207 000506 000000 .WORD 0
208 000510 REMOTE:
209 000510 000000 .WORD 0
210 ;
211 000512 DEVERS:
212 000512 006 000 .BYTE 6,0
213 000514 000000G .WORD DV.LOG
214 000516 KLERR:
215 000516 000000 .WORD 0
SET SPEED AND RETURN TIME OF DA MACRO M1108 16-JAN-78 19:03 PAGE 3-3
MACRO DEFINITIONS
216 ;
217 ;
218 000520 SPMSG:
219 000520 QIOW$ IO.WLB,1,2,0,0,0,<SPMES,SPSZ,40> ; +++001
000520 003 011 .BYTE 3,$$$ARG
000522 000000G .WORD IO.WLB
000524 000001 .WORD 1
000526 002 000 .BYTE 2,0
000530 000000 .WORD 0
000532 000000 .WORD 0
000534 000542' .WORD SPMES
000536 000056 .WORD SPSZ
000540 000040 .WORD 40
220
221 ;
222 000542 SPMES:
223 000542 123 105 124 .ASCII /SETSPD -- *FATAL* PRIMARY PROTOCOL NOT RUNNING/
000545 123 120 104
000550 040 055 055
000553 040 052 106
000556 101 124 101
000561 114 052 040
000564 120 122 111
000567 115 101 122
000572 131 040 120
000575 122 117 124
000600 117 103 117
000603 114 040 116
000606 117 124 040
000611 122 125 116
000614 116 111 116
000617 107
224 000056 SPSZ=.-SPMES
225 .EVEN
226 ;
227 ;
228 000620 SPDTBL:
229 000620 000000 .WORD 0
230 000622 000062 .WORD 50. ;BAUD RATES
231 000624 000113 .WORD 75.
232 000626 000156 .WORD 110.
233 000630 000206 .WORD 134.
234 000632 000226 .WORD 150.
235 000634 000310 .WORD 200.
236 000636 000454 .WORD 300.
237 000640 001130 .WORD 600.
238 000642 002260 .WORD 1200.
239 000644 003410 .WORD 1800.
240 000646 004540 .WORD 2400.
241 000650 011300 .WORD 4800.
242 000652 022600 .WORD 9600.
243 ;
244 000654 RQKLX:
245 000654 RQST$ KLXFER
000654 013 007 .BYTE 11.,7
000656 043270 023132 .RAD50 /KLXFER/
000662 000000 000000 .WORD 0,0
SET SPEED AND RETURN TIME OF DA MACRO M1108 16-JAN-78 19:03 PAGE 3-4
MACRO DEFINITIONS
000666 000000 .WORD
000670 000 000 .BYTE ,
246 000000' .END .STSPD
SET SPEED AND RETURN TIME OF DA MACRO M1108 16-JAN-78 19:03 PAGE 3-5
SYMBOL TABLE
A.EF = ****** GX DIKL10= 000010 OUTSPD 000506R SPMSG 000520R .CONBT= 012000
BC.HDS= ****** GX DLYCNT= 174400 PERCLR= 001000 SPSZ = 000056 .CRTSK= ****** GX
BC.HTD= ****** GX DON10C= 040000 PHYS = 100000 STAT = 174434 .CSHRG= 164000
BC.STS= ****** GX DON10S= 100000 PIDENT= 000000 STATUS= 000022 .DQDLS= ****** GX
BIT0 = 000001 DON11C= 000100 PRI7 = 000340 STSW0 = ****** GX .DRLTC= 015000
BIT1 = 000002 DON11S= 000200 PROPNT= 000021 STSW1 = ****** GX .DSACF= 066000
BIT10 = 002000 DPS4 = 040000 PRTOFF= 004000 SWR = 177570 .DSIOJ= 065000
BIT11 = 004000 DRESET= 000100 PR0 = 000000 SWSLLT= 100000 .EIOJA= 067000
BIT12 = 010000 DR.DTE= 000011 PR1 = 000040 TENAD1= 174410 .GFNR = 102000
BIT13 = 020000 DSEND = 000004 PR2 = 000100 TENAD2= 174412 .INICL= 070000
BIT14 = 040000 DS04 = 004000 PR3 = 000140 TOBM = 000004 .IRLTC= 014000
BIT15 = 100000 DS05 = 002000 PR4 = 000200 TOD = 000003 .KLERW= ****** GX
BIT2 = 000004 DS06 = 001000 PR5 = 000240 TOIP = 000002 .LCRDL= 052000
BIT3 = 000010 DTECMD= 000451 PR6 = 000300 TOIT = 000001 .LCRDR= 051000
BIT4 = 000020 DTEFLG= 000444 PR7 = 000340 TO10 = 000200 .LCRM1= 057000
BIT5 = 000040 DTEF11= 000450 PS = 177776 TO10AD= 174420 .LCRM2= 056000
BIT6 = 000100 DTEMTD= 000455 PSWW1 = 000005 TO10BC= 174414 .LCRM3= 055000
BIT7 = 000200 DTEMTI= 000456 PSWW10= 000014 TO10BM= 000001 .LCRM4= 054000
BIT8 = 000400 DUPE = 000020 PSWW11= 000015 TO10DB= 000400 .LCRM5= 053000
BIT9 = 001000 DURE = 000004 PSWW12= 000016 TO10DN= 100000 .LDAR = 077000
BPARER= 000020 DV.LOG= ****** GX PSWW13= 000017 TO10DT= 174424 .LDBRL= 043000
CDD = 000020 DXWRD1= 002000 PSWW2 = 000006 TO10ER= 020000 .LDBRR= 042000
CHNPNT= 000001 D.CCLK= ****** GX PSWW3 = 000007 TO11 = 000100 .LDCK1= 046000
CNUPE = 000002 D.CCPU= ****** GX PSWW4 = 000010 TO11AD= 174422 .LDCK2= 047000
CS.EXP= 177670 D.CDLS= ****** GX PSWW5 = 000011 TO11BC= 174416 .LDDIS= 045000
CYCLS = 000002 D1011 = 000040 PSWW6 = 000012 TO11BM= 020000 .LDRJD= 064000
DATE = 000004 EBSEL = 000100 PSWW7 = 000013 TO11DB= 004000 .LDRJV= 063000
DCOMST= 000001 EBUSPC= 000020 PULSE = 000020 TO11DN= 000200 .LDRM1= 060000
DEP = 010000 EBUSPS= 000004 QSIZE = 000023 TO11DT= 174426 .LDRM2= 061000
DEVERS 000512R EDONES= 040000 Q.IOAE= 000012 TO11ER= 000002 .LDRM3= 062000
DEX = 000400 EF.PR1= ****** GX Q.IOEF= 000006 TT.ABL= ****** GX .LDSEL= 044000
DEXDON= 000004 EPTR = 000000 Q.IOFN= 000002 TT.RMT= ****** GX .MEMRS= 076000
DEXWD1= 174406 ERR10C= 010000 Q.IOLU= 000004 UNASG1= 000032 .PCAB1= 150000
DEXWD2= 174404 ERR10S= 020000 Q.IOPL= 000014 UNASG2= 000033 .PCAB2= 151000
DEXWD3= 174402 ERR11C= 000001 Q.IOPR= 000007 UNASG3= 000034 .PCAB3= 152000
DFUNC = 000200 ERR11S= 000002 Q.IOSB= 000010 UNASG4= 000035 .PCAB4= 153000
DF.DMG= 000004 FORPRO= 000020 RAMIS0= 010000 UNASG5= 000036 .RCRM1= 147000
DF.DMN= 000007 HIBYTE= 177400 REMOTE 000510R UNASG6= 000037 .RCRM2= 146000
DF.DOR= 000001 IFLOP = 100000 RFMAD0= 100000 UNIT 000503R .RCRM3= 145000
DF.EHG= 000010 INPSPD 000504R RFMAD1= 040000 WEP = 000010 .RCRM4= 144000
DF.EHM= 000011 INTROF= 000010 RFMAD2= 020000 ZSTOP = 040000 .RCSPF= 141000
DF.EMG= 000005 INTRON= 000040 RFMAD3= 010000 $$ = 000067 .RDJ14= 134000
DF.EMN= 000006 INTSON= 000001 RM = 000010 $$$ARG= 000011 .RDJ71= 135000
DF.KLR= 000012 INT10S= 000400 RQKLX 000654R $$$OST= 000016 .RDMAB= 133000
DF.KLW= 000013 INT11C= 002000 R.QSGC= 000015 $$$T1 = 000000 .SECLK= 003000
DF.KLX= 000014 INT11S= 004000 R.QSPC= 000014 .ABCNT= ****** GX .SETMR= 007000
DF.OFF= 000002 IO.WLB= ****** GX R.QSPN= 000006 .ABFLG= ****** GX .SETRN= 011000
DF.ON = 000003 KLERR 000516R R.QSPR= 000012 .BRCLK= 005000 .SSCLK= 002000
DF.PDP= 000016 KLPWRF= 000010 R.QSTN= 000002 .CECLK= 004000 .STPCL= 000000
DF.PEX= 000015 LOAD11= 000004 SCD = 000040 .CLKSW= ****** GX .STRCL= 001000
DHTBL = ****** GX MPE11 = 001000 SIZE 000502R .CLRMR= 006000 .STSPD 000000RG
DIAG1 = 174430 NULSTP= 000040 SPDTBL 000620R .CLRUN= 010000 .WRMBX= 071000
DIAG2 = 174432 NUPE = 000002 SPMES 000542R .COMEF= ****** GX ..STIN= ****** GX
DIAG3 = 174436
. ABS. 000000 000
000672 001
SET SPEED AND RETURN TIME OF DA MACRO M1108 16-JAN-78 19:03 PAGE 3-6
SYMBOL TABLE
ERRORS DETECTED: 0
VIRTUAL MEMORY USED: 4478 WORDS ( 18 PAGES)
DYNAMIC MEMORY: 5216 WORDS ( 20 PAGES)
ELAPSED TIME: 00:00:25
,[47,20]SETSPD.LIS/-SP/CRF=[47,30]SETSPD
SETSPD CREATED BY MACRO ON 16-JAN-78 AT 19:03 PAGE 1
SYMBOL CROSS REFERENCE CREF
SYMBOL VALUE REFERENCES
A.EF = ****** GX 3-151 *3-162
BC.HDS = ****** GX 3-190
BC.HTD = ****** GX 3-182
BC.STS = ****** GX 3-144
BIT0 = 000001 #2-59
BIT1 = 000002 #2-59
BIT10 = 002000 #2-59
BIT11 = 004000 #2-59
BIT12 = 010000 #2-59
BIT13 = 020000 #2-59
BIT14 = 040000 #2-59
BIT15 = 100000 #2-59
BIT2 = 000004 #2-59
BIT3 = 000010 #2-59
BIT4 = 000020 #2-59
BIT5 = 000040 #2-59
BIT6 = 000100 #2-59
BIT7 = 000200 #2-59
BIT8 = 000400 #2-59
BIT9 = 001000 #2-59
BPARER = 000020 #2-59
CDD = 000020 #2-59
CHNPNT = 000001 #2-59
CNUPE = 000002 #2-59
CS.EXP = 177670 #2-59
CYCLS = 000002 #2-59
DATE = 000004 #2-59
DCOMST = 000001 #2-59
DEP = 010000 #2-59
DEVERS 000512 R 3-191 #3-211
DEX = 000400 #2-59
DEXDON = 000004 #2-59
DEXWD1 = 174406 #2-59
DEXWD2 = 174404 #2-59
DEXWD3 = 174402 #2-59
DFUNC = 000200 #2-59
DF.DMG = 000004 #2-59
DF.DMN = 000007 #2-59
DF.DOR = 000001 #2-59
DF.EHG = 000010 #2-59
DF.EHM = 000011 #2-59
DF.EMG = 000005 #2-59
DF.EMN = 000006 #2-59
DF.KLR = 000012 #2-59
DF.KLW = 000013 #2-59
DF.KLX = 000014 #2-59
DF.OFF = 000002 #2-59
DF.ON = 000003 #2-59
DF.PDP = 000016 #2-59
DF.PEX = 000015 #2-59
DHTBL = ****** GX 3-101
DIAG1 = 174430 #2-59
SETSPD CREATED BY MACRO ON 16-JAN-78 AT 19:03 PAGE 2
SYMBOL CROSS REFERENCE CREF
SYMBOL VALUE REFERENCES
DIAG2 = 174432 #2-59
DIAG3 = 174436 #2-59
DIKL10 = 000010 #2-59
DLYCNT = 174400 #2-59
DON10C = 040000 #2-59
DON10S = 100000 #2-59
DON11C = 000100 #2-59
DON11S = 000200 #2-59
DPS4 = 040000 #2-59
DRESET = 000100 #2-59
DR.DTE = 000011 #2-59
DSEND = 000004 #2-59
DS04 = 004000 #2-59
DS05 = 002000 #2-59
DS06 = 001000 #2-59
DTECMD = 000451 #2-59
DTEFLG = 000444 #2-59
DTEF11 = 000450 #2-59
DTEMTD = 000455 #2-59
DTEMTI = 000456 #2-59
DUPE = 000020 #2-59
DURE = 000004 #2-59
DV.LOG = ****** GX 3-213
DXWRD1 = 002000 #2-59
D.CCLK = ****** GX 3-180
D.CCPU = ****** GX 3-188
D.CDLS = ****** GX 3-142
D1011 = 000040 #2-59
EBSEL = 000100 #2-59
EBUSPC = 000020 #2-59
EBUSPS = 000004 #2-59
EDONES = 040000 #2-59
EF.PR1 = ****** GX 3-131
EPTR = 000000 #2-59
ERR10C = 010000 #2-59
ERR10S = 020000 #2-59
ERR11C = 000001 #2-59
ERR11S = 000002 #2-59
FORPRO = 000020 #2-59
HIBYTE = 177400 #2-59
IFLOP = 100000 #2-59
INPSPD 000504 R *3-105 *3-123 #3-204
INTROF = 000010 #2-59
INTRON = 000040 #2-59
INTSON = 000001 #2-59
INT10S = 000400 #2-59
INT11C = 002000 #2-59
INT11S = 004000 #2-59
IO.WLB = ****** GX 3-219
KLERR 000516 R *3-187 #3-214
KLPWRF = 000010 #2-59
LOAD11 = 000004 #2-59
SETSPD CREATED BY MACRO ON 16-JAN-78 AT 19:03 PAGE 3
SYMBOL CROSS REFERENCE CREF
SYMBOL VALUE REFERENCES
MPE11 = 001000 #2-59
NULSTP = 000040 #2-59
NUPE = 000002 #2-59
OUTSPD 000506 R *3-106 *3-128 #3-206
PERCLR = 001000 #2-59
PHYS = 100000 #2-59
PIDENT = 000000 #2-59
PRI7 = 000340 #2-59
PROPNT = 000021 #2-59
PRTOFF = 004000 #2-59
PR0 = 000000 #2-59
PR1 = 000040 #2-59
PR2 = 000100 #2-59
PR3 = 000140 #2-59
PR4 = 000200 #2-59
PR5 = 000240 #2-59
PR6 = 000300 #2-59
PR7 = 000340 #2-59
PS = 177776 #2-59 3-96 3-96 3-99
PSWW1 = 000005 #2-59
PSWW10 = 000014 #2-59
PSWW11 = 000015 #2-59
PSWW12 = 000016 #2-59
PSWW13 = 000017 #2-59
PSWW2 = 000006 #2-59
PSWW3 = 000007 #2-59
PSWW4 = 000010 #2-59
PSWW5 = 000011 #2-59
PSWW6 = 000012 #2-59
PSWW7 = 000013 #2-59
PULSE = 000020 #2-59
QSIZE = 000023 #2-59
Q.IOAE = 000012 #3-219
Q.IOEF = 000006 #3-219
Q.IOFN = 000002 #3-219
Q.IOLU = 000004 #3-219
Q.IOPL = 000014 #3-219
Q.IOPR = 000007 #3-219
Q.IOSB = 000010 #3-219
RAMIS0 = 010000 #2-59
REMOTE 000510 R *3-133 *3-136 *3-139 #3-208
RFMAD0 = 100000 #2-59
RFMAD1 = 040000 #2-59
RFMAD2 = 020000 #2-59
RFMAD3 = 010000 #2-59
RM = 000010 #2-59
RQKLX 000654 R 3-195 #3-244
R.QSGC = 000015 #3-245
R.QSPC = 000014 #3-245
R.QSPN = 000006 #3-245
R.QSPR = 000012 #3-245
R.QSTN = 000002 #3-245
SETSPD CREATED BY MACRO ON 16-JAN-78 AT 19:03 PAGE 4
SYMBOL CROSS REFERENCE CREF
SYMBOL VALUE REFERENCES
SCD = 000040 #2-59
SIZE 000502 R 3-145 #3-200
SPDTBL 000620 R 3-123 3-128 #3-228
SPMES 000542 R 3-219 #3-222 3-224
SPMSG 000520 R 3-157 #3-218
SPSZ = 000056 3-219 #3-224
STAT = 174434 #2-59
STATUS = 000022 #2-59
STSW0 = ****** GX 3-110 *3-130
STSW1 = ****** GX 3-134 3-137
SWR = 177570 #2-59
SWSLLT = 100000 #2-59
TENAD1 = 174410 #2-59
TENAD2 = 174412 #2-59
TOBM = 000004 #2-59
TOD = 000003 #2-59
TOIP = 000002 #2-59
TOIT = 000001 #2-59
TO10 = 000200 #2-59
TO10AD = 174420 #2-59
TO10BC = 174414 #2-59
TO10BM = 000001 #2-59
TO10DB = 000400 #2-59
TO10DN = 100000 #2-59
TO10DT = 174424 #2-59
TO10ER = 020000 #2-59
TO11 = 000100 #2-59
TO11AD = 174422 #2-59
TO11BC = 174416 #2-59
TO11BM = 020000 #2-59
TO11DB = 004000 #2-59
TO11DN = 000200 #2-59
TO11DT = 174426 #2-59
TO11ER = 000002 #2-59
TT.ABL = ****** GX 3-137
TT.RMT = ****** GX 3-134
UNASG1 = 000032 #2-59
UNASG2 = 000033 #2-59
UNASG3 = 000034 #2-59
UNASG4 = 000035 #2-59
UNASG5 = 000036 #2-59
UNASG6 = 000037 #2-59
UNIT 000503 R *3-95 *3-168 #3-202
WEP = 000010 #2-59
ZSTOP = 040000 #2-59
$$ = 000067 #3-146 3-146 #3-185 3-185 #3-192 3-192
$$$ARG = 000011 #3-219 3-219 #3-219 3-219 #3-219 3-219 #3-219 3-219
$$$GLB = ****** 3-219 3-219 3-219 3-219 3-219 3-219 3-219 3-219 3-245
3-245 3-245 3-245 3-245 3-245
$$$OST = 000016 #3-219 3-219 3-219 #3-219 3-219 3-219 #3-219 3-219 3-219
#3-219 3-219 3-219 #3-219 3-219 3-219 #3-219 3-219 3-219
#3-219 3-219 #3-245 3-245 3-245 #3-245 3-245 3-245 #3-245
SETSPD CREATED BY MACRO ON 16-JAN-78 AT 19:03 PAGE 5
SYMBOL CROSS REFERENCE CREF
SYMBOL VALUE REFERENCES
3-245 3-245 #3-245 3-245 3-245 #3-245 3-245 3-245 #3-245
$$$T1 = 000000 #3-245 3-245 3-245 3-245 #3-245 3-245
.ABCNT = ****** GX 3-97 *3-98 *3-158 3-175
.ABFLG = ****** GX 3-103 3-111 3-163 3-173 *3-197
.BRCLK = 005000 #2-59
.CECLK = 004000 #2-59
.CLKSW = ****** GX 3-183
.CLRMR = 006000 #2-59
.CLRUN = 010000 #2-59
.COMEF = ****** GX 3-131
.CONBT = 012000 #2-59
.CRTSK = ****** GX 3-149
.CSHRG = 164000 #2-59
.DQDLS = ****** GX 3-92 3-93
.DRLTC = 015000 #2-59