.globl _Cbuffs
.globl _Stdbufs
.globl _Stdbuf
.globl _chantab
.globl _Wrkbuf
.bss
L1:.ds.b 4
.text
.globl _B_fhdr
.comm _B_fhdr,28
.globl _B_txt_o
.comm _B_txt_o,4
.globl _B_dat_o
.comm _B_dat_o,4
.globl _B_bss_o
.comm _B_bss_o,4
.globl _B_txt_l
.comm _B_txt_l,4
.globl _B_dat_l
.comm _B_dat_l,4
.globl _B_bss_l
.comm _B_bss_l,4
.globl _B_lod_l
.comm _B_lod_l,4
.globl _B_end
.comm _B_end,4
.globl _B_chk
.comm _B_chk,4
.globl _B_buf_a
.comm _B_buf_a,4
.globl _B_log_s
.comm _B_log_s,2
.globl _B_dbg_s
.comm _B_dbg_s,2
.globl _booter
.text
_booter:
~~booter:
~fn=8
~textadr=12
link R14,#0
movem.l R4-R7/R12-R13,-(sp)
~i=R7
~bgnbss=R6
~endbss=R5
~cp=R13
~fcp=R12
*line 68
clr.l _B_txt_o
*line 69
clr.l _B_dat_o
*line 70
clr.l _B_bss_o
*line 71
clr.l _B_txt_l
*line 72
clr.l _B_dat_l
*line 73
clr.l _B_bss_l
*line 74
clr.l _B_lod_l
*line 78
*line 78
move.l #L3,(sp)
move.l 8(R14),-(sp)
jsr _fopenb
addq.l #4,sp
move.l R0,L1
bne L4
*line 79
*line 80
*line 81
*line 82
tst _B_log_s
beq L5
*line 82
move.l 8(R14),(sp)
move.l #L6,-(sp)
jsr _printf
addq.l #4,sp
*line 83
L5:
*line 84
move #1,R0
bra L2
*line 85
*line 86
*line 87
L4:
*line 88
*line 88
tst _B_dbg_s
beq L7
*line 89
*line 90
move.l L1,R8
move.b 13(R8),R0
ext.w R0
muls #12,R0
add.l #_chantab,R0
move.l R0,R8
move.l 8(R8),R12
*line 91
*line 92
move.l R12,(sp)
jsr _SnapFCB
*line 93
move.l R12,(sp)
jsr _ClusMap
*line 94
jsr _waitcr
*line 95
*line 96
*line 97
*line 98
*line 99
L7:
*line 100
*line 100
move.l L1,(sp)
move #1,-(sp)
move #28,-(sp)
move.l #_B_fhdr,-(sp)
jsr _fread
addq.l #8,sp
cmp #1,R0
beq L8
*line 101
*line 102
*line 103
*line 104
tst _B_log_s
beq L9
*line 104
move.l 8(R14),(sp)
move.l #L10,-(sp)
jsr _printf
addq.l #4,sp
*line 105
L9:
*line 106
move.l L1,(sp)
jsr _fclose
*line 107
move #2,R0
bra L2
*line 108
*line 109
*line 110
*line 111
L8:
*line 112
*line 112
cmp #24602,_B_fhdr
beq L11
cmp #24603,_B_fhdr
beq L11
*line 113
*line 114
*line 115
*line 116
tst _B_log_s
beq L12
*line 117
move.l 8(R14),(sp)
move _B_fhdr,-(sp)
move.l #L13,-(sp)
jsr _printf
addq.l #6,sp
*line 118
L12:
*line 119
move.l L1,(sp)
jsr _fclose
*line 120
move #3,R0
bra L2
*line 121
*line 122
*line 123
*line 124
*line 125
*line 126
*line 127
L11:
*line 128
*line 128
cmp #24603,_B_fhdr
bne L14
*line 129
*line 130
move.l L1,(sp)
jsr _getl
move.l R0,_B_dat_o
*line 131
move.l L1,(sp)
jsr _getl
move.l R0,_B_bss_o
*line 132
*line 133
L14:
*line 134
move.l 22+_B_fhdr,_B_txt_o
*line 136
tst.l 12(R14)
beq L10000
move.l 12(R14),R0
bra L10002
L10000:move.l _B_txt_o,R0
L10002:move.l R0,_B_buf_a
*line 137
move.l 2+_B_fhdr,R0
add.l 6+_B_fhdr,R0
move.l R0,_B_lod_l
*line 139
*line 139
move.l L1,(sp)
move.l _B_lod_l,-(sp)
move.l _B_buf_a,-(sp)
jsr _flread
addq.l #8,sp
tst R0
beq L15
*line 140
*line 141
*line 142
*line 143
tst _B_log_s
beq L16
*line 143
move.l 8(R14),(sp)
move.l #L17,-(sp)
jsr _printf
addq.l #4,sp
*line 144
L16:
*line 145
move.l L1,(sp)
jsr _fclose
*line 146
move #4,R0
bra L2
*line 147
*line 148
L15:
*line 149
move.l _B_buf_a,R0
add.l _B_lod_l,R0
sub.l #$1,R0
move.l R0,_B_end
*line 151
move.l 2+_B_fhdr,_B_txt_l
*line 152
move.l 6+_B_fhdr,_B_dat_l
*line 153
move.l 10+_B_fhdr,_B_bss_l
*line 155
move.l _B_buf_a,R13
*line 156
clr.l _B_chk
*line 158
clr.l R7
bra L20
L21:
*line 159
move.b (R13)+,R0
ext.w R0
ext.l R0
and.l #$ff,R0
add.l R0,_B_chk
L19:
*line 158
add.l #$1,R7
L20:
*line 158
cmp.l _B_lod_l,R7
blt L21
L18:
*line 161
*line 162
tst.l _B_bss_o
beq L22
*line 162
move.l _B_bss_o,R6
*line 163
bra L23
L22:
*line 164
move.l _B_end,R6
add.l #$1,R6
L23:
*line 166
move.l R6,R5
add.l _B_bss_l,R5
sub.l #$1,R5
*line 169
*line 169
tst _B_log_s
beq L24
*line 170
*line 171
*line 172
move.l _B_end,(sp)
move.l _B_buf_a,-(sp)
move.l 8(R14),-(sp)
move.l #L25,-(sp)
jsr _printf
adda.l #12,sp
*line 173
move.l R5,(sp)
move.l R6,-(sp)
move.l #L26,-(sp)
jsr _printf
addq.l #8,sp
*line 174
*line 175
move.l _B_lod_l,(sp)
move.l _B_lod_l,-(sp)
move.l _B_chk,-(sp)
move.l #L27,-(sp)
jsr _printf
adda.l #12,sp
*line 176
*line 177
move.l _B_bss_o,(sp)
move.l _B_dat_o,-(sp)
move.l _B_txt_o,-(sp)
move.l #L28,-(sp)
jsr _printf
adda.l #12,sp
*line 178
*line 179
move.l _B_bss_l,(sp)
move.l _B_dat_l,-(sp)
move.l _B_txt_l,-(sp)
move.l #L29,-(sp)
jsr _printf
adda.l #12,sp
*line 180
*line 181
*line 182
L24:
*line 183
move.l L1,(sp)
jsr _fclose
*line 184
clr R0
bra L2
L2:tst.l (sp)+
movem.l (sp)+,R5-R7/R12-R13
unlk R14
rts
.data
L3:.dc.b $72,$0
L6:.dc.b $62,$6F,$6F,$74,$65,$72,$3A,$20,$20,$55,$6E,$61,$62,$6C,$65,$20,$74,$6F,$20,$6F,$70,$65,$6E,$20,$22,$25,$73,$22,$A,$0
L10:.dc.b $62,$6F,$6F,$74,$65,$72,$3A,$20,$20,$55,$6E,$61,$62,$6C,$65,$20,$74,$6F,$20,$72,$65,$61,$64,$20,$68,$65,$61,$64,$65,$72
.dc.b $20,$66,$6F,$72,$20,$22,$25,$73,$22,$A,$0
L13:.dc.b $62,$6F,$6F,$74,$65,$72,$3A,$20,$20,$42,$61,$64,$20,$6D,$61,$67,$69,$63,$20,$5B,$30,$78,$25,$30,$34,$78,$5D,$20,$69,$6E
.dc.b $20,$66,$69,$6C,$65,$20,$22,$25,$73,$22,$0
L17:.dc.b $62,$6F,$6F,$74,$65,$72,$3A,$20,$20,$55,$6E,$61,$62,$6C,$65,$20,$74,$6F,$20,$72,$65,$61,$64,$20,$22,$25,$73,$22,$A,$0
L25:.dc.b $46,$69,$6C,$65,$20,$22,$25,$73,$22,$20,$6C,$6F,$61,$64,$65,$64,$20,$66,$72,$6F,$6D,$20,$24,$25,$30,$38,$6C,$58,$20,$74
.dc.b $6F,$20,$24,$25,$30,$38,$6C,$58,$D,$A,$0
L26:.dc.b $20,$20,$20,$42,$53,$53,$20,$24,$25,$30,$38,$6C,$58,$20,$74,$6F,$20,$24,$25,$30,$38,$6C,$58,$D,$A,$0
L27:.dc.b $43,$68,$65,$63,$6B,$73,$75,$6D,$20,$20,$20,$3D,$20,$24,$25,$30,$38,$6C,$58,$2C,$20,$4C,$6F,$61,$64,$20,$6C,$65,$6E,$67
.dc.b $74,$68,$20,$3D,$20,$25,$6C,$64,$20,$28,$24,$25,$30,$38,$6C,$58,$29,$D,$A,$0
L28:.dc.b $20,$20,$20,$42,$5F,$74,$78,$74,$5F,$6F,$20,$3D,$20,$24,$25,$30,$38,$6C,$58,$2C,$20,$42,$5F,$64,$61,$74,$5F,$6F,$20,$3D
.dc.b $20,$24,$25,$30,$38,$6C,$58,$2C,$20,$42,$5F,$62,$73,$73,$5F,$6F,$20,$3D,$20,$24,$25,$30,$38,$6C,$58,$D,$A,$0
L29:.dc.b $20,$20,$20,$42,$5F,$74,$78,$74,$5F,$6C,$20,$3D,$20,$24,$25,$30,$38,$6C,$58,$2C,$20,$42,$5F,$64,$61,$74,$5F,$6C,$20,$3D
.dc.b $20,$24,$25,$30,$38,$6C,$58,$2C,$20,$42,$5F,$62,$73,$73,$5F,$6C,$20,$3D,$20,$24,$25,$30,$38,$6C,$58,$D,$A,$0