1 macro econ
2 even
3 arg e&U
4 zero
5 its -1,1
6 use s.exec
7 e&U:getlp
8 tra &1
9 use s.table
10 &end
11
12 macro dvid.version
13 maclist object save
14 vfd 36/&1
15 maclist restore
16 &end
17
18 macro dvid.devname
19 maclist off save
20 aci |&1|,&2
21 maclist restore
22 &end
23
24 macro dvid.dvt_r
25 maclist object save
26 zero &1
27 maclist restore
28 &end
29
30 macro dvid_segdef
31 equ &2.dvt,dvid.&1
32 segdef &2.dvt
33 &end
34
35 macro dvt.devclass
36 maclist off save
37 aci |&1|,&2
38 maclist restore
39 &end
40
41 macro dvt.outproc
42 maclist object save
43 econ &1
44 maclist restore
45 &end
46
47 macro dvt.footproc
48 maclist object save
49 econ &1
50 maclist restore
51 &end
52
53 macro dvt.artproc
54 maclist object save
55 econ &1
56 maclist restore
57 &end
58
59 macro dvt.displayproc
60 maclist object save
61 econ &1
62 maclist restore
63 &end
64
65 macro dvt.min_WS
66 maclist object save
67 vfd 36/&1
68 maclist restore
69 &end
70
71 macro dvt.min_lead
72 maclist object save
73 vfd 36/&1
74 maclist restore
75 &end
76
77 macro dvt.vmt_min
78 maclist object save
79 vfd 36/&1
80 maclist restore
81 &end
82
83 macro dvt.vmb_min
84 maclist object save
85 vfd 36/&1
86 maclist restore
87 &end
88
89 macro dvt.def_vmt
90 maclist object save
91 vfd 36/&1
92 maclist restore
93 &end
94
95 macro dvt.def_vmh
96 maclist object save
97 vfd 36/&1
98 maclist restore
99 &end
100
101 macro dvt.def_vmf
102 maclist object save
103 vfd 36/&1
104 maclist restore
105 &end
106
107 macro dvt.def_vmb
108 maclist object save
109 vfd 36/&1
110 maclist restore
111 &end
112
113 macro dvt.pdw_max
114 maclist object save
115 vfd 36/&1
116 maclist restore
117 &end
118
119 macro dvt.pdl_max
120 maclist object save
121 vfd 36/&1
122 maclist restore
123 &end
124
125 macro dvt.upshift
126 maclist object save
127 vfd 36/&1
128 maclist restore
129 &end
130
131 macro dvt.init_ps
132 maclist object save
133 vfd 36/&1
134 maclist restore
135 &end
136
137 macro dvt.lettersp
138 maclist object save
139 vfd 36/&1
140 maclist restore
141 &end
142
143 macro dvt.max_pages
144 maclist object save
145 vfd 36/&1
146 maclist restore
147 &end
148
149 macro dvt.max_files
150 maclist object save
151 vfd 36/&1
152 maclist restore
153 &end
154
155 macro dvt.init_fam
156 maclist object save
157 vfd 36/&1
158 maclist restore
159 &end
160
161 macro dvt.init_mem
162 maclist object save
163 vfd 36/&1
164 maclist restore
165 &end
166
167 macro dvt.foot_fam
168 maclist object save
169 vfd 36/&1
170 maclist restore
171 &end
172
173 macro dvt.foot_mem
174 maclist object save
175 vfd 36/&1
176 maclist restore
177 &end
178
179 macro dvt.init_family
180 maclist off save
181 aci |&1|,&2
182 maclist restore
183 &end
184
185 macro dvt.init_member
186 maclist off save
187 aci |&1|,&2
188 maclist restore
189 &end
190
191 macro dvt.atd_r
192 maclist object save
193 zero &1
194 maclist restore
195 &end
196
197 macro dvt.dvc_r
198 maclist object save
199 zero &1
200 maclist restore
201 &end
202
203 macro dvt.medsel_table_r
204 maclist object save
205 zero &1
206 maclist restore
207 &end
208
209 macro dvt.comment_r
210 maclist object save
211 zero &1
212 maclist restore
213 &end
214
215 macro dvt.cleanup_r
216 maclist object save
217 zero &1
218 maclist restore
219 &end
220
221 macro dvt.foot_family
222 maclist off save
223 aci |&1|,&2
224 maclist restore
225 &end
226
227 macro dvt.foot_member
228 maclist off save
229 aci |&1|,&2
230 maclist restore
231 &end
232
233 macro dvt.sws
234 maclist object save
235 oct &1
236 maclist restore
237 &end
238
239 macro dvt.open_mode
240 maclist object save
241 vfd 36/&1
242 maclist restore
243 &end
244
245 macro dvt.recleng
246 maclist object save
247 vfd 36/&1
248 maclist restore
249 &end
250
251 macro dvt.family_ct
252 maclist object save
253 vfd 36/&1
254 maclist restore
255 &end
256
257 macro dvt..member_r
258 maclist object save
259 zero &1
260 maclist restore
261 &end
262
263 macro dvt..name
264 maclist off save
265 aci |&1|,&2
266 maclist restore
267 &end
268
269 macro med_sel_tab.count
270 maclist object save
271 vfd 36/&1
272 maclist restore
273 &end
274
275 macro med_sel_tab..ref_r
276 maclist object save
277 zero &1
278 maclist restore
279 &end
280
281 macro member.count
282 maclist object save
283 vfd 36/&1
284 maclist restore
285 &end
286
287 macro member..font_r
288 maclist object save
289 zero &1
290 maclist restore
291 &end
292
293 macro member..size_r
294 maclist object save
295 zero &1
296 maclist restore
297 &end
298
299 macro member..Scale
300 maclist object save
301 dec &1,&2
302 maclist restore
303 &end
304
305 macro member..name
306 maclist off save
307 aci |&1|,&2
308 maclist restore
309 &end
310
311 macro font.units_r
312 maclist object save
313 zero &1
314 maclist restore
315 &end
316
317 macro font.oput_r
318 maclist object save
319 zero &1
320 maclist restore
321 &end
322
323 macro font.rel_units
324 maclist object save
325 vfd 36/&1
326 maclist restore
327 &end
328
329 macro font.footsep
330 maclist object save
331 aci &=&1,|&/&1/&;|&1|&,1
332 maclist restore
333 &end
334
335 macro font.fill
336 maclist object save
337 aci //,&1
338 maclist restore
339 &end
340
341 macro font.min_wsp
342 maclist object save
343 vfd 36/&1
344 maclist restore
345 &end
346
347 macro font.avg_wsp
348 maclist object save
349 vfd 36/&1
350 maclist restore
351 &end
352
353 macro font.max_wsp
354 maclist object save
355 vfd 36/&1
356 maclist restore
357 &end
358
359 macro units
360 maclist &=&2,0&off&;object& save
361 dup &1
362 vfd 36/&2
363 dupend
364 maclist restore
365 &end
366
367 macro oput.data_ct
368 maclist object save
369 vfd 36/&1
370 maclist restore
371 &end
372
373 macro ch
374 maclist object save
375 zero &1,&2
376 maclist restore
377 &end
378
379 macro no_ch
380 maclist off save
381 dup &1
382 dec 0
383 dupend
384 maclist restore
385 &end
386
387 macro sizel.val_ct
388 maclist object save
389 vfd 36/&1
390 maclist restore
391 &end
392
393 macro sizel..val
394 maclist object save
395 vfd 36/&1
396 maclist restore
397 &end
398 ^L" BEGIN a compose device table definition segment
399 use s.table
400 aci |*dvt| "marker
401 equ .no_repl.,0
402 equ art000000,0
403 equ dvc000000,0
404 equ .str_out.,2
405 equ .seq_out.,5