source: buchla-68k/alcyon/libdsp.s@ 4810254

Last change on this file since 4810254 was 7bf3856, checked in by Thomas Lopatic <thomas@…>, 7 years ago

Added Alcyon C reference output.
  • Property mode set to 100644
File size: 58.5 KB
Line 
1.globl _Cbuffs
2.globl _Stdbufs
3.globl _Stdbuf
4.globl _errno
5.globl _io_time
6.globl _io_lcd
7.globl _io_ser
8.globl _io_midi
9.globl _io_disk
10.globl _io_tone
11.globl _io_leds
12.globl _io_kbrd
13.globl _lcd_a0
14.globl _lcd_a1
15.globl _io_vreg
16.globl _io_vraw
17.globl _io_vram
18.globl _io_fpu
19.globl _v_regs
20.globl _v_odtab
21.globl _v_actab
22.globl _v_ct0
23.globl _v_gt1
24.globl _v_score
25.globl _v_cgtab
26.globl _v_curs0
27.globl _v_curs1
28.globl _v_curs2
29.globl _v_curs3
30.globl _v_curs4
31.globl _v_curs5
32.globl _v_curs6
33.globl _v_curs7
34.globl _v_tcur
35.globl _v_kbobj
36.globl _v_lnobj
37.globl _v_win0
38.globl _v_cur
39.globl _fc_sw
40.globl _fc_val
41.globl _v_obtab
42.globl _v_curob
43.globl _v_nobj
44.globl _v_obpri
45.globl _ebflag
46.globl _ebuf
47.globl _curfet
48.globl _cfetp
49.globl _infetp
50.globl _filecat
51.globl _point
52.globl _errno
53.globl __bpbin
54.globl _chtime
55.globl _cmtype
56.globl _cvtime
57.globl _cxval
58.globl _cyval
59.globl _sgcsw
60.globl _stccol
61.globl _stcrow
62.globl _submenu
63.globl _thcwval
64.globl _tvcwval
65.globl _obj0
66.globl _obj2
67.globl _ldbxlb0
68.globl _vtlin1
69.globl _vtlin2
70.globl _vtlin3
71.globl _ldbox
72.globl _idefs
73.globl __thebpb
74.globl _librob
75.globl _catin
76.globl _lrasw
77.globl _lorchl
78.globl _ldrow
79.globl _ldslot
80.globl _lselsw
81.globl _ldkind
82.globl _lstrsw
83.globl _lasgsw
84.globl _lksel
85.globl _lorchsw
86.globl _lorclsw
87.globl _lpatsw
88.globl _lscrsw
89.globl _lseqsw
90.globl _ltunsw
91.globl _lwavsw
92.globl _ldelsw
93.globl _lderrsw
94.globl _ldidsiz
95.globl _lmwtype
96.globl _ltagged
97.globl _ndisp
98.globl _lcsum
99.globl _ndbytes
100.globl _lmln22
101.globl _lmln23
102.globl _lmln24
103.globl _ldfile
104.globl _ldcmnt
105.globl _ldmsg1
106.globl _ldmsg2
107.globl _ldmsg3
108.globl _errbuf
109.globl _ldoct
110.globl _ldhead
111.globl _ftypes
112.data
113_ftypes:
114*line 142
115.dc.l L1
116*line 142
117.dc.l L2
118*line 142
119.dc.l L3
120*line 143
121.dc.l L4
122*line 143
123.dc.l L5
124*line 143
125.dc.l L6
126*line 144
127.dc.l L7
128*line 144
129.dc.l L8
130*line 144
131.dc.l L9
132*line 145
133.dc.l L10
134*line 145
135.dc.l L11
136*line 145
137.dc.l L12
138*line 146
139.dc.l L13
140*line 146
141.dc.l L14
142*line 146
143.dc.l L15
144*line 147
145.dc.l L16
146*line 147
147.dc.l L17
148*line 147
149.dc.l L18
150*line 148
151.dc.l L19
152*line 148
153.dc.l L20
154*line 148
155.dc.l L21
156*line 149
157.dc.l L22
158*line 149
159.dc.l L23
160*line 149
161.dc.l L24
162*line 150
163.dc.l L25
164*line 150
165.dc.l L26
166*line 150
167.dc.l L27
168.globl _ld_em1
169.data
170_ld_em1:
171.dc.b $4E,$6F,$20,$66,$69,$6C,$65,$73,$20,$73,$74,$6F,$72,$65,$64,$20,$6F,$6E,$20,$64,$69,$73,$6B,$0
172.globl _ld_em2
173.data
174_ld_em2:
175.dc.b $20,$62,$79,$20,$74,$68,$69,$73,$20,$6F,$70,$65,$72,$61,$74,$69,$6F,$6E,$0
176.even
177.globl _lbrpal
178.data
179_lbrpal:
180.dc.w $0
181.dc.w $0
182.dc.w $0
183.dc.w $3
184.dc.w $3
185.dc.w $3
186.dc.w $1
187.dc.w $0
188.dc.w $0
189.dc.w $1
190.dc.w $1
191.dc.w $0
192.dc.w $2
193.dc.w $1
194.dc.w $0
195.dc.w $1
196.dc.w $1
197.dc.w $0
198.dc.w $2
199.dc.w $1
200.dc.w $0
201.dc.w $1
202.dc.w $0
203.dc.w $0
204.dc.w $0
205.dc.w $1
206.dc.w $1
207.dc.w $1
208.dc.w $0
209.dc.w $0
210.dc.w $1
211.dc.w $1
212.dc.w $0
213.dc.w $2
214.dc.w $2
215.dc.w $2
216.dc.w $2
217.dc.w $3
218.dc.w $3
219.dc.w $3
220.dc.w $3
221.dc.w $0
222.dc.w $3
223.dc.w $0
224.dc.w $0
225.dc.w $0
226.dc.w $0
227.dc.w $0
228.globl _ftkind
229.text
230_ftkind:
231~~ftkind:
232~ns=8
233link R14,#0
234movem.l R6-R7,-(sp)
235~i=R7
236*line 194
237clr R7
238bra L33
239L34:
240*line 195
241*line 196
242move #3,(sp)
243move R7,R0
244muls #12,R0
245move.l R0,R8
246move.l #_ftypes,R9
247move.l 0(R8,R9.l),-(sp)
248move 8(R14),R0
249muls #56,R0
250add.l #_filecat,R0
251move.l R0,-(sp)
252add.l #13,(sp)
253jsr _memcmpu
254addq.l #8,sp
255tst R0
256bne L35
257*line 196
258add #1,R7
259move R7,R0
260bra L30
261*line 197
262L35:L32:
263*line 194
264add #1,R7
265L33:
266*line 194
267cmp #9,R7
268blt L34
269L31:
270*line 198
271move #-1,R0
272bra L30
273L30:tst.l (sp)+
274movem.l (sp)+,R7-R7
275unlk R14
276rts
277.globl _fctstr
278.text
279_fctstr:
280~~fctstr:
281~ns=8
282~just=10
283link R14,#0
284movem.l R6-R7,-(sp)
285~fcbad=L37
286.bss
287L37:.ds.b 12
288.text
289~i=R7
290*line 217
291clr R7
292bra L40
293L41:
294*line 218
295*line 219
296move #3,(sp)
297move R7,R0
298muls #12,R0
299move.l R0,R8
300move.l #_ftypes,R9
301move.l 0(R8,R9.l),-(sp)
302move 8(R14),R0
303muls #56,R0
304add.l #_filecat,R0
305move.l R0,-(sp)
306add.l #13,(sp)
307jsr _memcmpu
308addq.l #8,sp
309tst R0
310bne L42
311*line 219
312move R7,R0
313muls #12,R0
314tst 10(R14)
315beq L10000
316move #2,R1
317bra L10002
318L10000:move #1,R1
319L10002:asl #2,R1
320ext.l R1
321add.l R1,R0
322move.l R0,R8
323move.l #_ftypes,R9
324move.l 0(R8,R9.l),R0
325bra L36
326*line 220
327L42:L39:
328*line 217
329add #1,R7
330L40:
331*line 217
332cmp #9,R7
333blt L41
334L38:
335*line 221
336move 8(R14),R0
337muls #56,R0
338add.l #_filecat,R0
339move.l R0,(sp)
340add.l #13,(sp)
341move.l #L43,-(sp)
342move.l #L37,-(sp)
343jsr _sprintf
344addq.l #8,sp
345*line 222
346move.l #L37,R0
347bra L36
348L36:tst.l (sp)+
349movem.l (sp)+,R7-R7
350unlk R14
351rts
352.globl _ocslot
353.text
354_ocslot:
355~~ocslot:
356~slot=8
357link R14,#-4
358*line 238
359*line 239
360*line 240
361move #3,(sp)
362move.l #L45,-(sp)
363move 8(R14),R0
364muls #56,R0
365add.l #_filecat,R0
366move.l R0,-(sp)
367jsr _memcmp
368addq.l #8,sp
369tst R0
370beq L46
371move 8(R14),R0
372muls #56,R0
373add.l #_filecat,R0
374move.l R0,R8
375tst.b (R8)
376beq L46
377*line 240
378move #1,R0
379bra L44
380*line 241
381bra L47
382L46:
383*line 242
384clr R0
385bra L44
386L47:L44:unlk R14
387rts
388.globl _ldline
389.text
390_ldline:
391~~ldline:
392~cy=8
393link R14,#-4
394*line 255
395*line 256
396cmp #292,8(R14)
397ble L49
398*line 256
399clr R0
400bra L48
401*line 257
402L49:
403*line 258
404*line 259
405cmp #14,8(R14)
406bge L50
407*line 259
408clr R0
409bra L48
410*line 260
411L50:
412*line 261
413move 8(R14),R0
414ext.l R0
415divs #14,R0
416bra L48
417L48:unlk R14
418rts
419.globl _lin2slt
420.text
421_lin2slt:
422~~lin2slt:
423~line=8
424link R14,#0
425movem.l R5-R7,-(sp)
426~slot=R7
427~row=R6
428*line 281
429clr R6
430*line 283
431clr R7
432bra L54
433L55:
434*line 284
435*line 285
436move R7,(sp)
437jsr _ocslot
438tst R0
439beq L56
440*line 285
441*line 286
442add #1,R6
443move R6,R0
444cmp 8(R14),R0
445bne L57
446*line 286
447move R7,R0
448bra L51
449*line 287
450L57:L56:L53:
451*line 283
452add #1,R7
453L54:
454*line 283
455cmp #20,R7
456blt L55
457L52:
458*line 288
459move #-1,R0
460bra L51
461L51:tst.l (sp)+
462movem.l (sp)+,R6-R7
463unlk R14
464rts
465.globl _exp_c
466.text
467_exp_c:
468~~exp_c:
469~cx=R7
470link R14,#0
471movem.l R6-R7,-(sp)
472*line 301
473move 8(R14),R7
474*line 301
475and #15,R7
476*line 302
477clr R0
478move R7,R0
479lsl #4,R0
480or R0,R7
481*line 303
482clr R0
483move R7,R0
484lsl #8,R0
485or R0,R7
486*line 305
487clr R0
488move R7,R0
489bra L58
490L58:tst.l (sp)+
491movem.l (sp)+,R7-R7
492unlk R14
493rts
494.globl _ldwmsg
495.text
496_ldwmsg:
497~~ldwmsg:
498~line1=8
499~line2=12
500~line3=16
501~fgcolor=20
502~bgcolor=22
503link R14,#-4
504*line 321
505clr _lderrsw
506*line 322
507move #2,_lmwtype
508*line 323
509clr _submenu
510*line 325
511*line 326
512tst _ndisp
513bne L59
514*line 327
515*line 328
516move 22(R14),(sp)
517jsr _exp_c
518move R0,22(R14)
519*line 329
520move 20(R14),(sp)
521jsr _exp_c
522move R0,20(R14)
523*line 331
524*line 332
525clr R0
526move 10+_v_regs,R0
527and #384,R0
528beq L60
529*line 332
530clr (sp)
531jsr _vbank
532*line 333
533*line 334
534*line 335
535L60:
536*line 336
537*line 337
538move 22(R14),(sp)
539move 166+_ldbox,-(sp)
540move 164+_ldbox,-(sp)
541move 162+_ldbox,-(sp)
542move 160+_ldbox,-(sp)
543move #128,-(sp)
544move.l _librob,-(sp)
545jsr _vbfill4
546adda.l #14,sp
547*line 339
548*line 340
549tst.l 8(R14)
550beq L61
551*line 341
552move #14,(sp)
553move.l 8(R14),-(sp)
554move 174+_ldbox,-(sp)
555move 172+_ldbox,-(sp)
556move 20(R14),-(sp)
557move #64,-(sp)
558move.l _librob,-(sp)
559jsr _tsplot4
560adda.l #16,sp
561*line 342
562L61:
563*line 343
564*line 344
565tst.l 12(R14)
566beq L62
567*line 345
568move #14,(sp)
569move.l 12(R14),-(sp)
570move 174+_ldbox,-(sp)
571move 172+_ldbox,-(sp)
572add #1,(sp)
573move 20(R14),-(sp)
574move #64,-(sp)
575move.l _librob,-(sp)
576jsr _tsplot4
577adda.l #16,sp
578*line 346
579L62:
580*line 347
581*line 348
582tst.l 16(R14)
583beq L63
584*line 349
585move #14,(sp)
586move.l 16(R14),-(sp)
587move 174+_ldbox,-(sp)
588move 172+_ldbox,-(sp)
589add #2,(sp)
590move 20(R14),-(sp)
591move #64,-(sp)
592move.l _librob,-(sp)
593jsr _tsplot4
594adda.l #16,sp
595L63:L59:unlk R14
596rts
597.globl _chksum
598.text
599_chksum:
600~~chksum:
601~area=R13
602~len=R7
603link R14,#0
604movem.l R4-R7/R13-R13,-(sp)
605~cs=R6
606~i=R5
607*line 368
608move.l 8(R14),R13
609*line 368
610move.l 12(R14),R7
611*line 368
612clr.l R6
613*line 370
614clr.l R5
615bra L67
616L68:
617*line 371
618move.b (R13)+,R0
619ext.w R0
620ext.l R0
621and.l #$ff,R0
622add.l R0,R6
623L66:
624*line 370
625add.l #$1,R5
626L67:
627*line 370
628cmp.l R7,R5
629blt L68
630L65:
631*line 373
632move.l R6,R0
633bra L64
634L64:tst.l (sp)+
635movem.l (sp)+,R5-R7/R13-R13
636unlk R14
637rts
638.globl _makelh
639.text
640_makelh:
641~~makelh:
642~kind=8
643link R14,#-4
644*line 385
645move #8,(sp)
646move #63,-(sp)
647move.l #_ldhead,-(sp)
648jsr _memset
649addq.l #6,sp
650*line 386
651move #8,(sp)
652move.l #_ldfile,-(sp)
653move.l #8+_ldhead,-(sp)
654jsr _memcpy
655addq.l #8,sp
656*line 387
657move #3,(sp)
658move 8(R14),R0
659sub #1,R0
660muls #12,R0
661move.l R0,R8
662move.l #_ftypes,R9
663move.l 0(R8,R9.l),-(sp)
664move.l #16+_ldhead,-(sp)
665jsr _memcpy
666addq.l #8,sp
667*line 388
668move #37,(sp)
669move.l #_ldcmnt,-(sp)
670move.l #19+_ldhead,-(sp)
671jsr _memcpy
672addq.l #8,sp
673*line 390
674move.l #$30,(sp)
675move.l #8+_ldhead,-(sp)
676jsr _chksum
677addq.l #4,sp
678move.l R0,_lcsum
679L69:unlk R14
680rts
681.globl _ldbusy
682.text
683_ldbusy:
684~~ldbusy:
685~msg=8
686link R14,#-4
687*line 405
688*line 406
689tst _ndisp
690bne L70
691*line 407
692*line 408
693*line 409
694move 170+_ldbox,(sp)
695move 168+_ldbox,-(sp)
696move.l 8(R14),-(sp)
697move.l #L71,-(sp)
698clr.l -(sp)
699jsr _ldwmsg
700adda.l #14,sp
701L70:unlk R14
702rts
703.globl _noslot
704.text
705_noslot:
706~~noslot:
707~fctype=8
708link R14,#-4
709*line 420
710move 8(R14),R0
711sub #1,R0
712muls #12,R0
713move.l R0,R8
714move.l #_ftypes,R9
715move.l 8(R8,R9.l),(sp)
716move.l #L73,-(sp)
717move.l #_ldmsg1,-(sp)
718jsr _sprintf
719addq.l #8,sp
720*line 422
721*line 423
722move #9,(sp)
723move #14,-(sp)
724move.l #L75,-(sp)
725move.l #_ldmsg1,-(sp)
726move.l #L74,-(sp)
727jsr _ldermsg
728adda.l #14,sp
729L72:unlk R14
730rts
731.globl _wr_ec
732.text
733_wr_ec:
734~~wr_ec:
735~fp=R13
736~from=R12
737~len=R7
738link R14,#0
739movem.l R4-R7/R12-R13,-(sp)
740~count=R6
741~c=R5
742*line 443
743move.l 8(R14),R13
744*line 443
745move.l 12(R14),R12
746*line 443
747move.l 16(R14),R7
748*line 443
749clr.l R6
750bra L79
751L80:
752*line 444
753*line 445
754clr _errno
755*line 446
756move.b (R12)+,R5
757*line 447
758*line 448
759*line 448
760move.l R13,(sp)
761move.b R5,R0
762ext.w R0
763move R0,-(sp)
764jsr _putc
765addq.l #2,sp
766cmp #-1,R0
767bne L81
768*line 449
769*line 450
770move _errno,(sp)
771move.l #L82,-(sp)
772move.l #_errbuf,-(sp)
773jsr _sprintf
774addq.l #8,sp
775*line 451
776*line 452
777*line 453
778move #9,(sp)
779move #14,-(sp)
780clr.l -(sp)
781move.l #_errbuf,-(sp)
782move.l #L83,-(sp)
783jsr _ldermsg
784adda.l #14,sp
785*line 454
786*line 455
787move.l R13,(sp)
788jsr _fclose
789*line 456
790jsr _postio
791*line 457
792move #-1,R0
793bra L76
794*line 458
795*line 459
796*line 463
797L81:L78:
798*line 443
799add.l #$1,R6
800L79:
801*line 443
802cmp.l R7,R6
803blt L80
804L77:
805*line 466
806clr R0
807bra L76
808L76:tst.l (sp)+
809movem.l (sp)+,R5-R7/R12-R13
810unlk R14
811rts
812.globl _rd_ec
813.text
814_rd_ec:
815~~rd_ec:
816~fp=R13
817~to=R12
818~len=R7
819link R14,#0
820movem.l R4-R7/R12-R13,-(sp)
821~count=R6
822~c=R5
823*line 487
824move.l 8(R14),R13
825*line 487
826move.l 12(R14),R12
827*line 487
828move.l 16(R14),R7
829*line 487
830clr.l R6
831bra L87
832L88:
833*line 488
834*line 489
835clr _errno
836*line 490
837*line 491
838*line 491
839move.l R13,(sp)
840jsr _getc
841move R0,R5
842cmp #-1,R5
843bne L89
844*line 492
845*line 493
846move _errno,(sp)
847move.l #L90,-(sp)
848move.l #_errbuf,-(sp)
849jsr _sprintf
850addq.l #8,sp
851*line 494
852*line 495
853*line 496
854move #9,(sp)
855move #14,-(sp)
856clr.l -(sp)
857move.l #_errbuf,-(sp)
858move.l #L91,-(sp)
859jsr _ldermsg
860adda.l #14,sp
861*line 497
862*line 498
863move.l R13,(sp)
864jsr _fclose
865*line 499
866jsr _postio
867*line 500
868move #-1,R0
869bra L84
870*line 501
871bra L92
872L89:
873*line 502
874*line 503
875*line 504
876move.b R5,(R12)+
877*line 505
878*line 509
879L92:
880*line 510
881L86:
882*line 487
883add.l #$1,R6
884L87:
885*line 487
886cmp.l R7,R6
887blt L88
888L85:
889*line 513
890clr R0
891bra L84
892L84:tst.l (sp)+
893movem.l (sp)+,R5-R7/R12-R13
894unlk R14
895rts
896.globl _srchcat
897.text
898_srchcat:
899~~srchcat:
900~extn=8
901link R14,#0
902movem.l R6-R7,-(sp)
903~fcslot=R7
904*line 533
905clr R7
906bra L96
907L97:
908*line 534
909*line 535
910*line 536
911move R7,(sp)
912jsr _ocslot
913tst R0
914beq L98
915*line 536
916*line 537
917*line 538
918move #8,(sp)
919move.l #_ldfile,-(sp)
920move R7,R0
921muls #56,R0
922add.l #_filecat,R0
923move.l R0,-(sp)
924add.l #4,(sp)
925jsr _memcmp
926addq.l #8,sp
927tst R0
928bne L99
929move #3,(sp)
930move.l 8(R14),-(sp)
931move R7,R0
932muls #56,R0
933add.l #_filecat,R0
934move.l R0,-(sp)
935add.l #13,(sp)
936jsr _memcmpu
937addq.l #8,sp
938tst R0
939bne L99
940*line 538
941move R7,R0
942bra L93
943L99:L98:L95:
944*line 533
945add #1,R7
946L96:
947*line 533
948cmp #20,R7
949blt L97
950L94:
951*line 541
952move #-1,R0
953bra L93
954L93:tst.l (sp)+
955movem.l (sp)+,R7-R7
956unlk R14
957rts
958.globl _clrcat
959.text
960_clrcat:
961~~clrcat:
962link R14,#-58
963movem.l R6-R7,-(sp)
964~i=R7
965~fcebuf=-58
966*line 555
967clr R7
968bra L103
969L104:
970*line 556
971*line 557
972*line 558
973*line 559
974move #10,(sp)
975move #13,-(sp)
976move.l #L106,-(sp)
977move R7,-(sp)
978move.l #L105,-(sp)
979move.l R14,-(sp)
980add.l #-58,(sp)
981jsr _sprintf
982adda.l #16,sp
983*line 560
984*line 561
985move #56,(sp)
986move.l R14,-(sp)
987add.l #-58,(sp)
988move R7,R0
989muls #56,R0
990add.l #_filecat,R0
991move.l R0,-(sp)
992jsr _memcpy
993addq.l #8,sp
994L102:
995*line 555
996add #1,R7
997L103:
998*line 555
999cmp #20,R7
1000blt L104
1001L101:L100:tst.l (sp)+
1002movem.l (sp)+,R7-R7
1003unlk R14
1004rts
1005.globl _clreq
1006.text
1007_clreq:
1008~~clreq:
1009~bytes=8
1010link R14,#0
1011movem.l R5-R7,-(sp)
1012~rclusts=R7
1013~clmask=R6
1014*line 583
1015move.l __thebpb,R8
1016clr R0
1017move 4(R8),R0
1018sub #1,R0
1019swap R0
1020clr R0
1021swap R0
1022move.l R0,R6
1023*line 585
1024*line 586
1025move.l __thebpb,R8
1026clr R0
1027move 4(R8),R0
1028swap R0
1029clr R0
1030swap R0
1031move.l R0,-(sp)
1032move.l 8(R14),-(sp)
1033jsr ldiv
1034addq.l #8,sp
1035move.l R6,R1
1036and.l 8(R14),R1
1037beq L10003
1038move #1,R1
1039bra L10005
1040L10003:clr R1
1041L10005:ext.l R1
1042add.l R1,R0
1043move R0,R7
1044*line 588
1045move R7,R0
1046bra L107
1047L107:tst.l (sp)+
1048movem.l (sp)+,R6-R7
1049unlk R14
1050rts
1051.globl _spacerq
1052.text
1053_spacerq:
1054~~spacerq:
1055~kind=8
1056link R14,#0
1057movem.l R5-R7,-(sp)
1058~howmuch=R7
1059~k=R6
1060*line 607
1061clr.l R6
1062*line 609
1063move 8(R14),R0
1064bra L110
1065*line 610
1066L111:
1067*line 611
1068*line 612
1069*line 613
1070move.l #$809c,R6
1071bra L109
1072*line 614
1073*line 615
1074L112:
1075*line 616
1076L113:
1077*line 617
1078L114:
1079*line 618
1080*line 619
1081*line 620
1082move.l #$14,-(sp)
1083move.l #1778+_idefs,R0
1084sub.l #_idefs,R0
1085move.l R0,-(sp)
1086add.l #$478,(sp)
1087jsr lmul
1088addq.l #8,sp
1089move.l R0,R6
1090add.l #$38,R6
1091bra L109
1092*line 621
1093*line 622
1094L115:
1095*line 623
1096*line 624
1097*line 625
1098jsr _ptsizer
1099move.l R0,R6
1100add.l #$38,R6
1101bra L109
1102*line 626
1103*line 627
1104L116:
1105*line 628
1106*line 629
1107*line 630
1108jsr _scsizer
1109move.l R0,R6
1110add.l #$38,R6
1111bra L109
1112*line 631
1113*line 632
1114L117:
1115*line 633
1116*line 634
1117*line 635
1118jsr _sqsizer
1119move.l R0,R6
1120add.l #$38,R6
1121bra L109
1122*line 636
1123*line 637
1124L118:
1125*line 638
1126*line 639
1127*line 640
1128move.l #$a58,R6
1129bra L109
1130*line 641
1131*line 642
1132L119:
1133*line 643
1134*line 644
1135*line 645
1136move.l #$2ce8,R6
1137bra L109
1138*line 646
1139*line 647
1140L120:
1141*line 648
1142*line 649
1143*line 650
1144clr.l R6
1145bra L109
1146*line 651
1147bra L109
1148L110:sub #1,R0
1149cmp #8,R0
1150bhi L120
1151asl #2,R0
1152move R0,R8
1153add.l #L121,R8
1154move.l (R8),R8
1155jmp (R8)
1156.data
1157L121:.dc.l L111
1158.dc.l L112
1159.dc.l L113
1160.dc.l L116
1161.dc.l L118
1162.dc.l L119
1163.dc.l L114
1164.dc.l L115
1165.dc.l L117
1166.text
1167L109:
1168*line 655
1169tst.l R6
1170beq L10006
1171move.l R6,(sp)
1172jsr _clreq
1173bra L10008
1174L10006:move #-1,R0
1175L10008:move R0,R7
1176*line 656
1177move.l R6,_ndbytes
1178*line 657
1179move R7,R0
1180bra L108
1181L108:tst.l (sp)+
1182movem.l (sp)+,R6-R7
1183unlk R14
1184rts
1185.globl _ckstor
1186.text
1187_ckstor:
1188~~ckstor:
1189link R14,#-4
1190*line 672
1191*line 673
1192tst _lasgsw
1193beq L123
1194*line 673
1195clr R0
1196bra L122
1197*line 674
1198L123:
1199*line 675
1200*line 676
1201tst _lorchsw
1202beq L124
1203*line 676
1204clr R0
1205bra L122
1206*line 677
1207L124:
1208*line 678
1209*line 679
1210tst _lorclsw
1211beq L125
1212*line 679
1213clr R0
1214bra L122
1215*line 680
1216L125:
1217*line 681
1218*line 682
1219tst _lpatsw
1220beq L126
1221*line 682
1222clr R0
1223bra L122
1224*line 683
1225L126:
1226*line 684
1227*line 685
1228tst _lscrsw
1229beq L127
1230*line 685
1231clr R0
1232bra L122
1233*line 686
1234L127:
1235*line 687
1236*line 688
1237tst _lseqsw
1238beq L128
1239*line 688
1240clr R0
1241bra L122
1242*line 689
1243L128:
1244*line 690
1245*line 691
1246tst _ltunsw
1247beq L129
1248*line 691
1249clr R0
1250bra L122
1251*line 692
1252L129:
1253*line 693
1254*line 694
1255tst _lwavsw
1256beq L130
1257*line 694
1258clr R0
1259bra L122
1260*line 695
1261L130:
1262*line 696
1263move #-1,R0
1264bra L122
1265L122:unlk R14
1266rts
1267.globl _ckdups
1268.text
1269_ckdups:
1270~~ckdups:
1271link R14,#-4
1272*line 711
1273*line 712
1274tst _lasgsw
1275beq L132
1276*line 712
1277*line 713
1278move.l #L133,(sp)
1279jsr _srchcat
1280cmp #-1,R0
1281beq L134
1282*line 713
1283move #1,R0
1284bra L131
1285*line 714
1286L134:L132:
1287*line 715
1288*line 716
1289tst _lorchsw
1290beq L135
1291*line 716
1292*line 717
1293move.l #L136,(sp)
1294jsr _srchcat
1295cmp #-1,R0
1296beq L137
1297*line 717
1298move #3,R0
1299bra L131
1300*line 718
1301L137:L135:
1302*line 719
1303*line 720
1304tst _lorclsw
1305beq L138
1306*line 720
1307*line 721
1308move.l #L139,(sp)
1309jsr _srchcat
1310cmp #-1,R0
1311beq L140
1312*line 721
1313move #2,R0
1314bra L131
1315*line 722
1316L140:L138:
1317*line 723
1318*line 724
1319tst _lorchsw
1320bne L10009
1321tst _lorclsw
1322beq L141
1323L10009:*line 724
1324*line 725
1325move.l #L142,(sp)
1326jsr _srchcat
1327cmp #-1,R0
1328beq L143
1329*line 725
1330move #7,R0
1331bra L131
1332*line 726
1333L143:L141:
1334*line 727
1335*line 728
1336tst _lpatsw
1337beq L144
1338*line 728
1339*line 729
1340move.l #L145,(sp)
1341jsr _srchcat
1342cmp #-1,R0
1343beq L146
1344*line 729
1345move #8,R0
1346bra L131
1347*line 730
1348L146:L144:
1349*line 731
1350*line 732
1351tst _lscrsw
1352beq L147
1353*line 732
1354*line 733
1355move.l #L148,(sp)
1356jsr _srchcat
1357cmp #-1,R0
1358beq L149
1359*line 733
1360move #4,R0
1361bra L131
1362*line 734
1363L149:L147:
1364*line 735
1365*line 736
1366tst _lseqsw
1367beq L150
1368*line 736
1369*line 737
1370move.l #L151,(sp)
1371jsr _srchcat
1372cmp #-1,R0
1373beq L152
1374*line 737
1375move #9,R0
1376bra L131
1377*line 738
1378L152:L150:
1379*line 739
1380*line 740
1381tst _ltunsw
1382beq L153
1383*line 740
1384*line 741
1385move.l #L154,(sp)
1386jsr _srchcat
1387cmp #-1,R0
1388beq L155
1389*line 741
1390move #5,R0
1391bra L131
1392*line 742
1393L155:L153:
1394*line 743
1395*line 744
1396tst _lwavsw
1397beq L156
1398*line 744
1399*line 745
1400move.l #L157,(sp)
1401jsr _srchcat
1402cmp #-1,R0
1403beq L158
1404*line 745
1405move #6,R0
1406bra L131
1407L158:L156:
1408*line 746
1409clr R0
1410bra L131
1411L131:unlk R14
1412rts
1413.globl _showsiz
1414.text
1415_showsiz:
1416~~showsiz:
1417link R14,#0
1418movem.l R4-R7,-(sp)
1419~dcap=R7
1420~drem=R6
1421~dused=R5
1422*line 764
1423clr __bpbin
1424*line 766
1425clr (sp)
1426jsr _dspace
1427move R0,R7
1428*line 768
1429*line 768
1430cmp #-1,R7
1431bne L160
1432*line 769
1433*line 770
1434*line 771
1435*line 772
1436move #9,(sp)
1437move #14,-(sp)
1438clr.l -(sp)
1439clr.l -(sp)
1440move.l #L161,-(sp)
1441jsr _ldermsg
1442adda.l #14,sp
1443*line 773
1444*line 774
1445move #-1,R0
1446bra L159
1447*line 775
1448*line 776
1449L160:
1450*line 777
1451move #1,(sp)
1452jsr _dspace
1453move R0,R6
1454*line 778
1455move R7,R5
1456sub R6,R5
1457*line 780
1458move R7,(sp)
1459move.l #L162,-(sp)
1460move.l #_ldmsg1,-(sp)
1461jsr _sprintf
1462addq.l #8,sp
1463*line 781
1464move R5,(sp)
1465move.l #L163,-(sp)
1466move.l #_ldmsg2,-(sp)
1467jsr _sprintf
1468addq.l #8,sp
1469*line 782
1470move R6,(sp)
1471move.l #L164,-(sp)
1472move.l #_ldmsg3,-(sp)
1473jsr _sprintf
1474addq.l #8,sp
1475*line 784
1476move 170+_ldbox,(sp)
1477move 168+_ldbox,-(sp)
1478move.l #_ldmsg3,-(sp)
1479move.l #_ldmsg2,-(sp)
1480move.l #_ldmsg1,-(sp)
1481jsr _ldwmsg
1482adda.l #14,sp
1483L159:tst.l (sp)+
1484movem.l (sp)+,R5-R7
1485unlk R14
1486rts
1487.globl _getcat
1488.text
1489_getcat:
1490~~getcat:
1491~msgsw=8
1492link R14,#-4
1493movem.l R7-R7/R13-R13,-(sp)
1494~fp=R13
1495~rc=-2
1496~fesize=-4
1497*line 803
1498clr _ldidsiz
1499*line 804
1500clr __bpbin
1501*line 805
1502clr _catin
1503*line 807
1504clr _errno
1505*line 808
1506jsr _preio
1507*line 809
1508move.l #L167,(sp)
1509move.l #L166,-(sp)
1510jsr _fopenb
1511addq.l #4,sp
1512move.l R0,R13
1513*line 811
1514*line 811
1515move.l R13,R0
1516bne L168
1517*line 812
1518*line 813
1519jsr _clrcat
1520*line 814
1521move #1,_catin
1522*line 815
1523*line 816
1524*line 816
1525tst 8(R14)
1526beq L169
1527*line 817
1528*line 818
1529jsr _showsiz
1530*line 819
1531move #1,_ldidsiz
1532*line 820
1533*line 821
1534L169:
1535*line 822
1536clr R0
1537bra L165
1538*line 823
1539*line 824
1540L168:
1541*line 825
1542move #56,-4(R14)
1543*line 826
1544move #1120,(sp)
1545clr -(sp)
1546move.l #_filecat,-(sp)
1547jsr _memset
1548addq.l #6,sp
1549*line 830
1550clr _errno
1551*line 831
1552move.l R13,(sp)
1553move #20,-(sp)
1554move -4(R14),-(sp)
1555move.l #_filecat,-(sp)
1556jsr _fread
1557addq.l #8,sp
1558move R0,-2(R14)
1559*line 833
1560*line 833
1561cmp #20,-2(R14)
1562beq L170
1563*line 834
1564*line 835
1565*line 835
1566tst -2(R14)
1567beq L171
1568*line 836
1569*line 837
1570move -2(R14),(sp)
1571move.l #L172,-(sp)
1572move.l #_ldmsg1,-(sp)
1573jsr _sprintf
1574addq.l #8,sp
1575*line 838
1576*line 839
1577move -4(R14),(sp)
1578move _errno,-(sp)
1579move.l #L173,-(sp)
1580move.l #_ldmsg2,-(sp)
1581jsr _sprintf
1582adda.l #10,sp
1583*line 840
1584*line 841
1585*line 842
1586move #9,(sp)
1587move #14,-(sp)
1588move.l #_ldmsg2,-(sp)
1589move.l #_ldmsg1,-(sp)
1590move.l #L174,-(sp)
1591jsr _ldermsg
1592adda.l #14,sp
1593*line 843
1594*line 844
1595clr _catin
1596*line 845
1597bra L175
1598L171:
1599*line 846
1600*line 847
1601*line 848
1602*line 849
1603*line 850
1604move #9,(sp)
1605move #14,-(sp)
1606clr.l -(sp)
1607clr.l -(sp)
1608move.l #L176,-(sp)
1609jsr _ldermsg
1610adda.l #14,sp
1611*line 851
1612*line 852
1613jsr _clrcat
1614*line 853
1615move #1,_catin
1616L175:
1617*line 854
1618*line 855
1619*line 856
1620move.l R13,(sp)
1621jsr _fclose
1622*line 857
1623jsr _postio
1624*line 858
1625move #-1,R0
1626bra L165
1627*line 859
1628*line 860
1629L170:
1630*line 861
1631move #1,_catin
1632*line 862
1633move.l R13,(sp)
1634jsr _fclose
1635*line 863
1636jsr _postio
1637*line 864
1638clr R0
1639bra L165
1640L165:tst.l (sp)+
1641movem.l (sp)+,R13-R13
1642unlk R14
1643rts
1644.globl _putcat
1645.text
1646_putcat:
1647~~putcat:
1648link R14,#0
1649movem.l R4-R7/R13-R13,-(sp)
1650~fp=R13
1651~i=R7
1652~rc=R6
1653~fesize=R5
1654*line 882
1655clr R7
1656bra L180
1657L181:
1658*line 883
1659*line 884
1660move R7,R0
1661muls #56,R0
1662add.l #_filecat,R0
1663move.l R0,R8
1664move.b #13,54(R8)
1665*line 885
1666move R7,R0
1667muls #56,R0
1668add.l #_filecat,R0
1669move.l R0,R8
1670move.b #10,55(R8)
1671L179:
1672*line 882
1673add #1,R7
1674L180:
1675*line 882
1676cmp #20,R7
1677blt L181
1678L178:
1679*line 888
1680clr _errno
1681*line 889
1682jsr _preio
1683*line 890
1684move.l #L183,(sp)
1685move.l #L182,-(sp)
1686jsr _fopenb
1687addq.l #4,sp
1688move.l R0,R13
1689*line 892
1690*line 892
1691move.l R13,R0
1692bne L184
1693*line 893
1694*line 894
1695move _errno,(sp)
1696move.l #L185,-(sp)
1697move.l #_ldmsg2,-(sp)
1698jsr _sprintf
1699addq.l #8,sp
1700*line 895
1701*line 896
1702*line 897
1703move #9,(sp)
1704move #14,-(sp)
1705move.l #_ldmsg2,-(sp)
1706clr.l -(sp)
1707move.l #L186,-(sp)
1708jsr _ldermsg
1709adda.l #14,sp
1710*line 898
1711*line 899
1712move #-1,R0
1713bra L177
1714*line 900
1715*line 901
1716L184:
1717*line 902
1718move #56,R5
1719*line 906
1720clr _errno
1721*line 907
1722move.l R13,(sp)
1723move #20,-(sp)
1724move R5,-(sp)
1725move.l #_filecat,-(sp)
1726jsr _fwrite
1727addq.l #8,sp
1728move R0,R6
1729*line 909
1730*line 909
1731cmp #20,R6
1732beq L187
1733*line 910
1734*line 911
1735*line 911
1736tst R6
1737beq L188
1738*line 912
1739*line 913
1740move R6,(sp)
1741move.l #L189,-(sp)
1742move.l #_ldmsg1,-(sp)
1743jsr _sprintf
1744addq.l #8,sp
1745*line 914
1746*line 915
1747move R5,(sp)
1748move _errno,-(sp)
1749move.l #L190,-(sp)
1750move.l #_ldmsg2,-(sp)
1751jsr _sprintf
1752adda.l #10,sp
1753*line 916
1754*line 917
1755*line 918
1756move #9,(sp)
1757move #14,-(sp)
1758move.l #_ldmsg2,-(sp)
1759move.l #_ldmsg1,-(sp)
1760move.l #L191,-(sp)
1761jsr _ldermsg
1762adda.l #14,sp
1763*line 919
1764bra L192
1765L188:
1766*line 920
1767*line 921
1768*line 922
1769move _errno,(sp)
1770move.l #L193,-(sp)
1771move.l #_ldmsg2,-(sp)
1772jsr _sprintf
1773addq.l #8,sp
1774*line 923
1775*line 924
1776*line 925
1777*line 926
1778move #9,(sp)
1779move #14,-(sp)
1780move.l #_ldmsg2,-(sp)
1781clr.l -(sp)
1782move.l #L194,-(sp)
1783jsr _ldermsg
1784adda.l #14,sp
1785L192:
1786*line 927
1787*line 928
1788*line 929
1789move.l R13,(sp)
1790jsr _fclose
1791*line 930
1792jsr _postio
1793*line 931
1794move #-1,R0
1795bra L177
1796*line 932
1797*line 933
1798L187:
1799*line 934
1800move.l R13,(sp)
1801jsr _fclose
1802*line 935
1803jsr _postio
1804*line 936
1805clr R0
1806bra L177
1807L177:tst.l (sp)+
1808movem.l (sp)+,R5-R7/R13-R13
1809unlk R14
1810rts
1811.globl _dslslot
1812.text
1813_dslslot:
1814~~dslslot:
1815~slot=R7
1816~fg=10
1817~row=12
1818link R14,#-42
1819movem.l R3-R7,-(sp)
1820~color=R6
1821~chilon=R5
1822~chilorc=R4
1823~c=-2
1824~buf=-42
1825*line 957
1826move 8(R14),R7
1827*line 957
1828*line 958
1829tst _ndisp
1830bne L195
1831*line 959
1832*line 960
1833move 10(R14),(sp)
1834jsr _exp_c
1835move R0,R6
1836*line 961
1837move 24+_ldbox,(sp)
1838jsr _exp_c
1839move R0,R5
1840*line 962
1841move #6,(sp)
1842jsr _exp_c
1843move R0,R4
1844*line 966
1845move #14,(sp)
1846clr -(sp)
1847move R7,-(sp)
1848jsr _fctstr
1849addq.l #4,sp
1850move.l R0,-(sp)
1851move #1,-(sp)
1852move 12(R14),-(sp)
1853move 26+_ldbox,-(sp)
1854move R6,-(sp)
1855move #64,-(sp)
1856move.l _librob,-(sp)
1857jsr _vcputsv
1858adda.l #18,sp
1859*line 970
1860move R7,R0
1861muls #56,R0
1862move.l R0,R8
1863move.l #_filecat,R9
1864move.b 3(R8,R9.l),R0
1865ext.w R0
1866move R0,-2(R14)
1867*line 971
1868move -2(R14),R0
1869and #127,R0
1870move.b R0,-42(R14)
1871*line 972
1872clr.b -41(R14)
1873*line 973
1874*line 974
1875move #14,(sp)
1876move.l R14,-(sp)
1877add.l #-42,(sp)
1878move #11,-(sp)
1879move 12(R14),-(sp)
1880move 26+_ldbox,-(sp)
1881btst #7,-1(R14)
1882beq L10010
1883move R4,-(sp)
1884bra L10012
1885L10010:move R5,-(sp)
1886L10012:move #64,-(sp)
1887move.l _librob,-(sp)
1888jsr _vcputsv
1889adda.l #18,sp
1890*line 978
1891move #8,(sp)
1892move R7,R0
1893muls #56,R0
1894add.l #_filecat,R0
1895move.l R0,-(sp)
1896add.l #4,(sp)
1897move.l R14,-(sp)
1898add.l #-42,(sp)
1899jsr _memcpy
1900addq.l #8,sp
1901*line 979
1902clr.b -34(R14)
1903*line 980
1904move #14,(sp)
1905move.l R14,-(sp)
1906add.l #-42,(sp)
1907move #13,-(sp)
1908move 12(R14),-(sp)
1909move 26+_ldbox,-(sp)
1910move R6,-(sp)
1911move #64,-(sp)
1912move.l _librob,-(sp)
1913jsr _vcputsv
1914adda.l #18,sp
1915*line 984
1916move #37,(sp)
1917move R7,R0
1918muls #56,R0
1919add.l #_filecat,R0
1920move.l R0,-(sp)
1921add.l #17,(sp)
1922move.l R14,-(sp)
1923add.l #-42,(sp)
1924jsr _memcpy
1925addq.l #8,sp
1926*line 985
1927clr.b -5(R14)
1928*line 986
1929move #14,(sp)
1930move.l R14,-(sp)
1931add.l #-42,(sp)
1932move #22,-(sp)
1933move 12(R14),-(sp)
1934move 26+_ldbox,-(sp)
1935move R5,-(sp)
1936move #64,-(sp)
1937move.l _librob,-(sp)
1938jsr _vcputsv
1939adda.l #18,sp
1940*line 990
1941move #3,(sp)
1942move R7,R0
1943muls #56,R0
1944add.l #_filecat,R0
1945move.l R0,-(sp)
1946move.l R14,-(sp)
1947add.l #-42,(sp)
1948jsr _memcpy
1949addq.l #8,sp
1950*line 991
1951clr.b -39(R14)
1952*line 992
1953move #14,(sp)
1954move.l R14,-(sp)
1955add.l #-42,(sp)
1956move #60,-(sp)
1957move 12(R14),-(sp)
1958move 26+_ldbox,-(sp)
1959move R5,-(sp)
1960move #64,-(sp)
1961move.l _librob,-(sp)
1962jsr _vcputsv
1963adda.l #18,sp
1964L195:tst.l (sp)+
1965movem.l (sp)+,R4-R7
1966unlk R14
1967rts
1968.globl _showcat
1969.text
1970_showcat:
1971~~showcat:
1972link R14,#0
1973movem.l R2-R7,-(sp)
1974~i=R7
1975~fcslot=R6
1976~fcrow=R5
1977~fcount=R4
1978~color=R3
1979*line 1010
1980*line 1011
1981tst _ndisp
1982bne L196
1983*line 1012
1984*line 1013
1985clr (sp)
1986jsr _ldswin
1987*line 1015
1988move 26+_ldbox,(sp)
1989jsr _exp_c
1990move R0,R3
1991*line 1017
1992*line 1018
1993clr R0
1994move 10+_v_regs,R0
1995and #384,R0
1996beq L197
1997*line 1018
1998clr (sp)
1999jsr _vbank
2000*line 1019
2001L197:
2002*line 1020
2003*line 1021
2004move R3,(sp)
2005move 22+_ldbox,-(sp)
2006move 20+_ldbox,-(sp)
2007move 18+_ldbox,-(sp)
2008move 16+_ldbox,-(sp)
2009move #128,-(sp)
2010move.l _librob,-(sp)
2011jsr _vbfill4
2012adda.l #14,sp
2013*line 1023
2014move 24+_ldbox,R3
2015*line 1025
2016move #1,R5
2017*line 1026
2018clr R4
2019*line 1028
2020clr R6
2021bra L200
2022L201:
2023*line 1029
2024*line 1030
2025*line 1030
2026move R6,(sp)
2027jsr _ocslot
2028tst R0
2029beq L202
2030*line 1031
2031*line 1032
2032move R5,(sp)
2033move R3,-(sp)
2034move R6,-(sp)
2035jsr _dslslot
2036addq.l #4,sp
2037*line 1033
2038add #1,R5
2039*line 1034
2040add #1,R4
2041*line 1035
2042L202:L199:
2043*line 1028
2044add #1,R6
2045L200:
2046*line 1028
2047cmp #20,R6
2048blt L201
2049L198:
2050*line 1038
2051move R4,R0
2052bra L196
2053L196:tst.l (sp)+
2054movem.l (sp)+,R3-R7
2055unlk R14
2056rts
2057.globl _fcindex
2058.text
2059_fcindex:
2060~~fcindex:
2061link R14,#-4
2062*line 1053
2063*line 1054
2064tst _lderrsw
2065bne L204
2066*line 1054
2067move.l #L205,(sp)
2068jsr _ldbusy
2069*line 1055
2070L204:
2071*line 1056
2072*line 1057
2073move #1,(sp)
2074jsr _getcat
2075tst R0
2076beq L206
2077*line 1057
2078move #-1,R0
2079bra L203
2080*line 1058
2081L206:
2082*line 1059
2083*line 1060
2084tst _lderrsw
2085bne L207
2086*line 1060
2087jsr _showcat
2088*line 1061
2089*line 1062
2090*line 1063
2091L207:
2092*line 1064
2093*line 1065
2094tst _ldidsiz
2095bne L208
2096tst _lderrsw
2097bne L208
2098*line 1065
2099jsr _showsiz
2100*line 1066
2101L208:
2102*line 1067
2103clr R0
2104bra L203
2105L203:unlk R14
2106rts
2107.globl _streset
2108.text
2109_streset:
2110~~streset:
2111link R14,#-4
2112*line 1081
2113clr _lstrsw
2114*line 1083
2115clr _lasgsw
2116*line 1084
2117clr _lorchsw
2118*line 1085
2119clr _lorclsw
2120*line 1086
2121clr _lpatsw
2122*line 1087
2123clr _lscrsw
2124*line 1088
2125clr _lseqsw
2126*line 1089
2127clr _ltunsw
2128*line 1090
2129clr _lwavsw
2130*line 1092
2131move #9,(sp)
2132jsr _ldswin
2133L209:unlk R14
2134rts
2135.globl _fcreset
2136.text
2137_fcreset:
2138~~fcreset:
2139link R14,#-4
2140*line 1103
2141clr _lselsw
2142*line 1105
2143move #6,(sp)
2144jsr _ldswin
2145L210:unlk R14
2146rts
2147.globl _getslot
2148.text
2149_getslot:
2150~~getslot:
2151link R14,#0
2152movem.l R6-R7,-(sp)
2153~i=R7
2154*line 1124
2155clr R7
2156bra L214
2157L215:
2158*line 1125
2159*line 1126
2160move R7,(sp)
2161jsr _ocslot
2162tst R0
2163bne L216
2164*line 1126
2165move R7,R0
2166bra L211
2167*line 1127
2168L216:L213:
2169*line 1124
2170add #1,R7
2171L214:
2172*line 1124
2173cmp #20,R7
2174blt L215
2175L212:
2176*line 1128
2177move #-1,R0
2178bra L211
2179L211:tst.l (sp)+
2180movem.l (sp)+,R7-R7
2181unlk R14
2182rts
2183.globl _slotnam
2184.text
2185_slotnam:
2186~~slotnam:
2187~slot=8
2188~kind=10
2189link R14,#-4
2190~thename=L218
2191.bss
2192L218:.ds.b 14
2193.text
2194*line 1143
2195*line 1144
2196clr R0
2197move 10(R14),R0
2198sub #1,R0
2199mulu #12,R0
2200move.l R0,R8
2201move.l #_ftypes,R9
2202move.l 0(R8,R9.l),(sp)
2203move 8(R14),-(sp)
2204move.l #L219,-(sp)
2205move.l #L218,-(sp)
2206jsr _sprintf
2207adda.l #10,sp
2208*line 1146
2209move.l #L218,R0
2210bra L217
2211L217:unlk R14
2212rts
2213.globl _wrtfile
2214.text
2215_wrtfile:
2216~~wrtfile:
2217~kind=8
2218link R14,#-4
2219movem.l R4-R7,-(sp)
2220~slot=R7
2221~flspace=R6
2222~tkind=R5
2223~sizetmp=-4
2224*line 1165
2225jsr _getslot
2226move R0,R7
2227*line 1167
2228*line 1167
2229cmp #-1,R7
2230bne L221
2231*line 1168
2232*line 1169
2233move 8(R14),(sp)
2234jsr _noslot
2235*line 1170
2236jsr _streset
2237*line 1171
2238move #-1,R0
2239bra L220
2240*line 1172
2241*line 1173
2242*line 1174
2243*line 1175
2244*line 1176
2245L221:
2246*line 1177
2247move 8(R14),R0
2248bra L223
2249*line 1178
2250L224:
2251*line 1179
2252*line 1180
2253*line 1181
2254*line 1182
2255move R7,(sp)
2256jsr _wrt_asg
2257tst R0
2258beq L225
2259*line 1182
2260move #-1,R0
2261bra L220
2262*line 1183
2263bra L226
2264L225:bra L222
2265L226:
2266*line 1184
2267*line 1185
2268L227:
2269*line 1186
2270*line 1187
2271*line 1188
2272*line 1189
2273clr (sp)
2274move R7,-(sp)
2275jsr _wrt_orc
2276addq.l #2,sp
2277tst R0
2278beq L228
2279*line 1189
2280move #-1,R0
2281bra L220
2282*line 1190
2283bra L229
2284L228:bra L222
2285L229:
2286*line 1191
2287*line 1192
2288L230:
2289*line 1193
2290*line 1194
2291*line 1195
2292*line 1196
2293move #1,(sp)
2294move R7,-(sp)
2295jsr _wrt_orc
2296addq.l #2,sp
2297tst R0
2298beq L231
2299*line 1196
2300move #-1,R0
2301bra L220
2302*line 1197
2303bra L232
2304L231:bra L222
2305L232:
2306*line 1198
2307*line 1199
2308L233:
2309*line 1200
2310*line 1201
2311*line 1202
2312*line 1203
2313move R7,(sp)
2314jsr _wrt_pat
2315tst R0
2316beq L234
2317*line 1203
2318move #-1,R0
2319bra L220
2320*line 1204
2321bra L235
2322L234:bra L222
2323L235:
2324*line 1205
2325*line 1206
2326L236:
2327*line 1207
2328*line 1208
2329*line 1209
2330*line 1210
2331move R7,(sp)
2332jsr _wrt_scr
2333tst R0
2334beq L237
2335*line 1210
2336move #-1,R0
2337bra L220
2338*line 1211
2339bra L238
2340L237:bra L222
2341L238:
2342*line 1212
2343*line 1213
2344L239:
2345*line 1214
2346*line 1215
2347*line 1216
2348*line 1217
2349move R7,(sp)
2350jsr _wrt_seq
2351tst R0
2352beq L240
2353*line 1217
2354move #-1,R0
2355bra L220
2356*line 1218
2357bra L241
2358L240:bra L222
2359L241:
2360*line 1219
2361*line 1220
2362*line 1221
2363*line 1222
2364L242:
2365*line 1223
2366*line 1224
2367*line 1225
2368*line 1226
2369move R7,(sp)
2370jsr _wrt_tun
2371tst R0
2372beq L243
2373*line 1226
2374move #-1,R0
2375bra L220
2376*line 1227
2377bra L244
2378L243:bra L222
2379L244:
2380*line 1228
2381*line 1229
2382L245:
2383*line 1230
2384*line 1231
2385*line 1232
2386*line 1233
2387move R7,(sp)
2388jsr _wrt_wav
2389tst R0
2390beq L246
2391*line 1233
2392move #-1,R0
2393bra L220
2394*line 1234
2395bra L247
2396L246:bra L222
2397L247:
2398*line 1235
2399*line 1236
2400L248:
2401*line 1237
2402*line 1238
2403*line 1239
2404move 8(R14),(sp)
2405move.l #L249,-(sp)
2406move.l #_ldmsg1,-(sp)
2407jsr _sprintf
2408addq.l #8,sp
2409*line 1240
2410*line 1241
2411*line 1242
2412move #9,(sp)
2413move #14,-(sp)
2414clr.l -(sp)
2415move.l #_ldmsg1,-(sp)
2416move.l #L250,-(sp)
2417jsr _ldermsg
2418adda.l #14,sp
2419*line 1243
2420*line 1244
2421move #-1,R0
2422bra L220
2423bra L222
2424L223:sub #1,R0
2425cmp #8,R0
2426bhi L248
2427asl #2,R0
2428move R0,R8
2429add.l #L251,R8
2430move.l (R8),R8
2431jmp (R8)
2432.data
2433L251:.dc.l L224
2434.dc.l L227
2435.dc.l L230
2436.dc.l L236
2437.dc.l L242
2438.dc.l L245
2439.dc.l L248
2440.dc.l L233
2441.dc.l L239
2442.text
2443L222:
2444*line 1252
2445*line 1253
2446cmp #2,8(R14)
2447beq L10013
2448cmp #3,8(R14)
2449bne L252
2450L10013:*line 1253
2451move #7,R5
2452*line 1254
2453bra L253
2454L252:
2455*line 1255
2456move 8(R14),R5
2457L253:
2458*line 1257
2459move 8(R14),(sp)
2460jsr _spacerq
2461move R0,R6
2462*line 1259
2463move R6,(sp)
2464move.l #L254,-(sp)
2465move.l R14,-(sp)
2466sub.l #4,(sp)
2467jsr _sprintf
2468addq.l #8,sp
2469*line 1260
2470move #3,(sp)
2471move.l R14,-(sp)
2472sub.l #4,(sp)
2473move R7,R0
2474muls #56,R0
2475add.l #_filecat,R0
2476move.l R0,-(sp)
2477jsr _memcpy
2478addq.l #8,sp
2479*line 1262
2480move #8,(sp)
2481move.l #_ldfile,-(sp)
2482move R7,R0
2483muls #56,R0
2484add.l #_filecat,R0
2485move.l R0,-(sp)
2486add.l #4,(sp)
2487jsr _memcpy
2488addq.l #8,sp
2489*line 1263
2490move #3,(sp)
2491move R5,R0
2492sub #1,R0
2493muls #12,R0
2494move.l R0,R8
2495move.l #_ftypes,R9
2496move.l 0(R8,R9.l),-(sp)
2497move R7,R0
2498muls #56,R0
2499add.l #_filecat,R0
2500move.l R0,-(sp)
2501add.l #13,(sp)
2502jsr _memcpy
2503addq.l #8,sp
2504*line 1264
2505move #37,(sp)
2506move.l #_ldcmnt,-(sp)
2507move R7,R0
2508muls #56,R0
2509add.l #_filecat,R0
2510move.l R0,-(sp)
2511add.l #17,(sp)
2512jsr _memcpy
2513addq.l #8,sp
2514*line 1266
2515move 8(R14),(sp)
2516jsr _savefc
2517*line 1268
2518move R7,R0
2519muls #56,R0
2520add.l #_filecat,R0
2521move.l R0,R8
2522move.b #13,54(R8)
2523*line 1269
2524move R7,R0
2525muls #56,R0
2526add.l #_filecat,R0
2527move.l R0,R8
2528move.b #10,55(R8)
2529*line 1271
2530clr R0
2531bra L220
2532L220:tst.l (sp)+
2533movem.l (sp)+,R5-R7
2534unlk R14
2535rts
2536.globl _writem
2537.text
2538_writem:
2539~~writem:
2540link R14,#-4
2541*line 1286
2542*line 1287
2543tst _lasgsw
2544beq L256
2545*line 1287
2546*line 1288
2547move #1,(sp)
2548jsr _wrtfile
2549tst R0
2550beq L257
2551*line 1288
2552move #-1,R0
2553bra L255
2554*line 1289
2555L257:L256:
2556*line 1290
2557*line 1291
2558tst _lorchsw
2559beq L258
2560*line 1291
2561*line 1292
2562move #3,(sp)
2563jsr _wrtfile
2564tst R0
2565beq L259
2566*line 1292
2567move #-1,R0
2568bra L255
2569*line 1293
2570L259:L258:
2571*line 1294
2572*line 1295
2573tst _lorclsw
2574beq L260
2575*line 1295
2576*line 1296
2577move #2,(sp)
2578jsr _wrtfile
2579tst R0
2580beq L261
2581*line 1296
2582move #-1,R0
2583bra L255
2584*line 1297
2585L261:L260:
2586*line 1298
2587*line 1299
2588tst _lpatsw
2589beq L262
2590*line 1299
2591*line 1300
2592move #8,(sp)
2593jsr _wrtfile
2594tst R0
2595beq L263
2596*line 1300
2597move #-1,R0
2598bra L255
2599*line 1301
2600L263:L262:
2601*line 1302
2602*line 1303
2603tst _lscrsw
2604beq L264
2605*line 1303
2606*line 1304
2607move #4,(sp)
2608jsr _wrtfile
2609tst R0
2610beq L265
2611*line 1304
2612move #-1,R0
2613bra L255
2614*line 1305
2615L265:L264:
2616*line 1306
2617*line 1307
2618tst _lseqsw
2619beq L266
2620*line 1307
2621*line 1308
2622move #9,(sp)
2623jsr _wrtfile
2624tst R0
2625beq L267
2626*line 1308
2627move #-1,R0
2628bra L255
2629*line 1309
2630L267:L266:
2631*line 1310
2632*line 1311
2633tst _ltunsw
2634beq L268
2635*line 1311
2636*line 1312
2637move #5,(sp)
2638jsr _wrtfile
2639tst R0
2640beq L269
2641*line 1312
2642move #-1,R0
2643bra L255
2644*line 1313
2645L269:L268:
2646*line 1314
2647*line 1315
2648tst _lwavsw
2649beq L270
2650*line 1315
2651*line 1316
2652move #6,(sp)
2653jsr _wrtfile
2654tst R0
2655beq L271
2656*line 1316
2657move #-1,R0
2658bra L255
2659*line 1317
2660L271:L270:
2661*line 1318
2662clr R0
2663bra L255
2664L255:unlk R14
2665rts
2666.globl _storit
2667.text
2668_storit:
2669~~storit:
2670link R14,#-4
2671movem.l R3-R7,-(sp)
2672~weneed=R7
2673~i=R6
2674~slotnd=R5
2675~slothv=R4
2676~rc=-2
2677~drem=-4
2678*line 1338
2679*line 1338
2680move #8,(sp)
2681move.l #L273,-(sp)
2682move.l #_ldfile,-(sp)
2683jsr _memcmp
2684addq.l #8,sp
2685tst R0
2686bne L274
2687*line 1339
2688*line 1340
2689*line 1341
2690move #9,(sp)
2691move #14,-(sp)
2692move.l #_ld_em2,-(sp)
2693move.l #_ld_em1,-(sp)
2694move.l #L275,-(sp)
2695jsr _ldermsg
2696adda.l #14,sp
2697*line 1342
2698*line 1343
2699jsr _streset
2700*line 1344
2701move #-1,R0
2702bra L272
2703*line 1345
2704*line 1346
2705*line 1347
2706*line 1348
2707L274:
2708*line 1349
2709*line 1349
2710jsr _ckstor
2711tst R0
2712beq L276
2713*line 1350
2714*line 1351
2715*line 1352
2716move #9,(sp)
2717move #14,-(sp)
2718move.l #_ld_em2,-(sp)
2719move.l #_ld_em1,-(sp)
2720move.l #L277,-(sp)
2721jsr _ldermsg
2722adda.l #14,sp
2723*line 1353
2724*line 1354
2725jsr _streset
2726*line 1355
2727move #-1,R0
2728bra L272
2729*line 1356
2730*line 1357
2731L276:
2732*line 1358
2733*line 1359
2734tst _lderrsw
2735bne L278
2736*line 1359
2737move.l #L279,(sp)
2738jsr _ldbusy
2739*line 1360
2740L278:
2741*line 1361
2742*line 1361
2743clr (sp)
2744jsr _getcat
2745tst R0
2746beq L280
2747*line 1362
2748*line 1363
2749jsr _streset
2750*line 1364
2751move #-1,R0
2752bra L272
2753*line 1365
2754*line 1366
2755*line 1367
2756*line 1368
2757L280:
2758*line 1369
2759move #1,(sp)
2760jsr _dspace
2761move R0,-4(R14)
2762*line 1370
2763clr R5
2764*line 1371
2765clr R7
2766*line 1375
2767*line 1375
2768tst _lasgsw
2769beq L281
2770*line 1376
2771*line 1377
2772move #1,(sp)
2773jsr _spacerq
2774add R0,R7
2775*line 1378
2776add #1,R5
2777*line 1379
2778*line 1380
2779L281:
2780*line 1381
2781*line 1381
2782tst _lorchsw
2783beq L282
2784*line 1382
2785*line 1383
2786move #3,(sp)
2787jsr _spacerq
2788add R0,R7
2789*line 1384
2790add #1,R5
2791*line 1385
2792*line 1386
2793L282:
2794*line 1387
2795*line 1387
2796tst _lorclsw
2797beq L283
2798*line 1388
2799*line 1389
2800move #2,(sp)
2801jsr _spacerq
2802add R0,R7
2803*line 1390
2804add #1,R5
2805*line 1391
2806*line 1392
2807L283:
2808*line 1393
2809*line 1393
2810tst _lpatsw
2811beq L284
2812*line 1394
2813*line 1395
2814move #8,(sp)
2815jsr _spacerq
2816add R0,R7
2817*line 1396
2818add #1,R5
2819*line 1397
2820*line 1398
2821L284:
2822*line 1399
2823*line 1399
2824tst _lscrsw
2825beq L285
2826*line 1400
2827*line 1401
2828move #4,(sp)
2829jsr _spacerq
2830add R0,R7
2831*line 1402
2832add #1,R5
2833*line 1403
2834*line 1404
2835L285:
2836*line 1405
2837*line 1405
2838tst _lseqsw
2839beq L286
2840*line 1406
2841*line 1407
2842move #9,(sp)
2843jsr _spacerq
2844add R0,R7
2845*line 1408
2846add #1,R5
2847*line 1409
2848*line 1410
2849L286:
2850*line 1411
2851*line 1411
2852tst _ltunsw
2853beq L287
2854*line 1412
2855*line 1413
2856move #5,(sp)
2857jsr _spacerq
2858add R0,R7
2859*line 1414
2860add #1,R5
2861*line 1415
2862*line 1416
2863L287:
2864*line 1417
2865*line 1417
2866tst _lwavsw
2867beq L288
2868*line 1418
2869*line 1419
2870move #6,(sp)
2871jsr _spacerq
2872add R0,R7
2873*line 1420
2874add #1,R5
2875*line 1421
2876*line 1422
2877L288:
2878*line 1423
2879*line 1423
2880cmp -4(R14),R7
2881ble L289
2882*line 1424
2883*line 1425
2884move -4(R14),(sp)
2885move R7,-(sp)
2886clr -(sp)
2887jsr _nospace
2888addq.l #4,sp
2889*line 1426
2890jsr _streset
2891*line 1427
2892move #-1,R0
2893bra L272
2894*line 1428
2895*line 1429
2896*line 1430
2897*line 1431
2898*line 1432
2899*line 1433
2900*line 1434
2901L289:
2902*line 1435
2903clr R4
2904*line 1437
2905clr R6
2906bra L292
2907L293:
2908*line 1438
2909*line 1439
2910move R6,(sp)
2911jsr _ocslot
2912tst R0
2913bne L294
2914*line 1439
2915add #1,R4
2916*line 1440
2917L294:L291:
2918*line 1437
2919add #1,R6
2920L292:
2921*line 1437
2922cmp #20,R6
2923blt L293
2924L290:
2925*line 1441
2926*line 1441
2927cmp R5,R4
2928bge L295
2929*line 1442
2930*line 1443
2931move R5,(sp)
2932move R4,-(sp)
2933move #1,-(sp)
2934jsr _nospace
2935addq.l #4,sp
2936*line 1444
2937jsr _streset
2938*line 1445
2939move #-1,R0
2940bra L272
2941*line 1446
2942*line 1447
2943*line 1448
2944*line 1449
2945L295:
2946*line 1450
2947*line 1450
2948jsr _ckdups
2949move R0,-2(R14)
2950beq L296
2951*line 1451
2952*line 1452
2953move -2(R14),R0
2954sub #1,R0
2955muls #12,R0
2956move.l R0,R8
2957move.l #_ftypes,R9
2958move.l 8(R8,R9.l),(sp)
2959move.l #L297,-(sp)
2960move.l #_ldmsg1,-(sp)
2961jsr _sprintf
2962addq.l #8,sp
2963*line 1453
2964move #9,(sp)
2965move #14,-(sp)
2966move.l #_ld_em2,-(sp)
2967move.l #_ld_em1,-(sp)
2968move.l #_ldmsg1,-(sp)
2969jsr _ldermsg
2970adda.l #14,sp
2971*line 1454
2972*line 1455
2973jsr _streset
2974*line 1456
2975move #-1,R0
2976bra L272
2977*line 1457
2978*line 1458
2979*line 1459
2980*line 1460
2981*line 1461
2982*line 1462
2983*line 1463
2984L296:
2985*line 1464
2986jsr _writem
2987move R0,-2(R14)
2988*line 1466
2989*line 1467
2990tst -2(R14)
2991bne L298
2992*line 1467
2993move.l #L299,(sp)
2994jsr _ldbusy
2995*line 1468
2996L298:
2997*line 1469
2998*line 1469
2999jsr _putcat
3000tst R0
3001beq L300
3002*line 1470
3003*line 1471
3004jsr __clsvol
3005*line 1472
3006jsr _streset
3007*line 1473
3008jsr _showcat
3009*line 1474
3010move #-1,R0
3011bra L272
3012*line 1475
3013*line 1476
3014L300:
3015*line 1477
3016jsr __clsvol
3017*line 1478
3018jsr _streset
3019*line 1479
3020jsr _showcat
3021*line 1481
3022*line 1482
3023tst -2(R14)
3024beq L301
3025*line 1482
3026move #-1,R0
3027bra L272
3028*line 1483
3029L301:
3030*line 1484
3031jsr _showsiz
3032*line 1485
3033clr R0
3034bra L272
3035L272:tst.l (sp)+
3036movem.l (sp)+,R4-R7
3037unlk R14
3038rts
3039.globl _advlcur
3040.text
3041_advlcur:
3042~~advlcur:
3043link R14,#0
3044movem.l R6-R7,-(sp)
3045~newcol=R7
3046*line 1501
3047*line 1502
3048move.l _curfet,(sp)
3049move _stccol,-(sp)
3050move _stcrow,-(sp)
3051jsr _infield
3052addq.l #4,sp
3053tst R0
3054beq L303
3055*line 1502
3056move.l _infetp,_cfetp
3057*line 1503
3058bra L304
3059L303:bra L302
3060L304:
3061*line 1506
3062move _stccol,R7
3063add #1,R7
3064*line 1508
3065*line 1509
3066move.l _cfetp,R8
3067cmp 4(R8),R7
3068bgt L305
3069*line 1509
3070move R7,(sp)
3071move _stcrow,-(sp)
3072jsr _itcpos
3073addq.l #2,sp
3074*line 1510
3075L305:
3076*line 1511
3077move _stccol,R0
3078asl #3,R0
3079move R0,_cxval
3080*line 1512
3081move _stcrow,R0
3082muls #14,R0
3083move R0,_cyval
3084L302:tst.l (sp)+
3085movem.l (sp)+,R7-R7
3086unlk R14
3087rts
3088.globl _bsplcur
3089.text
3090_bsplcur:
3091~~bsplcur:
3092link R14,#0
3093movem.l R6-R7,-(sp)
3094~newcol=R7
3095*line 1525
3096*line 1526
3097move.l _curfet,(sp)
3098move _stccol,-(sp)
3099move _stcrow,-(sp)
3100jsr _infield
3101addq.l #4,sp
3102tst R0
3103beq L307
3104*line 1526
3105move.l _infetp,_cfetp
3106*line 1527
3107bra L308
3108L307:bra L306
3109L308:
3110*line 1530
3111move _stccol,R7
3112sub #1,R7
3113*line 1532
3114*line 1533
3115move.l _cfetp,R8
3116cmp 2(R8),R7
3117blt L309
3118*line 1533
3119move R7,(sp)
3120move _stcrow,-(sp)
3121jsr _itcpos
3122addq.l #2,sp
3123*line 1534
3124L309:
3125*line 1535
3126move _stccol,R0
3127asl #3,R0
3128move R0,_cxval
3129*line 1536
3130move _stcrow,R0
3131muls #14,R0
3132move R0,_cyval
3133L306:tst.l (sp)+
3134movem.l (sp)+,R7-R7
3135unlk R14
3136rts
3137.globl _ldswin
3138.text
3139_ldswin:
3140~~ldswin:
3141~n=R7
3142link R14,#0
3143movem.l R4-R7,-(sp)
3144~cx=R6
3145~cy=R5
3146*line 1553
3147move 8(R14),R7
3148*line 1553
3149*line 1554
3150tst _ndisp
3151bne L310
3152*line 1555
3153*line 1556
3154*line 1557
3155cmp #10,R7
3156bne L311
3157cmp #1,_lmwtype
3158bne L311
3159*line 1557
3160move #10,(sp)
3161jsr _exp_c
3162move R0,R6
3163*line 1558
3164bra L312
3165L311:
3166*line 1559
3167move R7,R0
3168asl #4,R0
3169ext.l R0
3170move.l R0,R8
3171move.l #_ldbox,R9
3172move 10(R8,R9.l),(sp)
3173jsr _exp_c
3174move R0,R6
3175L312:
3176*line 1563
3177*line 1564
3178clr R0
3179move 10+_v_regs,R0
3180and #384,R0
3181beq L313
3182*line 1564
3183clr (sp)
3184jsr _vbank
3185*line 1565
3186L313:
3187*line 1566
3188*line 1567
3189move R6,(sp)
3190move R7,R0
3191asl #4,R0
3192ext.l R0
3193move.l R0,R8
3194move.l #_ldbox,R9
3195move 6(R8,R9.l),-(sp)
3196move R7,R0
3197asl #4,R0
3198ext.l R0
3199move.l R0,R8
3200move.l #_ldbox,R9
3201move 4(R8,R9.l),-(sp)
3202move R7,R0
3203asl #4,R0
3204ext.l R0
3205move.l R0,R8
3206move.l #_ldbox,R9
3207move 2(R8,R9.l),-(sp)
3208move R7,R0
3209asl #4,R0
3210ext.l R0
3211move.l R0,R8
3212move.l #_ldbox,R9
3213move 0(R8,R9.l),-(sp)
3214move #128,-(sp)
3215move.l _librob,-(sp)
3216jsr _vbfill4
3217adda.l #14,sp
3218*line 1571
3219*line 1572
3220move #14,(sp)
3221move R7,R8
3222add.l R8,R8
3223add.l R8,R8
3224move.l #_ldbxlb0,R9
3225move.l 0(R8,R9.l),-(sp)
3226move R7,R0
3227asl #4,R0
3228ext.l R0
3229move.l R0,R8
3230move.l #_ldbox,R9
3231move 14(R8,R9.l),-(sp)
3232move R7,R0
3233asl #4,R0
3234ext.l R0
3235move.l R0,R8
3236move.l #_ldbox,R9
3237move 12(R8,R9.l),-(sp)
3238move R7,R0
3239asl #4,R0
3240ext.l R0
3241move.l R0,R8
3242move.l #_ldbox,R9
3243move 8(R8,R9.l),-(sp)
3244move #64,-(sp)
3245move.l _librob,-(sp)
3246jsr _tsplot4
3247adda.l #16,sp
3248*line 1576
3249move R7,R0
3250bra L315
3251*line 1577
3252L316:
3253*line 1578
3254*line 1579
3255*line 1580
3256move.l #_ldpoint,_point
3257*line 1581
3258*line 1582
3259move #12,(sp)
3260move #13,-(sp)
3261move #79,-(sp)
3262move #13,-(sp)
3263move #8,-(sp)
3264jsr _lseg
3265addq.l #8,sp
3266*line 1583
3267move #12,(sp)
3268move #13,-(sp)
3269move #95,-(sp)
3270move #13,-(sp)
3271move #88,-(sp)
3272jsr _lseg
3273addq.l #8,sp
3274*line 1584
3275move #12,(sp)
3276move #13,-(sp)
3277move #167,-(sp)
3278move #13,-(sp)
3279move #104,-(sp)
3280jsr _lseg
3281addq.l #8,sp
3282*line 1585
3283move #12,(sp)
3284move #13,-(sp)
3285move #471,-(sp)
3286move #13,-(sp)
3287move #176,-(sp)
3288jsr _lseg
3289addq.l #8,sp
3290*line 1586
3291move #12,(sp)
3292move #13,-(sp)
3293move #504,-(sp)
3294move #13,-(sp)
3295move #480,-(sp)
3296jsr _lseg
3297addq.l #8,sp
3298*line 1587
3299bra L310
3300*line 1588
3301*line 1589
3302L317:
3303*line 1590
3304*line 1591
3305bra L310
3306*line 1592
3307*line 1593
3308L318:
3309*line 1594
3310*line 1595
3311*line 1596
3312*line 1597
3313move #14,(sp)
3314move.l #_ldfile,-(sp)
3315move R7,R0
3316asl #4,R0
3317ext.l R0
3318move.l R0,R8
3319move.l #_ldbox,R9
3320move 14(R8,R9.l),-(sp)
3321move R7,R0
3322asl #4,R0
3323ext.l R0
3324move.l R0,R8
3325move.l #_ldbox,R9
3326move 12(R8,R9.l),-(sp)
3327move R7,R0
3328asl #4,R0
3329ext.l R0
3330move.l R0,R8
3331move.l #_ldbox,R9
3332move 8(R8,R9.l),-(sp)
3333move #64,-(sp)
3334move.l _librob,-(sp)
3335jsr _tsplot4
3336adda.l #16,sp
3337bra L310
3338*line 1598
3339*line 1599
3340L319:
3341*line 1600
3342*line 1601
3343*line 1602
3344*line 1603
3345move #14,(sp)
3346move.l #_ldcmnt,-(sp)
3347move R7,R0
3348asl #4,R0
3349ext.l R0
3350move.l R0,R8
3351move.l #_ldbox,R9
3352move 14(R8,R9.l),-(sp)
3353move R7,R0
3354asl #4,R0
3355ext.l R0
3356move.l R0,R8
3357move.l #_ldbox,R9
3358move 12(R8,R9.l),-(sp)
3359move R7,R0
3360asl #4,R0
3361ext.l R0
3362move.l R0,R8
3363move.l #_ldbox,R9
3364move 8(R8,R9.l),-(sp)
3365move #64,-(sp)
3366move.l _librob,-(sp)
3367jsr _tsplot4
3368adda.l #16,sp
3369bra L310
3370*line 1604
3371*line 1605
3372*line 1606
3373*line 1607
3374*line 1608
3375L320:
3376*line 1609
3377*line 1610
3378*line 1611
3379*line 1612
3380tst _lrasw
3381beq L321
3382*line 1612
3383move #13,(sp)
3384jsr _exp_c
3385move R0,R5
3386*line 1613
3387bra L322
3388L321:
3389*line 1614
3390move R7,R0
3391asl #4,R0
3392ext.l R0
3393add.l #_ldbox,R0
3394move.l R0,R8
3395move 8(R8),R5
3396L322:
3397*line 1615
3398*line 1616
3399*line 1617
3400move #14,(sp)
3401move.l #L323,-(sp)
3402move R7,R0
3403asl #4,R0
3404ext.l R0
3405move.l R0,R8
3406move.l #_ldbox,R9
3407move 14(R8,R9.l),-(sp)
3408move R7,R0
3409asl #4,R0
3410ext.l R0
3411move.l R0,R8
3412move.l #_ldbox,R9
3413move 12(R8,R9.l),-(sp)
3414move R5,-(sp)
3415move #64,-(sp)
3416move.l _librob,-(sp)
3417jsr _tsplot4
3418adda.l #16,sp
3419*line 1618
3420bra L310
3421*line 1619
3422*line 1620
3423L324:
3424*line 1621
3425*line 1622
3426*line 1623
3427*line 1623
3428tst _lselsw
3429beq L325
3430*line 1624
3431*line 1625
3432move _ldslot,(sp)
3433jsr _ftkind
3434move R0,_ldkind
3435*line 1626
3436*line 1627
3437*line 1628
3438*line 1629
3439*line 1630
3440cmp #7,_ldkind
3441beq L10014
3442cmp #2,_ldkind
3443beq L10014
3444cmp #3,_ldkind
3445bne L326
3446L10014:*line 1630
3447move #13,(sp)
3448jsr _exp_c
3449move R0,R5
3450*line 1631
3451bra L327
3452L326:
3453*line 1632
3454move R7,R0
3455asl #4,R0
3456ext.l R0
3457add.l #_ldbox,R0
3458move.l R0,R8
3459move 8(R8),R5
3460L327:
3461*line 1633
3462bra L328
3463L325:
3464*line 1634
3465*line 1635
3466*line 1636
3467move R7,R0
3468asl #4,R0
3469ext.l R0
3470add.l #_ldbox,R0
3471move.l R0,R8
3472move 8(R8),R5
3473L328:
3474*line 1637
3475*line 1638
3476*line 1639
3477*line 1640
3478move #14,(sp)
3479tst _lorchl
3480beq L10015
3481move.l #L329,-(sp)
3482bra L10017
3483L10015:move.l #L330,-(sp)
3484L10017:move R7,R0
3485asl #4,R0
3486ext.l R0
3487move.l R0,R8
3488move.l #_ldbox,R9
3489move 14(R8,R9.l),-(sp)
3490move R7,R0
3491asl #4,R0
3492ext.l R0
3493move.l R0,R8
3494move.l #_ldbox,R9
3495move 12(R8,R9.l),-(sp)
3496move R5,-(sp)
3497move #64,-(sp)
3498move.l _librob,-(sp)
3499jsr _tsplot4
3500adda.l #16,sp
3501*line 1641
3502bra L310
3503*line 1642
3504*line 1643
3505*line 1644
3506L331:
3507*line 1645
3508*line 1646
3509*line 1647
3510tst _lstrsw
3511beq L10018
3512move #13,(sp)
3513bra L10020
3514L10018:move R7,R0
3515asl #4,R0
3516ext.l R0
3517move.l R0,R8
3518move.l #_ldbox,R9
3519move 8(R8,R9.l),(sp)
3520L10020:jsr _exp_c
3521move R0,R5
3522*line 1648
3523move #14,(sp)
3524move.l #L332,-(sp)
3525move #10,-(sp)
3526move #22,-(sp)
3527move R5,-(sp)
3528move #64,-(sp)
3529move.l _librob,-(sp)
3530jsr _tsplot4
3531adda.l #16,sp
3532*line 1649
3533*line 1650
3534tst _lscrsw
3535beq L10021
3536move #13,(sp)
3537bra L10023
3538L10021:move R7,R0
3539asl #4,R0
3540ext.l R0
3541move.l R0,R8
3542move.l #_ldbox,R9
3543move 8(R8,R9.l),(sp)
3544L10023:jsr _exp_c
3545move R0,R5
3546*line 1651
3547move #14,(sp)
3548move.l #L333,-(sp)
3549move #17,-(sp)
3550move #22,-(sp)
3551move R5,-(sp)
3552move #64,-(sp)
3553move.l _librob,-(sp)
3554jsr _tsplot4
3555adda.l #16,sp
3556*line 1652
3557*line 1653
3558tst _lorchsw
3559beq L10024
3560move #13,(sp)
3561bra L10026
3562L10024:move R7,R0
3563asl #4,R0
3564ext.l R0
3565move.l R0,R8
3566move.l #_ldbox,R9
3567move 8(R8,R9.l),(sp)
3568L10026:jsr _exp_c
3569move R0,R5
3570*line 1654
3571move #14,(sp)
3572move.l #L334,-(sp)
3573move #24,-(sp)
3574move #22,-(sp)
3575move R5,-(sp)
3576move #64,-(sp)
3577move.l _librob,-(sp)
3578jsr _tsplot4
3579adda.l #16,sp
3580*line 1655
3581*line 1656
3582*line 1657
3583tst _lwavsw
3584beq L10027
3585move #13,(sp)
3586bra L10029
3587L10027:move R7,R0
3588asl #4,R0
3589ext.l R0
3590move.l R0,R8
3591move.l #_ldbox,R9
3592move 8(R8,R9.l),(sp)
3593L10029:jsr _exp_c
3594move R0,R5
3595*line 1658
3596move #14,(sp)
3597move.l #L335,-(sp)
3598move #10,-(sp)
3599move #23,-(sp)
3600move R5,-(sp)
3601move #64,-(sp)
3602move.l _librob,-(sp)
3603jsr _tsplot4
3604adda.l #16,sp
3605*line 1659
3606*line 1660
3607tst _lpatsw
3608beq L10030
3609move #13,(sp)
3610bra L10032
3611L10030:move R7,R0
3612asl #4,R0
3613ext.l R0
3614move.l R0,R8
3615move.l #_ldbox,R9
3616move 8(R8,R9.l),(sp)
3617L10032:jsr _exp_c
3618move R0,R5
3619*line 1661
3620move #14,(sp)
3621move.l #L336,-(sp)
3622move #17,-(sp)
3623move #23,-(sp)
3624move R5,-(sp)
3625move #64,-(sp)
3626move.l _librob,-(sp)
3627jsr _tsplot4
3628adda.l #16,sp
3629*line 1662
3630*line 1663
3631tst _lorclsw
3632beq L10033
3633move #13,(sp)
3634bra L10035
3635L10033:move R7,R0
3636asl #4,R0
3637ext.l R0
3638move.l R0,R8
3639move.l #_ldbox,R9
3640move 8(R8,R9.l),(sp)
3641L10035:jsr _exp_c
3642move R0,R5
3643*line 1664
3644move #14,(sp)
3645move.l #L337,-(sp)
3646move #24,-(sp)
3647move #23,-(sp)
3648move R5,-(sp)
3649move #64,-(sp)
3650move.l _librob,-(sp)
3651jsr _tsplot4
3652adda.l #16,sp
3653*line 1665
3654*line 1666
3655*line 1667
3656tst _lasgsw
3657beq L10036
3658move #13,(sp)
3659bra L10038
3660L10036:move R7,R0
3661asl #4,R0
3662ext.l R0
3663move.l R0,R8
3664move.l #_ldbox,R9
3665move 8(R8,R9.l),(sp)
3666L10038:jsr _exp_c
3667move R0,R5
3668*line 1668
3669move #14,(sp)
3670move.l #L338,-(sp)
3671move #10,-(sp)
3672move #24,-(sp)
3673move R5,-(sp)
3674move #64,-(sp)
3675move.l _librob,-(sp)
3676jsr _tsplot4
3677adda.l #16,sp
3678*line 1669
3679*line 1670
3680tst _lseqsw
3681beq L10039
3682move #13,(sp)
3683bra L10041
3684L10039:move R7,R0
3685asl #4,R0
3686ext.l R0
3687move.l R0,R8
3688move.l #_ldbox,R9
3689move 8(R8,R9.l),(sp)
3690L10041:jsr _exp_c
3691move R0,R5
3692*line 1671
3693move #14,(sp)
3694move.l #L339,-(sp)
3695move #17,-(sp)
3696move #24,-(sp)
3697move R5,-(sp)
3698move #64,-(sp)
3699move.l _librob,-(sp)
3700jsr _tsplot4
3701adda.l #16,sp
3702*line 1672
3703*line 1673
3704tst _ltunsw
3705beq L10042
3706move #13,(sp)
3707bra L10044
3708L10042:move R7,R0
3709asl #4,R0
3710ext.l R0
3711move.l R0,R8
3712move.l #_ldbox,R9
3713move 8(R8,R9.l),(sp)
3714L10044:jsr _exp_c
3715move R0,R5
3716*line 1674
3717move #14,(sp)
3718move.l #L340,-(sp)
3719move #24,-(sp)
3720move #24,-(sp)
3721move R5,-(sp)
3722move #64,-(sp)
3723move.l _librob,-(sp)
3724jsr _tsplot4
3725adda.l #16,sp
3726*line 1675
3727bra L310
3728*line 1676
3729*line 1677
3730L341:
3731*line 1678
3732*line 1679
3733*line 1680
3734move #14,(sp)
3735move.l _lmln22,-(sp)
3736move R7,R0
3737asl #4,R0
3738ext.l R0
3739move.l R0,R8
3740move.l #_ldbox,R9
3741move 14(R8,R9.l),-(sp)
3742move #22,-(sp)
3743move R7,R0
3744asl #4,R0
3745ext.l R0
3746move.l R0,R8
3747move.l #_ldbox,R9
3748move 8(R8,R9.l),-(sp)
3749move #64,-(sp)
3750move.l _librob,-(sp)
3751jsr _tsplot4
3752adda.l #16,sp
3753*line 1681
3754move #14,(sp)
3755move.l _lmln23,-(sp)
3756move R7,R0
3757asl #4,R0
3758ext.l R0
3759move.l R0,R8
3760move.l #_ldbox,R9
3761move 14(R8,R9.l),-(sp)
3762move #23,-(sp)
3763move R7,R0
3764asl #4,R0
3765ext.l R0
3766move.l R0,R8
3767move.l #_ldbox,R9
3768move 8(R8,R9.l),-(sp)
3769move #64,-(sp)
3770move.l _librob,-(sp)
3771jsr _tsplot4
3772adda.l #16,sp
3773*line 1682
3774move #14,(sp)
3775move.l _lmln24,-(sp)
3776move R7,R0
3777asl #4,R0
3778ext.l R0
3779move.l R0,R8
3780move.l #_ldbox,R9
3781move 14(R8,R9.l),-(sp)
3782move #24,-(sp)
3783move R7,R0
3784asl #4,R0
3785ext.l R0
3786move.l R0,R8
3787move.l #_ldbox,R9
3788move 8(R8,R9.l),-(sp)
3789move #64,-(sp)
3790move.l _librob,-(sp)
3791jsr _tsplot4
3792adda.l #16,sp
3793*line 1683
3794bra L310
3795*line 1684
3796bra L314
3797L315:cmp #10,R0
3798bhi L314
3799asl #2,R0
3800move R0,R8
3801add.l #L342,R8
3802move.l (R8),R8
3803jmp (R8)
3804.data
3805L342:.dc.l L316
3806.dc.l L317
3807.dc.l L314
3808.dc.l L318
3809.dc.l L314
3810.dc.l L319
3811.dc.l L314
3812.dc.l L320
3813.dc.l L324
3814.dc.l L331
3815.dc.l L341
3816.text
3817L314:L310:tst.l (sp)+
3818movem.l (sp)+,R5-R7
3819unlk R14
3820rts
3821.globl _lwins
3822.text
3823_lwins:
3824~~lwins:
3825link R14,#0
3826movem.l R6-R7,-(sp)
3827~i=R7
3828*line 1701
3829clr R7
3830bra L346
3831L347:
3832*line 1702
3833move R7,(sp)
3834jsr _ldswin
3835L345:
3836*line 1701
3837add #1,R7
3838L346:
3839*line 1701
3840cmp #11,R7
3841blt L347
3842L344:L343:tst.l (sp)+
3843movem.l (sp)+,R7-R7
3844unlk R14
3845rts
3846.globl _ldpoint
3847.text
3848_ldpoint:
3849~~ldpoint:
3850~x=8
3851~y=10
3852~pen=12
3853link R14,#-4
3854*line 1714
3855*line 1715
3856clr R0
3857move 10+_v_regs,R0
3858and #384,R0
3859beq L349
3860*line 1715
3861clr (sp)
3862jsr _vbank
3863*line 1716
3864L349:
3865*line 1717
3866move 12(R14),(sp)
3867jsr _exp_c
3868move R0,(sp)
3869move 10(R14),-(sp)
3870move 8(R14),-(sp)
3871move.l _ldoct,-(sp)
3872jsr _vputp
3873addq.l #8,sp
3874L348:unlk R14
3875rts
3876.globl _ldbord
3877.text
3878_ldbord:
3879~~ldbord:
3880link R14,#-4
3881*line 1731
3882move.l #_ldpoint,_point
3883*line 1733
3884move #11,(sp)
3885clr -(sp)
3886move #511,-(sp)
3887clr -(sp)
3888clr -(sp)
3889jsr _lseg
3890addq.l #8,sp
3891*line 1734
3892move #11,(sp)
3893move #349,-(sp)
3894move #511,-(sp)
3895clr -(sp)
3896move #511,-(sp)
3897jsr _lseg
3898addq.l #8,sp
3899*line 1735
3900move #11,(sp)
3901move #349,-(sp)
3902clr -(sp)
3903move #349,-(sp)
3904move #511,-(sp)
3905jsr _lseg
3906addq.l #8,sp
3907*line 1736
3908move #11,(sp)
3909clr -(sp)
3910clr -(sp)
3911move #349,-(sp)
3912clr -(sp)
3913jsr _lseg
3914addq.l #8,sp
3915*line 1738
3916move #11,(sp)
3917move #293,-(sp)
3918move #511,-(sp)
3919move #293,-(sp)
3920clr -(sp)
3921jsr _lseg
3922addq.l #8,sp
3923*line 1739
3924move #11,(sp)
3925move #308,-(sp)
3926clr -(sp)
3927move #308,-(sp)
3928move #511,-(sp)
3929jsr _lseg
3930addq.l #8,sp
3931*line 1741
3932move #11,(sp)
3933move #308,-(sp)
3934move #79,-(sp)
3935move #293,-(sp)
3936move #79,-(sp)
3937jsr _lseg
3938addq.l #8,sp
3939*line 1742
3940move #11,(sp)
3941move #308,-(sp)
3942move #144,-(sp)
3943move #293,-(sp)
3944move #144,-(sp)
3945jsr _lseg
3946addq.l #8,sp
3947*line 1743
3948move #11,(sp)
3949move #308,-(sp)
3950move #215,-(sp)
3951move #293,-(sp)
3952move #215,-(sp)
3953jsr _lseg
3954addq.l #8,sp
3955*line 1744
3956move #11,(sp)
3957move #349,-(sp)
3958move #71,-(sp)
3959move #308,-(sp)
3960move #71,-(sp)
3961jsr _lseg
3962addq.l #8,sp
3963*line 1745
3964move #11,(sp)
3965move #349,-(sp)
3966move #256,-(sp)
3967move #308,-(sp)
3968move #256,-(sp)
3969jsr _lseg
3970addq.l #8,sp
3971L350:unlk R14
3972rts
3973.globl _lmwclr
3974.text
3975_lmwclr:
3976~~lmwclr:
3977link R14,#-4
3978*line 1759
3979clr _lmwtype
3980*line 1760
3981clr _submenu
3982*line 1762
3983move.l #L352,_lmln22
3984*line 1763
3985move.l #L353,_lmln23
3986*line 1764
3987move.l #L354,_lmln24
3988L351:unlk R14
3989rts
3990.globl _lmwvtyp
3991.text
3992_lmwvtyp:
3993~~lmwvtyp:
3994link R14,#-4
3995*line 1775
3996move #1,_lmwtype
3997*line 1776
3998move #1,_submenu
3999*line 1778
4000move.l #_vtlin1,_lmln22
4001*line 1779
4002move.l #_vtlin2,_lmln23
4003*line 1780
4004move.l #_vtlin3,_lmln24
4005L355:unlk R14
4006rts
4007.globl _libdsp
4008.text
4009_libdsp:
4010~~libdsp:
4011link R14,#-4
4012*line 1794
4013move.l #_v_score,_librob
4014*line 1795
4015move.l #_v_curs0,_obj0
4016*line 1796
4017move.l #_v_tcur,_obj2
4018*line 1797
4019move.l #144+_v_obtab,_ldoct
4020*line 1799
4021clr _lselsw
4022*line 1800
4023clr _ldelsw
4024*line 1801
4025clr _lstrsw
4026*line 1803
4027clr _lasgsw
4028*line 1804
4029clr _lorchsw
4030*line 1805
4031clr _lorclsw
4032*line 1806
4033clr _lpatsw
4034*line 1807
4035clr _lscrsw
4036*line 1808
4037clr _lseqsw
4038*line 1809
4039clr _ltunsw
4040*line 1810
4041clr _lwavsw
4042*line 1812
4043clr _lderrsw
4044*line 1813
4045clr _ltagged
4046*line 1814
4047move #-1,_lksel
4048*line 1817
4049jsr _clrcat
4050*line 1818
4051clr _catin
4052*line 1820
4053jsr _lmwclr
4054*line 1822
4055jsr _dswap
4056*line 1824
4057*line 1825
4058clr R0
4059move 10+_v_regs,R0
4060and #384,R0
4061beq L357
4062*line 1825
4063clr (sp)
4064jsr _vbank
4065*line 1826
4066L357:
4067*line 1827
4068move #32767,(sp)
4069clr -(sp)
4070move.l _librob,-(sp)
4071jsr _memsetw
4072addq.l #6,sp
4073*line 1828
4074move #12033,(sp)
4075clr -(sp)
4076move.l _librob,R0
4077add.l #$fffe,R0
4078move.l R0,-(sp)
4079jsr _memsetw
4080addq.l #6,sp
4081*line 1830
4082move #-1,(sp)
4083move #1536,-(sp)
4084clr -(sp)
4085clr -(sp)
4086move #350,-(sp)
4087move #512,-(sp)
4088move.l _librob,-(sp)
4089clr -(sp)
4090clr -(sp)
4091move #8,-(sp)
4092jsr _SetObj
4093adda.l #20,sp
4094*line 1831
4095move #-1,(sp)
4096move #1540,-(sp)
4097move #316,-(sp)
4098move #32,-(sp)
4099move #16,-(sp)
4100move #16,-(sp)
4101move.l _obj0,-(sp)
4102move #1,-(sp)
4103clr -(sp)
4104clr -(sp)
4105jsr _SetObj
4106adda.l #20,sp
4107*line 1832
4108move #-1,(sp)
4109move #1572,-(sp)
4110clr -(sp)
4111clr -(sp)
4112move #16,-(sp)
4113move #16,-(sp)
4114move.l _obj2,-(sp)
4115move #1,-(sp)
4116clr -(sp)
4117move #2,-(sp)
4118jsr _SetObj
4119adda.l #20,sp
4120*line 1834
4121move #1,(sp)
4122jsr _arcurs
4123*line 1835
4124move #1,(sp)
4125jsr _itcini
4126*line 1836
4127move #1,(sp)
4128jsr _ttcini
4129*line 1838
4130jsr _ldbord
4131*line 1839
4132jsr _lwins
4133*line 1841
4134move.l #_lbrpal,(sp)
4135jsr _vsndpal
4136*line 1843
4137move #8,(sp)
4138move #8,-(sp)
4139jsr _SetPri
4140addq.l #2,sp
4141*line 1844
4142move #15,(sp)
4143clr -(sp)
4144jsr _SetPri
4145addq.l #2,sp
4146*line 1846
4147move #316,(sp)
4148move #32,-(sp)
4149jsr _setgc
4150addq.l #2,sp
4151*line 1848
4152move _thcwval,_chtime
4153*line 1849
4154move _tvcwval,_cvtime
4155*line 1850
4156move #1,_cmtype
4157*line 1851
4158move _cxval,R0
4159asr #3,R0
4160move R0,(sp)
4161move _cyval,R0
4162ext.l R0
4163divs #14,R0
4164move R0,-(sp)
4165jsr _itcpos
4166addq.l #2,sp
4167L356:unlk R14
4168rts
4169.data
4170L1:.dc.b $41,$53,$47,$0
4171L2:.dc.b $41,$73,$73,$69,$67,$6E,$6D,$6E,$74,$0
4172L3:.dc.b $41,$73,$73,$69,$67,$6E,$6D,$6E,$74,$0
4173L4:.dc.b $4F,$52,$4C,$0
4174L5:.dc.b $4F,$72,$63,$68,$65,$73,$74,$72,$61,$0
4175L6:.dc.b $4F,$72,$63,$68,$65,$73,$74,$72,$61,$0
4176L7:.dc.b $4F,$52,$48,$0
4177L8:.dc.b $4F,$72,$63,$68,$65,$73,$74,$72,$61,$0
4178L9:.dc.b $4F,$72,$63,$68,$65,$73,$74,$72,$61,$0
4179L10:.dc.b $53,$43,$52,$0
4180L11:.dc.b $20,$20,$20,$20,$53,$63,$6F,$72,$65,$0
4181L12:.dc.b $53,$63,$6F,$72,$65,$0
4182L13:.dc.b $54,$55,$4E,$0
4183L14:.dc.b $20,$20,$20,$54,$75,$6E,$69,$6E,$67,$0
4184L15:.dc.b $54,$75,$6E,$69,$6E,$67,$0
4185L16:.dc.b $57,$41,$56,$0
4186L17:.dc.b $57,$61,$76,$65,$73,$68,$61,$70,$65,$0
4187L18:.dc.b $57,$61,$76,$65,$73,$68,$61,$70,$65,$0
4188L19:.dc.b $4F,$52,$43,$0
4189L20:.dc.b $4F,$72,$63,$68,$65,$73,$74,$72,$61,$0
4190L21:.dc.b $4F,$72,$63,$68,$65,$73,$74,$72,$61,$0
4191L22:.dc.b $50,$41,$54,$0
4192L23:.dc.b $20,$20,$20,$20,$50,$61,$74,$63,$68,$0
4193L24:.dc.b $50,$61,$74,$63,$68,$0
4194L25:.dc.b $53,$45,$51,$0
4195L26:.dc.b $20,$53,$65,$71,$75,$65,$6E,$63,$65,$0
4196L27:.dc.b $53,$65,$71,$75,$65,$6E,$63,$65,$0
4197L43:.dc.b $3F,$3F,$20,$25,$33,$2E,$33,$73,$20,$20,$3F,$3F,$0
4198L45:.dc.b $30,$30,$30,$0
4199L71:.dc.b $20,$20,$20,$20,$42,$75,$73,$79,$20,$2D,$20,$50,$6C,$65,$61,$73,$65,$20,$73,$74,$61,$6E,$64,$20,$62,$79,$0
4200L73:.dc.b $20,$74,$68,$65,$20,$25,$73,$20,$66,$69,$6C,$65,$2C,$0
4201L74:.dc.b $43,$61,$6E,$27,$74,$20,$66,$69,$6E,$64,$20,$61,$20,$73,$6C,$6F,$74,$20,$66,$6F,$72,$0
4202L75:.dc.b $20,$61,$6E,$64,$20,$6F,$6E,$65,$20,$77,$61,$73,$20,$65,$78,$70,$65,$63,$74,$65,$64,$0
4203L82:.dc.b $65,$72,$72,$6E,$6F,$20,$3D,$20,$25,$64,$0
4204L83:.dc.b $44,$69,$73,$6B,$20,$6D,$61,$79,$20,$62,$65,$20,$66,$75,$6C,$6C,$0
4205L90:.dc.b $65,$72,$72,$6E,$6F,$20,$3D,$20,$25,$64,$0
4206L91:.dc.b $55,$6E,$65,$78,$70,$65,$63,$74,$65,$64,$20,$45,$4F,$46,$0
4207L105:.dc.b $30,$30,$30,$20,$45,$6D,$70,$74,$79,$2D,$25,$30,$32,$2E,$32,$64,$20,$3F,$3F,$3F,$20,$25,$2D,$33,$37,$2E,$33,$37,$73,$25
4208.dc.b $63,$25,$63,$0
4209L106:.dc.b $31,$32,$33,$34,$35,$36,$37,$38,$39,$30,$31,$32,$33,$34,$35,$36,$37,$38,$39,$30,$31,$32,$33,$34,$35,$36,$37,$38,$39,$30
4210.dc.b $31,$32,$33,$34,$35,$36,$37,$0
4211L133:.dc.b $61,$73,$67,$0
4212L136:.dc.b $6F,$72,$68,$0
4213L139:.dc.b $6F,$72,$6C,$0
4214L142:.dc.b $6F,$72,$63,$0
4215L145:.dc.b $70,$61,$74,$0
4216L148:.dc.b $73,$63,$72,$0
4217L151:.dc.b $73,$65,$71,$0
4218L154:.dc.b $74,$75,$6E,$0
4219L157:.dc.b $77,$61,$76,$0
4220L161:.dc.b $44,$69,$73,$6B,$20,$6E,$6F,$74,$20,$72,$65,$61,$64,$79,$20,$3F,$0
4221L162:.dc.b $4D,$69,$63,$72,$6F,$64,$69,$73,$6B,$20,$63,$61,$70,$61,$63,$69,$74,$79,$20,$25,$34,$75,$20,$62,$6C,$6F,$63,$6B,$73,$0
4222L163:.dc.b $54,$68,$69,$73,$20,$64,$69,$73,$6B,$20,$63,$6F,$6E,$73,$75,$6D,$65,$73,$20,$25,$34,$75,$20,$62,$6C,$6F,$63,$6B,$73,$0
4223L164:.dc.b $41,$76,$61,$69,$6C,$61,$62,$6C,$65,$20,$73,$70,$61,$63,$65,$20,$69,$73,$20,$25,$34,$75,$20,$62,$6C,$6F,$63,$6B,$73,$0
4224L166:.dc.b $4D,$37,$46,$49,$4C,$45,$53,$2E,$43,$41,$54,$0
4225L167:.dc.b $72,$0
4226L172:.dc.b $20,$20,$66,$72,$65,$61,$64,$20,$72,$65,$74,$75,$72,$6E,$65,$64,$20,$25,$64,$0
4227L173:.dc.b $20,$20,$65,$72,$72,$6E,$6F,$20,$3D,$20,$25,$64,$2C,$20,$66,$65,$73,$69,$7A,$65,$3D,$25,$64,$0
4228L174:.dc.b $55,$6E,$61,$62,$6C,$65,$20,$74,$6F,$20,$72,$65,$61,$64,$20,$63,$61,$74,$61,$6C,$6F,$67,$0
4229L176:.dc.b $46,$69,$6C,$65,$20,$63,$61,$74,$61,$6C,$6F,$67,$20,$69,$73,$20,$4E,$55,$4C,$4C,$0
4230L182:.dc.b $4D,$37,$46,$49,$4C,$45,$53,$2E,$43,$41,$54,$0
4231L183:.dc.b $77,$0
4232L185:.dc.b $20,$20,$65,$72,$72,$6E,$6F,$20,$3D,$20,$25,$64,$0
4233L186:.dc.b $55,$6E,$61,$62,$6C,$65,$20,$74,$6F,$20,$6F,$70,$65,$6E,$20,$63,$61,$74,$61,$6C,$6F,$67,$0
4234L189:.dc.b $20,$20,$66,$77,$72,$69,$74,$65,$20,$72,$65,$74,$75,$72,$6E,$65,$64,$20,$25,$64,$0
4235L190:.dc.b $20,$20,$65,$72,$72,$6E,$6F,$20,$3D,$20,$25,$64,$2C,$20,$66,$65,$73,$69,$7A,$65,$3D,$25,$64,$0
4236L191:.dc.b $43,$61,$6E,$27,$74,$20,$77,$72,$69,$74,$65,$20,$63,$61,$74,$61,$6C,$6F,$67,$0
4237L193:.dc.b $20,$20,$65,$72,$72,$6E,$6F,$20,$3D,$20,$25,$64,$0
4238L194:.dc.b $44,$69,$73,$6B,$20,$6D,$61,$79,$20,$62,$65,$20,$66,$75,$6C,$6C,$0
4239L205:.dc.b $20,$20,$20,$20,$20,$20,$20,$52,$65,$61,$64,$69,$6E,$67,$20,$63,$61,$74,$61,$6C,$6F,$67,$0
4240L219:.dc.b $4D,$37,$53,$4C,$4F,$54,$25,$30,$32,$2E,$32,$75,$2E,$25,$2D,$33,$2E,$33,$73,$0
4241L249:.dc.b $20,$6B,$69,$6E,$64,$3D,$25,$64,$0
4242L250:.dc.b $62,$61,$64,$20,$77,$72,$74,$66,$69,$6C,$65,$20,$61,$72,$67,$75,$6D,$65,$6E,$74,$3A,$0
4243L254:.dc.b $25,$30,$33,$2E,$33,$64,$0
4244L273:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$0
4245L275:.dc.b $46,$69,$6C,$65,$20,$6D,$75,$73,$74,$20,$62,$65,$20,$6E,$61,$6D,$65,$64,$0
4246L277:.dc.b $4E,$6F,$20,$66,$69,$6C,$65,$20,$74,$79,$70,$65,$20,$73,$65,$6C,$65,$63,$74,$65,$64,$0
4247L279:.dc.b $20,$20,$20,$20,$20,$20,$20,$53,$74,$6F,$72,$69,$6E,$67,$20,$66,$69,$6C,$65,$73,$0
4248L297:.dc.b $44,$75,$70,$6C,$69,$63,$61,$74,$65,$20,$25,$73,$0
4249L299:.dc.b $20,$20,$20,$20,$20,$20,$20,$57,$72,$69,$74,$69,$6E,$67,$20,$63,$61,$74,$61,$6C,$6F,$67,$0
4250L323:.dc.b $43,$6F,$6E,$74,$65,$6E,$74,$0
4251L329:.dc.b $48,$69,$20,$4F,$72,$63,$68,$0
4252L330:.dc.b $4C,$6F,$20,$4F,$72,$63,$68,$0
4253L332:.dc.b $53,$74,$6F,$72,$65,$0
4254L333:.dc.b $53,$63,$6F,$72,$65,$0
4255L334:.dc.b $48,$69,$20,$4F,$72,$63,$68,$0
4256L335:.dc.b $57,$61,$76,$65,$73,$0
4257L336:.dc.b $50,$61,$74,$63,$68,$0
4258L337:.dc.b $4C,$6F,$20,$4F,$72,$63,$68,$0
4259L338:.dc.b $41,$73,$73,$67,$6E,$0
4260L339:.dc.b $53,$65,$71,$6E,$63,$0
4261L340:.dc.b $54,$75,$6E,$69,$6E,$67,$73,$0
4262L352:.dc.b $0
4263L353:.dc.b $0
4264L354:.dc.b $0
Note: See TracBrowser for help on using the repository browser.