.globl _io_time
.globl _io_lcd
.globl _io_ser
.globl _io_midi
.globl _io_disk
.globl _io_tone
.globl _io_leds
.globl _io_kbrd
.globl _lcd_a0
.globl _lcd_a1
.globl _io_vreg
.globl _io_vraw
.globl _io_vram
.globl _io_fpu
.globl _v_regs
.globl _v_odtab
.globl _v_actab
.globl _v_ct0
.globl _v_gt1
.globl _v_score
.globl _v_cgtab
.globl _v_curs0
.globl _v_curs1
.globl _v_curs2
.globl _v_curs3
.globl _v_curs4
.globl _v_curs5
.globl _v_curs6
.globl _v_curs7
.globl _v_tcur
.globl _v_kbobj
.globl _v_lnobj
.globl _v_win0
.globl _v_cur
.globl _fc_sw
.globl _fc_val
.globl _v_obtab
.globl _v_curob
.globl _v_nobj
.globl _v_obpri
.globl _ebflag
.globl _ebuf
.globl _curfet
.globl _cfetp
.globl _infetp
.globl _point
.globl _stcrow
.globl _stccol
.globl _cxval
.globl _cyval
.globl _curtun
.globl _tunmod
.globl _obj0
.globl _obj2
.globl _bfs
.globl _adbxlb
.globl _caname
.globl _adbox
.globl _admctl
.globl _adnamsw
.globl _asgfks
.globl _asghit
.globl _asgmod
.globl _auxctl
.globl _curasg
.globl _curmop
.globl _curvce
.globl _prgchan
.globl _ps_dpth
.globl _ps_intn
.globl _ps_rate
.globl _submenu
.globl _grpdyn
.globl _ins2grp
.globl _mctlnum
.globl _s_inst
.globl _vce2grp
.globl _grp2prt
.globl _key2grp
.globl _asgtab
.globl _asgob
.globl _adoct
.globl _gprep
.data
_gprep:
*line 115
.dc.l L1
*line 115
.dc.l L2
*line 115
.dc.l L3
*line 115
.dc.l L4
.globl _asgsrc
.data
_asgsrc:
*line 119
.dc.l L5
*line 120
.dc.l L6
*line 121
.dc.l L7
*line 122
.dc.l L8
*line 123
.dc.l L9
*line 125
.dc.l L10
.globl _asgkble
.data
_asgkble:
.dc.w $1
.dc.w $6
.dc.w $B
.dc.w $11
.dc.w $16
.dc.w $1B
.dc.w $20
.dc.w $25
.dc.w $2B
.dc.w $30
.dc.w $35
.dc.w $3A
.dc.w $3F
.dc.w $44
.dc.w $49
.dc.w $4F
.dc.w $54
.dc.w $59
.dc.w $5E
.dc.w $63
.dc.w $69
.dc.w $6E
.dc.w $73
.dc.w $78
.dc.w $7D
.dc.w $82
.dc.w $87
.dc.w $8D
.dc.w $92
.dc.w $97
.dc.w $9C
.dc.w $A1
.dc.w $A7
.dc.w $AC
.dc.w $B1
.dc.w $B6
.dc.w $BB
.dc.w $C0
.dc.w $C5
.dc.w $CB
.dc.w $D0
.dc.w $D5
.dc.w $DA
.dc.w $DF
.dc.w $E5
.dc.w $EA
.dc.w $EF
.dc.w $F4
.dc.w $F9
.dc.w $FE
.dc.w $103
.dc.w $109
.dc.w $10E
.dc.w $113
.dc.w $118
.dc.w $11D
.dc.w $123
.dc.w $128
.dc.w $12D
.dc.w $132
.dc.w $137
.dc.w $13C
.dc.w $141
.dc.w $147
.dc.w $14C
.dc.w $151
.dc.w $156
.dc.w $15B
.dc.w $161
.dc.w $166
.dc.w $16B
.dc.w $170
.dc.w $175
.dc.w $17A
.dc.w $17F
.dc.w $185
.dc.w $18A
.dc.w $18F
.dc.w $194
.dc.w $199
.dc.w $19F
.dc.w $1A4
.dc.w $1A9
.dc.w $1AE
.dc.w $1B3
.dc.w $1B8
.dc.w $1BD
.dc.w $1C3
.globl _asgkbtp
.data
_asgkbtp:
.dc.w $FFF0
.dc.w $FF
.dc.w $F000
.dc.w $FFFF
.dc.w $FFF0
.dc.w $FF
.dc.w $F000
.dc.w $FFFF
.dc.w $0
.dc.w $FFF0
.dc.w $F0FF
.dc.w $FFFF
.dc.w $0
.dc.w $FFF0
.dc.w $FF
.dc.w $F000
.dc.w $FFFF
.dc.w $0
.dc.w $FFF0
.dc.w $F0FF
.dc.w $FFFF
.dc.w $0
.dc.w $FFF0
.dc.w $FF
.dc.w $F000
.dc.w $FFFF
.dc.w $FFF0
.dc.w $FF
.dc.w $F000
.dc.w $FFFF
.dc.w $0
.dc.w $FFF0
.dc.w $FF
.dc.w $F000
.dc.w $FFFF
.dc.w $FFF0
.dc.w $FF
.dc.w $F000
.dc.w $FFFF
.dc.w $0
.dc.w $FFF0
.dc.w $F0FF
.dc.w $FFFF
.dc.w $0
.dc.w $FFF0
.dc.w $FF
.dc.w $F000
.dc.w $FFFF
.dc.w $0
.dc.w $FFF0
.dc.w $F0FF
.dc.w $FFFF
.dc.w $0
.dc.w $FFF0
.dc.w $FF
.dc.w $F000
.dc.w $FFFF
.dc.w $FFF0
.dc.w $FF
.dc.w $F000
.dc.w $FFFF
.dc.w $0
.dc.w $FFF0
.dc.w $FF
.dc.w $F000
.dc.w $FFFF
.dc.w $FFF0
.dc.w $FF
.dc.w $F000
.dc.w $FFFF
.dc.w $0
.dc.w $FFF0
.dc.w $F0FF
.dc.w $FFFF
.dc.w $0
.dc.w $FFF0
.dc.w $FF
.dc.w $F000
.dc.w $FFFF
.dc.w $0
.dc.w $FFF0
.dc.w $F0FF
.dc.w $FFFF
.dc.w $0
.dc.w $FFF0
.dc.w $FF
.dc.w $F000
.dc.w $FFFF
.dc.w $FFF0
.dc.w $FF
.dc.w $F000
.dc.w $FFFF
.dc.w $0
.dc.w $FFF0
.dc.w $FF
.dc.w $F000
.dc.w $FFFF
.dc.w $FFF0
.dc.w $FF
.dc.w $F000
.dc.w $FFFF
.dc.w $0
.dc.w $FFF0
.dc.w $F0FF
.dc.w $FFFF
.dc.w $0
.dc.w $FFF0
.dc.w $FF
.dc.w $F000
.dc.w $FFFF
.dc.w $0
.dc.w $FFF0
.dc.w $F0FF
.dc.w $FFFF
.dc.w $FFF
.globl _asgkbbt
.data
_asgkbbt:
.dc.w $FFF0
.dc.w $FFFF
.dc.w $FFF0
.dc.w $FFFF
.dc.w $FFF0
.dc.w $FFFF
.dc.w $FFF0
.dc.w $FFFF
.dc.w $FF0F
.dc.w $FFFF
.dc.w $F0FF
.dc.w $FFFF
.dc.w $FFF
.dc.w $FFFF
.dc.w $FFFF
.dc.w $FFF0
.dc.w $FFFF
.dc.w $FF0F
.dc.w $FFFF
.dc.w $F0FF
.dc.w $FFFF
.dc.w $FFF
.dc.w $FFFF
.dc.w $FFF
.dc.w $FFFF
.dc.w $FFFF
.dc.w $FFF0
.dc.w $FFFF
.dc.w $FF0F
.dc.w $FFFF
.dc.w $F0FF
.dc.w $FFFF
.dc.w $FFF
.dc.w $FFFF
.dc.w $FFFF
.dc.w $FFF0
.dc.w $FFFF
.dc.w $FF0F
.dc.w $FFFF
.dc.w $FF0F
.dc.w $FFFF
.dc.w $F0FF
.dc.w $FFFF
.dc.w $FFF
.dc.w $FFFF
.dc.w $FFFF
.dc.w $FFF0
.dc.w $FFFF
.dc.w $FF0F
.dc.w $FFFF
.dc.w $F0FF
.dc.w $FFFF
.dc.w $FFF
.dc.w $FFFF
.dc.w $FFF
.dc.w $FFFF
.dc.w $FFFF
.dc.w $FFF0
.dc.w $FFFF
.dc.w $FF0F
.dc.w $FFFF
.dc.w $F0FF
.dc.w $FFFF
.dc.w $FFF
.dc.w $FFFF
.dc.w $FFFF
.dc.w $FFF0
.dc.w $FFFF
.dc.w $FF0F
.dc.w $FFFF
.dc.w $FF0F
.dc.w $FFFF
.dc.w $F0FF
.dc.w $FFFF
.dc.w $FFF
.dc.w $FFFF
.dc.w $FFFF
.dc.w $FFF0
.dc.w $FFFF
.dc.w $FF0F
.dc.w $FFFF
.dc.w $F0FF
.dc.w $FFFF
.dc.w $FFF
.dc.w $FFFF
.dc.w $FFF
.dc.w $FFFF
.dc.w $FFFF
.dc.w $FFF0
.dc.w $FFFF
.dc.w $FF0F
.dc.w $FFFF
.dc.w $F0FF
.dc.w $FFFF
.dc.w $FFF
.dc.w $FFFF
.dc.w $FFFF
.dc.w $FFF0
.dc.w $FFFF
.dc.w $FF0F
.dc.w $FFFF
.dc.w $FF0F
.dc.w $FFFF
.dc.w $F0FF
.dc.w $FFFF
.dc.w $FFF
.dc.w $FFFF
.dc.w $FFFF
.dc.w $FFF0
.dc.w $FFFF
.dc.w $FF0F
.dc.w $FFFF
.dc.w $F0FF
.dc.w $FFFF
.dc.w $FFF
.globl _asgpal
.data
_asgpal:
.dc.w $0
.dc.w $0
.dc.w $0
.dc.w $3
.dc.w $3
.dc.w $3
.dc.w $0
.dc.w $0
.dc.w $2
.dc.w $1
.dc.w $0
.dc.w $1
.dc.w $0
.dc.w $1
.dc.w $2
.dc.w $0
.dc.w $1
.dc.w $1
.dc.w $1
.dc.w $1
.dc.w $2
.dc.w $0
.dc.w $0
.dc.w $1
.dc.w $2
.dc.w $2
.dc.w $2
.dc.w $0
.dc.w $0
.dc.w $0
.dc.w $2
.dc.w $2
.dc.w $2
.dc.w $2
.dc.w $3
.dc.w $3
.dc.w $3
.dc.w $3
.dc.w $0
.dc.w $3
.dc.w $0
.dc.w $0
.dc.w $0
.dc.w $0
.dc.w $0
.dc.w $0
.dc.w $2
.dc.w $3
.globl _dyntab
.data
_dyntab:
.dc.w $0
.dc.w $F00
.dc.w $1680
.dc.w $1F40
.dc.w $2800
.dc.w $3200
.dc.w $3E80
.dc.w $4EC0
.dc.w $62C0
.dc.w $7D00
.globl _advacur
.text
_advacur:
~~advacur:
link R14,#0
movem.l R6-R7,-(sp)
~newcol=R7
*line 281
*line 282
move.l _curfet,(sp)
move _stccol,-(sp)
move _stcrow,-(sp)
jsr _infield
addq.l #4,sp
tst R0
beq L12
*line 282
move.l _infetp,_cfetp
*line 283
bra L13
L12:bra L11
L13:
*line 286
move _stccol,R7
add #1,R7
*line 288
*line 289
move.l _cfetp,R8
cmp 4(R8),R7
bgt L14
*line 289
move R7,(sp)
move _stcrow,-(sp)
jsr _itcpos
addq.l #2,sp
*line 290
L14:
*line 291
move _stccol,R0
asl #3,R0
move R0,_cxval
*line 292
move _stcrow,R0
muls #14,R0
move R0,_cyval
L11:tst.l (sp)+
movem.l (sp)+,R7-R7
unlk R14
rts
.globl _bspacur
.text
_bspacur:
~~bspacur:
link R14,#0
movem.l R6-R7,-(sp)
~newcol=R7
*line 305
*line 306
move.l _curfet,(sp)
move _stccol,-(sp)
move _stcrow,-(sp)
jsr _infield
addq.l #4,sp
tst R0
beq L16
*line 306
move.l _infetp,_cfetp
*line 307
bra L17
L16:bra L15
L17:
*line 310
move _stccol,R7
sub #1,R7
*line 312
*line 313
move.l _cfetp,R8
cmp 2(R8),R7
blt L18
*line 313
move R7,(sp)
move _stcrow,-(sp)
jsr _itcpos
addq.l #2,sp
*line 314
L18:
*line 315
move _stccol,R0
asl #3,R0
move R0,_cxval
*line 316
move _stcrow,R0
muls #14,R0
move R0,_cyval
L15:tst.l (sp)+
movem.l (sp)+,R7-R7
unlk R14
rts
.globl _keycpyw
.text
_keycpyw:
~~keycpyw:
~dest=R13
~src=R12
~len=R7
~wk=18
~bk=20
link R14,#0
movem.l R2-R7/R12-R13,-(sp)
~wkey=R6
~bkey=R5
~theword=R4
~i=R3
*line 336
move.l 8(R14),R13
*line 336
move.l 12(R14),R12
*line 336
move 16(R14),R7
*line 336
move 18(R14),(sp)
jsr _exp_c
move R0,R6
*line 337
move 20(R14),(sp)
jsr _exp_c
move R0,R5
*line 339
clr R3
bra L22
L23:
*line 340
*line 341
move (R12)+,R4
*line 342
clr R0
move R4,R0
and R6,R0
clr R1
move R5,R1
clr R2
move R4,R2
not R2
and R2,R1
or R1,R0
move R0,(R13)+
L21:
*line 339
add #1,R3
L22:
*line 339
cmp R7,R3
blt L23
L20:L19:tst.l (sp)+
movem.l (sp)+,R3-R7/R12-R13
unlk R14
rts
.globl _asgkb
.text
_asgkb:
~~asgkb:
link R14,#0
movem.l R4-R7/R13-R13,-(sp)
~p=R13
~akline=R7
~i=R6
~j=R5
*line 361
move #14,(sp)
jsr _exp_c
move R0,R7
*line 362
move.l _asgob,R13
add.l #$9a0c,R13
*line 364
clr R5
bra L27
L28:
*line 365
*line 366
move #115,(sp)
move R7,-(sp)
move.l R13,-(sp)
jsr _memsetw
addq.l #6,sp
*line 367
add.l #$100,R13
*line 368
*line 369
clr R6
bra L31
L32:
*line 370
*line 371
move #7,(sp)
move #6,-(sp)
move #115,-(sp)
move.l #_asgkbtp,-(sp)
move.l R13,-(sp)
jsr _keycpyw
adda.l #12,sp
*line 372
add.l #$100,R13
L30:
*line 369
add #1,R6
L31:
*line 369
cmp #13,R6
blt L32
L29:
*line 373
L26:
*line 364
add #1,R5
L27:
*line 364
cmp #12,R5
blt L28
L25:
*line 376
move #115,(sp)
move R7,-(sp)
move.l R13,-(sp)
jsr _memsetw
addq.l #6,sp
*line 377
add.l #$100,R13
*line 379
clr R6
bra L35
L36:
*line 380
*line 381
move #9,(sp)
move #8,-(sp)
move #115,-(sp)
move.l #_asgkbtp,-(sp)
move.l R13,-(sp)
jsr _keycpyw
adda.l #12,sp
*line 382
add.l #$100,R13
L34:
*line 379
add #1,R6
L35:
*line 379
cmp #14,R6
blt L36
L33:
*line 385
clr R6
bra L39
L40:
*line 386
*line 387
move #9,(sp)
move #8,-(sp)
move #115,-(sp)
move.l #_asgkbbt,-(sp)
move.l R13,-(sp)
jsr _keycpyw
adda.l #12,sp
*line 388
add.l #$100,R13
L38:
*line 385
add #1,R6
L39:
*line 385
cmp #11,R6
blt L40
L37:
*line 391
move #115,(sp)
move R7,-(sp)
move.l R13,-(sp)
jsr _memsetw
addq.l #6,sp
L24:tst.l (sp)+
movem.l (sp)+,R5-R7/R13-R13
unlk R14
rts
.globl _drawk2g
.text
_drawk2g:
~~drawk2g:
~grp=R7
link R14,#0
movem.l R2-R7/R12-R13,-(sp)
~i=R6
~n=R5
~key=R4
~line=R3
~bfsp=R13
~lp=R12
*line 413
move 8(R14),R7
*line 413
move #7,R5
*line 415
move R7,R3
muls #14,R3
add #158,R3
*line 416
move R3,R0
ext.l R0
asl.l #$7,R0
asl.l #1,R0
move.l R0,R12
add.l _asgob,R12
add.l #$c,R12
*line 418
clr R6
bra L44
L45:
*line 419
*line 420
move #7,(sp)
move #6,-(sp)
move #115,-(sp)
move.l #_asgkbtp,-(sp)
move.l R12,-(sp)
jsr _keycpyw
adda.l #12,sp
*line 421
add.l #$100,R12
L43:
*line 418
add #1,R6
L44:
*line 418
cmp #4,R6
blt L45
L42:
*line 424
*line 424
move R7,R8
add.l R8,R8
add.l R8,R8
add.l #_grp2prt,R8
cmp #1,(R8)
bne L46
*line 425
*line 426
clr R4
bra L49
L50:
*line 427
*line 428
move R4,R8
add.l R8,R8
move.l #_key2grp,R9
move 0(R8,R9.l),R0
move #1,R1
move R7,R2
asl R2,R1
and R1,R0
beq L51
*line 429
*line 430
move #15,(sp)
jsr _exp_c
move R0,(sp)
move R3,-(sp)
add #3,(sp)
move R4,R8
add.l R8,R8
move.l #_asgkble,R9
move 0(R8,R9.l),-(sp)
cmp #87,R4
bne L10000
move #31,R0
bra L10002
L10000:move #28,R0
L10002:add R0,(sp)
move R3,-(sp)
move R4,R8
add.l R8,R8
move.l #_asgkble,R9
move 0(R8,R9.l),-(sp)
add #24,(sp)
move #128,-(sp)
move.l _asgob,-(sp)
jsr _vbfill4
adda.l #14,sp
*line 431
L51:L48:
*line 426
add #1,R4
L49:
*line 426
cmp #88,R4
blt L50
L47:
*line 432
cmp #8,R7
ble L10003
move R7,(sp)
add #163,(sp)
bra L10005
L10003:move R7,(sp)
add #49,(sp)
L10005:move.l #L52,-(sp)
move.l #_bfs,-(sp)
jsr _sprintf
addq.l #8,sp
*line 433
move.l #_bfs,R13
*line 434
bra L53
L46:
*line 435
*line 436
*line 437
move.l #L54,R13
L53:
*line 440
*line 441
move #14,(sp)
move.l R13,-(sp)
move R5,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
move R7,-(sp)
move R5,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),R0
add R0,(sp)
add #1,(sp)
move R5,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 10(R8,R9.l),-(sp)
move R5,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _vcputsv
adda.l #18,sp
*line 443
*line 444
move #14,(sp)
move.l R13,-(sp)
move R5,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
add #61,(sp)
move R7,-(sp)
move R5,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),R0
add R0,(sp)
add #1,(sp)
move R5,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 10(R8,R9.l),-(sp)
move R5,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _vcputsv
adda.l #18,sp
L41:tst.l (sp)+
movem.l (sp)+,R3-R7/R12-R13
unlk R14
rts
.globl _adpoint
.text
_adpoint:
~~adpoint:
~x=8
~y=10
~pen=12
link R14,#-4
*line 459
*line 460
clr R0
move 10+_v_regs,R0
and #384,R0
beq L56
*line 460
clr (sp)
jsr _vbank
*line 461
L56:
*line 462
move 12(R14),(sp)
jsr _exp_c
move R0,(sp)
move 10(R14),-(sp)
move 8(R14),-(sp)
move.l _adoct,-(sp)
jsr _vputp
addq.l #8,sp
L55:unlk R14
rts
.globl _numblk
.text
_numblk:
~~numblk:
~buf=8
~n=12
link R14,#-4
*line 476
*line 476
cmp #-1,12(R14)
bne L58
*line 477
*line 478
move.l #L59,(sp)
move.l 8(R14),-(sp)
jsr _strcpy
addq.l #4,sp
*line 479
move.l 8(R14),R0
bra L57
*line 480
bra L60
L58:
*line 481
*line 482
*line 483
move 12(R14),(sp)
move.l #L61,-(sp)
move.l 8(R14),-(sp)
jsr _sprintf
addq.l #8,sp
*line 484
move.l 8(R14),R0
bra L57
L60:L57:unlk R14
rts
.globl _adswin
.text
_adswin:
~~adswin:
~n=R7
link R14,#-8
movem.l R4-R7/R13-R13,-(sp)
~cx=R6
~i=R5
~bfsp=R13
~buf1=-4
~buf2=-8
*line 504
move 8(R14),R7
*line 504
*line 505
cmp #7,R7
bne L10006
cmp #-1,_admctl
bne L62
L10006:*line 506
*line 507
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 10(R8,R9.l),(sp)
jsr _exp_c
move R0,R6
*line 508
move.l #_adpoint,_point
*line 512
clr (sp)
jsr _vbank
*line 513
*line 514
move R6,(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 6(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 4(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 2(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 0(R8,R9.l),-(sp)
move #128,-(sp)
move.l _asgob,-(sp)
jsr _vbfill4
adda.l #14,sp
*line 518
*line 519
move #14,(sp)
move R7,R8
add.l R8,R8
add.l R8,R8
move.l #_adbxlb,R9
move.l 0(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 523
move R7,R0
bra L64
*line 524
L65:
*line 525
*line 526
*line 527
move _curasg,(sp)
move.l #L66,-(sp)
move.l #_bfs,-(sp)
jsr _sprintf
addq.l #8,sp
*line 528
*line 529
move #14,(sp)
move.l #_bfs,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
add #8,(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),-(sp)
tst _asgmod
beq L10007
move #13,-(sp)
bra L10009
L10007:move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
L10009:move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 530
*line 531
move.l #_caname,(sp)
move.l #L67,-(sp)
move.l #_bfs,-(sp)
jsr _sprintf
addq.l #8,sp
*line 532
*line 533
move #14,(sp)
move.l #_bfs,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),-(sp)
add #1,(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 534
bra L62
*line 535
*line 536
L68:
*line 537
*line 538
*line 539
*line 540
move #14,(sp)
move _curmop,R8
add.l R8,R8
add.l R8,R8
move.l #_gprep,R9
move.l 0(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
add #9,(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 541
bra L62
*line 542
*line 543
L69:
*line 544
*line 545
*line 546
move _prgchan,(sp)
move.l #L70,-(sp)
move.l #_bfs,-(sp)
jsr _sprintf
addq.l #8,sp
*line 547
*line 548
move #14,(sp)
move.l #_bfs,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
add #8,(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 549
bra L62
*line 550
*line 551
*line 552
L71:
*line 553
*line 554
*line 555
*line 556
move #14,(sp)
move.l #L72,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),-(sp)
add #1,(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 557
*line 558
*line 559
move #14,(sp)
move.l #L73,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),-(sp)
add #2,(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 560
*line 561
*line 562
move #14,(sp)
move.l #L74,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),-(sp)
add #3,(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 563
*line 564
*line 565
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),(sp)
move #55,-(sp)
move #111,-(sp)
move #55,-(sp)
move #104,-(sp)
jsr _lseg
addq.l #8,sp
*line 566
*line 567
*line 568
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),(sp)
move #55,-(sp)
move #135,-(sp)
move #55,-(sp)
move #120,-(sp)
jsr _lseg
addq.l #8,sp
*line 569
*line 570
*line 571
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),(sp)
move #55,-(sp)
move #159,-(sp)
move #55,-(sp)
move #152,-(sp)
jsr _lseg
addq.l #8,sp
*line 572
*line 573
*line 574
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),(sp)
move #55,-(sp)
move #183,-(sp)
move #55,-(sp)
move #168,-(sp)
jsr _lseg
addq.l #8,sp
*line 575
*line 576
clr R5
bra L77
L78:
*line 577
*line 578
*line 579
move R5,R8
add.l R8,R8
move.l #_vce2grp,R9
move 0(R8,R9.l),(sp)
move.l R14,-(sp)
sub.l #4,(sp)
jsr _numblk
addq.l #4,sp
move.l R0,(sp)
move R5,-(sp)
add #49,(sp)
move.l #L79,-(sp)
move.l #_bfs,-(sp)
jsr _sprintf
adda.l #10,sp
*line 580
*line 581
*line 582
move #14,(sp)
move.l #_bfs,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
move R5,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),R0
add R0,(sp)
add #4,(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 583
*line 584
*line 585
move R5,R8
add #6,R8
add.l R8,R8
move.l #_vce2grp,R9
move 0(R8,R9.l),(sp)
move.l R14,-(sp)
sub.l #8,(sp)
jsr _numblk
addq.l #4,sp
move.l R0,(sp)
cmp #2,R5
ble L10010
move R5,-(sp)
add #169,(sp)
bra L10012
L10010:move R5,-(sp)
add #55,(sp)
L10012:move.l #L80,-(sp)
move.l #_bfs,-(sp)
jsr _sprintf
adda.l #10,sp
*line 586
*line 587
*line 588
move #14,(sp)
move.l #_bfs,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
add #6,(sp)
move R5,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),R0
add R0,(sp)
add #4,(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
L76:
*line 576
add #1,R5
L77:
*line 576
cmp #6,R5
blt L78
L75:
*line 589
*line 590
bra L62
*line 591
*line 592
*line 593
L81:
*line 594
*line 595
*line 596
*line 597
move #14,(sp)
move.l #L82,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),-(sp)
add #1,(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 598
*line 599
*line 600
move #14,(sp)
move.l #L83,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),-(sp)
add #2,(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 601
*line 602
*line 603
move #14,(sp)
move.l #L84,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),-(sp)
add #3,(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 604
*line 605
*line 606
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),(sp)
move #55,-(sp)
move #207,-(sp)
move #55,-(sp)
move #200,-(sp)
jsr _lseg
addq.l #8,sp
*line 607
*line 608
*line 609
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),(sp)
move #55,-(sp)
move #271,-(sp)
move #55,-(sp)
move #216,-(sp)
jsr _lseg
addq.l #8,sp
*line 610
*line 611
*line 612
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),(sp)
move #55,-(sp)
move #295,-(sp)
move #55,-(sp)
move #280,-(sp)
jsr _lseg
addq.l #8,sp
*line 613
*line 614
clr R5
bra L87
L88:
*line 615
*line 616
move #14,(sp)
move R5,R8
add.l R8,R8
add.l R8,R8
move.l #_asgsrc,R9
move.l 0(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
move R5,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),R0
add R0,(sp)
add #4,(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
L86:
*line 614
add #1,R5
L87:
*line 614
cmp #6,R5
blt L88
L85:
*line 616
*line 617
*line 618
clr R5
bra L91
L92:
*line 619
*line 620
move R5,R8
add.l R8,R8
move.l #_mctlnum,R9
move 0(R8,R9.l),(sp)
and #255,(sp)
move.l R14,-(sp)
sub.l #4,(sp)
jsr _numblk
addq.l #4,sp
move.l R0,(sp)
move.l #L93,-(sp)
move.l #_bfs,-(sp)
jsr _sprintf
addq.l #8,sp
*line 621
*line 622
*line 623
move #14,(sp)
move.l #_bfs,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
add #10,(sp)
move R5,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),R0
add R0,(sp)
add #5,(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 624
*line 625
*line 625
move R5,R8
add.l R8,R8
add.l #_mctlnum,R8
cmp #-1,(R8)
beq L94
move R5,R8
add.l R8,R8
add.l #_mctlnum,R8
btst #0,(R8)
beq L94
*line 626
*line 627
move R5,R0
add #50,R0
move.b R0,_bfs
*line 628
clr.b 1+_bfs
*line 629
*line 630
*line 631
move #14,(sp)
move.l #_bfs,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
move R5,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),R0
add R0,(sp)
add #5,(sp)
move #13,-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 632
L94:L90:
*line 618
add #1,R5
L91:
*line 618
cmp #4,R5
blt L92
L89:
*line 633
*line 634
bra L62
*line 635
*line 636
*line 637
L95:
*line 638
*line 639
*line 640
*line 641
move #14,(sp)
move.l #L96,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),-(sp)
add #1,(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 642
*line 643
*line 644
move #14,(sp)
move.l #L97,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),-(sp)
add #2,(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 645
*line 646
*line 647
move #14,(sp)
move.l #L98,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),-(sp)
add #3,(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 648
*line 649
*line 650
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),(sp)
move #55,-(sp)
move #319,-(sp)
move #55,-(sp)
move #312,-(sp)
jsr _lseg
addq.l #8,sp
*line 651
*line 652
*line 653
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),(sp)
move #55,-(sp)
move #343,-(sp)
move #55,-(sp)
move #328,-(sp)
jsr _lseg
addq.l #8,sp
*line 654
*line 655
*line 656
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),(sp)
move #55,-(sp)
move #359,-(sp)
move #55,-(sp)
move #352,-(sp)
jsr _lseg
addq.l #8,sp
*line 657
*line 658
*line 659
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),(sp)
move #55,-(sp)
move #375,-(sp)
move #55,-(sp)
move #368,-(sp)
jsr _lseg
addq.l #8,sp
*line 660
*line 661
*line 662
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),(sp)
move #55,-(sp)
move #399,-(sp)
move #55,-(sp)
move #384,-(sp)
jsr _lseg
addq.l #8,sp
*line 663
*line 664
*line 665
*line 666
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),(sp)
move #55,-(sp)
move #423,-(sp)
move #55,-(sp)
move #416,-(sp)
jsr _lseg
addq.l #8,sp
*line 667
*line 668
*line 669
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),(sp)
move #55,-(sp)
move #447,-(sp)
move #55,-(sp)
move #432,-(sp)
jsr _lseg
addq.l #8,sp
*line 670
*line 671
*line 672
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),(sp)
move #55,-(sp)
move #463,-(sp)
move #55,-(sp)
move #456,-(sp)
jsr _lseg
addq.l #8,sp
*line 673
*line 674
*line 675
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),(sp)
move #55,-(sp)
move #479,-(sp)
move #55,-(sp)
move #472,-(sp)
jsr _lseg
addq.l #8,sp
*line 676
*line 677
*line 678
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),(sp)
move #55,-(sp)
move #503,-(sp)
move #55,-(sp)
move #488,-(sp)
jsr _lseg
addq.l #8,sp
*line 679
*line 680
*line 681
*line 682
clr R5
bra L101
L102:
*line 683
*line 684
*line 685
*line 686
*line 687
*line 688
*line 689
*line 690
*line 691
*line 692
*line 693
*line 694
move R5,R8
add #6,R8
add.l R8,R8
add.l R8,R8
move.l #_grp2prt,R9
move 2(R8,R9.l),(sp)
move.l R14,-(sp)
sub.l #8,(sp)
jsr _numblk
addq.l #4,sp
move.l R0,(sp)
move R5,R8
add #6,R8
add.l R8,R8
add.l R8,R8
move.l #_grp2prt,R9
move 0(R8,R9.l),R8
add.l R8,R8
add.l R8,R8
move.l #_gprep,R9
move.l 0(R8,R9.l),-(sp)
move R5,R8
add #6,R8
add.l R8,R8
move.l #_grpdyn,R9
move 0(R8,R9.l),-(sp)
move R5,R8
add #6,R8
add.l R8,R8
move.l #_ins2grp,R9
move 0(R8,R9.l),-(sp)
and #255,(sp)
cmp #2,R5
ble L10013
move R5,-(sp)
add #169,(sp)
bra L10015
L10013:move R5,-(sp)
add #55,(sp)
L10015:move R5,R8
add.l R8,R8
add.l R8,R8
move.l #_grp2prt,R9
move 2(R8,R9.l),-(sp)
move.l R14,-(sp)
sub.l #4,(sp)
jsr _numblk
addq.l #6,sp
move.l R0,-(sp)
move R5,R8
add.l R8,R8
add.l R8,R8
move.l #_grp2prt,R9
move 0(R8,R9.l),R8
add.l R8,R8
add.l R8,R8
move.l #_gprep,R9
move.l 0(R8,R9.l),-(sp)
move R5,R8
add.l R8,R8
move.l #_grpdyn,R9
move 0(R8,R9.l),-(sp)
move R5,R8
add.l R8,R8
move.l #_ins2grp,R9
move 0(R8,R9.l),-(sp)
and #255,(sp)
move R5,-(sp)
add #49,(sp)
move.l #L103,-(sp)
move.l #_bfs,-(sp)
jsr _sprintf
adda.l #32,sp
*line 695
*line 696
*line 697
move #14,(sp)
move.l #_bfs,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
move R5,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),R0
add R0,(sp)
add #4,(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 698
*line 699
*line 699
move R5,R8
add.l R8,R8
add.l #_ins2grp,R8
btst #0,(R8)
beq L104
*line 700
*line 701
clr.b 1+_bfs
*line 702
*line 703
*line 704
move #14,(sp)
move.l #_bfs,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
move R5,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),R0
add R0,(sp)
add #4,(sp)
move #13,-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 705
*line 706
L104:
*line 707
*line 707
move R5,R8
add #6,R8
add.l R8,R8
add.l #_ins2grp,R8
btst #0,(R8)
beq L105
*line 708
*line 709
clr.b 14+_bfs
*line 710
*line 711
*line 712
move #14,(sp)
move.l #13+_bfs,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
add #13,(sp)
move R5,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),R0
add R0,(sp)
add #4,(sp)
move #13,-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 713
L105:L100:
*line 682
add #1,R5
L101:
*line 682
cmp #6,R5
blt L102
L99:
*line 714
*line 715
bra L62
*line 716
*line 717
*line 718
L106:
*line 719
*line 720
*line 721
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),(sp)
jsr _exp_c
move R0,(sp)
move #153,-(sp)
move #15,-(sp)
move #153,-(sp)
move #8,-(sp)
jsr _lseg
addq.l #8,sp
*line 722
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),(sp)
jsr _exp_c
move R0,(sp)
move #153,-(sp)
move #503,-(sp)
move #153,-(sp)
move #496,-(sp)
jsr _lseg
addq.l #8,sp
*line 723
*line 724
jsr _asgkb
*line 725
*line 726
clr R5
bra L109
L110:
*line 727
move R5,(sp)
jsr _drawk2g
L108:
*line 726
add #1,R5
L109:
*line 726
cmp #12,R5
blt L110
L107:
*line 727
*line 728
bra L62
*line 729
*line 730
L111:
*line 731
*line 732
*line 733
*line 734
move #14,(sp)
move.l #L112,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),-(sp)
tst _auxctl
beq L10016
move #13,-(sp)
bra L10018
L10016:move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
L10018:move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 735
bra L62
*line 736
*line 737
L113:
*line 738
*line 739
*line 740
*line 741
move #14,(sp)
move.l #L114,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 742
*line 743
move _curtun,(sp)
move.l #L115,-(sp)
move.l #_bfs,-(sp)
jsr _sprintf
addq.l #8,sp
*line 744
*line 745
move #14,(sp)
move.l #_bfs,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
add #4,(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),-(sp)
tst _tunmod
beq L10019
move #13,-(sp)
bra L10021
L10019:move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
L10021:move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 746
bra L62
*line 747
*line 748
L116:
*line 749
*line 750
*line 751
move _ps_intn,(sp)
move.l #L117,-(sp)
move.l #_bfs,-(sp)
jsr _sprintf
addq.l #8,sp
*line 752
*line 753
move #14,(sp)
move.l #_bfs,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),-(sp)
add #1,(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 754
*line 755
move _ps_rate,(sp)
move.l #L118,-(sp)
move.l #_bfs,-(sp)
jsr _sprintf
addq.l #8,sp
*line 756
*line 757
move #14,(sp)
move.l #_bfs,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),-(sp)
add #2,(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 758
*line 759
move _ps_dpth,(sp)
move.l #L119,-(sp)
move.l #_bfs,-(sp)
jsr _sprintf
addq.l #8,sp
*line 760
*line 761
move #14,(sp)
move.l #_bfs,-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 14(R8,R9.l),-(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 12(R8,R9.l),-(sp)
add #3,(sp)
move R7,R0
asl #4,R0
ext.l R0
move.l R0,R8
move.l #_adbox,R9
move 8(R8,R9.l),-(sp)
move #64,-(sp)
move.l _asgob,-(sp)
jsr _tsplot4
adda.l #16,sp
*line 762
bra L62
*line 763
bra L63
L64:cmp #10,R0
bhi L63
asl #2,R0
move R0,R8
add.l #L120,R8
move.l (R8),R8
jmp (R8)
.data
L120:.dc.l L65
.dc.l L63
.dc.l L68
.dc.l L69
.dc.l L71
.dc.l L81
.dc.l L95
.dc.l L106
.dc.l L111
.dc.l L113
.dc.l L116
.text
L63:L62:tst.l (sp)+
movem.l (sp)+,R5-R7/R13-R13
unlk R14
rts
.globl _initat
.text
_initat:
~~initat:
~n=8
link R14,#0
movem.l R6-R7/R13-R13,-(sp)
~ap=R13
~i=R7
*line 782
move 8(R14),R0
muls #332,R0
move.l R0,R13
add.l #_asgtab,R13
*line 783
clr (R13)
*line 784
clr 2(R13)
*line 785
clr 4(R13)
*line 786
move #70,6(R13)
*line 787
clr 8(R13)
*line 788
move #70,10(R13)
*line 790
clr R7
bra L124
L125:
*line 791
*line 792
move.l R13,R8
move R7,R9
add.l R9,R9
add.l R9,R8
clr 12(R8)
*line 793
move.l R13,R8
move R7,R9
add.l R9,R9
add.l R9,R8
move #9,36(R8)
L123:
*line 790
add #1,R7
L124:
*line 790
cmp #12,R7
blt L125
L122:
*line 796
clr R7
bra L128
L129:
*line 797
move.l R13,R8
move R7,R9
add.l R9,R9
add.l R9,R8
move #1,60(R8)
L127:
*line 796
add #1,R7
L128:
*line 796
cmp #8,R7
blt L129
L126:
*line 799
move #8,R7
bra L132
L133:
*line 800
move.l R13,R8
move R7,R9
add.l R9,R9
add.l R9,R8
move #2,60(R8)
L131:
*line 799
add #1,R7
L132:
*line 799
cmp #12,R7
blt L133
L130:
*line 802
move #1,84(R13)
*line 803
move #2,86(R13)
*line 804
move #80,88(R13)
*line 805
move #4,90(R13)
*line 807
move #1,92(R13)
*line 808
move #1,94(R13)
*line 809
move #3,96(R13)
*line 810
move #1,98(R13)
*line 812
move #2,R7
bra L136
L137:
*line 813
*line 814
move.l R13,R8
move R7,R9
add.l R9,R9
add.l R9,R9
add.l R9,R8
clr 92(R8)
*line 815
move.l R13,R8
move R7,R9
add.l R9,R9
add.l R9,R9
add.l R9,R8
move #-1,94(R8)
L135:
*line 812
add #1,R7
L136:
*line 812
cmp #12,R7
blt L137
L134:
*line 818
move #88,(sp)
move #1,-(sp)
move.l R13,-(sp)
add.l #140,(sp)
jsr _memsetw
addq.l #6,sp
*line 820
move #16,(sp)
tst 8(R14)
beq L10022
move.l #L138,-(sp)
bra L10024
L10022:move.l #L139,-(sp)
L10024:move.l R13,-(sp)
add.l #316,(sp)
jsr _memcpy
addq.l #8,sp
L121:tst.l (sp)+
movem.l (sp)+,R7-R7/R13-R13
unlk R14
rts
.globl _setaux
.text
_setaux:
~~setaux:
~aux=R7
link R14,#0
movem.l R5-R7/R13-R13,-(sp)
~psgdata=R6
~psg=R13
*line 838
move 8(R14),R7
*line 838
move R7,_auxctl
*line 839
move.l #_io_tone,R13
*line 841
move.b #7,(R13)
*line 842
move.b #191,2(R13)
*line 844
move.b #15,(R13)
*line 845
move.b (R13),R6
ext.w R6
and #-3,R6
*line 847
move.b #15,(R13)
*line 848
move R6,R0
tst R7
beq L10025
clr R1
bra L10027
L10025:move #2,R1
L10027:or R1,R0
move.b R0,2(R13)
L140:tst.l (sp)+
movem.l (sp)+,R6-R7/R13-R13
unlk R14
rts
.globl _getasg
.text
_getasg:
~~getasg:
~n=8
link R14,#0
movem.l R4-R7/R13-R13,-(sp)
~ap=R13
~i=R7
~grp=R6
~vce=R5
*line 866
move 8(R14),R0
muls #332,R0
move.l R0,R13
add.l #_asgtab,R13
*line 867
move (R13),_curmop
*line 868
move 2(R13),(sp)
jsr _gettun
*line 869
move 4(R13),(sp)
jsr _setaux
*line 870
move 6(R13),_ps_intn
*line 871
move 8(R13),_ps_rate
*line 872
move 10(R13),_ps_dpth
*line 873
move #12,(sp)
move.l R13,-(sp)
add.l #12,(sp)
move.l #_ins2grp,-(sp)
jsr _memcpyw
addq.l #8,sp
*line 874
move #12,(sp)
move.l R13,-(sp)
add.l #36,(sp)
move.l #_grpdyn,-(sp)
jsr _memcpyw
addq.l #8,sp
*line 875
move #12,(sp)
move.l R13,-(sp)
add.l #60,(sp)
move.l #_vce2grp,-(sp)
jsr _memcpyw
addq.l #8,sp
*line 876
move #4,(sp)
move.l R13,-(sp)
add.l #84,(sp)
move.l #_mctlnum,-(sp)
jsr _memcpyw
addq.l #8,sp
*line 877
move #24,(sp)
move.l R13,-(sp)
add.l #92,(sp)
move.l #_grp2prt,-(sp)
jsr _memcpyw
addq.l #8,sp
*line 878
move #88,(sp)
move.l R13,-(sp)
add.l #140,(sp)
move.l #_key2grp,-(sp)
jsr _memcpyw
addq.l #8,sp
*line 879
move #16,(sp)
move.l R13,-(sp)
add.l #316,(sp)
move.l #_caname,-(sp)
jsr _memcpy
addq.l #8,sp
*line 881
clr R7
bra L144
L145:
*line 882
*line 883
move R7,R8
add.l R8,R8
add.l R8,R8
add.l #_grp2prt,R8
cmp #4,(R8)
bne L146
*line 883
move R7,R8
add.l R8,R8
add.l R8,R8
add.l #_grp2prt,R8
move #3,(R8)
*line 884
L146:L143:
*line 881
add #1,R7
L144:
*line 881
cmp #12,R7
blt L145
L142:
*line 885
move _ps_intn,R0
muls #10,R0
asl #5,R0
move R0,(sp)
clr -(sp)
move #1,-(sp)
jsr _sendval
addq.l #4,sp
*line 886
move _ps_rate,R0
muls #10,R0
asl #5,R0
move R0,(sp)
clr -(sp)
move #2,-(sp)
jsr _sendval
addq.l #4,sp
*line 887
move _ps_dpth,R0
muls #10,R0
asl #5,R0
move R0,(sp)
clr -(sp)
move #3,-(sp)
jsr _sendval
addq.l #4,sp
*line 889
clr R5
bra L149
L150:
*line 890
*line 891
move R5,R8
add.l R8,R8
add.l #_vce2grp,R8
move (R8),R6
*line 892
*line 893
*line 893
cmp #-1,R6
beq L151
*line 894
*line 895
move R6,R8
sub #1,R8
add.l R8,R8
move.l #_ins2grp,R9
move 0(R8,R9.l),R0
and #255,R0
move R5,R9
add.l R9,R9
add.l #_s_inst,R9
move R0,(R9)
*line 896
move #1,(sp)
move R5,R8
add.l R8,R8
move.l #_s_inst,R9
move 0(R8,R9.l),-(sp)
move R5,-(sp)
jsr _execins
addq.l #4,sp
*line 897
move R6,R8
sub #1,R8
add.l R8,R8
move.l #_grpdyn,R9
move 0(R8,R9.l),R8
add.l R8,R8
move.l #_dyntab,R9
move 0(R8,R9.l),(sp)
move #8,-(sp)
move R5,-(sp)
jsr _sendval
addq.l #4,sp
*line 898
L151:L148:
*line 889
add #1,R5
L149:
*line 889
cmp #12,R5
blt L150
L147:
*line 901
move _curvce,(sp)
jsr _newvce
*line 902
clr _asgmod
L141:tst.l (sp)+
movem.l (sp)+,R5-R7/R13-R13
unlk R14
rts
.globl _putasg
.text
_putasg:
~~putasg:
~n=8
link R14,#0
movem.l R6-R7/R13-R13,-(sp)
~ap=R13
~i=R7
*line 920
clr R7
bra L155
L156:
*line 921
*line 922
move R7,R8
add.l R8,R8
add.l R8,R8
add.l #_grp2prt,R8
cmp #4,(R8)
bne L157
*line 922
move R7,R8
add.l R8,R8
add.l R8,R8
add.l #_grp2prt,R8
move #3,(R8)
*line 923
L157:L154:
*line 920
add #1,R7
L155:
*line 920
cmp #12,R7
blt L156
L153:
*line 924
move 8(R14),R0
muls #332,R0
move.l R0,R13
add.l #_asgtab,R13
*line 925
move _curmop,(R13)
*line 926
move _curtun,2(R13)
*line 927
move _auxctl,4(R13)
*line 928
move _ps_intn,6(R13)
*line 929
move _ps_rate,8(R13)
*line 930
move _ps_dpth,10(R13)
*line 931
move #12,(sp)
move.l #_ins2grp,-(sp)
move.l R13,-(sp)
add.l #12,(sp)
jsr _memcpyw
addq.l #8,sp
*line 932
move #12,(sp)
move.l #_grpdyn,-(sp)
move.l R13,-(sp)
add.l #36,(sp)
jsr _memcpyw
addq.l #8,sp
*line 933
move #12,(sp)
move.l #_vce2grp,-(sp)
move.l R13,-(sp)
add.l #60,(sp)
jsr _memcpyw
addq.l #8,sp
*line 934
move #4,(sp)
move.l #_mctlnum,-(sp)
move.l R13,-(sp)
add.l #84,(sp)
jsr _memcpyw
addq.l #8,sp
*line 935
move #24,(sp)
move.l #_grp2prt,-(sp)
move.l R13,-(sp)
add.l #92,(sp)
jsr _memcpyw
addq.l #8,sp
*line 936
move #88,(sp)
move.l #_key2grp,-(sp)
move.l R13,-(sp)
add.l #140,(sp)
jsr _memcpyw
addq.l #8,sp
*line 937
move #16,(sp)
move.l #_caname,-(sp)
move.l R13,-(sp)
add.l #316,(sp)
jsr _memcpy
addq.l #8,sp
*line 938
clr _asgmod
L152:tst.l (sp)+
movem.l (sp)+,R7-R7/R13-R13
unlk R14
rts
.globl _awins
.text
_awins:
~~awins:
link R14,#0
movem.l R6-R7,-(sp)
~i=R7
*line 954
clr R7
bra L161
L162:
*line 955
move R7,(sp)
jsr _adswin
L160:
*line 954
add #1,R7
L161:
*line 954
cmp #11,R7
blt L162
L159:L158:tst.l (sp)+
movem.l (sp)+,R7-R7
unlk R14
rts
.globl _inital
.text
_inital:
~~inital:
link R14,#0
movem.l R6-R7,-(sp)
~n=R7
*line 968
clr R7
bra L166
L167:
*line 969
move R7,(sp)
jsr _initat
L165:
*line 968
add #1,R7
L166:
*line 968
cmp #100,R7
blt L167
L164:
*line 971
clr (sp)
jsr _getasg
*line 972
move #1,_prgchan
L163:tst.l (sp)+
movem.l (sp)+,R7-R7
unlk R14
rts
.globl _adbord
.text
_adbord:
~~adbord:
link R14,#-4
*line 986
move.l #_adpoint,_point
*line 988
move #10,(sp)
clr -(sp)
move #511,-(sp)
clr -(sp)
clr -(sp)
jsr _lseg
addq.l #8,sp
*line 989
move #10,(sp)
move #349,-(sp)
move #511,-(sp)
clr -(sp)
move #511,-(sp)
jsr _lseg
addq.l #8,sp
*line 990
move #10,(sp)
move #349,-(sp)
clr -(sp)
move #349,-(sp)
move #511,-(sp)
jsr _lseg
addq.l #8,sp
*line 991
move #10,(sp)
clr -(sp)
clr -(sp)
move #349,-(sp)
clr -(sp)
jsr _lseg
addq.l #8,sp
*line 993
move #10,(sp)
move #41,-(sp)
move #95,-(sp)
move #41,-(sp)
clr -(sp)
jsr _lseg
addq.l #8,sp
*line 994
move #10,(sp)
move #55,-(sp)
move #95,-(sp)
move #55,-(sp)
clr -(sp)
jsr _lseg
addq.l #8,sp
*line 995
move #10,(sp)
move #69,-(sp)
move #95,-(sp)
move #69,-(sp)
clr -(sp)
jsr _lseg
addq.l #8,sp
*line 996
move #10,(sp)
move #83,-(sp)
move #95,-(sp)
move #83,-(sp)
clr -(sp)
jsr _lseg
addq.l #8,sp
*line 997
move #10,(sp)
move #139,-(sp)
move #511,-(sp)
move #139,-(sp)
clr -(sp)
jsr _lseg
addq.l #8,sp
*line 999
move #10,(sp)
move #83,-(sp)
move #39,-(sp)
move #69,-(sp)
move #39,-(sp)
jsr _lseg
addq.l #8,sp
*line 1000
move #10,(sp)
move #139,-(sp)
move #95,-(sp)
clr -(sp)
move #95,-(sp)
jsr _lseg
addq.l #8,sp
*line 1001
move #10,(sp)
move #139,-(sp)
move #191,-(sp)
clr -(sp)
move #191,-(sp)
jsr _lseg
addq.l #8,sp
*line 1002
move #10,(sp)
move #139,-(sp)
move #303,-(sp)
clr -(sp)
move #303,-(sp)
jsr _lseg
addq.l #8,sp
L168:unlk R14
rts
.globl _asgdsp
.text
_asgdsp:
~~asgdsp:
link R14,#-4
*line 1016
move.l #_v_score,_asgob
*line 1017
move.l #_v_curs0,_obj0
*line 1018
move.l #_v_tcur,_obj2
*line 1019
move.l #144+_v_obtab,_adoct
*line 1021
clr _adnamsw
*line 1022
clr _submenu
*line 1023
move #-1,_admctl
*line 1025
jsr _dswap
*line 1027
clr (sp)
jsr _vbank
*line 1028
move #32767,(sp)
clr -(sp)
move.l _asgob,-(sp)
jsr _memsetw
addq.l #6,sp
*line 1029
move #12033,(sp)
clr -(sp)
move.l _asgob,R0
add.l #$fffe,R0
move.l R0,-(sp)
jsr _memsetw
addq.l #6,sp
*line 1031
move #-1,(sp)
move #1536,-(sp)
clr -(sp)
clr -(sp)
move #350,-(sp)
move #512,-(sp)
move.l _asgob,-(sp)
clr -(sp)
clr -(sp)
move #8,-(sp)
jsr _SetObj
adda.l #20,sp
*line 1032
move #-1,(sp)
move #1540,-(sp)
clr -(sp)
move #72,-(sp)
move #16,-(sp)
move #16,-(sp)
move.l _obj0,-(sp)
move #1,-(sp)
clr -(sp)
clr -(sp)
jsr _SetObj
adda.l #20,sp
*line 1033
move #-1,(sp)
move #1572,-(sp)
clr -(sp)
clr -(sp)
move #16,-(sp)
move #16,-(sp)
move.l _obj2,-(sp)
move #1,-(sp)
clr -(sp)
move #2,-(sp)
jsr _SetObj
adda.l #20,sp
*line 1035
move #1,(sp)
jsr _arcurs
*line 1036
move #1,(sp)
jsr _itcini
*line 1037
move #1,(sp)
jsr _ttcini
*line 1039
jsr _adbord
*line 1040
jsr _awins
*line 1042
move #8,(sp)
move #8,-(sp)
jsr _SetPri
addq.l #2,sp
*line 1044
move #9,(sp)
clr -(sp)
jsr _settc
addq.l #2,sp
*line 1046
move.l #_asgpal,(sp)
jsr _vsndpal
L169:unlk R14
rts
.data
L1:.dc.b $20,$0
L2:.dc.b $31,$0
L3:.dc.b $32,$0
L4:.dc.b $4C,$0
L5:.dc.b $31,$20,$50,$63,$68,$2F,$48,$6F,$72,$0
L6:.dc.b $32,$20,$4D,$6F,$64,$2F,$56,$72,$74,$0
L7:.dc.b $33,$20,$42,$72,$74,$68,$2F,$4C,$50,$0
L8:.dc.b $34,$20,$47,$50,$43,$2F,$43,$56,$31,$0
L9:.dc.b $35,$20,$50,$65,$64,$61,$6C,$20,$31,$0
L10:.dc.b $36,$20,$4B,$65,$79,$20,$50,$72,$73,$0
L52:.dc.b $25,$63,$0
L54:.dc.b $20,$0
L59:.dc.b $20,$20,$0
L61:.dc.b $25,$30,$32,$2E,$32,$64,$0
L66:.dc.b $25,$30,$32,$2E,$32,$64,$0
L67:.dc.b $25,$2D,$31,$30,$2E,$31,$30,$73,$0
L70:.dc.b $25,$30,$32,$2E,$32,$64,$0
L72:.dc.b $6F,$66,$20,$47,$72,$6F,$75,$70,$73,$0
L73:.dc.b $74,$6F,$20,$56,$6F,$69,$63,$65,$73,$0
L74:.dc.b $56,$20,$47,$72,$20,$20,$56,$20,$47,$72,$0
L79:.dc.b $25,$63,$20,$25,$73,$0
L80:.dc.b $25,$63,$20,$25,$73,$0
L82:.dc.b $53,$6F,$75,$72,$63,$65,$73,$20,$61,$6E,$64,$0
L83:.dc.b $43,$6F,$6E,$74,$72,$6F,$6C,$6C,$65,$72,$73,$0
L84:.dc.b $23,$20,$53,$6F,$75,$72,$63,$65,$20,$20,$43,$4E,$0
L93:.dc.b $25,$73,$0
L96:.dc.b $44,$79,$6E,$61,$6D,$69,$63,$73,$2C,$20,$4D,$49,$44,$49,$20,$50,$6F,$72,$74,$73,$20,$61,$6E,$64,$0
L97:.dc.b $43,$68,$61,$6E,$6E,$65,$6C,$73,$20,$74,$6F,$20,$47,$72,$6F,$75,$70,$73,$0
L98:.dc.b $47,$20,$49,$6E,$20,$44,$20,$49,$20,$43,$68,$20,$20,$47,$20,$49,$6E,$20,$44,$20,$49,$20,$43,$68,$0
L103:.dc.b $25,$63,$20,$25,$30,$32,$2E,$32,$64,$20,$25,$64,$20,$25,$73,$20,$25,$73,$20,$20,$25,$63,$20,$25,$30,$32,$2E,$32,$64,$20
.dc.b $25,$64,$20,$25,$73,$20,$25,$73,$0
L112:.dc.b $41,$75,$78,$0
L114:.dc.b $54,$75,$6E,$0
L115:.dc.b $25,$64,$0
L117:.dc.b $49,$6E,$74,$6E,$73,$74,$79,$20,$25,$30,$32,$2E,$32,$64,$0
L118:.dc.b $4D,$6F,$64,$52,$61,$74,$65,$20,$25,$30,$32,$2E,$32,$64,$0
L119:.dc.b $4D,$6F,$64,$44,$70,$74,$68,$20,$25,$30,$32,$2E,$32,$64,$0
L138:.dc.b $7B,$75,$6E,$75,$73,$65,$64,$7D,$20,$20,$20,$20,$20,$20,$20,$20,$0
L139:.dc.b $7B,$44,$65,$66,$61,$75,$6C,$74,$7D,$20,$20,$20,$20,$20,$20,$20,$0