source:
buchla-68k/alcyon/im700.s@
4810254
Last change on this file since 4810254 was 7bf3856, checked in by , 7 years ago | |
---|---|
|
|
File size: 28.4 KB |
Rev | Line | |
---|---|---|
[7bf3856] | 1 | .globl _QQsw |
2 | .globl _QQanch | |
3 | .globl _QQin | |
4 | .globl _QQip | |
5 | .globl _QQop | |
6 | .globl _QQnum | |
7 | .globl _QQlnum | |
8 | .globl _QQchr | |
9 | .globl _QQdig | |
10 | .globl _QQstr | |
11 | .globl _lcdx | |
12 | .globl _lcdy | |
13 | .globl _lcdbit | |
14 | .globl _lcdrow | |
15 | .globl _lcdcol | |
16 | .globl _lcdbase | |
17 | .globl _lcdctl1 | |
18 | .globl _lcdctl2 | |
19 | .globl _io_time | |
20 | .globl _io_lcd | |
21 | .globl _io_ser | |
22 | .globl _io_midi | |
23 | .globl _io_disk | |
24 | .globl _io_tone | |
25 | .globl _io_leds | |
26 | .globl _io_kbrd | |
27 | .globl _lcd_a0 | |
28 | .globl _lcd_a1 | |
29 | .globl _io_vreg | |
30 | .globl _io_vraw | |
31 | .globl _io_vram | |
32 | .globl _io_fpu | |
33 | .globl _v_regs | |
34 | .globl _v_odtab | |
35 | .globl _v_actab | |
36 | .globl _v_ct0 | |
37 | .globl _v_gt1 | |
38 | .globl _v_score | |
39 | .globl _v_cgtab | |
40 | .globl _v_curs0 | |
41 | .globl _v_curs1 | |
42 | .globl _v_curs2 | |
43 | .globl _v_curs3 | |
44 | .globl _v_curs4 | |
45 | .globl _v_curs5 | |
46 | .globl _v_curs6 | |
47 | .globl _v_curs7 | |
48 | .globl _v_tcur | |
49 | .globl _v_kbobj | |
50 | .globl _v_lnobj | |
51 | .globl _v_win0 | |
52 | .globl _v_cur | |
53 | .globl _fc_sw | |
54 | .globl _fc_val | |
55 | .globl _timers | |
56 | .globl _v_obtab | |
57 | .globl _v_curob | |
58 | .globl _v_nobj | |
59 | .globl _v_obpri | |
60 | .globl _ac_code | |
61 | .globl _scname | |
62 | .globl _se_chg | |
63 | .globl _curscor | |
64 | .globl _cursect | |
65 | .globl _se1_cnt | |
66 | .globl _se2_cnt | |
67 | .globl _se3_cnt | |
68 | .globl _spool | |
69 | .globl _pspool | |
70 | .globl _spcount | |
71 | .globl _frags | |
72 | .globl _t_bak | |
73 | .globl _t_cur | |
74 | .globl _t_ctr | |
75 | .globl _t_fwd | |
76 | .globl _size1 | |
77 | .globl _size2 | |
78 | .globl _size3 | |
79 | .globl _scores | |
80 | .globl _scp | |
81 | .globl _seclist | |
82 | .globl _hplist | |
83 | .globl _p_bak | |
84 | .globl _p_cur | |
85 | .globl _p_ctr | |
86 | .globl _p_fwd | |
87 | .globl _blakpal | |
88 | .globl _t_prmtr | |
89 | .globl _funcndx | |
90 | .globl _keystat | |
91 | .globl _ldcmnt | |
92 | .globl _ldfile | |
93 | .globl _loadedc | |
94 | .globl _loadedf | |
95 | .globl _masens | |
96 | .globl _mctlval | |
97 | .globl _mdbyte | |
98 | .globl _mpsust | |
99 | .globl _mrstat | |
100 | .globl _trgtab | |
101 | .globl _fnoff | |
102 | .globl _articen | |
103 | .globl _grpmode | |
104 | .globl _grpsel | |
105 | .globl _grpstat | |
106 | .globl _gtctab | |
107 | .globl _lastvce | |
108 | .globl _lastvel | |
109 | .globl _mpbend | |
110 | .globl _msmstv | |
111 | .globl _prstab | |
112 | .globl _vce2trg | |
113 | .globl _veltab | |
114 | .globl _oldsw | |
115 | .globl _swpt | |
116 | .globl _curmove | |
117 | .globl _curtype | |
118 | .globl _cx_key | |
119 | .globl _cx_upd | |
120 | .globl _cy_key | |
121 | .globl _cy_upd | |
122 | .globl _d_key | |
123 | .globl _e_key | |
124 | .globl _m_key | |
125 | .globl _not_fld | |
126 | .globl _premove | |
127 | .globl _pstmove | |
128 | .globl _x_key | |
129 | .globl _xy_dn | |
130 | .globl _xy_up | |
131 | .globl _cratex | |
132 | .globl _cratey | |
133 | .globl _admctl | |
134 | .comm _admctl,2 | |
135 | .globl _adnamsw | |
136 | .comm _adnamsw,2 | |
137 | .globl _aflag | |
138 | .comm _aflag,2 | |
139 | .globl _aform | |
140 | .comm _aform,2 | |
141 | .globl _amplval | |
142 | .comm _amplval,2 | |
143 | .globl _ancmsw | |
144 | .comm _ancmsw,2 | |
145 | .globl _angroup | |
146 | .comm _angroup,2 | |
147 | .globl _asgfks | |
148 | .comm _asgfks,2 | |
149 | .globl _asghit | |
150 | .comm _asghit,2 | |
151 | .globl _asgmod | |
152 | .comm _asgmod,2 | |
153 | .globl _asig | |
154 | .comm _asig,2 | |
155 | .globl _asmode | |
156 | .comm _asmode,2 | |
157 | .globl _astat | |
158 | .comm _astat,2 | |
159 | .globl _auxctl | |
160 | .comm _auxctl,2 | |
161 | .globl _aval | |
162 | .comm _aval,2 | |
163 | .globl _bform | |
164 | .comm _bform,2 | |
165 | .globl _catin | |
166 | .comm _catin,2 | |
167 | .globl _cents | |
168 | .comm _cents,2 | |
169 | .globl _chtime | |
170 | .comm _chtime,2 | |
171 | .globl _chwait | |
172 | .comm _chwait,2 | |
173 | .globl _cflag | |
174 | .comm _cflag,2 | |
175 | .globl _clkctl | |
176 | .comm _clkctl,2 | |
177 | .globl _clkrun | |
178 | .comm _clkrun,2 | |
179 | .globl _clksrc | |
180 | .comm _clksrc,2 | |
181 | .globl _cmfirst | |
182 | .comm _cmfirst,2 | |
183 | .globl _cmtype | |
184 | .comm _cmtype,2 | |
185 | .globl _cnote | |
186 | .comm _cnote,2 | |
187 | .globl _ctrsw | |
188 | .comm _ctrsw,2 | |
189 | .globl _curasg | |
190 | .comm _curasg,2 | |
191 | .globl _curfunc | |
192 | .comm _curfunc,2 | |
193 | .globl _curgrp | |
194 | .comm _curgrp,2 | |
195 | .globl _curinst | |
196 | .comm _curinst,2 | |
197 | .globl _curmop | |
198 | .comm _curmop,2 | |
199 | .globl _curpnt | |
200 | .comm _curpnt,2 | |
201 | .globl _curpos | |
202 | .comm _curpos,2 | |
203 | .globl _cursbox | |
204 | .comm _cursbox,2 | |
205 | .globl _curscor | |
206 | .comm _curscor,2 | |
207 | .globl _cursect | |
208 | .comm _cursect,2 | |
209 | .globl _curslim | |
210 | .comm _curslim,2 | |
211 | .globl _curtun | |
212 | .comm _curtun,2 | |
213 | .globl _curvce | |
214 | .comm _curvce,2 | |
215 | .globl _curwave | |
216 | .comm _curwave,2 | |
217 | .globl _curwdth | |
218 | .comm _curwdth,2 | |
219 | .globl _curwfnl | |
220 | .comm _curwfnl,2 | |
221 | .globl _curwhrm | |
222 | .comm _curwhrm,2 | |
223 | .globl _curwhrv | |
224 | .comm _curwhrv,2 | |
225 | .globl _curwoff | |
226 | .comm _curwoff,2 | |
227 | .globl _curwpnt | |
228 | .comm _curwpnt,2 | |
229 | .globl _curwslt | |
230 | .comm _curwslt,2 | |
231 | .globl _cvtime | |
232 | .comm _cvtime,2 | |
233 | .globl _cvwait | |
234 | .comm _cvwait,2 | |
235 | .globl _cxrate | |
236 | .comm _cxrate,2 | |
237 | .globl _cxval | |
238 | .comm _cxval,2 | |
239 | .globl _cyrate | |
240 | .comm _cyrate,2 | |
241 | .globl _cyval | |
242 | .comm _cyval,2 | |
243 | .globl _debugne | |
244 | .comm _debugne,2 | |
245 | .globl _defect | |
246 | .comm _defect,2 | |
247 | .globl _dferror | |
248 | .comm _dferror,2 | |
249 | .globl _dfsides | |
250 | .comm _dfsides,2 | |
251 | .globl _dftype | |
252 | .comm _dftype,2 | |
253 | .globl _dsp_ok | |
254 | .comm _dsp_ok,2 | |
255 | .globl _dubsw | |
256 | .comm _dubsw,2 | |
257 | .globl _ebflag | |
258 | .comm _ebflag,2 | |
259 | .globl _editss | |
260 | .comm _editss,2 | |
261 | .globl _editsw | |
262 | .comm _editsw,2 | |
263 | .globl _endflg | |
264 | .comm _endflg,2 | |
265 | .globl _ext_cv1 | |
266 | .comm _ext_cv1,2 | |
267 | .globl _ext_cv2 | |
268 | .comm _ext_cv2,2 | |
269 | .globl _ext_cv3 | |
270 | .comm _ext_cv3,2 | |
271 | .globl _ext_cv4 | |
272 | .comm _ext_cv4,2 | |
273 | .globl _ext_mod | |
274 | .comm _ext_mod,2 | |
275 | .globl _gomode | |
276 | .comm _gomode,2 | |
277 | .globl _grptran | |
278 | .comm _grptran,2 | |
279 | .globl _gtmsel | |
280 | .comm _gtmsel,2 | |
281 | .globl _hitbox | |
282 | .comm _hitbox,2 | |
283 | .globl _hitcx | |
284 | .comm _hitcx,2 | |
285 | .globl _hitcy | |
286 | .comm _hitcy,2 | |
287 | .globl _idcfsw | |
288 | .comm _idcfsw,2 | |
289 | .globl _idimsw | |
290 | .comm _idimsw,2 | |
291 | .globl _idintmp | |
292 | .comm _idintmp,2 | |
293 | .globl _idnamsw | |
294 | .comm _idnamsw,2 | |
295 | .globl _idsrcsw | |
296 | .comm _idsrcsw,2 | |
297 | .globl _idtdat | |
298 | .comm _idtdat,2 | |
299 | .globl _imflag | |
300 | .comm _imflag,2 | |
301 | .globl _initcfg | |
302 | .comm _initcfg,2 | |
303 | .globl _insmode | |
304 | .comm _insmode,2 | |
305 | .globl _ismode | |
306 | .comm _ismode,2 | |
307 | .globl _lampio | |
308 | .comm _lampio,2 | |
309 | .globl _lampsw | |
310 | .comm _lampsw,2 | |
311 | .globl _lasgsw | |
312 | .comm _lasgsw,2 | |
313 | .globl _lastam | |
314 | .comm _lastam,2 | |
315 | .globl _ldelsw | |
316 | .comm _ldelsw,2 | |
317 | .globl _lderrsw | |
318 | .comm _lderrsw,2 | |
319 | .globl _ldidsiz | |
320 | .comm _ldidsiz,2 | |
321 | .globl _ldkind | |
322 | .comm _ldkind,2 | |
323 | .globl _ldpass | |
324 | .comm _ldpass,2 | |
325 | .globl _ldrow | |
326 | .comm _ldrow,2 | |
327 | .globl _ldslot | |
328 | .comm _ldslot,2 | |
329 | .globl _legato | |
330 | .comm _legato,2 | |
331 | .globl _lksel | |
332 | .comm _lksel,2 | |
333 | .globl _lmwtype | |
334 | .comm _lmwtype,2 | |
335 | .globl _loadrow | |
336 | .comm _loadrow,2 | |
337 | .globl _loadsw | |
338 | .comm _loadsw,2 | |
339 | .globl _lorchl | |
340 | .comm _lorchl,2 | |
341 | .globl _lorchsw | |
342 | .comm _lorchsw,2 | |
343 | .globl _lorclsw | |
344 | .comm _lorclsw,2 | |
345 | .globl _lpatsw | |
346 | .comm _lpatsw,2 | |
347 | .globl _lrasw | |
348 | .comm _lrasw,2 | |
349 | .globl _lscrsw | |
350 | .comm _lscrsw,2 | |
351 | .globl _lselsw | |
352 | .comm _lselsw,2 | |
353 | .globl _lseqsw | |
354 | .comm _lseqsw,2 | |
355 | .globl _lstbgnc | |
356 | .comm _lstbgnc,2 | |
357 | .globl _lstendc | |
358 | .comm _lstendc,2 | |
359 | .globl _lstflag | |
360 | .comm _lstflag,2 | |
361 | .globl _lstrsw | |
362 | .comm _lstrsw,2 | |
363 | .globl _lstwoff | |
364 | .comm _lstwoff,2 | |
365 | .globl _lstwpnt | |
366 | .comm _lstwpnt,2 | |
367 | .globl _ltagged | |
368 | .comm _ltagged,2 | |
369 | .globl _ltunsw | |
370 | .comm _ltunsw,2 | |
371 | .globl _lwavsw | |
372 | .comm _lwavsw,2 | |
373 | .globl _mascntr | |
374 | .comm _mascntr,2 | |
375 | .globl _mdb1 | |
376 | .comm _mdb1,2 | |
377 | .globl _mdb2 | |
378 | .comm _mdb2,2 | |
379 | .globl _michan | |
380 | .comm _michan,2 | |
381 | .globl _midiclk | |
382 | .comm _midiclk,2 | |
383 | .globl _midigo | |
384 | .comm _midigo,2 | |
385 | .globl _mistat | |
386 | .comm _mistat,2 | |
387 | .globl _nchwait | |
388 | .comm _nchwait,2 | |
389 | .globl _ncvwait | |
390 | .comm _ncvwait,2 | |
391 | .globl _ndisp | |
392 | .comm _ndisp,2 | |
393 | .globl _newflag | |
394 | .comm _newflag,2 | |
395 | .globl _nkdown | |
396 | .comm _nkdown,2 | |
397 | .globl _notenum | |
398 | .comm _notenum,2 | |
399 | .globl _noteop | |
400 | .comm _noteop,2 | |
401 | .globl _notepit | |
402 | .comm _notepit,2 | |
403 | .globl _notesel | |
404 | .comm _notesel,2 | |
405 | .globl _npts | |
406 | .comm _npts,2 | |
407 | .globl _nxtflag | |
408 | .comm _nxtflag,2 | |
409 | .globl _oldltag | |
410 | .comm _oldltag,2 | |
411 | .globl _oldpk | |
412 | .comm _oldpk,2 | |
413 | .globl _oldsl | |
414 | .comm _oldsl,2 | |
415 | .globl _pchsw | |
416 | .comm _pchsw,2 | |
417 | .globl _pecase | |
418 | .comm _pecase,2 | |
419 | .globl _pkctrl | |
420 | .comm _pkctrl,2 | |
421 | .globl _pntsv | |
422 | .comm _pntsv,2 | |
423 | .globl _prgchan | |
424 | .comm _prgchan,2 | |
425 | .globl _ps_dpth | |
426 | .comm _ps_dpth,2 | |
427 | .globl _ps_intn | |
428 | .comm _ps_intn,2 | |
429 | .globl _ps_rate | |
430 | .comm _ps_rate,2 | |
431 | .globl _pulsclk | |
432 | .comm _pulsclk,2 | |
433 | .globl _recsw | |
434 | .comm _recsw,2 | |
435 | .globl _runit | |
436 | .comm _runit,2 | |
437 | .globl _sbase | |
438 | .comm _sbase,2 | |
439 | .globl _scmctl | |
440 | .comm _scmctl,2 | |
441 | .globl _scrlpot | |
442 | .comm _scrlpot,2 | |
443 | .globl _sd | |
444 | .comm _sd,2 | |
445 | .globl _se | |
446 | .comm _se,2 | |
447 | .globl _sdmcol | |
448 | .comm _sdmcol,2 | |
449 | .globl _sdmctl | |
450 | .comm _sdmctl,2 | |
451 | .globl _sdmrow | |
452 | .comm _sdmrow,2 | |
453 | .globl _secop | |
454 | .comm _secop,2 | |
455 | .globl _secopok | |
456 | .comm _secopok,2 | |
457 | .globl _sgcsw | |
458 | .comm _sgcsw,2 | |
459 | .globl _sgoflag | |
460 | .comm _sgoflag,2 | |
461 | .globl _sharp | |
462 | .comm _sharp,2 | |
463 | .globl _sliders | |
464 | .comm _sliders,2 | |
465 | .globl _soffset | |
466 | .comm _soffset,2 | |
467 | .globl _ss_ptsw | |
468 | .comm _ss_ptsw,2 | |
469 | .globl _ss_sqsw | |
470 | .comm _ss_sqsw,2 | |
471 | .globl _stccol | |
472 | .comm _stccol,2 | |
473 | .globl _stcrow | |
474 | .comm _stcrow,2 | |
475 | .globl _stepclk | |
476 | .comm _stepclk,2 | |
477 | .globl _stepenb | |
478 | .comm _stepenb,2 | |
479 | .globl _stepint | |
480 | .comm _stepint,2 | |
481 | .globl _stepwgt | |
482 | .comm _stepwgt,2 | |
483 | .globl _subj | |
484 | .comm _subj,2 | |
485 | .globl _submenu | |
486 | .comm _submenu,2 | |
487 | .globl _swctrl | |
488 | .comm _swctrl,2 | |
489 | .globl _swdelta | |
490 | .comm _swdelta,2 | |
491 | .globl _swdir | |
492 | .comm _swdir,2 | |
493 | .globl _swfiin | |
494 | .comm _swfiin,2 | |
495 | .globl _swflag | |
496 | .comm _swflag,2 | |
497 | .globl _swlast | |
498 | .comm _swlast,2 | |
499 | .globl _swstop | |
500 | .comm _swstop,2 | |
501 | .globl _swndx | |
502 | .comm _swndx,2 | |
503 | .globl _tagslot | |
504 | .comm _tagslot,2 | |
505 | .globl _tdnamsw | |
506 | .comm _tdnamsw,2 | |
507 | .globl _temax | |
508 | .comm _temax,2 | |
509 | .globl _temin | |
510 | .comm _temin,2 | |
511 | .globl _testing | |
512 | .comm _testing,2 | |
513 | .globl _tglclk | |
514 | .comm _tglclk,2 | |
515 | .globl _tglpch | |
516 | .comm _tglpch,2 | |
517 | .globl _thescore | |
518 | .comm _thescore,2 | |
519 | .globl _timemlt | |
520 | .comm _timemlt,2 | |
521 | .globl _tkctrl | |
522 | .comm _tkctrl,2 | |
523 | .globl _tmpomlt | |
524 | .comm _tmpomlt,2 | |
525 | .globl _tmpoval | |
526 | .comm _tmpoval,2 | |
527 | .globl _trkball | |
528 | .comm _trkball,2 | |
529 | .globl _ttcmdsv | |
530 | .comm _ttcmdsv,2 | |
531 | .globl _ttsel1 | |
532 | .comm _ttsel1,2 | |
533 | .globl _ttsel2 | |
534 | .comm _ttsel2,2 | |
535 | .globl _ttsel3 | |
536 | .comm _ttsel3,2 | |
537 | .globl _tuneval | |
538 | .comm _tuneval,2 | |
539 | .globl _tunmod | |
540 | .comm _tunmod,2 | |
541 | .globl _tunval | |
542 | .comm _tunval,2 | |
543 | .globl _txfiin | |
544 | .comm _txfiin,2 | |
545 | .globl _txflag | |
546 | .comm _txflag,2 | |
547 | .globl _txlast | |
548 | .comm _txlast,2 | |
549 | .globl _txstop | |
550 | .comm _txstop,2 | |
551 | .globl _tyfiin | |
552 | .comm _tyfiin,2 | |
553 | .globl _tyflag | |
554 | .comm _tyflag,2 | |
555 | .globl _tylast | |
556 | .comm _tylast,2 | |
557 | .globl _tystop | |
558 | .comm _tystop,2 | |
559 | .globl _velflag | |
560 | .comm _velflag,2 | |
561 | .globl _verbose | |
562 | .comm _verbose,2 | |
563 | .globl _vlbtype | |
564 | .comm _vlbtype,2 | |
565 | .globl _vrbw08 | |
566 | .comm _vrbw08,2 | |
567 | .globl _vrbw09 | |
568 | .comm _vrbw09,2 | |
569 | .globl _vrbw10 | |
570 | .comm _vrbw10,2 | |
571 | .globl _vrbw11 | |
572 | .comm _vrbw11,2 | |
573 | .globl _vrbw12 | |
574 | .comm _vrbw12,2 | |
575 | .globl _vrbw13 | |
576 | .comm _vrbw13,2 | |
577 | .globl _vrbw14 | |
578 | .comm _vrbw14,2 | |
579 | .globl _vrbw15 | |
580 | .comm _vrbw15,2 | |
581 | .globl _vrcw | |
582 | .comm _vrcw,2 | |
583 | .globl _vtccol | |
584 | .comm _vtccol,2 | |
585 | .globl _vtcrow | |
586 | .comm _vtcrow,2 | |
587 | .globl _vtdechr | |
588 | .comm _vtdechr,2 | |
589 | .globl _vtdecol | |
590 | .comm _vtdecol,2 | |
591 | .globl _vtpcol | |
592 | .comm _vtpcol,2 | |
593 | .globl _vtprow | |
594 | .comm _vtprow,2 | |
595 | .globl _vtwcol | |
596 | .comm _vtwcol,2 | |
597 | .globl _vtwrow | |
598 | .comm _vtwrow,2 | |
599 | .globl _vtxval | |
600 | .comm _vtxval,2 | |
601 | .globl _vtyval | |
602 | .comm _vtyval,2 | |
603 | .globl _wcflag | |
604 | .comm _wcflag,2 | |
605 | .globl _wcmcol | |
606 | .comm _wcmcol,2 | |
607 | .globl _wcmrow | |
608 | .comm _wcmrow,2 | |
609 | .globl _wcpage | |
610 | .comm _wcpage,2 | |
611 | .globl _wdupdfl | |
612 | .comm _wdupdfl,2 | |
613 | .globl _wmcsel | |
614 | .comm _wmcsel,2 | |
615 | .globl _wmctag | |
616 | .comm _wmctag,2 | |
617 | .globl _wplast | |
618 | .comm _wplast,2 | |
619 | .globl _wpntsv | |
620 | .comm _wpntsv,2 | |
621 | .globl _wshmax | |
622 | .comm _wshmax,2 | |
623 | .globl _wvlast | |
624 | .comm _wvlast,2 | |
625 | .globl _xkcount | |
626 | .comm _xkcount,2 | |
627 | .globl _xkstat | |
628 | .comm _xkstat,2 | |
629 | .globl _xycntr | |
630 | .comm _xycntr,2 | |
631 | .globl _ykcount | |
632 | .comm _ykcount,2 | |
633 | .globl _ykstat | |
634 | .comm _ykstat,2 | |
635 | .globl _anrs | |
636 | .comm _anrs,256 | |
637 | .globl _grp2prt | |
638 | .comm _grp2prt,48 | |
639 | .globl _sctctab | |
640 | .comm _sctctab,1280 | |
641 | .globl _sigtab | |
642 | .comm _sigtab,512 | |
643 | .globl _tunlib | |
644 | .comm _tunlib,2560 | |
645 | .globl _varmode | |
646 | .comm _varmode,256 | |
647 | .globl _wsnmod | |
648 | .comm _wsnmod,48 | |
649 | .globl _mphead | |
650 | .comm _mphead,28 | |
651 | .globl _cfetp | |
652 | .comm _cfetp,4 | |
653 | .globl _curfet | |
654 | .comm _curfet,4 | |
655 | .globl _infetp | |
656 | .comm _infetp,4 | |
657 | .globl _gdfsep | |
658 | .comm _gdfsep,4 | |
659 | .globl _pntptr | |
660 | .comm _pntptr,4 | |
661 | .globl _ldhead | |
662 | .comm _ldhead,56 | |
663 | .globl _nefree | |
664 | .comm _nefree,4 | |
665 | .globl _nelist | |
666 | .comm _nelist,4 | |
667 | .globl _adoct | |
668 | .comm _adoct,4 | |
669 | .globl _ldoct | |
670 | .comm _ldoct,4 | |
671 | .globl _mdoct | |
672 | .comm _mdoct,4 | |
673 | .globl _tdoct | |
674 | .comm _tdoct,4 | |
675 | .globl _wdoct | |
676 | .comm _wdoct,4 | |
677 | .globl _idoct | |
678 | .comm _idoct,4 | |
679 | .globl _pflist | |
680 | .comm _pflist,4 | |
681 | .globl _pfqhdr | |
682 | .comm _pfqhdr,4 | |
683 | .globl _libsp | |
684 | .comm _libsp,4 | |
685 | .globl _peg | |
686 | .comm _peg,4 | |
687 | .globl _size1 | |
688 | .comm _size1,4 | |
689 | .globl _size2 | |
690 | .comm _size2,4 | |
691 | .globl _size3 | |
692 | .comm _size3,4 | |
693 | .globl _csbp | |
694 | .comm _csbp,4 | |
695 | .globl _curboxp | |
696 | .comm _curboxp,4 | |
697 | .globl _p_bak | |
698 | .comm _p_bak,4 | |
699 | .globl _p_cbgn | |
700 | .comm _p_cbgn,4 | |
701 | .globl _p_cend | |
702 | .comm _p_cend,4 | |
703 | .globl _p_cur | |
704 | .comm _p_cur,4 | |
705 | .globl _p_ctr | |
706 | .comm _p_ctr,4 | |
707 | .globl _p_fwd | |
708 | .comm _p_fwd,4 | |
709 | .globl _p_nbeg | |
710 | .comm _p_nbeg,4 | |
711 | .globl _p_nend | |
712 | .comm _p_nend,4 | |
713 | .globl _p_sbgn | |
714 | .comm _p_sbgn,4 | |
715 | .globl _p_sec1 | |
716 | .comm _p_sec1,4 | |
717 | .globl _p_sec2 | |
718 | .comm _p_sec2,4 | |
719 | .globl _p_send | |
720 | .comm _p_send,4 | |
721 | .globl _scp | |
722 | .comm _scp,4 | |
723 | .globl _asgtab | |
724 | .comm _asgtab,33200 | |
725 | .globl _filecat | |
726 | .comm _filecat,1120 | |
727 | .globl _gdstbc | |
728 | .comm _gdstbc,68 | |
729 | .globl _gdstbn | |
730 | .comm _gdstbn,68 | |
731 | .globl _gdstbp | |
732 | .comm _gdstbp,68 | |
733 | .globl _gdfsl | |
734 | .comm _gdfsl,2048 | |
735 | .globl _idefs | |
736 | .comm _idefs,161458 | |
737 | .globl _lstbgns | |
738 | .comm _lstbgns,192 | |
739 | .globl _lstends | |
740 | .comm _lstends,192 | |
741 | .globl _vbufs | |
742 | .comm _vbufs,47256 | |
743 | .globl _nevents | |
744 | .comm _nevents,256 | |
745 | .globl _pfents | |
746 | .comm _pfents,10752 | |
747 | .globl _sindex | |
748 | .comm _sindex,400 | |
749 | .globl _vpsms | |
750 | .comm _vpsms,768 | |
751 | .globl _sments | |
752 | .comm _sments,2304 | |
753 | .globl _valents | |
754 | .comm _valents,1920 | |
755 | .globl _wslib | |
756 | .comm _wslib,21600 | |
757 | .globl _scores | |
758 | .comm _scores,80 | |
759 | .globl _stimes | |
760 | .comm _stimes,4800 | |
761 | .globl _hplist | |
762 | .comm _hplist,960 | |
763 | .globl _seclist | |
764 | .comm _seclist,1600 | |
765 | .globl _asgob | |
766 | .comm _asgob,4 | |
767 | .globl _consl | |
768 | .comm _consl,4 | |
769 | .globl _cursl | |
770 | .comm _cursl,4 | |
771 | .globl _instob | |
772 | .comm _instob,4 | |
773 | .globl _librob | |
774 | .comm _librob,4 | |
775 | .globl _menuob | |
776 | .comm _menuob,4 | |
777 | .globl _nxtsl | |
778 | .comm _nxtsl,4 | |
779 | .globl _obj0 | |
780 | .comm _obj0,4 | |
781 | .globl _obj1 | |
782 | .comm _obj1,4 | |
783 | .globl _obj2 | |
784 | .comm _obj2,4 | |
785 | .globl _obj3 | |
786 | .comm _obj3,4 | |
787 | .globl _obj4 | |
788 | .comm _obj4,4 | |
789 | .globl _obj5 | |
790 | .comm _obj5,4 | |
791 | .globl _obj6 | |
792 | .comm _obj6,4 | |
793 | .globl _obj7 | |
794 | .comm _obj7,4 | |
795 | .globl _obj8 | |
796 | .comm _obj8,4 | |
797 | .globl _obj9 | |
798 | .comm _obj9,4 | |
799 | .globl _obj10 | |
800 | .comm _obj10,4 | |
801 | .globl _obj11 | |
802 | .comm _obj11,4 | |
803 | .globl _obj12 | |
804 | .comm _obj12,4 | |
805 | .globl _obj13 | |
806 | .comm _obj13,4 | |
807 | .globl _obj14 | |
808 | .comm _obj14,4 | |
809 | .globl _obj15 | |
810 | .comm _obj15,4 | |
811 | .globl _prvsl | |
812 | .comm _prvsl,4 | |
813 | .globl _saddr | |
814 | .comm _saddr,4 | |
815 | .globl _tunob | |
816 | .comm _tunob,4 | |
817 | .globl _vtobj | |
818 | .comm _vtobj,4 | |
819 | .globl _waveob | |
820 | .comm _waveob,4 | |
821 | .globl _curintp | |
822 | .comm _curintp,2 | |
823 | .globl _scrl | |
824 | .comm _scrl,2 | |
825 | .globl _vtbgval | |
826 | .comm _vtbgval,2 | |
827 | .globl _vtfgval | |
828 | .comm _vtfgval,2 | |
829 | .globl _dfbuf | |
830 | .comm _dfbuf,8192 | |
831 | .globl _slices | |
832 | .comm _slices,1792 | |
833 | .globl _debugsw | |
834 | .data | |
835 | _debugsw: | |
836 | .dc.w $0 | |
837 | .globl _swback | |
838 | .data | |
839 | _swback: | |
840 | .dc.w $A | |
841 | .globl _swthr | |
842 | .data | |
843 | _swthr: | |
844 | .dc.w $4 | |
845 | .globl _swtime | |
846 | .data | |
847 | _swtime: | |
848 | .dc.w $A | |
849 | .globl _swwait | |
850 | .data | |
851 | _swwait: | |
852 | .dc.w $2 | |
853 | .globl _tkback | |
854 | .data | |
855 | _tkback: | |
856 | .dc.w $8 | |
857 | .globl _tkrmin | |
858 | .data | |
859 | _tkrmin: | |
860 | .dc.w $6 | |
861 | .globl _tkthr | |
862 | .data | |
863 | _tkthr: | |
864 | .dc.w $3 | |
865 | .globl _tktime | |
866 | .data | |
867 | _tktime: | |
868 | .dc.w $A | |
869 | .globl _tkwait | |
870 | .data | |
871 | _tkwait: | |
872 | .dc.w $2 | |
873 | .globl _curhold | |
874 | .data | |
875 | _curhold: | |
876 | .dc.w $12C | |
877 | .globl _hcwval | |
878 | .data | |
879 | _hcwval: | |
880 | .dc.w $1E | |
881 | .globl _thcwval | |
882 | .data | |
883 | _thcwval: | |
884 | .dc.w $3C | |
885 | .globl _tvcwval | |
886 | .data | |
887 | _tvcwval: | |
888 | .dc.w $78 | |
889 | .globl _vcwval | |
890 | .data | |
891 | _vcwval: | |
892 | .dc.w $1E | |
893 | .globl _tmultab | |
894 | .data | |
895 | _tmultab: | |
896 | .dc.w $FFFF | |
897 | .dc.w $FAFA | |
898 | .dc.w $F627 | |
899 | .dc.w $F182 | |
900 | .dc.w $ED09 | |
901 | .dc.w $E8BA | |
902 | .dc.w $E492 | |
903 | .dc.w $E08F | |
904 | .dc.w $DCB0 | |
905 | .dc.w $D8F2 | |
906 | .dc.w $D555 | |
907 | .dc.w $D1D6 | |
908 | .dc.w $CE73 | |
909 | .dc.w $CB2C | |
910 | .dc.w $C800 | |
911 | .dc.w $C4EC | |
912 | .dc.w $C1F0 | |
913 | .dc.w $BF0B | |
914 | .dc.w $BC3C | |
915 | .dc.w $B981 | |
916 | .dc.w $B6DB | |
917 | .dc.w $B448 | |
918 | .dc.w $B1C7 | |
919 | .dc.w $AF57 | |
920 | .dc.w $ACF9 | |
921 | .dc.w $AAAA | |
922 | .dc.w $A86B | |
923 | .dc.w $A63B | |
924 | .dc.w $A41A | |
925 | .dc.w $A206 | |
926 | .dc.w $A000 | |
927 | .dc.w $9E06 | |
928 | .dc.w $9C18 | |
929 | .dc.w $9A37 | |
930 | .dc.w $9861 | |
931 | .dc.w $9696 | |
932 | .dc.w $94D6 | |
933 | .dc.w $9320 | |
934 | .dc.w $9174 | |
935 | .dc.w $8FD1 | |
936 | .dc.w $8E38 | |
937 | .dc.w $8CA8 | |
938 | .dc.w $8B21 | |
939 | .dc.w $89A2 | |
940 | .dc.w $882B | |
941 | .dc.w $86BC | |
942 | .dc.w $8555 | |
943 | .dc.w $83F5 | |
944 | .dc.w $829C | |
945 | .dc.w $814A | |
946 | .dc.w $8000 | |
947 | .dc.w $7EBB | |
948 | .dc.w $7D7D | |
949 | .dc.w $7C45 | |
950 | .dc.w $7B13 | |
951 | .dc.w $79E7 | |
952 | .dc.w $78C1 | |
953 | .dc.w $77A0 | |
954 | .dc.w $7684 | |
955 | .dc.w $756E | |
956 | .dc.w $745D | |
957 | .dc.w $7350 | |
958 | .dc.w $7249 | |
959 | .dc.w $7146 | |
960 | .dc.w $7047 | |
961 | .dc.w $6F4D | |
962 | .dc.w $6E58 | |
963 | .dc.w $6D66 | |
964 | .dc.w $6C79 | |
965 | .dc.w $6B90 | |
966 | .dc.w $6AAA | |
967 | .dc.w $69C8 | |
968 | .dc.w $68EB | |
969 | .dc.w $6810 | |
970 | .dc.w $6739 | |
971 | .dc.w $6666 | |
972 | .dc.w $6596 | |
973 | .dc.w $64C9 | |
974 | .dc.w $6400 | |
975 | .dc.w $6339 | |
976 | .dc.w $6276 | |
977 | .dc.w $61B5 | |
978 | .dc.w $60F8 | |
979 | .dc.w $603D | |
980 | .dc.w $5F85 | |
981 | .dc.w $5ED0 | |
982 | .dc.w $5E1E | |
983 | .dc.w $5D6E | |
984 | .dc.w $5CC0 | |
985 | .dc.w $5C16 | |
986 | .dc.w $5B6D | |
987 | .dc.w $5AC7 | |
988 | .dc.w $5A24 | |
989 | .dc.w $5982 | |
990 | .dc.w $58E3 | |
991 | .dc.w $5846 | |
992 | .dc.w $57AB | |
993 | .dc.w $5713 | |
994 | .dc.w $567C | |
995 | .dc.w $55E7 | |
996 | .dc.w $5555 | |
997 | .globl _crate0 | |
998 | .data | |
999 | _crate0: | |
1000 | .dc.w $0 | |
1001 | .dc.w $0 | |
1002 | .dc.w $0 | |
1003 | .dc.w $0 | |
1004 | .dc.w $0 | |
1005 | .dc.w $0 | |
1006 | .dc.w $0 | |
1007 | .dc.w $0 | |
1008 | .dc.w $0 | |
1009 | .dc.w $0 | |
1010 | .dc.w $0 | |
1011 | .dc.w $0 | |
1012 | .dc.w $1 | |
1013 | .dc.w $1 | |
1014 | .dc.w $1 | |
1015 | .dc.w $1 | |
1016 | .dc.w $1 | |
1017 | .dc.w $1 | |
1018 | .dc.w $1 | |
1019 | .dc.w $1 | |
1020 | .dc.w $1 | |
1021 | .dc.w $1 | |
1022 | .dc.w $1 | |
1023 | .dc.w $1 | |
1024 | .dc.w $1 | |
1025 | .dc.w $1 | |
1026 | .dc.w $1 | |
1027 | .dc.w $1 | |
1028 | .dc.w $1 | |
1029 | .dc.w $1 | |
1030 | .dc.w $1 | |
1031 | .dc.w $1 | |
1032 | .dc.w $1 | |
1033 | .dc.w $1 | |
1034 | .dc.w $1 | |
1035 | .dc.w $1 | |
1036 | .dc.w $1 | |
1037 | .dc.w $1 | |
1038 | .dc.w $1 | |
1039 | .dc.w $1 | |
1040 | .dc.w $1 | |
1041 | .dc.w $1 | |
1042 | .dc.w $1 | |
1043 | .dc.w $1 | |
1044 | .dc.w $1 | |
1045 | .dc.w $1 | |
1046 | .dc.w $1 | |
1047 | .dc.w $1 | |
1048 | .dc.w $1 | |
1049 | .dc.w $1 | |
1050 | .dc.w $1 | |
1051 | .dc.w $1 | |
1052 | .dc.w $1 | |
1053 | .dc.w $1 | |
1054 | .dc.w $1 | |
1055 | .dc.w $1 | |
1056 | .dc.w $1 | |
1057 | .dc.w $1 | |
1058 | .dc.w $1 | |
1059 | .dc.w $1 | |
1060 | .dc.w $1 | |
1061 | .dc.w $1 | |
1062 | .dc.w $1 | |
1063 | .dc.w $1 | |
1064 | .globl _crate1 | |
1065 | .data | |
1066 | _crate1: | |
1067 | .dc.w $0 | |
1068 | .dc.w $0 | |
1069 | .dc.w $0 | |
1070 | .dc.w $0 | |
1071 | .dc.w $0 | |
1072 | .dc.w $0 | |
1073 | .dc.w $0 | |
1074 | .dc.w $0 | |
1075 | .dc.w $1 | |
1076 | .dc.w $1 | |
1077 | .dc.w $1 | |
1078 | .dc.w $1 | |
1079 | .dc.w $1 | |
1080 | .dc.w $1 | |
1081 | .dc.w $1 | |
1082 | .dc.w $1 | |
1083 | .dc.w $3 | |
1084 | .dc.w $3 | |
1085 | .dc.w $3 | |
1086 | .dc.w $3 | |
1087 | .dc.w $3 | |
1088 | .dc.w $3 | |
1089 | .dc.w $3 | |
1090 | .dc.w $3 | |
1091 | .dc.w $5 | |
1092 | .dc.w $5 | |
1093 | .dc.w $5 | |
1094 | .dc.w $5 | |
1095 | .dc.w $5 | |
1096 | .dc.w $5 | |
1097 | .dc.w $5 | |
1098 | .dc.w $5 | |
1099 | .dc.w $7 | |
1100 | .dc.w $7 | |
1101 | .dc.w $7 | |
1102 | .dc.w $7 | |
1103 | .dc.w $7 | |
1104 | .dc.w $7 | |
1105 | .dc.w $7 | |
1106 | .dc.w $7 | |
1107 | .dc.w $9 | |
1108 | .dc.w $9 | |
1109 | .dc.w $9 | |
1110 | .dc.w $9 | |
1111 | .dc.w $9 | |
1112 | .dc.w $9 | |
1113 | .dc.w $9 | |
1114 | .dc.w $9 | |
1115 | .dc.w $B | |
1116 | .dc.w $B | |
1117 | .dc.w $B | |
1118 | .dc.w $B | |
1119 | .dc.w $B | |
1120 | .dc.w $B | |
1121 | .dc.w $B | |
1122 | .dc.w $B | |
1123 | .dc.w $D | |
1124 | .dc.w $D | |
1125 | .dc.w $D | |
1126 | .dc.w $D | |
1127 | .dc.w $D | |
1128 | .dc.w $D | |
1129 | .dc.w $D | |
1130 | .dc.w $D | |
1131 | .globl _crate2 | |
1132 | .data | |
1133 | _crate2: | |
1134 | .dc.w $0 | |
1135 | .dc.w $0 | |
1136 | .dc.w $0 | |
1137 | .dc.w $0 | |
1138 | .dc.w $0 | |
1139 | .dc.w $0 | |
1140 | .dc.w $0 | |
1141 | .dc.w $0 | |
1142 | .dc.w $1 | |
1143 | .dc.w $1 | |
1144 | .dc.w $1 | |
1145 | .dc.w $1 | |
1146 | .dc.w $1 | |
1147 | .dc.w $1 | |
1148 | .dc.w $1 | |
1149 | .dc.w $1 | |
1150 | .dc.w $2 | |
1151 | .dc.w $2 | |
1152 | .dc.w $2 | |
1153 | .dc.w $2 | |
1154 | .dc.w $2 | |
1155 | .dc.w $2 | |
1156 | .dc.w $2 | |
1157 | .dc.w $2 | |
1158 | .dc.w $4 | |
1159 | .dc.w $4 | |
1160 | .dc.w $4 | |
1161 | .dc.w $4 | |
1162 | .dc.w $8 | |
1163 | .dc.w $8 | |
1164 | .dc.w $8 | |
1165 | .dc.w $8 | |
1166 | .dc.w $10 | |
1167 | .dc.w $10 | |
1168 | .dc.w $10 | |
1169 | .dc.w $10 | |
1170 | .dc.w $20 | |
1171 | .dc.w $20 | |
1172 | .dc.w $20 | |
1173 | .dc.w $20 | |
1174 | .dc.w $40 | |
1175 | .dc.w $40 | |
1176 | .dc.w $40 | |
1177 | .dc.w $40 | |
1178 | .dc.w $80 | |
1179 | .dc.w $80 | |
1180 | .dc.w $80 | |
1181 | .dc.w $80 | |
1182 | .dc.w $60 | |
1183 | .dc.w $60 | |
1184 | .dc.w $60 | |
1185 | .dc.w $60 | |
1186 | .dc.w $100 | |
1187 | .dc.w $100 | |
1188 | .dc.w $100 | |
1189 | .dc.w $100 | |
1190 | .dc.w $100 | |
1191 | .dc.w $100 | |
1192 | .dc.w $100 | |
1193 | .dc.w $100 | |
1194 | .dc.w $100 | |
1195 | .dc.w $100 | |
1196 | .dc.w $100 | |
1197 | .dc.w $100 | |
1198 | .globl _loctab | |
1199 | .data | |
1200 | _loctab: | |
1201 | .dc.w $0 | |
1202 | .dc.w $FA0 | |
1203 | .dc.w $1F40 | |
1204 | .dc.w $2EE0 | |
1205 | .dc.w $3E80 | |
1206 | .dc.w $4E20 | |
1207 | .dc.w $5DC0 | |
1208 | .dc.w $6D60 | |
1209 | .dc.w $7D00 | |
1210 | .globl _valof | |
1211 | .text | |
1212 | _valof: | |
1213 | ~~valof: | |
1214 | ~srcv=8 | |
1215 | link R14,#-4 | |
1216 | *line 591 | |
1217 | move 8(R14),R0 | |
1218 | bra L3 | |
1219 | *line 592 | |
1220 | L4: | |
1221 | *line 593 | |
1222 | *line 594 | |
1223 | clr R0 | |
1224 | bra L1 | |
1225 | *line 595 | |
1226 | L5: | |
1227 | *line 596 | |
1228 | *line 597 | |
1229 | clr (sp) | |
1230 | jsr _xgetran | |
1231 | bra L1 | |
1232 | *line 598 | |
1233 | L6: | |
1234 | *line 599 | |
1235 | *line 600 | |
1236 | move 316+_sigtab,R0 | |
1237 | muls #252,R0 | |
1238 | and #32736,R0 | |
1239 | bra L1 | |
1240 | *line 601 | |
1241 | L7: | |
1242 | *line 602 | |
1243 | L8: | |
1244 | *line 603 | |
1245 | L9: | |
1246 | *line 604 | |
1247 | *line 605 | |
1248 | clr R0 | |
1249 | bra L1 | |
1250 | *line 606 | |
1251 | L10: | |
1252 | *line 607 | |
1253 | *line 608 | |
1254 | move 308+_sigtab,R0 | |
1255 | muls #252,R0 | |
1256 | and #32736,R0 | |
1257 | bra L1 | |
1258 | *line 609 | |
1259 | L11: | |
1260 | *line 610 | |
1261 | *line 611 | |
1262 | clr R0 | |
1263 | bra L1 | |
1264 | *line 612 | |
1265 | L12: | |
1266 | *line 613 | |
1267 | *line 614 | |
1268 | move 216+_sigtab,R0 | |
1269 | muls #252,R0 | |
1270 | and #32736,R0 | |
1271 | bra L1 | |
1272 | *line 615 | |
1273 | L13: | |
1274 | *line 616 | |
1275 | *line 617 | |
1276 | move 228+_sigtab,R0 | |
1277 | muls #252,R0 | |
1278 | and #32736,R0 | |
1279 | bra L1 | |
1280 | *line 618 | |
1281 | L14: | |
1282 | *line 619 | |
1283 | *line 620 | |
1284 | clr R0 | |
1285 | bra L1 | |
1286 | bra L2 | |
1287 | L3:cmp #13,R0 | |
1288 | bhi L14 | |
1289 | asl #2,R0 | |
1290 | move R0,R8 | |
1291 | add.l #L15,R8 | |
1292 | move.l (R8),R8 | |
1293 | jmp (R8) | |
1294 | .data | |
1295 | L15:.dc.l L4 | |
1296 | .dc.l L5 | |
1297 | .dc.l L6 | |
1298 | .dc.l L14 | |
1299 | .dc.l L14 | |
1300 | .dc.l L7 | |
1301 | .dc.l L8 | |
1302 | .dc.l L9 | |
1303 | .dc.l L10 | |
1304 | .dc.l L14 | |
1305 | .dc.l L14 | |
1306 | .dc.l L11 | |
1307 | .dc.l L12 | |
1308 | .dc.l L13 | |
1309 | .text | |
1310 | L2:L1:unlk R14 | |
1311 | rts | |
1312 | .globl _inismtb | |
1313 | .text | |
1314 | _inismtb: | |
1315 | ~~inismtb: | |
1316 | link R14,#0 | |
1317 | movem.l R5-R7,-(sp) | |
1318 | ~i=R7 | |
1319 | ~oldi=R6 | |
1320 | *line 637 | |
1321 | move #2,(sp) | |
1322 | jsr _setipl | |
1323 | move R0,R6 | |
1324 | *line 641 | |
1325 | clr R7 | |
1326 | bra L19 | |
1327 | L20: | |
1328 | *line 642 | |
1329 | *line 643 | |
1330 | move R7,R0 | |
1331 | muls #10,R0 | |
1332 | add.l #_valents,R0 | |
1333 | move R7,R1 | |
1334 | muls #10,R1 | |
1335 | add.l #_valents,R1 | |
1336 | move.l R1,R9 | |
1337 | move.l R0,(R9) | |
1338 | *line 644 | |
1339 | move R7,R0 | |
1340 | muls #10,R0 | |
1341 | add.l #_valents,R0 | |
1342 | move R7,R1 | |
1343 | muls #10,R1 | |
1344 | add.l #_valents,R1 | |
1345 | move.l R1,R9 | |
1346 | move.l R0,4(R9) | |
1347 | *line 645 | |
1348 | move R7,(sp) | |
1349 | and #15,(sp) | |
1350 | jsr _valof | |
1351 | move R0,-(sp) | |
1352 | move R7,R0 | |
1353 | muls #10,R0 | |
1354 | add.l #_valents,R0 | |
1355 | move.l R0,R8 | |
1356 | move (sp)+,8(R8) | |
1357 | L18: | |
1358 | *line 641 | |
1359 | add #1,R7 | |
1360 | L19: | |
1361 | *line 641 | |
1362 | cmp #192,R7 | |
1363 | blt L20 | |
1364 | L17: | |
1365 | *line 648 | |
1366 | clr R7 | |
1367 | bra L23 | |
1368 | L24: | |
1369 | *line 649 | |
1370 | *line 650 | |
1371 | move R7,R0 | |
1372 | muls #12,R0 | |
1373 | add.l #_sments,R0 | |
1374 | move R7,R9 | |
1375 | add.l R9,R9 | |
1376 | add.l R9,R9 | |
1377 | add.l #_vpsms,R9 | |
1378 | move.l R0,(R9) | |
1379 | *line 651 | |
1380 | *line 652 | |
1381 | move R7,R0 | |
1382 | muls #12,R0 | |
1383 | add.l #_sments,R0 | |
1384 | move.l R0,R8 | |
1385 | move.l #_valents,4(R8) | |
1386 | *line 653 | |
1387 | move R7,R0 | |
1388 | muls #12,R0 | |
1389 | add.l #_sments,R0 | |
1390 | move.l R0,R8 | |
1391 | move.l _valents,(R8) | |
1392 | *line 654 | |
1393 | *line 655 | |
1394 | move R7,R0 | |
1395 | muls #12,R0 | |
1396 | add.l #_sments,R0 | |
1397 | move.l _valents,R9 | |
1398 | move.l R0,4(R9) | |
1399 | *line 656 | |
1400 | move R7,R0 | |
1401 | muls #12,R0 | |
1402 | add.l #_sments,R0 | |
1403 | move.l R0,_valents | |
1404 | *line 657 | |
1405 | *line 658 | |
1406 | move R7,R0 | |
1407 | muls #12,R0 | |
1408 | add.l #_sments,R0 | |
1409 | move.l R0,R8 | |
1410 | move R7,8(R8) | |
1411 | *line 659 | |
1412 | move R7,R0 | |
1413 | muls #12,R0 | |
1414 | add.l #_sments,R0 | |
1415 | move.l R0,R8 | |
1416 | clr 10(R8) | |
1417 | L22: | |
1418 | *line 648 | |
1419 | add #1,R7 | |
1420 | L23: | |
1421 | *line 648 | |
1422 | cmp #192,R7 | |
1423 | blt L24 | |
1424 | L21: | |
1425 | *line 662 | |
1426 | move R6,(sp) | |
1427 | jsr _setipl | |
1428 | L16:tst.l (sp)+ | |
1429 | movem.l (sp)+,R6-R7 | |
1430 | unlk R14 | |
1431 | rts | |
1432 | .globl _clrpfl | |
1433 | .text | |
1434 | _clrpfl: | |
1435 | ~~clrpfl: | |
1436 | link R14,#0 | |
1437 | movem.l R6-R7,-(sp) | |
1438 | ~i=R7 | |
1439 | *line 681 | |
1440 | move #5376,(sp) | |
1441 | clr -(sp) | |
1442 | move.l #_pfents,-(sp) | |
1443 | jsr _memsetw | |
1444 | addq.l #6,sp | |
1445 | *line 683 | |
1446 | clr R7 | |
1447 | bra L28 | |
1448 | L29: | |
1449 | *line 684 | |
1450 | move R7,R0 | |
1451 | add #1,R0 | |
1452 | asl #5,R0 | |
1453 | ext.l R0 | |
1454 | add.l #_pfents,R0 | |
1455 | move R7,R1 | |
1456 | asl #5,R1 | |
1457 | ext.l R1 | |
1458 | add.l #_pfents,R1 | |
1459 | move.l R1,R9 | |
1460 | move.l R0,(R9) | |
1461 | L27: | |
1462 | *line 683 | |
1463 | add #1,R7 | |
1464 | L28: | |
1465 | *line 683 | |
1466 | cmp #335,R7 | |
1467 | blt L29 | |
1468 | L26: | |
1469 | *line 686 | |
1470 | move.l #_pfents,_pfqhdr | |
1471 | *line 687 | |
1472 | clr.l _pflist | |
1473 | L25:tst.l (sp)+ | |
1474 | movem.l (sp)+,R7-R7 | |
1475 | unlk R14 | |
1476 | rts | |
1477 | .globl _im700 | |
1478 | .text | |
1479 | _im700: | |
1480 | ~~im700: | |
1481 | link R14,#0 | |
1482 | movem.l R4-R7/R12-R13,-(sp) | |
1483 | ~i=R7 | |
1484 | ~j=R6 | |
1485 | ~k=R5 | |
1486 | ~ioadr=R13 | |
1487 | ~ip=R12 | |
1488 | *line 705 | |
1489 | clr _debugsw | |
1490 | *line 707 | |
1491 | jsr _GLCinit | |
1492 | *line 708 | |
1493 | move #1,(sp) | |
1494 | jsr _GLCcurs | |
1495 | *line 709 | |
1496 | move.l #L31,(sp) | |
1497 | move #1,-(sp) | |
1498 | move #2,-(sp) | |
1499 | jsr _GLCtext | |
1500 | addq.l #4,sp | |
1501 | *line 710 | |
1502 | clr (sp) | |
1503 | jsr _GLCcurs | |
1504 | *line 712 | |
1505 | move.l #_blakpal,(sp) | |
1506 | jsr _vsndpal | |
1507 | *line 714 | |
1508 | jsr _VHinit | |
1509 | *line 715 | |
1510 | jsr _VSinit | |
1511 | *line 717 | |
1512 | move #24,(sp) | |
1513 | clr -(sp) | |
1514 | move.l #_keystat,-(sp) | |
1515 | jsr _memset | |
1516 | addq.l #6,sp | |
1517 | *line 718 | |
1518 | move #6144,(sp) | |
1519 | clr -(sp) | |
1520 | move.l #_trgtab,-(sp) | |
1521 | jsr _memset | |
1522 | addq.l #6,sp | |
1523 | *line 719 | |
1524 | move #6144,(sp) | |
1525 | clr -(sp) | |
1526 | move.l #_mctlval,-(sp) | |
1527 | jsr _memset | |
1528 | addq.l #6,sp | |
1529 | *line 721 | |
1530 | move #12,(sp) | |
1531 | clr -(sp) | |
1532 | move.l #_grpmode,-(sp) | |
1533 | jsr _memsetw | |
1534 | addq.l #6,sp | |
1535 | *line 722 | |
1536 | move #12,(sp) | |
1537 | move #1,-(sp) | |
1538 | move.l #_grpstat,-(sp) | |
1539 | jsr _memsetw | |
1540 | addq.l #6,sp | |
1541 | *line 723 | |
1542 | move #12,(sp) | |
1543 | move #1,-(sp) | |
1544 | move.l #_grpsel,-(sp) | |
1545 | jsr _memsetw | |
1546 | addq.l #6,sp | |
1547 | *line 724 | |
1548 | move #256,(sp) | |
1549 | clr -(sp) | |
1550 | move.l #_sigtab,-(sp) | |
1551 | jsr _memsetw | |
1552 | addq.l #6,sp | |
1553 | *line 726 | |
1554 | move #6144,(sp) | |
1555 | move #16128,-(sp) | |
1556 | move.l #_veltab,-(sp) | |
1557 | jsr _memsetw | |
1558 | addq.l #6,sp | |
1559 | *line 727 | |
1560 | move #12,(sp) | |
1561 | move #16128,-(sp) | |
1562 | move.l #_lastvel,-(sp) | |
1563 | jsr _memsetw | |
1564 | addq.l #6,sp | |
1565 | *line 728 | |
1566 | move #6144,(sp) | |
1567 | clr -(sp) | |
1568 | move.l #_prstab,-(sp) | |
1569 | jsr _memsetw | |
1570 | addq.l #6,sp | |
1571 | *line 730 | |
1572 | move #100,(sp) | |
1573 | jsr _tofpu | |
1574 | move R0,_curintp | |
1575 | *line 732 | |
1576 | move #-1,_angroup | |
1577 | *line 733 | |
1578 | clr _ancmsw | |
1579 | *line 734 | |
1580 | clr _velflag | |
1581 | *line 736 | |
1582 | move #1,_dubsw | |
1583 | *line 738 | |
1584 | clr _sd | |
1585 | *line 739 | |
1586 | clr _se | |
1587 | *line 741 | |
1588 | jsr _swinit | |
1589 | *line 743 | |
1590 | jsr _inismtb | |
1591 | *line 744 | |
1592 | jsr _clrnl | |
1593 | *line 745 | |
1594 | jsr _clrpfl | |
1595 | *line 747 | |
1596 | clr _lstbgnc | |
1597 | *line 748 | |
1598 | clr _lstendc | |
1599 | *line 749 | |
1600 | move #1,_lstflag | |
1601 | *line 751 | |
1602 | move #96,(sp) | |
1603 | clr -(sp) | |
1604 | move.l #_lstbgns,-(sp) | |
1605 | jsr _memsetw | |
1606 | addq.l #6,sp | |
1607 | *line 752 | |
1608 | move #96,(sp) | |
1609 | clr -(sp) | |
1610 | move.l #_lstends,-(sp) | |
1611 | jsr _memsetw | |
1612 | addq.l #6,sp | |
1613 | *line 756 | |
1614 | clr R7 | |
1615 | bra L34 | |
1616 | L35: | |
1617 | *line 757 | |
1618 | *line 758 | |
1619 | move R7,R0 | |
1620 | muls #3938,R0 | |
1621 | move.l R0,R12 | |
1622 | add.l #_vbufs,R12 | |
1623 | *line 759 | |
1624 | *line 760 | |
1625 | clr R6 | |
1626 | bra L38 | |
1627 | L39: | |
1628 | *line 761 | |
1629 | *line 762 | |
1630 | move R7,R5 | |
1631 | asl #4,R5 | |
1632 | move R6,R8 | |
1633 | add.l R8,R8 | |
1634 | add.l #_fnoff,R8 | |
1635 | move (R8),R0 | |
1636 | add R0,R5 | |
1637 | *line 763 | |
1638 | *line 764 | |
1639 | move.l R12,R0 | |
1640 | move R6,R1 | |
1641 | muls #12,R1 | |
1642 | add.l R1,R0 | |
1643 | add.l #86,R0 | |
1644 | move R5,R1 | |
1645 | asl #3,R1 | |
1646 | ext.l R1 | |
1647 | add.l #_funcndx,R1 | |
1648 | move.l R1,R9 | |
1649 | move.l R0,(R9) | |
1650 | *line 765 | |
1651 | move R5,R1 | |
1652 | asl #3,R1 | |
1653 | ext.l R1 | |
1654 | add.l #_funcndx,R1 | |
1655 | move.l R1,R9 | |
1656 | lea 242(R12),R8 | |
1657 | move.l R8,4(R9) | |
1658 | L37: | |
1659 | *line 760 | |
1660 | add #1,R6 | |
1661 | L38: | |
1662 | *line 760 | |
1663 | cmp #13,R6 | |
1664 | blt L39 | |
1665 | L36: | |
1666 | *line 766 | |
1667 | L33: | |
1668 | *line 756 | |
1669 | add #1,R7 | |
1670 | L34: | |
1671 | *line 756 | |
1672 | cmp #12,R7 | |
1673 | blt L35 | |
1674 | L32: | |
1675 | *line 771 | |
1676 | clr R7 | |
1677 | bra L42 | |
1678 | L43: | |
1679 | *line 772 | |
1680 | *line 773 | |
1681 | move R7,R8 | |
1682 | add.l R8,R8 | |
1683 | add.l #_msmstv,R8 | |
1684 | clr (R8) | |
1685 | *line 774 | |
1686 | move R7,R8 | |
1687 | add.l #_mrstat,R8 | |
1688 | clr.b (R8) | |
1689 | *line 775 | |
1690 | move R7,R8 | |
1691 | add.l #_mdbyte,R8 | |
1692 | clr.b (R8) | |
1693 | *line 776 | |
1694 | move R7,R8 | |
1695 | add.l #_masens,R8 | |
1696 | clr.b (R8) | |
1697 | L41: | |
1698 | *line 771 | |
1699 | add #1,R7 | |
1700 | L42: | |
1701 | *line 771 | |
1702 | cmp #3,R7 | |
1703 | blt L43 | |
1704 | L40: | |
1705 | *line 779 | |
1706 | clr R7 | |
1707 | bra L46 | |
1708 | L47: | |
1709 | *line 780 | |
1710 | *line 781 | |
1711 | move R7,R8 | |
1712 | add.l R8,R8 | |
1713 | add.l #_mpbend,R8 | |
1714 | clr (R8) | |
1715 | *line 782 | |
1716 | move R7,R8 | |
1717 | add.l #_mpsust,R8 | |
1718 | clr.b (R8) | |
1719 | L45: | |
1720 | *line 779 | |
1721 | add #1,R7 | |
1722 | L46: | |
1723 | *line 779 | |
1724 | cmp #48,R7 | |
1725 | blt L47 | |
1726 | L44: | |
1727 | *line 785 | |
1728 | clr R7 | |
1729 | bra L50 | |
1730 | L51: | |
1731 | *line 786 | |
1732 | *line 787 | |
1733 | clr R6 | |
1734 | bra L54 | |
1735 | L55: | |
1736 | *line 788 | |
1737 | *line 789 | |
1738 | move R6,R0 | |
1739 | asl #5,R0 | |
1740 | ext.l R0 | |
1741 | move R7,R1 | |
1742 | asl #1,R1 | |
1743 | ext.l R1 | |
1744 | add.l R1,R0 | |
1745 | add.l #_varmode,R0 | |
1746 | move.l R0,R8 | |
1747 | clr (R8) | |
1748 | *line 790 | |
1749 | move R6,R0 | |
1750 | asl #5,R0 | |
1751 | ext.l R0 | |
1752 | move R7,R1 | |
1753 | asl #1,R1 | |
1754 | ext.l R1 | |
1755 | add.l R1,R0 | |
1756 | add.l #_anrs,R0 | |
1757 | move.l R0,R8 | |
1758 | move #4,(R8) | |
1759 | L53: | |
1760 | *line 787 | |
1761 | add #1,R6 | |
1762 | L54: | |
1763 | *line 787 | |
1764 | cmp #6,R6 | |
1765 | blt L55 | |
1766 | L52: | |
1767 | *line 791 | |
1768 | *line 792 | |
1769 | *line 793 | |
1770 | move #6,(sp) | |
1771 | move R7,-(sp) | |
1772 | jsr _setdyn | |
1773 | addq.l #2,sp | |
1774 | *line 794 | |
1775 | move #4,(sp) | |
1776 | move R7,-(sp) | |
1777 | jsr _setloc | |
1778 | addq.l #2,sp | |
1779 | *line 795 | |
1780 | move R7,R8 | |
1781 | add.l R8,R8 | |
1782 | add.l #_lastvce,R8 | |
1783 | clr (R8) | |
1784 | *line 796 | |
1785 | move R7,R8 | |
1786 | add.l R8,R8 | |
1787 | add.l #_vce2trg,R8 | |
1788 | move #-1,(R8) | |
1789 | L49: | |
1790 | *line 785 | |
1791 | add #1,R7 | |
1792 | L50: | |
1793 | *line 785 | |
1794 | cmp #12,R7 | |
1795 | blt L51 | |
1796 | L48: | |
1797 | *line 799 | |
1798 | clr R7 | |
1799 | bra L58 | |
1800 | L59: | |
1801 | *line 800 | |
1802 | *line 801 | |
1803 | move #37,(sp) | |
1804 | move #32,-(sp) | |
1805 | move R7,R0 | |
1806 | muls #37,R0 | |
1807 | add.l #_loadedc,R0 | |
1808 | move.l R0,-(sp) | |
1809 | jsr _memset | |
1810 | addq.l #6,sp | |
1811 | *line 802 | |
1812 | move #8,(sp) | |
1813 | move #32,-(sp) | |
1814 | move R7,R0 | |
1815 | asl #3,R0 | |
1816 | ext.l R0 | |
1817 | add.l #_loadedf,R0 | |
1818 | move.l R0,-(sp) | |
1819 | jsr _memset | |
1820 | addq.l #6,sp | |
1821 | L57: | |
1822 | *line 799 | |
1823 | add #1,R7 | |
1824 | L58: | |
1825 | *line 799 | |
1826 | cmp #8,R7 | |
1827 | blt L59 | |
1828 | L56: | |
1829 | *line 805 | |
1830 | move #8,(sp) | |
1831 | move #32,-(sp) | |
1832 | move.l #_ldfile,-(sp) | |
1833 | jsr _memset | |
1834 | addq.l #6,sp | |
1835 | *line 806 | |
1836 | clr.b 8+_ldfile | |
1837 | *line 808 | |
1838 | move #37,(sp) | |
1839 | move #32,-(sp) | |
1840 | move.l #_ldcmnt,-(sp) | |
1841 | jsr _memset | |
1842 | addq.l #6,sp | |
1843 | *line 809 | |
1844 | clr.b 37+_ldcmnt | |
1845 | *line 813 | |
1846 | move #1,_xkcount | |
1847 | *line 814 | |
1848 | move #1,_ykcount | |
1849 | *line 815 | |
1850 | move #50,_xycntr | |
1851 | *line 817 | |
1852 | clr _clksrc | |
1853 | *line 818 | |
1854 | clr _clkctl | |
1855 | *line 819 | |
1856 | clr _clkrun | |
1857 | *line 820 | |
1858 | clr _midiclk | |
1859 | *line 821 | |
1860 | clr _pulsclk | |
1861 | *line 822 | |
1862 | clr _stepclk | |
1863 | *line 823 | |
1864 | clr _fc_sw | |
1865 | *line 824 | |
1866 | clr.l _fc_val | |
1867 | *line 825 | |
1868 | clr _scrlpot | |
1869 | *line 826 | |
1870 | move #50,_tmpomlt | |
1871 | *line 827 | |
1872 | move.b #24,_io_leds | |
1873 | *line 828 | |
1874 | move.b #25,_io_leds | |
1875 | *line 829 | |
1876 | move #60,(sp) | |
1877 | jsr _settmpo | |
1878 | *line 831 | |
1879 | move 100+_tmultab,_timemlt | |
1880 | *line 832 | |
1881 | move.b #26,_io_leds | |
1882 | *line 833 | |
1883 | move.b #27,_io_leds | |
1884 | *line 835 | |
1885 | clr _tuneval | |
1886 | *line 836 | |
1887 | move.b #28,_io_leds | |
1888 | *line 837 | |
1889 | move.b #29,_io_leds | |
1890 | *line 839 | |
1891 | clr R7 | |
1892 | bra L62 | |
1893 | L63: | |
1894 | *line 840 | |
1895 | move R7,R0 | |
1896 | add #3,R0 | |
1897 | move #12,R1 | |
1898 | asl R1,R0 | |
1899 | move R7,R1 | |
1900 | add #3,R1 | |
1901 | asl #8,R1 | |
1902 | or R1,R0 | |
1903 | move R7,R1 | |
1904 | add #3,R1 | |
1905 | asl #4,R1 | |
1906 | or R1,R0 | |
1907 | move R7,R1 | |
1908 | add #3,R1 | |
1909 | or R1,R0 | |
1910 | move R7,R9 | |
1911 | add.l R9,R9 | |
1912 | add.l #_gtctab,R9 | |
1913 | move R0,(R9) | |
1914 | L61: | |
1915 | *line 839 | |
1916 | add #1,R7 | |
1917 | L62: | |
1918 | *line 839 | |
1919 | cmp #12,R7 | |
1920 | blt L63 | |
1921 | L60: | |
1922 | *line 842 | |
1923 | clr _editsw | |
1924 | *line 843 | |
1925 | move.b #30,_io_leds | |
1926 | *line 844 | |
1927 | move.l #2+_io_ser,R13 | |
1928 | *line 845 | |
1929 | move.b (R13),R0 | |
1930 | ext.w R0 | |
1931 | and #8,R0 | |
1932 | move R0,_editss | |
1933 | *line 847 | |
1934 | move.b #4,_ac_code | |
1935 | *line 849 | |
1936 | move #12,(sp) | |
1937 | move #1,-(sp) | |
1938 | move.l #_articen,-(sp) | |
1939 | jsr _memsetw | |
1940 | addq.l #6,sp | |
1941 | *line 852 | |
1942 | move.l #_cmvgen,_curmove | |
1943 | *line 853 | |
1944 | move.l #_nokey,_premove | |
1945 | *line 854 | |
1946 | move.l #_nokey,_pstmove | |
1947 | *line 855 | |
1948 | move.l #_stdctp2,_curtype | |
1949 | *line 857 | |
1950 | move.l #_nokey,_x_key | |
1951 | *line 858 | |
1952 | move.l #_nokey,_e_key | |
1953 | *line 859 | |
1954 | move.l #_stdmkey,_m_key | |
1955 | *line 860 | |
1956 | move.l #_nokey,_d_key | |
1957 | *line 862 | |
1958 | move.l #_nokey,_not_fld | |
1959 | *line 864 | |
1960 | move.l #_cxkstd,_cx_key | |
1961 | *line 865 | |
1962 | move.l #_cykstd,_cy_key | |
1963 | *line 866 | |
1964 | move.l #_cxgen,_cx_upd | |
1965 | *line 867 | |
1966 | move.l #_cygen,_cy_upd | |
1967 | *line 868 | |
1968 | move.l #_nokey,_xy_up | |
1969 | *line 869 | |
1970 | move.l #_nokey,_xy_dn | |
1971 | *line 871 | |
1972 | move #349,_curslim | |
1973 | *line 873 | |
1974 | move _hcwval,_chtime | |
1975 | *line 874 | |
1976 | move _vcwval,_cvtime | |
1977 | *line 875 | |
1978 | move _curhold,_nchwait | |
1979 | *line 876 | |
1980 | move _curhold,_ncvwait | |
1981 | *line 877 | |
1982 | move #1,_chwait | |
1983 | *line 878 | |
1984 | move #1,_cvwait | |
1985 | *line 880 | |
1986 | move.l #_crate1,_cratex | |
1987 | *line 881 | |
1988 | move.l #_crate1,_cratey | |
1989 | *line 883 | |
1990 | move #1,_cmfirst | |
1991 | *line 884 | |
1992 | clr _cmtype | |
1993 | *line 886 | |
1994 | move #256,_cxval | |
1995 | *line 887 | |
1996 | move #175,_cyval | |
1997 | *line 889 | |
1998 | move _cyval,R0 | |
1999 | ext.l R0 | |
2000 | divs #14,R0 | |
2001 | move R0,_stcrow | |
2002 | *line 890 | |
2003 | move _cxval,R0 | |
2004 | ext.l R0 | |
2005 | divs #8,R0 | |
2006 | move R0,_stccol | |
2007 | *line 892 | |
2008 | clr _submenu | |
2009 | *line 895 | |
2010 | clr _curinst | |
2011 | *line 896 | |
2012 | move #12,_curfunc | |
2013 | *line 897 | |
2014 | clr _curvce | |
2015 | *line 899 | |
2016 | clr _asmode | |
2017 | *line 900 | |
2018 | clr _gomode | |
2019 | *line 901 | |
2020 | clr _ismode | |
2021 | *line 902 | |
2022 | clr _pkctrl | |
2023 | *line 903 | |
2024 | move _pkctrl,_oldpk | |
2025 | *line 904 | |
2026 | clr _sliders | |
2027 | *line 905 | |
2028 | move _sliders,_oldsl | |
2029 | *line 906 | |
2030 | move.l #_t_prmtr,_swpt | |
2031 | *line 907 | |
2032 | move.l _swpt,_oldsw | |
2033 | *line 908 | |
2034 | jsr _setleds | |
2035 | *line 910 | |
2036 | jsr _initpt | |
2037 | *line 911 | |
2038 | jsr _initsq | |
2039 | *line 912 | |
2040 | jsr _initil | |
2041 | *line 913 | |
2042 | jsr _iniwslb | |
2043 | *line 914 | |
2044 | jsr _inital | |
2045 | *line 915 | |
2046 | jsr _inittl | |
2047 | *line 916 | |
2048 | jsr _scinit | |
2049 | *line 918 | |
2050 | clr (sp) | |
2051 | move #1,-(sp) | |
2052 | jsr _clearer | |
2053 | addq.l #2,sp | |
2054 | *line 919 | |
2055 | clr R0 | |
2056 | move R0,_curasg | |
2057 | move R0,(sp) | |
2058 | jsr _getasg | |
2059 | *line 921 | |
2060 | jsr _lcdlbls | |
2061 | *line 922 | |
2062 | clr _lampsw | |
2063 | L30:tst.l (sp)+ | |
2064 | movem.l (sp)+,R5-R7/R12-R13 | |
2065 | unlk R14 | |
2066 | rts | |
2067 | .data | |
2068 | L31:.dc.b $4D,$49,$44,$41,$53,$20,$37,$20,$2D,$2D,$20,$49,$6E,$69,$74,$69,$61,$6C,$69,$7A,$61,$74,$69,$6F,$6E,$20,$69,$6E,$20,$70 | |
2069 | .dc.b $72,$6F,$67,$72,$65,$73,$73,$20,$2D,$2D,$20,$50,$6C,$65,$61,$73,$65,$20,$73,$74,$61,$6E,$64,$20,$62,$79,$0 |
Note:
See TracBrowser
for help on using the repository browser.