.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 _ac_code
.globl _scname
.globl _se_chg
.globl _curscor
.globl _cursect
.globl _se1_cnt
.globl _se2_cnt
.globl _se3_cnt
.globl _spool
.globl _pspool
.globl _spcount
.globl _frags
.globl _t_bak
.globl _t_cur
.globl _t_ctr
.globl _t_fwd
.globl _size1
.globl _size2
.globl _size3
.globl _scores
.globl _scp
.globl _seclist
.globl _hplist
.globl _p_bak
.globl _p_cur
.globl _p_ctr
.globl _p_fwd
.globl _saddr
.globl _ndisp
.globl _sd
.globl _soffset
.globl _gtctab
.globl _lintab1
.globl _lintab2
.globl _nbmasks
.globl _nttab1
.globl _nttab2
.globl _pxtbl
.globl _epxtbl
.globl _gdfsep
.globl _gdstbc
.globl _ucslice
.text
_ucslice:
~~ucslice:
link R14,#-24
movem.l R2-R7/R11-R13,-(sp)
~pxptr=R13
~slptr=R12
~gdsep=R11
~lc=R7
~i=R6
~ncolor=R5
~mask1=R4
~mask2=R3
~ncptr=-4
~nctabp=-8
~gdstp=-12
~gdprv=-16
~gdnxt=-20
~lintab=-24
*line 75
move.l #$80,R7
*line 76
move _soffset,R8
add.l R8,R8
add.l #_nbmasks,R8
move (R8),R4
*line 77
clr R0
move R4,R0
not R0
move R0,R3
*line 81
move.l #_gdstbc,-12(R14)
*line 82
tst _sd
beq L10000
move.l #_nttab2,R0
bra L10002
L10000:move.l #_nttab1,R0
L10002:move.l R0,-8(R14)
*line 83
move.l #_gtctab,-4(R14)
*line 85
cmp.b #4,_ac_code
bne L10003
move.l #_lintab1,R0
bra L10005
L10003:move.l #_lintab2,R0
L10005:move.l R0,-24(R14)
*line 90
clr R6
bra L4
L5:
*line 91
*line 92
move R4,R5
move.l -4(R14),R8
move (R8),R0
and R0,R5
add.l #2,-4(R14)
*line 93
move.l -12(R14),-16(R14)
*line 94
move.l -12(R14),R8
move.l (R8),R11
add.l #4,-12(R14)
*line 95
*line 96
*line 96
move.l R11,R0
beq L6
*line 97
*line 98
L9:
*line 99
*line 100
*line 100
cmp #2,_ndisp
bne L10
*line 101
*line 102
*line 103
*line 104
*line 105
move.l -24(R14),R8
move 4(R11),R9
add.l R9,R9
move 0(R8,R9.l),R0
ext.l R0
asl.l #$7,R0
asl.l #1,R0
move.l R0,R12
add.l _saddr,R12
add.l #$80,R12
*line 106
*line 107
move 6(R11),R0
asl #3,R0
ext.l R0
move.l R0,R13
add.l #_pxtbl,R13
*line 108
*line 109
*line 110
*line 111
clr R0
move R3,R0
and (R12),R0
clr R1
move R5,R1
and (R13)+,R1
or R1,R0
move R0,(R12)
*line 112
move.l R7,R0
asl.l #1,R0
add.l R0,R12
*line 113
*line 114
clr R0
move R3,R0
and (R12),R0
clr R1
move R5,R1
and (R13)+,R1
or R1,R0
move R0,(R12)
*line 115
move.l R7,R0
asl.l #1,R0
add.l R0,R12
*line 116
*line 117
clr R0
move R3,R0
and (R12),R0
clr R1
move R5,R1
and (R13)+,R1
or R1,R0
move R0,(R12)
*line 118
*line 119
*line 120
L10:
*line 121
move.l (R11),-20(R14)
*line 122
*line 123
*line 124
*line 125
*line 125
move 6(R11),R8
add.l R8,R8
add.l -8(R14),R8
move (R8),6(R11)
bne L11
*line 126
*line 127
*line 128
*line 129
move.l -16(R14),R8
move.l -20(R14),(R8)
*line 130
move.l _gdfsep,(R11)
*line 131
move.l R11,_gdfsep
*line 132
*line 133
bra L12
L11:
*line 134
move.l R11,-16(R14)
L12:
*line 135
*line 136
move.l -20(R14),R11
*line 137
L8:
*line 138
move.l R11,R0
bne L9
L7:
*line 139
L6:L3:
*line 90
add #1,R6
L4:
*line 90
cmp #12,R6
blo L5
L2:bra L15
L16:
*line 144
*line 145
*line 146
move.l -12(R14),-16(R14)
*line 147
move.l -12(R14),R8
move.l (R8),R11
add.l #4,-12(R14)
*line 148
*line 149
*line 149
move.l R11,R0
beq L17
*line 150
*line 151
L20:
*line 152
*line 153
*line 153
cmp #2,_ndisp
bne L21
*line 154
*line 155
*line 156
*line 157
move.l _saddr,R12
add.l #$d480,R12
*line 158
move 6(R11),R0
asl #5,R0
ext.l R0
move.l R0,R13
add.l #_epxtbl,R13
*line 159
*line 160
*line 161
*line 162
move R4,R5
and 4(R11),R5
*line 163
*line 164
*line 165
*line 166
*line 167
tst (R13)+
beq L22
*line 167
clr R0
move R5,R0
clr R1
move R3,R1
and (R12),R1
or R1,R0
move R0,(R12)
*line 168
L22:
*line 169
move.l R7,R0
asl.l #1,R0
add.l R0,R12
*line 170
*line 171
*line 172
tst (R13)+
beq L23
*line 172
clr R0
move R5,R0
clr R1
move R3,R1
and (R12),R1
or R1,R0
move R0,(R12)
*line 173
L23:
*line 174
move.l R7,R0
asl.l #1,R0
add.l R0,R12
*line 175
*line 176
*line 177
tst (R13)+
beq L24
*line 177
clr R0
move R5,R0
clr R1
move R3,R1
and (R12),R1
or R1,R0
move R0,(R12)
*line 178
L24:
*line 179
move.l R7,R0
asl.l #1,R0
add.l R0,R12
*line 180
*line 181
*line 182
tst (R13)+
beq L25
*line 182
clr R0
move R5,R0
clr R1
move R3,R1
and (R12),R1
or R1,R0
move R0,(R12)
*line 183
L25:
*line 184
move.l R7,R0
asl.l #1,R0
add.l R0,R12
*line 185
*line 186
*line 187
tst (R13)+
beq L26
*line 187
clr R0
move R5,R0
clr R1
move R3,R1
and (R12),R1
or R1,R0
move R0,(R12)
*line 188
L26:
*line 189
move.l R7,R0
asl.l #1,R0
add.l R0,R12
*line 190
*line 191
*line 192
tst (R13)+
beq L27
*line 192
clr R0
move R5,R0
clr R1
move R3,R1
and (R12),R1
or R1,R0
move R0,(R12)
*line 193
L27:
*line 194
move.l R7,R0
asl.l #1,R0
add.l R0,R12
*line 195
*line 196
*line 197
*line 198
tst (R13)+
beq L28
*line 198
clr R0
move R5,R0
clr R1
move R3,R1
and (R12),R1
or R1,R0
move R0,(R12)
*line 199
L28:
*line 200
move.l R7,R0
asl.l #1,R0
add.l R0,R12
*line 201
*line 202
*line 203
tst (R13)+
beq L29
*line 203
clr R0
move R5,R0
clr R1
move R3,R1
and (R12),R1
or R1,R0
move R0,(R12)
*line 204
L29:
*line 205
move.l R7,R0
asl.l #1,R0
add.l R0,R12
*line 206
*line 207
*line 208
tst (R13)+
beq L30
*line 208
clr R0
move R5,R0
clr R1
move R3,R1
and (R12),R1
or R1,R0
move R0,(R12)
*line 209
L30:
*line 210
move.l R7,R0
asl.l #1,R0
add.l R0,R12
*line 211
*line 212
*line 213
tst (R13)+
beq L31
*line 213
clr R0
move R5,R0
clr R1
move R3,R1
and (R12),R1
or R1,R0
move R0,(R12)
*line 214
L31:
*line 215
move.l R7,R0
asl.l #1,R0
add.l R0,R12
*line 216
*line 217
*line 218
tst (R13)+
beq L32
*line 218
clr R0
move R5,R0
clr R1
move R3,R1
and (R12),R1
or R1,R0
move R0,(R12)
*line 219
L32:
*line 220
move.l R7,R0
asl.l #1,R0
add.l R0,R12
*line 221
*line 222
*line 223
tst (R13)
beq L33
*line 223
clr R0
move R5,R0
clr R1
move R3,R1
and (R12),R1
or R1,R0
move R0,(R12)
L33:
*line 224
*line 225
L21:
*line 226
move.l (R11),-20(R14)
*line 227
move.l -16(R14),R8
move.l -20(R14),(R8)
*line 228
move.l _gdfsep,(R11)
*line 229
move.l R11,_gdfsep
*line 230
move.l -20(R14),R11
*line 231
L19:
*line 232
move.l R11,R0
bne L20
L18:
*line 233
L17:L14:
*line 144
add #1,R6
L15:
*line 144
cmp #17,R6
blo L16
L13:L1:tst.l (sp)+
movem.l (sp)+,R3-R7/R11-R13
unlk R14
rts
.data