Index: alcyon/ucslice.s
===================================================================
--- alcyon/ucslice.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/ucslice.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,569 @@
+.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
