Index: alcyon/addfpu.s
===================================================================
--- alcyon/addfpu.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/addfpu.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,127 @@
+.globl _addfpu
+.text
+_addfpu:
+~~addfpu:
+~t=8
+~k=10
+link R14,#0
+movem.l R4-R7,-(sp)
+~x=R7
+~z=R6
+~y=R5
+*line 31
+move 8(R14),(sp)
+jsr _fromfpu
+move R0,R7
+*line 33
+*line 34
+cmp #32767,R7
+bne L2
+*line 34
+clr R0
+move 8(R14),R0
+bra L1
+*line 35
+L2:
+*line 36
+move 8(R14),R5
+*line 37
+move R7,R6
+add 10(R14),R6
+*line 39
+*line 40
+cmp #32767,R6
+blt L3
+*line 40
+move #32767,(sp)
+jsr _tofpu
+bra L1
+*line 41
+L3:
+*line 42
+bra L6
+L5:
+*line 43
+add #1,R7
+move R7,(sp)
+jsr _tofpu
+move R0,R5
+L6:
+*line 43
+cmp 8(R14),R5
+beq L5
+cmp R7,R6
+bgt L5
+L4:
+*line 45
+clr R0
+move R5,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _subfpu
+.text
+_subfpu:
+~~subfpu:
+~t=8
+~k=10
+link R14,#0
+movem.l R4-R7,-(sp)
+~x=R7
+~z=R6
+~y=R5
+*line 65
+move 8(R14),(sp)
+jsr _fromfpu
+move R0,R7
+*line 67
+*line 68
+cmp #1,R7
+bne L8
+*line 68
+clr R0
+move 8(R14),R0
+bra L7
+*line 69
+L8:
+*line 70
+move 8(R14),R5
+*line 71
+move R7,R6
+sub 10(R14),R6
+*line 73
+*line 74
+cmp #1,R6
+bgt L9
+*line 74
+move #1,(sp)
+jsr _tofpu
+bra L7
+*line 75
+L9:
+*line 76
+bra L12
+L11:
+*line 77
+sub #1,R7
+move R7,(sp)
+jsr _tofpu
+move R0,R5
+L12:
+*line 77
+cmp 8(R14),R5
+beq L11
+cmp R7,R6
+blt L11
+L10:
+*line 79
+clr R0
+move R5,R0
+bra L7
+L7:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
Index: alcyon/adfield.s
===================================================================
--- alcyon/adfield.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/adfield.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1669 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _adnamsw
+.globl _asgmod
+.globl _astat
+.globl _cmtype
+.globl _cmfirst
+.globl _curasg
+.globl _curhold
+.globl _curmop
+.globl _curslim
+.globl _cxval
+.globl _cyval
+.globl _cxrate
+.globl _cyrate
+.globl _hcwval
+.globl _hitbox
+.globl _hitcx
+.globl _hitcy
+.globl _stccol
+.globl _stcrow
+.globl _thcwval
+.globl _tvcwval
+.globl _vcwval
+.globl _vtccol
+.globl _vtcrow
+.globl _vtwcol
+.globl _vtwrow
+.globl _vtxval
+.globl _vtyval
+.globl _crate1
+.globl _asgob
+.globl _asgtab
+.globl _adboxes
+.globl _csbp
+.globl _grp2prt
+.globl _key2grp
+.globl _mctlnum
+.globl _vce2grp
+.globl _ad_fet1
+.data
+_ad_fet1:
+.dc.w $0
+.dc.w $9
+.dc.w $A
+.dc.w $0
+*line 93
+.dc.l _et_atab
+*line 93
+.dc.l _ef_atab
+*line 93
+.dc.l _rd_atab
+*line 93
+.dc.l _nd_atab
+.dc.w $1
+.dc.w $1
+.dc.w $A
+.dc.w $0
+*line 95
+.dc.l _et_null
+*line 95
+.dc.l _ef_null
+*line 95
+.dc.l _rd_null
+*line 95
+.dc.l _nd_null
+.dc.w $4
+.dc.w $A
+.dc.w $A
+.dc.w $2
+*line 97
+.dc.l _et_aopt
+*line 97
+.dc.l _ef_aopt
+*line 97
+.dc.l _rd_aopt
+*line 97
+.dc.l _nd_aopt
+.dc.w $3
+.dc.w $9
+.dc.w $A
+.dc.w $3
+*line 99
+.dc.l _et_aprg
+*line 99
+.dc.l _ef_aprg
+*line 99
+.dc.l _rd_aprg
+*line 99
+.dc.l _nd_aprg
+.dc.w $4
+.dc.w $F
+.dc.w $10
+.dc.w $4
+*line 101
+.dc.l _et_avgr
+*line 101
+.dc.l _ef_avgr
+*line 101
+.dc.l _rd_avgr
+*line 101
+.dc.l _nd_avgr
+.dc.w $5
+.dc.w $F
+.dc.w $10
+.dc.w $104
+*line 102
+.dc.l _et_avgr
+*line 102
+.dc.l _ef_avgr
+*line 102
+.dc.l _rd_avgr
+*line 102
+.dc.l _nd_avgr
+.dc.w $6
+.dc.w $F
+.dc.w $10
+.dc.w $204
+*line 103
+.dc.l _et_avgr
+*line 103
+.dc.l _ef_avgr
+*line 103
+.dc.l _rd_avgr
+*line 103
+.dc.l _nd_avgr
+.dc.w $7
+.dc.w $F
+.dc.w $10
+.dc.w $304
+*line 104
+.dc.l _et_avgr
+*line 104
+.dc.l _ef_avgr
+*line 104
+.dc.l _rd_avgr
+*line 104
+.dc.l _nd_avgr
+.dc.w $8
+.dc.w $F
+.dc.w $10
+.dc.w $404
+*line 105
+.dc.l _et_avgr
+*line 105
+.dc.l _ef_avgr
+*line 105
+.dc.l _rd_avgr
+*line 105
+.dc.l _nd_avgr
+.dc.w $9
+.dc.w $F
+.dc.w $10
+.dc.w $504
+*line 106
+.dc.l _et_avgr
+*line 106
+.dc.l _ef_avgr
+*line 106
+.dc.l _rd_avgr
+*line 106
+.dc.l _nd_avgr
+.dc.w $4
+.dc.w $15
+.dc.w $16
+.dc.w $604
+*line 107
+.dc.l _et_avgr
+*line 107
+.dc.l _ef_avgr
+*line 107
+.dc.l _rd_avgr
+*line 107
+.dc.l _nd_avgr
+.dc.w $5
+.dc.w $15
+.dc.w $16
+.dc.w $704
+*line 108
+.dc.l _et_avgr
+*line 108
+.dc.l _ef_avgr
+*line 108
+.dc.l _rd_avgr
+*line 108
+.dc.l _nd_avgr
+.dc.w $6
+.dc.w $15
+.dc.w $16
+.dc.w $804
+*line 109
+.dc.l _et_avgr
+*line 109
+.dc.l _ef_avgr
+*line 109
+.dc.l _rd_avgr
+*line 109
+.dc.l _nd_avgr
+.dc.w $7
+.dc.w $15
+.dc.w $16
+.dc.w $904
+*line 110
+.dc.l _et_avgr
+*line 110
+.dc.l _ef_avgr
+*line 110
+.dc.l _rd_avgr
+*line 110
+.dc.l _nd_avgr
+.dc.w $8
+.dc.w $15
+.dc.w $16
+.dc.w $A04
+*line 111
+.dc.l _et_avgr
+*line 111
+.dc.l _ef_avgr
+*line 111
+.dc.l _rd_avgr
+*line 111
+.dc.l _nd_avgr
+.dc.w $9
+.dc.w $15
+.dc.w $16
+.dc.w $B04
+*line 112
+.dc.l _et_avgr
+*line 112
+.dc.l _ef_avgr
+*line 112
+.dc.l _rd_avgr
+*line 112
+.dc.l _nd_avgr
+.dc.w $5
+.dc.w $23
+.dc.w $24
+.dc.w $5
+*line 114
+.dc.l _et_accn
+*line 114
+.dc.l _ef_accn
+*line 114
+.dc.l _rd_accn
+*line 114
+.dc.l _nd_accn
+.dc.w $6
+.dc.w $23
+.dc.w $24
+.dc.w $105
+*line 115
+.dc.l _et_accn
+*line 115
+.dc.l _ef_accn
+*line 115
+.dc.l _rd_accn
+*line 115
+.dc.l _nd_accn
+.dc.w $7
+.dc.w $23
+.dc.w $24
+.dc.w $205
+*line 116
+.dc.l _et_accn
+*line 116
+.dc.l _ef_accn
+*line 116
+.dc.l _rd_accn
+*line 116
+.dc.l _nd_accn
+.dc.w $8
+.dc.w $23
+.dc.w $24
+.dc.w $305
+*line 117
+.dc.l _et_accn
+*line 117
+.dc.l _ef_accn
+*line 117
+.dc.l _rd_accn
+*line 117
+.dc.l _nd_accn
+.dc.w $4
+.dc.w $2E
+.dc.w $2E
+.dc.w $6
+*line 119
+.dc.l _et_agpt
+*line 119
+.dc.l _ef_agpt
+*line 119
+.dc.l _rd_agpt
+*line 119
+.dc.l _nd_agpt
+.dc.w $5
+.dc.w $2E
+.dc.w $2E
+.dc.w $106
+*line 120
+.dc.l _et_agpt
+*line 120
+.dc.l _ef_agpt
+*line 120
+.dc.l _rd_agpt
+*line 120
+.dc.l _nd_agpt
+.dc.w $6
+.dc.w $2E
+.dc.w $2E
+.dc.w $206
+*line 121
+.dc.l _et_agpt
+*line 121
+.dc.l _ef_agpt
+*line 121
+.dc.l _rd_agpt
+*line 121
+.dc.l _nd_agpt
+.dc.w $7
+.dc.w $2E
+.dc.w $2E
+.dc.w $306
+*line 122
+.dc.l _et_agpt
+*line 122
+.dc.l _ef_agpt
+*line 122
+.dc.l _rd_agpt
+*line 122
+.dc.l _nd_agpt
+.dc.w $8
+.dc.w $2E
+.dc.w $2E
+.dc.w $406
+*line 123
+.dc.l _et_agpt
+*line 123
+.dc.l _ef_agpt
+*line 123
+.dc.l _rd_agpt
+*line 123
+.dc.l _nd_agpt
+.dc.w $9
+.dc.w $2E
+.dc.w $2E
+.dc.w $506
+*line 124
+.dc.l _et_agpt
+*line 124
+.dc.l _ef_agpt
+*line 124
+.dc.l _rd_agpt
+*line 124
+.dc.l _nd_agpt
+.dc.w $4
+.dc.w $3B
+.dc.w $3B
+.dc.w $606
+*line 125
+.dc.l _et_agpt
+*line 125
+.dc.l _ef_agpt
+*line 125
+.dc.l _rd_agpt
+*line 125
+.dc.l _nd_agpt
+.dc.w $5
+.dc.w $3B
+.dc.w $3B
+.dc.w $706
+*line 126
+.dc.l _et_agpt
+*line 126
+.dc.l _ef_agpt
+*line 126
+.dc.l _rd_agpt
+*line 126
+.dc.l _nd_agpt
+.dc.w $6
+.dc.w $3B
+.dc.w $3B
+.dc.w $806
+*line 127
+.dc.l _et_agpt
+*line 127
+.dc.l _ef_agpt
+*line 127
+.dc.l _rd_agpt
+*line 127
+.dc.l _nd_agpt
+.dc.w $7
+.dc.w $3B
+.dc.w $3B
+.dc.w $906
+*line 128
+.dc.l _et_agpt
+*line 128
+.dc.l _ef_agpt
+*line 128
+.dc.l _rd_agpt
+*line 128
+.dc.l _nd_agpt
+.dc.w $8
+.dc.w $3B
+.dc.w $3B
+.dc.w $A06
+*line 129
+.dc.l _et_agpt
+*line 129
+.dc.l _ef_agpt
+*line 129
+.dc.l _rd_agpt
+*line 129
+.dc.l _nd_agpt
+.dc.w $9
+.dc.w $3B
+.dc.w $3B
+.dc.w $B06
+*line 130
+.dc.l _et_agpt
+*line 130
+.dc.l _ef_agpt
+*line 130
+.dc.l _rd_agpt
+*line 130
+.dc.l _nd_agpt
+.dc.w $4
+.dc.w $30
+.dc.w $31
+.dc.w $6
+*line 132
+.dc.l _et_agch
+*line 132
+.dc.l _ef_agch
+*line 132
+.dc.l _rd_agch
+*line 132
+.dc.l _nd_agch
+.dc.w $5
+.dc.w $30
+.dc.w $31
+.dc.w $106
+*line 133
+.dc.l _et_agch
+*line 133
+.dc.l _ef_agch
+*line 133
+.dc.l _rd_agch
+*line 133
+.dc.l _nd_agch
+.dc.w $6
+.dc.w $30
+.dc.w $31
+.dc.w $206
+*line 134
+.dc.l _et_agch
+*line 134
+.dc.l _ef_agch
+*line 134
+.dc.l _rd_agch
+*line 134
+.dc.l _nd_agch
+.dc.w $7
+.dc.w $30
+.dc.w $31
+.dc.w $306
+*line 135
+.dc.l _et_agch
+*line 135
+.dc.l _ef_agch
+*line 135
+.dc.l _rd_agch
+*line 135
+.dc.l _nd_agch
+.dc.w $8
+.dc.w $30
+.dc.w $31
+.dc.w $406
+*line 136
+.dc.l _et_agch
+*line 136
+.dc.l _ef_agch
+*line 136
+.dc.l _rd_agch
+*line 136
+.dc.l _nd_agch
+.dc.w $9
+.dc.w $30
+.dc.w $31
+.dc.w $506
+*line 137
+.dc.l _et_agch
+*line 137
+.dc.l _ef_agch
+*line 137
+.dc.l _rd_agch
+*line 137
+.dc.l _nd_agch
+.dc.w $4
+.dc.w $3D
+.dc.w $3E
+.dc.w $606
+*line 138
+.dc.l _et_agch
+*line 138
+.dc.l _ef_agch
+*line 138
+.dc.l _rd_agch
+*line 138
+.dc.l _nd_agch
+.dc.w $5
+.dc.w $3D
+.dc.w $3E
+.dc.w $706
+*line 139
+.dc.l _et_agch
+*line 139
+.dc.l _ef_agch
+*line 139
+.dc.l _rd_agch
+*line 139
+.dc.l _nd_agch
+.dc.w $6
+.dc.w $3D
+.dc.w $3E
+.dc.w $806
+*line 140
+.dc.l _et_agch
+*line 140
+.dc.l _ef_agch
+*line 140
+.dc.l _rd_agch
+*line 140
+.dc.l _nd_agch
+.dc.w $7
+.dc.w $3D
+.dc.w $3E
+.dc.w $906
+*line 141
+.dc.l _et_agch
+*line 141
+.dc.l _ef_agch
+*line 141
+.dc.l _rd_agch
+*line 141
+.dc.l _nd_agch
+.dc.w $8
+.dc.w $3D
+.dc.w $3E
+.dc.w $A06
+*line 142
+.dc.l _et_agch
+*line 142
+.dc.l _ef_agch
+*line 142
+.dc.l _rd_agch
+*line 142
+.dc.l _nd_agch
+.dc.w $9
+.dc.w $3D
+.dc.w $3E
+.dc.w $B06
+*line 143
+.dc.l _et_agch
+*line 143
+.dc.l _ef_agch
+*line 143
+.dc.l _rd_agch
+*line 143
+.dc.l _nd_agch
+.dc.w $4
+.dc.w $29
+.dc.w $2A
+.dc.w $6
+*line 145
+.dc.l _et_ains
+*line 145
+.dc.l _ef_ains
+*line 145
+.dc.l _rd_ains
+*line 145
+.dc.l _nd_ains
+.dc.w $5
+.dc.w $29
+.dc.w $2A
+.dc.w $106
+*line 146
+.dc.l _et_ains
+*line 146
+.dc.l _ef_ains
+*line 146
+.dc.l _rd_ains
+*line 146
+.dc.l _nd_ains
+.dc.w $6
+.dc.w $29
+.dc.w $2A
+.dc.w $206
+*line 147
+.dc.l _et_ains
+*line 147
+.dc.l _ef_ains
+*line 147
+.dc.l _rd_ains
+*line 147
+.dc.l _nd_ains
+.dc.w $7
+.dc.w $29
+.dc.w $2A
+.dc.w $306
+*line 148
+.dc.l _et_ains
+*line 148
+.dc.l _ef_ains
+*line 148
+.dc.l _rd_ains
+*line 148
+.dc.l _nd_ains
+.dc.w $8
+.dc.w $29
+.dc.w $2A
+.dc.w $406
+*line 149
+.dc.l _et_ains
+*line 149
+.dc.l _ef_ains
+*line 149
+.dc.l _rd_ains
+*line 149
+.dc.l _nd_ains
+.dc.w $9
+.dc.w $29
+.dc.w $2A
+.dc.w $506
+*line 150
+.dc.l _et_ains
+*line 150
+.dc.l _ef_ains
+*line 150
+.dc.l _rd_ains
+*line 150
+.dc.l _nd_ains
+.dc.w $4
+.dc.w $36
+.dc.w $37
+.dc.w $606
+*line 151
+.dc.l _et_ains
+*line 151
+.dc.l _ef_ains
+*line 151
+.dc.l _rd_ains
+*line 151
+.dc.l _nd_ains
+.dc.w $5
+.dc.w $36
+.dc.w $37
+.dc.w $706
+*line 152
+.dc.l _et_ains
+*line 152
+.dc.l _ef_ains
+*line 152
+.dc.l _rd_ains
+*line 152
+.dc.l _nd_ains
+.dc.w $6
+.dc.w $36
+.dc.w $37
+.dc.w $806
+*line 153
+.dc.l _et_ains
+*line 153
+.dc.l _ef_ains
+*line 153
+.dc.l _rd_ains
+*line 153
+.dc.l _nd_ains
+.dc.w $7
+.dc.w $36
+.dc.w $37
+.dc.w $906
+*line 154
+.dc.l _et_ains
+*line 154
+.dc.l _ef_ains
+*line 154
+.dc.l _rd_ains
+*line 154
+.dc.l _nd_ains
+.dc.w $8
+.dc.w $36
+.dc.w $37
+.dc.w $A06
+*line 155
+.dc.l _et_ains
+*line 155
+.dc.l _ef_ains
+*line 155
+.dc.l _rd_ains
+*line 155
+.dc.l _nd_ains
+.dc.w $9
+.dc.w $36
+.dc.w $37
+.dc.w $B06
+*line 156
+.dc.l _et_ains
+*line 156
+.dc.l _ef_ains
+*line 156
+.dc.l _rd_ains
+*line 156
+.dc.l _nd_ains
+.dc.w $4
+.dc.w $2C
+.dc.w $2C
+.dc.w $6
+*line 158
+.dc.l _et_adyn
+*line 158
+.dc.l _ef_adyn
+*line 158
+.dc.l _rd_adyn
+*line 158
+.dc.l _nd_adyn
+.dc.w $5
+.dc.w $2C
+.dc.w $2C
+.dc.w $106
+*line 159
+.dc.l _et_adyn
+*line 159
+.dc.l _ef_adyn
+*line 159
+.dc.l _rd_adyn
+*line 159
+.dc.l _nd_adyn
+.dc.w $6
+.dc.w $2C
+.dc.w $2C
+.dc.w $206
+*line 160
+.dc.l _et_adyn
+*line 160
+.dc.l _ef_adyn
+*line 160
+.dc.l _rd_adyn
+*line 160
+.dc.l _nd_adyn
+.dc.w $7
+.dc.w $2C
+.dc.w $2C
+.dc.w $306
+*line 161
+.dc.l _et_adyn
+*line 161
+.dc.l _ef_adyn
+*line 161
+.dc.l _rd_adyn
+*line 161
+.dc.l _nd_adyn
+.dc.w $8
+.dc.w $2C
+.dc.w $2C
+.dc.w $406
+*line 162
+.dc.l _et_adyn
+*line 162
+.dc.l _ef_adyn
+*line 162
+.dc.l _rd_adyn
+*line 162
+.dc.l _nd_adyn
+.dc.w $9
+.dc.w $2C
+.dc.w $2C
+.dc.w $506
+*line 163
+.dc.l _et_adyn
+*line 163
+.dc.l _ef_adyn
+*line 163
+.dc.l _rd_adyn
+*line 163
+.dc.l _nd_adyn
+.dc.w $4
+.dc.w $39
+.dc.w $39
+.dc.w $606
+*line 164
+.dc.l _et_adyn
+*line 164
+.dc.l _ef_adyn
+*line 164
+.dc.l _rd_adyn
+*line 164
+.dc.l _nd_adyn
+.dc.w $5
+.dc.w $39
+.dc.w $39
+.dc.w $706
+*line 165
+.dc.l _et_adyn
+*line 165
+.dc.l _ef_adyn
+*line 165
+.dc.l _rd_adyn
+*line 165
+.dc.l _nd_adyn
+.dc.w $6
+.dc.w $39
+.dc.w $39
+.dc.w $806
+*line 166
+.dc.l _et_adyn
+*line 166
+.dc.l _ef_adyn
+*line 166
+.dc.l _rd_adyn
+*line 166
+.dc.l _nd_adyn
+.dc.w $7
+.dc.w $39
+.dc.w $39
+.dc.w $906
+*line 167
+.dc.l _et_adyn
+*line 167
+.dc.l _ef_adyn
+*line 167
+.dc.l _rd_adyn
+*line 167
+.dc.l _nd_adyn
+.dc.w $8
+.dc.w $39
+.dc.w $39
+.dc.w $A06
+*line 168
+.dc.l _et_adyn
+*line 168
+.dc.l _ef_adyn
+*line 168
+.dc.l _rd_adyn
+*line 168
+.dc.l _nd_adyn
+.dc.w $9
+.dc.w $39
+.dc.w $39
+.dc.w $B06
+*line 169
+.dc.l _et_adyn
+*line 169
+.dc.l _ef_adyn
+*line 169
+.dc.l _rd_adyn
+*line 169
+.dc.l _nd_adyn
+.dc.w $5
+.dc.w $A
+.dc.w $A
+.dc.w $9
+*line 171
+.dc.l _et_atun
+*line 171
+.dc.l _ef_atun
+*line 171
+.dc.l _rd_atun
+*line 171
+.dc.l _nd_atun
+.dc.w $7
+.dc.w $9
+.dc.w $A
+.dc.w $A
+*line 173
+.dc.l _et_aint
+*line 173
+.dc.l _ef_aint
+*line 173
+.dc.l _rd_aint
+*line 173
+.dc.l _nd_aint
+.dc.w $8
+.dc.w $9
+.dc.w $A
+.dc.w $A
+*line 174
+.dc.l _et_arat
+*line 174
+.dc.l _ef_arat
+*line 174
+.dc.l _rd_arat
+*line 174
+.dc.l _nd_arat
+.dc.w $9
+.dc.w $9
+.dc.w $A
+.dc.w $A
+*line 175
+.dc.l _et_adep
+*line 175
+.dc.l _ef_adep
+*line 175
+.dc.l _rd_adep
+*line 175
+.dc.l _nd_adep
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.l $0
+.dc.l $0
+.dc.l $0
+.dc.l $0
+.globl _adbox
+.data
+_adbox:
+.dc.w $1
+.dc.w $1
+.dc.w $5E
+.dc.w $1B
+.dc.w $B
+.dc.w $2
+.dc.w $0
+.dc.w $1
+.dc.w $1
+.dc.w $1C
+.dc.w $5E
+.dc.w $28
+.dc.w $B
+.dc.w $2
+.dc.w $2
+.dc.w $1
+.dc.w $1
+.dc.w $38
+.dc.w $5E
+.dc.w $44
+.dc.w $B
+.dc.w $2
+.dc.w $4
+.dc.w $1
+.dc.w $1
+.dc.w $2A
+.dc.w $5E
+.dc.w $36
+.dc.w $B
+.dc.w $4
+.dc.w $3
+.dc.w $1
+.dc.w $60
+.dc.w $1
+.dc.w $BE
+.dc.w $8A
+.dc.w $B
+.dc.w $3
+.dc.w $0
+.dc.w $D
+.dc.w $C0
+.dc.w $1
+.dc.w $12E
+.dc.w $8A
+.dc.w $B
+.dc.w $2
+.dc.w $0
+.dc.w $19
+.dc.w $130
+.dc.w $1
+.dc.w $1FE
+.dc.w $8A
+.dc.w $B
+.dc.w $3
+.dc.w $0
+.dc.w $27
+.dc.w $1
+.dc.w $8C
+.dc.w $1FE
+.dc.w $15C
+.dc.w $B
+.dc.w $5
+.dc.w $A
+.dc.w $1
+.dc.w $1
+.dc.w $46
+.dc.w $26
+.dc.w $52
+.dc.w $B
+.dc.w $3
+.dc.w $5
+.dc.w $1
+.dc.w $28
+.dc.w $46
+.dc.w $5E
+.dc.w $52
+.dc.w $B
+.dc.w $4
+.dc.w $5
+.dc.w $6
+.dc.w $1
+.dc.w $54
+.dc.w $5E
+.dc.w $8A
+.dc.w $B
+.dc.w $2
+.dc.w $6
+.dc.w $1
+.globl _adbxlb
+.data
+_adbxlb:
+*line 200
+.dc.l L1
+*line 201
+.dc.l L2
+*line 202
+.dc.l L3
+*line 203
+.dc.l L4
+*line 204
+.dc.l L5
+*line 205
+.dc.l L6
+*line 206
+.dc.l L7
+*line 207
+.dc.l L8
+*line 208
+.dc.l L9
+*line 209
+.dc.l L10
+*line 211
+.dc.l L11
+.globl _ad_flds
+.data
+_ad_flds:
+*line 218
+.dc.l _stdctp4
+*line 219
+.dc.l _nokey
+*line 220
+.dc.l _nokey
+*line 221
+.dc.l _cxkstd
+*line 222
+.dc.l _cykstd
+*line 223
+.dc.l _adcxupd
+*line 224
+.dc.l _adcyupd
+*line 225
+.dc.l _nokey
+*line 226
+.dc.l _nokey
+*line 227
+.dc.l _ad_xkey
+*line 228
+.dc.l _select
+*line 229
+.dc.l _stdmkey
+*line 230
+.dc.l _stddkey
+*line 231
+.dc.l _nokey
+*line 232
+.dc.l _ad_fet1
+*line 233
+.dc.l _adboxes
+*line 234
+.dc.l _crate1
+*line 235
+.dc.l _crate1
+.dc.w $0
+.dc.w $0
+.dc.w $7E
+.globl _adcyupd
+.text
+_adcyupd:
+~~adcyupd:
+link R14,#-4
+*line 252
+*line 252
+tst _adnamsw
+beq L13
+*line 253
+*line 254
+move _cyrate,R0
+add R0,_vtyval
+move _vtyval,R0
+ext.l R0
+divs #14,R0
+move R0,_vtcrow
+*line 255
+*line 256
+*line 257
+move _vtwrow,R0
+add #2,R0
+cmp _vtcrow,R0
+bge L14
+*line 257
+move _vtwrow,R0
+add #2,R0
+move R0,_vtcrow
+muls #14,R0
+move R0,_vtyval
+bra L15
+L14:
+*line 258
+*line 259
+move _vtcrow,R0
+cmp _vtwrow,R0
+bge L16
+*line 259
+move _vtwrow,R0
+move R0,_vtcrow
+muls #14,R0
+move R0,_vtyval
+*line 260
+L16:L15:bra L17
+L13:
+*line 261
+*line 262
+*line 263
+move _cyrate,R0
+add R0,_cyval
+*line 264
+*line 265
+*line 266
+cmp #348,_cyval
+ble L18
+*line 266
+move #348,_cyval
+bra L19
+L18:
+*line 267
+*line 268
+cmp #1,_cyval
+bge L20
+*line 268
+move #1,_cyval
+L20:L19:L17:L12:unlk R14
+rts
+.globl _adcxupd
+.text
+_adcxupd:
+~~adcxupd:
+link R14,#-4
+*line 280
+*line 280
+tst _adnamsw
+beq L22
+*line 281
+*line 282
+move _cxrate,R0
+add R0,_vtxval
+move _vtxval,R0
+asr #3,R0
+move R0,_vtccol
+*line 283
+*line 284
+*line 285
+move _vtwcol,R0
+add #29,R0
+cmp _vtccol,R0
+bge L23
+*line 285
+move _vtwcol,R0
+add #29,R0
+move R0,_vtccol
+asl #3,R0
+move R0,_vtxval
+bra L24
+L23:
+*line 286
+*line 287
+move _vtccol,R0
+cmp _vtwcol,R0
+bge L25
+*line 287
+move _vtwcol,R0
+move R0,_vtccol
+asl #3,R0
+move R0,_vtxval
+*line 288
+L25:L24:bra L26
+L22:
+*line 289
+*line 290
+*line 291
+move _cxrate,R0
+add R0,_cxval
+*line 292
+*line 293
+*line 294
+cmp #510,_cxval
+ble L27
+*line 294
+move #510,_cxval
+bra L28
+L27:
+*line 295
+*line 296
+cmp #1,_cxval
+bge L29
+*line 296
+move #1,_cxval
+L29:L28:L26:L21:unlk R14
+rts
+.globl _ad_xkey
+.text
+_ad_xkey:
+~~ad_xkey:
+~nn=8
+link R14,#0
+movem.l R3-R7,-(sp)
+~row=R7
+~col=R6
+~grp=R5
+~i=R4
+*line 315
+*line 315
+tst _astat
+beq L31
+*line 316
+*line 317
+*line 317
+jsr _whatbox
+tst R0
+beq L32
+*line 318
+*line 319
+move _hitcy,R7
+ext.l R7
+divs #14,R7
+*line 320
+move _hitcx,R6
+asr #3,R6
+*line 321
+*line 322
+move _hitbox,R0
+bra L34
+*line 323
+L35:
+*line 324
+*line 325
+*line 326
+*line 326
+cmp #1,R7
+bne L36
+*line 327
+*line 328
+move #16,(sp)
+move #32,-(sp)
+move _curasg,R0
+muls #332,R0
+add.l #_asgtab,R0
+move.l R0,-(sp)
+add.l #316,(sp)
+jsr _memset
+addq.l #6,sp
+*line 329
+move #1,_asgmod
+*line 330
+clr (sp)
+jsr _adswin
+*line 331
+clr R0
+bra L30
+*line 332
+*line 333
+bra L37
+L36:
+*line 334
+move #-1,R0
+bra L30
+L37:L38:
+*line 335
+*line 336
+*line 337
+*line 337
+cmp #1,R6
+blt L39
+cmp #10,R6
+bgt L39
+*line 338
+*line 339
+clr _curmop
+*line 340
+move _hitbox,(sp)
+jsr _adswin
+*line 341
+jsr _modasg
+*line 342
+clr R0
+bra L30
+*line 343
+*line 344
+L39:bra L33
+*line 345
+*line 346
+*line 347
+L40:
+*line 348
+*line 349
+*line 350
+*line 351
+cmp #4,R7
+blt L33
+*line 352
+*line 353
+*line 353
+cmp #13,R6
+blt L41
+cmp #16,R6
+bgt L41
+*line 354
+*line 355
+move R7,R5
+sub #4,R5
+*line 356
+move R5,R8
+add.l R8,R8
+add.l #_vce2grp,R8
+move #-1,(R8)
+*line 357
+move _hitbox,(sp)
+jsr _adswin
+*line 358
+jsr _modasg
+*line 359
+clr R0
+bra L30
+*line 360
+bra L42
+L41:
+*line 361
+*line 361
+cmp #19,R6
+blt L43
+cmp #22,R6
+bgt L43
+*line 362
+*line 363
+move R7,R5
+add #2,R5
+*line 364
+move R5,R8
+add.l R8,R8
+add.l #_vce2grp,R8
+move #-1,(R8)
+*line 365
+move _hitbox,(sp)
+jsr _adswin
+*line 366
+jsr _modasg
+*line 367
+clr R0
+bra L30
+*line 368
+*line 369
+L43:L42:bra L33
+*line 370
+*line 371
+L44:
+*line 372
+*line 373
+*line 374
+*line 375
+cmp #5,R7
+blt L33
+cmp #8,R7
+bgt L33
+*line 376
+*line 377
+*line 377
+cmp #35,R6
+beq L10000
+cmp #36,R6
+bne L45
+L10000:*line 378
+*line 379
+move R7,R8
+sub #5,R8
+add.l R8,R8
+add.l #_mctlnum,R8
+move #-1,(R8)
+*line 380
+move _hitbox,(sp)
+jsr _adswin
+*line 381
+jsr _modasg
+*line 382
+clr R0
+bra L30
+*line 383
+*line 384
+L45:bra L33
+*line 385
+*line 386
+*line 387
+L46:
+*line 388
+*line 389
+*line 390
+*line 391
+cmp #4,R7
+blt L33
+*line 392
+*line 393
+*line 393
+cmp #46,R6
+bne L47
+*line 394
+*line 395
+*line 396
+*line 397
+move R7,R5
+sub #4,R5
+*line 398
+move R5,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_grp2prt,R8
+clr (R8)
+*line 399
+*line 400
+clr R4
+bra L50
+L51:
+*line 401
+move #1,R0
+move R5,R1
+asl R1,R0
+not R0
+move R4,R9
+add.l R9,R9
+add.l #_key2grp,R9
+and R0,(R9)
+L49:
+*line 400
+add #1,R4
+L50:
+*line 400
+cmp #88,R4
+blt L51
+L48:
+*line 401
+*line 402
+*line 403
+move _hitbox,(sp)
+jsr _adswin
+*line 404
+move R5,(sp)
+jsr _drawk2g
+*line 405
+jsr _modasg
+*line 406
+clr R0
+bra L30
+*line 407
+bra L52
+L47:
+*line 408
+*line 408
+cmp #48,R6
+beq L10001
+cmp #49,R6
+bne L53
+L10001:*line 409
+*line 410
+*line 411
+*line 412
+move R7,R5
+sub #4,R5
+*line 413
+move R5,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_grp2prt,R8
+move #-1,2(R8)
+*line 414
+move _hitbox,(sp)
+jsr _adswin
+*line 415
+jsr _modasg
+*line 416
+clr R0
+bra L30
+*line 417
+*line 418
+bra L54
+L53:
+*line 419
+*line 419
+cmp #59,R6
+bne L55
+*line 420
+*line 421
+*line 422
+*line 423
+move R7,R5
+add #2,R5
+*line 424
+move R5,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_grp2prt,R8
+clr (R8)
+*line 425
+*line 426
+clr R4
+bra L58
+L59:
+*line 427
+move #1,R0
+move R5,R1
+asl R1,R0
+not R0
+move R4,R9
+add.l R9,R9
+add.l #_key2grp,R9
+and R0,(R9)
+L57:
+*line 426
+add #1,R4
+L58:
+*line 426
+cmp #88,R4
+blt L59
+L56:
+*line 427
+*line 428
+*line 429
+move _hitbox,(sp)
+jsr _adswin
+*line 430
+move R5,(sp)
+jsr _drawk2g
+*line 431
+jsr _modasg
+*line 432
+clr R0
+bra L30
+*line 433
+bra L60
+L55:
+*line 434
+*line 434
+cmp #61,R6
+beq L10002
+cmp #62,R6
+bne L61
+L10002:*line 435
+*line 436
+*line 437
+*line 438
+move R7,R5
+add #2,R5
+*line 439
+move R5,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_grp2prt,R8
+move #-1,2(R8)
+*line 440
+move _hitbox,(sp)
+jsr _adswin
+*line 441
+jsr _modasg
+*line 442
+clr R0
+bra L30
+*line 443
+*line 444
+L61:L60:L54:L52:bra L33
+*line 445
+bra L33
+L34:cmp #6,R0
+bhi L33
+asl #2,R0
+move R0,R8
+add.l #L62,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L62:.dc.l L35
+.dc.l L33
+.dc.l L38
+.dc.l L33
+.dc.l L40
+.dc.l L44
+.dc.l L46
+.text
+L33:
+*line 446
+*line 447
+L32:
+*line 448
+*line 449
+L31:
+*line 450
+move #-1,R0
+bra L30
+L30:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _adfield
+.text
+_adfield:
+~~adfield:
+link R14,#-4
+*line 464
+move #140,_curslim
+*line 466
+move.l #_ad_flds,(sp)
+jsr _curset
+L63:unlk R14
+rts
+.data
+L1:.dc.b $41,$73,$67,$6E,$6D,$6E,$74,$0
+L2:.dc.b $53,$74,$6F,$72,$2F,$46,$65,$74,$63,$68,$0
+L3:.dc.b $4D,$49,$44,$49,$20,$6F,$75,$74,$0
+L4:.dc.b $50,$72,$67,$43,$68,$6E,$67,$0
+L5:.dc.b $41,$73,$73,$69,$67,$6E,$6D,$65,$6E,$74,$0
+L6:.dc.b $41,$73,$73,$69,$67,$6E,$6D,$6E,$74,$20,$6F,$66,$0
+L7:.dc.b $41,$73,$73,$69,$67,$6E,$6D,$6E,$74,$20,$6F,$66,$20,$49,$6E,$73,$74,$72,$75,$6D,$65,$6E,$74,$73,$2C,$0
+L8:.dc.b $47,$20,$41,$73,$73,$69,$67,$6E,$6D,$65,$6E,$74,$20,$6F,$66,$20,$4B,$65,$79,$73,$20,$74,$6F,$20,$47,$72,$6F,$75,$70,$73
+.dc.b $20,$66,$6F,$72,$20,$4D,$49,$44,$49,$20,$50,$6F,$72,$74,$20,$31,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$47,$0
+L9:.dc.b $0
+L10:.dc.b $54,$75,$6E,$0
+L11:.dc.b $50,$68,$61,$73,$65,$53,$68,$69,$66,$74,$0
Index: alcyon/adselbx.s
===================================================================
--- alcyon/adselbx.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/adselbx.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1345 @@
+.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 _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _itxput
+.globl _point
+.globl _admctl
+.globl _adnamsw
+.globl _asgfks
+.globl _asghit
+.globl _asgmod
+.globl _auxctl
+.globl _curasg
+.globl _cxval
+.globl _cyval
+.globl _hitbox
+.globl _hitcx
+.globl _hitcy
+.globl _lastam
+.globl _submenu
+.globl _adbox
+.globl _grp2prt
+.globl _ins2grp
+.globl _asgkble
+.globl _key2grp
+.globl _mctlnum
+.globl _csbp
+.globl _curboxp
+.globl _bfs
+.globl _caname
+.globl _vtlin1
+.globl _vtlin2
+.globl _vtlin3
+.globl _asgob
+.globl _adboxes
+.data
+_adboxes:
+.dc.w $1
+.dc.w $0
+.dc.w $5E
+.dc.w $1B
+.dc.w $0
+*line 73
+.dc.l _adfnbox
+.dc.w $1
+.dc.w $1C
+.dc.w $5E
+.dc.w $28
+.dc.w $1
+*line 74
+.dc.l _adfnbox
+.dc.w $1
+.dc.w $38
+.dc.w $5E
+.dc.w $44
+.dc.w $2
+*line 75
+.dc.l _enterit
+.dc.w $1
+.dc.w $2A
+.dc.w $5E
+.dc.w $36
+.dc.w $3
+*line 76
+.dc.l _enterit
+.dc.w $60
+.dc.w $1
+.dc.w $BE
+.dc.w $8A
+.dc.w $4
+*line 77
+.dc.l _enterit
+.dc.w $C0
+.dc.w $1
+.dc.w $12E
+.dc.w $8A
+.dc.w $5
+*line 78
+.dc.l _adfnbox
+.dc.w $130
+.dc.w $1
+.dc.w $1FE
+.dc.w $8A
+.dc.w $6
+*line 79
+.dc.l _adfnbox
+.dc.w $1
+.dc.w $8C
+.dc.w $1FE
+.dc.w $15C
+.dc.w $7
+*line 80
+.dc.l _adfnbox
+.dc.w $1
+.dc.w $46
+.dc.w $26
+.dc.w $52
+.dc.w $8
+*line 81
+.dc.l _adfnbox
+.dc.w $28
+.dc.w $46
+.dc.w $5E
+.dc.w $52
+.dc.w $9
+*line 82
+.dc.l _adfnbox
+.dc.w $1
+.dc.w $54
+.dc.w $5E
+.dc.w $8A
+.dc.w $A
+*line 83
+.dc.l _enterit
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.l $0
+.globl _endatyp
+.text
+_endatyp:
+~~endatyp:
+link R14,#-4
+*line 99
+clr _adnamsw
+*line 100
+clr _submenu
+*line 102
+*line 103
+cmp #-1,_admctl
+bne L2
+*line 103
+move #7,(sp)
+jsr _adswin
+*line 104
+bra L3
+L2:
+*line 105
+move _admctl,(sp)
+jsr _admenu
+L3:L1:unlk R14
+rts
+.globl _admtxt
+.text
+_admtxt:
+~~admtxt:
+~row=8
+~col=10
+~txt=12
+~tag=16
+link R14,#-4
+*line 122
+*line 123
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L5
+*line 123
+clr (sp)
+jsr _vbank
+*line 124
+L5:
+*line 125
+move #14,(sp)
+move.l 12(R14),-(sp)
+move 10(R14),-(sp)
+move 8(R14),-(sp)
+add #10,(sp)
+move #5,-(sp)
+move #11,-(sp)
+move #64,-(sp)
+move.l _asgob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+L4:unlk R14
+rts
+.globl _admenu
+.text
+_admenu:
+~~admenu:
+~n=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 142
+*line 142
+tst 8(R14)
+blt L7
+*line 143
+*line 144
+move.l #_admtxt,_itxput
+*line 145
+*line 146
+*line 147
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L8
+*line 147
+clr (sp)
+jsr _vbank
+*line 148
+L8:
+*line 149
+*line 150
+move 122+_adbox,(sp)
+jsr _exp_c
+move R0,(sp)
+move 118+_adbox,-(sp)
+move 116+_adbox,-(sp)
+move 114+_adbox,-(sp)
+move 112+_adbox,-(sp)
+move #128,-(sp)
+move.l _asgob,-(sp)
+jsr _vbfill4
+adda.l #14,sp
+*line 151
+*line 152
+move 8(R14),R0
+bra L10
+*line 153
+L11:
+*line 154
+*line 155
+*line 156
+jsr _showim
+bra L9
+*line 157
+*line 158
+L12:
+*line 159
+*line 160
+*line 161
+move _lastam,(sp)
+jsr _showam
+*line 162
+move #9,(sp)
+clr -(sp)
+jsr _settc
+addq.l #2,sp
+bra L9
+*line 163
+*line 164
+L13:
+*line 165
+*line 166
+*line 167
+jsr _showtm
+*line 168
+move #10,(sp)
+move #5,-(sp)
+jsr _settc
+addq.l #2,sp
+bra L9
+*line 169
+*line 170
+L14:
+*line 171
+*line 172
+bra L9
+*line 173
+bra L9
+L10:tst R0
+beq L11
+cmp #1,R0
+beq L12
+cmp #2,R0
+beq L13
+bra L14
+L9:
+*line 174
+*line 175
+bra L15
+L7:
+*line 176
+*line 177
+*line 178
+move 8(R14),_admctl
+*line 179
+move #7,(sp)
+jsr _adswin
+L15:
+*line 182
+move.l #_adpoint,_point
+*line 184
+*line 185
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L16
+*line 185
+clr (sp)
+jsr _vbank
+*line 186
+L16:
+*line 187
+move #10,(sp)
+move #349,-(sp)
+clr -(sp)
+clr -(sp)
+clr -(sp)
+jsr _lseg
+addq.l #8,sp
+*line 188
+move #10,(sp)
+move #349,-(sp)
+move #511,-(sp)
+clr -(sp)
+move #511,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 190
+move 8(R14),_admctl
+L6:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _adfnbox
+.text
+_adfnbox:
+~~adfnbox:
+~n=8
+link R14,#-4
+movem.l R3-R7,-(sp)
+~i=R7
+~grp=R6
+~key=R5
+~line=R4
+~row=-2
+~col=-4
+*line 209
+move _hitcy,R0
+ext.l R0
+divs #14,R0
+move R0,-2(R14)
+*line 210
+move _hitcx,R0
+asr #3,R0
+move R0,-4(R14)
+*line 212
+move _hitbox,R0
+bra L19
+*line 213
+L20:
+*line 214
+*line 215
+*line 216
+*line 216
+tst _adnamsw
+bne L21
+tst -2(R14)
+bne L21
+*line 217
+*line 218
+*line 218
+cmp #1,-4(R14)
+blt L22
+cmp #7,-4(R14)
+bgt L22
+*line 219
+*line 220
+*line 220
+cmp #1,_admctl
+beq L23
+*line 221
+*line 222
+clr _lastam
+*line 223
+move #1,(sp)
+jsr _admenu
+*line 224
+bra L24
+L23:
+*line 225
+*line 226
+*line 227
+*line 227
+tst _lastam
+bne L25
+*line 228
+*line 229
+move #60,_lastam
+*line 230
+move #1,(sp)
+jsr _admenu
+*line 231
+bra L26
+L25:
+*line 232
+*line 233
+*line 234
+clr _lastam
+*line 235
+move #-1,(sp)
+jsr _admenu
+L26:
+*line 236
+L24:
+*line 237
+*line 238
+*line 239
+clr R0
+bra L17
+*line 240
+bra L27
+L22:
+*line 241
+*line 242
+*line 243
+jsr _enterit
+bra L17
+L27:
+*line 244
+*line 245
+*line 246
+L21:
+*line 247
+*line 247
+tst _adnamsw
+beq L28
+*line 248
+*line 249
+*line 249
+jsr _vtyper
+tst R0
+beq L29
+*line 250
+*line 251
+*line 251
+tst _asgmod
+bne L30
+*line 252
+*line 253
+move #1,_asgmod
+*line 254
+clr (sp)
+jsr _adswin
+*line 255
+L30:
+*line 256
+*line 257
+*line 258
+L29:bra L31
+L28:
+*line 259
+*line 260
+*line 261
+clr (sp)
+jsr _vbank
+*line 262
+*line 263
+*line 264
+move #3,(sp)
+jsr _exp_c
+move R0,(sp)
+move #181,-(sp)
+move #247,-(sp)
+move #140,-(sp)
+move #8,-(sp)
+move #128,-(sp)
+move.l _asgob,-(sp)
+jsr _vbfill4
+adda.l #14,sp
+*line 265
+*line 266
+move #14,(sp)
+move.l #_vtlin1,-(sp)
+move #1,-(sp)
+move #10,-(sp)
+move #11,-(sp)
+move #64,-(sp)
+move.l _asgob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 267
+move #14,(sp)
+move.l #_vtlin2,-(sp)
+move #1,-(sp)
+move #11,-(sp)
+move #11,-(sp)
+move #64,-(sp)
+move.l _asgob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 268
+move #14,(sp)
+move.l #_vtlin3,-(sp)
+move #1,-(sp)
+move #12,-(sp)
+move #11,-(sp)
+move #64,-(sp)
+move.l _asgob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 269
+*line 270
+move.l #_adpoint,_point
+*line 271
+*line 272
+*line 273
+*line 274
+move #10,(sp)
+move #139,-(sp)
+move #248,-(sp)
+move #139,-(sp)
+move #7,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 275
+*line 276
+*line 277
+*line 278
+move #10,(sp)
+move #181,-(sp)
+move #248,-(sp)
+move #139,-(sp)
+move #248,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 279
+*line 280
+*line 281
+*line 282
+move #10,(sp)
+move #181,-(sp)
+move #7,-(sp)
+move #181,-(sp)
+move #248,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 283
+*line 284
+*line 285
+*line 286
+move #10,(sp)
+move #139,-(sp)
+move #7,-(sp)
+move #181,-(sp)
+move #7,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 287
+*line 288
+*line 289
+*line 290
+*line 291
+*line 292
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 10(R8,R9.l),(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 8(R8,R9.l),-(sp)
+move.l #_endatyp,-(sp)
+move.l #_nokey,-(sp)
+move.l #_nokey,-(sp)
+move.l #_bspacur,-(sp)
+move.l #_advacur,-(sp)
+move #1,-(sp)
+move #10,-(sp)
+move.l #_caname,-(sp)
+move #1,-(sp)
+move.l #_vtdisp,-(sp)
+move.l _asgob,-(sp)
+jsr _vtsetup
+adda.l #40,sp
+*line 293
+*line 294
+move #1,_adnamsw
+*line 295
+move #1,_submenu
+L31:
+*line 296
+*line 297
+*line 298
+clr R0
+bra L17
+*line 299
+*line 300
+L32:
+*line 301
+*line 302
+*line 303
+*line 303
+cmp #1,-4(R14)
+blt L33
+cmp #4,-4(R14)
+bgt L33
+*line 304
+*line 305
+*line 306
+tst _curasg
+bne L34
+*line 306
+move #-1,R0
+bra L17
+*line 307
+L34:
+*line 308
+move _curasg,(sp)
+jsr _putasg
+*line 309
+clr (sp)
+jsr _adswin
+*line 310
+clr R0
+bra L17
+*line 311
+bra L35
+L33:
+*line 312
+*line 312
+cmp #6,-4(R14)
+blt L36
+cmp #10,-4(R14)
+bgt L36
+*line 313
+*line 314
+move _curasg,(sp)
+jsr _getasg
+*line 315
+jsr _awins
+*line 316
+clr R0
+bra L17
+*line 317
+*line 318
+L36:L35:L37:
+*line 319
+*line 320
+*line 321
+*line 321
+cmp #25,-4(R14)
+bne L38
+*line 322
+*line 323
+*line 324
+cmp #5,-2(R14)
+blt L10000
+cmp #8,-2(R14)
+ble L39
+L10000:*line 324
+move #-1,R0
+bra L17
+*line 325
+L39:
+*line 326
+move #256,R0
+move -2(R14),R9
+sub #5,R9
+add.l R9,R9
+add.l #_mctlnum,R9
+eor R0,(R9)
+*line 327
+*line 328
+*line 329
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L40
+*line 329
+clr (sp)
+jsr _vbank
+*line 330
+L40:
+*line 331
+move -2(R14),R0
+add #45,R0
+move.b R0,_bfs
+*line 332
+clr.b 1+_bfs
+*line 333
+*line 334
+*line 335
+*line 336
+*line 337
+move #14,(sp)
+move.l #_bfs,-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 14(R8,R9.l),-(sp)
+move -2(R14),-(sp)
+move -2(R14),R8
+sub #5,R8
+add.l R8,R8
+add.l #_mctlnum,R8
+btst #0,(R8)
+beq L10001
+move #13,-(sp)
+bra L10003
+L10001:move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 8(R8,R9.l),-(sp)
+L10003:move #64,-(sp)
+move.l _asgob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 338
+*line 339
+clr R0
+bra L17
+*line 340
+bra L41
+L38:
+*line 341
+*line 342
+*line 343
+jsr _enterit
+bra L17
+L41:
+*line 344
+*line 345
+*line 346
+L42:
+*line 347
+*line 348
+*line 349
+*line 350
+cmp #41,-4(R14)
+beq L10004
+cmp #42,-4(R14)
+beq L10004
+cmp #54,-4(R14)
+beq L10004
+cmp #55,-4(R14)
+bne L43
+L10004:cmp #3,-2(R14)
+bne L43
+*line 351
+*line 352
+*line 353
+*line 354
+*line 355
+tst _admctl
+beq L44
+*line 355
+clr (sp)
+jsr _admenu
+*line 356
+bra L45
+L44:
+*line 357
+move #-1,(sp)
+jsr _admenu
+L45:
+*line 358
+*line 359
+clr R0
+bra L17
+*line 360
+bra L46
+L43:
+*line 361
+*line 361
+cmp #39,-4(R14)
+bne L47
+*line 362
+*line 363
+*line 364
+cmp #4,-2(R14)
+blt L10005
+cmp #9,-2(R14)
+ble L48
+L10005:*line 364
+move #-1,R0
+bra L17
+*line 365
+*line 366
+*line 367
+L48:
+*line 368
+move -2(R14),R6
+sub #4,R6
+*line 369
+*line 370
+move #256,R0
+move R6,R9
+add.l R9,R9
+add.l #_ins2grp,R9
+eor R0,(R9)
+*line 371
+*line 372
+move R6,R0
+add #49,R0
+move.b R0,_bfs
+*line 373
+clr.b 1+_bfs
+*line 374
+*line 375
+*line 376
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L49
+*line 376
+clr (sp)
+jsr _vbank
+*line 377
+L49:
+*line 378
+*line 379
+*line 380
+move #14,(sp)
+move.l #_bfs,-(sp)
+move -4(R14),-(sp)
+move -2(R14),-(sp)
+move R6,R8
+add.l R8,R8
+add.l #_ins2grp,R8
+btst #0,(R8)
+beq L10006
+move #13,-(sp)
+bra L10008
+L10006:move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 8(R8,R9.l),-(sp)
+L10008:move #64,-(sp)
+move.l _asgob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 381
+*line 382
+clr R0
+bra L17
+*line 383
+*line 384
+bra L50
+L47:
+*line 385
+*line 385
+cmp #52,-4(R14)
+bne L51
+*line 386
+*line 387
+*line 388
+cmp #4,-2(R14)
+blt L10009
+cmp #9,-2(R14)
+ble L52
+L10009:*line 388
+move #-1,R0
+bra L17
+*line 389
+*line 390
+*line 391
+L52:
+*line 392
+move -2(R14),R6
+add #2,R6
+*line 393
+*line 394
+move #256,R0
+move R6,R9
+add.l R9,R9
+add.l #_ins2grp,R9
+eor R0,(R9)
+*line 395
+*line 396
+move R6,R0
+cmp #8,R6
+ble L10010
+move #163,R1
+bra L10012
+L10010:move #49,R1
+L10012:add R1,R0
+move.b R0,_bfs
+*line 397
+clr.b 1+_bfs
+*line 398
+*line 399
+*line 400
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L53
+*line 400
+clr (sp)
+jsr _vbank
+*line 401
+L53:
+*line 402
+*line 403
+*line 404
+move #14,(sp)
+move.l #_bfs,-(sp)
+move -4(R14),-(sp)
+move -2(R14),-(sp)
+move R6,R8
+add.l R8,R8
+add.l #_ins2grp,R8
+btst #0,(R8)
+beq L10013
+move #13,-(sp)
+bra L10015
+L10013:move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 8(R8,R9.l),-(sp)
+L10015:move #64,-(sp)
+move.l _asgob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 405
+*line 406
+clr R0
+bra L17
+*line 407
+bra L54
+L51:
+*line 408
+*line 409
+*line 410
+jsr _enterit
+bra L17
+L54:L50:L46:
+*line 411
+*line 412
+*line 413
+L55:
+*line 414
+*line 415
+*line 416
+*line 417
+cmp #-1,_admctl
+beq L56
+*line 417
+move #-1,R0
+bra L17
+*line 418
+L56:
+*line 419
+*line 419
+tst _asghit
+beq L57
+*line 420
+*line 421
+*line 421
+move _hitcy,R0
+ext.l R0
+divs #14,R0
+cmp _asghit,R0
+bne L58
+*line 422
+*line 423
+*line 424
+*line 425
+move _asghit,R6
+add #-11,R6
+*line 426
+move R6,R4
+muls #14,R4
+add #158,R4
+*line 427
+clr R5
+*line 428
+*line 429
+clr R7
+bra L61
+L62:
+*line 430
+*line 431
+*line 432
+move R7,R8
+add.l R8,R8
+move.l #_asgkble,R9
+move 0(R8,R9.l),R0
+add #24,R0
+cmp _hitcx,R0
+bgt L63
+move R7,R8
+add.l R8,R8
+move.l #_asgkble,R9
+move 0(R8,R9.l),R0
+cmp #87,R7
+bne L10016
+move #31,R1
+bra L10018
+L10016:move #28,R1
+L10018:add R1,R0
+cmp _hitcx,R0
+blt L63
+*line 432
+move R7,R5
+add #1,R5
+*line 433
+L63:L60:
+*line 429
+add #1,R7
+L61:
+*line 429
+cmp #88,R7
+blt L62
+L59:
+*line 434
+*line 435
+move R5,R0
+sub #1,R5
+tst R0
+bne L64
+*line 435
+move #-1,R0
+bra L17
+*line 436
+L64:
+*line 437
+*line 437
+cmp _asgfks,R5
+bge L65
+*line 438
+*line 439
+move _asgfks,R7
+*line 440
+move R5,_asgfks
+*line 441
+move R7,R5
+*line 442
+*line 443
+L65:
+*line 444
+move _asgfks,R7
+bra L68
+L69:
+*line 445
+move #1,R0
+move R6,R1
+asl R1,R0
+move R7,R9
+add.l R9,R9
+add.l #_key2grp,R9
+eor R0,(R9)
+L67:
+*line 444
+add #1,R7
+L68:
+*line 444
+cmp R5,R7
+ble L69
+L66:
+*line 445
+*line 446
+*line 447
+move R6,(sp)
+jsr _drawk2g
+*line 448
+clr _asghit
+*line 449
+*line 450
+*line 450
+tst _asgmod
+bne L70
+*line 451
+*line 452
+move #1,_asgmod
+*line 453
+clr (sp)
+jsr _adswin
+*line 454
+*line 455
+L70:bra L71
+L58:
+*line 456
+*line 457
+*line 458
+*line 459
+*line 460
+move _asghit,(sp)
+add #-11,(sp)
+jsr _drawk2g
+*line 461
+clr _asghit
+L71:
+*line 462
+*line 463
+*line 464
+bra L72
+L57:
+*line 465
+*line 466
+*line 467
+*line 468
+*line 469
+move _hitcy,R0
+ext.l R0
+divs #14,R0
+move R0,_asghit
+*line 470
+move _asghit,R6
+add #-11,R6
+*line 471
+*line 472
+*line 472
+move R6,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_grp2prt,R8
+cmp #1,(R8)
+beq L73
+*line 473
+*line 474
+clr _asghit
+*line 475
+move #-1,R0
+bra L17
+*line 476
+*line 477
+L73:
+*line 478
+move R6,R4
+muls #14,R4
+add #158,R4
+*line 479
+clr R5
+*line 480
+*line 481
+clr R7
+bra L76
+L77:
+*line 482
+*line 483
+*line 484
+move R7,R8
+add.l R8,R8
+move.l #_asgkble,R9
+move 0(R8,R9.l),R0
+add #24,R0
+cmp _hitcx,R0
+bgt L78
+move R7,R8
+add.l R8,R8
+move.l #_asgkble,R9
+move 0(R8,R9.l),R0
+cmp #87,R7
+bne L10019
+move #31,R1
+bra L10021
+L10019:move #28,R1
+L10021:add R1,R0
+cmp _hitcx,R0
+blt L78
+*line 484
+move R7,R5
+add #1,R5
+*line 485
+L78:L75:
+*line 481
+add #1,R7
+L76:
+*line 481
+cmp #88,R7
+blt L77
+L74:
+*line 486
+*line 486
+move R5,R0
+sub #1,R5
+tst R0
+bne L79
+*line 487
+*line 488
+clr _asghit
+*line 489
+move #-1,R0
+bra L17
+*line 490
+*line 491
+L79:
+*line 492
+move R5,_asgfks
+*line 493
+*line 494
+*line 495
+*line 496
+move #13,(sp)
+jsr _exp_c
+move R0,(sp)
+move R4,-(sp)
+add #3,(sp)
+move R5,R8
+add.l R8,R8
+move.l #_asgkble,R9
+move 0(R8,R9.l),-(sp)
+cmp #87,R5
+bne L10022
+move #31,R0
+bra L10024
+L10022:move #28,R0
+L10024:add R0,(sp)
+move R4,-(sp)
+move R5,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 497
+L72:
+*line 498
+*line 499
+*line 500
+clr R0
+bra L17
+*line 501
+L80:
+*line 502
+*line 503
+*line 504
+tst _auxctl
+beq L10025
+clr (sp)
+bra L10026
+L10025:move #1,(sp)
+L10026:jsr _setaux
+*line 505
+move #8,(sp)
+jsr _adswin
+*line 506
+clr R0
+bra L17
+*line 507
+L81:
+*line 508
+*line 509
+*line 510
+*line 510
+cmp #6,-4(R14)
+blt L82
+cmp #8,-4(R14)
+bgt L82
+*line 511
+*line 512
+*line 513
+cmp #2,_admctl
+beq L83
+*line 513
+move #2,(sp)
+jsr _admenu
+*line 514
+bra L84
+L83:
+*line 515
+move #-1,(sp)
+jsr _admenu
+L84:
+*line 516
+*line 517
+clr R0
+bra L17
+*line 518
+bra L85
+L82:
+*line 519
+*line 520
+*line 521
+jsr _enterit
+bra L17
+L85:
+*line 522
+bra L18
+L19:cmp #9,R0
+bhi L18
+asl #2,R0
+move R0,R8
+add.l #L86,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L86:.dc.l L20
+.dc.l L32
+.dc.l L18
+.dc.l L18
+.dc.l L18
+.dc.l L37
+.dc.l L42
+.dc.l L55
+.dc.l L80
+.dc.l L81
+.text
+L18:
+*line 525
+move #-1,R0
+bra L17
+L17:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.data
Index: alcyon/asgdsp.s
===================================================================
--- alcyon/asgdsp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/asgdsp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,3434 @@
+.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
Index: alcyon/asgvce.s
===================================================================
--- alcyon/asgvce.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/asgvce.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,924 @@
+.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 _clksrc
+.globl _curasg
+.globl _legato
+.globl _lstbgnc
+.globl _lstendc
+.globl _lstflag
+.globl _ndisp
+.globl _newflag
+.globl _nkdown
+.globl _recsw
+.globl _sd
+.globl _se
+.globl _stepenb
+.globl _stepint
+.globl _stepwgt
+.globl _velflag
+.globl _grpmode
+.globl _grpstat
+.globl _ins2grp
+.globl _vce2grp
+.globl _lastvce
+.globl _lastvel
+.globl _tuntab
+.globl _vce2trg
+.globl _stepfrm
+.globl _obj8
+.globl _gdstbc
+.globl _lstbgns
+.globl _lstends
+.globl _nefree
+.globl _nelist
+.globl _nevents
+.globl _clrnl
+.text
+_clrnl:
+~~clrnl:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 90
+clr R7
+bra L4
+L5:
+*line 91
+*line 92
+move R7,R0
+add #1,R0
+asl #3,R0
+ext.l R0
+add.l #_nevents,R0
+move R7,R1
+asl #3,R1
+ext.l R1
+add.l #_nevents,R1
+move.l R1,R9
+move.l R0,(R9)
+*line 93
+move R7,R0
+asl #3,R0
+ext.l R0
+add.l #_nevents,R0
+move.l R0,R8
+clr 4(R8)
+*line 94
+move R7,R0
+asl #3,R0
+ext.l R0
+add.l #_nevents,R0
+move.l R0,R8
+clr 4(R8)
+L3:
+*line 90
+add #1,R7
+L4:
+*line 90
+cmp #31,R7
+blt L5
+L2:
+*line 97
+clr.l 248+_nevents
+*line 99
+clr.l _nelist
+*line 100
+move.l #_nevents,_nefree
+*line 101
+clr _nkdown
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _ne_end
+.text
+_ne_end:
+~~ne_end:
+~grp=R7
+~trg=8
+link R14,#0
+movem.l R4-R7/R12-R13,-(sp)
+~nn=R6
+~fcend=R5
+~nx=R13
+~ep=R12
+*line 124
+move 10(R14),R7
+*line 128
+*line 128
+tst _recsw
+beq L10000
+move R7,R8
+add.l R8,R8
+add.l #_grpmode,R8
+cmp #2,(R8)
+beq L7
+L10000:*line 129
+*line 130
+bra L6
+*line 131
+*line 132
+*line 133
+L7:
+*line 138
+*line 139
+cmp #1,_sd
+bne L8
+*line 139
+jsr _chgsdf
+*line 140
+L8:
+*line 141
+*line 142
+cmp #1,_se
+bne L9
+*line 142
+jsr _chgsef
+*line 143
+*line 144
+L9:
+*line 145
+move 8(R14),R6
+and #127,R6
+*line 147
+*line 147
+cmp #6,_clksrc
+beq L10
+*line 148
+*line 149
+*line 150
+*line 151
+*line 151
+move #5,(sp)
+jsr _e_alc
+move.l R0,R12
+move.l R12,R0
+beq L11
+*line 152
+*line 153
+*line 154
+move.l _t_cur,(R12)
+*line 155
+move.b #134,5(R12)
+*line 156
+move.b R6,6(R12)
+*line 157
+move.b R7,7(R12)
+*line 158
+move #16128,16(R12)
+*line 159
+*line 160
+*line 161
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 162
+*line 163
+*line 164
+move.l _t_cur,R0
+cmp.l _t_ctr,R0
+bne L12
+*line 164
+move #1,_newflag
+*line 165
+L12:
+*line 166
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R12,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 167
+bra L13
+L11:
+*line 168
+*line 169
+*line 170
+L13:
+*line 171
+*line 172
+*line 173
+bra L6
+*line 174
+*line 175
+*line 176
+bra L14
+L10:
+*line 177
+*line 177
+cmp #1,_nkdown
+blt L15
+*line 178
+*line 179
+*line 180
+*line 181
+*line 181
+sub #1,_nkdown
+bne L16
+*line 182
+*line 183
+*line 183
+tst _stepenb
+beq L17
+*line 184
+*line 185
+*line 186
+*line 187
+*line 188
+move _stepint,R8
+add.l R8,R8
+move.l #_stepfrm,R9
+move 102(R8,R9.l),R0
+ext.l R0
+move.l R0,R5
+add.l _fc_val,R5
+*line 189
+move _stepwgt,R0
+muls #34,R0
+move _stepint,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_stepfrm,R9
+move 0(R8,R9.l),R0
+ext.l R0
+add.l R0,_fc_val
+*line 190
+move.l _fc_val,(sp)
+jsr _sc_trek
+*line 191
+move.l _fc_val,(sp)
+jsr _sc_trak
+*line 192
+*line 193
+*line 194
+L17:
+*line 195
+bra L20
+L19:
+*line 196
+*line 197
+move.l _nelist,R8
+move 6(R8),R6
+*line 198
+move.l _nelist,R8
+move 4(R8),R7
+*line 199
+*line 200
+*line 200
+move #5,(sp)
+jsr _e_alc
+move.l R0,R12
+move.l R12,R0
+beq L21
+*line 201
+*line 202
+*line 203
+move.l _t_cur,(R12)
+*line 204
+move.b #134,5(R12)
+*line 205
+move.b R6,6(R12)
+*line 206
+move.b R7,7(R12)
+*line 207
+move #16128,16(R12)
+*line 208
+*line 209
+*line 210
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 211
+*line 212
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R12,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 213
+*line 214
+*line 215
+cmp #48,_lstendc
+bge L22
+*line 215
+move _lstendc,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_lstends,R8
+move.l R12,(R8)
+add #1,_lstendc
+*line 216
+L22:bra L23
+L21:
+*line 217
+*line 218
+*line 219
+L23:
+*line 220
+*line 221
+*line 222
+*line 223
+*line 224
+move.l _nelist,R8
+move.l (R8),R13
+*line 225
+move.l _nelist,R8
+move.l _nefree,(R8)
+*line 226
+move.l _nelist,_nefree
+*line 227
+move.l R13,_nelist
+L20:
+*line 228
+tst.l _nelist
+bne L19
+L18:
+*line 229
+*line 230
+move #1,_lstflag
+*line 231
+*line 232
+*line 233
+*line 234
+*line 234
+tst _stepenb
+beq L24
+*line 235
+*line 236
+*line 236
+cmp.l _fc_val,R5
+ble L25
+*line 237
+*line 238
+*line 239
+move.l R5,_fc_val
+*line 240
+move.l _fc_val,(sp)
+jsr _sc_trek
+*line 241
+move.l _fc_val,(sp)
+jsr _sc_trak
+*line 242
+L25:
+*line 243
+L24:
+*line 244
+*line 245
+L16:bra L26
+L15:
+*line 246
+*line 247
+*line 248
+clr _nkdown
+*line 249
+*line 250
+clr _lstendc
+*line 251
+clr _lstbgnc
+*line 252
+clr _lstflag
+L26:L14:L6:tst.l (sp)+
+movem.l (sp)+,R5-R7/R12-R13
+unlk R14
+rts
+.globl _ne_bgn
+.text
+_ne_bgn:
+~~ne_bgn:
+~grp=R7
+~key=R6
+~vel=R5
+link R14,#0
+movem.l R4-R7/R12-R13,-(sp)
+~ep=R13
+~np=R12
+*line 273
+move 8(R14),R7
+*line 273
+move 10(R14),R6
+*line 273
+move 12(R14),R5
+*line 277
+*line 277
+tst _recsw
+beq L28
+move R7,R8
+add.l R8,R8
+add.l #_grpmode,R8
+cmp #2,(R8)
+bne L28
+*line 278
+*line 279
+*line 280
+*line 281
+*line 282
+*line 283
+*line 284
+cmp #1,_sd
+bne L29
+*line 284
+jsr _chgsdf
+*line 285
+L29:
+*line 286
+*line 287
+cmp #1,_se
+bne L30
+*line 287
+jsr _chgsef
+*line 288
+L30:
+*line 289
+*line 289
+tst _lstflag
+beq L31
+*line 290
+*line 291
+clr _lstbgnc
+*line 292
+clr _lstendc
+*line 293
+clr _lstflag
+*line 294
+*line 295
+L31:
+*line 296
+*line 296
+cmp #6,_clksrc
+bne L32
+*line 297
+*line 298
+*line 299
+add #1,_nkdown
+*line 300
+*line 301
+*line 301
+tst.l _nefree
+beq L33
+*line 302
+*line 303
+move.l _nefree,R12
+*line 304
+move.l (R12),_nefree
+*line 305
+move R6,6(R12)
+*line 306
+move R7,4(R12)
+*line 307
+move.l _nelist,(R12)
+*line 308
+move.l R12,_nelist
+*line 309
+*line 310
+bra L34
+L33:
+*line 311
+*line 312
+*line 313
+L34:
+*line 314
+*line 315
+*line 316
+*line 317
+L32:
+*line 318
+*line 318
+move #5,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L35
+*line 319
+*line 320
+*line 321
+move.l _t_cur,(R13)
+*line 322
+move.b #133,5(R13)
+*line 323
+move.b R6,6(R13)
+*line 324
+move.b R7,7(R13)
+*line 325
+cmp #6,_clksrc
+bne L10001
+move #16128,R0
+bra L10003
+L10001:move R5,R0
+L10003:move R0,16(R13)
+*line 326
+*line 327
+*line 328
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 329
+*line 330
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 331
+*line 332
+*line 333
+move.l _t_cur,R0
+cmp.l _t_ctr,R0
+bne L36
+*line 333
+move #1,_newflag
+*line 334
+L36:
+*line 335
+*line 336
+cmp #6,_clksrc
+bne L37
+cmp #48,_lstbgnc
+bge L37
+*line 336
+move _lstbgnc,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_lstbgns,R8
+move.l R13,(R8)
+add #1,_lstbgnc
+*line 337
+L37:bra L38
+L35:
+*line 338
+*line 339
+*line 340
+L38:
+*line 341
+*line 342
+*line 343
+L28:L27:tst.l (sp)+
+movem.l (sp)+,R5-R7/R12-R13
+unlk R14
+rts
+.globl _showvel
+.text
+_showvel:
+~~showvel:
+~g=8
+~v=10
+link R14,#-10
+~buf=-6
+*line 361
+*line 362
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L40
+*line 362
+clr (sp)
+jsr _vbank
+*line 363
+L40:
+*line 364
+move 8(R14),R8
+add.l R8,R8
+add.l #_lastvel,R8
+move 10(R14),(R8)
+*line 366
+move 10(R14),R0
+ext.l R0
+divs #252,R0
+move R0,(sp)
+move.l #L41,-(sp)
+move.l R14,-(sp)
+sub.l #6,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 368
+move #18,(sp)
+move.l R14,-(sp)
+sub.l #6,(sp)
+move 8(R14),R0
+muls #5,R0
+move R0,-(sp)
+add #6,(sp)
+move #5,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+L39:unlk R14
+rts
+.globl _asgvce
+.text
+_asgvce:
+~~asgvce:
+~grp=8
+~port=10
+~chan=12
+~key=14
+~vel=16
+link R14,#0
+movem.l R2-R7/R12-R13,-(sp)
+~i=R7
+~tv=R6
+~vp=R5
+~trg=R4
+~aflag=R3
+~np=R13
+~ep=R12
+*line 393
+move 10(R14),R4
+move #11,R0
+asl R0,R4
+move 12(R14),R0
+asl #7,R0
+add R0,R4
+add 14(R14),R4
+*line 394
+move 8(R14),R8
+add.l R8,R8
+add.l #_lastvce,R8
+move (R8),R5
+add #1,R5
+*line 395
+cmp #11,R5
+ble L10004
+clr R0
+bra L10006
+L10004:move R5,R0
+L10006:move R0,R5
+*line 402
+move #12,R7
+bra L45
+L46:
+*line 403
+*line 404
+*line 404
+move R5,R8
+add.l R8,R8
+add.l #_vce2trg,R8
+cmp #-1,(R8)
+bne L47
+move R5,R8
+add.l R8,R8
+move.l #_vce2grp,R9
+move 0(R8,R9.l),R0
+move 8(R14),R1
+add #1,R1
+cmp R1,R0
+bne L47
+*line 405
+*line 406
+*line 407
+cmp #2,_ndisp
+bne L48
+tst _velflag
+beq L48
+tst _recsw
+bne L48
+*line 407
+move 16(R14),(sp)
+move 8(R14),-(sp)
+jsr _showvel
+addq.l #2,sp
+*line 408
+L48:
+*line 409
+move 8(R14),R8
+add.l R8,R8
+add.l #_lastvce,R8
+move R5,(R8)
+*line 410
+clr (sp)
+move R5,-(sp)
+move 14(R14),R8
+add.l R8,R8
+move.l #_tuntab,R9
+move 0(R8,R9.l),-(sp)
+move R4,-(sp)
+jsr _execkey
+addq.l #6,sp
+*line 411
+bra L42
+*line 412
+*line 413
+*line 414
+L47:
+*line 415
+*line 416
+add #1,R5
+move R5,R0
+cmp #11,R0
+ble L49
+*line 416
+clr R5
+L49:L44:L45:
+*line 402
+move R7,R0
+sub #1,R7
+tst R0
+bne L46
+L43:
+*line 421
+move #12,R7
+bra L52
+L53:
+*line 422
+*line 423
+move R5,R8
+add.l R8,R8
+add.l #_vce2trg,R8
+move (R8),R6
+*line 424
+*line 425
+*line 426
+cmp #-1,R6
+bne L54
+*line 426
+move #1,R3
+bra L55
+L54:
+*line 427
+*line 428
+move R6,R0
+and #-16384,R0
+bne L56
+*line 428
+move #1,R3
+*line 429
+bra L57
+L56:
+*line 430
+clr R3
+L57:L55:
+*line 431
+*line 432
+*line 432
+tst R3
+beq L58
+move R5,R8
+add.l R8,R8
+move.l #_vce2grp,R9
+move 0(R8,R9.l),R0
+move 8(R14),R1
+add #1,R1
+cmp R1,R0
+bne L58
+*line 433
+*line 434
+*line 435
+*line 436
+move 8(R14),R8
+add.l R8,R8
+add.l #_ins2grp,R8
+btst #0,(R8)
+beq L59
+cmp R4,R6
+beq L59
+cmp #-1,R6
+beq L59
+*line 436
+move #1,_legato
+*line 437
+L59:
+*line 438
+*line 439
+cmp #2,_ndisp
+bne L60
+tst _velflag
+beq L60
+tst _recsw
+bne L60
+*line 439
+move 16(R14),(sp)
+move 8(R14),-(sp)
+jsr _showvel
+addq.l #2,sp
+*line 440
+L60:
+*line 441
+move 8(R14),R8
+add.l R8,R8
+add.l #_lastvce,R8
+move R5,(R8)
+*line 442
+clr (sp)
+move R5,-(sp)
+move 14(R14),R8
+add.l R8,R8
+move.l #_tuntab,R9
+move 0(R8,R9.l),-(sp)
+move R4,-(sp)
+jsr _execkey
+addq.l #6,sp
+*line 443
+bra L42
+*line 444
+*line 445
+*line 446
+L58:
+*line 447
+*line 448
+add #1,R5
+move R5,R0
+cmp #11,R0
+ble L61
+*line 448
+clr R5
+L61:L51:L52:
+*line 421
+move R7,R0
+sub #1,R7
+tst R0
+bne L53
+L50:L42:tst.l (sp)+
+movem.l (sp)+,R3-R7/R12-R13
+unlk R14
+rts
+.data
+L41:.dc.b $25,$30,$33,$64,$0
Index: alcyon/atoi.s
===================================================================
--- alcyon/atoi.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/atoi.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,71 @@
+.globl ___atab
+.globl _atoi
+.text
+_atoi:
+~~atoi:
+~cp=R13
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~i=R7
+~sign=R6
+*line 18
+move.l 8(R14),R13
+*line 18
+clr R6
+*line 20
+*line 20
+cmp.b #45,(R13)
+bne L2
+*line 21
+*line 22
+add.l #1,R13
+*line 23
+move #1,R6
+*line 24
+bra L3
+L2:
+*line 25
+*line 26
+*line 27
+*line 28
+cmp.b #43,(R13)
+bne L4
+*line 28
+add.l #1,R13
+L4:L3:
+*line 31
+clr R7
+bra L7
+L8:
+*line 32
+mulu #10,R7
+move.b (R13)+,R0
+ext.w R0
+and #127,R0
+add R0,R7
+add #-48,R7
+L6:L7:
+*line 31
+move.b (R13),R0
+ext.w R0
+ext.l R0
+add.l #___atab,R0
+move.l R0,R8
+btst #2,(R8)
+bne L8
+L5:
+*line 34
+tst R6
+beq L10000
+clr R0
+move R7,R0
+neg R0
+bra L10002
+L10000:clr R0
+move R7,R0
+L10002:bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/atol.s
===================================================================
--- alcyon/atol.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/atol.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,73 @@
+.globl ___atab
+.globl _atol
+.text
+_atol:
+~~atol:
+~cp=R13
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~n=R7
+~sign=R6
+*line 18
+move.l 8(R14),R13
+*line 18
+clr R6
+*line 20
+*line 20
+cmp.b #45,(R13)
+bne L2
+*line 21
+*line 22
+add.l #1,R13
+*line 23
+move #1,R6
+*line 24
+bra L3
+L2:
+*line 25
+*line 26
+*line 27
+*line 28
+cmp.b #43,(R13)
+bne L4
+*line 28
+add.l #1,R13
+L4:L3:
+*line 31
+clr.l R7
+bra L7
+L8:
+*line 32
+move.l #$a,-(sp)
+move.l R7,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,R7
+move.b (R13)+,R0
+ext.w R0
+ext.l R0
+add.l R0,R7
+add.l #$ffffffd0,R7
+L6:L7:
+*line 31
+move.b (R13),R0
+ext.w R0
+ext.l R0
+add.l #___atab,R0
+move.l R0,R8
+btst #2,(R8)
+bne L8
+L5:
+*line 34
+tst R6
+beq L10000
+move.l R7,R0
+neg.l R0
+bra L10002
+L10000:move.l R7,R0
+L10002:bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/barbadj.s
===================================================================
--- alcyon/barbadj.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/barbadj.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1199 @@
+.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 _lcdx
+.globl _lcdy
+.globl _lcdbit
+.globl _lcdrow
+.globl _lcdcol
+.globl _lcdbase
+.globl _lcdctl1
+.globl _lcdctl2
+.globl _BarBcur
+.globl _BarCcur
+.globl _BarCols
+.data
+_BarCols:
+.dc.w $2
+.dc.w $8
+.dc.w $E
+.dc.w $14
+.dc.w $1A
+.dc.w $20
+.dc.w $26
+.dc.w $2C
+.dc.w $32
+.dc.w $38
+.dc.w $3E
+.dc.w $44
+.dc.w $4A
+.dc.w $50
+.globl _BarDots
+.data
+_BarDots:
+.dc.w $1C
+.dc.w $FC
+.dc.w $E0
+.globl _BBase
+.data
+_BBase:
+.dc.w $9
+.globl _BCenter
+.data
+_BCenter:
+.dc.w $20
+.globl _BTop
+.data
+_BTop:
+.dc.w $35
+.globl _BOffset
+.data
+_BOffset:
+.dc.w $80
+.globl _BarBLn
+.data
+_BarBLn:
+.dc.w $9
+.dc.w $A
+.dc.w $A
+.dc.w $B
+.dc.w $B
+.dc.w $B
+.dc.w $C
+.dc.w $C
+.dc.w $C
+.dc.w $D
+.dc.w $D
+.dc.w $D
+.dc.w $E
+.dc.w $E
+.dc.w $E
+.dc.w $F
+.dc.w $F
+.dc.w $F
+.dc.w $10
+.dc.w $10
+.dc.w $10
+.dc.w $11
+.dc.w $11
+.dc.w $11
+.dc.w $12
+.dc.w $12
+.dc.w $12
+.dc.w $13
+.dc.w $13
+.dc.w $13
+.dc.w $14
+.dc.w $14
+.dc.w $14
+.dc.w $15
+.dc.w $15
+.dc.w $16
+.dc.w $16
+.dc.w $16
+.dc.w $17
+.dc.w $17
+.dc.w $17
+.dc.w $18
+.dc.w $18
+.dc.w $18
+.dc.w $19
+.dc.w $19
+.dc.w $19
+.dc.w $1A
+.dc.w $1A
+.dc.w $1A
+.dc.w $1B
+.dc.w $1B
+.dc.w $1B
+.dc.w $1C
+.dc.w $1C
+.dc.w $1C
+.dc.w $1D
+.dc.w $1D
+.dc.w $1D
+.dc.w $1E
+.dc.w $1E
+.dc.w $1E
+.dc.w $1F
+.dc.w $1F
+.dc.w $1F
+.dc.w $20
+.dc.w $20
+.dc.w $20
+.dc.w $21
+.dc.w $21
+.dc.w $22
+.dc.w $22
+.dc.w $22
+.dc.w $23
+.dc.w $23
+.dc.w $23
+.dc.w $24
+.dc.w $24
+.dc.w $24
+.dc.w $25
+.dc.w $25
+.dc.w $25
+.dc.w $26
+.dc.w $26
+.dc.w $26
+.dc.w $27
+.dc.w $27
+.dc.w $27
+.dc.w $28
+.dc.w $28
+.dc.w $28
+.dc.w $29
+.dc.w $29
+.dc.w $29
+.dc.w $2A
+.dc.w $2A
+.dc.w $2A
+.dc.w $2B
+.dc.w $2B
+.dc.w $2B
+.dc.w $2C
+.dc.w $2C
+.dc.w $2C
+.dc.w $2D
+.dc.w $2D
+.dc.w $2E
+.dc.w $2E
+.dc.w $2E
+.dc.w $2F
+.dc.w $2F
+.dc.w $2F
+.dc.w $30
+.dc.w $30
+.dc.w $30
+.dc.w $31
+.dc.w $31
+.dc.w $31
+.dc.w $32
+.dc.w $32
+.dc.w $32
+.dc.w $33
+.dc.w $33
+.dc.w $33
+.dc.w $34
+.dc.w $34
+.dc.w $34
+.dc.w $35
+.dc.w $35
+.globl _BarCLn
+.data
+_BarCLn:
+.dc.w $9
+.dc.w $9
+.dc.w $9
+.dc.w $9
+.dc.w $9
+.dc.w $A
+.dc.w $A
+.dc.w $A
+.dc.w $A
+.dc.w $A
+.dc.w $B
+.dc.w $B
+.dc.w $B
+.dc.w $B
+.dc.w $B
+.dc.w $B
+.dc.w $C
+.dc.w $C
+.dc.w $C
+.dc.w $C
+.dc.w $C
+.dc.w $D
+.dc.w $D
+.dc.w $D
+.dc.w $D
+.dc.w $D
+.dc.w $D
+.dc.w $E
+.dc.w $E
+.dc.w $E
+.dc.w $E
+.dc.w $E
+.dc.w $E
+.dc.w $F
+.dc.w $F
+.dc.w $F
+.dc.w $F
+.dc.w $F
+.dc.w $10
+.dc.w $10
+.dc.w $10
+.dc.w $10
+.dc.w $10
+.dc.w $10
+.dc.w $11
+.dc.w $11
+.dc.w $11
+.dc.w $11
+.dc.w $11
+.dc.w $12
+.dc.w $12
+.dc.w $12
+.dc.w $12
+.dc.w $12
+.dc.w $12
+.dc.w $13
+.dc.w $13
+.dc.w $13
+.dc.w $13
+.dc.w $13
+.dc.w $14
+.dc.w $14
+.dc.w $14
+.dc.w $14
+.dc.w $14
+.dc.w $14
+.dc.w $15
+.dc.w $15
+.dc.w $15
+.dc.w $15
+.dc.w $15
+.dc.w $15
+.dc.w $16
+.dc.w $16
+.dc.w $16
+.dc.w $16
+.dc.w $16
+.dc.w $17
+.dc.w $17
+.dc.w $17
+.dc.w $17
+.dc.w $17
+.dc.w $17
+.dc.w $18
+.dc.w $18
+.dc.w $18
+.dc.w $18
+.dc.w $18
+.dc.w $19
+.dc.w $19
+.dc.w $19
+.dc.w $19
+.dc.w $19
+.dc.w $19
+.dc.w $1A
+.dc.w $1A
+.dc.w $1A
+.dc.w $1A
+.dc.w $1A
+.dc.w $1A
+.dc.w $1B
+.dc.w $1B
+.dc.w $1B
+.dc.w $1B
+.dc.w $1B
+.dc.w $1C
+.dc.w $1C
+.dc.w $1C
+.dc.w $1C
+.dc.w $1C
+.dc.w $1C
+.dc.w $1D
+.dc.w $1D
+.dc.w $1D
+.dc.w $1D
+.dc.w $1D
+.dc.w $1E
+.dc.w $1E
+.dc.w $1E
+.dc.w $1E
+.dc.w $1E
+.dc.w $1E
+.dc.w $1F
+.dc.w $1F
+.dc.w $1F
+.dc.w $1F
+.dc.w $1F
+.dc.w $1F
+.dc.w $20
+.dc.w $21
+.dc.w $21
+.dc.w $21
+.dc.w $21
+.dc.w $21
+.dc.w $21
+.dc.w $22
+.dc.w $22
+.dc.w $22
+.dc.w $22
+.dc.w $22
+.dc.w $22
+.dc.w $23
+.dc.w $23
+.dc.w $23
+.dc.w $23
+.dc.w $23
+.dc.w $23
+.dc.w $24
+.dc.w $24
+.dc.w $24
+.dc.w $24
+.dc.w $24
+.dc.w $24
+.dc.w $25
+.dc.w $25
+.dc.w $25
+.dc.w $25
+.dc.w $25
+.dc.w $25
+.dc.w $26
+.dc.w $26
+.dc.w $26
+.dc.w $26
+.dc.w $26
+.dc.w $26
+.dc.w $27
+.dc.w $27
+.dc.w $27
+.dc.w $27
+.dc.w $27
+.dc.w $27
+.dc.w $28
+.dc.w $28
+.dc.w $28
+.dc.w $28
+.dc.w $28
+.dc.w $28
+.dc.w $29
+.dc.w $29
+.dc.w $29
+.dc.w $29
+.dc.w $29
+.dc.w $29
+.dc.w $2A
+.dc.w $2A
+.dc.w $2A
+.dc.w $2A
+.dc.w $2A
+.dc.w $2A
+.dc.w $2B
+.dc.w $2B
+.dc.w $2B
+.dc.w $2B
+.dc.w $2B
+.dc.w $2B
+.dc.w $2B
+.dc.w $2C
+.dc.w $2C
+.dc.w $2C
+.dc.w $2C
+.dc.w $2C
+.dc.w $2C
+.dc.w $2D
+.dc.w $2D
+.dc.w $2D
+.dc.w $2D
+.dc.w $2D
+.dc.w $2D
+.dc.w $2E
+.dc.w $2E
+.dc.w $2E
+.dc.w $2E
+.dc.w $2E
+.dc.w $2E
+.dc.w $2F
+.dc.w $2F
+.dc.w $2F
+.dc.w $2F
+.dc.w $2F
+.dc.w $2F
+.dc.w $30
+.dc.w $30
+.dc.w $30
+.dc.w $30
+.dc.w $30
+.dc.w $30
+.dc.w $31
+.dc.w $31
+.dc.w $31
+.dc.w $31
+.dc.w $31
+.dc.w $31
+.dc.w $32
+.dc.w $32
+.dc.w $32
+.dc.w $32
+.dc.w $32
+.dc.w $32
+.dc.w $33
+.dc.w $33
+.dc.w $33
+.dc.w $33
+.dc.w $33
+.dc.w $33
+.dc.w $34
+.dc.w $34
+.dc.w $34
+.dc.w $34
+.dc.w $34
+.dc.w $34
+.dc.w $35
+.dc.w $35
+.dc.w $35
+.dc.w $35
+.dc.w $35
+.dc.w $35
+.globl _BarBadj
+.text
+_BarBadj:
+~~BarBadj:
+~bar=8
+~val=10
+link R14,#-10
+movem.l R3-R7,-(sp)
+~bardot=R7
+~barpos=R6
+~curdif=R5
+~baradr=R4
+~barcol=-2
+~bardif=-4
+~curbar=-6
+~i=-8
+~newbar=-10
+*line 66
+move 10(R14),R8
+add.l R8,R8
+add.l #_BarBLn,R8
+move (R8),-10(R14)
+*line 67
+move 8(R14),R8
+add.l R8,R8
+add.l #_BarBcur,R8
+move (R8),-6(R14)
+*line 68
+move -10(R14),R0
+sub -6(R14),R0
+move R0,-4(R14)
+*line 70
+*line 71
+tst -4(R14)
+beq L1
+*line 72
+*line 73
+move #1,(sp)
+jsr _GLCcurs
+*line 74
+move 8(R14),R8
+add.l R8,R8
+add.l #_BarCols,R8
+move (R8),-2(R14)
+*line 76
+*line 76
+tst -4(R14)
+ble L2
+*line 77
+*line 78
+*line 79
+*line 80
+move #63,R4
+move -6(R14),R0
+add #1,R0
+sub R0,R4
+mulu #85,R4
+add -2(R14),R4
+add #8192,R4
+*line 81
+*line 82
+move #78,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 83
+*line 84
+clr -8(R14)
+bra L5
+L6:
+*line 85
+*line 86
+move -4(R14),R5
+*line 87
+move -8(R14),R8
+add.l R8,R8
+add.l #_BarDots,R8
+move (R8),R7
+*line 88
+*line 89
+move #70,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 90
+clr R0
+move R4,R0
+and #255,R0
+move.b R0,_lcd_a0
+*line 91
+clr R0
+move R4,R0
+lsr #8,R0
+and #255,R0
+move.b R0,_lcd_a0
+*line 92
+*line 93
+add #1,R4
+*line 94
+*line 95
+move #66,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 96
+*line 97
+bra L9
+L8:
+*line 98
+move.b R7,_lcd_a0
+L9:
+*line 98
+move R5,R0
+sub #1,R5
+tst R0
+bne L8
+L7:L4:
+*line 84
+add #1,-8(R14)
+L5:
+*line 84
+cmp #3,-8(R14)
+blt L6
+L3:
+*line 99
+*line 100
+*line 101
+bra L10
+L2:
+*line 102
+*line 103
+*line 104
+*line 105
+*line 106
+move #63,R4
+sub -6(R14),R4
+mulu #85,R4
+add -2(R14),R4
+add #8192,R4
+*line 107
+*line 108
+move #79,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 109
+*line 110
+clr -8(R14)
+bra L13
+L14:
+*line 111
+*line 112
+move -4(R14),R0
+neg R0
+move R0,R5
+*line 113
+*line 114
+move #70,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 115
+clr R0
+move R4,R0
+and #255,R0
+move.b R0,_lcd_a0
+*line 116
+clr R0
+move R4,R0
+lsr #8,R0
+and #255,R0
+move.b R0,_lcd_a0
+*line 117
+*line 118
+add #1,R4
+*line 119
+*line 120
+move #66,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 121
+*line 122
+bra L17
+L16:
+*line 123
+clr.b _lcd_a0
+L17:
+*line 123
+move R5,R0
+sub #1,R5
+tst R0
+bne L16
+L15:L12:
+*line 110
+add #1,-8(R14)
+L13:
+*line 110
+cmp #3,-8(R14)
+blt L14
+L11:
+*line 124
+L10:
+*line 127
+move #76,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 128
+clr (sp)
+jsr _GLCcurs
+*line 130
+move 8(R14),R8
+add.l R8,R8
+add.l #_BarBcur,R8
+move -10(R14),(R8)
+L1:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _BarBset
+.text
+_BarBset:
+~~BarBset:
+~bar=8
+~val=10
+link R14,#-4
+movem.l R3-R7,-(sp)
+~bardot=R7
+~barpos=R6
+~newbar=R5
+~baradr=R4
+~barcol=-2
+~i=-4
+*line 149
+move 10(R14),R8
+add.l R8,R8
+add.l #_BarBLn,R8
+move (R8),R5
+*line 150
+move 8(R14),R8
+add.l R8,R8
+add.l #_BarCols,R8
+move (R8),-2(R14)
+*line 152
+move #1,(sp)
+jsr _GLCcurs
+*line 156
+move #63,R4
+sub _BBase,R4
+mulu #85,R4
+add -2(R14),R4
+add #8192,R4
+*line 158
+move #78,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 160
+clr -4(R14)
+bra L21
+L22:
+*line 161
+*line 162
+move -4(R14),R8
+add.l R8,R8
+add.l #_BarDots,R8
+move (R8),R7
+*line 163
+move _BBase,R6
+*line 164
+*line 165
+move #70,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 166
+clr R0
+move R4,R0
+and #255,R0
+move.b R0,_lcd_a0
+*line 167
+clr R0
+move R4,R0
+lsr #8,R0
+and #255,R0
+move.b R0,_lcd_a0
+*line 168
+*line 169
+add #1,R4
+*line 170
+*line 171
+move #66,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 172
+*line 173
+bra L25
+L24:
+*line 174
+move.b R7,_lcd_a0
+L25:
+*line 174
+cmp R6,R5
+move sr,R0
+add #1,R6
+move R0,ccr
+bge L24
+L23:
+*line 175
+*line 176
+bra L28
+L27:
+*line 177
+clr.b _lcd_a0
+L28:
+*line 177
+cmp _BTop,R6
+move sr,R0
+add #1,R6
+move R0,ccr
+blt L27
+L26:L20:
+*line 160
+add #1,-4(R14)
+L21:
+*line 160
+cmp #3,-4(R14)
+blt L22
+L19:
+*line 180
+move #76,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 181
+clr (sp)
+jsr _GLCcurs
+*line 183
+move 8(R14),R8
+add.l R8,R8
+add.l #_BarBcur,R8
+move R5,(R8)
+L18:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _BarCadj
+.text
+_BarCadj:
+~~BarCadj:
+~bar=8
+~val=10
+link R14,#-8
+movem.l R3-R7,-(sp)
+~bardot=R7
+~barpos=R6
+~newbar=R5
+~baradr=R4
+~barcol=-2
+~bardif=-4
+~curbar=-6
+~i=-8
+*line 202
+move 10(R14),R8
+add _BOffset,R8
+add.l R8,R8
+add.l #_BarCLn,R8
+move (R8),R5
+*line 203
+move 8(R14),R8
+add.l R8,R8
+add.l #_BarCcur,R8
+move (R8),-6(R14)
+*line 204
+move R5,R0
+sub -6(R14),R0
+move R0,-4(R14)
+*line 206
+*line 207
+tst -4(R14)
+beq L29
+*line 208
+*line 209
+move #1,(sp)
+jsr _GLCcurs
+*line 211
+move 8(R14),R8
+add.l R8,R8
+add.l #_BarCols,R8
+move (R8),-2(R14)
+*line 215
+move #63,R4
+sub -6(R14),R4
+mulu #85,R4
+add -2(R14),R4
+add #8192,R4
+*line 219
+*line 219
+cmp -6(R14),R5
+ble L30
+*line 220
+*line 221
+move #78,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 222
+*line 223
+clr -8(R14)
+bra L33
+L34:
+*line 224
+*line 225
+move -8(R14),R8
+add.l R8,R8
+add.l #_BarDots,R8
+move (R8),R7
+*line 226
+move -6(R14),R6
+*line 227
+*line 228
+move #70,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 229
+clr R0
+move R4,R0
+and #255,R0
+move.b R0,_lcd_a0
+*line 230
+clr R0
+move R4,R0
+lsr #8,R0
+and #255,R0
+move.b R0,_lcd_a0
+*line 231
+*line 232
+move #66,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 233
+*line 234
+bra L37
+L36:
+*line 235
+*line 236
+cmp _BCenter,R6
+move sr,R0
+add #1,R6
+move R0,ccr
+bge L38
+*line 236
+clr.b _lcd_a0
+*line 237
+bra L39
+L38:
+*line 238
+move.b R7,_lcd_a0
+L39:L37:
+*line 238
+cmp R5,R6
+bne L36
+L35:
+*line 239
+*line 240
+add #1,R4
+L32:
+*line 223
+add #1,-8(R14)
+L33:
+*line 223
+cmp #3,-8(R14)
+blt L34
+L31:
+*line 241
+*line 242
+*line 243
+bra L40
+L30:
+*line 244
+*line 245
+*line 246
+move #79,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 247
+*line 248
+clr -8(R14)
+bra L43
+L44:
+*line 249
+*line 250
+move -8(R14),R8
+add.l R8,R8
+add.l #_BarDots,R8
+move (R8),R7
+*line 251
+move -6(R14),R6
+*line 252
+*line 253
+move #70,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 254
+clr R0
+move R4,R0
+and #255,R0
+move.b R0,_lcd_a0
+*line 255
+clr R0
+move R4,R0
+lsr #8,R0
+and #255,R0
+move.b R0,_lcd_a0
+*line 256
+*line 257
+move #66,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 258
+*line 259
+bra L47
+L46:
+*line 260
+*line 261
+cmp _BCenter,R6
+move sr,R0
+sub #1,R6
+move R0,ccr
+ble L48
+*line 261
+clr.b _lcd_a0
+*line 262
+bra L49
+L48:
+*line 263
+move.b R7,_lcd_a0
+L49:L47:
+*line 263
+cmp R5,R6
+bne L46
+L45:
+*line 264
+*line 265
+add #1,R4
+L42:
+*line 248
+add #1,-8(R14)
+L43:
+*line 248
+cmp #3,-8(R14)
+blt L44
+L41:
+*line 266
+L40:
+*line 269
+move #76,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 270
+clr (sp)
+jsr _GLCcurs
+*line 272
+move 8(R14),R8
+add.l R8,R8
+add.l #_BarCcur,R8
+move R5,(R8)
+L29:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _BarCset
+.text
+_BarCset:
+~~BarCset:
+~bar=8
+~val=10
+link R14,#-6
+movem.l R2-R7,-(sp)
+~bardot=R7
+~barpos=R6
+~barloc1=R5
+~barloc2=R4
+~baradr=R3
+~barcol=-2
+~i=-4
+~newbar=-6
+*line 291
+move #1,(sp)
+jsr _GLCcurs
+*line 293
+move 10(R14),R8
+add _BOffset,R8
+add.l R8,R8
+add.l #_BarCLn,R8
+move (R8),-6(R14)
+*line 294
+move 8(R14),R8
+add.l R8,R8
+add.l #_BarCols,R8
+move (R8),-2(R14)
+*line 298
+move #63,R3
+sub _BBase,R3
+mulu #85,R3
+add -2(R14),R3
+add #8192,R3
+*line 300
+*line 300
+move -6(R14),R0
+cmp _BCenter,R0
+bge L51
+*line 301
+*line 302
+move -6(R14),R5
+*line 303
+move _BCenter,R4
+*line 304
+bra L52
+L51:
+*line 305
+*line 306
+*line 307
+move _BCenter,R5
+*line 308
+move -6(R14),R4
+L52:
+*line 311
+move #78,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 315
+clr -4(R14)
+bra L55
+L56:
+*line 316
+*line 317
+move -4(R14),R8
+add.l R8,R8
+add.l #_BarDots,R8
+move (R8),R7
+*line 318
+move _BBase,R6
+*line 319
+*line 320
+move #70,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 321
+clr R0
+move R3,R0
+and #255,R0
+move.b R0,_lcd_a0
+*line 322
+clr R0
+move R3,R0
+lsr #8,R0
+and #255,R0
+move.b R0,_lcd_a0
+*line 323
+*line 324
+move #66,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 325
+*line 326
+bra L59
+L58:
+*line 327
+*line 328
+clr.b _lcd_a0
+*line 329
+add #1,R6
+L59:
+*line 330
+cmp R5,R6
+blt L58
+L57:
+*line 331
+*line 332
+bra L62
+L61:
+*line 333
+*line 334
+move.b R7,_lcd_a0
+*line 335
+add #1,R6
+L62:
+*line 336
+cmp R4,R6
+ble L61
+L60:
+*line 337
+*line 338
+bra L65
+L64:
+*line 339
+*line 340
+clr.b _lcd_a0
+*line 341
+add #1,R6
+L65:
+*line 342
+cmp _BTop,R6
+ble L64
+L63:
+*line 343
+*line 344
+add #1,R3
+L54:
+*line 315
+add #1,-4(R14)
+L55:
+*line 315
+cmp #3,-4(R14)
+blt L56
+L53:
+*line 347
+move #76,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 348
+clr (sp)
+jsr _GLCcurs
+*line 350
+move 8(R14),R8
+add.l R8,R8
+add.l #_BarCcur,R8
+move -6(R14),(R8)
+L50:tst.l (sp)+
+movem.l (sp)+,R3-R7
+unlk R14
+rts
+.data
Index: alcyon/bitrev.s
===================================================================
--- alcyon/bitrev.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/bitrev.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,65 @@
+.data
+L1:.dc.w $1
+.dc.w $2
+.dc.w $4
+.dc.w $8
+.dc.w $10
+.dc.w $20
+.dc.w $40
+.dc.w $80
+.dc.w $100
+.dc.w $200
+.dc.w $400
+.dc.w $800
+.dc.w $1000
+.dc.w $2000
+.dc.w $4000
+.dc.w $8000
+.text
+.globl _bitrev
+.text
+_bitrev:
+~~bitrev:
+~bitsin=8
+~nbits=10
+link R14,#-8
+~m=-2
+~n=-4
+*line 30
+clr -4(R14)
+*line 32
+clr -2(R14)
+bra L5
+L6:
+*line 33
+*line 34
+move -2(R14),R8
+add.l R8,R8
+move.l #L1,R9
+move 0(R8,R9.l),R0
+and 8(R14),R0
+beq L7
+*line 34
+move 10(R14),R8
+sub #1,R8
+sub -2(R14),R8
+add.l R8,R8
+add.l #L1,R8
+move (R8),R0
+or R0,-4(R14)
+*line 35
+L7:L4:
+*line 32
+add #1,-2(R14)
+L5:
+*line 32
+move -2(R14),R0
+cmp 10(R14),R0
+blt L6
+L3:
+*line 36
+move -4(R14),R0
+bra L2
+L2:unlk R14
+rts
+.data
Index: alcyon/blkrd.s
===================================================================
--- alcyon/blkrd.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/blkrd.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,242 @@
+.globl _errno
+.globl __berrno
+.globl __thefat
+.globl __thebpb
+.globl __b_tbuf
+.globl __b_trak
+.globl __b_side
+.globl __b_sect
+.globl __b_tsec
+.globl __secrd
+.text
+__secrd:
+~~_secrd:
+~buf=R13
+~rec=R7
+link R14,#-4
+movem.l R3-R7/R13-R13,-(sp)
+~track=R6
+~side=R5
+~sector=R4
+~brc=-4
+*line 81
+move.l 8(R14),R13
+*line 81
+move 12(R14),R7
+*line 81
+*line 82
+move.l __thebpb,R8
+cmp #9,24(R8)
+beq L2
+*line 82
+move.l #$fffffff9,R0
+bra L1
+*line 83
+L2:
+*line 84
+*line 85
+move.l __thebpb,R8
+cmp #512,(R8)
+beq L3
+*line 85
+move.l #$fffffff9,R0
+bra L1
+*line 86
+L3:
+*line 87
+move R7,R6
+move.l __thebpb,R8
+move 22(R8),-(sp)
+move R6,R0
+ext.l R0
+divu (sp)+,R0
+move R0,R6
+*line 88
+move R6,R0
+move.l __thebpb,R9
+mulu 22(R9),R0
+move R0,__b_tsec
+*line 89
+move R7,R4
+sub __b_tsec,R4
+*line 91
+*line 91
+move.l __thebpb,R8
+cmp 24(R8),R4
+blo L4
+*line 92
+*line 93
+move.l __thebpb,R8
+move 24(R8),R0
+sub R0,R4
+*line 94
+move #1,R5
+*line 95
+move.l __thebpb,R8
+move 24(R8),R0
+add R0,__b_tsec
+*line 96
+bra L5
+L4:
+*line 97
+*line 98
+*line 99
+clr R5
+L5:
+*line 108
+*line 108
+cmp __b_trak,R6
+bne L10000
+cmp __b_side,R5
+beq L6
+L10000:*line 109
+*line 110
+*line 110
+clr (sp)
+move __b_tsec,-(sp)
+move.l __thebpb,R8
+move 24(R8),-(sp)
+move.l #__b_tbuf,-(sp)
+clr -(sp)
+move #4,-(sp)
+jsr _trap13
+adda.l #12,sp
+move.l R0,-4(R14)
+beq L7
+*line 111
+*line 112
+move #-1,__b_trak
+*line 113
+move #-1,__b_side
+*line 114
+move.l -4(R14),R0
+bra L1
+*line 115
+*line 116
+L7:
+*line 117
+move R6,__b_trak
+*line 118
+move R5,__b_side
+*line 119
+*line 120
+L6:
+*line 121
+move #512,(sp)
+move R4,R0
+move #9,R1
+asl R1,R0
+ext.l R0
+add.l #__b_tbuf,R0
+move.l R0,-(sp)
+move.l R13,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 122
+clr.l R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R4-R7/R13-R13
+unlk R14
+rts
+.globl _blkrd
+.text
+_blkrd:
+~~blkrd:
+~fcp=R13
+~buf=R12
+~ns=R7
+link R14,#0
+movem.l R4-R7/R12-R13,-(sp)
+~brc=R6
+~rb=R5
+*line 146
+move.l 8(R14),R13
+*line 146
+move.l 12(R14),R12
+*line 146
+move 16(R14),R7
+*line 146
+*line 147
+tst R7
+bge L9
+*line 147
+move R7,R0
+bra L8
+*line 148
+L9:
+*line 149
+bra L12
+L11:
+*line 150
+*line 155
+*line 156
+*line 157
+*line 158
+*line 158
+move.l 44(R13),R0
+move R0,(sp)
+move.l R12,-(sp)
+jsr __secrd
+addq.l #4,sp
+move.l R0,R6
+beq L13
+*line 161
+*line 162
+*line 163
+move.l R6,__berrno
+*line 164
+move #5,_errno
+*line 165
+move R7,R0
+bra L8
+*line 166
+*line 167
+L13:
+*line 168
+*line 168
+move.l #__thefat,(sp)
+move.l __thebpb,-(sp)
+move.l R13,-(sp)
+jsr __nsic
+addq.l #8,sp
+move R0,R5
+beq L14
+*line 169
+*line 170
+*line 171
+cmp #-1,R5
+bne L15
+*line 171
+move #5,_errno
+*line 172
+L15:
+*line 173
+move R7,R0
+bra L8
+*line 174
+*line 175
+L14:
+*line 176
+move.l __thebpb,R8
+clr R0
+move (R8),R0
+swap R0
+clr R0
+swap R0
+add.l R0,R12
+L12:
+*line 177
+move R7,R0
+sub #1,R7
+tst R0
+bne L11
+L10:
+*line 179
+clr R0
+bra L8
+L8:tst.l (sp)+
+movem.l (sp)+,R5-R7/R12-R13
+unlk R14
+rts
+.data
Index: alcyon/blkwr.s
===================================================================
--- alcyon/blkwr.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/blkwr.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,461 @@
+.globl _errno
+.globl __berrno
+.globl __thebpb
+.globl __thefat
+.globl __fatmod
+.globl __b_tbuf
+.globl __b_trak
+.globl __b_side
+.globl __b_sect
+.globl __b_tsec
+.globl __secwr
+.text
+__secwr:
+~~_secwr:
+~buf=R13
+~rec=R7
+link R14,#0
+movem.l R3-R7/R13-R13,-(sp)
+~track=R6
+~side=R5
+~sector=R4
+*line 71
+move.l 8(R14),R13
+*line 71
+move 12(R14),R7
+*line 71
+*line 72
+move.l __thebpb,R8
+cmp #9,24(R8)
+beq L2
+*line 72
+move.l #$fffffff9,R0
+bra L1
+*line 73
+L2:
+*line 74
+*line 75
+move.l __thebpb,R8
+cmp #512,(R8)
+beq L3
+*line 75
+move.l #$fffffff9,R0
+bra L1
+*line 76
+L3:
+*line 77
+move R7,R6
+move.l __thebpb,R8
+move 22(R8),-(sp)
+move R6,R0
+ext.l R0
+divu (sp)+,R0
+move R0,R6
+*line 78
+move R7,R4
+move R6,R0
+move.l __thebpb,R9
+mulu 22(R9),R0
+sub R0,R4
+*line 80
+*line 80
+move.l __thebpb,R8
+cmp 24(R8),R4
+blo L4
+*line 81
+*line 82
+move.l __thebpb,R8
+move 24(R8),R0
+sub R0,R4
+*line 83
+move #1,R5
+*line 84
+bra L5
+L4:
+*line 85
+*line 86
+*line 87
+clr R5
+L5:
+*line 100
+*line 101
+cmp __b_trak,R6
+bne L10000
+cmp __b_side,R5
+beq L6
+L10000:*line 101
+clr.l R0
+bra L1
+*line 102
+L6:
+*line 103
+move #512,(sp)
+move.l R13,-(sp)
+move R4,R0
+move #9,R1
+asl R1,R0
+ext.l R0
+add.l #__b_tbuf,R0
+move.l R0,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 110
+clr.l R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R4-R7/R13-R13
+unlk R14
+rts
+.globl _blkwr
+.text
+_blkwr:
+~~blkwr:
+~fcp=8
+~buf=12
+~ns=16
+link R14,#-10
+~rc=-4
+~clustr=-6
+*line 134
+bra L10
+L9:
+*line 135
+*line 136
+*line 136
+move.l 8(R14),R8
+tst.l 52(R8)
+beq L11
+*line 137
+*line 138
+*line 138
+move.l 8(R14),R8
+move.l 40(R8),R0
+move.l 8(R14),R9
+move.l 52(R9),R1
+cmp.l R1,R0
+bge L12
+*line 139
+*line 144
+*line 145
+*line 146
+*line 146
+clr (sp)
+move.l 8(R14),R8
+move.l 44(R8),R0
+move R0,-(sp)
+move #1,-(sp)
+move.l 12(R14),-(sp)
+move #1,-(sp)
+move #4,-(sp)
+jsr _trap13
+adda.l #12,sp
+move.l R0,-4(R14)
+beq L13
+*line 147
+*line 151
+*line 152
+*line 153
+move.l -4(R14),__berrno
+*line 154
+move #5,_errno
+*line 155
+move 16(R14),R0
+bra L7
+*line 156
+*line 157
+*line 158
+L13:
+*line 159
+move.l 8(R14),R8
+move.l 44(R8),R0
+move R0,(sp)
+move.l 12(R14),-(sp)
+jsr __secwr
+addq.l #4,sp
+*line 160
+*line 161
+*line 162
+move.l #__thefat,(sp)
+move.l __thebpb,-(sp)
+move.l 8(R14),-(sp)
+jsr __nsic
+addq.l #8,sp
+ext.l R0
+move.l R0,-4(R14)
+*line 163
+*line 167
+*line 168
+*line 169
+*line 170
+sub #1,16(R14)
+bne L14
+*line 170
+clr R0
+bra L7
+*line 171
+L14:
+*line 172
+*line 172
+tst.l -4(R14)
+bge L15
+*line 173
+*line 174
+move #5,_errno
+*line 175
+move 16(R14),R0
+bra L7
+*line 176
+*line 177
+L15:
+*line 178
+move.l __thebpb,R8
+clr R0
+move (R8),R0
+swap R0
+clr R0
+swap R0
+add.l R0,12(R14)
+*line 179
+*line 180
+bra L16
+L12:
+*line 181
+*line 181
+move.l 8(R14),R8
+move.l 40(R8),R0
+move.l 8(R14),R9
+move.l 52(R9),R1
+cmp.l R1,R0
+bne L17
+*line 182
+*line 183
+*line 183
+move.l 8(R14),(sp)
+jsr __alcnew
+tst R0
+beq L18
+*line 184
+*line 185
+move #5,_errno
+*line 186
+move 16(R14),R0
+bra L7
+*line 187
+*line 188
+L18:
+*line 189
+move.l 8(R14),R8
+and #32767,32(R8)
+*line 190
+*line 195
+*line 196
+*line 197
+*line 197
+clr (sp)
+move.l 8(R14),R8
+move.l 44(R8),R0
+move R0,-(sp)
+move #1,-(sp)
+move.l 12(R14),-(sp)
+move #1,-(sp)
+move #4,-(sp)
+jsr _trap13
+adda.l #12,sp
+move.l R0,-4(R14)
+beq L19
+*line 198
+*line 202
+*line 203
+*line 204
+move.l -4(R14),__berrno
+*line 205
+move #5,_errno
+*line 206
+move 16(R14),R0
+bra L7
+*line 207
+*line 208
+*line 209
+L19:
+*line 210
+move.l 8(R14),R8
+move.l 44(R8),R0
+move R0,(sp)
+move.l 12(R14),-(sp)
+jsr __secwr
+addq.l #4,sp
+*line 211
+*line 212
+*line 213
+move.l 8(R14),R8
+add.l #$1,40(R8)
+*line 214
+move.l 8(R14),R8
+add #1,34(R8)
+*line 215
+move.l 8(R14),R8
+add.l #$1,44(R8)
+*line 216
+*line 217
+*line 218
+sub #1,16(R14)
+bne L20
+*line 218
+clr R0
+bra L7
+*line 219
+L20:
+*line 220
+move.l __thebpb,R8
+clr R0
+move (R8),R0
+swap R0
+clr R0
+swap R0
+add.l R0,12(R14)
+*line 221
+*line 222
+*line 223
+L17:L16:bra L21
+L11:
+*line 224
+*line 225
+*line 226
+*line 226
+jsr __newcls
+move R0,-6(R14)
+bne L22
+*line 227
+*line 228
+move #5,_errno
+*line 229
+move 16(R14),R0
+bra L7
+*line 230
+*line 231
+L22:
+*line 232
+move -6(R14),(sp)
+jsr _micons
+move R0,-(sp)
+move.l 8(R14),R8
+move (sp)+,26(R8)
+*line 233
+move #4088,(sp)
+move -6(R14),-(sp)
+move.l #__thefat,-(sp)
+jsr __ptcl12
+addq.l #6,sp
+*line 234
+move #1,__fatmod
+*line 235
+move.l 8(R14),-(sp)
+move -6(R14),-(sp)
+move.l __thebpb,-(sp)
+jsr __cl2lsn
+addq.l #6,sp
+ext.l R0
+move.l (sp)+,R8
+move.l R0,44(R8)
+*line 236
+move.l 8(R14),R8
+move -6(R14),36(R8)
+*line 237
+move.l 8(R14),R8
+clr 34(R8)
+*line 238
+move.l __thebpb,R8
+clr R0
+move 2(R8),R0
+swap R0
+clr R0
+swap R0
+move.l 8(R14),R9
+move.l R0,52(R9)
+*line 239
+move.l 8(R14),R8
+and #32767,32(R8)
+*line 240
+*line 241
+move.l 8(R14),R8
+and #32767,32(R8)
+*line 242
+*line 247
+*line 248
+*line 249
+*line 249
+clr (sp)
+move.l 8(R14),R8
+move.l 44(R8),R0
+move R0,-(sp)
+move #1,-(sp)
+move.l 12(R14),-(sp)
+move #1,-(sp)
+move #4,-(sp)
+jsr _trap13
+adda.l #12,sp
+move.l R0,-4(R14)
+beq L23
+*line 250
+*line 254
+*line 255
+*line 256
+move.l -4(R14),__berrno
+*line 257
+move #5,_errno
+*line 258
+move 16(R14),R0
+bra L7
+*line 259
+*line 260
+*line 261
+L23:
+*line 262
+move.l 8(R14),R8
+move.l 44(R8),R0
+move R0,(sp)
+move.l 12(R14),-(sp)
+jsr __secwr
+addq.l #4,sp
+*line 263
+*line 264
+*line 265
+move.l 8(R14),R8
+add.l #$1,40(R8)
+*line 266
+move.l 8(R14),R8
+add #1,34(R8)
+*line 267
+move.l 8(R14),R8
+add.l #$1,44(R8)
+*line 268
+*line 269
+*line 270
+sub #1,16(R14)
+bne L24
+*line 270
+clr R0
+bra L7
+*line 271
+L24:
+*line 272
+move.l __thebpb,R8
+clr R0
+move (R8),R0
+swap R0
+clr R0
+swap R0
+add.l R0,12(R14)
+L21:
+*line 273
+L10:
+*line 274
+tst 16(R14)
+bgt L9
+L8:
+*line 276
+move 16(R14),R0
+bra L7
+L7:unlk R14
+rts
+.data
Index: alcyon/booter.s
===================================================================
--- alcyon/booter.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/booter.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,369 @@
+.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
Index: alcyon/cg2.s
===================================================================
--- alcyon/cg2.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/cg2.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,3080 @@
+.globl _cg_rows
+.data
+_cg_rows:
+.dc.w $C
+.globl _cgtable
+.data
+_cgtable:
+.dc.w $0
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $88
+.dc.w $6E
+.dc.w $E
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $20
+.dc.w $4
+.dc.w $0
+.dc.w $0
+.dc.w $4
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $4
+.dc.w $40
+.dc.w $0
+.dc.w $2
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $80
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $78
+.dc.w $0
+.dc.w $1E
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3C
+.dc.w $0
+.dc.w $0
+.dc.w $1C
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $2
+.dc.w $40
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $6
+.dc.w $0
+.dc.w $30
+.dc.w $10
+.dc.w $C
+.dc.w $0
+.dc.w $0
+.dc.w $50
+.dc.w $3A
+.dc.w $A9
+.dc.w $8B
+.dc.w $0
+.dc.w $0
+.dc.w $E2
+.dc.w $EE
+.dc.w $DC
+.dc.w $5D
+.dc.w $49
+.dc.w $97
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $EE
+.dc.w $AE
+.dc.w $EE
+.dc.w $0
+.dc.w $40
+.dc.w $EA
+.dc.w $EE
+.dc.w $0
+.dc.w $E2
+.dc.w $AE
+.dc.w $E4
+.dc.w $0
+.dc.w $94
+.dc.w $E0
+.dc.w $4E
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $4
+.dc.w $4
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $24
+.dc.w $0
+.dc.w $0
+.dc.w $24
+.dc.w $24
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $88
+.dc.w $AA
+.dc.w $2
+.dc.w $18
+.dc.w $7E
+.dc.w $7E
+.dc.w $3C
+.dc.w $60
+.dc.w $3C
+.dc.w $3C
+.dc.w $C
+.dc.w $3C
+.dc.w $1C
+.dc.w $0
+.dc.w $0
+.dc.w $73
+.dc.w $66
+.dc.w $FB
+.dc.w $0
+.dc.w $0
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $7C
+.dc.w $40
+.dc.w $BC
+.dc.w $0
+.dc.w $10
+.dc.w $8
+.dc.w $10
+.dc.w $0
+.dc.w $8
+.dc.w $0
+.dc.w $18
+.dc.w $0
+.dc.w $18
+.dc.w $7C
+.dc.w $7E
+.dc.w $3C
+.dc.w $20
+.dc.w $3C
+.dc.w $3C
+.dc.w $4
+.dc.w $3C
+.dc.w $1C
+.dc.w $0
+.dc.w $8
+.dc.w $20
+.dc.w $0
+.dc.w $4
+.dc.w $8
+.dc.w $78
+.dc.w $42
+.dc.w $3E
+.dc.w $3C
+.dc.w $3E
+.dc.w $7E
+.dc.w $4
+.dc.w $3C
+.dc.w $42
+.dc.w $7C
+.dc.w $1C
+.dc.w $82
+.dc.w $7E
+.dc.w $82
+.dc.w $42
+.dc.w $3C
+.dc.w $2
+.dc.w $5C
+.dc.w $42
+.dc.w $3C
+.dc.w $38
+.dc.w $3C
+.dc.w $10
+.dc.w $44
+.dc.w $C6
+.dc.w $38
+.dc.w $7E
+.dc.w $8
+.dc.w $0
+.dc.w $10
+.dc.w $0
+.dc.w $FE
+.dc.w $0
+.dc.w $BC
+.dc.w $1A
+.dc.w $38
+.dc.w $58
+.dc.w $38
+.dc.w $8
+.dc.w $42
+.dc.w $42
+.dc.w $38
+.dc.w $22
+.dc.w $42
+.dc.w $38
+.dc.w $92
+.dc.w $42
+.dc.w $18
+.dc.w $2
+.dc.w $40
+.dc.w $2
+.dc.w $38
+.dc.w $30
+.dc.w $58
+.dc.w $10
+.dc.w $6C
+.dc.w $82
+.dc.w $8
+.dc.w $7C
+.dc.w $8
+.dc.w $10
+.dc.w $10
+.dc.w $0
+.dc.w $3C
+.dc.w $50
+.dc.w $22
+.dc.w $A9
+.dc.w $8A
+.dc.w $0
+.dc.w $0
+.dc.w $A2
+.dc.w $28
+.dc.w $44
+.dc.w $45
+.dc.w $49
+.dc.w $95
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $A8
+.dc.w $AA
+.dc.w $22
+.dc.w $0
+.dc.w $A0
+.dc.w $2A
+.dc.w $2A
+.dc.w $0
+.dc.w $A2
+.dc.w $A2
+.dc.w $24
+.dc.w $0
+.dc.w $94
+.dc.w $A2
+.dc.w $4A
+.dc.w $E0
+.dc.w $E0
+.dc.w $C0
+.dc.w $C0
+.dc.w $DF
+.dc.w $0
+.dc.w $DF
+.dc.w $0
+.dc.w $24
+.dc.w $C
+.dc.w $10
+.dc.w $10
+.dc.w $22
+.dc.w $EE
+.dc.w $FA
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $24
+.dc.w $0
+.dc.w $0
+.dc.w $24
+.dc.w $24
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $C
+.dc.w $E
+.dc.w $1E
+.dc.w $C
+.dc.w $8
+.dc.w $C
+.dc.w $C
+.dc.w $2
+.dc.w $C
+.dc.w $C
+.dc.w $32
+.dc.w $77
+.dc.w $F7
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $30
+.dc.w $70
+.dc.w $78
+.dc.w $30
+.dc.w $76
+.dc.w $7B
+.dc.w $33
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $A8
+.dc.w $AA
+.dc.w $6
+.dc.w $3C
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $60
+.dc.w $7E
+.dc.w $7E
+.dc.w $C
+.dc.w $7E
+.dc.w $3C
+.dc.w $0
+.dc.w $0
+.dc.w $FB
+.dc.w $66
+.dc.w $FB
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $28
+.dc.w $92
+.dc.w $A2
+.dc.w $42
+.dc.w $0
+.dc.w $10
+.dc.w $8
+.dc.w $92
+.dc.w $10
+.dc.w $18
+.dc.w $0
+.dc.w $18
+.dc.w $2
+.dc.w $24
+.dc.w $10
+.dc.w $42
+.dc.w $42
+.dc.w $20
+.dc.w $42
+.dc.w $42
+.dc.w $4
+.dc.w $42
+.dc.w $20
+.dc.w $18
+.dc.w $18
+.dc.w $10
+.dc.w $0
+.dc.w $8
+.dc.w $0
+.dc.w $4
+.dc.w $42
+.dc.w $44
+.dc.w $42
+.dc.w $44
+.dc.w $44
+.dc.w $4
+.dc.w $42
+.dc.w $42
+.dc.w $10
+.dc.w $22
+.dc.w $42
+.dc.w $42
+.dc.w $82
+.dc.w $62
+.dc.w $42
+.dc.w $2
+.dc.w $22
+.dc.w $22
+.dc.w $42
+.dc.w $10
+.dc.w $42
+.dc.w $10
+.dc.w $C6
+.dc.w $44
+.dc.w $10
+.dc.w $42
+.dc.w $8
+.dc.w $80
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $42
+.dc.w $26
+.dc.w $44
+.dc.w $64
+.dc.w $44
+.dc.w $8
+.dc.w $58
+.dc.w $42
+.dc.w $10
+.dc.w $22
+.dc.w $22
+.dc.w $10
+.dc.w $92
+.dc.w $42
+.dc.w $24
+.dc.w $1A
+.dc.w $58
+.dc.w $2
+.dc.w $44
+.dc.w $48
+.dc.w $64
+.dc.w $28
+.dc.w $92
+.dc.w $44
+.dc.w $10
+.dc.w $4
+.dc.w $8
+.dc.w $10
+.dc.w $10
+.dc.w $0
+.dc.w $42
+.dc.w $50
+.dc.w $3B
+.dc.w $99
+.dc.w $AA
+.dc.w $0
+.dc.w $0
+.dc.w $AE
+.dc.w $6E
+.dc.w $44
+.dc.w $C5
+.dc.w $49
+.dc.w $D5
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $AE
+.dc.w $6A
+.dc.w $62
+.dc.w $0
+.dc.w $A0
+.dc.w $2E
+.dc.w $6A
+.dc.w $0
+.dc.w $AE
+.dc.w $E2
+.dc.w $64
+.dc.w $0
+.dc.w $D4
+.dc.w $A4
+.dc.w $4A
+.dc.w $40
+.dc.w $40
+.dc.w $C0
+.dc.w $C0
+.dc.w $C4
+.dc.w $0
+.dc.w $DF
+.dc.w $0
+.dc.w $26
+.dc.w $14
+.dc.w $38
+.dc.w $10
+.dc.w $52
+.dc.w $44
+.dc.w $A
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $66
+.dc.w $0
+.dc.w $26
+.dc.w $0
+.dc.w $64
+.dc.w $66
+.dc.w $0
+.dc.w $0
+.dc.w $64
+.dc.w $26
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $12
+.dc.w $4
+.dc.w $2
+.dc.w $12
+.dc.w $8
+.dc.w $12
+.dc.w $12
+.dc.w $2
+.dc.w $12
+.dc.w $10
+.dc.w $4A
+.dc.w $22
+.dc.w $12
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $48
+.dc.w $20
+.dc.w $8
+.dc.w $48
+.dc.w $26
+.dc.w $B
+.dc.w $4B
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $D8
+.dc.w $AA
+.dc.w $2
+.dc.w $7E
+.dc.w $18
+.dc.w $66
+.dc.w $66
+.dc.w $60
+.dc.w $66
+.dc.w $66
+.dc.w $18
+.dc.w $66
+.dc.w $70
+.dc.w $0
+.dc.w $18
+.dc.w $DB
+.dc.w $66
+.dc.w $1B
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $28
+.dc.w $90
+.dc.w $44
+.dc.w $A2
+.dc.w $0
+.dc.w $8
+.dc.w $10
+.dc.w $54
+.dc.w $10
+.dc.w $18
+.dc.w $0
+.dc.w $0
+.dc.w $4
+.dc.w $42
+.dc.w $10
+.dc.w $2
+.dc.w $40
+.dc.w $20
+.dc.w $40
+.dc.w $42
+.dc.w $8
+.dc.w $42
+.dc.w $40
+.dc.w $18
+.dc.w $18
+.dc.w $8
+.dc.w $0
+.dc.w $10
+.dc.w $8
+.dc.w $32
+.dc.w $42
+.dc.w $44
+.dc.w $2
+.dc.w $44
+.dc.w $4
+.dc.w $4
+.dc.w $42
+.dc.w $42
+.dc.w $10
+.dc.w $22
+.dc.w $22
+.dc.w $2
+.dc.w $82
+.dc.w $62
+.dc.w $42
+.dc.w $2
+.dc.w $52
+.dc.w $12
+.dc.w $40
+.dc.w $10
+.dc.w $42
+.dc.w $28
+.dc.w $AA
+.dc.w $28
+.dc.w $10
+.dc.w $4
+.dc.w $8
+.dc.w $40
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $42
+.dc.w $42
+.dc.w $2
+.dc.w $42
+.dc.w $2
+.dc.w $8
+.dc.w $64
+.dc.w $42
+.dc.w $10
+.dc.w $20
+.dc.w $16
+.dc.w $10
+.dc.w $92
+.dc.w $42
+.dc.w $42
+.dc.w $26
+.dc.w $64
+.dc.w $2
+.dc.w $40
+.dc.w $8
+.dc.w $42
+.dc.w $28
+.dc.w $92
+.dc.w $28
+.dc.w $28
+.dc.w $8
+.dc.w $8
+.dc.w $10
+.dc.w $10
+.dc.w $0
+.dc.w $99
+.dc.w $D0
+.dc.w $A
+.dc.w $A9
+.dc.w $DA
+.dc.w $0
+.dc.w $0
+.dc.w $AA
+.dc.w $22
+.dc.w $44
+.dc.w $45
+.dc.w $49
+.dc.w $B5
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $A2
+.dc.w $AA
+.dc.w $22
+.dc.w $0
+.dc.w $A0
+.dc.w $2A
+.dc.w $2A
+.dc.w $0
+.dc.w $AA
+.dc.w $A2
+.dc.w $24
+.dc.w $0
+.dc.w $B4
+.dc.w $A8
+.dc.w $4A
+.dc.w $44
+.dc.w $40
+.dc.w $CC
+.dc.w $C0
+.dc.w $4
+.dc.w $0
+.dc.w $C
+.dc.w $0
+.dc.w $3C
+.dc.w $24
+.dc.w $7C
+.dc.w $10
+.dc.w $8A
+.dc.w $44
+.dc.w $A
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $C3
+.dc.w $0
+.dc.w $23
+.dc.w $0
+.dc.w $C4
+.dc.w $C3
+.dc.w $0
+.dc.w $0
+.dc.w $C4
+.dc.w $23
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $12
+.dc.w $4
+.dc.w $2
+.dc.w $10
+.dc.w $8
+.dc.w $10
+.dc.w $12
+.dc.w $4
+.dc.w $12
+.dc.w $10
+.dc.w $4A
+.dc.w $22
+.dc.w $22
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $48
+.dc.w $20
+.dc.w $8
+.dc.w $40
+.dc.w $20
+.dc.w $8
+.dc.w $40
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $88
+.dc.w $6E
+.dc.w $E
+.dc.w $66
+.dc.w $18
+.dc.w $6
+.dc.w $60
+.dc.w $FE
+.dc.w $60
+.dc.w $66
+.dc.w $18
+.dc.w $66
+.dc.w $60
+.dc.w $0
+.dc.w $18
+.dc.w $DB
+.dc.w $66
+.dc.w $33
+.dc.w $0
+.dc.w $0
+.dc.w $10
+.dc.w $0
+.dc.w $FE
+.dc.w $90
+.dc.w $8
+.dc.w $14
+.dc.w $0
+.dc.w $8
+.dc.w $10
+.dc.w $38
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $8
+.dc.w $42
+.dc.w $10
+.dc.w $4
+.dc.w $40
+.dc.w $20
+.dc.w $40
+.dc.w $42
+.dc.w $8
+.dc.w $42
+.dc.w $40
+.dc.w $0
+.dc.w $0
+.dc.w $4
+.dc.w $3C
+.dc.w $20
+.dc.w $8
+.dc.w $4A
+.dc.w $7E
+.dc.w $44
+.dc.w $2
+.dc.w $44
+.dc.w $4
+.dc.w $4
+.dc.w $42
+.dc.w $42
+.dc.w $10
+.dc.w $20
+.dc.w $12
+.dc.w $2
+.dc.w $92
+.dc.w $52
+.dc.w $42
+.dc.w $2
+.dc.w $42
+.dc.w $A
+.dc.w $40
+.dc.w $10
+.dc.w $42
+.dc.w $28
+.dc.w $AA
+.dc.w $28
+.dc.w $10
+.dc.w $4
+.dc.w $8
+.dc.w $20
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $4C
+.dc.w $42
+.dc.w $2
+.dc.w $42
+.dc.w $3E
+.dc.w $8
+.dc.w $42
+.dc.w $42
+.dc.w $10
+.dc.w $20
+.dc.w $A
+.dc.w $10
+.dc.w $92
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $2
+.dc.w $38
+.dc.w $8
+.dc.w $42
+.dc.w $44
+.dc.w $92
+.dc.w $10
+.dc.w $24
+.dc.w $10
+.dc.w $8
+.dc.w $10
+.dc.w $10
+.dc.w $60
+.dc.w $A5
+.dc.w $50
+.dc.w $BA
+.dc.w $BB
+.dc.w $8A
+.dc.w $0
+.dc.w $0
+.dc.w $EE
+.dc.w $EE
+.dc.w $C4
+.dc.w $9D
+.dc.w $5C
+.dc.w $97
+.dc.w $72
+.dc.w $77
+.dc.w $97
+.dc.w $8
+.dc.w $0
+.dc.w $EE
+.dc.w $EA
+.dc.w $EE
+.dc.w $0
+.dc.w $A0
+.dc.w $24
+.dc.w $EA
+.dc.w $0
+.dc.w $EE
+.dc.w $42
+.dc.w $EE
+.dc.w $0
+.dc.w $94
+.dc.w $E0
+.dc.w $EA
+.dc.w $44
+.dc.w $40
+.dc.w $DE
+.dc.w $DF
+.dc.w $4
+.dc.w $0
+.dc.w $C
+.dc.w $0
+.dc.w $64
+.dc.w $44
+.dc.w $92
+.dc.w $10
+.dc.w $8A
+.dc.w $44
+.dc.w $12
+.dc.w $0
+.dc.w $24
+.dc.w $FF
+.dc.w $81
+.dc.w $0
+.dc.w $21
+.dc.w $FF
+.dc.w $84
+.dc.w $81
+.dc.w $7
+.dc.w $E0
+.dc.w $8C
+.dc.w $31
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $12
+.dc.w $4
+.dc.w $4
+.dc.w $10
+.dc.w $1F
+.dc.w $10
+.dc.w $12
+.dc.w $4
+.dc.w $12
+.dc.w $1C
+.dc.w $4A
+.dc.w $22
+.dc.w $42
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $48
+.dc.w $20
+.dc.w $10
+.dc.w $40
+.dc.w $20
+.dc.w $10
+.dc.w $40
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $66
+.dc.w $18
+.dc.w $C
+.dc.w $38
+.dc.w $FE
+.dc.w $7E
+.dc.w $7E
+.dc.w $30
+.dc.w $3C
+.dc.w $7C
+.dc.w $7C
+.dc.w $7E
+.dc.w $DB
+.dc.w $66
+.dc.w $63
+.dc.w $0
+.dc.w $0
+.dc.w $10
+.dc.w $0
+.dc.w $28
+.dc.w $7C
+.dc.w $10
+.dc.w $8
+.dc.w $0
+.dc.w $8
+.dc.w $10
+.dc.w $FE
+.dc.w $FE
+.dc.w $0
+.dc.w $7C
+.dc.w $0
+.dc.w $10
+.dc.w $42
+.dc.w $10
+.dc.w $8
+.dc.w $40
+.dc.w $FE
+.dc.w $40
+.dc.w $46
+.dc.w $10
+.dc.w $42
+.dc.w $7C
+.dc.w $0
+.dc.w $0
+.dc.w $2
+.dc.w $0
+.dc.w $40
+.dc.w $10
+.dc.w $9A
+.dc.w $42
+.dc.w $44
+.dc.w $2
+.dc.w $44
+.dc.w $4
+.dc.w $4
+.dc.w $72
+.dc.w $42
+.dc.w $10
+.dc.w $20
+.dc.w $A
+.dc.w $2
+.dc.w $92
+.dc.w $52
+.dc.w $42
+.dc.w $3E
+.dc.w $42
+.dc.w $3E
+.dc.w $40
+.dc.w $10
+.dc.w $42
+.dc.w $44
+.dc.w $92
+.dc.w $10
+.dc.w $10
+.dc.w $8
+.dc.w $8
+.dc.w $10
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $70
+.dc.w $42
+.dc.w $2
+.dc.w $42
+.dc.w $42
+.dc.w $3C
+.dc.w $42
+.dc.w $42
+.dc.w $10
+.dc.w $20
+.dc.w $12
+.dc.w $10
+.dc.w $92
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $6
+.dc.w $4
+.dc.w $8
+.dc.w $42
+.dc.w $44
+.dc.w $92
+.dc.w $28
+.dc.w $44
+.dc.w $20
+.dc.w $4
+.dc.w $0
+.dc.w $20
+.dc.w $92
+.dc.w $85
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $15
+.dc.w $51
+.dc.w $91
+.dc.w $8
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $5F
+.dc.w $5F
+.dc.w $DE
+.dc.w $DF
+.dc.w $4
+.dc.w $0
+.dc.w $C
+.dc.w $0
+.dc.w $24
+.dc.w $4C
+.dc.w $10
+.dc.w $10
+.dc.w $8A
+.dc.w $44
+.dc.w $22
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $20
+.dc.w $0
+.dc.w $4
+.dc.w $0
+.dc.w $C
+.dc.w $30
+.dc.w $18
+.dc.w $18
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $12
+.dc.w $4
+.dc.w $8
+.dc.w $C
+.dc.w $9
+.dc.w $E
+.dc.w $E
+.dc.w $8
+.dc.w $C
+.dc.w $12
+.dc.w $4A
+.dc.w $22
+.dc.w $82
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $48
+.dc.w $20
+.dc.w $20
+.dc.w $30
+.dc.w $20
+.dc.w $20
+.dc.w $38
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $A8
+.dc.w $3B
+.dc.w $0
+.dc.w $66
+.dc.w $18
+.dc.w $18
+.dc.w $38
+.dc.w $66
+.dc.w $3E
+.dc.w $3E
+.dc.w $30
+.dc.w $3C
+.dc.w $7E
+.dc.w $7C
+.dc.w $7E
+.dc.w $DB
+.dc.w $66
+.dc.w $C3
+.dc.w $0
+.dc.w $0
+.dc.w $10
+.dc.w $0
+.dc.w $28
+.dc.w $12
+.dc.w $20
+.dc.w $14
+.dc.w $0
+.dc.w $8
+.dc.w $10
+.dc.w $38
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $20
+.dc.w $42
+.dc.w $10
+.dc.w $10
+.dc.w $38
+.dc.w $22
+.dc.w $3E
+.dc.w $3A
+.dc.w $10
+.dc.w $3C
+.dc.w $42
+.dc.w $18
+.dc.w $18
+.dc.w $4
+.dc.w $3C
+.dc.w $20
+.dc.w $20
+.dc.w $AA
+.dc.w $42
+.dc.w $3C
+.dc.w $2
+.dc.w $44
+.dc.w $1C
+.dc.w $1C
+.dc.w $2
+.dc.w $7E
+.dc.w $10
+.dc.w $20
+.dc.w $6
+.dc.w $2
+.dc.w $AA
+.dc.w $4A
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $3C
+.dc.w $10
+.dc.w $42
+.dc.w $44
+.dc.w $92
+.dc.w $10
+.dc.w $28
+.dc.w $10
+.dc.w $8
+.dc.w $8
+.dc.w $10
+.dc.w $82
+.dc.w $0
+.dc.w $0
+.dc.w $42
+.dc.w $26
+.dc.w $44
+.dc.w $64
+.dc.w $44
+.dc.w $8
+.dc.w $24
+.dc.w $26
+.dc.w $10
+.dc.w $20
+.dc.w $22
+.dc.w $10
+.dc.w $92
+.dc.w $26
+.dc.w $24
+.dc.w $26
+.dc.w $64
+.dc.w $4A
+.dc.w $44
+.dc.w $8
+.dc.w $42
+.dc.w $82
+.dc.w $82
+.dc.w $44
+.dc.w $42
+.dc.w $40
+.dc.w $8
+.dc.w $10
+.dc.w $10
+.dc.w $C
+.dc.w $85
+.dc.w $AF
+.dc.w $EE
+.dc.w $2
+.dc.w $0
+.dc.w $52
+.dc.w $95
+.dc.w $E
+.dc.w $0
+.dc.w $23
+.dc.w $A9
+.dc.w $A2
+.dc.w $E
+.dc.w $35
+.dc.w $51
+.dc.w $91
+.dc.w $14
+.dc.w $95
+.dc.w $EA
+.dc.w $EE
+.dc.w $1
+.dc.w $75
+.dc.w $77
+.dc.w $27
+.dc.w $9
+.dc.w $25
+.dc.w $B9
+.dc.w $2
+.dc.w $0
+.dc.w $71
+.dc.w $E9
+.dc.w $A
+.dc.w $0
+.dc.w $44
+.dc.w $40
+.dc.w $CC
+.dc.w $C0
+.dc.w $4
+.dc.w $0
+.dc.w $C
+.dc.w $0
+.dc.w $26
+.dc.w $34
+.dc.w $10
+.dc.w $10
+.dc.w $8A
+.dc.w $44
+.dc.w $42
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $0
+.dc.w $FF
+.dc.w $20
+.dc.w $0
+.dc.w $4
+.dc.w $0
+.dc.w $18
+.dc.w $18
+.dc.w $30
+.dc.w $C
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $12
+.dc.w $4
+.dc.w $10
+.dc.w $10
+.dc.w $A
+.dc.w $2
+.dc.w $2
+.dc.w $8
+.dc.w $12
+.dc.w $12
+.dc.w $4A
+.dc.w $22
+.dc.w $82
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $48
+.dc.w $20
+.dc.w $40
+.dc.w $40
+.dc.w $20
+.dc.w $40
+.dc.w $8
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $A8
+.dc.w $8
+.dc.w $0
+.dc.w $66
+.dc.w $1E
+.dc.w $30
+.dc.w $60
+.dc.w $6C
+.dc.w $6
+.dc.w $6
+.dc.w $60
+.dc.w $66
+.dc.w $66
+.dc.w $0
+.dc.w $18
+.dc.w $DB
+.dc.w $66
+.dc.w $C3
+.dc.w $0
+.dc.w $0
+.dc.w $10
+.dc.w $0
+.dc.w $FE
+.dc.w $12
+.dc.w $44
+.dc.w $22
+.dc.w $0
+.dc.w $8
+.dc.w $10
+.dc.w $54
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $40
+.dc.w $42
+.dc.w $10
+.dc.w $20
+.dc.w $40
+.dc.w $24
+.dc.w $2
+.dc.w $2
+.dc.w $20
+.dc.w $42
+.dc.w $42
+.dc.w $18
+.dc.w $18
+.dc.w $8
+.dc.w $0
+.dc.w $10
+.dc.w $40
+.dc.w $AA
+.dc.w $42
+.dc.w $44
+.dc.w $2
+.dc.w $44
+.dc.w $4
+.dc.w $4
+.dc.w $2
+.dc.w $42
+.dc.w $10
+.dc.w $20
+.dc.w $A
+.dc.w $2
+.dc.w $AA
+.dc.w $4A
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $2
+.dc.w $10
+.dc.w $42
+.dc.w $44
+.dc.w $82
+.dc.w $28
+.dc.w $44
+.dc.w $20
+.dc.w $8
+.dc.w $4
+.dc.w $10
+.dc.w $44
+.dc.w $0
+.dc.w $0
+.dc.w $3C
+.dc.w $1A
+.dc.w $38
+.dc.w $58
+.dc.w $38
+.dc.w $8
+.dc.w $18
+.dc.w $1A
+.dc.w $18
+.dc.w $30
+.dc.w $42
+.dc.w $10
+.dc.w $6E
+.dc.w $1A
+.dc.w $18
+.dc.w $1A
+.dc.w $58
+.dc.w $32
+.dc.w $38
+.dc.w $3E
+.dc.w $42
+.dc.w $82
+.dc.w $82
+.dc.w $82
+.dc.w $42
+.dc.w $7C
+.dc.w $8
+.dc.w $10
+.dc.w $10
+.dc.w $0
+.dc.w $A5
+.dc.w $A9
+.dc.w $AA
+.dc.w $22
+.dc.w $0
+.dc.w $52
+.dc.w $95
+.dc.w $8
+.dc.w $0
+.dc.w $25
+.dc.w $A9
+.dc.w $A2
+.dc.w $22
+.dc.w $15
+.dc.w $51
+.dc.w $91
+.dc.w $14
+.dc.w $95
+.dc.w $2A
+.dc.w $2A
+.dc.w $1
+.dc.w $15
+.dc.w $54
+.dc.w $21
+.dc.w $29
+.dc.w $25
+.dc.w $89
+.dc.w $2
+.dc.w $0
+.dc.w $51
+.dc.w $29
+.dc.w $A
+.dc.w $0
+.dc.w $44
+.dc.w $40
+.dc.w $C0
+.dc.w $C0
+.dc.w $4
+.dc.w $0
+.dc.w $F
+.dc.w $0
+.dc.w $3C
+.dc.w $4
+.dc.w $10
+.dc.w $92
+.dc.w $8A
+.dc.w $44
+.dc.w $82
+.dc.w $0
+.dc.w $24
+.dc.w $FF
+.dc.w $81
+.dc.w $0
+.dc.w $21
+.dc.w $81
+.dc.w $84
+.dc.w $FF
+.dc.w $31
+.dc.w $8C
+.dc.w $E0
+.dc.w $7
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $12
+.dc.w $6
+.dc.w $12
+.dc.w $12
+.dc.w $C
+.dc.w $2
+.dc.w $2
+.dc.w $10
+.dc.w $12
+.dc.w $12
+.dc.w $4B
+.dc.w $33
+.dc.w $93
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $48
+.dc.w $30
+.dc.w $48
+.dc.w $48
+.dc.w $30
+.dc.w $48
+.dc.w $8
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $98
+.dc.w $9
+.dc.w $0
+.dc.w $7E
+.dc.w $1C
+.dc.w $66
+.dc.w $66
+.dc.w $78
+.dc.w $6
+.dc.w $E
+.dc.w $66
+.dc.w $66
+.dc.w $66
+.dc.w $0
+.dc.w $18
+.dc.w $DB
+.dc.w $77
+.dc.w $DB
+.dc.w $0
+.dc.w $0
+.dc.w $10
+.dc.w $0
+.dc.w $28
+.dc.w $92
+.dc.w $8A
+.dc.w $22
+.dc.w $4
+.dc.w $8
+.dc.w $10
+.dc.w $92
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $80
+.dc.w $42
+.dc.w $14
+.dc.w $40
+.dc.w $40
+.dc.w $28
+.dc.w $2
+.dc.w $2
+.dc.w $20
+.dc.w $42
+.dc.w $42
+.dc.w $0
+.dc.w $0
+.dc.w $10
+.dc.w $0
+.dc.w $8
+.dc.w $42
+.dc.w $92
+.dc.w $24
+.dc.w $44
+.dc.w $2
+.dc.w $44
+.dc.w $4
+.dc.w $4
+.dc.w $2
+.dc.w $42
+.dc.w $10
+.dc.w $20
+.dc.w $12
+.dc.w $2
+.dc.w $C6
+.dc.w $46
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $2
+.dc.w $10
+.dc.w $42
+.dc.w $82
+.dc.w $82
+.dc.w $28
+.dc.w $44
+.dc.w $20
+.dc.w $8
+.dc.w $2
+.dc.w $10
+.dc.w $28
+.dc.w $0
+.dc.w $20
+.dc.w $0
+.dc.w $2
+.dc.w $0
+.dc.w $40
+.dc.w $0
+.dc.w $48
+.dc.w $0
+.dc.w $2
+.dc.w $0
+.dc.w $0
+.dc.w $2
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $8
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $8
+.dc.w $10
+.dc.w $10
+.dc.w $0
+.dc.w $99
+.dc.w $6D
+.dc.w $AA
+.dc.w $4E
+.dc.w $0
+.dc.w $32
+.dc.w $D7
+.dc.w $EE
+.dc.w $0
+.dc.w $55
+.dc.w $ED
+.dc.w $AA
+.dc.w $42
+.dc.w $75
+.dc.w $71
+.dc.w $D7
+.dc.w $15
+.dc.w $D7
+.dc.w $2E
+.dc.w $AA
+.dc.w $1
+.dc.w $33
+.dc.w $57
+.dc.w $21
+.dc.w $4D
+.dc.w $35
+.dc.w $99
+.dc.w $39
+.dc.w $0
+.dc.w $57
+.dc.w $2D
+.dc.w $E
+.dc.w $0
+.dc.w $40
+.dc.w $40
+.dc.w $E0
+.dc.w $E0
+.dc.w $5
+.dc.w $0
+.dc.w $E
+.dc.w $0
+.dc.w $64
+.dc.w $4
+.dc.w $10
+.dc.w $7C
+.dc.w $8A
+.dc.w $44
+.dc.w $82
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $C3
+.dc.w $0
+.dc.w $23
+.dc.w $C3
+.dc.w $C4
+.dc.w $0
+.dc.w $23
+.dc.w $C4
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $C
+.dc.w $4
+.dc.w $C
+.dc.w $C
+.dc.w $8
+.dc.w $E
+.dc.w $C
+.dc.w $1F
+.dc.w $C
+.dc.w $C
+.dc.w $32
+.dc.w $22
+.dc.w $62
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $30
+.dc.w $20
+.dc.w $30
+.dc.w $30
+.dc.w $20
+.dc.w $30
+.dc.w $38
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $A8
+.dc.w $8
+.dc.w $0
+.dc.w $3C
+.dc.w $18
+.dc.w $7E
+.dc.w $7E
+.dc.w $70
+.dc.w $3E
+.dc.w $3C
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $0
+.dc.w $0
+.dc.w $FB
+.dc.w $77
+.dc.w $FB
+.dc.w $0
+.dc.w $0
+.dc.w $10
+.dc.w $28
+.dc.w $28
+.dc.w $7C
+.dc.w $4
+.dc.w $1C
+.dc.w $8
+.dc.w $10
+.dc.w $8
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $24
+.dc.w $18
+.dc.w $42
+.dc.w $42
+.dc.w $30
+.dc.w $2
+.dc.w $4
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $0
+.dc.w $0
+.dc.w $20
+.dc.w $0
+.dc.w $4
+.dc.w $42
+.dc.w $44
+.dc.w $24
+.dc.w $44
+.dc.w $42
+.dc.w $44
+.dc.w $44
+.dc.w $44
+.dc.w $42
+.dc.w $42
+.dc.w $10
+.dc.w $20
+.dc.w $22
+.dc.w $2
+.dc.w $C6
+.dc.w $46
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $92
+.dc.w $42
+.dc.w $82
+.dc.w $82
+.dc.w $44
+.dc.w $82
+.dc.w $42
+.dc.w $8
+.dc.w $0
+.dc.w $10
+.dc.w $10
+.dc.w $0
+.dc.w $10
+.dc.w $0
+.dc.w $2
+.dc.w $0
+.dc.w $40
+.dc.w $0
+.dc.w $30
+.dc.w $0
+.dc.w $2
+.dc.w $10
+.dc.w $20
+.dc.w $2
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $8
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $8
+.dc.w $10
+.dc.w $10
+.dc.w $0
+.dc.w $42
+.dc.w $A1
+.dc.w $AA
+.dc.w $8A
+.dc.w $0
+.dc.w $52
+.dc.w $B5
+.dc.w $2
+.dc.w $0
+.dc.w $55
+.dc.w $AB
+.dc.w $B6
+.dc.w $82
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $B5
+.dc.w $2A
+.dc.w $2A
+.dc.w $0
+.dc.w $15
+.dc.w $51
+.dc.w $21
+.dc.w $8B
+.dc.w $2D
+.dc.w $89
+.dc.w $2
+.dc.w $0
+.dc.w $55
+.dc.w $2B
+.dc.w $A
+.dc.w $0
+.dc.w $60
+.dc.w $60
+.dc.w $E0
+.dc.w $E0
+.dc.w $6
+.dc.w $0
+.dc.w $C
+.dc.w $0
+.dc.w $24
+.dc.w $4
+.dc.w $10
+.dc.w $38
+.dc.w $53
+.dc.w $66
+.dc.w $8B
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $66
+.dc.w $0
+.dc.w $26
+.dc.w $66
+.dc.w $64
+.dc.w $0
+.dc.w $26
+.dc.w $64
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7E
+.dc.w $7E
+.dc.w $B8
+.dc.w $3B
+.dc.w $0
+.dc.w $18
+.dc.w $10
+.dc.w $3C
+.dc.w $3C
+.dc.w $60
+.dc.w $3E
+.dc.w $38
+.dc.w $7E
+.dc.w $3C
+.dc.w $3C
+.dc.w $0
+.dc.w $0
+.dc.w $73
+.dc.w $66
+.dc.w $73
+.dc.w $0
+.dc.w $0
+.dc.w $10
+.dc.w $28
+.dc.w $0
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $18
+.dc.w $10
+.dc.w $8
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $18
+.dc.w $10
+.dc.w $3C
+.dc.w $3C
+.dc.w $20
+.dc.w $3E
+.dc.w $38
+.dc.w $7E
+.dc.w $3C
+.dc.w $3C
+.dc.w $0
+.dc.w $0
+.dc.w $40
+.dc.w $0
+.dc.w $2
+.dc.w $3C
+.dc.w $38
+.dc.w $18
+.dc.w $3E
+.dc.w $3C
+.dc.w $3E
+.dc.w $7E
+.dc.w $7E
+.dc.w $3C
+.dc.w $42
+.dc.w $7C
+.dc.w $70
+.dc.w $42
+.dc.w $2
+.dc.w $82
+.dc.w $42
+.dc.w $3C
+.dc.w $3E
+.dc.w $3C
+.dc.w $3E
+.dc.w $3C
+.dc.w $FE
+.dc.w $42
+.dc.w $82
+.dc.w $82
+.dc.w $C6
+.dc.w $82
+.dc.w $7E
+.dc.w $8
+.dc.w $0
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $18
+.dc.w $0
+.dc.w $2
+.dc.w $0
+.dc.w $40
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $2
+.dc.w $0
+.dc.w $0
+.dc.w $2
+.dc.w $18
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $30
+.dc.w $10
+.dc.w $C
+.dc.w $0
+.dc.w $3C
+.dc.w $EF
+.dc.w $AE
+.dc.w $E
+.dc.w $0
+.dc.w $77
+.dc.w $92
+.dc.w $E
+.dc.w $0
+.dc.w $53
+.dc.w $49
+.dc.w $A2
+.dc.w $E
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $92
+.dc.w $24
+.dc.w $EE
+.dc.w $1
+.dc.w $77
+.dc.w $77
+.dc.w $71
+.dc.w $9
+.dc.w $A5
+.dc.w $BB
+.dc.w $3
+.dc.w $0
+.dc.w $57
+.dc.w $E9
+.dc.w $A
+.dc.w $0
+.dc.w $40
+.dc.w $40
+.dc.w $C0
+.dc.w $C0
+.dc.w $4
+.dc.w $0
+.dc.w $8
+.dc.w $0
+.dc.w $20
+.dc.w $4
+.dc.w $10
+.dc.w $10
+.dc.w $22
+.dc.w $44
+.dc.w $72
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $24
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $24
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7E
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $28
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $18
+.dc.w $20
+.dc.w $4
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $78
+.dc.w $0
+.dc.w $1E
+.dc.w $0
+.dc.w $0
+.dc.w $18
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $24
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $24
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.data
Index: alcyon/cg3.s
===================================================================
--- alcyon/cg3.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/cg3.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,3588 @@
+.globl _cg3
+.data
+_cg3:
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $24
+.dc.w $0
+.dc.w $0
+.dc.w $24
+.dc.w $24
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $24
+.dc.w $0
+.dc.w $0
+.dc.w $24
+.dc.w $24
+.dc.w $40
+.dc.w $0
+.dc.w $0
+.dc.w $8
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $88
+.dc.w $6E
+.dc.w $E
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $20
+.dc.w $4
+.dc.w $0
+.dc.w $0
+.dc.w $4
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $4
+.dc.w $40
+.dc.w $0
+.dc.w $2
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $80
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $78
+.dc.w $0
+.dc.w $1E
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3C
+.dc.w $0
+.dc.w $0
+.dc.w $1C
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $2
+.dc.w $40
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $6
+.dc.w $0
+.dc.w $30
+.dc.w $10
+.dc.w $C
+.dc.w $0
+.dc.w $0
+.dc.w $50
+.dc.w $3A
+.dc.w $A9
+.dc.w $8B
+.dc.w $0
+.dc.w $0
+.dc.w $E2
+.dc.w $EE
+.dc.w $DC
+.dc.w $5D
+.dc.w $49
+.dc.w $97
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $EE
+.dc.w $AE
+.dc.w $EE
+.dc.w $0
+.dc.w $40
+.dc.w $EA
+.dc.w $EE
+.dc.w $0
+.dc.w $E2
+.dc.w $AE
+.dc.w $E4
+.dc.w $0
+.dc.w $94
+.dc.w $E0
+.dc.w $4E
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $4
+.dc.w $4
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $24
+.dc.w $0
+.dc.w $0
+.dc.w $24
+.dc.w $24
+.dc.w $60
+.dc.w $0
+.dc.w $78
+.dc.w $1C
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $88
+.dc.w $AA
+.dc.w $2
+.dc.w $18
+.dc.w $7E
+.dc.w $7E
+.dc.w $3C
+.dc.w $60
+.dc.w $3C
+.dc.w $3C
+.dc.w $C
+.dc.w $3C
+.dc.w $1C
+.dc.w $0
+.dc.w $0
+.dc.w $73
+.dc.w $66
+.dc.w $FB
+.dc.w $0
+.dc.w $0
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $7C
+.dc.w $40
+.dc.w $BC
+.dc.w $0
+.dc.w $10
+.dc.w $8
+.dc.w $10
+.dc.w $0
+.dc.w $8
+.dc.w $0
+.dc.w $18
+.dc.w $0
+.dc.w $18
+.dc.w $7C
+.dc.w $7E
+.dc.w $3C
+.dc.w $20
+.dc.w $3C
+.dc.w $3C
+.dc.w $4
+.dc.w $3C
+.dc.w $1C
+.dc.w $0
+.dc.w $8
+.dc.w $20
+.dc.w $0
+.dc.w $4
+.dc.w $8
+.dc.w $78
+.dc.w $42
+.dc.w $3E
+.dc.w $3C
+.dc.w $3E
+.dc.w $7E
+.dc.w $4
+.dc.w $3C
+.dc.w $42
+.dc.w $7C
+.dc.w $1C
+.dc.w $82
+.dc.w $7E
+.dc.w $82
+.dc.w $42
+.dc.w $3C
+.dc.w $2
+.dc.w $5C
+.dc.w $42
+.dc.w $3C
+.dc.w $38
+.dc.w $3C
+.dc.w $10
+.dc.w $44
+.dc.w $C6
+.dc.w $38
+.dc.w $7E
+.dc.w $8
+.dc.w $0
+.dc.w $10
+.dc.w $0
+.dc.w $FE
+.dc.w $0
+.dc.w $BC
+.dc.w $1A
+.dc.w $38
+.dc.w $58
+.dc.w $38
+.dc.w $8
+.dc.w $42
+.dc.w $42
+.dc.w $38
+.dc.w $22
+.dc.w $42
+.dc.w $38
+.dc.w $92
+.dc.w $42
+.dc.w $18
+.dc.w $2
+.dc.w $40
+.dc.w $2
+.dc.w $38
+.dc.w $30
+.dc.w $58
+.dc.w $10
+.dc.w $6C
+.dc.w $82
+.dc.w $8
+.dc.w $7C
+.dc.w $8
+.dc.w $10
+.dc.w $10
+.dc.w $0
+.dc.w $3C
+.dc.w $50
+.dc.w $22
+.dc.w $A9
+.dc.w $8A
+.dc.w $0
+.dc.w $0
+.dc.w $A2
+.dc.w $28
+.dc.w $44
+.dc.w $45
+.dc.w $49
+.dc.w $95
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $A8
+.dc.w $AA
+.dc.w $22
+.dc.w $0
+.dc.w $A0
+.dc.w $2A
+.dc.w $2A
+.dc.w $0
+.dc.w $A2
+.dc.w $A2
+.dc.w $24
+.dc.w $0
+.dc.w $94
+.dc.w $A2
+.dc.w $4A
+.dc.w $E0
+.dc.w $E0
+.dc.w $C0
+.dc.w $C0
+.dc.w $DF
+.dc.w $0
+.dc.w $DF
+.dc.w $0
+.dc.w $24
+.dc.w $C
+.dc.w $10
+.dc.w $10
+.dc.w $22
+.dc.w $EE
+.dc.w $FA
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $24
+.dc.w $0
+.dc.w $0
+.dc.w $24
+.dc.w $24
+.dc.w $70
+.dc.w $40
+.dc.w $84
+.dc.w $3E
+.dc.w $C
+.dc.w $E
+.dc.w $1E
+.dc.w $C
+.dc.w $8
+.dc.w $C
+.dc.w $C
+.dc.w $2
+.dc.w $C
+.dc.w $C
+.dc.w $32
+.dc.w $77
+.dc.w $F7
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $30
+.dc.w $70
+.dc.w $78
+.dc.w $30
+.dc.w $76
+.dc.w $7B
+.dc.w $33
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $A8
+.dc.w $AA
+.dc.w $6
+.dc.w $3C
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $60
+.dc.w $7E
+.dc.w $7E
+.dc.w $C
+.dc.w $7E
+.dc.w $3C
+.dc.w $0
+.dc.w $0
+.dc.w $FB
+.dc.w $66
+.dc.w $FB
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $28
+.dc.w $92
+.dc.w $A2
+.dc.w $42
+.dc.w $0
+.dc.w $10
+.dc.w $8
+.dc.w $92
+.dc.w $10
+.dc.w $18
+.dc.w $0
+.dc.w $18
+.dc.w $2
+.dc.w $24
+.dc.w $10
+.dc.w $42
+.dc.w $42
+.dc.w $20
+.dc.w $42
+.dc.w $42
+.dc.w $4
+.dc.w $42
+.dc.w $20
+.dc.w $18
+.dc.w $18
+.dc.w $10
+.dc.w $0
+.dc.w $8
+.dc.w $0
+.dc.w $4
+.dc.w $42
+.dc.w $44
+.dc.w $42
+.dc.w $44
+.dc.w $44
+.dc.w $4
+.dc.w $42
+.dc.w $42
+.dc.w $10
+.dc.w $22
+.dc.w $42
+.dc.w $42
+.dc.w $82
+.dc.w $62
+.dc.w $42
+.dc.w $2
+.dc.w $22
+.dc.w $22
+.dc.w $42
+.dc.w $10
+.dc.w $42
+.dc.w $10
+.dc.w $C6
+.dc.w $44
+.dc.w $10
+.dc.w $42
+.dc.w $8
+.dc.w $80
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $42
+.dc.w $26
+.dc.w $44
+.dc.w $64
+.dc.w $44
+.dc.w $8
+.dc.w $58
+.dc.w $42
+.dc.w $10
+.dc.w $22
+.dc.w $22
+.dc.w $10
+.dc.w $92
+.dc.w $42
+.dc.w $24
+.dc.w $1A
+.dc.w $58
+.dc.w $2
+.dc.w $44
+.dc.w $48
+.dc.w $64
+.dc.w $28
+.dc.w $92
+.dc.w $44
+.dc.w $10
+.dc.w $4
+.dc.w $8
+.dc.w $10
+.dc.w $10
+.dc.w $0
+.dc.w $42
+.dc.w $50
+.dc.w $3B
+.dc.w $99
+.dc.w $AA
+.dc.w $0
+.dc.w $0
+.dc.w $AE
+.dc.w $6E
+.dc.w $44
+.dc.w $C5
+.dc.w $49
+.dc.w $D5
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $AE
+.dc.w $6A
+.dc.w $62
+.dc.w $0
+.dc.w $A0
+.dc.w $2E
+.dc.w $6A
+.dc.w $0
+.dc.w $AE
+.dc.w $E2
+.dc.w $64
+.dc.w $0
+.dc.w $D4
+.dc.w $A4
+.dc.w $4A
+.dc.w $40
+.dc.w $40
+.dc.w $C0
+.dc.w $C0
+.dc.w $C4
+.dc.w $0
+.dc.w $DF
+.dc.w $0
+.dc.w $26
+.dc.w $14
+.dc.w $38
+.dc.w $10
+.dc.w $52
+.dc.w $44
+.dc.w $A
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $66
+.dc.w $0
+.dc.w $26
+.dc.w $0
+.dc.w $64
+.dc.w $66
+.dc.w $0
+.dc.w $0
+.dc.w $64
+.dc.w $26
+.dc.w $78
+.dc.w $48
+.dc.w $B0
+.dc.w $7F
+.dc.w $12
+.dc.w $4
+.dc.w $2
+.dc.w $12
+.dc.w $8
+.dc.w $12
+.dc.w $12
+.dc.w $2
+.dc.w $12
+.dc.w $10
+.dc.w $4A
+.dc.w $22
+.dc.w $12
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $48
+.dc.w $20
+.dc.w $8
+.dc.w $48
+.dc.w $26
+.dc.w $B
+.dc.w $4B
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $D8
+.dc.w $AA
+.dc.w $2
+.dc.w $7E
+.dc.w $18
+.dc.w $66
+.dc.w $66
+.dc.w $60
+.dc.w $66
+.dc.w $66
+.dc.w $18
+.dc.w $66
+.dc.w $70
+.dc.w $0
+.dc.w $18
+.dc.w $DB
+.dc.w $66
+.dc.w $1B
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $28
+.dc.w $90
+.dc.w $44
+.dc.w $A2
+.dc.w $0
+.dc.w $8
+.dc.w $10
+.dc.w $54
+.dc.w $10
+.dc.w $18
+.dc.w $0
+.dc.w $0
+.dc.w $4
+.dc.w $42
+.dc.w $10
+.dc.w $2
+.dc.w $40
+.dc.w $20
+.dc.w $40
+.dc.w $42
+.dc.w $8
+.dc.w $42
+.dc.w $40
+.dc.w $18
+.dc.w $18
+.dc.w $8
+.dc.w $0
+.dc.w $10
+.dc.w $8
+.dc.w $32
+.dc.w $42
+.dc.w $44
+.dc.w $2
+.dc.w $44
+.dc.w $4
+.dc.w $4
+.dc.w $42
+.dc.w $42
+.dc.w $10
+.dc.w $22
+.dc.w $22
+.dc.w $2
+.dc.w $82
+.dc.w $62
+.dc.w $42
+.dc.w $2
+.dc.w $52
+.dc.w $12
+.dc.w $40
+.dc.w $10
+.dc.w $42
+.dc.w $28
+.dc.w $AA
+.dc.w $28
+.dc.w $10
+.dc.w $4
+.dc.w $8
+.dc.w $40
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $42
+.dc.w $42
+.dc.w $2
+.dc.w $42
+.dc.w $2
+.dc.w $8
+.dc.w $64
+.dc.w $42
+.dc.w $10
+.dc.w $20
+.dc.w $16
+.dc.w $10
+.dc.w $92
+.dc.w $42
+.dc.w $42
+.dc.w $26
+.dc.w $64
+.dc.w $2
+.dc.w $40
+.dc.w $8
+.dc.w $42
+.dc.w $28
+.dc.w $92
+.dc.w $28
+.dc.w $28
+.dc.w $8
+.dc.w $8
+.dc.w $10
+.dc.w $10
+.dc.w $0
+.dc.w $99
+.dc.w $D0
+.dc.w $A
+.dc.w $A9
+.dc.w $DA
+.dc.w $0
+.dc.w $0
+.dc.w $AA
+.dc.w $22
+.dc.w $44
+.dc.w $45
+.dc.w $49
+.dc.w $B5
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $A2
+.dc.w $AA
+.dc.w $22
+.dc.w $0
+.dc.w $A0
+.dc.w $2A
+.dc.w $2A
+.dc.w $0
+.dc.w $AA
+.dc.w $A2
+.dc.w $24
+.dc.w $0
+.dc.w $B4
+.dc.w $A8
+.dc.w $4A
+.dc.w $44
+.dc.w $40
+.dc.w $CC
+.dc.w $C0
+.dc.w $4
+.dc.w $0
+.dc.w $C
+.dc.w $0
+.dc.w $3C
+.dc.w $24
+.dc.w $7C
+.dc.w $10
+.dc.w $8A
+.dc.w $44
+.dc.w $A
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $C3
+.dc.w $0
+.dc.w $23
+.dc.w $0
+.dc.w $C4
+.dc.w $C3
+.dc.w $0
+.dc.w $0
+.dc.w $C4
+.dc.w $23
+.dc.w $7C
+.dc.w $94
+.dc.w $C8
+.dc.w $8
+.dc.w $12
+.dc.w $4
+.dc.w $2
+.dc.w $10
+.dc.w $8
+.dc.w $10
+.dc.w $12
+.dc.w $4
+.dc.w $12
+.dc.w $10
+.dc.w $4A
+.dc.w $22
+.dc.w $22
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $48
+.dc.w $20
+.dc.w $8
+.dc.w $40
+.dc.w $20
+.dc.w $8
+.dc.w $40
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $88
+.dc.w $6E
+.dc.w $E
+.dc.w $66
+.dc.w $18
+.dc.w $6
+.dc.w $60
+.dc.w $FE
+.dc.w $60
+.dc.w $66
+.dc.w $18
+.dc.w $66
+.dc.w $60
+.dc.w $0
+.dc.w $18
+.dc.w $DB
+.dc.w $66
+.dc.w $33
+.dc.w $0
+.dc.w $0
+.dc.w $10
+.dc.w $0
+.dc.w $FE
+.dc.w $90
+.dc.w $8
+.dc.w $14
+.dc.w $0
+.dc.w $8
+.dc.w $10
+.dc.w $38
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $8
+.dc.w $42
+.dc.w $10
+.dc.w $4
+.dc.w $40
+.dc.w $20
+.dc.w $40
+.dc.w $42
+.dc.w $8
+.dc.w $42
+.dc.w $40
+.dc.w $0
+.dc.w $0
+.dc.w $4
+.dc.w $3C
+.dc.w $20
+.dc.w $8
+.dc.w $4A
+.dc.w $7E
+.dc.w $44
+.dc.w $2
+.dc.w $44
+.dc.w $4
+.dc.w $4
+.dc.w $42
+.dc.w $42
+.dc.w $10
+.dc.w $20
+.dc.w $12
+.dc.w $2
+.dc.w $92
+.dc.w $52
+.dc.w $42
+.dc.w $2
+.dc.w $42
+.dc.w $A
+.dc.w $40
+.dc.w $10
+.dc.w $42
+.dc.w $28
+.dc.w $AA
+.dc.w $28
+.dc.w $10
+.dc.w $4
+.dc.w $8
+.dc.w $20
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $4C
+.dc.w $42
+.dc.w $2
+.dc.w $42
+.dc.w $3E
+.dc.w $8
+.dc.w $42
+.dc.w $42
+.dc.w $10
+.dc.w $20
+.dc.w $A
+.dc.w $10
+.dc.w $92
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $2
+.dc.w $38
+.dc.w $8
+.dc.w $42
+.dc.w $44
+.dc.w $92
+.dc.w $10
+.dc.w $24
+.dc.w $10
+.dc.w $8
+.dc.w $10
+.dc.w $10
+.dc.w $60
+.dc.w $A5
+.dc.w $50
+.dc.w $BA
+.dc.w $BB
+.dc.w $8A
+.dc.w $0
+.dc.w $0
+.dc.w $EE
+.dc.w $EE
+.dc.w $C4
+.dc.w $9D
+.dc.w $5C
+.dc.w $97
+.dc.w $72
+.dc.w $77
+.dc.w $97
+.dc.w $8
+.dc.w $0
+.dc.w $EE
+.dc.w $EA
+.dc.w $EE
+.dc.w $0
+.dc.w $A0
+.dc.w $24
+.dc.w $EA
+.dc.w $0
+.dc.w $EE
+.dc.w $42
+.dc.w $EE
+.dc.w $0
+.dc.w $94
+.dc.w $E0
+.dc.w $EA
+.dc.w $44
+.dc.w $40
+.dc.w $DE
+.dc.w $DF
+.dc.w $4
+.dc.w $0
+.dc.w $C
+.dc.w $0
+.dc.w $64
+.dc.w $44
+.dc.w $92
+.dc.w $10
+.dc.w $8A
+.dc.w $44
+.dc.w $12
+.dc.w $0
+.dc.w $24
+.dc.w $FF
+.dc.w $81
+.dc.w $0
+.dc.w $21
+.dc.w $FF
+.dc.w $84
+.dc.w $81
+.dc.w $7
+.dc.w $E0
+.dc.w $8C
+.dc.w $31
+.dc.w $7E
+.dc.w $94
+.dc.w $84
+.dc.w $8
+.dc.w $12
+.dc.w $4
+.dc.w $4
+.dc.w $10
+.dc.w $1F
+.dc.w $10
+.dc.w $12
+.dc.w $4
+.dc.w $12
+.dc.w $1C
+.dc.w $4A
+.dc.w $22
+.dc.w $42
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $48
+.dc.w $20
+.dc.w $10
+.dc.w $40
+.dc.w $20
+.dc.w $10
+.dc.w $40
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $66
+.dc.w $18
+.dc.w $C
+.dc.w $38
+.dc.w $FE
+.dc.w $7E
+.dc.w $7E
+.dc.w $30
+.dc.w $3C
+.dc.w $7C
+.dc.w $7C
+.dc.w $7E
+.dc.w $DB
+.dc.w $66
+.dc.w $63
+.dc.w $0
+.dc.w $0
+.dc.w $10
+.dc.w $0
+.dc.w $28
+.dc.w $7C
+.dc.w $10
+.dc.w $8
+.dc.w $0
+.dc.w $8
+.dc.w $10
+.dc.w $FE
+.dc.w $FE
+.dc.w $0
+.dc.w $7C
+.dc.w $0
+.dc.w $10
+.dc.w $42
+.dc.w $10
+.dc.w $8
+.dc.w $40
+.dc.w $FE
+.dc.w $40
+.dc.w $46
+.dc.w $10
+.dc.w $42
+.dc.w $7C
+.dc.w $0
+.dc.w $0
+.dc.w $2
+.dc.w $0
+.dc.w $40
+.dc.w $10
+.dc.w $9A
+.dc.w $42
+.dc.w $44
+.dc.w $2
+.dc.w $44
+.dc.w $4
+.dc.w $4
+.dc.w $72
+.dc.w $42
+.dc.w $10
+.dc.w $20
+.dc.w $A
+.dc.w $2
+.dc.w $92
+.dc.w $52
+.dc.w $42
+.dc.w $3E
+.dc.w $42
+.dc.w $3E
+.dc.w $40
+.dc.w $10
+.dc.w $42
+.dc.w $44
+.dc.w $92
+.dc.w $10
+.dc.w $10
+.dc.w $8
+.dc.w $8
+.dc.w $10
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $70
+.dc.w $42
+.dc.w $2
+.dc.w $42
+.dc.w $42
+.dc.w $3C
+.dc.w $42
+.dc.w $42
+.dc.w $10
+.dc.w $20
+.dc.w $12
+.dc.w $10
+.dc.w $92
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $6
+.dc.w $4
+.dc.w $8
+.dc.w $42
+.dc.w $44
+.dc.w $92
+.dc.w $28
+.dc.w $44
+.dc.w $20
+.dc.w $4
+.dc.w $0
+.dc.w $20
+.dc.w $92
+.dc.w $85
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $15
+.dc.w $51
+.dc.w $91
+.dc.w $8
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $5F
+.dc.w $5F
+.dc.w $DE
+.dc.w $DF
+.dc.w $4
+.dc.w $0
+.dc.w $C
+.dc.w $0
+.dc.w $24
+.dc.w $4C
+.dc.w $10
+.dc.w $10
+.dc.w $8A
+.dc.w $44
+.dc.w $22
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $20
+.dc.w $0
+.dc.w $4
+.dc.w $0
+.dc.w $C
+.dc.w $30
+.dc.w $18
+.dc.w $18
+.dc.w $7F
+.dc.w $22
+.dc.w $85
+.dc.w $8
+.dc.w $12
+.dc.w $4
+.dc.w $8
+.dc.w $C
+.dc.w $9
+.dc.w $E
+.dc.w $E
+.dc.w $8
+.dc.w $C
+.dc.w $12
+.dc.w $4A
+.dc.w $22
+.dc.w $82
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $48
+.dc.w $20
+.dc.w $20
+.dc.w $30
+.dc.w $20
+.dc.w $20
+.dc.w $38
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $A8
+.dc.w $3B
+.dc.w $0
+.dc.w $66
+.dc.w $18
+.dc.w $18
+.dc.w $38
+.dc.w $66
+.dc.w $3E
+.dc.w $3E
+.dc.w $30
+.dc.w $3C
+.dc.w $7E
+.dc.w $7C
+.dc.w $7E
+.dc.w $DB
+.dc.w $66
+.dc.w $C3
+.dc.w $0
+.dc.w $0
+.dc.w $10
+.dc.w $0
+.dc.w $28
+.dc.w $12
+.dc.w $20
+.dc.w $14
+.dc.w $0
+.dc.w $8
+.dc.w $10
+.dc.w $38
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $20
+.dc.w $42
+.dc.w $10
+.dc.w $10
+.dc.w $38
+.dc.w $22
+.dc.w $3E
+.dc.w $3A
+.dc.w $10
+.dc.w $3C
+.dc.w $42
+.dc.w $18
+.dc.w $18
+.dc.w $4
+.dc.w $3C
+.dc.w $20
+.dc.w $20
+.dc.w $AA
+.dc.w $42
+.dc.w $3C
+.dc.w $2
+.dc.w $44
+.dc.w $1C
+.dc.w $1C
+.dc.w $2
+.dc.w $7E
+.dc.w $10
+.dc.w $20
+.dc.w $6
+.dc.w $2
+.dc.w $AA
+.dc.w $4A
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $3C
+.dc.w $10
+.dc.w $42
+.dc.w $44
+.dc.w $92
+.dc.w $10
+.dc.w $28
+.dc.w $10
+.dc.w $8
+.dc.w $8
+.dc.w $10
+.dc.w $82
+.dc.w $0
+.dc.w $0
+.dc.w $42
+.dc.w $26
+.dc.w $44
+.dc.w $64
+.dc.w $44
+.dc.w $8
+.dc.w $24
+.dc.w $26
+.dc.w $10
+.dc.w $20
+.dc.w $22
+.dc.w $10
+.dc.w $92
+.dc.w $26
+.dc.w $24
+.dc.w $26
+.dc.w $64
+.dc.w $4A
+.dc.w $44
+.dc.w $8
+.dc.w $42
+.dc.w $82
+.dc.w $82
+.dc.w $44
+.dc.w $42
+.dc.w $40
+.dc.w $8
+.dc.w $10
+.dc.w $10
+.dc.w $C
+.dc.w $85
+.dc.w $AF
+.dc.w $EE
+.dc.w $2
+.dc.w $0
+.dc.w $52
+.dc.w $95
+.dc.w $E
+.dc.w $0
+.dc.w $23
+.dc.w $A9
+.dc.w $A2
+.dc.w $E
+.dc.w $35
+.dc.w $51
+.dc.w $91
+.dc.w $14
+.dc.w $95
+.dc.w $EA
+.dc.w $EE
+.dc.w $1
+.dc.w $75
+.dc.w $77
+.dc.w $27
+.dc.w $9
+.dc.w $25
+.dc.w $B9
+.dc.w $2
+.dc.w $0
+.dc.w $71
+.dc.w $E9
+.dc.w $A
+.dc.w $0
+.dc.w $44
+.dc.w $40
+.dc.w $CC
+.dc.w $C0
+.dc.w $4
+.dc.w $0
+.dc.w $C
+.dc.w $0
+.dc.w $26
+.dc.w $34
+.dc.w $10
+.dc.w $10
+.dc.w $8A
+.dc.w $44
+.dc.w $42
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $0
+.dc.w $FF
+.dc.w $20
+.dc.w $0
+.dc.w $4
+.dc.w $0
+.dc.w $18
+.dc.w $18
+.dc.w $30
+.dc.w $C
+.dc.w $7E
+.dc.w $22
+.dc.w $49
+.dc.w $8
+.dc.w $12
+.dc.w $4
+.dc.w $10
+.dc.w $10
+.dc.w $A
+.dc.w $2
+.dc.w $2
+.dc.w $8
+.dc.w $12
+.dc.w $12
+.dc.w $4A
+.dc.w $22
+.dc.w $82
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $48
+.dc.w $20
+.dc.w $40
+.dc.w $40
+.dc.w $20
+.dc.w $40
+.dc.w $8
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $A8
+.dc.w $8
+.dc.w $0
+.dc.w $66
+.dc.w $1E
+.dc.w $30
+.dc.w $60
+.dc.w $6C
+.dc.w $6
+.dc.w $6
+.dc.w $60
+.dc.w $66
+.dc.w $66
+.dc.w $0
+.dc.w $18
+.dc.w $DB
+.dc.w $66
+.dc.w $C3
+.dc.w $0
+.dc.w $0
+.dc.w $10
+.dc.w $0
+.dc.w $FE
+.dc.w $12
+.dc.w $44
+.dc.w $22
+.dc.w $0
+.dc.w $8
+.dc.w $10
+.dc.w $54
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $40
+.dc.w $42
+.dc.w $10
+.dc.w $20
+.dc.w $40
+.dc.w $24
+.dc.w $2
+.dc.w $2
+.dc.w $20
+.dc.w $42
+.dc.w $42
+.dc.w $18
+.dc.w $18
+.dc.w $8
+.dc.w $0
+.dc.w $10
+.dc.w $40
+.dc.w $AA
+.dc.w $42
+.dc.w $44
+.dc.w $2
+.dc.w $44
+.dc.w $4
+.dc.w $4
+.dc.w $2
+.dc.w $42
+.dc.w $10
+.dc.w $20
+.dc.w $A
+.dc.w $2
+.dc.w $AA
+.dc.w $4A
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $2
+.dc.w $10
+.dc.w $42
+.dc.w $44
+.dc.w $82
+.dc.w $28
+.dc.w $44
+.dc.w $20
+.dc.w $8
+.dc.w $4
+.dc.w $10
+.dc.w $44
+.dc.w $0
+.dc.w $0
+.dc.w $3C
+.dc.w $1A
+.dc.w $38
+.dc.w $58
+.dc.w $38
+.dc.w $8
+.dc.w $18
+.dc.w $1A
+.dc.w $18
+.dc.w $30
+.dc.w $42
+.dc.w $10
+.dc.w $6E
+.dc.w $1A
+.dc.w $18
+.dc.w $1A
+.dc.w $58
+.dc.w $32
+.dc.w $38
+.dc.w $3E
+.dc.w $42
+.dc.w $82
+.dc.w $82
+.dc.w $82
+.dc.w $42
+.dc.w $7C
+.dc.w $8
+.dc.w $10
+.dc.w $10
+.dc.w $0
+.dc.w $A5
+.dc.w $A9
+.dc.w $AA
+.dc.w $22
+.dc.w $0
+.dc.w $52
+.dc.w $95
+.dc.w $8
+.dc.w $0
+.dc.w $25
+.dc.w $A9
+.dc.w $A2
+.dc.w $22
+.dc.w $15
+.dc.w $51
+.dc.w $91
+.dc.w $14
+.dc.w $95
+.dc.w $2A
+.dc.w $2A
+.dc.w $1
+.dc.w $15
+.dc.w $54
+.dc.w $21
+.dc.w $29
+.dc.w $25
+.dc.w $89
+.dc.w $2
+.dc.w $0
+.dc.w $51
+.dc.w $29
+.dc.w $A
+.dc.w $0
+.dc.w $44
+.dc.w $40
+.dc.w $C0
+.dc.w $C0
+.dc.w $4
+.dc.w $0
+.dc.w $F
+.dc.w $0
+.dc.w $3C
+.dc.w $4
+.dc.w $10
+.dc.w $92
+.dc.w $8A
+.dc.w $44
+.dc.w $82
+.dc.w $0
+.dc.w $24
+.dc.w $FF
+.dc.w $81
+.dc.w $0
+.dc.w $21
+.dc.w $81
+.dc.w $84
+.dc.w $FF
+.dc.w $31
+.dc.w $8C
+.dc.w $E0
+.dc.w $7
+.dc.w $7C
+.dc.w $41
+.dc.w $32
+.dc.w $8
+.dc.w $12
+.dc.w $6
+.dc.w $12
+.dc.w $12
+.dc.w $C
+.dc.w $2
+.dc.w $2
+.dc.w $10
+.dc.w $12
+.dc.w $12
+.dc.w $4B
+.dc.w $33
+.dc.w $93
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $48
+.dc.w $30
+.dc.w $48
+.dc.w $48
+.dc.w $30
+.dc.w $48
+.dc.w $8
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $98
+.dc.w $9
+.dc.w $0
+.dc.w $7E
+.dc.w $1C
+.dc.w $66
+.dc.w $66
+.dc.w $78
+.dc.w $6
+.dc.w $E
+.dc.w $66
+.dc.w $66
+.dc.w $66
+.dc.w $0
+.dc.w $18
+.dc.w $DB
+.dc.w $77
+.dc.w $DB
+.dc.w $0
+.dc.w $0
+.dc.w $10
+.dc.w $0
+.dc.w $28
+.dc.w $92
+.dc.w $8A
+.dc.w $22
+.dc.w $4
+.dc.w $8
+.dc.w $10
+.dc.w $92
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $80
+.dc.w $42
+.dc.w $14
+.dc.w $40
+.dc.w $40
+.dc.w $28
+.dc.w $2
+.dc.w $2
+.dc.w $20
+.dc.w $42
+.dc.w $42
+.dc.w $0
+.dc.w $0
+.dc.w $10
+.dc.w $0
+.dc.w $8
+.dc.w $42
+.dc.w $92
+.dc.w $24
+.dc.w $44
+.dc.w $2
+.dc.w $44
+.dc.w $4
+.dc.w $4
+.dc.w $2
+.dc.w $42
+.dc.w $10
+.dc.w $20
+.dc.w $12
+.dc.w $2
+.dc.w $C6
+.dc.w $46
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $2
+.dc.w $10
+.dc.w $42
+.dc.w $82
+.dc.w $82
+.dc.w $28
+.dc.w $44
+.dc.w $20
+.dc.w $8
+.dc.w $2
+.dc.w $10
+.dc.w $28
+.dc.w $0
+.dc.w $20
+.dc.w $0
+.dc.w $2
+.dc.w $0
+.dc.w $40
+.dc.w $0
+.dc.w $48
+.dc.w $0
+.dc.w $2
+.dc.w $0
+.dc.w $0
+.dc.w $2
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $8
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $8
+.dc.w $10
+.dc.w $10
+.dc.w $0
+.dc.w $99
+.dc.w $6D
+.dc.w $AA
+.dc.w $4E
+.dc.w $0
+.dc.w $32
+.dc.w $D7
+.dc.w $EE
+.dc.w $0
+.dc.w $55
+.dc.w $ED
+.dc.w $AA
+.dc.w $42
+.dc.w $75
+.dc.w $71
+.dc.w $D7
+.dc.w $15
+.dc.w $D7
+.dc.w $2E
+.dc.w $AA
+.dc.w $1
+.dc.w $33
+.dc.w $57
+.dc.w $21
+.dc.w $4D
+.dc.w $35
+.dc.w $99
+.dc.w $39
+.dc.w $0
+.dc.w $57
+.dc.w $2D
+.dc.w $E
+.dc.w $0
+.dc.w $40
+.dc.w $40
+.dc.w $E0
+.dc.w $E0
+.dc.w $5
+.dc.w $0
+.dc.w $E
+.dc.w $0
+.dc.w $64
+.dc.w $4
+.dc.w $10
+.dc.w $7C
+.dc.w $8A
+.dc.w $44
+.dc.w $82
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $C3
+.dc.w $0
+.dc.w $23
+.dc.w $C3
+.dc.w $C4
+.dc.w $0
+.dc.w $23
+.dc.w $C4
+.dc.w $0
+.dc.w $0
+.dc.w $78
+.dc.w $41
+.dc.w $2
+.dc.w $7F
+.dc.w $C
+.dc.w $4
+.dc.w $C
+.dc.w $C
+.dc.w $8
+.dc.w $E
+.dc.w $C
+.dc.w $1F
+.dc.w $C
+.dc.w $C
+.dc.w $32
+.dc.w $22
+.dc.w $62
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $30
+.dc.w $20
+.dc.w $30
+.dc.w $30
+.dc.w $20
+.dc.w $30
+.dc.w $38
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $A8
+.dc.w $8
+.dc.w $0
+.dc.w $3C
+.dc.w $18
+.dc.w $7E
+.dc.w $7E
+.dc.w $70
+.dc.w $3E
+.dc.w $3C
+.dc.w $7E
+.dc.w $7E
+.dc.w $7E
+.dc.w $0
+.dc.w $0
+.dc.w $FB
+.dc.w $77
+.dc.w $FB
+.dc.w $0
+.dc.w $0
+.dc.w $10
+.dc.w $28
+.dc.w $28
+.dc.w $7C
+.dc.w $4
+.dc.w $1C
+.dc.w $8
+.dc.w $10
+.dc.w $8
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $24
+.dc.w $18
+.dc.w $42
+.dc.w $42
+.dc.w $30
+.dc.w $2
+.dc.w $4
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $0
+.dc.w $0
+.dc.w $20
+.dc.w $0
+.dc.w $4
+.dc.w $42
+.dc.w $44
+.dc.w $24
+.dc.w $44
+.dc.w $42
+.dc.w $44
+.dc.w $44
+.dc.w $44
+.dc.w $42
+.dc.w $42
+.dc.w $10
+.dc.w $20
+.dc.w $22
+.dc.w $2
+.dc.w $C6
+.dc.w $46
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $42
+.dc.w $92
+.dc.w $42
+.dc.w $82
+.dc.w $82
+.dc.w $44
+.dc.w $82
+.dc.w $42
+.dc.w $8
+.dc.w $0
+.dc.w $10
+.dc.w $10
+.dc.w $0
+.dc.w $10
+.dc.w $0
+.dc.w $2
+.dc.w $0
+.dc.w $40
+.dc.w $0
+.dc.w $30
+.dc.w $0
+.dc.w $2
+.dc.w $10
+.dc.w $20
+.dc.w $2
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $8
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $8
+.dc.w $10
+.dc.w $10
+.dc.w $0
+.dc.w $42
+.dc.w $A1
+.dc.w $AA
+.dc.w $8A
+.dc.w $0
+.dc.w $52
+.dc.w $B5
+.dc.w $2
+.dc.w $0
+.dc.w $55
+.dc.w $AB
+.dc.w $B6
+.dc.w $82
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $B5
+.dc.w $2A
+.dc.w $2A
+.dc.w $0
+.dc.w $15
+.dc.w $51
+.dc.w $21
+.dc.w $8B
+.dc.w $2D
+.dc.w $89
+.dc.w $2
+.dc.w $0
+.dc.w $55
+.dc.w $2B
+.dc.w $A
+.dc.w $0
+.dc.w $60
+.dc.w $60
+.dc.w $E0
+.dc.w $E0
+.dc.w $6
+.dc.w $0
+.dc.w $C
+.dc.w $0
+.dc.w $24
+.dc.w $4
+.dc.w $10
+.dc.w $38
+.dc.w $53
+.dc.w $66
+.dc.w $8B
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $66
+.dc.w $0
+.dc.w $26
+.dc.w $66
+.dc.w $64
+.dc.w $0
+.dc.w $26
+.dc.w $64
+.dc.w $0
+.dc.w $0
+.dc.w $70
+.dc.w $0
+.dc.w $0
+.dc.w $3E
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7E
+.dc.w $7E
+.dc.w $B8
+.dc.w $3B
+.dc.w $0
+.dc.w $18
+.dc.w $10
+.dc.w $3C
+.dc.w $3C
+.dc.w $60
+.dc.w $3E
+.dc.w $38
+.dc.w $7E
+.dc.w $3C
+.dc.w $3C
+.dc.w $0
+.dc.w $0
+.dc.w $73
+.dc.w $66
+.dc.w $73
+.dc.w $0
+.dc.w $0
+.dc.w $10
+.dc.w $28
+.dc.w $0
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $18
+.dc.w $10
+.dc.w $8
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $18
+.dc.w $10
+.dc.w $3C
+.dc.w $3C
+.dc.w $20
+.dc.w $3E
+.dc.w $38
+.dc.w $7E
+.dc.w $3C
+.dc.w $3C
+.dc.w $0
+.dc.w $0
+.dc.w $40
+.dc.w $0
+.dc.w $2
+.dc.w $3C
+.dc.w $38
+.dc.w $18
+.dc.w $3E
+.dc.w $3C
+.dc.w $3E
+.dc.w $7E
+.dc.w $7E
+.dc.w $3C
+.dc.w $42
+.dc.w $7C
+.dc.w $70
+.dc.w $42
+.dc.w $2
+.dc.w $82
+.dc.w $42
+.dc.w $3C
+.dc.w $3E
+.dc.w $3C
+.dc.w $3E
+.dc.w $3C
+.dc.w $FE
+.dc.w $42
+.dc.w $82
+.dc.w $82
+.dc.w $C6
+.dc.w $82
+.dc.w $7E
+.dc.w $8
+.dc.w $0
+.dc.w $10
+.dc.w $0
+.dc.w $0
+.dc.w $18
+.dc.w $0
+.dc.w $2
+.dc.w $0
+.dc.w $40
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $2
+.dc.w $0
+.dc.w $0
+.dc.w $2
+.dc.w $18
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $30
+.dc.w $10
+.dc.w $C
+.dc.w $0
+.dc.w $3C
+.dc.w $EF
+.dc.w $AE
+.dc.w $E
+.dc.w $0
+.dc.w $77
+.dc.w $92
+.dc.w $E
+.dc.w $0
+.dc.w $53
+.dc.w $49
+.dc.w $A2
+.dc.w $E
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $92
+.dc.w $24
+.dc.w $EE
+.dc.w $1
+.dc.w $77
+.dc.w $77
+.dc.w $71
+.dc.w $9
+.dc.w $A5
+.dc.w $BB
+.dc.w $3
+.dc.w $0
+.dc.w $57
+.dc.w $E9
+.dc.w $A
+.dc.w $0
+.dc.w $40
+.dc.w $40
+.dc.w $C0
+.dc.w $C0
+.dc.w $4
+.dc.w $0
+.dc.w $8
+.dc.w $0
+.dc.w $20
+.dc.w $4
+.dc.w $10
+.dc.w $10
+.dc.w $22
+.dc.w $44
+.dc.w $72
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $24
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $24
+.dc.w $0
+.dc.w $0
+.dc.w $60
+.dc.w $0
+.dc.w $0
+.dc.w $1C
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7E
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $28
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $18
+.dc.w $20
+.dc.w $4
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $78
+.dc.w $0
+.dc.w $1E
+.dc.w $0
+.dc.w $0
+.dc.w $18
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $24
+.dc.w $24
+.dc.w $0
+.dc.w $24
+.dc.w $24
+.dc.w $0
+.dc.w $0
+.dc.w $40
+.dc.w $0
+.dc.w $0
+.dc.w $8
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.data
Index: alcyon/chgsef.s
===================================================================
--- alcyon/chgsef.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/chgsef.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,459 @@
+.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 _sd
+.globl _se
+.globl _gdstbc
+.globl _gdstbn
+.globl _gdstbp
+.globl _chgsef
+.text
+_chgsef:
+~~chgsef:
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~ep=R13
+~rt=R7
+*line 41
+clr _se
+*line 43
+move.l _p_cur,R13
+*line 44
+move.l _t_cur,R7
+*line 46
+*line 46
+cmp.b #21,5(R13)
+beq L2
+*line 47
+*line 48
+move.l 12(R13),R13
+*line 49
+*line 50
+bra L5
+L4:
+*line 51
+*line 52
+*line 53
+cmp.b #21,5(R13)
+beq L3
+*line 54
+*line 55
+move _se,(sp)
+move.l R13,-(sp)
+jsr _se_exec
+addq.l #4,sp
+*line 56
+move.l 12(R13),R13
+L5:
+*line 57
+cmp.l (R13),R7
+beq L4
+L3:
+*line 58
+*line 59
+move.l R13,_p_cur
+*line 60
+L2:L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _chgseb
+.text
+_chgseb:
+~~chgseb:
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~ep=R13
+~rt=R7
+*line 74
+move #1,_se
+*line 76
+move.l _p_cur,R13
+*line 77
+move.l _t_cur,R7
+*line 79
+*line 79
+cmp.b #1,5(R13)
+beq L7
+*line 80
+*line 81
+move.l 8(R13),R13
+*line 82
+*line 83
+bra L10
+L9:
+*line 84
+*line 85
+*line 86
+cmp.b #1,5(R13)
+beq L8
+*line 87
+*line 88
+move _se,(sp)
+move.l R13,-(sp)
+jsr _se_exec
+addq.l #4,sp
+*line 89
+move.l 8(R13),R13
+L10:
+*line 90
+cmp.l (R13),R7
+beq L9
+L8:
+*line 91
+*line 92
+move.l R13,_p_cur
+*line 93
+L7:L6:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _chgsdf
+.text
+_chgsdf:
+~~chgsdf:
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~ep=R13
+~rt=R7
+*line 107
+clr _sd
+*line 109
+move.l #_gdstbc,(sp)
+jsr _rslice
+*line 110
+move.l #_gdstbn,(sp)
+jsr _rslice
+*line 111
+move.l #_gdstbp,(sp)
+jsr _rslice
+*line 113
+move.l _p_ctr,R13
+*line 114
+move.l _t_ctr,R7
+*line 116
+*line 116
+cmp.b #21,5(R13)
+beq L12
+*line 117
+*line 118
+move.l 12(R13),R13
+*line 119
+*line 120
+bra L15
+L14:
+*line 121
+*line 122
+*line 123
+cmp.b #21,5(R13)
+beq L13
+*line 124
+*line 125
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 126
+move.l 12(R13),R13
+L15:
+*line 127
+cmp.l (R13),R7
+beq L14
+L13:
+*line 128
+*line 129
+move.l R13,_p_ctr
+*line 130
+*line 131
+L12:
+*line 132
+move.l _p_bak,R13
+*line 133
+move.l _t_bak,R7
+*line 135
+*line 135
+cmp.b #21,5(R13)
+beq L16
+*line 136
+*line 137
+move.l 12(R13),R13
+*line 138
+*line 139
+bra L19
+L18:
+*line 140
+*line 141
+*line 142
+cmp.b #21,5(R13)
+beq L17
+*line 143
+*line 144
+clr (sp)
+move.l #_gdstbp,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 145
+move.l 12(R13),R13
+L19:
+*line 146
+cmp.l (R13),R7
+beq L18
+L17:
+*line 147
+*line 148
+move.l R13,_p_bak
+*line 149
+*line 150
+L16:
+*line 151
+move.l _p_fwd,R13
+*line 152
+move.l _t_fwd,R7
+*line 154
+*line 154
+cmp.b #21,5(R13)
+beq L20
+*line 155
+*line 156
+move.l 12(R13),R13
+*line 157
+*line 158
+bra L23
+L22:
+*line 159
+*line 160
+*line 161
+cmp.b #21,5(R13)
+beq L21
+*line 162
+*line 163
+clr (sp)
+move.l #_gdstbn,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 164
+move.l 12(R13),R13
+L23:
+*line 165
+cmp.l (R13),R7
+beq L22
+L21:
+*line 166
+*line 167
+move.l R13,_p_fwd
+*line 168
+L20:L11:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _chgsdb
+.text
+_chgsdb:
+~~chgsdb:
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~ep=R13
+~rt=R7
+*line 182
+move #1,_sd
+*line 184
+move.l #_gdstbc,(sp)
+jsr _rslice
+*line 185
+move.l #_gdstbn,(sp)
+jsr _rslice
+*line 186
+move.l #_gdstbp,(sp)
+jsr _rslice
+*line 188
+move.l _p_ctr,R13
+*line 189
+move.l _t_ctr,R7
+*line 191
+*line 191
+cmp.b #1,5(R13)
+beq L25
+*line 192
+*line 193
+move.l 8(R13),R13
+*line 194
+*line 195
+bra L28
+L27:
+*line 196
+*line 197
+*line 198
+cmp.b #1,5(R13)
+beq L26
+*line 199
+*line 200
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+move #1,-(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 201
+move.l 8(R13),R13
+L28:
+*line 202
+cmp.l (R13),R7
+beq L27
+L26:
+*line 203
+*line 204
+move.l R13,_p_ctr
+*line 205
+*line 206
+L25:
+*line 207
+move.l _p_bak,R13
+*line 208
+move.l _t_bak,R7
+*line 210
+*line 210
+cmp.b #1,5(R13)
+beq L29
+*line 211
+*line 212
+move.l 8(R13),R13
+*line 213
+*line 214
+bra L32
+L31:
+*line 215
+*line 216
+*line 217
+cmp.b #1,5(R13)
+beq L30
+*line 218
+*line 219
+clr (sp)
+move.l #_gdstbp,-(sp)
+move #1,-(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 220
+move.l 8(R13),R13
+L32:
+*line 221
+cmp.l (R13),R7
+beq L31
+L30:
+*line 222
+*line 223
+move.l R13,_p_bak
+*line 224
+*line 225
+L29:
+*line 226
+move.l _p_fwd,R13
+*line 227
+move.l _t_fwd,R7
+*line 229
+*line 229
+cmp.b #1,5(R13)
+beq L33
+*line 230
+*line 231
+move.l 8(R13),R13
+*line 232
+*line 233
+bra L36
+L35:
+*line 234
+*line 235
+*line 236
+cmp.b #1,5(R13)
+beq L34
+*line 237
+*line 238
+clr (sp)
+move.l #_gdstbn,-(sp)
+move #1,-(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 239
+move.l 8(R13),R13
+L36:
+*line 240
+cmp.l (R13),R7
+beq L35
+L34:
+*line 241
+*line 242
+move.l R13,_p_fwd
+*line 243
+L33:L24:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/chksec.s
===================================================================
--- alcyon/chksec.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/chksec.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,978 @@
+.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 _secopok
+.globl _t_sbgn
+.globl _t_send
+.globl _t_sect
+.globl _t_sec1
+.globl _t_sec2
+.globl _t_cbgn
+.globl _t_cend
+.globl _p_sbgn
+.globl _p_send
+.globl _p_sec1
+.globl _p_sec2
+.globl _p_cbgn
+.globl _p_cend
+.globl _ancmsw
+.globl _grptran
+.globl _grpmode
+.globl _grpstat
+.globl _grptmap
+.globl _varmode
+.globl _cmslens
+.data
+_cmslens:
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $6
+.dc.w $5
+.dc.w $5
+.dc.w $5
+.dc.w $5
+.dc.w $6
+.dc.w $6
+.dc.w $6
+.dc.w $6
+.dc.w $6
+.dc.w $6
+.dc.w $6
+.dc.w $6
+.dc.w $6
+.dc.w $5
+.dc.w $5
+.dc.w $5
+.dc.w $0
+.dc.w $5
+.dc.w $5
+.dc.w $5
+.globl _cmgtags
+.data
+_cmgtags:
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.even
+.globl _cmgtype
+.data
+_cmgtype:
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $1
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.even
+.globl _ehdlist
+.data
+_ehdlist:
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $A
+.dc.w $B
+.dc.w $0
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $6
+.dc.w $7
+.dc.w $8
+.dc.w $1
+.dc.w $2
+.dc.w $3
+.dc.w $FFFF
+.dc.w $4
+.dc.w $9
+.dc.w $5
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.globl _oktocm
+.text
+_oktocm:
+~~oktocm:
+~ep=R13
+link R14,#0
+movem.l R4-R7/R13-R13,-(sp)
+~et=R7
+~grp=R6
+~mode=R5
+*line 171
+move.l 8(R14),R13
+*line 171
+move.b 5(R13),R7
+ext.w R7
+and #127,R7
+*line 173
+*line 174
+move R7,R8
+add.l R8,R8
+add.l #_cmslens,R8
+tst (R8)
+bne L2
+*line 174
+clr R0
+bra L1
+*line 175
+L2:
+*line 176
+*line 177
+move.l #_cmgtags,R8
+tst.b 0(R8,R7)
+bne L3
+*line 177
+move #1,R0
+bra L1
+*line 178
+*line 179
+*line 180
+L3:
+*line 181
+move.l #_cmgtype,R8
+tst.b 0(R8,R7)
+beq L10000
+move.b 7(R13),R0
+ext.w R0
+bra L10002
+L10000:move.b 6(R13),R0
+ext.w R0
+L10002:move R0,R6
+and #15,R6
+*line 183
+*line 184
+move R6,R8
+add.l R8,R8
+move.l #_grpstat,R9
+tst 0(R8,R9.l)
+bne L4
+*line 184
+clr R0
+bra L1
+*line 185
+L4:
+*line 186
+*line 187
+cmp #15,R7
+beq L10003
+cmp #14,R7
+bne L5
+L10003:*line 188
+*line 189
+tst _ancmsw
+beq L10004
+move.b 6(R13),R0
+ext.w R0
+asr #4,R0
+and #7,R0
+asl #5,R0
+ext.l R0
+move R6,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_varmode,R9
+move 0(R8,R9.l),R0
+bra L10006
+L10004:move R6,R8
+add.l R8,R8
+add.l #_grptmap,R8
+cmp #-1,(R8)
+bne L10007
+clr R0
+bra L10009
+L10007:move #2,R0
+L10009:L10006:move R0,R5
+bra L6
+L5:
+*line 190
+*line 191
+move R6,R8
+add.l R8,R8
+add.l #_grptmap,R8
+cmp #-1,(R8)
+bne L10010
+clr R0
+bra L10012
+L10010:move #2,R0
+L10012:move R0,R5
+L6:
+*line 195
+cmp #2,R5
+bne L10013
+move #1,R0
+bra L10015
+L10013:clr R0
+L10015:bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.globl _oktode
+.text
+_oktode:
+~~oktode:
+~ep=R13
+link R14,#0
+movem.l R4-R7/R13-R13,-(sp)
+~et=R7
+~grp=R6
+~mode=R5
+*line 218
+move.l 8(R14),R13
+*line 218
+move.b 5(R13),R7
+ext.w R7
+and #127,R7
+*line 220
+*line 221
+cmp #5,R7
+beq L10016
+cmp #6,R7
+bne L8
+L10016:*line 221
+clr R0
+bra L7
+*line 222
+L8:
+*line 223
+*line 224
+move.l #_cmgtags,R8
+tst.b 0(R8,R7)
+bne L9
+*line 224
+move #1,R0
+bra L7
+*line 225
+*line 226
+*line 227
+L9:
+*line 228
+move.l #_cmgtype,R8
+tst.b 0(R8,R7)
+beq L10017
+move.b 7(R13),R0
+ext.w R0
+bra L10019
+L10017:move.b 6(R13),R0
+ext.w R0
+L10019:move R0,R6
+and #15,R6
+*line 230
+*line 231
+move R6,R8
+add.l R8,R8
+move.l #_grpstat,R9
+tst 0(R8,R9.l)
+bne L10
+*line 231
+clr R0
+bra L7
+*line 232
+L10:
+*line 233
+*line 234
+cmp #15,R7
+beq L10020
+cmp #14,R7
+bne L11
+L10020:*line 235
+tst _ancmsw
+beq L10021
+move.b 6(R13),R0
+ext.w R0
+asr #4,R0
+and #7,R0
+asl #5,R0
+ext.l R0
+move R6,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_varmode,R9
+move 0(R8,R9.l),R0
+bra L10023
+L10021:move R6,R8
+add.l R8,R8
+move.l #_grpmode,R9
+move 0(R8,R9.l),R0
+L10023:move R0,R5
+bra L12
+L11:
+*line 236
+*line 237
+move R6,R8
+add.l R8,R8
+add.l #_grpmode,R8
+move (R8),R5
+L12:
+*line 241
+cmp #2,R5
+bne L10024
+move #1,R0
+bra L10026
+L10024:clr R0
+L10026:bra L7
+L7:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.globl _oktodg
+.text
+_oktodg:
+~~oktodg:
+~ep=R13
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~et=R7
+~grp=R6
+*line 264
+move.l 8(R14),R13
+*line 264
+move.b 5(R13),R7
+ext.w R7
+and #127,R7
+*line 266
+*line 267
+*line 268
+cmp #5,R7
+beq L14
+cmp #6,R7
+beq L14
+*line 268
+clr R0
+bra L13
+*line 269
+L14:
+*line 270
+move.b 7(R13),R6
+ext.w R6
+*line 272
+*line 273
+*line 274
+move R6,R8
+add.l R8,R8
+add.l #_grpmode,R8
+cmp #2,(R8)
+bne L15
+move R6,R8
+add.l R8,R8
+move.l #_grpstat,R9
+tst 0(R8,R9.l)
+beq L15
+*line 274
+move #1,R0
+bra L13
+*line 275
+bra L16
+L15:
+*line 276
+clr R0
+bra L13
+L16:L13:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.globl _chksec
+.text
+_chksec:
+~~chksec:
+~ns=R7
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~ep=R13
+*line 301
+move 8(R14),R7
+*line 305
+*line 305
+move _curscor,R0
+muls #80,R0
+move R7,R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+add.l #_seclist,R0
+move.l R0,R8
+move.l (R8),_p_sbgn
+bne L18
+*line 306
+*line 307
+clr _secopok
+*line 308
+clr.l _p_send
+*line 309
+*line 310
+move #1,R0
+bra L17
+*line 311
+*line 312
+L18:
+*line 313
+move.l _p_sbgn,R8
+move.l (R8),_t_sbgn
+*line 319
+move _curscor,R0
+muls #48,R0
+add.l #_hplist,R0
+move.l R0,R8
+move.l 44(R8),R13
+*line 321
+bra L21
+L20:
+*line 322
+*line 323
+*line 324
+*line 325
+move.b 5(R13),R0
+ext.w R0
+and #127,R0
+cmp #3,R0
+bne L10027
+move.b 6(R13),R0
+ext.w R0
+cmp R0,R7
+beq L19
+L10027:*line 326
+*line 327
+move.l 20(R13),R13
+L21:
+*line 328
+move.l R13,R0
+bne L20
+L19:
+*line 330
+*line 330
+move.l R13,_p_send
+bne L22
+*line 331
+*line 332
+clr _secopok
+*line 333
+*line 334
+move #2,R0
+bra L17
+*line 335
+*line 336
+*line 337
+*line 338
+L22:
+*line 339
+*line 339
+move.l (R13),R0
+move.l R0,_t_send
+cmp.l _t_sbgn,R0
+bgt L23
+*line 340
+*line 341
+clr _secopok
+*line 342
+*line 343
+move #3,R0
+bra L17
+*line 344
+*line 345
+L23:
+*line 346
+move.l _t_send,R0
+add.l #$1,R0
+sub.l _t_sbgn,R0
+move.l R0,_t_sect
+*line 349
+clr R0
+bra L17
+L17:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _sizesec
+.text
+_sizesec:
+~~sizesec:
+link R14,#0
+movem.l R5-R7/R12-R13,-(sp)
+~ec=R7
+~et=R6
+~sbp=R13
+~sep=R12
+*line 375
+clr.l R7
+*line 376
+move.l _p_sbgn,R8
+move.l 12(R8),R13
+*line 377
+move.l _p_send,R12
+*line 379
+bra L27
+L26:
+*line 380
+*line 381
+move.b 5(R13),R6
+ext.w R6
+and #127,R6
+*line 382
+*line 383
+*line 384
+move.l R13,(sp)
+jsr _oktocm
+tst R0
+beq L28
+*line 384
+move R6,R8
+add.l R8,R8
+move.l #_cmslens,R9
+move 0(R8,R9.l),R0
+ext.l R0
+add.l R0,R7
+*line 385
+L28:
+*line 386
+move.l 12(R13),R13
+L27:
+*line 387
+cmp.l R12,R13
+bne L26
+L25:
+*line 397
+move.l R7,R0
+bra L24
+L24:tst.l (sp)+
+movem.l (sp)+,R6-R7/R12-R13
+unlk R14
+rts
+.globl _edelta
+.text
+_edelta:
+~~edelta:
+~ep=R13
+~btime=R7
+~delta=R6
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+*line 417
+move.l 8(R14),R13
+*line 417
+move.l 12(R14),R7
+*line 417
+move.l 16(R14),R6
+*line 419
+bra L32
+L31:
+*line 420
+*line 421
+*line 422
+cmp.l (R13),R7
+bge L33
+*line 422
+add.l R6,(R13)
+*line 423
+L33:
+*line 424
+move.l 12(R13),R13
+L32:
+*line 425
+move.b 5(R13),R0
+ext.w R0
+and #127,R0
+cmp #21,R0
+bne L31
+L30:L29:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.globl _madjsec
+.text
+_madjsec:
+~~madjsec:
+~sbp=R13
+~btime=R7
+link R14,#-8
+movem.l R2-R7/R11-R13,-(sp)
+~ns=-2
+~nv=-4
+~grp=R6
+~es=R5
+~et=R4
+~ep=R12
+~np=R11
+~cp=-8
+~sat=R3
+*line 460
+move.l 8(R14),R13
+*line 460
+move.l 12(R14),R7
+*line 462
+clr.l R0
+move.l R0,-8(R14)
+move.l R0,R12
+move.l R12,R11
+*line 463
+move.b 6(R13),R0
+ext.w R0
+move R0,-2(R14)
+*line 464
+move.l (R13),R3
+sub.l R7,R3
+*line 465
+move.l 12(R13),R13
+*line 472
+bra L37
+L36:
+*line 473
+*line 474
+move.b 5(R13),R4
+ext.w R4
+and #127,R4
+*line 475
+*line 476
+*line 477
+*line 478
+*line 479
+cmp #3,R4
+bne L10028
+move.b 6(R13),R0
+ext.w R0
+cmp -2(R14),R0
+beq L35
+L10028:*line 480
+*line 481
+*line 481
+move.l R13,(sp)
+jsr _oktocm
+tst R0
+beq L38
+*line 482
+*line 483
+move.b 4(R13),R5
+ext.w R5
+*line 484
+move R5,(sp)
+jsr _e_alc
+move.l R0,R11
+*line 485
+move R5,R0
+asl #1,R0
+move R0,(sp)
+move.l R13,-(sp)
+move.l R11,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 486
+*line 487
+*line 487
+move.l #_cmgtags,R8
+tst.b 0(R8,R4)
+beq L39
+*line 488
+*line 489
+*line 490
+move.l #_cmgtype,R8
+tst.b 0(R8,R4)
+beq L10029
+move.b 7(R11),R0
+ext.w R0
+bra L10031
+L10029:move.b 6(R11),R0
+ext.w R0
+L10031:move R0,R6
+and #15,R6
+*line 491
+*line 492
+*line 492
+cmp #5,R4
+beq L10032
+cmp #6,R4
+bne L40
+L10032:*line 493
+*line 494
+*line 495
+*line 496
+*line 497
+move.b 7(R11),R0
+ext.w R0
+and #240,R0
+move R6,R9
+add.l R9,R9
+add.l #_grptmap,R9
+move (R9),R1
+or R1,R0
+move.b R0,7(R11)
+*line 498
+*line 499
+*line 500
+*line 501
+move.b 6(R11),R0
+ext.w R0
+add _grptran,R0
+move R0,-4(R14)
+*line 502
+*line 503
+*line 504
+cmp #127,-4(R14)
+ble L41
+*line 504
+move #127,-4(R14)
+bra L42
+L41:
+*line 505
+*line 506
+tst -4(R14)
+bge L43
+*line 506
+clr -4(R14)
+*line 507
+L43:L42:
+*line 508
+move -4(R14),R0
+move.b R0,6(R11)
+*line 509
+bra L44
+L40:
+*line 510
+*line 510
+cmp #15,R4
+beq L10033
+cmp #14,R4
+bne L45
+L10033:*line 511
+*line 512
+*line 513
+*line 514
+*line 515
+move.b 6(R11),R0
+ext.w R0
+and #15,R0
+move R6,R9
+add.l R9,R9
+add.l #_grptmap,R9
+move (R9),R1
+asl #4,R1
+or R1,R0
+move.b R0,6(R11)
+*line 516
+bra L46
+L45:
+*line 517
+*line 518
+*line 519
+*line 520
+*line 521
+*line 522
+move.l #_cmgtype,R8
+tst.b 0(R8,R4)
+beq L47
+*line 523
+move.b 7(R11),R0
+ext.w R0
+and #240,R0
+move R6,R9
+add.l R9,R9
+add.l #_grptmap,R9
+move (R9),R1
+or R1,R0
+move.b R0,7(R11)
+*line 524
+bra L48
+L47:
+*line 525
+*line 526
+move.b 6(R11),R0
+ext.w R0
+and #240,R0
+move R6,R9
+add.l R9,R9
+add.l #_grptmap,R9
+move (R9),R1
+or R1,R0
+move.b R0,6(R11)
+L48:L46:L44:
+*line 527
+*line 528
+*line 529
+*line 530
+*line 531
+L39:
+*line 532
+*line 532
+move.l R12,R0
+beq L49
+*line 533
+*line 534
+move.l R11,12(R12)
+*line 535
+bra L50
+L49:
+*line 536
+*line 537
+*line 538
+*line 539
+move.l R11,-8(R14)
+L50:
+*line 540
+*line 541
+*line 542
+move.l R12,8(R11)
+*line 543
+clr.l 12(R11)
+*line 544
+sub.l R3,(R11)
+*line 545
+move.l R11,R12
+*line 546
+*line 547
+L38:
+*line 548
+move.l 12(R13),R13
+L37:
+*line 549
+bra L36
+L35:
+*line 551
+move.l -8(R14),_p_cbgn
+*line 552
+move.l R11,_p_cend
+*line 554
+*line 554
+tst.l -8(R14)
+beq L51
+*line 555
+*line 556
+*line 557
+move.l -8(R14),R8
+move.l (R8),_t_cbgn
+*line 558
+move.l (R11),_t_cend
+*line 559
+*line 560
+L51:
+*line 562
+move.l -8(R14),R0
+bra L34
+L34:tst.l (sp)+
+movem.l (sp)+,R3-R7/R11-R13
+unlk R14
+rts
+.globl _ehfix
+.text
+_ehfix:
+~~ehfix:
+~cbp=R13
+~cep=R12
+link R14,#0
+movem.l R6-R7/R12-R13,-(sp)
+~et=R7
+*line 582
+move.l 8(R14),R13
+*line 582
+move.l 12(R14),R12
+L55:
+*line 583
+*line 584
+move.b 5(R13),R7
+ext.w R7
+and #127,R7
+*line 585
+*line 586
+*line 587
+*line 588
+*line 589
+move R7,R8
+add.l R8,R8
+add.l #_ehdlist,R8
+cmp #-1,(R8)
+beq L56
+*line 589
+move R7,R8
+add.l R8,R8
+move.l #_ehdlist,R9
+move 0(R8,R9.l),(sp)
+move.l R13,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 590
+L56:
+*line 591
+*line 592
+cmp.l R12,R13
+beq L52
+*line 593
+*line 594
+move.l 12(R13),R13
+L54:bra L55
+L53:L52:tst.l (sp)+
+movem.l (sp)+,R7-R7/R12-R13
+unlk R14
+rts
+.data
Index: alcyon/close.s
===================================================================
--- alcyon/close.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/close.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,200 @@
+.globl _errno
+.globl _chantab
+.globl _Wrkbuf
+.globl __fatmod
+.globl __dirmod
+.globl __thebpb
+.globl __thedir
+.globl __thefat
+.globl __clsfat
+.text
+__clsfat:
+~~_clsfat:
+link R14,#-4
+*line 34
+*line 35
+clr (sp)
+move.l __thebpb,R8
+move 10(R8),-(sp)
+move.l __thebpb,R8
+move 8(R8),-(sp)
+move.l #__thefat,-(sp)
+move #1,-(sp)
+move #4,-(sp)
+jsr _trap13
+adda.l #12,sp
+*line 39
+*line 40
+clr (sp)
+move.l __thebpb,R8
+move 10(R8),-(sp)
+move.l __thebpb,R8
+clr R0
+move 8(R8),R0
+sub R0,(sp)
+move.l __thebpb,R8
+move 8(R8),-(sp)
+move.l #__thefat,-(sp)
+move #1,-(sp)
+move #4,-(sp)
+jsr _trap13
+adda.l #12,sp
+*line 42
+clr __fatmod
+L1:unlk R14
+rts
+.globl __clsdir
+.text
+__clsdir:
+~~_clsdir:
+link R14,#-4
+*line 55
+*line 56
+clr (sp)
+move.l __thebpb,R8
+move 10(R8),-(sp)
+move.l __thebpb,R8
+clr R0
+move 8(R8),R0
+add R0,(sp)
+move.l __thebpb,R8
+move 6(R8),-(sp)
+move.l #__thedir,-(sp)
+move #1,-(sp)
+move #4,-(sp)
+jsr _trap13
+adda.l #12,sp
+*line 58
+clr __dirmod
+L2:unlk R14
+rts
+.globl _close
+.text
+_close:
+~~close:
+~fd=8
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~chp=R13
+~rc=R7
+*line 77
+*line 77
+tst 8(R14)
+blt L10000
+cmp #11,8(R14)
+ble L4
+L10000:*line 78
+*line 79
+move #9,_errno
+*line 80
+move #-1,R0
+bra L3
+*line 81
+*line 82
+L4:
+*line 83
+move 8(R14),R0
+muls #12,R0
+move.l R0,R13
+add.l #_chantab,R13
+*line 85
+move.l 8(R13),-(sp)
+move.l 4(R13),R8
+jsr (R8)
+addq.l #4,sp
+move R0,R7
+*line 87
+clr.b (R13)
+*line 88
+clr.b 1(R13)
+*line 89
+clr.b 2(R13)
+*line 90
+clr.b 3(R13)
+*line 91
+move.l #__badfd,4(R13)
+*line 93
+*line 94
+tst __fatmod
+beq L5
+*line 94
+jsr __clsfat
+*line 95
+L5:
+*line 96
+*line 97
+tst __dirmod
+beq L6
+*line 97
+jsr __clsdir
+*line 98
+L6:
+*line 99
+move R7,R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl __filecl
+.text
+__filecl:
+~~_filecl:
+~fp=R13
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~rc=R7
+*line 117
+move.l 8(R14),R13
+*line 117
+move.l R13,(sp)
+jsr _ClsFile
+move R0,R7
+*line 118
+clr 32(R13)
+*line 119
+move R7,R0
+bra L7
+L7:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl __fd_cls
+.text
+__fd_cls:
+~~_fd_cls:
+link R14,#0
+movem.l R6-R7,-(sp)
+~fd=R7
+*line 132
+clr R7
+bra L11
+L12:
+*line 133
+*line 134
+move R7,R0
+muls #12,R0
+move.l R0,R8
+move.l #_chantab,R9
+move.l 4(R8,R9.l),R0
+cmp.l #__badfd,R0
+beq L13
+*line 134
+move R7,(sp)
+jsr _close
+*line 135
+L13:L10:
+*line 132
+add #1,R7
+L11:
+*line 132
+cmp #11,R7
+blt L12
+L9:
+*line 136
+jsr __clsvol
+L8:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.data
Index: alcyon/clusmap.s
===================================================================
--- alcyon/clusmap.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/clusmap.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,926 @@
+.globl _errno
+.globl _chantab
+.globl _Wrkbuf
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl __thebpb
+.globl __thefat
+.data
+L1:
+*line 27
+.dc.l L2
+*line 28
+.dc.l L3
+*line 29
+.dc.l L4
+*line 30
+.dc.l L5
+*line 32
+.dc.l L6
+*line 33
+.dc.l L7
+*line 34
+.dc.l L8
+*line 35
+.dc.l L9
+*line 37
+.dc.l L10
+*line 38
+.dc.l L11
+*line 39
+.dc.l L12
+*line 40
+.dc.l L13
+*line 42
+.dc.l L14
+*line 43
+.dc.l L15
+*line 44
+.dc.l L16
+*line 46
+.dc.l L17
+.text
+.data
+L18:
+*line 53
+.dc.l L19
+*line 54
+.dc.l L20
+*line 55
+.dc.l L21
+*line 56
+.dc.l L22
+*line 57
+.dc.l L23
+*line 58
+.dc.l L24
+*line 59
+.dc.l L25
+*line 61
+.dc.l L26
+.text
+.data
+L27:
+*line 65
+.dc.l L28
+*line 66
+.dc.l L29
+*line 67
+.dc.l L30
+*line 68
+.dc.l L31
+*line 69
+.dc.l L32
+*line 70
+.dc.l L33
+*line 71
+.dc.l L34
+*line 73
+.dc.l L35
+.text
+.text
+_waitcr:
+~~waitcr:
+link R14,#-6
+~c=-2
+*line 83
+move #7,(sp)
+move #2,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 85
+bra L40
+L39:
+*line 86
+*line 87
+cmp.b #7,-2(R14)
+bne L41
+*line 87
+jsr _xtrap15
+L41:L40:
+*line 88
+move #2,(sp)
+move #2,-(sp)
+jsr _trap13
+addq.l #2,sp
+and.l #$7f,R0
+move.b R0,-2(R14)
+cmp #13,R0
+bne L39
+L38:L37:unlk R14
+rts
+.globl _ClusMap
+.text
+_ClusMap:
+~~ClusMap:
+~fcp=8
+link R14,#-20
+~clus=-2
+~nc=-4
+~alsize=-8
+~bused=-12
+~bunused=-16
+*line 108
+*line 108
+move.l 8(R14),R8
+btst #4,32(R8)
+bne L43
+*line 109
+*line 110
+move #22,_errno
+*line 111
+move #-1,R0
+bra L42
+*line 112
+*line 113
+L43:
+*line 114
+clr -4(R14)
+*line 115
+move.l 8(R14),R8
+move 26(R8),(sp)
+jsr _micons
+move R0,-2(R14)
+*line 117
+*line 117
+tst -2(R14)
+beq L44
+*line 118
+*line 119
+*line 120
+move -2(R14),(sp)
+move.l 8(R14),-(sp)
+add.l #8,(sp)
+move.l 8(R14),-(sp)
+move.l #L45,-(sp)
+jsr _printf
+adda.l #12,sp
+*line 121
+move #1,-4(R14)
+*line 122
+*line 123
+bra L48
+L47:
+*line 124
+*line 125
+move -2(R14),(sp)
+move.l #__thefat,-(sp)
+jsr __gtcl12
+addq.l #4,sp
+move R0,-2(R14)
+*line 126
+*line 127
+*line 127
+cmp #4080,-2(R14)
+bge L49
+*line 128
+*line 129
+add #1,-4(R14)
+*line 130
+*line 131
+*line 132
+move -4(R14),R0
+sub #1,R0
+ext.l R0
+divs #10,R0
+swap R0
+tst R0
+bne L50
+*line 132
+move.l #L51,(sp)
+jsr _printf
+*line 133
+L50:
+*line 134
+move -2(R14),(sp)
+move.l #L52,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 135
+L49:L48:
+*line 136
+cmp #4080,-2(R14)
+blt L47
+L46:
+*line 137
+*line 138
+L44:
+*line 139
+move.l __thebpb,R8
+clr R0
+move 4(R8),R0
+mulu -4(R14),R0
+move.l R0,-8(R14)
+*line 140
+move.l 8(R14),R8
+move.l 48(R8),-12(R14)
+*line 141
+move.l -8(R14),R0
+sub.l -12(R14),R0
+move.l R0,-16(R14)
+*line 143
+move.l 8(R14),R8
+move.l 52(R8),(sp)
+move -4(R14),-(sp)
+move.l #L53,-(sp)
+jsr _printf
+addq.l #6,sp
+*line 144
+move.l -12(R14),(sp)
+move.l -8(R14),-(sp)
+move.l #L54,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 146
+*line 147
+move.l -8(R14),R0
+cmp.l -12(R14),R0
+blt L55
+*line 147
+move.l -16(R14),(sp)
+move.l #L56,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 148
+L55:
+*line 149
+move.l #L57,(sp)
+jsr _printf
+*line 151
+*line 152
+move.l -12(R14),R0
+cmp.l -8(R14),R0
+ble L58
+*line 152
+move.l #L59,(sp)
+jsr _printf
+*line 153
+L58:
+*line 154
+*line 155
+move.l 8(R14),R8
+move.l 52(R8),R0
+move -4(R14),R8
+cmp.l R8,R0
+beq L60
+*line 156
+move.l 8(R14),R8
+move.l 52(R8),(sp)
+move -4(R14),-(sp)
+move.l #L61,-(sp)
+jsr _printf
+addq.l #6,sp
+L60:
+*line 157
+clr R0
+bra L42
+L42:unlk R14
+rts
+.globl _FCBmode
+.text
+_FCBmode:
+~~FCBmode:
+~fcp=R13
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~mf=R7
+~i=R6
+*line 176
+move.l 8(R14),R13
+*line 176
+move.l #L63,(sp)
+jsr _printf
+*line 177
+move #1,R7
+*line 179
+clr R6
+bra L66
+L67:
+*line 180
+*line 181
+*line 182
+clr R0
+move R7,R0
+and 32(R13),R0
+beq L68
+*line 182
+move R6,R8
+add.l R8,R8
+add.l R8,R8
+move.l #L1,R9
+move.l 0(R8,R9.l),(sp)
+move.l #L69,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 183
+L68:
+*line 184
+lsl R7
+L65:
+*line 179
+add #1,R6
+L66:
+*line 179
+cmp #16,R6
+blt L67
+L64:
+*line 187
+move.l #L70,(sp)
+jsr _printf
+*line 189
+move #1,R7
+*line 191
+clr R6
+bra L73
+L74:
+*line 192
+*line 193
+*line 194
+clr R0
+move R7,R0
+move.b 11(R13),R1
+ext.w R1
+and R1,R0
+beq L75
+*line 194
+move R6,R8
+add.l R8,R8
+add.l R8,R8
+move.l #L18,R9
+move.l 0(R8,R9.l),(sp)
+move.l #L76,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 195
+L75:
+*line 196
+lsl R7
+L72:
+*line 191
+add #1,R6
+L73:
+*line 191
+cmp #8,R6
+blt L74
+L71:
+*line 199
+move.l #L77,(sp)
+jsr _printf
+*line 200
+move.l R13,R0
+bra L62
+L62:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.globl _SnapFCB
+.text
+_SnapFCB:
+~~SnapFCB:
+~fcp=R13
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+*line 217
+move.l 8(R14),R13
+*line 218
+move.l R13,(sp)
+add.l #8,(sp)
+move.l R13,-(sp)
+move.l R13,-(sp)
+move.l #L79,-(sp)
+jsr _printf
+adda.l #12,sp
+*line 219
+move.l R13,(sp)
+jsr _FCBmode
+*line 221
+move.b 11(R13),R0
+ext.w R0
+move R0,(sp) 
+move.l #L80,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 222
+move 32(R13),(sp)
+move.l #L81,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 224
+move 22(R13),(sp)
+jsr _micons
+move R0,(sp)
+move.l #L82,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 225
+move 24(R13),(sp)
+jsr _micons
+move R0,(sp)
+move.l #L83,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 227
+move.l 52(R13),(sp)
+move.l #L84,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 228
+move.l 28(R13),(sp)
+jsr _miconl
+move.l R0,(sp)
+move.l #L85,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 229
+move.l 48(R13),(sp)
+move.l #L86,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 231
+move 26(R13),(sp)
+jsr _micons
+move R0,(sp)
+move.l #L87,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 232
+move 36(R13),(sp)
+move.l #L88,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 233
+move 34(R13),(sp)
+move.l #L89,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 235
+move.l 40(R13),(sp)
+move.l #L90,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 236
+move.l 44(R13),(sp)
+move.l #L91,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 237
+move 38(R13),(sp)
+move.l #L92,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 239
+move.l #L93,(sp)
+jsr _printf
+*line 240
+move.l R13,R0
+bra L78
+L78:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _MapFAT
+.text
+_MapFAT:
+~~MapFAT:
+~fat=R13
+~ncl=12
+~stops=14
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~i=R7
+*line 258
+move.l 8(R14),R13
+*line 259
+move 12(R14),(sp)
+move.l R13,-(sp)
+move.l #L95,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 260
+move.l #L96,(sp)
+jsr _printf
+*line 262
+move #2,R7
+bra L99
+L100:
+*line 263
+*line 264
+*line 265
+move R7,R0
+ext.l R0
+divs #10,R0
+swap R0
+tst R0
+bne L101
+*line 265
+move R7,(sp)
+move.l #L102,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 266
+L101:
+*line 267
+move R7,(sp)
+move.l R13,-(sp)
+jsr __gtcl12
+addq.l #4,sp
+move R0,(sp)
+move.l #L103,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 268
+*line 269
+*line 270
+*line 271
+*line 272
+tst 14(R14)
+beq L104
+move R7,R0
+ext.l R0
+divs #10,R0
+ext.l R0
+divs #10,R0
+swap R0
+tst R0
+bne L104
+*line 272
+jsr _waitcr
+L104:L98:
+*line 262
+add #1,R7
+L99:
+*line 262
+cmp 12(R14),R7
+blt L100
+L97:
+*line 275
+move.l #L105,(sp)
+jsr _printf
+L94:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _FILEfl
+.text
+_FILEfl:
+~~FILEfl:
+~fp=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~mf=R7
+~i=R6
+*line 294
+move.l #L107,(sp)
+jsr _printf
+*line 295
+move #1,R7
+*line 297
+clr R6
+bra L110
+L111:
+*line 298
+*line 299
+*line 300
+clr R0
+move R7,R0
+move.l 8(R14),R9
+move.b 12(R9),R1
+ext.w R1
+and R1,R0
+beq L112
+*line 300
+move R6,R8
+add.l R8,R8
+add.l R8,R8
+move.l #L27,R9
+move.l 0(R8,R9.l),(sp)
+move.l #L113,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 301
+L112:
+*line 302
+lsl R7
+L109:
+*line 297
+add #1,R6
+L110:
+*line 297
+cmp #8,R6
+blt L111
+L108:
+*line 305
+move.l #L114,(sp)
+jsr _printf
+*line 306
+move.l 8(R14),R0
+bra L106
+L106:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _FILEpr
+.text
+_FILEpr:
+~~FILEpr:
+~fp=8
+link R14,#-26
+~arg=-4
+~ft=-6
+~ds=-10
+~fsn=-14
+~fse=-18
+~fcp=-22
+*line 325
+*line 325
+tst.l 8(R14)
+bne L116
+*line 326
+*line 327
+move.l #L117,(sp)
+jsr _printf
+bra L115
+*line 328
+*line 329
+*line 330
+*line 331
+L116:
+*line 332
+move.l 8(R14),(sp)
+move.l #L118,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 334
+move.l 8(R14),R8
+move.b 13(R8),R0
+ext.w R0
+muls #12,R0
+add.l #_chantab,R0
+move.l R0,R8
+move.l 4(R8),-4(R14)
+*line 335
+clr -6(R14)
+*line 337
+*line 337
+move.l -4(R14),R0
+cmp.l #__noper,R0
+bne L119
+*line 338
+*line 339
+move.l 8(R14),R8
+move.b 13(R8),R0
+ext.w R0
+muls #12,R0
+move.l R0,R8
+move.l #_chantab,R9
+move.l 8(R8,R9.l),R8
+move.l (R8),-10(R14)
+*line 340
+move.l -10(R14),(sp)
+move.l #L120,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 341
+bra L121
+L119:
+*line 342
+*line 342
+move.l -4(R14),R0
+cmp.l #__filecl,R0
+bne L122
+*line 343
+*line 344
+move #1,-6(R14)
+*line 345
+move.l 8(R14),R8
+move.b 13(R8),R0
+ext.w R0
+muls #12,R0
+add.l #_chantab,R0
+move.l R0,R8
+move.l 8(R8),-22(R14)
+*line 346
+move.l -22(R14),-14(R14)
+*line 347
+move.l -22(R14),R0
+add.l #8,R0
+move.l R0,-18(R14)
+*line 348
+*line 349
+move.l -22(R14),(sp)
+move.l -18(R14),-(sp)
+move.l -14(R14),-(sp)
+move.l #L123,-(sp)
+jsr _printf
+adda.l #12,sp
+*line 350
+bra L124
+L122:
+*line 351
+*line 352
+*line 353
+*line 354
+move.l 8(R14),R8
+move.b 13(R8),R0
+ext.w R0
+muls #12,R0
+move.l R0,R8
+move.l #_chantab,R9
+move.l 8(R8,R9.l),(sp)
+move.l -4(R14),-(sp)
+move.l #L125,-(sp)
+jsr _printf
+addq.l #8,sp
+L124:L121:
+*line 357
+*line 358
+move.l 8(R14),R8
+move 16(R8),(sp)
+move.l 8(R14),R8
+move.l 4(R8),-(sp)
+move.l 8(R14),R8
+move.l (R8),-(sp)
+move.l 8(R14),R8
+move.l 8(R8),-(sp)
+move.l #L126,-(sp)
+jsr _printf
+adda.l #16,sp
+*line 359
+*line 360
+move.l 8(R14),R8
+move.b 14(R8),R0
+ext.w R0
+move R0,(sp) 
+move.l 8(R14),R8
+move.b 13(R8),R0
+ext.w R0
+move R0,-(sp) 
+move.l 8(R14),R8
+move.b 12(R8),R0
+ext.w R0
+move R0,-(sp) 
+move.l #L127,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 362
+move.l 8(R14),(sp)
+jsr _FILEfl
+*line 364
+*line 365
+tst -6(R14)
+beq L128
+*line 365
+move.l -22(R14),(sp)
+jsr _SnapFCB
+*line 366
+bra L129
+L128:
+*line 367
+move.l #L130,(sp)
+jsr _printf
+L129:L115:unlk R14
+rts
+.globl _fd2fcb
+.text
+_fd2fcb:
+~~fd2fcb:
+~fd=8
+link R14,#-4
+*line 383
+*line 384
+tst 8(R14)
+blt L10000
+cmp #11,8(R14)
+ble L132
+L10000:*line 384
+clr.l R0
+bra L131
+*line 385
+L132:
+*line 386
+move 8(R14),R0
+muls #12,R0
+move.l R0,R8
+move.l #_chantab,R9
+move.l 8(R8,R9.l),R0
+bra L131
+L131:unlk R14
+rts
+.globl _fp2fcb
+.text
+_fp2fcb:
+~~fp2fcb:
+~fp=8
+link R14,#-4
+*line 399
+*line 400
+tst.l 8(R14)
+bne L134
+*line 400
+clr.l R0
+bra L133
+*line 401
+L134:
+*line 402
+move.l 8(R14),R8
+move.b 13(R8),R0
+ext.w R0
+muls #12,R0
+move.l R0,R8
+move.l #_chantab,R9
+move.l 8(R8,R9.l),R0
+bra L133
+L133:unlk R14
+rts
+.data
+L2:.dc.b $3F,$44,$30,$0
+L3:.dc.b $3F,$44,$31,$0
+L4:.dc.b $3F,$44,$32,$0
+L5:.dc.b $3F,$44,$33,$0
+L6:.dc.b $42,$46,$20,$0
+L7:.dc.b $4E,$42,$20,$0
+L8:.dc.b $54,$52,$20,$0
+L9:.dc.b $45,$58,$20,$0
+L10:.dc.b $52,$44,$20,$0
+L11:.dc.b $57,$52,$20,$0
+L12:.dc.b $41,$50,$20,$0
+L13:.dc.b $43,$52,$20,$0
+L14:.dc.b $4F,$50,$4E,$0
+L15:.dc.b $45,$52,$52,$0
+L16:.dc.b $42,$41,$44,$0
+L17:.dc.b $45,$4F,$46,$0
+L19:.dc.b $52,$44,$4F,$4E,$4C,$59,$0
+L20:.dc.b $48,$49,$44,$44,$45,$4E,$0
+L21:.dc.b $53,$59,$53,$54,$45,$4D,$0
+L22:.dc.b $56,$4F,$4C,$55,$4D,$45,$0
+L23:.dc.b $53,$55,$42,$44,$49,$52,$0
+L24:.dc.b $41,$52,$43,$48,$49,$56,$0
+L25:.dc.b $3F,$3F,$44,$36,$3F,$3F,$0
+L26:.dc.b $3F,$3F,$44,$37,$3F,$3F,$0
+L28:.dc.b $42,$55,$53,$59,$20,$20,$0
+L29:.dc.b $41,$4C,$4C,$42,$55,$46,$0
+L30:.dc.b $44,$49,$52,$54,$59,$20,$0
+L31:.dc.b $45,$4F,$46,$20,$20,$20,$0
+L32:.dc.b $49,$4F,$45,$52,$52,$20,$0
+L33:.dc.b $3F,$3F,$44,$35,$3F,$3F,$0
+L34:.dc.b $3F,$3F,$44,$36,$3F,$3F,$0
+L35:.dc.b $3F,$3F,$44,$37,$3F,$3F,$0
+L45:.dc.b $41,$6C,$6C,$6F,$63,$61,$74,$65,$64,$20,$63,$6C,$75,$73,$74,$65,$72,$20,$63,$68,$61,$69,$6E,$20,$66,$6F,$72,$20,$5B,$25
+.dc.b $2D,$38,$2E,$38,$73,$5D,$2E,$5B,$25,$2D,$33,$2E,$33,$73,$5D,$3A,$A,$25,$36,$64,$0
+L51:.dc.b $A,$0
+L52:.dc.b $25,$36,$64,$0
+L53:.dc.b $A,$46,$41,$54,$20,$63,$6C,$75,$73,$74,$65,$72,$20,$63,$6F,$75,$6E,$74,$3D,$25,$64,$2C,$20,$61,$73,$65,$63,$74,$73,$3D
+.dc.b $25,$6C,$64,$A,$0
+L54:.dc.b $25,$6C,$64,$20,$62,$79,$74,$65,$73,$20,$61,$6C,$6C,$6F,$63,$61,$74,$65,$64,$2C,$20,$25,$6C,$64,$20,$62,$79,$74,$65,$73
+.dc.b $20,$75,$73,$65,$64,$0
+L56:.dc.b $2C,$20,$25,$6C,$64,$20,$62,$79,$74,$65,$73,$20,$75,$6E,$75,$73,$65,$64,$0
+L57:.dc.b $A,$0
+L59:.dc.b $45,$52,$52,$4F,$52,$3A,$20,$20,$64,$69,$72,$65,$63,$74,$6F,$72,$79,$20,$66,$69,$6C,$65,$20,$73,$69,$7A,$65,$20,$65,$78
+.dc.b $63,$65,$65,$64,$73,$20,$46,$41,$54,$20,$61,$6C,$6C,$6F,$63,$61,$74,$69,$6F,$6E,$A,$0
+L61:.dc.b $45,$52,$52,$4F,$52,$3A,$20,$20,$46,$41,$54,$20,$63,$6C,$75,$73,$74,$65,$72,$20,$63,$6F,$75,$6E,$74,$20,$28,$25,$64,$29
+.dc.b $20,$4E,$45,$20,$46,$43,$42,$20,$63,$6C,$75,$73,$74,$65,$72,$20,$63,$6F,$75,$6E,$74,$20,$28,$25,$6C,$64,$29,$A,$0
+L63:.dc.b $20,$20,$66,$6C,$61,$67,$73,$3A,$20,$20,$0
+L69:.dc.b $25,$73,$20,$0
+L70:.dc.b $A,$20,$20,$61,$74,$72,$69,$62,$3A,$20,$20,$0
+L76:.dc.b $25,$73,$20,$0
+L77:.dc.b $A,$0
+L79:.dc.b $A,$46,$43,$42,$20,$61,$74,$20,$30,$78,$25,$30,$38,$6C,$78,$3A,$20,$20,$5B,$25,$2D,$38,$2E,$38,$73,$5D,$2E,$5B,$25,$2D
+.dc.b $33,$2E,$33,$73,$5D,$A,$0
+L80:.dc.b $20,$20,$61,$74,$72,$69,$62,$20,$20,$20,$20,$20,$20,$30,$78,$25,$30,$34,$78,$0
+L81:.dc.b $20,$20,$6D,$6F,$64,$65,$66,$6C,$20,$20,$20,$20,$20,$30,$78,$25,$30,$34,$78,$A,$0
+L82:.dc.b $20,$20,$63,$72,$74,$69,$6D,$65,$20,$20,$20,$20,$20,$30,$78,$25,$30,$34,$78,$0
+L83:.dc.b $20,$20,$63,$72,$64,$61,$74,$65,$20,$20,$20,$20,$20,$30,$78,$25,$30,$34,$78,$A,$0
+L84:.dc.b $20,$20,$61,$73,$65,$63,$74,$73,$20,$20,$20,$25,$38,$6C,$64,$0
+L85:.dc.b $20,$20,$66,$6C,$65,$6E,$20,$20,$20,$20,$20,$25,$38,$6C,$64,$0
+L86:.dc.b $20,$20,$63,$75,$72,$6C,$65,$6E,$20,$20,$20,$25,$38,$6C,$64,$A,$0
+L87:.dc.b $20,$20,$62,$63,$6C,$75,$73,$74,$20,$20,$20,$25,$38,$64,$0
+L88:.dc.b $20,$20,$63,$75,$72,$63,$6C,$73,$20,$20,$20,$25,$38,$64,$0
+L89:.dc.b $20,$20,$63,$6C,$73,$65,$63,$20,$20,$20,$20,$25,$38,$64,$A,$0
+L90:.dc.b $20,$20,$63,$75,$72,$6C,$73,$6E,$20,$20,$20,$25,$38,$6C,$64,$0
+L91:.dc.b $20,$20,$63,$75,$72,$64,$73,$6E,$20,$20,$20,$25,$38,$6C,$64,$0
+L92:.dc.b $20,$20,$6F,$66,$66,$73,$65,$74,$20,$20,$20,$25,$38,$64,$A,$0
+L93:.dc.b $A,$0
+L95:.dc.b $A,$43,$6C,$75,$73,$74,$65,$72,$20,$64,$75,$6D,$70,$20,$6F,$66,$20,$46,$41,$54,$20,$61,$74,$20,$30,$78,$25,$30,$38,$2E
+.dc.b $38,$6C,$78,$20,$20,$28,$25,$64,$20,$65,$6E,$74,$72,$69,$65,$73,$29,$3A,$A,$0
+L96:.dc.b $20,$20,$20,$30,$3A,$20,$2E,$2E,$2E,$2E,$20,$2E,$2E,$2E,$2E,$20,$0
+L102:.dc.b $A,$25,$34,$2E,$34,$64,$3A,$20,$0
+L103:.dc.b $25,$34,$2E,$34,$64,$20,$0
+L105:.dc.b $A,$0
+L107:.dc.b $20,$20,$5F,$66,$6C,$61,$67,$73,$3A,$20,$20,$0
+L113:.dc.b $25,$73,$20,$0
+L114:.dc.b $A,$0
+L117:.dc.b $46,$49,$4C,$45,$70,$72,$28,$29,$3A,$20,$20,$45,$52,$52,$4F,$52,$20,$2D,$20,$61,$72,$67,$75,$6D,$65,$6E,$74,$20,$77,$61
+.dc.b $73,$20,$4E,$55,$4C,$4C,$A,$0
+L118:.dc.b $A,$46,$49,$4C,$45,$20,$61,$74,$20,$24,$25,$30,$38,$2E,$38,$6C,$58,$0
+L120:.dc.b $20,$69,$73,$20,$61,$20,$64,$65,$76,$69,$63,$65,$3A,$20,$20,$5B,$25,$73,$5D,$A,$0
+L123:.dc.b $20,$69,$73,$20,$61,$20,$64,$69,$73,$6B,$20,$66,$69,$6C,$65,$3A,$20,$20,$5B,$25,$38,$2E,$38,$73,$5D,$2E,$5B,$25,$33,$2E
+.dc.b $33,$73,$5D,$2C,$20,$20,$66,$63,$62,$20,$61,$74,$20,$24,$25,$30,$38,$2E,$38,$6C,$58,$A,$0
+L125:.dc.b $20,$69,$73,$20,$6F,$66,$20,$55,$4E,$4B,$4E,$4F,$57,$4E,$20,$74,$79,$70,$65,$3A,$20,$63,$5F,$63,$6C,$6F,$73,$65,$3D,$24
+.dc.b $25,$30,$38,$2E,$38,$6C,$58,$2C,$20,$63,$5F,$61,$72,$67,$3D,$24,$25,$30,$38,$2E,$38,$6C,$58,$A,$0
+L126:.dc.b $20,$20,$5F,$62,$75,$66,$66,$3D,$24,$25,$30,$38,$2E,$38,$6C,$58,$2C,$20,$5F,$62,$70,$3D,$24,$25,$30,$38,$2E,$38,$6C,$58
+.dc.b $2C,$20,$5F,$62,$65,$6E,$64,$3D,$24,$25,$30,$38,$2E,$38,$6C,$58,$2C,$20,$5F,$62,$75,$66,$6C,$65,$6E,$3D,$25,$75,$A,$0
+L127:.dc.b $20,$20,$5F,$66,$6C,$61,$67,$73,$3D,$24,$25,$30,$34,$2E,$34,$58,$2C,$20,$5F,$75,$6E,$69,$74,$3D,$25,$64,$2C,$20,$5F,$62
+.dc.b $79,$74,$62,$75,$66,$3D,$24,$25,$30,$32,$2E,$32,$58,$A,$0
+L130:.dc.b $A,$0
Index: alcyon/cminit.s
===================================================================
--- alcyon/cminit.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/cminit.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,873 @@
+.globl ___atab
+.globl _QQsw
+.comm _QQsw,2
+.globl _QQanch
+.comm _QQanch,2
+.globl _QQin
+.comm _QQin,4
+.globl _QQip
+.comm _QQip,4
+.globl _QQop
+.comm _QQop,4
+.globl _QQnum
+.comm _QQnum,4
+.globl _QQlnum
+.comm _QQlnum,2
+.globl _QQdig
+.comm _QQdig,2
+.globl _QQchr
+.comm _QQchr,2
+.globl _QQstr
+.comm _QQstr,258
+.globl _CMinit
+.text
+_CMinit:
+~~CMinit:
+~ip=8
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~i=R7
+~t=R13
+*line 48
+move.l 8(R14),_QQip
+*line 49
+move.l 8(R14),_QQin
+*line 50
+move #1,_QQsw
+*line 51
+clr _QQanch
+*line 52
+move.b #63,_QQdig
+*line 53
+move.b #63,_QQchr
+*line 54
+clr.l _QQnum
+*line 55
+move.l #_QQstr,_QQop
+*line 56
+move.l #_QQstr,R13
+*line 58
+clr R7
+bra L4
+L5:
+*line 59
+clr.b (R13)+
+L3:
+*line 58
+add #1,R7
+L4:
+*line 58
+cmp #257,R7
+blt L5
+L2:L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _CMchr
+.text
+_CMchr:
+~~CMchr:
+~c=9
+link R14,#-4
+*line 75
+*line 75
+tst _QQanch
+bne L7
+*line 75
+bra L10
+L9:
+*line 75
+add.l #1,_QQip
+L10:
+*line 75
+move.l _QQip,R8
+cmp.b #32,(R8)
+beq L9
+L8:
+*line 76
+L7:
+*line 77
+*line 78
+move.l _QQip,R8
+move.b (R8),R0
+ext.w R0
+cmp.b 9(R14),R0
+beq L11
+*line 78
+clr R0
+move R0,_QQsw
+bra L6
+*line 79
+L11:
+*line 80
+move.l _QQip,R8
+move.b (R8),_QQchr
+add.l #1,_QQip
+*line 81
+move #1,R0
+move R0,_QQsw
+bra L6
+L6:unlk R14
+rts
+.globl _CMuchr
+.text
+_CMuchr:
+~~CMuchr:
+~c=R7
+link R14,#0
+movem.l R5-R7,-(sp)
+~t=R6
+*line 99
+move.b 9(R14),R7
+*line 99
+*line 99
+tst _QQanch
+bne L13
+*line 99
+bra L16
+L15:
+*line 99
+add.l #1,_QQip
+L16:
+*line 99
+move.l _QQip,R8
+cmp.b #32,(R8)
+beq L15
+L14:
+*line 100
+L13:
+*line 101
+move.l _QQip,R8
+move.b (R8),R6
+*line 103
+*line 104
+move.b R7,R0
+ext.w R0
+and #-128,R0
+bne L17
+*line 104
+*line 105
+move.b R7,R0
+ext.w R0
+ext.l R0
+add.l #___atab,R0
+move.l R0,R8
+btst #3,(R8)
+beq L18
+*line 105
+add.b #32,R7
+*line 106
+L18:L17:
+*line 107
+*line 108
+move.b R6,R0
+ext.w R0
+and #-128,R0
+bne L19
+*line 108
+*line 109
+move.b R6,R0
+ext.w R0
+ext.l R0
+add.l #___atab,R0
+move.l R0,R8
+btst #3,(R8)
+beq L20
+*line 109
+add.b #32,R6
+*line 110
+L20:L19:
+*line 111
+*line 112
+cmp.b R6,R7
+beq L21
+*line 112
+clr R0
+move R0,_QQsw
+bra L12
+*line 113
+L21:
+*line 114
+move.l _QQip,R8
+move.b (R8),_QQchr
+add.l #1,_QQip
+*line 115
+move #1,R0
+move R0,_QQsw
+bra L12
+L12:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _CMstr
+.text
+_CMstr:
+~~CMstr:
+~s=8
+link R14,#-4
+movem.l R7-R7/R13-R13,-(sp)
+~t=R13
+~q=-4
+*line 134
+*line 134
+tst _QQanch
+bne L23
+*line 134
+bra L26
+L25:
+*line 134
+add.l #1,_QQip
+L26:
+*line 134
+move.l _QQip,R8
+cmp.b #32,(R8)
+beq L25
+L24:
+*line 135
+L23:
+*line 136
+move.l _QQip,R13
+*line 137
+move.l 8(R14),-4(R14)
+*line 139
+bra L29
+L28:
+*line 140
+*line 141
+*line 142
+move.l 8(R14),R8
+move.b (R8),R0
+ext.w R0
+cmp.b (R13)+,R0
+move sr,R0
+add.l #1,8(R14)
+move R0,ccr
+beq L30
+*line 142
+clr R0
+move R0,_QQsw
+bra L22
+L30:L29:
+*line 143
+move.l 8(R14),R8
+tst.b (R8)
+bne L28
+L27:
+*line 145
+move.l #_QQstr,_QQop
+*line 147
+bra L33
+L32:L33:
+*line 147
+move.l -4(R14),R8
+move.b (R8),R0
+ext.w R0
+move.l _QQop,R9
+move.b R0,(R9)
+add.l #1,-4(R14)
+add.l #1,_QQop
+tst R0
+bne L32
+L31:
+*line 149
+move.l R13,_QQip
+*line 150
+move #1,R0
+move R0,_QQsw
+bra L22
+L22:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _CMustr
+.text
+_CMustr:
+~~CMustr:
+~s=R13
+link R14,#-4
+movem.l R5-R7/R12-R13,-(sp)
+~t=R12
+~t1=R7
+~t2=R6
+~q=-4
+*line 169
+move.l 8(R14),R13
+*line 169
+*line 169
+tst _QQanch
+bne L35
+*line 169
+bra L38
+L37:
+*line 169
+add.l #1,_QQip
+L38:
+*line 169
+move.l _QQip,R8
+cmp.b #32,(R8)
+beq L37
+L36:
+*line 170
+L35:
+*line 171
+move.l _QQip,R12
+*line 172
+move.l R13,-4(R14)
+*line 174
+bra L41
+L40:
+*line 175
+*line 176
+move.b (R12)+,R7
+*line 177
+move.b (R13)+,R6
+*line 178
+*line 179
+*line 180
+move.b R7,R0
+ext.w R0
+and #-128,R0
+bne L42
+*line 180
+*line 181
+move.b R7,R0
+ext.w R0
+ext.l R0
+add.l #___atab,R0
+move.l R0,R8
+btst #3,(R8)
+beq L43
+*line 181
+add.b #32,R7
+*line 182
+L43:L42:
+*line 183
+*line 184
+move.b R6,R0
+ext.w R0
+and #-128,R0
+bne L44
+*line 184
+*line 185
+move.b R6,R0
+ext.w R0
+ext.l R0
+add.l #___atab,R0
+move.l R0,R8
+btst #3,(R8)
+beq L45
+*line 185
+add.b #32,R6
+*line 186
+L45:L44:
+*line 187
+*line 188
+cmp.b R6,R7
+beq L46
+*line 188
+clr R0
+move R0,_QQsw
+bra L34
+L46:L41:
+*line 189
+tst.b (R13)
+bne L40
+L39:
+*line 191
+move.l #_QQstr,_QQop
+*line 193
+bra L49
+L48:L49:
+*line 193
+move.l -4(R14),R8
+move.b (R8),R0
+ext.w R0
+move.l _QQop,R9
+move.b R0,(R9)
+add.l #1,-4(R14)
+add.l #1,_QQop
+tst R0
+bne L48
+L47:
+*line 195
+move.l R12,_QQip
+*line 196
+move #1,R0
+move R0,_QQsw
+bra L34
+L34:tst.l (sp)+
+movem.l (sp)+,R6-R7/R12-R13
+unlk R14
+rts
+.globl _CMlong
+.text
+_CMlong:
+~~CMlong:
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~p=R13
+~n=R7
+~c=R6
+*line 215
+*line 215
+tst _QQanch
+bne L51
+*line 215
+bra L54
+L53:
+*line 215
+add.l #1,_QQip
+L54:
+*line 215
+move.l _QQip,R8
+cmp.b #32,(R8)
+beq L53
+L52:
+*line 216
+L51:
+*line 217
+move.l _QQip,R13
+*line 218
+clr.l R7
+*line 219
+move.b (R13)+,R6
+*line 221
+*line 222
+move.b R6,R0
+ext.w R0
+and #-128,R0
+beq L55
+*line 222
+clr R0
+move R0,_QQsw
+bra L50
+*line 223
+L55:
+*line 224
+*line 225
+move.b R6,R0
+ext.w R0
+ext.l R0
+add.l #___atab,R0
+move.l R0,R8
+btst #2,(R8)
+bne L56
+*line 225
+clr R0
+move R0,_QQsw
+bra L50
+*line 226
+L56:
+*line 227
+move.b R6,R0
+ext.w R0
+add #-48,R0
+ext.l R0
+move.l R0,R7
+*line 229
+bra L59
+L58:
+*line 230
+*line 231
+*line 232
+move.b R6,R0
+ext.w R0
+and #-128,R0
+bne L57
+*line 233
+*line 234
+*line 235
+move.b R6,R0
+ext.w R0
+ext.l R0
+add.l #___atab,R0
+move.l R0,R8
+btst #2,(R8)
+beq L57
+*line 236
+*line 237
+move.l #$a,-(sp)
+move.l R7,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,R7
+move.b R6,R0
+ext.w R0
+add #-48,R0
+ext.l R0
+add.l R0,R7
+*line 238
+add.l #1,R13
+L59:
+*line 239
+move.b (R13),R6
+bne L58
+L57:
+*line 241
+move.l R13,_QQip
+*line 242
+move.l R7,_QQnum
+*line 243
+move #1,R0
+move R0,_QQsw
+bra L50
+L50:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.globl _CMdig
+.text
+_CMdig:
+~~CMdig:
+link R14,#0
+movem.l R6-R7,-(sp)
+~c=R7
+*line 260
+*line 260
+tst _QQanch
+bne L61
+*line 260
+bra L64
+L63:
+*line 260
+add.l #1,_QQip
+L64:
+*line 260
+move.l _QQip,R8
+cmp.b #32,(R8)
+beq L63
+L62:
+*line 261
+L61:
+*line 262
+move.l _QQip,R8
+move.b (R8),R7
+*line 264
+*line 265
+move.b R7,R0
+ext.w R0
+and #-128,R0
+beq L65
+*line 265
+clr R0
+move R0,_QQsw
+bra L60
+*line 266
+L65:
+*line 267
+*line 268
+move.b R7,R0
+ext.w R0
+ext.l R0
+add.l #___atab,R0
+move.l R0,R8
+btst #2,(R8)
+bne L66
+*line 268
+clr R0
+move R0,_QQsw
+bra L60
+*line 269
+L66:
+*line 270
+move.b R7,_QQdig
+*line 271
+add.l #1,_QQip
+*line 272
+move #1,R0
+move R0,_QQsw
+bra L60
+L60:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _CMlist
+.text
+_CMlist:
+~~CMlist:
+~l=-4
+~l=8
+link R14,#0
+movem.l R6-R7/R12-R13,-(sp)
+~n=R7
+~p=R13
+~q=R12
+*line 291
+*line 291
+tst _QQanch
+bne L68
+*line 291
+bra L71
+L70:
+*line 291
+add.l #1,_QQip
+L71:
+*line 291
+move.l _QQip,R8
+cmp.b #32,(R8)
+beq L70
+L69:
+*line 292
+L68:
+*line 293
+clr R7
+*line 295
+bra L74
+L73:
+*line 296
+*line 297
+move.l R13,R12
+*line 298
+*line 299
+*line 299
+move.l R13,(sp)
+jsr _CMstr
+tst R0
+beq L75
+*line 300
+*line 301
+move.l #_QQstr,_QQop
+*line 302
+*line 303
+bra L78
+L77:L78:
+*line 303
+move.b (R12)+,R0
+ext.w R0
+move.l _QQop,R9
+move.b R0,(R9)
+add.l #1,_QQop
+tst R0
+bne L77
+L76:
+*line 304
+*line 305
+move R7,_QQlnum
+*line 306
+move #1,R0
+move R0,_QQsw
+bra L67
+*line 307
+*line 308
+L75:
+*line 309
+add #1,R7
+L74:
+*line 310
+move.l 8(R14),R8
+move.l (R8),R13
+move.l R13,R0
+add.l #4,8(R14)
+tst.l R0
+bne L73
+L72:
+*line 312
+clr R0
+move R0,_QQsw
+bra L67
+L67:tst.l (sp)+
+movem.l (sp)+,R7-R7/R12-R13
+unlk R14
+rts
+.globl _CMulist
+.text
+_CMulist:
+~~CMulist:
+~l=-4
+~l=8
+link R14,#0
+movem.l R6-R7/R12-R13,-(sp)
+~n=R7
+~p=R13
+~q=R12
+*line 332
+*line 332
+tst _QQanch
+bne L80
+*line 332
+bra L83
+L82:
+*line 332
+add.l #1,_QQip
+L83:
+*line 332
+move.l _QQip,R8
+cmp.b #32,(R8)
+beq L82
+L81:
+*line 333
+L80:
+*line 334
+clr R7
+*line 336
+bra L86
+L85:
+*line 337
+*line 338
+move.l R13,R12
+*line 339
+*line 340
+*line 340
+move.l R13,(sp)
+jsr _CMustr
+tst R0
+beq L87
+*line 341
+*line 342
+move.l #_QQstr,_QQop
+*line 343
+*line 344
+bra L90
+L89:L90:
+*line 344
+move.b (R12)+,R0
+ext.w R0
+move.l _QQop,R9
+move.b R0,(R9)
+add.l #1,_QQop
+tst R0
+bne L89
+L88:
+*line 345
+*line 346
+move R7,_QQlnum
+*line 347
+move #1,R0
+move R0,_QQsw
+bra L79
+*line 348
+*line 349
+L87:
+*line 350
+add #1,R7
+L86:
+*line 351
+move.l 8(R14),R8
+move.l (R8),R13
+move.l R13,R0
+add.l #4,8(R14)
+tst.l R0
+bne L85
+L84:
+*line 353
+clr R0
+move R0,_QQsw
+bra L79
+L79:tst.l (sp)+
+movem.l (sp)+,R7-R7/R12-R13
+unlk R14
+rts
+.globl _CMstat
+.text
+_CMstat:
+~~CMstat:
+~msg=8
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+~tp=R13
+*line 371
+move.l _QQin,R13
+*line 372
+move.l 8(R14),(sp)
+move.l #L92,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 373
+*line 374
+*line 375
+*line 376
+move.b _QQdig,R0
+ext.w R0
+move R0,(sp) 
+move.b _QQchr,R0
+ext.w R0
+and #-128,R0
+bne L10000
+move.b _QQchr,R0
+ext.w R0
+move R0,R8
+move.l #___atab,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+and #94,R0
+beq L10001
+move.b _QQchr,R0
+ext.w R0
+move R0,-(sp) 
+bra L10003
+L10001:move #32,-(sp)
+L10003:bra L10005
+L10000:move #32,-(sp)
+L10005:move.b _QQchr,R0
+ext.w R0
+move R0,-(sp) 
+tst _QQanch
+beq L10006
+move.l #L96,-(sp)
+bra L10008
+L10006:move.l #L97,-(sp)
+L10008:tst _QQsw
+beq L10009
+move.l #L94,-(sp)
+bra L10011
+L10009:move.l #L95,-(sp)
+L10011:move.l #L93,-(sp)
+jsr _printf
+adda.l #16,sp
+*line 377
+move _QQlnum,(sp)
+move.l _QQnum,-(sp)
+move.l #L98,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 378
+move.l #_QQstr,(sp)
+move.l #L99,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 379
+move.l _QQin,(sp)
+move.l #L100,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 380
+move.l #L101,(sp)
+jsr _printf
+*line 382
+bra L104
+L103:
+*line 383
+move.l #L105,(sp)
+jsr _printf
+L104:
+*line 383
+cmp.l _QQip,R13
+move sr,R0
+add.l #1,R13
+move R0,ccr
+bne L103
+L102:
+*line 385
+move.l #L106,(sp)
+jsr _printf
+*line 386
+move _QQsw,R0
+bra L91
+L91:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.data
+L92:.dc.b $25,$73,$D,$A,$0
+L93:.dc.b $20,$20,$51,$51,$73,$77,$3A,$20,$25,$73,$2C,$20,$51,$51,$61,$6E,$63,$68,$3A,$20,$25,$73,$2C,$20,$51,$51,$63,$68,$72,$3A
+.dc.b $20,$30,$78,$25,$30,$32,$78,$20,$3C,$25,$63,$3E,$2C,$20,$51,$51,$64,$69,$67,$3A,$20,$25,$63,$D,$A,$0
+L94:.dc.b $4F,$4B,$0
+L95:.dc.b $4E,$4F,$47,$4F,$0
+L96:.dc.b $61,$6E,$63,$68,$6F,$72,$65,$64,$0
+L97:.dc.b $64,$65,$62,$6C,$61,$6E,$6B,$65,$64,$0
+L98:.dc.b $20,$20,$51,$51,$6E,$75,$6D,$3A,$20,$25,$6C,$64,$2C,$20,$51,$51,$6C,$6E,$75,$6D,$3A,$20,$25,$64,$D,$A,$0
+L99:.dc.b $20,$20,$51,$51,$73,$74,$72,$3A,$20,$25,$73,$D,$A,$0
+L100:.dc.b $20,$20,$7B,$25,$73,$7D,$D,$A,$0
+L101:.dc.b $20,$20,$20,$0
+L105:.dc.b $20,$0
+L106:.dc.b $5E,$D,$A,$0
Index: alcyon/conin.s
===================================================================
--- alcyon/conin.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/conin.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,110 @@
+.globl _errno
+.globl __ConBuf
+.comm __ConBuf,258
+.globl __CBused
+.comm __CBused,2
+.globl __conin
+.text
+__conin:
+~~_conin:
+~x=8
+~buff=10
+~len=14
+link R14,#-2
+movem.l R6-R7,-(sp)
+~nbp=-2
+~l=R7
+*line 29
+*line 29
+tst.b 1+__ConBuf
+bne L2
+*line 30
+*line 31
+move.b #255,__ConBuf
+*line 32
+clr R0
+move.b R0,2+__ConBuf
+move.b R0,1+__ConBuf
+*line 33
+*line 34
+move.l #__ConBuf,(sp)
+move #2,-(sp)
+jsr _readbuf
+addq.l #2,sp
+*line 35
+move.l #L3,(sp)
+move #2,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 36
+*line 37
+*line 37
+cmp.b #26,2+__ConBuf
+bne L4
+*line 38
+*line 39
+clr.b 1+__ConBuf
+*line 40
+clr R0
+bra L1
+*line 41
+*line 42
+L4:
+*line 43
+move.b 1+__ConBuf,R0
+ext.w R0
+add #1,R0
+move.b R0,1+__ConBuf
+move R0,-2(R14)
+*line 44
+move -2(R14),R8
+add.l #__ConBuf,R8
+move.b #13,1(R8)
+add #1,-2(R14)
+*line 45
+move.l #__ConBuf,R8
+move -2(R14),R9
+add.l R9,R8
+move.b #10,1(R8)
+*line 46
+move #2,__CBused
+*line 47
+*line 48
+L2:
+*line 49
+*line 50
+move.b 1+__ConBuf,R7
+ext.w R7
+move R7,R0
+cmp 14(R14),R0
+ble L5
+*line 50
+move 14(R14),R7
+*line 51
+L5:
+*line 52
+move R7,(sp)
+move.l #__ConBuf,R0
+move __CBused,R1
+ext.l R1
+add.l R1,R0
+move.l R0,-(sp)
+move.l 10(R14),-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 53
+add R7,__CBused
+*line 54
+move R7,R0
+move.b 1+__ConBuf,R1
+sub.b R0,R1
+move.b R1,1+__ConBuf
+*line 55
+move R7,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.data
+L3:.dc.b $D,$A,$0
Index: alcyon/conwr.s
===================================================================
--- alcyon/conwr.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/conwr.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,41 @@
+.globl _errno
+.globl __conwr
+.text
+__conwr:
+~~_conwr:
+~buff=R13
+~kind=8
+~len=14
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~count=R7
+*line 29
+move.l 10(R14),R13
+*line 29
+clr R7
+bra L4
+L5:
+*line 30
+move.b (R13)+,R0
+ext.w R0
+move R0,(sp) 
+move 8(R14),-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+L3:
+*line 29
+add #1,R7
+L4:
+*line 29
+cmp 14(R14),R7
+blt L5
+L2:
+*line 32
+move R7,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/croot.s
===================================================================
--- alcyon/croot.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/croot.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,57 @@
+.globl _errno
+.globl __clsall
+.comm __clsall,4
+.bss
+L1:.ds.b 2
+.text
+.bss
+L2:.ds.b 120
+.text
+.globl _exit
+.text
+_exit:
+~~exit:
+~code=8
+link R14,#-4
+*line 54
+move.l __clsall,R8
+jsr (R8)
+*line 55
+move 8(R14),(sp)
+jsr _xtrap15
+L3:unlk R14
+rts
+.globl _Croot
+.text
+_Croot:
+~~Croot:
+~cp=R13
+link R14,#0
+movem.l R6-R7/R12-R13,-(sp)
+~fname=R12
+~k=R7
+*line 97
+move.l 8(R14),R13
+*line 97
+move.l #L5,L2
+*line 98
+move #1,L1
+*line 100
+move.l #__fd_cls,__clsall
+*line 101
+jsr _InitFS
+*line 159
+move.l #L2,(sp)
+move L1,-(sp)
+jsr _main
+addq.l #2,sp
+*line 160
+clr (sp)
+jsr _exit
+L4:tst.l (sp)+
+movem.l (sp)+,R7-R7/R12-R13
+unlk R14
+rts
+.data
+L5:.dc.b $7B,$42,$75,$63,$68,$6C,$61,$20,$37,$30,$30,$20,$43,$72,$6F,$6F,$74,$20,$2D,$20,$56,$65,$72,$73,$69,$6F,$6E,$20,$38,$20
+.dc.b $2D,$20,$31,$39,$38,$37,$2D,$30,$36,$2D,$32,$39,$7D,$0
Index: alcyon/ctcpos.s
===================================================================
--- alcyon/ctcpos.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/ctcpos.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,316 @@
+.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 _stmptr
+.globl _defptr
+.globl _patches
+.globl _defents
+.globl _seqtab
+.globl _seqflag
+.globl _seqline
+.globl _seqstim
+.globl _seqtime
+.globl _sregval
+.globl _trstate
+.globl _ctcsw
+.comm _ctcsw,2
+.globl _CurLine
+.globl _cxval
+.globl _cyval
+.globl _stcrow
+.globl _stccol
+.globl _vtcrow
+.globl _vtccol
+.globl _obj9
+.globl _obj11
+.globl _mtcoldc
+.comm _mtcoldc,2
+.globl _mtcoldr
+.comm _mtcoldr,2
+.globl _ctcpos
+.text
+_ctcpos:
+~~ctcpos:
+~row=R7
+~col=R6
+link R14,#0
+movem.l R4-R7,-(sp)
+~nrow=R5
+*line 44
+move 8(R14),R7
+*line 44
+move 10(R14),R6
+*line 44
+*line 44
+tst _ctcsw
+beq L2
+*line 45
+*line 46
+*line 47
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L3
+*line 47
+clr (sp)
+jsr _vbank
+*line 48
+L3:
+*line 49
+move _CurLine,R5
+add #7,R5
+*line 50
+*line 51
+*line 52
+cmp #9,_stcrow
+bne L4
+*line 52
+move #48,(sp)
+move #256,-(sp)
+move _stccol,-(sp)
+move R5,-(sp)
+move.l _obj9,-(sp)
+jsr _vclrav
+adda.l #10,sp
+*line 53
+L4:
+*line 54
+*line 55
+cmp #9,R7
+bne L5
+*line 55
+move #48,(sp)
+move #256,-(sp)
+move R6,-(sp)
+move R5,-(sp)
+move.l _obj9,-(sp)
+jsr _vsetav
+adda.l #10,sp
+L5:
+*line 56
+*line 57
+L2:
+*line 58
+move R7,_stcrow
+*line 59
+move R6,_stccol
+L1:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _ctcoff
+.text
+_ctcoff:
+~~ctcoff:
+link R14,#-4
+*line 73
+*line 74
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L7
+*line 74
+clr (sp)
+jsr _vbank
+*line 75
+L7:
+*line 76
+*line 77
+cmp #9,_stcrow
+bne L8
+*line 77
+move #48,(sp)
+move #256,-(sp)
+move _stccol,-(sp)
+move _CurLine,-(sp)
+add #7,(sp)
+move.l _obj9,-(sp)
+jsr _vclrav
+adda.l #10,sp
+*line 78
+L8:
+*line 79
+clr _ctcsw
+L6:unlk R14
+rts
+.globl _ctcon
+.text
+_ctcon:
+~~ctcon:
+link R14,#-4
+*line 90
+*line 91
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L10
+*line 91
+clr (sp)
+jsr _vbank
+*line 92
+L10:
+*line 93
+*line 93
+cmp #9,_stcrow
+bne L11
+*line 94
+*line 95
+move #1,_ctcsw
+*line 96
+move #48,(sp)
+move #256,-(sp)
+move _stccol,-(sp)
+move _CurLine,-(sp)
+add #7,(sp)
+move.l _obj9,-(sp)
+jsr _vsetav
+adda.l #10,sp
+*line 97
+L11:L9:unlk R14
+rts
+.globl _mtcpos
+.text
+_mtcpos:
+~~mtcpos:
+~row=R7
+~col=R6
+link R14,#0
+movem.l R5-R7,-(sp)
+*line 112
+move 8(R14),R7
+*line 112
+move 10(R14),R6
+*line 112
+*line 113
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L13
+*line 113
+clr (sp)
+jsr _vbank
+*line 114
+L13:
+*line 115
+*line 115
+cmp #19,_mtcoldr
+blt L14
+cmp #23,_mtcoldr
+bgt L14
+*line 116
+*line 117
+move #64,(sp)
+move #256,-(sp)
+move _mtcoldc,-(sp)
+move _mtcoldr,-(sp)
+add #-18,(sp)
+move.l _obj11,-(sp)
+jsr _vclrav
+adda.l #10,sp
+*line 118
+*line 119
+clr _mtcoldr
+*line 120
+clr _mtcoldc
+*line 121
+*line 122
+L14:
+*line 123
+*line 123
+cmp #19,R7
+blt L15
+cmp #23,R7
+bgt L15
+*line 124
+*line 125
+move #64,(sp)
+move #256,-(sp)
+move R6,-(sp)
+move R7,-(sp)
+add #-18,(sp)
+move.l _obj11,-(sp)
+jsr _vsetav
+adda.l #10,sp
+*line 126
+*line 127
+move R7,_mtcoldr
+*line 128
+move R6,_mtcoldc
+*line 129
+*line 130
+L15:
+*line 131
+move R7,_vtcrow
+*line 132
+move R6,_vtccol
+L12:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _mtcoff
+.text
+_mtcoff:
+~~mtcoff:
+link R14,#-4
+*line 143
+*line 144
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L17
+*line 144
+clr (sp)
+jsr _vbank
+*line 145
+L17:
+*line 146
+*line 147
+cmp #19,_mtcoldr
+blt L18
+cmp #23,_mtcoldr
+bgt L18
+*line 147
+move #64,(sp)
+move #256,-(sp)
+move _mtcoldc,-(sp)
+move _mtcoldr,-(sp)
+add #-18,(sp)
+move.l _obj11,-(sp)
+jsr _vclrav
+adda.l #10,sp
+L18:L16:unlk R14
+rts
+.data
Index: alcyon/ctype.s
===================================================================
--- alcyon/ctype.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/ctype.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,268 @@
+.globl ____atab
+.text
+____atab:
+~~___atab:
+link R14,#-4
+bra L1
+L1:unlk R14
+rts
+.globl ___atab
+.data
+___atab:
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $21
+.dc.b $21
+.dc.b $21
+.dc.b $21
+.dc.b $21
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $22
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $84
+.dc.b $84
+.dc.b $84
+.dc.b $84
+.dc.b $84
+.dc.b $84
+.dc.b $84
+.dc.b $84
+.dc.b $84
+.dc.b $84
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $88
+.dc.b $88
+.dc.b $88
+.dc.b $88
+.dc.b $88
+.dc.b $88
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $90
+.dc.b $90
+.dc.b $90
+.dc.b $90
+.dc.b $90
+.dc.b $90
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $21
+.dc.b $21
+.dc.b $21
+.dc.b $21
+.dc.b $21
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $22
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $84
+.dc.b $84
+.dc.b $84
+.dc.b $84
+.dc.b $84
+.dc.b $84
+.dc.b $84
+.dc.b $84
+.dc.b $84
+.dc.b $84
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $88
+.dc.b $88
+.dc.b $88
+.dc.b $88
+.dc.b $88
+.dc.b $88
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $90
+.dc.b $90
+.dc.b $90
+.dc.b $90
+.dc.b $90
+.dc.b $90
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $10
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $1
+.data
Index: alcyon/curset.s
===================================================================
--- alcyon/curset.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/curset.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,289 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _trkonly
+.data
+_trkonly:
+.dc.w $0
+.globl _curmove
+.globl _curtype
+.globl _cx_key
+.globl _cx_upd
+.globl _cy_key
+.globl _cy_upd
+.globl _d_key
+.globl _e_key
+.globl _m_key
+.globl _not_fld
+.globl _premove
+.globl _pstmove
+.globl _x_key
+.globl _xy_dn
+.globl _xy_up
+.globl _cratex
+.globl _cratey
+.globl _chtime
+.globl _chwait
+.globl _cmfirst
+.globl _cmtype
+.globl _curhold
+.globl _curslim
+.globl _cvtime
+.globl _cvwait
+.globl _cxval
+.globl _cyval
+.globl _hcwval
+.globl _nchwait
+.globl _ncvwait
+.globl _stccol
+.globl _stcrow
+.globl _submenu
+.globl _syrate
+.globl _thcwval
+.globl _tvcwval
+.globl _vcwval
+.globl _infetp
+.globl _cfetp
+.globl _curfet
+.globl _csbp
+.globl _stdctp0
+.text
+_stdctp0:
+~~stdctp0:
+link R14,#-4
+*line 139
+tst _submenu
+beq L10000
+move #2,R0
+bra L10002
+L10000:move #1,R0
+L10002:bra L1
+L1:unlk R14
+rts
+.globl _stdctp1
+.text
+_stdctp1:
+~~stdctp1:
+link R14,#-4
+*line 151
+*line 152
+tst _submenu
+beq L3
+*line 152
+move #2,R0
+bra L2
+*line 153
+L3:
+*line 154
+move _cyval,R0
+cmp _curslim,R0
+ble L10003
+move #1,R0
+bra L10005
+L10003:clr R0
+L10005:bra L2
+L2:unlk R14
+rts
+.globl _stdctp2
+.text
+_stdctp2:
+~~stdctp2:
+link R14,#-4
+*line 166
+clr R0
+bra L4
+L4:unlk R14
+rts
+.globl _stdctp3
+.text
+_stdctp3:
+~~stdctp3:
+link R14,#-4
+*line 181
+*line 182
+tst _submenu
+beq L6
+*line 182
+move #2,R0
+bra L5
+*line 183
+L6:
+*line 184
+cmp #14,_cyval
+blt L10007
+cmp #237,_cyval
+ble L10006
+L10007:move #3,R0
+bra L10009
+L10006:clr R0
+L10009:bra L5
+L5:unlk R14
+rts
+.globl _stdctp4
+.text
+_stdctp4:
+~~stdctp4:
+link R14,#-4
+*line 196
+*line 197
+tst _submenu
+beq L8
+*line 197
+move #2,R0
+bra L7
+*line 198
+L8:
+*line 199
+move _cyval,R0
+cmp _curslim,R0
+bge L10010
+move #1,R0
+bra L10012
+L10010:clr R0
+L10012:bra L7
+L7:unlk R14
+rts
+.globl _stdctp5
+.text
+_stdctp5:
+~~stdctp5:
+link R14,#-4
+*line 211
+tst _submenu
+beq L10013
+move #5,R0
+bra L10015
+L10013:move #4,R0
+L10015:bra L9
+L9:unlk R14
+rts
+.globl _curset
+.text
+_curset:
+~~curset:
+~s=R13
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+*line 231
+move.l 8(R14),R13
+*line 231
+move.l (R13),_curtype
+*line 232
+move.l 4(R13),_premove
+*line 233
+move.l 8(R13),_pstmove
+*line 235
+move.l #_cmvgen,_curmove
+*line 237
+*line 237
+tst _trkonly
+beq L11
+*line 238
+*line 239
+move.l #_txstd,_cx_key
+*line 240
+move.l #_tystd,_cy_key
+*line 241
+bra L12
+L11:
+*line 242
+*line 243
+*line 244
+move.l 12(R13),_cx_key
+*line 245
+move.l 16(R13),_cy_key
+L12:
+*line 248
+move.l 20(R13),_cx_upd
+*line 249
+move.l 24(R13),_cy_upd
+*line 250
+move.l 28(R13),_xy_up
+*line 251
+move.l 32(R13),_xy_dn
+*line 252
+move.l 36(R13),_x_key
+*line 253
+move.l 40(R13),_e_key
+*line 254
+move.l 44(R13),_m_key
+*line 255
+move.l 48(R13),_d_key
+*line 256
+move.l 52(R13),_not_fld
+*line 257
+move.l 56(R13),_curfet
+*line 258
+move.l 60(R13),_csbp
+*line 259
+move.l 64(R13),_cratex
+*line 260
+move.l 68(R13),_cratey
+*line 261
+move 72(R13),_cmtype
+*line 262
+move 74(R13),_cxval
+*line 263
+move 76(R13),_cyval
+*line 272
+*line 272
+tst _cmtype
+bne L13
+*line 273
+*line 274
+move _hcwval,_chtime
+*line 275
+move _vcwval,_cvtime
+*line 276
+bra L14
+L13:
+*line 277
+*line 278
+*line 279
+move _thcwval,_chtime
+*line 280
+cmp #4,_cmtype
+bne L10016
+move _syrate,R0
+bra L10018
+L10016:move _tvcwval,R0
+L10018:move R0,_cvtime
+L14:
+*line 283
+move _cxval,R0
+asr #3,R0
+move R0,_stccol
+*line 284
+move _cyval,R0
+ext.l R0
+divs #14,R0
+move R0,_stcrow
+*line 286
+move _chtime,_chwait
+*line 287
+move _cvtime,_cvwait
+*line 289
+move _curhold,_nchwait
+*line 290
+move _curhold,_ncvwait
+*line 292
+move #1,_cmfirst
+*line 294
+clr _ebflag
+*line 295
+move #81,(sp)
+clr -(sp)
+move.l #_ebuf,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 297
+clr.l _cfetp
+*line 298
+clr.l _infetp
+L10:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.data
Index: alcyon/dbentr.s
===================================================================
--- alcyon/dbentr.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/dbentr.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,463 @@
+.globl _DB_In
+.comm _DB_In,2
+.globl _DB_Out
+.comm _DB_Out,2
+.globl _DB_Flag
+.comm _DB_Flag,2
+.globl _DB_Levl
+.comm _DB_Levl,4
+.globl _DB_Last
+.comm _DB_Last,4
+.globl _DB_Ents
+.comm _DB_Ents,1536
+.globl _DB_Type
+.data
+_DB_Type:
+*line 61
+.dc.l L1
+*line 62
+.dc.l L2
+*line 64
+.dc.l L3
+.globl _DB_Entr
+.text
+_DB_Entr:
+~~DB_Entr:
+~str=8
+link R14,#-4
+*line 78
+move _DB_In,R0
+muls #6,R0
+add.l #_DB_Ents,R0
+move.l R0,R8
+clr 4(R8)
+*line 79
+move _DB_In,R0
+muls #6,R0
+add.l #_DB_Ents,R0
+move.l R0,R8
+move.l 8(R14),(R8)
+*line 81
+move.l 8(R14),_DB_Last
+*line 83
+add.l #$1,_DB_Levl
+*line 85
+*line 86
+add #1,_DB_In
+move _DB_In,R0
+cmp #256,R0
+blt L5
+*line 86
+clr _DB_In
+*line 87
+L5:
+*line 88
+*line 88
+move _DB_In,R0
+cmp _DB_Out,R0
+bne L6
+*line 89
+*line 90
+*line 91
+add #1,_DB_Out
+move _DB_Out,R0
+cmp #256,R0
+blt L7
+*line 91
+clr _DB_Out
+L7:
+*line 92
+L6:L4:unlk R14
+rts
+.globl _DB_Exit
+.text
+_DB_Exit:
+~~DB_Exit:
+~str=8
+link R14,#-4
+*line 107
+move _DB_In,R0
+muls #6,R0
+add.l #_DB_Ents,R0
+move.l R0,R8
+move #1,4(R8)
+*line 108
+move _DB_In,R0
+muls #6,R0
+add.l #_DB_Ents,R0
+move.l R0,R8
+move.l 8(R14),(R8)
+*line 110
+move.l 8(R14),_DB_Last
+*line 112
+*line 113
+tst.l _DB_Levl
+ble L9
+*line 113
+sub.l #$1,_DB_Levl
+*line 114
+bra L10
+L9:
+*line 115
+clr.l _DB_Levl
+L10:
+*line 117
+*line 118
+add #1,_DB_In
+move _DB_In,R0
+cmp #256,R0
+blt L11
+*line 118
+clr _DB_In
+*line 119
+L11:
+*line 120
+*line 120
+move _DB_In,R0
+cmp _DB_Out,R0
+bne L12
+*line 121
+*line 122
+*line 123
+add #1,_DB_Out
+move _DB_Out,R0
+cmp #256,R0
+blt L13
+*line 123
+clr _DB_Out
+L13:
+*line 124
+L12:L8:unlk R14
+rts
+.globl _DB_Cmnt
+.text
+_DB_Cmnt:
+~~DB_Cmnt:
+~str=8
+link R14,#-4
+*line 139
+move _DB_In,R0
+muls #6,R0
+add.l #_DB_Ents,R0
+move.l R0,R8
+move #2,4(R8)
+*line 140
+move _DB_In,R0
+muls #6,R0
+add.l #_DB_Ents,R0
+move.l R0,R8
+move.l 8(R14),(R8)
+*line 142
+move.l 8(R14),_DB_Last
+*line 144
+*line 145
+add #1,_DB_In
+move _DB_In,R0
+cmp #256,R0
+blt L15
+*line 145
+clr _DB_In
+*line 146
+L15:
+*line 147
+*line 147
+move _DB_In,R0
+cmp _DB_Out,R0
+bne L16
+*line 148
+*line 149
+*line 150
+add #1,_DB_Out
+move _DB_Out,R0
+cmp #256,R0
+blt L17
+*line 150
+clr _DB_Out
+L17:
+*line 151
+L16:L14:unlk R14
+rts
+.globl _DB_Clr
+.text
+_DB_Clr:
+~~DB_Clr:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 167
+clr _DB_In
+*line 168
+clr _DB_Out
+*line 170
+clr R7
+bra L21
+L22:
+*line 171
+*line 172
+move R7,R0
+muls #6,R0
+add.l #_DB_Ents,R0
+move.l R0,R8
+clr 4(R8)
+*line 173
+move R7,R0
+muls #6,R0
+add.l #_DB_Ents,R0
+move.l R0,R8
+move.l #$0,(R8)
+L20:
+*line 170
+add #1,R7
+L21:
+*line 170
+cmp #256,R7
+blt L22
+L19:
+*line 176
+clr.l _DB_Levl
+*line 177
+clr.l _DB_Last
+L18:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _DB_Dump
+.text
+_DB_Dump:
+~~DB_Dump:
+link R14,#0
+movem.l R4-R7,-(sp)
+~tag=R7
+~i=R6
+~lev=R5
+*line 194
+*line 194
+cmp #256,_DB_In
+bge L10000
+tst _DB_In
+bge L24
+L10000:*line 195
+*line 196
+move _DB_In,(sp)
+move.l #L25,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 197
+*line 198
+jsr _xtrap15
+*line 199
+*line 200
+jsr _DB_Clr
+bra L23
+*line 201
+*line 202
+*line 203
+L24:
+*line 204
+*line 204
+cmp #256,_DB_Out
+bge L10001
+tst _DB_Out
+bge L26
+L10001:*line 205
+*line 206
+move _DB_Out,(sp)
+move.l #L27,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 207
+*line 208
+jsr _xtrap15
+*line 209
+*line 210
+jsr _DB_Clr
+bra L23
+*line 211
+*line 212
+*line 213
+L26:
+*line 214
+*line 214
+move _DB_In,R0
+cmp _DB_Out,R0
+bne L28
+*line 215
+*line 216
+move _DB_In,(sp)
+move.l #L29,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 217
+*line 218
+*line 219
+tst.l _DB_Levl
+beq L30
+*line 219
+move.l _DB_Levl,(sp)
+move.l #L31,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 220
+L30:
+*line 221
+*line 222
+tst.l _DB_Last
+beq L32
+*line 222
+move.l _DB_Last,(sp)
+move.l #L33,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 223
+L32:
+*line 224
+*line 225
+tst _DB_Flag
+bne L34
+*line 225
+jsr _xtrap15
+*line 226
+L34:
+*line 227
+jsr _DB_Clr
+bra L23
+*line 228
+*line 229
+*line 230
+*line 231
+L28:
+*line 232
+move.l _DB_Levl,(sp)
+move.l #L35,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 234
+clr.l R5
+*line 236
+bra L38
+L37:
+*line 237
+*line 238
+clr.l R6
+bra L41
+L42:
+*line 239
+move.l #L43,(sp)
+jsr _printf
+L40:
+*line 238
+add.l #$1,R6
+L41:
+*line 238
+cmp.l R5,R6
+blt L42
+L39:
+*line 239
+*line 240
+*line 241
+move _DB_Out,R0
+muls #6,R0
+add.l #_DB_Ents,R0
+move.l R0,R8
+move 4(R8),R7
+*line 242
+*line 243
+move _DB_Out,R0
+muls #6,R0
+move.l R0,R8
+move.l #_DB_Ents,R9
+move.l 0(R8,R9.l),(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_DB_Type,R9
+move.l 0(R8,R9.l),-(sp)
+move.l #L44,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 244
+*line 245
+move R7,R0
+bra L46
+*line 246
+L47:
+*line 247
+*line 248
+*line 249
+add.l #$1,R5
+bra L45
+*line 250
+*line 251
+L48:
+*line 252
+*line 253
+*line 254
+*line 254
+sub.l #$1,R5
+bge L49
+*line 255
+*line 256
+clr.l R5
+*line 257
+move.l #L50,(sp)
+jsr _printf
+*line 258
+*line 259
+L49:bra L45
+*line 260
+bra L45
+L46:tst R0
+beq L47
+cmp #1,R0
+beq L48
+bra L45
+L45:
+*line 261
+*line 262
+*line 263
+*line 264
+add #1,_DB_Out
+move _DB_Out,R0
+cmp #256,R0
+blt L51
+*line 264
+clr _DB_Out
+L51:L38:
+*line 265
+move _DB_Out,R0
+cmp _DB_In,R0
+bne L37
+L36:
+*line 267
+move.l #L52,(sp)
+jsr _printf
+*line 269
+jsr _DB_Clr
+*line 271
+*line 272
+tst _DB_Flag
+bne L53
+*line 272
+jsr _xtrap15
+*line 273
+L53:bra L23
+L23:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
+L1:.dc.b $2D,$2D,$3E,$3E,$0
+L2:.dc.b $3C,$3C,$2D,$2D,$0
+L3:.dc.b $4E,$6F,$74,$65,$0
+L25:.dc.b $44,$42,$5F,$49,$6E,$20,$77,$61,$73,$20,$63,$6F,$72,$72,$75,$70,$74,$3A,$20,$20,$25,$64,$A,$0
+L27:.dc.b $44,$42,$5F,$4F,$75,$74,$20,$77,$61,$73,$20,$63,$6F,$72,$72,$75,$70,$74,$3A,$20,$20,$25,$64,$A,$0
+L29:.dc.b $44,$65,$62,$75,$67,$20,$62,$75,$66,$66,$65,$72,$20,$69,$73,$20,$65,$6D,$70,$74,$79,$3A,$20,$20,$49,$6E,$20,$3D,$20,$4F
+.dc.b $75,$74,$20,$3D,$20,$25,$64,$A,$0
+L31:.dc.b $44,$65,$62,$75,$67,$20,$74,$72,$61,$63,$65,$20,$6C,$65,$76,$65,$6C,$20,$3D,$20,$25,$6C,$64,$A,$0
+L33:.dc.b $4C,$61,$74,$65,$73,$74,$20,$65,$6E,$74,$72,$79,$20,$3D,$20,$22,$25,$73,$22,$A,$0
+L35:.dc.b $44,$65,$62,$75,$67,$20,$74,$72,$61,$63,$65,$20,$6C,$65,$76,$65,$6C,$20,$3D,$20,$25,$6C,$64,$A,$A,$0
+L43:.dc.b $7C,$0
+L44:.dc.b $25,$73,$3A,$20,$20,$25,$73,$A,$0
+L50:.dc.b $A,$0
+L52:.dc.b $A,$2D,$2D,$2D,$2D,$2D,$20,$45,$6E,$64,$20,$6F,$66,$20,$64,$65,$62,$75,$67,$20,$62,$75,$66,$66,$65,$72,$20,$2D,$2D,$2D
+.dc.b $2D,$2D,$A,$A,$0
Index: alcyon/dcopy.s
===================================================================
--- alcyon/dcopy.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/dcopy.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,168 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl _defect
+.globl _end
+.globl _edata
+.globl _etext
+.globl _p_dlen
+.globl _mphead
+.globl _dcopy
+.text
+_dcopy:
+~~dcopy:
+link R14,#0
+movem.l R3-R7/R12-R13,-(sp)
+~fp=R13
+~from=R12
+~wrtlen=R7
+~loadlen=R6
+~bsslen=R5
+~txtlen=R4
+*line 40
+clr _defect
+*line 42
+move.l #_etext,R4
+sub.l #_Lo_RAM,R4
+*line 43
+move.l #_end,R5
+sub.l #_edata,R5
+*line 45
+move.l #_edata,R6
+sub.l #_Lo_RAM,R6
+*line 49
+move #24602,_mphead
+*line 50
+move.l R4,2+_mphead
+*line 51
+move.l _p_dlen,6+_mphead
+*line 52
+move.l R5,10+_mphead
+*line 53
+clr.l 14+_mphead
+*line 54
+clr.l 18+_mphead
+*line 55
+move.l #_Lo_RAM,22+_mphead
+*line 56
+move #-1,26+_mphead
+*line 62
+jsr _preio
+*line 64
+*line 64
+move.l #L3,(sp)
+move.l #L2,-(sp)
+jsr _fopenb
+addq.l #4,sp
+move.l R0,R13
+move.l R13,R0
+bne L4
+*line 65
+*line 66
+move #1,_defect
+*line 67
+jsr _postio
+*line 68
+move #-1,R0
+bra L1
+*line 69
+*line 70
+*line 71
+*line 72
+*line 73
+*line 74
+L4:
+*line 75
+move.l #_mphead,R12
+*line 77
+move.l #$1c,R7
+bra L7
+L8:
+*line 78
+*line 78
+move.l R13,(sp)
+move.b (R12)+,R0
+ext.w R0
+move R0,-(sp) 
+jsr _putc
+addq.l #2,sp
+cmp #-1,R0
+bne L9
+*line 79
+*line 80
+move #2,_defect
+*line 81
+move.l R13,(sp)
+jsr _fclose
+*line 82
+jsr _postio
+*line 83
+move #-1,R0
+bra L1
+*line 84
+*line 85
+*line 86
+*line 87
+L9:L6:L7:
+*line 77
+move.l R7,R0
+sub.l #$1,R7
+tst.l R0
+bne L8
+L5:
+*line 88
+move.l #_Lo_RAM,R12
+*line 90
+move.l R6,R7
+bra L12
+L13:
+*line 91
+*line 91
+move.l R13,(sp)
+move.b (R12)+,R0
+ext.w R0
+move R0,-(sp) 
+jsr _putc
+addq.l #2,sp
+cmp #-1,R0
+bne L14
+*line 92
+*line 93
+move #3,_defect
+*line 94
+move.l R13,(sp)
+jsr _fclose
+*line 95
+jsr _postio
+*line 96
+move #-1,R0
+bra L1
+*line 97
+*line 98
+*line 99
+*line 100
+L14:L11:L12:
+*line 90
+move.l R7,R0
+sub.l #$1,R7
+tst.l R0
+bne L13
+L10:
+*line 101
+move.l R13,(sp)
+jsr _fflush
+*line 102
+move.l R13,(sp)
+jsr _fclose
+*line 103
+jsr _postio
+*line 104
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R4-R7/R12-R13
+unlk R14
+rts
+.data
+L2:.dc.b $6D,$69,$64,$61,$73,$2E,$61,$62,$73,$0
+L3:.dc.b $77,$0
Index: alcyon/dec2fr.s
===================================================================
--- alcyon/dec2fr.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/dec2fr.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,298 @@
+.data
+L1:.dc.l $0
+.dc.l $19A0
+.dc.l $3336
+.dc.l $4CD0
+.dc.l $6668
+.dc.l $8000
+.dc.l $99A0
+.dc.l $B336
+.dc.l $CCCE
+.dc.l $E668
+.dc.l $0
+.dc.l $290
+.dc.l $520
+.dc.l $7B0
+.dc.l $A40
+.dc.l $CD0
+.dc.l $F60
+.dc.l $11F0
+.dc.l $1480
+.dc.l $1710
+.text
+.data
+L2:.dc.l $C350
+.dc.l $61A8
+.dc.l $30D4
+.dc.l $186A
+.dc.l $C35
+.dc.l $61A
+.dc.l $30D
+.dc.l $186
+.dc.l $C3
+.dc.l $61
+.dc.l $30
+.dc.l $18
+.dc.l $C
+.dc.l $6
+.dc.l $3
+.dc.l $1
+.text
+.globl _dec2fr
+.text
+_dec2fr:
+~~dec2fr:
+~s=R13
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~i=R7
+*line 49
+move.l 8(R14),R13
+*line 49
+*line 49
+cmp.b #49,(R13)
+bne L4
+*line 50
+*line 51
+*line 51
+cmp.b #48,1(R13)
+bne L5
+*line 52
+*line 53
+*line 53
+cmp.b #48,2(R13)
+bne L6
+*line 54
+*line 55
+*line 56
+cmp.b #45,3(R13)
+bne L7
+*line 56
+move #-32768,R0
+bra L3
+*line 57
+bra L8
+L7:
+*line 58
+move #32767,R0
+bra L3
+L8:
+*line 59
+bra L9
+L6:
+*line 60
+*line 61
+*line 62
+move #-1,R0
+bra L3
+L9:
+*line 63
+*line 64
+bra L10
+L5:
+*line 65
+*line 66
+*line 67
+move #-1,R0
+bra L3
+*line 68
+L10:
+*line 69
+*line 70
+*line 71
+*line 72
+*line 73
+bra L11
+L4:
+*line 74
+*line 74
+cmp.b #48,(R13)
+bne L12
+*line 75
+*line 76
+move.b 1(R13),R0
+ext.w R0
+add #-48,R0
+move R0,R8
+add.l R8,R8
+add.l R8,R8
+move.l #L1,R9
+move.l 0(R8,R9.l),R0
+move.b 2(R13),R1
+ext.w R1
+add #-48,R1
+move R1,R9
+add.l R9,R9
+add.l R9,R9
+add.l #L1,R9
+move.l 40(R9),R1
+add.l R1,R0
+asr.l #$1,R0
+move R0,R7
+*line 77
+*line 78
+*line 78
+cmp.b #45,3(R13)
+bne L13
+*line 79
+*line 80
+*line 81
+tst R7
+beq L14
+*line 81
+move R7,R0
+not R0
+bra L3
+*line 82
+bra L15
+L14:
+*line 83
+clr R0
+bra L3
+L15:
+*line 84
+bra L16
+L13:
+*line 85
+*line 86
+*line 87
+move R7,R0
+bra L3
+L16:
+*line 88
+*line 89
+*line 90
+L12:L11:
+*line 91
+move #-1,R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _fr2dec
+.text
+_fr2dec:
+~~fr2dec:
+~v=R7
+~s=R13
+link R14,#0
+movem.l R2-R7/R13-R13,-(sp)
+~acc=R6
+~sc=R5
+~i=R4
+~p=R3
+*line 114
+move 8(R14),R7
+*line 114
+move.l 10(R14),R13
+*line 114
+*line 114
+cmp #32767,R7
+bne L18
+*line 115
+*line 116
+move.l #L19,(sp)
+move.l R13,-(sp)
+jsr _sprintf
+addq.l #4,sp
+*line 117
+move.l R13,R0
+bra L17
+*line 118
+*line 119
+L18:
+*line 120
+*line 120
+cmp #-32768,R7
+bne L20
+*line 121
+*line 122
+move.l #L21,(sp)
+move.l R13,-(sp)
+jsr _sprintf
+addq.l #4,sp
+*line 123
+move.l R13,R0
+bra L17
+*line 124
+*line 125
+L20:
+*line 126
+*line 126
+move R7,R0
+and #-32768,R0
+beq L22
+*line 127
+*line 128
+move R7,R0
+not R0
+move R0,R7
+*line 129
+move #45,R3
+*line 130
+bra L23
+L22:
+*line 131
+*line 132
+*line 133
+move #43,R3
+L23:
+*line 136
+clr.l R6
+*line 138
+clr R4
+bra L26
+L27:
+*line 139
+*line 140
+move R7,R0
+move #1,R1
+move #14,R2
+sub R4,R2
+asl R2,R1
+and R1,R0
+beq L28
+*line 140
+move R4,R8
+add.l R8,R8
+add.l R8,R8
+add.l #L2,R8
+move.l (R8),R0
+add.l R0,R6
+*line 141
+L28:L25:
+*line 138
+add #1,R4
+L26:
+*line 138
+cmp #15,R4
+blt L27
+L24:
+*line 142
+move.l #$3e8,R5
+*line 143
+move.l R5,-(sp)
+move.l R6,-(sp)
+jsr ldiv
+addq.l #8,sp
+move.l R0,R6
+*line 144
+move R3,(sp)
+move.l R6,R0
+move R0,-(sp)
+move.l #L29,-(sp)
+move.l R13,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 145
+move.l R13,R0
+bra L17
+L17:tst.l (sp)+
+movem.l (sp)+,R3-R7/R13-R13
+unlk R14
+rts
+.data
+L19:.dc.b $31,$30,$30,$2B,$0
+L21:.dc.b $31,$30,$30,$2D,$0
+L29:.dc.b $25,$30,$33,$64,$25,$63,$0
Index: alcyon/delnote.s
===================================================================
--- alcyon/delnote.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/delnote.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,596 @@
+.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 _cflag
+.globl _cnote
+.globl _cxval
+.globl _cyval
+.globl _lstflag
+.globl _recsw
+.globl _ctime
+.globl _grpmode
+.globl _grpstat
+.globl _delnote
+.text
+_delnote:
+~~delnote:
+link R14,#-2
+movem.l R2-R7/R11-R13,-(sp)
+~bp=R13
+~cp=R12
+~ep=R11
+~t_left=R7
+~tnote=R6
+~grp=R5
+~runtag=R4
+~scantag=R3
+~disptag=-2
+*line 48
+clr -2(R14)
+*line 50
+*line 51
+tst _recsw
+bne L2
+*line 51
+move #-1,R0
+bra L1
+*line 52
+*line 53
+*line 54
+L2:
+*line 55
+*line 56
+move _cyval,(sp)
+move _cxval,-(sp)
+jsr _pix2mid
+addq.l #2,sp
+tst R0
+bne L3
+*line 57
+*line 58
+add #1,_cflag
+*line 59
+move _cnote,R6
+*line 60
+move.l _t_cur,R7
+add.l #$ffffff0f,R7
+*line 61
+clr (sp)
+move.l _ctime,-(sp)
+jsr _frfind
+addq.l #4,sp
+move.l R0,R12
+*line 65
+bra L6
+L5:
+*line 66
+*line 67
+clr R5
+bra L9
+L10:
+*line 68
+*line 69
+*line 70
+*line 71
+move R5,R8
+add.l R8,R8
+add.l #_grpstat,R8
+tst (R8)
+beq L8
+move R5,R8
+add.l R8,R8
+add.l #_grpmode,R8
+cmp #2,(R8)
+bne L8
+*line 72
+*line 73
+move #1,R4
+*line 74
+move.l R12,R13
+*line 75
+*line 76
+bra L13
+L12:
+*line 77
+*line 78
+*line 79
+cmp.l (R13),R7
+bgt L10000
+cmp.b #1,5(R13)
+bne L14
+L10000:*line 80
+*line 81
+*line 82
+*line 83
+clr R4
+bra L13
+*line 84
+*line 85
+*line 86
+bra L15
+L14:
+*line 87
+*line 88
+*line 89
+cmp.b #6,5(R13)
+bne L16
+move.b 6(R13),R0
+ext.w R0
+cmp R0,R6
+bne L16
+move.b 7(R13),R0
+ext.w R0
+cmp R0,R5
+bne L16
+*line 90
+*line 91
+*line 92
+*line 93
+clr R4
+bra L13
+*line 94
+*line 95
+*line 96
+*line 97
+bra L17
+L16:
+*line 98
+*line 99
+*line 100
+cmp.b #5,5(R13)
+bne L18
+move.b 6(R13),R0
+ext.w R0
+cmp R0,R6
+bne L18
+move.b 7(R13),R0
+ext.w R0
+cmp R0,R5
+bne L18
+*line 101
+*line 102
+*line 103
+*line 104
+*line 105
+*line 106
+move.l 12(R13),R11
+*line 107
+move #1,R3
+*line 108
+*line 109
+bra L21
+L20:
+*line 110
+*line 111
+*line 112
+*line 113
+*line 114
+*line 115
+cmp.b #5,5(R11)
+bne L22
+move.b 6(R11),R0
+ext.w R0
+cmp R0,R6
+bne L22
+move.b 7(R11),R0
+ext.w R0
+cmp R0,R5
+bne L22
+*line 116
+*line 117
+clr R3
+*line 118
+clr R4
+bra L21
+*line 119
+*line 120
+*line 121
+*line 122
+bra L23
+L22:
+*line 123
+*line 124
+*line 125
+cmp.b #6,5(R11)
+bne L24
+move.b 6(R11),R0
+ext.w R0
+cmp R0,R6
+bne L24
+move.b 7(R11),R0
+ext.w R0
+cmp R0,R5
+bne L24
+*line 126
+*line 127
+*line 128
+*line 129
+*line 130
+*line 131
+*line 132
+cmp.l R11,R12
+bne L25
+*line 132
+move.l 8(R12),R12
+*line 133
+L25:
+*line 134
+*line 135
+cmp.l _p_ctr,R11
+bne L26
+*line 135
+move.l _p_ctr,R8
+move.l 8(R8),_p_ctr
+*line 136
+L26:
+*line 137
+*line 138
+cmp.l _p_bak,R11
+bne L27
+*line 138
+move.l _p_bak,R8
+move.l 8(R8),_p_bak
+*line 139
+L27:
+*line 140
+*line 141
+cmp.l _p_fwd,R11
+bne L28
+*line 141
+move.l _p_fwd,R8
+move.l 8(R8),_p_fwd
+*line 142
+L28:
+*line 143
+*line 144
+cmp.l _p_cur,R11
+bne L29
+*line 144
+move.l _p_cur,R8
+move.l 8(R8),_p_cur
+*line 145
+L29:
+*line 146
+move.l R11,(sp)
+jsr _e_rmv
+move.l R0,(sp)
+jsr _e_del
+*line 147
+*line 148
+*line 149
+*line 150
+*line 151
+*line 152
+*line 153
+cmp.l R13,R12
+bne L30
+*line 153
+move.l 8(R12),R12
+*line 154
+L30:
+*line 155
+*line 156
+cmp.l _p_ctr,R13
+bne L31
+*line 156
+move.l _p_ctr,R8
+move.l 8(R8),_p_ctr
+*line 157
+L31:
+*line 158
+*line 159
+cmp.l _p_bak,R13
+bne L32
+*line 159
+move.l _p_bak,R8
+move.l 8(R8),_p_bak
+*line 160
+L32:
+*line 161
+*line 162
+cmp.l _p_fwd,R13
+bne L33
+*line 162
+move.l _p_fwd,R8
+move.l 8(R8),_p_fwd
+*line 163
+L33:
+*line 164
+*line 165
+cmp.l _p_cur,R13
+bne L34
+*line 165
+move.l _p_cur,R8
+move.l 8(R8),_p_cur
+*line 166
+L34:
+*line 167
+move.l R13,(sp)
+jsr _e_rmv
+move.l R0,(sp)
+jsr _e_del
+*line 168
+*line 169
+move #1,-2(R14)
+*line 170
+clr R4
+*line 171
+clr R3
+bra L21
+*line 172
+*line 173
+*line 174
+*line 175
+bra L35
+L24:
+*line 176
+*line 176
+cmp.b #21,5(R11)
+bne L36
+*line 177
+*line 178
+*line 179
+*line 180
+*line 181
+*line 182
+*line 183
+cmp.l R13,R12
+bne L37
+*line 183
+move.l 8(R12),R12
+*line 184
+L37:
+*line 185
+*line 186
+cmp.l _p_ctr,R13
+bne L38
+*line 186
+move.l _p_ctr,R8
+move.l 8(R8),_p_ctr
+*line 187
+L38:
+*line 188
+*line 189
+cmp.l _p_bak,R13
+bne L39
+*line 189
+move.l _p_bak,R8
+move.l 8(R8),_p_bak
+*line 190
+L39:
+*line 191
+*line 192
+cmp.l _p_fwd,R13
+bne L40
+*line 192
+move.l _p_fwd,R8
+move.l 8(R8),_p_fwd
+*line 193
+L40:
+*line 194
+*line 195
+cmp.l _p_cur,R13
+bne L41
+*line 195
+move.l _p_cur,R8
+move.l 8(R8),_p_cur
+*line 196
+L41:
+*line 197
+move.l R13,(sp)
+jsr _e_rmv
+move.l R0,(sp)
+jsr _e_del
+*line 198
+*line 199
+move #1,-2(R14)
+*line 200
+clr R4
+*line 201
+clr R3
+bra L21
+*line 202
+*line 203
+*line 204
+*line 205
+*line 206
+L36:L35:L23:
+*line 207
+move.l 12(R11),R11
+*line 208
+L21:
+*line 209
+tst R3
+bne L20
+L19:
+*line 210
+*line 211
+*line 212
+*line 213
+*line 214
+*line 215
+*line 216
+L18:L17:L15:
+*line 217
+move.l 8(R13),R13
+*line 218
+L13:
+*line 219
+tst R4
+bne L12
+L11:
+*line 220
+L8:
+*line 67
+add #1,R5
+L9:
+*line 67
+cmp #12,R5
+blt L10
+L7:
+*line 221
+*line 222
+*line 223
+*line 224
+*line 225
+*line 226
+cmp.b #4,_ac_code
+bne L42
+*line 226
+add #1,R6
+*line 227
+bra L43
+L42:
+*line 228
+sub #1,R6
+L43:
+*line 229
+L6:
+*line 230
+move _cflag,R0
+sub #1,_cflag
+tst R0
+bne L5
+L4:L3:
+*line 236
+*line 237
+*line 238
+*line 239
+*line 240
+*line 240
+tst -2(R14)
+bne L44
+*line 241
+*line 242
+*line 243
+tst.l _ctime
+bge L45
+*line 243
+move #-1,R0
+bra L1
+*line 244
+*line 245
+*line 246
+L45:
+*line 247
+move.l _ctime,(sp)
+move #1,-(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,R11
+*line 248
+*line 249
+bra L48
+L47:
+*line 250
+*line 251
+move.l 12(R11),R13
+*line 252
+*line 253
+*line 253
+cmp.b #23,5(R11)
+bne L49
+*line 254
+*line 255
+*line 256
+cmp.l _p_bak,R11
+bne L50
+*line 256
+move.l _p_bak,R8
+move.l 8(R8),_p_bak
+*line 257
+L50:
+*line 258
+*line 259
+cmp.l _p_ctr,R11
+bne L51
+*line 259
+move.l _p_ctr,R8
+move.l 8(R8),_p_ctr
+*line 260
+L51:
+*line 261
+*line 262
+cmp.l _p_cur,R11
+bne L52
+*line 262
+move.l _p_cur,R8
+move.l 8(R8),_p_cur
+*line 263
+L52:
+*line 264
+*line 265
+cmp.l _p_fwd,R11
+bne L53
+*line 265
+move.l _p_fwd,R8
+move.l 8(R8),_p_fwd
+*line 266
+L53:
+*line 267
+move.l R11,(sp)
+jsr _e_rmv
+move.l R0,(sp)
+jsr _e_del
+*line 268
+move #1,-2(R14)
+*line 269
+*line 270
+L49:
+*line 271
+move.l R13,R11
+L48:
+*line 272
+move.l (R11),R0
+cmp.l _ctime,R0
+beq L47
+L46:
+*line 273
+*line 274
+L44:
+*line 275
+*line 276
+tst -2(R14)
+beq L54
+*line 276
+move.l _t_cur,(sp)
+jsr _sc_refr
+*line 277
+L54:
+*line 278
+tst -2(R14)
+beq L10001
+clr R0
+bra L10003
+L10001:move #-1,R0
+L10003:bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R3-R7/R11-R13
+unlk R14
+rts
+.data
Index: alcyon/delpnts.s
===================================================================
--- alcyon/delpnts.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/delpnts.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,599 @@
+.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 _curfunc
+.globl _curvce
+.globl _pntsv
+.globl _subj
+.globl _finival
+.globl _fnoff
+.globl _vbufs
+.globl _delpnts
+.text
+_delpnts:
+~~delpnts:
+link R14,#-18
+movem.l R2-R7/R11-R13,-(sp)
+~pp=R13
+~pp1=R12
+~pp2=R11
+~np=R7
+~pt1=R6
+~i=R5
+~pif=R4
+~cf=R3
+~fp=-4
+~vp=-8
+~fpu=-12
+~pt2=-14
+~nmv=-16
+~oldi=-18
+*line 61
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,-8(R14)
+*line 62
+move _curfunc,R0
+muls #12,R0
+add.l -8(R14),R0
+add.l #86,R0
+move.l R0,-4(R14)
+*line 64
+move.l -4(R14),R8
+move.b 5(R8),R0
+ext.w R0
+move R0,R4
+and #255,R4
+*line 65
+move R4,R7
+sub _subj,R7
+*line 66
+move.l -4(R14),R8
+move.b 6(R8),R0
+ext.w R0
+move R0,R6
+and #255,R6
+add _subj,R6
+*line 79
+*line 80
+tst R7
+bgt L2
+*line 80
+move #-1,R0
+bra L1
+*line 81
+L2:
+*line 82
+*line 83
+cmp _subj,R4
+bgt L3
+*line 83
+move #-1,R0
+bra L1
+*line 84
+L3:
+*line 85
+*line 86
+move R4,R0
+sub R7,R0
+bge L4
+*line 86
+move #-1,R0
+bra L1
+*line 87
+L4:
+*line 88
+*line 89
+move R7,R0
+add _subj,R0
+move R4,R1
+add #1,R1
+cmp R1,R0
+blt L5
+*line 89
+move #-1,R0
+bra L1
+*line 90
+L5:
+*line 91
+move R6,R0
+add R7,R0
+move R0,-14(R14)
+*line 92
+move #128,R0
+sub -14(R14),R0
+move R0,-16(R14)
+*line 112
+move #2,(sp)
+jsr _setipl
+move R0,-18(R14)
+*line 114
+move _curvce,R0
+asl #8,R0
+asl #1,R0
+ext.l R0
+add.l #_io_fpu,R0
+add.l #$4000,R0
+move.l R0,-12(R14)
+*line 116
+clr R5
+bra L8
+L9:
+*line 117
+*line 118
+move R5,R0
+muls #12,R0
+add.l -8(R14),R0
+add.l #86,R0
+move.l R0,-4(R14)
+*line 119
+*line 120
+*line 121
+move.l -4(R14),R8
+move.b 7(R8),R0
+ext.w R0
+and #-4,R0
+or #1,R0
+move.l -4(R14),R9
+move.b R0,7(R9)
+move R5,R9
+add.l R9,R9
+add.l #_fnoff,R9
+move (R9),R1
+asl #4,R1
+move R1,R9
+add.l R9,R9
+add.l -12(R14),R9
+move R0,(R9)
+L7:
+*line 116
+add #1,R5
+L8:
+*line 116
+cmp #13,R5
+blt L9
+L6:
+*line 124
+move _curfunc,R0
+muls #12,R0
+add.l -8(R14),R0
+add.l #86,R0
+move.l R0,-4(R14)
+*line 126
+*line 126
+tst _subj
+beq L10
+*line 127
+*line 128
+*line 129
+*line 130
+move R6,R0
+muls #12,R0
+move.l R0,R12
+add.l -8(R14),R12
+add.l #242,R12
+*line 131
+move -14(R14),R0
+muls #12,R0
+move.l R0,R11
+add.l -8(R14),R11
+add.l #242,R11
+*line 132
+*line 133
+move -16(R14),R5
+muls #12,R5
+bra L13
+L14:
+*line 134
+move.b (R11)+,(R12)+
+L12:
+*line 133
+sub #1,R5
+L13:
+*line 133
+tst R5
+bgt L14
+L11:
+*line 134
+*line 135
+*line 136
+*line 137
+*line 138
+move R7,-(sp)
+move.l -8(R14),R8
+move.b 71(R8),R0
+add (sp)+,R0
+move.b R0,71(R8)
+*line 139
+*line 140
+*line 141
+*line 142
+move R7,-(sp)
+move _curfunc,R0
+muls #12,R0
+add.l -8(R14),R0
+move.l R0,R8
+move.b 91(R8),R0
+sub (sp)+,R0
+move.b R0,91(R8)
+*line 143
+*line 144
+*line 145
+*line 146
+move _curfunc,R3
+add #1,R3
+bra L17
+L18:
+*line 147
+move R7,-(sp)
+move R3,R0
+muls #12,R0
+add.l -8(R14),R0
+move.l R0,R8
+move.b 92(R8),R0
+sub (sp)+,R0
+move.b R0,92(R8)
+L16:
+*line 146
+add #1,R3
+L17:
+*line 146
+cmp #13,R3
+blt L18
+L15:
+*line 147
+*line 148
+*line 149
+move -18(R14),(sp)
+jsr _setipl
+*line 150
+*line 151
+move _curfunc,(sp)
+jsr _edfunc
+*line 152
+sub #1,_subj
+*line 153
+*line 154
+bra L19
+L10:
+*line 155
+*line 156
+*line 157
+*line 158
+*line 159
+move.l -4(R14),R8
+move.b 6(R8),R0
+ext.w R0
+muls #12,R0
+move.l R0,R13
+add.l -8(R14),R13
+add.l #242,R13
+*line 160
+*line 161
+move #-32753,(R13)
+*line 162
+move _curfunc,R8
+add.l R8,R8
+add.l #_finival,R8
+move (R8),2(R13)
+*line 163
+clr 4(R13)
+*line 164
+clr.b 6(R13)
+*line 165
+clr.b 7(R13)
+*line 166
+clr.b 8(R13)
+*line 167
+clr.b 9(R13)
+*line 168
+clr.b 10(R13)
+*line 169
+*line 170
+*line 171
+*line 172
+*line 172
+cmp #1,R7
+ble L20
+*line 173
+*line 174
+sub #1,-16(R14)
+*line 175
+add #1,R6
+*line 176
+*line 177
+*line 178
+*line 179
+move R6,R0
+muls #12,R0
+move.l R0,R12
+add.l -8(R14),R12
+add.l #242,R12
+*line 180
+move -14(R14),R0
+muls #12,R0
+move.l R0,R11
+add.l -8(R14),R11
+add.l #242,R11
+*line 181
+*line 182
+move -16(R14),R5
+muls #12,R5
+bra L23
+L24:
+*line 183
+move.b (R11)+,(R12)+
+L22:
+*line 182
+sub #1,R5
+L23:
+*line 182
+tst R5
+bgt L24
+L21:
+*line 183
+*line 184
+*line 185
+*line 186
+*line 187
+move R7,-(sp)
+sub #1,(sp)
+move.l -8(R14),R8
+move.b 71(R8),R0
+add (sp)+,R0
+move.b R0,71(R8)
+*line 188
+*line 189
+*line 190
+*line 191
+move R7,-(sp)
+sub #1,(sp)
+move _curfunc,R0
+muls #12,R0
+add.l -8(R14),R0
+move.l R0,R8
+move.b 91(R8),R0
+sub (sp)+,R0
+move.b R0,91(R8)
+*line 192
+*line 193
+*line 194
+*line 195
+move _curfunc,R3
+add #1,R3
+bra L27
+L28:
+*line 196
+move R7,-(sp)
+sub #1,(sp)
+move R3,R0
+muls #12,R0
+add.l -8(R14),R0
+move.l R0,R8
+move.b 92(R8),R0
+sub (sp)+,R0
+move.b R0,92(R8)
+L26:
+*line 195
+add #1,R3
+L27:
+*line 195
+cmp #13,R3
+blt L28
+L25:
+*line 196
+*line 197
+*line 198
+L20:
+*line 199
+move -18(R14),(sp)
+jsr _setipl
+*line 200
+*line 201
+move _curfunc,(sp)
+jsr _edfunc
+*line 202
+clr _subj
+L19:
+*line 224
+jsr _pntsel
+*line 225
+clr _pntsv
+*line 226
+move #1,(sp)
+jsr _showpt
+*line 227
+jsr _modinst
+*line 229
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R3-R7/R11-R13
+unlk R14
+rts
+.globl _inspnt
+.text
+_inspnt:
+~~inspnt:
+~ip=R13
+~fn=12
+~inpnt=14
+link R14,#-6
+movem.l R2-R7/R11-R13,-(sp)
+~fp1=R12
+~fp2=R11
+~i=R7
+~j=R6
+~k=R5
+~l=R4
+~npts=R3
+~topnt=-2
+~frompt=-4
+~oldi=-6
+*line 250
+move.l 8(R14),R13
+*line 250
+*line 251
+tst.b 71(R13)
+bne L30
+*line 251
+clr R0
+bra L29
+*line 252
+L30:
+*line 253
+*line 254
+move.l R13,R8
+move 12(R14),R1
+muls #12,R1
+add.l R1,R8
+cmp.b #99,91(R8)
+bne L31
+*line 254
+clr R0
+bra L29
+*line 255
+L31:
+*line 256
+move #128,R0
+move.b 71(R13),R1
+ext.w R1
+sub R1,R0
+move R0,-2(R14)
+*line 257
+move -2(R14),R0
+sub #1,R0
+move R0,-4(R14)
+*line 258
+move -4(R14),R3
+sub 14(R14),R3
+*line 259
+move -2(R14),R7
+*line 260
+move -4(R14),R6
+*line 270
+move #2,(sp)
+jsr _setipl
+move R0,-6(R14)
+*line 274
+clr R5
+bra L34
+L35:
+*line 275
+*line 276
+move.l R13,R12
+move R7,R0
+muls #12,R0
+add.l R0,R12
+add.l #242,R12
+sub #1,R7
+*line 277
+move.l R13,R11
+move R6,R0
+muls #12,R0
+add.l R0,R11
+add.l #242,R11
+sub #1,R6
+*line 278
+*line 279
+clr R4
+bra L38
+L39:
+*line 280
+move.b (R11)+,(R12)+
+L37:
+*line 279
+add #1,R4
+L38:
+*line 279
+cmp #12,R4
+blt L39
+L36:
+*line 280
+L33:
+*line 274
+add #1,R5
+L34:
+*line 274
+cmp R3,R5
+blt L35
+L32:
+*line 283
+move 12(R14),R7
+add #1,R7
+bra L42
+L43:
+*line 284
+*line 285
+move.l R13,R8
+move R7,R1
+muls #12,R1
+add.l R1,R8
+add.b #1,92(R8)
+*line 286
+move.l R13,R8
+move R7,R1
+muls #12,R1
+add.l R1,R8
+add.b #1,94(R8)
+L41:
+*line 283
+add #1,R7
+L42:
+*line 283
+cmp #13,R7
+blt L43
+L40:
+*line 289
+move -6(R14),(sp)
+jsr _setipl
+*line 293
+move.l R13,R8
+move 12(R14),R1
+muls #12,R1
+add.l R1,R8
+add.b #1,91(R8)
+*line 294
+sub.b #1,71(R13)
+*line 302
+move #1,R0
+bra L29
+L29:tst.l (sp)+
+movem.l (sp)+,R3-R7/R11-R13
+unlk R14
+rts
+.data
Index: alcyon/dformat.s
===================================================================
--- alcyon/dformat.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/dformat.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,245 @@
+.globl _defect
+.globl _dferror
+.globl _dftype
+.globl _dfsides
+.globl _dfbuf
+.globl _dformat
+.text
+_dformat:
+~~dformat:
+~dt=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~trk=R7
+*line 56
+*line 56
+tst 8(R14)
+beq L2
+*line 57
+*line 58
+move #3,_dftype
+*line 59
+move #2,_dfsides
+*line 60
+bra L3
+L2:
+*line 61
+*line 62
+*line 63
+move #2,_dftype
+*line 64
+move #1,_dfsides
+L3:
+*line 69
+clr R7
+bra L6
+L7:
+*line 70
+*line 71
+*line 72
+move #-6683,(sp)
+move.l #$87654321,-(sp)
+move #1,-(sp)
+clr -(sp)
+move R7,-(sp)
+move #9,-(sp)
+clr -(sp)
+clr.l -(sp)
+move.l #_dfbuf,-(sp)
+move #4,-(sp)
+jsr _trap14
+adda.l #24,sp
+move R0,_dferror
+beq L8
+*line 73
+*line 74
+move #1,_defect
+*line 75
+move #-1,R0
+bra L1
+*line 76
+*line 77
+L8:
+*line 78
+*line 78
+cmp #2,_dfsides
+bne L9
+*line 79
+*line 80
+*line 81
+move #-6683,(sp)
+move.l #$87654321,-(sp)
+move #1,-(sp)
+move #1,-(sp)
+move R7,-(sp)
+move #9,-(sp)
+clr -(sp)
+clr.l -(sp)
+move.l #_dfbuf,-(sp)
+move #4,-(sp)
+jsr _trap14
+adda.l #24,sp
+move R0,_dferror
+beq L10
+*line 82
+*line 83
+move #2,_defect
+*line 84
+move #-1,R0
+bra L1
+*line 85
+L10:
+*line 86
+L9:L5:
+*line 69
+add #1,R7
+L6:
+*line 69
+cmp #80,R7
+blt L7
+L4:
+*line 91
+move #4096,(sp)
+clr -(sp)
+move.l #_dfbuf,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 92
+clr (sp)
+move _dftype,-(sp)
+move.l #$1000000,-(sp)
+move.l #_dfbuf,-(sp)
+move #6,-(sp)
+jsr _trap14
+adda.l #12,sp
+*line 96
+*line 96
+move #1,(sp)
+clr -(sp)
+clr -(sp)
+move #1,-(sp)
+clr -(sp)
+clr.l -(sp)
+move.l #_dfbuf,-(sp)
+move #3,-(sp)
+jsr _trap14
+adda.l #18,sp
+move R0,_dferror
+beq L11
+*line 97
+*line 98
+move #3,_defect
+*line 99
+move #-1,R0
+bra L1
+*line 100
+*line 101
+*line 102
+*line 103
+L11:
+*line 104
+move #4096,(sp)
+clr -(sp)
+move.l #_dfbuf,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 106
+*line 106
+cmp #2,_dfsides
+bne L12
+*line 107
+*line 108
+move #-513,_dfbuf
+*line 109
+move #-256,2+_dfbuf
+*line 110
+bra L13
+L12:
+*line 111
+*line 112
+*line 113
+move #-769,_dfbuf
+*line 114
+move #-256,2+_dfbuf
+L13:
+*line 117
+*line 118
+clr (sp)
+move #6,-(sp)
+move #5,-(sp)
+move.l #_dfbuf,-(sp)
+move #3,-(sp)
+move #4,-(sp)
+jsr _trap13
+adda.l #12,sp
+move R0,_dferror
+beq L14
+*line 119
+*line 120
+move #4,_defect
+*line 121
+move #-1,R0
+bra L1
+*line 122
+*line 123
+L14:
+*line 124
+*line 125
+clr (sp)
+move #1,-(sp)
+move #5,-(sp)
+move.l #_dfbuf,-(sp)
+move #3,-(sp)
+move #4,-(sp)
+jsr _trap13
+adda.l #12,sp
+move R0,_dferror
+beq L15
+*line 126
+*line 127
+move #5,_defect
+*line 128
+move #-1,R0
+bra L1
+*line 129
+*line 130
+*line 131
+*line 132
+L15:
+*line 133
+move #4096,(sp)
+clr -(sp)
+move.l #_dfbuf,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 135
+*line 136
+clr (sp)
+move #11,-(sp)
+move #7,-(sp)
+move.l #_dfbuf,-(sp)
+move #3,-(sp)
+move #4,-(sp)
+jsr _trap13
+adda.l #12,sp
+move R0,_dferror
+beq L16
+*line 137
+*line 138
+move #6,_defect
+*line 139
+move #-1,R0
+bra L1
+*line 140
+*line 141
+L16:
+*line 142
+clr _defect
+*line 143
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.data
Index: alcyon/dirfns.s
===================================================================
--- alcyon/dirfns.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/dirfns.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,315 @@
+.data
+L1:.dc.b $41,$44,$56,$53,$48,$52,$0
+.even
+.text
+.globl _atrstr
+.text
+_atrstr:
+~~atrstr:
+~atr=R7
+~s=-2
+~s=10
+link R14,#0
+movem.l R4-R7,-(sp)
+~i=R6
+~j=R5
+*line 28
+move 8(R14),R7
+*line 28
+move #32,R6
+*line 30
+clr R5
+bra L6
+L7:
+*line 31
+*line 32
+*line 33
+move R7,R0
+and R6,R0
+beq L8
+*line 33
+move R5,R8
+add.l 10(R14),R8
+move R5,R9
+add.l #L1,R9
+move.b (R9),(R8)
+*line 34
+bra L9
+L8:
+*line 35
+move R5,R8
+add.l 10(R14),R8
+move.b #45,(R8)
+L9:
+*line 36
+*line 37
+asr R6
+L5:
+*line 30
+add #1,R5
+L6:
+*line 30
+cmp #6,R5
+blt L7
+L4:
+*line 40
+move R5,R8
+add.l 10(R14),R8
+clr.b (R8)
+*line 41
+move.l 10(R14),R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
+L10:
+*line 48
+.dc.l L11
+*line 49
+.dc.l L12
+*line 50
+.dc.l L13
+*line 51
+.dc.l L14
+*line 52
+.dc.l L15
+*line 53
+.dc.l L16
+*line 54
+.dc.l L17
+*line 55
+.dc.l L18
+*line 56
+.dc.l L19
+*line 57
+.dc.l L20
+*line 58
+.dc.l L21
+*line 59
+.dc.l L22
+*line 61
+.dc.l L23
+.text
+.globl _mname
+.text
+_mname:
+~~mname:
+~n=8
+link R14,#-4
+*line 73
+cmp #1,8(R14)
+blt L10001
+cmp #12,8(R14)
+ble L10000
+L10001:move.l L10,R0
+bra L10003
+L10000:move 8(R14),R8
+add.l R8,R8
+add.l R8,R8
+move.l #L10,R9
+move.l 0(R8,R9.l),R0
+L10003:bra L24
+L24:unlk R14
+rts
+.globl _dtunpk
+.text
+_dtunpk:
+~~dtunpk:
+~din=8
+~tin=10
+~s=12
+~fmt=16
+link R14,#0
+movem.l R5-R7,-(sp)
+~ftm=R7
+~fdt=R6
+*line 93
+move 10(R14),R7
+asl #8,R7
+and #-256,R7
+move 10(R14),R0
+asr #8,R0
+and #255,R0
+or R0,R7
+*line 94
+move 8(R14),R6
+asl #8,R6
+and #-256,R6
+move 8(R14),R0
+asr #8,R0
+and #255,R0
+or R0,R6
+*line 96
+move 16(R14),R0
+bra L27
+*line 97
+L28:
+*line 98
+*line 99
+*line 100
+*line 101
+*line 102
+*line 103
+*line 104
+*line 105
+*line 106
+move R7,R0
+asr #5,R0
+move R0,(sp)
+and #63,(sp)
+move R7,R0
+move #11,R1
+asr R1,R0
+move R0,-(sp)
+and #31,(sp)
+move R6,-(sp)
+and #31,(sp)
+move R6,R0
+asr #5,R0
+move R0,-(sp)
+and #15,(sp)
+move R6,R0
+move #9,R1
+asr R1,R0
+move R0,-(sp)
+and #127,(sp)
+add #1980,(sp)
+move.l #L29,-(sp)
+move.l 12(R14),-(sp)
+jsr _sprintf
+adda.l #16,sp
+*line 107
+*line 108
+move.l 12(R14),R8
+clr.b 16(R8)
+bra L26
+*line 109
+*line 110
+L30:
+*line 111
+L31:
+*line 112
+*line 113
+*line 114
+*line 115
+*line 116
+*line 117
+*line 118
+*line 119
+*line 120
+move R7,R0
+asr #5,R0
+move R0,(sp)
+and #63,(sp)
+move R7,R0
+move #11,R1
+asr R1,R0
+move R0,-(sp)
+and #31,(sp)
+move R6,-(sp)
+and #31,(sp)
+move R6,R0
+asr #5,R0
+move R0,-(sp)
+and #15,(sp)
+jsr _mname
+addq.l #2,sp
+move.l R0,-(sp)
+move R6,R0
+move #9,R1
+asr R1,R0
+move R0,-(sp)
+and #127,(sp)
+add #1980,(sp)
+move.l #L32,-(sp)
+move.l 12(R14),-(sp)
+jsr _sprintf
+adda.l #18,sp
+*line 121
+*line 122
+move.l 12(R14),R8
+clr.b 17(R8)
+bra L26
+*line 123
+*line 124
+*line 125
+*line 126
+L33:
+*line 127
+*line 128
+*line 129
+*line 130
+*line 131
+*line 132
+*line 133
+*line 134
+*line 135
+move R7,R0
+asr #5,R0
+move R0,(sp)
+and #63,(sp)
+move R7,R0
+move #11,R1
+asr R1,R0
+move R0,-(sp)
+and #31,(sp)
+move R6,R0
+move #9,R1
+asr R1,R0
+move R0,-(sp)
+and #127,(sp)
+add #1980,(sp)
+move R6,-(sp)
+and #31,(sp)
+move R6,R0
+asr #5,R0
+move R0,-(sp)
+and #15,(sp)
+jsr _mname
+addq.l #2,sp
+move.l R0,-(sp)
+move.l #L34,-(sp)
+move.l 12(R14),-(sp)
+jsr _sprintf
+adda.l #18,sp
+*line 136
+*line 137
+move.l 12(R14),R8
+clr.b 17(R8)
+bra L26
+*line 138
+bra L26
+L27:tst R0
+beq L28
+cmp #1,R0
+beq L30
+cmp #2,R0
+beq L33
+bra L31
+L26:
+*line 141
+move.l 12(R14),R0
+bra L25
+L25:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.data
+L11:.dc.b $3F,$3F,$3F,$0
+L12:.dc.b $4A,$61,$6E,$0
+L13:.dc.b $46,$65,$62,$0
+L14:.dc.b $4D,$61,$72,$0
+L15:.dc.b $41,$70,$72,$0
+L16:.dc.b $4D,$61,$79,$0
+L17:.dc.b $4A,$75,$6E,$0
+L18:.dc.b $4A,$75,$6C,$0
+L19:.dc.b $41,$75,$67,$0
+L20:.dc.b $53,$65,$70,$0
+L21:.dc.b $4F,$63,$74,$0
+L22:.dc.b $4E,$6F,$76,$0
+L23:.dc.b $44,$65,$63,$0
+L29:.dc.b $25,$30,$34,$64,$2D,$25,$30,$32,$64,$2D,$25,$30,$32,$64,$20,$25,$30,$32,$64,$3A,$25,$30,$32,$64,$0
+L32:.dc.b $25,$30,$34,$64,$20,$25,$73,$20,$25,$2D,$32,$64,$20,$25,$30,$32,$64,$3A,$25,$30,$32,$64,$0
+L34:.dc.b $25,$73,$20,$25,$32,$64,$20,$25,$30,$34,$64,$20,$25,$30,$32,$64,$3A,$25,$30,$32,$64,$0
Index: alcyon/dofmt.s
===================================================================
--- alcyon/dofmt.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/dofmt.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,841 @@
+.globl ___atab
+.globl _uldivr
+.globl _dofmt_
+.text
+_dofmt_:
+~~dofmt_:
+~putsub=R13
+~format=R12
+~args=16
+link R14,#-64
+movem.l R6-R7/R11-R13,-(sp)
+~fcode=R7
+~k=-4
+~n=-8
+~lzero=-12
+~count=-16
+~hradix=-18
+~lowbit=-20
+~length=-22
+~fplus=-24
+~fminus=-26
+~fblank=-28
+~fsharp=-30
+~flzero=-32
+~width=-34
+~prec=-36
+~bp=R11
+~p=-40
+~prefix=-44
+~tab=-48
+~buf=-60
+~val=-64
+*line 78
+move.l 8(R14),R13
+*line 78
+move.l 12(R14),R12
+*line 78
+clr.l -16(R14)
+L4:
+*line 80
+*line 81
+*line 82
+move.l R12,R11
+bra L7
+L8:
+*line 83
+*line 84
+L6:
+*line 83
+add.l #1,R12
+L7:
+*line 83
+move.b (R12),R7
+ext.w R7
+tst R7
+beq L10000
+cmp #37,R7
+bne L8
+L10000:L5:
+*line 85
+*line 86
+*line 87
+*line 87
+move.l R12,R0
+sub.l R11,R0
+move.l R0,-8(R14)
+beq L9
+*line 88
+*line 89
+move.l -8(R14),R0
+add.l R0,-16(R14)
+*line 90
+*line 91
+bra L12
+L11:
+*line 92
+move.b (R11)+,R0
+ext.w R0
+move R0,(sp) 
+jsr (R13)
+L12:
+*line 92
+move.l -8(R14),R0
+sub.l #$1,-8(R14)
+tst.l R0
+bne L11
+L10:
+*line 93
+*line 94
+L9:
+*line 95
+*line 96
+tst R7
+bne L13
+*line 96
+move.l -16(R14),R0
+bra L1
+*line 97
+L13:
+*line 98
+clr R0
+move R0,-32(R14)
+move R0,-30(R14)
+move R0,-28(R14)
+move R0,-26(R14)
+move R0,-24(R14)
+*line 99
+L16:
+*line 100
+*line 101
+*line 102
+add.l #1,R12
+move.b (R12),R7
+ext.w R7
+move R7,R0
+bra L18
+*line 103
+L19:
+*line 104
+*line 105
+add #1,-24(R14)
+bra L15
+*line 106
+*line 107
+L20:
+*line 108
+*line 109
+add #1,-26(R14)
+bra L15
+*line 110
+*line 111
+L21:
+*line 112
+*line 113
+add #1,-28(R14)
+bra L15
+*line 114
+*line 115
+L22:
+*line 116
+*line 117
+add #1,-30(R14)
+bra L15
+*line 118
+bra L17
+L18:cmp #32,R0
+beq L21
+cmp #35,R0
+beq L22
+cmp #43,R0
+beq L19
+cmp #45,R0
+beq L20
+bra L17
+L17:
+*line 119
+*line 120
+bra L14
+*line 121
+L15:bra L16
+L14:
+*line 122
+*line 123
+*line 124
+*line 125
+*line 126
+*line 127
+*line 127
+cmp #42,R7
+bne L23
+*line 128
+*line 129
+add.l #2,16(R14)
+move.l 16(R14),R8
+move -2(R8),-34(R14)
+*line 130
+*line 131
+*line 131
+tst -34(R14)
+bge L24
+*line 132
+*line 133
+move -34(R14),R0
+neg R0
+move R0,-34(R14)
+*line 134
+add #1,-26(R14)
+*line 135
+*line 136
+L24:
+*line 137
+add.l #1,R12
+*line 138
+bra L25
+L23:
+*line 139
+*line 140
+*line 141
+*line 142
+cmp #48,R7
+bne L26
+*line 142
+add #1,-32(R14)
+*line 143
+L26:
+*line 144
+clr -34(R14)
+bra L29
+L30:
+*line 145
+move R7,R0
+move -34(R14),R1
+muls #10,R1
+add R1,R0
+add #-48,R0
+move R0,-34(R14)
+L28:
+*line 144
+add.l #1,R12
+L29:
+*line 144
+move.b (R12),R7
+ext.w R7
+move R7,R8
+add.l #___atab,R8
+btst #2,(R8)
+bne L30
+L27:
+*line 145
+L25:
+*line 146
+*line 147
+*line 148
+*line 149
+cmp.b #46,(R12)
+beq L31
+*line 149
+move #-1,-36(R14)
+bra L32
+L31:
+*line 150
+*line 150
+add.l #1,R12
+move.l R12,R8
+cmp.b #42,(R8)
+bne L33
+*line 151
+*line 152
+add.l #2,16(R14)
+move.l 16(R14),R8
+move -2(R8),-36(R14)
+*line 153
+add.l #1,R12
+*line 154
+bra L34
+L33:
+*line 155
+clr -36(R14)
+bra L37
+L38:
+*line 156
+move R7,R0
+move -36(R14),R1
+muls #10,R1
+add R1,R0
+add #-48,R0
+move R0,-36(R14)
+L36:
+*line 155
+add.l #1,R12
+L37:
+*line 155
+move.b (R12),R7
+ext.w R7
+move R7,R8
+add.l #___atab,R8
+btst #2,(R8)
+bne L38
+L35:L34:L32:
+*line 156
+*line 157
+*line 158
+clr -22(R14)
+*line 159
+*line 160
+*line 160
+cmp.b #108,(R12)
+bne L39
+*line 161
+*line 162
+add #1,-22(R14)
+*line 163
+add.l #1,R12
+*line 164
+*line 165
+L39:
+*line 166
+move.l #L40,-44(R14)
+*line 167
+clr.l -12(R14)
+*line 168
+*line 169
+*line 170
+*line 171
+move.b (R12)+,R7
+ext.w R7
+move R7,R0
+bra L42
+*line 172
+L43:
+*line 173
+L44:
+*line 174
+*line 175
+move #5,-18(R14)
+bra L45
+*line 176
+*line 177
+L46:
+*line 178
+*line 179
+move #4,-18(R14)
+bra L45
+*line 180
+*line 181
+L47:
+*line 182
+L48:
+*line 183
+*line 184
+move #8,-18(R14)
+*line 185
+L45:
+*line 186
+*line 187
+*line 188
+*line 189
+tst -36(R14)
+bge L49
+*line 189
+*line 190
+tst -32(R14)
+beq L50
+tst -34(R14)
+ble L50
+*line 190
+move -34(R14),-36(R14)
+*line 191
+bra L51
+L50:
+*line 192
+move #1,-36(R14)
+L51:
+*line 193
+L49:
+*line 194
+*line 195
+tst -22(R14)
+beq L52
+*line 195
+add.l #4,16(R14)
+move.l 16(R14),R8
+move.l -4(R8),-64(R14)
+bra L53
+L52:
+*line 196
+*line 197
+cmp #100,R7
+bne L54
+*line 197
+add.l #2,16(R14)
+move.l 16(R14),R8
+move -2(R8),R0
+ext.l R0
+move.l R0,-64(R14)
+*line 198
+bra L55
+L54:
+*line 199
+add.l #2,16(R14)
+move.l 16(R14),R8
+clr R0
+move -2(R8),R0
+swap R0
+clr R0
+swap R0
+move.l R0,-64(R14)
+L55:L53:
+*line 200
+*line 201
+*line 201
+cmp #100,R7
+bne L56
+*line 202
+*line 203
+*line 203
+tst.l -64(R14)
+bge L57
+*line 204
+*line 205
+move.l #L58,-44(R14)
+*line 206
+*line 207
+*line 208
+move.l -64(R14),R0
+cmp.l #$80000000,R0
+beq L59
+*line 208
+move.l -64(R14),R0
+neg.l R0
+move.l R0,-64(R14)
+*line 209
+L59:bra L60
+L57:
+*line 210
+*line 211
+tst -24(R14)
+beq L61
+*line 211
+move.l #L62,-44(R14)
+bra L63
+L61:
+*line 212
+*line 213
+tst -28(R14)
+beq L64
+*line 213
+move.l #L65,-44(R14)
+L64:L63:L60:
+*line 214
+*line 215
+L56:
+*line 216
+*line 217
+cmp #88,R7
+bne L10001
+move.l #L66,R0
+bra L10003
+L10001:move.l #L67,R0
+L10003:move.l R0,-48(R14)
+*line 218
+*line 219
+lea -49(R14),R11
+move.l R11,R0
+move.l R0,-40(R14)
+*line 220
+*line 221
+*line 222
+*line 223
+move -18(R14),R0
+bra L69
+*line 224
+L70:
+*line 225
+*line 226
+*line 227
+bra L73
+L72:
+*line 228
+*line 229
+move.l -64(R14),R0
+and.l #$7,R0
+add.l -48(R14),R0
+move.l R0,R8
+move.b (R8),-(R11)
+*line 230
+move.l -64(R14),R0
+asr.l #$3,R0
+and.l #$1fffffff,R0
+move.l R0,-64(R14)
+L73:
+*line 231
+tst.l -64(R14)
+bne L72
+L71:
+*line 232
+bra L68
+*line 233
+*line 234
+L74:
+*line 235
+*line 236
+*line 237
+bra L77
+L76:
+*line 238
+*line 239
+*line 240
+*line 241
+*line 242
+*line 243
+move.l #$a,(sp)
+move.l -64(R14),-(sp)
+jsr _uldiv
+addq.l #4,sp
+move.l R0,-64(R14)
+*line 244
+move.l -48(R14),R8
+add.l _uldivr,R8
+move.b (R8),-(R11)
+*line 252
+L77:
+*line 253
+tst.l -64(R14)
+bne L76
+L75:
+*line 254
+bra L68
+*line 255
+*line 256
+L78:
+*line 257
+*line 258
+*line 259
+bra L81
+L80:
+*line 260
+*line 261
+move.l -64(R14),R0
+and.l #$f,R0
+add.l -48(R14),R0
+move.l R0,R8
+move.b (R8),-(R11)
+*line 262
+move.l -64(R14),R0
+asr.l #$4,R0
+and.l #$fffffff,R0
+move.l R0,-64(R14)
+L81:
+*line 263
+tst.l -64(R14)
+bne L80
+L79:bra L68
+L69:cmp #4,R0
+beq L70
+cmp #5,R0
+beq L74
+cmp #8,R0
+beq L78
+bra L68
+L68:
+*line 264
+*line 265
+*line 266
+move.l R11,R0
+sub.l -40(R14),R0
+move -36(R14),R1
+ext.l R1
+add.l R1,R0
+move.l R0,-12(R14)
+*line 267
+*line 268
+*line 269
+tst -30(R14)
+beq L82
+cmp.l -40(R14),R11
+beq L82
+*line 269
+move R7,R0
+bra L84
+*line 270
+L85:
+*line 271
+*line 272
+*line 273
+cmp.l #$1,-12(R14)
+bge L86
+*line 273
+move.l #$1,-12(R14)
+L86:bra L83
+*line 274
+*line 275
+L87:
+*line 276
+L88:
+*line 277
+*line 278
+move.l #L89,-44(R14)
+bra L83
+*line 279
+bra L83
+L84:cmp #88,R0
+beq L88
+cmp #111,R0
+beq L85
+cmp #120,R0
+beq L87
+bra L83
+L83:
+*line 280
+*line 281
+L82:bra L41
+*line 282
+*line 283
+*line 284
+*line 285
+L90:
+*line 286
+*line 287
+move.b R7,-60(R14)
+bra L91
+*line 288
+*line 289
+L92:
+*line 290
+*line 291
+add.l #2,16(R14)
+move.l 16(R14),R8
+move -2(R8),R0
+move.b R0,-60(R14)
+*line 292
+L91:
+*line 293
+*line 294
+*line 295
+lea -60(R14),R11
+move.l R11,R0
+add.l #1,R0
+move.l R0,-40(R14)
+bra L41
+*line 296
+*line 297
+L93:
+*line 298
+*line 299
+add.l #4,16(R14)
+move.l 16(R14),R8
+move.l -4(R8),R11
+move.l R11,-40(R14)
+*line 300
+*line 301
+*line 302
+tst -36(R14)
+bge L94
+*line 302
+move.l R11,(sp)
+jsr _strlen
+ext.l R0
+add.l R0,-40(R14)
+bra L95
+L94:
+*line 303
+*line 304
+bra L98
+L97:L98:
+*line 305
+move.l -40(R14),R8
+move.b (R8),R0
+ext.w R0
+add.l #1,-40(R14)
+tst.b R0
+beq L10004
+sub #1,-36(R14)
+bge L97
+L10004:L96:
+*line 306
+sub.l #1,-40(R14)
+L95:
+*line 307
+*line 308
+bra L41
+*line 309
+*line 310
+L99:
+*line 311
+*line 312
+move.l #$ffffffff,R0
+bra L1
+*line 313
+bra L41
+L42:ext.l R0
+move.l #L100,R8
+move #8,R1
+L101:cmp.l (R8)+,R0
+dbeq R1,L101
+move.l 32(R8),R8
+jmp (R8)
+.data
+L100:.dc.l 0
+.dc.l 88
+.dc.l 99
+.dc.l 100
+.dc.l 111
+.dc.l 115
+.dc.l 117
+.dc.l 120
+.dc.l 0
+.dc.l L99
+.dc.l L47
+.dc.l L92
+.dc.l L43
+.dc.l L46
+.dc.l L93
+.dc.l L44
+.dc.l L48
+.dc.l L90
+.text
+L41:
+*line 314
+*line 315
+*line 316
+*line 317
+*line 318
+*line 319
+tst.l -12(R14)
+bge L102
+*line 319
+clr.l -12(R14)
+*line 320
+L102:
+*line 321
+*line 322
+move.l -40(R14),R0
+sub.l R11,R0
+move.l R0,-8(R14)
+move.l -44(R14),R9
+tst.b (R9)
+bne L10005
+clr R1
+bra L10007
+L10005:move.l -44(R14),R9
+tst.b 1(R9)
+bne L10008
+move #1,R1
+bra L10010
+L10008:move #2,R1
+L10010:L10007:ext.l R1
+add.l R1,R0
+add.l -12(R14),R0
+move.l R0,-4(R14)
+*line 323
+*line 324
+move -34(R14),R0
+ext.l R0
+move.l -4(R14),R1
+cmp.l R1,R0
+ble L10011
+move -34(R14),R0
+ext.l R0
+bra L10013
+L10011:move.l -4(R14),R0
+L10013:add.l R0,-16(R14)
+*line 325
+*line 326
+*line 327
+tst -26(R14)
+bne L103
+*line 327
+bra L106
+L105:
+*line 328
+move #32,(sp)
+jsr (R13)
+L106:
+*line 328
+sub #1,-34(R14)
+move -34(R14),R0
+ext.l R0
+move.l -4(R14),R1
+cmp.l R1,R0
+bge L105
+L104:
+*line 329
+L103:
+*line 330
+bra L109
+L108:
+*line 331
+move.l -44(R14),R8
+move.b (R8),R0
+ext.w R0
+move R0,(sp)
+jsr (R13)
+add.l #1,-44(R14)
+L109:
+*line 331
+move.l -44(R14),R8
+tst.b (R8)
+bne L108
+L107:
+*line 332
+*line 333
+bra L112
+L111:
+*line 334
+move #48,(sp)
+jsr (R13)
+L112:
+*line 334
+sub.l #$1,-12(R14)
+bge L111
+L110:
+*line 335
+*line 336
+*line 337
+tst.l -8(R14)
+ble L113
+*line 337
+bra L116
+L115:
+*line 338
+move.b (R11)+,R0
+ext.w R0
+move R0,(sp) 
+jsr (R13)
+L116:
+*line 338
+move.l -8(R14),R0
+sub.l #$1,-8(R14)
+tst.l R0
+bne L115
+L114:
+*line 339
+L113:
+*line 340
+bra L119
+L118:
+*line 341
+move #32,(sp)
+jsr (R13)
+L119:
+*line 341
+sub #1,-34(R14)
+move -34(R14),R0
+ext.l R0
+move.l -4(R14),R1
+cmp.l R1,R0
+bge L118
+L117:L3:bra L4
+L2:L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R11-R13
+unlk R14
+rts
+.data
+L40:.dc.b $0
+L58:.dc.b $2D,$0
+L62:.dc.b $2B,$0
+L65:.dc.b $20,$0
+L66:.dc.b $30,$31,$32,$33,$34,$35,$36,$37,$38,$39,$41,$42,$43,$44,$45,$46,$0
+L67:.dc.b $30,$31,$32,$33,$34,$35,$36,$37,$38,$39,$61,$62,$63,$64,$65,$66,$0
+L89:.dc.b $30,$78,$0
Index: alcyon/dopatch.s
===================================================================
--- alcyon/dopatch.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/dopatch.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1900 @@
+.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 _stmptr
+.globl _defptr
+.globl _patches
+.globl _defents
+.globl _seqtab
+.globl _seqflag
+.globl _seqline
+.globl _seqstim
+.globl _seqtime
+.globl _sregval
+.globl _trstate
+.globl _S1IoRec
+.globl _S2IoRec
+.globl _M1IoRec
+.globl _M2IoRec
+.globl _seqdupd
+.comm _seqdupd,2
+.globl _bform
+.globl _curinst
+.globl _curvce
+.globl _timemlt
+.globl _expbit
+.globl _ins2grp
+.globl _s_inst
+.globl _vce2grp
+.globl _seqflag
+.globl _seqline
+.globl _sregval
+.globl _trstate
+.globl _ptefifo
+.globl _vbufs
+.globl _wslib
+.globl _ledstat
+.comm _ledstat,24
+.globl _frq2par
+.data
+_frq2par:
+.dc.w $1
+.dc.w $3
+.dc.w $5
+.dc.w $7
+.globl _ind2par
+.data
+_ind2par:
+.dc.w $9
+.dc.w $B
+.dc.w $C
+.dc.w $D
+.dc.w $E
+.dc.w $F
+.globl _cv2vce
+.data
+_cv2vce:
+.dc.w $B
+.dc.w $A
+.dc.w $6
+.dc.w $8
+.globl _lg2base
+.data
+_lg2base:
+.dc.w $0
+.dc.w $3
+.dc.w $7
+.dc.w $A
+.dc.w $E
+.dc.w $11
+.dc.w $15
+.globl _vgtype
+.data
+_vgtype:
+.dc.b $0
+.dc.b $2
+.dc.b $2
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.even
+.globl _pdows
+.text
+_pdows:
+~~pdows:
+~slot=8
+~voice=10
+~wsn=12
+link R14,#-8
+~fpuws=-4
+*line 118
+*line 118
+tst 8(R14)
+beq L2
+*line 119
+*line 120
+move 12(R14),R0
+move 10(R14),R1
+muls #3938,R1
+add.l #_vbufs,R1
+move.l R1,R9
+move.b R0,73(R9)
+*line 121
+*line 122
+*line 123
+move #540,(sp)
+move 12(R14),R0
+muls #1080,R0
+add.l #_wslib,R0
+move.l R0,-(sp)
+move 10(R14),R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,-(sp)
+add.l #2858,(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 124
+*line 125
+move 10(R14),R0
+move #9,R1
+asl R1,R0
+asl #1,R0
+ext.l R0
+add.l #_io_fpu,R0
+add.l #$2,R0
+move.l R0,-4(R14)
+*line 126
+*line 127
+move #254,(sp)
+move 10(R14),R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,-(sp)
+add.l #2858,(sp)
+move.l -4(R14),-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 128
+*line 129
+move.l -4(R14),R8
+move 10(R14),R1
+muls #3938,R1
+add.l #_vbufs,R1
+move.l R1,R9
+move 2858(R9),-2(R8)
+*line 130
+move.l -4(R14),R8
+move 10(R14),R1
+muls #3938,R1
+add.l #_vbufs,R1
+move.l R1,R9
+move 3364(R9),508(R8)
+*line 131
+bra L3
+L2:
+*line 132
+*line 133
+*line 134
+move 12(R14),R0
+move 10(R14),R1
+muls #3938,R1
+add.l #_vbufs,R1
+move.l R1,R9
+move.b R0,72(R9)
+*line 135
+*line 136
+*line 137
+move #540,(sp)
+move 12(R14),R0
+muls #1080,R0
+add.l #_wslib,R0
+move.l R0,-(sp)
+move 10(R14),R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,-(sp)
+add.l #1778,(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 138
+*line 139
+move 10(R14),R0
+move #9,R1
+asl R1,R0
+asl #1,R0
+ext.l R0
+add.l #_io_fpu,R0
+add.l #$202,R0
+move.l R0,-4(R14)
+*line 140
+*line 141
+move #254,(sp)
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,-(sp)
+add.l #1778,(sp)
+move.l -4(R14),-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 142
+*line 143
+move.l -4(R14),R8
+move 10(R14),R1
+muls #3938,R1
+add.l #_vbufs,R1
+move.l R1,R9
+move 1778(R9),-2(R8)
+*line 144
+move.l -4(R14),R8
+move 10(R14),R1
+muls #3938,R1
+add.l #_vbufs,R1
+move.l R1,R9
+move 2284(R9),508(R8)
+*line 145
+L3:L1:unlk R14
+rts
+.globl _pfpufn
+.text
+_pfpufn:
+~~pfpufn:
+~voice=8
+~par=10
+~dat1=12
+~dat2=14
+link R14,#-2
+movem.l R7-R7/R13-R13,-(sp)
+~fpu=R13
+~delay=-2
+*line 164
+clr R0
+move 8(R14),R0
+lsl #8,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R13
+clr R0
+move 10(R14),R0
+lsl #4,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l R0,R13
+add.l #_io_fpu,R13
+add.l #$4000,R13
+*line 166
+clr R0
+move 12(R14),R0
+bra L6
+*line 167
+L7:
+*line 168
+bra L5
+*line 169
+*line 170
+L8:
+*line 171
+*line 172
+*line 173
+move.l R13,R8
+add.l #$a,R8
+move 14(R14),(R8)
+bra L5
+*line 174
+*line 175
+L9:
+*line 176
+*line 177
+*line 178
+*line 179
+move.l R13,-(sp)
+add.l #$14,(sp)
+move _timemlt,R0
+ext.l R0
+and.l #$ffff,R0
+move.l R0,-(sp)
+clr.l R0
+move 14(R14),R0
+and.l #$fff0,R0
+move.l R0,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l #$f,R1
+asr.l R1,R0
+move.l (sp)+,R8
+move R0,(R8)
+*line 180
+*line 181
+add #1,-2(R14)
+*line 182
+*line 183
+move.l R13,R8
+add.l #$16,R8
+clr R1
+move 14(R14),R1
+and #15,R1
+lsl #1,R1
+swap R1
+clr R1
+swap R1
+add.l #_expbit,R1
+move.l R1,R9
+move (R9),(R8)
+*line 184
+bra L5
+*line 185
+*line 186
+L10:
+*line 187
+*line 188
+*line 189
+move 14(R14),(sp)
+move 10(R14),-(sp)
+move 8(R14),-(sp)
+jsr _sendval
+addq.l #4,sp
+bra L5
+*line 190
+*line 191
+L11:
+*line 192
+bra L5
+*line 193
+*line 194
+L12:
+*line 195
+bra L5
+*line 196
+bra L5
+L6:cmp #4,R0
+bhi L12
+asl #2,R0
+move R0,R8
+add.l #L13,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L13:.dc.l L7
+.dc.l L8
+.dc.l L9
+.dc.l L10
+.dc.l L11
+.text
+L5:L4:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _pdoctl
+.text
+_pdoctl:
+~~pdoctl:
+~voice=R7
+~osc=R6
+~dat1=R5
+~dat2=R4
+link R14,#0
+movem.l R3-R7/R13-R13,-(sp)
+~ip=R13
+*line 214
+move 8(R14),R7
+*line 214
+move 10(R14),R6
+*line 214
+move 12(R14),R5
+*line 214
+move 14(R14),R4
+*line 214
+move R7,R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 215
+move R5,_bform
+*line 216
+move R4,R0
+asr #1,R0
+move R0,(sp)
+move R6,-(sp)
+move.l R13,-(sp)
+jsr _setoval
+addq.l #6,sp
+L14:tst.l (sp)+
+movem.l (sp)+,R4-R7/R13-R13
+unlk R14
+rts
+.globl _dopatch
+.text
+_dopatch:
+~~dopatch:
+~pp=R13
+link R14,#-26
+movem.l R2-R7/R11-R13,-(sp)
+~suba=R7
+~dat1=R6
+~dat2=R5
+~i=R4
+~temp=R3
+~ser=R12
+~iorec=R11
+~chan=-2
+~oldsr=-4
+~osc=-6
+~port=-8
+~spec=-10
+~sat=-12
+~trig=-14
+~vgr=-16
+~vgn=-18
+~vgt=-20
+~baseled=-22
+~curled=-24
+~ledctl=-26
+*line 237
+move.l 8(R14),R13
+*line 237
+clr R0
+move 8(R13),R0
+and #255,R0
+move R0,-10(R14)
+*line 238
+move 10(R13),R7
+*line 239
+move 12(R13),R6
+*line 240
+move 14(R13),R5
+*line 242
+clr R8
+move -10(R14),R8
+move.l #_vgtype,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,-12(R14)
+*line 244
+*line 244
+btst #0,-11(R14)
+beq L16
+*line 245
+*line 246
+clr R0
+move R7,R0
+lsr #8,R0
+and #255,R0
+move R0,-16(R14)
+*line 247
+clr R0
+move R7,R0
+and #255,R0
+move R0,-6(R14)
+*line 248
+*line 249
+*line 249
+cmp #11,-16(R14)
+bls L17
+*line 250
+*line 251
+move #1,-20(R14)
+*line 252
+clr R0
+move -16(R14),R0
+add #-12,R0
+move R0,-18(R14)
+*line 253
+bra L18
+L17:
+*line 254
+*line 255
+*line 256
+clr -20(R14)
+*line 257
+move -16(R14),-18(R14)
+L18:
+*line 258
+*line 259
+bra L19
+L16:
+*line 260
+*line 260
+btst #1,-11(R14)
+beq L20
+*line 261
+*line 262
+clr R0
+move R7,R0
+move #11,R1
+lsr R1,R0
+and #3,R0
+move R0,-8(R14)
+*line 263
+clr R0
+move R7,R0
+lsr #7,R0
+and #15,R0
+move R0,-2(R14)
+*line 264
+clr R0
+move R7,R0
+and #127,R0
+move R0,-14(R14)
+*line 265
+*line 266
+*line 267
+L20:L19:
+*line 268
+clr R0
+move -10(R14),R0
+bra L22
+*line 269
+L23:
+*line 270
+*line 271
+*line 272
+*line 273
+tst R5
+beq L10000
+cmp #2,R5
+bne L24
+L10000:*line 273
+move R7,(sp)
+and #8191,(sp)
+move.l #_ptefifo,-(sp)
+jsr _putwq
+addq.l #4,sp
+*line 274
+L24:
+*line 275
+*line 276
+tst R5
+beq L10001
+cmp #1,R5
+bne L25
+L10001:*line 276
+move R7,(sp)
+or #-32768,(sp)
+move.l #_ptefifo,-(sp)
+jsr _putwq
+addq.l #4,sp
+*line 277
+L25:bra L21
+*line 278
+*line 279
+L26:
+*line 280
+*line 281
+*line 282
+and #15,-14(R14)
+*line 283
+clr R0
+move -14(R14),R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_trstate,R0
+move.l R0,R8
+move R5,(R8)
+*line 284
+*line 285
+*line 286
+tst R5
+beq L27
+*line 286
+move R7,(sp)
+move.l #_ptefifo,-(sp)
+jsr _putwq
+addq.l #4,sp
+*line 287
+L27:
+*line 288
+move #1,R0
+clr R1
+move -14(R14),R1
+asl R1,R0
+or R0,_seqdupd
+bra L21
+*line 289
+*line 290
+L28:
+*line 291
+*line 292
+*line 293
+*line 293
+tst R7
+beq L29
+*line 294
+*line 295
+move.l #10+_io_midi,R12
+*line 296
+move.l _M2IoRec,R11
+*line 297
+bra L30
+L29:
+*line 298
+*line 299
+*line 300
+move.l #2+_io_midi,R12
+*line 301
+move.l _M1IoRec,R11
+L30:
+*line 302
+*line 303
+*line 304
+move #9984,(sp)
+jsr _setsr
+move R0,-4(R14)
+*line 305
+*line 306
+move.b 29(R11),R3
+ext.w R3
+*line 307
+*line 308
+clr R0
+move R5,R0
+bra L32
+*line 309
+L33:
+*line 310
+*line 311
+*line 312
+move R3,R0
+or #130,R0
+move.b R0,(R12)
+*line 313
+move R3,R0
+and #253,R0
+or #128,R0
+move.b R0,(R12)
+bra L31
+*line 314
+*line 315
+L34:
+*line 316
+*line 317
+*line 318
+move R3,R0
+and #253,R0
+or #128,R0
+move.b R0,(R12)
+bra L31
+*line 319
+*line 320
+L35:
+*line 321
+*line 322
+*line 323
+move R3,R0
+or #130,R0
+move.b R0,(R12)
+bra L31
+*line 324
+bra L31
+L32:tst R0
+beq L33
+cmp #1,R0
+beq L34
+cmp #2,R0
+beq L35
+bra L31
+L31:
+*line 325
+*line 326
+*line 327
+move -4(R14),(sp)
+jsr _setsr
+*line 328
+bra L21
+*line 329
+*line 330
+*line 331
+L36:
+*line 332
+*line 333
+*line 334
+clr R0
+move R7,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_lg2base,R0
+move.l R0,R8
+move (R8),-22(R14)
+*line 335
+*line 336
+clr R4
+bra L39
+L40:
+*line 337
+*line 338
+move R4,R0
+add -22(R14),R0
+move R0,-24(R14)
+*line 339
+clr R0
+move R6,R0
+move #14,R1
+move R4,R2
+asl #1,R2
+sub R2,R1
+lsr R1,R0
+and #3,R0
+move R0,-26(R14)
+*line 340
+*line 341
+*line 341
+cmp #1,-26(R14)
+bne L41
+*line 342
+*line 343
+move.l #_ledstat,R8
+move -24(R14),R9
+add.l R9,R8
+move.b #1,(R8)
+*line 344
+move -24(R14),R0
+move.b R0,_io_leds
+*line 345
+bra L42
+L41:
+*line 346
+*line 346
+cmp #2,-26(R14)
+bne L43
+*line 347
+*line 348
+move.l #_ledstat,R8
+move -24(R14),R9
+add.l R9,R8
+clr.b (R8)
+*line 349
+move -24(R14),R0
+or #128,R0
+move.b R0,_io_leds
+*line 350
+bra L44
+L43:
+*line 351
+*line 351
+cmp #3,-26(R14)
+bne L45
+*line 352
+*line 353
+*line 353
+move -24(R14),R8
+move.l #_ledstat,R9
+tst.b 0(R8,R9.l)
+beq L46
+*line 354
+*line 355
+move.l #_ledstat,R8
+move -24(R14),R9
+add.l R9,R8
+clr.b (R8)
+*line 356
+move -24(R14),R0
+or #128,R0
+move.b R0,_io_leds
+*line 357
+bra L47
+L46:
+*line 358
+*line 359
+*line 360
+move.l #_ledstat,R8
+move -24(R14),R9
+add.l R9,R8
+move.b #1,(R8)
+*line 361
+move -24(R14),R0
+move.b R0,_io_leds
+L47:
+*line 362
+*line 363
+L45:L44:L42:L38:
+*line 336
+add #1,R4
+L39:
+*line 336
+clr R0
+move R7,R0
+and #1,R0
+add #3,R0
+cmp R0,R4
+blo L40
+L37:
+*line 364
+*line 365
+bra L21
+*line 366
+*line 367
+L48:
+*line 368
+*line 369
+*line 370
+clr R0
+move R7,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_seqline,R0
+move.l R0,R8
+move R6,(R8)
+*line 371
+move #1,R0
+clr R1
+move R7,R1
+asl R1,R0
+or R0,_seqdupd
+bra L21
+*line 372
+*line 373
+L49:
+*line 374
+*line 375
+*line 376
+*line 377
+*line 377
+tst R5
+beq L50
+*line 378
+*line 379
+clr R0
+move R7,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_seqflag,R0
+move.l R0,R8
+or #-16384,(R8)
+*line 380
+clr R0
+move R7,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_seqtime,R0
+move.l R0,R8
+clr R1
+move R7,R1
+lsl #1,R1
+swap R1
+clr R1
+swap R1
+add.l #_seqline,R1
+move.l R1,R9
+clr R1
+move (R9),R1
+mulu #14,R1
+add.l #_seqtab,R1
+move.l R1,R9
+move (R9),(R8)
+*line 381
+*line 386
+*line 387
+bra L51
+L50:
+*line 388
+*line 389
+*line 390
+clr R0
+move R7,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_seqflag,R0
+move.l R0,R8
+clr (R8)
+*line 391
+clr R0
+move R7,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_seqtime,R0
+move.l R0,R8
+clr (R8)
+*line 392
+*line 397
+*line 398
+L51:
+*line 399
+*line 400
+*line 401
+move #1,R0
+clr R1
+move R7,R1
+asl R1,R0
+or R0,_seqdupd
+bra L21
+*line 402
+*line 403
+*line 404
+L52:
+*line 405
+*line 406
+*line 407
+move R6,(sp)
+jsr _gettun
+bra L21
+*line 408
+*line 409
+L53:
+*line 410
+*line 411
+*line 412
+tst R6
+beq L10002
+clr R0
+move R5,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R8
+move.l #_sregval,R9
+clr R0
+move 0(R8,R9.l),R0
+bra L10004
+L10002:clr R0
+move R5,R0
+L10004:clr R1
+move R7,R1
+lsl #1,R1
+swap R1
+clr R1
+swap R1
+add.l #_sregval,R1
+move.l R1,R9
+move R0,(R9)
+*line 413
+move #1,R0
+clr R1
+move R7,R1
+asl R1,R0
+or R0,_seqdupd
+bra L21
+*line 414
+*line 415
+L54:
+*line 416
+*line 417
+*line 418
+clr R0
+move R7,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_sregval,R0
+move.l R0,R8
+move (R8),R3
+tst R6
+beq L10005
+clr R0
+move R5,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R8
+move.l #_sregval,R9
+clr R0
+move 0(R8,R9.l),R0
+bra L10007
+L10005:clr R0
+move R5,R0
+L10007:add R0,R3
+*line 419
+*line 420
+*line 421
+cmp #99,R3
+ble L55
+*line 421
+move #99,R3
+bra L56
+L55:
+*line 422
+*line 423
+tst R3
+bge L57
+*line 423
+clr R3
+*line 424
+L57:L56:
+*line 425
+clr R0
+move R7,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_sregval,R0
+move.l R0,R8
+move R3,(R8)
+*line 426
+move #1,R0
+clr R1
+move R7,R1
+asl R1,R0
+or R0,_seqdupd
+bra L21
+*line 427
+*line 428
+L58:
+*line 429
+*line 430
+*line 431
+*line 431
+tst -20(R14)
+beq L59
+*line 432
+*line 433
+clr R0
+move R6,R0
+clr R1
+move -18(R14),R1
+lsl #1,R1
+swap R1
+clr R1
+swap R1
+add.l #_ins2grp,R1
+move.l R1,R9
+move (R9),R1
+and #-256,R1
+or R1,R0
+clr R1
+move -18(R14),R1
+lsl #1,R1
+swap R1
+clr R1
+swap R1
+add.l #_ins2grp,R1
+move.l R1,R9
+move R0,(R9)
+*line 434
+move -18(R14),(sp)
+jsr _setv2gi
+*line 435
+bra L60
+L59:
+*line 436
+*line 437
+*line 438
+*line 439
+move _curvce,R0
+cmp -18(R14),R0
+bne L61
+*line 439
+move R6,_curinst
+*line 440
+L61:
+*line 441
+clr R0
+move -18(R14),R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_s_inst,R0
+move.l R0,R8
+move R6,(R8)
+*line 442
+move #1,(sp)
+move R6,-(sp)
+move -18(R14),-(sp)
+jsr _execins
+addq.l #4,sp
+L60:
+*line 443
+*line 444
+bra L21
+*line 445
+*line 446
+*line 447
+*line 448
+L62:
+*line 449
+*line 450
+*line 451
+*line 451
+tst -20(R14)
+beq L63
+*line 452
+*line 453
+clr R4
+bra L66
+L67:
+*line 454
+*line 455
+move R4,R8
+add.l R8,R8
+move.l #_vce2grp,R9
+move 0(R8,R9.l),R0
+clr R1
+move -18(R14),R1
+add #1,R1
+cmp R1,R0
+bne L68
+*line 455
+move R5,(sp)
+move R6,-(sp)
+move -6(R14),-(sp)
+move R4,-(sp)
+jsr _pdoctl
+addq.l #6,sp
+*line 456
+L68:L65:
+*line 453
+add #1,R4
+L66:
+*line 453
+cmp #12,R4
+blt L67
+L64:bra L69
+L63:
+*line 457
+*line 458
+*line 459
+move R5,(sp)
+move R6,-(sp)
+move -6(R14),-(sp)
+move -18(R14),-(sp)
+jsr _pdoctl
+addq.l #6,sp
+L69:
+*line 460
+*line 461
+bra L21
+*line 462
+*line 463
+*line 464
+L70:
+*line 465
+*line 466
+*line 467
+*line 467
+tst -20(R14)
+beq L71
+*line 468
+*line 469
+clr R4
+bra L74
+L75:
+*line 470
+*line 471
+move R4,R8
+add.l R8,R8
+move.l #_vce2grp,R9
+move 0(R8,R9.l),R0
+clr R1
+move -18(R14),R1
+add #1,R1
+cmp R1,R0
+bne L76
+*line 471
+move R6,(sp)
+move R4,-(sp)
+clr -(sp)
+jsr _pdows
+addq.l #4,sp
+*line 472
+L76:L73:
+*line 469
+add #1,R4
+L74:
+*line 469
+cmp #12,R4
+blt L75
+L72:bra L77
+L71:
+*line 473
+*line 474
+*line 475
+move R6,(sp)
+move -18(R14),-(sp)
+clr -(sp)
+jsr _pdows
+addq.l #4,sp
+L77:
+*line 476
+*line 477
+bra L21
+*line 478
+*line 479
+L78:
+*line 480
+*line 481
+*line 482
+*line 482
+tst -20(R14)
+beq L79
+*line 483
+*line 484
+clr R4
+bra L82
+L83:
+*line 485
+*line 486
+move R4,R8
+add.l R8,R8
+move.l #_vce2grp,R9
+move 0(R8,R9.l),R0
+clr R1
+move -18(R14),R1
+add #1,R1
+cmp R1,R0
+bne L84
+*line 486
+move R6,(sp)
+move R4,-(sp)
+move #1,-(sp)
+jsr _pdows
+addq.l #4,sp
+*line 487
+L84:L81:
+*line 484
+add #1,R4
+L82:
+*line 484
+cmp #12,R4
+blt L83
+L80:bra L85
+L79:
+*line 488
+*line 489
+*line 490
+move R6,(sp)
+move -18(R14),-(sp)
+move #1,-(sp)
+jsr _pdows
+addq.l #4,sp
+L85:
+*line 491
+*line 492
+bra L21
+*line 493
+*line 494
+L86:
+*line 495
+*line 496
+*line 497
+*line 497
+tst -20(R14)
+beq L87
+*line 498
+*line 499
+clr R4
+bra L90
+L91:
+*line 500
+*line 500
+move R4,R8
+add.l R8,R8
+move.l #_vce2grp,R9
+move 0(R8,R9.l),R0
+clr R1
+move -18(R14),R1
+add #1,R1
+cmp R1,R0
+bne L92
+*line 501
+*line 502
+clr R0
+move R6,R0
+move R4,R1
+muls #3938,R1
+add.l #_vbufs,R1
+move.l R1,R9
+move.b R0,70(R9)
+*line 503
+move R4,(sp)
+jsr _dosync
+*line 504
+L92:L89:
+*line 499
+add #1,R4
+L90:
+*line 499
+cmp #12,R4
+blt L91
+L88:bra L93
+L87:
+*line 505
+*line 506
+*line 507
+clr R0
+move R6,R0
+clr R1
+move -18(R14),R1
+mulu #3938,R1
+add.l #_vbufs,R1
+move.l R1,R9
+move.b R0,70(R9)
+*line 508
+move -18(R14),(sp)
+jsr _dosync
+L93:
+*line 509
+*line 510
+bra L21
+*line 511
+*line 512
+*line 513
+L94:
+*line 514
+*line 515
+*line 516
+*line 516
+tst -20(R14)
+beq L95
+*line 517
+*line 518
+clr R4
+bra L98
+L99:
+*line 519
+*line 520
+move R4,R8
+add.l R8,R8
+move.l #_vce2grp,R9
+move 0(R8,R9.l),R0
+clr R1
+move -18(R14),R1
+add #1,R1
+cmp R1,R0
+bne L100
+*line 520
+move R5,(sp)
+move R6,-(sp)
+move #2,-(sp)
+move R4,-(sp)
+jsr _pfpufn
+addq.l #6,sp
+*line 521
+L100:L97:
+*line 518
+add #1,R4
+L98:
+*line 518
+cmp #12,R4
+blt L99
+L96:bra L101
+L95:
+*line 522
+*line 523
+*line 524
+move R5,(sp)
+move R6,-(sp)
+move #2,-(sp)
+move -18(R14),-(sp)
+jsr _pfpufn
+addq.l #6,sp
+L101:
+*line 525
+*line 526
+bra L21
+*line 527
+*line 528
+L102:
+*line 529
+*line 530
+*line 531
+*line 531
+tst -20(R14)
+beq L103
+*line 532
+*line 533
+clr R4
+bra L106
+L107:
+*line 534
+*line 535
+move R4,R8
+add.l R8,R8
+move.l #_vce2grp,R9
+move 0(R8,R9.l),R0
+clr R1
+move -18(R14),R1
+add #1,R1
+cmp R1,R0
+bne L108
+*line 535
+move R5,(sp)
+move R6,-(sp)
+clr R0
+move -6(R14),R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R8
+move.l #_ind2par,R9
+move 0(R8,R9.l),-(sp)
+move R4,-(sp)
+jsr _pfpufn
+addq.l #6,sp
+*line 536
+L108:L105:
+*line 533
+add #1,R4
+L106:
+*line 533
+cmp #12,R4
+blt L107
+L104:bra L109
+L103:
+*line 537
+*line 538
+*line 539
+move R5,(sp)
+move R6,-(sp)
+clr R0
+move -6(R14),R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R8
+move.l #_ind2par,R9
+move 0(R8,R9.l),-(sp)
+move -18(R14),-(sp)
+jsr _pfpufn
+addq.l #6,sp
+L109:
+*line 540
+*line 541
+bra L21
+*line 542
+*line 543
+*line 544
+L110:
+*line 545
+*line 546
+*line 547
+*line 547
+tst -20(R14)
+beq L111
+*line 548
+*line 549
+clr R4
+bra L114
+L115:
+*line 550
+*line 551
+move R4,R8
+add.l R8,R8
+move.l #_vce2grp,R9
+move 0(R8,R9.l),R0
+clr R1
+move -18(R14),R1
+add #1,R1
+cmp R1,R0
+bne L116
+*line 551
+move R5,(sp)
+move R6,-(sp)
+clr R0
+move -6(R14),R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R8
+move.l #_frq2par,R9
+move 0(R8,R9.l),-(sp)
+move R4,-(sp)
+jsr _pfpufn
+addq.l #6,sp
+*line 552
+L116:L113:
+*line 549
+add #1,R4
+L114:
+*line 549
+cmp #12,R4
+blt L115
+L112:bra L117
+L111:
+*line 553
+*line 554
+*line 555
+move R5,(sp)
+move R6,-(sp)
+clr R0
+move -6(R14),R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R8
+move.l #_frq2par,R9
+move 0(R8,R9.l),-(sp)
+move -18(R14),-(sp)
+jsr _pfpufn
+addq.l #6,sp
+L117:
+*line 556
+*line 557
+bra L21
+*line 558
+*line 559
+L118:
+*line 560
+*line 561
+*line 562
+*line 562
+tst -20(R14)
+beq L119
+*line 563
+*line 564
+clr R4
+bra L122
+L123:
+*line 565
+*line 566
+move R4,R8
+add.l R8,R8
+move.l #_vce2grp,R9
+move 0(R8,R9.l),R0
+clr R1
+move -18(R14),R1
+add #1,R1
+cmp R1,R0
+bne L124
+*line 566
+move R5,(sp)
+move R6,-(sp)
+move #10,-(sp)
+move R4,-(sp)
+jsr _pfpufn
+addq.l #6,sp
+*line 567
+L124:L121:
+*line 564
+add #1,R4
+L122:
+*line 564
+cmp #12,R4
+blt L123
+L120:bra L125
+L119:
+*line 568
+*line 569
+*line 570
+move R5,(sp)
+move R6,-(sp)
+move #10,-(sp)
+move -18(R14),-(sp)
+jsr _pfpufn
+addq.l #6,sp
+L125:
+*line 571
+*line 572
+bra L21
+*line 573
+*line 574
+*line 575
+L126:
+*line 576
+*line 577
+*line 578
+*line 578
+tst -20(R14)
+beq L127
+*line 579
+*line 580
+clr R4
+bra L130
+L131:
+*line 581
+*line 582
+move R4,R8
+add.l R8,R8
+move.l #_vce2grp,R9
+move 0(R8,R9.l),R0
+clr R1
+move -18(R14),R1
+add #1,R1
+cmp R1,R0
+bne L132
+*line 582
+move R5,(sp)
+move R6,-(sp)
+move #6,-(sp)
+move R4,-(sp)
+jsr _pfpufn
+addq.l #6,sp
+*line 583
+L132:L129:
+*line 580
+add #1,R4
+L130:
+*line 580
+cmp #12,R4
+blt L131
+L128:bra L133
+L127:
+*line 584
+*line 585
+*line 586
+move R5,(sp)
+move R6,-(sp)
+move #6,-(sp)
+move -18(R14),-(sp)
+jsr _pfpufn
+addq.l #6,sp
+L133:
+*line 587
+*line 588
+bra L21
+*line 589
+*line 590
+L134:
+*line 591
+*line 592
+*line 593
+*line 593
+tst -20(R14)
+beq L135
+*line 594
+*line 595
+clr R4
+bra L138
+L139:
+*line 596
+*line 597
+move R4,R8
+add.l R8,R8
+move.l #_vce2grp,R9
+move 0(R8,R9.l),R0
+clr R1
+move -18(R14),R1
+add #1,R1
+cmp R1,R0
+bne L140
+*line 597
+move R5,(sp)
+move R6,-(sp)
+move #4,-(sp)
+move R4,-(sp)
+jsr _pfpufn
+addq.l #6,sp
+*line 598
+L140:L137:
+*line 595
+add #1,R4
+L138:
+*line 595
+cmp #12,R4
+blt L139
+L136:bra L141
+L135:
+*line 599
+*line 600
+*line 601
+move R5,(sp)
+move R6,-(sp)
+move #4,-(sp)
+move -18(R14),-(sp)
+jsr _pfpufn
+addq.l #6,sp
+L141:
+*line 602
+*line 603
+bra L21
+*line 604
+*line 605
+*line 606
+L142:
+*line 607
+*line 608
+*line 609
+*line 609
+tst -20(R14)
+beq L143
+*line 610
+*line 611
+clr R4
+bra L146
+L147:
+*line 612
+*line 613
+move R4,R8
+add.l R8,R8
+move.l #_vce2grp,R9
+move 0(R8,R9.l),R0
+clr R1
+move -18(R14),R1
+add #1,R1
+cmp R1,R0
+bne L148
+*line 613
+move R5,(sp)
+move R6,-(sp)
+move #8,-(sp)
+move R4,-(sp)
+jsr _pfpufn
+addq.l #6,sp
+*line 614
+L148:L145:
+*line 611
+add #1,R4
+L146:
+*line 611
+cmp #12,R4
+blt L147
+L144:bra L149
+L143:
+*line 615
+*line 616
+*line 617
+move R5,(sp)
+move R6,-(sp)
+move #8,-(sp)
+move -18(R14),-(sp)
+jsr _pfpufn
+addq.l #6,sp
+L149:
+*line 618
+*line 619
+bra L21
+*line 620
+*line 621
+L150:
+*line 622
+*line 623
+*line 624
+move R5,(sp)
+move R6,-(sp)
+clr -(sp)
+move #9,-(sp)
+jsr _pfpufn
+addq.l #6,sp
+bra L21
+*line 625
+*line 626
+L151:
+*line 627
+*line 628
+*line 629
+move R5,(sp)
+move R6,-(sp)
+clr -(sp)
+move #2,-(sp)
+jsr _pfpufn
+addq.l #6,sp
+bra L21
+*line 630
+*line 631
+L152:
+*line 632
+*line 633
+*line 634
+move R5,(sp)
+move R6,-(sp)
+clr -(sp)
+move #1,-(sp)
+jsr _pfpufn
+addq.l #6,sp
+bra L21
+*line 635
+*line 636
+L153:
+*line 637
+*line 638
+*line 639
+move R5,(sp)
+move R6,-(sp)
+clr -(sp)
+move #3,-(sp)
+jsr _pfpufn
+addq.l #6,sp
+bra L21
+*line 640
+*line 641
+L154:
+*line 642
+*line 643
+*line 644
+move R5,(sp)
+move R6,-(sp)
+clr -(sp)
+clr R0
+move R7,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R8
+move.l #_cv2vce,R9
+move 0(R8,R9.l),-(sp)
+jsr _pfpufn
+addq.l #6,sp
+bra L21
+*line 645
+*line 646
+bra L21
+L22:sub #1,R0
+cmp #25,R0
+bhi L21
+asl #2,R0
+move R0,R8
+add.l #L155,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L155:.dc.l L23
+.dc.l L26
+.dc.l L28
+.dc.l L36
+.dc.l L48
+.dc.l L49
+.dc.l L52
+.dc.l L53
+.dc.l L54
+.dc.l L58
+.dc.l L62
+.dc.l L70
+.dc.l L78
+.dc.l L86
+.dc.l L94
+.dc.l L102
+.dc.l L110
+.dc.l L118
+.dc.l L126
+.dc.l L134
+.dc.l L142
+.dc.l L150
+.dc.l L151
+.dc.l L152
+.dc.l L153
+.dc.l L154
+.text
+L21:L15:tst.l (sp)+
+movem.l (sp)+,R3-R7/R11-R13
+unlk R14
+rts
+.data
Index: alcyon/enterit.s
===================================================================
--- alcyon/enterit.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/enterit.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1020 @@
+.globl _v_obtab
+.globl _v_curob
+.globl _v_nobj
+.globl _v_obpri
+.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 _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _cx_key
+.globl _cy_key
+.globl _cx_upd
+.globl _cy_upd
+.globl _xy_up
+.globl _xy_dn
+.globl _not_fld
+.globl _x_key
+.globl _e_key
+.globl _m_key
+.globl _d_key
+.globl _premove
+.globl _pstmove
+.globl _curtype
+.globl _cratex
+.globl _cratey
+.globl _asig
+.globl _aval
+.globl _astat
+.globl _aflag
+.globl _xkstat
+.globl _ykstat
+.globl _xkcount
+.globl _ykcount
+.globl _cmtype
+.globl _cmfirst
+.globl _xycntr
+.globl _curpos
+.globl _cxrate
+.globl _cyrate
+.globl _cxval
+.globl _cyval
+.globl _ncvwait
+.globl _nchwait
+.globl _chwait
+.globl _cvwait
+.globl _cvtime
+.globl _chtime
+.globl _stcrow
+.globl _stccol
+.globl _runit
+.globl _submenu
+.globl _vtcrow
+.globl _vtccol
+.globl _trkball
+.globl _tkctrl
+.globl _txflag
+.globl _tyflag
+.globl _curhold
+.globl _hcwval
+.globl _thcwval
+.globl _tvcwval
+.globl _vcwval
+.globl _sigtab
+.globl _crate0
+.globl _syrate
+.data
+_syrate:
+.dc.w $4
+.globl _LastRow
+.data
+_LastRow:
+.dc.w $FFFF
+.globl _LastCol
+.data
+_LastCol:
+.dc.w $FFFF
+.globl _enterit
+.text
+_enterit:
+~~enterit:
+link R14,#-4
+*line 74
+*line 75
+tst _astat
+beq L1
+*line 76
+*line 81
+*line 82
+*line 83
+*line 83
+move.l _curfet,(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+jsr _infield
+addq.l #4,sp
+tst R0
+beq L2
+*line 84
+*line 85
+move.l _infetp,_cfetp
+*line 86
+*line 87
+*line 88
+tst.l _cfetp
+beq L3
+tst _ebflag
+bne L3
+*line 88
+move.l _cfetp,R8
+move 6(R8),-(sp)
+move.l _cfetp,R8
+move.l 8(R8),R8
+jsr (R8)
+addq.l #2,sp
+*line 89
+L3:
+*line 90
+*line 91
+tst.l _cfetp
+beq L4
+*line 91
+move.l _cfetp,R8
+move 6(R8),-(sp)
+move.l _cfetp,R8
+move.l 12(R8),R8
+jsr (R8)
+addq.l #2,sp
+*line 92
+L4:
+*line 93
+*line 94
+tst.l _cfetp
+beq L5
+*line 94
+move.l _cfetp,R8
+move 6(R8),-(sp)
+move.l _cfetp,R8
+move.l 16(R8),R8
+jsr (R8)
+addq.l #2,sp
+*line 95
+L5:
+*line 96
+clr _ebflag
+*line 97
+L2:L1:unlk R14
+rts
+.globl _nokey
+.text
+_nokey:
+~~nokey:
+link R14,#-4
+*line 112
+clr R0
+bra L6
+L6:unlk R14
+rts
+.globl _cmvgen
+.text
+_cmvgen:
+~~cmvgen:
+link R14,#0
+movem.l R3-R7,-(sp)
+~nc=R7
+~newrow=R6
+~newcol=R5
+~newpos=R4
+*line 128
+move.l _premove,R8
+jsr (R8)
+*line 130
+move.l _curtype,R8
+jsr (R8)
+move R0,R7
+*line 132
+move _cyval,R6
+ext.l R6
+divs #14,R6
+*line 133
+move _cxval,R5
+asr #3,R5
+*line 135
+*line 135
+cmp _cmtype,R7
+beq L8
+*line 136
+*line 137
+move _curhold,_nchwait
+*line 138
+move _curhold,_ncvwait
+*line 139
+*line 140
+move #-1,_LastRow
+*line 141
+move #-1,_LastCol
+*line 142
+*line 143
+*line 144
+*line 145
+L8:
+*line 146
+*line 147
+cmp _LastRow,R6
+bne L10000
+cmp _LastCol,R5
+beq L9
+L10000:*line 147
+move #1,R4
+*line 148
+bra L10
+L9:
+*line 149
+clr R4
+L10:
+*line 153
+tst R7
+bne L10001
+move _hcwval,R0
+bra L10003
+L10001:move _thcwval,R0
+L10003:move R0,_chtime
+*line 154
+tst R7
+bne L10004
+move _vcwval,R0
+bra L10006
+L10004:cmp #4,R7
+bne L10007
+move _syrate,R0
+bra L10009
+L10007:move _tvcwval,R0
+L10009:L10006:move R0,_cvtime
+*line 156
+move R7,R0
+bra L12
+*line 157
+L13:
+*line 158
+*line 159
+*line 160
+*line 160
+cmp #3,_cmtype
+bne L14
+*line 161
+*line 162
+jsr _stcoff
+*line 163
+jsr _sgcon
+*line 164
+*line 165
+L14:
+*line 166
+move R7,_cmtype
+*line 167
+move _cyval,(sp)
+move _cxval,-(sp)
+jsr _gcurpos
+addq.l #2,sp
+bra L11
+*line 168
+*line 169
+*line 170
+*line 171
+L15:
+*line 172
+*line 173
+*line 174
+move R7,_cmtype
+*line 175
+*line 176
+*line 177
+tst R4
+beq L16
+*line 177
+move R5,(sp)
+move R6,-(sp)
+jsr _itcpos
+addq.l #2,sp
+*line 178
+L16:bra L11
+*line 179
+*line 180
+L17:
+*line 181
+*line 182
+*line 183
+move R7,_cmtype
+*line 184
+move _vtccol,(sp)
+move _vtcrow,-(sp)
+jsr _ttcpos
+addq.l #2,sp
+bra L11
+*line 185
+*line 186
+L18:
+*line 187
+*line 188
+*line 189
+*line 190
+tst _cmtype
+bne L19
+*line 190
+jsr _sgcoff
+*line 191
+L19:
+*line 192
+move R7,_cmtype
+*line 193
+*line 194
+*line 195
+tst R4
+beq L20
+*line 195
+move R5,(sp)
+move R6,-(sp)
+jsr _stcpos
+addq.l #2,sp
+*line 196
+L20:bra L11
+*line 197
+*line 198
+L21:
+*line 199
+*line 200
+*line 201
+move R7,_cmtype
+*line 202
+*line 203
+*line 204
+tst R4
+beq L22
+*line 204
+move R5,(sp)
+move R6,-(sp)
+jsr _ctcpos
+addq.l #2,sp
+*line 205
+L22:bra L11
+*line 206
+*line 207
+L23:
+*line 208
+*line 209
+*line 210
+move R7,_cmtype
+*line 211
+move _vtccol,(sp)
+move _vtcrow,-(sp)
+jsr _mtcpos
+addq.l #2,sp
+bra L11
+*line 212
+bra L11
+L12:cmp #5,R0
+bhi L11
+asl #2,R0
+move R0,R8
+add.l #L24,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L24:.dc.l L13
+.dc.l L15
+.dc.l L17
+.dc.l L18
+.dc.l L21
+.dc.l L23
+.text
+L11:
+*line 215
+move R6,_LastRow
+*line 216
+move R5,_LastCol
+*line 218
+move.l _pstmove,R8
+jsr (R8)
+L7:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _crxrate
+.text
+_crxrate:
+~~crxrate:
+~cv=R7
+link R14,#0
+movem.l R5-R7,-(sp)
+~cs=R6
+*line 236
+move 8(R14),R7
+*line 236
+*line 236
+cmp _xycntr,R7
+blt L26
+*line 237
+*line 238
+sub _xycntr,R7
+*line 239
+move #1,R6
+*line 240
+move R7,R0
+neg R0
+move R0,_curpos
+*line 241
+bra L27
+L26:
+*line 242
+*line 243
+*line 244
+move _xycntr,R0
+sub R7,R0
+move R0,R7
+*line 245
+clr R6
+*line 246
+move R7,_curpos
+L27:
+*line 249
+*line 250
+cmp #127,R7
+ble L28
+*line 250
+move #127,R7
+*line 251
+L28:
+*line 252
+tst R6
+beq L10010
+move.l _cratex,R8
+move R7,R9
+add.l R9,R9
+move 0(R8,R9.l),R0
+neg R0
+bra L10012
+L10010:move.l _cratex,R8
+move R7,R9
+add.l R9,R9
+move 0(R8,R9.l),R0
+L10012:bra L25
+L25:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _cryrate
+.text
+_cryrate:
+~~cryrate:
+~cv=R7
+link R14,#0
+movem.l R5-R7,-(sp)
+~cs=R6
+*line 270
+move 8(R14),R7
+*line 270
+*line 270
+cmp _xycntr,R7
+blt L30
+*line 271
+*line 272
+sub _xycntr,R7
+*line 273
+move #1,R6
+*line 274
+move R7,R0
+neg R0
+move R0,_curpos
+*line 275
+bra L31
+L30:
+*line 276
+*line 277
+*line 278
+move _xycntr,R0
+sub R7,R0
+move R0,R7
+*line 279
+clr R6
+*line 280
+move R7,_curpos
+L31:
+*line 283
+*line 284
+cmp #127,R7
+ble L32
+*line 284
+move #127,R7
+*line 285
+L32:
+*line 286
+tst R6
+beq L10013
+move.l _cratey,R8
+move R7,R9
+add.l R9,R9
+move 0(R8,R9.l),R0
+neg R0
+bra L10015
+L10013:move.l _cratey,R8
+move R7,R9
+add.l R9,R9
+move 0(R8,R9.l),R0
+L10015:bra L29
+L29:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _cmfix
+.text
+_cmfix:
+~~cmfix:
+link R14,#0
+movem.l R3-R7,-(sp)
+~acx=R7
+~acy=R6
+~scx=R5
+~scy=R4
+*line 302
+move 220+_sigtab,(sp)
+jsr _crxrate
+*line 303
+tst _curpos
+bge L10016
+move _curpos,R0
+neg R0
+bra L10018
+L10016:move _curpos,R0
+L10018:move R0,R7
+*line 305
+move 224+_sigtab,(sp)
+jsr _cryrate
+*line 306
+tst _curpos
+bge L10019
+move _curpos,R0
+neg R0
+bra L10021
+L10019:move _curpos,R0
+L10021:move R0,R6
+*line 308
+tst _cxrate
+bge L10022
+move #-1,R0
+bra L10024
+L10022:move #1,R0
+L10024:move R0,R5
+*line 309
+tst _cyrate
+bge L10025
+move #-1,R0
+bra L10027
+L10025:move #1,R0
+L10027:move R0,R4
+*line 311
+*line 311
+tst _cmfirst
+beq L34
+*line 312
+*line 313
+*line 313
+cmp R6,R7
+blt L35
+*line 314
+*line 315
+clr _cyrate
+*line 316
+move R5,_cxrate
+*line 317
+move _curhold,_nchwait
+*line 318
+move _cvtime,_ncvwait
+*line 319
+bra L36
+L35:
+*line 320
+*line 321
+*line 322
+clr _cxrate
+*line 323
+move R4,_cyrate
+*line 324
+move _curhold,_ncvwait
+*line 325
+move _chtime,_nchwait
+L36:
+*line 326
+*line 327
+*line 328
+clr _cmfirst
+*line 329
+bra L37
+L34:
+*line 330
+*line 331
+*line 332
+*line 333
+*line 334
+*line 335
+tst _cmtype
+beq L38
+*line 335
+*line 336
+cmp R6,R7
+blt L39
+*line 336
+clr _cyrate
+*line 337
+bra L40
+L39:
+*line 338
+clr _cxrate
+L40:L38:L37:L33:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _cxkstd
+.text
+_cxkstd:
+~~cxkstd:
+link R14,#-4
+*line 353
+clr _trkball
+*line 354
+clr _tkctrl
+*line 355
+clr _txflag
+*line 356
+clr _tyflag
+*line 358
+*line 358
+tst _astat
+beq L42
+*line 359
+*line 360
+*line 360
+tst _xkstat
+bne L43
+*line 361
+*line 362
+*line 362
+tst _xkcount
+beq L44
+*line 363
+*line 364
+sub #1,_xkcount
+bra L41
+*line 365
+*line 366
+*line 367
+L44:
+*line 368
+move #1,_xkstat
+*line 369
+move #1,_chwait
+*line 370
+move _curhold,_nchwait
+*line 371
+*line 372
+*line 373
+tst _ykstat
+beq L45
+*line 373
+move.l _xy_dn,R8
+jsr (R8)
+L45:
+*line 374
+*line 375
+L43:
+*line 376
+move _aval,(sp)
+jsr _crxrate
+neg R0
+move R0,_cxrate
+*line 377
+*line 378
+bra L46
+L42:
+*line 379
+*line 380
+*line 381
+*line 382
+tst _xkstat
+beq L47
+tst _ykstat
+beq L47
+*line 382
+move.l _xy_up,R8
+jsr (R8)
+*line 383
+L47:
+*line 384
+clr _xkstat
+*line 385
+move #1,_xkcount
+*line 386
+clr _cxrate
+*line 387
+*line 388
+*line 388
+tst _ykstat
+bne L48
+*line 389
+*line 390
+clr _cyrate
+*line 391
+move #1,_ykcount
+*line 392
+move _chtime,_nchwait
+*line 393
+move _cvtime,_ncvwait
+*line 394
+move #1,_chwait
+*line 395
+move #1,_cvwait
+*line 396
+move #1,_cmfirst
+*line 397
+L48:L46:bra L41
+L41:unlk R14
+rts
+.globl _cykstd
+.text
+_cykstd:
+~~cykstd:
+link R14,#-4
+*line 414
+clr _trkball
+*line 415
+clr _tkctrl
+*line 416
+clr _txflag
+*line 417
+clr _tyflag
+*line 419
+*line 419
+tst _astat
+beq L50
+*line 420
+*line 421
+*line 421
+tst _ykstat
+bne L51
+*line 422
+*line 423
+*line 423
+tst _ykcount
+beq L52
+*line 424
+*line 425
+sub #1,_ykcount
+bra L49
+*line 426
+*line 427
+*line 428
+L52:
+*line 429
+move #1,_ykstat
+*line 430
+move #1,_cvwait
+*line 431
+move _curhold,_ncvwait
+*line 432
+*line 433
+*line 434
+tst _xkstat
+beq L53
+*line 434
+move.l _xy_dn,R8
+jsr (R8)
+L53:
+*line 435
+*line 436
+L51:
+*line 437
+move _aval,(sp)
+jsr _cryrate
+move R0,_cyrate
+*line 438
+*line 439
+bra L54
+L50:
+*line 440
+*line 441
+*line 442
+*line 443
+tst _xkstat
+beq L55
+tst _ykstat
+beq L55
+*line 443
+move.l _xy_up,R8
+jsr (R8)
+*line 444
+L55:
+*line 445
+clr _ykstat
+*line 446
+move #1,_ykcount
+*line 447
+clr _cyrate
+*line 448
+*line 449
+*line 449
+tst _xkstat
+bne L56
+*line 450
+*line 451
+clr _cxrate
+*line 452
+move #1,_xkcount
+*line 453
+move _chtime,_nchwait
+*line 454
+move _cvtime,_ncvwait
+*line 455
+move #1,_chwait
+*line 456
+move #1,_cvwait
+*line 457
+move #1,_cmfirst
+*line 458
+L56:L54:bra L49
+L49:unlk R14
+rts
+.globl _stdmkey
+.text
+_stdmkey:
+~~stdmkey:
+link R14,#-4
+*line 475
+*line 475
+tst _astat
+beq L58
+*line 476
+*line 477
+clr _runit
+*line 478
+clr _submenu
+*line 479
+L58:L57:unlk R14
+rts
+.globl _stddkey
+.text
+_stddkey:
+~~stddkey:
+link R14,#-4
+*line 490
+*line 490
+move.l _curfet,(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+jsr _infield
+addq.l #4,sp
+tst R0
+beq L60
+*line 491
+*line 492
+move.l _infetp,_cfetp
+*line 493
+*line 494
+*line 494
+tst _astat
+beq L61
+*line 495
+*line 496
+*line 497
+tst _ebflag
+bne L62
+*line 497
+move.l _cfetp,R8
+move 6(R8),-(sp)
+move.l _cfetp,R8
+move.l 8(R8),R8
+jsr (R8)
+addq.l #2,sp
+*line 498
+L62:
+*line 499
+move _asig,-(sp)
+add #-60,(sp)
+move.l _cfetp,R8
+move 6(R8),-(sp)
+move.l _cfetp,R8
+move.l 20(R8),R8
+jsr (R8)
+addq.l #4,sp
+*line 500
+*line 501
+L61:bra L63
+L60:
+*line 502
+*line 503
+*line 504
+*line 505
+tst _astat
+beq L64
+*line 505
+move _asig,-(sp)
+add #-60,(sp)
+move.l _not_fld,R8
+jsr (R8)
+addq.l #2,sp
+L64:L63:L59:unlk R14
+rts
+.globl _cxgen
+.text
+_cxgen:
+~~cxgen:
+link R14,#-4
+*line 520
+move _cxrate,R0
+add R0,_cxval
+*line 522
+*line 523
+cmp #511,_cxval
+ble L66
+*line 523
+move #511,_cxval
+bra L67
+L66:
+*line 524
+*line 525
+tst _cxval
+bge L68
+*line 525
+clr _cxval
+*line 526
+L68:L67:bra L65
+L65:unlk R14
+rts
+.globl _cygen
+.text
+_cygen:
+~~cygen:
+link R14,#-4
+*line 538
+move _cyrate,R0
+add R0,_cyval
+*line 540
+*line 541
+cmp #349,_cyval
+ble L70
+*line 541
+move #349,_cyval
+bra L71
+L70:
+*line 542
+*line 543
+tst _cyval
+bge L72
+*line 543
+clr _cyval
+*line 544
+L72:L71:bra L69
+L69:unlk R14
+rts
+.data
Index: alcyon/etaccn.s
===================================================================
--- alcyon/etaccn.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etaccn.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,269 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _asgob
+.globl _stcrow
+.globl _stccol
+.globl _adbox
+.globl _dspbuf
+.globl _mctlnum
+.globl _et_accn
+.text
+_et_accn:
+~~et_accn:
+~n=8
+link R14,#-4
+movem.l R6-R7,-(sp)
+~ctl=R7
+~buf=-4
+*line 46
+move 8(R14),R7
+asr #8,R7
+and #255,R7
+*line 48
+move R7,R8
+add.l R8,R8
+move.l #_mctlnum,R9
+move 0(R8,R9.l),(sp)
+and #255,(sp)
+move.l #_ebuf,-(sp)
+jsr _numblk
+addq.l #4,sp
+*line 49
+move #1,_ebflag
+*line 51
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _ef_accn
+.text
+_ef_accn:
+~~ef_accn:
+~n=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~tmpval=R7
+~ctl=R6
+~i=R5
+*line 66
+move 8(R14),R6
+asr #8,R6
+and #255,R6
+*line 68
+clr.b 2+_ebuf
+*line 69
+clr _ebflag
+*line 70
+clr R7
+*line 72
+*line 72
+cmp.b #32,_ebuf
+bne L3
+cmp.b #32,1+_ebuf
+bne L3
+*line 73
+*line 74
+move #-1,R7
+*line 75
+bra L4
+L3:
+*line 76
+*line 77
+*line 78
+clr R5
+bra L7
+L8:
+*line 79
+*line 80
+*line 81
+move R5,R8
+add.l #_ebuf,R8
+cmp.b #32,(R8)
+bne L9
+*line 81
+move R5,R8
+add.l #_ebuf,R8
+move.b #48,(R8)
+*line 82
+L9:
+*line 83
+muls #10,R7
+move.l #_ebuf,R8
+move.b 0(R8,R5),R0
+ext.w R0
+add R0,R7
+add #-48,R7
+L6:
+*line 78
+add #1,R5
+L7:
+*line 78
+cmp #2,R5
+blt L8
+L5:
+*line 84
+L4:
+*line 87
+*line 88
+move R6,R8
+add.l R8,R8
+add.l #_mctlnum,R8
+cmp #-1,(R8)
+bne L10
+*line 88
+move R6,R8
+add.l R8,R8
+add.l #_mctlnum,R8
+move R7,(R8)
+*line 89
+bra L11
+L10:
+*line 90
+move R7,R0
+move R6,R9
+add.l R9,R9
+add.l #_mctlnum,R9
+move (R9),R1
+and #-256,R1
+or R1,R0
+move R6,R9
+add.l R9,R9
+add.l #_mctlnum,R9
+move R0,(R9)
+L11:
+*line 92
+jsr _modasg
+*line 93
+clr R0
+bra L2
+L2:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _rd_accn
+.text
+_rd_accn:
+~~rd_accn:
+~nn=8
+link R14,#-4
+movem.l R5-R7,-(sp)
+~n=R7
+~ctl=R6
+~buf=-4
+*line 112
+move 8(R14),R7
+and #255,R7
+*line 113
+move 8(R14),R6
+asr #8,R6
+and #255,R6
+*line 115
+clr (sp)
+jsr _vbank
+*line 116
+*line 117
+*line 118
+move #14,(sp)
+move R6,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 #6,sp
+move.l R0,-(sp)
+move.l _cfetp,R8
+move 2(R8),-(sp)
+move.l _cfetp,R8
+move (R8),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 10(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 _vcputsv
+adda.l #18,sp
+*line 120
+clr R0
+bra L12
+L12:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _nd_accn
+.text
+_nd_accn:
+~~nd_accn:
+~k=R7
+~nn=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~n=R6
+*line 139
+move 10(R14),R7
+*line 139
+move 8(R14),R6
+and #255,R6
+*line 140
+move R7,R0
+add #48,R0
+move _stccol,R9
+move.l _cfetp,R10
+move 2(R10),R10
+sub R10,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 141
+clr.b 2+_ebuf
+*line 143
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 144
+clr.b 1+_dspbuf
+*line 146
+clr (sp)
+jsr _vbank
+*line 147
+*line 148
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 10(R8,R9.l),-(sp)
+move #12,-(sp)
+move #64,-(sp)
+move.l _asgob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 150
+jsr _advacur
+*line 151
+clr R0
+bra L13
+L13:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.data
Index: alcyon/etadep.s
===================================================================
--- alcyon/etadep.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etadep.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,210 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _asgob
+.globl _stcrow
+.globl _stccol
+.globl _ps_dpth
+.globl _adbox
+.globl _dspbuf
+.globl _et_adep
+.text
+_et_adep:
+~~et_adep:
+~n=8
+link R14,#-4
+*line 39
+move _ps_dpth,(sp)
+move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 40
+move #1,_ebflag
+*line 42
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_adep
+.text
+_ef_adep:
+~~ef_adep:
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~i=R7
+~tmpval=R6
+*line 57
+clr.b 2+_ebuf
+*line 58
+clr _ebflag
+*line 59
+clr R6
+*line 61
+clr R7
+bra L6
+L7:
+*line 62
+muls #10,R6
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R6
+add #-48,R6
+L5:
+*line 61
+add #1,R7
+L6:
+*line 61
+cmp #2,R7
+blt L7
+L4:
+*line 64
+move R6,_ps_dpth
+*line 65
+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 66
+jsr _modasg
+*line 67
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _rd_adep
+.text
+_rd_adep:
+~~rd_adep:
+~nn=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~n=R7
+*line 85
+move 8(R14),R7
+and #255,R7
+*line 86
+move _ps_dpth,(sp)
+move.l #L9,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 88
+clr (sp)
+jsr _vbank
+*line 89
+*line 90
+move #14,(sp)
+move.l #_dspbuf,-(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)
+add #3,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 10(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 _vcputsv
+adda.l #18,sp
+*line 92
+clr R0
+bra L8
+L8:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _nd_adep
+.text
+_nd_adep:
+~~nd_adep:
+~k=R7
+~nn=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~ec=R6
+~n=R5
+*line 108
+move 10(R14),R7
+*line 108
+move 8(R14),R5
+and #255,R5
+*line 110
+move _stccol,R6
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R6
+*line 112
+move R7,R0
+add #48,R0
+move R6,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 113
+clr.b 2+_ebuf
+*line 115
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 116
+clr.b 1+_dspbuf
+*line 118
+clr (sp)
+jsr _vbank
+*line 119
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(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 #12,-(sp)
+move #64,-(sp)
+move.l _asgob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 121
+jsr _advacur
+*line 122
+clr R0
+bra L10
+L10:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$30,$32,$64,$0
+L9:.dc.b $25,$30,$32,$2E,$32,$64,$0
Index: alcyon/etadyn.s
===================================================================
--- alcyon/etadyn.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etadyn.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,391 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _asgob
+.globl _curintp
+.globl _stccol
+.globl _stcrow
+.globl _timemlt
+.globl _dspbuf
+.globl _vce2grp
+.globl _grpdyn
+.globl _dyntab
+.globl _expbit
+.globl _adbox
+.globl _vbufs
+.globl _et_adyn
+.text
+_et_adyn:
+~~et_adyn:
+~n=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~grp=R7
+*line 57
+move 8(R14),R7
+asr #8,R7
+and #255,R7
+*line 59
+move R7,R8
+add.l R8,R8
+move.l #_grpdyn,R9
+move 0(R8,R9.l),R0
+add #48,R0
+move.b R0,_ebuf
+*line 60
+clr.b 1+_ebuf
+*line 62
+move #1,_ebflag
+*line 64
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _setdyn
+.text
+_setdyn:
+~~setdyn:
+~grp=8
+~dyn=10
+link R14,#-8
+movem.l R3-R7/R12-R13,-(sp)
+~g=R7
+~i=R6
+~val=R5
+~ltmp=R4
+~fpu=R13
+~fp=R12
+~fpmant=-2
+~fpexp=-4
+~oldsr=-6
+~nop=-8
+*line 87
+move 8(R14),R8
+add.l R8,R8
+add.l #_grpdyn,R8
+move 10(R14),(R8)
+*line 88
+move 10(R14),R8
+add.l R8,R8
+add.l #_dyntab,R8
+move (R8),R5
+*line 89
+move 8(R14),R7
+add #1,R7
+*line 91
+*line 92
+move _timemlt,R0
+ext.l R0
+and.l #$ffff,R0
+move.l R0,-(sp)
+clr.l R0
+move _curintp,R0
+and.l #$fff0,R0
+move.l R0,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l #$f,R1
+asr.l R1,R0
+move R0,-2(R14)
+*line 94
+clr R0
+move _curintp,R0
+and #15,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_expbit,R0
+move.l R0,R8
+move (R8),-4(R14)
+*line 98
+clr R6
+bra L5
+L6:
+*line 99
+*line 99
+move R6,R8
+add.l R8,R8
+add.l #_vce2grp,R8
+cmp (R8),R7
+bne L7
+*line 100
+*line 101
+move R6,R0
+muls #3938,R0
+move.l R0,R12
+add.l #_vbufs,R12
+add.l #182,R12
+*line 102
+move R6,R0
+asl #8,R0
+asl #1,R0
+ext.l R0
+move.l R0,R13
+add.l #_io_fpu,R13
+add.l #$4100,R13
+*line 103
+*line 104
+move #8704,(sp)
+jsr _setsr
+move R0,-6(R14)
+*line 105
+*line 106
+*line 107
+*line 108
+eor.b #24,7(R12)
+*line 109
+move.l R13,R8
+add.l #$14,R8
+move -2(R14),(R8)
+*line 110
+add #1,-8(R14)
+*line 110
+add #1,-8(R14)
+*line 110
+add #1,-8(R14)
+*line 111
+move.l R13,R8
+add.l #$16,R8
+move -4(R14),(R8)
+*line 112
+add #1,-8(R14)
+*line 112
+add #1,-8(R14)
+*line 112
+add #1,-8(R14)
+*line 113
+*line 114
+*line 115
+btst #3,7(R12)
+beq L8
+*line 115
+move.l R13,R8
+add.l #$1c,R8
+move R5,(R8)
+*line 116
+bra L9
+L8:
+*line 117
+move.l R13,R8
+add.l #$2,R8
+move R5,(R8)
+L9:
+*line 118
+*line 119
+add #1,-8(R14)
+*line 119
+add #1,-8(R14)
+*line 119
+add #1,-8(R14)
+*line 120
+*line 121
+*line 122
+move.b 7(R12),R0
+ext.w R0
+and #28,R0
+or #1,R0
+move R0,(R13)
+*line 123
+*line 124
+move -6(R14),(sp)
+jsr _setsr
+*line 125
+*line 126
+*line 127
+*line 128
+L7:L4:
+*line 98
+add #1,R6
+L5:
+*line 98
+cmp #12,R6
+blt L6
+L3:L2:tst.l (sp)+
+movem.l (sp)+,R4-R7/R12-R13
+unlk R14
+rts
+.globl _ef_adyn
+.text
+_ef_adyn:
+~~ef_adyn:
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~dyn=R7
+~grp=R6
+*line 146
+move 8(R14),R6
+asr #8,R6
+and #255,R6
+*line 148
+clr.b 1+_ebuf
+*line 149
+clr _ebflag
+*line 151
+move.b _ebuf,R7
+ext.w R7
+add #-48,R7
+*line 153
+move R7,(sp)
+move R6,-(sp)
+jsr _setdyn
+addq.l #2,sp
+*line 154
+jsr _modasg
+*line 155
+clr R0
+bra L10
+L10:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _rd_adyn
+.text
+_rd_adyn:
+~~rd_adyn:
+~nn=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~n=R7
+~grp=R6
+*line 173
+move 8(R14),R7
+and #255,R7
+*line 174
+move 8(R14),R6
+asr #8,R6
+and #255,R6
+*line 176
+move R6,R8
+add.l R8,R8
+move.l #_grpdyn,R9
+move 0(R8,R9.l),R0
+add #48,R0
+move.b R0,_dspbuf
+*line 177
+clr.b 1+_dspbuf
+*line 179
+clr (sp)
+jsr _vbank
+*line 180
+*line 181
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move.l _cfetp,R8
+move 2(R8),-(sp)
+move.l _cfetp,R8
+move (R8),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 10(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 _vcputsv
+adda.l #18,sp
+*line 183
+clr R0
+bra L11
+L11:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _nd_adyn
+.text
+_nd_adyn:
+~~nd_adyn:
+~k=R7
+~nn=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~n=R6
+*line 199
+move 10(R14),R7
+*line 199
+move 8(R14),R6
+and #255,R6
+*line 201
+move R7,R0
+add #48,R0
+move.b R0,_ebuf
+move.b R0,_dspbuf
+*line 202
+clr R0
+move.b R0,1+_ebuf
+move.b R0,1+_dspbuf
+*line 204
+clr (sp)
+jsr _vbank
+*line 205
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 10(R8,R9.l),-(sp)
+move #12,-(sp)
+move #64,-(sp)
+move.l _asgob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 207
+clr R0
+bra L12
+L12:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.data
Index: alcyon/etagch.s
===================================================================
--- alcyon/etagch.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etagch.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,256 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _asgob
+.globl _stcrow
+.globl _stccol
+.globl _adbox
+.globl _dspbuf
+.globl _grp2prt
+.globl _et_agch
+.text
+_et_agch:
+~~et_agch:
+~n=8
+link R14,#-4
+movem.l R6-R7,-(sp)
+~grp=R7
+~buf=-4
+*line 47
+move 8(R14),R7
+asr #8,R7
+and #255,R7
+*line 49
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_grp2prt,R9
+move 2(R8,R9.l),(sp)
+move.l #_ebuf,-(sp)
+jsr _numblk
+addq.l #4,sp
+*line 50
+move #1,_ebflag
+*line 52
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _ef_agch
+.text
+_ef_agch:
+~~ef_agch:
+~n=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~tmpval=R7
+~grp=R6
+~i=R5
+*line 67
+move 8(R14),R6
+asr #8,R6
+and #255,R6
+*line 69
+clr.b 2+_ebuf
+*line 70
+clr _ebflag
+*line 71
+clr R7
+*line 73
+*line 73
+cmp.b #32,_ebuf
+bne L3
+cmp.b #32,1+_ebuf
+bne L3
+*line 74
+*line 75
+move #-1,R7
+*line 76
+bra L4
+L3:
+*line 77
+*line 78
+*line 79
+clr R5
+bra L7
+L8:
+*line 80
+*line 81
+*line 82
+move R5,R8
+add.l #_ebuf,R8
+cmp.b #32,(R8)
+bne L9
+*line 82
+move R5,R8
+add.l #_ebuf,R8
+move.b #48,(R8)
+*line 83
+L9:
+*line 84
+muls #10,R7
+move.l #_ebuf,R8
+move.b 0(R8,R5),R0
+ext.w R0
+add R0,R7
+add #-48,R7
+L6:
+*line 79
+add #1,R5
+L7:
+*line 79
+cmp #2,R5
+blt L8
+L5:
+*line 85
+*line 86
+*line 87
+*line 88
+tst R7
+beq L10000
+cmp #16,R7
+ble L10
+L10000:*line 88
+move #-1,R0
+bra L2
+L10:L4:
+*line 91
+move R6,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_grp2prt,R8
+move R7,2(R8)
+*line 93
+jsr _modasg
+*line 94
+clr R0
+bra L2
+L2:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _rd_agch
+.text
+_rd_agch:
+~~rd_agch:
+~nn=8
+link R14,#-4
+movem.l R5-R7,-(sp)
+~n=R7
+~grp=R6
+~buf=-4
+*line 113
+move 8(R14),R7
+and #255,R7
+*line 114
+move 8(R14),R6
+asr #8,R6
+and #255,R6
+*line 116
+clr (sp)
+jsr _vbank
+*line 117
+*line 118
+move #14,(sp)
+move R6,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.l _cfetp,R8
+move 2(R8),-(sp)
+move.l _cfetp,R8
+move (R8),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 10(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 _vcputsv
+adda.l #18,sp
+*line 120
+clr R0
+bra L11
+L11:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _nd_agch
+.text
+_nd_agch:
+~~nd_agch:
+~k=R7
+~nn=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~n=R6
+*line 136
+move 10(R14),R7
+*line 136
+move 8(R14),R6
+and #255,R6
+*line 137
+move R7,R0
+add #48,R0
+move _stccol,R9
+move.l _cfetp,R10
+move 2(R10),R10
+sub R10,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 138
+clr.b 2+_ebuf
+*line 140
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 141
+clr.b 1+_dspbuf
+*line 143
+clr (sp)
+jsr _vbank
+*line 144
+*line 145
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 10(R8,R9.l),-(sp)
+move #12,-(sp)
+move #64,-(sp)
+move.l _asgob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 147
+jsr _advacur
+*line 148
+clr R0
+bra L12
+L12:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.data
Index: alcyon/etagpt.s
===================================================================
--- alcyon/etagpt.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etagpt.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,261 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _asgob
+.globl _stcrow
+.globl _stccol
+.globl _dspbuf
+.globl _gprep
+.globl _key2grp
+.globl _adbox
+.globl _grp2prt
+.globl _et_agpt
+.text
+_et_agpt:
+~~et_agpt:
+~n=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~grp=R7
+*line 48
+move 8(R14),R7
+asr #8,R7
+and #255,R7
+*line 50
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_grp2prt,R9
+move 0(R8,R9.l),R0
+move.b R0,_ebuf
+*line 51
+clr.b 1+_ebuf
+*line 53
+move #1,_ebflag
+*line 55
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _ef_agpt
+.text
+_ef_agpt:
+~~ef_agpt:
+~n=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~tmpval=R7
+~grp=R6
+~i=R5
+*line 70
+move 8(R14),R6
+asr #8,R6
+and #255,R6
+*line 72
+clr.b 1+_ebuf
+*line 73
+clr _ebflag
+*line 75
+move.b _ebuf,R0
+ext.w R0
+move R6,R9
+add.l R9,R9
+add.l R9,R9
+add.l #_grp2prt,R9
+move R0,(R9)
+*line 77
+*line 78
+move R6,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_grp2prt,R8
+cmp #1,(R8)
+beq L3
+*line 78
+clr R5
+bra L6
+L7:
+*line 79
+move #1,R0
+move R6,R1
+asl R1,R0
+not R0
+move R5,R9
+add.l R9,R9
+add.l #_key2grp,R9
+and R0,(R9)
+L5:
+*line 78
+add #1,R5
+L6:
+*line 78
+cmp #88,R5
+blt L7
+L4:
+*line 79
+*line 80
+L3:
+*line 81
+move R6,(sp)
+jsr _drawk2g
+*line 83
+jsr _modasg
+*line 84
+clr R0
+bra L2
+L2:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _rd_agpt
+.text
+_rd_agpt:
+~~rd_agpt:
+~nn=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~n=R7
+~grp=R6
+*line 102
+move 8(R14),R7
+and #255,R7
+*line 103
+move 8(R14),R6
+asr #8,R6
+and #255,R6
+*line 105
+clr (sp)
+jsr _vbank
+*line 106
+*line 107
+move #14,(sp)
+move R6,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.l _cfetp,R8
+move 2(R8),-(sp)
+move.l _cfetp,R8
+move (R8),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 10(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 _vcputsv
+adda.l #18,sp
+*line 109
+clr R0
+bra L8
+L8:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _nd_agpt
+.text
+_nd_agpt:
+~~nd_agpt:
+~k=R7
+~nn=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~n=R6
+*line 125
+move 10(R14),R7
+*line 125
+move 8(R14),R6
+and #255,R6
+*line 127
+*line 127
+cmp #8,R7
+bne L10
+*line 128
+*line 129
+*line 130
+sub.b #1,_ebuf
+bge L11
+*line 130
+move.b #3,_ebuf
+*line 131
+L11:bra L12
+L10:
+*line 132
+*line 132
+cmp #9,R7
+bne L13
+*line 133
+*line 134
+*line 135
+move.b _ebuf,R0
+ext.w R0
+add #1,R0
+move.b R0,_ebuf
+cmp #3,R0
+ble L14
+*line 135
+clr.b _ebuf
+*line 136
+L14:bra L15
+L13:
+*line 137
+*line 138
+*line 139
+move #-1,R0
+bra L9
+L15:L12:
+*line 142
+move.b _ebuf,R0
+ext.w R0
+move R0,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_gprep,R9
+move.l 0(R8,R9.l),R8
+move.b (R8),_dspbuf
+*line 143
+clr.b 1+_dspbuf
+*line 145
+clr (sp)
+jsr _vbank
+*line 146
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 10(R8,R9.l),-(sp)
+move #12,-(sp)
+move #64,-(sp)
+move.l _asgob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 148
+clr R0
+bra L9
+L9:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.data
Index: alcyon/etains.s
===================================================================
--- alcyon/etains.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etains.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,260 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _asgob
+.globl _asgmod
+.globl _stccol
+.globl _stcrow
+.globl _dspbuf
+.globl _ins2grp
+.globl _adbox
+.globl _modasg
+.text
+_modasg:
+~~modasg:
+link R14,#-4
+*line 42
+*line 42
+tst _asgmod
+bne L2
+*line 43
+*line 44
+move #1,_asgmod
+*line 45
+clr (sp)
+jsr _adswin
+*line 46
+L2:L1:unlk R14
+rts
+.globl _et_ains
+.text
+_et_ains:
+~~et_ains:
+~n=8
+link R14,#-4
+movem.l R6-R7,-(sp)
+~grp=R7
+~buf=-4
+*line 63
+move 8(R14),R7
+asr #8,R7
+and #255,R7
+*line 65
+move R7,R8
+add.l R8,R8
+move.l #_ins2grp,R9
+move 0(R8,R9.l),(sp)
+and #255,(sp)
+move.l #L4,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 66
+move #1,_ebflag
+*line 68
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _ef_ains
+.text
+_ef_ains:
+~~ef_ains:
+~n=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~tmpval=R7
+~grp=R6
+~i=R5
+*line 83
+move 8(R14),R6
+asr #8,R6
+and #255,R6
+*line 84
+clr.b 2+_ebuf
+*line 85
+clr _ebflag
+*line 86
+clr R7
+*line 88
+clr R5
+bra L8
+L9:
+*line 89
+muls #10,R7
+move.l #_ebuf,R8
+move.b 0(R8,R5),R0
+ext.w R0
+add R0,R7
+add #-48,R7
+L7:
+*line 88
+add #1,R5
+L8:
+*line 88
+cmp #2,R5
+blt L9
+L6:
+*line 91
+*line 92
+cmp #41,R7
+blt L10
+*line 92
+move #-1,R0
+bra L5
+*line 93
+L10:
+*line 94
+move R7,R0
+move R6,R9
+add.l R9,R9
+add.l #_ins2grp,R9
+move (R9),R1
+and #-256,R1
+or R1,R0
+move R6,R9
+add.l R9,R9
+add.l #_ins2grp,R9
+move R0,(R9)
+*line 95
+jsr _modasg
+*line 96
+move R6,(sp)
+jsr _setv2gi
+*line 97
+jsr _setinst
+*line 98
+clr R0
+bra L5
+L5:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _rd_ains
+.text
+_rd_ains:
+~~rd_ains:
+~nn=8
+link R14,#-4
+movem.l R5-R7,-(sp)
+~n=R7
+~grp=R6
+~buf=-4
+*line 117
+move 8(R14),R7
+and #255,R7
+*line 118
+move 8(R14),R6
+asr #8,R6
+and #255,R6
+*line 120
+move R6,R8
+add.l R8,R8
+move.l #_ins2grp,R9
+move 0(R8,R9.l),(sp)
+and #255,(sp)
+move.l #L12,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 122
+clr (sp)
+jsr _vbank
+*line 123
+*line 124
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move.l _cfetp,R8
+move 2(R8),-(sp)
+move.l _cfetp,R8
+move (R8),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 10(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 _vcputsv
+adda.l #18,sp
+*line 126
+clr R0
+bra L11
+L11:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _nd_ains
+.text
+_nd_ains:
+~~nd_ains:
+~k=R7
+~nn=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~n=R6
+*line 142
+move 10(R14),R7
+*line 142
+move 8(R14),R6
+and #255,R6
+*line 143
+move R7,R0
+add #48,R0
+move _stccol,R9
+move.l _cfetp,R10
+move 2(R10),R10
+sub R10,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 144
+clr.b 2+_ebuf
+*line 146
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 147
+clr.b 1+_dspbuf
+*line 149
+clr (sp)
+jsr _vbank
+*line 150
+*line 151
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 10(R8,R9.l),-(sp)
+move #12,-(sp)
+move #64,-(sp)
+move.l _asgob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 153
+jsr _advacur
+*line 154
+clr R0
+bra L13
+L13:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.data
+L4:.dc.b $25,$30,$32,$2E,$32,$64,$0
+L12:.dc.b $25,$30,$32,$2E,$32,$64,$0
Index: alcyon/etaint.s
===================================================================
--- alcyon/etaint.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etaint.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,210 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _asgob
+.globl _stcrow
+.globl _stccol
+.globl _ps_intn
+.globl _adbox
+.globl _dspbuf
+.globl _et_aint
+.text
+_et_aint:
+~~et_aint:
+~n=8
+link R14,#-4
+*line 39
+move _ps_intn,(sp)
+move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 40
+move #1,_ebflag
+*line 42
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_aint
+.text
+_ef_aint:
+~~ef_aint:
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~i=R7
+~tmpval=R6
+*line 57
+clr.b 2+_ebuf
+*line 58
+clr _ebflag
+*line 59
+clr R6
+*line 61
+clr R7
+bra L6
+L7:
+*line 62
+muls #10,R6
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R6
+add #-48,R6
+L5:
+*line 61
+add #1,R7
+L6:
+*line 61
+cmp #2,R7
+blt L7
+L4:
+*line 64
+move R6,_ps_intn
+*line 65
+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 66
+jsr _modasg
+*line 67
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _rd_aint
+.text
+_rd_aint:
+~~rd_aint:
+~nn=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~n=R7
+*line 85
+move 8(R14),R7
+and #255,R7
+*line 86
+move _ps_intn,(sp)
+move.l #L9,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 88
+clr (sp)
+jsr _vbank
+*line 89
+*line 90
+move #14,(sp)
+move.l #_dspbuf,-(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)
+add #1,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 10(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 _vcputsv
+adda.l #18,sp
+*line 92
+clr R0
+bra L8
+L8:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _nd_aint
+.text
+_nd_aint:
+~~nd_aint:
+~k=R7
+~nn=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~ec=R6
+~n=R5
+*line 108
+move 10(R14),R7
+*line 108
+move 8(R14),R5
+and #255,R5
+*line 110
+move _stccol,R6
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R6
+*line 112
+move R7,R0
+add #48,R0
+move R6,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 113
+clr.b 2+_ebuf
+*line 115
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 116
+clr.b 1+_dspbuf
+*line 118
+clr (sp)
+jsr _vbank
+*line 119
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(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 #12,-(sp)
+move #64,-(sp)
+move.l _asgob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 121
+jsr _advacur
+*line 122
+clr R0
+bra L10
+L10:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$30,$32,$64,$0
+L9:.dc.b $25,$30,$32,$2E,$32,$64,$0
Index: alcyon/etaopt.s
===================================================================
--- alcyon/etaopt.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etaopt.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,190 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _asgob
+.globl _stcrow
+.globl _stccol
+.globl _curmop
+.globl _adbox
+.globl _dspbuf
+.globl _gprep
+.globl _et_aopt
+.text
+_et_aopt:
+~~et_aopt:
+~n=8
+link R14,#-4
+*line 41
+move _curmop,(sp)
+move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 42
+move #1,_ebflag
+*line 44
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_aopt
+.text
+_ef_aopt:
+~~ef_aopt:
+~n=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~tmpval=R7
+*line 59
+clr.b 1+_ebuf
+*line 60
+clr _ebflag
+*line 62
+move.b _ebuf,R7
+ext.w R7
+add #-48,R7
+*line 64
+*line 65
+cmp #3,R7
+ble L4
+*line 65
+move #-1,R0
+bra L3
+*line 66
+L4:
+*line 67
+move R7,_curmop
+*line 68
+jsr _modasg
+*line 69
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _rd_aopt
+.text
+_rd_aopt:
+~~rd_aopt:
+~nn=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~n=R7
+*line 87
+move 8(R14),R7
+and #255,R7
+*line 89
+clr (sp)
+jsr _vbank
+*line 90
+*line 91
+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 10(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 _vcputsv
+adda.l #18,sp
+*line 93
+clr R0
+bra L5
+L5:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _nd_aopt
+.text
+_nd_aopt:
+~~nd_aopt:
+~k=R7
+~nn=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~n=R6
+*line 109
+move 10(R14),R7
+*line 109
+*line 110
+cmp #1,R7
+blt L10000
+cmp #2,R7
+ble L7
+L10000:*line 110
+move #-1,R0
+bra L6
+*line 111
+L7:
+*line 112
+move 8(R14),R6
+and #255,R6
+*line 113
+move R7,R0
+add #48,R0
+move.b R0,_ebuf
+*line 114
+clr.b 1+_ebuf
+*line 116
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 117
+clr.b 1+_dspbuf
+*line 119
+clr (sp)
+jsr _vbank
+*line 120
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 10(R8,R9.l),-(sp)
+move #12,-(sp)
+move #64,-(sp)
+move.l _asgob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 122
+clr R0
+bra L6
+L6:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$30,$31,$2E,$31,$64,$0
Index: alcyon/etaprg.s
===================================================================
--- alcyon/etaprg.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etaprg.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,209 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _asgob
+.globl _stcrow
+.globl _stccol
+.globl _prgchan
+.globl _adbox
+.globl _dspbuf
+.globl _et_aprg
+.text
+_et_aprg:
+~~et_aprg:
+~n=8
+link R14,#-4
+*line 45
+move _prgchan,(sp)
+move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 46
+move #1,_ebflag
+*line 48
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_aprg
+.text
+_ef_aprg:
+~~ef_aprg:
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~i=R7
+~tmpval=R6
+*line 63
+clr.b 2+_ebuf
+*line 64
+clr _ebflag
+*line 65
+clr R6
+*line 67
+clr R7
+bra L6
+L7:
+*line 68
+muls #10,R6
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R6
+add #-48,R6
+L5:
+*line 67
+add #1,R7
+L6:
+*line 67
+cmp #2,R7
+blt L7
+L4:
+*line 76
+*line 77
+tst R6
+beq L10000
+cmp #16,R6
+ble L8
+L10000:*line 77
+move #-1,R0
+bra L3
+*line 78
+L8:
+*line 79
+move R6,_prgchan
+*line 80
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _rd_aprg
+.text
+_rd_aprg:
+~~rd_aprg:
+~nn=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~n=R7
+*line 98
+move 8(R14),R7
+and #255,R7
+*line 99
+move _prgchan,(sp)
+move.l #L10,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 101
+clr (sp)
+jsr _vbank
+*line 102
+*line 103
+move #14,(sp)
+move.l #_dspbuf,-(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 10(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 _vcputsv
+adda.l #18,sp
+*line 105
+clr R0
+bra L9
+L9:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _nd_aprg
+.text
+_nd_aprg:
+~~nd_aprg:
+~k=R7
+~nn=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~ec=R6
+~n=R5
+*line 121
+move 10(R14),R7
+*line 121
+move 8(R14),R5
+and #255,R5
+*line 123
+move _stccol,R6
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R6
+*line 125
+move R7,R0
+add #48,R0
+move R6,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 126
+clr.b 2+_ebuf
+*line 128
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 129
+clr.b 1+_dspbuf
+*line 131
+clr (sp)
+jsr _vbank
+*line 132
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(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 #12,-(sp)
+move #64,-(sp)
+move.l _asgob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 134
+jsr _advacur
+*line 135
+clr R0
+bra L11
+L11:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$30,$32,$64,$0
+L10:.dc.b $25,$30,$32,$2E,$32,$64,$0
Index: alcyon/etarat.s
===================================================================
--- alcyon/etarat.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etarat.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,210 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _asgob
+.globl _stcrow
+.globl _stccol
+.globl _ps_rate
+.globl _adbox
+.globl _dspbuf
+.globl _et_arat
+.text
+_et_arat:
+~~et_arat:
+~n=8
+link R14,#-4
+*line 39
+move _ps_rate,(sp)
+move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 40
+move #1,_ebflag
+*line 42
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_arat
+.text
+_ef_arat:
+~~ef_arat:
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~i=R7
+~tmpval=R6
+*line 57
+clr.b 2+_ebuf
+*line 58
+clr _ebflag
+*line 59
+clr R6
+*line 61
+clr R7
+bra L6
+L7:
+*line 62
+muls #10,R6
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R6
+add #-48,R6
+L5:
+*line 61
+add #1,R7
+L6:
+*line 61
+cmp #2,R7
+blt L7
+L4:
+*line 64
+move R6,_ps_rate
+*line 65
+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 66
+jsr _modasg
+*line 67
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _rd_arat
+.text
+_rd_arat:
+~~rd_arat:
+~nn=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~n=R7
+*line 85
+move 8(R14),R7
+and #255,R7
+*line 86
+move _ps_rate,(sp)
+move.l #L9,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 88
+clr (sp)
+jsr _vbank
+*line 89
+*line 90
+move #14,(sp)
+move.l #_dspbuf,-(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)
+add #2,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 10(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 _vcputsv
+adda.l #18,sp
+*line 92
+clr R0
+bra L8
+L8:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _nd_arat
+.text
+_nd_arat:
+~~nd_arat:
+~k=R7
+~nn=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~ec=R6
+~n=R5
+*line 108
+move 10(R14),R7
+*line 108
+move 8(R14),R5
+and #255,R5
+*line 110
+move _stccol,R6
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R6
+*line 112
+move R7,R0
+add #48,R0
+move R6,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 113
+clr.b 2+_ebuf
+*line 115
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 116
+clr.b 1+_dspbuf
+*line 118
+clr (sp)
+jsr _vbank
+*line 119
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(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 #12,-(sp)
+move #64,-(sp)
+move.l _asgob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 121
+jsr _advacur
+*line 122
+clr R0
+bra L10
+L10:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$30,$32,$64,$0
+L9:.dc.b $25,$30,$32,$2E,$32,$64,$0
Index: alcyon/etatab.s
===================================================================
--- alcyon/etatab.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etatab.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,290 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _point
+.globl _asgob
+.globl _asgmod
+.globl _curasg
+.globl _stccol
+.globl _stcrow
+.globl _adbox
+.globl _dspbuf
+.globl _et_atab
+.text
+_et_atab:
+~~et_atab:
+~n=8
+link R14,#-4
+*line 46
+move _curasg,(sp)
+move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 47
+move #1,_ebflag
+*line 49
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_atab
+.text
+_ef_atab:
+~~ef_atab:
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~i=R7
+~tmpval=R6
+*line 64
+clr.b 2+_ebuf
+*line 65
+clr _ebflag
+*line 66
+clr R6
+*line 68
+clr R7
+bra L6
+L7:
+*line 69
+muls #10,R6
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R6
+add #-48,R6
+L5:
+*line 68
+add #1,R7
+L6:
+*line 68
+cmp #2,R7
+blt L7
+L4:
+*line 71
+*line 72
+cmp #100,R6
+blt L8
+*line 72
+move #-1,R0
+bra L3
+*line 73
+L8:
+*line 74
+move R6,_curasg
+*line 75
+move #1,_asgmod
+*line 76
+clr (sp)
+jsr _adswin
+*line 78
+move #6,(sp)
+move #2,-(sp)
+jsr _settc
+addq.l #2,sp
+*line 80
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _rd_atab
+.text
+_rd_atab:
+~~rd_atab:
+~nn=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~n=R7
+*line 98
+move 8(R14),R7
+and #255,R7
+*line 99
+move _curasg,(sp)
+move.l #L10,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 101
+move.l #_adpoint,_point
+*line 103
+*line 104
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L11
+*line 104
+clr (sp)
+jsr _vbank
+*line 105
+L11:
+*line 106
+*line 107
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move.l _cfetp,R8
+move 2(R8),-(sp)
+move.l _cfetp,R8
+move (R8),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 10(R8,R9.l),-(sp)
+tst _asgmod
+beq L10000
+move #13,-(sp)
+jsr _exp_c
+addq.l #2,sp
+move R0,-(sp)
+bra L10002
+L10000:move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 8(R8,R9.l),-(sp)
+L10002:move #64,-(sp)
+move.l _asgob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 109
+move #10,(sp)
+clr -(sp)
+move #128,-(sp)
+clr -(sp)
+clr -(sp)
+jsr _lseg
+addq.l #8,sp
+*line 111
+clr R0
+bra L9
+L9:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _nd_atab
+.text
+_nd_atab:
+~~nd_atab:
+~k=R7
+~nn=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~ec=R6
+~n=R5
+*line 127
+move 10(R14),R7
+*line 127
+move 8(R14),R5
+and #255,R5
+*line 128
+move _stccol,R6
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R6
+*line 130
+move R7,R0
+add #48,R0
+move R6,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 131
+clr.b 2+_ebuf
+*line 133
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 134
+clr.b 1+_dspbuf
+*line 136
+move.l #_adpoint,_point
+*line 138
+*line 139
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L13
+*line 139
+clr (sp)
+jsr _vbank
+*line 140
+L13:
+*line 141
+*line 142
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(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 #12,-(sp)
+move #64,-(sp)
+move.l _asgob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 144
+move #10,(sp)
+clr -(sp)
+move #128,-(sp)
+clr -(sp)
+clr -(sp)
+jsr _lseg
+addq.l #8,sp
+*line 146
+jsr _advacur
+*line 147
+clr R0
+bra L12
+L12:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$30,$32,$64,$0
+L10:.dc.b $25,$30,$32,$2E,$32,$64,$0
Index: alcyon/etatun.s
===================================================================
--- alcyon/etatun.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etatun.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,173 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _asgob
+.globl _stcrow
+.globl _stccol
+.globl _curtun
+.globl _adbox
+.globl _dspbuf
+.globl _et_atun
+.text
+_et_atun:
+~~et_atun:
+~n=8
+link R14,#-4
+*line 39
+move _curtun,(sp)
+move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 40
+move #1,_ebflag
+*line 42
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_atun
+.text
+_ef_atun:
+~~ef_atun:
+~n=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~tmpval=R7
+*line 57
+clr.b 1+_ebuf
+*line 58
+clr _ebflag
+*line 60
+move.b _ebuf,R7
+ext.w R7
+add #-48,R7
+*line 62
+move R7,(sp)
+jsr _gettun
+*line 64
+jsr _modasg
+*line 65
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _rd_atun
+.text
+_rd_atun:
+~~rd_atun:
+~nn=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~n=R7
+*line 83
+move 8(R14),R7
+and #255,R7
+*line 84
+move _curtun,(sp)
+move.l #L5,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 86
+clr (sp)
+jsr _vbank
+*line 87
+*line 88
+move #14,(sp)
+move.l #_dspbuf,-(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 10(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 _vcputsv
+adda.l #18,sp
+*line 90
+clr R0
+bra L4
+L4:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _nd_atun
+.text
+_nd_atun:
+~~nd_atun:
+~k=R7
+~nn=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~n=R6
+*line 106
+move 10(R14),R7
+*line 106
+move 8(R14),R6
+and #255,R6
+*line 107
+move R7,R0
+add #48,R0
+move.b R0,_ebuf
+*line 108
+clr.b 1+_ebuf
+*line 110
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 111
+clr.b 1+_dspbuf
+*line 113
+clr (sp)
+jsr _vbank
+*line 114
+*line 115
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 10(R8,R9.l),-(sp)
+move #12,-(sp)
+move #64,-(sp)
+move.l _asgob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 117
+clr R0
+bra L6
+L6:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$30,$31,$2E,$31,$64,$0
+L5:.dc.b $54,$75,$6E,$20,$25,$30,$31,$2E,$31,$64,$0
Index: alcyon/etavgr.s
===================================================================
--- alcyon/etavgr.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etavgr.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,280 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _asgob
+.globl _stcrow
+.globl _stccol
+.globl _adbox
+.globl _dspbuf
+.globl _vce2grp
+.globl _ins2grp
+.globl _et_avgr
+.text
+_et_avgr:
+~~et_avgr:
+~nn=8
+link R14,#-4
+movem.l R6-R7,-(sp)
+~grp=R7
+~buf=-4
+*line 52
+move 8(R14),R7
+asr #8,R7
+and #255,R7
+*line 54
+move R7,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.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 55
+move #1,_ebflag
+*line 62
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _ef_avgr
+.text
+_ef_avgr:
+~~ef_avgr:
+~nn=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~tmpval=R7
+~vce=R6
+~i=R5
+*line 80
+move 8(R14),R6
+asr #8,R6
+and #255,R6
+*line 82
+clr.b 2+_ebuf
+*line 83
+clr _ebflag
+*line 84
+clr R7
+*line 91
+*line 91
+cmp.b #32,_ebuf
+bne L4
+cmp.b #32,1+_ebuf
+bne L4
+*line 92
+*line 93
+move #-1,R7
+*line 94
+bra L5
+L4:
+*line 95
+*line 96
+*line 97
+clr R5
+bra L8
+L9:
+*line 98
+*line 99
+*line 100
+move R5,R8
+add.l #_ebuf,R8
+cmp.b #32,(R8)
+bne L10
+*line 100
+move R5,R8
+add.l #_ebuf,R8
+move.b #48,(R8)
+*line 101
+L10:
+*line 102
+muls #10,R7
+move.l #_ebuf,R8
+move.b 0(R8,R5),R0
+ext.w R0
+add R0,R7
+add #-48,R7
+L7:
+*line 97
+add #1,R5
+L8:
+*line 97
+cmp #2,R5
+blt L9
+L6:
+*line 103
+*line 104
+*line 105
+*line 106
+tst R7
+beq L10000
+cmp #12,R7
+ble L11
+L10000:*line 106
+move #-1,R0
+bra L3
+L11:L5:
+*line 109
+move R6,R8
+add.l R8,R8
+add.l #_vce2grp,R8
+move R7,(R8)
+*line 111
+*line 112
+tst R7
+ble L12
+*line 112
+move #1,(sp)
+move R7,R8
+sub #1,R8
+add.l R8,R8
+move.l #_ins2grp,R9
+move 0(R8,R9.l),-(sp)
+and #255,(sp)
+move R6,-(sp)
+jsr _execinst
+addq.l #4,sp
+*line 113
+L12:
+*line 114
+jsr _modasg
+*line 115
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _rd_avgr
+.text
+_rd_avgr:
+~~rd_avgr:
+~nn=8
+link R14,#-4
+movem.l R5-R7,-(sp)
+~n=R7
+~grp=R6
+~buf=-4
+*line 134
+move 8(R14),R7
+and #255,R7
+*line 135
+move 8(R14),R6
+asr #8,R6
+and #255,R6
+*line 137
+clr (sp)
+jsr _vbank
+*line 138
+*line 139
+move #14,(sp)
+move R6,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 #6,sp
+move.l R0,-(sp)
+move.l _cfetp,R8
+move 2(R8),-(sp)
+move.l _cfetp,R8
+move (R8),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 10(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 _vcputsv
+adda.l #18,sp
+*line 141
+clr R0
+bra L13
+L13:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _nd_avgr
+.text
+_nd_avgr:
+~~nd_avgr:
+~k=R7
+~nn=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~n=R6
+~col=R5
+*line 160
+move 10(R14),R7
+*line 160
+move 8(R14),R6
+and #255,R6
+*line 161
+move _stccol,R5
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R5
+*line 163
+move R7,R0
+add #48,R0
+move R5,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 164
+clr.b 2+_ebuf
+*line 172
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 173
+clr.b 1+_dspbuf
+*line 175
+clr (sp)
+jsr _vbank
+*line 176
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_adbox,R9
+move 10(R8,R9.l),-(sp)
+move #12,-(sp)
+move #64,-(sp)
+move.l _asgob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 178
+jsr _advacur
+*line 179
+clr R0
+bra L14
+L14:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$73,$0
Index: alcyon/etdyn.s
===================================================================
--- alcyon/etdyn.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etdyn.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,318 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _obj8
+.globl _ctrsw
+.globl _recsw
+.globl _stccol
+.globl _grpdyn
+.globl _grpmode
+.globl _grpstat
+.globl _gdstbc
+.globl _et_dyn
+.text
+_et_dyn:
+~~et_dyn:
+~n=8
+link R14,#-4
+*line 39
+move 8(R14),R8
+add.l R8,R8
+move.l #_grpdyn,R9
+move 0(R8,R9.l),R0
+add #48,R0
+move.b R0,_ebuf
+*line 40
+clr.b 1+_ebuf
+*line 41
+move #1,_ebflag
+*line 42
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_dyn
+.text
+_ef_dyn:
+~~ef_dyn:
+~n=8
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~ival=R7
+~ep=R13
+*line 61
+clr.b 1+_ebuf
+*line 62
+move.b _ebuf,R7
+ext.w R7
+add #-48,R7
+*line 63
+clr _ebflag
+*line 65
+move R7,(sp)
+move 8(R14),-(sp)
+jsr _setdyn
+addq.l #2,sp
+*line 67
+*line 67
+tst _recsw
+beq L3
+move 8(R14),R8
+add.l R8,R8
+move.l #_grpmode,R9
+tst 0(R8,R9.l)
+beq L3
+move 8(R14),R8
+add.l R8,R8
+add.l #_grpmode,R8
+cmp #2,(R8)
+bne L3
+*line 68
+*line 69
+*line 69
+move #-1,(sp)
+move 8(R14),-(sp)
+move #13,-(sp)
+move.l _t_cur,-(sp)
+move.l _p_cur,-(sp)
+jsr _findev
+adda.l #12,sp
+move.l R0,R13
+move.l R13,R0
+beq L4
+*line 70
+*line 71
+move.b R7,7(R13)
+*line 72
+bra L5
+L4:
+*line 73
+*line 73
+move #6,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L6
+*line 74
+*line 75
+move.b #13,5(R13)
+*line 76
+move 8(R14),R0
+move.b R0,6(R13)
+*line 77
+move.b R7,7(R13)
+*line 78
+move.l _t_cur,(R13)
+*line 79
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 80
+move #3,(sp)
+move.l R13,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 81
+move #1,_ctrsw
+*line 82
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 83
+jsr _scupd
+*line 84
+L6:L5:
+*line 85
+*line 86
+L3:
+*line 87
+clr R0
+bra L2
+L2:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _rd_dyn
+.text
+_rd_dyn:
+~~rd_dyn:
+~n=8
+link R14,#-4
+*line 103
+*line 104
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L8
+*line 104
+clr (sp)
+jsr _vbank
+*line 105
+L8:
+*line 106
+move #18,(sp)
+move 8(R14),R8
+add.l R8,R8
+move.l #_grpdyn,R9
+move 0(R8,R9.l),-(sp)
+add #48,(sp)
+move 8(R14),R0
+muls #5,R0
+move R0,-(sp)
+add #6,(sp)
+move #4,-(sp)
+move.l _obj8,-(sp)
+jsr _vputc
+adda.l #10,sp
+*line 108
+clr R0
+bra L7
+L7:unlk R14
+rts
+.globl _ds_dyn
+.text
+_ds_dyn:
+~~ds_dyn:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 121
+clr R7
+bra L12
+L13:
+*line 122
+move R7,(sp)
+jsr _rd_dyn
+L11:
+*line 121
+add #1,R7
+L12:
+*line 121
+cmp #12,R7
+blt L13
+L10:L9:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _nd_dyn
+.text
+_nd_dyn:
+~~nd_dyn:
+~n=R7
+~k=R6
+link R14,#0
+movem.l R5-R7,-(sp)
+*line 138
+move 8(R14),R7
+*line 138
+move 10(R14),R6
+*line 138
+move R6,R0
+add #48,R0
+move.b R0,_ebuf
+*line 140
+*line 141
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L15
+*line 141
+clr (sp)
+jsr _vbank
+*line 142
+L15:
+*line 143
+move #98,(sp)
+move R6,-(sp)
+add #48,(sp)
+move _stccol,-(sp)
+move #4,-(sp)
+move.l _obj8,-(sp)
+jsr _vputc
+adda.l #10,sp
+*line 144
+jsr _advscur
+*line 146
+clr R0
+bra L14
+L14:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.data
Index: alcyon/etiact.s
===================================================================
--- alcyon/etiact.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etiact.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1081 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _stcrow
+.globl _stccol
+.globl _curvce
+.globl _curpnt
+.globl _curfunc
+.globl _debugsw
+.globl _idbox
+.globl _instob
+.globl _dspbuf
+.globl _vbufs
+.globl _aform
+.globl _et_iact
+.text
+_et_iact:
+~~et_iact:
+~nn=8
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+~pp=R13
+*line 56
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+move _curpnt,R0
+muls #12,R0
+add.l R0,R13
+add.l #_vbufs,R13
+add.l #242,R13
+*line 58
+move.b 7(R13),R0
+ext.w R0
+move R0,_aform
+*line 60
+move _aform,R0
+bra L3
+*line 61
+L4:
+*line 62
+L5:
+*line 63
+L6:
+*line 64
+L7:
+*line 65
+*line 66
+*line 67
+clr.b _ebuf
+bra L2
+*line 68
+*line 69
+L8:
+*line 70
+L9:
+*line 71
+L10:
+*line 72
+*line 73
+*line 74
+move.b 8(R13),R0
+ext.w R0
+move R0,(sp) 
+move.l #L11,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+bra L2
+*line 75
+*line 76
+L12:
+*line 77
+*line 78
+*line 79
+move.b 9(R13),R0
+ext.w R0
+move R0,(sp) 
+move.b 8(R13),R0
+ext.w R0
+move R0,-(sp) 
+move.l #L13,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+bra L2
+*line 80
+bra L2
+L3:cmp #7,R0
+bhi L2
+asl #2,R0
+move R0,R8
+add.l #L14,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L14:.dc.l L4
+.dc.l L5
+.dc.l L6
+.dc.l L8
+.dc.l L12
+.dc.l L9
+.dc.l L10
+.dc.l L7
+.text
+L2:
+*line 88
+move #1,_ebflag
+*line 89
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _ef_iact
+.text
+_ef_iact:
+~~ef_iact:
+~nn=8
+link R14,#0
+movem.l R4-R7/R12-R13,-(sp)
+~i=R7
+~tmp1=R6
+~tmp2=R5
+~pp=R13
+~fp=R12
+*line 109
+move _curvce,R0
+muls #3938,R0
+move.l R0,R12
+move _curfunc,R0
+muls #12,R0
+add.l R0,R12
+add.l #_vbufs,R12
+add.l #86,R12
+*line 110
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+move _curpnt,R0
+muls #12,R0
+add.l R0,R13
+add.l #_vbufs,R13
+add.l #242,R13
+*line 111
+clr _ebflag
+*line 119
+move _aform,R0
+bra L17
+*line 120
+L18:
+*line 121
+L19:
+*line 122
+*line 123
+*line 124
+clr _aform
+*line 125
+L20:
+*line 126
+L21:
+*line 127
+*line 128
+*line 129
+move _aform,R0
+move.b R0,7(R13)
+*line 130
+*line 135
+*line 136
+*line 137
+jsr _modinst
+*line 138
+clr R0
+bra L15
+*line 139
+L22:
+*line 140
+L23:
+*line 141
+L24:
+*line 142
+*line 143
+*line 144
+clr R6
+*line 145
+*line 146
+clr R7
+bra L27
+L28:
+*line 147
+muls #10,R6
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R6
+add #-48,R6
+L26:
+*line 146
+add #1,R7
+L27:
+*line 146
+cmp #2,R7
+blt L28
+L25:
+*line 147
+*line 148
+*line 149
+*line 150
+move.b 5(R12),R0
+ext.w R0
+cmp R0,R6
+blt L29
+*line 150
+move #-1,R0
+bra L15
+*line 151
+L29:
+*line 152
+move _aform,R0
+move.b R0,7(R13)
+*line 153
+move.b R6,8(R13)
+*line 154
+clr.b 9(R13)
+*line 155
+clr.b 10(R13)
+*line 156
+*line 161
+*line 162
+*line 163
+jsr _modinst
+*line 164
+clr R0
+bra L15
+*line 165
+*line 166
+L30:
+*line 167
+*line 168
+*line 169
+clr R6
+*line 170
+*line 171
+clr R7
+bra L33
+L34:
+*line 172
+muls #10,R6
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R6
+add #-48,R6
+L32:
+*line 171
+add #1,R7
+L33:
+*line 171
+cmp #2,R7
+blt L34
+L31:
+*line 172
+*line 173
+*line 174
+*line 175
+move.b 5(R12),R0
+ext.w R0
+cmp R0,R6
+blt L35
+*line 175
+move #-1,R0
+bra L15
+*line 176
+L35:
+*line 177
+clr R5
+*line 178
+*line 179
+move #3,R7
+bra L38
+L39:
+*line 180
+muls #10,R5
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R5
+add #-48,R5
+L37:
+*line 179
+add #1,R7
+L38:
+*line 179
+cmp #5,R7
+blt L39
+L36:
+*line 180
+*line 181
+*line 182
+move _aform,R0
+move.b R0,7(R13)
+*line 183
+move.b R6,8(R13)
+*line 184
+move.b R5,9(R13)
+*line 185
+clr.b 10(R13)
+*line 186
+*line 191
+*line 192
+*line 193
+jsr _modinst
+*line 194
+clr R0
+bra L15
+bra L16
+L17:cmp #7,R0
+bhi L16
+asl #2,R0
+move R0,R8
+add.l #L40,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L40:.dc.l L18
+.dc.l L20
+.dc.l L21
+.dc.l L22
+.dc.l L30
+.dc.l L23
+.dc.l L24
+.dc.l L19
+.text
+L16:L15:tst.l (sp)+
+movem.l (sp)+,R5-R7/R12-R13
+unlk R14
+rts
+.globl _rd_iact
+.text
+_rd_iact:
+~~rd_iact:
+~nn=8
+link R14,#0
+movem.l R4-R7/R12-R13,-(sp)
+~pnt=R7
+~par=R6
+~n=R5
+~pp=R13
+~s1=R12
+*line 215
+move 8(R14),R5
+and #255,R5
+*line 216
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+move _curpnt,R0
+muls #12,R0
+add.l R0,R13
+add.l #_vbufs,R13
+add.l #242,R13
+*line 217
+move.b 8(R13),R7
+ext.w R7
+*line 218
+move.b 9(R13),R6
+ext.w R6
+*line 219
+move.b 7(R13),R0
+ext.w R0
+move R0,_aform
+*line 227
+move _aform,R0
+bra L43
+*line 228
+L44:
+*line 229
+*line 230
+*line 231
+move.l #L45,R12
+bra L42
+*line 232
+*line 233
+L46:
+*line 234
+*line 235
+*line 236
+move #170,(sp)
+move.l #L47,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 237
+move.l #_dspbuf,R12
+bra L42
+*line 238
+*line 239
+L48:
+*line 240
+*line 241
+*line 242
+move #171,(sp)
+move.l #L49,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 243
+move.l #_dspbuf,R12
+bra L42
+*line 244
+*line 245
+L50:
+*line 246
+*line 247
+*line 248
+move R7,(sp)
+move.l #L51,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 249
+move.l #_dspbuf,R12
+bra L42
+*line 250
+*line 251
+*line 252
+*line 253
+L52:
+*line 254
+*line 255
+*line 256
+move R6,(sp)
+move R7,-(sp)
+move.l #L53,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 257
+*line 258
+*line 259
+cmp.b #57,8+_dspbuf
+bne L54
+*line 259
+move.b #82,8+_dspbuf
+*line 260
+L54:
+*line 261
+move.l #_dspbuf,R12
+bra L42
+*line 262
+*line 263
+L55:
+*line 264
+*line 265
+*line 266
+move #171,(sp)
+move R7,-(sp)
+move.l #L56,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 267
+move.l #_dspbuf,R12
+bra L42
+*line 268
+*line 269
+L57:
+*line 270
+*line 271
+*line 272
+move #170,(sp)
+move R7,-(sp)
+move.l #L58,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 273
+move.l #_dspbuf,R12
+bra L42
+*line 274
+*line 275
+L59:
+*line 276
+*line 277
+*line 278
+move.l #L60,R12
+bra L42
+*line 279
+bra L42
+L43:cmp #6,R0
+bhi L59
+asl #2,R0
+move R0,R8
+add.l #L61,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L61:.dc.l L44
+.dc.l L46
+.dc.l L48
+.dc.l L50
+.dc.l L52
+.dc.l L55
+.dc.l L57
+.text
+L42:
+*line 282
+clr (sp)
+jsr _vbank
+*line 283
+*line 284
+move #14,(sp)
+move.l R12,-(sp)
+move R5,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),-(sp)
+move R5,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 12(R8,R9.l),-(sp)
+add #1,(sp)
+move R5,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move R5,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+L41:tst.l (sp)+
+movem.l (sp)+,R5-R7/R12-R13
+unlk R14
+rts
+.globl _setactb
+.text
+_setactb:
+~~setactb:
+~n=8
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+~s1=R13
+*line 301
+move _aform,R0
+bra L64
+*line 302
+L65:
+*line 303
+*line 304
+*line 305
+move.l #L66,R13
+*line 306
+clr.b _ebuf
+bra L63
+*line 307
+*line 308
+L67:
+*line 309
+*line 310
+*line 311
+move #170,(sp)
+move.l #L68,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 312
+move.l #_dspbuf,R13
+*line 313
+clr.b _ebuf
+bra L63
+*line 314
+*line 315
+L69:
+*line 316
+*line 317
+*line 318
+move #171,(sp)
+move.l #L70,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 319
+move.l #_dspbuf,R13
+*line 320
+clr.b _ebuf
+bra L63
+*line 321
+*line 322
+L71:
+*line 323
+*line 324
+*line 325
+move.l #L72,R13
+*line 326
+move.b #48,_ebuf
+*line 327
+move.b #48,1+_ebuf
+*line 328
+clr.b 2+_ebuf
+bra L63
+*line 329
+*line 330
+*line 331
+*line 332
+L73:
+*line 333
+*line 334
+*line 335
+move.l #L74,R13
+*line 336
+move.b #48,_ebuf
+*line 337
+move.b #48,1+_ebuf
+*line 338
+move.b #32,2+_ebuf
+*line 339
+move.b #48,3+_ebuf
+*line 340
+move.b #48,4+_ebuf
+*line 341
+clr.b 5+_ebuf
+bra L63
+*line 342
+*line 343
+L75:
+*line 344
+*line 345
+*line 346
+move #171,(sp)
+move.l #L76,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 347
+move.l #_dspbuf,R13
+*line 348
+move.b #48,_ebuf
+*line 349
+move.b #48,1+_ebuf
+*line 350
+clr.b 2+_ebuf
+bra L63
+*line 351
+*line 352
+L77:
+*line 353
+*line 354
+*line 355
+move #170,(sp)
+move.l #L78,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 356
+move.l #_dspbuf,R13
+*line 357
+move.b #48,_ebuf
+*line 358
+move.b #48,1+_ebuf
+*line 359
+clr.b 2+_ebuf
+bra L63
+*line 360
+*line 361
+L79:
+*line 362
+*line 363
+*line 364
+move.l #L80,R13
+*line 365
+clr.b _ebuf
+bra L63
+*line 366
+bra L63
+L64:cmp #6,R0
+bhi L79
+asl #2,R0
+move R0,R8
+add.l #L81,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L81:.dc.l L65
+.dc.l L67
+.dc.l L69
+.dc.l L71
+.dc.l L73
+.dc.l L75
+.dc.l L77
+.text
+L63:
+*line 369
+clr (sp)
+jsr _vbank
+*line 370
+*line 371
+move #14,(sp)
+move.l R13,-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 12(R8,R9.l),-(sp)
+add #1,(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+L62:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _nd_iact
+.text
+_nd_iact:
+~~nd_iact:
+~nn=8
+~k=10
+link R14,#0
+movem.l R5-R7,-(sp)
+~n=R7
+~ec=R6
+*line 389
+move 8(R14),R7
+and #255,R7
+*line 391
+*line 391
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),R0
+add #5,R0
+cmp _stccol,R0
+ble L83
+*line 392
+*line 393
+*line 393
+cmp #8,10(R14)
+bne L84
+*line 394
+*line 395
+*line 396
+sub #1,_aform
+bge L85
+*line 396
+move #6,_aform
+*line 397
+L85:
+*line 398
+move R7,(sp)
+jsr _setactb
+*line 399
+clr R0
+bra L82
+*line 400
+bra L86
+L84:
+*line 401
+*line 401
+cmp #9,10(R14)
+bne L87
+*line 402
+*line 403
+*line 404
+add #1,_aform
+move _aform,R0
+cmp #6,R0
+ble L88
+*line 404
+clr _aform
+*line 405
+L88:
+*line 406
+move R7,(sp)
+jsr _setactb
+*line 407
+clr R0
+bra L82
+*line 408
+*line 409
+L87:L86:
+*line 410
+move #-1,R0
+bra L82
+*line 411
+*line 412
+*line 413
+bra L89
+L83:
+*line 414
+*line 415
+*line 416
+move _aform,R0
+bra L91
+*line 417
+L92:
+*line 418
+L93:
+*line 419
+L94:
+*line 420
+L95:
+*line 421
+*line 422
+*line 423
+move #-1,R0
+bra L82
+*line 424
+L96:
+*line 425
+L97:
+*line 426
+L98:
+*line 427
+*line 428
+*line 429
+*line 430
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),R0
+add #5,R0
+cmp _stccol,R0
+beq L10000
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),R0
+add #6,R0
+cmp _stccol,R0
+bne L99
+L10000:*line 431
+*line 432
+move 10(R14),R0
+add #48,R0
+move _stccol,R9
+move R7,R2
+asl #4,R2
+ext.l R2
+add.l #_idbox,R2
+move.l R2,R10
+move 14(R10),R10
+add #5,R10
+sub R10,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 433
+move 10(R14),R0
+add #48,R0
+move.b R0,_dspbuf
+*line 434
+clr.b 1+_dspbuf
+*line 435
+*line 436
+clr (sp)
+jsr _vbank
+*line 437
+*line 438
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 439
+*line 440
+jsr _advicur
+*line 441
+clr R0
+bra L82
+*line 442
+bra L100
+L99:
+*line 443
+*line 444
+*line 445
+move #-1,R0
+bra L82
+L100:
+*line 446
+*line 447
+*line 448
+L101:
+*line 449
+*line 450
+*line 451
+*line 452
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),R0
+add #5,R0
+cmp _stccol,R0
+bgt L102
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),R0
+add #9,R0
+cmp _stccol,R0
+blt L102
+*line 453
+*line 454
+move _stccol,R6
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),R0
+add #5,R0
+sub R0,R6
+*line 455
+*line 456
+*line 457
+cmp #2,R6
+bne L103
+*line 457
+move #-1,R0
+bra L82
+*line 458
+L103:
+*line 459
+move 10(R14),R0
+add #48,R0
+move R6,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 460
+move 10(R14),R0
+add #48,R0
+move.b R0,_dspbuf
+*line 461
+clr.b 1+_dspbuf
+*line 462
+*line 463
+*line 464
+cmp #3,R6
+bne L104
+cmp #9,10(R14)
+bne L104
+*line 464
+move.b #82,_dspbuf
+*line 465
+L104:
+*line 466
+clr (sp)
+jsr _vbank
+*line 467
+*line 468
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 469
+*line 470
+jsr _advicur
+*line 471
+*line 472
+*line 473
+cmp #1,R6
+bne L105
+*line 473
+jsr _advicur
+*line 474
+L105:
+*line 475
+clr R0
+bra L82
+*line 476
+bra L106
+L102:
+*line 477
+*line 478
+*line 479
+move #-1,R0
+bra L82
+L106:
+*line 480
+bra L90
+L91:cmp #7,R0
+bhi L90
+asl #2,R0
+move R0,R8
+add.l #L107,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L107:.dc.l L92
+.dc.l L95
+.dc.l L94
+.dc.l L98
+.dc.l L101
+.dc.l L96
+.dc.l L97
+.dc.l L93
+.text
+L90:
+*line 481
+L89:L82:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.data
+L11:.dc.b $25,$30,$32,$64,$0
+L13:.dc.b $25,$30,$32,$64,$20,$25,$30,$32,$64,$0
+L45:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$0
+L47:.dc.b $50,$61,$75,$73,$65,$20,$69,$66,$20,$6B,$65,$79,$20,$25,$63,$20,$20,$0
+L49:.dc.b $53,$74,$6F,$70,$20,$69,$66,$20,$6B,$65,$79,$20,$25,$63,$20,$20,$20,$0
+L51:.dc.b $47,$6F,$54,$6F,$20,$25,$30,$32,$64,$20,$66,$6F,$72,$65,$76,$65,$72,$20,$0
+L53:.dc.b $47,$6F,$54,$6F,$20,$25,$30,$32,$64,$20,$25,$30,$32,$64,$20,$74,$69,$6D,$65,$73,$0
+L56:.dc.b $47,$6F,$54,$6F,$20,$25,$30,$32,$64,$20,$69,$66,$20,$6B,$65,$79,$20,$25,$63,$0
+L58:.dc.b $47,$6F,$54,$6F,$20,$25,$30,$32,$64,$20,$69,$66,$20,$6B,$65,$79,$20,$25,$63,$0
+L60:.dc.b $3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$0
+L66:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$0
+L68:.dc.b $50,$61,$75,$73,$65,$20,$69,$66,$20,$6B,$65,$79,$20,$25,$63,$20,$20,$0
+L70:.dc.b $53,$74,$6F,$70,$20,$69,$66,$20,$6B,$65,$79,$20,$25,$63,$20,$20,$20,$0
+L72:.dc.b $47,$6F,$54,$6F,$20,$30,$30,$20,$66,$6F,$72,$65,$76,$65,$72,$20,$0
+L74:.dc.b $47,$6F,$54,$6F,$20,$30,$30,$20,$30,$30,$20,$74,$69,$6D,$65,$73,$0
+L76:.dc.b $47,$6F,$54,$6F,$20,$30,$30,$20,$69,$66,$20,$6B,$65,$79,$20,$25,$63,$0
+L78:.dc.b $47,$6F,$54,$6F,$20,$30,$30,$20,$69,$66,$20,$6B,$65,$79,$20,$25,$63,$0
+L80:.dc.b $3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$0
Index: alcyon/eticnf.s
===================================================================
--- alcyon/eticnf.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/eticnf.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,282 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _instob
+.globl _stccol
+.globl _curvce
+.globl _idbox
+.globl _dspbuf
+.globl _vbufs
+.globl _et_icnf
+.text
+_et_icnf:
+~~et_icnf:
+~n=8
+link R14,#-4
+*line 43
+move _curvce,R0
+muls #3938,R0
+move.l R0,R8
+move.l #_vbufs,R9
+move.b 70(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 44
+move #1,_ebflag
+*line 46
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_icnf
+.text
+_ef_icnf:
+~~ef_icnf:
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~i=R7
+~tmpval=R6
+*line 64
+clr.b 2+_ebuf
+*line 65
+clr _ebflag
+*line 67
+clr R6
+*line 69
+clr R7
+bra L6
+L7:
+*line 70
+muls #10,R6
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R6
+add #-48,R6
+L5:
+*line 69
+add #1,R7
+L6:
+*line 69
+cmp #2,R7
+blt L7
+L4:
+*line 72
+*line 73
+cmp #12,R6
+blt L8
+*line 73
+move #-1,R0
+bra L3
+*line 74
+L8:
+*line 75
+move R6,R0
+move _curvce,R1
+muls #3938,R1
+add.l #_vbufs,R1
+move.l R1,R9
+move.b R0,70(R9)
+*line 76
+move _curvce,(sp)
+jsr _dosync
+*line 77
+move R6,(sp)
+jsr _showcfg
+*line 78
+jsr _modinst
+*line 79
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _rd_icnf
+.text
+_rd_icnf:
+~~rd_icnf:
+~n=8
+link R14,#-4
+*line 95
+move _curvce,R0
+muls #3938,R0
+move.l R0,R8
+move.l #_vbufs,R9
+move.b 70(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+move.l #L10,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 97
+*line 98
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L11
+*line 98
+clr (sp)
+jsr _vbank
+*line 99
+L11:
+*line 100
+*line 101
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),-(sp)
+add #10,(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 12(R8,R9.l),-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 103
+clr R0
+bra L9
+L9:unlk R14
+rts
+.globl _nd_icnf
+.text
+_nd_icnf:
+~~nd_icnf:
+~k=R7
+~n=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~ec=R6
+~c=R5
+*line 122
+move 10(R14),R7
+*line 122
+move _stccol,R6
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R6
+*line 123
+move R7,R0
+add #48,R0
+move R6,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 124
+clr.b 2+_ebuf
+*line 126
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 127
+clr.b 1+_dspbuf
+*line 129
+*line 130
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L13
+*line 130
+clr (sp)
+jsr _vbank
+*line 131
+*line 132
+*line 133
+L13:
+*line 134
+*line 135
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 12(R8,R9.l),-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 137
+jsr _advicur
+*line 139
+clr R0
+bra L12
+L12:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$30,$32,$64,$0
+L10:.dc.b $25,$30,$32,$64,$0
Index: alcyon/etidin.s
===================================================================
--- alcyon/etidin.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etidin.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,473 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _instob
+.globl _vtcrow
+.globl _vtccol
+.globl _stccol
+.globl _curinst
+.globl _curvce
+.globl _idcfsw
+.globl _idintmp
+.globl _editsw
+.globl _curfunc
+.globl _submenu
+.globl _idbox
+.globl _instmod
+.globl _vce2grp
+.globl _dspbuf
+.globl _idefs
+.globl _vbufs
+.globl _et_idin
+.text
+_et_idin:
+~~et_idin:
+~n=8
+link R14,#-4
+*line 47
+move _curinst,(sp)
+move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 48
+move #1,_ebflag
+*line 50
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_idin
+.text
+_ef_idin:
+~~ef_idin:
+~n=8
+link R14,#0
+movem.l R4-R7/R13-R13,-(sp)
+~i=R7
+~tmpval=R6
+~j=R5
+~ip=R13
+*line 67
+*line 67
+tst _idcfsw
+beq L4
+*line 68
+*line 69
+*line 69
+cmp #22,_vtcrow
+bne L5
+*line 70
+*line 71
+*line 71
+cmp #35,_vtccol
+bge L6
+*line 72
+*line 73
+move _idintmp,(sp)
+jsr _newinst
+*line 74
+move #1,(sp)
+move _curinst,-(sp)
+move _curvce,-(sp)
+jsr _execins
+addq.l #4,sp
+*line 75
+*line 76
+*line 76
+tst _editsw
+bne L7
+*line 77
+*line 78
+*line 78
+move _curvce,R8
+add.l R8,R8
+add.l #_vce2grp,R8
+move (R8),R7
+ble L8
+*line 79
+*line 80
+clr R5
+bra L11
+L12:
+*line 81
+*line 82
+move R5,R8
+add.l R8,R8
+add.l #_vce2grp,R8
+cmp (R8),R7
+bne L13
+*line 82
+move #1,(sp)
+move _curinst,-(sp)
+move R5,-(sp)
+jsr _execins
+addq.l #4,sp
+L13:L10:
+*line 80
+add #1,R5
+L11:
+*line 80
+cmp #12,R5
+blt L12
+L9:
+*line 83
+L8:
+*line 84
+L7:
+*line 85
+*line 86
+L6:
+*line 87
+move #14,(sp)
+jsr _objclr
+*line 88
+jsr _idvlblc
+*line 89
+clr _idcfsw
+*line 90
+clr _submenu
+*line 91
+*line 92
+*line 92
+cmp #35,_vtccol
+bge L14
+*line 93
+*line 94
+jsr _allwins
+*line 95
+bra L15
+L14:
+*line 96
+*line 97
+*line 98
+move #22,(sp)
+jsr _dswin
+*line 99
+move #19,(sp)
+jsr _dswin
+L15:
+*line 100
+*line 101
+*line 102
+bra L16
+L5:
+*line 103
+*line 103
+cmp #23,_vtcrow
+bne L17
+*line 104
+*line 105
+*line 105
+tst _idintmp
+beq L18
+*line 106
+*line 107
+*line 108
+move #1969,(sp)
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,-(sp)
+move _idintmp,R0
+muls #3938,R0
+add.l #_idefs,R0
+move.l R0,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 109
+*line 110
+move _idintmp,_curinst
+*line 111
+move _curvce,R8
+add.l R8,R8
+add.l #_instmod,R8
+clr (R8)
+*line 112
+*line 113
+L18:
+*line 114
+move #14,(sp)
+jsr _objclr
+*line 115
+jsr _idvlblc
+*line 116
+clr _idcfsw
+*line 117
+clr _submenu
+*line 118
+move #22,(sp)
+jsr _dswin
+*line 119
+move #19,(sp)
+jsr _dswin
+*line 120
+*line 121
+*line 122
+tst _idintmp
+bne L19
+*line 122
+move #-1,R0
+bra L3
+*line 123
+L19:
+*line 124
+bra L20
+L17:
+*line 125
+move #-1,R0
+bra L3
+L20:L16:
+*line 126
+*line 127
+clr R0
+bra L3
+*line 128
+*line 129
+bra L21
+L4:
+*line 130
+*line 131
+*line 132
+clr.b 2+_ebuf
+*line 133
+clr _ebflag
+*line 134
+*line 135
+clr R6
+*line 136
+*line 137
+clr R7
+bra L24
+L25:
+*line 138
+muls #10,R6
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R6
+add #-48,R6
+L23:
+*line 137
+add #1,R7
+L24:
+*line 137
+cmp #2,R7
+blt L25
+L22:
+*line 138
+*line 139
+*line 140
+*line 141
+cmp #41,R6
+blt L26
+*line 141
+move #-1,R0
+bra L3
+*line 142
+L26:
+*line 143
+move R6,_idintmp
+*line 144
+jsr _idcpfch
+*line 145
+move #22,(sp)
+jsr _dswin
+*line 146
+move #14,(sp)
+move #2,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 147
+move #17,(sp)
+move #22,-(sp)
+jsr _ttcpos
+addq.l #2,sp
+*line 148
+move #1,_idcfsw
+*line 149
+move #1,_submenu
+*line 150
+clr R0
+bra L3
+L21:L3:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.globl _rd_idin
+.text
+_rd_idin:
+~~rd_idin:
+~n=8
+link R14,#-4
+*line 167
+*line 168
+tst _idcfsw
+beq L28
+*line 168
+move #-1,R0
+bra L27
+*line 169
+*line 170
+*line 171
+L28:
+*line 172
+move _curinst,(sp)
+move.l #L29,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 174
+clr (sp)
+jsr _vbank
+*line 176
+*line 177
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),-(sp)
+add #14,(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 12(R8,R9.l),-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move _curvce,R8
+add.l R8,R8
+move.l #_instmod,R9
+tst 0(R8,R9.l)
+beq L10000
+move #3,-(sp)
+bra L10002
+L10000:move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+L10002:move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 179
+clr R0
+bra L27
+L27:unlk R14
+rts
+.globl _nd_idin
+.text
+_nd_idin:
+~~nd_idin:
+~k=R7
+~n=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~ec=R6
+~c=R5
+*line 198
+move 10(R14),R7
+*line 198
+move _stccol,R6
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R6
+*line 199
+move R7,R0
+add #48,R0
+move R6,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 200
+clr.b 2+_ebuf
+*line 202
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 203
+clr.b 1+_dspbuf
+*line 205
+clr (sp)
+jsr _vbank
+*line 207
+*line 208
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 12(R8,R9.l),-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 210
+jsr _advicur
+*line 212
+clr R0
+bra L30
+L30:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$30,$32,$64,$0
+L29:.dc.b $25,$30,$32,$64,$0
Index: alcyon/etimlt.s
===================================================================
--- alcyon/etimlt.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etimlt.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,625 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _v_obtab
+.globl _v_curob
+.globl _v_nobj
+.globl _v_obpri
+.globl _instob
+.globl _stcrow
+.globl _stccol
+.globl _curvce
+.globl _curfunc
+.globl _idsrcsw
+.globl _vtcrow
+.globl _vtccol
+.globl _submenu
+.globl _idbox
+.globl _dspbuf
+.globl _srctbl
+.globl _pntptr
+.globl _vbufs
+.globl _dsimlt
+.text
+_dsimlt:
+~~dsimlt:
+~mltval=R7
+~buf=8
+~src=12
+link R14,#-12
+movem.l R6-R7,-(sp)
+~mltstr=-6
+~mlttmp=-12
+*line 62
+move 14(R14),R7
+*line 62
+move.l R14,(sp)
+add.l #-12,(sp)
+move R7,-(sp)
+jsr _fr2dec
+addq.l #2,sp
+*line 64
+move.b -9(R14),-6(R14)
+*line 66
+*line 67
+cmp.b #48,-12(R14)
+bne L2
+*line 67
+move.b #46,-5(R14)
+*line 68
+bra L3
+L2:
+*line 69
+move.b #164,-5(R14)
+L3:
+*line 71
+move.b -11(R14),-4(R14)
+*line 72
+move.b -10(R14),-3(R14)
+*line 73
+clr.b -2(R14)
+*line 75
+move.l R14,(sp)
+sub.l #6,(sp)
+move 12(R14),R8
+add.l R8,R8
+add.l R8,R8
+move.l #_srctbl,R9
+move.l 0(R8,R9.l),-(sp)
+move.l #L4,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #12,sp
+*line 83
+move.l 8(R14),R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _et_imlt
+.text
+_et_imlt:
+~~et_imlt:
+~n=8
+link R14,#0
+movem.l R7-R7/R12-R13,-(sp)
+~ip=R13
+~fp=R12
+*line 102
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 103
+move.l R13,R12
+move _curfunc,R0
+muls #12,R0
+add.l R0,R12
+add.l #86,R12
+*line 105
+move.b 4(R12),R0
+ext.w R0
+add #48,R0
+move.b R0,_ebuf
+*line 106
+move.l #1+_ebuf,(sp)
+move 2(R12),-(sp)
+jsr _fr2dec
+addq.l #2,sp
+*line 107
+clr.b 5+_ebuf
+*line 109
+move #1,_ebflag
+*line 116
+clr R0
+bra L5
+L5:tst.l (sp)+
+movem.l (sp)+,R12-R13
+unlk R14
+rts
+.globl _ef_imlt
+.text
+_ef_imlt:
+~~ef_imlt:
+~n=8
+link R14,#0
+movem.l R4-R7/R12-R13,-(sp)
+~i=R7
+~tmpval=R6
+~srctmp=R5
+~ip=R13
+~fp=R12
+*line 136
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 137
+move.l R13,R12
+move _curfunc,R0
+muls #12,R0
+add.l R0,R12
+add.l #86,R12
+*line 139
+clr.b 5+_ebuf
+*line 140
+clr _ebflag
+*line 149
+*line 149
+tst _idsrcsw
+beq L7
+*line 150
+*line 151
+clr _idsrcsw
+*line 152
+clr _submenu
+*line 153
+*line 154
+*line 154
+cmp #22,_vtcrow
+bne L8
+*line 155
+*line 156
+*line 157
+*line 158
+*line 159
+cmp #24,_vtccol
+bge L9
+*line 159
+move #11,R5
+bra L10
+L9:
+*line 160
+*line 161
+cmp #24,_vtccol
+ble L11
+cmp #28,_vtccol
+bge L11
+*line 161
+move #5,R5
+bra L12
+L11:
+*line 162
+*line 163
+cmp #28,_vtccol
+ble L13
+cmp #32,_vtccol
+bge L13
+*line 163
+move #10,R5
+bra L14
+L13:
+*line 164
+*line 165
+cmp #32,_vtccol
+ble L15
+cmp #40,_vtccol
+bge L15
+*line 165
+move #1,R5
+*line 166
+bra L16
+L15:
+*line 167
+move #2,R5
+L16:L14:L12:L10:
+*line 168
+bra L17
+L8:
+*line 169
+*line 169
+cmp #23,_vtcrow
+bne L18
+*line 170
+*line 171
+*line 172
+*line 173
+*line 174
+cmp #24,_vtccol
+bge L19
+*line 174
+move #12,R5
+bra L20
+L19:
+*line 175
+*line 176
+cmp #24,_vtccol
+ble L21
+cmp #32,_vtccol
+bge L21
+*line 176
+move #7,R5
+bra L22
+L21:
+*line 177
+*line 178
+cmp #32,_vtccol
+ble L23
+cmp #40,_vtccol
+bge L23
+*line 178
+move #8,R5
+*line 179
+bra L24
+L23:
+*line 180
+clr R5
+L24:L22:L20:
+*line 181
+bra L25
+L18:
+*line 182
+*line 183
+*line 184
+*line 185
+*line 186
+*line 187
+cmp #24,_vtccol
+bge L26
+*line 187
+move #13,R5
+bra L27
+L26:
+*line 188
+*line 189
+cmp #24,_vtccol
+ble L28
+cmp #32,_vtccol
+bge L28
+*line 189
+move #6,R5
+*line 190
+bra L29
+L28:
+*line 191
+clr R5
+L29:L27:L25:L17:
+*line 192
+*line 193
+*line 194
+move.b R5,4(R12)
+*line 195
+move #14,(sp)
+jsr _objclr
+*line 196
+jsr _idvlblc
+*line 197
+jsr _modinst
+*line 198
+move #22,(sp)
+jsr _dswin
+*line 199
+*line 200
+bra L30
+L7:
+*line 201
+*line 201
+cmp #8,_stccol
+bge L31
+*line 202
+*line 203
+move #1,_idsrcsw
+*line 204
+move #1,_submenu
+*line 205
+jsr _idvlbld
+*line 206
+move #22,(sp)
+jsr _dswin
+*line 207
+move #14,(sp)
+move #2,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 208
+move #17,(sp)
+move #22,-(sp)
+jsr _ttcpos
+addq.l #2,sp
+*line 209
+bra L32
+L31:
+*line 210
+*line 210
+cmp #8,_stccol
+ble L33
+*line 211
+*line 212
+move.l #1+_ebuf,(sp)
+jsr _dec2fr
+move R0,R6
+*line 213
+*line 214
+*line 215
+cmp #-1,R6
+bne L34
+*line 215
+move #-1,R0
+bra L6
+*line 216
+bra L35
+L34:
+*line 217
+move R6,2(R12)
+L35:
+*line 218
+*line 219
+jsr _modinst
+*line 220
+*line 221
+bra L36
+L33:
+*line 222
+move #-1,R0
+bra L6
+L36:L32:L30:
+*line 229
+clr R0
+bra L6
+L6:tst.l (sp)+
+movem.l (sp)+,R5-R7/R12-R13
+unlk R14
+rts
+.globl _rd_imlt
+.text
+_rd_imlt:
+~~rd_imlt:
+~n=8
+link R14,#0
+movem.l R7-R7/R12-R13,-(sp)
+~ip=R13
+~fp=R12
+*line 248
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 249
+move.l R13,R12
+move _curfunc,R0
+muls #12,R0
+add.l R0,R12
+add.l #86,R12
+*line 251
+move 2(R12),(sp)
+move.b 4(R12),R0
+ext.w R0
+move R0,-(sp) 
+move.l #_dspbuf,-(sp)
+jsr _dsimlt
+addq.l #6,sp
+*line 253
+*line 254
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 12(R8,R9.l),-(sp)
+add #1,(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 256
+clr R0
+bra L37
+L37:tst.l (sp)+
+movem.l (sp)+,R12-R13
+unlk R14
+rts
+.globl _nd_imlt
+.text
+_nd_imlt:
+~~nd_imlt:
+~k=R7
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~ec=R6
+*line 275
+move 10(R14),R7
+*line 275
+*line 276
+tst _idsrcsw
+beq L39
+*line 276
+move #-1,R0
+bra L38
+*line 277
+L39:
+*line 278
+*line 279
+cmp #9,_stccol
+bge L40
+*line 279
+move #-1,R0
+bra L38
+*line 280
+L40:
+*line 281
+move _stccol,R6
+add #-9,R6
+*line 283
+move R6,R0
+bra L42
+*line 284
+L43:
+*line 285
+*line 286
+*line 287
+*line 287
+cmp #8,R7
+bne L44
+*line 288
+*line 289
+move.b #45,4+_ebuf
+*line 290
+move.b #45,_dspbuf
+*line 291
+bra L45
+L44:
+*line 292
+*line 292
+cmp #9,R7
+bne L46
+*line 293
+*line 294
+move.b #43,4+_ebuf
+*line 295
+move.b #43,_dspbuf
+*line 296
+*line 297
+bra L47
+L46:
+*line 298
+move #-1,R0
+bra L38
+L47:L45:
+*line 299
+bra L41
+*line 300
+*line 301
+L48:
+*line 302
+*line 303
+*line 304
+*line 304
+tst R7
+bne L49
+*line 305
+*line 306
+move.b #48,1+_ebuf
+*line 307
+move.b #46,_dspbuf
+*line 308
+bra L50
+L49:
+*line 309
+*line 309
+cmp #1,R7
+bne L51
+*line 310
+*line 311
+move.b #49,1+_ebuf
+*line 312
+move.b #164,_dspbuf
+*line 313
+*line 314
+bra L52
+L51:
+*line 315
+move #-1,R0
+bra L38
+L52:L50:
+*line 316
+bra L41
+*line 317
+*line 318
+L53:
+*line 319
+L54:
+*line 320
+*line 321
+*line 322
+move R7,R0
+add #48,R0
+move R6,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 323
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+bra L41
+*line 324
+*line 325
+L55:
+*line 326
+*line 327
+move #-1,R0
+bra L38
+bra L41
+L42:tst R0
+beq L43
+cmp #1,R0
+beq L48
+cmp #2,R0
+beq L53
+cmp #3,R0
+beq L54
+bra L55
+L41:
+*line 330
+clr.b 5+_ebuf
+*line 331
+clr.b 1+_dspbuf
+*line 338
+clr (sp)
+jsr _vbank
+*line 340
+*line 341
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 12(R8,R9.l),-(sp)
+add #1,(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 343
+*line 344
+cmp #4,R6
+bne L56
+*line 344
+clr R0
+bra L38
+*line 345
+L56:
+*line 346
+jsr _advicur
+*line 348
+clr R0
+bra L38
+L38:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.data
+L4:.dc.b $25,$37,$2E,$37,$73,$20,$25,$73,$0
Index: alcyon/etinst.s
===================================================================
--- alcyon/etinst.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etinst.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,364 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _obj8
+.globl _ctrsw
+.globl _recsw
+.globl _stccol
+.globl _grpmode
+.globl _grpstat
+.globl _ins2grp
+.globl _gdstbc
+.globl _et_inst
+.text
+_et_inst:
+~~et_inst:
+~n=8
+link R14,#-4
+*line 43
+move 8(R14),R8
+add.l R8,R8
+move.l #_ins2grp,R9
+move 0(R8,R9.l),(sp)
+and #255,(sp)
+move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 44
+move #1,_ebflag
+*line 46
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_inst
+.text
+_ef_inst:
+~~ef_inst:
+~n=8
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~ival=R7
+~ep=R13
+*line 65
+clr.b 2+_ebuf
+*line 66
+move.b _ebuf,R7
+ext.w R7
+add #-48,R7
+muls #10,R7
+move.b 1+_ebuf,R0
+ext.w R0
+add R0,R7
+add #-48,R7
+*line 67
+clr _ebflag
+*line 69
+*line 70
+cmp #41,R7
+blt L4
+*line 70
+move #-1,R0
+bra L3
+*line 71
+L4:
+*line 72
+move R7,R0
+move 8(R14),R9
+add.l R9,R9
+add.l #_ins2grp,R9
+move (R9),R1
+and #-256,R1
+or R1,R0
+move 8(R14),R9
+add.l R9,R9
+add.l #_ins2grp,R9
+move R0,(R9)
+*line 73
+move 8(R14),(sp)
+jsr _setv2gi
+*line 74
+jsr _setinst
+*line 76
+*line 76
+tst _recsw
+beq L5
+move 8(R14),R8
+add.l R8,R8
+move.l #_grpstat,R9
+tst 0(R8,R9.l)
+beq L5
+move 8(R14),R8
+add.l R8,R8
+add.l #_grpmode,R8
+cmp #2,(R8)
+bne L5
+*line 77
+*line 78
+*line 78
+move #-1,(sp)
+move 8(R14),-(sp)
+move #4,-(sp)
+move.l _t_cur,-(sp)
+move.l _p_cur,-(sp)
+jsr _findev
+adda.l #12,sp
+move.l R0,R13
+move.l R13,R0
+beq L6
+*line 79
+*line 80
+move.b R7,7(R13)
+*line 81
+bra L7
+L6:
+*line 82
+*line 82
+move #6,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L8
+*line 83
+*line 84
+move.b #4,5(R13)
+*line 85
+move 8(R14),R0
+move.b R0,6(R13)
+*line 86
+move.b R7,7(R13)
+*line 87
+move.l _t_cur,(R13)
+*line 88
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 89
+clr (sp)
+move.l R13,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 90
+move #1,_ctrsw
+*line 91
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 92
+jsr _scupd
+*line 93
+L8:L7:
+*line 94
+*line 95
+L5:
+*line 96
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _rd_inst
+.text
+_rd_inst:
+~~rd_inst:
+~n=8
+link R14,#-8
+~buf=-4
+*line 114
+move 8(R14),R8
+add.l R8,R8
+move.l #_ins2grp,R9
+move 0(R8,R9.l),(sp)
+and #255,(sp)
+move.l #L10,-(sp)
+move.l R14,-(sp)
+sub.l #4,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 116
+*line 117
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L11
+*line 117
+clr (sp)
+jsr _vbank
+*line 118
+L11:
+*line 119
+move #18,(sp)
+move.l R14,-(sp)
+sub.l #4,(sp)
+move 8(R14),R0
+muls #5,R0
+move R0,-(sp)
+add #7,(sp)
+move #2,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 121
+clr R0
+bra L9
+L9:unlk R14
+rts
+.globl _ds_inst
+.text
+_ds_inst:
+~~ds_inst:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 134
+clr R7
+bra L15
+L16:
+*line 135
+move R7,(sp)
+jsr _rd_inst
+L14:
+*line 134
+add #1,R7
+L15:
+*line 134
+cmp #12,R7
+blt L16
+L13:L12:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _nd_inst
+.text
+_nd_inst:
+~~nd_inst:
+~n=R7
+~k=R6
+link R14,#0
+movem.l R4-R7,-(sp)
+~ec=R5
+*line 153
+move 8(R14),R7
+*line 153
+move 10(R14),R6
+*line 153
+move _stccol,R5
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R5
+*line 154
+move R6,R0
+add #48,R0
+move R5,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 156
+*line 157
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L18
+*line 157
+clr (sp)
+jsr _vbank
+*line 158
+L18:
+*line 159
+move #98,(sp)
+move R6,-(sp)
+add #48,(sp)
+move _stccol,-(sp)
+move #2,-(sp)
+move.l _obj8,-(sp)
+jsr _vputc
+adda.l #10,sp
+*line 160
+jsr _advscur
+*line 162
+clr R0
+bra L17
+L17:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$30,$32,$2E,$32,$64,$0
+L10:.dc.b $25,$30,$32,$2E,$32,$64,$0
Index: alcyon/etioas.s
===================================================================
--- alcyon/etioas.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etioas.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1096 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _obj8
+.globl _curintp
+.globl _ctrsw
+.globl _curasg
+.globl _curtun
+.globl _tmpoval
+.globl _recsw
+.globl _stccol
+.globl _dspbuf
+.globl _gdstbc
+.globl _et_ioas
+.text
+_et_ioas:
+~~et_ioas:
+~n=8
+link R14,#-4
+*line 56
+move _curasg,(sp)
+move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 57
+move #1,_ebflag
+*line 59
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_ioas
+.text
+_ef_ioas:
+~~ef_ioas:
+~n=8
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~ival=R7
+~ep=R13
+*line 77
+clr.b 2+_ebuf
+*line 78
+move.b _ebuf,R7
+ext.w R7
+add #-48,R7
+muls #10,R7
+move.b 1+_ebuf,R0
+ext.w R0
+add R0,R7
+add #-48,R7
+*line 80
+clr _ebflag
+*line 82
+*line 83
+cmp #100,R7
+blt L4
+*line 83
+move #-1,R0
+bra L3
+*line 84
+L4:
+*line 85
+move R7,R0
+move R0,_curasg
+move R0,(sp)
+jsr _getasg
+*line 86
+jsr _mpcupd
+*line 88
+*line 88
+tst _recsw
+beq L5
+*line 89
+*line 90
+*line 90
+move #-1,(sp)
+move #-1,-(sp)
+move #16,-(sp)
+move.l _t_cur,-(sp)
+move.l _p_cur,-(sp)
+jsr _findev
+adda.l #12,sp
+move.l R0,R13
+move.l R13,R0
+beq L6
+*line 91
+*line 92
+move.b R7,6(R13)
+*line 93
+bra L7
+L6:
+*line 94
+*line 94
+move #6,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L8
+*line 95
+*line 96
+move.b #16,5(R13)
+*line 97
+move.b R7,6(R13)
+*line 98
+move.l _t_cur,(R13)
+*line 99
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 100
+move #9,(sp)
+move.l R13,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 101
+move #1,_ctrsw
+*line 102
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 103
+jsr _scupd
+*line 104
+L8:L7:
+*line 105
+*line 106
+L5:
+*line 107
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _rd_ioas
+.text
+_rd_ioas:
+~~rd_ioas:
+~n=8
+link R14,#-4
+*line 123
+move _curasg,(sp)
+move.l #L10,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 125
+*line 126
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L11
+*line 126
+clr (sp)
+jsr _vbank
+*line 127
+L11:
+*line 128
+move #19,(sp)
+move.l #_dspbuf,-(sp)
+move #11,-(sp)
+move #1,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 129
+clr R0
+bra L9
+L9:unlk R14
+rts
+.globl _nd_ioas
+.text
+_nd_ioas:
+~~nd_ioas:
+~n=8
+~k=10
+link R14,#0
+movem.l R6-R7,-(sp)
+~ec=R7
+*line 144
+move _stccol,R7
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R7
+*line 145
+move 10(R14),R0
+add #48,R0
+move R7,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 147
+*line 148
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L13
+*line 148
+clr (sp)
+jsr _vbank
+*line 149
+L13:
+*line 150
+move #99,(sp)
+move 10(R14),-(sp)
+add #48,(sp)
+move _stccol,-(sp)
+move #1,-(sp)
+move.l _obj8,-(sp)
+jsr _vputc
+adda.l #10,sp
+*line 151
+jsr _advscur
+*line 152
+clr R0
+bra L12
+L12:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _et_tune
+.text
+_et_tune:
+~~et_tune:
+~n=8
+link R14,#-4
+*line 174
+move _curtun,R0
+add #48,R0
+move.b R0,_ebuf
+*line 175
+clr.b 1+_ebuf
+*line 176
+move #1,_ebflag
+*line 177
+clr R0
+bra L14
+L14:unlk R14
+rts
+.globl _ef_tune
+.text
+_ef_tune:
+~~ef_tune:
+~n=8
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~ival=R7
+~ep=R13
+*line 196
+clr.b 1+_ebuf
+*line 197
+move.b _ebuf,R7
+ext.w R7
+add #-48,R7
+*line 198
+clr _ebflag
+*line 199
+move R7,(sp)
+jsr _gettun
+*line 201
+*line 201
+tst _recsw
+beq L16
+*line 202
+*line 203
+*line 203
+move #-1,(sp)
+move #-1,-(sp)
+move #10,-(sp)
+move.l _t_cur,-(sp)
+move.l _p_cur,-(sp)
+jsr _findev
+adda.l #12,sp
+move.l R0,R13
+move.l R13,R0
+beq L17
+*line 204
+*line 205
+move.b R7,6(R13)
+*line 206
+bra L18
+L17:
+*line 207
+*line 207
+move #6,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L19
+*line 208
+*line 209
+move.b #10,5(R13)
+*line 210
+move.b R7,6(R13)
+*line 211
+move.l _t_cur,(R13)
+*line 212
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 213
+move #8,(sp)
+move.l R13,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 214
+move #1,_ctrsw
+*line 215
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 216
+jsr _scupd
+*line 217
+L19:L18:
+*line 218
+*line 219
+L16:
+*line 220
+clr R0
+bra L15
+L15:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _rd_tune
+.text
+_rd_tune:
+~~rd_tune:
+~n=8
+link R14,#-4
+*line 236
+*line 237
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L21
+*line 237
+clr (sp)
+jsr _vbank
+*line 238
+L21:
+*line 239
+move #20,(sp)
+move _curtun,-(sp)
+add #48,(sp)
+move #19,-(sp)
+move #1,-(sp)
+move.l _obj8,-(sp)
+jsr _vputc
+adda.l #10,sp
+*line 241
+clr R0
+bra L20
+L20:unlk R14
+rts
+.globl _nd_tune
+.text
+_nd_tune:
+~~nd_tune:
+~n=8
+~k=10
+link R14,#0
+movem.l R6-R7,-(sp)
+~ec=R7
+*line 256
+move 10(R14),R0
+add #48,R0
+move.b R0,_ebuf
+*line 258
+*line 259
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L23
+*line 259
+clr (sp)
+jsr _vbank
+*line 260
+L23:
+*line 261
+move #100,(sp)
+move 10(R14),-(sp)
+add #48,(sp)
+move _stccol,-(sp)
+move #1,-(sp)
+move.l _obj8,-(sp)
+jsr _vputc
+adda.l #10,sp
+*line 263
+clr R0
+bra L22
+L22:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _et_tmpo
+.text
+_et_tmpo:
+~~et_tmpo:
+~n=8
+link R14,#-4
+*line 285
+move _tmpoval,(sp)
+move.l #L25,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 286
+move #1,_ebflag
+*line 288
+clr R0
+bra L24
+L24:unlk R14
+rts
+.globl _ef_tmpo
+.text
+_ef_tmpo:
+~~ef_tmpo:
+~n=8
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~ival=R7
+~ep=R13
+*line 307
+clr.b 3+_ebuf
+*line 308
+*line 309
+move.b _ebuf,R7
+ext.w R7
+add #-48,R7
+muls #100,R7
+move.b 1+_ebuf,R0
+ext.w R0
+add #-48,R0
+muls #10,R0
+add R0,R7
+move.b 2+_ebuf,R0
+ext.w R0
+add R0,R7
+add #-48,R7
+*line 311
+clr _ebflag
+*line 313
+*line 314
+cmp #240,R7
+bgt L10000
+cmp #4,R7
+bge L27
+L10000:*line 314
+move #-1,R0
+bra L26
+*line 315
+L27:
+*line 316
+move R7,(sp)
+jsr _settmpo
+*line 318
+*line 318
+tst _recsw
+beq L28
+*line 319
+*line 320
+*line 320
+move #-1,(sp)
+move #-1,-(sp)
+move #9,-(sp)
+move.l _t_cur,-(sp)
+move.l _p_cur,-(sp)
+jsr _findev
+adda.l #12,sp
+move.l R0,R13
+move.l R13,R0
+beq L29
+*line 321
+*line 322
+move.b R7,6(R13)
+*line 323
+bra L30
+L29:
+*line 324
+*line 324
+move #6,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L31
+*line 325
+*line 326
+move.b #9,5(R13)
+*line 327
+move.b R7,6(R13)
+*line 328
+move.l _t_cur,(R13)
+*line 329
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 330
+move #7,(sp)
+move.l R13,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 331
+move #1,_ctrsw
+*line 332
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 333
+jsr _scupd
+*line 334
+L31:L30:
+*line 335
+*line 336
+L28:
+*line 337
+clr R0
+bra L26
+L26:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _rd_tmpo
+.text
+_rd_tmpo:
+~~rd_tmpo:
+~n=8
+link R14,#-4
+*line 353
+move _tmpoval,(sp)
+move.l #L33,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 355
+*line 356
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L34
+*line 356
+clr (sp)
+jsr _vbank
+*line 357
+L34:
+*line 358
+move #19,(sp)
+move.l #_dspbuf,-(sp)
+move #27,-(sp)
+move #1,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 360
+clr R0
+bra L32
+L32:unlk R14
+rts
+.globl _nd_tmpo
+.text
+_nd_tmpo:
+~~nd_tmpo:
+~n=R7
+~k=R6
+link R14,#0
+movem.l R4-R7,-(sp)
+~ec=R5
+*line 375
+move 8(R14),R7
+*line 375
+move 10(R14),R6
+*line 375
+move _stccol,R5
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R5
+*line 376
+move R6,R0
+add #48,R0
+move R5,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 378
+*line 379
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L36
+*line 379
+clr (sp)
+jsr _vbank
+*line 380
+L36:
+*line 381
+move #99,(sp)
+move R6,-(sp)
+add #48,(sp)
+move _stccol,-(sp)
+move #1,-(sp)
+move.l _obj8,-(sp)
+jsr _vputc
+adda.l #10,sp
+*line 382
+jsr _advscur
+*line 384
+clr R0
+bra L35
+L35:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _et_intp
+.text
+_et_intp:
+~~et_intp:
+~n=8
+link R14,#0
+movem.l R2-R7,-(sp)
+~th=R7
+~tl=R6
+~tt=R5
+~sc=R4
+~sf=R3
+*line 409
+move.l #$3e8,R4
+*line 410
+move.l #$64,R3
+*line 411
+move _curintp,(sp)
+jsr _fromfpu
+swap R0
+clr R0
+swap R0
+move.l R0,R5
+*line 412
+move.l R4,-(sp)
+move.l R5,-(sp)
+jsr ldiv
+addq.l #8,sp
+move R0,R7
+*line 413
+move.l R3,-(sp)
+move R7,R0
+ext.l R0
+move.l R0,-(sp)
+move.l R4,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,-(sp)
+move.l R5,R0
+sub.l (sp)+,R0
+move.l R0,-(sp)
+jsr ldiv
+addq.l #8,sp
+move R0,R6
+*line 415
+move R6,(sp)
+move R7,-(sp)
+move.l #L38,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 416
+move #1,_ebflag
+*line 418
+clr R0
+bra L37
+L37:tst.l (sp)+
+movem.l (sp)+,R3-R7
+unlk R14
+rts
+.globl _ef_intp
+.text
+_ef_intp:
+~~ef_intp:
+~n=8
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~i=R7
+~tmpval=R6
+~ep=R13
+*line 435
+move.b #46,2+_ebuf
+*line 436
+clr.b 4+_ebuf
+*line 437
+clr _ebflag
+*line 438
+clr R6
+*line 440
+clr R7
+bra L42
+L43:
+*line 441
+mulu #10,R6
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R6
+add #-48,R6
+L41:
+*line 440
+add #1,R7
+L42:
+*line 440
+cmp #2,R7
+blt L43
+L40:
+*line 443
+mulu #10,R6
+move.b 3+_ebuf,R0
+ext.w R0
+add R0,R6
+add #-48,R6
+mulu #100,R6
+*line 445
+*line 446
+cmp #-636,R6
+bls L44
+*line 446
+move #-1,R0
+bra L39
+*line 447
+L44:
+*line 448
+*line 449
+tst R6
+bne L45
+*line 449
+move #1,R6
+*line 450
+L45:
+*line 451
+move R6,(sp)
+jsr _tofpu
+move R0,_curintp
+*line 453
+*line 453
+tst _recsw
+beq L46
+*line 454
+*line 455
+*line 455
+move #-1,(sp)
+move #-1,-(sp)
+move #8,-(sp)
+move.l _t_cur,-(sp)
+move.l _p_cur,-(sp)
+jsr _findev
+adda.l #12,sp
+move.l R0,R13
+move.l R13,R0
+beq L47
+*line 456
+*line 457
+clr R0
+move _curintp,R0
+lsr #8,R0
+move.b R0,6(R13)
+*line 458
+clr R0
+move _curintp,R0
+and #255,R0
+move.b R0,7(R13)
+*line 459
+bra L48
+L47:
+*line 460
+*line 460
+move #8,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L49
+*line 461
+*line 462
+move.b #8,5(R13)
+*line 463
+move.l _t_cur,(R13)
+*line 464
+clr R0
+move _curintp,R0
+lsr #8,R0
+move.b R0,6(R13)
+*line 465
+clr R0
+move _curintp,R0
+and #255,R0
+move.b R0,7(R13)
+*line 466
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 467
+move #6,(sp)
+move.l R13,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 468
+move #1,_ctrsw
+*line 469
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 470
+jsr _scupd
+*line 471
+L49:L48:
+*line 472
+*line 473
+L46:
+*line 474
+clr R0
+bra L39
+L39:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.globl _rd_intp
+.text
+_rd_intp:
+~~rd_intp:
+~n=8
+link R14,#0
+movem.l R2-R7,-(sp)
+~th=R7
+~tl=R6
+~tt=R5
+~sc=R4
+~sf=R3
+*line 493
+move.l #$3e8,R4
+*line 494
+move.l #$64,R3
+*line 495
+move _curintp,(sp)
+jsr _fromfpu
+swap R0
+clr R0
+swap R0
+move.l R0,R5
+*line 496
+move.l R4,-(sp)
+move.l R5,-(sp)
+jsr ldiv
+addq.l #8,sp
+move R0,R7
+*line 497
+move.l R3,-(sp)
+move R7,R0
+ext.l R0
+move.l R0,-(sp)
+move.l R4,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,-(sp)
+move.l R5,R0
+sub.l (sp)+,R0
+move.l R0,-(sp)
+jsr ldiv
+addq.l #8,sp
+move R0,R6
+*line 499
+move R6,(sp)
+move R7,-(sp)
+move.l #L51,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 501
+clr (sp)
+jsr _vbank
+*line 503
+move #20,(sp)
+move.l #_dspbuf,-(sp)
+move #35,-(sp)
+move #1,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 505
+clr R0
+bra L50
+L50:tst.l (sp)+
+movem.l (sp)+,R3-R7
+unlk R14
+rts
+.globl _nd_intp
+.text
+_nd_intp:
+~~nd_intp:
+~n=8
+~k=10
+link R14,#0
+movem.l R6-R7,-(sp)
+~ec=R7
+*line 520
+move _stccol,R7
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R7
+*line 522
+*line 523
+cmp #2,R7
+bne L53
+*line 523
+move #-1,R0
+bra L52
+*line 524
+L53:
+*line 525
+*line 526
+tst R7
+bne L54
+cmp #6,10(R14)
+ble L54
+*line 526
+move #-1,R0
+bra L52
+*line 527
+L54:
+*line 528
+*line 529
+cmp #1,R7
+bne L55
+cmp.b #54,_ebuf
+bne L55
+cmp #4,10(R14)
+ble L55
+*line 529
+move #-1,R0
+bra L52
+*line 530
+L55:
+*line 531
+move 10(R14),R0
+add #48,R0
+move R7,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 532
+move.b #46,2+_ebuf
+*line 533
+clr.b 4+_ebuf
+*line 535
+move 10(R14),R0
+add #48,R0
+move.b R0,_dspbuf
+*line 536
+clr.b 1+_dspbuf
+*line 538
+clr (sp)
+jsr _vbank
+*line 540
+move #100,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move #1,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 542
+jsr _advscur
+*line 544
+*line 545
+cmp #37,_stccol
+bne L56
+*line 545
+jsr _advscur
+*line 546
+L56:
+*line 547
+clr R0
+bra L52
+L52:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$30,$32,$2E,$32,$64,$0
+L10:.dc.b $25,$30,$32,$2E,$32,$64,$0
+L25:.dc.b $25,$30,$33,$2E,$33,$64,$0
+L33:.dc.b $25,$30,$33,$2E,$33,$64,$0
+L38:.dc.b $25,$30,$32,$64,$2E,$25,$64,$0
+L51:.dc.b $25,$30,$32,$64,$2E,$25,$64,$0
Index: alcyon/etiosc.s
===================================================================
--- alcyon/etiosc.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etiosc.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,2376 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _stcrow
+.globl _stccol
+.globl _curvce
+.globl _idbox
+.globl _instob
+.globl _dspbuf
+.globl _vbufs
+.globl _cents
+.globl _bform
+.globl _notes
+.data
+_notes:
+.dc.w $2
+.dc.w $2
+.dc.w $3
+.dc.w $3
+.dc.w $4
+.dc.w $5
+.dc.w $5
+.dc.w $6
+.dc.w $6
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.globl _pitches
+.data
+_pitches:
+.dc.w $384
+.dc.w $44C
+.dc.w $0
+.dc.w $C8
+.dc.w $190
+.dc.w $1F4
+.dc.w $2BC
+.globl _ratio
+.data
+_ratio:
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FB50
+.dc.w $F892
+.dc.w $F6A0
+.dc.w $F51E
+.dc.w $F3E2
+.dc.w $F2D7
+.dc.w $F1F0
+.dc.w $F124
+.dc.w $0
+.dc.w $4B0
+.dc.w $0
+.dc.w $FD42
+.dc.w $FB50
+.dc.w $F9CE
+.dc.w $F892
+.dc.w $F787
+.dc.w $F6A0
+.dc.w $F5D4
+.dc.w $0
+.dc.w $76E
+.dc.w $2BE
+.dc.w $0
+.dc.w $FE0E
+.dc.w $FC8C
+.dc.w $FB50
+.dc.w $FA45
+.dc.w $F95E
+.dc.w $F892
+.dc.w $0
+.dc.w $960
+.dc.w $4B0
+.dc.w $1F2
+.dc.w $0
+.dc.w $FE7E
+.dc.w $FD42
+.dc.w $FC37
+.dc.w $FB50
+.dc.w $FA84
+.dc.w $0
+.dc.w $AE2
+.dc.w $632
+.dc.w $374
+.dc.w $182
+.dc.w $0
+.dc.w $FEC4
+.dc.w $FDB9
+.dc.w $FCD2
+.dc.w $FC06
+.dc.w $0
+.dc.w $C1E
+.dc.w $76E
+.dc.w $4B0
+.dc.w $2BE
+.dc.w $13C
+.dc.w $0
+.dc.w $FEF5
+.dc.w $FE0E
+.dc.w $FD42
+.dc.w $0
+.dc.w $D29
+.dc.w $879
+.dc.w $5BB
+.dc.w $3C9
+.dc.w $247
+.dc.w $10B
+.dc.w $0
+.dc.w $FF19
+.dc.w $FE4D
+.dc.w $0
+.dc.w $E10
+.dc.w $960
+.dc.w $6A2
+.dc.w $4B0
+.dc.w $32E
+.dc.w $1F2
+.dc.w $E7
+.dc.w $0
+.dc.w $FF34
+.dc.w $0
+.dc.w $EDC
+.dc.w $A2C
+.dc.w $76E
+.dc.w $57C
+.dc.w $3FA
+.dc.w $2BE
+.dc.w $1B3
+.dc.w $CC
+.dc.w $0
+.globl _sharps
+.data
+_sharps:
+.dc.w $7
+.dc.w $9
+.dc.w $7
+.dc.w $9
+.dc.w $7
+.dc.w $7
+.dc.w $9
+.dc.w $7
+.dc.w $9
+.dc.w $7
+.dc.w $9
+.dc.w $7
+.globl _shrpflt
+.data
+_shrpflt:
+.dc.w $0
+.dc.w $FF9C
+.dc.w $64
+.globl _sfdsp
+.data
+_sfdsp:
+.dc.b $20
+.dc.b $A9
+.dc.b $A8
+.even
+.data
+L1:.dc.b $2B,$30,$30,$30,$30,$0
+.text
+.data
+L3:.dc.b $31,$2F,$31,$0
+.text
+.data
+L5:.dc.b $30,$30,$2E,$30,$0
+.even
+.text
+.data
+L7:.dc.b $30,$43,$20,$30,$30,$0
+.text
+.globl _ndvals
+.data
+_ndvals:
+.dc.w $0
+.dc.w $0
+.dc.w $4B0
+.dc.w $76E
+.dc.w $960
+.dc.w $AE2
+.dc.w $C1E
+.dc.w $D29
+.dc.w $E10
+.dc.w $EDC
+.globl _int2rat
+.text
+_int2rat:
+~~int2rat:
+~rat=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~den=R7
+~inum=R6
+~num=R5
+*line 81
+move.b #49,_ebuf
+*line 82
+move.b #47,1+_ebuf
+*line 83
+move.b #49,2+_ebuf
+*line 84
+clr.b 3+_ebuf
+*line 86
+move #1,R5
+bra L12
+L13:
+*line 87
+*line 88
+move R5,R6
+muls #10,R6
+*line 89
+*line 90
+move #1,R7
+bra L16
+L17:
+*line 91
+*line 92
+*line 92
+move R6,R8
+add R7,R8
+add.l R8,R8
+move.l #_ratio,R9
+move 0(R8,R9.l),R0
+cmp 8(R14),R0
+bne L18
+*line 93
+*line 94
+move R5,R0
+add #48,R0
+move.b R0,_ebuf
+*line 95
+move R7,R0
+add #48,R0
+move.b R0,2+_ebuf
+bra L9
+*line 96
+*line 97
+L18:L15:
+*line 90
+add #1,R7
+L16:
+*line 90
+cmp #10,R7
+blt L17
+L14:
+*line 98
+L11:
+*line 86
+add #1,R5
+L12:
+*line 86
+cmp #10,R5
+blt L13
+L10:L9:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _cnvc2p
+.text
+_cnvc2p:
+~~cnvc2p:
+~buf=8
+~cv=12
+link R14,#-8
+~rem=-2
+~tmp=-4
+*line 117
+sub #160,12(R14)
+*line 118
+move 12(R14),R0
+ext.l R0
+divs #1200,R0
+move.l 8(R14),R9
+move.b R0,(R9)
+*line 119
+move 12(R14),R0
+move.l 8(R14),R9
+move.b (R9),R1
+ext.w R1
+muls #1200,R1
+sub R1,R0
+move R0,-2(R14)
+*line 120
+move -2(R14),R0
+ext.l R0
+divs #100,R0
+move R0,-4(R14)
+*line 121
+move -4(R14),R0
+muls #100,R0
+sub R0,-2(R14)
+*line 122
+move -4(R14),R8
+add.l R8,R8
+move.l #_notes,R9
+move 0(R8,R9.l),R0
+move.l 8(R14),R9
+move.b R0,1(R9)
+*line 123
+move -4(R14),R8
+add.l R8,R8
+move.l #_sharps,R9
+move 0(R8,R9.l),R0
+move.l 8(R14),R9
+move.b R0,2(R9)
+*line 124
+move -2(R14),R0
+ext.l R0
+divs #10,R0
+move.l 8(R14),R9
+move.b R0,3(R9)
+*line 125
+move -2(R14),R0
+move.l 8(R14),R9
+move.b 3(R9),R1
+ext.w R1
+muls #10,R1
+sub R1,R0
+move.l 8(R14),R9
+move.b R0,4(R9)
+L19:unlk R14
+rts
+.globl _cnvp2c
+.text
+_cnvp2c:
+~~cnvp2c:
+link R14,#-4
+*line 150
+*line 151
+cmp.b #9,_ebuf
+bne L21
+*line 151
+*line 152
+cmp.b #2,1+_ebuf
+ble L22
+*line 152
+move #-1,R0
+bra L20
+bra L23
+L22:
+*line 153
+*line 154
+cmp.b #2,1+_ebuf
+bne L24
+*line 154
+*line 155
+cmp.b #7,2+_ebuf
+beq L25
+*line 155
+move #-1,R0
+bra L20
+bra L26
+L25:
+*line 156
+*line 157
+tst.b 3+_ebuf
+bne L10000
+tst.b 4+_ebuf
+beq L27
+L10000:*line 157
+move #-1,R0
+bra L20
+*line 158
+L27:L26:L24:L23:L21:
+*line 159
+*line 160
+move.b _ebuf,R0
+ext.w R0
+muls #1200,R0
+move.b 1+_ebuf,R1
+ext.w R1
+move R1,R9
+add.l R9,R9
+add.l #_pitches,R9
+move (R9),R1
+add R1,R0
+move.b 2+_ebuf,R1
+ext.w R1
+sub #7,R1
+move R1,R9
+add.l R9,R9
+add.l #_shrpflt,R9
+move (R9),R1
+add R1,R0
+move.b 3+_ebuf,R1
+ext.w R1
+muls #10,R1
+add R1,R0
+move.b 4+_ebuf,R1
+ext.w R1
+add R1,R0
+add #160,R0
+move R0,_cents
+*line 162
+clr R0
+bra L20
+L20:unlk R14
+rts
+.globl _et_iosc
+.text
+_et_iosc:
+~~et_iosc:
+~nn=8
+link R14,#0
+movem.l R2-R7/R13-R13,-(sp)
+~ip=R13
+~val=R7
+~ctl=R6
+~fh=R5
+~fl=R4
+~v=R3
+*line 181
+move 8(R14),R3
+asr #8,R3
+and #3,R3
+*line 182
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 184
+move R3,R0
+bra L30
+*line 185
+L31:
+*line 186
+*line 187
+*line 188
+move 78(R13),R7
+*line 189
+move.b 74(R13),R6
+ext.w R6
+bra L29
+*line 190
+*line 191
+L32:
+*line 192
+*line 193
+*line 194
+move 80(R13),R7
+*line 195
+move.b 75(R13),R6
+ext.w R6
+bra L29
+*line 196
+*line 197
+L33:
+*line 198
+*line 199
+*line 200
+move 82(R13),R7
+*line 201
+move.b 76(R13),R6
+ext.w R6
+bra L29
+*line 202
+*line 203
+L34:
+*line 204
+*line 205
+*line 206
+move 84(R13),R7
+*line 207
+move.b 77(R13),R6
+ext.w R6
+bra L29
+*line 208
+bra L29
+L30:tst R0
+beq L31
+cmp #1,R0
+beq L32
+cmp #2,R0
+beq L33
+cmp #3,R0
+beq L34
+bra L29
+L29:
+*line 212
+move R6,R0
+and #3,R0
+move R0,_bform
+*line 214
+move _bform,R0
+bra L36
+*line 215
+L37:
+*line 216
+*line 217
+*line 218
+*line 219
+tst R7
+bge L10001
+move #45,(sp)
+bra L10003
+L10001:move #43,(sp)
+L10003:tst R7
+bge L10004
+move R7,R0
+neg R0
+bra L10006
+L10004:move R7,R0
+L10006:asr #1,R0
+move R0,-(sp)
+move.l #L38,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 220
+*line 221
+move #1,_ebflag
+*line 222
+clr R0
+bra L28
+*line 223
+L39:
+*line 224
+*line 225
+*line 226
+move R7,R0
+asr #1,R0
+move R0,(sp)
+jsr _int2rat
+*line 227
+move #1,_ebflag
+*line 228
+clr R0
+bra L28
+*line 229
+L40:
+*line 230
+*line 231
+*line 232
+move R7,R5
+asr R5
+ext.l R5
+divs #10,R5
+*line 233
+move R7,R4
+asr R4
+move R5,R0
+muls #10,R0
+sub R0,R4
+*line 234
+*line 235
+move R4,(sp)
+move R5,-(sp)
+move.l #L41,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 236
+move #1,_ebflag
+*line 237
+clr R0
+bra L28
+*line 238
+L42:
+*line 239
+*line 240
+*line 241
+move R7,R0
+asr #1,R0
+move R0,(sp)
+move.l #_ebuf,-(sp)
+jsr _cnvc2p
+addq.l #4,sp
+*line 242
+move #1,_ebflag
+*line 243
+clr R0
+bra L28
+bra L35
+L36:tst R0
+beq L37
+cmp #1,R0
+beq L39
+cmp #2,R0
+beq L40
+cmp #3,R0
+beq L42
+bra L35
+L35:L28:tst.l (sp)+
+movem.l (sp)+,R3-R7/R13-R13
+unlk R14
+rts
+.globl _setoval
+.text
+_setoval:
+~~setoval:
+~ip=R13
+~v=R7
+~val=R6
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+*line 260
+move.l 8(R14),R13
+*line 260
+move 12(R14),R7
+*line 260
+move 14(R14),R6
+*line 260
+move R7,R0
+bra L45
+*line 261
+L46:
+*line 262
+*line 263
+*line 264
+move R6,R0
+asl #1,R0
+move R0,78(R13)
+*line 265
+move.b 74(R13),R0
+ext.w R0
+and #-4,R0
+or _bform,R0
+move.b R0,74(R13)
+bra L44
+*line 266
+*line 267
+L47:
+*line 268
+*line 269
+*line 270
+move R6,R0
+asl #1,R0
+move R0,80(R13)
+*line 271
+move.b 75(R13),R0
+ext.w R0
+and #-4,R0
+or _bform,R0
+move.b R0,75(R13)
+bra L44
+*line 272
+*line 273
+L48:
+*line 274
+*line 275
+*line 276
+move R6,R0
+asl #1,R0
+move R0,82(R13)
+*line 277
+move.b 76(R13),R0
+ext.w R0
+and #-4,R0
+or _bform,R0
+move.b R0,76(R13)
+bra L44
+*line 278
+*line 279
+L49:
+*line 280
+*line 281
+*line 282
+move R6,R0
+asl #1,R0
+move R0,84(R13)
+*line 283
+move.b 77(R13),R0
+ext.w R0
+and #-4,R0
+or _bform,R0
+move.b R0,77(R13)
+bra L44
+*line 284
+bra L44
+L45:tst R0
+beq L46
+cmp #1,R0
+beq L47
+cmp #2,R0
+beq L48
+cmp #3,R0
+beq L49
+bra L44
+L44:
+*line 287
+*line 288
+move R7,R0
+muls #12,R0
+move.b 93(R13,R0.l),R0
+ext.w R0
+and #-5,R0
+btst #1,1+_bform
+beq L10007
+move #4,R1
+bra L10009
+L10007:clr R1
+L10009:or R1,R0
+move.l R13,R9
+move R7,R2
+muls #12,R2
+add.l R2,R9
+move.b R0,93(R9)
+L43:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.globl _ef_iosc
+.text
+_ef_iosc:
+~~ef_iosc:
+~nn=8
+link R14,#0
+movem.l R4-R7/R13-R13,-(sp)
+~ip=R13
+~v=R7
+~i=R6
+~tmp=R5
+*line 307
+move 8(R14),R7
+asr #8,R7
+and #3,R7
+*line 308
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 309
+clr _ebflag
+*line 311
+move _bform,R0
+bra L52
+*line 312
+L53:
+*line 313
+*line 314
+*line 315
+clr R5
+*line 316
+*line 317
+clr R6
+bra L56
+L57:
+*line 318
+muls #10,R5
+move.l #_ebuf,R8
+move.b 0(R8,R6),R0
+ext.w R0
+add R0,R5
+add #-48,R5
+L55:
+*line 317
+add #1,R6
+L56:
+*line 317
+cmp #4,R6
+blt L57
+L54:
+*line 318
+*line 319
+*line 320
+*line 321
+cmp.b #45,4+_ebuf
+bne L58
+*line 321
+move R5,R0
+neg R0
+move R0,R5
+*line 322
+L58:
+*line 323
+move R5,(sp)
+move R7,-(sp)
+move.l R13,-(sp)
+jsr _setoval
+addq.l #6,sp
+*line 324
+jsr _modinst
+*line 325
+clr R0
+bra L50
+*line 326
+L59:
+*line 327
+*line 328
+*line 329
+move.b _ebuf,R0
+ext.w R0
+add #-48,R0
+move R0,R8
+add.l R8,R8
+add.l #_ndvals,R8
+move (R8),R5
+move.b 2+_ebuf,R0
+ext.w R0
+add #-48,R0
+move R0,R8
+add.l R8,R8
+add.l #_ndvals,R8
+move (R8),R0
+sub R0,R5
+*line 330
+*line 331
+move R5,(sp)
+move R7,-(sp)
+move.l R13,-(sp)
+jsr _setoval
+addq.l #6,sp
+*line 332
+jsr _modinst
+*line 333
+clr R0
+bra L50
+*line 334
+*line 335
+L60:
+*line 336
+*line 337
+*line 338
+clr R5
+*line 339
+*line 340
+clr R6
+bra L63
+L64:
+*line 341
+muls #10,R5
+move.l #_ebuf,R8
+move.b 0(R8,R6),R0
+ext.w R0
+add R0,R5
+add #-48,R5
+L62:
+*line 340
+add #1,R6
+L63:
+*line 340
+cmp #2,R6
+blt L64
+L61:
+*line 341
+*line 342
+*line 343
+muls #10,R5
+move.b 3+_ebuf,R0
+ext.w R0
+add R0,R5
+add #-48,R5
+*line 344
+*line 345
+*line 346
+cmp #159,R5
+ble L65
+*line 346
+move #-1,R0
+bra L50
+*line 347
+L65:
+*line 348
+move R5,(sp)
+move R7,-(sp)
+move.l R13,-(sp)
+jsr _setoval
+addq.l #6,sp
+*line 349
+jsr _modinst
+*line 350
+clr R0
+bra L50
+*line 351
+L66:
+*line 352
+*line 353
+*line 354
+*line 355
+jsr _cnvp2c
+cmp #-1,R0
+bne L67
+*line 355
+move #-1,R0
+bra L50
+*line 356
+L67:
+*line 357
+move _cents,(sp)
+move R7,-(sp)
+move.l R13,-(sp)
+jsr _setoval
+addq.l #6,sp
+*line 358
+jsr _modinst
+*line 359
+clr R0
+bra L50
+bra L51
+L52:tst R0
+beq L53
+cmp #1,R0
+beq L59
+cmp #2,R0
+beq L60
+cmp #3,R0
+beq L66
+bra L51
+L51:L50:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.globl _rd_iosc
+.text
+_rd_iosc:
+~~rd_iosc:
+~nn=8
+link R14,#-4
+movem.l R2-R7/R13-R13,-(sp)
+~ip=R13
+~val=R7
+~ctl=R6
+~fh=R5
+~fl=R4
+~v=R3
+~n=-2
+~ocs=-4
+*line 381
+move 8(R14),R3
+asr #8,R3
+and #3,R3
+*line 382
+move 8(R14),R0
+and #255,R0
+move R0,-2(R14)
+*line 383
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 385
+move R3,R0
+bra L70
+*line 386
+L71:
+*line 387
+*line 388
+*line 389
+move 78(R13),R7
+*line 390
+move.b 74(R13),R6
+ext.w R6
+bra L69
+*line 391
+*line 392
+L72:
+*line 393
+*line 394
+*line 395
+move 80(R13),R7
+*line 396
+move.b 75(R13),R6
+ext.w R6
+bra L69
+*line 397
+*line 398
+L73:
+*line 399
+*line 400
+*line 401
+move 82(R13),R7
+*line 402
+move.b 76(R13),R6
+ext.w R6
+bra L69
+*line 403
+*line 404
+L74:
+*line 405
+*line 406
+*line 407
+move 84(R13),R7
+*line 408
+move.b 77(R13),R6
+ext.w R6
+bra L69
+*line 409
+bra L69
+L70:tst R0
+beq L71
+cmp #1,R0
+beq L72
+cmp #2,R0
+beq L73
+cmp #3,R0
+beq L74
+bra L69
+L69:
+*line 413
+move R6,R0
+and #3,R0
+move R0,_bform
+*line 414
+cmp #3,R3
+bne L10010
+move #32,R0
+bra L10012
+L10010:btst #2,R6
+beq L10013
+move #83,R0
+bra L10015
+L10013:move #115,R0
+L10015:L10012:move.b R0,-4(R14)
+*line 416
+move _bform,R0
+bra L76
+*line 417
+L77:
+*line 418
+*line 419
+*line 420
+*line 421
+*line 422
+*line 423
+move.b -4(R14),R0
+ext.w R0
+move R0,(sp) 
+tst R7
+bge L10016
+move R7,R0
+neg R0
+bra L10018
+L10016:move R7,R0
+L10018:asr #1,R0
+move R0,-(sp)
+tst R7
+bge L10019
+move #45,-(sp)
+bra L10021
+L10019:move #43,-(sp)
+L10021:move.l #L78,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+adda.l #12,sp
+bra L75
+*line 424
+*line 425
+L79:
+*line 426
+*line 427
+*line 428
+move R7,R0
+asr #1,R0
+move R0,(sp)
+jsr _int2rat
+*line 429
+move.b -4(R14),R0
+ext.w R0
+move R0,(sp) 
+move.b 2+_ebuf,R0
+ext.w R0
+move R0,-(sp) 
+move.b _ebuf,R0
+ext.w R0
+move R0,-(sp) 
+move.l #L80,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+adda.l #12,sp
+bra L75
+*line 430
+*line 431
+L81:
+*line 432
+*line 433
+*line 434
+move R7,R5
+asr R5
+ext.l R5
+divs #10,R5
+*line 435
+move R7,R4
+asr R4
+move R5,R0
+muls #10,R0
+sub R0,R4
+*line 436
+*line 437
+move.b -4(R14),R0
+ext.w R0
+move R0,(sp) 
+move R4,-(sp)
+move R5,-(sp)
+move.l #L82,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+adda.l #12,sp
+bra L75
+*line 438
+*line 439
+L83:
+*line 440
+*line 441
+*line 442
+move.l #L84,(sp)
+move.l #_dspbuf,-(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 443
+move R7,R0
+asr #1,R0
+move R0,(sp)
+move.l #4+_dspbuf,-(sp)
+jsr _cnvc2p
+addq.l #4,sp
+*line 444
+add.b #48,4+_dspbuf
+*line 445
+add.b #65,5+_dspbuf
+*line 446
+move.b 6+_dspbuf,R0
+ext.w R0
+ext.l R0
+add.l #_sfdsp,R0
+move.l R0,R8
+move.b -7(R8),6+_dspbuf
+*line 447
+add.b #48,7+_dspbuf
+*line 448
+add.b #48,8+_dspbuf
+*line 449
+move.b #32,9+_dspbuf
+*line 450
+move.b -4(R14),10+_dspbuf
+*line 451
+clr.b 11+_dspbuf
+bra L75
+*line 452
+bra L75
+L76:tst R0
+beq L77
+cmp #1,R0
+beq L79
+cmp #2,R0
+beq L81
+cmp #3,R0
+beq L83
+bra L75
+L75:
+*line 455
+*line 456
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L85
+*line 456
+clr (sp)
+jsr _vbank
+*line 457
+L85:
+*line 458
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move #36,-(sp)
+move R3,-(sp)
+add #18,(sp)
+move -2(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move -2(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 460
+clr R0
+bra L68
+L68:tst.l (sp)+
+movem.l (sp)+,R3-R7/R13-R13
+unlk R14
+rts
+.globl _setoscb
+.text
+_setoscb:
+~~setoscb:
+~n=8
+~v=10
+link R14,#0
+movem.l R3-R7/R13-R13,-(sp)
+~ip=R13
+~bfm=R7
+~ctl=R6
+~val=R5
+~ocs=R4
+*line 479
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 481
+move 10(R14),R0
+bra L88
+*line 482
+L89:
+*line 483
+*line 484
+*line 485
+move.b 74(R13),R6
+ext.w R6
+*line 486
+move 78(R13),R5
+bra L87
+*line 487
+*line 488
+L90:
+*line 489
+*line 490
+*line 491
+move.b 75(R13),R6
+ext.w R6
+*line 492
+move 80(R13),R5
+bra L87
+*line 493
+*line 494
+L91:
+*line 495
+*line 496
+*line 497
+move.b 76(R13),R6
+ext.w R6
+*line 498
+move 82(R13),R5
+bra L87
+*line 499
+*line 500
+L92:
+*line 501
+*line 502
+*line 503
+move.b 77(R13),R6
+ext.w R6
+*line 504
+move 84(R13),R5
+bra L87
+*line 505
+bra L87
+L88:tst R0
+beq L89
+cmp #1,R0
+beq L90
+cmp #2,R0
+beq L91
+cmp #3,R0
+beq L92
+bra L87
+L87:
+*line 508
+cmp #3,10(R14)
+bne L10022
+move #32,R0
+bra L10024
+L10022:btst #2,R6
+beq L10025
+move #83,R0
+bra L10027
+L10025:move #115,R0
+L10027:L10024:move.b R0,R4
+*line 510
+move R6,R7
+and #3,R7
+*line 513
+move _bform,R0
+bra L94
+*line 514
+L95:
+*line 515
+*line 516
+*line 517
+*line 517
+cmp #1,R7
+beq L10028
+tst R7
+bne L96
+L10028:*line 518
+*line 519
+*line 520
+tst R5
+bge L10029
+move #45,(sp)
+bra L10031
+L10029:move #43,(sp)
+L10031:tst R5
+bge L10032
+move R5,R0
+neg R0
+bra L10034
+L10032:move R5,R0
+L10034:asr #1,R0
+move R0,-(sp)
+move.l #L97,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 521
+*line 522
+*line 523
+*line 524
+*line 525
+move.b R4,R0
+ext.w R0
+move R0,(sp) 
+tst R5
+bge L10035
+move R5,R0
+neg R0
+bra L10037
+L10035:move R5,R0
+L10037:asr #1,R0
+move R0,-(sp)
+tst R5
+bge L10038
+move #45,-(sp)
+bra L10040
+L10038:move #43,-(sp)
+L10040:move.l #L98,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+adda.l #12,sp
+*line 526
+bra L99
+L96:
+*line 527
+*line 528
+*line 529
+move.l #L100,(sp)
+move.l #_ebuf,-(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 530
+move.b R4,R0
+ext.w R0
+move R0,(sp) 
+move.l #L1,-(sp)
+move.l #L101,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+adda.l #12,sp
+L99:
+*line 531
+*line 532
+bra L93
+*line 533
+*line 534
+L102:
+*line 535
+*line 536
+*line 537
+*line 537
+cmp #1,R7
+bne L103
+*line 538
+*line 539
+move R5,R0
+asr #1,R0
+move R0,(sp)
+jsr _int2rat
+*line 540
+*line 541
+*line 542
+move.b R4,R0
+ext.w R0
+move R0,(sp) 
+move.b 2+_ebuf,R0
+ext.w R0
+move R0,-(sp) 
+move.b _ebuf,R0
+ext.w R0
+move R0,-(sp) 
+move.l #L104,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+adda.l #12,sp
+*line 543
+bra L105
+L103:
+*line 544
+*line 545
+*line 546
+move.l #L3,(sp)
+move.l #_ebuf,-(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 547
+move.b R4,R0
+ext.w R0
+move R0,(sp) 
+move.l #L3,-(sp)
+move.l #L106,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+adda.l #12,sp
+L105:
+*line 548
+*line 549
+bra L93
+*line 550
+*line 551
+*line 552
+L107:
+*line 553
+*line 554
+*line 555
+move.l #L5,(sp)
+move.l #_ebuf,-(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 556
+move.b R4,R0
+ext.w R0
+move R0,(sp) 
+move.l #L5,-(sp)
+move.l #L108,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+adda.l #12,sp
+bra L93
+*line 557
+*line 558
+L109:
+*line 559
+*line 560
+*line 561
+clr.b _ebuf
+*line 562
+move.b #2,1+_ebuf
+*line 563
+move.b #7,2+_ebuf
+*line 564
+clr.b 3+_ebuf
+*line 565
+clr.b 4+_ebuf
+*line 566
+*line 567
+move.b R4,R0
+ext.w R0
+move R0,(sp) 
+move.l #L7,-(sp)
+move.l #L110,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+adda.l #12,sp
+bra L93
+*line 568
+bra L93
+L94:tst R0
+beq L95
+cmp #1,R0
+beq L102
+cmp #2,R0
+beq L107
+cmp #3,R0
+beq L109
+bra L93
+L93:
+*line 571
+move #1,_ebflag
+*line 573
+*line 574
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L111
+*line 574
+clr (sp)
+jsr _vbank
+*line 575
+L111:
+*line 576
+*line 577
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move #36,-(sp)
+move _stcrow,-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+L86:tst.l (sp)+
+movem.l (sp)+,R4-R7/R13-R13
+unlk R14
+rts
+.globl _setosyn
+.text
+_setosyn:
+~~setosyn:
+~n=8
+~v=10
+~t=12
+link R14,#0
+movem.l R7-R7/R12-R13,-(sp)
+~ip=R13
+~sc=R12
+*line 595
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 597
+*line 598
+cmp #21,_stcrow
+beq L112
+*line 599
+*line 600
+tst 12(R14)
+beq L10041
+move.l #L113,R0
+bra L10043
+L10041:move.l #L114,R0
+L10043:move.l R0,R12
+*line 602
+move 10(R14),R0
+bra L116
+*line 603
+L117:
+*line 604
+*line 605
+*line 606
+move.b 74(R13),R0
+ext.w R0
+and #-5,R0
+tst 12(R14)
+beq L10044
+move #4,R1
+bra L10046
+L10044:clr R1
+L10046:or R1,R0
+move.b R0,74(R13)
+bra L115
+*line 607
+*line 608
+L118:
+*line 609
+*line 610
+*line 611
+move.b 75(R13),R0
+ext.w R0
+and #-5,R0
+tst 12(R14)
+beq L10047
+move #4,R1
+bra L10049
+L10047:clr R1
+L10049:or R1,R0
+move.b R0,75(R13)
+bra L115
+*line 612
+*line 613
+L119:
+*line 614
+*line 615
+*line 616
+move.b 76(R13),R0
+ext.w R0
+and #-5,R0
+tst 12(R14)
+beq L10050
+move #4,R1
+bra L10052
+L10050:clr R1
+L10052:or R1,R0
+move.b R0,76(R13)
+bra L115
+*line 617
+*line 618
+L120:
+*line 619
+*line 620
+bra L112
+*line 621
+bra L115
+L116:tst R0
+beq L117
+cmp #1,R0
+beq L118
+cmp #2,R0
+beq L119
+cmp #3,R0
+beq L120
+bra L115
+L115:
+*line 624
+move _curvce,(sp)
+jsr _dosync
+*line 626
+*line 627
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L121
+*line 627
+clr (sp)
+jsr _vbank
+*line 628
+L121:
+*line 629
+move #14,(sp)
+move.l R12,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 630
+jsr _modinst
+L112:tst.l (sp)+
+movem.l (sp)+,R12-R13
+unlk R14
+rts
+.globl _nd_iosc
+.text
+_nd_iosc:
+~~nd_iosc:
+~nn=8
+~k=10
+link R14,#0
+movem.l R5-R7,-(sp)
+~v=R7
+~n=R6
+*line 648
+move 8(R14),R6
+and #255,R6
+*line 649
+move 8(R14),R7
+asr #8,R7
+and #3,R7
+*line 651
+*line 651
+cmp #39,_stccol
+bge L123
+*line 652
+*line 653
+*line 653
+cmp #8,10(R14)
+bne L124
+*line 654
+*line 655
+*line 656
+sub #1,_bform
+bge L125
+*line 656
+move #3,_bform
+*line 657
+L125:
+*line 658
+move R7,(sp)
+move R6,-(sp)
+jsr _setoscb
+addq.l #2,sp
+*line 659
+clr R0
+bra L122
+*line 660
+bra L126
+L124:
+*line 661
+*line 661
+cmp #9,10(R14)
+bne L127
+*line 662
+*line 663
+*line 664
+add #1,_bform
+move _bform,R0
+cmp #3,R0
+ble L128
+*line 664
+clr _bform
+*line 665
+L128:
+*line 666
+move R7,(sp)
+move R6,-(sp)
+jsr _setoscb
+addq.l #2,sp
+*line 667
+clr R0
+bra L122
+*line 668
+*line 669
+bra L129
+L127:
+*line 670
+move #-1,R0
+bra L122
+L129:L126:
+*line 671
+*line 672
+bra L130
+L123:
+*line 673
+*line 673
+cmp #46,_stccol
+bne L131
+*line 674
+*line 675
+*line 676
+cmp #21,_stcrow
+bne L132
+*line 676
+move #-1,R0
+bra L122
+*line 677
+L132:
+*line 678
+*line 678
+cmp #8,10(R14)
+bne L133
+*line 679
+*line 680
+clr (sp)
+move R7,-(sp)
+move R6,-(sp)
+jsr _setosyn
+addq.l #4,sp
+*line 681
+clr R0
+bra L122
+*line 682
+bra L134
+L133:
+*line 683
+*line 683
+cmp #9,10(R14)
+bne L135
+*line 684
+*line 685
+move #1,(sp)
+move R7,-(sp)
+move R6,-(sp)
+jsr _setosyn
+addq.l #4,sp
+*line 686
+clr R0
+bra L122
+*line 687
+*line 688
+bra L136
+L135:
+*line 689
+move #-1,R0
+bra L122
+L136:L134:
+*line 690
+*line 691
+*line 692
+bra L137
+L131:
+*line 693
+*line 693
+cmp #40,_stccol
+blt L138
+cmp #44,_stccol
+bgt L138
+*line 694
+*line 695
+move _bform,R0
+bra L140
+*line 696
+L141:
+*line 697
+*line 698
+*line 699
+*line 699
+cmp #40,_stccol
+bne L142
+*line 700
+*line 701
+*line 701
+cmp #8,10(R14)
+bne L143
+*line 702
+*line 703
+move #45,10(R14)
+*line 704
+move.b #45,4+_ebuf
+*line 705
+bra L144
+L143:
+*line 706
+*line 706
+cmp #9,10(R14)
+bne L145
+*line 707
+*line 708
+move #43,10(R14)
+*line 709
+move.b #43,4+_ebuf
+*line 710
+*line 711
+bra L146
+L145:
+*line 712
+move #-1,R0
+bra L122
+L146:L144:
+*line 713
+bra L147
+L142:
+*line 714
+*line 715
+*line 716
+move 10(R14),R0
+add #48,R0
+move _stccol,R9
+add.l #_ebuf,R9
+move.b R0,-41(R9)
+L147:
+*line 717
+*line 718
+*line 719
+cmp #9,10(R14)
+ble L10053
+move 10(R14),R0
+bra L10055
+L10053:move 10(R14),R0
+add #48,R0
+L10055:move.b R0,_dspbuf
+*line 720
+clr.b 1+_dspbuf
+*line 721
+*line 722
+*line 723
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L148
+*line 723
+clr (sp)
+jsr _vbank
+*line 724
+L148:
+*line 725
+*line 726
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 727
+*line 728
+*line 729
+cmp #44,_stccol
+bne L149
+*line 729
+clr R0
+bra L122
+*line 730
+L149:
+*line 731
+jsr _advicur
+*line 732
+clr R0
+bra L122
+*line 733
+*line 734
+L150:
+*line 735
+*line 736
+*line 737
+*line 737
+cmp #40,_stccol
+bne L151
+*line 738
+*line 739
+*line 739
+tst 10(R14)
+beq L152
+*line 740
+*line 741
+move 10(R14),R0
+add #48,R0
+move.b R0,_dspbuf
+move.b R0,_ebuf
+*line 742
+clr.b 1+_dspbuf
+*line 743
+*line 744
+*line 745
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L153
+*line 745
+clr (sp)
+jsr _vbank
+*line 746
+L153:
+*line 747
+*line 748
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 749
+*line 750
+jsr _advicur
+*line 751
+jsr _advicur
+*line 752
+*line 753
+clr R0
+bra L122
+*line 754
+*line 755
+bra L154
+L152:
+*line 756
+move #-1,R0
+bra L122
+L154:
+*line 757
+bra L155
+L151:
+*line 758
+*line 758
+cmp #42,_stccol
+bne L156
+*line 759
+*line 760
+*line 760
+tst 10(R14)
+beq L157
+*line 761
+*line 762
+move 10(R14),R0
+add #48,R0
+move.b R0,_dspbuf
+move.b R0,2+_ebuf
+*line 763
+clr.b 1+_dspbuf
+*line 764
+*line 765
+*line 766
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L158
+*line 766
+clr (sp)
+jsr _vbank
+*line 767
+L158:
+*line 768
+*line 769
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 770
+*line 771
+clr R0
+bra L122
+*line 772
+*line 773
+bra L159
+L157:
+*line 774
+move #-1,R0
+bra L122
+L159:bra L160
+L156:
+*line 775
+*line 776
+*line 777
+move #-1,R0
+bra L122
+L160:L155:
+*line 778
+*line 779
+*line 780
+L161:
+*line 781
+*line 782
+*line 783
+*line 784
+cmp #42,_stccol
+bne L162
+*line 784
+move #-1,R0
+bra L122
+*line 785
+L162:
+*line 786
+move 10(R14),R0
+add #48,R0
+move _stccol,R9
+add.l #_ebuf,R9
+move.b R0,-40(R9)
+*line 787
+move 10(R14),R0
+add #48,R0
+move.b R0,_dspbuf
+*line 788
+clr.b 1+_dspbuf
+*line 789
+*line 790
+*line 791
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L163
+*line 791
+clr (sp)
+jsr _vbank
+*line 792
+L163:
+*line 793
+*line 794
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 795
+*line 796
+*line 797
+cmp #44,_stccol
+bne L164
+*line 797
+clr R0
+bra L122
+*line 798
+L164:
+*line 799
+jsr _advicur
+*line 800
+*line 801
+*line 802
+cmp #42,_stccol
+bne L165
+*line 802
+jsr _advicur
+*line 803
+L165:
+*line 804
+clr R0
+bra L122
+*line 805
+*line 806
+L166:
+*line 807
+*line 808
+*line 809
+move _stccol,R0
+bra L168
+*line 810
+L169:
+*line 811
+*line 812
+*line 813
+move 10(R14),R0
+move.b R0,_ebuf
+*line 814
+move 10(R14),R0
+add #48,R0
+move.b R0,_dspbuf
+bra L167
+*line 815
+*line 816
+L170:
+*line 817
+*line 818
+*line 819
+*line 820
+cmp #6,10(R14)
+ble L171
+*line 820
+move #-1,R0
+bra L122
+*line 821
+L171:
+*line 822
+move 10(R14),R0
+move.b R0,1+_ebuf
+*line 823
+move 10(R14),R0
+add #65,R0
+move.b R0,_dspbuf
+bra L167
+*line 824
+*line 825
+L172:
+*line 826
+*line 827
+*line 828
+*line 828
+cmp #7,10(R14)
+bne L173
+*line 829
+*line 830
+move 10(R14),R0
+move.b R0,2+_ebuf
+*line 831
+move.b _sfdsp,_dspbuf
+bra L167
+*line 832
+*line 833
+bra L174
+L173:
+*line 834
+*line 834
+cmp #8,10(R14)
+bne L175
+*line 835
+*line 836
+move 10(R14),R0
+move.b R0,2+_ebuf
+*line 837
+move.b 1+_sfdsp,_dspbuf
+bra L167
+*line 838
+*line 839
+bra L176
+L175:
+*line 840
+*line 840
+cmp #9,10(R14)
+bne L177
+*line 841
+*line 842
+move 10(R14),R0
+move.b R0,2+_ebuf
+*line 843
+move.b 2+_sfdsp,_dspbuf
+bra L167
+*line 844
+*line 845
+*line 846
+bra L178
+L177:
+*line 847
+move #-1,R0
+bra L122
+L178:L176:L174:L179:
+*line 848
+L180:
+*line 849
+*line 850
+*line 851
+move 10(R14),R0
+move _stccol,R9
+add.l #_ebuf,R9
+move.b R0,-40(R9)
+*line 852
+move 10(R14),R0
+add #48,R0
+move.b R0,_dspbuf
+bra L167
+*line 853
+bra L167
+L168:sub #40,R0
+cmp #4,R0
+bhi L167
+asl #2,R0
+move R0,R8
+add.l #L181,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L181:.dc.l L169
+.dc.l L170
+.dc.l L172
+.dc.l L179
+.dc.l L180
+.text
+L167:
+*line 854
+*line 855
+*line 856
+*line 857
+*line 858
+clr.b 1+_dspbuf
+*line 859
+*line 860
+*line 861
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L182
+*line 861
+clr (sp)
+jsr _vbank
+*line 862
+L182:
+*line 863
+*line 864
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 865
+*line 866
+*line 867
+cmp #44,_stccol
+bne L183
+*line 867
+clr R0
+bra L122
+*line 868
+L183:
+*line 869
+jsr _advicur
+*line 870
+clr R0
+bra L122
+bra L139
+L140:tst R0
+beq L141
+cmp #1,R0
+beq L150
+cmp #2,R0
+beq L161
+cmp #3,R0
+beq L166
+bra L139
+L139:
+*line 871
+*line 872
+bra L184
+L138:
+*line 873
+*line 874
+*line 875
+move #-1,R0
+bra L122
+L184:L137:L130:L122:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.data
+L38:.dc.b $25,$30,$34,$64,$25,$63,$0
+L41:.dc.b $25,$30,$32,$64,$2E,$25,$64,$0
+L78:.dc.b $49,$6E,$74,$20,$25,$63,$25,$30,$34,$64,$20,$25,$63,$0
+L80:.dc.b $52,$61,$74,$20,$25,$63,$2F,$25,$63,$20,$20,$20,$25,$63,$0
+L82:.dc.b $46,$72,$71,$20,$25,$30,$32,$64,$2E,$25,$64,$20,$20,$25,$63,$0
+L84:.dc.b $50,$63,$68,$20,$0
+L97:.dc.b $25,$30,$34,$64,$25,$63,$0
+L98:.dc.b $49,$6E,$74,$20,$25,$63,$25,$30,$34,$64,$20,$25,$63,$0
+L100:.dc.b $30,$30,$30,$30,$2B,$0
+L101:.dc.b $49,$6E,$74,$20,$25,$73,$20,$25,$63,$0
+L104:.dc.b $52,$61,$74,$20,$25,$63,$2F,$25,$63,$20,$20,$20,$25,$63,$0
+L106:.dc.b $52,$61,$74,$20,$25,$73,$20,$20,$20,$25,$63,$0
+L108:.dc.b $46,$72,$71,$20,$25,$73,$20,$20,$25,$63,$0
+L110:.dc.b $50,$63,$68,$20,$25,$73,$20,$25,$63,$0
+L113:.dc.b $53,$0
+L114:.dc.b $73,$0
Index: alcyon/etipnt.s
===================================================================
--- alcyon/etipnt.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etipnt.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,326 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _instob
+.globl _stccol
+.globl _subj
+.globl _curvce
+.globl _curfunc
+.globl _curpnt
+.globl _idbox
+.globl _dspbuf
+.globl _vbufs
+.globl _pntptr
+.globl _et_ipnt
+.text
+_et_ipnt:
+~~et_ipnt:
+~n=8
+link R14,#-4
+*line 46
+move _subj,(sp)
+move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 47
+move #1,_ebflag
+*line 49
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_ipnt
+.text
+_ef_ipnt:
+~~ef_ipnt:
+~n=8
+link R14,#0
+movem.l R3-R7/R12-R13,-(sp)
+~i=R7
+~tmpval=R6
+~endpnt=R5
+~basept=R4
+~fp=R13
+~ip=R12
+*line 69
+move _curvce,R0
+muls #3938,R0
+move.l R0,R12
+add.l #_vbufs,R12
+*line 70
+move.l R12,R13
+move _curfunc,R0
+muls #12,R0
+add.l R0,R13
+add.l #86,R13
+*line 72
+clr.b 2+_ebuf
+*line 73
+clr _ebflag
+*line 75
+clr R6
+*line 77
+clr R7
+bra L6
+L7:
+*line 78
+muls #10,R6
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R6
+add #-48,R6
+L5:
+*line 77
+add #1,R7
+L6:
+*line 77
+cmp #2,R7
+blt L7
+L4:
+*line 80
+move.b 6(R13),R4
+ext.w R4
+*line 81
+move.b 6(R13),R5
+ext.w R5
+move.b 5(R13),R0
+ext.w R0
+add R0,R5
+sub #1,R5
+*line 86
+*line 86
+move.b 5(R13),R0
+ext.w R0
+cmp R0,R6
+blt L8
+*line 87
+*line 88
+*line 88
+cmp.b #100,5(R13)
+bne L9
+*line 89
+*line 90
+move #1,(sp)
+jsr _showpt
+*line 91
+move #-1,R0
+bra L3
+*line 92
+*line 95
+L9:
+*line 96
+*line 96
+move R5,(sp)
+move _curfunc,-(sp)
+move.l R12,-(sp)
+jsr _inspnt
+addq.l #6,sp
+tst R0
+bne L10
+*line 99
+*line 100
+move #1,(sp)
+jsr _showpt
+*line 101
+move #-1,R0
+bra L3
+*line 102
+bra L11
+L10:
+*line 103
+*line 104
+*line 105
+move.b 5(R13),R0
+ext.w R0
+sub #1,R0
+move R0,_subj
+*line 106
+jsr _pntsel
+*line 107
+move #12,(sp)
+clr -(sp)
+move.l _pntptr,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 108
+move.l _pntptr,R8
+move.l _pntptr,R9
+move -10(R9),2(R8)
+*line 109
+move _subj,(sp)
+sub #1,(sp)
+move _curfunc,-(sp)
+jsr _timeto
+addq.l #2,sp
+move R0,(sp)
+add #1,(sp)
+move _subj,-(sp)
+jsr _setseg
+addq.l #2,sp
+*line 110
+move #1,(sp)
+jsr _showpt
+*line 114
+*line 115
+jsr _modinst
+*line 116
+clr R0
+bra L3
+L11:
+*line 117
+*line 118
+bra L12
+L8:
+*line 119
+*line 122
+*line 123
+*line 124
+move R6,R0
+add R4,R0
+cmp R0,R5
+bge L13
+*line 124
+move #-1,R0
+bra L3
+*line 125
+L13:
+*line 126
+move R6,_subj
+*line 127
+jsr _pntsel
+*line 128
+move #1,(sp)
+jsr _showpt
+*line 132
+*line 133
+clr R0
+bra L3
+L12:L3:tst.l (sp)+
+movem.l (sp)+,R4-R7/R12-R13
+unlk R14
+rts
+.globl _rd_ipnt
+.text
+_rd_ipnt:
+~~rd_ipnt:
+~n=8
+link R14,#-4
+*line 150
+move _subj,(sp)
+move.l #L15,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 152
+clr (sp)
+jsr _vbank
+*line 154
+*line 155
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 12(R8,R9.l),-(sp)
+add #1,(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 157
+clr R0
+bra L14
+L14:unlk R14
+rts
+.globl _nd_ipnt
+.text
+_nd_ipnt:
+~~nd_ipnt:
+~k=R7
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~ec=R6
+*line 176
+move 10(R14),R7
+*line 176
+move _stccol,R6
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R6
+*line 177
+move R7,R0
+add #48,R0
+move R6,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 178
+clr.b 2+_ebuf
+*line 180
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 181
+clr.b 1+_dspbuf
+*line 183
+clr (sp)
+jsr _vbank
+*line 185
+*line 186
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 12(R8,R9.l),-(sp)
+add #1,(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 188
+jsr _advicur
+*line 190
+clr R0
+bra L16
+L16:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$30,$32,$64,$0
+L15:.dc.b $25,$30,$32,$64,$0
Index: alcyon/etires.s
===================================================================
--- alcyon/etires.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etires.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,295 @@
+.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 _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _instob
+.globl _stcrow
+.globl _stccol
+.globl _curvce
+.globl _curfunc
+.globl _idbox
+.globl _dspbuf
+.globl _vbufs
+.globl _pntptr
+.globl _rsntab
+.data
+_rsntab:
+.dc.w $0
+.dc.w $DC0
+.dc.w $1B80
+.dc.w $2940
+.dc.w $3700
+.dc.w $44C0
+.dc.w $5280
+.dc.w $6040
+.dc.w $6E00
+.dc.w $7D00
+.globl _et_ires
+.text
+_et_ires:
+~~et_ires:
+~n=8
+link R14,#-4
+*line 59
+*line 60
+cmp #4,_curfunc
+beq L2
+*line 60
+move #-1,R0
+bra L1
+*line 61
+L2:
+*line 62
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,R8
+move.b 143(R8),R0
+ext.w R0
+add #48,R0
+move.b R0,_ebuf
+*line 63
+clr.b 1+_ebuf
+*line 64
+move #1,_ebflag
+*line 65
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_ires
+.text
+_ef_ires:
+~~ef_ires:
+~n=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~tmpval=R7
+*line 80
+*line 81
+cmp #4,_curfunc
+beq L4
+*line 81
+move #-1,R0
+bra L3
+*line 82
+L4:
+*line 83
+clr.b 1+_ebuf
+*line 84
+clr _ebflag
+*line 85
+move.b _ebuf,R7
+ext.w R7
+add #-48,R7
+*line 86
+move R7,R0
+move _curvce,R1
+muls #3938,R1
+add.l #_vbufs,R1
+move.l R1,R9
+move.b R0,143(R9)
+*line 87
+move R7,R8
+add.l R8,R8
+move.l #_rsntab,R9
+move 0(R8,R9.l),(sp)
+move #6,-(sp)
+move _curvce,-(sp)
+jsr _sendval
+addq.l #4,sp
+*line 88
+jsr _modinst
+*line 89
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _rd_ires
+.text
+_rd_ires:
+~~rd_ires:
+~n=8
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+~fp=R13
+*line 107
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+add.l #134,R13
+*line 109
+*line 110
+cmp #4,_curfunc
+beq L6
+*line 110
+move #-1,R0
+bra L5
+*line 111
+L6:
+*line 112
+move.b 9(R13),R0
+ext.w R0
+add #48,R0
+move.b R0,_dspbuf
+*line 113
+clr.b 1+_dspbuf
+*line 115
+*line 116
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L7
+*line 116
+clr (sp)
+jsr _vbank
+*line 117
+L7:
+*line 118
+*line 119
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),-(sp)
+add #8,(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 12(R8,R9.l),-(sp)
+add #1,(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+btst #0,7(R13)
+beq L10000
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+bra L10002
+L10000:move #2,-(sp)
+L10002:move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 121
+clr R0
+bra L5
+L5:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _nd_ires
+.text
+_nd_ires:
+~~nd_ires:
+~k=R7
+~n=8
+link R14,#0
+movem.l R6-R7,-(sp)
+*line 138
+move 10(R14),R7
+*line 138
+*line 139
+cmp #4,_curfunc
+beq L9
+*line 139
+move #-1,R0
+bra L8
+*line 140
+L9:
+*line 141
+move R7,R0
+add #48,R0
+move.b R0,_ebuf
+move.b R0,_dspbuf
+*line 142
+clr R0
+move.b R0,1+_ebuf
+move.b R0,1+_dspbuf
+*line 144
+*line 145
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L10
+*line 145
+clr (sp)
+jsr _vbank
+*line 146
+L10:
+*line 147
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 148
+clr R0
+bra L8
+L8:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.data
Index: alcyon/etitim.s
===================================================================
--- alcyon/etitim.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etitim.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,373 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _instob
+.globl _stccol
+.globl _subj
+.globl _curvce
+.globl _curfunc
+.globl _curpnt
+.globl _pecase
+.globl _npts
+.globl _temin
+.globl _temax
+.globl _pntsv
+.globl _idbox
+.globl _dspbuf
+.globl _vbufs
+.globl _pntptr
+.globl _et_itim
+.text
+_et_itim:
+~~et_itim:
+~n=8
+link R14,#0
+movem.l R3-R7,-(sp)
+~th=R7
+~tl=R6
+~tt=R5
+~sc=R4
+*line 50
+jsr _pntsel
+*line 52
+move.l #$3e8,R4
+*line 53
+move _subj,(sp)
+move _curfunc,-(sp)
+jsr _timeto
+addq.l #2,sp
+ext.l R0
+move.l R0,R5
+*line 54
+move.l R4,-(sp)
+move.l R5,-(sp)
+jsr ldiv
+addq.l #8,sp
+move R0,R7
+*line 55
+move R7,R0
+ext.l R0
+move.l R0,-(sp)
+move.l R4,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,-(sp)
+move.l R5,R0
+sub.l (sp)+,R0
+move R0,R6
+*line 57
+move R6,(sp)
+move R7,-(sp)
+move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 58
+move #1,_ebflag
+*line 65
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _ef_itim
+.text
+_ef_itim:
+~~ef_itim:
+~n=8
+link R14,#0
+movem.l R3-R7/R12-R13,-(sp)
+~i=R7
+~endpnt=R6
+~basept=R5
+~tmpval=R4
+~fp=R13
+~ip=R12
+*line 86
+move _curvce,R0
+muls #3938,R0
+move.l R0,R12
+add.l #_vbufs,R12
+*line 87
+move.l R12,R13
+move _curfunc,R0
+muls #12,R0
+add.l R0,R13
+add.l #86,R13
+*line 89
+move.b #46,2+_ebuf
+*line 90
+clr.b 6+_ebuf
+*line 91
+clr _ebflag
+*line 96
+clr R4
+*line 98
+clr R7
+bra L6
+L7:
+*line 99
+mulu #10,R4
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R4
+add #-48,R4
+L5:
+*line 98
+add #1,R7
+L6:
+*line 98
+cmp #2,R7
+blt L7
+L4:
+*line 101
+move #3,R7
+bra L10
+L11:
+*line 102
+mulu #10,R4
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R4
+add #-48,R4
+L9:
+*line 101
+add #1,R7
+L10:
+*line 101
+cmp #6,R7
+blt L11
+L8:
+*line 107
+*line 108
+cmp _temax,R4
+bls L12
+*line 108
+move #-1,R0
+bra L3
+*line 109
+L12:
+*line 110
+*line 111
+cmp _temin,R4
+bcc L13
+*line 111
+move #-1,R0
+bra L3
+*line 112
+L13:
+*line 113
+move R4,(sp)
+move _subj,-(sp)
+jsr _setseg
+addq.l #2,sp
+*line 115
+*line 116
+cmp #2,_pecase
+bne L14
+*line 116
+move _temax,(sp)
+move _subj,-(sp)
+add #1,(sp)
+jsr _setseg
+addq.l #2,sp
+*line 120
+L14:
+*line 121
+jsr _modinst
+*line 122
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R4-R7/R12-R13
+unlk R14
+rts
+.globl _rd_itim
+.text
+_rd_itim:
+~~rd_itim:
+~n=8
+link R14,#0
+movem.l R3-R7,-(sp)
+~th=R7
+~tl=R6
+~tt=R5
+~sc=R4
+*line 141
+move.l #$3e8,R4
+*line 142
+move _subj,(sp)
+move _curfunc,-(sp)
+jsr _timeto
+addq.l #2,sp
+ext.l R0
+move.l R0,R5
+*line 143
+move.l R4,-(sp)
+move.l R5,-(sp)
+jsr ldiv
+addq.l #8,sp
+move R0,R7
+*line 144
+move R7,R0
+ext.l R0
+move.l R0,-(sp)
+move.l R4,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,-(sp)
+move.l R5,R0
+sub.l (sp)+,R0
+move R0,R6
+*line 146
+move R6,(sp)
+move R7,-(sp)
+move.l #L16,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 148
+clr (sp)
+jsr _vbank
+*line 150
+*line 151
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 12(R8,R9.l),-(sp)
+add #1,(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 153
+move _curfunc,(sp)
+jsr _edfunc
+*line 154
+clr R0
+bra L15
+L15:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _nd_itim
+.text
+_nd_itim:
+~~nd_itim:
+~k=R7
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~ec=R6
+*line 173
+move 10(R14),R7
+*line 173
+move _stccol,R6
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R6
+*line 175
+*line 176
+cmp #2,R6
+bne L18
+*line 176
+move #-1,R0
+bra L17
+*line 177
+L18:
+*line 178
+move R7,R0
+add #48,R0
+move R6,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 179
+move.b #46,2+_ebuf
+*line 180
+clr.b 6+_ebuf
+*line 182
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 183
+clr.b 1+_dspbuf
+*line 185
+clr (sp)
+jsr _vbank
+*line 187
+*line 188
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 12(R8,R9.l),-(sp)
+add #1,(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 190
+jsr _advicur
+*line 192
+*line 193
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),R0
+add #2,R0
+cmp _stccol,R0
+bne L19
+*line 193
+jsr _advicur
+*line 194
+L19:
+*line 195
+clr R0
+bra L17
+L17:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$30,$32,$64,$2E,$25,$30,$33,$64,$0
+L16:.dc.b $25,$30,$32,$64,$2E,$25,$30,$33,$64,$0
Index: alcyon/etival.s
===================================================================
--- alcyon/etival.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etival.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,678 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _instob
+.globl _stccol
+.globl _curfunc
+.globl _idbox
+.globl _dspbuf
+.globl _pntptr
+.globl _vtcrow
+.globl _vtccol
+.globl _idsrcsw
+.globl _submenu
+.globl _et_ival
+.text
+_et_ival:
+~~et_ival:
+~n=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~vv=R7
+~vh=R6
+~vl=R5
+*line 56
+move.l _pntptr,R8
+move 2(R8),R7
+asr #5,R7
+*line 57
+move R7,R6
+ext.l R6
+divs #100,R6
+*line 58
+move R7,R5
+move R6,R0
+muls #100,R0
+sub R0,R5
+*line 60
+move R5,(sp)
+move R6,-(sp)
+move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 61
+move.l _pntptr,R8
+move.b 6(R8),R0
+ext.w R0
+add #48,R0
+move.b R0,5+_ebuf
+*line 62
+move.l #6+_ebuf,(sp)
+move.l _pntptr,R8
+move 4(R8),-(sp)
+jsr _fr2dec
+addq.l #2,sp
+*line 63
+clr.b 10+_ebuf
+*line 64
+move #1,_ebflag
+*line 71
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _ef_ival
+.text
+_ef_ival:
+~~ef_ival:
+~n=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~i=R7
+~tmpval=R6
+~srctmp=R5
+*line 89
+move.b #46,2+_ebuf
+*line 90
+clr.b 10+_ebuf
+*line 91
+clr _ebflag
+*line 100
+*line 100
+tst _idsrcsw
+beq L4
+*line 101
+*line 102
+clr _idsrcsw
+*line 103
+clr _submenu
+*line 104
+*line 105
+*line 105
+cmp #22,_vtcrow
+bne L5
+*line 106
+*line 107
+*line 108
+*line 109
+*line 110
+cmp #24,_vtccol
+bge L6
+*line 110
+move #11,R5
+bra L7
+L6:
+*line 111
+*line 112
+cmp #24,_vtccol
+ble L8
+cmp #28,_vtccol
+bge L8
+*line 112
+move #5,R5
+bra L9
+L8:
+*line 113
+*line 114
+cmp #28,_vtccol
+ble L10
+cmp #32,_vtccol
+bge L10
+*line 114
+move #10,R5
+bra L11
+L10:
+*line 115
+*line 116
+cmp #32,_vtccol
+ble L12
+cmp #40,_vtccol
+bge L12
+*line 116
+move #1,R5
+*line 117
+bra L13
+L12:
+*line 118
+move #2,R5
+L13:L11:L9:L7:
+*line 119
+bra L14
+L5:
+*line 120
+*line 120
+cmp #23,_vtcrow
+bne L15
+*line 121
+*line 122
+*line 123
+*line 124
+*line 125
+cmp #24,_vtccol
+bge L16
+*line 125
+move #12,R5
+bra L17
+L16:
+*line 126
+*line 127
+cmp #24,_vtccol
+ble L18
+cmp #32,_vtccol
+bge L18
+*line 127
+move #7,R5
+bra L19
+L18:
+*line 128
+*line 129
+cmp #32,_vtccol
+ble L20
+cmp #40,_vtccol
+bge L20
+*line 129
+move #8,R5
+*line 130
+bra L21
+L20:
+*line 131
+clr R5
+L21:L19:L17:
+*line 132
+bra L22
+L15:
+*line 133
+*line 134
+*line 135
+*line 136
+*line 137
+*line 138
+cmp #24,_vtccol
+bge L23
+*line 138
+move #13,R5
+bra L24
+L23:
+*line 139
+*line 140
+cmp #24,_vtccol
+ble L25
+cmp #32,_vtccol
+bge L25
+*line 140
+move #6,R5
+*line 141
+bra L26
+L25:
+*line 142
+clr R5
+L26:L24:L22:L14:
+*line 143
+*line 144
+*line 145
+move R5,R0
+move.l _pntptr,R9
+move.b R0,6(R9)
+*line 146
+move #14,(sp)
+jsr _objclr
+*line 147
+jsr _idvlblc
+*line 148
+move #22,(sp)
+jsr _dswin
+*line 149
+jsr _modinst
+*line 150
+*line 151
+bra L27
+L4:
+*line 152
+*line 152
+cmp #32,_stccol
+bge L28
+*line 153
+*line 154
+clr R6
+*line 155
+*line 156
+clr R7
+bra L31
+L32:
+*line 157
+muls #10,R6
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R6
+add #-48,R6
+L30:
+*line 156
+add #1,R7
+L31:
+*line 156
+cmp #2,R7
+blt L32
+L29:
+*line 157
+*line 158
+*line 159
+move #3,R7
+bra L35
+L36:
+*line 160
+muls #10,R6
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R6
+add #-48,R6
+L34:
+*line 159
+add #1,R7
+L35:
+*line 159
+cmp #5,R7
+blt L36
+L33:
+*line 160
+*line 161
+*line 162
+*line 162
+cmp #1000,R6
+ble L37
+*line 163
+*line 167
+*line 168
+*line 169
+move #-1,R0
+bra L3
+*line 170
+*line 171
+L37:
+*line 172
+move R6,R0
+asl #5,R0
+move.l _pntptr,R9
+move R0,2(R9)
+*line 173
+move _curfunc,(sp)
+jsr _edfunc
+*line 174
+jsr _modinst
+*line 175
+bra L38
+L28:
+*line 176
+*line 176
+cmp #33,_stccol
+blt L39
+cmp #39,_stccol
+bgt L39
+*line 177
+*line 178
+move #1,_idsrcsw
+*line 179
+move #1,_submenu
+*line 180
+jsr _idvlbld
+*line 181
+move #22,(sp)
+jsr _dswin
+*line 182
+move #14,(sp)
+move #2,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 183
+move #17,(sp)
+move #22,-(sp)
+jsr _ttcpos
+addq.l #2,sp
+*line 184
+bra L40
+L39:
+*line 185
+*line 185
+cmp #41,_stccol
+blt L41
+cmp #44,_stccol
+bgt L41
+*line 186
+*line 187
+move.l #6+_ebuf,(sp)
+jsr _dec2fr
+move R0,R6
+*line 188
+*line 189
+*line 189
+cmp #-1,R6
+bne L42
+*line 190
+*line 194
+*line 195
+*line 196
+move #-1,R0
+bra L3
+*line 197
+bra L43
+L42:
+*line 198
+*line 199
+*line 200
+move.l _pntptr,R8
+move R6,4(R8)
+*line 201
+jsr _modinst
+L43:
+*line 202
+*line 203
+*line 204
+bra L44
+L41:
+*line 205
+move #-1,R0
+bra L3
+L44:L40:L38:L27:
+*line 212
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _rd_ival
+.text
+_rd_ival:
+~~rd_ival:
+~n=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~vv=R7
+~vh=R6
+~vl=R5
+*line 230
+move.l _pntptr,R8
+move 2(R8),R7
+asr #5,R7
+*line 231
+move R7,R6
+ext.l R6
+divs #100,R6
+*line 232
+move R7,R5
+move R6,R0
+muls #100,R0
+sub R0,R5
+*line 234
+move R5,(sp)
+move R6,-(sp)
+move.l #L46,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 235
+move.l _pntptr,R8
+move 4(R8),(sp)
+move.l _pntptr,R8
+move.b 6(R8),R0
+ext.w R0
+move R0,-(sp) 
+move.l #6+_dspbuf,-(sp)
+jsr _dsimlt
+addq.l #6,sp
+*line 237
+clr (sp)
+jsr _vbank
+*line 239
+*line 240
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 12(R8,R9.l),-(sp)
+add #1,(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 242
+clr R0
+bra L45
+L45:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _nd_ival
+.text
+_nd_ival:
+~~nd_ival:
+~k=R7
+~n=8
+link R14,#0
+movem.l R6-R7,-(sp)
+*line 259
+move 10(R14),R7
+*line 259
+*line 260
+tst _idsrcsw
+beq L48
+*line 260
+move #-1,R0
+bra L47
+*line 261
+L48:
+*line 262
+*line 263
+cmp #32,_stccol
+blt L49
+cmp #40,_stccol
+bgt L49
+*line 263
+move #-1,R0
+bra L47
+*line 264
+L49:
+*line 265
+*line 266
+cmp #29,_stccol
+bne L50
+*line 266
+move #-1,R0
+bra L47
+*line 267
+L50:
+*line 268
+move.b #46,2+_ebuf
+*line 269
+clr.b 10+_ebuf
+*line 273
+*line 273
+cmp #32,_stccol
+bge L51
+*line 274
+*line 275
+move R7,R0
+add #48,R0
+move _stccol,R9
+add.l #_ebuf,R9
+move.b R0,-27(R9)
+*line 276
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 277
+bra L52
+L51:
+*line 278
+*line 278
+cmp #41,_stccol
+bne L53
+*line 279
+*line 280
+*line 280
+cmp #8,R7
+bne L54
+*line 281
+*line 282
+move.b #45,9+_ebuf
+*line 283
+move.b #45,_dspbuf
+*line 284
+bra L55
+L54:
+*line 285
+*line 285
+cmp #9,R7
+bne L56
+*line 286
+*line 287
+move.b #43,9+_ebuf
+*line 288
+move.b #43,_dspbuf
+*line 289
+*line 290
+bra L57
+L56:
+*line 291
+move #-1,R0
+bra L47
+L57:L55:
+*line 292
+bra L58
+L53:
+*line 293
+*line 293
+cmp #42,_stccol
+bne L59
+*line 294
+*line 295
+*line 295
+tst R7
+bne L60
+*line 296
+*line 297
+move.b #48,6+_ebuf
+*line 298
+move.b #46,_dspbuf
+*line 299
+bra L61
+L60:
+*line 300
+*line 300
+cmp #1,R7
+bne L62
+*line 301
+*line 302
+move.b #49,6+_ebuf
+*line 303
+move.b #164,_dspbuf
+*line 304
+*line 305
+bra L63
+L62:
+*line 306
+move #-1,R0
+bra L47
+L63:L61:
+*line 307
+bra L64
+L59:
+*line 308
+*line 309
+*line 310
+move R7,R0
+add #48,R0
+move _stccol,R9
+add.l #_ebuf,R9
+move.b R0,-36(R9)
+*line 311
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+L64:L58:L52:
+*line 315
+clr.b 1+_dspbuf
+*line 317
+clr (sp)
+jsr _vbank
+*line 319
+*line 320
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 12(R8,R9.l),-(sp)
+add #1,(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 322
+*line 323
+cmp #31,_stccol
+beq L10000
+cmp #44,_stccol
+bne L65
+L10000:*line 323
+clr R0
+bra L47
+*line 324
+L65:
+*line 325
+jsr _advicur
+*line 327
+*line 328
+cmp #29,_stccol
+bne L66
+*line 328
+jsr _advicur
+*line 329
+L66:
+*line 330
+clr R0
+bra L47
+L47:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$30,$32,$64,$2E,$25,$30,$32,$64,$0
+L46:.dc.b $25,$30,$32,$64,$2E,$25,$30,$32,$64,$20,$0
Index: alcyon/etivce.s
===================================================================
--- alcyon/etivce.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etivce.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,209 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _instob
+.globl _stccol
+.globl _curvce
+.globl _idbox
+.globl _dspbuf
+.globl _et_ivce
+.text
+_et_ivce:
+~~et_ivce:
+~n=8
+link R14,#-4
+*line 42
+move _curvce,(sp)
+add #1,(sp)
+move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 43
+move #1,_ebflag
+*line 45
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_ivce
+.text
+_ef_ivce:
+~~ef_ivce:
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~i=R7
+~tmpval=R6
+*line 63
+clr.b 2+_ebuf
+*line 64
+clr _ebflag
+*line 66
+clr R6
+*line 68
+clr R7
+bra L6
+L7:
+*line 69
+muls #10,R6
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R6
+add #-48,R6
+L5:
+*line 68
+add #1,R7
+L6:
+*line 68
+cmp #2,R7
+blt L7
+L4:
+*line 71
+*line 72
+tst R6
+beq L10000
+cmp #12,R6
+ble L8
+L10000:*line 72
+move #-1,R0
+bra L3
+*line 73
+L8:
+*line 74
+move R6,(sp)
+sub #1,(sp)
+jsr _newvce
+*line 75
+jsr _allwins
+*line 76
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _rd_ivce
+.text
+_rd_ivce:
+~~rd_ivce:
+~n=8
+link R14,#-4
+*line 94
+move _curvce,(sp)
+add #1,(sp)
+move.l #L10,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 96
+clr (sp)
+jsr _vbank
+*line 98
+*line 99
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),-(sp)
+add #6,(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 12(R8,R9.l),-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 101
+clr R0
+bra L9
+L9:unlk R14
+rts
+.globl _nd_ivce
+.text
+_nd_ivce:
+~~nd_ivce:
+~k=R7
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~ec=R6
+*line 120
+move 10(R14),R7
+*line 120
+move _stccol,R6
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R6
+*line 121
+move R7,R0
+add #48,R0
+move R6,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 122
+clr.b 2+_ebuf
+*line 124
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 125
+clr.b 1+_dspbuf
+*line 127
+clr (sp)
+jsr _vbank
+*line 129
+*line 130
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 12(R8,R9.l),-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 132
+jsr _advicur
+*line 134
+clr R0
+bra L11
+L11:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$30,$32,$64,$0
+L10:.dc.b $25,$30,$32,$64,$0
Index: alcyon/etiwsn.s
===================================================================
--- alcyon/etiwsn.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etiwsn.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,426 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _instob
+.globl _stcrow
+.globl _stccol
+.globl _curvce
+.globl _idbox
+.globl _dspbuf
+.globl _vbufs
+.globl _wslib
+.globl _et_iwsn
+.text
+_et_iwsn:
+~~et_iwsn:
+~nn=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~m=R7
+*line 45
+move 8(R14),R7
+asr #8,R7
+*line 47
+*line 48
+tst R7
+beq L10000
+move _curvce,R0
+muls #3938,R0
+move.l R0,R8
+move.l #_vbufs,R9
+move.b 73(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+add #1,(sp)
+bra L10002
+L10000:move _curvce,R0
+muls #3938,R0
+move.l R0,R8
+move.l #_vbufs,R9
+move.b 72(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+add #1,(sp)
+L10002:move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 49
+move #1,_ebflag
+*line 51
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _ef_iwsn
+.text
+_ef_iwsn:
+~~ef_iwsn:
+~nn=8
+link R14,#0
+movem.l R4-R7/R13-R13,-(sp)
+~i=R7
+~tmpval=R6
+~m=R5
+~fpuws=R13
+*line 70
+move 8(R14),R5
+asr #8,R5
+*line 71
+clr.b 2+_ebuf
+*line 72
+clr _ebflag
+*line 74
+clr R6
+*line 76
+clr R7
+bra L6
+L7:
+*line 77
+muls #10,R6
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R6
+add #-48,R6
+L5:
+*line 76
+add #1,R7
+L6:
+*line 76
+cmp #2,R7
+blt L7
+L4:
+*line 79
+*line 80
+tst R6
+beq L10003
+cmp #20,R6
+ble L8
+L10003:*line 80
+move #-1,R0
+bra L3
+*line 81
+L8:
+*line 82
+*line 82
+tst R5
+beq L9
+*line 83
+*line 84
+*line 85
+move R6,R0
+sub #1,R0
+move _curvce,R1
+muls #3938,R1
+add.l #_vbufs,R1
+move.l R1,R9
+move.b R0,73(R9)
+*line 86
+*line 87
+*line 88
+move #540,(sp)
+move R6,R0
+sub #1,R0
+muls #1080,R0
+add.l #_wslib,R0
+move.l R0,-(sp)
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,-(sp)
+add.l #2858,(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 89
+*line 90
+move _curvce,R0
+move #9,R1
+asl R1,R0
+asl #1,R0
+ext.l R0
+move.l R0,R13
+add.l #_io_fpu,R13
+add.l #$2,R13
+*line 91
+*line 92
+move #254,(sp)
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,-(sp)
+add.l #2858,(sp)
+move.l R13,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 93
+*line 94
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,R8
+move 2858(R8),-2(R13)
+*line 95
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,R8
+move 3364(R8),508(R13)
+*line 96
+bra L10
+L9:
+*line 97
+*line 98
+*line 99
+*line 100
+*line 101
+move R6,R0
+sub #1,R0
+move _curvce,R1
+muls #3938,R1
+add.l #_vbufs,R1
+move.l R1,R9
+move.b R0,72(R9)
+*line 102
+*line 103
+*line 104
+move #540,(sp)
+move R6,R0
+sub #1,R0
+muls #1080,R0
+add.l #_wslib,R0
+move.l R0,-(sp)
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,-(sp)
+add.l #1778,(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 105
+*line 106
+move _curvce,R0
+move #9,R1
+asl R1,R0
+asl #1,R0
+ext.l R0
+move.l R0,R13
+add.l #_io_fpu,R13
+add.l #$202,R13
+*line 107
+*line 108
+move #254,(sp)
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,-(sp)
+add.l #1778,(sp)
+move.l R13,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 109
+*line 110
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,R8
+move 1778(R8),-2(R13)
+*line 111
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,R8
+move 2284(R8),508(R13)
+L10:
+*line 114
+move #21,(sp)
+jsr _dswin
+*line 115
+jsr _modinst
+*line 116
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.globl _rd_iwsn
+.text
+_rd_iwsn:
+~~rd_iwsn:
+~nn=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~m=R7
+~n=R6
+*line 134
+move 8(R14),R7
+asr #8,R7
+and #255,R7
+*line 135
+move 8(R14),R6
+and #255,R6
+*line 137
+*line 138
+tst R7
+beq L10004
+move _curvce,R0
+muls #3938,R0
+move.l R0,R8
+move.l #_vbufs,R9
+move.b 73(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+add #1,(sp)
+bra L10006
+L10004:move _curvce,R0
+muls #3938,R0
+move.l R0,R8
+move.l #_vbufs,R9
+move.b 72(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+add #1,(sp)
+L10006:move.l #L12,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 140
+clr (sp)
+jsr _vbank
+*line 142
+*line 143
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move.l _cfetp,R8
+move 2(R8),-(sp)
+move.l _cfetp,R8
+move (R8),-(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+tst R7
+beq L10007
+move #4,-(sp)
+bra L10009
+L10007:move #8,-(sp)
+L10009:move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 145
+clr R0
+bra L11
+L11:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _nd_iwsn
+.text
+_nd_iwsn:
+~~nd_iwsn:
+~k=R7
+~nn=8
+link R14,#0
+movem.l R3-R7,-(sp)
+~ec=R6
+~c=R5
+~n=R4
+*line 164
+move 10(R14),R7
+*line 164
+move 8(R14),R4
+and #255,R4
+*line 166
+move _stccol,R6
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R6
+*line 167
+move R7,R0
+add #48,R0
+move R6,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 168
+clr.b 2+_ebuf
+*line 170
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 171
+clr.b 1+_dspbuf
+*line 173
+clr (sp)
+jsr _vbank
+*line 174
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move R4,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),-(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 176
+jsr _advicur
+*line 178
+clr R0
+bra L13
+L13:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$30,$32,$64,$0
+L12:.dc.b $25,$30,$32,$64,$0
Index: alcyon/etloc.s
===================================================================
--- alcyon/etloc.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etloc.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,502 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _obj8
+.globl _curintp
+.globl _ctrsw
+.globl _timemlt
+.globl _recsw
+.globl _stccol
+.globl _grploc
+.globl _grpmode
+.globl _grpstat
+.globl _loctab
+.globl _vce2grp
+.globl _expbit
+.globl _gdstbc
+.globl _vbufs
+.globl _et_loc
+.text
+_et_loc:
+~~et_loc:
+~n=8
+link R14,#-4
+*line 58
+move 8(R14),R8
+add.l R8,R8
+move.l #_grploc,R9
+move 0(R8,R9.l),R0
+add #49,R0
+move.b R0,_ebuf
+*line 59
+clr.b 1+_ebuf
+*line 60
+move #1,_ebflag
+*line 61
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _setloc
+.text
+_setloc:
+~~setloc:
+~grp=8
+~loc=10
+link R14,#-8
+movem.l R3-R7/R12-R13,-(sp)
+~g=R7
+~i=R6
+~val=R5
+~ltmp=R4
+~fpu=R13
+~fp=R12
+~fpmant=-2
+~fpexp=-4
+~oldsr=-6
+~nop=-8
+*line 84
+move 8(R14),R8
+add.l R8,R8
+add.l #_grploc,R8
+move 10(R14),(R8)
+*line 85
+move 10(R14),R8
+add.l R8,R8
+add.l #_loctab,R8
+move (R8),R5
+asl R5
+eor #-32768,R5
+*line 86
+move 8(R14),R7
+add #1,R7
+*line 88
+*line 89
+move _timemlt,R0
+ext.l R0
+and.l #$ffff,R0
+move.l R0,-(sp)
+clr.l R0
+move _curintp,R0
+and.l #$fff0,R0
+move.l R0,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l #$f,R1
+asr.l R1,R0
+move R0,-2(R14)
+*line 91
+clr R0
+move _curintp,R0
+and #15,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_expbit,R0
+move.l R0,R8
+move (R8),-4(R14)
+*line 95
+clr R6
+bra L5
+L6:
+*line 96
+*line 96
+move R6,R8
+add.l R8,R8
+add.l #_vce2grp,R8
+cmp (R8),R7
+bne L7
+*line 97
+*line 98
+move R6,R0
+muls #3938,R0
+move.l R0,R12
+add.l #_vbufs,R12
+add.l #134,R12
+*line 99
+move R6,R0
+asl #8,R0
+asl #1,R0
+ext.l R0
+move.l R0,R13
+add.l #_io_fpu,R13
+add.l #$4080,R13
+*line 100
+*line 101
+move #8704,(sp)
+jsr _setsr
+move R0,-6(R14)
+*line 102
+*line 103
+*line 104
+*line 105
+eor.b #24,7(R12)
+*line 106
+*line 107
+move.l R13,R8
+add.l #$14,R8
+move -2(R14),(R8)
+*line 108
+add #1,-8(R14)
+*line 108
+add #1,-8(R14)
+*line 108
+add #1,-8(R14)
+*line 109
+move.l R13,R8
+add.l #$16,R8
+move -4(R14),(R8)
+*line 110
+add #1,-8(R14)
+*line 110
+add #1,-8(R14)
+*line 110
+add #1,-8(R14)
+*line 111
+*line 112
+*line 113
+btst #3,7(R12)
+beq L8
+*line 113
+move.l R13,R8
+add.l #$1c,R8
+move R5,(R8)
+*line 114
+bra L9
+L8:
+*line 115
+move.l R13,R8
+add.l #$2,R8
+move R5,(R8)
+L9:
+*line 116
+*line 117
+add #1,-8(R14)
+*line 117
+add #1,-8(R14)
+*line 117
+add #1,-8(R14)
+*line 118
+*line 119
+*line 120
+move.b 7(R12),R0
+ext.w R0
+and #28,R0
+or #1,R0
+move R0,(R13)
+*line 121
+*line 122
+move -6(R14),(sp)
+jsr _setsr
+*line 123
+*line 124
+*line 125
+*line 126
+L7:L4:
+*line 95
+add #1,R6
+L5:
+*line 95
+cmp #12,R6
+blt L6
+L3:L2:tst.l (sp)+
+movem.l (sp)+,R4-R7/R12-R13
+unlk R14
+rts
+.globl _ef_loc
+.text
+_ef_loc:
+~~ef_loc:
+~n=8
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~ival=R7
+~ep=R13
+*line 145
+clr.b 1+_ebuf
+*line 146
+move.b _ebuf,R7
+ext.w R7
+add #-48,R7
+*line 147
+clr _ebflag
+*line 149
+*line 150
+tst R7
+bne L11
+*line 150
+move #-1,R0
+bra L10
+*line 151
+L11:
+*line 152
+sub #1,R7
+*line 154
+move R7,(sp)
+move 8(R14),-(sp)
+jsr _setloc
+addq.l #2,sp
+*line 156
+*line 156
+tst _recsw
+beq L12
+move 8(R14),R8
+add.l R8,R8
+move.l #_grpstat,R9
+tst 0(R8,R9.l)
+beq L12
+move 8(R14),R8
+add.l R8,R8
+add.l #_grpmode,R8
+cmp #2,(R8)
+bne L12
+*line 157
+*line 158
+*line 158
+move #-1,(sp)
+move 8(R14),-(sp)
+move #12,-(sp)
+move.l _t_cur,-(sp)
+move.l _p_cur,-(sp)
+jsr _findev
+adda.l #12,sp
+move.l R0,R13
+move.l R13,R0
+beq L13
+*line 159
+*line 160
+move.b R7,7(R13)
+*line 161
+bra L14
+L13:
+*line 162
+*line 162
+move #6,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L15
+*line 163
+*line 164
+move.b #12,5(R13)
+*line 165
+move 8(R14),R0
+move.b R0,6(R13)
+*line 166
+move.b R7,7(R13)
+*line 167
+move.l _t_cur,(R13)
+*line 168
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 169
+move #2,(sp)
+move.l R13,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 170
+move #1,_ctrsw
+*line 171
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 172
+jsr _scupd
+*line 173
+L15:L14:
+*line 174
+*line 175
+L12:
+*line 176
+clr R0
+bra L10
+L10:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _rd_loc
+.text
+_rd_loc:
+~~rd_loc:
+~n=8
+link R14,#-4
+*line 192
+*line 193
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L17
+*line 193
+clr (sp)
+jsr _vbank
+*line 194
+L17:
+*line 195
+move #18,(sp)
+move 8(R14),R8
+add.l R8,R8
+move.l #_grploc,R9
+move 0(R8,R9.l),-(sp)
+add #49,(sp)
+move 8(R14),R0
+muls #5,R0
+move R0,-(sp)
+add #8,(sp)
+move #4,-(sp)
+move.l _obj8,-(sp)
+jsr _vputc
+adda.l #10,sp
+*line 197
+clr R0
+bra L16
+L16:unlk R14
+rts
+.globl _ds_loc
+.text
+_ds_loc:
+~~ds_loc:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 210
+clr R7
+bra L21
+L22:
+*line 211
+move R7,(sp)
+jsr _rd_loc
+L20:
+*line 210
+add #1,R7
+L21:
+*line 210
+cmp #12,R7
+blt L22
+L19:L18:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _nd_loc
+.text
+_nd_loc:
+~~nd_loc:
+~n=R7
+~k=R6
+link R14,#0
+movem.l R5-R7,-(sp)
+*line 227
+move 8(R14),R7
+*line 227
+move 10(R14),R6
+*line 227
+move R6,R0
+add #48,R0
+move.b R0,_ebuf
+*line 229
+*line 230
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L24
+*line 230
+clr (sp)
+jsr _vbank
+*line 231
+L24:
+*line 232
+move #98,(sp)
+move R6,-(sp)
+add #48,(sp)
+move _stccol,-(sp)
+move #4,-(sp)
+move.l _obj8,-(sp)
+jsr _vputc
+adda.l #10,sp
+*line 233
+jsr _advscur
+*line 235
+clr R0
+bra L23
+L23:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.data
Index: alcyon/etmcfn.s
===================================================================
--- alcyon/etmcfn.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etmcfn.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,600 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _instob
+.globl _curvce
+.globl _stccol
+.globl _stcrow
+.globl _wmcsel
+.globl _wmctag
+.globl _dspbuf
+.globl _idbox
+.globl _vbufs
+.globl _wslib
+.globl _et_mcfn
+.text
+_et_mcfn:
+~~et_mcfn:
+~n=8
+link R14,#-4
+*line 49
+move _curvce,R0
+muls #3938,R0
+move.l R0,R8
+move.l #_vbufs,R9
+move.b 70(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 50
+move #1,_ebflag
+*line 52
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_mcfn
+.text
+_ef_mcfn:
+~~ef_mcfn:
+~n=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~tmpval=R7
+*line 70
+clr _wmctag
+*line 71
+clr.b 2+_ebuf
+*line 72
+clr _ebflag
+*line 74
+move.b _ebuf,R7
+ext.w R7
+add #-48,R7
+muls #10,R7
+move.b 1+_ebuf,R0
+ext.w R0
+add R0,R7
+add #-48,R7
+*line 76
+*line 77
+cmp #12,R7
+blt L4
+*line 77
+move #-1,R0
+bra L3
+*line 78
+L4:
+*line 79
+move R7,R0
+move _curvce,R1
+muls #3938,R1
+add.l #_vbufs,R1
+move.l R1,R9
+move.b R0,70(R9)
+*line 80
+move _curvce,(sp)
+jsr _dosync
+*line 81
+move #1,_wmctag
+*line 82
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _rd_mcfn
+.text
+_rd_mcfn:
+~~rd_mcfn:
+~n=8
+link R14,#-4
+*line 98
+move _curvce,R0
+muls #3938,R0
+move.l R0,R8
+move.l #_vbufs,R9
+move.b 70(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+move.l #L6,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 100
+*line 101
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L7
+*line 101
+clr (sp)
+jsr _vbank
+*line 102
+L7:
+*line 103
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move #16,-(sp)
+move #24,-(sp)
+move #5,-(sp)
+move #11,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 105
+clr R0
+bra L5
+L5:unlk R14
+rts
+.globl _nd_mcfn
+.text
+_nd_mcfn:
+~~nd_mcfn:
+~k=R7
+~n=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~ec=R6
+~c=R5
+*line 124
+move 10(R14),R7
+*line 124
+move _stccol,R6
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R6
+*line 125
+move R7,R0
+add #48,R0
+move R6,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 126
+clr.b 2+_ebuf
+*line 128
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 129
+clr.b 1+_dspbuf
+*line 131
+*line 132
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L9
+*line 132
+clr (sp)
+jsr _vbank
+*line 133
+*line 134
+*line 135
+L9:
+*line 136
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move #5,-(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 138
+jsr _advicur
+*line 140
+clr R0
+bra L8
+L8:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _et_mwsn
+.text
+_et_mwsn:
+~~et_mwsn:
+~nn=8
+link R14,#-4
+*line 156
+move 8(R14),R0
+and #-256,R0
+beq L10000
+move #1,R0
+bra L10002
+L10000:clr R0
+L10002:move R0,_wmcsel
+*line 158
+*line 159
+tst _wmcsel
+beq L10003
+move _curvce,R0
+muls #3938,R0
+move.l R0,R8
+move.l #_vbufs,R9
+move.b 73(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+bra L10005
+L10003:move _curvce,R0
+muls #3938,R0
+move.l R0,R8
+move.l #_vbufs,R9
+move.b 72(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+L10005:add #1,(sp)
+move.l #L11,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 161
+move #1,_ebflag
+*line 163
+clr R0
+bra L10
+L10:unlk R14
+rts
+.globl _ef_mwsn
+.text
+_ef_mwsn:
+~~ef_mwsn:
+~nn=8
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~tmpval=R7
+~fpuws=R13
+*line 182
+move 8(R14),R0
+and #-256,R0
+beq L10006
+move #1,R0
+bra L10008
+L10006:clr R0
+L10008:move R0,_wmcsel
+*line 184
+clr _wmctag
+*line 185
+clr.b 2+_ebuf
+*line 186
+clr _ebflag
+*line 190
+move.b _ebuf,R7
+ext.w R7
+add #-48,R7
+muls #10,R7
+move.b 1+_ebuf,R0
+ext.w R0
+add R0,R7
+add #-48,R7
+*line 192
+*line 193
+cmp #1,R7
+blt L10009
+cmp #20,R7
+ble L13
+L10009:*line 193
+move #-1,R0
+bra L12
+*line 194
+*line 195
+L13:
+*line 196
+*line 196
+tst _wmcsel
+beq L14
+*line 197
+*line 198
+*line 199
+move R7,R0
+sub #1,R0
+move _curvce,R1
+muls #3938,R1
+add.l #_vbufs,R1
+move.l R1,R9
+move.b R0,73(R9)
+*line 200
+*line 201
+*line 202
+move #540,(sp)
+move R7,R0
+sub #1,R0
+muls #1080,R0
+add.l #_wslib,R0
+move.l R0,-(sp)
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,-(sp)
+add.l #2858,(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 203
+*line 204
+move _curvce,R0
+move #9,R1
+asl R1,R0
+asl #1,R0
+ext.l R0
+move.l R0,R13
+add.l #_io_fpu,R13
+add.l #$2,R13
+*line 205
+*line 206
+move #254,(sp)
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,-(sp)
+add.l #2858,(sp)
+move.l R13,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 207
+*line 208
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,R8
+move 2858(R8),-2(R13)
+*line 209
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,R8
+move 3364(R8),508(R13)
+*line 210
+bra L15
+L14:
+*line 211
+*line 212
+*line 213
+*line 214
+*line 215
+move R7,R0
+sub #1,R0
+move _curvce,R1
+muls #3938,R1
+add.l #_vbufs,R1
+move.l R1,R9
+move.b R0,72(R9)
+*line 216
+*line 217
+*line 218
+move #540,(sp)
+move R7,R0
+sub #1,R0
+muls #1080,R0
+add.l #_wslib,R0
+move.l R0,-(sp)
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,-(sp)
+add.l #1778,(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 219
+*line 220
+move _curvce,R0
+move #9,R1
+asl R1,R0
+asl #1,R0
+ext.l R0
+move.l R0,R13
+add.l #_io_fpu,R13
+add.l #$202,R13
+*line 221
+*line 222
+move #254,(sp)
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,-(sp)
+add.l #1778,(sp)
+move.l R13,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 223
+*line 224
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,R8
+move 1778(R8),-2(R13)
+*line 225
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,R8
+move 2284(R8),508(R13)
+L15:
+*line 228
+move #1,_wmctag
+*line 229
+clr R0
+bra L12
+L12:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _rd_mwsn
+.text
+_rd_mwsn:
+~~rd_mwsn:
+~nn=8
+link R14,#-4
+*line 245
+move 8(R14),R0
+and #-256,R0
+beq L10010
+move #1,R0
+bra L10012
+L10010:clr R0
+L10012:move R0,_wmcsel
+*line 247
+*line 248
+tst _wmcsel
+beq L10013
+move _curvce,R0
+muls #3938,R0
+move.l R0,R8
+move.l #_vbufs,R9
+move.b 73(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+bra L10015
+L10013:move _curvce,R0
+muls #3938,R0
+move.l R0,R8
+move.l #_vbufs,R9
+move.b 72(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+L10015:add #1,(sp)
+move.l #L17,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 250
+*line 251
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L18
+*line 251
+clr (sp)
+jsr _vbank
+*line 252
+L18:
+*line 253
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+tst _wmcsel
+beq L10016
+move #16,-(sp)
+bra L10018
+L10016:move #12,-(sp)
+L10018:move #24,-(sp)
+move #6,-(sp)
+move #11,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 255
+clr R0
+bra L16
+L16:unlk R14
+rts
+.globl _nd_mwsn
+.text
+_nd_mwsn:
+~~nd_mwsn:
+~k=R7
+~nn=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~ec=R6
+~c=R5
+*line 274
+move 10(R14),R7
+*line 274
+move _stccol,R6
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R6
+*line 275
+move R7,R0
+add #48,R0
+move R6,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 276
+clr.b 2+_ebuf
+*line 278
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 279
+clr.b 1+_dspbuf
+*line 281
+*line 282
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L20
+*line 282
+clr (sp)
+jsr _vbank
+*line 283
+L20:
+*line 284
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move #6,-(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 286
+jsr _advicur
+*line 288
+clr R0
+bra L19
+L19:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$30,$32,$64,$0
+L6:.dc.b $25,$30,$32,$64,$0
+L11:.dc.b $25,$30,$32,$64,$0
+L17:.dc.b $25,$30,$32,$64,$0
Index: alcyon/etrel.s
===================================================================
--- alcyon/etrel.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etrel.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,46 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _et_rel
+.text
+_et_rel:
+~~et_rel:
+link R14,#-4
+*line 14
+move #-1,R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_rel
+.text
+_ef_rel:
+~~ef_rel:
+link R14,#-4
+*line 20
+move #-1,R0
+bra L2
+L2:unlk R14
+rts
+.globl _rd_rel
+.text
+_rd_rel:
+~~rd_rel:
+link R14,#-4
+*line 26
+move #-1,R0
+bra L3
+L3:unlk R14
+rts
+.globl _nd_rel
+.text
+_nd_rel:
+~~nd_rel:
+link R14,#-4
+*line 32
+move #-1,R0
+bra L4
+L4:unlk R14
+rts
+.data
Index: alcyon/etres1.s
===================================================================
--- alcyon/etres1.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etres1.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1021 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _ancmsw
+.globl _angroup
+.globl _ctrsw
+.globl _recsw
+.globl _stccol
+.globl _obj8
+.globl _anrs
+.globl _grpmode
+.globl _grpstat
+.globl _var2src
+.globl _varmode
+.globl _gdstbc
+.globl _valents
+.globl _et_res1
+.text
+_et_res1:
+~~et_res1:
+~n=8
+link R14,#-4
+*line 49
+move 8(R14),R0
+asl #5,R0
+ext.l R0
+tst _angroup
+bge L10000
+move _angroup,R1
+neg R1
+bra L10002
+L10000:move _angroup,R1
+L10002:sub #1,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_anrs,R9
+move 0(R8,R9.l),R0
+move.b R0,_ebuf
+*line 50
+move #1,_ebflag
+*line 51
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_res1
+.text
+_ef_res1:
+~~ef_res1:
+~n=8
+link R14,#0
+movem.l R4-R7/R13-R13,-(sp)
+~ival=R7
+~grp=R6
+~vg=R5
+~ep=R13
+*line 70
+clr _ebflag
+*line 71
+tst _angroup
+bge L10003
+move _angroup,R0
+neg R0
+bra L10005
+L10003:move _angroup,R0
+L10005:move R0,R6
+sub #1,R6
+*line 72
+move.b _ebuf,R7
+ext.w R7
+and #255,R7
+*line 74
+*line 75
+cmp #3,R7
+blt L10006
+cmp #8,R7
+ble L3
+L10006:*line 75
+move #-1,R0
+bra L2
+*line 76
+L3:
+*line 77
+move 8(R14),R0
+asl #5,R0
+ext.l R0
+move R6,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+add.l #_anrs,R0
+move.l R0,R8
+move R7,(R8)
+*line 79
+*line 80
+tst _recsw
+beq L4
+move R6,R8
+add.l R8,R8
+move.l #_grpstat,R9
+tst 0(R8,R9.l)
+beq L4
+tst _ancmsw
+beq L10007
+move 8(R14),R0
+asl #5,R0
+ext.l R0
+move R6,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_varmode,R9
+move 0(R8,R9.l),R0
+bra L10009
+L10007:move R6,R8
+add.l R8,R8
+move.l #_grpmode,R9
+move 0(R8,R9.l),R0
+L10009:cmp #2,R0
+bne L4
+*line 81
+*line 82
+move R6,R5
+move 8(R14),R0
+asl #4,R0
+or R0,R5
+*line 83
+*line 84
+*line 84
+move #-1,(sp)
+move R5,-(sp)
+move #15,-(sp)
+move.l _t_cur,-(sp)
+move.l _p_cur,-(sp)
+jsr _findev
+adda.l #12,sp
+move.l R0,R13
+move.l R13,R0
+beq L5
+*line 85
+*line 86
+move.b R7,7(R13)
+*line 87
+bra L6
+L5:
+*line 88
+*line 88
+move #6,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L7
+*line 89
+*line 90
+move.b #15,5(R13)
+*line 91
+move.b R5,6(R13)
+*line 92
+move.b R7,7(R13)
+*line 93
+move.l _t_cur,(R13)
+*line 94
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 95
+move #4,(sp)
+move.l R13,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 96
+move #1,_ctrsw
+*line 97
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 98
+jsr _scupd
+*line 99
+L7:L6:
+*line 100
+*line 101
+L4:
+*line 102
+clr R0
+bra L2
+L2:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.globl _rd_res1
+.text
+_rd_res1:
+~~rd_res1:
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~grp=R7
+~chr=R6
+*line 120
+tst _angroup
+bge L10010
+move _angroup,R0
+neg R0
+bra L10012
+L10010:move _angroup,R0
+L10012:move R0,R7
+sub #1,R7
+*line 122
+move 8(R14),R0
+asl #5,R0
+ext.l R0
+move R7,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+add.l #_anrs,R0
+move.l R0,R8
+move (R8),R6
+add #48,R6
+*line 124
+*line 125
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L9
+*line 125
+clr (sp)
+jsr _vbank
+*line 126
+L9:
+*line 127
+move #18,(sp)
+move R6,-(sp)
+move 8(R14),R0
+muls #9,R0
+move R0,-(sp)
+add #6,(sp)
+move #7,-(sp)
+move.l _obj8,-(sp)
+jsr _vputc
+adda.l #10,sp
+*line 129
+clr R0
+bra L8
+L8:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _nd_res1
+.text
+_nd_res1:
+~~nd_res1:
+~n=8
+~k=10
+link R14,#-4
+*line 145
+move 10(R14),R0
+move.b R0,_ebuf
+*line 147
+*line 148
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L11
+*line 148
+clr (sp)
+jsr _vbank
+*line 149
+L11:
+*line 150
+move #98,(sp)
+move 10(R14),-(sp)
+add #48,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+move.l _obj8,-(sp)
+jsr _vputc
+adda.l #10,sp
+*line 152
+clr R0
+bra L10
+L10:unlk R14
+rts
+.globl _et_aval
+.text
+_et_aval:
+~~et_aval:
+~n=8
+link R14,#-6
+movem.l R4-R7,-(sp)
+~val=R7
+~grp=R6
+~gs=R5
+~val1=-2
+~val2=-4
+~val3=-6
+*line 171
+tst _angroup
+bge L10013
+move _angroup,R0
+neg R0
+bra L10015
+L10013:move _angroup,R0
+L10015:move R0,R6
+sub #1,R6
+*line 172
+move R6,R5
+asl #4,R5
+move 8(R14),R8
+add.l R8,R8
+add.l #_var2src,R8
+move (R8),R0
+or R0,R5
+*line 173
+move R5,R0
+muls #10,R0
+add.l #_valents,R0
+move.l R0,R8
+move 8(R8),R7
+asr #5,R7
+*line 175
+*line 175
+tst R7
+bge L13
+*line 176
+*line 177
+move.b #8,_ebuf
+*line 178
+move R7,R0
+neg R0
+move R0,R7
+*line 179
+bra L14
+L13:
+*line 180
+*line 181
+*line 182
+move.b #9,_ebuf
+L14:
+*line 185
+move R7,R0
+ext.l R0
+divs #100,R0
+move R0,-2(R14)
+*line 186
+move R7,R0
+move -2(R14),R1
+muls #100,R1
+sub R1,R0
+ext.l R0
+divs #10,R0
+move.b R0,4+_ebuf
+*line 187
+move -2(R14),R0
+ext.l R0
+divs #10,R0
+move R0,-4(R14)
+*line 188
+move -2(R14),R0
+move -4(R14),R1
+muls #10,R1
+sub R1,R0
+move.b R0,2+_ebuf
+*line 189
+move -4(R14),R0
+move.b R0,1+_ebuf
+*line 191
+move #1,_ebflag
+*line 193
+clr R0
+bra L12
+L12:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _ef_aval
+.text
+_ef_aval:
+~~ef_aval:
+~n=8
+link R14,#0
+movem.l R3-R7/R13-R13,-(sp)
+~val=R7
+~grp=R6
+~src=R5
+~vg=R4
+~ep=R13
+*line 212
+clr _ebflag
+*line 213
+tst _angroup
+bge L10016
+move _angroup,R0
+neg R0
+bra L10018
+L10016:move _angroup,R0
+L10018:move R0,R6
+sub #1,R6
+*line 214
+move 8(R14),R8
+add.l R8,R8
+add.l #_var2src,R8
+move (R8),R5
+*line 215
+move.b 1+_ebuf,R7
+ext.w R7
+muls #100,R7
+move.b 2+_ebuf,R0
+ext.w R0
+muls #10,R0
+add R0,R7
+move.b 4+_ebuf,R0
+ext.w R0
+add R0,R7
+muls #10,R7
+*line 217
+*line 218
+cmp #1000,R7
+ble L16
+*line 218
+move #-1,R0
+bra L15
+*line 219
+L16:
+*line 220
+*line 221
+cmp.b #8,_ebuf
+bne L17
+*line 221
+move R7,R0
+neg R0
+move R0,R7
+*line 222
+L17:
+*line 223
+asl #5,R7
+*line 225
+move R7,(sp)
+move R5,-(sp)
+move R6,-(sp)
+jsr _setsv
+addq.l #4,sp
+*line 227
+*line 228
+tst _recsw
+beq L18
+move R6,R8
+add.l R8,R8
+move.l #_grpstat,R9
+tst 0(R8,R9.l)
+beq L18
+tst _ancmsw
+beq L10019
+move 8(R14),R0
+asl #5,R0
+ext.l R0
+move R6,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_varmode,R9
+move 0(R8,R9.l),R0
+bra L10021
+L10019:move R6,R8
+add.l R8,R8
+move.l #_grpmode,R9
+move 0(R8,R9.l),R0
+L10021:cmp #2,R0
+bne L18
+*line 229
+*line 230
+move R6,R4
+move 8(R14),R0
+asl #4,R0
+or R0,R4
+*line 231
+*line 232
+*line 232
+move #-1,(sp)
+move R4,-(sp)
+move #14,-(sp)
+move.l _t_cur,-(sp)
+move.l _p_cur,-(sp)
+jsr _findev
+adda.l #12,sp
+move.l R0,R13
+move.l R13,R0
+beq L19
+*line 233
+*line 234
+move R7,R0
+ext.l R0
+move.l #$10,R1
+asl.l R1,R0
+move.l R0,16(R13)
+*line 235
+bra L20
+L19:
+*line 236
+*line 236
+move #6,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L21
+*line 237
+*line 238
+move.b #14,5(R13)
+*line 239
+move.b R4,6(R13)
+*line 240
+move R7,R0
+ext.l R0
+move.l #$10,R1
+asl.l R1,R0
+move.l R0,16(R13)
+*line 241
+move.l _t_cur,(R13)
+*line 242
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 243
+move #1,_ctrsw
+*line 244
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 245
+jsr _scupd
+*line 246
+L21:L20:
+*line 247
+*line 248
+L18:
+*line 249
+clr R0
+bra L15
+L15:tst.l (sp)+
+movem.l (sp)+,R4-R7/R13-R13
+unlk R14
+rts
+.globl _rd_aval
+.text
+_rd_aval:
+~~rd_aval:
+~n=8
+link R14,#-10
+movem.l R4-R7,-(sp)
+~grp=R7
+~val=R6
+~gs=R5
+~val1=-2
+~val2=-4
+~buf=-10
+*line 269
+tst _angroup
+bge L10022
+move _angroup,R0
+neg R0
+bra L10024
+L10022:move _angroup,R0
+L10024:move R0,R7
+sub #1,R7
+*line 270
+move R7,R5
+asl #4,R5
+move 8(R14),R8
+add.l R8,R8
+add.l #_var2src,R8
+move (R8),R0
+or R0,R5
+*line 271
+move R5,R0
+muls #10,R0
+add.l #_valents,R0
+move.l R0,R8
+move 8(R8),R6
+asr #5,R6
+*line 273
+*line 273
+tst R6
+bge L23
+*line 274
+*line 275
+move.b #45,-10(R14)
+*line 276
+move R6,R0
+neg R0
+move R0,R6
+*line 277
+bra L24
+L23:
+*line 278
+*line 279
+*line 280
+move.b #43,-10(R14)
+L24:
+*line 283
+move R6,R0
+ext.l R0
+divs #100,R0
+move R0,-2(R14)
+*line 284
+move R6,R0
+move -2(R14),R1
+muls #100,R1
+sub R1,R0
+ext.l R0
+divs #10,R0
+add #48,R0
+move.b R0,-6(R14)
+*line 285
+move -2(R14),R0
+ext.l R0
+divs #10,R0
+move R0,-4(R14)
+*line 286
+move -2(R14),R0
+move -4(R14),R1
+muls #10,R1
+sub R1,R0
+add #48,R0
+move.b R0,-8(R14)
+*line 287
+move -4(R14),R0
+add #48,R0
+move.b R0,-9(R14)
+*line 288
+move.b #46,-7(R14)
+*line 289
+clr.b -5(R14)
+*line 291
+*line 292
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L25
+*line 292
+clr (sp)
+jsr _vbank
+*line 293
+L25:
+*line 294
+move #18,(sp)
+move.l R14,-(sp)
+add.l #-10,(sp)
+move 8(R14),R0
+muls #9,R0
+move R0,-(sp)
+add #8,(sp)
+move #7,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 296
+clr R0
+bra L22
+L22:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _nd_aval
+.text
+_nd_aval:
+~~nd_aval:
+~n=R7
+~k=R6
+link R14,#0
+movem.l R4-R7,-(sp)
+~ec=R5
+*line 314
+move 8(R14),R7
+*line 314
+move 10(R14),R6
+*line 314
+move _stccol,R5
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R5
+*line 316
+*line 317
+cmp #3,R5
+bne L27
+*line 317
+move #-1,R0
+bra L26
+*line 318
+L27:
+*line 319
+move R6,R0
+move R5,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 321
+*line 322
+tst R5
+bne L28
+*line 322
+cmp #8,R6
+bne L10025
+move #45,R0
+bra L10027
+L10025:move #43,R0
+L10027:move R0,R6
+*line 323
+bra L29
+L28:
+*line 324
+add #48,R6
+L29:
+*line 326
+*line 327
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L30
+*line 327
+clr (sp)
+jsr _vbank
+*line 328
+L30:
+*line 329
+move #98,(sp)
+move R6,-(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+move.l _obj8,-(sp)
+jsr _vputc
+adda.l #10,sp
+*line 331
+*line 332
+cmp #4,R5
+bne L31
+*line 332
+clr R0
+bra L26
+*line 333
+L31:
+*line 334
+jsr _advscur
+*line 336
+*line 337
+cmp #2,R5
+bne L32
+*line 337
+jsr _advscur
+*line 338
+L32:
+*line 339
+clr R0
+bra L26
+L26:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _et_agrp
+.text
+_et_agrp:
+~~et_agrp:
+~n=8
+link R14,#-4
+*line 355
+tst _angroup
+bge L10028
+move _angroup,R0
+neg R0
+move R0,(sp)
+bra L10030
+L10028:move _angroup,(sp)
+L10030:move.l #L34,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 356
+move #1,_ebflag
+*line 357
+clr R0
+bra L33
+L33:unlk R14
+rts
+.globl _ef_agrp
+.text
+_ef_agrp:
+~~ef_agrp:
+~n=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~ival=R7
+*line 375
+clr _ebflag
+*line 376
+move.b _ebuf,R7
+ext.w R7
+add #-48,R7
+muls #10,R7
+move.b 1+_ebuf,R0
+ext.w R0
+add R0,R7
+add #-48,R7
+*line 378
+*line 379
+cmp #12,R7
+bgt L10031
+cmp #1,R7
+bge L36
+L10031:*line 379
+move #-1,R0
+bra L35
+*line 380
+L36:
+*line 381
+tst _angroup
+bge L10032
+move R7,R0
+neg R0
+bra L10034
+L10032:move R7,R0
+L10034:move R0,_angroup
+*line 383
+jsr _ds_anmd
+*line 384
+jsr _ds_anrs
+*line 385
+jsr _ds_anvl
+*line 386
+clr R0
+bra L35
+L35:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _rd_agrp
+.text
+_rd_agrp:
+~~rd_agrp:
+~n=8
+link R14,#-8
+~buf=-4
+*line 404
+tst _angroup
+bge L10035
+move _angroup,R0
+neg R0
+move R0,(sp)
+bra L10037
+L10035:move _angroup,(sp)
+L10037:move.l #L38,-(sp)
+move.l R14,-(sp)
+sub.l #4,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 406
+*line 407
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L39
+*line 407
+clr (sp)
+jsr _vbank
+*line 408
+L39:
+*line 409
+move #18,(sp)
+move.l R14,-(sp)
+sub.l #4,(sp)
+move #61,-(sp)
+move #7,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 411
+clr R0
+bra L37
+L37:unlk R14
+rts
+.globl _nd_agrp
+.text
+_nd_agrp:
+~~nd_agrp:
+~n=8
+~k=10
+link R14,#0
+movem.l R6-R7,-(sp)
+~ec=R7
+*line 429
+move _stccol,R7
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R7
+*line 431
+move 10(R14),R0
+add #48,R0
+move R7,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 433
+*line 434
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L41
+*line 434
+clr (sp)
+jsr _vbank
+*line 435
+L41:
+*line 436
+move #98,(sp)
+move 10(R14),-(sp)
+add #48,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+move.l _obj8,-(sp)
+jsr _vputc
+adda.l #10,sp
+*line 437
+jsr _advscur
+*line 439
+clr R0
+bra L40
+L40:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.data
+L34:.dc.b $25,$30,$32,$2E,$32,$64,$0
+L38:.dc.b $25,$30,$32,$2E,$32,$64,$0
Index: alcyon/etscor.s
===================================================================
--- alcyon/etscor.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etscor.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,209 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _obj8
+.globl _curscor
+.globl _insmode
+.globl _stccol
+.globl _dspbuf
+.globl _et_scor
+.text
+_et_scor:
+~~et_scor:
+link R14,#-4
+*line 36
+move _curscor,(sp)
+add #1,(sp)
+move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 37
+move #1,_ebflag
+*line 39
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_scor
+.text
+_ef_scor:
+~~ef_scor:
+link R14,#0
+movem.l R6-R7,-(sp)
+~ival=R7
+*line 56
+clr.b 2+_ebuf
+*line 57
+move.b _ebuf,R7
+ext.w R7
+add #-48,R7
+muls #10,R7
+move.b 1+_ebuf,R0
+ext.w R0
+add R0,R7
+add #-48,R7
+*line 59
+clr _ebflag
+*line 61
+*line 62
+cmp #20,R7
+bgt L10000
+tst R7
+bne L4
+L10000:*line 62
+move #-1,R0
+bra L3
+*line 63
+L4:
+*line 64
+*line 64
+tst _insmode
+beq L5
+*line 65
+*line 66
+jsr _icancel
+*line 67
+jsr _dsimode
+*line 68
+*line 69
+L5:
+*line 70
+move R7,(sp)
+sub #1,(sp)
+jsr _selscor
+*line 71
+jsr _sdwins
+*line 72
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _rd_scor
+.text
+_rd_scor:
+~~rd_scor:
+link R14,#-4
+*line 84
+move _curscor,(sp)
+add #1,(sp)
+move.l #L7,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 86
+*line 87
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L8
+*line 87
+clr (sp)
+jsr _vbank
+*line 88
+L8:
+*line 89
+move #19,(sp)
+move.l #_dspbuf,-(sp)
+move #7,-(sp)
+move #8,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 91
+clr R0
+bra L6
+L6:unlk R14
+rts
+.globl _nd_scor
+.text
+_nd_scor:
+~~nd_scor:
+~n=8
+~k=10
+link R14,#0
+movem.l R6-R7,-(sp)
+~ec=R7
+*line 109
+move _stccol,R7
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R7
+*line 110
+move 10(R14),R0
+add #48,R0
+move R7,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 112
+*line 113
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L10
+*line 113
+clr (sp)
+jsr _vbank
+*line 114
+L10:
+*line 115
+move #99,(sp)
+move 10(R14),-(sp)
+add #48,(sp)
+move _stccol,-(sp)
+move #8,-(sp)
+move.l _obj8,-(sp)
+jsr _vputc
+adda.l #10,sp
+*line 116
+jsr _advscur
+*line 118
+clr R0
+bra L9
+L9:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$30,$32,$2E,$32,$64,$0
+L7:.dc.b $25,$30,$32,$2E,$32,$64,$0
Index: alcyon/etsnbt.s
===================================================================
--- alcyon/etsnbt.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etsnbt.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,281 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _obj8
+.globl _clkrun
+.globl _insmode
+.globl _stccol
+.globl _t_cur
+.globl _et_snbt
+.text
+_et_snbt:
+~~et_snbt:
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~curfr=R7
+~beat=R6
+*line 42
+*line 42
+tst _clkrun
+beq L2
+*line 43
+*line 44
+clr _ebflag
+*line 45
+move #-1,R0
+bra L1
+*line 46
+*line 47
+L2:
+*line 48
+move.l _t_cur,R7
+*line 49
+move.l #$30,-(sp)
+move.l R7,-(sp)
+jsr ldiv
+addq.l #8,sp
+move.l R0,R6
+*line 51
+move.l R6,(sp)
+move.l #L3,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 52
+move #1,_ebflag
+*line 54
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _ef_snbt
+.text
+_ef_snbt:
+~~ef_snbt:
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~ival=R7
+~i=R6
+*line 70
+*line 71
+tst _clkrun
+beq L5
+*line 71
+move #-1,R0
+bra L4
+*line 72
+L5:
+*line 73
+clr.l R7
+*line 75
+clr R6
+bra L8
+L9:
+*line 76
+move.l #$a,-(sp)
+move.l R7,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,R7
+move.l #_ebuf,R8
+move.b 0(R8,R6),R0
+ext.w R0
+add #-48,R0
+ext.l R0
+add.l R0,R7
+L7:
+*line 75
+add #1,R6
+L8:
+*line 75
+cmp #5,R6
+blt L9
+L6:
+*line 78
+clr _ebflag
+*line 80
+*line 80
+tst _insmode
+beq L10
+*line 81
+*line 82
+jsr _icancel
+*line 83
+jsr _dsimode
+*line 84
+*line 85
+L10:
+*line 86
+move.l #$30,-(sp)
+move.l R7,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,_fc_val
+move.l R0,(sp)
+jsr _sc_goto
+*line 87
+clr R0
+bra L4
+L4:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _rd_snbt
+.text
+_rd_snbt:
+~~rd_snbt:
+~n=8
+link R14,#-8
+movem.l R5-R7,-(sp)
+~curfr=R7
+~beat=R6
+~buf=-8
+*line 106
+move.l _t_cur,R7
+*line 107
+move.l #$30,-(sp)
+move.l R7,-(sp)
+jsr ldiv
+addq.l #8,sp
+move.l R0,R6
+*line 108
+move.l R6,(sp)
+move.l #L12,-(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 110
+*line 111
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L13
+*line 111
+clr (sp)
+jsr _vbank
+*line 112
+L13:
+*line 113
+move #19,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move #11,-(sp)
+clr -(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 115
+clr R0
+bra L11
+L11:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _nd_snbt
+.text
+_nd_snbt:
+~~nd_snbt:
+~n=R7
+~k=R6
+link R14,#0
+movem.l R4-R7,-(sp)
+~ec=R5
+*line 133
+move 8(R14),R7
+*line 133
+move 10(R14),R6
+*line 133
+*line 134
+tst _clkrun
+beq L15
+*line 134
+move #-1,R0
+bra L14
+*line 135
+L15:
+*line 136
+move _stccol,R5
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R5
+*line 137
+move R6,R0
+add #48,R0
+move R5,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 139
+*line 140
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L16
+*line 140
+clr (sp)
+jsr _vbank
+*line 141
+L16:
+*line 142
+move #99,(sp)
+move R6,-(sp)
+add #48,(sp)
+move _stccol,-(sp)
+clr -(sp)
+move.l _obj8,-(sp)
+jsr _vputc
+adda.l #10,sp
+*line 143
+jsr _advscur
+*line 145
+clr R0
+bra L14
+L14:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
+L3:.dc.b $25,$30,$35,$6C,$64,$0
+L12:.dc.b $25,$30,$35,$6C,$64,$0
Index: alcyon/etstrn.s
===================================================================
--- alcyon/etstrn.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etstrn.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,284 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _obj8
+.globl _grptran
+.globl _sdmctl
+.globl _vtccol
+.globl _vtcrow
+.globl _vtxval
+.globl _vtyval
+.globl _dspbuf
+.globl _et_strn
+.text
+_et_strn:
+~~et_strn:
+link R14,#-4
+*line 40
+tst _grptran
+bge L10000
+move _grptran,R0
+neg R0
+move R0,(sp)
+bra L10002
+L10000:move _grptran,(sp)
+L10002:tst _grptran
+bge L10003
+move #45,-(sp)
+bra L10005
+L10003:move #43,-(sp)
+L10005:move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 42
+move #1,_ebflag
+*line 44
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_strn
+.text
+_ef_strn:
+~~ef_strn:
+link R14,#0
+movem.l R6-R7,-(sp)
+~ival=R7
+*line 61
+clr.b 3+_ebuf
+*line 62
+move.b 1+_ebuf,R7
+ext.w R7
+add #-48,R7
+muls #10,R7
+move.b 2+_ebuf,R0
+ext.w R0
+add R0,R7
+add #-48,R7
+*line 64
+clr _ebflag
+*line 66
+*line 67
+tst R7
+beq L4
+cmp.b #45,_ebuf
+bne L4
+*line 67
+move R7,R0
+neg R0
+move R0,R7
+*line 68
+L4:
+*line 69
+move R7,_grptran
+*line 71
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _rd_strn
+.text
+_rd_strn:
+~~rd_strn:
+link R14,#-4
+*line 83
+tst _grptran
+bge L10006
+move _grptran,R0
+neg R0
+move R0,(sp)
+bra L10008
+L10006:move _grptran,(sp)
+L10008:tst _grptran
+bge L10009
+move #45,-(sp)
+bra L10011
+L10009:move #43,-(sp)
+L10011:move.l #L6,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 85
+*line 86
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L7
+*line 86
+clr (sp)
+jsr _vbank
+*line 87
+L7:
+*line 88
+move #20,(sp)
+move.l #_dspbuf,-(sp)
+move #22,-(sp)
+move #7,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 90
+clr R0
+bra L5
+L5:unlk R14
+rts
+.globl _nd_strn
+.text
+_nd_strn:
+~~nd_strn:
+~n=8
+~k=10
+link R14,#0
+movem.l R6-R7,-(sp)
+~ec=R7
+*line 108
+*line 109
+cmp #4,_sdmctl
+beq L9
+*line 109
+move #-1,R0
+bra L8
+*line 110
+L9:
+*line 111
+*line 112
+cmp #22,_vtccol
+blt L10
+cmp #24,_vtccol
+bgt L10
+*line 112
+move _vtccol,R7
+add #-22,R7
+*line 113
+bra L11
+L10:
+*line 114
+move #-1,R0
+bra L8
+L11:
+*line 116
+*line 116
+tst R7
+bne L12
+*line 117
+*line 118
+*line 119
+cmp #8,10(R14)
+bne L13
+*line 119
+move #45,10(R14)
+bra L14
+L13:
+*line 120
+*line 121
+cmp #9,10(R14)
+bne L15
+*line 121
+move #43,10(R14)
+*line 122
+bra L16
+L15:
+*line 123
+move #-1,R0
+bra L8
+L16:L14:
+*line 124
+bra L17
+L12:
+*line 125
+add #48,10(R14)
+L17:
+*line 127
+move 10(R14),R0
+move R7,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 129
+*line 130
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L18
+*line 130
+clr (sp)
+jsr _vbank
+*line 131
+L18:
+*line 132
+move #100,(sp)
+move 10(R14),-(sp)
+move _vtccol,-(sp)
+move #7,-(sp)
+move.l _obj8,-(sp)
+jsr _vputc
+adda.l #10,sp
+*line 134
+*line 134
+cmp #24,_vtccol
+bge L19
+*line 135
+*line 136
+add #1,_vtccol
+*line 137
+move _vtccol,R0
+asl #3,R0
+move R0,_vtxval
+*line 138
+move _vtccol,(sp)
+move _vtcrow,-(sp)
+jsr _ttcpos
+addq.l #2,sp
+*line 139
+*line 140
+L19:
+*line 141
+clr R0
+bra L8
+L8:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$63,$25,$30,$32,$64,$0
+L6:.dc.b $25,$63,$25,$30,$32,$64,$0
Index: alcyon/ettpch.s
===================================================================
--- alcyon/ettpch.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/ettpch.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,618 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _stcrow
+.globl _stccol
+.globl _cents
+.globl _tdbox
+.globl _tuntab
+.globl _dspbuf
+.globl _sfdsp
+.globl _tunob
+.globl _loc2key
+.text
+_loc2key:
+~~loc2key:
+~row=8
+~col=10
+link R14,#-4
+*line 54
+*line 54
+cmp #24,8(R14)
+bne L2
+*line 55
+*line 56
+*line 57
+cmp #6,10(R14)
+ble L3
+cmp #39,10(R14)
+bge L3
+*line 57
+move #-1,R0
+bra L1
+bra L4
+L3:
+*line 58
+*line 59
+cmp #52,10(R14)
+ble L5
+*line 59
+move #-9,R0
+bra L1
+*line 60
+bra L6
+L5:
+*line 61
+move #-10,R0
+bra L1
+L6:L4:
+*line 62
+bra L7
+L2:
+*line 63
+*line 64
+cmp #12,10(R14)
+bge L8
+*line 64
+move 8(R14),R0
+bra L1
+bra L9
+L8:
+*line 65
+*line 66
+cmp #11,10(R14)
+ble L10
+cmp #22,10(R14)
+bge L10
+*line 66
+move 8(R14),R0
+add #24,R0
+bra L1
+bra L11
+L10:
+*line 67
+*line 68
+cmp #21,10(R14)
+ble L12
+cmp #32,10(R14)
+bge L12
+*line 68
+move 8(R14),R0
+add #48,R0
+bra L1
+bra L13
+L12:
+*line 69
+*line 70
+cmp #31,10(R14)
+ble L14
+cmp #42,10(R14)
+bge L14
+*line 70
+move 8(R14),R0
+add #72,R0
+bra L1
+bra L15
+L14:
+*line 71
+*line 72
+cmp #41,10(R14)
+ble L16
+cmp #53,10(R14)
+bge L16
+*line 72
+move 8(R14),R0
+add #96,R0
+bra L1
+bra L17
+L16:
+*line 73
+*line 74
+cmp #52,10(R14)
+ble L18
+cmp #8,8(R14)
+bge L18
+*line 74
+move 8(R14),R0
+add #120,R0
+bra L1
+bra L19
+L18:
+*line 75
+*line 75
+cmp #52,10(R14)
+ble L20
+*line 76
+*line 77
+*line 78
+cmp #9,8(R14)
+beq L10000
+cmp #10,8(R14)
+bne L21
+L10000:*line 78
+move #-2,R0
+bra L1
+bra L22
+L21:
+*line 79
+*line 80
+cmp #12,8(R14)
+bne L23
+*line 80
+move #-3,R0
+bra L1
+bra L24
+L23:
+*line 81
+*line 82
+cmp #14,8(R14)
+bne L25
+*line 82
+move #-4,R0
+bra L1
+bra L26
+L25:
+*line 83
+*line 84
+cmp #16,8(R14)
+bne L27
+*line 84
+move #-5,R0
+bra L1
+bra L28
+L27:
+*line 85
+*line 86
+cmp #18,8(R14)
+bne L29
+*line 86
+move #-6,R0
+bra L1
+bra L30
+L29:
+*line 87
+*line 88
+cmp #20,8(R14)
+bne L31
+*line 88
+move #-7,R0
+bra L1
+bra L32
+L31:
+*line 89
+*line 90
+cmp #22,8(R14)
+bne L33
+*line 90
+move #-8,R0
+bra L1
+*line 91
+bra L34
+L33:
+*line 92
+move #-10,R0
+bra L1
+L34:L32:L30:L28:L26:L24:L22:
+*line 93
+L20:L19:L17:L15:L13:L11:L9:L7:L1:unlk R14
+rts
+.globl _et_tpch
+.text
+_et_tpch:
+~~et_tpch:
+~nn=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~key=R7
+~val=R6
+*line 111
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _loc2key
+addq.l #2,sp
+move R0,R7
+*line 113
+*line 114
+tst R7
+bge L36
+*line 114
+move #-1,R0
+bra L35
+*line 115
+L36:
+*line 116
+move R7,R8
+add.l R8,R8
+add.l #_tuntab,R8
+move (R8),R6
+*line 117
+move R6,R0
+asr #1,R0
+move R0,(sp)
+move.l #_ebuf,-(sp)
+jsr _cnvc2p
+addq.l #4,sp
+*line 118
+move #1,_ebflag
+*line 119
+clr R0
+bra L35
+L35:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _ef_tpch
+.text
+_ef_tpch:
+~~ef_tpch:
+~nn=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~key=R7
+*line 137
+clr _ebflag
+*line 138
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _loc2key
+addq.l #2,sp
+move R0,R7
+*line 140
+*line 141
+tst R7
+bge L38
+*line 141
+move #-1,R0
+bra L37
+*line 142
+L38:
+*line 143
+*line 144
+jsr _cnvp2c
+cmp #-1,R0
+bne L39
+*line 144
+move #-1,R0
+bra L37
+*line 145
+L39:
+*line 146
+jsr _modtun
+*line 147
+move _cents,R0
+asl #1,R0
+move R7,R9
+add.l R9,R9
+add.l #_tuntab,R9
+move R0,(R9)
+*line 148
+clr R0
+bra L37
+L37:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _rd_tpch
+.text
+_rd_tpch:
+~~rd_tpch:
+~nn=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~val=R7
+~key=R6
+~n=R5
+*line 166
+move 8(R14),R5
+and #255,R5
+*line 167
+move.l _cfetp,R8
+move 2(R8),(sp)
+move.l _cfetp,R8
+move (R8),-(sp)
+jsr _loc2key
+addq.l #2,sp
+move R0,R6
+*line 168
+move R6,R8
+add.l R8,R8
+add.l #_tuntab,R8
+move (R8),R7
+*line 170
+move R7,R0
+asr #1,R0
+move R0,(sp)
+move.l #_dspbuf,-(sp)
+jsr _cnvc2p
+addq.l #4,sp
+*line 172
+add.b #48,_dspbuf
+*line 173
+add.b #65,1+_dspbuf
+*line 174
+move.b 2+_dspbuf,R0
+ext.w R0
+ext.l R0
+add.l #_sfdsp,R0
+move.l R0,R8
+move.b -7(R8),2+_dspbuf
+*line 175
+add.b #48,3+_dspbuf
+*line 176
+add.b #48,4+_dspbuf
+*line 177
+clr.b 5+_dspbuf
+*line 179
+clr (sp)
+jsr _vbank
+*line 180
+*line 181
+*line 182
+*line 183
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move.l _cfetp,R8
+move 2(R8),-(sp)
+move.l _cfetp,R8
+move (R8),-(sp)
+move R5,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 10(R8,R9.l),-(sp)
+cmp #320,R7
+beq L10002
+cmp #21920,R7
+bne L10001
+L10002:move #10,-(sp)
+bra L10004
+L10001:move R5,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 8(R8,R9.l),-(sp)
+L10004:move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 185
+clr R0
+bra L40
+L40:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _nd_tpch
+.text
+_nd_tpch:
+~~nd_tpch:
+~nn=8
+~k=10
+link R14,#0
+movem.l R5-R7,-(sp)
+~col=R7
+~n=R6
+*line 203
+move 8(R14),R6
+and #255,R6
+*line 205
+*line 206
+cmp #11,_stccol
+bge L42
+*line 206
+move _stccol,R7
+sub #6,R7
+bra L43
+L42:
+*line 207
+*line 208
+cmp #21,_stccol
+bge L44
+*line 208
+move _stccol,R7
+add #-16,R7
+bra L45
+L44:
+*line 209
+*line 210
+cmp #31,_stccol
+bge L46
+*line 210
+move _stccol,R7
+add #-26,R7
+bra L47
+L46:
+*line 211
+*line 212
+cmp #41,_stccol
+bge L48
+*line 212
+move _stccol,R7
+add #-36,R7
+bra L49
+L48:
+*line 213
+*line 214
+cmp #52,_stccol
+bge L50
+*line 214
+move _stccol,R7
+add #-47,R7
+*line 215
+bra L51
+L50:
+*line 216
+move _stccol,R7
+add #-58,R7
+L51:L49:L47:L45:L43:
+*line 218
+move R7,R0
+bra L53
+*line 219
+L54:
+*line 220
+*line 221
+*line 222
+move 10(R14),R0
+move.b R0,_ebuf
+*line 223
+move 10(R14),R0
+add #48,R0
+move.b R0,_dspbuf
+bra L52
+*line 224
+*line 225
+L55:
+*line 226
+*line 227
+*line 228
+*line 229
+cmp #6,10(R14)
+ble L56
+*line 229
+move #-1,R0
+bra L41
+*line 230
+L56:
+*line 231
+move 10(R14),R0
+move.b R0,1+_ebuf
+*line 232
+move 10(R14),R0
+add #65,R0
+move.b R0,_dspbuf
+bra L52
+*line 233
+*line 234
+*line 235
+L57:
+*line 236
+*line 237
+*line 238
+*line 238
+cmp #7,10(R14)
+bne L58
+*line 239
+*line 240
+move 10(R14),R0
+move.b R0,2+_ebuf
+*line 241
+move.b _sfdsp,_dspbuf
+bra L52
+*line 242
+*line 243
+bra L59
+L58:
+*line 244
+*line 244
+cmp #8,10(R14)
+bne L60
+*line 245
+*line 246
+move 10(R14),R0
+move.b R0,2+_ebuf
+*line 247
+move.b 1+_sfdsp,_dspbuf
+bra L52
+*line 248
+*line 249
+bra L61
+L60:
+*line 250
+*line 250
+cmp #9,10(R14)
+bne L62
+*line 251
+*line 252
+move 10(R14),R0
+move.b R0,2+_ebuf
+*line 253
+move.b 2+_sfdsp,_dspbuf
+bra L52
+*line 254
+*line 255
+*line 256
+bra L63
+L62:
+*line 257
+move #-1,R0
+bra L41
+L63:L61:L59:
+*line 258
+*line 259
+L64:
+*line 260
+L65:
+*line 261
+*line 262
+*line 263
+move 10(R14),R0
+move R7,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 264
+move 10(R14),R0
+add #48,R0
+move.b R0,_dspbuf
+bra L52
+*line 265
+bra L52
+L53:cmp #4,R0
+bhi L52
+asl #2,R0
+move R0,R8
+add.l #L66,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L66:.dc.l L54
+.dc.l L55
+.dc.l L57
+.dc.l L64
+.dc.l L65
+.text
+L52:
+*line 268
+clr.b 1+_dspbuf
+*line 270
+clr (sp)
+jsr _vbank
+*line 271
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 10(R8,R9.l),-(sp)
+move #12,-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 273
+*line 274
+cmp #4,R7
+bne L67
+*line 274
+clr R0
+bra L41
+*line 275
+L67:
+*line 276
+jsr _advtcur
+*line 277
+clr R0
+bra L41
+L41:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.data
Index: alcyon/ettrns.s
===================================================================
--- alcyon/ettrns.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/ettrns.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,603 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _obj8
+.globl _ctrsw
+.globl _recsw
+.globl _stccol
+.globl _stcrow
+.globl _s_trns
+.globl _dspbuf
+.globl _grpdyn
+.globl _grpmode
+.globl _grpstat
+.globl _gdstbc
+.globl _et_trns
+.text
+_et_trns:
+~~et_trns:
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~trval=R7
+~trsign=R6
+*line 52
+move 8(R14),R8
+add.l R8,R8
+add.l #_s_trns,R8
+move (R8),R7
+*line 54
+*line 54
+tst R7
+bge L2
+*line 55
+*line 56
+move R7,R0
+neg R0
+move R0,R7
+*line 57
+move.b #45,R6
+*line 58
+bra L3
+L2:
+*line 59
+*line 60
+*line 61
+move.b #43,R6
+L3:
+*line 64
+move.b R6,R0
+ext.w R0
+move R0,(sp) 
+move R7,-(sp)
+move.l #L4,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 66
+move #1,_ebflag
+*line 72
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _ef_trns
+.text
+_ef_trns:
+~~ef_trns:
+~n=8
+link R14,#0
+movem.l R5-R7/R12-R13,-(sp)
+~i=R7
+~trval=R6
+~ep=R13
+~trnval=R12
+*line 91
+clr.b 5+_ebuf
+*line 97
+clr _ebflag
+*line 98
+clr R6
+*line 100
+clr R7
+bra L8
+L9:
+*line 101
+muls #10,R6
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R6
+add #-48,R6
+L7:
+*line 100
+add #1,R7
+L8:
+*line 100
+cmp #4,R7
+blt L9
+L6:
+*line 103
+*line 104
+cmp #1200,R6
+ble L10
+*line 104
+move #-1,R0
+bra L5
+*line 105
+L10:
+*line 106
+*line 107
+cmp.b #45,4+_ebuf
+bne L11
+*line 107
+move R6,R0
+neg R0
+move R0,R6
+*line 108
+L11:
+*line 109
+move 8(R14),R8
+add.l R8,R8
+add.l #_s_trns,R8
+move R6,(R8)
+*line 110
+jsr _settune
+*line 112
+*line 112
+tst _recsw
+beq L12
+move 8(R14),R8
+add.l R8,R8
+move.l #_grpmode,R9
+tst 0(R8,R9.l)
+beq L12
+move 8(R14),R8
+add.l R8,R8
+add.l #_grpmode,R8
+cmp #2,(R8)
+bne L12
+*line 113
+*line 114
+move R6,R0
+ext.l R0
+move.l #$10,R1
+asl.l R1,R0
+move.l R0,R12
+*line 115
+*line 116
+*line 116
+move #-1,(sp)
+move 8(R14),-(sp)
+move #17,-(sp)
+move.l _t_cur,-(sp)
+move.l _p_cur,-(sp)
+jsr _findev
+adda.l #12,sp
+move.l R0,R13
+move.l R13,R0
+beq L13
+*line 117
+*line 118
+move.l R12,24(R13)
+*line 119
+bra L14
+L13:
+*line 120
+*line 120
+move #8,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L15
+*line 121
+*line 122
+move.b #17,5(R13)
+*line 123
+move.l _t_cur,(R13)
+*line 124
+move 8(R14),R0
+move.b R0,6(R13)
+*line 125
+move.l R12,24(R13)
+*line 126
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 127
+move #5,(sp)
+move.l R13,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 128
+move #1,_ctrsw
+*line 129
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 130
+jsr _scupd
+*line 131
+L15:L14:
+*line 132
+*line 133
+*line 136
+L12:
+*line 137
+clr R0
+bra L5
+L5:tst.l (sp)+
+movem.l (sp)+,R6-R7/R12-R13
+unlk R14
+rts
+.globl _rd_trns
+.text
+_rd_trns:
+~~rd_trns:
+~n=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~trval=R7
+~i=R6
+~trsign=R5
+*line 156
+move 8(R14),R8
+add.l R8,R8
+add.l #_s_trns,R8
+move (R8),R7
+*line 158
+*line 158
+tst R7
+bge L17
+*line 159
+*line 160
+move.b #45,R5
+*line 161
+move R7,R0
+neg R0
+move R0,R7
+*line 162
+bra L18
+L17:
+*line 163
+*line 164
+*line 165
+move.b #43,R5
+L18:
+*line 168
+move R7,(sp)
+move.l #L19,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 174
+*line 174
+cmp.b #45,R5
+bne L20
+*line 175
+*line 176
+*line 177
+cmp.b #49,_dspbuf
+bne L21
+*line 177
+move.b #161,_dspbuf
+*line 178
+bra L22
+L21:
+*line 179
+move.b #45,_dspbuf
+L22:
+*line 180
+bra L23
+L20:
+*line 181
+*line 182
+*line 183
+*line 184
+cmp.b #49,_dspbuf
+bne L24
+*line 184
+move.b #160,_dspbuf
+*line 185
+bra L25
+L24:
+*line 186
+move.b #43,_dspbuf
+L25:L23:
+*line 194
+*line 195
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L26
+*line 195
+clr (sp)
+jsr _vbank
+*line 196
+L26:
+*line 197
+move #18,(sp)
+move.l #_dspbuf,-(sp)
+move 8(R14),R0
+add #1,R0
+muls #5,R0
+move R0,-(sp)
+move #3,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 199
+clr R0
+bra L16
+L16:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _ds_trns
+.text
+_ds_trns:
+~~ds_trns:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 215
+clr R7
+bra L30
+L31:
+*line 216
+move R7,(sp)
+jsr _rd_trns
+L29:
+*line 215
+add #1,R7
+L30:
+*line 215
+cmp #12,R7
+blt L31
+L28:L27:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _nd_trns
+.text
+_nd_trns:
+~~nd_trns:
+~k=R7
+~n=8
+link R14,#0
+movem.l R3-R7,-(sp)
+~ec=R6
+~c=R5
+~advsw=R4
+*line 235
+move 10(R14),R7
+*line 235
+move _stccol,R6
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R6
+*line 242
+move #1,R4
+*line 244
+*line 244
+tst R6
+bne L33
+*line 245
+*line 246
+move R7,R0
+bra L35
+*line 247
+L36:
+*line 248
+*line 249
+*line 250
+move.b #48,_ebuf
+*line 251
+move.b 4+_ebuf,R7
+ext.w R7
+bra L34
+*line 252
+*line 253
+L37:
+*line 254
+*line 255
+*line 256
+*line 257
+cmp.b #43,4+_ebuf
+bne L38
+*line 257
+move #160,R7
+*line 258
+bra L39
+L38:
+*line 259
+move #161,R7
+L39:
+*line 260
+*line 261
+move.b #49,_ebuf
+bra L34
+*line 262
+*line 263
+L40:
+*line 264
+*line 265
+*line 266
+*line 267
+cmp.b #48,_ebuf
+bne L41
+*line 267
+move #45,R7
+*line 268
+bra L42
+L41:
+*line 269
+move #161,R7
+L42:
+*line 270
+*line 271
+move.b #45,4+_ebuf
+*line 272
+clr R4
+bra L34
+*line 273
+*line 274
+*line 275
+L43:
+*line 276
+*line 277
+*line 278
+*line 279
+cmp.b #48,_ebuf
+bne L44
+*line 279
+move #43,R7
+*line 280
+bra L45
+L44:
+*line 281
+move #160,R7
+L45:
+*line 282
+*line 283
+move.b #43,4+_ebuf
+*line 284
+clr R4
+bra L34
+*line 285
+*line 286
+L46:
+*line 287
+*line 288
+*line 289
+move #-1,R0
+bra L32
+bra L34
+L35:tst R0
+beq L36
+cmp #1,R0
+beq L37
+cmp #8,R0
+beq L40
+cmp #9,R0
+beq L43
+bra L46
+L34:
+*line 290
+*line 291
+bra L47
+L33:
+*line 292
+*line 293
+*line 294
+move R7,R0
+add #48,R0
+move R6,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+L47:
+*line 297
+cmp #9,R7
+ble L10000
+move R7,R0
+bra L10002
+L10000:move R7,R0
+add #48,R0
+L10002:move.b R0,_dspbuf
+*line 298
+clr.b 1+_dspbuf
+*line 300
+*line 301
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L48
+*line 301
+clr (sp)
+jsr _vbank
+*line 302
+L48:
+*line 303
+move #98,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move #3,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 309
+*line 310
+tst R4
+beq L49
+*line 310
+jsr _advscur
+*line 311
+L49:
+*line 312
+clr R0
+bra L32
+L32:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.data
+L4:.dc.b $25,$30,$34,$2E,$34,$64,$25,$63,$0
+L19:.dc.b $25,$30,$34,$2E,$34,$64,$0
Index: alcyon/etttab.s
===================================================================
--- alcyon/etttab.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etttab.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,171 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _tunob
+.globl _stcrow
+.globl _stccol
+.globl _curtun
+.globl _tunmod
+.globl _tdbox
+.globl _dspbuf
+.globl _et_ttab
+.text
+_et_ttab:
+~~et_ttab:
+~n=8
+link R14,#-4
+*line 39
+move _curtun,(sp)
+move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 40
+move #1,_ebflag
+*line 42
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_ttab
+.text
+_ef_ttab:
+~~ef_ttab:
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~i=R7
+~tmpval=R6
+*line 57
+clr.b 1+_ebuf
+*line 58
+clr _ebflag
+*line 60
+move.b _ebuf,R0
+ext.w R0
+add #-48,R0
+move R0,_curtun
+*line 61
+jsr _modtun
+*line 62
+move #54,(sp)
+move #22,-(sp)
+jsr _settc
+addq.l #2,sp
+*line 63
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _rd_ttab
+.text
+_rd_ttab:
+~~rd_ttab:
+~nn=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~n=R7
+*line 81
+move 8(R14),R7
+and #255,R7
+*line 82
+move _curtun,(sp)
+move.l #L5,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 84
+clr (sp)
+jsr _vbank
+*line 85
+*line 86
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move #61,-(sp)
+move #24,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 10(R8,R9.l),-(sp)
+tst _tunmod
+beq L10000
+move #14,-(sp)
+bra L10002
+L10000:move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 8(R8,R9.l),-(sp)
+L10002:move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 88
+clr R0
+bra L4
+L4:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _nd_ttab
+.text
+_nd_ttab:
+~~nd_ttab:
+~k=R7
+~nn=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~n=R6
+*line 104
+move 10(R14),R7
+*line 104
+move 8(R14),R6
+and #255,R6
+*line 106
+move R7,R0
+add #48,R0
+move.b R0,_ebuf
+*line 107
+clr.b 1+_ebuf
+*line 109
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 110
+clr.b 1+_dspbuf
+*line 112
+clr (sp)
+jsr _vbank
+*line 113
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 10(R8,R9.l),-(sp)
+move #12,-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 115
+clr R0
+bra L6
+L6:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$64,$0
+L5:.dc.b $25,$64,$0
Index: alcyon/ettval.s
===================================================================
--- alcyon/ettval.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/ettval.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,374 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _tunob
+.globl _stcrow
+.globl _stccol
+.globl _tunval
+.globl _tunmod
+.globl _tdbox
+.globl _dspbuf
+.globl _modtun
+.text
+_modtun:
+~~modtun:
+link R14,#-4
+*line 37
+*line 37
+tst _tunmod
+bne L2
+*line 38
+*line 39
+move #1,_tunmod
+*line 40
+move #6,(sp)
+jsr _tdswin
+*line 41
+L2:L1:unlk R14
+rts
+.globl _et_tval
+.text
+_et_tval:
+~~et_tval:
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~tv=R7
+~ts=R6
+*line 60
+tst _tunval
+bge L10000
+move _tunval,R0
+neg R0
+bra L10002
+L10000:move _tunval,R0
+L10002:move R0,R7
+asr R7
+*line 61
+tst _tunval
+bge L10003
+move #45,R0
+bra L10005
+L10003:move #43,R0
+L10005:move.b R0,R6
+*line 63
+move R7,(sp)
+move.b R6,R0
+ext.w R0
+move R0,-(sp) 
+move.l #L4,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 64
+move #1,_ebflag
+*line 66
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _ef_tval
+.text
+_ef_tval:
+~~ef_tval:
+~n=8
+link R14,#0
+movem.l R3-R7/R13-R13,-(sp)
+~ov=R13
+~i=R7
+~tmpval=R6
+~tv=R5
+~ts=R4
+*line 86
+clr.b 5+_ebuf
+*line 87
+clr _ebflag
+*line 89
+clr R6
+*line 91
+move #1,R7
+bra L8
+L9:
+*line 92
+muls #10,R6
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R6
+add #-48,R6
+L7:
+*line 91
+add #1,R7
+L8:
+*line 91
+cmp #5,R7
+blt L9
+L6:
+*line 94
+*line 95
+cmp.b #45,_ebuf
+bne L10
+*line 95
+move R6,R0
+neg R0
+asl #1,R0
+move R0,_tunval
+*line 96
+bra L11
+L10:
+*line 97
+move R6,R0
+asl #1,R0
+move R0,_tunval
+L11:
+*line 99
+tst _tunval
+bge L10006
+move _tunval,R0
+neg R0
+bra L10008
+L10006:move _tunval,R0
+L10008:move R0,R5
+asr R5
+*line 100
+tst _tunval
+bge L10009
+move #45,R0
+bra L10011
+L10009:move #43,R0
+L10011:move.b R0,R4
+*line 101
+move R5,(sp)
+move.b R4,R0
+ext.w R0
+move R0,-(sp) 
+move.l #L12,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 103
+clr (sp)
+jsr _vbank
+*line 104
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move #54,-(sp)
+move #18,-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 10(R8,R9.l),-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 106
+jsr _modtun
+*line 107
+clr R0
+bra L5
+L5:tst.l (sp)+
+movem.l (sp)+,R4-R7/R13-R13
+unlk R14
+rts
+.globl _rd_tval
+.text
+_rd_tval:
+~~rd_tval:
+~nn=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~tv=R7
+~n=R6
+~ts=R5
+*line 126
+move 8(R14),R6
+and #255,R6
+*line 128
+tst _tunval
+bge L10012
+move _tunval,R0
+neg R0
+bra L10014
+L10012:move _tunval,R0
+L10014:move R0,R7
+asr R7
+*line 129
+tst _tunval
+bge L10015
+move #45,R0
+bra L10017
+L10015:move #43,R0
+L10017:move.b R0,R5
+*line 131
+move R7,(sp)
+move.b R5,R0
+ext.w R0
+move R0,-(sp) 
+move.l #L14,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 133
+clr (sp)
+jsr _vbank
+*line 134
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move #54,-(sp)
+move #18,-(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 10(R8,R9.l),-(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 135
+clr R0
+bra L13
+L13:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _nd_tval
+.text
+_nd_tval:
+~~nd_tval:
+~k=R7
+~nn=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~ec=R6
+~n=R5
+*line 154
+move 10(R14),R7
+*line 154
+move 8(R14),R5
+and #255,R5
+*line 155
+move _stccol,R6
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R6
+*line 157
+*line 157
+tst R6
+bne L16
+*line 158
+*line 159
+*line 159
+cmp #8,R7
+bne L17
+*line 160
+*line 161
+move.b #45,_ebuf
+*line 162
+clr.b 5+_ebuf
+*line 163
+*line 164
+move.b #45,_dspbuf
+*line 165
+clr.b 1+_dspbuf
+*line 166
+bra L18
+L17:
+*line 167
+*line 167
+cmp #9,R7
+bne L19
+*line 168
+*line 169
+move.b #43,_ebuf
+*line 170
+clr.b 5+_ebuf
+*line 171
+*line 172
+move.b #43,_dspbuf
+*line 173
+clr.b 1+_dspbuf
+*line 174
+bra L20
+L19:
+*line 175
+*line 176
+*line 177
+move #-1,R0
+bra L15
+L20:L18:
+*line 178
+*line 179
+*line 180
+bra L21
+L16:
+*line 181
+*line 182
+*line 183
+move R7,R0
+add #48,R0
+move R6,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 184
+clr.b 5+_ebuf
+*line 185
+*line 186
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 187
+clr.b 1+_dspbuf
+L21:
+*line 190
+clr (sp)
+jsr _vbank
+*line 191
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move R5,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 10(R8,R9.l),-(sp)
+move #12,-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 193
+jsr _advtcur
+*line 194
+clr R0
+bra L15
+L15:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
+L4:.dc.b $25,$63,$25,$30,$34,$64,$0
+L12:.dc.b $56,$61,$6C,$20,$25,$63,$25,$30,$34,$64,$0
+L14:.dc.b $56,$61,$6C,$20,$25,$63,$25,$30,$34,$64,$0
Index: alcyon/etvel.s
===================================================================
--- alcyon/etvel.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etvel.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,315 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _obj8
+.globl _recsw
+.globl _stccol
+.globl _grpmode
+.globl _grpstat
+.globl _lastvel
+.globl _et_vel
+.text
+_et_vel:
+~~et_vel:
+~n=8
+link R14,#-4
+*line 43
+move 8(R14),R8
+add.l R8,R8
+move.l #_lastvel,R9
+move 0(R8,R9.l),R0
+ext.l R0
+divs #252,R0
+move R0,(sp)
+move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 45
+move #1,_ebflag
+*line 46
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_vel
+.text
+_ef_vel:
+~~ef_vel:
+~n=8
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~ival=R7
+~i=R6
+~ep=R13
+*line 65
+clr R7
+*line 67
+clr R6
+bra L6
+L7:
+*line 68
+muls #10,R7
+move.l #_ebuf,R8
+move.b 0(R8,R6),R0
+ext.w R0
+add R0,R7
+add #-48,R7
+L5:
+*line 67
+add #1,R6
+L6:
+*line 67
+cmp #3,R6
+blt L7
+L4:
+*line 70
+clr _ebflag
+*line 72
+*line 73
+cmp #127,R7
+ble L8
+*line 73
+move #-1,R0
+bra L3
+*line 74
+L8:
+*line 75
+muls #252,R7
+and #32736,R7
+*line 77
+*line 77
+tst _recsw
+beq L9
+move 8(R14),R8
+add.l R8,R8
+move.l #_grpstat,R9
+tst 0(R8,R9.l)
+beq L9
+move 8(R14),R8
+add.l R8,R8
+add.l #_grpmode,R8
+cmp #2,(R8)
+bne L9
+*line 78
+*line 79
+move 8(R14),R8
+add.l R8,R8
+add.l #_lastvel,R8
+move R7,(R8)
+*line 80
+move.l _t_cur,(sp)
+move #1,-(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,R13
+*line 81
+*line 82
+bra L12
+L11:
+*line 83
+*line 84
+*line 85
+move.b 5(R13),R0
+ext.w R0
+and #127,R0
+cmp #5,R0
+bne L13
+move.b 7(R13),R0
+ext.w R0
+cmp 8(R14),R0
+bne L13
+*line 86
+*line 87
+move R7,16(R13)
+*line 88
+*line 89
+L13:
+*line 90
+move.l 12(R13),R13
+L12:
+*line 91
+move.l (R13),R0
+cmp.l _t_cur,R0
+beq L11
+L10:
+*line 92
+*line 93
+L9:
+*line 94
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.globl _rd_vel
+.text
+_rd_vel:
+~~rd_vel:
+~n=8
+link R14,#-10
+~buf=-6
+*line 112
+move 8(R14),R8
+add.l R8,R8
+move.l #_lastvel,R9
+move 0(R8,R9.l),R0
+ext.l R0
+divs #252,R0
+move R0,(sp)
+move.l #L15,-(sp)
+move.l R14,-(sp)
+sub.l #6,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 114
+*line 115
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L16
+*line 115
+clr (sp)
+jsr _vbank
+*line 116
+L16:
+*line 117
+move #18,(sp)
+move.l R14,-(sp)
+sub.l #6,(sp)
+move 8(R14),R0
+muls #5,R0
+move R0,-(sp)
+add #6,(sp)
+move #5,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 119
+clr R0
+bra L14
+L14:unlk R14
+rts
+.globl _nd_vel
+.text
+_nd_vel:
+~~nd_vel:
+~n=R7
+~k=R6
+link R14,#0
+movem.l R4-R7,-(sp)
+~ec=R5
+*line 137
+move 8(R14),R7
+*line 137
+move 10(R14),R6
+*line 137
+move _stccol,R5
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R5
+*line 138
+move R6,R0
+add #48,R0
+move R5,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 140
+*line 141
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L18
+*line 141
+clr (sp)
+jsr _vbank
+*line 142
+L18:
+*line 143
+move #98,(sp)
+move R6,-(sp)
+add #48,(sp)
+move _stccol,-(sp)
+move #5,-(sp)
+move.l _obj8,-(sp)
+jsr _vputc
+adda.l #10,sp
+*line 144
+jsr _advscur
+*line 146
+clr R0
+bra L17
+L17:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$30,$33,$64,$0
+L15:.dc.b $25,$30,$33,$64,$0
Index: alcyon/etwavs.s
===================================================================
--- alcyon/etwavs.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etwavs.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,246 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _waveob
+.globl _stccol
+.globl _curwave
+.globl _curvce
+.globl _curwslt
+.globl _wsnmod
+.globl _wdbox
+.globl _dspbuf
+.globl _et_wavs
+.text
+_et_wavs:
+~~et_wavs:
+~n=8
+link R14,#-4
+*line 42
+move _curwave,(sp)
+add #1,(sp)
+move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 43
+move #1,_ebflag
+*line 45
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_wavs
+.text
+_ef_wavs:
+~~ef_wavs:
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~i=R7
+~tmpval=R6
+*line 60
+clr.b 2+_ebuf
+*line 61
+clr _ebflag
+*line 63
+clr R6
+*line 65
+clr R7
+bra L6
+L7:
+*line 66
+muls #10,R6
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R6
+add #-48,R6
+L5:
+*line 65
+add #1,R7
+L6:
+*line 65
+cmp #2,R7
+blt L7
+L4:
+*line 68
+*line 69
+cmp #20,R6
+bgt L10000
+tst R6
+bne L8
+L10000:*line 69
+move #-1,R0
+bra L3
+*line 70
+L8:
+*line 71
+move _curvce,R8
+add.l R8,R8
+add.l R8,R8
+move _curwslt,R9
+add.l R9,R9
+add.l R9,R8
+add.l #_wsnmod,R8
+move #1,(R8)
+*line 72
+move R6,R0
+sub #1,R0
+move R0,_curwave
+*line 73
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _rd_wavs
+.text
+_rd_wavs:
+~~rd_wavs:
+~nn=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~n=R7
+~cx=R6
+*line 92
+move _curvce,R8
+add.l R8,R8
+add.l R8,R8
+move _curwslt,R9
+add.l R9,R9
+add.l R9,R8
+move.l #_wsnmod,R9
+tst 0(R8,R9.l)
+beq L10001
+move #13,(sp)
+bra L10003
+L10001:move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 8(R8,R9.l),(sp)
+L10003:jsr _exp_c
+move R0,R6
+*line 93
+move 8(R14),R7
+and #255,R7
+*line 95
+move _curwave,(sp)
+add #1,(sp)
+move.l #L10,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 97
+clr (sp)
+jsr _vbank
+*line 98
+*line 99
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,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 #_wdbox,R9
+move 12(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 10(R8,R9.l),-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 101
+clr R0
+bra L9
+L9:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _nd_wavs
+.text
+_nd_wavs:
+~~nd_wavs:
+~k=R7
+~nn=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~ec=R6
+~n=R5
+*line 117
+move 10(R14),R7
+*line 117
+move 8(R14),R5
+and #255,R5
+*line 118
+move _stccol,R6
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R6
+*line 119
+move R7,R0
+add #48,R0
+move R6,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 120
+clr.b 2+_ebuf
+*line 122
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 123
+clr.b 1+_dspbuf
+*line 125
+clr (sp)
+jsr _vbank
+*line 126
+*line 127
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move R5,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 12(R8,R9.l),-(sp)
+move R5,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 10(R8,R9.l),-(sp)
+move #12,-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 129
+jsr _advwcur
+*line 130
+clr R0
+bra L11
+L11:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$30,$32,$64,$0
+L10:.dc.b $25,$30,$32,$64,$0
Index: alcyon/etwhar.s
===================================================================
--- alcyon/etwhar.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etwhar.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,223 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _waveob
+.globl _stccol
+.globl _curwhrm
+.globl _wdbox
+.globl _dspbuf
+.globl _et_whar
+.text
+_et_whar:
+~~et_whar:
+~n=8
+link R14,#-4
+*line 40
+move _curwhrm,(sp)
+add #1,(sp)
+move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 41
+move #1,_ebflag
+*line 42
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_whar
+.text
+_ef_whar:
+~~ef_whar:
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~i=R7
+~tmpval=R6
+*line 57
+clr.b 2+_ebuf
+*line 58
+clr _ebflag
+*line 60
+clr R6
+*line 62
+clr R7
+bra L6
+L7:
+*line 63
+muls #10,R6
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R6
+add #-48,R6
+L5:
+*line 62
+add #1,R7
+L6:
+*line 62
+cmp #2,R7
+blt L7
+L4:
+*line 65
+*line 66
+cmp #32,R6
+bgt L10000
+tst R6
+bne L8
+L10000:*line 66
+move #-1,R0
+bra L3
+*line 67
+L8:
+*line 68
+move R6,R0
+sub #1,R0
+move R0,_curwhrm
+*line 69
+jsr _newws
+*line 70
+move #5,(sp)
+jsr _wdswin
+*line 71
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _rd_whar
+.text
+_rd_whar:
+~~rd_whar:
+~nn=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~n=R7
+*line 89
+move 8(R14),R7
+and #255,R7
+*line 90
+move _curwhrm,(sp)
+add #1,(sp)
+move.l #L10,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 92
+clr (sp)
+jsr _vbank
+*line 93
+*line 94
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 14(R8,R9.l),-(sp)
+add #10,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 12(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 10(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 96
+clr R0
+bra L9
+L9:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _nd_whar
+.text
+_nd_whar:
+~~nd_whar:
+~k=R7
+~nn=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~ec=R6
+~n=R5
+*line 112
+move 10(R14),R7
+*line 112
+move 8(R14),R5
+and #255,R5
+*line 113
+move _stccol,R6
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R6
+*line 114
+move R7,R0
+add #48,R0
+move R6,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 115
+clr.b 2+_ebuf
+*line 117
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 118
+clr.b 1+_dspbuf
+*line 120
+clr (sp)
+jsr _vbank
+*line 121
+*line 122
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move R5,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 12(R8,R9.l),-(sp)
+move R5,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 10(R8,R9.l),-(sp)
+move #12,-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 124
+jsr _advwcur
+*line 125
+clr R0
+bra L11
+L11:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$30,$32,$64,$0
+L10:.dc.b $25,$30,$32,$64,$0
Index: alcyon/etwhrv.s
===================================================================
--- alcyon/etwhrv.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etwhrv.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,379 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _waveob
+.globl _stcrow
+.globl _stccol
+.globl _curwhrv
+.globl _curvce
+.globl _curwslt
+.globl _curwhrm
+.globl _wdbox
+.globl _dspbuf
+.globl _vbufs
+.globl _wsnmod
+.globl _vmtab
+.globl _et_whrv
+.text
+_et_whrv:
+~~et_whrv:
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~harv=R7
+~hvsgn=R6
+*line 51
+*line 51
+tst _curwhrv
+bge L2
+*line 52
+*line 53
+move.b #45,R6
+*line 54
+move _curwhrv,R0
+neg R0
+move R0,R7
+*line 55
+bra L3
+L2:
+*line 56
+*line 57
+*line 58
+move.b #43,R6
+*line 59
+move _curwhrv,R7
+L3:
+*line 62
+move R7,(sp)
+move.b R6,R0
+ext.w R0
+move R0,-(sp) 
+move.l #L4,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 63
+move #1,_ebflag
+*line 65
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _ef_whrv
+.text
+_ef_whrv:
+~~ef_whrv:
+~n=8
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~hv=R13
+~i=R7
+~tmpval=R6
+*line 84
+clr.b 4+_ebuf
+*line 85
+clr _ebflag
+*line 87
+clr R6
+*line 89
+move #1,R7
+bra L8
+L9:
+*line 90
+muls #10,R6
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R6
+add #-48,R6
+L7:
+*line 89
+add #1,R7
+L8:
+*line 89
+cmp #4,R7
+blt L9
+L6:
+*line 92
+*line 93
+cmp #100,R6
+ble L10
+*line 93
+move #-1,R0
+bra L5
+*line 94
+L10:
+*line 95
+*line 96
+cmp.b #45,_ebuf
+bne L11
+*line 96
+move R6,R0
+neg R0
+move R0,_curwhrv
+*line 97
+bra L12
+L11:
+*line 98
+move R6,_curwhrv
+L12:
+*line 100
+tst _curwslt
+beq L10000
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+add.l #3874,R0
+bra L10002
+L10000:move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+add.l #2794,R0
+L10002:move.l R0,R13
+*line 101
+move.l R13,R8
+move _curwhrm,R9
+add.l R9,R9
+add.l R9,R8
+move _curwhrv,(R8)
+*line 102
+move _curwhrm,R8
+add.l R8,R8
+add.l #_vmtab,R8
+move _curwhrv,(R8)
+*line 103
+move _curwhrm,(sp)
+jsr _adj
+*line 104
+jsr _wscalc
+*line 105
+jsr _whupd
+*line 106
+move _curvce,R8
+add.l R8,R8
+add.l R8,R8
+move _curwslt,R9
+add.l R9,R9
+add.l R9,R8
+add.l #_wsnmod,R8
+move #1,(R8)
+*line 107
+clr (sp)
+jsr _wdswin
+*line 108
+move #2,(sp)
+jsr _wdswin
+*line 109
+move #4,(sp)
+jsr _wdswin
+*line 110
+clr R0
+bra L5
+L5:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.globl _rd_whrv
+.text
+_rd_whrv:
+~~rd_whrv:
+~nn=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~harv=R7
+~n=R6
+~hvsgn=R5
+*line 129
+move 8(R14),R6
+and #255,R6
+*line 131
+*line 131
+tst _curwhrv
+bge L14
+*line 132
+*line 133
+move.b #45,R5
+*line 134
+move _curwhrv,R0
+neg R0
+move R0,R7
+*line 135
+bra L15
+L14:
+*line 136
+*line 137
+*line 138
+move.b #43,R5
+*line 139
+move _curwhrv,R7
+L15:
+*line 142
+move R7,(sp)
+move.b R5,R0
+ext.w R0
+move R0,-(sp) 
+move.l #L16,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 144
+clr (sp)
+jsr _vbank
+*line 145
+*line 146
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 14(R8,R9.l),-(sp)
+add #6,(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 12(R8,R9.l),-(sp)
+add #1,(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 10(R8,R9.l),-(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 148
+clr R0
+bra L13
+L13:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _nd_whrv
+.text
+_nd_whrv:
+~~nd_whrv:
+~k=R7
+~nn=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~ec=R6
+~n=R5
+*line 167
+move 10(R14),R7
+*line 167
+move 8(R14),R5
+and #255,R5
+*line 168
+move _stccol,R6
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R6
+*line 170
+*line 170
+tst R6
+bne L18
+*line 171
+*line 172
+*line 172
+cmp #8,R7
+bne L19
+*line 173
+*line 174
+move #45,R0
+move.b R0,_dspbuf
+move.b R0,_ebuf
+*line 175
+clr R0
+move.b R0,1+_dspbuf
+move.b R0,4+_ebuf
+*line 176
+bra L20
+L19:
+*line 177
+*line 177
+cmp #9,R7
+bne L21
+*line 178
+*line 179
+move #43,R0
+move.b R0,_dspbuf
+move.b R0,_ebuf
+*line 180
+clr R0
+move.b R0,1+_dspbuf
+move.b R0,4+_ebuf
+*line 181
+bra L22
+L21:
+*line 182
+*line 183
+*line 184
+move #-1,R0
+bra L17
+L22:L20:
+*line 185
+*line 186
+bra L23
+L18:
+*line 187
+*line 188
+*line 189
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+move R6,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 190
+clr R0
+move.b R0,1+_dspbuf
+move.b R0,4+_ebuf
+L23:
+*line 193
+clr (sp)
+jsr _vbank
+*line 194
+*line 195
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move R5,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 10(R8,R9.l),-(sp)
+move #12,-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 197
+jsr _advwcur
+*line 198
+clr R0
+bra L17
+L17:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
+L4:.dc.b $25,$63,$25,$30,$33,$64,$0
+L16:.dc.b $25,$63,$25,$30,$33,$64,$0
Index: alcyon/etwoff.s
===================================================================
--- alcyon/etwoff.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etwoff.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,411 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _waveob
+.globl _stcrow
+.globl _stccol
+.globl _lstwoff
+.globl _curwoff
+.globl _curvce
+.globl _curwslt
+.globl _curwdth
+.globl _wsnmod
+.globl _wdbox
+.globl _dspbuf
+.globl _et_woff
+.text
+_et_woff:
+~~et_woff:
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~hoff=R7
+~hosgn=R6
+*line 48
+move _curwoff,_lstwoff
+*line 50
+*line 50
+tst _curwoff
+bge L2
+*line 51
+*line 52
+move.b #45,R6
+*line 53
+move _curwoff,R0
+neg R0
+move R0,R7
+*line 54
+bra L3
+L2:
+*line 55
+*line 56
+*line 57
+move.b #43,R6
+*line 58
+move _curwoff,R7
+L3:
+*line 61
+move R7,(sp)
+move.b R6,R0
+ext.w R0
+move R0,-(sp) 
+move.l #L4,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 62
+move #1,_ebflag
+*line 64
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _ef_woff
+.text
+_ef_woff:
+~~ef_woff:
+~n=8
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~ov=R13
+~i=R7
+~tmpval=R6
+*line 83
+clr.b 5+_ebuf
+*line 84
+clr _ebflag
+*line 86
+clr R6
+*line 88
+move #1,R7
+bra L8
+L9:
+*line 89
+muls #10,R6
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R6
+add #-48,R6
+L7:
+*line 88
+add #1,R7
+L8:
+*line 88
+cmp #5,R7
+blt L9
+L6:
+*line 91
+*line 92
+cmp #1023,R6
+ble L10
+*line 92
+move #-1,R0
+bra L5
+*line 93
+L10:
+*line 94
+*line 95
+cmp.b #45,_ebuf
+bne L11
+*line 95
+move R6,R0
+neg R0
+move R0,_curwoff
+*line 96
+bra L12
+L11:
+*line 97
+move R6,_curwoff
+L12:
+*line 99
+*line 100
+cmp #8,_curwdth
+bne L13
+*line 100
+jsr _wdintp
+*line 101
+bra L14
+L13:
+*line 102
+jsr _pntsup
+L14:
+*line 104
+clr (sp)
+jsr _wdswin
+*line 105
+move #2,(sp)
+jsr _wdswin
+*line 106
+move #4,(sp)
+jsr _wdswin
+*line 107
+clr R0
+bra L5
+L5:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.globl _rd_woff
+.text
+_rd_woff:
+~~rd_woff:
+~nn=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~hoff=R7
+~n=R6
+~hosgn=R5
+*line 126
+move 8(R14),R6
+and #255,R6
+*line 127
+move _curwoff,_lstwoff
+*line 129
+*line 129
+tst _curwoff
+bge L16
+*line 130
+*line 131
+move.b #45,R5
+*line 132
+move _curwoff,R0
+neg R0
+move R0,R7
+*line 133
+bra L17
+L16:
+*line 134
+*line 135
+*line 136
+move.b #43,R5
+*line 137
+move _curwoff,R7
+L17:
+*line 140
+move R7,(sp)
+move.b R5,R0
+ext.w R0
+move R0,-(sp) 
+move.l #L18,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 144
+*line 145
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L19
+*line 145
+clr (sp)
+jsr _vbank
+*line 146
+L19:
+*line 147
+*line 148
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 14(R8,R9.l),-(sp)
+add #14,(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 12(R8,R9.l),-(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 10(R8,R9.l),-(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 150
+clr R0
+bra L15
+L15:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _nd_woff
+.text
+_nd_woff:
+~~nd_woff:
+~k=R7
+~nn=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~ec=R6
+~n=R5
+*line 169
+move 10(R14),R7
+*line 169
+move 8(R14),R5
+and #255,R5
+*line 170
+move _stccol,R6
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R6
+*line 172
+*line 172
+tst R6
+bne L21
+*line 173
+*line 174
+*line 174
+cmp #8,R7
+bne L22
+*line 175
+*line 176
+move.b #45,_ebuf
+*line 177
+clr.b 5+_ebuf
+*line 178
+*line 179
+move.b #45,_dspbuf
+*line 180
+clr.b 1+_dspbuf
+*line 181
+bra L23
+L22:
+*line 182
+*line 182
+cmp #9,R7
+bne L24
+*line 183
+*line 184
+move.b #43,_ebuf
+*line 185
+clr.b 5+_ebuf
+*line 186
+*line 187
+move.b #43,_dspbuf
+*line 188
+clr.b 1+_dspbuf
+*line 189
+bra L25
+L24:
+*line 190
+*line 191
+*line 192
+move #-1,R0
+bra L20
+L25:L23:
+*line 193
+*line 194
+bra L26
+L21:
+*line 195
+*line 196
+*line 197
+move R7,R0
+add #48,R0
+move R6,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 198
+clr.b 5+_ebuf
+*line 199
+*line 200
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 201
+clr.b 1+_dspbuf
+L26:
+*line 205
+*line 206
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L27
+*line 206
+clr (sp)
+jsr _vbank
+*line 207
+L27:
+*line 208
+*line 209
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move R5,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 10(R8,R9.l),-(sp)
+move #12,-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 211
+jsr _advwcur
+*line 212
+clr R0
+bra L20
+L20:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
+L4:.dc.b $25,$63,$25,$30,$34,$64,$0
+L18:.dc.b $25,$63,$25,$30,$34,$64,$0
Index: alcyon/etwpnt.s
===================================================================
--- alcyon/etwpnt.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etwpnt.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,217 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _waveob
+.globl _stccol
+.globl _curwpnt
+.globl _wdbox
+.globl _dspbuf
+.globl _et_wpnt
+.text
+_et_wpnt:
+~~et_wpnt:
+~n=8
+link R14,#-4
+*line 40
+move _curwpnt,(sp)
+move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 41
+move #1,_ebflag
+*line 43
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_wpnt
+.text
+_ef_wpnt:
+~~ef_wpnt:
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~i=R7
+~tmpval=R6
+*line 61
+clr.b 3+_ebuf
+*line 62
+clr _ebflag
+*line 64
+clr R6
+*line 66
+clr R7
+bra L6
+L7:
+*line 67
+muls #10,R6
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R6
+add #-48,R6
+L5:
+*line 66
+add #1,R7
+L6:
+*line 66
+cmp #3,R7
+blt L7
+L4:
+*line 69
+*line 70
+cmp #254,R6
+blt L8
+*line 70
+move #-1,R0
+bra L3
+*line 71
+L8:
+*line 72
+move R6,_curwpnt
+*line 73
+jsr _newws
+*line 74
+move #4,(sp)
+jsr _wdswin
+*line 75
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _rd_wpnt
+.text
+_rd_wpnt:
+~~rd_wpnt:
+~nn=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~n=R7
+*line 93
+move 8(R14),R7
+and #255,R7
+*line 94
+move _curwpnt,(sp)
+move.l #L10,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 96
+clr (sp)
+jsr _vbank
+*line 97
+*line 98
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,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 #_wdbox,R9
+move 12(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 10(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 100
+clr R0
+bra L9
+L9:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _nd_wpnt
+.text
+_nd_wpnt:
+~~nd_wpnt:
+~k=R7
+~nn=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~ec=R6
+~n=R5
+*line 119
+move 10(R14),R7
+*line 119
+move 8(R14),R5
+and #255,R5
+*line 120
+move _stccol,R6
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R6
+*line 121
+move R7,R0
+add #48,R0
+move R6,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 122
+clr.b 3+_ebuf
+*line 124
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 125
+clr.b 1+_dspbuf
+*line 127
+clr (sp)
+jsr _vbank
+*line 129
+*line 130
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move R5,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 12(R8,R9.l),-(sp)
+move R5,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 10(R8,R9.l),-(sp)
+move #12,-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 132
+jsr _advwcur
+*line 134
+clr R0
+bra L11
+L11:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$30,$33,$64,$0
+L10:.dc.b $25,$30,$33,$64,$0
Index: alcyon/etwslt.s
===================================================================
--- alcyon/etwslt.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etwslt.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,184 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _waveob
+.globl _stcrow
+.globl _stccol
+.globl _curwslt
+.globl _wdbox
+.globl _dspbuf
+.globl _et_wslt
+.text
+_et_wslt:
+~~et_wslt:
+~n=8
+link R14,#-4
+*line 44
+move _curwslt,(sp)
+add #65,(sp)
+move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 45
+move #1,_ebflag
+*line 47
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_wslt
+.text
+_ef_wslt:
+~~ef_wslt:
+~n=8
+link R14,#-4
+*line 60
+clr.b 1+_ebuf
+*line 61
+clr _ebflag
+*line 63
+move.b _ebuf,R0
+ext.w R0
+add #-65,R0
+move R0,_curwslt
+*line 69
+jsr _newws
+*line 70
+jsr _dsnewws
+*line 71
+clr R0
+bra L3
+L3:unlk R14
+rts
+.globl _rd_wslt
+.text
+_rd_wslt:
+~~rd_wslt:
+~nn=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~n=R7
+*line 89
+move 8(R14),R7
+and #255,R7
+*line 90
+move _curwslt,(sp)
+add #65,(sp)
+move.l #L5,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 92
+clr (sp)
+jsr _vbank
+*line 93
+*line 94
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 14(R8,R9.l),-(sp)
+add #19,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,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 #_wdbox,R9
+move 10(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 96
+clr R0
+bra L4
+L4:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _nd_wslt
+.text
+_nd_wslt:
+~~nd_wslt:
+~k=R7
+~nn=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~n=R6
+*line 112
+move 10(R14),R7
+*line 112
+move 8(R14),R6
+and #255,R6
+*line 118
+*line 119
+cmp #1,R7
+ble L7
+*line 119
+move #-1,R0
+bra L6
+*line 120
+L7:
+*line 121
+move R7,R0
+add #65,R0
+move.b R0,_ebuf
+*line 122
+clr.b 1+_ebuf
+*line 124
+move R7,R0
+add #65,R0
+move.b R0,_dspbuf
+*line 125
+clr.b 1+_dspbuf
+*line 131
+clr (sp)
+jsr _vbank
+*line 132
+*line 133
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 10(R8,R9.l),-(sp)
+move #12,-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 135
+jsr _advwcur
+*line 136
+clr R0
+bra L6
+L6:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$63,$0
+L5:.dc.b $25,$63,$0
Index: alcyon/etwvce.s
===================================================================
--- alcyon/etwvce.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/etwvce.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,216 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _waveob
+.globl _stcrow
+.globl _stccol
+.globl _curvce
+.globl _wdbox
+.globl _dspbuf
+.globl _et_wvce
+.text
+_et_wvce:
+~~et_wvce:
+~n=8
+link R14,#-4
+*line 40
+move _curvce,(sp)
+add #1,(sp)
+move.l #L2,-(sp)
+move.l #_ebuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 41
+move #1,_ebflag
+*line 43
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_wvce
+.text
+_ef_wvce:
+~~ef_wvce:
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~i=R7
+~tmpval=R6
+*line 58
+clr.b 2+_ebuf
+*line 59
+clr _ebflag
+*line 60
+clr R6
+*line 62
+clr R7
+bra L6
+L7:
+*line 63
+muls #10,R6
+move.l #_ebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add R0,R6
+add #-48,R6
+L5:
+*line 62
+add #1,R7
+L6:
+*line 62
+cmp #2,R7
+blt L7
+L4:
+*line 65
+*line 66
+tst R6
+beq L10000
+cmp #12,R6
+ble L8
+L10000:*line 66
+move #-1,R0
+bra L3
+*line 67
+L8:
+*line 68
+move R6,(sp)
+sub #1,(sp)
+jsr _newvce
+*line 69
+jsr _wwins
+*line 70
+clr R0
+bra L3
+L3:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _rd_wvce
+.text
+_rd_wvce:
+~~rd_wvce:
+~nn=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~n=R7
+*line 88
+move 8(R14),R7
+and #255,R7
+*line 89
+move _curvce,(sp)
+add #1,(sp)
+move.l #L10,-(sp)
+move.l #_dspbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 91
+clr (sp)
+jsr _vbank
+*line 92
+*line 93
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 14(R8,R9.l),-(sp)
+add #18,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 12(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 10(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 95
+clr R0
+bra L9
+L9:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _nd_wvce
+.text
+_nd_wvce:
+~~nd_wvce:
+~k=R7
+~nn=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~ec=R6
+~n=R5
+*line 111
+move 10(R14),R7
+*line 111
+move 8(R14),R5
+and #255,R5
+*line 112
+move _stccol,R6
+move.l _cfetp,R8
+move 2(R8),R0
+sub R0,R6
+*line 113
+move R7,R0
+add #48,R0
+move R6,R9
+add.l #_ebuf,R9
+move.b R0,(R9)
+*line 114
+clr.b 2+_ebuf
+*line 116
+move R7,R0
+add #48,R0
+move.b R0,_dspbuf
+*line 117
+clr.b 1+_dspbuf
+*line 119
+clr (sp)
+jsr _vbank
+*line 120
+*line 121
+move #14,(sp)
+move.l #_dspbuf,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move R5,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 10(R8,R9.l),-(sp)
+move #12,-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 123
+jsr _advwcur
+*line 124
+clr R0
+bra L11
+L11:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
+L2:.dc.b $25,$30,$32,$64,$0
+L10:.dc.b $25,$30,$32,$64,$0
Index: alcyon/fcnote.s
===================================================================
--- alcyon/fcnote.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/fcnote.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,219 @@
+.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 _noteop
+.globl _notesel
+.globl _t_note
+.globl _p_nbeg
+.globl _p_nend
+.globl _ctime
+.globl _fcnote
+.text
+_fcnote:
+~~fcnote:
+~grp=R7
+~tnote=R6
+link R14,#-4
+movem.l R2-R7/R12-R13,-(sp)
+~bp=R13
+~ep=R12
+~en=R5
+~eg=R4
+~et=R3
+~t_left=-4
+*line 52
+move 8(R14),R7
+*line 52
+move 10(R14),R6
+*line 52
+move.l _ctime,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,R13
+*line 53
+move.l _t_cur,R0
+add.l #$ffffff0f,R0
+move.l R0,-4(R14)
+*line 54
+clr.l _p_nbeg
+*line 55
+clr.l _p_nend
+*line 56
+clr.l _t_note
+L4:
+*line 58
+*line 59
+*line 60
+move.b 5(R13),R3
+ext.w R3
+and #127,R3
+*line 61
+move.b 6(R13),R5
+ext.w R5
+*line 62
+move.b 7(R13),R4
+ext.w R4
+*line 63
+*line 64
+*line 64
+move.l (R13),R0
+cmp.l -4(R14),R0
+blt L10000
+cmp #1,R3
+bne L5
+L10000:*line 65
+*line 66
+*line 67
+*line 68
+clr.l R0
+bra L1
+*line 69
+bra L6
+L5:
+*line 70
+*line 70
+cmp #6,R3
+bne L7
+cmp R6,R5
+bne L7
+cmp R7,R4
+bne L7
+*line 71
+*line 72
+*line 73
+*line 74
+clr.l R0
+bra L1
+*line 75
+*line 76
+bra L8
+L7:
+*line 77
+*line 77
+cmp #5,R3
+bne L9
+cmp R6,R5
+bne L9
+cmp R7,R4
+bne L9
+*line 78
+*line 79
+*line 80
+*line 81
+move.l 12(R13),R12
+*line 82
+L12:
+*line 83
+*line 84
+*line 85
+move.b 5(R12),R3
+ext.w R3
+and #127,R3
+*line 86
+move.b 6(R12),R5
+ext.w R5
+*line 87
+move.b 7(R12),R4
+ext.w R4
+*line 88
+*line 89
+*line 90
+cmp #5,R3
+bne L13
+cmp R6,R5
+bne L13
+cmp R7,R4
+bne L13
+*line 91
+*line 92
+*line 93
+*line 94
+clr.l R0
+bra L1
+*line 95
+*line 96
+bra L14
+L13:
+*line 97
+*line 98
+cmp #6,R3
+bne L15
+cmp R6,R5
+bne L15
+cmp R7,R4
+bne L15
+*line 99
+*line 100
+*line 101
+*line 102
+move.l R13,_p_nbeg
+*line 103
+move.l R12,_p_nend
+*line 104
+move.l (R12),R0
+sub.l (R13),R0
+move.l R0,_t_note
+*line 105
+move.l R13,R0
+bra L1
+*line 106
+bra L16
+L15:
+*line 107
+*line 107
+cmp #21,R3
+bne L17
+*line 108
+*line 109
+*line 110
+*line 111
+clr.l R0
+bra L1
+*line 112
+*line 113
+L17:L16:L14:
+*line 114
+move.l 12(R12),R12
+*line 115
+L11:bra L12
+L10:
+*line 116
+*line 117
+*line 118
+*line 119
+L9:L8:L6:
+*line 120
+move.l 8(R13),R13
+*line 121
+L3:bra L4
+L2:L1:tst.l (sp)+
+movem.l (sp)+,R3-R7/R12-R13
+unlk R14
+rts
+.data
Index: alcyon/fgets.s
===================================================================
--- alcyon/fgets.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/fgets.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,162 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl _agetc
+.text
+_agetc:
+~~agetc:
+~ptr=R13
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~c=R7
+*line 19
+move.l 8(R14),R13
+L2:
+*line 20
+*line 20
+move.l R13,(sp)
+jsr _getc
+move R0,R7
+cmp #-1,R7
+beq L3
+*line 21
+*line 22
+and #127,R7
+move R7,R0
+bra L5
+*line 23
+L6:
+*line 24
+*line 25
+sub.l #1,(R13)
+*line 26
+move #-1,R0
+bra L1
+*line 27
+L7:
+*line 28
+L8:
+*line 29
+bra L2
+*line 30
+bra L4
+L5:tst R0
+beq L8
+cmp #10,R0
+beq L7
+cmp #26,R0
+beq L6
+bra L4
+L4:
+*line 31
+*line 32
+*line 33
+L3:
+*line 34
+move R7,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _gets
+.text
+_gets:
+~~gets:
+~line=8
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~cp=R13
+~i=R7
+*line 44
+move.l 8(R14),R13
+*line 46
+bra L12
+L11:
+*line 47
+move.b R7,(R13)+
+L12:
+*line 47
+move.l #_Cbuffs,(sp)
+jsr _getc
+move R0,R7
+cmp #-1,R7
+beq L10000
+cmp #10,R7
+bne L11
+L10000:L10:
+*line 49
+clr.b (R13)
+*line 51
+*line 52
+cmp #-1,R7
+bne L13
+cmp.l 8(R14),R13
+bne L13
+*line 52
+clr.l R0
+bra L9
+*line 53
+L13:
+*line 54
+move.l 8(R14),R0
+bra L9
+L9:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _fgets
+.text
+_fgets:
+~~fgets:
+~s=8
+~n=12
+~fp=14
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~c=R7
+~cp=R13
+*line 66
+move.l 8(R14),R13
+*line 68
+bra L17
+L16:
+*line 69
+*line 70
+move.b R7,(R13)+
+*line 71
+*line 72
+*line 73
+cmp #10,R7
+beq L15
+L17:
+*line 74
+sub #1,12(R14)
+ble L10001
+move.l 14(R14),(sp)
+jsr _agetc
+move R0,R7
+cmp #-1,R7
+bne L16
+L10001:L15:
+*line 76
+clr.b (R13)
+*line 78
+*line 79
+cmp #-1,R7
+bne L18
+cmp.l 8(R14),R13
+bne L18
+*line 79
+clr.l R0
+bra L14
+*line 80
+L18:
+*line 81
+move.l 8(R14),R0
+bra L14
+L14:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/filesys.s
===================================================================
--- alcyon/filesys.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/filesys.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1871 @@
+.globl _errno
+.globl __thebpb
+.comm __thebpb,4
+.globl __thedir
+.comm __thedir,7168
+.globl __dptr
+.comm __dptr,4
+.globl __thefat
+.comm __thefat,3584
+.globl __fatin
+.comm __fatin,2
+.globl __dirin
+.comm __dirin,2
+.globl __bpbin
+.comm __bpbin,2
+.globl __fatmod
+.comm __fatmod,2
+.globl __dirmod
+.comm __dirmod,2
+.globl __berrno
+.comm __berrno,4
+.globl __cl2lsn
+.text
+__cl2lsn:
+~~_cl2lsn:
+~bpp=8
+~clnum=12
+link R14,#-4
+*line 71
+move.l 8(R14),R8
+clr R0
+move 12(R8),R0
+move.l 8(R14),R9
+clr R1
+move 2(R9),R1
+clr R2
+move 12(R14),R2
+sub #2,R2
+mulu R2,R1
+add R1,R0
+bra L1
+L1:unlk R14
+rts
+.globl __gtcl12
+.text
+__gtcl12:
+~~_gtcl12:
+~fat=R13
+~cl=12
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~cla=R7
+~clt=R6
+*line 88
+move.l 8(R14),R13
+*line 88
+move 12(R14),R7
+lsr R7
+add 12(R14),R7
+*line 89
+*line 90
+move.b 1(R13,R7),R0
+ext.w R0
+move R0,R6
+lsl #8,R6
+and #-256,R6
+move.b 0(R13,R7),R0
+ext.w R0
+and #255,R0
+or R0,R6
+*line 92
+*line 93
+btst #0,13(R14)
+beq L3
+*line 93
+lsr #4,R6
+*line 94
+L3:
+*line 95
+and #4095,R6
+*line 96
+clr R0
+move R6,R0
+bra L2
+L2:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.globl __getfat
+.text
+__getfat:
+~~_getfat:
+~bpp=R13
+~bufad=8
+~nfat=16
+link R14,#-2
+movem.l R7-R7/R13-R13,-(sp)
+~fatsec=-2
+*line 116
+move.l 12(R14),R13
+*line 116
+tst 16(R14)
+beq L10000
+clr R0
+move 10(R13),R0
+bra L10002
+L10000:clr R0
+move 10(R13),R0
+sub 8(R13),R0
+L10002:move R0,-2(R14)
+*line 117
+clr (sp)
+move -2(R14),-(sp)
+move 8(R13),-(sp)
+move.l 8(R14),-(sp)
+clr -(sp)
+move #4,-(sp)
+jsr _trap13
+adda.l #12,sp
+bra L4
+L4:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl __rdfat
+.text
+__rdfat:
+~~_rdfat:
+~bufad=8
+~bpp=12
+link R14,#-4
+*line 135
+*line 135
+clr (sp)
+move.l 12(R14),-(sp)
+move.l 8(R14),-(sp)
+jsr __getfat
+addq.l #8,sp
+tst R0
+beq L6
+*line 136
+*line 137
+*line 138
+move #1,(sp)
+move.l 12(R14),-(sp)
+move.l 8(R14),-(sp)
+jsr __getfat
+addq.l #8,sp
+tst R0
+beq L7
+*line 138
+move #-1,R0
+bra L5
+*line 139
+bra L8
+L7:
+*line 140
+move #1,R0
+bra L5
+L8:
+*line 141
+*line 142
+bra L9
+L6:
+*line 143
+clr R0
+bra L5
+L9:L5:unlk R14
+rts
+.globl __rdroot
+.text
+__rdroot:
+~~_rdroot:
+~bpp=R13
+~buf=8
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+*line 158
+move.l 12(R14),R13
+*line 159
+clr (sp)
+move 10(R13),-(sp)
+clr R0
+move 8(R13),R0
+add R0,(sp)
+move 6(R13),-(sp)
+move.l 8(R14),-(sp)
+clr -(sp)
+move #4,-(sp)
+jsr _trap13
+adda.l #12,sp
+bra L10
+L10:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl __nsic
+.text
+__nsic:
+~~_nsic:
+~fcp=R13
+~bpp=12
+~fp=16
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~tfe=R7
+*line 184
+move.l 8(R14),R13
+*line 184
+*line 184
+btst #4,32(R13)
+bne L12
+*line 185
+*line 186
+move #22,_errno
+*line 187
+move #-1,R0
+bra L11
+*line 188
+*line 189
+L12:
+*line 190
+*line 190
+btst #6,32(R13)
+beq L13
+*line 191
+*line 192
+move #5,_errno
+*line 193
+move #-1,R0
+bra L11
+*line 194
+*line 195
+L13:
+*line 196
+*line 196
+tst 26(R13)
+bne L14
+*line 197
+*line 198
+or #-32768,32(R13)
+*line 199
+move #1,R0
+bra L11
+*line 200
+*line 201
+*line 202
+*line 203
+*line 204
+L14:
+*line 205
+add.l #$1,40(R13)
+*line 207
+*line 207
+add #1,34(R13)
+clr R0
+move 34(R13),R0
+move.l 12(R14),R9
+clr R1
+move 2(R9),R1
+cmp R1,R0
+blo L15
+*line 208
+*line 209
+*line 210
+*line 211
+clr 34(R13)
+*line 212
+move 36(R13),(sp)
+move.l 16(R14),-(sp)
+jsr __gtcl12
+addq.l #4,sp
+move R0,R7
+*line 213
+*line 214
+*line 214
+cmp #4080,R7
+bcc L16
+*line 215
+*line 216
+*line 217
+move R7,36(R13)
+*line 218
+move R7,(sp)
+move.l 12(R14),-(sp)
+jsr __cl2lsn
+addq.l #4,sp
+swap R0
+clr R0
+swap R0
+move.l R0,44(R13)
+*line 219
+*line 224
+*line 225
+*line 226
+clr R0
+bra L11
+*line 227
+*line 228
+L16:
+*line 229
+*line 229
+cmp #4088,R7
+bcc L17
+*line 230
+*line 231
+or #-16384,32(R13)
+*line 232
+*line 237
+*line 238
+*line 239
+move #-1,R0
+bra L11
+*line 240
+*line 241
+L17:
+*line 242
+or #-32768,32(R13)
+*line 243
+move #1,R0
+bra L11
+*line 244
+*line 245
+*line 246
+*line 247
+bra L18
+L15:
+*line 248
+*line 249
+*line 250
+add.l #$1,44(R13)
+*line 251
+*line 256
+*line 257
+*line 258
+clr R0
+bra L11
+L18:L11:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl __dsrch
+.text
+__dsrch:
+~~_dsrch:
+~de=R13
+link R14,#-4
+movem.l R7-R7/R12-R13,-(sp)
+~i=-2
+~dl=-4
+~dp=R12
+*line 279
+move.l 8(R14),R13
+*line 279
+move.l #__thedir,R12
+*line 280
+move.l __thebpb,R8
+clr R0
+move 6(R8),R0
+move.l __thebpb,R9
+clr R1
+move (R9),R1
+lsr #5,R1
+mulu R1,R0
+move R0,-4(R14)
+*line 282
+clr -2(R14)
+bra L22
+L23:
+*line 283
+*line 284
+*line 285
+*line 286
+*line 287
+move #11,(sp)
+move.l R12,-(sp)
+move.l R13,-(sp)
+jsr _memcmpu
+addq.l #8,sp
+tst R0
+bne L24
+*line 287
+move.l R12,R0
+bra L19
+*line 288
+*line 289
+*line 290
+L24:
+*line 291
+*line 292
+tst.b (R12)
+bne L25
+*line 292
+clr.l R0
+bra L19
+*line 293
+L25:
+*line 294
+add.l #32,R12
+L21:
+*line 282
+add #1,-2(R14)
+L22:
+*line 282
+clr R0
+move -2(R14),R0
+cmp -4(R14),R0
+blo L23
+L20:
+*line 297
+clr.l R0
+bra L19
+L19:tst.l (sp)+
+movem.l (sp)+,R12-R13
+unlk R14
+rts
+.globl __dsnew
+.text
+__dsnew:
+~~_dsnew:
+link R14,#-4
+movem.l R7-R7/R13-R13,-(sp)
+~i=-2
+~dl=-4
+~dp=R13
+*line 316
+move.l #__thedir,R13
+*line 317
+move.l __thebpb,R8
+clr R0
+move 6(R8),R0
+move.l __thebpb,R9
+clr R1
+move (R9),R1
+lsr #5,R1
+mulu R1,R0
+move R0,-4(R14)
+*line 319
+clr -2(R14)
+bra L29
+L30:
+*line 320
+*line 321
+*line 322
+*line 323
+*line 324
+move.b (R13),R0
+ext.w R0
+and #255,R0
+cmp #229,R0
+bne L31
+*line 324
+move.l R13,R0
+bra L26
+*line 325
+*line 326
+*line 327
+L31:
+*line 328
+*line 329
+tst.b (R13)
+bne L32
+*line 329
+move.l R13,R0
+bra L26
+*line 330
+L32:
+*line 331
+add.l #32,R13
+L28:
+*line 319
+add #1,-2(R14)
+L29:
+*line 319
+clr R0
+move -2(R14),R0
+cmp -4(R14),R0
+blo L30
+L27:
+*line 334
+clr.l R0
+bra L26
+L26:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl __deadio
+.text
+__deadio:
+~~_deadio:
+~fcp=R13
+~err=12
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+*line 350
+move.l 8(R14),R13
+*line 350
+clr 34(R13)
+*line 351
+clr 36(R13)
+*line 352
+clr.l 40(R13)
+*line 353
+clr.l 44(R13)
+*line 354
+clr.l 48(R13)
+*line 355
+and #-4097,32(R13)
+*line 356
+or #8192,32(R13)
+*line 357
+move 12(R14),_errno
+L33:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl __seek
+.text
+__seek:
+~~_seek:
+~fcp=R13
+link R14,#-4
+movem.l R4-R7/R13-R13,-(sp)
+~acls=R7
+~rcls=R6
+~nc=R5
+~sic=-2
+~spc=-4
+*line 377
+move.l 8(R14),R13
+*line 377
+*line 377
+btst #4,32(R13)
+bne L35
+*line 378
+*line 379
+move #22,_errno
+*line 380
+move #-1,R0
+bra L34
+*line 381
+*line 382
+L35:
+*line 383
+*line 383
+move.l 40(R13),R0
+cmp.l 52(R13),R0
+ble L36
+*line 384
+*line 389
+*line 390
+*line 391
+move #22,_errno
+*line 392
+move #-1,R0
+bra L34
+*line 393
+*line 394
+L36:
+*line 395
+move.l __thebpb,R8
+move 2(R8),-4(R14)
+*line 396
+clr R0
+move -4(R14),R0
+swap R0
+clr R0
+swap R0
+move.l R0,-(sp)
+move.l 40(R13),-(sp)
+jsr ldiv
+addq.l #8,sp
+move R0,R6
+*line 397
+move.l 40(R13),R0
+clr R1
+move R6,R1
+mulu -4(R14),R1
+sub.l R1,R0
+move R0,-2(R14)
+*line 398
+move 26(R13),(sp)
+jsr _micons
+move R0,R7
+*line 399
+and #32767,32(R13)
+*line 411
+*line 411
+move.l 40(R13),R0
+cmp.l 52(R13),R0
+bne L37
+*line 412
+*line 413
+or #-32768,32(R13)
+*line 414
+*line 419
+*line 420
+*line 421
+*line 422
+tst R7
+bne L38
+*line 422
+move #2,R0
+bra L34
+*line 423
+L38:
+*line 424
+*line 425
+tst -2(R14)
+bne L39
+*line 425
+move #2,R0
+bra L34
+L39:
+*line 426
+*line 427
+*line 428
+*line 429
+L37:
+*line 430
+clr R5
+bra L42
+L43:
+*line 431
+*line 432
+move R7,(sp)
+move.l #__thefat,-(sp)
+jsr __gtcl12
+addq.l #4,sp
+move R0,R7
+*line 433
+*line 434
+*line 435
+cmp #4080,R7
+blo L41
+*line 436
+*line 437
+or #8192,32(R13)
+*line 438
+move #22,_errno
+*line 439
+*line 440
+*line 440
+cmp #4088,R7
+bcc L44
+*line 441
+*line 442
+move #5,_errno
+*line 443
+or #16384,32(R13)
+*line 444
+*line 445
+L44:
+*line 446
+move #-1,R0
+bra L34
+L41:
+*line 430
+add #1,R5
+L42:
+*line 430
+cmp R6,R5
+blo L43
+L40:
+*line 449
+move R7,36(R13)
+*line 450
+move -2(R14),34(R13)
+*line 452
+move R7,(sp)
+move.l __thebpb,-(sp)
+jsr __cl2lsn
+addq.l #4,sp
+add -2(R14),R0
+swap R0
+clr R0
+swap R0
+move.l R0,44(R13)
+*line 460
+*line 461
+move.l 40(R13),R0
+cmp.l 52(R13),R0
+bne L45
+*line 461
+move #1,R0
+bra L34
+*line 462
+L45:
+*line 463
+clr R0
+bra L34
+L34:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.globl __ftrnc
+.text
+__ftrnc:
+~~_ftrnc:
+~dp=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~acls=R7
+~ncls=R6
+*line 487
+move.l 8(R14),R8
+move 26(R8),(sp)
+jsr _micons
+move R0,R7
+*line 492
+bra L49
+L48:
+*line 493
+*line 494
+*line 495
+move R7,(sp)
+move.l #__thefat,-(sp)
+jsr __gtcl12
+addq.l #4,sp
+move R0,R6
+*line 496
+clr (sp)
+move R7,-(sp)
+move.l #__thefat,-(sp)
+jsr __ptcl12
+addq.l #6,sp
+*line 497
+*line 503
+*line 504
+*line 505
+move R6,R7
+L49:
+*line 506
+cmp #4080,R7
+blo L48
+L47:
+*line 511
+move.l 8(R14),R8
+move.l #$0,28(R8)
+*line 512
+move.l 8(R14),R8
+clr 26(R8)
+*line 513
+move #1,__fatmod
+*line 514
+move #1,__dirmod
+*line 527
+clr R0
+bra L46
+L46:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl __newcls
+.text
+__newcls:
+~~_newcls:
+link R14,#0
+movem.l R5-R7,-(sp)
+~tc=R7
+~i=R6
+*line 544
+move.l __thebpb,R8
+move 14(R8),R7
+*line 546
+move #2,R6
+bra L53
+L54:
+*line 547
+*line 548
+move R6,(sp)
+move.l #__thefat,-(sp)
+jsr __gtcl12
+addq.l #4,sp
+tst R0
+bne L55
+*line 548
+move R6,R0
+bra L50
+*line 549
+L55:L52:
+*line 546
+add #1,R6
+L53:
+*line 546
+cmp R7,R6
+blt L54
+L51:
+*line 550
+clr R0
+bra L50
+L50:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl __alcnew
+.text
+__alcnew:
+~~_alcnew:
+~fcp=R13
+link R14,#0
+movem.l R4-R7/R13-R13,-(sp)
+~ac=R7
+~nc=R6
+~pc=R5
+*line 572
+move.l 8(R14),R13
+*line 572
+*line 572
+jsr __newcls
+move R0,R6
+beq L57
+*line 573
+*line 576
+*line 577
+*line 578
+move #4088,(sp)
+move R6,-(sp)
+move.l #__thefat,-(sp)
+jsr __ptcl12
+addq.l #6,sp
+*line 579
+move 26(R13),(sp)
+jsr _micons
+move R0,R5
+*line 580
+*line 588
+*line 589
+*line 590
+*line 591
+*line 592
+*line 593
+bra L60
+L59:
+*line 594
+*line 595
+*line 596
+move R7,R5
+L60:
+*line 597
+move R5,(sp)
+move.l #__thefat,-(sp)
+jsr __gtcl12
+addq.l #4,sp
+move R0,R7
+move R7,R0
+cmp #4080,R0
+blt L59
+L58:
+*line 598
+*line 599
+*line 600
+*line 601
+*line 612
+*line 613
+*line 614
+move R6,(sp)
+move R5,-(sp)
+move.l #__thefat,-(sp)
+jsr __ptcl12
+addq.l #6,sp
+*line 615
+move.l __thebpb,R8
+clr R0
+move 2(R8),R0
+swap R0
+clr R0
+swap R0
+add.l R0,52(R13)
+*line 616
+move R6,36(R13)
+*line 617
+clr 34(R13)
+*line 618
+*line 619
+move R6,(sp)
+move.l __thebpb,-(sp)
+jsr __cl2lsn
+addq.l #4,sp
+swap R0
+clr R0
+swap R0
+move.l R0,44(R13)
+*line 620
+*line 629
+*line 630
+*line 631
+clr R0
+bra L56
+*line 632
+bra L61
+L57:
+*line 633
+*line 634
+*line 638
+*line 639
+*line 640
+move #-1,R0
+bra L56
+L61:L56:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.globl __fmake
+.text
+__fmake:
+~~_fmake:
+~fcp=8
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+~dp=R13
+*line 659
+*line 660
+jsr __dsnew
+move.l R0,R13
+move.l R13,R0
+bne L63
+*line 660
+move #-1,R0
+bra L62
+*line 661
+L63:
+*line 662
+move.l R13,__dptr
+*line 663
+move #32,(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 664
+move #12,(sp)
+move.l 8(R14),-(sp)
+move.l R13,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 665
+or.b #32,11(R13)
+*line 666
+move #1,__dirmod
+*line 667
+clr R0
+bra L62
+L62:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl __opnvol
+.text
+__opnvol:
+~~_opnvol:
+link R14,#0
+movem.l R6-R7,-(sp)
+~drc=R7
+*line 686
+*line 686
+tst __bpbin
+beq L65
+*line 687
+*line 688
+clr (sp)
+move #9,-(sp)
+jsr _trap13
+addq.l #2,sp
+move.l R0,R7
+*line 689
+*line 696
+*line 697
+*line 698
+*line 699
+tst.l R7
+beq L66
+*line 699
+clr __bpbin
+L66:bra L67
+L65:
+*line 700
+*line 701
+*line 705
+*line 706
+L67:
+*line 709
+*line 709
+tst __bpbin
+bne L68
+*line 710
+*line 711
+clr __fatin
+*line 712
+clr __dirin
+*line 713
+*line 714
+*line 714
+clr (sp)
+move #7,-(sp)
+jsr _trap13
+addq.l #2,sp
+move.l R0,__thebpb
+bne L69
+*line 715
+*line 716
+move #5,_errno
+*line 717
+move #-1,R0
+bra L64
+*line 718
+*line 719
+L69:
+*line 720
+move #1,__bpbin
+*line 721
+*line 722
+L68:
+*line 723
+*line 723
+tst __fatin
+bne L70
+*line 724
+*line 725
+clr __dirin
+*line 726
+*line 727
+*line 727
+move.l __thebpb,(sp)
+move.l #__thefat,-(sp)
+jsr __rdfat
+addq.l #4,sp
+tst R0
+bge L71
+*line 728
+*line 729
+move #5,_errno
+*line 730
+move #-1,R0
+bra L64
+*line 731
+*line 732
+L71:
+*line 733
+move #1,__fatin
+*line 734
+clr __fatmod
+*line 735
+*line 736
+*line 737
+L70:
+*line 738
+*line 738
+tst __dirin
+bne L72
+*line 739
+*line 740
+*line 740
+move.l __thebpb,(sp)
+move.l #__thedir,-(sp)
+jsr __rdroot
+addq.l #4,sp
+tst R0
+beq L73
+*line 741
+*line 742
+move #5,_errno
+*line 743
+move #-1,R0
+bra L64
+*line 744
+*line 745
+L73:
+*line 746
+move #1,__dirin
+*line 747
+clr __dirmod
+*line 748
+*line 749
+L72:
+*line 750
+clr R0
+bra L64
+L64:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl __opfcb
+.text
+__opfcb:
+~~_opfcb:
+~fcp=R13
+link R14,#-2
+movem.l R7-R7/R13-R13,-(sp)
+~rc=-2
+*line 772
+move.l 8(R14),R13
+*line 772
+*line 772
+btst #4,32(R13)
+beq L75
+*line 773
+*line 774
+move #22,_errno
+*line 775
+move #-1,R0
+bra L74
+*line 776
+*line 777
+L75:
+*line 778
+*line 778
+jsr __opnvol
+tst R0
+beq L76
+*line 779
+*line 780
+move _errno,(sp)
+move.l R13,-(sp)
+jsr __deadio
+addq.l #4,sp
+*line 781
+move #-1,R0
+bra L74
+*line 782
+*line 783
+*line 784
+*line 785
+L76:
+*line 786
+*line 786
+move.l R13,(sp)
+jsr __dsrch
+move.l R0,__dptr
+bne L77
+*line 787
+*line 788
+*line 789
+*line 790
+*line 790
+btst #3,32(R13)
+bne L78
+*line 791
+*line 792
+move #2,(sp)
+move.l R13,-(sp)
+jsr __deadio
+addq.l #4,sp
+*line 793
+move #-1,R0
+bra L74
+*line 794
+*line 795
+*line 796
+*line 797
+L78:
+*line 798
+*line 798
+move.l R13,(sp)
+jsr __fmake
+move R0,-2(R14)
+beq L79
+*line 799
+*line 800
+move #5,(sp)
+move.l R13,-(sp)
+jsr __deadio
+addq.l #4,sp
+*line 801
+move #-1,R0
+bra L74
+*line 802
+*line 803
+*line 804
+*line 805
+*line 806
+L79:bra L80
+L77:
+*line 807
+*line 808
+*line 809
+*line 810
+*line 811
+*line 812
+btst #0,11(R13)
+beq L81
+clr R0
+move 32(R13),R0
+and #1600,R0
+beq L81
+*line 813
+*line 814
+*line 815
+*line 816
+move #13,(sp)
+move.l R13,-(sp)
+jsr __deadio
+addq.l #4,sp
+*line 817
+move #-1,R0
+bra L74
+*line 818
+*line 819
+*line 820
+*line 821
+L81:
+*line 822
+*line 822
+btst #2,32(R13)
+beq L82
+btst #1,32(R13)
+bne L82
+*line 823
+*line 824
+*line 825
+*line 826
+move #13,(sp)
+move.l R13,-(sp)
+jsr __deadio
+addq.l #4,sp
+*line 827
+move #-1,R0
+bra L74
+*line 828
+*line 829
+*line 830
+*line 831
+L82:
+*line 832
+*line 832
+btst #3,32(R13)
+beq L83
+btst #7,33(R13)
+beq L83
+*line 833
+*line 834
+*line 835
+*line 836
+move #17,(sp)
+move.l R13,-(sp)
+jsr __deadio
+addq.l #4,sp
+*line 837
+move #-1,R0
+bra L74
+*line 838
+*line 839
+*line 840
+*line 841
+*line 842
+*line 843
+*line 844
+L83:
+*line 845
+*line 845
+btst #6,33(R13)
+beq L84
+*line 846
+*line 847
+*line 848
+*line 849
+*line 849
+btst #1,32(R13)
+beq L85
+*line 850
+*line 851
+*line 852
+*line 853
+*line 853
+move.l __dptr,(sp)
+jsr __ftrnc
+tst R0
+beq L86
+*line 854
+*line 855
+move #5,(sp)
+move.l R13,-(sp)
+jsr __deadio
+addq.l #4,sp
+*line 856
+move #-1,R0
+bra L74
+*line 857
+*line 858
+L86:bra L87
+L85:
+*line 859
+*line 860
+*line 861
+*line 862
+*line 863
+move #13,(sp)
+move.l R13,-(sp)
+jsr __deadio
+addq.l #4,sp
+*line 864
+move #-1,R0
+bra L74
+L87:
+*line 865
+*line 866
+L84:L80:
+*line 871
+move #32,(sp)
+move.l __dptr,-(sp)
+move.l R13,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 872
+clr 34(R13)
+*line 873
+move 26(R13),(sp)
+jsr _micons
+move R0,36(R13)
+*line 874
+clr 38(R13)
+*line 875
+clr.l 40(R13)
+*line 876
+tst 26(R13)
+beq L10003
+move 36(R13),(sp)
+move.l __thebpb,-(sp)
+jsr __cl2lsn
+addq.l #4,sp
+bra L10005
+L10003:clr R0
+L10005:swap R0
+clr R0
+swap R0
+move.l R0,44(R13)
+*line 877
+move.l 28(R13),(sp)
+jsr _miconl
+move.l R0,48(R13)
+*line 879
+*line 880
+*line 881
+move.l __thebpb,R8
+clr R0
+move 2(R8),R0
+swap R0
+clr R0
+swap R0
+move.l R0,-(sp)
+move.l __thebpb,R8
+clr R0
+move 4(R8),R0
+swap R0
+clr R0
+swap R0
+move.l R0,-(sp)
+move.l 48(R13),-(sp)
+jsr ldiv
+addq.l #8,sp
+move.l __thebpb,R9
+clr R1
+move 4(R9),R1
+sub #1,R1
+swap R1
+clr R1
+swap R1
+and.l 48(R13),R1
+beq L10006
+move #1,R1
+bra L10008
+L10006:clr R1
+L10008:ext.l R1
+add.l R1,R0
+move.l R0,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,52(R13)
+*line 883
+and #8191,32(R13)
+*line 884
+or #4096,32(R13)
+*line 891
+clr R0
+bra L74
+L74:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl __inifcb
+.text
+__inifcb:
+~~_inifcb:
+~fcp=R13
+~name=12
+~ext=16
+~mode=20
+link R14,#-2
+movem.l R5-R7/R11-R13,-(sp)
+~fl=-2
+~i=R7
+~s1=R12
+~s2=R11
+~c=R6
+*line 917
+move.l 8(R14),R13
+*line 917
+move #56,(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 921
+*line 922
+move 20(R14),R0
+and #30960,R0
+beq L89
+*line 922
+move #-1,R0
+bra L88
+*line 923
+*line 924
+*line 925
+*line 926
+*line 927
+L89:
+*line 928
+move #1,-2(R14)
+*line 929
+move.l 12(R14),R12
+*line 931
+clr R7
+bra L92
+L93:
+*line 932
+*line 932
+tst.b (R12)+
+bne L94
+*line 933
+*line 934
+clr -2(R14)
+bra L90
+*line 935
+*line 936
+*line 937
+L94:L91:
+*line 931
+add #1,R7
+L92:
+*line 931
+cmp #9,R7
+blt L93
+L90:
+*line 938
+*line 939
+tst -2(R14)
+beq L95
+*line 939
+move #-1,R0
+bra L88
+*line 940
+*line 941
+*line 942
+L95:
+*line 943
+move #1,-2(R14)
+*line 944
+move.l 16(R14),R12
+*line 946
+clr R7
+bra L98
+L99:
+*line 947
+*line 947
+tst.b (R12)+
+bne L100
+*line 948
+*line 949
+clr -2(R14)
+bra L96
+*line 950
+*line 951
+*line 952
+L100:L97:
+*line 946
+add #1,R7
+L98:
+*line 946
+cmp #4,R7
+blt L99
+L96:
+*line 953
+*line 954
+tst -2(R14)
+beq L101
+*line 954
+move #-1,R0
+bra L88
+*line 955
+*line 956
+*line 957
+*line 958
+*line 959
+L101:
+*line 960
+move #11,(sp)
+move #32,-(sp)
+move.l R13,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 964
+move.l R13,R12
+*line 965
+move.l 12(R14),R11
+*line 967
+clr R7
+bra L104
+L105:
+*line 968
+*line 969
+move.b (R11)+,R6
+*line 970
+*line 971
+*line 972
+tst.b R6
+beq L102
+cmp.b #32,R6
+beq L102
+*line 973
+*line 974
+move.b R6,(R12)+
+L103:
+*line 967
+add #1,R7
+L104:
+*line 967
+cmp #8,R7
+blt L105
+L102:
+*line 979
+lea 8(R13),R12
+*line 980
+move.l 16(R14),R11
+*line 982
+clr R7
+bra L108
+L109:
+*line 983
+*line 984
+move.b (R11)+,R6
+*line 985
+*line 986
+*line 987
+tst.b R6
+beq L106
+cmp.b #32,R6
+beq L106
+*line 988
+*line 989
+move.b R6,(R12)+
+L107:
+*line 982
+add #1,R7
+L108:
+*line 982
+cmp #3,R7
+blt L109
+L106:
+*line 997
+*line 998
+move 20(R14),R0
+clr R0
+beq L110
+*line 998
+or #256,32(R13)
+*line 999
+L110:
+*line 1000
+*line 1001
+btst #0,21(R14)
+beq L111
+*line 1001
+or #512,32(R13)
+*line 1002
+L111:
+*line 1003
+*line 1004
+btst #1,21(R14)
+beq L112
+*line 1004
+or #768,32(R13)
+*line 1005
+L112:
+*line 1006
+*line 1007
+btst #2,21(R14)
+beq L113
+*line 1007
+or #32,32(R13)
+*line 1008
+L113:
+*line 1009
+*line 1010
+btst #3,21(R14)
+beq L114
+*line 1010
+or #1024,32(R13)
+*line 1011
+L114:
+*line 1012
+*line 1013
+btst #0,20(R14)
+beq L115
+*line 1013
+or #2048,32(R13)
+*line 1014
+L115:
+*line 1015
+*line 1016
+btst #1,20(R14)
+beq L116
+*line 1016
+or #64,32(R13)
+*line 1017
+L116:
+*line 1018
+*line 1019
+btst #2,20(R14)
+beq L117
+*line 1019
+or #128,32(R13)
+*line 1020
+L117:
+*line 1021
+*line 1022
+move 20(R14),R0
+and #-32768,R0
+beq L118
+*line 1022
+or #16,32(R13)
+*line 1023
+L118:
+*line 1024
+clr R0
+bra L88
+L88:tst.l (sp)+
+movem.l (sp)+,R6-R7/R11-R13
+unlk R14
+rts
+.globl _ClsFile
+.text
+_ClsFile:
+~~ClsFile:
+~fcp=R13
+link R14,#0
+movem.l R7-R7/R12-R13,-(sp)
+~dp=R12
+*line 1051
+move.l 8(R14),R13
+*line 1051
+*line 1051
+btst #4,32(R13)
+beq L120
+*line 1052
+*line 1053
+*line 1053
+clr R0
+move 32(R13),R0
+and #3584,R0
+beq L121
+*line 1054
+*line 1055
+*line 1055
+move.l R13,(sp)
+jsr __dsrch
+move.l R0,R12
+move.l R12,R0
+beq L122
+*line 1056
+*line 1057
+*line 1058
+*line 1059
+*line 1059
+move #32,(sp)
+move.l R13,-(sp)
+move.l R12,-(sp)
+jsr _memcmp
+addq.l #8,sp
+tst R0
+beq L123
+*line 1060
+*line 1061
+move #32,(sp)
+move.l R13,-(sp)
+move.l R12,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 1062
+move #1,__dirmod
+*line 1069
+*line 1070
+*line 1071
+*line 1072
+*line 1073
+*line 1074
+*line 1075
+L123:bra L124
+L122:
+*line 1076
+*line 1077
+*line 1081
+*line 1082
+*line 1083
+move #5,_errno
+*line 1084
+move #-1,R0
+bra L119
+L124:
+*line 1085
+*line 1086
+*line 1087
+*line 1091
+*line 1092
+L121:
+*line 1093
+clr R0
+bra L119
+*line 1094
+bra L125
+L120:
+*line 1095
+*line 1096
+*line 1100
+*line 1101
+*line 1102
+move #22,_errno
+*line 1103
+move #-1,R0
+bra L119
+L125:L119:tst.l (sp)+
+movem.l (sp)+,R12-R13
+unlk R14
+rts
+.globl __clsvol
+.text
+__clsvol:
+~~_clsvol:
+link R14,#-4
+*line 1118
+*line 1118
+tst __fatmod
+beq L127
+*line 1119
+*line 1120
+jsr __clsfat
+*line 1121
+*line 1125
+*line 1126
+*line 1127
+L127:
+*line 1128
+*line 1128
+tst __dirmod
+beq L128
+*line 1129
+*line 1130
+jsr __clsdir
+*line 1131
+*line 1135
+*line 1136
+*line 1137
+L128:
+*line 1138
+clr __bpbin
+*line 1139
+clr __fatin
+*line 1140
+clr __dirin
+L126:unlk R14
+rts
+.globl _fcbinit
+.text
+_fcbinit:
+~~fcbinit:
+~name=R13
+~fcp=R12
+link R14,#-14
+movem.l R7-R7/R12-R13,-(sp)
+~tmpname=-10
+~tmpext=-14
+*line 1156
+move.l 8(R14),R13
+*line 1156
+move.l 12(R14),R12
+*line 1156
+clr (sp)
+move.l R14,-(sp)
+add.l #-14,(sp)
+move.l R13,-(sp)
+jsr _FilExt
+addq.l #8,sp
+move.l R0,-(sp)
+move.l R14,-(sp)
+add.l #-10,(sp)
+move.l R13,-(sp)
+jsr _FilName
+addq.l #8,sp
+move.l R0,-(sp)
+move.l R12,-(sp)
+jsr __inifcb
+adda.l #12,sp
+bra L129
+L129:tst.l (sp)+
+movem.l (sp)+,R12-R13
+unlk R14
+rts
+.globl _DelFile
+.text
+_DelFile:
+~~DelFile:
+~fcp=8
+link R14,#-4
+*line 1178
+*line 1179
+jsr __opnvol
+tst R0
+beq L131
+*line 1179
+move #-1,R0
+bra L130
+*line 1180
+L131:
+*line 1181
+*line 1181
+move.l 8(R14),(sp)
+jsr __dsrch
+move.l R0,__dptr
+bne L132
+*line 1182
+*line 1183
+move #2,_errno
+*line 1184
+move #-1,R0
+bra L130
+*line 1185
+*line 1186
+L132:
+*line 1187
+*line 1187
+move.l __dptr,R8
+btst #0,11(R8)
+beq L133
+*line 1188
+*line 1189
+move #13,_errno
+*line 1190
+move #-1,R0
+bra L130
+*line 1191
+*line 1192
+L133:
+*line 1193
+*line 1194
+move.l __dptr,(sp)
+jsr __ftrnc
+tst R0
+beq L134
+*line 1194
+move #-1,R0
+bra L130
+*line 1195
+L134:
+*line 1196
+move.l __dptr,R8
+move.b #229,(R8)
+*line 1204
+clr R0
+bra L130
+L130:unlk R14
+rts
+.data
Index: alcyon/filname.s
===================================================================
--- alcyon/filname.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/filname.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,154 @@
+.globl _FilName
+.text
+_FilName:
+~~FilName:
+~s=R13
+~p=R12
+link R14,#0
+movem.l R6-R7/R11-R13,-(sp)
+~tp=R11
+~i=R7
+*line 29
+move.l 8(R14),R13
+*line 29
+move.l 12(R14),R12
+*line 29
+move.l R12,R11
+*line 31
+clr R7
+bra L4
+L5:
+*line 32
+*line 33
+*line 33
+tst.b (R13)
+beq L6
+*line 34
+*line 35
+*line 36
+cmp.b #46,(R13)
+beq L2
+*line 37
+*line 38
+move.b (R13)+,(R12)+
+*line 39
+bra L7
+L6:
+*line 40
+*line 41
+*line 42
+clr.b (R12)
+*line 43
+move.l R11,R0
+bra L1
+L7:
+*line 44
+L3:
+*line 31
+add #1,R7
+L4:
+*line 31
+cmp #8,R7
+blt L5
+L2:
+*line 47
+clr.b (R12)
+*line 48
+move.l R11,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R11-R13
+unlk R14
+rts
+.globl _FilExt
+.text
+_FilExt:
+~~FilExt:
+~s=R13
+~p=R12
+link R14,#0
+movem.l R5-R7/R11-R13,-(sp)
+~c=R7
+~tp=R11
+~i=R6
+*line 69
+move.l 8(R14),R13
+*line 69
+move.l 12(R14),R12
+*line 69
+move.l R12,R11
+*line 71
+bra L11
+L10:
+*line 72
+*line 73
+*line 73
+cmp.b #46,R7
+bne L12
+*line 74
+*line 75
+add.l #1,R13
+*line 76
+*line 77
+clr R6
+bra L15
+L16:
+*line 78
+*line 79
+*line 79
+tst.b (R13)
+beq L17
+*line 80
+*line 81
+move.b (R13)+,(R12)+
+*line 82
+bra L18
+L17:
+*line 83
+*line 84
+*line 85
+clr.b (R12)
+*line 86
+move.l R11,R0
+bra L8
+L18:
+*line 87
+L14:
+*line 77
+add #1,R6
+L15:
+*line 77
+cmp #3,R6
+blt L16
+L13:
+*line 88
+*line 89
+*line 90
+clr.b (R12)
+*line 91
+move.l R11,R0
+bra L8
+*line 92
+bra L19
+L12:
+*line 93
+*line 94
+*line 95
+add.l #1,R13
+L19:
+*line 96
+L11:
+*line 97
+move.b (R13),R7
+bne L10
+L9:
+*line 99
+clr.b (R12)
+*line 100
+move.l R11,R0
+bra L8
+L8:tst.l (sp)+
+movem.l (sp)+,R6-R7/R11-R13
+unlk R14
+rts
+.data
Index: alcyon/flread.s
===================================================================
--- alcyon/flread.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/flread.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,85 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl _flread
+.text
+_flread:
+~~flread:
+~buff=R13
+~len=R7
+~fp=16
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~ilen=R6
+*line 29
+move.l 8(R14),R13
+*line 29
+move.l 12(R14),R7
+*line 29
+bra L4
+L3:
+*line 30
+*line 31
+*line 31
+cmp.l #$7e00,R7
+blt L5
+*line 32
+*line 33
+*line 34
+move.l 16(R14),(sp)
+move #1,-(sp)
+move #32256,-(sp)
+move.l R13,-(sp)
+jsr _fread
+addq.l #8,sp
+cmp #1,R0
+beq L6
+*line 34
+move #-1,R0
+bra L1
+*line 35
+L6:
+*line 36
+add.l #$7e00,R13
+*line 37
+sub.l #$7e00,R7
+*line 38
+bra L7
+L5:
+*line 39
+*line 40
+*line 41
+move R7,R6
+*line 42
+*line 43
+*line 44
+move.l 16(R14),(sp)
+move #1,-(sp)
+move R6,-(sp)
+move.l R13,-(sp)
+jsr _fread
+addq.l #8,sp
+cmp #1,R0
+beq L8
+*line 44
+move #-1,R0
+bra L1
+*line 45
+L8:
+*line 46
+clr.l R7
+L7:
+*line 47
+L4:
+*line 48
+tst.l R7
+bgt L3
+L2:
+*line 50
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/fopen.s
===================================================================
--- alcyon/fopen.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/fopen.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,228 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl _errno
+.globl __opener
+.text
+__opener:
+~~_opener:
+~name=8
+~mode=12
+~aflag=16
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~fp=R13
+~plusopt=R7
+*line 23
+move.l #_Cbuffs,R13
+*line 25
+bra L4
+L3:
+*line 26
+*line 27
+*line 28
+add.l #18,R13
+move.l R13,R0
+cmp.l #198+_Cbuffs,R0
+blo L5
+*line 28
+clr.l R0
+bra L1
+L5:L4:
+*line 29
+tst.b 12(R13)
+bne L3
+L2:
+*line 31
+move.l 12(R14),R8
+cmp.b #43,1(R8)
+beq L10000
+clr R0
+bra L10001
+L10000:move #1,R0
+L10001:move R0,R7
+*line 33
+move.l 12(R14),R8
+move.b (R8),R0
+ext.w R0
+and #127,R0
+bra L7
+*line 34
+L8:
+*line 35
+*line 36
+*line 37
+tst R7
+beq L10002
+move #2,(sp)
+bra L10004
+L10002:clr (sp)
+L10004:move 16(R14),R0
+or R0,(sp)
+move.l 8(R14),-(sp)
+jsr _open
+addq.l #4,sp
+move.b R0,13(R13)
+cmp #-1,R0
+bne L9
+*line 37
+clr.l R0
+bra L1
+L9:bra L6
+*line 38
+*line 39
+L10:
+*line 40
+*line 41
+*line 42
+tst R7
+beq L10005
+move #2,(sp)
+bra L10007
+L10005:move #1,(sp)
+L10007:move 16(R14),R0
+or R0,(sp)
+or #768,(sp)
+move.l 8(R14),-(sp)
+jsr _open
+addq.l #4,sp
+move.b R0,13(R13)
+cmp #-1,R0
+bne L11
+*line 42
+clr.l R0
+bra L1
+*line 43
+L11:bra L6
+*line 44
+*line 45
+L12:
+*line 46
+*line 47
+*line 48
+tst R7
+beq L10008
+move #2,(sp)
+bra L10010
+L10008:move #1,(sp)
+L10010:move 16(R14),R0
+or R0,(sp)
+or #256,(sp)
+move.l 8(R14),-(sp)
+jsr _open
+addq.l #4,sp
+move.b R0,13(R13)
+cmp #-1,R0
+bne L13
+*line 48
+clr.l R0
+bra L1
+*line 49
+L13:
+*line 50
+*line 50
+move #2,(sp)
+clr.l -(sp)
+move.b 13(R13),R0
+ext.w R0
+move R0,-(sp) 
+jsr _lseek
+addq.l #6,sp
+tst.l R0
+bge L14
+*line 51
+*line 52
+move.b 13(R13),R0
+ext.w R0
+move R0,(sp) 
+jsr _close
+*line 53
+clr.l R0
+bra L1
+*line 54
+*line 55
+L14:bra L6
+*line 56
+*line 57
+L15:
+*line 58
+*line 59
+move #22,_errno
+*line 60
+clr.l R0
+bra L1
+bra L6
+L7:cmp #97,R0
+beq L12
+cmp #114,R0
+beq L8
+cmp #119,R0
+beq L10
+bra L15
+L6:
+*line 63
+move.b #1,12(R13)
+*line 64
+move #1024,16(R13)
+*line 65
+clr.l 8(R13)
+*line 66
+clr.l 4(R13)
+*line 67
+clr.l (R13)
+*line 68
+move.l R13,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _fopen
+.text
+_fopen:
+~~fopen:
+~name=8
+~mode=12
+link R14,#-4
+*line 78
+clr (sp)
+move.l 12(R14),-(sp)
+move.l 8(R14),-(sp)
+jsr __opener
+addq.l #8,sp
+bra L16
+L16:unlk R14
+rts
+.globl _fopena
+.text
+_fopena:
+~~fopena:
+~name=8
+~mode=12
+link R14,#-4
+*line 85
+clr (sp)
+move.l 12(R14),-(sp)
+move.l 8(R14),-(sp)
+jsr __opener
+addq.l #8,sp
+bra L17
+L17:unlk R14
+rts
+.globl _fopenb
+.text
+_fopenb:
+~~fopenb:
+~name=8
+~mode=12
+link R14,#-4
+*line 92
+move #-32768,(sp)
+move.l 12(R14),-(sp)
+move.l 8(R14),-(sp)
+jsr __opener
+addq.l #8,sp
+bra L18
+L18:unlk R14
+rts
+.data
Index: alcyon/fprintf.s
===================================================================
--- alcyon/fprintf.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/fprintf.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,50 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.bss
+L1:.ds.b 4
+.text
+.globl _fprintf
+.text
+_fprintf:
+~~fprintf:
+~stream=8
+~fmt=12
+~va_alist=16
+link R14,#-4
+movem.l R6-R7,-(sp)
+~count=R7
+~aptr=-4
+*line 27
+move.l 8(R14),L1
+*line 28
+lea 16(R14),R8
+move.l R8,-4(R14)
+*line 29
+move.l -4(R14),(sp)
+move.l 12(R14),-(sp)
+move.l #_fpsub,-(sp)
+jsr __dofmt
+addq.l #8,sp
+move R0,R7
+*line 31
+move R7,R0
+bra L2
+L2:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.text
+_fpsub:
+~~fpsub:
+~c=8
+link R14,#-4
+*line 38
+move.l L1,(sp)
+move 8(R14),-(sp)
+jsr _aputc
+addq.l #2,sp
+bra L4
+L4:unlk R14
+rts
+.data
Index: alcyon/fputs.s
===================================================================
--- alcyon/fputs.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/fputs.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,124 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl _puts
+.text
+_puts:
+~~puts:
+~str=R13
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+*line 15
+move.l 8(R14),R13
+*line 15
+bra L4
+L3:
+*line 16
+*line 17
+move.l #18+_Cbuffs,(sp)
+move.b (R13)+,R0
+ext.w R0
+move R0,-(sp) 
+jsr _putc
+addq.l #2,sp
+cmp #-1,R0
+bne L5
+*line 17
+move #-1,R0
+bra L1
+*line 18
+L5:L4:
+*line 19
+tst.b (R13)
+bne L3
+L2:
+*line 19
+move.l #18+_Cbuffs,(sp)
+move #10,-(sp)
+jsr _putc
+addq.l #2,sp
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _aputc
+.text
+_aputc:
+~~aputc:
+~c=R7
+~ptr=R13
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+*line 27
+move 8(R14),R7
+*line 27
+move.l 10(R14),R13
+*line 27
+and #127,R7
+*line 29
+*line 30
+cmp #10,R7
+bne L7
+*line 30
+*line 31
+move.l R13,(sp)
+move #13,-(sp)
+jsr _putc
+addq.l #2,sp
+cmp #-1,R0
+bne L8
+*line 31
+move #-1,R0
+bra L6
+*line 32
+L8:L7:
+*line 33
+move.l R13,(sp)
+move R7,-(sp)
+jsr _putc
+addq.l #2,sp
+bra L6
+L6:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _fputs
+.text
+_fputs:
+~~fputs:
+~s=R13
+~fp=12
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+*line 41
+move.l 8(R14),R13
+*line 41
+bra L12
+L11:
+*line 42
+*line 43
+move.l 12(R14),(sp)
+move.b (R13)+,R0
+ext.w R0
+move R0,-(sp) 
+jsr _aputc
+addq.l #2,sp
+cmp #-1,R0
+bne L13
+*line 43
+move #-1,R0
+bra L9
+L13:L12:
+*line 44
+tst.b (R13)
+bne L11
+L10:
+*line 44
+clr R0
+bra L9
+L9:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.data
Index: alcyon/fread.s
===================================================================
--- alcyon/fread.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/fread.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,68 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl _fread
+.text
+_fread:
+~~fread:
+~buffer=R13
+~size=12
+~number=14
+~stream=16
+link R14,#-2
+movem.l R5-R7/R13-R13,-(sp)
+~total=-2
+~c=R7
+~i=R6
+*line 28
+move.l 8(R14),R13
+*line 28
+clr -2(R14)
+bra L4
+L5:
+*line 29
+*line 30
+move 12(R14),R6
+bra L8
+L9:
+*line 31
+*line 32
+*line 33
+move.l 16(R14),(sp)
+jsr _getc
+move R0,R7
+cmp #-1,R7
+bne L10
+*line 33
+move -2(R14),R0
+bra L1
+*line 34
+L10:
+*line 35
+move.b R7,(R13)+
+L7:
+*line 30
+sub #1,R6
+L8:
+*line 30
+tst R6
+bne L9
+L6:
+*line 36
+L3:
+*line 28
+add #1,-2(R14)
+L4:
+*line 28
+move -2(R14),R0
+cmp 14(R14),R0
+blt L5
+L2:
+*line 38
+move -2(R14),R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/frfind.s
===================================================================
--- alcyon/frfind.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/frfind.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,596 @@
+.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 _insmode
+.globl _ep_adj
+.text
+_ep_adj:
+~~ep_adj:
+~sep=R13
+~tval=R7
+~sdir=12
+link R14,#0
+movem.l R6-R7/R12-R13,-(sp)
+~tep=R12
+*line 97
+move.l 8(R14),R13
+*line 97
+move.l 14(R14),R7
+*line 97
+*line 98
+tst.l R7
+bge L2
+*line 98
+move _curscor,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_scores,R9
+move.l 0(R8,R9.l),R0
+bra L1
+*line 99
+L2:
+*line 100
+*line 100
+tst 12(R14)
+beq L3
+*line 101
+*line 102
+*line 102
+cmp.l (R13),R7
+ble L4
+*line 103
+*line 104
+bra L7
+L6:
+*line 105
+*line 108
+*line 109
+*line 113
+*line 114
+*line 115
+*line 116
+cmp.l (R13),R7
+ble L8
+*line 116
+move.l R12,R13
+*line 117
+bra L9
+L8:bra L5
+L9:
+*line 118
+L7:
+*line 119
+move.l 12(R13),R12
+move.l R12,R0
+bne L6
+L5:
+*line 120
+*line 121
+L4:
+*line 122
+bra L12
+L11:
+*line 123
+*line 126
+*line 127
+*line 131
+*line 132
+*line 133
+*line 134
+cmp.l (R12),R7
+bgt L10000
+cmp.b #1,5(R12)
+bne L13
+L10000:*line 135
+*line 139
+*line 140
+move.l R13,R0
+bra L1
+*line 141
+*line 142
+L13:
+*line 143
+move.l R12,R13
+L12:
+*line 144
+move.l 8(R13),R12
+move.l R12,R0
+bne L11
+L10:
+*line 145
+*line 148
+*line 149
+*line 153
+*line 154
+move.l R13,R0
+bra L1
+*line 155
+*line 156
+*line 157
+*line 158
+bra L14
+L3:
+*line 159
+*line 160
+*line 161
+*line 161
+cmp.l (R13),R7
+bge L15
+*line 162
+*line 163
+bra L18
+L17:
+*line 164
+*line 167
+*line 168
+*line 172
+*line 173
+*line 174
+*line 175
+*line 176
+cmp.l (R13),R7
+bge L16
+cmp.b #1,5(R13)
+beq L16
+*line 177
+*line 178
+move.l R12,R13
+L18:
+*line 179
+move.l 8(R13),R12
+move.l R12,R0
+bne L17
+L16:
+*line 180
+*line 181
+L15:
+*line 182
+bra L21
+L20:
+*line 183
+*line 186
+*line 187
+*line 191
+*line 192
+*line 193
+*line 193
+cmp.l (R12),R7
+bge L22
+*line 194
+*line 198
+*line 199
+move.l R13,R0
+bra L1
+*line 200
+*line 201
+L22:
+*line 202
+move.l R12,R13
+L21:
+*line 203
+move.l 12(R13),R12
+move.l R12,R0
+bne L20
+L19:
+*line 204
+*line 207
+*line 208
+*line 212
+*line 213
+move.l R13,R0
+bra L1
+L14:L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R12-R13
+unlk R14
+rts
+.globl _frfind
+.text
+_frfind:
+~~frfind:
+~tval=R7
+~sdir=12
+link R14,#0
+movem.l R3-R7/R12-R13,-(sp)
+~i=R6
+~t_min=R5
+~dt=R4
+~ep=R13
+~sep=R12
+*line 251
+move.l 8(R14),R7
+*line 251
+*line 251
+tst.l _scp
+bne L24
+*line 252
+*line 256
+*line 257
+clr.l R0
+bra L23
+*line 258
+*line 259
+L24:
+*line 260
+*line 261
+tst.l R7
+bge L25
+*line 261
+move.l R7,(sp)
+move 12(R14),-(sp)
+move.l _scp,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+bra L23
+*line 262
+L25:
+*line 263
+*line 263
+move.l _p_cur,R8
+cmp.l (R8),R7
+bne L26
+*line 264
+*line 268
+*line 269
+move.l R7,(sp)
+move 12(R14),-(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+bra L23
+*line 270
+*line 271
+L26:
+*line 272
+*line 272
+move.l _p_fwd,R8
+cmp.l (R8),R7
+bne L27
+*line 273
+*line 277
+*line 278
+move.l R7,(sp)
+move 12(R14),-(sp)
+move.l _p_fwd,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+bra L23
+*line 279
+*line 280
+L27:
+*line 281
+*line 281
+move.l _p_bak,R8
+cmp.l (R8),R7
+bne L28
+*line 282
+*line 286
+*line 287
+move.l R7,(sp)
+move 12(R14),-(sp)
+move.l _p_bak,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+bra L23
+*line 288
+*line 289
+L28:
+*line 290
+*line 291
+*line 292
+move.l _p_cur,R8
+cmp.l (R8),R7
+ble L10001
+move.l R7,R0
+move.l _p_cur,R9
+move.l (R9),R1
+sub.l R1,R0
+bra L10003
+L10001:move.l _p_cur,R8
+move.l (R8),R0
+sub.l R7,R0
+L10003:move.l R0,R5
+*line 294
+move.l _p_cur,R13
+*line 296
+*line 297
+*line 298
+move.l _p_fwd,R8
+cmp.l (R8),R7
+ble L10004
+move.l R7,R0
+move.l _p_fwd,R9
+move.l (R9),R1
+sub.l R1,R0
+bra L10006
+L10004:move.l _p_fwd,R8
+move.l (R8),R0
+sub.l R7,R0
+L10006:move.l R0,R4
+*line 300
+*line 300
+cmp.l R5,R4
+bge L29
+*line 301
+*line 302
+move.l R4,R5
+*line 303
+move.l _p_fwd,R13
+*line 304
+*line 308
+*line 309
+*line 310
+*line 311
+*line 312
+*line 313
+L29:
+*line 314
+*line 315
+*line 316
+move.l _p_bak,R8
+cmp.l (R8),R7
+ble L10007
+move.l R7,R0
+move.l _p_bak,R9
+move.l (R9),R1
+sub.l R1,R0
+bra L10009
+L10007:move.l _p_bak,R8
+move.l (R8),R0
+sub.l R7,R0
+L10009:move.l R0,R4
+*line 318
+*line 318
+cmp.l R5,R4
+bge L30
+*line 319
+*line 320
+move.l R4,R5
+*line 321
+move.l _p_bak,R13
+*line 322
+*line 326
+*line 327
+*line 328
+L30:
+*line 329
+*line 329
+tst _insmode
+bne L31
+*line 330
+*line 331
+clr R6
+bra L34
+L35:
+*line 332
+*line 333
+*line 333
+move _curscor,R0
+muls #80,R0
+move R6,R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+add.l #_seclist,R0
+move.l R0,R8
+move.l (R8),R12
+move.l R12,R0
+beq L36
+*line 334
+*line 335
+*line 336
+*line 337
+cmp.l (R12),R7
+ble L10010
+move.l R7,R0
+sub.l (R12),R0
+bra L10012
+L10010:move.l (R12),R0
+sub.l R7,R0
+L10012:move.l R0,R4
+*line 338
+*line 339
+*line 339
+cmp.l R5,R4
+bge L37
+*line 340
+*line 341
+move.l R4,R5
+*line 342
+move.l R12,R13
+*line 343
+*line 347
+*line 348
+L37:
+*line 349
+L36:L33:
+*line 331
+add #1,R6
+L34:
+*line 331
+cmp #20,R6
+blt L35
+L32:
+*line 350
+*line 351
+*line 352
+*line 355
+*line 356
+L31:
+*line 357
+move.l R7,(sp)
+move 12(R14),-(sp)
+move.l R13,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+bra L23
+L23:tst.l (sp)+
+movem.l (sp)+,R4-R7/R12-R13
+unlk R14
+rts
+.globl _findev
+.text
+_findev:
+~~findev:
+~te=R7
+~et=R6
+~d1=R5
+~d2=R4
+~ep=8
+link R14,#0
+movem.l R3-R7/R13-R13,-(sp)
+~tp=R13
+*line 385
+move.l 12(R14),R7
+*line 385
+move 16(R14),R6
+*line 385
+move 18(R14),R5
+*line 385
+move 20(R14),R4
+*line 385
+move.l R7,(sp)
+move #1,-(sp)
+move.l 8(R14),-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,R13
+*line 387
+bra L41
+L40:
+*line 388
+*line 389
+*line 390
+*line 391
+*line 392
+move.b 5(R13),R0
+ext.w R0
+cmp R0,R6
+bne L42
+cmp #-1,R5
+beq L10013
+move.b 6(R13),R0
+ext.w R0
+cmp R0,R5
+bne L42
+L10013:cmp #-1,R4
+beq L10014
+move.b 7(R13),R0
+ext.w R0
+cmp R0,R4
+bne L42
+L10014:*line 392
+move.l R13,R0
+bra L38
+*line 393
+L42:
+*line 394
+move.l 12(R13),R13
+L41:
+*line 395
+cmp.l (R13),R7
+beq L40
+L39:
+*line 397
+clr.l R0
+bra L38
+L38:tst.l (sp)+
+movem.l (sp)+,R4-R7/R13-R13
+unlk R14
+rts
+.globl _ehfind
+.text
+_ehfind:
+~~ehfind:
+~eh=R7
+~te=R6
+~d1=R5
+~d2=R4
+link R14,#0
+movem.l R3-R7/R13-R13,-(sp)
+~tp=R13
+*line 428
+move 8(R14),R7
+*line 428
+move.l 10(R14),R6
+*line 428
+move 14(R14),R5
+*line 428
+move 16(R14),R4
+*line 428
+move _curscor,R0
+muls #48,R0
+move R7,R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+add.l #_hplist,R0
+move.l R0,R8
+move.l (R8),R13
+*line 430
+bra L46
+L45:
+*line 431
+*line 432
+*line 433
+*line 434
+*line 435
+cmp.l #$ffffffff,R6
+beq L10015
+cmp.l (R13),R6
+bne L47
+L10015:cmp #-1,R5
+beq L10016
+move.b 6(R13),R0
+ext.w R0
+cmp R0,R5
+bne L47
+L10016:cmp #-1,R4
+beq L10017
+move.b 7(R13),R0
+ext.w R0
+cmp R0,R4
+bne L47
+L10017:*line 435
+move.l R13,R0
+bra L43
+*line 436
+L47:
+*line 437
+move.l 20(R13),R13
+L46:
+*line 438
+move.l R13,R0
+bne L45
+L44:
+*line 440
+move.l R13,R0
+bra L43
+L43:tst.l (sp)+
+movem.l (sp)+,R4-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/fscanf.s
===================================================================
--- alcyon/fscanf.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/fscanf.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,93 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.bss
+L1:.ds.b 2
+.text
+.bss
+L2:.ds.b 4
+.text
+.text
+_gchar:
+~~gchar:
+~what=8
+link R14,#-4
+*line 18
+*line 18
+tst 8(R14)
+bne L5
+*line 19
+*line 20
+*line 21
+move.l L2,R8
+btst #3,12(R8)
+beq L6
+*line 21
+move #-1,L1
+*line 22
+bra L7
+L6:
+*line 23
+move.l L2,(sp)
+jsr _agetc
+move R0,L1
+L7:
+*line 24
+bra L8
+L5:
+*line 25
+move.l L2,(sp)
+move L1,-(sp)
+jsr _ungetc
+addq.l #2,sp
+move R0,L1
+L8:
+*line 27
+move L1,R0
+bra L4
+L4:unlk R14
+rts
+.globl _scanf
+.text
+_scanf:
+~~scanf:
+~fmt=8
+~args=12
+link R14,#-4
+*line 35
+move.l #_Cbuffs,L2
+*line 36
+clr L1
+*line 37
+move.l R14,(sp)
+add.l #12,(sp)
+move.l 8(R14),-(sp)
+move.l #_gchar,-(sp)
+jsr _scanfmt
+addq.l #8,sp
+bra L9
+L9:unlk R14
+rts
+.globl _fscanf
+.text
+_fscanf:
+~~fscanf:
+~fp=8
+~fmt=12
+~args=16
+link R14,#-4
+*line 46
+move.l 8(R14),L2
+*line 47
+clr L1
+*line 48
+move.l R14,(sp)
+add.l #16,(sp)
+move.l 12(R14),-(sp)
+move.l #_gchar,-(sp)
+jsr _scanfmt
+addq.l #8,sp
+bra L10
+L10:unlk R14
+rts
+.data
Index: alcyon/fseek.s
===================================================================
--- alcyon/fseek.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/fseek.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,100 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl _chantab
+.globl _Wrkbuf
+.globl _fseek
+.text
+_fseek:
+~~fseek:
+~fp=R13
+~pos=12
+~mode=16
+link R14,#-4
+movem.l R5-R7/R13-R13,-(sp)
+~i=R7
+~lr=R6
+~curpos=-4
+*line 27
+move.l 8(R14),R13
+*line 27
+*line 27
+btst #2,12(R13)
+beq L2
+*line 28
+*line 29
+*line 30
+move #-1,(sp)
+move.l R13,-(sp)
+jsr _flush_
+addq.l #4,sp
+tst R0
+beq L3
+*line 30
+move #-1,R0
+bra L1
+*line 31
+L3:bra L4
+L2:
+*line 32
+*line 33
+*line 34
+*line 35
+cmp #1,16(R14)
+bne L5
+tst.l (R13)
+beq L5
+*line 35
+move.l 4(R13),R0
+sub.l (R13),R0
+sub.l R0,12(R14)
+L5:L4:
+*line 38
+clr R0
+ext.l R0
+move.l R0,4(R13)
+move.l R0,(R13)
+*line 39
+and.b #-9,12(R13)
+*line 41
+move 16(R14),(sp)
+move.l 12(R14),-(sp)
+move.b 13(R13),R0
+ext.w R0
+move R0,-(sp) 
+jsr _lseek
+addq.l #6,sp
+move R0,R6
+*line 43
+*line 44
+move.b 13(R13),R0
+ext.w R0
+muls #12,R0
+move.l R0,R8
+move.l #_chantab,R9
+move.l 8(R8,R9.l),R8
+clr R0
+move 32(R8),R0
+and #-32768,R0
+beq L6
+*line 44
+or.b #8,12(R13)
+*line 45
+L6:
+*line 46
+*line 47
+tst R6
+bge L7
+*line 47
+move #-1,R0
+bra L1
+*line 48
+L7:
+*line 49
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/fsinit.s
===================================================================
--- alcyon/fsinit.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/fsinit.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,282 @@
+.globl _errno
+.globl __bpbin
+.globl __dirin
+.globl __fatin
+.globl __dirmod
+.globl __fatmod
+.globl _Stdbufs
+.comm _Stdbufs,4
+.globl _Wrkbuf
+.comm _Wrkbuf,512
+.globl _Stdbuf
+.comm _Stdbuf,8192
+.globl _Cbuffs
+.comm _Cbuffs,198
+.globl __fcbtab
+.comm __fcbtab,448
+.globl _chantab
+.comm _chantab,132
+.globl __b_tbuf
+.comm __b_tbuf,4608
+.globl __b_trak
+.comm __b_trak,2
+.globl __b_side
+.comm __b_side,2
+.globl __b_sect
+.comm __b_sect,2
+.globl __b_tsec
+.comm __b_tsec,2
+.globl __badfd
+.text
+__badfd:
+~~_badfd:
+link R14,#-4
+*line 57
+move #9,_errno
+*line 58
+move #-1,R0
+bra L1
+L1:unlk R14
+rts
+.globl __noper
+.text
+__noper:
+~~_noper:
+link R14,#-4
+*line 70
+clr R0
+bra L2
+L2:unlk R14
+rts
+.globl _InitCH
+.text
+_InitCH:
+~~InitCH:
+~cp=R13
+~rdi=13
+~wri=15
+~ioi=17
+~ski=19
+~cfp=20
+~charg=24
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+*line 88
+move.l 8(R14),R13
+*line 88
+move.b 13(R14),(R13)
+*line 89
+move.b 15(R14),1(R13)
+*line 90
+move.b 17(R14),2(R13)
+*line 91
+move.b 19(R14),3(R13)
+*line 92
+move.l 20(R14),4(R13)
+*line 93
+move.l 24(R14),8(R13)
+L3:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _Init_CB
+.text
+_Init_CB:
+~~Init_CB:
+~fp=R13
+~flags=13
+~unit=15
+~bufad=16
+~bufsize=20
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+*line 108
+move.l 8(R14),R13
+*line 108
+clr.l (R13)
+*line 109
+clr.l 4(R13)
+*line 110
+move.l 16(R14),8(R13)
+*line 111
+move.b 13(R14),12(R13)
+*line 112
+move.b 15(R14),13(R13)
+*line 113
+clr.b 14(R13)
+*line 114
+move 20(R14),16(R13)
+L4:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _InitFS
+.text
+_InitFS:
+~~InitFS:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 130
+move #448,(sp)
+clr -(sp)
+move.l #__fcbtab,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 131
+move #4096,(sp)
+clr -(sp)
+move.l #_Stdbuf,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 133
+move #1024,(sp)
+clr.l -(sp)
+clr -(sp)
+move #1,-(sp)
+move.l #_Cbuffs,-(sp)
+jsr _Init_CB
+adda.l #12,sp
+*line 134
+move #1,(sp)
+clr.l -(sp)
+move #1,-(sp)
+move #1,-(sp)
+move.l #18+_Cbuffs,-(sp)
+jsr _Init_CB
+adda.l #12,sp
+*line 135
+move #1,(sp)
+clr.l -(sp)
+move #2,-(sp)
+move #1,-(sp)
+move.l #36+_Cbuffs,-(sp)
+jsr _Init_CB
+adda.l #12,sp
+*line 137
+move #3,R7
+bra L8
+L9:
+*line 138
+clr (sp)
+clr.l -(sp)
+clr -(sp)
+clr -(sp)
+move R7,R0
+muls #18,R0
+add.l #_Cbuffs,R0
+move.l R0,-(sp)
+jsr _Init_CB
+adda.l #12,sp
+L7:
+*line 137
+add #1,R7
+L8:
+*line 137
+cmp #11,R7
+blt L9
+L6:
+*line 140
+clr.l _Stdbuf
+*line 142
+move #1,R7
+bra L12
+L13:
+*line 143
+move R7,R0
+sub #1,R0
+move #10,R1
+asl R1,R0
+ext.l R0
+add.l #_Stdbuf,R0
+move R7,R1
+move #10,R2
+asl R2,R1
+ext.l R1
+add.l #_Stdbuf,R1
+move.l R1,R9
+move.l R0,(R9)
+L11:
+*line 142
+add #1,R7
+L12:
+*line 142
+cmp #8,R7
+blt L13
+L10:
+*line 145
+move.l #7168+_Stdbuf,_Stdbufs
+*line 147
+move.l #$2,(sp)
+move.l #__noper,-(sp)
+clr -(sp)
+move #1,-(sp)
+clr -(sp)
+move #2,-(sp)
+move.l #_chantab,-(sp)
+jsr _InitCH
+adda.l #16,sp
+*line 148
+move.l #$2,(sp)
+move.l #__noper,-(sp)
+clr -(sp)
+move #1,-(sp)
+move #2,-(sp)
+clr -(sp)
+move.l #12+_chantab,-(sp)
+jsr _InitCH
+adda.l #16,sp
+*line 149
+move.l #$2,(sp)
+move.l #__noper,-(sp)
+clr -(sp)
+move #1,-(sp)
+move #2,-(sp)
+clr -(sp)
+move.l #24+_chantab,-(sp)
+jsr _InitCH
+adda.l #16,sp
+*line 151
+move #3,R7
+bra L16
+L17:
+*line 152
+clr.l (sp)
+move.l #__badfd,-(sp)
+clr -(sp)
+clr -(sp)
+clr -(sp)
+clr -(sp)
+move R7,R0
+muls #12,R0
+add.l #_chantab,R0
+move.l R0,-(sp)
+jsr _InitCH
+adda.l #16,sp
+L15:
+*line 151
+add #1,R7
+L16:
+*line 151
+cmp #11,R7
+blt L17
+L14:
+*line 154
+clr __bpbin
+*line 155
+clr __dirin
+*line 156
+clr __fatin
+*line 157
+clr __fatmod
+*line 158
+clr __dirmod
+*line 161
+move #-1,__b_trak
+*line 162
+move #-1,__b_side
+L5:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.data
Index: alcyon/fsize.s
===================================================================
--- alcyon/fsize.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/fsize.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,161 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl _chantab
+.globl _Wrkbuf
+.globl __thefat
+.globl __thebpb
+.globl _fsize
+.text
+_fsize:
+~~fsize:
+~fp=8
+~how=12
+link R14,#0
+movem.l R7-R7/R12-R13,-(sp)
+~chp=R13
+~fcp=R12
+*line 35
+*line 36
+tst.l 8(R14)
+bne L2
+*line 36
+move.l #$ffffffff,R0
+bra L1
+*line 37
+L2:
+*line 38
+*line 38
+move.l 8(R14),R8
+btst #0,12(R8)
+beq L3
+*line 39
+*line 40
+move.l 8(R14),R8
+move.b 13(R8),R0
+ext.w R0
+muls #12,R0
+move.l R0,R13
+add.l #_chantab,R13
+*line 41
+*line 42
+*line 43
+move.l 4(R13),R0
+cmp.l #__filecl,R0
+beq L4
+*line 43
+move.l #$ffffffff,R0
+bra L1
+*line 44
+L4:
+*line 45
+move.l 8(R13),R12
+*line 46
+*line 47
+*line 47
+btst #4,32(R12)
+beq L5
+*line 48
+*line 49
+*line 50
+tst 12(R14)
+beq L6
+*line 50
+move.l 52(R12),R0
+bra L1
+*line 51
+bra L7
+L6:
+*line 52
+move.l 48(R12),R0
+bra L1
+L7:
+*line 53
+*line 54
+bra L8
+L5:
+*line 55
+move.l #$ffffffff,R0
+bra L1
+L8:
+*line 56
+*line 57
+bra L9
+L3:
+*line 58
+move.l #$ffffffff,R0
+bra L1
+L9:L1:tst.l (sp)+
+movem.l (sp)+,R12-R13
+unlk R14
+rts
+.globl _dspace
+.text
+_dspace:
+~~dspace:
+~which=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~maxcl=R7
+~clcount=R6
+~nc=R5
+*line 78
+*line 79
+jsr __opnvol
+tst R0
+beq L11
+*line 79
+move.l #$ffffffff,R0
+bra L10
+*line 80
+L11:
+*line 81
+move.l __thebpb,R8
+move 14(R8),R7
+*line 83
+*line 83
+tst 8(R14)
+beq L12
+*line 84
+*line 85
+clr R6
+*line 86
+*line 87
+move #2,R5
+bra L15
+L16:
+*line 88
+*line 89
+move R5,(sp)
+move.l #__thefat,-(sp)
+jsr __gtcl12
+addq.l #4,sp
+tst R0
+bne L17
+*line 89
+add #1,R6
+*line 90
+L17:L14:
+*line 87
+add #1,R5
+L15:
+*line 87
+cmp R7,R5
+blt L16
+L13:
+*line 91
+move R6,R0
+bra L10
+*line 92
+bra L18
+L12:
+*line 93
+*line 94
+*line 95
+move R7,R0
+bra L10
+L18:L10:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
Index: alcyon/fstubs.s
===================================================================
--- alcyon/fstubs.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/fstubs.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,21 @@
+.globl _errno
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl _chantab
+.globl _Wrkbuf
+.globl _readbuf
+.text
+_readbuf:
+~~readbuf:
+~dev=8
+~buf=10
+link R14,#-4
+*line 47
+jsr _xtrap15
+*line 48
+move #1,R0
+bra L1
+L1:unlk R14
+rts
+.data
Index: alcyon/ftell.s
===================================================================
--- alcyon/ftell.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/ftell.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,113 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl _chantab
+.globl _Wrkbuf
+.globl _ftell
+.text
+_ftell:
+~~ftell:
+~fp=R13
+link R14,#0
+movem.l R4-R7/R11-R13,-(sp)
+~fcp=R12
+~chp=R11
+~dpos=R7
+~pos=R6
+~diff=R5
+*line 35
+move.l 8(R14),R13
+*line 35
+*line 35
+move.l R13,R0
+bne L2
+*line 36
+*line 40
+*line 41
+*line 42
+clr.l R0
+bra L1
+*line 43
+*line 44
+L2:
+*line 45
+*line 45
+tst.b 12(R13)
+beq L10000
+clr R0
+bra L10001
+L10000:move #1,R0
+L10001:and #1,R0
+beq L3
+*line 46
+*line 50
+*line 51
+*line 52
+clr.l R0
+bra L1
+*line 53
+*line 54
+L3:
+*line 55
+move.b 13(R13),R0
+ext.w R0
+muls #12,R0
+move.l R0,R11
+add.l #_chantab,R11
+*line 57
+*line 57
+move.l 4(R11),R0
+cmp.l #__filecl,R0
+beq L4
+*line 58
+*line 63
+*line 64
+*line 65
+clr.l R0
+bra L1
+*line 66
+*line 67
+L4:
+*line 68
+move.l 8(R11),R12
+*line 70
+clr.l R7
+move 38(R12),R7
+move.l 40(R12),R0
+move.l #$9,R1
+asl.l R1,R0
+add.l R0,R7
+*line 72
+*line 73
+btst #2,12(R13)
+beq L5
+*line 73
+move.l (R13),R5
+sub.l 8(R13),R5
+move.l R7,R6
+add.l R5,R6
+bra L6
+L5:
+*line 74
+*line 75
+tst.l (R13)
+beq L7
+*line 75
+move.l 4(R13),R5
+sub.l (R13),R5
+move.l R7,R6
+sub.l R5,R6
+*line 76
+bra L8
+L7:
+*line 77
+move.l R7,R6
+L8:L6:
+*line 95
+move.l R6,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R5-R7/R11-R13
+unlk R14
+rts
+.data
Index: alcyon/fwrite.s
===================================================================
--- alcyon/fwrite.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/fwrite.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,86 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl _fwrite
+.text
+_fwrite:
+~~fwrite:
+~buffer=R13
+~size=R7
+~number=R6
+~stream=R12
+link R14,#0
+movem.l R3-R7/R12-R13,-(sp)
+~i=R5
+~j=R4
+*line 30
+move.l 8(R14),R13
+*line 30
+move 12(R14),R7
+*line 30
+move 14(R14),R6
+*line 30
+move.l 16(R14),R12
+*line 30
+*line 31
+tst R7
+bge L2
+*line 31
+clr R0
+bra L1
+*line 32
+L2:
+*line 33
+*line 34
+tst R6
+bge L3
+*line 34
+clr R0
+bra L1
+*line 35
+L3:
+*line 36
+clr R5
+bra L6
+L7:
+*line 37
+clr R4
+bra L10
+L11:
+*line 38
+*line 39
+move.l R12,(sp)
+move.b (R13)+,R0
+ext.w R0
+move R0,-(sp) 
+jsr _putc
+addq.l #2,sp
+cmp #-1,R0
+bne L12
+*line 39
+move R5,R0
+bra L1
+*line 40
+L12:L9:
+*line 37
+add #1,R4
+L10:
+*line 37
+cmp R7,R4
+blt L11
+L8:L5:
+*line 36
+add #1,R5
+L6:
+*line 36
+cmp R6,R5
+blt L7
+L4:
+*line 41
+move R6,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R4-R7/R12-R13
+unlk R14
+rts
+.data
Index: alcyon/gcurpos.s
===================================================================
--- alcyon/gcurpos.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/gcurpos.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,894 @@
+.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 _sgcsw
+.globl _stcrow
+.globl _stccol
+.data
+L1:.dc.w $FFFF
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FF
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F0F
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F00F
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F00
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F000
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FFF0
+.dc.w $F
+.dc.w $0
+.dc.w $0
+.dc.w $FF0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F0F0
+.dc.w $FFF
+.dc.w $0
+.dc.w $0
+.dc.w $F0F0
+.dc.w $F
+.dc.w $0
+.dc.w $0
+.dc.w $F000
+.dc.w $F0
+.dc.w $0
+.dc.w $0
+.dc.w $F000
+.dc.w $F00
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.text
+.data
+L2:.dc.w $FFF0
+.dc.w $F
+.dc.w $0
+.dc.w $0
+.dc.w $FF0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F0F0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F0
+.dc.w $F
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F00
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F000
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FF00
+.dc.w $FF
+.dc.w $0
+.dc.w $0
+.dc.w $FF00
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F00
+.dc.w $FFFF
+.dc.w $0
+.dc.w $0
+.dc.w $F00
+.dc.w $FF
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F0F
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F00F
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.text
+.data
+L3:.dc.w $0
+.dc.w $0
+.dc.w $F000
+.dc.w $FFF
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FF0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F0F
+.dc.w $0
+.dc.w $0
+.dc.w $F000
+.dc.w $F00
+.dc.w $0
+.dc.w $0
+.dc.w $F00
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F
+.dc.w $0
+.dc.w $0
+.dc.w $F000
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F00
+.dc.w $0
+.dc.w $0
+.dc.w $FF00
+.dc.w $FF
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FF
+.dc.w $0
+.dc.w $0
+.dc.w $FFFF
+.dc.w $F0
+.dc.w $0
+.dc.w $0
+.dc.w $FF00
+.dc.w $F0
+.dc.w $0
+.dc.w $0
+.dc.w $F0F0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F00F
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.text
+.data
+L4:.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FFFF
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FF00
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F0F0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F00F
+.dc.w $0
+.dc.w $0
+.dc.w $F000
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F00
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F
+.dc.w $0
+.dc.w $0
+.dc.w $F000
+.dc.w $0
+.dc.w $0
+.dc.w $F000
+.dc.w $FFF
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FF0
+.dc.w $0
+.dc.w $0
+.dc.w $FFF0
+.dc.w $F0F
+.dc.w $0
+.dc.w $0
+.dc.w $F000
+.dc.w $F0F
+.dc.w $0
+.dc.w $0
+.dc.w $F00
+.dc.w $F
+.dc.w $0
+.dc.w $0
+.dc.w $F0
+.dc.w $F
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.text
+.data
+L5:.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F000
+.dc.w $F00
+.dc.w $0
+.dc.w $0
+.dc.w $F000
+.dc.w $F0
+.dc.w $0
+.dc.w $0
+.dc.w $F0F0
+.dc.w $F
+.dc.w $0
+.dc.w $0
+.dc.w $F0F0
+.dc.w $FFF
+.dc.w $0
+.dc.w $0
+.dc.w $FF0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FFF0
+.dc.w $F
+.dc.w $0
+.dc.w $0
+.dc.w $F
+.dc.w $0
+.dc.w $0
+.dc.w $F000
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F00
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F
+.dc.w $0
+.dc.w $0
+.dc.w $F00F
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F0F
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FF
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FFFF
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.text
+.data
+L6:.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F00F
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F0F
+.dc.w $0
+.dc.w $0
+.dc.w $F00
+.dc.w $FF
+.dc.w $0
+.dc.w $0
+.dc.w $F00
+.dc.w $FFFF
+.dc.w $0
+.dc.w $0
+.dc.w $FF00
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FF00
+.dc.w $FF
+.dc.w $0
+.dc.w $0
+.dc.w $F0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F
+.dc.w $0
+.dc.w $0
+.dc.w $F000
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F00
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F0
+.dc.w $0
+.dc.w $0
+.dc.w $F0
+.dc.w $F
+.dc.w $0
+.dc.w $0
+.dc.w $F0F0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FF0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FFF0
+.dc.w $F
+.dc.w $0
+.dc.w $0
+.text
+.data
+L7:.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F00F
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F0F0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FF00
+.dc.w $F0
+.dc.w $0
+.dc.w $0
+.dc.w $FFFF
+.dc.w $F0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FF
+.dc.w $0
+.dc.w $0
+.dc.w $FF00
+.dc.w $FF
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F00
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F000
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F00
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F000
+.dc.w $F00
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F0F
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FF0
+.dc.w $0
+.dc.w $0
+.dc.w $F000
+.dc.w $FFF
+.text
+.data
+L8:.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F0
+.dc.w $F
+.dc.w $0
+.dc.w $0
+.dc.w $F00
+.dc.w $F
+.dc.w $0
+.dc.w $0
+.dc.w $F000
+.dc.w $F0F
+.dc.w $0
+.dc.w $0
+.dc.w $FFF0
+.dc.w $F0F
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FF0
+.dc.w $0
+.dc.w $0
+.dc.w $F000
+.dc.w $FFF
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F000
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F00
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F000
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F00F
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $F0F0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FF00
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FFFF
+.text
+.data
+L9:
+*line 223
+.dc.l _v_curs0
+*line 224
+.dc.l _v_curs1
+*line 226
+.dc.l _v_curs2
+*line 227
+.dc.l _v_curs3
+*line 229
+.dc.l _v_curs4
+*line 230
+.dc.l _v_curs5
+*line 232
+.dc.l _v_curs6
+*line 234
+.dc.l _v_curs7
+.text
+.globl _gcurpos
+.text
+_gcurpos:
+~~gcurpos:
+~xloc=R7
+~yloc=R6
+link R14,#0
+movem.l R2-R7/R13-R13,-(sp)
+~ab=R5
+~xo=R4
+~yo=R3
+~op=R13
+*line 254
+move 8(R14),R7
+*line 254
+move 10(R14),R6
+*line 254
+*line 254
+cmp #256,R7
+bge L11
+*line 255
+*line 256
+clr R4
+*line 257
+*line 258
+*line 259
+cmp #175,R6
+bge L12
+*line 259
+clr R5
+*line 259
+clr R3
+*line 260
+bra L13
+L12:
+*line 261
+move #4,R5
+*line 261
+move #-15,R3
+L13:
+*line 262
+bra L14
+L11:
+*line 263
+*line 264
+*line 265
+move #-14,R4
+*line 266
+*line 267
+*line 268
+cmp #175,R6
+bge L15
+*line 268
+move #2,R5
+*line 268
+clr R3
+*line 269
+bra L16
+L15:
+*line 270
+move #6,R5
+*line 270
+move #-15,R3
+L16:L14:
+*line 273
+*line 274
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L17
+*line 274
+clr (sp)
+jsr _vbank
+*line 275
+L17:
+*line 276
+or #16,120+_v_odtab
+*line 277
+move #15,(sp)
+jsr _objclr
+*line 279
+move.l #_v_obtab,R13
+*line 280
+move R7,R0
+add R4,R0
+move R0,4(R13)
+*line 281
+move R6,R0
+add R3,R0
+move R0,6(R13)
+*line 282
+move R5,R8
+move R7,R1
+and #1,R1
+add R1,R8
+add.l R8,R8
+add.l R8,R8
+add.l #L9,R8
+move.l (R8),8(R13)
+*line 283
+move 4(R13),R0
+asr #1,R0
+and #1023,R0
+or #1024,R0
+move R0,16(R13)
+*line 285
+move #15,(sp)
+clr -(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 287
+move R6,R0
+ext.l R0
+divs #14,R0
+move R0,_stcrow
+*line 288
+move R7,R0
+asr #3,R0
+move R0,_stccol
+*line 289
+move R5,R0
+move R7,R1
+and #1,R1
+add R1,R0
+bra L10
+L10:tst.l (sp)+
+movem.l (sp)+,R3-R7/R13-R13
+unlk R14
+rts
+.globl _andcopy
+.text
+_andcopy:
+~~andcopy:
+~to=R13
+~from=R12
+~with=R7
+~len=18
+link R14,#0
+movem.l R5-R7/R12-R13,-(sp)
+~i=R6
+*line 307
+move.l 8(R14),R13
+*line 307
+move.l 12(R14),R12
+*line 307
+move 16(R14),R7
+*line 307
+move 18(R14),R6
+bra L21
+L22:
+*line 308
+clr R0
+move R7,R0
+and (R12)+,R0
+move R0,(R13)+
+L20:L21:
+*line 307
+move R6,R0
+sub #1,R6
+tst R0
+bne L22
+L19:L18:tst.l (sp)+
+movem.l (sp)+,R6-R7/R12-R13
+unlk R14
+rts
+.globl _arcurs
+.text
+_arcurs:
+~~arcurs:
+~icolor=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~color=R7
+*line 322
+move 8(R14),(sp)
+jsr _exp_c
+move R0,R7
+*line 324
+*line 325
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+cmp #256,R0
+beq L24
+*line 325
+move #1,(sp)
+jsr _vbank
+*line 326
+L24:
+*line 327
+move #64,(sp)
+move R7,-(sp)
+move.l #L1,-(sp)
+move.l #_v_curs0,-(sp)
+jsr _andcopy
+adda.l #10,sp
+*line 328
+move #64,(sp)
+move R7,-(sp)
+move.l #L2,-(sp)
+move.l #_v_curs1,-(sp)
+jsr _andcopy
+adda.l #10,sp
+*line 329
+move #64,(sp)
+move R7,-(sp)
+move.l #L3,-(sp)
+move.l #_v_curs2,-(sp)
+jsr _andcopy
+adda.l #10,sp
+*line 330
+move #64,(sp)
+move R7,-(sp)
+move.l #L4,-(sp)
+move.l #_v_curs3,-(sp)
+jsr _andcopy
+adda.l #10,sp
+*line 331
+move #64,(sp)
+move R7,-(sp)
+move.l #L5,-(sp)
+move.l #_v_curs4,-(sp)
+jsr _andcopy
+adda.l #10,sp
+*line 332
+move #64,(sp)
+move R7,-(sp)
+move.l #L6,-(sp)
+move.l #_v_curs5,-(sp)
+jsr _andcopy
+adda.l #10,sp
+*line 333
+move #64,(sp)
+move R7,-(sp)
+move.l #L7,-(sp)
+move.l #_v_curs6,-(sp)
+jsr _andcopy
+adda.l #10,sp
+*line 334
+move #64,(sp)
+move R7,-(sp)
+move.l #L8,-(sp)
+move.l #_v_curs7,-(sp)
+jsr _andcopy
+adda.l #10,sp
+L23:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _sgcon
+.text
+_sgcon:
+~~sgcon:
+link R14,#-4
+*line 348
+*line 349
+tst _sgcsw
+bne L25
+*line 350
+*line 351
+*line 352
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L26
+*line 352
+clr (sp)
+jsr _vbank
+*line 353
+L26:
+*line 354
+and #-17,120+_v_odtab
+*line 355
+move #1,_sgcsw
+L25:unlk R14
+rts
+.globl _sgcoff
+.text
+_sgcoff:
+~~sgcoff:
+link R14,#-4
+*line 366
+*line 367
+tst _sgcsw
+beq L27
+*line 368
+*line 369
+*line 370
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L28
+*line 370
+clr (sp)
+jsr _vbank
+*line 371
+L28:
+*line 372
+or #16,120+_v_odtab
+*line 373
+clr _sgcsw
+L27:unlk R14
+rts
+.data
Index: alcyon/getbuff.s
===================================================================
--- alcyon/getbuff.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/getbuff.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,59 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl _getbuff
+.text
+_getbuff:
+~~getbuff:
+~ptr=R13
+link R14,#-4
+movem.l R7-R7/R13-R13,-(sp)
+~buffer=-4
+*line 16
+move.l 8(R14),R13
+*line 16
+*line 16
+cmp #1,16(R13)
+bne L2
+*line 17
+*line 18
+lea 14(R13),R8
+move.l R8,8(R13)
+bra L1
+*line 19
+*line 20
+*line 21
+L2:
+*line 22
+*line 22
+tst.l _Stdbufs
+beq L3
+*line 23
+*line 24
+move.l _Stdbufs,-4(R14)
+*line 25
+move.l _Stdbufs,R8
+move.l (R8),_Stdbufs
+*line 26
+bra L4
+L3:
+*line 27
+*line 28
+*line 29
+lea 14(R13),R8
+move.l R8,8(R13)
+*line 30
+move #1,16(R13)
+bra L1
+*line 31
+L4:
+*line 34
+or.b #2,12(R13)
+*line 35
+move.l -4(R14),8(R13)
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.data
Index: alcyon/getc.s
===================================================================
--- alcyon/getc.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/getc.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,89 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl _getc
+.text
+_getc:
+~~getc:
+~ptr=R13
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~len=R7
+*line 17
+move.l 8(R14),R13
+*line 17
+*line 17
+move.l (R13),R0
+cmp.l 4(R13),R0
+blo L2
+*line 18
+*line 19
+*line 20
+btst #3,12(R13)
+beq L3
+*line 20
+move #-1,R0
+bra L1
+*line 21
+L3:
+*line 22
+and.b #-5,12(R13)
+*line 23
+*line 24
+*line 25
+tst.l 8(R13)
+bne L4
+*line 25
+move.l R13,(sp)
+jsr _getbuff
+*line 26
+L4:
+*line 27
+*line 27
+move 16(R13),(sp)
+move.l 8(R13),-(sp)
+move.b 13(R13),R0
+ext.w R0
+move R0,-(sp) 
+jsr _read
+addq.l #6,sp
+move R0,R7
+bgt L5
+*line 28
+*line 29
+tst R7
+bne L10000
+move #8,R0
+bra L10002
+L10000:move #16,R0
+L10002:move.b 12(R13),R1
+or.b R0,R1
+move.b R1,12(R13)
+*line 30
+move #-1,R0
+bra L1
+*line 31
+*line 32
+L5:
+*line 33
+move R7,R0
+ext.l R0
+move.l 8(R13),R1
+move.l R1,(R13)
+add.l R1,R0
+move.l R0,4(R13)
+*line 34
+*line 35
+L2:
+*line 36
+move.l (R13),R8
+move.b (R8),R0
+ext.w R0
+and #255,R0
+add.l #1,(R13)
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/getl.s
===================================================================
--- alcyon/getl.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/getl.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,40 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl _getl
+.text
+_getl:
+~~getl:
+~stream=R13
+link R14,#-4
+movem.l R7-R7/R12-R13,-(sp)
+~temp=-4
+~t=R12
+*line 28
+move.l 8(R14),R13
+*line 28
+lea -4(R14),R12
+*line 30
+move.l R13,(sp)
+jsr _getc
+move.b R0,(R12)+
+*line 31
+move.l R13,(sp)
+jsr _getc
+move.b R0,(R12)+
+*line 32
+move.l R13,(sp)
+jsr _getc
+move.b R0,(R12)+
+*line 33
+move.l R13,(sp)
+jsr _getc
+move.b R0,(R12)
+*line 35
+move.l -4(R14),R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R12-R13
+unlk R14
+rts
+.data
Index: alcyon/getw.s
===================================================================
--- alcyon/getw.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/getw.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,32 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl _getw
+.text
+_getw:
+~~getw:
+~stream=R13
+link R14,#-2
+movem.l R7-R7/R12-R13,-(sp)
+~temp=-2
+~t=R12
+*line 28
+move.l 8(R14),R13
+*line 28
+lea -2(R14),R12
+*line 30
+move.l R13,(sp)
+jsr _getc
+move.b R0,(R12)+
+*line 31
+move.l R13,(sp)
+jsr _getc
+move.b R0,(R12)
+*line 33
+move -2(R14),R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R12-R13
+unlk R14
+rts
+.data
Index: alcyon/glcinit.s
===================================================================
--- alcyon/glcinit.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/glcinit.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,502 @@
+.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 _lcdbase
+.comm _lcdbase,2
+.globl _lcdbit
+.comm _lcdbit,2
+.globl _lcdcol
+.comm _lcdcol,2
+.globl _lcdctl1
+.comm _lcdctl1,2
+.globl _lcdctl2
+.comm _lcdctl2,2
+.globl _lcdcurs
+.comm _lcdcurs,2
+.globl _lcdrow
+.comm _lcdrow,2
+.globl _lcdx
+.comm _lcdx,2
+.globl _lcdy
+.comm _lcdy,2
+.globl _glc_is1
+.data
+_glc_is1:
+.dc.b $12
+.dc.b $5
+.dc.b $7
+.dc.b $54
+.dc.b $58
+.dc.b $3F
+.dc.b $55
+.dc.b $0
+.globl _glc_is2
+.data
+_glc_is2:
+.dc.b $0
+.dc.b $0
+.dc.b $3F
+.dc.b $0
+.dc.b $20
+.dc.b $3F
+.dc.b $0
+.dc.b $0
+.globl _GLCdisp
+.text
+_GLCdisp:
+~~GLCdisp:
+~dsp=8
+~crs=10
+~blk1=12
+~blk2=14
+~blk3=16
+link R14,#0
+movem.l R6-R7,-(sp)
+~val=R7
+*line 93
+*line 94
+move 16(R14),R7
+and #3,R7
+asl #6,R7
+move 14(R14),R0
+and #3,R0
+asl #4,R0
+or R0,R7
+move 12(R14),R0
+and #3,R0
+asl #2,R0
+or R0,R7
+move 10(R14),R0
+and #3,R0
+or R0,R7
+*line 96
+move #88,R0
+ext.w R0
+move 8(R14),R1
+and #1,R1
+or R1,R0
+move R0,_lcdctl1
+*line 97
+move R7,_lcdctl2
+*line 99
+clr R0
+move _lcdctl1,R0
+move.b R0,_lcd_a1
+*line 100
+clr R0
+move _lcdctl2,R0
+move.b R0,_lcd_a0
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _GLCcurs
+.text
+_GLCcurs:
+~~GLCcurs:
+~crs=8
+link R14,#-4
+*line 113
+move 8(R14),R0
+and #3,R0
+clr R1
+move _lcdctl2,R1
+and #-4,R1
+or R1,R0
+move R0,_lcdctl2
+*line 115
+clr R0
+move _lcdctl1,R0
+move.b R0,_lcd_a1
+*line 116
+clr R0
+move _lcdctl2,R0
+move.b R0,_lcd_a0
+L2:unlk R14
+rts
+.globl _GLCinit
+.text
+_GLCinit:
+~~GLCinit:
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~i=R7
+~ic=R6
+~gp=R13
+*line 135
+move #8192,_lcdbase
+*line 136
+clr _lcdx
+*line 137
+clr _lcdy
+*line 138
+move #1,_lcdbit
+*line 140
+clr _lcdrow
+*line 141
+clr _lcdcol
+*line 143
+move #88,R0
+ext.w R0
+move R0,_lcdctl1
+*line 144
+clr _lcdctl2
+*line 146
+move #64,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 147
+move.l #_glc_is1,R13
+*line 149
+clr R7
+bra L6
+L7:
+*line 150
+move.b (R13)+,_lcd_a0
+L5:
+*line 149
+add #1,R7
+L6:
+*line 149
+cmp #8,R7
+blt L7
+L4:
+*line 152
+move #68,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 153
+move.l #_glc_is2,R13
+*line 155
+clr R7
+bra L10
+L11:
+*line 156
+move.b (R13)+,_lcd_a0
+L9:
+*line 155
+add #1,R7
+L10:
+*line 155
+cmp #8,R7
+blt L11
+L8:
+*line 158
+move #90,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 159
+clr.b _lcd_a0
+*line 161
+move #91,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 162
+move.b #8,_lcd_a0
+*line 164
+clr (sp)
+move #1,-(sp)
+move #1,-(sp)
+move #2,-(sp)
+clr -(sp)
+jsr _GLCdisp
+addq.l #8,sp
+*line 168
+move #70,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 169
+clr.b _lcd_a0
+*line 170
+clr.b _lcd_a0
+*line 172
+move #76,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 174
+move #66,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 176
+clr.l R6
+bra L14
+L15:
+*line 177
+clr.b _lcd_a0
+L13:
+*line 176
+add.l #$1,R6
+L14:
+*line 176
+cmp.l #$10000,R6
+blt L15
+L12:
+*line 179
+move #70,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 180
+clr.b _lcd_a0
+*line 181
+clr.b _lcd_a0
+*line 183
+move #93,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 184
+move.b #4,_lcd_a0
+*line 185
+move.b #6,_lcd_a0
+*line 189
+clr (sp)
+move #1,-(sp)
+move #1,-(sp)
+move #2,-(sp)
+move #1,-(sp)
+jsr _GLCdisp
+addq.l #8,sp
+L3:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.globl _GLCcrc
+.text
+_GLCcrc:
+~~GLCcrc:
+~row=8
+~col=10
+link R14,#-6
+~curad=-2
+*line 209
+clr R0
+move 8(R14),R0
+mulu #85,R0
+add 10(R14),R0
+move R0,-2(R14)
+*line 211
+move #70,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 212
+clr R0
+move -2(R14),R0
+and #255,R0
+move.b R0,_lcd_a0
+*line 213
+clr R0
+move -2(R14),R0
+lsr #8,R0
+and #255,R0
+move.b R0,_lcd_a0
+*line 215
+move 8(R14),_lcdrow
+*line 216
+move 10(R14),_lcdcol
+*line 218
+clr R0
+move -2(R14),R0
+bra L16
+L16:unlk R14
+rts
+.globl _GLCcxy
+.text
+_GLCcxy:
+~~GLCcxy:
+~x=R7
+~y=R6
+link R14,#0
+movem.l R3-R7,-(sp)
+~curad=R5
+~xby6=R4
+*line 242
+move 8(R14),R7
+*line 242
+move 10(R14),R6
+*line 242
+move R7,R4
+clr.l R0
+move R4,R0
+divu #6,R0
+swap R0
+move R0,R4
+*line 243
+move #63,R5
+sub R6,R5
+mulu #85,R5
+clr.l R0
+move R7,R0
+divu #6,R0
+add R0,R5
+clr R0
+move R4,R0
+lsr #3,R0
+add R0,R5
+add _lcdbase,R5
+*line 244
+move R5,_lcdcurs
+*line 248
+move #70,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 249
+clr R0
+move R5,R0
+and #255,R0
+move.b R0,_lcd_a0
+*line 250
+clr R0
+move R5,R0
+lsr #8,R0
+and #255,R0
+move.b R0,_lcd_a0
+*line 254
+move R7,_lcdx
+*line 255
+move R6,_lcdy
+*line 259
+move #1,R0
+clr R1
+move R4,R1
+and #7,R1
+asl R1,R0
+move R0,_lcdbit
+*line 261
+clr R0
+move _lcdbit,R0
+bra L17
+L17:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _GLCwrts
+.text
+_GLCwrts:
+~~GLCwrts:
+~s=R13
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+*line 280
+move.l 8(R14),R13
+*line 280
+move #76,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 282
+move #66,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 284
+bra L21
+L20:
+*line 285
+*line 286
+move.b (R13)+,_lcd_a0
+*line 287
+add #1,_lcdcol
+L21:
+*line 288
+tst.b (R13)
+bne L20
+L19:L18:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _GLCtext
+.text
+_GLCtext:
+~~GLCtext:
+~row=R7
+~col=R6
+~s=R13
+link R14,#0
+movem.l R4-R7/R13-R13,-(sp)
+~curad=R5
+*line 310
+move 8(R14),R7
+*line 310
+move 10(R14),R6
+*line 310
+move.l 12(R14),R13
+*line 310
+move R6,R5
+clr R0
+move R7,R0
+mulu #85,R0
+add R0,R5
+*line 312
+move #70,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 313
+clr R0
+move R5,R0
+and #255,R0
+move.b R0,_lcd_a0
+*line 314
+clr R0
+move R5,R0
+lsr #8,R0
+and #255,R0
+move.b R0,_lcd_a0
+*line 316
+move R7,_lcdrow
+*line 317
+move R6,_lcdcol
+*line 319
+move #76,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 321
+move #66,R0
+ext.w R0
+move.b R0,_lcd_a1
+*line 323
+bra L25
+L24:
+*line 324
+*line 325
+move.b (R13)+,_lcd_a0
+*line 326
+add #1,_lcdcol
+L25:
+*line 327
+tst.b (R13)
+bne L24
+L23:L22:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/idfield.s
===================================================================
--- alcyon/idfield.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/idfield.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1500 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _curvce
+.globl _curfunc
+.globl _curpnt
+.globl _hitbox
+.globl _astat
+.globl _idnamsw
+.globl _cxval
+.globl _cyval
+.globl _cxrate
+.globl _cyrate
+.globl _curslim
+.globl _cmtype
+.globl _cmfirst
+.globl _pecase
+.globl _pntsv
+.globl _npts
+.globl _subj
+.globl _idimsw
+.globl _wcflag
+.globl _imflag
+.globl _idcfsw
+.globl _idsrcsw
+.globl _vtcrow
+.globl _vtccol
+.globl _stcrow
+.globl _stccol
+.globl _vtxval
+.globl _vtyval
+.globl _temax
+.globl _temin
+.globl _cratex
+.globl _cratey
+.globl _crate0
+.globl _crate1
+.globl _instob
+.globl _bfs
+.globl _idbxlbl
+.globl _fnoff
+.globl _idbox
+.globl _csbp
+.globl _idboxes
+.globl _sments
+.globl _vpsms
+.globl _valents
+.globl _pntptr
+.globl _vbufs
+.globl _zonemax
+.data
+_zonemax:
+.dc.w $3F
+.dc.w $77
+.dc.w $AF
+.dc.w $E7
+.dc.w $11F
+.dc.w $157
+.dc.w $18F
+.dc.w $1C7
+.dc.w $1FD
+.globl _zoneinc
+.data
+_zoneinc:
+.dc.w $2
+.dc.w $2
+.dc.w $4
+.dc.w $9
+.dc.w $12
+.dc.w $24
+.dc.w $49
+.dc.w $92
+.dc.w $12F
+.globl _id_fet1
+.data
+_id_fet1:
+.dc.w $5
+.dc.w $3E
+.dc.w $3E
+.dc.w $C
+*line 84
+.dc.l _et_ires
+*line 84
+.dc.l _ef_ires
+*line 84
+.dc.l _rd_ires
+*line 84
+.dc.l _nd_ires
+.dc.w $10
+.dc.w $1
+.dc.w $C
+.dc.w $D
+*line 85
+.dc.l _et_imlt
+*line 85
+.dc.l _ef_imlt
+*line 85
+.dc.l _rd_imlt
+*line 85
+.dc.l _nd_imlt
+.dc.w $10
+.dc.w $F
+.dc.w $10
+.dc.w $E
+*line 86
+.dc.l _et_ipnt
+*line 86
+.dc.l _ef_ipnt
+*line 86
+.dc.l _rd_ipnt
+*line 86
+.dc.l _nd_ipnt
+.dc.w $10
+.dc.w $13
+.dc.w $18
+.dc.w $F
+*line 87
+.dc.l _et_itim
+*line 87
+.dc.l _ef_itim
+*line 87
+.dc.l _rd_itim
+*line 87
+.dc.l _nd_itim
+.dc.w $10
+.dc.w $1B
+.dc.w $2C
+.dc.w $10
+*line 88
+.dc.l _et_ival
+*line 88
+.dc.l _ef_ival
+*line 88
+.dc.l _rd_ival
+*line 88
+.dc.l _nd_ival
+.dc.w $10
+.dc.w $2F
+.dc.w $3E
+.dc.w $11
+*line 89
+.dc.l _et_iact
+*line 89
+.dc.l _ef_iact
+*line 89
+.dc.l _rd_iact
+*line 89
+.dc.l _nd_iact
+.dc.w $11
+.dc.w $C
+.dc.w $D
+.dc.w $12
+*line 90
+.dc.l _et_icnf
+*line 90
+.dc.l _ef_icnf
+*line 90
+.dc.l _rd_icnf
+*line 90
+.dc.l _nd_icnf
+.dc.w $11
+.dc.w $17
+.dc.w $18
+.dc.w $13
+*line 91
+.dc.l _et_ivce
+*line 91
+.dc.l _ef_ivce
+*line 91
+.dc.l _rd_ivce
+*line 91
+.dc.l _nd_ivce
+.dc.w $11
+.dc.w $1F
+.dc.w $20
+.dc.w $13
+*line 92
+.dc.l _et_idin
+*line 92
+.dc.l _ef_idin
+*line 92
+.dc.l _rd_idin
+*line 92
+.dc.l _nd_idin
+.dc.w $11
+.dc.w $39
+.dc.w $3A
+.dc.w $15
+*line 93
+.dc.l _et_iwsn
+*line 93
+.dc.l _ef_iwsn
+*line 93
+.dc.l _rd_iwsn
+*line 93
+.dc.l _nd_iwsn
+.dc.w $11
+.dc.w $3D
+.dc.w $3E
+.dc.w $115
+*line 94
+.dc.l _et_iwsn
+*line 94
+.dc.l _ef_iwsn
+*line 94
+.dc.l _rd_iwsn
+*line 94
+.dc.l _nd_iwsn
+.dc.w $12
+.dc.w $24
+.dc.w $2E
+.dc.w $8014
+*line 95
+.dc.l _et_iosc
+*line 95
+.dc.l _ef_iosc
+*line 95
+.dc.l _rd_iosc
+*line 95
+.dc.l _nd_iosc
+.dc.w $12
+.dc.w $11
+.dc.w $20
+.dc.w $0
+*line 96
+.dc.l _et_null
+*line 96
+.dc.l _ef_null
+*line 96
+.dc.l _rd_null
+*line 96
+.dc.l _nd_null
+.dc.w $13
+.dc.w $24
+.dc.w $2E
+.dc.w $8114
+*line 97
+.dc.l _et_iosc
+*line 97
+.dc.l _ef_iosc
+*line 97
+.dc.l _rd_iosc
+*line 97
+.dc.l _nd_iosc
+.dc.w $13
+.dc.w $11
+.dc.w $20
+.dc.w $0
+*line 98
+.dc.l _et_null
+*line 98
+.dc.l _ef_null
+*line 98
+.dc.l _rd_null
+*line 98
+.dc.l _nd_null
+.dc.w $14
+.dc.w $24
+.dc.w $2E
+.dc.w $8214
+*line 99
+.dc.l _et_iosc
+*line 99
+.dc.l _ef_iosc
+*line 99
+.dc.l _rd_iosc
+*line 99
+.dc.l _nd_iosc
+.dc.w $14
+.dc.w $11
+.dc.w $20
+.dc.w $0
+*line 100
+.dc.l _et_null
+*line 100
+.dc.l _ef_null
+*line 100
+.dc.l _rd_null
+*line 100
+.dc.l _nd_null
+.dc.w $15
+.dc.w $24
+.dc.w $2E
+.dc.w $8314
+*line 101
+.dc.l _et_iosc
+*line 101
+.dc.l _ef_iosc
+*line 101
+.dc.l _rd_iosc
+*line 101
+.dc.l _nd_iosc
+.dc.w $15
+.dc.w $11
+.dc.w $20
+.dc.w $0
+*line 102
+.dc.l _et_null
+*line 102
+.dc.l _ef_null
+*line 102
+.dc.l _rd_null
+*line 102
+.dc.l _nd_null
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.l $0
+.dc.l $0
+.dc.l $0
+.dc.l $0
+.globl _srctbl
+.data
+_srctbl:
+*line 109
+.dc.l L1
+*line 110
+.dc.l L2
+*line 111
+.dc.l L3
+*line 112
+.dc.l L4
+*line 113
+.dc.l L5
+*line 114
+.dc.l L6
+*line 115
+.dc.l L7
+*line 116
+.dc.l L8
+*line 117
+.dc.l L9
+*line 118
+.dc.l L10
+*line 119
+.dc.l L11
+*line 120
+.dc.l L12
+*line 121
+.dc.l L13
+*line 122
+.dc.l L14
+.globl _id_flds
+.data
+_id_flds:
+*line 130
+.dc.l _stdctp1
+*line 131
+.dc.l _nokey
+*line 132
+.dc.l _nokey
+*line 133
+.dc.l _cxkstd
+*line 134
+.dc.l _cykstd
+*line 135
+.dc.l _idcxupd
+*line 136
+.dc.l _idcyupd
+*line 137
+.dc.l _ikyup
+*line 138
+.dc.l _ikydn
+*line 139
+.dc.l _idx_key
+*line 140
+.dc.l _select
+*line 141
+.dc.l _stdmkey
+*line 142
+.dc.l _stddkey
+*line 143
+.dc.l _idnfld
+*line 144
+.dc.l _id_fet1
+*line 145
+.dc.l _idboxes
+*line 146
+.dc.l _crate1
+*line 147
+.dc.l _crate1
+.dc.w $0
+.dc.w $100
+.dc.w $AF
+.globl _ikydn
+.text
+_ikydn:
+~~ikydn:
+link R14,#-4
+*line 164
+clr _imflag
+L15:unlk R14
+rts
+.globl _ikyup
+.text
+_ikyup:
+~~ikyup:
+link R14,#-4
+*line 175
+*line 176
+tst _imflag
+beq L17
+*line 176
+jsr _modinst
+L17:L16:unlk R14
+rts
+.globl _idcyupd
+.text
+_idcyupd:
+~~idcyupd:
+link R14,#0
+movem.l R4-R7,-(sp)
+~pval=R7
+~vh=R6
+~vl=R5
+*line 191
+*line 192
+cmp #-1,_wcflag
+bne L18
+*line 193
+*line 194
+*line 195
+tst _idimsw
+bne L18
+*line 196
+*line 197
+*line 197
+tst _idsrcsw
+bne L10000
+tst _idcfsw
+beq L19
+L10000:*line 198
+*line 199
+move _cyrate,R0
+add R0,_vtyval
+move _vtyval,R0
+ext.l R0
+divs #14,R0
+move R0,_vtcrow
+*line 200
+*line 201
+*line 202
+cmp #24,_vtcrow
+ble L20
+*line 202
+move #24,R0
+move R0,_vtcrow
+muls #14,R0
+move R0,_vtyval
+bra L21
+L20:
+*line 203
+*line 204
+cmp #22,_vtcrow
+bge L22
+*line 204
+move #22,R0
+move R0,_vtcrow
+muls #14,R0
+move R0,_vtyval
+*line 205
+L22:L21:bra L23
+L19:
+*line 206
+*line 206
+tst _idnamsw
+beq L24
+*line 207
+*line 208
+jsr _vtcyupd
+*line 209
+bra L25
+L24:
+*line 210
+*line 210
+tst _pntsv
+beq L26
+*line 211
+*line 212
+move.l _pntptr,R8
+move 2(R8),R7
+asr #5,R7
+move _cyrate,R0
+muls #7,R0
+sub R0,R7
+*line 213
+*line 214
+*line 215
+cmp #1000,R7
+ble L27
+*line 215
+move #1000,R7
+bra L28
+L27:
+*line 216
+*line 217
+tst R7
+bge L29
+*line 217
+clr R7
+*line 218
+L29:L28:
+*line 219
+move #12,(sp)
+move R7,-(sp)
+jsr _vtoy
+addq.l #2,sp
+move R0,_cyval
+*line 220
+move R7,R0
+asl #5,R0
+move.l _pntptr,R9
+move R0,2(R9)
+*line 221
+*line 222
+move R7,R6
+ext.l R6
+divs #100,R6
+*line 223
+move R7,R5
+move R6,R0
+muls #100,R0
+sub R0,R5
+*line 224
+*line 225
+move R5,(sp)
+move R6,-(sp)
+move.l #L30,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 226
+*line 227
+clr (sp)
+jsr _vbank
+*line 228
+*line 229
+move #14,(sp)
+move.l #_bfs,-(sp)
+move 270+_idbox,-(sp)
+move 268+_idbox,-(sp)
+add #1,(sp)
+move 266+_idbox,-(sp)
+move 264+_idbox,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 230
+*line 231
+move #1,_imflag
+*line 232
+*line 233
+bra L31
+L26:
+*line 234
+*line 235
+*line 236
+move _cyrate,R0
+add R0,_cyval
+*line 237
+*line 238
+*line 239
+cmp #348,_cyval
+ble L32
+*line 239
+move #348,_cyval
+bra L33
+L32:
+*line 240
+*line 241
+cmp #1,_cyval
+bge L34
+*line 241
+move #1,_cyval
+L34:L33:L31:L25:L23:L18:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _idcxupd
+.text
+_idcxupd:
+~~idcxupd:
+link R14,#-2
+movem.l R3-R7,-(sp)
+~th=R7
+~tl=R6
+~fptime=R5
+~stime=R4
+~zone=-2
+*line 260
+*line 260
+tst _idimsw
+beq L36
+*line 261
+*line 262
+move _cxrate,R0
+add R0,_cxval
+*line 263
+*line 264
+*line 265
+cmp #256,_cxval
+ble L37
+*line 265
+move #256,_cxval
+bra L38
+L37:
+*line 266
+*line 267
+cmp #208,_cxval
+bge L39
+*line 267
+move #208,_cxval
+*line 268
+L39:L38:L36:
+*line 269
+*line 269
+tst _idsrcsw
+bne L10001
+tst _idcfsw
+beq L40
+L10001:*line 270
+*line 271
+move _cxrate,R0
+add R0,_vtxval
+move _vtxval,R0
+asr #3,R0
+move R0,_vtccol
+*line 272
+*line 273
+*line 274
+cmp #46,_vtccol
+ble L41
+*line 274
+move #46,R0
+move R0,_vtccol
+asl #3,R0
+move R0,_vtxval
+bra L42
+L41:
+*line 275
+*line 276
+cmp #17,_vtccol
+bge L43
+*line 276
+move #17,R0
+move R0,_vtccol
+asl #3,R0
+move R0,_vtxval
+*line 277
+L43:L42:bra L44
+L40:
+*line 278
+*line 278
+tst _idnamsw
+beq L45
+*line 279
+*line 280
+jsr _vtcxupd
+*line 281
+*line 282
+bra L46
+L45:
+*line 283
+*line 283
+tst _pntsv
+beq L47
+*line 284
+*line 285
+clr -2(R14)
+bra L50
+L51:
+*line 286
+*line 287
+move -2(R14),R8
+add.l R8,R8
+move.l #_zonemax,R9
+move 0(R8,R9.l),R0
+cmp _cxval,R0
+bge L48
+*line 288
+L49:
+*line 285
+add #1,-2(R14)
+L50:
+*line 285
+cmp #8,-2(R14)
+ble L51
+L48:
+*line 289
+move _pecase,R0
+bra L53
+*line 290
+L54:
+*line 291
+L55:
+*line 292
+*line 293
+*line 294
+*line 295
+tst _cxrate
+blt L56
+*line 296
+move -2(R14),R8
+add.l R8,R8
+move.l #_zoneinc,R9
+move 0(R8,R9.l),R0
+muls _cxrate,R0
+move R0,(sp)
+move.l _pntptr,R8
+move (R8),-(sp)
+jsr _addfpu
+addq.l #2,sp
+move R0,R5
+*line 297
+bra L57
+L56:
+*line 298
+*line 299
+move _cxrate,R0
+neg R0
+move -2(R14),R9
+add.l R9,R9
+add.l #_zoneinc,R9
+muls (R9),R0
+move R0,(sp)
+move.l _pntptr,R8
+move (R8),-(sp)
+jsr _subfpu
+addq.l #2,sp
+move R0,R5
+L57:
+*line 300
+*line 301
+move R5,(sp)
+move _subj,-(sp)
+jsr _segtime
+addq.l #2,sp
+move R0,R4
+*line 302
+*line 303
+*line 303
+cmp _temax,R4
+blo L58
+*line 304
+*line 305
+move _temax,(sp)
+sub #1,(sp)
+move _subj,-(sp)
+jsr _setseg
+addq.l #2,sp
+bra L52
+*line 306
+*line 307
+bra L59
+L58:
+*line 308
+*line 308
+tst R4
+bne L60
+*line 309
+*line 310
+move #1,(sp)
+move _subj,-(sp)
+jsr _setseg
+addq.l #2,sp
+bra L52
+*line 311
+*line 312
+*line 313
+L60:L59:
+*line 314
+move R4,(sp)
+move _subj,-(sp)
+jsr _setseg
+addq.l #2,sp
+bra L52
+*line 315
+*line 316
+*line 317
+*line 318
+L61:
+*line 319
+*line 320
+*line 321
+*line 322
+tst _cxrate
+blt L62
+*line 322
+move -2(R14),R8
+add.l R8,R8
+move.l #_zoneinc,R9
+move 0(R8,R9.l),R0
+muls _cxrate,R0
+move R0,(sp)
+move.l _pntptr,R8
+move (R8),-(sp)
+jsr _addfpu
+addq.l #2,sp
+move R0,R5
+*line 323
+bra L63
+L62:
+*line 324
+move _cxrate,R0
+neg R0
+move -2(R14),R9
+add.l R9,R9
+add.l #_zoneinc,R9
+muls (R9),R0
+move R0,(sp)
+move.l _pntptr,R8
+move (R8),-(sp)
+jsr _subfpu
+addq.l #2,sp
+move R0,R5
+L63:
+*line 325
+*line 326
+move R5,(sp)
+jsr _fromfpu
+move R0,R4
+add _temin,R4
+*line 327
+*line 328
+*line 329
+cmp _temax,R4
+bcc L52
+*line 330
+*line 331
+move R5,(sp)
+move _subj,-(sp)
+jsr _segtime
+addq.l #2,sp
+move R0,(sp)
+move _subj,-(sp)
+jsr _setseg
+addq.l #2,sp
+*line 332
+move _temax,(sp)
+move _subj,-(sp)
+add #1,(sp)
+jsr _setseg
+addq.l #2,sp
+bra L52
+*line 333
+bra L52
+L53:tst R0
+beq L54
+cmp #1,R0
+beq L55
+cmp #2,R0
+beq L61
+bra L52
+L52:
+*line 334
+*line 335
+*line 336
+move _subj,(sp)
+move _curfunc,-(sp)
+jsr _timeto
+addq.l #2,sp
+move R0,R7
+*line 337
+move R7,R6
+clr.l R0
+move R7,R0
+divu #1000,R0
+mulu #1000,R0
+sub R0,R6
+*line 338
+clr.l R0
+move R7,R0
+divu #1000,R0
+move R0,R7
+*line 339
+*line 340
+move R6,(sp)
+move R7,-(sp)
+move.l #L64,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 341
+*line 342
+*line 343
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L65
+*line 343
+clr (sp)
+jsr _vbank
+*line 344
+L65:
+*line 345
+*line 346
+move #14,(sp)
+move.l #_bfs,-(sp)
+move 254+_idbox,-(sp)
+move 252+_idbox,-(sp)
+add #1,(sp)
+move 250+_idbox,-(sp)
+move 248+_idbox,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 347
+*line 348
+move #1,_imflag
+*line 349
+move #12,(sp)
+move _subj,-(sp)
+move _curfunc,-(sp)
+jsr _timeto
+addq.l #4,sp
+move R0,-(sp)
+jsr _ttox
+addq.l #2,sp
+move R0,_cxval
+*line 350
+bra L66
+L47:
+*line 351
+*line 352
+*line 353
+move _cxrate,R0
+add R0,_cxval
+*line 354
+*line 355
+*line 356
+cmp #510,_cxval
+ble L67
+*line 356
+move #510,_cxval
+bra L68
+L67:
+*line 357
+*line 358
+cmp #1,_cxval
+bge L69
+*line 358
+move #1,_cxval
+L69:L68:L66:L46:L44:L35:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _idnfld
+.text
+_idnfld:
+~~idnfld:
+~k=8
+link R14,#0
+movem.l R3-R7/R12-R13,-(sp)
+~endpnt=R7
+~basepnt=R6
+~t=R5
+~fn=R4
+~fp=R13
+~ip=R12
+*line 379
+move _curvce,R0
+muls #3938,R0
+move.l R0,R12
+add.l #_vbufs,R12
+*line 380
+move.l R12,R13
+move _curfunc,R0
+muls #12,R0
+add.l R0,R13
+add.l #86,R13
+*line 382
+*line 382
+tst _astat
+beq L71
+*line 383
+*line 384
+*line 384
+jsr _whatbox
+tst R0
+beq L72
+*line 385
+*line 386
+*line 386
+cmp #12,_hitbox
+bne L73
+*line 387
+*line 388
+*line 388
+cmp #8,8(R14)
+bne L74
+*line 389
+*line 390
+move #1,R0
+eor.b R0,7(R13)
+move.b 7(R13),R0
+move R0,R5
+*line 391
+*line 392
+*line 393
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L75
+*line 393
+clr (sp)
+jsr _vbank
+*line 394
+L75:
+*line 395
+*line 396
+*line 397
+*line 398
+move #14,(sp)
+move _curfunc,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_idbxlbl,R9
+move.l 0(R8,R9.l),-(sp)
+move #54,-(sp)
+move #4,-(sp)
+btst #0,R5
+beq L10002
+move _curfunc,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+bra L10004
+L10002:move #2,-(sp)
+L10004:move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 399
+*line 400
+jsr _modinst
+*line 401
+clr R0
+bra L70
+*line 402
+*line 403
+bra L76
+L74:
+*line 404
+*line 404
+cmp #9,8(R14)
+bne L77
+*line 405
+*line 406
+move.b 6(R13),R6
+ext.w R6
+*line 407
+move R6,R7
+move.b 5(R13),R0
+ext.w R0
+add R0,R7
+sub #1,R7
+*line 408
+*line 409
+*line 410
+cmp.b #99,5(R13)
+bne L78
+*line 410
+move #-1,R0
+bra L70
+*line 411
+L78:
+*line 412
+*line 412
+move R7,(sp)
+move _curfunc,-(sp)
+move.l R12,-(sp)
+jsr _inspnt
+addq.l #6,sp
+tst R0
+bne L79
+*line 413
+*line 414
+move #-1,R0
+bra L70
+*line 415
+bra L80
+L79:
+*line 416
+*line 417
+*line 418
+move.b 5(R13),R0
+ext.w R0
+sub #1,R0
+move R0,_subj
+*line 419
+jsr _pntsel
+*line 420
+move #1,_pntsv
+*line 421
+move #12,(sp)
+clr -(sp)
+move.l _pntptr,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 422
+move.l _pntptr,R8
+move.l _pntptr,R9
+move -10(R9),2(R8)
+*line 423
+move _subj,(sp)
+sub #1,(sp)
+move _curfunc,-(sp)
+jsr _timeto
+addq.l #2,sp
+move R0,(sp)
+add #1,(sp)
+move _subj,-(sp)
+jsr _setseg
+addq.l #2,sp
+*line 424
+move _curfunc,(sp)
+jsr _edfunc
+*line 425
+move #1,(sp)
+jsr _showpt
+*line 426
+move #12,(sp)
+move _subj,-(sp)
+move _curfunc,-(sp)
+jsr _timeto
+addq.l #4,sp
+move R0,-(sp)
+jsr _ttox
+addq.l #2,sp
+move R0,_cxval
+*line 427
+move #12,(sp)
+move.l _pntptr,R8
+move 2(R8),R0
+asr #5,R0
+move R0,-(sp)
+jsr _vtoy
+addq.l #2,sp
+move R0,_cyval
+*line 428
+move #3,(sp)
+jsr _arcurs
+*line 429
+move _cyval,(sp)
+move _cxval,-(sp)
+jsr _gcurpos
+addq.l #2,sp
+*line 430
+jsr _modinst
+*line 431
+clr R0
+bra L70
+L80:
+*line 432
+*line 433
+*line 434
+*line 435
+*line 436
+L77:L76:bra L81
+L73:
+*line 437
+*line 437
+cmp #12,_hitbox
+bge L82
+*line 438
+*line 439
+move _hitbox,R0
+cmp _curfunc,R0
+bne L10005
+move #12,R0
+bra L10007
+L10005:move _hitbox,R0
+L10007:move R0,R4
+*line 440
+*line 441
+*line 441
+cmp #8,8(R14)
+bne L83
+*line 442
+*line 443
+*line 444
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L84
+*line 444
+clr (sp)
+jsr _vbank
+*line 445
+L84:
+*line 446
+*line 447
+*line 448
+*line 449
+*line 450
+move #14,(sp)
+move R4,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_idbxlbl,R9
+move.l 0(R8,R9.l),-(sp)
+move _hitbox,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),-(sp)
+move _hitbox,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 12(R8,R9.l),-(sp)
+move.l R12,R8
+move R4,R1
+muls #12,R1
+add.l R1,R8
+move.l R8,-(sp)
+move #1,R0
+move.l (sp)+,R8
+eor.b R0,93(R8)
+move.b 93(R8),R0
+and #1,R0
+beq L10008
+move R4,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+bra L10010
+L10008:move #2,-(sp)
+L10010:move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 451
+*line 452
+jsr _modinst
+*line 453
+L83:
+*line 454
+L82:L81:
+*line 455
+*line 456
+L72:
+*line 457
+move #-1,R0
+bra L70
+*line 458
+L71:L70:tst.l (sp)+
+movem.l (sp)+,R4-R7/R12-R13
+unlk R14
+rts
+.globl _idx_key
+.text
+_idx_key:
+~~idx_key:
+link R14,#0
+movem.l R6-R7/R11-R13,-(sp)
+~smp=R13
+~vep=R12
+~i=R7
+~ip=R11
+*line 477
+*line 477
+tst _astat
+beq L86
+*line 478
+*line 479
+*line 480
+tst _idsrcsw
+bne L85
+tst _idcfsw
+bne L85
+tst _idnamsw
+bne L85
+cmp #-1,_wcflag
+bne L85
+*line 481
+*line 482
+*line 482
+cmp #16,_stcrow
+bne L87
+*line 483
+*line 484
+*line 484
+cmp #1,_stccol
+blt L88
+cmp #7,_stccol
+bgt L88
+*line 485
+*line 486
+*line 487
+*line 488
+move.l #_valents,R12
+*line 489
+move _curvce,R0
+asl #4,R0
+move _curfunc,R9
+add.l R9,R9
+add.l #_fnoff,R9
+move (R9),R1
+add R1,R0
+move R0,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_vpsms,R8
+move.l (R8),R13
+*line 490
+*line 491
+*line 491
+tst 10(R13)
+beq L89
+*line 492
+*line 493
+move.l 4(R13),R8
+move.l (R13),(R8)
+*line 494
+move.l (R13),R8
+move.l 4(R13),4(R8)
+*line 495
+*line 496
+move.l R12,4(R13)
+*line 497
+move.l (R12),(R13)
+*line 498
+move.l (R12),R8
+move.l R13,4(R8)
+*line 499
+move.l R13,(R12)
+*line 500
+*line 501
+clr 10(R13)
+*line 502
+*line 503
+L89:
+*line 504
+move _curvce,R0
+muls #3938,R0
+move _curfunc,R1
+muls #12,R1
+add.l R1,R0
+add.l #_vbufs,R0
+move.l R0,R8
+clr.b 90(R8)
+*line 505
+move #13,(sp)
+jsr _dswin
+*line 506
+jsr _modinst
+*line 507
+*line 508
+bra L90
+L88:
+*line 509
+*line 509
+cmp #15,_stccol
+beq L10011
+cmp #16,_stccol
+bne L91
+L10011:*line 510
+*line 511
+*line 512
+*line 513
+jsr _delpnts
+*line 514
+bra L92
+L91:
+*line 515
+*line 515
+cmp #33,_stccol
+blt L93
+cmp #39,_stccol
+bgt L93
+*line 516
+*line 517
+*line 518
+*line 519
+move.l _pntptr,R8
+clr.b 6(R8)
+*line 520
+move #16,(sp)
+jsr _dswin
+*line 521
+jsr _modinst
+*line 522
+*line 523
+L93:L92:L90:bra L94
+L87:
+*line 524
+*line 525
+cmp #17,_stcrow
+bne L95
+cmp #31,_stccol
+beq L10012
+cmp #32,_stccol
+bne L95
+L10012:*line 526
+*line 527
+*line 528
+*line 529
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,(sp)
+jsr _initi
+*line 530
+clr (sp)
+clr -(sp)
+move _curvce,-(sp)
+jsr _execins
+addq.l #4,sp
+*line 531
+jsr _setinst
+*line 532
+jsr _allwins
+*line 533
+jsr _modinst
+*line 534
+L95:L94:
+*line 535
+L86:L85:tst.l (sp)+
+movem.l (sp)+,R7-R7/R11-R13
+unlk R14
+rts
+.globl _idfield
+.text
+_idfield:
+~~idfield:
+link R14,#-4
+*line 549
+clr _idimsw
+*line 550
+move #210,_curslim
+*line 552
+move.l #_id_flds,(sp)
+jsr _curset
+L96:unlk R14
+rts
+.data
+L1:.dc.b $20,$20,$20,$20,$20,$20,$20,$0
+L2:.dc.b $52,$61,$6E,$64,$6F,$6D,$20,$0
+L3:.dc.b $47,$50,$43,$2F,$43,$56,$31,$0
+L4:.dc.b $3F,$3F,$3F,$3F,$3F,$3F,$3F,$0
+L5:.dc.b $3F,$3F,$3F,$3F,$3F,$3F,$3F,$0
+L6:.dc.b $50,$69,$74,$63,$68,$20,$20,$0
+L7:.dc.b $4B,$65,$79,$20,$50,$72,$73,$0
+L8:.dc.b $4B,$65,$79,$20,$56,$65,$6C,$0
+L9:.dc.b $50,$65,$64,$61,$6C,$20,$31,$0
+L10:.dc.b $3F,$3F,$3F,$3F,$3F,$3F,$3F,$0
+L11:.dc.b $46,$72,$65,$71,$20,$20,$20,$0
+L12:.dc.b $50,$63,$68,$57,$2F,$48,$54,$0
+L13:.dc.b $4D,$6F,$64,$57,$2F,$56,$54,$0
+L14:.dc.b $42,$72,$74,$68,$2F,$4C,$50,$0
+L30:.dc.b $25,$30,$32,$64,$2E,$25,$30,$32,$64,$0
+L64:.dc.b $25,$30,$32,$64,$2E,$25,$30,$33,$64,$0
Index: alcyon/idselbx.s
===================================================================
--- alcyon/idselbx.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/idselbx.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1585 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _itxput
+.globl _cursbox
+.globl _cxval
+.globl _cyval
+.globl _curvce
+.globl _curfunc
+.globl _curpnt
+.globl _hitbox
+.globl _hitcx
+.globl _hitcy
+.globl _idnamsw
+.globl _idimsw
+.globl _idtdat
+.globl _pntsv
+.globl _pecase
+.globl _stccol
+.globl _subj
+.globl _submenu
+.globl _temin
+.globl _temax
+.globl _csbp
+.globl _curboxp
+.globl _vbufs
+.globl _idefs
+.globl _pntptr
+.globl _idbox
+.globl _instmod
+.globl _vtdeptr
+.globl _idbxlbl
+.globl _idhlbl
+.globl _bfs
+.globl _instob
+.globl _idboxes
+.data
+_idboxes:
+.dc.w $1
+.dc.w $1
+.dc.w $54
+.dc.w $1A
+.dc.w $0
+*line 62
+.dc.l _idfnbox
+.dc.w $56
+.dc.w $1
+.dc.w $A9
+.dc.w $1A
+.dc.w $1
+*line 63
+.dc.l _idfnbox
+.dc.w $AB
+.dc.w $1
+.dc.w $FE
+.dc.w $1A
+.dc.w $2
+*line 64
+.dc.l _idfnbox
+.dc.w $100
+.dc.w $1
+.dc.w $153
+.dc.w $1A
+.dc.w $3
+*line 65
+.dc.l _idfnbox
+.dc.w $155
+.dc.w $1
+.dc.w $1A8
+.dc.w $1A
+.dc.w $4
+*line 66
+.dc.l _idfnbox
+.dc.w $1AA
+.dc.w $1
+.dc.w $1FD
+.dc.w $1A
+.dc.w $5
+*line 67
+.dc.l _idfnbox
+.dc.w $1
+.dc.w $1C
+.dc.w $54
+.dc.w $36
+.dc.w $6
+*line 69
+.dc.l _idfnbox
+.dc.w $56
+.dc.w $1C
+.dc.w $A9
+.dc.w $36
+.dc.w $7
+*line 70
+.dc.l _idfnbox
+.dc.w $AB
+.dc.w $1C
+.dc.w $FE
+.dc.w $36
+.dc.w $8
+*line 71
+.dc.l _idfnbox
+.dc.w $100
+.dc.w $1C
+.dc.w $153
+.dc.w $36
+.dc.w $9
+*line 72
+.dc.l _idfnbox
+.dc.w $155
+.dc.w $1C
+.dc.w $1A8
+.dc.w $36
+.dc.w $A
+*line 73
+.dc.l _idfnbox
+.dc.w $1AA
+.dc.w $1C
+.dc.w $1FD
+.dc.w $36
+.dc.w $B
+*line 74
+.dc.l _idfnbox
+.dc.w $1
+.dc.w $38
+.dc.w $1FD
+.dc.w $D0
+.dc.w $C
+*line 76
+.dc.l _idfnbox
+.dc.w $1
+.dc.w $D2
+.dc.w $6E
+.dc.w $EC
+.dc.w $0
+*line 78
+.dc.l _enterit
+.dc.w $70
+.dc.w $D2
+.dc.w $8E
+.dc.w $EC
+.dc.w $0
+*line 79
+.dc.l _enterit
+.dc.w $90
+.dc.w $D2
+.dc.w $CE
+.dc.w $EC
+.dc.w $0
+*line 80
+.dc.l _enterit
+.dc.w $D0
+.dc.w $D2
+.dc.w $16E
+.dc.w $EC
+.dc.w $0
+*line 81
+.dc.l _enterit
+.dc.w $170
+.dc.w $D2
+.dc.w $1FD
+.dc.w $EC
+.dc.w $0
+*line 82
+.dc.l _enterit
+.dc.w $1
+.dc.w $EE
+.dc.w $83
+.dc.w $15C
+.dc.w $0
+*line 84
+.dc.l _idfnbox
+.dc.w $85
+.dc.w $EE
+.dc.w $10B
+.dc.w $FB
+.dc.w $0
+*line 85
+.dc.l _idfnbox
+.dc.w $10D
+.dc.w $EE
+.dc.w $17B
+.dc.w $132
+.dc.w $0
+*line 86
+.dc.l _enterit
+.dc.w $17D
+.dc.w $EE
+.dc.w $1FD
+.dc.w $15C
+.dc.w $0
+*line 87
+.dc.l _idfnbox
+.dc.w $85
+.dc.w $134
+.dc.w $17B
+.dc.w $15C
+.dc.w $0
+*line 89
+.dc.l _enterit
+.dc.w $85
+.dc.w $FC
+.dc.w $10B
+.dc.w $132
+.dc.w $13
+*line 91
+.dc.l _idfnbox
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.l $0
+.globl _idtxput
+.text
+_idtxput:
+~~idtxput:
+~row=8
+~col=10
+~txt=12
+~tag=16
+link R14,#-4
+*line 110
+*line 111
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L2
+*line 111
+clr (sp)
+jsr _vbank
+*line 112
+L2:
+*line 113
+move #14,(sp)
+move.l 12(R14),-(sp)
+move 10(R14),-(sp)
+move 8(R14),-(sp)
+move #11,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+L1:unlk R14
+rts
+.globl _showim
+.text
+_showim:
+~~showim:
+link R14,#0
+movem.l R4-R7,-(sp)
+~row=R7
+~col=R6
+~ins=R5
+*line 126
+clr R5
+*line 128
+move #1,R6
+bra L6
+L7:
+*line 129
+*line 130
+clr -(sp)
+move.l #L8,-(sp)
+move R6,-(sp)
+clr -(sp)
+move.l _itxput,R8
+jsr (R8)
+adda.l #10,sp
+*line 131
+*line 132
+move #1,R7
+bra L11
+L12:
+*line 133
+*line 134
+*line 135
+cmp #41,R5
+bge L9
+*line 136
+*line 137
+move R5,R0
+muls #3938,R0
+add.l #_idefs,R0
+move.l R0,(sp)
+add.l #2,(sp)
+move R5,-(sp)
+move.l #L13,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 138
+move #1,-(sp)
+move.l #_bfs,-(sp)
+move R6,-(sp)
+move R7,-(sp)
+move.l _itxput,R8
+jsr (R8)
+adda.l #10,sp
+*line 139
+add #1,R5
+L10:
+*line 132
+add #1,R7
+L11:
+*line 132
+cmp #15,R7
+blt L12
+L9:
+*line 140
+L5:
+*line 128
+add #22,R6
+L6:
+*line 128
+cmp #46,R6
+blt L7
+L4:L3:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _cdnicur
+.text
+_cdnicur:
+~~cdnicur:
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+~ip=R13
+*line 157
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 159
+move _idtdat,R0
+bra L16
+*line 160
+L17:
+*line 161
+*line 162
+move #1,_idtdat
+*line 163
+lea 19(R13),R8
+move.l R8,_vtdeptr
+*line 164
+move _stccol,(sp)
+move #19,-(sp)
+jsr _settc
+addq.l #2,sp
+bra L14
+*line 165
+*line 166
+L18:
+*line 167
+*line 168
+move #2,_idtdat
+*line 169
+lea 36(R13),R8
+move.l R8,_vtdeptr
+*line 170
+move _stccol,(sp)
+move #20,-(sp)
+jsr _settc
+addq.l #2,sp
+bra L14
+*line 171
+*line 172
+L19:
+*line 173
+*line 174
+move #3,_idtdat
+*line 175
+lea 53(R13),R8
+move.l R8,_vtdeptr
+*line 176
+move _stccol,(sp)
+move #21,-(sp)
+jsr _settc
+addq.l #2,sp
+bra L14
+*line 177
+*line 178
+L20:
+*line 179
+*line 180
+clr _idtdat
+*line 181
+lea 2(R13),R8
+move.l R8,_vtdeptr
+*line 182
+move _stccol,(sp)
+move #18,-(sp)
+jsr _settc
+addq.l #2,sp
+bra L14
+*line 183
+bra L15
+L16:tst R0
+beq L17
+cmp #1,R0
+beq L18
+cmp #2,R0
+beq L19
+cmp #3,R0
+beq L20
+bra L15
+L15:L14:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _cupicur
+.text
+_cupicur:
+~~cupicur:
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+~ip=R13
+*line 200
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 202
+move _idtdat,R0
+bra L23
+*line 203
+L24:
+*line 204
+*line 205
+move #3,_idtdat
+*line 206
+lea 53(R13),R8
+move.l R8,_vtdeptr
+*line 207
+move _stccol,(sp)
+move #21,-(sp)
+jsr _settc
+addq.l #2,sp
+bra L21
+*line 208
+*line 209
+L25:
+*line 210
+*line 211
+clr _idtdat
+*line 212
+lea 2(R13),R8
+move.l R8,_vtdeptr
+*line 213
+move _stccol,(sp)
+move #18,-(sp)
+jsr _settc
+addq.l #2,sp
+bra L21
+*line 214
+*line 215
+L26:
+*line 216
+*line 217
+move #1,_idtdat
+*line 218
+lea 19(R13),R8
+move.l R8,_vtdeptr
+*line 219
+move _stccol,(sp)
+move #19,-(sp)
+jsr _settc
+addq.l #2,sp
+bra L21
+*line 220
+*line 221
+L27:
+*line 222
+*line 223
+move #2,_idtdat
+*line 224
+lea 36(R13),R8
+move.l R8,_vtdeptr
+*line 225
+move _stccol,(sp)
+move #20,-(sp)
+jsr _settc
+addq.l #2,sp
+bra L21
+*line 226
+bra L22
+L23:tst R0
+beq L24
+cmp #1,R0
+beq L25
+cmp #2,R0
+beq L26
+cmp #3,R0
+beq L27
+bra L22
+L22:L21:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _edfunc
+.text
+_edfunc:
+~~edfunc:
+~n=8
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~cx=R7
+~ip=R13
+*line 246
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 250
+move #6,(sp)
+jsr _exp_c
+move R0,R7
+*line 252
+clr (sp)
+jsr _vbank
+*line 253
+*line 254
+move R7,(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 6(R8,R9.l),-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 4(R8,R9.l),-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 2(R8,R9.l),-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 0(R8,R9.l),-(sp)
+move #128,-(sp)
+move.l _instob,-(sp)
+jsr _vbfill4
+adda.l #14,sp
+*line 256
+*line 257
+*line 258
+move #14,(sp)
+move.l 48+_idbxlbl,-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),-(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 12(R8,R9.l),-(sp)
+btst #0,237(R13)
+beq L10000
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+bra L10002
+L10000:move #2,-(sp)
+L10002:move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 260
+*line 261
+cmp #12,8(R14)
+beq L29
+*line 261
+move 8(R14),(sp)
+move #2,-(sp)
+clr -(sp)
+move #12,-(sp)
+jsr _drawfn
+addq.l #6,sp
+*line 262
+*line 263
+*line 264
+*line 265
+*line 266
+L29:
+*line 267
+clr (sp)
+jsr _vbank
+*line 268
+*line 269
+move R7,(sp)
+move 198+_idbox,-(sp)
+move 196+_idbox,-(sp)
+move 194+_idbox,-(sp)
+move 192+_idbox,-(sp)
+move #128,-(sp)
+move.l _instob,-(sp)
+jsr _vbfill4
+adda.l #14,sp
+*line 273
+*line 274
+*line 275
+move #14,(sp)
+move 8(R14),R8
+add.l R8,R8
+add.l R8,R8
+move.l #_idbxlbl,R9
+move.l 0(R8,R9.l),-(sp)
+move 206+_idbox,-(sp)
+move 204+_idbox,-(sp)
+move.l R13,R8
+move 8(R14),R1
+muls #12,R1
+add.l R1,R8
+btst #0,93(R8)
+beq L10003
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+bra L10005
+L10003:move #2,-(sp)
+L10005:move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 279
+move #14,(sp)
+move.l #_idhlbl,-(sp)
+clr -(sp)
+move #14,-(sp)
+move #2,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 283
+move #14,(sp)
+move.l #L30,-(sp)
+clr -(sp)
+move #14,-(sp)
+move #2,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 284
+move #14,(sp)
+move.l #L31,-(sp)
+clr -(sp)
+move #12,-(sp)
+move #2,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 285
+move #14,(sp)
+move.l #L32,-(sp)
+clr -(sp)
+move #10,-(sp)
+move #2,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 286
+move #14,(sp)
+move.l #L33,-(sp)
+clr -(sp)
+move #8,-(sp)
+move #2,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 287
+move #14,(sp)
+move.l #L34,-(sp)
+clr -(sp)
+move #6,-(sp)
+move #2,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 288
+move #14,(sp)
+move.l #L35,-(sp)
+clr -(sp)
+move #4,-(sp)
+move #2,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 290
+clr (sp)
+move #196,-(sp)
+move #7,-(sp)
+move #56,-(sp)
+move #7,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 291
+clr (sp)
+move #196,-(sp)
+move #509,-(sp)
+move #196,-(sp)
+move #7,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 295
+*line 296
+cmp #12,8(R14)
+beq L36
+*line 296
+move #12,(sp)
+move #2,-(sp)
+clr -(sp)
+move #12,-(sp)
+jsr _drawfn
+addq.l #6,sp
+*line 297
+L36:
+*line 298
+move #12,(sp)
+move #14,-(sp)
+move _pntsv,-(sp)
+move 8(R14),-(sp)
+jsr _drawfn
+addq.l #6,sp
+*line 300
+move 8(R14),_curfunc
+*line 302
+*line 302
+cmp #4,_curfunc
+bne L37
+*line 303
+*line 304
+*line 305
+*line 306
+*line 307
+move #14,(sp)
+move.l #L38,-(sp)
+move 206+_idbox,-(sp)
+add #4,(sp)
+move 204+_idbox,-(sp)
+add #1,(sp)
+move.l R13,R8
+move 8(R14),R1
+muls #12,R1
+add.l R1,R8
+btst #0,93(R8)
+beq L10006
+move 200+_idbox,-(sp)
+bra L10008
+L10006:move #2,-(sp)
+L10008:move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 308
+*line 309
+move #12,(sp)
+jsr _rd_ires
+*line 310
+*line 311
+L37:
+*line 312
+move #1,R0
+bra L28
+L28:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _showpt
+.text
+_showpt:
+~~showpt:
+~q=8
+link R14,#-2
+movem.l R2-R7/R13-R13,-(sp)
+~ptx=R7
+~pty=R6
+~i=R5
+~j=R4
+~k=R3
+~ip=R13
+~ptc=-2
+*line 331
+*line 332
+tst 8(R14)
+beq L40
+*line 332
+move #14,(sp)
+jsr _dswin
+*line 333
+L40:
+*line 334
+move #15,(sp)
+jsr _dswin
+*line 335
+move #16,(sp)
+jsr _dswin
+*line 336
+move #17,(sp)
+jsr _dswin
+*line 338
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 339
+move _curfunc,R0
+muls #12,R0
+move.b 91(R13,R0.l),R0
+ext.w R0
+move R0,R4
+*line 340
+move _curfunc,R0
+muls #12,R0
+move.b 92(R13,R0.l),R0
+ext.w R0
+move R0,R3
+*line 342
+clr R5
+bra L43
+L44:
+*line 343
+*line 344
+move #12,(sp)
+move R5,-(sp)
+move _curfunc,-(sp)
+jsr _timeto
+addq.l #4,sp
+move R0,-(sp)
+jsr _ttox
+addq.l #2,sp
+move R0,R7
+*line 345
+move #12,(sp)
+move.l R13,R8
+move R3,R1
+add R5,R1
+muls #12,R1
+add.l R1,R8
+move 244(R8),R0
+asr #5,R0
+move R0,-(sp)
+jsr _vtoy
+addq.l #2,sp
+move R0,R6
+*line 346
+*line 347
+move.l R13,R8
+move R3,R1
+add R5,R1
+muls #12,R1
+add.l R1,R8
+tst.b 248(R8)
+bne L10010
+move.l R13,R8
+move R3,R1
+add R5,R1
+muls #12,R1
+add.l R1,R8
+tst.b 249(R8)
+beq L10009
+L10010:move #15,R0
+bra L10012
+L10009:move #11,R0
+L10012:move R0,-2(R14)
+*line 348
+*line 349
+move -2(R14),(sp)
+move R6,-(sp)
+move R7,-(sp)
+jsr _drawpt
+addq.l #4,sp
+L42:
+*line 342
+add #1,R5
+L43:
+*line 342
+cmp R4,R5
+blt L44
+L41:
+*line 352
+move #12,(sp)
+move _subj,-(sp)
+move _curfunc,-(sp)
+jsr _timeto
+addq.l #4,sp
+move R0,-(sp)
+jsr _ttox
+addq.l #2,sp
+move R0,R7
+*line 353
+move #12,(sp)
+move.l R13,R8
+move R3,R1
+add _subj,R1
+muls #12,R1
+add.l R1,R8
+move 244(R8),R0
+asr #5,R0
+move R0,-(sp)
+jsr _vtoy
+addq.l #2,sp
+move R0,R6
+*line 354
+move #3,(sp)
+move R6,-(sp)
+move R7,-(sp)
+jsr _drawpt
+addq.l #4,sp
+L39:tst.l (sp)+
+movem.l (sp)+,R3-R7/R13-R13
+unlk R14
+rts
+.globl _endityp
+.text
+_endityp:
+~~endityp:
+link R14,#-4
+*line 368
+clr _idnamsw
+*line 369
+clr _submenu
+*line 370
+jsr _idvlblc
+*line 371
+move #19,(sp)
+jsr _dswin
+*line 372
+move #22,(sp)
+jsr _dswin
+L45:unlk R14
+rts
+.globl _showfn
+.text
+_showfn:
+~~showfn:
+link R14,#-4
+*line 383
+move #13,(sp)
+jsr _dswin
+*line 384
+move #1,(sp)
+jsr _showpt
+L46:unlk R14
+rts
+.globl _bx_null
+.text
+_bx_null:
+~~bx_null:
+link R14,#-4
+*line 396
+move #1,R0
+bra L47
+L47:unlk R14
+rts
+.globl _iclrwin
+.text
+_iclrwin:
+~~iclrwin:
+~n=R7
+link R14,#0
+movem.l R6-R7,-(sp)
+*line 408
+move 8(R14),R7
+*line 408
+*line 409
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L49
+*line 409
+clr (sp)
+jsr _vbank
+*line 410
+L49:
+*line 411
+*line 412
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 10(R8,R9.l),(sp)
+jsr _exp_c
+move R0,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 6(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 4(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 2(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 0(R8,R9.l),-(sp)
+move #128,-(sp)
+move.l _instob,-(sp)
+jsr _vbfill4
+adda.l #14,sp
+L48:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _idfnbox
+.text
+_idfnbox:
+~~idfnbox:
+~n=8
+link R14,#0
+movem.l R4-R7/R12-R13,-(sp)
+~col=R7
+~i=R6
+~row=R5
+~ip=R13
+~ivtdptr=R12
+*line 432
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 434
+move _hitcy,R5
+ext.l R5
+divs #14,R5
+*line 435
+move _hitcx,R7
+asr #3,R7
+*line 439
+*line 439
+cmp #12,_hitbox
+bne L51
+*line 440
+*line 441
+*line 442
+*line 443
+*line 444
+cmp #4,_curfunc
+bne L52
+cmp #5,R5
+bne L52
+cmp #62,R7
+bne L52
+*line 444
+jsr _enterit
+bra L50
+*line 445
+L52:
+*line 446
+move _pntsv,R0
+bra L54
+*line 447
+L55:
+*line 448
+*line 449
+*line 450
+jsr _selpnt
+move R0,_subj
+*line 451
+jsr _pntsel
+*line 452
+move #1,_pntsv
+*line 453
+*line 454
+move _curfunc,(sp)
+jsr _edfunc
+*line 455
+move #1,(sp)
+jsr _showpt
+*line 456
+*line 457
+*line 458
+*line 459
+move #12,(sp)
+move _subj,-(sp)
+move _curfunc,-(sp)
+jsr _timeto
+addq.l #4,sp
+move R0,-(sp)
+jsr _ttox
+addq.l #2,sp
+move R0,_cxval
+*line 460
+move #12,(sp)
+move.l _pntptr,R8
+move 2(R8),R0
+asr #5,R0
+move R0,-(sp)
+jsr _vtoy
+addq.l #2,sp
+move R0,_cyval
+*line 461
+move #3,(sp)
+jsr _arcurs
+*line 462
+move _cyval,(sp)
+move _cxval,-(sp)
+jsr _gcurpos
+addq.l #2,sp
+bra L53
+*line 463
+*line 464
+L56:
+*line 465
+*line 466
+*line 467
+clr _pntsv
+*line 468
+move _curfunc,(sp)
+jsr _edfunc
+*line 469
+move #1,(sp)
+jsr _arcurs
+*line 470
+move _cyval,(sp)
+move _cxval,-(sp)
+jsr _gcurpos
+addq.l #2,sp
+bra L53
+*line 471
+bra L53
+L54:tst R0
+beq L55
+cmp #1,R0
+beq L56
+bra L53
+L53:
+*line 472
+*line 473
+*line 474
+move #1,R0
+bra L50
+*line 475
+bra L57
+L51:
+*line 476
+*line 476
+cmp #18,_hitbox
+bne L58
+*line 477
+*line 478
+*line 478
+cmp #17,R5
+bne L59
+cmp #4,R7
+blt L59
+cmp #9,R7
+bgt L59
+*line 479
+*line 480
+clr (sp)
+jsr _wcmenu
+*line 481
+move #1,R0
+bra L50
+*line 482
+bra L60
+L59:
+*line 483
+*line 484
+*line 485
+jsr _enterit
+bra L50
+L60:
+*line 486
+*line 487
+*line 488
+bra L61
+L58:
+*line 489
+*line 489
+cmp #19,_hitbox
+bne L62
+*line 490
+*line 491
+*line 491
+cmp #26,R7
+blt L63
+cmp #29,R7
+bgt L63
+cmp #17,R5
+bne L63
+*line 492
+*line 493
+*line 493
+tst _idimsw
+beq L64
+*line 494
+*line 495
+clr _idimsw
+*line 496
+*line 497
+*line 498
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L65
+*line 498
+clr (sp)
+jsr _vbank
+*line 499
+L65:
+*line 500
+jsr _idbord
+*line 501
+jsr _allwins
+*line 502
+bra L66
+L64:
+*line 503
+*line 504
+*line 505
+move #1,_idimsw
+*line 506
+move.l #_idtxput,_itxput
+*line 507
+*line 508
+*line 509
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L67
+*line 509
+clr (sp)
+jsr _vbank
+*line 510
+L67:
+*line 511
+*line 512
+move 314+_idbox,(sp)
+jsr _exp_c
+move R0,(sp)
+move #208,-(sp)
+move #510,-(sp)
+move #1,-(sp)
+move #1,-(sp)
+move #128,-(sp)
+move.l _instob,-(sp)
+jsr _vbfill4
+adda.l #14,sp
+*line 513
+*line 514
+move #13,R6
+bra L70
+L71:
+*line 515
+move R6,(sp)
+jsr _iclrwin
+L69:
+*line 514
+add #1,R6
+L70:
+*line 514
+cmp #18,R6
+ble L71
+L68:
+*line 515
+*line 516
+*line 517
+move #20,R6
+bra L74
+L75:
+*line 518
+move R6,(sp)
+jsr _iclrwin
+L73:
+*line 517
+add #1,R6
+L74:
+*line 517
+cmp #22,R6
+ble L75
+L72:
+*line 518
+*line 519
+*line 520
+jsr _showim
+L66:
+*line 521
+*line 522
+*line 523
+clr R0
+bra L50
+*line 524
+bra L76
+L63:
+*line 525
+*line 526
+*line 527
+jsr _enterit
+bra L50
+L76:
+*line 528
+*line 529
+*line 530
+bra L77
+L62:
+*line 531
+*line 531
+cmp #21,_hitbox
+bne L78
+*line 532
+*line 533
+*line 533
+cmp #17,R5
+bne L79
+cmp #48,R7
+blt L79
+cmp #54,R7
+bgt L79
+*line 534
+*line 535
+move #1,(sp)
+jsr _wcmenu
+*line 536
+move #1,R0
+bra L50
+*line 537
+bra L80
+L79:
+*line 538
+*line 539
+*line 540
+jsr _enterit
+bra L50
+L80:
+*line 541
+*line 542
+bra L81
+L78:
+*line 543
+*line 543
+cmp #23,_hitbox
+bne L82
+*line 544
+*line 545
+*line 545
+tst _idnamsw
+beq L83
+*line 546
+*line 547
+jsr _vtyper
+*line 548
+move _curvce,R8
+add.l R8,R8
+add.l #_instmod,R8
+move #1,(R8)
+*line 549
+bra L84
+L83:
+*line 550
+*line 551
+*line 552
+*line 553
+*line 554
+*line 555
+cmp #18,R5
+bne L85
+*line 555
+lea 2(R13),R12
+bra L86
+L85:
+*line 556
+*line 557
+cmp #19,R5
+bne L87
+*line 557
+lea 19(R13),R12
+bra L88
+L87:
+*line 558
+*line 559
+cmp #20,R5
+bne L89
+*line 559
+lea 36(R13),R12
+*line 560
+bra L90
+L89:
+*line 561
+lea 53(R13),R12
+L90:L88:L86:
+*line 562
+*line 563
+move R5,R0
+add #-18,R0
+move R0,_idtdat
+*line 564
+*line 565
+jsr _idvtyp
+*line 566
+move #22,(sp)
+jsr _dswin
+*line 567
+move #1,_idnamsw
+*line 568
+move #1,_submenu
+*line 569
+*line 570
+*line 571
+*line 572
+move 314+_idbox,(sp)
+move 312+_idbox,-(sp)
+move.l #_endityp,-(sp)
+move.l #_cdnicur,-(sp)
+move.l #_cupicur,-(sp)
+move.l #_bspicur,-(sp)
+move.l #_advicur,-(sp)
+move #17,-(sp)
+move #22,-(sp)
+move.l R12,-(sp)
+move #17,-(sp)
+move.l #_vtdisp,-(sp)
+move.l _instob,-(sp)
+jsr _vtsetup
+adda.l #40,sp
+L84:
+*line 573
+*line 574
+*line 575
+move #1,R0
+bra L50
+*line 576
+*line 577
+bra L91
+L82:
+*line 578
+*line 578
+cmp #12,_hitbox
+bge L92
+*line 579
+*line 580
+clr _pntsv
+*line 581
+*line 582
+move #1,(sp)
+jsr _arcurs
+*line 583
+move _cyval,(sp)
+move _cxval,-(sp)
+jsr _gcurpos
+addq.l #2,sp
+*line 584
+*line 585
+*line 585
+move 8(R14),R0
+cmp _curfunc,R0
+beq L93
+*line 586
+*line 587
+*line 588
+cmp #12,_curfunc
+beq L94
+*line 588
+move _curfunc,(sp)
+jsr _dswin
+*line 589
+L94:
+*line 590
+move 8(R14),(sp)
+jsr _edfunc
+*line 591
+bra L95
+L93:
+*line 592
+*line 593
+*line 594
+move _curfunc,(sp)
+jsr _dswin
+*line 595
+move #12,(sp)
+jsr _edfunc
+L95:
+*line 596
+*line 597
+*line 598
+clr _subj
+*line 599
+jsr _pntsel
+*line 600
+*line 601
+jsr _showfn
+*line 602
+*line 603
+move #175,(sp)
+move #256,-(sp)
+jsr _setgc
+addq.l #2,sp
+*line 604
+move #1,R0
+bra L50
+*line 605
+*line 606
+L92:L91:L81:L77:L61:L57:
+*line 607
+clr R0
+bra L50
+L50:tst.l (sp)+
+movem.l (sp)+,R5-R7/R12-R13
+unlk R14
+rts
+.data
+L8:.dc.b $4E,$6F,$20,$49,$6E,$73,$74,$72,$75,$6D,$65,$6E,$74,$0
+L13:.dc.b $25,$30,$32,$64,$20,$25,$2D,$31,$36,$2E,$31,$36,$73,$0
+L30:.dc.b $C0,$0
+L31:.dc.b $C2,$0
+L32:.dc.b $C4,$0
+L33:.dc.b $C6,$0
+L34:.dc.b $C8,$0
+L35:.dc.b $CA,$0
+L38:.dc.b $52,$65,$73,$0
Index: alcyon/im700.s
===================================================================
--- alcyon/im700.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/im700.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,2069 @@
+.globl _QQsw
+.globl _QQanch
+.globl _QQin
+.globl _QQip
+.globl _QQop
+.globl _QQnum
+.globl _QQlnum
+.globl _QQchr
+.globl _QQdig
+.globl _QQstr
+.globl _lcdx
+.globl _lcdy
+.globl _lcdbit
+.globl _lcdrow
+.globl _lcdcol
+.globl _lcdbase
+.globl _lcdctl1
+.globl _lcdctl2
+.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 _timers
+.globl _v_obtab
+.globl _v_curob
+.globl _v_nobj
+.globl _v_obpri
+.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 _blakpal
+.globl _t_prmtr
+.globl _funcndx
+.globl _keystat
+.globl _ldcmnt
+.globl _ldfile
+.globl _loadedc
+.globl _loadedf
+.globl _masens
+.globl _mctlval
+.globl _mdbyte
+.globl _mpsust
+.globl _mrstat
+.globl _trgtab
+.globl _fnoff
+.globl _articen
+.globl _grpmode
+.globl _grpsel
+.globl _grpstat
+.globl _gtctab
+.globl _lastvce
+.globl _lastvel
+.globl _mpbend
+.globl _msmstv
+.globl _prstab
+.globl _vce2trg
+.globl _veltab
+.globl _oldsw
+.globl _swpt
+.globl _curmove
+.globl _curtype
+.globl _cx_key
+.globl _cx_upd
+.globl _cy_key
+.globl _cy_upd
+.globl _d_key
+.globl _e_key
+.globl _m_key
+.globl _not_fld
+.globl _premove
+.globl _pstmove
+.globl _x_key
+.globl _xy_dn
+.globl _xy_up
+.globl _cratex
+.globl _cratey
+.globl _admctl
+.comm _admctl,2
+.globl _adnamsw
+.comm _adnamsw,2
+.globl _aflag
+.comm _aflag,2
+.globl _aform
+.comm _aform,2
+.globl _amplval
+.comm _amplval,2
+.globl _ancmsw
+.comm _ancmsw,2
+.globl _angroup
+.comm _angroup,2
+.globl _asgfks
+.comm _asgfks,2
+.globl _asghit
+.comm _asghit,2
+.globl _asgmod
+.comm _asgmod,2
+.globl _asig
+.comm _asig,2
+.globl _asmode
+.comm _asmode,2
+.globl _astat
+.comm _astat,2
+.globl _auxctl
+.comm _auxctl,2
+.globl _aval
+.comm _aval,2
+.globl _bform
+.comm _bform,2
+.globl _catin
+.comm _catin,2
+.globl _cents
+.comm _cents,2
+.globl _chtime
+.comm _chtime,2
+.globl _chwait
+.comm _chwait,2
+.globl _cflag
+.comm _cflag,2
+.globl _clkctl
+.comm _clkctl,2
+.globl _clkrun
+.comm _clkrun,2
+.globl _clksrc
+.comm _clksrc,2
+.globl _cmfirst
+.comm _cmfirst,2
+.globl _cmtype
+.comm _cmtype,2
+.globl _cnote
+.comm _cnote,2
+.globl _ctrsw
+.comm _ctrsw,2
+.globl _curasg
+.comm _curasg,2
+.globl _curfunc
+.comm _curfunc,2
+.globl _curgrp
+.comm _curgrp,2
+.globl _curinst
+.comm _curinst,2
+.globl _curmop
+.comm _curmop,2
+.globl _curpnt
+.comm _curpnt,2
+.globl _curpos
+.comm _curpos,2
+.globl _cursbox
+.comm _cursbox,2
+.globl _curscor
+.comm _curscor,2
+.globl _cursect
+.comm _cursect,2
+.globl _curslim
+.comm _curslim,2
+.globl _curtun
+.comm _curtun,2
+.globl _curvce
+.comm _curvce,2
+.globl _curwave
+.comm _curwave,2
+.globl _curwdth
+.comm _curwdth,2
+.globl _curwfnl
+.comm _curwfnl,2
+.globl _curwhrm
+.comm _curwhrm,2
+.globl _curwhrv
+.comm _curwhrv,2
+.globl _curwoff
+.comm _curwoff,2
+.globl _curwpnt
+.comm _curwpnt,2
+.globl _curwslt
+.comm _curwslt,2
+.globl _cvtime
+.comm _cvtime,2
+.globl _cvwait
+.comm _cvwait,2
+.globl _cxrate
+.comm _cxrate,2
+.globl _cxval
+.comm _cxval,2
+.globl _cyrate
+.comm _cyrate,2
+.globl _cyval
+.comm _cyval,2
+.globl _debugne
+.comm _debugne,2
+.globl _defect
+.comm _defect,2
+.globl _dferror
+.comm _dferror,2
+.globl _dfsides
+.comm _dfsides,2
+.globl _dftype
+.comm _dftype,2
+.globl _dsp_ok
+.comm _dsp_ok,2
+.globl _dubsw
+.comm _dubsw,2
+.globl _ebflag
+.comm _ebflag,2
+.globl _editss
+.comm _editss,2
+.globl _editsw
+.comm _editsw,2
+.globl _endflg
+.comm _endflg,2
+.globl _ext_cv1
+.comm _ext_cv1,2
+.globl _ext_cv2
+.comm _ext_cv2,2
+.globl _ext_cv3
+.comm _ext_cv3,2
+.globl _ext_cv4
+.comm _ext_cv4,2
+.globl _ext_mod
+.comm _ext_mod,2
+.globl _gomode
+.comm _gomode,2
+.globl _grptran
+.comm _grptran,2
+.globl _gtmsel
+.comm _gtmsel,2
+.globl _hitbox
+.comm _hitbox,2
+.globl _hitcx
+.comm _hitcx,2
+.globl _hitcy
+.comm _hitcy,2
+.globl _idcfsw
+.comm _idcfsw,2
+.globl _idimsw
+.comm _idimsw,2
+.globl _idintmp
+.comm _idintmp,2
+.globl _idnamsw
+.comm _idnamsw,2
+.globl _idsrcsw
+.comm _idsrcsw,2
+.globl _idtdat
+.comm _idtdat,2
+.globl _imflag
+.comm _imflag,2
+.globl _initcfg
+.comm _initcfg,2
+.globl _insmode
+.comm _insmode,2
+.globl _ismode
+.comm _ismode,2
+.globl _lampio
+.comm _lampio,2
+.globl _lampsw
+.comm _lampsw,2
+.globl _lasgsw
+.comm _lasgsw,2
+.globl _lastam
+.comm _lastam,2
+.globl _ldelsw
+.comm _ldelsw,2
+.globl _lderrsw
+.comm _lderrsw,2
+.globl _ldidsiz
+.comm _ldidsiz,2
+.globl _ldkind
+.comm _ldkind,2
+.globl _ldpass
+.comm _ldpass,2
+.globl _ldrow
+.comm _ldrow,2
+.globl _ldslot
+.comm _ldslot,2
+.globl _legato
+.comm _legato,2
+.globl _lksel
+.comm _lksel,2
+.globl _lmwtype
+.comm _lmwtype,2
+.globl _loadrow
+.comm _loadrow,2
+.globl _loadsw
+.comm _loadsw,2
+.globl _lorchl
+.comm _lorchl,2
+.globl _lorchsw
+.comm _lorchsw,2
+.globl _lorclsw
+.comm _lorclsw,2
+.globl _lpatsw
+.comm _lpatsw,2
+.globl _lrasw
+.comm _lrasw,2
+.globl _lscrsw
+.comm _lscrsw,2
+.globl _lselsw
+.comm _lselsw,2
+.globl _lseqsw
+.comm _lseqsw,2
+.globl _lstbgnc
+.comm _lstbgnc,2
+.globl _lstendc
+.comm _lstendc,2
+.globl _lstflag
+.comm _lstflag,2
+.globl _lstrsw
+.comm _lstrsw,2
+.globl _lstwoff
+.comm _lstwoff,2
+.globl _lstwpnt
+.comm _lstwpnt,2
+.globl _ltagged
+.comm _ltagged,2
+.globl _ltunsw
+.comm _ltunsw,2
+.globl _lwavsw
+.comm _lwavsw,2
+.globl _mascntr
+.comm _mascntr,2
+.globl _mdb1
+.comm _mdb1,2
+.globl _mdb2
+.comm _mdb2,2
+.globl _michan
+.comm _michan,2
+.globl _midiclk
+.comm _midiclk,2
+.globl _midigo
+.comm _midigo,2
+.globl _mistat
+.comm _mistat,2
+.globl _nchwait
+.comm _nchwait,2
+.globl _ncvwait
+.comm _ncvwait,2
+.globl _ndisp
+.comm _ndisp,2
+.globl _newflag
+.comm _newflag,2
+.globl _nkdown
+.comm _nkdown,2
+.globl _notenum
+.comm _notenum,2
+.globl _noteop
+.comm _noteop,2
+.globl _notepit
+.comm _notepit,2
+.globl _notesel
+.comm _notesel,2
+.globl _npts
+.comm _npts,2
+.globl _nxtflag
+.comm _nxtflag,2
+.globl _oldltag
+.comm _oldltag,2
+.globl _oldpk
+.comm _oldpk,2
+.globl _oldsl
+.comm _oldsl,2
+.globl _pchsw
+.comm _pchsw,2
+.globl _pecase
+.comm _pecase,2
+.globl _pkctrl
+.comm _pkctrl,2
+.globl _pntsv
+.comm _pntsv,2
+.globl _prgchan
+.comm _prgchan,2
+.globl _ps_dpth
+.comm _ps_dpth,2
+.globl _ps_intn
+.comm _ps_intn,2
+.globl _ps_rate
+.comm _ps_rate,2
+.globl _pulsclk
+.comm _pulsclk,2
+.globl _recsw
+.comm _recsw,2
+.globl _runit
+.comm _runit,2
+.globl _sbase
+.comm _sbase,2
+.globl _scmctl
+.comm _scmctl,2
+.globl _scrlpot
+.comm _scrlpot,2
+.globl _sd
+.comm _sd,2
+.globl _se
+.comm _se,2
+.globl _sdmcol
+.comm _sdmcol,2
+.globl _sdmctl
+.comm _sdmctl,2
+.globl _sdmrow
+.comm _sdmrow,2
+.globl _secop
+.comm _secop,2
+.globl _secopok
+.comm _secopok,2
+.globl _sgcsw
+.comm _sgcsw,2
+.globl _sgoflag
+.comm _sgoflag,2
+.globl _sharp
+.comm _sharp,2
+.globl _sliders
+.comm _sliders,2
+.globl _soffset
+.comm _soffset,2
+.globl _ss_ptsw
+.comm _ss_ptsw,2
+.globl _ss_sqsw
+.comm _ss_sqsw,2
+.globl _stccol
+.comm _stccol,2
+.globl _stcrow
+.comm _stcrow,2
+.globl _stepclk
+.comm _stepclk,2
+.globl _stepenb
+.comm _stepenb,2
+.globl _stepint
+.comm _stepint,2
+.globl _stepwgt
+.comm _stepwgt,2
+.globl _subj
+.comm _subj,2
+.globl _submenu
+.comm _submenu,2
+.globl _swctrl
+.comm _swctrl,2
+.globl _swdelta
+.comm _swdelta,2
+.globl _swdir
+.comm _swdir,2
+.globl _swfiin
+.comm _swfiin,2
+.globl _swflag
+.comm _swflag,2
+.globl _swlast
+.comm _swlast,2
+.globl _swstop
+.comm _swstop,2
+.globl _swndx
+.comm _swndx,2
+.globl _tagslot
+.comm _tagslot,2
+.globl _tdnamsw
+.comm _tdnamsw,2
+.globl _temax
+.comm _temax,2
+.globl _temin
+.comm _temin,2
+.globl _testing
+.comm _testing,2
+.globl _tglclk
+.comm _tglclk,2
+.globl _tglpch
+.comm _tglpch,2
+.globl _thescore
+.comm _thescore,2
+.globl _timemlt
+.comm _timemlt,2
+.globl _tkctrl
+.comm _tkctrl,2
+.globl _tmpomlt
+.comm _tmpomlt,2
+.globl _tmpoval
+.comm _tmpoval,2
+.globl _trkball
+.comm _trkball,2
+.globl _ttcmdsv
+.comm _ttcmdsv,2
+.globl _ttsel1
+.comm _ttsel1,2
+.globl _ttsel2
+.comm _ttsel2,2
+.globl _ttsel3
+.comm _ttsel3,2
+.globl _tuneval
+.comm _tuneval,2
+.globl _tunmod
+.comm _tunmod,2
+.globl _tunval
+.comm _tunval,2
+.globl _txfiin
+.comm _txfiin,2
+.globl _txflag
+.comm _txflag,2
+.globl _txlast
+.comm _txlast,2
+.globl _txstop
+.comm _txstop,2
+.globl _tyfiin
+.comm _tyfiin,2
+.globl _tyflag
+.comm _tyflag,2
+.globl _tylast
+.comm _tylast,2
+.globl _tystop
+.comm _tystop,2
+.globl _velflag
+.comm _velflag,2
+.globl _verbose
+.comm _verbose,2
+.globl _vlbtype
+.comm _vlbtype,2
+.globl _vrbw08
+.comm _vrbw08,2
+.globl _vrbw09
+.comm _vrbw09,2
+.globl _vrbw10
+.comm _vrbw10,2
+.globl _vrbw11
+.comm _vrbw11,2
+.globl _vrbw12
+.comm _vrbw12,2
+.globl _vrbw13
+.comm _vrbw13,2
+.globl _vrbw14
+.comm _vrbw14,2
+.globl _vrbw15
+.comm _vrbw15,2
+.globl _vrcw
+.comm _vrcw,2
+.globl _vtccol
+.comm _vtccol,2
+.globl _vtcrow
+.comm _vtcrow,2
+.globl _vtdechr
+.comm _vtdechr,2
+.globl _vtdecol
+.comm _vtdecol,2
+.globl _vtpcol
+.comm _vtpcol,2
+.globl _vtprow
+.comm _vtprow,2
+.globl _vtwcol
+.comm _vtwcol,2
+.globl _vtwrow
+.comm _vtwrow,2
+.globl _vtxval
+.comm _vtxval,2
+.globl _vtyval
+.comm _vtyval,2
+.globl _wcflag
+.comm _wcflag,2
+.globl _wcmcol
+.comm _wcmcol,2
+.globl _wcmrow
+.comm _wcmrow,2
+.globl _wcpage
+.comm _wcpage,2
+.globl _wdupdfl
+.comm _wdupdfl,2
+.globl _wmcsel
+.comm _wmcsel,2
+.globl _wmctag
+.comm _wmctag,2
+.globl _wplast
+.comm _wplast,2
+.globl _wpntsv
+.comm _wpntsv,2
+.globl _wshmax
+.comm _wshmax,2
+.globl _wvlast
+.comm _wvlast,2
+.globl _xkcount
+.comm _xkcount,2
+.globl _xkstat
+.comm _xkstat,2
+.globl _xycntr
+.comm _xycntr,2
+.globl _ykcount
+.comm _ykcount,2
+.globl _ykstat
+.comm _ykstat,2
+.globl _anrs
+.comm _anrs,256
+.globl _grp2prt
+.comm _grp2prt,48
+.globl _sctctab
+.comm _sctctab,1280
+.globl _sigtab
+.comm _sigtab,512
+.globl _tunlib
+.comm _tunlib,2560
+.globl _varmode
+.comm _varmode,256
+.globl _wsnmod
+.comm _wsnmod,48
+.globl _mphead
+.comm _mphead,28
+.globl _cfetp
+.comm _cfetp,4
+.globl _curfet
+.comm _curfet,4
+.globl _infetp
+.comm _infetp,4
+.globl _gdfsep
+.comm _gdfsep,4
+.globl _pntptr
+.comm _pntptr,4
+.globl _ldhead
+.comm _ldhead,56
+.globl _nefree
+.comm _nefree,4
+.globl _nelist
+.comm _nelist,4
+.globl _adoct
+.comm _adoct,4
+.globl _ldoct
+.comm _ldoct,4
+.globl _mdoct
+.comm _mdoct,4
+.globl _tdoct
+.comm _tdoct,4
+.globl _wdoct
+.comm _wdoct,4
+.globl _idoct
+.comm _idoct,4
+.globl _pflist
+.comm _pflist,4
+.globl _pfqhdr
+.comm _pfqhdr,4
+.globl _libsp
+.comm _libsp,4
+.globl _peg
+.comm _peg,4
+.globl _size1
+.comm _size1,4
+.globl _size2
+.comm _size2,4
+.globl _size3
+.comm _size3,4
+.globl _csbp
+.comm _csbp,4
+.globl _curboxp
+.comm _curboxp,4
+.globl _p_bak
+.comm _p_bak,4
+.globl _p_cbgn
+.comm _p_cbgn,4
+.globl _p_cend
+.comm _p_cend,4
+.globl _p_cur
+.comm _p_cur,4
+.globl _p_ctr
+.comm _p_ctr,4
+.globl _p_fwd
+.comm _p_fwd,4
+.globl _p_nbeg
+.comm _p_nbeg,4
+.globl _p_nend
+.comm _p_nend,4
+.globl _p_sbgn
+.comm _p_sbgn,4
+.globl _p_sec1
+.comm _p_sec1,4
+.globl _p_sec2
+.comm _p_sec2,4
+.globl _p_send
+.comm _p_send,4
+.globl _scp
+.comm _scp,4
+.globl _asgtab
+.comm _asgtab,33200
+.globl _filecat
+.comm _filecat,1120
+.globl _gdstbc
+.comm _gdstbc,68
+.globl _gdstbn
+.comm _gdstbn,68
+.globl _gdstbp
+.comm _gdstbp,68
+.globl _gdfsl
+.comm _gdfsl,2048
+.globl _idefs
+.comm _idefs,161458
+.globl _lstbgns
+.comm _lstbgns,192
+.globl _lstends
+.comm _lstends,192
+.globl _vbufs
+.comm _vbufs,47256
+.globl _nevents
+.comm _nevents,256
+.globl _pfents
+.comm _pfents,10752
+.globl _sindex
+.comm _sindex,400
+.globl _vpsms
+.comm _vpsms,768
+.globl _sments
+.comm _sments,2304
+.globl _valents
+.comm _valents,1920
+.globl _wslib
+.comm _wslib,21600
+.globl _scores
+.comm _scores,80
+.globl _stimes
+.comm _stimes,4800
+.globl _hplist
+.comm _hplist,960
+.globl _seclist
+.comm _seclist,1600
+.globl _asgob
+.comm _asgob,4
+.globl _consl
+.comm _consl,4
+.globl _cursl
+.comm _cursl,4
+.globl _instob
+.comm _instob,4
+.globl _librob
+.comm _librob,4
+.globl _menuob
+.comm _menuob,4
+.globl _nxtsl
+.comm _nxtsl,4
+.globl _obj0
+.comm _obj0,4
+.globl _obj1
+.comm _obj1,4
+.globl _obj2
+.comm _obj2,4
+.globl _obj3
+.comm _obj3,4
+.globl _obj4
+.comm _obj4,4
+.globl _obj5
+.comm _obj5,4
+.globl _obj6
+.comm _obj6,4
+.globl _obj7
+.comm _obj7,4
+.globl _obj8
+.comm _obj8,4
+.globl _obj9
+.comm _obj9,4
+.globl _obj10
+.comm _obj10,4
+.globl _obj11
+.comm _obj11,4
+.globl _obj12
+.comm _obj12,4
+.globl _obj13
+.comm _obj13,4
+.globl _obj14
+.comm _obj14,4
+.globl _obj15
+.comm _obj15,4
+.globl _prvsl
+.comm _prvsl,4
+.globl _saddr
+.comm _saddr,4
+.globl _tunob
+.comm _tunob,4
+.globl _vtobj
+.comm _vtobj,4
+.globl _waveob
+.comm _waveob,4
+.globl _curintp
+.comm _curintp,2
+.globl _scrl
+.comm _scrl,2
+.globl _vtbgval
+.comm _vtbgval,2
+.globl _vtfgval
+.comm _vtfgval,2
+.globl _dfbuf
+.comm _dfbuf,8192
+.globl _slices
+.comm _slices,1792
+.globl _debugsw
+.data
+_debugsw:
+.dc.w $0
+.globl _swback
+.data
+_swback:
+.dc.w $A
+.globl _swthr
+.data
+_swthr:
+.dc.w $4
+.globl _swtime
+.data
+_swtime:
+.dc.w $A
+.globl _swwait
+.data
+_swwait:
+.dc.w $2
+.globl _tkback
+.data
+_tkback:
+.dc.w $8
+.globl _tkrmin
+.data
+_tkrmin:
+.dc.w $6
+.globl _tkthr
+.data
+_tkthr:
+.dc.w $3
+.globl _tktime
+.data
+_tktime:
+.dc.w $A
+.globl _tkwait
+.data
+_tkwait:
+.dc.w $2
+.globl _curhold
+.data
+_curhold:
+.dc.w $12C
+.globl _hcwval
+.data
+_hcwval:
+.dc.w $1E
+.globl _thcwval
+.data
+_thcwval:
+.dc.w $3C
+.globl _tvcwval
+.data
+_tvcwval:
+.dc.w $78
+.globl _vcwval
+.data
+_vcwval:
+.dc.w $1E
+.globl _tmultab
+.data
+_tmultab:
+.dc.w $FFFF
+.dc.w $FAFA
+.dc.w $F627
+.dc.w $F182
+.dc.w $ED09
+.dc.w $E8BA
+.dc.w $E492
+.dc.w $E08F
+.dc.w $DCB0
+.dc.w $D8F2
+.dc.w $D555
+.dc.w $D1D6
+.dc.w $CE73
+.dc.w $CB2C
+.dc.w $C800
+.dc.w $C4EC
+.dc.w $C1F0
+.dc.w $BF0B
+.dc.w $BC3C
+.dc.w $B981
+.dc.w $B6DB
+.dc.w $B448
+.dc.w $B1C7
+.dc.w $AF57
+.dc.w $ACF9
+.dc.w $AAAA
+.dc.w $A86B
+.dc.w $A63B
+.dc.w $A41A
+.dc.w $A206
+.dc.w $A000
+.dc.w $9E06
+.dc.w $9C18
+.dc.w $9A37
+.dc.w $9861
+.dc.w $9696
+.dc.w $94D6
+.dc.w $9320
+.dc.w $9174
+.dc.w $8FD1
+.dc.w $8E38
+.dc.w $8CA8
+.dc.w $8B21
+.dc.w $89A2
+.dc.w $882B
+.dc.w $86BC
+.dc.w $8555
+.dc.w $83F5
+.dc.w $829C
+.dc.w $814A
+.dc.w $8000
+.dc.w $7EBB
+.dc.w $7D7D
+.dc.w $7C45
+.dc.w $7B13
+.dc.w $79E7
+.dc.w $78C1
+.dc.w $77A0
+.dc.w $7684
+.dc.w $756E
+.dc.w $745D
+.dc.w $7350
+.dc.w $7249
+.dc.w $7146
+.dc.w $7047
+.dc.w $6F4D
+.dc.w $6E58
+.dc.w $6D66
+.dc.w $6C79
+.dc.w $6B90
+.dc.w $6AAA
+.dc.w $69C8
+.dc.w $68EB
+.dc.w $6810
+.dc.w $6739
+.dc.w $6666
+.dc.w $6596
+.dc.w $64C9
+.dc.w $6400
+.dc.w $6339
+.dc.w $6276
+.dc.w $61B5
+.dc.w $60F8
+.dc.w $603D
+.dc.w $5F85
+.dc.w $5ED0
+.dc.w $5E1E
+.dc.w $5D6E
+.dc.w $5CC0
+.dc.w $5C16
+.dc.w $5B6D
+.dc.w $5AC7
+.dc.w $5A24
+.dc.w $5982
+.dc.w $58E3
+.dc.w $5846
+.dc.w $57AB
+.dc.w $5713
+.dc.w $567C
+.dc.w $55E7
+.dc.w $5555
+.globl _crate0
+.data
+_crate0:
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.globl _crate1
+.data
+_crate1:
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $5
+.dc.w $5
+.dc.w $5
+.dc.w $5
+.dc.w $5
+.dc.w $5
+.dc.w $5
+.dc.w $5
+.dc.w $7
+.dc.w $7
+.dc.w $7
+.dc.w $7
+.dc.w $7
+.dc.w $7
+.dc.w $7
+.dc.w $7
+.dc.w $9
+.dc.w $9
+.dc.w $9
+.dc.w $9
+.dc.w $9
+.dc.w $9
+.dc.w $9
+.dc.w $9
+.dc.w $B
+.dc.w $B
+.dc.w $B
+.dc.w $B
+.dc.w $B
+.dc.w $B
+.dc.w $B
+.dc.w $B
+.dc.w $D
+.dc.w $D
+.dc.w $D
+.dc.w $D
+.dc.w $D
+.dc.w $D
+.dc.w $D
+.dc.w $D
+.globl _crate2
+.data
+_crate2:
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $8
+.dc.w $8
+.dc.w $8
+.dc.w $8
+.dc.w $10
+.dc.w $10
+.dc.w $10
+.dc.w $10
+.dc.w $20
+.dc.w $20
+.dc.w $20
+.dc.w $20
+.dc.w $40
+.dc.w $40
+.dc.w $40
+.dc.w $40
+.dc.w $80
+.dc.w $80
+.dc.w $80
+.dc.w $80
+.dc.w $60
+.dc.w $60
+.dc.w $60
+.dc.w $60
+.dc.w $100
+.dc.w $100
+.dc.w $100
+.dc.w $100
+.dc.w $100
+.dc.w $100
+.dc.w $100
+.dc.w $100
+.dc.w $100
+.dc.w $100
+.dc.w $100
+.dc.w $100
+.globl _loctab
+.data
+_loctab:
+.dc.w $0
+.dc.w $FA0
+.dc.w $1F40
+.dc.w $2EE0
+.dc.w $3E80
+.dc.w $4E20
+.dc.w $5DC0
+.dc.w $6D60
+.dc.w $7D00
+.globl _valof
+.text
+_valof:
+~~valof:
+~srcv=8
+link R14,#-4
+*line 591
+move 8(R14),R0
+bra L3
+*line 592
+L4:
+*line 593
+*line 594
+clr R0
+bra L1
+*line 595
+L5:
+*line 596
+*line 597
+clr (sp)
+jsr _xgetran
+bra L1
+*line 598
+L6:
+*line 599
+*line 600
+move 316+_sigtab,R0
+muls #252,R0
+and #32736,R0
+bra L1
+*line 601
+L7:
+*line 602
+L8:
+*line 603
+L9:
+*line 604
+*line 605
+clr R0
+bra L1
+*line 606
+L10:
+*line 607
+*line 608
+move 308+_sigtab,R0
+muls #252,R0
+and #32736,R0
+bra L1
+*line 609
+L11:
+*line 610
+*line 611
+clr R0
+bra L1
+*line 612
+L12:
+*line 613
+*line 614
+move 216+_sigtab,R0
+muls #252,R0
+and #32736,R0
+bra L1
+*line 615
+L13:
+*line 616
+*line 617
+move 228+_sigtab,R0
+muls #252,R0
+and #32736,R0
+bra L1
+*line 618
+L14:
+*line 619
+*line 620
+clr R0
+bra L1
+bra L2
+L3:cmp #13,R0
+bhi L14
+asl #2,R0
+move R0,R8
+add.l #L15,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L15:.dc.l L4
+.dc.l L5
+.dc.l L6
+.dc.l L14
+.dc.l L14
+.dc.l L7
+.dc.l L8
+.dc.l L9
+.dc.l L10
+.dc.l L14
+.dc.l L14
+.dc.l L11
+.dc.l L12
+.dc.l L13
+.text
+L2:L1:unlk R14
+rts
+.globl _inismtb
+.text
+_inismtb:
+~~inismtb:
+link R14,#0
+movem.l R5-R7,-(sp)
+~i=R7
+~oldi=R6
+*line 637
+move #2,(sp)
+jsr _setipl
+move R0,R6
+*line 641
+clr R7
+bra L19
+L20:
+*line 642
+*line 643
+move R7,R0
+muls #10,R0
+add.l #_valents,R0
+move R7,R1
+muls #10,R1
+add.l #_valents,R1
+move.l R1,R9
+move.l R0,(R9)
+*line 644
+move R7,R0
+muls #10,R0
+add.l #_valents,R0
+move R7,R1
+muls #10,R1
+add.l #_valents,R1
+move.l R1,R9
+move.l R0,4(R9)
+*line 645
+move R7,(sp)
+and #15,(sp)
+jsr _valof
+move R0,-(sp)
+move R7,R0
+muls #10,R0
+add.l #_valents,R0
+move.l R0,R8
+move (sp)+,8(R8)
+L18:
+*line 641
+add #1,R7
+L19:
+*line 641
+cmp #192,R7
+blt L20
+L17:
+*line 648
+clr R7
+bra L23
+L24:
+*line 649
+*line 650
+move R7,R0
+muls #12,R0
+add.l #_sments,R0
+move R7,R9
+add.l R9,R9
+add.l R9,R9
+add.l #_vpsms,R9
+move.l R0,(R9)
+*line 651
+*line 652
+move R7,R0
+muls #12,R0
+add.l #_sments,R0
+move.l R0,R8
+move.l #_valents,4(R8)
+*line 653
+move R7,R0
+muls #12,R0
+add.l #_sments,R0
+move.l R0,R8
+move.l _valents,(R8)
+*line 654
+*line 655
+move R7,R0
+muls #12,R0
+add.l #_sments,R0
+move.l _valents,R9
+move.l R0,4(R9)
+*line 656
+move R7,R0
+muls #12,R0
+add.l #_sments,R0
+move.l R0,_valents
+*line 657
+*line 658
+move R7,R0
+muls #12,R0
+add.l #_sments,R0
+move.l R0,R8
+move R7,8(R8)
+*line 659
+move R7,R0
+muls #12,R0
+add.l #_sments,R0
+move.l R0,R8
+clr 10(R8)
+L22:
+*line 648
+add #1,R7
+L23:
+*line 648
+cmp #192,R7
+blt L24
+L21:
+*line 662
+move R6,(sp)
+jsr _setipl
+L16:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _clrpfl
+.text
+_clrpfl:
+~~clrpfl:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 681
+move #5376,(sp)
+clr -(sp)
+move.l #_pfents,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 683
+clr R7
+bra L28
+L29:
+*line 684
+move R7,R0
+add #1,R0
+asl #5,R0
+ext.l R0
+add.l #_pfents,R0
+move R7,R1
+asl #5,R1
+ext.l R1
+add.l #_pfents,R1
+move.l R1,R9
+move.l R0,(R9)
+L27:
+*line 683
+add #1,R7
+L28:
+*line 683
+cmp #335,R7
+blt L29
+L26:
+*line 686
+move.l #_pfents,_pfqhdr
+*line 687
+clr.l _pflist
+L25:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _im700
+.text
+_im700:
+~~im700:
+link R14,#0
+movem.l R4-R7/R12-R13,-(sp)
+~i=R7
+~j=R6
+~k=R5
+~ioadr=R13
+~ip=R12
+*line 705
+clr _debugsw
+*line 707
+jsr _GLCinit
+*line 708
+move #1,(sp)
+jsr _GLCcurs
+*line 709
+move.l #L31,(sp)
+move #1,-(sp)
+move #2,-(sp)
+jsr _GLCtext
+addq.l #4,sp
+*line 710
+clr (sp)
+jsr _GLCcurs
+*line 712
+move.l #_blakpal,(sp)
+jsr _vsndpal
+*line 714
+jsr _VHinit
+*line 715
+jsr _VSinit
+*line 717
+move #24,(sp)
+clr -(sp)
+move.l #_keystat,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 718
+move #6144,(sp)
+clr -(sp)
+move.l #_trgtab,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 719
+move #6144,(sp)
+clr -(sp)
+move.l #_mctlval,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 721
+move #12,(sp)
+clr -(sp)
+move.l #_grpmode,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 722
+move #12,(sp)
+move #1,-(sp)
+move.l #_grpstat,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 723
+move #12,(sp)
+move #1,-(sp)
+move.l #_grpsel,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 724
+move #256,(sp)
+clr -(sp)
+move.l #_sigtab,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 726
+move #6144,(sp)
+move #16128,-(sp)
+move.l #_veltab,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 727
+move #12,(sp)
+move #16128,-(sp)
+move.l #_lastvel,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 728
+move #6144,(sp)
+clr -(sp)
+move.l #_prstab,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 730
+move #100,(sp)
+jsr _tofpu
+move R0,_curintp
+*line 732
+move #-1,_angroup
+*line 733
+clr _ancmsw
+*line 734
+clr _velflag
+*line 736
+move #1,_dubsw
+*line 738
+clr _sd
+*line 739
+clr _se
+*line 741
+jsr _swinit
+*line 743
+jsr _inismtb
+*line 744
+jsr _clrnl
+*line 745
+jsr _clrpfl
+*line 747
+clr _lstbgnc
+*line 748
+clr _lstendc
+*line 749
+move #1,_lstflag
+*line 751
+move #96,(sp)
+clr -(sp)
+move.l #_lstbgns,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 752
+move #96,(sp)
+clr -(sp)
+move.l #_lstends,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 756
+clr R7
+bra L34
+L35:
+*line 757
+*line 758
+move R7,R0
+muls #3938,R0
+move.l R0,R12
+add.l #_vbufs,R12
+*line 759
+*line 760
+clr R6
+bra L38
+L39:
+*line 761
+*line 762
+move R7,R5
+asl #4,R5
+move R6,R8
+add.l R8,R8
+add.l #_fnoff,R8
+move (R8),R0
+add R0,R5
+*line 763
+*line 764
+move.l R12,R0
+move R6,R1
+muls #12,R1
+add.l R1,R0
+add.l #86,R0
+move R5,R1
+asl #3,R1
+ext.l R1
+add.l #_funcndx,R1
+move.l R1,R9
+move.l R0,(R9)
+*line 765
+move R5,R1
+asl #3,R1
+ext.l R1
+add.l #_funcndx,R1
+move.l R1,R9
+lea 242(R12),R8
+move.l R8,4(R9)
+L37:
+*line 760
+add #1,R6
+L38:
+*line 760
+cmp #13,R6
+blt L39
+L36:
+*line 766
+L33:
+*line 756
+add #1,R7
+L34:
+*line 756
+cmp #12,R7
+blt L35
+L32:
+*line 771
+clr R7
+bra L42
+L43:
+*line 772
+*line 773
+move R7,R8
+add.l R8,R8
+add.l #_msmstv,R8
+clr (R8)
+*line 774
+move R7,R8
+add.l #_mrstat,R8
+clr.b (R8)
+*line 775
+move R7,R8
+add.l #_mdbyte,R8
+clr.b (R8)
+*line 776
+move R7,R8
+add.l #_masens,R8
+clr.b (R8)
+L41:
+*line 771
+add #1,R7
+L42:
+*line 771
+cmp #3,R7
+blt L43
+L40:
+*line 779
+clr R7
+bra L46
+L47:
+*line 780
+*line 781
+move R7,R8
+add.l R8,R8
+add.l #_mpbend,R8
+clr (R8)
+*line 782
+move R7,R8
+add.l #_mpsust,R8
+clr.b (R8)
+L45:
+*line 779
+add #1,R7
+L46:
+*line 779
+cmp #48,R7
+blt L47
+L44:
+*line 785
+clr R7
+bra L50
+L51:
+*line 786
+*line 787
+clr R6
+bra L54
+L55:
+*line 788
+*line 789
+move R6,R0
+asl #5,R0
+ext.l R0
+move R7,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+add.l #_varmode,R0
+move.l R0,R8
+clr (R8)
+*line 790
+move R6,R0
+asl #5,R0
+ext.l R0
+move R7,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+add.l #_anrs,R0
+move.l R0,R8
+move #4,(R8)
+L53:
+*line 787
+add #1,R6
+L54:
+*line 787
+cmp #6,R6
+blt L55
+L52:
+*line 791
+*line 792
+*line 793
+move #6,(sp)
+move R7,-(sp)
+jsr _setdyn
+addq.l #2,sp
+*line 794
+move #4,(sp)
+move R7,-(sp)
+jsr _setloc
+addq.l #2,sp
+*line 795
+move R7,R8
+add.l R8,R8
+add.l #_lastvce,R8
+clr (R8)
+*line 796
+move R7,R8
+add.l R8,R8
+add.l #_vce2trg,R8
+move #-1,(R8)
+L49:
+*line 785
+add #1,R7
+L50:
+*line 785
+cmp #12,R7
+blt L51
+L48:
+*line 799
+clr R7
+bra L58
+L59:
+*line 800
+*line 801
+move #37,(sp)
+move #32,-(sp)
+move R7,R0
+muls #37,R0
+add.l #_loadedc,R0
+move.l R0,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 802
+move #8,(sp)
+move #32,-(sp)
+move R7,R0
+asl #3,R0
+ext.l R0
+add.l #_loadedf,R0
+move.l R0,-(sp)
+jsr _memset
+addq.l #6,sp
+L57:
+*line 799
+add #1,R7
+L58:
+*line 799
+cmp #8,R7
+blt L59
+L56:
+*line 805
+move #8,(sp)
+move #32,-(sp)
+move.l #_ldfile,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 806
+clr.b 8+_ldfile
+*line 808
+move #37,(sp)
+move #32,-(sp)
+move.l #_ldcmnt,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 809
+clr.b 37+_ldcmnt
+*line 813
+move #1,_xkcount
+*line 814
+move #1,_ykcount
+*line 815
+move #50,_xycntr
+*line 817
+clr _clksrc
+*line 818
+clr _clkctl
+*line 819
+clr _clkrun
+*line 820
+clr _midiclk
+*line 821
+clr _pulsclk
+*line 822
+clr _stepclk
+*line 823
+clr _fc_sw
+*line 824
+clr.l _fc_val
+*line 825
+clr _scrlpot
+*line 826
+move #50,_tmpomlt
+*line 827
+move.b #24,_io_leds
+*line 828
+move.b #25,_io_leds
+*line 829
+move #60,(sp)
+jsr _settmpo
+*line 831
+move 100+_tmultab,_timemlt
+*line 832
+move.b #26,_io_leds
+*line 833
+move.b #27,_io_leds
+*line 835
+clr _tuneval
+*line 836
+move.b #28,_io_leds
+*line 837
+move.b #29,_io_leds
+*line 839
+clr R7
+bra L62
+L63:
+*line 840
+move R7,R0
+add #3,R0
+move #12,R1
+asl R1,R0
+move R7,R1
+add #3,R1
+asl #8,R1
+or R1,R0
+move R7,R1
+add #3,R1
+asl #4,R1
+or R1,R0
+move R7,R1
+add #3,R1
+or R1,R0
+move R7,R9
+add.l R9,R9
+add.l #_gtctab,R9
+move R0,(R9)
+L61:
+*line 839
+add #1,R7
+L62:
+*line 839
+cmp #12,R7
+blt L63
+L60:
+*line 842
+clr _editsw
+*line 843
+move.b #30,_io_leds
+*line 844
+move.l #2+_io_ser,R13
+*line 845
+move.b (R13),R0
+ext.w R0
+and #8,R0
+move R0,_editss
+*line 847
+move.b #4,_ac_code
+*line 849
+move #12,(sp)
+move #1,-(sp)
+move.l #_articen,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 852
+move.l #_cmvgen,_curmove
+*line 853
+move.l #_nokey,_premove
+*line 854
+move.l #_nokey,_pstmove
+*line 855
+move.l #_stdctp2,_curtype
+*line 857
+move.l #_nokey,_x_key
+*line 858
+move.l #_nokey,_e_key
+*line 859
+move.l #_stdmkey,_m_key
+*line 860
+move.l #_nokey,_d_key
+*line 862
+move.l #_nokey,_not_fld
+*line 864
+move.l #_cxkstd,_cx_key
+*line 865
+move.l #_cykstd,_cy_key
+*line 866
+move.l #_cxgen,_cx_upd
+*line 867
+move.l #_cygen,_cy_upd
+*line 868
+move.l #_nokey,_xy_up
+*line 869
+move.l #_nokey,_xy_dn
+*line 871
+move #349,_curslim
+*line 873
+move _hcwval,_chtime
+*line 874
+move _vcwval,_cvtime
+*line 875
+move _curhold,_nchwait
+*line 876
+move _curhold,_ncvwait
+*line 877
+move #1,_chwait
+*line 878
+move #1,_cvwait
+*line 880
+move.l #_crate1,_cratex
+*line 881
+move.l #_crate1,_cratey
+*line 883
+move #1,_cmfirst
+*line 884
+clr _cmtype
+*line 886
+move #256,_cxval
+*line 887
+move #175,_cyval
+*line 889
+move _cyval,R0
+ext.l R0
+divs #14,R0
+move R0,_stcrow
+*line 890
+move _cxval,R0
+ext.l R0
+divs #8,R0
+move R0,_stccol
+*line 892
+clr _submenu
+*line 895
+clr _curinst
+*line 896
+move #12,_curfunc
+*line 897
+clr _curvce
+*line 899
+clr _asmode
+*line 900
+clr _gomode
+*line 901
+clr _ismode
+*line 902
+clr _pkctrl
+*line 903
+move _pkctrl,_oldpk
+*line 904
+clr _sliders
+*line 905
+move _sliders,_oldsl
+*line 906
+move.l #_t_prmtr,_swpt
+*line 907
+move.l _swpt,_oldsw
+*line 908
+jsr _setleds
+*line 910
+jsr _initpt
+*line 911
+jsr _initsq
+*line 912
+jsr _initil
+*line 913
+jsr _iniwslb
+*line 914
+jsr _inital
+*line 915
+jsr _inittl
+*line 916
+jsr _scinit
+*line 918
+clr (sp)
+move #1,-(sp)
+jsr _clearer
+addq.l #2,sp
+*line 919
+clr R0
+move R0,_curasg
+move R0,(sp)
+jsr _getasg
+*line 921
+jsr _lcdlbls
+*line 922
+clr _lampsw
+L30:tst.l (sp)+
+movem.l (sp)+,R5-R7/R12-R13
+unlk R14
+rts
+.data
+L31:.dc.b $4D,$49,$44,$41,$53,$20,$37,$20,$2D,$2D,$20,$49,$6E,$69,$74,$69,$61,$6C,$69,$7A,$61,$74,$69,$6F,$6E,$20,$69,$6E,$20,$70
+.dc.b $72,$6F,$67,$72,$65,$73,$73,$20,$2D,$2D,$20,$50,$6C,$65,$61,$73,$65,$20,$73,$74,$61,$6E,$64,$20,$62,$79,$0
Index: alcyon/index.s
===================================================================
--- alcyon/index.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/index.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,40 @@
+.globl _index
+.text
+_index:
+~~index:
+~str=R13
+~c=R7
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+*line 13
+move.l 8(R14),R13
+*line 13
+move.b 13(R14),R7
+*line 13
+bra L4
+L3:
+*line 14
+*line 15
+*line 16
+cmp.b (R13),R7
+bne L5
+*line 16
+move.l R13,R0
+bra L1
+*line 17
+L5:
+*line 18
+add.l #1,R13
+L4:
+*line 19
+tst.b (R13)
+bne L3
+L2:
+*line 21
+clr.l R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/infield.s
===================================================================
--- alcyon/infield.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/infield.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,70 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _stcrow
+.globl _stccol
+.globl _infield
+.text
+_infield:
+~~infield:
+~row=R7
+~col=R6
+~fetp=R13
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+*line 26
+move 8(R14),R7
+*line 26
+move 10(R14),R6
+*line 26
+move.l 12(R14),R13
+*line 26
+clr.l _infetp
+*line 28
+*line 29
+move.l R13,R0
+bne L2
+*line 29
+clr R0
+bra L1
+*line 30
+L2:
+*line 31
+bra L5
+L4:
+*line 32
+*line 33
+*line 34
+*line 35
+cmp (R13),R7
+bne L6
+cmp 2(R13),R6
+blt L6
+cmp 4(R13),R6
+bgt L6
+*line 36
+*line 37
+move.l R13,_infetp
+*line 38
+move #1,R0
+bra L1
+*line 39
+*line 40
+L6:
+*line 41
+add.l #24,R13
+L5:
+*line 42
+tst.l 16(R13)
+bne L4
+L3:
+*line 44
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/initi.s
===================================================================
--- alcyon/initi.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/initi.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,3620 @@
+.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 _s_inst
+.globl _vce2trg
+.globl _vce2grp
+.globl _curfunc
+.globl _curinst
+.globl _curpnt
+.globl _curvce
+.globl _cxval
+.globl _editsw
+.globl _initcfg
+.globl _npts
+.globl _pecase
+.globl _pntsv
+.globl _subj
+.globl _temax
+.globl _temin
+.globl _funcndx
+.globl _idbox
+.globl _instmod
+.globl _fnoff
+.globl _pntptr
+.globl _idefs
+.globl _vbufs
+.globl _dfltins
+.data
+_dfltins:
+.dc.w $0
+.dc.w $4465
+.dc.w $2046
+.dc.w $6175
+.dc.w $6C74
+.dc.w $2020
+.dc.w $2020
+.dc.w $2020
+.dc.w $2020
+.dc.w $28
+.dc.w $7265
+.dc.w $7370
+.dc.w $6F6E
+.dc.w $6473
+.dc.w $2074
+.dc.w $6F20
+.dc.w $2020
+.dc.w $2000
+.dc.w $2070
+.dc.w $7265
+.dc.w $7373
+.dc.w $7572
+.dc.w $6520
+.dc.w $2620
+.dc.w $2020
+.dc.w $2020
+.dc.w $20
+.dc.w $7065
+.dc.w $6461
+.dc.w $6C29
+.dc.w $2020
+.dc.w $2020
+.dc.w $2020
+.dc.w $2020
+.dc.w $2000
+.dc.w $151
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $968
+.dc.w $4
+.dc.w $15C4
+.dc.w $2B70
+.dc.w $2CD0
+.dc.w $B04
+.dc.w $D
+.dc.w $300
+.dc.w $42
+.dc.w $968
+.dc.w $0
+.dc.w $1
+.dc.w $410
+.dc.w $400
+.dc.w $0
+.dc.w $4
+.dc.w $7FFF
+.dc.w $801
+.dc.w $510
+.dc.w $500
+.dc.w $0
+.dc.w $15C4
+.dc.w $0
+.dc.w $1
+.dc.w $608
+.dc.w $600
+.dc.w $0
+.dc.w $2B70
+.dc.w $199B
+.dc.w $604
+.dc.w $70D
+.dc.w $A00
+.dc.w $42
+.dc.w $2B70
+.dc.w $0
+.dc.w $2
+.dc.w $B15
+.dc.w $C00
+.dc.w $42
+.dc.w $2B70
+.dc.w $8000
+.dc.w $A06
+.dc.w $D15
+.dc.w $1200
+.dc.w $42
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $130C
+.dc.w $1300
+.dc.w $0
+.dc.w $2B70
+.dc.w $8000
+.dc.w $A05
+.dc.w $1415
+.dc.w $1800
+.dc.w $42
+.dc.w $2B70
+.dc.w $8000
+.dc.w $508
+.dc.w $190D
+.dc.w $2000
+.dc.w $42
+.dc.w $2B70
+.dc.w $9998
+.dc.w $A04
+.dc.w $210D
+.dc.w $2400
+.dc.w $42
+.dc.w $2B70
+.dc.w $2003
+.dc.w $604
+.dc.w $2515
+.dc.w $2800
+.dc.w $42
+.dc.w $2B70
+.dc.w $0
+.dc.w $6
+.dc.w $2915
+.dc.w $2E00
+.dc.w $42
+.dc.w $760F
+.dc.w $3E80
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $6D79
+.dc.w $3E80
+.dc.w $3D8
+.dc.w $C00
+.dc.w $0
+.dc.w $0
+.dc.w $6BE9
+.dc.w $3E80
+.dc.w $FC27
+.dc.w $C06
+.dc.w $100
+.dc.w $0
+.dc.w $3EEA
+.dc.w $3E80
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $760F
+.dc.w $3E80
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $760F
+.dc.w $3E80
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $760F
+.dc.w $3E80
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $760F
+.dc.w $67A0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $4AC9
+.dc.w $5E80
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $69C6
+.dc.w $54E0
+.dc.w $E664
+.dc.w $500
+.dc.w $0
+.dc.w $0
+.dc.w $5202
+.dc.w $2A00
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3E69
+.dc.w $3E20
+.dc.w $2668
+.dc.w $100
+.dc.w $0
+.dc.w $0
+.dc.w $43C6
+.dc.w $3F00
+.dc.w $4000
+.dc.w $100
+.dc.w $0
+.dc.w $0
+.dc.w $59EB
+.dc.w $6D40
+.dc.w $CCCB
+.dc.w $A00
+.dc.w $0
+.dc.w $0
+.dc.w $49A8
+.dc.w $4A60
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $5AF8
+.dc.w $7540
+.dc.w $3334
+.dc.w $A00
+.dc.w $0
+.dc.w $0
+.dc.w $64B8
+.dc.w $4520
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3DE8
+.dc.w $6F20
+.dc.w $D997
+.dc.w $A00
+.dc.w $0
+.dc.w $0
+.dc.w $4466
+.dc.w $46E0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $760F
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3CEB
+.dc.w $5DA0
+.dc.w $2668
+.dc.w $700
+.dc.w $0
+.dc.w $0
+.dc.w $57DA
+.dc.w $55C0
+.dc.w $2668
+.dc.w $700
+.dc.w $0
+.dc.w $0
+.dc.w $4FB7
+.dc.w $4C20
+.dc.w $B32F
+.dc.w $A00
+.dc.w $0
+.dc.w $0
+.dc.w $4294
+.dc.w $2D80
+.dc.w $8000
+.dc.w $A00
+.dc.w $0
+.dc.w $0
+.dc.w $5B82
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $760F
+.dc.w $4CE0
+.dc.w $4000
+.dc.w $700
+.dc.w $0
+.dc.w $0
+.dc.w $4D0A
+.dc.w $3800
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $61C7
+.dc.w $FC0
+.dc.w $4000
+.dc.w $700
+.dc.w $0
+.dc.w $0
+.dc.w $4B27
+.dc.w $4360
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $48C7
+.dc.w $B60
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $760F
+.dc.w $B60
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $4FB7
+.dc.w $4600
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $5BE5
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $60DA
+.dc.w $5780
+.dc.w $4000
+.dc.w $700
+.dc.w $0
+.dc.w $0
+.dc.w $52F9
+.dc.w $620
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $6636
+.dc.w $16C0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3C44
+.dc.w $3800
+.dc.w $8000
+.dc.w $A00
+.dc.w $0
+.dc.w $0
+.dc.w $760F
+.dc.w $63A0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3EE7
+.dc.w $4980
+.dc.w $9998
+.dc.w $A00
+.dc.w $0
+.dc.w $0
+.dc.w $48E5
+.dc.w $2920
+.dc.w $9998
+.dc.w $500
+.dc.w $0
+.dc.w $0
+.dc.w $6CF2
+.dc.w $B60
+.dc.w $CCCB
+.dc.w $A00
+.dc.w $0
+.dc.w $0
+.dc.w $760F
+.dc.w $69C0
+.dc.w $3334
+.dc.w $700
+.dc.w $0
+.dc.w $0
+.dc.w $4B8B
+.dc.w $6480
+.dc.w $2668
+.dc.w $700
+.dc.w $0
+.dc.w $0
+.dc.w $6A59
+.dc.w $6480
+.dc.w $2668
+.dc.w $706
+.dc.w $100
+.dc.w $0
+.dc.w $71F7
+.dc.w $47C0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $4E05
+.dc.w $3FE0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $6313
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $1540
+.dc.w $14E0
+.dc.w $14A0
+.dc.w $1420
+.dc.w $13A0
+.dc.w $1320
+.dc.w $1280
+.dc.w $11A0
+.dc.w $10C0
+.dc.w $FA0
+.dc.w $E60
+.dc.w $D40
+.dc.w $BC0
+.dc.w $A60
+.dc.w $8A0
+.dc.w $700
+.dc.w $540
+.dc.w $380
+.dc.w $1A0
+.dc.w $FFA0
+.dc.w $FDA0
+.dc.w $FBC0
+.dc.w $F9C0
+.dc.w $F780
+.dc.w $F580
+.dc.w $F360
+.dc.w $F180
+.dc.w $EF60
+.dc.w $ED40
+.dc.w $EB80
+.dc.w $E9C0
+.dc.w $E820
+.dc.w $E6C0
+.dc.w $E5A0
+.dc.w $E480
+.dc.w $E380
+.dc.w $E2C0
+.dc.w $E200
+.dc.w $E180
+.dc.w $E120
+.dc.w $E0C0
+.dc.w $E080
+.dc.w $E060
+.dc.w $E060
+.dc.w $E060
+.dc.w $E060
+.dc.w $E060
+.dc.w $E060
+.dc.w $E060
+.dc.w $E080
+.dc.w $E060
+.dc.w $E040
+.dc.w $DFE0
+.dc.w $DFA0
+.dc.w $DF40
+.dc.w $DEE0
+.dc.w $DE40
+.dc.w $DD40
+.dc.w $DC60
+.dc.w $DB60
+.dc.w $DA20
+.dc.w $D8A0
+.dc.w $D720
+.dc.w $D560
+.dc.w $D360
+.dc.w $D140
+.dc.w $CF00
+.dc.w $CCA0
+.dc.w $CA00
+.dc.w $C760
+.dc.w $C4A0
+.dc.w $C1E0
+.dc.w $BF00
+.dc.w $BC40
+.dc.w $B980
+.dc.w $B6A0
+.dc.w $B3C0
+.dc.w $B100
+.dc.w $AE80
+.dc.w $AC20
+.dc.w $AA20
+.dc.w $A820
+.dc.w $A680
+.dc.w $A4E0
+.dc.w $A380
+.dc.w $A220
+.dc.w $A100
+.dc.w $9FC0
+.dc.w $9E80
+.dc.w $9DA0
+.dc.w $9C80
+.dc.w $9B80
+.dc.w $9A60
+.dc.w $9900
+.dc.w $97C0
+.dc.w $9640
+.dc.w $9480
+.dc.w $9300
+.dc.w $9160
+.dc.w $8FA0
+.dc.w $8E00
+.dc.w $8C20
+.dc.w $8A80
+.dc.w $88E0
+.dc.w $87C0
+.dc.w $8660
+.dc.w $8540
+.dc.w $8480
+.dc.w $83E0
+.dc.w $8360
+.dc.w $82E0
+.dc.w $8260
+.dc.w $81E0
+.dc.w $81A0
+.dc.w $8140
+.dc.w $8100
+.dc.w $80C0
+.dc.w $8060
+.dc.w $8040
+.dc.w $8040
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8040
+.dc.w $8040
+.dc.w $8060
+.dc.w $80C0
+.dc.w $8100
+.dc.w $8140
+.dc.w $81C0
+.dc.w $8220
+.dc.w $82C0
+.dc.w $8360
+.dc.w $8420
+.dc.w $84C0
+.dc.w $85A0
+.dc.w $8680
+.dc.w $87A0
+.dc.w $88A0
+.dc.w $89A0
+.dc.w $8AE0
+.dc.w $8C20
+.dc.w $8DA0
+.dc.w $8EE0
+.dc.w $9060
+.dc.w $91C0
+.dc.w $9340
+.dc.w $94E0
+.dc.w $96A0
+.dc.w $9840
+.dc.w $9A00
+.dc.w $9C00
+.dc.w $9DC0
+.dc.w $9FC0
+.dc.w $A1E0
+.dc.w $A3E0
+.dc.w $A620
+.dc.w $A820
+.dc.w $AA60
+.dc.w $ACA0
+.dc.w $AF00
+.dc.w $B140
+.dc.w $B3C0
+.dc.w $B620
+.dc.w $B8A0
+.dc.w $BB20
+.dc.w $BDA0
+.dc.w $C040
+.dc.w $C300
+.dc.w $C5E0
+.dc.w $C920
+.dc.w $CC40
+.dc.w $CFA0
+.dc.w $D300
+.dc.w $D680
+.dc.w $D9E0
+.dc.w $DD40
+.dc.w $E0E0
+.dc.w $E420
+.dc.w $E760
+.dc.w $EAA0
+.dc.w $EDA0
+.dc.w $F0C0
+.dc.w $F360
+.dc.w $F640
+.dc.w $F880
+.dc.w $FB20
+.dc.w $FD20
+.dc.w $FEE0
+.dc.w $A0
+.dc.w $200
+.dc.w $380
+.dc.w $500
+.dc.w $6A0
+.dc.w $820
+.dc.w $9E0
+.dc.w $BC0
+.dc.w $DE0
+.dc.w $1060
+.dc.w $12E0
+.dc.w $1580
+.dc.w $18C0
+.dc.w $1C20
+.dc.w $1FE0
+.dc.w $23C0
+.dc.w $2800
+.dc.w $2C60
+.dc.w $30C0
+.dc.w $3560
+.dc.w $39E0
+.dc.w $3EC0
+.dc.w $4300
+.dc.w $47C0
+.dc.w $4C20
+.dc.w $5040
+.dc.w $5440
+.dc.w $5800
+.dc.w $5BE0
+.dc.w $5F20
+.dc.w $62E0
+.dc.w $6620
+.dc.w $6960
+.dc.w $6C40
+.dc.w $6EE0
+.dc.w $7160
+.dc.w $73A0
+.dc.w $7560
+.dc.w $76C0
+.dc.w $7840
+.dc.w $7960
+.dc.w $7A60
+.dc.w $7A60
+.dc.w $7A40
+.dc.w $7A20
+.dc.w $79E0
+.dc.w $7920
+.dc.w $7860
+.dc.w $7740
+.dc.w $7600
+.dc.w $74E0
+.dc.w $7320
+.dc.w $7180
+.dc.w $6F80
+.dc.w $6E00
+.dc.w $6BE0
+.dc.w $6A20
+.dc.w $6840
+.dc.w $6620
+.dc.w $6420
+.dc.w $6240
+.dc.w $60E0
+.dc.w $5F00
+.dc.w $5DA0
+.dc.w $5C80
+.dc.w $1540
+.dc.w $14E0
+.dc.w $14A0
+.dc.w $1420
+.dc.w $13A0
+.dc.w $1320
+.dc.w $1280
+.dc.w $11A0
+.dc.w $10C0
+.dc.w $FA0
+.dc.w $E60
+.dc.w $D40
+.dc.w $BC0
+.dc.w $A60
+.dc.w $8A0
+.dc.w $700
+.dc.w $540
+.dc.w $380
+.dc.w $1A0
+.dc.w $FFA0
+.dc.w $FDA0
+.dc.w $FBC0
+.dc.w $F9C0
+.dc.w $F780
+.dc.w $F580
+.dc.w $F360
+.dc.w $F180
+.dc.w $EF60
+.dc.w $ED40
+.dc.w $EB80
+.dc.w $E9C0
+.dc.w $E820
+.dc.w $E6C0
+.dc.w $E5A0
+.dc.w $E480
+.dc.w $E380
+.dc.w $E2C0
+.dc.w $E200
+.dc.w $E180
+.dc.w $E120
+.dc.w $E0C0
+.dc.w $E080
+.dc.w $E060
+.dc.w $E060
+.dc.w $E060
+.dc.w $E060
+.dc.w $E060
+.dc.w $E060
+.dc.w $E060
+.dc.w $E080
+.dc.w $E060
+.dc.w $E040
+.dc.w $DFE0
+.dc.w $DFA0
+.dc.w $DF40
+.dc.w $DEE0
+.dc.w $DE40
+.dc.w $DD40
+.dc.w $DC60
+.dc.w $DB60
+.dc.w $DA20
+.dc.w $D8A0
+.dc.w $D720
+.dc.w $D560
+.dc.w $D360
+.dc.w $D140
+.dc.w $CF00
+.dc.w $CCA0
+.dc.w $CA00
+.dc.w $C760
+.dc.w $C4A0
+.dc.w $C1E0
+.dc.w $BF00
+.dc.w $BC40
+.dc.w $B980
+.dc.w $B6A0
+.dc.w $B3C0
+.dc.w $B100
+.dc.w $AE80
+.dc.w $AC20
+.dc.w $AA20
+.dc.w $A820
+.dc.w $A680
+.dc.w $A4E0
+.dc.w $A380
+.dc.w $A220
+.dc.w $A100
+.dc.w $9FC0
+.dc.w $9E80
+.dc.w $9DA0
+.dc.w $9C80
+.dc.w $9B80
+.dc.w $9A60
+.dc.w $9900
+.dc.w $97C0
+.dc.w $9640
+.dc.w $9480
+.dc.w $9300
+.dc.w $9160
+.dc.w $8FA0
+.dc.w $8E00
+.dc.w $8C20
+.dc.w $8A80
+.dc.w $88E0
+.dc.w $87C0
+.dc.w $8660
+.dc.w $8540
+.dc.w $8480
+.dc.w $83E0
+.dc.w $8360
+.dc.w $82E0
+.dc.w $8260
+.dc.w $81E0
+.dc.w $81A0
+.dc.w $8140
+.dc.w $8100
+.dc.w $80C0
+.dc.w $8060
+.dc.w $8040
+.dc.w $8040
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8040
+.dc.w $8040
+.dc.w $8060
+.dc.w $80C0
+.dc.w $8100
+.dc.w $8140
+.dc.w $81C0
+.dc.w $8220
+.dc.w $82C0
+.dc.w $8360
+.dc.w $8420
+.dc.w $84C0
+.dc.w $85A0
+.dc.w $8680
+.dc.w $87A0
+.dc.w $88A0
+.dc.w $89A0
+.dc.w $8AE0
+.dc.w $8C20
+.dc.w $8DA0
+.dc.w $8EE0
+.dc.w $9060
+.dc.w $91C0
+.dc.w $9340
+.dc.w $94E0
+.dc.w $96A0
+.dc.w $9840
+.dc.w $9A00
+.dc.w $9C00
+.dc.w $9DC0
+.dc.w $9FC0
+.dc.w $A1E0
+.dc.w $A3E0
+.dc.w $A620
+.dc.w $A820
+.dc.w $AA60
+.dc.w $ACA0
+.dc.w $AF00
+.dc.w $B140
+.dc.w $B3C0
+.dc.w $B620
+.dc.w $B8A0
+.dc.w $BB20
+.dc.w $BDA0
+.dc.w $C040
+.dc.w $C300
+.dc.w $C5E0
+.dc.w $C920
+.dc.w $CC40
+.dc.w $CFA0
+.dc.w $D300
+.dc.w $D680
+.dc.w $D9E0
+.dc.w $DD40
+.dc.w $E0E0
+.dc.w $E420
+.dc.w $E760
+.dc.w $EAA0
+.dc.w $EDA0
+.dc.w $F0C0
+.dc.w $F360
+.dc.w $F640
+.dc.w $F880
+.dc.w $FB20
+.dc.w $FD20
+.dc.w $FEE0
+.dc.w $A0
+.dc.w $200
+.dc.w $380
+.dc.w $500
+.dc.w $6A0
+.dc.w $820
+.dc.w $9E0
+.dc.w $BC0
+.dc.w $DE0
+.dc.w $1060
+.dc.w $12E0
+.dc.w $1580
+.dc.w $18C0
+.dc.w $1C20
+.dc.w $1FE0
+.dc.w $23C0
+.dc.w $2800
+.dc.w $2C60
+.dc.w $30C0
+.dc.w $3560
+.dc.w $39E0
+.dc.w $3EC0
+.dc.w $4300
+.dc.w $47C0
+.dc.w $4C20
+.dc.w $5040
+.dc.w $5440
+.dc.w $5800
+.dc.w $5BE0
+.dc.w $5F20
+.dc.w $62E0
+.dc.w $6620
+.dc.w $6960
+.dc.w $6C40
+.dc.w $6EE0
+.dc.w $7160
+.dc.w $73A0
+.dc.w $7560
+.dc.w $76C0
+.dc.w $7840
+.dc.w $7960
+.dc.w $7A60
+.dc.w $7A60
+.dc.w $7A40
+.dc.w $7A20
+.dc.w $79E0
+.dc.w $7920
+.dc.w $7860
+.dc.w $7740
+.dc.w $7600
+.dc.w $74E0
+.dc.w $7320
+.dc.w $7180
+.dc.w $6F80
+.dc.w $6E00
+.dc.w $6BE0
+.dc.w $6A20
+.dc.w $6840
+.dc.w $6620
+.dc.w $6420
+.dc.w $6240
+.dc.w $60E0
+.dc.w $5F00
+.dc.w $5DA0
+.dc.w $5C80
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8180
+.dc.w $82E0
+.dc.w $8460
+.dc.w $85C0
+.dc.w $8740
+.dc.w $88A0
+.dc.w $8A20
+.dc.w $8B80
+.dc.w $8CE0
+.dc.w $8E60
+.dc.w $8FC0
+.dc.w $9140
+.dc.w $92A0
+.dc.w $9420
+.dc.w $9580
+.dc.w $96E0
+.dc.w $9860
+.dc.w $99C0
+.dc.w $9B40
+.dc.w $9CA0
+.dc.w $9E20
+.dc.w $9F80
+.dc.w $A0E0
+.dc.w $A260
+.dc.w $A3C0
+.dc.w $A540
+.dc.w $A6A0
+.dc.w $A820
+.dc.w $A980
+.dc.w $AAE0
+.dc.w $AC60
+.dc.w $ADC0
+.dc.w $AF40
+.dc.w $B0A0
+.dc.w $B220
+.dc.w $B380
+.dc.w $B4E0
+.dc.w $B660
+.dc.w $B7C0
+.dc.w $B940
+.dc.w $BAA0
+.dc.w $BC20
+.dc.w $BD80
+.dc.w $BEE0
+.dc.w $C060
+.dc.w $C1C0
+.dc.w $C340
+.dc.w $C4A0
+.dc.w $C620
+.dc.w $C780
+.dc.w $C8E0
+.dc.w $CA60
+.dc.w $CBC0
+.dc.w $CD40
+.dc.w $CEA0
+.dc.w $D020
+.dc.w $D180
+.dc.w $D2E0
+.dc.w $D460
+.dc.w $D5C0
+.dc.w $D740
+.dc.w $D8A0
+.dc.w $DA20
+.dc.w $DB80
+.dc.w $DCE0
+.dc.w $DE60
+.dc.w $DFC0
+.dc.w $E140
+.dc.w $E2A0
+.dc.w $E420
+.dc.w $E580
+.dc.w $E6E0
+.dc.w $E860
+.dc.w $E9C0
+.dc.w $EB40
+.dc.w $ECA0
+.dc.w $EE20
+.dc.w $EF80
+.dc.w $F0E0
+.dc.w $F260
+.dc.w $F3C0
+.dc.w $F540
+.dc.w $F6A0
+.dc.w $F820
+.dc.w $F980
+.dc.w $FAE0
+.dc.w $FC60
+.dc.w $FDC0
+.dc.w $FF40
+.dc.w $A0
+.dc.w $220
+.dc.w $380
+.dc.w $500
+.dc.w $660
+.dc.w $7C0
+.dc.w $940
+.dc.w $AA0
+.dc.w $C20
+.dc.w $D80
+.dc.w $F00
+.dc.w $1060
+.dc.w $11C0
+.dc.w $1340
+.dc.w $14A0
+.dc.w $1620
+.dc.w $1780
+.dc.w $1900
+.dc.w $1A60
+.dc.w $1BC0
+.dc.w $1D40
+.dc.w $1EA0
+.dc.w $2020
+.dc.w $2180
+.dc.w $2300
+.dc.w $2460
+.dc.w $25C0
+.dc.w $2740
+.dc.w $28A0
+.dc.w $2A20
+.dc.w $2B80
+.dc.w $2D00
+.dc.w $2E60
+.dc.w $2FC0
+.dc.w $3140
+.dc.w $32A0
+.dc.w $3420
+.dc.w $3580
+.dc.w $3700
+.dc.w $3860
+.dc.w $39C0
+.dc.w $3B40
+.dc.w $3CA0
+.dc.w $3E20
+.dc.w $3F80
+.dc.w $4100
+.dc.w $4260
+.dc.w $43C0
+.dc.w $4540
+.dc.w $46A0
+.dc.w $4820
+.dc.w $4980
+.dc.w $4B00
+.dc.w $4C60
+.dc.w $4DC0
+.dc.w $4F40
+.dc.w $50A0
+.dc.w $5220
+.dc.w $5380
+.dc.w $5500
+.dc.w $5660
+.dc.w $57C0
+.dc.w $5940
+.dc.w $5AA0
+.dc.w $5C20
+.dc.w $5D80
+.dc.w $5F00
+.dc.w $6060
+.dc.w $61C0
+.dc.w $6340
+.dc.w $64A0
+.dc.w $6620
+.dc.w $6780
+.dc.w $6900
+.dc.w $6A60
+.dc.w $6BC0
+.dc.w $6D40
+.dc.w $6EA0
+.dc.w $7020
+.dc.w $7180
+.dc.w $7300
+.dc.w $7460
+.dc.w $75C0
+.dc.w $7740
+.dc.w $78A0
+.dc.w $7A20
+.dc.w $7B80
+.dc.w $7D00
+.dc.w $7E60
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8020
+.dc.w $8180
+.dc.w $82E0
+.dc.w $8460
+.dc.w $85C0
+.dc.w $8740
+.dc.w $88A0
+.dc.w $8A20
+.dc.w $8B80
+.dc.w $8CE0
+.dc.w $8E60
+.dc.w $8FC0
+.dc.w $9140
+.dc.w $92A0
+.dc.w $9420
+.dc.w $9580
+.dc.w $96E0
+.dc.w $9860
+.dc.w $99C0
+.dc.w $9B40
+.dc.w $9CA0
+.dc.w $9E20
+.dc.w $9F80
+.dc.w $A0E0
+.dc.w $A260
+.dc.w $A3C0
+.dc.w $A540
+.dc.w $A6A0
+.dc.w $A820
+.dc.w $A980
+.dc.w $AAE0
+.dc.w $AC60
+.dc.w $ADC0
+.dc.w $AF40
+.dc.w $B0A0
+.dc.w $B220
+.dc.w $B380
+.dc.w $B4E0
+.dc.w $B660
+.dc.w $B7C0
+.dc.w $B940
+.dc.w $BAA0
+.dc.w $BC20
+.dc.w $BD80
+.dc.w $BEE0
+.dc.w $C060
+.dc.w $C1C0
+.dc.w $C340
+.dc.w $C4A0
+.dc.w $C620
+.dc.w $C780
+.dc.w $C8E0
+.dc.w $CA60
+.dc.w $CBC0
+.dc.w $CD40
+.dc.w $CEA0
+.dc.w $D020
+.dc.w $D180
+.dc.w $D2E0
+.dc.w $D460
+.dc.w $D5C0
+.dc.w $D740
+.dc.w $D8A0
+.dc.w $DA20
+.dc.w $DB80
+.dc.w $DCE0
+.dc.w $DE60
+.dc.w $DFC0
+.dc.w $E140
+.dc.w $E2A0
+.dc.w $E420
+.dc.w $E580
+.dc.w $E6E0
+.dc.w $E860
+.dc.w $E9C0
+.dc.w $EB40
+.dc.w $ECA0
+.dc.w $EE20
+.dc.w $EF80
+.dc.w $F0E0
+.dc.w $F260
+.dc.w $F3C0
+.dc.w $F540
+.dc.w $F6A0
+.dc.w $F820
+.dc.w $F980
+.dc.w $FAE0
+.dc.w $FC60
+.dc.w $FDC0
+.dc.w $FF40
+.dc.w $A0
+.dc.w $220
+.dc.w $380
+.dc.w $500
+.dc.w $660
+.dc.w $7C0
+.dc.w $940
+.dc.w $AA0
+.dc.w $C20
+.dc.w $D80
+.dc.w $F00
+.dc.w $1060
+.dc.w $11C0
+.dc.w $1340
+.dc.w $14A0
+.dc.w $1620
+.dc.w $1780
+.dc.w $1900
+.dc.w $1A60
+.dc.w $1BC0
+.dc.w $1D40
+.dc.w $1EA0
+.dc.w $2020
+.dc.w $2180
+.dc.w $2300
+.dc.w $2460
+.dc.w $25C0
+.dc.w $2740
+.dc.w $28A0
+.dc.w $2A20
+.dc.w $2B80
+.dc.w $2D00
+.dc.w $2E60
+.dc.w $2FC0
+.dc.w $3140
+.dc.w $32A0
+.dc.w $3420
+.dc.w $3580
+.dc.w $3700
+.dc.w $3860
+.dc.w $39C0
+.dc.w $3B40
+.dc.w $3CA0
+.dc.w $3E20
+.dc.w $3F80
+.dc.w $4100
+.dc.w $4260
+.dc.w $43C0
+.dc.w $4540
+.dc.w $46A0
+.dc.w $4820
+.dc.w $4980
+.dc.w $4B00
+.dc.w $4C60
+.dc.w $4DC0
+.dc.w $4F40
+.dc.w $50A0
+.dc.w $5220
+.dc.w $5380
+.dc.w $5500
+.dc.w $5660
+.dc.w $57C0
+.dc.w $5940
+.dc.w $5AA0
+.dc.w $5C20
+.dc.w $5D80
+.dc.w $5F00
+.dc.w $6060
+.dc.w $61C0
+.dc.w $6340
+.dc.w $64A0
+.dc.w $6620
+.dc.w $6780
+.dc.w $6900
+.dc.w $6A60
+.dc.w $6BC0
+.dc.w $6D40
+.dc.w $6EA0
+.dc.w $7020
+.dc.w $7180
+.dc.w $7300
+.dc.w $7460
+.dc.w $75C0
+.dc.w $7740
+.dc.w $78A0
+.dc.w $7A20
+.dc.w $7B80
+.dc.w $7D00
+.dc.w $7E60
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $7FE0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.globl _ptoftab
+.data
+_ptoftab:
+.dc.w $60
+.dc.w $60
+.dc.w $60
+.dc.w $60
+.dc.w $80
+.dc.w $80
+.dc.w $80
+.dc.w $80
+.dc.w $80
+.dc.w $80
+.dc.w $A0
+.dc.w $A0
+.dc.w $A0
+.dc.w $A0
+.dc.w $A0
+.dc.w $C0
+.dc.w $C0
+.dc.w $C0
+.dc.w $C0
+.dc.w $E0
+.dc.w $E0
+.dc.w $E0
+.dc.w $100
+.dc.w $100
+.dc.w $100
+.dc.w $100
+.dc.w $120
+.dc.w $120
+.dc.w $140
+.dc.w $140
+.dc.w $140
+.dc.w $160
+.dc.w $160
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $1A0
+.dc.w $1A0
+.dc.w $1C0
+.dc.w $1E0
+.dc.w $1E0
+.dc.w $200
+.dc.w $200
+.dc.w $220
+.dc.w $240
+.dc.w $240
+.dc.w $260
+.dc.w $280
+.dc.w $2A0
+.dc.w $2A0
+.dc.w $2C0
+.dc.w $2E0
+.dc.w $300
+.dc.w $320
+.dc.w $340
+.dc.w $360
+.dc.w $380
+.dc.w $3A0
+.dc.w $3C0
+.dc.w $3E0
+.dc.w $400
+.dc.w $420
+.dc.w $460
+.dc.w $480
+.dc.w $4A0
+.dc.w $4E0
+.dc.w $500
+.dc.w $540
+.dc.w $560
+.dc.w $5A0
+.dc.w $5E0
+.dc.w $620
+.dc.w $660
+.dc.w $680
+.dc.w $6C0
+.dc.w $700
+.dc.w $760
+.dc.w $7A0
+.dc.w $7E0
+.dc.w $840
+.dc.w $880
+.dc.w $8E0
+.dc.w $920
+.dc.w $980
+.dc.w $9E0
+.dc.w $A40
+.dc.w $AA0
+.dc.w $B00
+.dc.w $B80
+.dc.w $BE0
+.dc.w $C60
+.dc.w $CC0
+.dc.w $D40
+.dc.w $DC0
+.dc.w $E60
+.dc.w $EE0
+.dc.w $F60
+.dc.w $1000
+.dc.w $10A0
+.dc.w $1140
+.dc.w $11E0
+.dc.w $1280
+.dc.w $1340
+.dc.w $1400
+.dc.w $14C0
+.dc.w $1580
+.dc.w $1660
+.dc.w $1720
+.dc.w $1800
+.dc.w $1900
+.dc.w $19E0
+.dc.w $1AE0
+.dc.w $1BE0
+.dc.w $1D00
+.dc.w $1E00
+.dc.w $1F40
+.dc.w $2060
+.dc.w $21A0
+.dc.w $22E0
+.dc.w $2420
+.dc.w $2580
+.dc.w $2700
+.dc.w $2860
+.dc.w $2A00
+.dc.w $2B80
+.dc.w $2D20
+.dc.w $2EE0
+.dc.w $30A0
+.dc.w $3280
+.dc.w $3460
+.dc.w $3660
+.dc.w $3860
+.dc.w $3A80
+.dc.w $3CC0
+.dc.w $3F00
+.dc.w $4160
+.dc.w $43E0
+.dc.w $4660
+.dc.w $4920
+.dc.w $4BE0
+.dc.w $4EA0
+.dc.w $51A0
+.dc.w $54C0
+.dc.w $57E0
+.dc.w $5B40
+.dc.w $5EA0
+.dc.w $6240
+.dc.w $6600
+.dc.w $69C0
+.dc.w $6DC0
+.dc.w $71E0
+.dc.w $7640
+.dc.w $7AA0
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.dc.w $7D00
+.globl _finival
+.data
+_finival:
+.dc.w $3E80
+.dc.w $3E80
+.dc.w $3E80
+.dc.w $3E80
+.dc.w $3E80
+.dc.w $3E80
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.globl _expbit
+.data
+_expbit:
+.dc.w $1
+.dc.w $2
+.dc.w $4
+.dc.w $8
+.dc.w $10
+.dc.w $20
+.dc.w $40
+.dc.w $80
+.dc.w $100
+.dc.w $200
+.dc.w $400
+.dc.w $800
+.dc.w $1000
+.dc.w $2000
+.dc.w $4000
+.dc.w $8000
+.globl _segtime
+.text
+_segtime:
+~~segtime:
+~pn=8
+~ptime=10
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~pp=R13
+~i=R7
+~tacc=R6
+*line 114
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+move _curvce,R0
+muls #3938,R0
+move _curfunc,R1
+muls #12,R1
+add.l R1,R0
+move.l R0,R8
+move.l #_vbufs,R9
+move.b 92(R8,R9.l),R0
+ext.w R0
+muls #12,R0
+add.l R0,R13
+add.l #_vbufs,R13
+add.l #242,R13
+*line 115
+clr R6
+*line 117
+clr R7
+bra L4
+L5:
+*line 118
+move.l R13,R8
+move (R8),(sp)
+jsr _fromfpu
+add R0,R6
+add.l #12,R13
+L3:
+*line 117
+add #1,R7
+L4:
+*line 117
+cmp 8(R14),R7
+blt L5
+L2:
+*line 120
+move 10(R14),(sp)
+jsr _fromfpu
+add R0,R6
+*line 122
+clr R0
+move R6,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.globl _setseg
+.text
+_setseg:
+~~setseg:
+~pn=8
+~ptime=10
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~i=R7
+~tacc=R6
+~pp=R13
+*line 139
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+move _curvce,R0
+muls #3938,R0
+move _curfunc,R1
+muls #12,R1
+add.l R1,R0
+move.l R0,R8
+move.l #_vbufs,R9
+move.b 92(R8,R9.l),R0
+ext.w R0
+muls #12,R0
+add.l R0,R13
+add.l #_vbufs,R13
+add.l #242,R13
+*line 140
+clr R6
+*line 142
+clr R7
+bra L9
+L10:
+*line 143
+move.l R13,R8
+move (R8),(sp)
+jsr _fromfpu
+add R0,R6
+add.l #12,R13
+L8:
+*line 142
+add #1,R7
+L9:
+*line 142
+cmp 8(R14),R7
+blt L10
+L7:
+*line 145
+move 10(R14),(sp)
+clr R0
+move R6,R0
+sub R0,(sp)
+jsr _tofpu
+move R0,(R13)
+L6:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.globl _timeto
+.text
+_timeto:
+~~timeto:
+~fn=8
+~pj=10
+link R14,#0
+movem.l R4-R7/R12-R13,-(sp)
+~ip=R13
+~pt=R12
+~tf=R7
+~pm=R6
+~pn=R5
+*line 165
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 166
+move 8(R14),R0
+muls #12,R0
+move.b 92(R13,R0.l),R0
+ext.w R0
+move R0,R5
+*line 167
+move.l R13,R12
+move R5,R0
+muls #12,R0
+add.l R0,R12
+add.l #242,R12
+*line 168
+move R5,R6
+add 10(R14),R6
+*line 169
+clr R7
+*line 171
+bra L14
+L13:
+*line 172
+*line 173
+move (R12),(sp)
+jsr _fromfpu
+add R0,R7
+*line 174
+add.l #12,R12
+*line 175
+add #1,R5
+L14:
+*line 176
+cmp R6,R5
+ble L13
+L12:
+*line 178
+move R7,R0
+bra L11
+L11:tst.l (sp)+
+movem.l (sp)+,R5-R7/R12-R13
+unlk R14
+rts
+.globl _pntsel
+.text
+_pntsel:
+~~pntsel:
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+~fp=R13
+*line 194
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+move _curfunc,R0
+muls #12,R0
+add.l R0,R13
+add.l #_vbufs,R13
+add.l #86,R13
+*line 196
+move.b 6(R13),R0
+ext.w R0
+add _subj,R0
+move R0,_curpnt
+*line 197
+move _curvce,R0
+muls #3938,R0
+move _curpnt,R1
+muls #12,R1
+add.l R1,R0
+add.l #_vbufs,R0
+add.l #242,R0
+move.l R0,_pntptr
+*line 199
+move.b 5(R13),R0
+ext.w R0
+move R0,_npts
+*line 201
+*line 201
+cmp #1,_npts
+bne L16
+*line 202
+*line 203
+clr _pecase
+*line 204
+move #1,_temin
+*line 205
+move #32767,_temax
+*line 206
+bra L17
+L16:
+*line 207
+*line 207
+move _npts,R0
+sub #1,R0
+cmp _subj,R0
+bne L18
+*line 208
+*line 209
+move #1,_pecase
+*line 210
+move _subj,(sp)
+sub #1,(sp)
+move _curfunc,-(sp)
+jsr _timeto
+addq.l #2,sp
+move R0,_temin
+*line 211
+move #32767,_temax
+*line 212
+bra L19
+L18:
+*line 213
+*line 214
+*line 215
+move #2,_pecase
+*line 216
+move _subj,(sp)
+sub #1,(sp)
+move _curfunc,-(sp)
+jsr _timeto
+addq.l #2,sp
+move R0,_temin
+*line 217
+move _subj,(sp)
+add #1,(sp)
+move _curfunc,-(sp)
+jsr _timeto
+addq.l #2,sp
+move R0,_temax
+L19:L17:L15:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _vtoy
+.text
+_vtoy:
+~~vtoy:
+~val=8
+~window=10
+link R14,#0
+movem.l R6-R7,-(sp)
+~yval=R7
+*line 243
+*line 244
+cmp #1000,8(R14)
+ble L21
+*line 244
+move #1000,8(R14)
+*line 245
+L21:
+*line 246
+move #1000,R7
+sub 8(R14),R7
+muls #14,R7
+ext.l R7
+divs #100,R7
+add #56,R7
+*line 248
+*line 249
+cmp #12,10(R14)
+bge L22
+*line 249
+move.l #$21c,-(sp)
+move R7,R0
+add #-56,R0
+muls #100,R0
+move.l R0,-(sp)
+jsr ldiv
+addq.l #8,sp
+move 10(R14),R1
+asl #4,R1
+ext.l R1
+add.l #_idbox,R1
+move.l R1,R9
+move 2(R9),R1
+ext.l R1
+add.l R1,R0
+bra L20
+*line 250
+bra L23
+L22:
+*line 251
+move R7,R0
+bra L20
+L23:L20:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _ttox
+.text
+_ttox:
+~~ttox:
+~time=8
+~window=10
+link R14,#0
+movem.l R6-R7,-(sp)
+~xval=R7
+*line 270
+*line 271
+cmp #128,8(R14)
+bcc L25
+*line 271
+move.l #$905,-(sp)
+move.l #$3e8,-(sp)
+clr.l R0
+move 8(R14),R0
+move.l R0,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,-(sp)
+jsr ldiv
+addq.l #8,sp
+move R0,R7
+add #8,R7
+bra L26
+L25:
+*line 272
+*line 273
+cmp #256,8(R14)
+bcc L27
+*line 273
+move.l #$905,-(sp)
+move.l #$3e8,-(sp)
+clr R0
+move 8(R14),R0
+add #-128,R0
+swap R0
+clr R0
+swap R0
+move.l R0,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,-(sp)
+jsr ldiv
+addq.l #8,sp
+move R0,R7
+add #64,R7
+bra L28
+L27:
+*line 274
+*line 275
+cmp #512,8(R14)
+bcc L29
+*line 275
+move.l #$121c,-(sp)
+move.l #$3e8,-(sp)
+clr R0
+move 8(R14),R0
+add #-256,R0
+swap R0
+clr R0
+swap R0
+move.l R0,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,-(sp)
+jsr ldiv
+addq.l #8,sp
+move R0,R7
+add #120,R7
+bra L30
+L29:
+*line 276
+*line 277
+cmp #1024,8(R14)
+bcc L31
+*line 277
+move.l #$244a,-(sp)
+move.l #$3e8,-(sp)
+clr R0
+move 8(R14),R0
+add #-512,R0
+swap R0
+clr R0
+swap R0
+move.l R0,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,-(sp)
+jsr ldiv
+addq.l #8,sp
+move R0,R7
+add #176,R7
+bra L32
+L31:
+*line 278
+*line 279
+cmp #2048,8(R14)
+bcc L33
+*line 279
+move.l #$48a8,-(sp)
+move.l #$3e8,-(sp)
+clr R0
+move 8(R14),R0
+add #-1024,R0
+swap R0
+clr R0
+swap R0
+move.l R0,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,-(sp)
+jsr ldiv
+addq.l #8,sp
+move R0,R7
+add #232,R7
+bra L34
+L33:
+*line 280
+*line 281
+cmp #4096,8(R14)
+bcc L35
+*line 281
+move.l #$9162,-(sp)
+move.l #$3e8,-(sp)
+clr R0
+move 8(R14),R0
+add #-2048,R0
+swap R0
+clr R0
+swap R0
+move.l R0,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,-(sp)
+jsr ldiv
+addq.l #8,sp
+move R0,R7
+add #288,R7
+bra L36
+L35:
+*line 282
+*line 283
+cmp #8192,8(R14)
+bcc L37
+*line 283
+move.l #$122d6,-(sp)
+move.l #$3e8,-(sp)
+clr R0
+move 8(R14),R0
+add #-4096,R0
+swap R0
+clr R0
+swap R0
+move.l R0,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,-(sp)
+jsr ldiv
+addq.l #8,sp
+move R0,R7
+add #344,R7
+bra L38
+L37:
+*line 284
+*line 285
+cmp #16384,8(R14)
+bcc L39
+*line 285
+move.l #$245bf,-(sp)
+move.l #$3e8,-(sp)
+clr R0
+move 8(R14),R0
+add #-8192,R0
+swap R0
+clr R0
+swap R0
+move.l R0,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,-(sp)
+jsr ldiv
+addq.l #8,sp
+move R0,R7
+add #400,R7
+bra L40
+L39:
+*line 286
+*line 287
+cmp #-32768,8(R14)
+bcc L41
+*line 287
+move.l #$4b779,-(sp)
+move.l #$3e8,-(sp)
+clr R0
+move 8(R14),R0
+add #-16384,R0
+swap R0
+clr R0
+swap R0
+move.l R0,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,-(sp)
+jsr ldiv
+addq.l #8,sp
+move R0,R7
+add #456,R7
+*line 288
+bra L42
+L41:
+*line 289
+move #509,R7
+L42:L40:L38:L36:L34:L32:L30:L28:L26:
+*line 291
+*line 292
+cmp #509,R7
+ble L43
+*line 292
+move #509,R7
+*line 293
+L43:
+*line 294
+*line 295
+cmp #12,10(R14)
+bge L44
+*line 295
+move.l #$257,-(sp)
+move R7,R0
+sub #8,R0
+muls #100,R0
+move.l R0,-(sp)
+jsr ldiv
+addq.l #8,sp
+move 10(R14),R1
+asl #4,R1
+ext.l R1
+add.l #_idbox,R1
+move.l R1,R9
+move (R9),R1
+ext.l R1
+add.l R1,R0
+bra L24
+*line 296
+bra L45
+L44:
+*line 297
+move R7,R0
+bra L24
+L45:L24:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _selpnt
+.text
+_selpnt:
+~~selpnt:
+link R14,#-8
+movem.l R4-R7/R13-R13,-(sp)
+~fp=R13
+~i=R7
+~xv=R6
+~np=R5
+~lo_x=-2
+~lo_x_pt=-4
+~hi_x=-6
+~hi_x_pt=-8
+*line 318
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+move _curfunc,R0
+muls #12,R0
+add.l R0,R13
+add.l #_vbufs,R13
+add.l #86,R13
+*line 319
+move.b 5(R13),R5
+ext.w R5
+*line 320
+clr -4(R14)
+*line 321
+move #12,(sp)
+move -4(R14),-(sp)
+move _curfunc,-(sp)
+jsr _timeto
+addq.l #4,sp
+move R0,-(sp)
+jsr _ttox
+addq.l #2,sp
+move R0,-2(R14)
+*line 322
+move R5,R0
+sub #1,R0
+move R0,-8(R14)
+*line 323
+move #12,(sp)
+move -8(R14),-(sp)
+move _curfunc,-(sp)
+jsr _timeto
+addq.l #4,sp
+move R0,-(sp)
+jsr _ttox
+addq.l #2,sp
+move R0,-6(R14)
+*line 325
+clr R7
+bra L49
+L50:
+*line 326
+*line 327
+move #12,(sp)
+move R7,-(sp)
+move _curfunc,-(sp)
+jsr _timeto
+addq.l #4,sp
+move R0,-(sp)
+jsr _ttox
+addq.l #2,sp
+move R0,R6
+*line 328
+*line 329
+*line 330
+cmp _cxval,R6
+bgt L51
+*line 330
+*line 330
+cmp -2(R14),R6
+blt L52
+*line 331
+*line 332
+move R6,-2(R14)
+*line 333
+move R7,-4(R14)
+*line 334
+*line 335
+L52:L51:
+*line 336
+*line 337
+cmp _cxval,R6
+blt L53
+*line 337
+*line 337
+cmp -6(R14),R6
+bge L54
+*line 338
+*line 339
+move R6,-6(R14)
+*line 340
+move R7,-8(R14)
+*line 341
+L54:L53:L48:
+*line 325
+add #1,R7
+L49:
+*line 325
+cmp R5,R7
+blt L50
+L47:
+*line 344
+*line 345
+move -2(R14),R0
+cmp -6(R14),R0
+bne L55
+*line 345
+move -4(R14),R0
+bra L46
+*line 346
+L55:
+*line 347
+*line 348
+move _cxval,R0
+sub -2(R14),R0
+move -6(R14),R1
+sub _cxval,R1
+cmp R1,R0
+bge L56
+*line 348
+move -4(R14),R0
+bra L46
+*line 349
+bra L57
+L56:
+*line 350
+move -8(R14),R0
+bra L46
+L57:L46:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.globl _setinst
+.text
+_setinst:
+~~setinst:
+link R14,#0
+movem.l R7-R7/R12-R13,-(sp)
+~ip=R13
+~fp=R12
+*line 367
+move #12,_curfunc
+*line 368
+clr _subj
+*line 369
+clr _pntsv
+*line 370
+clr _pecase
+*line 372
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 373
+move.l R13,R12
+move _curfunc,R0
+muls #12,R0
+add.l R0,R12
+add.l #86,R12
+*line 375
+move.b 6(R12),R0
+ext.w R0
+add _subj,R0
+move R0,_curpnt
+*line 376
+move.l R13,R0
+move _curpnt,R1
+muls #12,R1
+add.l R1,R0
+add.l #242,R0
+move.l R0,_pntptr
+*line 378
+jsr _newws
+L58:tst.l (sp)+
+movem.l (sp)+,R12-R13
+unlk R14
+rts
+.globl _newinst
+.text
+_newinst:
+~~newinst:
+~inst=8
+link R14,#-4
+*line 393
+move 8(R14),_curinst
+*line 394
+move _curvce,R8
+add.l R8,R8
+add.l #_s_inst,R8
+move 8(R14),(R8)
+*line 395
+jsr _setinst
+L59:unlk R14
+rts
+.globl _newvce
+.text
+_newvce:
+~~newvce:
+~voice=8
+link R14,#-4
+*line 407
+move 8(R14),_curvce
+*line 408
+move _curvce,R8
+add.l R8,R8
+add.l #_s_inst,R8
+move (R8),_curinst
+*line 409
+jsr _setinst
+L60:unlk R14
+rts
+.globl _setivce
+.text
+_setivce:
+~~setivce:
+~voice=8
+link R14,#0
+movem.l R3-R7/R13-R13,-(sp)
+~i=R7
+~j=R6
+~k=R5
+~oldi=R4
+~ip=R13
+*line 427
+move 8(R14),R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 429
+move #2,(sp)
+jsr _setipl
+move R0,R4
+*line 433
+clr R6
+bra L64
+L65:
+*line 434
+*line 435
+move 8(R14),R5
+asl #4,R5
+move R6,R8
+add.l R8,R8
+add.l #_fnoff,R8
+move (R8),R0
+add R0,R5
+*line 436
+move.l R13,R0
+move R6,R1
+muls #12,R1
+add.l R1,R0
+add.l #86,R0
+move R5,R1
+asl #3,R1
+ext.l R1
+add.l #_funcndx,R1
+move.l R1,R9
+move.l R0,(R9)
+*line 437
+move R5,R1
+asl #3,R1
+ext.l R1
+add.l #_funcndx,R1
+move.l R1,R9
+lea 242(R13),R8
+move.l R8,4(R9)
+L63:
+*line 433
+add #1,R6
+L64:
+*line 433
+cmp #13,R6
+blt L65
+L62:
+*line 442
+*line 443
+move #254,(sp)
+move.l R13,-(sp)
+add.l #1778,(sp)
+move 8(R14),R0
+move #9,R1
+asl R1,R0
+asl #1,R0
+ext.l R0
+add.l #_io_fpu,R0
+move.l R0,-(sp)
+add.l #$202,(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 445
+*line 446
+move #254,(sp)
+move.l R13,-(sp)
+add.l #2858,(sp)
+move 8(R14),R0
+move #9,R1
+asl R1,R0
+asl #1,R0
+ext.l R0
+add.l #_io_fpu,R0
+move.l R0,-(sp)
+add.l #$2,(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 448
+move R4,(sp)
+jsr _setipl
+*line 452
+move 8(R14),R8
+add.l R8,R8
+add.l #_instmod,R8
+clr (R8)
+L61:tst.l (sp)+
+movem.l (sp)+,R4-R7/R13-R13
+unlk R14
+rts
+.globl _modinst
+.text
+_modinst:
+~~modinst:
+link R14,#-12
+~f=-2
+~i=-4
+~grp=-6
+~oldi=-8
+*line 468
+*line 468
+move _curvce,R8
+add.l R8,R8
+move.l #_instmod,R9
+tst 0(R8,R9.l)
+bne L67
+*line 469
+*line 470
+move _curvce,R8
+add.l R8,R8
+add.l #_instmod,R8
+move #1,(R8)
+*line 471
+move #19,(sp)
+jsr _dswin
+*line 472
+*line 473
+L67:
+*line 474
+*line 474
+tst _editsw
+bne L68
+*line 475
+*line 476
+*line 476
+move _curvce,R8
+add.l R8,R8
+add.l #_vce2grp,R8
+move (R8),-6(R14)
+ble L69
+*line 477
+*line 478
+move #2,(sp)
+jsr _setipl
+move R0,-8(R14)
+*line 479
+*line 480
+clr -4(R14)
+bra L72
+L73:
+*line 481
+*line 482
+*line 482
+move -4(R14),R8
+add.l R8,R8
+move.l #_vce2grp,R9
+move 0(R8,R9.l),R0
+cmp -6(R14),R0
+bne L74
+*line 483
+*line 484
+*line 485
+move #1969,(sp)
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,-(sp)
+move -4(R14),R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 486
+*line 487
+clr -2(R14)
+bra L77
+L78:
+*line 488
+*line 489
+move -4(R14),R0
+muls #3938,R0
+move -2(R14),R1
+muls #12,R1
+add.l R1,R0
+add.l #_vbufs,R0
+move.l R0,R8
+and.b #-3,93(R8)
+L76:
+*line 487
+add #1,-2(R14)
+L77:
+*line 487
+cmp #12,-2(R14)
+blt L78
+L75:
+*line 489
+*line 490
+*line 491
+move -4(R14),R8
+add.l R8,R8
+add.l #_s_inst,R8
+move _curinst,(R8)
+*line 492
+move -4(R14),(sp)
+jsr _clrvce
+*line 493
+move -4(R14),(sp)
+jsr _setivce
+*line 494
+move -4(R14),(sp)
+jsr _dosync
+*line 495
+move #1,(sp)
+move -4(R14),-(sp)
+clr -(sp)
+clr -(sp)
+jsr _execkey
+addq.l #6,sp
+*line 496
+move -4(R14),R8
+add.l R8,R8
+add.l #_vce2trg,R8
+move #-1,(R8)
+*line 497
+L74:L71:
+*line 480
+add #1,-4(R14)
+L72:
+*line 480
+cmp #12,-4(R14)
+blt L73
+L70:
+*line 498
+*line 499
+*line 500
+move -8(R14),(sp)
+jsr _setipl
+*line 501
+L69:
+*line 502
+L68:L66:unlk R14
+rts
+.globl _initi
+.text
+_initi:
+~~initi:
+~ip=R13
+link R14,#0
+movem.l R4-R7/R13-R13,-(sp)
+~i=R7
+~mintfpu=R6
+~rb=R5
+*line 519
+move.l 8(R14),R13
+*line 519
+move #1969,(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 521
+move #17,(sp)
+move.l #L80,-(sp)
+move.l R13,-(sp)
+add.l #2,(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 522
+move #17,(sp)
+move.l #L81,-(sp)
+move.l R13,-(sp)
+add.l #19,(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 523
+move #17,(sp)
+move.l #L82,-(sp)
+move.l R13,-(sp)
+add.l #36,(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 524
+move #17,(sp)
+move.l #L83,-(sp)
+move.l R13,-(sp)
+add.l #53,(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 526
+move.b #115,71(R13)
+*line 527
+move _initcfg,R0
+asr #8,R0
+and #255,R0
+move.b R0,70(R13)
+*line 528
+move #1,(sp)
+jsr _tofpu
+move R0,R6
+*line 530
+clr R7
+bra L86
+L87:
+*line 531
+*line 532
+*line 533
+*line 534
+cmp #4,R7
+bge L10000
+tst R7
+beq L10000
+clr R0
+bra L10002
+L10000:move #4,R0
+L10002:move R0,R5
+*line 535
+move.l R13,R8
+move R7,R1
+muls #12,R1
+add.l R1,R8
+move.b #1,91(R8)
+*line 536
+move R7,R0
+move.l R13,R9
+move R7,R2
+muls #12,R2
+add.l R2,R9
+move.b R0,92(R9)
+*line 537
+move R5,R0
+or #17,R0
+move.l R13,R9
+move R7,R2
+muls #12,R2
+add.l R2,R9
+move.b R0,93(R9)
+*line 538
+*line 539
+*line 540
+*line 541
+move.l R13,R8
+move R7,R1
+muls #12,R1
+add.l R1,R8
+move R6,242(R8)
+*line 542
+move.l R13,R8
+move R7,R1
+muls #12,R1
+add.l R1,R8
+move R7,R9
+add.l R9,R9
+add.l #_finival,R9
+move (R9),244(R8)
+L85:
+*line 530
+add #1,R7
+L86:
+*line 530
+cmp #13,R7
+blt L87
+L84:
+*line 545
+clr R7
+bra L90
+L91:
+*line 546
+*line 547
+move R7,R0
+add #1,R0
+asl #8,R0
+move #-32768,R1
+eor R1,R0
+move.l R13,R9
+move R7,R10
+add.l R10,R10
+add.l R10,R9
+move R0,2286(R9)
+move.l R13,R9
+move R7,R10
+add.l R10,R10
+add.l R10,R9
+move R0,1778(R9)
+*line 548
+move R7,R0
+add #1,R0
+asl #8,R0
+move #-32768,R1
+eor R1,R0
+move.l R13,R9
+move R7,R10
+add.l R10,R10
+add.l R10,R9
+move R0,3366(R9)
+move.l R13,R9
+move R7,R10
+add.l R10,R10
+add.l R10,R9
+move R0,2858(R9)
+L89:
+*line 545
+add #1,R7
+L90:
+*line 545
+cmp #254,R7
+blt L91
+L88:L79:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.globl _initil
+.text
+_initil:
+~~initil:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 565
+move #2,(sp)
+jsr _setipl
+*line 569
+jsr _fpuclr
+*line 571
+move #1969,(sp)
+move.l #_dfltins,-(sp)
+move.l #_idefs,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 573
+move #1,R7
+bra L95
+L96:
+*line 574
+move R7,R0
+muls #3938,R0
+add.l #_idefs,R0
+move.l R0,(sp)
+jsr _initi
+L94:
+*line 573
+add #1,R7
+L95:
+*line 573
+cmp #41,R7
+blt L96
+L93:
+*line 576
+move #2048,(sp)
+clr -(sp)
+move.l #_funcndx,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 578
+clr R7
+bra L99
+L100:
+*line 579
+*line 580
+move #1969,(sp)
+move.l #_idefs,-(sp)
+move R7,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 581
+move R7,(sp)
+jsr _setivce
+L98:
+*line 578
+add #1,R7
+L99:
+*line 578
+cmp #12,R7
+blt L100
+L97:
+*line 584
+move #1,(sp)
+jsr _setipl
+*line 588
+clr (sp)
+jsr _newvce
+*line 589
+clr (sp)
+jsr _newinst
+L92:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.data
+L80:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$0
+L81:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$0
+L82:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$0
+L83:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$0
Index: alcyon/instdsp.s
===================================================================
--- alcyon/instdsp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/instdsp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,3017 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _point
+.globl _cxval
+.globl _cyval
+.globl _stcrow
+.globl _stccol
+.globl _initcfg
+.globl _curslim
+.globl _idimsw
+.globl _obj0
+.globl _obj2
+.globl _bfs
+.globl _srctbl
+.globl _sfdsp
+.globl _vtlin1
+.globl _vtlin2
+.globl _vtlin3
+.globl _sments
+.globl _valents
+.globl _vpsms
+.globl _s_inst
+.globl _vce2trg
+.globl _vce2grp
+.globl _curfunc
+.globl _curinst
+.globl _curpnt
+.globl _curvce
+.globl _idcfsw
+.globl _idintmp
+.globl _idnamsw
+.globl _idsrcsw
+.globl _npts
+.globl _pecase
+.globl _pntsv
+.globl _subj
+.globl _submenu
+.globl _temax
+.globl _temin
+.globl _vlbtype
+.globl _wcflag
+.globl _wcpage
+.globl _instmod
+.globl _instob
+.globl _idoct
+.globl _pntptr
+.globl _idefs
+.globl _vbufs
+.globl _funcndx
+.globl _vlbptr
+.globl _idbuf
+.globl _idbox
+.data
+_idbox:
+.dc.w $1
+.dc.w $1
+.dc.w $54
+.dc.w $1A
+.dc.w $B
+.dc.w $5
+.dc.w $0
+.dc.w $1
+.dc.w $56
+.dc.w $1
+.dc.w $A9
+.dc.w $1A
+.dc.w $B
+.dc.w $5
+.dc.w $0
+.dc.w $B
+.dc.w $AB
+.dc.w $1
+.dc.w $FE
+.dc.w $1A
+.dc.w $B
+.dc.w $5
+.dc.w $0
+.dc.w $16
+.dc.w $100
+.dc.w $1
+.dc.w $153
+.dc.w $1A
+.dc.w $B
+.dc.w $5
+.dc.w $0
+.dc.w $21
+.dc.w $155
+.dc.w $1
+.dc.w $1A8
+.dc.w $1A
+.dc.w $B
+.dc.w $5
+.dc.w $0
+.dc.w $2C
+.dc.w $1AA
+.dc.w $1
+.dc.w $1FD
+.dc.w $1A
+.dc.w $B
+.dc.w $5
+.dc.w $0
+.dc.w $36
+.dc.w $1
+.dc.w $1D
+.dc.w $54
+.dc.w $36
+.dc.w $B
+.dc.w $7
+.dc.w $2
+.dc.w $1
+.dc.w $56
+.dc.w $1D
+.dc.w $A9
+.dc.w $36
+.dc.w $B
+.dc.w $7
+.dc.w $2
+.dc.w $B
+.dc.w $AB
+.dc.w $1D
+.dc.w $FE
+.dc.w $36
+.dc.w $B
+.dc.w $7
+.dc.w $2
+.dc.w $16
+.dc.w $100
+.dc.w $1D
+.dc.w $153
+.dc.w $36
+.dc.w $B
+.dc.w $7
+.dc.w $2
+.dc.w $21
+.dc.w $155
+.dc.w $1D
+.dc.w $1A8
+.dc.w $36
+.dc.w $B
+.dc.w $7
+.dc.w $2
+.dc.w $2C
+.dc.w $1AA
+.dc.w $1D
+.dc.w $1FD
+.dc.w $36
+.dc.w $B
+.dc.w $7
+.dc.w $2
+.dc.w $36
+.dc.w $1
+.dc.w $38
+.dc.w $1FD
+.dc.w $D0
+.dc.w $B
+.dc.w $6
+.dc.w $4
+.dc.w $36
+.dc.w $1
+.dc.w $D2
+.dc.w $6E
+.dc.w $EC
+.dc.w $B
+.dc.w $7
+.dc.w $F
+.dc.w $1
+.dc.w $70
+.dc.w $D2
+.dc.w $8E
+.dc.w $EC
+.dc.w $B
+.dc.w $7
+.dc.w $F
+.dc.w $F
+.dc.w $90
+.dc.w $D2
+.dc.w $CE
+.dc.w $EC
+.dc.w $B
+.dc.w $7
+.dc.w $F
+.dc.w $13
+.dc.w $D0
+.dc.w $D2
+.dc.w $16E
+.dc.w $EC
+.dc.w $B
+.dc.w $7
+.dc.w $F
+.dc.w $1B
+.dc.w $170
+.dc.w $D2
+.dc.w $1FD
+.dc.w $EC
+.dc.w $B
+.dc.w $7
+.dc.w $F
+.dc.w $2F
+.dc.w $1
+.dc.w $EE
+.dc.w $83
+.dc.w $15C
+.dc.w $B
+.dc.w $5
+.dc.w $11
+.dc.w $2
+.dc.w $85
+.dc.w $EE
+.dc.w $10B
+.dc.w $FB
+.dc.w $B
+.dc.w $6
+.dc.w $11
+.dc.w $11
+.dc.w $10D
+.dc.w $EE
+.dc.w $17B
+.dc.w $132
+.dc.w $B
+.dc.w $6
+.dc.w $11
+.dc.w $23
+.dc.w $17D
+.dc.w $EE
+.dc.w $1FD
+.dc.w $15C
+.dc.w $B
+.dc.w $5
+.dc.w $11
+.dc.w $30
+.dc.w $85
+.dc.w $134
+.dc.w $17B
+.dc.w $15C
+.dc.w $B
+.dc.w $7
+.dc.w $16
+.dc.w $11
+.dc.w $85
+.dc.w $FC
+.dc.w $10B
+.dc.w $132
+.dc.w $B
+.dc.w $6
+.dc.w $12
+.dc.w $11
+.globl _fnoff
+.data
+_fnoff:
+.dc.w $1
+.dc.w $3
+.dc.w $5
+.dc.w $7
+.dc.w $A
+.dc.w $4
+.dc.w $9
+.dc.w $B
+.dc.w $C
+.dc.w $D
+.dc.w $E
+.dc.w $F
+.dc.w $2
+.globl _inspal
+.data
+_inspal:
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $3
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3
+.dc.w $2
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $0
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $0
+.dc.w $1
+.dc.w $3
+.dc.w $2
+.dc.w $0
+.dc.w $1
+.dc.w $1
+.dc.w $2
+.dc.w $2
+.dc.w $3
+.dc.w $0
+.dc.w $2
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $0
+.dc.w $2
+.dc.w $0
+.dc.w $2
+.dc.w $3
+.dc.w $0
+.dc.w $3
+.dc.w $0
+.dc.w $3
+.dc.w $3
+.dc.w $0
+.globl _idbxlbl
+.data
+_idbxlbl:
+*line 180
+.dc.l L1
+*line 181
+.dc.l L2
+*line 182
+.dc.l L3
+*line 183
+.dc.l L4
+*line 184
+.dc.l L5
+*line 185
+.dc.l L6
+*line 186
+.dc.l L7
+*line 187
+.dc.l L8
+*line 188
+.dc.l L9
+*line 189
+.dc.l L10
+*line 190
+.dc.l L11
+*line 191
+.dc.l L12
+*line 192
+.dc.l L13
+*line 193
+.dc.l L14
+*line 194
+.dc.l L15
+*line 195
+.dc.l L16
+*line 196
+.dc.l L17
+*line 197
+.dc.l L18
+*line 198
+.dc.l L19
+*line 199
+.dc.l L20
+*line 200
+.dc.l L21
+*line 201
+.dc.l L22
+*line 202
+.dc.l L23
+*line 204
+.dc.l L24
+.globl _idhlbl
+.data
+_idhlbl:
+.dc.b $20,$20,$20,$20,$20,$20,$20,$D4,$C2,$20,$20,$20,$20,$20,$D5,$C5,$20,$20,$20,$20,$20,$D6,$20,$20,$20,$20,$20,$20,$C1,$20
+.dc.b $20,$20,$20,$20,$20,$C2,$20,$20,$20,$20,$20,$20,$C4,$20,$20,$20,$20,$20,$20,$C8,$20,$20,$20,$20,$20,$D1,$C6,$20,$20,$20
+.dc.b $20,$D3,$C2,$0
+.globl _osclbl
+.data
+_osclbl:
+*line 213
+.dc.l L26
+*line 214
+.dc.l L27
+*line 215
+.dc.l L28
+*line 217
+.dc.l L29
+.globl _rngdiv
+.data
+_rngdiv:
+.dc.l $FFFFFF
+.dc.l $7FFFFF
+.dc.l $555555
+.dc.l $3FFFFF
+.dc.l $333333
+.dc.l $2AAAAA
+.dc.l $249249
+.dc.l $1FFFFF
+.dc.l $1C71C7
+.dc.l $199999
+.globl _drawpt
+.text
+_drawpt:
+~~drawpt:
+~px=8
+~py=10
+~pc=12
+link R14,#0
+movem.l R6-R7,-(sp)
+~tmp=R7
+*line 250
+move 8(R14),R7
+sub #1,R7
+*line 252
+*line 253
+cmp #7,R7
+ble L31
+*line 253
+move 12(R14),(sp)
+move 10(R14),-(sp)
+move R7,-(sp)
+jsr _idpoint
+addq.l #4,sp
+*line 254
+L31:
+*line 255
+move 8(R14),R7
+add #1,R7
+*line 257
+*line 258
+cmp #509,R7
+bge L32
+*line 258
+move 12(R14),(sp)
+move 10(R14),-(sp)
+move R7,-(sp)
+jsr _idpoint
+addq.l #4,sp
+*line 259
+L32:
+*line 260
+move 10(R14),R7
+sub #1,R7
+*line 262
+*line 263
+cmp #55,R7
+ble L33
+*line 263
+move 12(R14),(sp)
+move R7,-(sp)
+move 8(R14),-(sp)
+jsr _idpoint
+addq.l #4,sp
+*line 264
+L33:
+*line 265
+move 10(R14),R7
+add #1,R7
+*line 267
+*line 268
+cmp #196,R7
+bge L34
+*line 268
+move 12(R14),(sp)
+move R7,-(sp)
+move 8(R14),-(sp)
+jsr _idpoint
+addq.l #4,sp
+*line 269
+L34:
+*line 270
+move 12(R14),(sp)
+move 10(R14),-(sp)
+move 8(R14),-(sp)
+jsr _idpoint
+addq.l #4,sp
+L30:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _drawfn
+.text
+_drawfn:
+~~drawfn:
+~fn=8
+~how=10
+~pen=12
+~wn=14
+link R14,#-16
+movem.l R2-R7/R12-R13,-(sp)
+~fp=-4
+~ip=-8
+~pt1=R13
+~pt2=R12
+~i=R7
+~npt1=R6
+~npt2=R5
+~xp=R4
+~color=R3
+~np=-10
+~ptx=-12
+~pty=-14
+~ptc=-16
+*line 292
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,-8(R14)
+*line 293
+move 8(R14),R0
+muls #12,R0
+add.l -8(R14),R0
+add.l #86,R0
+move.l R0,-4(R14)
+*line 294
+move.l #_idpoint,_point
+*line 296
+move.l -4(R14),R8
+move.b 5(R8),R0
+ext.w R0
+move R0,-10(R14)
+*line 297
+move _subj,R4
+*line 299
+clr R6
+*line 300
+move #1,R5
+*line 302
+move.l -4(R14),R8
+move.b 6(R8),R0
+ext.w R0
+muls #12,R0
+move.l R0,R13
+add.l -8(R14),R13
+add.l #242,R13
+*line 303
+lea 12(R13),R12
+*line 305
+move 12(R14),(sp)
+jsr _exp_c
+move R0,R3
+*line 309
+move 14(R14),(sp)
+move R6,-(sp)
+move 8(R14),-(sp)
+jsr _timeto
+addq.l #4,sp
+move R0,-(sp)
+jsr _ttox
+addq.l #2,sp
+move R0,-12(R14)
+*line 310
+move 14(R14),(sp)
+move 2(R13),R0
+asr #5,R0
+move R0,-(sp)
+jsr _vtoy
+addq.l #2,sp
+move R0,-14(R14)
+*line 312
+*line 313
+*line 314
+tst 10(R14)
+beq L10000
+move #3,R0
+bra L10002
+L10000:tst.b 7(R13)
+bne L10004
+tst.b 6(R13)
+beq L10003
+L10004:move #15,R0
+bra L10006
+L10003:move #11,R0
+L10006:L10002:move R0,-16(R14)
+*line 316
+*line 316
+cmp #1,-10(R14)
+bne L36
+*line 317
+*line 318
+*line 319
+cmp #12,14(R14)
+bne L37
+*line 319
+move -16(R14),(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+jsr _drawpt
+addq.l #4,sp
+*line 320
+bra L38
+L37:
+*line 321
+move -16(R14),(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+jsr _idpoint
+addq.l #4,sp
+L38:
+*line 322
+bra L35
+*line 323
+*line 324
+*line 325
+L36:
+*line 326
+*line 327
+tst 10(R14)
+beq L39
+tst R4
+bne L39
+*line 327
+*line 328
+cmp #12,14(R14)
+bne L40
+*line 328
+move #3,(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+jsr _drawpt
+addq.l #4,sp
+*line 329
+bra L41
+L40:
+*line 330
+move #3,(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+jsr _idpoint
+addq.l #4,sp
+L41:
+*line 331
+L39:
+*line 332
+move #1,R7
+bra L44
+L45:
+*line 333
+*line 334
+move 14(R14),(sp)
+move R5,-(sp)
+move 8(R14),-(sp)
+jsr _timeto
+addq.l #4,sp
+move R0,-(sp)
+jsr _ttox
+addq.l #2,sp
+move R0,-12(R14)
+*line 335
+move 14(R14),(sp)
+move 2(R12),R0
+asr #5,R0
+move R0,-(sp)
+jsr _vtoy
+addq.l #2,sp
+move R0,-14(R14)
+*line 336
+*line 337
+*line 338
+tst.b 7(R12)
+bne L10008
+tst.b 6(R12)
+beq L10007
+L10008:move #15,R0
+bra L10010
+L10007:move #11,R0
+L10010:move R0,-16(R14)
+*line 339
+*line 340
+*line 340
+tst 10(R14)
+beq L46
+move R7,R0
+sub #1,R0
+cmp R0,R4
+bne L46
+*line 341
+*line 342
+*line 343
+*line 344
+cmp #12,14(R14)
+bne L47
+*line 344
+move -16(R14),(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+jsr _drawpt
+addq.l #4,sp
+*line 345
+bra L48
+L47:
+*line 346
+move -16(R14),(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+jsr _idpoint
+addq.l #4,sp
+L48:
+*line 347
+bra L49
+L46:
+*line 348
+*line 348
+tst 10(R14)
+beq L50
+cmp R7,R4
+bne L50
+*line 349
+*line 350
+move #3,-16(R14)
+*line 351
+*line 352
+*line 353
+cmp #12,14(R14)
+bne L51
+*line 353
+move -16(R14),(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+jsr _drawpt
+addq.l #4,sp
+*line 354
+bra L52
+L51:
+*line 355
+move -16(R14),(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+jsr _idpoint
+addq.l #4,sp
+L52:
+*line 356
+*line 357
+bra L53
+L50:
+*line 358
+*line 359
+*line 360
+*line 361
+*line 362
+move R3,(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+move 14(R14),-(sp)
+move 2(R13),R0
+asr #5,R0
+move R0,-(sp)
+jsr _vtoy
+addq.l #4,sp
+move R0,-(sp)
+move 14(R14),-(sp)
+move R6,-(sp)
+move 8(R14),-(sp)
+jsr _timeto
+addq.l #4,sp
+move R0,-(sp)
+jsr _ttox
+addq.l #4,sp
+move R0,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 363
+*line 364
+*line 364
+cmp #12,14(R14)
+bne L54
+*line 365
+*line 366
+*line 367
+*line 368
+*line 369
+tst.b 7(R13)
+bne L10012
+tst.b 6(R13)
+beq L10011
+L10012:move #15,(sp)
+bra L10014
+L10011:move #11,(sp)
+L10014:move 14(R14),-(sp)
+move 2(R13),R0
+asr #5,R0
+move R0,-(sp)
+jsr _vtoy
+addq.l #4,sp
+move R0,-(sp)
+move 14(R14),-(sp)
+move R6,-(sp)
+move 8(R14),-(sp)
+jsr _timeto
+addq.l #4,sp
+move R0,-(sp)
+jsr _ttox
+addq.l #4,sp
+move R0,-(sp)
+jsr _drawpt
+addq.l #4,sp
+*line 370
+*line 371
+move -16(R14),(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+jsr _drawpt
+addq.l #4,sp
+*line 372
+bra L55
+L54:
+*line 373
+*line 374
+*line 375
+*line 376
+*line 377
+*line 378
+tst.b 7(R13)
+bne L10016
+tst.b 6(R13)
+beq L10015
+L10016:move #15,(sp)
+bra L10018
+L10015:move #11,(sp)
+L10018:move 14(R14),-(sp)
+move 2(R13),R0
+asr #5,R0
+move R0,-(sp)
+jsr _vtoy
+addq.l #4,sp
+move R0,-(sp)
+move 14(R14),-(sp)
+move R6,-(sp)
+move 8(R14),-(sp)
+jsr _timeto
+addq.l #4,sp
+move R0,-(sp)
+jsr _ttox
+addq.l #4,sp
+move R0,-(sp)
+jsr _idpoint
+addq.l #4,sp
+*line 379
+*line 380
+move -16(R14),(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+jsr _idpoint
+addq.l #4,sp
+L55:
+*line 381
+L53:L49:
+*line 382
+*line 383
+*line 384
+add #1,R6
+*line 385
+add #1,R5
+*line 386
+add.l #12,R13
+*line 387
+add.l #12,R12
+L43:
+*line 332
+add #1,R7
+L44:
+*line 332
+cmp -10(R14),R7
+blt L45
+L42:bra L35
+L35:tst.l (sp)+
+movem.l (sp)+,R3-R7/R12-R13
+unlk R14
+rts
+.globl _addpch
+.text
+_addpch:
+~~addpch:
+~p1=8
+~p2=10
+link R14,#0
+movem.l R6-R7,-(sp)
+~pl=R7
+*line 408
+move 8(R14),R7
+ext.l R7
+asr.l #$5,R7
+add.l #$fffffe0c,R7
+asl.l #$2,R7
+move 10(R14),R0
+ext.l R0
+add.l R0,R7
+*line 410
+*line 411
+cmp.l #$55a0,R7
+ble L57
+*line 411
+move.l #$55a0,R7
+*line 412
+L57:
+*line 413
+move.l R7,R0
+bra L56
+L56:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _irand
+.text
+_irand:
+~~irand:
+~range=8
+link R14,#-4
+*line 429
+*line 430
+tst 8(R14)
+bgt L59
+*line 430
+clr R0
+bra L58
+*line 431
+L59:
+*line 432
+*line 433
+cmp #9,8(R14)
+ble L60
+*line 433
+move #9,8(R14)
+*line 434
+L60:
+*line 435
+move 8(R14),R8
+add.l R8,R8
+add.l R8,R8
+move.l #_rngdiv,R9
+move.l 0(R8,R9.l),-(sp)
+jsr _rand24
+move.l R0,-(sp)
+jsr ldiv
+addq.l #8,sp
+bra L58
+L58:unlk R14
+rts
+.globl _xgetran
+.text
+_xgetran:
+~~xgetran:
+~mlt=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~sltmp=R7
+*line 453
+jsr _rand24
+move R0,R7
+*line 455
+*line 456
+tst 8(R14)
+bge L62
+*line 456
+jsr _rand24
+add R0,R7
+*line 457
+L62:
+*line 458
+move R7,R0
+bra L61
+L61:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _dosync
+.text
+_dosync:
+~~dosync:
+~vce=8
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~sync=R7
+~ip=R13
+*line 476
+move 8(R14),R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 477
+move.b 70(R13),R7
+ext.w R7
+asl #8,R7
+*line 479
+*line 480
+btst #2,74(R13)
+beq L64
+*line 480
+or #8192,R7
+*line 481
+L64:
+*line 482
+*line 483
+btst #2,75(R13)
+beq L65
+*line 483
+or #16384,R7
+*line 484
+L65:
+*line 485
+*line 486
+btst #2,76(R13)
+beq L66
+*line 486
+or #-32768,R7
+*line 487
+L66:
+*line 488
+move 8(R14),R8
+add.l R8,R8
+add.l #_io_fpu,R8
+add.l #$5fe0,R8
+move R7,(R8)
+L63:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _oscdsp
+.text
+_oscdsp:
+~~oscdsp:
+~row=8
+~val=10
+~n=12
+~lbl=14
+~frq=18
+link R14,#0
+movem.l R5-R7,-(sp)
+~fh=R7
+~fl=R6
+*line 506
+move #14,(sp)
+move.l 14(R14),-(sp)
+move #34,-(sp)
+move 8(R14),-(sp)
+move 12(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 507
+move #14,(sp)
+move 10(R14),R0
+and #3,R0
+move R0,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_osclbl,R9
+move.l 0(R8,R9.l),-(sp)
+move #36,-(sp)
+move 8(R14),-(sp)
+move 12(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 509
+move 10(R14),R0
+and #3,R0
+bra L69
+*line 510
+L70:
+*line 511
+*line 512
+*line 513
+*line 514
+tst 18(R14)
+bge L10019
+move 18(R14),R0
+neg R0
+bra L10021
+L10019:move 18(R14),R0
+L10021:asr #1,R0
+move R0,(sp)
+tst 18(R14)
+bge L10022
+move #45,-(sp)
+bra L10024
+L10022:move #43,-(sp)
+L10024:move.l #L71,-(sp)
+move.l #_idbuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 515
+bra L68
+*line 516
+*line 517
+L72:
+*line 518
+*line 519
+*line 520
+move 18(R14),R0
+asr #1,R0
+move R0,(sp)
+jsr _int2rat
+*line 521
+*line 522
+clr _ebflag
+*line 523
+*line 524
+move.b _ebuf,_idbuf
+*line 525
+move.b 1+_ebuf,1+_idbuf
+*line 526
+move.b 2+_ebuf,2+_idbuf
+*line 527
+clr.b 3+_idbuf
+*line 528
+bra L68
+*line 529
+*line 530
+L73:
+*line 531
+*line 532
+*line 533
+move 18(R14),R7
+asr R7
+ext.l R7
+divs #10,R7
+*line 534
+move 18(R14),R6
+asr R6
+move R7,R0
+muls #10,R0
+sub R0,R6
+*line 535
+*line 536
+move R6,(sp)
+move R7,-(sp)
+move.l #L74,-(sp)
+move.l #_idbuf,-(sp)
+jsr _sprintf
+adda.l #10,sp
+bra L68
+*line 537
+*line 538
+*line 539
+L75:
+*line 540
+*line 541
+*line 542
+move 18(R14),R0
+asr #1,R0
+move R0,(sp)
+move.l #_idbuf,-(sp)
+jsr _cnvc2p
+addq.l #4,sp
+*line 543
+add.b #48,_idbuf
+*line 544
+add.b #65,1+_idbuf
+*line 545
+move.b 2+_idbuf,R0
+ext.w R0
+ext.l R0
+add.l #_sfdsp,R0
+move.l R0,R8
+move.b (R8),2+_idbuf
+*line 546
+add.b #48,3+_idbuf
+*line 547
+add.b #48,4+_idbuf
+*line 548
+clr.b 5+_idbuf
+bra L68
+*line 549
+bra L68
+L69:tst R0
+beq L70
+cmp #1,R0
+beq L72
+cmp #2,R0
+beq L73
+cmp #3,R0
+beq L75
+bra L68
+L68:
+*line 552
+move #14,(sp)
+move.l #_idbuf,-(sp)
+move #40,-(sp)
+move 8(R14),-(sp)
+move 12(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 554
+*line 555
+cmp #21,8(R14)
+beq L76
+*line 556
+move #14,(sp)
+btst #2,11(R14)
+beq L10025
+move.l #L77,-(sp)
+bra L10027
+L10025:move.l #L78,-(sp)
+L10027:move #46,-(sp)
+move 8(R14),-(sp)
+move 12(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+L76:L67:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _pltws
+.text
+_pltws:
+~~pltws:
+~ws=-2
+~pen=R7
+~ws=8
+link R14,#0
+movem.l R3-R7,-(sp)
+~i=R6
+~x=R5
+~y=R4
+*line 574
+move 12(R14),R7
+*line 574
+move #1,R6
+bra L82
+L83:
+*line 575
+*line 576
+move R6,R5
+asr R5
+add #382,R5
+*line 577
+move #348,R4
+move.l 8(R14),R8
+move R6,R9
+add.l R9,R9
+clr R0
+move 0(R8,R9.l),R0
+move #-32768,R1
+eor R1,R0
+swap R0
+clr R0
+swap R0
+divu #676,R0
+sub R0,R4
+*line 578
+*line 579
+move R7,(sp)
+move R4,-(sp)
+move R5,-(sp)
+jsr _idpoint
+addq.l #4,sp
+L81:
+*line 574
+add #1,R6
+L82:
+*line 574
+cmp #254,R6
+blt L83
+L80:L79:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _dswin
+.text
+_dswin:
+~~dswin:
+~n=R7
+link R14,#-34
+movem.l R3-R7/R11-R13,-(sp)
+~th=-2
+~tl=-4
+~vh=-6
+~vl=-8
+~vv=-10
+~mltval=-12
+~lboff=-14
+~s1=-18
+~mltstr=-24
+~mltsgn=-26
+~tt=-30
+~sc=-34
+~cx=R6
+~pnt=R5
+~par=R4
+~ip=R13
+~fp=R12
+~pp=R11
+*line 603
+move 8(R14),R7
+*line 603
+*line 604
+cmp #-1,_wcflag
+bne L84
+*line 605
+*line 606
+*line 607
+tst _idimsw
+beq L10028
+cmp #19,R7
+beq L10028
+cmp #22,R7
+blt L84
+L10028:*line 608
+*line 609
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 611
+move.l R13,R12
+cmp #12,R7
+bgt L10029
+move R7,R0
+bra L10031
+L10029:move _curfunc,R0
+L10031:muls #12,R0
+add.l R0,R12
+add.l #86,R12
+*line 613
+move.b 6(R12),R0
+ext.w R0
+add _subj,R0
+move R0,_curpnt
+*line 614
+move.l R13,R11
+move _curpnt,R0
+muls #12,R0
+add.l R0,R11
+add.l #242,R11
+*line 616
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_idbox,R0
+move.l R0,R8
+move 10(R8),R6
+*line 617
+move R6,R0
+asl #4,R0
+or R0,R6
+*line 618
+move R6,R0
+asl #8,R0
+or R0,R6
+*line 625
+*line 626
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L85
+*line 626
+clr (sp)
+jsr _vbank
+*line 627
+L85:
+*line 628
+move R6,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 6(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 4(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 2(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 0(R8,R9.l),-(sp)
+move #128,-(sp)
+move.l _instob,-(sp)
+jsr _vbfill4
+adda.l #14,sp
+*line 630
+*line 631
+cmp #12,R7
+bge L86
+*line 631
+move R7,(sp)
+move #14,-(sp)
+clr -(sp)
+move R7,-(sp)
+jsr _drawfn
+addq.l #6,sp
+*line 632
+*line 633
+*line 634
+L86:
+*line 635
+*line 635
+cmp #12,R7
+ble L87
+*line 636
+*line 637
+*line 638
+move #14,(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_idbxlbl,R9
+move.l 0(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 12(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 639
+bra L88
+L87:
+*line 640
+*line 641
+*line 642
+*line 643
+*line 644
+move #14,(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_idbxlbl,R9
+move.l 0(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 12(R8,R9.l),-(sp)
+move.l R13,R8
+move R7,R1
+muls #12,R1
+add.l R1,R8
+btst #0,93(R8)
+beq L10032
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+bra L10034
+L10032:move #2,-(sp)
+L10034:move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+L88:
+*line 649
+move R7,R0
+bra L90
+*line 650
+L91:
+*line 651
+*line 652
+*line 653
+*line 654
+*line 655
+move #14,(sp)
+move.l #_idhlbl,-(sp)
+clr -(sp)
+move #14,-(sp)
+move #2,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 656
+*line 657
+*line 658
+*line 659
+move #14,(sp)
+move.l #L92,-(sp)
+clr -(sp)
+move #14,-(sp)
+move #2,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 660
+move #14,(sp)
+move.l #L93,-(sp)
+clr -(sp)
+move #12,-(sp)
+move #2,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 661
+move #14,(sp)
+move.l #L94,-(sp)
+clr -(sp)
+move #10,-(sp)
+move #2,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 662
+move #14,(sp)
+move.l #L95,-(sp)
+clr -(sp)
+move #8,-(sp)
+move #2,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 663
+move #14,(sp)
+move.l #L96,-(sp)
+clr -(sp)
+move #6,-(sp)
+move #2,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 664
+move #14,(sp)
+move.l #L97,-(sp)
+clr -(sp)
+move #4,-(sp)
+move #2,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 665
+*line 666
+clr (sp)
+move #196,-(sp)
+move #7,-(sp)
+move #56,-(sp)
+move #7,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 667
+clr (sp)
+move #196,-(sp)
+move #509,-(sp)
+move #196,-(sp)
+move #7,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 668
+*line 669
+move #12,(sp)
+move #14,-(sp)
+clr -(sp)
+move #12,-(sp)
+jsr _drawfn
+addq.l #6,sp
+*line 670
+bra L84
+*line 671
+*line 672
+L98:
+*line 673
+*line 674
+*line 675
+move 2(R12),(sp)
+move.b 4(R12),R0
+ext.w R0
+move R0,-(sp) 
+move.l #_bfs,-(sp)
+jsr _dsimlt
+addq.l #6,sp
+*line 676
+*line 677
+*line 678
+move #14,(sp)
+move.l #_bfs,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,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 #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+bra L84
+*line 679
+*line 680
+L99:
+*line 681
+*line 682
+*line 683
+move _subj,(sp)
+move.l #L100,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 684
+*line 685
+move #14,(sp)
+move.l #_bfs,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,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 #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 686
+bra L84
+*line 687
+*line 688
+*line 689
+L101:
+*line 690
+*line 691
+*line 692
+move.l #$3e8,-34(R14)
+*line 693
+move _subj,(sp)
+move _curfunc,-(sp)
+jsr _timeto
+addq.l #2,sp
+ext.l R0
+move.l R0,-30(R14)
+*line 694
+move.l -34(R14),-(sp)
+move.l -30(R14),-(sp)
+jsr ldiv
+addq.l #8,sp
+move R0,-2(R14)
+*line 695
+move.l -34(R14),-(sp)
+move -2(R14),R8
+move.l R8,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,-(sp)
+move.l -30(R14),R0
+sub.l (sp)+,R0
+move R0,-4(R14)
+*line 696
+*line 697
+move -4(R14),(sp)
+move -2(R14),-(sp)
+move.l #L102,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 698
+*line 699
+move #14,(sp)
+move.l #_bfs,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,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 #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 700
+bra L84
+*line 701
+*line 702
+L103:
+*line 703
+*line 704
+*line 705
+move 2(R11),R0
+asr #5,R0
+move R0,-10(R14)
+*line 706
+move -10(R14),R0
+ext.l R0
+divs #100,R0
+move R0,-6(R14)
+*line 707
+move -10(R14),R0
+move -6(R14),R1
+muls #100,R1
+sub R1,R0
+move R0,-8(R14)
+*line 708
+*line 709
+move -8(R14),(sp)
+move -6(R14),-(sp)
+move.l #L104,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 710
+*line 711
+move 4(R11),(sp)
+move.b 6(R11),R0
+ext.w R0
+move R0,-(sp) 
+move.l #6+_bfs,-(sp)
+jsr _dsimlt
+addq.l #6,sp
+*line 712
+*line 713
+*line 714
+move #14,(sp)
+move.l #_bfs,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,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 #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 715
+bra L84
+*line 716
+*line 717
+*line 718
+*line 719
+L105:
+*line 720
+*line 721
+*line 722
+move.b 8(R11),R5
+ext.w R5
+*line 723
+move.b 9(R11),R4
+ext.w R4
+*line 724
+*line 725
+move.b 7(R11),R0
+ext.w R0
+bra L107
+*line 726
+L108:
+*line 727
+*line 728
+*line 729
+move.l #L109,-18(R14)
+bra L106
+*line 730
+*line 731
+L110:
+*line 732
+*line 733
+*line 734
+move #170,(sp)
+move.l #L111,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 735
+move.l #_bfs,-18(R14)
+bra L106
+*line 736
+*line 737
+L112:
+*line 738
+*line 739
+*line 740
+move #171,(sp)
+move.l #L113,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 741
+move.l #_bfs,-18(R14)
+bra L106
+*line 742
+*line 743
+L114:
+*line 744
+*line 745
+*line 746
+move R5,(sp)
+move.l #L115,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 747
+move.l #_bfs,-18(R14)
+bra L106
+*line 748
+*line 749
+*line 750
+*line 751
+L116:
+*line 752
+*line 753
+*line 754
+move R4,(sp)
+move R5,-(sp)
+move.l #L117,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 755
+*line 756
+*line 757
+cmp.b #57,8+_bfs
+bne L118
+*line 757
+move.b #82,8+_bfs
+*line 758
+L118:
+*line 759
+move.l #_bfs,-18(R14)
+bra L106
+*line 760
+*line 761
+L119:
+*line 762
+*line 763
+*line 764
+*line 765
+move #171,(sp)
+move R5,-(sp)
+move.l #L120,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 766
+move.l #_bfs,-18(R14)
+bra L106
+*line 767
+*line 768
+L121:
+*line 769
+*line 770
+*line 771
+*line 772
+move #170,(sp)
+move R5,-(sp)
+move.l #L122,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 773
+move.l #_bfs,-18(R14)
+bra L106
+*line 774
+*line 775
+L123:
+*line 776
+*line 777
+*line 778
+move.l #L124,-18(R14)
+bra L106
+*line 779
+bra L106
+L107:cmp #6,R0
+bhi L123
+asl #2,R0
+move R0,R8
+add.l #L125,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L125:.dc.l L108
+.dc.l L110
+.dc.l L112
+.dc.l L114
+.dc.l L116
+.dc.l L119
+.dc.l L121
+.text
+L106:
+*line 780
+*line 781
+*line 782
+*line 783
+move #14,(sp)
+move.l -18(R14),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 14(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,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 #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 784
+bra L84
+*line 785
+*line 786
+*line 787
+*line 788
+*line 789
+L126:
+*line 790
+*line 791
+*line 792
+move.b 70(R13),R0
+ext.w R0
+move R0,(sp) 
+jsr _showcfg
+bra L84
+*line 793
+*line 794
+L127:
+*line 795
+*line 796
+*line 797
+move _curvce,(sp)
+add #1,(sp)
+move.l #L128,-(sp)
+move.l #_idbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 798
+move #14,(sp)
+move.l #_idbuf,-(sp)
+move #23,-(sp)
+move #17,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 799
+*line 800
+move _curinst,(sp)
+move.l #L129,-(sp)
+move.l #_idbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 801
+*line 802
+move #14,(sp)
+move.l #_idbuf,-(sp)
+move #31,-(sp)
+move #17,-(sp)
+move _curvce,R8
+add.l R8,R8
+move.l #_instmod,R9
+tst 0(R8,R9.l)
+beq L10035
+move #3,-(sp)
+bra L10037
+L10035:move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+L10037:move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 803
+bra L84
+*line 804
+*line 805
+L130:
+*line 806
+*line 807
+*line 808
+move 78(R13),(sp)
+move.l #L131,-(sp)
+move R7,-(sp)
+move.b 74(R13),R0
+ext.w R0
+move R0,-(sp) 
+move #18,-(sp)
+jsr _oscdsp
+adda.l #10,sp
+*line 809
+move 80(R13),(sp)
+move.l #L132,-(sp)
+move R7,-(sp)
+move.b 75(R13),R0
+ext.w R0
+move R0,-(sp) 
+move #19,-(sp)
+jsr _oscdsp
+adda.l #10,sp
+*line 810
+move 82(R13),(sp)
+move.l #L133,-(sp)
+move R7,-(sp)
+move.b 76(R13),R0
+ext.w R0
+move R0,-(sp) 
+move #20,-(sp)
+jsr _oscdsp
+adda.l #10,sp
+*line 811
+move 84(R13),(sp)
+move.l #L134,-(sp)
+move R7,-(sp)
+move.b 77(R13),R0
+ext.w R0
+move R0,-(sp) 
+move #21,-(sp)
+jsr _oscdsp
+adda.l #10,sp
+*line 812
+bra L84
+*line 813
+*line 814
+L135:
+*line 815
+*line 816
+*line 817
+move.b 72(R13),R0
+ext.w R0
+move R0,(sp) 
+add #1,(sp)
+move.l #L136,-(sp)
+move.l #_idbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 818
+move #14,(sp)
+move.l #_idbuf,-(sp)
+move #56,-(sp)
+move #17,-(sp)
+move #8,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 819
+move #8,(sp)
+move.l R13,-(sp)
+add.l #1778,(sp)
+jsr _pltws
+addq.l #4,sp
+*line 820
+*line 821
+move.b 73(R13),R0
+ext.w R0
+move R0,(sp) 
+add #1,(sp)
+move.l #L137,-(sp)
+move.l #_idbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 822
+move #14,(sp)
+move.l #_idbuf,-(sp)
+move #60,-(sp)
+move #17,-(sp)
+move #4,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 823
+move #4,(sp)
+move.l R13,-(sp)
+add.l #2858,(sp)
+jsr _pltws
+addq.l #4,sp
+*line 824
+bra L84
+*line 825
+*line 826
+*line 827
+L138:
+*line 828
+*line 829
+*line 830
+move #14,(sp)
+move.l _vlbptr,-(sp)
+move #17,-(sp)
+move #22,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 831
+move #14,(sp)
+move.l 4+_vlbptr,-(sp)
+move #17,-(sp)
+move #23,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 832
+move #14,(sp)
+move.l 8+_vlbptr,-(sp)
+move #17,-(sp)
+move #24,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 833
+*line 834
+*line 834
+tst _idsrcsw
+beq L139
+*line 835
+*line 836
+move.l #_idpoint,_point
+*line 837
+*line 838
+move #9,(sp)
+move #348,-(sp)
+move #196,-(sp)
+move #308,-(sp)
+move #196,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 839
+move #9,(sp)
+move #348,-(sp)
+move #260,-(sp)
+move #308,-(sp)
+move #260,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 840
+move #9,(sp)
+move #348,-(sp)
+move #324,-(sp)
+move #308,-(sp)
+move #324,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 841
+*line 842
+L139:bra L84
+*line 843
+*line 844
+L140:
+*line 845
+*line 846
+*line 847
+move #14,(sp)
+move.l R13,-(sp)
+add.l #2,(sp)
+move #17,-(sp)
+move #18,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 848
+move #14,(sp)
+move.l R13,-(sp)
+add.l #19,(sp)
+move #17,-(sp)
+move #19,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 849
+move #14,(sp)
+move.l R13,-(sp)
+add.l #36,(sp)
+move #17,-(sp)
+move #20,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 850
+move #14,(sp)
+move.l R13,-(sp)
+add.l #53,(sp)
+move #17,-(sp)
+move #21,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_idbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 851
+bra L84
+*line 852
+bra L89
+L90:sub #12,R0
+cmp #11,R0
+bhi L89
+asl #2,R0
+move R0,R8
+add.l #L141,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L141:.dc.l L91
+.dc.l L98
+.dc.l L99
+.dc.l L101
+.dc.l L103
+.dc.l L105
+.dc.l L126
+.dc.l L127
+.dc.l L130
+.dc.l L135
+.dc.l L138
+.dc.l L140
+.text
+L89:L84:tst.l (sp)+
+movem.l (sp)+,R4-R7/R11-R13
+unlk R14
+rts
+.globl _allwins
+.text
+_allwins:
+~~allwins:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 869
+clr R7
+bra L145
+L146:
+*line 870
+move R7,(sp)
+jsr _dswin
+L144:
+*line 869
+add #1,R7
+L145:
+*line 869
+cmp #24,R7
+blt L146
+L143:L142:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _idpoint
+.text
+_idpoint:
+~~idpoint:
+~x=8
+~y=10
+~pen=12
+link R14,#-4
+*line 882
+*line 883
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L148
+*line 883
+clr (sp)
+jsr _vbank
+*line 884
+L148:
+*line 885
+move 12(R14),(sp)
+move 10(R14),-(sp)
+move 8(R14),-(sp)
+move.l _idoct,-(sp)
+jsr _vputp
+addq.l #8,sp
+L147:unlk R14
+rts
+.globl _idbord
+.text
+_idbord:
+~~idbord:
+link R14,#-4
+*line 899
+move.l #_idpoint,_point
+*line 901
+move #9,(sp)
+clr -(sp)
+move #510,-(sp)
+clr -(sp)
+clr -(sp)
+jsr _lseg
+addq.l #8,sp
+*line 902
+move #9,(sp)
+move #349,-(sp)
+move #510,-(sp)
+clr -(sp)
+move #510,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 903
+move #9,(sp)
+move #349,-(sp)
+clr -(sp)
+move #349,-(sp)
+move #510,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 904
+move #9,(sp)
+clr -(sp)
+clr -(sp)
+move #349,-(sp)
+clr -(sp)
+jsr _lseg
+addq.l #8,sp
+*line 906
+move #9,(sp)
+move #27,-(sp)
+move #510,-(sp)
+move #27,-(sp)
+clr -(sp)
+jsr _lseg
+addq.l #8,sp
+*line 907
+move #9,(sp)
+move #55,-(sp)
+move #510,-(sp)
+move #55,-(sp)
+clr -(sp)
+jsr _lseg
+addq.l #8,sp
+*line 909
+move #9,(sp)
+move #54,-(sp)
+move #85,-(sp)
+move #1,-(sp)
+move #85,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 910
+move #9,(sp)
+move #54,-(sp)
+move #170,-(sp)
+move #1,-(sp)
+move #170,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 911
+move #9,(sp)
+move #54,-(sp)
+move #255,-(sp)
+move #1,-(sp)
+move #255,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 912
+move #9,(sp)
+move #54,-(sp)
+move #340,-(sp)
+move #1,-(sp)
+move #340,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 913
+move #9,(sp)
+move #54,-(sp)
+move #425,-(sp)
+move #1,-(sp)
+move #425,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 915
+move #9,(sp)
+move #209,-(sp)
+move #510,-(sp)
+move #209,-(sp)
+clr -(sp)
+jsr _lseg
+addq.l #8,sp
+*line 916
+move #9,(sp)
+move #237,-(sp)
+move #510,-(sp)
+move #237,-(sp)
+clr -(sp)
+jsr _lseg
+addq.l #8,sp
+*line 918
+move #9,(sp)
+move #236,-(sp)
+move #111,-(sp)
+move #210,-(sp)
+move #111,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 919
+move #9,(sp)
+move #236,-(sp)
+move #143,-(sp)
+move #210,-(sp)
+move #143,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 920
+move #9,(sp)
+move #236,-(sp)
+move #207,-(sp)
+move #210,-(sp)
+move #207,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 921
+move #9,(sp)
+move #236,-(sp)
+move #367,-(sp)
+move #210,-(sp)
+move #367,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 923
+move #9,(sp)
+move #349,-(sp)
+move #132,-(sp)
+move #238,-(sp)
+move #132,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 924
+move #9,(sp)
+move #349,-(sp)
+move #380,-(sp)
+move #238,-(sp)
+move #380,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 925
+move #9,(sp)
+move #307,-(sp)
+move #380,-(sp)
+move #307,-(sp)
+move #132,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 926
+move #9,(sp)
+move #306,-(sp)
+move #268,-(sp)
+move #238,-(sp)
+move #268,-(sp)
+jsr _lseg
+addq.l #8,sp
+L149:unlk R14
+rts
+.globl _idvlblc
+.text
+_idvlblc:
+~~idvlblc:
+link R14,#-4
+*line 940
+clr _vlbtype
+*line 942
+move.l #L151,R0
+move.l R0,8+_vlbptr
+move.l R0,4+_vlbptr
+move.l R0,_vlbptr
+L150:unlk R14
+rts
+.globl _idvlbld
+.text
+_idvlbld:
+~~idvlbld:
+link R14,#-4
+*line 953
+move #1,_vlbtype
+*line 957
+move.l #L153,_vlbptr
+*line 958
+move.l #L154,4+_vlbptr
+*line 959
+move.l #L155,8+_vlbptr
+L152:unlk R14
+rts
+.globl _idvtyp
+.text
+_idvtyp:
+~~idvtyp:
+link R14,#-4
+*line 973
+move #2,_vlbtype
+*line 975
+move.l #_vtlin1,_vlbptr
+*line 976
+move.l #_vtlin2,4+_vlbptr
+*line 977
+move.l #_vtlin3,8+_vlbptr
+L156:unlk R14
+rts
+.globl _idcpfch
+.text
+_idcpfch:
+~~idcpfch:
+link R14,#-4
+*line 988
+move #3,_vlbtype
+*line 992
+move.l #L158,_vlbptr
+*line 993
+move.l #L159,4+_vlbptr
+*line 994
+move.l #L160,8+_vlbptr
+L157:unlk R14
+rts
+.globl _instdsp
+.text
+_instdsp:
+~~instdsp:
+link R14,#0
+movem.l R7-R7/R12-R13,-(sp)
+~ip=R13
+~fp=R12
+*line 1011
+move.l #_v_score,_instob
+*line 1012
+move.l #144+_v_obtab,_idoct
+*line 1013
+move.l #_v_curs0,_obj0
+*line 1014
+move.l #_v_tcur,_obj2
+*line 1016
+clr _idnamsw
+*line 1017
+clr _idsrcsw
+*line 1018
+clr _idcfsw
+*line 1019
+clr _idimsw
+*line 1020
+clr _submenu
+*line 1021
+move #-1,_wcflag
+*line 1022
+clr _wcpage
+*line 1024
+jsr _setinst
+*line 1026
+jsr _dswap
+*line 1028
+clr (sp)
+jsr _vbank
+*line 1029
+move #32767,(sp)
+clr -(sp)
+move.l _instob,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 1030
+move #12033,(sp)
+clr -(sp)
+move.l _instob,R0
+add.l #$fffe,R0
+move.l R0,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 1032
+move #-1,(sp)
+move #1536,-(sp)
+clr -(sp)
+clr -(sp)
+move #350,-(sp)
+move #512,-(sp)
+move.l _instob,-(sp)
+clr -(sp)
+clr -(sp)
+move #8,-(sp)
+jsr _SetObj
+adda.l #20,sp
+*line 1033
+move #-1,(sp)
+move #1540,-(sp)
+move #175,-(sp)
+move #256,-(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 1034
+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 1036
+move #1,(sp)
+jsr _arcurs
+*line 1037
+move #1,(sp)
+jsr _itcini
+*line 1038
+move #1,(sp)
+jsr _ttcini
+*line 1040
+clr (sp)
+jsr _vbank
+*line 1041
+jsr _idbord
+*line 1042
+jsr _idvlblc
+*line 1043
+jsr _allwins
+*line 1045
+move #8,(sp)
+move #8,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 1046
+move #15,(sp)
+clr -(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 1048
+move #175,(sp)
+move #256,-(sp)
+jsr _setgc
+addq.l #2,sp
+*line 1050
+move.l #_inspal,(sp)
+jsr _vsndpal
+L161:tst.l (sp)+
+movem.l (sp)+,R12-R13
+unlk R14
+rts
+.globl _reshowi
+.text
+_reshowi:
+~~reshowi:
+link R14,#-4
+*line 1064
+jsr _idfield
+*line 1066
+move #-1,_wcflag
+*line 1067
+clr _wcpage
+*line 1069
+jsr _dswap
+*line 1071
+clr (sp)
+jsr _vbank
+*line 1072
+move #32767,(sp)
+clr -(sp)
+move.l _instob,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 1073
+move #12033,(sp)
+clr -(sp)
+move.l _instob,R0
+add.l #$fffe,R0
+move.l R0,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 1075
+move #-1,(sp)
+move #1536,-(sp)
+clr -(sp)
+clr -(sp)
+move #350,-(sp)
+move #512,-(sp)
+move.l _instob,-(sp)
+clr -(sp)
+clr -(sp)
+move #8,-(sp)
+jsr _SetObj
+adda.l #20,sp
+*line 1076
+move #-1,(sp)
+move #1540,-(sp)
+move #175,-(sp)
+move #256,-(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 1077
+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 1079
+move #1,(sp)
+jsr _arcurs
+*line 1080
+move #1,(sp)
+jsr _itcini
+*line 1081
+move #1,(sp)
+jsr _ttcini
+*line 1083
+clr (sp)
+jsr _vbank
+*line 1084
+jsr _idbord
+*line 1085
+jsr _idvlblc
+*line 1086
+jsr _allwins
+*line 1088
+move #8,(sp)
+move #8,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 1089
+move #15,(sp)
+clr -(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 1091
+*line 1092
+move _cyval,R0
+cmp _curslim,R0
+ble L163
+*line 1092
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _settc
+addq.l #2,sp
+*line 1093
+bra L164
+L163:
+*line 1094
+move _cyval,(sp)
+move _cxval,-(sp)
+jsr _setgc
+addq.l #2,sp
+L164:
+*line 1096
+move.l #_inspal,(sp)
+jsr _vsndpal
+L162:unlk R14
+rts
+.data
+L1:.dc.b $20,$20,$20,$20,$46,$72,$71,$20,$31,$0
+L2:.dc.b $20,$20,$20,$20,$46,$72,$71,$20,$32,$0
+L3:.dc.b $20,$20,$20,$20,$46,$72,$71,$20,$33,$0
+L4:.dc.b $20,$20,$20,$20,$46,$72,$71,$20,$34,$0
+L5:.dc.b $20,$20,$20,$20,$46,$69,$6C,$74,$72,$0
+L6:.dc.b $20,$20,$20,$20,$4C,$6F,$63,$74,$6E,$0
+L7:.dc.b $20,$20,$20,$20,$49,$6E,$64,$20,$31,$0
+L8:.dc.b $20,$20,$20,$20,$49,$6E,$64,$20,$32,$0
+L9:.dc.b $20,$20,$20,$20,$49,$6E,$64,$20,$33,$0
+L10:.dc.b $20,$20,$20,$20,$49,$6E,$64,$20,$34,$0
+L11:.dc.b $20,$20,$20,$20,$49,$6E,$64,$20,$35,$0
+L12:.dc.b $20,$20,$20,$20,$49,$6E,$64,$20,$36,$0
+L13:.dc.b $20,$20,$20,$20,$4C,$65,$76,$65,$6C,$0
+L14:.dc.b $53,$6F,$75,$72,$63,$65,$20,$20,$4D,$75,$6C,$74,$0
+L15:.dc.b $50,$74,$0
+L16:.dc.b $54,$69,$6D,$65,$20,$20,$0
+L17:.dc.b $56,$61,$6C,$75,$65,$20,$53,$6F,$75,$72,$63,$65,$20,$20,$4D,$75,$6C,$74,$0
+L18:.dc.b $43,$6F,$6E,$64,$69,$74,$69,$6F,$6E,$65,$64,$20,$41,$63,$74,$73,$0
+L19:.dc.b $20,$20,$43,$6F,$6E,$66,$69,$67,$20,$20,$23,$0
+L20:.dc.b $56,$6F,$69,$63,$65,$20,$20,$20,$20,$49,$6E,$73,$74,$0
+L21:.dc.b $4F,$73,$63,$69,$6C,$6C,$61,$74,$6F,$72,$73,$0
+L22:.dc.b $57,$61,$76,$73,$68,$70,$65,$0
+L23:.dc.b $0
+L24:.dc.b $0
+L26:.dc.b $49,$6E,$74,$0
+L27:.dc.b $52,$61,$74,$0
+L28:.dc.b $46,$72,$71,$0
+L29:.dc.b $50,$63,$68,$0
+L71:.dc.b $25,$63,$25,$30,$34,$64,$0
+L74:.dc.b $25,$30,$32,$64,$2E,$25,$64,$20,$0
+L77:.dc.b $53,$0
+L78:.dc.b $73,$0
+L92:.dc.b $C0,$0
+L93:.dc.b $C2,$0
+L94:.dc.b $C4,$0
+L95:.dc.b $C6,$0
+L96:.dc.b $C8,$0
+L97:.dc.b $CA,$0
+L100:.dc.b $25,$30,$32,$64,$0
+L102:.dc.b $25,$30,$32,$64,$2E,$25,$30,$33,$64,$0
+L104:.dc.b $25,$30,$32,$64,$2E,$25,$30,$32,$64,$20,$0
+L109:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$0
+L111:.dc.b $50,$61,$75,$73,$65,$20,$69,$66,$20,$6B,$65,$79,$20,$25,$63,$20,$20,$0
+L113:.dc.b $53,$74,$6F,$70,$20,$69,$66,$20,$6B,$65,$79,$20,$25,$63,$20,$20,$20,$0
+L115:.dc.b $47,$6F,$54,$6F,$20,$25,$30,$32,$64,$20,$66,$6F,$72,$65,$76,$65,$72,$20,$0
+L117:.dc.b $47,$6F,$54,$6F,$20,$25,$30,$32,$64,$20,$25,$30,$32,$64,$20,$74,$69,$6D,$65,$73,$0
+L120:.dc.b $47,$6F,$54,$6F,$20,$25,$30,$32,$64,$20,$69,$66,$20,$6B,$65,$79,$20,$25,$63,$0
+L122:.dc.b $47,$6F,$54,$6F,$20,$25,$30,$32,$64,$20,$69,$66,$20,$6B,$65,$79,$20,$25,$63,$0
+L124:.dc.b $3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$3F,$0
+L128:.dc.b $25,$30,$32,$64,$0
+L129:.dc.b $25,$30,$32,$64,$0
+L131:.dc.b $31,$0
+L132:.dc.b $32,$0
+L133:.dc.b $33,$0
+L134:.dc.b $34,$0
+L136:.dc.b $41,$25,$30,$32,$64,$0
+L137:.dc.b $42,$25,$30,$32,$64,$0
+L151:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$0
+L153:.dc.b $50,$63,$68,$57,$2F,$48,$54,$20,$50,$63,$68,$2F,$46,$72,$71,$20,$52,$61,$6E,$64,$6F,$6D,$20,$20,$47,$50,$43,$2F,$56,$31,$0
+L154:.dc.b $4D,$6F,$64,$57,$2F,$56,$54,$20,$4B,$65,$79,$20,$56,$65,$6C,$20,$50,$65,$64,$61,$6C,$20,$31,$20,$20,$20,$20,$20,$20,$20,$0
+L155:.dc.b $42,$72,$74,$68,$2F,$4C,$50,$20,$4B,$65,$79,$20,$50,$72,$73,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$0
+L158:.dc.b $46,$65,$74,$63,$68,$20,$66,$72,$6F,$6D,$20,$6C,$69,$62,$72,$61,$72,$79,$20,$20,$20,$20,$20,$45,$73,$63,$61,$70,$65,$20,$0
+L159:.dc.b $43,$6F,$70,$79,$20,$74,$6F,$20,$6C,$69,$62,$72,$61,$72,$79,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$0
+L160:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$0
Index: alcyon/ispow2.s
===================================================================
--- alcyon/ispow2.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/ispow2.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,61 @@
+.globl _ispow2
+.text
+_ispow2:
+~~ispow2:
+~x=R7
+link R14,#0
+movem.l R4-R7,-(sp)
+~i=R6
+~k=R5
+*line 22
+move.l 8(R14),R7
+*line 22
+move.l #$1,R5
+*line 24
+move #32,R6
+bra L4
+L5:
+*line 25
+*line 26
+*line 26
+move.l R7,R0
+and.l R5,R0
+beq L6
+*line 27
+*line 28
+*line 29
+move.l R7,R0
+move.l R5,R1
+not.l R1
+and.l R1,R0
+beq L7
+*line 29
+clr R0
+bra L1
+bra L8
+L7:
+*line 30
+*line 31
+move #1,R0
+bra L1
+L8:
+*line 32
+*line 33
+L6:
+*line 34
+asl.l #$1,R5
+L3:L4:
+*line 24
+move R6,R0
+sub #1,R6
+tst R0
+bne L5
+L2:
+*line 37
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
Index: alcyon/itcpos.s
===================================================================
--- alcyon/itcpos.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/itcpos.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,290 @@
+.globl _v_obtab
+.globl _v_curob
+.globl _v_nobj
+.globl _v_obpri
+.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 _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _stcrow
+.globl _stccol
+.globl _obj0
+.data
+L1:.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.text
+.globl _itcini
+.text
+_itcini:
+~~itcini:
+~color=8
+link R14,#-4
+*line 64
+*line 65
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+cmp #256,R0
+beq L3
+*line 65
+move #1,(sp)
+jsr _vbank
+*line 66
+L3:
+*line 67
+move #64,(sp)
+move 8(R14),-(sp)
+jsr _exp_c
+addq.l #2,sp
+move R0,-(sp)
+move.l #L1,-(sp)
+move.l #_v_cur,-(sp)
+jsr _andcopy
+adda.l #10,sp
+L2:unlk R14
+rts
+.globl _itcpos
+.text
+_itcpos:
+~~itcpos:
+~row=R7
+~col=R6
+link R14,#0
+movem.l R3-R7/R13-R13,-(sp)
+~yrow=R5
+~xcol=R4
+~op=R13
+*line 85
+move 8(R14),R7
+*line 85
+move 10(R14),R6
+*line 85
+*line 86
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L5
+*line 86
+clr (sp)
+jsr _vbank
+*line 87
+L5:
+*line 88
+move R7,R5
+muls #14,R5
+*line 89
+move R6,R4
+asl #3,R4
+*line 91
+move.l #_v_obtab,R13
+*line 92
+move #1,(sp)
+jsr _setipl
+*line 93
+and #-17,120+_v_odtab
+*line 94
+move #15,(sp)
+jsr _objclr
+*line 96
+move R4,4(R13)
+*line 97
+move R5,6(R13)
+*line 98
+move.l #_v_cur,8(R13)
+*line 99
+move R4,R0
+asr #1,R0
+and #1023,R0
+or #1024,R0
+move R0,16(R13)
+*line 101
+move #15,(sp)
+clr -(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 103
+move R7,_stcrow
+*line 104
+move R6,_stccol
+L4:tst.l (sp)+
+movem.l (sp)+,R4-R7/R13-R13
+unlk R14
+rts
+.globl _advicur
+.text
+_advicur:
+~~advicur:
+link R14,#0
+movem.l R6-R7,-(sp)
+~newcol=R7
+*line 120
+*line 121
+move.l _curfet,(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+jsr _infield
+addq.l #4,sp
+tst R0
+beq L7
+*line 121
+move.l _infetp,_cfetp
+*line 122
+bra L8
+L7:bra L6
+L8:
+*line 125
+move _stccol,R7
+add #1,R7
+*line 127
+*line 128
+move.l _cfetp,R8
+cmp 4(R8),R7
+bgt L9
+*line 128
+move R7,(sp)
+move _stcrow,-(sp)
+jsr _itcpos
+addq.l #2,sp
+L9:L6:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _bspicur
+.text
+_bspicur:
+~~bspicur:
+link R14,#0
+movem.l R6-R7,-(sp)
+~newcol=R7
+*line 141
+*line 142
+move.l _curfet,(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+jsr _infield
+addq.l #4,sp
+tst R0
+beq L11
+*line 142
+move.l _infetp,_cfetp
+*line 143
+bra L12
+L11:bra L10
+L12:
+*line 146
+move _stccol,R7
+sub #1,R7
+*line 148
+*line 149
+move.l _cfetp,R8
+cmp 2(R8),R7
+blt L13
+*line 149
+move R7,(sp)
+move _stcrow,-(sp)
+jsr _itcpos
+addq.l #2,sp
+L13:L10:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.data
Index: alcyon/kbobj.s
===================================================================
--- alcyon/kbobj.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/kbobj.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,900 @@
+.globl _kbobj
+.data
+_kbobj:
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $1111
+.dc.w $1111
+.dc.w $1111
+.dc.w $2111
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2212
+.dc.w $1121
+.dc.w $2121
+.dc.w $2122
+.dc.w $2112
+.dc.w $2121
+.dc.w $2122
+.dc.w $2122
+.dc.w $1212
+.dc.w $1121
+.dc.w $2122
+.dc.w $2121
+.dc.w $2212
+.dc.w $2121
+.dc.w $1122
+.dc.w $2112
+.dc.w $2212
+.dc.w $1121
+.dc.w $2121
+.dc.w $2122
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2112
+.dc.w $1122
+.dc.w $1112
+.dc.w $2112
+.dc.w $1212
+.dc.w $2212
+.dc.w $2121
+.dc.w $1221
+.dc.w $1212
+.dc.w $1112
+.dc.w $2121
+.dc.w $1111
+.dc.w $1212
+.dc.w $2212
+.dc.w $2121
+.dc.w $1221
+.dc.w $2112
+.dc.w $2212
+.dc.w $2121
+.dc.w $1221
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.dc.w $2222
+.data
Index: alcyon/lcdlbls.s
===================================================================
--- alcyon/lcdlbls.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/lcdlbls.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,4333 @@
+.globl _lcdx
+.globl _lcdy
+.globl _lcdbit
+.globl _lcdrow
+.globl _lcdcol
+.globl _lcdbase
+.globl _lcdctl1
+.globl _lcdctl2
+.globl _v_obtab
+.globl _v_curob
+.globl _v_nobj
+.globl _v_obpri
+.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 _QQsw
+.globl _QQanch
+.globl _QQin
+.globl _QQip
+.globl _QQop
+.globl _QQnum
+.globl _QQlnum
+.globl _QQchr
+.globl _QQdig
+.globl _QQstr
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _stmptr
+.globl _defptr
+.globl _patches
+.globl _defents
+.globl _seqtab
+.globl _seqflag
+.globl _seqline
+.globl _seqstim
+.globl _seqtime
+.globl _sregval
+.globl _trstate
+.globl _filecat
+.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 _d_key
+.globl _e_key
+.globl _m_key
+.globl _x_key
+.globl _olddkey
+.globl _oldekey
+.globl _oldmkey
+.globl _oldxkey
+.globl _point
+.globl _oldsw
+.globl _swpt
+.globl _aswtbl
+.globl _asig
+.globl _asmode
+.globl _astat
+.globl _aval
+.globl _clkrun
+.globl _ctrsw
+.globl _curasg
+.globl _gomode
+.globl _ismode
+.globl _lampio
+.globl _lampsw
+.globl _loadrow
+.globl _loadsw
+.globl _ltagged
+.globl _ndisp
+.globl _oldpk
+.globl _oldsl
+.globl _pkctrl
+.globl _recsw
+.globl _sliders
+.globl _tagslot
+.globl _tmpomlt
+.globl _tmpoval
+.globl _tuneval
+.globl _seqdupd
+.globl _BGeq
+.globl _BGother
+.globl _BGprmtr
+.globl _articen
+.globl _grpmode
+.globl _grpsel
+.globl _grpstat
+.globl _ins2grp
+.globl _lastart
+.globl _s_trns
+.globl _vce2grp
+.globl _vce2trg
+.globl _anrs
+.globl _iotime
+.globl _lcdontm
+.globl _lcdtime
+.globl _gdstbc
+.globl _valents
+.globl _BarType
+.data
+_BarType:
+.dc.w $1
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $0
+.globl _artitab
+.data
+_artitab:
+.dc.w $3E80
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3E80
+.dc.w $3E80
+.dc.w $3E80
+.dc.w $3E80
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3E80
+.dc.w $0
+.globl _arpar
+.data
+_arpar:
+.dc.w $4
+.dc.w $2
+.dc.w $9
+.dc.w $B
+.dc.w $C
+.dc.w $1
+.dc.w $3
+.dc.w $5
+.dc.w $7
+.dc.w $D
+.dc.w $E
+.dc.w $F
+.dc.w $A
+.dc.w $6
+.globl _sl2gain
+.data
+_sl2gain:
+.dc.w $FFF4
+.dc.w $FFF4
+.dc.w $FFF4
+.dc.w $FFF4
+.dc.w $FFF4
+.dc.w $FFF5
+.dc.w $FFF6
+.dc.w $FFF7
+.dc.w $FFF8
+.dc.w $FFF9
+.dc.w $FFFA
+.dc.w $FFFB
+.dc.w $FFFC
+.dc.w $FFFD
+.dc.w $FFFE
+.dc.w $FFFF
+.dc.w $0
+.dc.w $1
+.dc.w $2
+.dc.w $3
+.dc.w $4
+.dc.w $5
+.dc.w $6
+.dc.w $7
+.dc.w $8
+.dc.w $9
+.dc.w $A
+.dc.w $B
+.dc.w $C
+.dc.w $C
+.dc.w $C
+.dc.w $C
+.globl _vmasks
+.data
+_vmasks:
+.dc.w $8000
+.dc.w $C000
+.dc.w $E000
+.dc.w $F000
+.dc.w $F800
+.dc.w $FC00
+.dc.w $FE00
+.dc.w $FF00
+.dc.w $FF80
+.dc.w $FFC0
+.dc.w $FFE0
+.dc.w $FFF0
+.dc.w $FFF8
+.dc.w $FFFC
+.dc.w $FFFE
+.dc.w $FFFF
+.globl _src2var
+.data
+_src2var:
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $3
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $5
+.dc.w $FFFF
+.dc.w $4
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $0
+.dc.w $1
+.dc.w $2
+.globl _potlbls
+.data
+_potlbls:
+*line 183
+.dc.l L1
+*line 184
+.dc.l L2
+*line 185
+.dc.l L3
+*line 186
+.dc.l L4
+*line 187
+.dc.l L5
+*line 188
+.dc.l L6
+*line 189
+.dc.l L7
+*line 191
+.dc.l L8
+.globl _swtlbls
+.data
+_swtlbls:
+*line 196
+.dc.l L9
+*line 197
+.dc.l L10
+*line 198
+.dc.l L11
+*line 199
+.dc.l L12
+*line 200
+.dc.l L13
+*line 201
+.dc.l L14
+*line 202
+.dc.l L15
+*line 204
+.dc.l L16
+.globl _aslbls
+.data
+_aslbls:
+*line 221
+.dc.l L17
+*line 222
+.dc.l L18
+*line 223
+.dc.l L19
+*line 224
+.dc.l L20
+*line 225
+.dc.l L21
+*line 227
+.dc.l L22
+.globl _t_prmtr
+.data
+_t_prmtr:
+*line 234
+.dc.l _quiet
+*line 235
+.dc.l _trapper
+*line 237
+.dc.l _setlamp
+*line 238
+.dc.l _l_clock
+*line 239
+.dc.l _rpctl
+*line 241
+.dc.l _l_goto
+*line 242
+.dc.l _l_inst
+*line 243
+.dc.l _l_asgn
+*line 244
+.dc.l _l_load
+*line 246
+.dc.l _nokey
+*line 247
+.dc.l _nokey
+*line 248
+.dc.l _l_other
+*line 250
+.dc.l _l_prmtr
+*line 252
+.dc.l _l_init
+.globl _t_voice
+.data
+_t_voice:
+*line 256
+.dc.l _l_voice
+*line 257
+.dc.l _l_voice
+*line 259
+.dc.l _l_voice
+*line 260
+.dc.l _l_voice
+*line 261
+.dc.l _l_voice
+*line 263
+.dc.l _l_voice
+*line 264
+.dc.l _l_voice
+*line 265
+.dc.l _l_voice
+*line 266
+.dc.l _l_voice
+*line 268
+.dc.l _l_voice
+*line 269
+.dc.l _l_voice
+*line 270
+.dc.l _l_voice
+*line 272
+.dc.l _l_prmtr
+*line 274
+.dc.l _l_init
+.globl _t_other
+.data
+_t_other:
+*line 281
+.dc.l _quiet
+*line 282
+.dc.l _trapper
+*line 284
+.dc.l _setlamp
+*line 285
+.dc.l _l_clock
+*line 286
+.dc.l _rpctl
+*line 288
+.dc.l _l_goto
+*line 289
+.dc.l _l_inst
+*line 290
+.dc.l _l_asgn
+*line 291
+.dc.l _l_load
+*line 293
+.dc.l _nokey
+*line 294
+.dc.l _nokey
+*line 295
+.dc.l _l_eq
+*line 297
+.dc.l _l_prmtr
+*line 299
+.dc.l _l_init
+.globl _t_eq
+.data
+_t_eq:
+*line 303
+.dc.l _quiet
+*line 304
+.dc.l _trapper
+*line 306
+.dc.l _setlamp
+*line 307
+.dc.l _l_clock
+*line 308
+.dc.l _rpctl
+*line 310
+.dc.l _l_goto
+*line 311
+.dc.l _l_inst
+*line 312
+.dc.l _l_asgn
+*line 313
+.dc.l _l_load
+*line 315
+.dc.l _nokey
+*line 316
+.dc.l _nokey
+*line 317
+.dc.l _l_eq
+*line 319
+.dc.l _l_prmtr
+*line 321
+.dc.l _l_init
+.globl _t_inst
+.data
+_t_inst:
+*line 328
+.dc.l _l_group
+*line 329
+.dc.l _l_group
+*line 331
+.dc.l _l_group
+*line 332
+.dc.l _l_group
+*line 333
+.dc.l _l_group
+*line 335
+.dc.l _l_group
+*line 336
+.dc.l _l_group
+*line 337
+.dc.l _l_group
+*line 338
+.dc.l _l_group
+*line 340
+.dc.l _l_group
+*line 341
+.dc.l _l_group
+*line 342
+.dc.l _l_group
+*line 344
+.dc.l _l_inst
+*line 346
+.dc.l _l_dflt
+.globl _t_libr
+.data
+_t_libr:
+*line 350
+.dc.l _quiet
+*line 351
+.dc.l _trapper
+*line 353
+.dc.l _setlamp
+*line 354
+.dc.l _l_clock
+*line 355
+.dc.l _rpctl
+*line 357
+.dc.l _nokey
+*line 358
+.dc.l _nokey
+*line 359
+.dc.l _nokey
+*line 360
+.dc.l _nokey
+*line 362
+.dc.l _nokey
+*line 363
+.dc.l _nokey
+*line 364
+.dc.l _nokey
+*line 366
+.dc.l _nokey
+*line 368
+.dc.l _nokey
+.globl _t_ngrp
+.data
+_t_ngrp:
+*line 375
+.dc.l _quiet
+*line 376
+.dc.l _trapper
+*line 378
+.dc.l _setlamp
+*line 379
+.dc.l _l_clock
+*line 380
+.dc.l _rpctl
+*line 382
+.dc.l _nokey
+*line 383
+.dc.l _nokey
+*line 384
+.dc.l _nokey
+*line 385
+.dc.l _nokey
+*line 387
+.dc.l _nokey
+*line 388
+.dc.l _nokey
+*line 389
+.dc.l _nokey
+*line 391
+.dc.l _nokey
+*line 393
+.dc.l _nokey
+.globl _t_load
+.data
+_t_load:
+*line 397
+.dc.l _quiet
+*line 398
+.dc.l _trapper
+*line 400
+.dc.l _setlamp
+*line 401
+.dc.l _nokey
+*line 402
+.dc.l _nokey
+*line 404
+.dc.l _nokey
+*line 405
+.dc.l _nokey
+*line 406
+.dc.l _nokey
+*line 407
+.dc.l _l_load
+*line 409
+.dc.l _nokey
+*line 410
+.dc.l _nokey
+*line 411
+.dc.l _nokey
+*line 413
+.dc.l _nokey
+*line 415
+.dc.l _nokey
+.globl _quiet
+.text
+_quiet:
+~~quiet:
+link R14,#0
+movem.l R6-R7,-(sp)
+~vce=R7
+*line 430
+clr R7
+bra L26
+L27:
+*line 431
+clr (sp)
+move #2,-(sp)
+move R7,-(sp)
+jsr _sendval
+addq.l #4,sp
+L25:
+*line 430
+add #1,R7
+L26:
+*line 430
+cmp #12,R7
+blt L27
+L24:
+*line 433
+move #16,(sp)
+clr -(sp)
+move.l #_seqflag,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 434
+move #16,(sp)
+clr -(sp)
+move.l #_seqtime,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 436
+move #16,(sp)
+clr -(sp)
+move.l #_trstate,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 438
+move #-1,_seqdupd
+*line 440
+move #4608,(sp)
+jsr _stmproc
+L23:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _rpctl
+.text
+_rpctl:
+~~rpctl:
+~stat=8
+link R14,#-4
+*line 452
+*line 453
+tst 8(R14)
+beq L28
+*line 454
+*line 455
+tst _recsw
+beq L10000
+clr R0
+bra L10001
+L10000:move #1,R0
+L10001:move R0,_recsw
+*line 456
+jsr _dsrpmod
+L28:unlk R14
+rts
+.globl _trapper
+.text
+_trapper:
+~~trapper:
+~stat=8
+link R14,#-4
+*line 471
+*line 472
+tst 8(R14)
+beq L30
+*line 472
+jsr _xtrap15
+L30:L29:unlk R14
+rts
+.globl _l_clock
+.text
+_l_clock:
+~~l_clock:
+~stat=8
+link R14,#-4
+*line 484
+*line 485
+tst 8(R14)
+beq L31
+*line 486
+*line 487
+tst _clkrun
+beq L10002
+clr (sp)
+bra L10003
+L10002:move #1,(sp)
+L10003:jsr _clkset
+*line 488
+jsr _dclkmd
+L31:unlk R14
+rts
+.globl _ulamp
+.text
+_ulamp:
+~~ulamp:
+link R14,#-4
+*line 499
+*line 500
+cmp #1,_sliders
+beq L32
+cmp #4,_sliders
+beq L32
+*line 501
+*line 502
+move.l #_GLCplot,_point
+*line 503
+move #1,(sp)
+jsr _GLCcurs
+*line 505
+*line 506
+tst _lampsw
+beq L33
+*line 506
+move #1,(sp)
+move #54,-(sp)
+move #101,-(sp)
+move #54,-(sp)
+move #78,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 507
+bra L34
+L33:
+*line 508
+clr (sp)
+move #54,-(sp)
+move #101,-(sp)
+move #54,-(sp)
+move #78,-(sp)
+jsr _lseg
+addq.l #8,sp
+L34:
+*line 510
+clr (sp)
+jsr _GLCcurs
+L32:unlk R14
+rts
+.globl _preio
+.text
+_preio:
+~~preio:
+link R14,#-6
+~oldipl=-2
+*line 526
+move #4,(sp)
+jsr _setipl
+move R0,-2(R14)
+*line 528
+move _lampsw,_lampio
+*line 529
+move.l _lcdtime,_iotime
+*line 530
+clr _lampsw
+*line 531
+move.b #31,_io_leds
+*line 533
+move -2(R14),(sp)
+jsr _setipl
+L35:unlk R14
+rts
+.globl _postio
+.text
+_postio:
+~~postio:
+link R14,#-6
+~oldipl=-2
+*line 546
+move #4,(sp)
+jsr _setipl
+move R0,-2(R14)
+*line 548
+move _lampio,_lampsw
+*line 550
+*line 550
+tst.l _iotime
+bne L10004
+tst _lampsw
+beq L37
+L10004:*line 551
+*line 552
+move.l _lcdontm,_lcdtime
+*line 553
+move.b #159,_io_leds
+*line 554
+*line 555
+L37:
+*line 556
+move -2(R14),(sp)
+jsr _setipl
+L36:unlk R14
+rts
+.globl _setlamp
+.text
+_setlamp:
+~~setlamp:
+~stat=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~oldi=R7
+*line 572
+*line 573
+tst 8(R14)
+beq L38
+*line 574
+*line 575
+move #4,(sp)
+jsr _setipl
+move R0,R7
+*line 577
+move.l _lcdontm,_lcdtime
+*line 579
+*line 579
+tst _lampsw
+beq L39
+*line 580
+*line 581
+clr _lampsw
+*line 582
+move.b #31,_io_leds
+*line 583
+bra L40
+L39:
+*line 584
+*line 585
+*line 586
+move #1,_lampsw
+*line 587
+move.b #159,_io_leds
+L40:
+*line 590
+move R7,(sp)
+jsr _setipl
+*line 592
+jsr _ulamp
+L38:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _lcd_on
+.text
+_lcd_on:
+~~lcd_on:
+link R14,#0
+movem.l R6-R7,-(sp)
+~oldi=R7
+*line 605
+move #4,(sp)
+jsr _setipl
+move R0,R7
+*line 607
+move.l _lcdontm,_lcdtime
+*line 608
+move.b #159,_io_leds
+*line 610
+move R7,(sp)
+jsr _setipl
+L41:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _loadkey
+.text
+_loadkey:
+~~loadkey:
+~key=8
+link R14,#-4
+*line 625
+*line 626
+tst _astat
+beq L42
+*line 627
+*line 628
+*line 628
+tst _loadsw
+beq L43
+*line 629
+*line 630
+*line 630
+cmp #7,8(R14)
+bge L44
+*line 631
+*line 632
+move 8(R14),(sp)
+add #65,(sp)
+jsr _loadem
+*line 633
+*line 634
+clr _loadsw
+*line 635
+clr _ltagged
+*line 636
+move.l _olddkey,_d_key
+*line 637
+move.l _oldxkey,_x_key
+*line 638
+move.l _oldekey,_e_key
+*line 639
+move.l _oldmkey,_m_key
+*line 640
+move _oldpk,_pkctrl
+*line 641
+move _oldsl,_sliders
+*line 642
+move.l _oldsw,_swpt
+*line 643
+jsr _lcdlbls
+*line 644
+*line 645
+L44:bra L42
+*line 646
+*line 647
+L43:L42:unlk R14
+rts
+.globl _pcancel
+.text
+_pcancel:
+~~pcancel:
+~pm=8
+link R14,#-4
+*line 662
+move.l #_GLCplot,_point
+*line 663
+move #1,(sp)
+jsr _GLCcurs
+*line 665
+*line 665
+tst 8(R14)
+beq L46
+tst _asmode
+beq L46
+*line 666
+*line 667
+*line 668
+*line 669
+clr _asmode
+*line 670
+move _oldpk,_pkctrl
+*line 671
+move.l _oldsw,_swpt
+*line 672
+clr (sp)
+move #54,-(sp)
+move #287,-(sp)
+move #54,-(sp)
+move #258,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 673
+*line 674
+L46:
+*line 675
+*line 675
+cmp #1,8(R14)
+beq L47
+tst _gomode
+beq L47
+*line 676
+*line 677
+*line 678
+*line 679
+clr _gomode
+*line 680
+move _oldpk,_pkctrl
+*line 681
+clr (sp)
+move #54,-(sp)
+move #215,-(sp)
+move #54,-(sp)
+move #186,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 682
+*line 683
+L47:
+*line 684
+*line 684
+cmp #2,8(R14)
+beq L48
+tst _ismode
+beq L48
+*line 685
+*line 686
+*line 687
+*line 688
+clr _ismode
+*line 689
+move _oldpk,_pkctrl
+*line 690
+move _oldsl,_sliders
+*line 691
+move.l _oldsw,_swpt
+*line 692
+jsr _lcdlbls
+*line 693
+*line 694
+L48:
+*line 695
+clr (sp)
+jsr _GLCcurs
+*line 696
+jsr _setleds
+L45:unlk R14
+rts
+.globl _l_load
+.text
+_l_load:
+~~l_load:
+~stat=8
+link R14,#-4
+*line 711
+*line 712
+tst 8(R14)
+beq L49
+*line 713
+*line 714
+move #3,(sp)
+jsr _pcancel
+*line 715
+move #3,(sp)
+jsr _lcancel
+*line 717
+move.l #_GLCplot,_point
+*line 718
+move #1,(sp)
+jsr _GLCcurs
+*line 720
+*line 720
+tst _loadsw
+beq L50
+*line 721
+*line 722
+move.l _olddkey,_d_key
+*line 723
+move.l _oldekey,_e_key
+*line 724
+move.l _oldmkey,_m_key
+*line 725
+move.l _oldxkey,_x_key
+*line 726
+*line 727
+move _oldpk,_pkctrl
+*line 728
+move _oldsl,_sliders
+*line 729
+move.l _oldsw,_swpt
+*line 730
+*line 731
+clr _loadsw
+*line 732
+*line 733
+jsr _lcdlbls
+*line 734
+*line 735
+bra L51
+L50:
+*line 736
+*line 737
+*line 738
+clr (sp)
+jsr _clkset
+*line 739
+*line 740
+*line 740
+tst _ltagged
+beq L52
+*line 741
+*line 742
+move _loadrow,(sp)
+move #12,-(sp)
+jsr _exp_c
+addq.l #2,sp
+move R0,-(sp)
+move _tagslot,-(sp)
+jsr _dslslot
+addq.l #4,sp
+*line 743
+clr _ltagged
+*line 744
+*line 745
+L52:
+*line 746
+*line 747
+tst _pkctrl
+beq L10005
+cmp #1,_pkctrl
+bne L53
+L10005:*line 747
+move _pkctrl,_oldpk
+*line 748
+L53:
+*line 749
+*line 750
+cmp #7,_sliders
+beq L54
+*line 750
+move _sliders,_oldsl
+*line 751
+L54:
+*line 752
+move #7,_pkctrl
+*line 753
+move #7,_sliders
+*line 754
+move.l _swpt,_oldsw
+*line 755
+move.l #_t_load,_swpt
+*line 756
+*line 757
+move.l _d_key,_olddkey
+*line 758
+move.l _x_key,_oldxkey
+*line 759
+move.l _e_key,_oldekey
+*line 760
+move.l _m_key,_oldmkey
+*line 761
+move.l #_loadkey,_d_key
+*line 762
+move.l #_l_load,_x_key
+*line 763
+move.l #_l_load,_e_key
+*line 764
+move.l #_l_load,_m_key
+*line 765
+*line 766
+move #1,_loadsw
+*line 767
+*line 768
+jsr _lcdlbls
+*line 769
+move #1,(sp)
+move #54,-(sp)
+move #317,-(sp)
+move #54,-(sp)
+move #294,-(sp)
+jsr _lseg
+addq.l #8,sp
+L51:
+*line 772
+clr (sp)
+jsr _GLCcurs
+*line 773
+jsr _setleds
+L49:unlk R14
+rts
+.globl _lcdlbls
+.text
+_lcdlbls:
+~~lcdlbls:
+link R14,#-94
+movem.l R5-R7,-(sp)
+~i=R7
+~barval=R6
+~buf=-8
+~dsp=-94
+*line 791
+move.l #_GLCplot,_point
+*line 793
+jsr _GLCinit
+*line 794
+move #1,(sp)
+jsr _GLCcurs
+*line 798
+move _sliders,R0
+bra L57
+*line 799
+L58:
+*line 800
+L59:
+*line 801
+L60:
+*line 802
+*line 803
+*line 804
+move _sliders,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_swtlbls,R9
+move.l 0(R8,R9.l),(sp)
+move #1,-(sp)
+clr -(sp)
+jsr _GLCtext
+addq.l #4,sp
+*line 805
+*line 806
+move _gomode,R0
+bra L62
+*line 807
+L63:
+*line 808
+*line 809
+*line 810
+move.l #L64,(sp)
+move #31,-(sp)
+clr -(sp)
+jsr _GLCtext
+addq.l #4,sp
+*line 811
+move #1,(sp)
+move #54,-(sp)
+move #215,-(sp)
+move #54,-(sp)
+move #186,-(sp)
+jsr _lseg
+addq.l #8,sp
+bra L61
+*line 812
+*line 813
+L65:
+*line 814
+*line 815
+*line 816
+move.l #L66,(sp)
+move #31,-(sp)
+clr -(sp)
+jsr _GLCtext
+addq.l #4,sp
+*line 817
+move #1,(sp)
+move #54,-(sp)
+move #215,-(sp)
+move #54,-(sp)
+move #186,-(sp)
+jsr _lseg
+addq.l #8,sp
+bra L61
+*line 818
+*line 819
+L67:
+*line 820
+*line 821
+*line 822
+move.l #L68,(sp)
+move #31,-(sp)
+clr -(sp)
+jsr _GLCtext
+addq.l #4,sp
+*line 823
+clr (sp)
+move #54,-(sp)
+move #215,-(sp)
+move #54,-(sp)
+move #186,-(sp)
+jsr _lseg
+addq.l #8,sp
+bra L61
+*line 824
+bra L61
+L62:cmp #1,R0
+beq L63
+cmp #2,R0
+beq L65
+bra L67
+L61:
+*line 825
+*line 826
+bra L56
+*line 827
+*line 828
+*line 829
+L69:
+*line 830
+*line 831
+*line 832
+clr.b -94(R14)
+*line 833
+*line 834
+clr R7
+bra L72
+L73:
+*line 835
+*line 836
+*line 837
+*line 838
+move R7,R8
+add.l R8,R8
+move.l #_articen,R9
+tst 0(R8,R9.l)
+beq L10006
+move #127,(sp)
+bra L10008
+L10006:move #32,(sp)
+L10008:move R7,-(sp)
+add #1,(sp)
+move R7,R8
+add.l R8,R8
+move.l #_articen,R9
+tst 0(R8,R9.l)
+beq L10009
+move #126,-(sp)
+bra L10011
+L10009:move #32,-(sp)
+L10011:move.l #L74,-(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+jsr _sprintf
+adda.l #12,sp
+*line 839
+*line 840
+move.l R14,(sp)
+sub.l #8,(sp)
+move.l R14,-(sp)
+add.l #-94,(sp)
+jsr _strcat
+addq.l #4,sp
+L71:
+*line 834
+add #1,R7
+L72:
+*line 834
+cmp #12,R7
+blt L73
+L70:
+*line 841
+*line 842
+*line 843
+move.l #L75,(sp)
+move.l R14,-(sp)
+add.l #-94,(sp)
+jsr _strcat
+addq.l #4,sp
+*line 844
+*line 845
+move.l R14,(sp)
+add.l #-94,(sp)
+move #1,-(sp)
+clr -(sp)
+jsr _GLCtext
+addq.l #4,sp
+bra L56
+*line 846
+*line 847
+L76:
+*line 848
+*line 849
+*line 850
+clr.b -94(R14)
+*line 851
+*line 852
+clr R7
+bra L79
+L80:
+*line 853
+*line 854
+*line 855
+*line 856
+move R7,R8
+add.l R8,R8
+move.l #_grpsel,R9
+tst 0(R8,R9.l)
+beq L10012
+move #127,(sp)
+bra L10014
+L10012:move #32,(sp)
+L10014:move R7,-(sp)
+add #1,(sp)
+move R7,R8
+add.l R8,R8
+move.l #_grpsel,R9
+tst 0(R8,R9.l)
+beq L10015
+move #126,-(sp)
+bra L10017
+L10015:move #32,-(sp)
+L10017:move.l #L81,-(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+jsr _sprintf
+adda.l #12,sp
+*line 857
+*line 858
+move.l R14,(sp)
+sub.l #8,(sp)
+move.l R14,-(sp)
+add.l #-94,(sp)
+jsr _strcat
+addq.l #4,sp
+L78:
+*line 852
+add #1,R7
+L79:
+*line 852
+cmp #12,R7
+blt L80
+L77:
+*line 859
+*line 860
+*line 861
+*line 862
+cmp #2,_ismode
+bne L82
+*line 862
+move.l #L83,(sp)
+move.l R14,-(sp)
+add.l #-94,(sp)
+jsr _strcat
+addq.l #4,sp
+*line 863
+bra L84
+L82:
+*line 864
+move.l #L85,(sp)
+move.l R14,-(sp)
+add.l #-94,(sp)
+jsr _strcat
+addq.l #4,sp
+L84:
+*line 865
+*line 866
+move.l #L86,(sp)
+move.l R14,-(sp)
+add.l #-94,(sp)
+jsr _strcat
+addq.l #4,sp
+*line 867
+*line 868
+move.l R14,(sp)
+add.l #-94,(sp)
+move #1,-(sp)
+clr -(sp)
+jsr _GLCtext
+addq.l #4,sp
+bra L56
+*line 869
+*line 870
+L87:
+*line 871
+L88:
+*line 872
+L89:
+*line 873
+*line 874
+*line 875
+move _sliders,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_swtlbls,R9
+move.l 0(R8,R9.l),(sp)
+move #1,-(sp)
+clr -(sp)
+jsr _GLCtext
+addq.l #4,sp
+bra L56
+*line 876
+bra L56
+L57:cmp #7,R0
+bhi L56
+asl #2,R0
+move R0,R8
+add.l #L90,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L90:.dc.l L58
+.dc.l L69
+.dc.l L59
+.dc.l L60
+.dc.l L76
+.dc.l L87
+.dc.l L88
+.dc.l L89
+.text
+L56:
+*line 881
+move _sliders,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_potlbls,R9
+move.l 0(R8,R9.l),(sp)
+move #1,-(sp)
+move #7,-(sp)
+jsr _GLCtext
+addq.l #4,sp
+*line 883
+clr R7
+bra L93
+L94:
+*line 884
+move #1,(sp)
+move #63,-(sp)
+move R7,R0
+muls #36,R0
+move R0,-(sp)
+add #39,(sp)
+clr -(sp)
+move R7,R0
+muls #36,R0
+move R0,-(sp)
+add #39,(sp)
+jsr _lseg
+addq.l #8,sp
+L92:
+*line 883
+add #1,R7
+L93:
+*line 883
+cmp #13,R7
+blt L94
+L91:
+*line 886
+move _sliders,R0
+bra L96
+*line 887
+L97:
+*line 888
+L98:
+*line 889
+L99:
+*line 890
+L100:
+*line 891
+L101:
+*line 892
+L102:
+*line 893
+*line 894
+*line 895
+clr R7
+bra L105
+L106:
+*line 896
+*line 897
+*line 897
+move R7,R8
+add.l R8,R8
+move.l #_BarType,R9
+tst 0(R8,R9.l)
+beq L107
+*line 898
+*line 899
+move R7,R8
+add.l R8,R8
+add.l #_BGprmtr,R8
+move (R8),R6
+asr #5,R6
+add #-500,R6
+asl #6,R6
+ext.l R6
+divs #252,R6
+*line 900
+move R6,(sp)
+move R7,-(sp)
+jsr _BarCset
+addq.l #2,sp
+*line 901
+bra L108
+L107:
+*line 902
+*line 903
+*line 904
+move R7,R8
+add.l R8,R8
+add.l #_BGprmtr,R8
+move (R8),R6
+ext.l R6
+divs #252,R6
+*line 905
+move R6,(sp)
+move R7,-(sp)
+jsr _BarBset
+addq.l #2,sp
+L108:
+*line 906
+L104:
+*line 895
+add #1,R7
+L105:
+*line 895
+cmp #14,R7
+blt L106
+L103:
+*line 907
+*line 908
+bra L95
+*line 909
+*line 910
+L109:
+*line 911
+*line 912
+*line 913
+clr R7
+bra L112
+L113:
+*line 914
+move R7,R8
+add.l R8,R8
+move.l #_BGother,R9
+move 0(R8,R9.l),R0
+ext.l R0
+divs #252,R0
+move R0,(sp)
+move R7,-(sp)
+jsr _BarBset
+addq.l #2,sp
+L111:
+*line 913
+add #1,R7
+L112:
+*line 913
+cmp #14,R7
+blt L113
+L110:
+*line 914
+*line 915
+bra L95
+*line 916
+*line 917
+L114:
+*line 918
+*line 919
+*line 920
+clr R7
+bra L117
+L118:
+*line 921
+move R7,R8
+add.l R8,R8
+move.l #_BGeq,R9
+move 0(R8,R9.l),(sp)
+move R7,-(sp)
+jsr _BarCset
+addq.l #2,sp
+L116:
+*line 920
+add #1,R7
+L117:
+*line 920
+cmp #14,R7
+blt L118
+L115:
+*line 921
+*line 922
+bra L95
+*line 923
+*line 924
+L119:
+*line 925
+*line 926
+bra L95
+*line 927
+bra L95
+L96:cmp #7,R0
+bhi L119
+asl #2,R0
+move R0,R8
+add.l #L120,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L120:.dc.l L97
+.dc.l L98
+.dc.l L109
+.dc.l L114
+.dc.l L99
+.dc.l L100
+.dc.l L101
+.dc.l L102
+.text
+L95:
+*line 930
+clr (sp)
+jsr _GLCcurs
+*line 931
+jsr _dsrpmod
+*line 932
+jsr _dclkmd
+*line 933
+jsr _ulamp
+L55:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _selasg
+.text
+_selasg:
+~~selasg:
+~n=8
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+~ep=R13
+*line 950
+move 8(R14),R0
+move R0,_curasg
+move R0,(sp)
+jsr _getasg
+*line 952
+*line 952
+tst _recsw
+beq L122
+*line 953
+*line 954
+*line 954
+move #-1,(sp)
+move #-1,-(sp)
+move #16,-(sp)
+move.l _t_cur,-(sp)
+move.l _p_cur,-(sp)
+jsr _findev
+adda.l #12,sp
+move.l R0,R13
+move.l R13,R0
+beq L123
+*line 955
+*line 956
+move 8(R14),R0
+move.b R0,6(R13)
+*line 957
+bra L124
+L123:
+*line 958
+*line 958
+move #6,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L125
+*line 959
+*line 960
+move.b #16,5(R13)
+*line 961
+move 8(R14),R0
+move.b R0,6(R13)
+*line 962
+move.l _t_cur,(R13)
+*line 963
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 964
+move #9,(sp)
+move.l R13,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 965
+*line 966
+*line 966
+cmp #2,_ndisp
+bne L126
+*line 967
+*line 968
+move #1,_ctrsw
+*line 969
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 970
+jsr _scupd
+*line 971
+L126:
+*line 972
+L125:L124:
+*line 973
+*line 974
+L122:
+*line 975
+clr _asmode
+*line 976
+move _oldpk,_pkctrl
+*line 977
+move.l _oldsw,_swpt
+*line 979
+move.l #_GLCplot,_point
+*line 980
+move #1,(sp)
+jsr _GLCcurs
+*line 981
+clr (sp)
+move #54,-(sp)
+move #287,-(sp)
+move #54,-(sp)
+move #258,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 982
+move _sliders,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_swtlbls,R9
+move.l 0(R8,R9.l),(sp)
+move #1,-(sp)
+clr -(sp)
+jsr _GLCtext
+addq.l #4,sp
+*line 983
+clr (sp)
+jsr _GLCcurs
+*line 985
+jsr _mpcupd
+*line 986
+jsr _setleds
+L121:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _l_adfl
+.text
+_l_adfl:
+~~l_adfl:
+~stat=8
+link R14,#-4
+*line 1001
+*line 1002
+tst 8(R14)
+beq L127
+*line 1003
+*line 1004
+clr (sp)
+jsr _selasg
+L127:unlk R14
+rts
+.globl _l_asgn
+.text
+_l_asgn:
+~~l_asgn:
+~stat=8
+link R14,#-4
+*line 1019
+*line 1020
+tst 8(R14)
+beq L128
+*line 1021
+*line 1022
+move.l #_GLCplot,_point
+*line 1023
+move #1,(sp)
+jsr _GLCcurs
+*line 1025
+*line 1025
+tst _ismode
+beq L129
+*line 1026
+*line 1027
+clr _ismode
+*line 1028
+move _oldpk,_pkctrl
+*line 1029
+move _oldsl,_sliders
+*line 1030
+move.l _oldsw,_swpt
+*line 1031
+jsr _lcdlbls
+*line 1032
+*line 1033
+L129:
+*line 1034
+*line 1034
+tst _gomode
+beq L130
+*line 1035
+*line 1036
+clr _gomode
+*line 1037
+move _oldpk,_pkctrl
+*line 1038
+clr (sp)
+move #54,-(sp)
+move #215,-(sp)
+move #54,-(sp)
+move #186,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 1039
+*line 1040
+*line 1041
+L130:
+*line 1042
+move _asmode,R0
+bra L132
+*line 1043
+L133:
+*line 1044
+*line 1045
+*line 1046
+*line 1047
+tst _pkctrl
+beq L10018
+cmp #1,_pkctrl
+bne L134
+L10018:*line 1047
+move _pkctrl,_oldpk
+*line 1048
+L134:
+*line 1049
+tst _curasg
+beq L10019
+move _curasg,R0
+sub #1,R0
+ext.l R0
+divs #20,R0
+bra L10021
+L10019:clr R0
+L10021:add #1,R0
+move R0,_asmode
+*line 1050
+move #4,_pkctrl
+*line 1051
+move #56,(sp)
+move.l _swpt,-(sp)
+move.l #_aswtbl,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 1052
+move.l _swpt,_oldsw
+*line 1053
+move.l #_aswtbl,_swpt
+*line 1054
+move.l #_l_adfl,52+_aswtbl
+*line 1055
+move #1,(sp)
+move #54,-(sp)
+move #287,-(sp)
+move #54,-(sp)
+move #258,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 1056
+move.l #L135,(sp)
+move #79,-(sp)
+clr -(sp)
+jsr _GLCtext
+addq.l #4,sp
+bra L131
+*line 1057
+*line 1058
+L136:
+*line 1059
+L137:
+*line 1060
+L138:
+*line 1061
+L139:
+*line 1062
+*line 1063
+*line 1064
+add #1,_asmode
+bra L131
+*line 1065
+*line 1066
+L140:
+*line 1067
+*line 1068
+*line 1069
+move #1,_asmode
+bra L131
+*line 1070
+*line 1071
+bra L131
+L132:cmp #5,R0
+bhi L131
+asl #2,R0
+move R0,R8
+add.l #L141,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L141:.dc.l L133
+.dc.l L136
+.dc.l L137
+.dc.l L138
+.dc.l L139
+.dc.l L140
+.text
+L131:
+*line 1074
+move _asmode,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_aslbls,R9
+move.l 0(R8,R9.l),(sp)
+move #43,-(sp)
+clr -(sp)
+jsr _GLCtext
+addq.l #4,sp
+*line 1075
+clr (sp)
+jsr _GLCcurs
+*line 1076
+jsr _setleds
+L128:unlk R14
+rts
+.globl _l_inst
+.text
+_l_inst:
+~~l_inst:
+~stat=8
+link R14,#-4
+*line 1091
+*line 1092
+tst 8(R14)
+beq L142
+*line 1093
+*line 1094
+move.l #_GLCplot,_point
+*line 1095
+move #1,(sp)
+jsr _GLCcurs
+*line 1097
+*line 1097
+tst _asmode
+beq L143
+*line 1098
+*line 1099
+clr _asmode
+*line 1100
+move _oldpk,_pkctrl
+*line 1101
+move.l _oldsw,_swpt
+*line 1102
+clr (sp)
+move #54,-(sp)
+move #287,-(sp)
+move #54,-(sp)
+move #258,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 1103
+*line 1104
+L143:
+*line 1105
+*line 1105
+tst _gomode
+beq L144
+*line 1106
+*line 1107
+clr _gomode
+*line 1108
+move _oldpk,_pkctrl
+*line 1109
+clr (sp)
+move #54,-(sp)
+move #215,-(sp)
+move #54,-(sp)
+move #186,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 1110
+*line 1111
+L144:
+*line 1112
+clr (sp)
+jsr _GLCcurs
+*line 1115
+move _ismode,R0
+bra L146
+*line 1116
+L147:
+*line 1117
+*line 1118
+*line 1119
+*line 1120
+tst _pkctrl
+beq L10022
+cmp #1,_pkctrl
+bne L148
+L10022:*line 1120
+move _pkctrl,_oldpk
+*line 1121
+L148:
+*line 1122
+*line 1123
+cmp #4,_sliders
+beq L149
+*line 1123
+move _sliders,_oldsl
+*line 1124
+L149:
+*line 1125
+move.l _swpt,_oldsw
+*line 1126
+move.l #_t_inst,_swpt
+*line 1127
+move #3,_pkctrl
+*line 1128
+move #1,_ismode
+*line 1129
+move #4,_sliders
+*line 1130
+jsr _lcdlbls
+bra L145
+*line 1131
+*line 1132
+L150:
+*line 1133
+*line 1134
+*line 1135
+move #2,_ismode
+*line 1136
+move #1,(sp)
+jsr _GLCcurs
+*line 1137
+move.l #L151,(sp)
+move #73,-(sp)
+clr -(sp)
+jsr _GLCtext
+addq.l #4,sp
+*line 1138
+clr (sp)
+jsr _GLCcurs
+bra L145
+*line 1139
+*line 1140
+L152:
+*line 1141
+L153:
+*line 1142
+*line 1143
+*line 1144
+clr _ismode
+*line 1145
+move _oldpk,_pkctrl
+*line 1146
+move _oldsl,_sliders
+*line 1147
+move.l _oldsw,_swpt
+*line 1148
+jsr _lcdlbls
+bra L145
+*line 1149
+bra L145
+L146:tst R0
+beq L147
+cmp #1,R0
+beq L150
+cmp #2,R0
+beq L152
+bra L153
+L145:
+*line 1152
+jsr _setleds
+L142:unlk R14
+rts
+.globl _selins
+.text
+_selins:
+~~selins:
+~ival=R7
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~n=R6
+~ep=R13
+*line 1170
+move 8(R14),R7
+*line 1170
+clr R6
+bra L157
+L158:
+*line 1171
+*line 1172
+*line 1173
+move R6,R8
+add.l R8,R8
+add.l #_grpsel,R8
+tst (R8)
+beq L156
+*line 1174
+*line 1175
+move R7,R0
+move R6,R9
+add.l R9,R9
+add.l #_ins2grp,R9
+move (R9),R1
+and #-256,R1
+or R1,R0
+move R6,R9
+add.l R9,R9
+add.l #_ins2grp,R9
+move R0,(R9)
+*line 1176
+move R6,(sp)
+jsr _setv2gi
+*line 1177
+*line 1178
+*line 1178
+tst _recsw
+beq L159
+move R6,R8
+add.l R8,R8
+move.l #_grpstat,R9
+tst 0(R8,R9.l)
+beq L159
+move R6,R8
+add.l R8,R8
+add.l #_grpmode,R8
+cmp #2,(R8)
+bne L159
+*line 1179
+*line 1180
+*line 1180
+move #-1,(sp)
+move R6,-(sp)
+move #4,-(sp)
+move.l _t_cur,-(sp)
+move.l _p_cur,-(sp)
+jsr _findev
+adda.l #12,sp
+move.l R0,R13
+move.l R13,R0
+beq L160
+*line 1181
+*line 1182
+move.b R7,7(R13)
+*line 1183
+bra L161
+L160:
+*line 1184
+*line 1184
+move #6,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L162
+*line 1185
+*line 1186
+move.b #4,5(R13)
+*line 1187
+move.b R6,6(R13)
+*line 1188
+move.b R7,7(R13)
+*line 1189
+move.l _t_cur,(R13)
+*line 1190
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 1191
+clr (sp)
+move.l R13,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 1192
+*line 1193
+*line 1193
+cmp #2,_ndisp
+bne L163
+*line 1194
+*line 1195
+move #1,_ctrsw
+*line 1196
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 1197
+jsr _scupd
+*line 1198
+L163:
+*line 1199
+L162:L161:
+*line 1200
+L159:L156:
+*line 1170
+add #1,R6
+L157:
+*line 1170
+cmp #12,R6
+blt L158
+L155:
+*line 1203
+jsr _setinst
+*line 1207
+clr _ismode
+*line 1208
+move _oldpk,_pkctrl
+*line 1209
+move _oldsl,_sliders
+*line 1210
+move.l _oldsw,_swpt
+*line 1211
+jsr _lcdlbls
+*line 1212
+jsr _setleds
+*line 1213
+jsr _mpcupd
+L154:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.globl _l_dflt
+.text
+_l_dflt:
+~~l_dflt:
+~stat=8
+link R14,#-4
+*line 1228
+*line 1229
+tst 8(R14)
+beq L164
+*line 1230
+*line 1231
+clr (sp)
+jsr _selins
+L164:unlk R14
+rts
+.globl _l_goto
+.text
+_l_goto:
+~~l_goto:
+~stat=8
+link R14,#-4
+*line 1246
+*line 1247
+tst 8(R14)
+beq L165
+*line 1248
+*line 1249
+move.l #_GLCplot,_point
+*line 1250
+move #1,(sp)
+jsr _GLCcurs
+*line 1252
+*line 1252
+tst _asmode
+beq L166
+*line 1253
+*line 1254
+clr _asmode
+*line 1255
+move _oldpk,_pkctrl
+*line 1256
+move.l _oldsw,_swpt
+*line 1257
+clr (sp)
+move #54,-(sp)
+move #287,-(sp)
+move #54,-(sp)
+move #258,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 1258
+*line 1259
+L166:
+*line 1260
+*line 1260
+tst _ismode
+beq L167
+*line 1261
+*line 1262
+clr _ismode
+*line 1263
+move _oldsl,_sliders
+*line 1264
+move _oldpk,_pkctrl
+*line 1265
+move.l _oldsw,_swpt
+*line 1266
+jsr _lcdlbls
+*line 1267
+*line 1268
+L167:
+*line 1269
+clr _recsw
+*line 1270
+jsr _dsrpmod
+*line 1273
+move _gomode,R0
+bra L169
+*line 1274
+L170:
+*line 1275
+*line 1276
+*line 1277
+*line 1278
+tst _pkctrl
+beq L10023
+cmp #1,_pkctrl
+bne L171
+L10023:*line 1278
+move _pkctrl,_oldpk
+*line 1279
+L171:
+*line 1280
+move #2,_pkctrl
+*line 1281
+move #1,_gomode
+*line 1282
+move.l #L172,(sp)
+move #31,-(sp)
+clr -(sp)
+jsr _GLCtext
+addq.l #4,sp
+*line 1283
+move #1,(sp)
+move #54,-(sp)
+move #215,-(sp)
+move #54,-(sp)
+move #186,-(sp)
+jsr _lseg
+addq.l #8,sp
+bra L168
+*line 1284
+*line 1285
+L173:
+*line 1286
+*line 1287
+*line 1288
+move #2,_gomode
+*line 1289
+move.l #L174,(sp)
+move #31,-(sp)
+clr -(sp)
+jsr _GLCtext
+addq.l #4,sp
+*line 1290
+move #1,(sp)
+move #54,-(sp)
+move #215,-(sp)
+move #54,-(sp)
+move #186,-(sp)
+jsr _lseg
+addq.l #8,sp
+bra L168
+*line 1291
+*line 1292
+L175:
+*line 1293
+L176:
+*line 1294
+*line 1295
+*line 1296
+move _oldpk,_pkctrl
+*line 1297
+clr _gomode
+*line 1298
+move.l #L177,(sp)
+move #31,-(sp)
+clr -(sp)
+jsr _GLCtext
+addq.l #4,sp
+*line 1299
+clr (sp)
+move #54,-(sp)
+move #215,-(sp)
+move #54,-(sp)
+move #186,-(sp)
+jsr _lseg
+addq.l #8,sp
+bra L168
+*line 1300
+bra L168
+L169:tst R0
+beq L170
+cmp #1,R0
+beq L173
+cmp #2,R0
+beq L175
+bra L176
+L168:
+*line 1303
+clr (sp)
+jsr _GLCcurs
+*line 1304
+jsr _setleds
+L165:unlk R14
+rts
+.globl _newpps
+.text
+_newpps:
+~~newpps:
+~trg=R7
+~ival=R6
+~grp=10
+~src=12
+link R14,#-4
+movem.l R2-R7/R11-R13,-(sp)
+~smf=R13
+~smp=R12
+~fpu=R11
+~ltmp=R5
+~val=R4
+~vce=R3
+~gs=-2
+~oldi=-4
+*line 1328
+move 8(R14),R7
+*line 1328
+move 14(R14),R6
+*line 1328
+move 10(R14),R0
+asl #4,R0
+or 12(R14),R0
+move R0,-2(R14)
+*line 1329
+move.l #16384+_io_fpu,R11
+*line 1330
+move -2(R14),R0
+muls #10,R0
+add.l #_valents,R0
+move.l R0,R8
+move R6,8(R8)
+*line 1331
+move -2(R14),R0
+muls #10,R0
+move.l R0,R13
+add.l #_valents,R13
+move.l R13,R12
+*line 1335
+bra L181
+L180:
+*line 1336
+*line 1337
+move 8(R12),R3
+asr #4,R3
+and #15,R3
+*line 1338
+*line 1339
+*line 1339
+move R3,R8
+add.l R8,R8
+add.l #_vce2trg,R8
+cmp (R8),R7
+bne L182
+*line 1340
+*line 1341
+clr R0
+move 8(R12),R0
+and #15,R0
+bra L184
+*line 1342
+L185:
+*line 1343
+L186:
+*line 1344
+L187:
+*line 1345
+L188:
+*line 1346
+*line 1347
+*line 1348
+move R6,R4
+asr #3,R4
+bra L183
+*line 1349
+*line 1350
+L189:
+*line 1351
+*line 1352
+*line 1353
+move R6,R5
+ext.l R5
+asr.l #$1,R5
+move R6,R0
+ext.l R0
+asr.l #$2,R0
+add.l R0,R5
+*line 1354
+*line 1355
+*line 1356
+cmp.l #$7d00,R5
+ble L190
+*line 1356
+move.l #$7d00,R5
+bra L191
+L190:
+*line 1357
+*line 1358
+cmp.l #$ffff8300,R5
+bge L192
+*line 1358
+move.l #$ffff8300,R5
+*line 1359
+L192:L191:
+*line 1360
+move R5,R4
+bra L183
+*line 1361
+*line 1362
+L193:
+*line 1363
+*line 1364
+*line 1365
+move R6,R4
+bra L183
+L184:sub #1,R0
+cmp #9,R0
+bhi L193
+asl #2,R0
+move R0,R8
+add.l #L194,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L194:.dc.l L185
+.dc.l L193
+.dc.l L186
+.dc.l L193
+.dc.l L187
+.dc.l L193
+.dc.l L188
+.dc.l L193
+.dc.l L193
+.dc.l L189
+.text
+L183:
+*line 1366
+*line 1367
+*line 1368
+move #2,(sp)
+jsr _setipl
+move R0,-4(R14)
+*line 1369
+*line 1370
+*line 1371
+*line 1372
+move.l R11,R8
+clr R1
+move 8(R12),R1
+lsl #4,R1
+lsl #1,R1
+swap R1
+clr R1
+swap R1
+add.l R1,R8
+move R4,8(R8)
+*line 1373
+*line 1374
+move -4(R14),(sp)
+jsr _setipl
+*line 1375
+*line 1376
+*line 1377
+*line 1378
+L182:L181:
+*line 1379
+move.l (R12),R12
+cmp.l R12,R13
+bne L180
+L179:L178:tst.l (sp)+
+movem.l (sp)+,R3-R7/R11-R13
+unlk R14
+rts
+.globl _newsv
+.text
+_newsv:
+~~newsv:
+~ival=R7
+~grp=8
+~src=10
+link R14,#-4
+movem.l R2-R7/R11-R13,-(sp)
+~smf=R13
+~smp=R12
+~fpu=R11
+~ltmp=R6
+~val=R5
+~gs=R4
+~oldi=R3
+~vmask=-2
+~var=-4
+*line 1404
+move 12(R14),R7
+*line 1404
+move 8(R14),R4
+asl #4,R4
+or 10(R14),R4
+*line 1406
+*line 1406
+move 10(R14),R8
+add.l R8,R8
+move.l #_src2var,R9
+move 0(R8,R9.l),R0
+move R0,-4(R14)
+cmp #-1,R0
+beq L196
+*line 1407
+*line 1408
+move -4(R14),R0
+asl #5,R0
+ext.l R0
+move 8(R14),R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_anrs,R9
+move 0(R8,R9.l),R8
+add.l R8,R8
+add.l #_vmasks,R8
+move (R8),-2(R14)
+*line 1409
+*line 1410
+*line 1411
+*line 1412
+*line 1412
+move R4,R0
+muls #10,R0
+add.l #_valents,R0
+move.l R0,R8
+move 8(R8),R5
+move R5,R0
+and -2(R14),R0
+move R7,R1
+and -2(R14),R1
+cmp R1,R0
+bne L197
+*line 1413
+*line 1414
+*line 1415
+*line 1416
+*line 1417
+tst R7
+bne L10024
+tst R5
+bne L198
+L10024:*line 1417
+clr R0
+bra L195
+L198:
+*line 1418
+L197:
+*line 1419
+*line 1420
+L196:
+*line 1421
+move.l #16384+_io_fpu,R11
+*line 1423
+move R4,R0
+muls #10,R0
+add.l #_valents,R0
+move.l R0,R8
+move R7,8(R8)
+*line 1425
+move R4,R0
+muls #10,R0
+move.l R0,R13
+add.l #_valents,R13
+*line 1426
+move.l R13,R12
+*line 1430
+bra L201
+L200:
+*line 1431
+*line 1432
+clr R0
+move 8(R12),R0
+and #15,R0
+bra L203
+*line 1433
+L204:
+*line 1434
+L205:
+*line 1435
+L206:
+*line 1436
+L207:
+*line 1437
+*line 1438
+*line 1439
+move R7,R5
+asr #3,R5
+bra L202
+*line 1440
+*line 1441
+L208:
+*line 1442
+*line 1443
+*line 1444
+move R7,R6
+ext.l R6
+asr.l #$1,R6
+move R7,R0
+ext.l R0
+asr.l #$2,R0
+add.l R0,R6
+*line 1445
+*line 1446
+*line 1447
+cmp.l #$7d00,R6
+ble L209
+*line 1447
+move.l #$7d00,R6
+bra L210
+L209:
+*line 1448
+*line 1449
+cmp.l #$ffff8300,R6
+bge L211
+*line 1449
+move.l #$ffff8300,R6
+*line 1450
+L211:L210:
+*line 1451
+move R6,R5
+bra L202
+*line 1452
+*line 1453
+L212:
+*line 1454
+*line 1455
+*line 1456
+move R7,R5
+bra L202
+L203:sub #1,R0
+cmp #9,R0
+bhi L212
+asl #2,R0
+move R0,R8
+add.l #L213,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L213:.dc.l L204
+.dc.l L212
+.dc.l L205
+.dc.l L212
+.dc.l L206
+.dc.l L212
+.dc.l L207
+.dc.l L212
+.dc.l L212
+.dc.l L208
+.text
+L202:
+*line 1457
+*line 1458
+*line 1459
+move #2,(sp)
+jsr _setipl
+move R0,R3
+*line 1460
+*line 1461
+*line 1462
+*line 1463
+move.l R11,R8
+clr R1
+move 8(R12),R1
+lsl #4,R1
+lsl #1,R1
+swap R1
+clr R1
+swap R1
+add.l R1,R8
+move R5,8(R8)
+*line 1464
+*line 1465
+move R3,(sp)
+jsr _setipl
+*line 1466
+*line 1467
+*line 1468
+L201:
+*line 1469
+move.l (R12),R12
+cmp.l R12,R13
+bne L200
+L199:
+*line 1471
+move #1,R0
+bra L195
+L195:tst.l (sp)+
+movem.l (sp)+,R3-R7/R11-R13
+unlk R14
+rts
+.globl _setsv
+.text
+_setsv:
+~~setsv:
+~ival=R7
+~grp=8
+~src=10
+link R14,#0
+movem.l R2-R7/R11-R13,-(sp)
+~smf=R13
+~smp=R12
+~fpu=R11
+~ltmp=R6
+~val=R5
+~gs=R4
+~oldi=R3
+*line 1494
+move 12(R14),R7
+*line 1494
+move 8(R14),R4
+asl #4,R4
+or 10(R14),R4
+*line 1495
+move.l #16384+_io_fpu,R11
+*line 1497
+move R4,R0
+muls #10,R0
+add.l #_valents,R0
+move.l R0,R8
+move R7,8(R8)
+*line 1499
+move R4,R0
+muls #10,R0
+move.l R0,R13
+add.l #_valents,R13
+*line 1500
+move.l R13,R12
+*line 1504
+bra L217
+L216:
+*line 1505
+*line 1506
+clr R0
+move 8(R12),R0
+and #15,R0
+bra L219
+*line 1507
+L220:
+*line 1508
+L221:
+*line 1509
+L222:
+*line 1510
+L223:
+*line 1511
+*line 1512
+*line 1513
+move R7,R5
+asr #3,R5
+bra L218
+*line 1514
+*line 1515
+L224:
+*line 1516
+*line 1517
+*line 1518
+move R7,R6
+ext.l R6
+asr.l #$1,R6
+move R7,R0
+ext.l R0
+asr.l #$2,R0
+add.l R0,R6
+*line 1519
+*line 1520
+*line 1521
+cmp.l #$7d00,R6
+ble L225
+*line 1521
+move.l #$7d00,R6
+bra L226
+L225:
+*line 1522
+*line 1523
+cmp.l #$ffff8300,R6
+bge L227
+*line 1523
+move.l #$ffff8300,R6
+*line 1524
+L227:L226:
+*line 1525
+move R6,R5
+bra L218
+*line 1526
+*line 1527
+L228:
+*line 1528
+*line 1529
+*line 1530
+move R7,R5
+bra L218
+L219:sub #1,R0
+cmp #9,R0
+bhi L228
+asl #2,R0
+move R0,R8
+add.l #L229,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L229:.dc.l L220
+.dc.l L228
+.dc.l L221
+.dc.l L228
+.dc.l L222
+.dc.l L228
+.dc.l L223
+.dc.l L228
+.dc.l L228
+.dc.l L224
+.text
+L218:
+*line 1531
+*line 1532
+*line 1533
+move #2,(sp)
+jsr _setipl
+move R0,R3
+*line 1534
+*line 1535
+*line 1536
+*line 1537
+move.l R11,R8
+clr R1
+move 8(R12),R1
+lsl #4,R1
+lsl #1,R1
+swap R1
+clr R1
+swap R1
+add.l R1,R8
+move R5,8(R8)
+*line 1538
+*line 1539
+move R3,(sp)
+jsr _setipl
+*line 1540
+*line 1541
+*line 1542
+L217:
+*line 1543
+move.l (R12),R12
+cmp.l R12,R13
+bne L216
+L215:L214:tst.l (sp)+
+movem.l (sp)+,R3-R7/R11-R13
+unlk R14
+rts
+.globl _l_prmtr
+.text
+_l_prmtr:
+~~l_prmtr:
+~stat=8
+~sig=10
+link R14,#-4
+*line 1558
+*line 1559
+tst 8(R14)
+beq L230
+*line 1560
+*line 1561
+move _sliders,R0
+bra L232
+*line 1562
+L233:
+*line 1563
+L234:
+*line 1564
+L235:
+*line 1565
+*line 1566
+*line 1567
+move #1,_sliders
+*line 1568
+move.l #_t_voice,_swpt
+bra L231
+*line 1569
+*line 1570
+L236:
+*line 1571
+L237:
+*line 1572
+*line 1573
+*line 1574
+clr _sliders
+*line 1575
+move.l #_t_prmtr,_swpt
+bra L231
+*line 1576
+bra L231
+L232:tst R0
+beq L233
+cmp #1,R0
+beq L236
+cmp #2,R0
+beq L234
+cmp #3,R0
+beq L235
+bra L237
+L231:
+*line 1579
+jsr _lcdlbls
+*line 1580
+jsr _setleds
+L230:unlk R14
+rts
+.globl _l_voice
+.text
+_l_voice:
+~~l_voice:
+~stat=8
+~vce=10
+link R14,#-8
+movem.l R4-R7/R13-R13,-(sp)
+~ap=R7
+~j=R6
+~par=R5
+~fpu=R13
+~buf=-8
+*line 1600
+*line 1601
+tst 8(R14)
+beq L238
+*line 1602
+*line 1603
+move 10(R14),R8
+add.l R8,R8
+move.l #_articen,R9
+tst 0(R8,R9.l)
+beq L10025
+clr R0
+bra L10026
+L10025:move #1,R0
+L10026:move 10(R14),R9
+add.l R9,R9
+add.l #_articen,R9
+move R0,(R9)
+*line 1605
+*line 1606
+move 10(R14),R8
+add.l R8,R8
+move.l #_articen,R9
+tst 0(R8,R9.l)
+beq L10027
+move #127,(sp)
+bra L10029
+L10027:move #32,(sp)
+L10029:move 10(R14),-(sp)
+add #1,(sp)
+move 10(R14),R8
+add.l R8,R8
+move.l #_articen,R9
+tst 0(R8,R9.l)
+beq L10030
+move #126,-(sp)
+bra L10032
+L10030:move #32,-(sp)
+L10032:move.l #L239,-(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+jsr _sprintf
+adda.l #12,sp
+*line 1608
+move #1,(sp)
+jsr _GLCcurs
+*line 1609
+move.l R14,(sp)
+sub.l #8,(sp)
+move 10(R14),R0
+muls #6,R0
+move R0,-(sp)
+add #1,(sp)
+clr -(sp)
+jsr _GLCtext
+addq.l #4,sp
+*line 1610
+clr (sp)
+jsr _GLCcurs
+*line 1612
+*line 1612
+move 10(R14),R8
+add.l R8,R8
+move.l #_articen,R9
+tst 0(R8,R9.l)
+beq L240
+*line 1613
+*line 1614
+clr R7
+bra L243
+L244:
+*line 1615
+*line 1616
+move R7,R8
+add.l R8,R8
+add.l #_arpar,R8
+move (R8),R5
+*line 1617
+move R5,R8
+add.l R8,R8
+move.l #_lastart,R9
+move 0(R8,R9.l),(sp)
+move R5,-(sp)
+move 10(R14),-(sp)
+jsr _sendart
+addq.l #4,sp
+L242:
+*line 1614
+add #1,R7
+L243:
+*line 1614
+cmp #14,R7
+blt L244
+L241:
+*line 1618
+*line 1619
+bra L245
+L240:
+*line 1620
+*line 1621
+*line 1622
+move 10(R14),R0
+asl #8,R0
+asl #1,R0
+ext.l R0
+move.l R0,R13
+add.l #_io_fpu,R13
+add.l #$4000,R13
+*line 1623
+*line 1624
+move #1,R6
+bra L248
+L249:
+*line 1625
+move.l R13,R8
+move R6,R1
+asl #4,R1
+move R1,R9
+add.l R9,R9
+add.l R9,R8
+clr 14(R8)
+L247:
+*line 1624
+add #1,R6
+L248:
+*line 1624
+cmp #16,R6
+blt L249
+L246:
+*line 1625
+L245:L238:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.globl _l_group
+.text
+_l_group:
+~~l_group:
+~stat=8
+~grp=10
+link R14,#-12
+~buf=-8
+*line 1643
+*line 1644
+tst 8(R14)
+beq L250
+*line 1645
+*line 1646
+move 10(R14),R8
+add.l R8,R8
+move.l #_grpsel,R9
+tst 0(R8,R9.l)
+beq L10033
+clr R0
+bra L10034
+L10033:move #1,R0
+L10034:move 10(R14),R9
+add.l R9,R9
+add.l #_grpsel,R9
+move R0,(R9)
+*line 1648
+*line 1649
+move 10(R14),R8
+add.l R8,R8
+move.l #_grpsel,R9
+tst 0(R8,R9.l)
+beq L10035
+move #127,(sp)
+bra L10037
+L10035:move #32,(sp)
+L10037:move 10(R14),-(sp)
+add #1,(sp)
+move 10(R14),R8
+add.l R8,R8
+move.l #_grpsel,R9
+tst 0(R8,R9.l)
+beq L10038
+move #126,-(sp)
+bra L10040
+L10038:move #32,-(sp)
+L10040:move.l #L251,-(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+jsr _sprintf
+adda.l #12,sp
+*line 1651
+move #1,(sp)
+jsr _GLCcurs
+*line 1652
+move.l R14,(sp)
+sub.l #8,(sp)
+move 10(R14),R0
+muls #6,R0
+move R0,-(sp)
+add #1,(sp)
+clr -(sp)
+jsr _GLCtext
+addq.l #4,sp
+*line 1653
+clr (sp)
+jsr _GLCcurs
+L250:unlk R14
+rts
+.globl _l_other
+.text
+_l_other:
+~~l_other:
+~stat=8
+~sig=10
+link R14,#-4
+*line 1665
+*line 1666
+tst 8(R14)
+beq L252
+*line 1667
+*line 1668
+move #2,_sliders
+*line 1669
+move.l #_t_other,_swpt
+*line 1671
+jsr _lcdlbls
+L252:unlk R14
+rts
+.globl _l_eq
+.text
+_l_eq:
+~~l_eq:
+~stat=8
+~sig=10
+link R14,#-4
+*line 1686
+*line 1687
+tst 8(R14)
+beq L253
+*line 1688
+*line 1689
+*line 1689
+cmp #3,_sliders
+bne L254
+*line 1690
+*line 1691
+clr _sliders
+*line 1692
+move.l #_t_prmtr,_swpt
+*line 1693
+bra L255
+L254:
+*line 1694
+*line 1695
+*line 1696
+move #3,_sliders
+*line 1697
+move.l #_t_eq,_swpt
+L255:
+*line 1700
+jsr _lcdlbls
+L253:unlk R14
+rts
+.globl _artclr
+.text
+_artclr:
+~~artclr:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 1713
+clr R7
+bra L259
+L260:
+*line 1714
+move R7,R8
+add.l R8,R8
+move.l #_arpar,R9
+move 0(R8,R9.l),R8
+add.l R8,R8
+add.l #_lastart,R8
+move R7,R9
+add.l R9,R9
+add.l #_artitab,R9
+move (R9),(R8)
+L258:
+*line 1713
+add #1,R7
+L259:
+*line 1713
+cmp #14,R7
+blt L260
+L257:L256:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _l_init
+.text
+_l_init:
+~~l_init:
+~stat=8
+~sig=10
+link R14,#-16
+movem.l R4-R7/R13-R13,-(sp)
+~fpu=R13
+~barval=R7
+~i=R6
+~j=R5
+~buf=-16
+*line 1733
+*line 1734
+tst 8(R14)
+beq L261
+*line 1735
+*line 1736
+move.l #16384+_io_fpu,R13
+*line 1738
+move _sliders,R0
+bra L263
+*line 1739
+L264:
+*line 1740
+L265:
+*line 1741
+L266:
+*line 1742
+L267:
+*line 1743
+L268:
+*line 1744
+L269:
+*line 1745
+*line 1746
+*line 1747
+*line 1748
+*line 1749
+clr R6
+bra L272
+L273:
+*line 1750
+move #1,R5
+bra L276
+L277:
+*line 1751
+move.l R13,R8
+move R6,R1
+asl #8,R1
+move R1,R9
+add.l R9,R9
+add.l R9,R8
+move R5,R1
+asl #4,R1
+move R1,R9
+add.l R9,R9
+add.l R9,R8
+clr 14(R8)
+L275:
+*line 1750
+add #1,R5
+L276:
+*line 1750
+cmp #16,R5
+blt L277
+L274:L271:
+*line 1749
+add #1,R6
+L272:
+*line 1749
+cmp #12,R6
+blt L273
+L270:
+*line 1751
+*line 1752
+*line 1753
+jsr _artclr
+*line 1754
+*line 1755
+clr R6
+bra L280
+L281:
+*line 1756
+*line 1757
+move R6,R8
+add.l R8,R8
+add.l #_BGprmtr,R8
+move R6,R9
+add.l R9,R9
+add.l #_artitab,R9
+move (R9),(R8)
+*line 1758
+*line 1759
+*line 1759
+move R6,R8
+add.l R8,R8
+move.l #_BarType,R9
+tst 0(R8,R9.l)
+beq L282
+*line 1760
+*line 1761
+move R6,R8
+add.l R8,R8
+add.l #_artitab,R8
+move (R8),R7
+asr #5,R7
+add #-500,R7
+asl #6,R7
+ext.l R7
+divs #252,R7
+*line 1762
+move R7,(sp)
+move R6,-(sp)
+jsr _BarCset
+addq.l #2,sp
+*line 1763
+bra L283
+L282:
+*line 1764
+*line 1765
+*line 1766
+move R6,R8
+add.l R8,R8
+add.l #_artitab,R8
+move (R8),R7
+ext.l R7
+divs #252,R7
+*line 1767
+move R7,(sp)
+move R6,-(sp)
+jsr _BarBset
+addq.l #2,sp
+L283:
+*line 1768
+L279:
+*line 1755
+add #1,R6
+L280:
+*line 1755
+cmp #14,R6
+blt L281
+L278:
+*line 1769
+*line 1770
+bra L262
+*line 1771
+*line 1772
+L284:
+*line 1773
+*line 1774
+*line 1775
+*line 1776
+*line 1777
+move #1,R6
+bra L287
+L288:
+*line 1778
+move.l R13,R8
+move R6,R1
+asl #8,R1
+move R1,R9
+add.l R9,R9
+add.l R9,R8
+clr 14(R8)
+L286:
+*line 1777
+add #1,R6
+L287:
+*line 1777
+cmp #12,R6
+blt L288
+L285:
+*line 1778
+*line 1779
+*line 1780
+clr R6
+bra L291
+L292:
+*line 1781
+move R6,R8
+add.l R8,R8
+add.l #_BGother,R8
+move #0,R0
+move R0,(R8)
+move R0,(sp)
+move R6,-(sp)
+jsr _BarBset
+addq.l #2,sp
+L290:
+*line 1780
+add #1,R6
+L291:
+*line 1780
+cmp #14,R6
+blt L292
+L289:
+*line 1781
+*line 1782
+bra L262
+*line 1783
+*line 1784
+L293:
+*line 1785
+*line 1786
+*line 1787
+clr R6
+bra L296
+L297:
+*line 1788
+*line 1789
+clr (sp)
+jsr _gain2eq
+move R0,(sp)
+move R6,-(sp)
+jsr _sendeq
+addq.l #2,sp
+*line 1790
+move R6,R8
+add.l R8,R8
+add.l #_BGeq,R8
+move #0,R0
+move R0,(R8)
+move R0,(sp)
+move R6,-(sp)
+jsr _BarCset
+addq.l #2,sp
+L295:
+*line 1787
+add #1,R6
+L296:
+*line 1787
+cmp #14,R6
+blt L297
+L294:
+*line 1791
+*line 1792
+bra L262
+*line 1793
+bra L262
+L263:cmp #7,R0
+bhi L262
+asl #2,R0
+move R0,R8
+add.l #L298,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L298:.dc.l L264
+.dc.l L265
+.dc.l L284
+.dc.l L293
+.dc.l L266
+.dc.l L267
+.dc.l L268
+.dc.l L269
+.text
+L262:L261:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.globl _sendart
+.text
+_sendart:
+~~sendart:
+~vce=8
+~par=10
+~ival=12
+link R14,#-2
+movem.l R4-R7/R13-R13,-(sp)
+~fpu=R13
+~val=R7
+~oldi=R6
+~mult=R5
+~nop=-2
+*line 1813
+move 10(R14),R8
+add.l R8,R8
+add.l #_lastart,R8
+move 12(R14),(R8)
+*line 1815
+move 8(R14),R0
+asl #8,R0
+asl #1,R0
+ext.l R0
+move.l R0,R13
+move 10(R14),R0
+asl #4,R0
+asl #1,R0
+ext.l R0
+add.l R0,R13
+add.l #_io_fpu,R13
+add.l #$4000,R13
+*line 1816
+move #32767,R5
+*line 1818
+move 10(R14),R0
+bra L301
+*line 1819
+L302:
+*line 1820
+L303:
+*line 1821
+L304:
+*line 1822
+L305:
+*line 1823
+*line 1824
+*line 1825
+clr (sp)
+move 12(R14),-(sp)
+jsr _addpch
+addq.l #2,sp
+move R0,R7
+bra L300
+*line 1826
+*line 1827
+L306:
+*line 1828
+*line 1829
+*line 1830
+move 12(R14),R7
+asr #5,R7
+add #-500,R7
+asl #5,R7
+bra L300
+*line 1831
+*line 1832
+*line 1833
+*line 1834
+*line 1835
+L307:
+*line 1836
+*line 1837
+*line 1838
+move 12(R14),R7
+*line 1839
+move #-1,R5
+bra L300
+*line 1840
+*line 1841
+L308:
+*line 1842
+*line 1843
+*line 1844
+move 12(R14),R7
+asr #5,R7
+add #-500,R7
+asl #5,R7
+*line 1845
+move #-1,R5
+bra L300
+*line 1846
+*line 1847
+L309:
+*line 1848
+*line 1849
+*line 1850
+move 12(R14),R7
+bra L300
+L301:sub #1,R0
+cmp #9,R0
+bhi L309
+asl #2,R0
+move R0,R8
+add.l #L310,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L310:.dc.l L302
+.dc.l L307
+.dc.l L303
+.dc.l L308
+.dc.l L304
+.dc.l L309
+.dc.l L305
+.dc.l L309
+.dc.l L309
+.dc.l L306
+.text
+L300:
+*line 1853
+move #2,(sp)
+jsr _setipl
+move R0,R6
+*line 1857
+move R7,12(R13)
+*line 1858
+add #1,-2(R14)
+*line 1858
+add #1,-2(R14)
+*line 1858
+add #1,-2(R14)
+*line 1859
+move R5,14(R13)
+*line 1861
+move R6,(sp)
+jsr _setipl
+L299:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.globl _doslide
+.text
+_doslide:
+~~doslide:
+link R14,#0
+movem.l R2-R7,-(sp)
+~arp=R7
+~bar=R6
+~barval=R5
+~i=R4
+~slval=R3
+*line 1880
+move _aval,R0
+sub #5,R0
+cmp #100,R0
+ble L10041
+move #100,R0
+bra L10043
+L10041:move _aval,R0
+sub #5,R0
+bge L10044
+clr R0
+bra L10046
+L10044:move _aval,R0
+sub #5,R0
+L10046:L10043:move R0,R3
+muls #320,R3
+*line 1881
+move _asig,R6
+add #-25,R6
+*line 1883
+move _sliders,R0
+bra L313
+*line 1884
+L314:
+*line 1885
+L315:
+*line 1886
+L316:
+*line 1887
+L317:
+*line 1888
+L318:
+*line 1889
+L319:
+*line 1890
+*line 1891
+*line 1892
+move R6,R8
+add.l R8,R8
+add.l #_BGprmtr,R8
+move R3,(R8)
+*line 1893
+move R6,R8
+add.l R8,R8
+add.l #_arpar,R8
+move (R8),R7
+*line 1894
+*line 1895
+clr R4
+bra L322
+L323:
+*line 1896
+*line 1897
+move R4,R8
+add.l R8,R8
+move.l #_articen,R9
+tst 0(R8,R9.l)
+beq L324
+*line 1897
+move R3,(sp)
+move R7,-(sp)
+move R4,-(sp)
+jsr _sendart
+addq.l #4,sp
+*line 1898
+L324:L321:
+*line 1895
+add #1,R4
+L322:
+*line 1895
+cmp #12,R4
+blt L323
+L320:
+*line 1899
+*line 1899
+move R6,R8
+add.l R8,R8
+move.l #_BarType,R9
+tst 0(R8,R9.l)
+beq L325
+*line 1900
+*line 1901
+move R3,R5
+asr #5,R5
+add #-500,R5
+asl #6,R5
+ext.l R5
+divs #252,R5
+*line 1902
+move R5,(sp)
+move R6,-(sp)
+jsr _BarCadj
+addq.l #2,sp
+*line 1903
+bra L326
+L325:
+*line 1904
+*line 1905
+*line 1906
+move R3,R5
+ext.l R5
+divs #252,R5
+*line 1907
+move R5,(sp)
+move R6,-(sp)
+jsr _BarBadj
+addq.l #2,sp
+L326:
+*line 1908
+*line 1909
+bra L311
+*line 1910
+*line 1911
+*line 1912
+L327:
+*line 1913
+*line 1914
+*line 1915
+move _asig,R0
+bra L329
+*line 1916
+L330:
+*line 1917
+*line 1918
+move R3,(sp)
+clr -(sp)
+move #9,-(sp)
+jsr _sendart
+addq.l #4,sp
+bra L328
+*line 1919
+*line 1920
+L331:
+*line 1921
+*line 1922
+move R3,(sp)
+clr -(sp)
+move #3,-(sp)
+jsr _sendart
+addq.l #4,sp
+bra L328
+*line 1923
+*line 1924
+L332:
+*line 1925
+*line 1926
+move R3,(sp)
+clr -(sp)
+move #2,-(sp)
+jsr _sendart
+addq.l #4,sp
+bra L328
+*line 1927
+*line 1928
+L333:
+*line 1929
+*line 1930
+move R3,(sp)
+clr -(sp)
+move #1,-(sp)
+jsr _sendart
+addq.l #4,sp
+bra L328
+*line 1931
+*line 1932
+L334:
+*line 1933
+*line 1934
+move R3,(sp)
+clr -(sp)
+move #11,-(sp)
+jsr _sendart
+addq.l #4,sp
+bra L328
+*line 1935
+*line 1936
+L335:
+*line 1937
+*line 1938
+move R3,(sp)
+clr -(sp)
+move #10,-(sp)
+jsr _sendart
+addq.l #4,sp
+bra L328
+*line 1939
+*line 1940
+L336:
+*line 1941
+*line 1942
+move R3,(sp)
+clr -(sp)
+move #6,-(sp)
+jsr _sendart
+addq.l #4,sp
+bra L328
+*line 1943
+*line 1944
+L337:
+*line 1945
+*line 1946
+move R3,(sp)
+clr -(sp)
+move #8,-(sp)
+jsr _sendart
+addq.l #4,sp
+bra L328
+*line 1947
+*line 1948
+L338:
+*line 1949
+*line 1950
+clr R3
+bra L328
+*line 1951
+bra L328
+L329:sub #26,R0
+cmp #7,R0
+bhi L338
+asl #2,R0
+move R0,R8
+add.l #L339,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L339:.dc.l L330
+.dc.l L331
+.dc.l L332
+.dc.l L333
+.dc.l L334
+.dc.l L335
+.dc.l L336
+.dc.l L337
+.text
+L328:
+*line 1952
+*line 1953
+*line 1954
+move R6,R8
+add.l R8,R8
+add.l #_BGother,R8
+move R3,(R8)
+*line 1955
+move R3,R5
+ext.l R5
+divs #252,R5
+*line 1956
+move R5,(sp)
+move R6,-(sp)
+jsr _BarBadj
+addq.l #2,sp
+*line 1957
+bra L311
+*line 1958
+*line 1959
+*line 1960
+*line 1961
+L340:
+*line 1962
+*line 1963
+*line 1964
+move R3,R5
+asr #5,R5
+add #-500,R5
+asl #6,R5
+ext.l R5
+divs #252,R5
+*line 1965
+move R6,R8
+add.l R8,R8
+add.l #_BGeq,R8
+move R5,(R8)
+*line 1966
+move R3,R0
+move #11,R1
+asr R1,R0
+add #16,R0
+move R0,R8
+add.l R8,R8
+move.l #_sl2gain,R9
+move 0(R8,R9.l),(sp)
+jsr _gain2eq
+move R0,(sp)
+move R6,-(sp)
+jsr _sendeq
+addq.l #2,sp
+*line 1967
+move R5,(sp)
+move R6,-(sp)
+jsr _BarCadj
+addq.l #2,sp
+*line 1968
+bra L311
+*line 1969
+*line 1970
+L341:
+*line 1971
+bra L311
+*line 1972
+bra L312
+L313:cmp #7,R0
+bhi L341
+asl #2,R0
+move R0,R8
+add.l #L342,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L342:.dc.l L314
+.dc.l L315
+.dc.l L327
+.dc.l L340
+.dc.l L316
+.dc.l L317
+.dc.l L318
+.dc.l L319
+.text
+L312:L311:tst.l (sp)+
+movem.l (sp)+,R3-R7
+unlk R14
+rts
+.globl _settmpo
+.text
+_settmpo:
+~~settmpo:
+~val=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~timeval=R7
+*line 1990
+move 8(R14),_tmpoval
+*line 1991
+move _tmpomlt,R7
+add #50,R7
+muls _tmpoval,R7
+ext.l R7
+divs #100,R7
+*line 1992
+move R7,R0
+ext.l R0
+move.l R0,-(sp)
+move.l #$2ee00,-(sp)
+jsr ldiv
+addq.l #8,sp
+sub.l #$1,R0
+move R0,R7
+*line 1993
+move R7,R0
+asr #8,R0
+move.b R0,8+_io_time
+*line 1994
+move R7,R0
+and #255,R0
+move.b R0,10+_io_time
+L343:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _settune
+.text
+_settune:
+~~settune:
+link R14,#-2
+movem.l R2-R7/R13-R13,-(sp)
+~oldi=R7
+~i=R6
+~grp=R5
+~fpu=R13
+~trval=R4
+~trmax=R3
+~nop=-2
+*line 2013
+move.l #$55a0,R3
+*line 2015
+move #8704,(sp)
+jsr _setsr
+move R0,R7
+*line 2019
+clr R6
+bra L347
+L348:
+*line 2020
+*line 2021
+*line 2021
+move R6,R8
+add.l R8,R8
+add.l #_vce2grp,R8
+move (R8),R5
+cmp #-1,R5
+beq L349
+*line 2022
+*line 2023
+move _tuneval,R4
+ext.l R4
+move R5,R8
+sub #1,R8
+add.l R8,R8
+move.l #_s_trns,R9
+move 0(R8,R9.l),R0
+ext.l R0
+asl.l #$1,R0
+add.l R0,R4
+*line 2024
+*line 2025
+*line 2026
+cmp.l R3,R4
+ble L350
+*line 2026
+move.l R3,R4
+*line 2027
+L350:bra L351
+L349:
+*line 2028
+*line 2029
+*line 2030
+move _tuneval,R4
+ext.l R4
+L351:
+*line 2031
+*line 2032
+*line 2033
+move R6,R0
+asl #8,R0
+asl #1,R0
+ext.l R0
+move.l R0,R13
+add.l #_io_fpu,R13
+add.l #$4020,R13
+*line 2034
+*line 2035
+move.l R4,R0
+and.l #$ffff,R0
+move R0,16(R13)
+*line 2036
+add #1,-2(R14)
+*line 2036
+add #1,-2(R14)
+*line 2036
+add #1,-2(R14)
+*line 2037
+move #32767,18(R13)
+L346:
+*line 2019
+add #1,R6
+L347:
+*line 2019
+cmp #12,R6
+blt L348
+L345:
+*line 2040
+move R7,(sp)
+jsr _setsr
+L344:tst.l (sp)+
+movem.l (sp)+,R3-R7/R13-R13
+unlk R14
+rts
+.data
+L1:.dc.b $4C,$6F,$63,$6E,$20,$20,$4C,$65,$76,$65,$6C,$20,$49,$6E,$64,$20,$31,$20,$49,$6E,$64,$20,$32,$20,$49,$6E,$64,$20,$33,$20
+.dc.b $46,$72,$71,$20,$31,$20,$46,$72,$71,$20,$32,$20,$46,$72,$71,$20,$33,$20,$46,$72,$71,$20,$34,$20,$49,$6E,$64,$20,$34,$20
+.dc.b $49,$6E,$64,$20,$35,$20,$49,$6E,$64,$20,$36,$20,$46,$69,$6C,$74,$72,$20,$52,$65,$73,$6F,$6E,$0
+L2:.dc.b $4C,$6F,$63,$6E,$20,$20,$4C,$65,$76,$65,$6C,$20,$49,$6E,$64,$20,$31,$20,$49,$6E,$64,$20,$32,$20,$49,$6E,$64,$20,$33,$20
+.dc.b $46,$72,$71,$20,$31,$20,$46,$72,$71,$20,$32,$20,$46,$72,$71,$20,$33,$20,$46,$72,$71,$20,$34,$20,$49,$6E,$64,$20,$34,$20
+.dc.b $49,$6E,$64,$20,$35,$20,$49,$6E,$64,$20,$36,$20,$46,$69,$6C,$74,$72,$20,$52,$65,$73,$6F,$6E,$0
+L3:.dc.b $20,$20,$20,$20,$20,$20,$41,$75,$78,$20,$20,$20,$44,$65,$70,$74,$68,$20,$52,$61,$74,$65,$20,$20,$49,$6E,$74,$65,$6E,$20
+.dc.b $43,$56,$20,$31,$20,$20,$43,$56,$20,$32,$20,$20,$43,$56,$20,$33,$20,$20,$43,$56,$20,$34,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$0
+L4:.dc.b $20,$35,$30,$20,$20,$20,$20,$31,$35,$30,$20,$20,$20,$34,$30,$30,$20,$20,$20,$20,$31,$6B,$20,$20,$32,$2E,$35,$6B,$20,$20
+.dc.b $20,$20,$36,$6B,$20,$20,$20,$31,$35,$6B,$20,$20,$20,$35,$30,$20,$20,$20,$20,$31,$35,$30,$20,$20,$20,$34,$30,$30,$20,$20
+.dc.b $20,$20,$31,$6B,$20,$20,$32,$2E,$35,$6B,$20,$20,$20,$20,$36,$6B,$20,$20,$20,$31,$35,$6B,$20,$0
+L5:.dc.b $4C,$6F,$63,$6E,$20,$20,$4C,$65,$76,$65,$6C,$20,$49,$6E,$64,$20,$31,$20,$49,$6E,$64,$20,$32,$20,$49,$6E,$64,$20,$33,$20
+.dc.b $46,$72,$71,$20,$31,$20,$46,$72,$71,$20,$32,$20,$46,$72,$71,$20,$33,$20,$46,$72,$71,$20,$34,$20,$49,$6E,$64,$20,$34,$20
+.dc.b $49,$6E,$64,$20,$35,$20,$49,$6E,$64,$20,$36,$20,$46,$69,$6C,$74,$72,$20,$52,$65,$73,$6F,$6E,$0
+L6:.dc.b $4C,$6F,$63,$6E,$20,$20,$4C,$65,$76,$65,$6C,$20,$49,$6E,$64,$20,$31,$20,$49,$6E,$64,$20,$32,$20,$49,$6E,$64,$20,$33,$20
+.dc.b $46,$72,$71,$20,$31,$20,$46,$72,$71,$20,$32,$20,$46,$72,$71,$20,$33,$20,$46,$72,$71,$20,$34,$20,$49,$6E,$64,$20,$34,$20
+.dc.b $49,$6E,$64,$20,$35,$20,$49,$6E,$64,$20,$36,$20,$46,$69,$6C,$74,$72,$20,$52,$65,$73,$6F,$6E,$0
+L7:.dc.b $4C,$6F,$63,$6E,$20,$20,$4C,$65,$76,$65,$6C,$20,$49,$6E,$64,$20,$31,$20,$49,$6E,$64,$20,$32,$20,$49,$6E,$64,$20,$33,$20
+.dc.b $46,$72,$71,$20,$31,$20,$46,$72,$71,$20,$32,$20,$46,$72,$71,$20,$33,$20,$46,$72,$71,$20,$34,$20,$49,$6E,$64,$20,$34,$20
+.dc.b $49,$6E,$64,$20,$35,$20,$49,$6E,$64,$20,$36,$20,$46,$69,$6C,$74,$72,$20,$52,$65,$73,$6F,$6E,$0
+L8:.dc.b $4C,$6F,$63,$6E,$20,$20,$4C,$65,$76,$65,$6C,$20,$49,$6E,$64,$20,$31,$20,$49,$6E,$64,$20,$32,$20,$49,$6E,$64,$20,$33,$20
+.dc.b $46,$72,$71,$20,$31,$20,$46,$72,$71,$20,$32,$20,$46,$72,$71,$20,$33,$20,$46,$72,$71,$20,$34,$20,$49,$6E,$64,$20,$34,$20
+.dc.b $49,$6E,$64,$20,$35,$20,$49,$6E,$64,$20,$36,$20,$46,$69,$6C,$74,$72,$20,$52,$65,$73,$6F,$6E,$0
+L9:.dc.b $51,$75,$69,$65,$74,$20,$52,$4F,$4D,$50,$20,$20,$4C,$61,$6D,$70,$20,$20,$43,$6C,$6F,$63,$6B,$20,$20,$50,$2F,$52,$20,$20
+.dc.b $47,$6F,$20,$54,$6F,$20,$49,$6E,$73,$74,$72,$20,$41,$73,$67,$6D,$74,$20,$4C,$6F,$61,$64,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$4F,$74,$68,$65,$72,$20,$56,$6F,$69,$63,$65,$20,$49,$6E,$69,$74,$20,$0
+L10:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$56,$6F,$69,$63,$65,$20,$49,$6E,$69,$74,$20,$0
+L11:.dc.b $51,$75,$69,$65,$74,$20,$52,$4F,$4D,$50,$20,$20,$4C,$61,$6D,$70,$20,$20,$43,$6C,$6F,$63,$6B,$20,$20,$50,$2F,$52,$20,$20
+.dc.b $47,$6F,$20,$54,$6F,$20,$49,$6E,$73,$74,$72,$20,$41,$73,$67,$6D,$74,$20,$4C,$6F,$61,$64,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$45,$51,$20,$20,$20,$56,$6F,$69,$63,$65,$20,$49,$6E,$69,$74,$20,$0
+L12:.dc.b $51,$75,$69,$65,$74,$20,$52,$4F,$4D,$50,$20,$20,$4C,$61,$6D,$70,$20,$20,$43,$6C,$6F,$63,$6B,$20,$20,$50,$2F,$52,$20,$20
+.dc.b $47,$6F,$20,$54,$6F,$20,$49,$6E,$73,$74,$72,$20,$41,$73,$67,$6D,$74,$20,$4C,$6F,$61,$64,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$50,$72,$6D,$74,$72,$20,$56,$6F,$69,$63,$65,$20,$49,$6E,$69,$74,$20,$0
+L13:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$2B,$30,$30,$20,$20,$44,$65,$66,$6C,$74,$0
+L14:.dc.b $51,$75,$69,$65,$74,$20,$52,$4F,$4D,$50,$20,$20,$4C,$61,$6D,$70,$20,$20,$43,$6C,$6F,$63,$6B,$20,$20,$50,$2F,$52,$20,$20
+.dc.b $47,$6F,$20,$54,$6F,$20,$49,$6E,$73,$74,$72,$20,$41,$73,$67,$6D,$74,$20,$4C,$6F,$61,$64,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$4F,$74,$68,$65,$72,$20,$56,$6F,$69,$63,$65,$20,$44,$65,$66,$6C,$74,$0
+L15:.dc.b $51,$75,$69,$65,$74,$20,$52,$4F,$4D,$50,$20,$20,$4C,$61,$6D,$70,$20,$20,$43,$6C,$6F,$63,$6B,$20,$20,$50,$2F,$52,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$0
+L16:.dc.b $51,$75,$69,$65,$74,$20,$52,$4F,$4D,$50,$20,$20,$4C,$61,$6D,$70,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$4C,$6F,$61,$64,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$0
+L17:.dc.b $41,$73,$67,$6D,$74,$0
+L18:.dc.b $20,$2B,$30,$30,$20,$0
+L19:.dc.b $20,$2B,$32,$30,$20,$0
+L20:.dc.b $20,$2B,$34,$30,$20,$0
+L21:.dc.b $20,$2B,$36,$30,$20,$0
+L22:.dc.b $20,$2B,$38,$30,$20,$0
+L64:.dc.b $53,$65,$63,$74,$6E,$0
+L66:.dc.b $53,$63,$6F,$72,$65,$0
+L68:.dc.b $47,$6F,$20,$54,$6F,$0
+L74:.dc.b $25,$63,$25,$32,$64,$20,$25,$63,$20,$0
+L75:.dc.b $56,$6F,$69,$63,$65,$20,$49,$6E,$69,$74,$20,$0
+L81:.dc.b $25,$63,$25,$32,$64,$20,$25,$63,$20,$0
+L83:.dc.b $20,$2B,$32,$30,$20,$0
+L85:.dc.b $20,$2B,$30,$30,$20,$0
+L86:.dc.b $20,$44,$65,$66,$6C,$74,$0
+L135:.dc.b $44,$65,$66,$6C,$74,$0
+L151:.dc.b $20,$2B,$32,$30,$20,$0
+L172:.dc.b $53,$65,$63,$74,$6E,$0
+L174:.dc.b $53,$63,$6F,$72,$65,$0
+L177:.dc.b $47,$6F,$20,$54,$6F,$0
+L239:.dc.b $25,$63,$25,$32,$64,$20,$25,$63,$0
+L251:.dc.b $25,$63,$25,$32,$64,$20,$25,$63,$0
Index: alcyon/ldfield.s
===================================================================
--- alcyon/ldfield.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/ldfield.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1094 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _filecat
+.globl _astat
+.globl _catin
+.globl _cmfirst
+.globl _cxrate
+.globl _cxval
+.globl _cyrate
+.globl _cyval
+.globl _ldelsw
+.globl _lderrsw
+.globl _ldkind
+.globl _ldpass
+.globl _ldrow
+.globl _ldslot
+.globl _lmwtype
+.globl _loadrow
+.globl _loadsw
+.globl _lorchl
+.globl _lrasw
+.globl _lselsw
+.globl _ltagged
+.globl _ndisp
+.globl _oldltag
+.globl _oldpk
+.globl _oldsl
+.globl _pkctrl
+.globl _sliders
+.globl _stcrow
+.globl _stccol
+.globl _submenu
+.globl _tagslot
+.globl _thcwval
+.globl _tvcwval
+.globl _librob
+.globl _bfs
+.globl _ldfile
+.globl _ldcmnt
+.globl _crate1
+.globl _ldmap
+.globl _swpt
+.globl _oldsw
+.globl _csbp
+.globl _ldboxes
+.globl _ld_fet1
+.data
+_ld_fet1:
+.dc.w $15
+.dc.w $A
+.dc.w $11
+.dc.w $0
+*line 98
+.dc.l _et_null
+*line 98
+.dc.l _ef_null
+*line 98
+.dc.l _rd_null
+*line 98
+.dc.l _nd_null
+.dc.w $15
+.dc.w $1B
+.dc.w $3F
+.dc.w $0
+*line 99
+.dc.l _et_null
+*line 99
+.dc.l _ef_null
+*line 99
+.dc.l _rd_null
+*line 99
+.dc.l _nd_null
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.l $0
+.dc.l $0
+.dc.l $0
+.dc.l $0
+.globl _ldbox
+.data
+_ldbox:
+.dc.w $1
+.dc.w $1
+.dc.w $1FE
+.dc.w $D
+.dc.w $C
+.dc.w $2
+.dc.w $0
+.dc.w $1
+.dc.w $1
+.dc.w $E
+.dc.w $1FE
+.dc.w $124
+.dc.w $C
+.dc.w $2
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $126
+.dc.w $4E
+.dc.w $133
+.dc.w $C
+.dc.w $3
+.dc.w $15
+.dc.w $1
+.dc.w $50
+.dc.w $126
+.dc.w $8F
+.dc.w $133
+.dc.w $C
+.dc.w $4
+.dc.w $15
+.dc.w $A
+.dc.w $91
+.dc.w $126
+.dc.w $D6
+.dc.w $133
+.dc.w $C
+.dc.w $5
+.dc.w $15
+.dc.w $13
+.dc.w $D8
+.dc.w $126
+.dc.w $1FE
+.dc.w $133
+.dc.w $C
+.dc.w $6
+.dc.w $15
+.dc.w $1B
+.dc.w $1
+.dc.w $135
+.dc.w $46
+.dc.w $141
+.dc.w $C
+.dc.w $7
+.dc.w $16
+.dc.w $1
+.dc.w $1
+.dc.w $142
+.dc.w $46
+.dc.w $14F
+.dc.w $C
+.dc.w $7
+.dc.w $17
+.dc.w $1
+.dc.w $1
+.dc.w $150
+.dc.w $46
+.dc.w $15C
+.dc.w $C
+.dc.w $7
+.dc.w $18
+.dc.w $1
+.dc.w $48
+.dc.w $135
+.dc.w $FF
+.dc.w $15C
+.dc.w $C
+.dc.w $8
+.dc.w $16
+.dc.w $A
+.dc.w $101
+.dc.w $135
+.dc.w $1FE
+.dc.w $15C
+.dc.w $C
+.dc.w $9
+.dc.w $16
+.dc.w $21
+.globl _ldbxlb0
+.data
+_ldbxlb0:
+*line 121
+.dc.l L1
+*line 122
+.dc.l L2
+*line 123
+.dc.l L3
+*line 124
+.dc.l L4
+*line 125
+.dc.l L5
+*line 126
+.dc.l L6
+*line 127
+.dc.l L7
+*line 128
+.dc.l L8
+*line 129
+.dc.l L9
+*line 130
+.dc.l L10
+*line 132
+.dc.l L11
+.globl _ld_flds
+.data
+_ld_flds:
+*line 139
+.dc.l _stdctp0
+*line 140
+.dc.l _ld_prmv
+*line 141
+.dc.l _nokey
+*line 142
+.dc.l _cxkstd
+*line 143
+.dc.l _cykstd
+*line 144
+.dc.l _ldcxupd
+*line 145
+.dc.l _ldcyupd
+*line 146
+.dc.l _nokey
+*line 147
+.dc.l _nokey
+*line 148
+.dc.l _ldxkey
+*line 149
+.dc.l _select
+*line 150
+.dc.l _ldmkey
+*line 151
+.dc.l _ldkey
+*line 152
+.dc.l _nokey
+*line 153
+.dc.l _ld_fet1
+*line 154
+.dc.l _ldboxes
+*line 155
+.dc.l _crate1
+*line 156
+.dc.l _crate1
+.dc.w $1
+.dc.w $20
+.dc.w $13C
+.globl _ldxkey
+.text
+_ldxkey:
+~~ldxkey:
+link R14,#-4
+movem.l R6-R7/R13-R13,-(sp)
+~fn=R13
+~slot=R7
+~buf=-4
+*line 178
+*line 179
+tst _astat
+bne L13
+*line 179
+move #-1,R0
+bra L12
+*line 180
+L13:
+*line 181
+jsr _clrerms
+*line 182
+move _cyval,R0
+ext.l R0
+divs #14,R0
+move R0,_stcrow
+*line 183
+move _cxval,R0
+asr #3,R0
+move R0,_stccol
+*line 185
+*line 185
+tst _lselsw
+beq L14
+tst _lrasw
+beq L14
+*line 186
+*line 187
+*line 187
+move _cyval,(sp)
+jsr _ldline
+move R0,R7
+tst R7
+beq L15
+*line 188
+*line 189
+sub #1,R7
+*line 190
+move R7,R8
+add.l R8,R8
+add.l #_ldmap,R8
+move #-1,(R8)
+*line 191
+move R7,(sp)
+move 24+_ldbox,-(sp)
+jsr _dpy_scr
+addq.l #2,sp
+*line 192
+clr R0
+bra L12
+*line 193
+*line 194
+bra L16
+L15:
+*line 195
+move #-1,R0
+bra L12
+L16:
+*line 196
+*line 197
+L14:
+*line 198
+*line 199
+move #2,(sp)
+jsr _lcancel
+tst R0
+beq L17
+*line 199
+clr R0
+bra L12
+*line 200
+L17:
+*line 201
+*line 201
+tst _ldelsw
+bne L18
+*line 202
+*line 203
+*line 203
+move _cyval,(sp)
+jsr _ldline
+move R0,_ldrow
+beq L19
+*line 204
+*line 205
+*line 205
+cmp #11,_stccol
+bne L20
+*line 206
+*line 207
+*line 208
+move _stcrow,(sp)
+jsr _lin2slt
+move R0,R7
+cmp #-1,R7
+bne L21
+*line 208
+move #-1,R0
+bra L12
+*line 209
+L21:
+*line 210
+*line 210
+tst _ltagged
+beq L22
+*line 211
+*line 212
+*line 212
+cmp _tagslot,R7
+beq L23
+*line 213
+*line 214
+move _oldltag,R0
+move _tagslot,R1
+muls #56,R1
+add.l #_filecat,R1
+move.l R1,R9
+move.b R0,3(R9)
+*line 215
+clr _ltagged
+*line 216
+jsr _showcat
+*line 217
+move #-1,R0
+bra L12
+*line 218
+*line 219
+L23:
+*line 220
+jsr _putcat
+*line 221
+clr _ltagged
+*line 222
+jsr _showcat
+*line 223
+bra L24
+L22:
+*line 224
+*line 225
+*line 226
+move R7,R0
+muls #56,R0
+move.l R0,R8
+move.l #_filecat,R9
+move.b 3(R8,R9.l),R0
+ext.w R0
+move R0,_oldltag
+*line 227
+move R7,R0
+muls #56,R0
+add.l #_filecat,R0
+move.l R0,R8
+move.b #32,3(R8)
+*line 228
+move #1,_ltagged
+*line 229
+move R7,_tagslot
+*line 230
+*line 231
+move _oldltag,R0
+move.b R0,-4(R14)
+*line 232
+clr.b -3(R14)
+*line 233
+*line 234
+*line 235
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L25
+*line 235
+clr (sp)
+jsr _vbank
+*line 236
+L25:
+*line 237
+*line 238
+move #14,(sp)
+move.l R14,-(sp)
+sub.l #4,(sp)
+move #11,-(sp)
+move _stcrow,-(sp)
+move 26+_ldbox,-(sp)
+move #14,-(sp)
+jsr _exp_c
+addq.l #2,sp
+move R0,-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+L24:
+*line 239
+*line 240
+*line 241
+clr R0
+bra L12
+*line 242
+*line 243
+L20:
+*line 244
+*line 245
+cmp #13,_stccol
+blt L10000
+cmp #20,_stccol
+ble L26
+L10000:*line 245
+move #-1,R0
+bra L12
+*line 246
+L26:
+*line 247
+*line 247
+move _ldrow,(sp)
+jsr _lin2slt
+move R0,_ldslot
+cmp #-1,R0
+beq L27
+*line 248
+*line 249
+*line 250
+*line 251
+move _ldrow,(sp)
+move #14,-(sp)
+jsr _exp_c
+addq.l #2,sp
+move R0,-(sp)
+move _ldslot,-(sp)
+jsr _dslslot
+addq.l #4,sp
+*line 252
+move #1,_ldelsw
+*line 253
+clr R0
+bra L12
+*line 254
+*line 255
+*line 256
+L27:bra L28
+L19:
+*line 257
+*line 258
+*line 259
+*line 259
+cmp #21,_stcrow
+bne L29
+*line 260
+*line 261
+*line 261
+cmp #10,_stccol
+blt L30
+cmp #17,_stccol
+bgt L30
+*line 262
+*line 263
+*line 264
+*line 265
+move #8,(sp)
+move #32,-(sp)
+move.l #_ldfile,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 266
+move #3,(sp)
+jsr _ldswin
+*line 267
+clr R0
+bra L12
+*line 268
+bra L31
+L30:
+*line 269
+*line 269
+cmp #27,_stccol
+blt L32
+*line 270
+*line 271
+*line 272
+*line 273
+move #37,(sp)
+move #32,-(sp)
+move.l #_ldcmnt,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 274
+move #5,(sp)
+jsr _ldswin
+*line 275
+clr R0
+bra L12
+*line 276
+L32:L31:
+*line 277
+*line 278
+L29:
+*line 279
+move #-1,R0
+bra L12
+L28:
+*line 280
+*line 281
+*line 282
+*line 283
+*line 284
+bra L33
+L18:
+*line 285
+*line 286
+*line 287
+*line 288
+*line 289
+*line 289
+move _cyval,(sp)
+jsr _ldline
+cmp _ldrow,R0
+bne L34
+*line 290
+*line 291
+move _ldslot,R0
+muls #56,R0
+add.l #_filecat,R0
+move.l R0,R8
+clr.b (R8)
+*line 292
+move _ldslot,(sp)
+jsr _ftkind
+move R0,(sp)
+move _ldslot,-(sp)
+jsr _slotnam
+addq.l #2,sp
+move.l R0,R13
+*line 293
+*line 294
+move.l R13,(sp)
+jsr _unlink
+*line 295
+*line 296
+clr _ldelsw
+*line 297
+jsr _putcat
+*line 298
+*line 299
+jsr __clsvol
+*line 300
+jsr _showcat
+*line 301
+jsr _showsiz
+*line 302
+*line 303
+clr R0
+bra L12
+*line 304
+*line 305
+L34:
+*line 306
+clr _ldelsw
+*line 307
+jsr _showcat
+*line 308
+clr R0
+bra L12
+L33:L12:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _ld_prmv
+.text
+_ld_prmv:
+~~ld_prmv:
+link R14,#-4
+*line 323
+*line 324
+tst _lderrsw
+beq L36
+*line 324
+jsr _clrerms
+*line 325
+L36:
+*line 326
+*line 326
+tst _ltagged
+beq L37
+*line 327
+*line 328
+move _oldltag,R0
+move _tagslot,R1
+muls #56,R1
+add.l #_filecat,R1
+move.l R1,R9
+move.b R0,3(R9)
+*line 329
+clr _ltagged
+*line 330
+jsr _showcat
+*line 331
+L37:L35:unlk R14
+rts
+.globl _ldcyupd
+.text
+_ldcyupd:
+~~ldcyupd:
+link R14,#-4
+*line 345
+*line 345
+cmp #1,_lmwtype
+bne L39
+*line 346
+*line 347
+jsr _vtcyupd
+*line 348
+bra L40
+L39:
+*line 349
+*line 350
+*line 351
+move _cyrate,R0
+add R0,_cyval
+*line 352
+*line 353
+*line 354
+cmp #348,_cyval
+ble L41
+*line 354
+move #348,_cyval
+bra L42
+L41:
+*line 355
+*line 356
+cmp #1,_cyval
+bge L43
+*line 356
+move #1,_cyval
+L43:L42:L40:L38:unlk R14
+rts
+.globl _ldcxupd
+.text
+_ldcxupd:
+~~ldcxupd:
+link R14,#-4
+*line 371
+*line 371
+cmp #1,_lmwtype
+bne L45
+*line 372
+*line 373
+jsr _vtcxupd
+*line 374
+bra L46
+L45:
+*line 375
+*line 376
+*line 377
+move _cxrate,R0
+add R0,_cxval
+*line 378
+*line 379
+*line 380
+cmp #510,_cxval
+ble L47
+*line 380
+move #510,_cxval
+bra L48
+L47:
+*line 381
+*line 382
+cmp #1,_cxval
+bge L49
+*line 382
+move #1,_cxval
+L49:L48:L46:L44:unlk R14
+rts
+.globl _ldmkey
+.text
+_ldmkey:
+~~ldmkey:
+link R14,#-4
+*line 397
+*line 397
+tst _astat
+beq L51
+*line 398
+*line 399
+clr _ltagged
+*line 400
+*line 401
+*line 401
+cmp #5,_sliders
+beq L10001
+cmp #5,_pkctrl
+bne L52
+L10001:*line 402
+*line 403
+move _oldsl,_sliders
+*line 404
+move.l _oldsw,_swpt
+*line 405
+move _oldpk,_pkctrl
+*line 406
+jsr _lcdlbls
+*line 407
+jsr _setleds
+*line 408
+L52:
+*line 409
+*line 410
+L51:
+*line 411
+jsr _stdmkey
+L50:unlk R14
+rts
+.globl _loadem
+.text
+_loadem:
+~~loadem:
+~key=8
+link R14,#0
+movem.l R3-R7,-(sp)
+~c=R7
+~i=R6
+~rc=R5
+~slot=R4
+*line 428
+clr R5
+*line 430
+*line 431
+clr (sp)
+jsr _getcat
+tst R0
+bne L53
+*line 432
+*line 433
+clr _ldslot
+bra L56
+L57:
+*line 434
+*line 435
+*line 436
+move _ldslot,(sp)
+jsr _ocslot
+tst R0
+beq L58
+move _ldslot,R0
+muls #56,R0
+move.l R0,R8
+move.l #_filecat,R9
+move.b 3(R8,R9.l),R0
+ext.w R0
+move R0,R7
+move R7,R0
+and #127,R0
+move 8(R14),R1
+and #127,R1
+cmp R1,R0
+bne L58
+*line 437
+*line 438
+move _ldslot,(sp)
+jsr _ftkind
+move R0,_ldkind
+*line 439
+*line 440
+*line 441
+*line 442
+*line 443
+cmp #7,_ldkind
+beq L10002
+cmp #2,_ldkind
+beq L10002
+cmp #3,_ldkind
+bne L59
+L10002:*line 443
+btst #7,R7
+beq L10003
+move #1,R0
+bra L10005
+L10003:clr R0
+L10005:move R0,_lorchl
+*line 444
+L59:
+*line 445
+*line 446
+cmp #4,_ldkind
+bne L60
+*line 446
+clr R6
+bra L63
+L64:
+*line 447
+move R6,R8
+add.l R8,R8
+add.l #_ldmap,R8
+move R6,(R8)
+L62:
+*line 446
+add #1,R6
+L63:
+*line 446
+cmp #20,R6
+blt L64
+L61:
+*line 447
+*line 448
+L60:
+*line 449
+*line 450
+jsr _getit
+tst R0
+bne L53
+*line 451
+*line 452
+move #1,R5
+*line 453
+L58:L55:
+*line 433
+add #1,_ldslot
+L56:
+*line 433
+cmp #20,_ldslot
+blt L57
+L54:
+*line 456
+*line 457
+tst R5
+beq L65
+cmp #-1,_ndisp
+bne L65
+*line 457
+jsr _m7menu
+L65:L53:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _ldkey
+.text
+_ldkey:
+~~ldkey:
+~k=8
+link R14,#-4
+movem.l R3-R7,-(sp)
+~c=R7
+~col=R6
+~row=R5
+~slot=R4
+~buf=-4
+*line 475
+*line 476
+tst _astat
+bne L67
+*line 476
+move #-1,R0
+bra L66
+*line 477
+L67:
+*line 478
+*line 479
+tst _catin
+beq L66
+*line 480
+*line 481
+move _cyval,R5
+ext.l R5
+divs #14,R5
+*line 482
+move _cxval,R6
+asr #3,R6
+*line 484
+*line 485
+cmp #11,R6
+bne L66
+*line 486
+*line 487
+*line 488
+move R5,(sp)
+jsr _lin2slt
+move R0,R4
+cmp #-1,R4
+beq L66
+*line 489
+*line 490
+*line 490
+tst _ltagged
+bne L68
+*line 491
+*line 492
+move R4,R0
+muls #56,R0
+move.l R0,R8
+move.l #_filecat,R9
+move.b 3(R8,R9.l),R0
+ext.w R0
+move R0,_oldltag
+*line 493
+move #3,(sp)
+jsr _lcancel
+*line 494
+*line 495
+*line 496
+*line 497
+*line 498
+*line 499
+L68:
+*line 500
+*line 501
+cmp #7,8(R14)
+bge L69
+*line 501
+move 8(R14),R7
+add #65,R7
+move R7,R0
+move R4,R1
+muls #56,R1
+add.l #_filecat,R1
+move.l R1,R9
+move.b R0,3(R9)
+bra L70
+L69:
+*line 502
+*line 503
+cmp #7,8(R14)
+beq L66
+*line 504
+*line 505
+cmp #8,8(R14)
+bne L71
+*line 505
+move R4,R0
+muls #56,R0
+move.l R0,R8
+move.l #_filecat,R9
+move.b 3(R8,R9.l),R0
+ext.w R0
+move R0,R7
+and #127,R7
+move R7,R0
+move R4,R1
+muls #56,R1
+add.l #_filecat,R1
+move.l R1,R9
+move.b R0,3(R9)
+bra L72
+L71:
+*line 506
+*line 507
+move R4,R0
+muls #56,R0
+move.l R0,R8
+move.l #_filecat,R9
+move.b 3(R8,R9.l),R0
+ext.w R0
+move R0,R7
+or #128,R7
+move R7,R0
+move R4,R1
+muls #56,R1
+add.l #_filecat,R1
+move.l R1,R9
+move.b R0,3(R9)
+L72:L70:
+*line 509
+move R5,_loadrow
+*line 510
+move R4,_tagslot
+*line 511
+move #1,_ltagged
+*line 513
+move R5,(sp)
+move #13,-(sp)
+jsr _exp_c
+addq.l #2,sp
+move R0,-(sp)
+move R4,-(sp)
+jsr _dslslot
+addq.l #4,sp
+bra L66
+L66:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _ldfield
+.text
+_ldfield:
+~~ldfield:
+link R14,#-4
+*line 528
+clr _lmwtype
+*line 529
+clr _ltagged
+*line 530
+clr _submenu
+*line 532
+move.l #_ld_flds,(sp)
+jsr _curset
+L73:unlk R14
+rts
+.data
+L1:.dc.b $52,$65,$63,$72,$64,$54,$79,$70,$65,$20,$4C,$20,$46,$69,$6C,$65,$4E,$61,$6D,$65,$20,$43,$6F,$6D,$6D,$65,$6E,$74,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$4D
+.dc.b $65,$6D,$0
+L2:.dc.b $0
+L3:.dc.b $46,$69,$6C,$65,$4E,$61,$6D,$65,$0
+L4:.dc.b $0
+L5:.dc.b $43,$6F,$6D,$6D,$65,$6E,$74,$0
+L6:.dc.b $0
+L7:.dc.b $49,$6E,$64,$65,$78,$0
+L8:.dc.b $0
+L9:.dc.b $0
+L10:.dc.b $0
+L11:.dc.b $0
Index: alcyon/ldselbx.s
===================================================================
--- alcyon/ldselbx.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/ldselbx.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,2557 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _lcdx
+.globl _lcdy
+.globl _lcdbit
+.globl _lcdrow
+.globl _lcdcol
+.globl _lcdbase
+.globl _lcdctl1
+.globl _lcdctl2
+.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 _filecat
+.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 _point
+.globl _asmode
+.globl _catin
+.globl _cxrate
+.globl _cxval
+.globl _cyrate
+.globl _cyval
+.globl _errno
+.globl _gomode
+.globl _hitcx
+.globl _hitcy
+.globl _ismode
+.globl _lasgsw
+.globl _ldelsw
+.globl _lderrsw
+.globl _ldkind
+.globl _ldrow
+.globl _ldslot
+.globl _lksel
+.globl _lmwtype
+.globl _lorchl
+.globl _lorchsw
+.globl _lorclsw
+.globl _ldpass
+.globl _lpatsw
+.globl _lrasw
+.globl _lscrsw
+.globl _lselsw
+.globl _lseqsw
+.globl _lstrsw
+.globl _ltagged
+.globl _ltunsw
+.globl _lwavsw
+.globl _ndisp
+.globl _oldpk
+.globl _oldsl
+.globl _pkctrl
+.globl _sliders
+.globl _stcrow
+.globl _stccol
+.globl _tagslot
+.globl _librob
+.globl _ldmap
+.globl _scsizes
+.globl _ldbox
+.globl _sindex
+.globl _csbp
+.globl _curboxp
+.globl _swpt
+.globl _oldsw
+.globl _t_libr
+.globl _bfs
+.globl _ldfile
+.globl _ldcmnt
+.globl _loadedf
+.globl _loadedc
+.globl _ft2lt
+.data
+_ft2lt:
+.dc.w $0
+.dc.w $1
+.dc.w $2
+.dc.w $3
+.dc.w $4
+.dc.w $5
+.dc.w $1
+.dc.w $6
+.dc.w $7
+.globl _ldboxes
+.data
+_ldboxes:
+.dc.w $1
+.dc.w $1
+.dc.w $1FE
+.dc.w $D
+.dc.w $0
+*line 135
+.dc.l _ldfnbox
+.dc.w $1
+.dc.w $E
+.dc.w $1FE
+.dc.w $125
+.dc.w $1
+*line 136
+.dc.l _ldfnbox
+.dc.w $1
+.dc.w $126
+.dc.w $4E
+.dc.w $133
+.dc.w $2
+*line 137
+.dc.l _ldfnbox
+.dc.w $50
+.dc.w $126
+.dc.w $8F
+.dc.w $133
+.dc.w $3
+*line 138
+.dc.l _ldfnbox
+.dc.w $91
+.dc.w $126
+.dc.w $D6
+.dc.w $133
+.dc.w $4
+*line 139
+.dc.l _ldfnbox
+.dc.w $D8
+.dc.w $126
+.dc.w $1FE
+.dc.w $133
+.dc.w $5
+*line 140
+.dc.l _ldfnbox
+.dc.w $1
+.dc.w $134
+.dc.w $46
+.dc.w $141
+.dc.w $6
+*line 141
+.dc.l _ldfnbox
+.dc.w $1
+.dc.w $142
+.dc.w $46
+.dc.w $14F
+.dc.w $7
+*line 142
+.dc.l _ldfnbox
+.dc.w $1
+.dc.w $150
+.dc.w $46
+.dc.w $15D
+.dc.w $8
+*line 143
+.dc.l _ldfnbox
+.dc.w $48
+.dc.w $134
+.dc.w $FF
+.dc.w $15D
+.dc.w $9
+*line 144
+.dc.l _ldfnbox
+.dc.w $101
+.dc.w $134
+.dc.w $1FE
+.dc.w $15D
+.dc.w $A
+*line 145
+.dc.l _ldfnbox
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.l $0
+.globl _skperr
+.text
+_skperr:
+~~skperr:
+~sn=8
+link R14,#-100
+~scid=-32
+~erms=-96
+*line 165
+jsr _clrlsel
+*line 167
+move 8(R14),(sp)
+add #1,(sp)
+move.l #L2,-(sp)
+move.l R14,-(sp)
+add.l #-32,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 168
+move _errno,(sp)
+move.l #L3,-(sp)
+move.l R14,-(sp)
+add.l #-96,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 170
+*line 171
+move #9,(sp)
+move #14,-(sp)
+move.l R14,-(sp)
+add.l #-96,(sp)
+move.l R14,-(sp)
+add.l #-32,(sp)
+move.l #L4,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+L1:unlk R14
+rts
+.globl _skp_ec
+.text
+_skp_ec:
+~~skp_ec:
+~fp=R13
+~len=R7
+link R14,#-64
+movem.l R4-R7/R13-R13,-(sp)
+~count=R6
+~c=R5
+~errbuf=-64
+*line 192
+move.l 8(R14),R13
+*line 192
+move.l 12(R14),R7
+*line 192
+clr.l R6
+bra L8
+L9:
+*line 193
+*line 194
+clr _errno
+*line 195
+*line 196
+*line 196
+move.l R13,(sp)
+jsr _getc
+move R0,R5
+cmp #-1,R5
+bne L10
+*line 197
+*line 198
+move _errno,(sp)
+move.l #L11,-(sp)
+move.l R14,-(sp)
+add.l #-64,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 199
+*line 200
+*line 201
+move #9,(sp)
+move #14,-(sp)
+clr.l -(sp)
+move.l R14,-(sp)
+add.l #-64,(sp)
+move.l #L12,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 202
+*line 206
+*line 207
+*line 208
+move.l R13,(sp)
+jsr _fclose
+*line 209
+jsr _postio
+*line 210
+move #-1,R0
+bra L5
+*line 211
+L10:L7:
+*line 192
+add.l #$1,R6
+L8:
+*line 192
+cmp.l R7,R6
+blt L9
+L6:
+*line 214
+clr R0
+bra L5
+L5:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.globl _scskip
+.text
+_scskip:
+~~scskip:
+~fp=R13
+~ns=12
+link R14,#-66
+movem.l R5-R7/R13-R13,-(sp)
+~ehdr=R7
+~go=R6
+~etype=-2
+~erms=-66
+*line 235
+move.l 8(R14),R13
+*line 235
+move #1,R6
+*line 237
+*line 237
+move.l #$f0,(sp)
+move.l R13,-(sp)
+jsr _skp_ec
+addq.l #4,sp
+tst R0
+beq L14
+*line 238
+*line 239
+move 12(R14),(sp)
+jsr _skperr
+*line 240
+move #-1,R0
+bra L13
+*line 241
+*line 242
+L14:
+*line 243
+*line 243
+move.l #$1,(sp)
+move.l R14,-(sp)
+sub.l #2,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L15
+*line 244
+*line 245
+move 12(R14),(sp)
+jsr _skperr
+*line 246
+move #-1,R0
+bra L13
+*line 247
+*line 248
+L15:
+*line 249
+*line 249
+cmp.b #1,-2(R14)
+beq L16
+*line 250
+*line 251
+move.b -2(R14),R0
+ext.w R0
+move R0,(sp) 
+move 12(R14),-(sp)
+add #1,(sp)
+move.l #L17,-(sp)
+move.l R14,-(sp)
+add.l #-66,(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 252
+*line 253
+*line 254
+move #9,(sp)
+move #14,-(sp)
+move.l R14,-(sp)
+add.l #-66,(sp)
+move.l #L19,-(sp)
+move.l #L18,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 255
+*line 256
+move #-1,R0
+bra L13
+*line 257
+*line 258
+L16:
+*line 259
+*line 259
+move.b -2(R14),R0
+ext.w R0
+move R0,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_scsizes,R9
+move 2(R8,R9.l),R0
+sub #1,R0
+ext.l R0
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _skp_ec
+addq.l #4,sp
+tst R0
+beq L20
+*line 260
+*line 261
+move 12(R14),(sp)
+jsr _skperr
+*line 262
+move #-1,R0
+bra L13
+*line 263
+*line 264
+*line 265
+*line 266
+L20:
+*line 267
+L23:
+*line 268
+*line 269
+*line 269
+move.l #$1,(sp)
+move.l R14,-(sp)
+sub.l #2,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L24
+*line 270
+*line 271
+move 12(R14),(sp)
+jsr _skperr
+*line 272
+move #-1,R0
+bra L13
+*line 273
+*line 274
+*line 275
+*line 276
+L24:
+*line 277
+*line 277
+move.b -2(R14),R0
+ext.w R0
+move R0,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_scsizes,R9
+move 2(R8,R9.l),R0
+sub #1,R0
+ext.l R0
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _skp_ec
+addq.l #4,sp
+tst R0
+beq L25
+*line 278
+*line 279
+move 12(R14),(sp)
+jsr _skperr
+*line 280
+move #-1,R0
+bra L13
+*line 281
+*line 282
+L25:
+*line 283
+*line 284
+cmp.b #21,-2(R14)
+bne L26
+*line 284
+clr R6
+*line 285
+L26:L22:
+*line 286
+tst R6
+bne L23
+L21:
+*line 288
+clr R0
+bra L13
+L13:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.globl _ldermsg
+.text
+_ldermsg:
+~~ldermsg:
+~p1=8
+~p2=12
+~p3=16
+~p4=20
+~p5=22
+link R14,#-68
+~msgbuf=-64
+*line 306
+*line 306
+tst _lderrsw
+bne L28
+*line 307
+*line 308
+move.l #L29,(sp)
+move.l R14,-(sp)
+add.l #-64,(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 309
+move.l 8(R14),(sp)
+move.l R14,-(sp)
+add.l #-64,(sp)
+jsr _strcat
+addq.l #4,sp
+*line 310
+*line 311
+move 22(R14),(sp)
+move 20(R14),-(sp)
+move.l 16(R14),-(sp)
+move.l 12(R14),-(sp)
+move.l 8(R14),-(sp)
+jsr _ldwmsg
+adda.l #14,sp
+*line 312
+*line 313
+L28:
+*line 314
+move #1,_lderrsw
+L27:unlk R14
+rts
+.globl _clrerms
+.text
+_clrerms:
+~~clrerms:
+link R14,#-4
+*line 325
+*line 325
+tst _lderrsw
+beq L31
+*line 326
+*line 327
+clr _lderrsw
+*line 328
+jsr _lmwclr
+*line 329
+move #10,(sp)
+jsr _ldswin
+*line 330
+L31:L30:unlk R14
+rts
+.globl _clrlsel
+.text
+_clrlsel:
+~~clrlsel:
+link R14,#-4
+*line 344
+*line 344
+tst _lselsw
+beq L33
+*line 345
+*line 346
+*line 346
+tst _lrasw
+beq L34
+*line 347
+*line 348
+move #-1,_lksel
+*line 349
+clr _ldpass
+*line 350
+move _oldpk,_pkctrl
+*line 351
+move _oldsl,_sliders
+*line 352
+move.l _oldsw,_swpt
+*line 353
+jsr _lcdlbls
+*line 354
+jsr _setleds
+*line 355
+jsr _fcindex
+*line 356
+bra L35
+L34:
+*line 357
+*line 358
+*line 359
+move _ldrow,(sp)
+move 24+_ldbox,-(sp)
+jsr _exp_c
+addq.l #2,sp
+move R0,-(sp)
+move _ldslot,-(sp)
+jsr _dslslot
+addq.l #4,sp
+L35:
+*line 360
+*line 361
+*line 362
+L33:
+*line 363
+jsr _fcreset
+L32:unlk R14
+rts
+.globl _endltyp
+.text
+_endltyp:
+~~endltyp:
+link R14,#-4
+*line 374
+jsr _lmwclr
+*line 375
+move #10,(sp)
+jsr _ldswin
+L36:unlk R14
+rts
+.globl _savefc
+.text
+_savefc:
+~~savefc:
+~kind=8
+link R14,#-6
+~fi=-2
+*line 392
+move 8(R14),R8
+sub #1,R8
+add.l R8,R8
+add.l #_ft2lt,R8
+move (R8),-2(R14)
+*line 394
+*line 395
+cmp #7,8(R14)
+bne L38
+*line 395
+tst _lorchl
+beq L10000
+move #2,R0
+bra L10002
+L10000:move #1,R0
+L10002:move R0,-2(R14)
+*line 396
+L38:
+*line 397
+move #8,(sp)
+move.l #_ldfile,-(sp)
+move -2(R14),R0
+asl #3,R0
+ext.l R0
+add.l #_loadedf,R0
+move.l R0,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 398
+move #37,(sp)
+move.l #_ldcmnt,-(sp)
+move -2(R14),R0
+muls #37,R0
+add.l #_loadedc,R0
+move.l R0,-(sp)
+jsr _memcpy
+addq.l #8,sp
+L37:unlk R14
+rts
+.globl _lcancel
+.text
+_lcancel:
+~~lcancel:
+~lct=8
+link R14,#-6
+~rc=-2
+*line 416
+clr -2(R14)
+*line 418
+*line 418
+tst 8(R14)
+beq L40
+tst _lselsw
+beq L40
+*line 419
+*line 420
+move #1,-2(R14)
+*line 421
+jsr _clrlsel
+*line 422
+*line 423
+L40:
+*line 424
+*line 424
+cmp #1,8(R14)
+beq L41
+tst _lstrsw
+bne L10003
+jsr _ckstor
+tst R0
+bne L41
+L10003:*line 425
+*line 426
+move #1,-2(R14)
+*line 427
+jsr _streset
+*line 428
+*line 429
+L41:
+*line 430
+*line 430
+cmp #2,8(R14)
+beq L42
+tst _ldelsw
+beq L42
+*line 431
+*line 432
+move #1,-2(R14)
+*line 433
+clr _ldelsw
+*line 434
+move _ldrow,(sp)
+move 24+_ldbox,-(sp)
+jsr _exp_c
+addq.l #2,sp
+move R0,-(sp)
+move _ldslot,-(sp)
+jsr _dslslot
+addq.l #4,sp
+*line 435
+*line 436
+L42:
+*line 437
+move -2(R14),R0
+bra L39
+L39:unlk R14
+rts
+.globl _dpy_scr
+.text
+_dpy_scr:
+~~dpy_scr:
+~color=8
+~ns=10
+link R14,#-48
+~buf=-40
+~scl=-44
+*line 456
+*line 457
+tst _ndisp
+bne L43
+*line 458
+*line 459
+*line 460
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L44
+*line 460
+clr (sp)
+jsr _vbank
+*line 461
+L44:
+*line 462
+*line 463
+move 10(R14),R8
+add.l R8,R8
+add.l #_ldmap,R8
+cmp #-1,(R8)
+bne L45
+*line 463
+move.l #L46,(sp)
+move.l R14,-(sp)
+add.l #-40,(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 464
+bra L47
+L45:
+*line 465
+move 10(R14),R8
+add.l R8,R8
+move.l #_ldmap,R9
+move 0(R8,R9.l),(sp)
+add #1,(sp)
+move.l #L48,-(sp)
+move.l R14,-(sp)
+add.l #-40,(sp)
+jsr _sprintf
+addq.l #8,sp
+L47:
+*line 467
+move #14,(sp)
+move.l R14,-(sp)
+add.l #-40,(sp)
+move #1,-(sp)
+move 10(R14),-(sp)
+add #1,(sp)
+move 26+_ldbox,-(sp)
+move 24+_ldbox,-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 469
+*line 470
+move 10(R14),R0
+muls #20,R0
+move.l R0,R8
+move.l #_sindex,R9
+move.l 0(R8,R9.l),R0
+move.l R0,-44(R14)
+cmp.l #$ffffffff,R0
+bne L49
+*line 470
+move.l #L50,(sp)
+move.l R14,-(sp)
+add.l #-40,(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 471
+bra L51
+L49:
+*line 472
+move.l -44(R14),(sp)
+move 10(R14),R0
+muls #20,R0
+add.l #_sindex,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+move.l #L52,-(sp)
+move.l R14,-(sp)
+add.l #-40,(sp)
+jsr _sprintf
+adda.l #12,sp
+L51:
+*line 474
+move #14,(sp)
+move.l R14,-(sp)
+add.l #-40,(sp)
+move #4,-(sp)
+move 10(R14),-(sp)
+add #1,(sp)
+move 26+_ldbox,-(sp)
+move 8(R14),-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+L43:unlk R14
+rts
+.globl _lst_scr
+.text
+_lst_scr:
+~~lst_scr:
+link R14,#-2
+movem.l R6-R7,-(sp)
+~i=R7
+~cx=-2
+*line 491
+*line 492
+tst _ndisp
+bne L53
+*line 493
+*line 494
+move.l #_ldpoint,_point
+*line 496
+move 10+_ldbox,(sp)
+jsr _exp_c
+move R0,-2(R14)
+*line 498
+*line 499
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L54
+*line 499
+clr (sp)
+jsr _vbank
+*line 500
+L54:
+*line 501
+*line 502
+move -2(R14),(sp)
+move 6+_ldbox,-(sp)
+move 4+_ldbox,-(sp)
+move 2+_ldbox,-(sp)
+move _ldbox,-(sp)
+move #128,-(sp)
+move.l _librob,-(sp)
+jsr _vbfill4
+adda.l #14,sp
+*line 504
+*line 505
+move #14,(sp)
+move.l #L55,-(sp)
+move 14+_ldbox,-(sp)
+move 12+_ldbox,-(sp)
+move 8+_ldbox,-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 507
+move #12,(sp)
+move #13,-(sp)
+move #23,-(sp)
+move #13,-(sp)
+move #8,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 508
+move #12,(sp)
+move #13,-(sp)
+move #159,-(sp)
+move #13,-(sp)
+move #32,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 509
+move #12,(sp)
+move #13,-(sp)
+move #215,-(sp)
+move #13,-(sp)
+move #168,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 511
+move 26+_ldbox,(sp)
+jsr _exp_c
+move R0,-2(R14)
+*line 513
+*line 514
+move -2(R14),(sp)
+move 22+_ldbox,-(sp)
+move 20+_ldbox,-(sp)
+move 18+_ldbox,-(sp)
+move 16+_ldbox,-(sp)
+move #128,-(sp)
+move.l _librob,-(sp)
+jsr _vbfill4
+adda.l #14,sp
+*line 516
+clr R7
+bra L58
+L59:
+*line 517
+move R7,(sp)
+move 24+_ldbox,-(sp)
+jsr _dpy_scr
+addq.l #2,sp
+L57:
+*line 516
+add #1,R7
+L58:
+*line 516
+cmp #20,R7
+blt L59
+L56:L53:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _ndx_scr
+.text
+_ndx_scr:
+~~ndx_scr:
+~slot=R7
+link R14,#-132
+movem.l R4-R7/R13-R13,-(sp)
+~fp=R13
+~i=R6
+~rlen=R5
+~rdlen=-4
+~msgbuf1=-68
+~msgbuf2=-132
+*line 540
+move 8(R14),R7
+*line 540
+clr _ldpass
+*line 542
+clr R6
+bra L63
+L64:
+*line 543
+*line 544
+move R6,R0
+muls #20,R0
+add.l #_sindex,R0
+move.l R0,R8
+move.l #$ffffffff,(R8)
+*line 545
+move #16,(sp)
+move #32,-(sp)
+move R6,R0
+muls #20,R0
+add.l #_sindex,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+jsr _memset
+addq.l #6,sp
+L62:
+*line 542
+add #1,R6
+L63:
+*line 542
+cmp #20,R6
+blt L64
+L61:
+*line 548
+clr _errno
+*line 550
+*line 550
+move.l #L65,(sp)
+move #4,-(sp)
+move R7,-(sp)
+jsr _slotnam
+addq.l #4,sp
+move.l R0,-(sp)
+jsr _fopenb
+addq.l #4,sp
+move.l R0,R13
+move.l R13,R0
+bne L66
+*line 551
+*line 552
+move _errno,(sp)
+move.l #L67,-(sp)
+move.l R14,-(sp)
+add.l #-132,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 553
+*line 554
+*line 555
+*line 556
+move #9,(sp)
+move #14,-(sp)
+move.l R14,-(sp)
+add.l #-132,(sp)
+move.l #L69,-(sp)
+move.l #L68,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 557
+*line 558
+jsr _clrlsel
+*line 559
+move #-1,R0
+bra L60
+*line 560
+*line 561
+L66:
+*line 562
+clr _errno
+*line 564
+*line 564
+move #1,(sp)
+move.l #$3c,-(sp)
+move.l R13,-(sp)
+jsr _fseek
+addq.l #8,sp
+tst R0
+beq L70
+*line 565
+*line 566
+move _errno,(sp)
+move.l #L71,-(sp)
+move.l R14,-(sp)
+add.l #-132,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 567
+*line 568
+*line 569
+*line 570
+move #9,(sp)
+move #14,-(sp)
+move.l R14,-(sp)
+add.l #-132,(sp)
+clr.l -(sp)
+move.l #L72,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 571
+*line 572
+*line 576
+*line 577
+*line 578
+move.l R13,(sp)
+jsr _fclose
+*line 579
+jsr _postio
+*line 580
+jsr _clrlsel
+*line 581
+move #-1,R0
+bra L60
+*line 582
+*line 583
+*line 584
+*line 585
+*line 589
+*line 590
+L70:
+*line 591
+clr R6
+bra L75
+L76:
+*line 592
+*line 593
+*line 593
+move.l #$4,(sp)
+move.l R14,-(sp)
+sub.l #4,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L77
+*line 594
+*line 595
+move R6,(sp)
+add #1,(sp)
+move.l #L78,-(sp)
+move.l R14,-(sp)
+add.l #-68,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 596
+move _errno,(sp)
+move.l #L79,-(sp)
+move.l R14,-(sp)
+add.l #-132,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 597
+*line 598
+*line 599
+*line 600
+move #9,(sp)
+move #14,-(sp)
+move.l R14,-(sp)
+add.l #-132,(sp)
+move.l R14,-(sp)
+add.l #-68,(sp)
+move.l #L80,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 601
+*line 602
+*line 606
+*line 607
+*line 608
+jsr _clrlsel
+*line 609
+move #-1,R0
+bra L60
+*line 610
+*line 611
+L77:
+*line 612
+move R6,R0
+muls #20,R0
+add.l #_sindex,R0
+move.l R0,R8
+move.l -4(R14),(R8)
+*line 613
+*line 614
+*line 614
+cmp.l #$ffffffff,-4(R14)
+beq L81
+*line 615
+*line 616
+*line 616
+move.l #$10,(sp)
+move R6,R0
+muls #20,R0
+add.l #_sindex,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L82
+*line 617
+*line 618
+move R6,(sp)
+add #1,(sp)
+move.l #L83,-(sp)
+move.l R14,-(sp)
+add.l #-68,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 619
+move _errno,(sp)
+move.l #L84,-(sp)
+move.l R14,-(sp)
+add.l #-132,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 620
+*line 621
+*line 622
+*line 623
+move #9,(sp)
+move #14,-(sp)
+move.l R14,-(sp)
+add.l #-132,(sp)
+move.l R14,-(sp)
+add.l #-68,(sp)
+move.l #L85,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 624
+*line 625
+*line 629
+*line 630
+*line 631
+jsr _clrlsel
+*line 632
+move #-1,R0
+bra L60
+*line 633
+*line 634
+L82:
+*line 635
+clr _errno
+*line 636
+*line 637
+*line 637
+move R6,(sp)
+move.l R13,-(sp)
+jsr _scskip
+addq.l #4,sp
+tst R0
+beq L86
+*line 638
+*line 639
+move R6,(sp)
+add #1,(sp)
+move.l #L87,-(sp)
+move.l R14,-(sp)
+add.l #-68,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 640
+*line 641
+move.l R5,(sp)
+move _errno,-(sp)
+move.l #L88,-(sp)
+move.l R14,-(sp)
+add.l #-132,(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 642
+*line 643
+*line 644
+*line 645
+move #9,(sp)
+move #14,-(sp)
+move.l R14,-(sp)
+add.l #-132,(sp)
+move.l R14,-(sp)
+add.l #-68,(sp)
+move.l #L89,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 646
+*line 647
+*line 651
+*line 652
+*line 653
+move.l R13,(sp)
+jsr _fclose
+*line 654
+jsr _postio
+*line 655
+jsr _clrlsel
+*line 656
+move #-1,R0
+bra L60
+*line 657
+L86:
+*line 658
+L81:L74:
+*line 591
+add #1,R6
+L75:
+*line 591
+cmp #20,R6
+blt L76
+L73:
+*line 661
+move.l R13,(sp)
+jsr _fclose
+*line 662
+jsr _postio
+*line 663
+move #1,_ldpass
+*line 664
+jsr _lst_scr
+*line 668
+move.l #_GLCplot,_point
+*line 669
+move #1,(sp)
+jsr _GLCcurs
+*line 671
+*line 671
+tst _ismode
+beq L90
+*line 672
+*line 673
+clr _ismode
+*line 674
+move _oldpk,_pkctrl
+*line 675
+move _oldsl,_sliders
+*line 676
+move.l _oldsw,_swpt
+*line 677
+jsr _lcdlbls
+*line 678
+*line 679
+L90:
+*line 680
+*line 680
+tst _gomode
+beq L91
+*line 681
+*line 682
+clr _gomode
+*line 683
+move _oldpk,_pkctrl
+*line 684
+clr (sp)
+move #54,-(sp)
+move #215,-(sp)
+move #54,-(sp)
+move #186,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 685
+*line 686
+L91:
+*line 687
+*line 687
+tst _asmode
+beq L92
+*line 688
+*line 689
+clr _asmode
+*line 690
+move _oldpk,_pkctrl
+*line 691
+move.l _oldsw,_swpt
+*line 692
+clr (sp)
+move #54,-(sp)
+move #287,-(sp)
+move #54,-(sp)
+move #258,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 693
+*line 694
+L92:
+*line 695
+*line 696
+tst _pkctrl
+beq L10004
+cmp #1,_pkctrl
+bne L93
+L10004:*line 696
+move _pkctrl,_oldpk
+*line 697
+L93:
+*line 698
+*line 699
+cmp #5,_sliders
+beq L94
+*line 699
+move _sliders,_oldsl
+*line 700
+L94:
+*line 701
+move.l _swpt,_oldsw
+*line 702
+move.l #_t_libr,_swpt
+*line 703
+move #5,_pkctrl
+*line 704
+move #5,_sliders
+*line 706
+jsr _lcdlbls
+*line 707
+jsr _setleds
+*line 709
+clr R0
+bra L60
+L60:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.globl _getit
+.text
+_getit:
+~~getit:
+link R14,#-4
+*line 724
+move _ldslot,(sp)
+jsr _ftkind
+move R0,_ldkind
+*line 726
+*line 726
+cmp #-1,_ldkind
+bne L96
+*line 727
+*line 728
+*line 729
+*line 730
+move #9,(sp)
+move #14,-(sp)
+clr.l -(sp)
+clr.l -(sp)
+move.l #L97,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 731
+*line 732
+jsr _clrlsel
+*line 733
+move #-1,R0
+bra L95
+*line 734
+*line 735
+L96:
+*line 736
+move.l #L98,(sp)
+jsr _ldbusy
+*line 739
+move _ldkind,R0
+bra L100
+*line 740
+L101:
+*line 741
+*line 742
+*line 743
+*line 744
+jsr _get_asg
+tst R0
+beq L102
+*line 744
+move #-1,R0
+bra L95
+*line 745
+L102:bra L99
+*line 746
+*line 747
+L103:
+*line 748
+L104:
+*line 749
+L105:
+*line 750
+*line 751
+*line 752
+*line 753
+move _ldkind,(sp)
+move _lorchl,-(sp)
+jsr _get_orc
+addq.l #2,sp
+tst R0
+beq L106
+*line 753
+move #-1,R0
+bra L95
+*line 754
+L106:bra L99
+*line 755
+*line 756
+L107:
+*line 757
+*line 758
+*line 759
+*line 760
+jsr _get_pat
+tst R0
+beq L108
+*line 760
+move #-1,R0
+bra L95
+*line 761
+L108:bra L99
+*line 762
+*line 763
+L109:
+*line 764
+*line 765
+*line 766
+*line 767
+jsr _get_scr
+tst R0
+beq L110
+*line 767
+move #-1,R0
+bra L95
+*line 768
+L110:bra L99
+*line 769
+*line 770
+L111:
+*line 771
+*line 772
+*line 773
+*line 774
+jsr _get_seq
+tst R0
+beq L112
+*line 774
+move #-1,R0
+bra L95
+*line 775
+L112:bra L99
+*line 776
+*line 777
+L113:
+*line 778
+*line 779
+*line 780
+*line 781
+jsr _get_tun
+tst R0
+beq L114
+*line 781
+move #-1,R0
+bra L95
+*line 782
+L114:bra L99
+*line 783
+*line 784
+L115:
+*line 785
+*line 786
+*line 787
+*line 788
+jsr _get_wav
+tst R0
+beq L116
+*line 788
+move #-1,R0
+bra L95
+*line 789
+L116:bra L99
+*line 790
+*line 791
+L117:
+*line 792
+*line 793
+*line 794
+*line 795
+*line 796
+move #9,(sp)
+move #14,-(sp)
+clr.l -(sp)
+clr.l -(sp)
+move.l #L118,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 797
+*line 798
+jsr _clrlsel
+*line 799
+move #-1,R0
+bra L95
+bra L99
+L100:sub #1,R0
+cmp #8,R0
+bhi L117
+asl #2,R0
+move R0,R8
+add.l #L119,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L119:.dc.l L101
+.dc.l L104
+.dc.l L103
+.dc.l L109
+.dc.l L113
+.dc.l L115
+.dc.l L105
+.dc.l L107
+.dc.l L111
+.text
+L99:
+*line 804
+move #8,(sp)
+move _ldslot,R0
+muls #56,R0
+add.l #_filecat,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+move.l #_ldfile,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 805
+move #37,(sp)
+move _ldslot,R0
+muls #56,R0
+add.l #_filecat,R0
+move.l R0,-(sp)
+add.l #17,(sp)
+move.l #_ldcmnt,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 806
+move _ldkind,(sp)
+jsr _savefc
+*line 808
+jsr _clrlsel
+*line 810
+*line 810
+tst _lrasw
+beq L120
+*line 811
+*line 812
+clr (sp)
+jsr _ldswin
+*line 813
+move #8,(sp)
+jsr _ldswin
+*line 814
+*line 815
+L120:
+*line 816
+move #3,(sp)
+jsr _ldswin
+*line 817
+move #5,(sp)
+jsr _ldswin
+*line 818
+jsr _showsiz
+*line 819
+clr R0
+bra L95
+L95:unlk R14
+rts
+.globl _ldfnbox
+.text
+_ldfnbox:
+~~ldfnbox:
+~n=8
+link R14,#0
+movem.l R3-R7,-(sp)
+~col=R7
+~i=R6
+~slot=R5
+~sn=R4
+*line 837
+move _hitcx,R7
+asr #3,R7
+*line 839
+*line 840
+tst _lderrsw
+beq L122
+*line 840
+jsr _clrerms
+*line 841
+L122:
+*line 842
+move 8(R14),R0
+bra L124
+*line 843
+L125:
+*line 844
+*line 845
+*line 846
+*line 847
+clr (sp)
+jsr _lcancel
+tst R0
+beq L126
+*line 847
+clr R0
+bra L121
+*line 848
+L126:
+*line 849
+*line 849
+tst _lselsw
+beq L127
+*line 850
+*line 851
+*line 851
+tst _lrasw
+beq L128
+*line 852
+*line 853
+*line 853
+cmp #4,_ldkind
+bne L129
+*line 854
+*line 855
+move _hitcy,(sp)
+jsr _ldline
+move R0,R4
+sub #1,R4
+*line 856
+*line 857
+*line 857
+move R4,R0
+muls #20,R0
+add.l #_sindex,R0
+move.l R0,R8
+cmp.l #$ffffffff,(R8)
+beq L130
+*line 858
+*line 859
+*line 859
+move R4,R0
+add #1,R0
+cmp _ldrow,R0
+beq L131
+*line 860
+*line 861
+move _ldrow,(sp)
+sub #1,(sp)
+move 24+_ldbox,-(sp)
+jsr _dpy_scr
+addq.l #2,sp
+*line 862
+move R4,R0
+add #1,R0
+move R0,_ldrow
+*line 863
+*line 864
+L131:
+*line 865
+move R4,(sp)
+move #13,-(sp)
+jsr _dpy_scr
+addq.l #2,sp
+*line 866
+move R4,_lksel
+*line 867
+bra L132
+L130:
+*line 868
+*line 869
+*line 870
+move #-1,_lksel
+L132:
+*line 871
+*line 872
+*line 873
+clr R0
+bra L121
+*line 874
+L129:
+*line 875
+*line 876
+L128:
+*line 877
+*line 877
+move _hitcy,(sp)
+jsr _ldline
+cmp _ldrow,R0
+beq L133
+*line 878
+*line 879
+jsr _clrlsel
+*line 880
+clr R0
+bra L121
+*line 881
+*line 882
+L133:
+*line 883
+jsr _getit
+bra L121
+*line 884
+*line 885
+bra L134
+L127:
+*line 886
+*line 887
+*line 888
+*line 888
+move _hitcy,(sp)
+jsr _ldline
+move R0,_ldrow
+beq L135
+*line 889
+*line 890
+*line 890
+cmp #11,R7
+bne L136
+*line 891
+*line 892
+*line 892
+tst _catin
+beq L137
+tst _ltagged
+beq L137
+*line 893
+*line 894
+move _ldrow,(sp)
+jsr _lin2slt
+move R0,R5
+*line 895
+*line 896
+*line 896
+cmp _tagslot,R5
+bne L138
+*line 897
+*line 898
+jsr _putcat
+*line 899
+clr _ltagged
+*line 900
+jsr _showcat
+*line 901
+L138:
+*line 902
+*line 903
+L137:bra L139
+L136:
+*line 904
+*line 905
+*line 906
+*line 906
+move _ldrow,(sp)
+jsr _lin2slt
+move R0,_ldslot
+cmp #-1,R0
+beq L140
+*line 907
+*line 908
+move #1,_lselsw
+*line 909
+move #8,(sp)
+jsr _ldswin
+*line 910
+move _ldslot,(sp)
+jsr _ftkind
+move R0,_ldkind
+*line 911
+*line 912
+clr R6
+bra L143
+L144:
+*line 913
+move R6,R8
+add.l R8,R8
+add.l #_ldmap,R8
+move R6,(R8)
+L142:
+*line 912
+add #1,R6
+L143:
+*line 912
+cmp #20,R6
+blt L144
+L141:
+*line 913
+*line 914
+*line 915
+*line 916
+tst _lrasw
+beq L145
+cmp #4,_ldkind
+bne L145
+*line 916
+move _ldslot,(sp)
+jsr _ndx_scr
+bra L121
+*line 917
+L145:
+*line 918
+move _ldrow,(sp)
+move #13,-(sp)
+jsr _exp_c
+addq.l #2,sp
+move R0,-(sp)
+move _ldslot,-(sp)
+jsr _dslslot
+addq.l #4,sp
+*line 919
+clr R0
+bra L121
+*line 920
+L140:L139:
+*line 921
+*line 922
+*line 923
+L135:
+*line 924
+jsr _clrlsel
+*line 925
+move #-1,R0
+bra L121
+L134:
+*line 926
+*line 927
+*line 928
+L146:
+*line 929
+*line 930
+*line 931
+*line 932
+move #3,(sp)
+jsr _lcancel
+tst R0
+beq L147
+*line 932
+clr R0
+bra L121
+*line 933
+L147:
+*line 934
+*line 934
+cmp #1,_lmwtype
+beq L148
+*line 935
+*line 936
+jsr _lmwvtyp
+*line 937
+move #10,(sp)
+jsr _ldswin
+*line 938
+*line 939
+*line 940
+*line 941
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 10(R8,R9.l),(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 8(R8,R9.l),-(sp)
+move.l #_endltyp,-(sp)
+move.l #_nokey,-(sp)
+move.l #_nokey,-(sp)
+move.l #_bsplcur,-(sp)
+move.l #_advlcur,-(sp)
+move #33,-(sp)
+move #22,-(sp)
+move.l #_ldfile,-(sp)
+move #10,-(sp)
+move.l #_vtdisp,-(sp)
+move.l _librob,-(sp)
+jsr _vtsetup
+adda.l #40,sp
+*line 942
+bra L149
+L148:
+*line 943
+*line 944
+*line 945
+jsr _vtyper
+L149:
+*line 946
+*line 947
+*line 948
+clr R0
+bra L121
+*line 949
+L150:
+*line 950
+*line 951
+*line 952
+*line 953
+move #3,(sp)
+jsr _lcancel
+tst R0
+beq L151
+*line 953
+clr R0
+bra L121
+*line 954
+L151:
+*line 955
+*line 955
+cmp #1,_lmwtype
+beq L152
+*line 956
+*line 957
+jsr _lmwvtyp
+*line 958
+move #10,(sp)
+jsr _ldswin
+*line 959
+*line 960
+*line 961
+*line 962
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 10(R8,R9.l),(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 8(R8,R9.l),-(sp)
+move.l #_endltyp,-(sp)
+move.l #_nokey,-(sp)
+move.l #_nokey,-(sp)
+move.l #_bsplcur,-(sp)
+move.l #_advlcur,-(sp)
+move #33,-(sp)
+move #22,-(sp)
+move.l #_ldcmnt,-(sp)
+move #27,-(sp)
+move.l #_vtdisp,-(sp)
+move.l _librob,-(sp)
+jsr _vtsetup
+adda.l #40,sp
+*line 963
+bra L153
+L152:
+*line 964
+*line 965
+*line 966
+jsr _vtyper
+L153:
+*line 967
+*line 968
+*line 969
+clr R0
+bra L121
+*line 970
+*line 971
+*line 972
+*line 973
+L154:
+*line 974
+*line 975
+*line 976
+*line 977
+clr (sp)
+jsr _lcancel
+tst R0
+beq L155
+*line 977
+clr R0
+bra L121
+*line 978
+L155:
+*line 979
+jsr _clrlsel
+*line 980
+jsr _fcindex
+bra L121
+*line 981
+L156:
+*line 982
+*line 983
+*line 984
+*line 985
+tst _lselsw
+beq L157
+tst _lrasw
+beq L157
+*line 985
+jsr _getit
+bra L121
+*line 986
+L157:
+*line 987
+tst _lrasw
+beq L10005
+clr R0
+bra L10006
+L10005:move #1,R0
+L10006:move R0,_lrasw
+*line 988
+move #7,(sp)
+jsr _ldswin
+*line 989
+clr R0
+bra L121
+*line 990
+L158:
+*line 991
+*line 992
+*line 993
+tst _lorchl
+beq L10007
+clr R0
+bra L10008
+L10007:move #1,R0
+L10008:move R0,_lorchl
+*line 994
+move #8,(sp)
+jsr _ldswin
+*line 995
+clr R0
+bra L121
+*line 996
+*line 997
+*line 998
+L159:
+*line 999
+*line 1000
+*line 1001
+*line 1002
+move #1,(sp)
+jsr _lcancel
+tst R0
+beq L160
+*line 1002
+clr R0
+bra L121
+*line 1003
+L160:
+*line 1004
+*line 1004
+cmp #321,_cyval
+bge L161
+*line 1005
+*line 1006
+*line 1007
+*line 1008
+*line 1008
+cmp #120,_cxval
+bge L162
+*line 1009
+*line 1010
+*line 1011
+*line 1012
+*line 1012
+tst _lstrsw
+beq L163
+*line 1013
+*line 1014
+jsr _storit
+*line 1015
+bra L164
+L163:
+*line 1016
+*line 1017
+*line 1018
+move #1,_lstrsw
+*line 1019
+move #9,(sp)
+jsr _ldswin
+L164:
+*line 1020
+*line 1021
+*line 1022
+clr R0
+bra L121
+*line 1023
+bra L165
+L162:
+*line 1024
+*line 1024
+cmp #135,_cxval
+ble L166
+cmp #176,_cxval
+bge L166
+*line 1025
+*line 1026
+*line 1027
+*line 1028
+tst _lscrsw
+beq L10009
+clr R0
+bra L10010
+L10009:move #1,R0
+L10010:move R0,_lscrsw
+*line 1029
+move #9,(sp)
+jsr _ldswin
+*line 1030
+*line 1031
+*line 1032
+tst _lstrsw
+beq L167
+*line 1032
+jsr _storit
+*line 1033
+L167:
+*line 1034
+clr R0
+bra L121
+*line 1035
+bra L168
+L166:
+*line 1036
+*line 1036
+cmp #191,_cxval
+ble L169
+*line 1037
+*line 1038
+*line 1039
+*line 1040
+tst _lorchsw
+beq L10011
+clr R0
+bra L10012
+L10011:move #1,R0
+L10012:move R0,_lorchsw
+*line 1041
+move #9,(sp)
+jsr _ldswin
+*line 1042
+*line 1043
+*line 1044
+tst _lstrsw
+beq L170
+*line 1044
+jsr _storit
+*line 1045
+L170:
+*line 1046
+clr R0
+bra L121
+*line 1047
+*line 1048
+*line 1049
+L169:L168:L165:bra L171
+L161:
+*line 1050
+*line 1050
+cmp #321,_cyval
+ble L172
+cmp #335,_cyval
+bge L172
+*line 1051
+*line 1052
+*line 1053
+*line 1054
+*line 1054
+cmp #120,_cxval
+bge L173
+*line 1055
+*line 1056
+tst _lwavsw
+beq L10013
+clr R0
+bra L10014
+L10013:move #1,R0
+L10014:move R0,_lwavsw
+*line 1057
+move #9,(sp)
+jsr _ldswin
+*line 1058
+*line 1059
+*line 1060
+tst _lstrsw
+beq L174
+*line 1060
+jsr _storit
+*line 1061
+L174:
+*line 1062
+clr R0
+bra L121
+*line 1063
+bra L175
+L173:
+*line 1064
+*line 1064
+cmp #135,_cxval
+ble L176
+cmp #176,_cxval
+bge L176
+*line 1065
+*line 1066
+*line 1067
+*line 1068
+tst _lpatsw
+beq L10015
+clr R0
+bra L10016
+L10015:move #1,R0
+L10016:move R0,_lpatsw
+*line 1069
+move #9,(sp)
+jsr _ldswin
+*line 1070
+*line 1071
+*line 1072
+tst _lstrsw
+beq L177
+*line 1072
+jsr _storit
+*line 1073
+L177:
+*line 1074
+clr R0
+bra L121
+*line 1075
+bra L178
+L176:
+*line 1076
+*line 1076
+cmp #191,_cxval
+ble L179
+*line 1077
+*line 1078
+tst _lorclsw
+beq L10017
+clr R0
+bra L10018
+L10017:move #1,R0
+L10018:move R0,_lorclsw
+*line 1079
+move #9,(sp)
+jsr _ldswin
+*line 1080
+*line 1081
+*line 1082
+tst _lstrsw
+beq L180
+*line 1082
+jsr _storit
+*line 1083
+L180:
+*line 1084
+clr R0
+bra L121
+*line 1085
+*line 1086
+*line 1087
+L179:L178:L175:bra L181
+L172:
+*line 1088
+*line 1088
+cmp #335,_cyval
+ble L182
+*line 1089
+*line 1090
+*line 1091
+*line 1092
+*line 1092
+cmp #120,_cxval
+bge L183
+*line 1093
+*line 1094
+tst _lasgsw
+beq L10019
+clr R0
+bra L10020
+L10019:move #1,R0
+L10020:move R0,_lasgsw
+*line 1095
+move #9,(sp)
+jsr _ldswin
+*line 1096
+*line 1097
+*line 1098
+tst _lstrsw
+beq L184
+*line 1098
+jsr _storit
+*line 1099
+L184:
+*line 1100
+clr R0
+bra L121
+*line 1101
+bra L185
+L183:
+*line 1102
+*line 1102
+cmp #135,_cxval
+ble L186
+cmp #176,_cxval
+bge L186
+*line 1103
+*line 1104
+*line 1105
+*line 1106
+tst _lseqsw
+beq L10021
+clr R0
+bra L10022
+L10021:move #1,R0
+L10022:move R0,_lseqsw
+*line 1107
+move #9,(sp)
+jsr _ldswin
+*line 1108
+*line 1109
+*line 1110
+tst _lstrsw
+beq L187
+*line 1110
+jsr _storit
+*line 1111
+L187:
+*line 1112
+clr R0
+bra L121
+*line 1113
+bra L188
+L186:
+*line 1114
+*line 1114
+cmp #191,_cxval
+ble L189
+*line 1115
+*line 1116
+tst _ltunsw
+beq L10023
+clr R0
+bra L10024
+L10023:move #1,R0
+L10024:move R0,_ltunsw
+*line 1117
+move #9,(sp)
+jsr _ldswin
+*line 1118
+*line 1119
+*line 1120
+tst _lstrsw
+beq L190
+*line 1120
+jsr _storit
+*line 1121
+L190:
+*line 1122
+clr R0
+bra L121
+*line 1123
+L189:L188:L185:
+*line 1124
+*line 1125
+L182:L181:L171:
+*line 1126
+move #-1,R0
+bra L121
+*line 1127
+L191:
+*line 1128
+*line 1129
+*line 1130
+move #3,(sp)
+jsr _lcancel
+*line 1131
+move #-1,R0
+bra L121
+bra L123
+L124:sub #1,R0
+cmp #8,R0
+bhi L191
+asl #2,R0
+move R0,R8
+add.l #L192,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L192:.dc.l L125
+.dc.l L191
+.dc.l L146
+.dc.l L191
+.dc.l L150
+.dc.l L154
+.dc.l L156
+.dc.l L158
+.dc.l L159
+.text
+L123:L121:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.data
+L2:.dc.b $20,$20,$73,$63,$6F,$72,$65,$20,$25,$64,$0
+L3:.dc.b $20,$20,$65,$72,$72,$6E,$6F,$20,$3D,$20,$25,$64,$0
+L4:.dc.b $43,$6F,$75,$6C,$64,$6E,$27,$74,$20,$73,$6B,$69,$70,$0
+L11:.dc.b $65,$72,$72,$6E,$6F,$20,$3D,$20,$25,$64,$0
+L12:.dc.b $55,$6E,$65,$78,$70,$65,$63,$74,$65,$64,$20,$45,$4F,$46,$0
+L17:.dc.b $20,$20,$73,$63,$6F,$72,$65,$20,$25,$64,$20,$20,$65,$74,$79,$70,$65,$20,$3D,$20,$25,$64,$0
+L18:.dc.b $42,$61,$64,$20,$73,$63,$6F,$72,$65,$20,$2D,$2D,$0
+L19:.dc.b $20,$20,$31,$73,$74,$20,$65,$76,$65,$6E,$74,$20,$69,$73,$20,$77,$72,$6F,$6E,$67,$0
+L29:.dc.b $45,$52,$52,$4F,$52,$3A,$20,$0
+L46:.dc.b $20,$20,$0
+L48:.dc.b $25,$30,$32,$64,$0
+L50:.dc.b $7B,$20,$65,$6D,$70,$74,$79,$20,$73,$63,$6F,$72,$65,$20,$20,$7D,$20,$20,$20,$20,$20,$20,$30,$0
+L52:.dc.b $25,$2D,$31,$36,$2E,$31,$36,$73,$20,$20,$25,$35,$6C,$64,$0
+L55:.dc.b $4E,$6F,$20,$53,$63,$6F,$72,$65,$20,$4E,$61,$6D,$65,$20,$20,$20,$20,$20,$20,$20,$4C,$65,$6E,$67,$74,$68,$0
+L65:.dc.b $72,$0
+L67:.dc.b $20,$20,$65,$72,$72,$6E,$6F,$20,$3D,$20,$25,$64,$0
+L68:.dc.b $43,$6F,$75,$6C,$64,$6E,$27,$74,$20,$6F,$70,$65,$6E,$20,$74,$68,$65,$20,$66,$69,$6C,$65,$0
+L69:.dc.b $20,$20,$66,$6F,$72,$20,$74,$68,$65,$20,$73,$63,$6F,$72,$65,$73,$0
+L71:.dc.b $20,$20,$65,$72,$72,$6E,$6F,$20,$3D,$20,$25,$64,$0
+L72:.dc.b $53,$65,$65,$6B,$20,$66,$61,$69,$6C,$75,$72,$65,$0
+L78:.dc.b $20,$20,$6F,$66,$20,$73,$63,$6F,$72,$65,$20,$25,$64,$0
+L79:.dc.b $20,$20,$65,$72,$72,$6E,$6F,$20,$3D,$20,$25,$64,$0
+L80:.dc.b $55,$6E,$61,$62,$6C,$65,$20,$74,$6F,$20,$72,$65,$61,$64,$20,$74,$68,$65,$20,$6C,$65,$6E,$67,$74,$68,$0
+L83:.dc.b $20,$20,$6F,$66,$20,$73,$63,$6F,$72,$65,$20,$25,$64,$0
+L84:.dc.b $20,$20,$65,$72,$72,$6E,$6F,$20,$3D,$20,$25,$64,$0
+L85:.dc.b $55,$6E,$61,$62,$6C,$65,$20,$74,$6F,$20,$72,$65,$61,$64,$20,$74,$68,$65,$20,$6E,$61,$6D,$65,$0
+L87:.dc.b $20,$20,$73,$63,$6F,$72,$65,$20,$25,$64,$0
+L88:.dc.b $20,$20,$65,$72,$72,$6E,$6F,$3D,$25,$64,$20,$20,$72,$6C,$65,$6E,$3D,$25,$6C,$64,$0
+L89:.dc.b $55,$6E,$61,$62,$6C,$65,$20,$74,$6F,$20,$73,$6B,$69,$70,$20,$70,$61,$73,$74,$0
+L97:.dc.b $55,$6E,$6B,$6E,$6F,$77,$6E,$20,$66,$69,$6C,$65,$20,$74,$79,$70,$65,$0
+L98:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$52,$65,$61,$64,$69,$6E,$67,$20,$66,$69,$6C,$65,$0
+L118:.dc.b $6C,$64,$6B,$69,$6E,$64,$20,$62,$61,$64,$0
Index: alcyon/libdsp.s
===================================================================
--- alcyon/libdsp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/libdsp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,4264 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl _errno
+.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 _filecat
+.globl _point
+.globl _errno
+.globl __bpbin
+.globl _chtime
+.globl _cmtype
+.globl _cvtime
+.globl _cxval
+.globl _cyval
+.globl _sgcsw
+.globl _stccol
+.globl _stcrow
+.globl _submenu
+.globl _thcwval
+.globl _tvcwval
+.globl _obj0
+.globl _obj2
+.globl _ldbxlb0
+.globl _vtlin1
+.globl _vtlin2
+.globl _vtlin3
+.globl _ldbox
+.globl _idefs
+.globl __thebpb
+.globl _librob
+.globl _catin
+.globl _lrasw
+.globl _lorchl
+.globl _ldrow
+.globl _ldslot
+.globl _lselsw
+.globl _ldkind
+.globl _lstrsw
+.globl _lasgsw
+.globl _lksel
+.globl _lorchsw
+.globl _lorclsw
+.globl _lpatsw
+.globl _lscrsw
+.globl _lseqsw
+.globl _ltunsw
+.globl _lwavsw
+.globl _ldelsw
+.globl _lderrsw
+.globl _ldidsiz
+.globl _lmwtype
+.globl _ltagged
+.globl _ndisp
+.globl _lcsum
+.globl _ndbytes
+.globl _lmln22
+.globl _lmln23
+.globl _lmln24
+.globl _ldfile
+.globl _ldcmnt
+.globl _ldmsg1
+.globl _ldmsg2
+.globl _ldmsg3
+.globl _errbuf
+.globl _ldoct
+.globl _ldhead
+.globl _ftypes
+.data
+_ftypes:
+*line 142
+.dc.l L1
+*line 142
+.dc.l L2
+*line 142
+.dc.l L3
+*line 143
+.dc.l L4
+*line 143
+.dc.l L5
+*line 143
+.dc.l L6
+*line 144
+.dc.l L7
+*line 144
+.dc.l L8
+*line 144
+.dc.l L9
+*line 145
+.dc.l L10
+*line 145
+.dc.l L11
+*line 145
+.dc.l L12
+*line 146
+.dc.l L13
+*line 146
+.dc.l L14
+*line 146
+.dc.l L15
+*line 147
+.dc.l L16
+*line 147
+.dc.l L17
+*line 147
+.dc.l L18
+*line 148
+.dc.l L19
+*line 148
+.dc.l L20
+*line 148
+.dc.l L21
+*line 149
+.dc.l L22
+*line 149
+.dc.l L23
+*line 149
+.dc.l L24
+*line 150
+.dc.l L25
+*line 150
+.dc.l L26
+*line 150
+.dc.l L27
+.globl _ld_em1
+.data
+_ld_em1:
+.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
+.globl _ld_em2
+.data
+_ld_em2:
+.dc.b $20,$62,$79,$20,$74,$68,$69,$73,$20,$6F,$70,$65,$72,$61,$74,$69,$6F,$6E,$0
+.even
+.globl _lbrpal
+.data
+_lbrpal:
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $1
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $1
+.dc.w $0
+.dc.w $2
+.dc.w $1
+.dc.w $0
+.dc.w $1
+.dc.w $1
+.dc.w $0
+.dc.w $2
+.dc.w $1
+.dc.w $0
+.dc.w $1
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $1
+.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
+.globl _ftkind
+.text
+_ftkind:
+~~ftkind:
+~ns=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 194
+clr R7
+bra L33
+L34:
+*line 195
+*line 196
+move #3,(sp)
+move R7,R0
+muls #12,R0
+move.l R0,R8
+move.l #_ftypes,R9
+move.l 0(R8,R9.l),-(sp)
+move 8(R14),R0
+muls #56,R0
+add.l #_filecat,R0
+move.l R0,-(sp)
+add.l #13,(sp)
+jsr _memcmpu
+addq.l #8,sp
+tst R0
+bne L35
+*line 196
+add #1,R7
+move R7,R0
+bra L30
+*line 197
+L35:L32:
+*line 194
+add #1,R7
+L33:
+*line 194
+cmp #9,R7
+blt L34
+L31:
+*line 198
+move #-1,R0
+bra L30
+L30:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _fctstr
+.text
+_fctstr:
+~~fctstr:
+~ns=8
+~just=10
+link R14,#0
+movem.l R6-R7,-(sp)
+~fcbad=L37
+.bss
+L37:.ds.b 12
+.text
+~i=R7
+*line 217
+clr R7
+bra L40
+L41:
+*line 218
+*line 219
+move #3,(sp)
+move R7,R0
+muls #12,R0
+move.l R0,R8
+move.l #_ftypes,R9
+move.l 0(R8,R9.l),-(sp)
+move 8(R14),R0
+muls #56,R0
+add.l #_filecat,R0
+move.l R0,-(sp)
+add.l #13,(sp)
+jsr _memcmpu
+addq.l #8,sp
+tst R0
+bne L42
+*line 219
+move R7,R0
+muls #12,R0
+tst 10(R14)
+beq L10000
+move #2,R1
+bra L10002
+L10000:move #1,R1
+L10002:asl #2,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_ftypes,R9
+move.l 0(R8,R9.l),R0
+bra L36
+*line 220
+L42:L39:
+*line 217
+add #1,R7
+L40:
+*line 217
+cmp #9,R7
+blt L41
+L38:
+*line 221
+move 8(R14),R0
+muls #56,R0
+add.l #_filecat,R0
+move.l R0,(sp)
+add.l #13,(sp)
+move.l #L43,-(sp)
+move.l #L37,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 222
+move.l #L37,R0
+bra L36
+L36:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _ocslot
+.text
+_ocslot:
+~~ocslot:
+~slot=8
+link R14,#-4
+*line 238
+*line 239
+*line 240
+move #3,(sp)
+move.l #L45,-(sp)
+move 8(R14),R0
+muls #56,R0
+add.l #_filecat,R0
+move.l R0,-(sp)
+jsr _memcmp
+addq.l #8,sp
+tst R0
+beq L46
+move 8(R14),R0
+muls #56,R0
+add.l #_filecat,R0
+move.l R0,R8
+tst.b (R8)
+beq L46
+*line 240
+move #1,R0
+bra L44
+*line 241
+bra L47
+L46:
+*line 242
+clr R0
+bra L44
+L47:L44:unlk R14
+rts
+.globl _ldline
+.text
+_ldline:
+~~ldline:
+~cy=8
+link R14,#-4
+*line 255
+*line 256
+cmp #292,8(R14)
+ble L49
+*line 256
+clr R0
+bra L48
+*line 257
+L49:
+*line 258
+*line 259
+cmp #14,8(R14)
+bge L50
+*line 259
+clr R0
+bra L48
+*line 260
+L50:
+*line 261
+move 8(R14),R0
+ext.l R0
+divs #14,R0
+bra L48
+L48:unlk R14
+rts
+.globl _lin2slt
+.text
+_lin2slt:
+~~lin2slt:
+~line=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~slot=R7
+~row=R6
+*line 281
+clr R6
+*line 283
+clr R7
+bra L54
+L55:
+*line 284
+*line 285
+move R7,(sp)
+jsr _ocslot
+tst R0
+beq L56
+*line 285
+*line 286
+add #1,R6
+move R6,R0
+cmp 8(R14),R0
+bne L57
+*line 286
+move R7,R0
+bra L51
+*line 287
+L57:L56:L53:
+*line 283
+add #1,R7
+L54:
+*line 283
+cmp #20,R7
+blt L55
+L52:
+*line 288
+move #-1,R0
+bra L51
+L51:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _exp_c
+.text
+_exp_c:
+~~exp_c:
+~cx=R7
+link R14,#0
+movem.l R6-R7,-(sp)
+*line 301
+move 8(R14),R7
+*line 301
+and #15,R7
+*line 302
+clr R0
+move R7,R0
+lsl #4,R0
+or R0,R7
+*line 303
+clr R0
+move R7,R0
+lsl #8,R0
+or R0,R7
+*line 305
+clr R0
+move R7,R0
+bra L58
+L58:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _ldwmsg
+.text
+_ldwmsg:
+~~ldwmsg:
+~line1=8
+~line2=12
+~line3=16
+~fgcolor=20
+~bgcolor=22
+link R14,#-4
+*line 321
+clr _lderrsw
+*line 322
+move #2,_lmwtype
+*line 323
+clr _submenu
+*line 325
+*line 326
+tst _ndisp
+bne L59
+*line 327
+*line 328
+move 22(R14),(sp)
+jsr _exp_c
+move R0,22(R14)
+*line 329
+move 20(R14),(sp)
+jsr _exp_c
+move R0,20(R14)
+*line 331
+*line 332
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L60
+*line 332
+clr (sp)
+jsr _vbank
+*line 333
+*line 334
+*line 335
+L60:
+*line 336
+*line 337
+move 22(R14),(sp)
+move 166+_ldbox,-(sp)
+move 164+_ldbox,-(sp)
+move 162+_ldbox,-(sp)
+move 160+_ldbox,-(sp)
+move #128,-(sp)
+move.l _librob,-(sp)
+jsr _vbfill4
+adda.l #14,sp
+*line 339
+*line 340
+tst.l 8(R14)
+beq L61
+*line 341
+move #14,(sp)
+move.l 8(R14),-(sp)
+move 174+_ldbox,-(sp)
+move 172+_ldbox,-(sp)
+move 20(R14),-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 342
+L61:
+*line 343
+*line 344
+tst.l 12(R14)
+beq L62
+*line 345
+move #14,(sp)
+move.l 12(R14),-(sp)
+move 174+_ldbox,-(sp)
+move 172+_ldbox,-(sp)
+add #1,(sp)
+move 20(R14),-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 346
+L62:
+*line 347
+*line 348
+tst.l 16(R14)
+beq L63
+*line 349
+move #14,(sp)
+move.l 16(R14),-(sp)
+move 174+_ldbox,-(sp)
+move 172+_ldbox,-(sp)
+add #2,(sp)
+move 20(R14),-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+L63:L59:unlk R14
+rts
+.globl _chksum
+.text
+_chksum:
+~~chksum:
+~area=R13
+~len=R7
+link R14,#0
+movem.l R4-R7/R13-R13,-(sp)
+~cs=R6
+~i=R5
+*line 368
+move.l 8(R14),R13
+*line 368
+move.l 12(R14),R7
+*line 368
+clr.l R6
+*line 370
+clr.l R5
+bra L67
+L68:
+*line 371
+move.b (R13)+,R0
+ext.w R0
+ext.l R0
+and.l #$ff,R0
+add.l R0,R6
+L66:
+*line 370
+add.l #$1,R5
+L67:
+*line 370
+cmp.l R7,R5
+blt L68
+L65:
+*line 373
+move.l R6,R0
+bra L64
+L64:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.globl _makelh
+.text
+_makelh:
+~~makelh:
+~kind=8
+link R14,#-4
+*line 385
+move #8,(sp)
+move #63,-(sp)
+move.l #_ldhead,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 386
+move #8,(sp)
+move.l #_ldfile,-(sp)
+move.l #8+_ldhead,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 387
+move #3,(sp)
+move 8(R14),R0
+sub #1,R0
+muls #12,R0
+move.l R0,R8
+move.l #_ftypes,R9
+move.l 0(R8,R9.l),-(sp)
+move.l #16+_ldhead,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 388
+move #37,(sp)
+move.l #_ldcmnt,-(sp)
+move.l #19+_ldhead,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 390
+move.l #$30,(sp)
+move.l #8+_ldhead,-(sp)
+jsr _chksum
+addq.l #4,sp
+move.l R0,_lcsum
+L69:unlk R14
+rts
+.globl _ldbusy
+.text
+_ldbusy:
+~~ldbusy:
+~msg=8
+link R14,#-4
+*line 405
+*line 406
+tst _ndisp
+bne L70
+*line 407
+*line 408
+*line 409
+move 170+_ldbox,(sp)
+move 168+_ldbox,-(sp)
+move.l 8(R14),-(sp)
+move.l #L71,-(sp)
+clr.l -(sp)
+jsr _ldwmsg
+adda.l #14,sp
+L70:unlk R14
+rts
+.globl _noslot
+.text
+_noslot:
+~~noslot:
+~fctype=8
+link R14,#-4
+*line 420
+move 8(R14),R0
+sub #1,R0
+muls #12,R0
+move.l R0,R8
+move.l #_ftypes,R9
+move.l 8(R8,R9.l),(sp)
+move.l #L73,-(sp)
+move.l #_ldmsg1,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 422
+*line 423
+move #9,(sp)
+move #14,-(sp)
+move.l #L75,-(sp)
+move.l #_ldmsg1,-(sp)
+move.l #L74,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+L72:unlk R14
+rts
+.globl _wr_ec
+.text
+_wr_ec:
+~~wr_ec:
+~fp=R13
+~from=R12
+~len=R7
+link R14,#0
+movem.l R4-R7/R12-R13,-(sp)
+~count=R6
+~c=R5
+*line 443
+move.l 8(R14),R13
+*line 443
+move.l 12(R14),R12
+*line 443
+move.l 16(R14),R7
+*line 443
+clr.l R6
+bra L79
+L80:
+*line 444
+*line 445
+clr _errno
+*line 446
+move.b (R12)+,R5
+*line 447
+*line 448
+*line 448
+move.l R13,(sp)
+move.b R5,R0
+ext.w R0
+move R0,-(sp) 
+jsr _putc
+addq.l #2,sp
+cmp #-1,R0
+bne L81
+*line 449
+*line 450
+move _errno,(sp)
+move.l #L82,-(sp)
+move.l #_errbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 451
+*line 452
+*line 453
+move #9,(sp)
+move #14,-(sp)
+clr.l -(sp)
+move.l #_errbuf,-(sp)
+move.l #L83,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 454
+*line 455
+move.l R13,(sp)
+jsr _fclose
+*line 456
+jsr _postio
+*line 457
+move #-1,R0
+bra L76
+*line 458
+*line 459
+*line 463
+L81:L78:
+*line 443
+add.l #$1,R6
+L79:
+*line 443
+cmp.l R7,R6
+blt L80
+L77:
+*line 466
+clr R0
+bra L76
+L76:tst.l (sp)+
+movem.l (sp)+,R5-R7/R12-R13
+unlk R14
+rts
+.globl _rd_ec
+.text
+_rd_ec:
+~~rd_ec:
+~fp=R13
+~to=R12
+~len=R7
+link R14,#0
+movem.l R4-R7/R12-R13,-(sp)
+~count=R6
+~c=R5
+*line 487
+move.l 8(R14),R13
+*line 487
+move.l 12(R14),R12
+*line 487
+move.l 16(R14),R7
+*line 487
+clr.l R6
+bra L87
+L88:
+*line 488
+*line 489
+clr _errno
+*line 490
+*line 491
+*line 491
+move.l R13,(sp)
+jsr _getc
+move R0,R5
+cmp #-1,R5
+bne L89
+*line 492
+*line 493
+move _errno,(sp)
+move.l #L90,-(sp)
+move.l #_errbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 494
+*line 495
+*line 496
+move #9,(sp)
+move #14,-(sp)
+clr.l -(sp)
+move.l #_errbuf,-(sp)
+move.l #L91,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 497
+*line 498
+move.l R13,(sp)
+jsr _fclose
+*line 499
+jsr _postio
+*line 500
+move #-1,R0
+bra L84
+*line 501
+bra L92
+L89:
+*line 502
+*line 503
+*line 504
+move.b R5,(R12)+
+*line 505
+*line 509
+L92:
+*line 510
+L86:
+*line 487
+add.l #$1,R6
+L87:
+*line 487
+cmp.l R7,R6
+blt L88
+L85:
+*line 513
+clr R0
+bra L84
+L84:tst.l (sp)+
+movem.l (sp)+,R5-R7/R12-R13
+unlk R14
+rts
+.globl _srchcat
+.text
+_srchcat:
+~~srchcat:
+~extn=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~fcslot=R7
+*line 533
+clr R7
+bra L96
+L97:
+*line 534
+*line 535
+*line 536
+move R7,(sp)
+jsr _ocslot
+tst R0
+beq L98
+*line 536
+*line 537
+*line 538
+move #8,(sp)
+move.l #_ldfile,-(sp)
+move R7,R0
+muls #56,R0
+add.l #_filecat,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+jsr _memcmp
+addq.l #8,sp
+tst R0
+bne L99
+move #3,(sp)
+move.l 8(R14),-(sp)
+move R7,R0
+muls #56,R0
+add.l #_filecat,R0
+move.l R0,-(sp)
+add.l #13,(sp)
+jsr _memcmpu
+addq.l #8,sp
+tst R0
+bne L99
+*line 538
+move R7,R0
+bra L93
+L99:L98:L95:
+*line 533
+add #1,R7
+L96:
+*line 533
+cmp #20,R7
+blt L97
+L94:
+*line 541
+move #-1,R0
+bra L93
+L93:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _clrcat
+.text
+_clrcat:
+~~clrcat:
+link R14,#-58
+movem.l R6-R7,-(sp)
+~i=R7
+~fcebuf=-58
+*line 555
+clr R7
+bra L103
+L104:
+*line 556
+*line 557
+*line 558
+*line 559
+move #10,(sp)
+move #13,-(sp)
+move.l #L106,-(sp)
+move R7,-(sp)
+move.l #L105,-(sp)
+move.l R14,-(sp)
+add.l #-58,(sp)
+jsr _sprintf
+adda.l #16,sp
+*line 560
+*line 561
+move #56,(sp)
+move.l R14,-(sp)
+add.l #-58,(sp)
+move R7,R0
+muls #56,R0
+add.l #_filecat,R0
+move.l R0,-(sp)
+jsr _memcpy
+addq.l #8,sp
+L102:
+*line 555
+add #1,R7
+L103:
+*line 555
+cmp #20,R7
+blt L104
+L101:L100:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _clreq
+.text
+_clreq:
+~~clreq:
+~bytes=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~rclusts=R7
+~clmask=R6
+*line 583
+move.l __thebpb,R8
+clr R0
+move 4(R8),R0
+sub #1,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R6
+*line 585
+*line 586
+move.l __thebpb,R8
+clr R0
+move 4(R8),R0
+swap R0
+clr R0
+swap R0
+move.l R0,-(sp)
+move.l 8(R14),-(sp)
+jsr ldiv
+addq.l #8,sp
+move.l R6,R1
+and.l 8(R14),R1
+beq L10003
+move #1,R1
+bra L10005
+L10003:clr R1
+L10005:ext.l R1
+add.l R1,R0
+move R0,R7
+*line 588
+move R7,R0
+bra L107
+L107:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _spacerq
+.text
+_spacerq:
+~~spacerq:
+~kind=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~howmuch=R7
+~k=R6
+*line 607
+clr.l R6
+*line 609
+move 8(R14),R0
+bra L110
+*line 610
+L111:
+*line 611
+*line 612
+*line 613
+move.l #$809c,R6
+bra L109
+*line 614
+*line 615
+L112:
+*line 616
+L113:
+*line 617
+L114:
+*line 618
+*line 619
+*line 620
+move.l #$14,-(sp)
+move.l #1778+_idefs,R0
+sub.l #_idefs,R0
+move.l R0,-(sp)
+add.l #$478,(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,R6
+add.l #$38,R6
+bra L109
+*line 621
+*line 622
+L115:
+*line 623
+*line 624
+*line 625
+jsr _ptsizer
+move.l R0,R6
+add.l #$38,R6
+bra L109
+*line 626
+*line 627
+L116:
+*line 628
+*line 629
+*line 630
+jsr _scsizer
+move.l R0,R6
+add.l #$38,R6
+bra L109
+*line 631
+*line 632
+L117:
+*line 633
+*line 634
+*line 635
+jsr _sqsizer
+move.l R0,R6
+add.l #$38,R6
+bra L109
+*line 636
+*line 637
+L118:
+*line 638
+*line 639
+*line 640
+move.l #$a58,R6
+bra L109
+*line 641
+*line 642
+L119:
+*line 643
+*line 644
+*line 645
+move.l #$2ce8,R6
+bra L109
+*line 646
+*line 647
+L120:
+*line 648
+*line 649
+*line 650
+clr.l R6
+bra L109
+*line 651
+bra L109
+L110:sub #1,R0
+cmp #8,R0
+bhi L120
+asl #2,R0
+move R0,R8
+add.l #L121,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L121:.dc.l L111
+.dc.l L112
+.dc.l L113
+.dc.l L116
+.dc.l L118
+.dc.l L119
+.dc.l L114
+.dc.l L115
+.dc.l L117
+.text
+L109:
+*line 655
+tst.l R6
+beq L10006
+move.l R6,(sp)
+jsr _clreq
+bra L10008
+L10006:move #-1,R0
+L10008:move R0,R7
+*line 656
+move.l R6,_ndbytes
+*line 657
+move R7,R0
+bra L108
+L108:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _ckstor
+.text
+_ckstor:
+~~ckstor:
+link R14,#-4
+*line 672
+*line 673
+tst _lasgsw
+beq L123
+*line 673
+clr R0
+bra L122
+*line 674
+L123:
+*line 675
+*line 676
+tst _lorchsw
+beq L124
+*line 676
+clr R0
+bra L122
+*line 677
+L124:
+*line 678
+*line 679
+tst _lorclsw
+beq L125
+*line 679
+clr R0
+bra L122
+*line 680
+L125:
+*line 681
+*line 682
+tst _lpatsw
+beq L126
+*line 682
+clr R0
+bra L122
+*line 683
+L126:
+*line 684
+*line 685
+tst _lscrsw
+beq L127
+*line 685
+clr R0
+bra L122
+*line 686
+L127:
+*line 687
+*line 688
+tst _lseqsw
+beq L128
+*line 688
+clr R0
+bra L122
+*line 689
+L128:
+*line 690
+*line 691
+tst _ltunsw
+beq L129
+*line 691
+clr R0
+bra L122
+*line 692
+L129:
+*line 693
+*line 694
+tst _lwavsw
+beq L130
+*line 694
+clr R0
+bra L122
+*line 695
+L130:
+*line 696
+move #-1,R0
+bra L122
+L122:unlk R14
+rts
+.globl _ckdups
+.text
+_ckdups:
+~~ckdups:
+link R14,#-4
+*line 711
+*line 712
+tst _lasgsw
+beq L132
+*line 712
+*line 713
+move.l #L133,(sp)
+jsr _srchcat
+cmp #-1,R0
+beq L134
+*line 713
+move #1,R0
+bra L131
+*line 714
+L134:L132:
+*line 715
+*line 716
+tst _lorchsw
+beq L135
+*line 716
+*line 717
+move.l #L136,(sp)
+jsr _srchcat
+cmp #-1,R0
+beq L137
+*line 717
+move #3,R0
+bra L131
+*line 718
+L137:L135:
+*line 719
+*line 720
+tst _lorclsw
+beq L138
+*line 720
+*line 721
+move.l #L139,(sp)
+jsr _srchcat
+cmp #-1,R0
+beq L140
+*line 721
+move #2,R0
+bra L131
+*line 722
+L140:L138:
+*line 723
+*line 724
+tst _lorchsw
+bne L10009
+tst _lorclsw
+beq L141
+L10009:*line 724
+*line 725
+move.l #L142,(sp)
+jsr _srchcat
+cmp #-1,R0
+beq L143
+*line 725
+move #7,R0
+bra L131
+*line 726
+L143:L141:
+*line 727
+*line 728
+tst _lpatsw
+beq L144
+*line 728
+*line 729
+move.l #L145,(sp)
+jsr _srchcat
+cmp #-1,R0
+beq L146
+*line 729
+move #8,R0
+bra L131
+*line 730
+L146:L144:
+*line 731
+*line 732
+tst _lscrsw
+beq L147
+*line 732
+*line 733
+move.l #L148,(sp)
+jsr _srchcat
+cmp #-1,R0
+beq L149
+*line 733
+move #4,R0
+bra L131
+*line 734
+L149:L147:
+*line 735
+*line 736
+tst _lseqsw
+beq L150
+*line 736
+*line 737
+move.l #L151,(sp)
+jsr _srchcat
+cmp #-1,R0
+beq L152
+*line 737
+move #9,R0
+bra L131
+*line 738
+L152:L150:
+*line 739
+*line 740
+tst _ltunsw
+beq L153
+*line 740
+*line 741
+move.l #L154,(sp)
+jsr _srchcat
+cmp #-1,R0
+beq L155
+*line 741
+move #5,R0
+bra L131
+*line 742
+L155:L153:
+*line 743
+*line 744
+tst _lwavsw
+beq L156
+*line 744
+*line 745
+move.l #L157,(sp)
+jsr _srchcat
+cmp #-1,R0
+beq L158
+*line 745
+move #6,R0
+bra L131
+L158:L156:
+*line 746
+clr R0
+bra L131
+L131:unlk R14
+rts
+.globl _showsiz
+.text
+_showsiz:
+~~showsiz:
+link R14,#0
+movem.l R4-R7,-(sp)
+~dcap=R7
+~drem=R6
+~dused=R5
+*line 764
+clr __bpbin
+*line 766
+clr (sp)
+jsr _dspace
+move R0,R7
+*line 768
+*line 768
+cmp #-1,R7
+bne L160
+*line 769
+*line 770
+*line 771
+*line 772
+move #9,(sp)
+move #14,-(sp)
+clr.l -(sp)
+clr.l -(sp)
+move.l #L161,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 773
+*line 774
+move #-1,R0
+bra L159
+*line 775
+*line 776
+L160:
+*line 777
+move #1,(sp)
+jsr _dspace
+move R0,R6
+*line 778
+move R7,R5
+sub R6,R5
+*line 780
+move R7,(sp)
+move.l #L162,-(sp)
+move.l #_ldmsg1,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 781
+move R5,(sp)
+move.l #L163,-(sp)
+move.l #_ldmsg2,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 782
+move R6,(sp)
+move.l #L164,-(sp)
+move.l #_ldmsg3,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 784
+move 170+_ldbox,(sp)
+move 168+_ldbox,-(sp)
+move.l #_ldmsg3,-(sp)
+move.l #_ldmsg2,-(sp)
+move.l #_ldmsg1,-(sp)
+jsr _ldwmsg
+adda.l #14,sp
+L159:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _getcat
+.text
+_getcat:
+~~getcat:
+~msgsw=8
+link R14,#-4
+movem.l R7-R7/R13-R13,-(sp)
+~fp=R13
+~rc=-2
+~fesize=-4
+*line 803
+clr _ldidsiz
+*line 804
+clr __bpbin
+*line 805
+clr _catin
+*line 807
+clr _errno
+*line 808
+jsr _preio
+*line 809
+move.l #L167,(sp)
+move.l #L166,-(sp)
+jsr _fopenb
+addq.l #4,sp
+move.l R0,R13
+*line 811
+*line 811
+move.l R13,R0
+bne L168
+*line 812
+*line 813
+jsr _clrcat
+*line 814
+move #1,_catin
+*line 815
+*line 816
+*line 816
+tst 8(R14)
+beq L169
+*line 817
+*line 818
+jsr _showsiz
+*line 819
+move #1,_ldidsiz
+*line 820
+*line 821
+L169:
+*line 822
+clr R0
+bra L165
+*line 823
+*line 824
+L168:
+*line 825
+move #56,-4(R14)
+*line 826
+move #1120,(sp)
+clr -(sp)
+move.l #_filecat,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 830
+clr _errno
+*line 831
+move.l R13,(sp)
+move #20,-(sp)
+move -4(R14),-(sp)
+move.l #_filecat,-(sp)
+jsr _fread
+addq.l #8,sp
+move R0,-2(R14)
+*line 833
+*line 833
+cmp #20,-2(R14)
+beq L170
+*line 834
+*line 835
+*line 835
+tst -2(R14)
+beq L171
+*line 836
+*line 837
+move -2(R14),(sp)
+move.l #L172,-(sp)
+move.l #_ldmsg1,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 838
+*line 839
+move -4(R14),(sp)
+move _errno,-(sp)
+move.l #L173,-(sp)
+move.l #_ldmsg2,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 840
+*line 841
+*line 842
+move #9,(sp)
+move #14,-(sp)
+move.l #_ldmsg2,-(sp)
+move.l #_ldmsg1,-(sp)
+move.l #L174,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 843
+*line 844
+clr _catin
+*line 845
+bra L175
+L171:
+*line 846
+*line 847
+*line 848
+*line 849
+*line 850
+move #9,(sp)
+move #14,-(sp)
+clr.l -(sp)
+clr.l -(sp)
+move.l #L176,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 851
+*line 852
+jsr _clrcat
+*line 853
+move #1,_catin
+L175:
+*line 854
+*line 855
+*line 856
+move.l R13,(sp)
+jsr _fclose
+*line 857
+jsr _postio
+*line 858
+move #-1,R0
+bra L165
+*line 859
+*line 860
+L170:
+*line 861
+move #1,_catin
+*line 862
+move.l R13,(sp)
+jsr _fclose
+*line 863
+jsr _postio
+*line 864
+clr R0
+bra L165
+L165:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _putcat
+.text
+_putcat:
+~~putcat:
+link R14,#0
+movem.l R4-R7/R13-R13,-(sp)
+~fp=R13
+~i=R7
+~rc=R6
+~fesize=R5
+*line 882
+clr R7
+bra L180
+L181:
+*line 883
+*line 884
+move R7,R0
+muls #56,R0
+add.l #_filecat,R0
+move.l R0,R8
+move.b #13,54(R8)
+*line 885
+move R7,R0
+muls #56,R0
+add.l #_filecat,R0
+move.l R0,R8
+move.b #10,55(R8)
+L179:
+*line 882
+add #1,R7
+L180:
+*line 882
+cmp #20,R7
+blt L181
+L178:
+*line 888
+clr _errno
+*line 889
+jsr _preio
+*line 890
+move.l #L183,(sp)
+move.l #L182,-(sp)
+jsr _fopenb
+addq.l #4,sp
+move.l R0,R13
+*line 892
+*line 892
+move.l R13,R0
+bne L184
+*line 893
+*line 894
+move _errno,(sp)
+move.l #L185,-(sp)
+move.l #_ldmsg2,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 895
+*line 896
+*line 897
+move #9,(sp)
+move #14,-(sp)
+move.l #_ldmsg2,-(sp)
+clr.l -(sp)
+move.l #L186,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 898
+*line 899
+move #-1,R0
+bra L177
+*line 900
+*line 901
+L184:
+*line 902
+move #56,R5
+*line 906
+clr _errno
+*line 907
+move.l R13,(sp)
+move #20,-(sp)
+move R5,-(sp)
+move.l #_filecat,-(sp)
+jsr _fwrite
+addq.l #8,sp
+move R0,R6
+*line 909
+*line 909
+cmp #20,R6
+beq L187
+*line 910
+*line 911
+*line 911
+tst R6
+beq L188
+*line 912
+*line 913
+move R6,(sp)
+move.l #L189,-(sp)
+move.l #_ldmsg1,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 914
+*line 915
+move R5,(sp)
+move _errno,-(sp)
+move.l #L190,-(sp)
+move.l #_ldmsg2,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 916
+*line 917
+*line 918
+move #9,(sp)
+move #14,-(sp)
+move.l #_ldmsg2,-(sp)
+move.l #_ldmsg1,-(sp)
+move.l #L191,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 919
+bra L192
+L188:
+*line 920
+*line 921
+*line 922
+move _errno,(sp)
+move.l #L193,-(sp)
+move.l #_ldmsg2,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 923
+*line 924
+*line 925
+*line 926
+move #9,(sp)
+move #14,-(sp)
+move.l #_ldmsg2,-(sp)
+clr.l -(sp)
+move.l #L194,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+L192:
+*line 927
+*line 928
+*line 929
+move.l R13,(sp)
+jsr _fclose
+*line 930
+jsr _postio
+*line 931
+move #-1,R0
+bra L177
+*line 932
+*line 933
+L187:
+*line 934
+move.l R13,(sp)
+jsr _fclose
+*line 935
+jsr _postio
+*line 936
+clr R0
+bra L177
+L177:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.globl _dslslot
+.text
+_dslslot:
+~~dslslot:
+~slot=R7
+~fg=10
+~row=12
+link R14,#-42
+movem.l R3-R7,-(sp)
+~color=R6
+~chilon=R5
+~chilorc=R4
+~c=-2
+~buf=-42
+*line 957
+move 8(R14),R7
+*line 957
+*line 958
+tst _ndisp
+bne L195
+*line 959
+*line 960
+move 10(R14),(sp)
+jsr _exp_c
+move R0,R6
+*line 961
+move 24+_ldbox,(sp)
+jsr _exp_c
+move R0,R5
+*line 962
+move #6,(sp)
+jsr _exp_c
+move R0,R4
+*line 966
+move #14,(sp)
+clr -(sp)
+move R7,-(sp)
+jsr _fctstr
+addq.l #4,sp
+move.l R0,-(sp)
+move #1,-(sp)
+move 12(R14),-(sp)
+move 26+_ldbox,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 970
+move R7,R0
+muls #56,R0
+move.l R0,R8
+move.l #_filecat,R9
+move.b 3(R8,R9.l),R0
+ext.w R0
+move R0,-2(R14)
+*line 971
+move -2(R14),R0
+and #127,R0
+move.b R0,-42(R14)
+*line 972
+clr.b -41(R14)
+*line 973
+*line 974
+move #14,(sp)
+move.l R14,-(sp)
+add.l #-42,(sp)
+move #11,-(sp)
+move 12(R14),-(sp)
+move 26+_ldbox,-(sp)
+btst #7,-1(R14)
+beq L10010
+move R4,-(sp)
+bra L10012
+L10010:move R5,-(sp)
+L10012:move #64,-(sp)
+move.l _librob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 978
+move #8,(sp)
+move R7,R0
+muls #56,R0
+add.l #_filecat,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+move.l R14,-(sp)
+add.l #-42,(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 979
+clr.b -34(R14)
+*line 980
+move #14,(sp)
+move.l R14,-(sp)
+add.l #-42,(sp)
+move #13,-(sp)
+move 12(R14),-(sp)
+move 26+_ldbox,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 984
+move #37,(sp)
+move R7,R0
+muls #56,R0
+add.l #_filecat,R0
+move.l R0,-(sp)
+add.l #17,(sp)
+move.l R14,-(sp)
+add.l #-42,(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 985
+clr.b -5(R14)
+*line 986
+move #14,(sp)
+move.l R14,-(sp)
+add.l #-42,(sp)
+move #22,-(sp)
+move 12(R14),-(sp)
+move 26+_ldbox,-(sp)
+move R5,-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 990
+move #3,(sp)
+move R7,R0
+muls #56,R0
+add.l #_filecat,R0
+move.l R0,-(sp)
+move.l R14,-(sp)
+add.l #-42,(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 991
+clr.b -39(R14)
+*line 992
+move #14,(sp)
+move.l R14,-(sp)
+add.l #-42,(sp)
+move #60,-(sp)
+move 12(R14),-(sp)
+move 26+_ldbox,-(sp)
+move R5,-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+L195:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _showcat
+.text
+_showcat:
+~~showcat:
+link R14,#0
+movem.l R2-R7,-(sp)
+~i=R7
+~fcslot=R6
+~fcrow=R5
+~fcount=R4
+~color=R3
+*line 1010
+*line 1011
+tst _ndisp
+bne L196
+*line 1012
+*line 1013
+clr (sp)
+jsr _ldswin
+*line 1015
+move 26+_ldbox,(sp)
+jsr _exp_c
+move R0,R3
+*line 1017
+*line 1018
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L197
+*line 1018
+clr (sp)
+jsr _vbank
+*line 1019
+L197:
+*line 1020
+*line 1021
+move R3,(sp)
+move 22+_ldbox,-(sp)
+move 20+_ldbox,-(sp)
+move 18+_ldbox,-(sp)
+move 16+_ldbox,-(sp)
+move #128,-(sp)
+move.l _librob,-(sp)
+jsr _vbfill4
+adda.l #14,sp
+*line 1023
+move 24+_ldbox,R3
+*line 1025
+move #1,R5
+*line 1026
+clr R4
+*line 1028
+clr R6
+bra L200
+L201:
+*line 1029
+*line 1030
+*line 1030
+move R6,(sp)
+jsr _ocslot
+tst R0
+beq L202
+*line 1031
+*line 1032
+move R5,(sp)
+move R3,-(sp)
+move R6,-(sp)
+jsr _dslslot
+addq.l #4,sp
+*line 1033
+add #1,R5
+*line 1034
+add #1,R4
+*line 1035
+L202:L199:
+*line 1028
+add #1,R6
+L200:
+*line 1028
+cmp #20,R6
+blt L201
+L198:
+*line 1038
+move R4,R0
+bra L196
+L196:tst.l (sp)+
+movem.l (sp)+,R3-R7
+unlk R14
+rts
+.globl _fcindex
+.text
+_fcindex:
+~~fcindex:
+link R14,#-4
+*line 1053
+*line 1054
+tst _lderrsw
+bne L204
+*line 1054
+move.l #L205,(sp)
+jsr _ldbusy
+*line 1055
+L204:
+*line 1056
+*line 1057
+move #1,(sp)
+jsr _getcat
+tst R0
+beq L206
+*line 1057
+move #-1,R0
+bra L203
+*line 1058
+L206:
+*line 1059
+*line 1060
+tst _lderrsw
+bne L207
+*line 1060
+jsr _showcat
+*line 1061
+*line 1062
+*line 1063
+L207:
+*line 1064
+*line 1065
+tst _ldidsiz
+bne L208
+tst _lderrsw
+bne L208
+*line 1065
+jsr _showsiz
+*line 1066
+L208:
+*line 1067
+clr R0
+bra L203
+L203:unlk R14
+rts
+.globl _streset
+.text
+_streset:
+~~streset:
+link R14,#-4
+*line 1081
+clr _lstrsw
+*line 1083
+clr _lasgsw
+*line 1084
+clr _lorchsw
+*line 1085
+clr _lorclsw
+*line 1086
+clr _lpatsw
+*line 1087
+clr _lscrsw
+*line 1088
+clr _lseqsw
+*line 1089
+clr _ltunsw
+*line 1090
+clr _lwavsw
+*line 1092
+move #9,(sp)
+jsr _ldswin
+L209:unlk R14
+rts
+.globl _fcreset
+.text
+_fcreset:
+~~fcreset:
+link R14,#-4
+*line 1103
+clr _lselsw
+*line 1105
+move #6,(sp)
+jsr _ldswin
+L210:unlk R14
+rts
+.globl _getslot
+.text
+_getslot:
+~~getslot:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 1124
+clr R7
+bra L214
+L215:
+*line 1125
+*line 1126
+move R7,(sp)
+jsr _ocslot
+tst R0
+bne L216
+*line 1126
+move R7,R0
+bra L211
+*line 1127
+L216:L213:
+*line 1124
+add #1,R7
+L214:
+*line 1124
+cmp #20,R7
+blt L215
+L212:
+*line 1128
+move #-1,R0
+bra L211
+L211:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _slotnam
+.text
+_slotnam:
+~~slotnam:
+~slot=8
+~kind=10
+link R14,#-4
+~thename=L218
+.bss
+L218:.ds.b 14
+.text
+*line 1143
+*line 1144
+clr R0
+move 10(R14),R0
+sub #1,R0
+mulu #12,R0
+move.l R0,R8
+move.l #_ftypes,R9
+move.l 0(R8,R9.l),(sp)
+move 8(R14),-(sp)
+move.l #L219,-(sp)
+move.l #L218,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 1146
+move.l #L218,R0
+bra L217
+L217:unlk R14
+rts
+.globl _wrtfile
+.text
+_wrtfile:
+~~wrtfile:
+~kind=8
+link R14,#-4
+movem.l R4-R7,-(sp)
+~slot=R7
+~flspace=R6
+~tkind=R5
+~sizetmp=-4
+*line 1165
+jsr _getslot
+move R0,R7
+*line 1167
+*line 1167
+cmp #-1,R7
+bne L221
+*line 1168
+*line 1169
+move 8(R14),(sp)
+jsr _noslot
+*line 1170
+jsr _streset
+*line 1171
+move #-1,R0
+bra L220
+*line 1172
+*line 1173
+*line 1174
+*line 1175
+*line 1176
+L221:
+*line 1177
+move 8(R14),R0
+bra L223
+*line 1178
+L224:
+*line 1179
+*line 1180
+*line 1181
+*line 1182
+move R7,(sp)
+jsr _wrt_asg
+tst R0
+beq L225
+*line 1182
+move #-1,R0
+bra L220
+*line 1183
+bra L226
+L225:bra L222
+L226:
+*line 1184
+*line 1185
+L227:
+*line 1186
+*line 1187
+*line 1188
+*line 1189
+clr (sp)
+move R7,-(sp)
+jsr _wrt_orc
+addq.l #2,sp
+tst R0
+beq L228
+*line 1189
+move #-1,R0
+bra L220
+*line 1190
+bra L229
+L228:bra L222
+L229:
+*line 1191
+*line 1192
+L230:
+*line 1193
+*line 1194
+*line 1195
+*line 1196
+move #1,(sp)
+move R7,-(sp)
+jsr _wrt_orc
+addq.l #2,sp
+tst R0
+beq L231
+*line 1196
+move #-1,R0
+bra L220
+*line 1197
+bra L232
+L231:bra L222
+L232:
+*line 1198
+*line 1199
+L233:
+*line 1200
+*line 1201
+*line 1202
+*line 1203
+move R7,(sp)
+jsr _wrt_pat
+tst R0
+beq L234
+*line 1203
+move #-1,R0
+bra L220
+*line 1204
+bra L235
+L234:bra L222
+L235:
+*line 1205
+*line 1206
+L236:
+*line 1207
+*line 1208
+*line 1209
+*line 1210
+move R7,(sp)
+jsr _wrt_scr
+tst R0
+beq L237
+*line 1210
+move #-1,R0
+bra L220
+*line 1211
+bra L238
+L237:bra L222
+L238:
+*line 1212
+*line 1213
+L239:
+*line 1214
+*line 1215
+*line 1216
+*line 1217
+move R7,(sp)
+jsr _wrt_seq
+tst R0
+beq L240
+*line 1217
+move #-1,R0
+bra L220
+*line 1218
+bra L241
+L240:bra L222
+L241:
+*line 1219
+*line 1220
+*line 1221
+*line 1222
+L242:
+*line 1223
+*line 1224
+*line 1225
+*line 1226
+move R7,(sp)
+jsr _wrt_tun
+tst R0
+beq L243
+*line 1226
+move #-1,R0
+bra L220
+*line 1227
+bra L244
+L243:bra L222
+L244:
+*line 1228
+*line 1229
+L245:
+*line 1230
+*line 1231
+*line 1232
+*line 1233
+move R7,(sp)
+jsr _wrt_wav
+tst R0
+beq L246
+*line 1233
+move #-1,R0
+bra L220
+*line 1234
+bra L247
+L246:bra L222
+L247:
+*line 1235
+*line 1236
+L248:
+*line 1237
+*line 1238
+*line 1239
+move 8(R14),(sp)
+move.l #L249,-(sp)
+move.l #_ldmsg1,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 1240
+*line 1241
+*line 1242
+move #9,(sp)
+move #14,-(sp)
+clr.l -(sp)
+move.l #_ldmsg1,-(sp)
+move.l #L250,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 1243
+*line 1244
+move #-1,R0
+bra L220
+bra L222
+L223:sub #1,R0
+cmp #8,R0
+bhi L248
+asl #2,R0
+move R0,R8
+add.l #L251,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L251:.dc.l L224
+.dc.l L227
+.dc.l L230
+.dc.l L236
+.dc.l L242
+.dc.l L245
+.dc.l L248
+.dc.l L233
+.dc.l L239
+.text
+L222:
+*line 1252
+*line 1253
+cmp #2,8(R14)
+beq L10013
+cmp #3,8(R14)
+bne L252
+L10013:*line 1253
+move #7,R5
+*line 1254
+bra L253
+L252:
+*line 1255
+move 8(R14),R5
+L253:
+*line 1257
+move 8(R14),(sp)
+jsr _spacerq
+move R0,R6
+*line 1259
+move R6,(sp)
+move.l #L254,-(sp)
+move.l R14,-(sp)
+sub.l #4,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 1260
+move #3,(sp)
+move.l R14,-(sp)
+sub.l #4,(sp)
+move R7,R0
+muls #56,R0
+add.l #_filecat,R0
+move.l R0,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 1262
+move #8,(sp)
+move.l #_ldfile,-(sp)
+move R7,R0
+muls #56,R0
+add.l #_filecat,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 1263
+move #3,(sp)
+move R5,R0
+sub #1,R0
+muls #12,R0
+move.l R0,R8
+move.l #_ftypes,R9
+move.l 0(R8,R9.l),-(sp)
+move R7,R0
+muls #56,R0
+add.l #_filecat,R0
+move.l R0,-(sp)
+add.l #13,(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 1264
+move #37,(sp)
+move.l #_ldcmnt,-(sp)
+move R7,R0
+muls #56,R0
+add.l #_filecat,R0
+move.l R0,-(sp)
+add.l #17,(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 1266
+move 8(R14),(sp)
+jsr _savefc
+*line 1268
+move R7,R0
+muls #56,R0
+add.l #_filecat,R0
+move.l R0,R8
+move.b #13,54(R8)
+*line 1269
+move R7,R0
+muls #56,R0
+add.l #_filecat,R0
+move.l R0,R8
+move.b #10,55(R8)
+*line 1271
+clr R0
+bra L220
+L220:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _writem
+.text
+_writem:
+~~writem:
+link R14,#-4
+*line 1286
+*line 1287
+tst _lasgsw
+beq L256
+*line 1287
+*line 1288
+move #1,(sp)
+jsr _wrtfile
+tst R0
+beq L257
+*line 1288
+move #-1,R0
+bra L255
+*line 1289
+L257:L256:
+*line 1290
+*line 1291
+tst _lorchsw
+beq L258
+*line 1291
+*line 1292
+move #3,(sp)
+jsr _wrtfile
+tst R0
+beq L259
+*line 1292
+move #-1,R0
+bra L255
+*line 1293
+L259:L258:
+*line 1294
+*line 1295
+tst _lorclsw
+beq L260
+*line 1295
+*line 1296
+move #2,(sp)
+jsr _wrtfile
+tst R0
+beq L261
+*line 1296
+move #-1,R0
+bra L255
+*line 1297
+L261:L260:
+*line 1298
+*line 1299
+tst _lpatsw
+beq L262
+*line 1299
+*line 1300
+move #8,(sp)
+jsr _wrtfile
+tst R0
+beq L263
+*line 1300
+move #-1,R0
+bra L255
+*line 1301
+L263:L262:
+*line 1302
+*line 1303
+tst _lscrsw
+beq L264
+*line 1303
+*line 1304
+move #4,(sp)
+jsr _wrtfile
+tst R0
+beq L265
+*line 1304
+move #-1,R0
+bra L255
+*line 1305
+L265:L264:
+*line 1306
+*line 1307
+tst _lseqsw
+beq L266
+*line 1307
+*line 1308
+move #9,(sp)
+jsr _wrtfile
+tst R0
+beq L267
+*line 1308
+move #-1,R0
+bra L255
+*line 1309
+L267:L266:
+*line 1310
+*line 1311
+tst _ltunsw
+beq L268
+*line 1311
+*line 1312
+move #5,(sp)
+jsr _wrtfile
+tst R0
+beq L269
+*line 1312
+move #-1,R0
+bra L255
+*line 1313
+L269:L268:
+*line 1314
+*line 1315
+tst _lwavsw
+beq L270
+*line 1315
+*line 1316
+move #6,(sp)
+jsr _wrtfile
+tst R0
+beq L271
+*line 1316
+move #-1,R0
+bra L255
+*line 1317
+L271:L270:
+*line 1318
+clr R0
+bra L255
+L255:unlk R14
+rts
+.globl _storit
+.text
+_storit:
+~~storit:
+link R14,#-4
+movem.l R3-R7,-(sp)
+~weneed=R7
+~i=R6
+~slotnd=R5
+~slothv=R4
+~rc=-2
+~drem=-4
+*line 1338
+*line 1338
+move #8,(sp)
+move.l #L273,-(sp)
+move.l #_ldfile,-(sp)
+jsr _memcmp
+addq.l #8,sp
+tst R0
+bne L274
+*line 1339
+*line 1340
+*line 1341
+move #9,(sp)
+move #14,-(sp)
+move.l #_ld_em2,-(sp)
+move.l #_ld_em1,-(sp)
+move.l #L275,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 1342
+*line 1343
+jsr _streset
+*line 1344
+move #-1,R0
+bra L272
+*line 1345
+*line 1346
+*line 1347
+*line 1348
+L274:
+*line 1349
+*line 1349
+jsr _ckstor
+tst R0
+beq L276
+*line 1350
+*line 1351
+*line 1352
+move #9,(sp)
+move #14,-(sp)
+move.l #_ld_em2,-(sp)
+move.l #_ld_em1,-(sp)
+move.l #L277,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 1353
+*line 1354
+jsr _streset
+*line 1355
+move #-1,R0
+bra L272
+*line 1356
+*line 1357
+L276:
+*line 1358
+*line 1359
+tst _lderrsw
+bne L278
+*line 1359
+move.l #L279,(sp)
+jsr _ldbusy
+*line 1360
+L278:
+*line 1361
+*line 1361
+clr (sp)
+jsr _getcat
+tst R0
+beq L280
+*line 1362
+*line 1363
+jsr _streset
+*line 1364
+move #-1,R0
+bra L272
+*line 1365
+*line 1366
+*line 1367
+*line 1368
+L280:
+*line 1369
+move #1,(sp)
+jsr _dspace
+move R0,-4(R14)
+*line 1370
+clr R5
+*line 1371
+clr R7
+*line 1375
+*line 1375
+tst _lasgsw
+beq L281
+*line 1376
+*line 1377
+move #1,(sp)
+jsr _spacerq
+add R0,R7
+*line 1378
+add #1,R5
+*line 1379
+*line 1380
+L281:
+*line 1381
+*line 1381
+tst _lorchsw
+beq L282
+*line 1382
+*line 1383
+move #3,(sp)
+jsr _spacerq
+add R0,R7
+*line 1384
+add #1,R5
+*line 1385
+*line 1386
+L282:
+*line 1387
+*line 1387
+tst _lorclsw
+beq L283
+*line 1388
+*line 1389
+move #2,(sp)
+jsr _spacerq
+add R0,R7
+*line 1390
+add #1,R5
+*line 1391
+*line 1392
+L283:
+*line 1393
+*line 1393
+tst _lpatsw
+beq L284
+*line 1394
+*line 1395
+move #8,(sp)
+jsr _spacerq
+add R0,R7
+*line 1396
+add #1,R5
+*line 1397
+*line 1398
+L284:
+*line 1399
+*line 1399
+tst _lscrsw
+beq L285
+*line 1400
+*line 1401
+move #4,(sp)
+jsr _spacerq
+add R0,R7
+*line 1402
+add #1,R5
+*line 1403
+*line 1404
+L285:
+*line 1405
+*line 1405
+tst _lseqsw
+beq L286
+*line 1406
+*line 1407
+move #9,(sp)
+jsr _spacerq
+add R0,R7
+*line 1408
+add #1,R5
+*line 1409
+*line 1410
+L286:
+*line 1411
+*line 1411
+tst _ltunsw
+beq L287
+*line 1412
+*line 1413
+move #5,(sp)
+jsr _spacerq
+add R0,R7
+*line 1414
+add #1,R5
+*line 1415
+*line 1416
+L287:
+*line 1417
+*line 1417
+tst _lwavsw
+beq L288
+*line 1418
+*line 1419
+move #6,(sp)
+jsr _spacerq
+add R0,R7
+*line 1420
+add #1,R5
+*line 1421
+*line 1422
+L288:
+*line 1423
+*line 1423
+cmp -4(R14),R7
+ble L289
+*line 1424
+*line 1425
+move -4(R14),(sp)
+move R7,-(sp)
+clr -(sp)
+jsr _nospace
+addq.l #4,sp
+*line 1426
+jsr _streset
+*line 1427
+move #-1,R0
+bra L272
+*line 1428
+*line 1429
+*line 1430
+*line 1431
+*line 1432
+*line 1433
+*line 1434
+L289:
+*line 1435
+clr R4
+*line 1437
+clr R6
+bra L292
+L293:
+*line 1438
+*line 1439
+move R6,(sp)
+jsr _ocslot
+tst R0
+bne L294
+*line 1439
+add #1,R4
+*line 1440
+L294:L291:
+*line 1437
+add #1,R6
+L292:
+*line 1437
+cmp #20,R6
+blt L293
+L290:
+*line 1441
+*line 1441
+cmp R5,R4
+bge L295
+*line 1442
+*line 1443
+move R5,(sp)
+move R4,-(sp)
+move #1,-(sp)
+jsr _nospace
+addq.l #4,sp
+*line 1444
+jsr _streset
+*line 1445
+move #-1,R0
+bra L272
+*line 1446
+*line 1447
+*line 1448
+*line 1449
+L295:
+*line 1450
+*line 1450
+jsr _ckdups
+move R0,-2(R14)
+beq L296
+*line 1451
+*line 1452
+move -2(R14),R0
+sub #1,R0
+muls #12,R0
+move.l R0,R8
+move.l #_ftypes,R9
+move.l 8(R8,R9.l),(sp)
+move.l #L297,-(sp)
+move.l #_ldmsg1,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 1453
+move #9,(sp)
+move #14,-(sp)
+move.l #_ld_em2,-(sp)
+move.l #_ld_em1,-(sp)
+move.l #_ldmsg1,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 1454
+*line 1455
+jsr _streset
+*line 1456
+move #-1,R0
+bra L272
+*line 1457
+*line 1458
+*line 1459
+*line 1460
+*line 1461
+*line 1462
+*line 1463
+L296:
+*line 1464
+jsr _writem
+move R0,-2(R14)
+*line 1466
+*line 1467
+tst -2(R14)
+bne L298
+*line 1467
+move.l #L299,(sp)
+jsr _ldbusy
+*line 1468
+L298:
+*line 1469
+*line 1469
+jsr _putcat
+tst R0
+beq L300
+*line 1470
+*line 1471
+jsr __clsvol
+*line 1472
+jsr _streset
+*line 1473
+jsr _showcat
+*line 1474
+move #-1,R0
+bra L272
+*line 1475
+*line 1476
+L300:
+*line 1477
+jsr __clsvol
+*line 1478
+jsr _streset
+*line 1479
+jsr _showcat
+*line 1481
+*line 1482
+tst -2(R14)
+beq L301
+*line 1482
+move #-1,R0
+bra L272
+*line 1483
+L301:
+*line 1484
+jsr _showsiz
+*line 1485
+clr R0
+bra L272
+L272:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _advlcur
+.text
+_advlcur:
+~~advlcur:
+link R14,#0
+movem.l R6-R7,-(sp)
+~newcol=R7
+*line 1501
+*line 1502
+move.l _curfet,(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+jsr _infield
+addq.l #4,sp
+tst R0
+beq L303
+*line 1502
+move.l _infetp,_cfetp
+*line 1503
+bra L304
+L303:bra L302
+L304:
+*line 1506
+move _stccol,R7
+add #1,R7
+*line 1508
+*line 1509
+move.l _cfetp,R8
+cmp 4(R8),R7
+bgt L305
+*line 1509
+move R7,(sp)
+move _stcrow,-(sp)
+jsr _itcpos
+addq.l #2,sp
+*line 1510
+L305:
+*line 1511
+move _stccol,R0
+asl #3,R0
+move R0,_cxval
+*line 1512
+move _stcrow,R0
+muls #14,R0
+move R0,_cyval
+L302:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _bsplcur
+.text
+_bsplcur:
+~~bsplcur:
+link R14,#0
+movem.l R6-R7,-(sp)
+~newcol=R7
+*line 1525
+*line 1526
+move.l _curfet,(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+jsr _infield
+addq.l #4,sp
+tst R0
+beq L307
+*line 1526
+move.l _infetp,_cfetp
+*line 1527
+bra L308
+L307:bra L306
+L308:
+*line 1530
+move _stccol,R7
+sub #1,R7
+*line 1532
+*line 1533
+move.l _cfetp,R8
+cmp 2(R8),R7
+blt L309
+*line 1533
+move R7,(sp)
+move _stcrow,-(sp)
+jsr _itcpos
+addq.l #2,sp
+*line 1534
+L309:
+*line 1535
+move _stccol,R0
+asl #3,R0
+move R0,_cxval
+*line 1536
+move _stcrow,R0
+muls #14,R0
+move R0,_cyval
+L306:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _ldswin
+.text
+_ldswin:
+~~ldswin:
+~n=R7
+link R14,#0
+movem.l R4-R7,-(sp)
+~cx=R6
+~cy=R5
+*line 1553
+move 8(R14),R7
+*line 1553
+*line 1554
+tst _ndisp
+bne L310
+*line 1555
+*line 1556
+*line 1557
+cmp #10,R7
+bne L311
+cmp #1,_lmwtype
+bne L311
+*line 1557
+move #10,(sp)
+jsr _exp_c
+move R0,R6
+*line 1558
+bra L312
+L311:
+*line 1559
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 10(R8,R9.l),(sp)
+jsr _exp_c
+move R0,R6
+L312:
+*line 1563
+*line 1564
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L313
+*line 1564
+clr (sp)
+jsr _vbank
+*line 1565
+L313:
+*line 1566
+*line 1567
+move R6,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 6(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 4(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 2(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 0(R8,R9.l),-(sp)
+move #128,-(sp)
+move.l _librob,-(sp)
+jsr _vbfill4
+adda.l #14,sp
+*line 1571
+*line 1572
+move #14,(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_ldbxlb0,R9
+move.l 0(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 14(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 12(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 1576
+move R7,R0
+bra L315
+*line 1577
+L316:
+*line 1578
+*line 1579
+*line 1580
+move.l #_ldpoint,_point
+*line 1581
+*line 1582
+move #12,(sp)
+move #13,-(sp)
+move #79,-(sp)
+move #13,-(sp)
+move #8,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 1583
+move #12,(sp)
+move #13,-(sp)
+move #95,-(sp)
+move #13,-(sp)
+move #88,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 1584
+move #12,(sp)
+move #13,-(sp)
+move #167,-(sp)
+move #13,-(sp)
+move #104,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 1585
+move #12,(sp)
+move #13,-(sp)
+move #471,-(sp)
+move #13,-(sp)
+move #176,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 1586
+move #12,(sp)
+move #13,-(sp)
+move #504,-(sp)
+move #13,-(sp)
+move #480,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 1587
+bra L310
+*line 1588
+*line 1589
+L317:
+*line 1590
+*line 1591
+bra L310
+*line 1592
+*line 1593
+L318:
+*line 1594
+*line 1595
+*line 1596
+*line 1597
+move #14,(sp)
+move.l #_ldfile,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 14(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 12(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+bra L310
+*line 1598
+*line 1599
+L319:
+*line 1600
+*line 1601
+*line 1602
+*line 1603
+move #14,(sp)
+move.l #_ldcmnt,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 14(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 12(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+bra L310
+*line 1604
+*line 1605
+*line 1606
+*line 1607
+*line 1608
+L320:
+*line 1609
+*line 1610
+*line 1611
+*line 1612
+tst _lrasw
+beq L321
+*line 1612
+move #13,(sp)
+jsr _exp_c
+move R0,R5
+*line 1613
+bra L322
+L321:
+*line 1614
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_ldbox,R0
+move.l R0,R8
+move 8(R8),R5
+L322:
+*line 1615
+*line 1616
+*line 1617
+move #14,(sp)
+move.l #L323,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 14(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 12(R8,R9.l),-(sp)
+move R5,-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 1618
+bra L310
+*line 1619
+*line 1620
+L324:
+*line 1621
+*line 1622
+*line 1623
+*line 1623
+tst _lselsw
+beq L325
+*line 1624
+*line 1625
+move _ldslot,(sp)
+jsr _ftkind
+move R0,_ldkind
+*line 1626
+*line 1627
+*line 1628
+*line 1629
+*line 1630
+cmp #7,_ldkind
+beq L10014
+cmp #2,_ldkind
+beq L10014
+cmp #3,_ldkind
+bne L326
+L10014:*line 1630
+move #13,(sp)
+jsr _exp_c
+move R0,R5
+*line 1631
+bra L327
+L326:
+*line 1632
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_ldbox,R0
+move.l R0,R8
+move 8(R8),R5
+L327:
+*line 1633
+bra L328
+L325:
+*line 1634
+*line 1635
+*line 1636
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_ldbox,R0
+move.l R0,R8
+move 8(R8),R5
+L328:
+*line 1637
+*line 1638
+*line 1639
+*line 1640
+move #14,(sp)
+tst _lorchl
+beq L10015
+move.l #L329,-(sp)
+bra L10017
+L10015:move.l #L330,-(sp)
+L10017:move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 14(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 12(R8,R9.l),-(sp)
+move R5,-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 1641
+bra L310
+*line 1642
+*line 1643
+*line 1644
+L331:
+*line 1645
+*line 1646
+*line 1647
+tst _lstrsw
+beq L10018
+move #13,(sp)
+bra L10020
+L10018:move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 8(R8,R9.l),(sp)
+L10020:jsr _exp_c
+move R0,R5
+*line 1648
+move #14,(sp)
+move.l #L332,-(sp)
+move #10,-(sp)
+move #22,-(sp)
+move R5,-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 1649
+*line 1650
+tst _lscrsw
+beq L10021
+move #13,(sp)
+bra L10023
+L10021:move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 8(R8,R9.l),(sp)
+L10023:jsr _exp_c
+move R0,R5
+*line 1651
+move #14,(sp)
+move.l #L333,-(sp)
+move #17,-(sp)
+move #22,-(sp)
+move R5,-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 1652
+*line 1653
+tst _lorchsw
+beq L10024
+move #13,(sp)
+bra L10026
+L10024:move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 8(R8,R9.l),(sp)
+L10026:jsr _exp_c
+move R0,R5
+*line 1654
+move #14,(sp)
+move.l #L334,-(sp)
+move #24,-(sp)
+move #22,-(sp)
+move R5,-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 1655
+*line 1656
+*line 1657
+tst _lwavsw
+beq L10027
+move #13,(sp)
+bra L10029
+L10027:move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 8(R8,R9.l),(sp)
+L10029:jsr _exp_c
+move R0,R5
+*line 1658
+move #14,(sp)
+move.l #L335,-(sp)
+move #10,-(sp)
+move #23,-(sp)
+move R5,-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 1659
+*line 1660
+tst _lpatsw
+beq L10030
+move #13,(sp)
+bra L10032
+L10030:move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 8(R8,R9.l),(sp)
+L10032:jsr _exp_c
+move R0,R5
+*line 1661
+move #14,(sp)
+move.l #L336,-(sp)
+move #17,-(sp)
+move #23,-(sp)
+move R5,-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 1662
+*line 1663
+tst _lorclsw
+beq L10033
+move #13,(sp)
+bra L10035
+L10033:move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 8(R8,R9.l),(sp)
+L10035:jsr _exp_c
+move R0,R5
+*line 1664
+move #14,(sp)
+move.l #L337,-(sp)
+move #24,-(sp)
+move #23,-(sp)
+move R5,-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 1665
+*line 1666
+*line 1667
+tst _lasgsw
+beq L10036
+move #13,(sp)
+bra L10038
+L10036:move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 8(R8,R9.l),(sp)
+L10038:jsr _exp_c
+move R0,R5
+*line 1668
+move #14,(sp)
+move.l #L338,-(sp)
+move #10,-(sp)
+move #24,-(sp)
+move R5,-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 1669
+*line 1670
+tst _lseqsw
+beq L10039
+move #13,(sp)
+bra L10041
+L10039:move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 8(R8,R9.l),(sp)
+L10041:jsr _exp_c
+move R0,R5
+*line 1671
+move #14,(sp)
+move.l #L339,-(sp)
+move #17,-(sp)
+move #24,-(sp)
+move R5,-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 1672
+*line 1673
+tst _ltunsw
+beq L10042
+move #13,(sp)
+bra L10044
+L10042:move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 8(R8,R9.l),(sp)
+L10044:jsr _exp_c
+move R0,R5
+*line 1674
+move #14,(sp)
+move.l #L340,-(sp)
+move #24,-(sp)
+move #24,-(sp)
+move R5,-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 1675
+bra L310
+*line 1676
+*line 1677
+L341:
+*line 1678
+*line 1679
+*line 1680
+move #14,(sp)
+move.l _lmln22,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 14(R8,R9.l),-(sp)
+move #22,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 1681
+move #14,(sp)
+move.l _lmln23,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 14(R8,R9.l),-(sp)
+move #23,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 1682
+move #14,(sp)
+move.l _lmln24,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 14(R8,R9.l),-(sp)
+move #24,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_ldbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _librob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 1683
+bra L310
+*line 1684
+bra L314
+L315:cmp #10,R0
+bhi L314
+asl #2,R0
+move R0,R8
+add.l #L342,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L342:.dc.l L316
+.dc.l L317
+.dc.l L314
+.dc.l L318
+.dc.l L314
+.dc.l L319
+.dc.l L314
+.dc.l L320
+.dc.l L324
+.dc.l L331
+.dc.l L341
+.text
+L314:L310:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _lwins
+.text
+_lwins:
+~~lwins:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 1701
+clr R7
+bra L346
+L347:
+*line 1702
+move R7,(sp)
+jsr _ldswin
+L345:
+*line 1701
+add #1,R7
+L346:
+*line 1701
+cmp #11,R7
+blt L347
+L344:L343:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _ldpoint
+.text
+_ldpoint:
+~~ldpoint:
+~x=8
+~y=10
+~pen=12
+link R14,#-4
+*line 1714
+*line 1715
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L349
+*line 1715
+clr (sp)
+jsr _vbank
+*line 1716
+L349:
+*line 1717
+move 12(R14),(sp)
+jsr _exp_c
+move R0,(sp)
+move 10(R14),-(sp)
+move 8(R14),-(sp)
+move.l _ldoct,-(sp)
+jsr _vputp
+addq.l #8,sp
+L348:unlk R14
+rts
+.globl _ldbord
+.text
+_ldbord:
+~~ldbord:
+link R14,#-4
+*line 1731
+move.l #_ldpoint,_point
+*line 1733
+move #11,(sp)
+clr -(sp)
+move #511,-(sp)
+clr -(sp)
+clr -(sp)
+jsr _lseg
+addq.l #8,sp
+*line 1734
+move #11,(sp)
+move #349,-(sp)
+move #511,-(sp)
+clr -(sp)
+move #511,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 1735
+move #11,(sp)
+move #349,-(sp)
+clr -(sp)
+move #349,-(sp)
+move #511,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 1736
+move #11,(sp)
+clr -(sp)
+clr -(sp)
+move #349,-(sp)
+clr -(sp)
+jsr _lseg
+addq.l #8,sp
+*line 1738
+move #11,(sp)
+move #293,-(sp)
+move #511,-(sp)
+move #293,-(sp)
+clr -(sp)
+jsr _lseg
+addq.l #8,sp
+*line 1739
+move #11,(sp)
+move #308,-(sp)
+clr -(sp)
+move #308,-(sp)
+move #511,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 1741
+move #11,(sp)
+move #308,-(sp)
+move #79,-(sp)
+move #293,-(sp)
+move #79,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 1742
+move #11,(sp)
+move #308,-(sp)
+move #144,-(sp)
+move #293,-(sp)
+move #144,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 1743
+move #11,(sp)
+move #308,-(sp)
+move #215,-(sp)
+move #293,-(sp)
+move #215,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 1744
+move #11,(sp)
+move #349,-(sp)
+move #71,-(sp)
+move #308,-(sp)
+move #71,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 1745
+move #11,(sp)
+move #349,-(sp)
+move #256,-(sp)
+move #308,-(sp)
+move #256,-(sp)
+jsr _lseg
+addq.l #8,sp
+L350:unlk R14
+rts
+.globl _lmwclr
+.text
+_lmwclr:
+~~lmwclr:
+link R14,#-4
+*line 1759
+clr _lmwtype
+*line 1760
+clr _submenu
+*line 1762
+move.l #L352,_lmln22
+*line 1763
+move.l #L353,_lmln23
+*line 1764
+move.l #L354,_lmln24
+L351:unlk R14
+rts
+.globl _lmwvtyp
+.text
+_lmwvtyp:
+~~lmwvtyp:
+link R14,#-4
+*line 1775
+move #1,_lmwtype
+*line 1776
+move #1,_submenu
+*line 1778
+move.l #_vtlin1,_lmln22
+*line 1779
+move.l #_vtlin2,_lmln23
+*line 1780
+move.l #_vtlin3,_lmln24
+L355:unlk R14
+rts
+.globl _libdsp
+.text
+_libdsp:
+~~libdsp:
+link R14,#-4
+*line 1794
+move.l #_v_score,_librob
+*line 1795
+move.l #_v_curs0,_obj0
+*line 1796
+move.l #_v_tcur,_obj2
+*line 1797
+move.l #144+_v_obtab,_ldoct
+*line 1799
+clr _lselsw
+*line 1800
+clr _ldelsw
+*line 1801
+clr _lstrsw
+*line 1803
+clr _lasgsw
+*line 1804
+clr _lorchsw
+*line 1805
+clr _lorclsw
+*line 1806
+clr _lpatsw
+*line 1807
+clr _lscrsw
+*line 1808
+clr _lseqsw
+*line 1809
+clr _ltunsw
+*line 1810
+clr _lwavsw
+*line 1812
+clr _lderrsw
+*line 1813
+clr _ltagged
+*line 1814
+move #-1,_lksel
+*line 1817
+jsr _clrcat
+*line 1818
+clr _catin
+*line 1820
+jsr _lmwclr
+*line 1822
+jsr _dswap
+*line 1824
+*line 1825
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L357
+*line 1825
+clr (sp)
+jsr _vbank
+*line 1826
+L357:
+*line 1827
+move #32767,(sp)
+clr -(sp)
+move.l _librob,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 1828
+move #12033,(sp)
+clr -(sp)
+move.l _librob,R0
+add.l #$fffe,R0
+move.l R0,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 1830
+move #-1,(sp)
+move #1536,-(sp)
+clr -(sp)
+clr -(sp)
+move #350,-(sp)
+move #512,-(sp)
+move.l _librob,-(sp)
+clr -(sp)
+clr -(sp)
+move #8,-(sp)
+jsr _SetObj
+adda.l #20,sp
+*line 1831
+move #-1,(sp)
+move #1540,-(sp)
+move #316,-(sp)
+move #32,-(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 1832
+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 1834
+move #1,(sp)
+jsr _arcurs
+*line 1835
+move #1,(sp)
+jsr _itcini
+*line 1836
+move #1,(sp)
+jsr _ttcini
+*line 1838
+jsr _ldbord
+*line 1839
+jsr _lwins
+*line 1841
+move.l #_lbrpal,(sp)
+jsr _vsndpal
+*line 1843
+move #8,(sp)
+move #8,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 1844
+move #15,(sp)
+clr -(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 1846
+move #316,(sp)
+move #32,-(sp)
+jsr _setgc
+addq.l #2,sp
+*line 1848
+move _thcwval,_chtime
+*line 1849
+move _tvcwval,_cvtime
+*line 1850
+move #1,_cmtype
+*line 1851
+move _cxval,R0
+asr #3,R0
+move R0,(sp)
+move _cyval,R0
+ext.l R0
+divs #14,R0
+move R0,-(sp)
+jsr _itcpos
+addq.l #2,sp
+L356:unlk R14
+rts
+.data
+L1:.dc.b $41,$53,$47,$0
+L2:.dc.b $41,$73,$73,$69,$67,$6E,$6D,$6E,$74,$0
+L3:.dc.b $41,$73,$73,$69,$67,$6E,$6D,$6E,$74,$0
+L4:.dc.b $4F,$52,$4C,$0
+L5:.dc.b $4F,$72,$63,$68,$65,$73,$74,$72,$61,$0
+L6:.dc.b $4F,$72,$63,$68,$65,$73,$74,$72,$61,$0
+L7:.dc.b $4F,$52,$48,$0
+L8:.dc.b $4F,$72,$63,$68,$65,$73,$74,$72,$61,$0
+L9:.dc.b $4F,$72,$63,$68,$65,$73,$74,$72,$61,$0
+L10:.dc.b $53,$43,$52,$0
+L11:.dc.b $20,$20,$20,$20,$53,$63,$6F,$72,$65,$0
+L12:.dc.b $53,$63,$6F,$72,$65,$0
+L13:.dc.b $54,$55,$4E,$0
+L14:.dc.b $20,$20,$20,$54,$75,$6E,$69,$6E,$67,$0
+L15:.dc.b $54,$75,$6E,$69,$6E,$67,$0
+L16:.dc.b $57,$41,$56,$0
+L17:.dc.b $57,$61,$76,$65,$73,$68,$61,$70,$65,$0
+L18:.dc.b $57,$61,$76,$65,$73,$68,$61,$70,$65,$0
+L19:.dc.b $4F,$52,$43,$0
+L20:.dc.b $4F,$72,$63,$68,$65,$73,$74,$72,$61,$0
+L21:.dc.b $4F,$72,$63,$68,$65,$73,$74,$72,$61,$0
+L22:.dc.b $50,$41,$54,$0
+L23:.dc.b $20,$20,$20,$20,$50,$61,$74,$63,$68,$0
+L24:.dc.b $50,$61,$74,$63,$68,$0
+L25:.dc.b $53,$45,$51,$0
+L26:.dc.b $20,$53,$65,$71,$75,$65,$6E,$63,$65,$0
+L27:.dc.b $53,$65,$71,$75,$65,$6E,$63,$65,$0
+L43:.dc.b $3F,$3F,$20,$25,$33,$2E,$33,$73,$20,$20,$3F,$3F,$0
+L45:.dc.b $30,$30,$30,$0
+L71:.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
+L73:.dc.b $20,$74,$68,$65,$20,$25,$73,$20,$66,$69,$6C,$65,$2C,$0
+L74:.dc.b $43,$61,$6E,$27,$74,$20,$66,$69,$6E,$64,$20,$61,$20,$73,$6C,$6F,$74,$20,$66,$6F,$72,$0
+L75:.dc.b $20,$61,$6E,$64,$20,$6F,$6E,$65,$20,$77,$61,$73,$20,$65,$78,$70,$65,$63,$74,$65,$64,$0
+L82:.dc.b $65,$72,$72,$6E,$6F,$20,$3D,$20,$25,$64,$0
+L83:.dc.b $44,$69,$73,$6B,$20,$6D,$61,$79,$20,$62,$65,$20,$66,$75,$6C,$6C,$0
+L90:.dc.b $65,$72,$72,$6E,$6F,$20,$3D,$20,$25,$64,$0
+L91:.dc.b $55,$6E,$65,$78,$70,$65,$63,$74,$65,$64,$20,$45,$4F,$46,$0
+L105:.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
+.dc.b $63,$25,$63,$0
+L106:.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
+.dc.b $31,$32,$33,$34,$35,$36,$37,$0
+L133:.dc.b $61,$73,$67,$0
+L136:.dc.b $6F,$72,$68,$0
+L139:.dc.b $6F,$72,$6C,$0
+L142:.dc.b $6F,$72,$63,$0
+L145:.dc.b $70,$61,$74,$0
+L148:.dc.b $73,$63,$72,$0
+L151:.dc.b $73,$65,$71,$0
+L154:.dc.b $74,$75,$6E,$0
+L157:.dc.b $77,$61,$76,$0
+L161:.dc.b $44,$69,$73,$6B,$20,$6E,$6F,$74,$20,$72,$65,$61,$64,$79,$20,$3F,$0
+L162:.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
+L163:.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
+L164:.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
+L166:.dc.b $4D,$37,$46,$49,$4C,$45,$53,$2E,$43,$41,$54,$0
+L167:.dc.b $72,$0
+L172:.dc.b $20,$20,$66,$72,$65,$61,$64,$20,$72,$65,$74,$75,$72,$6E,$65,$64,$20,$25,$64,$0
+L173:.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
+L174:.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
+L176:.dc.b $46,$69,$6C,$65,$20,$63,$61,$74,$61,$6C,$6F,$67,$20,$69,$73,$20,$4E,$55,$4C,$4C,$0
+L182:.dc.b $4D,$37,$46,$49,$4C,$45,$53,$2E,$43,$41,$54,$0
+L183:.dc.b $77,$0
+L185:.dc.b $20,$20,$65,$72,$72,$6E,$6F,$20,$3D,$20,$25,$64,$0
+L186:.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
+L189:.dc.b $20,$20,$66,$77,$72,$69,$74,$65,$20,$72,$65,$74,$75,$72,$6E,$65,$64,$20,$25,$64,$0
+L190:.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
+L191:.dc.b $43,$61,$6E,$27,$74,$20,$77,$72,$69,$74,$65,$20,$63,$61,$74,$61,$6C,$6F,$67,$0
+L193:.dc.b $20,$20,$65,$72,$72,$6E,$6F,$20,$3D,$20,$25,$64,$0
+L194:.dc.b $44,$69,$73,$6B,$20,$6D,$61,$79,$20,$62,$65,$20,$66,$75,$6C,$6C,$0
+L205:.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
+L219:.dc.b $4D,$37,$53,$4C,$4F,$54,$25,$30,$32,$2E,$32,$75,$2E,$25,$2D,$33,$2E,$33,$73,$0
+L249:.dc.b $20,$6B,$69,$6E,$64,$3D,$25,$64,$0
+L250:.dc.b $62,$61,$64,$20,$77,$72,$74,$66,$69,$6C,$65,$20,$61,$72,$67,$75,$6D,$65,$6E,$74,$3A,$0
+L254:.dc.b $25,$30,$33,$2E,$33,$64,$0
+L273:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$0
+L275:.dc.b $46,$69,$6C,$65,$20,$6D,$75,$73,$74,$20,$62,$65,$20,$6E,$61,$6D,$65,$64,$0
+L277:.dc.b $4E,$6F,$20,$66,$69,$6C,$65,$20,$74,$79,$70,$65,$20,$73,$65,$6C,$65,$63,$74,$65,$64,$0
+L279:.dc.b $20,$20,$20,$20,$20,$20,$20,$53,$74,$6F,$72,$69,$6E,$67,$20,$66,$69,$6C,$65,$73,$0
+L297:.dc.b $44,$75,$70,$6C,$69,$63,$61,$74,$65,$20,$25,$73,$0
+L299:.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
+L323:.dc.b $43,$6F,$6E,$74,$65,$6E,$74,$0
+L329:.dc.b $48,$69,$20,$4F,$72,$63,$68,$0
+L330:.dc.b $4C,$6F,$20,$4F,$72,$63,$68,$0
+L332:.dc.b $53,$74,$6F,$72,$65,$0
+L333:.dc.b $53,$63,$6F,$72,$65,$0
+L334:.dc.b $48,$69,$20,$4F,$72,$63,$68,$0
+L335:.dc.b $57,$61,$76,$65,$73,$0
+L336:.dc.b $50,$61,$74,$63,$68,$0
+L337:.dc.b $4C,$6F,$20,$4F,$72,$63,$68,$0
+L338:.dc.b $41,$73,$73,$67,$6E,$0
+L339:.dc.b $53,$65,$71,$6E,$63,$0
+L340:.dc.b $54,$75,$6E,$69,$6E,$67,$73,$0
+L352:.dc.b $0
+L353:.dc.b $0
+L354:.dc.b $0
Index: alcyon/librw.s
===================================================================
--- alcyon/librw.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/librw.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,2386 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl _errno
+.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 _stmptr
+.globl _defptr
+.globl _patches
+.globl _defents
+.globl _seqtab
+.globl _seqflag
+.globl _seqline
+.globl _seqstim
+.globl _seqtime
+.globl _sregval
+.globl _trstate
+.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 _filecat
+.globl _ldslot
+.globl _lderrsw
+.globl _lrasw
+.globl _tunlib
+.globl _lcsum
+.globl _schksum
+.globl _sntlreq
+.globl _tunname
+.globl _ldfile
+.globl _ldcmnt
+.globl _ldhead
+.globl _asgtab
+.globl _wslib
+.globl _idefs
+.globl _stimes
+.globl _wrt_asg
+.text
+_wrt_asg:
+~~wrt_asg:
+~slot=8
+link R14,#-8
+movem.l R6-R7/R13-R13,-(sp)
+~fp=R13
+~i=R7
+~cstemp=-8
+*line 79
+jsr _preio
+*line 81
+move.l #L2,(sp)
+move #1,-(sp)
+move 8(R14),-(sp)
+jsr _slotnam
+addq.l #4,sp
+move.l R0,-(sp)
+jsr _fopenb
+addq.l #4,sp
+move.l R0,R13
+*line 83
+*line 83
+move.l R13,R0
+bne L3
+*line 84
+*line 85
+*line 86
+*line 87
+move #9,(sp)
+move #14,-(sp)
+clr.l -(sp)
+move.l #L5,-(sp)
+move.l #L4,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 88
+*line 89
+jsr _postio
+*line 90
+jsr _streset
+*line 91
+move #-1,R0
+bra L1
+*line 92
+*line 93
+L3:
+*line 94
+move #1,(sp)
+jsr _makelh
+*line 96
+clr R7
+bra L8
+L9:
+*line 97
+move.l #$14c,(sp)
+move R7,R0
+add #1,R0
+muls #332,R0
+add.l #_asgtab,R0
+move.l R0,-(sp)
+jsr _chksum
+addq.l #4,sp
+add.l R0,_lcsum
+L7:
+*line 96
+add #1,R7
+L8:
+*line 96
+cmp #99,R7
+blt L9
+L6:
+*line 99
+move.l _lcsum,(sp)
+move.l #L10,-(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 100
+move #8,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move.l #_ldhead,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 109
+*line 109
+move.l #$38,(sp)
+move.l #_ldhead,-(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L11
+*line 110
+*line 111
+jsr _streset
+*line 112
+move #-1,R0
+bra L1
+*line 113
+*line 114
+L11:
+*line 115
+clr R7
+bra L14
+L15:
+*line 116
+*line 117
+*line 117
+move.l #$14c,(sp)
+move R7,R0
+add #1,R0
+muls #332,R0
+add.l #_asgtab,R0
+move.l R0,-(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L16
+*line 118
+*line 119
+jsr _streset
+*line 120
+move #-1,R0
+bra L1
+*line 121
+L16:L13:
+*line 115
+add #1,R7
+L14:
+*line 115
+cmp #99,R7
+blt L15
+L12:
+*line 124
+move.l R13,(sp)
+jsr _fclose
+*line 125
+jsr _postio
+*line 126
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _get_asg
+.text
+_get_asg:
+~~get_asg:
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~fp=R13
+~i=R7
+*line 144
+jsr _preio
+*line 146
+move.l #L18,(sp)
+move #1,-(sp)
+move _ldslot,-(sp)
+jsr _slotnam
+addq.l #4,sp
+move.l R0,-(sp)
+jsr _fopenb
+addq.l #4,sp
+move.l R0,R13
+*line 148
+*line 148
+move.l R13,R0
+bne L19
+*line 149
+*line 150
+*line 151
+*line 152
+move #9,(sp)
+move #14,-(sp)
+clr.l -(sp)
+move.l #L21,-(sp)
+move.l #L20,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 153
+*line 154
+jsr _postio
+*line 155
+jsr _clrlsel
+*line 156
+move #-1,R0
+bra L17
+*line 157
+*line 158
+L19:
+*line 159
+move #8,(sp)
+move.l #L22,-(sp)
+move.l #_ldfile,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 160
+move #37,(sp)
+move.l #L23,-(sp)
+move.l #_ldcmnt,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 161
+move #3,(sp)
+jsr _ldswin
+*line 162
+move #5,(sp)
+jsr _ldswin
+*line 166
+*line 166
+move.l #$38,(sp)
+move.l #_ldhead,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L24
+*line 167
+*line 168
+jsr _clrlsel
+*line 169
+move #-1,R0
+bra L17
+*line 170
+*line 171
+*line 175
+*line 176
+*line 177
+L24:
+*line 178
+clr R7
+bra L27
+L28:
+*line 179
+*line 180
+*line 180
+move.l #$14c,(sp)
+move R7,R0
+add #1,R0
+muls #332,R0
+add.l #_asgtab,R0
+move.l R0,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L29
+*line 181
+*line 182
+jsr _clrlsel
+*line 183
+move #-1,R0
+bra L17
+*line 184
+L29:L26:
+*line 178
+add #1,R7
+L27:
+*line 178
+cmp #99,R7
+blt L28
+L25:
+*line 187
+jsr _clrlsel
+*line 188
+move.l R13,(sp)
+jsr _fclose
+*line 189
+jsr _postio
+*line 190
+clr R0
+bra L17
+L17:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _wrt_orc
+.text
+_wrt_orc:
+~~wrt_orc:
+~slot=8
+~lorh=10
+link R14,#-8
+movem.l R6-R7/R12-R13,-(sp)
+~fp=R13
+~i=R7
+~ip=R12
+~cstemp=-8
+*line 211
+*line 212
+tst 10(R14)
+beq L31
+*line 212
+move.l #L32,(sp)
+jsr _ldbusy
+*line 213
+bra L33
+L31:
+*line 214
+move.l #L34,(sp)
+jsr _ldbusy
+L33:
+*line 216
+jsr _preio
+*line 218
+move.l #L35,(sp)
+move #7,-(sp)
+move 8(R14),-(sp)
+jsr _slotnam
+addq.l #4,sp
+move.l R0,-(sp)
+jsr _fopenb
+addq.l #4,sp
+move.l R0,R13
+*line 220
+*line 220
+move.l R13,R0
+bne L36
+*line 221
+*line 222
+*line 223
+*line 224
+move #9,(sp)
+move #14,-(sp)
+clr.l -(sp)
+move.l #L38,-(sp)
+move.l #L37,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 225
+*line 226
+jsr _postio
+*line 227
+jsr _streset
+*line 228
+move #-1,R0
+bra L30
+*line 229
+*line 230
+L36:
+*line 231
+move #7,(sp)
+jsr _makelh
+*line 233
+clr R7
+bra L41
+L42:
+*line 234
+*line 235
+move R7,R0
+tst 10(R14)
+beq L10000
+move #20,R1
+bra L10002
+L10000:clr R1
+L10002:add R1,R0
+add #1,R0
+muls #3938,R0
+move.l R0,R12
+add.l #_idefs,R12
+*line 236
+*line 237
+move.l #1778+_idefs,R0
+sub.l #_idefs,R0
+move.l R0,(sp)
+move.l R12,-(sp)
+jsr _chksum
+addq.l #4,sp
+add.l R0,_lcsum
+*line 238
+move.l #$23c,(sp)
+move.l R12,-(sp)
+add.l #2286,(sp)
+jsr _chksum
+addq.l #4,sp
+add.l R0,_lcsum
+*line 239
+move.l #$23c,(sp)
+move.l R12,-(sp)
+add.l #3366,(sp)
+jsr _chksum
+addq.l #4,sp
+add.l R0,_lcsum
+L40:
+*line 233
+add #1,R7
+L41:
+*line 233
+cmp #20,R7
+blt L42
+L39:
+*line 242
+move.l _lcsum,(sp)
+move.l #L43,-(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 243
+move #8,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move.l #_ldhead,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 252
+*line 252
+move.l #$38,(sp)
+move.l #_ldhead,-(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L44
+*line 253
+*line 254
+jsr _streset
+*line 255
+move #-1,R0
+bra L30
+*line 256
+*line 257
+L44:
+*line 258
+clr R7
+bra L47
+L48:
+*line 259
+*line 260
+move R7,R0
+tst 10(R14)
+beq L10003
+move #20,R1
+bra L10005
+L10003:clr R1
+L10005:add R1,R0
+add #1,R0
+muls #3938,R0
+move.l R0,R12
+add.l #_idefs,R12
+*line 261
+*line 262
+*line 262
+move.l #1778+_idefs,R0
+sub.l #_idefs,R0
+move.l R0,(sp)
+move.l R12,-(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L49
+*line 263
+*line 264
+jsr _streset
+*line 265
+move #-1,R0
+bra L30
+*line 266
+*line 267
+L49:
+*line 268
+*line 268
+move.l #$23c,(sp)
+move.l R12,-(sp)
+add.l #2286,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L50
+*line 269
+*line 270
+jsr _streset
+*line 271
+move #-1,R0
+bra L30
+*line 272
+*line 273
+L50:
+*line 274
+*line 274
+move.l #$23c,(sp)
+move.l R12,-(sp)
+add.l #3366,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L51
+*line 275
+*line 276
+jsr _streset
+*line 277
+move #-1,R0
+bra L30
+*line 278
+L51:L46:
+*line 258
+add #1,R7
+L47:
+*line 258
+cmp #20,R7
+blt L48
+L45:
+*line 281
+move.l R13,(sp)
+jsr _fclose
+*line 282
+jsr _postio
+*line 283
+clr R0
+bra L30
+L30:tst.l (sp)+
+movem.l (sp)+,R7-R7/R12-R13
+unlk R14
+rts
+.globl _get_orc
+.text
+_get_orc:
+~~get_orc:
+~lorh=8
+~kind=10
+link R14,#0
+movem.l R6-R7/R12-R13,-(sp)
+~fp=R13
+~i=R7
+~ip=R12
+*line 303
+*line 304
+tst 8(R14)
+beq L53
+*line 304
+move.l #L54,(sp)
+jsr _ldbusy
+*line 305
+bra L55
+L53:
+*line 306
+move.l #L56,(sp)
+jsr _ldbusy
+L55:
+*line 308
+jsr _preio
+*line 310
+move.l #L57,(sp)
+move 10(R14),-(sp)
+move _ldslot,-(sp)
+jsr _slotnam
+addq.l #4,sp
+move.l R0,-(sp)
+jsr _fopenb
+addq.l #4,sp
+move.l R0,R13
+*line 312
+*line 312
+move.l R13,R0
+bne L58
+*line 313
+*line 314
+*line 315
+*line 316
+move #9,(sp)
+move #14,-(sp)
+clr.l -(sp)
+move.l #L60,-(sp)
+move.l #L59,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 317
+*line 318
+jsr _postio
+*line 319
+jsr _clrlsel
+*line 320
+move #-1,R0
+bra L52
+*line 321
+*line 322
+L58:
+*line 323
+move #8,(sp)
+move.l #L61,-(sp)
+move.l #_ldfile,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 324
+move #37,(sp)
+move.l #L62,-(sp)
+move.l #_ldcmnt,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 325
+move #3,(sp)
+jsr _ldswin
+*line 326
+move #5,(sp)
+jsr _ldswin
+*line 330
+*line 330
+move.l #$38,(sp)
+move.l #_ldhead,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L63
+*line 331
+*line 332
+jsr _clrlsel
+*line 333
+move #-1,R0
+bra L52
+*line 334
+*line 335
+*line 339
+*line 340
+*line 341
+L63:
+*line 342
+clr R7
+bra L66
+L67:
+*line 343
+*line 344
+move R7,R0
+tst 8(R14)
+beq L10006
+move #20,R1
+bra L10008
+L10006:clr R1
+L10008:add R1,R0
+add #1,R0
+muls #3938,R0
+move.l R0,R12
+add.l #_idefs,R12
+*line 345
+*line 346
+*line 346
+move.l #1778+_idefs,R0
+sub.l #_idefs,R0
+move.l R0,(sp)
+move.l R12,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L68
+*line 347
+*line 348
+jsr _clrlsel
+*line 349
+move #-1,R0
+bra L52
+*line 350
+*line 351
+L68:
+*line 352
+*line 352
+move.l #$23c,(sp)
+move.l R12,-(sp)
+add.l #2286,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L69
+*line 353
+*line 354
+jsr _clrlsel
+*line 355
+move #-1,R0
+bra L52
+*line 356
+*line 357
+L69:
+*line 358
+*line 358
+move.l #$23c,(sp)
+move.l R12,-(sp)
+add.l #3366,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L70
+*line 359
+*line 360
+jsr _clrlsel
+*line 361
+move #-1,R0
+bra L52
+*line 362
+*line 363
+*line 364
+*line 365
+L70:
+*line 366
+move #254,(sp)
+move.l R12,-(sp)
+add.l #2286,(sp)
+move.l R12,-(sp)
+add.l #1778,(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 367
+move #254,(sp)
+move.l R12,-(sp)
+add.l #3366,(sp)
+move.l R12,-(sp)
+add.l #2858,(sp)
+jsr _memcpyw
+addq.l #8,sp
+L65:
+*line 342
+add #1,R7
+L66:
+*line 342
+cmp #20,R7
+blt L67
+L64:
+*line 370
+jsr _clrlsel
+*line 371
+move.l R13,(sp)
+jsr _fclose
+*line 372
+jsr _postio
+*line 373
+clr R0
+bra L52
+L52:tst.l (sp)+
+movem.l (sp)+,R7-R7/R12-R13
+unlk R14
+rts
+.globl _wrt_tun
+.text
+_wrt_tun:
+~~wrt_tun:
+~slot=8
+link R14,#-8
+movem.l R6-R7/R13-R13,-(sp)
+~fp=R13
+~i=R7
+~cstemp=-8
+*line 393
+jsr _preio
+*line 395
+move.l #L72,(sp)
+move #5,-(sp)
+move 8(R14),-(sp)
+jsr _slotnam
+addq.l #4,sp
+move.l R0,-(sp)
+jsr _fopenb
+addq.l #4,sp
+move.l R0,R13
+*line 397
+*line 397
+move.l R13,R0
+bne L73
+*line 398
+*line 399
+*line 400
+*line 401
+move #9,(sp)
+move #14,-(sp)
+clr.l -(sp)
+move.l #L75,-(sp)
+move.l #L74,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 402
+*line 403
+jsr _postio
+*line 404
+jsr _streset
+*line 405
+move #-1,R0
+bra L71
+*line 406
+*line 407
+L73:
+*line 408
+move #5,(sp)
+jsr _makelh
+*line 410
+clr R7
+bra L78
+L79:
+*line 411
+*line 412
+move.l #$100,(sp)
+move R7,R0
+add #1,R0
+asl #8,R0
+ext.l R0
+add.l #_tunlib,R0
+move.l R0,-(sp)
+jsr _chksum
+addq.l #4,sp
+add.l R0,_lcsum
+*line 413
+move.l #$20,(sp)
+move R7,R0
+add #1,R0
+asl #5,R0
+ext.l R0
+add.l #_tunname,R0
+move.l R0,-(sp)
+jsr _chksum
+addq.l #4,sp
+add.l R0,_lcsum
+L77:
+*line 410
+add #1,R7
+L78:
+*line 410
+cmp #9,R7
+blt L79
+L76:
+*line 416
+move.l _lcsum,(sp)
+move.l #L80,-(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 417
+move #8,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move.l #_ldhead,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 426
+*line 426
+move.l #$38,(sp)
+move.l #_ldhead,-(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L81
+*line 427
+*line 428
+jsr _streset
+*line 429
+move #-1,R0
+bra L71
+*line 430
+*line 431
+L81:
+*line 432
+clr R7
+bra L84
+L85:
+*line 433
+*line 434
+*line 434
+move.l #$100,(sp)
+move R7,R0
+add #1,R0
+asl #8,R0
+ext.l R0
+add.l #_tunlib,R0
+move.l R0,-(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L86
+*line 435
+*line 436
+jsr _streset
+*line 437
+move #-1,R0
+bra L71
+*line 438
+*line 439
+L86:
+*line 440
+*line 440
+move.l #$20,(sp)
+move R7,R0
+add #1,R0
+asl #5,R0
+ext.l R0
+add.l #_tunname,R0
+move.l R0,-(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L87
+*line 441
+*line 442
+jsr _streset
+*line 443
+move #-1,R0
+bra L71
+*line 444
+L87:L83:
+*line 432
+add #1,R7
+L84:
+*line 432
+cmp #9,R7
+blt L85
+L82:
+*line 447
+move.l R13,(sp)
+jsr _fclose
+*line 448
+jsr _postio
+*line 449
+clr R0
+bra L71
+L71:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _get_tun
+.text
+_get_tun:
+~~get_tun:
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~fp=R13
+~i=R7
+*line 467
+jsr _preio
+*line 469
+move.l #L89,(sp)
+move #5,-(sp)
+move _ldslot,-(sp)
+jsr _slotnam
+addq.l #4,sp
+move.l R0,-(sp)
+jsr _fopenb
+addq.l #4,sp
+move.l R0,R13
+*line 471
+*line 471
+move.l R13,R0
+bne L90
+*line 472
+*line 473
+*line 474
+*line 475
+move #9,(sp)
+move #14,-(sp)
+clr.l -(sp)
+move.l #L92,-(sp)
+move.l #L91,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 476
+*line 477
+jsr _postio
+*line 478
+jsr _clrlsel
+*line 479
+move #-1,R0
+bra L88
+*line 480
+*line 481
+L90:
+*line 482
+move #8,(sp)
+move.l #L93,-(sp)
+move.l #_ldfile,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 483
+move #37,(sp)
+move.l #L94,-(sp)
+move.l #_ldcmnt,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 484
+move #3,(sp)
+jsr _ldswin
+*line 485
+move #5,(sp)
+jsr _ldswin
+*line 489
+*line 489
+move.l #$38,(sp)
+move.l #_ldhead,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L95
+*line 490
+*line 491
+jsr _clrlsel
+*line 492
+move #-1,R0
+bra L88
+*line 493
+*line 494
+*line 498
+*line 499
+*line 500
+L95:
+*line 501
+clr R7
+bra L98
+L99:
+*line 502
+*line 503
+*line 503
+move.l #$100,(sp)
+move R7,R0
+add #1,R0
+asl #8,R0
+ext.l R0
+add.l #_tunlib,R0
+move.l R0,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L100
+*line 504
+*line 505
+jsr _clrlsel
+*line 506
+move #-1,R0
+bra L88
+*line 507
+*line 508
+L100:
+*line 509
+*line 509
+move.l #$20,(sp)
+move R7,R0
+add #1,R0
+asl #5,R0
+ext.l R0
+add.l #_tunname,R0
+move.l R0,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L101
+*line 510
+*line 511
+jsr _clrlsel
+*line 512
+move #-1,R0
+bra L88
+*line 513
+L101:L97:
+*line 501
+add #1,R7
+L98:
+*line 501
+cmp #9,R7
+blt L99
+L96:
+*line 516
+jsr _clrlsel
+*line 517
+move.l R13,(sp)
+jsr _fclose
+*line 518
+jsr _postio
+*line 519
+clr R0
+bra L88
+L88:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _wrt_pat
+.text
+_wrt_pat:
+~~wrt_pat:
+~slot=8
+link R14,#-8
+movem.l R7-R7/R13-R13,-(sp)
+~fp=R13
+~cstemp=-8
+*line 538
+jsr _preio
+*line 540
+move.l #L103,(sp)
+move #8,-(sp)
+move 8(R14),-(sp)
+jsr _slotnam
+addq.l #4,sp
+move.l R0,-(sp)
+jsr _fopenb
+addq.l #4,sp
+move.l R0,R13
+*line 542
+*line 542
+move.l R13,R0
+bne L104
+*line 543
+*line 544
+*line 545
+*line 546
+move #9,(sp)
+move #14,-(sp)
+clr.l -(sp)
+move.l #L106,-(sp)
+move.l #L105,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 547
+*line 548
+jsr _postio
+*line 549
+jsr _streset
+*line 550
+move #-1,R0
+bra L102
+*line 551
+*line 552
+L104:
+*line 553
+move #8,(sp)
+jsr _makelh
+*line 555
+move.l _lcsum,(sp)
+move.l #L107,-(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 556
+move #8,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move.l #_ldhead,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 565
+*line 565
+move.l #$38,(sp)
+move.l #_ldhead,-(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L108
+*line 566
+*line 567
+jsr _streset
+*line 568
+move #-1,R0
+bra L102
+*line 569
+*line 570
+L108:
+*line 571
+*line 571
+move.l R13,(sp)
+jsr _ptwrite
+tst R0
+beq L109
+*line 572
+*line 573
+jsr _streset
+*line 574
+move #-1,R0
+bra L102
+*line 575
+*line 576
+L109:
+*line 577
+move.l R13,(sp)
+jsr _fclose
+*line 578
+jsr _postio
+*line 579
+clr R0
+bra L102
+L102:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _get_pat
+.text
+_get_pat:
+~~get_pat:
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+~fp=R13
+*line 596
+jsr _preio
+*line 598
+move.l #L111,(sp)
+move #8,-(sp)
+move _ldslot,-(sp)
+jsr _slotnam
+addq.l #4,sp
+move.l R0,-(sp)
+jsr _fopenb
+addq.l #4,sp
+move.l R0,R13
+*line 600
+*line 600
+move.l R13,R0
+bne L112
+*line 601
+*line 602
+*line 603
+*line 604
+move #9,(sp)
+move #14,-(sp)
+clr.l -(sp)
+move.l #L114,-(sp)
+move.l #L113,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 605
+*line 606
+jsr _postio
+*line 607
+jsr _clrlsel
+*line 608
+move #-1,R0
+bra L110
+*line 609
+*line 610
+L112:
+*line 611
+move #8,(sp)
+move.l #L115,-(sp)
+move.l #_ldfile,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 612
+move #37,(sp)
+move.l #L116,-(sp)
+move.l #_ldcmnt,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 613
+move #3,(sp)
+jsr _ldswin
+*line 614
+move #5,(sp)
+jsr _ldswin
+*line 618
+*line 618
+move.l #$38,(sp)
+move.l #_ldhead,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L117
+*line 619
+*line 620
+jsr _clrlsel
+*line 621
+move #-1,R0
+bra L110
+*line 622
+*line 623
+*line 627
+*line 628
+L117:
+*line 629
+*line 630
+tst _lrasw
+bne L118
+*line 630
+jsr _initpt
+*line 631
+L118:
+*line 632
+*line 632
+move.l R13,(sp)
+jsr _ptread
+tst R0
+beq L119
+*line 633
+*line 634
+jsr _clrlsel
+*line 635
+move #-1,R0
+bra L110
+*line 636
+*line 637
+L119:
+*line 638
+move.l R13,(sp)
+jsr _fclose
+*line 639
+jsr _postio
+*line 640
+jsr _clrlsel
+*line 641
+clr R0
+bra L110
+L110:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _wrt_scr
+.text
+_wrt_scr:
+~~wrt_scr:
+~slot=8
+link R14,#-12
+movem.l R6-R7/R13-R13,-(sp)
+~fp=R13
+~i=R7
+~tnb=-4
+~cstemp=-12
+*line 662
+jsr _preio
+*line 664
+move.l #L121,(sp)
+move #4,-(sp)
+move 8(R14),-(sp)
+jsr _slotnam
+addq.l #4,sp
+move.l R0,-(sp)
+jsr _fopenb
+addq.l #4,sp
+move.l R0,R13
+*line 666
+*line 666
+move.l R13,R0
+bne L122
+*line 667
+*line 668
+*line 669
+*line 670
+move #9,(sp)
+move #14,-(sp)
+clr.l -(sp)
+move.l #L124,-(sp)
+move.l #L123,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 671
+*line 672
+jsr _postio
+*line 673
+jsr _streset
+*line 674
+move #-1,R0
+bra L120
+*line 675
+*line 676
+L122:
+*line 677
+move #4,(sp)
+jsr _makelh
+*line 679
+move.l _sntlreq,R0
+add.l R0,_lcsum
+*line 681
+move.l _lcsum,(sp)
+move.l #L125,-(sp)
+move.l R14,-(sp)
+add.l #-12,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 682
+move #8,(sp)
+move.l R14,-(sp)
+add.l #-12,(sp)
+move.l #_ldhead,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 691
+*line 691
+move.l #$38,(sp)
+move.l #_ldhead,-(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L126
+*line 692
+*line 693
+jsr _streset
+*line 694
+move #-1,R0
+bra L120
+*line 695
+*line 696
+L126:
+*line 697
+*line 697
+move.l #$4,(sp)
+move.l #_sntlreq,-(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L127
+*line 698
+*line 699
+jsr _streset
+*line 700
+move #-1,R0
+bra L120
+*line 701
+*line 702
+L127:
+*line 703
+clr R7
+bra L130
+L131:
+*line 704
+*line 705
+*line 705
+move.l R13,(sp)
+move R7,-(sp)
+jsr _scwrite
+addq.l #2,sp
+tst R0
+beq L132
+*line 706
+*line 707
+jsr _streset
+*line 708
+move #-1,R0
+bra L120
+*line 709
+L132:L129:
+*line 703
+add #1,R7
+L130:
+*line 703
+cmp #20,R7
+blt L131
+L128:
+*line 712
+move.l R13,(sp)
+jsr _fclose
+*line 713
+jsr _postio
+*line 714
+clr R0
+bra L120
+L120:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _get_scr
+.text
+_get_scr:
+~~get_scr:
+link R14,#-4
+movem.l R6-R7/R13-R13,-(sp)
+~fp=R13
+~i=R7
+~tnl=-4
+*line 733
+jsr _preio
+*line 735
+move.l #L134,(sp)
+move #4,-(sp)
+move _ldslot,-(sp)
+jsr _slotnam
+addq.l #4,sp
+move.l R0,-(sp)
+jsr _fopenb
+addq.l #4,sp
+move.l R0,R13
+*line 737
+*line 737
+move.l R13,R0
+bne L135
+*line 738
+*line 739
+*line 740
+*line 741
+move #9,(sp)
+move #14,-(sp)
+clr.l -(sp)
+move.l #L137,-(sp)
+move.l #L136,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 742
+*line 743
+jsr _postio
+*line 744
+jsr _clrlsel
+*line 745
+move #-1,R0
+bra L133
+*line 746
+*line 747
+L135:
+*line 748
+move #8,(sp)
+move.l #L138,-(sp)
+move.l #_ldfile,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 749
+move #37,(sp)
+move.l #L139,-(sp)
+move.l #_ldcmnt,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 750
+move #3,(sp)
+jsr _ldswin
+*line 751
+move #5,(sp)
+jsr _ldswin
+*line 755
+*line 755
+move.l #$38,(sp)
+move.l #_ldhead,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L140
+*line 756
+*line 757
+jsr _clrlsel
+*line 758
+move #-1,R0
+bra L133
+*line 759
+*line 760
+*line 764
+*line 765
+*line 766
+L140:
+*line 767
+*line 767
+move.l #$4,(sp)
+move.l R14,-(sp)
+sub.l #4,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L141
+*line 768
+*line 769
+jsr _clrlsel
+*line 770
+move #-1,R0
+bra L133
+*line 771
+*line 772
+L141:
+*line 773
+*line 774
+tst _lrasw
+bne L142
+*line 774
+jsr _scinit
+*line 775
+L142:
+*line 776
+clr R7
+bra L145
+L146:
+*line 777
+*line 778
+*line 778
+move.l R13,(sp)
+move R7,-(sp)
+jsr _scread
+addq.l #2,sp
+tst R0
+beq L147
+*line 779
+*line 780
+jsr _clrlsel
+*line 781
+move #-1,R0
+bra L133
+*line 782
+L147:L144:
+*line 776
+add #1,R7
+L145:
+*line 776
+cmp #20,R7
+blt L146
+L143:
+*line 785
+move.l R13,(sp)
+jsr _fclose
+*line 786
+jsr _postio
+*line 788
+clr.l R0
+move.l R0,_scp
+move.l R0,_p_fwd
+move.l R0,_p_ctr
+move.l R0,_p_cur
+move.l R0,_p_bak
+*line 789
+clr.l R0
+move.l R0,_t_ctr
+move.l R0,_t_cur
+*line 790
+move.l _t_cur,R0
+add.l #$ffffff10,R0
+move.l R0,_t_bak
+*line 791
+move.l _t_cur,R0
+add.l #$102,R0
+move.l R0,_t_fwd
+*line 793
+clr (sp)
+jsr _selscor
+*line 795
+jsr _clrlsel
+*line 796
+clr R0
+bra L133
+L133:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _wrt_seq
+.text
+_wrt_seq:
+~~wrt_seq:
+~slot=8
+link R14,#-8
+movem.l R7-R7/R13-R13,-(sp)
+~fp=R13
+~cstemp=-8
+*line 815
+jsr _preio
+*line 817
+move.l #L149,(sp)
+move #9,-(sp)
+move 8(R14),-(sp)
+jsr _slotnam
+addq.l #4,sp
+move.l R0,-(sp)
+jsr _fopenb
+addq.l #4,sp
+move.l R0,R13
+*line 819
+*line 819
+move.l R13,R0
+bne L150
+*line 820
+*line 821
+*line 822
+*line 823
+move #9,(sp)
+move #14,-(sp)
+clr.l -(sp)
+move.l #L152,-(sp)
+move.l #L151,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 824
+*line 825
+jsr _postio
+*line 826
+jsr _streset
+*line 827
+move #-1,R0
+bra L148
+*line 828
+*line 829
+L150:
+*line 830
+move #9,(sp)
+jsr _makelh
+*line 832
+move.l _lcsum,(sp)
+move.l #L153,-(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 833
+move #8,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move.l #_ldhead,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 842
+*line 842
+move.l #$38,(sp)
+move.l #_ldhead,-(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L154
+*line 843
+*line 844
+jsr _streset
+*line 845
+move #-1,R0
+bra L148
+*line 846
+*line 847
+L154:
+*line 848
+*line 848
+move.l R13,(sp)
+jsr _sqwrite
+tst R0
+beq L155
+*line 849
+*line 850
+jsr _streset
+*line 851
+move #-1,R0
+bra L148
+*line 852
+*line 853
+L155:
+*line 854
+move.l R13,(sp)
+jsr _fclose
+*line 855
+jsr _postio
+*line 856
+clr R0
+bra L148
+L148:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _get_seq
+.text
+_get_seq:
+~~get_seq:
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+~fp=R13
+*line 873
+jsr _preio
+*line 875
+move.l #L157,(sp)
+move #9,-(sp)
+move _ldslot,-(sp)
+jsr _slotnam
+addq.l #4,sp
+move.l R0,-(sp)
+jsr _fopenb
+addq.l #4,sp
+move.l R0,R13
+*line 877
+*line 877
+move.l R13,R0
+bne L158
+*line 878
+*line 879
+*line 880
+*line 881
+move #9,(sp)
+move #14,-(sp)
+clr.l -(sp)
+move.l #L160,-(sp)
+move.l #L159,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 882
+*line 883
+jsr _postio
+*line 884
+jsr _clrlsel
+*line 885
+move #-1,R0
+bra L156
+*line 886
+*line 887
+L158:
+*line 888
+move #8,(sp)
+move.l #L161,-(sp)
+move.l #_ldfile,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 889
+move #37,(sp)
+move.l #L162,-(sp)
+move.l #_ldcmnt,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 890
+move #3,(sp)
+jsr _ldswin
+*line 891
+move #5,(sp)
+jsr _ldswin
+*line 895
+*line 895
+move.l #$38,(sp)
+move.l #_ldhead,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L163
+*line 896
+*line 897
+jsr _clrlsel
+*line 898
+move #-1,R0
+bra L156
+*line 899
+*line 900
+*line 904
+*line 905
+L163:
+*line 906
+jsr _initsq
+*line 908
+*line 908
+move.l R13,(sp)
+jsr _sqread
+tst R0
+beq L164
+*line 909
+*line 910
+jsr _clrlsel
+*line 911
+move #-1,R0
+bra L156
+*line 912
+*line 913
+L164:
+*line 914
+move.l R13,(sp)
+jsr _fclose
+*line 915
+jsr _postio
+*line 916
+jsr _clrlsel
+*line 917
+clr R0
+bra L156
+L156:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _wrt_wav
+.text
+_wrt_wav:
+~~wrt_wav:
+~slot=8
+link R14,#-8
+movem.l R6-R7/R12-R13,-(sp)
+~fp=R13
+~i=R7
+~cstemp=-8
+~wp=R12
+*line 938
+jsr _preio
+*line 940
+move.l #L166,(sp)
+move #6,-(sp)
+move 8(R14),-(sp)
+jsr _slotnam
+addq.l #4,sp
+move.l R0,-(sp)
+jsr _fopenb
+addq.l #4,sp
+move.l R0,R13
+*line 942
+*line 942
+move.l R13,R0
+bne L167
+*line 943
+*line 944
+*line 945
+*line 946
+move #9,(sp)
+move #14,-(sp)
+clr.l -(sp)
+move.l #L169,-(sp)
+move.l #L168,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 947
+*line 948
+jsr _postio
+*line 949
+jsr _streset
+*line 950
+move #-1,R0
+bra L165
+*line 951
+*line 952
+L167:
+*line 953
+move #6,(sp)
+jsr _makelh
+*line 955
+clr R7
+bra L172
+L173:
+*line 956
+*line 957
+move R7,R0
+muls #1080,R0
+move.l R0,R12
+add.l #_wslib,R12
+*line 958
+*line 959
+move.l #$1fc,(sp)
+move.l R12,-(sp)
+add.l #508,(sp)
+jsr _chksum
+addq.l #4,sp
+add.l R0,_lcsum
+*line 960
+move.l #$40,(sp)
+move.l R12,-(sp)
+add.l #1016,(sp)
+jsr _chksum
+addq.l #4,sp
+add.l R0,_lcsum
+L171:
+*line 955
+add #1,R7
+L172:
+*line 955
+cmp #20,R7
+blt L173
+L170:
+*line 963
+move.l _lcsum,(sp)
+move.l #L174,-(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 964
+move #8,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move.l #_ldhead,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 973
+*line 973
+move.l #$38,(sp)
+move.l #_ldhead,-(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L175
+*line 974
+*line 975
+jsr _streset
+*line 976
+move #-1,R0
+bra L165
+*line 977
+*line 978
+L175:
+*line 979
+clr R7
+bra L178
+L179:
+*line 980
+*line 981
+move R7,R0
+muls #1080,R0
+move.l R0,R12
+add.l #_wslib,R12
+*line 982
+*line 983
+*line 983
+move.l #$1fc,(sp)
+move.l R12,-(sp)
+add.l #508,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L180
+*line 984
+*line 985
+jsr _streset
+*line 986
+move #-1,R0
+bra L165
+*line 987
+*line 988
+L180:
+*line 989
+*line 989
+move.l #$40,(sp)
+move.l R12,-(sp)
+add.l #1016,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L181
+*line 990
+*line 991
+jsr _streset
+*line 992
+move #-1,R0
+bra L165
+*line 993
+L181:L177:
+*line 979
+add #1,R7
+L178:
+*line 979
+cmp #20,R7
+blt L179
+L176:
+*line 996
+move.l R13,(sp)
+jsr _fclose
+*line 997
+jsr _postio
+*line 998
+clr R0
+bra L165
+L165:tst.l (sp)+
+movem.l (sp)+,R7-R7/R12-R13
+unlk R14
+rts
+.globl _get_wav
+.text
+_get_wav:
+~~get_wav:
+link R14,#0
+movem.l R6-R7/R12-R13,-(sp)
+~fp=R13
+~i=R7
+~wp=R12
+*line 1017
+jsr _preio
+*line 1019
+move.l #L183,(sp)
+move #6,-(sp)
+move _ldslot,-(sp)
+jsr _slotnam
+addq.l #4,sp
+move.l R0,-(sp)
+jsr _fopenb
+addq.l #4,sp
+move.l R0,R13
+*line 1021
+*line 1021
+move.l R13,R0
+bne L184
+*line 1022
+*line 1023
+*line 1024
+*line 1025
+move #9,(sp)
+move #14,-(sp)
+clr.l -(sp)
+move.l #L186,-(sp)
+move.l #L185,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 1026
+*line 1027
+jsr _postio
+*line 1028
+jsr _clrlsel
+*line 1029
+move #-1,R0
+bra L182
+*line 1030
+*line 1031
+L184:
+*line 1032
+move #8,(sp)
+move.l #L187,-(sp)
+move.l #_ldfile,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 1033
+move #37,(sp)
+move.l #L188,-(sp)
+move.l #_ldcmnt,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 1034
+move #3,(sp)
+jsr _ldswin
+*line 1035
+move #5,(sp)
+jsr _ldswin
+*line 1039
+*line 1039
+move.l #$38,(sp)
+move.l #_ldhead,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L189
+*line 1040
+*line 1041
+jsr _clrlsel
+*line 1042
+move #-1,R0
+bra L182
+*line 1043
+*line 1044
+*line 1048
+*line 1049
+*line 1050
+L189:
+*line 1051
+clr R7
+bra L192
+L193:
+*line 1052
+*line 1053
+move R7,R0
+muls #1080,R0
+move.l R0,R12
+add.l #_wslib,R12
+*line 1054
+*line 1055
+*line 1055
+move.l #$1fc,(sp)
+move.l R12,-(sp)
+add.l #508,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L194
+*line 1056
+*line 1057
+jsr _clrlsel
+*line 1058
+move #-1,R0
+bra L182
+*line 1059
+*line 1060
+L194:
+*line 1061
+*line 1061
+move.l #$40,(sp)
+move.l R12,-(sp)
+add.l #1016,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L195
+*line 1062
+*line 1063
+jsr _clrlsel
+*line 1064
+move #-1,R0
+bra L182
+*line 1065
+*line 1066
+*line 1067
+*line 1068
+L195:
+*line 1069
+move #254,(sp)
+move.l R12,-(sp)
+add.l #508,(sp)
+move.l R12,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+L191:
+*line 1051
+add #1,R7
+L192:
+*line 1051
+cmp #20,R7
+blt L193
+L190:
+*line 1072
+jsr _clrlsel
+*line 1073
+move.l R13,(sp)
+jsr _fclose
+*line 1074
+jsr _postio
+*line 1075
+clr R0
+bra L182
+L182:tst.l (sp)+
+movem.l (sp)+,R7-R7/R12-R13
+unlk R14
+rts
+.data
+L2:.dc.b $77,$0
+L4:.dc.b $43,$6F,$75,$6C,$64,$6E,$27,$74,$20,$63,$72,$65,$61,$74,$65,$20,$61,$20,$66,$69,$6C,$65,$0
+L5:.dc.b $20,$66,$6F,$72,$20,$74,$68,$65,$20,$61,$73,$73,$69,$67,$6E,$6D,$65,$6E,$74,$73,$0
+L10:.dc.b $25,$30,$38,$2E,$38,$6C,$58,$0
+L18:.dc.b $72,$0
+L20:.dc.b $43,$6F,$75,$6C,$64,$6E,$27,$74,$20,$6F,$70,$65,$6E,$20,$74,$68,$65,$20,$66,$69,$6C,$65,$0
+L21:.dc.b $20,$66,$6F,$72,$20,$74,$68,$65,$20,$61,$73,$73,$69,$67,$6E,$6D,$65,$6E,$74,$73,$0
+L22:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$0
+L23:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$0
+L32:.dc.b $20,$20,$20,$20,$20,$20,$20,$57,$72,$69,$74,$69,$6E,$67,$20,$48,$69,$20,$4F,$72,$63,$68,$0
+L34:.dc.b $20,$20,$20,$20,$20,$20,$20,$57,$72,$69,$74,$69,$6E,$67,$20,$4C,$6F,$20,$4F,$72,$63,$68,$0
+L35:.dc.b $77,$0
+L37:.dc.b $43,$6F,$75,$6C,$64,$6E,$27,$74,$20,$63,$72,$65,$61,$74,$65,$20,$61,$20,$66,$69,$6C,$65,$0
+L38:.dc.b $20,$66,$6F,$72,$20,$74,$68,$65,$20,$6F,$72,$63,$68,$65,$73,$74,$72,$61,$0
+L43:.dc.b $25,$30,$38,$2E,$38,$6C,$58,$0
+L54:.dc.b $20,$20,$20,$20,$20,$20,$20,$52,$65,$61,$64,$69,$6E,$67,$20,$48,$69,$20,$4F,$72,$63,$68,$0
+L56:.dc.b $20,$20,$20,$20,$20,$20,$20,$52,$65,$61,$64,$69,$6E,$67,$20,$4C,$6F,$20,$4F,$72,$63,$68,$0
+L57:.dc.b $72,$0
+L59:.dc.b $43,$6F,$75,$6C,$64,$6E,$27,$74,$20,$6F,$70,$65,$6E,$20,$74,$68,$65,$20,$66,$69,$6C,$65,$0
+L60:.dc.b $20,$66,$6F,$72,$20,$74,$68,$65,$20,$6F,$72,$63,$68,$65,$73,$74,$72,$61,$0
+L61:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$0
+L62:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$0
+L72:.dc.b $77,$0
+L74:.dc.b $43,$6F,$75,$6C,$64,$6E,$27,$74,$20,$63,$72,$65,$61,$74,$65,$20,$61,$20,$66,$69,$6C,$65,$0
+L75:.dc.b $20,$66,$6F,$72,$20,$74,$68,$65,$20,$74,$75,$6E,$69,$6E,$67,$73,$0
+L80:.dc.b $25,$30,$38,$2E,$38,$6C,$58,$0
+L89:.dc.b $72,$0
+L91:.dc.b $43,$6F,$75,$6C,$64,$6E,$27,$74,$20,$6F,$70,$65,$6E,$20,$74,$68,$65,$20,$66,$69,$6C,$65,$0
+L92:.dc.b $20,$66,$6F,$72,$20,$74,$68,$65,$20,$74,$75,$6E,$69,$6E,$67,$73,$0
+L93:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$0
+L94:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$0
+L103:.dc.b $77,$0
+L105:.dc.b $43,$6F,$75,$6C,$64,$6E,$27,$74,$20,$63,$72,$65,$61,$74,$65,$20,$61,$20,$66,$69,$6C,$65,$0
+L106:.dc.b $20,$66,$6F,$72,$20,$74,$68,$65,$20,$70,$61,$74,$63,$68,$65,$73,$0
+L107:.dc.b $25,$30,$38,$2E,$38,$6C,$58,$0
+L111:.dc.b $72,$0
+L113:.dc.b $43,$6F,$75,$6C,$64,$6E,$27,$74,$20,$6F,$70,$65,$6E,$20,$74,$68,$65,$20,$66,$69,$6C,$65,$0
+L114:.dc.b $20,$66,$6F,$72,$20,$74,$68,$65,$20,$70,$61,$74,$63,$68,$65,$73,$0
+L115:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$0
+L116:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$0
+L121:.dc.b $77,$0
+L123:.dc.b $43,$6F,$75,$6C,$64,$6E,$27,$74,$20,$63,$72,$65,$61,$74,$65,$20,$61,$20,$66,$69,$6C,$65,$0
+L124:.dc.b $20,$66,$6F,$72,$20,$74,$68,$65,$20,$73,$63,$6F,$72,$65,$73,$0
+L125:.dc.b $25,$30,$38,$2E,$38,$6C,$58,$0
+L134:.dc.b $72,$0
+L136:.dc.b $43,$6F,$75,$6C,$64,$6E,$27,$74,$20,$6F,$70,$65,$6E,$20,$74,$68,$65,$20,$66,$69,$6C,$65,$0
+L137:.dc.b $20,$66,$6F,$72,$20,$74,$68,$65,$20,$73,$63,$6F,$72,$65,$73,$0
+L138:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$0
+L139:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$0
+L149:.dc.b $77,$0
+L151:.dc.b $43,$6F,$75,$6C,$64,$6E,$27,$74,$20,$63,$72,$65,$61,$74,$65,$20,$61,$20,$66,$69,$6C,$65,$0
+L152:.dc.b $20,$66,$6F,$72,$20,$74,$68,$65,$20,$73,$65,$71,$75,$65,$6E,$63,$65,$73,$0
+L153:.dc.b $25,$30,$38,$2E,$38,$6C,$58,$0
+L157:.dc.b $72,$0
+L159:.dc.b $43,$6F,$75,$6C,$64,$6E,$27,$74,$20,$6F,$70,$65,$6E,$20,$74,$68,$65,$20,$66,$69,$6C,$65,$0
+L160:.dc.b $20,$66,$6F,$72,$20,$74,$68,$65,$20,$73,$65,$71,$75,$65,$6E,$63,$65,$73,$0
+L161:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$0
+L162:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$0
+L166:.dc.b $77,$0
+L168:.dc.b $43,$6F,$75,$6C,$64,$6E,$27,$74,$20,$63,$72,$65,$61,$74,$65,$20,$61,$20,$66,$69,$6C,$65,$0
+L169:.dc.b $20,$66,$6F,$72,$20,$74,$68,$65,$20,$77,$61,$76,$65,$73,$68,$61,$70,$65,$73,$0
+L174:.dc.b $25,$30,$38,$2E,$38,$6C,$58,$0
+L183:.dc.b $72,$0
+L185:.dc.b $43,$6F,$75,$6C,$64,$6E,$27,$74,$20,$6F,$70,$65,$6E,$20,$74,$68,$65,$20,$66,$69,$6C,$65,$0
+L186:.dc.b $20,$66,$6F,$72,$20,$74,$68,$65,$20,$77,$61,$76,$65,$73,$68,$61,$70,$65,$73,$0
+L187:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$0
+L188:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$0
Index: alcyon/localkb.s
===================================================================
--- alcyon/localkb.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/localkb.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1669 @@
+.globl _lcdx
+.globl _lcdy
+.globl _lcdbit
+.globl _lcdrow
+.globl _lcdcol
+.globl _lcdbase
+.globl _lcdctl1
+.globl _lcdctl2
+.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 _point
+.globl _ancmsw
+.globl _angroup
+.globl _asmode
+.globl _astat
+.globl _aval
+.globl _ctrsw
+.globl _curasg
+.globl _curtun
+.globl _curvce
+.globl _editsw
+.globl _gomode
+.globl _gtmsel
+.globl _insmode
+.globl _ismode
+.globl _ldpass
+.globl _lksel
+.globl _lstbgnc
+.globl _lstendc
+.globl _lstflag
+.globl _oldpk
+.globl _pkctrl
+.globl _recsw
+.globl _stepenb
+.globl _stepint
+.globl _stepwgt
+.globl _keystat
+.globl _trgtab
+.globl _grpmode
+.globl _grpstat
+.globl _grptmap
+.globl _ldmap
+.globl _prstab
+.globl _tuntab
+.globl _veltab
+.globl _vce2grp
+.globl _vce2trg
+.globl _grp2prt
+.globl _ldbox
+.globl _varmode
+.globl _gdstbc
+.globl _lstbgns
+.globl _lstends
+.globl _lclkmap
+.data
+_lclkmap:
+.dc.w $0
+.dc.w $1
+.dc.w $2
+.dc.w $3
+.dc.w $4
+.dc.w $5
+.dc.w $6
+.dc.w $7
+.dc.w $8
+.dc.w $9
+.dc.w $A
+.dc.w $B
+.dc.w $C
+.dc.w $D
+.dc.w $72
+.dc.w $73
+.dc.w $74
+.dc.w $75
+.dc.w $76
+.dc.w $77
+.dc.w $78
+.dc.w $79
+.dc.w $7A
+.dc.w $7B
+.globl _panlkey
+.data
+_panlkey:
+.dc.w $230
+.dc.w $3C0
+.dc.w $550
+.dc.w $6E0
+.dc.w $870
+.dc.w $A00
+.dc.w $B90
+.dc.w $D20
+.dc.w $EB0
+.dc.w $1040
+.dc.w $11D0
+.dc.w $1360
+.dc.w $14F0
+.dc.w $1680
+.dc.w $1810
+.dc.w $19A0
+.dc.w $1B30
+.dc.w $1CC0
+.dc.w $1E50
+.dc.w $1FE0
+.dc.w $2170
+.dc.w $2300
+.dc.w $2490
+.dc.w $2620
+.globl _stepfrm
+.data
+_stepfrm:
+.dc.w $3
+.dc.w $4
+.dc.w $A
+.dc.w $16
+.dc.w $2E
+.dc.w $5E
+.dc.w $BE
+.dc.w $7
+.dc.w $10
+.dc.w $22
+.dc.w $46
+.dc.w $8E
+.dc.w $11E
+.dc.w $3
+.dc.w $6
+.dc.w $E
+.dc.w $1E
+.dc.w $2
+.dc.w $4
+.dc.w $8
+.dc.w $10
+.dc.w $20
+.dc.w $40
+.dc.w $80
+.dc.w $6
+.dc.w $C
+.dc.w $18
+.dc.w $30
+.dc.w $60
+.dc.w $C0
+.dc.w $3
+.dc.w $5
+.dc.w $A
+.dc.w $14
+.dc.w $2
+.dc.w $3
+.dc.w $4
+.dc.w $6
+.dc.w $A
+.dc.w $10
+.dc.w $18
+.dc.w $4
+.dc.w $5
+.dc.w $8
+.dc.w $C
+.dc.w $14
+.dc.w $1E
+.dc.w $3
+.dc.w $4
+.dc.w $5
+.dc.w $8
+.dc.w $3
+.dc.w $6
+.dc.w $C
+.dc.w $18
+.dc.w $30
+.dc.w $60
+.dc.w $C0
+.dc.w $9
+.dc.w $12
+.dc.w $24
+.dc.w $48
+.dc.w $90
+.dc.w $120
+.dc.w $4
+.dc.w $8
+.dc.w $10
+.dc.w $20
+.globl _setleds
+.text
+_setleds:
+~~setleds:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 139
+clr R7
+bra L4
+L5:
+*line 140
+move R7,R0
+or #128,R0
+move.b R0,_io_leds
+L3:
+*line 139
+add #1,R7
+L4:
+*line 139
+cmp #24,R7
+blt L5
+L2:
+*line 142
+move _pkctrl,R0
+bra L7
+*line 143
+L8:
+*line 144
+L9:
+*line 145
+L10:
+*line 146
+L11:
+*line 147
+*line 148
+bra L1
+*line 149
+*line 150
+L12:
+*line 151
+*line 152
+*line 153
+*line 154
+tst _stepenb
+beq L13
+*line 154
+move.b #1,_io_leds
+*line 155
+L13:
+*line 156
+move #6,R0
+sub _stepwgt,R0
+move.b R0,_io_leds
+*line 157
+move _stepint,R0
+add #7,R0
+move.b R0,_io_leds
+bra L1
+*line 158
+*line 159
+L14:
+*line 160
+*line 161
+*line 162
+*line 163
+tst _curasg
+beq L1
+*line 164
+*line 165
+move _curasg,R0
+sub #1,R0
+ext.l R0
+divs #20,R0
+swap R0
+move.b R0,_io_leds
+bra L1
+*line 166
+*line 167
+*line 168
+L15:
+*line 169
+*line 170
+*line 171
+*line 171
+cmp #1,_gomode
+bne L16
+*line 172
+*line 173
+clr R7
+bra L19
+L20:
+*line 174
+*line 175
+move _curscor,R0
+muls #80,R0
+move R7,R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+add.l #_seclist,R0
+move.l R0,R8
+tst.l (R8)
+beq L21
+*line 175
+move.b R7,_io_leds
+*line 176
+L21:L18:
+*line 173
+add #1,R7
+L19:
+*line 173
+cmp #20,R7
+blt L20
+L17:bra L22
+L16:
+*line 177
+*line 178
+*line 179
+clr R7
+bra L25
+L26:
+*line 180
+*line 181
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_scores,R8
+tst.l (R8)
+beq L27
+*line 181
+move.b R7,_io_leds
+L27:L24:
+*line 179
+add #1,R7
+L25:
+*line 179
+cmp #20,R7
+blt L26
+L23:L22:
+*line 182
+*line 183
+bra L1
+*line 184
+*line 185
+L28:
+*line 186
+*line 187
+*line 188
+clr R7
+bra L31
+L32:
+*line 189
+*line 190
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_scores,R8
+tst.l (R8)
+beq L33
+*line 190
+move.b R7,_io_leds
+*line 191
+L33:L30:
+*line 188
+add #1,R7
+L31:
+*line 188
+cmp #20,R7
+blt L32
+L29:bra L1
+*line 192
+bra L6
+L7:cmp #7,R0
+bhi L8
+asl #2,R0
+move R0,R8
+add.l #L34,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L34:.dc.l L9
+.dc.l L12
+.dc.l L15
+.dc.l L10
+.dc.l L14
+.dc.l L28
+.dc.l L8
+.dc.l L11
+.text
+L6:L1:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _localkb
+.text
+_localkb:
+~~localkb:
+~sig=8
+link R14,#-4
+movem.l R2-R7/R13-R13,-(sp)
+~i=R7
+~trg=R6
+~lclkey=R5
+~key=R4
+~vel=R3
+~ep=R13
+~val=-2
+~disptag=-4
+*line 212
+move 8(R14),R4
+sub #1,R4
+*line 214
+move _pkctrl,R0
+bra L37
+*line 215
+L38:
+*line 216
+*line 217
+*line 218
+move R4,R8
+add.l R8,R8
+add.l #_lclkmap,R8
+move (R8),R5
+*line 219
+move R5,R6
+add #4096,R6
+*line 220
+*line 221
+*line 221
+tst _astat
+beq L39
+*line 222
+*line 223
+move _aval,R0
+muls #252,R0
+and #32736,R0
+move R6,R9
+add.l R9,R9
+add.l #_prstab,R9
+move R0,(R9)
+*line 224
+*line 225
+*line 225
+move R4,R8
+add.l #_keystat,R8
+tst.b (R8)
+bne L40
+*line 226
+*line 227
+move R6,R8
+add.l #_trgtab,R8
+or.b #1,(R8)
+*line 228
+move #16128,R3
+move R6,R8
+add.l R8,R8
+add.l #_veltab,R8
+move R3,(R8)
+*line 229
+move R4,R8
+add.l #_keystat,R8
+move.b #1,(R8)
+*line 230
+*line 231
+move R6,(sp)
+jsr _stmproc
+*line 232
+*line 233
+*line 233
+tst _editsw
+beq L41
+*line 234
+*line 235
+clr (sp)
+move _curvce,-(sp)
+move R5,R8
+add.l R8,R8
+move.l #_tuntab,R9
+move 0(R8,R9.l),-(sp)
+move R6,-(sp)
+jsr _execkey
+addq.l #6,sp
+*line 236
+bra L42
+L41:
+*line 237
+*line 238
+*line 239
+clr R7
+bra L45
+L46:
+*line 240
+*line 241
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_grp2prt,R8
+cmp #3,(R8)
+bne L47
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_grp2prt,R8
+cmp #1,2(R8)
+bne L47
+*line 242
+*line 243
+move R3,(sp)
+move R5,-(sp)
+clr -(sp)
+move #2,-(sp)
+move R7,-(sp)
+jsr _asgvce
+addq.l #8,sp
+*line 244
+move R3,(sp)
+move R5,-(sp)
+move R7,-(sp)
+jsr _ne_bgn
+addq.l #4,sp
+*line 245
+L47:L44:
+*line 239
+add #1,R7
+L45:
+*line 239
+cmp #12,R7
+blt L46
+L43:L42:
+*line 246
+*line 247
+*line 248
+bra L48
+L40:
+*line 249
+*line 250
+*line 251
+move _aval,R0
+muls #252,R0
+and #32736,R0
+move R0,-2(R14)
+*line 252
+*line 253
+clr R7
+bra L51
+L52:
+*line 254
+*line 255
+*line 256
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_grp2prt,R8
+cmp #3,(R8)
+bne L53
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_grp2prt,R8
+cmp #1,2(R8)
+bne L53
+*line 257
+*line 258
+*line 258
+move -2(R14),(sp)
+move #6,-(sp)
+move R7,-(sp)
+jsr _newsv
+addq.l #4,sp
+tst R0
+beq L54
+*line 259
+*line 260
+*line 261
+tst _recsw
+beq L55
+move R7,R8
+add.l R8,R8
+move.l #_grpstat,R9
+tst 0(R8,R9.l)
+beq L55
+tst _ancmsw
+beq L10000
+move R7,R8
+add.l R8,R8
+add.l #_varmode,R8
+move 160(R8),R0
+bra L10002
+L10000:move R7,R8
+add.l R8,R8
+move.l #_grpmode,R9
+move 0(R8,R9.l),R0
+L10002:cmp #2,R0
+bne L55
+*line 262
+*line 263
+*line 263
+move #6,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L56
+*line 264
+*line 265
+move.l _t_cur,(R13)
+*line 266
+move.b #14,5(R13)
+*line 267
+move R7,R0
+or #80,R0
+move.b R0,6(R13)
+*line 268
+move -2(R14),R0
+ext.l R0
+move.l #$10,R1
+asl.l R1,R0
+move.l R0,16(R13)
+*line 269
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 270
+move #1,_ctrsw
+*line 271
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 272
+clr _ctrsw
+*line 273
+*line 274
+L56:bra L57
+L55:
+*line 275
+*line 275
+move _angroup,R0
+sub #1,R0
+cmp R0,R7
+bne L58
+*line 276
+*line 277
+move #5,(sp)
+jsr _dsanval
+*line 278
+L58:L57:
+*line 279
+L54:
+*line 280
+L53:L50:
+*line 253
+add #1,R7
+L51:
+*line 253
+cmp #12,R7
+blt L52
+L49:
+*line 281
+L48:
+*line 282
+*line 283
+*line 284
+bra L59
+L39:
+*line 285
+*line 286
+*line 287
+move R4,R8
+add.l #_keystat,R8
+clr.b (R8)
+*line 288
+move R6,R8
+add.l #_trgtab,R8
+and.b #-2,(R8)
+*line 289
+move R6,R8
+add.l R8,R8
+add.l #_prstab,R8
+clr (R8)
+*line 290
+*line 291
+*line 291
+move.l #_trgtab,R8
+tst.b 0(R8,R6)
+bne L60
+*line 292
+*line 293
+clr R7
+bra L63
+L64:
+*line 294
+*line 295
+*line 295
+move R7,R8
+add.l R8,R8
+add.l #_vce2trg,R8
+cmp (R8),R6
+bne L65
+*line 296
+*line 297
+move R7,R8
+add.l R8,R8
+add.l #_vce2trg,R8
+move #-1,(R8)
+*line 298
+move R6,(sp)
+jsr _procpfl
+*line 299
+*line 300
+L65:
+*line 301
+*line 302
+*line 303
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_grp2prt,R8
+cmp #3,(R8)
+bne L66
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_grp2prt,R8
+cmp #1,2(R8)
+bne L66
+*line 303
+move R7,(sp)
+move R6,-(sp)
+jsr _ne_end
+addq.l #2,sp
+L66:L62:
+*line 293
+add #1,R7
+L63:
+*line 293
+cmp #12,R7
+blt L64
+L61:
+*line 304
+*line 305
+*line 306
+move R6,(sp)
+or #-32768,(sp)
+jsr _stmproc
+*line 307
+L60:L59:
+*line 308
+*line 309
+bra L35
+*line 310
+*line 311
+*line 312
+*line 313
+L67:
+*line 314
+*line 315
+*line 316
+*line 316
+tst _astat
+beq L68
+*line 317
+*line 318
+*line 318
+move R4,R8
+add.l #_keystat,R8
+tst.b (R8)
+bne L69
+*line 319
+*line 320
+move R4,R8
+add.l #_keystat,R8
+move.b #1,(R8)
+*line 321
+*line 322
+*line 322
+tst R4
+bne L70
+*line 323
+*line 324
+clr -4(R14)
+*line 325
+*line 326
+bra L73
+L72:
+*line 327
+*line 328
+move _lstendc,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_lstends,R8
+move.l (R8),R13
+*line 329
+move _lstendc,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_lstends,R8
+move.l #$0,(R8)
+*line 330
+*line 331
+*line 332
+move.l R13,R0
+beq L73
+*line 333
+*line 334
+*line 335
+cmp.l _p_bak,R13
+bne L74
+*line 335
+move.l _p_bak,R8
+move.l 8(R8),_p_bak
+*line 336
+L74:
+*line 337
+*line 338
+cmp.l _p_ctr,R13
+bne L75
+*line 338
+move.l _p_ctr,R8
+move.l 8(R8),_p_ctr
+*line 339
+L75:
+*line 340
+*line 341
+cmp.l _p_cur,R13
+bne L76
+*line 341
+move.l _p_cur,R8
+move.l 8(R8),_p_cur
+*line 342
+L76:
+*line 343
+*line 344
+cmp.l _p_fwd,R13
+bne L77
+*line 344
+move.l _p_fwd,R8
+move.l 8(R8),_p_fwd
+*line 345
+L77:
+*line 346
+move.l R13,(sp)
+jsr _e_rmv
+move.l R0,(sp)
+jsr _e_del
+*line 347
+move #1,-4(R14)
+L73:
+*line 348
+move _lstendc,R0
+sub #1,_lstendc
+tst R0
+bgt L72
+L71:
+*line 349
+*line 350
+clr _lstendc
+*line 351
+*line 352
+*line 353
+bra L80
+L79:
+*line 354
+*line 355
+move _lstbgnc,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_lstbgns,R8
+move.l (R8),R13
+*line 356
+move _lstbgnc,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_lstbgns,R8
+move.l #$0,(R8)
+*line 357
+*line 358
+*line 359
+move.l R13,R0
+beq L80
+*line 360
+*line 361
+*line 362
+cmp.l _p_bak,R13
+bne L81
+*line 362
+move.l _p_bak,R8
+move.l 8(R8),_p_bak
+*line 363
+L81:
+*line 364
+*line 365
+cmp.l _p_ctr,R13
+bne L82
+*line 365
+move.l _p_ctr,R8
+move.l 8(R8),_p_ctr
+*line 366
+L82:
+*line 367
+*line 368
+cmp.l _p_cur,R13
+bne L83
+*line 368
+move.l _p_cur,R8
+move.l 8(R8),_p_cur
+*line 369
+L83:
+*line 370
+*line 371
+cmp.l _p_fwd,R13
+bne L84
+*line 371
+move.l _p_fwd,R8
+move.l 8(R8),_p_fwd
+*line 372
+L84:
+*line 373
+move.l R13,(sp)
+jsr _e_rmv
+move.l R0,(sp)
+jsr _e_del
+*line 374
+move #1,-4(R14)
+L80:
+*line 375
+move _lstbgnc,R0
+sub #1,_lstbgnc
+tst R0
+bgt L79
+L78:
+*line 376
+*line 377
+clr _lstbgnc
+*line 378
+clr _lstflag
+*line 379
+*line 380
+*line 380
+tst -4(R14)
+beq L85
+*line 381
+*line 382
+*line 383
+move.l _fc_val,R0
+move _stepint,R9
+add.l R9,R9
+add.l #_stepfrm,R9
+move 102(R9),R1
+ext.l R1
+sub.l R1,R0
+blt L86
+*line 383
+move _stepint,R8
+add.l R8,R8
+move.l #_stepfrm,R9
+move 102(R8,R9.l),R0
+ext.l R0
+sub.l R0,_fc_val
+*line 384
+L86:
+*line 385
+move.l _fc_val,(sp)
+jsr _sc_refr
+*line 386
+*line 387
+L85:bra L87
+L70:
+*line 388
+*line 388
+cmp #1,R4
+bne L88
+*line 389
+*line 390
+tst _stepenb
+beq L10003
+clr R0
+bra L10004
+L10003:move #1,R0
+L10004:move R0,_stepenb
+*line 391
+jsr _setleds
+*line 392
+*line 393
+*line 394
+bra L89
+L88:
+*line 395
+*line 395
+cmp #2,R4
+bne L90
+*line 396
+*line 397
+*line 397
+tst _recsw
+beq L91
+*line 398
+*line 399
+*line 399
+move #5,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L92
+*line 400
+*line 401
+move.b #23,5(R13)
+*line 402
+move.l _t_cur,(R13)
+*line 403
+move.l _t_cur,(sp)
+move #1,-(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,R8
+move.l 8(R8),(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 404
+move.l _fc_val,(sp)
+jsr _sc_refr
+*line 405
+L92:
+*line 406
+*line 407
+L91:bra L93
+L90:
+*line 408
+*line 408
+cmp #3,R4
+bne L94
+*line 409
+*line 410
+*line 411
+move _stepint,R8
+add.l R8,R8
+move.l #_stepfrm,R9
+move 102(R8,R9.l),R0
+ext.l R0
+add.l _fc_val,R0
+cmp.l #$fffffe,R0
+bge L95
+*line 411
+move _stepint,R8
+add.l R8,R8
+move.l #_stepfrm,R9
+move 102(R8,R9.l),R0
+ext.l R0
+add.l R0,_fc_val
+*line 412
+L95:bra L96
+L94:
+*line 413
+*line 413
+cmp #4,R4
+blt L97
+cmp #6,R4
+bgt L97
+*line 414
+*line 415
+move #6,R0
+sub R4,R0
+move R0,_stepwgt
+*line 416
+jsr _setleds
+*line 417
+bra L98
+L97:
+*line 418
+*line 418
+cmp #7,R4
+blt L99
+cmp #23,R4
+bgt L99
+*line 419
+*line 420
+move R4,R0
+sub #7,R0
+move R0,_stepint
+*line 421
+jsr _setleds
+*line 422
+L99:L98:L96:L93:L89:L87:
+*line 423
+*line 424
+L69:bra L100
+L68:
+*line 425
+*line 426
+*line 427
+move R4,R8
+add.l #_keystat,R8
+clr.b (R8)
+L100:
+*line 428
+*line 429
+bra L35
+*line 430
+*line 431
+*line 432
+*line 433
+L101:
+*line 434
+*line 435
+*line 436
+*line 436
+tst _astat
+beq L102
+*line 437
+*line 438
+*line 438
+move R4,R8
+add.l #_keystat,R8
+tst.b (R8)
+bne L103
+*line 439
+*line 440
+move R4,R8
+add.l #_keystat,R8
+move.b #1,(R8)
+*line 441
+*line 442
+*line 443
+cmp #20,R4
+bge L35
+*line 444
+*line 445
+*line 446
+cmp #1,_ismode
+bne L104
+*line 446
+move R4,(sp)
+add #1,(sp)
+jsr _selins
+*line 447
+bra L105
+L104:
+*line 448
+move R4,(sp)
+add #21,(sp)
+jsr _selins
+L105:
+*line 449
+*line 450
+L103:bra L106
+L102:
+*line 451
+*line 452
+*line 453
+move R4,R8
+add.l #_keystat,R8
+clr.b (R8)
+L106:
+*line 454
+*line 455
+bra L35
+*line 456
+*line 457
+L107:
+*line 458
+*line 459
+*line 460
+*line 460
+tst _astat
+beq L108
+*line 461
+*line 462
+*line 462
+move R4,R8
+add.l #_keystat,R8
+tst.b (R8)
+bne L109
+*line 463
+*line 464
+move R4,R8
+add.l #_keystat,R8
+move.b #1,(R8)
+*line 465
+*line 466
+*line 467
+cmp #5,_asmode
+bne L10005
+cmp #19,R4
+bge L35
+L10005:*line 468
+*line 469
+cmp #20,R4
+bge L35
+*line 470
+*line 471
+move R4,(sp)
+move _asmode,R0
+sub #1,R0
+muls #20,R0
+add R0,(sp)
+add #1,(sp)
+jsr _selasg
+*line 472
+*line 473
+L109:bra L110
+L108:
+*line 474
+*line 475
+*line 476
+move R4,R8
+add.l #_keystat,R8
+clr.b (R8)
+L110:
+*line 477
+*line 478
+bra L35
+*line 479
+*line 480
+*line 481
+L111:
+*line 482
+*line 483
+*line 484
+*line 484
+tst _astat
+beq L112
+*line 485
+*line 486
+*line 486
+move R4,R8
+add.l #_keystat,R8
+tst.b (R8)
+bne L113
+*line 487
+*line 488
+move R4,R8
+add.l #_keystat,R8
+move.b #1,(R8)
+*line 489
+*line 490
+*line 491
+cmp #20,R4
+bge L35
+*line 492
+*line 493
+*line 493
+cmp #1,_gomode
+bne L114
+*line 494
+*line 495
+*line 495
+move _curscor,R0
+muls #80,R0
+move R4,R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+add.l #_seclist,R0
+move.l R0,R8
+move.l (R8),R13
+move.l R13,R0
+beq L115
+*line 496
+*line 497
+*line 497
+tst _insmode
+beq L116
+*line 498
+*line 499
+jsr _icancel
+*line 500
+jsr _dsimode
+*line 501
+*line 502
+L116:
+*line 503
+move.l (R13),R0
+move.l R0,_fc_val
+move.l R0,(sp)
+jsr _sc_goto
+*line 504
+move _oldpk,_pkctrl
+*line 505
+clr _gomode
+*line 506
+move #1,(sp)
+jsr _GLCcurs
+*line 507
+move.l #L117,(sp)
+move #31,-(sp)
+clr -(sp)
+jsr _GLCtext
+addq.l #4,sp
+*line 508
+move.l #_GLCplot,_point
+*line 509
+clr (sp)
+move #54,-(sp)
+move #215,-(sp)
+move #54,-(sp)
+move #186,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 510
+clr (sp)
+jsr _GLCcurs
+*line 511
+jsr _setleds
+bra L35
+*line 512
+*line 513
+*line 514
+*line 515
+L115:bra L118
+L114:
+*line 516
+*line 517
+*line 518
+*line 518
+move R4,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_scores,R8
+tst.l (R8)
+beq L119
+*line 519
+*line 520
+*line 520
+tst _insmode
+beq L120
+*line 521
+*line 522
+jsr _icancel
+*line 523
+jsr _dsimode
+*line 524
+*line 525
+L120:
+*line 526
+move R4,(sp)
+jsr _selscor
+*line 527
+move _oldpk,_pkctrl
+*line 528
+clr _gomode
+*line 529
+move #1,(sp)
+jsr _GLCcurs
+*line 530
+move.l #L121,(sp)
+move #31,-(sp)
+clr -(sp)
+jsr _GLCtext
+addq.l #4,sp
+*line 531
+move.l #_GLCplot,_point
+*line 532
+clr (sp)
+move #54,-(sp)
+move #215,-(sp)
+move #54,-(sp)
+move #186,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 533
+clr (sp)
+jsr _GLCcurs
+*line 534
+jsr _setleds
+bra L35
+*line 535
+*line 536
+L119:L118:
+*line 537
+*line 538
+*line 539
+L113:bra L122
+L112:
+*line 540
+*line 541
+*line 542
+move R4,R8
+add.l #_keystat,R8
+clr.b (R8)
+L122:
+*line 543
+*line 544
+bra L35
+*line 545
+*line 546
+*line 547
+L123:
+*line 548
+*line 549
+*line 550
+*line 550
+tst _astat
+beq L124
+*line 551
+*line 552
+*line 552
+move R4,R8
+add.l #_keystat,R8
+tst.b (R8)
+bne L125
+*line 553
+*line 554
+move R4,R8
+add.l #_keystat,R8
+move.b #1,(R8)
+*line 555
+*line 556
+*line 556
+cmp #-1,_lksel
+beq L126
+cmp #20,R4
+bge L126
+*line 557
+*line 558
+move #2,_ldpass
+*line 559
+*line 560
+clr R7
+bra L129
+L130:
+*line 561
+*line 561
+move R7,R8
+add.l R8,R8
+add.l #_ldmap,R8
+cmp (R8),R4
+bne L131
+*line 562
+*line 563
+move R7,R8
+add.l R8,R8
+add.l #_ldmap,R8
+move #-1,(R8)
+*line 564
+move R7,(sp)
+move 24+_ldbox,-(sp)
+jsr _dpy_scr
+addq.l #2,sp
+*line 565
+*line 566
+L131:L128:
+*line 560
+add #1,R7
+L129:
+*line 560
+cmp #20,R7
+blt L130
+L127:
+*line 567
+move _lksel,R8
+add.l R8,R8
+add.l #_ldmap,R8
+move R4,(R8)
+*line 568
+move _lksel,(sp)
+move 24+_ldbox,-(sp)
+jsr _dpy_scr
+addq.l #2,sp
+*line 569
+move #-1,_lksel
+*line 570
+L126:
+*line 571
+*line 572
+L125:bra L132
+L124:
+*line 573
+*line 574
+*line 575
+move R4,R8
+add.l #_keystat,R8
+clr.b (R8)
+L132:
+*line 576
+*line 577
+bra L35
+*line 578
+*line 579
+*line 580
+L133:
+*line 581
+*line 582
+*line 583
+*line 583
+tst _astat
+beq L134
+*line 584
+*line 585
+*line 585
+move R4,R8
+add.l #_keystat,R8
+tst.b (R8)
+bne L135
+*line 586
+*line 587
+move R4,R8
+add.l #_keystat,R8
+move.b #1,(R8)
+*line 588
+*line 589
+*line 589
+cmp #-1,_gtmsel
+beq L136
+cmp #12,R4
+bge L136
+*line 590
+*line 591
+clr R7
+bra L139
+L140:
+*line 592
+*line 592
+move R7,R8
+add.l R8,R8
+add.l #_grptmap,R8
+cmp (R8),R4
+bne L141
+*line 593
+*line 594
+move R7,R8
+add.l R8,R8
+add.l #_grptmap,R8
+move #-1,(R8)
+*line 595
+move R7,(sp)
+jsr _dsgtme
+*line 596
+*line 597
+L141:L138:
+*line 591
+add #1,R7
+L139:
+*line 591
+cmp #12,R7
+blt L140
+L137:
+*line 598
+move _gtmsel,R8
+add.l R8,R8
+add.l #_grptmap,R8
+move R4,(R8)
+*line 599
+clr (sp)
+move _gtmsel,-(sp)
+jsr _dsgtmn
+addq.l #2,sp
+*line 600
+move _gtmsel,(sp)
+jsr _dsgtme
+*line 601
+move #-1,_gtmsel
+*line 602
+L136:
+*line 603
+*line 604
+L135:bra L142
+L134:
+*line 605
+*line 606
+*line 607
+move R4,R8
+add.l #_keystat,R8
+clr.b (R8)
+L142:
+*line 608
+*line 609
+bra L35
+*line 610
+*line 611
+L143:
+*line 612
+*line 613
+*line 614
+*line 615
+tst _astat
+beq L144
+*line 615
+move R4,R8
+add.l #_keystat,R8
+move.b #1,(R8)
+*line 616
+bra L145
+L144:
+*line 617
+move R4,R8
+add.l #_keystat,R8
+clr.b (R8)
+L145:
+*line 618
+bra L35
+*line 619
+bra L36
+L37:cmp #7,R0
+bhi L36
+asl #2,R0
+move R0,R8
+add.l #L146,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L146:.dc.l L38
+.dc.l L67
+.dc.l L111
+.dc.l L101
+.dc.l L107
+.dc.l L123
+.dc.l L133
+.dc.l L143
+.text
+L36:L35:tst.l (sp)+
+movem.l (sp)+,R3-R7/R13-R13
+unlk R14
+rts
+.data
+L117:.dc.b $47,$6F,$20,$54,$6F,$0
+L121:.dc.b $47,$6F,$20,$54,$6F,$0
Index: alcyon/lseek.s
===================================================================
--- alcyon/lseek.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/lseek.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,193 @@
+.globl _chantab
+.globl _Wrkbuf
+.globl _errno
+.globl _lseek
+.text
+_lseek:
+~~lseek:
+~pos=R7
+~fd=8
+~how=14
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~fp=R13
+*line 29
+move.l 10(R14),R7
+*line 29
+*line 29
+tst 8(R14)
+blt L10000
+cmp #11,8(R14)
+ble L2
+L10000:*line 30
+*line 34
+*line 35
+*line 36
+move #9,_errno
+*line 37
+move.l #$ffffffff,R0
+bra L1
+*line 38
+*line 39
+L2:
+*line 40
+*line 40
+move 8(R14),R0
+muls #12,R0
+add.l #_chantab,R0
+move.l R0,R8
+tst.b 3(R8)
+bne L3
+*line 41
+*line 45
+*line 46
+*line 47
+move #22,_errno
+*line 48
+move.l #$ffffffff,R0
+bra L1
+*line 49
+*line 50
+L3:
+*line 51
+move 8(R14),R0
+muls #12,R0
+add.l #_chantab,R0
+move.l R0,R8
+move.l 8(R8),R13
+*line 53
+move 14(R14),R0
+bra L5
+*line 54
+L6:
+*line 55
+*line 56
+add.l 48(R13),R7
+bra L4
+*line 57
+*line 58
+L7:
+*line 59
+*line 60
+clr.l R0
+move 38(R13),R0
+move.l 40(R13),R1
+move.l #$9,R2
+asl.l R2,R1
+add.l R1,R0
+add.l R0,R7
+*line 61
+L8:
+*line 62
+bra L4
+*line 63
+*line 64
+L9:
+*line 65
+*line 66
+move #22,_errno
+*line 67
+move.l #$ffffffff,R0
+bra L1
+bra L4
+L5:tst R0
+beq L8
+cmp #1,R0
+beq L7
+cmp #2,R0
+beq L6
+bra L9
+L4:
+*line 71
+*line 71
+tst.l R7
+bge L10
+*line 72
+*line 73
+clr 38(R13)
+*line 74
+clr.l 40(R13)
+*line 75
+or #8192,32(R13)
+*line 76
+*line 80
+*line 81
+*line 82
+move #22,_errno
+*line 83
+move.l #$ffffffff,R0
+bra L1
+*line 84
+bra L11
+L10:
+*line 85
+*line 85
+cmp.l 48(R13),R7
+ble L12
+*line 86
+*line 87
+move.l 48(R13),R0
+and.l #$1ff,R0
+move R0,38(R13)
+*line 88
+move.l 48(R13),R0
+move.l #$9,R1
+asr.l R1,R0
+move.l R0,40(R13)
+*line 89
+or #8192,32(R13)
+*line 90
+*line 95
+*line 96
+*line 97
+move #22,_errno
+*line 98
+move.l #$ffffffff,R0
+bra L1
+*line 99
+*line 100
+L12:L11:
+*line 101
+move.l R7,R0
+and.l #$1ff,R0
+move R0,38(R13)
+*line 102
+move.l R7,R0
+move.l #$9,R1
+asr.l R1,R0
+move.l R0,40(R13)
+*line 104
+*line 104
+move.l R13,(sp)
+jsr __seek
+tst R0
+bge L13
+*line 105
+*line 106
+or #8192,32(R13)
+*line 107
+move #5,_errno
+*line 108
+move.l #$ffffffff,R0
+bra L1
+*line 109
+*line 110
+L13:
+*line 111
+*line 112
+cmp.l 48(R13),R7
+bne L14
+*line 112
+or #-32768,32(R13)
+*line 113
+*line 118
+*line 119
+L14:
+*line 120
+move.l R7,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/lseg.s
===================================================================
--- alcyon/lseg.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/lseg.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,172 @@
+.globl _point
+.comm _point,4
+.globl _lseg
+.text
+_lseg:
+~~lseg:
+~x1=8
+~y1=10
+~x2=12
+~y2=14
+~t=16
+link R14,#-6
+movem.l R2-R7,-(sp)
+~dx=R7
+~dy=R6
+~ptx=R5
+~pty=R4
+~p=R3
+~i=-2
+~px=-4
+~py=-6
+*line 48
+move 8(R14),R5
+move 12(R14),R3
+sub R5,R3
+*line 49
+tst R3
+bge L10000
+move #-1,R0
+bra L10002
+L10000:tst R3
+beq L10003
+move #1,R0
+bra L10005
+L10003:clr R0
+L10005:L10002:move R0,R7
+*line 50
+tst R3
+bge L10006
+move R3,R0
+neg R0
+bra L10008
+L10006:move R3,R0
+L10008:move R0,-6(R14)
+*line 52
+move 10(R14),R4
+move 14(R14),R3
+sub R4,R3
+*line 53
+tst R3
+bge L10009
+move #-1,R0
+bra L10011
+L10009:tst R3
+beq L10012
+move #1,R0
+bra L10014
+L10012:clr R0
+L10014:L10011:move R0,R6
+*line 54
+tst R3
+bge L10015
+move R3,R0
+neg R0
+bra L10017
+L10015:move R3,R0
+L10017:move R0,-4(R14)
+*line 56
+move 16(R14),-(sp)
+move R4,-(sp)
+move R5,-(sp)
+move.l _point,R8
+jsr (R8)
+addq.l #6,sp
+*line 58
+*line 58
+move -6(R14),R0
+cmp -4(R14),R0
+ble L2
+*line 59
+*line 60
+move -6(R14),R3
+asr R3
+*line 61
+*line 62
+move #1,-2(R14)
+bra L5
+L6:
+*line 63
+*line 64
+add R7,R5
+*line 65
+*line 66
+*line 66
+sub -4(R14),R3
+bge L7
+*line 67
+*line 68
+add R6,R4
+*line 69
+add -6(R14),R3
+*line 70
+*line 71
+L7:
+*line 72
+move 16(R14),-(sp)
+move R4,-(sp)
+move R5,-(sp)
+move.l _point,R8
+jsr (R8)
+addq.l #6,sp
+L4:
+*line 62
+add #1,-2(R14)
+L5:
+*line 62
+move -2(R14),R0
+cmp -6(R14),R0
+blt L6
+L3:
+*line 73
+*line 74
+bra L8
+L2:
+*line 75
+*line 76
+*line 77
+move -4(R14),R3
+asr R3
+*line 78
+*line 79
+move #1,-2(R14)
+bra L11
+L12:
+*line 80
+*line 81
+add R6,R4
+*line 82
+*line 83
+*line 83
+sub -6(R14),R3
+bge L13
+*line 84
+*line 85
+add R7,R5
+*line 86
+add -4(R14),R3
+*line 87
+*line 88
+L13:
+*line 89
+move 16(R14),-(sp)
+move R4,-(sp)
+move R5,-(sp)
+move.l _point,R8
+jsr (R8)
+addq.l #6,sp
+L10:
+*line 79
+add #1,-2(R14)
+L11:
+*line 79
+move -2(R14),R0
+cmp -4(R14),R0
+ble L12
+L9:
+*line 90
+L8:L1:tst.l (sp)+
+movem.l (sp)+,R3-R7
+unlk R14
+rts
+.data
Index: alcyon/m7menu.s
===================================================================
--- alcyon/m7menu.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/m7menu.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1878 @@
+.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 _filecat
+.globl _m7verms
+.globl _bfs
+.globl _loadedf
+.globl _csbp
+.globl _curboxp
+.globl _point
+.globl _ndisp
+.globl _runit
+.globl _curslim
+.globl _sgcsw
+.globl _cxval
+.globl _cyval
+.globl _stcrow
+.globl _stccol
+.globl _crate1
+.globl _defect
+.globl _dsp_ok
+.globl _mdoct
+.globl _menuob
+.globl _obj0
+.globl _vi_ctl
+.bss
+L1:.ds.b 62
+.text
+.bss
+L2:.ds.b 62
+.text
+.bss
+L3:.ds.b 62
+.text
+.bss
+L4:.ds.b 62
+.text
+.bss
+L5:.ds.b 62
+.text
+.data
+L6:.dc.b $1
+.dc.b $BA
+.dc.b $3A
+.dc.b $B1
+.dc.b $1
+.dc.b $BB
+.dc.b $FF
+.even
+.text
+.data
+L7:.dc.b $1
+.dc.b $B6
+.dc.b $1D
+.dc.b $B1
+.dc.b $1
+.dc.b $B7
+.dc.b $1C
+.dc.b $B1
+.dc.b $1
+.dc.b $B4
+.dc.b $FF
+.even
+.text
+.data
+L8:.dc.b $1
+.dc.b $B6
+.dc.b $1D
+.dc.b $B1
+.dc.b $1
+.dc.b $B2
+.dc.b $1C
+.dc.b $B1
+.dc.b $1
+.dc.b $B4
+.dc.b $FF
+.even
+.text
+.data
+L9:.dc.b $1
+.dc.b $B6
+.dc.b $1D
+.dc.b $B1
+.dc.b $1
+.dc.b $B5
+.dc.b $1C
+.dc.b $B1
+.dc.b $1
+.dc.b $B4
+.dc.b $FF
+.even
+.text
+.data
+L10:.dc.b $1
+.dc.b $B9
+.dc.b $3A
+.dc.b $B1
+.dc.b $1
+.dc.b $B8
+.dc.b $FF
+.even
+.text
+.data
+L11:
+*line 71
+.dc.l L12
+*line 72
+.dc.l L13
+*line 73
+.dc.l L14
+*line 74
+.dc.l L15
+*line 75
+.dc.l L16
+*line 76
+.dc.l L17
+*line 77
+.dc.l L18
+*line 78
+.dc.l L19
+*line 79
+.dc.l L20
+*line 80
+.dc.l L21
+*line 81
+.dc.l L22
+*line 82
+.dc.l L23
+*line 83
+.dc.l L24
+*line 84
+.dc.l L25
+.text
+.data
+L26:.dc.w $12
+.dc.w $1A
+.dc.w $12
+.dc.w $142
+.dc.w $15
+.dc.w $1A
+.dc.w $15
+.dc.w $2A
+.dc.w $15
+.dc.w $36
+.dc.w $15
+.dc.w $54
+.dc.w $15
+.dc.w $60
+.dc.w $15
+.dc.w $7E
+.dc.w $15
+.dc.w $8A
+.dc.w $15
+.dc.w $A8
+.dc.w $15
+.dc.w $B4
+.dc.w $15
+.dc.w $D2
+.dc.w $15
+.dc.w $DE
+.dc.w $15
+.dc.w $FC
+.dc.w $15
+.dc.w $108
+.dc.w $15
+.dc.w $126
+.dc.w $15
+.dc.w $132
+.dc.w $15
+.dc.w $142
+.dc.w $102
+.dc.w $36
+.dc.w $102
+.dc.w $54
+.dc.w $102
+.dc.w $60
+.dc.w $102
+.dc.w $7E
+.dc.w $102
+.dc.w $8A
+.dc.w $102
+.dc.w $A8
+.dc.w $102
+.dc.w $B4
+.dc.w $102
+.dc.w $D2
+.dc.w $102
+.dc.w $DE
+.dc.w $102
+.dc.w $FC
+.dc.w $102
+.dc.w $108
+.dc.w $102
+.dc.w $126
+.dc.w $105
+.dc.w $36
+.dc.w $105
+.dc.w $54
+.dc.w $105
+.dc.w $60
+.dc.w $105
+.dc.w $7E
+.dc.w $105
+.dc.w $8A
+.dc.w $105
+.dc.w $A8
+.dc.w $105
+.dc.w $B4
+.dc.w $105
+.dc.w $D2
+.dc.w $105
+.dc.w $DE
+.dc.w $105
+.dc.w $FC
+.dc.w $105
+.dc.w $108
+.dc.w $105
+.dc.w $126
+.dc.w $1EA
+.dc.w $1A
+.dc.w $1EA
+.dc.w $2A
+.dc.w $1EA
+.dc.w $36
+.dc.w $1EA
+.dc.w $54
+.dc.w $1EA
+.dc.w $60
+.dc.w $1EA
+.dc.w $7E
+.dc.w $1EA
+.dc.w $8A
+.dc.w $1EA
+.dc.w $A8
+.dc.w $1EA
+.dc.w $B4
+.dc.w $1EA
+.dc.w $D2
+.dc.w $1EA
+.dc.w $DE
+.dc.w $1EA
+.dc.w $FC
+.dc.w $1EA
+.dc.w $108
+.dc.w $1EA
+.dc.w $126
+.dc.w $1EA
+.dc.w $132
+.dc.w $1EA
+.dc.w $142
+.dc.w $1ED
+.dc.w $1A
+.dc.w $1ED
+.dc.w $142
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.text
+.data
+L27:.dc.w $2
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $22
+.dc.w $7
+.dc.w $4
+.dc.w $7
+.dc.w $22
+.dc.w $A
+.dc.w $4
+.dc.w $A
+.dc.w $22
+.dc.w $D
+.dc.w $4
+.dc.w $D
+.dc.w $22
+.dc.w $10
+.dc.w $4
+.dc.w $10
+.dc.w $22
+.dc.w $13
+.dc.w $4
+.dc.w $13
+.dc.w $22
+.dc.w $16
+.dc.w $4
+.text
+.globl _mdboxes
+.data
+_mdboxes:
+.dc.w $16
+.dc.w $35
+.dc.w $101
+.dc.w $57
+.dc.w $0
+*line 154
+.dc.l _mdselbx
+.dc.w $106
+.dc.w $35
+.dc.w $1E9
+.dc.w $57
+.dc.w $1
+*line 155
+.dc.l _mdselbx
+.dc.w $16
+.dc.w $5F
+.dc.w $101
+.dc.w $81
+.dc.w $2
+*line 156
+.dc.l _mdselbx
+.dc.w $106
+.dc.w $5F
+.dc.w $1E9
+.dc.w $81
+.dc.w $3
+*line 157
+.dc.l _mdselbx
+.dc.w $16
+.dc.w $89
+.dc.w $101
+.dc.w $AB
+.dc.w $4
+*line 158
+.dc.l _mdselbx
+.dc.w $106
+.dc.w $89
+.dc.w $1E9
+.dc.w $AB
+.dc.w $5
+*line 159
+.dc.l _mdselbx
+.dc.w $16
+.dc.w $B3
+.dc.w $101
+.dc.w $D5
+.dc.w $6
+*line 160
+.dc.l _mdselbx
+.dc.w $106
+.dc.w $B3
+.dc.w $1E9
+.dc.w $D5
+.dc.w $7
+*line 161
+.dc.l _mdselbx
+.dc.w $16
+.dc.w $DD
+.dc.w $101
+.dc.w $FF
+.dc.w $8
+*line 162
+.dc.l _mdselbx
+.dc.w $106
+.dc.w $DD
+.dc.w $1E9
+.dc.w $FF
+.dc.w $9
+*line 163
+.dc.l _mdselbx
+.dc.w $16
+.dc.w $107
+.dc.w $101
+.dc.w $129
+.dc.w $A
+*line 164
+.dc.l _mdselbx
+.dc.w $106
+.dc.w $107
+.dc.w $1E9
+.dc.w $129
+.dc.w $B
+*line 165
+.dc.l _mdselbx
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.l $0
+.globl _menupal
+.data
+_menupal:
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $2
+.dc.w $1
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3
+.dc.w $0
+.dc.w $2
+.dc.w $2
+.dc.w $1
+.dc.w $0
+.dc.w $2
+.dc.w $1
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $0
+.dc.w $2
+.dc.w $0
+.dc.w $0
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $1
+.dc.w $2
+.dc.w $2
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $1
+.dc.w $1
+.dc.w $3
+.dc.w $3
+.dc.w $0
+.dc.w $0
+.dc.w $3
+.dc.w $3
+.dc.w $0
+.dc.w $0
+.dc.w $3
+.globl _blakpal
+.data
+_blakpal:
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.globl _mfrc
+.data
+_mfrc:
+.dc.w $14
+.dc.w $6
+.dc.w $B
+.dc.w $6
+.dc.w $B
+.dc.w $14
+.dc.w $8
+.dc.w $6
+.dc.w $11
+.dc.w $6
+.dc.w $E
+.dc.w $6
+.dc.w $5
+.dc.w $24
+.dc.w $8
+.dc.w $24
+.globl _m7_flds
+.data
+_m7_flds:
+*line 232
+.dc.l _stdctp2
+*line 233
+.dc.l _nokey
+*line 234
+.dc.l _nokey
+*line 235
+.dc.l _cxkstd
+*line 236
+.dc.l _cykstd
+*line 237
+.dc.l _cxgen
+*line 238
+.dc.l _cygen
+*line 239
+.dc.l _nokey
+*line 240
+.dc.l _nokey
+*line 241
+.dc.l _nokey
+*line 242
+.dc.l _select
+*line 243
+.dc.l _nokey
+*line 244
+.dc.l _nokey
+*line 245
+.dc.l _nokey
+.dc.l $0
+*line 247
+.dc.l _mdboxes
+*line 248
+.dc.l _crate1
+*line 249
+.dc.l _crate1
+.dc.w $0
+.dc.w $90
+.dc.w $9A
+.globl _dswap
+.text
+_dswap:
+~~dswap:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 268
+move.l #_blakpal,(sp)
+jsr _vsndpal
+*line 270
+*line 271
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L29
+*line 271
+clr (sp)
+jsr _vbank
+*line 272
+L29:
+*line 273
+move #1,(sp)
+jsr _setipl
+*line 274
+clr _vi_ctl
+*line 276
+clr R7
+bra L32
+L33:
+*line 277
+move R7,R0
+asl #3,R0
+ext.l R0
+add.l #_v_odtab,R0
+move.l R0,R8
+or #16,(R8)
+L31:
+*line 276
+add #1,R7
+L32:
+*line 276
+cmp #16,R7
+blt L33
+L30:
+*line 279
+jsr _VHinit
+*line 280
+jsr _VSinit
+L28:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _mlbld
+.text
+_mlbld:
+~~mlbld:
+~where=8
+~from=12
+link R14,#0
+movem.l R4-R7,-(sp)
+~i=R7
+~j=R6
+~c=R5
+*line 298
+bra L37
+L36:
+*line 299
+*line 300
+move.l 12(R14),R8
+move.b (R8),R5
+add.l #1,12(R14)
+*line 301
+*line 302
+clr R6
+bra L40
+L41:
+*line 303
+move.l 8(R14),R8
+move.b R5,(R8)
+add.l #1,8(R14)
+L39:
+*line 302
+add #1,R6
+L40:
+*line 302
+cmp R7,R6
+blt L41
+L38:
+*line 303
+L37:
+*line 304
+move.l 12(R14),R8
+move.b (R8),R0
+ext.w R0
+move R0,R7
+cmp #-1,R7
+move sr,R0
+add.l #1,12(R14)
+move R0,ccr
+bne L36
+L35:
+*line 306
+move.l 8(R14),R8
+clr.b (R8)
+L34:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _mlpoint
+.text
+_mlpoint:
+~~mlpoint:
+~x=8
+~y=10
+~pen=12
+link R14,#-4
+*line 318
+*line 319
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L43
+*line 319
+clr (sp)
+jsr _vbank
+*line 320
+L43:
+*line 321
+move 12(R14),(sp)
+move 10(R14),-(sp)
+move 8(R14),-(sp)
+move.l _mdoct,-(sp)
+jsr _vputp
+addq.l #8,sp
+L42:unlk R14
+rts
+.globl _mdselbx
+.text
+_mdselbx:
+~~mdselbx:
+~n=8
+link R14,#0
+movem.l R3-R7,-(sp)
+~mlcv=R7
+~mbcv=R6
+~mbak=R5
+~rc=R4
+*line 345
+move #10,(sp)
+jsr _exp_c
+move R0,R7
+*line 346
+move #11,(sp)
+jsr _exp_c
+move R0,R6
+*line 347
+move #2,(sp)
+jsr _exp_c
+move R0,R5
+*line 349
+clr R4
+*line 351
+*line 351
+cmp #7,_ndisp
+bne L45
+*line 352
+*line 353
+*line 353
+cmp #7,8(R14)
+bne L46
+*line 354
+*line 355
+*line 355
+jsr _dcopy
+tst R0
+beq L47
+*line 356
+*line 357
+move _defect,(sp)
+move.l #L48,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 358
+*line 359
+*line 360
+*line 361
+*line 362
+move #14,(sp)
+move.l #_bfs,-(sp)
+move 34+L27,-(sp)
+move 32+L27,-(sp)
+add #1,(sp)
+move R5,-(sp)
+move #7,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 363
+*line 364
+move #-1,R4
+*line 365
+*line 366
+L47:
+*line 367
+move #-1,_ndisp
+*line 368
+bra L49
+L46:
+*line 369
+*line 370
+*line 371
+move 8(R14),_ndisp
+*line 372
+clr _runit
+*line 373
+clr _dsp_ok
+L49:
+*line 374
+*line 375
+*line 376
+*line 377
+*line 378
+move #14,(sp)
+move.l 32+L11,-(sp)
+move 34+L27,-(sp)
+move 32+L27,-(sp)
+move R5,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 379
+*line 380
+*line 381
+*line 382
+bra L50
+L45:
+*line 383
+*line 383
+cmp #9,_ndisp
+bne L51
+*line 384
+*line 385
+*line 385
+cmp #9,8(R14)
+bne L52
+*line 386
+*line 387
+*line 387
+move #1,(sp)
+jsr _dformat
+tst R0
+beq L53
+*line 388
+*line 389
+move _defect,(sp)
+move.l #L54,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 390
+*line 391
+*line 392
+*line 393
+*line 394
+move #14,(sp)
+move.l #_bfs,-(sp)
+move 42+L27,-(sp)
+move 40+L27,-(sp)
+add #1,(sp)
+move R5,-(sp)
+move #7,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 395
+*line 396
+move #-1,R4
+*line 397
+*line 398
+L53:
+*line 399
+move #-1,_ndisp
+*line 400
+bra L55
+L52:
+*line 401
+*line 402
+*line 403
+move 8(R14),_ndisp
+*line 404
+clr _runit
+*line 405
+clr _dsp_ok
+L55:
+*line 406
+*line 407
+*line 408
+*line 409
+*line 410
+move #14,(sp)
+move.l 40+L11,-(sp)
+move 42+L27,-(sp)
+move 40+L27,-(sp)
+move R5,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 411
+*line 412
+*line 413
+bra L56
+L51:
+*line 414
+*line 415
+*line 416
+move 8(R14),_ndisp
+*line 417
+*line 418
+*line 418
+cmp #7,8(R14)
+bne L57
+*line 419
+*line 420
+*line 421
+*line 422
+move #14,(sp)
+move.l 32+L11,-(sp)
+move 34+L27,-(sp)
+move 32+L27,-(sp)
+move R5,-(sp)
+move #7,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 423
+bra L58
+L57:
+*line 424
+*line 424
+cmp #9,8(R14)
+bne L59
+*line 425
+*line 426
+*line 427
+*line 428
+move #14,(sp)
+move.l 40+L11,-(sp)
+move 42+L27,-(sp)
+move 40+L27,-(sp)
+move R5,-(sp)
+move #7,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 429
+bra L60
+L59:
+*line 430
+*line 431
+*line 432
+clr _runit
+*line 433
+clr _dsp_ok
+L60:L58:
+*line 434
+L56:L50:
+*line 443
+move R4,R0
+bra L44
+L44:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _drawm
+.text
+_drawm:
+~~drawm:
+link R14,#-16
+movem.l R3-R7/R13-R13,-(sp)
+~mlp=R13
+~i=R7
+~mlcv=R6
+~mbcv=R5
+~mbak=R4
+~buf=-16
+*line 462
+move #10,(sp)
+jsr _exp_c
+move R0,R6
+*line 463
+move #11,(sp)
+jsr _exp_c
+move R0,R5
+*line 464
+move #2,(sp)
+jsr _exp_c
+move R0,R4
+*line 466
+*line 466
+tst.b L1
+bne L62
+*line 467
+*line 468
+move.l #L6,(sp)
+move.l #L1,-(sp)
+jsr _mlbld
+addq.l #4,sp
+*line 469
+move.l #L7,(sp)
+move.l #L2,-(sp)
+jsr _mlbld
+addq.l #4,sp
+*line 470
+move.l #L8,(sp)
+move.l #L3,-(sp)
+jsr _mlbld
+addq.l #4,sp
+*line 471
+move.l #L9,(sp)
+move.l #L4,-(sp)
+jsr _mlbld
+addq.l #4,sp
+*line 472
+move.l #L10,(sp)
+move.l #L5,-(sp)
+jsr _mlbld
+addq.l #4,sp
+*line 473
+*line 474
+L62:
+*line 475
+*line 476
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L63
+*line 476
+clr (sp)
+jsr _vbank
+*line 477
+L63:
+*line 478
+move R4,(sp)
+move #349,-(sp)
+move #511,-(sp)
+clr -(sp)
+clr -(sp)
+move #128,-(sp)
+move.l _menuob,-(sp)
+jsr _vbfill4
+adda.l #14,sp
+*line 480
+move #14,(sp)
+move.l #L1,-(sp)
+move #2,-(sp)
+move #1,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 481
+move #14,(sp)
+move.l #L64,-(sp)
+move #2,-(sp)
+move #2,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 482
+move #14,(sp)
+move.l #L65,-(sp)
+move #61,-(sp)
+move #2,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 484
+move #14,(sp)
+move.l #L2,-(sp)
+move #2,-(sp)
+move #3,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 485
+move #14,(sp)
+move.l #L66,-(sp)
+move #2,-(sp)
+move #4,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 486
+move #14,(sp)
+move.l #L67,-(sp)
+move #32,-(sp)
+move #4,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 487
+move #14,(sp)
+move.l #L68,-(sp)
+move #61,-(sp)
+move #4,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 488
+move #14,(sp)
+move.l #L69,-(sp)
+move #2,-(sp)
+move #5,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 489
+move #14,(sp)
+move.l #L70,-(sp)
+move #32,-(sp)
+move #5,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 490
+move #14,(sp)
+move.l #L71,-(sp)
+move #61,-(sp)
+move #5,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 492
+move #14,(sp)
+move.l #L3,-(sp)
+move #2,-(sp)
+move #6,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 493
+move #14,(sp)
+move.l #L72,-(sp)
+move #2,-(sp)
+move #7,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 494
+move #14,(sp)
+move.l #L73,-(sp)
+move #32,-(sp)
+move #7,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 495
+move #14,(sp)
+move.l #L74,-(sp)
+move #61,-(sp)
+move #7,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 496
+move #14,(sp)
+move.l #L75,-(sp)
+move #2,-(sp)
+move #8,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 497
+move #14,(sp)
+move.l #L76,-(sp)
+move #32,-(sp)
+move #8,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 498
+move #14,(sp)
+move.l #L77,-(sp)
+move #61,-(sp)
+move #8,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 501
+move #14,(sp)
+move.l #L3,-(sp)
+move #2,-(sp)
+move #9,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 502
+move #14,(sp)
+move.l #L78,-(sp)
+move #2,-(sp)
+move #10,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 503
+move #14,(sp)
+move.l #L79,-(sp)
+move #32,-(sp)
+move #10,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 504
+move #14,(sp)
+move.l #L80,-(sp)
+move #61,-(sp)
+move #10,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 505
+move #14,(sp)
+move.l #L81,-(sp)
+move #2,-(sp)
+move #11,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 506
+move #14,(sp)
+move.l #L82,-(sp)
+move #32,-(sp)
+move #11,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 507
+move #14,(sp)
+move.l #L83,-(sp)
+move #61,-(sp)
+move #11,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 509
+move #14,(sp)
+move.l #L3,-(sp)
+move #2,-(sp)
+move #12,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 510
+move #14,(sp)
+move.l #L84,-(sp)
+move #2,-(sp)
+move #13,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 511
+move #14,(sp)
+move.l #L85,-(sp)
+move #32,-(sp)
+move #13,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 512
+move #14,(sp)
+move.l #L86,-(sp)
+move #61,-(sp)
+move #13,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 513
+move #14,(sp)
+move.l #L87,-(sp)
+move #2,-(sp)
+move #14,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 514
+move #14,(sp)
+move.l #L88,-(sp)
+move #32,-(sp)
+move #14,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 515
+move #14,(sp)
+move.l #L89,-(sp)
+move #61,-(sp)
+move #14,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 517
+move #14,(sp)
+move.l #L3,-(sp)
+move #2,-(sp)
+move #15,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 518
+move #14,(sp)
+move.l #L90,-(sp)
+move #2,-(sp)
+move #16,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 519
+move #14,(sp)
+move.l #L91,-(sp)
+move #32,-(sp)
+move #16,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 520
+move #14,(sp)
+move.l #L92,-(sp)
+move #61,-(sp)
+move #16,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 521
+move #14,(sp)
+move.l #L93,-(sp)
+move #2,-(sp)
+move #17,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 522
+move #14,(sp)
+move.l #L94,-(sp)
+move #32,-(sp)
+move #17,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 523
+move #14,(sp)
+move.l #L95,-(sp)
+move #61,-(sp)
+move #17,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 525
+move #14,(sp)
+move.l #L3,-(sp)
+move #2,-(sp)
+move #18,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 526
+move #14,(sp)
+move.l #L96,-(sp)
+move #2,-(sp)
+move #19,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 527
+move #14,(sp)
+move.l #L97,-(sp)
+move #32,-(sp)
+move #19,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 528
+move #14,(sp)
+move.l #L98,-(sp)
+move #61,-(sp)
+move #19,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 529
+move #14,(sp)
+move.l #L99,-(sp)
+move #2,-(sp)
+move #20,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 530
+move #14,(sp)
+move.l #L100,-(sp)
+move #32,-(sp)
+move #20,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 531
+move #14,(sp)
+move.l #L101,-(sp)
+move #61,-(sp)
+move #20,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 533
+move #14,(sp)
+move.l #L4,-(sp)
+move #2,-(sp)
+move #21,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 534
+move #14,(sp)
+move.l #L102,-(sp)
+move #2,-(sp)
+move #22,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 535
+move #14,(sp)
+move.l #L103,-(sp)
+move #61,-(sp)
+move #22,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 536
+move #14,(sp)
+move.l #L5,-(sp)
+move #2,-(sp)
+move #23,-(sp)
+move R4,-(sp)
+move R6,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 539
+move.l #L26,R13
+*line 540
+move.l #_mlpoint,_point
+*line 542
+bra L106
+L105:
+*line 543
+*line 544
+move R6,(sp)
+move 6(R13),-(sp)
+move 4(R13),-(sp)
+move 2(R13),-(sp)
+move (R13),-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 545
+add.l #8,R13
+L106:
+*line 546
+cmp #-1,(R13)
+bne L105
+L104:
+*line 548
+*line 549
+move #14,(sp)
+move.l L11,-(sp)
+move 2+L27,-(sp)
+move L27,-(sp)
+move R4,-(sp)
+move #5,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 551
+move #14,(sp)
+move.l #_m7verms,-(sp)
+move #51,-(sp)
+move #2,-(sp)
+move R4,-(sp)
+move #5,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 553
+move #1,R7
+bra L109
+L110:
+*line 554
+*line 555
+move #14,(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #L11,R9
+move.l 0(R8,R9.l),-(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #L27,R9
+move 2(R8,R9.l),-(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #L27,R9
+move 0(R8,R9.l),-(sp)
+move R4,-(sp)
+move R5,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+L108:
+*line 553
+add #1,R7
+L109:
+*line 553
+cmp #13,R7
+blt L110
+L107:
+*line 557
+*line 558
+move #14,(sp)
+move.l 52+L11,-(sp)
+move 54+L27,-(sp)
+move 52+L27,-(sp)
+move R4,-(sp)
+move #4,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 560
+clr R7
+bra L113
+L114:
+*line 561
+*line 562
+move #8,(sp)
+move R7,R0
+asl #3,R0
+ext.l R0
+add.l #_loadedf,R0
+move.l R0,-(sp)
+move.l R14,-(sp)
+add.l #-16,(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 563
+clr.b -8(R14)
+*line 564
+*line 565
+*line 566
+move #14,(sp)
+move.l R14,-(sp)
+add.l #-16,(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_mfrc,R9
+move 2(R8,R9.l),-(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_mfrc,R9
+move 0(R8,R9.l),-(sp)
+move R4,-(sp)
+move #8,-(sp)
+move #64,-(sp)
+move.l _menuob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+L112:
+*line 560
+add #1,R7
+L113:
+*line 560
+cmp #8,R7
+blt L114
+L111:L61:tst.l (sp)+
+movem.l (sp)+,R4-R7/R13-R13
+unlk R14
+rts
+.globl _m7menu
+.text
+_m7menu:
+~~m7menu:
+link R14,#-4
+*line 581
+move.l #_v_score,_menuob
+*line 582
+move.l #_v_curs0,_obj0
+*line 583
+move.l #144+_v_obtab,_mdoct
+*line 585
+move #350,_curslim
+*line 587
+move.l #_m7_flds,(sp)
+jsr _curset
+*line 589
+move #-1,_ndisp
+*line 590
+jsr _dswap
+*line 592
+clr (sp)
+jsr _vbank
+*line 593
+move #32767,(sp)
+clr -(sp)
+move.l _menuob,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 594
+move #12033,(sp)
+clr -(sp)
+move.l _menuob,R0
+add.l #$fffe,R0
+move.l R0,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 596
+move #-1,(sp)
+move #1536,-(sp)
+clr -(sp)
+clr -(sp)
+move #350,-(sp)
+move #512,-(sp)
+move.l _menuob,-(sp)
+clr -(sp)
+clr -(sp)
+move #8,-(sp)
+jsr _SetObj
+adda.l #20,sp
+*line 597
+move #-1,(sp)
+move #1540,-(sp)
+move #154,-(sp)
+move #144,-(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 599
+move #1,(sp)
+jsr _arcurs
+*line 601
+jsr _drawm
+*line 603
+move.l #_menupal,(sp)
+jsr _vsndpal
+*line 605
+move #8,(sp)
+move #8,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 606
+move #15,(sp)
+clr -(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 608
+move #154,(sp)
+move #144,-(sp)
+jsr _setgc
+addq.l #2,sp
+L115:unlk R14
+rts
+.data
+L12:.dc.b $4D,$49,$44,$41,$53,$20,$56,$49,$49,$20,$20,$20,$20,$20,$20,$66,$6F,$72,$20,$74,$68,$65,$20,$42,$75,$63,$68,$6C,$61,$20
+.dc.b $37,$30,$30,$20,$20,$20,$20,$20,$20,$56,$65,$72,$73,$69,$6F,$6E,$0
+L13:.dc.b $4C,$69,$62,$72,$61,$72,$69,$61,$6E,$0
+L14:.dc.b $50,$61,$74,$63,$68,$20,$45,$64,$69,$74,$6F,$72,$0
+L15:.dc.b $53,$63,$6F,$72,$65,$20,$65,$64,$69,$74,$6F,$72,$0
+L16:.dc.b $53,$65,$71,$75,$65,$6E,$63,$65,$20,$45,$64,$69,$74,$6F,$72,$0
+L17:.dc.b $49,$6E,$73,$74,$72,$75,$6D,$65,$6E,$74,$20,$64,$65,$73,$69,$67,$6E,$65,$72,$0
+L18:.dc.b $49,$6E,$69,$74,$69,$61,$6C,$69,$7A,$65,$20,$73,$79,$73,$74,$65,$6D,$0
+L19:.dc.b $57,$61,$76,$65,$73,$68,$61,$70,$65,$20,$65,$64,$69,$74,$6F,$72,$0
+L20:.dc.b $57,$72,$69,$74,$65,$20,$70,$72,$6F,$67,$72,$61,$6D,$20,$74,$6F,$20,$64,$69,$73,$6B,$0
+L21:.dc.b $54,$75,$6E,$69,$6E,$67,$20,$74,$61,$62,$6C,$65,$73,$0
+L22:.dc.b $46,$6F,$72,$6D,$61,$74,$20,$64,$69,$73,$6B,$0
+L23:.dc.b $41,$73,$73,$69,$67,$6E,$6D,$65,$6E,$74,$20,$74,$61,$62,$6C,$65,$73,$0
+L24:.dc.b $44,$69,$61,$67,$6E,$6F,$73,$74,$69,$63,$73,$0
+L25:.dc.b $63,$72,$65,$61,$74,$65,$64,$20,$62,$79,$20,$42,$75,$63,$68,$6C,$61,$20,$61,$6E,$64,$20,$41,$73,$73,$6F,$63,$69,$61,$74
+.dc.b $65,$73,$20,$6F,$66,$20,$42,$65,$72,$6B,$65,$6C,$65,$79,$2C,$20,$43,$61,$6C,$69,$66,$6F,$72,$6E,$69,$61,$0
+L48:.dc.b $20,$20,$46,$41,$49,$4C,$45,$44,$20,$2D,$2D,$20,$45,$72,$72,$6F,$72,$20,$25,$64,$0
+L54:.dc.b $20,$20,$46,$41,$49,$4C,$45,$44,$20,$2D,$2D,$20,$45,$72,$72,$6F,$72,$20,$25,$64,$0
+L64:.dc.b $B0,$0
+L65:.dc.b $B0,$0
+L66:.dc.b $B0,$0
+L67:.dc.b $B0,$0
+L68:.dc.b $B0,$0
+L69:.dc.b $B0,$0
+L70:.dc.b $B0,$0
+L71:.dc.b $B0,$0
+L72:.dc.b $B0,$0
+L73:.dc.b $B0,$0
+L74:.dc.b $B0,$0
+L75:.dc.b $B0,$0
+L76:.dc.b $B0,$0
+L77:.dc.b $B0,$0
+L78:.dc.b $B0,$0
+L79:.dc.b $B0,$0
+L80:.dc.b $B0,$0
+L81:.dc.b $B0,$0
+L82:.dc.b $B0,$0
+L83:.dc.b $B0,$0
+L84:.dc.b $B0,$0
+L85:.dc.b $B0,$0
+L86:.dc.b $B0,$0
+L87:.dc.b $B0,$0
+L88:.dc.b $B0,$0
+L89:.dc.b $B0,$0
+L90:.dc.b $B0,$0
+L91:.dc.b $B0,$0
+L92:.dc.b $B0,$0
+L93:.dc.b $B0,$0
+L94:.dc.b $B0,$0
+L95:.dc.b $B0,$0
+L96:.dc.b $B0,$0
+L97:.dc.b $B0,$0
+L98:.dc.b $B0,$0
+L99:.dc.b $B0,$0
+L100:.dc.b $B0,$0
+L101:.dc.b $B0,$0
+L102:.dc.b $B0,$0
+L103:.dc.b $B0,$0
Index: alcyon/mangle.s
===================================================================
--- alcyon/mangle.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/mangle.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,60 @@
+.globl _mangle
+.text
+_mangle:
+~~mangle:
+~bitmap=R13
+~nb=R7
+~ib=R6
+link R14,#0
+movem.l R2-R7/R13-R13,-(sp)
+~bm=R5
+~rv=R4
+~bn=R3
+*line 32
+move.l 8(R14),R13
+*line 32
+move 12(R14),R7
+*line 32
+move.l 14(R14),R6
+*line 32
+move.l #$1,R5
+*line 33
+clr.l R4
+*line 35
+clr R3
+bra L4
+L5:
+*line 36
+*line 37
+*line 38
+move.l R6,R0
+and.l R5,R0
+beq L6
+*line 38
+move.l R13,R8
+move R3,R9
+add.l R9,R9
+add.l R9,R9
+add.l R9,R8
+move.l (R8),R0
+or.l R0,R4
+*line 39
+L6:
+*line 40
+asl.l #$1,R5
+L3:
+*line 35
+add #1,R3
+L4:
+*line 35
+cmp R7,R3
+blt L5
+L2:
+*line 43
+move.l R4,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R3-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/mdump.s
===================================================================
--- alcyon/mdump.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/mdump.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,213 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl ___atab
+.text
+_pipc:
+~~pipc:
+~chars=8
+~length=12
+link R14,#-6
+~i=-2
+*line 47
+clr -2(R14)
+bra L5
+L6:
+*line 48
+*line 49
+move.l 8(R14),R8
+move -2(R14),R9
+add.l R9,R8
+btst #7,(R8)
+bne L7
+move -2(R14),R8
+move.l 8(R14),R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+and #255,R0
+move R0,R8
+move.l #___atab,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+and #94,R0
+beq L7
+*line 49
+move -2(R14),R8
+move.l 8(R14),R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+move.l #L8,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 50
+bra L9
+L7:
+*line 51
+move.l #L10,(sp)
+jsr _printf
+L9:L4:
+*line 47
+add #1,-2(R14)
+L5:
+*line 47
+move -2(R14),R0
+cmp 12(R14),R0
+blt L6
+L3:L2:unlk R14
+rts
+.globl _mdump
+.text
+_mdump:
+~~mdump:
+~begin=8
+~end=12
+~start=16
+link R14,#-36
+~i=-4
+~ii=-8
+~j=-10
+~jj=-12
+~k=-14
+~c=-16
+~chars=-32
+*line 71
+clr.l -4(R14)
+*line 72
+move.l 16(R14),-8(R14)
+*line 73
+clr -10(R14)
+*line 75
+*line 76
+move.l 8(R14),R0
+cmp.l 12(R14),R0
+bhi L11
+*line 77
+*line 78
+bra L14
+L13:
+*line 79
+*line 80
+move.l 8(R14),R8
+move.b (R8),-16(R14)
+add.l #1,8(R14)
+*line 81
+*line 82
+*line 82
+move.l #$10,-(sp)
+move.l -4(R14),-(sp)
+jsr lrem
+addq.l #8,sp
+tst.l R0
+bne L15
+*line 83
+*line 84
+*line 84
+tst.l -4(R14)
+beq L16
+*line 85
+*line 86
+clr -10(R14)
+*line 87
+move.l #L17,(sp)
+jsr _printf
+*line 88
+move #16,(sp)
+move.l R14,-(sp)
+add.l #-32,(sp)
+jsr _pipc
+addq.l #4,sp
+*line 89
+*line 90
+L16:
+*line 91
+move.l -8(R14),(sp)
+move.l #L18,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 92
+*line 93
+L15:
+*line 94
+add.l #$1,-8(R14)
+*line 95
+add.l #$1,-4(R14)
+*line 96
+*line 97
+move.b -16(R14),R0
+ext.w R0
+move R0,(sp) 
+and #255,(sp)
+move.l #L19,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 98
+move.l R14,R8
+move -10(R14),R9
+add.l R9,R8
+move.b -16(R14),-32(R8)
+add #1,-10(R14)
+L14:
+*line 99
+move.l 8(R14),R0
+cmp.l 12(R14),R0
+bls L13
+L12:
+*line 101
+*line 101
+move.l #$10,-(sp)
+move.l -4(R14),-(sp)
+jsr lrem
+addq.l #8,sp
+move R0,-14(R14)
+beq L20
+*line 102
+*line 103
+move #16,R0
+sub -14(R14),R0
+move R0,-14(R14)
+*line 104
+*line 105
+clr -12(R14)
+bra L23
+L24:
+*line 106
+move.l #L25,(sp)
+jsr _printf
+L22:
+*line 105
+add #1,-12(R14)
+L23:
+*line 105
+move -14(R14),R0
+muls #3,R0
+cmp -12(R14),R0
+bgt L24
+L21:
+*line 106
+*line 107
+*line 108
+L20:
+*line 109
+move.l #L26,(sp)
+jsr _printf
+*line 110
+move #16,(sp)
+move.l R14,-(sp)
+add.l #-32,(sp)
+jsr _pipc
+addq.l #4,sp
+*line 111
+move.l #L27,(sp)
+jsr _printf
+L11:unlk R14
+rts
+.data
+L8:.dc.b $25,$63,$0
+L10:.dc.b $2E,$0
+L17:.dc.b $20,$20,$0
+L18:.dc.b $A,$25,$30,$38,$6C,$58,$3A,$0
+L19:.dc.b $20,$25,$30,$32,$2E,$32,$58,$0
+L25:.dc.b $20,$0
+L26:.dc.b $20,$20,$0
+L27:.dc.b $A,$0
Index: alcyon/memccpy.s
===================================================================
--- alcyon/memccpy.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/memccpy.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,46 @@
+.globl _memccpy
+.text
+_memccpy:
+~~memccpy:
+~s1=R13
+~s2=R12
+~c=R7
+~n=R6
+link R14,#0
+movem.l R5-R7/R12-R13,-(sp)
+*line 19
+move.l 8(R14),R13
+*line 19
+move.l 12(R14),R12
+*line 19
+move.b 17(R14),R7
+*line 19
+move 18(R14),R6
+*line 19
+bra L4
+L3:
+*line 20
+*line 21
+move.b R7,R0
+ext.w R0
+move.b (R12)+,R1
+ext.w R1
+move.b R1,(R13)+
+cmp R1,R0
+bne L5
+*line 21
+move.l R13,R0
+bra L1
+L5:L4:
+*line 22
+sub #1,R6
+bge L3
+L2:
+*line 22
+clr.l R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R6-R7/R12-R13
+unlk R14
+rts
+.data
Index: alcyon/memchr.s
===================================================================
--- alcyon/memchr.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/memchr.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,39 @@
+.globl _memchr
+.text
+_memchr:
+~~memchr:
+~sp=R13
+~c=R7
+~n=R6
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+*line 16
+move.l 8(R14),R13
+*line 16
+move.b 13(R14),R7
+*line 16
+move 14(R14),R6
+*line 16
+bra L4
+L3:
+*line 17
+*line 18
+cmp.b (R13)+,R7
+bne L5
+*line 18
+sub.l #1,R13
+move.l R13,R0
+bra L1
+L5:L4:
+*line 19
+sub #1,R6
+bge L3
+L2:
+*line 19
+clr.l R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/memcmp.s
===================================================================
--- alcyon/memcmp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/memcmp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,47 @@
+.globl _memcmp
+.text
+_memcmp:
+~~memcmp:
+~s1=R13
+~s2=R12
+~n=R7
+link R14,#0
+movem.l R5-R7/R12-R13,-(sp)
+~diff=R6
+*line 17
+move.l 8(R14),R13
+*line 17
+move.l 12(R14),R12
+*line 17
+move 16(R14),R7
+*line 17
+*line 18
+cmp.l R12,R13
+beq L2
+*line 18
+bra L5
+L4:
+*line 19
+*line 20
+move.b (R13)+,R6
+ext.w R6
+move.b (R12)+,R0
+ext.w R0
+sub R0,R6
+beq L6
+*line 20
+move R6,R0
+bra L1
+L6:L5:
+*line 21
+sub #1,R7
+bge L4
+L3:L2:
+*line 21
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R6-R7/R12-R13
+unlk R14
+rts
+.data
Index: alcyon/memcmpu.s
===================================================================
--- alcyon/memcmpu.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/memcmpu.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,92 @@
+.globl ___atab
+.globl _memcmpu
+.text
+_memcmpu:
+~~memcmpu:
+~s1=R13
+~s2=R12
+~n=16
+link R14,#0
+movem.l R5-R7/R12-R13,-(sp)
+~c1=R7
+~c2=R6
+*line 17
+move.l 8(R14),R13
+*line 17
+move.l 12(R14),R12
+*line 17
+bra L4
+L3:
+*line 18
+*line 19
+move.b (R13)+,R7
+*line 20
+move.b (R12)+,R6
+*line 21
+*line 22
+*line 23
+move.b R7,R0
+ext.w R0
+and #-128,R0
+bne L5
+move.b R7,R0
+ext.w R0
+ext.l R0
+add.l #___atab,R0
+move.l R0,R8
+btst #4,(R8)
+beq L5
+*line 23
+add.b #-32,R7
+*line 24
+L5:
+*line 25
+*line 26
+move.b R6,R0
+ext.w R0
+and #-128,R0
+bne L6
+move.b R6,R0
+ext.w R0
+ext.l R0
+add.l #___atab,R0
+move.l R0,R8
+btst #4,(R8)
+beq L6
+*line 26
+add.b #-32,R6
+*line 27
+L6:
+*line 28
+*line 29
+cmp.b R6,R7
+bge L7
+*line 29
+move #-1,R0
+bra L1
+*line 30
+L7:
+*line 31
+*line 32
+cmp.b R6,R7
+ble L8
+*line 32
+move #1,R0
+bra L1
+*line 33
+L8:
+*line 34
+sub #1,16(R14)
+L4:
+*line 35
+tst 16(R14)
+bne L3
+L2:
+*line 37
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R6-R7/R12-R13
+unlk R14
+rts
+.data
Index: alcyon/memcpy.s
===================================================================
--- alcyon/memcpy.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/memcpy.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,36 @@
+.globl _memcpy
+.text
+_memcpy:
+~~memcpy:
+~s1=R13
+~s2=R12
+~n=R7
+link R14,#0
+movem.l R6-R7/R11-R13,-(sp)
+~os1=R11
+*line 16
+move.l R13,R11
+*line 18
+move.l 8(R14),R13
+*line 18
+move.l 12(R14),R12
+*line 18
+move 16(R14),R7
+*line 18
+bra L4
+L3:
+*line 19
+move.b (R12)+,(R13)+
+L4:
+*line 19
+sub #1,R7
+bge L3
+L2:
+*line 20
+move.l R11,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R11-R13
+unlk R14
+rts
+.data
Index: alcyon/memcpyw.s
===================================================================
--- alcyon/memcpyw.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/memcpyw.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,36 @@
+.globl _memcpyw
+.text
+_memcpyw:
+~~memcpyw:
+~s1=R13
+~s2=R12
+~n=R7
+link R14,#0
+movem.l R6-R7/R11-R13,-(sp)
+~os1=R11
+*line 16
+move.l R13,R11
+*line 18
+move.l 8(R14),R13
+*line 18
+move.l 12(R14),R12
+*line 18
+move 16(R14),R7
+*line 18
+bra L4
+L3:
+*line 19
+move (R12)+,(R13)+
+L4:
+*line 19
+sub #1,R7
+bge L3
+L2:
+*line 20
+move.l R11,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R11-R13
+unlk R14
+rts
+.data
Index: alcyon/memset.s
===================================================================
--- alcyon/memset.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/memset.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,36 @@
+.globl _memset
+.text
+_memset:
+~~memset:
+~sp=R13
+~c=R7
+~n=R6
+link R14,#0
+movem.l R5-R7/R12-R13,-(sp)
+~sp0=R12
+*line 16
+move.l R13,R12
+*line 18
+move.l 8(R14),R13
+*line 18
+move.b 13(R14),R7
+*line 18
+move 14(R14),R6
+*line 18
+bra L4
+L3:
+*line 19
+move.b R7,(R13)+
+L4:
+*line 19
+sub #1,R6
+bge L3
+L2:
+*line 21
+move.l R12,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R6-R7/R12-R13
+unlk R14
+rts
+.data
Index: alcyon/memsetw.s
===================================================================
--- alcyon/memsetw.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/memsetw.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,36 @@
+.globl _memsetw
+.text
+_memsetw:
+~~memsetw:
+~sp=R13
+~w=R7
+~n=R6
+link R14,#0
+movem.l R5-R7/R12-R13,-(sp)
+~sp0=R12
+*line 15
+move.l R13,R12
+*line 17
+move.l 8(R14),R13
+*line 17
+move 12(R14),R7
+*line 17
+move 14(R14),R6
+*line 17
+bra L4
+L3:
+*line 18
+move R7,(R13)+
+L4:
+*line 18
+sub #1,R6
+bge L3
+L2:
+*line 20
+move.l R12,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R6-R7/R12-R13
+unlk R14
+rts
+.data
Index: alcyon/micons.s
===================================================================
--- alcyon/micons.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/micons.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,88 @@
+.globl _micons
+.text
+_micons:
+~~micons:
+~wi=8
+link R14,#-4
+*line 40
+move 8(R14),R0
+asl #8,R0
+and #-256,R0
+move 8(R14),R1
+asr #8,R1
+and #255,R1
+or R1,R0
+bra L1
+L1:unlk R14
+rts
+.globl _miconi
+.text
+_miconi:
+~~miconi:
+~wi=8
+link R14,#-4
+*line 53
+*line 54
+bra L3
+*line 55
+move 8(R14),R0
+move #24,R1
+asl R1,R0
+clr R0
+move 8(R14),R1
+asl #8,R1
+clr R1
+or R1,R0
+move 8(R14),R1
+asr #8,R1
+and #-256,R1
+or R1,R0
+move 8(R14),R1
+move #24,R2
+asr R2,R1
+and #255,R1
+or R1,R0
+bra L2
+*line 56
+bra L4
+L3:
+*line 57
+move 8(R14),R0
+asl #8,R0
+and #-256,R0
+move 8(R14),R1
+asr #8,R1
+and #255,R1
+or R1,R0
+bra L2
+L4:L2:unlk R14
+rts
+.globl _miconl
+.text
+_miconl:
+~~miconl:
+~wi=8
+link R14,#-4
+*line 70
+*line 71
+move.l 8(R14),R0
+move.l #$18,R1
+asl.l R1,R0
+and.l #$ff000000,R0
+move.l 8(R14),R1
+asl.l #$8,R1
+and.l #$ff0000,R1
+or.l R1,R0
+move.l 8(R14),R1
+asr.l #$8,R1
+and.l #$ff00,R1
+or.l R1,R0
+move.l 8(R14),R1
+move.l #$18,R2
+asr.l R2,R1
+and.l #$ff,R1
+or.l R1,R0
+bra L5
+L5:unlk R14
+rts
+.data
Index: alcyon/midas.s
===================================================================
--- alcyon/midas.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/midas.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,462 @@
+.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 _foot1
+.globl _foot2
+.globl _pulse1
+.globl _pulse2
+.globl _end
+.globl _etext
+.globl _edata
+.globl _clkrun
+.globl _clksrc
+.globl _initcfg
+.globl _ndisp
+.globl _verbose
+.globl _lcdontm
+.globl _lcdtime
+.globl _fp_resv
+.globl _script0
+.globl _VerDate
+.globl _ptefifo
+.globl _m7verms
+.comm _m7verms,32
+.globl _clkdiv
+.comm _clkdiv,2
+.globl _dopls1
+.text
+_dopls1:
+~~dopls1:
+link R14,#-4
+*line 61
+move #4480,(sp)
+move.l #_ptefifo,-(sp)
+jsr _putwq
+addq.l #4,sp
+*line 63
+*line 64
+tst _clkrun
+beq L1
+*line 65
+*line 66
+*line 66
+cmp #3,_clksrc
+bne L2
+*line 67
+*line 68
+add.l #$2,_fc_val
+*line 69
+*line 70
+*line 71
+move.l _fc_val,R0
+cmp.l #$ffffff,R0
+ble L3
+*line 71
+move.l #$ffffff,_fc_val
+*line 72
+L3:bra L4
+L2:
+*line 73
+*line 73
+cmp #4,_clksrc
+bne L5
+*line 74
+*line 75
+add.l #$1,_fc_val
+*line 76
+*line 77
+*line 78
+move.l _fc_val,R0
+cmp.l #$ffffff,R0
+ble L6
+*line 78
+move.l #$ffffff,_fc_val
+*line 79
+L6:bra L7
+L5:
+*line 80
+*line 80
+cmp #5,_clksrc
+bne L8
+*line 81
+*line 82
+*line 82
+move _clkdiv,R0
+add #1,_clkdiv
+tst R0
+beq L9
+*line 83
+*line 84
+clr _clkdiv
+*line 85
+add.l #$1,_fc_val
+*line 86
+*line 87
+*line 88
+move.l _fc_val,R0
+cmp.l #$ffffff,R0
+ble L10
+*line 88
+move.l #$ffffff,_fc_val
+L10:
+*line 89
+L9:
+*line 90
+L8:L7:L4:L1:unlk R14
+rts
+.globl _dopls2
+.text
+_dopls2:
+~~dopls2:
+link R14,#-4
+*line 101
+move #4481,(sp)
+move.l #_ptefifo,-(sp)
+jsr _putwq
+addq.l #4,sp
+L11:unlk R14
+rts
+.globl _mpcupd
+.text
+_mpcupd:
+~~mpcupd:
+link R14,#-4
+*line 115
+move _ndisp,R0
+bra L14
+*line 116
+L15:
+*line 117
+*line 118
+bra L13
+*line 119
+*line 120
+L16:
+*line 121
+*line 122
+bra L13
+*line 123
+*line 124
+L17:
+*line 125
+*line 126
+*line 127
+jsr _sdwins
+bra L13
+*line 128
+*line 129
+L18:
+*line 130
+*line 131
+bra L13
+*line 132
+*line 133
+L19:
+*line 134
+*line 135
+*line 136
+jsr _setinst
+*line 137
+jsr _allwins
+bra L13
+*line 138
+*line 139
+L20:
+*line 140
+*line 141
+bra L13
+*line 142
+*line 143
+L21:
+*line 144
+*line 145
+*line 146
+jsr _newws
+*line 147
+jsr _wwins
+bra L13
+*line 148
+*line 149
+L22:
+*line 150
+*line 151
+bra L13
+*line 152
+*line 153
+L23:
+*line 154
+*line 155
+*line 156
+jsr _twins
+bra L13
+*line 157
+*line 158
+L24:
+*line 159
+*line 160
+bra L13
+*line 161
+*line 162
+L25:
+*line 163
+*line 164
+*line 165
+jsr _awins
+bra L13
+*line 166
+bra L13
+L14:cmp #10,R0
+bhi L13
+asl #2,R0
+move R0,R8
+add.l #L26,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L26:.dc.l L15
+.dc.l L16
+.dc.l L17
+.dc.l L18
+.dc.l L19
+.dc.l L20
+.dc.l L21
+.dc.l L22
+.dc.l L23
+.dc.l L24
+.dc.l L25
+.text
+L13:L12:unlk R14
+rts
+.globl _main
+.text
+_main:
+~~main:
+link R14,#-4
+*line 181
+move #2,(sp)
+jsr _setipl
+*line 185
+move.l #_fpuint,(sp)
+move #26,-(sp)
+move #5,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 187
+clr _initcfg
+*line 188
+move #-32000,_fp_resv
+*line 190
+jsr _fpuclr
+*line 192
+jsr _tsetup
+*line 193
+jsr _setsio
+*line 195
+move.l #_clk_ped,_foot1
+*line 196
+move.l #_pch_ped,_foot2
+*line 198
+move.l #_dopls1,_pulse1
+*line 199
+move.l #_dopls2,_pulse2
+*line 201
+move.l #$2ee00,_lcdontm
+*line 202
+jsr _lcd_on
+*line 204
+move.l #2+_VerDate,(sp)
+move.l #_m7verms,-(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 206
+jsr _im700
+*line 207
+jsr _settune
+*line 209
+move #-1,_ndisp
+*line 210
+clr _verbose
+*line 211
+move.l #_script0,(sp)
+jsr _rscript
+*line 212
+clr.l (sp)
+jsr _sc_goto
+*line 214
+jsr _MouseWK
+bra L28
+L29:
+*line 221
+*line 222
+*line 223
+jsr _msl
+L28:
+*line 225
+*line 226
+*line 230
+*line 231
+*line 232
+jsr _m7menu
+*line 233
+jsr _msl
+*line 240
+move _ndisp,R0
+bra L31
+*line 241
+L32:
+*line 242
+*line 243
+*line 244
+jsr _ldfield
+*line 245
+jsr _libdsp
+bra L30
+*line 246
+*line 247
+L33:
+*line 248
+*line 249
+*line 250
+jsr _ptfield
+*line 251
+jsr _ptdisp
+bra L30
+*line 252
+*line 253
+L34:
+*line 254
+*line 255
+*line 256
+jsr _scfield
+*line 257
+jsr _sdsetup
+bra L30
+*line 258
+*line 259
+L35:
+*line 260
+*line 261
+*line 262
+jsr _sqfield
+*line 263
+jsr _sqdisp
+bra L30
+*line 264
+*line 265
+*line 266
+L36:
+*line 267
+*line 268
+*line 269
+jsr _idfield
+*line 270
+jsr _instdsp
+bra L30
+*line 271
+*line 272
+L37:
+*line 273
+*line 274
+*line 275
+jsr _wdfield
+*line 276
+jsr _wsdsp
+bra L30
+*line 277
+*line 278
+L38:
+*line 279
+*line 280
+*line 281
+jsr _tdfield
+*line 282
+jsr _tundsp
+bra L30
+*line 283
+*line 284
+L39:
+*line 285
+*line 286
+*line 287
+jsr _adfield
+*line 288
+jsr _asgdsp
+bra L30
+*line 289
+*line 290
+L40:
+*line 291
+*line 292
+*line 293
+jsr _scopeon
+bra L30
+*line 294
+*line 295
+L41:
+*line 296
+*line 297
+*line 301
+*line 302
+*line 303
+move #-1,_ndisp
+bra L28
+*line 304
+bra L30
+L31:cmp #11,R0
+bhi L41
+asl #2,R0
+move R0,R8
+add.l #L42,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L42:.dc.l L32
+.dc.l L33
+.dc.l L34
+.dc.l L35
+.dc.l L36
+.dc.l L41
+.dc.l L37
+.dc.l L41
+.dc.l L38
+.dc.l L41
+.dc.l L39
+.dc.l L40
+.text
+L30:bra L29
+L27:unlk R14
+rts
+.data
Index: alcyon/msl.s
===================================================================
--- alcyon/msl.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/msl.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,2072 @@
+.globl _lcdx
+.globl _lcdy
+.globl _lcdbit
+.globl _lcdrow
+.globl _lcdcol
+.globl _lcdbase
+.globl _lcdctl1
+.globl _lcdctl2
+.globl _v_obtab
+.globl _v_curob
+.globl _v_nobj
+.globl _v_obpri
+.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 _QQsw
+.globl _QQanch
+.globl _QQin
+.globl _QQip
+.globl _QQop
+.globl _QQnum
+.globl _QQlnum
+.globl _QQchr
+.globl _QQdig
+.globl _QQstr
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _stmptr
+.globl _defptr
+.globl _patches
+.globl _defents
+.globl _seqtab
+.globl _seqflag
+.globl _seqline
+.globl _seqstim
+.globl _seqtime
+.globl _sregval
+.globl _trstate
+.globl _timers
+.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 _cx_key
+.globl _cy_key
+.globl _d_key
+.globl _e_key
+.globl _m_key
+.globl _x_key
+.globl _swpt
+.globl _aflag
+.globl _amplval
+.globl _ancmsw
+.globl _angroup
+.globl _asig
+.globl _astat
+.globl _aval
+.globl _clkctl
+.globl _clkrun
+.globl _ctrsw
+.globl _cxrate
+.globl _cxval
+.globl _cyrate
+.globl _cyval
+.globl _dsp_ok
+.globl _editss
+.globl _editsw
+.globl _lampsw
+.globl _ndisp
+.globl _nxtflag
+.globl _pchsw
+.globl _recsw
+.globl _runit
+.globl _swback
+.globl _swctrl
+.globl _swdelta
+.globl _swdir
+.globl _swfiin
+.globl _swflag
+.globl _swlast
+.globl _swndx
+.globl _swstop
+.globl _swthr
+.globl _swtime
+.globl _swwait
+.globl _sd
+.globl _se
+.globl _stcrow
+.globl _stccol
+.globl _tglclk
+.globl _tglpch
+.globl _timemlt
+.globl _tmpomlt
+.globl _tmpoval
+.globl _tuneval
+.globl _vtpcol
+.globl _vtprow
+.globl _obj8
+.globl _afi
+.globl _lcdtime
+.globl _swcount
+.globl _swrate
+.globl _swrmin
+.globl _swtemp
+.globl _grpmode
+.globl _grpstat
+.globl _prstab
+.globl _simled
+.globl _swfifo
+.globl _tmultab
+.globl _vce2trg
+.globl _veltab
+.globl _trgtab
+.globl _grp2prt
+.globl _sigtab
+.globl _varmode
+.globl _gdstbc
+.globl _ptefifo
+.globl _fifoval
+.comm _fifoval,2
+.globl _clk_ped
+.text
+_clk_ped:
+~~clk_ped:
+~stat=8
+link R14,#-4
+*line 159
+*line 160
+tst 8(R14)
+beq L2
+*line 160
+move #1,_tglclk
+L2:L1:unlk R14
+rts
+.globl _pch_ped
+.text
+_pch_ped:
+~~pch_ped:
+~stat=8
+link R14,#-4
+*line 172
+*line 173
+tst 8(R14)
+beq L4
+tst _pchsw
+beq L4
+*line 173
+move #1,_tglpch
+L4:L3:unlk R14
+rts
+.globl _msl
+.text
+_msl:
+~~msl:
+link R14,#-30
+movem.l R3-R7/R11-R13,-(sp)
+~ioadr=R13
+~fpu=R12
+~ep=R11
+~i=R7
+~ti=R6
+~val=R5
+~rt=R4
+~chan=-2
+~crel=-4
+~oldsr=-6
+~port=-8
+~trg=-10
+~trig=-12
+~vel=-14
+~cxprev=-16
+~cyprev=-18
+~esi=-20
+~newsig=-22
+~oldclk=-24
+~oldrec=-26
+~fctemp=-30
+*line 201
+move #1,_runit
+*line 203
+bra L8
+L7:
+*line 204
+*line 205
+move #1,_dsp_ok
+*line 206
+*line 207
+move.l #2+_io_ser,R13
+*line 208
+move.b (R13),R0
+ext.w R0
+and #8,R0
+move R0,-20(R14)
+*line 209
+*line 210
+*line 210
+move _editss,R0
+cmp -20(R14),R0
+beq L9
+*line 211
+*line 212
+move -20(R14),_editss
+*line 213
+*line 214
+*line 215
+tst _editss
+beq L10
+*line 215
+tst _editsw
+beq L10000
+clr R0
+bra L10001
+L10000:move #1,R0
+L10001:move R0,_editsw
+L10:
+*line 216
+*line 217
+L9:
+*line 218
+*line 219
+tst _editsw
+beq L11
+*line 219
+move.b #158,_io_leds
+*line 220
+bra L12
+L11:
+*line 221
+move.b #30,_io_leds
+L12:
+*line 222
+*line 223
+*line 223
+tst _lampsw
+bne L13
+tst.l _lcdtime
+beq L13
+*line 224
+*line 225
+*line 226
+sub.l #$1,_lcdtime
+bne L14
+*line 226
+move.b #31,_io_leds
+L14:
+*line 227
+*line 228
+L13:
+*line 229
+jsr _msm
+*line 230
+*line 231
+*line 232
+*line 233
+*line 233
+tst _tglclk
+beq L15
+*line 234
+*line 235
+move #9984,(sp)
+jsr _setsr
+move R0,-6(R14)
+*line 236
+clr _tglclk
+*line 237
+move -6(R14),(sp)
+jsr _setsr
+*line 238
+*line 239
+tst _clkrun
+beq L10002
+clr (sp)
+bra L10003
+L10002:move #1,(sp)
+L10003:jsr _clkset
+*line 240
+jsr _dclkmd
+*line 241
+*line 242
+L15:
+*line 243
+*line 243
+tst _tglpch
+beq L16
+*line 244
+*line 245
+move #9984,(sp)
+jsr _setsr
+move R0,-6(R14)
+*line 246
+clr _tglpch
+*line 247
+move -6(R14),(sp)
+jsr _setsr
+*line 248
+*line 249
+*line 250
+cmp #2,_ndisp
+bne L17
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L17
+*line 250
+clr (sp)
+jsr _vbank
+*line 251
+L17:
+*line 252
+clr R7
+bra L20
+L21:
+*line 253
+*line 254
+*line 254
+move R7,R8
+add.l R8,R8
+add.l #_grpmode,R8
+cmp #1,(R8)
+bne L22
+*line 255
+*line 256
+move R7,R8
+add.l R8,R8
+add.l #_grpmode,R8
+move #2,(R8)
+*line 257
+*line 258
+*line 259
+cmp #2,_ndisp
+bne L23
+*line 260
+move R7,R8
+add.l R8,R8
+move.l #_grpmode,R9
+move 0(R8,R9.l),R8
+add.l R8,R8
+move.l #_simled,R9
+move 0(R8,R9.l),(sp)
+move #42,-(sp)
+move R7,R0
+muls #5,R0
+move R0,-(sp)
+add #6,(sp)
+move #2,-(sp)
+move.l _obj8,-(sp)
+jsr _vputc
+adda.l #10,sp
+*line 261
+L23:bra L24
+L22:
+*line 262
+*line 262
+move R7,R8
+add.l R8,R8
+add.l #_grpmode,R8
+cmp #2,(R8)
+bne L25
+*line 263
+*line 264
+move R7,R8
+add.l R8,R8
+add.l #_grpmode,R8
+clr (R8)
+*line 265
+*line 266
+*line 267
+cmp #2,_ndisp
+bne L26
+*line 268
+move R7,R8
+add.l R8,R8
+move.l #_grpmode,R9
+move 0(R8,R9.l),R8
+add.l R8,R8
+move.l #_simled,R9
+move 0(R8,R9.l),(sp)
+move #42,-(sp)
+move R7,R0
+muls #5,R0
+move R0,-(sp)
+add #6,(sp)
+move #2,-(sp)
+move.l _obj8,-(sp)
+jsr _vputc
+adda.l #10,sp
+L26:
+*line 269
+L25:L24:L19:
+*line 252
+add #1,R7
+L20:
+*line 252
+cmp #12,R7
+blt L21
+L18:
+*line 270
+*line 271
+*line 272
+*line 273
+*line 274
+*line 275
+*line 276
+L16:
+*line 277
+*line 277
+move.l #_fifoval,(sp)
+move.l #_ptefifo,-(sp)
+jsr _getwq
+addq.l #4,sp
+tst R0
+blt L27
+*line 278
+*line 279
+clr R0
+move _fifoval,R0
+and #-32768,R0
+move R0,-4(R14)
+*line 280
+*line 281
+clr R0
+move _fifoval,R0
+and #8191,R0
+move R0,-10(R14)
+*line 282
+clr R0
+move _fifoval,R0
+move #11,R1
+lsr R1,R0
+and #3,R0
+move R0,-8(R14)
+*line 283
+clr R0
+move _fifoval,R0
+lsr #7,R0
+and #15,R0
+move R0,-2(R14)
+*line 284
+clr R0
+move _fifoval,R0
+and #127,R0
+move R0,-12(R14)
+*line 285
+*line 286
+move #16128,R0
+move R0,-14(R14)
+clr R1
+move -10(R14),R1
+lsl #1,R1
+swap R1
+clr R1
+swap R1
+add.l #_veltab,R1
+move.l R1,R9
+move R0,(R9)
+*line 287
+clr R0
+move -10(R14),R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_prstab,R0
+move.l R0,R8
+clr (R8)
+*line 288
+*line 289
+*line 289
+tst -4(R14)
+beq L28
+*line 290
+*line 291
+move.l #_trgtab,R8
+clr.l R9
+move -10(R14),R9
+add.l R9,R8
+and.b #-2,(R8)
+*line 292
+*line 293
+clr R7
+bra L31
+L32:
+*line 294
+*line 295
+*line 295
+move R7,R8
+add.l R8,R8
+move.l #_vce2trg,R9
+move 0(R8,R9.l),R0
+cmp -10(R14),R0
+bne L33
+*line 296
+*line 297
+move R7,R8
+add.l R8,R8
+add.l #_vce2trg,R8
+move #-1,(R8)
+*line 298
+move -10(R14),(sp)
+jsr _procpfl
+*line 299
+*line 300
+L33:L30:
+*line 293
+add #1,R7
+L31:
+*line 293
+cmp #12,R7
+blt L32
+L29:
+*line 301
+*line 302
+*line 303
+move _fifoval,(sp)
+jsr _stmproc
+*line 304
+bra L34
+L28:
+*line 305
+*line 306
+*line 307
+move.l #_trgtab,R8
+clr.l R9
+move -10(R14),R9
+add.l R9,R8
+or.b #1,(R8)
+*line 308
+*line 309
+move _fifoval,(sp)
+jsr _stmproc
+*line 310
+*line 311
+clr R7
+bra L37
+L38:
+*line 312
+*line 313
+*line 314
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_grp2prt,R9
+move 0(R8,R9.l),R0
+clr R1
+move -8(R14),R1
+add #1,R1
+cmp R1,R0
+bne L39
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_grp2prt,R9
+move 2(R8,R9.l),R0
+clr R1
+move -2(R14),R1
+add #1,R1
+cmp R1,R0
+bne L39
+*line 314
+move -14(R14),(sp)
+move -12(R14),-(sp)
+move -2(R14),-(sp)
+move -8(R14),-(sp)
+move R7,-(sp)
+jsr _asgvce
+addq.l #8,sp
+L39:L36:
+*line 311
+add #1,R7
+L37:
+*line 311
+cmp #12,R7
+blt L38
+L35:L34:
+*line 315
+*line 316
+*line 317
+*line 318
+L27:
+*line 319
+*line 319
+move #8,(sp)
+jsr _trap14
+move.l R0,_afi
+cmp.l #$ffffffff,R0
+beq L40
+*line 320
+*line 321
+move.l _afi,R0
+asr.l #$8,R0
+and.l #$7f,R0
+move R0,_asig
+*line 322
+move.l _afi,R0
+asr.l #$7,R0
+and.l #$1,R0
+move R0,_astat
+*line 323
+move.l _afi,R0
+and.l #$7f,R0
+move R0,_aval
+*line 324
+*line 325
+*line 325
+tst _asig
+beq L41
+*line 326
+*line 327
+move #1,_aflag
+*line 328
+tst _astat
+beq L10005
+move _asig,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_sigtab,R9
+tst 2(R8,R9.l)
+beq L10004
+L10005:clr R0
+bra L10006
+L10004:move #1,R0
+L10006:move R0,-22(R14)
+*line 329
+*line 330
+move _asig,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_sigtab,R8
+move _aval,(R8)
+*line 331
+move _asig,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_sigtab,R8
+move _astat,2(R8)
+*line 332
+bra L42
+L41:
+*line 333
+*line 334
+*line 335
+clr _aflag
+*line 336
+clr -22(R14)
+*line 337
+*line 338
+clr R7
+bra L45
+L46:
+*line 339
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_sigtab,R8
+clr 2(R8)
+L44:
+*line 338
+add #1,R7
+L45:
+*line 338
+cmp #128,R7
+blt L46
+L43:
+*line 339
+L42:
+*line 340
+*line 341
+*line 342
+*line 343
+*line 344
+*line 344
+tst _aflag
+beq L47
+*line 345
+*line 346
+*line 346
+cmp #1,_asig
+blt L48
+cmp #24,_asig
+bgt L48
+*line 347
+*line 348
+*line 349
+*line 350
+move _asig,(sp)
+jsr _localkb
+*line 351
+bra L49
+L48:
+*line 352
+*line 352
+cmp #25,_asig
+blt L50
+cmp #38,_asig
+bgt L50
+*line 353
+*line 354
+*line 355
+tst _astat
+beq L51
+*line 355
+jsr _lcd_on
+*line 356
+L51:
+*line 357
+*line 358
+tst -22(R14)
+bne L52
+*line 358
+jsr _doslide
+*line 359
+L52:bra L53
+L50:
+*line 360
+*line 360
+cmp #39,_asig
+blt L54
+cmp #52,_asig
+bgt L54
+*line 361
+*line 362
+*line 363
+tst _astat
+beq L55
+*line 363
+jsr _lcd_on
+*line 364
+L55:
+*line 365
+move _asig,-(sp)
+add #-39,(sp)
+move _astat,-(sp)
+move.l _swpt,R8
+move _asig,R9
+add #-39,R9
+add.l R9,R9
+add.l R9,R9
+move.l 0(R8,R9.l),R8
+jsr (R8)
+addq.l #4,sp
+*line 366
+bra L56
+L54:
+*line 367
+*line 367
+cmp #60,_asig
+blt L57
+cmp #69,_asig
+bgt L57
+*line 368
+*line 369
+move _asig,-(sp)
+add #-60,(sp)
+move.l _d_key,R8
+jsr (R8)
+addq.l #2,sp
+*line 370
+*line 371
+*line 372
+bra L58
+L57:
+*line 373
+move _asig,R0
+bra L60
+*line 374
+L61:
+*line 375
+*line 376
+*line 377
+move _aval,R5
+muls #252,R5
+and #32736,R5
+*line 378
+*line 379
+clr R7
+bra L64
+L65:
+*line 380
+*line 381
+*line 381
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_grp2prt,R8
+cmp #3,(R8)
+bne L66
+*line 382
+*line 383
+*line 383
+move R5,(sp)
+move #11,-(sp)
+move R7,-(sp)
+jsr _newsv
+addq.l #4,sp
+tst R0
+beq L67
+*line 384
+*line 385
+*line 386
+tst _recsw
+beq L68
+move R7,R8
+add.l R8,R8
+move.l #_grpstat,R9
+tst 0(R8,R9.l)
+beq L68
+tst _ancmsw
+beq L10007
+move R7,R8
+add.l R8,R8
+move.l #_varmode,R9
+move 0(R8,R9.l),R0
+bra L10009
+L10007:move R7,R8
+add.l R8,R8
+move.l #_grpmode,R9
+move 0(R8,R9.l),R0
+L10009:cmp #2,R0
+bne L68
+*line 387
+*line 388
+*line 388
+move #6,(sp)
+jsr _e_alc
+move.l R0,R11
+move.l R11,R0
+beq L69
+*line 389
+*line 390
+move.l _t_cur,(R11)
+*line 391
+move.b #14,5(R11)
+*line 392
+move.b R7,6(R11)
+*line 393
+move R5,R0
+ext.l R0
+move.l #$10,R1
+asl.l R1,R0
+move.l R0,16(R11)
+*line 394
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R11,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 395
+move #1,_ctrsw
+*line 396
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R11,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 397
+clr _ctrsw
+*line 398
+*line 399
+L69:bra L70
+L68:
+*line 400
+*line 400
+move _angroup,R0
+sub #1,R0
+cmp R0,R7
+bne L71
+*line 401
+*line 402
+clr (sp)
+jsr _dsanval
+*line 403
+L71:L70:
+*line 404
+L67:
+*line 405
+L66:L63:
+*line 379
+add #1,R7
+L64:
+*line 379
+cmp #12,R7
+blt L65
+L62:
+*line 406
+*line 407
+bra L59
+*line 408
+*line 409
+*line 410
+L72:
+*line 411
+*line 412
+*line 413
+move _aval,R5
+muls #252,R5
+and #32736,R5
+*line 414
+*line 415
+clr R7
+bra L75
+L76:
+*line 416
+*line 417
+*line 417
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_grp2prt,R8
+cmp #3,(R8)
+bne L77
+*line 418
+*line 419
+*line 419
+move R5,(sp)
+move #12,-(sp)
+move R7,-(sp)
+jsr _newsv
+addq.l #4,sp
+tst R0
+beq L78
+*line 420
+*line 421
+*line 422
+tst _recsw
+beq L79
+move R7,R8
+add.l R8,R8
+move.l #_grpstat,R9
+tst 0(R8,R9.l)
+beq L79
+tst _ancmsw
+beq L10010
+move R7,R8
+add.l R8,R8
+move.l #_varmode,R9
+move 32(R8,R9.l),R0
+bra L10012
+L10010:move R7,R8
+add.l R8,R8
+move.l #_grpmode,R9
+move 0(R8,R9.l),R0
+L10012:cmp #2,R0
+bne L79
+*line 423
+*line 424
+*line 424
+move #6,(sp)
+jsr _e_alc
+move.l R0,R11
+move.l R11,R0
+beq L80
+*line 425
+*line 426
+move.l _t_cur,(R11)
+*line 427
+move.b #14,5(R11)
+*line 428
+move R7,R0
+or #16,R0
+move.b R0,6(R11)
+*line 429
+move R5,R0
+ext.l R0
+move.l #$10,R1
+asl.l R1,R0
+move.l R0,16(R11)
+*line 430
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R11,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 431
+move #1,_ctrsw
+*line 432
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R11,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 433
+clr _ctrsw
+*line 434
+*line 435
+L80:bra L81
+L79:
+*line 436
+*line 436
+move _angroup,R0
+sub #1,R0
+cmp R0,R7
+bne L82
+*line 437
+*line 438
+move #1,(sp)
+jsr _dsanval
+*line 439
+L82:L81:
+*line 440
+L78:
+*line 441
+L77:L74:
+*line 415
+add #1,R7
+L75:
+*line 415
+cmp #12,R7
+blt L76
+L73:
+*line 442
+*line 443
+bra L59
+*line 444
+*line 445
+L83:
+*line 446
+*line 447
+*line 448
+move.l _cx_key,R8
+jsr (R8)
+bra L59
+*line 449
+L84:
+*line 450
+*line 451
+*line 452
+move.l _cy_key,R8
+jsr (R8)
+bra L59
+*line 453
+*line 454
+L85:
+*line 455
+*line 456
+*line 457
+move _aval,R5
+muls #252,R5
+and #32736,R5
+*line 458
+*line 459
+clr R7
+bra L88
+L89:
+*line 460
+*line 461
+*line 461
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_grp2prt,R8
+cmp #3,(R8)
+bne L90
+*line 462
+*line 463
+*line 463
+move R5,(sp)
+move #13,-(sp)
+move R7,-(sp)
+jsr _newsv
+addq.l #4,sp
+tst R0
+beq L91
+*line 464
+*line 465
+*line 466
+tst _recsw
+beq L92
+move R7,R8
+add.l R8,R8
+move.l #_grpstat,R9
+tst 0(R8,R9.l)
+beq L92
+tst _ancmsw
+beq L10013
+move R7,R8
+add.l R8,R8
+move.l #_varmode,R9
+move 64(R8,R9.l),R0
+bra L10015
+L10013:move R7,R8
+add.l R8,R8
+move.l #_grpmode,R9
+move 0(R8,R9.l),R0
+L10015:cmp #2,R0
+bne L92
+*line 467
+*line 468
+*line 468
+move #6,(sp)
+jsr _e_alc
+move.l R0,R11
+move.l R11,R0
+beq L93
+*line 469
+*line 470
+move.l _t_cur,(R11)
+*line 471
+move.b #14,5(R11)
+*line 472
+move R7,R0
+or #32,R0
+move.b R0,6(R11)
+*line 473
+move R5,R0
+ext.l R0
+move.l #$10,R1
+asl.l R1,R0
+move.l R0,16(R11)
+*line 474
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R11,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 475
+move #1,_ctrsw
+*line 476
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R11,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 477
+clr _ctrsw
+*line 478
+*line 479
+L93:bra L94
+L92:
+*line 480
+*line 480
+move _angroup,R0
+sub #1,R0
+cmp R0,R7
+bne L95
+*line 481
+*line 482
+move #2,(sp)
+jsr _dsanval
+*line 483
+L95:L94:
+*line 484
+L91:
+*line 485
+L90:L87:
+*line 459
+add #1,R7
+L88:
+*line 459
+cmp #12,R7
+blt L89
+L86:
+*line 486
+*line 487
+bra L59
+*line 488
+*line 489
+*line 490
+*line 491
+L96:
+*line 492
+*line 493
+*line 494
+jsr _wheel
+bra L59
+*line 495
+L97:
+*line 496
+*line 497
+*line 498
+move.l _x_key,R8
+jsr (R8)
+bra L59
+*line 499
+L98:
+*line 500
+*line 501
+*line 506
+*line 507
+move.l _e_key,R8
+jsr (R8)
+*line 508
+*line 513
+*line 514
+bra L59
+*line 515
+*line 516
+L99:
+*line 517
+*line 518
+*line 519
+move.l _m_key,R8
+jsr (R8)
+bra L59
+*line 520
+L100:
+*line 521
+*line 522
+*line 523
+*line 524
+cmp #50,_aval
+ble L101
+*line 524
+*line 525
+cmp #53,_aval
+bge L102
+*line 525
+move #50,_aval
+*line 526
+bra L103
+L102:
+*line 527
+sub #2,_aval
+L103:
+*line 528
+L101:
+*line 529
+cmp #100,_aval
+ble L10016
+move #100,R0
+bra L10018
+L10016:move _aval,R0
+L10018:move R0,_tmpomlt
+*line 530
+*line 531
+move _tmpomlt,R6
+add #50,R6
+muls _tmpoval,R6
+*line 532
+move R6,R0
+ext.l R0
+move.l R0,-(sp)
+move.l #$124f800,-(sp)
+jsr ldiv
+addq.l #8,sp
+sub.l #$1,R0
+move R0,R6
+*line 533
+*line 534
+move R6,R0
+asr #8,R0
+move.b R0,8+_io_time
+*line 535
+move R6,R0
+and #255,R0
+move.b R0,10+_io_time
+*line 536
+*line 537
+*line 537
+cmp #50,_tmpomlt
+bne L104
+*line 538
+*line 539
+move.b #24,_io_leds
+*line 540
+move.b #25,_io_leds
+*line 541
+bra L105
+L104:
+*line 542
+*line 542
+cmp #50,_tmpomlt
+ble L106
+*line 543
+*line 544
+move.b #152,_io_leds
+*line 545
+move.b #25,_io_leds
+*line 546
+bra L107
+L106:
+*line 547
+*line 548
+*line 549
+move.b #24,_io_leds
+*line 550
+move.b #153,_io_leds
+L107:L105:
+*line 551
+*line 552
+bra L59
+*line 553
+*line 554
+*line 555
+L108:
+*line 556
+*line 557
+*line 558
+*line 559
+cmp #50,_aval
+ble L109
+*line 559
+*line 560
+cmp #53,_aval
+bge L110
+*line 560
+move #50,_aval
+*line 561
+bra L111
+L110:
+*line 562
+sub #2,_aval
+L111:
+*line 563
+L109:
+*line 564
+cmp #100,_aval
+ble L10019
+move #100,R0
+bra L10021
+L10019:move _aval,R0
+L10021:move R0,R6
+*line 565
+move R6,R8
+add.l R8,R8
+add.l #_tmultab,R8
+move (R8),_timemlt
+*line 566
+*line 567
+*line 567
+cmp #50,R6
+bne L112
+*line 568
+*line 569
+move.b #26,_io_leds
+*line 570
+move.b #27,_io_leds
+*line 571
+bra L113
+L112:
+*line 572
+*line 572
+cmp #50,R6
+ble L114
+*line 573
+*line 574
+move.b #154,_io_leds
+*line 575
+move.b #27,_io_leds
+*line 576
+bra L115
+L114:
+*line 577
+*line 578
+*line 579
+move.b #26,_io_leds
+*line 580
+move.b #155,_io_leds
+L115:L113:
+*line 581
+*line 582
+bra L59
+*line 583
+*line 584
+*line 585
+*line 586
+L116:
+*line 587
+*line 588
+*line 589
+*line 590
+cmp #50,_aval
+ble L117
+*line 590
+*line 591
+cmp #53,_aval
+bge L118
+*line 591
+move #50,_aval
+*line 592
+bra L119
+L118:
+*line 593
+sub #2,_aval
+L119:
+*line 594
+L117:
+*line 595
+cmp #100,_aval
+ble L10022
+move #100,R0
+bra L10024
+L10022:move _aval,R0
+L10024:move R0,R7
+*line 596
+move R7,R0
+add #-50,R0
+asl #2,R0
+move R0,_tuneval
+*line 597
+jsr _settune
+*line 598
+*line 599
+*line 599
+cmp #50,R7
+bne L120
+*line 600
+*line 601
+move.b #28,_io_leds
+*line 602
+move.b #29,_io_leds
+*line 603
+bra L121
+L120:
+*line 604
+*line 604
+cmp #50,R7
+ble L122
+*line 605
+*line 606
+move.b #156,_io_leds
+*line 607
+move.b #29,_io_leds
+*line 608
+bra L123
+L122:
+*line 609
+*line 610
+*line 611
+move.b #28,_io_leds
+*line 612
+move.b #157,_io_leds
+L123:L121:
+*line 613
+*line 614
+bra L59
+*line 615
+*line 616
+*line 617
+L124:
+*line 618
+*line 619
+*line 620
+move _aval,R0
+asr #2,R0
+add R0,_aval
+*line 621
+*line 622
+*line 623
+cmp #127,_aval
+ble L125
+*line 623
+move #127,_aval
+*line 624
+L125:
+*line 625
+move _aval,R0
+move #9,R1
+asl R1,R0
+move #-32768,R1
+eor R1,R0
+move R0,_amplval
+*line 626
+move _amplval,(sp)
+clr -(sp)
+clr -(sp)
+jsr _sendval
+addq.l #4,sp
+bra L59
+*line 627
+*line 628
+L126:
+*line 629
+*line 630
+*line 631
+move _aval,R5
+muls #252,R5
+and #32736,R5
+*line 632
+*line 633
+clr R7
+bra L129
+L130:
+*line 634
+*line 635
+*line 635
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_grp2prt,R8
+cmp #3,(R8)
+bne L131
+*line 636
+*line 637
+*line 637
+move R5,(sp)
+move #8,-(sp)
+move R7,-(sp)
+jsr _newsv
+addq.l #4,sp
+tst R0
+beq L132
+*line 638
+*line 639
+*line 640
+tst _recsw
+beq L133
+move R7,R8
+add.l R8,R8
+move.l #_grpstat,R9
+tst 0(R8,R9.l)
+beq L133
+tst _ancmsw
+beq L10025
+move R7,R8
+add.l R8,R8
+add.l #_varmode,R8
+move 128(R8),R0
+bra L10027
+L10025:move R7,R8
+add.l R8,R8
+move.l #_grpmode,R9
+move 0(R8,R9.l),R0
+L10027:cmp #2,R0
+bne L133
+*line 641
+*line 642
+*line 642
+move #6,(sp)
+jsr _e_alc
+move.l R0,R11
+move.l R11,R0
+beq L134
+*line 643
+*line 644
+move.l _t_cur,(R11)
+*line 645
+move.b #14,5(R11)
+*line 646
+move R7,R0
+or #64,R0
+move.b R0,6(R11)
+*line 647
+move R5,R0
+ext.l R0
+move.l #$10,R1
+asl.l R1,R0
+move.l R0,16(R11)
+*line 648
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R11,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 649
+move #1,_ctrsw
+*line 650
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R11,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 651
+clr _ctrsw
+*line 652
+*line 653
+L134:bra L135
+L133:
+*line 654
+*line 654
+move _angroup,R0
+sub #1,R0
+cmp R0,R7
+bne L136
+*line 655
+*line 656
+move #4,(sp)
+jsr _dsanval
+*line 657
+L136:L135:
+*line 658
+L132:
+*line 659
+L131:L128:
+*line 633
+add #1,R7
+L129:
+*line 633
+cmp #12,R7
+blt L130
+L127:
+*line 660
+*line 661
+bra L59
+*line 662
+*line 663
+*line 664
+*line 665
+L137:
+*line 666
+*line 667
+*line 668
+move _aval,R5
+muls #252,R5
+and #32736,R5
+*line 669
+*line 670
+clr R7
+bra L140
+L141:
+*line 671
+*line 672
+*line 672
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_grp2prt,R8
+cmp #3,(R8)
+bne L142
+*line 673
+*line 674
+*line 674
+move R5,(sp)
+move #2,-(sp)
+move R7,-(sp)
+jsr _newsv
+addq.l #4,sp
+tst R0
+beq L143
+*line 675
+*line 676
+*line 677
+tst _recsw
+beq L144
+move R7,R8
+add.l R8,R8
+move.l #_grpstat,R9
+tst 0(R8,R9.l)
+beq L144
+tst _ancmsw
+beq L10028
+move R7,R8
+add.l R8,R8
+move.l #_varmode,R9
+move 96(R8,R9.l),R0
+bra L10030
+L10028:move R7,R8
+add.l R8,R8
+move.l #_grpmode,R9
+move 0(R8,R9.l),R0
+L10030:cmp #2,R0
+bne L144
+*line 678
+*line 679
+*line 679
+move #6,(sp)
+jsr _e_alc
+move.l R0,R11
+move.l R11,R0
+beq L145
+*line 680
+*line 681
+move.l _t_cur,(R11)
+*line 682
+move.b #14,5(R11)
+*line 683
+move R7,R0
+or #48,R0
+move.b R0,6(R11)
+*line 684
+move R5,R0
+ext.l R0
+move.l #$10,R1
+asl.l R1,R0
+move.l R0,16(R11)
+*line 685
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R11,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 686
+move #1,_ctrsw
+*line 687
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R11,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 688
+clr _ctrsw
+*line 689
+*line 690
+L145:L144:
+*line 691
+*line 691
+move _angroup,R0
+sub #1,R0
+cmp R0,R7
+bne L146
+*line 692
+*line 693
+move #3,(sp)
+jsr _dsanval
+*line 694
+L146:
+*line 695
+L143:
+*line 696
+L142:L139:
+*line 670
+add #1,R7
+L140:
+*line 670
+cmp #12,R7
+blt L141
+L138:
+*line 697
+*line 698
+bra L59
+*line 699
+*line 700
+bra L59
+L60:sub #53,R0
+cmp #26,R0
+bhi L59
+asl #2,R0
+move R0,R8
+add.l #L147,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L147:.dc.l L61
+.dc.l L72
+.dc.l L83
+.dc.l L84
+.dc.l L59
+.dc.l L85
+.dc.l L96
+.dc.l L59
+.dc.l L59
+.dc.l L59
+.dc.l L59
+.dc.l L59
+.dc.l L59
+.dc.l L59
+.dc.l L59
+.dc.l L59
+.dc.l L59
+.dc.l L97
+.dc.l L98
+.dc.l L99
+.dc.l L100
+.dc.l L108
+.dc.l L116
+.dc.l L124
+.dc.l L126
+.dc.l L59
+.dc.l L137
+.text
+L59:L58:L56:L53:L49:
+*line 701
+*line 702
+L47:
+*line 703
+*line 704
+*line 705
+*line 706
+*line 713
+*line 714
+*line 715
+*line 716
+L40:
+*line 717
+*line 717
+cmp #2,_ndisp
+bne L148
+tst.b _se_chg
+beq L148
+tst _dsp_ok
+beq L148
+*line 718
+*line 719
+jsr _dsmem
+*line 720
+clr.b _se_chg
+*line 721
+*line 722
+L148:
+*line 723
+clr _nxtflag
+*line 724
+move.l _fc_val,-30(R14)
+*line 725
+*line 726
+*line 726
+move.l _t_cur,R0
+cmp.l -30(R14),R0
+beq L149
+*line 727
+*line 728
+*line 728
+move.l _t_cur,R0
+cmp.l -30(R14),R0
+bge L150
+*line 729
+*line 730
+*line 731
+cmp #1,_se
+bne L151
+*line 731
+jsr _chgsef
+*line 732
+L151:
+*line 733
+move.l -30(R14),(sp)
+jsr _sc_trek
+*line 734
+bra L152
+L150:
+*line 735
+*line 736
+*line 737
+*line 738
+tst _se
+bne L153
+*line 738
+jsr _chgseb
+*line 739
+L153:
+*line 740
+move.l -30(R14),(sp)
+jsr _sc_trek
+L152:
+*line 741
+*line 742
+*line 743
+*line 744
+bra L154
+L149:
+*line 745
+*line 745
+tst _dsp_ok
+beq L155
+move.l _t_ctr,R0
+cmp.l _t_cur,R0
+beq L155
+*line 746
+*line 747
+*line 747
+move.l _t_ctr,R0
+cmp.l _t_cur,R0
+bge L156
+*line 748
+*line 749
+*line 750
+cmp #1,_sd
+bne L157
+*line 750
+jsr _chgsdf
+*line 751
+L157:
+*line 752
+move.l _t_ctr,(sp)
+add.l #$1,(sp)
+jsr _sc_trak
+*line 753
+bra L158
+L156:
+*line 754
+*line 755
+*line 756
+*line 757
+tst _sd
+bne L159
+*line 757
+jsr _chgsdb
+*line 758
+L159:
+*line 759
+move.l _t_ctr,(sp)
+sub.l #$1,(sp)
+jsr _sc_trak
+L158:
+*line 760
+*line 761
+*line 762
+*line 763
+*line 768
+*line 769
+*line 770
+*line 771
+L155:L154:
+*line 772
+*line 772
+tst _nxtflag
+beq L160
+tst _sd
+bne L160
+*line 773
+*line 774
+move _recsw,-26(R14)
+*line 775
+move _clkrun,-24(R14)
+*line 776
+*line 777
+move _curscor,R6
+add #1,R6
+*line 778
+*line 779
+*line 780
+cmp #20,R6
+blt L161
+*line 780
+clr R6
+*line 781
+L161:
+*line 782
+clr R7
+bra L164
+L165:
+*line 783
+*line 784
+*line 784
+move R6,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_scores,R8
+tst.l (R8)
+beq L166
+*line 785
+*line 786
+move R6,(sp)
+jsr _selscor
+bra L162
+*line 787
+*line 788
+*line 789
+L166:
+*line 790
+*line 791
+add #1,R6
+move R6,R0
+cmp #20,R0
+blt L167
+*line 791
+clr R6
+L167:L163:
+*line 782
+add #1,R7
+L164:
+*line 782
+cmp #20,R7
+blt L165
+L162:
+*line 792
+*line 793
+*line 794
+move -24(R14),(sp)
+jsr _clkset
+*line 795
+jsr _dsclk
+*line 796
+move -26(R14),_recsw
+*line 797
+jsr _dsrpmod
+*line 798
+clr _nxtflag
+*line 799
+*line 800
+*line 804
+*line 805
+L160:
+*line 806
+jsr _curproc
+*line 807
+*line 811
+*line 812
+*line 813
+jsr _seqproc
+L8:
+*line 814
+tst _runit
+bne L7
+L6:L5:tst.l (sp)+
+movem.l (sp)+,R4-R7/R11-R13
+unlk R14
+rts
+.data
Index: alcyon/msm.s
===================================================================
--- alcyon/msm.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/msm.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,2689 @@
+.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 _ancmsw
+.globl _angroup
+.globl _clkctl
+.globl _ctrsw
+.globl _curasg
+.globl _curvce
+.globl _dsp_ok
+.globl _editsw
+.globl _mascntr
+.globl _mdb1
+.globl _mdb2
+.globl _michan
+.globl _midiclk
+.globl _midigo
+.globl _mistat
+.globl _ndisp
+.globl _recsw
+.globl _prgchan
+.globl _masens
+.globl _mctlval
+.globl _mdbyte
+.globl _mpsust
+.globl _mrstat
+.globl _trgtab
+.globl _grpmode
+.globl _grpstat
+.globl _key2grp
+.globl _vce2grp
+.globl _veltab
+.globl _mctlnum
+.globl _mpbend
+.globl _msmstv
+.globl _prstab
+.globl _src2var
+.globl _tuntab
+.globl _vce2trg
+.globl _grp2prt
+.globl _varmode
+.globl _gdstbc
+.globl _mpmap
+.data
+_mpmap:
+.dc.w $3
+.dc.w $4
+.dc.w $2
+.globl _msmnext
+.data
+_msmnext:
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $1
+.dc.w $1
+.dc.w $2
+.dc.w $0
+.globl _msmcnxt
+.data
+_msmcnxt:
+.dc.w $0
+.dc.w $0
+.dc.w $2
+.dc.w $1
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.globl _ctl2src
+.data
+_ctl2src:
+.dc.w $C
+.dc.w $D
+.dc.w $2
+.dc.w $8
+.globl _msm
+.text
+_msm:
+~~msm:
+link R14,#-8
+movem.l R2-R7/R13-R13,-(sp)
+~miport=R7
+~midiin=R6
+~i=R5
+~t1=R4
+~t2=R3
+~ep=R13
+~j=-2
+~nvel=-4
+~where=-8
+*line 107
+clr R7
+bra L4
+L5:
+*line 108
+*line 109
+bra L8
+L7:
+*line 110
+*line 111
+clr _dsp_ok
+*line 112
+*line 113
+move R7,R8
+add.l R8,R8
+move.l #_mpmap,R9
+move 0(R8,R9.l),(sp)
+move #2,-(sp)
+jsr _trap13
+addq.l #2,sp
+and.l #$ff,R0
+move R0,R6
+*line 114
+*line 115
+*line 116
+move.l #_masens,R8
+tst.b 0(R8,R7)
+beq L9
+*line 116
+move R7,R8
+add.l #_masens,R8
+or.b #15,(R8)
+*line 117
+L9:
+*line 118
+move R7,R8
+add.l R8,R8
+move.l #_msmstv,R9
+move 0(R8,R9.l),R0
+bra L11
+*line 119
+*line 120
+L12:
+*line 121
+*line 122
+*line 123
+*line 123
+btst #7,R6
+beq L13
+*line 124
+*line 125
+move R6,R0
+and #15,R0
+move R0,_michan
+*line 126
+move R6,R0
+asr #4,R0
+and #15,R0
+move R0,_mistat
+*line 127
+*line 128
+*line 128
+cmp #240,R6
+bge L14
+*line 129
+*line 130
+move R7,R8
+add.l R8,R8
+add.l #_msmstv,R8
+move _mistat,R1
+and #7,R1
+move R1,R9
+add.l R9,R9
+add.l #_msmnext,R9
+move (R9),(R8)
+*line 131
+move R6,R0
+move R7,R9
+add.l #_mrstat,R9
+move.b R0,(R9)
+*line 132
+bra L15
+L14:
+*line 133
+*line 133
+cmp #248,R6
+bge L16
+*line 134
+*line 135
+move R7,R8
+add.l R8,R8
+add.l #_msmstv,R8
+move _michan,R1
+and #7,R1
+move R1,R9
+add.l R9,R9
+add.l #_msmcnxt,R9
+move (R9),(R8)
+*line 136
+move R6,R0
+move R7,R9
+add.l #_mrstat,R9
+move.b R0,(R9)
+*line 137
+*line 138
+bra L17
+L16:
+*line 139
+*line 140
+*line 141
+move R6,R0
+and #7,R0
+bra L19
+*line 142
+L20:
+*line 143
+*line 144
+*line 145
+*line 146
+tst _midiclk
+beq L21
+tst _midigo
+beq L21
+*line 146
+*line 147
+add.l #$2,_fc_val
+move.l _fc_val,R0
+cmp.l #$ffffff,R0
+ble L22
+*line 147
+move.l #$ffffff,_fc_val
+*line 148
+L22:L21:bra L18
+*line 149
+*line 150
+L23:
+*line 151
+*line 152
+*line 153
+*line 154
+cmp #1,_clkctl
+bne L24
+tst _midigo
+bne L24
+*line 155
+*line 156
+move #1,_midigo
+*line 157
+*line 158
+*line 159
+tst.l _fc_val
+beq L25
+*line 159
+clr.l R0
+move.l R0,_fc_val
+move.l R0,(sp)
+jsr _sc_goto
+*line 160
+L25:
+*line 161
+move #1,(sp)
+jsr _clkset
+*line 162
+jsr _dsclk
+*line 163
+*line 164
+L24:bra L18
+*line 165
+*line 166
+L26:
+*line 167
+*line 168
+*line 169
+*line 170
+cmp #1,_clkctl
+bne L27
+tst _midigo
+bne L27
+*line 171
+*line 172
+move #1,_midigo
+*line 173
+move #1,(sp)
+jsr _clkset
+*line 174
+jsr _dsclk
+*line 175
+*line 176
+L27:bra L18
+*line 177
+*line 178
+*line 179
+L28:
+*line 180
+*line 181
+*line 182
+*line 183
+cmp #1,_clkctl
+bne L29
+tst _midigo
+beq L29
+*line 184
+*line 185
+clr _midigo
+*line 186
+clr (sp)
+jsr _clkset
+*line 187
+jsr _dsclk
+*line 188
+*line 189
+L29:bra L18
+*line 190
+*line 191
+L30:
+*line 192
+*line 193
+*line 194
+move R7,R8
+add.l #_masens,R8
+or.b #255,(R8)
+bra L18
+*line 195
+*line 196
+L31:
+*line 197
+*line 198
+*line 199
+clr R5
+bra L34
+L35:
+*line 200
+*line 201
+move R5,R8
+add.l #_mrstat,R8
+clr.b (R8)
+*line 202
+move R5,R8
+add.l R8,R8
+add.l #_msmstv,R8
+clr (R8)
+*line 203
+move R5,R8
+add.l #_masens,R8
+clr.b (R8)
+L33:
+*line 199
+add #1,R5
+L34:
+*line 199
+cmp #2,R5
+blt L35
+L32:
+*line 204
+*line 205
+bra L18
+*line 206
+bra L18
+L19:cmp #7,R0
+bhi L18
+asl #2,R0
+move R0,R8
+add.l #L36,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L36:.dc.l L20
+.dc.l L18
+.dc.l L23
+.dc.l L26
+.dc.l L28
+.dc.l L18
+.dc.l L30
+.dc.l L31
+.text
+L18:
+*line 207
+L17:L15:
+*line 208
+*line 209
+*line 210
+L13:bra L8
+*line 211
+*line 212
+*line 213
+L37:
+*line 214
+*line 215
+*line 216
+*line 216
+btst #7,R6
+beq L38
+*line 217
+*line 218
+move R6,R0
+and #15,R0
+move R0,_michan
+*line 219
+move R6,R0
+asr #4,R0
+and #15,R0
+move R0,_mistat
+*line 220
+*line 221
+*line 221
+cmp #240,R6
+bge L39
+*line 222
+*line 223
+move R7,R8
+add.l R8,R8
+add.l #_msmstv,R8
+move _mistat,R1
+and #7,R1
+move R1,R9
+add.l R9,R9
+add.l #_msmnext,R9
+move (R9),(R8)
+*line 224
+move R6,R0
+move R7,R9
+add.l #_mrstat,R9
+move.b R0,(R9)
+*line 225
+bra L40
+L39:
+*line 226
+*line 226
+cmp #248,R6
+bge L41
+*line 227
+*line 228
+move R7,R8
+add.l R8,R8
+add.l #_msmstv,R8
+move _michan,R1
+and #7,R1
+move R1,R9
+add.l R9,R9
+add.l #_msmcnxt,R9
+move (R9),(R8)
+*line 229
+move R6,R0
+move R7,R9
+add.l #_mrstat,R9
+move.b R0,(R9)
+*line 230
+*line 231
+bra L42
+L41:
+*line 232
+*line 233
+*line 234
+move R6,R0
+and #7,R0
+bra L44
+*line 235
+L45:
+*line 236
+*line 237
+*line 238
+*line 239
+tst _midiclk
+beq L46
+tst _midigo
+beq L46
+*line 239
+*line 240
+add.l #$2,_fc_val
+move.l _fc_val,R0
+cmp.l #$ffffff,R0
+ble L47
+*line 240
+move.l #$ffffff,_fc_val
+*line 241
+L47:L46:bra L43
+*line 242
+*line 243
+L48:
+*line 244
+*line 245
+*line 246
+*line 247
+cmp #1,_clkctl
+bne L49
+tst _midigo
+bne L49
+*line 248
+*line 249
+move #1,_midigo
+*line 250
+*line 251
+*line 252
+tst.l _fc_val
+beq L50
+*line 252
+clr.l R0
+move.l R0,_fc_val
+move.l R0,(sp)
+jsr _sc_goto
+*line 253
+L50:
+*line 254
+move #1,(sp)
+jsr _clkset
+*line 255
+jsr _dsclk
+*line 256
+*line 257
+L49:bra L43
+*line 258
+*line 259
+L51:
+*line 260
+*line 261
+*line 262
+*line 263
+cmp #1,_clkctl
+bne L52
+tst _midigo
+bne L52
+*line 264
+*line 265
+move #1,_midigo
+*line 266
+move #1,(sp)
+jsr _clkset
+*line 267
+jsr _dsclk
+*line 268
+*line 269
+L52:bra L43
+*line 270
+*line 271
+*line 272
+L53:
+*line 273
+*line 274
+*line 275
+*line 276
+cmp #1,_clkctl
+bne L54
+tst _midigo
+beq L54
+*line 277
+*line 278
+clr _midigo
+*line 279
+clr (sp)
+jsr _clkset
+*line 280
+jsr _dsclk
+*line 281
+*line 282
+L54:bra L43
+*line 283
+*line 284
+L55:
+*line 285
+*line 286
+*line 287
+move R7,R8
+add.l #_masens,R8
+or.b #255,(R8)
+bra L43
+*line 288
+*line 289
+L56:
+*line 290
+*line 291
+*line 292
+clr R5
+bra L59
+L60:
+*line 293
+*line 294
+move R5,R8
+add.l #_mrstat,R8
+clr.b (R8)
+*line 295
+move R5,R8
+add.l R8,R8
+add.l #_msmstv,R8
+clr (R8)
+*line 296
+move R5,R8
+add.l #_masens,R8
+clr.b (R8)
+L58:
+*line 292
+add #1,R5
+L59:
+*line 292
+cmp #2,R5
+blt L60
+L57:
+*line 297
+*line 298
+bra L43
+*line 299
+bra L43
+L44:cmp #7,R0
+bhi L43
+asl #2,R0
+move R0,R8
+add.l #L61,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L61:.dc.l L45
+.dc.l L43
+.dc.l L48
+.dc.l L51
+.dc.l L53
+.dc.l L43
+.dc.l L55
+.dc.l L56
+.text
+L43:
+*line 300
+L42:L40:
+*line 301
+*line 302
+*line 303
+bra L62
+L38:
+*line 304
+*line 305
+*line 306
+move.l #_mrstat,R8
+move.b 0(R8,R7),R0
+ext.w R0
+and #15,R0
+move R0,_michan
+*line 307
+move.l #_mrstat,R8
+move.b 0(R8,R7),R0
+ext.w R0
+asr #4,R0
+and #15,R0
+move R0,_mistat
+*line 308
+*line 309
+*line 309
+cmp #12,_mistat
+bne L63
+*line 310
+*line 311
+*line 312
+*line 313
+*line 314
+*line 315
+tst R7
+bne L64
+move _michan,R0
+add #1,R0
+cmp _prgchan,R0
+bne L64
+cmp #100,R6
+bge L64
+*line 316
+*line 317
+move R6,R0
+move R0,_curasg
+move R0,(sp)
+jsr _getasg
+*line 318
+jsr _mpcupd
+*line 319
+*line 320
+*line 321
+L64:bra L65
+L63:
+*line 322
+*line 322
+cmp #13,_mistat
+bne L66
+*line 323
+*line 324
+*line 325
+*line 326
+move R6,R0
+muls #252,R0
+and #32736,R0
+move R0,_mdb1
+*line 327
+move R7,R4
+move #11,R0
+asl R0,R4
+move _michan,R0
+asl #7,R0
+or R0,R4
+*line 328
+move R4,R3
+add #128,R3
+*line 329
+*line 330
+move R4,R5
+bra L69
+L70:
+*line 331
+move R5,R8
+add.l R8,R8
+add.l #_prstab,R8
+move _mdb1,(R8)
+L68:
+*line 330
+add #1,R5
+L69:
+*line 330
+cmp R3,R5
+blt L70
+L67:
+*line 331
+*line 332
+*line 333
+clr R5
+bra L73
+L74:
+*line 334
+*line 335
+*line 336
+move R5,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_grp2prt,R9
+move 0(R8,R9.l),R0
+move R7,R1
+add #1,R1
+cmp R1,R0
+bne L75
+move R5,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_grp2prt,R9
+move 2(R8,R9.l),R0
+move _michan,R1
+add #1,R1
+cmp R1,R0
+bne L75
+*line 337
+*line 338
+*line 338
+move _mdb1,(sp)
+move #6,-(sp)
+move R5,-(sp)
+jsr _newsv
+addq.l #4,sp
+tst R0
+beq L76
+*line 339
+*line 340
+*line 341
+tst _recsw
+beq L77
+move R5,R8
+add.l R8,R8
+move.l #_grpstat,R9
+tst 0(R8,R9.l)
+beq L77
+tst _ancmsw
+beq L10000
+move R5,R8
+add.l R8,R8
+add.l #_varmode,R8
+move 160(R8),R0
+bra L10002
+L10000:move R5,R8
+add.l R8,R8
+move.l #_grpmode,R9
+move 0(R8,R9.l),R0
+L10002:cmp #2,R0
+bne L77
+*line 342
+*line 343
+*line 343
+move #6,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L78
+*line 344
+*line 345
+move.l _t_cur,(R13)
+*line 346
+move.b #14,5(R13)
+*line 347
+move R5,R0
+or #80,R0
+move.b R0,6(R13)
+*line 348
+move _mdb1,R0
+ext.l R0
+move.l #$10,R1
+asl.l R1,R0
+move.l R0,16(R13)
+*line 349
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 350
+move #1,_ctrsw
+*line 351
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 352
+clr _ctrsw
+*line 353
+*line 354
+L78:bra L79
+L77:
+*line 355
+*line 355
+move _angroup,R0
+sub #1,R0
+cmp R0,R5
+bne L80
+*line 356
+*line 357
+move #5,(sp)
+jsr _dsanval
+*line 358
+L80:L79:
+*line 359
+L76:
+*line 360
+L75:L72:
+*line 333
+add #1,R5
+L73:
+*line 333
+cmp #12,R5
+blt L74
+L71:
+*line 361
+*line 362
+*line 363
+bra L81
+L66:
+*line 364
+*line 365
+*line 366
+cmp #15,_mistat
+bne L82
+cmp #3,_michan
+bne L82
+tst _midigo
+bne L82
+*line 367
+*line 368
+*line 368
+cmp #20,R6
+bge L83
+*line 369
+*line 370
+move R6,(sp)
+jsr _selscor
+*line 371
+*line 372
+*line 373
+cmp #2,_ndisp
+bne L84
+*line 373
+jsr _sdwins
+L84:
+*line 374
+*line 375
+L83:bra L85
+L82:
+*line 376
+*line 377
+*line 378
+move R7,R8
+add.l R8,R8
+add.l #_msmstv,R8
+clr (R8)
+*line 379
+move R7,R8
+add.l #_mrstat,R8
+clr.b (R8)
+L85:L81:L65:
+*line 380
+L62:
+*line 381
+*line 382
+bra L8
+*line 383
+*line 384
+*line 385
+L86:
+*line 386
+*line 387
+*line 388
+*line 388
+btst #7,R6
+beq L87
+*line 389
+*line 390
+move R6,R0
+and #15,R0
+move R0,_michan
+*line 391
+move R6,R0
+asr #4,R0
+and #15,R0
+move R0,_mistat
+*line 392
+*line 393
+*line 393
+cmp #240,R6
+bge L88
+*line 394
+*line 395
+move R7,R8
+add.l R8,R8
+add.l #_msmstv,R8
+move _mistat,R1
+and #7,R1
+move R1,R9
+add.l R9,R9
+add.l #_msmnext,R9
+move (R9),(R8)
+*line 396
+move R6,R0
+move R7,R9
+add.l #_mrstat,R9
+move.b R0,(R9)
+*line 397
+bra L89
+L88:
+*line 398
+*line 398
+cmp #248,R6
+bge L90
+*line 399
+*line 400
+move R7,R8
+add.l R8,R8
+add.l #_msmstv,R8
+move _michan,R1
+and #7,R1
+move R1,R9
+add.l R9,R9
+add.l #_msmcnxt,R9
+move (R9),(R8)
+*line 401
+move R6,R0
+move R7,R9
+add.l #_mrstat,R9
+move.b R0,(R9)
+*line 402
+*line 403
+bra L91
+L90:
+*line 404
+*line 405
+*line 406
+move R6,R0
+and #7,R0
+bra L93
+*line 407
+L94:
+*line 408
+*line 409
+*line 410
+*line 411
+tst _midiclk
+beq L95
+tst _midigo
+beq L95
+*line 411
+*line 412
+add.l #$2,_fc_val
+move.l _fc_val,R0
+cmp.l #$ffffff,R0
+ble L96
+*line 412
+move.l #$ffffff,_fc_val
+*line 413
+L96:L95:bra L92
+*line 414
+*line 415
+L97:
+*line 416
+*line 417
+*line 418
+*line 419
+cmp #1,_clkctl
+bne L98
+tst _midigo
+bne L98
+*line 420
+*line 421
+move #1,_midigo
+*line 422
+*line 423
+*line 424
+tst.l _fc_val
+beq L99
+*line 424
+clr.l R0
+move.l R0,_fc_val
+move.l R0,(sp)
+jsr _sc_goto
+*line 425
+L99:
+*line 426
+move #1,(sp)
+jsr _clkset
+*line 427
+jsr _dsclk
+*line 428
+*line 429
+L98:bra L92
+*line 430
+*line 431
+L100:
+*line 432
+*line 433
+*line 434
+*line 435
+cmp #1,_clkctl
+bne L101
+tst _midigo
+bne L101
+*line 436
+*line 437
+move #1,_midigo
+*line 438
+move #1,(sp)
+jsr _clkset
+*line 439
+jsr _dsclk
+*line 440
+*line 441
+L101:bra L92
+*line 442
+*line 443
+*line 444
+L102:
+*line 445
+*line 446
+*line 447
+*line 448
+cmp #1,_clkctl
+bne L103
+tst _midigo
+beq L103
+*line 449
+*line 450
+clr _midigo
+*line 451
+clr (sp)
+jsr _clkset
+*line 452
+jsr _dsclk
+*line 453
+*line 454
+L103:bra L92
+*line 455
+*line 456
+L104:
+*line 457
+*line 458
+*line 459
+move R7,R8
+add.l #_masens,R8
+or.b #255,(R8)
+bra L92
+*line 460
+*line 461
+L105:
+*line 462
+*line 463
+*line 464
+clr R5
+bra L108
+L109:
+*line 465
+*line 466
+move R5,R8
+add.l #_mrstat,R8
+clr.b (R8)
+*line 467
+move R5,R8
+add.l R8,R8
+add.l #_msmstv,R8
+clr (R8)
+*line 468
+move R5,R8
+add.l #_masens,R8
+clr.b (R8)
+L107:
+*line 464
+add #1,R5
+L108:
+*line 464
+cmp #2,R5
+blt L109
+L106:
+*line 469
+*line 470
+bra L92
+*line 471
+bra L92
+L93:cmp #7,R0
+bhi L92
+asl #2,R0
+move R0,R8
+add.l #L110,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L110:.dc.l L94
+.dc.l L92
+.dc.l L97
+.dc.l L100
+.dc.l L102
+.dc.l L92
+.dc.l L104
+.dc.l L105
+.text
+L92:
+*line 472
+L91:L89:
+*line 473
+*line 474
+bra L111
+L87:
+*line 475
+*line 476
+*line 477
+move R6,R0
+move R7,R9
+add.l #_mdbyte,R9
+move.b R0,(R9)
+*line 478
+move R7,R8
+add.l R8,R8
+add.l #_msmstv,R8
+move #3,(R8)
+L111:
+*line 479
+*line 480
+bra L8
+*line 481
+*line 482
+*line 483
+L112:
+*line 484
+*line 485
+*line 486
+*line 486
+btst #7,R6
+beq L113
+*line 487
+*line 488
+move R6,R0
+and #15,R0
+move R0,_michan
+*line 489
+move R6,R0
+asr #4,R0
+and #15,R0
+move R0,_mistat
+*line 490
+*line 491
+*line 491
+cmp #240,R6
+bge L114
+*line 492
+*line 493
+move R7,R8
+add.l R8,R8
+add.l #_msmstv,R8
+move _mistat,R1
+and #7,R1
+move R1,R9
+add.l R9,R9
+add.l #_msmnext,R9
+move (R9),(R8)
+*line 494
+move R6,R0
+move R7,R9
+add.l #_mrstat,R9
+move.b R0,(R9)
+*line 495
+bra L115
+L114:
+*line 496
+*line 496
+cmp #248,R6
+bge L116
+*line 497
+*line 498
+move R7,R8
+add.l R8,R8
+add.l #_msmstv,R8
+move _michan,R1
+and #7,R1
+move R1,R9
+add.l R9,R9
+add.l #_msmcnxt,R9
+move (R9),(R8)
+*line 499
+move R6,R0
+move R7,R9
+add.l #_mrstat,R9
+move.b R0,(R9)
+*line 500
+*line 501
+bra L117
+L116:
+*line 502
+*line 503
+*line 504
+move R6,R0
+and #7,R0
+bra L119
+*line 505
+L120:
+*line 506
+*line 507
+*line 508
+*line 509
+tst _midiclk
+beq L121
+tst _midigo
+beq L121
+*line 509
+*line 510
+add.l #$2,_fc_val
+move.l _fc_val,R0
+cmp.l #$ffffff,R0
+ble L122
+*line 510
+move.l #$ffffff,_fc_val
+*line 511
+L122:L121:bra L118
+*line 512
+*line 513
+L123:
+*line 514
+*line 515
+*line 516
+*line 517
+cmp #1,_clkctl
+bne L124
+tst _midigo
+bne L124
+*line 518
+*line 519
+move #1,_midigo
+*line 520
+*line 521
+*line 522
+tst.l _fc_val
+beq L125
+*line 522
+clr.l R0
+move.l R0,_fc_val
+move.l R0,(sp)
+jsr _sc_goto
+*line 523
+L125:
+*line 524
+move #1,(sp)
+jsr _clkset
+*line 525
+jsr _dsclk
+*line 526
+*line 527
+L124:bra L118
+*line 528
+*line 529
+L126:
+*line 530
+*line 531
+*line 532
+*line 533
+cmp #1,_clkctl
+bne L127
+tst _midigo
+bne L127
+*line 534
+*line 535
+move #1,_midigo
+*line 536
+move #1,(sp)
+jsr _clkset
+*line 537
+jsr _dsclk
+*line 538
+*line 539
+L127:bra L118
+*line 540
+*line 541
+*line 542
+L128:
+*line 543
+*line 544
+*line 545
+*line 546
+cmp #1,_clkctl
+bne L129
+tst _midigo
+beq L129
+*line 547
+*line 548
+clr _midigo
+*line 549
+clr (sp)
+jsr _clkset
+*line 550
+jsr _dsclk
+*line 551
+*line 552
+L129:bra L118
+*line 553
+*line 554
+L130:
+*line 555
+*line 556
+*line 557
+move R7,R8
+add.l #_masens,R8
+or.b #255,(R8)
+bra L118
+*line 558
+*line 559
+L131:
+*line 560
+*line 561
+*line 562
+clr R5
+bra L134
+L135:
+*line 563
+*line 564
+move R5,R8
+add.l #_mrstat,R8
+clr.b (R8)
+*line 565
+move R5,R8
+add.l R8,R8
+add.l #_msmstv,R8
+clr (R8)
+*line 566
+move R5,R8
+add.l #_masens,R8
+clr.b (R8)
+L133:
+*line 562
+add #1,R5
+L134:
+*line 562
+cmp #2,R5
+blt L135
+L132:
+*line 567
+*line 568
+bra L118
+*line 569
+bra L118
+L119:cmp #7,R0
+bhi L118
+asl #2,R0
+move R0,R8
+add.l #L136,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L136:.dc.l L120
+.dc.l L118
+.dc.l L123
+.dc.l L126
+.dc.l L128
+.dc.l L118
+.dc.l L130
+.dc.l L131
+.text
+L118:
+*line 570
+L117:L115:
+*line 571
+*line 572
+*line 573
+bra L137
+L113:
+*line 574
+*line 575
+*line 576
+move.l #_mrstat,R8
+move.b 0(R8,R7),R0
+ext.w R0
+and #15,R0
+move R0,_michan
+*line 577
+move.l #_mrstat,R8
+move.b 0(R8,R7),R0
+ext.w R0
+asr #4,R0
+and #15,R0
+move R0,_mistat
+*line 578
+move.l #_mdbyte,R8
+move.b 0(R8,R7),R0
+ext.w R0
+move R0,_mdb1
+*line 579
+move R6,_mdb2
+*line 580
+move R7,R8
+add.l R8,R8
+add.l #_msmstv,R8
+move #2,(R8)
+*line 581
+*line 582
+move _mistat,R0
+bra L139
+*line 583
+L140:
+*line 584
+*line 585
+*line 586
+*line 586
+tst _mdb2
+beq L141
+*line 587
+*line 588
+move R7,R4
+move #11,R0
+asl R0,R4
+move _michan,R0
+asl #7,R0
+add R0,R4
+add _mdb1,R4
+*line 589
+move _michan,R8
+move R7,R1
+asl #4,R1
+ext.l R1
+add.l #_mpsust,R1
+move.b 0(R8,R1.l),R0
+ext.w R0
+move R0,-(sp) 
+or #1,(sp)
+move R4,R8
+add.l #_trgtab,R8
+move.b (R8),R0
+or (sp)+,R0
+move.b R0,(R8)
+*line 590
+move _mdb2,R0
+muls #252,R0
+and #32736,R0
+move R0,-4(R14)
+move R4,R9
+add.l R9,R9
+add.l #_veltab,R9
+move R0,(R9)
+*line 591
+move R4,R8
+add.l R8,R8
+add.l #_prstab,R8
+clr (R8)
+*line 592
+*line 593
+move R4,(sp)
+jsr _stmproc
+*line 594
+*line 595
+*line 595
+tst _editsw
+beq L142
+*line 596
+*line 597
+clr (sp)
+move _curvce,-(sp)
+move _mdb1,R8
+add.l R8,R8
+move.l #_tuntab,R9
+move 0(R8,R9.l),-(sp)
+move R4,-(sp)
+jsr _execkey
+addq.l #6,sp
+bra L138
+*line 598
+*line 599
+*line 600
+L142:
+*line 601
+*line 601
+tst R7
+beq L143
+*line 602
+*line 603
+clr R5
+bra L146
+L147:
+*line 604
+*line 605
+move R5,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_grp2prt,R9
+move 0(R8,R9.l),R0
+move R7,R1
+add #1,R1
+cmp R1,R0
+bne L148
+move R5,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_grp2prt,R9
+move 2(R8,R9.l),R0
+move _michan,R1
+add #1,R1
+cmp R1,R0
+bne L148
+*line 606
+*line 607
+move -4(R14),(sp)
+move _mdb1,-(sp)
+move _michan,-(sp)
+move R7,-(sp)
+move R5,-(sp)
+jsr _asgvce
+addq.l #8,sp
+*line 608
+move -4(R14),(sp)
+move _mdb1,-(sp)
+move R5,-(sp)
+jsr _ne_bgn
+addq.l #4,sp
+*line 609
+*line 610
+L148:L145:
+*line 603
+add #1,R5
+L146:
+*line 603
+cmp #12,R5
+blt L147
+L144:bra L149
+L143:
+*line 611
+*line 612
+*line 613
+*line 614
+cmp #21,_mdb1
+blt L10004
+cmp #108,_mdb1
+ble L10003
+L10004:clr R0
+bra L10006
+L10003:move _mdb1,R8
+add #-21,R8
+add.l R8,R8
+move.l #_key2grp,R9
+move 0(R8,R9.l),R0
+L10006:move R0,R3
+*line 615
+*line 616
+clr R5
+bra L152
+L153:
+*line 617
+*line 618
+move R3,R0
+move #1,R1
+move R5,R2
+asl R2,R1
+and R1,R0
+beq L154
+move R5,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_grp2prt,R9
+move 2(R8,R9.l),R0
+move _michan,R1
+add #1,R1
+cmp R1,R0
+bne L154
+*line 619
+*line 620
+move -4(R14),(sp)
+move _mdb1,-(sp)
+move _michan,-(sp)
+move R7,-(sp)
+move R5,-(sp)
+jsr _asgvce
+addq.l #8,sp
+*line 621
+move -4(R14),(sp)
+move _mdb1,-(sp)
+move R5,-(sp)
+jsr _ne_bgn
+addq.l #4,sp
+*line 622
+L154:L151:
+*line 616
+add #1,R5
+L152:
+*line 616
+cmp #12,R5
+blt L153
+L150:L149:
+*line 623
+*line 624
+bra L138
+*line 625
+*line 626
+*line 627
+*line 628
+L141:L155:
+*line 629
+*line 630
+*line 631
+move R7,R4
+move #11,R0
+asl R0,R4
+move _michan,R0
+asl #7,R0
+add R0,R4
+add _mdb1,R4
+*line 632
+move R4,R8
+add.l #_trgtab,R8
+and.b #-2,(R8)
+*line 633
+*line 634
+*line 634
+move R4,R8
+add.l #_trgtab,R8
+tst.b (R8)
+bne L156
+*line 635
+*line 636
+clr R5
+bra L159
+L160:
+*line 637
+*line 638
+*line 638
+move R5,R8
+add.l R8,R8
+add.l #_vce2trg,R8
+cmp (R8),R4
+bne L161
+*line 639
+*line 640
+move R5,R8
+add.l R8,R8
+add.l #_vce2trg,R8
+move #-1,(R8)
+*line 641
+move R4,(sp)
+jsr _procpfl
+*line 642
+*line 643
+L161:
+*line 644
+*line 645
+*line 646
+move R5,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_grp2prt,R9
+move 0(R8,R9.l),R0
+move R7,R1
+add #1,R1
+cmp R1,R0
+bne L162
+move R5,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_grp2prt,R9
+move 2(R8,R9.l),R0
+move _michan,R1
+add #1,R1
+cmp R1,R0
+bne L162
+*line 646
+move R5,(sp)
+move R4,-(sp)
+jsr _ne_end
+addq.l #2,sp
+L162:L158:
+*line 636
+add #1,R5
+L159:
+*line 636
+cmp #12,R5
+blt L160
+L157:
+*line 647
+*line 648
+*line 649
+move R4,(sp)
+or #-32768,(sp)
+jsr _stmproc
+*line 650
+*line 651
+L156:bra L138
+*line 652
+*line 653
+L163:
+*line 654
+*line 655
+*line 656
+move R7,R4
+move #11,R0
+asl R0,R4
+move _michan,R0
+asl #7,R0
+add R0,R4
+add _mdb1,R4
+*line 657
+move _mdb2,R3
+muls #252,R3
+and #32736,R3
+*line 658
+move R4,R8
+add.l R8,R8
+add.l #_prstab,R8
+move R3,(R8)
+*line 659
+*line 660
+clr R5
+bra L166
+L167:
+*line 661
+*line 662
+*line 663
+move R5,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_grp2prt,R9
+move 0(R8,R9.l),R0
+move R7,R1
+add #1,R1
+cmp R1,R0
+bne L168
+move R5,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_grp2prt,R9
+move 2(R8,R9.l),R0
+move _michan,R1
+add #1,R1
+cmp R1,R0
+bne L168
+*line 663
+move R3,(sp)
+move #6,-(sp)
+move R5,-(sp)
+move R4,-(sp)
+jsr _newpps
+addq.l #6,sp
+*line 664
+L168:L165:
+*line 660
+add #1,R5
+L166:
+*line 660
+cmp #12,R5
+blt L167
+L164:bra L138
+*line 665
+*line 666
+*line 667
+L169:
+*line 668
+*line 669
+*line 670
+move _mdb2,R0
+move R7,R1
+move #11,R2
+asl R2,R1
+move _michan,R2
+asl #7,R2
+add R2,R1
+ext.l R1
+add.l #_mctlval,R1
+move _mdb1,R2
+ext.l R2
+add.l R2,R1
+move.l R1,R9
+move.b R0,(R9)
+*line 671
+*line 672
+*line 672
+cmp #64,_mdb1
+bne L170
+*line 673
+*line 674
+*line 675
+*line 676
+move R7,R4
+move #11,R0
+asl R0,R4
+move _michan,R0
+asl #7,R0
+or R0,R4
+*line 677
+move R4,R3
+add #128,R3
+*line 678
+*line 679
+*line 679
+cmp #63,_mdb2
+ble L171
+*line 680
+*line 681
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_mpsust,R0
+move _michan,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.b #8,(R8)
+*line 682
+*line 683
+move R4,R5
+bra L174
+L175:
+*line 684
+*line 685
+move.l #_trgtab,R8
+tst.b 0(R8,R5)
+beq L176
+*line 685
+move R5,R8
+add.l #_trgtab,R8
+or.b #8,(R8)
+*line 686
+L176:L173:
+*line 683
+add #1,R5
+L174:
+*line 683
+cmp R3,R5
+blt L175
+L172:bra L177
+L171:
+*line 687
+*line 687
+cmp #64,_mdb2
+bge L178
+*line 688
+*line 689
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_mpsust,R0
+move _michan,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+clr.b (R8)
+*line 690
+*line 691
+move R4,R5
+bra L181
+L182:
+*line 692
+*line 693
+*line 693
+move.l #_trgtab,R8
+tst.b 0(R8,R5)
+beq L183
+*line 694
+*line 695
+move R5,R8
+add.l #_trgtab,R8
+and.b #-9,(R8)
+*line 696
+*line 697
+*line 697
+move R5,R8
+add.l #_trgtab,R8
+tst.b (R8)
+bne L184
+*line 698
+*line 699
+clr R4
+bra L187
+L188:
+*line 700
+*line 701
+*line 701
+move R4,R8
+add.l R8,R8
+add.l #_vce2trg,R8
+cmp (R8),R5
+bne L189
+*line 702
+*line 703
+move R4,R8
+add.l R8,R8
+add.l #_vce2trg,R8
+move #-1,(R8)
+*line 704
+move R5,(sp)
+jsr _procpfl
+*line 705
+*line 706
+L189:
+*line 707
+*line 708
+*line 709
+move R4,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_grp2prt,R9
+move 0(R8,R9.l),R0
+move R7,R1
+add #1,R1
+cmp R1,R0
+bne L190
+move R4,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_grp2prt,R9
+move 2(R8,R9.l),R0
+move _michan,R1
+add #1,R1
+cmp R1,R0
+bne L190
+*line 709
+move R4,(sp)
+move R5,-(sp)
+jsr _ne_end
+addq.l #2,sp
+L190:L186:
+*line 699
+add #1,R4
+L187:
+*line 699
+cmp #12,R4
+blt L188
+L185:
+*line 710
+*line 711
+L184:
+*line 712
+L183:L180:
+*line 691
+add #1,R5
+L181:
+*line 691
+cmp R3,R5
+blt L182
+L179:
+*line 713
+*line 714
+*line 715
+*line 716
+L178:L177:bra L191
+L170:
+*line 717
+*line 717
+cmp #66,_mdb1
+bne L192
+*line 718
+*line 719
+*line 720
+*line 721
+move R7,R4
+move #11,R0
+asl R0,R4
+move _michan,R0
+asl #7,R0
+or R0,R4
+*line 722
+move R4,R3
+add #128,R3
+*line 723
+*line 724
+*line 724
+cmp #63,_mdb2
+ble L193
+*line 725
+*line 726
+move R4,R5
+bra L196
+L197:
+*line 727
+*line 727
+move R5,R8
+add.l #_trgtab,R8
+btst #0,(R8)
+beq L198
+*line 728
+*line 729
+clr R4
+bra L201
+L202:
+*line 730
+*line 731
+move R4,R8
+add.l R8,R8
+move.l #_vce2trg,R9
+move 0(R8,R9.l),R0
+and #16383,R0
+cmp R0,R5
+bne L203
+*line 731
+move R4,R8
+add.l R8,R8
+add.l #_vce2trg,R8
+or #-32768,(R8)
+L203:L200:
+*line 729
+add #1,R4
+L201:
+*line 729
+cmp #12,R4
+blt L202
+L199:
+*line 732
+*line 733
+L198:L195:
+*line 726
+add #1,R5
+L196:
+*line 726
+cmp R3,R5
+blt L197
+L194:bra L204
+L193:
+*line 734
+*line 734
+cmp #64,_mdb2
+bge L205
+*line 735
+*line 736
+clr R5
+bra L208
+L209:
+*line 737
+*line 738
+*line 738
+move R5,R8
+add.l R8,R8
+add.l #_vce2trg,R8
+cmp #-1,(R8)
+beq L210
+*line 739
+*line 740
+move R5,R8
+add.l R8,R8
+add.l #_vce2trg,R8
+and #32767,(R8)
+*line 741
+*line 742
+*line 742
+move R5,R8
+add.l R8,R8
+move.l #_vce2trg,R9
+move 0(R8,R9.l),R0
+and #-16384,R0
+bne L211
+*line 743
+*line 744
+move R5,R8
+add.l R8,R8
+add.l #_vce2trg,R8
+move (R8),R4
+*line 745
+*line 746
+*line 746
+move R4,R8
+add.l #_trgtab,R8
+tst.b (R8)
+bne L212
+*line 747
+*line 748
+move R5,R8
+add.l R8,R8
+add.l #_vce2trg,R8
+move #-1,(R8)
+*line 749
+move R4,(sp)
+jsr _procpfl
+*line 750
+L212:
+*line 751
+L211:
+*line 752
+L210:L207:
+*line 736
+add #1,R5
+L208:
+*line 736
+cmp #12,R5
+blt L209
+L206:
+*line 753
+*line 754
+*line 755
+*line 756
+L205:L204:bra L213
+L192:
+*line 757
+*line 758
+*line 759
+move R7,R4
+move #11,R0
+asl R0,R4
+move _michan,R0
+asl #7,R0
+or R0,R4
+or _mdb1,R4
+*line 760
+move _mdb2,R3
+muls #252,R3
+and #32736,R3
+*line 761
+move R3,R0
+move R4,R9
+add.l #_mctlval,R9
+move.b R0,(R9)
+*line 762
+*line 763
+clr -2(R14)
+bra L216
+L217:
+*line 764
+*line 765
+*line 765
+move -2(R14),R8
+add.l R8,R8
+move.l #_mctlnum,R9
+move 0(R8,R9.l),R0
+and #255,R0
+cmp _mdb1,R0
+bne L218
+*line 766
+*line 767
+move -2(R14),R8
+add.l R8,R8
+add.l #_ctl2src,R8
+move (R8),R5
+*line 768
+*line 769
+clr R4
+bra L221
+L222:
+*line 770
+*line 771
+*line 772
+*line 773
+move -2(R14),R8
+add.l R8,R8
+add.l #_mctlnum,R8
+btst #0,(R8)
+bne L10007
+move R4,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_grp2prt,R9
+move 0(R8,R9.l),R0
+move R7,R1
+add #1,R1
+cmp R1,R0
+bne L223
+move R4,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_grp2prt,R9
+move 2(R8,R9.l),R0
+move _michan,R1
+add #1,R1
+cmp R1,R0
+bne L223
+L10007:*line 774
+*line 775
+*line 775
+move R3,(sp)
+move R5,-(sp)
+move R4,-(sp)
+jsr _newsv
+addq.l #4,sp
+tst R0
+beq L224
+*line 776
+*line 777
+*line 778
+tst _recsw
+beq L225
+move R4,R8
+add.l R8,R8
+move.l #_grpstat,R9
+tst 0(R8,R9.l)
+beq L225
+tst _ancmsw
+beq L10008
+move R5,R8
+add.l R8,R8
+move.l #_src2var,R9
+move 0(R8,R9.l),R0
+asl #5,R0
+ext.l R0
+move R4,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_varmode,R9
+move 0(R8,R9.l),R0
+bra L10010
+L10008:move R4,R8
+add.l R8,R8
+move.l #_grpmode,R9
+move 0(R8,R9.l),R0
+L10010:cmp #2,R0
+bne L225
+*line 779
+*line 780
+*line 780
+move #6,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L226
+*line 781
+*line 782
+move.l _t_cur,(R13)
+*line 783
+move.b #14,5(R13)
+*line 784
+move R4,R0
+move R5,R9
+add.l R9,R9
+add.l #_src2var,R9
+move (R9),R1
+asl #4,R1
+or R1,R0
+move.b R0,6(R13)
+*line 785
+move R3,R0
+ext.l R0
+move.l #$10,R1
+asl.l R1,R0
+move.l R0,16(R13)
+*line 786
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 787
+move #1,_ctrsw
+*line 788
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 789
+clr _ctrsw
+*line 790
+*line 791
+L226:bra L227
+L225:
+*line 792
+*line 792
+move _angroup,R0
+sub #1,R0
+cmp R0,R4
+bne L228
+*line 793
+*line 794
+move R5,R8
+add.l R8,R8
+move.l #_src2var,R9
+move 0(R8,R9.l),(sp)
+jsr _dsanval
+*line 795
+L228:L227:
+*line 796
+L224:
+*line 797
+L223:L220:
+*line 769
+add #1,R4
+L221:
+*line 769
+cmp #12,R4
+blt L222
+L219:
+*line 798
+*line 799
+L218:L215:
+*line 763
+add #1,-2(R14)
+L216:
+*line 763
+cmp #4,-2(R14)
+blt L217
+L214:
+*line 800
+L213:L191:
+*line 801
+*line 802
+bra L138
+*line 803
+*line 804
+*line 805
+L229:
+*line 806
+*line 807
+*line 808
+move R7,R4
+asl #4,R4
+or _michan,R4
+*line 809
+move _mdb2,R3
+move #9,R0
+asl R0,R3
+move _mdb1,R0
+asl #2,R0
+or R0,R3
+eor #-32768,R3
+*line 810
+move R4,R8
+add.l R8,R8
+add.l #_mpbend,R8
+move R3,(R8)
+*line 811
+*line 812
+clr R5
+bra L232
+L233:
+*line 813
+*line 814
+*line 815
+move R5,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_grp2prt,R9
+move 0(R8,R9.l),R0
+move R7,R1
+add #1,R1
+cmp R1,R0
+bne L234
+move R5,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_grp2prt,R9
+move 2(R8,R9.l),R0
+move _michan,R1
+add #1,R1
+cmp R1,R0
+bne L234
+*line 816
+*line 817
+*line 817
+move R3,(sp)
+move #11,-(sp)
+move R5,-(sp)
+jsr _newsv
+addq.l #4,sp
+tst R0
+beq L235
+*line 818
+*line 819
+*line 820
+tst _recsw
+beq L236
+move R5,R8
+add.l R8,R8
+move.l #_grpstat,R9
+tst 0(R8,R9.l)
+beq L236
+tst _ancmsw
+beq L10011
+move R5,R8
+add.l R8,R8
+move.l #_varmode,R9
+move 0(R8,R9.l),R0
+bra L10013
+L10011:move R5,R8
+add.l R8,R8
+move.l #_grpmode,R9
+move 0(R8,R9.l),R0
+L10013:cmp #2,R0
+bne L236
+*line 821
+*line 822
+*line 822
+move #6,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L237
+*line 823
+*line 824
+move.l _t_cur,(R13)
+*line 825
+move.b #14,5(R13)
+*line 826
+move.b R5,6(R13)
+*line 827
+move R3,R0
+ext.l R0
+move.l #$10,R1
+asl.l R1,R0
+move.l R0,16(R13)
+*line 828
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 829
+move #1,_ctrsw
+*line 830
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 831
+clr _ctrsw
+*line 832
+*line 833
+L237:bra L238
+L236:
+*line 834
+*line 834
+move _angroup,R0
+sub #1,R0
+cmp R0,R5
+bne L239
+*line 835
+*line 836
+clr (sp)
+jsr _dsanval
+*line 837
+L239:L238:
+*line 838
+L235:
+*line 839
+L234:L231:
+*line 812
+add #1,R5
+L232:
+*line 812
+cmp #12,R5
+blt L233
+L230:
+*line 840
+*line 841
+bra L138
+*line 842
+*line 843
+*line 844
+L240:
+*line 845
+*line 846
+*line 847
+*line 847
+cmp #2,_michan
+bne L241
+*line 848
+*line 849
+*line 850
+cmp #1,_clkctl
+bne L242
+tst _midigo
+bne L242
+*line 851
+*line 852
+move _mdb1,R0
+asl #7,R0
+or _mdb2,R0
+muls #12,R0
+move.l R0,-8(R14)
+*line 853
+*line 854
+*line 855
+move.l _fc_val,R0
+cmp.l -8(R14),R0
+beq L243
+*line 855
+move.l -8(R14),R0
+move.l R0,_fc_val
+move.l R0,(sp)
+jsr _sc_goto
+L243:
+*line 856
+*line 857
+L242:bra L138
+*line 858
+*line 859
+bra L244
+L241:
+*line 860
+*line 861
+*line 862
+move R7,R8
+add.l R8,R8
+add.l #_msmstv,R8
+clr (R8)
+*line 863
+move R7,R8
+add.l #_mrstat,R8
+clr.b (R8)
+bra L138
+*line 864
+L244:
+*line 865
+*line 866
+L245:
+*line 867
+*line 868
+*line 869
+move R7,R8
+add.l R8,R8
+add.l #_msmstv,R8
+clr (R8)
+*line 870
+move R7,R8
+add.l #_mrstat,R8
+clr.b (R8)
+bra L138
+*line 871
+*line 872
+bra L138
+L139:sub #8,R0
+cmp #7,R0
+bhi L245
+asl #2,R0
+move R0,R8
+add.l #L246,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L246:.dc.l L155
+.dc.l L140
+.dc.l L163
+.dc.l L169
+.dc.l L245
+.dc.l L245
+.dc.l L229
+.dc.l L240
+.text
+L138:
+*line 873
+*line 874
+L137:
+*line 875
+*line 876
+bra L8
+*line 877
+*line 878
+L247:
+*line 879
+*line 880
+*line 881
+move R7,R8
+add.l R8,R8
+add.l #_msmstv,R8
+clr (R8)
+*line 882
+move R7,R8
+add.l #_mrstat,R8
+clr.b (R8)
+bra L10
+*line 883
+*line 884
+bra L10
+L11:tst R0
+beq L12
+cmp #1,R0
+beq L37
+cmp #2,R0
+beq L86
+cmp #3,R0
+beq L112
+bra L247
+L10:
+*line 885
+L8:
+*line 886
+move R7,R8
+add.l R8,R8
+move.l #_mpmap,R9
+move 0(R8,R9.l),(sp)
+move #1,-(sp)
+jsr _trap13
+addq.l #2,sp
+tst.l R0
+bne L7
+L6:L3:
+*line 107
+add #1,R7
+L4:
+*line 107
+cmp #2,R7
+blt L5
+L2:L1:tst.l (sp)+
+movem.l (sp)+,R3-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/nedacc.s
===================================================================
--- alcyon/nedacc.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/nedacc.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1370 @@
+.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 _noteop
+.globl _notesel
+.globl _t_note
+.globl _p_nbeg
+.globl _p_nend
+.globl _cflag
+.globl _cnote
+.globl _cyval
+.globl _cxval
+.globl _recsw
+.globl _scmctl
+.globl _grpmode
+.globl _grpstat
+.globl _ctime
+.globl _accnote
+.text
+_accnote:
+~~accnote:
+link R14,#0
+movem.l R6-R7,-(sp)
+~rc=R7
+*line 78
+move #-1,R7
+*line 80
+*line 80
+cmp.b #4,_ac_code
+bne L2
+tst _cflag
+beq L2
+*line 81
+*line 82
+*line 83
+move _cnote,R7
+add #1,R7
+*line 84
+bra L3
+L2:
+*line 85
+*line 85
+cmp.b #1,_ac_code
+bne L4
+tst _cflag
+beq L4
+*line 86
+*line 87
+*line 88
+move _cnote,R7
+sub #1,R7
+*line 89
+bra L5
+L4:
+*line 90
+*line 91
+*line 92
+L5:L3:
+*line 101
+move R7,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _ned_acc
+.text
+_ned_acc:
+~~ned_acc:
+~grp=8
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~nn=R7
+~ep=R13
+*line 122
+*line 122
+jsr _accnote
+move R0,R7
+cmp #-1,R7
+bne L7
+*line 123
+*line 124
+*line 125
+move #-1,R0
+bra L6
+*line 126
+*line 127
+L7:
+*line 128
+*line 128
+move #5,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L8
+*line 129
+*line 134
+*line 135
+*line 136
+move.l _ctime,(R13)
+*line 137
+move.b #5,5(R13)
+*line 138
+move.b R7,6(R13)
+*line 139
+move 8(R14),R0
+move.b R0,7(R13)
+*line 140
+move #16128,16(R13)
+*line 141
+move.l _ctime,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+*line 142
+move #3,_noteop
+*line 143
+*line 144
+clr R0
+bra L6
+*line 145
+*line 146
+L8:
+*line 147
+clr _noteop
+*line 149
+move #-1,R0
+bra L6
+L6:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _ned_nat
+.text
+_ned_nat:
+~~ned_nat:
+~grp=8
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+~ep=R13
+*line 169
+*line 169
+move #5,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L10
+*line 170
+*line 175
+*line 176
+*line 177
+move.l _ctime,(R13)
+*line 178
+move.b #5,5(R13)
+*line 179
+move _cnote,R0
+move.b R0,6(R13)
+*line 180
+move 8(R14),R0
+move.b R0,7(R13)
+*line 181
+move #16128,16(R13)
+*line 182
+move.l _ctime,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+*line 183
+move #3,_noteop
+*line 184
+*line 185
+clr R0
+bra L9
+*line 186
+*line 187
+L10:
+*line 188
+clr _noteop
+*line 190
+move #-1,R0
+bra L9
+L9:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _nedesub
+.text
+_nedesub:
+~~nedesub:
+~grp=R7
+~note=R6
+link R14,#0
+movem.l R4-R7/R12-R13,-(sp)
+~ep=R13
+~np=R12
+~et=R5
+*line 215
+move 8(R14),R7
+*line 215
+move 10(R14),R6
+*line 217
+move.l _ctime,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,R13
+L14:
+*line 229
+*line 230
+*line 231
+move.b 5(R13),R5
+ext.w R5
+and #127,R5
+*line 232
+*line 233
+move R5,R0
+bra L16
+*line 234
+L17:
+*line 235
+*line 236
+*line 237
+*line 238
+move.b 6(R13),R0
+ext.w R0
+cmp R0,R6
+bne L18
+move.b 7(R13),R0
+ext.w R0
+cmp R0,R7
+bne L18
+*line 239
+*line 240
+*line 241
+move #1,R0
+bra L11
+*line 242
+bra L19
+L18:bra L15
+L19:
+*line 243
+*line 244
+L20:
+*line 245
+*line 246
+*line 247
+*line 248
+move #1,R0
+bra L11
+*line 249
+L21:
+*line 250
+*line 251
+*line 252
+*line 253
+move.b 6(R13),R0
+ext.w R0
+cmp R0,R6
+bne L22
+move.b 7(R13),R0
+ext.w R0
+cmp R0,R7
+bne L22
+*line 254
+*line 255
+move.l 12(R13),R13
+*line 256
+*line 257
+*line 258
+L25:
+*line 259
+*line 260
+*line 261
+move.b 5(R13),R5
+ext.w R5
+and #127,R5
+*line 262
+*line 263
+move R5,R0
+bra L27
+*line 264
+L28:
+*line 265
+*line 266
+*line 267
+*line 268
+move.b 6(R13),R0
+ext.w R0
+cmp R0,R6
+bne L29
+move.b 7(R13),R0
+ext.w R0
+cmp R0,R7
+bne L29
+*line 269
+*line 270
+*line 271
+move #1,R0
+bra L11
+*line 272
+*line 273
+bra L30
+L29:bra L26
+L30:
+*line 274
+*line 275
+*line 276
+L31:
+*line 277
+*line 278
+*line 279
+*line 280
+move.b 6(R13),R0
+ext.w R0
+cmp R0,R6
+bne L32
+move.b 7(R13),R0
+ext.w R0
+cmp R0,R7
+bne L32
+*line 281
+L33:
+*line 282
+*line 283
+*line 284
+*line 285
+*line 286
+*line 286
+move #5,(sp)
+jsr _e_alc
+move.l R0,R12
+move.l R12,R0
+beq L34
+*line 287
+*line 292
+*line 293
+*line 294
+move.l _ctime,(R12)
+*line 295
+move.b #6,5(R12)
+*line 296
+move.b R6,6(R12)
+*line 297
+move.b R7,7(R12)
+*line 298
+move #16128,16(R12)
+*line 299
+move.l _ctime,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+*line 300
+*line 301
+clr R0
+bra L11
+*line 302
+bra L35
+L34:
+*line 303
+*line 304
+*line 305
+*line 306
+move #-1,R0
+bra L11
+L35:
+*line 307
+*line 308
+*line 309
+*line 310
+L32:bra L26
+L27:cmp #5,R0
+beq L31
+cmp #6,R0
+beq L28
+cmp #21,R0
+beq L33
+bra L26
+L26:
+*line 311
+*line 312
+*line 313
+move.l 12(R13),R13
+*line 314
+L24:bra L25
+L23:
+*line 315
+*line 316
+*line 317
+*line 318
+L22:bra L15
+L16:cmp #1,R0
+beq L20
+cmp #5,R0
+beq L21
+cmp #6,R0
+beq L17
+bra L15
+L15:
+*line 319
+*line 320
+*line 321
+move.l 8(R13),R13
+*line 322
+L13:bra L14
+L12:L11:tst.l (sp)+
+movem.l (sp)+,R5-R7/R12-R13
+unlk R14
+rts
+.globl _ned_end
+.text
+_ned_end:
+~~ned_end:
+~grp=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~rc=R7
+*line 350
+*line 350
+move _cnote,(sp)
+move 8(R14),-(sp)
+jsr _nedesub
+addq.l #2,sp
+move R0,R7
+cmp #-1,R7
+bne L37
+*line 351
+*line 352
+clr _noteop
+*line 353
+*line 354
+move #-1,R0
+bra L36
+*line 355
+bra L38
+L37:
+*line 356
+*line 356
+tst R7
+bne L39
+*line 357
+*line 358
+clr _noteop
+*line 359
+*line 360
+clr R0
+bra L36
+*line 361
+bra L40
+L39:
+*line 362
+*line 362
+cmp #1,R7
+beq L41
+*line 363
+*line 368
+*line 369
+*line 370
+clr _noteop
+*line 371
+*line 372
+move #-1,R0
+bra L36
+*line 373
+*line 374
+*line 375
+*line 380
+*line 381
+L41:L40:L38:
+*line 384
+*line 384
+move _cnote,(sp)
+add #1,(sp)
+move 8(R14),-(sp)
+jsr _nedesub
+addq.l #2,sp
+move R0,R7
+cmp #-1,R7
+bne L42
+*line 385
+*line 386
+clr _noteop
+*line 387
+*line 388
+move #-1,R0
+bra L36
+*line 389
+bra L43
+L42:
+*line 390
+*line 390
+cmp #1,R7
+bne L44
+*line 391
+*line 392
+clr _noteop
+*line 393
+*line 394
+move #-1,R0
+bra L36
+*line 395
+bra L45
+L44:
+*line 396
+*line 396
+tst R7
+beq L46
+*line 397
+*line 402
+*line 403
+*line 404
+clr _noteop
+*line 405
+*line 406
+move #-1,R0
+bra L36
+*line 407
+*line 408
+L46:L45:L43:
+*line 409
+clr _noteop
+*line 411
+clr R0
+bra L36
+L36:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _ned_mvn
+.text
+_ned_mvn:
+~~ned_mvn:
+~grp=8
+link R14,#0
+movem.l R6-R7/R12-R13,-(sp)
+~bp=R13
+~ep=R12
+~note=R7
+*line 432
+*line 432
+tst _notesel
+beq L48
+*line 433
+*line 434
+move.l _p_nbeg,R13
+*line 435
+move.l _p_nend,R12
+*line 436
+*line 437
+*line 438
+*line 439
+*line 440
+*line 441
+*line 442
+cmp.l _p_bak,R13
+bne L49
+*line 442
+move.l 12(R13),_p_bak
+*line 443
+L49:
+*line 444
+*line 445
+cmp.l _p_ctr,R13
+bne L50
+*line 445
+move.l 12(R13),_p_ctr
+*line 446
+L50:
+*line 447
+*line 448
+cmp.l _p_cur,R13
+bne L51
+*line 448
+move.l 12(R13),_p_cur
+*line 449
+L51:
+*line 450
+*line 451
+cmp.l _p_fwd,R13
+bne L52
+*line 451
+move.l 12(R13),_p_fwd
+*line 452
+L52:
+*line 453
+move.l R13,(sp)
+jsr _e_rmv
+*line 454
+*line 455
+*line 456
+*line 457
+*line 458
+*line 459
+*line 460
+*line 461
+cmp.l _p_bak,R12
+bne L53
+*line 461
+move.l 12(R12),_p_bak
+*line 462
+L53:
+*line 463
+*line 464
+cmp.l _p_ctr,R12
+bne L54
+*line 464
+move.l 12(R12),_p_ctr
+*line 465
+L54:
+*line 466
+*line 467
+cmp.l _p_cur,R12
+bne L55
+*line 467
+move.l 12(R12),_p_cur
+*line 468
+L55:
+*line 469
+*line 470
+cmp.l _p_fwd,R12
+bne L56
+*line 470
+move.l 12(R12),_p_fwd
+*line 471
+L56:
+*line 472
+move.l R12,(sp)
+jsr _e_rmv
+*line 473
+*line 474
+move.l _ctime,(R13)
+*line 475
+move.l _ctime,R0
+add.l _t_note,R0
+move.l R0,(R12)
+*line 476
+*line 477
+*line 478
+*line 479
+*line 480
+*line 481
+move.l _ctime,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+*line 482
+move.l _ctime,R0
+add.l _t_note,R0
+move.l R0,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+*line 483
+*line 484
+clr _notesel
+*line 485
+clr _noteop
+*line 486
+*line 487
+clr R0
+bra L47
+*line 488
+bra L57
+L48:
+*line 489
+*line 490
+*line 491
+*line 491
+move _cnote,(sp)
+move 8(R14),-(sp)
+jsr _fcnote
+addq.l #2,sp
+tst.l R0
+beq L58
+*line 492
+*line 493
+move #1,_notesel
+*line 494
+*line 495
+move #-1,R0
+bra L47
+*line 496
+bra L59
+L58:
+*line 497
+*line 497
+jsr _accnote
+move R0,R7
+cmp #-1,R7
+beq L60
+*line 498
+*line 499
+*line 499
+move R7,(sp)
+move 8(R14),-(sp)
+jsr _fcnote
+addq.l #2,sp
+move.l R0,R13
+move.l R13,R0
+beq L61
+*line 500
+*line 501
+move #1,_notesel
+*line 502
+*line 503
+move #-1,R0
+bra L47
+*line 504
+L61:
+*line 505
+*line 506
+L60:L59:
+*line 507
+clr _notesel
+*line 508
+clr _noteop
+*line 509
+*line 510
+move #-1,R0
+bra L47
+L57:L47:tst.l (sp)+
+movem.l (sp)+,R7-R7/R12-R13
+unlk R14
+rts
+.globl _ned_mvb
+.text
+_ned_mvb:
+~~ned_mvb:
+~grp=8
+link R14,#0
+movem.l R6-R7/R12-R13,-(sp)
+~bp=R13
+~ep=R12
+~note=R7
+*line 532
+*line 532
+tst _notesel
+beq L63
+*line 533
+*line 534
+move.l _p_nbeg,R13
+*line 535
+move.l _p_nend,R12
+*line 536
+*line 537
+*line 537
+move.l (R12),R0
+cmp.l _ctime,R0
+bgt L64
+*line 538
+*line 539
+clr _noteop
+*line 540
+clr _notesel
+*line 541
+*line 542
+move #-1,R0
+bra L62
+*line 543
+*line 544
+*line 545
+*line 546
+L64:
+*line 547
+*line 548
+*line 549
+*line 550
+cmp.l _p_bak,R13
+bne L65
+*line 550
+move.l 12(R13),_p_bak
+*line 551
+L65:
+*line 552
+*line 553
+cmp.l _p_ctr,R13
+bne L66
+*line 553
+move.l 12(R13),_p_ctr
+*line 554
+L66:
+*line 555
+*line 556
+cmp.l _p_cur,R13
+bne L67
+*line 556
+move.l 12(R13),_p_cur
+*line 557
+L67:
+*line 558
+*line 559
+cmp.l _p_fwd,R13
+bne L68
+*line 559
+move.l 12(R13),_p_fwd
+*line 560
+L68:
+*line 561
+move.l R13,(sp)
+jsr _e_rmv
+*line 562
+*line 563
+move.l _ctime,(R13)
+*line 564
+*line 565
+*line 566
+*line 567
+move.l _ctime,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+*line 568
+*line 569
+clr _noteop
+*line 570
+clr _notesel
+*line 571
+*line 572
+clr R0
+bra L62
+*line 573
+*line 574
+bra L69
+L63:
+*line 575
+*line 576
+*line 577
+*line 577
+move _cnote,(sp)
+move 8(R14),-(sp)
+jsr _fcnote
+addq.l #2,sp
+tst.l R0
+beq L70
+*line 578
+*line 579
+move #1,_notesel
+*line 580
+*line 581
+move #-1,R0
+bra L62
+*line 582
+bra L71
+L70:
+*line 583
+*line 583
+jsr _accnote
+move R0,R7
+cmp #-1,R7
+beq L72
+*line 584
+*line 585
+*line 585
+move R7,(sp)
+move 8(R14),-(sp)
+jsr _fcnote
+addq.l #2,sp
+move.l R0,R13
+move.l R13,R0
+beq L73
+*line 586
+*line 587
+move #1,_notesel
+*line 588
+*line 589
+move #-1,R0
+bra L62
+*line 590
+L73:
+*line 591
+*line 592
+L72:L71:
+*line 593
+clr _notesel
+*line 594
+clr _noteop
+*line 595
+*line 596
+move #-1,R0
+bra L62
+L69:L62:tst.l (sp)+
+movem.l (sp)+,R7-R7/R12-R13
+unlk R14
+rts
+.globl _ned_mve
+.text
+_ned_mve:
+~~ned_mve:
+~grp=8
+link R14,#0
+movem.l R6-R7/R12-R13,-(sp)
+~bp=R13
+~ep=R12
+~note=R7
+*line 618
+*line 618
+tst _notesel
+beq L75
+*line 619
+*line 620
+move.l _p_nbeg,R13
+*line 621
+move.l _p_nend,R12
+*line 622
+*line 623
+*line 623
+move.l (R13),R0
+cmp.l _ctime,R0
+blt L76
+*line 624
+*line 625
+clr _noteop
+*line 626
+clr _notesel
+*line 627
+*line 628
+move #-1,R0
+bra L74
+*line 629
+*line 630
+*line 631
+*line 632
+L76:
+*line 633
+*line 634
+*line 635
+*line 636
+cmp.l _p_bak,R12
+bne L77
+*line 636
+move.l 12(R12),_p_bak
+*line 637
+L77:
+*line 638
+*line 639
+cmp.l _p_ctr,R12
+bne L78
+*line 639
+move.l 12(R12),_p_ctr
+*line 640
+L78:
+*line 641
+*line 642
+cmp.l _p_cur,R12
+bne L79
+*line 642
+move.l 12(R12),_p_cur
+*line 643
+L79:
+*line 644
+*line 645
+cmp.l _p_fwd,R12
+bne L80
+*line 645
+move.l 12(R12),_p_fwd
+*line 646
+L80:
+*line 647
+move.l R12,(sp)
+jsr _e_rmv
+*line 648
+*line 649
+move.l _ctime,(R12)
+*line 650
+*line 651
+*line 652
+*line 653
+move.l _ctime,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+*line 654
+*line 655
+clr _noteop
+*line 656
+clr _notesel
+*line 657
+*line 658
+clr R0
+bra L74
+*line 659
+bra L81
+L75:
+*line 660
+*line 661
+*line 662
+*line 662
+move _cnote,(sp)
+move 8(R14),-(sp)
+jsr _fcnote
+addq.l #2,sp
+tst.l R0
+beq L82
+*line 663
+*line 664
+move #1,_notesel
+*line 665
+*line 666
+move #-1,R0
+bra L74
+*line 667
+bra L83
+L82:
+*line 668
+*line 668
+jsr _accnote
+move R0,R7
+cmp #-1,R7
+beq L84
+*line 669
+*line 670
+*line 670
+move R7,(sp)
+move 8(R14),-(sp)
+jsr _fcnote
+addq.l #2,sp
+move.l R0,R13
+move.l R13,R0
+beq L85
+*line 671
+*line 672
+move #1,_notesel
+*line 673
+*line 674
+move #-1,R0
+bra L74
+*line 675
+L85:
+*line 676
+*line 677
+L84:L83:
+*line 678
+clr _notesel
+*line 679
+clr _noteop
+*line 680
+*line 681
+move #-1,R0
+bra L74
+L81:L74:tst.l (sp)+
+movem.l (sp)+,R7-R7/R12-R13
+unlk R14
+rts
+.globl _donote
+.text
+_donote:
+~~donote:
+link R14,#0
+movem.l R4-R7,-(sp)
+~grp=R7
+~i=R6
+~gs=R5
+*line 700
+*line 700
+cmp #-1,_scmctl
+beq L87
+*line 701
+*line 702
+bra L86
+*line 703
+*line 704
+*line 705
+L87:
+*line 706
+*line 706
+tst _recsw
+bne L88
+*line 707
+*line 708
+bra L86
+*line 709
+*line 710
+*line 711
+*line 712
+*line 713
+L88:
+*line 714
+clr R5
+*line 715
+move #-1,R7
+*line 717
+clr R6
+bra L91
+L92:
+*line 718
+*line 719
+*line 719
+move R6,R8
+add.l R8,R8
+add.l #_grpmode,R8
+cmp #2,(R8)
+bne L93
+move R6,R8
+add.l R8,R8
+move.l #_grpstat,R9
+tst 0(R8,R9.l)
+beq L93
+*line 720
+*line 721
+move R6,R7
+*line 722
+add #1,R5
+*line 726
+*line 727
+L93:L90:
+*line 717
+add #1,R6
+L91:
+*line 717
+cmp #12,R6
+blt L92
+L89:
+*line 737
+*line 737
+cmp #1,R5
+beq L94
+*line 738
+*line 739
+bra L86
+*line 740
+*line 741
+*line 742
+L94:
+*line 743
+*line 743
+move _cyval,(sp)
+move _cxval,-(sp)
+jsr _pix2mid
+addq.l #2,sp
+tst R0
+beq L95
+*line 744
+*line 749
+*line 750
+bra L86
+*line 751
+*line 752
+*line 753
+*line 754
+*line 759
+*line 760
+L95:
+*line 763
+move _noteop,R0
+bra L97
+*line 764
+L98:
+*line 765
+*line 766
+*line 767
+*line 768
+move R7,(sp)
+jsr _ned_acc
+tst R0
+bne L96
+*line 769
+*line 770
+move.l _fc_val,(sp)
+jsr _sc_refr
+bra L96
+*line 771
+*line 772
+L99:
+*line 773
+*line 774
+*line 775
+*line 776
+move R7,(sp)
+jsr _ned_nat
+tst R0
+bne L96
+*line 777
+*line 778
+move.l _fc_val,(sp)
+jsr _sc_refr
+bra L96
+*line 779
+*line 780
+L100:
+*line 781
+*line 782
+*line 783
+*line 784
+move R7,(sp)
+jsr _ned_end
+tst R0
+bne L96
+*line 785
+*line 786
+move.l _fc_val,(sp)
+jsr _sc_refr
+bra L96
+*line 787
+*line 788
+*line 789
+L101:
+*line 790
+*line 791
+*line 792
+*line 793
+move R7,(sp)
+jsr _ned_mvn
+tst R0
+bne L96
+*line 794
+*line 795
+move.l _fc_val,(sp)
+jsr _sc_refr
+bra L96
+*line 796
+*line 797
+L102:
+*line 798
+*line 799
+*line 800
+*line 801
+move R7,(sp)
+jsr _ned_mvb
+tst R0
+bne L96
+*line 802
+*line 803
+move.l _fc_val,(sp)
+jsr _sc_refr
+bra L96
+*line 804
+*line 805
+L103:
+*line 806
+*line 807
+*line 808
+*line 809
+move R7,(sp)
+jsr _ned_mve
+tst R0
+bne L96
+*line 810
+*line 811
+move.l _fc_val,(sp)
+jsr _sc_refr
+bra L96
+*line 812
+*line 813
+L104:
+*line 814
+*line 815
+*line 816
+*line 817
+clr _noteop
+bra L96
+L97:sub #1,R0
+cmp #5,R0
+bhi L104
+asl #2,R0
+move R0,R8
+add.l #L105,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L105:.dc.l L98
+.dc.l L99
+.dc.l L100
+.dc.l L101
+.dc.l L102
+.dc.l L103
+.text
+L96:
+*line 820
+jsr _dnedmod
+bra L86
+L86:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
Index: alcyon/open.s
===================================================================
--- alcyon/open.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/open.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,365 @@
+.globl _errno
+.globl _chantab
+.globl _Wrkbuf
+.data
+L1:.dc.b $2
+.dc.b $2
+.dc.b $1
+.dc.b $0
+*line 21
+.dc.l __noper
+.text
+.data
+L2:.dc.b $1
+.dc.b $1
+.dc.b $0
+.dc.b $1
+*line 22
+.dc.l __fileop
+.text
+.globl __fcbtab
+.data
+L3:
+*line 34
+.dc.l L4
+*line 34
+.dc.l L1
+.dc.l $2
+*line 35
+.dc.l L5
+*line 35
+.dc.l L1
+.dc.l $2
+.dc.l $0
+*line 37
+.dc.l L2
+.dc.l $0
+.text
+.globl _open
+.text
+_open:
+~~open:
+~name=8
+~flag=12
+~mode=14
+link R14,#-4
+movem.l R7-R7/R11-R13,-(sp)
+~dp=R13
+~chp=R12
+~dev=R11
+~fd=-2
+~mdmask=-4
+*line 64
+move.l #_chantab,R12
+clr -2(R14)
+bra L9
+L10:
+*line 65
+*line 66
+move.l 4(R12),R0
+cmp.l #__badfd,R0
+beq L11
+*line 67
+L8:
+*line 64
+add.l #12,R12
+add #1,-2(R14)
+L9:
+*line 64
+cmp #11,-2(R14)
+blt L10
+L7:
+*line 68
+move #24,_errno
+*line 69
+move #-1,R0
+bra L6
+L11:
+*line 74
+*line 75
+*line 76
+move.l #L3,R13
+bra L14
+L15:
+*line 77
+*line 78
+move.l 8(R14),(sp)
+move.l (R13),-(sp)
+jsr _strcmp
+addq.l #4,sp
+tst R0
+beq L12
+*line 79
+L13:
+*line 76
+add.l #12,R13
+L14:
+*line 76
+tst.l (R13)
+bne L15
+L12:
+*line 80
+move.l 4(R13),R11
+*line 81
+move 12(R14),R0
+and #3,R0
+add #1,R0
+move R0,-4(R14)
+*line 83
+*line 83
+btst #0,-3(R14)
+beq L16
+*line 84
+*line 85
+*line 85
+move.b (R11),(R12)
+bne L17
+*line 86
+*line 87
+move #13,_errno
+*line 88
+move #-1,R0
+bra L6
+*line 89
+L17:
+*line 90
+*line 91
+L16:
+*line 92
+*line 92
+btst #1,-3(R14)
+beq L18
+*line 93
+*line 94
+*line 94
+move.b 1(R11),1(R12)
+bne L19
+*line 95
+*line 96
+move #13,_errno
+*line 97
+move #-1,R0
+bra L6
+*line 98
+L19:
+*line 99
+*line 100
+*line 101
+*line 102
+L18:
+*line 103
+move.l 8(R13),8(R12)
+*line 104
+move.b 2(R11),2(R12)
+*line 105
+move.b 3(R11),3(R12)
+*line 106
+move.l #__noper,4(R12)
+*line 108
+*line 108
+move.l R13,-(sp)
+move.l R12,-(sp)
+move 14(R14),-(sp)
+move 12(R14),-(sp)
+move.l 8(R14),-(sp)
+move.l 4(R11),R8
+jsr (R8)
+adda.l #16,sp
+tst R0
+bge L20
+*line 109
+*line 110
+move.l #__badfd,4(R12)
+*line 111
+move #-1,R0
+bra L6
+*line 112
+*line 113
+L20:
+*line 114
+move -2(R14),R0
+bra L6
+L6:tst.l (sp)+
+movem.l (sp)+,R11-R13
+unlk R14
+rts
+.globl _opena
+.text
+_opena:
+~~opena:
+~name=8
+~flag=12
+~mode=14
+link R14,#-4
+*line 134
+move 14(R14),(sp)
+move 12(R14),-(sp)
+move.l 8(R14),-(sp)
+jsr _open
+addq.l #6,sp
+bra L21
+L21:unlk R14
+rts
+.globl _openb
+.text
+_openb:
+~~openb:
+~name=8
+~flag=12
+~mode=14
+link R14,#-4
+*line 151
+move 14(R14),(sp)
+move 12(R14),-(sp)
+or #-32768,(sp)
+move.l 8(R14),-(sp)
+jsr _open
+addq.l #6,sp
+bra L22
+L22:unlk R14
+rts
+.globl _creat
+.text
+_creat:
+~~creat:
+~name=8
+~mode=12
+link R14,#-4
+*line 172
+move 12(R14),(sp)
+move #769,-(sp)
+move.l 8(R14),-(sp)
+jsr _open
+addq.l #6,sp
+bra L23
+L23:unlk R14
+rts
+.globl _creata
+.text
+_creata:
+~~creata:
+~name=8
+~mode=12
+link R14,#-4
+*line 193
+move 12(R14),(sp)
+move #769,-(sp)
+move.l 8(R14),-(sp)
+jsr _open
+addq.l #6,sp
+bra L24
+L24:unlk R14
+rts
+.globl _creatb
+.text
+_creatb:
+~~creatb:
+~name=8
+~mode=12
+link R14,#-4
+*line 211
+move 12(R14),(sp)
+move #-31999,-(sp)
+move.l 8(R14),-(sp)
+jsr _creat
+addq.l #6,sp
+bra L25
+L25:unlk R14
+rts
+.globl __fileop
+.text
+__fileop:
+~~_fileop:
+~name=8
+~flag=12
+~mode=14
+~chp=16
+~dp=20
+link R14,#-14
+movem.l R7-R7/R13-R13,-(sp)
+~fp=R13
+~tmpname=-10
+~tmpext=-14
+*line 237
+move.l #__fcbtab,R13
+bra L29
+L30:
+*line 238
+*line 239
+tst 32(R13)
+beq L31
+*line 240
+L28:
+*line 237
+add.l #56,R13
+L29:
+*line 237
+cmp.l #448+__fcbtab,R13
+blo L30
+L27:
+*line 241
+move #23,_errno
+*line 242
+move #-1,R0
+bra L26
+L31:
+*line 244
+*line 245
+*line 246
+*line 247
+*line 248
+*line 248
+move 12(R14),(sp)
+move.l R14,-(sp)
+add.l #-14,(sp)
+move.l 8(R14),-(sp)
+jsr _FilExt
+addq.l #8,sp
+move.l R0,-(sp)
+move.l R14,-(sp)
+add.l #-10,(sp)
+move.l 8(R14),-(sp)
+jsr _FilName
+addq.l #8,sp
+move.l R0,-(sp)
+move.l R13,-(sp)
+jsr __inifcb
+adda.l #12,sp
+tst R0
+beq L32
+*line 249
+*line 250
+move #22,_errno
+*line 251
+move #-1,R0
+bra L26
+*line 252
+*line 253
+L32:
+*line 254
+*line 255
+move.l R13,(sp)
+jsr __opfcb
+tst R0
+beq L33
+*line 255
+move #-1,R0
+bra L26
+*line 256
+L33:
+*line 257
+move.l 16(R14),R8
+move.l R13,8(R8)
+*line 258
+move.l 16(R14),R8
+move.l #__filecl,4(R8)
+*line 260
+clr R0
+bra L26
+L26:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.data
+L4:.dc.b $63,$6F,$6E,$3A,$0
+L5:.dc.b $43,$4F,$4E,$3A,$0
Index: alcyon/pause.s
===================================================================
--- alcyon/pause.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/pause.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,22 @@
+.globl _pause
+.text
+_pause:
+~~pause:
+~s=8
+link R14,#-4
+*line 15
+move.l 8(R14),(sp)
+move #2,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 16
+move.l #L2,(sp)
+move #2,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 17
+jsr _waitcr
+L1:unlk R14
+rts
+.data
+L2:.dc.b $D,$A,$0
Index: alcyon/pix2mid.s
===================================================================
--- alcyon/pix2mid.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/pix2mid.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,351 @@
+.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 _cflag
+.globl _cnote
+.globl _cyval
+.globl _cxval
+.globl _ctime
+.globl _t_cur
+.globl _mpixtab
+.data
+_mpixtab:
+.dc.w $1
+.dc.w $6C
+.dc.w $0
+.dc.w $0
+.dc.w $5
+.dc.w $6B
+.dc.w $0
+.dc.w $1
+.dc.w $9
+.dc.w $69
+.dc.w $1
+.dc.w $1
+.dc.w $D
+.dc.w $67
+.dc.w $1
+.dc.w $1
+.dc.w $11
+.dc.w $65
+.dc.w $1
+.dc.w $0
+.dc.w $15
+.dc.w $64
+.dc.w $0
+.dc.w $1
+.dc.w $19
+.dc.w $62
+.dc.w $1
+.dc.w $1
+.dc.w $1D
+.dc.w $60
+.dc.w $1
+.dc.w $0
+.dc.w $21
+.dc.w $5F
+.dc.w $0
+.dc.w $1
+.dc.w $25
+.dc.w $5D
+.dc.w $1
+.dc.w $1
+.dc.w $29
+.dc.w $5B
+.dc.w $1
+.dc.w $1
+.dc.w $2D
+.dc.w $59
+.dc.w $1
+.dc.w $0
+.dc.w $31
+.dc.w $58
+.dc.w $0
+.dc.w $1
+.dc.w $35
+.dc.w $56
+.dc.w $1
+.dc.w $1
+.dc.w $39
+.dc.w $54
+.dc.w $1
+.dc.w $0
+.dc.w $3D
+.dc.w $53
+.dc.w $0
+.dc.w $1
+.dc.w $41
+.dc.w $51
+.dc.w $1
+.dc.w $1
+.dc.w $45
+.dc.w $4F
+.dc.w $1
+.dc.w $1
+.dc.w $49
+.dc.w $4D
+.dc.w $1
+.dc.w $0
+.dc.w $4D
+.dc.w $4C
+.dc.w $0
+.dc.w $1
+.dc.w $51
+.dc.w $4A
+.dc.w $1
+.dc.w $1
+.dc.w $55
+.dc.w $48
+.dc.w $1
+.dc.w $0
+.dc.w $59
+.dc.w $47
+.dc.w $0
+.dc.w $1
+.dc.w $5D
+.dc.w $45
+.dc.w $1
+.dc.w $1
+.dc.w $61
+.dc.w $43
+.dc.w $1
+.dc.w $1
+.dc.w $65
+.dc.w $41
+.dc.w $1
+.dc.w $0
+.dc.w $69
+.dc.w $40
+.dc.w $0
+.dc.w $1
+.dc.w $6D
+.dc.w $3E
+.dc.w $1
+.dc.w $1
+.dc.w $71
+.dc.w $3C
+.dc.w $1
+.dc.w $0
+.dc.w $75
+.dc.w $3B
+.dc.w $0
+.dc.w $1
+.dc.w $79
+.dc.w $39
+.dc.w $1
+.dc.w $1
+.dc.w $7D
+.dc.w $37
+.dc.w $1
+.dc.w $1
+.dc.w $81
+.dc.w $35
+.dc.w $1
+.dc.w $0
+.dc.w $85
+.dc.w $34
+.dc.w $0
+.dc.w $1
+.dc.w $89
+.dc.w $32
+.dc.w $1
+.dc.w $1
+.dc.w $8D
+.dc.w $30
+.dc.w $1
+.dc.w $0
+.dc.w $91
+.dc.w $2F
+.dc.w $0
+.dc.w $1
+.dc.w $95
+.dc.w $2D
+.dc.w $1
+.dc.w $1
+.dc.w $99
+.dc.w $2B
+.dc.w $1
+.dc.w $1
+.dc.w $9D
+.dc.w $29
+.dc.w $1
+.dc.w $0
+.dc.w $A1
+.dc.w $28
+.dc.w $0
+.dc.w $1
+.dc.w $A5
+.dc.w $26
+.dc.w $1
+.dc.w $1
+.dc.w $A9
+.dc.w $24
+.dc.w $1
+.dc.w $0
+.dc.w $AD
+.dc.w $23
+.dc.w $0
+.dc.w $1
+.dc.w $B1
+.dc.w $21
+.dc.w $1
+.dc.w $1
+.dc.w $B5
+.dc.w $1F
+.dc.w $1
+.dc.w $1
+.dc.w $B9
+.dc.w $1D
+.dc.w $1
+.dc.w $0
+.dc.w $BD
+.dc.w $1C
+.dc.w $0
+.dc.w $1
+.dc.w $C1
+.dc.w $1A
+.dc.w $1
+.dc.w $1
+.dc.w $C5
+.dc.w $18
+.dc.w $1
+.dc.w $0
+.dc.w $C9
+.dc.w $17
+.dc.w $0
+.dc.w $1
+.dc.w $CD
+.dc.w $15
+.dc.w $1
+.dc.w $0
+.globl _pix2mid
+.text
+_pix2mid:
+~~pix2mid:
+link R14,#0
+movem.l R3-R7,-(sp)
+~i=R7
+~cy=R6
+~mpc=R5
+~ct=R4
+*line 127
+move #-1,_cnote
+*line 128
+move.l #$ffffffff,_ctime
+*line 129
+move #-1,_cflag
+*line 130
+cmp.b #4,_ac_code
+bne L10000
+move #2,R0
+bra L10002
+L10000:move #3,R0
+L10002:move R0,R5
+*line 132
+move _cxval,R4
+ext.l R4
+add.l _t_cur,R4
+add.l #$ffffff00,R4
+*line 134
+*line 135
+tst.l R4
+bge L2
+*line 135
+move #-1,R0
+bra L1
+*line 136
+L2:
+*line 137
+move.l R4,_ctime
+*line 138
+move _cyval,R6
+add #-14,R6
+*line 140
+clr R7
+bra L5
+L6:
+*line 141
+*line 142
+*line 143
+move R7,R0
+asl #3,R0
+ext.l R0
+add.l #_mpixtab,R0
+move.l R0,R8
+cmp (R8),R6
+blt L7
+move R7,R0
+asl #3,R0
+ext.l R0
+move.l R0,R8
+move.l #_mpixtab,R9
+move 0(R8,R9.l),R0
+add #2,R0
+cmp R0,R6
+bgt L7
+*line 144
+*line 145
+move R7,R0
+asl #3,R0
+ext.l R0
+add.l #_mpixtab,R0
+move.l R0,R8
+move 2(R8),_cnote
+*line 146
+move R7,R0
+asl #3,R0
+ext.l R0
+move R5,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+add.l #_mpixtab,R0
+move.l R0,R8
+move (R8),_cflag
+bra L3
+*line 147
+*line 148
+L7:L4:
+*line 140
+add #1,R7
+L5:
+*line 140
+cmp #52,R7
+blt L6
+L3:
+*line 151
+cmp #$ffffffff,_cnote
+bne L10003
+move #-1,R0
+bra L10005
+L10003:clr R0
+L10005:bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.data
Index: alcyon/posit.s
===================================================================
--- alcyon/posit.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/posit.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,92 @@
+.globl _chantab
+.globl _Wrkbuf
+.globl _errno
+.globl _posit
+.text
+_posit:
+~~posit:
+~fd=8
+~pos=10
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+~fp=R13
+*line 28
+*line 28
+tst 8(R14)
+blt L10000
+cmp #11,8(R14)
+ble L2
+L10000:*line 29
+*line 30
+move #9,_errno
+*line 31
+move #-1,R0
+bra L1
+*line 32
+*line 33
+L2:
+*line 34
+move 8(R14),R0
+muls #12,R0
+add.l #_chantab,R0
+move.l R0,R8
+move.l 8(R8),R13
+*line 36
+*line 37
+move 8(R14),R0
+muls #12,R0
+add.l #_chantab,R0
+move.l R0,R8
+tst.b 3(R8)
+beq L10001
+clr R0
+move 10(R14),R0
+move #9,R1
+lsl R1,R0
+swap R0
+clr R0
+swap R0
+cmp.l 48(R13),R0
+ble L3
+L10001:*line 38
+*line 39
+move #22,_errno
+*line 40
+or #8192,32(R13)
+*line 41
+move #-1,R0
+bra L1
+*line 42
+*line 43
+L3:
+*line 44
+clr.l R0
+move 10(R14),R0
+move.l R0,40(R13)
+*line 45
+clr 38(R13)
+*line 47
+*line 47
+move.l R13,(sp)
+jsr __seek
+tst R0
+bge L4
+*line 48
+*line 49
+move #5,_errno
+*line 50
+or #8192,32(R13)
+*line 51
+move #-1,R0
+bra L1
+*line 52
+*line 53
+L4:
+*line 54
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.data
Index: alcyon/printf.s
===================================================================
--- alcyon/printf.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/printf.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,56 @@
+.globl _printf
+.text
+_printf:
+~~printf:
+~fmt=8
+~va_alist=12
+link R14,#-4
+movem.l R6-R7,-(sp)
+~count=R7
+~aptr=-4
+*line 36
+lea 12(R14),R8
+move.l R8,-4(R14)
+*line 37
+move.l -4(R14),(sp)
+move.l 8(R14),-(sp)
+move.l #_fpsub,-(sp)
+jsr _dofmt_
+addq.l #8,sp
+move.l R0,R7
+*line 39
+move.l R7,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.text
+_fpsub:
+~~fpsub:
+~c=8
+link R14,#-4
+*line 55
+*line 56
+cmp #10,8(R14)
+bne L4
+*line 56
+move #13,(sp)
+move #2,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 57
+L4:
+*line 58
+move 8(R14),(sp)
+move #2,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 59
+move 8(R14),R0
+bra L3
+L3:unlk R14
+rts
+.data
Index: alcyon/ptdisp.s
===================================================================
--- alcyon/ptdisp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/ptdisp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,892 @@
+.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 _stmptr
+.globl _defptr
+.globl _patches
+.globl _defents
+.globl _seqtab
+.globl _seqflag
+.globl _seqline
+.globl _seqstim
+.globl _seqtime
+.globl _sregval
+.globl _trstate
+.globl _BakLine
+.globl _FwdLine
+.globl _obj8
+.globl _obj9
+.globl _obj10
+.globl _obj11
+.globl _LineBuf
+.globl _ScObAdr
+.globl _OldLine
+.globl _LineAtr
+.globl _CurLine
+.globl _CurScan
+.globl _ScrlObj
+.globl _SmScNsl
+.globl _PdScDnF
+.globl _PdScUpF
+.globl _ctcsw
+.globl _submenu
+.globl _cxval
+.globl _cg3
+.globl _seqflag
+.comm _seqflag,32
+.globl _seqline
+.comm _seqline,32
+.globl _seqstim
+.comm _seqstim,32
+.globl _seqtime
+.comm _seqtime,32
+.globl _sregval
+.comm _sregval,32
+.globl _trstate
+.comm _trstate,32
+.globl _seqtab
+.comm _seqtab,14000
+.globl _pthead
+.data
+_pthead:
+.dc.b $B0,$20,$44,$65,$66,$69,$6E,$65,$72,$20,$70,$20,$63,$68,$20,$53,$74,$6D,$75,$6C,$75,$73,$20,$70,$20,$63,$68,$20,$44,$65
+.dc.b $73,$74,$6E,$61,$74,$69,$6F,$6E,$20,$BD,$BE,$20,$44,$61,$74,$75,$6D,$20,$B0,$20,$4E,$6F,$20,$53,$65,$71,$20,$52,$67,$20
+.dc.b $54,$20,$B0,$0
+.globl _ptmcon
+.data
+_ptmcon:
+*line 53
+.dc.l L2
+*line 54
+.dc.l L3
+*line 55
+.dc.l L4
+*line 56
+.dc.l L5
+*line 58
+.dc.l L6
+.globl _ptabpal
+.data
+_ptabpal:
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $2
+.dc.w $3
+.dc.w $3
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $2
+.dc.w $0
+.dc.w $2
+.dc.w $0
+.dc.w $0
+.dc.w $3
+.dc.w $3
+.dc.w $0
+.dc.w $0
+.dc.w $3
+.dc.w $3
+.dc.w $0
+.dc.w $1
+.dc.w $2
+.dc.w $0
+.dc.w $0
+.dc.w $3
+.dc.w $3
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $0
+.dc.w $3
+.dc.w $0
+.dc.w $3
+.dc.w $1
+.dc.w $2
+.dc.w $0
+.dc.w $2
+.dc.w $3
+.dc.w $2
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $1
+.dc.w $2
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.globl _ptwin
+.text
+_ptwin:
+~~ptwin:
+~n=8
+link R14,#-194
+movem.l R5-R7,-(sp)
+~i=R7
+~j=R6
+~atrbuf=-128
+~linbuf=-194
+*line 96
+*line 97
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L8
+*line 97
+clr (sp)
+jsr _vbank
+*line 98
+L8:
+*line 99
+move 8(R14),R0
+bra L10
+*line 100
+L11:
+*line 101
+*line 102
+*line 103
+*line 104
+*line 105
+move #63,(sp)
+move #177,-(sp)
+move.l R14,-(sp)
+add.l #-194,(sp)
+jsr _memset
+addq.l #6,sp
+*line 106
+move.b #186,-194(R14)
+*line 107
+move.b #183,-146(R14)
+*line 108
+move.b #187,-132(R14)
+*line 109
+clr.b -131(R14)
+*line 110
+*line 111
+move #63,(sp)
+move #226,-(sp)
+move.l R14,-(sp)
+add.l #-128,(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 112
+clr -2(R14)
+*line 113
+*line 114
+move.l R14,(sp)
+add.l #-128,(sp)
+move.l R14,-(sp)
+add.l #-194,(sp)
+clr -(sp)
+clr -(sp)
+move.l _obj8,-(sp)
+jsr _vputsa
+adda.l #12,sp
+*line 115
+*line 116
+*line 117
+*line 118
+move #64,(sp)
+move #274,-(sp)
+move.l R14,-(sp)
+add.l #-128,(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 119
+move #226,-128(R14)
+*line 120
+move #18,-126(R14)
+*line 121
+move #18,-100(R14)
+*line 122
+move #18,-74(R14)
+*line 123
+move #18,-46(R14)
+*line 124
+move #18,-34(R14)
+*line 125
+move #226,-32(R14)
+*line 126
+move #18,-30(R14)
+*line 127
+move #18,-24(R14)
+*line 128
+move #18,-16(R14)
+*line 129
+move #18,-10(R14)
+*line 130
+move #18,-6(R14)
+*line 131
+move #226,-4(R14)
+*line 132
+clr -2(R14)
+*line 133
+*line 134
+move.l R14,(sp)
+add.l #-128,(sp)
+move.l #_pthead,-(sp)
+clr -(sp)
+move #1,-(sp)
+move.l _obj8,-(sp)
+jsr _vputsa
+adda.l #12,sp
+*line 135
+*line 136
+*line 137
+*line 138
+*line 139
+move #63,(sp)
+move #177,-(sp)
+move.l R14,-(sp)
+add.l #-194,(sp)
+jsr _memset
+addq.l #6,sp
+*line 140
+move.b #182,-194(R14)
+*line 141
+move.b #181,-146(R14)
+*line 142
+move.b #180,-132(R14)
+*line 143
+clr.b -131(R14)
+*line 144
+*line 145
+move #63,(sp)
+move #226,-(sp)
+move.l R14,-(sp)
+add.l #-128,(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 146
+clr -2(R14)
+*line 147
+*line 148
+move.l R14,(sp)
+add.l #-128,(sp)
+move.l R14,-(sp)
+add.l #-194,(sp)
+clr -(sp)
+clr -(sp)
+move.l _obj11,-(sp)
+jsr _vputsa
+adda.l #12,sp
+*line 149
+*line 150
+*line 151
+*line 152
+move #63,(sp)
+move #177,-(sp)
+move.l R14,-(sp)
+add.l #-194,(sp)
+jsr _memset
+addq.l #6,sp
+*line 153
+move.b #185,-194(R14)
+*line 154
+move.b #184,-132(R14)
+*line 155
+clr.b -131(R14)
+*line 156
+*line 157
+move #63,(sp)
+move #226,-(sp)
+move.l R14,-(sp)
+add.l #-128,(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 158
+clr -2(R14)
+*line 159
+*line 160
+move.l R14,(sp)
+add.l #-128,(sp)
+move.l R14,-(sp)
+add.l #-194,(sp)
+clr -(sp)
+move #6,-(sp)
+move.l _obj11,-(sp)
+jsr _vputsa
+adda.l #12,sp
+*line 161
+bra L9
+*line 162
+*line 163
+*line 164
+L12:
+*line 165
+*line 166
+*line 167
+move #13,(sp)
+clr -(sp)
+jsr _SetDTop
+addq.l #2,sp
+*line 168
+*line 169
+clr R7
+bra L15
+L16:
+*line 170
+*line 171
+clr R6
+bra L19
+L20:
+*line 172
+move R6,R8
+add.l R14,R8
+move.b #32,-194(R8)
+L18:
+*line 171
+add #1,R6
+L19:
+*line 171
+cmp #47,R6
+blt L20
+L17:
+*line 172
+*line 173
+*line 174
+clr.b -147(R14)
+*line 175
+*line 176
+move #226,(sp)
+move.l #L21,-(sp)
+clr -(sp)
+move R7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 177
+*line 178
+*line 179
+cmp #7,R7
+bne L10000
+move #18,(sp)
+bra L10002
+L10000:move #18,(sp)
+L10002:move.l R14,-(sp)
+add.l #-194,(sp)
+move #1,-(sp)
+move R7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+L14:
+*line 169
+add #1,R7
+L15:
+*line 169
+cmp #16,R7
+blt L16
+L13:
+*line 180
+*line 181
+*line 182
+jsr _dptw
+*line 183
+bra L9
+*line 184
+*line 185
+*line 186
+L22:
+*line 187
+*line 188
+*line 189
+clr R7
+bra L25
+L26:
+*line 190
+*line 191
+*line 192
+move R7,R8
+add.l R8,R8
+move.l #_trstate,R9
+move 0(R8,R9.l),(sp)
+move R7,R8
+add.l R8,R8
+move.l #_sregval,R9
+move 0(R8,R9.l),-(sp)
+move R7,R8
+add.l R8,R8
+move.l #_seqline,R9
+move 0(R8,R9.l),-(sp)
+move.l #L27,-(sp)
+move.l R14,-(sp)
+add.l #-194,(sp)
+jsr _sprintf
+adda.l #12,sp
+*line 193
+*line 194
+*line 195
+move.l #_cg3,(sp)
+move #14,-(sp)
+move #14,-(sp)
+move.l #L28,-(sp)
+clr -(sp)
+move R7,-(sp)
+move #2,-(sp)
+move #14,-(sp)
+move #16,-(sp)
+move.l _obj10,-(sp)
+jsr _vvputsv
+adda.l #22,sp
+*line 196
+*line 197
+*line 198
+move.l #_cg3,(sp)
+move #14,-(sp)
+move #14,-(sp)
+move.l R14,-(sp)
+add.l #-194,(sp)
+move #1,-(sp)
+move R7,-(sp)
+move #2,-(sp)
+move #1,-(sp)
+move #16,-(sp)
+move.l _obj10,-(sp)
+jsr _vvputsv
+adda.l #22,sp
+*line 199
+*line 200
+*line 201
+move.l #_cg3,(sp)
+move #14,-(sp)
+move #14,-(sp)
+move.l #L29,-(sp)
+move #14,-(sp)
+move R7,-(sp)
+move #2,-(sp)
+move #14,-(sp)
+move #16,-(sp)
+move.l _obj10,-(sp)
+jsr _vvputsv
+adda.l #22,sp
+*line 202
+*line 203
+*line 203
+cmp #7,R7
+bne L30
+*line 204
+*line 205
+*line 205
+move _cxval,R0
+asr #3,R0
+cmp #48,R0
+bne L31
+*line 206
+*line 207
+*line 208
+move.l #_cg3,(sp)
+move #14,-(sp)
+move #14,-(sp)
+move.l #L32,-(sp)
+clr -(sp)
+move R7,-(sp)
+move #6,-(sp)
+move #16,-(sp)
+move.l _obj10,-(sp)
+jsr _vsplot4
+adda.l #20,sp
+*line 209
+bra L33
+L31:
+*line 210
+*line 211
+*line 212
+*line 213
+move.l #_cg3,(sp)
+move #14,-(sp)
+move #14,-(sp)
+move.l #L34,-(sp)
+clr -(sp)
+move R7,-(sp)
+move #6,-(sp)
+move #16,-(sp)
+move.l _obj10,-(sp)
+jsr _vsplot4
+adda.l #20,sp
+L33:
+*line 214
+*line 215
+*line 216
+L30:
+*line 217
+move R7,(sp)
+add #1,(sp)
+move.l #L35,-(sp)
+move.l R14,-(sp)
+add.l #-194,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 218
+*line 219
+*line 220
+*line 221
+move.l #_cg3,(sp)
+move #14,-(sp)
+move #14,-(sp)
+move.l R14,-(sp)
+add.l #-194,(sp)
+move #2,-(sp)
+move R7,-(sp)
+move #2,-(sp)
+move R7,R8
+add.l R8,R8
+move.l #_seqflag,R9
+clr R0
+move 0(R8,R9.l),R0
+and #-32768,R0
+beq L10003
+move #6,-(sp)
+bra L10005
+L10003:move #1,-(sp)
+L10005:move #16,-(sp)
+move.l _obj10,-(sp)
+jsr _vvputsv
+adda.l #22,sp
+L24:
+*line 189
+add #1,R7
+L25:
+*line 189
+cmp #16,R7
+blt L26
+L23:
+*line 222
+*line 223
+bra L9
+*line 224
+*line 225
+L36:
+*line 226
+*line 227
+*line 228
+move #64,(sp)
+move #146,-(sp)
+move.l R14,-(sp)
+add.l #-128,(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 229
+move #226,-128(R14)
+*line 230
+move #226,-4(R14)
+*line 231
+clr -2(R14)
+*line 232
+*line 233
+clr R7
+bra L39
+L40:
+*line 234
+move.l R14,(sp)
+add.l #-128,(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_ptmcon,R9
+move.l 0(R8,R9.l),-(sp)
+clr -(sp)
+move R7,-(sp)
+add #1,(sp)
+move.l _obj11,-(sp)
+jsr _vputsa
+adda.l #12,sp
+L38:
+*line 233
+add #1,R7
+L39:
+*line 233
+cmp #5,R7
+blt L40
+L37:
+*line 234
+*line 235
+bra L9
+*line 236
+bra L9
+L10:tst R0
+beq L11
+cmp #1,R0
+beq L12
+cmp #2,R0
+beq L22
+cmp #3,R0
+beq L36
+bra L9
+L9:L7:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _ptwins
+.text
+_ptwins:
+~~ptwins:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 253
+clr R7
+bra L44
+L45:
+*line 254
+move R7,(sp)
+jsr _ptwin
+L43:
+*line 253
+add #1,R7
+L44:
+*line 253
+cmp #4,R7
+blt L45
+L42:L41:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _ptdisp
+.text
+_ptdisp:
+~~ptdisp:
+link R14,#-4
+*line 265
+jsr _dswap
+*line 267
+move.l #_LineBak,_BakLine
+*line 268
+move.l #_LineFwd,_FwdLine
+*line 272
+move.l #_v_score,_obj8
+*line 273
+move.l #2048+_v_score,_obj9
+*line 274
+move.l #16384+_v_score,_obj10
+*line 275
+move.l #8192+_v_score,_obj11
+*line 277
+move #9,_ScrlObj
+*line 278
+move.l _obj9,_ScObAdr
+*line 279
+move.l _obj9,_LineBuf
+*line 280
+clr.l _OldLine
+*line 281
+move #18,_LineAtr
+*line 283
+clr _CurLine
+*line 284
+move #13,_CurScan
+*line 286
+clr _PdScDnF
+*line 287
+clr _PdScUpF
+*line 292
+move #-1,(sp)
+move #72,-(sp)
+clr -(sp)
+clr -(sp)
+move #28,-(sp)
+move #512,-(sp)
+move.l _obj8,-(sp)
+clr -(sp)
+move #1,-(sp)
+move #8,-(sp)
+jsr _SetObj
+adda.l #20,sp
+*line 293
+move #-1,(sp)
+move #72,-(sp)
+move #28,-(sp)
+clr -(sp)
+move #224,-(sp)
+move #384,-(sp)
+move.l _obj9,-(sp)
+clr -(sp)
+move #1,-(sp)
+move #9,-(sp)
+jsr _SetObj
+adda.l #20,sp
+*line 294
+move #-1,(sp)
+move #1536,-(sp)
+move #28,-(sp)
+move #384,-(sp)
+move #224,-(sp)
+move #128,-(sp)
+move.l _obj10,-(sp)
+clr -(sp)
+clr -(sp)
+move #10,-(sp)
+jsr _SetObj
+adda.l #20,sp
+*line 295
+move #-1,(sp)
+move #72,-(sp)
+move #252,-(sp)
+clr -(sp)
+move #98,-(sp)
+move #512,-(sp)
+move.l _obj11,-(sp)
+clr -(sp)
+move #1,-(sp)
+move #11,-(sp)
+jsr _SetObj
+adda.l #20,sp
+*line 297
+*line 298
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L47
+*line 298
+clr (sp)
+jsr _vbank
+*line 299
+L47:
+*line 300
+move #32767,(sp)
+clr -(sp)
+move.l #_v_score,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 301
+move #24577,(sp)
+clr -(sp)
+move.l #65534+_v_score,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 303
+jsr _voidpb
+*line 304
+jsr _ptwins
+*line 310
+move #8,(sp)
+move #8,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 311
+move #9,(sp)
+move #9,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 312
+move #10,(sp)
+move #10,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 313
+move #11,(sp)
+move #11,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 315
+*line 316
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L48
+*line 316
+clr (sp)
+jsr _vbank
+*line 317
+L48:
+*line 318
+move #3584,(sp)
+move.l #_cg3,-(sp)
+move.l #_v_cgtab,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 319
+clr R0
+move 2+_v_regs,R0
+and #4095,R0
+or #-8192,R0
+move R0,2+_v_regs
+*line 323
+clr R0
+move 64+_v_odtab,R0
+and #4095,R0
+or #-12288,R0
+move R0,64+_v_odtab
+*line 324
+clr R0
+move 72+_v_odtab,R0
+and #4095,R0
+or #-12288,R0
+move R0,72+_v_odtab
+*line 326
+clr R0
+move 88+_v_odtab,R0
+and #4095,R0
+or #-12288,R0
+move R0,88+_v_odtab
+*line 328
+clr _submenu
+*line 330
+move #1,_ctcsw
+*line 331
+move #2,(sp)
+move #9,-(sp)
+jsr _ctcpos
+addq.l #2,sp
+*line 332
+jsr _aftercm
+*line 334
+move.l #_ptabpal,(sp)
+jsr _vsndpal
+L46:unlk R14
+rts
+.data
+L2:.dc.b $B0,$20,$4B,$65,$79,$20,$20,$53,$65,$71,$4C,$69,$6E,$20,$20,$49,$6E,$73,$74,$72,$20,$20,$49,$6E,$64,$65,$78,$20,$20,$4C
+.dc.b $65,$76,$65,$6C,$20,$20,$56,$20,$4F,$75,$74,$20,$20,$53,$72,$63,$65,$20,$20,$50,$63,$68,$57,$68,$20,$20,$50,$69,$74,$63
+.dc.b $68,$20,$B0,$0
+L3:.dc.b $B0,$20,$52,$65,$6C,$20,$20,$53,$65,$71,$43,$74,$6C,$20,$20,$4F,$73,$63,$20,$20,$20,$20,$46,$72,$65,$71,$20,$20,$20,$4C
+.dc.b $6F,$63,$74,$6E,$20,$20,$44,$65,$70,$74,$68,$20,$20,$4D,$75,$6C,$74,$20,$20,$4D,$6F,$64,$57,$68,$20,$20,$46,$72,$65,$71
+.dc.b $20,$20,$B0,$0
+L4:.dc.b $B0,$20,$54,$72,$67,$20,$20,$54,$75,$6E,$69,$6E,$67,$20,$20,$57,$61,$76,$65,$41,$20,$20,$50,$69,$74,$63,$68,$20,$20,$46
+.dc.b $69,$6C,$74,$72,$20,$20,$52,$61,$74,$65,$20,$20,$20,$54,$69,$6D,$65,$20,$20,$42,$72,$65,$74,$68,$20,$20,$4B,$65,$79,$56
+.dc.b $6C,$20,$B0,$0
+L5:.dc.b $B0,$20,$50,$6C,$73,$20,$20,$52,$65,$67,$53,$65,$74,$20,$20,$57,$61,$76,$65,$42,$20,$20,$49,$6E,$74,$76,$6C,$20,$20,$46
+.dc.b $69,$6C,$20,$51,$20,$20,$49,$6E,$74,$65,$6E,$20,$20,$56,$61,$6C,$75,$20,$20,$50,$65,$64,$61,$6C,$20,$20,$4B,$65,$79,$50
+.dc.b $72,$20,$B0,$0
+L6:.dc.b $B0,$20,$4C,$45,$44,$20,$20,$52,$65,$67,$41,$64,$64,$20,$20,$43,$6F,$6E,$66,$67,$20,$20,$52,$61,$74,$69,$6F,$20,$20,$44
+.dc.b $79,$6E,$6D,$63,$20,$20,$41,$75,$78,$20,$20,$20,$20,$46,$75,$6E,$63,$20,$20,$47,$50,$43,$2F,$56,$20,$20,$52,$61,$6E,$64
+.dc.b $6D,$20,$B0,$0
+L21:.dc.b $B0,$0
+L27:.dc.b $20,$20,$20,$20,$25,$30,$33,$64,$20,$25,$30,$32,$64,$20,$25,$64,$20,$0
+L28:.dc.b $B0,$0
+L29:.dc.b $B0,$0
+L32:.dc.b $BF,$0
+L34:.dc.b $BC,$0
+L35:.dc.b $25,$30,$32,$64,$0
Index: alcyon/ptdkey.s
===================================================================
--- alcyon/ptdkey.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/ptdkey.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,3337 @@
+.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 _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _stmptr
+.globl _defptr
+.globl _patches
+.globl _defents
+.globl _seqtab
+.globl _seqflag
+.globl _seqline
+.globl _seqstim
+.globl _seqtime
+.globl _sregval
+.globl _trstate
+.globl _asig
+.globl _astat
+.globl _dpepred
+.globl _dpecpos
+.globl _dpesucc
+.globl _ptegood
+.globl _ptedfok
+.globl _ptestok
+.globl _ptedsok
+.globl _ptedtok
+.globl _ptedef
+.globl _ptestm
+.globl _ptespec
+.globl _ptesuba
+.globl _ptedat1
+.globl _ptedat2
+.globl _ptedftp
+.globl _ptedfst
+.globl _ptedest
+.globl _ptedata
+.globl _pteset
+.globl _ptbflag
+.globl _ptemenu
+.globl _ptepred
+.globl _ptecpos
+.globl _ptesucc
+.globl _stccol
+.globl _stcrow
+.globl _ptdebuf
+.globl _ptebuf
+.globl _dsdecol
+.data
+_dsdecol:
+.dc.w $6
+.dc.w $8
+.dc.w $13
+.dc.w $15
+.dc.w $7
+.dc.w $8
+.dc.w $14
+.dc.w $15
+.dc.w $8
+.dc.w $8
+.dc.w $15
+.dc.w $15
+.dc.w $A
+.dc.w $A
+.dc.w $17
+.dc.w $17
+.dc.w $C
+.dc.w $D
+.dc.w $19
+.dc.w $1A
+.globl _des2fmt
+.data
+_des2fmt:
+.dc.w $FFFF
+.dc.w $0
+.dc.w $1
+.dc.w $2
+.dc.w $3
+.dc.w $4
+.dc.w $4
+.dc.w $5
+.dc.w $4
+.dc.w $4
+.dc.w $6
+.dc.w $9
+.dc.w $6
+.dc.w $6
+.dc.w $6
+.dc.w $A
+.dc.w $9
+.dc.w $9
+.dc.w $A
+.dc.w $A
+.dc.w $A
+.dc.w $A
+.dc.w $7
+.dc.w $7
+.dc.w $7
+.dc.w $7
+.dc.w $8
+.globl _dtabl7
+.data
+_dtabl7:
+.dc.w $B
+.dc.w $1
+.dc.w $2
+.dc.w $3
+.dc.w $A
+.globl _dtabl9
+.data
+_dtabl9:
+.dc.w $B
+.dc.w $1
+.dc.w $2
+.dc.w $3
+.dc.w $9
+.globl _SnapPTV
+.text
+_SnapPTV:
+~~SnapPTV:
+~s=8
+link R14,#-50
+movem.l R5-R7,-(sp)
+~stim=R7
+~i=R6
+~dbuf=-50
+*line 105
+move.l 8(R14),(sp)
+move.l #L2,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 107
+move #48,(sp)
+move.l #_ptdebuf,-(sp)
+move.l R14,-(sp)
+add.l #-50,(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 109
+clr R6
+bra L5
+L6:
+*line 110
+*line 111
+move R6,R8
+add.l R14,R8
+tst.b -50(R8)
+bne L7
+*line 111
+move R6,R8
+add.l R14,R8
+move.b #32,-50(R8)
+bra L8
+L7:
+*line 112
+*line 113
+move R6,R8
+add.l R14,R8
+btst #7,-50(R8)
+beq L9
+*line 113
+move R6,R8
+add.l R14,R8
+move.b #126,-50(R8)
+*line 114
+L9:L8:L4:
+*line 109
+add #1,R6
+L5:
+*line 109
+cmp #48,R6
+blt L6
+L3:
+*line 115
+clr.b -2(R14)
+*line 117
+move.l R14,(sp)
+add.l #-50,(sp)
+move.l #L10,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 119
+*line 120
+move _ptedat2,(sp)
+move _ptedat1,-(sp)
+move _ptesuba,-(sp)
+move _ptespec,-(sp)
+move _ptestm,-(sp)
+move _ptedef,-(sp)
+move.l #L11,-(sp)
+jsr _printf
+adda.l #14,sp
+*line 122
+*line 123
+*line 124
+move 14+_ptebuf,(sp)
+move 12+_ptebuf,-(sp)
+move 10+_ptebuf,-(sp)
+move 8+_ptebuf,-(sp)
+move 6+_ptebuf,-(sp)
+move 4+_ptebuf,-(sp)
+move.l #L12,-(sp)
+jsr _printf
+adda.l #14,sp
+*line 126
+*line 127
+move _ptemenu,(sp)
+move _ptedata,-(sp)
+move _ptedest,-(sp)
+move _ptedfst,-(sp)
+move _ptedftp,-(sp)
+move.l #L13,-(sp)
+jsr _printf
+adda.l #12,sp
+*line 129
+*line 130
+move _ptbflag,(sp)
+move _pteset,-(sp)
+move _ptedtok,-(sp)
+move _ptedsok,-(sp)
+move _ptestok,-(sp)
+move _ptedfok,-(sp)
+move _ptegood,-(sp)
+move.l #L14,-(sp)
+jsr _printf
+adda.l #16,sp
+*line 132
+*line 133
+move _ptesucc,(sp)
+move _ptecpos,-(sp)
+move _ptepred,-(sp)
+move.l #L15,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 170
+move.l #L16,(sp)
+jsr _printf
+L1:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _buf2pte
+.text
+_buf2pte:
+~~buf2pte:
+link R14,#-4
+*line 184
+move _ptedef,4+_ptebuf
+*line 185
+move _ptestm,6+_ptebuf
+*line 186
+move _ptespec,8+_ptebuf
+*line 187
+move _ptesuba,10+_ptebuf
+*line 188
+move _ptedat1,12+_ptebuf
+*line 189
+move _ptedat2,14+_ptebuf
+*line 191
+move #1,_pteset
+L17:unlk R14
+rts
+.globl _voidpb
+.text
+_voidpb:
+~~voidpb:
+link R14,#-4
+*line 216
+move #50,(sp)
+move #32,-(sp)
+move.l #_ptdebuf,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 218
+move #4608,R0
+move R0,_ptedef
+move R0,4+_ptebuf
+*line 219
+clr R0
+move R0,_ptestm
+move R0,6+_ptebuf
+*line 220
+clr R0
+move R0,_ptespec
+move R0,8+_ptebuf
+*line 221
+clr R0
+move R0,_ptesuba
+move R0,10+_ptebuf
+*line 222
+clr R0
+move R0,_ptedat1
+move R0,12+_ptebuf
+*line 223
+clr R0
+move R0,_ptedat2
+move R0,14+_ptebuf
+*line 225
+clr _ptbflag
+*line 227
+clr _pteset
+*line 229
+clr _ptegood
+*line 231
+move #1,_ptedfok
+*line 232
+clr _ptestok
+*line 233
+clr _ptedsok
+*line 234
+clr _ptedtok
+*line 236
+move #-1,_ptedfst
+*line 237
+move #-1,_ptedest
+*line 238
+move #-1,_ptedata
+L18:unlk R14
+rts
+.globl _setptcv
+.text
+_setptcv:
+~~setptcv:
+link R14,#0
+movem.l R6-R7,-(sp)
+~spec=R7
+*line 265
+move _ptespec,R7
+and #255,R7
+clr R0
+move R7,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_des2fmt,R0
+move.l R0,R8
+move (R8),_ptedest
+*line 267
+move _ptedest,R0
+bra L21
+*line 268
+L22:
+*line 269
+L23:
+*line 270
+*line 271
+*line 272
+move #8,_ptedata
+bra L20
+*line 273
+*line 274
+L24:
+*line 275
+*line 276
+*line 277
+move #9,_ptedata
+bra L20
+*line 278
+*line 279
+L25:
+*line 280
+*line 281
+*line 282
+move #14,_ptedata
+bra L20
+*line 283
+*line 284
+*line 285
+L26:
+*line 286
+*line 287
+*line 288
+*line 289
+cmp #5,R7
+bne L27
+*line 289
+move #13,_ptedata
+bra L28
+L27:
+*line 290
+*line 291
+cmp #6,R7
+bne L29
+*line 291
+move #9,_ptedata
+*line 292
+bra L30
+L29:
+*line 293
+move #12,_ptedata
+L30:L28:
+*line 294
+bra L20
+*line 295
+*line 296
+L31:
+*line 297
+*line 298
+*line 299
+move #18,_ptedata
+bra L20
+*line 300
+*line 301
+L32:
+*line 302
+*line 303
+*line 304
+*line 305
+cmp #10,R7
+bne L33
+*line 305
+move #15,_ptedata
+bra L34
+L33:
+*line 306
+*line 307
+cmp #14,R7
+bne L35
+*line 307
+move #17,_ptedata
+*line 308
+bra L36
+L35:
+*line 309
+move #16,_ptedata
+L36:L34:
+*line 310
+bra L20
+*line 311
+*line 312
+L37:
+*line 313
+L38:
+*line 314
+*line 315
+*line 316
+move _ptedat1,R8
+add.l R8,R8
+add.l #_dtabl7,R8
+move (R8),_ptedata
+bra L20
+*line 317
+*line 318
+L39:
+*line 319
+L40:
+*line 320
+*line 321
+*line 322
+*line 323
+cmp #11,R7
+bne L41
+*line 323
+move _ptedat1,R0
+add #4,R0
+move R0,_ptedata
+*line 324
+bra L42
+L41:
+*line 325
+move _ptedat1,R8
+add.l R8,R8
+add.l #_dtabl9,R8
+move (R8),_ptedata
+L42:
+*line 326
+bra L20
+*line 327
+*line 328
+L43:
+*line 329
+*line 330
+*line 335
+*line 336
+*line 337
+move #-1,_ptedata
+bra L20
+*line 338
+bra L20
+L21:cmp #10,R0
+bhi L43
+asl #2,R0
+move R0,R8
+add.l #L44,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L44:.dc.l L22
+.dc.l L24
+.dc.l L23
+.dc.l L25
+.dc.l L26
+.dc.l L31
+.dc.l L32
+.dc.l L37
+.dc.l L38
+.dc.l L39
+.dc.l L40
+.text
+L20:L19:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _pte2buf
+.text
+_pte2buf:
+~~pte2buf:
+link R14,#0
+movem.l R6-R7,-(sp)
+~spec=R7
+*line 355
+move #50,(sp)
+move #32,-(sp)
+move.l #_ptdebuf,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 357
+move #1,_ptbflag
+*line 359
+*line 359
+tst _pteset
+beq L46
+*line 360
+*line 361
+move 4+_ptebuf,_ptedef
+*line 362
+move 6+_ptebuf,_ptestm
+*line 363
+move 8+_ptebuf,_ptespec
+*line 364
+move 10+_ptebuf,_ptesuba
+*line 365
+move 12+_ptebuf,_ptedat1
+*line 366
+move 14+_ptebuf,_ptedat2
+*line 367
+*line 368
+jsr _setptcv
+*line 369
+*line 370
+move _ptedef,(sp)
+move.l #2+_ptdebuf,-(sp)
+jsr _dspdfst
+addq.l #4,sp
+*line 371
+move _ptestm,(sp)
+move.l #15+_ptdebuf,-(sp)
+jsr _dspdfst
+addq.l #4,sp
+*line 372
+move.l #_ptebuf,(sp)
+move.l #28+_ptdebuf,-(sp)
+jsr _dspdest
+addq.l #4,sp
+*line 373
+move.b #32,_ptdebuf
+*line 374
+move.b #32,1+_ptdebuf
+*line 375
+move.b #32,14+_ptdebuf
+*line 376
+move.b #32,27+_ptdebuf
+*line 377
+*line 378
+*line 379
+*line 380
+move #1,_ptegood
+*line 381
+move #1,_ptedfok
+*line 382
+move #1,_ptestok
+*line 383
+move #1,_ptedsok
+*line 384
+move #1,_ptedtok
+*line 385
+*line 394
+*line 395
+bra L47
+L46:
+*line 396
+*line 397
+*line 398
+jsr _voidpb
+*line 399
+*line 403
+*line 404
+L47:L45:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _ptde_ds
+.text
+_ptde_ds:
+~~ptde_ds:
+~n=R7
+~key=R6
+link R14,#-16
+movem.l R2-R7,-(sp)
+~chan=R5
+~port=R4
+~stim=R3
+~buf=-8
+~buf2=-16
+*line 423
+move 8(R14),R7
+*line 423
+move 10(R14),R6
+*line 423
+*line 423
+tst R7
+beq L10000
+move _ptestok,R0
+bra L10002
+L10000:move _ptedfok,R0
+L10002:tst R0
+beq L49
+*line 424
+*line 425
+*line 426
+tst R7
+bne L10003
+cmp #-1,_ptedef
+beq L48
+L10003:*line 427
+*line 428
+tst R7
+beq L10004
+move _ptestm,R0
+bra L10006
+L10004:move _ptedef,R0
+L10006:move R0,R4
+move #11,R0
+asr R0,R4
+and #3,R4
+*line 429
+tst R7
+beq L10007
+move _ptestm,R0
+bra L10009
+L10007:move _ptedef,R0
+L10009:move R0,R5
+asr #7,R5
+and #15,R5
+*line 430
+tst R7
+beq L10010
+move _ptestm,R0
+bra L10012
+L10010:move _ptedef,R0
+L10012:move R0,R3
+and #127,R3
+*line 431
+*line 432
+*line 432
+tst R4
+beq L10013
+cmp #1,R4
+beq L10013
+cmp #2,R4
+bne L50
+cmp #2,R5
+bge L50
+L10013:*line 433
+*line 434
+*line 435
+*line 436
+*line 437
+*line 438
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_dsdecol,R9
+move 0(R8,R9.l),R0
+cmp _stccol,R0
+bgt L10015
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_dsdecol,R9
+move 2(R8,R9.l),R0
+cmp _stccol,R0
+bge L10014
+L10015:move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_dsdecol,R9
+move 24(R8,R9.l),R0
+cmp _stccol,R0
+bgt L10016
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_dsdecol,R9
+move 26(R8,R9.l),R0
+cmp _stccol,R0
+bge L10014
+L10016:move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_dsdecol,R9
+move 32(R8,R9.l),R0
+cmp _stccol,R0
+bgt L51
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_dsdecol,R9
+move 34(R8,R9.l),R0
+cmp _stccol,R0
+blt L51
+L10014:*line 439
+*line 440
+*line 440
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_dsdecol,R9
+move 26(R8,R9.l),R0
+cmp _stccol,R0
+bne L52
+*line 441
+*line 442
+*line 443
+cmp #1,R6
+blt L48
+cmp #3,R6
+bgt L48
+*line 444
+*line 445
+*line 445
+cmp #3,R6
+bne L53
+*line 446
+*line 447
+move.b #76,-8(R14)
+*line 448
+move #98,(sp)
+move.l #L54,-(sp)
+tst R7
+beq L10017
+move #25,-(sp)
+bra L10019
+L10017:move #12,-(sp)
+L10019:move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 449
+*line 450
+*line 451
+tst R7
+beq L55
+*line 451
+and #-1921,_ptestm
+*line 452
+bra L56
+L55:
+*line 453
+and #-1921,_ptedef
+L56:
+*line 454
+bra L57
+L53:
+*line 455
+*line 456
+*line 457
+move R5,(sp)
+add #1,(sp)
+move.l #L58,-(sp)
+move.l R14,-(sp)
+add.l #-16,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 458
+move R6,R0
+add #48,R0
+move.b R0,-8(R14)
+*line 459
+move #98,(sp)
+move.l R14,-(sp)
+add.l #-16,(sp)
+tst R7
+beq L10020
+move #25,-(sp)
+bra L10022
+L10020:move #12,-(sp)
+L10022:move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+L57:
+*line 460
+*line 461
+*line 462
+*line 463
+move R6,R4
+sub #1,R4
+*line 464
+*line 465
+*line 466
+tst R7
+beq L59
+*line 466
+move _ptestm,R0
+and #-6145,R0
+move R4,R1
+move #11,R2
+asl R2,R1
+or R1,R0
+move R0,_ptestm
+*line 467
+bra L60
+L59:
+*line 468
+move _ptestm,R0
+and #-6145,R0
+move R4,R1
+move #11,R2
+asl R2,R1
+or R1,R0
+move R0,_ptedef
+L60:
+*line 469
+bra L61
+L52:
+*line 470
+*line 471
+*line 472
+move R6,R0
+add #48,R0
+move.b R0,-8(R14)
+L61:
+*line 473
+*line 474
+*line 475
+move.l #_ptdebuf,R8
+move _stccol,R9
+add.l R9,R8
+move.b -8(R14),(R8)
+*line 476
+clr.b -7(R14)
+*line 477
+*line 478
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 479
+*line 480
+*line 480
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_dsdecol,R9
+move 34(R8,R9.l),R0
+cmp _stccol,R0
+bne L62
+*line 481
+*line 482
+jsr _ctcon
+bra L48
+*line 483
+*line 484
+*line 485
+L62:
+*line 486
+*line 487
+*line 488
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_dsdecol,R9
+move 2(R8,R9.l),R0
+cmp _stccol,R0
+beq L10023
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_dsdecol,R9
+move 26(R8,R9.l),R0
+cmp _stccol,R0
+bne L63
+L10023:*line 488
+add #1,_stccol
+*line 489
+L63:
+*line 490
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+*line 491
+*line 492
+L51:bra L48
+*line 493
+*line 494
+*line 495
+bra L64
+L50:
+*line 496
+*line 496
+cmp #2,R4
+bne L65
+cmp #2,R5
+bne L65
+*line 497
+*line 498
+*line 499
+*line 500
+*line 500
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_dsdecol,R9
+move 8(R8,R9.l),R0
+cmp _stccol,R0
+bgt L66
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_dsdecol,R9
+move 10(R8,R9.l),R0
+cmp _stccol,R0
+blt L66
+*line 501
+*line 502
+move R6,R0
+add #48,R0
+move.l #_ptdebuf,R9
+move _stccol,R10
+add.l R10,R9
+move.b R0,(R9)
+*line 503
+move R6,R0
+add #48,R0
+move.b R0,-8(R14)
+*line 504
+clr.b -7(R14)
+*line 505
+*line 506
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 507
+*line 508
+*line 508
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_dsdecol,R9
+move 10(R8,R9.l),R0
+cmp _stccol,R0
+bne L67
+*line 509
+*line 510
+jsr _ctcon
+bra L48
+*line 511
+*line 512
+*line 513
+L67:
+*line 514
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+*line 515
+*line 516
+L66:bra L48
+*line 517
+*line 518
+bra L68
+L65:
+*line 519
+*line 519
+cmp #2,R4
+bne L69
+cmp #3,R5
+bne L69
+*line 520
+*line 521
+*line 522
+*line 523
+*line 523
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_dsdecol,R9
+move 18(R8,R9.l),R0
+cmp _stccol,R0
+bne L70
+*line 524
+*line 525
+*line 526
+cmp #1,R6
+blt L48
+cmp #2,R6
+bgt L48
+*line 527
+*line 528
+move R6,R0
+add #48,R0
+move.l #_ptdebuf,R9
+move _stccol,R10
+add.l R10,R9
+move.b R0,(R9)
+*line 529
+move R6,R0
+add #48,R0
+move.b R0,-8(R14)
+*line 530
+clr.b -7(R14)
+*line 531
+*line 532
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 533
+jsr _ctcon
+*line 534
+*line 535
+L70:bra L48
+*line 536
+*line 537
+L69:L68:L64:
+*line 538
+L49:L48:tst.l (sp)+
+movem.l (sp)+,R3-R7
+unlk R14
+rts
+.globl _ptdkey
+.text
+_ptdkey:
+~~ptdkey:
+link R14,#-8
+movem.l R4-R7,-(sp)
+~key=R7
+~val=R6
+~vg=R5
+~buf=-8
+*line 555
+*line 556
+tst _astat
+beq L71
+*line 557
+*line 558
+*line 559
+tst _ptbflag
+bne L72
+*line 559
+jsr _pte2buf
+*line 560
+L72:
+*line 561
+move _asig,R7
+add #-60,R7
+*line 563
+*line 563
+cmp #2,_stccol
+blt L73
+cmp #13,_stccol
+bgt L73
+*line 564
+*line 565
+move R7,(sp)
+clr -(sp)
+jsr _ptde_ds
+addq.l #2,sp
+bra L71
+*line 566
+*line 567
+bra L74
+L73:
+*line 568
+*line 568
+cmp #15,_stccol
+blt L75
+cmp #26,_stccol
+bgt L75
+*line 569
+*line 570
+move R7,(sp)
+move #1,-(sp)
+jsr _ptde_ds
+addq.l #2,sp
+bra L71
+*line 571
+*line 572
+*line 573
+bra L76
+L75:
+*line 574
+*line 574
+cmp #28,_stccol
+blt L77
+cmp #40,_stccol
+bgt L77
+*line 575
+*line 576
+*line 576
+tst _ptedsok
+beq L78
+*line 577
+*line 578
+move _ptedest,R0
+bra L80
+*line 579
+L81:
+*line 580
+*line 581
+*line 582
+*line 583
+*line 584
+cmp #30,_stccol
+blt L10025
+cmp #32,_stccol
+ble L10024
+L10025:cmp #34,_stccol
+beq L10024
+cmp #36,_stccol
+blt L82
+cmp #37,_stccol
+bgt L82
+L10024:*line 585
+*line 586
+*line 586
+cmp #34,_stccol
+bne L83
+*line 587
+*line 588
+*line 589
+cmp #1,R7
+blt L71
+cmp #3,R7
+bgt L71
+*line 590
+*line 591
+*line 592
+cmp #3,R7
+bne L84
+*line 592
+move.b #76,-8(R14)
+*line 593
+bra L85
+L84:
+*line 594
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+L85:
+*line 595
+bra L86
+L83:
+*line 596
+*line 597
+*line 598
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+L86:
+*line 599
+*line 600
+*line 601
+move.l #_ptdebuf,R8
+move _stccol,R9
+add.l R9,R8
+move.b -8(R14),(R8)
+*line 602
+clr.b -7(R14)
+*line 603
+*line 604
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 605
+*line 606
+*line 607
+cmp #32,_stccol
+beq L10026
+cmp #34,_stccol
+bne L87
+L10026:*line 607
+add #1,_stccol
+*line 608
+L87:
+*line 609
+*line 610
+cmp #37,_stccol
+bne L88
+*line 610
+jsr _ctcon
+*line 611
+bra L89
+L88:
+*line 612
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+L89:
+*line 613
+*line 614
+L82:bra L71
+*line 615
+*line 616
+*line 617
+L90:
+*line 618
+*line 619
+*line 620
+*line 620
+cmp #36,_stccol
+blt L91
+cmp #37,_stccol
+bgt L91
+*line 621
+*line 622
+move R7,R0
+add #48,R0
+move.l #_ptdebuf,R9
+move _stccol,R10
+add.l R10,R9
+move.b R0,(R9)
+*line 623
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+*line 624
+clr.b -7(R14)
+*line 625
+*line 626
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 627
+*line 628
+*line 629
+cmp #37,_stccol
+bne L92
+*line 629
+jsr _ctcon
+*line 630
+bra L93
+L92:
+*line 631
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+L93:
+*line 632
+*line 633
+L91:bra L71
+*line 634
+*line 635
+L94:
+*line 636
+*line 637
+*line 638
+*line 638
+cmp #34,_stccol
+bne L95
+*line 639
+*line 640
+*line 641
+cmp #1,R7
+blt L71
+cmp #2,R7
+bgt L71
+*line 642
+*line 643
+move R7,R0
+add #48,R0
+move.l #_ptdebuf,R9
+move _stccol,R10
+add.l R10,R9
+move.b R0,(R9)
+*line 644
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+*line 645
+clr.b -7(R14)
+*line 646
+*line 647
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 648
+jsr _ctcon
+*line 649
+*line 650
+L95:bra L71
+*line 651
+*line 652
+*line 653
+L96:
+*line 654
+*line 655
+*line 656
+*line 656
+cmp #32,_stccol
+bne L97
+*line 657
+*line 658
+*line 659
+cmp #6,R7
+bgt L71
+*line 660
+*line 661
+move R7,R0
+add #65,R0
+move.l #_ptdebuf,R9
+move _stccol,R10
+add.l R10,R9
+move.b R0,(R9)
+*line 662
+move R7,R0
+add #65,R0
+move.b R0,-8(R14)
+*line 663
+clr.b -7(R14)
+*line 664
+*line 665
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 666
+jsr _ctcon
+*line 667
+*line 668
+L97:bra L71
+*line 669
+*line 670
+L98:
+*line 671
+*line 672
+*line 673
+*line 673
+cmp #32,_stccol
+blt L99
+cmp #33,_stccol
+bgt L99
+*line 674
+*line 675
+move R7,R0
+add #48,R0
+move.l #_ptdebuf,R9
+move _stccol,R10
+add.l R10,R9
+move.b R0,(R9)
+*line 676
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+*line 677
+clr.b -7(R14)
+*line 678
+*line 679
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 680
+*line 681
+*line 682
+cmp #33,_stccol
+bne L100
+*line 682
+jsr _ctcon
+*line 683
+bra L101
+L100:
+*line 684
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+L101:
+*line 685
+*line 686
+L99:bra L71
+*line 687
+*line 688
+*line 689
+L102:
+*line 690
+L103:
+*line 691
+*line 692
+bra L71
+*line 693
+*line 694
+L104:
+*line 695
+*line 696
+*line 697
+*line 697
+cmp #32,_stccol
+bne L105
+*line 698
+*line 699
+*line 700
+cmp #1,R7
+blt L71
+cmp #5,R7
+bgt L71
+*line 701
+*line 702
+move R7,R0
+add #48,R0
+move.l #_ptdebuf,R9
+move _stccol,R10
+add.l R10,R9
+move.b R0,(R9)
+*line 703
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+*line 704
+clr.b -7(R14)
+*line 705
+*line 706
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 707
+move #34,(sp)
+move #9,-(sp)
+jsr _movectc
+addq.l #2,sp
+*line 708
+*line 709
+L105:bra L71
+*line 710
+*line 711
+L106:
+*line 712
+*line 713
+*line 714
+*line 714
+cmp #32,_stccol
+bne L107
+*line 715
+*line 716
+*line 717
+cmp #1,R7
+blt L71
+cmp #4,R7
+bgt L71
+*line 718
+*line 719
+move R7,R0
+add #48,R0
+move.l #_ptdebuf,R9
+move _stccol,R10
+add.l R10,R9
+move.b R0,(R9)
+*line 720
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+*line 721
+clr.b -7(R14)
+*line 722
+*line 723
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 724
+move #34,(sp)
+move #9,-(sp)
+jsr _movectc
+addq.l #2,sp
+bra L71
+*line 725
+*line 726
+*line 727
+*line 728
+*line 729
+*line 730
+L107:L108:
+*line 731
+L109:
+*line 732
+*line 733
+*line 734
+*line 734
+cmp #39,_stccol
+blt L110
+cmp #40,_stccol
+bgt L110
+*line 735
+*line 736
+move _ptesuba,R5
+asr #8,R5
+and #255,R5
+*line 737
+*line 738
+*line 738
+cmp #39,_stccol
+bne L111
+*line 739
+*line 740
+*line 740
+cmp #8,R7
+beq L10027
+cmp #9,R7
+bne L112
+L10027:*line 741
+*line 742
+*line 742
+cmp #11,R5
+ble L113
+*line 743
+*line 744
+sub #12,R5
+*line 745
+move #86,R6
+*line 746
+bra L114
+L113:
+*line 747
+*line 748
+*line 749
+add #12,R5
+*line 750
+move #71,R6
+L114:
+*line 751
+*line 752
+*line 753
+*line 754
+move _ptesuba,R0
+and #255,R0
+move R5,R1
+asl #8,R1
+or R1,R0
+move R0,_ptesuba
+*line 755
+bra L115
+L112:
+*line 756
+*line 757
+bra L71
+*line 758
+L115:
+*line 759
+*line 760
+*line 761
+bra L116
+L111:
+*line 762
+*line 763
+*line 764
+*line 765
+*line 766
+tst R5
+beq L10028
+cmp #12,R5
+bne L117
+L10028:tst R7
+beq L10029
+cmp #1,R7
+beq L10029
+cmp #2,R7
+bne L117
+L10029:*line 766
+add #10,R7
+bra L118
+L117:
+*line 767
+*line 768
+tst R7
+beq L71
+*line 769
+L118:
+*line 770
+move R7,R6
+cmp #9,R7
+ble L10030
+move #162,R0
+bra L10032
+L10030:move #48,R0
+L10032:add R0,R6
+*line 771
+*line 772
+sub #1,R7
+*line 773
+*line 774
+*line 775
+cmp #11,R5
+ble L119
+*line 775
+move R7,R5
+add #12,R5
+*line 776
+bra L120
+L119:
+*line 777
+move R7,R5
+L120:
+*line 778
+*line 779
+*line 780
+move _ptesuba,R0
+and #255,R0
+move R5,R1
+asl #8,R1
+or R1,R0
+move R0,_ptesuba
+L116:
+*line 781
+*line 782
+*line 783
+move R6,R0
+move.l #_ptdebuf,R9
+move _stccol,R10
+add.l R10,R9
+move.b R0,(R9)
+*line 784
+move.b R6,-8(R14)
+*line 785
+clr.b -7(R14)
+*line 786
+*line 787
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 788
+*line 789
+*line 790
+cmp #40,_stccol
+bne L121
+*line 790
+jsr _ctcon
+*line 791
+bra L122
+L121:
+*line 792
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+L122:
+*line 793
+*line 794
+L110:bra L71
+*line 795
+*line 796
+L123:
+*line 797
+*line 798
+bra L71
+*line 799
+bra L79
+L80:cmp #10,R0
+bhi L123
+asl #2,R0
+move R0,R8
+add.l #L124,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L124:.dc.l L81
+.dc.l L90
+.dc.l L94
+.dc.l L96
+.dc.l L98
+.dc.l L102
+.dc.l L108
+.dc.l L103
+.dc.l L104
+.dc.l L106
+.dc.l L109
+.text
+L79:
+*line 800
+*line 801
+*line 802
+*line 803
+L78:bra L125
+L77:
+*line 804
+*line 804
+cmp #42,_stccol
+blt L126
+cmp #46,_stccol
+bgt L126
+*line 805
+*line 806
+move _ptedata,R0
+bra L128
+*line 807
+L129:
+*line 808
+*line 809
+*line 810
+move _stccol,R0
+bra L131
+*line 811
+L132:
+*line 812
+*line 813
+*line 814
+*line 815
+cmp #8,R7
+bne L133
+*line 815
+move.b #45,-8(R14)
+bra L134
+L133:
+*line 816
+*line 817
+cmp #9,R7
+bne L135
+*line 817
+move.b #43,-8(R14)
+*line 818
+bra L136
+L135:bra L71
+L136:L134:
+*line 819
+*line 820
+bra L130
+*line 821
+*line 822
+L137:
+*line 823
+*line 824
+*line 825
+*line 826
+tst R7
+beq L10033
+cmp #1,R7
+bne L138
+L10033:*line 826
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+*line 827
+bra L139
+L138:bra L71
+L139:
+*line 828
+*line 829
+bra L130
+*line 830
+*line 831
+L140:
+*line 832
+L141:
+*line 833
+*line 834
+*line 835
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+bra L130
+*line 836
+*line 837
+L142:
+*line 838
+L143:
+*line 839
+*line 840
+bra L71
+*line 841
+bra L130
+L131:sub #42,R0
+cmp #4,R0
+bhi L143
+asl #2,R0
+move R0,R8
+add.l #L144,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L144:.dc.l L132
+.dc.l L137
+.dc.l L142
+.dc.l L140
+.dc.l L141
+.text
+L130:
+*line 842
+*line 843
+*line 844
+*line 845
+clr.b -7(R14)
+*line 846
+move.l #_ptdebuf,R8
+move _stccol,R9
+add.l R9,R8
+move.b -8(R14),(R8)
+*line 847
+*line 848
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 849
+*line 850
+*line 851
+cmp #43,_stccol
+bne L145
+*line 851
+add #1,_stccol
+*line 852
+L145:
+*line 853
+*line 854
+cmp #46,_stccol
+bne L146
+*line 854
+jsr _ctcon
+*line 855
+bra L147
+L146:
+*line 856
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+L147:
+*line 857
+bra L71
+*line 858
+*line 859
+*line 860
+L148:
+*line 861
+*line 862
+*line 863
+*line 864
+cmp #42,_stccol
+bne L10034
+cmp #3,R7
+bgt L71
+L10034:*line 865
+*line 866
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+*line 867
+clr.b -7(R14)
+*line 868
+move.l #_ptdebuf,R8
+move _stccol,R9
+add.l R9,R8
+move.b -8(R14),(R8)
+*line 869
+*line 870
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 871
+*line 872
+*line 873
+cmp #46,_stccol
+bne L149
+*line 873
+jsr _ctcon
+*line 874
+bra L150
+L149:
+*line 875
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+L150:
+*line 876
+bra L71
+*line 877
+*line 878
+*line 879
+*line 880
+L151:
+*line 881
+*line 882
+*line 883
+move _stccol,R0
+bra L153
+*line 884
+L154:
+*line 885
+*line 886
+*line 887
+*line 887
+cmp #8,R7
+bne L155
+*line 888
+*line 889
+*line 890
+cmp.b #160,42+_ptdebuf
+bne L156
+*line 890
+move.b #161,-8(R14)
+bra L157
+L156:
+*line 891
+*line 892
+cmp.b #161,42+_ptdebuf
+bne L158
+*line 892
+move.b #161,-8(R14)
+*line 893
+bra L159
+L158:
+*line 894
+move.b #45,-8(R14)
+L159:L157:
+*line 895
+bra L160
+L155:
+*line 896
+*line 896
+cmp #9,R7
+bne L161
+*line 897
+*line 898
+*line 899
+cmp.b #160,42+_ptdebuf
+bne L162
+*line 899
+move.b #160,-8(R14)
+bra L163
+L162:
+*line 900
+*line 901
+cmp.b #161,42+_ptdebuf
+bne L164
+*line 901
+move.b #160,-8(R14)
+*line 902
+bra L165
+L164:
+*line 903
+move.b #43,-8(R14)
+L165:L163:
+*line 904
+bra L166
+L161:
+*line 905
+*line 905
+tst R7
+bne L167
+*line 906
+*line 907
+*line 908
+cmp.b #160,42+_ptdebuf
+bne L168
+*line 908
+move.b #43,-8(R14)
+bra L169
+L168:
+*line 909
+*line 910
+cmp.b #161,42+_ptdebuf
+bne L170
+*line 910
+move.b #45,-8(R14)
+*line 911
+bra L171
+L170:bra L71
+L171:L169:
+*line 912
+*line 913
+bra L172
+L167:
+*line 914
+*line 914
+cmp #1,R7
+bne L173
+*line 915
+*line 916
+*line 917
+cmp.b #160,42+_ptdebuf
+bne L174
+*line 917
+move.b #160,-8(R14)
+bra L175
+L174:
+*line 918
+*line 919
+cmp.b #161,42+_ptdebuf
+bne L176
+*line 919
+move.b #161,-8(R14)
+bra L177
+L176:
+*line 920
+*line 921
+cmp.b #43,42+_ptdebuf
+bne L178
+*line 921
+move.b #160,-8(R14)
+bra L179
+L178:
+*line 922
+*line 923
+cmp.b #45,42+_ptdebuf
+bne L180
+*line 923
+move.b #161,-8(R14)
+*line 924
+bra L181
+L180:bra L71
+L181:L179:L177:L175:
+*line 925
+*line 926
+*line 927
+bra L182
+L173:bra L71
+L182:L172:L166:L160:
+*line 928
+*line 929
+bra L152
+*line 930
+*line 931
+*line 932
+L183:
+*line 933
+L184:
+*line 934
+L185:
+*line 935
+*line 936
+*line 937
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+bra L152
+*line 938
+*line 939
+L186:
+*line 940
+L187:
+*line 941
+bra L71
+*line 942
+bra L152
+L153:sub #42,R0
+cmp #4,R0
+bhi L187
+asl #2,R0
+move R0,R8
+add.l #L188,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L188:.dc.l L154
+.dc.l L183
+.dc.l L186
+.dc.l L184
+.dc.l L185
+.text
+L152:
+*line 943
+*line 944
+*line 945
+clr.b -7(R14)
+*line 946
+move.l #_ptdebuf,R8
+move _stccol,R9
+add.l R9,R8
+move.b -8(R14),(R8)
+*line 947
+*line 948
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 949
+*line 950
+*line 951
+cmp #43,_stccol
+bne L189
+*line 951
+add #1,_stccol
+*line 952
+L189:
+*line 953
+*line 954
+cmp #46,_stccol
+bne L190
+*line 954
+jsr _ctcon
+*line 955
+bra L191
+L190:
+*line 956
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+L191:
+*line 957
+bra L71
+*line 958
+*line 959
+*line 960
+L192:
+*line 961
+*line 962
+*line 963
+*line 963
+cmp #42,_stccol
+bne L193
+*line 964
+*line 965
+*line 966
+cmp #8,R7
+bne L194
+*line 966
+move.b #45,-8(R14)
+bra L195
+L194:
+*line 967
+*line 968
+cmp #9,R7
+bne L196
+*line 968
+move.b #43,-8(R14)
+*line 969
+bra L197
+L196:bra L71
+L197:L195:
+*line 970
+*line 971
+bra L198
+L193:
+*line 972
+*line 972
+cmp #43,_stccol
+bne L199
+*line 973
+*line 974
+*line 975
+cmp #1,R7
+bgt L71
+*line 976
+*line 977
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+*line 978
+bra L200
+L199:
+*line 979
+*line 980
+*line 981
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+L200:L198:
+*line 982
+*line 983
+*line 984
+move.l #_ptdebuf,R8
+move _stccol,R9
+add.l R9,R8
+move.b -8(R14),(R8)
+*line 985
+clr.b -7(R14)
+*line 986
+*line 987
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 988
+*line 989
+*line 990
+cmp #46,_stccol
+bne L201
+*line 990
+jsr _ctcon
+*line 991
+bra L202
+L201:
+*line 992
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+L202:
+*line 993
+bra L71
+*line 994
+*line 995
+*line 996
+L203:
+*line 997
+*line 998
+*line 999
+move _stccol,R0
+bra L205
+*line 1000
+L206:
+*line 1001
+L207:
+*line 1002
+*line 1003
+*line 1004
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+bra L204
+*line 1005
+*line 1006
+L208:
+*line 1007
+L209:
+*line 1008
+L210:
+*line 1009
+*line 1010
+bra L71
+*line 1011
+bra L204
+L205:sub #42,R0
+cmp #4,R0
+bhi L204
+asl #2,R0
+move R0,R8
+add.l #L211,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L211:.dc.l L206
+.dc.l L208
+.dc.l L207
+.dc.l L209
+.dc.l L210
+.text
+L204:
+*line 1012
+*line 1013
+*line 1014
+move.l #_ptdebuf,R8
+move _stccol,R9
+add.l R9,R8
+move.b -8(R14),(R8)
+*line 1015
+clr.b -7(R14)
+*line 1016
+*line 1017
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 1018
+*line 1019
+*line 1020
+cmp #42,_stccol
+bne L212
+*line 1020
+add #1,_stccol
+*line 1021
+L212:
+*line 1022
+*line 1023
+cmp #44,_stccol
+bne L213
+*line 1023
+jsr _ctcon
+*line 1024
+bra L214
+L213:
+*line 1025
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+L214:
+*line 1026
+bra L71
+*line 1027
+*line 1028
+*line 1029
+L215:
+*line 1030
+*line 1031
+*line 1032
+move _stccol,R0
+bra L217
+*line 1033
+L218:
+*line 1034
+*line 1035
+*line 1036
+*line 1037
+cmp #1,R7
+bgt L71
+*line 1038
+*line 1039
+*line 1040
+L219:
+*line 1041
+L220:
+*line 1042
+*line 1043
+*line 1044
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+bra L216
+*line 1045
+*line 1046
+L221:
+*line 1047
+L222:
+*line 1048
+*line 1049
+bra L71
+*line 1050
+bra L216
+L217:sub #42,R0
+cmp #4,R0
+bhi L216
+asl #2,R0
+move R0,R8
+add.l #L223,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L223:.dc.l L218
+.dc.l L219
+.dc.l L221
+.dc.l L220
+.dc.l L222
+.text
+L216:
+*line 1051
+*line 1052
+*line 1053
+move.l #_ptdebuf,R8
+move _stccol,R9
+add.l R9,R8
+move.b -8(R14),(R8)
+*line 1054
+clr.b -7(R14)
+*line 1055
+*line 1056
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 1057
+*line 1058
+*line 1059
+cmp #43,_stccol
+bne L224
+*line 1059
+add #1,_stccol
+*line 1060
+L224:
+*line 1061
+*line 1062
+cmp #45,_stccol
+bne L225
+*line 1062
+jsr _ctcon
+*line 1063
+bra L226
+L225:
+*line 1064
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+L226:
+*line 1065
+bra L71
+*line 1066
+*line 1067
+*line 1068
+L227:
+*line 1069
+*line 1070
+*line 1071
+move _stccol,R0
+bra L229
+*line 1072
+L230:
+*line 1073
+*line 1074
+*line 1075
+*line 1076
+cmp #6,R7
+bgt L71
+*line 1077
+*line 1078
+move R7,R0
+add #65,R0
+move.b R0,-8(R14)
+bra L228
+*line 1079
+*line 1080
+L231:
+*line 1081
+*line 1082
+*line 1083
+*line 1084
+cmp #7,R7
+bne L232
+*line 1084
+move.b #32,-8(R14)
+bra L233
+L232:
+*line 1085
+*line 1086
+cmp #8,R7
+bne L234
+*line 1086
+move.b #169,-8(R14)
+bra L235
+L234:
+*line 1087
+*line 1088
+cmp #9,R7
+bne L236
+*line 1088
+move.b #168,-8(R14)
+*line 1089
+bra L237
+L236:bra L71
+L237:L235:L233:
+*line 1090
+*line 1091
+bra L228
+*line 1092
+*line 1093
+L238:
+*line 1094
+L239:
+*line 1095
+L240:
+*line 1096
+*line 1097
+*line 1098
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+bra L228
+*line 1099
+bra L228
+L229:sub #42,R0
+cmp #4,R0
+bhi L228
+asl #2,R0
+move R0,R8
+add.l #L241,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L241:.dc.l L238
+.dc.l L230
+.dc.l L231
+.dc.l L239
+.dc.l L240
+.text
+L228:
+*line 1100
+*line 1101
+*line 1102
+move.l #_ptdebuf,R8
+move _stccol,R9
+add.l R9,R8
+move.b -8(R14),(R8)
+*line 1103
+clr.b -7(R14)
+*line 1104
+*line 1105
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 1106
+*line 1107
+*line 1108
+cmp #46,_stccol
+bne L242
+*line 1108
+jsr _ctcon
+*line 1109
+bra L243
+L242:
+*line 1110
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+L243:
+*line 1111
+bra L71
+*line 1112
+*line 1113
+*line 1114
+L244:
+*line 1115
+*line 1116
+*line 1117
+move R7,R0
+bra L246
+*line 1118
+L247:
+*line 1119
+*line 1120
+*line 1121
+move.l #L248,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 1122
+clr _ptedat2
+bra L245
+*line 1123
+*line 1124
+L249:
+*line 1125
+*line 1126
+*line 1127
+move.l #L250,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 1128
+move #1,_ptedat2
+bra L245
+*line 1129
+*line 1130
+L251:
+*line 1131
+*line 1132
+*line 1133
+move.l #L252,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 1134
+move #2,_ptedat2
+bra L245
+*line 1135
+*line 1136
+L253:
+*line 1137
+*line 1138
+bra L71
+*line 1139
+bra L245
+L246:cmp #7,R0
+beq L247
+cmp #8,R0
+beq L249
+cmp #9,R0
+beq L251
+bra L253
+L245:
+*line 1140
+*line 1141
+*line 1142
+move.l R14,(sp)
+sub.l #8,(sp)
+move.l #42+_ptdebuf,-(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 1143
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move #42,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 1144
+move #46,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+bra L71
+*line 1145
+*line 1146
+*line 1147
+L254:
+*line 1148
+*line 1149
+*line 1150
+*line 1150
+cmp #8,R7
+bne L255
+*line 1151
+*line 1152
+move.l #L256,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 1153
+clr _ptedat2
+*line 1154
+bra L257
+L255:
+*line 1155
+*line 1155
+cmp #9,R7
+bne L258
+*line 1156
+*line 1157
+move.l #L259,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 1158
+move #1,_ptedat2
+*line 1159
+bra L260
+L258:
+*line 1160
+*line 1161
+bra L71
+*line 1162
+L260:L257:
+*line 1163
+*line 1164
+*line 1165
+move.l R14,(sp)
+sub.l #8,(sp)
+move.l #42+_ptdebuf,-(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 1166
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move #42,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 1167
+move #46,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+bra L71
+*line 1168
+*line 1169
+L261:
+*line 1170
+*line 1171
+*line 1172
+*line 1172
+cmp #8,R7
+bne L262
+*line 1173
+*line 1174
+move.l #L263,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 1175
+clr _ptedat2
+*line 1176
+bra L264
+L262:
+*line 1177
+*line 1177
+cmp #9,R7
+bne L265
+*line 1178
+*line 1179
+move.l #L266,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 1180
+move #1,_ptedat2
+*line 1181
+bra L267
+L265:
+*line 1182
+*line 1183
+bra L71
+*line 1184
+L267:L264:
+*line 1185
+*line 1186
+*line 1187
+move.l R14,(sp)
+sub.l #8,(sp)
+move.l #42+_ptdebuf,-(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 1188
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move #42,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 1189
+move #46,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+bra L71
+*line 1190
+*line 1191
+*line 1192
+L268:
+*line 1193
+*line 1194
+bra L71
+*line 1195
+*line 1196
+L269:
+*line 1197
+*line 1198
+*line 1199
+move _stccol,R0
+bra L271
+*line 1200
+L272:
+*line 1201
+*line 1202
+*line 1203
+*line 1204
+cmp #7,R7
+bne L273
+*line 1204
+move.b #82,-8(R14)
+bra L274
+L273:
+*line 1205
+*line 1206
+cmp #8,R7
+bne L275
+move _ptespec,R0
+and #255,R0
+cmp #8,R0
+beq L275
+*line 1206
+move.b #45,-8(R14)
+bra L276
+L275:
+*line 1207
+*line 1208
+cmp #9,R7
+bne L277
+*line 1208
+move.b #43,-8(R14)
+*line 1209
+bra L278
+L277:bra L71
+L278:L276:L274:
+*line 1210
+*line 1211
+bra L270
+*line 1212
+*line 1213
+L279:
+*line 1214
+L280:
+*line 1215
+*line 1216
+*line 1217
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+bra L270
+*line 1218
+*line 1219
+L281:
+*line 1220
+*line 1221
+bra L71
+*line 1222
+bra L270
+L271:cmp #42,R0
+beq L272
+cmp #43,R0
+beq L279
+cmp #44,R0
+beq L280
+bra L281
+L270:
+*line 1223
+*line 1224
+*line 1225
+move.l #_ptdebuf,R8
+move _stccol,R9
+add.l R9,R8
+move.b -8(R14),(R8)
+*line 1226
+clr.b -7(R14)
+*line 1227
+*line 1228
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 1229
+*line 1230
+*line 1231
+cmp #44,_stccol
+bne L282
+*line 1231
+jsr _ctcon
+*line 1232
+bra L283
+L282:
+*line 1233
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+L283:
+*line 1234
+bra L71
+*line 1235
+*line 1236
+*line 1237
+L284:
+*line 1238
+*line 1239
+*line 1240
+*line 1241
+cmp #44,_stccol
+bgt L71
+*line 1242
+*line 1243
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+*line 1244
+move.l #_ptdebuf,R8
+move _stccol,R9
+add.l R9,R8
+move.b -8(R14),(R8)
+*line 1245
+clr.b -7(R14)
+*line 1246
+*line 1247
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 1248
+*line 1249
+*line 1250
+cmp #44,_stccol
+bne L285
+*line 1250
+jsr _ctcon
+*line 1251
+bra L286
+L285:
+*line 1252
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+L286:
+*line 1253
+bra L71
+*line 1254
+*line 1255
+L287:
+*line 1256
+*line 1257
+*line 1258
+*line 1259
+cmp #3,R7
+bgt L71
+cmp #46,_stccol
+beq L71
+*line 1260
+*line 1261
+*line 1262
+cmp #45,_stccol
+bne L10035
+btst #0,1+_ptesuba
+beq L71
+L10035:*line 1263
+*line 1264
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+*line 1265
+clr.b -7(R14)
+*line 1266
+move.l #_ptdebuf,R8
+move _stccol,R9
+add.l R9,R8
+move.b -8(R14),(R8)
+*line 1267
+*line 1268
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 1269
+*line 1270
+*line 1271
+*line 1272
+btst #0,1+_ptesuba
+beq L10037
+cmp #45,_stccol
+beq L10036
+L10037:tst _ptesuba
+beq L10038
+clr R0
+bra L10039
+L10038:move #1,R0
+L10039:and #1,R0
+beq L288
+cmp #44,_stccol
+bne L288
+L10036:*line 1272
+jsr _ctcon
+*line 1273
+bra L289
+L288:
+*line 1274
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+L289:
+*line 1275
+bra L71
+*line 1276
+*line 1277
+*line 1278
+L290:
+*line 1279
+*line 1280
+*line 1281
+*line 1282
+cmp #43,_stccol
+bgt L71
+*line 1283
+*line 1284
+*line 1285
+cmp #42,_stccol
+bne L10040
+cmp #4,R7
+bgt L71
+L10040:*line 1286
+*line 1287
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+*line 1288
+clr.b -7(R14)
+*line 1289
+move.l #_ptdebuf,R8
+move _stccol,R9
+add.l R9,R8
+move.b -8(R14),(R8)
+*line 1290
+*line 1291
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 1292
+*line 1293
+*line 1294
+cmp #43,_stccol
+bne L291
+*line 1294
+jsr _ctcon
+*line 1295
+bra L292
+L291:
+*line 1296
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+L292:
+*line 1297
+bra L71
+*line 1298
+*line 1299
+*line 1300
+L293:
+*line 1301
+*line 1302
+*line 1303
+*line 1304
+cmp #43,_stccol
+bgt L71
+*line 1305
+*line 1306
+*line 1307
+cmp #42,_stccol
+bne L10041
+cmp #2,R7
+bgt L71
+L10041:*line 1308
+*line 1309
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+*line 1310
+clr.b -7(R14)
+*line 1311
+move.l #_ptdebuf,R8
+move _stccol,R9
+add.l R9,R8
+move.b -8(R14),(R8)
+*line 1312
+*line 1313
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 1314
+*line 1315
+*line 1316
+cmp #43,_stccol
+bne L294
+*line 1316
+jsr _ctcon
+*line 1317
+bra L295
+L294:
+*line 1318
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+L295:
+*line 1319
+bra L71
+*line 1320
+*line 1321
+L296:
+*line 1322
+*line 1323
+*line 1324
+*line 1325
+cmp #43,_stccol
+bgt L71
+*line 1326
+*line 1327
+*line 1328
+cmp #42,_stccol
+bne L10042
+cmp #1,R7
+bgt L71
+L10042:*line 1329
+*line 1330
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+*line 1331
+clr.b -7(R14)
+*line 1332
+move.l #_ptdebuf,R8
+move _stccol,R9
+add.l R9,R8
+move.b -8(R14),(R8)
+*line 1333
+*line 1334
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 1335
+*line 1336
+*line 1337
+cmp #43,_stccol
+bne L297
+*line 1337
+jsr _ctcon
+*line 1338
+bra L298
+L297:
+*line 1339
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+L298:
+*line 1340
+bra L71
+*line 1341
+*line 1342
+*line 1343
+L299:
+*line 1344
+*line 1345
+*line 1346
+*line 1347
+cmp #42,_stccol
+bgt L71
+*line 1348
+*line 1349
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+*line 1350
+clr.b -7(R14)
+*line 1351
+move.l #_ptdebuf,R8
+move _stccol,R9
+add.l R9,R8
+move.b -8(R14),(R8)
+*line 1352
+*line 1353
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 1354
+*line 1355
+jsr _ctcon
+bra L71
+*line 1356
+*line 1357
+L300:
+*line 1358
+*line 1359
+bra L71
+*line 1360
+bra L127
+L128:sub #1,R0
+cmp #17,R0
+bhi L300
+asl #2,R0
+move R0,R8
+add.l #L301,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L301:.dc.l L129
+.dc.l L148
+.dc.l L151
+.dc.l L192
+.dc.l L203
+.dc.l L215
+.dc.l L227
+.dc.l L244
+.dc.l L254
+.dc.l L261
+.dc.l L268
+.dc.l L269
+.dc.l L284
+.dc.l L287
+.dc.l L290
+.dc.l L293
+.dc.l L296
+.dc.l L299
+.text
+L127:
+*line 1361
+*line 1362
+L126:L125:L76:L74:L71:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
+L2:.dc.b $A,$25,$73,$28,$29,$3A,$20,$20,$63,$61,$6C,$6C,$65,$64,$20,$53,$6E,$61,$70,$50,$54,$56,$28,$29,$A,$0
+L10:.dc.b $20,$20,$70,$74,$64,$65,$62,$75,$66,$20,$3D,$20,$22,$25,$73,$22,$A,$0
+L11:.dc.b $20,$20,$70,$74,$65,$20,$20,$24,$25,$30,$34,$2E,$34,$58,$20,$24,$25,$30,$34,$2E,$34,$58,$20,$20,$20,$24,$25,$30,$34,$2E
+.dc.b $34,$58,$20,$24,$25,$30,$34,$2E,$34,$58,$20,$20,$20,$24,$25,$30,$34,$2E,$34,$58,$20,$24,$25,$30,$34,$2E,$34,$58,$A,$0
+L12:.dc.b $20,$20,$70,$74,$62,$20,$20,$24,$25,$30,$34,$2E,$34,$58,$20,$24,$25,$30,$34,$2E,$34,$58,$20,$20,$20,$24,$25,$30,$34,$2E
+.dc.b $34,$58,$20,$24,$25,$30,$34,$2E,$34,$58,$20,$20,$20,$24,$25,$30,$34,$2E,$34,$58,$20,$24,$25,$30,$34,$2E,$34,$58,$A,$0
+L13:.dc.b $20,$20,$70,$74,$65,$20,$20,$64,$66,$74,$70,$3A,$20,$25,$32,$64,$20,$20,$64,$66,$73,$74,$3A,$20,$25,$32,$64,$20,$20,$64
+.dc.b $65,$73,$74,$3A,$20,$25,$32,$64,$20,$20,$64,$61,$74,$61,$3A,$20,$25,$32,$64,$20,$20,$6D,$65,$6E,$75,$3A,$20,$25,$32,$64
+.dc.b $A,$0
+L14:.dc.b $20,$20,$70,$74,$65,$20,$20,$67,$6F,$6F,$64,$3A,$20,$25,$64,$20,$20,$64,$66,$6F,$6B,$3A,$20,$25,$64,$20,$20,$73,$74,$6F
+.dc.b $6B,$3A,$20,$25,$64,$20,$20,$64,$73,$6F,$6B,$3A,$20,$25,$64,$20,$20,$64,$74,$6F,$6B,$3A,$20,$25,$64,$20,$20,$73,$65,$74
+.dc.b $3A,$20,$25,$64,$20,$20,$66,$6C,$61,$67,$3A,$20,$25,$64,$A,$0
+L15:.dc.b $20,$20,$70,$74,$65,$20,$20,$70,$72,$65,$64,$3A,$20,$25,$33,$64,$20,$20,$63,$70,$6F,$73,$3A,$20,$25,$33,$64,$20,$20,$73
+.dc.b $75,$63,$63,$3A,$20,$25,$33,$64,$A,$0
+L16:.dc.b $A,$0
+L54:.dc.b $20,$20,$0
+L58:.dc.b $25,$30,$32,$64,$0
+L248:.dc.b $54,$72,$61,$6E,$73,$0
+L250:.dc.b $53,$74,$6F,$70,$20,$0
+L252:.dc.b $53,$74,$61,$72,$74,$0
+L256:.dc.b $53,$74,$6F,$70,$20,$0
+L259:.dc.b $53,$74,$61,$72,$74,$0
+L263:.dc.b $4F,$66,$66,$20,$20,$20,$0
+L266:.dc.b $4F,$6E,$20,$20,$20,$0
Index: alcyon/ptfield.s
===================================================================
--- alcyon/ptfield.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/ptfield.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,2264 @@
+.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 _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _stmptr
+.globl _defptr
+.globl _patches
+.globl _defents
+.globl _seqtab
+.globl _seqflag
+.globl _seqline
+.globl _seqstim
+.globl _seqtime
+.globl _sregval
+.globl _trstate
+.globl _xy_up
+.globl _xy_dn
+.globl _premove
+.globl _pstmove
+.globl _curtype
+.globl _astat
+.globl _chtime
+.globl _chwait
+.globl _cmfirst
+.globl _cmtype
+.globl _curhold
+.globl _cvtime
+.globl _cvwait
+.globl _ncvwait
+.globl _ptbflag
+.globl _ptecpos
+.globl _ptedef
+.globl _ptedfok
+.globl _pteset
+.globl _ptestm
+.globl _ptestok
+.globl _ss_ptsw
+.globl _ss_sqsw
+.globl _stccol
+.globl _stcrow
+.globl _syrate
+.globl _tvcwval
+.globl _vcwval
+.globl _crate1
+.globl _ptdebuf
+.globl _csbp
+.globl _ptboxes
+.globl _ptebuf
+.globl _trdata
+.data
+_trdata:
+*line 88
+.dc.l L1
+*line 88
+.dc.l L2
+*line 88
+.dc.l L3
+.globl _ssdata
+.data
+_ssdata:
+*line 89
+.dc.l L4
+*line 89
+.dc.l L5
+.globl _stdata
+.data
+_stdata:
+*line 91
+.dc.l L6
+*line 91
+.dc.l L7
+*line 91
+.dc.l L8
+*line 91
+.dc.l L9
+*line 91
+.dc.l L10
+.globl _smdata
+.data
+_smdata:
+*line 95
+.dc.l L11
+*line 96
+.dc.l L12
+*line 97
+.dc.l L13
+*line 98
+.dc.l L14
+*line 99
+.dc.l L15
+*line 100
+.dc.l L16
+*line 101
+.dc.l L17
+*line 102
+.dc.l L18
+*line 103
+.dc.l L19
+*line 104
+.dc.l L20
+*line 105
+.dc.l L21
+*line 106
+.dc.l L22
+*line 107
+.dc.l L23
+*line 108
+.dc.l L24
+.globl _pt_flds
+.data
+_pt_flds:
+*line 113
+.dc.l _stdctp5
+*line 114
+.dc.l _nokey
+*line 115
+.dc.l _aftercm
+*line 116
+.dc.l _cxkstd
+*line 117
+.dc.l _cykstd
+*line 118
+.dc.l _smxupd
+*line 119
+.dc.l _smyupd
+*line 120
+.dc.l _stopcm
+*line 121
+.dc.l _nokey
+*line 122
+.dc.l _ptxkey
+*line 123
+.dc.l _ptekey
+*line 124
+.dc.l _ptmkey
+*line 125
+.dc.l _ptdkey
+*line 126
+.dc.l _nokey
+.dc.l $0
+*line 128
+.dc.l _ptboxes
+*line 129
+.dc.l _crate1
+*line 130
+.dc.l _crate1
+.dc.w $4
+.dc.w $10
+.dc.w $7E
+.globl _ptmkey
+.text
+_ptmkey:
+~~ptmkey:
+link R14,#0
+movem.l R6-R7,-(sp)
+~nc=R7
+*line 149
+*line 149
+tst _astat
+beq L26
+*line 150
+*line 151
+*line 151
+cmp #48,_stccol
+bne L27
+*line 152
+*line 153
+*line 153
+tst _ss_sqsw
+bne L28
+*line 154
+*line 155
+move.l _xy_dn,R8
+jsr (R8)
+*line 156
+*line 157
+move.l _premove,R8
+jsr (R8)
+*line 158
+*line 159
+move.l _curtype,R8
+jsr (R8)
+move R0,R7
+*line 160
+*line 161
+move _syrate,_cvtime
+*line 162
+move _curhold,_ncvwait
+*line 163
+*line 164
+move #-1,_ss_ptsw
+*line 165
+move R7,_cmtype
+*line 166
+move #1,_cvwait
+*line 167
+*line 168
+L28:bra L29
+L27:
+*line 169
+*line 170
+jsr _stdmkey
+L29:
+*line 171
+bra L30
+L26:
+*line 172
+*line 173
+*line 174
+*line 174
+cmp #48,_stccol
+bne L31
+*line 175
+*line 176
+clr _ss_ptsw
+*line 177
+move #1,_cvwait
+*line 178
+move _cvtime,_ncvwait
+*line 179
+move #1,_cmfirst
+*line 180
+*line 181
+*line 182
+tst _ss_sqsw
+bne L32
+*line 182
+move.l _xy_up,R8
+jsr (R8)
+*line 183
+L32:
+*line 184
+move.l _pstmove,R8
+jsr (R8)
+*line 185
+*line 186
+bra L33
+L31:
+*line 187
+jsr _stdmkey
+L33:L30:L25:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _ptekey
+.text
+_ptekey:
+~~ptekey:
+link R14,#0
+movem.l R6-R7,-(sp)
+~nc=R7
+*line 204
+*line 204
+tst _astat
+beq L35
+*line 205
+*line 206
+*line 206
+cmp #48,_stccol
+bne L36
+*line 207
+*line 208
+*line 208
+tst _ss_sqsw
+bne L37
+*line 209
+*line 210
+move.l _xy_dn,R8
+jsr (R8)
+*line 211
+*line 212
+move.l _premove,R8
+jsr (R8)
+*line 213
+*line 214
+move.l _curtype,R8
+jsr (R8)
+move R0,R7
+*line 215
+*line 216
+move _syrate,_cvtime
+*line 217
+move _curhold,_ncvwait
+*line 218
+*line 219
+move #1,_ss_ptsw
+*line 220
+move R7,_cmtype
+*line 221
+move #1,_cvwait
+*line 222
+*line 223
+L37:
+*line 224
+bra L38
+L36:
+*line 225
+jsr _select
+L38:
+*line 226
+bra L39
+L35:
+*line 227
+*line 228
+*line 229
+*line 229
+cmp #48,_stccol
+bne L40
+*line 230
+*line 231
+clr _ss_ptsw
+*line 232
+move #1,_cvwait
+*line 233
+move _cvtime,_ncvwait
+*line 234
+move #1,_cmfirst
+*line 235
+*line 236
+*line 237
+tst _ss_sqsw
+bne L41
+*line 237
+move.l _xy_up,R8
+jsr (R8)
+*line 238
+L41:
+*line 239
+move.l _pstmove,R8
+jsr (R8)
+*line 240
+*line 241
+bra L42
+L40:
+*line 242
+jsr _select
+L42:L39:L34:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _ptxkey
+.text
+_ptxkey:
+~~ptxkey:
+link R14,#0
+movem.l R2-R7,-(sp)
+~i=R7
+~cp=R6
+~pp=R5
+~sp=R4
+~stm=R3
+*line 259
+*line 260
+tst _astat
+beq L43
+*line 261
+*line 262
+*line 262
+cmp #2,_stccol
+blt L44
+cmp #13,_stccol
+bgt L44
+*line 263
+*line 264
+*line 264
+tst _ptecpos
+beq L45
+tst _ptbflag
+bne L45
+*line 265
+*line 266
+move #6,(sp)
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+move.l #4+_ptebuf,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 267
+move #1,_pteset
+*line 268
+jsr _pte2buf
+*line 269
+*line 270
+L45:
+*line 271
+move #4608,_ptedef
+*line 272
+move #1,_ptedfok
+*line 273
+*line 274
+move #12,(sp)
+move #32,-(sp)
+move.l #2+_ptdebuf,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 275
+*line 276
+clr R7
+bra L48
+L49:
+*line 277
+*line 278
+move R7,R8
+add.l #_ptdebuf,R8
+tst.b (R8)
+bne L50
+*line 278
+move R7,R8
+add.l #_ptdebuf,R8
+move.b #32,(R8)
+*line 279
+L50:L47:
+*line 276
+add #1,R7
+L48:
+*line 276
+cmp #48,R7
+blt L49
+L46:
+*line 280
+move.b #176,_ptdebuf
+*line 281
+clr.b 48+_ptdebuf
+*line 282
+*line 283
+move #18,(sp)
+move.l #_ptdebuf,-(sp)
+clr -(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 284
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+*line 285
+*line 286
+*line 287
+bra L51
+L44:
+*line 288
+*line 288
+cmp #15,_stccol
+blt L52
+cmp #26,_stccol
+bgt L52
+*line 289
+*line 290
+*line 290
+tst _ptecpos
+beq L53
+tst _ptbflag
+bne L53
+*line 291
+*line 292
+move #6,(sp)
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+move.l #4+_ptebuf,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 293
+move #1,_pteset
+*line 294
+jsr _pte2buf
+*line 295
+*line 296
+L53:
+*line 297
+move #4608,_ptestm
+*line 298
+clr _ptestok
+*line 299
+*line 300
+move #12,(sp)
+move #32,-(sp)
+move.l #15+_ptdebuf,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 301
+*line 302
+clr R7
+bra L56
+L57:
+*line 303
+*line 304
+move R7,R8
+add.l #_ptdebuf,R8
+tst.b (R8)
+bne L58
+*line 304
+move R7,R8
+add.l #_ptdebuf,R8
+move.b #32,(R8)
+*line 305
+L58:L55:
+*line 302
+add #1,R7
+L56:
+*line 302
+cmp #48,R7
+blt L57
+L54:
+*line 306
+move.b #176,_ptdebuf
+*line 307
+clr.b 48+_ptdebuf
+*line 308
+*line 309
+move #18,(sp)
+move.l #_ptdebuf,-(sp)
+clr -(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 310
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+*line 311
+bra L59
+L52:
+*line 312
+*line 312
+cmp #28,_stccol
+blt L60
+cmp #40,_stccol
+bgt L60
+*line 313
+*line 314
+jsr _voidpb
+*line 315
+*line 316
+move.b #176,_ptdebuf
+*line 317
+clr.b 48+_ptdebuf
+*line 318
+*line 319
+move #18,(sp)
+move.l #_ptdebuf,-(sp)
+clr -(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 320
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movectc
+addq.l #2,sp
+*line 321
+*line 322
+bra L61
+L60:
+*line 323
+*line 323
+cmp #42,_stccol
+blt L62
+cmp #46,_stccol
+bgt L62
+*line 324
+*line 325
+*line 325
+tst _ptecpos
+beq L63
+*line 326
+*line 327
+move _ptecpos,R6
+*line 328
+move R6,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+move 2(R8),R5
+*line 329
+move R6,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+move (R8),R4
+*line 330
+*line 331
+move R6,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+move 6(R8),R3
+*line 336
+*line 337
+*line 338
+*line 339
+tst R5
+beq L64
+*line 339
+move R5,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+move R4,(R8)
+bra L65
+L64:
+*line 340
+*line 341
+move R4,R0
+move R3,R1
+and #8191,R1
+ext.l R1
+add.l #_stmptr,R1
+move.l R1,R9
+move.b R0,(R9)
+L65:
+*line 342
+*line 343
+*line 344
+tst R4
+beq L66
+*line 344
+move R4,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+move R5,2(R8)
+*line 345
+L66:
+*line 346
+*line 347
+move R6,(sp)
+jsr _findnxt
+move R0,R4
+beq L67
+*line 347
+move R4,_ptecpos
+bra L68
+L67:
+*line 348
+*line 349
+move R6,(sp)
+jsr _findprv
+move R0,R5
+beq L69
+*line 349
+move R5,_ptecpos
+*line 350
+bra L70
+L69:
+*line 351
+clr _ptecpos
+L70:L68:
+*line 352
+*line 353
+move R6,(sp)
+jsr _pt_del
+*line 354
+*line 355
+*line 356
+clr R7
+bra L73
+L74:
+*line 357
+*line 358
+*line 358
+move.l #_defptr,R8
+move.b 0(R8,R7),R0
+ext.w R0
+move R0,R6
+beq L75
+*line 359
+*line 360
+clr R5
+*line 361
+*line 362
+bra L78
+L77:
+*line 363
+*line 364
+move R6,R0
+muls #10,R0
+add.l #_defents,R0
+move.l R0,R8
+move (R8),R4
+*line 365
+*line 366
+*line 366
+move R6,R0
+muls #10,R0
+add.l #_defents,R0
+move.l R0,R8
+cmp 2(R8),R3
+bne L79
+*line 367
+*line 377
+*line 378
+*line 379
+*line 380
+tst R5
+beq L80
+*line 380
+move R5,R0
+muls #10,R0
+add.l #_defents,R0
+move.l R0,R8
+move R4,(R8)
+bra L81
+L80:
+*line 381
+*line 382
+move R4,R0
+move R7,R9
+add.l #_defptr,R9
+move.b R0,(R9)
+L81:
+*line 383
+*line 384
+move R6,(sp)
+jsr _dt_del
+*line 385
+bra L82
+L79:
+*line 386
+*line 387
+*line 388
+move R6,R5
+L82:
+*line 389
+*line 390
+*line 391
+move R4,R6
+L78:
+*line 392
+tst R6
+bne L77
+L76:
+*line 393
+L75:L72:
+*line 356
+add #1,R7
+L73:
+*line 356
+cmp #5120,R7
+blt L74
+L71:
+*line 394
+*line 395
+*line 396
+jsr _dptw
+*line 397
+L63:
+*line 398
+L62:L61:L59:L51:L43:tst.l (sp)+
+movem.l (sp)+,R3-R7
+unlk R14
+rts
+.globl _dspdfst
+.text
+_dspdfst:
+~~dspdfst:
+~val=R7
+~buf=8
+link R14,#0
+movem.l R3-R7,-(sp)
+~chan=R6
+~port=R5
+~stim=R4
+*line 416
+move 12(R14),R7
+*line 416
+*line 416
+cmp #4608,R7
+bne L84
+*line 417
+*line 418
+move.l #L85,(sp)
+move.l 8(R14),-(sp)
+jsr _strcpy
+addq.l #4,sp
+bra L83
+*line 419
+*line 420
+*line 421
+L84:
+*line 422
+move R7,R5
+move #11,R0
+lsr R0,R5
+and #3,R5
+*line 423
+move R7,R6
+lsr #7,R6
+and #15,R6
+*line 424
+move R7,R4
+and #127,R4
+*line 426
+clr R0
+move R5,R0
+bra L87
+*line 427
+L88:
+*line 428
+L89:
+*line 429
+*line 430
+*line 431
+*line 432
+*line 433
+move R6,(sp)
+add #1,(sp)
+move R5,-(sp)
+add #1,(sp)
+move R4,-(sp)
+add #1,(sp)
+clr R0
+move R7,R0
+and #-32768,R0
+beq L10000
+move.l #L91,-(sp)
+bra L10002
+L10000:move.l #L92,-(sp)
+L10002:move.l #L90,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #16,sp
+*line 434
+bra L86
+*line 435
+*line 436
+*line 437
+*line 438
+L93:
+*line 439
+*line 440
+*line 441
+clr R0
+move R6,R0
+bra L95
+*line 442
+L96:
+*line 443
+*line 444
+*line 445
+*line 446
+*line 447
+move R4,(sp)
+add #1,(sp)
+clr R0
+move R7,R0
+and #-32768,R0
+beq L10003
+move.l #L98,-(sp)
+bra L10005
+L10003:move.l #L99,-(sp)
+L10005:move.l #L97,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #12,sp
+*line 448
+bra L94
+*line 449
+*line 450
+L100:
+*line 451
+*line 452
+*line 453
+move R4,(sp)
+add #1,(sp)
+move.l #L101,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+addq.l #8,sp
+bra L94
+*line 454
+*line 455
+L102:
+*line 456
+*line 457
+*line 458
+move R4,(sp)
+add #1,(sp)
+move.l #L103,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+addq.l #8,sp
+bra L94
+*line 459
+*line 460
+L104:
+*line 461
+*line 462
+*line 463
+*line 464
+*line 465
+move R6,(sp)
+add #1,(sp)
+move R4,-(sp)
+add #1,(sp)
+clr R0
+move R7,R0
+and #-32768,R0
+beq L10006
+move.l #L106,-(sp)
+bra L10008
+L10006:move.l #L107,-(sp)
+L10008:move.l #L105,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #14,sp
+bra L94
+*line 466
+*line 467
+bra L94
+L95:tst R0
+beq L96
+cmp #2,R0
+beq L100
+cmp #3,R0
+beq L102
+bra L104
+L94:
+*line 468
+*line 469
+bra L86
+*line 470
+*line 471
+L108:
+*line 472
+*line 473
+*line 474
+move R6,(sp)
+add #1,(sp)
+move R5,-(sp)
+add #1,(sp)
+move R4,-(sp)
+add #1,(sp)
+move.l #L109,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #12,sp
+bra L86
+*line 475
+bra L86
+L87:tst R0
+beq L88
+cmp #1,R0
+beq L89
+cmp #2,R0
+beq L93
+bra L108
+L86:L83:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _dfpdat
+.text
+_dfpdat:
+~~dfpdat:
+~pp=R13
+link R14,#-8
+movem.l R7-R7/R13-R13,-(sp)
+~buf=L111
+.bss
+L111:.ds.b 32
+.text
+~sgn=-2
+~vp1=-4
+~vp2=-6
+~val=-8
+*line 496
+move.l 8(R14),R13
+*line 496
+move 14(R13),-8(R14)
+*line 498
+clr R0
+move 12(R13),R0
+bra L113
+*line 499
+L114:
+*line 500
+*line 501
+*line 502
+move -8(R14),R8
+add.l R8,R8
+add.l R8,R8
+move.l #_smdata,R9
+move.l 0(R8,R9.l),(sp)
+move.l #L111,-(sp)
+jsr _strcpy
+addq.l #4,sp
+bra L112
+*line 503
+*line 504
+L115:
+*line 505
+*line 506
+*line 507
+move.l #_ebuf,(sp)
+move -8(R14),-(sp)
+jsr _fr2dec
+addq.l #2,sp
+*line 508
+*line 509
+move.b 3+_ebuf,L111
+*line 510
+move.b _ebuf,1+L111
+*line 511
+move.b #46,2+L111
+*line 512
+move.b 1+_ebuf,3+L111
+*line 513
+move.b 2+_ebuf,4+L111
+*line 514
+clr.b 5+L111
+bra L112
+*line 515
+*line 516
+*line 517
+L116:
+*line 518
+*line 519
+*line 520
+move -8(R14),R0
+asr #5,R0
+move R0,-8(R14)
+*line 521
+*line 522
+*line 522
+tst -8(R14)
+bge L117
+*line 523
+*line 524
+move -8(R14),R0
+neg R0
+move R0,-8(R14)
+*line 525
+move #45,-2(R14)
+*line 526
+bra L118
+L117:
+*line 527
+*line 528
+*line 529
+move #43,-2(R14)
+L118:
+*line 530
+*line 531
+*line 532
+move -8(R14),R0
+ext.l R0
+divs #100,R0
+move R0,-4(R14)
+*line 533
+move -8(R14),R0
+clr R1
+move -4(R14),R1
+mulu #100,R1
+sub R1,R0
+move R0,-6(R14)
+*line 534
+*line 535
+*line 535
+cmp #9,-4(R14)
+bls L119
+*line 536
+*line 537
+clr -4(R14)
+*line 538
+*line 539
+*line 540
+cmp #43,-2(R14)
+bne L120
+*line 540
+move #160,-2(R14)
+*line 541
+bra L121
+L120:
+*line 542
+move #161,-2(R14)
+L121:
+*line 543
+*line 544
+L119:
+*line 545
+move -6(R14),(sp)
+move -4(R14),-(sp)
+move -2(R14),-(sp)
+move.l #L122,-(sp)
+move.l #L111,-(sp)
+jsr _sprintf
+adda.l #12,sp
+bra L112
+*line 546
+*line 547
+*line 548
+L123:
+*line 549
+*line 550
+*line 551
+move -8(R14),(sp)
+jsr _fromfpu
+move R0,-4(R14)
+*line 552
+*line 553
+move -4(R14),(sp)
+move.l #L124,-(sp)
+move.l #L111,-(sp)
+jsr _sprintf
+addq.l #8,sp
+bra L112
+*line 554
+*line 555
+L125:
+*line 556
+*line 557
+*line 558
+*line 559
+clr R0
+move 8(R13),R0
+and #255,R0
+cmp #22,R0
+bne L126
+*line 559
+btst #0,-7(R14)
+beq L10009
+move.l #L128,(sp)
+bra L10011
+L10009:move.l #L129,(sp)
+L10011:move.l #L127,-(sp)
+move.l #L111,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 560
+bra L130
+L126:
+*line 561
+btst #0,-7(R14)
+beq L10012
+move.l #L132,(sp)
+bra L10014
+L10012:move.l #L133,(sp)
+L10014:move.l #L131,-(sp)
+move.l #L111,-(sp)
+jsr _sprintf
+addq.l #8,sp
+L130:
+*line 562
+bra L112
+*line 563
+*line 564
+L134:
+*line 565
+*line 566
+*line 567
+move -8(R14),(sp)
+move.l #L135,-(sp)
+move.l #L111,-(sp)
+jsr _sprintf
+addq.l #8,sp
+bra L112
+*line 568
+bra L112
+L113:cmp #4,R0
+bhi L134
+asl #2,R0
+move R0,R8
+add.l #L136,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L136:.dc.l L114
+.dc.l L115
+.dc.l L123
+.dc.l L116
+.dc.l L125
+.text
+L112:
+*line 571
+move.l #L111,R0
+bra L110
+L110:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _pafpu1
+.text
+_pafpu1:
+~~pafpu1:
+~pp=R13
+~bf=8
+~ad=12
+~gt=16
+~gn=18
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+*line 591
+move.l 20(R14),R13
+*line 591
+move.l R13,(sp)
+jsr _dfpdat
+move.l R0,(sp)
+move 18(R14),-(sp)
+move 16(R14),-(sp)
+clr R0
+move 12(R13),R0
+lsl #2,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R8
+move.l #_stdata,R9
+move.l 0(R8,R9.l),-(sp)
+move.l 12(R14),-(sp)
+move.l #L138,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #20,sp
+L137:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _pafpu2
+.text
+_pafpu2:
+~~pafpu2:
+~pp=R13
+~bf=8
+~ad=12
+~os=16
+~gt=18
+~gn=20
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+*line 608
+move.l 22(R14),R13
+*line 608
+move.l R13,(sp)
+jsr _dfpdat
+move.l R0,(sp)
+move 20(R14),-(sp)
+move 18(R14),-(sp)
+clr R0
+move 12(R13),R0
+lsl #2,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R8
+move.l #_stdata,R9
+move.l 0(R8,R9.l),-(sp)
+move 16(R14),-(sp)
+move.l 12(R14),-(sp)
+move.l #L140,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #22,sp
+L139:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _pafpu3
+.text
+_pafpu3:
+~~pafpu3:
+~pp=R13
+~bf=8
+~ad=12
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+*line 624
+move.l 16(R14),R13
+*line 624
+move.l R13,(sp)
+jsr _dfpdat
+move.l R0,(sp)
+clr R0
+move 12(R13),R0
+lsl #2,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R8
+move.l #_stdata,R9
+move.l 0(R8,R9.l),-(sp)
+move.l 12(R14),-(sp)
+move.l #L142,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #16,sp
+L141:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _dspdest
+.text
+_dspdest:
+~~dspdest:
+~pp=R13
+~buf=8
+link R14,#-42
+movem.l R7-R7/R13-R13,-(sp)
+~chan=-2
+~osc=-4
+~port=-6
+~stim=-8
+~vg=-10
+~vgt=-12
+~vgn=-14
+~vp1=-16
+~vp2=-18
+~sgn=-20
+~val=-22
+~buf2=-38
+~rtype=-42
+*line 644
+move.l 12(R14),R13
+*line 644
+clr R0
+move 10(R13),R0
+move #11,R1
+lsr R1,R0
+and #3,R0
+move R0,-6(R14)
+*line 645
+clr R0
+move 10(R13),R0
+lsr #7,R0
+and #15,R0
+move R0,-2(R14)
+*line 646
+clr R0
+move 10(R13),R0
+and #127,R0
+move R0,-8(R14)
+*line 648
+clr R0
+move 10(R13),R0
+lsr #8,R0
+and #255,R0
+move R0,-10(R14)
+*line 649
+clr R0
+move 10(R13),R0
+and #255,R0
+add #1,R0
+move R0,-4(R14)
+*line 651
+*line 651
+cmp #11,-10(R14)
+bls L144
+*line 652
+*line 653
+move #71,-12(R14)
+*line 654
+clr R0
+move -10(R14),R0
+add #-11,R0
+move R0,-14(R14)
+*line 655
+bra L145
+L144:
+*line 656
+*line 657
+*line 658
+move #86,-12(R14)
+*line 659
+clr R0
+move -10(R14),R0
+add #1,R0
+move R0,-14(R14)
+L145:
+*line 662
+cmp #9,-14(R14)
+bls L10015
+move #162,R0
+bra L10017
+L10015:move #48,R0
+L10017:add -14(R14),R0
+move R0,-14(R14)
+*line 666
+clr R0
+move 8(R13),R0
+and #255,R0
+bra L147
+*line 667
+L148:
+*line 668
+*line 669
+*line 670
+*line 671
+*line 672
+clr R0
+move 14(R13),R0
+and #3,R0
+lsl #2,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R8
+move.l #_trdata,R9
+move.l 0(R8,R9.l),(sp)
+move -2(R14),-(sp)
+add #1,(sp)
+move -6(R14),-(sp)
+add #1,(sp)
+move -8(R14),-(sp)
+add #1,(sp)
+move.l #L149,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #14,sp
+*line 673
+bra L146
+*line 674
+*line 675
+L150:
+*line 676
+*line 677
+*line 678
+*line 679
+*line 680
+clr R0
+move 14(R13),R0
+and #1,R0
+lsl #2,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R8
+move.l #_ssdata,R9
+move.l 0(R8,R9.l),(sp)
+move -8(R14),-(sp)
+add #1,(sp)
+move.l #L151,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 681
+bra L146
+*line 682
+*line 683
+L152:
+*line 684
+*line 685
+*line 686
+*line 687
+*line 688
+clr R0
+move 14(R13),R0
+and #3,R0
+lsl #2,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R8
+move.l #_trdata,R9
+move.l 0(R8,R9.l),(sp)
+move -8(R14),-(sp)
+add #1,(sp)
+move.l #L153,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 689
+bra L146
+*line 690
+*line 691
+*line 692
+L154:
+*line 693
+*line 694
+*line 695
+*line 695
+btst #0,11(R13)
+beq L155
+*line 696
+*line 697
+*line 698
+*line 699
+*line 700
+*line 701
+*line 702
+clr R0
+move 12(R13),R0
+lsr #8,R0
+move R0,(sp)
+and #3,(sp)
+add #48,(sp)
+clr R0
+move 12(R13),R0
+move #10,R1
+lsr R1,R0
+move R0,-(sp)
+and #3,(sp)
+add #48,(sp)
+clr R0
+move 12(R13),R0
+move #12,R1
+lsr R1,R0
+move R0,-(sp)
+and #3,(sp)
+add #48,(sp)
+clr R0
+move 12(R13),R0
+move #14,R1
+lsr R1,R0
+move R0,-(sp)
+and #3,(sp)
+add #48,(sp)
+move 10(R13),-(sp)
+add #65,(sp)
+move.l #L156,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #16,sp
+*line 703
+bra L157
+L155:
+*line 704
+*line 705
+*line 706
+*line 707
+*line 708
+*line 709
+*line 710
+clr R0
+move 12(R13),R0
+move #10,R1
+lsr R1,R0
+move R0,(sp)
+and #3,(sp)
+add #48,(sp)
+clr R0
+move 12(R13),R0
+move #12,R1
+lsr R1,R0
+move R0,-(sp)
+and #3,(sp)
+add #48,(sp)
+clr R0
+move 12(R13),R0
+move #14,R1
+lsr R1,R0
+move R0,-(sp)
+and #3,(sp)
+add #48,(sp)
+move 10(R13),-(sp)
+add #65,(sp)
+move.l #L158,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #14,sp
+L157:
+*line 711
+*line 712
+bra L146
+*line 713
+*line 714
+L159:
+*line 715
+*line 716
+*line 717
+*line 718
+*line 719
+move 12(R13),(sp)
+move 10(R13),-(sp)
+add #1,(sp)
+move.l #L160,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 720
+bra L146
+*line 721
+*line 722
+L161:
+*line 723
+*line 724
+*line 725
+*line 726
+*line 727
+clr R0
+move 14(R13),R0
+and #1,R0
+lsl #2,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R8
+move.l #_ssdata,R9
+move.l 0(R8,R9.l),(sp)
+move 10(R13),-(sp)
+add #1,(sp)
+move.l #L162,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 728
+bra L146
+*line 729
+*line 730
+L163:
+*line 731
+*line 732
+*line 733
+*line 734
+move 12(R13),(sp)
+move.l #L164,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 735
+bra L146
+*line 736
+*line 737
+*line 738
+L165:
+*line 739
+*line 740
+*line 741
+move.l #L166,-42(R14)
+bra L167
+*line 742
+*line 743
+L168:
+*line 744
+*line 745
+*line 746
+move.l #L169,-42(R14)
+*line 747
+L167:
+*line 748
+*line 749
+*line 750
+*line 750
+btst #0,13(R13)
+beq L170
+*line 751
+*line 752
+*line 753
+*line 754
+move 14(R13),(sp)
+add #1,(sp)
+move.l -42(R14),-(sp)
+move 10(R13),-(sp)
+add #1,(sp)
+move.l #L171,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #14,sp
+*line 755
+bra L172
+L170:
+*line 756
+*line 757
+*line 758
+*line 758
+move 14(R13),-22(R14)
+bge L173
+*line 759
+*line 760
+move #45,-20(R14)
+*line 761
+move -22(R14),R0
+neg R0
+move R0,-22(R14)
+*line 762
+bra L174
+L173:
+*line 763
+*line 764
+*line 765
+move #43,-20(R14)
+L174:
+*line 766
+*line 767
+*line 768
+*line 769
+*line 770
+move -22(R14),(sp)
+move -20(R14),-(sp)
+move.l -42(R14),-(sp)
+move 10(R13),-(sp)
+add #1,(sp)
+move.l #L175,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #16,sp
+L172:
+*line 771
+*line 772
+bra L146
+*line 773
+*line 774
+L176:
+*line 775
+*line 776
+*line 777
+*line 778
+move 12(R13),(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+move.l #L177,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #12,sp
+*line 779
+bra L146
+*line 780
+*line 781
+*line 782
+L178:
+*line 783
+*line 784
+*line 785
+clr R0
+move 14(R13),R0
+lsr #1,R0
+move R0,-22(R14)
+*line 786
+*line 787
+clr R0
+move 12(R13),R0
+bra L180
+*line 788
+L181:
+*line 789
+*line 790
+*line 791
+*line 791
+tst -22(R14)
+bge L182
+*line 792
+*line 793
+move #45,-20(R14)
+*line 794
+move -22(R14),R0
+neg R0
+move R0,-22(R14)
+*line 795
+bra L183
+L182:
+*line 796
+*line 797
+*line 798
+move #43,-20(R14)
+L183:
+*line 799
+*line 800
+*line 801
+*line 802
+move -22(R14),(sp)
+move -20(R14),-(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+move -4(R14),-(sp)
+move.l #L184,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #16,sp
+*line 803
+bra L179
+*line 804
+*line 805
+L185:
+*line 806
+*line 807
+*line 808
+move -22(R14),(sp)
+jsr _int2rat
+*line 809
+*line 810
+*line 811
+move.l #_ebuf,(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+move -4(R14),-(sp)
+move.l #L186,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #14,sp
+*line 812
+bra L179
+*line 813
+*line 814
+L187:
+*line 815
+*line 816
+*line 817
+move -22(R14),R0
+ext.l R0
+divs #10,R0
+move R0,-16(R14)
+*line 818
+move -22(R14),R0
+clr R1
+move -16(R14),R1
+mulu #10,R1
+sub R1,R0
+move R0,-18(R14)
+*line 819
+*line 820
+*line 821
+move -18(R14),(sp)
+move -16(R14),-(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+move -4(R14),-(sp)
+move.l #L188,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #16,sp
+*line 822
+bra L179
+*line 823
+*line 824
+*line 825
+L189:
+*line 826
+*line 827
+*line 828
+move -22(R14),(sp)
+move.l #_ebuf,-(sp)
+jsr _cnvc2p
+addq.l #4,sp
+*line 829
+*line 830
+*line 831
+move.l #_ebuf,(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+move -4(R14),-(sp)
+move.l #L190,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #14,sp
+*line 832
+bra L179
+*line 833
+*line 834
+L191:
+*line 835
+*line 836
+bra L179
+*line 837
+bra L179
+L180:tst R0
+beq L181
+cmp #1,R0
+beq L185
+cmp #2,R0
+beq L187
+cmp #3,R0
+beq L189
+bra L191
+L179:
+*line 838
+*line 839
+bra L146
+*line 840
+*line 841
+*line 842
+L192:
+*line 843
+*line 844
+*line 845
+move #65,-20(R14)
+bra L193
+*line 846
+*line 847
+L194:
+*line 848
+*line 849
+*line 850
+move #66,-20(R14)
+*line 851
+L193:
+*line 852
+*line 853
+*line 854
+*line 855
+move 12(R13),(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+move -20(R14),-(sp)
+move.l #L195,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #14,sp
+*line 856
+bra L146
+*line 857
+*line 858
+L196:
+*line 859
+*line 860
+*line 861
+*line 862
+move 12(R13),(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+move.l #L197,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #12,sp
+*line 863
+bra L146
+*line 864
+*line 865
+*line 866
+L198:
+*line 867
+*line 868
+*line 869
+move.l R13,(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+move.l #L199,-(sp)
+move.l 8(R14),-(sp)
+jsr _pafpu1
+adda.l #12,sp
+bra L146
+*line 870
+*line 871
+L200:
+*line 872
+*line 873
+*line 874
+move.l R13,(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+move -4(R14),-(sp)
+move.l #L201,-(sp)
+move.l 8(R14),-(sp)
+jsr _pafpu2
+adda.l #14,sp
+bra L146
+*line 875
+*line 876
+L202:
+*line 877
+*line 878
+*line 879
+move.l R13,(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+move -4(R14),-(sp)
+move.l #L203,-(sp)
+move.l 8(R14),-(sp)
+jsr _pafpu2
+adda.l #14,sp
+bra L146
+*line 880
+*line 881
+L204:
+*line 882
+*line 883
+*line 884
+move.l R13,(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+move.l #L205,-(sp)
+move.l 8(R14),-(sp)
+jsr _pafpu1
+adda.l #12,sp
+bra L146
+*line 885
+*line 886
+L206:
+*line 887
+*line 888
+*line 889
+move.l R13,(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+move.l #L207,-(sp)
+move.l 8(R14),-(sp)
+jsr _pafpu1
+adda.l #12,sp
+bra L146
+*line 890
+*line 891
+L208:
+*line 892
+*line 893
+*line 894
+move.l R13,(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+move.l #L209,-(sp)
+move.l 8(R14),-(sp)
+jsr _pafpu1
+adda.l #12,sp
+bra L146
+*line 895
+*line 896
+L210:
+*line 897
+*line 898
+*line 899
+move.l R13,(sp)
+move -14(R14),-(sp)
+move -12(R14),-(sp)
+move.l #L211,-(sp)
+move.l 8(R14),-(sp)
+jsr _pafpu1
+adda.l #12,sp
+bra L146
+*line 900
+*line 901
+*line 902
+L212:
+*line 903
+*line 904
+*line 905
+move.l R13,(sp)
+move.l #L213,-(sp)
+move.l 8(R14),-(sp)
+jsr _pafpu3
+addq.l #8,sp
+bra L146
+*line 906
+*line 907
+L214:
+*line 908
+*line 909
+*line 910
+move.l R13,(sp)
+move.l #L215,-(sp)
+move.l 8(R14),-(sp)
+jsr _pafpu3
+addq.l #8,sp
+bra L146
+*line 911
+*line 912
+L216:
+*line 913
+*line 914
+*line 915
+move.l R13,(sp)
+move.l #L217,-(sp)
+move.l 8(R14),-(sp)
+jsr _pafpu3
+addq.l #8,sp
+bra L146
+*line 916
+*line 917
+L218:
+*line 918
+*line 919
+*line 920
+move.l R13,(sp)
+move.l #L219,-(sp)
+move.l 8(R14),-(sp)
+jsr _pafpu3
+addq.l #8,sp
+bra L146
+*line 921
+*line 922
+L220:
+*line 923
+*line 924
+*line 925
+move 10(R13),(sp)
+move.l #L221,-(sp)
+move.l R14,-(sp)
+add.l #-38,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 926
+move.l R13,(sp)
+move.l R14,-(sp)
+add.l #-38,(sp)
+move.l 8(R14),-(sp)
+jsr _pafpu3
+addq.l #8,sp
+bra L146
+*line 927
+*line 928
+L222:
+*line 929
+*line 930
+bra L146
+*line 931
+bra L146
+L147:sub #1,R0
+cmp #25,R0
+bhi L222
+asl #2,R0
+move R0,R8
+add.l #L223,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L223:.dc.l L148
+.dc.l L150
+.dc.l L152
+.dc.l L154
+.dc.l L159
+.dc.l L161
+.dc.l L163
+.dc.l L165
+.dc.l L168
+.dc.l L176
+.dc.l L178
+.dc.l L192
+.dc.l L194
+.dc.l L196
+.dc.l L198
+.dc.l L200
+.dc.l L202
+.dc.l L204
+.dc.l L206
+.dc.l L208
+.dc.l L210
+.dc.l L212
+.dc.l L214
+.dc.l L216
+.dc.l L218
+.dc.l L220
+.text
+L146:L143:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _ptfield
+.text
+_ptfield:
+~~ptfield:
+link R14,#-4
+*line 946
+move.l #_pt_flds,(sp)
+jsr _curset
+L224:unlk R14
+rts
+.data
+L1:.dc.b $54,$72,$61,$6E,$73,$0
+L2:.dc.b $53,$74,$6F,$70,$20,$0
+L3:.dc.b $53,$74,$61,$72,$74,$0
+L4:.dc.b $53,$74,$6F,$70,$20,$0
+L5:.dc.b $53,$74,$61,$72,$74,$0
+L6:.dc.b $53,$72,$63,$65,$0
+L7:.dc.b $4D,$75,$6C,$74,$0
+L8:.dc.b $54,$69,$6D,$65,$0
+L9:.dc.b $56,$61,$6C,$75,$0
+L10:.dc.b $46,$75,$6E,$63,$0
+L11:.dc.b $20,$20,$20,$20,$20,$0
+L12:.dc.b $52,$61,$6E,$64,$6D,$0
+L13:.dc.b $47,$50,$43,$2F,$56,$0
+L14:.dc.b $3F,$3F,$33,$3F,$3F,$0
+L15:.dc.b $3F,$3F,$34,$3F,$3F,$0
+L16:.dc.b $50,$69,$74,$63,$68,$0
+L17:.dc.b $4B,$65,$79,$50,$72,$0
+L18:.dc.b $4B,$65,$79,$56,$4C,$0
+L19:.dc.b $50,$65,$64,$61,$6C,$0
+L20:.dc.b $3F,$3F,$39,$3F,$3F,$0
+L21:.dc.b $46,$72,$65,$71,$20,$0
+L22:.dc.b $50,$63,$68,$57,$68,$0
+L23:.dc.b $4D,$6F,$64,$57,$68,$0
+L24:.dc.b $42,$72,$65,$74,$68,$0
+L85:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$0
+L90:.dc.b $25,$73,$20,$25,$30,$33,$75,$20,$25,$75,$20,$25,$30,$32,$75,$0
+L91:.dc.b $52,$65,$6C,$0
+L92:.dc.b $4B,$65,$79,$0
+L97:.dc.b $25,$73,$20,$25,$30,$33,$75,$20,$4C,$20,$20,$20,$0
+L98:.dc.b $52,$65,$6C,$0
+L99:.dc.b $4B,$65,$79,$0
+L101:.dc.b $54,$72,$69,$67,$20,$25,$30,$32,$75,$20,$20,$20,$20,$20,$0
+L103:.dc.b $50,$75,$6C,$73,$65,$20,$25,$75,$20,$20,$20,$20,$20,$0
+L105:.dc.b $25,$73,$3F,$3F,$20,$25,$30,$33,$75,$20,$4C,$20,$25,$30,$32,$75,$0
+L106:.dc.b $72,$0
+L107:.dc.b $63,$0
+L109:.dc.b $3F,$3F,$3F,$20,$25,$30,$33,$75,$20,$25,$75,$20,$25,$30,$32,$75,$0
+L122:.dc.b $25,$63,$25,$75,$2E,$25,$30,$32,$75,$0
+L124:.dc.b $25,$35,$75,$0
+L127:.dc.b $25,$73,$0
+L128:.dc.b $4F,$6E,$20,$20,$20,$0
+L129:.dc.b $4F,$66,$66,$20,$20,$0
+L131:.dc.b $25,$73,$0
+L132:.dc.b $53,$74,$61,$72,$74,$0
+L133:.dc.b $53,$74,$6F,$70,$20,$0
+L135:.dc.b $24,$25,$30,$34,$2E,$34,$58,$0
+L138:.dc.b $25,$73,$20,$25,$73,$20,$25,$63,$25,$63,$20,$25,$73,$0
+L140:.dc.b $25,$73,$20,$25,$64,$20,$25,$73,$20,$25,$63,$25,$63,$20,$25,$73,$0
+L142:.dc.b $25,$73,$20,$25,$73,$20,$20,$20,$20,$25,$73,$0
+L149:.dc.b $4B,$20,$25,$30,$33,$75,$20,$25,$75,$20,$25,$30,$32,$75,$20,$20,$20,$20,$25,$73,$0
+L151:.dc.b $54,$72,$69,$67,$67,$65,$72,$20,$25,$30,$32,$75,$20,$20,$20,$20,$25,$73,$0
+L153:.dc.b $50,$75,$6C,$73,$65,$20,$25,$75,$20,$20,$20,$20,$20,$20,$20,$25,$73,$0
+L156:.dc.b $4C,$45,$44,$20,$25,$63,$20,$20,$20,$20,$20,$20,$20,$20,$20,$25,$63,$25,$63,$25,$63,$25,$63,$0
+L158:.dc.b $4C,$45,$44,$20,$25,$63,$20,$20,$20,$20,$20,$20,$20,$20,$20,$25,$63,$25,$63,$25,$63,$0
+L160:.dc.b $53,$65,$71,$20,$25,$30,$32,$75,$20,$4C,$69,$6E,$20,$20,$20,$20,$25,$30,$33,$75,$0
+L162:.dc.b $53,$65,$71,$20,$25,$30,$32,$75,$20,$43,$74,$6C,$20,$20,$20,$20,$25,$73,$0
+L164:.dc.b $54,$75,$6E,$65,$20,$54,$61,$62,$6C,$65,$20,$20,$20,$20,$25,$75,$0
+L166:.dc.b $53,$65,$74,$0
+L169:.dc.b $41,$64,$64,$0
+L171:.dc.b $52,$65,$67,$20,$25,$30,$32,$75,$20,$25,$73,$20,$20,$20,$20,$52,$25,$30,$32,$75,$0
+L175:.dc.b $52,$65,$67,$20,$25,$30,$32,$75,$20,$25,$73,$20,$20,$20,$20,$25,$63,$25,$30,$32,$75,$0
+L177:.dc.b $49,$6E,$73,$74,$72,$75,$6D,$65,$6E,$74,$20,$25,$63,$25,$63,$20,$25,$30,$32,$75,$0
+L184:.dc.b $4F,$73,$63,$20,$25,$75,$20,$49,$6E,$74,$20,$20,$25,$63,$25,$63,$20,$25,$63,$25,$30,$34,$75,$0
+L186:.dc.b $4F,$73,$63,$20,$25,$75,$20,$52,$61,$74,$20,$20,$25,$63,$25,$63,$20,$25,$73,$0
+L188:.dc.b $4F,$73,$63,$20,$25,$75,$20,$46,$72,$71,$20,$20,$25,$63,$25,$63,$20,$25,$30,$32,$75,$2E,$25,$75,$0
+L190:.dc.b $4F,$73,$63,$20,$25,$75,$20,$50,$63,$68,$20,$20,$25,$63,$25,$63,$20,$25,$73,$0
+L195:.dc.b $57,$61,$76,$65,$73,$68,$61,$70,$65,$25,$63,$20,$25,$63,$25,$63,$20,$25,$30,$32,$75,$0
+L197:.dc.b $43,$6F,$6E,$66,$69,$67,$75,$72,$65,$20,$20,$25,$63,$25,$63,$20,$25,$30,$32,$75,$0
+L199:.dc.b $4C,$65,$76,$65,$6C,$0
+L201:.dc.b $49,$6E,$64,$0
+L203:.dc.b $46,$72,$71,$0
+L205:.dc.b $46,$69,$6C,$74,$72,$0
+L207:.dc.b $46,$69,$6C,$20,$51,$0
+L209:.dc.b $4C,$6F,$63,$74,$6E,$0
+L211:.dc.b $44,$79,$6E,$6D,$63,$0
+L213:.dc.b $41,$75,$78,$20,$20,$0
+L215:.dc.b $52,$61,$74,$65,$20,$0
+L217:.dc.b $49,$6E,$74,$65,$6E,$0
+L219:.dc.b $44,$65,$70,$74,$68,$0
+L221:.dc.b $56,$6C,$74,$20,$25,$75,$0
Index: alcyon/ptread.s
===================================================================
--- alcyon/ptread.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/ptread.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1036 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl _stmptr
+.globl _defptr
+.globl _patches
+.globl _defents
+.globl _seqtab
+.globl _seqflag
+.globl _seqline
+.globl _seqstim
+.globl _seqtime
+.globl _sregval
+.globl _trstate
+.globl _filecat
+.globl _dpecpos
+.globl _dpepred
+.globl _dpesucc
+.globl _errno
+.globl _ptecpos
+.globl _ptepred
+.globl _ptesucc
+.globl _ptebuf
+.globl _stashp
+.text
+_stashp:
+~~stashp:
+link R14,#0
+movem.l R4-R7,-(sp)
+~c=R7
+~np=R6
+~stim=R5
+*line 57
+jsr _findpte
+move R0,R7
+*line 59
+*line 59
+tst R7
+bne L2
+*line 60
+*line 61
+move #6,(sp)
+move.l #4+_ptebuf,-(sp)
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 62
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+or #-32768,8(R8)
+*line 63
+*line 70
+*line 71
+*line 72
+clr R0
+bra L1
+*line 73
+*line 74
+*line 75
+*line 76
+L2:
+*line 77
+*line 77
+jsr _pt_alc
+move R0,_ptecpos
+bne L3
+*line 78
+*line 82
+*line 83
+move #-1,R0
+bra L1
+*line 84
+*line 85
+L3:
+*line 86
+move #6,(sp)
+move.l #4+_ptebuf,-(sp)
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 87
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+or #-32768,8(R8)
+*line 88
+move 6+_ptebuf,R5
+and #8191,R5
+*line 90
+*line 90
+cmp #1,R7
+bne L4
+*line 91
+*line 92
+clr _ptepred
+*line 93
+move _ptecpos,R0
+clr R9
+move R5,R9
+add.l #_stmptr,R9
+move.b R0,(R9)
+*line 94
+*line 95
+*line 96
+*line 97
+*line 98
+L4:
+*line 99
+*line 99
+tst _ptepred
+beq L5
+*line 100
+*line 101
+move _ptepred,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+move (R8),_ptesucc
+*line 102
+*line 103
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+move _ptesucc,(R8)
+*line 104
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+move _ptepred,2(R8)
+*line 105
+*line 106
+move _ptepred,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+move _ptecpos,(R8)
+*line 107
+*line 108
+*line 109
+tst _ptesucc
+beq L6
+*line 109
+move _ptesucc,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+move _ptecpos,2(R8)
+*line 110
+L6:bra L7
+L5:
+*line 111
+*line 112
+*line 113
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+clr 2(R8)
+*line 114
+*line 115
+*line 115
+cmp #-1,R7
+bne L8
+*line 116
+*line 117
+move.l #_stmptr,R8
+move.b 0(R8,R5),R0
+ext.w R0
+move R0,_ptesucc
+*line 118
+*line 119
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+move _ptesucc,(R8)
+*line 120
+*line 121
+move _ptesucc,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+move _ptecpos,2(R8)
+*line 122
+*line 123
+move _ptecpos,R0
+clr R9
+move R5,R9
+add.l #_stmptr,R9
+move.b R0,(R9)
+*line 124
+bra L9
+L8:
+*line 125
+*line 126
+*line 127
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+clr (R8)
+L9:
+*line 128
+L7:
+*line 134
+*line 134
+jsr _finddpe
+move R0,R7
+tst R7
+bne L10
+*line 135
+*line 145
+*line 146
+clr R0
+bra L1
+*line 147
+*line 148
+L10:
+*line 149
+*line 149
+jsr _dt_alc
+move R0,_dpecpos
+bne L11
+*line 150
+*line 154
+*line 155
+move #-1,R0
+bra L1
+*line 156
+*line 157
+L11:
+*line 158
+move _dpecpos,R0
+muls #10,R0
+add.l #_defents,R0
+move.l R0,R8
+clr (R8)
+*line 159
+move _dpecpos,R0
+muls #10,R0
+add.l #_defents,R0
+move.l R0,R8
+move 6+_ptebuf,2(R8)
+*line 160
+move _dpecpos,R0
+muls #10,R0
+add.l #_defents,R0
+move.l R0,R8
+move 8+_ptebuf,4(R8)
+*line 161
+move _dpecpos,R0
+muls #10,R0
+add.l #_defents,R0
+move.l R0,R8
+move 10+_ptebuf,6(R8)
+*line 162
+move _dpecpos,R0
+muls #10,R0
+add.l #_defents,R0
+move.l R0,R8
+move 12+_ptebuf,8(R8)
+*line 164
+move 4+_ptebuf,R6
+and #8191,R6
+*line 166
+*line 166
+cmp #1,R7
+bne L12
+*line 167
+*line 168
+clr _dpepred
+*line 169
+move _dpecpos,R0
+clr R9
+move R6,R9
+add.l #_defptr,R9
+move.b R0,(R9)
+*line 170
+*line 171
+*line 172
+L12:
+*line 173
+*line 173
+tst _dpepred
+beq L13
+*line 174
+*line 175
+move _dpepred,R0
+muls #10,R0
+add.l #_defents,R0
+move.l R0,R8
+move (R8),_dpesucc
+*line 176
+move _dpecpos,R0
+muls #10,R0
+add.l #_defents,R0
+move.l R0,R8
+move _dpesucc,(R8)
+*line 177
+move _dpepred,R0
+muls #10,R0
+add.l #_defents,R0
+move.l R0,R8
+move _dpecpos,(R8)
+*line 178
+bra L14
+L13:
+*line 179
+*line 180
+*line 181
+*line 181
+cmp #-1,R7
+bne L15
+*line 182
+*line 183
+move.l #_defptr,R8
+move.b 0(R8,R6),R0
+ext.w R0
+move R0,_dpesucc
+*line 184
+move _dpecpos,R0
+muls #10,R0
+add.l #_defents,R0
+move.l R0,R8
+move _dpesucc,(R8)
+*line 185
+move _dpecpos,R0
+clr R9
+move R6,R9
+add.l #_defptr,R9
+move.b R0,(R9)
+*line 186
+bra L16
+L15:
+*line 187
+*line 188
+*line 189
+move _dpecpos,R0
+muls #10,R0
+add.l #_defents,R0
+move.l R0,R8
+clr (R8)
+L16:
+*line 190
+L14:
+*line 203
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _ptioerr
+.text
+_ptioerr:
+~~ptioerr:
+link R14,#-44
+~erms=-40
+*line 219
+jsr _clrlsel
+*line 221
+move _errno,(sp)
+move.l #L18,-(sp)
+move.l R14,-(sp)
+add.l #-40,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 223
+*line 224
+move #9,(sp)
+move #14,-(sp)
+move.l R14,-(sp)
+add.l #-40,(sp)
+move.l #L20,-(sp)
+move.l #L19,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+L17:unlk R14
+rts
+.globl _nopatch
+.text
+_nopatch:
+~~nopatch:
+link R14,#-4
+*line 235
+jsr _clrlsel
+*line 237
+*line 238
+move #9,(sp)
+move #14,-(sp)
+move.l #L24,-(sp)
+move.l #L23,-(sp)
+move.l #L22,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+L21:unlk R14
+rts
+.globl _ptread
+.text
+_ptread:
+~~ptread:
+~fp=R13
+link R14,#-2
+movem.l R6-R7/R13-R13,-(sp)
+~go=R7
+~cb=-2
+*line 257
+move.l 8(R14),R13
+*line 257
+move #1,R7
+*line 259
+*line 260
+move #9,(sp)
+move #12,-(sp)
+move.l #L27,-(sp)
+clr.l -(sp)
+move.l #L26,-(sp)
+jsr _ldwmsg
+adda.l #14,sp
+L30:
+*line 262
+*line 263
+*line 264
+jsr _voidpb
+*line 265
+*line 266
+clr R0
+move R0,_ptesucc
+move R0,_ptepred
+move R0,_ptecpos
+*line 267
+*line 271
+*line 272
+*line 272
+move.l #$1,(sp)
+move.l R14,-(sp)
+sub.l #2,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L31
+*line 273
+*line 274
+jsr _ptioerr
+*line 275
+move #-1,R0
+bra L25
+*line 276
+*line 277
+L31:
+*line 278
+*line 279
+tst.b -2(R14)
+beq L28
+*line 280
+*line 281
+move.b -2(R14),R0
+ext.w R0
+and #255,R0
+or #-32768,R0
+move R0,8+_ptebuf
+*line 282
+*line 283
+*line 284
+move.l #$4,(sp)
+move.l #4+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L32
+*line 284
+move #-1,R0
+bra L25
+*line 285
+*line 286
+L32:
+*line 287
+move.b -2(R14),R0
+ext.w R0
+bra L34
+*line 288
+L35:
+*line 289
+L36:
+*line 290
+*line 291
+*line 292
+*line 293
+move.l #$2,(sp)
+move.l #10+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L37
+*line 293
+move #-1,R0
+bra L25
+*line 294
+L37:
+*line 295
+*line 296
+move.l #$1,(sp)
+move.l #15+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L38
+*line 296
+move #-1,R0
+bra L25
+*line 297
+L38:bra L33
+*line 298
+*line 299
+L39:
+*line 300
+L40:
+*line 301
+*line 302
+*line 303
+*line 304
+move.l #$1,(sp)
+move.l #11+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L41
+*line 304
+move #-1,R0
+bra L25
+*line 305
+L41:
+*line 306
+*line 307
+move.l #$1,(sp)
+move.l #15+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L42
+*line 307
+move #-1,R0
+bra L25
+*line 308
+L42:bra L33
+*line 309
+*line 310
+*line 311
+*line 312
+L43:
+*line 313
+*line 314
+*line 315
+*line 316
+move.l #$1,(sp)
+move.l #11+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L44
+*line 316
+move #-1,R0
+bra L25
+*line 317
+L44:
+*line 318
+*line 319
+move.l #$1,(sp)
+move.l #12+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L45
+*line 319
+move #-1,R0
+bra L25
+*line 320
+L45:bra L33
+*line 321
+*line 322
+L46:
+*line 323
+*line 324
+*line 325
+*line 326
+move.l #$1,(sp)
+move.l #11+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L47
+*line 326
+move #-1,R0
+bra L25
+*line 327
+L47:
+*line 328
+*line 329
+move.l #$2,(sp)
+move.l #12+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L48
+*line 329
+move #-1,R0
+bra L25
+*line 330
+L48:bra L33
+*line 331
+*line 332
+L49:
+*line 333
+*line 334
+*line 335
+*line 336
+move.l #$1,(sp)
+move.l #13+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L50
+*line 336
+move #-1,R0
+bra L25
+*line 337
+L50:bra L33
+*line 338
+*line 339
+*line 340
+L51:
+*line 341
+L52:
+*line 342
+*line 343
+*line 344
+*line 345
+move.l #$1,(sp)
+move.l #11+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L53
+*line 345
+move #-1,R0
+bra L25
+*line 346
+L53:
+*line 347
+*line 348
+move.l #$1,(sp)
+move.l #13+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L54
+*line 348
+move #-1,R0
+bra L25
+*line 349
+L54:
+*line 350
+*line 351
+move.l #$1,(sp)
+move.l #15+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L55
+*line 351
+move #-1,R0
+bra L25
+*line 352
+L55:bra L33
+*line 353
+*line 354
+L56:
+*line 355
+L57:
+*line 356
+L58:
+*line 357
+L59:
+*line 358
+*line 359
+*line 360
+*line 361
+move.l #$1,(sp)
+move.l #10+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L60
+*line 361
+move #-1,R0
+bra L25
+*line 362
+L60:
+*line 363
+*line 364
+move.l #$1,(sp)
+move.l #13+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L61
+*line 364
+move #-1,R0
+bra L25
+*line 365
+L61:bra L33
+*line 366
+*line 367
+L62:
+*line 368
+L63:
+*line 369
+L64:
+*line 370
+*line 371
+*line 372
+*line 373
+move.l #$2,(sp)
+move.l #10+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L65
+*line 373
+move #-1,R0
+bra L25
+*line 374
+L65:
+*line 375
+*line 376
+move.l #$1,(sp)
+move.l #13+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L66
+*line 376
+move #-1,R0
+bra L25
+*line 377
+L66:
+*line 378
+*line 379
+move.l #$2,(sp)
+move.l #14+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L67
+*line 379
+move #-1,R0
+bra L25
+*line 380
+L67:bra L33
+*line 381
+*line 382
+*line 383
+L68:
+*line 384
+L69:
+*line 385
+L70:
+*line 386
+L71:
+*line 387
+L72:
+*line 388
+*line 389
+*line 390
+*line 391
+move.l #$1,(sp)
+move.l #10+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L73
+*line 391
+move #-1,R0
+bra L25
+*line 392
+L73:
+*line 393
+*line 394
+move.l #$1,(sp)
+move.l #13+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L74
+*line 394
+move #-1,R0
+bra L25
+*line 395
+L74:
+*line 396
+*line 397
+move.l #$2,(sp)
+move.l #14+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L75
+*line 397
+move #-1,R0
+bra L25
+*line 398
+L75:bra L33
+*line 399
+*line 400
+L76:
+*line 401
+L77:
+*line 402
+L78:
+*line 403
+L79:
+*line 404
+*line 405
+*line 406
+*line 407
+move.l #$1,(sp)
+move.l #13+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L80
+*line 407
+move #-1,R0
+bra L25
+*line 408
+L80:
+*line 409
+*line 410
+move.l #$2,(sp)
+move.l #14+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L81
+*line 410
+move #-1,R0
+bra L25
+*line 411
+L81:bra L33
+*line 412
+*line 413
+L82:
+*line 414
+*line 415
+*line 416
+*line 417
+move.l #$1,(sp)
+move.l #11+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L83
+*line 417
+move #-1,R0
+bra L25
+*line 418
+L83:
+*line 419
+*line 420
+move.l #$1,(sp)
+move.l #13+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L84
+*line 420
+move #-1,R0
+bra L25
+*line 421
+L84:
+*line 422
+*line 423
+move.l #$2,(sp)
+move.l #14+_ptebuf,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L85
+*line 423
+move #-1,R0
+bra L25
+*line 424
+L85:bra L33
+*line 425
+*line 426
+*line 427
+L86:
+*line 428
+*line 429
+*line 430
+move #-1,R0
+bra L25
+bra L33
+L34:sub #1,R0
+cmp #25,R0
+bhi L86
+asl #2,R0
+move R0,R8
+add.l #L87,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L87:.dc.l L35
+.dc.l L36
+.dc.l L39
+.dc.l L43
+.dc.l L46
+.dc.l L40
+.dc.l L49
+.dc.l L51
+.dc.l L52
+.dc.l L56
+.dc.l L62
+.dc.l L57
+.dc.l L58
+.dc.l L59
+.dc.l L68
+.dc.l L63
+.dc.l L64
+.dc.l L69
+.dc.l L70
+.dc.l L71
+.dc.l L72
+.dc.l L76
+.dc.l L77
+.dc.l L78
+.dc.l L79
+.dc.l L82
+.text
+L33:
+*line 431
+*line 432
+*line 436
+*line 437
+*line 438
+*line 438
+jsr _stashp
+tst R0
+beq L88
+*line 439
+*line 440
+move.l R13,(sp)
+jsr _nopatch
+*line 441
+clr _ptecpos
+*line 442
+jsr _voidpb
+*line 443
+move #-1,R0
+bra L25
+*line 444
+L88:L29:bra L30
+L28:
+*line 452
+clr _ptecpos
+*line 453
+jsr _voidpb
+*line 454
+clr R0
+bra L25
+L25:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.data
+L18:.dc.b $20,$20,$65,$72,$72,$6E,$6F,$20,$3D,$20,$25,$64,$0
+L19:.dc.b $43,$6F,$75,$6C,$64,$6E,$27,$74,$20,$72,$65,$61,$64,$0
+L20:.dc.b $20,$74,$68,$65,$20,$70,$61,$74,$63,$68,$20,$74,$61,$62,$6C,$65,$0
+L22:.dc.b $43,$6F,$75,$6C,$64,$6E,$27,$74,$20,$72,$65,$61,$64,$0
+L23:.dc.b $20,$20,$74,$68,$65,$20,$70,$61,$74,$63,$68,$20,$74,$61,$62,$6C,$65,$2E,$0
+L24:.dc.b $20,$20,$52,$61,$6E,$20,$6F,$75,$74,$20,$6F,$66,$20,$73,$70,$61,$63,$65,$0
+L26:.dc.b $20,$42,$75,$73,$79,$20,$2D,$2D,$20,$70,$6C,$65,$61,$73,$65,$20,$73,$74,$61,$6E,$64,$20,$62,$79,$0
+L27:.dc.b $20,$20,$52,$65,$61,$64,$69,$6E,$67,$20,$70,$61,$74,$63,$68,$65,$73,$0
Index: alcyon/ptselbx.s
===================================================================
--- alcyon/ptselbx.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/ptselbx.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,3849 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _stmptr
+.globl _defptr
+.globl _patches
+.globl _defents
+.globl _seqtab
+.globl _seqflag
+.globl _seqline
+.globl _seqstim
+.globl _seqtime
+.globl _sregval
+.globl _trstate
+.globl _CurLine
+.globl _cents
+.globl _cmtype
+.globl _cxval
+.globl _cyval
+.globl _hitcx
+.globl _hitcy
+.globl _stccol
+.globl _stcrow
+.globl _submenu
+.globl _vtccol
+.globl _vtcrow
+.globl _ndvals
+.globl _obj11
+.globl _csbp
+.globl _curboxp
+.globl _smdata
+.globl _ssdata
+.globl _stdata
+.globl _trdata
+.globl _ptegood
+.comm _ptegood,2
+.globl _ptedfok
+.comm _ptedfok,2
+.globl _ptestok
+.comm _ptestok,2
+.globl _ptedsok
+.comm _ptedsok,2
+.globl _ptedtok
+.comm _ptedtok,2
+.globl _ptedef
+.comm _ptedef,2
+.globl _ptestm
+.comm _ptestm,2
+.globl _ptespec
+.comm _ptespec,2
+.globl _ptesuba
+.comm _ptesuba,2
+.globl _ptedat1
+.comm _ptedat1,2
+.globl _ptedat2
+.comm _ptedat2,2
+.globl _ptedftp
+.comm _ptedftp,2
+.globl _ptedfst
+.comm _ptedfst,2
+.globl _ptedest
+.comm _ptedest,2
+.globl _ptedata
+.comm _ptedata,2
+.globl _ptemenu
+.comm _ptemenu,2
+.globl _pteset
+.comm _pteset,2
+.globl _ptbflag
+.comm _ptbflag,2
+.globl _ptecpos
+.comm _ptecpos,2
+.globl _ptepred
+.comm _ptepred,2
+.globl _ptesucc
+.comm _ptesucc,2
+.globl _ptebuf
+.comm _ptebuf,16
+.globl _ptdebuf
+.comm _ptdebuf,50
+.globl _rawdfst
+.data
+_rawdfst:
+*line 117
+.dc.l L1
+*line 118
+.dc.l L2
+*line 119
+.dc.l L3
+*line 121
+.dc.l L4
+.globl _rawdest
+.data
+_rawdest:
+*line 125
+.dc.l L5
+*line 126
+.dc.l L6
+*line 127
+.dc.l L7
+*line 128
+.dc.l L8
+*line 129
+.dc.l L9
+*line 130
+.dc.l L10
+*line 131
+.dc.l L11
+*line 132
+.dc.l L12
+*line 133
+.dc.l L13
+*line 134
+.dc.l L14
+*line 135
+.dc.l L15
+*line 136
+.dc.l L16
+*line 137
+.dc.l L17
+*line 138
+.dc.l L18
+*line 139
+.dc.l L19
+*line 140
+.dc.l L20
+*line 141
+.dc.l L21
+*line 142
+.dc.l L22
+*line 143
+.dc.l L23
+*line 144
+.dc.l L24
+*line 145
+.dc.l L25
+*line 146
+.dc.l L26
+*line 147
+.dc.l L27
+*line 148
+.dc.l L28
+*line 149
+.dc.l L29
+*line 150
+.dc.l L30
+*line 152
+.dc.l L31
+.globl _rawmode
+.data
+_rawmode:
+*line 157
+.dc.l L32
+*line 157
+.dc.l L33
+*line 157
+.dc.l L34
+*line 157
+.dc.l L35
+.globl _rawmdat
+.data
+_rawmdat:
+*line 158
+.dc.l L36
+*line 158
+.dc.l L37
+*line 158
+.dc.l L38
+*line 158
+.dc.l L39
+.globl _omtabl
+.data
+_omtabl:
+.dc.w $2
+.dc.w $3
+.dc.w $0
+.dc.w $1
+.globl _omdtab
+.data
+_omdtab:
+.dc.w $2
+.dc.w $140
+.dc.w $0
+.dc.w $0
+.globl _omftab
+.data
+_omftab:
+.dc.w $6
+.dc.w $7
+.dc.w $4
+.dc.w $5
+.globl _rawfpud
+.data
+_rawfpud:
+*line 164
+.dc.l L40
+*line 164
+.dc.l L41
+*line 164
+.dc.l L42
+*line 164
+.dc.l L43
+*line 164
+.dc.l L44
+.globl _fpudtab
+.data
+_fpudtab:
+.dc.w $B
+.dc.w $0
+.dc.w $1
+.dc.w $0
+.dc.w $1
+.globl _fpuetab
+.data
+_fpuetab:
+.dc.w $B
+.dc.w $1
+.dc.w $2
+.dc.w $3
+.dc.w $9
+.globl _dfsttab
+.data
+_dfsttab:
+.dc.w $0
+.dc.w $8000
+.dc.w $1100
+.dc.w $1180
+.globl _defcols
+.data
+_defcols:
+.dc.w $2
+.dc.w $6
+.dc.w $7
+.dc.w $8
+.globl _stmcols
+.data
+_stmcols:
+.dc.w $F
+.dc.w $13
+.dc.w $14
+.dc.w $15
+.globl _dstcols
+.data
+_dstcols:
+.dc.w $1C
+.dc.w $1E
+.dc.w $24
+.dc.w $22
+.dc.w $20
+.dc.w $20
+.dc.w $2A
+.dc.w $27
+.dc.w $22
+.dc.w $20
+.dc.w $20
+.dc.w $22
+.globl _dfsttp
+.data
+_dfsttp:
+.dc.w $1
+.dc.w $1
+.dc.w $2
+.dc.w $3
+.globl _datasrc
+.data
+_datasrc:
+.dc.w $B
+.dc.w $C
+.dc.w $D
+.dc.w $8
+.dc.w $2
+.dc.w $5
+.dc.w $A
+.dc.w $7
+.dc.w $6
+.dc.w $1
+.globl _destype
+.data
+_destype:
+.dc.w $1
+.dc.w $FFFF
+.dc.w $2
+.dc.w $3
+.dc.w $4
+.dc.w $5
+.dc.w $6
+.dc.w $7
+.dc.w $8
+.dc.w $9
+.dc.w $A
+.dc.w $B
+.dc.w $C
+.dc.w $D
+.dc.w $E
+.dc.w $10
+.dc.w $11
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $F
+.dc.w $14
+.dc.w $12
+.dc.w $13
+.dc.w $15
+.dc.w $1A
+.dc.w $19
+.dc.w $17
+.dc.w $18
+.dc.w $16
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.globl _destfmt
+.data
+_destfmt:
+.dc.b $0
+.dc.b $FF
+.dc.b $1
+.dc.b $2
+.dc.b $3
+.dc.b $4
+.dc.b $4
+.dc.b $5
+.dc.b $4
+.dc.b $4
+.dc.b $6
+.dc.b $9
+.dc.b $6
+.dc.b $6
+.dc.b $6
+.dc.b $9
+.dc.b $9
+.dc.b $FF
+.dc.b $FF
+.dc.b $FF
+.dc.b $A
+.dc.b $A
+.dc.b $A
+.dc.b $A
+.dc.b $A
+.dc.b $8
+.dc.b $7
+.dc.b $7
+.dc.b $7
+.dc.b $7
+.globl _datafmt
+.data
+_datafmt:
+.dc.b $8
+.dc.b $FF
+.dc.b $9
+.dc.b $8
+.dc.b $E
+.dc.b $D
+.dc.b $9
+.dc.b $12
+.dc.b $C
+.dc.b $C
+.dc.b $F
+.dc.b $4
+.dc.b $10
+.dc.b $10
+.dc.b $11
+.dc.b $B
+.dc.b $B
+.dc.b $FF
+.dc.b $FF
+.dc.b $FF
+.dc.b $B
+.dc.b $B
+.dc.b $B
+.dc.b $B
+.dc.b $B
+.dc.b $B
+.dc.b $B
+.dc.b $B
+.dc.b $B
+.dc.b $B
+.globl _desdatf
+.data
+_desdatf:
+.dc.b $2
+.dc.b $0
+.dc.b $2
+.dc.b $2
+.dc.b $1
+.dc.b $1
+.dc.b $2
+.dc.b $1
+.dc.b $3
+.dc.b $3
+.dc.b $1
+.dc.b $0
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $2
+.dc.b $2
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.globl _desdat1
+.data
+_desdat1:
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.globl _desdat2
+.data
+_desdat2:
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $B
+.dc.w $B
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $B
+.dc.w $B
+.dc.w $B
+.dc.w $B
+.dc.w $B
+.dc.w $B
+.dc.w $B
+.dc.w $B
+.dc.w $B
+.dc.w $B
+.globl _rawdata
+.data
+_rawdata:
+*line 262
+.dc.l L45
+*line 262
+.dc.l L46
+*line 262
+.dc.l L47
+*line 262
+.dc.l L48
+*line 262
+.dc.l L49
+*line 263
+.dc.l L50
+*line 263
+.dc.l L51
+*line 263
+.dc.l L52
+*line 263
+.dc.l L53
+*line 263
+.dc.l L54
+*line 264
+.dc.l L55
+*line 264
+.dc.l L56
+*line 264
+.dc.l L57
+*line 264
+.dc.l L58
+*line 264
+.dc.l L59
+*line 265
+.dc.l L60
+*line 265
+.dc.l L61
+*line 265
+.dc.l L62
+*line 265
+.dc.l L63
+*line 265
+.dc.l L64
+*line 266
+.dc.l L65
+*line 266
+.dc.l L66
+*line 266
+.dc.l L67
+*line 266
+.dc.l L68
+*line 266
+.dc.l L69
+*line 267
+.dc.l L70
+*line 267
+.dc.l L71
+*line 267
+.dc.l L72
+*line 267
+.dc.l L73
+*line 268
+.dc.l L74
+.globl _hilitab
+.data
+_hilitab:
+.dc.b $2
+.dc.b $3
+.dc.b $5
+.dc.b $1
+.dc.b $5
+.dc.b $5
+.dc.b $4
+.dc.b $0
+.dc.b $7
+.dc.b $6
+.dc.b $4
+.dc.b $4
+.dc.b $4
+.dc.b $4
+.dc.b $4
+.dc.b $0
+.dc.b $F
+.dc.b $5
+.dc.b $4
+.dc.b $4
+.dc.b $4
+.dc.b $4
+.dc.b $4
+.dc.b $0
+.dc.b $16
+.dc.b $5
+.dc.b $4
+.dc.b $C
+.dc.b $8
+.dc.b $8
+.dc.b $8
+.dc.b $0
+.dc.b $1D
+.dc.b $5
+.dc.b $4
+.dc.b $4
+.dc.b $4
+.dc.b $4
+.dc.b $4
+.dc.b $0
+.dc.b $24
+.dc.b $5
+.dc.b $4
+.dc.b $4
+.dc.b $4
+.dc.b $4
+.dc.b $4
+.dc.b $0
+.dc.b $2B
+.dc.b $4
+.dc.b $30
+.dc.b $30
+.dc.b $30
+.dc.b $30
+.dc.b $0
+.dc.b $0
+.dc.b $31
+.dc.b $5
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $0
+.dc.b $38
+.dc.b $5
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $0
+.globl _ptboxes
+.data
+_ptboxes:
+.dc.w $8
+.dc.w $7E
+.dc.w $17F
+.dc.w $8B
+.dc.w $0
+*line 287
+.dc.l _ptfnbox
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.l $0
+.globl _hilitpm
+.text
+_hilitpm:
+~~hilitpm:
+~n=R7
+link R14,#0
+movem.l R2-R7,-(sp)
+~chr=R6
+~h=R5
+~v=R4
+~w=R3
+*line 306
+move.b 9(R14),R7
+*line 306
+move.b R7,R0
+ext.w R0
+move R0,_ptemenu
+*line 308
+clr R5
+bra L78
+L79:
+*line 309
+*line 310
+clr R4
+bra L82
+L83:
+*line 311
+*line 312
+move R5,R0
+asl #3,R0
+ext.l R0
+move.l R0,R8
+move.l #_hilitab,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,R6
+*line 313
+*line 314
+move R5,R0
+asl #3,R0
+ext.l R0
+move.l R0,R8
+move.l #_hilitab,R9
+move.b 1(R8,R9.l),R0
+ext.w R0
+move R0,R3
+bra L86
+L87:
+*line 315
+*line 316
+*line 317
+move #64,(sp)
+move.b R7,R0
+ext.w R0
+move R4,R9
+move R5,R2
+asl #3,R2
+ext.l R2
+add.l R2,R9
+add.l #_hilitab,R9
+move.b 2(R9),R1
+ext.w R1
+and R1,R0
+beq L10000
+move #18,-(sp)
+bra L10002
+L10000:move #146,-(sp)
+L10002:move R6,-(sp)
+move R4,-(sp)
+add #1,(sp)
+move.l _obj11,-(sp)
+jsr _vsetcv
+adda.l #10,sp
+add #1,R6
+L85:L86:
+*line 314
+move R3,R0
+sub #1,R3
+tst R0
+bgt L87
+L84:
+*line 317
+L81:
+*line 310
+add #1,R4
+L82:
+*line 310
+cmp #5,R4
+blt L83
+L80:
+*line 318
+L77:
+*line 308
+add #1,R5
+L78:
+*line 308
+cmp #9,R5
+blt L79
+L76:L75:tst.l (sp)+
+movem.l (sp)+,R3-R7
+unlk R14
+rts
+.globl _aftercm
+.text
+_aftercm:
+~~aftercm:
+link R14,#-4
+*line 333
+move _stccol,R0
+bra L90
+*line 334
+L91:
+*line 335
+L92:
+*line 336
+L93:
+*line 337
+*line 338
+move #1,(sp)
+jsr _hilitpm
+bra L89
+*line 339
+*line 340
+L94:
+*line 341
+L95:
+*line 342
+L96:
+*line 343
+*line 344
+*line 345
+move #1,(sp)
+jsr _hilitpm
+bra L89
+*line 346
+*line 347
+L97:
+*line 348
+*line 349
+*line 350
+move #4,(sp)
+jsr _hilitpm
+bra L89
+*line 351
+*line 352
+*line 353
+*line 354
+L98:
+*line 355
+L99:
+*line 356
+L100:
+*line 357
+L101:
+*line 358
+*line 359
+*line 360
+*line 360
+tst _ptedsok
+beq L102
+*line 361
+*line 362
+move _ptespec,R0
+and #255,R0
+bra L104
+*line 363
+L105:
+*line 364
+*line 365
+*line 366
+move #8,(sp)
+jsr _hilitpm
+bra L103
+*line 367
+*line 368
+L106:
+*line 369
+L107:
+*line 370
+L108:
+*line 371
+L109:
+*line 372
+L110:
+*line 373
+*line 374
+*line 375
+move #16,(sp)
+jsr _hilitpm
+bra L103
+*line 376
+*line 377
+L111:
+*line 378
+L112:
+*line 379
+L113:
+*line 380
+L114:
+*line 381
+L115:
+*line 382
+L116:
+*line 383
+L117:
+*line 384
+*line 385
+*line 386
+move #32,(sp)
+jsr _hilitpm
+bra L103
+*line 387
+*line 388
+L118:
+*line 389
+*line 390
+*line 391
+clr (sp)
+jsr _hilitpm
+bra L103
+*line 392
+bra L103
+L104:sub #11,R0
+cmp #15,R0
+bhi L118
+asl #2,R0
+move R0,R8
+add.l #L119,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L119:.dc.l L105
+.dc.l L118
+.dc.l L118
+.dc.l L118
+.dc.l L106
+.dc.l L107
+.dc.l L108
+.dc.l L110
+.dc.l L111
+.dc.l L109
+.dc.l L112
+.dc.l L117
+.dc.l L115
+.dc.l L116
+.dc.l L114
+.dc.l L113
+.text
+L103:
+*line 393
+*line 394
+bra L120
+L102:
+*line 395
+*line 396
+*line 397
+clr (sp)
+jsr _hilitpm
+L120:
+*line 398
+*line 399
+bra L89
+*line 400
+*line 401
+*line 402
+L121:
+*line 403
+*line 404
+*line 405
+*line 405
+tst _ptedtok
+beq L122
+*line 406
+*line 407
+move _ptespec,R0
+and #255,R0
+bra L124
+*line 408
+L125:
+*line 409
+L126:
+*line 410
+L127:
+*line 411
+L128:
+*line 412
+L129:
+*line 413
+L130:
+*line 414
+L131:
+*line 415
+L132:
+*line 416
+L133:
+*line 417
+L134:
+*line 418
+L135:
+*line 419
+L136:
+*line 420
+*line 421
+*line 422
+*line 423
+tst _ptedat1
+bne L137
+*line 423
+move #2,(sp)
+jsr _hilitpm
+*line 424
+bra L138
+L137:
+*line 425
+clr (sp)
+jsr _hilitpm
+L138:
+*line 426
+bra L123
+*line 427
+*line 428
+L139:
+*line 429
+*line 430
+*line 431
+clr (sp)
+jsr _hilitpm
+bra L123
+*line 432
+bra L123
+L124:sub #15,R0
+cmp #11,R0
+bhi L139
+asl #2,R0
+move R0,R8
+add.l #L140,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L140:.dc.l L125
+.dc.l L126
+.dc.l L127
+.dc.l L129
+.dc.l L130
+.dc.l L128
+.dc.l L131
+.dc.l L136
+.dc.l L134
+.dc.l L135
+.dc.l L133
+.dc.l L132
+.text
+L123:
+*line 433
+*line 434
+bra L141
+L122:
+*line 435
+*line 436
+*line 437
+clr (sp)
+jsr _hilitpm
+L141:
+*line 438
+*line 439
+bra L89
+*line 440
+*line 441
+L142:
+*line 442
+*line 443
+*line 444
+clr (sp)
+jsr _hilitpm
+bra L89
+*line 445
+bra L89
+L90:ext.l R0
+move.l #L143,R8
+move #12,R1
+L144:cmp.l (R8)+,R0
+dbeq R1,L144
+move.l 48(R8),R8
+jmp (R8)
+.data
+L143:.dc.l 2
+.dc.l 3
+.dc.l 4
+.dc.l 15
+.dc.l 16
+.dc.l 17
+.dc.l 28
+.dc.l 34
+.dc.l 35
+.dc.l 36
+.dc.l 37
+.dc.l 42
+.dc.l 0
+.dc.l L91
+.dc.l L92
+.dc.l L93
+.dc.l L94
+.dc.l L95
+.dc.l L96
+.dc.l L97
+.dc.l L98
+.dc.l L99
+.dc.l L100
+.dc.l L101
+.dc.l L121
+.dc.l L142
+.text
+L89:L88:unlk R14
+rts
+.globl _movectc
+.text
+_movectc:
+~~movectc:
+~r=8
+~c=10
+link R14,#-4
+*line 461
+move 10(R14),(sp)
+move 8(R14),-(sp)
+jsr _ctcpos
+addq.l #2,sp
+*line 462
+jsr _aftercm
+L145:unlk R14
+rts
+.globl _endpsm
+.text
+_endpsm:
+~~endpsm:
+~row=8
+~col=10
+link R14,#-4
+*line 474
+clr _submenu
+*line 475
+move #4,_cmtype
+*line 477
+tst _ptedfok
+beq L10004
+tst _ptestok
+beq L10004
+tst _ptedsok
+beq L10004
+tst _ptedtok
+bne L10003
+L10004:clr R0
+bra L10005
+L10003:move #1,R0
+L10005:move R0,_ptegood
+*line 479
+jsr _mtcoff
+*line 480
+move 10(R14),(sp)
+move 8(R14),-(sp)
+jsr _movectc
+addq.l #2,sp
+*line 482
+jsr _srdspte
+L146:unlk R14
+rts
+.globl _edefstm
+.text
+_edefstm:
+~~edefstm:
+~du=8
+~n=10
+link R14,#-6
+movem.l R3-R7,-(sp)
+~chan=-2
+~port=-4
+~stim=-6
+~i=R7
+~left=R6
+~right=R5
+~ltemp=R4
+*line 507
+*line 507
+tst 10(R14)
+beq L148
+*line 508
+*line 509
+*line 509
+tst _ptestok
+bne L149
+*line 510
+*line 511
+move #15,(sp)
+move #9,-(sp)
+jsr _movectc
+addq.l #2,sp
+bra L147
+*line 512
+*line 513
+*line 514
+L149:bra L150
+L148:
+*line 515
+*line 516
+*line 517
+*line 517
+tst _ptedfok
+bne L151
+*line 518
+*line 519
+move #2,(sp)
+move #9,-(sp)
+jsr _movectc
+addq.l #2,sp
+bra L147
+*line 520
+*line 521
+L151:L150:
+*line 524
+tst 10(R14)
+beq L10006
+move _ptestm,R0
+bra L10008
+L10006:move _ptedef,R0
+L10008:move #11,R1
+asr R1,R0
+and #3,R0
+move R0,-4(R14)
+*line 525
+tst 10(R14)
+beq L10009
+move _ptestm,R0
+bra L10011
+L10009:move _ptedef,R0
+L10011:asr #7,R0
+and #15,R0
+move R0,-2(R14)
+*line 526
+tst 10(R14)
+beq L10012
+move _ptestm,R0
+bra L10014
+L10012:move _ptedef,R0
+L10014:and #127,R0
+move R0,-6(R14)
+*line 531
+*line 532
+tst -4(R14)
+beq L10015
+cmp #1,-4(R14)
+beq L10015
+cmp #2,-4(R14)
+bne L152
+cmp #2,-2(R14)
+bge L152
+L10015:*line 533
+*line 534
+clr.l R4
+*line 535
+tst 10(R14)
+beq L10016
+move #19,R0
+bra L10018
+L10016:move #6,R0
+L10018:move R0,R6
+*line 536
+tst 10(R14)
+beq L10019
+move #22,R0
+bra L10021
+L10019:move #9,R0
+L10021:move R0,R5
+*line 537
+*line 538
+move R6,R7
+bra L155
+L156:
+*line 539
+move.l #$a,-(sp)
+move.l R4,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,R4
+move.l #_ptdebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+ext.l R0
+add.l R0,R4
+add.l #$ffffffd0,R4
+L154:
+*line 538
+add #1,R7
+L155:
+*line 538
+cmp R5,R7
+blt L156
+L153:
+*line 539
+*line 540
+*line 541
+*line 541
+tst.l R4
+beq L10022
+cmp.l #$80,R4
+ble L157
+L10022:*line 542
+*line 543
+move R6,(sp)
+move #9,-(sp)
+jsr _movectc
+addq.l #2,sp
+bra L147
+*line 544
+*line 545
+*line 546
+L157:
+*line 547
+move.l R4,R0
+sub.l #$1,R0
+move R0,-6(R14)
+*line 548
+*line 549
+*line 549
+cmp #2,-4(R14)
+bne L158
+*line 550
+*line 551
+clr -2(R14)
+*line 552
+bra L159
+L158:
+*line 553
+*line 554
+*line 555
+clr.l R4
+*line 556
+tst 10(R14)
+beq L10023
+move #25,R0
+bra L10025
+L10023:move #12,R0
+L10025:move R0,R6
+*line 557
+tst 10(R14)
+beq L10026
+move #27,R0
+bra L10028
+L10026:move #14,R0
+L10028:move R0,R5
+*line 558
+*line 559
+move R6,R7
+bra L162
+L163:
+*line 560
+move.l #$a,-(sp)
+move.l R4,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,R4
+move.l #_ptdebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+ext.l R0
+add.l R0,R4
+add.l #$ffffffd0,R4
+L161:
+*line 559
+add #1,R7
+L162:
+*line 559
+cmp R5,R7
+blt L163
+L160:
+*line 560
+*line 561
+*line 562
+*line 562
+tst.l R4
+beq L10029
+cmp.l #$10,R4
+ble L164
+L10029:*line 563
+*line 564
+move R6,(sp)
+move #9,-(sp)
+jsr _movectc
+addq.l #2,sp
+bra L147
+*line 565
+*line 566
+*line 567
+L164:
+*line 568
+move.l R4,R0
+sub.l #$1,R0
+move R0,-2(R14)
+L159:
+*line 569
+*line 570
+*line 571
+*line 572
+tst 10(R14)
+beq L165
+*line 572
+move _ptestm,R0
+and #-32768,R0
+move -4(R14),R1
+move #11,R2
+asl R2,R1
+or R1,R0
+move -2(R14),R1
+asl #7,R1
+or R1,R0
+or -6(R14),R0
+move R0,_ptestm
+*line 573
+bra L166
+L165:
+*line 574
+move _ptedef,R0
+and #-32768,R0
+move -4(R14),R1
+move #11,R2
+asl R2,R1
+or R1,R0
+move -2(R14),R1
+asl #7,R1
+or R1,R0
+or -6(R14),R0
+move R0,_ptedef
+L166:
+*line 575
+*line 576
+bra L167
+L152:
+*line 577
+*line 577
+cmp #2,-4(R14)
+bne L168
+cmp #2,-2(R14)
+bne L168
+*line 578
+*line 579
+clr.l R4
+*line 580
+tst 10(R14)
+beq L10030
+move #20,R0
+bra L10032
+L10030:move #7,R0
+L10032:move R0,R6
+*line 581
+tst 10(R14)
+beq L10033
+move #22,R0
+bra L10035
+L10033:move #9,R0
+L10035:move R0,R5
+*line 582
+*line 583
+move R6,R7
+bra L171
+L172:
+*line 584
+move.l #$a,-(sp)
+move.l R4,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,R4
+move.l #_ptdebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+ext.l R0
+add.l R0,R4
+add.l #$ffffffd0,R4
+L170:
+*line 583
+add #1,R7
+L171:
+*line 583
+cmp R5,R7
+blt L172
+L169:
+*line 584
+*line 585
+*line 586
+*line 586
+tst.l R4
+beq L10036
+cmp.l #$10,R4
+ble L173
+L10036:*line 587
+*line 588
+move R6,(sp)
+move #9,-(sp)
+jsr _movectc
+addq.l #2,sp
+bra L147
+*line 589
+*line 590
+*line 591
+L173:
+*line 592
+move.l R4,R0
+sub.l #$1,R0
+move R0,-6(R14)
+*line 593
+*line 594
+*line 595
+tst 10(R14)
+beq L174
+*line 595
+move -6(R14),R0
+or #4352,R0
+move R0,_ptestm
+*line 596
+bra L175
+L174:
+*line 597
+move -6(R14),R0
+or #4352,R0
+move R0,_ptedef
+L175:
+*line 598
+*line 599
+bra L176
+L168:
+*line 600
+*line 600
+cmp #2,-4(R14)
+bne L177
+cmp #3,-2(R14)
+bne L177
+*line 601
+*line 602
+tst 10(R14)
+beq L10037
+move #21,R0
+bra L10039
+L10037:move #8,R0
+L10039:move R0,R6
+*line 603
+move.l #_ptdebuf,R8
+move.b 0(R8,R6),R0
+ext.w R0
+add #-48,R0
+ext.l R0
+move.l R0,R4
+*line 604
+*line 605
+*line 605
+tst.l R4
+beq L10040
+cmp.l #$2,R4
+ble L178
+L10040:*line 606
+*line 607
+move R6,(sp)
+move #9,-(sp)
+jsr _movectc
+addq.l #2,sp
+bra L147
+*line 608
+*line 609
+*line 610
+L178:
+*line 611
+move.l R4,R0
+sub.l #$1,R0
+move R0,-6(R14)
+*line 612
+*line 613
+*line 614
+tst 10(R14)
+beq L179
+*line 614
+move -6(R14),R0
+or #4480,R0
+move R0,_ptestm
+*line 615
+bra L180
+L179:
+*line 616
+move -6(R14),R0
+or #4480,R0
+move R0,_ptedef
+L180:
+*line 617
+bra L181
+L177:
+*line 618
+*line 619
+*line 620
+tst 10(R14)
+beq L10041
+move #15,(sp)
+bra L10043
+L10041:move #2,(sp)
+L10043:move #9,-(sp)
+jsr _movectc
+addq.l #2,sp
+bra L147
+*line 621
+L181:L176:L167:
+*line 624
+*line 625
+tst 10(R14)
+beq L182
+*line 625
+move #1,_ptestok
+*line 626
+bra L183
+L182:
+*line 627
+move #1,_ptedfok
+L183:
+*line 634
+*line 634
+tst 8(R14)
+beq L184
+*line 635
+*line 636
+jsr _srdspte
+*line 637
+tst 10(R14)
+beq L10044
+move #28,(sp)
+bra L10046
+L10044:move #15,(sp)
+L10046:move #9,-(sp)
+jsr _movectc
+addq.l #2,sp
+*line 638
+L184:L147:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _ptdest
+.text
+_ptdest:
+~~ptdest:
+~du=8
+link R14,#-4
+movem.l R2-R7,-(sp)
+~ltemp=R7
+~i=R6
+~left=R5
+~right=R4
+~stim=R3
+~port=-2
+~chan=-4
+*line 662
+move _ptedest,R0
+bra L187
+*line 663
+L188:
+*line 664
+*line 665
+*line 666
+clr.l R7
+*line 667
+move #30,R5
+*line 668
+move #33,R4
+*line 669
+*line 670
+move R5,R6
+bra L191
+L192:
+*line 671
+move.l #$a,-(sp)
+move.l R7,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,R7
+move.l #_ptdebuf,R8
+move.b 0(R8,R6),R0
+ext.w R0
+ext.l R0
+add.l R0,R7
+add.l #$ffffffd0,R7
+L190:
+*line 670
+add #1,R6
+L191:
+*line 670
+cmp R4,R6
+blt L192
+L189:
+*line 671
+*line 672
+*line 673
+*line 673
+tst.l R7
+beq L10047
+cmp.l #$80,R7
+ble L193
+L10047:*line 674
+*line 675
+move R5,(sp)
+move #9,-(sp)
+jsr _movectc
+addq.l #2,sp
+bra L185
+*line 676
+*line 677
+*line 678
+L193:
+*line 679
+move.l R7,R0
+sub.l #$1,R0
+move R0,R3
+*line 680
+clr.l R7
+*line 681
+move #36,R5
+*line 682
+move #38,R4
+*line 683
+*line 684
+move R5,R6
+bra L196
+L197:
+*line 685
+move.l #$a,-(sp)
+move.l R7,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,R7
+move.l #_ptdebuf,R8
+move.b 0(R8,R6),R0
+ext.w R0
+ext.l R0
+add.l R0,R7
+add.l #$ffffffd0,R7
+L195:
+*line 684
+add #1,R6
+L196:
+*line 684
+cmp R4,R6
+blt L197
+L194:
+*line 685
+*line 686
+*line 687
+*line 687
+tst.l R7
+beq L10048
+cmp.l #$10,R7
+ble L198
+L10048:*line 688
+*line 689
+move R5,(sp)
+move #9,-(sp)
+jsr _movectc
+addq.l #2,sp
+bra L185
+*line 690
+*line 691
+*line 692
+L198:
+*line 693
+move.l R7,R0
+sub.l #$1,R0
+move R0,-4(R14)
+*line 694
+*line 695
+*line 696
+*line 696
+cmp.b #76,34+_ptdebuf
+bne L199
+*line 697
+*line 698
+move #2,-2(R14)
+*line 699
+clr -4(R14)
+*line 700
+bra L200
+L199:
+*line 701
+*line 702
+*line 703
+move.b 34+_ptdebuf,R0
+ext.w R0
+add #-49,R0
+move R0,-2(R14)
+L200:
+*line 704
+*line 705
+*line 706
+move R3,R0
+move -4(R14),R1
+asl #7,R1
+or R1,R0
+move -2(R14),R1
+move #11,R2
+asl R2,R1
+or R1,R0
+move R0,_ptesuba
+bra L186
+*line 707
+*line 708
+*line 709
+L201:
+*line 710
+*line 711
+*line 712
+clr.l R7
+*line 713
+move #36,R5
+*line 714
+move #38,R4
+*line 715
+*line 716
+move R5,R6
+bra L204
+L205:
+*line 717
+move.l #$a,-(sp)
+move.l R7,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,R7
+move.l #_ptdebuf,R8
+move.b 0(R8,R6),R0
+ext.w R0
+ext.l R0
+add.l R0,R7
+add.l #$ffffffd0,R7
+L203:
+*line 716
+add #1,R6
+L204:
+*line 716
+cmp R4,R6
+blt L205
+L202:
+*line 717
+*line 718
+*line 719
+*line 719
+tst.l R7
+beq L10049
+cmp.l #$10,R7
+ble L206
+L10049:*line 720
+*line 721
+move R5,(sp)
+move #9,-(sp)
+jsr _movectc
+addq.l #2,sp
+bra L185
+*line 722
+*line 723
+*line 724
+L206:
+*line 725
+move.l R7,R0
+sub.l #$1,R0
+move R0,R3
+*line 726
+move R3,R0
+or #4352,R0
+move R0,_ptesuba
+bra L186
+*line 727
+*line 728
+L207:
+*line 729
+*line 730
+*line 731
+move.b 34+_ptdebuf,R0
+ext.w R0
+add #-49,R0
+move R0,_ptesuba
+bra L186
+*line 732
+*line 733
+L208:
+*line 734
+*line 735
+*line 736
+move.b 32+_ptdebuf,R0
+ext.w R0
+add #-65,R0
+move R0,_ptesuba
+bra L186
+*line 737
+*line 738
+L209:
+*line 739
+*line 740
+*line 741
+clr.l R7
+*line 742
+move #32,R5
+*line 743
+move #34,R4
+*line 744
+*line 745
+move R5,R6
+bra L212
+L213:
+*line 746
+move.l #$a,-(sp)
+move.l R7,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,R7
+move.l #_ptdebuf,R8
+move.b 0(R8,R6),R0
+ext.w R0
+ext.l R0
+add.l R0,R7
+add.l #$ffffffd0,R7
+L211:
+*line 745
+add #1,R6
+L212:
+*line 745
+cmp R4,R6
+blt L213
+L210:
+*line 746
+*line 747
+*line 748
+*line 748
+tst.l R7
+beq L10050
+cmp.l #$10,R7
+ble L214
+L10050:*line 749
+*line 750
+move R5,(sp)
+move #9,-(sp)
+jsr _movectc
+addq.l #2,sp
+bra L185
+*line 751
+*line 752
+*line 753
+L214:
+*line 754
+move.l R7,R0
+sub.l #$1,R0
+move R0,_ptesuba
+bra L186
+*line 755
+*line 756
+*line 757
+*line 758
+L215:
+*line 759
+L216:
+*line 760
+*line 761
+bra L186
+*line 762
+*line 763
+L217:
+*line 764
+L218:
+*line 765
+*line 766
+*line 767
+*line 768
+cmp.b #86,39+_ptdebuf
+bne L219
+*line 768
+clr R3
+*line 769
+bra L220
+L219:
+*line 770
+move #12,R3
+L220:
+*line 771
+*line 772
+move.b 40+_ptdebuf,R6
+ext.w R6
+and #255,R6
+*line 773
+*line 774
+*line 775
+cmp #172,R6
+blt L221
+*line 775
+move R6,R0
+add #-162,R0
+add R0,R3
+*line 776
+bra L222
+L221:
+*line 777
+move R6,R0
+add #-48,R0
+add R0,R3
+L222:
+*line 778
+*line 779
+sub #1,R3
+*line 780
+move R3,R0
+asl #8,R0
+move R0,_ptesuba
+bra L186
+*line 781
+*line 782
+L223:
+*line 783
+*line 784
+*line 785
+move.b 32+_ptdebuf,R0
+ext.w R0
+add #-48,R0
+move R0,_ptesuba
+bra L186
+*line 786
+*line 787
+*line 788
+L224:
+*line 789
+*line 790
+*line 791
+*line 792
+cmp.b #86,39+_ptdebuf
+bne L225
+*line 792
+clr R3
+*line 793
+bra L226
+L225:
+*line 794
+move #12,R3
+L226:
+*line 795
+*line 796
+move.b 40+_ptdebuf,R6
+ext.w R6
+and #255,R6
+*line 797
+*line 798
+*line 799
+cmp #172,R6
+blt L227
+*line 799
+move R6,R0
+add #-162,R0
+add R0,R3
+*line 800
+bra L228
+L227:
+*line 801
+move R6,R0
+add #-48,R0
+add R0,R3
+L228:
+*line 802
+*line 803
+sub #1,R3
+*line 804
+move R3,R0
+asl #8,R0
+move.b 32+_ptdebuf,R1
+ext.w R1
+add #-48,R1
+or R1,R0
+move R0,_ptesuba
+bra L186
+*line 805
+*line 806
+L229:
+*line 807
+*line 808
+*line 809
+move #28,(sp)
+move #9,-(sp)
+jsr _movectc
+addq.l #2,sp
+bra L185
+*line 810
+bra L186
+L187:cmp #10,R0
+bhi L229
+asl #2,R0
+move R0,R8
+add.l #L230,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L230:.dc.l L188
+.dc.l L201
+.dc.l L207
+.dc.l L208
+.dc.l L209
+.dc.l L215
+.dc.l L217
+.dc.l L216
+.dc.l L223
+.dc.l L224
+.dc.l L218
+.text
+L186:
+*line 813
+move #1,_ptedsok
+*line 820
+*line 820
+tst 8(R14)
+beq L231
+*line 821
+*line 822
+jsr _srdspte
+*line 823
+move #42,(sp)
+move #9,-(sp)
+jsr _movectc
+addq.l #2,sp
+*line 824
+*line 825
+*line 829
+L231:L185:tst.l (sp)+
+movem.l (sp)+,R3-R7
+unlk R14
+rts
+.globl _epatch
+.text
+_epatch:
+~~epatch:
+link R14,#-4
+*line 848
+move #1,_ptedtok
+*line 849
+clr (sp)
+clr -(sp)
+jsr _edefstm
+addq.l #2,sp
+*line 850
+move #1,(sp)
+clr -(sp)
+jsr _edefstm
+addq.l #2,sp
+*line 851
+clr (sp)
+jsr _ptdest
+*line 852
+jsr _entrpte
+*line 853
+jsr _srdspte
+*line 854
+move #2,(sp)
+move #9,-(sp)
+jsr _movectc
+addq.l #2,sp
+L232:unlk R14
+rts
+.globl _badpdat
+.text
+_badpdat:
+~~badpdat:
+link R14,#-4
+*line 878
+clr _ptedtok
+*line 879
+move #42,(sp)
+move #9,-(sp)
+jsr _movectc
+addq.l #2,sp
+L233:unlk R14
+rts
+.globl _setsubm
+.text
+_setsubm:
+~~setsubm:
+~r=8
+~c=10
+link R14,#-4
+*line 891
+move #1,_submenu
+*line 892
+move #5,_cmtype
+*line 893
+move 10(R14),(sp)
+move 8(R14),-(sp)
+jsr _mtcpos
+addq.l #2,sp
+L234:unlk R14
+rts
+.globl _ptfnbox
+.text
+_ptfnbox:
+~~ptfnbox:
+~n=8
+link R14,#0
+movem.l R2-R7,-(sp)
+~i=R7
+~box=R6
+~ptd=R5
+~ptt=R4
+~ltemp=R3
+*line 912
+*line 912
+tst _submenu
+bne L236
+*line 913
+*line 914
+*line 914
+cmp #2,_stccol
+blt L237
+cmp #13,_stccol
+bgt L237
+*line 915
+*line 916
+move #1,_ptedftp
+*line 917
+*line 918
+*line 918
+cmp #2,_stccol
+blt L238
+cmp #4,_stccol
+bgt L238
+*line 919
+*line 920
+move #2,(sp)
+move #19,-(sp)
+jsr _setsubm
+addq.l #2,sp
+*line 921
+bra L239
+L238:
+*line 922
+*line 923
+*line 924
+move #1,(sp)
+clr -(sp)
+jsr _edefstm
+addq.l #2,sp
+*line 925
+clr (sp)
+jsr _ptdest
+*line 926
+clr (sp)
+move #1,-(sp)
+jsr _edefstm
+addq.l #2,sp
+L239:
+*line 927
+*line 928
+*line 929
+clr R0
+bra L235
+*line 930
+bra L240
+L237:
+*line 931
+*line 931
+cmp #15,_stccol
+blt L241
+cmp #26,_stccol
+bgt L241
+*line 932
+*line 933
+move #2,_ptedftp
+*line 934
+*line 935
+*line 935
+cmp #15,_stccol
+blt L242
+cmp #17,_stccol
+bgt L242
+*line 936
+*line 937
+move #2,(sp)
+move #19,-(sp)
+jsr _setsubm
+addq.l #2,sp
+*line 938
+bra L243
+L242:
+*line 939
+*line 940
+*line 941
+clr (sp)
+clr -(sp)
+jsr _edefstm
+addq.l #2,sp
+*line 942
+clr (sp)
+jsr _ptdest
+*line 943
+move #1,(sp)
+move #1,-(sp)
+jsr _edefstm
+addq.l #2,sp
+L243:
+*line 944
+*line 945
+*line 946
+clr R0
+bra L235
+*line 947
+*line 948
+bra L244
+L241:
+*line 949
+*line 949
+cmp #28,_stccol
+blt L245
+cmp #40,_stccol
+bgt L245
+*line 950
+*line 951
+clr _ptedftp
+*line 952
+*line 953
+*line 953
+cmp #28,_stccol
+bne L246
+*line 954
+*line 955
+move #2,(sp)
+move #19,-(sp)
+jsr _setsubm
+addq.l #2,sp
+*line 956
+bra L247
+L246:
+*line 957
+*line 957
+cmp #8,_ptemenu
+bne L248
+*line 958
+*line 959
+move #22,(sp)
+move #20,-(sp)
+jsr _setsubm
+addq.l #2,sp
+*line 960
+bra L249
+L248:
+*line 961
+*line 962
+cmp #16,_ptemenu
+beq L10051
+cmp #32,_ptemenu
+bne L250
+L10051:*line 963
+*line 964
+move #43,(sp)
+move #19,-(sp)
+jsr _setsubm
+addq.l #2,sp
+*line 965
+bra L251
+L250:
+*line 966
+*line 967
+*line 968
+clr (sp)
+clr -(sp)
+jsr _edefstm
+addq.l #2,sp
+*line 969
+move #1,(sp)
+clr -(sp)
+jsr _edefstm
+addq.l #2,sp
+*line 970
+move #1,(sp)
+jsr _ptdest
+L251:L249:L247:
+*line 971
+*line 972
+*line 973
+clr R0
+bra L235
+*line 974
+*line 975
+bra L252
+L245:
+*line 976
+*line 976
+cmp #42,_stccol
+blt L253
+cmp #46,_stccol
+bgt L253
+*line 977
+*line 978
+clr _ptedftp
+*line 979
+jsr _setptcv
+*line 980
+*line 984
+*line 985
+move _ptedata,R0
+bra L255
+*line 986
+L256:
+*line 987
+*line 988
+*line 989
+clr _ptedtok
+*line 990
+move #-1,R0
+bra L235
+*line 991
+L257:
+*line 992
+*line 993
+*line 994
+move.b 43+_ptdebuf,_ebuf
+*line 995
+move.b 45+_ptdebuf,1+_ebuf
+*line 996
+move.b 46+_ptdebuf,2+_ebuf
+*line 997
+move.b 42+_ptdebuf,3+_ebuf
+*line 998
+*line 999
+*line 999
+move.l #_ebuf,(sp)
+jsr _dec2fr
+move R0,R7
+cmp #-1,R7
+bne L258
+*line 1000
+*line 1001
+jsr _badpdat
+*line 1002
+move #-1,R0
+bra L235
+*line 1003
+*line 1004
+L258:
+*line 1005
+move R7,_ptedat2
+*line 1006
+jsr _epatch
+*line 1007
+clr R0
+bra L235
+*line 1008
+*line 1009
+L259:
+*line 1010
+*line 1011
+*line 1012
+clr.l R3
+*line 1013
+*line 1014
+move #42,R7
+bra L262
+L263:
+*line 1015
+move.l #$a,-(sp)
+move.l R3,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,R3
+move.l #_ptdebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add #-48,R0
+ext.l R0
+add.l R0,R3
+L261:
+*line 1014
+add #1,R7
+L262:
+*line 1014
+cmp #47,R7
+blt L263
+L260:
+*line 1015
+*line 1016
+*line 1017
+*line 1017
+cmp.l #$7fff,R3
+ble L264
+*line 1018
+*line 1019
+jsr _badpdat
+*line 1020
+move #-1,R0
+bra L235
+*line 1021
+*line 1022
+L264:
+*line 1023
+move.l R3,R0
+move R0,(sp)
+jsr _tofpu
+move R0,_ptedat2
+*line 1024
+jsr _epatch
+*line 1025
+clr R0
+bra L235
+*line 1026
+L265:
+*line 1027
+*line 1028
+*line 1029
+move.b 42+_ptdebuf,R7
+ext.w R7
+and #255,R7
+*line 1030
+*line 1031
+*line 1032
+cmp #160,R7
+beq L10052
+cmp #161,R7
+bne L266
+L10052:*line 1032
+move.l #$3e8,R3
+*line 1033
+bra L267
+L266:
+*line 1034
+clr.l R3
+L267:
+*line 1035
+*line 1036
+*line 1037
+*line 1038
+move.b 43+_ptdebuf,R0
+ext.w R0
+add #-48,R0
+muls #100,R0
+move.b 45+_ptdebuf,R1
+ext.w R1
+add #-48,R1
+muls #10,R1
+add R1,R0
+move.b 46+_ptdebuf,R1
+ext.w R1
+add R1,R0
+add #-48,R0
+ext.l R0
+add.l R0,R3
+*line 1039
+*line 1040
+*line 1040
+cmp.l #$3e8,R3
+ble L268
+*line 1041
+*line 1042
+jsr _badpdat
+*line 1043
+move #-1,R0
+bra L235
+*line 1044
+*line 1045
+L268:
+*line 1046
+*line 1047
+cmp #45,R7
+beq L10053
+cmp #161,R7
+bne L269
+L10053:*line 1047
+move.l R3,R0
+neg.l R0
+move.l R0,R3
+*line 1048
+L269:
+*line 1049
+move.l R3,R0
+asl.l #$5,R0
+move R0,_ptedat2
+*line 1050
+jsr _epatch
+*line 1051
+clr R0
+bra L235
+*line 1052
+*line 1053
+*line 1054
+L270:
+*line 1055
+*line 1056
+*line 1057
+clr.l R3
+*line 1058
+*line 1059
+move #43,R7
+bra L273
+L274:
+*line 1060
+move.l #$a,-(sp)
+move.l R3,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,R3
+move.l #_ptdebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add #-48,R0
+ext.l R0
+add.l R0,R3
+L272:
+*line 1059
+add #1,R7
+L273:
+*line 1059
+cmp #47,R7
+blt L274
+L271:
+*line 1060
+*line 1061
+*line 1062
+*line 1062
+cmp.l #$4b0,R3
+ble L275
+*line 1063
+*line 1064
+jsr _badpdat
+*line 1065
+move #-1,R0
+bra L235
+*line 1066
+*line 1067
+L275:
+*line 1068
+*line 1069
+cmp.b #45,42+_ptdebuf
+bne L276
+*line 1069
+move.l R3,R0
+neg.l R0
+move.l R0,R3
+*line 1070
+L276:
+*line 1071
+move.l R3,R0
+asl.l #$1,R0
+move R0,_ptedat2
+*line 1072
+jsr _epatch
+*line 1073
+clr R0
+bra L235
+*line 1074
+*line 1075
+L277:
+*line 1076
+*line 1077
+*line 1078
+*line 1079
+move.b 42+_ptdebuf,R0
+ext.w R0
+add #-48,R0
+move R0,R8
+add.l R8,R8
+move.l #_ndvals,R9
+move 0(R8,R9.l),R0
+move.b 44+_ptdebuf,R1
+ext.w R1
+add #-48,R1
+move R1,R9
+add.l R9,R9
+add.l #_ndvals,R9
+move (R9),R1
+sub R1,R0
+move R0,_ptedat2
+*line 1080
+*line 1081
+jsr _epatch
+*line 1082
+clr R0
+bra L235
+*line 1083
+L278:
+*line 1084
+*line 1085
+*line 1086
+*line 1087
+*line 1088
+move.b 42+_ptdebuf,R0
+ext.w R0
+add #-48,R0
+muls #100,R0
+move.b 43+_ptdebuf,R1
+ext.w R1
+add #-48,R1
+muls #10,R1
+add R1,R0
+move.b 45+_ptdebuf,R1
+ext.w R1
+add R1,R0
+add #-48,R0
+ext.l R0
+move.l R0,R3
+*line 1089
+*line 1090
+*line 1090
+cmp.l #$9f,R3
+ble L279
+*line 1091
+*line 1092
+jsr _badpdat
+*line 1093
+move #-1,R0
+bra L235
+*line 1094
+*line 1095
+L279:
+*line 1096
+move.l R3,R0
+asl.l #$1,R0
+move R0,_ptedat2
+*line 1097
+jsr _epatch
+*line 1098
+clr R0
+bra L235
+*line 1099
+L280:
+*line 1100
+*line 1101
+*line 1102
+move #5,(sp)
+move.l #42+_ptdebuf,-(sp)
+move.l #_ebuf,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 1103
+*line 1104
+*line 1104
+jsr _cnvp2c
+cmp #-1,R0
+bne L281
+*line 1105
+*line 1106
+jsr _badpdat
+*line 1107
+move #-1,R0
+bra L235
+*line 1108
+*line 1109
+L281:
+*line 1110
+move _cents,_ptedat2
+*line 1111
+jsr _epatch
+*line 1112
+clr R0
+bra L235
+*line 1113
+*line 1114
+L282:
+*line 1115
+L283:
+*line 1116
+L284:
+*line 1117
+*line 1118
+*line 1119
+jsr _epatch
+*line 1120
+clr R0
+bra L235
+*line 1121
+L285:
+*line 1122
+*line 1123
+*line 1124
+*line 1125
+cmp #42,_stccol
+bne L286
+*line 1125
+move #49,(sp)
+move #19,-(sp)
+jsr _setsubm
+addq.l #2,sp
+*line 1126
+bra L287
+L286:
+*line 1127
+jsr _epatch
+L287:
+*line 1128
+*line 1129
+clr R0
+bra L235
+*line 1130
+L288:
+*line 1131
+*line 1132
+*line 1133
+*line 1134
+move.b 43+_ptdebuf,R0
+ext.w R0
+add #-48,R0
+muls #10,R0
+move.b 44+_ptdebuf,R1
+ext.w R1
+add R1,R0
+add #-48,R0
+ext.l R0
+move.l R0,R3
+*line 1135
+*line 1136
+*line 1136
+cmp.b #82,42+_ptdebuf
+bne L289
+*line 1137
+*line 1138
+*line 1138
+tst.l R3
+beq L10054
+cmp.l #$10,R3
+ble L290
+L10054:*line 1139
+*line 1140
+jsr _badpdat
+*line 1141
+move #-1,R0
+bra L235
+*line 1142
+*line 1143
+L290:
+*line 1144
+sub.l #$1,R3
+*line 1145
+move #1,_ptedat1
+*line 1146
+bra L291
+L289:
+*line 1147
+*line 1148
+*line 1149
+clr _ptedat1
+L291:
+*line 1150
+*line 1151
+*line 1152
+move R3,_ptedat2
+*line 1153
+jsr _epatch
+*line 1154
+clr R0
+bra L235
+*line 1155
+*line 1156
+L292:
+*line 1157
+*line 1158
+*line 1159
+clr.l R3
+*line 1160
+*line 1161
+move #42,R7
+bra L295
+L296:
+*line 1162
+move.l #$a,-(sp)
+move.l R3,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,R3
+move.l #_ptdebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add #-48,R0
+ext.l R0
+add.l R0,R3
+L294:
+*line 1161
+add #1,R7
+L295:
+*line 1161
+cmp #45,R7
+blt L296
+L293:
+*line 1162
+*line 1163
+*line 1164
+move R3,_ptedat1
+*line 1165
+jsr _epatch
+*line 1166
+clr R0
+bra L235
+*line 1167
+L297:
+*line 1168
+*line 1169
+*line 1170
+clr.l R3
+*line 1171
+*line 1172
+*line 1172
+btst #0,1+_ptesuba
+beq L298
+*line 1173
+*line 1174
+move #42,R7
+bra L301
+L302:
+*line 1175
+asl.l #$2,R3
+move.l #_ptdebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add #-48,R0
+ext.l R0
+or.l R0,R3
+L300:
+*line 1174
+add #1,R7
+L301:
+*line 1174
+cmp #46,R7
+blt L302
+L299:
+*line 1175
+*line 1176
+*line 1177
+move.l R3,R0
+asl.l #$8,R0
+move R0,_ptedat1
+*line 1178
+bra L303
+L298:
+*line 1179
+*line 1180
+*line 1181
+move #42,R7
+bra L306
+L307:
+*line 1182
+asl.l #$2,R3
+move.l #_ptdebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add #-48,R0
+ext.l R0
+or.l R0,R3
+L305:
+*line 1181
+add #1,R7
+L306:
+*line 1181
+cmp #45,R7
+blt L307
+L304:
+*line 1182
+*line 1183
+*line 1184
+move.l R3,R0
+move.l #$a,R1
+asl.l R1,R0
+move R0,_ptedat1
+L303:
+*line 1185
+*line 1186
+*line 1187
+jsr _epatch
+*line 1188
+clr R0
+bra L235
+*line 1189
+*line 1190
+*line 1191
+L308:
+*line 1192
+*line 1193
+*line 1194
+*line 1195
+move.b 42+_ptdebuf,R0
+ext.w R0
+add #-48,R0
+muls #10,R0
+move.b 43+_ptdebuf,R1
+ext.w R1
+add R1,R0
+add #-48,R0
+ext.l R0
+move.l R0,R3
+*line 1196
+*line 1197
+*line 1197
+cmp.l #$28,R3
+ble L309
+*line 1198
+*line 1199
+jsr _badpdat
+*line 1200
+move #-1,R0
+bra L235
+*line 1201
+*line 1202
+L309:
+*line 1203
+move R3,_ptedat1
+*line 1204
+jsr _epatch
+*line 1205
+clr R0
+bra L235
+*line 1206
+L310:
+*line 1207
+*line 1208
+*line 1209
+*line 1210
+move.b 42+_ptdebuf,R0
+ext.w R0
+add #-48,R0
+muls #10,R0
+move.b 43+_ptdebuf,R1
+ext.w R1
+add R1,R0
+add #-48,R0
+ext.l R0
+move.l R0,R3
+*line 1211
+*line 1212
+*line 1212
+tst.l R3
+beq L10055
+cmp.l #$14,R3
+ble L311
+L10055:*line 1213
+*line 1214
+jsr _badpdat
+*line 1215
+move #-1,R0
+bra L235
+*line 1216
+*line 1217
+L311:
+*line 1218
+move R3,_ptedat1
+*line 1219
+jsr _epatch
+*line 1220
+clr R0
+bra L235
+*line 1221
+*line 1222
+L312:
+*line 1223
+*line 1224
+*line 1225
+*line 1226
+move.b 42+_ptdebuf,R0
+ext.w R0
+add #-48,R0
+muls #10,R0
+move.b 43+_ptdebuf,R1
+ext.w R1
+add R1,R0
+add #-48,R0
+ext.l R0
+move.l R0,R3
+*line 1227
+*line 1228
+*line 1228
+cmp.l #$b,R3
+ble L313
+*line 1229
+*line 1230
+jsr _badpdat
+*line 1231
+move #-1,R0
+bra L235
+*line 1232
+*line 1233
+L313:
+*line 1234
+move R3,_ptedat1
+*line 1235
+jsr _epatch
+*line 1236
+clr R0
+bra L235
+*line 1237
+L314:
+*line 1238
+*line 1239
+*line 1240
+move.b 42+_ptdebuf,R0
+ext.w R0
+add #-48,R0
+move R0,_ptedat1
+*line 1241
+jsr _epatch
+*line 1242
+clr R0
+bra L235
+*line 1243
+L315:
+*line 1244
+*line 1245
+*line 1246
+clr _ptedtok
+*line 1247
+move #-1,R0
+bra L235
+bra L254
+L255:cmp #18,R0
+bhi L315
+asl #2,R0
+move R0,R8
+add.l #L316,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L316:.dc.l L256
+.dc.l L257
+.dc.l L259
+.dc.l L265
+.dc.l L270
+.dc.l L277
+.dc.l L278
+.dc.l L280
+.dc.l L282
+.dc.l L283
+.dc.l L284
+.dc.l L285
+.dc.l L288
+.dc.l L292
+.dc.l L297
+.dc.l L308
+.dc.l L310
+.dc.l L312
+.dc.l L314
+.text
+L254:
+*line 1248
+*line 1249
+*line 1250
+L253:L252:L244:L240:
+*line 1251
+move #-1,R0
+bra L235
+*line 1252
+*line 1253
+bra L317
+L236:
+*line 1254
+*line 1255
+*line 1256
+*line 1257
+*line 1258
+*line 1259
+cmp #2,_vtccol
+blt L318
+cmp #4,_vtccol
+bgt L318
+*line 1259
+move _vtcrow,R6
+add #-18,R6
+bra L319
+L318:
+*line 1260
+*line 1261
+cmp #7,_vtccol
+blt L320
+cmp #12,_vtccol
+bgt L320
+*line 1261
+move _vtcrow,R6
+add #-13,R6
+bra L321
+L320:
+*line 1262
+*line 1263
+cmp #15,_vtccol
+blt L322
+cmp #19,_vtccol
+bgt L322
+*line 1263
+move _vtcrow,R6
+sub #8,R6
+bra L323
+L322:
+*line 1264
+*line 1265
+cmp #22,_vtccol
+blt L324
+cmp #26,_vtccol
+bgt L324
+*line 1265
+move _vtcrow,R6
+sub #3,R6
+bra L325
+L324:
+*line 1266
+*line 1267
+cmp #29,_vtccol
+blt L326
+cmp #33,_vtccol
+bgt L326
+*line 1267
+move _vtcrow,R6
+add #2,R6
+bra L327
+L326:
+*line 1268
+*line 1269
+cmp #36,_vtccol
+blt L328
+cmp #40,_vtccol
+bgt L328
+*line 1269
+move _vtcrow,R6
+add #7,R6
+bra L329
+L328:
+*line 1270
+*line 1271
+cmp #43,_vtccol
+blt L330
+cmp #46,_vtccol
+bgt L330
+*line 1271
+move _vtcrow,R6
+add #12,R6
+bra L331
+L330:
+*line 1272
+*line 1273
+cmp #49,_vtccol
+blt L332
+cmp #53,_vtccol
+bgt L332
+*line 1273
+move _vtcrow,R6
+add #17,R6
+bra L333
+L332:
+*line 1274
+*line 1275
+cmp #56,_vtccol
+blt L334
+cmp #60,_vtccol
+bgt L334
+*line 1275
+move _vtcrow,R6
+add #22,R6
+*line 1276
+bra L335
+L334:
+*line 1277
+move #-1,R0
+bra L235
+L335:L333:L331:L329:L327:L325:L323:L321:L319:
+*line 1278
+*line 1279
+*line 1280
+*line 1281
+move _ptemenu,R0
+bra L337
+*line 1282
+L338:
+*line 1283
+*line 1284
+*line 1285
+*line 1285
+cmp #1,R6
+blt L339
+cmp #4,R6
+bgt L339
+*line 1286
+*line 1287
+move R6,R7
+sub #1,R7
+*line 1288
+move R7,R8
+add.l R8,R8
+add.l #_dfsttp,R8
+move (R8),_ptedfst
+*line 1289
+*line 1290
+*line 1290
+cmp #1,_ptedftp
+bne L340
+*line 1291
+*line 1292
+move #1,_ptedfok
+*line 1293
+move #1,_ptbflag
+*line 1294
+*line 1295
+move R7,R8
+add.l R8,R8
+add.l #_dfsttab,R8
+move (R8),_ptedef
+*line 1296
+*line 1297
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_rawdfst,R9
+move.l 0(R8,R9.l),(sp)
+move.l #2+_ptdebuf,-(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 1298
+*line 1299
+move #98,(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_rawdfst,R9
+move.l 0(R8,R9.l),-(sp)
+move #2,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 1300
+move _ptedfst,R8
+add.l R8,R8
+move.l #_defcols,R9
+move 0(R8,R9.l),(sp)
+move #9,-(sp)
+jsr _endpsm
+addq.l #2,sp
+*line 1301
+*line 1302
+clr R0
+bra L235
+*line 1303
+bra L341
+L340:
+*line 1304
+*line 1304
+cmp #2,_ptedftp
+bne L342
+*line 1305
+*line 1306
+move #1,_ptestok
+*line 1307
+move #1,_ptbflag
+*line 1308
+*line 1309
+move R7,R8
+add.l R8,R8
+add.l #_dfsttab,R8
+move (R8),_ptestm
+*line 1310
+*line 1311
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_rawdfst,R9
+move.l 0(R8,R9.l),(sp)
+move.l #15+_ptdebuf,-(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 1312
+*line 1313
+move #98,(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_rawdfst,R9
+move.l 0(R8,R9.l),-(sp)
+move #15,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 1314
+move _ptedfst,R8
+add.l R8,R8
+move.l #_stmcols,R9
+move 0(R8,R9.l),(sp)
+move #9,-(sp)
+jsr _endpsm
+addq.l #2,sp
+*line 1315
+*line 1316
+clr R0
+bra L235
+*line 1317
+L342:L341:
+*line 1318
+*line 1319
+L339:
+*line 1320
+move #-1,R0
+bra L235
+*line 1321
+*line 1322
+L343:
+*line 1323
+*line 1324
+*line 1325
+*line 1325
+cmp #36,R6
+blt L344
+cmp #45,R6
+bgt L344
+*line 1326
+*line 1327
+move #1,_ptedtok
+*line 1328
+move #1,_ptbflag
+*line 1329
+*line 1330
+move R6,R8
+add #-36,R8
+add.l R8,R8
+add.l #_datasrc,R8
+move (R8),_ptedat2
+*line 1331
+*line 1332
+move _ptedat2,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_smdata,R9
+move.l 0(R8,R9.l),(sp)
+move.l #42+_ptdebuf,-(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 1333
+*line 1334
+move #98,(sp)
+move _ptedat2,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_smdata,R9
+move.l 0(R8,R9.l),-(sp)
+move #42,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 1335
+move #46,(sp)
+move #9,-(sp)
+jsr _endpsm
+addq.l #2,sp
+*line 1336
+*line 1337
+clr R0
+bra L235
+*line 1338
+*line 1339
+L344:
+*line 1340
+move #-1,R0
+bra L235
+*line 1341
+*line 1342
+L345:
+*line 1343
+*line 1344
+*line 1345
+move R6,R7
+sub #1,R7
+*line 1346
+move R7,R8
+add.l R8,R8
+add.l #_destype,R8
+move (R8),R4
+*line 1347
+*line 1348
+*line 1348
+cmp #-1,R4
+beq L346
+*line 1349
+*line 1350
+move #1,_ptedsok
+*line 1351
+move #1,_ptedtok
+*line 1352
+move #1,_ptbflag
+*line 1353
+*line 1354
+move.l #_destfmt,R8
+move.b 0(R8,R7),R0
+ext.w R0
+move R0,_ptedest
+*line 1355
+move.l #_datafmt,R8
+move.b 0(R8,R7),R0
+ext.w R0
+move R0,_ptedata
+*line 1356
+move R4,_ptespec
+*line 1357
+clr _ptesuba
+*line 1358
+clr _ptedat1
+*line 1359
+clr _ptedat2
+*line 1360
+*line 1361
+*line 1361
+move.l #_desdatf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+move R0,R5
+beq L347
+*line 1362
+*line 1363
+*line 1364
+btst #0,R5
+beq L348
+*line 1364
+move R7,R8
+add.l R8,R8
+add.l #_desdat1,R8
+move (R8),_ptedat1
+*line 1365
+L348:
+*line 1366
+*line 1367
+btst #1,R5
+beq L349
+*line 1367
+move R7,R8
+add.l R8,R8
+add.l #_desdat2,R8
+move (R8),_ptedat2
+L349:
+*line 1368
+*line 1369
+L347:
+*line 1370
+move R4,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_rawdest,R9
+move.l 0(R8,R9.l),(sp)
+move.l #28+_ptdebuf,-(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 1371
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_rawdata,R9
+move.l 0(R8,R9.l),(sp)
+move.l #42+_ptdebuf,-(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 1372
+*line 1373
+move #98,(sp)
+move R4,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_rawdest,R9
+move.l 0(R8,R9.l),-(sp)
+move #28,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 1374
+move #98,(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_rawdata,R9
+move.l 0(R8,R9.l),-(sp)
+move #42,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 1375
+move _ptedest,R8
+add #1,R8
+add.l R8,R8
+move.l #_dstcols,R9
+move 0(R8,R9.l),(sp)
+move #9,-(sp)
+jsr _endpsm
+addq.l #2,sp
+*line 1376
+*line 1377
+clr R0
+bra L235
+*line 1378
+*line 1379
+L346:
+*line 1380
+move #-1,R0
+bra L235
+*line 1381
+*line 1382
+L350:
+*line 1383
+*line 1384
+*line 1385
+*line 1385
+cmp #17,R6
+blt L351
+cmp #20,R6
+bgt L351
+*line 1386
+*line 1387
+move R6,R7
+add #-17,R7
+*line 1388
+*line 1389
+move #1,_ptedsok
+*line 1390
+move #1,_ptedtok
+*line 1391
+move #1,_ptbflag
+*line 1392
+*line 1393
+move R7,R8
+add.l R8,R8
+add.l #_omtabl,R8
+move (R8),_ptedat1
+*line 1394
+move R7,R8
+add.l R8,R8
+add.l #_omdtab,R8
+move (R8),_ptedat2
+*line 1395
+*line 1396
+move R7,R8
+add.l R8,R8
+add.l #_omftab,R8
+move (R8),_ptedata
+*line 1397
+*line 1398
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_rawmode,R9
+move.l 0(R8,R9.l),(sp)
+move.l #34+_ptdebuf,-(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 1399
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_rawmdat,R9
+move.l 0(R8,R9.l),(sp)
+move.l #42+_ptdebuf,-(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 1400
+*line 1401
+move #98,(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_rawmode,R9
+move.l 0(R8,R9.l),-(sp)
+move #34,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 1402
+move #98,(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_rawmdat,R9
+move.l 0(R8,R9.l),-(sp)
+move #42,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 1403
+move #39,(sp)
+move #9,-(sp)
+jsr _endpsm
+addq.l #2,sp
+*line 1404
+*line 1405
+clr R0
+bra L235
+*line 1406
+*line 1407
+L351:
+*line 1408
+move #-1,R0
+bra L235
+*line 1409
+*line 1410
+L352:
+*line 1411
+*line 1412
+*line 1413
+*line 1414
+cmp #31,R6
+blt L10056
+cmp #34,R6
+ble L353
+L10056:*line 1414
+move #-1,R0
+bra L235
+*line 1415
+L353:L354:
+*line 1416
+*line 1417
+*line 1418
+*line 1419
+cmp #31,R6
+blt L10057
+cmp #35,R6
+ble L355
+L10057:*line 1419
+move #-1,R0
+bra L235
+*line 1420
+L355:
+*line 1421
+move R6,R7
+add #-31,R7
+*line 1422
+*line 1423
+move #1,_ptedsok
+*line 1424
+move #1,_ptedtok
+*line 1425
+move #1,_ptbflag
+*line 1426
+*line 1427
+move R7,_ptedat1
+*line 1428
+move R7,R8
+add.l R8,R8
+add.l #_fpudtab,R8
+move (R8),_ptedat2
+*line 1429
+*line 1430
+move R7,R8
+add.l R8,R8
+add.l #_fpuetab,R8
+move (R8),_ptedata
+*line 1431
+*line 1432
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_stdata,R9
+move.l 0(R8,R9.l),(sp)
+move.l #34+_ptdebuf,-(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 1433
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_rawfpud,R9
+move.l 0(R8,R9.l),(sp)
+move.l #42+_ptdebuf,-(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 1434
+*line 1435
+move #98,(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_stdata,R9
+move.l 0(R8,R9.l),-(sp)
+move #34,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 1436
+move #98,(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_rawfpud,R9
+move.l 0(R8,R9.l),-(sp)
+move #42,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 1437
+move #42,(sp)
+move #9,-(sp)
+jsr _endpsm
+addq.l #2,sp
+*line 1438
+*line 1439
+clr R0
+bra L235
+*line 1440
+L356:
+*line 1441
+*line 1442
+*line 1443
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _endpsm
+addq.l #2,sp
+*line 1444
+*line 1445
+move #-1,R0
+bra L235
+bra L336
+L337:ext.l R0
+move.l #L357,R8
+move #6,R1
+L358:cmp.l (R8)+,R0
+dbeq R1,L358
+move.l 24(R8),R8
+jmp (R8)
+.data
+L357:.dc.l 1
+.dc.l 2
+.dc.l 4
+.dc.l 8
+.dc.l 16
+.dc.l 32
+.dc.l 0
+.dc.l L338
+.dc.l L343
+.dc.l L345
+.dc.l L350
+.dc.l L354
+.dc.l L352
+.dc.l L356
+.text
+L336:
+*line 1446
+L317:
+*line 1449
+move #-1,R0
+bra L235
+L235:tst.l (sp)+
+movem.l (sp)+,R3-R7
+unlk R14
+rts
+.data
+L1:.dc.b $4B,$65,$79,$20,$30,$30,$31,$20,$31,$20,$30,$31,$0
+L2:.dc.b $52,$65,$6C,$20,$30,$30,$31,$20,$31,$20,$30,$31,$0
+L3:.dc.b $54,$72,$69,$67,$20,$30,$31,$20,$20,$20,$20,$20,$0
+L4:.dc.b $50,$75,$6C,$73,$65,$20,$31,$20,$20,$20,$20,$20,$0
+L5:.dc.b $3F,$3F,$3F,$3F,$3F,$3F,$3F,$20,$30,$30,$20,$3F,$3F,$0
+L6:.dc.b $4B,$20,$30,$30,$31,$20,$31,$20,$30,$31,$20,$20,$20,$0
+L7:.dc.b $54,$72,$69,$67,$67,$65,$72,$20,$30,$31,$20,$20,$20,$0
+L8:.dc.b $50,$75,$6C,$73,$65,$20,$31,$20,$20,$20,$20,$20,$20,$0
+L9:.dc.b $4C,$45,$44,$20,$41,$20,$20,$20,$20,$20,$20,$20,$20,$0
+L10:.dc.b $53,$65,$71,$20,$30,$31,$20,$4C,$69,$6E,$20,$20,$20,$0
+L11:.dc.b $53,$65,$71,$20,$30,$31,$20,$43,$74,$6C,$20,$20,$20,$0
+L12:.dc.b $54,$75,$6E,$65,$20,$54,$61,$62,$6C,$65,$20,$20,$20,$0
+L13:.dc.b $52,$65,$67,$20,$30,$31,$20,$53,$65,$74,$20,$20,$20,$0
+L14:.dc.b $52,$65,$67,$20,$30,$31,$20,$41,$64,$64,$20,$20,$20,$0
+L15:.dc.b $49,$6E,$73,$74,$72,$75,$6D,$65,$6E,$74,$20,$56,$31,$0
+L16:.dc.b $4F,$73,$63,$20,$31,$20,$49,$6E,$74,$20,$20,$56,$31,$0
+L17:.dc.b $57,$61,$76,$65,$73,$68,$61,$70,$65,$41,$20,$56,$31,$0
+L18:.dc.b $57,$61,$76,$65,$73,$68,$61,$70,$65,$42,$20,$56,$31,$0
+L19:.dc.b $43,$6F,$6E,$66,$69,$67,$75,$72,$65,$20,$20,$56,$31,$0
+L20:.dc.b $4C,$65,$76,$65,$6C,$20,$53,$72,$63,$65,$20,$56,$31,$0
+L21:.dc.b $49,$6E,$64,$20,$31,$20,$53,$72,$63,$65,$20,$56,$31,$0
+L22:.dc.b $46,$72,$71,$20,$31,$20,$53,$72,$63,$65,$20,$56,$31,$0
+L23:.dc.b $46,$69,$6C,$74,$72,$20,$53,$72,$63,$65,$20,$56,$31,$0
+L24:.dc.b $46,$69,$6C,$20,$51,$20,$53,$72,$63,$65,$20,$56,$31,$0
+L25:.dc.b $4C,$6F,$63,$74,$6E,$20,$53,$72,$63,$65,$20,$56,$31,$0
+L26:.dc.b $44,$79,$6E,$6D,$63,$20,$53,$72,$63,$65,$20,$56,$31,$0
+L27:.dc.b $41,$75,$78,$20,$20,$20,$53,$72,$63,$65,$20,$20,$20,$0
+L28:.dc.b $52,$61,$74,$65,$20,$20,$53,$72,$63,$65,$20,$20,$20,$0
+L29:.dc.b $49,$6E,$74,$65,$6E,$20,$53,$72,$63,$65,$20,$20,$20,$0
+L30:.dc.b $44,$65,$70,$74,$68,$20,$53,$72,$63,$65,$20,$20,$20,$0
+L31:.dc.b $56,$6C,$74,$20,$31,$20,$53,$72,$63,$65,$20,$20,$20,$0
+L32:.dc.b $46,$72,$71,$20,$0
+L33:.dc.b $50,$63,$68,$20,$0
+L34:.dc.b $49,$6E,$74,$20,$0
+L35:.dc.b $52,$61,$74,$20,$0
+L36:.dc.b $30,$30,$2E,$31,$20,$0
+L37:.dc.b $30,$43,$20,$30,$30,$0
+L38:.dc.b $2B,$30,$30,$30,$30,$0
+L39:.dc.b $31,$2F,$31,$20,$20,$0
+L40:.dc.b $50,$63,$68,$57,$68,$0
+L41:.dc.b $2B,$30,$2E,$30,$30,$0
+L42:.dc.b $30,$30,$30,$30,$31,$0
+L43:.dc.b $A0,$30,$2E,$30,$30,$0
+L44:.dc.b $53,$74,$61,$72,$74,$0
+L45:.dc.b $54,$72,$61,$6E,$73,$0
+L46:.dc.b $20,$20,$20,$20,$20,$0
+L47:.dc.b $53,$74,$61,$72,$74,$0
+L48:.dc.b $54,$72,$61,$6E,$73,$0
+L49:.dc.b $30,$30,$30,$20,$20,$0
+L50:.dc.b $30,$30,$30,$20,$20,$0
+L51:.dc.b $53,$74,$61,$72,$74,$0
+L52:.dc.b $30,$20,$20,$20,$20,$0
+L53:.dc.b $2B,$30,$30,$20,$20,$0
+L54:.dc.b $2B,$30,$31,$20,$20,$0
+L55:.dc.b $30,$30,$20,$20,$20,$0
+L56:.dc.b $2B,$30,$30,$30,$30,$0
+L57:.dc.b $30,$31,$20,$20,$20,$0
+L58:.dc.b $30,$31,$20,$20,$20,$0
+L59:.dc.b $30,$30,$20,$20,$20,$0
+L60:.dc.b $50,$63,$68,$57,$68,$0
+L61:.dc.b $50,$63,$68,$57,$68,$0
+L62:.dc.b $20,$20,$20,$20,$20,$0
+L63:.dc.b $20,$20,$20,$20,$20,$0
+L64:.dc.b $20,$20,$20,$20,$20,$0
+L65:.dc.b $50,$63,$68,$57,$68,$0
+L66:.dc.b $50,$63,$68,$57,$68,$0
+L67:.dc.b $50,$63,$68,$57,$68,$0
+L68:.dc.b $50,$63,$68,$57,$68,$0
+L69:.dc.b $50,$63,$68,$57,$68,$0
+L70:.dc.b $50,$63,$68,$57,$68,$0
+L71:.dc.b $50,$63,$68,$57,$68,$0
+L72:.dc.b $50,$63,$68,$57,$68,$0
+L73:.dc.b $50,$63,$68,$57,$68,$0
+L74:.dc.b $50,$63,$68,$57,$68,$0
Index: alcyon/ptwrite.s
===================================================================
--- alcyon/ptwrite.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/ptwrite.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1222 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.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 _stmptr
+.globl _defptr
+.globl _patches
+.globl _defents
+.globl _seqtab
+.globl _seqflag
+.globl _seqline
+.globl _seqstim
+.globl _seqtime
+.globl _sregval
+.globl _trstate
+.globl _filecat
+.globl _ptsizes
+.data
+_ptsizes:
+.dc.b $0
+.dc.b $4
+.dc.b $4
+.dc.b $3
+.dc.b $3
+.dc.b $4
+.dc.b $3
+.dc.b $2
+.dc.b $4
+.dc.b $4
+.dc.b $3
+.dc.b $6
+.dc.b $3
+.dc.b $3
+.dc.b $3
+.dc.b $5
+.dc.b $6
+.dc.b $6
+.dc.b $5
+.dc.b $5
+.dc.b $5
+.dc.b $5
+.dc.b $4
+.dc.b $4
+.dc.b $4
+.dc.b $4
+.dc.b $5
+.even
+.globl _ptsizer
+.text
+_ptsizer:
+~~ptsizer:
+link R14,#0
+movem.l R5-R7,-(sp)
+~pp=R7
+~nb=R6
+*line 84
+clr.l R6
+*line 86
+*line 86
+jsr _find1st
+move R0,R7
+beq L2
+*line 87
+*line 88
+bra L5
+L4:
+*line 89
+*line 90
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_patches,R9
+clr R0
+move 8(R8,R9.l),R0
+and #255,R0
+move R0,R8
+move.l #_ptsizes,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+add #4,R0
+ext.l R0
+add.l R0,R6
+*line 91
+move R7,(sp)
+jsr _findnxt
+move R0,R7
+L5:
+*line 92
+tst R7
+bne L4
+L3:
+*line 93
+*line 94
+L2:
+*line 95
+*line 96
+tst.l R6
+beq L6
+*line 96
+add.l #$1,R6
+*line 97
+*line 101
+*line 102
+L6:
+*line 103
+move.l R6,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _ptwrite
+.text
+_ptwrite:
+~~ptwrite:
+~fp=R13
+link R14,#-4
+movem.l R6-R7/R13-R13,-(sp)
+~pp=R7
+~cb=-2
+~zero=-4
+*line 127
+move.l 8(R14),R13
+*line 127
+clr.b -4(R14)
+*line 129
+*line 130
+move #9,(sp)
+move #12,-(sp)
+move.l #L9,-(sp)
+clr.l -(sp)
+move.l #L8,-(sp)
+jsr _ldwmsg
+adda.l #14,sp
+*line 132
+*line 132
+jsr _find1st
+move R0,R7
+beq L10
+*line 133
+*line 134
+bra L13
+L12:
+*line 135
+*line 144
+*line 145
+*line 146
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_patches,R9
+clr R0
+move 8(R8,R9.l),R0
+and #255,R0
+move.b R0,-2(R14)
+bra L15
+*line 147
+L16:
+*line 148
+L17:
+*line 149
+*line 150
+*line 151
+*line 152
+move.l #$1,(sp)
+move.l R14,-(sp)
+sub.l #2,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L18
+*line 152
+move #-1,R0
+bra L7
+*line 153
+L18:
+*line 154
+*line 155
+move.l #$4,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L19
+*line 155
+move #-1,R0
+bra L7
+*line 156
+L19:
+*line 157
+*line 158
+move.l #$2,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #10,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L20
+*line 158
+move #-1,R0
+bra L7
+*line 159
+L20:
+*line 160
+*line 161
+move.l #$1,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #15,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L21
+*line 161
+move #-1,R0
+bra L7
+*line 162
+L21:bra L14
+*line 163
+*line 164
+*line 165
+L22:
+*line 166
+L23:
+*line 167
+*line 168
+*line 169
+*line 170
+move.l #$1,(sp)
+move.l R14,-(sp)
+sub.l #2,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L24
+*line 170
+move #-1,R0
+bra L7
+*line 171
+L24:
+*line 172
+*line 173
+move.l #$4,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L25
+*line 173
+move #-1,R0
+bra L7
+*line 174
+L25:
+*line 175
+*line 176
+move.l #$1,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #11,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L26
+*line 176
+move #-1,R0
+bra L7
+*line 177
+L26:
+*line 178
+*line 179
+move.l #$1,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #15,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L27
+*line 179
+move #-1,R0
+bra L7
+*line 180
+L27:bra L14
+*line 181
+*line 182
+L28:
+*line 183
+*line 184
+*line 185
+*line 186
+move.l #$1,(sp)
+move.l R14,-(sp)
+sub.l #2,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L29
+*line 186
+move #-1,R0
+bra L7
+*line 187
+L29:
+*line 188
+*line 189
+move.l #$4,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L30
+*line 189
+move #-1,R0
+bra L7
+*line 190
+L30:
+*line 191
+*line 192
+move.l #$1,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #11,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L31
+*line 192
+move #-1,R0
+bra L7
+*line 193
+L31:
+*line 194
+*line 195
+move.l #$1,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #12,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L32
+*line 195
+move #-1,R0
+bra L7
+*line 196
+L32:bra L14
+*line 197
+*line 198
+L33:
+*line 199
+*line 200
+*line 201
+*line 202
+move.l #$1,(sp)
+move.l R14,-(sp)
+sub.l #2,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L34
+*line 202
+move #-1,R0
+bra L7
+*line 203
+L34:
+*line 204
+*line 205
+move.l #$4,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L35
+*line 205
+move #-1,R0
+bra L7
+*line 206
+L35:
+*line 207
+*line 208
+move.l #$1,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #11,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L36
+*line 208
+move #-1,R0
+bra L7
+*line 209
+L36:
+*line 210
+*line 211
+move.l #$2,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #12,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L37
+*line 211
+move #-1,R0
+bra L7
+*line 212
+L37:bra L14
+*line 213
+*line 214
+L38:
+*line 215
+*line 216
+*line 217
+*line 218
+move.l #$1,(sp)
+move.l R14,-(sp)
+sub.l #2,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L39
+*line 218
+move #-1,R0
+bra L7
+*line 219
+L39:
+*line 220
+*line 221
+move.l #$4,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L40
+*line 221
+move #-1,R0
+bra L7
+*line 222
+L40:
+*line 223
+*line 224
+move.l #$1,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #13,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L41
+*line 224
+move #-1,R0
+bra L7
+*line 225
+L41:bra L14
+*line 226
+*line 227
+*line 228
+L42:
+*line 229
+L43:
+*line 230
+*line 231
+*line 232
+*line 233
+move.l #$1,(sp)
+move.l R14,-(sp)
+sub.l #2,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L44
+*line 233
+move #-1,R0
+bra L7
+*line 234
+L44:
+*line 235
+*line 236
+move.l #$4,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L45
+*line 236
+move #-1,R0
+bra L7
+*line 237
+L45:
+*line 238
+*line 239
+move.l #$1,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #11,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L46
+*line 239
+move #-1,R0
+bra L7
+*line 240
+L46:
+*line 241
+*line 242
+move.l #$1,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #13,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L47
+*line 242
+move #-1,R0
+bra L7
+*line 243
+L47:
+*line 244
+*line 245
+move.l #$1,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #15,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L48
+*line 245
+move #-1,R0
+bra L7
+*line 246
+L48:bra L14
+*line 247
+*line 248
+L49:
+*line 249
+L50:
+*line 250
+L51:
+*line 251
+L52:
+*line 252
+*line 253
+*line 254
+*line 255
+move.l #$1,(sp)
+move.l R14,-(sp)
+sub.l #2,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L53
+*line 255
+move #-1,R0
+bra L7
+*line 256
+L53:
+*line 257
+*line 258
+move.l #$4,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L54
+*line 258
+move #-1,R0
+bra L7
+*line 259
+L54:
+*line 260
+*line 261
+move.l #$1,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #10,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L55
+*line 261
+move #-1,R0
+bra L7
+*line 262
+L55:
+*line 263
+*line 264
+move.l #$1,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #13,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L56
+*line 264
+move #-1,R0
+bra L7
+*line 265
+L56:bra L14
+*line 266
+*line 267
+L57:
+*line 268
+L58:
+*line 269
+L59:
+*line 270
+*line 271
+*line 272
+*line 273
+move.l #$1,(sp)
+move.l R14,-(sp)
+sub.l #2,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L60
+*line 273
+move #-1,R0
+bra L7
+*line 274
+L60:
+*line 275
+*line 276
+move.l #$4,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L61
+*line 276
+move #-1,R0
+bra L7
+*line 277
+L61:
+*line 278
+*line 279
+move.l #$2,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #10,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L62
+*line 279
+move #-1,R0
+bra L7
+*line 280
+L62:
+*line 281
+*line 282
+move.l #$1,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #13,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L63
+*line 282
+move #-1,R0
+bra L7
+*line 283
+L63:
+*line 284
+*line 285
+move.l #$2,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #14,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L64
+*line 285
+move #-1,R0
+bra L7
+*line 286
+L64:bra L14
+*line 287
+*line 288
+*line 289
+L65:
+*line 290
+L66:
+*line 291
+L67:
+*line 292
+L68:
+*line 293
+L69:
+*line 294
+*line 295
+*line 296
+*line 297
+move.l #$1,(sp)
+move.l R14,-(sp)
+sub.l #2,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L70
+*line 297
+move #-1,R0
+bra L7
+*line 298
+L70:
+*line 299
+*line 300
+move.l #$4,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L71
+*line 300
+move #-1,R0
+bra L7
+*line 301
+L71:
+*line 302
+*line 303
+move.l #$1,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #10,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L72
+*line 303
+move #-1,R0
+bra L7
+*line 304
+L72:
+*line 305
+*line 306
+move.l #$1,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #13,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L73
+*line 306
+move #-1,R0
+bra L7
+*line 307
+L73:
+*line 308
+*line 309
+move.l #$2,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #14,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L74
+*line 309
+move #-1,R0
+bra L7
+*line 310
+L74:bra L14
+*line 311
+*line 312
+L75:
+*line 313
+L76:
+*line 314
+L77:
+*line 315
+L78:
+*line 316
+*line 317
+*line 318
+*line 319
+move.l #$1,(sp)
+move.l R14,-(sp)
+sub.l #2,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L79
+*line 319
+move #-1,R0
+bra L7
+*line 320
+L79:
+*line 321
+*line 322
+move.l #$4,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L80
+*line 322
+move #-1,R0
+bra L7
+*line 323
+L80:
+*line 324
+*line 325
+move.l #$1,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #13,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L81
+*line 325
+move #-1,R0
+bra L7
+*line 326
+L81:
+*line 327
+*line 328
+move.l #$2,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #14,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L82
+*line 328
+move #-1,R0
+bra L7
+*line 329
+L82:bra L14
+*line 330
+*line 331
+L83:
+*line 332
+*line 333
+*line 334
+*line 335
+move.l #$1,(sp)
+move.l R14,-(sp)
+sub.l #2,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L84
+*line 335
+move #-1,R0
+bra L7
+*line 336
+L84:
+*line 337
+*line 338
+move.l #$4,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L85
+*line 338
+move #-1,R0
+bra L7
+*line 339
+L85:
+*line 340
+*line 341
+move.l #$1,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #11,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L86
+*line 341
+move #-1,R0
+bra L7
+*line 342
+L86:
+*line 343
+*line 344
+move.l #$1,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #13,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L87
+*line 344
+move #-1,R0
+bra L7
+*line 345
+L87:
+*line 346
+*line 347
+move.l #$2,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #14,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L88
+*line 347
+move #-1,R0
+bra L7
+*line 348
+L88:bra L14
+*line 349
+*line 350
+*line 351
+L89:
+*line 352
+*line 353
+*line 354
+move #-1,R0
+bra L7
+bra L14
+L15:sub #1,R0
+cmp #25,R0
+bhi L89
+asl #2,R0
+move R0,R8
+add.l #L90,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L90:.dc.l L16
+.dc.l L17
+.dc.l L22
+.dc.l L28
+.dc.l L33
+.dc.l L23
+.dc.l L38
+.dc.l L42
+.dc.l L43
+.dc.l L49
+.dc.l L57
+.dc.l L50
+.dc.l L51
+.dc.l L52
+.dc.l L65
+.dc.l L58
+.dc.l L59
+.dc.l L66
+.dc.l L67
+.dc.l L68
+.dc.l L69
+.dc.l L75
+.dc.l L76
+.dc.l L77
+.dc.l L78
+.dc.l L83
+.text
+L14:
+*line 355
+*line 356
+*line 360
+*line 361
+*line 362
+move R7,(sp)
+jsr _findnxt
+move R0,R7
+L13:
+*line 363
+tst R7
+bne L12
+L11:
+*line 364
+*line 365
+*line 366
+move.l #$1,(sp)
+move.l R14,-(sp)
+sub.l #4,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L91
+*line 366
+move #-1,R0
+bra L7
+*line 367
+L91:bra L92
+L10:
+*line 368
+*line 369
+*line 370
+move #-1,R0
+bra L7
+L92:
+*line 378
+clr R0
+bra L7
+L7:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.data
+L8:.dc.b $42,$75,$73,$79,$20,$2D,$2D,$20,$50,$6C,$65,$61,$73,$65,$20,$73,$74,$61,$6E,$64,$20,$62,$79,$0
+L9:.dc.b $20,$20,$77,$72,$69,$74,$69,$6E,$67,$20,$70,$61,$74,$63,$68,$65,$73,$0
Index: alcyon/putc.s
===================================================================
--- alcyon/putc.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/putc.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,290 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl __clsall
+.bss
+L1:.ds.b 4
+.text
+.globl __ClFlag
+.comm __ClFlag,2
+.text
+_closall:
+~~closall:
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+~fp=R13
+*line 32
+move.l #_Cbuffs,R13
+bra L6
+L7:
+*line 33
+move.l R13,(sp)
+jsr _fclose
+add.l #18,R13
+L5:L6:
+*line 32
+cmp.l #198+_Cbuffs,R13
+blo L7
+L4:
+*line 35
+move.l L1,R8
+jsr (R8)
+L3:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _flush_
+.text
+_flush_:
+~~flush_:
+~ptr=R13
+~data=12
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~size=R7
+*line 54
+move.l 8(R14),R13
+*line 54
+*line 54
+tst __ClFlag
+bne L9
+*line 55
+*line 56
+move.l __clsall,L1
+*line 57
+move.l #_closall,__clsall
+*line 58
+move #1,__ClFlag
+*line 59
+*line 60
+L9:
+*line 61
+*line 61
+btst #2,12(R13)
+beq L10
+*line 62
+*line 63
+move.l (R13),R0
+sub.l 8(R13),R0
+move R0,R7
+*line 64
+*line 65
+*line 65
+move R7,(sp)
+move.l 8(R13),-(sp)
+move.b 13(R13),R0
+ext.w R0
+move R0,-(sp) 
+jsr _write
+addq.l #6,sp
+cmp #-1,R0
+bne L11
+*line 66
+L12:
+*line 67
+*line 68
+or.b #16,12(R13)
+*line 69
+move #-1,R0
+bra L8
+*line 70
+L11:
+*line 71
+*line 72
+L10:
+*line 73
+*line 73
+cmp #-1,12(R14)
+bne L13
+*line 74
+*line 75
+and.b #-5,12(R13)
+*line 76
+clr R0
+ext.l R0
+move.l R0,(R13)
+move.l R0,4(R13)
+*line 77
+clr R0
+bra L8
+*line 78
+*line 79
+L13:
+*line 80
+*line 81
+tst.l 8(R13)
+bne L14
+*line 81
+move.l R13,(sp)
+jsr _getbuff
+*line 82
+L14:
+*line 83
+*line 83
+cmp #1,16(R13)
+bne L15
+*line 84
+*line 85
+*line 86
+move #1,(sp)
+move.l R14,-(sp)
+add.l #12,(sp)
+move.b 13(R13),R0
+ext.w R0
+move R0,-(sp) 
+jsr _write
+addq.l #6,sp
+cmp #-1,R0
+beq L12
+*line 87
+*line 88
+move 12(R14),R0
+bra L8
+*line 89
+*line 90
+L15:
+*line 91
+move.l 8(R13),(R13)
+*line 92
+move.l 8(R13),R0
+move 16(R13),R1
+ext.l R1
+add.l R1,R0
+move.l R0,4(R13)
+*line 93
+or.b #4,12(R13)
+*line 95
+move.l (R13),R8
+move 12(R14),R0
+move.b R0,(R8)
+and #255,R0
+add.l #1,(R13)
+bra L8
+L8:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _fflush
+.text
+_fflush:
+~~fflush:
+~ptr=8
+link R14,#-4
+*line 111
+move #-1,(sp)
+move.l 8(R14),-(sp)
+jsr _flush_
+addq.l #4,sp
+bra L16
+L16:unlk R14
+rts
+.globl _fclose
+.text
+_fclose:
+~~fclose:
+~ptr=R13
+link R14,#-2
+movem.l R7-R7/R13-R13,-(sp)
+~err=-2
+*line 126
+move.l 8(R14),R13
+*line 126
+clr -2(R14)
+*line 128
+*line 128
+tst.b 12(R13)
+beq L18
+*line 129
+*line 130
+*line 131
+btst #2,12(R13)
+beq L19
+*line 131
+move #-1,(sp)
+move.l R13,-(sp)
+jsr _flush_
+addq.l #4,sp
+move R0,-2(R14)
+*line 132
+L19:
+*line 133
+move.b 13(R13),R0
+ext.w R0
+move R0,(sp) 
+jsr _close
+or R0,-2(R14)
+*line 134
+*line 135
+*line 135
+btst #1,12(R13)
+beq L20
+*line 136
+*line 137
+move.l 8(R13),R8
+move.l _Stdbufs,(R8)
+*line 138
+move.l 8(R13),_Stdbufs
+*line 139
+L20:
+*line 140
+*line 141
+L18:
+*line 142
+clr.b 12(R13)
+*line 143
+move -2(R14),R0
+bra L17
+L17:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _putc
+.text
+_putc:
+~~putc:
+~ptr=R13
+~c=8
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+*line 160
+move.l 10(R14),R13
+*line 160
+*line 161
+move.l (R13),R0
+cmp.l 4(R13),R0
+blo L22
+*line 161
+move 8(R14),(sp)
+and #255,(sp)
+move.l R13,-(sp)
+jsr _flush_
+addq.l #4,sp
+bra L21
+*line 162
+L22:
+*line 163
+move.l (R13),R8
+move 8(R14),R0
+move.b R0,(R8)
+and #255,R0
+add.l #1,(R13)
+bra L21
+L21:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _puterr
+.text
+_puterr:
+~~puterr:
+~c=8
+link R14,#-4
+*line 175
+move.l #36+_Cbuffs,(sp)
+move 8(R14),-(sp)
+jsr _putc
+addq.l #2,sp
+bra L23
+L23:unlk R14
+rts
+.data
Index: alcyon/puteq.s
===================================================================
--- alcyon/puteq.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/puteq.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,194 @@
+.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 _eqgaint
+.data
+_eqgaint:
+.dc.b $0
+.dc.b $20
+.dc.b $10
+.dc.b $8
+.dc.b $4
+.dc.b $2
+.dc.b $12
+.dc.b $2A
+.dc.b $16
+.dc.b $1
+.dc.b $29
+.dc.b $2D
+.dc.b $2F
+.even
+.globl _puteq
+.text
+_puteq:
+~~puteq:
+~byte=R7
+link R14,#0
+movem.l R4-R7/R13-R13,-(sp)
+~i=R6
+~psg=R13
+~eqdata=R5
+*line 81
+move.b 9(R14),R7
+*line 81
+move.l #_io_tone,R13
+*line 83
+move.b #7,(R13)
+*line 84
+move.b #191,2(R13)
+*line 86
+move.b #15,(R13)
+*line 87
+move.b (R13),R5
+and.b #-29,R5
+or.b #20,R5
+*line 89
+clr R6
+bra L4
+L5:
+*line 90
+*line 91
+*line 92
+btst #0,R7
+beq L6
+*line 92
+or.b #8,R5
+*line 93
+bra L7
+L6:
+*line 94
+and.b #-9,R5
+L7:
+*line 95
+*line 96
+and.b #-17,R5
+*line 97
+*line 98
+move.b #15,(R13)
+*line 99
+move.b R5,2(R13)
+*line 100
+*line 101
+or.b #16,R5
+*line 102
+*line 103
+move.b #15,(R13)
+*line 104
+move.b R5,2(R13)
+*line 105
+*line 106
+asr.b #1,R7
+L3:
+*line 89
+add #1,R6
+L4:
+*line 89
+cmp #8,R6
+blt L5
+L2:
+*line 109
+and.b #-5,R5
+*line 111
+move.b #15,(R13)
+*line 112
+move.b R5,2(R13)
+*line 114
+or.b #4,R5
+*line 116
+move.b #15,(R13)
+*line 117
+move.b R5,2(R13)
+L1:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.globl _sendeq
+.text
+_sendeq:
+~~sendeq:
+~band=9
+~gain=11
+link R14,#-4
+*line 126
+move.b 9(R14),R0
+ext.w R0
+move R0,(sp) 
+jsr _puteq
+*line 127
+move.b 11(R14),R0
+ext.w R0
+move R0,(sp) 
+jsr _puteq
+L8:unlk R14
+rts
+.globl _gain2eq
+.text
+_gain2eq:
+~~gain2eq:
+~gain=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~eqdat=R7
+*line 136
+*line 137
+tst 8(R14)
+ble L10
+*line 137
+move.l #_eqgaint,R8
+move 8(R14),R9
+add.l R9,R8
+move.b (R8),R7
+or.b #64,R7
+*line 138
+bra L11
+L10:
+*line 139
+move 8(R14),R0
+neg R0
+ext.l R0
+add.l #_eqgaint,R0
+move.l R0,R8
+move.b (R8),R7
+L11:
+*line 141
+move.b R7,R0
+ext.w R0
+bra L9
+L9:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.data
Index: alcyon/putl.s
===================================================================
--- alcyon/putl.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/putl.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,64 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl _putl
+.text
+_putl:
+~~putl:
+~w=R7
+~stream=R13
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+*line 17
+move.l 8(R14),R7
+*line 17
+move.l 12(R14),R13
+*line 17
+*line 18
+move.l R13,(sp)
+move.l R7,R0
+move.l #$18,R1
+asr.l R1,R0
+move.l R0,-(sp)
+and.l #$ff,(sp)
+jsr _putc
+addq.l #4,sp
+tst R0
+blt L1
+*line 19
+*line 20
+*line 21
+move.l R13,(sp)
+move.l R7,R0
+move.l #$10,R1
+asr.l R1,R0
+move.l R0,-(sp)
+and.l #$ff,(sp)
+jsr _putc
+addq.l #4,sp
+tst R0
+blt L1
+*line 22
+*line 23
+*line 24
+move.l R13,(sp)
+move.l R7,R0
+asr.l #$8,R0
+move.l R0,-(sp)
+and.l #$ff,(sp)
+jsr _putc
+addq.l #4,sp
+tst R0
+blt L1
+*line 25
+*line 26
+move.l R13,(sp)
+move.l R7,-(sp)
+and.l #$ff,(sp)
+jsr _putc
+addq.l #4,sp
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/putw.s
===================================================================
--- alcyon/putw.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/putw.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,37 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl _putw
+.text
+_putw:
+~~putw:
+~w=R7
+~stream=10
+link R14,#0
+movem.l R6-R7,-(sp)
+*line 17
+move 8(R14),R7
+*line 17
+*line 18
+move.l 10(R14),(sp)
+clr R0
+move R7,R0
+lsr #8,R0
+move R0,-(sp)
+and #255,(sp)
+jsr _putc
+addq.l #2,sp
+tst R0
+blt L1
+*line 19
+*line 20
+move.l 10(R14),(sp)
+move R7,-(sp)
+and #255,(sp)
+jsr _putc
+addq.l #2,sp
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.data
Index: alcyon/rawio.s
===================================================================
--- alcyon/rawio.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/rawio.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,396 @@
+.globl _readln
+.text
+_readln:
+~~readln:
+~unit=8
+~nc=10
+~ctl=12
+~nb=16
+~buf=18
+link R14,#0
+movem.l R4-R7/R12-R13,-(sp)
+~cp=R13
+~i=R7
+~j=R6
+~bp=R12
+~c=R5
+*line 83
+*line 84
+cmp #1,8(R14)
+blt L10000
+cmp #4,8(R14)
+ble L2
+L10000:*line 84
+move.l #$fffffff1,R0
+bra L1
+*line 85
+L2:
+*line 86
+move.l 18(R14),R12
+*line 88
+clr R7
+bra L5
+L6:
+*line 89
+*line 90
+move 8(R14),(sp)
+move #2,-(sp)
+jsr _trap13
+addq.l #2,sp
+and.l #$ff,R0
+move.b R0,R5
+*line 91
+*line 92
+move.b R5,(R12)+
+*line 93
+clr.b (R12)
+*line 94
+*line 95
+move.l 12(R14),R13
+*line 96
+*line 97
+clr R6
+bra L9
+L10:
+*line 98
+*line 99
+move.b R5,R0
+ext.w R0
+move.l 12(R14),R9
+move.b (R9),R1
+ext.w R1
+cmp R1,R0
+move sr,R0
+add.l #1,12(R14)
+move R0,ccr
+bne L11
+*line 99
+move.b R5,R0
+ext.w R0
+bra L1
+*line 100
+L11:L8:
+*line 97
+add #1,R6
+L9:
+*line 97
+cmp 10(R14),R6
+blt L10
+L7:
+*line 101
+move.b R5,R0
+ext.w R0
+move R0,(sp) 
+move 8(R14),-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+L4:
+*line 88
+add #1,R7
+L5:
+*line 88
+cmp 16(R14),R7
+blt L6
+L3:
+*line 104
+move.l #$ffffffff,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R5-R7/R12-R13
+unlk R14
+rts
+.globl _getln
+.text
+_getln:
+~~getln:
+~unit=8
+~nb=10
+~buf=12
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~bp=R13
+~c=R7
+~bc=R6
+*line 119
+clr R6
+*line 120
+move.l 12(R14),R13
+*line 121
+clr.b (R13)
+*line 123
+bra L15
+L14:
+*line 124
+*line 125
+move 8(R14),(sp)
+move #2,-(sp)
+jsr _trap13
+addq.l #2,sp
+and.l #$ff,R0
+move.b R0,R7
+*line 126
+*line 127
+move.b R7,R0
+ext.w R0
+bra L17
+*line 128
+L18:
+*line 129
+L19:
+*line 130
+*line 131
+*line 132
+*line 132
+tst R6
+bne L20
+*line 133
+*line 134
+move #7,(sp)
+move 8(R14),-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+bra L16
+*line 135
+*line 136
+bra L21
+L20:
+*line 137
+*line 138
+*line 139
+sub #1,R6
+*line 140
+sub.l #1,R13
+*line 141
+clr.b (R13)
+*line 142
+move #8,(sp)
+move 8(R14),-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 143
+move #32,(sp)
+move 8(R14),-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 144
+move #8,(sp)
+move 8(R14),-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+bra L16
+*line 145
+L21:
+*line 146
+*line 147
+L22:
+*line 148
+L23:
+*line 149
+*line 150
+*line 151
+move.b R7,(R13)+
+*line 152
+clr.b (R13)
+*line 153
+move.b R7,R0
+ext.w R0
+bra L12
+*line 154
+*line 155
+*line 156
+L24:
+*line 157
+*line 158
+*line 159
+move.l 12(R14),R8
+clr.b (R8)
+*line 160
+move.b R7,R0
+ext.w R0
+bra L12
+*line 161
+L25:
+*line 162
+*line 163
+*line 164
+move.b R7,(R13)+
+*line 165
+clr.b (R13)
+*line 166
+move.b R7,R0
+ext.w R0
+move R0,(sp) 
+move 8(R14),-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 167
+add #1,R6
+bra L16
+L17:ext.l R0
+move.l #L26,R8
+move #5,R1
+L27:cmp.l (R8)+,R0
+dbeq R1,L27
+move.l 20(R8),R8
+jmp (R8)
+.data
+L26:.dc.l 8
+.dc.l 10
+.dc.l 13
+.dc.l 24
+.dc.l 127
+.dc.l 0
+.dc.l L18
+.dc.l L23
+.dc.l L22
+.dc.l L24
+.dc.l L19
+.dc.l L25
+.text
+L16:
+*line 168
+L15:
+*line 169
+cmp 10(R14),R6
+blt L14
+L13:
+*line 171
+move.l #$ffffffff,R0
+bra L12
+L12:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.globl _getrln
+.text
+_getrln:
+~~getrln:
+~unit=8
+~nb=10
+~buf=12
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~bp=R13
+~c=R7
+~bc=R6
+*line 186
+clr R6
+*line 187
+move.l 12(R14),R13
+*line 188
+clr.b (R13)
+*line 190
+bra L31
+L30:
+*line 191
+*line 192
+move 8(R14),(sp)
+move #2,-(sp)
+jsr _trap13
+addq.l #2,sp
+and.l #$ff,R0
+move.b R0,R7
+*line 193
+*line 194
+move.b R7,R0
+ext.w R0
+bra L33
+*line 195
+L34:
+*line 196
+L35:
+*line 197
+L36:
+*line 198
+*line 199
+*line 200
+move.b R7,(R13)+
+*line 201
+clr.b (R13)
+*line 202
+move.b R7,R0
+ext.w R0
+bra L28
+*line 203
+L37:
+*line 204
+*line 205
+*line 206
+move.l 12(R14),R8
+clr.b (R8)
+*line 207
+move.b R7,R0
+ext.w R0
+bra L28
+*line 208
+L38:
+*line 209
+*line 210
+*line 211
+move.b R7,(R13)+
+*line 212
+clr.b (R13)
+*line 213
+add #1,R6
+bra L32
+L33:cmp #10,R0
+beq L35
+cmp #13,R0
+beq L34
+cmp #24,R0
+beq L37
+cmp #26,R0
+beq L36
+bra L38
+L32:
+*line 214
+L31:
+*line 215
+cmp 10(R14),R6
+blt L30
+L29:
+*line 217
+move.l #$ffffffff,R0
+bra L28
+L28:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.globl _writeln
+.text
+_writeln:
+~~writeln:
+~unit=8
+~buf=10
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~bp=R13
+~c=R7
+*line 229
+move.l 10(R14),R13
+*line 231
+bra L42
+L41:
+*line 232
+move.b R7,R0
+ext.w R0
+move R0,(sp) 
+move 8(R14),-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+L42:
+*line 232
+move.b (R13)+,R7
+bne L41
+L40:L39:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/read.s
===================================================================
--- alcyon/read.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/read.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,284 @@
+.globl _chantab
+.globl _Wrkbuf
+.globl _errno
+.data
+L1:
+*line 56
+.dc.l __badfd
+*line 57
+.dc.l __filerd
+*line 59
+.dc.l __conin
+.text
+.globl _read
+.text
+_read:
+~~read:
+~fd=8
+~buff=10
+~len=14
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+~chp=R13
+*line 79
+*line 79
+tst 8(R14)
+blt L10000
+cmp #11,8(R14)
+ble L3
+L10000:*line 80
+*line 81
+move #9,_errno
+*line 82
+move #-1,R0
+bra L2
+*line 83
+*line 84
+L3:
+*line 85
+move 8(R14),R0
+muls #12,R0
+move.l R0,R13
+add.l #_chantab,R13
+*line 86
+move 14(R14),-(sp)
+move.l 10(R14),-(sp)
+move.l 8(R13),-(sp)
+move.b (R13),R0
+ext.w R0
+move R0,R8
+add.l R8,R8
+add.l R8,R8
+move.l #L1,R9
+move.l 0(R8,R9.l),R8
+jsr (R8)
+adda.l #10,sp
+bra L2
+L2:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl __getsec
+.text
+__getsec:
+~~_getsec:
+~fp=R13
+~buf=12
+~len=16
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+*line 105
+move.l 8(R14),R13
+*line 105
+*line 106
+move.l #_Wrkbuf,(sp)
+move.l R13,-(sp)
+jsr _ReadRN
+addq.l #4,sp
+move R0,_errno
+beq L5
+*line 106
+move #-1,R0
+bra L4
+*line 107
+L5:
+*line 108
+move 16(R14),(sp)
+clr R0
+move 38(R13),R0
+swap R0
+clr R0
+swap R0
+add.l #_Wrkbuf,R0
+move.l R0,-(sp)
+move.l 12(R14),-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 110
+*line 110
+clr R0
+move 38(R13),R0
+add 16(R14),R0
+and #511,R0
+move R0,38(R13)
+bne L6
+*line 111
+*line 112
+add.l #$1,40(R13)
+*line 113
+*line 114
+*line 115
+move.l R13,(sp)
+jsr __seek
+tst R0
+bge L7
+*line 115
+move #-1,R0
+bra L4
+L7:
+*line 116
+*line 117
+L6:
+*line 118
+clr R0
+bra L4
+L4:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl __filerd
+.text
+__filerd:
+~~_filerd:
+~fp=R13
+~buffer=12
+~len=16
+link R14,#0
+movem.l R2-R7/R13-R13,-(sp)
+~l=R7
+~j=R6
+~k=R5
+~curpos=R4
+~newpos=R3
+*line 141
+move.l 8(R14),R13
+*line 141
+clr R7
+*line 142
+clr.l R4
+move 38(R13),R4
+move.l 40(R13),R0
+move.l #$9,R1
+asl.l R1,R0
+add.l R0,R4
+*line 143
+move.l R4,R3
+clr.l R0
+move 16(R14),R0
+add.l R0,R3
+*line 151
+*line 151
+cmp.l 48(R13),R3
+ble L9
+*line 152
+*line 153
+move.l 48(R13),R0
+sub.l R4,R0
+move R0,16(R14)
+*line 154
+*line 158
+*line 159
+*line 160
+L9:
+*line 161
+*line 161
+tst 38(R13)
+beq L10
+*line 162
+*line 163
+*line 164
+move #512,R7
+sub 38(R13),R7
+clr R0
+move R7,R0
+cmp 16(R14),R0
+bls L11
+*line 164
+move 16(R14),R7
+*line 165
+L11:
+*line 166
+*line 167
+move R7,(sp)
+move.l 12(R14),-(sp)
+move.l R13,-(sp)
+jsr __getsec
+addq.l #8,sp
+tst R0
+beq L12
+*line 167
+clr R0
+move 16(R14),R0
+bra L8
+L12:
+*line 168
+*line 169
+L10:
+*line 170
+*line 171
+move 16(R14),R5
+sub R7,R5
+move #9,R0
+lsr R0,R5
+beq L13
+*line 171
+*line 172
+move R5,(sp)
+clr R0
+move R7,R0
+swap R0
+clr R0
+swap R0
+add.l 12(R14),R0
+move.l R0,-(sp)
+move.l R13,-(sp)
+jsr _blkrd
+addq.l #8,sp
+move R0,R6
+tst R6
+beq L14
+*line 172
+clr R0
+move R7,R0
+clr R1
+move R5,R1
+sub R6,R1
+move #9,R2
+lsl R2,R1
+add R1,R0
+bra L8
+*line 173
+L14:L13:
+*line 174
+clr R0
+move R5,R0
+move #9,R1
+lsl R1,R0
+add R0,R7
+*line 176
+*line 177
+cmp 16(R14),R7
+bcc L15
+*line 177
+*line 178
+move 16(R14),(sp)
+clr R0
+move R7,R0
+sub R0,(sp)
+clr R0
+move R7,R0
+swap R0
+clr R0
+swap R0
+add.l 12(R14),R0
+move.l R0,-(sp)
+move.l R13,-(sp)
+jsr __getsec
+addq.l #8,sp
+tst R0
+beq L16
+*line 178
+clr R0
+move R7,R0
+bra L8
+*line 179
+L16:L15:
+*line 180
+clr R0
+move 16(R14),R0
+bra L8
+L8:tst.l (sp)+
+movem.l (sp)+,R3-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/readrn.s
===================================================================
--- alcyon/readrn.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/readrn.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,72 @@
+.globl _errno
+.globl __berrno
+.globl _ReadRN
+.text
+_ReadRN:
+~~ReadRN:
+~fcp=8
+~buf=12
+link R14,#-10
+~sv=-2
+~brc=-6
+*line 53
+*line 54
+move.l 8(R14),(sp)
+jsr __seek
+move R0,-2(R14)
+beq L2
+*line 54
+*line 54
+tst -2(R14)
+bge L3
+*line 55
+*line 56
+move #5,_errno
+*line 57
+move #-1,R0
+bra L1
+*line 58
+bra L4
+L3:
+*line 59
+*line 60
+*line 61
+move #22,_errno
+*line 62
+move #1,R0
+bra L1
+L4:
+*line 63
+*line 64
+*line 69
+*line 70
+*line 71
+L2:
+*line 72
+*line 72
+move.l 8(R14),R8
+move.l 44(R8),R0
+move R0,(sp)
+move.l 12(R14),-(sp)
+jsr __secrd
+addq.l #4,sp
+move.l R0,-6(R14)
+beq L5
+*line 75
+*line 76
+*line 77
+move.l -6(R14),__berrno
+*line 78
+move #5,_errno
+*line 79
+move #-1,R0
+bra L1
+*line 80
+*line 81
+L5:
+*line 82
+clr R0
+bra L1
+L1:unlk R14
+rts
+.data
Index: alcyon/rename.s
===================================================================
--- alcyon/rename.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/rename.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,14 @@
+.globl _rename
+.text
+_rename:
+~~rename:
+~old=8
+~new=12
+link R14,#-64
+~buff=-60
+*line 13
+move #-1,R0
+bra L1
+L1:unlk R14
+rts
+.data
Index: alcyon/rindex.s
===================================================================
--- alcyon/rindex.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/rindex.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,45 @@
+.globl _rindex
+.text
+_rindex:
+~~rindex:
+~str=R13
+~c=13
+link R14,#0
+movem.l R7-R7/R12-R13,-(sp)
+~cp=R12
+*line 15
+move.l 8(R14),R13
+*line 15
+move.l R13,R12
+bra L4
+L5:L3:L4:
+*line 15
+tst.b (R12)+
+bne L5
+L2:
+*line 18
+bra L8
+L7:
+*line 19
+*line 20
+move.b -(R12),R0
+ext.w R0
+cmp.b 13(R14),R0
+bne L9
+*line 20
+move.l R12,R0
+bra L1
+*line 21
+L9:L8:
+*line 22
+cmp.l R13,R12
+bhi L7
+L6:
+*line 22
+clr.l R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R12-R13
+unlk R14
+rts
+.data
Index: alcyon/romp.s
===================================================================
--- alcyon/romp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/romp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,9449 @@
+.globl ___atab
+.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 _wzcrsh
+.globl _crshpc
+.globl _crshsp
+.globl _crshus
+.globl _crshst
+.globl _B_log_s
+.globl _B_dbg_s
+.globl _B_buf_a
+.globl __bpbin
+.globl _dfltpal
+.globl _crshsr
+.globl _crshrg
+.globl _crshvc
+.globl _hs_mtst
+.comm _hs_mtst,2
+.globl _cmtab
+.data
+_cmtab:
+*line 212
+.dc.l L1
+*line 212
+.dc.l _cp_null
+*line 212
+.dc.l _cx_adsp
+*line 212
+.dc.l L2
+*line 213
+.dc.l L3
+*line 213
+.dc.l _cp_boot
+*line 213
+.dc.l _cx_boot
+*line 213
+.dc.l L4
+*line 214
+.dc.l L5
+*line 214
+.dc.l _cp_null
+*line 214
+.dc.l _cx_bpb
+*line 214
+.dc.l L6
+*line 217
+.dc.l L7
+*line 217
+.dc.l _cp_chek
+*line 217
+.dc.l _cx_chek
+*line 217
+.dc.l L8
+*line 218
+.dc.l L9
+*line 218
+.dc.l _cp_copy
+*line 218
+.dc.l _cx_copy
+*line 218
+.dc.l L10
+*line 221
+.dc.l L11
+*line 221
+.dc.l _cp_null
+*line 221
+.dc.l _cx_crsh
+*line 221
+.dc.l L12
+*line 222
+.dc.l L13
+*line 222
+.dc.l _cp_null
+*line 222
+.dc.l _cx_dini
+*line 222
+.dc.l L14
+*line 225
+.dc.l L15
+*line 225
+.dc.l _cp_dump
+*line 225
+.dc.l _cx_dump
+*line 225
+.dc.l L16
+*line 226
+.dc.l L17
+*line 226
+.dc.l _cp_null
+*line 226
+.dc.l _cx_exit
+*line 226
+.dc.l L18
+*line 227
+.dc.l L19
+*line 227
+.dc.l _cp_fill
+*line 227
+.dc.l _cx_fill
+*line 227
+.dc.l L20
+*line 228
+.dc.l L21
+*line 228
+.dc.l _cp_go
+*line 228
+.dc.l _cx_go
+*line 228
+.dc.l L22
+*line 229
+.dc.l L23
+*line 229
+.dc.l _cp_null
+*line 229
+.dc.l _cx_help
+*line 229
+.dc.l L24
+*line 230
+.dc.l L25
+*line 230
+.dc.l _cp_ilev
+*line 230
+.dc.l _cx_ilev
+*line 230
+.dc.l L26
+*line 231
+.dc.l L27
+*line 231
+.dc.l _cp_ldmp
+*line 231
+.dc.l _cx_ldmp
+*line 231
+.dc.l L28
+*line 232
+.dc.l L29
+*line 232
+.dc.l _cp_null
+*line 232
+.dc.l _cx_load
+*line 232
+.dc.l L30
+*line 235
+.dc.l L31
+*line 235
+.dc.l _cp_null
+*line 235
+.dc.l _cx_mlod
+*line 235
+.dc.l L32
+*line 238
+.dc.l L33
+*line 238
+.dc.l _cp_monc
+*line 238
+.dc.l _cx_mon
+*line 238
+.dc.l L34
+*line 239
+.dc.l L35
+*line 239
+.dc.l _cp_mons
+*line 239
+.dc.l _cx_mon
+*line 239
+.dc.l L36
+*line 240
+.dc.l L37
+*line 240
+.dc.l _cp_monl
+*line 240
+.dc.l _cx_mon
+*line 240
+.dc.l L38
+*line 241
+.dc.l L39
+*line 241
+.dc.l _cp_mset
+*line 241
+.dc.l _cx_mset
+*line 241
+.dc.l L40
+*line 242
+.dc.l L41
+*line 242
+.dc.l _cp_mtst
+*line 242
+.dc.l _cx_mtst
+*line 242
+.dc.l _hs_mtst
+*line 243
+.dc.l L42
+*line 243
+.dc.l _cp_null
+*line 243
+.dc.l _cx_next
+*line 243
+.dc.l L43
+*line 244
+.dc.l L44
+*line 244
+.dc.l _cp_null
+*line 244
+.dc.l _cx_omap
+*line 244
+.dc.l L45
+*line 247
+.dc.l L46
+*line 247
+.dc.l _cp_read
+*line 247
+.dc.l _cx_read
+*line 247
+.dc.l L47
+*line 250
+.dc.l L48
+*line 250
+.dc.l _cp_null
+*line 250
+.dc.l _cx_regs
+*line 250
+.dc.l L49
+*line 251
+.dc.l L50
+*line 251
+.dc.l _cp_null
+*line 251
+.dc.l _cx_rest
+*line 251
+.dc.l L51
+*line 252
+.dc.l L52
+*line 252
+.dc.l _cp_rset
+*line 252
+.dc.l _cx_rset
+*line 252
+.dc.l L53
+*line 253
+.dc.l L54
+*line 253
+.dc.l _cp_null
+*line 253
+.dc.l _cx_vreg
+*line 253
+.dc.l L55
+*line 254
+.dc.l L56
+*line 254
+.dc.l _cp_vrst
+*line 254
+.dc.l _cx_vrst
+*line 254
+.dc.l L57
+*line 255
+.dc.l L58
+*line 255
+.dc.l _cp_wdmp
+*line 255
+.dc.l _cx_wdmp
+*line 255
+.dc.l L59
+*line 256
+.dc.l L60
+*line 256
+.dc.l _cp_wfil
+*line 256
+.dc.l _cx_wfil
+*line 256
+.dc.l L61
+*line 259
+.dc.l L62
+*line 259
+.dc.l _cp_read
+*line 259
+.dc.l _cx_writ
+*line 259
+.dc.l L63
+*line 262
+.dc.l L64
+*line 262
+.dc.l _cp_wset
+*line 262
+.dc.l _cx_wset
+*line 262
+.dc.l L65
+*line 263
+.dc.l L66
+*line 263
+.dc.l _cp_null
+*line 263
+.dc.l _cx_zap
+*line 263
+.dc.l L67
+.globl _ahex
+.data
+_ahex:
+.dc.b $30,$31,$32,$33,$34,$35,$36,$37,$38,$39,$61,$62,$63,$64,$65,$66,$41,$42,$43,$44,$45,$46,$0
+.even
+.globl _rlist
+.data
+_rlist:
+*line 275
+.dc.l L69
+*line 275
+.dc.l L70
+*line 275
+.dc.l L71
+*line 275
+.dc.l L72
+*line 275
+.dc.l L73
+*line 275
+.dc.l L74
+*line 275
+.dc.l L75
+*line 275
+.dc.l L76
+*line 276
+.dc.l L77
+*line 276
+.dc.l L78
+*line 276
+.dc.l L79
+*line 276
+.dc.l L80
+*line 276
+.dc.l L81
+*line 276
+.dc.l L82
+*line 276
+.dc.l L83
+*line 276
+.dc.l L84
+*line 277
+.dc.l L85
+*line 277
+.dc.l L86
+*line 277
+.dc.l L87
+.dc.l $0
+.globl _vrlist
+.data
+_vrlist:
+*line 283
+.dc.l L88
+*line 283
+.dc.l L89
+*line 283
+.dc.l L90
+*line 283
+.dc.l L91
+*line 283
+.dc.l L92
+*line 283
+.dc.l L93
+*line 283
+.dc.l L94
+*line 283
+.dc.l L95
+*line 284
+.dc.l L96
+*line 284
+.dc.l L97
+*line 284
+.dc.l L98
+*line 284
+.dc.l L99
+*line 284
+.dc.l L100
+*line 284
+.dc.l L101
+*line 284
+.dc.l L102
+*line 284
+.dc.l L103
+*line 285
+.dc.l L104
+*line 285
+.dc.l L105
+*line 285
+.dc.l L106
+*line 285
+.dc.l L107
+*line 285
+.dc.l L108
+*line 285
+.dc.l L109
+*line 285
+.dc.l L110
+*line 285
+.dc.l L111
+.dc.l $0
+.globl _sigadr
+.data
+_sigadr:
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $2
+.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 $3
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $7
+.dc.w $7
+.dc.w $7
+.dc.w $7
+.dc.w $7
+.dc.w $8
+.dc.w $8
+.dc.w $8
+.dc.w $8
+.dc.w $8
+.dc.w $9
+.dc.w $9
+.dc.w $9
+.dc.w $9
+.dc.w $C
+.dc.w $C
+.dc.w $C
+.dc.w $C
+.dc.w $C
+.dc.w $D
+.dc.w $D
+.dc.w $D
+.dc.w $D
+.dc.w $D
+.dc.w $E
+.dc.w $E
+.dc.w $E
+.dc.w $E
+.dc.w $11
+.dc.w $11
+.dc.w $14
+.dc.w $14
+.dc.w $17
+.dc.w $17
+.dc.w $1A
+.dc.w $1D
+.dc.w $1D
+.dc.w $1D
+.dc.w $1D
+.dc.w $1D
+.dc.w $1E
+.dc.w $1E
+.dc.w $1E
+.dc.w $1E
+.dc.w $1E
+.dc.w $20
+.dc.w $20
+.dc.w $20
+.dc.w $23
+.dc.w $23
+.dc.w $23
+.dc.w $23
+.dc.w $25
+.dc.w $25
+.dc.w $27
+.dc.w $27
+.dc.w $27
+.dc.w $27
+.globl _argsep
+.comm _argsep,2
+.globl _aptr
+.comm _aptr,4
+.globl _monptr
+.comm _monptr,4
+.globl _d_cur
+.comm _d_cur,4
+.globl _d_next
+.comm _d_next,4
+.globl _d_last
+.comm _d_last,4
+.globl _p_end
+.comm _p_end,4
+.globl _p_from
+.comm _p_from,4
+.globl _p_goto
+.comm _p_goto,4
+.globl _p_to
+.comm _p_to,4
+.globl _sptr
+.comm _sptr,4
+.globl _argln
+.comm _argln,2
+.globl _b0flag
+.comm _b0flag,2
+.globl _b1flag
+.comm _b1flag,2
+.globl _cmdunit
+.comm _cmdunit,2
+.globl _dflag
+.comm _dflag,2
+.globl _exflag
+.comm _exflag,2
+.globl _first1
+.comm _first1,2
+.globl _goflag
+.comm _goflag,2
+.globl _ilast
+.comm _ilast,2
+.globl _inext
+.comm _inext,2
+.globl _iplev
+.comm _iplev,2
+.globl _monsw
+.comm _monsw,2
+.globl _redo
+.comm _redo,2
+.globl _rnum
+.comm _rnum,2
+.globl _vrnum
+.comm _vrnum,2
+.globl _asig
+.comm _asig,2
+.globl _aval
+.comm _aval,2
+.globl _astat
+.comm _astat,2
+.globl _aflag
+.comm _aflag,2
+.globl _baseled
+.comm _baseled,2
+.globl _ledcntr
+.comm _ledcntr,2
+.globl _sigtab
+.comm _sigtab,512
+.globl _afi
+.comm _afi,4
+.globl _ftimer
+.comm _ftimer,4
+.globl _baron
+.comm _baron,2
+.globl _baroff
+.comm _baroff,2
+.globl _swon
+.comm _swon,2
+.globl _swoff
+.comm _swoff,2
+.globl _obj0
+.comm _obj0,4
+.globl _tba0
+.comm _tba0,4
+.globl _tba1
+.comm _tba1,4
+.globl _p_bv0
+.comm _p_bv0,2
+.globl _p_bv1
+.comm _p_bv1,2
+.globl _p_ba0
+.comm _p_ba0,4
+.globl _p_ba1
+.comm _p_ba1,4
+.globl _restart
+.comm _restart,60
+.globl _p_len
+.comm _p_len,4
+.globl _p_value
+.comm _p_value,4
+.globl _p_width
+.comm _p_width,4
+.globl _regptr
+.comm _regptr,4
+.globl _argstr
+.comm _argstr,82
+.globl _cmdline
+.comm _cmdline,130
+.globl _bfname
+.comm _bfname,14
+.globl _hs_mtst
+.comm _hs_mtst,82
+.globl _idbuf
+.comm _idbuf,92
+.globl _promdate
+.comm _promdate,16
+.globl _cx_exit
+.text
+_cx_exit:
+~~cx_exit:
+link R14,#-4
+*line 408
+move #1,(sp)
+move.l #_restart,-(sp)
+jsr _longjmp
+addq.l #4,sp
+L112:unlk R14
+rts
+.globl _cx_rest
+.text
+_cx_rest:
+~~cx_rest:
+link R14,#-4
+*line 420
+move.l #$100000,(sp)
+jsr _rjumpto
+L113:unlk R14
+rts
+.globl _cx_mlod
+.text
+_cx_mlod:
+~~cx_mlod:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 434
+move #1,_B_log_s
+*line 435
+clr _B_dbg_s
+*line 436
+clr _redo
+*line 438
+jsr _hdvini
+*line 439
+clr __bpbin
+*line 441
+*line 441
+clr.l (sp)
+move.l #L115,-(sp)
+jsr _booter
+addq.l #4,sp
+tst R0
+beq L116
+*line 442
+*line 443
+clr R0
+bra L114
+*line 444
+bra L117
+L116:
+*line 445
+*line 446
+*line 447
+clr R7
+bra L120
+L121:
+*line 448
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l _regptr,R8
+move.l #$0,(R8)
+L119:
+*line 447
+add #1,R7
+L120:
+*line 447
+cmp #8,R7
+blt L121
+L118:
+*line 448
+*line 449
+*line 450
+clr R7
+bra L124
+L125:
+*line 451
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l _regptr,R8
+move.l #$0,32(R8)
+L123:
+*line 450
+add #1,R7
+L124:
+*line 450
+cmp #7,R7
+blt L125
+L122:
+*line 451
+*line 452
+*line 453
+move.l _regptr,R8
+move.l #$ffffe,60(R8)
+*line 454
+*line 455
+move.l _regptr,R8
+move #8704,66(R8)
+*line 456
+move.l _regptr,R8
+move.l _B_buf_a,68(R8)
+*line 457
+*line 458
+move #1,R0
+bra L114
+L117:L114:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _cp_boot
+.text
+_cp_boot:
+~~cp_boot:
+link R14,#0
+movem.l R5-R7,-(sp)
+~i=R7
+~endc=R6
+*line 477
+clr _redo
+L129:
+*line 479
+*line 480
+*line 481
+move.l #L130,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 482
+move.l #_bfname,(sp)
+move #14,-(sp)
+move _cmdunit,-(sp)
+jsr _getln
+addq.l #4,sp
+move.b R0,R6
+*line 483
+move.l #L131,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 484
+*line 485
+*line 486
+cmp.b #13,R6
+beq L127
+*line 487
+*line 488
+*line 488
+cmp.b #24,R6
+bne L132
+*line 489
+*line 490
+move.l #L133,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 491
+clr R0
+bra L126
+*line 492
+*line 493
+L132:
+*line 494
+*line 495
+cmp.b #$ffffffff,R6
+bne L134
+*line 495
+move.l #L135,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+L134:L128:bra L129
+L127:
+*line 498
+clr R7
+bra L138
+L139:
+*line 499
+*line 500
+move R7,R8
+add.l #_bfname,R8
+cmp.b #13,(R8)
+bne L140
+*line 500
+move R7,R8
+add.l #_bfname,R8
+clr.b (R8)
+*line 501
+L140:L137:
+*line 498
+add #1,R7
+L138:
+*line 498
+cmp #14,R7
+blt L139
+L136:
+*line 502
+move #1,R0
+bra L126
+L126:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _cx_boot
+.text
+_cx_boot:
+~~cx_boot:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 519
+move #1,_B_log_s
+*line 520
+clr _B_dbg_s
+*line 522
+jsr _hdvini
+*line 523
+clr __bpbin
+*line 525
+*line 525
+clr.l (sp)
+move.l #_bfname,-(sp)
+jsr _booter
+addq.l #4,sp
+tst R0
+beq L142
+*line 526
+*line 527
+clr R0
+bra L141
+*line 528
+bra L143
+L142:
+*line 529
+*line 530
+*line 531
+clr R7
+bra L146
+L147:
+*line 532
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l _regptr,R8
+move.l #$0,(R8)
+L145:
+*line 531
+add #1,R7
+L146:
+*line 531
+cmp #8,R7
+blt L147
+L144:
+*line 532
+*line 533
+*line 534
+clr R7
+bra L150
+L151:
+*line 535
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l _regptr,R8
+move.l #$0,32(R8)
+L149:
+*line 534
+add #1,R7
+L150:
+*line 534
+cmp #7,R7
+blt L151
+L148:
+*line 535
+*line 536
+*line 537
+move.l _regptr,R8
+move.l #$ffffe,60(R8)
+*line 538
+*line 539
+move.l _regptr,R8
+move #8704,66(R8)
+*line 540
+move.l _regptr,R8
+move.l _B_buf_a,68(R8)
+*line 541
+*line 542
+move #1,R0
+bra L141
+L143:L141:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _dobar
+.text
+_dobar:
+~~dobar:
+~nb=R7
+~bv=R6
+link R14,#0
+movem.l R4-R7/R13-R13,-(sp)
+~bp=R13
+~i=R5
+*line 561
+move 8(R14),R7
+*line 561
+move 10(R14),R6
+*line 561
+*line 562
+cmp #1,R7
+blt L152
+cmp #82,R7
+bgt L152
+*line 563
+*line 564
+sub #1,R7
+*line 565
+move R7,R0
+move R7,R9
+add.l R9,R9
+add.l #_sigadr,R9
+move (R9),R1
+add R1,R0
+add #4,R0
+ext.l R0
+asl.l #1,R0
+move.l R0,R13
+add.l _obj0,R13
+add.l #$2800,R13
+*line 567
+move #127,R5
+bra L155
+L156:
+*line 568
+*line 569
+*line 569
+cmp R6,R5
+ble L157
+*line 570
+*line 571
+move _baroff,(R13)
+*line 572
+add.l #$100,R13
+*line 573
+move _baroff,(R13)
+*line 574
+bra L158
+L157:
+*line 575
+*line 576
+*line 577
+move _baron,(R13)
+*line 578
+add.l #$100,R13
+*line 579
+move _baron,(R13)
+L158:
+*line 580
+*line 581
+*line 582
+add.l #$100,R13
+L154:
+*line 567
+sub #1,R5
+L155:
+*line 567
+tst R5
+bge L156
+L153:L152:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.globl _dosw
+.text
+_dosw:
+~~dosw:
+~nb=R7
+~sv=R6
+link R14,#0
+movem.l R3-R7/R13-R13,-(sp)
+~bp=R13
+~i=R5
+~j=R4
+*line 601
+move 8(R14),R7
+*line 601
+move 10(R14),R6
+*line 601
+*line 602
+cmp #1,R7
+blt L159
+cmp #82,R7
+bgt L159
+*line 603
+*line 604
+sub #1,R7
+*line 605
+move R7,R0
+move R7,R9
+add.l R9,R9
+add.l #_sigadr,R9
+move (R9),R1
+add R1,R0
+add #4,R0
+ext.l R0
+asl.l #1,R0
+move.l R0,R13
+add.l _obj0,R13
+add.l #$12c00,R13
+*line 607
+*line 608
+tst R6
+beq L160
+*line 608
+move _swon,R4
+*line 609
+bra L161
+L160:
+*line 610
+move _swoff,R4
+L161:
+*line 612
+clr R5
+bra L164
+L165:
+*line 613
+*line 614
+move R4,(R13)
+*line 615
+add.l #$100,R13
+L163:
+*line 612
+add #1,R5
+L164:
+*line 612
+cmp #8,R5
+blt L165
+L162:L159:tst.l (sp)+
+movem.l (sp)+,R4-R7/R13-R13
+unlk R14
+rts
+.globl _exp_c
+.text
+_exp_c:
+~~exp_c:
+~c=8
+link R14,#-4
+*line 632
+and #15,8(R14)
+*line 633
+clr R0
+move 8(R14),R0
+lsl #4,R0
+or R0,8(R14)
+*line 634
+clr R0
+move 8(R14),R0
+lsl #8,R0
+or R0,8(R14)
+*line 636
+clr R0
+move 8(R14),R0
+bra L166
+L166:unlk R14
+rts
+.globl _cx_adsp
+.text
+_cx_adsp:
+~~cx_adsp:
+link R14,#-8
+movem.l R2-R7/R13-R13,-(sp)
+~xasig=R7
+~xastat=R6
+~xaval=R5
+~xafi=R4
+~lc=R3
+~bp=R13
+~i=-2
+~j=-4
+~k=-6
+~oldi=-8
+*line 657
+move #256,(sp)
+clr -(sp)
+move.l #_sigtab,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 659
+jsr _VHinit
+*line 660
+jsr _VSinit
+*line 661
+move.l #_dfltpal,(sp)
+jsr _vsndpal
+*line 663
+move.l #$200400,_obj0
+*line 665
+move #-1,(sp)
+move #1540,-(sp)
+clr -(sp)
+clr -(sp)
+move #350,-(sp)
+move #512,-(sp)
+move.l _obj0,-(sp)
+clr -(sp)
+clr -(sp)
+clr -(sp)
+jsr _SetObj
+adda.l #20,sp
+*line 667
+move.l _obj0,R13
+*line 669
+clr.l R3
+bra L170
+L171:
+*line 670
+clr (R13)+
+L169:
+*line 669
+add.l #$1,R3
+L170:
+*line 669
+cmp.l #$af00,R3
+blt L171
+L168:
+*line 672
+move #15,(sp)
+jsr _exp_c
+and #4095,R0
+move R0,_baron
+*line 673
+move #1,(sp)
+jsr _exp_c
+and #4095,R0
+move R0,_baroff
+*line 674
+move #13,(sp)
+jsr _exp_c
+and #4095,R0
+move R0,_swon
+*line 675
+move #1,(sp)
+jsr _exp_c
+and #4095,R0
+move R0,_swoff
+*line 677
+move #7,(sp)
+clr -(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 679
+move #1,-2(R14)
+bra L174
+L175:
+*line 680
+*line 681
+clr (sp)
+move -2(R14),-(sp)
+jsr _dobar
+addq.l #2,sp
+*line 682
+clr (sp)
+move -2(R14),-(sp)
+jsr _dosw
+addq.l #2,sp
+L173:
+*line 679
+add #1,-2(R14)
+L174:
+*line 679
+cmp #83,-2(R14)
+blt L175
+L172:
+*line 685
+move #2,(sp)
+jsr _setipl
+move R0,-8(R14)
+*line 690
+bra L178
+L177:
+*line 691
+*line 692
+*line 692
+move #8,(sp)
+jsr _trap14
+move.l R0,R4
+cmp.l #$ffffffff,R4
+beq L179
+*line 693
+*line 694
+move.l R4,R0
+asr.l #$8,R0
+and.l #$7f,R0
+move R0,R7
+*line 695
+move.l R4,R0
+asr.l #$7,R0
+and.l #$1,R0
+move R0,R6
+*line 696
+move.l R4,R0
+and.l #$7f,R0
+move R0,R5
+*line 697
+*line 698
+*line 698
+tst R7
+beq L180
+*line 699
+*line 700
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_sigtab,R8
+move R5,(R8)
+*line 701
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_sigtab,R8
+move R6,2(R8)
+*line 702
+*line 703
+*line 703
+cmp #83,R7
+bge L181
+*line 704
+*line 705
+move R5,(sp)
+move R7,-(sp)
+jsr _dobar
+addq.l #2,sp
+*line 706
+move R6,(sp)
+move R7,-(sp)
+jsr _dosw
+addq.l #2,sp
+*line 707
+*line 708
+L181:bra L182
+L180:
+*line 709
+*line 710
+*line 711
+clr -2(R14)
+bra L185
+L186:
+*line 712
+move -2(R14),R8
+add.l R8,R8
+add.l R8,R8
+add.l #_sigtab,R8
+clr 2(R8)
+L184:
+*line 711
+add #1,-2(R14)
+L185:
+*line 711
+cmp #83,-2(R14)
+blt L186
+L183:
+*line 712
+L182:
+*line 713
+*line 714
+L179:L178:
+*line 715
+move #2,(sp)
+move #1,-(sp)
+jsr _trap13
+addq.l #2,sp
+tst.l R0
+beq L177
+L176:
+*line 720
+move #2,(sp)
+move #2,-(sp)
+jsr _trap13
+addq.l #2,sp
+*line 722
+move #1,-4(R14)
+bra L189
+L190:
+*line 723
+*line 724
+move -4(R14),R8
+add.l R8,R8
+add.l R8,R8
+move.l #_sigtab,R9
+move 0(R8,R9.l),(sp)
+move -4(R14),-(sp)
+jsr _dobar
+addq.l #2,sp
+*line 725
+move -4(R14),R8
+add.l R8,R8
+add.l R8,R8
+move.l #_sigtab,R9
+move 2(R8,R9.l),(sp)
+move -4(R14),-(sp)
+jsr _dosw
+addq.l #2,sp
+L188:
+*line 722
+add #1,-4(R14)
+L189:
+*line 722
+cmp #83,-4(R14)
+blt L190
+L187:
+*line 728
+clr -6(R14)
+*line 730
+move.l #L191,(sp)
+jsr _printf
+*line 731
+move.l #L192,(sp)
+jsr _printf
+*line 732
+move.l #L193,(sp)
+jsr _printf
+*line 734
+clr -2(R14)
+bra L196
+L197:
+*line 735
+*line 736
+move -6(R14),R0
+ext.l R0
+divs #10,R0
+move R0,(sp)
+move.l #L198,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 737
+*line 738
+clr -4(R14)
+bra L201
+L202:
+*line 739
+*line 740
+*line 741
+tst -6(R14)
+beq L203
+*line 741
+move -6(R14),R8
+add.l R8,R8
+add.l R8,R8
+move.l #_sigtab,R9
+move 0(R8,R9.l),(sp)
+move -6(R14),R8
+add.l R8,R8
+add.l R8,R8
+move.l #_sigtab,R9
+move 2(R8,R9.l),-(sp)
+move.l #L204,-(sp)
+jsr _printf
+addq.l #6,sp
+*line 742
+bra L205
+L203:
+*line 743
+move.l #L206,(sp)
+jsr _printf
+L205:
+*line 744
+*line 745
+*line 746
+add #1,-6(R14)
+move -6(R14),R0
+cmp #83,R0
+beq L207
+L200:
+*line 738
+add #1,-4(R14)
+L201:
+*line 738
+cmp #10,-4(R14)
+blt L202
+L199:
+*line 747
+*line 748
+*line 749
+move.l #L208,(sp)
+jsr _printf
+L195:
+*line 734
+add #1,-2(R14)
+L196:
+*line 734
+cmp #9,-2(R14)
+blt L197
+L194:L207:
+*line 752
+*line 753
+*line 754
+*line 755
+*line 756
+move 304+_sigtab,(sp)
+move 300+_sigtab,-(sp)
+move 296+_sigtab,-(sp)
+move 292+_sigtab,-(sp)
+move.l #L209,-(sp)
+jsr _printf
+adda.l #10,sp
+*line 758
+*line 759
+*line 760
+move 236+_sigtab,(sp)
+move 232+_sigtab,-(sp)
+move 228+_sigtab,-(sp)
+move.l #L210,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 762
+*line 763
+move 216+_sigtab,(sp)
+move 212+_sigtab,-(sp)
+move.l #L211,-(sp)
+jsr _printf
+addq.l #6,sp
+*line 765
+*line 766
+move 224+_sigtab,(sp)
+move 220+_sigtab,-(sp)
+move.l #L212,-(sp)
+jsr _printf
+addq.l #6,sp
+*line 768
+move -8(R14),(sp)
+jsr _setipl
+*line 769
+move #1,R0
+bra L167
+L167:tst.l (sp)+
+movem.l (sp)+,R3-R7/R13-R13
+unlk R14
+rts
+.globl _waitcr
+.text
+_waitcr:
+~~waitcr:
+link R14,#-6
+~c=-2
+*line 788
+move #7,(sp)
+move #2,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 790
+bra L216
+L215:
+*line 791
+*line 792
+*line 793
+cmp.b #7,-2(R14)
+bne L217
+*line 793
+move #1,R0
+bra L213
+L217:L216:
+*line 794
+move #2,(sp)
+move #2,-(sp)
+jsr _trap13
+addq.l #2,sp
+and.l #$7f,R0
+move.b R0,-2(R14)
+cmp #13,R0
+bne L215
+L214:
+*line 796
+clr R0
+bra L213
+L213:unlk R14
+rts
+.globl _xdtoi
+.text
+_xdtoi:
+~~xdtoi:
+~c=R7
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~i=R6
+~ap=R13
+*line 813
+move.l #_ahex,R13
+*line 815
+move 8(R14),R7
+*line 815
+clr R6
+bra L221
+L222:
+*line 816
+*line 817
+move.b (R13)+,R0
+ext.w R0
+cmp R0,R7
+bne L223
+*line 817
+*line 818
+cmp #15,R6
+ble L224
+*line 818
+move R6,R0
+sub #6,R0
+bra L218
+*line 819
+bra L225
+L224:
+*line 820
+move R6,R0
+bra L218
+L225:
+*line 821
+L223:L220:
+*line 815
+add #1,R6
+L221:
+*line 815
+cmp #22,R6
+blt L222
+L219:
+*line 822
+move #-1,R0
+bra L218
+L218:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.globl _getcmd
+.text
+_getcmd:
+~~getcmd:
+link R14,#0
+movem.l R6-R7,-(sp)
+~c=R7
+*line 839
+move.l #_cmdline,_sptr
+*line 840
+clr _argln
+*line 841
+move.l #_argstr,_aptr
+*line 842
+move #81,(sp)
+clr -(sp)
+move.l #_argstr,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 844
+L229:
+*line 845
+*line 846
+move.l _sptr,R8
+move.b (R8),R0
+ext.w R0
+move R0,R7
+and #255,R7
+move R7,R0
+bra L231
+*line 847
+L232:
+*line 848
+L233:
+*line 849
+L234:
+*line 850
+*line 851
+*line 852
+move.b R7,_argsep
+*line 853
+move _argln,R0
+bra L226
+*line 854
+L235:
+*line 855
+*line 856
+*line 857
+add.l #1,_sptr
+*line 858
+*line 859
+bra L238
+L237:
+*line 860
+add.l #1,_sptr
+L238:
+*line 860
+move.l _sptr,R8
+cmp.b #32,(R8)
+beq L237
+L236:
+*line 861
+*line 862
+*line 863
+move.l _sptr,R8
+cmp.b #13,(R8)
+beq L10000
+move.l _sptr,R8
+cmp.b #10,(R8)
+beq L10000
+move.l _sptr,R8
+tst.b (R8)
+bne L239
+L10000:*line 863
+move.l _sptr,R8
+move.b (R8),R0
+ext.w R0
+move R0,R7
+and #255,R7
+*line 864
+L239:
+*line 865
+move.b R7,_argsep
+*line 866
+move _argln,R0
+bra L226
+*line 867
+*line 868
+*line 869
+*line 870
+L240:
+*line 871
+*line 872
+*line 873
+*line 874
+move R7,R8
+add.l #___atab,R8
+btst #3,(R8)
+beq L241
+*line 874
+add #32,R7
+*line 875
+L241:
+*line 876
+move R7,R0
+move.l _aptr,R9
+move.b R0,(R9)
+add.l #1,_aptr
+*line 877
+add.l #1,_sptr
+*line 878
+add #1,_argln
+bra L230
+L231:tst R0
+beq L232
+cmp #10,R0
+beq L234
+cmp #13,R0
+beq L233
+cmp #32,R0
+beq L235
+bra L240
+L230:
+*line 879
+*line 880
+L228:
+*line 881
+move.l _sptr,R8
+tst.b (R8)
+bne L229
+L227:
+*line 883
+clr.b _argsep
+*line 884
+move _argln,R0
+bra L226
+L226:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _getarg
+.text
+_getarg:
+~~getarg:
+link R14,#0
+movem.l R6-R7,-(sp)
+~c=R7
+*line 901
+clr _argln
+*line 902
+move.l #_argstr,_aptr
+*line 903
+move #81,(sp)
+clr -(sp)
+move.l #_argstr,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 905
+L245:
+*line 906
+*line 907
+move.l _sptr,R8
+move.b (R8),R0
+ext.w R0
+move R0,R7
+and #255,R7
+move R7,R0
+bra L247
+*line 908
+L248:
+*line 909
+L249:
+*line 910
+L250:
+*line 911
+*line 912
+*line 913
+move.b R7,_argsep
+*line 914
+move _argln,R0
+bra L242
+*line 915
+L251:
+*line 916
+*line 917
+*line 918
+add.l #1,_sptr
+*line 919
+*line 920
+bra L254
+L253:
+*line 921
+add.l #1,_sptr
+L254:
+*line 921
+move.l _sptr,R8
+cmp.b #32,(R8)
+beq L253
+L252:
+*line 922
+*line 923
+*line 924
+move.l _sptr,R8
+cmp.b #13,(R8)
+beq L10001
+move.l _sptr,R8
+cmp.b #10,(R8)
+beq L10001
+move.l _sptr,R8
+tst.b (R8)
+bne L255
+L10001:*line 924
+move.l _sptr,R8
+move.b (R8),R0
+ext.w R0
+move R0,R7
+and #255,R7
+*line 925
+L255:
+*line 926
+move.b R7,_argsep
+*line 927
+move _argln,R0
+bra L242
+*line 928
+L256:
+*line 929
+*line 930
+*line 931
+add.l #1,_sptr
+*line 932
+move.b R7,_argsep
+*line 933
+move _argln,R0
+bra L242
+*line 934
+*line 935
+*line 936
+*line 937
+L257:
+*line 938
+*line 939
+*line 940
+move R7,R0
+move.l _aptr,R9
+move.b R0,(R9)
+add.l #1,_aptr
+*line 941
+add.l #1,_sptr
+*line 942
+add #1,_argln
+bra L246
+L247:ext.l R0
+move.l #L258,R8
+move #5,R1
+L259:cmp.l (R8)+,R0
+dbeq R1,L259
+move.l 20(R8),R8
+jmp (R8)
+.data
+L258:.dc.l 0
+.dc.l 10
+.dc.l 13
+.dc.l 32
+.dc.l 44
+.dc.l 0
+.dc.l L248
+.dc.l L250
+.dc.l L249
+.dc.l L251
+.dc.l L256
+.dc.l L257
+.text
+L246:
+*line 943
+*line 944
+L244:
+*line 945
+move.l _sptr,R8
+tst.b (R8)
+bne L245
+L243:
+*line 947
+clr.b _argsep
+*line 948
+move _argln,R0
+bra L242
+L242:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _getlong
+.text
+_getlong:
+~~getlong:
+~var=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~temp=R7
+*line 964
+clr.l R7
+~csw=R6
+*line 965
+clr R6
+~c=R5
+*line 968
+*line 968
+move.l _aptr,R8
+cmp.b #36,(R8)
+bne L261
+*line 969
+*line 970
+add.l #1,_aptr
+*line 971
+*line 972
+bra L264
+L263:
+*line 973
+*line 974
+move R5,(sp)
+jsr _xdtoi
+ext.l R0
+move.l R7,R1
+asl.l #$4,R1
+add.l R1,R0
+move.l R0,R7
+*line 975
+move #1,R6
+L264:
+*line 976
+move.l _aptr,R8
+move.b (R8),R0
+ext.w R0
+move R0,R5
+move.l #___atab,R8
+move.b 0(R8,R5),R0
+ext.w R0
+and #128,R0
+add.l #1,_aptr
+tst R0
+bne L263
+L262:
+*line 977
+bra L265
+L261:
+*line 978
+*line 979
+*line 980
+bra L268
+L267:
+*line 981
+*line 982
+move.l #$a,-(sp)
+move.l R7,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,R7
+move R5,R0
+add #-48,R0
+ext.l R0
+add.l R0,R7
+*line 983
+move #1,R6
+L268:
+*line 984
+move.l _aptr,R8
+move.b (R8),R0
+ext.w R0
+move R0,R5
+move.l #___atab,R8
+move.b 0(R8,R5),R0
+ext.w R0
+and #4,R0
+add.l #1,_aptr
+tst R0
+bne L267
+L266:L265:
+*line 987
+*line 988
+tst R6
+beq L269
+*line 988
+move.l 8(R14),R8
+move.l R7,(R8)
+*line 989
+L269:
+*line 990
+move R5,R0
+bra L260
+L260:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _setvar
+.text
+_setvar:
+~~setvar:
+~var=8
+~deflt=12
+link R14,#-10
+~rc=-2
+~temp=-6
+*line 1009
+move.l 8(R14),R8
+move.l 12(R14),(R8)
+*line 1010
+move.l #_argstr,_aptr
+*line 1012
+move.l 8(R14),(sp)
+jsr _getlong
+move R0,-2(R14)
+*line 1014
+*line 1014
+tst -2(R14)
+beq L271
+*line 1015
+*line 1016
+L274:
+*line 1017
+*line 1018
+move -2(R14),R0
+bra L276
+*line 1019
+L277:
+*line 1020
+*line 1021
+*line 1022
+clr.l -6(R14)
+*line 1023
+move.l R14,(sp)
+sub.l #6,(sp)
+jsr _getlong
+move R0,-2(R14)
+*line 1024
+move.l 8(R14),R8
+move.l (R8),R0
+add.l -6(R14),R0
+move.l 8(R14),R9
+move.l R0,(R9)
+bra L273
+*line 1025
+*line 1026
+L278:
+*line 1027
+*line 1028
+*line 1029
+clr.l -6(R14)
+*line 1030
+move.l R14,(sp)
+sub.l #6,(sp)
+jsr _getlong
+move R0,-2(R14)
+*line 1031
+move.l 8(R14),R8
+move.l (R8),R0
+sub.l -6(R14),R0
+move.l 8(R14),R9
+move.l R0,(R9)
+bra L273
+*line 1032
+*line 1033
+L279:
+*line 1034
+*line 1035
+*line 1036
+move.l 8(R14),R8
+move.l 12(R14),(R8)
+*line 1037
+clr R0
+bra L270
+bra L275
+L276:cmp #43,R0
+beq L277
+cmp #45,R0
+beq L278
+bra L279
+L275:
+*line 1038
+*line 1039
+L273:
+*line 1040
+tst -2(R14)
+bne L274
+L272:
+*line 1041
+*line 1042
+move #1,R0
+bra L270
+*line 1043
+*line 1044
+L271:
+*line 1045
+move #1,R0
+bra L270
+L270:unlk R14
+rts
+.globl _putn
+.text
+_putn:
+~~putn:
+~num=8
+~cw=12
+~unit=14
+link R14,#0
+movem.l R6-R7,-(sp)
+~d=R7
+*line 1063
+*line 1064
+tst 12(R14)
+beq L280
+*line 1065
+*line 1066
+move 14(R14),(sp)
+move 12(R14),-(sp)
+sub #1,(sp)
+move.l #$a,-(sp)
+move.l 8(R14),-(sp)
+jsr ldiv
+addq.l #8,sp
+move.l R0,-(sp)
+jsr _putn
+addq.l #6,sp
+*line 1068
+move.l #$a,-(sp)
+move.l 8(R14),-(sp)
+jsr lrem
+addq.l #8,sp
+move R0,R7
+*line 1070
+move R7,(sp)
+add #48,(sp)
+move 14(R14),-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+bra L280
+L280:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _puthn
+.text
+_puthn:
+~~puthn:
+~num=8
+~cw=12
+~unit=14
+link R14,#0
+movem.l R6-R7,-(sp)
+~d=R7
+*line 1090
+*line 1091
+tst 12(R14)
+beq L281
+*line 1092
+*line 1093
+move 14(R14),(sp)
+move 12(R14),-(sp)
+sub #1,(sp)
+move.l 8(R14),R0
+asr.l #$4,R0
+move.l R0,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 1095
+move.l 8(R14),R0
+and.l #$f,R0
+move R0,R7
+*line 1097
+*line 1098
+cmp #9,R7
+ble L282
+*line 1098
+move R7,(sp)
+add #55,(sp)
+move 14(R14),-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 1099
+bra L283
+L282:
+*line 1100
+move R7,(sp)
+add #48,(sp)
+move 14(R14),-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+L283:bra L281
+L281:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _ddump
+.text
+_ddump:
+~~ddump:
+~loc=R13
+~lastloc=R12
+~nwide=R7
+~unit=R6
+link R14,#0
+movem.l R5-R7/R12-R13,-(sp)
+*line 1119
+move.l 8(R14),R13
+*line 1119
+move.l 12(R14),R12
+*line 1119
+move 16(R14),R7
+*line 1119
+move 18(R14),R6
+*line 1119
+bra L287
+L286:
+*line 1120
+*line 1121
+move R6,(sp)
+move #2,-(sp)
+move.b (R13),R0
+ext.w R0
+and #255,R0
+ext.l R0
+move.l R0,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 1122
+move #32,(sp)
+move R6,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 1123
+*line 1124
+*line 1124
+move R6,(sp)
+move #1,-(sp)
+jsr _trap13
+addq.l #2,sp
+tst.l R0
+beq L288
+*line 1125
+*line 1126
+move R6,(sp)
+move #2,-(sp)
+jsr _trap13
+addq.l #2,sp
+*line 1127
+move #1,R0
+bra L284
+*line 1128
+*line 1129
+L288:
+*line 1130
+*line 1130
+cmp.l R12,R13
+bne L289
+*line 1131
+*line 1132
+move #1,_dflag
+*line 1133
+clr R0
+bra L284
+*line 1134
+*line 1135
+L289:
+*line 1136
+add.l #1,R13
+L287:
+*line 1137
+move R7,R0
+sub #1,R7
+tst R0
+bne L286
+L285:
+*line 1140
+clr R0
+bra L284
+L284:tst.l (sp)+
+movem.l (sp)+,R6-R7/R12-R13
+unlk R14
+rts
+.globl _padr
+.text
+_padr:
+~~padr:
+~adr=8
+~unit=12
+link R14,#-4
+*line 1156
+move 12(R14),(sp)
+move #8,-(sp)
+move.l 8(R14),-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 1157
+move #32,(sp)
+move 12(R14),-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 1158
+move #45,(sp)
+move 12(R14),-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 1159
+move #32,(sp)
+move 12(R14),-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+L290:unlk R14
+rts
+.globl _dtext
+.text
+_dtext:
+~~dtext:
+~loc=R13
+~lastloc=R12
+~nwide=R7
+~unit=R6
+link R14,#0
+movem.l R4-R7/R12-R13,-(sp)
+~c=R5
+*line 1178
+move.l 8(R14),R13
+*line 1178
+move.l 12(R14),R12
+*line 1178
+move 16(R14),R7
+*line 1178
+move 18(R14),R6
+*line 1178
+move #32,(sp)
+move R6,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 1179
+move #124,(sp)
+move R6,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 1181
+bra L294
+L293:
+*line 1182
+*line 1183
+move.b (R13),R5
+ext.w R5
+and #255,R5
+*line 1184
+*line 1185
+*line 1186
+move R5,R0
+and #-128,R0
+bne L295
+move.l #___atab,R8
+move.b 0(R8,R5),R0
+ext.w R0
+and #94,R0
+beq L295
+*line 1186
+move R5,(sp)
+move R6,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 1187
+bra L296
+L295:
+*line 1188
+move #46,(sp)
+move R6,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+L296:
+*line 1189
+*line 1190
+*line 1190
+move R6,(sp)
+move #1,-(sp)
+jsr _trap13
+addq.l #2,sp
+tst.l R0
+beq L297
+*line 1191
+*line 1192
+move R6,(sp)
+move #2,-(sp)
+jsr _trap13
+addq.l #2,sp
+*line 1193
+move #124,(sp)
+move R6,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 1194
+move #1,R0
+bra L291
+*line 1195
+*line 1196
+L297:
+*line 1197
+*line 1197
+cmp.l R12,R13
+bne L298
+*line 1198
+*line 1199
+move #124,(sp)
+move R6,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 1200
+clr R0
+bra L291
+*line 1201
+*line 1202
+L298:
+*line 1203
+add.l #1,R13
+L294:
+*line 1204
+move R7,R0
+sub #1,R7
+tst R0
+bne L293
+L292:
+*line 1206
+move #124,(sp)
+move R6,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 1207
+clr R0
+bra L291
+L291:tst.l (sp)+
+movem.l (sp)+,R5-R7/R12-R13
+unlk R14
+rts
+.globl _cp_mset
+.text
+_cp_mset:
+~~cp_mset:
+link R14,#-4
+*line 1222
+clr _redo
+*line 1224
+*line 1225
+jsr _getarg
+tst R0
+bne L300
+*line 1225
+clr R0
+bra L299
+*line 1226
+L300:
+*line 1227
+*line 1228
+cmp.b #44,_argsep
+beq L301
+*line 1228
+clr R0
+bra L299
+*line 1229
+L301:
+*line 1230
+*line 1231
+move.l _p_from,(sp)
+move.l #_p_from,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L302
+*line 1231
+clr R0
+bra L299
+*line 1232
+L302:
+*line 1233
+move #1,R0
+bra L299
+L299:unlk R14
+rts
+.globl _cx_mset
+.text
+_cx_mset:
+~~cx_mset:
+link R14,#-4
+*line 1245
+bra L306
+L305:
+*line 1246
+*line 1247
+*line 1248
+jsr _getarg
+tst R0
+beq L307
+*line 1248
+*line 1249
+move.l _p_value,(sp)
+move.l #_p_value,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L308
+*line 1249
+clr R0
+bra L303
+*line 1250
+L308:L307:
+*line 1251
+*line 1252
+move.l _p_value,R0
+and.l #$ffffff00,R0
+beq L309
+*line 1252
+clr R0
+bra L303
+*line 1253
+L309:
+*line 1254
+move.l _p_value,R0
+and.l #$ff,R0
+move.l _p_from,R9
+move.b R0,(R9)
+add.l #1,_p_from
+*line 1255
+*line 1256
+*line 1257
+cmp.b #13,_argsep
+bne L310
+*line 1257
+move #1,R0
+bra L303
+L310:L306:
+*line 1258
+bra L305
+L304:L303:unlk R14
+rts
+.globl _cp_wset
+.text
+_cp_wset:
+~~cp_wset:
+link R14,#-4
+*line 1272
+clr _redo
+*line 1274
+*line 1275
+jsr _getarg
+tst R0
+bne L312
+*line 1275
+clr R0
+bra L311
+*line 1276
+L312:
+*line 1277
+*line 1278
+cmp.b #44,_argsep
+beq L313
+*line 1278
+clr R0
+bra L311
+*line 1279
+L313:
+*line 1280
+*line 1281
+move.l _p_from,(sp)
+move.l #_p_from,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L314
+*line 1281
+clr R0
+bra L311
+*line 1282
+L314:
+*line 1283
+*line 1284
+btst #0,3+_p_from
+beq L315
+*line 1284
+clr R0
+bra L311
+*line 1285
+L315:
+*line 1286
+move #1,R0
+bra L311
+L311:unlk R14
+rts
+.globl _cx_wset
+.text
+_cx_wset:
+~~cx_wset:
+link R14,#-8
+~p_uint=-4
+*line 1303
+move.l _p_from,-4(R14)
+*line 1305
+bra L319
+L318:
+*line 1306
+*line 1307
+*line 1308
+jsr _getarg
+tst R0
+beq L320
+*line 1308
+*line 1309
+move.l _p_value,(sp)
+move.l #_p_value,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L321
+*line 1309
+clr R0
+bra L316
+*line 1310
+L321:L320:
+*line 1311
+*line 1312
+move.l _p_value,R0
+and.l #$ffff0000,R0
+beq L322
+*line 1312
+clr R0
+bra L316
+*line 1313
+L322:
+*line 1314
+move.l _p_value,R0
+move.l -4(R14),R9
+move R0,(R9)
+add.l #2,-4(R14)
+*line 1315
+*line 1316
+*line 1317
+cmp.b #13,_argsep
+bne L323
+*line 1317
+move #1,R0
+bra L316
+L323:L319:
+*line 1318
+bra L318
+L317:L316:unlk R14
+rts
+.globl _cp_mtst
+.text
+_cp_mtst:
+~~cp_mtst:
+link R14,#-4
+*line 1333
+move _ilast,_inext
+*line 1335
+*line 1335
+cmp.b #13,_argsep
+beq L10002
+tst.b _argsep
+bne L325
+L10002:*line 1336
+*line 1337
+move.l #$8,_p_from
+*line 1338
+move.l #$fffe,_p_to
+*line 1339
+move #1,R0
+bra L324
+*line 1340
+*line 1341
+L325:
+*line 1342
+*line 1343
+jsr _getarg
+tst R0
+beq L326
+*line 1343
+*line 1344
+move.l #$10000,(sp)
+move.l #_p_from,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L327
+*line 1344
+clr R0
+bra L324
+*line 1345
+L327:L326:
+*line 1346
+*line 1347
+cmp.b #44,_argsep
+beq L328
+*line 1347
+clr R0
+bra L324
+*line 1348
+L328:
+*line 1349
+*line 1350
+jsr _getarg
+tst R0
+beq L329
+*line 1350
+*line 1351
+move.l #$ffffe,(sp)
+move.l #_p_to,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L330
+*line 1351
+clr R0
+bra L324
+*line 1352
+L330:L329:
+*line 1353
+*line 1354
+btst #0,3+_p_from
+beq L331
+*line 1354
+clr R0
+bra L324
+*line 1355
+L331:
+*line 1356
+*line 1357
+btst #0,3+_p_to
+beq L332
+*line 1357
+clr R0
+bra L324
+*line 1358
+L332:
+*line 1359
+*line 1360
+move.l _p_from,R0
+cmp.l _p_to,R0
+bls L333
+*line 1360
+clr R0
+bra L324
+*line 1361
+L333:
+*line 1362
+move #1,R0
+bra L324
+L324:unlk R14
+rts
+.globl _cx_mtst
+.text
+_cx_mtst:
+~~cx_mtst:
+link R14,#0
+movem.l R5-R7/R11-R13,-(sp)
+~mask=R7
+~was=R6
+~loc=R13
+~eloc=R12
+~oldloc=R11
+*line 1379
+move #1,R7
+*line 1380
+move.l _p_from,R13
+*line 1381
+move.l _p_to,R12
+*line 1382
+move.l R13,R11
+*line 1384
+*line 1385
+move.l _p_from,R0
+cmp.l #$10000,R0
+bcc L335
+*line 1385
+move #7,(sp)
+jsr _setipl
+*line 1386
+L335:
+*line 1387
+L338:
+*line 1388
+*line 1389
+bra L341
+L340:
+*line 1390
+*line 1391
+move R7,(R13)
+*line 1392
+*line 1393
+*line 1394
+move (R13),R6
+cmp R6,R7
+beq L342
+*line 1394
+*line 1395
+move.l _p_from,R0
+cmp.l #$10000,R0
+bcc L343
+*line 1395
+jsr _halt
+*line 1396
+bra L344
+L343:
+*line 1397
+*line 1398
+move R7,(sp)
+move R6,-(sp)
+move.l R13,-(sp)
+move.l #L345,-(sp)
+jsr _printf
+adda.l #10,sp
+L344:
+*line 1399
+L342:
+*line 1400
+move R7,R0
+not R0
+move R0,(R13)
+*line 1401
+*line 1402
+*line 1403
+move (R13),R6
+move R7,R0
+not R0
+cmp R0,R6
+beq L346
+*line 1403
+*line 1404
+move.l _p_from,R0
+cmp.l #$10000,R0
+bcc L347
+*line 1404
+jsr _halt
+*line 1405
+bra L348
+L347:
+*line 1406
+*line 1407
+move R7,R0
+not R0
+move R0,(sp)
+move R6,-(sp)
+move.l R13,-(sp)
+move.l #L349,-(sp)
+jsr _printf
+adda.l #10,sp
+L348:
+*line 1408
+L346:
+*line 1409
+asl R7
+L341:
+*line 1410
+tst R7
+bne L340
+L339:
+*line 1411
+*line 1412
+move #1,R7
+*line 1413
+add.l #2,R13
+*line 1414
+L337:
+*line 1415
+cmp.l R12,R13
+bls L338
+L336:
+*line 1417
+*line 1418
+cmp.l #$10000,R11
+bcc L350
+*line 1418
+move.l #$100000,(sp)
+jsr _rjumpto
+*line 1419
+L350:
+*line 1420
+move #1,R0
+bra L334
+L334:tst.l (sp)+
+movem.l (sp)+,R6-R7/R11-R13
+unlk R14
+rts
+.globl _cp_go
+.text
+_cp_go:
+~~cp_go:
+link R14,#-4
+*line 1435
+clr _redo
+*line 1436
+clr _b0flag
+*line 1437
+clr _b1flag
+*line 1438
+clr _goflag
+*line 1440
+*line 1440
+jsr _getarg
+tst R0
+beq L352
+*line 1441
+*line 1442
+*line 1443
+move.l _p_goto,(sp)
+move.l #_p_goto,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L353
+*line 1443
+clr R0
+bra L351
+*line 1444
+L353:
+*line 1445
+*line 1446
+btst #0,3+_p_goto
+beq L354
+*line 1446
+clr R0
+bra L351
+*line 1447
+L354:
+*line 1448
+move #1,_goflag
+*line 1449
+*line 1450
+*line 1451
+L352:
+*line 1452
+*line 1452
+jsr _getarg
+tst R0
+beq L355
+*line 1453
+*line 1454
+*line 1455
+clr.l (sp)
+move.l #_tba0,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L356
+*line 1455
+clr R0
+bra L351
+*line 1456
+L356:
+*line 1457
+*line 1458
+btst #0,3+_tba0
+beq L357
+*line 1458
+clr R0
+bra L351
+*line 1459
+L357:
+*line 1460
+move #1,_b0flag
+*line 1461
+*line 1462
+L355:
+*line 1463
+*line 1463
+jsr _getarg
+tst R0
+beq L358
+*line 1464
+*line 1465
+*line 1466
+clr.l (sp)
+move.l #_tba1,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L359
+*line 1466
+clr R0
+bra L351
+*line 1467
+L359:
+*line 1468
+*line 1469
+btst #0,3+_tba1
+beq L360
+*line 1469
+clr R0
+bra L351
+*line 1470
+L360:
+*line 1471
+move #1,_b1flag
+*line 1472
+*line 1473
+L358:
+*line 1474
+move #1,R0
+bra L351
+L351:unlk R14
+rts
+.globl _cx_dini
+.text
+_cx_dini:
+~~cx_dini:
+link R14,#-4
+*line 1491
+move #1,_redo
+*line 1492
+jsr _hdvini
+*line 1493
+move #1,R0
+bra L361
+L361:unlk R14
+rts
+.globl _cx_zap
+.text
+_cx_zap:
+~~cx_zap:
+link R14,#0
+movem.l R7-R7/R12-R13,-(sp)
+~p=R13
+~q=R12
+*line 1509
+move.l #$10000,R13
+*line 1510
+move.l #$ffffe,R12
+*line 1512
+move #7,(sp)
+jsr _setipl
+*line 1514
+bra L365
+L364:
+*line 1515
+clr (R13)+
+L365:
+*line 1515
+cmp.l R12,R13
+bls L364
+L363:
+*line 1517
+move.l #$100000,(sp)
+jsr _rjumpto
+L362:tst.l (sp)+
+movem.l (sp)+,R12-R13
+unlk R14
+rts
+.globl _cx_omap
+.text
+_cx_omap:
+~~cx_omap:
+link R14,#0
+movem.l R4-R7,-(sp)
+~i=R7
+~width=R6
+~xloc=R5
+*line 1534
+move.l #L367,(sp)
+jsr _printf
+*line 1536
+clr R7
+bra L370
+L371:
+*line 1537
+*line 1538
+move R7,R0
+asl #3,R0
+ext.l R0
+add.l #_v_odtab,R0
+move.l R0,R8
+move 2(R8),R5
+and #1023,R5
+*line 1539
+*line 1540
+*line 1541
+btst #9,R5
+beq L372
+*line 1541
+or #-1024,R5
+*line 1542
+L372:
+*line 1543
+move R7,R0
+asl #3,R0
+ext.l R0
+add.l #_v_odtab,R0
+move.l R0,R8
+move 2(R8),R6
+move #10,R0
+asr R0,R6
+and #63,R6
+*line 1544
+*line 1545
+*line 1546
+move R7,R0
+asl #3,R0
+ext.l R0
+add.l #_v_odtab,R0
+move.l R0,R8
+btst #3,(R8)
+beq L10003
+move.l #L374,(sp)
+bra L10005
+L10003:move.l #L375,(sp)
+L10005:move R7,-(sp)
+move.l #L373,-(sp)
+jsr _printf
+addq.l #6,sp
+*line 1547
+*line 1548
+*line 1549
+move R5,(sp)
+move R6,-(sp)
+move R7,R0
+asl #3,R0
+ext.l R0
+move.l R0,R8
+move.l #_v_odtab,R9
+clr R0
+move 4(R8,R9.l),R0
+swap R0
+clr R0
+swap R0
+asl.l #$1,R0
+move.l R0,-(sp)
+move.l #L376,-(sp)
+jsr _printf
+adda.l #10,sp
+*line 1550
+*line 1551
+move R7,R0
+asl #3,R0
+ext.l R0
+move.l R0,R8
+move.l #_v_odtab,R9
+move 0(R8,R9.l),(sp)
+move.l #L377,-(sp)
+jsr _printf
+addq.l #4,sp
+L369:
+*line 1536
+add #1,R7
+L370:
+*line 1536
+cmp #16,R7
+blt L371
+L368:
+*line 1554
+move #1,R0
+bra L366
+L366:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _cx_help
+.text
+_cx_help:
+~~cx_help:
+link R14,#-8
+~i=-2
+~j=-4
+*line 1571
+clr -4(R14)
+*line 1573
+move.l #L379,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1575
+clr -2(R14)
+bra L382
+L383:
+*line 1576
+*line 1577
+*line 1577
+cmp #22,-4(R14)
+move sr,R0
+add #1,-4(R14)
+move R0,ccr
+bne L384
+*line 1578
+*line 1579
+clr -4(R14)
+*line 1580
+*line 1581
+*line 1582
+jsr _waitcr
+tst R0
+beq L385
+*line 1582
+move #1,R0
+bra L378
+L385:
+*line 1583
+*line 1584
+L384:
+*line 1585
+move.l #L386,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1586
+move -2(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_cmtab,R9
+move.l 0(R8,R9.l),(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1587
+move.l #L387,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1588
+move -2(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_cmtab,R9
+move.l 12(R8,R9.l),(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1589
+move.l #L388,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+L381:
+*line 1575
+add #1,-2(R14)
+L382:
+*line 1575
+cmp #34,-2(R14)
+blt L383
+L380:
+*line 1592
+move.l #L389,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1593
+move #1,R0
+bra L378
+L378:unlk R14
+rts
+.globl _cx_bpb
+.text
+_cx_bpb:
+~~cx_bpb:
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+~bpp=R13
+*line 1610
+*line 1610
+clr (sp)
+move #7,-(sp)
+jsr _trap13
+addq.l #2,sp
+move.l R0,R13
+move.l R13,R0
+bne L391
+*line 1611
+*line 1612
+move.l #L392,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1613
+clr R0
+bra L390
+*line 1614
+bra L393
+L391:
+*line 1615
+*line 1616
+*line 1617
+move.l #L394,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1618
+move.l #L395,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1619
+move _cmdunit,(sp)
+move #5,-(sp)
+clr.l R0
+move (R13),R0
+move.l R0,-(sp)
+jsr _putn
+addq.l #6,sp
+*line 1620
+move.l #L396,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1621
+move _cmdunit,(sp)
+move #4,-(sp)
+clr.l R0
+move 2(R13),R0
+move.l R0,-(sp)
+jsr _putn
+addq.l #6,sp
+*line 1622
+move.l #L397,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1623
+move _cmdunit,(sp)
+move #5,-(sp)
+clr.l R0
+move 4(R13),R0
+move.l R0,-(sp)
+jsr _putn
+addq.l #6,sp
+*line 1624
+move.l #L398,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1625
+move _cmdunit,(sp)
+move #4,-(sp)
+clr.l R0
+move 6(R13),R0
+move.l R0,-(sp)
+jsr _putn
+addq.l #6,sp
+*line 1626
+move.l #L399,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1627
+move _cmdunit,(sp)
+move #4,-(sp)
+clr.l R0
+move 8(R13),R0
+move.l R0,-(sp)
+jsr _putn
+addq.l #6,sp
+*line 1628
+move.l #L400,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1629
+move _cmdunit,(sp)
+move #5,-(sp)
+clr.l R0
+move 10(R13),R0
+move.l R0,-(sp)
+jsr _putn
+addq.l #6,sp
+*line 1630
+move.l #L401,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1631
+move _cmdunit,(sp)
+move #5,-(sp)
+clr.l R0
+move 12(R13),R0
+move.l R0,-(sp)
+jsr _putn
+addq.l #6,sp
+*line 1632
+move.l #L402,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1633
+move _cmdunit,(sp)
+move #5,-(sp)
+clr.l R0
+move 14(R13),R0
+move.l R0,-(sp)
+jsr _putn
+addq.l #6,sp
+*line 1634
+move.l #L403,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1635
+move _cmdunit,(sp)
+move #4,-(sp)
+clr.l R0
+move 16(R13),R0
+move.l R0,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 1636
+move.l #L404,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1637
+move _cmdunit,(sp)
+move #4,-(sp)
+clr.l R0
+move 18(R13),R0
+move.l R0,-(sp)
+jsr _putn
+addq.l #6,sp
+*line 1638
+move.l #L405,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1639
+move _cmdunit,(sp)
+move #4,-(sp)
+clr.l R0
+move 20(R13),R0
+move.l R0,-(sp)
+jsr _putn
+addq.l #6,sp
+*line 1640
+move.l #L406,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1641
+move _cmdunit,(sp)
+move #5,-(sp)
+clr.l R0
+move 22(R13),R0
+move.l R0,-(sp)
+jsr _putn
+addq.l #6,sp
+*line 1642
+move.l #L407,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1643
+move _cmdunit,(sp)
+move #5,-(sp)
+clr.l R0
+move 24(R13),R0
+move.l R0,-(sp)
+jsr _putn
+addq.l #6,sp
+*line 1644
+move.l #L408,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1645
+move _cmdunit,(sp)
+move #4,-(sp)
+clr.l R0
+move 26(R13),R0
+move.l R0,-(sp)
+jsr _putn
+addq.l #6,sp
+*line 1646
+move.l #L409,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1647
+move #1,R0
+bra L390
+L393:L390:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _cx_go
+.text
+_cx_go:
+~~cx_go:
+link R14,#-4
+*line 1663
+clr _redo
+*line 1664
+move #1,_exflag
+*line 1665
+clr _wzcrsh
+*line 1667
+*line 1668
+tst _goflag
+beq L411
+*line 1668
+move.l _regptr,R8
+move.l _p_goto,68(R8)
+*line 1669
+L411:
+*line 1670
+*line 1670
+tst _b0flag
+beq L412
+*line 1671
+*line 1672
+*line 1672
+tst.l _p_ba0
+beq L413
+*line 1673
+*line 1674
+*line 1674
+move.l _p_ba0,R8
+cmp #20047,(R8)
+beq L414
+*line 1675
+*line 1676
+move.l #L415,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1677
+move _cmdunit,(sp)
+move #8,-(sp)
+move.l _p_ba0,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 1678
+move.l #L416,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1679
+move _cmdunit,(sp)
+move #4,-(sp)
+move.l _p_ba0,R8
+clr R0
+move (R8),R0
+swap R0
+clr R0
+swap R0
+and.l #$ffff,R0
+move.l R0,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 1680
+move.l #L417,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1681
+move _cmdunit,(sp)
+move #4,-(sp)
+move.l #$4e4f,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 1682
+move.l #L418,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1683
+*line 1684
+L414:
+*line 1685
+move.l _p_ba0,R8
+move _p_bv0,(R8)
+*line 1686
+*line 1687
+L413:
+*line 1688
+move.l _tba0,_p_ba0
+*line 1689
+move.l _p_ba0,R8
+move (R8),_p_bv0
+*line 1690
+move.l _p_ba0,R8
+move #20047,(R8)
+*line 1691
+*line 1692
+*line 1693
+*line 1694
+*line 1695
+L412:
+*line 1696
+*line 1696
+tst _b1flag
+beq L419
+*line 1697
+*line 1698
+*line 1698
+tst.l _p_ba1
+beq L420
+*line 1699
+*line 1700
+*line 1700
+move.l _p_ba1,R8
+cmp #20047,(R8)
+beq L421
+*line 1701
+*line 1702
+move.l #L422,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1703
+move _cmdunit,(sp)
+move #8,-(sp)
+move.l _p_ba1,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 1704
+move.l #L423,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1705
+move _cmdunit,(sp)
+move #4,-(sp)
+move.l _p_ba1,R8
+clr R0
+move (R8),R0
+swap R0
+clr R0
+swap R0
+and.l #$ffff,R0
+move.l R0,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 1706
+move.l #L424,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1707
+move _cmdunit,(sp)
+move #4,-(sp)
+move.l #$4e4f,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 1708
+move.l #L425,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 1709
+*line 1710
+L421:
+*line 1711
+move.l _p_ba1,R8
+move _p_bv1,(R8)
+*line 1712
+*line 1713
+L420:
+*line 1714
+move.l _tba1,_p_ba1
+*line 1715
+move.l _p_ba1,R8
+move (R8),_p_bv1
+*line 1716
+move.l _p_ba1,R8
+move #20047,(R8)
+*line 1717
+*line 1718
+L419:
+*line 1719
+move #1,R0
+bra L410
+L410:unlk R14
+rts
+.globl _cp_dump
+.text
+_cp_dump:
+~~cp_dump:
+link R14,#-4
+*line 1734
+move _ilast,_inext
+*line 1736
+*line 1737
+jsr _getarg
+tst R0
+beq L427
+*line 1737
+*line 1737
+move.l _p_from,(sp)
+move.l #_p_from,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L428
+*line 1738
+*line 1739
+clr _redo
+*line 1740
+clr R0
+bra L426
+*line 1741
+*line 1742
+L428:L427:
+*line 1743
+*line 1743
+cmp.b #13,_argsep
+beq L10006
+tst.b _argsep
+bne L429
+L10006:*line 1744
+*line 1745
+move.l _p_from,_p_to
+*line 1746
+move.l #$10,_p_width
+*line 1747
+move #1,_redo
+*line 1748
+move #1,R0
+bra L426
+*line 1749
+*line 1750
+L429:
+*line 1751
+*line 1752
+jsr _getarg
+tst R0
+beq L430
+*line 1752
+*line 1752
+move.l _p_to,(sp)
+move.l #_p_to,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L431
+*line 1753
+*line 1754
+clr _redo
+*line 1755
+clr R0
+bra L426
+*line 1756
+*line 1757
+L431:L430:
+*line 1758
+*line 1758
+cmp.b #13,_argsep
+beq L10007
+tst.b _argsep
+bne L432
+L10007:*line 1759
+*line 1760
+move.l #$10,_p_width
+*line 1761
+move #1,_redo
+*line 1762
+move #1,R0
+bra L426
+*line 1763
+*line 1764
+L432:
+*line 1765
+*line 1766
+jsr _getarg
+tst R0
+beq L433
+*line 1766
+*line 1766
+move.l _p_width,(sp)
+move.l #_p_width,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L434
+*line 1767
+*line 1768
+clr _redo
+*line 1769
+clr R0
+bra L426
+*line 1770
+*line 1771
+L434:L433:
+*line 1772
+*line 1772
+tst.l _p_width
+ble L10008
+cmp.l #$10,_p_width
+ble L435
+L10008:*line 1773
+*line 1774
+move.l #$10,_p_width
+*line 1775
+clr _redo
+*line 1776
+clr R0
+bra L426
+*line 1777
+*line 1778
+L435:
+*line 1779
+move #1,_redo
+*line 1780
+move #1,R0
+bra L426
+L426:unlk R14
+rts
+.globl _cp_fill
+.text
+_cp_fill:
+~~cp_fill:
+link R14,#-4
+*line 1795
+clr _redo
+*line 1797
+*line 1798
+jsr _getarg
+tst R0
+beq L437
+*line 1798
+*line 1799
+move.l _p_from,(sp)
+move.l #_p_from,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L438
+*line 1799
+clr R0
+bra L436
+*line 1800
+L438:L437:
+*line 1801
+*line 1802
+jsr _getarg
+tst R0
+beq L439
+*line 1802
+*line 1803
+move.l _p_len,(sp)
+move.l #_p_len,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L440
+*line 1803
+clr R0
+bra L436
+*line 1804
+L440:L439:
+*line 1805
+*line 1806
+jsr _getarg
+tst R0
+beq L441
+*line 1806
+*line 1807
+move.l _p_value,(sp)
+move.l #_p_value,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L442
+*line 1807
+clr R0
+bra L436
+*line 1808
+L442:L441:
+*line 1809
+*line 1810
+move.l _p_value,R0
+and.l #$ffffff00,R0
+beq L443
+*line 1810
+clr R0
+bra L436
+*line 1811
+L443:
+*line 1812
+move #1,R0
+bra L436
+L436:unlk R14
+rts
+.globl _cp_wfil
+.text
+_cp_wfil:
+~~cp_wfil:
+link R14,#-4
+*line 1827
+clr _redo
+*line 1829
+*line 1830
+jsr _getarg
+tst R0
+beq L445
+*line 1830
+*line 1831
+move.l _p_from,(sp)
+move.l #_p_from,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L446
+*line 1831
+clr R0
+bra L444
+*line 1832
+L446:L445:
+*line 1833
+*line 1834
+jsr _getarg
+tst R0
+beq L447
+*line 1834
+*line 1835
+move.l _p_len,(sp)
+move.l #_p_len,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L448
+*line 1835
+clr R0
+bra L444
+*line 1836
+L448:L447:
+*line 1837
+*line 1838
+jsr _getarg
+tst R0
+beq L449
+*line 1838
+*line 1839
+move.l _p_value,(sp)
+move.l #_p_value,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L450
+*line 1839
+clr R0
+bra L444
+*line 1840
+L450:L449:
+*line 1841
+*line 1842
+btst #0,3+_p_from
+beq L451
+*line 1842
+clr R0
+bra L444
+*line 1843
+L451:
+*line 1844
+*line 1845
+move.l _p_value,R0
+and.l #$ffff0000,R0
+beq L452
+*line 1845
+clr R0
+bra L444
+*line 1846
+L452:
+*line 1847
+move #1,R0
+bra L444
+L444:unlk R14
+rts
+.globl _cp_copy
+.text
+_cp_copy:
+~~cp_copy:
+link R14,#-4
+*line 1862
+clr _redo
+*line 1864
+*line 1865
+jsr _getarg
+tst R0
+beq L454
+*line 1865
+*line 1866
+move.l _p_from,(sp)
+move.l #_p_from,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L455
+*line 1866
+clr R0
+bra L453
+*line 1867
+L455:L454:
+*line 1868
+*line 1869
+jsr _getarg
+tst R0
+beq L456
+*line 1869
+*line 1870
+move.l _p_to,(sp)
+move.l #_p_to,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L457
+*line 1870
+clr R0
+bra L453
+*line 1871
+L457:L456:
+*line 1872
+*line 1873
+jsr _getarg
+tst R0
+beq L458
+*line 1873
+*line 1874
+move.l _p_len,(sp)
+move.l #_p_len,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L459
+*line 1874
+clr R0
+bra L453
+*line 1875
+L459:L458:
+*line 1876
+move #1,R0
+bra L453
+L453:unlk R14
+rts
+.globl _cp_chek
+.text
+_cp_chek:
+~~cp_chek:
+link R14,#-4
+*line 1890
+clr _redo
+*line 1892
+*line 1893
+jsr _getarg
+tst R0
+beq L461
+*line 1893
+*line 1894
+move.l _p_from,(sp)
+move.l #_p_from,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L462
+*line 1894
+clr R0
+bra L460
+*line 1895
+L462:L461:
+*line 1896
+*line 1897
+jsr _getarg
+tst R0
+beq L463
+*line 1897
+*line 1898
+move.l _p_to,(sp)
+move.l #_p_to,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L464
+*line 1898
+clr R0
+bra L460
+*line 1899
+L464:L463:
+*line 1900
+move #1,R0
+bra L460
+L460:unlk R14
+rts
+.globl _cp_read
+.text
+_cp_read:
+~~cp_read:
+link R14,#-4
+*line 1915
+clr _redo
+*line 1917
+*line 1918
+jsr _getarg
+tst R0
+beq L466
+*line 1918
+*line 1919
+move.l _p_from,(sp)
+move.l #_p_from,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L467
+*line 1919
+clr R0
+bra L465
+*line 1920
+L467:L466:
+*line 1921
+*line 1922
+jsr _getarg
+tst R0
+beq L468
+*line 1922
+*line 1923
+move.l _p_to,(sp)
+move.l #_p_to,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L469
+*line 1923
+clr R0
+bra L465
+*line 1924
+L469:L468:
+*line 1925
+*line 1926
+jsr _getarg
+tst R0
+beq L470
+*line 1926
+*line 1927
+move.l _p_len,(sp)
+move.l #_p_len,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L471
+*line 1927
+clr R0
+bra L465
+*line 1928
+L471:L470:
+*line 1929
+*line 1930
+move.l _p_len,R0
+and.l #$ffff8000,R0
+beq L472
+*line 1930
+clr R0
+bra L465
+*line 1931
+L472:
+*line 1932
+*line 1933
+move.l _p_from,R0
+and.l #$ffff0000,R0
+beq L473
+*line 1933
+clr R0
+bra L465
+*line 1934
+L473:
+*line 1935
+move #1,R0
+bra L465
+L465:unlk R14
+rts
+.globl _cp_null
+.text
+_cp_null:
+~~cp_null:
+link R14,#-4
+*line 1947
+move #1,R0
+bra L474
+L474:unlk R14
+rts
+.globl _cp_rset
+.text
+_cp_rset:
+~~cp_rset:
+link R14,#-6
+~rc=-2
+*line 1964
+clr -2(R14)
+*line 1965
+clr _redo
+*line 1967
+*line 1968
+jsr _getarg
+tst R0
+bne L476
+*line 1968
+clr R0
+bra L475
+*line 1969
+L476:
+*line 1970
+move.l #_argstr,(sp)
+jsr _str2lc
+*line 1972
+*line 1973
+move.l #_rlist,(sp)
+move.l #_argstr,-(sp)
+jsr _strlcmp
+addq.l #4,sp
+move R0,-2(R14)
+bne L477
+*line 1973
+clr R0
+bra L475
+*line 1974
+L477:
+*line 1975
+*line 1976
+jsr _getarg
+tst R0
+bne L478
+*line 1976
+clr R0
+bra L475
+*line 1977
+L478:
+*line 1978
+*line 1979
+clr.l (sp)
+move.l #_p_value,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L479
+*line 1979
+clr R0
+bra L475
+*line 1980
+L479:
+*line 1981
+move -2(R14),_rnum
+*line 1982
+move #1,R0
+bra L475
+L475:unlk R14
+rts
+.globl _cx_chek
+.text
+_cx_chek:
+~~cx_chek:
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~csum=R7
+~cp=R13
+*line 1999
+clr _redo
+*line 2000
+clr.l R7
+*line 2002
+move.l _p_from,R13
+bra L483
+L484:
+*line 2003
+move.b (R13),R0
+ext.w R0
+ext.l R0
+and.l #$ff,R0
+add.l R0,R7
+L482:
+*line 2002
+add.l #1,R13
+L483:
+*line 2002
+cmp.l _p_to,R13
+bls L484
+L481:
+*line 2005
+move.l R7,(sp)
+move.l #L485,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 2007
+move #1,R0
+bra L480
+L480:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _cx_rset
+.text
+_cx_rset:
+~~cx_rset:
+link R14,#-4
+*line 2022
+clr _redo
+*line 2024
+*line 2025
+cmp #1,_rnum
+bge L487
+*line 2025
+clr R0
+bra L486
+*line 2026
+L487:
+*line 2027
+*line 2027
+cmp #9,_rnum
+bge L488
+*line 2028
+*line 2029
+move _rnum,R8
+sub #1,R8
+add.l R8,R8
+add.l R8,R8
+add.l _regptr,R8
+move.l _p_value,(R8)
+*line 2030
+move #1,R0
+bra L486
+*line 2031
+*line 2032
+L488:
+*line 2033
+*line 2033
+cmp #17,_rnum
+bge L489
+*line 2034
+*line 2035
+move _rnum,R8
+add #-9,R8
+add.l R8,R8
+add.l R8,R8
+add.l _regptr,R8
+move.l _p_value,32(R8)
+*line 2036
+move #1,R0
+bra L486
+*line 2037
+*line 2038
+*line 2039
+*line 2040
+*line 2041
+L489:
+*line 2042
+*line 2042
+cmp #17,_rnum
+bne L490
+*line 2043
+*line 2044
+*line 2045
+move.l _p_value,R0
+and.l #$ffff0000,R0
+beq L491
+*line 2045
+clr R0
+bra L486
+*line 2046
+L491:
+*line 2047
+move.l _p_value,R0
+move.l _regptr,R9
+move R0,66(R9)
+*line 2048
+move #1,R0
+bra L486
+*line 2049
+*line 2050
+L490:
+*line 2051
+*line 2051
+cmp #18,_rnum
+bne L492
+*line 2052
+*line 2053
+*line 2054
+btst #0,3+_p_value
+beq L493
+*line 2054
+clr R0
+bra L486
+*line 2055
+L493:
+*line 2056
+move.l _regptr,R8
+move.l _p_value,68(R8)
+*line 2057
+move #1,R0
+bra L486
+*line 2058
+*line 2059
+L492:
+*line 2060
+*line 2060
+cmp #19,_rnum
+bne L494
+*line 2061
+*line 2062
+*line 2063
+btst #0,3+_p_value
+beq L495
+*line 2063
+clr R0
+bra L486
+*line 2064
+L495:
+*line 2065
+move.l _regptr,R8
+move.l _p_value,60(R8)
+*line 2066
+move #1,R0
+bra L486
+*line 2067
+*line 2068
+L494:
+*line 2069
+clr R0
+bra L486
+L486:unlk R14
+rts
+.globl _cp_vrst
+.text
+_cp_vrst:
+~~cp_vrst:
+link R14,#-6
+~rc=-2
+*line 2086
+clr -2(R14)
+*line 2087
+clr _redo
+*line 2089
+*line 2090
+jsr _getarg
+tst R0
+bne L497
+*line 2090
+clr R0
+bra L496
+*line 2091
+L497:
+*line 2092
+move.l #_argstr,(sp)
+jsr _str2lc
+*line 2094
+*line 2095
+move.l #_vrlist,(sp)
+move.l #_argstr,-(sp)
+jsr _strlcmp
+addq.l #4,sp
+move R0,-2(R14)
+bne L498
+*line 2095
+clr R0
+bra L496
+*line 2096
+L498:
+*line 2097
+*line 2098
+jsr _getarg
+tst R0
+bne L499
+*line 2098
+clr R0
+bra L496
+*line 2099
+L499:
+*line 2100
+*line 2101
+clr.l (sp)
+move.l #_p_value,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L500
+*line 2101
+clr R0
+bra L496
+*line 2102
+L500:
+*line 2103
+*line 2103
+cmp #17,_vrnum
+bge L501
+*line 2104
+*line 2105
+move -2(R14),_vrnum
+*line 2106
+move #1,R0
+bra L496
+*line 2107
+*line 2108
+L501:
+*line 2109
+*line 2109
+cmp #21,_vrnum
+bge L502
+*line 2110
+*line 2111
+*line 2112
+move.l _p_value,R0
+and.l #$ffffffc0,R0
+beq L503
+*line 2112
+clr R0
+bra L496
+*line 2113
+L503:
+*line 2114
+move -2(R14),_vrnum
+*line 2115
+move #1,R0
+bra L496
+*line 2116
+*line 2117
+L502:
+*line 2118
+*line 2118
+cmp #25,_vrnum
+bge L504
+*line 2119
+*line 2120
+*line 2121
+move.l _p_value,R0
+and.l #$fffffc00,R0
+beq L505
+*line 2121
+clr R0
+bra L496
+*line 2122
+L505:
+*line 2123
+move -2(R14),_vrnum
+*line 2124
+move #1,R0
+bra L496
+*line 2125
+*line 2126
+L504:
+*line 2127
+clr R0
+bra L496
+L496:unlk R14
+rts
+.globl _cx_vrst
+.text
+_cx_vrst:
+~~cx_vrst:
+link R14,#-4
+*line 2142
+clr _redo
+*line 2144
+*line 2145
+cmp #1,_vrnum
+bge L507
+*line 2145
+clr R0
+bra L506
+*line 2146
+L507:
+*line 2147
+*line 2147
+cmp #17,_vrnum
+bge L508
+*line 2148
+*line 2149
+move.l _p_value,R0
+move _vrnum,R9
+sub #1,R9
+add.l R9,R9
+add.l #_v_regs,R9
+move R0,(R9)
+*line 2150
+move #1,R0
+bra L506
+*line 2151
+*line 2152
+L508:
+*line 2153
+*line 2153
+cmp #21,_vrnum
+bge L509
+*line 2154
+*line 2155
+*line 2156
+move _vrnum,R8
+sub #5,R8
+add.l R8,R8
+move.l #_v_regs,R9
+clr R0
+move 0(R8,R9.l),R0
+and #1023,R0
+swap R0
+clr R0
+swap R0
+move.l _p_value,R1
+move.l #$a,R2
+asl.l R2,R1
+and.l #$fffffc00,R1
+or.l R1,R0
+move _vrnum,R9
+sub #5,R9
+add.l R9,R9
+add.l #_v_regs,R9
+move R0,(R9)
+*line 2157
+move #1,R0
+bra L506
+*line 2158
+*line 2159
+L509:
+*line 2160
+*line 2160
+cmp #25,_vrnum
+bge L510
+*line 2161
+*line 2162
+move _vrnum,R8
+add #-9,R8
+add.l R8,R8
+move.l #_v_regs,R9
+clr R0
+move 0(R8,R9.l),R0
+and #-1024,R0
+swap R0
+clr R0
+swap R0
+or.l _p_value,R0
+move _vrnum,R9
+add #-9,R9
+add.l R9,R9
+add.l #_v_regs,R9
+move R0,(R9)
+*line 2163
+move #1,R0
+bra L506
+*line 2164
+*line 2165
+L510:
+*line 2166
+clr R0
+bra L506
+L506:unlk R14
+rts
+.globl _cx_vreg
+.text
+_cx_vreg:
+~~cx_vreg:
+link R14,#0
+movem.l R3-R7/R13-R13,-(sp)
+~i=R7
+~j=R6
+~k=R5
+~l=R4
+~rp=R13
+*line 2184
+move.l #_v_regs,R13
+*line 2185
+clr R4
+*line 2187
+clr R7
+bra L514
+L515:
+*line 2188
+*line 2189
+clr R6
+bra L518
+L519:
+*line 2190
+*line 2191
+clr R5
+bra L522
+L523:
+*line 2192
+*line 2193
+move.l #L524,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2194
+move _cmdunit,(sp)
+move #2,-(sp)
+move R4,R8
+move.l R8,-(sp)
+jsr _putn
+addq.l #6,sp
+add #1,R4
+*line 2195
+move.l #L525,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2196
+move _cmdunit,(sp)
+move #4,-(sp)
+clr.l R0
+move (R13)+,R0
+move.l R0,-(sp)
+jsr _puthn
+addq.l #6,sp
+L521:
+*line 2191
+add #1,R5
+L522:
+*line 2191
+cmp #4,R5
+blt L523
+L520:
+*line 2197
+*line 2198
+*line 2199
+move.l #L526,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+L517:
+*line 2189
+add #1,R6
+L518:
+*line 2189
+cmp #2,R6
+blt L519
+L516:
+*line 2200
+*line 2201
+*line 2202
+move.l #L527,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+L513:
+*line 2187
+add #1,R7
+L514:
+*line 2187
+cmp #2,R7
+blt L515
+L512:
+*line 2205
+move #1,R0
+bra L511
+L511:tst.l (sp)+
+movem.l (sp)+,R4-R7/R13-R13
+unlk R14
+rts
+.globl _do_srec
+.text
+_do_srec:
+~~do_srec:
+~line=R13
+link R14,#0
+movem.l R2-R7/R12-R13,-(sp)
+~ldadr=R12
+~c=R7
+~csum=R6
+~i=R5
+~len=R4
+~val=R3
+*line 2225
+move.l 8(R14),R13
+*line 2225
+*line 2226
+move.b (R13)+,R7
+ext.w R7
+cmp #83,R7
+beq L529
+*line 2226
+move #-1,R0
+bra L528
+*line 2227
+L529:
+*line 2228
+move.b (R13)+,R7
+ext.w R7
+move R7,R0
+bra L531
+*line 2229
+L532:
+*line 2230
+*line 2231
+*line 2232
+clr R6
+*line 2233
+*line 2234
+*line 2235
+move.b (R13)+,R7
+ext.w R7
+move R7,R8
+add.l #___atab,R8
+btst #7,(R8)
+beq L533
+*line 2235
+move R7,(sp)
+jsr _xdtoi
+move R0,R4
+*line 2236
+bra L534
+L533:
+*line 2237
+move #-2,R0
+bra L528
+L534:
+*line 2238
+*line 2239
+*line 2240
+move.b (R13)+,R7
+ext.w R7
+move R7,R8
+add.l #___atab,R8
+btst #7,(R8)
+beq L535
+*line 2240
+move R7,(sp)
+jsr _xdtoi
+move R4,R1
+asl #4,R1
+add R1,R0
+move R0,R4
+*line 2241
+bra L536
+L535:
+*line 2242
+move #-2,R0
+bra L528
+L536:
+*line 2243
+*line 2244
+move R4,R0
+and #255,R0
+add R0,R6
+*line 2245
+clr.l R12
+*line 2246
+sub #4,R4
+*line 2247
+*line 2248
+clr R5
+bra L539
+L540:
+*line 2249
+*line 2250
+*line 2251
+move.b (R13)+,R7
+ext.w R7
+move R7,R8
+add.l #___atab,R8
+btst #7,(R8)
+beq L541
+*line 2251
+move R7,(sp)
+jsr _xdtoi
+move R0,R3
+*line 2252
+bra L542
+L541:
+*line 2253
+move #-3,R0
+bra L528
+L542:
+*line 2254
+*line 2255
+*line 2256
+move.b (R13)+,R7
+ext.w R7
+move R7,R8
+add.l #___atab,R8
+btst #7,(R8)
+beq L543
+*line 2256
+move R7,(sp)
+jsr _xdtoi
+clr R1
+move R3,R1
+lsl #4,R1
+add R1,R0
+move R0,R3
+*line 2257
+bra L544
+L543:
+*line 2258
+move #-3,R0
+bra L528
+L544:
+*line 2259
+*line 2260
+move.l R12,R0
+asl.l #$8,R0
+move.l R0,R12
+clr.l R0
+move R3,R0
+add.l R0,R12
+*line 2261
+clr R0
+move R3,R0
+and #255,R0
+add R0,R6
+L538:
+*line 2248
+add #1,R5
+L539:
+*line 2248
+cmp #3,R5
+blt L540
+L537:
+*line 2262
+*line 2263
+*line 2264
+clr R5
+bra L547
+L548:
+*line 2265
+*line 2266
+*line 2267
+move.b (R13)+,R7
+ext.w R7
+move R7,R8
+add.l #___atab,R8
+btst #7,(R8)
+beq L549
+*line 2267
+move R7,(sp)
+jsr _xdtoi
+move R0,R3
+*line 2268
+bra L550
+L549:
+*line 2269
+move #-4,R0
+bra L528
+L550:
+*line 2270
+*line 2271
+*line 2272
+move.b (R13)+,R7
+ext.w R7
+move R7,R8
+add.l #___atab,R8
+btst #7,(R8)
+beq L551
+*line 2272
+move R7,(sp)
+jsr _xdtoi
+clr R1
+move R3,R1
+lsl #4,R1
+add R1,R0
+move R0,R3
+*line 2273
+bra L552
+L551:
+*line 2274
+move #-4,R0
+bra L528
+L552:
+*line 2275
+*line 2276
+clr R0
+move R3,R0
+and #255,R0
+add R0,R6
+*line 2277
+clr R0
+move R3,R0
+and #255,R0
+move.b R0,(R12)
+*line 2278
+*line 2279
+*line 2280
+move.b (R12),R0
+ext.w R0
+and #255,R0
+clr R1
+move R3,R1
+and #255,R1
+cmp R1,R0
+beq L553
+*line 2280
+move #-5,R0
+bra L528
+*line 2281
+L553:
+*line 2282
+add.l #1,R12
+L546:
+*line 2264
+add #1,R5
+L547:
+*line 2264
+cmp R4,R5
+blt L548
+L545:
+*line 2283
+*line 2284
+*line 2285
+move R6,R0
+not R0
+move R0,R6
+and #255,R6
+*line 2286
+*line 2287
+*line 2288
+move.b (R13)+,R7
+ext.w R7
+move R7,R8
+add.l #___atab,R8
+btst #7,(R8)
+beq L554
+*line 2288
+move R7,(sp)
+jsr _xdtoi
+move R0,R3
+*line 2289
+bra L555
+L554:
+*line 2290
+move #-6,R0
+bra L528
+L555:
+*line 2291
+*line 2292
+*line 2293
+move.b (R13)+,R7
+ext.w R7
+move R7,R8
+add.l #___atab,R8
+btst #7,(R8)
+beq L556
+*line 2293
+move R7,(sp)
+jsr _xdtoi
+clr R1
+move R3,R1
+lsl #4,R1
+add R1,R0
+move R0,R3
+*line 2294
+bra L557
+L556:
+*line 2295
+move #-6,R0
+bra L528
+L557:
+*line 2296
+*line 2297
+*line 2298
+clr R0
+move R3,R0
+and #255,R0
+cmp R0,R6
+beq L558
+*line 2298
+move #-7,R0
+bra L528
+*line 2299
+L558:
+*line 2300
+move #1,R0
+bra L528
+*line 2301
+L559:
+*line 2302
+*line 2303
+*line 2304
+*line 2305
+move #10,(sp)
+move.l #L560,-(sp)
+move.l R13,-(sp)
+jsr _memcmpu
+addq.l #8,sp
+tst R0
+bne L561
+*line 2305
+clr R0
+bra L528
+*line 2306
+bra L562
+L561:
+*line 2307
+move #-8,R0
+bra L528
+L562:
+*line 2308
+L563:
+*line 2309
+*line 2310
+*line 2311
+move #-9,R0
+bra L528
+bra L530
+L531:cmp #50,R0
+beq L532
+cmp #57,R0
+beq L559
+bra L563
+L530:
+*line 2314
+move #-10,R0
+bra L528
+L528:tst.l (sp)+
+movem.l (sp)+,R3-R7/R12-R13
+unlk R14
+rts
+.globl _cx_load
+.text
+_cx_load:
+~~cx_load:
+link R14,#0
+movem.l R6-R7,-(sp)
+~rc=R7
+*line 2331
+L567:
+*line 2332
+*line 2333
+move.l #_cmdline,(sp)
+move #128,-(sp)
+move _cmdunit,-(sp)
+jsr _getrln
+addq.l #4,sp
+move R0,R7
+*line 2334
+*line 2335
+move R7,R0
+bra L569
+*line 2336
+L570:
+*line 2337
+*line 2338
+*line 2339
+move.l #_cmdline,(sp)
+jsr _do_srec
+move R0,R7
+*line 2340
+*line 2341
+*line 2341
+tst R7
+bge L571
+*line 2342
+*line 2343
+move R7,R0
+neg R0
+move R0,R7
+*line 2344
+move.l #L572,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2345
+move.l #L573,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2346
+move _cmdunit,(sp)
+move #3,-(sp)
+move R7,R8
+move.l R8,-(sp)
+jsr _putn
+addq.l #6,sp
+*line 2347
+move.l #L574,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2348
+clr R0
+bra L564
+*line 2349
+bra L575
+L571:
+*line 2350
+*line 2351
+*line 2352
+move.l #L576,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+L575:
+*line 2353
+*line 2354
+bra L566
+*line 2355
+*line 2356
+L577:
+*line 2357
+*line 2358
+*line 2359
+move #1,R7
+*line 2360
+move.l #L578,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+bra L566
+*line 2361
+*line 2362
+*line 2363
+*line 2364
+*line 2365
+L579:
+*line 2366
+*line 2367
+*line 2368
+move.l #L580,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2369
+move.l #L581,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2370
+move _cmdunit,(sp)
+move #2,-(sp)
+move R7,-(sp)
+jsr _puthn
+addq.l #4,sp
+*line 2371
+move.l #L582,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2372
+clr R0
+bra L564
+bra L568
+L569:cmp #13,R0
+beq L570
+cmp #24,R0
+beq L577
+bra L579
+L568:
+*line 2373
+*line 2374
+L566:
+*line 2375
+tst R7
+bne L567
+L565:
+*line 2377
+move #1,R0
+bra L564
+L564:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _cx_fill
+.text
+_cx_fill:
+~~cx_fill:
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~cp=R13
+*line 2392
+move.l _p_from,R13
+~count=R7
+*line 2395
+clr _redo
+*line 2397
+move.l _p_len,R7
+bra L586
+L587:
+*line 2398
+*line 2399
+move.l _p_value,R0
+and.l #$ff,R0
+ext.w R0
+move.b R0,(R13)
+*line 2400
+*line 2401
+*line 2401
+move.l _p_value,R0
+and.l #$ff,R0
+ext.w R0
+cmp.b (R13),R0
+beq L588
+*line 2402
+*line 2403
+move.l #L589,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2404
+move _cmdunit,(sp)
+move #8,-(sp)
+move.l R13,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 2405
+move.l #L590,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2406
+clr R0
+bra L583
+*line 2407
+*line 2408
+L588:
+*line 2409
+add.l #1,R13
+L585:
+*line 2397
+sub.l #$1,R7
+L586:
+*line 2397
+tst.l R7
+bgt L587
+L584:
+*line 2412
+move #1,R0
+bra L583
+L583:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _cx_wfil
+.text
+_cx_wfil:
+~~cx_wfil:
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~cp=R13
+*line 2427
+move.l _p_from,R13
+~count=R7
+*line 2430
+clr _redo
+*line 2432
+move.l _p_len,R7
+bra L594
+L595:
+*line 2433
+move.l _p_value,R0
+and.l #$ffff,R0
+move R0,(R13)+
+L593:
+*line 2432
+sub.l #$1,R7
+L594:
+*line 2432
+tst.l R7
+bgt L595
+L592:
+*line 2435
+move #1,R0
+bra L591
+L591:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _cx_copy
+.text
+_cx_copy:
+~~cx_copy:
+link R14,#0
+movem.l R6-R7/R12-R13,-(sp)
+~from=R13
+*line 2450
+move.l _p_from,R13
+~to=R12
+*line 2451
+move.l _p_to,R12
+~count=R7
+*line 2452
+move.l _p_len,R7
+*line 2454
+clr _redo
+*line 2456
+*line 2456
+cmp.l R13,R12
+bls L597
+*line 2457
+*line 2458
+add.l R7,R13
+*line 2459
+add.l R7,R12
+*line 2460
+*line 2461
+bra L600
+L599:
+*line 2462
+*line 2463
+sub.l #1,R13
+*line 2464
+sub.l #1,R12
+*line 2465
+move.b (R13),(R12)
+*line 2466
+*line 2467
+*line 2467
+move.b (R13),R0
+ext.w R0
+cmp.b (R12),R0
+beq L601
+*line 2468
+*line 2469
+move.l #L602,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2470
+move _cmdunit,(sp)
+move #8,-(sp)
+move.l R13,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 2471
+move.l #L603,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2472
+move _cmdunit,(sp)
+move #8,-(sp)
+move.l R12,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 2473
+move.l #L604,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2474
+move _cmdunit,(sp)
+move #2,-(sp)
+move.b (R13),R0
+ext.w R0
+ext.l R0
+move.l R0,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 2475
+move.l #L605,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2476
+move _cmdunit,(sp)
+move #2,-(sp)
+move.b (R12),R0
+ext.w R0
+ext.l R0
+move.l R0,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 2477
+move.l #L606,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2478
+clr R0
+bra L596
+*line 2479
+L601:L600:
+*line 2480
+move.l R7,R0
+sub.l #$1,R7
+tst.l R0
+bne L599
+L598:
+*line 2481
+*line 2482
+*line 2483
+*line 2484
+bra L607
+L597:
+*line 2485
+*line 2486
+*line 2487
+bra L610
+L609:
+*line 2488
+*line 2489
+move.b (R13),(R12)
+*line 2490
+*line 2491
+*line 2491
+move.b (R13),R0
+ext.w R0
+cmp.b (R12),R0
+beq L611
+*line 2492
+*line 2493
+move.l #L612,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2494
+move _cmdunit,(sp)
+move #8,-(sp)
+move.l R13,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 2495
+move.l #L613,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2496
+move _cmdunit,(sp)
+move #8,-(sp)
+move.l R12,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 2497
+move.l #L614,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2498
+move _cmdunit,(sp)
+move #2,-(sp)
+move.b (R13),R0
+ext.w R0
+ext.l R0
+move.l R0,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 2499
+move.l #L615,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2500
+move _cmdunit,(sp)
+move #2,-(sp)
+move.b (R12),R0
+ext.w R0
+ext.l R0
+move.l R0,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 2501
+move.l #L616,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2502
+clr R0
+bra L596
+*line 2503
+*line 2504
+L611:
+*line 2505
+add.l #1,R13
+*line 2506
+add.l #1,R12
+L610:
+*line 2507
+move.l R7,R0
+sub.l #$1,R7
+tst.l R0
+bne L609
+L608:L607:
+*line 2510
+move #1,R0
+bra L596
+L596:tst.l (sp)+
+movem.l (sp)+,R7-R7/R12-R13
+unlk R14
+rts
+.globl _cx_dump
+.text
+_cx_dump:
+~~cx_dump:
+link R14,#0
+movem.l R5-R7,-(sp)
+~nw=R7
+~rc=R6
+*line 2527
+move #1,_redo
+*line 2528
+move.l _p_from,_d_cur
+*line 2529
+move.l _p_to,R0
+add.l #1,R0
+move.l R0,_d_next
+*line 2530
+move.l _p_to,R0
+sub.l _p_from,R0
+add.l _d_next,R0
+move.l R0,_d_last
+*line 2531
+move.l _p_width,R0
+move R0,R7
+*line 2532
+move #1,R6
+*line 2534
+L620:
+*line 2535
+*line 2536
+move.l #L621,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2537
+move _cmdunit,(sp)
+move.l _p_from,-(sp)
+jsr _padr
+addq.l #4,sp
+*line 2538
+*line 2539
+clr _dflag
+*line 2540
+*line 2541
+*line 2542
+move _cmdunit,(sp)
+move R7,-(sp)
+move.l _p_to,-(sp)
+move.l _p_from,-(sp)
+jsr _ddump
+adda.l #10,sp
+tst R0
+beq L622
+*line 2542
+clr R6
+*line 2543
+L622:
+*line 2544
+*line 2545
+tst R6
+beq L623
+*line 2545
+*line 2546
+move _cmdunit,(sp)
+move R7,-(sp)
+move.l _p_to,-(sp)
+move.l _p_from,-(sp)
+jsr _dtext
+adda.l #10,sp
+tst R0
+beq L624
+*line 2546
+clr R6
+*line 2547
+L624:L623:
+*line 2548
+move.l _p_from,R0
+add.l _p_width,R0
+move.l R0,_p_from
+*line 2549
+*line 2550
+*line 2551
+tst _dflag
+beq L625
+*line 2551
+clr R6
+*line 2552
+L625:L619:
+*line 2553
+tst R6
+bne L620
+L618:
+*line 2555
+move.l _d_cur,_p_from
+*line 2557
+move.l #L626,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2558
+move.l #L627,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2560
+move #1,R0
+bra L617
+L617:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _wdump
+.text
+_wdump:
+~~wdump:
+~loc=R13
+~lastloc=R12
+~nwide=16
+~unit=18
+link R14,#0
+movem.l R7-R7/R12-R13,-(sp)
+*line 2577
+move.l 8(R14),R13
+*line 2577
+move.l 12(R14),R12
+*line 2577
+bra L631
+L630:
+*line 2578
+*line 2579
+move 18(R14),(sp)
+move #4,-(sp)
+clr.l R0
+move (R13),R0
+and.l #$ffff,R0
+move.l R0,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 2580
+move #32,(sp)
+move 18(R14),-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 2581
+*line 2582
+*line 2583
+move 18(R14),(sp)
+move #1,-(sp)
+jsr _trap13
+addq.l #2,sp
+tst.l R0
+beq L632
+*line 2583
+move #1,R0
+bra L628
+*line 2584
+L632:
+*line 2585
+*line 2585
+cmp.l R12,R13
+bne L633
+*line 2586
+*line 2587
+move #1,_dflag
+*line 2588
+clr R0
+bra L628
+*line 2589
+*line 2590
+L633:
+*line 2591
+add.l #2,R13
+L631:
+*line 2592
+move 16(R14),R0
+sub #1,16(R14)
+tst R0
+bne L630
+L629:
+*line 2594
+clr R0
+bra L628
+L628:tst.l (sp)+
+movem.l (sp)+,R12-R13
+unlk R14
+rts
+.globl _ldump
+.text
+_ldump:
+~~ldump:
+~loc=R13
+~lastloc=R12
+~nwide=16
+~unit=18
+link R14,#0
+movem.l R7-R7/R12-R13,-(sp)
+*line 2611
+move.l 8(R14),R13
+*line 2611
+move.l 12(R14),R12
+*line 2611
+bra L637
+L636:
+*line 2612
+*line 2613
+move 18(R14),(sp)
+move #8,-(sp)
+move.l (R13),-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 2614
+move #32,(sp)
+move 18(R14),-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 2615
+*line 2616
+*line 2617
+move 18(R14),(sp)
+move #1,-(sp)
+jsr _trap13
+addq.l #2,sp
+tst.l R0
+beq L638
+*line 2617
+move #1,R0
+bra L634
+*line 2618
+L638:
+*line 2619
+*line 2619
+cmp.l R12,R13
+bne L639
+*line 2620
+*line 2621
+move #1,_dflag
+*line 2622
+clr R0
+bra L634
+*line 2623
+*line 2624
+L639:
+*line 2625
+add.l #4,R13
+L637:
+*line 2626
+move 16(R14),R0
+sub #1,16(R14)
+tst R0
+bne L636
+L635:
+*line 2628
+clr R0
+bra L634
+L634:tst.l (sp)+
+movem.l (sp)+,R12-R13
+unlk R14
+rts
+.globl _cp_wdmp
+.text
+_cp_wdmp:
+~~cp_wdmp:
+link R14,#-4
+*line 2643
+move _ilast,_inext
+*line 2645
+*line 2646
+jsr _getarg
+tst R0
+beq L641
+*line 2646
+*line 2646
+move.l _p_from,(sp)
+move.l #_p_from,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L642
+*line 2647
+*line 2648
+clr _redo
+*line 2649
+clr R0
+bra L640
+*line 2650
+*line 2651
+L642:L641:
+*line 2652
+*line 2652
+btst #0,3+_p_from
+beq L643
+*line 2653
+*line 2654
+clr _redo
+*line 2655
+clr R0
+bra L640
+*line 2656
+*line 2657
+L643:
+*line 2658
+*line 2658
+cmp.b #13,_argsep
+beq L10009
+tst.b _argsep
+bne L644
+L10009:*line 2659
+*line 2660
+move.l _p_from,_p_to
+*line 2661
+move.l #$8,_p_width
+*line 2662
+move #1,_redo
+*line 2663
+move #1,R0
+bra L640
+*line 2664
+*line 2665
+L644:
+*line 2666
+*line 2667
+jsr _getarg
+tst R0
+beq L645
+*line 2667
+*line 2667
+move.l _p_to,(sp)
+move.l #_p_to,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L646
+*line 2668
+*line 2669
+clr _redo
+*line 2670
+clr R0
+bra L640
+*line 2671
+*line 2672
+L646:L645:
+*line 2673
+*line 2673
+btst #0,3+_p_to
+beq L647
+*line 2674
+*line 2675
+clr _redo
+*line 2676
+clr R0
+bra L640
+*line 2677
+*line 2678
+L647:
+*line 2679
+*line 2679
+cmp.b #13,_argsep
+beq L10010
+tst.b _argsep
+bne L648
+L10010:*line 2680
+*line 2681
+move.l #$8,_p_width
+*line 2682
+move #1,_redo
+*line 2683
+move #1,R0
+bra L640
+*line 2684
+*line 2685
+L648:
+*line 2686
+*line 2687
+jsr _getarg
+tst R0
+beq L649
+*line 2687
+*line 2687
+move.l _p_width,(sp)
+move.l #_p_width,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L650
+*line 2688
+*line 2689
+clr _redo
+*line 2690
+clr R0
+bra L640
+*line 2691
+*line 2692
+L650:L649:
+*line 2693
+move #1,_redo
+*line 2694
+move #1,R0
+bra L640
+L640:unlk R14
+rts
+.globl _cp_ldmp
+.text
+_cp_ldmp:
+~~cp_ldmp:
+link R14,#-4
+*line 2709
+move _ilast,_inext
+*line 2711
+*line 2712
+jsr _getarg
+tst R0
+beq L652
+*line 2712
+*line 2712
+move.l _p_from,(sp)
+move.l #_p_from,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L653
+*line 2713
+*line 2714
+clr _redo
+*line 2715
+clr R0
+bra L651
+*line 2716
+*line 2717
+L653:L652:
+*line 2718
+*line 2718
+btst #0,3+_p_from
+beq L654
+*line 2719
+*line 2720
+clr _redo
+*line 2721
+clr R0
+bra L651
+*line 2722
+*line 2723
+L654:
+*line 2724
+*line 2724
+cmp.b #13,_argsep
+beq L10011
+tst.b _argsep
+bne L655
+L10011:*line 2725
+*line 2726
+move.l _p_from,_p_to
+*line 2727
+move.l #$4,_p_width
+*line 2728
+move #1,_redo
+*line 2729
+move #1,R0
+bra L651
+*line 2730
+*line 2731
+L655:
+*line 2732
+*line 2733
+jsr _getarg
+tst R0
+beq L656
+*line 2733
+*line 2733
+move.l _p_to,(sp)
+move.l #_p_to,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L657
+*line 2734
+*line 2735
+clr _redo
+*line 2736
+clr R0
+bra L651
+*line 2737
+*line 2738
+L657:L656:
+*line 2739
+*line 2739
+btst #0,3+_p_to
+beq L658
+*line 2740
+*line 2741
+clr _redo
+*line 2742
+clr R0
+bra L651
+*line 2743
+*line 2744
+L658:
+*line 2745
+*line 2745
+cmp.b #13,_argsep
+beq L10012
+tst.b _argsep
+bne L659
+L10012:*line 2746
+*line 2747
+move.l #$4,_p_width
+*line 2748
+move #1,_redo
+*line 2749
+move #1,R0
+bra L651
+*line 2750
+*line 2751
+L659:
+*line 2752
+*line 2753
+jsr _getarg
+tst R0
+beq L660
+*line 2753
+*line 2753
+move.l _p_width,(sp)
+move.l #_p_width,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L661
+*line 2754
+*line 2755
+clr _redo
+*line 2756
+clr R0
+bra L651
+*line 2757
+*line 2758
+L661:L660:
+*line 2759
+move #1,_redo
+*line 2760
+move #1,R0
+bra L651
+L651:unlk R14
+rts
+.globl _cp_ilev
+.text
+_cp_ilev:
+~~cp_ilev:
+link R14,#-8
+~iplevl=-4
+*line 2777
+*line 2778
+cmp.b #13,_argsep
+beq L10013
+tst.b _argsep
+bne L663
+L10013:*line 2778
+move #1,R0
+bra L662
+*line 2779
+L663:
+*line 2780
+*line 2781
+jsr _getarg
+tst R0
+beq L664
+*line 2781
+*line 2782
+move.l -4(R14),(sp)
+move.l R14,-(sp)
+sub.l #4,(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L665
+*line 2782
+clr R0
+bra L662
+*line 2783
+L665:L664:
+*line 2784
+*line 2785
+cmp.l #$7,-4(R14)
+ble L666
+*line 2785
+clr R0
+bra L662
+*line 2786
+L666:
+*line 2787
+move.l -4(R14),R0
+move R0,_iplev
+*line 2789
+move #1,R0
+bra L662
+L662:unlk R14
+rts
+.globl _cx_ilev
+.text
+_cx_ilev:
+~~cx_ilev:
+link R14,#-4
+*line 2801
+*line 2801
+move _iplev,(sp)
+jsr _setipl
+cmp #-1,R0
+bne L668
+*line 2802
+*line 2803
+move _iplev,(sp)
+move.l #L669,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 2804
+clr R0
+bra L667
+*line 2805
+bra L670
+L668:
+*line 2806
+move _iplev,(sp)
+move.l #L671,-(sp)
+jsr _printf
+addq.l #4,sp
+L670:
+*line 2808
+move #1,R0
+bra L667
+L667:unlk R14
+rts
+.globl _cp_monc
+.text
+_cp_monc:
+~~cp_monc:
+link R14,#-4
+*line 2823
+*line 2824
+jsr _getarg
+tst R0
+beq L673
+*line 2824
+*line 2825
+move.l _monptr,(sp)
+move.l #_monptr,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L674
+*line 2825
+clr R0
+bra L672
+*line 2826
+L674:L673:
+*line 2827
+move #1,_monsw
+*line 2828
+move #1,_redo
+*line 2829
+move #1,R0
+bra L672
+L672:unlk R14
+rts
+.globl _cp_mons
+.text
+_cp_mons:
+~~cp_mons:
+link R14,#-4
+*line 2841
+*line 2842
+jsr _getarg
+tst R0
+beq L676
+*line 2842
+*line 2843
+move.l _monptr,(sp)
+move.l #_monptr,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L677
+*line 2843
+clr R0
+bra L675
+*line 2844
+L677:L676:
+*line 2845
+move #2,_monsw
+*line 2846
+move #1,_redo
+*line 2847
+move #1,R0
+bra L675
+L675:unlk R14
+rts
+.globl _cp_monl
+.text
+_cp_monl:
+~~cp_monl:
+link R14,#-4
+*line 2862
+*line 2863
+jsr _getarg
+tst R0
+beq L679
+*line 2863
+*line 2864
+move.l _monptr,(sp)
+move.l #_monptr,-(sp)
+jsr _setvar
+addq.l #4,sp
+tst R0
+bne L680
+*line 2864
+clr R0
+bra L678
+*line 2865
+L680:L679:
+*line 2866
+move #4,_monsw
+*line 2867
+move #1,_redo
+*line 2868
+move #1,R0
+bra L678
+L678:unlk R14
+rts
+.globl _cx_mon
+.text
+_cx_mon:
+~~cx_mon:
+link R14,#-4
+movem.l R2-R7/R12-R13,-(sp)
+~vc=R7
+~vcc=R6
+~vs=R5
+~vss=R4
+~vsp=R13
+~vl=R3
+~vll=-4
+~vlp=R12
+*line 2887
+move _monsw,R0
+bra L683
+*line 2888
+L684:
+*line 2889
+*line 2890
+*line 2891
+move.l _monptr,R8
+move.b (R8),R7
+and.b #255,R7
+*line 2892
+move _cmdunit,(sp)
+move #2,-(sp)
+move.b R7,R0
+ext.w R0
+ext.l R0
+move.l R0,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 2893
+move.l #L685,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2894
+*line 2895
+bra L688
+L687:
+*line 2896
+*line 2897
+move.l _monptr,R8
+move.b (R8),R6
+and.b #255,R6
+*line 2898
+*line 2899
+*line 2899
+cmp.b R6,R7
+beq L689
+*line 2900
+*line 2901
+move.b R6,R7
+*line 2902
+move _cmdunit,(sp)
+move #2,-(sp)
+move.b R7,R0
+ext.w R0
+ext.l R0
+move.l R0,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 2903
+move.l #L690,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2904
+L689:L688:
+*line 2905
+move #2,(sp)
+move #1,-(sp)
+jsr _trap13
+addq.l #2,sp
+and.l #$ffff,R0
+beq L687
+L686:
+*line 2906
+*line 2907
+move #2,(sp)
+move #2,-(sp)
+jsr _trap13
+addq.l #2,sp
+*line 2908
+move #1,R0
+bra L681
+*line 2909
+L691:
+*line 2910
+*line 2911
+*line 2912
+move.l _monptr,R13
+*line 2913
+move (R13),R5
+*line 2914
+move _cmdunit,(sp)
+move #4,-(sp)
+move R5,R8
+move.l R8,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 2915
+move.l #L692,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2916
+*line 2917
+bra L695
+L694:
+*line 2918
+*line 2919
+move (R13),R4
+*line 2920
+*line 2921
+*line 2921
+cmp R4,R5
+beq L696
+*line 2922
+*line 2923
+move R4,R5
+*line 2924
+move _cmdunit,(sp)
+move #4,-(sp)
+move R5,R8
+move.l R8,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 2925
+move.l #L697,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2926
+L696:L695:
+*line 2927
+move #2,(sp)
+move #1,-(sp)
+jsr _trap13
+addq.l #2,sp
+and.l #$ffff,R0
+beq L694
+L693:
+*line 2928
+*line 2929
+move #2,(sp)
+move #2,-(sp)
+jsr _trap13
+addq.l #2,sp
+*line 2930
+move #1,R0
+bra L681
+*line 2931
+*line 2932
+*line 2933
+L698:
+*line 2934
+*line 2935
+*line 2936
+move.l _monptr,R12
+*line 2937
+move.l (R12),R3
+*line 2938
+move _cmdunit,(sp)
+move #8,-(sp)
+move.l R3,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 2939
+move.l #L699,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2940
+*line 2941
+bra L702
+L701:
+*line 2942
+*line 2943
+move.l (R12),-4(R14)
+*line 2944
+*line 2945
+*line 2945
+cmp.l -4(R14),R3
+beq L703
+*line 2946
+*line 2947
+move.l -4(R14),R3
+*line 2948
+move _cmdunit,(sp)
+move #8,-(sp)
+move.l R3,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 2949
+move.l #L704,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2950
+L703:L702:
+*line 2951
+move #2,(sp)
+move #1,-(sp)
+jsr _trap13
+addq.l #2,sp
+and.l #$ffff,R0
+beq L701
+L700:
+*line 2952
+*line 2953
+move #2,(sp)
+move #2,-(sp)
+jsr _trap13
+addq.l #2,sp
+*line 2954
+move #1,R0
+bra L681
+*line 2955
+L705:
+*line 2956
+*line 2957
+clr R0
+bra L681
+bra L682
+L683:cmp #1,R0
+beq L684
+cmp #2,R0
+beq L691
+cmp #4,R0
+beq L698
+bra L705
+L682:L681:tst.l (sp)+
+movem.l (sp)+,R3-R7/R12-R13
+unlk R14
+rts
+.globl _cx_wdmp
+.text
+_cx_wdmp:
+~~cx_wdmp:
+link R14,#-8
+~nw=-2
+~rc=-4
+*line 2975
+move.l _p_from,_d_cur
+*line 2976
+move.l _p_to,R0
+add.l #2,R0
+move.l R0,_d_next
+*line 2977
+move.l _p_to,R0
+sub.l _p_from,R0
+add.l _d_next,R0
+move.l R0,_d_last
+*line 2978
+move.l _p_width,R0
+move R0,-2(R14)
+*line 2979
+move #1,-4(R14)
+*line 2981
+L709:
+*line 2982
+*line 2983
+move.l #L710,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 2984
+move _cmdunit,(sp)
+move.l _p_from,-(sp)
+jsr _padr
+addq.l #4,sp
+*line 2985
+clr _dflag
+*line 2986
+*line 2987
+*line 2988
+move _cmdunit,(sp)
+move -2(R14),-(sp)
+move.l _p_to,-(sp)
+move.l _p_from,-(sp)
+jsr _wdump
+adda.l #10,sp
+tst R0
+beq L711
+*line 2988
+clr -4(R14)
+*line 2989
+L711:
+*line 2990
+move.l _p_width,R0
+asl.l #$1,R0
+add.l _p_from,R0
+move.l R0,_p_from
+*line 2991
+*line 2992
+*line 2993
+tst _dflag
+beq L712
+*line 2993
+clr -4(R14)
+*line 2994
+L712:L708:
+*line 2995
+tst -4(R14)
+bne L709
+L707:
+*line 2997
+move.l _d_cur,_p_from
+*line 2999
+move.l #L713,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3000
+move.l #L714,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3001
+move #1,R0
+bra L706
+L706:unlk R14
+rts
+.globl _cx_ldmp
+.text
+_cx_ldmp:
+~~cx_ldmp:
+link R14,#-8
+~nw=-2
+~rc=-4
+*line 3018
+move.l _p_from,_d_cur
+*line 3019
+move.l _p_to,R0
+add.l #4,R0
+move.l R0,_d_next
+*line 3020
+move.l _p_to,R0
+sub.l _p_from,R0
+add.l _d_next,R0
+move.l R0,_d_last
+*line 3021
+move.l _p_width,R0
+move R0,-2(R14)
+*line 3022
+move #1,-4(R14)
+*line 3024
+L718:
+*line 3025
+*line 3026
+move.l #L719,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3027
+move _cmdunit,(sp)
+move.l _p_from,-(sp)
+jsr _padr
+addq.l #4,sp
+*line 3028
+clr _dflag
+*line 3029
+*line 3030
+*line 3031
+move _cmdunit,(sp)
+move -2(R14),-(sp)
+move.l _p_to,-(sp)
+move.l _p_from,-(sp)
+jsr _ldump
+adda.l #10,sp
+tst R0
+beq L720
+*line 3031
+clr -4(R14)
+*line 3032
+L720:
+*line 3033
+move.l _p_width,R0
+asl.l #$2,R0
+add.l _p_from,R0
+move.l R0,_p_from
+*line 3034
+*line 3035
+*line 3036
+tst _dflag
+beq L721
+*line 3036
+clr -4(R14)
+*line 3037
+L721:L717:
+*line 3038
+tst -4(R14)
+bne L718
+L716:
+*line 3040
+move.l _d_cur,_p_from
+*line 3042
+move.l #L722,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3043
+move.l #L723,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3044
+move #1,R0
+bra L715
+L715:unlk R14
+rts
+.globl _do_cmd
+.text
+_do_cmd:
+~~do_cmd:
+link R14,#-8
+~rc=-2
+~i=-4
+*line 3063
+move.l #L725,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3068
+move.l #_cmdline,(sp)
+move #128,-(sp)
+move _cmdunit,-(sp)
+jsr _getln
+addq.l #4,sp
+move R0,-2(R14)
+*line 3075
+move -2(R14),R0
+bra L727
+*line 3076
+L728:
+*line 3077
+*line 3078
+*line 3079
+move.l #L729,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3080
+*line 3081
+*line 3081
+jsr _getcmd
+tst R0
+beq L730
+*line 3082
+*line 3083
+clr -4(R14)
+bra L733
+L734:
+*line 3084
+*line 3085
+*line 3085
+move -4(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_cmtab,R9
+move.l 0(R8,R9.l),(sp)
+move.l #_argstr,-(sp)
+jsr _strcmp
+addq.l #4,sp
+tst R0
+bne L735
+*line 3086
+*line 3087
+move -4(R14),_ilast
+*line 3088
+*line 3089
+*line 3089
+move -4(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_cmtab,R9
+move.l 4(R8,R9.l),R8
+jsr (R8)
+tst R0
+beq L736
+*line 3090
+*line 3091
+*line 3092
+move -4(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_cmtab,R9
+move.l 8(R8,R9.l),R8
+jsr (R8)
+tst R0
+bne L737
+*line 3092
+move.l #L738,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3093
+L737:bra L739
+L736:
+*line 3094
+*line 3095
+*line 3096
+move.l #L740,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+L739:
+*line 3097
+*line 3098
+bra L724
+*line 3099
+*line 3100
+L735:L732:
+*line 3083
+add #1,-4(R14)
+L733:
+*line 3083
+cmp #34,-4(R14)
+blt L734
+L731:
+*line 3101
+*line 3102
+*line 3103
+move.l #L741,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+bra L724
+*line 3104
+*line 3105
+bra L742
+L730:
+*line 3106
+*line 3107
+*line 3108
+*line 3109
+*line 3110
+*line 3111
+*line 3111
+tst _redo
+beq L743
+*line 3112
+*line 3113
+*line 3114
+move _ilast,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_cmtab,R9
+move.l 8(R8,R9.l),R8
+jsr (R8)
+tst R0
+bne L744
+*line 3114
+move.l #L745,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3115
+L744:bra L746
+L743:
+*line 3116
+*line 3117
+*line 3118
+move.l #L747,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+L746:
+*line 3119
+*line 3120
+bra L724
+*line 3121
+L742:
+*line 3122
+*line 3123
+L748:
+*line 3124
+*line 3125
+*line 3126
+move.l #L749,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+bra L724
+*line 3127
+*line 3128
+L750:
+*line 3129
+*line 3130
+*line 3131
+move.l #L751,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+bra L724
+*line 3132
+bra L726
+L727:cmp #13,R0
+beq L728
+cmp #24,R0
+beq L748
+bra L750
+L726:
+*line 3135
+move.l #L752,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+bra L724
+L724:unlk R14
+rts
+.globl _cx_next
+.text
+_cx_next:
+~~cx_next:
+link R14,#-4
+*line 3151
+move.l _d_last,_p_to
+*line 3152
+move.l _d_next,_p_from
+*line 3153
+move _inext,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_cmtab,R9
+move.l 8(R8,R9.l),R8
+jsr (R8)
+bra L753
+L753:unlk R14
+rts
+.globl _cx_read
+.text
+_cx_read:
+~~cx_read:
+link R14,#-12
+~rc=-4
+~ns=-6
+~recno=-8
+*line 3171
+move.l _p_len,R0
+and.l #$7fff,R0
+move R0,-6(R14)
+*line 3172
+move.l _p_from,R0
+and.l #$ffff,R0
+move R0,-8(R14)
+*line 3174
+clr (sp)
+move -8(R14),-(sp)
+move -6(R14),-(sp)
+move.l _p_to,-(sp)
+move #2,-(sp)
+move #4,-(sp)
+jsr _trap13
+adda.l #12,sp
+move.l R0,-4(R14)
+*line 3176
+*line 3176
+move.l -4(R14),R0
+and.l #$ffff,R0
+beq L755
+*line 3177
+*line 3178
+move.l #L756,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3179
+move _cmdunit,(sp)
+move #8,-(sp)
+move.l -4(R14),-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 3180
+move.l #L757,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3181
+clr R0
+bra L754
+*line 3182
+bra L758
+L755:
+*line 3183
+*line 3184
+*line 3185
+move #1,R0
+bra L754
+L758:L754:unlk R14
+rts
+.globl _cx_writ
+.text
+_cx_writ:
+~~cx_writ:
+link R14,#-12
+~rc=-4
+~ns=-6
+~recno=-8
+*line 3204
+move.l _p_len,R0
+and.l #$7fff,R0
+move R0,-6(R14)
+*line 3205
+move.l _p_from,R0
+and.l #$ffff,R0
+move R0,-8(R14)
+*line 3207
+clr (sp)
+move -8(R14),-(sp)
+move -6(R14),-(sp)
+move.l _p_to,-(sp)
+move #3,-(sp)
+move #4,-(sp)
+jsr _trap13
+adda.l #12,sp
+move.l R0,-4(R14)
+*line 3209
+*line 3209
+move.l -4(R14),R0
+and.l #$ffff,R0
+beq L760
+*line 3210
+*line 3211
+move.l #L761,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3212
+move _cmdunit,(sp)
+move #8,-(sp)
+move.l -4(R14),-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 3213
+move.l #L762,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3214
+clr R0
+bra L759
+*line 3215
+bra L763
+L760:
+*line 3216
+*line 3217
+*line 3218
+move #1,R0
+bra L759
+L763:L759:unlk R14
+rts
+.globl _showrs
+.text
+_showrs:
+~~showrs:
+~rp=8
+link R14,#-8
+~i=-2
+~srtemp=-4
+*line 3237
+move.l #L765,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3239
+clr -2(R14)
+bra L768
+L769:
+*line 3240
+*line 3241
+move #32,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3242
+move -2(R14),(sp)
+add #48,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3243
+move.l #L770,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+L767:
+*line 3239
+add #1,-2(R14)
+L768:
+*line 3239
+cmp #8,-2(R14)
+blt L769
+L766:
+*line 3246
+move.l #L771,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3248
+clr -2(R14)
+bra L774
+L775:
+*line 3249
+*line 3250
+move #32,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3251
+move _cmdunit,(sp)
+move #8,-(sp)
+move.l 8(R14),R8
+move -2(R14),R9
+add.l R9,R9
+add.l R9,R9
+move.l 0(R8,R9.l),-(sp)
+jsr _puthn
+addq.l #6,sp
+L773:
+*line 3248
+add #1,-2(R14)
+L774:
+*line 3248
+cmp #8,-2(R14)
+blt L775
+L772:
+*line 3254
+move.l #L776,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3256
+clr -2(R14)
+bra L779
+L780:
+*line 3257
+*line 3258
+move #32,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3259
+move _cmdunit,(sp)
+move #8,-(sp)
+move.l 8(R14),R8
+move -2(R14),R9
+add.l R9,R9
+add.l R9,R9
+move.l 32(R8,R9.l),-(sp)
+jsr _puthn
+addq.l #6,sp
+L778:
+*line 3256
+add #1,-2(R14)
+L779:
+*line 3256
+cmp #8,-2(R14)
+blt L780
+L777:
+*line 3262
+move.l #L781,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3263
+move _cmdunit,(sp)
+move #8,-(sp)
+move.l 8(R14),R8
+move.l 68(R8),-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 3265
+move.l 8(R14),R8
+move 66(R8),-4(R14)
+*line 3266
+move.l #L782,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3267
+move _cmdunit,(sp)
+move #4,-(sp)
+clr.l R0
+move -4(R14),R0
+and.l #$ffff,R0
+move.l R0,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 3272
+move.l #L783,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3273
+move _cmdunit,(sp)
+move #1,-(sp)
+clr R0
+move -4(R14),R0
+lsr #8,R0
+swap R0
+clr R0
+swap R0
+move.l R0,-(sp)
+and.l #$7,(sp)
+jsr _puthn
+addq.l #6,sp
+*line 3274
+move.l #L784,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3276
+*line 3277
+clr R0
+move -4(R14),R0
+and #-32768,R0
+beq L785
+*line 3277
+move #84,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3278
+bra L786
+L785:
+*line 3279
+move #45,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+L786:
+*line 3281
+*line 3282
+btst #5,-4(R14)
+beq L787
+*line 3282
+move #83,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3283
+bra L788
+L787:
+*line 3284
+move #45,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+L788:
+*line 3286
+move #32,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3288
+*line 3289
+btst #4,-3(R14)
+beq L789
+*line 3289
+move #88,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3290
+bra L790
+L789:
+*line 3291
+move #45,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+L790:
+*line 3293
+*line 3294
+btst #3,-3(R14)
+beq L791
+*line 3294
+move #78,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3295
+bra L792
+L791:
+*line 3296
+move #45,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+L792:
+*line 3298
+*line 3299
+btst #2,-3(R14)
+beq L793
+*line 3299
+move #90,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3300
+bra L794
+L793:
+*line 3301
+move #45,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+L794:
+*line 3303
+*line 3304
+btst #1,-3(R14)
+beq L795
+*line 3304
+move #86,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3305
+bra L796
+L795:
+*line 3306
+move #45,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+L796:
+*line 3308
+*line 3309
+btst #0,-3(R14)
+beq L797
+*line 3309
+move #67,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3310
+bra L798
+L797:
+*line 3311
+move #45,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+L798:
+*line 3313
+move.l #L799,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+L764:unlk R14
+rts
+.globl _showcr
+.text
+_showcr:
+~~showcr:
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~i=R7
+~cause=R13
+~srtemp=R6
+*line 3331
+move.l #L801,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3332
+move.l #L802,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3334
+clr R7
+bra L805
+L806:
+*line 3335
+*line 3336
+move #32,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3337
+move R7,(sp)
+add #48,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3338
+move.l #L807,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+L804:
+*line 3334
+add #1,R7
+L805:
+*line 3334
+cmp #8,R7
+blt L806
+L803:
+*line 3341
+move.l #L808,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3343
+clr R7
+bra L811
+L812:
+*line 3344
+*line 3345
+move #32,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3346
+move _cmdunit,(sp)
+move #8,-(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_crshrg,R9
+move.l 0(R8,R9.l),-(sp)
+jsr _puthn
+addq.l #6,sp
+L810:
+*line 3343
+add #1,R7
+L811:
+*line 3343
+cmp #8,R7
+blt L812
+L809:
+*line 3349
+move.l #L813,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3351
+move #8,R7
+bra L816
+L817:
+*line 3352
+*line 3353
+move #32,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3354
+move _cmdunit,(sp)
+move #8,-(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_crshrg,R9
+move.l 0(R8,R9.l),-(sp)
+jsr _puthn
+addq.l #6,sp
+L815:
+*line 3351
+add #1,R7
+L816:
+*line 3351
+cmp #16,R7
+blt L817
+L814:
+*line 3357
+move.l #L818,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3358
+move _cmdunit,(sp)
+move #8,-(sp)
+move.l _crshpc,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 3360
+move _crshsr,R6
+*line 3361
+move.l #L819,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3362
+move _cmdunit,(sp)
+move #4,-(sp)
+clr.l R0
+move R6,R0
+and.l #$ffff,R0
+move.l R0,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 3367
+move.l #L820,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3368
+move _cmdunit,(sp)
+move #1,-(sp)
+clr R0
+move R6,R0
+lsr #8,R0
+swap R0
+clr R0
+swap R0
+move.l R0,-(sp)
+and.l #$7,(sp)
+jsr _puthn
+addq.l #6,sp
+*line 3369
+move.l #L821,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3371
+*line 3372
+clr R0
+move R6,R0
+and #-32768,R0
+beq L822
+*line 3372
+move #84,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3373
+bra L823
+L822:
+*line 3374
+move #45,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+L823:
+*line 3376
+*line 3377
+btst #13,R6
+beq L824
+*line 3377
+move #83,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3378
+bra L825
+L824:
+*line 3379
+move #45,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+L825:
+*line 3381
+move #32,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3383
+*line 3384
+btst #4,R6
+beq L826
+*line 3384
+move #88,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3385
+bra L827
+L826:
+*line 3386
+move #45,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+L827:
+*line 3388
+*line 3389
+btst #3,R6
+beq L828
+*line 3389
+move #78,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3390
+bra L829
+L828:
+*line 3391
+move #45,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+L829:
+*line 3393
+*line 3394
+btst #2,R6
+beq L830
+*line 3394
+move #90,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3395
+bra L831
+L830:
+*line 3396
+move #45,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+L831:
+*line 3398
+*line 3399
+btst #1,R6
+beq L832
+*line 3399
+move #86,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3400
+bra L833
+L832:
+*line 3401
+move #45,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+L833:
+*line 3403
+*line 3404
+btst #0,R6
+beq L834
+*line 3404
+move #67,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3405
+bra L835
+L834:
+*line 3406
+move #45,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+L835:
+*line 3408
+move.l #L836,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3412
+move.l #L837,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3413
+move _cmdunit,(sp)
+move #2,-(sp)
+move.b _crshvc,R0
+ext.w R0
+ext.l R0
+move.l R0,-(sp)
+jsr _putn
+addq.l #6,sp
+*line 3415
+move.l #L838,R13
+*line 3417
+move.b _crshvc,R0
+ext.w R0
+and #255,R0
+bra L840
+*line 3418
+L841:
+*line 3419
+*line 3420
+*line 3421
+move.l #L842,R13
+bra L839
+*line 3422
+*line 3423
+L843:
+*line 3424
+*line 3425
+*line 3426
+move.l #L844,R13
+bra L839
+*line 3427
+*line 3428
+L845:
+*line 3429
+*line 3430
+*line 3431
+move.l #L846,R13
+bra L839
+*line 3432
+*line 3433
+L847:
+*line 3434
+*line 3435
+*line 3436
+move.l #L848,R13
+bra L839
+*line 3437
+*line 3438
+L849:
+*line 3439
+*line 3440
+*line 3441
+move.l #L850,R13
+bra L839
+*line 3442
+*line 3443
+L851:
+*line 3444
+*line 3445
+*line 3446
+move.l #L852,R13
+bra L839
+*line 3447
+*line 3448
+L853:
+*line 3449
+*line 3450
+*line 3451
+move.l #L854,R13
+bra L839
+*line 3452
+*line 3453
+L855:
+*line 3454
+*line 3455
+*line 3456
+move.l #L856,R13
+bra L839
+*line 3457
+*line 3458
+L857:
+*line 3459
+*line 3460
+*line 3461
+move.l #L858,R13
+bra L839
+*line 3462
+*line 3463
+L859:
+*line 3464
+*line 3465
+*line 3466
+move.l #L860,R13
+bra L839
+*line 3467
+*line 3468
+L861:
+*line 3469
+*line 3470
+*line 3471
+move.l #L862,R13
+bra L839
+*line 3472
+*line 3473
+L863:
+*line 3474
+*line 3475
+*line 3476
+move.l #L864,R13
+bra L839
+*line 3477
+*line 3478
+L865:
+*line 3479
+*line 3480
+*line 3481
+move.l #L866,R13
+bra L839
+*line 3482
+*line 3483
+L867:
+*line 3484
+*line 3485
+*line 3486
+move.l #L868,R13
+bra L839
+*line 3487
+*line 3488
+L869:
+*line 3489
+*line 3490
+*line 3491
+move.l #L870,R13
+bra L839
+*line 3492
+*line 3493
+L871:
+*line 3494
+*line 3495
+*line 3496
+move.l #L872,R13
+bra L839
+*line 3497
+*line 3498
+L873:
+*line 3499
+*line 3500
+*line 3501
+move.l #L874,R13
+bra L839
+*line 3502
+*line 3503
+L875:
+*line 3504
+*line 3505
+*line 3506
+move.l #L876,R13
+bra L839
+*line 3507
+*line 3508
+L877:
+*line 3509
+*line 3510
+*line 3511
+move.l #L878,R13
+bra L839
+*line 3512
+*line 3513
+bra L839
+L840:sub #2,R0
+cmp #29,R0
+bhi L839
+asl #2,R0
+move R0,R8
+add.l #L879,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L879:.dc.l L841
+.dc.l L843
+.dc.l L845
+.dc.l L847
+.dc.l L849
+.dc.l L851
+.dc.l L853
+.dc.l L855
+.dc.l L857
+.dc.l L859
+.dc.l L839
+.dc.l L839
+.dc.l L839
+.dc.l L861
+.dc.l L839
+.dc.l L839
+.dc.l L839
+.dc.l L839
+.dc.l L839
+.dc.l L839
+.dc.l L839
+.dc.l L839
+.dc.l L863
+.dc.l L865
+.dc.l L867
+.dc.l L869
+.dc.l L871
+.dc.l L873
+.dc.l L875
+.dc.l L877
+.text
+L839:
+*line 3516
+move.l R13,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3517
+move.l #L880,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+L800:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.globl _cx_crsh
+.text
+_cx_crsh:
+~~cx_crsh:
+link R14,#-4
+*line 3532
+*line 3533
+tst _wzcrsh
+bne L882
+*line 3533
+move.l #L883,(sp)
+jsr _printf
+*line 3534
+L882:
+*line 3535
+clr _redo
+*line 3536
+jsr _showcr
+*line 3537
+move #1,R0
+bra L881
+L881:unlk R14
+rts
+.globl _bphit
+.text
+_bphit:
+~~bphit:
+link R14,#-6
+~rc=-2
+*line 3554
+clr -2(R14)
+*line 3556
+*line 3556
+move.l _regptr,R8
+move.l 68(R8),R0
+cmp.l _p_ba0,R0
+bne L885
+*line 3557
+*line 3558
+*line 3558
+move.l _p_ba0,R8
+cmp #20047,(R8)
+bne L886
+*line 3559
+*line 3560
+move.l _p_ba0,R8
+move _p_bv0,(R8)
+*line 3561
+clr.l _p_ba0
+*line 3562
+move #20047,_p_bv0
+*line 3563
+move #1,-2(R14)
+*line 3564
+bra L887
+L886:
+*line 3565
+*line 3566
+*line 3567
+move.l #L888,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3568
+move _cmdunit,(sp)
+move #8,-(sp)
+move.l _p_ba0,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 3569
+move.l #L889,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3570
+move _cmdunit,(sp)
+move #4,-(sp)
+move.l _p_ba0,R8
+clr R0
+move (R8),R0
+swap R0
+clr R0
+swap R0
+and.l #$ffff,R0
+move.l R0,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 3571
+move.l #L890,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3572
+move _cmdunit,(sp)
+move #4,-(sp)
+move.l #$4e4f,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 3573
+move.l #L891,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3574
+move #1,-2(R14)
+L887:
+*line 3575
+*line 3576
+*line 3577
+*line 3578
+*line 3579
+*line 3580
+L885:
+*line 3581
+*line 3581
+move.l _regptr,R8
+move.l 68(R8),R0
+cmp.l _p_ba1,R0
+bne L892
+*line 3582
+*line 3583
+*line 3583
+move.l _p_ba1,R8
+cmp #20047,(R8)
+bne L893
+*line 3584
+*line 3585
+move.l _p_ba1,R8
+move _p_bv1,(R8)
+*line 3586
+clr.l _p_ba1
+*line 3587
+move #20047,_p_bv1
+*line 3588
+move #1,-2(R14)
+*line 3589
+bra L894
+L893:
+*line 3590
+*line 3591
+*line 3592
+move.l #L895,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3593
+move _cmdunit,(sp)
+move #8,-(sp)
+move.l _p_ba0,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 3594
+move.l #L896,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3595
+move _cmdunit,(sp)
+move #4,-(sp)
+move.l _p_ba1,R8
+clr R0
+move (R8),R0
+swap R0
+clr R0
+swap R0
+and.l #$ffff,R0
+move.l R0,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 3596
+move.l #L897,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3597
+move _cmdunit,(sp)
+move #4,-(sp)
+move.l #$4e4f,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 3598
+move.l #L898,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3599
+move #1,-2(R14)
+L894:
+*line 3600
+*line 3601
+*line 3602
+*line 3603
+L892:
+*line 3604
+*line 3604
+tst.l _p_ba0
+beq L899
+*line 3605
+*line 3606
+*line 3606
+move.l _p_ba0,R8
+cmp #20047,(R8)
+bne L900
+*line 3607
+*line 3608
+move.l _p_ba0,R8
+move _p_bv0,(R8)
+*line 3609
+clr.l _p_ba0
+*line 3610
+move #20047,_p_bv0
+*line 3611
+move #1,-2(R14)
+*line 3612
+bra L901
+L900:
+*line 3613
+*line 3614
+*line 3615
+move.l #L902,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3616
+move _cmdunit,(sp)
+move #8,-(sp)
+move.l _p_ba0,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 3617
+move.l #L903,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3618
+move _cmdunit,(sp)
+move #4,-(sp)
+move.l _p_ba0,R8
+clr R0
+move (R8),R0
+swap R0
+clr R0
+swap R0
+and.l #$ffff,R0
+move.l R0,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 3619
+move.l #L904,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3620
+move _cmdunit,(sp)
+move #4,-(sp)
+move.l #$4e4f,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 3621
+move.l #L905,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3622
+move #1,-2(R14)
+L901:
+*line 3623
+*line 3624
+*line 3625
+*line 3626
+*line 3627
+*line 3628
+L899:
+*line 3629
+*line 3629
+tst.l _p_ba1
+beq L906
+*line 3630
+*line 3631
+*line 3631
+move.l _p_ba1,R8
+cmp #20047,(R8)
+bne L907
+*line 3632
+*line 3633
+move.l _p_ba1,R8
+move _p_bv1,(R8)
+*line 3634
+clr.l _p_ba1
+*line 3635
+move #20047,_p_bv1
+*line 3636
+move #1,-2(R14)
+*line 3637
+bra L908
+L907:
+*line 3638
+*line 3639
+*line 3640
+move.l #L909,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3641
+move _cmdunit,(sp)
+move #8,-(sp)
+move.l _p_ba0,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 3642
+move.l #L910,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3643
+move _cmdunit,(sp)
+move #4,-(sp)
+move.l _p_ba1,R8
+clr R0
+move (R8),R0
+swap R0
+clr R0
+swap R0
+and.l #$ffff,R0
+move.l R0,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 3644
+move.l #L911,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3645
+move _cmdunit,(sp)
+move #4,-(sp)
+move.l #$4e4f,-(sp)
+jsr _puthn
+addq.l #6,sp
+*line 3646
+move.l #L912,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3647
+move #1,-2(R14)
+L908:
+*line 3648
+*line 3649
+*line 3650
+L906:
+*line 3651
+*line 3652
+tst -2(R14)
+beq L913
+*line 3652
+move -2(R14),R0
+bra L884
+*line 3653
+L913:
+*line 3654
+move.l #L914,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3655
+clr R0
+bra L884
+L884:unlk R14
+rts
+.globl _cx_regs
+.text
+_cx_regs:
+~~cx_regs:
+link R14,#-4
+*line 3670
+move.l _regptr,(sp)
+jsr _showrs
+*line 3671
+move #1,R0
+bra L915
+L915:unlk R14
+rts
+.globl _rompbp
+.text
+_rompbp:
+~~rompbp:
+~d0=8
+~d1=12
+~d2=16
+~d3=20
+~d4=24
+~d5=28
+~d6=32
+~d7=36
+~a0=40
+~a1=44
+~a2=48
+~a3=52
+~a4=56
+~a5=60
+~a6=64
+~a7=68
+~sr0=72
+~sr=74
+~pc=76
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 3690
+lea 8(R14),R8
+move.l R8,_regptr
+*line 3691
+sub.l #$2,76(R14)
+*line 3693
+*line 3694
+move _iplev,(sp)
+jsr _setipl
+cmp #-1,R0
+bne L917
+*line 3694
+move.l #L918,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3695
+L917:
+*line 3696
+*line 3696
+tst _first1
+beq L919
+*line 3697
+*line 3698
+clr R7
+bra L922
+L923:
+*line 3699
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l _regptr,R8
+move.l #$0,(R8)
+L921:
+*line 3698
+add #1,R7
+L922:
+*line 3698
+cmp #8,R7
+blt L923
+L920:
+*line 3699
+*line 3700
+*line 3701
+clr R7
+bra L926
+L927:
+*line 3702
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l _regptr,R8
+move.l #$0,32(R8)
+L925:
+*line 3701
+add #1,R7
+L926:
+*line 3701
+cmp #7,R7
+blt L927
+L924:
+*line 3702
+*line 3703
+*line 3704
+move.l _regptr,R8
+move.l #$ffffe,60(R8)
+*line 3705
+*line 3706
+move #8704,74(R14)
+*line 3707
+add.l #$2,76(R14)
+*line 3708
+bra L928
+L919:
+*line 3709
+*line 3710
+*line 3711
+move.l #L929,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3712
+*line 3713
+move.l _regptr,(sp)
+jsr _showrs
+*line 3714
+*line 3715
+*line 3716
+jsr _bphit
+tst R0
+bne L930
+*line 3716
+add.l #$2,76(R14)
+*line 3717
+L930:L928:
+*line 3720
+clr _first1
+*line 3721
+clr _exflag
+*line 3723
+L933:
+*line 3724
+*line 3725
+jsr _do_cmd
+*line 3726
+L932:
+*line 3727
+tst _exflag
+beq L933
+L931:bra L916
+L916:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _progid
+.text
+_progid:
+~~progid:
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+~pcptr=R13
+*line 3748
+move.l #L935,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3763
+move.l #L936,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3764
+move.l #L937,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3766
+move.l #L938,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 3767
+move.l #$100002,R13
+*line 3768
+move _cmdunit,(sp)
+move #2,-(sp)
+move.b (R13)+,R0
+ext.w R0
+ext.l R0
+move.l R0,-(sp)
+jsr _putn
+addq.l #6,sp
+*line 3769
+move #46,(sp)
+move _cmdunit,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 3770
+move _cmdunit,(sp)
+move #2,-(sp)
+move.b (R13)+,R0
+ext.w R0
+ext.l R0
+move.l R0,-(sp)
+jsr _putn
+addq.l #6,sp
+*line 3771
+move.l #_promdate,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+L934:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _pclr
+.text
+_pclr:
+~~pclr:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 3793
+move.l #$ea60,_ftimer
+*line 3795
+bra L942
+L941:
+*line 3796
+*line 3797
+move.l _afi,R0
+asr.l #$8,R0
+and.l #$7f,R0
+move R0,_asig
+*line 3798
+*line 3799
+*line 3799
+tst _asig
+bne L943
+*line 3800
+*line 3801
+*line 3802
+*line 3803
+clr R7
+bra L946
+L947:
+*line 3804
+*line 3805
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_sigtab,R8
+clr (R8)
+*line 3806
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_sigtab,R8
+clr 2(R8)
+L945:
+*line 3803
+add #1,R7
+L946:
+*line 3803
+cmp #128,R7
+blt L947
+L944:
+*line 3807
+*line 3808
+bra L940
+*line 3809
+*line 3810
+*line 3811
+L943:
+*line 3812
+*line 3813
+move.l _ftimer,R0
+sub.l #$1,_ftimer
+tst.l R0
+bge L948
+*line 3813
+move #-1,R0
+bra L939
+L948:L942:
+*line 3814
+move #8,(sp)
+jsr _trap14
+move.l R0,_afi
+cmp.l #$ffffffff,R0
+bne L941
+L940:
+*line 3816
+clr R0
+bra L939
+L939:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _pscan
+.text
+_pscan:
+~~pscan:
+link R14,#0
+movem.l R5-R7,-(sp)
+~i=R7
+~c=R6
+*line 3833
+*line 3833
+move _ledcntr,R0
+sub #1,_ledcntr
+tst R0
+bne L950
+*line 3834
+*line 3835
+*line 3836
+move _baseled,R0
+add #3,R0
+cmp #23,R0
+ble L951
+*line 3836
+move _baseled,R0
+add #-21,R0
+move.b R0,_io_leds
+*line 3837
+bra L952
+L951:
+*line 3838
+move _baseled,R0
+add #3,R0
+move.b R0,_io_leds
+L952:
+*line 3839
+*line 3840
+move _baseled,R0
+add #128,R0
+move.b R0,_io_leds
+*line 3841
+*line 3842
+*line 3843
+add #1,_baseled
+move _baseled,R0
+cmp #23,R0
+ble L953
+*line 3843
+clr _baseled
+*line 3844
+L953:
+*line 3845
+move #200,_ledcntr
+*line 3846
+*line 3847
+L950:
+*line 3848
+clr _aflag
+*line 3850
+*line 3850
+move #8,(sp)
+jsr _trap14
+move.l R0,_afi
+cmp.l #$ffffffff,R0
+beq L954
+*line 3851
+*line 3852
+move.l _afi,R0
+asr.l #$8,R0
+and.l #$7f,R0
+move R0,_asig
+*line 3853
+move.l _afi,R0
+asr.l #$7,R0
+and.l #$1,R0
+move R0,_astat
+*line 3854
+move.l _afi,R0
+and.l #$7f,R0
+move R0,_aval
+*line 3855
+*line 3856
+*line 3856
+tst _asig
+beq L955
+*line 3857
+*line 3858
+move #1,_aflag
+*line 3859
+*line 3860
+move _asig,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_sigtab,R8
+move _aval,(R8)
+*line 3861
+move _asig,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_sigtab,R8
+move _astat,2(R8)
+*line 3862
+bra L956
+L955:
+*line 3863
+*line 3864
+*line 3865
+clr _aflag
+*line 3866
+*line 3867
+clr R7
+bra L959
+L960:
+*line 3868
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_sigtab,R8
+clr 2(R8)
+L958:
+*line 3867
+add #1,R7
+L959:
+*line 3867
+cmp #128,R7
+blt L960
+L957:
+*line 3868
+L956:
+*line 3869
+*line 3870
+*line 3871
+*line 3872
+L954:
+*line 3873
+*line 3873
+tst _aflag
+beq L961
+*line 3874
+*line 3875
+*line 3875
+tst _astat
+beq L962
+cmp #39,_asig
+bne L962
+*line 3876
+*line 3877
+clr R7
+bra L965
+L966:
+*line 3878
+move R7,R0
+add #128,R0
+move.b R0,_io_leds
+L964:
+*line 3877
+add #1,R7
+L965:
+*line 3877
+cmp #24,R7
+blt L966
+L963:
+*line 3878
+*line 3879
+*line 3880
+move.b #31,_io_leds
+*line 3881
+*line 3882
+*line 3883
+*line 3884
+clr _B_log_s
+*line 3885
+clr _B_dbg_s
+*line 3886
+*line 3887
+jsr _hdvini
+*line 3888
+clr __bpbin
+*line 3889
+*line 3890
+*line 3891
+clr.l (sp)
+move.l #L967,-(sp)
+jsr _booter
+addq.l #4,sp
+tst R0
+beq L968
+*line 3891
+clr R0
+bra L949
+*line 3892
+bra L969
+L968:
+*line 3893
+move.l #$ffffe,(sp)
+move.l _B_buf_a,-(sp)
+jsr _sjumpto
+addq.l #4,sp
+L969:
+*line 3894
+bra L970
+L962:
+*line 3895
+*line 3895
+tst _astat
+beq L971
+cmp #40,_asig
+bne L971
+*line 3896
+*line 3897
+clr R7
+bra L974
+L975:
+*line 3898
+move R7,R0
+add #128,R0
+move.b R0,_io_leds
+L973:
+*line 3897
+add #1,R7
+L974:
+*line 3897
+cmp #24,R7
+blt L975
+L972:
+*line 3898
+*line 3899
+*line 3900
+move #1,R0
+bra L949
+*line 3901
+L971:L970:
+*line 3902
+*line 3903
+*line 3904
+*line 3905
+*line 3906
+L961:
+*line 3907
+*line 3907
+move #2,(sp)
+move #1,-(sp)
+jsr _trap13
+addq.l #2,sp
+tst.l R0
+beq L976
+*line 3908
+*line 3909
+move #2,(sp)
+move #2,-(sp)
+jsr _trap13
+addq.l #2,sp
+and.l #$7f,R0
+move R0,R6
+*line 3910
+*line 3911
+*line 3912
+cmp #114,R6
+beq L10014
+cmp #82,R6
+bne L977
+L10014:*line 3912
+move #1,R0
+bra L949
+L977:
+*line 3913
+*line 3914
+L976:
+*line 3915
+clr R0
+bra L949
+L949:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _main
+.text
+_main:
+~~main:
+link R14,#0
+movem.l R6-R7/R12-R13,-(sp)
+~i=R7
+~pdptr=R13
+~pcptr=R12
+*line 3935
+move.l #$100008,R12
+*line 3936
+move.l #_promdate,R13
+*line 3937
+move.b #32,(R13)+
+*line 3938
+move.b #45,(R13)+
+*line 3939
+move.b #45,(R13)+
+*line 3940
+move.b #32,(R13)+
+*line 3941
+move.b (R12),R0
+ext.w R0
+asr #4,R0
+and #15,R0
+add #48,R0
+move.b R0,(R13)+
+*line 3942
+move.b (R12)+,R0
+ext.w R0
+and #15,R0
+add #48,R0
+move.b R0,(R13)+
+*line 3943
+move.b (R12),R0
+ext.w R0
+asr #4,R0
+and #15,R0
+add #48,R0
+move.b R0,(R13)+
+*line 3944
+move.b (R12)+,R0
+ext.w R0
+and #15,R0
+add #48,R0
+move.b R0,(R13)+
+*line 3945
+move.b #45,(R13)+
+*line 3946
+move.b (R12),R0
+ext.w R0
+asr #4,R0
+and #15,R0
+add #48,R0
+move.b R0,(R13)+
+*line 3947
+move.b (R12)+,R0
+ext.w R0
+and #15,R0
+add #48,R0
+move.b R0,(R13)+
+*line 3948
+move.b #45,(R13)+
+*line 3949
+move.b (R12),R0
+ext.w R0
+asr #4,R0
+and #15,R0
+add #48,R0
+move.b R0,(R13)+
+*line 3950
+move.b (R12)+,R0
+ext.w R0
+and #15,R0
+add #48,R0
+move.b R0,(R13)+
+*line 3951
+clr.b (R13)+
+*line 3955
+*line 3956
+move.l #$fffe,(sp)
+move.l #$ffffe,-(sp)
+move.l #$10000,-(sp)
+move.l #L979,-(sp)
+move.l #_hs_mtst,-(sp)
+jsr _sprintf
+adda.l #16,sp
+*line 3958
+move #2,_cmdunit
+*line 3960
+clr _ilast
+*line 3961
+clr _inext
+*line 3962
+move #2,_iplev
+*line 3964
+clr _dflag
+*line 3965
+clr _exflag
+*line 3966
+clr _redo
+*line 3967
+clr _goflag
+*line 3968
+clr _b0flag
+*line 3969
+clr _b1flag
+*line 3971
+move.l #$100000,_p_goto
+*line 3972
+clr.l _p_len
+*line 3973
+move.l #$10,_p_width
+*line 3974
+clr.l _p_value
+*line 3976
+clr.l _p_ba0
+*line 3977
+move #20047,_p_bv0
+*line 3979
+clr.l _p_ba1
+*line 3980
+move #20047,_p_bv1
+*line 3982
+clr.l _tba0
+*line 3983
+clr.l _tba1
+*line 3985
+clr _inext
+*line 3987
+jsr _tsetup
+*line 3990
+move #21,_baseled
+*line 3991
+clr _ledcntr
+*line 3992
+move.b #159,_io_leds
+*line 3993
+jsr _GLCinit
+*line 3995
+move.l #L980,(sp)
+move #1,-(sp)
+clr -(sp)
+jsr _GLCtext
+addq.l #4,sp
+*line 3996
+move.l #L981,(sp)
+move #1,-(sp)
+move #1,-(sp)
+jsr _GLCtext
+addq.l #4,sp
+*line 3998
+move.l #L982,(sp)
+move #15,-(sp)
+move #3,-(sp)
+jsr _GLCtext
+addq.l #4,sp
+*line 4000
+*line 4001
+move.l #_promdate,(sp)
+move.b $100003,R0
+ext.w R0
+move R0,-(sp) 
+move.b $100002,R0
+ext.w R0
+move R0,-(sp) 
+move.l #L983,-(sp)
+move.l #_idbuf,-(sp)
+jsr _sprintf
+adda.l #12,sp
+*line 4002
+move.l #_idbuf,(sp)
+move #30,-(sp)
+move #5,-(sp)
+jsr _GLCtext
+addq.l #4,sp
+*line 4004
+move.l #L985,(sp)
+move.l #L984,-(sp)
+move.l #_idbuf,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 4005
+move.l #_idbuf,(sp)
+move #30,-(sp)
+move #6,-(sp)
+jsr _GLCtext
+addq.l #4,sp
+*line 4006
+clr (sp)
+clr -(sp)
+jsr _GLCcrc
+addq.l #2,sp
+*line 4008
+move.l #_trap15,(sp)
+move #47,-(sp)
+move #5,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 4010
+clr R7
+bra L988
+L989:
+*line 4011
+*line 4012
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_sigtab,R8
+clr (R8)
+*line 4013
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_sigtab,R8
+clr 2(R8)
+L987:
+*line 4010
+add #1,R7
+L988:
+*line 4010
+cmp #128,R7
+blt L989
+L986:
+*line 4016
+move #9,(sp)
+jsr _trap14
+*line 4017
+move #2,(sp)
+jsr _setipl
+*line 4018
+jsr _pclr
+*line 4019
+move #9,(sp)
+jsr _trap14
+*line 4021
+bra L992
+L991:L992:
+*line 4021
+jsr _pscan
+tst R0
+beq L991
+L990:
+*line 4026
+*line 4027
+move.l #_restart,(sp)
+jsr _setjmp
+tst R0
+beq L993
+*line 4027
+move.l #L994,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 4028
+L993:
+*line 4029
+jsr _tsetup
+*line 4030
+jsr _progid
+*line 4032
+move.l #_trap15,(sp)
+move #47,-(sp)
+move #5,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 4033
+move.l #L995,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+*line 4037
+move #1,_first1
+*line 4039
+bra L998
+L997:
+*line 4040
+*line 4041
+jsr _xtrap15
+*line 4042
+move.l #L999,(sp)
+move _cmdunit,-(sp)
+jsr _writeln
+addq.l #2,sp
+L998:
+*line 4043
+bra L997
+L996:L978:tst.l (sp)+
+movem.l (sp)+,R7-R7/R12-R13
+unlk R14
+rts
+.data
+L1:.dc.b $61,$64,$69,$73,$70,$0
+L2:.dc.b $0
+L3:.dc.b $62,$6F,$6F,$74,$0
+L4:.dc.b $0
+L5:.dc.b $62,$70,$62,$0
+L6:.dc.b $0
+L7:.dc.b $63,$68,$65,$63,$6B,$0
+L8:.dc.b $73,$74,$61,$72,$74,$2C,$65,$6E,$64,$0
+L9:.dc.b $63,$6F,$70,$79,$0
+L10:.dc.b $66,$72,$6F,$6D,$2C,$74,$6F,$2C,$6C,$65,$6E,$0
+L11:.dc.b $63,$72,$61,$73,$68,$0
+L12:.dc.b $0
+L13:.dc.b $64,$69,$6E,$69,$74,$0
+L14:.dc.b $0
+L15:.dc.b $64,$75,$6D,$70,$0
+L16:.dc.b $66,$72,$6F,$6D,$5B,$2C,$5B,$74,$6F,$3D,$66,$72,$6F,$6D,$5D,$5B,$2C,$77,$69,$64,$74,$68,$3D,$31,$36,$5D,$5D,$0
+L17:.dc.b $65,$78,$69,$74,$0
+L18:.dc.b $0
+L19:.dc.b $66,$69,$6C,$6C,$0
+L20:.dc.b $6C,$6F,$63,$2C,$63,$6F,$75,$6E,$74,$2C,$62,$79,$74,$65,$0
+L21:.dc.b $67,$6F,$0
+L22:.dc.b $5B,$61,$64,$64,$72,$5D,$5B,$2C,$5B,$62,$72,$6B,$31,$5D,$5B,$2C,$62,$72,$6B,$32,$5D,$5D,$0
+L23:.dc.b $68,$65,$6C,$70,$0
+L24:.dc.b $0
+L25:.dc.b $69,$70,$6C,$0
+L26:.dc.b $6C,$65,$76,$65,$6C,$0
+L27:.dc.b $6C,$64,$75,$6D,$70,$0
+L28:.dc.b $66,$72,$6F,$6D,$5B,$2C,$5B,$74,$6F,$3D,$66,$72,$6F,$6D,$5D,$5B,$2C,$77,$69,$64,$74,$68,$3D,$34,$5D,$5D,$0
+L29:.dc.b $6C,$6F,$61,$64,$0
+L30:.dc.b $0
+L31:.dc.b $6D,$69,$64,$61,$73,$0
+L32:.dc.b $0
+L33:.dc.b $6D,$6F,$6E,$63,$0
+L34:.dc.b $61,$64,$64,$72,$0
+L35:.dc.b $6D,$6F,$6E,$73,$0
+L36:.dc.b $61,$64,$64,$72,$0
+L37:.dc.b $6D,$6F,$6E,$6C,$0
+L38:.dc.b $61,$64,$64,$72,$0
+L39:.dc.b $6D,$73,$65,$74,$0
+L40:.dc.b $61,$64,$64,$72,$2C,$62,$31,$5B,$2C,$2E,$2E,$2E,$2C,$62,$6E,$5D,$0
+L41:.dc.b $6D,$74,$65,$73,$74,$0
+L42:.dc.b $6E,$65,$78,$74,$0
+L43:.dc.b $0
+L44:.dc.b $6F,$62,$6D,$61,$70,$0
+L45:.dc.b $0
+L46:.dc.b $72,$65,$61,$64,$0
+L47:.dc.b $73,$65,$63,$74,$6F,$72,$2C,$62,$75,$66,$66,$65,$72,$2C,$63,$6F,$75,$6E,$74,$0
+L48:.dc.b $72,$65,$67,$73,$0
+L49:.dc.b $0
+L50:.dc.b $72,$65,$73,$65,$74,$0
+L51:.dc.b $0
+L52:.dc.b $72,$73,$65,$74,$0
+L53:.dc.b $72,$65,$67,$69,$73,$74,$65,$72,$2C,$76,$61,$6C,$75,$65,$0
+L54:.dc.b $76,$72,$65,$67,$73,$0
+L55:.dc.b $0
+L56:.dc.b $76,$72,$73,$65,$74,$0
+L57:.dc.b $72,$65,$67,$69,$73,$74,$65,$72,$2C,$76,$61,$6C,$75,$65,$0
+L58:.dc.b $77,$64,$75,$6D,$70,$0
+L59:.dc.b $66,$72,$6F,$6D,$5B,$2C,$5B,$74,$6F,$3D,$66,$72,$6F,$6D,$5D,$5B,$2C,$77,$69,$64,$74,$68,$3D,$38,$5D,$5D,$0
+L60:.dc.b $77,$66,$69,$6C,$6C,$0
+L61:.dc.b $6C,$6F,$63,$2C,$63,$6F,$75,$6E,$74,$2C,$77,$6F,$72,$64,$0
+L62:.dc.b $77,$72,$69,$74,$65,$0
+L63:.dc.b $73,$65,$63,$74,$6F,$72,$2C,$62,$75,$66,$66,$65,$72,$2C,$63,$6F,$75,$6E,$74,$0
+L64:.dc.b $77,$73,$65,$74,$0
+L65:.dc.b $61,$64,$64,$72,$2C,$77,$31,$5B,$2C,$2E,$2E,$2E,$2C,$77,$6E,$5D,$0
+L66:.dc.b $7A,$61,$70,$0
+L67:.dc.b $0
+L69:.dc.b $64,$30,$0
+L70:.dc.b $64,$31,$0
+L71:.dc.b $64,$32,$0
+L72:.dc.b $64,$33,$0
+L73:.dc.b $64,$34,$0
+L74:.dc.b $64,$35,$0
+L75:.dc.b $64,$36,$0
+L76:.dc.b $64,$37,$0
+L77:.dc.b $61,$30,$0
+L78:.dc.b $61,$31,$0
+L79:.dc.b $61,$32,$0
+L80:.dc.b $61,$33,$0
+L81:.dc.b $61,$34,$0
+L82:.dc.b $61,$35,$0
+L83:.dc.b $61,$36,$0
+L84:.dc.b $61,$37,$0
+L85:.dc.b $73,$72,$0
+L86:.dc.b $70,$63,$0
+L87:.dc.b $73,$70,$0
+L88:.dc.b $72,$30,$0
+L89:.dc.b $72,$31,$0
+L90:.dc.b $72,$32,$0
+L91:.dc.b $72,$33,$0
+L92:.dc.b $72,$34,$0
+L93:.dc.b $72,$35,$0
+L94:.dc.b $72,$36,$0
+L95:.dc.b $72,$37,$0
+L96:.dc.b $72,$38,$0
+L97:.dc.b $72,$39,$0
+L98:.dc.b $72,$31,$30,$0
+L99:.dc.b $72,$31,$31,$0
+L100:.dc.b $72,$31,$32,$0
+L101:.dc.b $72,$31,$33,$0
+L102:.dc.b $72,$31,$34,$0
+L103:.dc.b $72,$31,$35,$0
+L104:.dc.b $68,$30,$0
+L105:.dc.b $68,$31,$0
+L106:.dc.b $68,$32,$0
+L107:.dc.b $68,$33,$0
+L108:.dc.b $76,$30,$0
+L109:.dc.b $76,$31,$0
+L110:.dc.b $76,$32,$0
+L111:.dc.b $76,$33,$0
+L115:.dc.b $6D,$69,$64,$61,$73,$2E,$61,$62,$73,$0
+L130:.dc.b $46,$69,$6C,$65,$20,$6E,$61,$6D,$65,$3A,$20,$0
+L131:.dc.b $D,$A,$0
+L133:.dc.b $D,$A,$2D,$2D,$2D,$2D,$2D,$20,$43,$61,$6E,$63,$65,$6C,$6C,$65,$64,$20,$2D,$2D,$2D,$2D,$2D,$D,$A,$0
+L135:.dc.b $D,$A,$2A,$2A,$20,$49,$6E,$76,$61,$6C,$69,$64,$20,$70,$61,$72,$61,$6D,$65,$74,$65,$72,$20,$2A,$2A,$D,$A,$0
+L191:.dc.b $A,$0
+L192:.dc.b $20,$20,$20,$20,$20,$20,$20,$78,$30,$20,$20,$20,$20,$20,$78,$31,$20,$20,$20,$20,$20,$78,$32,$20,$20,$20,$20,$20,$78,$33
+.dc.b $20,$20,$20,$20,$20,$78,$34,$20,$20,$20,$20,$20,$78,$35,$20,$20,$20,$20,$20,$78,$36,$20,$20,$20,$20,$20,$78,$37,$20,$20
+.dc.b $20,$20,$20,$78,$38,$20,$20,$20,$20,$20,$78,$39,$D,$A,$0
+L193:.dc.b $20,$20,$20,$20,$20,$2D,$2D,$2D,$2D,$2D,$20,$20,$2D,$2D,$2D,$2D,$2D,$20,$20,$2D,$2D,$2D,$2D,$2D,$20,$20,$2D,$2D,$2D,$2D
+.dc.b $2D,$20,$20,$2D,$2D,$2D,$2D,$2D,$20,$20,$2D,$2D,$2D,$2D,$2D,$20,$20,$2D,$2D,$2D,$2D,$2D,$20,$20,$2D,$2D,$2D,$2D,$2D,$20
+.dc.b $20,$2D,$2D,$2D,$2D,$2D,$20,$20,$2D,$2D,$2D,$2D,$2D,$D,$A,$0
+L198:.dc.b $25,$30,$31,$64,$78,$20,$20,$20,$0
+L204:.dc.b $25,$31,$64,$3A,$25,$33,$64,$20,$20,$0
+L206:.dc.b $20,$20,$20,$20,$20,$20,$20,$0
+L208:.dc.b $A,$0
+L209:.dc.b $A,$54,$65,$6D,$70,$6F,$20,$20,$20,$20,$20,$3D,$20,$25,$33,$64,$2C,$20,$20,$54,$69,$6D,$65,$20,$20,$20,$20,$20,$20,$3D
+.dc.b $20,$25,$33,$64,$2C,$20,$20,$54,$75,$6E,$69,$6E,$67,$20,$3D,$20,$25,$33,$64,$2C,$20,$20,$4C,$65,$76,$65,$6C,$20,$3D,$20
+.dc.b $25,$33,$64,$A,$0
+L210:.dc.b $4C,$6F,$6E,$67,$50,$6F,$74,$20,$4C,$20,$3D,$20,$25,$33,$64,$2C,$20,$20,$4C,$6F,$6E,$67,$50,$6F,$74,$20,$52,$20,$3D,$20
+.dc.b $25,$33,$64,$2C,$20,$20,$53,$63,$72,$6F,$6C,$6C,$20,$3D,$20,$25,$33,$64,$A,$0
+L211:.dc.b $54,$61,$62,$6C,$65,$74,$20,$58,$20,$20,$3D,$20,$25,$33,$64,$2C,$20,$20,$54,$61,$62,$6C,$65,$74,$20,$59,$20,$20,$3D,$20
+.dc.b $25,$33,$64,$A,$0
+L212:.dc.b $43,$75,$72,$73,$6F,$72,$20,$58,$20,$20,$3D,$20,$25,$33,$64,$2C,$20,$20,$43,$75,$72,$73,$6F,$72,$20,$59,$20,$20,$3D,$20
+.dc.b $25,$33,$64,$A,$0
+L345:.dc.b $25,$30,$38,$6C,$58,$20,$77,$61,$73,$20,$25,$30,$34,$58,$2C,$20,$65,$78,$70,$65,$63,$74,$65,$64,$20,$25,$30,$34,$58,$D
+.dc.b $A,$0
+L349:.dc.b $25,$30,$38,$6C,$58,$20,$77,$61,$73,$20,$25,$30,$34,$58,$2C,$20,$65,$78,$70,$65,$63,$74,$65,$64,$20,$25,$30,$34,$58,$D
+.dc.b $A,$0
+L367:.dc.b $50,$72,$20,$42,$2F,$43,$20,$4C,$6F,$63,$6E,$20,$20,$20,$20,$20,$20,$57,$64,$20,$58,$6C,$6F,$63,$20,$46,$6C,$61,$67,$73
+.dc.b $D,$A,$0
+L373:.dc.b $25,$32,$64,$20,$25,$73,$20,$0
+L374:.dc.b $43,$68,$72,$0
+L375:.dc.b $42,$69,$74,$0
+L376:.dc.b $24,$25,$30,$38,$6C,$58,$20,$25,$32,$64,$20,$25,$34,$64,$20,$0
+L377:.dc.b $24,$25,$30,$34,$58,$D,$A,$0
+L379:.dc.b $D,$A,$0
+L386:.dc.b $20,$20,$20,$20,$20,$0
+L387:.dc.b $20,$20,$0
+L388:.dc.b $D,$A,$0
+L389:.dc.b $D,$A,$0
+L392:.dc.b $D,$A,$A,$45,$52,$52,$4F,$52,$20,$2D,$2D,$20,$55,$6E,$61,$62,$6C,$65,$20,$74,$6F,$20,$72,$65,$61,$64,$20,$42,$50,$42
+.dc.b $D,$A,$A,$0
+L394:.dc.b $D,$A,$A,$42,$50,$42,$20,$76,$61,$6C,$75,$65,$73,$3A,$D,$A,$0
+L395:.dc.b $D,$A,$20,$20,$20,$72,$65,$63,$73,$69,$7A,$20,$20,$20,$0
+L396:.dc.b $D,$A,$20,$20,$20,$63,$6C,$73,$69,$7A,$20,$20,$20,$20,$20,$0
+L397:.dc.b $D,$A,$20,$20,$20,$63,$6C,$73,$69,$7A,$62,$20,$20,$20,$0
+L398:.dc.b $D,$A,$20,$20,$20,$72,$64,$6C,$65,$6E,$20,$20,$20,$20,$20,$0
+L399:.dc.b $D,$A,$20,$20,$20,$66,$73,$69,$7A,$20,$20,$20,$20,$20,$20,$0
+L400:.dc.b $D,$A,$20,$20,$20,$66,$61,$74,$72,$65,$63,$20,$20,$20,$0
+L401:.dc.b $D,$A,$20,$20,$20,$64,$61,$74,$72,$65,$63,$20,$20,$20,$0
+L402:.dc.b $D,$A,$20,$20,$20,$6E,$75,$6D,$63,$6C,$20,$20,$20,$20,$0
+L403:.dc.b $D,$A,$20,$20,$20,$62,$66,$6C,$61,$67,$73,$20,$20,$20,$20,$0
+L404:.dc.b $D,$A,$20,$20,$20,$6E,$74,$72,$61,$63,$6B,$73,$20,$20,$20,$0
+L405:.dc.b $D,$A,$20,$20,$20,$6E,$73,$69,$64,$65,$73,$20,$20,$20,$20,$0
+L406:.dc.b $D,$A,$20,$20,$20,$73,$65,$63,$2F,$63,$79,$6C,$20,$20,$0
+L407:.dc.b $D,$A,$20,$20,$20,$73,$65,$63,$2F,$74,$72,$6B,$20,$20,$0
+L408:.dc.b $D,$A,$20,$20,$20,$68,$69,$64,$64,$65,$6E,$20,$20,$20,$20,$0
+L409:.dc.b $D,$A,$A,$0
+L415:.dc.b $D,$A,$A,$2A,$2A,$20,$42,$72,$65,$61,$6B,$70,$6F,$69,$6E,$74,$20,$30,$20,$61,$74,$20,$0
+L416:.dc.b $20,$77,$61,$73,$20,$0
+L417:.dc.b $20,$69,$6E,$73,$74,$65,$61,$64,$20,$6F,$66,$20,$0
+L418:.dc.b $20,$2A,$2A,$D,$A,$A,$0
+L422:.dc.b $D,$A,$A,$2A,$2A,$20,$42,$72,$65,$61,$6B,$70,$6F,$69,$6E,$74,$20,$31,$20,$61,$74,$20,$0
+L423:.dc.b $20,$77,$61,$73,$20,$0
+L424:.dc.b $20,$69,$6E,$73,$74,$65,$61,$64,$20,$6F,$66,$20,$0
+L425:.dc.b $20,$2A,$2A,$D,$A,$A,$0
+L485:.dc.b $43,$68,$65,$63,$6B,$73,$75,$6D,$20,$3D,$20,$30,$78,$25,$30,$38,$6C,$58,$D,$A,$0
+L524:.dc.b $20,$20,$0
+L525:.dc.b $3A,$0
+L526:.dc.b $20,$20,$0
+L527:.dc.b $D,$A,$0
+L560:.dc.b $30,$34,$30,$30,$30,$30,$30,$30,$46,$42,$0
+L572:.dc.b $3F,$D,$0
+L573:.dc.b $2A,$2A,$20,$4C,$6F,$61,$64,$20,$65,$72,$72,$6F,$72,$20,$0
+L574:.dc.b $20,$2A,$2A,$D,$A,$A,$0
+L576:.dc.b $4B,$D,$0
+L578:.dc.b $4B,$D,$0
+L580:.dc.b $3F,$D,$0
+L581:.dc.b $2A,$2A,$20,$4C,$6F,$61,$64,$20,$61,$62,$6F,$72,$74,$65,$64,$20,$6F,$6E,$20,$0
+L582:.dc.b $20,$2A,$2A,$D,$A,$A,$0
+L589:.dc.b $D,$A,$2A,$2A,$20,$46,$49,$4C,$4C,$20,$66,$61,$69,$6C,$65,$64,$20,$61,$74,$20,$0
+L590:.dc.b $20,$2A,$2A,$D,$A,$0
+L602:.dc.b $D,$A,$2A,$2A,$20,$43,$4F,$50,$59,$20,$66,$61,$69,$6C,$65,$64,$20,$66,$72,$6F,$6D,$20,$0
+L603:.dc.b $20,$74,$6F,$20,$0
+L604:.dc.b $20,$77,$69,$74,$68,$20,$28,$66,$72,$6F,$6D,$29,$20,$3D,$20,$0
+L605:.dc.b $20,$61,$6E,$64,$20,$28,$74,$6F,$29,$20,$3D,$20,$0
+L606:.dc.b $20,$2A,$2A,$D,$A,$0
+L612:.dc.b $D,$A,$2A,$2A,$20,$43,$4F,$50,$59,$20,$66,$61,$69,$6C,$65,$64,$20,$66,$72,$6F,$6D,$20,$0
+L613:.dc.b $20,$74,$6F,$20,$0
+L614:.dc.b $20,$77,$69,$74,$68,$20,$28,$66,$72,$6F,$6D,$29,$20,$3D,$20,$0
+L615:.dc.b $20,$61,$6E,$64,$20,$28,$74,$6F,$29,$20,$3D,$20,$0
+L616:.dc.b $20,$2A,$2A,$D,$A,$0
+L621:.dc.b $D,$A,$0
+L626:.dc.b $D,$A,$0
+L627:.dc.b $D,$A,$0
+L669:.dc.b $45,$52,$52,$4F,$52,$20,$2D,$2D,$20,$43,$6F,$75,$6C,$64,$20,$6E,$6F,$74,$20,$73,$65,$74,$20,$49,$50,$4C,$20,$74,$6F,$20
+.dc.b $25,$64,$D,$A,$0
+L671:.dc.b $52,$4F,$4D,$50,$20,$49,$50,$4C,$20,$6E,$6F,$77,$20,$73,$65,$74,$20,$74,$6F,$20,$25,$64,$D,$A,$0
+L685:.dc.b $D,$A,$0
+L690:.dc.b $D,$A,$0
+L692:.dc.b $D,$A,$0
+L697:.dc.b $D,$A,$0
+L699:.dc.b $D,$A,$0
+L704:.dc.b $D,$A,$0
+L710:.dc.b $D,$A,$0
+L713:.dc.b $D,$A,$0
+L714:.dc.b $D,$A,$0
+L719:.dc.b $D,$A,$0
+L722:.dc.b $D,$A,$0
+L723:.dc.b $D,$A,$0
+L725:.dc.b $52,$4F,$4D,$50,$3A,$20,$0
+L729:.dc.b $D,$A,$0
+L738:.dc.b $D,$A,$2A,$2A,$20,$43,$6F,$6D,$6D,$61,$6E,$64,$20,$65,$72,$72,$6F,$72,$20,$2A,$2A,$D,$A,$0
+L740:.dc.b $D,$A,$2A,$2A,$20,$49,$6E,$76,$61,$6C,$69,$64,$20,$70,$61,$72,$61,$6D,$65,$74,$65,$72,$20,$2A,$2A,$D,$A,$0
+L741:.dc.b $D,$A,$2A,$2A,$20,$55,$6E,$72,$65,$63,$6F,$67,$6E,$69,$7A,$65,$64,$20,$63,$6F,$6D,$6D,$61,$6E,$64,$20,$2A,$2A,$D,$A,$0
+L745:.dc.b $D,$A,$2A,$2A,$20,$43,$6F,$6D,$6D,$61,$6E,$64,$20,$65,$72,$72,$6F,$72,$20,$2A,$2A,$D,$A,$0
+L747:.dc.b $D,$A,$2A,$2A,$20,$43,$6F,$6D,$6D,$61,$6E,$64,$20,$6E,$6F,$74,$20,$72,$65,$70,$65,$61,$74,$61,$62,$6C,$65,$20,$2A,$2A
+.dc.b $D,$A,$0
+L749:.dc.b $D,$A,$2D,$2D,$2D,$2D,$2D,$20,$43,$61,$6E,$63,$65,$6C,$6C,$65,$64,$20,$2D,$2D,$2D,$2D,$2D,$D,$A,$0
+L751:.dc.b $D,$A,$2A,$2A,$20,$49,$6E,$76,$61,$6C,$69,$64,$20,$6C,$69,$6E,$65,$20,$74,$65,$72,$6D,$69,$6E,$61,$74,$6F,$72,$20,$2A
+.dc.b $2A,$D,$A,$0
+L752:.dc.b $D,$A,$2A,$2A,$20,$64,$6F,$5F,$63,$6D,$64,$28,$29,$20,$73,$77,$69,$74,$63,$68,$20,$66,$61,$69,$6C,$65,$64,$20,$2A,$2A
+.dc.b $D,$A,$0
+L756:.dc.b $D,$A,$45,$52,$52,$4F,$52,$20,$72,$65,$61,$64,$69,$6E,$67,$20,$64,$69,$73,$6B,$3A,$20,$20,$0
+L757:.dc.b $D,$A,$A,$0
+L761:.dc.b $D,$A,$45,$52,$52,$4F,$52,$20,$77,$72,$69,$74,$69,$6E,$67,$20,$64,$69,$73,$6B,$3A,$20,$20,$0
+L762:.dc.b $D,$A,$A,$0
+L765:.dc.b $20,$20,$20,$20,$20,$20,$20,$0
+L770:.dc.b $5F,$5F,$5F,$5F,$5F,$5F,$5F,$0
+L771:.dc.b $D,$A,$64,$30,$2E,$2E,$64,$37,$20,$0
+L776:.dc.b $D,$A,$61,$30,$2E,$2E,$61,$37,$20,$0
+L781:.dc.b $D,$A,$50,$43,$20,$3D,$20,$20,$0
+L782:.dc.b $2C,$20,$20,$20,$20,$53,$52,$20,$3D,$20,$0
+L783:.dc.b $20,$20,$28,$49,$50,$4C,$20,$3D,$20,$0
+L784:.dc.b $2C,$20,$0
+L799:.dc.b $20,$29,$D,$A,$0
+L801:.dc.b $42,$49,$4F,$53,$20,$43,$72,$61,$73,$68,$20,$41,$72,$65,$61,$20,$44,$75,$6D,$70,$D,$A,$0
+L802:.dc.b $20,$20,$20,$20,$20,$20,$20,$0
+L807:.dc.b $5F,$5F,$5F,$5F,$5F,$5F,$5F,$0
+L808:.dc.b $D,$A,$64,$30,$2E,$2E,$64,$37,$20,$0
+L813:.dc.b $D,$A,$61,$30,$2E,$2E,$61,$37,$20,$0
+L818:.dc.b $D,$A,$A,$50,$43,$20,$3D,$20,$20,$0
+L819:.dc.b $2C,$20,$20,$20,$20,$53,$52,$20,$3D,$20,$0
+L820:.dc.b $20,$20,$28,$49,$50,$4C,$20,$3D,$20,$0
+L821:.dc.b $2C,$20,$0
+L836:.dc.b $20,$29,$D,$A,$0
+L837:.dc.b $54,$52,$41,$50,$20,$76,$65,$63,$74,$6F,$72,$20,$6E,$75,$6D,$62,$65,$72,$20,$3D,$20,$0
+L838:.dc.b $20,$20,$28,$6E,$6F,$20,$68,$61,$6E,$64,$6C,$65,$72,$20,$66,$6F,$72,$20,$69,$6E,$74,$65,$72,$72,$75,$70,$74,$29,$0
+L842:.dc.b $20,$20,$28,$42,$75,$73,$20,$65,$72,$72,$6F,$72,$29,$0
+L844:.dc.b $20,$20,$28,$41,$64,$64,$72,$65,$73,$73,$20,$65,$72,$72,$6F,$72,$29,$0
+L846:.dc.b $20,$20,$28,$49,$6C,$6C,$65,$67,$61,$6C,$20,$69,$6E,$73,$74,$72,$75,$63,$74,$69,$6F,$6E,$29,$0
+L848:.dc.b $20,$20,$28,$5A,$65,$72,$6F,$20,$64,$69,$76,$69,$64,$65,$29,$0
+L850:.dc.b $20,$20,$28,$43,$48,$4B,$20,$69,$6E,$73,$74,$72,$75,$63,$74,$69,$6F,$6E,$29,$0
+L852:.dc.b $20,$20,$28,$54,$52,$41,$50,$56,$20,$69,$6E,$73,$74,$72,$75,$63,$74,$69,$6F,$6E,$29,$0
+L854:.dc.b $20,$20,$28,$50,$72,$69,$76,$69,$6C,$65,$67,$65,$20,$76,$69,$6F,$6C,$61,$74,$69,$6F,$6E,$29,$0
+L856:.dc.b $20,$20,$28,$54,$72,$61,$63,$65,$20,$2D,$2D,$20,$6E,$6F,$74,$20,$69,$6D,$70,$6C,$65,$6D,$65,$6E,$74,$65,$64,$29,$0
+L858:.dc.b $20,$20,$28,$4C,$69,$6E,$65,$20,$31,$30,$31,$30,$20,$45,$6D,$75,$6C,$61,$74,$6F,$72,$20,$2D,$2D,$20,$6E,$6F,$74,$20,$69
+.dc.b $6D,$70,$6C,$65,$6D,$65,$6E,$74,$65,$64,$29,$0
+L860:.dc.b $20,$20,$28,$4C,$69,$6E,$65,$20,$31,$31,$31,$31,$20,$45,$6D,$75,$6C,$61,$74,$6F,$72,$20,$2D,$2D,$20,$6E,$6F,$74,$20,$69
+.dc.b $6D,$70,$6C,$65,$6D,$65,$6E,$74,$65,$64,$0
+L862:.dc.b $20,$20,$28,$55,$6E,$69,$6E,$69,$74,$69,$61,$6C,$69,$7A,$65,$64,$20,$69,$6E,$74,$65,$72,$72,$75,$70,$74,$29,$0
+L864:.dc.b $20,$20,$28,$53,$70,$75,$72,$69,$6F,$75,$73,$20,$69,$6E,$74,$65,$72,$72,$75,$70,$74,$29,$0
+L866:.dc.b $20,$20,$28,$4C,$65,$76,$65,$6C,$20,$31,$20,$49,$6E,$74,$65,$72,$72,$75,$70,$74,$20,$2D,$2D,$20,$75,$6E,$69,$6D,$70,$6C
+.dc.b $6D,$65,$6E,$74,$65,$64,$29,$0
+L868:.dc.b $20,$20,$28,$4C,$65,$76,$65,$6C,$20,$32,$20,$49,$6E,$74,$65,$72,$72,$75,$70,$74,$20,$2D,$2D,$20,$75,$6E,$69,$6D,$70,$6C
+.dc.b $6D,$65,$6E,$74,$65,$64,$29,$0
+L870:.dc.b $20,$20,$28,$4C,$65,$76,$65,$6C,$20,$33,$20,$49,$6E,$74,$65,$72,$72,$75,$70,$74,$20,$2D,$2D,$20,$75,$6E,$69,$6D,$70,$6C
+.dc.b $6D,$65,$6E,$74,$65,$64,$29,$0
+L872:.dc.b $20,$20,$28,$4C,$65,$76,$65,$6C,$20,$34,$20,$49,$6E,$74,$65,$72,$72,$75,$70,$74,$20,$2D,$2D,$20,$75,$6E,$69,$6D,$70,$6C
+.dc.b $6D,$65,$6E,$74,$65,$64,$29,$0
+L874:.dc.b $20,$20,$28,$4C,$65,$76,$65,$6C,$20,$35,$20,$49,$6E,$74,$65,$72,$72,$75,$70,$74,$20,$2D,$2D,$20,$75,$6E,$69,$6D,$70,$6C
+.dc.b $6D,$65,$6E,$74,$65,$64,$29,$0
+L876:.dc.b $20,$20,$28,$4C,$65,$76,$65,$6C,$20,$36,$20,$49,$6E,$74,$65,$72,$72,$75,$70,$74,$20,$2D,$2D,$20,$75,$6E,$69,$6D,$70,$6C
+.dc.b $6D,$65,$6E,$74,$65,$64,$29,$0
+L878:.dc.b $20,$20,$28,$4C,$65,$76,$65,$6C,$20,$37,$20,$49,$6E,$74,$65,$72,$72,$75,$70,$74,$20,$2D,$2D,$20,$75,$6E,$69,$6D,$70,$6C
+.dc.b $6D,$65,$6E,$74,$65,$64,$29,$0
+L880:.dc.b $D,$A,$0
+L883:.dc.b $2A,$2A,$20,$43,$72,$61,$73,$68,$20,$73,$77,$69,$74,$63,$68,$20,$4E,$4F,$54,$20,$73,$65,$74,$20,$2A,$2A,$D,$A,$0
+L888:.dc.b $2A,$2A,$20,$42,$72,$65,$61,$6B,$70,$6F,$69,$6E,$74,$20,$77,$6F,$72,$64,$20,$61,$74,$20,$0
+L889:.dc.b $20,$77,$61,$73,$20,$0
+L890:.dc.b $20,$69,$6E,$73,$74,$65,$61,$64,$20,$6F,$66,$20,$0
+L891:.dc.b $20,$2A,$2A,$D,$A,$A,$0
+L895:.dc.b $2A,$2A,$20,$42,$72,$65,$61,$6B,$70,$6F,$69,$6E,$74,$20,$77,$6F,$72,$64,$20,$61,$74,$20,$0
+L896:.dc.b $20,$77,$61,$73,$20,$0
+L897:.dc.b $20,$69,$6E,$73,$74,$65,$61,$64,$20,$6F,$66,$20,$0
+L898:.dc.b $20,$2A,$2A,$D,$A,$A,$0
+L902:.dc.b $2A,$2A,$20,$42,$72,$65,$61,$6B,$70,$6F,$69,$6E,$74,$20,$77,$6F,$72,$64,$20,$61,$74,$20,$0
+L903:.dc.b $20,$77,$61,$73,$20,$0
+L904:.dc.b $20,$69,$6E,$73,$74,$65,$61,$64,$20,$6F,$66,$20,$0
+L905:.dc.b $20,$2A,$2A,$D,$A,$A,$0
+L909:.dc.b $2A,$2A,$20,$42,$72,$65,$61,$6B,$70,$6F,$69,$6E,$74,$20,$77,$6F,$72,$64,$20,$61,$74,$20,$0
+L910:.dc.b $20,$77,$61,$73,$20,$0
+L911:.dc.b $20,$69,$6E,$73,$74,$65,$61,$64,$20,$6F,$66,$20,$0
+L912:.dc.b $20,$2A,$2A,$D,$A,$A,$0
+L914:.dc.b $D,$A,$2A,$2A,$20,$50,$72,$6F,$67,$72,$61,$6D,$20,$69,$6E,$76,$6F,$6B,$65,$64,$20,$52,$4F,$4D,$50,$20,$74,$72,$61,$70
+.dc.b $20,$2A,$2A,$D,$A,$0
+L918:.dc.b $D,$A,$A,$2A,$2A,$2A,$2A,$2A,$20,$73,$65,$74,$69,$70,$6C,$28,$29,$20,$66,$61,$69,$6C,$65,$64,$20,$2A,$2A,$2A,$2A,$2A
+.dc.b $D,$A,$A,$0
+L929:.dc.b $D,$A,$A,$2A,$2A,$20,$52,$4F,$4D,$50,$20,$42,$72,$65,$61,$6B,$70,$6F,$69,$6E,$74,$20,$54,$52,$41,$50,$20,$2A,$2A,$D
+.dc.b $A,$0
+L935:.dc.b $D,$A,$A,$42,$75,$63,$68,$6C,$61,$20,$37,$30,$30,$20,$42,$49,$4F,$53,$20,$2F,$20,$44,$65,$62,$75,$67,$20,$50,$52,$4F
+.dc.b $4D,$D,$A,$0
+L936:.dc.b $20,$20,$52,$4F,$4D,$50,$20,$56,$65,$72,$73,$69,$6F,$6E,$20,$0
+L937:.dc.b $32,$32,$2E,$30,$30,$20,$2D,$2D,$20,$31,$39,$38,$38,$2D,$30,$36,$2D,$32,$30,$0
+L938:.dc.b $D,$A,$20,$20,$42,$49,$4F,$53,$20,$56,$65,$72,$73,$69,$6F,$6E,$20,$0
+L967:.dc.b $6D,$69,$64,$61,$73,$2E,$61,$62,$73,$0
+L979:.dc.b $5B,$5B,$73,$74,$61,$72,$74,$3D,$24,$25,$6C,$58,$5D,$2C,$5B,$65,$6E,$64,$3D,$24,$25,$6C,$78,$5D,$5D,$20,$20,$28,$6F,$72
+.dc.b $20,$24,$38,$2E,$2E,$24,$25,$6C,$58,$29,$0
+L980:.dc.b $4C,$6F,$61,$64,$20,$20,$47,$6F,$54,$6F,$0
+L981:.dc.b $44,$69,$73,$6B,$20,$20,$52,$4F,$4D,$50,$0
+L982:.dc.b $42,$75,$63,$68,$6C,$61,$20,$37,$30,$30,$20,$2D,$2D,$20,$42,$49,$4F,$53,$2F,$52,$4F,$4D,$50,$20,$46,$69,$72,$6D,$77,$61
+.dc.b $72,$65,$20,$62,$79,$20,$44,$2E,$4E,$2E,$20,$4C,$79,$6E,$78,$20,$43,$72,$6F,$77,$65,$0
+L983:.dc.b $42,$49,$4F,$53,$20,$56,$65,$72,$73,$69,$6F,$6E,$20,$25,$30,$32,$64,$2E,$25,$30,$32,$64,$25,$73,$0
+L984:.dc.b $52,$4F,$4D,$50,$20,$56,$65,$72,$73,$69,$6F,$6E,$20,$25,$73,$0
+L985:.dc.b $32,$32,$2E,$30,$30,$20,$2D,$2D,$20,$31,$39,$38,$38,$2D,$30,$36,$2D,$32,$30,$0
+L994:.dc.b $D,$A,$2A,$2A,$2A,$2A,$2A,$20,$52,$4F,$4D,$50,$20,$52,$65,$2D,$73,$74,$61,$72,$74,$69,$6E,$67,$20,$2A,$2A,$2A,$2A,$2A
+.dc.b $D,$A,$A,$0
+L995:.dc.b $D,$A,$A,$0
+L999:.dc.b $D,$A,$2A,$2A,$20,$78,$74,$72,$61,$70,$31,$35,$28,$29,$20,$72,$65,$74,$75,$72,$6E,$65,$64,$20,$74,$6F,$20,$52,$4F,$4D
+.dc.b $50,$20,$2A,$2A,$D,$A,$A,$0
Index: alcyon/rscript.s
===================================================================
--- alcyon/rscript.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/rscript.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,63 @@
+.globl _endflg
+.globl _script0
+.data
+_script0:
+*line 14
+.dc.l L1
+.dc.l $0
+.globl _rscript
+.text
+_rscript:
+~~rscript:
+~p=-4
+~p=8
+link R14,#-6
+~rc=-2
+*line 34
+jsr _sqinit
+*line 35
+clr -2(R14)
+*line 37
+bra L5
+L4:
+*line 38
+*line 39
+*line 39
+move.l 8(R14),R8
+move.l (R8),(sp)
+jsr _sqscan
+add.l #4,8(R14)
+tst R0
+bne L6
+*line 40
+*line 41
+move #-1,-2(R14)
+bra L3
+*line 42
+*line 43
+*line 44
+L6:
+*line 45
+*line 45
+tst _endflg
+beq L7
+*line 46
+*line 47
+move #1,-2(R14)
+bra L3
+*line 48
+*line 49
+L7:L5:
+*line 50
+move.l 8(R14),R8
+tst.l (R8)
+bne L4
+L3:
+*line 52
+move -2(R14),R0
+bra L2
+L2:unlk R14
+rts
+.data
+L1:.dc.b $21,$71,$75,$69,$65,$74,$20,$21,$6E,$6F,$72,$6D,$61,$6C,$20,$21,$73,$63,$6F,$72,$65,$3D,$30,$20,$21,$77,$65,$69,$67,$68
+.dc.b $74,$3D,$36,$30,$20,$21,$65,$6E,$64,$0
Index: alcyon/scadv.s
===================================================================
--- alcyon/scadv.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/scadv.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,531 @@
+.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 _consl
+.globl _cursl
+.globl _nxtsl
+.globl _prvsl
+.globl _saddr
+.globl _scrl
+.globl _vi_sadr
+.globl _vi_scrl
+.globl _ctrsw
+.globl _ndisp
+.globl _sbase
+.globl _sd
+.globl _soffset
+.globl _gdstbc
+.globl _gdstbn
+.globl _gdstbp
+.globl _nbmoff
+.data
+_nbmoff:
+.dc.w $3
+.globl _wrdoff
+.data
+_wrdoff:
+.dc.w $3
+.globl _nbmasks
+.data
+_nbmasks:
+.dc.w $F
+.dc.w $F0
+.dc.w $F00
+.dc.w $F000
+.globl _sc_adv
+.text
+_sc_adv:
+~~sc_adv:
+link R14,#-6
+movem.l R2-R7/R11-R13,-(sp)
+~masksl=R7
+~maskpx=R6
+~i=R5
+~sword=R4
+~tl=R3
+~optr=R13
+~pptr=R12
+~fsl=R11
+~qptr=-4
+~pscrl=-6
+*line 101
+*line 102
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L2
+*line 102
+clr (sp)
+jsr _vbank
+*line 103
+L2:
+*line 104
+move.l #$80,R3
+*line 108
+jsr _ucslice
+*line 114
+*line 114
+cmp #2,_ndisp
+bne L3
+cmp #1,_sd
+bne L10000
+clr R0
+bra L10002
+L10000:move #3,R0
+L10002:cmp _soffset,R0
+bne L3
+*line 115
+*line 116
+*line 116
+cmp #1,_sd
+bne L4
+*line 117
+*line 118
+move.l _prvsl,R11
+*line 119
+move _wrdoff,R0
+asl #1,R0
+ext.l R0
+move.l R0,R13
+add.l _saddr,R13
+*line 120
+bra L5
+L4:
+*line 121
+*line 122
+*line 123
+move.l _nxtsl,R11
+*line 124
+move.l R3,R0
+asl.l #1,R0
+move.l R0,R13
+add.l _saddr,R13
+L5:
+*line 125
+*line 126
+*line 127
+*line 127
+cmp #28544,_sbase
+ble L6
+*line 128
+*line 129
+*line 130
+*line 131
+move.l _saddr,R12
+cmp #1,_sd
+bne L10003
+move.l #$6f7e,R0
+bra L10005
+L10003:move.l #$6f81,R0
+L10005:asl.l #1,R0
+sub.l R0,R12
+*line 132
+*line 133
+*line 133
+cmp #28672,_sbase
+bge L7
+*line 134
+*line 135
+*line 136
+*line 137
+move #224,R5
+bra L10
+L11:
+*line 138
+*line 139
+move (R11)+,R4
+*line 140
+move R4,(R13)
+*line 141
+move R4,(R12)
+*line 142
+move.l R3,R0
+asl.l #1,R0
+add.l R0,R13
+*line 143
+move.l R3,R0
+asl.l #1,R0
+add.l R0,R12
+L9:L10:
+*line 137
+move R5,R0
+sub #1,R5
+tst R0
+bne L11
+L8:
+*line 144
+*line 145
+bra L12
+L7:
+*line 146
+*line 147
+*line 148
+*line 149
+*line 150
+move #224,R5
+bra L15
+L16:
+*line 151
+*line 152
+move (R11)+,(R12)
+*line 153
+move.l R3,R0
+asl.l #1,R0
+add.l R0,R12
+L14:L15:
+*line 150
+move R5,R0
+sub #1,R5
+tst R0
+bne L16
+L13:
+*line 154
+L12:
+*line 155
+*line 156
+*line 157
+bra L17
+L6:
+*line 158
+*line 159
+*line 160
+*line 161
+*line 162
+move #224,R5
+bra L20
+L21:
+*line 163
+*line 164
+move (R11)+,(R13)
+*line 165
+move.l R3,R0
+asl.l #1,R0
+add.l R0,R13
+L19:L20:
+*line 162
+move R5,R0
+sub #1,R5
+tst R0
+bne L21
+L18:
+*line 166
+L17:
+*line 167
+*line 168
+*line 169
+move.l _nxtsl,R13
+*line 170
+move.l _cursl,R12
+*line 171
+move.l _prvsl,-4(R14)
+*line 172
+move.l _consl,R11
+*line 173
+*line 174
+move #224,R5
+bra L24
+L25:
+*line 175
+*line 176
+move (R11)+,R4
+*line 177
+move R4,(R13)+
+*line 178
+move R4,(R12)+
+*line 179
+move.l -4(R14),R8
+move R4,(R8)
+add.l #2,-4(R14)
+L23:L24:
+*line 174
+move R5,R0
+sub #1,R5
+tst R0
+bne L25
+L22:
+*line 180
+*line 181
+*line 182
+*line 183
+*line 184
+*line 185
+*line 186
+L3:
+*line 187
+*line 187
+tst _sd
+bne L26
+*line 188
+*line 189
+*line 189
+add #1,_soffset
+move _soffset,R0
+cmp #3,R0
+ble L27
+*line 190
+*line 191
+clr _soffset
+*line 192
+add.l #2,_saddr
+*line 193
+*line 194
+*line 194
+add #1,_sbase
+move _sbase,R0
+cmp #28672,R0
+ble L28
+*line 195
+*line 196
+move.l #_v_score,_saddr
+*line 197
+clr _sbase
+*line 198
+L28:
+*line 199
+*line 200
+L27:bra L29
+L26:
+*line 201
+*line 202
+*line 203
+*line 203
+sub #1,_soffset
+bge L30
+*line 204
+*line 205
+move #3,_soffset
+*line 206
+sub.l #2,_saddr
+*line 207
+*line 208
+*line 208
+sub #1,_sbase
+bge L31
+*line 209
+*line 210
+move.l #57344+_v_score,_saddr
+*line 211
+move #28672,_sbase
+*line 212
+L31:
+*line 213
+L30:L29:
+*line 217
+move _scrl,-6(R14)
+*line 221
+move _soffset,R8
+add.l R8,R8
+add.l #_nbmasks,R8
+move (R8),R6
+*line 222
+move R6,R0
+not R0
+move R0,R7
+*line 224
+move.l #_gdstbp,(sp)
+move R7,-(sp)
+move R6,-(sp)
+move.l _prvsl,-(sp)
+jsr _uslice
+addq.l #8,sp
+*line 226
+move.l #_gdstbn,(sp)
+move R7,-(sp)
+move R6,-(sp)
+move.l _nxtsl,-(sp)
+jsr _uslice
+addq.l #8,sp
+*line 228
+move _soffset,R0
+asr #1,R0
+move #1,R1
+eor R1,R0
+or #-32768,R0
+move R0,_scrl
+*line 232
+*line 232
+cmp #2,_ndisp
+bne L32
+clr R0
+move _scrl,R0
+cmp -6(R14),R0
+beq L32
+*line 233
+*line 234
+move.l _saddr,R0
+asr.l #1,R0
+move R0,R4
+*line 235
+*line 236
+move #1,(sp)
+jsr _setipl
+*line 237
+*line 238
+move _scrl,_vi_scrl
+*line 239
+move R4,_vi_sadr
+*line 240
+*line 241
+clr (sp)
+jsr _setipl
+*line 242
+*line 243
+L32:
+*line 244
+clr _ctrsw
+L1:tst.l (sp)+
+movem.l (sp)+,R3-R7/R11-R13
+unlk R14
+rts
+.globl _scupd
+.text
+_scupd:
+~~scupd:
+link R14,#-2
+movem.l R2-R7/R11-R13,-(sp)
+~masksl=R7
+~maskpx=R6
+~i=R5
+~sword=R4
+~tl=R3
+~optr=R13
+~qptr=R12
+~fsl=R11
+~soff=-2
+*line 275
+*line 276
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L34
+*line 276
+clr (sp)
+jsr _vbank
+*line 277
+L34:
+*line 278
+move _nbmoff,R0
+add _soffset,R0
+and #3,R0
+move R0,-2(R14)
+*line 279
+move -2(R14),R0
+add #2,R0
+and #3,R0
+move R0,R8
+add.l R8,R8
+add.l #_nbmasks,R8
+move (R8),R6
+*line 280
+move R6,R0
+not R0
+move R0,R7
+*line 281
+move.l #$80,R3
+*line 285
+*line 285
+move.l #_gdstbc,(sp)
+move R7,-(sp)
+move R6,-(sp)
+move.l _cursl,-(sp)
+jsr _cslice
+addq.l #8,sp
+tst R0
+beq L35
+cmp #2,_ndisp
+bne L35
+*line 286
+*line 287
+*line 288
+*line 289
+move.l _cursl,R11
+*line 290
+cmp #1,-2(R14)
+ble L10006
+move.l #$40,R0
+bra L10008
+L10006:move.l #$3f,R0
+L10008:asl.l #1,R0
+move.l R0,R13
+add.l _saddr,R13
+*line 291
+move.l _consl,R12
+*line 292
+*line 293
+move #224,R5
+bra L38
+L39:
+*line 294
+*line 295
+*line 296
+move R6,R4
+and (R11),R4
+beq L40
+*line 296
+clr R0
+move R4,R0
+move R7,R1
+and (R13),R1
+or R1,R0
+move R0,(R13)
+*line 297
+L40:
+*line 298
+move (R12)+,(R11)+
+*line 299
+move.l R3,R0
+asl.l #1,R0
+add.l R0,R13
+L37:L38:
+*line 293
+move R5,R0
+sub #1,R5
+tst R0
+bne L39
+L36:
+*line 300
+*line 301
+*line 302
+*line 303
+*line 304
+L35:
+*line 305
+clr _ctrsw
+L33:tst.l (sp)+
+movem.l (sp)+,R3-R7/R11-R13
+unlk R14
+rts
+.data
Index: alcyon/scan.s
===================================================================
--- alcyon/scan.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/scan.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,801 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl ___atab
+.bss
+L1:.ds.b 2
+.text
+.bss
+L2:.ds.b 4
+.text
+.bss
+L3:.ds.b 4
+.text
+.bss
+L4:.ds.b 2
+.text
+.text
+_getnum:
+~~getnum:
+~list=8
+~values=12
+~base=16
+link R14,#-4
+movem.l R6-R7/R13-R13,-(sp)
+~val=R7
+~cp=R13
+~c=-2
+~sign=-4
+*line 35
+*line 36
+tst L1
+bgt L7
+*line 36
+clr.l R0
+bra L6
+*line 37
+L7:
+*line 38
+clr R0
+move R0,-4(R14)
+ext.l R0
+move.l R0,R7
+*line 40
+*line 40
+clr -(sp)
+move.l L2,R8
+jsr (R8)
+addq.l #2,sp
+move R0,-2(R14)
+cmp #45,R0
+bne L8
+*line 41
+*line 42
+move #1,-4(R14)
+*line 43
+sub #1,L1
+*line 44
+bra L9
+L8:
+*line 45
+*line 46
+cmp #43,-2(R14)
+bne L10
+*line 46
+sub #1,L1
+*line 47
+bra L11
+L10:
+*line 48
+move #1,-(sp)
+move.l L2,R8
+jsr (R8)
+addq.l #2,sp
+L11:L9:
+*line 50
+bra L14
+L13:
+*line 51
+*line 52
+*line 52
+clr -(sp)
+move.l L2,R8
+jsr (R8)
+addq.l #2,sp
+move R0,(sp)
+move.l 8(R14),-(sp)
+jsr _index
+addq.l #4,sp
+move.l R0,R13
+move.l R13,R0
+bne L15
+*line 53
+*line 54
+move #1,-(sp)
+move.l L2,R8
+jsr (R8)
+addq.l #2,sp
+bra L12
+*line 55
+*line 56
+*line 57
+L15:
+*line 58
+move 16(R14),R0
+ext.l R0
+move.l R0,-(sp)
+move.l R7,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,R7
+*line 59
+move.l 12(R14),R8
+move.l R13,R9
+sub.l 8(R14),R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+ext.l R0
+add.l R0,R7
+L14:
+*line 60
+move L1,R0
+sub #1,L1
+tst R0
+bne L13
+L12:
+*line 62
+*line 63
+tst -4(R14)
+beq L16
+*line 63
+move.l R7,R0
+neg.l R0
+move.l R0,R7
+*line 64
+L16:
+*line 65
+move.l R7,R0
+bra L6
+L6:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.text
+_skipblk:
+~~skipblk:
+link R14,#-4
+*line 74
+bra L21
+L20:L21:
+*line 75
+clr -(sp)
+move.l L2,R8
+jsr (R8)
+addq.l #2,sp
+ext.l R0
+add.l #___atab,R0
+move.l R0,R8
+btst #5,(R8)
+bne L20
+L19:
+*line 77
+*line 78
+move #1,-(sp)
+move.l L2,R8
+jsr (R8)
+addq.l #2,sp
+cmp #-1,R0
+bne L22
+*line 78
+move #-1,R0
+bra L18
+*line 79
+L22:
+*line 80
+clr R0
+bra L18
+L18:unlk R14
+rts
+.text
+_sgetc:
+~~sgetc:
+~what=8
+link R14,#-4
+*line 86
+*line 86
+tst 8(R14)
+bne L25
+*line 87
+*line 88
+*line 89
+move.l L3,R8
+tst.b (R8)
+beq L26
+*line 89
+move.l L3,R8
+move.b (R8),R0
+ext.w R0
+and #255,R0
+add.l #1,L3
+bra L24
+*line 90
+L26:
+*line 91
+move.b #1,L4
+*line 92
+bra L27
+L25:
+*line 93
+*line 94
+*line 95
+*line 96
+tst.b L4
+bne L28
+*line 96
+sub.l #1,L3
+move.l L3,R8
+move.b (R8),R0
+ext.w R0
+and #255,R0
+bra L24
+L28:L27:
+*line 99
+move #-1,R0
+bra L24
+L24:unlk R14
+rts
+.globl _scanfmt
+.text
+_scanfmt:
+~~scanfmt:
+~fmt=R13
+~getsub=8
+~args=16
+link R14,#-148
+movem.l R7-R7/R13-R13,-(sp)
+~lv=-4
+~c=-6
+~count=-8
+~dontdo=-10
+~lflag=-12
+~base=-14
+~cp=-18
+~tlist=-148
+~list=L30
+.data
+L30:.dc.b $41,$42,$43,$44,$45,$46,$61,$62,$63,$64,$65,$66,$39,$38,$37,$36,$35,$34,$33,$32,$31,$30,$0
+.even
+.text
+~vals=L32
+.data
+L32:.dc.b $A
+.dc.b $B
+.dc.b $C
+.dc.b $D
+.dc.b $E
+.dc.b $F
+.dc.b $A
+.dc.b $B
+.dc.b $C
+.dc.b $D
+.dc.b $E
+.dc.b $F
+.dc.b $9
+.dc.b $8
+.dc.b $7
+.dc.b $6
+.dc.b $5
+.dc.b $4
+.dc.b $3
+.dc.b $2
+.dc.b $1
+.dc.b $0
+.text
+*line 129
+move.l 12(R14),R13
+*line 129
+clr -8(R14)
+*line 130
+move.l 8(R14),L2
+*line 132
+bra L35
+L34:
+*line 133
+*line 134
+*line 134
+cmp #37,-6(R14)
+bne L36
+*line 135
+*line 136
+clr R0
+move R0,-10(R14)
+move R0,-12(R14)
+*line 137
+move #127,L1
+*line 138
+*line 139
+*line 139
+cmp.b #42,(R13)
+bne L37
+*line 140
+add.l #1,R13
+*line 141
+move #1,-10(R14)
+*line 142
+*line 143
+L37:
+*line 144
+*line 144
+move.b (R13),R0
+ext.w R0
+ext.l R0
+add.l #___atab,R0
+move.l R0,R8
+btst #2,(R8)
+beq L38
+*line 145
+*line 146
+clr L1
+*line 147
+*line 148
+L41:
+*line 149
+*line 150
+move L1,R0
+muls #10,R0
+move.b (R13),R1
+ext.w R1
+add R1,R0
+add #-48,R0
+move R0,L1
+*line 151
+L40:
+*line 152
+add.l #1,R13
+move.b (R13),R0
+ext.w R0
+ext.l R0
+add.l #___atab,R0
+move.l R0,R8
+btst #2,(R8)
+bne L41
+L39:
+*line 153
+*line 154
+L38:
+*line 155
+*line 155
+cmp.b #108,(R13)
+bne L42
+*line 156
+*line 157
+move #1,-12(R14)
+*line 158
+add.l #1,R13
+*line 159
+*line 160
+*line 161
+*line 162
+L42:
+*line 163
+move.b (R13)+,R0
+ext.w R0
+bra L44
+*line 164
+L45:
+*line 165
+*line 166
+move #37,-6(R14)
+bra L46
+*line 167
+*line 168
+L47:
+*line 169
+*line 170
+clr -12(R14)
+bra L48
+*line 171
+*line 172
+L49:
+*line 173
+*line 174
+move #1,-12(R14)
+*line 175
+L50:
+*line 176
+L48:
+*line 177
+*line 178
+move #12,-6(R14)
+*line 179
+move #10,-14(R14)
+bra L51
+*line 180
+*line 181
+L52:
+*line 182
+*line 183
+move #1,-12(R14)
+*line 184
+L53:
+*line 185
+*line 186
+clr -6(R14)
+*line 187
+move #16,-14(R14)
+bra L51
+*line 188
+*line 189
+L54:
+*line 190
+*line 191
+move #1,-12(R14)
+*line 192
+L55:
+*line 193
+*line 194
+move #14,-6(R14)
+*line 195
+move #8,-14(R14)
+L51:
+*line 196
+*line 197
+*line 198
+jsr _skipblk
+tst R0
+bne L56
+*line 199
+*line 200
+move -14(R14),(sp)
+move.l #L32,R0
+move -6(R14),R1
+ext.l R1
+add.l R1,R0
+move.l R0,-(sp)
+move.l #L30,R0
+move -6(R14),R1
+ext.l R1
+add.l R1,R0
+move.l R0,-(sp)
+jsr _getnum
+addq.l #8,sp
+move.l R0,-4(R14)
+*line 201
+*line 202
+*line 202
+tst -10(R14)
+bne L57
+*line 203
+*line 204
+*line 205
+tst -12(R14)
+beq L58
+*line 205
+move.l 16(R14),R8
+move.l (R8),R8
+move.l -4(R14),(R8)
+add.l #4,16(R14)
+*line 206
+bra L59
+L58:
+*line 207
+move.l -4(R14),R0
+move.l 16(R14),R9
+move.l (R9),R9
+move R0,(R9)
+add.l #4,16(R14)
+L59:
+*line 208
+add #1,-8(R14)
+*line 209
+*line 210
+L57:bra L43
+*line 211
+*line 212
+*line 213
+*line 214
+*line 237
+*line 238
+*line 239
+*line 240
+*line 241
+L60:
+*line 242
+*line 243
+clr -12(R14)
+*line 244
+*line 245
+*line 245
+cmp.b #94,(R13)
+beq L10000
+cmp.b #126,(R13)
+bne L61
+L10000:*line 246
+*line 247
+add.l #1,R13
+*line 248
+move #1,-12(R14)
+*line 249
+*line 250
+L61:
+*line 251
+lea -148(R14),R8
+move.l R8,-18(R14)
+bra L64
+L65:
+*line 252
+move -6(R14),R0
+move.l -18(R14),R9
+move.b R0,(R9)
+add.l #1,-18(R14)
+L63:L64:
+*line 251
+move.b (R13)+,R0
+ext.w R0
+move R0,-6(R14)
+cmp #93,R0
+bne L65
+L62:
+*line 252
+*line 253
+*line 254
+move.l -18(R14),R8
+clr.b (R8)
+bra L66
+*line 255
+*line 256
+L67:
+*line 257
+*line 258
+move #1,-12(R14)
+*line 259
+move.b #32,-148(R14)
+*line 260
+move.b #9,-147(R14)
+*line 261
+move.b #10,-146(R14)
+*line 262
+clr.b -145(R14)
+L66:
+*line 263
+*line 264
+*line 265
+jsr _skipblk
+tst R0
+bne L56
+*line 266
+*line 267
+*line 268
+tst -10(R14)
+bne L68
+*line 268
+move.l 16(R14),R8
+move.l (R8),-18(R14)
+add.l #4,16(R14)
+*line 269
+L68:
+*line 270
+bra L71
+L70:
+*line 271
+*line 272
+*line 273
+clr -(sp)
+move.l L2,R8
+jsr (R8)
+addq.l #2,sp
+move R0,-6(R14)
+cmp #-1,R0
+beq L69
+*line 274
+*line 275
+*line 276
+*line 277
+tst -12(R14)
+beq L10001
+move -6(R14),(sp)
+move.l R14,-(sp)
+add.l #-148,(sp)
+jsr _index
+addq.l #4,sp
+tst.l R0
+bne L10002
+clr R0
+bra L10003
+L10002:move #1,R0
+L10003:bra L10005
+L10001:move -6(R14),(sp)
+move.l R14,-(sp)
+add.l #-148,(sp)
+jsr _index
+addq.l #4,sp
+tst.l R0
+beq L10006
+clr R0
+bra L10007
+L10006:move #1,R0
+L10007:L10005:tst R0
+beq L72
+*line 278
+*line 279
+move #1,-(sp)
+move.l L2,R8
+jsr (R8)
+addq.l #2,sp
+bra L69
+*line 280
+*line 281
+*line 282
+L72:
+*line 283
+*line 284
+tst -10(R14)
+bne L73
+*line 284
+move -6(R14),R0
+move.l -18(R14),R9
+move.b R0,(R9)
+add.l #1,-18(R14)
+L73:L71:
+*line 285
+move L1,R0
+sub #1,L1
+tst R0
+bne L70
+L69:
+*line 286
+*line 287
+*line 287
+tst -10(R14)
+bne L74
+*line 288
+*line 289
+move.l -18(R14),R8
+clr.b (R8)
+*line 290
+add #1,-8(R14)
+*line 291
+*line 292
+L74:bra L43
+*line 293
+*line 294
+*line 295
+L75:
+*line 296
+*line 297
+*line 298
+clr -(sp)
+move.l L2,R8
+jsr (R8)
+addq.l #2,sp
+move R0,-6(R14)
+cmp #-1,R0
+beq L56
+*line 299
+*line 300
+*line 300
+tst -10(R14)
+bne L76
+*line 301
+*line 302
+move -6(R14),R0
+move.l 16(R14),R9
+move.l (R9),R9
+move.b R0,(R9)
+add.l #4,16(R14)
+*line 303
+add #1,-8(R14)
+*line 304
+*line 305
+L76:bra L43
+*line 306
+bra L43
+L44:ext.l R0
+move.l #L77,R8
+move #11,R1
+L78:cmp.l (R8)+,R0
+dbeq R1,L78
+move.l 44(R8),R8
+jmp (R8)
+.data
+L77:.dc.l 37
+.dc.l 68
+.dc.l 79
+.dc.l 88
+.dc.l 91
+.dc.l 99
+.dc.l 100
+.dc.l 104
+.dc.l 111
+.dc.l 115
+.dc.l 120
+.dc.l 0
+.dc.l L45
+.dc.l L49
+.dc.l L54
+.dc.l L52
+.dc.l L60
+.dc.l L75
+.dc.l L50
+.dc.l L47
+.dc.l L55
+.dc.l L67
+.dc.l L53
+.dc.l L43
+.text
+L43:
+*line 307
+*line 308
+bra L79
+L36:
+*line 309
+*line 309
+move.l #___atab,R8
+move -6(R14),R9
+add.l R9,R8
+btst #5,(R8)
+beq L80
+*line 310
+*line 311
+*line 311
+jsr _skipblk
+tst R0
+beq L81
+L56:
+*line 312
+*line 313
+*line 314
+tst -8(R14)
+bne L82
+*line 314
+move #-1,R0
+bra L29
+*line 315
+L82:
+*line 316
+move -8(R14),R0
+bra L29
+*line 317
+*line 318
+L81:bra L83
+L80:
+*line 319
+*line 320
+L46:
+*line 321
+*line 322
+*line 323
+jsr _skipblk
+tst R0
+bne L56
+*line 324
+*line 325
+*line 326
+clr -(sp)
+move.l L2,R8
+jsr (R8)
+addq.l #2,sp
+cmp -6(R14),R0
+beq L84
+*line 326
+move -8(R14),R0
+bra L29
+L84:L83:L79:
+*line 327
+L35:
+*line 328
+move.b (R13)+,R0
+ext.w R0
+move R0,-6(R14)
+bne L34
+L33:
+*line 330
+move -8(R14),R0
+bra L29
+L29:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _sscanf
+.text
+_sscanf:
+~~sscanf:
+~string=8
+~fmt=12
+~args=16
+link R14,#-4
+*line 385
+move.l 8(R14),L3
+*line 386
+clr.b L4
+*line 387
+move.l R14,(sp)
+add.l #16,(sp)
+move.l 12(R14),-(sp)
+move.l #_sgetc,-(sp)
+jsr _scanfmt
+addq.l #8,sp
+bra L85
+L85:unlk R14
+rts
+.data
Index: alcyon/scfield.s
===================================================================
--- alcyon/scfield.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/scfield.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,2963 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _ancmsw
+.globl _angroup
+.globl _astat
+.globl _clkrun
+.globl _cmfirst
+.globl _cmtype
+.globl _curhold
+.globl _curscor
+.globl _cxrate
+.globl _cxval
+.globl _cyrate
+.globl _cyval
+.globl _ebflag
+.globl _hcwval
+.globl _insmode
+.globl _oldpk
+.globl _oldsl
+.globl _pkctrl
+.globl _recsw
+.globl _scmctl
+.globl _sdmctl
+.globl _sliders
+.globl _stccol
+.globl _stcrow
+.globl _thcwval
+.globl _tvcwval
+.globl _vcwval
+.globl _vtccol
+.globl _vtcrow
+.globl _vtxval
+.globl _vtyval
+.globl _ctime
+.globl _t_ins
+.globl _ebuf
+.globl _crate1
+.globl _ehdlist
+.globl _grpmode
+.globl _grpstat
+.globl _grptmap
+.globl _sdmlim
+.globl _varmode
+.globl _swpt
+.globl _oldsw
+.globl _cfetp
+.globl _curfet
+.globl _infetp
+.globl _csbp
+.globl _sdboxes
+.globl _peg
+.globl _sc_fet1
+.data
+_sc_fet1:
+.dc.w $0
+.dc.w $2
+.dc.w $4
+.dc.w $0
+*line 124
+.dc.l _et_strn
+*line 124
+.dc.l _ef_strn
+*line 124
+.dc.l _rd_strn
+*line 124
+.dc.l _nd_strn
+.dc.w $0
+.dc.w $B
+.dc.w $F
+.dc.w $0
+*line 125
+.dc.l _et_snbt
+*line 125
+.dc.l _ef_snbt
+*line 125
+.dc.l _rd_snbt
+*line 125
+.dc.l _nd_snbt
+.dc.w $11
+.dc.w $B
+.dc.w $C
+.dc.w $0
+*line 127
+.dc.l _et_ioas
+*line 127
+.dc.l _ef_ioas
+*line 127
+.dc.l _rd_ioas
+*line 127
+.dc.l _nd_ioas
+.dc.w $11
+.dc.w $13
+.dc.w $13
+.dc.w $0
+*line 128
+.dc.l _et_tune
+*line 128
+.dc.l _ef_tune
+*line 128
+.dc.l _rd_tune
+*line 128
+.dc.l _nd_tune
+.dc.w $11
+.dc.w $1B
+.dc.w $1D
+.dc.w $0
+*line 129
+.dc.l _et_tmpo
+*line 129
+.dc.l _ef_tmpo
+*line 129
+.dc.l _rd_tmpo
+*line 129
+.dc.l _nd_tmpo
+.dc.w $11
+.dc.w $23
+.dc.w $26
+.dc.w $0
+*line 130
+.dc.l _et_intp
+*line 130
+.dc.l _ef_intp
+*line 130
+.dc.l _rd_intp
+*line 130
+.dc.l _nd_intp
+.dc.w $12
+.dc.w $7
+.dc.w $8
+.dc.w $0
+*line 132
+.dc.l _et_inst
+*line 132
+.dc.l _ef_inst
+*line 132
+.dc.l _rd_inst
+*line 132
+.dc.l _nd_inst
+.dc.w $12
+.dc.w $C
+.dc.w $D
+.dc.w $1
+*line 133
+.dc.l _et_inst
+*line 133
+.dc.l _ef_inst
+*line 133
+.dc.l _rd_inst
+*line 133
+.dc.l _nd_inst
+.dc.w $12
+.dc.w $11
+.dc.w $12
+.dc.w $2
+*line 134
+.dc.l _et_inst
+*line 134
+.dc.l _ef_inst
+*line 134
+.dc.l _rd_inst
+*line 134
+.dc.l _nd_inst
+.dc.w $12
+.dc.w $16
+.dc.w $17
+.dc.w $3
+*line 135
+.dc.l _et_inst
+*line 135
+.dc.l _ef_inst
+*line 135
+.dc.l _rd_inst
+*line 135
+.dc.l _nd_inst
+.dc.w $12
+.dc.w $1B
+.dc.w $1C
+.dc.w $4
+*line 136
+.dc.l _et_inst
+*line 136
+.dc.l _ef_inst
+*line 136
+.dc.l _rd_inst
+*line 136
+.dc.l _nd_inst
+.dc.w $12
+.dc.w $20
+.dc.w $21
+.dc.w $5
+*line 137
+.dc.l _et_inst
+*line 137
+.dc.l _ef_inst
+*line 137
+.dc.l _rd_inst
+*line 137
+.dc.l _nd_inst
+.dc.w $12
+.dc.w $25
+.dc.w $26
+.dc.w $6
+*line 138
+.dc.l _et_inst
+*line 138
+.dc.l _ef_inst
+*line 138
+.dc.l _rd_inst
+*line 138
+.dc.l _nd_inst
+.dc.w $12
+.dc.w $2A
+.dc.w $2B
+.dc.w $7
+*line 139
+.dc.l _et_inst
+*line 139
+.dc.l _ef_inst
+*line 139
+.dc.l _rd_inst
+*line 139
+.dc.l _nd_inst
+.dc.w $12
+.dc.w $2F
+.dc.w $30
+.dc.w $8
+*line 140
+.dc.l _et_inst
+*line 140
+.dc.l _ef_inst
+*line 140
+.dc.l _rd_inst
+*line 140
+.dc.l _nd_inst
+.dc.w $12
+.dc.w $34
+.dc.w $35
+.dc.w $9
+*line 141
+.dc.l _et_inst
+*line 141
+.dc.l _ef_inst
+*line 141
+.dc.l _rd_inst
+*line 141
+.dc.l _nd_inst
+.dc.w $12
+.dc.w $39
+.dc.w $3A
+.dc.w $A
+*line 142
+.dc.l _et_inst
+*line 142
+.dc.l _ef_inst
+*line 142
+.dc.l _rd_inst
+*line 142
+.dc.l _nd_inst
+.dc.w $12
+.dc.w $3E
+.dc.w $3F
+.dc.w $B
+*line 143
+.dc.l _et_inst
+*line 143
+.dc.l _ef_inst
+*line 143
+.dc.l _rd_inst
+*line 143
+.dc.l _nd_inst
+.dc.w $13
+.dc.w $5
+.dc.w $8
+.dc.w $0
+*line 145
+.dc.l _et_trns
+*line 145
+.dc.l _ef_trns
+*line 145
+.dc.l _rd_trns
+*line 145
+.dc.l _nd_trns
+.dc.w $13
+.dc.w $A
+.dc.w $D
+.dc.w $1
+*line 146
+.dc.l _et_trns
+*line 146
+.dc.l _ef_trns
+*line 146
+.dc.l _rd_trns
+*line 146
+.dc.l _nd_trns
+.dc.w $13
+.dc.w $F
+.dc.w $12
+.dc.w $2
+*line 147
+.dc.l _et_trns
+*line 147
+.dc.l _ef_trns
+*line 147
+.dc.l _rd_trns
+*line 147
+.dc.l _nd_trns
+.dc.w $13
+.dc.w $14
+.dc.w $17
+.dc.w $3
+*line 148
+.dc.l _et_trns
+*line 148
+.dc.l _ef_trns
+*line 148
+.dc.l _rd_trns
+*line 148
+.dc.l _nd_trns
+.dc.w $13
+.dc.w $19
+.dc.w $1C
+.dc.w $4
+*line 149
+.dc.l _et_trns
+*line 149
+.dc.l _ef_trns
+*line 149
+.dc.l _rd_trns
+*line 149
+.dc.l _nd_trns
+.dc.w $13
+.dc.w $1E
+.dc.w $21
+.dc.w $5
+*line 150
+.dc.l _et_trns
+*line 150
+.dc.l _ef_trns
+*line 150
+.dc.l _rd_trns
+*line 150
+.dc.l _nd_trns
+.dc.w $13
+.dc.w $23
+.dc.w $26
+.dc.w $6
+*line 151
+.dc.l _et_trns
+*line 151
+.dc.l _ef_trns
+*line 151
+.dc.l _rd_trns
+*line 151
+.dc.l _nd_trns
+.dc.w $13
+.dc.w $28
+.dc.w $2B
+.dc.w $7
+*line 152
+.dc.l _et_trns
+*line 152
+.dc.l _ef_trns
+*line 152
+.dc.l _rd_trns
+*line 152
+.dc.l _nd_trns
+.dc.w $13
+.dc.w $2D
+.dc.w $30
+.dc.w $8
+*line 153
+.dc.l _et_trns
+*line 153
+.dc.l _ef_trns
+*line 153
+.dc.l _rd_trns
+*line 153
+.dc.l _nd_trns
+.dc.w $13
+.dc.w $32
+.dc.w $35
+.dc.w $9
+*line 154
+.dc.l _et_trns
+*line 154
+.dc.l _ef_trns
+*line 154
+.dc.l _rd_trns
+*line 154
+.dc.l _nd_trns
+.dc.w $13
+.dc.w $37
+.dc.w $3A
+.dc.w $A
+*line 155
+.dc.l _et_trns
+*line 155
+.dc.l _ef_trns
+*line 155
+.dc.l _rd_trns
+*line 155
+.dc.l _nd_trns
+.dc.w $13
+.dc.w $3C
+.dc.w $3F
+.dc.w $B
+*line 156
+.dc.l _et_trns
+*line 156
+.dc.l _ef_trns
+*line 156
+.dc.l _rd_trns
+*line 156
+.dc.l _nd_trns
+.dc.w $14
+.dc.w $6
+.dc.w $6
+.dc.w $0
+*line 161
+.dc.l _et_dyn
+*line 161
+.dc.l _ef_dyn
+*line 161
+.dc.l _rd_dyn
+*line 161
+.dc.l _nd_dyn
+.dc.w $14
+.dc.w $8
+.dc.w $8
+.dc.w $0
+*line 162
+.dc.l _et_loc
+*line 162
+.dc.l _ef_loc
+*line 162
+.dc.l _rd_loc
+*line 162
+.dc.l _nd_loc
+.dc.w $14
+.dc.w $B
+.dc.w $B
+.dc.w $1
+*line 164
+.dc.l _et_dyn
+*line 164
+.dc.l _ef_dyn
+*line 164
+.dc.l _rd_dyn
+*line 164
+.dc.l _nd_dyn
+.dc.w $14
+.dc.w $D
+.dc.w $D
+.dc.w $1
+*line 165
+.dc.l _et_loc
+*line 165
+.dc.l _ef_loc
+*line 165
+.dc.l _rd_loc
+*line 165
+.dc.l _nd_loc
+.dc.w $14
+.dc.w $10
+.dc.w $10
+.dc.w $2
+*line 167
+.dc.l _et_dyn
+*line 167
+.dc.l _ef_dyn
+*line 167
+.dc.l _rd_dyn
+*line 167
+.dc.l _nd_dyn
+.dc.w $14
+.dc.w $12
+.dc.w $12
+.dc.w $2
+*line 168
+.dc.l _et_loc
+*line 168
+.dc.l _ef_loc
+*line 168
+.dc.l _rd_loc
+*line 168
+.dc.l _nd_loc
+.dc.w $14
+.dc.w $15
+.dc.w $15
+.dc.w $3
+*line 170
+.dc.l _et_dyn
+*line 170
+.dc.l _ef_dyn
+*line 170
+.dc.l _rd_dyn
+*line 170
+.dc.l _nd_dyn
+.dc.w $14
+.dc.w $17
+.dc.w $17
+.dc.w $3
+*line 171
+.dc.l _et_loc
+*line 171
+.dc.l _ef_loc
+*line 171
+.dc.l _rd_loc
+*line 171
+.dc.l _nd_loc
+.dc.w $14
+.dc.w $1A
+.dc.w $1A
+.dc.w $4
+*line 173
+.dc.l _et_dyn
+*line 173
+.dc.l _ef_dyn
+*line 173
+.dc.l _rd_dyn
+*line 173
+.dc.l _nd_dyn
+.dc.w $14
+.dc.w $1C
+.dc.w $1C
+.dc.w $4
+*line 174
+.dc.l _et_loc
+*line 174
+.dc.l _ef_loc
+*line 174
+.dc.l _rd_loc
+*line 174
+.dc.l _nd_loc
+.dc.w $14
+.dc.w $1F
+.dc.w $1F
+.dc.w $5
+*line 176
+.dc.l _et_dyn
+*line 176
+.dc.l _ef_dyn
+*line 176
+.dc.l _rd_dyn
+*line 176
+.dc.l _nd_dyn
+.dc.w $14
+.dc.w $21
+.dc.w $21
+.dc.w $5
+*line 177
+.dc.l _et_loc
+*line 177
+.dc.l _ef_loc
+*line 177
+.dc.l _rd_loc
+*line 177
+.dc.l _nd_loc
+.dc.w $14
+.dc.w $24
+.dc.w $24
+.dc.w $6
+*line 179
+.dc.l _et_dyn
+*line 179
+.dc.l _ef_dyn
+*line 179
+.dc.l _rd_dyn
+*line 179
+.dc.l _nd_dyn
+.dc.w $14
+.dc.w $26
+.dc.w $26
+.dc.w $6
+*line 180
+.dc.l _et_loc
+*line 180
+.dc.l _ef_loc
+*line 180
+.dc.l _rd_loc
+*line 180
+.dc.l _nd_loc
+.dc.w $14
+.dc.w $29
+.dc.w $29
+.dc.w $7
+*line 182
+.dc.l _et_dyn
+*line 182
+.dc.l _ef_dyn
+*line 182
+.dc.l _rd_dyn
+*line 182
+.dc.l _nd_dyn
+.dc.w $14
+.dc.w $2B
+.dc.w $2B
+.dc.w $7
+*line 183
+.dc.l _et_loc
+*line 183
+.dc.l _ef_loc
+*line 183
+.dc.l _rd_loc
+*line 183
+.dc.l _nd_loc
+.dc.w $14
+.dc.w $2E
+.dc.w $2E
+.dc.w $8
+*line 185
+.dc.l _et_dyn
+*line 185
+.dc.l _ef_dyn
+*line 185
+.dc.l _rd_dyn
+*line 185
+.dc.l _nd_dyn
+.dc.w $14
+.dc.w $30
+.dc.w $30
+.dc.w $8
+*line 186
+.dc.l _et_loc
+*line 186
+.dc.l _ef_loc
+*line 186
+.dc.l _rd_loc
+*line 186
+.dc.l _nd_loc
+.dc.w $14
+.dc.w $33
+.dc.w $33
+.dc.w $9
+*line 188
+.dc.l _et_dyn
+*line 188
+.dc.l _ef_dyn
+*line 188
+.dc.l _rd_dyn
+*line 188
+.dc.l _nd_dyn
+.dc.w $14
+.dc.w $35
+.dc.w $35
+.dc.w $9
+*line 189
+.dc.l _et_loc
+*line 189
+.dc.l _ef_loc
+*line 189
+.dc.l _rd_loc
+*line 189
+.dc.l _nd_loc
+.dc.w $14
+.dc.w $38
+.dc.w $38
+.dc.w $A
+*line 191
+.dc.l _et_dyn
+*line 191
+.dc.l _ef_dyn
+*line 191
+.dc.l _rd_dyn
+*line 191
+.dc.l _nd_dyn
+.dc.w $14
+.dc.w $3A
+.dc.w $3A
+.dc.w $A
+*line 192
+.dc.l _et_loc
+*line 192
+.dc.l _ef_loc
+*line 192
+.dc.l _rd_loc
+*line 192
+.dc.l _nd_loc
+.dc.w $14
+.dc.w $3D
+.dc.w $3D
+.dc.w $B
+*line 194
+.dc.l _et_dyn
+*line 194
+.dc.l _ef_dyn
+*line 194
+.dc.l _rd_dyn
+*line 194
+.dc.l _nd_dyn
+.dc.w $14
+.dc.w $3F
+.dc.w $3F
+.dc.w $B
+*line 195
+.dc.l _et_loc
+*line 195
+.dc.l _ef_loc
+*line 195
+.dc.l _rd_loc
+*line 195
+.dc.l _nd_loc
+.dc.w $15
+.dc.w $6
+.dc.w $8
+.dc.w $0
+*line 200
+.dc.l _et_vel
+*line 200
+.dc.l _ef_vel
+*line 200
+.dc.l _rd_vel
+*line 200
+.dc.l _nd_vel
+.dc.w $15
+.dc.w $B
+.dc.w $D
+.dc.w $1
+*line 201
+.dc.l _et_vel
+*line 201
+.dc.l _ef_vel
+*line 201
+.dc.l _rd_vel
+*line 201
+.dc.l _nd_vel
+.dc.w $15
+.dc.w $10
+.dc.w $12
+.dc.w $2
+*line 202
+.dc.l _et_vel
+*line 202
+.dc.l _ef_vel
+*line 202
+.dc.l _rd_vel
+*line 202
+.dc.l _nd_vel
+.dc.w $15
+.dc.w $15
+.dc.w $17
+.dc.w $3
+*line 203
+.dc.l _et_vel
+*line 203
+.dc.l _ef_vel
+*line 203
+.dc.l _rd_vel
+*line 203
+.dc.l _nd_vel
+.dc.w $15
+.dc.w $1A
+.dc.w $1C
+.dc.w $4
+*line 204
+.dc.l _et_vel
+*line 204
+.dc.l _ef_vel
+*line 204
+.dc.l _rd_vel
+*line 204
+.dc.l _nd_vel
+.dc.w $15
+.dc.w $1F
+.dc.w $21
+.dc.w $5
+*line 205
+.dc.l _et_vel
+*line 205
+.dc.l _ef_vel
+*line 205
+.dc.l _rd_vel
+*line 205
+.dc.l _nd_vel
+.dc.w $15
+.dc.w $24
+.dc.w $26
+.dc.w $6
+*line 206
+.dc.l _et_vel
+*line 206
+.dc.l _ef_vel
+*line 206
+.dc.l _rd_vel
+*line 206
+.dc.l _nd_vel
+.dc.w $15
+.dc.w $29
+.dc.w $2B
+.dc.w $7
+*line 207
+.dc.l _et_vel
+*line 207
+.dc.l _ef_vel
+*line 207
+.dc.l _rd_vel
+*line 207
+.dc.l _nd_vel
+.dc.w $15
+.dc.w $2E
+.dc.w $30
+.dc.w $8
+*line 208
+.dc.l _et_vel
+*line 208
+.dc.l _ef_vel
+*line 208
+.dc.l _rd_vel
+*line 208
+.dc.l _nd_vel
+.dc.w $15
+.dc.w $33
+.dc.w $35
+.dc.w $9
+*line 209
+.dc.l _et_vel
+*line 209
+.dc.l _ef_vel
+*line 209
+.dc.l _rd_vel
+*line 209
+.dc.l _nd_vel
+.dc.w $15
+.dc.w $38
+.dc.w $3A
+.dc.w $A
+*line 210
+.dc.l _et_vel
+*line 210
+.dc.l _ef_vel
+*line 210
+.dc.l _rd_vel
+*line 210
+.dc.l _nd_vel
+.dc.w $15
+.dc.w $3D
+.dc.w $3F
+.dc.w $B
+*line 211
+.dc.l _et_vel
+*line 211
+.dc.l _ef_vel
+*line 211
+.dc.l _rd_vel
+*line 211
+.dc.l _nd_vel
+.dc.w $17
+.dc.w $6
+.dc.w $6
+.dc.w $0
+*line 214
+.dc.l _et_res1
+*line 214
+.dc.l _ef_res1
+*line 214
+.dc.l _rd_res1
+*line 214
+.dc.l _nd_res1
+.dc.w $17
+.dc.w $8
+.dc.w $C
+.dc.w $0
+*line 215
+.dc.l _et_aval
+*line 215
+.dc.l _ef_aval
+*line 215
+.dc.l _rd_aval
+*line 215
+.dc.l _nd_aval
+.dc.w $17
+.dc.w $F
+.dc.w $F
+.dc.w $1
+*line 217
+.dc.l _et_res1
+*line 217
+.dc.l _ef_res1
+*line 217
+.dc.l _rd_res1
+*line 217
+.dc.l _nd_res1
+.dc.w $17
+.dc.w $11
+.dc.w $15
+.dc.w $1
+*line 218
+.dc.l _et_aval
+*line 218
+.dc.l _ef_aval
+*line 218
+.dc.l _rd_aval
+*line 218
+.dc.l _nd_aval
+.dc.w $17
+.dc.w $18
+.dc.w $18
+.dc.w $2
+*line 220
+.dc.l _et_res1
+*line 220
+.dc.l _ef_res1
+*line 220
+.dc.l _rd_res1
+*line 220
+.dc.l _nd_res1
+.dc.w $17
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 221
+.dc.l _et_aval
+*line 221
+.dc.l _ef_aval
+*line 221
+.dc.l _rd_aval
+*line 221
+.dc.l _nd_aval
+.dc.w $17
+.dc.w $21
+.dc.w $21
+.dc.w $3
+*line 223
+.dc.l _et_res1
+*line 223
+.dc.l _ef_res1
+*line 223
+.dc.l _rd_res1
+*line 223
+.dc.l _nd_res1
+.dc.w $17
+.dc.w $23
+.dc.w $27
+.dc.w $3
+*line 224
+.dc.l _et_aval
+*line 224
+.dc.l _ef_aval
+*line 224
+.dc.l _rd_aval
+*line 224
+.dc.l _nd_aval
+.dc.w $17
+.dc.w $2A
+.dc.w $2A
+.dc.w $4
+*line 226
+.dc.l _et_res1
+*line 226
+.dc.l _ef_res1
+*line 226
+.dc.l _rd_res1
+*line 226
+.dc.l _nd_res1
+.dc.w $17
+.dc.w $2C
+.dc.w $30
+.dc.w $4
+*line 227
+.dc.l _et_aval
+*line 227
+.dc.l _ef_aval
+*line 227
+.dc.l _rd_aval
+*line 227
+.dc.l _nd_aval
+.dc.w $17
+.dc.w $33
+.dc.w $33
+.dc.w $5
+*line 229
+.dc.l _et_res1
+*line 229
+.dc.l _ef_res1
+*line 229
+.dc.l _rd_res1
+*line 229
+.dc.l _nd_res1
+.dc.w $17
+.dc.w $35
+.dc.w $39
+.dc.w $5
+*line 230
+.dc.l _et_aval
+*line 230
+.dc.l _ef_aval
+*line 230
+.dc.l _rd_aval
+*line 230
+.dc.l _nd_aval
+.dc.w $17
+.dc.w $3D
+.dc.w $3E
+.dc.w $0
+*line 232
+.dc.l _et_agrp
+*line 232
+.dc.l _ef_agrp
+*line 232
+.dc.l _rd_agrp
+*line 232
+.dc.l _nd_agrp
+.dc.w $18
+.dc.w $7
+.dc.w $8
+.dc.w $0
+*line 234
+.dc.l _et_scor
+*line 234
+.dc.l _ef_scor
+*line 234
+.dc.l _rd_scor
+*line 234
+.dc.l _nd_scor
+.dc.w $18
+.dc.w $A
+.dc.w $19
+.dc.w $0
+*line 235
+.dc.l _et_null
+*line 235
+.dc.l _ef_null
+*line 235
+.dc.l _rd_null
+*line 235
+.dc.l _nd_null
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.l $0
+.dc.l $0
+.dc.l $0
+.dc.l $0
+.globl _sc_flds
+.data
+_sc_flds:
+*line 246
+.dc.l _stdctp3
+*line 247
+.dc.l _nokey
+*line 248
+.dc.l _nokey
+*line 249
+.dc.l _cxkstd
+*line 250
+.dc.l _cykstd
+*line 251
+.dc.l _sdcxu
+*line 252
+.dc.l _sdcyu
+*line 253
+.dc.l _nokey
+*line 254
+.dc.l _nokey
+*line 255
+.dc.l _sdxkey
+*line 256
+.dc.l _select
+*line 257
+.dc.l _sdmkey
+*line 258
+.dc.l _stddkey
+*line 259
+.dc.l _scntfld
+*line 260
+.dc.l _sc_fet1
+*line 261
+.dc.l _sdboxes
+*line 262
+.dc.l _crate1
+*line 263
+.dc.l _crate1
+.dc.w $0
+.dc.w $100
+.dc.w $AF
+.globl _et_null
+.text
+_et_null:
+~~et_null:
+link R14,#-4
+*line 281
+clr R0
+bra L1
+L1:unlk R14
+rts
+.globl _ef_null
+.text
+_ef_null:
+~~ef_null:
+link R14,#-4
+*line 287
+clr R0
+bra L2
+L2:unlk R14
+rts
+.globl _rd_null
+.text
+_rd_null:
+~~rd_null:
+link R14,#-4
+*line 293
+clr R0
+bra L3
+L3:unlk R14
+rts
+.globl _nd_null
+.text
+_nd_null:
+~~nd_null:
+link R14,#-4
+*line 299
+clr R0
+bra L4
+L4:unlk R14
+rts
+.globl _istart
+.text
+_istart:
+~~istart:
+link R14,#0
+movem.l R7-R7/R11-R13,-(sp)
+~ep=R13
+~pp=R12
+~tp=R11
+*line 315
+*line 316
+tst _insmode
+bne L5
+*line 317
+*line 318
+move.l _t_cur,(sp)
+move #1,-(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,R13
+*line 320
+*line 321
+move.b 5(R13),R0
+ext.w R0
+and #127,R0
+cmp #1,R0
+bne L6
+*line 321
+move.l 12(R13),R13
+*line 322
+L6:
+*line 323
+*line 324
+move.b 5(R13),R0
+ext.w R0
+and #127,R0
+cmp #21,R0
+beq L5
+*line 325
+*line 326
+move _curscor,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_scores,R9
+move.l 0(R8,R9.l),R8
+move.l 8(R8),R11
+*line 327
+move.l 8(R13),R12
+*line 329
+clr.l 8(R13)
+*line 330
+move.l R11,12(R12)
+*line 331
+move.l 8(R11),R8
+move.l #$0,12(R8)
+*line 333
+move.l R12,8(R11)
+*line 335
+move.l _t_cur,_t_ins
+*line 336
+move.l R13,_peg
+*line 338
+move.l _t_cur,(sp)
+clr -(sp)
+move.l R12,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,_p_cur
+*line 339
+move.l _p_cur,_p_ctr
+*line 340
+move.l _t_bak,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,_p_bak
+*line 341
+move.l _t_fwd,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,_p_fwd
+*line 343
+move #1,_insmode
+L5:tst.l (sp)+
+movem.l (sp)+,R11-R13
+unlk R14
+rts
+.globl _icancel
+.text
+_icancel:
+~~icancel:
+link R14,#-8
+movem.l R7-R7/R11-R13,-(sp)
+~ep=R13
+~tp=R12
+~rp=R11
+~pp=-4
+~endtime=-8
+*line 361
+*line 362
+tst _insmode
+beq L7
+*line 363
+*line 364
+move _curscor,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_scores,R9
+move.l 0(R8,R9.l),R8
+move.l 8(R8),R12
+*line 365
+move.l 8(R12),-4(R14)
+*line 367
+move.l -4(R14),R8
+move.l (R8),-8(R14)
+*line 369
+*line 370
+move.l _t_cur,R0
+cmp.l -8(R14),R0
+ble L8
+*line 370
+move.l _t_cur,-8(R14)
+*line 371
+L8:
+*line 372
+move.l _peg,R11
+*line 374
+bra L11
+L10:
+*line 375
+*line 376
+move.l R11,R13
+*line 377
+move.l 12(R13),R11
+*line 378
+*line 379
+move.l (R13),R0
+sub.l _t_ins,R0
+add.l -8(R14),R0
+move.l R0,(R13)
+L11:
+*line 380
+move.l R11,R0
+bne L10
+L9:
+*line 382
+move.l R12,12(R13)
+*line 383
+move.l R13,8(R12)
+*line 385
+move.l -4(R14),R8
+move.l _peg,12(R8)
+*line 386
+move.l _peg,R8
+move.l -4(R14),8(R8)
+*line 388
+move.l _t_cur,(sp)
+clr -(sp)
+move.l -4(R14),-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,_p_cur
+*line 389
+move.l _p_cur,_p_ctr
+*line 390
+move.l _t_bak,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,_p_bak
+*line 391
+move.l _t_fwd,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,_p_fwd
+*line 393
+clr _insmode
+L7:tst.l (sp)+
+movem.l (sp)+,R11-R13
+unlk R14
+rts
+.globl _sdcxu
+.text
+_sdcxu:
+~~sdcxu:
+link R14,#-4
+*line 407
+*line 407
+tst _sdmctl
+bne L13
+*line 408
+*line 409
+jsr _vtcxupd
+*line 410
+bra L14
+L13:
+*line 411
+*line 411
+tst _sdmctl
+ble L15
+*line 412
+*line 413
+move _cxrate,R0
+add R0,_vtxval
+move _vtxval,R0
+asr #3,R0
+move R0,_vtccol
+*line 414
+*line 415
+*line 416
+move _sdmctl,R0
+asl #3,R0
+ext.l R0
+move.l R0,R8
+move.l #_sdmlim,R9
+move 6(R8,R9.l),R0
+cmp _vtccol,R0
+bge L16
+*line 416
+move _sdmctl,R0
+asl #3,R0
+ext.l R0
+move.l R0,R8
+move.l #_sdmlim,R9
+move 6(R8,R9.l),R0
+move R0,_vtccol
+asl #3,R0
+move R0,_vtxval
+bra L17
+L16:
+*line 417
+*line 418
+move _sdmctl,R0
+asl #3,R0
+ext.l R0
+move.l R0,R8
+move.l #_sdmlim,R9
+move 2(R8,R9.l),R0
+cmp _vtccol,R0
+ble L18
+*line 418
+move _sdmctl,R0
+asl #3,R0
+ext.l R0
+move.l R0,R8
+move.l #_sdmlim,R9
+move 2(R8,R9.l),R0
+move R0,_vtccol
+asl #3,R0
+move R0,_vtxval
+*line 419
+L18:L17:bra L19
+L15:
+*line 420
+*line 421
+*line 422
+move _cxrate,R0
+add R0,_cxval
+*line 423
+*line 424
+*line 425
+cmp #511,_cxval
+ble L20
+*line 425
+move #511,_cxval
+bra L21
+L20:
+*line 426
+*line 427
+tst _cxval
+bge L22
+*line 427
+clr _cxval
+L22:L21:L19:L14:bra L12
+L12:unlk R14
+rts
+.globl _sdcyu
+.text
+_sdcyu:
+~~sdcyu:
+link R14,#-4
+*line 444
+*line 444
+tst _sdmctl
+bne L24
+*line 445
+*line 446
+jsr _vtcyupd
+*line 447
+bra L25
+L24:
+*line 448
+*line 448
+tst _sdmctl
+ble L26
+*line 449
+*line 450
+move _cyrate,R0
+add R0,_vtyval
+move _vtyval,R0
+ext.l R0
+divs #14,R0
+move R0,_vtcrow
+*line 451
+*line 452
+*line 453
+move _sdmctl,R0
+asl #3,R0
+ext.l R0
+move.l R0,R8
+move.l #_sdmlim,R9
+move 0(R8,R9.l),R0
+cmp _vtcrow,R0
+ble L27
+*line 453
+move _sdmctl,R0
+asl #3,R0
+ext.l R0
+move.l R0,R8
+move.l #_sdmlim,R9
+move 0(R8,R9.l),R0
+move R0,_vtcrow
+muls #14,R0
+move R0,_vtyval
+bra L28
+L27:
+*line 454
+*line 455
+move _sdmctl,R0
+asl #3,R0
+ext.l R0
+move.l R0,R8
+move.l #_sdmlim,R9
+move 4(R8,R9.l),R0
+cmp _vtcrow,R0
+bge L29
+*line 455
+move _sdmctl,R0
+asl #3,R0
+ext.l R0
+move.l R0,R8
+move.l #_sdmlim,R9
+move 4(R8,R9.l),R0
+move R0,_vtcrow
+muls #14,R0
+move R0,_vtyval
+*line 456
+L29:L28:bra L30
+L26:
+*line 457
+*line 458
+*line 459
+move _cyrate,R0
+add R0,_cyval
+*line 460
+*line 461
+*line 462
+cmp #349,_cyval
+ble L31
+*line 462
+move #349,_cyval
+bra L32
+L31:
+*line 463
+*line 464
+tst _cyval
+bge L33
+*line 464
+clr _cyval
+*line 465
+L33:L32:L30:L25:bra L23
+L23:unlk R14
+rts
+.globl _scntfld
+.text
+_scntfld:
+~~scntfld:
+~k=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~grp=R7
+~fnc=R6
+~var=R5
+*line 486
+*line 487
+tst _astat
+bne L35
+*line 487
+move #-1,R0
+bra L34
+*line 488
+L35:
+*line 489
+*line 489
+cmp #18,_stcrow
+bne L36
+*line 490
+*line 491
+*line 492
+cmp #5,_stccol
+bge L37
+*line 492
+move #-1,R0
+bra L34
+*line 493
+L37:
+*line 494
+move _stccol,R7
+sub #5,R7
+ext.l R7
+divs #5,R7
+*line 495
+move _stccol,R6
+sub #5,R6
+ext.l R6
+divs #5,R6
+swap R6
+*line 496
+*line 497
+*line 497
+tst R6
+bne L38
+*line 498
+*line 499
+*line 499
+cmp #8,8(R14)
+bne L39
+*line 500
+*line 501
+move R7,R8
+add.l R8,R8
+add.l #_grpstat,R8
+clr (R8)
+*line 502
+move R7,(sp)
+jsr _dsgstat
+*line 503
+clr R0
+bra L34
+*line 504
+bra L40
+L39:
+*line 505
+*line 505
+cmp #9,8(R14)
+bne L41
+*line 506
+*line 507
+move R7,R8
+add.l R8,R8
+add.l #_grpstat,R8
+move #1,(R8)
+*line 508
+move R7,(sp)
+jsr _dsgstat
+*line 509
+clr R0
+bra L34
+*line 510
+*line 511
+bra L42
+L41:
+*line 512
+move #-1,R0
+bra L34
+L42:L40:
+*line 513
+*line 514
+bra L43
+L38:
+*line 515
+*line 515
+cmp #1,R6
+bne L44
+*line 516
+*line 517
+*line 517
+cmp #8,8(R14)
+bne L45
+*line 518
+*line 519
+move R7,R8
+add.l R8,R8
+add.l #_grpmode,R8
+clr (R8)
+*line 520
+move R7,(sp)
+jsr _dsgmode
+*line 521
+clr R0
+bra L34
+*line 522
+bra L46
+L45:
+*line 523
+*line 523
+cmp #9,8(R14)
+bne L47
+*line 524
+*line 525
+*line 526
+move R7,R8
+add.l R8,R8
+add.l #_grpmode,R8
+add #1,(R8)
+move (R8),R0
+cmp #1,R0
+ble L48
+*line 526
+move R7,R8
+add.l R8,R8
+add.l #_grpmode,R8
+move #2,(R8)
+*line 527
+L48:
+*line 528
+move R7,(sp)
+jsr _dsgmode
+*line 529
+clr R0
+bra L34
+*line 530
+*line 531
+bra L49
+L47:
+*line 532
+move #-1,R0
+bra L34
+L49:L46:
+*line 533
+*line 534
+bra L50
+L44:
+*line 535
+move #-1,R0
+bra L34
+L50:L43:
+*line 536
+*line 537
+bra L51
+L36:
+*line 538
+*line 538
+cmp #22,_stcrow
+bne L52
+*line 539
+*line 540
+*line 541
+cmp #5,_stccol
+bge L53
+*line 541
+move #-1,R0
+bra L34
+*line 542
+L53:
+*line 543
+move _stccol,R5
+sub #5,R5
+ext.l R5
+divs #9,R5
+*line 544
+move _stccol,R6
+sub #5,R6
+ext.l R6
+divs #9,R6
+swap R6
+*line 545
+tst _angroup
+bge L10000
+move _angroup,R0
+neg R0
+bra L10002
+L10000:move _angroup,R0
+L10002:move R0,R7
+sub #1,R7
+*line 546
+*line 547
+*line 547
+tst R6
+bne L54
+*line 548
+*line 549
+*line 549
+cmp #8,8(R14)
+bne L55
+*line 550
+*line 551
+move R5,R0
+asl #5,R0
+ext.l R0
+move R7,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+add.l #_varmode,R0
+move.l R0,R8
+clr (R8)
+*line 552
+move R5,(sp)
+jsr _dsvmode
+*line 553
+clr R0
+bra L34
+*line 554
+bra L56
+L55:
+*line 555
+*line 555
+cmp #9,8(R14)
+bne L57
+*line 556
+*line 557
+*line 558
+move R5,R0
+asl #5,R0
+ext.l R0
+move R7,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+add.l #_varmode,R0
+move.l R0,R8
+add #1,(R8)
+move (R8),R0
+cmp #1,R0
+ble L58
+*line 558
+move R5,R0
+asl #5,R0
+ext.l R0
+move R7,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+add.l #_varmode,R0
+move.l R0,R8
+move #2,(R8)
+*line 559
+L58:
+*line 560
+move R5,(sp)
+jsr _dsvmode
+*line 561
+clr R0
+bra L34
+*line 562
+L57:L56:
+*line 563
+L54:
+*line 564
+*line 565
+L52:L51:
+*line 566
+move #-1,R0
+bra L34
+L34:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _cp2time
+.text
+_cp2time:
+~~cp2time:
+~cx=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~ct=R7
+*line 586
+move 8(R14),R7
+ext.l R7
+add.l _t_cur,R7
+add.l #$ffffff00,R7
+*line 588
+*line 589
+tst.l R7
+bge L60
+*line 589
+clr R0
+bra L59
+*line 590
+L60:
+*line 591
+move.l R7,_ctime
+*line 592
+move #1,R0
+bra L59
+L59:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _delevts
+.text
+_delevts:
+~~delevts:
+~etp=R7
+~thetime=R6
+link R14,#0
+movem.l R2-R7/R12-R13,-(sp)
+~ep=R13
+~np=R12
+~et=R5
+~rc=R4
+~dsw=R3
+*line 614
+move 8(R14),R7
+*line 614
+move.l 10(R14),R6
+*line 614
+clr R4
+*line 616
+move.l R6,(sp)
+move #1,-(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,R13
+*line 620
+bra L64
+L63:
+*line 621
+*line 622
+move.l 12(R13),R12
+*line 623
+move.b 5(R13),R5
+ext.w R5
+and #127,R5
+*line 624
+move.l R13,(sp)
+jsr _oktode
+move R0,R3
+*line 625
+*line 626
+*line 627
+tst R3
+beq L65
+cmp #-1,R7
+beq L10003
+cmp R7,R5
+bne L65
+L10003:*line 628
+*line 629
+move #1,R4
+*line 630
+*line 631
+*line 632
+move R5,R8
+add.l R8,R8
+add.l #_ehdlist,R8
+cmp #-1,(R8)
+beq L66
+*line 632
+move R5,R8
+add.l R8,R8
+move.l #_ehdlist,R9
+move 0(R8,R9.l),(sp)
+move.l R13,-(sp)
+jsr _eh_rmv
+addq.l #4,sp
+*line 633
+*line 634
+*line 635
+L66:
+*line 636
+*line 637
+cmp.l _p_bak,R13
+bne L67
+*line 637
+move.l R12,_p_bak
+*line 638
+L67:
+*line 639
+*line 640
+cmp.l _p_cur,R13
+bne L68
+*line 640
+move.l R12,_p_cur
+*line 641
+L68:
+*line 642
+*line 643
+cmp.l _p_ctr,R13
+bne L69
+*line 643
+move.l R12,_p_ctr
+*line 644
+L69:
+*line 645
+*line 646
+cmp.l _p_fwd,R13
+bne L70
+*line 646
+move.l R12,_p_fwd
+*line 647
+L70:
+*line 648
+move.l R13,(sp)
+jsr _e_rmv
+move.l R0,(sp)
+jsr _e_del
+*line 649
+*line 650
+L65:
+*line 651
+move.l R12,R13
+L64:
+*line 652
+cmp.l (R13),R6
+beq L63
+L62:
+*line 654
+*line 655
+tst R4
+beq L71
+*line 655
+move.l _t_cur,(sp)
+jsr _sc_refr
+*line 656
+L71:
+*line 657
+move R4,R0
+bra L61
+L61:tst.l (sp)+
+movem.l (sp)+,R3-R7/R12-R13
+unlk R14
+rts
+.globl _deladat
+.text
+_deladat:
+~~deladat:
+link R14,#0
+movem.l R2-R7/R12-R13,-(sp)
+~ep=R13
+~rp=R12
+~grp=R7
+~rc=R6
+~var=R5
+~vc=R4
+~vn=R3
+*line 675
+clr R6
+*line 677
+*line 678
+cmp #6,_stccol
+bge L73
+*line 678
+move R6,R0
+bra L72
+*line 679
+L73:
+*line 680
+move _stccol,R3
+sub #6,R3
+ext.l R3
+divs #9,R3
+*line 681
+move _stccol,R4
+sub #6,R4
+ext.l R4
+divs #9,R4
+swap R4
+*line 683
+move.l _t_cur,(sp)
+move #1,-(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,R13
+*line 685
+*line 685
+tst R4
+bne L74
+*line 686
+*line 687
+bra L77
+L76:
+*line 688
+*line 689
+move.l 12(R13),R12
+*line 690
+*line 691
+*line 691
+move.b 5(R13),R0
+ext.w R0
+and #127,R0
+cmp #15,R0
+bne L78
+*line 692
+*line 693
+move.b 6(R13),R7
+ext.w R7
+and #15,R7
+*line 694
+move.b 6(R13),R5
+ext.w R5
+asr #4,R5
+and #15,R5
+*line 695
+*line 696
+*line 697
+*line 698
+cmp R3,R5
+bne L79
+move R7,R8
+add.l R8,R8
+move.l #_grpstat,R9
+tst 0(R8,R9.l)
+beq L79
+tst _ancmsw
+beq L10004
+move R5,R0
+asl #5,R0
+ext.l R0
+move R7,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_varmode,R9
+move 0(R8,R9.l),R0
+bra L10006
+L10004:move R7,R8
+add.l R8,R8
+move.l #_grpmode,R9
+move 0(R8,R9.l),R0
+L10006:cmp #2,R0
+bne L79
+*line 699
+*line 700
+*line 701
+*line 702
+*line 703
+cmp.l _p_bak,R13
+bne L80
+*line 703
+move.l R12,_p_bak
+*line 704
+L80:
+*line 705
+*line 706
+cmp.l _p_cur,R13
+bne L81
+*line 706
+move.l R12,_p_cur
+*line 707
+L81:
+*line 708
+*line 709
+cmp.l _p_ctr,R13
+bne L82
+*line 709
+move.l R12,_p_ctr
+*line 710
+L82:
+*line 711
+*line 712
+cmp.l _p_fwd,R13
+bne L83
+*line 712
+move.l R12,_p_fwd
+*line 713
+*line 714
+*line 715
+L83:
+*line 716
+move #4,(sp)
+move.l R13,-(sp)
+jsr _eh_rmv
+addq.l #4,sp
+*line 717
+move.l R13,(sp)
+jsr _e_rmv
+move.l R0,(sp)
+jsr _e_del
+*line 718
+move #1,R6
+*line 719
+L79:
+*line 720
+*line 721
+L78:
+*line 722
+move.l R12,R13
+L77:
+*line 723
+move.l (R13),R0
+cmp.l _t_cur,R0
+beq L76
+L75:
+*line 724
+*line 725
+bra L84
+L74:
+*line 726
+*line 726
+cmp #2,R4
+blt L85
+cmp #6,R4
+bgt L85
+*line 727
+*line 728
+bra L88
+L87:
+*line 729
+*line 730
+move.l 12(R13),R12
+*line 731
+*line 732
+*line 732
+move.b 5(R13),R0
+ext.w R0
+and #127,R0
+cmp #14,R0
+bne L89
+*line 733
+*line 734
+move.b 6(R13),R7
+ext.w R7
+and #15,R7
+*line 735
+move.b 6(R13),R5
+ext.w R5
+asr #4,R5
+and #15,R5
+*line 736
+*line 737
+*line 738
+*line 739
+cmp R3,R5
+bne L90
+move R7,R8
+add.l R8,R8
+move.l #_grpstat,R9
+tst 0(R8,R9.l)
+beq L90
+tst _ancmsw
+beq L10007
+move R5,R0
+asl #5,R0
+ext.l R0
+move R7,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_varmode,R9
+move 0(R8,R9.l),R0
+bra L10009
+L10007:move R7,R8
+add.l R8,R8
+move.l #_grpmode,R9
+move 0(R8,R9.l),R0
+L10009:cmp #2,R0
+bne L90
+*line 740
+*line 741
+*line 742
+*line 743
+*line 744
+cmp.l _p_bak,R13
+bne L91
+*line 744
+move.l R12,_p_bak
+*line 745
+L91:
+*line 746
+*line 747
+cmp.l _p_cur,R13
+bne L92
+*line 747
+move.l R12,_p_cur
+*line 748
+L92:
+*line 749
+*line 750
+cmp.l _p_ctr,R13
+bne L93
+*line 750
+move.l R12,_p_ctr
+*line 751
+L93:
+*line 752
+*line 753
+cmp.l _p_fwd,R13
+bne L94
+*line 753
+move.l R12,_p_fwd
+*line 754
+L94:
+*line 755
+move.l R13,(sp)
+jsr _e_rmv
+move.l R0,(sp)
+jsr _e_del
+*line 756
+move #1,R6
+*line 757
+L90:
+*line 758
+*line 759
+L89:
+*line 760
+move.l R12,R13
+L88:
+*line 761
+move.l (R13),R0
+cmp.l _t_cur,R0
+beq L87
+L86:
+*line 762
+*line 763
+L85:L84:
+*line 764
+*line 764
+tst R6
+beq L95
+*line 765
+*line 766
+move.l _fc_val,(sp)
+jsr _sc_refr
+*line 767
+jsr _ds_anrs
+*line 768
+jsr _ds_anvl
+*line 769
+*line 770
+L95:
+*line 771
+move R6,R0
+bra L72
+L72:tst.l (sp)+
+movem.l (sp)+,R3-R7/R12-R13
+unlk R14
+rts
+.globl _sdxkey
+.text
+_sdxkey:
+~~sdxkey:
+link R14,#0
+movem.l R4-R7/R12-R13,-(sp)
+~col=R7
+~grp=R6
+~sect=R5
+~ep=R13
+~rp=R12
+*line 788
+*line 789
+tst _astat
+beq L96
+*line 790
+*line 791
+*line 792
+tst _clkrun
+bne L96
+*line 793
+*line 794
+*line 795
+cmp #-1,_scmctl
+bne L96
+*line 796
+*line 797
+*line 798
+*line 798
+cmp #4,_sdmctl
+bne L97
+*line 799
+*line 800
+*line 801
+cmp #19,_vtcrow
+beq L10010
+cmp #20,_vtcrow
+bne L98
+L10010:cmp #24,_vtccol
+blt L98
+*line 802
+*line 803
+*line 804
+tst _recsw
+beq L96
+*line 805
+*line 806
+*line 807
+*line 808
+move _vtccol,R5
+add #-24,R5
+asr #2,R5
+cmp #20,_vtcrow
+bne L10011
+move #10,R0
+bra L10013
+L10011:clr R0
+L10013:add R0,R5
+*line 809
+move _vtccol,R7
+add #-24,R7
+and #3,R7
+*line 810
+*line 811
+move R7,R0
+bra L100
+*line 812
+L101:
+*line 813
+*line 814
+*line 815
+*line 816
+*line 816
+move _curscor,R0
+muls #80,R0
+move R5,R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+add.l #_seclist,R0
+move.l R0,R8
+move.l (R8),R13
+move.l R13,R0
+beq L102
+*line 817
+*line 818
+*line 819
+*line 820
+move.l 12(R13),R12
+*line 821
+*line 822
+*line 823
+cmp.l _p_bak,R13
+bne L103
+*line 823
+move.l R12,_p_bak
+*line 824
+L103:
+*line 825
+*line 826
+cmp.l _p_cur,R13
+bne L104
+*line 826
+move.l R12,_p_cur
+*line 827
+L104:
+*line 828
+*line 829
+cmp.l _p_ctr,R13
+bne L105
+*line 829
+move.l R12,_p_ctr
+*line 830
+L105:
+*line 831
+*line 832
+cmp.l _p_fwd,R13
+bne L106
+*line 832
+move.l R12,_p_fwd
+*line 833
+L106:
+*line 834
+move #10,(sp)
+move.l R13,-(sp)
+jsr _eh_rmv
+addq.l #4,sp
+*line 835
+move.l R13,(sp)
+jsr _e_rmv
+move.l R0,(sp)
+jsr _e_del
+*line 836
+move _curscor,R0
+muls #80,R0
+move R5,R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+add.l #_seclist,R0
+move.l R0,R8
+move.l #$0,(R8)
+*line 837
+move #-1,(sp)
+jsr _sdmenu
+*line 838
+move.l _fc_val,(sp)
+jsr _sc_refr
+*line 839
+*line 840
+L102:bra L99
+*line 841
+*line 842
+*line 843
+L107:
+*line 844
+L108:
+*line 845
+bra L99
+*line 846
+*line 847
+L109:
+*line 848
+*line 849
+*line 850
+*line 851
+move #-1,(sp)
+move R5,-(sp)
+move.l #$ffffffff,-(sp)
+move #3,-(sp)
+jsr _ehfind
+addq.l #8,sp
+move.l R0,R13
+move.l R13,R0
+beq L110
+*line 852
+*line 853
+*line 854
+*line 855
+move.l 12(R13),R12
+*line 856
+*line 857
+*line 858
+cmp.l _p_bak,R13
+bne L111
+*line 858
+move.l R12,_p_bak
+*line 859
+L111:
+*line 860
+*line 861
+cmp.l _p_cur,R13
+bne L112
+*line 861
+move.l R12,_p_cur
+*line 862
+L112:
+*line 863
+*line 864
+cmp.l _p_ctr,R13
+bne L113
+*line 864
+move.l R12,_p_ctr
+*line 865
+L113:
+*line 866
+*line 867
+cmp.l _p_fwd,R13
+bne L114
+*line 867
+move.l R12,_p_fwd
+*line 868
+L114:
+*line 869
+move #11,(sp)
+move.l R13,-(sp)
+jsr _eh_rmv
+addq.l #4,sp
+*line 870
+move.l R13,(sp)
+jsr _e_rmv
+move.l R0,(sp)
+jsr _e_del
+*line 871
+move #-1,(sp)
+jsr _sdmenu
+*line 872
+move.l _fc_val,(sp)
+jsr _sc_refr
+*line 873
+*line 874
+L110:bra L99
+*line 875
+bra L99
+L100:tst R0
+beq L101
+cmp #1,R0
+beq L107
+cmp #2,R0
+beq L108
+cmp #3,R0
+beq L109
+bra L99
+L99:
+*line 876
+*line 877
+bra L96
+*line 878
+*line 879
+*line 880
+*line 881
+bra L115
+L98:
+*line 882
+*line 883
+cmp #23,_vtcrow
+bne L116
+cmp #28,_vtccol
+blt L116
+cmp #62,_vtccol
+bgt L116
+*line 884
+*line 885
+*line 886
+*line 887
+move _vtccol,R7
+add #-28,R7
+*line 888
+*line 889
+*line 890
+move R7,R0
+ext.l R0
+divs #3,R0
+swap R0
+cmp #2,R0
+beq L96
+*line 891
+*line 892
+move R7,R6
+ext.l R6
+divs #3,R6
+*line 893
+move R6,R8
+add.l R8,R8
+add.l #_grptmap,R8
+move #-1,(R8)
+*line 894
+move R6,(sp)
+jsr _dsgtme
+bra L96
+*line 895
+*line 896
+L116:L115:
+*line 897
+*line 898
+L97:
+*line 899
+*line 900
+tst _recsw
+beq L96
+*line 901
+*line 902
+*line 902
+cmp #14,_cyval
+blt L117
+cmp #223,_cyval
+bgt L117
+*line 903
+*line 904
+jsr _delnote
+*line 905
+bra L118
+L117:
+*line 906
+*line 906
+cmp #224,_cyval
+blt L119
+cmp #237,_cyval
+bgt L119
+*line 907
+*line 908
+*line 909
+move _cxval,(sp)
+jsr _cp2time
+tst R0
+beq L120
+*line 909
+move.l _ctime,(sp)
+move #-1,-(sp)
+jsr _delevts
+addq.l #2,sp
+*line 910
+*line 911
+*line 912
+*line 913
+L120:bra L121
+L119:
+*line 914
+*line 914
+cmp #17,_stcrow
+bne L122
+*line 915
+*line 916
+*line 917
+cmp #11,_stccol
+blt L123
+cmp #12,_stccol
+bgt L123
+*line 917
+move.l _t_cur,(sp)
+move #16,-(sp)
+jsr _delevts
+addq.l #2,sp
+bra L124
+L123:
+*line 918
+*line 919
+cmp #19,_stccol
+bne L125
+*line 919
+move.l _t_cur,(sp)
+move #10,-(sp)
+jsr _delevts
+addq.l #2,sp
+bra L126
+L125:
+*line 920
+*line 921
+cmp #27,_stccol
+blt L127
+cmp #29,_stccol
+bgt L127
+*line 921
+move.l _t_cur,(sp)
+move #9,-(sp)
+jsr _delevts
+addq.l #2,sp
+bra L128
+L127:
+*line 922
+*line 923
+cmp #36,_stccol
+blt L129
+cmp #38,_stccol
+bgt L129
+*line 923
+move.l _t_cur,(sp)
+move #8,-(sp)
+jsr _delevts
+addq.l #2,sp
+bra L130
+L129:
+*line 924
+*line 925
+cmp #40,_stccol
+blt L131
+cmp #43,_stccol
+bgt L131
+*line 925
+move.l _t_cur,(sp)
+move #7,-(sp)
+jsr _delevts
+addq.l #2,sp
+bra L132
+L131:
+*line 926
+*line 927
+cmp #45,_stccol
+blt L133
+cmp #48,_stccol
+bgt L133
+*line 927
+move.l _t_cur,(sp)
+move #24,-(sp)
+jsr _delevts
+addq.l #2,sp
+bra L134
+L133:
+*line 928
+*line 929
+cmp #50,_stccol
+blt L135
+cmp #55,_stccol
+bgt L135
+*line 929
+move.l _t_cur,(sp)
+move #19,-(sp)
+jsr _delevts
+addq.l #2,sp
+*line 930
+L135:L134:L132:L130:L128:L126:L124:bra L136
+L122:
+*line 931
+*line 932
+cmp #18,_stcrow
+bne L137
+move _stccol,R0
+sub #5,R0
+ext.l R0
+divs #5,R0
+swap R0
+tst R0
+bne L137
+*line 933
+*line 934
+move.l _t_cur,(sp)
+move #11,-(sp)
+jsr _delevts
+addq.l #2,sp
+*line 935
+bra L138
+L137:
+*line 936
+*line 937
+*line 938
+cmp #18,_stcrow
+bne L139
+move _stccol,R0
+sub #5,R0
+ext.l R0
+divs #5,R0
+swap R0
+cmp #2,R0
+beq L10014
+move _stccol,R0
+sub #5,R0
+ext.l R0
+divs #5,R0
+swap R0
+cmp #3,R0
+bne L139
+L10014:*line 939
+*line 940
+move.l _t_cur,(sp)
+move #4,-(sp)
+jsr _delevts
+addq.l #2,sp
+*line 941
+bra L140
+L139:
+*line 942
+*line 942
+cmp #19,_stcrow
+bne L141
+*line 943
+*line 944
+move.l _t_cur,(sp)
+move #17,-(sp)
+jsr _delevts
+addq.l #2,sp
+*line 945
+bra L142
+L141:
+*line 946
+*line 947
+cmp #20,_stcrow
+bne L143
+cmp #6,_stccol
+blt L143
+move _stccol,R0
+sub #6,R0
+ext.l R0
+divs #5,R0
+swap R0
+tst R0
+bne L143
+*line 948
+*line 949
+move.l _t_cur,(sp)
+move #13,-(sp)
+jsr _delevts
+addq.l #2,sp
+*line 950
+bra L144
+L143:
+*line 951
+*line 952
+cmp #20,_stcrow
+bne L145
+cmp #6,_stccol
+blt L145
+move _stccol,R0
+sub #6,R0
+ext.l R0
+divs #5,R0
+swap R0
+cmp #2,R0
+bne L145
+*line 953
+*line 954
+move.l _t_cur,(sp)
+move #12,-(sp)
+jsr _delevts
+addq.l #2,sp
+*line 955
+bra L146
+L145:
+*line 956
+*line 956
+cmp #23,_stcrow
+bne L147
+*line 957
+*line 958
+jsr _deladat
+*line 959
+*line 960
+bra L148
+L147:
+*line 961
+*line 961
+cmp #24,_stcrow
+bne L149
+*line 962
+*line 963
+*line 963
+cmp #4,_stccol
+bgt L150
+*line 964
+*line 965
+*line 966
+*line 967
+*line 968
+tst _insmode
+beq L151
+*line 968
+jsr _icancel
+*line 969
+L151:
+*line 970
+move _curscor,(sp)
+jsr _sc_clr
+*line 971
+move _curscor,(sp)
+jsr _selscor
+*line 972
+bra L152
+L150:
+*line 973
+*line 973
+cmp #10,_stccol
+blt L153
+cmp #25,_stccol
+bgt L153
+*line 974
+*line 975
+*line 976
+*line 977
+move #16,(sp)
+move #32,-(sp)
+move _curscor,R0
+asl #4,R0
+ext.l R0
+add.l #_scname,R0
+move.l R0,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 978
+move #13,(sp)
+jsr _dswin
+*line 979
+L153:L152:
+*line 980
+L149:L148:L146:L144:L142:L140:L138:L136:L121:L118:L96:tst.l (sp)+
+movem.l (sp)+,R5-R7/R12-R13
+unlk R14
+rts
+.globl _sdmkey
+.text
+_sdmkey:
+~~sdmkey:
+link R14,#-4
+*line 994
+*line 994
+tst _astat
+beq L155
+*line 995
+*line 996
+*line 997
+tst _insmode
+beq L156
+*line 997
+jsr _icancel
+L156:
+*line 998
+*line 999
+L155:
+*line 1000
+jsr _stdmkey
+L154:unlk R14
+rts
+.globl _scfield
+.text
+_scfield:
+~~scfield:
+link R14,#-4
+*line 1014
+move.l #_sc_flds,(sp)
+jsr _curset
+L157:unlk R14
+rts
+.data
Index: alcyon/scgoto.s
===================================================================
--- alcyon/scgoto.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/scgoto.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,397 @@
+.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 _recsw
+.globl _ndisp
+.globl _sd
+.globl _swctrl
+.globl _swflag
+.globl _gdfsep
+.globl _gdstbc
+.globl _gdstbn
+.globl _sc_goto
+.text
+_sc_goto:
+~~sc_goto:
+~tval=R7
+link R14,#0
+movem.l R3-R7/R12-R13,-(sp)
+~gdsp=R13
+~rp=R12
+~tf=R6
+~rt=R5
+~mod48=R4
+*line 54
+move #48,R4
+*line 65
+move.l 8(R14),R7
+*line 65
+*line 66
+*line 67
+tst.l _p_fwd
+beq L10000
+tst.l _p_cur
+beq L10000
+tst.l _p_bak
+beq L10000
+tst.l _p_ctr
+bne L2
+L10000:*line 67
+move #-1,R0
+bra L1
+*line 68
+L2:
+*line 69
+*line 70
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L3
+*line 70
+clr (sp)
+jsr _vbank
+*line 71
+L3:
+*line 72
+clr _sd
+*line 73
+clr _swctrl
+*line 74
+clr _swflag
+*line 76
+clr _recsw
+*line 77
+jsr _dsrpmod
+*line 79
+*line 80
+cmp #2,_ndisp
+bne L4
+*line 80
+jsr _sreset
+*line 81
+L4:
+*line 82
+jsr _quiet
+*line 83
+jsr _clrnl
+*line 84
+jsr _clrsctl
+*line 86
+move.l R7,R0
+add.l #$ffffff10,R0
+move.l R0,_t_bak
+*line 87
+move.l _t_bak,_t_fwd
+*line 88
+move.l R7,_t_ctr
+*line 89
+move.l R7,_t_cur
+*line 91
+clr (sp)
+move.l _t_bak,-(sp)
+jsr _frfind
+addq.l #4,sp
+move.l R0,_p_bak
+*line 92
+move #1,(sp)
+move.l _t_cur,-(sp)
+jsr _frfind
+addq.l #4,sp
+move.l R0,_p_cur
+*line 93
+move #1,(sp)
+move.l _t_fwd,-(sp)
+jsr _frfind
+addq.l #4,sp
+move.l R0,_p_fwd
+*line 99
+*line 100
+tst.l _t_fwd
+bgt L5
+move.l _p_fwd,R8
+cmp.b #1,5(R8)
+bne L5
+*line 100
+move.l _p_fwd,R8
+move.l 12(R8),_p_fwd
+*line 101
+L5:
+*line 102
+move.l _p_fwd,R12
+*line 103
+move.l _t_fwd,R5
+*line 104
+move.l R7,R6
+add.l #$102,R6
+*line 122
+bra L8
+L7:
+*line 123
+*line 124
+*line 124
+cmp.b #21,5(R12)
+beq L9
+*line 125
+*line 126
+bra L12
+L11:
+*line 127
+*line 128
+*line 129
+cmp #2,_ndisp
+bne L13
+*line 129
+clr (sp)
+move.l #_gdstbn,-(sp)
+clr -(sp)
+move.l R12,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 130
+L13:
+*line 131
+move.l 12(R12),R12
+*line 132
+*line 133
+*line 134
+cmp.b #21,5(R12)
+beq L10
+L12:
+*line 135
+cmp.l (R12),R5
+bge L11
+L10:
+*line 136
+*line 137
+L9:
+*line 138
+*line 138
+cmp #2,_ndisp
+bne L14
+*line 139
+*line 140
+*line 140
+move.l R5,R0
+divs R4,R0
+swap R0
+ext.l R0
+tst.l R0
+bne L15
+*line 141
+*line 142
+*line 142
+move.l _gdfsep,R13
+move.l R13,R0
+beq L16
+*line 143
+*line 144
+move.l (R13),_gdfsep
+*line 145
+*line 146
+move.l 48+_gdstbn,(R13)
+*line 147
+move #4369,4(R13)
+*line 148
+move #1,6(R13)
+*line 149
+*line 150
+move.l R13,48+_gdstbn
+*line 151
+L16:
+*line 152
+*line 153
+L15:
+*line 154
+jsr _sc_adv
+*line 155
+L14:L8:
+*line 156
+cmp.l R5,R6
+move sr,R0
+add.l #$1,R5
+move R0,ccr
+bgt L7
+L6:
+*line 158
+move.l R12,_p_fwd
+*line 159
+move.l R6,_t_fwd
+*line 165
+*line 166
+cmp #2,_ndisp
+bne L17
+*line 166
+jsr _dssect
+*line 167
+L17:
+*line 168
+move.l _p_cur,R12
+*line 169
+move.l _t_cur,R5
+*line 171
+*line 172
+tst.l R5
+bgt L18
+cmp.b #1,5(R12)
+bne L18
+*line 172
+move.l 12(R12),R12
+*line 173
+L18:
+*line 174
+*line 174
+cmp.b #21,5(R12)
+beq L19
+*line 175
+*line 176
+bra L22
+L21:
+*line 177
+*line 178
+clr (sp)
+move.l R12,-(sp)
+jsr _se_exec
+addq.l #4,sp
+*line 179
+*line 180
+*line 181
+cmp #2,_ndisp
+bne L23
+*line 181
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R12,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 182
+L23:
+*line 183
+move.l 12(R12),R12
+*line 184
+*line 185
+*line 186
+cmp.b #21,5(R12)
+beq L20
+L22:
+*line 187
+cmp.l (R12),R5
+beq L21
+L20:
+*line 188
+*line 189
+L19:
+*line 190
+move.l R12,_p_cur
+*line 191
+move.l R12,_p_ctr
+*line 193
+*line 193
+cmp #2,_ndisp
+bne L24
+*line 194
+*line 195
+jsr _scupd
+*line 196
+jsr _sdwins
+*line 197
+*line 198
+*line 199
+*line 200
+*line 201
+*line 213
+*line 214
+*line 220
+*line 221
+L24:
+*line 222
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R4-R7/R12-R13
+unlk R14
+rts
+.globl _sc_refr
+.text
+_sc_refr:
+~~sc_refr:
+~t=8
+link R14,#-8
+~oldrs=-2
+~rc=-4
+*line 240
+move _recsw,-2(R14)
+*line 241
+move.l 8(R14),(sp)
+jsr _sc_goto
+move R0,-4(R14)
+*line 242
+move -2(R14),_recsw
+*line 243
+jsr _dsrpmod
+*line 244
+move -4(R14),R0
+bra L25
+L25:unlk R14
+rts
+.data
Index: alcyon/scinit.s
===================================================================
--- alcyon/scinit.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/scinit.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1140 @@
+.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 _sd
+.globl _curasg
+.globl _tmpoval
+.globl _curtun
+.globl _se_chg
+.globl _spcount
+.globl _frags
+.globl _se1_cnt
+.globl _se2_cnt
+.globl _se3_cnt
+.globl _pspool
+.globl _size1
+.globl _size2
+.globl _size3
+.globl _scores
+.globl _seclist
+.globl _hplist
+.globl _stimes
+.globl _scname
+.globl _curscor
+.globl _cursect
+.globl _scp
+.globl _t_bak
+.globl _t_cur
+.globl _t_ctr
+.globl _t_fwd
+.globl _p_bak
+.globl _p_cur
+.globl _p_ctr
+.globl _p_fwd
+.globl _spool
+.globl _evleft
+.text
+_evleft:
+~~evleft:
+link R14,#-4
+*line 146
+*line 147
+move.l #$6,-(sp)
+move.l _se2_cnt,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,-(sp)
+move.l #$5,-(sp)
+move.l _se1_cnt,-(sp)
+jsr lmul
+addq.l #8,sp
+add.l (sp)+,R0
+move.l _se3_cnt,R1
+asl.l #3,R1
+add.l R1,R0
+add.l _spcount,R0
+bra L1
+L1:unlk R14
+rts
+.globl _scinit
+.text
+_scinit:
+~~scinit:
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~i=R7
+~cp=R13
+*line 165
+clr.l _se1_cnt
+*line 166
+clr.l _size1
+*line 167
+clr.l _se2_cnt
+*line 168
+clr.l _size2
+*line 169
+clr.l _se3_cnt
+*line 170
+clr.l _size3
+*line 171
+move.b #1,_se_chg
+*line 172
+clr.l _frags
+*line 174
+move.l #$8000,_spcount
+*line 175
+move.l #_spool,_pspool
+*line 176
+move.l #_spool,R13
+*line 178
+move.l _spcount,R7
+bra L5
+L6:
+*line 179
+clr.l (R13)+
+L4:L5:
+*line 178
+move.l R7,R0
+sub.l #$1,R7
+tst.l R0
+bgt L6
+L3:
+*line 181
+clr.l R7
+bra L9
+L10:
+*line 182
+move #16,(sp)
+move.l #L11,-(sp)
+move.l R7,R0
+asl.l #4,R0
+add.l #_scname,R0
+move.l R0,-(sp)
+jsr _memcpy
+addq.l #8,sp
+L8:
+*line 181
+add.l #$1,R7
+L9:
+*line 181
+cmp.l #$14,R7
+blt L10
+L7:
+*line 184
+move #40,(sp)
+clr -(sp)
+move.l #_scores,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 185
+move #480,(sp)
+clr -(sp)
+move.l #_hplist,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 186
+move #800,(sp)
+clr -(sp)
+move.l #_seclist,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 187
+move #4800,(sp)
+clr -(sp)
+move.l #_stimes,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 189
+clr.l R0
+move.l R0,_t_ctr
+move.l R0,_t_cur
+*line 190
+move.l _t_cur,R0
+add.l #$ffffff10,R0
+move.l R0,_t_bak
+*line 191
+move.l _t_cur,R0
+add.l #$102,R0
+move.l R0,_t_fwd
+*line 193
+clr.l _p_bak
+*line 194
+clr.l _p_cur
+*line 195
+clr.l _p_ctr
+*line 196
+clr.l _p_fwd
+*line 197
+clr.l _scp
+*line 199
+clr _curscor
+*line 200
+clr _cursect
+*line 202
+jsr _evleft
+bra L2
+L2:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _e_clr
+.text
+_e_clr:
+~~e_clr:
+~e1=R13
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+*line 219
+move.l 8(R14),R13
+*line 219
+move.b 4(R13),R0
+ext.w R0
+bra L14
+*line 220
+L15:
+*line 221
+*line 222
+*line 223
+clr.l 24(R13)
+*line 224
+clr.l 28(R13)
+*line 225
+L16:
+*line 226
+*line 227
+*line 228
+clr.l 20(R13)
+*line 229
+clr.l 16(R13)
+*line 230
+L17:
+*line 231
+*line 232
+*line 233
+clr.l 12(R13)
+*line 234
+clr.l 8(R13)
+*line 235
+*line 236
+clr.l (R13)
+*line 237
+clr.b 5(R13)
+*line 238
+clr.b 6(R13)
+*line 239
+clr.b 7(R13)
+bra L13
+L14:cmp #5,R0
+beq L17
+cmp #6,R0
+beq L16
+cmp #8,R0
+beq L15
+bra L13
+L13:
+*line 242
+move.l R13,R0
+bra L12
+L12:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _e_ins
+.text
+_e_ins:
+~~e_ins:
+~e1=R13
+~e2=R12
+link R14,#0
+movem.l R7-R7/R11-R13,-(sp)
+~t1=R11
+*line 261
+move.l 8(R14),R13
+*line 261
+move.l 12(R14),R12
+*line 261
+move.l 12(R12),R11
+*line 262
+move.l R11,12(R13)
+*line 263
+move.l R12,8(R13)
+*line 264
+move.l R13,12(R12)
+*line 265
+move.l R13,8(R11)
+*line 266
+move.l R13,R0
+bra L18
+L18:tst.l (sp)+
+movem.l (sp)+,R11-R13
+unlk R14
+rts
+.globl _e_rmv
+.text
+_e_rmv:
+~~e_rmv:
+~e1=R13
+link R14,#0
+movem.l R7-R7/R11-R13,-(sp)
+~t1=R12
+~t2=R11
+*line 282
+move.l 8(R14),R13
+*line 282
+move.l 8(R13),R12
+*line 283
+move.l 12(R13),R11
+*line 284
+move.l R11,12(R12)
+*line 285
+move.l R12,8(R11)
+*line 286
+clr.l 12(R13)
+*line 287
+clr.l 8(R13)
+*line 288
+move.l R13,R0
+bra L19
+L19:tst.l (sp)+
+movem.l (sp)+,R11-R13
+unlk R14
+rts
+.globl _e_alc
+.text
+_e_alc:
+~~e_alc:
+~w=8
+link R14,#0
+movem.l R7-R7/R12-R13,-(sp)
+~ev=R13
+~ex=R12
+*line 307
+move.b #1,_se_chg
+*line 309
+move 8(R14),R0
+bra L22
+*line 310
+L23:
+*line 311
+*line 312
+*line 313
+*line 313
+cmp.l #$5,_spcount
+bge L24
+*line 314
+*line 315
+*line 315
+tst.l _se1_cnt
+bne L25
+*line 316
+*line 317
+*line 317
+tst.l _se3_cnt
+beq L26
+*line 318
+*line 319
+move.l _size3,R12
+*line 320
+move.l 12(R12),_size3
+*line 321
+add.l #$1,_frags
+*line 322
+sub.l #$1,_se3_cnt
+*line 323
+move.b #5,4(R12)
+*line 324
+clr.l 12(R12)
+*line 325
+move.l R12,R0
+bra L20
+*line 326
+bra L27
+L26:
+*line 327
+*line 328
+*line 329
+*line 329
+tst.l _se2_cnt
+beq L28
+*line 330
+*line 331
+move.l _size2,R12
+*line 332
+move.l _size2,R8
+move.l 12(R8),_size2
+*line 333
+move.b #5,4(R12)
+*line 334
+clr.l 12(R12)
+*line 335
+add.l #$1,_frags
+*line 336
+sub.l #$1,_se2_cnt
+*line 337
+move.l R12,R0
+bra L20
+*line 338
+bra L29
+L28:
+*line 339
+*line 340
+*line 341
+clr.l R0
+bra L20
+L29:
+*line 342
+L27:
+*line 343
+*line 344
+*line 345
+bra L30
+L25:
+*line 346
+*line 347
+*line 348
+move.l _size1,R12
+*line 349
+move.l _size1,R8
+move.l 12(R8),_size1
+*line 350
+clr.l 12(R12)
+*line 351
+sub.l #$1,_se1_cnt
+*line 352
+move.l R12,R0
+bra L20
+L30:
+*line 353
+*line 354
+bra L31
+L24:
+*line 355
+*line 356
+*line 357
+move.l _pspool,R12
+*line 358
+add.l #20,_pspool
+*line 359
+sub.l #$5,_spcount
+*line 360
+move.b #5,4(R12)
+*line 361
+move.l R12,R0
+bra L20
+L31:
+*line 362
+*line 363
+*line 364
+*line 365
+*line 366
+L32:
+*line 367
+*line 368
+*line 369
+*line 369
+cmp.l #$6,_spcount
+bge L33
+*line 370
+*line 371
+*line 371
+tst.l _se2_cnt
+bne L34
+*line 372
+*line 373
+*line 373
+tst.l _se3_cnt
+beq L35
+*line 374
+*line 375
+move.l _size3,R12
+*line 376
+move.l _size3,R8
+move.l 12(R8),_size3
+*line 377
+move.b #6,4(R12)
+*line 378
+clr.l 12(R12)
+*line 379
+sub.l #$1,_se3_cnt
+*line 380
+add.l #$1,_frags
+*line 381
+move.l R12,R0
+bra L20
+*line 382
+bra L36
+L35:
+*line 383
+*line 384
+*line 385
+clr.l R0
+bra L20
+L36:
+*line 386
+*line 387
+bra L37
+L34:
+*line 388
+*line 389
+*line 390
+move.l _size2,R12
+*line 391
+move.l _size2,R8
+move.l 12(R8),_size2
+*line 392
+clr.l 12(R12)
+*line 393
+sub.l #$1,_se2_cnt
+*line 394
+move.l R12,R0
+bra L20
+L37:
+*line 395
+*line 396
+bra L38
+L33:
+*line 397
+*line 398
+*line 399
+move.l _pspool,R12
+*line 400
+add.l #24,_pspool
+*line 401
+sub.l #$6,_spcount
+*line 402
+move.b #6,4(R12)
+*line 403
+move.l R12,R0
+bra L20
+*line 404
+L38:
+*line 405
+*line 406
+*line 407
+*line 408
+*line 409
+L39:
+*line 410
+*line 411
+*line 412
+*line 412
+cmp.l #$8,_spcount
+bge L40
+*line 413
+*line 414
+*line 414
+tst.l _se3_cnt
+bne L41
+*line 415
+*line 416
+clr.l R0
+bra L20
+*line 417
+bra L42
+L41:
+*line 418
+*line 419
+*line 420
+move.l _size3,R12
+*line 421
+move.l _size3,R8
+move.l 12(R8),_size3
+*line 422
+clr.l 12(R12)
+*line 423
+sub.l #$1,_se3_cnt
+*line 424
+move.l R12,R0
+bra L20
+L42:
+*line 425
+*line 426
+bra L43
+L40:
+*line 427
+*line 428
+*line 429
+move.l _pspool,R12
+*line 430
+add.l #32,_pspool
+*line 431
+sub.l #$8,_spcount
+*line 432
+move.b #8,4(R12)
+*line 433
+move.l R12,R0
+bra L20
+L43:
+*line 434
+*line 435
+L44:
+*line 436
+*line 437
+*line 438
+clr.l R0
+bra L20
+bra L21
+L22:cmp #5,R0
+beq L23
+cmp #6,R0
+beq L32
+cmp #8,R0
+beq L39
+bra L44
+L21:
+*line 441
+clr.l R0
+bra L20
+L20:tst.l (sp)+
+movem.l (sp)+,R12-R13
+unlk R14
+rts
+.globl _e_del
+.text
+_e_del:
+~~e_del:
+~e1=R13
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+*line 458
+move.l 8(R14),R13
+*line 458
+move.l R13,(sp)
+jsr _e_clr
+*line 460
+move.b 4(R13),R0
+ext.w R0
+bra L47
+*line 461
+L48:
+*line 462
+*line 463
+*line 464
+move.l _size1,12(R13)
+*line 465
+move.l R13,_size1
+*line 466
+add.l #$1,_se1_cnt
+bra L46
+*line 467
+*line 468
+L49:
+*line 469
+*line 470
+*line 471
+move.l _size2,12(R13)
+*line 472
+move.l R13,_size2
+*line 473
+add.l #$1,_se2_cnt
+bra L46
+*line 474
+*line 475
+L50:
+*line 476
+*line 477
+*line 478
+move.l _size3,12(R13)
+*line 479
+move.l R13,_size3
+*line 480
+add.l #$1,_se3_cnt
+bra L46
+*line 481
+*line 482
+L51:
+*line 483
+*line 484
+move #1,R0
+bra L45
+bra L46
+L47:cmp #5,R0
+beq L48
+cmp #6,R0
+beq L49
+cmp #8,R0
+beq L50
+bra L51
+L46:
+*line 487
+move.b #1,_se_chg
+*line 488
+clr R0
+bra L45
+L45:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _eh_ins
+.text
+_eh_ins:
+~~eh_ins:
+~ne=R13
+~et=12
+link R14,#0
+movem.l R7-R7/R11-R13,-(sp)
+~hp=R12
+~ep=R11
+*line 507
+move.l 8(R14),R13
+*line 507
+move _curscor,R0
+muls #48,R0
+move 12(R14),R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+add.l #_hplist,R0
+move.l R0,R8
+move.l (R8),R12
+*line 509
+*line 509
+move.l R12,R0
+bne L53
+*line 510
+*line 511
+move _curscor,R0
+muls #48,R0
+move 12(R14),R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+add.l #_hplist,R0
+move.l R0,R8
+move.l R13,(R8)
+*line 512
+clr.l 20(R13)
+*line 513
+clr.l 16(R13)
+bra L52
+*line 514
+*line 515
+*line 516
+L53:
+*line 517
+*line 517
+move.l (R12),R0
+cmp.l (R13),R0
+ble L54
+*line 518
+*line 519
+move.l R13,16(R12)
+*line 520
+move.l R12,20(R13)
+*line 521
+clr.l 16(R13)
+*line 522
+move _curscor,R0
+muls #48,R0
+move 12(R14),R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+add.l #_hplist,R0
+move.l R0,R8
+move.l R13,(R8)
+bra L52
+*line 523
+*line 524
+*line 525
+L54:
+*line 526
+bra L57
+L56:
+*line 527
+*line 528
+*line 528
+move.l (R11),R0
+cmp.l (R13),R0
+ble L58
+*line 529
+*line 530
+move.l R11,20(R13)
+*line 531
+move.l R12,16(R13)
+*line 532
+move.l R13,20(R12)
+*line 533
+move.l R13,16(R11)
+bra L52
+*line 534
+*line 535
+*line 536
+L58:
+*line 537
+move.l R11,R12
+L57:
+*line 538
+move.l 20(R12),R11
+move.l R11,R0
+bne L56
+L55:
+*line 540
+move.l R13,20(R12)
+*line 541
+clr.l 20(R13)
+*line 542
+move.l R12,16(R13)
+bra L52
+L52:tst.l (sp)+
+movem.l (sp)+,R11-R13
+unlk R14
+rts
+.globl _eh_rmv
+.text
+_eh_rmv:
+~~eh_rmv:
+~ev=R13
+~et=12
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+*line 560
+move.l 8(R14),R13
+*line 560
+*line 561
+move _curscor,R0
+muls #48,R0
+move 12(R14),R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+add.l #_hplist,R0
+move.l R0,R8
+cmp.l (R8),R13
+bne L60
+*line 561
+move _curscor,R0
+muls #48,R0
+move 12(R14),R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+add.l #_hplist,R0
+move.l R0,R8
+move.l 20(R13),(R8)
+*line 562
+L60:
+*line 563
+*line 564
+tst.l 20(R13)
+beq L61
+*line 564
+move.l 20(R13),R8
+move.l 16(R13),16(R8)
+*line 565
+L61:
+*line 566
+*line 567
+tst.l 16(R13)
+beq L62
+*line 567
+move.l 16(R13),R8
+move.l 20(R13),20(R8)
+*line 568
+L62:
+*line 569
+clr.l R0
+move.l R0,16(R13)
+move.l R0,20(R13)
+L59:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _sc_clr
+.text
+_sc_clr:
+~~sc_clr:
+~ns=R7
+link R14,#0
+movem.l R5-R7/R12-R13,-(sp)
+~dsp=R13
+~nsp=R12
+~i=R6
+*line 587
+move 8(R14),R7
+*line 587
+*line 587
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_scores,R8
+move.l (R8),R12
+move.l R12,R0
+beq L64
+*line 588
+*line 589
+bra L67
+L66:
+*line 590
+*line 591
+move.l R12,(sp)
+jsr _e_rmv
+move.l R0,(sp)
+jsr _e_del
+*line 592
+move.l R13,R12
+*line 593
+L67:
+*line 594
+move.l 12(R12),R13
+cmp.l R13,R12
+bne L66
+L65:
+*line 595
+*line 596
+move.l R12,(sp)
+jsr _e_del
+*line 597
+*line 598
+L64:
+*line 599
+clr R6
+bra L70
+L71:
+*line 600
+move R7,R0
+muls #48,R0
+move R6,R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+add.l #_hplist,R0
+move.l R0,R8
+move.l #$0,(R8)
+L69:
+*line 599
+add #1,R6
+L70:
+*line 599
+cmp #12,R6
+blt L71
+L68:
+*line 602
+clr R6
+bra L74
+L75:
+*line 603
+*line 604
+move R7,R0
+muls #80,R0
+move R6,R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+add.l #_seclist,R0
+move.l R0,R8
+move.l #$0,(R8)
+*line 605
+move #12,(sp)
+clr -(sp)
+move R7,R0
+muls #240,R0
+add.l #_stimes,R0
+move.l R0,-(sp)
+jsr _memset
+addq.l #6,sp
+L73:
+*line 602
+add #1,R6
+L74:
+*line 602
+cmp #20,R6
+blt L75
+L72:
+*line 608
+move #16,(sp)
+move.l #L76,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_scname,R0
+move.l R0,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 610
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_scores,R8
+move.l #$0,(R8)
+L63:tst.l (sp)+
+movem.l (sp)+,R6-R7/R12-R13
+unlk R14
+rts
+.globl _selscor
+.text
+_selscor:
+~~selscor:
+~ns=R7
+link R14,#0
+movem.l R4-R7/R12-R13,-(sp)
+~oldscor=R6
+~grp=R5
+~nsp=R13
+~ep=R12
+*line 629
+move 8(R14),R7
+*line 629
+clr (sp)
+jsr _clkset
+*line 630
+jsr _dsclk
+*line 631
+clr.l _fc_val
+*line 632
+clr _sd
+*line 633
+move _curscor,R6
+*line 634
+move R7,_curscor
+*line 636
+*line 636
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_scores,R8
+move.l (R8),R13
+move.l R13,R0
+bne L78
+*line 637
+*line 638
+*line 638
+move #5,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+bne L79
+*line 639
+*line 640
+move R6,_curscor
+*line 641
+move #-1,R0
+bra L77
+*line 642
+*line 643
+L79:
+*line 644
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_scores,R8
+move.l R13,(R8)
+*line 645
+move.l R13,12(R13)
+*line 646
+move.l R13,8(R13)
+*line 647
+move.b #1,5(R13)
+*line 648
+move.b R7,6(R13)
+*line 649
+clr.l (R13)
+*line 650
+*line 651
+*line 651
+move #5,(sp)
+jsr _e_alc
+move.l R0,R12
+move.l R12,R0
+bne L80
+*line 652
+*line 653
+move R7,(sp)
+jsr _sc_clr
+*line 654
+move R6,_curscor
+*line 655
+move #-1,R0
+bra L77
+*line 656
+*line 657
+L80:
+*line 658
+move.b #21,5(R12)
+*line 659
+move.b R7,6(R12)
+*line 660
+move.l R13,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+*line 661
+move.l #$7fffffff,(R12)
+*line 662
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_scores,R8
+move.l (R8),R13
+*line 663
+move #16,(sp)
+move.l #L81,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_scname,R0
+move.l R0,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 664
+*line 665
+L78:
+*line 666
+move.l R13,_scp
+*line 667
+move.l R13,_p_bak
+*line 668
+move.l R13,_p_cur
+*line 669
+move.l R13,_p_ctr
+*line 670
+move.l R13,_p_fwd
+*line 671
+clr _cursect
+*line 672
+clr.l (sp)
+jsr _sc_goto
+*line 673
+clr R0
+bra L77
+L77:tst.l (sp)+
+movem.l (sp)+,R5-R7/R12-R13
+unlk R14
+rts
+.data
+L11:.dc.b $7B,$20,$65,$6D,$70,$74,$79,$20,$73,$63,$6F,$72,$65,$20,$20,$7D,$0
+L76:.dc.b $7B,$20,$65,$6D,$70,$74,$79,$20,$73,$63,$6F,$72,$65,$20,$20,$7D,$0
+L81:.dc.b $25,$25,$25,$20,$55,$6E,$74,$69,$74,$6C,$65,$64,$20,$25,$25,$25,$0
Index: alcyon/scope.s
===================================================================
--- alcyon/scope.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/scope.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,310 @@
+.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 _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _scopec
+.comm _scopec,2
+.globl _scopef
+.comm _scopef,2
+.globl _scoper
+.comm _scoper,2
+.globl _scopev
+.comm _scopev,2
+.globl _scopeob
+.comm _scopeob,4
+.globl _scopebf
+.comm _scopebf,66
+.globl _astat
+.globl _ndisp
+.globl _scorpal
+.globl _crate1
+.globl _dt_flds
+.data
+_dt_flds:
+*line 48
+.dc.l _nokey
+*line 49
+.dc.l _nokey
+*line 50
+.dc.l _nokey
+*line 51
+.dc.l _nokey
+*line 52
+.dc.l _nokey
+*line 53
+.dc.l _nokey
+*line 54
+.dc.l _nokey
+*line 55
+.dc.l _nokey
+*line 56
+.dc.l _nokey
+*line 57
+.dc.l _nokey
+*line 58
+.dc.l _scptogl
+*line 59
+.dc.l _stdmkey
+*line 60
+.dc.l _nokey
+*line 61
+.dc.l _nokey
+.dc.l $0
+.dc.l $0
+*line 64
+.dc.l _crate1
+*line 65
+.dc.l _crate1
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.globl _scope
+.text
+_scope:
+~~scope:
+~val=R7
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~i=R6
+~bp=R13
+*line 84
+move.l #_scopebf,R13
+*line 86
+move 8(R14),R7
+*line 86
+*line 87
+cmp #11,_ndisp
+bne L1
+tst _scopef
+beq L1
+*line 88
+*line 89
+move #20,(sp)
+move.l #_scopebf,-(sp)
+move _scopec,-(sp)
+move _scoper,-(sp)
+move.l _scopeob,-(sp)
+jsr _vputs
+adda.l #12,sp
+add #1,_scoper
+*line 91
+move.b #32,(R13)+
+*line 93
+*line 93
+cmp #24,_scoper
+ble L2
+*line 94
+*line 95
+clr _scoper
+*line 96
+add #12,_scopec
+*line 97
+*line 98
+*line 99
+cmp #60,_scopec
+blt L3
+*line 99
+clr _scopec
+L3:
+*line 100
+*line 101
+L2:
+*line 102
+move R7,_scopev
+*line 104
+clr R6
+bra L6
+L7:
+*line 105
+*line 106
+clr R0
+move R7,R0
+move #128,R1
+move R6,R2
+asr R2,R1
+and R1,R0
+beq L8
+*line 106
+move.b #49,(R13)+
+*line 107
+bra L9
+L8:
+*line 108
+move.b #48,(R13)+
+L9:L5:
+*line 104
+add #1,R6
+L6:
+*line 104
+cmp #4,R6
+blt L7
+L4:
+*line 110
+move.b #32,(R13)+
+*line 112
+move #4,R6
+bra L12
+L13:
+*line 113
+*line 114
+clr R0
+move R7,R0
+move #128,R1
+move R6,R2
+asr R2,R1
+and R1,R0
+beq L14
+*line 114
+move.b #49,(R13)+
+*line 115
+bra L15
+L14:
+*line 116
+move.b #48,(R13)+
+L15:L11:
+*line 112
+add #1,R6
+L12:
+*line 112
+cmp #8,R6
+blt L13
+L10:
+*line 118
+move.b #32,(R13)+
+*line 119
+clr.b (R13)
+*line 121
+move #84,(sp)
+move.l #_scopebf,-(sp)
+move _scopec,-(sp)
+move _scoper,-(sp)
+move.l _scopeob,-(sp)
+jsr _vputs
+adda.l #12,sp
+L1:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.globl _scptogl
+.text
+_scptogl:
+~~scptogl:
+link R14,#-4
+*line 135
+*line 136
+tst _astat
+beq L16
+*line 137
+*line 138
+tst _scopef
+beq L10000
+clr R0
+bra L10001
+L10000:move #1,R0
+L10001:move R0,_scopef
+L16:unlk R14
+rts
+.globl _scopeon
+.text
+_scopeon:
+~~scopeon:
+link R14,#-4
+*line 152
+move.l #_v_score,_scopeob
+*line 154
+move.l #_dt_flds,(sp)
+jsr _curset
+*line 156
+clr _scopec
+*line 157
+move #1,_scopef
+*line 158
+clr _scoper
+*line 159
+clr _scopev
+*line 161
+move.l #L18,(sp)
+move.l #_scopebf,-(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 163
+jsr _dswap
+*line 165
+clr (sp)
+jsr _vbank
+*line 167
+move #32767,(sp)
+clr -(sp)
+move.l _scopeob,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 168
+move #12033,(sp)
+clr -(sp)
+move.l _scopeob,R0
+add.l #$fffe,R0
+move.l R0,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 170
+move #-1,(sp)
+move #72,-(sp)
+clr -(sp)
+clr -(sp)
+move #350,-(sp)
+move #512,-(sp)
+move.l _scopeob,-(sp)
+clr -(sp)
+move #1,-(sp)
+clr -(sp)
+jsr _SetObj
+adda.l #20,sp
+*line 171
+move.l #_scorpal,(sp)
+jsr _vsndpal
+*line 173
+move #15,(sp)
+clr -(sp)
+jsr _SetPri
+addq.l #2,sp
+L17:unlk R14
+rts
+.data
+L18:.dc.b $20,$3F,$3F,$3F,$3F,$20,$3F,$3F,$3F,$3F,$20,$0
Index: alcyon/scordsp.s
===================================================================
--- alcyon/scordsp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/scordsp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,2594 @@
+.globl _lcdx
+.globl _lcdy
+.globl _lcdbit
+.globl _lcdrow
+.globl _lcdcol
+.globl _lcdbase
+.globl _lcdctl1
+.globl _lcdctl2
+.globl _v_obtab
+.globl _v_curob
+.globl _v_nobj
+.globl _v_obpri
+.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 _QQsw
+.globl _QQanch
+.globl _QQin
+.globl _QQip
+.globl _QQop
+.globl _QQnum
+.globl _QQlnum
+.globl _QQchr
+.globl _QQdig
+.globl _QQstr
+.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 _secopok
+.globl _t_sbgn
+.globl _t_send
+.globl _t_sect
+.globl _t_sec1
+.globl _t_sec2
+.globl _t_cbgn
+.globl _t_cend
+.globl _p_sbgn
+.globl _p_send
+.globl _p_sec1
+.globl _p_sec2
+.globl _p_cbgn
+.globl _p_cend
+.globl _noteop
+.globl _notesel
+.globl _t_note
+.globl _p_nbeg
+.globl _p_nend
+.globl _point
+.globl _obj0
+.globl _obj2
+.globl _obj3
+.globl _obj8
+.globl _obj11
+.globl _obj13
+.globl _obj14
+.globl _obj15
+.globl _consl
+.globl _saddr
+.globl _scrl
+.globl _ancmsw
+.globl _angroup
+.globl _clkctl
+.globl _clkrun
+.globl _clksrc
+.globl _cxval
+.globl _cyval
+.globl _dubsw
+.globl _insmode
+.globl _lastam
+.globl _ndisp
+.globl _pchsw
+.globl _recsw
+.globl _sbase
+.globl _scmctl
+.globl _sd
+.globl _sdmctl
+.globl _secop
+.globl _sgcsw
+.globl _sliders
+.globl _soffset
+.globl _stccol
+.globl _stcrow
+.globl _submenu
+.globl _velflag
+.globl _bfs
+.globl _nedlbl
+.globl _kbobj
+.globl _grpmode
+.globl _grpstat
+.globl _lastvel
+.globl _anrs
+.globl _varmode
+.globl _slices
+.globl _valents
+.globl _var2src
+.data
+_var2src:
+.dc.w $B
+.dc.w $C
+.dc.w $D
+.dc.w $2
+.dc.w $8
+.dc.w $6
+.globl _simled
+.data
+_simled:
+.dc.w $A2
+.dc.w $62
+.dc.w $52
+.globl _nsvtab
+.data
+_nsvtab:
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.globl _scorpal
+.data
+_scorpal:
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $2
+.dc.w $3
+.dc.w $3
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $2
+.dc.w $0
+.dc.w $2
+.dc.w $0
+.dc.w $0
+.dc.w $3
+.dc.w $3
+.dc.w $0
+.dc.w $0
+.dc.w $3
+.dc.w $3
+.dc.w $0
+.dc.w $1
+.dc.w $2
+.dc.w $0
+.dc.w $0
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $2
+.dc.w $0
+.dc.w $0
+.dc.w $3
+.dc.w $0
+.dc.w $3
+.dc.w $1
+.dc.w $2
+.dc.w $0
+.dc.w $2
+.dc.w $3
+.dc.w $2
+.dc.w $0
+.dc.w $0
+.dc.w $2
+.dc.w $2
+.dc.w $1
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.globl _clklbl
+.data
+_clklbl:
+*line 145
+.dc.l L1
+*line 146
+.dc.l L2
+*line 147
+.dc.l L3
+*line 148
+.dc.l L4
+*line 149
+.dc.l L5
+*line 150
+.dc.l L6
+*line 152
+.dc.l L7
+.globl _sdisp
+.data
+_sdisp:
+*line 156
+.dc.l L8
+*line 158
+.dc.l L9
+*line 161
+.dc.l L10
+*line 164
+.dc.l L11
+*line 167
+.dc.l L12
+*line 169
+.dc.l L13
+*line 172
+.dc.l L14
+*line 174
+.dc.l L15
+*line 180
+.dc.l L16
+.globl _makeln
+.text
+_makeln:
+~~makeln:
+~lnc=R7
+~lew=R6
+link R14,#0
+movem.l R3-R7/R12-R13,-(sp)
+~lp=R13
+~cp=R12
+~i=R5
+~lbg=R4
+*line 199
+move 8(R14),R7
+*line 199
+move 10(R14),R6
+*line 199
+move.l _obj15,R13
+*line 200
+move.l _consl,R12
+*line 202
+move R6,(sp)
+jsr _exp_c
+move R0,R6
+*line 204
+and #15,R7
+*line 208
+clr R5
+bra L20
+L21:
+*line 209
+*line 210
+*line 211
+*line 212
+*line 213
+*line 214
+*line 215
+*line 216
+*line 217
+*line 218
+*line 219
+cmp #42,R5
+beq L10000
+cmp #50,R5
+beq L10000
+cmp #58,R5
+beq L10000
+cmp #66,R5
+beq L10000
+cmp #162,R5
+beq L10000
+cmp #170,R5
+beq L10000
+cmp #178,R5
+beq L10000
+cmp #186,R5
+bne L22
+L10000:*line 220
+*line 221
+move R6,R4
+*line 222
+clr R0
+move R4,R0
+and #-16,R0
+move R0,(R13)+
+*line 223
+move R4,(R13)+
+*line 224
+move R4,(R13)+
+*line 225
+move R4,(R13)+
+*line 226
+bra L23
+L22:
+*line 227
+*line 227
+cmp #209,R5
+ble L24
+*line 228
+*line 229
+clr R4
+*line 230
+clr R0
+move R4,R0
+and #-16,R0
+move R0,(R13)+
+*line 231
+move R4,(R13)+
+*line 232
+move R4,(R13)+
+*line 233
+move R4,(R13)+
+*line 234
+bra L25
+L24:
+*line 235
+*line 236
+*line 237
+clr R4
+*line 238
+clr R0
+move R4,R0
+and #-16,R0
+move R0,(R13)+
+*line 239
+move R4,(R13)+
+*line 240
+clr R0
+move R7,R0
+clr R1
+move R4,R1
+and #-16,R1
+or R1,R0
+move R0,(R13)+
+*line 241
+move R4,(R13)+
+L25:L23:
+*line 242
+*line 243
+*line 244
+clr (R12)+
+L19:
+*line 208
+add #1,R5
+L20:
+*line 208
+cmp #224,R5
+blt L21
+L18:
+*line 250
+move.l _consl,R8
+move R6,148(R8)
+*line 251
+move.l _consl,R8
+move R6,164(R8)
+*line 252
+move.l _consl,R8
+move R6,180(R8)
+*line 253
+move.l _consl,R8
+move R6,196(R8)
+*line 254
+move.l _consl,R8
+move R6,212(R8)
+*line 256
+move.l _consl,R8
+move R6,244(R8)
+*line 257
+move.l _consl,R8
+move R6,260(R8)
+*line 258
+move.l _consl,R8
+move R6,276(R8)
+*line 259
+move.l _consl,R8
+move R6,292(R8)
+*line 260
+move.l _consl,R8
+move R6,308(R8)
+*line 262
+move #4,(sp)
+jsr _exp_c
+move R0,-(sp)
+move.l _consl,R8
+move (sp)+,420(R8)
+L17:tst.l (sp)+
+movem.l (sp)+,R4-R7/R12-R13
+unlk R14
+rts
+.globl _ds_vmod
+.text
+_ds_vmod:
+~~ds_vmod:
+link R14,#-4
+*line 276
+*line 277
+cmp #2,_ndisp
+bne L26
+*line 278
+*line 279
+*line 280
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L27
+*line 280
+clr (sp)
+jsr _vbank
+*line 281
+L27:
+*line 282
+*line 283
+tst _velflag
+beq L10001
+move #82,(sp)
+bra L10003
+L10001:move #18,(sp)
+L10003:move.l 24+_sdisp,-(sp)
+clr -(sp)
+move #5,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+L26:unlk R14
+rts
+.globl _ds_vel
+.text
+_ds_vel:
+~~ds_vel:
+link R14,#-6
+movem.l R6-R7,-(sp)
+~i=R7
+~buf=-6
+*line 297
+*line 298
+cmp #2,_ndisp
+bne L28
+*line 299
+*line 300
+*line 301
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L29
+*line 301
+clr (sp)
+jsr _vbank
+*line 302
+L29:
+*line 303
+jsr _ds_vmod
+*line 305
+clr R7
+bra L32
+L33:
+*line 306
+*line 307
+move R7,R8
+add.l R8,R8
+move.l #_lastvel,R9
+move 0(R8,R9.l),R0
+ext.l R0
+divs #252,R0
+move R0,(sp)
+move.l #L34,-(sp)
+move.l R14,-(sp)
+sub.l #6,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 308
+move #18,(sp)
+move.l R14,-(sp)
+sub.l #6,(sp)
+move R7,R0
+muls #5,R0
+move R0,-(sp)
+add #6,(sp)
+move #5,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+L31:
+*line 305
+add #1,R7
+L32:
+*line 305
+cmp #12,R7
+blt L33
+L30:L28:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _dsvmode
+.text
+_dsvmode:
+~~dsvmode:
+~n=8
+link R14,#-4
+*line 324
+*line 325
+cmp #2,_ndisp
+bne L35
+*line 326
+*line 327
+*line 328
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L36
+*line 328
+clr (sp)
+jsr _vbank
+*line 329
+L36:
+*line 330
+move 8(R14),R0
+asl #5,R0
+ext.l R0
+tst _angroup
+bge L10004
+move _angroup,R1
+neg R1
+bra L10006
+L10004:move _angroup,R1
+L10006:sub #1,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_varmode,R9
+move 0(R8,R9.l),R8
+add.l R8,R8
+move.l #_simled,R9
+move 0(R8,R9.l),(sp)
+move #42,-(sp)
+move 8(R14),R0
+muls #9,R0
+move R0,-(sp)
+add #5,(sp)
+move #6,-(sp)
+move.l _obj8,-(sp)
+jsr _vputc
+adda.l #10,sp
+L35:unlk R14
+rts
+.globl _ds_anmd
+.text
+_ds_anmd:
+~~ds_anmd:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 344
+*line 345
+cmp #2,_ndisp
+bne L37
+*line 346
+*line 347
+clr R7
+bra L40
+L41:
+*line 348
+move R7,(sp)
+jsr _dsvmode
+L39:
+*line 347
+add #1,R7
+L40:
+*line 347
+cmp #6,R7
+blt L41
+L38:L37:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _ds_angr
+.text
+_ds_angr:
+~~ds_angr:
+link R14,#-8
+~buf=-4
+*line 364
+*line 365
+cmp #2,_ndisp
+bne L42
+*line 366
+*line 367
+*line 368
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L43
+*line 368
+clr (sp)
+jsr _vbank
+*line 369
+L43:
+*line 370
+tst _angroup
+bge L10007
+move _angroup,R0
+neg R0
+move R0,(sp)
+bra L10009
+L10007:move _angroup,(sp)
+L10009:move.l #L44,-(sp)
+move.l R14,-(sp)
+sub.l #4,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 371
+move #18,(sp)
+move.l R14,-(sp)
+sub.l #4,(sp)
+move #59,-(sp)
+move #7,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+L42:unlk R14
+rts
+.globl _ds_anrs
+.text
+_ds_anrs:
+~~ds_anrs:
+link R14,#-4
+movem.l R6-R7,-(sp)
+~i=R7
+~buf=-4
+*line 388
+*line 389
+cmp #2,_ndisp
+bne L45
+*line 390
+*line 391
+*line 392
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L46
+*line 392
+clr (sp)
+jsr _vbank
+*line 393
+L46:
+*line 394
+move.b #47,-3(R14)
+*line 395
+clr.b -2(R14)
+*line 397
+clr R7
+bra L49
+L50:
+*line 398
+*line 399
+move R7,R0
+asl #5,R0
+ext.l R0
+tst _angroup
+bge L10010
+move _angroup,R1
+neg R1
+bra L10012
+L10010:move _angroup,R1
+L10012:sub #1,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_anrs,R9
+move 0(R8,R9.l),R0
+add #48,R0
+move.b R0,-4(R14)
+*line 400
+move #18,(sp)
+move.l R14,-(sp)
+sub.l #4,(sp)
+move R7,R0
+muls #9,R0
+move R0,-(sp)
+add #6,(sp)
+move #7,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+L48:
+*line 397
+add #1,R7
+L49:
+*line 397
+cmp #6,R7
+blt L50
+L47:L45:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _dsanval
+.text
+_dsanval:
+~~dsanval:
+~var=8
+link R14,#-16
+movem.l R3-R7,-(sp)
+~tmp=R7
+~val=R6
+~v1=R5
+~v2=R4
+~buf=-16
+*line 419
+*line 420
+cmp #2,_ndisp
+bne L51
+*line 421
+*line 422
+*line 423
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L52
+*line 423
+clr (sp)
+jsr _vbank
+*line 424
+L52:
+*line 425
+tst _angroup
+bge L10013
+move _angroup,R0
+neg R0
+bra L10015
+L10013:move _angroup,R0
+L10015:sub #1,R0
+asl #4,R0
+move 8(R14),R9
+add.l R9,R9
+add.l #_var2src,R9
+move (R9),R1
+or R1,R0
+muls #10,R0
+add.l #_valents,R0
+move.l R0,R8
+move 8(R8),R6
+asr #5,R6
+*line 426
+tst R6
+bge L10016
+move R6,R0
+neg R0
+bra L10018
+L10016:move R6,R0
+L10018:move R0,R7
+*line 427
+move R7,R5
+ext.l R5
+divs #100,R5
+*line 428
+move R7,R4
+move R5,R0
+muls #100,R0
+sub R0,R4
+ext.l R4
+divs #10,R4
+*line 429
+move R4,(sp)
+move R5,-(sp)
+tst R6
+bge L10019
+move #45,-(sp)
+bra L10021
+L10019:move #43,-(sp)
+L10021:move.l #L53,-(sp)
+move.l R14,-(sp)
+add.l #-16,(sp)
+jsr _sprintf
+adda.l #12,sp
+*line 430
+move #18,(sp)
+move.l R14,-(sp)
+add.l #-16,(sp)
+move 8(R14),R0
+muls #9,R0
+move R0,-(sp)
+add #8,(sp)
+move #7,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+L51:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _ds_anvl
+.text
+_ds_anvl:
+~~ds_anvl:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 443
+*line 444
+cmp #2,_ndisp
+bne L54
+*line 445
+*line 446
+clr R7
+bra L57
+L58:
+*line 447
+move R7,(sp)
+jsr _dsanval
+L56:
+*line 446
+add #1,R7
+L57:
+*line 446
+cmp #6,R7
+blt L58
+L55:L54:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _uclk
+.text
+_uclk:
+~~uclk:
+link R14,#-4
+*line 461
+*line 461
+cmp #1,_sliders
+beq L60
+*line 462
+*line 463
+move.l #_GLCplot,_point
+*line 464
+*line 465
+move #1,(sp)
+jsr _GLCcurs
+*line 466
+*line 467
+*line 468
+tst _clkrun
+beq L61
+*line 468
+move #1,(sp)
+move #54,-(sp)
+move #143,-(sp)
+move #54,-(sp)
+move #114,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 469
+bra L62
+L61:
+*line 470
+clr (sp)
+move #54,-(sp)
+move #143,-(sp)
+move #54,-(sp)
+move #114,-(sp)
+jsr _lseg
+addq.l #8,sp
+L62:
+*line 471
+*line 472
+clr (sp)
+jsr _GLCcurs
+*line 473
+L60:L59:unlk R14
+rts
+.globl _dclkmd
+.text
+_dclkmd:
+~~dclkmd:
+link R14,#-4
+*line 487
+jsr _uclk
+*line 489
+*line 490
+cmp #2,_ndisp
+bne L63
+*line 491
+*line 492
+*line 493
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L64
+*line 493
+clr (sp)
+jsr _vbank
+*line 494
+L64:
+*line 495
+*line 496
+tst _clkrun
+beq L10022
+move #83,(sp)
+bra L10024
+L10022:move #19,(sp)
+L10024:move.l #L65,-(sp)
+move #29,-(sp)
+clr -(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+L63:unlk R14
+rts
+.globl _dsclk
+.text
+_dsclk:
+~~dsclk:
+link R14,#-56
+~atr=-52
+*line 512
+jsr _uclk
+*line 514
+*line 515
+cmp #2,_ndisp
+bne L66
+*line 516
+*line 517
+move #26,(sp)
+move #19,-(sp)
+move.l R14,-(sp)
+add.l #-52,(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 519
+*line 520
+tst _clkrun
+beq L67
+*line 520
+move #5,(sp)
+move #83,-(sp)
+move.l R14,-(sp)
+add.l #-52,(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 521
+L67:
+*line 522
+*line 523
+move _clksrc,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_clklbl,R9
+move.l 0(R8,R9.l),(sp)
+move _clkctl,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_clklbl,R9
+move.l 0(R8,R9.l),-(sp)
+move.l #L68,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+adda.l #12,sp
+*line 525
+*line 526
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L69
+*line 526
+clr (sp)
+jsr _vbank
+*line 527
+L69:
+*line 528
+move.l R14,(sp)
+add.l #-52,(sp)
+move.l #_bfs,-(sp)
+move #29,-(sp)
+clr -(sp)
+move.l _obj8,-(sp)
+jsr _vputsa
+adda.l #12,sp
+L66:unlk R14
+rts
+.globl _dssect
+.text
+_dssect:
+~~dssect:
+link R14,#-4
+*line 542
+*line 543
+cmp #2,_ndisp
+bne L70
+*line 544
+*line 545
+move _cursect,(sp)
+add #1,(sp)
+move.l #L71,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 547
+*line 548
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L72
+*line 548
+clr (sp)
+jsr _vbank
+*line 549
+L72:
+*line 550
+move #20,(sp)
+move.l #_bfs,-(sp)
+move #6,-(sp)
+clr -(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+L70:unlk R14
+rts
+.globl _dslocn
+.text
+_dslocn:
+~~dslocn:
+link R14,#0
+movem.l R4-R7,-(sp)
+~curfr=R7
+~beat=R6
+~frame=R5
+*line 567
+*line 568
+cmp #2,_ndisp
+bne L73
+*line 569
+*line 570
+move.l _t_ctr,R7
+*line 571
+move.l #$30,-(sp)
+move.l R7,-(sp)
+jsr ldiv
+addq.l #8,sp
+move.l R0,R6
+*line 572
+move.l #$30,-(sp)
+move.l R7,-(sp)
+jsr lrem
+addq.l #8,sp
+move R0,R5
+*line 574
+move R5,(sp)
+move.l R6,-(sp)
+move.l #L74,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+adda.l #12,sp
+*line 576
+*line 577
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L75
+*line 577
+clr (sp)
+jsr _vbank
+*line 578
+L75:
+*line 579
+move #19,(sp)
+move.l #_bfs,-(sp)
+move #11,-(sp)
+clr -(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+L73:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _dnedmod
+.text
+_dnedmod:
+~~dnedmod:
+link R14,#-4
+*line 593
+*line 594
+cmp #2,_ndisp
+bne L76
+*line 595
+*line 596
+*line 597
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L77
+*line 597
+clr (sp)
+jsr _vbank
+*line 598
+L77:
+*line 599
+*line 600
+*line 601
+tst _notesel
+beq L10025
+move #84,(sp)
+bra L10027
+L10025:move #20,(sp)
+L10027:tst _noteop
+bne L10028
+clr R0
+bra L10030
+L10028:move #512,R0
+L10030:or R0,(sp)
+move _noteop,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_nedlbl,R9
+move.l 0(R8,R9.l),-(sp)
+move #55,-(sp)
+clr -(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+L76:unlk R14
+rts
+.globl _dsmem
+.text
+_dsmem:
+~~dsmem:
+link R14,#-4
+*line 612
+*line 613
+cmp #2,_ndisp
+bne L78
+*line 614
+*line 615
+jsr _evleft
+move.l R0,(sp)
+move.l #L79,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 617
+*line 618
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L80
+*line 618
+clr (sp)
+jsr _vbank
+*line 619
+L80:
+*line 620
+move #19,(sp)
+move.l #_bfs,-(sp)
+move #57,-(sp)
+move #8,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+L78:unlk R14
+rts
+.globl _dsgstat
+.text
+_dsgstat:
+~~dsgstat:
+~n=8
+link R14,#-6
+~c=-2
+*line 637
+*line 638
+cmp #2,_ndisp
+bne L81
+*line 639
+*line 640
+*line 641
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L82
+*line 641
+clr (sp)
+jsr _vbank
+*line 642
+L82:
+*line 643
+move 8(R14),R8
+add.l R8,R8
+move.l #_grpstat,R9
+tst 0(R8,R9.l)
+beq L10031
+cmp #8,8(R14)
+ble L10032
+move #162,R0
+bra L10034
+L10032:move #48,R0
+L10034:bra L10036
+L10031:move #192,R0
+L10036:add 8(R14),R0
+add #1,R0
+move.b R0,-2(R14)
+*line 644
+move 8(R14),R0
+add #3,R0
+asl #4,R0
+move R0,(sp)
+or #2,(sp)
+move.b -2(R14),R0
+ext.w R0
+move R0,-(sp) 
+move 8(R14),R0
+muls #5,R0
+move R0,-(sp)
+add #5,(sp)
+move #2,-(sp)
+move.l _obj8,-(sp)
+jsr _vputc
+adda.l #10,sp
+L81:unlk R14
+rts
+.globl _dsgmode
+.text
+_dsgmode:
+~~dsgmode:
+~n=8
+link R14,#-4
+*line 656
+*line 657
+cmp #2,_ndisp
+bne L83
+*line 658
+*line 659
+*line 660
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L84
+*line 660
+clr (sp)
+jsr _vbank
+*line 661
+L84:
+*line 662
+move 8(R14),R8
+add.l R8,R8
+move.l #_grpmode,R9
+move 0(R8,R9.l),R8
+add.l R8,R8
+move.l #_simled,R9
+move 0(R8,R9.l),(sp)
+move #42,-(sp)
+move 8(R14),R0
+muls #5,R0
+move R0,-(sp)
+add #6,(sp)
+move #2,-(sp)
+move.l _obj8,-(sp)
+jsr _vputc
+adda.l #10,sp
+L83:unlk R14
+rts
+.globl _dsgmods
+.text
+_dsgmods:
+~~dsgmods:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 678
+*line 679
+cmp #2,_ndisp
+bne L85
+*line 680
+*line 681
+clr R7
+bra L88
+L89:
+*line 682
+*line 683
+move R7,(sp)
+jsr _dsgstat
+*line 684
+move R7,(sp)
+jsr _dsgmode
+L87:
+*line 681
+add #1,R7
+L88:
+*line 681
+cmp #12,R7
+blt L89
+L86:L85:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _dsgmodz
+.text
+_dsgmodz:
+~~dsgmodz:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 698
+*line 699
+cmp #2,_ndisp
+bne L90
+*line 700
+*line 701
+clr R7
+bra L93
+L94:
+*line 702
+move R7,(sp)
+jsr _dsgmode
+L92:
+*line 701
+add #1,R7
+L93:
+*line 701
+cmp #12,R7
+blt L94
+L91:
+*line 704
+clr R7
+bra L97
+L98:
+*line 705
+move R7,(sp)
+jsr _dsvmode
+L96:
+*line 704
+add #1,R7
+L97:
+*line 704
+cmp #6,R7
+blt L98
+L95:L90:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _dsrpmod
+.text
+_dsrpmod:
+~~dsrpmod:
+link R14,#-54
+~atr=-50
+*line 721
+move _sliders,R0
+bra L101
+*line 722
+L102:
+*line 723
+L103:
+*line 724
+L104:
+*line 725
+L105:
+*line 726
+*line 727
+*line 728
+move.l #_GLCplot,_point
+*line 729
+*line 730
+move #1,(sp)
+jsr _GLCcurs
+*line 731
+*line 732
+*line 732
+tst _recsw
+beq L106
+*line 733
+*line 734
+move #1,(sp)
+move #54,-(sp)
+move #176,-(sp)
+move #54,-(sp)
+move #168,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 735
+clr (sp)
+move #54,-(sp)
+move #161,-(sp)
+move #54,-(sp)
+move #153,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 736
+bra L107
+L106:
+*line 737
+*line 738
+*line 739
+clr (sp)
+move #54,-(sp)
+move #176,-(sp)
+move #54,-(sp)
+move #168,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 740
+move #1,(sp)
+move #54,-(sp)
+move #161,-(sp)
+move #54,-(sp)
+move #153,-(sp)
+jsr _lseg
+addq.l #8,sp
+L107:
+*line 741
+*line 742
+*line 743
+clr (sp)
+jsr _GLCcurs
+bra L100
+L101:tst R0
+beq L102
+cmp #2,R0
+beq L103
+cmp #3,R0
+beq L104
+cmp #6,R0
+beq L105
+bra L100
+L100:
+*line 747
+*line 748
+cmp #2,_ndisp
+bne L99
+*line 749
+*line 750
+move #25,(sp)
+move #20,-(sp)
+move.l R14,-(sp)
+add.l #-50,(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 752
+*line 753
+tst _recsw
+beq L108
+*line 753
+move #5,(sp)
+move #596,-(sp)
+move.l R14,-(sp)
+add.l #-40,(sp)
+jsr _memsetw
+addq.l #6,sp
+bra L109
+L108:
+*line 754
+*line 755
+move #4,(sp)
+move #84,-(sp)
+move.l R14,-(sp)
+add.l #-50,(sp)
+jsr _memsetw
+addq.l #6,sp
+L109:
+*line 757
+*line 758
+tst _dubsw
+beq L110
+*line 758
+move #6,(sp)
+move #84,-(sp)
+move.l R14,-(sp)
+add.l #-28,(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 759
+L110:
+*line 760
+*line 761
+tst _pchsw
+beq L111
+*line 761
+move #7,(sp)
+move #84,-(sp)
+move.l R14,-(sp)
+add.l #-14,(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 762
+L111:
+*line 763
+*line 764
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L112
+*line 764
+clr (sp)
+jsr _vbank
+*line 765
+L112:
+*line 766
+move.l R14,(sp)
+add.l #-50,(sp)
+move.l #L113,-(sp)
+move #31,-(sp)
+move #8,-(sp)
+move.l _obj8,-(sp)
+jsr _vputsa
+adda.l #12,sp
+L99:unlk R14
+rts
+.globl _dsimode
+.text
+_dsimode:
+~~dsimode:
+link R14,#-18
+~atr=-14
+*line 782
+*line 783
+cmp #2,_ndisp
+bne L114
+*line 784
+*line 785
+*line 786
+tst _insmode
+beq L115
+*line 786
+move #7,(sp)
+move #84,-(sp)
+move.l R14,-(sp)
+add.l #-14,(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 787
+bra L116
+L115:
+*line 788
+move #7,(sp)
+move #20,-(sp)
+move.l R14,-(sp)
+add.l #-14,(sp)
+jsr _memsetw
+addq.l #6,sp
+L116:
+*line 790
+*line 791
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L117
+*line 791
+clr (sp)
+jsr _vbank
+*line 792
+L117:
+*line 793
+move.l R14,(sp)
+add.l #-14,(sp)
+move.l #L118,-(sp)
+move #22,-(sp)
+clr -(sp)
+move.l _obj8,-(sp)
+jsr _vputsa
+adda.l #12,sp
+L114:unlk R14
+rts
+.globl _sdwin
+.text
+_sdwin:
+~~sdwin:
+~n=8
+link R14,#-136
+~atr=-128
+~atrib=-130
+~i=-132
+*line 810
+*line 811
+cmp #2,_ndisp
+bne L119
+*line 812
+*line 813
+*line 814
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L120
+*line 814
+clr (sp)
+jsr _vbank
+*line 815
+L120:
+*line 816
+move 8(R14),R0
+bra L122
+*line 817
+L123:
+*line 818
+*line 819
+*line 820
+*line 821
+*line 822
+move #19,(sp)
+cmp.b #4,_ac_code
+bne L10037
+move.l #L124,-(sp)
+bra L10039
+L10037:move.l #L125,-(sp)
+L10039:clr -(sp)
+clr -(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 823
+*line 824
+move #20,(sp)
+move.l #L126,-(sp)
+move #2,-(sp)
+clr -(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 825
+move #19,(sp)
+move.l #L127,-(sp)
+move #9,-(sp)
+clr -(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 826
+*line 827
+jsr _dssect
+*line 828
+jsr _dslocn
+bra L119
+*line 829
+*line 830
+L128:
+*line 831
+*line 832
+*line 833
+jsr _dsimode
+bra L119
+*line 834
+*line 835
+L129:
+*line 836
+*line 837
+*line 838
+jsr _dsclk
+bra L119
+*line 839
+*line 840
+L130:
+*line 841
+*line 842
+*line 843
+jsr _dnedmod
+bra L119
+*line 844
+*line 845
+*line 846
+L131:
+*line 847
+*line 848
+*line 849
+move #19,(sp)
+move.l #L132,-(sp)
+clr -(sp)
+move #1,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 850
+clr (sp)
+jsr _rd_ioas
+bra L119
+*line 851
+*line 852
+L133:
+*line 853
+*line 854
+*line 855
+move #20,(sp)
+move.l #L134,-(sp)
+move #14,-(sp)
+move #1,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 856
+clr (sp)
+jsr _rd_tune
+bra L119
+*line 857
+*line 858
+L135:
+*line 859
+*line 860
+*line 861
+move #19,(sp)
+move.l #L136,-(sp)
+move #21,-(sp)
+move #1,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 862
+clr (sp)
+jsr _rd_tmpo
+bra L119
+*line 863
+*line 864
+L137:
+*line 865
+*line 866
+*line 867
+move #20,(sp)
+move.l #L138,-(sp)
+move #31,-(sp)
+move #1,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 868
+clr (sp)
+jsr _rd_intp
+bra L119
+*line 869
+*line 870
+L139:
+*line 871
+*line 872
+*line 873
+move #19,(sp)
+move.l #L140,-(sp)
+move #40,-(sp)
+move #1,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+bra L119
+*line 874
+*line 875
+*line 876
+*line 877
+L141:
+*line 878
+*line 879
+*line 880
+move #20,(sp)
+move.l #L142,-(sp)
+move #50,-(sp)
+move #1,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+bra L119
+*line 881
+*line 882
+L143:
+*line 883
+*line 884
+*line 885
+move #19,(sp)
+move.l #L144,-(sp)
+move #57,-(sp)
+move #1,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+bra L119
+*line 886
+*line 887
+L145:
+*line 888
+*line 889
+*line 890
+move #18,(sp)
+move.l 4+_sdisp,-(sp)
+clr -(sp)
+move #2,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 891
+jsr _dsgmods
+*line 892
+jsr _ds_inst
+*line 893
+*line 894
+move #18,(sp)
+move.l 32+_sdisp,-(sp)
+move #4,-(sp)
+move #3,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 895
+move #18,(sp)
+move.l 16+_sdisp,-(sp)
+clr -(sp)
+move #3,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 896
+jsr _ds_trns
+*line 897
+*line 898
+move #18,(sp)
+move.l 32+_sdisp,-(sp)
+move #4,-(sp)
+move #4,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 899
+move #18,(sp)
+move.l 20+_sdisp,-(sp)
+clr -(sp)
+move #4,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 900
+jsr _ds_dyn
+*line 901
+jsr _ds_loc
+*line 902
+*line 903
+move #18,(sp)
+move.l 32+_sdisp,-(sp)
+move #4,-(sp)
+move #5,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 904
+move #18,(sp)
+move.l 24+_sdisp,-(sp)
+clr -(sp)
+move #5,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 905
+jsr _ds_vel
+*line 906
+bra L119
+*line 907
+*line 908
+*line 909
+L146:
+*line 910
+*line 911
+*line 912
+move #18,(sp)
+move.l 8+_sdisp,-(sp)
+clr -(sp)
+move #6,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 913
+move #18,(sp)
+move.l 28+_sdisp,-(sp)
+clr -(sp)
+move #7,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 914
+*line 915
+*line 916
+tst _angroup
+bge L147
+*line 916
+move #18,-130(R14)
+*line 917
+bra L148
+L147:
+*line 918
+move #82,-130(R14)
+L148:
+*line 919
+*line 920
+clr -132(R14)
+bra L151
+L152:
+*line 921
+move -130(R14),(sp)
+move -132(R14),-(sp)
+move #7,-(sp)
+move.l _obj8,-(sp)
+jsr _vputa
+addq.l #8,sp
+L150:
+*line 920
+add #1,-132(R14)
+L151:
+*line 920
+cmp #4,-132(R14)
+blt L152
+L149:
+*line 921
+*line 922
+*line 923
+*line 924
+tst _ancmsw
+beq L153
+*line 924
+move #82,-130(R14)
+*line 925
+bra L154
+L153:
+*line 926
+move #18,-130(R14)
+L154:
+*line 927
+*line 928
+clr -132(R14)
+bra L157
+L158:
+*line 929
+move -130(R14),(sp)
+move -132(R14),-(sp)
+move #6,-(sp)
+move.l _obj8,-(sp)
+jsr _vputa
+addq.l #8,sp
+L156:
+*line 928
+add #1,-132(R14)
+L157:
+*line 928
+cmp #4,-132(R14)
+blt L158
+L155:
+*line 929
+*line 930
+*line 931
+jsr _ds_anmd
+*line 932
+jsr _ds_angr
+*line 933
+jsr _ds_anrs
+*line 934
+jsr _ds_anvl
+*line 935
+bra L119
+*line 936
+*line 937
+L159:
+*line 938
+*line 939
+*line 940
+*line 941
+move _curscor,R0
+asl #4,R0
+ext.l R0
+add.l #_scname,R0
+move.l R0,(sp)
+move _curscor,-(sp)
+add #1,(sp)
+move.l #L160,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 942
+*line 943
+move #19,(sp)
+move.l #_bfs,-(sp)
+clr -(sp)
+move #8,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+bra L119
+*line 944
+*line 945
+L161:
+*line 946
+*line 947
+*line 948
+move #20,(sp)
+move.l 12+_sdisp,-(sp)
+move #27,-(sp)
+move #8,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 949
+jsr _dsrpmod
+bra L119
+*line 950
+*line 951
+L162:
+*line 952
+*line 953
+*line 954
+jsr _dsmem
+bra L119
+*line 955
+bra L121
+L122:cmp #15,R0
+bhi L121
+asl #2,R0
+move R0,R8
+add.l #L163,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L163:.dc.l L123
+.dc.l L128
+.dc.l L129
+.dc.l L130
+.dc.l L131
+.dc.l L133
+.dc.l L135
+.dc.l L137
+.dc.l L139
+.dc.l L141
+.dc.l L143
+.dc.l L145
+.dc.l L146
+.dc.l L159
+.dc.l L161
+.dc.l L162
+.text
+L121:L119:unlk R14
+rts
+.globl _sdwins
+.text
+_sdwins:
+~~sdwins:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 972
+*line 973
+cmp #2,_ndisp
+bne L164
+*line 974
+*line 975
+clr R7
+bra L167
+L168:
+*line 976
+move R7,(sp)
+jsr _sdwin
+L166:
+*line 975
+add #1,R7
+L167:
+*line 975
+cmp #17,R7
+blt L168
+L165:L164:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _sdsetup
+.text
+_sdsetup:
+~~sdsetup:
+link R14,#-4
+*line 990
+jsr _dswap
+*line 992
+clr _sd
+*line 993
+clr _noteop
+*line 994
+clr _notesel
+*line 995
+clr _secop
+*line 996
+move #-1,_scmctl
+*line 997
+move #-1,_sdmctl
+*line 998
+clr _submenu
+*line 999
+clr _lastam
+*line 1001
+jsr _clrsctl
+*line 1005
+move.l #_v_curs0,_obj0
+*line 1006
+move.l #_v_tcur,_obj2
+*line 1007
+move.l #_v_cur,_obj3
+*line 1008
+move.l #_v_ct0,_obj8
+*line 1009
+move.l #_v_win0,_obj11
+*line 1010
+move.l #_v_kbobj,_obj13
+*line 1011
+move.l #_v_score,_obj14
+*line 1012
+move.l #_v_lnobj,_obj15
+*line 1017
+move #-1,(sp)
+move #1540,-(sp)
+move #175,-(sp)
+move #256,-(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 1018
+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 1019
+move #-1,(sp)
+move #1536,-(sp)
+clr -(sp)
+clr -(sp)
+move #18,-(sp)
+move #512,-(sp)
+move.l _obj3,-(sp)
+move #1,-(sp)
+clr -(sp)
+move #3,-(sp)
+jsr _SetObj
+adda.l #20,sp
+*line 1020
+move #-1,(sp)
+move #72,-(sp)
+clr -(sp)
+clr -(sp)
+move #108,-(sp)
+move #512,-(sp)
+move.l _obj8,-(sp)
+clr -(sp)
+move #1,-(sp)
+move #8,-(sp)
+jsr _SetObj
+adda.l #20,sp
+*line 1021
+move #-1,(sp)
+move #1536,-(sp)
+move #14,-(sp)
+clr -(sp)
+move #224,-(sp)
+move #512,-(sp)
+move.l _obj11,-(sp)
+move #1,-(sp)
+clr -(sp)
+move #11,-(sp)
+jsr _SetObj
+adda.l #20,sp
+*line 1022
+move #-1,(sp)
+move #1536,-(sp)
+move #14,-(sp)
+clr -(sp)
+move #224,-(sp)
+move #16,-(sp)
+move.l _obj13,-(sp)
+move #1,-(sp)
+clr -(sp)
+move #13,-(sp)
+jsr _SetObj
+adda.l #20,sp
+*line 1023
+move #-1,(sp)
+move #1540,-(sp)
+move #14,-(sp)
+clr -(sp)
+move #224,-(sp)
+move #512,-(sp)
+move.l _obj14,-(sp)
+clr -(sp)
+clr -(sp)
+move #14,-(sp)
+jsr _SetObj
+adda.l #20,sp
+*line 1024
+move #-1,(sp)
+move #1540,-(sp)
+move #14,-(sp)
+move #248,-(sp)
+move #224,-(sp)
+move #16,-(sp)
+move.l _obj15,-(sp)
+move #1,-(sp)
+clr -(sp)
+move #15,-(sp)
+jsr _SetObj
+adda.l #20,sp
+*line 1026
+*line 1027
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L170
+*line 1027
+clr (sp)
+jsr _vbank
+*line 1028
+L170:
+*line 1029
+move #32767,(sp)
+clr -(sp)
+move.l _obj14,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 1030
+move #24577,(sp)
+clr -(sp)
+move.l _obj14,R0
+add.l #$fffe,R0
+move.l R0,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 1032
+move #1,(sp)
+jsr _vbank
+*line 1034
+jsr _stcset
+*line 1035
+jsr _stcclr
+*line 1036
+move #15,(sp)
+jsr _arcurs
+*line 1037
+move #15,(sp)
+jsr _ttcini
+*line 1041
+*line 1042
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+cmp #256,R0
+beq L171
+*line 1042
+move #1,(sp)
+jsr _vbank
+*line 1043
+L171:
+*line 1044
+move #896,(sp)
+move.l #_kbobj,-(sp)
+move.l _obj13,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 1045
+move #4,(sp)
+move #1,-(sp)
+jsr _makeln
+addq.l #2,sp
+*line 1046
+jsr _sdwins
+*line 1050
+move #12,(sp)
+move #3,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 1051
+move #12,(sp)
+jsr _objclr
+*line 1052
+move #2,(sp)
+move #12,-(sp)
+move #12,-(sp)
+jsr _objon
+addq.l #4,sp
+*line 1053
+move #2,(sp)
+move #250,-(sp)
+move #12,-(sp)
+jsr _objon
+addq.l #4,sp
+*line 1054
+move #2,(sp)
+move #264,-(sp)
+move #12,-(sp)
+jsr _objon
+addq.l #4,sp
+*line 1055
+move #2,(sp)
+move #278,-(sp)
+move #12,-(sp)
+jsr _objon
+addq.l #4,sp
+*line 1056
+move #2,(sp)
+move #292,-(sp)
+move #12,-(sp)
+jsr _objon
+addq.l #4,sp
+*line 1057
+move #2,(sp)
+move #306,-(sp)
+move #12,-(sp)
+jsr _objon
+addq.l #4,sp
+*line 1058
+move #2,(sp)
+move #320,-(sp)
+move #12,-(sp)
+jsr _objon
+addq.l #4,sp
+*line 1059
+move #2,(sp)
+move #334,-(sp)
+move #12,-(sp)
+jsr _objon
+addq.l #4,sp
+*line 1060
+move #2,(sp)
+move #348,-(sp)
+move #12,-(sp)
+jsr _objon
+addq.l #4,sp
+*line 1062
+move #7,(sp)
+move #8,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 1063
+move #7,(sp)
+jsr _objclr
+*line 1064
+move #12,(sp)
+clr -(sp)
+move #7,-(sp)
+jsr _objon
+addq.l #4,sp
+*line 1065
+move #12,(sp)
+move #238,-(sp)
+move #7,-(sp)
+jsr _objon
+addq.l #4,sp
+*line 1066
+move #12,(sp)
+move #252,-(sp)
+move #7,-(sp)
+jsr _objon
+addq.l #4,sp
+*line 1067
+move #12,(sp)
+move #266,-(sp)
+move #7,-(sp)
+jsr _objon
+addq.l #4,sp
+*line 1068
+move #12,(sp)
+move #280,-(sp)
+move #7,-(sp)
+jsr _objon
+addq.l #4,sp
+*line 1069
+move #12,(sp)
+move #294,-(sp)
+move #7,-(sp)
+jsr _objon
+addq.l #4,sp
+*line 1070
+move #12,(sp)
+move #308,-(sp)
+move #7,-(sp)
+jsr _objon
+addq.l #4,sp
+*line 1071
+move #12,(sp)
+move #322,-(sp)
+move #7,-(sp)
+jsr _objon
+addq.l #4,sp
+*line 1072
+move #12,(sp)
+move #336,-(sp)
+move #7,-(sp)
+jsr _objon
+addq.l #4,sp
+*line 1074
+move #2,(sp)
+move #13,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 1075
+move #1,(sp)
+move #14,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 1076
+clr (sp)
+move #15,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 1078
+move.l #_scorpal,(sp)
+jsr _vsndpal
+*line 1080
+move #15,(sp)
+clr -(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 1081
+move #175,(sp)
+move #256,-(sp)
+jsr _setgc
+addq.l #2,sp
+*line 1083
+move.l _t_cur,(sp)
+jsr _sc_refr
+L169:unlk R14
+rts
+.data
+L1:.dc.b $4C,$6F,$63,$61,$6C,$0
+L2:.dc.b $4D,$49,$44,$49,$20,$0
+L3:.dc.b $53,$4D,$50,$54,$45,$0
+L4:.dc.b $50,$4C,$53,$32,$34,$0
+L5:.dc.b $50,$4C,$53,$34,$38,$0
+L6:.dc.b $50,$4C,$53,$39,$36,$0
+L7:.dc.b $53,$74,$65,$70,$20,$0
+L8:.dc.b $98,$99,$9A,$9B,$20,$20,$20,$20,$20,$0
+L9:.dc.b $80,$81,$82,$83,$20,$31,$20,$20,$20,$20,$32,$20,$20,$20,$20,$33,$20,$20,$20,$20,$34,$20,$20,$20,$20,$35,$20,$20,$20,$20
+.dc.b $36,$20,$20,$20,$20,$37,$20,$20,$20,$20,$38,$20,$20,$20,$20,$39,$20,$20,$20,$20,$AC,$20,$20,$20,$20,$AD,$20,$20,$20,$20
+.dc.b $AE,$20,$20,$20,$20,$0
+L10:.dc.b $90,$91,$92,$93,$20,$20,$50,$63,$68,$2F,$48,$6F,$72,$20,$20,$4D,$6F,$64,$2F,$56,$72,$74,$20,$20,$42,$72,$74,$68,$2F,$4C
+.dc.b $50,$20,$20,$47,$50,$43,$2F,$43,$56,$31,$20,$20,$50,$65,$64,$61,$6C,$20,$31,$20,$20,$4B,$65,$79,$20,$50,$72,$73,$20,$47
+.dc.b $72,$6F,$75,$70,$0
+L11:.dc.b $D,$E,$F,$20,$50,$6C,$61,$79,$20,$52,$65,$63,$72,$64,$20,$4F,$76,$72,$44,$75,$62,$20,$50,$75,$6E,$63,$68,$49,$6E,$20,$0
+L12:.dc.b $84,$85,$86,$87,$0
+L13:.dc.b $88,$89,$8A,$8B,$20,$20,$20,$2F,$20,$20,$20,$20,$2F,$20,$20,$20,$20,$2F,$20,$20,$20,$20,$2F,$20,$20,$20,$20,$2F,$20,$20
+.dc.b $20,$20,$2F,$20,$20,$20,$20,$2F,$20,$20,$20,$20,$2F,$20,$20,$20,$20,$2F,$20,$20,$20,$20,$2F,$20,$20,$20,$20,$2F,$20,$20
+.dc.b $20,$20,$2F,$20,$0
+L14:.dc.b $8C,$8D,$8E,$8F,$0
+L15:.dc.b $94,$95,$96,$97,$20,$20,$30,$2F,$2B,$30,$30,$2E,$30,$20,$20,$30,$2F,$2B,$30,$30,$2E,$30,$20,$20,$30,$2F,$2B,$30,$30,$2E
+.dc.b $30,$20,$20,$30,$2F,$2B,$30,$30,$2E,$30,$20,$20,$30,$2F,$2B,$30,$30,$2E,$30,$20,$20,$30,$2F,$2B,$30,$30,$2E,$30,$20,$23
+.dc.b $20,$30,$30,$20,$0
+L16:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$0
+L34:.dc.b $25,$30,$33,$64,$0
+L44:.dc.b $23,$20,$25,$32,$2E,$32,$64,$0
+L53:.dc.b $25,$63,$25,$30,$32,$64,$2E,$25,$31,$64,$0
+L65:.dc.b $43,$6C,$6F,$63,$6B,$0
+L68:.dc.b $43,$6C,$6F,$63,$6B,$20,$43,$6F,$6E,$20,$25,$35,$2E,$35,$73,$20,$53,$72,$63,$20,$25,$35,$2E,$35,$73,$20,$0
+L71:.dc.b $25,$30,$32,$64,$0
+L74:.dc.b $25,$30,$35,$6C,$64,$20,$46,$20,$25,$30,$32,$64,$0
+L79:.dc.b $4D,$20,$25,$30,$35,$6C,$64,$0
+L113:.dc.b $50,$6C,$61,$79,$20,$52,$65,$63,$72,$64,$20,$4F,$76,$72,$44,$75,$62,$20,$50,$75,$6E,$63,$68,$49,$6E,$0
+L118:.dc.b $49,$6E,$73,$65,$72,$74,$20,$0
+L124:.dc.b $A8,$20,$0
+L125:.dc.b $A9,$20,$0
+L126:.dc.b $53,$65,$63,$20,$20,$20,$20,$0
+L127:.dc.b $42,$20,$20,$20,$20,$20,$20,$20,$46,$20,$20,$20,$20,$0
+L132:.dc.b $41,$73,$73,$69,$67,$6E,$6D,$65,$6E,$74,$20,$20,$20,$20,$0
+L134:.dc.b $54,$75,$6E,$65,$20,$20,$20,$0
+L136:.dc.b $54,$65,$6D,$70,$6F,$20,$20,$20,$20,$20,$0
+L138:.dc.b $49,$6E,$74,$20,$20,$20,$20,$20,$0
+L140:.dc.b $53,$74,$6F,$70,$2F,$4E,$65,$78,$74,$20,$0
+L142:.dc.b $49,$6E,$2F,$4F,$75,$74,$20,$0
+L144:.dc.b $4F,$75,$74,$70,$75,$74,$20,$0
+L160:.dc.b $53,$63,$6F,$72,$65,$20,$20,$25,$30,$32,$2E,$32,$64,$20,$25,$31,$36,$2E,$31,$36,$73,$20,$0
Index: alcyon/scread.s
===================================================================
--- alcyon/scread.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/scread.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1594 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.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 _filecat
+.globl _schksum
+.globl _errno
+.globl _lderrsw
+.globl _lrasw
+.globl _ldmap
+.globl _libsp
+.globl _stimes
+.globl _scioerr
+.text
+_scioerr:
+~~scioerr:
+~sn=8
+~ep=10
+link R14,#-84
+~scid=-40
+~erms=-80
+*line 48
+*line 49
+tst.l 10(R14)
+beq L2
+*line 49
+move.l 10(R14),(sp)
+jsr _e_del
+*line 50
+L2:
+*line 51
+move 8(R14),(sp)
+jsr _sc_clr
+*line 52
+jsr _clrlsel
+*line 54
+move 8(R14),(sp)
+add #1,(sp)
+move.l #L3,-(sp)
+move.l R14,-(sp)
+add.l #-40,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 55
+move _errno,(sp)
+move.l #L4,-(sp)
+move.l R14,-(sp)
+add.l #-80,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 57
+*line 58
+move #9,(sp)
+move #14,-(sp)
+move.l R14,-(sp)
+add.l #-80,(sp)
+move.l R14,-(sp)
+add.l #-40,(sp)
+move.l #L5,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+L1:unlk R14
+rts
+.globl _noevent
+.text
+_noevent:
+~~noevent:
+~sn=8
+link R14,#-28
+~scid=-24
+*line 71
+move 8(R14),(sp)
+jsr _sc_clr
+*line 72
+jsr _clrlsel
+*line 74
+move 8(R14),(sp)
+add #1,(sp)
+move.l #L7,-(sp)
+move.l R14,-(sp)
+add.l #-24,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 76
+*line 77
+move #9,(sp)
+move #14,-(sp)
+move.l #L9,-(sp)
+move.l R14,-(sp)
+add.l #-24,(sp)
+move.l #L8,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+L6:unlk R14
+rts
+.globl _scread
+.text
+_scread:
+~~scread:
+~fp=R13
+~ns=8
+link R14,#-90
+movem.l R4-R7/R12-R13,-(sp)
+~ep=R12
+~ehdr=R7
+~go=R6
+~sn=R5
+~nbr=-4
+~nev=-8
+~etype=-10
+~scid=-50
+~erms=-90
+*line 101
+move.l 10(R14),R13
+*line 101
+move 8(R14),R8
+add.l R8,R8
+add.l #_ldmap,R8
+move (R8),R5
+*line 103
+*line 103
+cmp #-1,R5
+bne L11
+*line 104
+*line 105
+*line 105
+move.l #$4,(sp)
+move.l R14,-(sp)
+sub.l #4,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L12
+*line 106
+*line 107
+move 8(R14),(sp)
+jsr _skperr
+*line 108
+move #-1,R0
+bra L10
+*line 109
+*line 110
+L12:
+*line 111
+*line 112
+cmp.l #$ffffffff,-4(R14)
+bne L13
+*line 112
+clr R0
+bra L10
+*line 113
+L13:
+*line 114
+*line 114
+move.l #$10,(sp)
+move.l R13,-(sp)
+jsr _skp_ec
+addq.l #4,sp
+tst R0
+beq L14
+*line 115
+*line 116
+move 8(R14),(sp)
+jsr _skperr
+*line 117
+move #-1,R0
+bra L10
+*line 118
+*line 119
+L14:
+*line 120
+move 8(R14),(sp)
+move.l R13,-(sp)
+jsr _scskip
+addq.l #4,sp
+bra L10
+*line 121
+*line 122
+*line 123
+*line 124
+L11:
+*line 125
+move #1,R6
+*line 127
+move 8(R14),(sp)
+add #1,(sp)
+move.l #L15,-(sp)
+move.l R14,-(sp)
+add.l #-50,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 128
+move R5,(sp)
+add #1,(sp)
+move.l #L16,-(sp)
+move.l R14,-(sp)
+add.l #-90,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 130
+*line 131
+move #9,(sp)
+move #12,-(sp)
+move.l R14,-(sp)
+add.l #-90,(sp)
+move.l R14,-(sp)
+add.l #-50,(sp)
+move.l #L17,-(sp)
+jsr _ldwmsg
+adda.l #14,sp
+*line 133
+*line 133
+move.l #$4,(sp)
+move.l R14,-(sp)
+sub.l #4,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L18
+*line 134
+*line 135
+clr.l (sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 136
+move #-1,R0
+bra L10
+*line 137
+*line 138
+L18:
+*line 139
+*line 139
+cmp.l #$ffffffff,-4(R14)
+bne L19
+*line 140
+*line 141
+clr R0
+bra L10
+*line 142
+*line 143
+L19:
+*line 144
+*line 145
+tst _lrasw
+beq L20
+*line 145
+move R5,(sp)
+jsr _sc_clr
+*line 146
+L20:
+*line 147
+*line 147
+jsr _evleft
+move.l R0,-8(R14)
+cmp.l -4(R14),R0
+bge L21
+*line 148
+*line 149
+move R5,(sp)
+add #1,(sp)
+move.l #L22,-(sp)
+move.l R14,-(sp)
+add.l #-50,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 150
+move.l -8(R14),(sp)
+move.l -4(R14),-(sp)
+move.l #L23,-(sp)
+move.l R14,-(sp)
+add.l #-90,(sp)
+jsr _sprintf
+adda.l #12,sp
+*line 151
+*line 152
+*line 153
+move #9,(sp)
+move #14,-(sp)
+move.l R14,-(sp)
+add.l #-90,(sp)
+move.l R14,-(sp)
+add.l #-50,(sp)
+move.l #L24,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 154
+*line 155
+move #-1,R0
+bra L10
+*line 156
+*line 157
+L21:
+*line 158
+*line 158
+move.l #$10,(sp)
+move R5,R0
+asl #4,R0
+ext.l R0
+add.l #_scname,R0
+move.l R0,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L25
+*line 159
+*line 160
+clr.l (sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 161
+move #-1,R0
+bra L10
+*line 162
+*line 163
+L25:
+*line 164
+*line 164
+move.l #$f0,(sp)
+move R5,R0
+muls #240,R0
+add.l #_stimes,R0
+move.l R0,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L26
+*line 165
+*line 166
+clr.l (sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 167
+move #-1,R0
+bra L10
+*line 168
+*line 169
+L26:
+*line 170
+*line 170
+move.l #$1,(sp)
+move.l R14,-(sp)
+add.l #-10,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L27
+*line 171
+*line 172
+clr.l (sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 173
+move #-1,R0
+bra L10
+*line 174
+*line 175
+L27:
+*line 176
+*line 176
+cmp.b #1,-10(R14)
+beq L28
+*line 177
+*line 178
+move R5,(sp)
+add #1,(sp)
+move.l #L29,-(sp)
+move.l R14,-(sp)
+add.l #-50,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 179
+*line 180
+*line 181
+move #9,(sp)
+move #14,-(sp)
+move.l R14,-(sp)
+add.l #-50,(sp)
+move.l #L31,-(sp)
+move.l #L30,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+*line 182
+*line 183
+move #-1,R0
+bra L10
+*line 184
+*line 185
+L28:
+*line 186
+*line 186
+move #5,(sp)
+jsr _e_alc
+move.l R0,R12
+move.l R12,R0
+bne L32
+*line 187
+*line 188
+move R5,(sp)
+jsr _noevent
+*line 189
+move #-1,R0
+bra L10
+*line 190
+*line 191
+L32:
+*line 192
+move.l R12,_libsp
+*line 193
+move R5,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_scores,R8
+move.l R12,(R8)
+*line 195
+move.b #1,5(R12)
+*line 197
+*line 197
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #6,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L33
+*line 198
+*line 199
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 200
+move #-1,R0
+bra L10
+*line 201
+*line 202
+L33:
+*line 203
+move.l R12,12(R12)
+*line 204
+move.l R12,8(R12)
+*line 207
+L36:
+*line 208
+*line 209
+*line 209
+move.l #$1,(sp)
+move.l R14,-(sp)
+add.l #-10,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L37
+*line 210
+*line 211
+clr.l (sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 212
+move #-1,R0
+bra L10
+*line 213
+*line 214
+L37:
+*line 215
+move.b -10(R14),R0
+ext.w R0
+bra L39
+*line 216
+L40:
+*line 217
+L41:
+*line 218
+L42:
+*line 219
+*line 220
+*line 221
+*line 221
+move #5,(sp)
+jsr _e_alc
+move.l R0,R12
+move.l R12,R0
+bne L43
+*line 222
+*line 223
+move R5,(sp)
+jsr _noevent
+*line 224
+move #-1,R0
+bra L10
+*line 225
+*line 226
+L43:
+*line 227
+move.b -10(R14),5(R12)
+*line 228
+*line 229
+*line 229
+move.l #$4,(sp)
+move.l R12,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L44
+*line 230
+*line 231
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 232
+move #-1,R0
+bra L10
+*line 233
+*line 234
+L44:
+*line 235
+move.l _libsp,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,_libsp
+bra L38
+*line 236
+*line 237
+*line 238
+L45:
+*line 239
+*line 240
+*line 241
+move #10,R7
+bra L46
+*line 242
+*line 243
+L47:
+*line 244
+*line 245
+*line 246
+move #11,R7
+bra L46
+*line 247
+*line 248
+L48:
+*line 249
+*line 250
+*line 251
+move #7,R7
+bra L46
+*line 252
+*line 253
+L49:
+*line 254
+*line 255
+*line 256
+move #8,R7
+bra L46
+*line 257
+*line 258
+L50:
+*line 259
+*line 260
+*line 261
+move #9,R7
+*line 262
+*line 263
+L46:
+*line 264
+*line 265
+*line 266
+*line 266
+move #6,(sp)
+jsr _e_alc
+move.l R0,R12
+move.l R12,R0
+bne L51
+*line 267
+*line 268
+move R5,(sp)
+jsr _noevent
+*line 269
+move #-1,R0
+bra L10
+*line 270
+*line 271
+L51:
+*line 272
+move.b -10(R14),5(R12)
+*line 273
+*line 274
+*line 274
+move.l #$4,(sp)
+move.l R12,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L52
+*line 275
+*line 276
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 277
+move #-1,R0
+bra L10
+*line 278
+*line 279
+L52:
+*line 280
+*line 280
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #6,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L53
+*line 281
+*line 282
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 283
+move #-1,R0
+bra L10
+*line 284
+*line 285
+L53:
+*line 286
+move.l _libsp,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,_libsp
+*line 287
+move R7,(sp)
+move.l R12,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 288
+*line 289
+*line 290
+cmp.b #2,-10(R14)
+bne L54
+*line 290
+move R5,R0
+muls #80,R0
+move.b 6(R12),R1
+ext.w R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+add.l #_seclist,R0
+move.l R0,R8
+move.l R12,(R8)
+*line 291
+L54:bra L38
+*line 292
+*line 293
+*line 294
+L55:
+*line 295
+L56:
+*line 296
+L57:
+*line 297
+*line 298
+*line 299
+*line 299
+move #5,(sp)
+jsr _e_alc
+move.l R0,R12
+move.l R12,R0
+bne L58
+*line 300
+*line 301
+move R5,(sp)
+jsr _noevent
+*line 302
+move #-1,R0
+bra L10
+*line 303
+*line 304
+L58:
+*line 305
+move.b -10(R14),5(R12)
+*line 306
+*line 307
+*line 307
+move.l #$4,(sp)
+move.l R12,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L59
+*line 308
+*line 309
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 310
+move #-1,R0
+bra L10
+*line 311
+*line 312
+L59:
+*line 313
+*line 313
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #6,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L60
+*line 314
+*line 315
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 316
+move #-1,R0
+bra L10
+*line 317
+*line 318
+L60:
+*line 319
+move.l _libsp,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,_libsp
+bra L38
+*line 320
+*line 321
+*line 322
+L61:
+*line 323
+L62:
+*line 324
+*line 325
+*line 326
+*line 326
+move #5,(sp)
+jsr _e_alc
+move.l R0,R12
+move.l R12,R0
+bne L63
+*line 327
+*line 328
+move R5,(sp)
+jsr _noevent
+*line 329
+move #-1,R0
+bra L10
+*line 330
+*line 331
+L63:
+*line 332
+move.b -10(R14),5(R12)
+*line 333
+*line 334
+*line 334
+move.l #$4,(sp)
+move.l R12,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L64
+*line 335
+*line 336
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 337
+move #-1,R0
+bra L10
+*line 338
+*line 339
+L64:
+*line 340
+*line 340
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #6,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L65
+*line 341
+*line 342
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 343
+move #-1,R0
+bra L10
+*line 344
+*line 345
+L65:
+*line 346
+*line 346
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #7,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L66
+*line 347
+*line 348
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 349
+move #-1,R0
+bra L10
+*line 350
+*line 351
+L66:
+*line 352
+*line 352
+move.l #$2,(sp)
+move.l R12,-(sp)
+add.l #16,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L67
+*line 353
+*line 354
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 355
+move #-1,R0
+bra L10
+*line 356
+*line 357
+L67:
+*line 358
+move.l _libsp,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,_libsp
+bra L38
+*line 359
+*line 360
+*line 361
+L68:
+*line 362
+*line 363
+*line 364
+*line 364
+move #5,(sp)
+jsr _e_alc
+move.l R0,R12
+move.l R12,R0
+bne L69
+*line 365
+*line 366
+move R5,(sp)
+jsr _noevent
+*line 367
+move #-1,R0
+bra L10
+*line 368
+*line 369
+L69:
+*line 370
+move.b -10(R14),5(R12)
+*line 371
+*line 372
+*line 372
+move.l #$4,(sp)
+move.l R12,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L70
+*line 373
+*line 374
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 375
+move #-1,R0
+bra L10
+*line 376
+*line 377
+L70:
+*line 378
+*line 378
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #6,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L71
+*line 379
+*line 380
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 381
+move #-1,R0
+bra L10
+*line 382
+*line 383
+L71:
+*line 384
+*line 384
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #7,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L72
+*line 385
+*line 386
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 387
+move #-1,R0
+bra L10
+*line 388
+*line 389
+L72:
+*line 390
+move.l _libsp,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,_libsp
+bra L38
+*line 391
+*line 392
+*line 393
+L73:
+*line 394
+*line 395
+*line 396
+*line 396
+move #5,(sp)
+jsr _e_alc
+move.l R0,R12
+move.l R12,R0
+bne L74
+*line 397
+*line 398
+move R5,(sp)
+jsr _noevent
+*line 399
+move #-1,R0
+bra L10
+*line 400
+*line 401
+L74:
+*line 402
+move.b -10(R14),5(R12)
+*line 403
+*line 404
+*line 404
+move.l #$4,(sp)
+move.l R12,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L75
+*line 405
+*line 406
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 407
+move #-1,R0
+bra L10
+*line 408
+*line 409
+L75:
+*line 410
+*line 410
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #6,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L76
+*line 411
+*line 412
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 413
+move #-1,R0
+bra L10
+*line 414
+*line 415
+L76:
+*line 416
+*line 416
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #7,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L77
+*line 417
+*line 418
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 419
+move #-1,R0
+bra L10
+*line 420
+*line 421
+L77:
+*line 422
+move.l _libsp,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,_libsp
+bra L38
+*line 423
+*line 424
+*line 425
+*line 426
+L78:
+*line 427
+*line 428
+*line 429
+clr R7
+bra L79
+*line 430
+*line 431
+L80:
+*line 432
+*line 433
+*line 434
+move #6,R7
+bra L79
+*line 435
+*line 436
+L81:
+*line 437
+*line 438
+*line 439
+move #1,R7
+bra L79
+*line 440
+*line 441
+L82:
+*line 442
+*line 443
+*line 444
+move #2,R7
+bra L79
+*line 445
+*line 446
+L83:
+*line 447
+*line 448
+*line 449
+move #3,R7
+bra L79
+*line 450
+*line 451
+L84:
+*line 452
+*line 453
+*line 454
+move #4,R7
+*line 455
+*line 456
+L79:
+*line 457
+*line 458
+*line 459
+*line 459
+move #6,(sp)
+jsr _e_alc
+move.l R0,R12
+move.l R12,R0
+bne L85
+*line 460
+*line 461
+move R5,(sp)
+jsr _noevent
+*line 462
+move #-1,R0
+bra L10
+*line 463
+*line 464
+L85:
+*line 465
+move.b -10(R14),5(R12)
+*line 466
+*line 467
+*line 467
+move.l #$4,(sp)
+move.l R12,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L86
+*line 468
+*line 469
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 470
+move #-1,R0
+bra L10
+*line 471
+*line 472
+L86:
+*line 473
+*line 473
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #6,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L87
+*line 474
+*line 475
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 476
+move #-1,R0
+bra L10
+*line 477
+*line 478
+L87:
+*line 479
+*line 479
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #7,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L88
+*line 480
+*line 481
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 482
+move #-1,R0
+bra L10
+*line 483
+*line 484
+L88:
+*line 485
+move.l _libsp,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,_libsp
+*line 486
+move R7,(sp)
+move.l R12,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+bra L38
+*line 487
+*line 488
+*line 489
+L89:
+*line 490
+*line 491
+*line 492
+*line 492
+move #8,(sp)
+jsr _e_alc
+move.l R0,R12
+move.l R12,R0
+bne L90
+*line 493
+*line 494
+move R5,(sp)
+jsr _noevent
+*line 495
+move #-1,R0
+bra L10
+*line 496
+*line 497
+L90:
+*line 498
+move.b -10(R14),5(R12)
+*line 499
+*line 500
+*line 500
+move.l #$4,(sp)
+move.l R12,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L91
+*line 501
+*line 502
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 503
+move #-1,R0
+bra L10
+*line 504
+*line 505
+L91:
+*line 506
+*line 506
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #6,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L92
+*line 507
+*line 508
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 509
+move #-1,R0
+bra L10
+*line 510
+*line 511
+L92:
+*line 512
+*line 512
+move.l #$2,(sp)
+move.l R12,-(sp)
+add.l #24,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L93
+*line 513
+*line 514
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 515
+move #-1,R0
+bra L10
+*line 516
+*line 517
+L93:
+*line 518
+move.l _libsp,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,_libsp
+*line 519
+move #6,(sp)
+move.l R12,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+bra L38
+*line 520
+*line 521
+*line 522
+L94:
+*line 523
+*line 524
+*line 525
+*line 525
+move #6,(sp)
+jsr _e_alc
+move.l R0,R12
+move.l R12,R0
+bne L95
+*line 526
+*line 527
+move R5,(sp)
+jsr _noevent
+*line 528
+move #-1,R0
+bra L10
+*line 529
+*line 530
+L95:
+*line 531
+move.b -10(R14),5(R12)
+*line 532
+*line 533
+*line 533
+move.l #$4,(sp)
+move.l R12,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L96
+*line 534
+*line 535
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 536
+move #-1,R0
+bra L10
+*line 537
+*line 538
+L96:
+*line 539
+*line 539
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #6,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L97
+*line 540
+*line 541
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 542
+move #-1,R0
+bra L10
+*line 543
+*line 544
+L97:
+*line 545
+clr.l 16(R12)
+*line 546
+*line 547
+*line 547
+move.l #$2,(sp)
+move.l R12,-(sp)
+add.l #16,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L98
+*line 548
+*line 549
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 550
+move #-1,R0
+bra L10
+*line 551
+*line 552
+L98:
+*line 553
+move.l _libsp,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,_libsp
+bra L38
+*line 554
+*line 555
+*line 556
+L99:
+*line 557
+*line 558
+*line 559
+*line 559
+move #5,(sp)
+jsr _e_alc
+move.l R0,R12
+move.l R12,R0
+bne L100
+*line 560
+*line 561
+move R5,(sp)
+jsr _noevent
+*line 562
+move #-1,R0
+bra L10
+*line 563
+*line 564
+L100:
+*line 565
+move.b -10(R14),5(R12)
+*line 566
+*line 567
+*line 567
+move.l #$4,(sp)
+move.l R12,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L101
+*line 568
+*line 569
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 570
+move #-1,R0
+bra L10
+*line 571
+*line 572
+L101:
+*line 573
+*line 573
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #6,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L102
+*line 574
+*line 575
+move.l R12,(sp)
+move R5,-(sp)
+jsr _scioerr
+addq.l #2,sp
+*line 576
+move #-1,R0
+bra L10
+*line 577
+*line 578
+L102:
+*line 579
+move.l _libsp,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,_libsp
+*line 580
+clr R6
+bra L38
+L39:sub #1,R0
+cmp #23,R0
+bhi L38
+asl #2,R0
+move R0,R8
+add.l #L103,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L103:.dc.l L55
+.dc.l L45
+.dc.l L47
+.dc.l L78
+.dc.l L61
+.dc.l L62
+.dc.l L41
+.dc.l L80
+.dc.l L48
+.dc.l L49
+.dc.l L81
+.dc.l L82
+.dc.l L83
+.dc.l L94
+.dc.l L84
+.dc.l L50
+.dc.l L89
+.dc.l L56
+.dc.l L57
+.dc.l L68
+.dc.l L99
+.dc.l L73
+.dc.l L40
+.dc.l L42
+.text
+L38:
+*line 581
+*line 582
+L35:
+*line 583
+tst R6
+bne L36
+L34:
+*line 585
+clr R0
+bra L10
+L10:tst.l (sp)+
+movem.l (sp)+,R5-R7/R12-R13
+unlk R14
+rts
+.data
+L3:.dc.b $20,$20,$73,$63,$6F,$72,$65,$20,$25,$64,$0
+L4:.dc.b $20,$20,$65,$72,$72,$6E,$6F,$20,$3D,$20,$25,$64,$0
+L5:.dc.b $43,$6F,$75,$6C,$64,$6E,$27,$74,$20,$72,$65,$61,$64,$0
+L7:.dc.b $20,$20,$73,$63,$6F,$72,$65,$20,$25,$64,$0
+L8:.dc.b $43,$6F,$75,$6C,$64,$6E,$27,$74,$20,$72,$65,$61,$64,$0
+L9:.dc.b $20,$20,$52,$61,$6E,$20,$6F,$75,$74,$20,$6F,$66,$20,$73,$70,$61,$63,$65,$0
+L15:.dc.b $20,$20,$52,$65,$61,$64,$69,$6E,$67,$20,$73,$63,$6F,$72,$65,$20,$25,$32,$64,$0
+L16:.dc.b $20,$20,$20,$20,$20,$20,$20,$61,$73,$20,$73,$63,$6F,$72,$65,$20,$25,$32,$64,$0
+L17:.dc.b $20,$42,$75,$73,$79,$20,$2D,$2D,$20,$70,$6C,$65,$61,$73,$65,$20,$73,$74,$61,$6E,$64,$20,$62,$79,$0
+L22:.dc.b $20,$20,$73,$63,$6F,$72,$65,$20,$25,$64,$20,$2D,$20,$6E,$6F,$20,$73,$70,$61,$63,$65,$0
+L23:.dc.b $20,$20,$4E,$65,$65,$64,$20,$25,$6C,$64,$2C,$20,$48,$61,$76,$65,$20,$25,$6C,$64,$0
+L24:.dc.b $43,$6F,$75,$6C,$64,$6E,$27,$74,$20,$72,$65,$61,$64,$0
+L29:.dc.b $20,$20,$73,$63,$6F,$72,$65,$20,$25,$64,$0
+L30:.dc.b $42,$61,$64,$20,$73,$63,$6F,$72,$65,$20,$2D,$2D,$0
+L31:.dc.b $20,$20,$31,$73,$74,$20,$65,$76,$65,$6E,$74,$20,$69,$73,$20,$77,$72,$6F,$6E,$67,$0
Index: alcyon/scselbx.s
===================================================================
--- alcyon/scselbx.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/scselbx.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,4756 @@
+.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 _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _v_obtab
+.globl _v_curob
+.globl _v_nobj
+.globl _v_obpri
+.globl _lcdx
+.globl _lcdy
+.globl _lcdbit
+.globl _lcdrow
+.globl _lcdcol
+.globl _lcdbase
+.globl _lcdctl1
+.globl _lcdctl2
+.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 _secopok
+.globl _t_sbgn
+.globl _t_send
+.globl _t_sect
+.globl _t_sec1
+.globl _t_sec2
+.globl _t_cbgn
+.globl _t_cend
+.globl _p_sbgn
+.globl _p_send
+.globl _p_sec1
+.globl _p_sec2
+.globl _p_cbgn
+.globl _p_cend
+.globl _itxput
+.globl _point
+.globl _ancmsw
+.globl _angroup
+.globl _asmode
+.globl _clkrun
+.globl _clkctl
+.globl _clksrc
+.globl _ctrsw
+.globl _cxval
+.globl _cyval
+.globl _dubsw
+.globl _gomode
+.globl _grptran
+.globl _gtmsel
+.globl _hitbox
+.globl _hitcx
+.globl _hitcy
+.globl _insmode
+.globl _ismode
+.globl _lastam
+.globl _midiclk
+.globl _noteop
+.globl _notesel
+.globl _oldpk
+.globl _oldsl
+.globl _pchsw
+.globl _pkctrl
+.globl _pulsclk
+.globl _recsw
+.globl _scmctl
+.globl _sdmcol
+.globl _sdmctl
+.globl _sdmrow
+.globl _secop
+.globl _sgoflag
+.globl _sliders
+.globl _stccol
+.globl _stcrow
+.globl _stepclk
+.globl _stepenb
+.globl _submenu
+.globl _velflag
+.globl _vtccol
+.globl _vtcrow
+.globl _grptmap
+.globl _sctctab
+.globl _asgtab
+.globl _csbp
+.globl _curboxp
+.globl _stimes
+.globl _obj8
+.globl _obj11
+.globl _swpt
+.globl _oldsw
+.globl _t_ngrp
+.globl _bfs
+.globl _tunname
+.globl _gdstbc
+.globl _sdmenus
+.data
+_sdmenus:
+*line 122
+.dc.l L1
+*line 123
+.dc.l L2
+*line 124
+.dc.l L3
+*line 128
+.dc.l L4
+*line 129
+.dc.l L5
+*line 130
+.dc.l L6
+*line 134
+.dc.l L7
+*line 135
+.dc.l L8
+*line 136
+.dc.l L9
+*line 140
+.dc.l L10
+*line 141
+.dc.l L11
+*line 142
+.dc.l L12
+*line 146
+.dc.l L13
+*line 147
+.dc.l L14
+*line 148
+.dc.l L15
+.globl _sdmln3
+.data
+_sdmln3:
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$52,$65,$47,$72,$70,$20,$20,$52,$65,$6D,$6F,$76,$65,$20,$54,$72,$6E,$20,$53,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$0
+.even
+.globl _sdmln4
+.data
+_sdmln4:
+.dc.b $45,$73,$63,$61,$70,$65,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$44,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$0
+.even
+.globl _sdmht
+.data
+_sdmht:
+.dc.w $6
+.dc.w $0
+.dc.w $0
+.dc.w $3
+.dc.w $1
+.dc.w $4
+.dc.w $4
+.dc.w $1
+.dc.w $5
+.dc.w $5
+.dc.w $1
+.dc.w $3
+.dc.w $3
+.dc.w $8
+.dc.w $B
+.dc.w $4
+.dc.w $8
+.dc.w $B
+.dc.w $5
+.dc.w $8
+.dc.w $C
+.dc.w $3
+.dc.w $F
+.dc.w $13
+.dc.w $4
+.dc.w $F
+.dc.w $17
+.dc.w $5
+.dc.w $F
+.dc.w $17
+.dc.w $6
+.dc.w $F
+.dc.w $14
+.dc.w $6
+.dc.w $8
+.dc.w $C
+.globl _sdmlim
+.data
+_sdmlim:
+.dc.w $13
+.dc.w $1
+.dc.w $15
+.dc.w $1E
+.dc.w $13
+.dc.w $1
+.dc.w $15
+.dc.w $1E
+.dc.w $13
+.dc.w $1
+.dc.w $15
+.dc.w $14
+.dc.w $13
+.dc.w $1
+.dc.w $15
+.dc.w $13
+.dc.w $13
+.dc.w $1
+.dc.w $17
+.dc.w $3E
+.globl _nedlbl
+.data
+_nedlbl:
+*line 194
+.dc.l L18
+*line 195
+.dc.l L19
+*line 196
+.dc.l L20
+*line 197
+.dc.l L21
+*line 198
+.dc.l L22
+*line 199
+.dc.l L23
+*line 201
+.dc.l L24
+.globl _sdboxes
+.data
+_sdboxes:
+.dc.w $0
+.dc.w $0
+.dc.w $AF
+.dc.w $D
+.dc.w $0
+*line 208
+.dc.l _sdboxfn
+.dc.w $B0
+.dc.w $0
+.dc.w $E7
+.dc.w $D
+.dc.w $1
+*line 209
+.dc.l _sdboxfn
+.dc.w $E8
+.dc.w $0
+.dc.w $1B7
+.dc.w $D
+.dc.w $2
+*line 210
+.dc.l _sdboxfn
+.dc.w $1B8
+.dc.w $0
+.dc.w $1FF
+.dc.w $D
+.dc.w $3
+*line 211
+.dc.l _sdboxfn
+.dc.w $0
+.dc.w $EE
+.dc.w $6F
+.dc.w $FB
+.dc.w $4
+*line 213
+.dc.l _sdboxfn
+.dc.w $70
+.dc.w $EE
+.dc.w $A7
+.dc.w $FB
+.dc.w $5
+*line 214
+.dc.l _sdboxfn
+.dc.w $A8
+.dc.w $EE
+.dc.w $F7
+.dc.w $FB
+.dc.w $6
+*line 215
+.dc.l _enterit
+.dc.w $F8
+.dc.w $EE
+.dc.w $13F
+.dc.w $FB
+.dc.w $7
+*line 216
+.dc.l _enterit
+.dc.w $140
+.dc.w $EE
+.dc.w $18E
+.dc.w $FB
+.dc.w $8
+*line 217
+.dc.l _sdboxfn
+.dc.w $190
+.dc.w $EE
+.dc.w $1C7
+.dc.w $FB
+.dc.w $9
+*line 218
+.dc.l _sdboxfn
+.dc.w $1C8
+.dc.w $EE
+.dc.w $1FF
+.dc.w $FB
+.dc.w $A
+*line 219
+.dc.l _sdboxfn
+.dc.w $0
+.dc.w $FC
+.dc.w $1FF
+.dc.w $133
+.dc.w $B
+*line 221
+.dc.l _sdboxfn
+.dc.w $0
+.dc.w $134
+.dc.w $1FF
+.dc.w $14F
+.dc.w $C
+*line 223
+.dc.l _sdboxfn
+.dc.w $0
+.dc.w $150
+.dc.w $D7
+.dc.w $15D
+.dc.w $D
+*line 225
+.dc.l _sdboxfn
+.dc.w $D8
+.dc.w $150
+.dc.w $1C7
+.dc.w $15D
+.dc.w $E
+*line 226
+.dc.l _sdboxfn
+.dc.w $1C8
+.dc.w $150
+.dc.w $1FF
+.dc.w $15D
+.dc.w $F
+*line 227
+.dc.l _sdboxfn
+.dc.w $0
+.dc.w $E
+.dc.w $1FF
+.dc.w $ED
+.dc.w $10
+*line 229
+.dc.l _sdboxfn
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.l $0
+.globl _insect
+.text
+_insect:
+~~insect:
+link R14,#0
+movem.l R6-R7,-(sp)
+~col=R7
+*line 248
+move _vtccol,R7
+add #-24,R7
+*line 250
+*line 251
+tst R7
+bge L26
+*line 251
+move #-1,R0
+bra L25
+*line 252
+L26:
+*line 253
+move R7,R0
+and #3,R0
+move R0,_sgoflag
+*line 255
+*line 256
+cmp #19,_vtcrow
+blt L10000
+cmp #20,_vtcrow
+ble L27
+L10000:*line 256
+move #-1,R0
+bra L25
+*line 257
+L27:
+*line 258
+move R7,R0
+asr #2,R0
+move _vtcrow,R1
+add #-19,R1
+muls #10,R1
+add R1,R0
+bra L25
+L25:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _svtdsp
+.text
+_svtdsp:
+~~svtdsp:
+~obj=8
+~fg=12
+~bg=14
+~row=16
+~col=18
+~buf=20
+link R14,#-4
+*line 273
+*line 274
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L29
+*line 274
+clr (sp)
+jsr _vbank
+*line 275
+L29:
+*line 276
+move #19,(sp)
+move.l 20(R14),-(sp)
+move 18(R14),-(sp)
+move 16(R14),-(sp)
+add #-16,(sp)
+move.l 8(R14),-(sp)
+jsr _vputs
+adda.l #12,sp
+L28:unlk R14
+rts
+.globl _svtstop
+.text
+_svtstop:
+~~svtstop:
+link R14,#-4
+*line 290
+move #-1,(sp)
+jsr _sdmenu
+L30:unlk R14
+rts
+.globl _bspscur
+.text
+_bspscur:
+~~bspscur:
+link R14,#0
+movem.l R6-R7,-(sp)
+~newcol=R7
+*line 303
+*line 304
+move.l _curfet,(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+jsr _infield
+addq.l #4,sp
+tst R0
+beq L32
+*line 304
+move.l _infetp,_cfetp
+*line 305
+bra L33
+L32:bra L31
+L33:
+*line 308
+move _stccol,R7
+sub #1,R7
+*line 310
+*line 311
+move.l _cfetp,R8
+cmp 2(R8),R7
+blt L34
+*line 311
+move R7,(sp)
+move _stcrow,-(sp)
+jsr _stcpos
+addq.l #2,sp
+*line 312
+L34:
+*line 313
+move _stccol,R0
+asl #3,R0
+move R0,_cxval
+*line 314
+move _stcrow,R0
+muls #14,R0
+move R0,_cyval
+L31:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _dsects
+.text
+_dsects:
+~~dsects:
+link R14,#-18
+movem.l R2-R7/R13-R13,-(sp)
+~atr=R7
+~row=R6
+~col=R5
+~i=R4
+~j=R3
+~buf=-8
+~cl=-10
+~cr=-12
+~csl=-14
+~csr=-16
+~begun=-18
+~sp=R13
+*line 336
+*line 337
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L36
+*line 337
+clr (sp)
+jsr _vbank
+*line 338
+L36:
+*line 339
+move #3,R6
+*line 341
+clr R4
+bra L39
+L40:
+*line 342
+*line 343
+move #24,R5
+*line 344
+*line 345
+clr R3
+bra L43
+L44:
+*line 346
+*line 347
+*line 347
+move _curscor,R0
+muls #240,R0
+move R4,R1
+add R3,R1
+muls #12,R1
+add.l R1,R0
+move.l R0,R8
+move.l #_stimes,R9
+tst 0(R8,R9.l)
+beq L45
+*line 348
+*line 349
+move.b #91,-14(R14)
+*line 350
+move.b #93,-16(R14)
+*line 351
+bra L46
+L45:
+*line 352
+*line 353
+*line 354
+move.b #123,-14(R14)
+*line 355
+move.b #125,-16(R14)
+L46:
+*line 356
+*line 357
+*line 358
+move.b #32,-10(R14)
+*line 359
+move.b #32,-12(R14)
+*line 360
+*line 361
+*line 361
+move _curscor,R0
+muls #80,R0
+move R4,R1
+add R3,R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+add.l #_seclist,R0
+move.l R0,R8
+tst.l (R8)
+beq L47
+*line 362
+*line 363
+move #1,-18(R14)
+*line 364
+move #84,R7
+*line 365
+move.b -14(R14),-10(R14)
+*line 366
+bra L48
+L47:
+*line 367
+*line 368
+*line 369
+clr -18(R14)
+*line 370
+move #20,R7
+L48:
+*line 371
+*line 372
+*line 373
+move _curscor,R0
+muls #48,R0
+add.l #_hplist,R0
+move.l R0,R8
+move.l 44(R8),R13
+*line 374
+*line 375
+bra L51
+L50:
+*line 376
+*line 377
+*line 377
+move R4,R0
+add R3,R0
+move.b 6(R13),R1
+ext.w R1
+cmp R1,R0
+bne L52
+*line 378
+*line 379
+tst -18(R14)
+beq L10001
+move.b -16(R14),R0
+ext.w R0
+bra L10003
+L10001:move #125,R0
+L10003:move.b R0,-12(R14)
+bra L49
+*line 380
+*line 381
+*line 382
+L52:
+*line 383
+move.l 20(R13),R13
+L51:
+*line 384
+move.l R13,R0
+bne L50
+L49:
+*line 385
+*line 386
+move.b -12(R14),R0
+ext.w R0
+move R0,(sp) 
+move R4,-(sp)
+move R3,R0
+add R0,(sp)
+add #1,(sp)
+move.b -10(R14),R0
+ext.w R0
+move R0,-(sp) 
+move.l #L53,-(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+jsr _sprintf
+adda.l #12,sp
+*line 387
+*line 388
+move R7,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move R5,-(sp)
+move R6,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 389
+add #4,R5
+L42:
+*line 345
+add #1,R3
+L43:
+*line 345
+cmp #10,R3
+blt L44
+L41:
+*line 390
+*line 391
+*line 392
+add #1,R6
+L38:
+*line 341
+add #10,R4
+L39:
+*line 341
+cmp #20,R4
+blt L40
+L37:L35:tst.l (sp)+
+movem.l (sp)+,R3-R7/R13-R13
+unlk R14
+rts
+.globl _dsgtmn
+.text
+_dsgtmn:
+~~dsgtmn:
+~n=8
+~f=10
+link R14,#-12
+~buf=-4
+~atr=-6
+~col=-8
+*line 411
+move 8(R14),(sp)
+add #1,(sp)
+move.l #L55,-(sp)
+move.l R14,-(sp)
+sub.l #4,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 413
+move 8(R14),R0
+muls #3,R0
+add #28,R0
+move R0,-8(R14)
+*line 414
+tst 10(R14)
+beq L10004
+move #84,R0
+bra L10006
+L10004:move #20,R0
+L10006:move R0,-6(R14)
+*line 416
+*line 417
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L56
+*line 417
+clr (sp)
+jsr _vbank
+*line 418
+L56:
+*line 419
+move -6(R14),(sp)
+move.l R14,-(sp)
+sub.l #4,(sp)
+move -8(R14),-(sp)
+move #6,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+L54:unlk R14
+rts
+.globl _dsgtme
+.text
+_dsgtme:
+~~dsgtme:
+~n=8
+link R14,#-10
+~buf=-4
+~col=-6
+*line 434
+*line 435
+move 8(R14),R8
+add.l R8,R8
+add.l #_grptmap,R8
+cmp #-1,(R8)
+bne L58
+*line 435
+move.l #L59,(sp)
+move.l R14,-(sp)
+sub.l #4,(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 436
+bra L60
+L58:
+*line 437
+move 8(R14),R8
+add.l R8,R8
+move.l #_grptmap,R9
+move 0(R8,R9.l),(sp)
+add #1,(sp)
+move.l #L61,-(sp)
+move.l R14,-(sp)
+sub.l #4,(sp)
+jsr _sprintf
+addq.l #8,sp
+L60:
+*line 439
+move 8(R14),R0
+muls #3,R0
+add #28,R0
+move R0,-6(R14)
+*line 441
+*line 442
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L62
+*line 442
+clr (sp)
+jsr _vbank
+*line 443
+L62:
+*line 444
+move #20,(sp)
+move.l R14,-(sp)
+sub.l #4,(sp)
+move -6(R14),-(sp)
+move #7,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+L57:unlk R14
+rts
+.globl _dsgtmap
+.text
+_dsgtmap:
+~~dsgtmap:
+link R14,#-6
+movem.l R6-R7,-(sp)
+~buf=-6
+~i=R7
+*line 461
+*line 462
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L64
+*line 462
+clr (sp)
+jsr _vbank
+*line 463
+L64:
+*line 464
+tst _grptran
+bge L10007
+move _grptran,R0
+neg R0
+move R0,(sp)
+bra L10009
+L10007:move _grptran,(sp)
+L10009:tst _grptran
+bge L10010
+move #45,-(sp)
+bra L10012
+L10010:move #43,-(sp)
+L10012:move.l #L65,-(sp)
+move.l R14,-(sp)
+sub.l #6,(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 466
+move #20,(sp)
+move.l R14,-(sp)
+sub.l #6,(sp)
+move #22,-(sp)
+move #7,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 468
+clr R7
+bra L68
+L69:
+*line 469
+*line 470
+cmp _gtmsel,R7
+beq L10013
+clr (sp)
+bra L10014
+L10013:move #1,(sp)
+L10014:move R7,-(sp)
+jsr _dsgtmn
+addq.l #2,sp
+*line 471
+move R7,(sp)
+jsr _dsgtme
+L67:
+*line 468
+add #1,R7
+L68:
+*line 468
+cmp #12,R7
+blt L69
+L66:L63:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _ingroup
+.text
+_ingroup:
+~~ingroup:
+link R14,#0
+movem.l R6-R7,-(sp)
+~col=R7
+*line 486
+move _vtccol,R7
+add #-28,R7
+*line 488
+*line 489
+tst R7
+bge L71
+*line 489
+move #-1,R0
+bra L70
+*line 490
+L71:
+*line 491
+*line 492
+move R7,R0
+ext.l R0
+divs #3,R0
+swap R0
+cmp #2,R0
+bne L72
+*line 492
+move #-1,R0
+bra L70
+*line 493
+L72:
+*line 494
+move R7,R0
+ext.l R0
+divs #3,R0
+bra L70
+L70:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _sdmtxt
+.text
+_sdmtxt:
+~~sdmtxt:
+~row=8
+~col=10
+~txt=12
+~tag=16
+link R14,#-4
+*line 511
+*line 512
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+cmp #256,R0
+beq L74
+*line 512
+move #1,(sp)
+jsr _vbank
+*line 513
+L74:
+*line 514
+move #14,(sp)
+move.l 12(R14),-(sp)
+move 10(R14),-(sp)
+move 8(R14),-(sp)
+move #2,-(sp)
+move #1,-(sp)
+move #64,-(sp)
+move.l _obj11,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+L73:unlk R14
+rts
+.globl _showam
+.text
+_showam:
+~~showam:
+~asg=R7
+link R14,#0
+movem.l R3-R7,-(sp)
+~col=R6
+~na=R5
+~row=R4
+*line 531
+move 8(R14),R7
+*line 531
+*line 532
+cmp #1,R7
+bne L76
+*line 532
+move #48,R5
+*line 533
+bra L77
+L76:
+*line 534
+move #100,R5
+L77:
+*line 536
+move #2,R6
+bra L80
+L81:
+*line 537
+*line 538
+*line 539
+cmp R5,R7
+bge L75
+*line 540
+*line 541
+clr -(sp)
+move.l #L82,-(sp)
+move R6,-(sp)
+clr -(sp)
+move.l _itxput,R8
+jsr (R8)
+adda.l #10,sp
+*line 542
+*line 543
+move #1,R4
+bra L85
+L86:
+*line 544
+*line 545
+*line 546
+cmp R5,R7
+bge L75
+*line 547
+*line 548
+move R7,R0
+muls #332,R0
+add.l #_asgtab,R0
+move.l R0,(sp)
+add.l #316,(sp)
+move R7,-(sp)
+move.l #L87,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 549
+move #1,-(sp)
+move.l #_bfs,-(sp)
+move R6,-(sp)
+move R4,-(sp)
+move.l _itxput,R8
+jsr (R8)
+adda.l #10,sp
+*line 550
+add #1,R7
+L84:
+*line 543
+add #1,R4
+L85:
+*line 543
+cmp #15,R4
+blt L86
+L83:
+*line 551
+L79:
+*line 536
+add #15,R6
+L80:
+*line 536
+cmp #60,R6
+blt L81
+L78:L75:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _showtm
+.text
+_showtm:
+~~showtm:
+link R14,#0
+movem.l R5-R7,-(sp)
+~row=R7
+~tun=R6
+*line 568
+clr R6
+*line 570
+clr -(sp)
+move.l #L89,-(sp)
+clr -(sp)
+clr -(sp)
+move.l _itxput,R8
+jsr (R8)
+adda.l #10,sp
+*line 572
+move #1,R7
+bra L92
+L93:
+*line 573
+*line 574
+move R6,R0
+asl #5,R0
+ext.l R0
+add.l #_tunname,R0
+move.l R0,(sp)
+move R6,-(sp)
+move.l #L94,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 575
+move #1,-(sp)
+move.l #_bfs,-(sp)
+clr -(sp)
+move R7,-(sp)
+move.l _itxput,R8
+jsr (R8)
+adda.l #10,sp
+*line 576
+add #1,R6
+L91:
+*line 572
+add #1,R7
+L92:
+*line 572
+cmp #11,R7
+blt L93
+L90:L88:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _showsm
+.text
+_showsm:
+~~showsm:
+link R14,#0
+movem.l R4-R7,-(sp)
+~col=R7
+~row=R6
+~scr=R5
+*line 593
+move #1,R5
+*line 595
+move #1,R7
+bra L98
+L99:
+*line 596
+*line 597
+*line 598
+cmp #20,R5
+bgt L95
+*line 599
+*line 600
+clr -(sp)
+move.l #L100,-(sp)
+move R7,-(sp)
+clr -(sp)
+move.l _itxput,R8
+jsr (R8)
+adda.l #10,sp
+*line 601
+*line 602
+move #1,R6
+bra L103
+L104:
+*line 603
+*line 604
+*line 605
+cmp #20,R5
+bgt L95
+*line 606
+*line 607
+move R5,R0
+sub #1,R0
+asl #4,R0
+ext.l R0
+add.l #_scname,R0
+move.l R0,(sp)
+move R5,-(sp)
+move.l #L105,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 608
+move #1,-(sp)
+move.l #_bfs,-(sp)
+move R7,-(sp)
+move R6,-(sp)
+move.l _itxput,R8
+jsr (R8)
+adda.l #10,sp
+*line 609
+add #1,R5
+L102:
+*line 602
+add #1,R6
+L103:
+*line 602
+cmp #15,R6
+blt L104
+L101:
+*line 610
+L97:
+*line 595
+add #22,R7
+L98:
+*line 595
+cmp #46,R7
+blt L99
+L96:L95:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _scmenu
+.text
+_scmenu:
+~~scmenu:
+~n=R7
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~i=R6
+~op=R13
+*line 629
+move 8(R14),R7
+*line 629
+*line 629
+tst R7
+blt L107
+*line 630
+*line 631
+move.l #_sdmtxt,_itxput
+*line 632
+*line 633
+clr (sp)
+jsr _vbank
+*line 634
+*line 635
+or #16,_v_odtab
+*line 636
+clr (sp)
+jsr _objclr
+*line 637
+*line 638
+or #16,8+_v_odtab
+*line 639
+move #1,(sp)
+jsr _objclr
+*line 640
+*line 641
+or #16,16+_v_odtab
+*line 642
+move #2,(sp)
+jsr _objclr
+*line 643
+*line 644
+move #1,(sp)
+jsr _vbank
+*line 645
+move #2,(sp)
+jsr _exp_c
+move R0,(sp)
+move #223,-(sp)
+move #511,-(sp)
+clr -(sp)
+clr -(sp)
+move #128,-(sp)
+move.l _obj11,-(sp)
+jsr _vbfill4
+adda.l #14,sp
+*line 646
+*line 647
+clr (sp)
+jsr _vbank
+*line 648
+move #4,(sp)
+move #11,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 649
+*line 650
+move R7,R0
+bra L109
+*line 651
+L110:
+*line 652
+*line 653
+*line 654
+jsr _showim
+bra L108
+*line 655
+*line 656
+L111:
+*line 657
+*line 658
+*line 659
+move _lastam,(sp)
+jsr _showam
+*line 660
+move #11,(sp)
+move #17,-(sp)
+jsr _stcpos
+addq.l #2,sp
+*line 661
+*line 662
+move #88,_cxval
+*line 663
+move #238,_cyval
+*line 664
+*line 665
+*line 666
+move.l _curfet,(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+jsr _infield
+addq.l #4,sp
+tst R0
+beq L112
+*line 666
+move.l _infetp,_cfetp
+*line 667
+L112:bra L108
+*line 668
+*line 669
+L113:
+*line 670
+*line 671
+*line 672
+jsr _showtm
+*line 673
+move #19,(sp)
+move #17,-(sp)
+jsr _stcpos
+addq.l #2,sp
+*line 674
+*line 675
+move #152,_cxval
+*line 676
+move #238,_cyval
+*line 677
+*line 678
+*line 679
+move.l _curfet,(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+jsr _infield
+addq.l #4,sp
+tst R0
+beq L114
+*line 679
+move.l _infetp,_cfetp
+*line 680
+L114:bra L108
+*line 681
+*line 682
+L115:
+*line 683
+*line 684
+*line 685
+jsr _showsm
+*line 686
+move #7,(sp)
+move #24,-(sp)
+jsr _stcpos
+addq.l #2,sp
+*line 687
+*line 688
+move #56,_cxval
+*line 689
+move #336,_cyval
+*line 690
+*line 691
+*line 692
+move.l _curfet,(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+jsr _infield
+addq.l #4,sp
+tst R0
+beq L116
+*line 692
+move.l _infetp,_cfetp
+*line 693
+L116:bra L108
+*line 694
+*line 695
+L117:
+*line 696
+*line 697
+bra L108
+*line 698
+bra L108
+L109:tst R0
+beq L110
+cmp #1,R0
+beq L111
+cmp #2,R0
+beq L113
+cmp #3,R0
+beq L115
+bra L117
+L108:
+*line 699
+*line 700
+bra L118
+L107:
+*line 701
+*line 702
+*line 703
+clr (sp)
+jsr _vbank
+*line 704
+*line 705
+or #16,32+_v_odtab
+*line 706
+move #4,(sp)
+jsr _objclr
+*line 707
+*line 708
+move.l #234+_v_obtab,R13
+*line 709
+move (R13),(sp)
+move 6(R13),-(sp)
+move #2,-(sp)
+jsr _objon
+addq.l #4,sp
+*line 710
+and #-17,16+_v_odtab
+*line 711
+*line 712
+move.l #252+_v_obtab,R13
+*line 713
+move (R13),(sp)
+move 6(R13),-(sp)
+move #1,-(sp)
+jsr _objon
+addq.l #4,sp
+*line 714
+and #-17,8+_v_odtab
+*line 715
+*line 716
+move.l #270+_v_obtab,R13
+*line 717
+move (R13),(sp)
+move 6(R13),-(sp)
+clr -(sp)
+jsr _objon
+addq.l #4,sp
+*line 718
+and #-17,_v_odtab
+L118:
+*line 721
+move R7,_scmctl
+L106:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.globl _sdmenu
+.text
+_sdmenu:
+~~sdmenu:
+~n=R7
+link R14,#0
+movem.l R4-R7,-(sp)
+~i=R6
+~wasup=R5
+*line 737
+move 8(R14),R7
+*line 737
+move _sdmctl,R5
+*line 738
+move R7,_sdmctl
+*line 740
+*line 740
+tst R7
+blt L120
+*line 741
+*line 742
+move #1,_submenu
+*line 743
+*line 744
+move _stcrow,_sdmrow
+*line 745
+move _stccol,_sdmcol
+*line 746
+*line 747
+move #64,(sp)
+move #4,-(sp)
+jsr _exp_c
+addq.l #2,sp
+move R0,-(sp)
+move.l #384+_sctctab,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 748
+move #64,(sp)
+move #4,-(sp)
+jsr _exp_c
+addq.l #2,sp
+move R0,-(sp)
+move.l #512+_sctctab,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 749
+move #64,(sp)
+move #4,-(sp)
+jsr _exp_c
+addq.l #2,sp
+move R0,-(sp)
+move.l #640+_sctctab,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 750
+*line 751
+*line 751
+cmp #4,R7
+bne L121
+*line 752
+*line 753
+move #64,(sp)
+move #4,-(sp)
+jsr _exp_c
+addq.l #2,sp
+move R0,-(sp)
+move.l #768+_sctctab,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 754
+move #64,(sp)
+move #4,-(sp)
+jsr _exp_c
+addq.l #2,sp
+move R0,-(sp)
+move.l #896+_sctctab,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 755
+*line 756
+L121:
+*line 757
+jsr _stcclr
+*line 758
+move _sdmcol,(sp)
+move _sdmrow,-(sp)
+jsr _stcpos
+addq.l #2,sp
+*line 759
+*line 760
+*line 761
+move.l _curfet,(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+jsr _infield
+addq.l #4,sp
+tst R0
+beq L122
+*line 761
+move.l _infetp,_cfetp
+*line 762
+L122:
+*line 763
+*line 764
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L123
+*line 764
+clr (sp)
+jsr _vbank
+*line 765
+L123:
+*line 766
+clr R6
+bra L126
+L127:
+*line 767
+move #20,(sp)
+move R7,R0
+muls #12,R0
+move R6,R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_sdmenus,R9
+move.l 0(R8,R9.l),-(sp)
+clr -(sp)
+move R6,-(sp)
+add #3,(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+L125:
+*line 766
+add #1,R6
+L126:
+*line 766
+cmp #3,R6
+blt L127
+L124:
+*line 767
+*line 768
+*line 769
+*line 770
+*line 770
+cmp #4,R7
+bne L128
+*line 771
+*line 772
+move #20,(sp)
+move.l #_sdmln3,-(sp)
+clr -(sp)
+move #6,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 773
+move #20,(sp)
+move.l #_sdmln4,-(sp)
+clr -(sp)
+move #7,-(sp)
+move.l _obj8,-(sp)
+jsr _vputs
+adda.l #12,sp
+*line 774
+*line 775
+clr _secop
+*line 776
+*line 777
+clr _grptran
+*line 778
+move #-1,_gtmsel
+*line 779
+*line 780
+clr R6
+bra L131
+L132:
+*line 781
+move R6,R8
+add.l R8,R8
+add.l #_grptmap,R8
+move R6,(R8)
+L130:
+*line 780
+add #1,R6
+L131:
+*line 780
+cmp #12,R6
+blt L132
+L129:
+*line 781
+*line 782
+*line 783
+jsr _dsects
+*line 784
+jsr _dsgtmap
+*line 785
+*line 786
+move.l #_GLCplot,_point
+*line 787
+move #1,(sp)
+jsr _GLCcurs
+*line 788
+*line 789
+*line 789
+tst _ismode
+beq L133
+*line 790
+*line 791
+clr _ismode
+*line 792
+move _oldpk,_pkctrl
+*line 793
+move _oldsl,_sliders
+*line 794
+move.l _oldsw,_swpt
+*line 795
+jsr _lcdlbls
+*line 796
+*line 797
+L133:
+*line 798
+*line 798
+tst _gomode
+beq L134
+*line 799
+*line 800
+clr _gomode
+*line 801
+move _oldpk,_pkctrl
+*line 802
+clr (sp)
+move #54,-(sp)
+move #215,-(sp)
+move #54,-(sp)
+move #186,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 803
+*line 804
+L134:
+*line 805
+*line 805
+tst _asmode
+beq L135
+*line 806
+*line 807
+clr _asmode
+*line 808
+move _oldpk,_pkctrl
+*line 809
+move.l _oldsw,_swpt
+*line 810
+clr (sp)
+move #54,-(sp)
+move #287,-(sp)
+move #54,-(sp)
+move #258,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 811
+*line 812
+L135:
+*line 813
+*line 814
+tst _pkctrl
+beq L10015
+cmp #1,_pkctrl
+bne L136
+L10015:*line 814
+move _pkctrl,_oldpk
+*line 815
+L136:
+*line 816
+*line 817
+cmp #5,_sliders
+beq L137
+*line 817
+move _sliders,_oldsl
+*line 818
+L137:
+*line 819
+move.l _swpt,_oldsw
+*line 820
+move.l #_t_ngrp,_swpt
+*line 821
+move #6,_pkctrl
+*line 822
+move #6,_sliders
+*line 823
+*line 824
+jsr _lcdlbls
+*line 825
+jsr _setleds
+*line 826
+*line 827
+L128:
+*line 828
+move #14,(sp)
+move #2,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 829
+move R7,R0
+asl #3,R0
+ext.l R0
+move.l R0,R8
+move.l #_sdmlim,R9
+move 2(R8,R9.l),(sp)
+move R7,R0
+asl #3,R0
+ext.l R0
+move.l R0,R8
+move.l #_sdmlim,R9
+move 0(R8,R9.l),-(sp)
+jsr _ttcpos
+addq.l #2,sp
+*line 830
+*line 831
+bra L138
+L120:
+*line 832
+*line 833
+*line 834
+clr _submenu
+*line 835
+*line 836
+*line 837
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L139
+*line 837
+clr (sp)
+jsr _vbank
+*line 838
+L139:
+*line 839
+move #14,(sp)
+jsr _objclr
+*line 840
+jsr _stcset
+*line 841
+jsr _stcclr
+*line 842
+move #11,(sp)
+jsr _sdwin
+*line 843
+*line 844
+*line 844
+cmp #4,R5
+bne L140
+*line 845
+*line 846
+move #12,(sp)
+jsr _sdwin
+*line 847
+*line 848
+move _sdmcol,(sp)
+move _sdmrow,-(sp)
+jsr _stcpos
+addq.l #2,sp
+*line 849
+*line 850
+move _sdmcol,R0
+asl #3,R0
+move R0,_cxval
+*line 851
+move _sdmrow,R0
+muls #14,R0
+move R0,_cyval
+*line 852
+*line 853
+*line 854
+move.l _curfet,(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+jsr _infield
+addq.l #4,sp
+tst R0
+beq L141
+*line 854
+move.l _infetp,_cfetp
+*line 855
+L141:
+*line 856
+move _oldpk,_pkctrl
+*line 857
+move _oldsl,_sliders
+*line 858
+move.l _oldsw,_swpt
+*line 859
+*line 860
+jsr _lcdlbls
+*line 861
+jsr _setleds
+*line 862
+bra L142
+L140:
+*line 863
+*line 864
+*line 865
+move _sdmcol,(sp)
+move _sdmrow,-(sp)
+jsr _stcpos
+addq.l #2,sp
+*line 866
+*line 867
+move _sdmcol,R0
+asl #3,R0
+move R0,_cxval
+*line 868
+move _sdmrow,R0
+muls #14,R0
+move R0,_cyval
+*line 869
+*line 870
+*line 871
+move.l _curfet,(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+jsr _infield
+addq.l #4,sp
+tst R0
+beq L143
+*line 871
+move.l _infetp,_cfetp
+L143:L142:
+*line 872
+L138:L119:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _hilitnt
+.text
+_hilitnt:
+~~hilitnt:
+~nop=8
+link R14,#-4
+*line 888
+move 8(R14),_noteop
+*line 889
+clr _notesel
+*line 890
+move #-1,(sp)
+jsr _sdmenu
+*line 891
+jsr _dnedmod
+L144:unlk R14
+rts
+.globl _hilitop
+.text
+_hilitop:
+~~hilitop:
+~n=R7
+link R14,#0
+movem.l R2-R7,-(sp)
+~row=R6
+~lc=R5
+~rc=R4
+~col=R3
+*line 908
+move 8(R14),R7
+*line 908
+*line 909
+tst _clkrun
+bne L145
+*line 910
+*line 911
+*line 912
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L146
+*line 912
+clr (sp)
+jsr _vbank
+*line 913
+L146:
+*line 914
+*line 914
+tst _secop
+beq L147
+*line 915
+*line 916
+move _secop,R0
+muls #6,R0
+add.l #_sdmht,R0
+move.l R0,R8
+move (R8),R6
+*line 917
+move _secop,R0
+muls #6,R0
+add.l #_sdmht,R0
+move.l R0,R8
+move 2(R8),R5
+*line 918
+move _secop,R0
+muls #6,R0
+add.l #_sdmht,R0
+move.l R0,R8
+move 4(R8),R4
+*line 919
+*line 920
+move R5,R3
+bra L150
+L151:
+*line 921
+move #20,(sp)
+move R3,-(sp)
+move R6,-(sp)
+move.l _obj8,-(sp)
+jsr _vputa
+addq.l #8,sp
+L149:
+*line 920
+add #1,R3
+L150:
+*line 920
+cmp R4,R3
+ble L151
+L148:
+*line 921
+*line 922
+*line 923
+L147:
+*line 924
+move R7,_secop
+*line 926
+move R7,R0
+muls #6,R0
+add.l #_sdmht,R0
+move.l R0,R8
+move (R8),R6
+*line 927
+move R7,R0
+muls #6,R0
+add.l #_sdmht,R0
+move.l R0,R8
+move 2(R8),R5
+*line 928
+move R7,R0
+muls #6,R0
+add.l #_sdmht,R0
+move.l R0,R8
+move 4(R8),R4
+*line 930
+move R5,R3
+bra L154
+L155:
+*line 931
+move #100,(sp)
+move R3,-(sp)
+move R6,-(sp)
+move.l _obj8,-(sp)
+jsr _vputa
+addq.l #8,sp
+L153:
+*line 930
+add #1,R3
+L154:
+*line 930
+cmp R4,R3
+ble L155
+L152:L145:tst.l (sp)+
+movem.l (sp)+,R3-R7
+unlk R14
+rts
+.globl _dosecop
+.text
+_dosecop:
+~~dosecop:
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~sect=R7
+~ep=R13
+*line 948
+*line 948
+tst _clkrun
+bne L10016
+jsr _insect
+move R0,R7
+cmp #-1,R7
+bne L157
+L10016:*line 949
+*line 950
+clr _secop
+bra L156
+*line 951
+*line 952
+*line 953
+L157:
+*line 954
+*line 954
+tst _insmode
+beq L158
+*line 955
+*line 956
+jsr _icancel
+*line 957
+jsr _dsimode
+*line 958
+*line 959
+L158:
+*line 960
+move _secop,R0
+bra L160
+*line 961
+L161:
+*line 962
+*line 963
+*line 964
+*line 964
+cmp #3,_sgoflag
+bne L162
+*line 965
+*line 966
+move _curscor,R0
+muls #48,R0
+add.l #_hplist,R0
+move.l R0,R8
+move.l 44(R8),R13
+*line 967
+*line 968
+bra L165
+L164:
+*line 969
+*line 970
+*line 970
+move.b 6(R13),R0
+ext.w R0
+cmp R0,R7
+bne L166
+*line 971
+*line 972
+move.l (R13),R0
+move.l R0,_fc_val
+move.l R0,(sp)
+jsr _sc_goto
+bra L163
+*line 973
+*line 974
+*line 975
+L166:
+*line 976
+move.l 20(R13),R13
+L165:
+*line 977
+move.l R13,R0
+bne L164
+L163:
+*line 978
+bra L167
+L162:
+*line 979
+*line 980
+*line 981
+*line 982
+move _curscor,R0
+muls #80,R0
+move R7,R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+add.l #_seclist,R0
+move.l R0,R8
+move.l (R8),R13
+move.l R13,R0
+beq L168
+*line 982
+move.l (R13),R0
+move.l R0,_fc_val
+move.l R0,(sp)
+jsr _sc_goto
+L168:L167:
+*line 983
+*line 984
+bra L159
+*line 985
+*line 986
+*line 987
+L169:
+*line 988
+*line 989
+*line 990
+*line 991
+tst _recsw
+beq L159
+*line 992
+*line 993
+*line 994
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L170
+*line 994
+clr (sp)
+jsr _vbank
+*line 995
+L170:
+*line 996
+*line 996
+move _curscor,R0
+muls #80,R0
+move R7,R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+add.l #_seclist,R0
+move.l R0,R8
+move.l (R8),R13
+move.l R13,R0
+beq L171
+*line 997
+*line 998
+move #10,(sp)
+move.l R13,-(sp)
+jsr _eh_rmv
+addq.l #4,sp
+*line 999
+move.l R13,(sp)
+jsr _e_rmv
+*line 1000
+move.l _t_cur,(R13)
+*line 1001
+move.l _t_cur,(sp)
+move #1,-(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,R8
+move.l 8(R8),(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 1002
+move #10,(sp)
+move.l R13,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 1003
+clr (sp)
+move.l R13,-(sp)
+jsr _se_exec
+addq.l #4,sp
+*line 1004
+bra L172
+L171:
+*line 1005
+*line 1005
+move #6,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L173
+*line 1006
+*line 1007
+move.l _t_cur,(R13)
+*line 1008
+move.b #2,5(R13)
+*line 1009
+move.b R7,6(R13)
+*line 1010
+move.l _t_cur,(sp)
+move #1,-(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,R8
+move.l 8(R8),(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 1011
+move #10,(sp)
+move.l R13,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 1012
+move _curscor,R0
+muls #80,R0
+move R7,R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+add.l #_seclist,R0
+move.l R0,R8
+move.l R13,(R8)
+*line 1013
+clr (sp)
+move.l R13,-(sp)
+jsr _se_exec
+addq.l #4,sp
+*line 1014
+*line 1015
+L173:L172:
+*line 1016
+move.l _fc_val,(sp)
+jsr _sc_refr
+bra L159
+*line 1017
+*line 1018
+*line 1019
+L174:
+*line 1020
+*line 1021
+*line 1022
+*line 1023
+tst _recsw
+beq L159
+*line 1024
+*line 1025
+*line 1026
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L175
+*line 1026
+clr (sp)
+jsr _vbank
+*line 1027
+L175:
+*line 1028
+*line 1028
+move #-1,(sp)
+move R7,-(sp)
+move.l #$ffffffff,-(sp)
+move #11,-(sp)
+jsr _ehfind
+addq.l #8,sp
+move.l R0,R13
+move.l R13,R0
+beq L176
+*line 1029
+*line 1030
+move #11,(sp)
+move.l R13,-(sp)
+jsr _eh_rmv
+addq.l #4,sp
+*line 1031
+move.l R13,(sp)
+jsr _e_rmv
+*line 1032
+move.l _t_cur,(R13)
+*line 1033
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 1034
+move #11,(sp)
+move.l R13,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 1035
+clr (sp)
+move.l R13,-(sp)
+jsr _se_exec
+addq.l #4,sp
+*line 1036
+bra L177
+L176:
+*line 1037
+*line 1037
+move #6,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L178
+*line 1038
+*line 1039
+move.l _t_cur,(R13)
+*line 1040
+move.b #3,5(R13)
+*line 1041
+move.b R7,6(R13)
+*line 1042
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 1043
+move #11,(sp)
+move.l R13,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 1044
+clr (sp)
+move.l R13,-(sp)
+jsr _se_exec
+addq.l #4,sp
+*line 1045
+*line 1046
+L178:L177:
+*line 1047
+move.l _fc_val,(sp)
+jsr _sc_refr
+bra L159
+*line 1048
+*line 1049
+*line 1050
+L179:
+*line 1051
+*line 1052
+*line 1053
+*line 1054
+tst _recsw
+beq L159
+*line 1055
+*line 1056
+*line 1057
+move R7,(sp)
+jsr _sec_mov
+tst R0
+bne L159
+*line 1058
+*line 1059
+move.l _fc_val,(sp)
+jsr _sc_refr
+bra L159
+*line 1060
+*line 1061
+L180:
+*line 1062
+*line 1063
+*line 1064
+*line 1065
+tst _recsw
+beq L159
+*line 1066
+*line 1067
+*line 1068
+move R7,(sp)
+jsr _sec_cpy
+tst R0
+bne L159
+*line 1069
+*line 1070
+move.l _fc_val,(sp)
+jsr _sc_refr
+bra L159
+*line 1071
+*line 1072
+L181:
+*line 1073
+*line 1074
+*line 1075
+*line 1076
+tst _recsw
+beq L159
+*line 1077
+*line 1078
+*line 1079
+move R7,(sp)
+jsr _sec_mrg
+tst R0
+bne L159
+*line 1080
+*line 1081
+move.l _fc_val,(sp)
+jsr _sc_refr
+bra L159
+*line 1082
+*line 1083
+L182:
+*line 1084
+*line 1085
+*line 1086
+*line 1087
+tst _recsw
+beq L159
+*line 1088
+*line 1089
+*line 1090
+move R7,(sp)
+jsr _sec_grp
+tst R0
+bne L159
+*line 1091
+*line 1092
+move.l _fc_val,(sp)
+jsr _sc_refr
+bra L159
+*line 1093
+*line 1094
+*line 1095
+*line 1096
+L183:
+*line 1097
+*line 1098
+*line 1099
+*line 1100
+tst _recsw
+beq L159
+*line 1101
+bra L159
+*line 1102
+*line 1103
+L184:
+*line 1104
+*line 1105
+*line 1106
+*line 1107
+tst _recsw
+beq L159
+*line 1108
+*line 1109
+*line 1110
+move R7,(sp)
+jsr _sec_dgr
+tst R0
+bne L159
+*line 1111
+*line 1112
+move.l _fc_val,(sp)
+jsr _sc_refr
+bra L159
+*line 1113
+*line 1114
+L185:
+*line 1115
+*line 1116
+*line 1117
+*line 1118
+tst _recsw
+beq L159
+*line 1119
+*line 1120
+*line 1121
+move R7,(sp)
+jsr _sec_dev
+tst R0
+bne L159
+*line 1122
+*line 1123
+move.l _fc_val,(sp)
+jsr _sc_refr
+bra L159
+*line 1124
+*line 1125
+L186:
+*line 1126
+*line 1127
+*line 1128
+*line 1129
+tst _recsw
+beq L159
+*line 1130
+*line 1131
+*line 1132
+move R7,(sp)
+jsr _sec_rmv
+tst R0
+bne L159
+*line 1133
+*line 1134
+move.l _fc_val,(sp)
+jsr _sc_refr
+bra L159
+*line 1135
+bra L159
+L160:sub #1,R0
+cmp #10,R0
+bhi L159
+asl #2,R0
+move R0,R8
+add.l #L187,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L187:.dc.l L161
+.dc.l L169
+.dc.l L174
+.dc.l L179
+.dc.l L180
+.dc.l L181
+.dc.l L183
+.dc.l L184
+.dc.l L185
+.dc.l L186
+.dc.l L182
+.text
+L159:
+*line 1138
+clr _secop
+L156:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _clkset
+.text
+_clkset:
+~~clkset:
+~st=R7
+link R14,#0
+movem.l R6-R7,-(sp)
+*line 1153
+move 8(R14),R7
+*line 1153
+move R7,_clkrun
+*line 1155
+move _clksrc,R0
+bra L190
+*line 1156
+L191:
+*line 1157
+L192:
+*line 1158
+*line 1159
+*line 1160
+clr _midiclk
+*line 1161
+clr _pulsclk
+*line 1162
+*line 1163
+*line 1164
+tst R7
+beq L193
+*line 1164
+move #1,_fc_sw
+*line 1165
+bra L194
+L193:
+*line 1166
+clr _fc_sw
+L194:
+*line 1167
+bra L188
+*line 1168
+*line 1169
+L195:
+*line 1170
+*line 1171
+*line 1172
+clr _fc_sw
+*line 1173
+clr _pulsclk
+*line 1174
+*line 1175
+*line 1176
+tst R7
+beq L196
+*line 1176
+move #1,_midiclk
+*line 1177
+bra L197
+L196:
+*line 1178
+clr _midiclk
+L197:
+*line 1179
+bra L188
+*line 1180
+*line 1181
+*line 1182
+L198:
+*line 1183
+L199:
+*line 1184
+L200:
+*line 1185
+*line 1186
+*line 1187
+clr _fc_sw
+*line 1188
+clr _midiclk
+*line 1189
+*line 1190
+*line 1191
+tst R7
+beq L201
+*line 1191
+move #1,_pulsclk
+*line 1192
+bra L202
+L201:
+*line 1193
+clr _pulsclk
+L202:
+*line 1194
+bra L188
+*line 1195
+*line 1196
+L203:
+*line 1197
+*line 1198
+*line 1199
+clr _fc_sw
+*line 1200
+clr _midiclk
+*line 1201
+clr _pulsclk
+*line 1202
+bra L188
+*line 1203
+bra L189
+L190:cmp #6,R0
+bhi L189
+asl #2,R0
+move R0,R8
+add.l #L204,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L204:.dc.l L191
+.dc.l L195
+.dc.l L192
+.dc.l L198
+.dc.l L199
+.dc.l L200
+.dc.l L203
+.text
+L189:L188:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _sdboxfn
+.text
+_sdboxfn:
+~~sdboxfn:
+~n=8
+link R14,#-4
+movem.l R2-R7/R13-R13,-(sp)
+~row=R7
+~col=R6
+~grp=R5
+~what=R4
+~i=R3
+~ep=R13
+~atr=-2
+~modewas=-4
+*line 1224
+move _hitcy,R7
+ext.l R7
+divs #14,R7
+*line 1225
+move _hitcx,R6
+asr #3,R6
+*line 1227
+move _hitbox,R0
+bra L207
+*line 1228
+L208:
+*line 1229
+*line 1230
+*line 1231
+*line 1231
+tst R6
+bne L209
+*line 1232
+*line 1233
+*line 1234
+tst _clkrun
+beq L210
+*line 1234
+move #-1,R0
+bra L205
+*line 1235
+L210:
+*line 1236
+*line 1237
+cmp.b #4,_ac_code
+bne L211
+*line 1237
+move.b #1,_ac_code
+*line 1238
+bra L212
+L211:
+*line 1239
+move.b #4,_ac_code
+L212:
+*line 1240
+*line 1241
+move.l _fc_val,(sp)
+jsr _sc_refr
+*line 1242
+clr R0
+bra L205
+*line 1243
+bra L213
+L209:
+*line 1244
+*line 1244
+cmp #2,R6
+blt L214
+cmp #4,R6
+bgt L214
+*line 1245
+*line 1246
+*line 1247
+tst _clkrun
+beq L215
+*line 1247
+move #-1,R0
+bra L205
+*line 1248
+L215:
+*line 1249
+*line 1249
+cmp #-1,_sdmctl
+bne L216
+*line 1250
+*line 1251
+move #4,(sp)
+jsr _sdmenu
+*line 1252
+clr R0
+bra L205
+*line 1253
+*line 1254
+bra L217
+L216:
+*line 1255
+*line 1256
+*line 1257
+*line 1257
+cmp #19,_vtcrow
+bne L218
+*line 1258
+*line 1259
+*line 1260
+cmp #1,_vtccol
+blt L219
+cmp #4,_vtccol
+bgt L219
+*line 1261
+*line 1262
+move #1,(sp)
+jsr _hilitop
+*line 1263
+clr R0
+bra L205
+*line 1264
+bra L220
+L219:
+*line 1265
+*line 1266
+cmp #8,_vtccol
+blt L221
+cmp #11,_vtccol
+bgt L221
+*line 1267
+*line 1268
+move #4,(sp)
+jsr _hilitop
+*line 1269
+clr R0
+bra L205
+*line 1270
+bra L222
+L221:
+*line 1271
+*line 1272
+cmp #15,_vtccol
+blt L223
+cmp #19,_vtccol
+bgt L223
+*line 1273
+*line 1274
+move #7,(sp)
+jsr _hilitop
+*line 1275
+clr R0
+bra L205
+*line 1276
+bra L224
+L223:
+*line 1277
+*line 1278
+cmp #24,_vtccol
+blt L225
+cmp #62,_vtccol
+bgt L225
+*line 1279
+*line 1280
+*line 1280
+jsr _insect
+cmp #-1,R0
+beq L226
+*line 1281
+*line 1282
+move #-1,(sp)
+jsr _sdmenu
+*line 1283
+jsr _dosecop
+*line 1284
+*line 1285
+L226:
+*line 1286
+clr R0
+bra L205
+*line 1287
+*line 1288
+*line 1289
+L225:L224:L222:L220:bra L227
+L218:
+*line 1290
+*line 1290
+cmp #20,_vtcrow
+bne L228
+*line 1291
+*line 1292
+*line 1293
+cmp #1,_vtccol
+blt L229
+cmp #5,_vtccol
+bgt L229
+*line 1294
+*line 1295
+move #2,(sp)
+jsr _hilitop
+*line 1296
+clr R0
+bra L205
+*line 1297
+bra L230
+L229:
+*line 1298
+*line 1299
+cmp #8,_vtccol
+blt L231
+cmp #11,_vtccol
+bgt L231
+*line 1300
+*line 1301
+move #5,(sp)
+jsr _hilitop
+*line 1302
+clr R0
+bra L205
+*line 1303
+bra L232
+L231:
+*line 1304
+*line 1305
+cmp #15,_vtccol
+blt L233
+cmp #20,_vtccol
+bgt L233
+*line 1306
+*line 1307
+move #8,(sp)
+jsr _hilitop
+*line 1308
+clr R0
+bra L205
+*line 1309
+bra L234
+L233:
+*line 1310
+*line 1311
+cmp #24,_vtccol
+blt L235
+cmp #62,_vtccol
+bgt L235
+*line 1312
+*line 1313
+*line 1313
+jsr _insect
+cmp #-1,R0
+beq L236
+*line 1314
+*line 1315
+move #-1,(sp)
+jsr _sdmenu
+*line 1316
+jsr _dosecop
+*line 1317
+*line 1318
+L236:
+*line 1319
+clr R0
+bra L205
+*line 1320
+*line 1321
+*line 1322
+L235:L234:L232:L230:bra L237
+L228:
+*line 1323
+*line 1323
+cmp #21,_vtcrow
+bne L238
+*line 1324
+*line 1325
+*line 1326
+cmp #1,_vtccol
+blt L239
+cmp #3,_vtccol
+bgt L239
+*line 1327
+*line 1328
+move #3,(sp)
+jsr _hilitop
+*line 1329
+clr R0
+bra L205
+*line 1330
+bra L240
+L239:
+*line 1331
+*line 1332
+cmp #8,_vtccol
+blt L241
+cmp #12,_vtccol
+bgt L241
+*line 1333
+*line 1334
+move #6,(sp)
+jsr _hilitop
+*line 1335
+clr R0
+bra L205
+*line 1336
+bra L242
+L241:
+*line 1337
+*line 1338
+cmp #15,_vtccol
+blt L243
+cmp #20,_vtccol
+bgt L243
+*line 1339
+*line 1340
+move #9,(sp)
+jsr _hilitop
+*line 1341
+clr R0
+bra L205
+*line 1342
+*line 1343
+*line 1344
+*line 1345
+L243:L242:L240:bra L244
+L238:
+*line 1346
+*line 1346
+cmp #22,_vtcrow
+bne L245
+*line 1347
+*line 1348
+*line 1349
+cmp #8,_vtccol
+blt L246
+cmp #12,_vtccol
+bgt L246
+*line 1350
+*line 1351
+move #11,(sp)
+jsr _hilitop
+*line 1352
+clr R0
+bra L205
+*line 1353
+bra L247
+L246:
+*line 1354
+*line 1355
+cmp #15,_vtccol
+blt L248
+cmp #20,_vtccol
+bgt L248
+*line 1356
+*line 1357
+move #10,(sp)
+jsr _hilitop
+*line 1358
+clr R0
+bra L205
+*line 1359
+bra L249
+L248:
+*line 1360
+*line 1361
+cmp #28,_vtccol
+blt L250
+cmp #62,_vtccol
+bgt L250
+*line 1362
+*line 1363
+*line 1364
+tst _gtmsel
+blt L251
+*line 1364
+clr (sp)
+move _gtmsel,-(sp)
+jsr _dsgtmn
+addq.l #2,sp
+*line 1365
+L251:
+*line 1366
+*line 1367
+jsr _ingroup
+move R0,_gtmsel
+cmp #-1,R0
+beq L252
+*line 1367
+move #1,(sp)
+move _gtmsel,-(sp)
+jsr _dsgtmn
+addq.l #2,sp
+*line 1368
+L252:
+*line 1369
+clr R0
+bra L205
+*line 1370
+*line 1371
+L250:L249:L247:bra L253
+L245:
+*line 1372
+*line 1372
+cmp #23,_vtcrow
+bne L254
+*line 1373
+*line 1374
+*line 1375
+cmp #1,_vtccol
+blt L255
+cmp #6,_vtccol
+bgt L255
+*line 1376
+*line 1377
+clr _secop
+*line 1378
+move #-1,(sp)
+jsr _sdmenu
+*line 1379
+clr R0
+bra L205
+*line 1380
+bra L256
+L255:
+*line 1381
+*line 1382
+cmp #22,_vtccol
+blt L257
+cmp #24,_vtccol
+bgt L257
+*line 1383
+*line 1384
+jsr _enterit
+bra L205
+*line 1385
+L257:L256:
+*line 1386
+L254:L253:L244:L237:L227:L217:
+*line 1387
+*line 1388
+*line 1389
+move #-1,R0
+bra L205
+*line 1390
+*line 1391
+bra L258
+L214:
+*line 1392
+jsr _enterit
+bra L205
+L258:L213:
+*line 1393
+*line 1394
+*line 1395
+L259:
+*line 1396
+*line 1397
+*line 1398
+move _insmode,-4(R14)
+*line 1399
+*line 1400
+*line 1401
+tst _insmode
+beq L260
+*line 1401
+jsr _icancel
+*line 1402
+bra L261
+L260:
+*line 1403
+jsr _istart
+L261:
+*line 1404
+*line 1405
+*line 1406
+move -4(R14),R0
+cmp _insmode,R0
+beq L262
+*line 1406
+move.l _fc_val,(sp)
+jsr _sc_refr
+*line 1407
+L262:
+*line 1408
+jsr _dsimode
+*line 1409
+clr R0
+bra L205
+*line 1410
+L263:
+*line 1411
+*line 1412
+*line 1413
+*line 1413
+cmp #33,R6
+bgt L264
+*line 1414
+*line 1415
+tst _clkrun
+beq L10017
+clr (sp)
+bra L10018
+L10017:move #1,(sp)
+L10018:jsr _clkset
+*line 1416
+jsr _dsclk
+*line 1417
+clr R0
+bra L205
+*line 1418
+*line 1419
+*line 1420
+bra L265
+L264:
+*line 1421
+*line 1421
+cmp #35,R6
+blt L266
+cmp #43,R6
+bgt L266
+*line 1422
+*line 1423
+*line 1423
+cmp #-1,_sdmctl
+bne L267
+*line 1424
+*line 1425
+move #3,(sp)
+jsr _sdmenu
+*line 1426
+clr R0
+bra L205
+*line 1427
+bra L268
+L267:
+*line 1428
+*line 1429
+*line 1430
+*line 1430
+cmp #19,_vtcrow
+bne L269
+*line 1431
+*line 1432
+*line 1433
+cmp #1,_vtccol
+blt L270
+cmp #5,_vtccol
+bgt L270
+*line 1434
+*line 1435
+clr _clkctl
+*line 1436
+move #-1,(sp)
+jsr _sdmenu
+*line 1437
+move #2,(sp)
+jsr _sdwin
+*line 1438
+clr R0
+bra L205
+*line 1439
+*line 1440
+L270:bra L271
+L269:
+*line 1441
+*line 1441
+cmp #20,_vtcrow
+bne L272
+*line 1442
+*line 1443
+*line 1444
+cmp #1,_vtccol
+blt L273
+cmp #5,_vtccol
+bgt L273
+*line 1445
+*line 1446
+move #1,_clkctl
+*line 1447
+move #-1,(sp)
+jsr _sdmenu
+*line 1448
+move #2,(sp)
+jsr _sdwin
+*line 1449
+clr R0
+bra L205
+*line 1450
+*line 1451
+L273:bra L274
+L272:
+*line 1452
+*line 1452
+cmp #21,_vtcrow
+bne L275
+*line 1453
+*line 1454
+*line 1455
+cmp #1,_vtccol
+blt L276
+cmp #5,_vtccol
+bgt L276
+*line 1456
+*line 1457
+move #2,_clkctl
+*line 1458
+move #-1,(sp)
+jsr _sdmenu
+*line 1459
+move #2,(sp)
+jsr _sdwin
+*line 1460
+clr R0
+bra L205
+*line 1461
+L276:
+*line 1462
+L275:L274:L271:L268:
+*line 1463
+*line 1464
+*line 1465
+move #-1,R0
+bra L205
+*line 1466
+*line 1467
+bra L277
+L266:
+*line 1468
+*line 1468
+cmp #45,R6
+blt L278
+*line 1469
+*line 1470
+*line 1470
+cmp #-1,_sdmctl
+bne L279
+*line 1471
+*line 1472
+move #2,(sp)
+jsr _sdmenu
+*line 1473
+jsr _setleds
+*line 1474
+clr R0
+bra L205
+*line 1475
+bra L280
+L279:
+*line 1476
+*line 1477
+*line 1478
+*line 1478
+cmp #19,_vtcrow
+bne L281
+*line 1479
+*line 1480
+*line 1481
+cmp #1,_vtccol
+blt L282
+cmp #5,_vtccol
+bgt L282
+*line 1482
+*line 1483
+clr _clksrc
+*line 1484
+clr _pkctrl
+*line 1485
+jsr _setleds
+*line 1486
+move #-1,(sp)
+jsr _sdmenu
+*line 1487
+move #2,(sp)
+jsr _sdwin
+*line 1488
+clr R0
+bra L205
+*line 1489
+bra L283
+L282:
+*line 1490
+*line 1491
+cmp #9,_vtccol
+blt L284
+cmp #13,_vtccol
+bgt L284
+*line 1492
+*line 1493
+move #3,_clksrc
+*line 1494
+clr _pkctrl
+*line 1495
+jsr _setleds
+*line 1496
+move #-1,(sp)
+jsr _sdmenu
+*line 1497
+move #2,(sp)
+jsr _sdwin
+*line 1498
+clr R0
+bra L205
+*line 1499
+bra L285
+L284:
+*line 1500
+*line 1501
+cmp #17,_vtccol
+blt L286
+cmp #20,_vtccol
+bgt L286
+*line 1502
+*line 1503
+move #6,_clksrc
+*line 1504
+move #1,_pkctrl
+*line 1505
+move #1,_stepenb
+*line 1506
+jsr _setleds
+*line 1507
+move #-1,(sp)
+jsr _sdmenu
+*line 1508
+move #2,(sp)
+jsr _sdwin
+*line 1509
+clr R0
+bra L205
+*line 1510
+*line 1511
+*line 1512
+*line 1513
+L286:L285:L283:bra L287
+L281:
+*line 1514
+*line 1514
+cmp #20,_vtcrow
+bne L288
+*line 1515
+*line 1516
+*line 1517
+cmp #1,_vtccol
+blt L289
+cmp #5,_vtccol
+bgt L289
+*line 1518
+*line 1519
+move #1,_clksrc
+*line 1520
+clr _pkctrl
+*line 1521
+jsr _setleds
+*line 1522
+move #-1,(sp)
+jsr _sdmenu
+*line 1523
+move #2,(sp)
+jsr _sdwin
+*line 1524
+clr R0
+bra L205
+*line 1525
+bra L290
+L289:
+*line 1526
+*line 1527
+cmp #9,_vtccol
+blt L291
+cmp #13,_vtccol
+bgt L291
+*line 1528
+*line 1529
+move #4,_clksrc
+*line 1530
+clr _pkctrl
+*line 1531
+jsr _setleds
+*line 1532
+move #-1,(sp)
+jsr _sdmenu
+*line 1533
+move #2,(sp)
+jsr _sdwin
+*line 1534
+clr R0
+bra L205
+*line 1535
+*line 1536
+*line 1537
+L291:L290:bra L292
+L288:
+*line 1538
+*line 1538
+cmp #21,_vtcrow
+bne L293
+*line 1539
+*line 1540
+*line 1541
+cmp #1,_vtccol
+blt L294
+cmp #5,_vtccol
+bgt L294
+*line 1542
+*line 1543
+move #2,_clksrc
+*line 1544
+clr _pkctrl
+*line 1545
+jsr _setleds
+*line 1546
+move #-1,(sp)
+jsr _sdmenu
+*line 1547
+move #2,(sp)
+jsr _sdwin
+*line 1548
+clr R0
+bra L205
+*line 1549
+bra L295
+L294:
+*line 1550
+*line 1551
+cmp #9,_vtccol
+blt L296
+cmp #13,_vtccol
+bgt L296
+*line 1552
+*line 1553
+move #5,_clksrc
+*line 1554
+clr _pkctrl
+*line 1555
+jsr _setleds
+*line 1556
+move #-1,(sp)
+jsr _sdmenu
+*line 1557
+move #2,(sp)
+jsr _sdwin
+*line 1558
+clr R0
+bra L205
+*line 1559
+L296:L295:
+*line 1560
+L293:L292:L287:L280:
+*line 1561
+*line 1562
+*line 1563
+L278:L277:L265:
+*line 1564
+move #-1,R0
+bra L205
+*line 1565
+*line 1566
+*line 1567
+L297:
+*line 1568
+*line 1569
+*line 1570
+*line 1571
+tst _clkrun
+beq L298
+*line 1571
+move #-1,R0
+bra L205
+*line 1572
+L298:
+*line 1573
+*line 1574
+cmp #-1,_scmctl
+beq L299
+*line 1574
+move #-1,(sp)
+jsr _scmenu
+*line 1575
+L299:
+*line 1576
+*line 1576
+cmp #-1,_sdmctl
+bne L300
+*line 1577
+*line 1578
+move #1,(sp)
+jsr _sdmenu
+*line 1579
+clr _noteop
+*line 1580
+clr R0
+bra L205
+*line 1581
+bra L301
+L300:
+*line 1582
+*line 1583
+*line 1584
+*line 1584
+cmp #19,_vtcrow
+bne L302
+*line 1585
+*line 1586
+*line 1587
+cmp #1,_vtccol
+blt L303
+cmp #9,_vtccol
+bgt L303
+*line 1588
+*line 1589
+move #1,(sp)
+jsr _hilitnt
+*line 1590
+clr R0
+bra L205
+*line 1591
+bra L304
+L303:
+*line 1592
+*line 1593
+cmp #13,_vtccol
+blt L305
+cmp #21,_vtccol
+bgt L305
+*line 1594
+*line 1595
+move #4,(sp)
+jsr _hilitnt
+*line 1596
+clr R0
+bra L205
+*line 1597
+bra L306
+L305:
+*line 1598
+*line 1599
+cmp #25,_vtccol
+blt L307
+cmp #30,_vtccol
+bgt L307
+*line 1600
+*line 1601
+clr (sp)
+jsr _hilitnt
+*line 1602
+clr R0
+bra L205
+*line 1603
+*line 1604
+*line 1605
+L307:L306:L304:
+*line 1606
+move #-1,R0
+bra L205
+*line 1607
+*line 1608
+bra L308
+L302:
+*line 1609
+*line 1609
+cmp #20,_vtcrow
+bne L309
+*line 1610
+*line 1611
+*line 1612
+cmp #1,_vtccol
+blt L310
+cmp #9,_vtccol
+bgt L310
+*line 1613
+*line 1614
+move #2,(sp)
+jsr _hilitnt
+*line 1615
+clr R0
+bra L205
+*line 1616
+bra L311
+L310:
+*line 1617
+*line 1618
+cmp #13,_vtccol
+blt L312
+cmp #22,_vtccol
+bgt L312
+*line 1619
+*line 1620
+move #5,(sp)
+jsr _hilitnt
+*line 1621
+clr R0
+bra L205
+*line 1622
+*line 1623
+L312:L311:
+*line 1624
+move #-1,R0
+bra L205
+*line 1625
+bra L313
+L309:
+*line 1626
+*line 1626
+cmp #21,_vtcrow
+bne L314
+*line 1627
+*line 1628
+*line 1629
+cmp #1,_vtccol
+blt L315
+cmp #8,_vtccol
+bgt L315
+*line 1630
+*line 1631
+move #3,(sp)
+jsr _hilitnt
+*line 1632
+clr R0
+bra L205
+*line 1633
+bra L316
+L315:
+*line 1634
+*line 1635
+cmp #13,_vtccol
+blt L317
+cmp #20,_vtccol
+bgt L317
+*line 1636
+*line 1637
+move #6,(sp)
+jsr _hilitnt
+*line 1638
+clr R0
+bra L205
+*line 1639
+*line 1640
+L317:L316:
+*line 1641
+move #-1,R0
+bra L205
+*line 1642
+*line 1643
+bra L318
+L314:
+*line 1644
+move #-1,R0
+bra L205
+L318:L313:L308:L301:
+*line 1645
+*line 1646
+*line 1647
+move #-1,R0
+bra L205
+*line 1648
+*line 1649
+*line 1650
+L319:
+*line 1651
+*line 1652
+*line 1653
+*line 1653
+cmp #9,R6
+bgt L320
+*line 1654
+*line 1655
+*line 1655
+cmp #1,_scmctl
+beq L321
+*line 1656
+*line 1657
+clr _lastam
+*line 1658
+move #1,(sp)
+jsr _scmenu
+*line 1659
+bra L322
+L321:
+*line 1660
+*line 1661
+*line 1662
+*line 1662
+tst _lastam
+bne L323
+*line 1663
+*line 1664
+move #60,_lastam
+*line 1665
+move #1,(sp)
+jsr _scmenu
+*line 1666
+bra L324
+L323:
+*line 1667
+*line 1668
+*line 1669
+clr _lastam
+*line 1670
+move #-1,(sp)
+jsr _scmenu
+L324:
+*line 1671
+L322:
+*line 1672
+*line 1673
+*line 1674
+clr R0
+bra L205
+*line 1675
+bra L325
+L320:
+*line 1676
+*line 1677
+*line 1678
+jsr _enterit
+bra L205
+L325:
+*line 1679
+*line 1680
+L326:
+*line 1681
+*line 1682
+*line 1683
+*line 1683
+cmp #14,R6
+blt L327
+cmp #17,R6
+bgt L327
+*line 1684
+*line 1685
+*line 1686
+cmp #2,_scmctl
+beq L328
+*line 1686
+move #2,(sp)
+jsr _scmenu
+*line 1687
+bra L329
+L328:
+*line 1688
+move #-1,(sp)
+jsr _scmenu
+L329:
+*line 1689
+*line 1690
+clr R0
+bra L205
+*line 1691
+bra L330
+L327:
+*line 1692
+*line 1693
+*line 1694
+jsr _enterit
+bra L205
+L330:
+*line 1695
+*line 1696
+*line 1697
+L331:
+*line 1698
+*line 1699
+*line 1700
+*line 1700
+cmp #40,R6
+blt L332
+cmp #43,R6
+bgt L332
+*line 1701
+*line 1702
+*line 1702
+tst _recsw
+beq L333
+*line 1703
+*line 1704
+*line 1705
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L334
+*line 1705
+clr (sp)
+jsr _vbank
+*line 1706
+L334:
+*line 1707
+*line 1707
+move #-1,(sp)
+move #-1,-(sp)
+move #7,-(sp)
+move.l _t_cur,-(sp)
+move.l _p_cur,-(sp)
+jsr _findev
+adda.l #12,sp
+move.l R0,R13
+move.l R13,R0
+beq L335
+*line 1708
+*line 1709
+clr (sp)
+move.l R13,-(sp)
+jsr _se_exec
+addq.l #4,sp
+*line 1710
+bra L336
+L335:
+*line 1711
+*line 1711
+move #5,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L337
+*line 1712
+*line 1713
+move.l _t_cur,(R13)
+*line 1714
+move.b #7,5(R13)
+*line 1715
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 1716
+clr (sp)
+move.l R13,-(sp)
+jsr _se_exec
+addq.l #4,sp
+*line 1717
+move #1,_ctrsw
+*line 1718
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 1719
+jsr _scupd
+*line 1720
+L337:L336:
+*line 1721
+*line 1722
+L333:bra L338
+L332:
+*line 1723
+*line 1723
+cmp #45,R6
+blt L339
+cmp #48,R6
+bgt L339
+*line 1724
+*line 1725
+*line 1725
+tst _recsw
+beq L340
+*line 1726
+*line 1727
+*line 1728
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L341
+*line 1728
+clr (sp)
+jsr _vbank
+*line 1729
+L341:
+*line 1730
+*line 1730
+move #-1,(sp)
+move #-1,-(sp)
+move #24,-(sp)
+move.l _t_cur,-(sp)
+move.l _p_cur,-(sp)
+jsr _findev
+adda.l #12,sp
+move.l R0,R13
+move.l R13,R0
+beq L342
+*line 1731
+*line 1732
+clr (sp)
+move.l R13,-(sp)
+jsr _se_exec
+addq.l #4,sp
+*line 1733
+bra L343
+L342:
+*line 1734
+*line 1734
+move #5,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L344
+*line 1735
+*line 1736
+move.l _t_cur,(R13)
+*line 1737
+move.b #24,5(R13)
+*line 1738
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 1739
+clr (sp)
+move.l R13,-(sp)
+jsr _se_exec
+addq.l #4,sp
+*line 1740
+move #1,_ctrsw
+*line 1741
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 1742
+jsr _scupd
+*line 1743
+L344:L343:
+*line 1744
+*line 1745
+L340:
+*line 1746
+*line 1747
+L339:L338:
+*line 1748
+clr R0
+bra L205
+*line 1749
+*line 1750
+*line 1751
+L345:
+*line 1752
+*line 1753
+*line 1754
+*line 1754
+cmp #50,R6
+blt L346
+cmp #51,R6
+bgt L346
+*line 1755
+*line 1756
+*line 1756
+tst _recsw
+beq L347
+*line 1757
+*line 1758
+*line 1759
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L348
+*line 1759
+clr (sp)
+jsr _vbank
+*line 1760
+L348:
+*line 1761
+*line 1761
+move #-1,(sp)
+move #1,-(sp)
+move #7,-(sp)
+move.l _t_cur,-(sp)
+move.l _p_cur,-(sp)
+jsr _findev
+adda.l #12,sp
+move.l R0,R13
+move.l R13,R0
+beq L349
+*line 1762
+*line 1763
+clr (sp)
+move.l R13,-(sp)
+jsr _se_exec
+addq.l #4,sp
+*line 1764
+bra L350
+L349:
+*line 1765
+*line 1765
+move #5,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L351
+*line 1766
+*line 1767
+move.l _t_cur,(R13)
+*line 1768
+move.b #19,5(R13)
+*line 1769
+move.b #1,6(R13)
+*line 1770
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 1771
+clr (sp)
+move.l R13,-(sp)
+jsr _se_exec
+addq.l #4,sp
+*line 1772
+move #1,_ctrsw
+*line 1773
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 1774
+jsr _scupd
+*line 1775
+L351:L350:
+*line 1776
+*line 1777
+L347:bra L352
+L346:
+*line 1778
+*line 1778
+cmp #53,R6
+blt L353
+cmp #55,R6
+bgt L353
+*line 1779
+*line 1780
+*line 1780
+tst _recsw
+beq L354
+*line 1781
+*line 1782
+*line 1783
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L355
+*line 1783
+clr (sp)
+jsr _vbank
+*line 1784
+L355:
+*line 1785
+*line 1785
+move #-1,(sp)
+clr -(sp)
+move #19,-(sp)
+move.l _t_cur,-(sp)
+move.l _p_cur,-(sp)
+jsr _findev
+adda.l #12,sp
+move.l R0,R13
+move.l R13,R0
+beq L356
+*line 1786
+*line 1787
+clr (sp)
+move.l R13,-(sp)
+jsr _se_exec
+addq.l #4,sp
+*line 1788
+bra L357
+L356:
+*line 1789
+*line 1789
+move #5,(sp)
+jsr _e_alc
+move.l R0,R13
+move.l R13,R0
+beq L358
+*line 1790
+*line 1791
+move.l _t_cur,(R13)
+*line 1792
+move.b #19,5(R13)
+*line 1793
+clr.b 6(R13)
+*line 1794
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 1795
+clr (sp)
+move.l R13,-(sp)
+jsr _se_exec
+addq.l #4,sp
+*line 1796
+move #1,_ctrsw
+*line 1797
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 1798
+jsr _scupd
+*line 1799
+L358:L357:
+*line 1800
+*line 1801
+L354:
+*line 1802
+*line 1803
+L353:L352:
+*line 1804
+clr R0
+bra L205
+*line 1805
+*line 1806
+L359:
+*line 1807
+*line 1808
+*line 1809
+clr R0
+bra L205
+*line 1810
+L360:
+*line 1811
+*line 1812
+*line 1813
+*line 1813
+cmp #18,R7
+bne L361
+cmp #3,R6
+bgt L361
+*line 1814
+*line 1815
+*line 1816
+tst _scmctl
+beq L362
+*line 1816
+clr (sp)
+jsr _scmenu
+*line 1817
+bra L363
+L362:
+*line 1818
+move #-1,(sp)
+jsr _scmenu
+L363:
+*line 1819
+*line 1820
+clr R0
+bra L205
+*line 1821
+bra L364
+L361:
+*line 1822
+*line 1822
+cmp #21,R7
+bne L365
+cmp #3,R6
+bgt L365
+*line 1823
+*line 1824
+tst _velflag
+beq L10019
+clr R0
+bra L10020
+L10019:move #1,R0
+L10020:move R0,_velflag
+*line 1825
+jsr _ds_vmod
+*line 1826
+clr R0
+bra L205
+*line 1827
+*line 1828
+bra L366
+L365:
+*line 1829
+jsr _enterit
+bra L205
+L366:L364:
+*line 1830
+*line 1831
+*line 1832
+L367:
+*line 1833
+*line 1834
+*line 1835
+*line 1835
+cmp #23,R7
+bne L368
+cmp #4,R6
+bgt L368
+*line 1836
+*line 1837
+move _angroup,R0
+neg R0
+move R0,_angroup
+*line 1838
+*line 1839
+*line 1840
+tst _angroup
+bge L369
+*line 1840
+move #18,-2(R14)
+*line 1841
+bra L370
+L369:
+*line 1842
+move #82,-2(R14)
+L370:
+*line 1843
+*line 1844
+*line 1845
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L371
+*line 1845
+clr (sp)
+jsr _vbank
+*line 1846
+L371:
+*line 1847
+clr R3
+bra L374
+L375:
+*line 1848
+move -2(R14),(sp)
+move R3,-(sp)
+move #7,-(sp)
+move.l _obj8,-(sp)
+jsr _vputa
+addq.l #8,sp
+L373:
+*line 1847
+add #1,R3
+L374:
+*line 1847
+cmp #4,R3
+blt L375
+L372:
+*line 1848
+*line 1849
+*line 1850
+clr R0
+bra L205
+*line 1851
+bra L376
+L368:
+*line 1852
+*line 1852
+cmp #22,R7
+bne L377
+cmp #4,R6
+bgt L377
+*line 1853
+*line 1854
+tst _ancmsw
+beq L10021
+clr R0
+bra L10022
+L10021:move #1,R0
+L10022:move R0,_ancmsw
+*line 1855
+*line 1856
+*line 1857
+tst _ancmsw
+beq L378
+*line 1857
+move #82,-2(R14)
+*line 1858
+bra L379
+L378:
+*line 1859
+move #18,-2(R14)
+L379:
+*line 1860
+*line 1861
+*line 1862
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L380
+*line 1862
+clr (sp)
+jsr _vbank
+*line 1863
+L380:
+*line 1864
+clr R3
+bra L383
+L384:
+*line 1865
+move -2(R14),(sp)
+move R3,-(sp)
+move #6,-(sp)
+move.l _obj8,-(sp)
+jsr _vputa
+addq.l #8,sp
+L382:
+*line 1864
+add #1,R3
+L383:
+*line 1864
+cmp #4,R3
+blt L384
+L381:
+*line 1865
+*line 1866
+*line 1867
+clr R0
+bra L205
+*line 1868
+bra L385
+L377:
+*line 1869
+*line 1870
+*line 1871
+jsr _enterit
+bra L205
+L385:L376:
+*line 1872
+*line 1873
+*line 1874
+L386:
+*line 1875
+*line 1876
+*line 1877
+*line 1877
+cmp #4,R6
+bgt L387
+*line 1878
+*line 1879
+*line 1880
+cmp #3,_scmctl
+beq L388
+*line 1880
+move #3,(sp)
+jsr _scmenu
+*line 1881
+bra L389
+L388:
+*line 1882
+move #-1,(sp)
+jsr _scmenu
+L389:
+*line 1883
+*line 1884
+clr R0
+bra L205
+*line 1885
+bra L390
+L387:
+*line 1886
+*line 1886
+cmp #10,R6
+blt L391
+cmp #25,R6
+bgt L391
+*line 1887
+*line 1888
+*line 1888
+tst _sdmctl
+beq L392
+*line 1889
+*line 1890
+clr (sp)
+jsr _sdmenu
+*line 1891
+*line 1892
+*line 1893
+*line 1894
+move #3,(sp)
+move #99,-(sp)
+move.l #_svtstop,-(sp)
+move.l #_nokey,-(sp)
+move.l #_nokey,-(sp)
+move.l #_bspscur,-(sp)
+move.l #_advscur,-(sp)
+move #1,-(sp)
+move #19,-(sp)
+move _curscor,R0
+asl #4,R0
+ext.l R0
+add.l #_scname,R0
+move.l R0,-(sp)
+move #10,-(sp)
+move.l #_svtdsp,-(sp)
+move.l _obj8,-(sp)
+jsr _vtsetup
+adda.l #40,sp
+*line 1895
+bra L393
+L392:
+*line 1896
+*line 1897
+*line 1898
+jsr _vtyper
+L393:
+*line 1899
+*line 1900
+*line 1901
+clr R0
+bra L205
+*line 1902
+*line 1903
+bra L394
+L391:
+*line 1904
+jsr _enterit
+bra L205
+L394:L390:
+*line 1905
+*line 1906
+L395:
+*line 1907
+*line 1908
+*line 1909
+*line 1909
+cmp #31,R6
+blt L396
+cmp #34,R6
+bgt L396
+*line 1910
+*line 1911
+clr _recsw
+*line 1912
+jsr _dsrpmod
+*line 1913
+clr R0
+bra L205
+*line 1914
+bra L397
+L396:
+*line 1915
+*line 1915
+cmp #36,R6
+blt L398
+cmp #40,R6
+bgt L398
+*line 1916
+*line 1917
+move #1,_recsw
+*line 1918
+jsr _dsrpmod
+*line 1919
+clr R0
+bra L205
+*line 1920
+bra L399
+L398:
+*line 1921
+*line 1921
+cmp #42,R6
+blt L400
+cmp #47,R6
+bgt L400
+*line 1922
+*line 1923
+tst _dubsw
+beq L10023
+clr R0
+bra L10024
+L10023:move #1,R0
+L10024:move R0,_dubsw
+*line 1924
+jsr _dsrpmod
+*line 1925
+clr R0
+bra L205
+*line 1926
+bra L401
+L400:
+*line 1927
+*line 1927
+cmp #49,R6
+blt L402
+cmp #55,R6
+bgt L402
+*line 1928
+*line 1929
+tst _pchsw
+beq L10025
+clr R0
+bra L10026
+L10025:move #1,R0
+L10026:move R0,_pchsw
+*line 1930
+jsr _dsrpmod
+*line 1931
+clr R0
+bra L205
+*line 1932
+*line 1933
+*line 1934
+L402:L401:L399:L397:
+*line 1935
+move #-1,R0
+bra L205
+*line 1936
+L403:
+*line 1937
+*line 1938
+*line 1939
+*line 1940
+tst _noteop
+beq L404
+*line 1940
+jsr _donote
+*line 1941
+L404:
+*line 1942
+clr R0
+bra L205
+bra L206
+L207:cmp #16,R0
+bhi L206
+asl #2,R0
+move R0,R8
+add.l #L405,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L405:.dc.l L208
+.dc.l L259
+.dc.l L263
+.dc.l L297
+.dc.l L319
+.dc.l L326
+.dc.l L206
+.dc.l L206
+.dc.l L331
+.dc.l L345
+.dc.l L359
+.dc.l L360
+.dc.l L367
+.dc.l L386
+.dc.l L395
+.dc.l L206
+.dc.l L403
+.text
+L206:
+*line 1945
+move #-1,R0
+bra L205
+L205:tst.l (sp)+
+movem.l (sp)+,R3-R7/R13-R13
+unlk R14
+rts
+.data
+L1:.dc.b $20,$41,$42,$43,$44,$45,$46,$47,$48,$49,$4A,$4B,$4C,$4D,$4E,$4F,$50,$51,$52,$53,$54,$55,$56,$57,$58,$59,$5A,$20,$20,$7C
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$0
+L2:.dc.b $20,$61,$62,$63,$64,$65,$66,$67,$68,$69,$6A,$6B,$6C,$6D,$6E,$6F,$70,$71,$72,$73,$74,$75,$76,$77,$78,$79,$7A,$20,$2D,$2A
+.dc.b $2D,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$0
+L3:.dc.b $20,$20,$30,$31,$32,$33,$34,$35,$36,$37,$38,$39,$2B,$2D,$2F,$2A,$28,$29,$2E,$2C,$3A,$3B,$21,$3F,$26,$3C,$3E,$20,$20,$7C
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$0
+L4:.dc.b $20,$42,$65,$67,$69,$6E,$20,$41,$63,$63,$20,$20,$20,$4D,$6F,$76,$65,$20,$4E,$6F,$74,$65,$20,$20,$20,$45,$73,$63,$61,$70
+.dc.b $65,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$0
+L5:.dc.b $20,$42,$65,$67,$69,$6E,$20,$4E,$61,$74,$20,$20,$20,$4D,$6F,$76,$65,$20,$42,$65,$67,$69,$6E,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$0
+L6:.dc.b $20,$45,$6E,$64,$20,$4E,$6F,$74,$65,$20,$20,$20,$20,$4D,$6F,$76,$65,$20,$45,$6E,$64,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$0
+L7:.dc.b $20,$4C,$6F,$63,$61,$6C,$20,$20,$20,$50,$4C,$53,$32,$34,$20,$20,$20,$53,$74,$65,$70,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$0
+L8:.dc.b $20,$4D,$49,$44,$49,$20,$20,$20,$20,$50,$4C,$53,$34,$38,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$0
+L9:.dc.b $20,$53,$4D,$50,$54,$45,$20,$20,$20,$50,$4C,$53,$39,$36,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$0
+L10:.dc.b $20,$4C,$6F,$63,$61,$6C,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$0
+L11:.dc.b $20,$4D,$49,$44,$49,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$0
+L12:.dc.b $20,$53,$4D,$50,$54,$45,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$0
+L13:.dc.b $20,$47,$6F,$54,$6F,$20,$20,$20,$4D,$6F,$76,$65,$20,$20,$20,$53,$4D,$50,$54,$45,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$0
+L14:.dc.b $20,$42,$65,$67,$69,$6E,$20,$20,$43,$6F,$70,$79,$20,$20,$20,$44,$65,$6C,$20,$47,$72,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$0
+L15:.dc.b $20,$45,$6E,$64,$20,$20,$20,$20,$4D,$65,$72,$67,$65,$20,$20,$44,$65,$6C,$20,$45,$76,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$0
+L18:.dc.b $4E,$6F,$74,$65,$20,$45,$64,$69,$74,$0
+L19:.dc.b $42,$65,$67,$69,$6E,$20,$41,$63,$63,$0
+L20:.dc.b $42,$65,$67,$69,$6E,$20,$4E,$61,$74,$0
+L21:.dc.b $45,$6E,$64,$20,$4E,$6F,$74,$65,$20,$0
+L22:.dc.b $4D,$6F,$76,$65,$20,$4E,$6F,$74,$65,$0
+L23:.dc.b $4D,$6F,$76,$65,$20,$42,$65,$67,$20,$0
+L24:.dc.b $4D,$6F,$76,$65,$20,$45,$6E,$64,$20,$0
+L53:.dc.b $25,$63,$25,$30,$32,$64,$25,$63,$0
+L55:.dc.b $25,$30,$32,$64,$0
+L59:.dc.b $20,$20,$0
+L61:.dc.b $25,$30,$32,$64,$0
+L65:.dc.b $25,$63,$25,$30,$32,$64,$0
+L82:.dc.b $4E,$6F,$20,$41,$73,$73,$69,$67,$6E,$6D,$65,$6E,$74,$0
+L87:.dc.b $25,$30,$32,$64,$20,$25,$2D,$31,$30,$2E,$31,$30,$73,$0
+L89:.dc.b $4E,$20,$4E,$61,$6D,$65,$0
+L94:.dc.b $25,$64,$20,$25,$2D,$33,$32,$2E,$33,$32,$73,$0
+L100:.dc.b $4E,$6F,$20,$53,$63,$6F,$72,$65,$0
+L105:.dc.b $25,$30,$32,$64,$20,$25,$2D,$31,$36,$2E,$31,$36,$73,$0
Index: alcyon/sctrak.s
===================================================================
--- alcyon/sctrak.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/sctrak.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,871 @@
+.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 _ancmsw
+.globl _dubsw
+.globl _ndisp
+.globl _recsw
+.globl _sbase
+.globl _sd
+.globl _se
+.globl _soffset
+.globl _grpmode
+.globl _grpstat
+.globl _varmode
+.globl _gdfsep
+.globl _gdstbc
+.globl _gdstbn
+.globl _gdstbp
+.globl _sc_trak
+.text
+_sc_trak:
+~~sc_trak:
+~tval=R7
+link R14,#-4
+movem.l R2-R7/R11-R13,-(sp)
+~rpb=R13
+~rpc=R12
+~rpf=R11
+~rtb=R6
+~rtc=R5
+~rtf=R4
+~mod48=R3
+*line 63
+move #48,R3
+~gdsp=-4
+*line 66
+move.l 8(R14),R7
+*line 68
+*line 68
+cmp #2,_ndisp
+beq L2
+*line 69
+*line 70
+*line 71
+move #-1,R0
+bra L1
+*line 72
+*line 73
+*line 78
+*line 79
+L2:
+*line 80
+*line 80
+tst.l _p_fwd
+beq L10000
+tst.l _p_ctr
+beq L10000
+tst.l _p_bak
+bne L3
+L10000:*line 81
+*line 82
+*line 83
+move #-1,R0
+bra L1
+*line 84
+*line 85
+*line 86
+L3:
+*line 87
+*line 88
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L4
+*line 88
+clr (sp)
+jsr _vbank
+*line 89
+L4:
+*line 90
+move.l _p_fwd,R11
+*line 91
+move.l _t_fwd,R4
+*line 93
+move.l _p_ctr,R12
+*line 94
+move.l _t_ctr,R5
+*line 96
+move.l _p_bak,R13
+*line 97
+move.l _t_bak,R6
+*line 120
+*line 120
+tst _sd
+bne L5
+*line 121
+*line 122
+*line 123
+*line 124
+bra L8
+L7:
+*line 125
+*line 126
+jsr _sreset
+*line 127
+*line 128
+add.l #$1,R6
+*line 129
+add.l #$1,R4
+*line 130
+*line 131
+*line 131
+cmp.b #21,5(R13)
+beq L9
+*line 132
+*line 133
+bra L12
+L11:
+*line 134
+*line 135
+clr (sp)
+move.l #_gdstbp,-(sp)
+clr -(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 136
+move.l 12(R13),R13
+*line 137
+*line 138
+*line 139
+cmp.b #21,5(R13)
+beq L10
+L12:
+*line 140
+cmp.l (R13),R6
+beq L11
+L10:
+*line 141
+*line 142
+L9:
+*line 143
+*line 143
+move.l R6,R0
+divs R3,R0
+swap R0
+ext.l R0
+tst.l R0
+bne L13
+*line 144
+*line 145
+*line 145
+move.l _gdfsep,-4(R14)
+beq L14
+*line 146
+*line 147
+move.l -4(R14),R8
+move.l (R8),_gdfsep
+*line 148
+*line 149
+move.l -4(R14),R8
+move.l 48+_gdstbp,(R8)
+*line 150
+move.l -4(R14),R8
+move #4369,4(R8)
+*line 151
+move.l -4(R14),R8
+move #1,6(R8)
+*line 152
+*line 153
+move.l -4(R14),48+_gdstbp
+*line 154
+L14:
+*line 155
+*line 156
+*line 157
+L13:
+*line 158
+*line 158
+cmp.b #21,5(R12)
+beq L15
+*line 159
+*line 160
+bra L18
+L17:
+*line 161
+*line 162
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+clr -(sp)
+move.l R12,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 163
+move.l 12(R12),R12
+*line 164
+*line 165
+*line 166
+cmp.b #21,5(R12)
+beq L16
+L18:
+*line 167
+cmp.l (R12),R5
+beq L17
+L16:
+*line 168
+*line 169
+L15:
+*line 170
+*line 170
+cmp.b #21,5(R11)
+beq L19
+*line 171
+*line 172
+bra L22
+L21:
+*line 173
+*line 174
+clr (sp)
+move.l #_gdstbn,-(sp)
+clr -(sp)
+move.l R11,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 175
+move.l 12(R11),R11
+*line 176
+*line 177
+*line 178
+cmp.b #21,5(R11)
+beq L20
+L22:
+*line 179
+cmp.l (R11),R4
+beq L21
+L20:
+*line 180
+*line 181
+L19:
+*line 182
+*line 182
+move.l R4,R0
+divs R3,R0
+swap R0
+ext.l R0
+tst.l R0
+bne L23
+*line 183
+*line 184
+*line 184
+move.l _gdfsep,-4(R14)
+beq L24
+*line 185
+*line 186
+move.l -4(R14),R8
+move.l (R8),_gdfsep
+*line 187
+*line 188
+move.l -4(R14),R8
+move.l 48+_gdstbn,(R8)
+*line 189
+move.l -4(R14),R8
+move #4369,4(R8)
+*line 190
+move.l -4(R14),R8
+move #1,6(R8)
+*line 191
+*line 192
+move.l -4(R14),48+_gdstbn
+*line 193
+L24:
+*line 194
+*line 195
+L23:
+*line 196
+jsr _sc_adv
+L8:
+*line 197
+cmp.l R5,R7
+move sr,R0
+add.l #$1,R5
+move R0,ccr
+bgt L7
+L6:
+*line 198
+*line 199
+*line 200
+bra L25
+L5:
+*line 201
+*line 202
+*line 203
+*line 204
+*line 205
+bra L28
+L27:
+*line 206
+*line 207
+jsr _sreset
+*line 208
+*line 209
+sub.l #$1,R6
+*line 210
+sub.l #$1,R4
+*line 211
+*line 212
+*line 212
+cmp.b #1,5(R13)
+beq L29
+*line 213
+*line 214
+bra L32
+L31:
+*line 215
+*line 216
+clr (sp)
+move.l #_gdstbp,-(sp)
+move #1,-(sp)
+move.l R13,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 217
+move.l 8(R13),R13
+*line 218
+*line 219
+*line 220
+cmp.b #1,5(R13)
+beq L30
+L32:
+*line 221
+cmp.l (R13),R6
+beq L31
+L30:
+*line 222
+*line 223
+L29:
+*line 224
+*line 224
+move.l R6,R0
+divs R3,R0
+swap R0
+ext.l R0
+tst.l R0
+bne L33
+*line 225
+*line 226
+*line 226
+move.l _gdfsep,-4(R14)
+beq L34
+*line 227
+*line 228
+move.l -4(R14),R8
+move.l (R8),_gdfsep
+*line 229
+*line 230
+move.l -4(R14),R8
+move.l 48+_gdstbp,(R8)
+*line 231
+move.l -4(R14),R8
+move #4369,4(R8)
+*line 232
+move.l -4(R14),R8
+move #1,6(R8)
+*line 233
+*line 234
+move.l -4(R14),48+_gdstbp
+*line 235
+L34:
+*line 236
+*line 237
+*line 238
+L33:
+*line 239
+*line 239
+cmp.b #1,5(R12)
+beq L35
+*line 240
+*line 241
+bra L38
+L37:
+*line 242
+*line 243
+move #1,(sp)
+move.l #_gdstbc,-(sp)
+move #1,-(sp)
+move.l R12,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 244
+move.l 8(R12),R12
+*line 245
+*line 246
+*line 247
+cmp.b #1,5(R12)
+beq L36
+L38:
+*line 248
+cmp.l (R12),R5
+beq L37
+L36:
+*line 249
+*line 250
+L35:
+*line 251
+*line 251
+cmp.b #1,5(R11)
+beq L39
+*line 252
+*line 253
+bra L42
+L41:
+*line 254
+*line 255
+clr (sp)
+move.l #_gdstbn,-(sp)
+move #1,-(sp)
+move.l R11,-(sp)
+jsr _se_disp
+adda.l #10,sp
+*line 256
+move.l 8(R11),R11
+*line 257
+*line 258
+*line 259
+cmp.b #1,5(R11)
+beq L40
+L42:
+*line 260
+cmp.l (R11),R4
+beq L41
+L40:
+*line 261
+*line 262
+L39:
+*line 263
+*line 263
+move.l R4,R0
+divs R3,R0
+swap R0
+ext.l R0
+tst.l R0
+bne L43
+*line 264
+*line 265
+*line 265
+move.l _gdfsep,-4(R14)
+beq L44
+*line 266
+*line 267
+move.l -4(R14),R8
+move.l (R8),_gdfsep
+*line 268
+*line 269
+move.l -4(R14),R8
+move.l 48+_gdstbn,(R8)
+*line 270
+move.l -4(R14),R8
+move #4369,4(R8)
+*line 271
+move.l -4(R14),R8
+move #1,6(R8)
+*line 272
+*line 273
+move.l -4(R14),48+_gdstbn
+*line 274
+L44:
+*line 275
+*line 276
+L43:
+*line 277
+jsr _sc_adv
+L28:
+*line 278
+cmp.l R5,R7
+move sr,R0
+sub.l #$1,R5
+move R0,ccr
+blt L27
+L26:L25:
+*line 282
+move.l R11,_p_fwd
+*line 283
+move.l R7,R0
+add.l #$102,R0
+move.l R0,_t_fwd
+*line 285
+move.l R12,_p_ctr
+*line 286
+move.l R7,_t_ctr
+*line 288
+move.l R13,_p_bak
+*line 289
+move.l R7,R0
+add.l #$ffffff10,R0
+move.l R0,_t_bak
+*line 292
+jsr _dslocn
+*line 312
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R3-R7/R11-R13
+unlk R14
+rts
+.globl _sc_trek
+.text
+_sc_trek:
+~~sc_trek:
+~tval=R7
+link R14,#0
+movem.l R2-R7/R12-R13,-(sp)
+~rp=R13
+~ep=R12
+~tc=R6
+~rt=R5
+~et=R4
+~grp=R3
+*line 332
+move.l 8(R14),R7
+*line 338
+*line 338
+tst.l _p_cur
+bne L46
+*line 339
+*line 340
+*line 341
+move #-1,R0
+bra L45
+*line 342
+*line 343
+L46:
+*line 344
+move.l _p_cur,R13
+*line 345
+move.l _t_cur,R5
+*line 358
+bra L49
+L48:
+*line 359
+*line 360
+*line 361
+tst _se
+bne L50
+*line 361
+add.l #$1,R5
+*line 362
+bra L51
+L50:
+*line 363
+sub.l #$1,R5
+L51:
+*line 364
+*line 365
+*line 365
+cmp.b #21,5(R13)
+beq L52
+*line 366
+*line 367
+bra L55
+L54:
+*line 368
+*line 369
+*line 370
+*line 371
+*line 371
+tst _recsw
+beq L56
+tst _se
+bne L56
+*line 372
+*line 373
+move.b 5(R13),R4
+ext.w R4
+and #127,R4
+*line 374
+*line 375
+*line 376
+tst _dubsw
+bne L57
+cmp #5,R4
+beq L10001
+cmp #6,R4
+bne L57
+L10001:*line 377
+*line 378
+move.b 7(R13),R3
+ext.w R3
+*line 379
+*line 380
+*line 380
+move R3,R8
+add.l R8,R8
+move.l #_grpstat,R9
+tst 0(R8,R9.l)
+beq L58
+move R3,R8
+add.l R8,R8
+add.l #_grpmode,R8
+cmp #2,(R8)
+bne L58
+*line 381
+*line 382
+*line 383
+*line 384
+*line 385
+*line 386
+move.l 12(R13),R12
+*line 387
+*line 388
+*line 389
+cmp.l _p_bak,R13
+bne L59
+*line 389
+move.l R12,_p_bak
+*line 390
+L59:
+*line 391
+*line 392
+cmp.l _p_cur,R13
+bne L60
+*line 392
+move.l R12,_p_cur
+*line 393
+L60:
+*line 394
+*line 395
+cmp.l _p_ctr,R13
+bne L61
+*line 395
+move.l R12,_p_ctr
+*line 396
+L61:
+*line 397
+*line 398
+cmp.l _p_fwd,R13
+bne L62
+*line 398
+move.l R12,_p_fwd
+*line 399
+L62:
+*line 400
+move.l R13,(sp)
+jsr _e_rmv
+move.l R0,(sp)
+jsr _e_del
+*line 401
+move.l R12,R13
+bra L63
+*line 402
+*line 403
+*line 404
+*line 405
+L58:bra L64
+L57:
+*line 406
+*line 406
+cmp #14,R4
+bne L65
+*line 407
+*line 408
+move.b 6(R13),R3
+ext.w R3
+and #15,R3
+*line 409
+*line 410
+*line 411
+*line 412
+move R3,R8
+add.l R8,R8
+move.l #_grpstat,R9
+tst 0(R8,R9.l)
+beq L66
+tst _ancmsw
+beq L10002
+move.b 6(R13),R0
+ext.w R0
+asr #4,R0
+and #15,R0
+asl #5,R0
+ext.l R0
+move R3,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_varmode,R9
+move 0(R8,R9.l),R0
+bra L10004
+L10002:move R3,R8
+add.l R8,R8
+move.l #_grpmode,R9
+move 0(R8,R9.l),R0
+L10004:cmp #2,R0
+bne L66
+*line 413
+*line 414
+*line 415
+*line 416
+*line 417
+*line 418
+move.l 12(R13),R12
+*line 419
+*line 420
+*line 421
+cmp.l _p_bak,R13
+bne L67
+*line 421
+move.l R12,_p_bak
+*line 422
+L67:
+*line 423
+*line 424
+cmp.l _p_cur,R13
+bne L68
+*line 424
+move.l R12,_p_cur
+*line 425
+L68:
+*line 426
+*line 427
+cmp.l _p_ctr,R13
+bne L69
+*line 427
+move.l R12,_p_ctr
+*line 428
+L69:
+*line 429
+*line 430
+cmp.l _p_fwd,R13
+bne L70
+*line 430
+move.l R12,_p_fwd
+*line 431
+L70:
+*line 432
+move.l R13,(sp)
+jsr _e_rmv
+move.l R0,(sp)
+jsr _e_del
+*line 433
+move.l R12,R13
+bra L63
+*line 434
+*line 435
+L66:
+*line 436
+L65:L64:
+*line 437
+*line 438
+L56:
+*line 439
+*line 439
+cmp.l (R13),R5
+bne L71
+*line 440
+*line 441
+move _se,(sp)
+move.l R13,-(sp)
+jsr _se_exec
+addq.l #4,sp
+*line 442
+*line 443
+*line 444
+tst _se
+bne L72
+*line 444
+move.l 12(R13),R13
+*line 445
+bra L73
+L72:
+*line 446
+move.l 8(R13),R13
+L73:
+*line 447
+*line 448
+L71:L63:
+*line 449
+*line 450
+*line 451
+*line 452
+tst _se
+bne L10005
+cmp.b #21,5(R13)
+beq L53
+L10005:cmp #1,_se
+bne L10006
+cmp.b #1,5(R13)
+beq L53
+L10006:L55:
+*line 453
+cmp.l (R13),R5
+beq L54
+L53:
+*line 454
+L52:L49:
+*line 455
+cmp.l R7,R5
+bne L48
+L47:
+*line 458
+move.l R13,_p_cur
+*line 459
+move.l R7,_t_cur
+*line 462
+clr R0
+bra L45
+L45:tst.l (sp)+
+movem.l (sp)+,R3-R7/R12-R13
+unlk R14
+rts
+.data
Index: alcyon/scwrite.s
===================================================================
--- alcyon/scwrite.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/scwrite.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1173 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.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 _filecat
+.globl _schksum
+.globl _snbreq
+.globl _snlreq
+.globl _sntbreq
+.globl _sntlreq
+.globl _nlpersc
+.globl _scsums
+.globl _stimes
+.globl _m1con
+.data
+_m1con:
+.dc.l $FFFFFFFF
+.globl _scsizes
+.data
+_scsizes:
+.dc.w $14
+.dc.w $0
+.dc.w $14
+.dc.w $6
+.dc.w $18
+.dc.w $6
+.dc.w $18
+.dc.w $6
+.dc.w $18
+.dc.w $7
+.dc.w $14
+.dc.w $9
+.dc.w $14
+.dc.w $9
+.dc.w $14
+.dc.w $5
+.dc.w $14
+.dc.w $7
+.dc.w $18
+.dc.w $6
+.dc.w $18
+.dc.w $6
+.dc.w $18
+.dc.w $7
+.dc.w $18
+.dc.w $7
+.dc.w $18
+.dc.w $7
+.dc.w $18
+.dc.w $8
+.dc.w $18
+.dc.w $7
+.dc.w $18
+.dc.w $6
+.dc.w $20
+.dc.w $8
+.dc.w $14
+.dc.w $6
+.dc.w $14
+.dc.w $6
+.dc.w $14
+.dc.w $7
+.dc.w $14
+.dc.w $6
+.dc.w $14
+.dc.w $7
+.dc.w $14
+.dc.w $5
+.dc.w $14
+.dc.w $5
+.globl _scsize
+.text
+_scsize:
+~~scsize:
+~sn=8
+link R14,#0
+movem.l R3-R7/R13-R13,-(sp)
+~nb=R7
+~nl=R6
+~sc=R5
+~ep=R13
+~go=R4
+*line 91
+clr.l R7
+move.l R7,_snbreq
+*line 92
+clr.l R6
+move.l R6,_snlreq
+*line 93
+clr.l R5
+move.l R5,_schksum
+*line 95
+move 8(R14),R8
+add.l R8,R8
+add.l R8,R8
+add.l #_scores,R8
+move.l (R8),R13
+*line 97
+*line 97
+move.l R13,R0
+bne L2
+*line 98
+*line 102
+*line 103
+clr.l R0
+bra L1
+*line 104
+*line 105
+L2:
+*line 106
+move #1,R4
+*line 110
+L5:
+*line 111
+and.b #127,5(R13)
+*line 112
+*line 113
+move.b 5(R13),R0
+ext.w R0
+move R0,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_scsizes,R9
+move 0(R8,R9.l),R0
+ext.l R0
+add.l R0,R6
+*line 114
+move.b 5(R13),R0
+ext.w R0
+move R0,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_scsizes,R9
+move 2(R8,R9.l),R0
+ext.l R0
+add.l R0,R7
+*line 115
+*line 116
+move.b 5(R13),R0
+ext.w R0
+bra L7
+*line 117
+L8:
+*line 118
+L9:
+*line 119
+L10:
+*line 120
+*line 121
+*line 122
+move.b 5(R13),R0
+ext.w R0
+ext.l R0
+add.l (R13),R0
+add.l R0,R5
+bra L6
+*line 123
+*line 124
+L11:
+*line 125
+L12:
+*line 126
+L13:
+*line 127
+L14:
+*line 128
+L15:
+*line 129
+L16:
+*line 130
+L17:
+*line 131
+L18:
+*line 132
+*line 133
+*line 134
+move.b 5(R13),R0
+ext.w R0
+ext.l R0
+move.b 6(R13),R1
+ext.w R1
+ext.l R1
+add.l R1,R0
+add.l (R13),R0
+add.l R0,R5
+bra L6
+*line 135
+*line 136
+L19:
+*line 137
+L20:
+*line 138
+*line 139
+*line 140
+*line 141
+move.l #18,-(sp)
+move.b 5(R13),R0
+ext.w R0
+ext.l R0
+move.b 6(R13),R1
+ext.w R1
+ext.l R1
+add.l R1,R0
+move.b 7(R13),R1
+ext.w R1
+ext.l R1
+add.l R1,R0
+add.l (R13),R0
+move.l R0,-(sp)
+jsr lmul
+addq.l #8,sp
+move 16(R13),R1
+ext.l R1
+add.l R1,R0
+add.l R0,R5
+*line 142
+bra L6
+*line 143
+*line 144
+*line 145
+L21:
+*line 146
+L22:
+*line 147
+L23:
+*line 148
+L24:
+*line 149
+L25:
+*line 150
+L26:
+*line 151
+L27:
+*line 152
+L28:
+*line 153
+*line 154
+*line 155
+*line 156
+move.b 5(R13),R0
+ext.w R0
+ext.l R0
+move.b 6(R13),R1
+ext.w R1
+ext.l R1
+add.l R1,R0
+move.b 7(R13),R1
+ext.w R1
+ext.l R1
+add.l R1,R0
+add.l (R13),R0
+add.l R0,R5
+*line 157
+bra L6
+*line 158
+*line 159
+L29:
+*line 160
+*line 161
+*line 162
+*line 163
+move.b 5(R13),R0
+ext.w R0
+ext.l R0
+move.b 6(R13),R1
+ext.w R1
+ext.l R1
+add.l R1,R0
+add.l 24(R13),R0
+add.l (R13),R0
+add.l R0,R5
+*line 164
+bra L6
+*line 165
+*line 166
+L30:
+*line 167
+*line 168
+*line 169
+*line 170
+move.b 5(R13),R0
+ext.w R0
+ext.l R0
+move.b 6(R13),R1
+ext.w R1
+ext.l R1
+add.l R1,R0
+move.l 16(R13),R1
+move.l #$10,R2
+asr.l R2,R1
+and.l #$ffff,R1
+add.l R1,R0
+add.l (R13),R0
+add.l R0,R5
+*line 171
+bra L6
+*line 172
+*line 173
+L31:
+*line 174
+*line 175
+*line 176
+move.b 5(R13),R0
+ext.w R0
+ext.l R0
+move.b 6(R13),R1
+ext.w R1
+ext.l R1
+add.l R1,R0
+add.l (R13),R0
+add.l R0,R5
+*line 177
+clr R4
+bra L6
+*line 178
+bra L6
+L7:sub #1,R0
+cmp #23,R0
+bhi L6
+asl #2,R0
+move R0,R8
+add.l #L32,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L32:.dc.l L11
+.dc.l L12
+.dc.l L13
+.dc.l L21
+.dc.l L19
+.dc.l L20
+.dc.l L9
+.dc.l L22
+.dc.l L14
+.dc.l L15
+.dc.l L23
+.dc.l L24
+.dc.l L25
+.dc.l L30
+.dc.l L28
+.dc.l L16
+.dc.l L29
+.dc.l L17
+.dc.l L18
+.dc.l L26
+.dc.l L31
+.dc.l L27
+.dc.l L8
+.dc.l L10
+.text
+L6:
+*line 179
+*line 180
+*line 181
+move.l 12(R13),R13
+*line 182
+L4:
+*line 183
+tst R4
+bne L5
+L3:
+*line 185
+move.l R5,_schksum
+*line 186
+move.l R7,_snbreq
+*line 187
+move.l R6,R0
+add.l #$3,R0
+asr.l #$2,R0
+move.l R0,_snlreq
+*line 194
+move.l R7,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R4-R7/R13-R13
+unlk R14
+rts
+.globl _scsizer
+.text
+_scsizer:
+~~scsizer:
+link R14,#0
+movem.l R5-R7,-(sp)
+~i=R7
+~nb=R6
+*line 212
+clr.l _sntlreq
+*line 213
+clr.l R6
+*line 215
+clr R7
+bra L36
+L37:
+*line 216
+*line 217
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_nlpersc,R8
+move.l #$0,(R8)
+*line 218
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_scsums,R8
+move.l #$0,(R8)
+*line 219
+*line 220
+add.l #$4,R6
+*line 221
+*line 222
+*line 222
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_scores,R8
+tst.l (R8)
+beq L38
+*line 223
+*line 224
+*line 225
+*line 226
+*line 227
+move R7,(sp)
+jsr _scsize
+add.l #$100,R0
+add.l R0,R6
+*line 228
+*line 229
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_nlpersc,R8
+move.l _snlreq,(R8)
+*line 230
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_scsums,R8
+move.l _schksum,(R8)
+*line 231
+move.l _snlreq,R0
+add.l R0,_sntlreq
+*line 232
+L38:L35:
+*line 215
+add #1,R7
+L36:
+*line 215
+cmp #20,R7
+blt L37
+L34:
+*line 235
+add.l #$4,R6
+*line 242
+move.l R6,_sntbreq
+*line 244
+move.l R6,R0
+bra L33
+L33:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _scwrite
+.text
+_scwrite:
+~~scwrite:
+~fp=R13
+~sn=8
+link R14,#-48
+movem.l R6-R7/R12-R13,-(sp)
+~ep=R12
+~go=R7
+~scid=-48
+*line 265
+move.l 10(R14),R13
+*line 265
+move 8(R14),R8
+add.l R8,R8
+add.l R8,R8
+add.l #_scores,R8
+move.l (R8),R12
+*line 272
+*line 272
+move.l R12,R0
+bne L40
+*line 273
+*line 274
+move 8(R14),(sp)
+add #1,(sp)
+move.l #L41,-(sp)
+move.l R14,-(sp)
+add.l #-48,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 275
+*line 276
+move #9,(sp)
+move #12,-(sp)
+clr.l -(sp)
+move.l R14,-(sp)
+add.l #-48,(sp)
+clr.l -(sp)
+jsr _ldwmsg
+adda.l #14,sp
+*line 277
+*line 278
+*line 279
+move.l #$4,(sp)
+move.l #_m1con,-(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L42
+*line 279
+move #-1,R0
+bra L39
+*line 280
+bra L43
+L42:
+*line 281
+clr R0
+bra L39
+L43:
+*line 282
+*line 283
+L40:
+*line 284
+move 8(R14),(sp)
+add #1,(sp)
+move.l #L44,-(sp)
+move.l R14,-(sp)
+add.l #-48,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 286
+*line 287
+move #9,(sp)
+move #12,-(sp)
+move.l R14,-(sp)
+add.l #-48,(sp)
+clr.l -(sp)
+move.l #L45,-(sp)
+jsr _ldwmsg
+adda.l #14,sp
+*line 289
+*line 290
+move.l #$4,(sp)
+move 8(R14),R0
+asl #2,R0
+ext.l R0
+add.l #_nlpersc,R0
+move.l R0,-(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L46
+*line 290
+move #-1,R0
+bra L39
+*line 291
+L46:
+*line 292
+*line 293
+move.l #$10,(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+add.l #_scname,R0
+move.l R0,-(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L47
+*line 293
+move #-1,R0
+bra L39
+*line 294
+L47:
+*line 295
+*line 296
+move.l #$f0,(sp)
+move 8(R14),R0
+muls #240,R0
+add.l #_stimes,R0
+move.l R0,-(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L48
+*line 296
+move #-1,R0
+bra L39
+*line 297
+L48:
+*line 298
+move #1,R7
+*line 300
+L51:
+*line 301
+*line 302
+move.b 5(R12),R0
+ext.w R0
+bra L53
+*line 303
+L54:
+*line 304
+L55:
+*line 305
+L56:
+*line 306
+*line 307
+*line 308
+*line 309
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #5,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L57
+*line 309
+move #-1,R0
+bra L39
+*line 310
+L57:
+*line 311
+*line 312
+move.l #$4,(sp)
+move.l R12,-(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L58
+*line 312
+move #-1,R0
+bra L39
+*line 313
+L58:bra L52
+*line 314
+*line 315
+L59:
+*line 316
+L60:
+*line 317
+L61:
+*line 318
+L62:
+*line 319
+L63:
+*line 320
+L64:
+*line 321
+L65:
+*line 322
+L66:
+*line 323
+*line 324
+*line 325
+*line 326
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #5,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L67
+*line 326
+move #-1,R0
+bra L39
+*line 327
+L67:
+*line 328
+*line 329
+move.l #$4,(sp)
+move.l R12,-(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L68
+*line 329
+move #-1,R0
+bra L39
+*line 330
+L68:
+*line 331
+*line 332
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #6,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L69
+*line 332
+move #-1,R0
+bra L39
+*line 333
+L69:bra L52
+*line 334
+*line 335
+*line 336
+L70:
+*line 337
+L71:
+*line 338
+L72:
+*line 339
+L73:
+*line 340
+L74:
+*line 341
+L75:
+*line 342
+L76:
+*line 343
+L77:
+*line 344
+*line 345
+*line 346
+*line 347
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #5,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L78
+*line 347
+move #-1,R0
+bra L39
+*line 348
+L78:
+*line 349
+*line 350
+move.l #$4,(sp)
+move.l R12,-(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L79
+*line 350
+move #-1,R0
+bra L39
+*line 351
+L79:
+*line 352
+*line 353
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #6,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L80
+*line 353
+move #-1,R0
+bra L39
+*line 354
+L80:
+*line 355
+*line 356
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #7,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L81
+*line 356
+move #-1,R0
+bra L39
+*line 357
+L81:bra L52
+*line 358
+*line 359
+*line 360
+L82:
+*line 361
+L83:
+*line 362
+*line 363
+*line 364
+*line 365
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #5,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L84
+*line 365
+move #-1,R0
+bra L39
+*line 366
+L84:
+*line 367
+*line 368
+move.l #$4,(sp)
+move.l R12,-(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L85
+*line 368
+move #-1,R0
+bra L39
+*line 369
+L85:
+*line 370
+*line 371
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #6,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L86
+*line 371
+move #-1,R0
+bra L39
+*line 372
+L86:
+*line 373
+*line 374
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #7,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L87
+*line 374
+move #-1,R0
+bra L39
+*line 375
+L87:
+*line 376
+*line 377
+move.l #$2,(sp)
+move.l R12,-(sp)
+add.l #16,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L88
+*line 377
+move #-1,R0
+bra L39
+*line 378
+L88:bra L52
+*line 379
+*line 380
+L89:
+*line 381
+*line 382
+*line 383
+*line 384
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #5,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L90
+*line 384
+move #-1,R0
+bra L39
+*line 385
+L90:
+*line 386
+*line 387
+move.l #$4,(sp)
+move.l R12,-(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L91
+*line 387
+move #-1,R0
+bra L39
+*line 388
+L91:
+*line 389
+*line 390
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #6,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L92
+*line 390
+move #-1,R0
+bra L39
+*line 391
+L92:
+*line 392
+*line 393
+move.l #$2,(sp)
+move.l R12,-(sp)
+add.l #24,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L93
+*line 393
+move #-1,R0
+bra L39
+*line 394
+L93:bra L52
+*line 395
+*line 396
+*line 397
+L94:
+*line 398
+*line 399
+*line 400
+*line 401
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #5,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L95
+*line 401
+move #-1,R0
+bra L39
+*line 402
+L95:
+*line 403
+*line 404
+move.l #$4,(sp)
+move.l R12,-(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L96
+*line 404
+move #-1,R0
+bra L39
+*line 405
+L96:
+*line 406
+*line 407
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #6,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L97
+*line 407
+move #-1,R0
+bra L39
+*line 408
+L97:
+*line 409
+*line 410
+move.l #$2,(sp)
+move.l R12,-(sp)
+add.l #16,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L98
+*line 410
+move #-1,R0
+bra L39
+*line 411
+L98:bra L52
+*line 412
+*line 413
+L99:
+*line 414
+*line 415
+*line 416
+*line 417
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #5,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L100
+*line 417
+move #-1,R0
+bra L39
+*line 418
+L100:
+*line 419
+*line 420
+move.l #$4,(sp)
+move.l R12,-(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L101
+*line 420
+clr R0
+bra L39
+*line 421
+L101:
+*line 422
+*line 423
+move.l #$1,(sp)
+move.l R12,-(sp)
+add.l #6,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L102
+*line 423
+move #-1,R0
+bra L39
+*line 424
+L102:
+*line 425
+clr R7
+*line 426
+*line 430
+bra L52
+*line 431
+*line 432
+bra L52
+L53:sub #1,R0
+cmp #23,R0
+bhi L52
+asl #2,R0
+move R0,R8
+add.l #L103,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L103:.dc.l L59
+.dc.l L60
+.dc.l L61
+.dc.l L70
+.dc.l L82
+.dc.l L83
+.dc.l L55
+.dc.l L71
+.dc.l L62
+.dc.l L63
+.dc.l L72
+.dc.l L73
+.dc.l L74
+.dc.l L94
+.dc.l L77
+.dc.l L64
+.dc.l L89
+.dc.l L65
+.dc.l L66
+.dc.l L75
+.dc.l L99
+.dc.l L76
+.dc.l L54
+.dc.l L56
+.text
+L52:
+*line 433
+*line 434
+*line 435
+move.l 12(R12),R12
+*line 436
+L50:
+*line 437
+tst R7
+bne L51
+L49:
+*line 444
+clr R0
+bra L39
+L39:tst.l (sp)+
+movem.l (sp)+,R7-R7/R12-R13
+unlk R14
+rts
+.data
+L41:.dc.b $73,$63,$6F,$72,$65,$20,$25,$64,$20,$77,$61,$73,$20,$65,$6D,$70,$74,$79,$0
+L44:.dc.b $20,$20,$77,$72,$69,$74,$69,$6E,$67,$20,$73,$63,$6F,$72,$65,$20,$25,$64,$0
+L45:.dc.b $42,$75,$73,$79,$20,$2D,$2D,$20,$50,$6C,$65,$61,$73,$65,$20,$73,$74,$61,$6E,$64,$20,$62,$79,$0
Index: alcyon/seccpy.s
===================================================================
--- alcyon/seccpy.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/seccpy.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1246 @@
+.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 _secopok
+.globl _t_sbgn
+.globl _t_send
+.globl _t_sect
+.globl _t_sec1
+.globl _t_sec2
+.globl _t_cbgn
+.globl _t_cend
+.globl _p_sbgn
+.globl _p_send
+.globl _p_sec1
+.globl _p_sec2
+.globl _p_cbgn
+.globl _p_cend
+.globl _grptran
+.globl _cmgtags
+.globl _cmgtype
+.globl _ehdlist
+.globl _grptmap
+.globl _sec_cpy
+.text
+_sec_cpy:
+~~sec_cpy:
+~ns=R7
+link R14,#0
+movem.l R5-R7/R11-R13,-(sp)
+~cp=R13
+~lp=R12
+~rp=R11
+~newet=R6
+*line 66
+move 8(R14),R7
+*line 68
+move #1,_secopok
+*line 70
+*line 70
+move R7,(sp)
+jsr _chksec
+tst R0
+beq L2
+*line 71
+*line 72
+*line 73
+move #-1,R0
+bra L1
+*line 74
+*line 75
+*line 76
+*line 77
+L2:
+*line 78
+*line 78
+jsr _evleft
+move.l R0,-(sp)
+jsr _sizesec
+cmp.l (sp)+,R0
+ble L3
+*line 79
+*line 80
+*line 81
+move #-1,R0
+bra L1
+*line 82
+*line 83
+*line 84
+*line 85
+L3:
+*line 86
+move.l _scp,R8
+move.l 8(R8),R8
+move.l 8(R8),R8
+move.l (R8),R6
+add.l _t_sect,R6
+*line 88
+*line 88
+tst.l R6
+blt L10000
+cmp.l #$ffffff,R6
+blt L4
+L10000:*line 89
+*line 90
+*line 91
+move #-1,R0
+bra L1
+*line 92
+*line 93
+*line 94
+*line 95
+*line 96
+*line 97
+L4:
+*line 98
+*line 98
+move.l _t_cur,(sp)
+move.l _p_sbgn,-(sp)
+jsr _madjsec
+addq.l #4,sp
+move.l R0,R13
+move.l R13,R0
+bne L5
+*line 99
+*line 100
+*line 101
+move #-1,R0
+bra L1
+*line 102
+*line 103
+*line 104
+*line 105
+L5:
+*line 106
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,R12
+*line 107
+move.l 12(R12),R11
+*line 111
+move.l _t_sect,(sp)
+move.l _t_cur,-(sp)
+move.l R12,-(sp)
+jsr _edelta
+addq.l #8,sp
+*line 115
+move.l _p_cbgn,12(R12)
+*line 116
+move.l _p_cbgn,R8
+move.l R12,8(R8)
+*line 118
+move.l _p_cend,8(R11)
+*line 119
+move.l _p_cend,R8
+move.l R11,12(R8)
+*line 123
+move.l _p_cend,(sp)
+move.l _p_cbgn,-(sp)
+jsr _ehfix
+addq.l #4,sp
+*line 126
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R6-R7/R11-R13
+unlk R14
+rts
+.globl _sec_mrg
+.text
+_sec_mrg:
+~~sec_mrg:
+~ns=R7
+link R14,#0
+movem.l R4-R7/R11-R13,-(sp)
+~cp=R13
+~lp=R12
+~rp=R11
+~newet=R6
+~et=R5
+*line 150
+move 8(R14),R7
+*line 152
+move #1,_secopok
+*line 154
+*line 154
+move R7,(sp)
+jsr _chksec
+tst R0
+beq L7
+*line 155
+*line 156
+*line 157
+move #-1,R0
+bra L6
+*line 158
+*line 159
+*line 160
+*line 161
+L7:
+*line 162
+*line 162
+jsr _evleft
+move.l R0,-(sp)
+jsr _sizesec
+cmp.l (sp)+,R0
+ble L8
+*line 163
+*line 164
+*line 165
+move #-1,R0
+bra L6
+*line 166
+*line 167
+*line 168
+*line 169
+L8:
+*line 170
+move.l _scp,R8
+move.l 8(R8),R8
+move.l 8(R8),R8
+move.l (R8),R6
+add.l _t_sect,R6
+*line 172
+*line 172
+tst.l R6
+blt L10001
+cmp.l #$ffffff,R6
+blt L9
+L10001:*line 173
+*line 174
+*line 175
+move #-1,R0
+bra L6
+*line 176
+*line 177
+*line 178
+*line 179
+*line 180
+*line 181
+L9:
+*line 182
+*line 182
+move.l _t_cur,(sp)
+move.l _p_sbgn,-(sp)
+jsr _madjsec
+addq.l #4,sp
+move.l R0,R13
+move.l R13,R0
+bne L10
+*line 183
+*line 184
+*line 185
+move #-1,R0
+bra L6
+*line 186
+*line 187
+L10:
+*line 190
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,R12
+*line 192
+bra L13
+L12:
+*line 193
+*line 194
+move.l 12(R13),R11
+*line 195
+move.l (R13),(sp)
+clr -(sp)
+move.l R12,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,R12
+*line 196
+move.l R12,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R12
+*line 197
+move.b 5(R13),R5
+ext.w R5
+and #127,R5
+*line 198
+*line 199
+*line 200
+move R5,R8
+add.l R8,R8
+add.l #_ehdlist,R8
+cmp #-1,(R8)
+beq L14
+*line 200
+move R5,R8
+add.l R8,R8
+move.l #_ehdlist,R9
+move 0(R8,R9.l),(sp)
+move.l R13,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 201
+L14:
+*line 202
+move.l R11,R13
+L13:
+*line 203
+move.l R13,R0
+bne L12
+L11:
+*line 206
+clr R0
+bra L6
+L6:tst.l (sp)+
+movem.l (sp)+,R5-R7/R11-R13
+unlk R14
+rts
+.globl _sec_grp
+.text
+_sec_grp:
+~~sec_grp:
+~ns=R7
+link R14,#0
+movem.l R3-R7/R12-R13,-(sp)
+~cp=R13
+~rp=R12
+~et=R6
+~nv=R5
+~grp=R4
+*line 229
+move 8(R14),R7
+*line 231
+move #1,_secopok
+*line 233
+*line 233
+move R7,(sp)
+jsr _chksec
+tst R0
+beq L16
+*line 234
+*line 235
+*line 236
+move #-1,R0
+bra L15
+*line 237
+*line 238
+L16:
+*line 239
+move.l _p_sbgn,R13
+*line 241
+bra L19
+L18:
+*line 242
+*line 243
+move.l 12(R13),R12
+*line 244
+move.b 5(R13),R6
+ext.w R6
+and #127,R6
+*line 245
+*line 246
+*line 246
+move.l #_cmgtags,R8
+tst.b 0(R8,R6)
+beq L20
+*line 247
+*line 248
+*line 249
+move.l #_cmgtype,R8
+tst.b 0(R8,R6)
+beq L10002
+move.b 7(R13),R0
+ext.w R0
+bra L10004
+L10002:move.b 6(R13),R0
+ext.w R0
+L10004:move R0,R4
+and #15,R4
+*line 250
+*line 251
+*line 251
+cmp #5,R6
+beq L10005
+cmp #6,R6
+bne L21
+L10005:*line 252
+*line 253
+*line 254
+*line 255
+*line 256
+move.b 7(R13),R0
+ext.w R0
+and #240,R0
+move R4,R9
+add.l R9,R9
+add.l #_grptmap,R9
+move (R9),R1
+or R1,R0
+move.b R0,7(R13)
+*line 257
+*line 258
+*line 259
+*line 260
+move.b 6(R13),R5
+ext.w R5
+add _grptran,R5
+*line 261
+*line 262
+*line 263
+cmp #127,R5
+ble L22
+*line 263
+move #127,R5
+bra L23
+L22:
+*line 264
+*line 265
+tst R5
+bge L24
+*line 265
+clr R5
+*line 266
+L24:L23:
+*line 267
+move.b R5,6(R13)
+*line 268
+bra L25
+L21:
+*line 269
+*line 269
+cmp #15,R6
+beq L10006
+cmp #14,R6
+bne L26
+L10006:*line 270
+*line 271
+*line 272
+*line 273
+*line 274
+move.b 6(R13),R0
+ext.w R0
+and #15,R0
+move R4,R9
+add.l R9,R9
+add.l #_grptmap,R9
+move (R9),R1
+asl #4,R1
+or R1,R0
+move.b R0,6(R13)
+*line 275
+bra L27
+L26:
+*line 276
+*line 277
+*line 278
+*line 279
+*line 280
+*line 281
+move.l #_cmgtype,R8
+tst.b 0(R8,R6)
+beq L28
+*line 282
+move.b 7(R13),R0
+ext.w R0
+and #240,R0
+move R4,R9
+add.l R9,R9
+add.l #_grptmap,R9
+move (R9),R1
+or R1,R0
+move.b R0,7(R13)
+*line 283
+bra L29
+L28:
+*line 284
+*line 285
+move.b 6(R13),R0
+ext.w R0
+and #240,R0
+move R4,R9
+add.l R9,R9
+add.l #_grptmap,R9
+move (R9),R1
+or R1,R0
+move.b R0,6(R13)
+L29:L27:L25:
+*line 286
+*line 287
+*line 288
+L20:
+*line 289
+move.l R12,R13
+L19:
+*line 290
+cmp.l _p_send,R13
+bne L18
+L17:
+*line 293
+clr R0
+bra L15
+L15:tst.l (sp)+
+movem.l (sp)+,R4-R7/R12-R13
+unlk R14
+rts
+.globl _sec_mov
+.text
+_sec_mov:
+~~sec_mov:
+~ns=R7
+link R14,#0
+movem.l R2-R7/R11-R13,-(sp)
+~cp=R13
+~lp=R12
+~rp=R11
+~newet=R6
+~et=R5
+~grp=R4
+~nv=R3
+*line 317
+move 8(R14),R7
+*line 319
+move #1,_secopok
+*line 321
+*line 321
+move R7,(sp)
+jsr _chksec
+tst R0
+beq L31
+*line 322
+*line 323
+*line 324
+move #-1,R0
+bra L30
+*line 325
+*line 326
+*line 336
+*line 337
+*line 338
+*line 339
+L31:
+*line 340
+*line 340
+move.l _t_cur,R0
+cmp.l _t_sbgn,R0
+blt L32
+move.l _t_cur,R0
+cmp.l _t_send,R0
+bgt L32
+*line 341
+*line 342
+*line 343
+move #-1,R0
+bra L30
+*line 344
+*line 345
+*line 346
+*line 347
+L32:
+*line 348
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,R12
+*line 349
+move.l _p_send,R8
+move.l 12(R8),R13
+*line 358
+move.l _p_sbgn,R8
+move.l 8(R8),R8
+move.l _p_send,R9
+move.l 12(R9),12(R8)
+*line 359
+move.l _p_send,R8
+move.l 12(R8),R8
+move.l _p_sbgn,R9
+move.l 8(R9),8(R8)
+*line 360
+move.l _p_sbgn,R8
+move.l #$0,8(R8)
+*line 361
+move.l _p_send,R8
+move.l #$0,12(R8)
+*line 365
+*line 366
+move.l _t_cur,R0
+cmp.l _t_send,R0
+blt L33
+*line 366
+move.l _t_sect,R0
+sub.l R0,_t_cur
+*line 367
+*line 371
+*line 372
+L33:
+*line 373
+bra L36
+L35:
+*line 374
+*line 375
+move.l _t_sect,R0
+sub.l R0,(R13)
+*line 376
+move.l 12(R13),R13
+L36:
+*line 377
+move.b 5(R13),R5
+ext.w R5
+and #127,R5
+cmp #21,R5
+bne L35
+L34:
+*line 389
+move.l _p_sbgn,R11
+*line 390
+move.l _p_sbgn,R8
+move.l (R8),R6
+*line 392
+bra L39
+L38:
+*line 393
+*line 394
+sub.l R6,(R11)
+*line 395
+move.b 5(R11),R5
+ext.w R5
+and #127,R5
+*line 396
+*line 397
+*line 397
+move.l #_cmgtags,R8
+tst.b 0(R8,R5)
+beq L40
+*line 398
+*line 399
+*line 400
+move.l #_cmgtype,R8
+tst.b 0(R8,R5)
+beq L10007
+move.b 7(R11),R0
+ext.w R0
+bra L10009
+L10007:move.b 6(R11),R0
+ext.w R0
+L10009:move R0,R4
+and #15,R4
+*line 401
+*line 402
+*line 402
+cmp #5,R5
+beq L10010
+cmp #6,R5
+bne L41
+L10010:*line 403
+*line 404
+*line 405
+*line 406
+*line 407
+move.b 7(R11),R0
+ext.w R0
+and #240,R0
+move R4,R9
+add.l R9,R9
+add.l #_grptmap,R9
+move (R9),R1
+or R1,R0
+move.b R0,7(R11)
+*line 408
+*line 409
+*line 410
+*line 411
+move.b 6(R11),R3
+ext.w R3
+add _grptran,R3
+*line 412
+*line 413
+*line 414
+cmp #127,R3
+ble L42
+*line 414
+move #127,R3
+bra L43
+L42:
+*line 415
+*line 416
+tst R3
+bge L44
+*line 416
+clr R3
+*line 417
+L44:L43:
+*line 418
+move.b R3,6(R11)
+*line 419
+bra L45
+L41:
+*line 420
+*line 420
+cmp #15,R5
+beq L10011
+cmp #14,R5
+bne L46
+L10011:*line 421
+*line 422
+*line 423
+*line 424
+*line 425
+move.b 6(R11),R0
+ext.w R0
+and #15,R0
+move R4,R9
+add.l R9,R9
+add.l #_grptmap,R9
+move (R9),R1
+asl #4,R1
+or R1,R0
+move.b R0,6(R11)
+*line 426
+bra L47
+L46:
+*line 427
+*line 428
+*line 429
+*line 430
+*line 431
+*line 432
+move.l #_cmgtype,R8
+tst.b 0(R8,R5)
+beq L48
+*line 433
+move.b 7(R11),R0
+ext.w R0
+and #240,R0
+move R4,R9
+add.l R9,R9
+add.l #_grptmap,R9
+move (R9),R1
+or R1,R0
+move.b R0,7(R11)
+*line 434
+bra L49
+L48:
+*line 435
+*line 436
+move.b 6(R11),R0
+ext.w R0
+and #240,R0
+move R4,R9
+add.l R9,R9
+add.l #_grptmap,R9
+move (R9),R1
+or R1,R0
+move.b R0,6(R11)
+L49:L47:L45:
+*line 437
+*line 438
+*line 439
+L40:
+*line 440
+*line 441
+move R5,R8
+add.l R8,R8
+add.l #_ehdlist,R8
+cmp #-1,(R8)
+beq L50
+*line 441
+move R5,R8
+add.l R8,R8
+move.l #_ehdlist,R9
+move 0(R8,R9.l),(sp)
+move.l R11,-(sp)
+jsr _eh_rmv
+addq.l #4,sp
+*line 442
+L50:
+*line 443
+move.l 12(R11),R11
+L39:
+*line 444
+move.l R11,R0
+bne L38
+L37:
+*line 446
+move.l 12(R12),R11
+*line 450
+move.l _p_sbgn,R8
+move.l R12,8(R8)
+*line 451
+move.l _p_send,R8
+move.l R11,12(R8)
+*line 452
+move.l _p_sbgn,12(R12)
+*line 453
+move.l _p_send,8(R11)
+*line 459
+move.l _p_sbgn,R13
+*line 460
+move.l _t_cur,R6
+*line 468
+bra L53
+L52:
+*line 469
+*line 470
+move.b 5(R13),R5
+ext.w R5
+and #127,R5
+*line 471
+add.l R6,(R13)
+*line 472
+*line 473
+*line 474
+move R5,R8
+add.l R8,R8
+add.l #_ehdlist,R8
+cmp #-1,(R8)
+beq L54
+*line 474
+move R5,R8
+add.l R8,R8
+move.l #_ehdlist,R9
+move 0(R8,R9.l),(sp)
+move.l R13,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 475
+L54:
+*line 476
+move.l 12(R13),R13
+L53:
+*line 477
+cmp.l R11,R13
+bne L52
+L51:
+*line 487
+bra L57
+L56:
+*line 488
+*line 489
+move.l _t_sect,R0
+add.l R0,(R13)
+*line 490
+move.l 12(R13),R13
+L57:
+*line 491
+move.b 5(R13),R5
+ext.w R5
+and #127,R5
+cmp #21,R5
+bne L56
+L55:
+*line 494
+clr R0
+bra L30
+L30:tst.l (sp)+
+movem.l (sp)+,R3-R7/R11-R13
+unlk R14
+rts
+.globl _sec_rmv
+.text
+_sec_rmv:
+~~sec_rmv:
+~ns=R7
+link R14,#-4
+movem.l R5-R7/R11-R13,-(sp)
+~cp=R13
+~lp=R12
+~rp=R11
+~et=R6
+~pp=-4
+*line 518
+move 8(R14),R7
+*line 520
+move #1,_secopok
+*line 522
+*line 522
+move R7,(sp)
+jsr _chksec
+tst R0
+beq L59
+*line 523
+*line 524
+*line 525
+move #-1,R0
+bra L58
+*line 526
+*line 527
+L59:
+*line 528
+move.l _p_send,R8
+move.l 12(R8),R13
+move.l R13,-4(R14)
+*line 547
+move.l _p_sbgn,R8
+move.l 8(R8),R8
+move.l _p_send,R9
+move.l 12(R9),12(R8)
+*line 548
+move.l _p_send,R8
+move.l 12(R8),R8
+move.l _p_sbgn,R9
+move.l 8(R9),8(R8)
+*line 549
+move.l _p_sbgn,R8
+move.l #$0,8(R8)
+*line 550
+move.l _p_send,R8
+move.l #$0,12(R8)
+*line 554
+*line 555
+move.l _t_cur,R0
+cmp.l _t_send,R0
+blt L60
+*line 555
+move.l _t_sect,R0
+sub.l R0,_t_cur
+*line 556
+*line 560
+*line 561
+L60:
+*line 562
+bra L63
+L62:
+*line 563
+*line 564
+move.l _t_sect,R0
+sub.l R0,(R13)
+*line 565
+move.l 12(R13),R13
+L63:
+*line 566
+move.b 5(R13),R6
+ext.w R6
+and #127,R6
+cmp #21,R6
+bne L62
+L61:
+*line 576
+move.l _p_sbgn,R11
+*line 578
+bra L66
+L65:
+*line 579
+*line 580
+move.l 12(R11),R12
+*line 581
+move.b 5(R11),R6
+ext.w R6
+and #127,R6
+*line 582
+*line 583
+*line 584
+cmp.l _p_bak,R11
+bne L67
+*line 584
+move.l -4(R14),_p_bak
+*line 585
+L67:
+*line 586
+*line 587
+cmp.l _p_cur,R11
+bne L68
+*line 587
+move.l -4(R14),_p_cur
+*line 588
+L68:
+*line 589
+*line 590
+cmp.l _p_ctr,R11
+bne L69
+*line 590
+move.l -4(R14),_p_ctr
+*line 591
+L69:
+*line 592
+*line 593
+cmp.l _p_fwd,R11
+bne L70
+*line 593
+move.l -4(R14),_p_fwd
+*line 594
+L70:
+*line 595
+*line 596
+move R6,R8
+add.l R8,R8
+add.l #_ehdlist,R8
+cmp #-1,(R8)
+beq L71
+*line 596
+move R6,R8
+add.l R8,R8
+move.l #_ehdlist,R9
+move 0(R8,R9.l),(sp)
+move.l R11,-(sp)
+jsr _eh_rmv
+addq.l #4,sp
+*line 597
+L71:
+*line 598
+move.l R11,(sp)
+jsr _e_rmv
+move.l R0,(sp)
+jsr _e_del
+*line 599
+move.l R12,R11
+L66:
+*line 600
+move.l R11,R0
+bne L65
+L64:
+*line 602
+move _curscor,R0
+muls #80,R0
+move R7,R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+add.l #_seclist,R0
+move.l R0,R8
+move.l #$0,(R8)
+*line 604
+clr R0
+bra L58
+L58:tst.l (sp)+
+movem.l (sp)+,R6-R7/R11-R13
+unlk R14
+rts
+.globl _sec_dgr
+.text
+_sec_dgr:
+~~sec_dgr:
+~ns=R7
+link R14,#0
+movem.l R6-R7/R12-R13,-(sp)
+~lp=R13
+~rp=R12
+*line 626
+move 8(R14),R7
+*line 628
+move #1,_secopok
+*line 630
+*line 630
+move R7,(sp)
+jsr _chksec
+tst R0
+beq L73
+*line 631
+*line 632
+*line 633
+move #-1,R0
+bra L72
+*line 634
+*line 635
+*line 645
+*line 646
+*line 647
+*line 648
+*line 649
+*line 650
+L73:
+*line 653
+move.l _p_sbgn,R8
+move.l 12(R8),R12
+*line 655
+bra L76
+L75:
+*line 656
+*line 657
+move.l 12(R12),R13
+*line 658
+*line 659
+*line 659
+move.l R12,(sp)
+jsr _oktodg
+tst R0
+beq L77
+*line 660
+*line 661
+*line 662
+cmp.l _p_bak,R12
+bne L78
+*line 662
+move.l R13,_p_bak
+*line 663
+L78:
+*line 664
+*line 665
+cmp.l _p_cur,R12
+bne L79
+*line 665
+move.l R13,_p_cur
+*line 666
+L79:
+*line 667
+*line 668
+cmp.l _p_ctr,R12
+bne L80
+*line 668
+move.l R13,_p_ctr
+*line 669
+L80:
+*line 670
+*line 671
+cmp.l _p_fwd,R12
+bne L81
+*line 671
+move.l R13,_p_fwd
+*line 672
+L81:
+*line 673
+move.l R12,(sp)
+jsr _e_rmv
+move.l R0,(sp)
+jsr _e_del
+*line 674
+*line 675
+L77:
+*line 676
+move.l R13,R12
+L76:
+*line 677
+cmp.l _p_send,R12
+bne L75
+L74:
+*line 680
+clr R0
+bra L72
+L72:tst.l (sp)+
+movem.l (sp)+,R7-R7/R12-R13
+unlk R14
+rts
+.globl _sec_dev
+.text
+_sec_dev:
+~~sec_dev:
+~ns=R7
+link R14,#0
+movem.l R6-R7/R12-R13,-(sp)
+~lp=R13
+~rp=R12
+*line 702
+move 8(R14),R7
+*line 704
+move #1,_secopok
+*line 706
+*line 706
+move R7,(sp)
+jsr _chksec
+tst R0
+beq L83
+*line 707
+*line 708
+*line 709
+move #-1,R0
+bra L82
+*line 710
+*line 711
+*line 721
+*line 722
+*line 723
+*line 724
+*line 725
+*line 726
+L83:
+*line 729
+move.l _p_sbgn,R8
+move.l 12(R8),R12
+*line 731
+bra L86
+L85:
+*line 732
+*line 733
+move.l 12(R12),R13
+*line 734
+*line 735
+*line 735
+move.l R12,(sp)
+jsr _oktode
+tst R0
+beq L87
+*line 736
+*line 737
+*line 738
+cmp.l _p_bak,R12
+bne L88
+*line 738
+move.l R13,_p_bak
+*line 739
+L88:
+*line 740
+*line 741
+cmp.l _p_cur,R12
+bne L89
+*line 741
+move.l R13,_p_cur
+*line 742
+L89:
+*line 743
+*line 744
+cmp.l _p_ctr,R12
+bne L90
+*line 744
+move.l R13,_p_ctr
+*line 745
+L90:
+*line 746
+*line 747
+cmp.l _p_fwd,R12
+bne L91
+*line 747
+move.l R13,_p_fwd
+*line 748
+L91:
+*line 749
+move.l R12,(sp)
+jsr _e_rmv
+move.l R0,(sp)
+jsr _e_del
+*line 750
+*line 751
+L87:
+*line 752
+move.l R13,R12
+L86:
+*line 753
+cmp.l _p_send,R12
+bne L85
+L84:
+*line 756
+clr R0
+bra L82
+L82:tst.l (sp)+
+movem.l (sp)+,R7-R7/R12-R13
+unlk R14
+rts
+.data
Index: alcyon/sedump.s
===================================================================
--- alcyon/sedump.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/sedump.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,2052 @@
+.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 _secopok
+.globl _t_sbgn
+.globl _t_send
+.globl _t_sect
+.globl _t_sec1
+.globl _t_sec2
+.globl _t_cbgn
+.globl _t_cend
+.globl _p_sbgn
+.globl _p_send
+.globl _p_sec1
+.globl _p_sec2
+.globl _p_cbgn
+.globl _p_cend
+.globl _scrl
+.globl _curfunc
+.globl _curvce
+.globl _sbase
+.globl _sd
+.globl _se
+.globl _soffset
+.globl _subj
+.globl _varmode
+.globl _gdstbc
+.globl _gdstbn
+.globl _gdstbp
+.globl _gdfsep
+.globl _gdfsl
+.globl _vbufs
+.globl _idbxlbl
+.globl _osclbl
+.globl _A6PTR
+.data
+_A6PTR:
+.dc.l $0
+.globl _A7PTR
+.data
+_A7PTR:
+.dc.l $0
+.globl _A7TOP
+.data
+_A7TOP:
+.dc.l $FFFFF
+.globl _SCnumv
+.data
+_SCnumv:
+.dc.w $0
+.globl _SL_Flag
+.comm _SL_Flag,2
+.globl _x_unrec
+.comm _x_unrec,2
+.globl _SCdlim
+.data
+_SCdlim:
+.dc.l $8000
+.globl _evkinds
+.data
+_evkinds:
+*line 59
+.dc.l L1
+*line 59
+.dc.l L2
+*line 60
+.dc.l L3
+*line 60
+.dc.l L4
+*line 61
+.dc.l L5
+*line 61
+.dc.l L6
+*line 62
+.dc.l L7
+*line 62
+.dc.l L8
+*line 63
+.dc.l L9
+*line 63
+.dc.l L10
+*line 64
+.dc.l L11
+*line 64
+.dc.l L12
+*line 65
+.dc.l L13
+*line 65
+.dc.l L14
+*line 66
+.dc.l L15
+*line 66
+.dc.l L16
+*line 67
+.dc.l L17
+*line 67
+.dc.l L18
+*line 68
+.dc.l L19
+*line 68
+.dc.l L20
+*line 69
+.dc.l L21
+*line 69
+.dc.l L22
+*line 70
+.dc.l L23
+*line 71
+.dc.l L24
+.ds.b 4
+.globl _hpname
+.data
+_hpname:
+*line 75
+.dc.l L25
+*line 75
+.dc.l L26
+*line 75
+.dc.l L27
+*line 75
+.dc.l L28
+*line 76
+.dc.l L29
+*line 76
+.dc.l L30
+*line 76
+.dc.l L31
+*line 76
+.dc.l L32
+*line 77
+.dc.l L33
+*line 77
+.dc.l L34
+*line 77
+.dc.l L35
+*line 78
+.dc.l L36
+.globl _var_lbl
+.data
+_var_lbl:
+*line 82
+.dc.l L37
+*line 82
+.dc.l L38
+*line 82
+.dc.l L39
+*line 82
+.dc.l L40
+*line 83
+.dc.l L41
+*line 84
+.dc.l L42
+.globl _srcname
+.data
+_srcname:
+*line 88
+.dc.l L43
+*line 88
+.dc.l L44
+*line 88
+.dc.l L45
+*line 88
+.dc.l L46
+*line 88
+.dc.l L47
+*line 88
+.dc.l L48
+*line 88
+.dc.l L49
+*line 88
+.dc.l L50
+*line 89
+.dc.l L51
+*line 89
+.dc.l L52
+*line 89
+.dc.l L53
+*line 89
+.dc.l L54
+*line 89
+.dc.l L55
+*line 90
+.dc.l L56
+.globl _actname
+.data
+_actname:
+*line 94
+.dc.l L57
+*line 94
+.dc.l L58
+*line 94
+.dc.l L59
+*line 94
+.dc.l L60
+*line 94
+.dc.l L61
+*line 94
+.dc.l L62
+*line 94
+.dc.l L63
+*line 95
+.dc.l L64
+.globl _ev_kind
+.text
+_ev_kind:
+~~ev_kind:
+~sep=8
+link R14,#-4
+*line 112
+*line 112
+move.l 8(R14),R8
+move.b 5(R8),R0
+ext.w R0
+and #255,R0
+cmp #25,R0
+blt L66
+*line 113
+*line 114
+move #1,_x_unrec
+*line 115
+clr.l R0
+bra L65
+*line 116
+*line 117
+L66:
+*line 118
+clr _x_unrec
+*line 120
+move.l 8(R14),R8
+move.b 5(R8),R0
+ext.w R0
+move R0,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_evkinds,R9
+move.l 0(R8,R9.l),R0
+bra L65
+L65:unlk R14
+rts
+.globl _SEctrl
+.text
+_SEctrl:
+~~SEctrl:
+link R14,#-4
+*line 134
+*line 135
+move.l _scp,(sp)
+move _cursect,-(sp)
+move _curscor,R0
+asl #4,R0
+ext.l R0
+add.l #_scname,R0
+move.l R0,-(sp)
+move _curscor,-(sp)
+move.l #L68,-(sp)
+jsr _printf
+adda.l #12,sp
+*line 138
+*line 139
+move _fc_sw,(sp)
+move.l _fc_val,-(sp)
+move.l #L69,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 142
+*line 143
+move.l _t_fwd,(sp)
+move.l _t_ctr,-(sp)
+move.l _t_cur,-(sp)
+move.l _t_bak,-(sp)
+move.l #L70,-(sp)
+jsr _printf
+adda.l #16,sp
+*line 145
+*line 146
+move.l _p_fwd,(sp)
+move.l _p_ctr,-(sp)
+move.l _p_cur,-(sp)
+move.l _p_bak,-(sp)
+move.l #L71,-(sp)
+jsr _printf
+adda.l #16,sp
+L67:unlk R14
+rts
+.globl _SEsnap
+.text
+_SEsnap:
+~~SEsnap:
+link R14,#0
+movem.l R5-R7,-(sp)
+~i=R7
+~j=R6
+*line 160
+move.l #L73,(sp)
+jsr _printf
+*line 162
+*line 163
+move.l _frags,(sp)
+move.l _spcount,-(sp)
+jsr _evleft
+move.l R0,-(sp)
+move.l #L74,-(sp)
+jsr _printf
+adda.l #12,sp
+*line 165
+*line 166
+move.l _se3_cnt,(sp)
+move.l _se2_cnt,-(sp)
+move.l _se1_cnt,-(sp)
+move.l #L75,-(sp)
+jsr _printf
+adda.l #12,sp
+*line 168
+*line 169
+move.l _size3,(sp)
+move.l _size2,-(sp)
+move.l _size1,-(sp)
+move.l _pspool,-(sp)
+move.l #L76,-(sp)
+jsr _printf
+adda.l #16,sp
+*line 171
+jsr _SEctrl
+*line 173
+clr R7
+bra L79
+L80:
+*line 174
+*line 175
+*line 176
+cmp _curscor,R7
+bne L10000
+move.l #L82,(sp)
+bra L10002
+L10000:move.l #L83,(sp)
+L10002:move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_scores,R9
+move.l 0(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_scname,R0
+move.l R0,-(sp)
+move R7,-(sp)
+add #1,(sp)
+move.l #L81,-(sp)
+jsr _printf
+adda.l #14,sp
+L78:
+*line 173
+add #1,R7
+L79:
+*line 173
+cmp #20,R7
+blt L80
+L77:
+*line 178
+move.l #L84,(sp)
+jsr _printf
+*line 180
+move.l #L85,(sp)
+jsr _printf
+*line 182
+move.l #L86,(sp)
+jsr _printf
+*line 183
+move.l #L87,(sp)
+jsr _printf
+*line 185
+clr R7
+bra L90
+L91:
+*line 186
+*line 187
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_var_lbl,R9
+move.l 0(R8,R9.l),(sp)
+move R7,-(sp)
+move.l #L92,-(sp)
+jsr _printf
+addq.l #6,sp
+*line 188
+*line 189
+clr R6
+bra L95
+L96:
+*line 190
+move R7,R0
+asl #5,R0
+ext.l R0
+move R6,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_varmode,R9
+move 0(R8,R9.l),(sp)
+move.l #L97,-(sp)
+jsr _printf
+addq.l #4,sp
+L94:
+*line 189
+add #1,R6
+L95:
+*line 189
+cmp #12,R6
+blt L96
+L93:
+*line 190
+*line 191
+*line 192
+move.l #L98,(sp)
+jsr _printf
+L89:
+*line 185
+add #1,R7
+L90:
+*line 185
+cmp #6,R7
+blt L91
+L88:
+*line 195
+move.l #L99,(sp)
+jsr _printf
+L72:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _SEdump
+.text
+_SEdump:
+~~SEdump:
+~sep=8
+link R14,#-8
+~et=-4
+*line 215
+move #1,_x_unrec
+*line 217
+move.l 8(R14),R8
+move.b 4(R8),R0
+ext.w R0
+bra L102
+*line 218
+L103:
+*line 219
+L104:
+*line 220
+L105:
+*line 221
+*line 222
+bra L101
+*line 223
+*line 224
+L106:
+*line 225
+*line 226
+*line 227
+*line 228
+move.l 8(R14),R8
+move.b 4(R8),R0
+ext.w R0
+move R0,(sp) 
+move.l 8(R14),-(sp)
+move.l #L107,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 229
+*line 230
+move.l 8(R14),R0
+bra L100
+bra L101
+L102:cmp #5,R0
+beq L103
+cmp #6,R0
+beq L104
+cmp #8,R0
+beq L105
+bra L106
+L101:
+*line 233
+*line 233
+move.l 8(R14),(sp)
+jsr _ev_kind
+move.l R0,-4(R14)
+bne L108
+*line 234
+*line 235
+*line 236
+move.l 8(R14),R8
+move.b 5(R8),R0
+ext.w R0
+move R0,(sp) 
+move.l 8(R14),-(sp)
+move.l #L109,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 237
+*line 238
+move.l 8(R14),R0
+bra L100
+*line 239
+*line 240
+L108:
+*line 241
+clr _x_unrec
+*line 243
+*line 244
+move.l -4(R14),(sp)
+move.l 8(R14),R8
+move.l 8(R8),-(sp)
+move.l 8(R14),R8
+move.l 12(R8),-(sp)
+move.l 8(R14),R8
+move.l (R8),-(sp)
+move.l 8(R14),-(sp)
+move.l #L110,-(sp)
+jsr _printf
+adda.l #20,sp
+*line 246
+*line 247
+move.l 8(R14),R8
+move.b 7(R8),R0
+ext.w R0
+move R0,(sp) 
+and #255,(sp)
+move.l 8(R14),R8
+move.b 6(R8),R0
+ext.w R0
+move R0,-(sp) 
+and #255,(sp)
+move.l #L111,-(sp)
+jsr _printf
+addq.l #6,sp
+*line 249
+*line 250
+move.l 8(R14),R8
+cmp.b #5,4(R8)
+bne L112
+*line 251
+*line 252
+move.l 8(R14),R8
+move 18(R8),R0
+ext.l R0
+move.l R0,(sp)
+move.l 8(R14),R8
+move 16(R8),R0
+ext.l R0
+move.l R0,-(sp)
+move.l #L113,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 253
+L112:
+*line 254
+move.l #L114,(sp)
+jsr _printf
+*line 256
+*line 257
+move.l 8(R14),R8
+cmp.b #5,4(R8)
+ble L115
+*line 258
+move.l 8(R14),R8
+move.l 16(R8),(sp)
+move.l 8(R14),R8
+move.l 20(R8),-(sp)
+move.l #L116,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 259
+bra L117
+L115:
+*line 260
+move.l 8(R14),R0
+bra L100
+L117:
+*line 262
+*line 263
+move.l 8(R14),R8
+cmp.b #6,4(R8)
+ble L118
+*line 264
+move.l 8(R14),R8
+move.l 28(R8),(sp)
+move.l 8(R14),R8
+move.l 24(R8),-(sp)
+move.l #L119,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 265
+L118:
+*line 266
+move.l #L120,(sp)
+jsr _printf
+*line 268
+move.l 8(R14),R0
+bra L100
+L100:unlk R14
+rts
+.globl _SEchase
+.text
+_SEchase:
+~~SEchase:
+~ep=R13
+~n=R7
+link R14,#0
+movem.l R5-R7/R12-R13,-(sp)
+~i=R6
+~np=R12
+*line 289
+move.l 8(R14),R13
+*line 289
+move.l 12(R14),R7
+*line 289
+move.l #L122,(sp)
+jsr _printf
+*line 291
+*line 291
+move.l R13,R0
+bne L123
+*line 292
+*line 293
+move.l #L124,(sp)
+jsr _printf
+*line 294
+move.l _scp,R0
+bra L121
+*line 295
+*line 296
+L123:
+*line 297
+*line 298
+move.l #L125,(sp)
+move.l R13,-(sp)
+jsr _Pcheck
+addq.l #4,sp
+tst R0
+beq L126
+*line 298
+move.l _scp,R0
+bra L121
+*line 299
+L126:
+*line 300
+clr.l R6
+bra L129
+L130:
+*line 301
+*line 302
+move.l R13,(sp)
+jsr _SEdump
+*line 303
+*line 304
+*line 305
+cmp.b #21,5(R13)
+beq L10003
+tst _x_unrec
+beq L131
+L10003:*line 305
+move.l _scp,R0
+bra L121
+*line 306
+L131:
+*line 307
+move.l 12(R13),R12
+*line 308
+*line 309
+*line 310
+move.l #L132,(sp)
+move.l R12,-(sp)
+jsr _Pcheck
+addq.l #4,sp
+tst R0
+beq L133
+*line 310
+move.l _scp,R0
+bra L121
+*line 311
+L133:
+*line 312
+*line 313
+move.l #L134,(sp)
+move.l 8(R13),-(sp)
+jsr _Pcheck
+addq.l #4,sp
+tst R0
+beq L135
+*line 313
+move.l _scp,R0
+bra L121
+*line 314
+L135:
+*line 315
+move.l R12,R13
+L128:
+*line 300
+add.l #$1,R6
+L129:
+*line 300
+cmp.l R7,R6
+blt L130
+L127:
+*line 318
+move.l #L136,(sp)
+jsr _printf
+*line 320
+move.l R13,R0
+bra L121
+L121:tst.l (sp)+
+movem.l (sp)+,R6-R7/R12-R13
+unlk R14
+rts
+.globl _SLdump
+.text
+_SLdump:
+~~SLdump:
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~i=R7
+~gp=R13
+*line 337
+move.l #L138,(sp)
+jsr _printf
+*line 339
+*line 340
+move _scrl,(sp)
+move _soffset,-(sp)
+move _sbase,-(sp)
+tst _se
+beq L10004
+move.l #L142,-(sp)
+bra L10006
+L10004:move.l #L143,-(sp)
+L10006:tst _sd
+beq L10007
+move.l #L140,-(sp)
+bra L10009
+L10007:move.l #L141,-(sp)
+L10009:move.l #L139,-(sp)
+jsr _printf
+adda.l #16,sp
+*line 342
+move.l _gdfsep,(sp)
+move.l #L144,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 344
+move.l #L145,(sp)
+jsr _printf
+*line 345
+move.l #_gdstbn,(sp)
+move.l #_gdstbc,-(sp)
+move.l #_gdstbp,-(sp)
+move.l #L146,-(sp)
+jsr _printf
+adda.l #12,sp
+*line 346
+move.l #L147,(sp)
+jsr _printf
+*line 348
+clr R7
+bra L150
+L151:
+*line 349
+*line 350
+*line 351
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_gdstbn,R9
+move.l 0(R8,R9.l),(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_gdstbc,R9
+move.l 0(R8,R9.l),-(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_gdstbp,R9
+move.l 0(R8,R9.l),-(sp)
+move R7,-(sp)
+add #1,(sp)
+move.l #L152,-(sp)
+jsr _printf
+adda.l #14,sp
+*line 352
+*line 353
+*line 354
+cmp #11,R7
+bne L153
+*line 354
+move.l #L154,(sp)
+jsr _printf
+L153:L149:
+*line 348
+add #1,R7
+L150:
+*line 348
+cmp #17,R7
+blt L151
+L148:
+*line 357
+move.l #L155,(sp)
+jsr _printf
+*line 359
+*line 360
+tst _SL_Flag
+bne L156
+*line 360
+jsr _xtrap15
+*line 361
+L156:
+*line 362
+clr _SL_Flag
+L137:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _SECdump
+.text
+_SECdump:
+~~SECdump:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 378
+*line 379
+move.l _p_send,(sp)
+move.l _p_sbgn,-(sp)
+move.l #L158,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 381
+*line 382
+move.l _t_sect,(sp)
+move.l _t_send,-(sp)
+move.l _t_sbgn,-(sp)
+move.l #L159,-(sp)
+jsr _printf
+adda.l #12,sp
+*line 385
+*line 386
+move.l _p_cend,(sp)
+move.l _p_cbgn,-(sp)
+move.l #L160,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 388
+*line 389
+move.l _t_cend,(sp)
+move.l _t_cbgn,-(sp)
+move.l #L161,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 392
+move.l #L162,(sp)
+jsr _printf
+*line 393
+move.l #L163,(sp)
+jsr _printf
+*line 395
+move.l #L164,(sp)
+jsr _printf
+*line 397
+clr R7
+bra L167
+L168:
+*line 398
+*line 399
+move _curscor,R0
+muls #80,R0
+move R7,R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_seclist,R9
+move.l 0(R8,R9.l),(sp)
+move R7,-(sp)
+add #1,(sp)
+move.l #L169,-(sp)
+jsr _printf
+addq.l #6,sp
+*line 400
+*line 401
+*line 402
+move R7,R0
+add #1,R0
+cmp #20,R0
+bge L170
+*line 402
+move _curscor,R0
+muls #80,R0
+move R7,R1
+add #1,R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_seclist,R9
+move.l 0(R8,R9.l),(sp)
+move R7,-(sp)
+add #2,(sp)
+move.l #L171,-(sp)
+jsr _printf
+addq.l #6,sp
+*line 403
+L170:
+*line 404
+*line 405
+move R7,R0
+add #2,R0
+cmp #20,R0
+bge L172
+*line 405
+move _curscor,R0
+muls #80,R0
+move R7,R1
+add #2,R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_seclist,R9
+move.l 0(R8,R9.l),(sp)
+move R7,-(sp)
+add #3,(sp)
+move.l #L173,-(sp)
+jsr _printf
+addq.l #6,sp
+*line 406
+L172:
+*line 407
+*line 408
+move R7,R0
+add #3,R0
+cmp #20,R0
+bge L174
+*line 408
+move _curscor,R0
+muls #80,R0
+move R7,R1
+add #3,R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_seclist,R9
+move.l 0(R8,R9.l),(sp)
+move R7,-(sp)
+add #4,(sp)
+move.l #L175,-(sp)
+jsr _printf
+addq.l #6,sp
+*line 409
+L174:
+*line 410
+*line 411
+move R7,R0
+add #4,R0
+cmp #20,R0
+bge L176
+*line 411
+move _curscor,R0
+muls #80,R0
+move R7,R1
+add #4,R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_seclist,R9
+move.l 0(R8,R9.l),(sp)
+move R7,-(sp)
+add #5,(sp)
+move.l #L177,-(sp)
+jsr _printf
+addq.l #6,sp
+*line 412
+L176:
+*line 413
+move.l #L178,(sp)
+jsr _printf
+L166:
+*line 397
+add #5,R7
+L167:
+*line 397
+cmp #20,R7
+blt L168
+L165:
+*line 416
+move.l #L179,(sp)
+jsr _printf
+*line 418
+move.l #L180,(sp)
+jsr _printf
+*line 419
+move.l #L181,(sp)
+jsr _printf
+*line 420
+move.l #L182,(sp)
+jsr _printf
+*line 422
+clr R7
+bra L185
+L186:
+*line 423
+move _curscor,R0
+muls #48,R0
+move R7,R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_hplist,R9
+move.l 0(R8,R9.l),(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_hpname,R9
+move.l 0(R8,R9.l),-(sp)
+move.l #L187,-(sp)
+jsr _printf
+addq.l #8,sp
+L184:
+*line 422
+add #1,R7
+L185:
+*line 422
+cmp #12,R7
+blt L186
+L183:
+*line 425
+move.l #L188,(sp)
+jsr _printf
+L157:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _DOA
+.text
+_DOA:
+~~DOA:
+link R14,#0
+movem.l R6-R7/R11-R13,-(sp)
+~olda6=R13
+~cura6=R12
+~n=R7
+~prptr=R11
+*line 442
+*line 442
+tst.l _A6PTR
+beq L190
+tst.l _A7PTR
+beq L190
+*line 443
+*line 444
+move.l _A7TOP,(sp)
+move.l _A7PTR,-(sp)
+move.l #L191,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 445
+move.l _A7PTR,(sp)
+move.l _A7TOP,-(sp)
+move.l _A7PTR,-(sp)
+jsr _mdump
+addq.l #8,sp
+*line 446
+move.l #L192,(sp)
+jsr _printf
+*line 447
+move.l _A6PTR,(sp)
+move.l #L193,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 448
+move.l #L194,(sp)
+jsr _printf
+*line 449
+bra L195
+L190:
+*line 450
+*line 451
+*line 452
+*line 453
+move.l #_A7PTR,(sp)
+move.l #_A6PTR,-(sp)
+move.l #L196,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 454
+*line 455
+jsr _xtrap15
+L195:
+*line 458
+move.l _A6PTR,R12
+*line 460
+bra L199
+L198:
+*line 461
+*line 462
+move.l (R12),R13
+*line 463
+*line 464
+*line 465
+move.l #$10,R8
+move.l 0(R12,R8.l),(sp)
+move.l R13,-(sp)
+move.l R12,-(sp)
+move.l #L200,-(sp)
+jsr _printf
+adda.l #12,sp
+*line 466
+*line 467
+move.l R12,R11
+add.l #$20,R11
+*line 468
+move #8,R7
+*line 469
+*line 470
+bra L203
+L202:
+*line 471
+*line 472
+*line 473
+move (R11),(sp)
+move.l R11,-(sp)
+move R7,-(sp)
+move.l #L204,-(sp)
+jsr _printf
+adda.l #10,sp
+*line 474
+*line 475
+add #2,R7
+*line 476
+add.l #2,R11
+L203:
+*line 477
+cmp.l R13,R11
+blo L202
+L201:
+*line 478
+*line 479
+move.l R13,R12
+L199:
+*line 480
+move.l R12,R0
+bne L198
+L197:
+*line 482
+jsr _xtrap15
+L189:tst.l (sp)+
+movem.l (sp)+,R7-R7/R11-R13
+unlk R14
+rts
+.globl _SCPanic
+.text
+_SCPanic:
+~~SCPanic:
+link R14,#-4
+*line 496
+jsr _SEsnap
+*line 497
+jsr _xtrap15
+L205:unlk R14
+rts
+.globl _SCdump
+.text
+_SCdump:
+~~SCdump:
+link R14,#-4
+*line 508
+jsr _SEsnap
+*line 509
+jsr _SECdump
+*line 510
+move.l _SCdlim,(sp)
+move.l _scp,-(sp)
+jsr _SEchase
+addq.l #4,sp
+*line 511
+jsr _xtrap15
+L206:unlk R14
+rts
+.globl _SCcrash
+.text
+_SCcrash:
+~~SCcrash:
+link R14,#-4
+*line 522
+move #1,_SL_Flag
+*line 523
+jsr _SLdump
+*line 524
+jsr _SCdump
+L207:unlk R14
+rts
+.globl _SCtimes
+.text
+_SCtimes:
+~~SCtimes:
+link R14,#-4
+*line 535
+jsr _SEctrl
+*line 536
+jsr _xtrap15
+L208:unlk R14
+rts
+.globl _SCslice
+.text
+_SCslice:
+~~SCslice:
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~i=R7
+~s=R6
+~gp=R13
+*line 555
+clr R6
+*line 557
+clr R7
+bra L212
+L213:
+*line 558
+*line 559
+*line 559
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_gdstbp,R8
+move.l (R8),R13
+move.l R13,R0
+beq L214
+*line 560
+*line 561
+*line 561
+tst R6
+bne L215
+*line 562
+*line 563
+move.l #L216,(sp)
+jsr _printf
+*line 564
+move #1,R6
+*line 565
+*line 566
+L215:
+*line 567
+bra L219
+L218:
+*line 568
+*line 569
+*line 570
+move 6(R13),(sp)
+move 4(R13),-(sp)
+move R7,-(sp)
+add #1,(sp)
+move.l #L220,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 571
+*line 572
+move.l (R13),R13
+L219:
+*line 573
+move.l R13,R0
+bne L218
+L217:
+*line 574
+L214:L211:
+*line 557
+add #1,R7
+L212:
+*line 557
+cmp #17,R7
+blt L213
+L210:
+*line 577
+*line 578
+tst R6
+beq L221
+*line 578
+move.l #L222,(sp)
+jsr _printf
+*line 579
+*line 580
+*line 581
+*line 582
+*line 583
+L221:
+*line 584
+clr R6
+*line 586
+clr R7
+bra L225
+L226:
+*line 587
+*line 588
+*line 588
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_gdstbc,R8
+move.l (R8),R13
+move.l R13,R0
+beq L227
+*line 589
+*line 590
+*line 590
+tst R6
+bne L228
+*line 591
+*line 592
+move.l #L229,(sp)
+jsr _printf
+*line 593
+move #1,R6
+*line 594
+*line 595
+L228:
+*line 596
+bra L232
+L231:
+*line 597
+*line 598
+*line 599
+move 6(R13),(sp)
+move 4(R13),-(sp)
+move R7,-(sp)
+add #1,(sp)
+move.l #L233,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 600
+*line 601
+move.l (R13),R13
+L232:
+*line 602
+move.l R13,R0
+bne L231
+L230:
+*line 603
+L227:L224:
+*line 586
+add #1,R7
+L225:
+*line 586
+cmp #17,R7
+blt L226
+L223:
+*line 606
+*line 607
+tst R6
+beq L234
+*line 607
+move.l #L235,(sp)
+jsr _printf
+*line 608
+*line 609
+*line 610
+*line 611
+L234:
+*line 612
+clr R6
+*line 614
+clr R7
+bra L238
+L239:
+*line 615
+*line 616
+*line 616
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_gdstbn,R8
+move.l (R8),R13
+move.l R13,R0
+beq L240
+*line 617
+*line 618
+*line 618
+tst R6
+bne L241
+*line 619
+*line 620
+move.l #L242,(sp)
+jsr _printf
+*line 621
+move #1,R6
+*line 622
+*line 623
+L241:
+*line 624
+bra L245
+L244:
+*line 625
+*line 626
+*line 627
+move 6(R13),(sp)
+move 4(R13),-(sp)
+move R7,-(sp)
+add #1,(sp)
+move.l #L246,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 628
+*line 629
+move.l (R13),R13
+L245:
+*line 630
+move.l R13,R0
+bne L244
+L243:
+*line 631
+L240:L237:
+*line 614
+add #1,R7
+L238:
+*line 614
+cmp #17,R7
+blt L239
+L236:
+*line 634
+*line 635
+tst R6
+beq L247
+*line 635
+move.l #L248,(sp)
+jsr _printf
+*line 636
+L247:L209:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.globl _SCvce
+.text
+_SCvce:
+~~SCvce:
+~n=8
+link R14,#0
+movem.l R3-R7/R11-R13,-(sp)
+~i=R7
+~j=R6
+~pif=R5
+~pt1=R4
+~ip=R13
+~fp=R12
+~pp=R11
+*line 655
+move 8(R14),R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 659
+*line 660
+move.l R13,(sp)
+add.l #53,(sp)
+move.l R13,-(sp)
+add.l #36,(sp)
+move.l R13,-(sp)
+add.l #19,(sp)
+move.l R13,-(sp)
+add.l #2,(sp)
+move 8(R14),-(sp)
+add #1,(sp)
+move.l #L250,-(sp)
+jsr _printf
+adda.l #18,sp
+*line 662
+*line 663
+*line 664
+move.b 73(R13),R0
+ext.w R0
+move R0,(sp) 
+and #255,(sp)
+add #1,(sp)
+move.b 72(R13),R0
+ext.w R0
+move R0,-(sp) 
+and #255,(sp)
+add #1,(sp)
+move.b 71(R13),R0
+ext.w R0
+move R0,-(sp) 
+and #255,(sp)
+move.b 70(R13),R0
+ext.w R0
+move R0,-(sp) 
+and #255,(sp)
+move (R13),-(sp)
+move.l #L251,-(sp)
+jsr _printf
+adda.l #12,sp
+*line 666
+*line 667
+*line 668
+*line 669
+*line 670
+*line 671
+*line 672
+*line 673
+*line 674
+*line 675
+*line 676
+*line 677
+*line 678
+move 84(R13),(sp)
+btst #2,77(R13)
+beq L10010
+move #83,-(sp)
+bra L10012
+L10010:move #32,-(sp)
+L10012:move.b 77(R13),R0
+ext.w R0
+and #3,R0
+move R0,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_osclbl,R9
+move.l 0(R8,R9.l),-(sp)
+move 82(R13),-(sp)
+btst #2,76(R13)
+beq L10013
+move #83,-(sp)
+bra L10015
+L10013:move #32,-(sp)
+L10015:move.b 76(R13),R0
+ext.w R0
+and #3,R0
+move R0,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_osclbl,R9
+move.l 0(R8,R9.l),-(sp)
+move 80(R13),-(sp)
+btst #2,75(R13)
+beq L10016
+move #83,-(sp)
+bra L10018
+L10016:move #32,-(sp)
+L10018:move.b 75(R13),R0
+ext.w R0
+and #3,R0
+move R0,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_osclbl,R9
+move.l 0(R8,R9.l),-(sp)
+move 78(R13),-(sp)
+btst #2,74(R13)
+beq L10019
+move #83,-(sp)
+bra L10021
+L10019:move #32,-(sp)
+L10021:move.b 74(R13),R0
+ext.w R0
+and #3,R0
+move R0,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_osclbl,R9
+move.l 0(R8,R9.l),-(sp)
+move.l #L252,-(sp)
+jsr _printf
+adda.l #34,sp
+*line 682
+move.l #L253,(sp)
+jsr _printf
+*line 684
+move.l #L254,(sp)
+jsr _printf
+*line 685
+move.l #L255,(sp)
+jsr _printf
+*line 687
+clr R7
+bra L258
+L259:
+*line 688
+*line 689
+move.l R13,R12
+move R7,R0
+muls #12,R0
+add.l R0,R12
+add.l #86,R12
+*line 690
+*line 691
+*line 692
+*line 693
+*line 694
+*line 695
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_idbxlbl,R9
+move.l 0(R8,R9.l),(sp)
+move 10(R12),-(sp)
+move.b 9(R12),R0
+ext.w R0
+move R0,-(sp) 
+and #255,(sp)
+move.b 7(R12),R0
+ext.w R0
+move R0,-(sp) 
+and #255,(sp)
+move.b 8(R12),R0
+ext.w R0
+move R0,-(sp) 
+and #255,(sp)
+move.b 6(R12),R0
+ext.w R0
+move R0,-(sp) 
+and #255,(sp)
+move.b 5(R12),R0
+ext.w R0
+move R0,-(sp) 
+and #255,(sp)
+move.b 4(R12),R0
+ext.w R0
+move R0,-(sp) 
+and #255,(sp)
+move 2(R12),-(sp)
+move (R12),-(sp)
+move R7,-(sp)
+move.l #L260,-(sp)
+jsr _printf
+adda.l #24,sp
+*line 696
+L257:
+*line 687
+add #1,R7
+L258:
+*line 687
+cmp #13,R7
+blt L259
+L256:
+*line 701
+move.l #L261,(sp)
+jsr _printf
+*line 702
+move.l #L262,(sp)
+jsr _printf
+*line 703
+move.l #L263,(sp)
+jsr _printf
+*line 705
+clr R7
+bra L266
+L267:
+*line 706
+*line 707
+move.l R13,R12
+move R7,R0
+muls #12,R0
+add.l R0,R12
+add.l #86,R12
+*line 708
+move.b 5(R12),R5
+ext.w R5
+and #255,R5
+*line 709
+move.b 6(R12),R4
+ext.w R4
+and #255,R4
+*line 710
+*line 711
+clr R6
+bra L270
+L271:
+*line 712
+*line 713
+move.l R13,R11
+move R4,R0
+add R6,R0
+muls #12,R0
+add.l R0,R11
+add.l #242,R11
+*line 714
+*line 715
+*line 716
+*line 717
+*line 718
+*line 719
+*line 720
+move.b 11(R11),R0
+ext.w R0
+move R0,(sp) 
+and #255,(sp)
+move.b 10(R11),R0
+ext.w R0
+move R0,-(sp) 
+and #255,(sp)
+move.b 9(R11),R0
+ext.w R0
+move R0,-(sp) 
+and #255,(sp)
+move.b 8(R11),R0
+ext.w R0
+move R0,-(sp) 
+and #255,(sp)
+move.b 7(R11),R0
+ext.w R0
+and #255,R0
+move R0,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_actname,R9
+move.l 0(R8,R9.l),-(sp)
+move.b 6(R11),R0
+ext.w R0
+and #255,R0
+move R0,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_srcname,R9
+move.l 0(R8,R9.l),-(sp)
+move 4(R11),-(sp)
+move 2(R11),-(sp)
+move (R11),-(sp)
+move R4,-(sp)
+move R6,R0
+add R0,(sp)
+move R6,-(sp)
+move R7,-(sp)
+move.l #L272,-(sp)
+jsr _printf
+adda.l #30,sp
+L269:
+*line 711
+add #1,R6
+L270:
+*line 711
+cmp R5,R6
+blt L271
+L268:
+*line 721
+L265:
+*line 705
+add #1,R7
+L266:
+*line 705
+cmp #13,R7
+blt L267
+L264:
+*line 724
+move.l #L273,(sp)
+jsr _printf
+L249:tst.l (sp)+
+movem.l (sp)+,R4-R7/R11-R13
+unlk R14
+rts
+.globl _SCvces
+.text
+_SCvces:
+~~SCvces:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 740
+clr R7
+bra L277
+L278:
+*line 741
+move R7,(sp)
+jsr _SCvce
+L276:
+*line 740
+add #1,R7
+L277:
+*line 740
+cmp #12,R7
+blt L278
+L275:
+*line 743
+jsr _xtrap15
+L274:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _SCvoice
+.text
+_SCvoice:
+~~SCvoice:
+link R14,#-4
+*line 754
+move _SCnumv,(sp)
+jsr _SCvce
+*line 755
+jsr _xtrap15
+L279:unlk R14
+rts
+.data
+L1:.dc.b $30,$30,$3A,$20,$45,$56,$5F,$4E,$55,$4C,$4C,$20,$20,$6E,$75,$6C,$6C,$20,$65,$76,$65,$6E,$74,$20,$20,$20,$0
+L2:.dc.b $30,$31,$3A,$20,$45,$56,$5F,$53,$43,$4F,$52,$45,$20,$73,$63,$6F,$72,$65,$20,$62,$65,$67,$69,$6E,$20,$20,$0
+L3:.dc.b $30,$32,$3A,$20,$45,$56,$5F,$53,$42,$47,$4E,$20,$20,$73,$65,$63,$74,$69,$6F,$6E,$20,$62,$65,$67,$69,$6E,$0
+L4:.dc.b $30,$33,$3A,$20,$45,$56,$5F,$53,$45,$4E,$44,$20,$20,$73,$65,$63,$74,$69,$6F,$6E,$20,$65,$6E,$64,$20,$20,$0
+L5:.dc.b $30,$34,$3A,$20,$45,$56,$5F,$49,$4E,$53,$54,$20,$20,$69,$6E,$73,$74,$72,$2E,$20,$63,$68,$61,$6E,$67,$65,$0
+L6:.dc.b $30,$35,$3A,$20,$45,$56,$5F,$4E,$42,$45,$47,$20,$20,$6E,$6F,$74,$65,$20,$62,$65,$67,$69,$6E,$20,$20,$20,$0
+L7:.dc.b $30,$36,$3A,$20,$45,$56,$5F,$4E,$45,$4E,$44,$20,$20,$6E,$6F,$74,$65,$20,$65,$6E,$64,$20,$20,$20,$20,$20,$0
+L8:.dc.b $30,$37,$3A,$20,$45,$56,$5F,$53,$54,$4F,$50,$20,$20,$73,$74,$6F,$70,$20,$20,$20,$20,$20,$20,$20,$20,$20,$0
+L9:.dc.b $30,$38,$3A,$20,$45,$56,$5F,$49,$4E,$54,$50,$20,$20,$69,$6E,$74,$65,$72,$70,$6F,$6C,$61,$74,$65,$20,$20,$0
+L10:.dc.b $30,$39,$3A,$20,$45,$56,$5F,$54,$4D,$50,$4F,$20,$20,$74,$65,$6D,$70,$6F,$20,$20,$20,$20,$20,$20,$20,$20,$0
+L11:.dc.b $30,$41,$3A,$20,$45,$56,$5F,$54,$55,$4E,$45,$20,$20,$74,$75,$6E,$69,$6E,$67,$20,$20,$20,$20,$20,$20,$20,$0
+L12:.dc.b $30,$42,$3A,$20,$45,$56,$5F,$47,$52,$50,$20,$20,$20,$67,$72,$6F,$75,$70,$20,$73,$74,$61,$74,$75,$73,$20,$0
+L13:.dc.b $30,$43,$3A,$20,$45,$56,$5F,$4C,$4F,$43,$4E,$20,$20,$6C,$6F,$63,$61,$74,$69,$6F,$6E,$20,$20,$20,$20,$20,$0
+L14:.dc.b $30,$44,$3A,$20,$45,$56,$5F,$44,$59,$4E,$20,$20,$20,$64,$79,$6E,$61,$6D,$69,$63,$73,$20,$20,$20,$20,$20,$0
+L15:.dc.b $30,$45,$3A,$20,$45,$56,$5F,$41,$4E,$56,$4C,$20,$20,$61,$6E,$61,$6C,$6F,$67,$20,$76,$61,$6C,$75,$65,$20,$0
+L16:.dc.b $30,$46,$3A,$20,$45,$56,$5F,$41,$4E,$52,$53,$20,$20,$61,$6E,$61,$6C,$6F,$67,$20,$72,$65,$73,$2E,$20,$20,$0
+L17:.dc.b $31,$30,$3A,$20,$45,$56,$5F,$41,$53,$47,$4E,$20,$20,$49,$2F,$4F,$20,$61,$73,$73,$69,$67,$6E,$20,$20,$20,$0
+L18:.dc.b $31,$31,$3A,$20,$45,$56,$5F,$54,$52,$4E,$53,$20,$20,$74,$72,$61,$6E,$73,$70,$6F,$73,$69,$74,$69,$6F,$6E,$0
+L19:.dc.b $31,$32,$3A,$20,$45,$56,$5F,$52,$45,$50,$54,$20,$20,$72,$65,$70,$65,$61,$74,$20,$20,$20,$20,$20,$20,$20,$0
+L20:.dc.b $31,$33,$3A,$20,$45,$56,$5F,$50,$4E,$43,$48,$20,$20,$70,$75,$6E,$63,$68,$20,$69,$6E,$2F,$6F,$75,$74,$20,$0
+L21:.dc.b $31,$34,$3A,$20,$45,$56,$5F,$50,$52,$45,$53,$20,$20,$70,$6F,$6C,$79,$20,$70,$72,$65,$73,$73,$75,$72,$65,$0
+L22:.dc.b $31,$35,$3A,$20,$45,$56,$5F,$46,$49,$4E,$49,$20,$20,$73,$63,$6F,$72,$65,$20,$65,$6E,$64,$20,$20,$20,$20,$0
+L23:.dc.b $31,$36,$3A,$20,$45,$56,$5F,$43,$50,$52,$53,$20,$20,$63,$68,$61,$6E,$20,$70,$72,$65,$73,$73,$75,$72,$65,$0
+L24:.dc.b $31,$37,$3A,$20,$45,$56,$5F,$42,$41,$52,$20,$20,$20,$62,$61,$72,$20,$6D,$61,$72,$6B,$65,$72,$20,$20,$20,$0
+L25:.dc.b $45,$48,$5F,$49,$4E,$53,$54,$0
+L26:.dc.b $45,$48,$5F,$47,$52,$50,$20,$0
+L27:.dc.b $45,$48,$5F,$4C,$4F,$43,$4E,$0
+L28:.dc.b $45,$48,$5F,$44,$59,$4E,$20,$0
+L29:.dc.b $45,$48,$5F,$41,$4E,$52,$53,$0
+L30:.dc.b $45,$48,$5F,$54,$52,$4E,$53,$0
+L31:.dc.b $45,$48,$5F,$49,$4E,$54,$50,$0
+L32:.dc.b $45,$48,$5F,$54,$4D,$50,$4F,$0
+L33:.dc.b $45,$48,$5F,$54,$55,$4E,$45,$0
+L34:.dc.b $45,$48,$5F,$41,$53,$47,$4E,$0
+L35:.dc.b $45,$48,$5F,$53,$42,$47,$4E,$0
+L36:.dc.b $45,$48,$5F,$53,$45,$4E,$44,$0
+L37:.dc.b $50,$63,$68,$2F,$48,$6F,$72,$0
+L38:.dc.b $4D,$6F,$64,$2F,$56,$72,$74,$0
+L39:.dc.b $42,$72,$74,$68,$2F,$4C,$50,$0
+L40:.dc.b $47,$50,$43,$2F,$43,$56,$31,$0
+L41:.dc.b $50,$65,$64,$61,$6C,$20,$31,$0
+L42:.dc.b $4B,$65,$79,$20,$50,$72,$73,$0
+L43:.dc.b $4E,$4F,$4E,$45,$0
+L44:.dc.b $52,$41,$4E,$44,$0
+L45:.dc.b $43,$54,$4C,$31,$0
+L46:.dc.b $3F,$30,$33,$3F,$0
+L47:.dc.b $3F,$30,$34,$3F,$0
+L48:.dc.b $50,$54,$43,$48,$0
+L49:.dc.b $4B,$50,$52,$53,$0
+L50:.dc.b $4B,$56,$45,$4C,$0
+L51:.dc.b $50,$45,$44,$31,$0
+L52:.dc.b $3F,$30,$39,$3F,$0
+L53:.dc.b $46,$52,$45,$51,$0
+L54:.dc.b $48,$54,$50,$57,$0
+L55:.dc.b $56,$54,$4D,$57,$0
+L56:.dc.b $4C,$50,$42,$52,$0
+L57:.dc.b $4E,$55,$4C,$4C,$0
+L58:.dc.b $53,$55,$53,$54,$0
+L59:.dc.b $45,$4E,$42,$4C,$0
+L60:.dc.b $4A,$55,$4D,$50,$0
+L61:.dc.b $4C,$4F,$4F,$50,$0
+L62:.dc.b $4B,$59,$55,$50,$0
+L63:.dc.b $4B,$59,$44,$4E,$0
+L64:.dc.b $48,$45,$52,$45,$0
+L68:.dc.b $63,$75,$72,$73,$63,$6F,$72,$3A,$20,$25,$64,$20,$20,$22,$25,$2D,$31,$36,$2E,$31,$36,$73,$22,$20,$20,$63,$75,$72,$73,$65
+.dc.b $63,$74,$3A,$20,$25,$64,$20,$20,$73,$63,$70,$3A,$20,$24,$25,$30,$38,$6C,$58,$A,$A,$0
+L69:.dc.b $20,$20,$20,$66,$63,$5F,$76,$61,$6C,$3A,$20,$25,$38,$6C,$64,$20,$20,$66,$63,$5F,$73,$77,$3A,$20,$20,$25,$64,$A,$A,$0
+L70:.dc.b $20,$20,$20,$74,$5F,$62,$61,$6B,$3A,$20,$20,$25,$38,$6C,$64,$20,$20,$74,$5F,$63,$75,$72,$3A,$20,$20,$25,$38,$6C,$64,$20
+.dc.b $20,$74,$5F,$63,$74,$72,$3A,$20,$20,$25,$38,$6C,$64,$20,$20,$74,$5F,$66,$77,$64,$3A,$20,$20,$25,$38,$6C,$64,$A,$0
+L71:.dc.b $20,$20,$20,$70,$5F,$62,$61,$6B,$3A,$20,$24,$25,$30,$38,$6C,$58,$20,$20,$70,$5F,$63,$75,$72,$3A,$20,$24,$25,$30,$38,$6C
+.dc.b $58,$20,$20,$70,$5F,$63,$74,$72,$3A,$20,$24,$25,$30,$38,$6C,$58,$20,$20,$70,$5F,$66,$77,$64,$3A,$20,$24,$25,$30,$38,$6C
+.dc.b $58,$A,$A,$0
+L73:.dc.b $A,$0
+L74:.dc.b $65,$76,$6C,$65,$66,$74,$3A,$20,$25,$6C,$64,$20,$20,$73,$70,$63,$6F,$75,$6E,$74,$3A,$20,$25,$6C,$64,$20,$20,$66,$72,$61
+.dc.b $67,$73,$3A,$20,$25,$6C,$64,$A,$0
+L75:.dc.b $20,$20,$20,$73,$65,$31,$5F,$63,$6E,$74,$3D,$25,$6C,$64,$20,$20,$73,$65,$32,$5F,$63,$6E,$74,$3D,$25,$6C,$64,$20,$20,$73
+.dc.b $65,$33,$5F,$63,$6E,$74,$3D,$25,$6C,$64,$A,$0
+L76:.dc.b $20,$20,$20,$70,$73,$70,$6F,$6F,$6C,$3D,$24,$25,$30,$38,$6C,$58,$20,$20,$73,$69,$7A,$65,$31,$3D,$24,$25,$30,$38,$6C,$58
+.dc.b $20,$20,$73,$69,$7A,$65,$32,$3D,$24,$25,$30,$38,$6C,$58,$20,$20,$73,$69,$7A,$65,$33,$3D,$24,$25,$30,$38,$6C,$58,$A,$0
+L81:.dc.b $25,$32,$64,$3A,$20,$20,$22,$25,$2D,$31,$36,$2E,$31,$36,$73,$22,$20,$20,$24,$25,$30,$38,$6C,$58,$20,$25,$73,$A,$0
+L82:.dc.b $3C,$2D,$2D,$2D,$20,$63,$75,$72,$73,$63,$6F,$72,$0
+L83:.dc.b $0
+L84:.dc.b $A,$A,$0
+L85:.dc.b $56,$61,$72,$69,$61,$62,$6C,$65,$20,$6D,$6F,$64,$65,$73,$20,$66,$6F,$72,$20,$65,$61,$63,$68,$20,$67,$72,$6F,$75,$70,$3A
+.dc.b $A,$A,$0
+L86:.dc.b $56,$23,$20,$56,$61,$72,$4E,$61,$6D,$65,$20,$20,$30,$31,$20,$30,$32,$20,$30,$33,$20,$30,$34,$20,$30,$35,$20,$30,$36,$20
+.dc.b $30,$37,$20,$30,$38,$20,$30,$39,$20,$31,$30,$20,$31,$31,$20,$31,$32,$A,$0
+L87:.dc.b $2D,$2D,$20,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$20,$20,$2D,$2D,$20,$2D,$2D,$20,$2D,$2D,$20,$2D,$2D,$20,$2D,$2D,$20,$2D,$2D,$20
+.dc.b $2D,$2D,$20,$2D,$2D,$20,$2D,$2D,$20,$2D,$2D,$20,$2D,$2D,$20,$2D,$2D,$A,$0
+L92:.dc.b $25,$30,$32,$64,$20,$25,$73,$20,$20,$0
+L97:.dc.b $20,$25,$64,$20,$0
+L98:.dc.b $A,$0
+L99:.dc.b $A,$0
+L107:.dc.b $5B,$25,$30,$38,$6C,$58,$5D,$3A,$20,$20,$2A,$2A,$20,$42,$61,$64,$20,$65,$76,$65,$6E,$74,$20,$73,$69,$7A,$65,$3A,$20,$24
+.dc.b $25,$30,$32,$2E,$32,$58,$20,$2A,$2A,$A,$0
+L109:.dc.b $5B,$25,$30,$38,$6C,$58,$5D,$3A,$20,$20,$2A,$2A,$20,$42,$61,$64,$20,$65,$76,$65,$6E,$74,$20,$74,$79,$70,$65,$3A,$20,$24
+.dc.b $25,$30,$32,$2E,$32,$58,$20,$2A,$2A,$A,$0
+L110:.dc.b $24,$25,$30,$38,$6C,$58,$3A,$20,$74,$3D,$25,$31,$30,$6C,$64,$20,$20,$46,$3A,$24,$25,$30,$38,$6C,$58,$20,$20,$42,$3A,$24
+.dc.b $25,$30,$38,$6C,$58,$20,$2A,$20,$25,$73,$A,$0
+L111:.dc.b $20,$20,$64,$61,$74,$61,$20,$3D,$20,$24,$25,$30,$32,$2E,$32,$58,$20,$24,$25,$30,$32,$2E,$32,$58,$0
+L113:.dc.b $20,$24,$25,$30,$34,$2E,$34,$58,$20,$24,$25,$30,$34,$2E,$34,$58,$0
+L114:.dc.b $A,$0
+L116:.dc.b $20,$20,$75,$70,$3A,$20,$24,$25,$30,$38,$6C,$58,$20,$20,$64,$6E,$3A,$20,$24,$25,$30,$38,$6C,$58,$0
+L119:.dc.b $20,$20,$6C,$66,$74,$3A,$20,$24,$25,$30,$38,$6C,$58,$20,$20,$72,$67,$74,$3A,$20,$24,$25,$30,$38,$6C,$58,$0
+L120:.dc.b $A,$0
+L122:.dc.b $A,$0
+L124:.dc.b $4E,$55,$4C,$4C,$20,$70,$6F,$69,$6E,$74,$65,$72,$A,$0
+L125:.dc.b $65,$70,$20,$2D,$20,$53,$45,$63,$68,$61,$73,$65,$28,$29,$0
+L132:.dc.b $65,$5F,$66,$77,$64,$20,$2D,$20,$53,$45,$63,$68,$61,$73,$65,$28,$29,$0
+L134:.dc.b $65,$5F,$62,$61,$6B,$20,$2D,$20,$53,$45,$63,$68,$61,$73,$65,$28,$29,$0
+L136:.dc.b $A,$0
+L138:.dc.b $A,$0
+L139:.dc.b $73,$64,$20,$3D,$20,$25,$73,$20,$20,$73,$65,$20,$3D,$20,$25,$73,$20,$20,$73,$62,$61,$73,$65,$20,$3D,$20,$25,$64,$20,$20
+.dc.b $73,$6F,$66,$66,$73,$65,$74,$20,$3D,$20,$25,$64,$20,$20,$73,$63,$72,$6C,$20,$3D,$20,$24,$25,$30,$34,$2E,$34,$58,$A,$0
+L140:.dc.b $42,$41,$4B,$0
+L141:.dc.b $46,$57,$44,$0
+L142:.dc.b $42,$41,$4B,$0
+L143:.dc.b $46,$57,$44,$0
+L144:.dc.b $67,$64,$66,$73,$65,$70,$20,$3D,$20,$24,$25,$30,$38,$6C,$58,$A,$A,$0
+L145:.dc.b $67,$72,$20,$20,$24,$20,$67,$64,$73,$74,$62,$70,$20,$20,$24,$20,$67,$64,$73,$74,$62,$63,$20,$20,$24,$20,$67,$64,$73,$74
+.dc.b $62,$6E,$A,$0
+L146:.dc.b $20,$20,$20,$20,$25,$30,$38,$6C,$58,$20,$20,$25,$30,$38,$6C,$58,$20,$20,$25,$30,$38,$6C,$58,$A,$0
+L147:.dc.b $2D,$2D,$20,$20,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$20,$20,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$20,$20,$2D,$2D,$2D,$2D,$2D,$2D
+.dc.b $2D,$2D,$A,$0
+L152:.dc.b $25,$32,$64,$20,$20,$25,$30,$38,$6C,$58,$20,$20,$25,$30,$38,$6C,$58,$20,$20,$25,$30,$38,$6C,$58,$A,$0
+L154:.dc.b $A,$0
+L155:.dc.b $A,$0
+L158:.dc.b $70,$5F,$73,$62,$67,$6E,$20,$3D,$20,$24,$25,$30,$38,$6C,$58,$20,$20,$70,$5F,$73,$65,$6E,$64,$20,$3D,$20,$24,$25,$30,$38
+.dc.b $6C,$58,$A,$0
+L159:.dc.b $74,$5F,$73,$62,$67,$6E,$20,$3D,$20,$20,$25,$38,$6C,$64,$20,$20,$74,$5F,$73,$65,$6E,$64,$20,$3D,$20,$20,$25,$38,$6C,$64
+.dc.b $20,$20,$74,$5F,$73,$65,$63,$74,$20,$3D,$20,$20,$25,$38,$6C,$64,$A,$A,$0
+L160:.dc.b $70,$5F,$63,$62,$67,$6E,$20,$3D,$20,$24,$25,$30,$38,$6C,$58,$20,$20,$70,$5F,$63,$65,$6E,$64,$20,$3D,$20,$24,$25,$30,$38
+.dc.b $6C,$58,$A,$0
+L161:.dc.b $74,$5F,$63,$62,$67,$6E,$20,$3D,$20,$20,$25,$38,$6C,$64,$20,$20,$74,$5F,$63,$65,$6E,$64,$20,$3D,$20,$20,$25,$38,$6C,$64
+.dc.b $A,$A,$0
+L162:.dc.b $73,$65,$63,$6C,$69,$73,$74,$5B,$63,$75,$72,$73,$63,$6F,$72,$5D,$5B,$5D,$A,$0
+L163:.dc.b $2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$A,$A,$0
+L164:.dc.b $53,$65,$63,$20,$41,$64,$64,$72,$5F,$5F,$5F,$5F,$5F,$20,$20,$53,$65,$63,$20,$41,$64,$64,$72,$5F,$5F,$5F,$5F,$5F,$20,$20
+.dc.b $53,$65,$63,$20,$41,$64,$64,$72,$5F,$5F,$5F,$5F,$5F,$20,$20,$53,$65,$63,$20,$41,$64,$64,$72,$5F,$5F,$5F,$5F,$5F,$20,$20
+.dc.b $53,$65,$63,$20,$41,$64,$64,$72,$5F,$5F,$5F,$5F,$5F,$20,$20,$A,$0
+L169:.dc.b $25,$32,$64,$20,$20,$24,$25,$30,$38,$6C,$58,$20,$20,$0
+L171:.dc.b $25,$32,$64,$20,$20,$24,$25,$30,$38,$6C,$58,$20,$20,$0
+L173:.dc.b $25,$32,$64,$20,$20,$24,$25,$30,$38,$6C,$58,$20,$20,$0
+L175:.dc.b $25,$32,$64,$20,$20,$24,$25,$30,$38,$6C,$58,$20,$20,$0
+L177:.dc.b $25,$32,$64,$20,$20,$24,$25,$30,$38,$6C,$58,$20,$20,$0
+L178:.dc.b $A,$0
+L179:.dc.b $A,$0
+L180:.dc.b $68,$70,$6C,$69,$73,$74,$5B,$63,$75,$72,$73,$63,$6F,$72,$5D,$5B,$5D,$A,$0
+L181:.dc.b $2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D,$A,$0
+L182:.dc.b $54,$79,$70,$65,$5F,$5F,$5F,$20,$20,$41,$64,$64,$72,$5F,$5F,$5F,$5F,$5F,$A,$0
+L187:.dc.b $25,$73,$20,$20,$24,$25,$30,$38,$6C,$58,$A,$0
+L188:.dc.b $A,$0
+L191:.dc.b $53,$74,$61,$63,$6B,$20,$64,$75,$6D,$70,$3A,$20,$20,$24,$25,$30,$38,$6C,$58,$20,$74,$6F,$20,$24,$25,$30,$38,$6C,$58,$A
+.dc.b $A,$0
+L192:.dc.b $A,$A,$0
+L193:.dc.b $53,$74,$61,$63,$6B,$20,$74,$72,$61,$63,$65,$62,$61,$63,$6B,$3A,$20,$20,$66,$72,$6F,$6D,$20,$41,$36,$20,$3D,$20,$24,$25
+.dc.b $30,$38,$6C,$58,$A,$A,$0
+L194:.dc.b $41,$36,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$4F,$6C,$64,$20,$41,$36,$20,$20,$20,$20,$52,$65,$74,$75,$72,$6E,$A,$0
+L196:.dc.b $53,$65,$74,$20,$41,$36,$50,$54,$52,$20,$28,$24,$25,$30,$38,$6C,$58,$29,$20,$61,$6E,$64,$20,$41,$37,$50,$54,$52,$20,$28
+.dc.b $24,$25,$30,$38,$6C,$58,$29,$20,$66,$69,$72,$73,$74,$A,$0
+L200:.dc.b $24,$25,$30,$38,$6C,$58,$3A,$20,$20,$24,$25,$30,$38,$6C,$58,$20,$20,$24,$25,$30,$38,$6C,$58,$A,$0
+L204:.dc.b $20,$20,$2B,$25,$2D,$34,$64,$20,$5B,$24,$25,$30,$38,$6C,$58,$5D,$3A,$20,$20,$24,$25,$30,$34,$2E,$34,$58,$A,$0
+L216:.dc.b $67,$64,$73,$74,$62,$70,$3A,$0
+L220:.dc.b $20,$20,$25,$30,$32,$64,$3A,$25,$30,$32,$64,$3A,$25,$64,$0
+L222:.dc.b $A,$0
+L229:.dc.b $67,$64,$73,$74,$62,$63,$3A,$0
+L233:.dc.b $20,$20,$25,$30,$32,$64,$3A,$25,$30,$32,$64,$3A,$25,$64,$0
+L235:.dc.b $A,$0
+L242:.dc.b $67,$64,$73,$74,$62,$6E,$3A,$0
+L246:.dc.b $20,$20,$25,$30,$32,$64,$3A,$25,$30,$32,$64,$3A,$25,$64,$0
+L248:.dc.b $A,$0
+L250:.dc.b $56,$4F,$49,$43,$45,$20,$25,$32,$64,$3A,$20,$20,$25,$2D,$31,$36,$2E,$31,$36,$73,$20,$20,$25,$2D,$31,$36,$2E,$31,$36,$73
+.dc.b $20,$25,$2D,$31,$36,$2E,$31,$36,$73,$20,$25,$2D,$31,$36,$2E,$31,$36,$73,$A,$0
+L251:.dc.b $20,$20,$66,$6C,$61,$67,$3D,$25,$30,$34,$2E,$34,$58,$20,$20,$43,$66,$67,$3D,$25,$64,$20,$20,$23,$70,$6C,$66,$74,$3D,$25
+.dc.b $64,$20,$20,$57,$73,$41,$3D,$25,$64,$20,$20,$57,$73,$42,$3D,$25,$64,$A,$0
+L252:.dc.b $20,$20,$4F,$73,$63,$20,$31,$3A,$25,$73,$20,$25,$63,$20,$25,$30,$34,$2E,$34,$58,$20,$20,$32,$3A,$25,$73,$20,$25,$63,$20
+.dc.b $25,$30,$34,$2E,$34,$58,$20,$20,$33,$3A,$25,$73,$20,$25,$63,$20,$25,$30,$34,$2E,$34,$58,$20,$20,$34,$3A,$25,$73,$20,$25
+.dc.b $63,$20,$25,$30,$34,$2E,$34,$58,$A,$0
+L253:.dc.b $A,$46,$75,$6E,$63,$74,$69,$6F,$6E,$20,$68,$65,$61,$64,$65,$72,$73,$A,$0
+L254:.dc.b $20,$20,$46,$6E,$20,$50,$63,$68,$20,$20,$4D,$75,$6C,$74,$20,$53,$72,$20,$50,$69,$66,$20,$50,$74,$31,$20,$43,$70,$74,$20
+.dc.b $4D,$64,$20,$50,$72,$20,$54,$72,$67,$20,$A,$0
+L255:.dc.b $20,$20,$2D,$2D,$20,$2D,$2D,$2D,$2D,$20,$2D,$2D,$2D,$2D,$20,$2D,$2D,$20,$2D,$2D,$2D,$20,$2D,$2D,$2D,$20,$2D,$2D,$2D,$20
+.dc.b $2D,$2D,$20,$2D,$2D,$20,$2D,$2D,$2D,$2D,$A,$0
+L260:.dc.b $20,$20,$25,$32,$64,$20,$25,$30,$34,$2E,$34,$58,$20,$25,$30,$34,$2E,$34,$58,$20,$25,$30,$32,$58,$20,$25,$33,$64,$20,$25
+.dc.b $33,$64,$20,$25,$33,$64,$20,$25,$30,$32,$78,$20,$25,$30,$32,$78,$20,$25,$30,$34,$2E,$34,$78,$20,$20,$25,$73,$A,$0
+L261:.dc.b $A,$4F,$63,$63,$75,$70,$69,$65,$64,$20,$70,$6F,$69,$6E,$74,$73,$A,$0
+L262:.dc.b $20,$20,$46,$6E,$20,$46,$70,$74,$20,$49,$70,$74,$20,$54,$69,$6D,$65,$20,$56,$61,$6C,$20,$20,$4D,$75,$6C,$74,$20,$53,$72
+.dc.b $63,$20,$20,$41,$63,$74,$20,$20,$50,$31,$20,$50,$32,$20,$50,$33,$20,$50,$64,$A,$0
+L263:.dc.b $20,$20,$2D,$2D,$20,$2D,$2D,$2D,$20,$2D,$2D,$2D,$20,$2D,$2D,$2D,$2D,$20,$2D,$2D,$2D,$2D,$20,$2D,$2D,$2D,$2D,$20,$2D,$2D
+.dc.b $2D,$2D,$20,$2D,$2D,$2D,$2D,$20,$2D,$2D,$20,$2D,$2D,$20,$2D,$2D,$20,$2D,$2D,$A,$0
+L272:.dc.b $20,$20,$25,$32,$64,$20,$25,$33,$64,$20,$25,$33,$64,$20,$25,$30,$34,$2E,$34,$58,$20,$25,$30,$34,$2E,$34,$58,$20,$25,$30
+.dc.b $34,$2E,$34,$58,$20,$25,$34,$73,$20,$25,$34,$73,$20,$25,$32,$58,$20,$25,$32,$58,$20,$25,$32,$58,$20,$25,$32,$58,$A,$0
+L273:.dc.b $A,$0
Index: alcyon/select.s
===================================================================
--- alcyon/select.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/select.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,131 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _cxval
+.globl _cyval
+.globl _astat
+.globl _cursbox
+.globl _hitbox
+.globl _hitcx
+.globl _hitcy
+.globl _csbp
+.globl _curboxp
+.globl _whatbox
+.text
+_whatbox:
+~~whatbox:
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+~sb=R13
+*line 42
+move.l _csbp,R13
+*line 43
+move #-1,_hitbox
+*line 51
+*line 52
+move.l R13,R0
+bne L2
+*line 52
+clr R0
+bra L1
+*line 53
+L2:
+*line 54
+bra L5
+L4:
+*line 55
+*line 56
+add #1,_hitbox
+*line 57
+*line 58
+*line 59
+*line 60
+*line 61
+move (R13),R0
+cmp _cxval,R0
+bgt L6
+move 4(R13),R0
+cmp _cxval,R0
+blt L6
+move 2(R13),R0
+cmp _cyval,R0
+bgt L6
+move 6(R13),R0
+cmp _cyval,R0
+blt L6
+*line 62
+*line 63
+move _cxval,_hitcx
+*line 64
+move _cyval,_hitcy
+*line 65
+move.l R13,_curboxp
+*line 66
+*line 71
+*line 72
+*line 73
+move #1,R0
+bra L1
+*line 74
+*line 75
+L6:
+*line 76
+add.l #14,R13
+L5:
+*line 77
+tst.l 10(R13)
+bne L4
+L3:
+*line 84
+move #-1,_hitbox
+*line 85
+clr R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _select
+.text
+_select:
+~~select:
+link R14,#-4
+*line 99
+*line 99
+tst _astat
+beq L8
+*line 100
+*line 104
+*line 105
+*line 106
+*line 106
+jsr _whatbox
+tst R0
+beq L9
+*line 107
+*line 112
+*line 113
+*line 114
+move.l _curboxp,R8
+move 8(R8),-(sp)
+move.l _curboxp,R8
+move.l 10(R8),R8
+jsr (R8)
+addq.l #2,sp
+*line 115
+move _hitbox,_cursbox
+*line 116
+bra L10
+L9:
+*line 117
+*line 118
+*line 122
+*line 123
+L10:
+*line 124
+*line 125
+L8:L7:unlk R14
+rts
+.data
Index: alcyon/sendval.s
===================================================================
--- alcyon/sendval.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/sendval.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,523 @@
+.globl _v_obtab
+.globl _v_curob
+.globl _v_nobj
+.globl _v_obpri
+.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 _amplval
+.globl _ext_cv1
+.globl _ext_cv2
+.globl _ext_cv3
+.globl _ext_cv4
+.globl _ext_mod
+.globl _lstbgnc
+.globl _lstendc
+.globl _ps_intn
+.globl _ps_rate
+.globl _ps_dpth
+.globl _sliders
+.globl _lastart
+.globl _dyntab
+.globl _expbit
+.globl _fnoff
+.globl _fp_resv
+.globl _grpdyn
+.globl _grploc
+.globl _lastvce
+.globl _prstab
+.globl _vce2grp
+.globl _vce2trg
+.globl _veltab
+.globl _sigtab
+.globl _keystat
+.globl _mpsust
+.globl _trgtab
+.globl _lstbgns
+.globl _lstends
+.globl _sendval
+.text
+_sendval:
+~~sendval:
+~voice=8
+~par=10
+~ival=12
+link R14,#-2
+movem.l R4-R7/R13-R13,-(sp)
+~fpu=R13
+~oldi=R7
+~val=R6
+~ltmp=R5
+~nop=-2
+*line 74
+move 8(R14),R0
+asl #8,R0
+asl #1,R0
+ext.l R0
+move.l R0,R13
+move 10(R14),R0
+asl #4,R0
+asl #1,R0
+ext.l R0
+add.l R0,R13
+add.l #_io_fpu,R13
+add.l #$4000,R13
+*line 76
+move 10(R14),R0
+bra L3
+*line 77
+L4:
+*line 78
+L5:
+*line 79
+L6:
+*line 80
+L7:
+*line 81
+*line 82
+*line 83
+clr (sp)
+move 12(R14),-(sp)
+jsr _addpch
+addq.l #2,sp
+move R0,R6
+bra L2
+*line 84
+*line 85
+L8:
+*line 86
+*line 87
+*line 88
+move 12(R14),R6
+asl R6
+eor #-32768,R6
+bra L2
+*line 89
+*line 90
+L9:
+*line 91
+*line 92
+*line 93
+move 12(R14),R5
+ext.l R5
+asr.l #$1,R5
+move 12(R14),R0
+ext.l R0
+asr.l #$2,R0
+add.l R0,R5
+*line 94
+*line 95
+*line 96
+cmp.l #$7d00,R5
+ble L10
+*line 96
+move.l #$7d00,R5
+bra L11
+L10:
+*line 97
+*line 98
+cmp.l #$ffff8300,R5
+bge L12
+*line 98
+move.l #$ffff8300,R5
+*line 99
+L12:L11:
+*line 100
+move R5,R6
+bra L2
+*line 101
+*line 102
+*line 103
+L13:
+*line 104
+*line 105
+*line 106
+move 12(R14),R6
+asr #5,R6
+add #-500,R6
+asl #6,R6
+bra L2
+*line 107
+*line 108
+L14:
+*line 109
+*line 110
+*line 111
+move 12(R14),R6
+bra L2
+L3:sub #1,R0
+cmp #9,R0
+bhi L14
+asl #2,R0
+move R0,R8
+add.l #L15,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L15:.dc.l L4
+.dc.l L13
+.dc.l L5
+.dc.l L8
+.dc.l L6
+.dc.l L14
+.dc.l L7
+.dc.l L14
+.dc.l L14
+.dc.l L9
+.text
+L2:
+*line 114
+move #2,(sp)
+jsr _setipl
+move R0,R7
+*line 118
+move.l R13,R8
+add.l #$2,R8
+move R6,(R8)
+*line 119
+add #1,-2(R14)
+*line 119
+add #1,-2(R14)
+*line 119
+add #1,-2(R14)
+*line 120
+move.l R13,R8
+add.l #$1c,R8
+move R6,(R8)
+*line 121
+add #1,-2(R14)
+*line 121
+add #1,-2(R14)
+*line 121
+add #1,-2(R14)
+*line 122
+move #21,(R13)
+*line 124
+move R7,(sp)
+jsr _setipl
+L1:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.globl _clearer
+.text
+_clearer:
+~~clearer:
+~stat=8
+~sig=10
+link R14,#-4
+movem.l R2-R7/R13-R13,-(sp)
+~fpu=R13
+~fpexp=R7
+~fpmant=R6
+~fptime=R5
+~oldi=R4
+~i=R3
+~nop=-2
+~olds=-4
+*line 147
+*line 147
+tst 8(R14)
+beq L17
+*line 148
+*line 149
+move #-32000,_fp_resv
+*line 150
+move _ps_intn,R0
+muls #10,R0
+asl #5,R0
+move R0,2+_fp_resv
+*line 151
+move _ps_rate,R0
+muls #10,R0
+asl #5,R0
+move R0,4+_fp_resv
+*line 152
+move _ps_dpth,R0
+muls #10,R0
+asl #5,R0
+move R0,6+_fp_resv
+*line 153
+clr 8+_fp_resv
+*line 154
+clr 10+_fp_resv
+*line 155
+move _ext_cv3,12+_fp_resv
+*line 156
+clr 14+_fp_resv
+*line 157
+move _ext_cv4,16+_fp_resv
+*line 158
+move _ext_mod,18+_fp_resv
+*line 159
+move _ext_cv2,20+_fp_resv
+*line 160
+move _ext_cv1,22+_fp_resv
+*line 161
+*line 162
+move.l #16384+_io_fpu,R13
+*line 163
+move #200,(sp)
+jsr _tofpu
+move R0,R5
+*line 164
+clr R0
+move R5,R0
+and #15,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_expbit,R0
+move.l R0,R8
+move (R8),R7
+*line 165
+move R5,R6
+and #-16,R6
+*line 166
+*line 167
+*line 168
+move #2,(sp)
+jsr _setipl
+move R0,R4
+*line 169
+*line 170
+*line 171
+*line 172
+jsr _fpuclr
+*line 173
+*line 174
+move R6,20(R13)
+*line 175
+add #1,-2(R14)
+*line 175
+add #1,-2(R14)
+*line 176
+move R7,22(R13)
+*line 177
+*line 178
+*line 179
+*line 180
+move #6144,(sp)
+clr -(sp)
+move.l #_trgtab,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 181
+move #24,(sp)
+clr -(sp)
+move.l #_keystat,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 182
+*line 183
+move #6144,(sp)
+clr -(sp)
+move.l #_prstab,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 184
+move #6144,(sp)
+move #16128,-(sp)
+move.l #_veltab,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 185
+*line 186
+jsr _clrpfl
+*line 187
+*line 188
+clr R3
+bra L20
+L21:
+*line 189
+move R3,R8
+add.l #_mpsust,R8
+clr.b (R8)
+L19:
+*line 188
+add #1,R3
+L20:
+*line 188
+cmp #48,R3
+blt L21
+L18:
+*line 189
+*line 190
+*line 191
+clr R3
+bra L24
+L25:
+*line 192
+*line 193
+move R3,R8
+add.l R8,R8
+add.l #_vce2trg,R8
+move #-1,(R8)
+*line 194
+move R3,R8
+add.l R8,R8
+add.l #_lastvce,R8
+clr (R8)
+L23:
+*line 191
+add #1,R3
+L24:
+*line 191
+cmp #12,R3
+blt L25
+L22:
+*line 195
+*line 196
+*line 197
+move _sliders,-4(R14)
+*line 198
+clr _sliders
+*line 199
+clr (sp)
+move #1,-(sp)
+jsr _l_init
+addq.l #2,sp
+*line 200
+move #2,_sliders
+*line 201
+clr (sp)
+move #1,-(sp)
+jsr _l_init
+addq.l #2,sp
+*line 202
+move -4(R14),_sliders
+*line 203
+*line 204
+move R4,(sp)
+jsr _setipl
+*line 205
+*line 206
+*line 207
+*line 208
+*line 209
+*line 210
+clr _lstbgnc
+*line 211
+clr _lstendc
+*line 212
+*line 213
+move #96,(sp)
+clr -(sp)
+move.l #_lstbgns,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 214
+move #96,(sp)
+clr -(sp)
+move.l #_lstends,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 215
+*line 216
+*line 217
+*line 218
+clr R3
+bra L28
+L29:
+*line 219
+*line 220
+move R3,R8
+add.l R8,R8
+move.l #_grpdyn,R9
+move 0(R8,R9.l),(sp)
+move R3,-(sp)
+jsr _setdyn
+addq.l #2,sp
+*line 221
+move R3,R8
+add.l R8,R8
+move.l #_grploc,R9
+move 0(R8,R9.l),(sp)
+move R3,-(sp)
+jsr _setloc
+addq.l #2,sp
+L27:
+*line 218
+add #1,R3
+L28:
+*line 218
+cmp #12,R3
+blt L29
+L26:
+*line 222
+*line 223
+*line 224
+jsr _settune
+*line 225
+move _amplval,(sp)
+clr -(sp)
+clr -(sp)
+jsr _sendval
+addq.l #4,sp
+*line 226
+L17:L16:tst.l (sp)+
+movem.l (sp)+,R3-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/setbuf.s
===================================================================
--- alcyon/setbuf.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/setbuf.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,42 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl _setbuf
+.text
+_setbuf:
+~~setbuf:
+~stream=R13
+~buffer=12
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+*line 14
+move.l 8(R14),R13
+*line 14
+*line 15
+tst.l 8(R13)
+bne L1
+*line 16
+*line 17
+*line 17
+tst.l 12(R14)
+beq L2
+*line 18
+*line 19
+move.l 12(R14),8(R13)
+*line 20
+move #1024,16(R13)
+*line 21
+bra L3
+L2:
+*line 22
+*line 23
+*line 24
+lea 14(R13),R8
+move.l R8,8(R13)
+*line 25
+move #1,16(R13)
+L3:L1:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.data
Index: alcyon/setgc.s
===================================================================
--- alcyon/setgc.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/setgc.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,119 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _cmtype
+.globl _cxval
+.globl _cyval
+.globl _sgcsw
+.globl _stccol
+.globl _stcrow
+.globl _setgc
+.text
+_setgc:
+~~setgc:
+~xv=R7
+~yv=R6
+link R14,#0
+movem.l R5-R7,-(sp)
+*line 30
+move 8(R14),R7
+*line 30
+move 10(R14),R6
+*line 30
+move R6,(sp)
+move R7,-(sp)
+jsr _gcurpos
+addq.l #2,sp
+*line 32
+move R7,_cxval
+*line 33
+move R6,_cyval
+*line 35
+move R6,R0
+ext.l R0
+divs #14,R0
+move R0,_stcrow
+*line 36
+move R7,R0
+asr #3,R0
+move R0,_stccol
+*line 38
+move #1,_sgcsw
+*line 39
+clr _cmtype
+*line 41
+*line 42
+move.l _curfet,(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+jsr _infield
+addq.l #4,sp
+tst R0
+beq L2
+*line 42
+move.l _infetp,_cfetp
+*line 43
+bra L3
+L2:
+*line 44
+clr.l _cfetp
+L3:L1:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _settc
+.text
+_settc:
+~~settc:
+~rv=R7
+~cv=R6
+link R14,#0
+movem.l R5-R7,-(sp)
+*line 59
+move 8(R14),R7
+*line 59
+move 10(R14),R6
+*line 59
+move R6,(sp)
+move R7,-(sp)
+jsr _itcpos
+addq.l #2,sp
+*line 61
+move R7,_stcrow
+*line 62
+move R6,_stccol
+*line 64
+move R7,R0
+muls #14,R0
+move R0,_cyval
+*line 65
+move R6,R0
+asl #3,R0
+move R0,_cxval
+*line 67
+clr _sgcsw
+*line 68
+move #1,_cmtype
+*line 70
+*line 71
+move.l _curfet,(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+jsr _infield
+addq.l #4,sp
+tst R0
+beq L5
+*line 71
+move.l _infetp,_cfetp
+*line 72
+bra L6
+L5:
+*line 73
+clr.l _cfetp
+L6:L4:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.data
Index: alcyon/setv2gi.s
===================================================================
--- alcyon/setv2gi.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/setv2gi.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,74 @@
+.globl _curinst
+.globl _curvce
+.globl _ins2grp
+.globl _s_inst
+.globl _vce2grp
+.globl _vbufs
+.globl _setv2gi
+.text
+_setv2gi:
+~~setv2gi:
+~group=8
+link R14,#0
+movem.l R4-R7/R12-R13,-(sp)
+~grp=R7
+~vce=R6
+~ins=R5
+~ip=R13
+~fp=R12
+*line 41
+move 8(R14),R8
+add.l R8,R8
+add.l #_ins2grp,R8
+move (R8),R5
+and #255,R5
+*line 42
+move 8(R14),R7
+add #1,R7
+*line 44
+clr R6
+bra L4
+L5:
+*line 45
+*line 46
+*line 46
+move R6,R8
+add.l R8,R8
+add.l #_vce2grp,R8
+cmp (R8),R7
+bne L6
+*line 47
+*line 48
+*line 48
+cmp _curvce,R6
+bne L7
+*line 49
+*line 50
+move R5,_curinst
+*line 51
+move _curvce,R8
+add.l R8,R8
+add.l #_s_inst,R8
+move R5,(R8)
+*line 52
+*line 53
+L7:
+*line 54
+move #1,(sp)
+move R5,-(sp)
+move R6,-(sp)
+jsr _execins
+addq.l #4,sp
+*line 55
+L6:L3:
+*line 44
+add #1,R6
+L4:
+*line 44
+cmp #12,R6
+blt L5
+L2:L1:tst.l (sp)+
+movem.l (sp)+,R5-R7/R12-R13
+unlk R14
+rts
+.data
Index: alcyon/setwq.s
===================================================================
--- alcyon/setwq.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/setwq.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,206 @@
+.globl _setwq
+.text
+_setwq:
+~~setwq:
+~qp=R13
+~qadr=12
+~qsiz=16
+~hi=18
+~lo=20
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+*line 37
+move.l 8(R14),R13
+*line 37
+*line 38
+tst.l 12(R14)
+bne L2
+*line 38
+clr 16(R14)
+*line 39
+L2:
+*line 40
+move.l 12(R14),12(R13)
+*line 41
+move 16(R14),(R13)
+*line 42
+clr 2(R13)
+*line 43
+clr 4(R13)
+*line 44
+clr 6(R13)
+*line 45
+move 18(R14),8(R13)
+*line 46
+move 20(R14),10(R13)
+*line 48
+clr R0
+move 16(R14),R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _putwq
+.text
+_putwq:
+~~putwq:
+~qp=R13
+~c=R7
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+*line 77
+move.l 8(R14),R13
+*line 77
+move 12(R14),R7
+*line 77
+*line 77
+tst (R13)
+beq L4
+*line 78
+*line 79
+*line 80
+clr R0
+move 2(R13),R0
+cmp (R13),R0
+bne L5
+*line 80
+move #-1,R0
+bra L3
+*line 81
+L5:
+*line 82
+clr R0
+move 4(R13),R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l 12(R13),R0
+move.l R0,R8
+move R7,(R8)
+add #1,4(R13)
+*line 83
+*line 84
+*line 85
+clr R0
+move 4(R13),R0
+cmp (R13),R0
+blo L6
+*line 85
+clr 4(R13)
+*line 86
+L6:
+*line 87
+*line 88
+add #1,2(R13)
+clr R0
+move 2(R13),R0
+cmp 8(R13),R0
+bne L7
+*line 88
+move #1,R0
+bra L3
+*line 89
+bra L8
+L7:
+*line 90
+clr R0
+bra L3
+L8:
+*line 91
+bra L9
+L4:
+*line 92
+*line 93
+*line 94
+move #-2,R0
+bra L3
+L9:L3:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _getwq
+.text
+_getwq:
+~~getwq:
+~qp=R13
+~p=R12
+link R14,#0
+movem.l R7-R7/R12-R13,-(sp)
+*line 124
+move.l 8(R14),R13
+*line 124
+move.l 12(R14),R12
+*line 124
+*line 124
+tst (R13)
+beq L11
+*line 125
+*line 126
+*line 126
+tst 2(R13)
+beq L12
+*line 127
+*line 128
+clr R0
+move 6(R13),R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l 12(R13),R0
+move.l R0,R8
+move (R8),(R12)
+add #1,6(R13)
+*line 129
+*line 130
+*line 131
+clr R0
+move 6(R13),R0
+cmp (R13),R0
+blo L13
+*line 131
+clr 6(R13)
+*line 132
+L13:
+*line 133
+*line 134
+sub #1,2(R13)
+clr R0
+move 2(R13),R0
+cmp 10(R13),R0
+bne L14
+*line 134
+move #1,R0
+bra L10
+*line 135
+bra L15
+L14:
+*line 136
+clr R0
+bra L10
+L15:
+*line 137
+bra L16
+L12:
+*line 138
+*line 139
+*line 140
+move #-1,R0
+bra L10
+L16:
+*line 141
+*line 142
+bra L17
+L11:
+*line 143
+*line 144
+*line 145
+move #-2,R0
+bra L10
+L17:L10:tst.l (sp)+
+movem.l (sp)+,R12-R13
+unlk R14
+rts
+.data
Index: alcyon/showcfg.s
===================================================================
--- alcyon/showcfg.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/showcfg.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,3734 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _v_obtab
+.globl _v_curob
+.globl _v_nobj
+.globl _v_obpri
+.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 _cfg_00
+.data
+_cfg_00:
+.dc.b $16
+.dc.b $12
+.dc.b $68
+.dc.b $17
+.dc.b $64
+.dc.b $2A
+.dc.b $18
+.dc.b $70
+.dc.b $24
+.dc.b $14
+.dc.b $41
+.dc.b $68
+.dc.b $16
+.dc.b $41
+.dc.b $68
+.dc.b $17
+.dc.b $50
+.dc.b $68
+.dc.b $17
+.dc.b $60
+.dc.b $68
+.dc.b $14
+.dc.b $70
+.dc.b $68
+.dc.b $18
+.dc.b $41
+.dc.b $58
+.dc.b $13
+.dc.b $41
+.dc.b $4E
+.dc.b $15
+.dc.b $54
+.dc.b $4E
+.dc.b $17
+.dc.b $4A
+.dc.b $4E
+.dc.b $13
+.dc.b $2E
+.dc.b $46
+.dc.b $17
+.dc.b $3A
+.dc.b $46
+.dc.b $17
+.dc.b $48
+.dc.b $46
+.dc.b $14
+.dc.b $54
+.dc.b $46
+.dc.b $18
+.dc.b $2E
+.dc.b $44
+.dc.b $18
+.dc.b $2E
+.dc.b $52
+.dc.b $15
+.dc.b $2E
+.dc.b $2A
+.dc.b $17
+.dc.b $1E
+.dc.b $2A
+.dc.b $13
+.dc.b $12
+.dc.b $1A
+.dc.b $17
+.dc.b $20
+.dc.b $1A
+.dc.b $18
+.dc.b $12
+.dc.b $28
+.dc.b $18
+.dc.b $12
+.dc.b $38
+.dc.b $18
+.dc.b $12
+.dc.b $4E
+.dc.b $18
+.dc.b $70
+.dc.b $4E
+.dc.b $18
+.dc.b $70
+.dc.b $36
+.dc.b $15
+.dc.b $70
+.dc.b $1A
+.dc.b $17
+.dc.b $60
+.dc.b $1A
+.dc.b $13
+.dc.b $54
+.dc.b $2A
+.dc.b $7
+.dc.b $12
+.dc.b $5A
+.dc.b $7
+.dc.b $2E
+.dc.b $38
+.dc.b $7
+.dc.b $12
+.dc.b $2A
+.dc.b $7
+.dc.b $70
+.dc.b $5A
+.dc.b $7
+.dc.b $54
+.dc.b $38
+.dc.b $7
+.dc.b $70
+.dc.b $2A
+.dc.b $F
+.dc.b $12
+.dc.b $42
+.dc.b $F
+.dc.b $54
+.dc.b $5B
+.dc.b $F
+.dc.b $70
+.dc.b $42
+.dc.b $F
+.dc.b $2E
+.dc.b $59
+.dc.b $10
+.dc.b $2E
+.dc.b $1A
+.dc.b $23
+.dc.b $54
+.dc.b $1A
+.dc.b $1D
+.dc.b $12
+.dc.b $5A
+.dc.b $1E
+.dc.b $2E
+.dc.b $38
+.dc.b $1F
+.dc.b $12
+.dc.b $2A
+.dc.b $20
+.dc.b $70
+.dc.b $5A
+.dc.b $21
+.dc.b $54
+.dc.b $38
+.dc.b $22
+.dc.b $70
+.dc.b $2A
+.dc.b $1D
+.dc.b $12
+.dc.b $42
+.dc.b $1E
+.dc.b $54
+.dc.b $5B
+.dc.b $1F
+.dc.b $70
+.dc.b $42
+.dc.b $20
+.dc.b $2D
+.dc.b $59
+.dc.b $1B
+.dc.b $2E
+.dc.b $1A
+.dc.b $1C
+.dc.b $54
+.dc.b $1A
+.dc.b $17
+.dc.b $22
+.dc.b $68
+.dc.b $17
+.dc.b $32
+.dc.b $68
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.ds.b 21
+.globl _cfg_01
+.data
+_cfg_01:
+.dc.b $16
+.dc.b $10
+.dc.b $68
+.dc.b $13
+.dc.b $10
+.dc.b $1A
+.dc.b $14
+.dc.b $22
+.dc.b $68
+.dc.b $17
+.dc.b $19
+.dc.b $68
+.dc.b $15
+.dc.b $34
+.dc.b $4F
+.dc.b $15
+.dc.b $34
+.dc.b $2B
+.dc.b $13
+.dc.b $22
+.dc.b $4F
+.dc.b $17
+.dc.b $2B
+.dc.b $4F
+.dc.b $18
+.dc.b $22
+.dc.b $5C
+.dc.b $18
+.dc.b $34
+.dc.b $4A
+.dc.b $18
+.dc.b $34
+.dc.b $56
+.dc.b $18
+.dc.b $34
+.dc.b $38
+.dc.b $18
+.dc.b $10
+.dc.b $4D
+.dc.b $18
+.dc.b $10
+.dc.b $36
+.dc.b $18
+.dc.b $10
+.dc.b $24
+.dc.b $18
+.dc.b $60
+.dc.b $5C
+.dc.b $18
+.dc.b $72
+.dc.b $4A
+.dc.b $18
+.dc.b $72
+.dc.b $56
+.dc.b $18
+.dc.b $72
+.dc.b $38
+.dc.b $18
+.dc.b $4E
+.dc.b $4D
+.dc.b $16
+.dc.b $4E
+.dc.b $68
+.dc.b $18
+.dc.b $4E
+.dc.b $37
+.dc.b $18
+.dc.b $4E
+.dc.b $24
+.dc.b $17
+.dc.b $58
+.dc.b $1A
+.dc.b $17
+.dc.b $62
+.dc.b $2B
+.dc.b $17
+.dc.b $56
+.dc.b $2B
+.dc.b $17
+.dc.b $26
+.dc.b $2B
+.dc.b $17
+.dc.b $18
+.dc.b $2B
+.dc.b $17
+.dc.b $1E
+.dc.b $1A
+.dc.b $7
+.dc.b $10
+.dc.b $5A
+.dc.b $7
+.dc.b $34
+.dc.b $3E
+.dc.b $7
+.dc.b $10
+.dc.b $2B
+.dc.b $7
+.dc.b $4E
+.dc.b $5A
+.dc.b $7
+.dc.b $72
+.dc.b $3E
+.dc.b $7
+.dc.b $4E
+.dc.b $2B
+.dc.b $F
+.dc.b $10
+.dc.b $42
+.dc.b $F
+.dc.b $34
+.dc.b $60
+.dc.b $F
+.dc.b $4E
+.dc.b $42
+.dc.b $F
+.dc.b $72
+.dc.b $60
+.dc.b $10
+.dc.b $28
+.dc.b $1A
+.dc.b $23
+.dc.b $66
+.dc.b $1A
+.dc.b $1D
+.dc.b $10
+.dc.b $5A
+.dc.b $1E
+.dc.b $34
+.dc.b $3E
+.dc.b $1F
+.dc.b $10
+.dc.b $2B
+.dc.b $20
+.dc.b $4E
+.dc.b $5A
+.dc.b $21
+.dc.b $72
+.dc.b $3E
+.dc.b $22
+.dc.b $4E
+.dc.b $2B
+.dc.b $1D
+.dc.b $10
+.dc.b $42
+.dc.b $1E
+.dc.b $34
+.dc.b $60
+.dc.b $1F
+.dc.b $4E
+.dc.b $42
+.dc.b $20
+.dc.b $71
+.dc.b $60
+.dc.b $1B
+.dc.b $28
+.dc.b $1A
+.dc.b $1C
+.dc.b $66
+.dc.b $1A
+.dc.b $13
+.dc.b $4E
+.dc.b $1A
+.dc.b $14
+.dc.b $60
+.dc.b $68
+.dc.b $17
+.dc.b $57
+.dc.b $68
+.dc.b $15
+.dc.b $72
+.dc.b $4F
+.dc.b $15
+.dc.b $72
+.dc.b $2B
+.dc.b $13
+.dc.b $60
+.dc.b $4F
+.dc.b $17
+.dc.b $69
+.dc.b $4F
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.ds.b 9
+.globl _cfg_02
+.data
+_cfg_02:
+.dc.b $16
+.dc.b $24
+.dc.b $68
+.dc.b $18
+.dc.b $24
+.dc.b $50
+.dc.b $15
+.dc.b $24
+.dc.b $4F
+.dc.b $13
+.dc.b $24
+.dc.b $1C
+.dc.b $19
+.dc.b $40
+.dc.b $23
+.dc.b $18
+.dc.b $38
+.dc.b $48
+.dc.b $18
+.dc.b $24
+.dc.b $36
+.dc.b $18
+.dc.b $5E
+.dc.b $36
+.dc.b $15
+.dc.b $5E
+.dc.b $1C
+.dc.b $18
+.dc.b $38
+.dc.b $32
+.dc.b $17
+.dc.b $50
+.dc.b $1C
+.dc.b $18
+.dc.b $48
+.dc.b $32
+.dc.b $18
+.dc.b $48
+.dc.b $3C
+.dc.b $18
+.dc.b $48
+.dc.b $4C
+.dc.b $16
+.dc.b $48
+.dc.b $68
+.dc.b $18
+.dc.b $48
+.dc.b $5A
+.dc.b $17
+.dc.b $53
+.dc.b $68
+.dc.b $14
+.dc.b $5E
+.dc.b $68
+.dc.b $18
+.dc.b $5E
+.dc.b $50
+.dc.b $13
+.dc.b $5E
+.dc.b $4F
+.dc.b $14
+.dc.b $72
+.dc.b $4F
+.dc.b $17
+.dc.b $68
+.dc.b $4F
+.dc.b $18
+.dc.b $72
+.dc.b $28
+.dc.b $18
+.dc.b $72
+.dc.b $42
+.dc.b $18
+.dc.b $10
+.dc.b $28
+.dc.b $18
+.dc.b $10
+.dc.b $42
+.dc.b $8
+.dc.b $38
+.dc.b $3A
+.dc.b $7
+.dc.b $5E
+.dc.b $42
+.dc.b $7
+.dc.b $10
+.dc.b $36
+.dc.b $8
+.dc.b $48
+.dc.b $54
+.dc.b $7
+.dc.b $24
+.dc.b $42
+.dc.b $7
+.dc.b $72
+.dc.b $36
+.dc.b $F
+.dc.b $24
+.dc.b $5C
+.dc.b $F
+.dc.b $5E
+.dc.b $2A
+.dc.b $F
+.dc.b $5E
+.dc.b $5C
+.dc.b $F
+.dc.b $24
+.dc.b $2A
+.dc.b $10
+.dc.b $10
+.dc.b $1A
+.dc.b $23
+.dc.b $72
+.dc.b $1A
+.dc.b $1D
+.dc.b $38
+.dc.b $3A
+.dc.b $1E
+.dc.b $5E
+.dc.b $42
+.dc.b $1F
+.dc.b $10
+.dc.b $36
+.dc.b $20
+.dc.b $47
+.dc.b $53
+.dc.b $21
+.dc.b $24
+.dc.b $42
+.dc.b $22
+.dc.b $72
+.dc.b $36
+.dc.b $1D
+.dc.b $24
+.dc.b $5C
+.dc.b $1E
+.dc.b $5E
+.dc.b $2A
+.dc.b $1F
+.dc.b $5E
+.dc.b $5C
+.dc.b $20
+.dc.b $23
+.dc.b $2A
+.dc.b $1B
+.dc.b $10
+.dc.b $1A
+.dc.b $1C
+.dc.b $72
+.dc.b $1A
+.dc.b $16
+.dc.b $10
+.dc.b $4F
+.dc.b $17
+.dc.b $1A
+.dc.b $4F
+.dc.b $1A
+.dc.b $40
+.dc.b $23
+.dc.b $17
+.dc.b $30
+.dc.b $1C
+.dc.b $14
+.dc.b $38
+.dc.b $68
+.dc.b $18
+.dc.b $38
+.dc.b $58
+.dc.b $17
+.dc.b $2E
+.dc.b $68
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.ds.b 18
+.globl _cfg_03
+.data
+_cfg_03:
+.dc.b $14
+.dc.b $2C
+.dc.b $2B
+.dc.b $13
+.dc.b $2C
+.dc.b $38
+.dc.b $15
+.dc.b $3C
+.dc.b $38
+.dc.b $15
+.dc.b $54
+.dc.b $32
+.dc.b $16
+.dc.b $12
+.dc.b $60
+.dc.b $13
+.dc.b $12
+.dc.b $2B
+.dc.b $15
+.dc.b $44
+.dc.b $1A
+.dc.b $16
+.dc.b $44
+.dc.b $32
+.dc.b $17
+.dc.b $2C
+.dc.b $60
+.dc.b $17
+.dc.b $22
+.dc.b $60
+.dc.b $17
+.dc.b $60
+.dc.b $60
+.dc.b $14
+.dc.b $70
+.dc.b $60
+.dc.b $18
+.dc.b $70
+.dc.b $46
+.dc.b $18
+.dc.b $12
+.dc.b $46
+.dc.b $15
+.dc.b $70
+.dc.b $2B
+.dc.b $17
+.dc.b $20
+.dc.b $2B
+.dc.b $17
+.dc.b $62
+.dc.b $2B
+.dc.b $18
+.dc.b $44
+.dc.b $26
+.dc.b $18
+.dc.b $2C
+.dc.b $1E
+.dc.b $17
+.dc.b $1E
+.dc.b $1A
+.dc.b $17
+.dc.b $36
+.dc.b $1A
+.dc.b $16
+.dc.b $58
+.dc.b $2B
+.dc.b $18
+.dc.b $58
+.dc.b $1E
+.dc.b $13
+.dc.b $44
+.dc.b $1A
+.dc.b $17
+.dc.b $50
+.dc.b $1A
+.dc.b $17
+.dc.b $62
+.dc.b $1A
+.dc.b $7
+.dc.b $12
+.dc.b $3A
+.dc.b $A
+.dc.b $28
+.dc.b $60
+.dc.b $A
+.dc.b $2C
+.dc.b $1A
+.dc.b $7
+.dc.b $70
+.dc.b $3A
+.dc.b $9
+.dc.b $58
+.dc.b $60
+.dc.b $9
+.dc.b $58
+.dc.b $1A
+.dc.b $F
+.dc.b $12
+.dc.b $52
+.dc.b $F
+.dc.b $70
+.dc.b $51
+.dc.b $F
+.dc.b $2C
+.dc.b $46
+.dc.b $F
+.dc.b $54
+.dc.b $41
+.dc.b $10
+.dc.b $12
+.dc.b $1A
+.dc.b $23
+.dc.b $70
+.dc.b $1A
+.dc.b $1D
+.dc.b $12
+.dc.b $3A
+.dc.b $1E
+.dc.b $29
+.dc.b $60
+.dc.b $1F
+.dc.b $2D
+.dc.b $1A
+.dc.b $20
+.dc.b $70
+.dc.b $3A
+.dc.b $21
+.dc.b $57
+.dc.b $60
+.dc.b $22
+.dc.b $57
+.dc.b $1A
+.dc.b $1D
+.dc.b $12
+.dc.b $52
+.dc.b $1E
+.dc.b $70
+.dc.b $51
+.dc.b $1F
+.dc.b $2C
+.dc.b $46
+.dc.b $20
+.dc.b $53
+.dc.b $41
+.dc.b $1B
+.dc.b $12
+.dc.b $1A
+.dc.b $1C
+.dc.b $70
+.dc.b $1A
+.dc.b $18
+.dc.b $3C
+.dc.b $48
+.dc.b $18
+.dc.b $3C
+.dc.b $58
+.dc.b $16
+.dc.b $3C
+.dc.b $60
+.dc.b $14
+.dc.b $3C
+.dc.b $60
+.dc.b $17
+.dc.b $4A
+.dc.b $60
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.ds.b 24
+.globl _cfg_04
+.data
+_cfg_04:
+.dc.b $13
+.dc.b $41
+.dc.b $1A
+.dc.b $15
+.dc.b $41
+.dc.b $1A
+.dc.b $19
+.dc.b $3C
+.dc.b $5D
+.dc.b $1A
+.dc.b $46
+.dc.b $5D
+.dc.b $18
+.dc.b $41
+.dc.b $4A
+.dc.b $13
+.dc.b $56
+.dc.b $34
+.dc.b $17
+.dc.b $61
+.dc.b $34
+.dc.b $15
+.dc.b $6C
+.dc.b $34
+.dc.b $18
+.dc.b $6C
+.dc.b $4E
+.dc.b $18
+.dc.b $16
+.dc.b $4E
+.dc.b $18
+.dc.b $41
+.dc.b $34
+.dc.b $17
+.dc.b $1C
+.dc.b $1A
+.dc.b $17
+.dc.b $66
+.dc.b $1A
+.dc.b $17
+.dc.b $32
+.dc.b $1A
+.dc.b $17
+.dc.b $50
+.dc.b $1A
+.dc.b $7
+.dc.b $41
+.dc.b $40
+.dc.b $A
+.dc.b $2A
+.dc.b $1A
+.dc.b $7
+.dc.b $16
+.dc.b $43
+.dc.b $7
+.dc.b $6C
+.dc.b $43
+.dc.b $9
+.dc.b $58
+.dc.b $1A
+.dc.b $F
+.dc.b $41
+.dc.b $28
+.dc.b $F
+.dc.b $41
+.dc.b $58
+.dc.b $F
+.dc.b $16
+.dc.b $5C
+.dc.b $F
+.dc.b $6C
+.dc.b $5C
+.dc.b $10
+.dc.b $12
+.dc.b $1A
+.dc.b $23
+.dc.b $70
+.dc.b $1A
+.dc.b $1E
+.dc.b $41
+.dc.b $40
+.dc.b $1F
+.dc.b $2B
+.dc.b $1A
+.dc.b $20
+.dc.b $16
+.dc.b $43
+.dc.b $21
+.dc.b $6C
+.dc.b $43
+.dc.b $22
+.dc.b $57
+.dc.b $1A
+.dc.b $1D
+.dc.b $41
+.dc.b $28
+.dc.b $1E
+.dc.b $41
+.dc.b $58
+.dc.b $1F
+.dc.b $16
+.dc.b $5C
+.dc.b $20
+.dc.b $6B
+.dc.b $5C
+.dc.b $1B
+.dc.b $12
+.dc.b $1A
+.dc.b $1C
+.dc.b $70
+.dc.b $1A
+.dc.b $16
+.dc.b $2C
+.dc.b $64
+.dc.b $18
+.dc.b $2C
+.dc.b $54
+.dc.b $18
+.dc.b $2C
+.dc.b $44
+.dc.b $15
+.dc.b $2C
+.dc.b $34
+.dc.b $17
+.dc.b $21
+.dc.b $34
+.dc.b $13
+.dc.b $16
+.dc.b $34
+.dc.b $14
+.dc.b $56
+.dc.b $64
+.dc.b $18
+.dc.b $56
+.dc.b $54
+.dc.b $18
+.dc.b $56
+.dc.b $44
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.ds.b 51
+.globl _cfg_05
+.data
+_cfg_05:
+.dc.b $13
+.dc.b $10
+.dc.b $2A
+.dc.b $16
+.dc.b $3F
+.dc.b $5A
+.dc.b $17
+.dc.b $3C
+.dc.b $62
+.dc.b $15
+.dc.b $72
+.dc.b $52
+.dc.b $19
+.dc.b $63
+.dc.b $5A
+.dc.b $18
+.dc.b $72
+.dc.b $4C
+.dc.b $17
+.dc.b $66
+.dc.b $2A
+.dc.b $17
+.dc.b $20
+.dc.b $62
+.dc.b $16
+.dc.b $10
+.dc.b $62
+.dc.b $18
+.dc.b $10
+.dc.b $46
+.dc.b $18
+.dc.b $27
+.dc.b $36
+.dc.b $13
+.dc.b $27
+.dc.b $3A
+.dc.b $18
+.dc.b $27
+.dc.b $40
+.dc.b $15
+.dc.b $3F
+.dc.b $3A
+.dc.b $18
+.dc.b $3F
+.dc.b $46
+.dc.b $18
+.dc.b $72
+.dc.b $2C
+.dc.b $15
+.dc.b $72
+.dc.b $1A
+.dc.b $18
+.dc.b $72
+.dc.b $26
+.dc.b $17
+.dc.b $62
+.dc.b $1A
+.dc.b $17
+.dc.b $1C
+.dc.b $1A
+.dc.b $15
+.dc.b $27
+.dc.b $1A
+.dc.b $18
+.dc.b $27
+.dc.b $24
+.dc.b $17
+.dc.b $1E
+.dc.b $2A
+.dc.b $18
+.dc.b $57
+.dc.b $41
+.dc.b $14
+.dc.b $57
+.dc.b $5A
+.dc.b $13
+.dc.b $57
+.dc.b $2A
+.dc.b $7
+.dc.b $10
+.dc.b $39
+.dc.b $A
+.dc.b $2F
+.dc.b $62
+.dc.b $7
+.dc.b $27
+.dc.b $2A
+.dc.b $7
+.dc.b $57
+.dc.b $37
+.dc.b $8
+.dc.b $3F
+.dc.b $4B
+.dc.b $7
+.dc.b $72
+.dc.b $2A
+.dc.b $F
+.dc.b $10
+.dc.b $53
+.dc.b $F
+.dc.b $27
+.dc.b $4B
+.dc.b $F
+.dc.b $57
+.dc.b $4D
+.dc.b $F
+.dc.b $72
+.dc.b $60
+.dc.b $10
+.dc.b $10
+.dc.b $1A
+.dc.b $23
+.dc.b $57
+.dc.b $1A
+.dc.b $1D
+.dc.b $10
+.dc.b $39
+.dc.b $1E
+.dc.b $30
+.dc.b $62
+.dc.b $1F
+.dc.b $27
+.dc.b $2A
+.dc.b $20
+.dc.b $57
+.dc.b $37
+.dc.b $21
+.dc.b $3F
+.dc.b $4B
+.dc.b $22
+.dc.b $72
+.dc.b $2A
+.dc.b $1D
+.dc.b $10
+.dc.b $53
+.dc.b $1E
+.dc.b $27
+.dc.b $4B
+.dc.b $1F
+.dc.b $57
+.dc.b $4D
+.dc.b $20
+.dc.b $71
+.dc.b $60
+.dc.b $1B
+.dc.b $10
+.dc.b $1A
+.dc.b $1C
+.dc.b $57
+.dc.b $1A
+.dc.b $17
+.dc.b $4C
+.dc.b $62
+.dc.b $17
+.dc.b $54
+.dc.b $62
+.dc.b $17
+.dc.b $4A
+.dc.b $5A
+.dc.b $17
+.dc.b $34
+.dc.b $3A
+.dc.b $18
+.dc.b $72
+.dc.b $3C
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.ds.b 24
+.globl _cfg_06
+.data
+_cfg_06:
+.dc.b $15
+.dc.b $41
+.dc.b $1A
+.dc.b $14
+.dc.b $41
+.dc.b $68
+.dc.b $1A
+.dc.b $44
+.dc.b $2B
+.dc.b $17
+.dc.b $53
+.dc.b $33
+.dc.b $15
+.dc.b $5E
+.dc.b $33
+.dc.b $13
+.dc.b $19
+.dc.b $33
+.dc.b $15
+.dc.b $2D
+.dc.b $33
+.dc.b $17
+.dc.b $23
+.dc.b $33
+.dc.b $18
+.dc.b $2D
+.dc.b $43
+.dc.b $18
+.dc.b $2D
+.dc.b $52
+.dc.b $16
+.dc.b $2D
+.dc.b $68
+.dc.b $18
+.dc.b $2D
+.dc.b $5A
+.dc.b $17
+.dc.b $37
+.dc.b $68
+.dc.b $17
+.dc.b $1E
+.dc.b $1A
+.dc.b $17
+.dc.b $32
+.dc.b $1A
+.dc.b $13
+.dc.b $41
+.dc.b $1A
+.dc.b $17
+.dc.b $50
+.dc.b $1A
+.dc.b $17
+.dc.b $64
+.dc.b $1A
+.dc.b $18
+.dc.b $41
+.dc.b $35
+.dc.b $18
+.dc.b $41
+.dc.b $4E
+.dc.b $18
+.dc.b $19
+.dc.b $4E
+.dc.b $18
+.dc.b $5E
+.dc.b $4E
+.dc.b $7
+.dc.b $19
+.dc.b $42
+.dc.b $7
+.dc.b $41
+.dc.b $42
+.dc.b $A
+.dc.b $28
+.dc.b $1A
+.dc.b $7
+.dc.b $5E
+.dc.b $42
+.dc.b $9
+.dc.b $5A
+.dc.b $1A
+.dc.b $F
+.dc.b $41
+.dc.b $28
+.dc.b $F
+.dc.b $41
+.dc.b $5A
+.dc.b $F
+.dc.b $19
+.dc.b $5A
+.dc.b $F
+.dc.b $5E
+.dc.b $5A
+.dc.b $10
+.dc.b $10
+.dc.b $1A
+.dc.b $23
+.dc.b $72
+.dc.b $1A
+.dc.b $1D
+.dc.b $19
+.dc.b $42
+.dc.b $1E
+.dc.b $41
+.dc.b $42
+.dc.b $1F
+.dc.b $29
+.dc.b $1A
+.dc.b $20
+.dc.b $5E
+.dc.b $42
+.dc.b $22
+.dc.b $59
+.dc.b $1A
+.dc.b $1D
+.dc.b $41
+.dc.b $28
+.dc.b $1E
+.dc.b $41
+.dc.b $5A
+.dc.b $1F
+.dc.b $19
+.dc.b $5A
+.dc.b $20
+.dc.b $5D
+.dc.b $5A
+.dc.b $1B
+.dc.b $10
+.dc.b $1A
+.dc.b $1C
+.dc.b $72
+.dc.b $1A
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.ds.b 57
+.globl _cfg_07
+.data
+_cfg_07:
+.dc.b $16
+.dc.b $12
+.dc.b $68
+.dc.b $13
+.dc.b $20
+.dc.b $18
+.dc.b $19
+.dc.b $1A
+.dc.b $2B
+.dc.b $18
+.dc.b $12
+.dc.b $3A
+.dc.b $1A
+.dc.b $26
+.dc.b $2B
+.dc.b $18
+.dc.b $2E
+.dc.b $3A
+.dc.b $16
+.dc.b $2E
+.dc.b $4D
+.dc.b $13
+.dc.b $2E
+.dc.b $4D
+.dc.b $13
+.dc.b $52
+.dc.b $32
+.dc.b $15
+.dc.b $70
+.dc.b $4D
+.dc.b $16
+.dc.b $52
+.dc.b $4D
+.dc.b $17
+.dc.b $61
+.dc.b $4D
+.dc.b $17
+.dc.b $3E
+.dc.b $4D
+.dc.b $17
+.dc.b $4E
+.dc.b $4D
+.dc.b $17
+.dc.b $2C
+.dc.b $18
+.dc.b $17
+.dc.b $43
+.dc.b $18
+.dc.b $17
+.dc.b $62
+.dc.b $32
+.dc.b $18
+.dc.b $70
+.dc.b $25
+.dc.b $18
+.dc.b $70
+.dc.b $3E
+.dc.b $18
+.dc.b $70
+.dc.b $4A
+.dc.b $18
+.dc.b $12
+.dc.b $4D
+.dc.b $14
+.dc.b $2E
+.dc.b $68
+.dc.b $17
+.dc.b $20
+.dc.b $68
+.dc.b $8
+.dc.b $2E
+.dc.b $5B
+.dc.b $7
+.dc.b $12
+.dc.b $3F
+.dc.b $9
+.dc.b $37
+.dc.b $18
+.dc.b $7
+.dc.b $2E
+.dc.b $3F
+.dc.b $7
+.dc.b $52
+.dc.b $3F
+.dc.b $7
+.dc.b $70
+.dc.b $32
+.dc.b $F
+.dc.b $20
+.dc.b $25
+.dc.b $F
+.dc.b $12
+.dc.b $5B
+.dc.b $F
+.dc.b $70
+.dc.b $5B
+.dc.b $10
+.dc.b $52
+.dc.b $18
+.dc.b $23
+.dc.b $70
+.dc.b $18
+.dc.b $1D
+.dc.b $2E
+.dc.b $5B
+.dc.b $1E
+.dc.b $12
+.dc.b $3F
+.dc.b $1F
+.dc.b $36
+.dc.b $18
+.dc.b $20
+.dc.b $2E
+.dc.b $3F
+.dc.b $21
+.dc.b $52
+.dc.b $3F
+.dc.b $22
+.dc.b $70
+.dc.b $32
+.dc.b $1D
+.dc.b $20
+.dc.b $25
+.dc.b $1E
+.dc.b $12
+.dc.b $5B
+.dc.b $20
+.dc.b $6F
+.dc.b $5B
+.dc.b $1B
+.dc.b $52
+.dc.b $18
+.dc.b $1C
+.dc.b $70
+.dc.b $18
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.ds.b 54
+.globl _cfg_08
+.data
+_cfg_08:
+.dc.b $14
+.dc.b $42
+.dc.b $68
+.dc.b $16
+.dc.b $28
+.dc.b $68
+.dc.b $17
+.dc.b $35
+.dc.b $68
+.dc.b $13
+.dc.b $10
+.dc.b $48
+.dc.b $18
+.dc.b $10
+.dc.b $56
+.dc.b $17
+.dc.b $1C
+.dc.b $48
+.dc.b $14
+.dc.b $28
+.dc.b $48
+.dc.b $15
+.dc.b $28
+.dc.b $48
+.dc.b $18
+.dc.b $28
+.dc.b $3C
+.dc.b $17
+.dc.b $1C
+.dc.b $1A
+.dc.b $18
+.dc.b $28
+.dc.b $28
+.dc.b $18
+.dc.b $28
+.dc.b $54
+.dc.b $18
+.dc.b $42
+.dc.b $4E
+.dc.b $18
+.dc.b $42
+.dc.b $36
+.dc.b $15
+.dc.b $42
+.dc.b $1A
+.dc.b $13
+.dc.b $42
+.dc.b $1A
+.dc.b $17
+.dc.b $34
+.dc.b $1A
+.dc.b $17
+.dc.b $4F
+.dc.b $1A
+.dc.b $15
+.dc.b $5C
+.dc.b $1A
+.dc.b $18
+.dc.b $5C
+.dc.b $2A
+.dc.b $18
+.dc.b $72
+.dc.b $29
+.dc.b $18
+.dc.b $72
+.dc.b $39
+.dc.b $18
+.dc.b $72
+.dc.b $54
+.dc.b $16
+.dc.b $5C
+.dc.b $48
+.dc.b $18
+.dc.b $5C
+.dc.b $3C
+.dc.b $17
+.dc.b $66
+.dc.b $48
+.dc.b $18
+.dc.b $42
+.dc.b $26
+.dc.b $7
+.dc.b $28
+.dc.b $36
+.dc.b $7
+.dc.b $42
+.dc.b $42
+.dc.b $A
+.dc.b $28
+.dc.b $1A
+.dc.b $8
+.dc.b $28
+.dc.b $5A
+.dc.b $8
+.dc.b $5C
+.dc.b $36
+.dc.b $7
+.dc.b $72
+.dc.b $48
+.dc.b $F
+.dc.b $42
+.dc.b $2A
+.dc.b $F
+.dc.b $42
+.dc.b $5A
+.dc.b $F
+.dc.b $10
+.dc.b $60
+.dc.b $F
+.dc.b $72
+.dc.b $60
+.dc.b $10
+.dc.b $10
+.dc.b $1A
+.dc.b $23
+.dc.b $72
+.dc.b $1A
+.dc.b $1D
+.dc.b $28
+.dc.b $36
+.dc.b $1E
+.dc.b $42
+.dc.b $42
+.dc.b $1F
+.dc.b $29
+.dc.b $1A
+.dc.b $20
+.dc.b $27
+.dc.b $5A
+.dc.b $21
+.dc.b $5C
+.dc.b $36
+.dc.b $22
+.dc.b $72
+.dc.b $48
+.dc.b $1D
+.dc.b $42
+.dc.b $2A
+.dc.b $1E
+.dc.b $42
+.dc.b $5A
+.dc.b $1F
+.dc.b $10
+.dc.b $60
+.dc.b $20
+.dc.b $71
+.dc.b $60
+.dc.b $1B
+.dc.b $10
+.dc.b $1A
+.dc.b $1C
+.dc.b $72
+.dc.b $1A
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.ds.b 36
+.globl _cfg_09
+.data
+_cfg_09:
+.dc.b $16
+.dc.b $24
+.dc.b $68
+.dc.b $18
+.dc.b $24
+.dc.b $50
+.dc.b $15
+.dc.b $24
+.dc.b $4F
+.dc.b $13
+.dc.b $24
+.dc.b $1C
+.dc.b $18
+.dc.b $38
+.dc.b $2C
+.dc.b $18
+.dc.b $38
+.dc.b $48
+.dc.b $18
+.dc.b $24
+.dc.b $36
+.dc.b $18
+.dc.b $5E
+.dc.b $36
+.dc.b $15
+.dc.b $5E
+.dc.b $1C
+.dc.b $13
+.dc.b $48
+.dc.b $1C
+.dc.b $17
+.dc.b $53
+.dc.b $1C
+.dc.b $18
+.dc.b $48
+.dc.b $2C
+.dc.b $18
+.dc.b $48
+.dc.b $3C
+.dc.b $18
+.dc.b $48
+.dc.b $4C
+.dc.b $16
+.dc.b $48
+.dc.b $68
+.dc.b $18
+.dc.b $48
+.dc.b $5A
+.dc.b $17
+.dc.b $53
+.dc.b $68
+.dc.b $14
+.dc.b $5E
+.dc.b $68
+.dc.b $18
+.dc.b $5E
+.dc.b $50
+.dc.b $13
+.dc.b $5E
+.dc.b $4F
+.dc.b $14
+.dc.b $72
+.dc.b $4F
+.dc.b $17
+.dc.b $68
+.dc.b $4F
+.dc.b $18
+.dc.b $72
+.dc.b $28
+.dc.b $18
+.dc.b $72
+.dc.b $42
+.dc.b $18
+.dc.b $10
+.dc.b $28
+.dc.b $18
+.dc.b $10
+.dc.b $42
+.dc.b $8
+.dc.b $38
+.dc.b $3A
+.dc.b $7
+.dc.b $5E
+.dc.b $42
+.dc.b $7
+.dc.b $10
+.dc.b $36
+.dc.b $8
+.dc.b $48
+.dc.b $54
+.dc.b $7
+.dc.b $24
+.dc.b $42
+.dc.b $7
+.dc.b $72
+.dc.b $36
+.dc.b $F
+.dc.b $24
+.dc.b $5C
+.dc.b $F
+.dc.b $5E
+.dc.b $2A
+.dc.b $F
+.dc.b $5E
+.dc.b $5C
+.dc.b $F
+.dc.b $24
+.dc.b $2A
+.dc.b $10
+.dc.b $10
+.dc.b $1A
+.dc.b $23
+.dc.b $72
+.dc.b $1A
+.dc.b $1D
+.dc.b $38
+.dc.b $3A
+.dc.b $1E
+.dc.b $5E
+.dc.b $42
+.dc.b $1F
+.dc.b $10
+.dc.b $36
+.dc.b $20
+.dc.b $47
+.dc.b $53
+.dc.b $21
+.dc.b $24
+.dc.b $42
+.dc.b $22
+.dc.b $72
+.dc.b $36
+.dc.b $1D
+.dc.b $24
+.dc.b $5C
+.dc.b $1E
+.dc.b $5E
+.dc.b $2A
+.dc.b $1F
+.dc.b $5E
+.dc.b $5C
+.dc.b $20
+.dc.b $23
+.dc.b $2A
+.dc.b $1B
+.dc.b $10
+.dc.b $1A
+.dc.b $1C
+.dc.b $72
+.dc.b $1A
+.dc.b $16
+.dc.b $10
+.dc.b $4F
+.dc.b $17
+.dc.b $1A
+.dc.b $4F
+.dc.b $15
+.dc.b $38
+.dc.b $1C
+.dc.b $17
+.dc.b $2E
+.dc.b $1C
+.dc.b $14
+.dc.b $38
+.dc.b $68
+.dc.b $18
+.dc.b $38
+.dc.b $58
+.dc.b $17
+.dc.b $2E
+.dc.b $68
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.ds.b 18
+.globl _cfg_10
+.data
+_cfg_10:
+.dc.b $13
+.dc.b $12
+.dc.b $1A
+.dc.b $18
+.dc.b $12
+.dc.b $2A
+.dc.b $18
+.dc.b $12
+.dc.b $40
+.dc.b $18
+.dc.b $12
+.dc.b $50
+.dc.b $17
+.dc.b $50
+.dc.b $3B
+.dc.b $16
+.dc.b $12
+.dc.b $60
+.dc.b $17
+.dc.b $32
+.dc.b $3B
+.dc.b $17
+.dc.b $22
+.dc.b $2B
+.dc.b $17
+.dc.b $32
+.dc.b $2B
+.dc.b $13
+.dc.b $3A
+.dc.b $45
+.dc.b $15
+.dc.b $4A
+.dc.b $45
+.dc.b $18
+.dc.b $4A
+.dc.b $55
+.dc.b $14
+.dc.b $4A
+.dc.b $60
+.dc.b $16
+.dc.b $4A
+.dc.b $60
+.dc.b $17
+.dc.b $3A
+.dc.b $60
+.dc.b $17
+.dc.b $2A
+.dc.b $60
+.dc.b $17
+.dc.b $5A
+.dc.b $60
+.dc.b $17
+.dc.b $1E
+.dc.b $1A
+.dc.b $17
+.dc.b $64
+.dc.b $1A
+.dc.b $17
+.dc.b $19
+.dc.b $2B
+.dc.b $17
+.dc.b $69
+.dc.b $2B
+.dc.b $18
+.dc.b $70
+.dc.b $2A
+.dc.b $18
+.dc.b $70
+.dc.b $4A
+.dc.b $18
+.dc.b $70
+.dc.b $38
+.dc.b $18
+.dc.b $70
+.dc.b $52
+.dc.b $17
+.dc.b $64
+.dc.b $60
+.dc.b $17
+.dc.b $64
+.dc.b $3B
+.dc.b $18
+.dc.b $12
+.dc.b $38
+.dc.b $17
+.dc.b $22
+.dc.b $3B
+.dc.b $17
+.dc.b $1E
+.dc.b $60
+.dc.b $A
+.dc.b $5A
+.dc.b $3B
+.dc.b $A
+.dc.b $24
+.dc.b $60
+.dc.b $7
+.dc.b $12
+.dc.b $2B
+.dc.b $9
+.dc.b $28
+.dc.b $3B
+.dc.b $9
+.dc.b $5E
+.dc.b $60
+.dc.b $7
+.dc.b $70
+.dc.b $2B
+.dc.b $F
+.dc.b $12
+.dc.b $4E
+.dc.b $F
+.dc.b $3A
+.dc.b $51
+.dc.b $F
+.dc.b $70
+.dc.b $4E
+.dc.b $10
+.dc.b $28
+.dc.b $1A
+.dc.b $23
+.dc.b $5A
+.dc.b $1A
+.dc.b $1D
+.dc.b $5B
+.dc.b $3B
+.dc.b $1E
+.dc.b $25
+.dc.b $60
+.dc.b $1F
+.dc.b $12
+.dc.b $2B
+.dc.b $20
+.dc.b $27
+.dc.b $3B
+.dc.b $21
+.dc.b $5D
+.dc.b $60
+.dc.b $22
+.dc.b $70
+.dc.b $2B
+.dc.b $1D
+.dc.b $12
+.dc.b $4E
+.dc.b $1E
+.dc.b $3A
+.dc.b $51
+.dc.b $1F
+.dc.b $70
+.dc.b $4E
+.dc.b $1B
+.dc.b $28
+.dc.b $1A
+.dc.b $1C
+.dc.b $5A
+.dc.b $1A
+.dc.b $19
+.dc.b $41
+.dc.b $33
+.dc.b $1A
+.dc.b $41
+.dc.b $33
+.dc.b $13
+.dc.b $12
+.dc.b $3B
+.dc.b $17
+.dc.b $50
+.dc.b $2B
+.dc.b $17
+.dc.b $60
+.dc.b $2B
+.dc.b $15
+.dc.b $70
+.dc.b $1A
+.dc.b $14
+.dc.b $70
+.dc.b $60
+.dc.b $15
+.dc.b $70
+.dc.b $3B
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.ds.b 9
+.globl _cfg_11
+.data
+_cfg_11:
+.dc.b $15
+.dc.b $44
+.dc.b $1A
+.dc.b $17
+.dc.b $66
+.dc.b $2C
+.dc.b $15
+.dc.b $72
+.dc.b $2C
+.dc.b $14
+.dc.b $72
+.dc.b $68
+.dc.b $16
+.dc.b $5C
+.dc.b $68
+.dc.b $17
+.dc.b $36
+.dc.b $2C
+.dc.b $14
+.dc.b $44
+.dc.b $5E
+.dc.b $16
+.dc.b $34
+.dc.b $5E
+.dc.b $13
+.dc.b $24
+.dc.b $38
+.dc.b $13
+.dc.b $44
+.dc.b $3E
+.dc.b $17
+.dc.b $50
+.dc.b $3E
+.dc.b $14
+.dc.b $5C
+.dc.b $3E
+.dc.b $15
+.dc.b $5C
+.dc.b $3E
+.dc.b $18
+.dc.b $5C
+.dc.b $32
+.dc.b $18
+.dc.b $5C
+.dc.b $4A
+.dc.b $18
+.dc.b $44
+.dc.b $4A
+.dc.b $18
+.dc.b $44
+.dc.b $37
+.dc.b $18
+.dc.b $44
+.dc.b $28
+.dc.b $18
+.dc.b $5C
+.dc.b $28
+.dc.b $13
+.dc.b $5C
+.dc.b $1A
+.dc.b $17
+.dc.b $68
+.dc.b $1A
+.dc.b $17
+.dc.b $34
+.dc.b $1A
+.dc.b $17
+.dc.b $67
+.dc.b $68
+.dc.b $18
+.dc.b $10
+.dc.b $48
+.dc.b $18
+.dc.b $72
+.dc.b $48
+.dc.b $18
+.dc.b $24
+.dc.b $53
+.dc.b $18
+.dc.b $5C
+.dc.b $5A
+.dc.b $18
+.dc.b $72
+.dc.b $50
+.dc.b $8
+.dc.b $5C
+.dc.b $50
+.dc.b $7
+.dc.b $72
+.dc.b $3B
+.dc.b $7
+.dc.b $44
+.dc.b $2C
+.dc.b $7
+.dc.b $10
+.dc.b $3B
+.dc.b $7
+.dc.b $24
+.dc.b $46
+.dc.b $7
+.dc.b $5C
+.dc.b $2C
+.dc.b $F
+.dc.b $44
+.dc.b $50
+.dc.b $F
+.dc.b $72
+.dc.b $5A
+.dc.b $F
+.dc.b $24
+.dc.b $62
+.dc.b $F
+.dc.b $10
+.dc.b $56
+.dc.b $10
+.dc.b $2C
+.dc.b $1A
+.dc.b $23
+.dc.b $72
+.dc.b $1A
+.dc.b $1D
+.dc.b $5C
+.dc.b $50
+.dc.b $1E
+.dc.b $72
+.dc.b $3B
+.dc.b $1F
+.dc.b $44
+.dc.b $2C
+.dc.b $20
+.dc.b $10
+.dc.b $3B
+.dc.b $21
+.dc.b $24
+.dc.b $46
+.dc.b $22
+.dc.b $5C
+.dc.b $2C
+.dc.b $1D
+.dc.b $44
+.dc.b $50
+.dc.b $1E
+.dc.b $72
+.dc.b $5A
+.dc.b $1F
+.dc.b $24
+.dc.b $62
+.dc.b $20
+.dc.b $F
+.dc.b $56
+.dc.b $1B
+.dc.b $2C
+.dc.b $1A
+.dc.b $1C
+.dc.b $72
+.dc.b $1A
+.dc.b $17
+.dc.b $26
+.dc.b $2C
+.dc.b $13
+.dc.b $10
+.dc.b $2C
+.dc.b $17
+.dc.b $20
+.dc.b $2C
+.dc.b $18
+.dc.b $34
+.dc.b $4E
+.dc.b $15
+.dc.b $34
+.dc.b $38
+.dc.b $18
+.dc.b $34
+.dc.b $46
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.ds.b 15
+.globl _cfgptr
+.data
+_cfgptr:
+*line 733
+.dc.l _cfg_00
+*line 733
+.dc.l _cfg_01
+*line 733
+.dc.l _cfg_02
+*line 733
+.dc.l _cfg_03
+*line 733
+.dc.l _cfg_04
+*line 734
+.dc.l _cfg_05
+*line 734
+.dc.l _cfg_06
+*line 734
+.dc.l _cfg_07
+*line 734
+.dc.l _cfg_08
+*line 734
+.dc.l _cfg_09
+*line 735
+.dc.l _cfg_10
+*line 736
+.dc.l _cfg_11
+.globl _point
+.globl _x_key
+.globl _LftEdge
+.globl _TopEdge
+.globl _RgtEdge
+.globl _BotEdge
+.globl _curslim
+.globl _curvce
+.globl _hitbox
+.globl _hitcx
+.globl _hitcy
+.globl _stccol
+.globl _stcrow
+.globl _wcflag
+.globl _wcmcol
+.globl _wcmrow
+.globl _wcpage
+.globl _wmcsel
+.globl _wmctag
+.globl _instob
+.globl _idoct
+.globl _csbp
+.globl _vbufs
+.globl _wslib
+.globl _id_fet2
+.data
+_id_fet2:
+.dc.w $18
+.dc.w $C
+.dc.w $D
+.dc.w $0
+*line 88
+.dc.l _et_mwsn
+*line 88
+.dc.l _ef_mwsn
+*line 88
+.dc.l _rd_mwsn
+*line 88
+.dc.l _nd_mwsn
+.dc.w $18
+.dc.w $10
+.dc.w $11
+.dc.w $100
+*line 89
+.dc.l _et_mwsn
+*line 89
+.dc.l _ef_mwsn
+*line 89
+.dc.l _rd_mwsn
+*line 89
+.dc.l _nd_mwsn
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.l $0
+.dc.l $0
+.dc.l $0
+.dc.l $0
+.globl _id_fet3
+.data
+_id_fet3:
+.dc.w $18
+.dc.w $10
+.dc.w $11
+.dc.w $0
+*line 95
+.dc.l _et_mcfn
+*line 95
+.dc.l _ef_mcfn
+*line 95
+.dc.l _rd_mcfn
+*line 95
+.dc.l _nd_mcfn
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.l $0
+.dc.l $0
+.dc.l $0
+.dc.l $0
+.globl _idmbox
+.data
+_idmbox:
+.dc.w $1
+.dc.w $1
+.dc.w $7F
+.dc.w $6F
+.dc.w $0
+*line 101
+.dc.l _imfnbox
+.dc.w $81
+.dc.w $1
+.dc.w $FF
+.dc.w $6F
+.dc.w $1
+*line 102
+.dc.l _imfnbox
+.dc.w $101
+.dc.w $1
+.dc.w $17F
+.dc.w $6F
+.dc.w $2
+*line 103
+.dc.l _imfnbox
+.dc.w $181
+.dc.w $1
+.dc.w $1FE
+.dc.w $6F
+.dc.w $3
+*line 104
+.dc.l _imfnbox
+.dc.w $1
+.dc.w $71
+.dc.w $7F
+.dc.w $DF
+.dc.w $4
+*line 106
+.dc.l _imfnbox
+.dc.w $81
+.dc.w $71
+.dc.w $FF
+.dc.w $DF
+.dc.w $5
+*line 107
+.dc.l _imfnbox
+.dc.w $101
+.dc.w $71
+.dc.w $17F
+.dc.w $DF
+.dc.w $6
+*line 108
+.dc.l _imfnbox
+.dc.w $181
+.dc.w $71
+.dc.w $1FE
+.dc.w $DF
+.dc.w $7
+*line 109
+.dc.l _imfnbox
+.dc.w $1
+.dc.w $E1
+.dc.w $7F
+.dc.w $14E
+.dc.w $8
+*line 111
+.dc.l _imfnbox
+.dc.w $81
+.dc.w $E1
+.dc.w $FF
+.dc.w $14E
+.dc.w $9
+*line 112
+.dc.l _imfnbox
+.dc.w $101
+.dc.w $E1
+.dc.w $17F
+.dc.w $14E
+.dc.w $A
+*line 113
+.dc.l _imfnbox
+.dc.w $181
+.dc.w $E1
+.dc.w $1FE
+.dc.w $14E
+.dc.w $B
+*line 114
+.dc.l _imfnbox
+.dc.w $1
+.dc.w $150
+.dc.w $1FE
+.dc.w $15D
+.dc.w $C
+*line 116
+.dc.l _imfnbox
+.globl _patctab
+.data
+_patctab:
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $C
+.dc.w $C
+.dc.w $C
+.dc.w $C
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $D
+.dc.w $8
+.dc.w $0
+.dc.w $0
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $4
+.globl _pat
+.data
+_pat:
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $80
+.dc.w $180
+.dc.w $80
+.dc.w $80
+.dc.w $80
+.dc.w $80
+.dc.w $80
+.dc.w $1C0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3C0
+.dc.w $420
+.dc.w $20
+.dc.w $20
+.dc.w $3C0
+.dc.w $400
+.dc.w $400
+.dc.w $7E0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3C0
+.dc.w $420
+.dc.w $20
+.dc.w $1C0
+.dc.w $20
+.dc.w $20
+.dc.w $420
+.dc.w $3C0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $40
+.dc.w $C0
+.dc.w $140
+.dc.w $240
+.dc.w $440
+.dc.w $7E0
+.dc.w $40
+.dc.w $40
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3C0
+.dc.w $200
+.dc.w $200
+.dc.w $3C0
+.dc.w $20
+.dc.w $20
+.dc.w $420
+.dc.w $3C0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3C0
+.dc.w $400
+.dc.w $400
+.dc.w $7C0
+.dc.w $420
+.dc.w $420
+.dc.w $420
+.dc.w $3C0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3C0
+.dc.w $7E0
+.dc.w $FF0
+.dc.w $1FF8
+.dc.w $1FF8
+.dc.w $3FFC
+.dc.w $3FFC
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $3FFC
+.dc.w $3FFC
+.dc.w $1FF8
+.dc.w $1FF8
+.dc.w $FF0
+.dc.w $7E0
+.dc.w $3C0
+.dc.w $0
+.dc.w $3800
+.dc.w $3F00
+.dc.w $3FC0
+.dc.w $3FF0
+.dc.w $3FF8
+.dc.w $3FFC
+.dc.w $3FFE
+.dc.w $3FFE
+.dc.w $3FFE
+.dc.w $3FFE
+.dc.w $3FFC
+.dc.w $3FF8
+.dc.w $3FF0
+.dc.w $3FC0
+.dc.w $3F00
+.dc.w $3800
+.dc.w $1C
+.dc.w $FC
+.dc.w $3FC
+.dc.w $FFC
+.dc.w $1FFC
+.dc.w $3FFC
+.dc.w $7FFC
+.dc.w $7FFC
+.dc.w $7FFC
+.dc.w $7FFC
+.dc.w $3FFC
+.dc.w $1FFC
+.dc.w $FFC
+.dc.w $3FC
+.dc.w $FC
+.dc.w $1C
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $80
+.dc.w $180
+.dc.w $80
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $1C0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3C0
+.dc.w $420
+.dc.w $20
+.dc.w $0
+.dc.w $3C0
+.dc.w $400
+.dc.w $0
+.dc.w $7E0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3C0
+.dc.w $420
+.dc.w $20
+.dc.w $1C0
+.dc.w $20
+.dc.w $0
+.dc.w $420
+.dc.w $3C0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7E0
+.dc.w $1FF8
+.dc.w $3FFC
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $3FFC
+.dc.w $1FF8
+.dc.w $7E0
+.dc.w $0
+.dc.w $0
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3C0
+.dc.w $420
+.dc.w $420
+.dc.w $420
+.dc.w $7E0
+.dc.w $420
+.dc.w $420
+.dc.w $420
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7C0
+.dc.w $220
+.dc.w $220
+.dc.w $3C0
+.dc.w $220
+.dc.w $220
+.dc.w $220
+.dc.w $7C0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7F
+.dc.w $FF
+.dc.w $1C0
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $380
+.dc.w $FF00
+.dc.w $FE00
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FE00
+.dc.w $FF00
+.dc.w $380
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $1C0
+.dc.w $FF
+.dc.w $7F
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $3
+.dc.w $7
+.dc.w $E
+.dc.w $1C
+.dc.w $38
+.dc.w $70
+.dc.w $E0
+.dc.w $1C0
+.dc.w $380
+.dc.w $700
+.dc.w $E00
+.dc.w $1C00
+.dc.w $3800
+.dc.w $7000
+.dc.w $E000
+.dc.w $C000
+.dc.w $C000
+.dc.w $E000
+.dc.w $7000
+.dc.w $3800
+.dc.w $1C00
+.dc.w $E00
+.dc.w $700
+.dc.w $380
+.dc.w $1C0
+.dc.w $E0
+.dc.w $70
+.dc.w $38
+.dc.w $1C
+.dc.w $E
+.dc.w $7
+.dc.w $3
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3C0
+.dc.w $7E0
+.dc.w $E70
+.dc.w $C30
+.dc.w $C30
+.dc.w $FF0
+.dc.w $FF0
+.dc.w $C30
+.dc.w $C30
+.dc.w $C30
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FE0
+.dc.w $FF0
+.dc.w $630
+.dc.w $630
+.dc.w $7E0
+.dc.w $7E0
+.dc.w $630
+.dc.w $630
+.dc.w $FF0
+.dc.w $FE0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $80
+.dc.w $180
+.dc.w $380
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $180
+.dc.w $3C0
+.dc.w $3C0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3C0
+.dc.w $7E0
+.dc.w $660
+.dc.w $60
+.dc.w $3E0
+.dc.w $7C0
+.dc.w $600
+.dc.w $600
+.dc.w $7E0
+.dc.w $7E0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3C0
+.dc.w $7E0
+.dc.w $660
+.dc.w $60
+.dc.w $1C0
+.dc.w $1C0
+.dc.w $60
+.dc.w $660
+.dc.w $7E0
+.dc.w $3C0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $60
+.dc.w $660
+.dc.w $660
+.dc.w $660
+.dc.w $7F0
+.dc.w $7F0
+.dc.w $60
+.dc.w $60
+.dc.w $60
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7C0
+.dc.w $7C0
+.dc.w $600
+.dc.w $600
+.dc.w $7C0
+.dc.w $7E0
+.dc.w $60
+.dc.w $60
+.dc.w $7E0
+.dc.w $3C0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3C0
+.dc.w $7C0
+.dc.w $600
+.dc.w $600
+.dc.w $7C0
+.dc.w $7E0
+.dc.w $660
+.dc.w $660
+.dc.w $7E0
+.dc.w $3C0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $7FFE
+.dc.w $0
+.globl _putpat
+.text
+_putpat:
+~~putpat:
+~pn=8
+~px=10
+~py=12
+~patc=14
+link R14,#0
+movem.l R2-R7,-(sp)
+~xp=R7
+~yp=R6
+~pr=R5
+~pc=R4
+~pw=R3
+*line 360
+*line 361
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L2
+*line 361
+clr (sp)
+jsr _vbank
+*line 362
+L2:
+*line 363
+clr R5
+bra L5
+L6:
+*line 364
+*line 365
+move 8(R14),R0
+sub #1,R0
+asl #5,R0
+ext.l R0
+move R5,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+add.l #_pat,R0
+move.l R0,R8
+move (R8),R3
+*line 366
+move R5,R6
+add 12(R14),R6
+add _TopEdge,R6
+sub #8,R6
+*line 367
+*line 368
+*line 369
+cmp _TopEdge,R6
+blt L7
+cmp _BotEdge,R6
+bgt L7
+*line 370
+*line 371
+clr R4
+bra L10
+L11:
+*line 372
+*line 373
+move R4,R7
+add 10(R14),R7
+add _LftEdge,R7
+sub #8,R7
+*line 374
+*line 375
+*line 376
+*line 377
+cmp _LftEdge,R7
+blt L12
+cmp _RgtEdge,R7
+bgt L12
+clr R0
+move R3,R0
+move #1,R1
+move #15,R2
+sub R4,R2
+asl R2,R1
+and R1,R0
+beq L12
+*line 378
+*line 379
+move 14(R14),(sp)
+move R6,-(sp)
+move R7,-(sp)
+move.l _idoct,-(sp)
+jsr _vputp
+addq.l #8,sp
+*line 380
+L12:L9:
+*line 371
+add #1,R4
+L10:
+*line 371
+cmp #16,R4
+blt L11
+L8:
+*line 381
+*line 382
+L7:L4:
+*line 363
+add #1,R5
+L5:
+*line 363
+cmp #16,R5
+blt L6
+L3:L1:tst.l (sp)+
+movem.l (sp)+,R3-R7
+unlk R14
+rts
+.globl _dispcfg
+.text
+_dispcfg:
+~~dispcfg:
+~nn=R7
+link R14,#-16
+movem.l R4-R7/R12-R13,-(sp)
+~i=R6
+~np=R5
+~idbuf=-16
+~cfgdat=R13
+~cfp=R12
+*line 402
+move 8(R14),R7
+*line 402
+*line 403
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L14
+*line 403
+clr (sp)
+jsr _vbank
+*line 404
+L14:
+*line 405
+move #14,(sp)
+move.l #L15,-(sp)
+move _wcmcol,-(sp)
+add #4,(sp)
+move _wcmrow,-(sp)
+move #11,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 407
+move R7,(sp)
+move.l #L16,-(sp)
+move.l R14,-(sp)
+add.l #-16,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 408
+move #14,(sp)
+move.l R14,-(sp)
+add.l #-16,(sp)
+move _wcmcol,-(sp)
+add #12,(sp)
+move _wcmrow,-(sp)
+move #11,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 410
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_cfgptr,R8
+move.l (R8),R13
+*line 412
+clr R6
+bra L19
+L20:
+*line 413
+*line 414
+move.l R13,R12
+add R6,R12
+move R6,R0
+asl #1,R0
+ext.l R0
+add.l R0,R12
+*line 415
+move.b (R12),R5
+ext.w R5
+*line 416
+*line 417
+*line 418
+tst R5
+beq L21
+*line 418
+move R5,R8
+sub #1,R8
+add.l R8,R8
+move.l #_patctab,R9
+move 0(R8,R9.l),(sp)
+move.b 2(R12),R0
+ext.w R0
+move R0,-(sp) 
+move.b 1(R12),R0
+ext.w R0
+move R0,-(sp) 
+move R5,-(sp)
+jsr _putpat
+addq.l #6,sp
+L21:L18:
+*line 412
+add #1,R6
+L19:
+*line 412
+cmp #64,R6
+blt L20
+L17:L13:tst.l (sp)+
+movem.l (sp)+,R5-R7/R12-R13
+unlk R14
+rts
+.globl _showcfg
+.text
+_showcfg:
+~~showcfg:
+~nn=8
+link R14,#-4
+*line 434
+move #1,_LftEdge
+*line 435
+move #238,_TopEdge
+*line 436
+move #131,_RgtEdge
+*line 437
+move #348,_BotEdge
+*line 438
+move #17,_wcmrow
+*line 439
+clr _wcmcol
+*line 441
+*line 442
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L23
+*line 442
+clr (sp)
+jsr _vbank
+*line 443
+L23:
+*line 444
+*line 445
+move #5,(sp)
+jsr _exp_c
+move R0,(sp)
+move _BotEdge,-(sp)
+move _RgtEdge,-(sp)
+move _TopEdge,-(sp)
+move _LftEdge,-(sp)
+move #128,-(sp)
+move.l _instob,-(sp)
+jsr _vbfill4
+adda.l #14,sp
+*line 447
+move 8(R14),(sp)
+jsr _dispcfg
+L22:unlk R14
+rts
+.globl _dispws
+.text
+_dispws:
+~~dispws:
+~ws=8
+link R14,#-64
+movem.l R4-R7/R13-R13,-(sp)
+~wsp=R13
+~i=R7
+~x=R6
+~y=R5
+~buf=-64
+*line 466
+*line 467
+cmp #20,8(R14)
+bge L24
+*line 468
+*line 469
+move 8(R14),R0
+muls #1080,R0
+move.l R0,R13
+add.l #_wslib,R13
+*line 473
+move 8(R14),(sp)
+add #1,(sp)
+move.l #L25,-(sp)
+move.l R14,-(sp)
+add.l #-64,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 474
+move #14,(sp)
+move.l R14,-(sp)
+add.l #-64,(sp)
+move _wcmcol,-(sp)
+add #2,(sp)
+move _wcmrow,-(sp)
+move #11,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 476
+move #1,R7
+bra L28
+L29:
+*line 477
+*line 478
+move R7,R6
+asr R6
+add _LftEdge,R6
+*line 479
+move _BotEdge,R5
+move R7,R8
+add.l R8,R8
+clr R0
+move 0(R13,R8.l),R0
+move #-32768,R1
+eor R1,R0
+swap R0
+clr R0
+swap R0
+divu #676,R0
+sub R0,R5
+*line 480
+*line 481
+move #4,(sp)
+move R5,-(sp)
+move R6,-(sp)
+jsr _idpoint
+addq.l #4,sp
+L27:
+*line 476
+add #1,R7
+L28:
+*line 476
+cmp #254,R7
+blt L29
+L26:L24:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.globl _wcmenu
+.text
+_wcmenu:
+~~wcmenu:
+~wc=8
+link R14,#-32
+movem.l R6-R7,-(sp)
+~i=R7
+~buf=-32
+*line 500
+move 8(R14),_wcflag
+*line 502
+*line 503
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L31
+*line 503
+clr (sp)
+jsr _vbank
+*line 504
+L31:
+*line 505
+move #5,(sp)
+jsr _exp_c
+move R0,(sp)
+move #349,-(sp)
+move #511,-(sp)
+clr -(sp)
+clr -(sp)
+move #128,-(sp)
+move.l _instob,-(sp)
+jsr _vbfill4
+adda.l #14,sp
+*line 507
+move.l #_idpoint,_point
+*line 509
+move #9,(sp)
+clr -(sp)
+move #511,-(sp)
+clr -(sp)
+clr -(sp)
+jsr _lseg
+addq.l #8,sp
+*line 510
+move #9,(sp)
+move #349,-(sp)
+move #511,-(sp)
+clr -(sp)
+move #511,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 511
+move #9,(sp)
+move #349,-(sp)
+clr -(sp)
+move #349,-(sp)
+move #511,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 512
+move #9,(sp)
+clr -(sp)
+clr -(sp)
+move #349,-(sp)
+clr -(sp)
+jsr _lseg
+addq.l #8,sp
+*line 514
+move #9,(sp)
+move #112,-(sp)
+move #511,-(sp)
+move #112,-(sp)
+clr -(sp)
+jsr _lseg
+addq.l #8,sp
+*line 515
+move #9,(sp)
+move #224,-(sp)
+move #511,-(sp)
+move #224,-(sp)
+clr -(sp)
+jsr _lseg
+addq.l #8,sp
+*line 516
+move #9,(sp)
+move #335,-(sp)
+move #511,-(sp)
+move #335,-(sp)
+clr -(sp)
+jsr _lseg
+addq.l #8,sp
+*line 518
+move #9,(sp)
+move #335,-(sp)
+move #128,-(sp)
+clr -(sp)
+move #128,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 519
+move #9,(sp)
+move #335,-(sp)
+move #256,-(sp)
+clr -(sp)
+move #256,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 520
+move #9,(sp)
+move #335,-(sp)
+move #384,-(sp)
+clr -(sp)
+move #384,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 522
+clr _ebflag
+*line 523
+move #81,(sp)
+clr -(sp)
+move.l #_ebuf,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 525
+move #335,_curslim
+*line 527
+move.l #_nokey,_x_key
+*line 528
+move.l #_idmbox,_csbp
+*line 532
+*line 532
+tst 8(R14)
+beq L32
+*line 533
+*line 534
+clr R7
+bra L35
+L36:
+*line 535
+*line 536
+move R7,R0
+ext.l R0
+divs #4,R0
+swap R0
+asl #7,R0
+add #1,R0
+move R0,_LftEdge
+*line 537
+move R7,R0
+ext.l R0
+divs #4,R0
+muls #112,R0
+add #111,R0
+move R0,_BotEdge
+*line 538
+move R7,R0
+ext.l R0
+divs #4,R0
+asl #3,R0
+move R0,_wcmrow
+*line 539
+move R7,R0
+ext.l R0
+divs #4,R0
+swap R0
+asl #4,R0
+move R0,_wcmcol
+*line 540
+*line 541
+move R7,(sp)
+move _wcpage,R0
+muls #12,R0
+add R0,(sp)
+jsr _dispws
+L34:
+*line 534
+add #1,R7
+L35:
+*line 534
+cmp #12,R7
+blt L36
+L33:
+*line 542
+*line 543
+*line 544
+*line 545
+*line 546
+*line 547
+*line 548
+move _curvce,R0
+muls #3938,R0
+move.l R0,R8
+move.l #_vbufs,R9
+move.b 72(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+add #1,(sp)
+move _curvce,R0
+muls #3938,R0
+move.l R0,R8
+move.l #_vbufs,R9
+move.b 73(R8,R9.l),R0
+ext.w R0
+move R0,-(sp) 
+add #1,(sp)
+move.l #L37,-(sp)
+move.l R14,-(sp)
+add.l #-32,(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 549
+*line 550
+move #14,(sp)
+move.l R14,-(sp)
+add.l #-32,(sp)
+move #1,-(sp)
+move #24,-(sp)
+move #11,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 551
+*line 552
+*line 553
+move #14,(sp)
+move.l #L38,-(sp)
+move #26,-(sp)
+move #24,-(sp)
+tst _wcpage
+beq L10000
+move #11,-(sp)
+bra L10002
+L10000:move #10,-(sp)
+L10002:move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 554
+*line 555
+*line 556
+move #14,(sp)
+move.l #L39,-(sp)
+move #28,-(sp)
+move #24,-(sp)
+tst _wcpage
+beq L10003
+move #10,-(sp)
+bra L10005
+L10003:move #11,-(sp)
+L10005:move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 557
+*line 558
+move.l #_id_fet2,_curfet
+*line 559
+move #12,(sp)
+move #24,-(sp)
+jsr _settc
+addq.l #2,sp
+*line 560
+*line 561
+bra L40
+L32:
+*line 562
+*line 563
+*line 564
+clr R7
+bra L43
+L44:
+*line 565
+*line 566
+move R7,R0
+ext.l R0
+divs #4,R0
+swap R0
+asl #7,R0
+add #1,R0
+move R0,_LftEdge
+*line 567
+move R7,R0
+ext.l R0
+divs #4,R0
+muls #112,R0
+add #1,R0
+move R0,_TopEdge
+*line 568
+move _LftEdge,R0
+add #128,R0
+move R0,_RgtEdge
+*line 569
+move _TopEdge,R0
+add #112,R0
+move R0,_BotEdge
+*line 570
+move R7,R0
+ext.l R0
+divs #4,R0
+asl #3,R0
+move R0,_wcmrow
+*line 571
+move R7,R0
+ext.l R0
+divs #4,R0
+swap R0
+asl #4,R0
+move R0,_wcmcol
+*line 572
+*line 573
+move R7,(sp)
+jsr _dispcfg
+L42:
+*line 564
+add #1,R7
+L43:
+*line 564
+cmp #12,R7
+blt L44
+L41:
+*line 574
+*line 575
+*line 576
+*line 577
+*line 578
+move #14,(sp)
+move.l #L45,-(sp)
+move #1,-(sp)
+move #24,-(sp)
+move #11,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 579
+*line 580
+move _curvce,R0
+muls #3938,R0
+move.l R0,R8
+move.l #_vbufs,R9
+move.b 70(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+move.l #L46,-(sp)
+move.l R14,-(sp)
+add.l #-32,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 581
+move #14,(sp)
+move.l R14,-(sp)
+add.l #-32,(sp)
+move #16,-(sp)
+move #24,-(sp)
+move #11,-(sp)
+move #64,-(sp)
+move.l _instob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 582
+*line 583
+move.l #_id_fet3,_curfet
+*line 584
+move #16,(sp)
+move #24,-(sp)
+jsr _settc
+addq.l #2,sp
+L40:L30:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _imfnbox
+.text
+_imfnbox:
+~~imfnbox:
+~n=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~row=R7
+~col=R6
+*line 602
+move _hitcy,R7
+ext.l R7
+divs #14,R7
+*line 603
+move _hitcx,R6
+asr #3,R6
+*line 605
+*line 605
+cmp #12,_hitbox
+bne L48
+*line 606
+*line 607
+*line 607
+tst _wcflag
+beq L49
+*line 608
+*line 609
+*line 609
+cmp #10,R6
+bge L50
+*line 610
+*line 611
+jsr _reshowi
+*line 612
+tst _wmcsel
+beq L10006
+move #61,(sp)
+bra L10008
+L10006:move #57,(sp)
+L10008:move #17,-(sp)
+jsr _settc
+addq.l #2,sp
+*line 613
+bra L51
+L50:
+*line 614
+*line 614
+cmp #19,R6
+blt L52
+cmp #22,R6
+bgt L52
+*line 615
+*line 616
+*line 617
+*line 618
+*line 619
+tst _wcpage
+beq L53
+*line 619
+clr _wcpage
+*line 620
+bra L54
+L53:
+*line 621
+move #1,_wcpage
+L54:
+*line 622
+*line 623
+move #1,(sp)
+jsr _wcmenu
+bra L47
+*line 624
+*line 625
+bra L55
+L52:
+*line 626
+*line 627
+*line 628
+clr _wmctag
+*line 629
+jsr _enterit
+*line 630
+*line 631
+*line 632
+tst _wmctag
+beq L56
+*line 632
+jsr _modinst
+*line 633
+L56:bra L47
+*line 634
+L55:L51:
+*line 635
+*line 636
+*line 637
+bra L57
+L49:
+*line 638
+*line 639
+*line 640
+*line 640
+cmp #14,R6
+bge L58
+*line 641
+*line 642
+jsr _reshowi
+*line 643
+move #12,(sp)
+move #17,-(sp)
+jsr _settc
+addq.l #2,sp
+*line 644
+bra L59
+L58:
+*line 645
+*line 646
+*line 647
+clr _wmctag
+*line 648
+jsr _enterit
+*line 649
+*line 650
+*line 651
+tst _wmctag
+beq L60
+*line 651
+jsr _modinst
+*line 652
+L60:bra L47
+*line 653
+L59:
+*line 654
+L57:
+*line 655
+*line 656
+L48:L47:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.data
+L15:.dc.b $43,$6F,$6E,$66,$69,$67,$20,$23,$0
+L16:.dc.b $25,$30,$32,$64,$0
+L25:.dc.b $57,$61,$76,$65,$73,$68,$61,$70,$65,$20,$23,$25,$30,$32,$64,$0
+L37:.dc.b $57,$61,$76,$65,$73,$68,$61,$70,$65,$20,$41,$25,$30,$32,$64,$20,$42,$25,$30,$32,$64,$20,$50,$61,$67,$65,$0
+L38:.dc.b $31,$0
+L39:.dc.b $32,$0
+L45:.dc.b $43,$6F,$6E,$66,$69,$67,$75,$72,$61,$74,$69,$6F,$6E,$20,$23,$0
+L46:.dc.b $25,$30,$32,$64,$0
Index: alcyon/smscrl.s
===================================================================
--- alcyon/smscrl.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/smscrl.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1441 @@
+.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 _stmptr
+.globl _defptr
+.globl _patches
+.globl _defents
+.globl _seqtab
+.globl _seqflag
+.globl _seqline
+.globl _seqstim
+.globl _seqtime
+.globl _sregval
+.globl _trstate
+.globl _cmtype
+.globl _ctcsw
+.globl _curslin
+.globl _cxrate
+.globl _cxval
+.globl _cyrate
+.globl _cyval
+.globl _ptecpos
+.globl _pteset
+.globl _sqdeflg
+.globl _stccol
+.globl _submenu
+.globl _vtccol
+.globl _vtcrow
+.globl _vtxval
+.globl _vtyval
+.globl _obj10
+.globl _cg3
+.globl _ptdebuf
+.globl _sqdebuf
+.globl _ptebuf
+.globl _patches
+.globl _seqbuf
+.globl _seqtab
+.globl _TheBuf
+.comm _TheBuf,66
+.globl _BakLine
+.comm _BakLine,4
+.globl _FwdLine
+.comm _FwdLine,4
+.globl _PdScDnF
+.comm _PdScDnF,2
+.globl _PdScUpF
+.comm _PdScUpF,2
+.globl _CurLine
+.comm _CurLine,2
+.globl _CurScan
+.comm _CurScan,2
+.globl _DupLine
+.comm _DupLine,2
+.globl _ScrlObj
+.comm _ScrlObj,2
+.globl _LinePtr
+.comm _LinePtr,4
+.globl _LineAtr
+.comm _LineAtr,2
+.globl _LineBuf
+.comm _LineBuf,4
+.globl _OldLine
+.comm _OldLine,4
+.globl _ScObAdr
+.comm _ScObAdr,4
+.globl _LineCon
+.data
+_LineCon:
+.dc.w $90
+.globl _LineLen
+.data
+_LineLen:
+.dc.w $30
+.globl _SmScLim
+.data
+_SmScLim:
+.dc.w $12
+.globl _SmScNsl
+.data
+_SmScNsl:
+.dc.w $10
+.globl _SmScTop
+.data
+_SmScTop:
+.dc.w $22
+.globl _LineFwd
+.text
+_LineFwd:
+~~LineFwd:
+link R14,#0
+movem.l R5-R7,-(sp)
+~j=R7
+~k=R6
+*line 101
+clr R7
+bra L4
+L5:
+*line 102
+move R7,R8
+add.l #_TheBuf,R8
+move.b #32,(R8)
+L3:
+*line 101
+add #1,R7
+L4:
+*line 101
+cmp #48,R7
+blt L5
+L2:
+*line 104
+move.b #176,_TheBuf
+*line 105
+clr.b 48+_TheBuf
+*line 107
+*line 108
+tst _ptecpos
+bne L6
+*line 108
+clr.l R0
+bra L1
+*line 109
+L6:
+*line 110
+*line 111
+move _ptecpos,(sp)
+jsr _findnxt
+move R0,R7
+tst R7
+bne L7
+*line 111
+clr.l R0
+bra L1
+*line 112
+L7:
+*line 113
+move R7,_ptecpos
+*line 115
+move #6,(sp)
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+move.l #4+_ptebuf,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 116
+move #1,_pteset
+*line 117
+jsr _pte2buf
+*line 119
+move _ptecpos,R6
+*line 121
+clr R7
+bra L10
+L11:
+*line 122
+*line 123
+move R6,(sp)
+jsr _findnxt
+move R0,R6
+tst R6
+bne L12
+*line 123
+move.l #_TheBuf,R0
+bra L1
+*line 124
+L12:L9:
+*line 121
+add #1,R7
+L10:
+*line 121
+cmp #8,R7
+blt L11
+L8:
+*line 125
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_patches,R9
+move 4(R8,R9.l),(sp)
+move.l #2+_TheBuf,-(sp)
+jsr _dspdfst
+addq.l #4,sp
+*line 126
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_patches,R9
+move 6(R8,R9.l),(sp)
+move.l #15+_TheBuf,-(sp)
+jsr _dspdfst
+addq.l #4,sp
+*line 127
+move R6,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,(sp)
+move.l #28+_TheBuf,-(sp)
+jsr _dspdest
+addq.l #4,sp
+*line 129
+clr R7
+bra L15
+L16:
+*line 130
+*line 131
+move R7,R8
+add.l #_TheBuf,R8
+tst.b (R8)
+bne L17
+*line 131
+move R7,R8
+add.l #_TheBuf,R8
+move.b #32,(R8)
+*line 132
+L17:L14:
+*line 129
+add #1,R7
+L15:
+*line 129
+cmp #50,R7
+blt L16
+L13:
+*line 133
+clr.b 48+_TheBuf
+*line 134
+move.l #_TheBuf,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _LineBak
+.text
+_LineBak:
+~~LineBak:
+link R14,#0
+movem.l R5-R7,-(sp)
+~j=R7
+~k=R6
+*line 151
+clr R7
+bra L21
+L22:
+*line 152
+move R7,R8
+add.l #_TheBuf,R8
+move.b #32,(R8)
+L20:
+*line 151
+add #1,R7
+L21:
+*line 151
+cmp #48,R7
+blt L22
+L19:
+*line 154
+move.b #176,_TheBuf
+*line 155
+clr.b 48+_TheBuf
+*line 157
+*line 158
+tst _ptecpos
+bne L23
+*line 158
+clr.l R0
+bra L18
+*line 159
+L23:
+*line 160
+*line 161
+move _ptecpos,(sp)
+jsr _findprv
+move R0,R7
+tst R7
+bne L24
+*line 161
+clr.l R0
+bra L18
+*line 162
+L24:
+*line 163
+move R7,_ptecpos
+*line 165
+move #6,(sp)
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+move.l #4+_ptebuf,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 166
+move #1,_pteset
+*line 167
+jsr _pte2buf
+*line 169
+move _ptecpos,R6
+*line 171
+clr R7
+bra L27
+L28:
+*line 172
+*line 173
+move R6,(sp)
+jsr _findprv
+move R0,R6
+tst R6
+bne L29
+*line 173
+move.l #_TheBuf,R0
+bra L18
+*line 174
+L29:L26:
+*line 171
+add #1,R7
+L27:
+*line 171
+cmp #7,R7
+blt L28
+L25:
+*line 175
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_patches,R9
+move 4(R8,R9.l),(sp)
+move.l #2+_TheBuf,-(sp)
+jsr _dspdfst
+addq.l #4,sp
+*line 176
+move R6,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_patches,R9
+move 6(R8,R9.l),(sp)
+move.l #15+_TheBuf,-(sp)
+jsr _dspdfst
+addq.l #4,sp
+*line 177
+move R6,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,(sp)
+move.l #28+_TheBuf,-(sp)
+jsr _dspdest
+addq.l #4,sp
+*line 179
+clr R7
+bra L32
+L33:
+*line 180
+*line 181
+move R7,R8
+add.l #_TheBuf,R8
+tst.b (R8)
+bne L34
+*line 181
+move R7,R8
+add.l #_TheBuf,R8
+move.b #32,(R8)
+*line 182
+L34:L31:
+*line 179
+add #1,R7
+L32:
+*line 179
+cmp #50,R7
+blt L33
+L30:
+*line 183
+clr.b 48+_TheBuf
+*line 184
+move.l #_TheBuf,R0
+bra L18
+L18:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _WrVideo
+.text
+_WrVideo:
+~~WrVideo:
+~row=R7
+~col=R6
+~str=R13
+~atr=R5
+link R14,#0
+movem.l R3-R7/R13-R13,-(sp)
+~chr=R4
+*line 203
+move 8(R14),R7
+*line 203
+move 10(R14),R6
+*line 203
+move.l 12(R14),R13
+*line 203
+move 16(R14),R5
+*line 203
+*line 204
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L36
+*line 204
+clr (sp)
+jsr _vbank
+*line 205
+L36:
+*line 206
+bra L39
+L38:
+*line 207
+*line 208
+*line 209
+move _LineLen,(sp)
+tst R6
+bne L10000
+move #226,-(sp)
+bra L10002
+L10000:move R5,-(sp)
+L10002:move.b R4,R0
+ext.w R0
+move R0,-(sp) 
+move R6,-(sp)
+move R7,-(sp)
+move.l _ScObAdr,-(sp)
+jsr _vputcv
+adda.l #12,sp
+*line 210
+*line 211
+add #1,R6
+L39:
+*line 212
+move.b (R13)+,R4
+bne L38
+L37:L35:tst.l (sp)+
+movem.l (sp)+,R4-R7/R13-R13
+unlk R14
+rts
+.globl _SetDTop
+.text
+_SetDTop:
+~~SetDTop:
+~row=8
+~scan=10
+link R14,#-4
+*line 227
+*line 228
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L41
+*line 228
+clr (sp)
+jsr _vbank
+*line 229
+L41:
+*line 230
+move 8(R14),R0
+muls _LineCon,R0
+ext.l R0
+add.l _ScObAdr,R0
+move.l R0,_LineBuf
+*line 232
+*line 233
+move.l _OldLine,R0
+cmp.l _LineBuf,R0
+beq L42
+*line 233
+move.l _LineBuf,R0
+asr.l #1,R0
+move _ScrlObj,R1
+asl #3,R1
+ext.l R1
+add.l #_v_odtab,R1
+move.l R1,R9
+move R0,4(R9)
+*line 234
+L42:
+*line 235
+move.l _LineBuf,_OldLine
+*line 237
+move _ScrlObj,R0
+asl #3,R0
+ext.l R0
+move.l R0,R8
+move.l #_v_odtab,R9
+clr R0
+move 0(R8,R9.l),R0
+and #4095,R0
+move 10(R14),R1
+move #12,R2
+asl R2,R1
+or R1,R0
+move _ScrlObj,R1
+asl #3,R1
+ext.l R1
+add.l #_v_odtab,R1
+move.l R1,R9
+move R0,(R9)
+L40:unlk R14
+rts
+.globl _UpdVid
+.text
+_UpdVid:
+~~UpdVid:
+~row=8
+~col=10
+~str=12
+~atr=16
+link R14,#-4
+*line 254
+move 16(R14),(sp)
+move.l 12(R14),-(sp)
+move 10(R14),-(sp)
+move _CurLine,-(sp)
+move 8(R14),R0
+add R0,(sp)
+jsr _WrVideo
+addq.l #8,sp
+*line 256
+move _CurLine,R0
+add _SmScNsl,R0
+add 8(R14),R0
+add #2,R0
+move R0,_DupLine
+*line 258
+*line 259
+move _DupLine,R0
+cmp _SmScTop,R0
+bge L44
+*line 259
+move #18,(sp)
+move.l 12(R14),-(sp)
+move 10(R14),-(sp)
+move _DupLine,-(sp)
+jsr _WrVideo
+addq.l #8,sp
+*line 260
+L44:
+*line 261
+move _CurLine,R0
+sub _SmScNsl,R0
+add 8(R14),R0
+sub #2,R0
+move R0,_DupLine
+*line 263
+*line 264
+tst _DupLine
+blt L45
+*line 264
+move #18,(sp)
+move.l 12(R14),-(sp)
+move 10(R14),-(sp)
+move _DupLine,-(sp)
+jsr _WrVideo
+addq.l #8,sp
+L45:L43:unlk R14
+rts
+.globl _bgncm
+.text
+_bgncm:
+~~bgncm:
+link R14,#0
+movem.l R6-R7,-(sp)
+~j=R7
+*line 280
+move #6,(sp)
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+move.l #4+_ptebuf,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 281
+move #1,_pteset
+*line 282
+jsr _pte2buf
+*line 284
+move #48,(sp)
+move.l #_ptdebuf,-(sp)
+move.l #_TheBuf,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 286
+clr R7
+bra L49
+L50:
+*line 287
+*line 288
+move R7,R8
+add.l #_TheBuf,R8
+tst.b (R8)
+bne L51
+*line 288
+move R7,R8
+add.l #_TheBuf,R8
+move.b #32,(R8)
+*line 289
+L51:L48:
+*line 286
+add #1,R7
+L49:
+*line 286
+cmp #50,R7
+blt L50
+L47:
+*line 290
+move.b #176,_TheBuf
+*line 291
+move.b #32,1+_TheBuf
+*line 292
+clr.b 48+_TheBuf
+*line 294
+move #18,(sp)
+move.l #_TheBuf,-(sp)
+clr -(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 295
+jsr _ctcoff
+L46:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _stopcm
+.text
+_stopcm:
+~~stopcm:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 311
+*line 312
+tst _PdScDnF
+beq L53
+*line 312
+move #13,R0
+move R0,_CurScan
+move R0,(sp)
+move _CurLine,-(sp)
+jsr _SetDTop
+addq.l #2,sp
+bra L54
+L53:
+*line 313
+*line 314
+tst _PdScUpF
+beq L55
+*line 314
+move #13,R0
+move R0,_CurScan
+move R0,(sp)
+add #1,_CurLine
+move _CurLine,-(sp)
+jsr _SetDTop
+addq.l #2,sp
+*line 315
+L55:L54:
+*line 316
+*line 316
+tst _ctcsw
+bne L56
+*line 317
+*line 318
+*line 318
+tst _ptecpos
+beq L57
+*line 319
+*line 320
+*line 321
+*line 322
+move #6,(sp)
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+move.l #4+_ptebuf,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 323
+move #1,_pteset
+*line 324
+jsr _pte2buf
+*line 325
+jsr _setptcv
+*line 326
+bra L58
+L57:
+*line 327
+*line 328
+*line 329
+jsr _voidpb
+L58:
+*line 330
+*line 331
+*line 332
+L56:
+*line 333
+jsr _ctcon
+*line 335
+clr _PdScDnF
+*line 336
+clr _PdScUpF
+L52:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _stopsm
+.text
+_stopsm:
+~~stopsm:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 352
+*line 353
+tst _PdScDnF
+beq L60
+*line 353
+move #13,R0
+move R0,_CurScan
+move R0,(sp)
+move _CurLine,-(sp)
+jsr _SetDTop
+addq.l #2,sp
+bra L61
+L60:
+*line 354
+*line 355
+tst _PdScUpF
+beq L62
+*line 355
+move #13,R0
+move R0,_CurScan
+move R0,(sp)
+add #1,_CurLine
+move _CurLine,-(sp)
+jsr _SetDTop
+addq.l #2,sp
+*line 356
+L62:L61:
+*line 357
+move #7,(sp)
+move _curslin,R0
+muls #14,R0
+add.l #_seqtab,R0
+move.l R0,-(sp)
+move.l #_seqbuf,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 358
+move _curslin,(sp)
+move.l #_sqdebuf,-(sp)
+jsr _dsqlin
+addq.l #4,sp
+*line 359
+move #1,_sqdeflg
+*line 360
+jsr _ctcon
+*line 362
+clr _PdScDnF
+*line 363
+clr _PdScUpF
+L59:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _smscrl
+.text
+_smscrl:
+~~smscrl:
+link R14,#-4
+*line 377
+*line 377
+tst _PdScUpF
+beq L64
+*line 378
+*line 379
+*line 379
+cmp #13,_CurScan
+bne L65
+*line 380
+*line 381
+*line 381
+move.l _FwdLine,R8
+jsr (R8)
+move.l R0,_LinePtr
+beq L66
+*line 382
+*line 383
+*line 383
+move _CurLine,R0
+cmp _SmScLim,R0
+bne L67
+*line 384
+*line 385
+*line 386
+*line 387
+move _LineAtr,(sp)
+move.l _LinePtr,-(sp)
+clr -(sp)
+move _SmScNsl,-(sp)
+jsr _WrVideo
+addq.l #8,sp
+*line 388
+*line 389
+*line 390
+*line 391
+move #13,R0
+move R0,_CurScan
+move R0,(sp)
+clr R0
+move R0,_CurLine
+move R0,-(sp)
+jsr _SetDTop
+addq.l #2,sp
+*line 392
+bra L68
+L67:
+*line 393
+*line 394
+*line 395
+*line 396
+*line 397
+move _LineAtr,(sp)
+move.l _LinePtr,-(sp)
+clr -(sp)
+move _CurLine,-(sp)
+move _SmScNsl,R0
+add R0,(sp)
+jsr _WrVideo
+addq.l #8,sp
+*line 398
+*line 399
+*line 400
+*line 401
+move _CurLine,R0
+sub #2,R0
+move R0,_DupLine
+*line 402
+*line 403
+*line 404
+tst _DupLine
+blt L69
+*line 404
+move _LineAtr,(sp)
+move.l _LinePtr,-(sp)
+clr -(sp)
+move _DupLine,-(sp)
+jsr _WrVideo
+addq.l #8,sp
+L69:L68:
+*line 405
+*line 406
+*line 407
+*line 408
+*line 409
+sub #1,_CurScan
+move _CurScan,(sp)
+move _CurLine,-(sp)
+jsr _SetDTop
+addq.l #2,sp
+*line 410
+*line 411
+L66:bra L70
+L65:
+*line 412
+*line 413
+*line 414
+*line 415
+tst _CurScan
+bne L71
+*line 415
+move #13,R0
+move R0,_CurScan
+move R0,(sp)
+add #1,_CurLine
+move _CurLine,-(sp)
+jsr _SetDTop
+addq.l #2,sp
+*line 416
+bra L72
+L71:
+*line 417
+sub #1,_CurScan
+move _CurScan,(sp)
+move _CurLine,-(sp)
+jsr _SetDTop
+addq.l #2,sp
+L72:L70:
+*line 418
+*line 419
+*line 420
+bra L73
+L64:
+*line 421
+*line 421
+tst _PdScDnF
+beq L74
+*line 422
+*line 423
+*line 423
+cmp #13,_CurScan
+bne L75
+*line 424
+*line 425
+*line 425
+move.l _BakLine,R8
+jsr (R8)
+move.l R0,_LinePtr
+beq L76
+*line 426
+*line 427
+*line 427
+tst _CurLine
+bne L77
+*line 428
+*line 429
+*line 430
+*line 431
+move _LineAtr,(sp)
+move.l _LinePtr,-(sp)
+clr -(sp)
+move _SmScLim,-(sp)
+sub #1,(sp)
+jsr _WrVideo
+addq.l #8,sp
+*line 432
+*line 433
+*line 434
+*line 435
+clr R0
+move R0,_CurScan
+move R0,(sp)
+move _SmScLim,R0
+sub #1,R0
+move R0,_CurLine
+move R0,-(sp)
+jsr _SetDTop
+addq.l #2,sp
+*line 436
+bra L78
+L77:
+*line 437
+*line 438
+*line 439
+*line 440
+*line 441
+move _LineAtr,(sp)
+move.l _LinePtr,-(sp)
+clr -(sp)
+move _CurLine,-(sp)
+sub #1,(sp)
+jsr _WrVideo
+addq.l #8,sp
+*line 442
+*line 443
+*line 444
+*line 445
+move _CurLine,R0
+add _SmScNsl,R0
+add #1,R0
+move R0,_DupLine
+*line 446
+*line 447
+*line 448
+move _DupLine,R0
+cmp _SmScTop,R0
+bge L79
+*line 448
+move _LineAtr,(sp)
+move.l _LinePtr,-(sp)
+clr -(sp)
+move _DupLine,-(sp)
+jsr _WrVideo
+addq.l #8,sp
+*line 449
+*line 450
+*line 451
+L79:
+*line 452
+clr R0
+move R0,_CurScan
+move R0,(sp)
+sub #1,_CurLine
+move _CurLine,-(sp)
+jsr _SetDTop
+addq.l #2,sp
+L78:
+*line 453
+*line 454
+*line 455
+L76:bra L80
+L75:
+*line 456
+*line 457
+*line 458
+*line 459
+cmp #13,_CurScan
+beq L81
+*line 459
+add #1,_CurScan
+move _CurScan,(sp)
+move _CurLine,-(sp)
+jsr _SetDTop
+addq.l #2,sp
+L81:L80:
+*line 460
+*line 461
+L74:L73:L63:unlk R14
+rts
+.globl _smxupd
+.text
+_smxupd:
+~~smxupd:
+link R14,#-6
+~oldcx=-2
+*line 477
+move _cxval,-2(R14)
+*line 479
+*line 479
+tst _submenu
+beq L83
+*line 480
+*line 481
+move _cxrate,R0
+add R0,_vtxval
+move _vtxval,R0
+asr #3,R0
+move R0,_vtccol
+*line 482
+*line 483
+*line 484
+cmp #60,_vtccol
+ble L84
+*line 484
+move #60,R0
+move R0,_vtccol
+asl #3,R0
+move R0,_vtxval
+bra L85
+L84:
+*line 485
+*line 486
+cmp #2,_vtccol
+bge L86
+*line 486
+move #2,R0
+move R0,_vtccol
+asl #3,R0
+move R0,_vtxval
+*line 487
+L86:L85:bra L87
+L83:
+*line 488
+*line 489
+*line 490
+move _cxrate,R0
+add R0,_cxval
+*line 491
+*line 492
+*line 493
+cmp #384,_cxval
+ble L88
+*line 493
+move #384,_cxval
+bra L89
+L88:
+*line 494
+*line 495
+cmp #16,_cxval
+bge L90
+*line 495
+move #16,_cxval
+*line 496
+L90:L89:
+*line 497
+*line 498
+move _cxval,R0
+cmp -2(R14),R0
+beq L82
+*line 499
+*line 500
+*line 500
+move _cxval,R0
+asr #3,R0
+cmp #47,R0
+bne L91
+*line 501
+*line 502
+*line 503
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L92
+*line 503
+clr (sp)
+jsr _vbank
+*line 504
+L92:
+*line 505
+*line 506
+move.l #_cg3,(sp)
+move #14,-(sp)
+move #14,-(sp)
+move.l #L93,-(sp)
+clr -(sp)
+move #7,-(sp)
+move #2,-(sp)
+move #14,-(sp)
+move #16,-(sp)
+move.l _obj10,-(sp)
+jsr _vvputsv
+adda.l #22,sp
+*line 507
+*line 508
+*line 509
+move.l #_cg3,(sp)
+move #14,-(sp)
+move #14,-(sp)
+move.l #L94,-(sp)
+clr -(sp)
+move #7,-(sp)
+move #6,-(sp)
+move #16,-(sp)
+move.l _obj10,-(sp)
+jsr _vsplot4
+adda.l #20,sp
+*line 510
+bra L95
+L91:
+*line 511
+*line 511
+move _cxval,R0
+asr #3,R0
+cmp #48,R0
+bne L96
+*line 512
+*line 513
+*line 514
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L97
+*line 514
+clr (sp)
+jsr _vbank
+*line 515
+L97:
+*line 516
+*line 517
+move.l #_cg3,(sp)
+move #14,-(sp)
+move #14,-(sp)
+move.l #L98,-(sp)
+clr -(sp)
+move #7,-(sp)
+move #2,-(sp)
+move #14,-(sp)
+move #16,-(sp)
+move.l _obj10,-(sp)
+jsr _vvputsv
+adda.l #22,sp
+*line 518
+*line 519
+*line 520
+move.l #_cg3,(sp)
+move #14,-(sp)
+move #14,-(sp)
+move.l #L99,-(sp)
+clr -(sp)
+move #7,-(sp)
+move #6,-(sp)
+move #16,-(sp)
+move.l _obj10,-(sp)
+jsr _vsplot4
+adda.l #20,sp
+*line 521
+*line 522
+*line 523
+L96:L95:bra L82
+*line 524
+L87:L82:unlk R14
+rts
+.globl _smy_up
+.text
+_smy_up:
+~~smy_up:
+~tag=8
+link R14,#-4
+*line 541
+*line 541
+tst _ptecpos
+bne L101
+*line 542
+*line 543
+jsr _dptw
+bra L100
+*line 544
+*line 545
+*line 546
+L101:
+*line 547
+*line 548
+tst _ctcsw
+beq L102
+*line 548
+jsr _bgncm
+*line 549
+L102:
+*line 550
+*line 550
+tst 8(R14)
+bge L103
+*line 551
+*line 552
+*line 553
+move _ptecpos,(sp)
+jsr _findnxt
+tst R0
+beq L100
+*line 554
+*line 555
+move #1,_PdScUpF
+*line 556
+clr _PdScDnF
+*line 557
+jsr _smscrl
+*line 558
+bra L104
+L103:
+*line 559
+*line 559
+tst 8(R14)
+ble L105
+*line 560
+*line 561
+*line 562
+move _ptecpos,(sp)
+jsr _findprv
+tst R0
+beq L100
+*line 563
+*line 564
+move #1,_PdScDnF
+*line 565
+clr _PdScUpF
+*line 566
+jsr _smscrl
+*line 567
+L105:L104:L100:unlk R14
+rts
+.globl _smyupd
+.text
+_smyupd:
+~~smyupd:
+link R14,#-4
+*line 581
+*line 581
+tst _submenu
+beq L107
+*line 582
+*line 583
+move _cyrate,R0
+add R0,_vtyval
+move _vtyval,R0
+ext.l R0
+divs #14,R0
+move R0,_vtcrow
+*line 584
+*line 585
+*line 586
+cmp #23,_vtcrow
+ble L108
+*line 586
+move #23,R0
+move R0,_vtcrow
+muls #14,R0
+move R0,_vtyval
+bra L109
+L108:
+*line 587
+*line 588
+cmp #19,_vtcrow
+bge L110
+*line 588
+move #19,R0
+move R0,_vtcrow
+muls #14,R0
+move R0,_vtyval
+*line 589
+L110:L109:
+*line 590
+*line 591
+*line 594
+L107:L106:unlk R14
+rts
+.globl _sqy_up
+.text
+_sqy_up:
+~~sqy_up:
+~tag=8
+link R14,#-4
+*line 609
+*line 610
+tst _ctcsw
+beq L112
+*line 610
+jsr _ctcoff
+*line 611
+L112:
+*line 612
+*line 612
+tst 8(R14)
+bge L113
+*line 613
+*line 614
+move #1,_PdScUpF
+*line 615
+clr _PdScDnF
+*line 616
+jsr _smscrl
+*line 617
+bra L114
+L113:
+*line 618
+*line 618
+tst 8(R14)
+ble L115
+*line 619
+*line 620
+move #1,_PdScDnF
+*line 621
+clr _PdScUpF
+*line 622
+jsr _smscrl
+*line 623
+L115:L114:L111:unlk R14
+rts
+.globl _sqyupd
+.text
+_sqyupd:
+~~sqyupd:
+link R14,#-4
+*line 637
+*line 637
+tst _submenu
+beq L117
+*line 638
+*line 639
+move _cyrate,R0
+add R0,_vtyval
+move _vtyval,R0
+ext.l R0
+divs #14,R0
+move R0,_vtcrow
+*line 640
+*line 641
+*line 642
+cmp #23,_vtcrow
+ble L118
+*line 642
+move #23,R0
+move R0,_vtcrow
+muls #14,R0
+move R0,_vtyval
+bra L119
+L118:
+*line 643
+*line 644
+cmp #19,_vtcrow
+bge L120
+*line 644
+move #19,R0
+move R0,_vtcrow
+muls #14,R0
+move R0,_vtyval
+*line 645
+L120:L119:
+*line 646
+*line 647
+*line 650
+L117:L116:unlk R14
+rts
+.data
+L93:.dc.b $B0,$0
+L94:.dc.b $BC,$0
+L98:.dc.b $B0,$0
+L99:.dc.b $BF,$0
Index: alcyon/sprintf.s
===================================================================
--- alcyon/sprintf.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/sprintf.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,51 @@
+.bss
+L1:.ds.b 4
+.text
+.globl _sprintf
+.text
+_sprintf:
+~~sprintf:
+~str=8
+~fmt=12
+~va_alist=16
+link R14,#-4
+movem.l R6-R7,-(sp)
+~count=R7
+~aptr=-4
+*line 30
+lea 16(R14),R8
+move.l R8,-4(R14)
+*line 31
+move.l 8(R14),L1
+*line 32
+move.l -4(R14),(sp)
+move.l 12(R14),-(sp)
+move.l #_spsub,-(sp)
+jsr _dofmt_
+addq.l #8,sp
+move.l R0,R7
+*line 33
+move.l L1,R8
+clr.b (R8)
+*line 34
+move.l R7,R0
+bra L2
+L2:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.text
+_spsub:
+~~spsub:
+~c=8
+link R14,#-4
+*line 47
+move.l L1,R8
+move 8(R14),R0
+move.b R0,(R8)
+and #255,R0
+add.l #1,L1
+bra L4
+L4:unlk R14
+rts
+.data
Index: alcyon/sqdisp.s
===================================================================
--- alcyon/sqdisp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/sqdisp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1562 @@
+.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 _stmptr
+.globl _defptr
+.globl _patches
+.globl _defents
+.globl _seqtab
+.globl _seqflag
+.globl _seqline
+.globl _seqstim
+.globl _seqtime
+.globl _sregval
+.globl _trstate
+.globl _BakLine
+.globl _FwdLine
+.globl _obj8
+.globl _obj9
+.globl _obj10
+.globl _obj11
+.globl _LineBuf
+.globl _ScObAdr
+.globl _OldLine
+.globl _LineAtr
+.globl _CurLine
+.globl _CurScan
+.globl _ScrlObj
+.globl _SmScNsl
+.globl _PdScDnF
+.globl _PdScUpF
+.globl _ctcsw
+.globl _submenu
+.globl _stccol
+.globl _stcrow
+.globl _cxval
+.globl _cg3
+.globl _TheBuf
+.globl _curslin
+.comm _curslin,2
+.globl _sqhead
+.data
+_sqhead:
+.dc.b $B0,$20,$4C,$69,$6E,$20,$54,$69,$6D,$65,$20,$20,$41,$63,$74,$69,$6F,$6E,$20,$31,$20,$20,$20,$20,$41,$63,$74,$69,$6F,$6E
+.dc.b $20,$32,$20,$20,$20,$20,$41,$63,$74,$69,$6F,$6E,$20,$33,$20,$20,$20,$20,$B0,$20,$4E,$6F,$20,$53,$65,$71,$20,$52,$67,$20
+.dc.b $54,$20,$B0,$0
+.globl _sqmcon
+.data
+_sqmcon:
+*line 55
+.dc.l L2
+*line 56
+.dc.l L3
+*line 57
+.dc.l L4
+*line 58
+.dc.l L5
+*line 60
+.dc.l L6
+.globl _seqpal
+.data
+_seqpal:
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $2
+.dc.w $3
+.dc.w $3
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $2
+.dc.w $0
+.dc.w $2
+.dc.w $0
+.dc.w $0
+.dc.w $3
+.dc.w $3
+.dc.w $0
+.dc.w $0
+.dc.w $3
+.dc.w $3
+.dc.w $0
+.dc.w $1
+.dc.w $2
+.dc.w $0
+.dc.w $0
+.dc.w $3
+.dc.w $3
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $0
+.dc.w $3
+.dc.w $0
+.dc.w $3
+.dc.w $1
+.dc.w $2
+.dc.w $0
+.dc.w $2
+.dc.w $3
+.dc.w $2
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $1
+.dc.w $2
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.globl _sqatype
+.data
+_sqatype:
+.dc.w $0
+.dc.w $3
+.dc.w $1
+.dc.w $2
+.dc.w $4
+.dc.w $5
+.dc.w $6
+.dc.w $7
+.dc.w $8
+.dc.w $F
+.dc.w $E
+.dc.w $0
+.dc.w $D
+.dc.w $9
+.dc.w $10
+.dc.w $A
+.dc.w $B
+.dc.w $C
+.globl _sqdsptb
+.data
+_sqdsptb:
+*line 112
+.dc.l L7
+*line 113
+.dc.l L8
+*line 114
+.dc.l L9
+*line 115
+.dc.l L10
+*line 116
+.dc.l L11
+*line 117
+.dc.l L12
+*line 118
+.dc.l L13
+*line 119
+.dc.l L14
+*line 120
+.dc.l L15
+*line 121
+.dc.l L16
+*line 122
+.dc.l L17
+*line 123
+.dc.l L18
+*line 124
+.dc.l L19
+*line 125
+.dc.l L20
+*line 126
+.dc.l L21
+*line 127
+.dc.l L22
+*line 129
+.dc.l L23
+.globl _initsq
+.text
+_initsq:
+~~initsq:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 144
+clr R7
+bra L27
+L28:
+*line 145
+*line 146
+move R7,R8
+add.l R8,R8
+add.l #_seqflag,R8
+clr (R8)
+*line 147
+move R7,R8
+add.l R8,R8
+add.l #_seqline,R8
+clr (R8)
+*line 148
+move R7,R8
+add.l R8,R8
+add.l #_sregval,R8
+clr (R8)
+*line 149
+move R7,R8
+add.l R8,R8
+add.l #_trstate,R8
+clr (R8)
+*line 150
+move R7,R8
+add.l R8,R8
+add.l #_seqstim,R8
+clr (R8)
+*line 151
+move R7,R8
+add.l R8,R8
+add.l #_seqtime,R8
+clr (R8)
+L26:
+*line 144
+add #1,R7
+L27:
+*line 144
+cmp #16,R7
+blt L28
+L25:
+*line 154
+move #7000,(sp)
+clr -(sp)
+move.l #_seqtab,-(sp)
+jsr _memsetw
+addq.l #6,sp
+L24:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _dsact
+.text
+_dsact:
+~~dsact:
+~buf=8
+~act=12
+~dat=14
+link R14,#-28
+~sqa=-2
+~sqd=-4
+~sqf=-6
+~sqr=-8
+~sqt=-10
+~t1=-12
+~t2=-14
+~val=-16
+~chan=-18
+~i=-20
+~key=-22
+~port=-24
+*line 173
+clr R0
+move 12(R14),R0
+and #255,R0
+move R0,-2(R14)
+*line 175
+clr R0
+move -2(R14),R0
+lsl #2,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R8
+move.l #_sqdsptb,R9
+move.l 0(R8,R9.l),(sp)
+move.l 8(R14),-(sp)
+jsr _strcpy
+addq.l #4,sp
+*line 177
+clr R0
+move -2(R14),R0
+bra L31
+*line 178
+L32:
+*line 179
+L33:
+*line 180
+L34:
+*line 181
+L35:
+*line 182
+*line 183
+*line 184
+clr R0
+move 14(R14),R0
+move #11,R1
+lsr R1,R0
+and #3,R0
+move R0,-24(R14)
+*line 185
+clr R0
+move 14(R14),R0
+lsr #7,R0
+and #15,R0
+move R0,-18(R14)
+*line 186
+clr R0
+move 14(R14),R0
+and #127,R0
+move R0,-22(R14)
+*line 187
+*line 188
+*line 189
+cmp #2,-24(R14)
+bne L36
+*line 189
+move -22(R14),(sp)
+add #1,(sp)
+move.l #L37,-(sp)
+move.l 8(R14),-(sp)
+add.l #3,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 190
+bra L38
+L36:
+*line 191
+move -18(R14),(sp)
+add #1,(sp)
+move -24(R14),-(sp)
+add #1,(sp)
+move -22(R14),-(sp)
+add #1,(sp)
+move.l #L39,-(sp)
+move.l 8(R14),-(sp)
+add.l #3,(sp)
+jsr _sprintf
+adda.l #12,sp
+L38:
+*line 192
+bra L30
+*line 193
+*line 194
+L40:
+*line 195
+L41:
+*line 196
+L42:
+*line 197
+L43:
+*line 198
+*line 199
+*line 200
+move 14(R14),(sp)
+add #1,(sp)
+move.l #L44,-(sp)
+move.l 8(R14),-(sp)
+add.l #9,(sp)
+jsr _sprintf
+addq.l #8,sp
+bra L30
+*line 201
+*line 202
+*line 203
+L45:
+*line 204
+*line 205
+*line 206
+clr R0
+move 14(R14),R0
+and #-4096,R0
+beq L10000
+move #45,R0
+bra L10002
+L10000:move #43,R0
+L10002:move R0,-6(R14)
+bra L46
+*line 207
+*line 208
+L47:
+*line 209
+L48:
+*line 210
+*line 211
+*line 212
+move #61,-6(R14)
+bra L46
+*line 213
+*line 214
+L49:
+*line 215
+*line 216
+*line 217
+move #60,-6(R14)
+bra L46
+*line 218
+*line 219
+L50:
+*line 220
+*line 221
+*line 222
+move #62,-6(R14)
+*line 223
+L46:
+*line 224
+*line 225
+*line 226
+clr R0
+move 12(R14),R0
+and #-256,R0
+lsr #8,R0
+add #1,R0
+move R0,-8(R14)
+*line 227
+clr R0
+move 14(R14),R0
+and #255,R0
+move R0,-4(R14)
+*line 228
+clr R0
+move 14(R14),R0
+and #3840,R0
+move R0,-10(R14)
+*line 229
+*line 230
+clr R0
+move -10(R14),R0
+bra L52
+*line 231
+L53:
+*line 232
+*line 233
+*line 234
+move -4(R14),(sp)
+add #1,(sp)
+move -6(R14),-(sp)
+move -8(R14),-(sp)
+move.l #L54,-(sp)
+move.l 8(R14),-(sp)
+add.l #4,(sp)
+jsr _sprintf
+adda.l #12,sp
+bra L51
+*line 235
+*line 236
+L55:
+*line 237
+*line 238
+*line 239
+move -4(R14),(sp)
+move -6(R14),-(sp)
+move -8(R14),-(sp)
+move.l #L56,-(sp)
+move.l 8(R14),-(sp)
+add.l #4,(sp)
+jsr _sprintf
+adda.l #12,sp
+bra L51
+*line 240
+*line 241
+L57:
+*line 242
+*line 243
+*line 244
+move -4(R14),(sp)
+add #1,(sp)
+move -6(R14),-(sp)
+move -8(R14),-(sp)
+move.l #L58,-(sp)
+move.l 8(R14),-(sp)
+add.l #4,(sp)
+jsr _sprintf
+adda.l #12,sp
+bra L51
+*line 245
+*line 246
+L59:
+*line 247
+*line 248
+*line 249
+move -4(R14),(sp)
+move -6(R14),-(sp)
+move -8(R14),-(sp)
+move.l #L60,-(sp)
+move.l 8(R14),-(sp)
+add.l #4,(sp)
+jsr _sprintf
+adda.l #12,sp
+bra L51
+*line 250
+bra L51
+L52:tst R0
+beq L53
+cmp #256,R0
+beq L55
+cmp #512,R0
+beq L57
+cmp #768,R0
+beq L59
+bra L51
+L51:
+*line 251
+*line 252
+bra L30
+*line 253
+*line 254
+*line 255
+L61:
+*line 256
+*line 257
+*line 258
+move 14(R14),(sp)
+move.l #L62,-(sp)
+move.l 8(R14),-(sp)
+add.l #8,(sp)
+jsr _sprintf
+addq.l #8,sp
+bra L30
+*line 259
+*line 260
+L63:
+*line 261
+L64:
+*line 262
+L65:
+*line 263
+*line 264
+bra L30
+*line 265
+bra L30
+L31:cmp #16,R0
+bhi L30
+asl #2,R0
+move R0,R8
+add.l #L66,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L66:.dc.l L63
+.dc.l L32
+.dc.l L33
+.dc.l L34
+.dc.l L35
+.dc.l L40
+.dc.l L41
+.dc.l L42
+.dc.l L43
+.dc.l L47
+.dc.l L48
+.dc.l L49
+.dc.l L50
+.dc.l L64
+.dc.l L61
+.dc.l L65
+.dc.l L45
+.text
+L30:
+*line 268
+clr -20(R14)
+bra L69
+L70:
+*line 269
+*line 270
+move.l 8(R14),R8
+clr.l R9
+move -20(R14),R9
+add.l R9,R8
+tst.b (R8)
+bne L71
+*line 270
+move.l 8(R14),R8
+clr.l R9
+move -20(R14),R9
+add.l R9,R8
+move.b #32,(R8)
+L71:L68:
+*line 268
+add #1,-20(R14)
+L69:
+*line 268
+cmp #12,-20(R14)
+blo L70
+L67:L29:unlk R14
+rts
+.globl _dsqlin
+.text
+_dsqlin:
+~~dsqlin:
+~buf=8
+~slin=12
+link R14,#0
+movem.l R4-R7/R13-R13,-(sp)
+~sp=R13
+~i=R7
+~t1=R6
+~t2=R5
+*line 289
+move 12(R14),R0
+muls #14,R0
+move.l R0,R13
+add.l #_seqtab,R13
+*line 291
+move (R13),R6
+ext.l R6
+divs #100,R6
+*line 292
+move (R13),R5
+move R6,R0
+muls #100,R0
+sub R0,R5
+*line 294
+move R5,(sp)
+move R6,-(sp)
+move 12(R14),-(sp)
+move.l #L73,-(sp)
+move.l 8(R14),-(sp)
+jsr _sprintf
+adda.l #12,sp
+*line 296
+move 4(R13),(sp)
+move 2(R13),-(sp)
+move.l 8(R14),-(sp)
+add.l #12,(sp)
+jsr _dsact
+addq.l #6,sp
+*line 297
+move 8(R13),(sp)
+move 6(R13),-(sp)
+move.l 8(R14),-(sp)
+add.l #24,(sp)
+jsr _dsact
+addq.l #6,sp
+*line 298
+move 12(R13),(sp)
+move 10(R13),-(sp)
+move.l 8(R14),-(sp)
+add.l #36,(sp)
+jsr _dsact
+addq.l #6,sp
+*line 300
+move.l 8(R14),R8
+move.b #176,(R8)
+*line 302
+clr R7
+bra L76
+L77:
+*line 303
+*line 304
+move R7,R8
+add.l 8(R14),R8
+tst.b (R8)
+bne L78
+*line 304
+move R7,R8
+add.l 8(R14),R8
+move.b #32,(R8)
+*line 305
+L78:L75:
+*line 302
+add #1,R7
+L76:
+*line 302
+cmp #48,R7
+blt L77
+L74:
+*line 306
+move.l 8(R14),R8
+clr.b 48(R8)
+L72:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.globl _dcursq
+.text
+_dcursq:
+~~dcursq:
+link R14,#-4
+*line 320
+move _curslin,(sp)
+move.l #_TheBuf,-(sp)
+jsr _dsqlin
+addq.l #4,sp
+*line 321
+move #18,(sp)
+move.l #_TheBuf,-(sp)
+clr -(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 322
+jsr _ctcon
+L79:unlk R14
+rts
+.globl _dstw
+.text
+_dstw:
+~~dstw:
+link R14,#0
+movem.l R5-R7,-(sp)
+~slin=R7
+~srow=R6
+*line 335
+move _curslin,R7
+sub #7,R7
+*line 337
+*line 338
+tst R7
+bge L81
+*line 338
+add #1000,R7
+*line 339
+L81:
+*line 340
+clr R6
+bra L84
+L85:
+*line 341
+*line 342
+move R7,(sp)
+move.l #_TheBuf,-(sp)
+jsr _dsqlin
+addq.l #4,sp
+*line 343
+cmp #7,R6
+bne L10003
+move #18,(sp)
+bra L10005
+L10003:move #18,(sp)
+L10005:move.l #_TheBuf,-(sp)
+clr -(sp)
+move R6,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 344
+*line 345
+*line 346
+add #1,R7
+move R7,R0
+cmp #1000,R0
+blt L86
+*line 346
+sub #1000,R7
+L86:L83:
+*line 340
+add #1,R6
+L84:
+*line 340
+cmp #16,R6
+blt L85
+L82:
+*line 349
+jsr _seq2buf
+*line 350
+jsr _ctcon
+L80:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _sqwin
+.text
+_sqwin:
+~~sqwin:
+~n=8
+link R14,#-194
+movem.l R5-R7,-(sp)
+~i=R7
+~j=R6
+~atrbuf=-128
+~linbuf=-194
+*line 369
+*line 370
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L88
+*line 370
+clr (sp)
+jsr _vbank
+*line 371
+L88:
+*line 372
+move 8(R14),R0
+bra L90
+*line 373
+L91:
+*line 374
+*line 375
+*line 376
+*line 377
+*line 378
+move #63,(sp)
+move #177,-(sp)
+move.l R14,-(sp)
+add.l #-194,(sp)
+jsr _memset
+addq.l #6,sp
+*line 379
+move.b #186,-194(R14)
+*line 380
+move.b #183,-146(R14)
+*line 381
+move.b #187,-132(R14)
+*line 382
+clr.b -131(R14)
+*line 383
+*line 384
+move #63,(sp)
+move #226,-(sp)
+move.l R14,-(sp)
+add.l #-128,(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 385
+clr -2(R14)
+*line 386
+*line 387
+move.l R14,(sp)
+add.l #-128,(sp)
+move.l R14,-(sp)
+add.l #-194,(sp)
+clr -(sp)
+clr -(sp)
+move.l _obj8,-(sp)
+jsr _vputsa
+adda.l #12,sp
+*line 388
+*line 389
+*line 390
+*line 391
+move #64,(sp)
+move #274,-(sp)
+move.l R14,-(sp)
+add.l #-128,(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 392
+move #226,-128(R14)
+*line 393
+move #18,-126(R14)
+*line 394
+move #18,-118(R14)
+*line 395
+move #18,-106(R14)
+*line 396
+move #18,-82(R14)
+*line 397
+move #18,-58(R14)
+*line 398
+move #18,-34(R14)
+*line 399
+move #226,-32(R14)
+*line 400
+move #18,-30(R14)
+*line 401
+move #18,-24(R14)
+*line 402
+move #18,-16(R14)
+*line 403
+move #18,-10(R14)
+*line 404
+move #18,-6(R14)
+*line 405
+move #226,-4(R14)
+*line 406
+clr -2(R14)
+*line 407
+*line 408
+move.l R14,(sp)
+add.l #-128,(sp)
+move.l #_sqhead,-(sp)
+clr -(sp)
+move #1,-(sp)
+move.l _obj8,-(sp)
+jsr _vputsa
+adda.l #12,sp
+*line 409
+*line 410
+*line 411
+*line 412
+*line 413
+move #63,(sp)
+move #177,-(sp)
+move.l R14,-(sp)
+add.l #-194,(sp)
+jsr _memset
+addq.l #6,sp
+*line 414
+move.b #182,-194(R14)
+*line 415
+move.b #181,-146(R14)
+*line 416
+move.b #180,-132(R14)
+*line 417
+clr.b -131(R14)
+*line 418
+*line 419
+move #63,(sp)
+move #226,-(sp)
+move.l R14,-(sp)
+add.l #-128,(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 420
+clr -2(R14)
+*line 421
+*line 422
+move.l R14,(sp)
+add.l #-128,(sp)
+move.l R14,-(sp)
+add.l #-194,(sp)
+clr -(sp)
+clr -(sp)
+move.l _obj11,-(sp)
+jsr _vputsa
+adda.l #12,sp
+*line 423
+*line 424
+*line 425
+*line 426
+move #63,(sp)
+move #177,-(sp)
+move.l R14,-(sp)
+add.l #-194,(sp)
+jsr _memset
+addq.l #6,sp
+*line 427
+move.b #185,-194(R14)
+*line 428
+move.b #184,-132(R14)
+*line 429
+clr.b -131(R14)
+*line 430
+*line 431
+move #63,(sp)
+move #226,-(sp)
+move.l R14,-(sp)
+add.l #-128,(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 432
+clr -2(R14)
+*line 433
+*line 434
+move.l R14,(sp)
+add.l #-128,(sp)
+move.l R14,-(sp)
+add.l #-194,(sp)
+clr -(sp)
+move #6,-(sp)
+move.l _obj11,-(sp)
+jsr _vputsa
+adda.l #12,sp
+*line 435
+bra L89
+*line 436
+*line 437
+*line 438
+L92:
+*line 439
+*line 440
+*line 441
+move #13,(sp)
+clr -(sp)
+jsr _SetDTop
+addq.l #2,sp
+*line 442
+jsr _dstw
+bra L89
+*line 443
+*line 444
+L93:
+*line 445
+*line 446
+*line 447
+clr R7
+bra L96
+L97:
+*line 448
+*line 449
+*line 450
+move R7,R8
+add.l R8,R8
+move.l #_trstate,R9
+move 0(R8,R9.l),(sp)
+move R7,R8
+add.l R8,R8
+move.l #_sregval,R9
+move 0(R8,R9.l),-(sp)
+move R7,R8
+add.l R8,R8
+move.l #_seqline,R9
+move 0(R8,R9.l),-(sp)
+move.l #L98,-(sp)
+move.l R14,-(sp)
+add.l #-194,(sp)
+jsr _sprintf
+adda.l #12,sp
+*line 451
+*line 452
+*line 453
+move.l #_cg3,(sp)
+move #14,-(sp)
+move #14,-(sp)
+move.l #L99,-(sp)
+clr -(sp)
+move R7,-(sp)
+move #2,-(sp)
+move #14,-(sp)
+move #16,-(sp)
+move.l _obj10,-(sp)
+jsr _vvputsv
+adda.l #22,sp
+*line 454
+*line 455
+*line 456
+move.l #_cg3,(sp)
+move #14,-(sp)
+move #14,-(sp)
+move.l R14,-(sp)
+add.l #-194,(sp)
+move #1,-(sp)
+move R7,-(sp)
+move #2,-(sp)
+move #1,-(sp)
+move #16,-(sp)
+move.l _obj10,-(sp)
+jsr _vvputsv
+adda.l #22,sp
+*line 457
+*line 458
+*line 459
+move.l #_cg3,(sp)
+move #14,-(sp)
+move #14,-(sp)
+move.l #L100,-(sp)
+move #14,-(sp)
+move R7,-(sp)
+move #2,-(sp)
+move #14,-(sp)
+move #16,-(sp)
+move.l _obj10,-(sp)
+jsr _vvputsv
+adda.l #22,sp
+*line 460
+*line 461
+*line 461
+cmp #7,R7
+bne L101
+*line 462
+*line 463
+*line 463
+move _cxval,R0
+asr #3,R0
+cmp #48,R0
+bne L102
+*line 464
+*line 465
+*line 466
+move.l #_cg3,(sp)
+move #14,-(sp)
+move #14,-(sp)
+move.l #L103,-(sp)
+clr -(sp)
+move R7,-(sp)
+move #6,-(sp)
+move #16,-(sp)
+move.l _obj10,-(sp)
+jsr _vsplot4
+adda.l #20,sp
+*line 467
+bra L104
+L102:
+*line 468
+*line 469
+*line 470
+*line 471
+move.l #_cg3,(sp)
+move #14,-(sp)
+move #14,-(sp)
+move.l #L105,-(sp)
+clr -(sp)
+move R7,-(sp)
+move #6,-(sp)
+move #16,-(sp)
+move.l _obj10,-(sp)
+jsr _vsplot4
+adda.l #20,sp
+L104:
+*line 472
+*line 473
+*line 474
+L101:
+*line 475
+move R7,(sp)
+add #1,(sp)
+move.l #L106,-(sp)
+move.l R14,-(sp)
+add.l #-194,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 476
+*line 477
+*line 478
+*line 479
+move.l #_cg3,(sp)
+move #14,-(sp)
+move #14,-(sp)
+move.l R14,-(sp)
+add.l #-194,(sp)
+move #2,-(sp)
+move R7,-(sp)
+move #2,-(sp)
+move R7,R8
+add.l R8,R8
+move.l #_seqflag,R9
+clr R0
+move 0(R8,R9.l),R0
+and #-32768,R0
+beq L10006
+move #6,-(sp)
+bra L10008
+L10006:move #1,-(sp)
+L10008:move #16,-(sp)
+move.l _obj10,-(sp)
+jsr _vvputsv
+adda.l #22,sp
+L95:
+*line 447
+add #1,R7
+L96:
+*line 447
+cmp #16,R7
+blt L97
+L94:
+*line 480
+*line 481
+bra L89
+*line 482
+*line 483
+L107:
+*line 484
+*line 485
+*line 486
+move #64,(sp)
+move #146,-(sp)
+move.l R14,-(sp)
+add.l #-128,(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 487
+move #226,-128(R14)
+*line 488
+move #226,-4(R14)
+*line 489
+clr -2(R14)
+*line 490
+*line 491
+clr R7
+bra L110
+L111:
+*line 492
+move.l R14,(sp)
+add.l #-128,(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_sqmcon,R9
+move.l 0(R8,R9.l),-(sp)
+clr -(sp)
+move R7,-(sp)
+add #1,(sp)
+move.l _obj11,-(sp)
+jsr _vputsa
+adda.l #12,sp
+L109:
+*line 491
+add #1,R7
+L110:
+*line 491
+cmp #5,R7
+blt L111
+L108:
+*line 492
+*line 493
+bra L89
+*line 494
+bra L89
+L90:tst R0
+beq L91
+cmp #1,R0
+beq L92
+cmp #2,R0
+beq L93
+cmp #3,R0
+beq L107
+bra L89
+L89:L87:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _SqBakLn
+.text
+_SqBakLn:
+~~SqBakLn:
+link R14,#0
+movem.l R6-R7,-(sp)
+~slin=R7
+*line 512
+*line 513
+sub #1,_curslin
+bge L113
+*line 513
+add #1000,_curslin
+*line 514
+L113:
+*line 515
+move _curslin,R7
+sub #7,R7
+*line 517
+*line 518
+tst R7
+bge L114
+*line 518
+add #1000,R7
+*line 519
+L114:
+*line 520
+move R7,(sp)
+move.l #_TheBuf,-(sp)
+jsr _dsqlin
+addq.l #4,sp
+*line 521
+move.l #_TheBuf,R0
+bra L112
+L112:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _SqFwdLn
+.text
+_SqFwdLn:
+~~SqFwdLn:
+link R14,#0
+movem.l R6-R7,-(sp)
+~slin=R7
+*line 538
+*line 539
+add #1,_curslin
+move _curslin,R0
+cmp #1000,R0
+blt L116
+*line 539
+sub #1000,_curslin
+*line 540
+L116:
+*line 541
+move _curslin,R7
+add #8,R7
+*line 543
+*line 544
+cmp #1000,R7
+blt L117
+*line 544
+sub #1000,R7
+*line 545
+L117:
+*line 546
+move R7,(sp)
+move.l #_TheBuf,-(sp)
+jsr _dsqlin
+addq.l #4,sp
+*line 547
+move.l #_TheBuf,R0
+bra L115
+L115:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _sqwins
+.text
+_sqwins:
+~~sqwins:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 560
+clr R7
+bra L121
+L122:
+*line 561
+move R7,(sp)
+jsr _sqwin
+L120:
+*line 560
+add #1,R7
+L121:
+*line 560
+cmp #4,R7
+blt L122
+L119:L118:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _sqdisp
+.text
+_sqdisp:
+~~sqdisp:
+link R14,#-4
+*line 580
+jsr _dswap
+*line 582
+move.l #_SqBakLn,_BakLine
+*line 583
+move.l #_SqFwdLn,_FwdLine
+*line 587
+move.l #_v_score,_obj8
+*line 588
+move.l #2048+_v_score,_obj9
+*line 589
+move.l #16384+_v_score,_obj10
+*line 590
+move.l #8192+_v_score,_obj11
+*line 592
+move #9,_ScrlObj
+*line 593
+move.l _obj9,_ScObAdr
+*line 594
+move.l _obj9,_LineBuf
+*line 595
+clr.l _OldLine
+*line 596
+move #18,_LineAtr
+*line 598
+clr _CurLine
+*line 599
+move #13,_CurScan
+*line 601
+clr _PdScDnF
+*line 602
+clr _PdScUpF
+*line 607
+move #-1,(sp)
+move #72,-(sp)
+clr -(sp)
+clr -(sp)
+move #28,-(sp)
+move #512,-(sp)
+move.l _obj8,-(sp)
+clr -(sp)
+move #1,-(sp)
+move #8,-(sp)
+jsr _SetObj
+adda.l #20,sp
+*line 608
+move #-1,(sp)
+move #72,-(sp)
+move #28,-(sp)
+clr -(sp)
+move #224,-(sp)
+move #384,-(sp)
+move.l _obj9,-(sp)
+clr -(sp)
+move #1,-(sp)
+move #9,-(sp)
+jsr _SetObj
+adda.l #20,sp
+*line 609
+move #-1,(sp)
+move #1536,-(sp)
+move #28,-(sp)
+move #384,-(sp)
+move #224,-(sp)
+move #128,-(sp)
+move.l _obj10,-(sp)
+clr -(sp)
+clr -(sp)
+move #10,-(sp)
+jsr _SetObj
+adda.l #20,sp
+*line 610
+move #-1,(sp)
+move #72,-(sp)
+move #252,-(sp)
+clr -(sp)
+move #98,-(sp)
+move #512,-(sp)
+move.l _obj11,-(sp)
+clr -(sp)
+move #1,-(sp)
+move #11,-(sp)
+jsr _SetObj
+adda.l #20,sp
+*line 612
+*line 613
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L124
+*line 613
+clr (sp)
+jsr _vbank
+*line 614
+L124:
+*line 615
+move #32767,(sp)
+clr -(sp)
+move.l #_v_score,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 616
+move #24577,(sp)
+clr -(sp)
+move.l #65534+_v_score,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 618
+jsr _sqwins
+*line 624
+move #8,(sp)
+move #8,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 625
+move #9,(sp)
+move #9,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 626
+move #10,(sp)
+move #10,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 627
+move #11,(sp)
+move #11,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 629
+*line 630
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L125
+*line 630
+clr (sp)
+jsr _vbank
+*line 631
+L125:
+*line 632
+move #3584,(sp)
+move.l #_cg3,-(sp)
+move.l #_v_cgtab,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 633
+clr R0
+move 2+_v_regs,R0
+and #4095,R0
+or #-8192,R0
+move R0,2+_v_regs
+*line 637
+clr R0
+move 64+_v_odtab,R0
+and #4095,R0
+or #-12288,R0
+move R0,64+_v_odtab
+*line 638
+clr R0
+move 72+_v_odtab,R0
+and #4095,R0
+or #-12288,R0
+move R0,72+_v_odtab
+*line 640
+clr R0
+move 88+_v_odtab,R0
+and #4095,R0
+or #-12288,R0
+move R0,88+_v_odtab
+*line 642
+clr _submenu
+*line 644
+move #1,_ctcsw
+*line 645
+move #2,(sp)
+move #9,-(sp)
+jsr _ctcpos
+addq.l #2,sp
+*line 646
+jsr _postcm
+*line 648
+move.l #_seqpal,(sp)
+jsr _vsndpal
+L123:unlk R14
+rts
+.data
+L2:.dc.b $B0,$20,$4B,$65,$79,$20,$74,$72,$61,$6E,$73,$69,$65,$6E,$74,$20,$20,$54,$72,$69,$67,$67,$65,$72,$20,$6F,$6E,$20,$20,$20
+.dc.b $53,$74,$6F,$70,$20,$20,$20,$20,$20,$20,$20,$20,$20,$53,$65,$74,$20,$72,$65,$67,$20,$20,$20,$56,$61,$6C,$75,$65,$20,$20
+.dc.b $20,$20,$B0,$0
+L3:.dc.b $B0,$20,$4B,$65,$79,$20,$63,$6C,$6F,$73,$75,$72,$65,$20,$20,$20,$20,$54,$72,$69,$67,$67,$65,$72,$20,$6F,$66,$66,$20,$20
+.dc.b $4A,$75,$6D,$70,$20,$74,$6F,$20,$6C,$69,$6E,$20,$20,$49,$6E,$63,$20,$52,$65,$67,$20,$20,$20,$52,$65,$67,$69,$73,$74,$65
+.dc.b $72,$20,$B0,$0
+L4:.dc.b $B0,$20,$4B,$65,$79,$20,$72,$65,$6C,$65,$61,$73,$65,$20,$20,$20,$20,$54,$72,$69,$67,$20,$74,$6F,$67,$67,$6C,$65,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$49,$66,$20,$72,$65,$67,$20,$3D,$20,$20,$56,$6F,$6C,$74,$61,$67,$65
+.dc.b $20,$20,$B0,$0
+L5:.dc.b $B0,$20,$49,$66,$20,$6B,$65,$79,$20,$61,$63,$74,$69,$76,$65,$20,$20,$49,$66,$20,$74,$72,$69,$67,$20,$61,$63,$74,$20,$20
+.dc.b $49,$66,$20,$73,$74,$69,$6D,$20,$61,$63,$74,$20,$20,$49,$66,$20,$72,$65,$67,$20,$3C,$20,$20,$52,$61,$6E,$64,$6F,$6D,$20
+.dc.b $20,$20,$B0,$0
+L6:.dc.b $B0,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$49,$66,$20,$72,$65,$67,$20,$3E,$20,$20,$20,$20,$20,$20,$20,$20,$20
+.dc.b $20,$20,$B0,$0
+L7:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$0
+L8:.dc.b $4B,$63,$20,$30,$30,$31,$20,$31,$20,$30,$31,$0
+L9:.dc.b $4B,$72,$20,$30,$30,$31,$20,$31,$20,$30,$31,$0
+L10:.dc.b $4B,$74,$20,$30,$30,$31,$20,$31,$20,$30,$31,$0
+L11:.dc.b $49,$66,$20,$30,$30,$31,$20,$31,$20,$30,$31,$0
+L12:.dc.b $54,$72,$69,$67,$20,$6F,$6E,$20,$20,$30,$31,$0
+L13:.dc.b $54,$72,$69,$67,$20,$6F,$66,$66,$20,$30,$31,$0
+L14:.dc.b $54,$72,$69,$67,$20,$74,$67,$6C,$20,$30,$31,$0
+L15:.dc.b $49,$66,$20,$74,$72,$69,$67,$20,$20,$30,$31,$0
+L16:.dc.b $53,$65,$74,$20,$52,$30,$31,$3D,$30,$30,$20,$0
+L17:.dc.b $49,$66,$20,$20,$52,$30,$31,$3D,$30,$30,$20,$0
+L18:.dc.b $49,$66,$20,$20,$52,$30,$31,$3C,$30,$30,$20,$0
+L19:.dc.b $49,$66,$20,$20,$52,$30,$31,$3E,$30,$30,$20,$0
+L20:.dc.b $49,$66,$20,$73,$74,$69,$6D,$20,$61,$63,$74,$0
+L21:.dc.b $4A,$75,$6D,$70,$20,$74,$6F,$20,$30,$30,$30,$0
+L22:.dc.b $53,$74,$6F,$70,$20,$20,$20,$20,$20,$20,$20,$0
+L23:.dc.b $49,$6E,$63,$20,$52,$30,$31,$2B,$30,$30,$20,$0
+L37:.dc.b $25,$30,$33,$75,$20,$4C,$20,$20,$20,$0
+L39:.dc.b $25,$30,$33,$75,$20,$25,$75,$20,$25,$30,$32,$75,$0
+L44:.dc.b $25,$30,$32,$75,$0
+L54:.dc.b $52,$25,$30,$32,$75,$25,$63,$52,$25,$30,$32,$75,$0
+L56:.dc.b $52,$25,$30,$32,$75,$25,$63,$25,$30,$32,$75,$20,$0
+L58:.dc.b $52,$25,$30,$32,$75,$25,$63,$56,$25,$75,$20,$0
+L60:.dc.b $52,$25,$30,$32,$75,$25,$63,$3F,$25,$75,$20,$0
+L62:.dc.b $25,$30,$33,$75,$0
+L73:.dc.b $20,$20,$25,$30,$33,$75,$20,$25,$30,$32,$75,$2E,$25,$30,$32,$75,$0
+L98:.dc.b $20,$20,$20,$20,$25,$30,$33,$64,$20,$25,$30,$32,$64,$20,$25,$64,$20,$0
+L99:.dc.b $B0,$0
+L100:.dc.b $B0,$0
+L103:.dc.b $BF,$0
+L105:.dc.b $BC,$0
+L106:.dc.b $25,$30,$32,$64,$0
Index: alcyon/sqdkey.s
===================================================================
--- alcyon/sqdkey.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/sqdkey.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1161 @@
+.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 _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _stmptr
+.globl _defptr
+.globl _patches
+.globl _defents
+.globl _seqtab
+.globl _seqflag
+.globl _seqline
+.globl _seqstim
+.globl _seqtime
+.globl _sregval
+.globl _trstate
+.globl _asig
+.globl _astat
+.globl _action
+.globl _curslin
+.globl _sqdeflg
+.globl _stccol
+.globl _stcrow
+.globl _sqdebuf
+.globl _seqbuf
+.globl _seqtab
+.globl _actfmt
+.comm _actfmt,2
+.globl _actlft
+.data
+_actlft:
+.dc.b $C
+.dc.b $18
+.dc.b $24
+.even
+.globl _seqdfmt
+.data
+_seqdfmt:
+.dc.b $0
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $3
+.dc.b $3
+.dc.b $3
+.dc.b $3
+.dc.b $0
+.dc.b $4
+.dc.b $0
+.dc.b $3
+.even
+.globl _seq2buf
+.text
+_seq2buf:
+~~seq2buf:
+link R14,#-4
+*line 55
+move #7,(sp)
+move _curslin,R0
+muls #14,R0
+add.l #_seqtab,R0
+move.l R0,-(sp)
+move.l #_seqbuf,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 56
+move _curslin,(sp)
+move.l #_sqdebuf,-(sp)
+jsr _dsqlin
+addq.l #4,sp
+*line 57
+move #1,_sqdeflg
+L1:unlk R14
+rts
+.globl _sqactde
+.text
+_sqactde:
+~~sqactde:
+~key=R7
+link R14,#-14
+movem.l R5-R7,-(sp)
+~col=R6
+~defmt=-2
+~act=-4
+~vtype=-6
+~buf=-14
+*line 77
+move 8(R14),R7
+*line 77
+move _stccol,R6
+move _action,R8
+move.l #_actlft,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+sub R0,R6
+*line 79
+move _action,R0
+bra L4
+*line 80
+L5:
+*line 81
+*line 82
+*line 83
+move 2+_seqbuf,-4(R14)
+*line 84
+clr R0
+move 4+_seqbuf,R0
+and #3840,R0
+move R0,-6(R14)
+bra L3
+*line 85
+*line 86
+L6:
+*line 87
+*line 88
+*line 89
+move 6+_seqbuf,-4(R14)
+*line 90
+clr R0
+move 8+_seqbuf,R0
+and #3840,R0
+move R0,-6(R14)
+bra L3
+*line 91
+*line 92
+L7:
+*line 93
+*line 94
+*line 95
+move 10+_seqbuf,-4(R14)
+*line 96
+clr R0
+move 12+_seqbuf,R0
+and #3840,R0
+move R0,-6(R14)
+bra L3
+*line 97
+*line 98
+L8:
+*line 99
+*line 100
+bra L2
+*line 101
+bra L3
+L4:tst R0
+beq L5
+cmp #1,R0
+beq L6
+cmp #2,R0
+beq L7
+bra L8
+L3:
+*line 104
+clr R0
+move -4(R14),R0
+and #255,R0
+move R0,R8
+move.l #_seqdfmt,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,-2(R14)
+*line 107
+move -2(R14),R0
+bra L10
+*line 108
+L11:
+*line 109
+*line 110
+*line 111
+*line 111
+cmp #3,R6
+blt L12
+cmp #5,R6
+bgt L12
+*line 112
+*line 113
+*line 114
+cmp #3,R6
+bne L10000
+cmp #1,R7
+bgt L2
+L10000:*line 115
+*line 116
+move R7,R0
+add #48,R0
+move.b R0,-14(R14)
+*line 117
+bra L13
+L12:
+*line 118
+*line 118
+cmp #7,R6
+bne L14
+*line 119
+*line 120
+*line 120
+cmp #1,R7
+beq L10001
+cmp #2,R7
+bne L15
+L10001:*line 121
+*line 122
+move R7,R0
+add #48,R0
+move.b R0,-14(R14)
+*line 123
+*line 124
+move #98,(sp)
+move.l #L16,-(sp)
+move _stccol,-(sp)
+add #1,(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 125
+move #3,(sp)
+move.l #L17,-(sp)
+move.l #_sqdebuf,R0
+move _stccol,R1
+ext.l R1
+add.l R1,R0
+move.l R0,-(sp)
+add.l #1,(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 126
+bra L18
+L15:
+*line 127
+*line 127
+cmp #3,R7
+bne L19
+*line 128
+*line 129
+move.b #76,-14(R14)
+*line 130
+*line 131
+move #98,(sp)
+move.l #L20,-(sp)
+move _stccol,-(sp)
+add #1,(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 132
+move #3,(sp)
+move #32,-(sp)
+move.l #_sqdebuf,R0
+move _stccol,R1
+ext.l R1
+add.l R1,R0
+move.l R0,-(sp)
+add.l #1,(sp)
+jsr _memset
+addq.l #6,sp
+*line 133
+bra L21
+L19:
+*line 134
+*line 135
+bra L2
+*line 136
+L21:L18:
+*line 137
+*line 138
+bra L22
+L14:
+*line 139
+*line 139
+cmp #9,R6
+blt L23
+cmp #10,R6
+bgt L23
+*line 140
+*line 141
+*line 142
+cmp #9,R6
+bne L10002
+cmp #1,R7
+bgt L2
+L10002:*line 143
+*line 144
+move R7,R0
+add #48,R0
+move.b R0,-14(R14)
+*line 145
+*line 146
+L23:L22:L13:
+*line 147
+clr.b -13(R14)
+*line 148
+move.l #_sqdebuf,R8
+move _stccol,R9
+add.l R9,R8
+move.b -14(R14),(R8)
+*line 149
+*line 150
+move #98,(sp)
+move.l R14,-(sp)
+add.l #-14,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 151
+*line 152
+*line 152
+cmp #5,R6
+beq L10003
+cmp #7,R6
+bne L24
+L10003:*line 153
+*line 154
+add #1,_stccol
+*line 155
+add #1,R6
+*line 156
+*line 157
+L24:
+*line 158
+*line 159
+cmp #10,R6
+bne L25
+*line 159
+jsr _ctcon
+*line 160
+bra L26
+L25:
+*line 161
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movestc
+addq.l #2,sp
+L26:
+*line 162
+bra L2
+*line 163
+*line 164
+*line 165
+L27:
+*line 166
+*line 167
+*line 168
+*line 168
+cmp #9,R6
+blt L28
+cmp #10,R6
+bgt L28
+*line 169
+*line 170
+*line 171
+cmp #9,R6
+bne L10004
+cmp #1,R7
+bgt L2
+L10004:*line 172
+bra L29
+L28:
+*line 173
+*line 174
+bra L2
+*line 175
+L29:
+*line 176
+*line 177
+*line 178
+move R7,R0
+add #48,R0
+move.b R0,-14(R14)
+*line 179
+clr.b -13(R14)
+*line 180
+move R7,R0
+add #48,R0
+move.l #_sqdebuf,R9
+move _stccol,R10
+add.l R10,R9
+move.b R0,(R9)
+*line 181
+*line 182
+move #98,(sp)
+move.l R14,-(sp)
+add.l #-14,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 183
+*line 184
+*line 185
+cmp #10,R6
+bne L30
+*line 185
+jsr _ctcon
+*line 186
+bra L31
+L30:
+*line 187
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movestc
+addq.l #2,sp
+L31:
+*line 188
+bra L2
+*line 189
+*line 190
+*line 191
+L32:
+*line 192
+*line 193
+*line 194
+*line 194
+cmp #7,R6
+bne L33
+cmp #16,-4(R14)
+bne L33
+*line 195
+*line 196
+*line 197
+cmp #8,R7
+bne L34
+*line 197
+move.b #45,-14(R14)
+bra L35
+L34:
+*line 198
+*line 199
+cmp #9,R7
+bne L36
+*line 199
+move.b #43,-14(R14)
+*line 200
+bra L37
+L36:bra L2
+L37:L35:
+*line 201
+*line 202
+*line 203
+clr.b -13(R14)
+*line 204
+move.l #_sqdebuf,R8
+move _stccol,R9
+add.l R9,R8
+move.b -14(R14),(R8)
+*line 205
+move #98,(sp)
+move.l R14,-(sp)
+add.l #-14,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 206
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movestc
+addq.l #2,sp
+bra L2
+*line 207
+*line 208
+*line 209
+L33:
+*line 210
+clr R0
+move -6(R14),R0
+bra L39
+*line 211
+L40:
+*line 212
+*line 213
+*line 214
+*line 214
+cmp #5,R6
+blt L10006
+cmp #6,R6
+ble L10005
+L10006:cmp #9,R6
+blt L41
+cmp #10,R6
+bgt L41
+L10005:*line 215
+*line 216
+*line 217
+cmp #5,R6
+beq L10008
+cmp #9,R6
+bne L10007
+L10008:cmp #1,R7
+bgt L2
+L10007:*line 218
+bra L42
+L41:
+*line 219
+*line 220
+bra L2
+*line 221
+L42:
+*line 222
+*line 223
+*line 224
+move R7,R0
+add #48,R0
+move.b R0,-14(R14)
+*line 225
+clr.b -13(R14)
+*line 226
+move R7,R0
+add #48,R0
+move.l #_sqdebuf,R9
+move _stccol,R10
+add.l R10,R9
+move.b R0,(R9)
+*line 227
+*line 228
+move #98,(sp)
+move.l R14,-(sp)
+add.l #-14,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 229
+*line 230
+*line 230
+cmp #6,R6
+bne L43
+*line 231
+*line 232
+add #2,R6
+*line 233
+add #2,_stccol
+*line 234
+*line 235
+L43:
+*line 236
+*line 237
+cmp #10,R6
+bne L44
+*line 237
+jsr _ctcon
+*line 238
+bra L45
+L44:
+*line 239
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movestc
+addq.l #2,sp
+L45:
+*line 240
+bra L2
+*line 241
+*line 242
+*line 243
+L46:
+*line 244
+*line 245
+*line 246
+*line 246
+cmp #5,R6
+blt L10010
+cmp #6,R6
+ble L10009
+L10010:cmp #8,R6
+blt L47
+cmp #9,R6
+bgt L47
+L10009:*line 247
+*line 248
+*line 249
+cmp #5,R6
+bne L10011
+cmp #1,R7
+bgt L2
+L10011:*line 250
+bra L48
+L47:
+*line 251
+*line 252
+bra L2
+*line 253
+L48:
+*line 254
+*line 255
+*line 256
+move R7,R0
+add #48,R0
+move.b R0,-14(R14)
+*line 257
+clr.b -13(R14)
+*line 258
+move R7,R0
+add #48,R0
+move.l #_sqdebuf,R9
+move _stccol,R10
+add.l R10,R9
+move.b R0,(R9)
+*line 259
+*line 260
+move #98,(sp)
+move.l R14,-(sp)
+add.l #-14,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 261
+*line 262
+*line 262
+cmp #6,R6
+bne L49
+*line 263
+*line 264
+add #1,R6
+*line 265
+add #1,_stccol
+*line 266
+*line 267
+L49:
+*line 268
+*line 269
+cmp #9,R6
+bne L50
+*line 269
+jsr _ctcon
+*line 270
+bra L51
+L50:
+*line 271
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movestc
+addq.l #2,sp
+L51:
+*line 272
+bra L2
+*line 273
+*line 274
+*line 275
+L52:
+*line 276
+*line 277
+*line 278
+*line 278
+cmp #5,R6
+blt L10013
+cmp #6,R6
+ble L10012
+L10013:cmp #9,R6
+bne L53
+L10012:*line 279
+*line 280
+*line 281
+cmp #5,R6
+bne L10014
+cmp #1,R7
+bgt L2
+L10014:*line 282
+*line 283
+cmp #9,R6
+bne L10015
+cmp #1,R7
+blt L2
+cmp #4,R7
+bgt L2
+L10015:*line 284
+bra L54
+L53:
+*line 285
+*line 286
+bra L2
+*line 287
+L54:
+*line 288
+*line 289
+*line 290
+move R7,R0
+add #48,R0
+move.b R0,-14(R14)
+*line 291
+clr.b -13(R14)
+*line 292
+move R7,R0
+add #48,R0
+move.l #_sqdebuf,R9
+move _stccol,R10
+add.l R10,R9
+move.b R0,(R9)
+*line 293
+*line 294
+move #98,(sp)
+move.l R14,-(sp)
+add.l #-14,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 295
+*line 296
+*line 296
+cmp #6,R6
+bne L55
+*line 297
+*line 298
+add #2,R6
+*line 299
+add #2,_stccol
+*line 300
+*line 301
+L55:
+*line 302
+*line 303
+cmp #9,R6
+bne L56
+*line 303
+jsr _ctcon
+*line 304
+bra L57
+L56:
+*line 305
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movestc
+addq.l #2,sp
+L57:
+*line 306
+bra L2
+*line 307
+*line 308
+*line 309
+L58:
+*line 310
+*line 311
+*line 312
+*line 312
+cmp #5,R6
+blt L10017
+cmp #6,R6
+ble L10016
+L10017:cmp #9,R6
+bne L59
+L10016:*line 313
+*line 314
+*line 315
+cmp #5,R6
+bne L10018
+cmp #1,R7
+bgt L2
+L10018:*line 316
+*line 317
+*line 318
+cmp #9,R6
+bne L10019
+cmp #6,R7
+bgt L2
+L10019:*line 319
+bra L60
+L59:
+*line 320
+*line 321
+bra L2
+*line 322
+L60:
+*line 323
+*line 324
+*line 325
+move R7,R0
+add #48,R0
+move.b R0,-14(R14)
+*line 326
+clr.b -13(R14)
+*line 327
+move R7,R0
+add #48,R0
+move.l #_sqdebuf,R9
+move _stccol,R10
+add.l R10,R9
+move.b R0,(R9)
+*line 328
+*line 329
+move #98,(sp)
+move.l R14,-(sp)
+add.l #-14,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 330
+*line 331
+*line 331
+cmp #6,R6
+bne L61
+*line 332
+*line 333
+add #2,R6
+*line 334
+add #2,_stccol
+*line 335
+*line 336
+L61:
+*line 337
+*line 338
+cmp #9,R6
+bne L62
+*line 338
+jsr _ctcon
+*line 339
+bra L63
+L62:
+*line 340
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movestc
+addq.l #2,sp
+L63:
+*line 341
+bra L2
+*line 342
+bra L38
+L39:tst R0
+beq L40
+cmp #256,R0
+beq L46
+cmp #512,R0
+beq L52
+cmp #768,R0
+beq L58
+bra L38
+L38:
+*line 343
+*line 344
+*line 345
+L64:
+*line 346
+*line 347
+*line 348
+*line 349
+tst R6
+blt L10020
+cmp #7,R6
+ble L2
+L10020:*line 350
+*line 351
+move R7,R0
+add #48,R0
+move.b R0,-14(R14)
+*line 352
+clr.b -13(R14)
+*line 353
+move R7,R0
+add #48,R0
+move.l #_sqdebuf,R9
+move _stccol,R10
+add.l R10,R9
+move.b R0,(R9)
+*line 354
+*line 355
+move #98,(sp)
+move.l R14,-(sp)
+add.l #-14,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 356
+*line 357
+*line 358
+cmp #10,R6
+bne L65
+*line 358
+jsr _ctcon
+*line 359
+bra L66
+L65:
+*line 360
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movestc
+addq.l #2,sp
+L66:
+*line 361
+bra L2
+*line 362
+*line 363
+L67:
+*line 364
+L68:
+*line 365
+*line 366
+bra L2
+*line 367
+bra L9
+L10:cmp #4,R0
+bhi L68
+asl #2,R0
+move R0,R8
+add.l #L69,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L69:.dc.l L67
+.dc.l L11
+.dc.l L27
+.dc.l L32
+.dc.l L64
+.text
+L9:L2:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _sqdkey
+.text
+_sqdkey:
+~~sqdkey:
+link R14,#-8
+movem.l R6-R7,-(sp)
+~key=R7
+~buf=-8
+*line 385
+*line 386
+tst _astat
+beq L70
+*line 387
+*line 388
+*line 389
+tst _sqdeflg
+bne L71
+*line 389
+jsr _seq2buf
+*line 390
+L71:
+*line 391
+move _asig,R7
+add #-60,R7
+*line 393
+*line 393
+cmp #2,_stccol
+blt L72
+cmp #4,_stccol
+bgt L72
+*line 394
+*line 395
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+*line 396
+clr.b -7(R14)
+*line 397
+*line 398
+move R7,R0
+add #48,R0
+move.l #_sqdebuf,R9
+move _stccol,R10
+add.l R10,R9
+move.b R0,(R9)
+*line 399
+*line 400
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 401
+*line 402
+*line 403
+cmp #4,_stccol
+bne L73
+*line 403
+jsr _ctcon
+*line 404
+bra L74
+L73:
+*line 405
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movestc
+addq.l #2,sp
+L74:
+*line 406
+bra L70
+*line 407
+*line 408
+*line 409
+bra L75
+L72:
+*line 410
+*line 410
+cmp #6,_stccol
+blt L76
+cmp #10,_stccol
+bgt L76
+*line 411
+*line 412
+*line 413
+cmp #8,_stccol
+beq L70
+*line 414
+*line 415
+move R7,R0
+add #48,R0
+move.b R0,-8(R14)
+*line 416
+clr.b -7(R14)
+*line 417
+*line 418
+move R7,R0
+add #48,R0
+move.l #_sqdebuf,R9
+move _stccol,R10
+add.l R10,R9
+move.b R0,(R9)
+*line 419
+*line 420
+move #98,(sp)
+move.l R14,-(sp)
+sub.l #8,(sp)
+move _stccol,-(sp)
+move #7,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 421
+*line 422
+*line 423
+cmp #7,_stccol
+bne L77
+*line 423
+add #1,_stccol
+*line 424
+L77:
+*line 425
+*line 426
+cmp #10,_stccol
+bne L78
+*line 426
+jsr _ctcon
+*line 427
+bra L79
+L78:
+*line 428
+add #1,_stccol
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _movestc
+addq.l #2,sp
+L79:
+*line 429
+bra L70
+*line 430
+*line 431
+bra L80
+L76:
+*line 432
+*line 432
+cmp #12,_stccol
+blt L81
+cmp #22,_stccol
+bgt L81
+*line 433
+*line 434
+clr _action
+*line 435
+move R7,(sp)
+jsr _sqactde
+bra L70
+*line 436
+*line 437
+bra L82
+L81:
+*line 438
+*line 438
+cmp #24,_stccol
+blt L83
+cmp #34,_stccol
+bgt L83
+*line 439
+*line 440
+move #1,_action
+*line 441
+move R7,(sp)
+jsr _sqactde
+bra L70
+*line 442
+*line 443
+bra L84
+L83:
+*line 444
+*line 444
+cmp #36,_stccol
+blt L85
+cmp #46,_stccol
+bgt L85
+*line 445
+*line 446
+move #2,_action
+*line 447
+move R7,(sp)
+jsr _sqactde
+bra L70
+*line 448
+*line 449
+L85:L84:L82:L80:L75:L70:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.data
+L16:.dc.b $20,$30,$31,$0
+L17:.dc.b $20,$30,$31,$0
+L20:.dc.b $20,$20,$20,$0
Index: alcyon/sqexec.s
===================================================================
--- alcyon/sqexec.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/sqexec.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1179 @@
+.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 _stmptr
+.globl _defptr
+.globl _patches
+.globl _defents
+.globl _seqtab
+.globl _seqflag
+.globl _seqline
+.globl _seqstim
+.globl _seqtime
+.globl _sregval
+.globl _trstate
+.globl _timers
+.globl _trgtab
+.globl _curslin
+.globl _dsp_ok
+.globl _ndisp
+.globl _seqdupd
+.globl _obj10
+.globl _cg3
+.globl _ptefifo
+.globl _seqdspn
+.comm _seqdspn,2
+.globl _rtab
+.data
+_rtab:
+.dc.w $0
+.dc.w $1
+.dc.w $3
+.dc.w $7
+.dc.w $F
+.dc.w $1F
+.dc.w $3F
+.dc.w $3F
+.dc.w $3F
+.dc.w $3F
+.globl _evaltv
+.text
+_evaltv:
+~~evaltv:
+~dat=R7
+link R14,#0
+movem.l R6-R7,-(sp)
+*line 71
+move 8(R14),R7
+*line 71
+clr R0
+move R7,R0
+and #3840,R0
+bra L3
+*line 72
+L4:
+*line 73
+*line 74
+*line 75
+clr R0
+move R7,R0
+and #255,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R8
+move.l #_sregval,R9
+clr R0
+move 0(R8,R9.l),R0
+bra L1
+*line 76
+L5:
+*line 77
+*line 78
+*line 79
+clr R0
+move R7,R0
+and #255,R0
+bra L1
+*line 80
+L6:
+*line 81
+*line 82
+*line 83
+clr R0
+bra L1
+*line 84
+L7:
+*line 85
+*line 86
+*line 87
+jsr _rand24
+clr R1
+move R7,R1
+and #255,R1
+lsl #1,R1
+swap R1
+clr R1
+swap R1
+add.l #_rtab,R1
+move.l R1,R9
+move (R9),R1
+and R1,R0
+bra L1
+*line 88
+L8:
+*line 89
+*line 90
+*line 91
+clr R0
+bra L1
+bra L2
+L3:tst R0
+beq L4
+cmp #256,R0
+beq L5
+cmp #512,R0
+beq L6
+cmp #768,R0
+beq L7
+bra L8
+L2:L1:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _dosqact
+.text
+_dosqact:
+~~dosqact:
+~act=R7
+~dat=R6
+~seq=8
+link R14,#0
+movem.l R2-R7,-(sp)
+~obj=R5
+~val=R4
+~sv=R3
+*line 112
+move 10(R14),R7
+*line 112
+move 12(R14),R6
+*line 112
+move R7,R5
+and #-256,R5
+lsr #8,R5
+*line 113
+move R6,R4
+and #255,R4
+*line 115
+clr R0
+move R7,R0
+and #255,R0
+bra L11
+*line 116
+L12:
+*line 117
+*line 118
+*line 119
+clr R0
+bra L9
+*line 120
+L13:
+*line 121
+*line 122
+*line 123
+move R6,(sp)
+and #8191,(sp)
+move.l #_ptefifo,-(sp)
+jsr _putwq
+addq.l #4,sp
+*line 124
+clr R0
+bra L9
+*line 125
+L14:
+*line 126
+*line 127
+*line 128
+move R6,(sp)
+or #-32768,(sp)
+move.l #_ptefifo,-(sp)
+jsr _putwq
+addq.l #4,sp
+*line 129
+clr R0
+bra L9
+*line 130
+L15:
+*line 131
+*line 132
+*line 133
+move R6,(sp)
+and #8191,(sp)
+move.l #_ptefifo,-(sp)
+jsr _putwq
+addq.l #4,sp
+*line 134
+move R6,(sp)
+or #-32768,(sp)
+move.l #_ptefifo,-(sp)
+jsr _putwq
+addq.l #4,sp
+*line 135
+clr R0
+bra L9
+*line 136
+L16:
+*line 137
+*line 138
+*line 139
+*line 140
+clr R0
+move R6,R0
+and #8191,R0
+move R0,R8
+move.l #_trgtab,R9
+tst.b 0(R8,R9.l)
+beq L17
+*line 140
+clr R0
+bra L9
+*line 141
+bra L18
+L17:
+*line 142
+move #1,R0
+bra L9
+L18:
+*line 143
+*line 144
+L19:
+*line 145
+*line 146
+*line 147
+clr R0
+move R4,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_trstate,R0
+move.l R0,R8
+move #1,(R8)
+*line 148
+move R4,(sp)
+or #4352,(sp)
+move.l #_ptefifo,-(sp)
+jsr _putwq
+addq.l #4,sp
+*line 149
+move #1,R0
+clr R1
+move R4,R1
+asl R1,R0
+or R0,_seqdupd
+*line 150
+clr R0
+bra L9
+*line 151
+L20:
+*line 152
+*line 153
+*line 154
+clr R0
+move R4,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_trstate,R0
+move.l R0,R8
+clr (R8)
+*line 155
+move #1,R0
+clr R1
+move R4,R1
+asl R1,R0
+or R0,_seqdupd
+*line 156
+clr R0
+bra L9
+*line 157
+L21:
+*line 158
+*line 159
+*line 160
+clr R0
+move R4,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R8
+move.l #_trstate,R9
+tst 0(R8,R9.l)
+beq L10000
+clr R0
+bra L10002
+L10000:move #1,R0
+L10002:clr R1
+move R4,R1
+lsl #1,R1
+swap R1
+clr R1
+swap R1
+add.l #_trstate,R1
+move.l R1,R9
+move R0,(R9)
+*line 161
+*line 162
+*line 163
+clr R0
+move R4,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R8
+move.l #_trstate,R9
+tst 0(R8,R9.l)
+beq L22
+*line 163
+move R4,(sp)
+or #4352,(sp)
+move.l #_ptefifo,-(sp)
+jsr _putwq
+addq.l #4,sp
+*line 164
+L22:
+*line 165
+move #1,R0
+clr R1
+move R4,R1
+asl R1,R0
+or R0,_seqdupd
+*line 166
+clr R0
+bra L9
+*line 167
+L23:
+*line 168
+*line 169
+*line 170
+clr R0
+move R4,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R8
+move.l #_trstate,R9
+tst 0(R8,R9.l)
+beq L10003
+clr R0
+bra L10005
+L10003:move #1,R0
+L10005:bra L9
+*line 171
+*line 172
+L24:
+*line 173
+*line 174
+*line 175
+move R6,(sp)
+jsr _evaltv
+move R0,-(sp)
+clr R0
+move R5,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_sregval,R0
+move.l R0,R8
+move (sp)+,(R8)
+*line 176
+move #1,R0
+clr R1
+move R5,R1
+asl R1,R0
+or R0,_seqdupd
+*line 177
+clr R0
+bra L9
+*line 178
+L25:
+*line 179
+*line 180
+*line 181
+*line 181
+clr R0
+move R6,R0
+and #-4096,R0
+beq L26
+*line 182
+*line 183
+clr R0
+move R5,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_sregval,R0
+move.l R0,R8
+move (R8),R3
+move R6,(sp)
+jsr _evaltv
+sub R0,R3
+*line 184
+*line 185
+*line 186
+tst R3
+bge L27
+*line 186
+clr R3
+*line 187
+L27:
+*line 188
+clr R0
+move R5,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_sregval,R0
+move.l R0,R8
+move R3,(R8)
+*line 189
+bra L28
+L26:
+*line 190
+*line 191
+*line 192
+move R6,(sp)
+jsr _evaltv
+move R0,R3
+clr R0
+move R5,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_sregval,R0
+move.l R0,R8
+move (R8),R0
+add R0,R3
+*line 193
+*line 194
+*line 195
+cmp #99,R3
+ble L29
+*line 195
+move #99,R3
+*line 196
+L29:
+*line 197
+clr R0
+move R5,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_sregval,R0
+move.l R0,R8
+move R3,(R8)
+*line 198
+L28:
+*line 199
+*line 200
+*line 201
+move #1,R0
+clr R1
+move R5,R1
+asl R1,R0
+or R0,_seqdupd
+*line 202
+clr R0
+bra L9
+*line 203
+L30:
+*line 204
+*line 205
+*line 206
+move R6,(sp)
+jsr _evaltv
+move R0,R4
+*line 207
+*line 208
+*line 209
+clr R0
+move R5,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_sregval,R0
+move.l R0,R8
+cmp (R8),R4
+bne L31
+*line 209
+clr R0
+bra L9
+*line 210
+bra L32
+L31:
+*line 211
+move #1,R0
+bra L9
+L32:
+*line 212
+L33:
+*line 213
+*line 214
+*line 215
+move R6,(sp)
+jsr _evaltv
+move R0,R4
+*line 216
+*line 217
+*line 218
+clr R0
+move R5,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_sregval,R0
+move.l R0,R8
+cmp (R8),R4
+bls L34
+*line 218
+clr R0
+bra L9
+*line 219
+bra L35
+L34:
+*line 220
+move #1,R0
+bra L9
+L35:
+*line 221
+L36:
+*line 222
+*line 223
+*line 224
+move R6,(sp)
+jsr _evaltv
+move R0,R4
+*line 225
+*line 226
+*line 227
+clr R0
+move R5,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_sregval,R0
+move.l R0,R8
+cmp (R8),R4
+bcc L37
+*line 227
+clr R0
+bra L9
+*line 228
+bra L38
+L37:
+*line 229
+move #1,R0
+bra L9
+L38:
+*line 230
+*line 231
+L39:
+*line 232
+*line 233
+*line 234
+*line 235
+clr R0
+move 8(R14),R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R8
+move.l #_seqstim,R9
+clr R0
+move 0(R8,R9.l),R0
+and #8191,R0
+move R0,R8
+move.l #_trgtab,R9
+tst.b 0(R8,R9.l)
+beq L40
+*line 235
+clr R0
+bra L9
+*line 236
+bra L41
+L40:
+*line 237
+move #1,R0
+bra L9
+L41:
+*line 238
+L42:
+*line 239
+*line 240
+*line 241
+clr R0
+move 8(R14),R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_seqline,R0
+move.l R0,R8
+move R6,(R8)
+*line 242
+clr R0
+move 8(R14),R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_seqtime,R0
+move.l R0,R8
+clr R1
+move R6,R1
+mulu #14,R1
+add.l #_seqtab,R1
+move.l R1,R9
+move (R9),(R8)
+*line 243
+clr R0
+move 8(R14),R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_seqflag,R0
+move.l R0,R8
+or #16384,(R8)
+*line 244
+*line 245
+move #1,R0
+clr R1
+move 8(R14),R1
+asl R1,R0
+or R0,_seqdupd
+*line 246
+move #-1,R0
+bra L9
+*line 247
+*line 248
+L43:
+*line 249
+L44:
+*line 250
+*line 251
+*line 252
+clr R0
+move 8(R14),R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_seqflag,R0
+move.l R0,R8
+clr (R8)
+*line 253
+clr R0
+move 8(R14),R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_seqtime,R0
+move.l R0,R8
+clr (R8)
+*line 254
+*line 255
+move #1,R0
+clr R1
+move 8(R14),R1
+asl R1,R0
+or R0,_seqdupd
+*line 256
+move #-1,R0
+bra L9
+*line 257
+bra L10
+L11:cmp #16,R0
+bhi L44
+asl #2,R0
+move R0,R8
+add.l #L45,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L45:.dc.l L12
+.dc.l L13
+.dc.l L14
+.dc.l L15
+.dc.l L16
+.dc.l L19
+.dc.l L20
+.dc.l L21
+.dc.l L23
+.dc.l L24
+.dc.l L30
+.dc.l L33
+.dc.l L36
+.dc.l L39
+.dc.l L42
+.dc.l L43
+.dc.l L25
+.text
+L10:L9:tst.l (sp)+
+movem.l (sp)+,R3-R7
+unlk R14
+rts
+.globl _sqexec
+.text
+_sqexec:
+~~sqexec:
+~seq=R7
+link R14,#0
+movem.l R2-R7/R13-R13,-(sp)
+~act=R6
+~dat=R5
+~line=R4
+~sp=R13
+~rc=R3
+*line 277
+move 8(R14),R7
+*line 277
+clr R0
+move R7,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_seqline,R0
+move.l R0,R8
+move (R8),R4
+*line 278
+clr R0
+move R4,R0
+mulu #14,R0
+move.l R0,R13
+add.l #_seqtab,R13
+*line 280
+move 2(R13),R6
+*line 281
+move 4(R13),R5
+*line 283
+move R5,(sp)
+move R6,-(sp)
+move R7,-(sp)
+jsr _dosqact
+addq.l #4,sp
+move R0,R3
+*line 291
+*line 292
+cmp #1,R3
+beq L47
+*line 293
+*line 294
+cmp #-1,R3
+beq L46
+*line 295
+*line 296
+move 6(R13),R6
+*line 297
+move 8(R13),R5
+*line 299
+move R5,(sp)
+move R6,-(sp)
+move R7,-(sp)
+jsr _dosqact
+addq.l #4,sp
+move R0,R3
+*line 307
+*line 308
+cmp #1,R3
+beq L48
+*line 309
+*line 310
+cmp #-1,R3
+beq L46
+*line 311
+L47:
+*line 312
+*line 313
+move 10(R13),R6
+*line 314
+move 12(R13),R5
+*line 316
+move R5,(sp)
+move R6,-(sp)
+move R7,-(sp)
+jsr _dosqact
+addq.l #4,sp
+move R0,R3
+*line 324
+*line 325
+cmp #-1,R3
+beq L46
+*line 326
+L48:
+*line 327
+*line 328
+*line 329
+*line 330
+clr R0
+move R7,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_seqline,R0
+move.l R0,R8
+add #1,(R8)
+move (R8),R0
+cmp #1000,R0
+blo L49
+*line 330
+clr R0
+move R7,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_seqline,R0
+move.l R0,R8
+clr (R8)
+*line 331
+L49:
+*line 332
+clr R0
+move R7,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_seqtime,R0
+move.l R0,R8
+clr R1
+move R7,R1
+lsl #1,R1
+swap R1
+clr R1
+swap R1
+add.l #_seqline,R1
+move.l R1,R9
+clr R1
+move (R9),R1
+mulu #14,R1
+add.l #_seqtab,R1
+move.l R1,R9
+move (R9),(R8)
+*line 333
+clr R0
+move R7,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_seqflag,R0
+move.l R0,R8
+or #16384,(R8)
+*line 341
+move #1,R0
+clr R1
+move R7,R1
+asl R1,R0
+or R0,_seqdupd
+L46:tst.l (sp)+
+movem.l (sp)+,R3-R7/R13-R13
+unlk R14
+rts
+.globl _seqproc
+.text
+_seqproc:
+~~seqproc:
+link R14,#-66
+movem.l R4-R7/R13-R13,-(sp)
+~oldsr=R7
+~seq=R6
+~dspn=R5
+~fp=R13
+~linbuf=-66
+*line 360
+*line 360
+tst 6+_timers
+bne L51
+*line 361
+*line 362
+clr R6
+bra L54
+L55:
+*line 363
+*line 364
+clr R0
+move R6,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R13
+add.l #_seqflag,R13
+*line 365
+*line 366
+*line 367
+clr R0
+move (R13),R0
+and #-16384,R0
+cmp #-16384,R0
+bne L56
+*line 368
+*line 369
+*line 369
+clr R0
+move R6,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R8
+move.l #_seqtime,R9
+tst 0(R8,R9.l)
+beq L57
+*line 370
+*line 371
+*line 372
+clr R0
+move R6,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l #_seqtime,R0
+move.l R0,R8
+sub #1,(R8)
+bne L58
+*line 372
+and #-16385,(R13)
+*line 373
+L58:bra L59
+L57:
+*line 374
+*line 375
+*line 376
+and #-16385,(R13)
+L59:
+*line 377
+*line 378
+L56:L53:
+*line 362
+add #1,R6
+L54:
+*line 362
+cmp #16,R6
+blo L55
+L52:
+*line 379
+*line 380
+*line 381
+move #9984,(sp)
+jsr _setsr
+move R0,R7
+*line 382
+move #10,6+_timers
+*line 383
+move R7,(sp)
+jsr _setsr
+*line 384
+*line 385
+L51:
+*line 386
+clr R6
+bra L62
+L63:
+*line 387
+*line 388
+clr R0
+move R6,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R8
+move.l #_seqflag,R9
+clr R0
+move 0(R8,R9.l),R0
+and #-16384,R0
+cmp #-32768,R0
+bne L64
+*line 388
+move R6,(sp)
+jsr _sqexec
+*line 389
+*line 390
+L64:L61:
+*line 386
+add #1,R6
+L62:
+*line 386
+cmp #16,R6
+blo L63
+L60:
+*line 391
+*line 391
+cmp #1,_ndisp
+beq L10006
+cmp #3,_ndisp
+bne L65
+L10006:tst _dsp_ok
+beq L65
+tst _seqdupd
+beq L65
+*line 392
+*line 397
+*line 398
+*line 398
+move #1,R0
+move _seqdspn,R1
+asl R1,R0
+and _seqdupd,R0
+beq L66
+*line 399
+*line 400
+move _seqdspn,R5
+*line 401
+*line 402
+*line 403
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L67
+*line 403
+clr (sp)
+jsr _vbank
+*line 404
+L67:
+*line 405
+*line 406
+*line 407
+*line 408
+move R5,R8
+add.l R8,R8
+move.l #_trstate,R9
+move 0(R8,R9.l),(sp)
+add #48,(sp)
+move R5,R8
+add.l R8,R8
+move.l #_sregval,R9
+move 0(R8,R9.l),-(sp)
+move R5,R8
+add.l R8,R8
+move.l #_seqline,R9
+move 0(R8,R9.l),-(sp)
+move.l #L68,-(sp)
+move.l R14,-(sp)
+add.l #-66,(sp)
+jsr _sprintf
+adda.l #12,sp
+*line 409
+*line 410
+*line 411
+move.l #_cg3,(sp)
+move #14,-(sp)
+move #14,-(sp)
+move.l R14,-(sp)
+add.l #-66,(sp)
+move #1,-(sp)
+move R5,-(sp)
+move #2,-(sp)
+move #1,-(sp)
+move #16,-(sp)
+move.l _obj10,-(sp)
+jsr _vvputsv
+adda.l #22,sp
+*line 412
+*line 413
+*line 414
+move R5,(sp)
+add #1,(sp)
+move.l #L69,-(sp)
+move.l R14,-(sp)
+add.l #-66,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 415
+*line 416
+*line 417
+*line 418
+*line 419
+move.l #_cg3,(sp)
+move #14,-(sp)
+move #14,-(sp)
+move.l R14,-(sp)
+add.l #-66,(sp)
+move #2,-(sp)
+move R5,-(sp)
+move #2,-(sp)
+move R5,R8
+add.l R8,R8
+move.l #_seqflag,R9
+clr R0
+move 0(R8,R9.l),R0
+and #-32768,R0
+beq L10007
+move #6,-(sp)
+bra L10009
+L10007:move #1,-(sp)
+L10009:move #16,-(sp)
+move.l _obj10,-(sp)
+jsr _vvputsv
+adda.l #22,sp
+*line 424
+*line 425
+move #1,R0
+move R5,R1
+asl R1,R0
+not R0
+and R0,_seqdupd
+*line 426
+*line 427
+L66:
+*line 428
+*line 429
+add #1,_seqdspn
+move _seqdspn,R0
+cmp #15,R0
+ble L70
+*line 429
+clr _seqdspn
+L70:
+*line 430
+L65:L50:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.data
+L68:.dc.b $20,$20,$20,$20,$25,$30,$33,$64,$20,$25,$30,$32,$64,$20,$25,$63,$20,$0
+L69:.dc.b $25,$30,$32,$64,$0
Index: alcyon/sqfield.s
===================================================================
--- alcyon/sqfield.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/sqfield.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,486 @@
+.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 _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _stmptr
+.globl _defptr
+.globl _patches
+.globl _defents
+.globl _seqtab
+.globl _seqflag
+.globl _seqline
+.globl _seqstim
+.globl _seqtime
+.globl _sregval
+.globl _trstate
+.globl _xy_up
+.globl _xy_dn
+.globl _premove
+.globl _pstmove
+.globl _curtype
+.globl _astat
+.globl _cmfirst
+.globl _cmtype
+.globl _curhold
+.globl _curslin
+.globl _cvtime
+.globl _cvwait
+.globl _ncvwait
+.globl _sqdeflg
+.globl _stccol
+.globl _ss_ptsw
+.globl _ss_sqsw
+.globl _syrate
+.globl _tvcwval
+.globl _vcwval
+.globl _crate1
+.globl _csbp
+.globl _sqboxes
+.globl _seqbuf
+.globl _seqtab
+.globl _sqdebuf
+.globl _sq_flds
+.data
+_sq_flds:
+*line 72
+.dc.l _stdctp5
+*line 73
+.dc.l _nokey
+*line 74
+.dc.l _postcm
+*line 75
+.dc.l _cxkstd
+*line 76
+.dc.l _cykstd
+*line 77
+.dc.l _smxupd
+*line 78
+.dc.l _sqyupd
+*line 79
+.dc.l _stopsm
+*line 80
+.dc.l _nokey
+*line 81
+.dc.l _sqxkey
+*line 82
+.dc.l _sqekey
+*line 83
+.dc.l _sqmkey
+*line 84
+.dc.l _sqdkey
+*line 85
+.dc.l _nokey
+.dc.l $0
+*line 87
+.dc.l _sqboxes
+*line 88
+.dc.l _crate1
+*line 89
+.dc.l _crate1
+.dc.w $4
+.dc.w $10
+.dc.w $7E
+.globl _sqmkey
+.text
+_sqmkey:
+~~sqmkey:
+link R14,#0
+movem.l R6-R7,-(sp)
+~nc=R7
+*line 108
+*line 108
+tst _astat
+beq L2
+*line 109
+*line 110
+*line 110
+cmp #48,_stccol
+bne L3
+*line 111
+*line 112
+*line 112
+tst _ss_ptsw
+bne L4
+*line 113
+*line 114
+move.l _xy_dn,R8
+jsr (R8)
+*line 115
+*line 116
+move.l _premove,R8
+jsr (R8)
+*line 117
+*line 118
+move.l _curtype,R8
+jsr (R8)
+move R0,R7
+*line 119
+*line 120
+move _syrate,_cvtime
+*line 121
+move _curhold,_ncvwait
+*line 122
+*line 123
+move #-1,_ss_sqsw
+*line 124
+move R7,_cmtype
+*line 125
+move #1,_cvwait
+*line 126
+*line 127
+L4:
+*line 128
+bra L5
+L3:
+*line 129
+jsr _stdmkey
+L5:
+*line 130
+bra L6
+L2:
+*line 131
+*line 132
+*line 133
+*line 133
+cmp #48,_stccol
+bne L7
+*line 134
+*line 135
+clr _ss_sqsw
+*line 136
+move #1,_cvwait
+*line 137
+move _cvtime,_ncvwait
+*line 138
+move #1,_cmfirst
+*line 139
+*line 140
+*line 141
+tst _ss_ptsw
+bne L8
+*line 141
+move.l _xy_up,R8
+jsr (R8)
+*line 142
+L8:
+*line 143
+move.l _pstmove,R8
+jsr (R8)
+*line 144
+*line 145
+bra L9
+L7:
+*line 146
+jsr _stdmkey
+L9:L6:L1:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _sqekey
+.text
+_sqekey:
+~~sqekey:
+link R14,#0
+movem.l R6-R7,-(sp)
+~nc=R7
+*line 163
+*line 163
+tst _astat
+beq L11
+*line 164
+*line 165
+*line 165
+cmp #48,_stccol
+bne L12
+*line 166
+*line 167
+*line 167
+tst _ss_ptsw
+bne L13
+*line 168
+*line 169
+move.l _xy_dn,R8
+jsr (R8)
+*line 170
+*line 171
+move.l _premove,R8
+jsr (R8)
+*line 172
+*line 173
+move.l _curtype,R8
+jsr (R8)
+move R0,R7
+*line 174
+*line 175
+move _syrate,_cvtime
+*line 176
+move _curhold,_ncvwait
+*line 177
+*line 178
+move #1,_ss_sqsw
+*line 179
+move R7,_cmtype
+*line 180
+move #1,_cvwait
+*line 181
+*line 182
+L13:
+*line 183
+bra L14
+L12:
+*line 184
+jsr _select
+L14:
+*line 185
+bra L15
+L11:
+*line 186
+*line 187
+*line 188
+*line 188
+cmp #48,_stccol
+bne L16
+*line 189
+*line 190
+clr _ss_sqsw
+*line 191
+move #1,_cvwait
+*line 192
+move _cvtime,_ncvwait
+*line 193
+move #1,_cmfirst
+*line 194
+*line 195
+*line 196
+tst _ss_ptsw
+bne L17
+*line 196
+move.l _xy_up,R8
+jsr (R8)
+*line 197
+L17:
+*line 198
+move.l _pstmove,R8
+jsr (R8)
+*line 199
+*line 200
+bra L18
+L16:
+*line 201
+jsr _select
+L18:L15:L10:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _sqxkey
+.text
+_sqxkey:
+~~sqxkey:
+link R14,#-4
+*line 216
+*line 217
+tst _astat
+beq L19
+*line 218
+*line 219
+*line 219
+cmp #2,_stccol
+blt L20
+cmp #4,_stccol
+bgt L20
+*line 220
+*line 221
+move #7,(sp)
+clr -(sp)
+move.l #_seqbuf,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 222
+move #7,(sp)
+clr -(sp)
+move _curslin,R0
+muls #14,R0
+add.l #_seqtab,R0
+move.l R0,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 223
+move _curslin,(sp)
+move.l #_sqdebuf,-(sp)
+jsr _dsqlin
+addq.l #4,sp
+*line 224
+move #1,_sqdeflg
+*line 225
+jsr _dcursq
+*line 226
+bra L21
+L20:
+*line 227
+*line 227
+cmp #12,_stccol
+blt L22
+cmp #22,_stccol
+bgt L22
+*line 228
+*line 229
+move _curslin,R0
+muls #14,R0
+add.l #_seqtab,R0
+move.l R0,R8
+clr 2(R8)
+*line 230
+move _curslin,R0
+muls #14,R0
+add.l #_seqtab,R0
+move.l R0,R8
+clr 4(R8)
+*line 231
+move #7,(sp)
+move _curslin,R0
+muls #14,R0
+add.l #_seqtab,R0
+move.l R0,-(sp)
+move.l #_seqbuf,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 232
+move _curslin,(sp)
+move.l #_sqdebuf,-(sp)
+jsr _dsqlin
+addq.l #4,sp
+*line 233
+move #1,_sqdeflg
+*line 234
+jsr _dcursq
+*line 235
+bra L23
+L22:
+*line 236
+*line 236
+cmp #24,_stccol
+blt L24
+cmp #34,_stccol
+bgt L24
+*line 237
+*line 238
+move _curslin,R0
+muls #14,R0
+add.l #_seqtab,R0
+move.l R0,R8
+clr 6(R8)
+*line 239
+move _curslin,R0
+muls #14,R0
+add.l #_seqtab,R0
+move.l R0,R8
+clr 8(R8)
+*line 240
+move #7,(sp)
+move _curslin,R0
+muls #14,R0
+add.l #_seqtab,R0
+move.l R0,-(sp)
+move.l #_seqbuf,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 241
+move _curslin,(sp)
+move.l #_sqdebuf,-(sp)
+jsr _dsqlin
+addq.l #4,sp
+*line 242
+move #1,_sqdeflg
+*line 243
+jsr _dcursq
+*line 244
+bra L25
+L24:
+*line 245
+*line 245
+cmp #36,_stccol
+blt L26
+cmp #46,_stccol
+bgt L26
+*line 246
+*line 247
+move _curslin,R0
+muls #14,R0
+add.l #_seqtab,R0
+move.l R0,R8
+clr 10(R8)
+*line 248
+move _curslin,R0
+muls #14,R0
+add.l #_seqtab,R0
+move.l R0,R8
+clr 12(R8)
+*line 249
+move #7,(sp)
+move _curslin,R0
+muls #14,R0
+add.l #_seqtab,R0
+move.l R0,-(sp)
+move.l #_seqbuf,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 250
+move _curslin,(sp)
+move.l #_sqdebuf,-(sp)
+jsr _dsqlin
+addq.l #4,sp
+*line 251
+move #1,_sqdeflg
+*line 252
+jsr _dcursq
+*line 253
+L26:L25:L23:L21:L19:unlk R14
+rts
+.globl _sqfield
+.text
+_sqfield:
+~~sqfield:
+link R14,#-4
+*line 273
+move.l #_sq_flds,(sp)
+jsr _curset
+L27:unlk R14
+rts
+.data
Index: alcyon/sqread.s
===================================================================
--- alcyon/sqread.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/sqread.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,237 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl _stmptr
+.globl _defptr
+.globl _patches
+.globl _defents
+.globl _seqtab
+.globl _seqflag
+.globl _seqline
+.globl _seqstim
+.globl _seqtime
+.globl _sregval
+.globl _trstate
+.globl _filecat
+.globl _errno
+.globl _sqioerr
+.text
+_sqioerr:
+~~sqioerr:
+link R14,#-44
+~erms=-40
+*line 30
+jsr _clrlsel
+*line 32
+move _errno,(sp)
+move.l #L2,-(sp)
+move.l R14,-(sp)
+add.l #-40,(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 34
+*line 35
+move #9,(sp)
+move #14,-(sp)
+move.l R14,-(sp)
+add.l #-40,(sp)
+move.l #L4,-(sp)
+move.l #L3,-(sp)
+jsr _ldermsg
+adda.l #14,sp
+L1:unlk R14
+rts
+.globl _sqread
+.text
+_sqread:
+~~sqread:
+~fp=R13
+link R14,#-4
+movem.l R7-R7/R13-R13,-(sp)
+~cb=-2
+~seq=-4
+*line 54
+move.l 8(R14),R13
+*line 55
+move #9,(sp)
+move #12,-(sp)
+move.l #L7,-(sp)
+clr.l -(sp)
+move.l #L6,-(sp)
+jsr _ldwmsg
+adda.l #14,sp
+L10:
+*line 57
+*line 58
+*line 59
+*line 59
+move.l #$1,(sp)
+move.l R14,-(sp)
+sub.l #2,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L11
+*line 60
+*line 61
+jsr _sqioerr
+*line 62
+move #-1,R0
+bra L5
+*line 63
+*line 64
+L11:
+*line 65
+*line 66
+tst.b -2(R14)
+bne L12
+*line 66
+clr R0
+bra L5
+*line 67
+L12:
+*line 68
+*line 68
+move.l #$2,(sp)
+move.l R14,-(sp)
+sub.l #4,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L13
+*line 69
+*line 70
+jsr _sqioerr
+*line 71
+move #-1,R0
+bra L5
+*line 72
+*line 73
+L13:
+*line 74
+*line 74
+btst #3,-2(R14)
+beq L14
+*line 75
+*line 76
+*line 76
+move.l #$2,(sp)
+move -4(R14),R0
+muls #14,R0
+add.l #_seqtab,R0
+move.l R0,-(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L15
+*line 77
+*line 78
+jsr _sqioerr
+*line 79
+move #-1,R0
+bra L5
+*line 80
+L15:
+*line 81
+*line 82
+*line 83
+L14:
+*line 84
+*line 84
+btst #2,-2(R14)
+beq L16
+*line 85
+*line 86
+*line 86
+move.l #$4,(sp)
+move -4(R14),R0
+muls #14,R0
+add.l #_seqtab,R0
+move.l R0,-(sp)
+add.l #2,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L17
+*line 87
+*line 88
+jsr _sqioerr
+*line 89
+move #-1,R0
+bra L5
+*line 90
+L17:
+*line 91
+*line 92
+L16:
+*line 93
+*line 93
+btst #1,-2(R14)
+beq L18
+*line 94
+*line 95
+*line 95
+move.l #$4,(sp)
+move -4(R14),R0
+muls #14,R0
+add.l #_seqtab,R0
+move.l R0,-(sp)
+add.l #6,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L19
+*line 96
+*line 97
+jsr _sqioerr
+*line 98
+move #-1,R0
+bra L5
+*line 99
+L19:
+*line 100
+*line 101
+L18:
+*line 102
+*line 102
+btst #0,-2(R14)
+beq L20
+*line 103
+*line 104
+*line 104
+move.l #$4,(sp)
+move -4(R14),R0
+muls #14,R0
+add.l #_seqtab,R0
+move.l R0,-(sp)
+add.l #10,(sp)
+move.l R13,-(sp)
+jsr _rd_ec
+addq.l #8,sp
+tst R0
+beq L21
+*line 105
+*line 106
+jsr _sqioerr
+*line 107
+move #-1,R0
+bra L5
+*line 108
+L21:
+*line 109
+L20:L9:bra L10
+L8:L5:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.data
+L2:.dc.b $20,$20,$65,$72,$72,$6E,$6F,$20,$3D,$20,$25,$64,$0
+L3:.dc.b $43,$6F,$75,$6C,$64,$6E,$27,$74,$20,$72,$65,$61,$64,$0
+L4:.dc.b $20,$74,$68,$65,$20,$73,$65,$71,$75,$65,$6E,$63,$65,$20,$74,$61,$62,$6C,$65,$0
+L6:.dc.b $20,$42,$75,$73,$79,$20,$2D,$2D,$20,$70,$6C,$65,$61,$73,$65,$20,$73,$74,$61,$6E,$64,$20,$62,$79,$0
+L7:.dc.b $20,$20,$52,$65,$61,$64,$69,$6E,$67,$20,$73,$65,$71,$75,$65,$6E,$63,$65,$73,$0
Index: alcyon/sqscan.s
===================================================================
--- alcyon/sqscan.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/sqscan.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,3330 @@
+.globl _QQsw
+.globl _QQanch
+.globl _QQin
+.globl _QQip
+.globl _QQop
+.globl _QQnum
+.globl _QQlnum
+.globl _QQchr
+.globl _QQdig
+.globl _QQstr
+.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 _chkstop
+.data
+_chkstop:
+.dc.w $1
+.globl _notenum
+.globl _notepit
+.globl _curgrp
+.globl _thescore
+.globl _verbose
+.globl _testing
+.globl _sharp
+.globl _endflg
+.globl _curtime
+.globl _noteon
+.globl _noteoff
+.globl _noteval
+.globl _noteper
+.globl _nrest
+.globl _dvwork
+.globl _nlist
+.data
+_nlist:
+*line 27
+.dc.l L1
+*line 27
+.dc.l L2
+*line 27
+.dc.l L3
+*line 27
+.dc.l L4
+*line 27
+.dc.l L5
+*line 27
+.dc.l L6
+*line 27
+.dc.l L7
+.dc.l $0
+.globl _notetab
+.data
+_notetab:
+.dc.w $0
+.dc.w $2
+.dc.w $3
+.dc.w $5
+.dc.w $7
+.dc.w $8
+.dc.w $A
+.globl _octab
+.data
+_octab:
+.dc.w $15
+.dc.w $21
+.dc.w $2D
+.dc.w $39
+.dc.w $45
+.dc.w $51
+.dc.w $5D
+.dc.w $69
+.globl _nospace
+.text
+_nospace:
+~~nospace:
+~et=8
+link R14,#-4
+*line 46
+*line 46
+tst _chkstop
+beq L9
+*line 47
+*line 48
+move.l 8(R14),(sp)
+move.l #L10,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 49
+jsr _xtrap15
+*line 50
+*line 51
+jsr _SEsnap
+*line 52
+jsr _waitcr
+*line 53
+*line 54
+L9:L8:unlk R14
+rts
+.globl _Pcheck
+.text
+_Pcheck:
+~~Pcheck:
+~ptr=8
+~msg=12
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+~cval=R13
+*line 75
+*line 75
+tst.l 8(R14)
+bne L12
+*line 76
+*line 77
+move.l 12(R14),(sp)
+move.l 8(R14),-(sp)
+move.l #L13,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 78
+*line 79
+*line 80
+*line 81
+tst _chkstop
+beq L14
+*line 81
+jsr _xtrap15
+*line 82
+L14:
+*line 83
+move #-1,R0
+bra L11
+*line 84
+*line 85
+L12:
+*line 86
+move.l #_spool,R13
+*line 88
+*line 88
+cmp.l 8(R14),R13
+bls L15
+*line 89
+*line 90
+move.l 12(R14),(sp)
+move.l 8(R14),-(sp)
+move.l #L16,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 91
+*line 92
+*line 93
+tst _chkstop
+beq L17
+*line 93
+jsr _xtrap15
+*line 94
+L17:
+*line 95
+move #-1,R0
+bra L11
+*line 96
+*line 97
+L15:
+*line 98
+move.l #131068+_spool,R13
+*line 100
+*line 100
+cmp.l 8(R14),R13
+bcc L18
+*line 101
+*line 102
+move.l 12(R14),(sp)
+move.l 8(R14),-(sp)
+move.l #L19,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 103
+*line 104
+*line 105
+tst _chkstop
+beq L20
+*line 105
+jsr _xtrap15
+*line 106
+L20:
+*line 107
+move #-1,R0
+bra L11
+*line 108
+*line 109
+L18:
+*line 110
+clr R0
+bra L11
+L11:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _insnevt
+.text
+_insnevt:
+~~insnevt:
+~nsp=R13
+~nt=12
+~grp=14
+~note=16
+~vel=18
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+*line 127
+move.l 8(R14),R13
+*line 127
+move.l _t_cur,(R13)
+*line 128
+move 12(R14),R0
+move.b R0,5(R13)
+*line 129
+move 16(R14),R0
+move.b R0,6(R13)
+*line 130
+move 14(R14),R0
+move.b R0,7(R13)
+*line 131
+move 18(R14),16(R13)
+*line 133
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R13,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),R0
+bra L21
+L21:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _Qevent
+.text
+_Qevent:
+~~Qevent:
+link R14,#-4
+movem.l R2-R7/R11-R13,-(sp)
+~aux1=R7
+~aux2=R6
+~aux3=R5
+~aux4=R4
+~aux5=R3
+~chptr=R13
+~tsp1=R12
+~tsp2=R11
+~tsp3=-4
+*line 153
+*line 154
+move #33,(sp)
+jsr _CMchr
+tst R0
+bne L23
+*line 154
+clr R0
+move R0,_QQsw
+bra L22
+*line 155
+L23:
+*line 156
+*line 156
+move.l #L24,(sp)
+jsr _CMustr
+tst R0
+beq L25
+*line 157
+*line 158
+*line 159
+move #61,(sp)
+jsr _CMchr
+tst R0
+bne L26
+*line 159
+clr R0
+move R0,_QQsw
+bra L22
+*line 160
+L26:
+*line 161
+*line 162
+jsr _CMlong
+tst R0
+bne L27
+*line 162
+clr R0
+move R0,_QQsw
+bra L22
+*line 163
+L27:
+*line 164
+move.l _QQnum,R0
+move R0,_curgrp
+*line 165
+*line 166
+*line 167
+tst _verbose
+beq L28
+*line 167
+move _curgrp,(sp)
+move.l #L29,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 168
+L28:
+*line 169
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 170
+*line 171
+*line 172
+*line 173
+L25:
+*line 174
+*line 174
+move.l #L30,(sp)
+jsr _CMustr
+tst R0
+beq L31
+*line 175
+*line 176
+*line 177
+move #61,(sp)
+jsr _CMchr
+tst R0
+bne L32
+*line 177
+clr R0
+move R0,_QQsw
+bra L22
+*line 178
+L32:
+*line 179
+*line 179
+move.l #L33,(sp)
+jsr _CMustr
+tst R0
+beq L34
+*line 180
+*line 181
+*line 181
+move #6,(sp)
+jsr _e_alc
+move.l R0,R12
+move.l R12,R0
+bne L35
+*line 182
+*line 183
+move.l #L36,(sp)
+jsr _nospace
+*line 184
+clr R0
+move R0,_QQsw
+bra L22
+*line 185
+*line 186
+L35:
+*line 187
+move.l _t_cur,(R12)
+*line 188
+move.b #11,5(R12)
+*line 189
+move _curgrp,R0
+move.b R0,6(R12)
+*line 190
+move.b #1,7(R12)
+*line 191
+*line 192
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 193
+move #1,(sp)
+move.l R12,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 194
+*line 195
+*line 196
+tst _verbose
+beq L37
+*line 197
+move _curgrp,(sp)
+move.l _t_cur,-(sp)
+move.l #L38,-(sp)
+jsr _printf
+addq.l #8,sp
+L37:
+*line 198
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 199
+bra L39
+L34:
+*line 200
+*line 200
+move.l #L40,(sp)
+jsr _CMustr
+tst R0
+beq L41
+*line 201
+*line 202
+*line 202
+move #6,(sp)
+jsr _e_alc
+move.l R0,R12
+move.l R12,R0
+bne L42
+*line 203
+*line 204
+move.l #L43,(sp)
+jsr _nospace
+*line 205
+clr R0
+move R0,_QQsw
+bra L22
+*line 206
+*line 207
+L42:
+*line 208
+move.l _t_cur,(R12)
+*line 209
+move.b #11,5(R12)
+*line 210
+move _curgrp,R0
+move.b R0,6(R12)
+*line 211
+clr.b 7(R12)
+*line 212
+*line 213
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 214
+move #1,(sp)
+move.l R12,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 215
+*line 216
+*line 217
+tst _verbose
+beq L44
+*line 218
+move _curgrp,(sp)
+move.l _t_cur,-(sp)
+move.l #L45,-(sp)
+jsr _printf
+addq.l #8,sp
+L44:
+*line 219
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 220
+*line 221
+bra L46
+L41:
+*line 222
+clr R0
+move R0,_QQsw
+bra L22
+L46:L39:
+*line 223
+*line 224
+*line 225
+*line 226
+L31:
+*line 227
+*line 227
+move.l #L47,(sp)
+jsr _CMustr
+tst R0
+beq L48
+*line 228
+*line 229
+*line 230
+move #61,(sp)
+jsr _CMchr
+tst R0
+bne L49
+*line 230
+clr R0
+move R0,_QQsw
+bra L22
+*line 231
+L49:
+*line 232
+*line 233
+jsr _CMlong
+tst R0
+bne L50
+*line 233
+clr R0
+move R0,_QQsw
+bra L22
+*line 234
+L50:
+*line 235
+move.l _QQnum,R0
+move R0,R7
+*line 236
+*line 237
+*line 237
+move #6,(sp)
+jsr _e_alc
+move.l R0,R12
+move.l R12,R0
+bne L51
+*line 238
+*line 239
+move.l #L52,(sp)
+jsr _nospace
+*line 240
+clr R0
+move R0,_QQsw
+bra L22
+*line 241
+*line 242
+L51:
+*line 243
+move.l _t_cur,(R12)
+*line 244
+move.b #9,5(R12)
+*line 245
+move.b R7,6(R12)
+*line 246
+*line 247
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 248
+move #7,(sp)
+move.l R12,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 249
+*line 250
+*line 251
+tst _verbose
+beq L53
+*line 251
+move R7,(sp)
+move.l _t_cur,-(sp)
+move.l #L54,-(sp)
+jsr _printf
+addq.l #8,sp
+L53:
+*line 252
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 253
+*line 254
+*line 255
+L48:
+*line 256
+*line 256
+move.l #L55,(sp)
+jsr _CMustr
+tst R0
+beq L56
+*line 257
+*line 258
+*line 259
+move #61,(sp)
+jsr _CMchr
+tst R0
+bne L57
+*line 259
+clr R0
+move R0,_QQsw
+bra L22
+*line 260
+L57:
+*line 261
+*line 262
+jsr _CMlong
+tst R0
+bne L58
+*line 262
+clr R0
+move R0,_QQsw
+bra L22
+*line 263
+L58:
+*line 264
+move.l _QQnum,R0
+move R0,R7
+*line 265
+*line 266
+*line 266
+move #6,(sp)
+jsr _e_alc
+move.l R0,R12
+move.l R12,R0
+bne L59
+*line 267
+*line 268
+move.l #L60,(sp)
+jsr _nospace
+*line 269
+clr R0
+move R0,_QQsw
+bra L22
+*line 270
+*line 271
+L59:
+*line 272
+move.l _t_cur,(R12)
+*line 273
+move.b #4,5(R12)
+*line 274
+move _curgrp,R0
+move.b R0,6(R12)
+*line 275
+move.b R7,7(R12)
+*line 276
+*line 277
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 278
+clr (sp)
+move.l R12,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 279
+*line 280
+*line 281
+tst _verbose
+beq L61
+*line 282
+move R7,(sp)
+move _curgrp,-(sp)
+move.l _t_cur,-(sp)
+move.l #L62,-(sp)
+jsr _printf
+adda.l #10,sp
+L61:
+*line 283
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 284
+*line 285
+*line 286
+L56:
+*line 287
+*line 287
+move.l #L63,(sp)
+jsr _CMustr
+tst R0
+beq L64
+*line 288
+*line 289
+*line 290
+move #61,(sp)
+jsr _CMchr
+tst R0
+bne L65
+*line 290
+clr R0
+move R0,_QQsw
+bra L22
+*line 291
+L65:
+*line 292
+*line 293
+jsr _CMlong
+tst R0
+bne L66
+*line 293
+clr R0
+move R0,_QQsw
+bra L22
+*line 294
+L66:
+*line 295
+move.l _QQnum,R0
+move R0,R7
+*line 296
+*line 297
+*line 297
+move #6,(sp)
+jsr _e_alc
+move.l R0,R12
+move.l R12,R0
+bne L67
+*line 298
+*line 299
+move.l #L68,(sp)
+jsr _nospace
+*line 300
+clr R0
+move R0,_QQsw
+bra L22
+*line 301
+*line 302
+L67:
+*line 303
+move.l _t_cur,(R12)
+*line 304
+move.b #10,5(R12)
+*line 305
+move.b R7,6(R12)
+*line 306
+*line 307
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 308
+move #8,(sp)
+move.l R12,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 309
+*line 310
+*line 311
+tst _verbose
+beq L69
+*line 311
+move R7,(sp)
+move.l _t_cur,-(sp)
+move.l #L70,-(sp)
+jsr _printf
+addq.l #8,sp
+L69:
+*line 312
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 313
+*line 314
+*line 315
+L64:
+*line 316
+*line 316
+move.l #L71,(sp)
+jsr _CMustr
+tst R0
+beq L72
+*line 317
+*line 318
+*line 319
+move #61,(sp)
+jsr _CMchr
+tst R0
+bne L73
+*line 319
+clr R0
+move R0,_QQsw
+bra L22
+*line 320
+L73:
+*line 321
+*line 321
+move #43,(sp)
+jsr _CMchr
+tst R0
+beq L74
+*line 322
+bra L75
+L74:
+*line 323
+*line 323
+move #45,(sp)
+jsr _CMchr
+tst R0
+beq L76
+*line 324
+*line 325
+bra L77
+L76:
+*line 326
+clr R0
+move R0,_QQsw
+bra L22
+L77:L75:
+*line 327
+*line 328
+*line 329
+jsr _CMlong
+tst R0
+bne L78
+*line 329
+clr R0
+move R0,_QQsw
+bra L22
+*line 330
+L78:
+*line 331
+move.l _QQnum,R0
+move R0,R7
+*line 332
+*line 333
+*line 334
+cmp.b #45,_QQchr
+bne L79
+*line 334
+move R7,R0
+neg R0
+move R0,R7
+*line 335
+L79:
+*line 336
+*line 336
+move #6,(sp)
+jsr _e_alc
+move.l R0,R12
+move.l R12,R0
+bne L80
+*line 337
+*line 338
+move.l #L81,(sp)
+jsr _nospace
+*line 339
+clr R0
+move R0,_QQsw
+bra L22
+*line 340
+*line 341
+L80:
+*line 342
+move.l _t_cur,(R12)
+*line 343
+move.b #17,5(R12)
+*line 344
+move _curgrp,R0
+move.b R0,6(R12)
+*line 345
+move R7,R8
+move.l R8,24(R12)
+*line 346
+*line 347
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 348
+move #5,(sp)
+move.l R12,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 349
+*line 350
+*line 351
+tst _verbose
+beq L82
+*line 352
+move R7,(sp)
+move.l _t_cur,-(sp)
+move.l #L83,-(sp)
+jsr _printf
+addq.l #8,sp
+L82:
+*line 353
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 354
+*line 355
+*line 356
+L72:
+*line 357
+*line 357
+move.l #L84,(sp)
+jsr _CMustr
+tst R0
+beq L85
+*line 358
+*line 359
+*line 360
+move #61,(sp)
+jsr _CMchr
+tst R0
+bne L86
+*line 360
+clr R0
+move R0,_QQsw
+bra L22
+*line 361
+L86:
+*line 362
+*line 363
+jsr _CMlong
+tst R0
+bne L87
+*line 363
+clr R0
+move R0,_QQsw
+bra L22
+*line 364
+L87:
+*line 365
+move.l _QQnum,R0
+move R0,R7
+*line 366
+*line 367
+*line 367
+move #6,(sp)
+jsr _e_alc
+move.l R0,R12
+move.l R12,R0
+bne L88
+*line 368
+*line 369
+move.l #L89,(sp)
+jsr _nospace
+*line 370
+clr R0
+move R0,_QQsw
+bra L22
+*line 371
+*line 372
+L88:
+*line 373
+move.l _t_cur,(R12)
+*line 374
+move.b #13,5(R12)
+*line 375
+move _curgrp,R0
+move.b R0,6(R12)
+*line 376
+move.b R7,7(R12)
+*line 377
+*line 378
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 379
+move #3,(sp)
+move.l R12,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 380
+*line 381
+*line 382
+tst _verbose
+beq L90
+*line 382
+move R7,(sp)
+move.l _t_cur,-(sp)
+move.l #L91,-(sp)
+jsr _printf
+addq.l #8,sp
+L90:
+*line 383
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 384
+*line 385
+*line 386
+L85:
+*line 387
+*line 387
+move.l #L92,(sp)
+jsr _CMustr
+tst R0
+beq L93
+*line 388
+*line 389
+*line 390
+move #61,(sp)
+jsr _CMchr
+tst R0
+bne L94
+*line 390
+clr R0
+move R0,_QQsw
+bra L22
+*line 391
+L94:
+*line 392
+*line 393
+jsr _CMlong
+tst R0
+bne L95
+*line 393
+clr R0
+move R0,_QQsw
+bra L22
+*line 394
+L95:
+*line 395
+move.l _QQnum,R0
+move R0,R7
+*line 396
+*line 397
+*line 397
+move #6,(sp)
+jsr _e_alc
+move.l R0,R12
+move.l R12,R0
+bne L96
+*line 398
+*line 399
+move.l #L97,(sp)
+jsr _nospace
+*line 400
+clr R0
+move R0,_QQsw
+bra L22
+*line 401
+*line 402
+L96:
+*line 403
+move.l _t_cur,(R12)
+*line 404
+move.b #12,5(R12)
+*line 405
+move _curgrp,R0
+move.b R0,6(R12)
+*line 406
+move.b R7,7(R12)
+*line 407
+*line 408
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 409
+move #2,(sp)
+move.l R12,-(sp)
+jsr _eh_ins
+addq.l #4,sp
+*line 410
+*line 411
+*line 412
+tst _verbose
+beq L98
+*line 412
+move R7,(sp)
+move.l _t_cur,-(sp)
+move.l #L99,-(sp)
+jsr _printf
+addq.l #8,sp
+L98:
+*line 413
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 414
+*line 415
+*line 416
+L93:
+*line 417
+*line 417
+move.l #L100,(sp)
+jsr _CMustr
+tst R0
+beq L101
+*line 418
+*line 419
+*line 420
+jsr _CMlong
+tst R0
+bne L102
+*line 420
+clr R0
+move R0,_QQsw
+bra L22
+*line 421
+L102:
+*line 422
+move.l #$30,-(sp)
+move.l _QQnum,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,_curtime
+*line 423
+*line 424
+*line 425
+move #64,(sp)
+jsr _CMchr
+tst R0
+bne L103
+*line 425
+clr R0
+move R0,_QQsw
+bra L22
+*line 426
+L103:
+*line 427
+*line 428
+jsr _CMlong
+tst R0
+bne L104
+*line 428
+clr R0
+move R0,_QQsw
+bra L22
+*line 429
+L104:
+*line 430
+move.l _QQnum,R0
+add.l R0,_curtime
+move.l _curtime,(sp)
+jsr _sc_goto
+*line 431
+*line 432
+*line 433
+tst _verbose
+beq L105
+*line 433
+move.l _t_cur,(sp)
+move.l #L106,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 434
+L105:
+*line 435
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 436
+*line 437
+*line 438
+*line 439
+*line 440
+L101:
+*line 441
+*line 441
+move.l #L107,(sp)
+jsr _CMustr
+tst R0
+beq L108
+*line 442
+*line 443
+*line 444
+move #61,(sp)
+jsr _CMchr
+tst R0
+bne L109
+*line 444
+clr R0
+move R0,_QQsw
+bra L22
+*line 445
+L109:
+*line 446
+*line 447
+jsr _CMlong
+tst R0
+bne L110
+*line 447
+clr R0
+move R0,_QQsw
+bra L22
+*line 448
+L110:
+*line 449
+move.l #$30,-(sp)
+move.l _QQnum,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,_curtime
+*line 450
+*line 451
+*line 452
+move #64,(sp)
+jsr _CMchr
+tst R0
+bne L111
+*line 452
+clr R0
+move R0,_QQsw
+bra L22
+*line 453
+L111:
+*line 454
+*line 455
+jsr _CMlong
+tst R0
+bne L112
+*line 455
+clr R0
+move R0,_QQsw
+bra L22
+*line 456
+L112:
+*line 457
+move.l _QQnum,R0
+add.l R0,_curtime
+move.l _curtime,_t_cur
+*line 458
+clr (sp)
+move.l _t_cur,-(sp)
+jsr _frfind
+addq.l #4,sp
+move.l R0,_p_cur
+*line 459
+*line 460
+*line 461
+tst _verbose
+beq L113
+*line 461
+move.l _t_cur,(sp)
+move.l #L114,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 462
+L113:
+*line 463
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 464
+*line 465
+*line 466
+L108:
+*line 467
+*line 467
+move.l #L115,(sp)
+jsr _CMustr
+tst R0
+beq L116
+*line 468
+*line 469
+*line 470
+move #61,(sp)
+jsr _CMchr
+tst R0
+bne L117
+*line 470
+clr R0
+move R0,_QQsw
+bra L22
+*line 471
+L117:
+*line 472
+*line 473
+jsr _CMlong
+tst R0
+bne L118
+*line 473
+clr R0
+move R0,_QQsw
+bra L22
+*line 474
+L118:
+*line 475
+move.l #$30,-(sp)
+move.l _QQnum,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,_t_cur
+*line 476
+clr (sp)
+move.l _t_cur,-(sp)
+jsr _frfind
+addq.l #4,sp
+move.l R0,_p_cur
+*line 477
+*line 478
+*line 479
+tst _verbose
+beq L119
+*line 479
+move.l _t_cur,(sp)
+move.l #L120,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 480
+L119:
+*line 481
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 482
+*line 483
+*line 484
+L116:
+*line 485
+*line 485
+move.l #L121,(sp)
+jsr _CMustr
+tst R0
+beq L122
+*line 486
+*line 487
+*line 488
+move #61,(sp)
+jsr _CMchr
+tst R0
+bne L123
+*line 488
+clr R0
+move R0,_QQsw
+bra L22
+*line 489
+L123:
+*line 490
+*line 491
+jsr _CMlong
+tst R0
+bne L124
+*line 491
+clr R0
+move R0,_QQsw
+bra L22
+*line 492
+L124:
+*line 493
+move.l _QQnum,_t_cur
+*line 494
+clr (sp)
+move.l _t_cur,-(sp)
+jsr _frfind
+addq.l #4,sp
+move.l R0,_p_cur
+*line 495
+*line 496
+*line 497
+tst _verbose
+beq L125
+*line 497
+move.l _t_cur,(sp)
+move.l #L126,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 498
+L125:
+*line 499
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 500
+*line 501
+*line 502
+L122:
+*line 503
+*line 503
+move.l #L127,(sp)
+jsr _CMustr
+tst R0
+beq L128
+*line 504
+*line 505
+*line 506
+move #61,(sp)
+jsr _CMchr
+tst R0
+bne L129
+*line 506
+clr R0
+move R0,_QQsw
+bra L22
+*line 507
+L129:
+*line 508
+*line 509
+jsr _CMlong
+tst R0
+bne L130
+*line 509
+clr R0
+move R0,_QQsw
+bra L22
+*line 510
+L130:
+*line 511
+*line 512
+cmp.l #$7f,_QQnum
+ble L131
+*line 512
+clr R0
+move R0,_QQsw
+bra L22
+*line 513
+L131:
+*line 514
+move.l _QQnum,R0
+move R0,_thescore
+*line 515
+*line 516
+move _thescore,(sp)
+jsr _selscor
+*line 517
+*line 518
+*line 519
+tst _verbose
+beq L132
+*line 519
+move _thescore,(sp)
+move.l #L133,-(sp)
+jsr _printf
+addq.l #4,sp
+L132:
+*line 520
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 521
+*line 522
+*line 523
+L128:
+*line 524
+*line 524
+move.l #L134,(sp)
+jsr _CMustr
+tst R0
+beq L135
+*line 525
+*line 526
+*line 527
+move #61,(sp)
+jsr _CMchr
+tst R0
+bne L136
+*line 527
+clr R0
+move R0,_QQsw
+bra L22
+*line 528
+L136:
+*line 529
+*line 530
+jsr _CMlong
+tst R0
+bne L137
+*line 530
+clr R0
+move R0,_QQsw
+bra L22
+*line 531
+L137:
+*line 532
+*line 533
+cmp.l #$64,_QQnum
+ble L138
+*line 533
+clr R0
+move R0,_QQsw
+bra L22
+*line 534
+L138:
+*line 535
+move.l _QQnum,_noteper
+*line 536
+*line 537
+*line 538
+tst _verbose
+beq L139
+*line 538
+move.l _noteper,(sp)
+move.l #L140,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 539
+L139:
+*line 540
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 541
+*line 542
+L135:
+*line 543
+*line 543
+move.l #L141,(sp)
+jsr _CMustr
+tst R0
+beq L142
+*line 544
+*line 545
+jsr _SEsnap
+*line 546
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 547
+*line 548
+L142:
+*line 549
+*line 549
+move.l #L143,(sp)
+jsr _CMustr
+tst R0
+beq L144
+*line 550
+*line 551
+jsr _waitcr
+*line 552
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 553
+*line 554
+L144:
+*line 555
+*line 555
+move.l #L145,(sp)
+jsr _CMustr
+tst R0
+beq L146
+*line 556
+*line 557
+*line 557
+move #5,(sp)
+jsr _e_alc
+move.l R0,R12
+move.l R12,R0
+bne L147
+*line 558
+*line 559
+move.l #L148,(sp)
+jsr _nospace
+*line 560
+clr R0
+move R0,_QQsw
+bra L22
+*line 561
+*line 562
+L147:
+*line 563
+move.l _t_cur,(R12)
+*line 564
+move.b #7,5(R12)
+*line 565
+*line 566
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,(sp)
+move.l R12,-(sp)
+jsr _e_ins
+addq.l #4,sp
+move.l R0,R8
+move.l 12(R8),_p_cur
+*line 567
+*line 568
+*line 569
+tst _verbose
+beq L149
+*line 569
+move.l _t_cur,(sp)
+move.l #L150,-(sp)
+jsr _printf
+addq.l #4,sp
+L149:
+*line 570
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 571
+*line 572
+*line 573
+L146:
+*line 574
+*line 574
+move.l #L151,(sp)
+jsr _CMustr
+tst R0
+beq L152
+*line 575
+*line 576
+*line 576
+jsr _CMlong
+tst R0
+beq L153
+*line 577
+*line 578
+move.l _QQnum,R0
+move R0,R7
+*line 579
+move R7,(sp)
+jsr _sc_clr
+*line 580
+*line 581
+*line 582
+tst _verbose
+beq L154
+*line 582
+move R7,(sp)
+move.l #L155,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 583
+L154:
+*line 584
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 585
+*line 586
+L153:
+*line 587
+*line 587
+move #42,(sp)
+jsr _CMchr
+tst R0
+beq L156
+*line 588
+*line 589
+jsr _scinit
+*line 590
+*line 591
+*line 592
+tst _verbose
+beq L157
+*line 592
+move.l #L158,(sp)
+jsr _printf
+*line 593
+L157:
+*line 594
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 595
+*line 596
+L156:
+*line 597
+*line 597
+move #36,(sp)
+jsr _CMchr
+tst R0
+beq L159
+*line 598
+*line 599
+move _curscor,(sp)
+jsr _sc_clr
+*line 600
+*line 601
+*line 602
+tst _verbose
+beq L160
+*line 602
+move _curscor,(sp)
+move.l #L161,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 603
+L160:
+*line 604
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 605
+*line 606
+L159:
+*line 607
+clr R0
+move R0,_QQsw
+bra L22
+*line 608
+*line 609
+*line 610
+L152:
+*line 611
+*line 611
+move.l #L162,(sp)
+jsr _CMustr
+tst R0
+beq L163
+*line 612
+*line 613
+*line 613
+move.l #L164,(sp)
+jsr _CMustr
+tst R0
+beq L165
+*line 614
+*line 615
+move.l #L166,(sp)
+jsr _printf
+*line 616
+clr R6
+move R6,R7
+*line 617
+*line 618
+clr R5
+bra L169
+L170:
+*line 619
+*line 620
+move.l #L171,(sp)
+jsr _printf
+*line 621
+*line 622
+clr R4
+bra L174
+L175:
+*line 623
+*line 624
+*line 624
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_scores,R9
+tst.l 0(R8,R9.l)
+beq L176
+*line 625
+*line 626
+move R7,(sp)
+move.l #L177,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 627
+add #1,R6
+*line 628
+bra L178
+L176:
+*line 629
+*line 630
+*line 631
+move.l #L179,(sp)
+jsr _printf
+L178:
+*line 632
+*line 633
+*line 634
+add #1,R7
+L173:
+*line 622
+add #1,R4
+L174:
+*line 622
+cmp #16,R4
+blt L175
+L172:
+*line 635
+*line 636
+*line 637
+move.l #L180,(sp)
+jsr _printf
+L168:
+*line 618
+add #1,R5
+L169:
+*line 618
+cmp #4,R5
+blt L170
+L167:
+*line 638
+*line 639
+*line 640
+*line 641
+move _curscor,(sp)
+move R6,-(sp)
+move.l #L181,-(sp)
+jsr _printf
+addq.l #6,sp
+*line 642
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 643
+*line 644
+*line 645
+L165:
+*line 646
+*line 646
+move.l #L182,(sp)
+jsr _CMustr
+tst R0
+beq L183
+*line 647
+*line 648
+move.l #L184,(sp)
+jsr _printf
+*line 649
+clr R6
+*line 650
+*line 651
+clr R7
+bra L187
+L188:
+*line 652
+*line 653
+*line 653
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_scores,R8
+tst.l (R8)
+beq L189
+*line 654
+*line 655
+move R7,(sp)
+move.l #L190,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 656
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R13
+add.l #_scname,R13
+*line 657
+*line 658
+move.l R13,(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_scores,R9
+move.l 0(R8,R9.l),-(sp)
+move.l #L191,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 659
+*line 660
+clr R5
+bra L194
+L195:
+*line 661
+move.b (R13)+,R0
+ext.w R0
+move R0,(sp) 
+and #255,(sp)
+move.l #L196,-(sp)
+jsr _printf
+addq.l #4,sp
+L193:
+*line 660
+add #1,R5
+L194:
+*line 660
+cmp #16,R5
+blt L195
+L192:
+*line 661
+*line 662
+*line 663
+move.l #L197,(sp)
+jsr _printf
+*line 664
+add #1,R6
+*line 665
+L189:L186:
+*line 651
+add #1,R7
+L187:
+*line 651
+cmp #128,R7
+blt L188
+L185:
+*line 666
+*line 667
+*line 668
+*line 669
+move _curscor,(sp)
+move R6,-(sp)
+move.l #L198,-(sp)
+jsr _printf
+addq.l #6,sp
+*line 670
+*line 671
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 672
+*line 673
+*line 674
+L183:
+*line 675
+*line 675
+move.l #L199,(sp)
+jsr _CMustr
+tst R0
+beq L200
+*line 676
+*line 677
+move.l #L201,(sp)
+jsr _printf
+*line 678
+clr R6
+move R6,R7
+*line 679
+*line 680
+clr R5
+bra L204
+L205:
+*line 681
+*line 682
+move.l #L206,(sp)
+jsr _printf
+*line 683
+*line 684
+clr R4
+bra L209
+L210:
+*line 685
+*line 686
+*line 686
+move _curscor,R0
+muls #80,R0
+move R7,R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_seclist,R9
+tst.l 0(R8,R9.l)
+beq L211
+*line 687
+*line 688
+move R7,(sp)
+move.l #L212,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 689
+add #1,R6
+*line 690
+bra L213
+L211:
+*line 691
+*line 692
+*line 693
+move.l #L214,(sp)
+jsr _printf
+L213:
+*line 694
+*line 695
+*line 696
+add #1,R7
+L208:
+*line 684
+add #1,R4
+L209:
+*line 684
+cmp #10,R4
+blt L210
+L207:
+*line 697
+*line 698
+*line 699
+move.l #L215,(sp)
+jsr _printf
+L203:
+*line 680
+add #1,R5
+L204:
+*line 680
+cmp #5,R5
+blt L205
+L202:
+*line 700
+*line 701
+*line 702
+*line 703
+move _cursect,(sp)
+move R6,-(sp)
+move.l #L216,-(sp)
+jsr _printf
+addq.l #6,sp
+*line 704
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 705
+*line 706
+L200:
+*line 707
+clr R0
+move R0,_QQsw
+bra L22
+*line 708
+*line 709
+*line 710
+L163:
+*line 711
+*line 711
+move.l #L217,(sp)
+jsr _CMustr
+tst R0
+beq L218
+*line 712
+*line 713
+*line 714
+move #108,(sp)
+jsr _CMuchr
+tst R0
+beq L219
+*line 714
+move #1,R7
+bra L220
+L219:
+*line 715
+*line 716
+move #114,(sp)
+jsr _CMuchr
+tst R0
+beq L221
+*line 716
+clr R7
+*line 717
+bra L222
+L221:
+*line 718
+clr R0
+move R0,_QQsw
+bra L22
+L222:L220:
+*line 719
+*line 720
+*line 721
+jsr _CMlong
+tst R0
+bne L223
+*line 721
+clr R0
+move R0,_QQsw
+bra L22
+*line 722
+L223:
+*line 723
+move R7,(sp)
+move.l _QQnum,-(sp)
+jsr _frfind
+addq.l #4,sp
+move.l R0,R12
+*line 724
+*line 725
+*line 725
+move.l R12,R0
+beq L224
+*line 726
+*line 727
+*line 728
+tst _verbose
+beq L225
+*line 729
+move.l R12,(sp)
+move.l _QQnum,-(sp)
+move.l #L226,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 730
+L225:
+*line 731
+move.l R12,_p_cur
+*line 732
+move.l _QQnum,_t_cur
+*line 733
+bra L227
+L224:
+*line 734
+*line 735
+*line 736
+*line 737
+tst _verbose
+beq L228
+*line 737
+move.l #L229,(sp)
+jsr _printf
+*line 738
+L228:
+*line 739
+clr R0
+move R0,_QQsw
+bra L22
+L227:
+*line 740
+*line 741
+*line 742
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 743
+*line 744
+*line 745
+L218:
+*line 746
+*line 746
+move.l #L230,(sp)
+jsr _CMustr
+tst R0
+beq L231
+*line 747
+*line 748
+*line 748
+move.l _p_cur,R12
+move.l R12,R0
+bne L232
+*line 749
+*line 750
+move.l #L233,(sp)
+jsr _printf
+*line 751
+clr R0
+move R0,_QQsw
+bra L22
+*line 752
+*line 753
+L232:
+*line 754
+move.l R12,R11
+*line 755
+*line 756
+bra L236
+L235:
+*line 757
+*line 758
+move.l #_spool,-4(R14)
+*line 759
+*line 760
+*line 760
+cmp.l -4(R14),R11
+bcc L237
+*line 761
+*line 762
+move.l #L238,(sp)
+jsr _printf
+*line 763
+move.l R11,(sp)
+move.l #L239,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 764
+*line 765
+move.l _pspool,(sp)
+move.l #_spool,-(sp)
+move.l #L240,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 766
+clr R0
+move R0,_QQsw
+bra L22
+*line 767
+*line 768
+L237:
+*line 769
+move.l #131068+_spool,-4(R14)
+*line 770
+*line 771
+*line 771
+cmp.l -4(R14),R11
+bls L241
+*line 772
+*line 773
+move.l #L242,(sp)
+jsr _printf
+*line 774
+move.l R11,(sp)
+move.l #L243,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 775
+*line 776
+move.l _pspool,(sp)
+move.l #_spool,-(sp)
+move.l #L244,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 777
+clr R0
+move R0,_QQsw
+bra L22
+*line 778
+*line 779
+L241:
+*line 780
+move.l R11,(sp)
+jsr _SEdump
+*line 781
+move.l 12(R11),R11
+*line 782
+*line 783
+*line 784
+cmp.l R11,R12
+beq L10000
+cmp.b #1,5(R11)
+bne L245
+L10000:*line 785
+*line 786
+move.l #L246,(sp)
+jsr _printf
+bra L234
+*line 787
+*line 788
+L245:L236:
+*line 789
+move.l R11,R0
+bne L235
+L234:
+*line 790
+*line 791
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 792
+*line 793
+*line 794
+L231:
+*line 795
+*line 795
+move.l #L247,(sp)
+jsr _CMustr
+tst R0
+beq L248
+*line 796
+*line 797
+move #1,_verbose
+*line 798
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 799
+*line 800
+L248:
+*line 801
+*line 801
+move.l #L249,(sp)
+jsr _CMustr
+tst R0
+beq L250
+*line 802
+*line 803
+clr _verbose
+*line 804
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 805
+*line 806
+L250:
+*line 807
+*line 807
+move.l #L251,(sp)
+jsr _CMustr
+tst R0
+beq L252
+*line 808
+*line 809
+move #1,_testing
+*line 810
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 811
+*line 812
+L252:
+*line 813
+*line 813
+move.l #L253,(sp)
+jsr _CMustr
+tst R0
+beq L254
+*line 814
+*line 815
+clr _testing
+*line 816
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 817
+*line 818
+L254:
+*line 819
+*line 819
+move.l #L255,(sp)
+jsr _CMustr
+tst R0
+beq L256
+*line 820
+*line 821
+*line 822
+tst _verbose
+beq L257
+*line 822
+move.l #L258,(sp)
+jsr _printf
+*line 823
+L257:
+*line 824
+move #1,_endflg
+*line 825
+move #1,R0
+move R0,_QQsw
+bra L22
+*line 826
+*line 827
+L256:
+*line 828
+clr R0
+move R0,_QQsw
+bra L22
+L22:tst.l (sp)+
+movem.l (sp)+,R3-R7/R11-R13
+unlk R14
+rts
+.globl _Qnote
+.text
+_Qnote:
+~~Qnote:
+link R14,#-8
+~nsp1=-4
+*line 848
+*line 848
+move #114,(sp)
+jsr _CMuchr
+tst R0
+beq L260
+*line 849
+*line 850
+*line 851
+jsr _CMlong
+tst R0
+bne L261
+*line 851
+clr R0
+move R0,_QQsw
+bra L259
+*line 852
+L261:
+*line 853
+move.l _QQnum,_nrest
+*line 854
+*line 855
+*line 856
+move #47,(sp)
+jsr _CMchr
+tst R0
+bne L262
+*line 856
+clr R0
+move R0,_QQsw
+bra L259
+*line 857
+L262:
+*line 858
+*line 859
+jsr _CMlong
+tst R0
+bne L263
+*line 859
+clr R0
+move R0,_QQsw
+bra L259
+*line 860
+L263:
+*line 861
+move.l #$c0,_dvwork
+*line 862
+move.l _QQnum,-(sp)
+move.l _dvwork,-(sp)
+jsr ldiv
+addq.l #8,sp
+move.l R0,_noteval
+*line 863
+move.l _nrest,-(sp)
+move.l _noteval,-(sp)
+jsr lmul
+addq.l #8,sp
+add.l R0,_t_cur
+*line 864
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,_p_cur
+*line 865
+*line 866
+*line 867
+tst _verbose
+beq L264
+*line 867
+move.l _t_cur,(sp)
+move.l #L265,-(sp)
+jsr _printf
+addq.l #4,sp
+*line 868
+L264:
+*line 869
+move #1,R0
+move R0,_QQsw
+bra L259
+*line 870
+*line 871
+*line 872
+L260:
+*line 873
+*line 874
+move.l #_nlist,(sp)
+jsr _CMulist
+tst R0
+bne L266
+*line 874
+clr R0
+move R0,_QQsw
+bra L259
+*line 875
+L266:
+*line 876
+move _QQlnum,_notepit
+*line 878
+*line 879
+move #35,(sp)
+jsr _CMchr
+tst R0
+beq L267
+*line 879
+move #1,_sharp
+*line 880
+bra L268
+L267:
+*line 881
+clr _sharp
+L268:
+*line 883
+*line 884
+jsr _CMdig
+tst R0
+bne L269
+*line 884
+clr R0
+move R0,_QQsw
+bra L259
+*line 885
+L269:
+*line 886
+*line 887
+cmp.b #55,_QQdig
+ble L270
+*line 887
+clr R0
+move R0,_QQsw
+bra L259
+*line 888
+L270:
+*line 889
+move.b _QQdig,R0
+ext.w R0
+add #-48,R0
+move R0,R8
+add.l R8,R8
+move.l #_octab,R9
+move 0(R8,R9.l),R0
+move _notepit,R9
+add.l R9,R9
+add.l #_notetab,R9
+move (R9),R1
+add R1,R0
+add _sharp,R0
+move R0,_notenum
+*line 891
+*line 891
+move #43,(sp)
+jsr _CMchr
+tst R0
+beq L271
+*line 892
+*line 893
+*line 893
+move #5,(sp)
+jsr _e_alc
+move.l R0,-4(R14)
+bne L272
+*line 894
+*line 895
+move.l #L273,(sp)
+jsr _nospace
+*line 896
+clr R0
+move R0,_QQsw
+bra L259
+*line 897
+*line 898
+L272:
+*line 899
+move.l _t_cur,_noteon
+*line 900
+move #64,(sp)
+move _notenum,-(sp)
+move _curgrp,-(sp)
+move #5,-(sp)
+move.l -4(R14),-(sp)
+jsr _insnevt
+adda.l #10,sp
+move.l R0,_p_cur
+*line 901
+*line 902
+*line 903
+tst _verbose
+beq L274
+*line 903
+move _notenum,(sp)
+move.l _noteon,-(sp)
+move.l #L275,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 904
+L274:
+*line 905
+move #1,R0
+move R0,_QQsw
+bra L259
+*line 906
+*line 907
+*line 908
+L271:
+*line 909
+*line 909
+move #45,(sp)
+jsr _CMchr
+tst R0
+beq L276
+*line 910
+*line 911
+*line 911
+move #5,(sp)
+jsr _e_alc
+move.l R0,-4(R14)
+bne L277
+*line 912
+*line 913
+move.l #L278,(sp)
+jsr _nospace
+*line 914
+clr R0
+move R0,_QQsw
+bra L259
+*line 915
+*line 916
+L277:
+*line 917
+move.l _t_cur,_noteoff
+*line 918
+move #64,(sp)
+move _notenum,-(sp)
+move _curgrp,-(sp)
+move #6,-(sp)
+move.l -4(R14),-(sp)
+jsr _insnevt
+adda.l #10,sp
+move.l R0,_p_cur
+*line 919
+*line 920
+*line 921
+tst _verbose
+beq L279
+*line 921
+move _notenum,(sp)
+move.l _noteoff,-(sp)
+move.l #L280,-(sp)
+jsr _printf
+addq.l #8,sp
+*line 922
+L279:
+*line 923
+move #1,R0
+move R0,_QQsw
+bra L259
+*line 924
+*line 925
+*line 926
+L276:
+*line 927
+*line 927
+move #47,(sp)
+jsr _CMchr
+tst R0
+beq L281
+*line 928
+*line 929
+*line 930
+jsr _CMlong
+tst R0
+bne L282
+*line 930
+clr R0
+move R0,_QQsw
+bra L259
+*line 931
+L282:
+*line 932
+move.l #$c0,_dvwork
+*line 933
+move.l _QQnum,-(sp)
+move.l _dvwork,-(sp)
+jsr ldiv
+addq.l #8,sp
+move.l R0,_noteval
+*line 934
+move.l _t_cur,_noteon
+*line 935
+move.l #$64,_dvwork
+*line 936
+move.l _dvwork,-(sp)
+move.l _noteval,-(sp)
+move.l _noteper,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,-(sp)
+jsr ldiv
+addq.l #8,sp
+add.l _t_cur,R0
+move.l R0,_noteoff
+*line 937
+*line 938
+*line 938
+move #5,(sp)
+jsr _e_alc
+move.l R0,-4(R14)
+bne L283
+*line 939
+*line 940
+move.l #L284,(sp)
+jsr _nospace
+*line 941
+clr R0
+move R0,_QQsw
+bra L259
+*line 942
+*line 943
+L283:
+*line 944
+move #64,(sp)
+move _notenum,-(sp)
+move _curgrp,-(sp)
+move #5,-(sp)
+move.l -4(R14),-(sp)
+jsr _insnevt
+adda.l #10,sp
+move.l R0,_p_cur
+*line 945
+*line 946
+*line 946
+move #5,(sp)
+jsr _e_alc
+move.l R0,-4(R14)
+bne L285
+*line 947
+*line 948
+move.l #L286,(sp)
+jsr _nospace
+*line 949
+clr R0
+move R0,_QQsw
+bra L259
+*line 950
+*line 951
+L285:
+*line 952
+move.l _noteoff,R0
+move.l R0,_t_cur
+move.l R0,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,_p_cur
+*line 953
+*line 954
+move #64,(sp)
+move _notenum,-(sp)
+move _curgrp,-(sp)
+move #6,-(sp)
+move.l -4(R14),-(sp)
+jsr _insnevt
+adda.l #10,sp
+*line 955
+*line 956
+move.l _noteon,R0
+move.l R0,_t_cur
+move.l R0,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,_p_cur
+*line 957
+*line 958
+*line 959
+tst _verbose
+beq L287
+*line 960
+move.l _noteoff,(sp)
+move.l _noteon,-(sp)
+move _notenum,-(sp)
+move.l _t_cur,-(sp)
+move.l #L288,-(sp)
+jsr _printf
+adda.l #14,sp
+*line 961
+L287:
+*line 962
+move #1,R0
+move R0,_QQsw
+bra L259
+*line 963
+*line 964
+*line 965
+*line 966
+*line 967
+L281:
+*line 968
+move.l _t_cur,_noteon
+*line 969
+move.l #$64,_dvwork
+*line 970
+move.l _dvwork,-(sp)
+move.l _noteper,-(sp)
+move.l _noteval,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,-(sp)
+jsr ldiv
+addq.l #8,sp
+add.l _t_cur,R0
+move.l R0,_noteoff
+*line 972
+*line 972
+move #5,(sp)
+jsr _e_alc
+move.l R0,-4(R14)
+bne L289
+*line 973
+*line 974
+move.l #L290,(sp)
+jsr _nospace
+*line 975
+clr R0
+move R0,_QQsw
+bra L259
+*line 976
+*line 977
+L289:
+*line 978
+move #64,(sp)
+move _notenum,-(sp)
+move _curgrp,-(sp)
+move #5,-(sp)
+move.l -4(R14),-(sp)
+jsr _insnevt
+adda.l #10,sp
+move.l R0,_p_cur
+*line 980
+*line 980
+move #5,(sp)
+jsr _e_alc
+move.l R0,-4(R14)
+bne L291
+*line 981
+*line 982
+move.l #L292,(sp)
+jsr _nospace
+*line 983
+clr R0
+move R0,_QQsw
+bra L259
+*line 984
+*line 985
+L291:
+*line 986
+move.l _noteoff,R0
+move.l R0,_t_cur
+move.l R0,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,_p_cur
+*line 988
+move #64,(sp)
+move _notenum,-(sp)
+move _curgrp,-(sp)
+move #6,-(sp)
+move.l -4(R14),-(sp)
+jsr _insnevt
+adda.l #10,sp
+*line 990
+move.l _noteon,R0
+move.l R0,_t_cur
+move.l R0,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,_p_cur
+*line 992
+*line 993
+tst _verbose
+beq L293
+*line 994
+move.l _noteoff,(sp)
+move.l _noteon,-(sp)
+move _notenum,-(sp)
+move.l _t_cur,-(sp)
+move.l #L294,-(sp)
+jsr _printf
+adda.l #14,sp
+L293:
+*line 995
+move #1,R0
+move R0,_QQsw
+bra L259
+L259:unlk R14
+rts
+.globl _Qadv
+.text
+_Qadv:
+~~Qadv:
+link R14,#-4
+*line 1010
+*line 1010
+move #46,(sp)
+jsr _CMchr
+tst R0
+beq L296
+*line 1011
+*line 1012
+add.l #$1,_t_cur
+*line 1013
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,_p_cur
+*line 1014
+move #1,R0
+move R0,_QQsw
+bra L295
+*line 1015
+*line 1016
+L296:
+*line 1017
+*line 1017
+move #44,(sp)
+jsr _CMchr
+tst R0
+beq L297
+*line 1018
+*line 1019
+move.l _noteval,R0
+add.l R0,_t_cur
+*line 1020
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,_p_cur
+*line 1021
+move #1,R0
+move R0,_QQsw
+bra L295
+*line 1022
+*line 1023
+L297:
+*line 1024
+*line 1024
+move #59,(sp)
+jsr _CMchr
+tst R0
+beq L298
+*line 1025
+*line 1026
+move.l #$30,_dvwork
+*line 1027
+move.l #$30,-(sp)
+move.l _dvwork,-(sp)
+move.l _t_cur,-(sp)
+jsr ldiv
+addq.l #8,sp
+move.l R0,-(sp)
+add.l #$1,(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,_t_cur
+*line 1028
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,_p_cur
+*line 1029
+move #1,R0
+move R0,_QQsw
+bra L295
+*line 1030
+*line 1031
+L298:
+*line 1032
+*line 1032
+move #58,(sp)
+jsr _CMchr
+tst R0
+beq L299
+*line 1033
+*line 1034
+add.l #$30,_t_cur
+*line 1035
+move.l _t_cur,(sp)
+clr -(sp)
+move.l _p_cur,-(sp)
+jsr _ep_adj
+addq.l #6,sp
+move.l R0,_p_cur
+*line 1036
+move #1,R0
+move R0,_QQsw
+bra L295
+*line 1037
+*line 1038
+L299:
+*line 1039
+clr R0
+move R0,_QQsw
+bra L295
+L295:unlk R14
+rts
+.globl _Qseq
+.text
+_Qseq:
+~~Qseq:
+link R14,#-4
+*line 1054
+*line 1054
+tst _QQanch
+bne L301
+*line 1054
+bra L304
+L303:
+*line 1054
+add.l #1,_QQip
+L304:
+*line 1054
+move.l _QQip,R8
+cmp.b #32,(R8)
+beq L303
+L302:
+*line 1055
+L301:
+*line 1056
+*line 1057
+move.l _QQip,R8
+tst.b (R8)
+bne L305
+*line 1057
+move #1,R0
+move R0,_QQsw
+bra L300
+*line 1058
+L305:
+*line 1059
+*line 1059
+jsr _Qnote
+tst R0
+bne L10001
+jsr _Qadv
+tst R0
+bne L10001
+jsr _Qevent
+tst R0
+beq L306
+tst _endflg
+bne L306
+L10001:*line 1060
+*line 1061
+*line 1061
+tst _QQanch
+bne L307
+*line 1061
+bra L310
+L309:
+*line 1061
+add.l #1,_QQip
+L310:
+*line 1061
+move.l _QQip,R8
+cmp.b #32,(R8)
+beq L309
+L308:
+*line 1062
+L307:
+*line 1063
+*line 1064
+move.l _QQip,R8
+tst.b (R8)
+bne L311
+*line 1064
+move _QQsw,R0
+bra L300
+*line 1065
+L311:
+*line 1066
+bra L314
+L313:
+*line 1067
+*line 1068
+*line 1069
+jsr _Qadv
+tst R0
+bne L315
+*line 1069
+*line 1070
+jsr _Qnote
+tst R0
+bne L316
+*line 1070
+jsr _Qevent
+*line 1071
+L316:L315:
+*line 1072
+*line 1072
+tst _QQanch
+bne L317
+*line 1072
+bra L320
+L319:
+*line 1072
+add.l #1,_QQip
+L320:
+*line 1072
+move.l _QQip,R8
+cmp.b #32,(R8)
+beq L319
+L318:
+*line 1073
+L317:
+*line 1074
+*line 1075
+move.l _QQip,R8
+tst.b (R8)
+bne L321
+*line 1075
+move _QQsw,R0
+bra L300
+L321:L314:
+*line 1076
+tst _QQsw
+beq L10002
+tst _endflg
+beq L313
+L10002:L312:
+*line 1077
+*line 1078
+L306:
+*line 1079
+move _QQsw,R0
+bra L300
+L300:unlk R14
+rts
+.globl _sqinit
+.text
+_sqinit:
+~~sqinit:
+link R14,#-4
+*line 1093
+clr _verbose
+*line 1094
+clr _testing
+*line 1095
+clr _endflg
+*line 1097
+move.l #$30,_noteval
+*line 1098
+move.l #$50,_noteper
+*line 1100
+clr.l R0
+move.l R0,_t_ctr
+move.l R0,_t_cur
+move.l R0,_curtime
+*line 1101
+move.l _t_cur,R0
+add.l #$ffffff10,R0
+move.l R0,_t_bak
+*line 1102
+move.l _t_cur,R0
+add.l #$102,R0
+move.l R0,_t_fwd
+*line 1104
+clr.l R0
+move.l R0,_p_fwd
+move.l R0,_p_ctr
+move.l R0,_p_cur
+move.l R0,_p_bak
+*line 1106
+clr _curgrp
+*line 1107
+clr _thescore
+L322:unlk R14
+rts
+.globl _sqscan
+.text
+_sqscan:
+~~sqscan:
+~ip=8
+link R14,#-4
+*line 1125
+clr _endflg
+*line 1126
+move.l 8(R14),(sp)
+jsr _CMinit
+*line 1128
+*line 1129
+jsr _Qseq
+tst R0
+bne L324
+*line 1129
+move.l #L325,(sp)
+jsr _CMstat
+*line 1130
+L324:
+*line 1131
+move _QQsw,R0
+bra L323
+L323:unlk R14
+rts
+.data
+L1:.dc.b $61,$0
+L2:.dc.b $62,$0
+L3:.dc.b $63,$0
+L4:.dc.b $64,$0
+L5:.dc.b $65,$0
+L6:.dc.b $66,$0
+L7:.dc.b $67,$0
+L10:.dc.b $A,$2A,$2A,$20,$73,$71,$73,$63,$61,$6E,$3A,$20,$45,$52,$52,$4F,$52,$20,$2D,$20,$6E,$6F,$20,$73,$70,$61,$63,$65,$20,$66
+.dc.b $6F,$72,$20,$25,$73,$20,$2A,$2A,$A,$A,$0
+L13:.dc.b $2A,$2A,$20,$50,$63,$68,$65,$63,$6B,$28,$24,$25,$30,$38,$2E,$38,$6C,$78,$29,$3A,$20,$20,$5A,$45,$52,$4F,$20,$2D,$20,$25
+.dc.b $73,$20,$2A,$2A,$A,$0
+L16:.dc.b $2A,$2A,$20,$50,$63,$68,$65,$63,$6B,$28,$24,$25,$30,$38,$2E,$38,$6C,$78,$29,$3A,$20,$20,$4C,$4F,$57,$20,$2D,$20,$25,$73
+.dc.b $20,$2A,$2A,$A,$0
+L19:.dc.b $2A,$2A,$20,$50,$63,$68,$65,$63,$6B,$28,$24,$25,$30,$38,$2E,$38,$6C,$78,$29,$3A,$20,$48,$49,$47,$48,$20,$2D,$20,$25,$73
+.dc.b $20,$2A,$2A,$A,$0
+L24:.dc.b $67,$72,$6F,$75,$70,$0
+L29:.dc.b $3C,$43,$75,$72,$72,$65,$6E,$74,$20,$67,$72,$6F,$75,$70,$20,$3D,$20,$25,$64,$3E,$A,$0
+L30:.dc.b $73,$74,$61,$74,$75,$73,$0
+L33:.dc.b $6F,$6E,$0
+L36:.dc.b $21,$73,$74,$61,$74,$75,$73,$3D,$6F,$6E,$0
+L38:.dc.b $25,$38,$6C,$64,$3A,$20,$47,$72,$6F,$75,$70,$20,$25,$64,$20,$65,$6E,$61,$62,$6C,$65,$64,$A,$0
+L40:.dc.b $6F,$66,$66,$0
+L43:.dc.b $21,$73,$74,$61,$74,$75,$73,$3D,$6F,$66,$66,$0
+L45:.dc.b $25,$38,$6C,$64,$3A,$20,$47,$72,$6F,$75,$70,$20,$25,$64,$20,$64,$69,$73,$61,$62,$6C,$65,$64,$A,$0
+L47:.dc.b $74,$65,$6D,$70,$6F,$0
+L52:.dc.b $21,$74,$65,$6D,$70,$6F,$0
+L54:.dc.b $25,$38,$6C,$64,$3A,$20,$54,$65,$6D,$70,$6F,$20,$3D,$20,$25,$64,$A,$0
+L55:.dc.b $69,$6E,$73,$74,$0
+L60:.dc.b $21,$69,$6E,$73,$74,$0
+L62:.dc.b $25,$38,$6C,$64,$3A,$20,$67,$72,$6F,$75,$70,$20,$25,$64,$20,$73,$65,$74,$20,$74,$6F,$20,$69,$6E,$73,$74,$20,$25,$64,$A,$0
+L63:.dc.b $74,$75,$6E,$69,$6E,$67,$0
+L68:.dc.b $21,$74,$75,$6E,$69,$6E,$67,$0
+L70:.dc.b $25,$38,$6C,$64,$3A,$20,$54,$75,$6E,$69,$6E,$67,$20,$25,$64,$20,$73,$65,$6C,$65,$63,$74,$65,$64,$A,$0
+L71:.dc.b $74,$72,$61,$6E,$73,$0
+L81:.dc.b $21,$74,$72,$61,$6E,$73,$0
+L83:.dc.b $25,$38,$6C,$64,$3A,$20,$54,$72,$61,$6E,$73,$70,$6F,$73,$69,$74,$69,$6F,$6E,$20,$73,$65,$74,$20,$74,$6F,$20,$25,$64,$A,$0
+L84:.dc.b $64,$79,$6E,$0
+L89:.dc.b $21,$64,$79,$6E,$0
+L91:.dc.b $25,$38,$6C,$64,$3A,$20,$44,$79,$6E,$61,$6D,$69,$63,$73,$20,$73,$65,$74,$20,$74,$6F,$20,$25,$64,$A,$0
+L92:.dc.b $6C,$6F,$63,$0
+L97:.dc.b $21,$6C,$6F,$63,$0
+L99:.dc.b $25,$38,$6C,$64,$3A,$20,$4C,$6F,$63,$61,$74,$69,$6F,$6E,$20,$73,$65,$74,$20,$74,$6F,$20,$25,$64,$A,$0
+L100:.dc.b $67,$6F,$74,$6F,$0
+L106:.dc.b $A,$3C,$53,$63,$6F,$72,$65,$20,$74,$69,$6D,$65,$20,$73,$65,$74,$20,$74,$6F,$20,$25,$6C,$64,$3E,$A,$0
+L107:.dc.b $70,$6F,$73,$0
+L114:.dc.b $A,$3C,$53,$63,$6F,$72,$65,$20,$74,$69,$6D,$65,$20,$73,$65,$74,$20,$74,$6F,$20,$25,$6C,$64,$3E,$A,$0
+L115:.dc.b $62,$65,$61,$74,$0
+L120:.dc.b $A,$3C,$53,$63,$6F,$72,$65,$20,$74,$69,$6D,$65,$20,$73,$65,$74,$20,$74,$6F,$20,$25,$6C,$64,$3E,$A,$0
+L121:.dc.b $66,$72,$61,$6D,$65,$0
+L126:.dc.b $A,$3C,$53,$63,$6F,$72,$65,$20,$74,$69,$6D,$65,$20,$73,$65,$74,$20,$74,$6F,$20,$25,$6C,$64,$3E,$A,$0
+L127:.dc.b $73,$63,$6F,$72,$65,$0
+L133:.dc.b $A,$3C,$53,$63,$6F,$72,$65,$20,$25,$64,$20,$73,$65,$6C,$65,$63,$74,$65,$64,$3E,$A,$0
+L134:.dc.b $77,$65,$69,$67,$68,$74,$0
+L140:.dc.b $3C,$4E,$6F,$74,$65,$20,$77,$65,$69,$67,$68,$74,$20,$3D,$20,$25,$6C,$64,$20,$70,$65,$72,$63,$65,$6E,$74,$3E,$A,$0
+L141:.dc.b $73,$6E,$61,$70,$0
+L143:.dc.b $77,$61,$69,$74,$0
+L145:.dc.b $73,$74,$6F,$70,$0
+L148:.dc.b $21,$73,$74,$6F,$70,$0
+L150:.dc.b $25,$38,$6C,$64,$3A,$20,$53,$74,$6F,$70,$20,$65,$6E,$74,$65,$72,$65,$64,$A,$0
+L151:.dc.b $63,$6C,$65,$61,$72,$0
+L155:.dc.b $A,$3C,$53,$63,$6F,$72,$65,$20,$25,$64,$20,$63,$6C,$65,$61,$72,$65,$64,$3E,$A,$0
+L158:.dc.b $A,$3C,$41,$6C,$6C,$20,$73,$63,$6F,$72,$65,$73,$20,$63,$6C,$65,$61,$72,$65,$64,$3E,$A,$0
+L161:.dc.b $A,$3C,$43,$75,$72,$72,$65,$6E,$74,$20,$73,$63,$6F,$72,$65,$20,$28,$25,$64,$29,$20,$63,$6C,$65,$61,$72,$65,$64,$3E,$A,$0
+L162:.dc.b $73,$68,$6F,$77,$0
+L164:.dc.b $61,$63,$74,$69,$76,$65,$0
+L166:.dc.b $3C,$41,$63,$74,$69,$76,$65,$20,$73,$63,$6F,$72,$65,$73,$3A,$A,$0
+L171:.dc.b $3C,$0
+L177:.dc.b $25,$33,$64,$20,$0
+L179:.dc.b $2E,$2E,$2E,$20,$0
+L180:.dc.b $3E,$A,$0
+L181:.dc.b $3C,$25,$64,$20,$61,$63,$74,$69,$76,$65,$20,$73,$63,$6F,$72,$65,$73,$2C,$20,$73,$63,$6F,$72,$65,$20,$25,$64,$20,$69,$73
+.dc.b $20,$63,$75,$72,$72,$65,$6E,$74,$3E,$A,$A,$0
+L182:.dc.b $6E,$61,$6D,$65,$73,$0
+L184:.dc.b $3C,$41,$63,$74,$69,$76,$65,$20,$73,$63,$6F,$72,$65,$20,$6E,$61,$6D,$65,$73,$3A,$3E,$A,$0
+L190:.dc.b $3C,$25,$33,$64,$3A,$20,$0
+L191:.dc.b $5B,$24,$25,$30,$38,$2E,$38,$6C,$78,$2C,$20,$24,$25,$30,$38,$2E,$38,$6C,$78,$5D,$20,$0
+L196:.dc.b $25,$63,$0
+L197:.dc.b $3E,$A,$0
+L198:.dc.b $3C,$25,$64,$20,$61,$63,$74,$69,$76,$65,$20,$73,$63,$6F,$72,$65,$73,$2C,$20,$25,$64,$20,$69,$73,$20,$63,$75,$72,$72,$65
+.dc.b $6E,$74,$3E,$A,$A,$0
+L199:.dc.b $73,$65,$63,$74,$69,$6F,$6E,$73,$0
+L201:.dc.b $3C,$41,$63,$74,$69,$76,$65,$20,$73,$65,$63,$74,$69,$6F,$6E,$73,$3A,$3E,$A,$0
+L206:.dc.b $3C,$0
+L212:.dc.b $25,$33,$64,$20,$0
+L214:.dc.b $2E,$2E,$2E,$20,$0
+L215:.dc.b $3E,$A,$0
+L216:.dc.b $3C,$25,$64,$20,$61,$63,$74,$69,$76,$65,$20,$73,$65,$63,$74,$69,$6F,$6E,$73,$2C,$20,$25,$64,$20,$69,$73,$20,$63,$75,$72
+.dc.b $72,$65,$6E,$74,$3E,$A,$A,$0
+L217:.dc.b $66,$69,$6E,$64,$0
+L226:.dc.b $A,$3C,$46,$49,$4E,$44,$3A,$20,$20,$46,$6F,$75,$6E,$64,$20,$25,$6C,$64,$20,$61,$74,$20,$24,$25,$30,$38,$2E,$38,$6C,$78
+.dc.b $3E,$A,$A,$0
+L229:.dc.b $3C,$46,$49,$4E,$44,$3A,$20,$20,$46,$6F,$75,$6E,$64,$20,$74,$68,$65,$20,$63,$75,$72,$72,$65,$6E,$74,$20,$73,$63,$6F,$72
+.dc.b $65,$20,$65,$6D,$70,$74,$79,$3E,$A,$A,$0
+L230:.dc.b $63,$68,$61,$73,$65,$0
+L233:.dc.b $3C,$43,$48,$41,$53,$45,$3A,$20,$20,$43,$75,$72,$72,$65,$6E,$74,$20,$73,$63,$6F,$72,$65,$20,$6E,$6F,$74,$20,$61,$63,$74
+.dc.b $69,$76,$65,$3E,$A,$A,$0
+L238:.dc.b $A,$43,$48,$41,$53,$45,$3A,$20,$20,$45,$72,$72,$6F,$72,$A,$0
+L239:.dc.b $2A,$2A,$20,$42,$61,$64,$20,$70,$6F,$69,$6E,$74,$65,$72,$3A,$20,$20,$24,$25,$30,$38,$2E,$38,$6C,$78,$A,$0
+L240:.dc.b $2A,$2A,$20,$20,$20,$20,$20,$20,$20,$73,$70,$6F,$6F,$6C,$3A,$20,$20,$24,$25,$30,$38,$2E,$38,$6C,$78,$2C,$20,$20,$70,$73
+.dc.b $70,$6F,$6F,$6C,$3A,$20,$24,$25,$30,$38,$2E,$38,$6C,$78,$A,$0
+L242:.dc.b $A,$43,$48,$41,$53,$45,$3A,$20,$20,$45,$72,$72,$6F,$72,$A,$0
+L243:.dc.b $2A,$2A,$20,$42,$61,$64,$20,$70,$6F,$69,$6E,$74,$65,$72,$3A,$20,$20,$24,$25,$30,$38,$2E,$38,$6C,$78,$A,$0
+L244:.dc.b $2A,$2A,$20,$20,$20,$20,$20,$20,$20,$73,$70,$6F,$6F,$6C,$3A,$20,$20,$24,$25,$30,$38,$2E,$38,$6C,$78,$2C,$20,$20,$70,$73
+.dc.b $70,$6F,$6F,$6C,$3A,$20,$24,$25,$30,$38,$2E,$38,$6C,$78,$A,$0
+L246:.dc.b $2D,$2D,$20,$45,$6E,$64,$20,$6F,$66,$20,$63,$68,$61,$69,$6E,$20,$2D,$2D,$A,$A,$0
+L247:.dc.b $76,$65,$72,$62,$6F,$73,$65,$0
+L249:.dc.b $71,$75,$69,$65,$74,$0
+L251:.dc.b $74,$65,$73,$74,$0
+L253:.dc.b $6E,$6F,$72,$6D,$61,$6C,$0
+L255:.dc.b $65,$6E,$64,$0
+L258:.dc.b $A,$3C,$45,$6E,$64,$20,$63,$6F,$6D,$6D,$61,$6E,$64,$20,$65,$6E,$63,$6F,$75,$6E,$74,$65,$72,$65,$64,$3E,$A,$0
+L265:.dc.b $25,$38,$6C,$64,$3A,$20,$3C,$72,$65,$73,$74,$3E,$A,$0
+L273:.dc.b $6E,$6F,$74,$65,$20,$65,$76,$65,$6E,$74,$0
+L275:.dc.b $25,$38,$6C,$64,$3A,$20,$4E,$6F,$74,$65,$20,$25,$33,$64,$20,$4F,$4E,$A,$0
+L278:.dc.b $6E,$6F,$74,$65,$20,$65,$76,$65,$6E,$74,$0
+L280:.dc.b $25,$38,$6C,$64,$3A,$20,$4E,$6F,$74,$65,$20,$25,$33,$64,$20,$4F,$46,$46,$A,$0
+L284:.dc.b $6E,$6F,$74,$65,$20,$65,$76,$65,$6E,$74,$0
+L286:.dc.b $6E,$6F,$74,$65,$20,$65,$76,$65,$6E,$74,$0
+L288:.dc.b $25,$38,$6C,$64,$3A,$20,$4E,$6F,$74,$65,$20,$25,$33,$64,$20,$4F,$4E,$20,$61,$74,$20,$25,$38,$6C,$64,$2C,$20,$4F,$46,$46
+.dc.b $20,$61,$74,$20,$25,$38,$6C,$64,$A,$0
+L290:.dc.b $6E,$6F,$74,$65,$20,$65,$76,$65,$6E,$74,$0
+L292:.dc.b $6E,$6F,$74,$65,$20,$65,$76,$65,$6E,$74,$0
+L294:.dc.b $25,$38,$6C,$64,$3A,$20,$4E,$6F,$74,$65,$20,$25,$33,$64,$20,$4F,$4E,$20,$61,$74,$20,$25,$38,$6C,$64,$2C,$20,$4F,$46,$46
+.dc.b $20,$61,$74,$20,$25,$38,$6C,$64,$A,$0
+L325:.dc.b $53,$79,$6E,$74,$61,$78,$20,$65,$72,$72,$6F,$72,$0
Index: alcyon/sqselbx.s
===================================================================
--- alcyon/sqselbx.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/sqselbx.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1986 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _stmptr
+.globl _defptr
+.globl _patches
+.globl _defents
+.globl _seqtab
+.globl _seqflag
+.globl _seqline
+.globl _seqstim
+.globl _seqtime
+.globl _sregval
+.globl _trstate
+.globl _cmtype
+.globl _curslin
+.globl _stccol
+.globl _stcrow
+.globl _submenu
+.globl _vtccol
+.globl _vtcrow
+.globl _actlft
+.globl _sqatype
+.globl _obj11
+.globl _seqtab
+.globl _action
+.comm _action,2
+.globl _sqdeflg
+.comm _sqdeflg,2
+.globl _sqmenu
+.comm _sqmenu,2
+.globl _sqdebuf
+.comm _sqdebuf,50
+.globl _seqbuf
+.comm _seqbuf,14
+.globl _sqhilit
+.data
+_sqhilit:
+.dc.b $2
+.dc.b $D
+.dc.b $5
+.dc.b $5
+.dc.b $5
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.dc.b $11
+.dc.b $B
+.dc.b $5
+.dc.b $5
+.dc.b $5
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.dc.b $1E
+.dc.b $B
+.dc.b $5
+.dc.b $5
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.dc.b $2B
+.dc.b $8
+.dc.b $5
+.dc.b $5
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $0
+.dc.b $35
+.dc.b $8
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $2
+.dc.b $0
+.dc.b $0
+.globl _sqboxes
+.data
+_sqboxes:
+.dc.w $8
+.dc.w $7E
+.dc.w $17F
+.dc.w $8B
+.dc.w $0
+*line 70
+.dc.l _sqfnbox
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.l $0
+.globl _sqopreq
+.data
+_sqopreq:
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $1
+.even
+.globl _nextact
+.data
+_nextact:
+.dc.b $18
+.dc.b $24
+.dc.b $6
+.even
+.globl _sqidata
+.data
+_sqidata:
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $100
+.dc.w $100
+.dc.w $100
+.dc.w $100
+.dc.w $100
+.globl _actcol
+.data
+_actcol:
+.dc.b $0
+.dc.b $3
+.dc.b $3
+.dc.b $3
+.dc.b $3
+.dc.b $9
+.dc.b $9
+.dc.b $9
+.dc.b $9
+.dc.b $5
+.dc.b $5
+.dc.b $5
+.dc.b $5
+.dc.b $A
+.dc.b $8
+.dc.b $3
+.dc.b $5
+.even
+.globl _sqvcol
+.data
+_sqvcol:
+.dc.b $9
+.dc.b $8
+.dc.b $9
+.dc.b $9
+.globl _seqvcol
+.data
+_seqvcol:
+.dc.b $8
+.dc.b $8
+.dc.b $9
+.dc.b $9
+.dc.b $9
+.even
+.globl _sqndata
+.data
+_sqndata:
+.dc.w $100
+.dc.w $0
+.dc.w $200
+.dc.w $300
+.globl _hilitsq
+.text
+_hilitsq:
+~~hilitsq:
+~n=R7
+link R14,#0
+movem.l R2-R7,-(sp)
+~chr=R6
+~h=R5
+~v=R4
+~w=R3
+*line 138
+move.b 9(R14),R7
+*line 138
+move.b R7,R0
+ext.w R0
+move R0,_sqmenu
+*line 140
+clr R5
+bra L4
+L5:
+*line 141
+*line 142
+clr R4
+bra L8
+L9:
+*line 143
+*line 144
+move R5,R0
+asl #3,R0
+ext.l R0
+move.l R0,R8
+move.l #_sqhilit,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,R6
+*line 145
+*line 146
+move R5,R0
+asl #3,R0
+ext.l R0
+move.l R0,R8
+move.l #_sqhilit,R9
+move.b 1(R8,R9.l),R0
+ext.w R0
+move R0,R3
+bra L12
+L13:
+*line 147
+*line 148
+*line 149
+move #64,(sp)
+move.b R7,R0
+ext.w R0
+move R4,R9
+move R5,R2
+asl #3,R2
+ext.l R2
+add.l R2,R9
+add.l #_sqhilit,R9
+move.b 2(R9),R1
+ext.w R1
+and R1,R0
+beq L10000
+move #18,-(sp)
+bra L10002
+L10000:move #146,-(sp)
+L10002:move R6,-(sp)
+move R4,-(sp)
+add #1,(sp)
+move.l _obj11,-(sp)
+jsr _vsetcv
+adda.l #10,sp
+add #1,R6
+L11:L12:
+*line 146
+move R3,R0
+sub #1,R3
+tst R0
+bgt L13
+L10:
+*line 149
+L7:
+*line 142
+add #1,R4
+L8:
+*line 142
+cmp #5,R4
+blt L9
+L6:
+*line 150
+L3:
+*line 140
+add #1,R5
+L4:
+*line 140
+cmp #5,R5
+blt L5
+L2:L1:tst.l (sp)+
+movem.l (sp)+,R3-R7
+unlk R14
+rts
+.globl _postcm
+.text
+_postcm:
+~~postcm:
+link R14,#-4
+*line 165
+*line 165
+cmp #12,_stccol
+blt L15
+cmp #22,_stccol
+bgt L15
+*line 166
+*line 167
+*line 168
+cmp #12,_stccol
+blt L16
+cmp #13,_stccol
+bgt L16
+*line 168
+move #1,(sp)
+jsr _hilitsq
+bra L17
+L16:
+*line 169
+*line 170
+clr R0
+move 2+_seqbuf,R0
+and #255,R0
+move R0,R8
+move.l #_sqopreq,R9
+tst.b 0(R8,R9.l)
+beq L18
+cmp #19,_stccol
+bne L18
+*line 170
+move #2,(sp)
+jsr _hilitsq
+*line 171
+bra L19
+L18:
+*line 172
+clr (sp)
+jsr _hilitsq
+L19:L17:
+*line 173
+bra L14
+*line 174
+*line 175
+bra L20
+L15:
+*line 176
+*line 176
+cmp #24,_stccol
+blt L21
+cmp #34,_stccol
+bgt L21
+*line 177
+*line 178
+*line 179
+cmp #24,_stccol
+blt L22
+cmp #25,_stccol
+bgt L22
+*line 179
+move #1,(sp)
+jsr _hilitsq
+bra L23
+L22:
+*line 180
+*line 181
+clr R0
+move 6+_seqbuf,R0
+and #255,R0
+move R0,R8
+move.l #_sqopreq,R9
+tst.b 0(R8,R9.l)
+beq L24
+cmp #31,_stccol
+bne L24
+*line 181
+move #2,(sp)
+jsr _hilitsq
+*line 182
+bra L25
+L24:
+*line 183
+clr (sp)
+jsr _hilitsq
+L25:L23:
+*line 184
+bra L14
+*line 185
+*line 186
+bra L26
+L21:
+*line 187
+*line 187
+cmp #36,_stccol
+blt L27
+cmp #46,_stccol
+bgt L27
+*line 188
+*line 189
+*line 190
+cmp #36,_stccol
+blt L28
+cmp #37,_stccol
+bgt L28
+*line 190
+move #4,(sp)
+jsr _hilitsq
+bra L29
+L28:
+*line 191
+*line 192
+clr R0
+move 10+_seqbuf,R0
+and #255,R0
+move R0,R8
+move.l #_sqopreq,R9
+tst.b 0(R8,R9.l)
+beq L30
+cmp #43,_stccol
+bne L30
+*line 192
+move #2,(sp)
+jsr _hilitsq
+*line 193
+bra L31
+L30:
+*line 194
+clr (sp)
+jsr _hilitsq
+L31:L29:
+*line 195
+bra L14
+*line 196
+*line 197
+bra L32
+L27:
+*line 198
+*line 199
+*line 200
+clr (sp)
+jsr _hilitsq
+bra L14
+*line 201
+L32:L26:L20:L14:unlk R14
+rts
+.globl _movestc
+.text
+_movestc:
+~~movestc:
+~r=8
+~c=10
+link R14,#-4
+*line 217
+move 10(R14),(sp)
+move 8(R14),-(sp)
+jsr _ctcpos
+addq.l #2,sp
+*line 218
+jsr _postcm
+L33:unlk R14
+rts
+.globl _endssm
+.text
+_endssm:
+~~endssm:
+~row=8
+~col=10
+link R14,#-4
+*line 230
+clr _submenu
+*line 231
+move #4,_cmtype
+*line 233
+jsr _mtcoff
+*line 234
+jsr _ctcon
+*line 235
+move 10(R14),(sp)
+move 8(R14),-(sp)
+jsr _movestc
+addq.l #2,sp
+L34:unlk R14
+rts
+.globl _setsqm
+.text
+_setsqm:
+~~setsqm:
+~r=8
+~c=10
+link R14,#-4
+*line 250
+move #1,_submenu
+*line 251
+move #5,_cmtype
+*line 252
+move 10(R14),(sp)
+move 8(R14),-(sp)
+jsr _mtcpos
+addq.l #2,sp
+L35:unlk R14
+rts
+.globl _sqenter
+.text
+_sqenter:
+~~sqenter:
+link R14,#-14
+movem.l R4-R7/R12-R13,-(sp)
+~i=R7
+~lcol=R6
+~ltemp=R5
+~ap=R13
+~dp=R12
+~theact=-2
+~port=-4
+~chan=-6
+~key=-8
+~val=-10
+~obj=-12
+~dtype=-14
+*line 272
+move _action,R0
+bra L38
+*line 273
+L39:
+*line 274
+*line 275
+*line 276
+move.l #2+_seqbuf,R13
+*line 277
+move.l #4+_seqbuf,R12
+bra L37
+*line 278
+*line 279
+L40:
+*line 280
+*line 281
+*line 282
+move.l #6+_seqbuf,R13
+*line 283
+move.l #8+_seqbuf,R12
+bra L37
+*line 284
+*line 285
+L41:
+*line 286
+*line 287
+*line 288
+move.l #10+_seqbuf,R13
+*line 289
+move.l #12+_seqbuf,R12
+bra L37
+*line 290
+*line 291
+L42:
+*line 292
+*line 293
+*line 294
+clr _action
+*line 295
+move _action,R8
+move.l #_actlft,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+move #9,-(sp)
+jsr _movestc
+addq.l #2,sp
+*line 296
+move #-1,R0
+bra L36
+bra L37
+L38:tst R0
+beq L39
+cmp #1,R0
+beq L40
+cmp #2,R0
+beq L41
+bra L42
+L37:
+*line 301
+move _action,R8
+move.l #_actlft,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,R6
+*line 302
+clr R0
+move (R13),R0
+and #255,R0
+move R0,-2(R14)
+*line 304
+clr R0
+move -2(R14),R0
+bra L44
+*line 305
+L45:
+*line 306
+L46:
+*line 307
+L47:
+*line 308
+L48:
+*line 309
+*line 310
+*line 311
+clr.l R5
+*line 312
+*line 313
+move R6,R7
+add #3,R7
+bra L51
+L52:
+*line 314
+move.l #$a,-(sp)
+move.l R5,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,R5
+move.l #_sqdebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add #-48,R0
+ext.l R0
+add.l R0,R5
+L50:
+*line 313
+add #1,R7
+L51:
+*line 313
+move R6,R0
+add #6,R0
+cmp R0,R7
+blt L52
+L49:
+*line 314
+*line 315
+*line 316
+*line 316
+cmp.l #$1,R5
+blt L10003
+cmp.l #$80,R5
+ble L53
+L10003:*line 317
+*line 318
+move _action,R8
+move.l #_actlft,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+add #3,(sp)
+move #9,-(sp)
+jsr _movestc
+addq.l #2,sp
+*line 319
+move #-1,R0
+bra L36
+*line 320
+*line 321
+L53:
+*line 322
+move.l R5,R0
+sub.l #$1,R0
+move R0,-8(R14)
+*line 323
+*line 324
+*line 325
+move.l #_sqdebuf,R8
+move.b 7(R8,R6),R0
+ext.w R0
+move R0,R7
+*line 326
+*line 327
+*line 327
+cmp #49,R7
+beq L10004
+cmp #50,R7
+bne L54
+L10004:*line 328
+*line 329
+move R7,R0
+add #-49,R0
+move R0,-4(R14)
+*line 330
+bra L55
+L54:
+*line 331
+*line 331
+cmp #76,R7
+bne L56
+*line 332
+*line 333
+move #2,-4(R14)
+*line 334
+bra L57
+L56:
+*line 335
+*line 336
+*line 337
+move _action,R8
+move.l #_actlft,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+add #7,(sp)
+move #9,-(sp)
+jsr _movestc
+addq.l #2,sp
+*line 338
+move #-1,R0
+bra L36
+L57:L55:
+*line 339
+*line 340
+*line 341
+*line 342
+move.l #_sqdebuf,R8
+move.b 9(R8,R6),R0
+ext.w R0
+add #-48,R0
+muls #10,R0
+move.l #_sqdebuf,R9
+move.b 10(R9,R6),R1
+ext.w R1
+add R1,R0
+add #-48,R0
+ext.l R0
+move.l R0,R5
+*line 343
+*line 344
+*line 344
+cmp.l #$1,R5
+blt L10005
+cmp.l #$10,R5
+ble L58
+L10005:*line 345
+*line 346
+move _action,R8
+move.l #_actlft,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+add #9,(sp)
+move #9,-(sp)
+jsr _movestc
+addq.l #2,sp
+*line 347
+move #-1,R0
+bra L36
+*line 348
+*line 349
+L58:
+*line 350
+move.l R5,R0
+sub.l #$1,R0
+move R0,-6(R14)
+*line 351
+clr R0
+move -4(R14),R0
+move #11,R1
+lsl R1,R0
+clr R1
+move -6(R14),R1
+lsl #7,R1
+or R1,R0
+or -8(R14),R0
+move R0,(R12)
+*line 352
+bra L43
+*line 353
+*line 354
+*line 355
+L59:
+*line 356
+L60:
+*line 357
+L61:
+*line 358
+*line 359
+*line 360
+*line 361
+move.l #_sqdebuf,R8
+move.b 9(R8,R6),R0
+ext.w R0
+add #-48,R0
+muls #10,R0
+move.l #_sqdebuf,R9
+move.b 10(R9,R6),R1
+ext.w R1
+add R1,R0
+add #-48,R0
+ext.l R0
+move.l R0,R5
+*line 362
+*line 363
+*line 363
+cmp.l #$1,R5
+blt L10006
+cmp.l #$10,R5
+ble L62
+L10006:*line 364
+*line 365
+move _action,R8
+move.l #_actlft,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+add #9,(sp)
+move #9,-(sp)
+jsr _movestc
+addq.l #2,sp
+*line 366
+move #-1,R0
+bra L36
+*line 367
+*line 368
+L62:
+*line 369
+move.l R5,R0
+sub.l #$1,R0
+move R0,(R12)
+*line 370
+bra L43
+*line 371
+*line 372
+L63:
+*line 373
+L64:
+*line 374
+L65:
+*line 375
+L66:
+*line 376
+*line 377
+bra L43
+*line 378
+*line 379
+L67:
+*line 380
+*line 381
+*line 382
+clr.l R5
+*line 383
+*line 384
+move R6,R7
+add #8,R7
+bra L70
+L71:
+*line 385
+move.l #$a,-(sp)
+move.l R5,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,R5
+move.l #_sqdebuf,R8
+move.b 0(R8,R7),R0
+ext.w R0
+add #-48,R0
+ext.l R0
+add.l R0,R5
+L69:
+*line 384
+add #1,R7
+L70:
+*line 384
+move R6,R0
+add #11,R0
+cmp R0,R7
+blt L71
+L68:
+*line 385
+*line 386
+*line 387
+move R5,(R12)
+*line 388
+bra L43
+*line 389
+*line 390
+*line 391
+L72:
+*line 392
+L73:
+*line 393
+L74:
+*line 394
+L75:
+*line 395
+L76:
+*line 396
+*line 397
+*line 398
+clr R0
+move (R12),R0
+and #3840,R0
+move R0,-14(R14)
+*line 399
+*line 400
+*line 401
+move.l #_sqdebuf,R8
+move.b 5(R8,R6),R0
+ext.w R0
+add #-48,R0
+muls #10,R0
+move.l #_sqdebuf,R9
+move.b 6(R9,R6),R1
+ext.w R1
+add R1,R0
+add #-48,R0
+ext.l R0
+move.l R0,R5
+*line 402
+*line 403
+*line 403
+cmp.l #$1,R5
+blt L10007
+cmp.l #$10,R5
+ble L77
+L10007:*line 404
+*line 405
+move _action,R8
+move.l #_actlft,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+add #5,(sp)
+move #9,-(sp)
+jsr _movestc
+addq.l #2,sp
+*line 406
+move #-1,R0
+bra L36
+*line 407
+*line 408
+L77:
+*line 409
+move.l R5,R0
+sub.l #$1,R0
+move R0,-12(R14)
+*line 410
+*line 411
+clr R0
+move -14(R14),R0
+bra L79
+*line 412
+L80:
+*line 413
+*line 414
+*line 415
+*line 416
+move.l #_sqdebuf,R8
+move.b 9(R8,R6),R0
+ext.w R0
+add #-48,R0
+muls #10,R0
+move.l #_sqdebuf,R9
+move.b 10(R9,R6),R1
+ext.w R1
+add R1,R0
+add #-48,R0
+ext.l R0
+move.l R0,R5
+*line 417
+*line 418
+*line 418
+cmp.l #$1,R5
+blt L10008
+cmp.l #$10,R5
+ble L81
+L10008:*line 419
+*line 420
+move _action,R8
+move.l #_actlft,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+add #9,(sp)
+move #9,-(sp)
+jsr _movestc
+addq.l #2,sp
+*line 421
+move #-1,R0
+bra L36
+*line 422
+*line 423
+L81:
+*line 424
+move.l R5,R0
+sub.l #$1,R0
+move R0,-10(R14)
+bra L78
+*line 425
+*line 426
+L82:
+*line 427
+*line 428
+*line 429
+*line 430
+move.l #_sqdebuf,R8
+move.b 8(R8,R6),R0
+ext.w R0
+add #-48,R0
+muls #10,R0
+move.l #_sqdebuf,R9
+move.b 9(R9,R6),R1
+ext.w R1
+add R1,R0
+add #-48,R0
+move R0,-10(R14)
+*line 431
+bra L78
+*line 432
+*line 433
+*line 434
+L83:
+*line 435
+*line 436
+*line 437
+move.l #_sqdebuf,R8
+move.b 9(R8,R6),R0
+ext.w R0
+add #-49,R0
+move R0,-10(R14)
+bra L78
+*line 438
+*line 439
+L84:
+*line 440
+*line 441
+*line 442
+move.l #_sqdebuf,R8
+move.b 9(R8,R6),R0
+ext.w R0
+add #-48,R0
+move R0,-10(R14)
+bra L78
+*line 443
+*line 444
+L85:
+*line 445
+*line 446
+*line 447
+move _action,R8
+move.l #_actlft,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+add #8,(sp)
+move #9,-(sp)
+jsr _movestc
+addq.l #2,sp
+*line 448
+move #-1,R0
+bra L36
+bra L78
+L79:tst R0
+beq L80
+cmp #256,R0
+beq L82
+cmp #512,R0
+beq L83
+cmp #768,R0
+beq L84
+bra L85
+L78:
+*line 449
+*line 450
+*line 451
+*line 452
+*line 453
+clr R0
+move (R13),R0
+and #255,R0
+cmp #16,R0
+bne L86
+move R6,R8
+add.l #_sqdebuf,R8
+cmp.b #45,7(R8)
+bne L86
+*line 453
+or #4096,-10(R14)
+*line 454
+L86:
+*line 455
+clr R0
+move (R13),R0
+and #255,R0
+clr R1
+move -12(R14),R1
+lsl #8,R1
+or R1,R0
+move R0,(R13)
+*line 456
+clr R0
+move (R12),R0
+and #3840,R0
+or -10(R14),R0
+move R0,(R12)
+*line 457
+bra L43
+*line 458
+*line 459
+L87:
+*line 460
+*line 461
+*line 462
+move _action,R8
+move.l #_actlft,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+move #9,-(sp)
+jsr _movestc
+addq.l #2,sp
+*line 463
+move #-1,R0
+bra L36
+bra L43
+L44:cmp #16,R0
+bhi L87
+asl #2,R0
+move R0,R8
+add.l #L88,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L88:.dc.l L63
+.dc.l L46
+.dc.l L47
+.dc.l L45
+.dc.l L48
+.dc.l L59
+.dc.l L60
+.dc.l L61
+.dc.l L64
+.dc.l L72
+.dc.l L74
+.dc.l L75
+.dc.l L76
+.dc.l L66
+.dc.l L67
+.dc.l L65
+.dc.l L73
+.text
+L43:
+*line 467
+move #7,(sp)
+move.l #_seqbuf,-(sp)
+move _curslin,R0
+muls #14,R0
+add.l #_seqtab,R0
+move.l R0,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 468
+move _curslin,(sp)
+move.l #_sqdebuf,-(sp)
+jsr _dsqlin
+addq.l #4,sp
+*line 469
+move #1,_sqdeflg
+*line 470
+jsr _dcursq
+*line 471
+move _action,R8
+move.l #_nextact,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+move #9,-(sp)
+jsr _movestc
+addq.l #2,sp
+*line 472
+clr R0
+bra L36
+L36:tst.l (sp)+
+movem.l (sp)+,R5-R7/R12-R13
+unlk R14
+rts
+.globl _sqfnbox
+.text
+_sqfnbox:
+~~sqfnbox:
+~n=8
+link R14,#-4
+movem.l R4-R7,-(sp)
+~act=-2
+~vtype=-4
+~box=R7
+~i=R6
+~ltemp=R5
+*line 493
+*line 493
+tst _submenu
+bne L90
+*line 494
+*line 495
+*line 495
+cmp #2,_stccol
+blt L91
+cmp #4,_stccol
+bgt L91
+*line 496
+*line 497
+clr.l R5
+*line 498
+*line 499
+move #2,R6
+bra L94
+L95:
+*line 500
+move.l #$a,-(sp)
+move.l R5,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,R5
+move.l #_sqdebuf,R8
+move.b 0(R8,R6),R0
+ext.w R0
+add #-48,R0
+ext.l R0
+add.l R0,R5
+L93:
+*line 499
+add #1,R6
+L94:
+*line 499
+cmp #5,R6
+blt L95
+L92:
+*line 500
+*line 501
+*line 502
+move R5,_curslin
+*line 503
+clr _sqdeflg
+*line 504
+jsr _dstw
+*line 505
+move #2,(sp)
+move #9,-(sp)
+jsr _movestc
+addq.l #2,sp
+*line 506
+clr R0
+bra L89
+*line 507
+bra L96
+L91:
+*line 508
+*line 508
+cmp #6,_stccol
+blt L97
+cmp #10,_stccol
+bgt L97
+*line 509
+*line 510
+clr.l R5
+*line 511
+*line 512
+move #6,R6
+bra L100
+L101:
+*line 513
+move.l #$a,-(sp)
+move.l R5,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,R5
+move.l #_sqdebuf,R8
+move.b 0(R8,R6),R0
+ext.w R0
+add #-48,R0
+ext.l R0
+add.l R0,R5
+L99:
+*line 512
+add #1,R6
+L100:
+*line 512
+cmp #8,R6
+blt L101
+L98:
+*line 513
+*line 514
+*line 515
+move #9,R6
+bra L104
+L105:
+*line 516
+move.l #$a,-(sp)
+move.l R5,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,R5
+move.l #_sqdebuf,R8
+move.b 0(R8,R6),R0
+ext.w R0
+add #-48,R0
+ext.l R0
+add.l R0,R5
+L103:
+*line 515
+add #1,R6
+L104:
+*line 515
+cmp #11,R6
+blt L105
+L102:
+*line 516
+*line 517
+*line 518
+move.l R5,R0
+move _curslin,R1
+muls #14,R1
+add.l #_seqtab,R1
+move.l R1,R9
+move R0,(R9)
+*line 519
+move R5,_seqbuf
+*line 520
+move _curslin,(sp)
+move.l #_sqdebuf,-(sp)
+jsr _dsqlin
+addq.l #4,sp
+*line 521
+move #1,_sqdeflg
+*line 522
+jsr _dcursq
+*line 523
+move #12,(sp)
+move #9,-(sp)
+jsr _movestc
+addq.l #2,sp
+*line 524
+clr R0
+bra L89
+*line 525
+*line 526
+bra L106
+L97:
+*line 527
+*line 527
+cmp #12,_stccol
+blt L107
+cmp #22,_stccol
+bgt L107
+*line 528
+*line 529
+clr _action
+*line 530
+*line 531
+*line 531
+cmp #12,_stccol
+blt L108
+cmp #13,_stccol
+bgt L108
+*line 532
+*line 533
+move #2,(sp)
+move #19,-(sp)
+jsr _setsqm
+addq.l #2,sp
+*line 534
+clr R0
+bra L89
+*line 535
+bra L109
+L108:
+*line 536
+*line 537
+clr R0
+move 2+_seqbuf,R0
+and #255,R0
+move R0,R8
+move.l #_sqopreq,R9
+tst.b 0(R8,R9.l)
+beq L110
+cmp #19,_stccol
+bne L110
+*line 538
+*line 539
+move #53,(sp)
+move #19,-(sp)
+jsr _setsqm
+addq.l #2,sp
+*line 540
+clr R0
+bra L89
+*line 541
+bra L111
+L110:
+*line 542
+*line 543
+*line 544
+jsr _sqenter
+bra L89
+L111:L109:
+*line 545
+*line 546
+bra L112
+L107:
+*line 547
+*line 547
+cmp #24,_stccol
+blt L113
+cmp #34,_stccol
+bgt L113
+*line 548
+*line 549
+move #1,_action
+*line 550
+*line 551
+*line 551
+cmp #24,_stccol
+blt L114
+cmp #25,_stccol
+bgt L114
+*line 552
+*line 553
+move #2,(sp)
+move #19,-(sp)
+jsr _setsqm
+addq.l #2,sp
+*line 554
+clr R0
+bra L89
+*line 555
+bra L115
+L114:
+*line 556
+*line 557
+clr R0
+move 6+_seqbuf,R0
+and #255,R0
+move R0,R8
+move.l #_sqopreq,R9
+tst.b 0(R8,R9.l)
+beq L116
+cmp #31,_stccol
+bne L116
+*line 558
+*line 559
+move #53,(sp)
+move #19,-(sp)
+jsr _setsqm
+addq.l #2,sp
+*line 560
+clr R0
+bra L89
+*line 561
+bra L117
+L116:
+*line 562
+*line 563
+*line 564
+jsr _sqenter
+bra L89
+L117:L115:
+*line 565
+*line 566
+*line 567
+bra L118
+L113:
+*line 568
+*line 568
+cmp #36,_stccol
+blt L119
+cmp #46,_stccol
+bgt L119
+*line 569
+*line 570
+move #2,_action
+*line 571
+*line 572
+*line 572
+cmp #36,_stccol
+blt L120
+cmp #37,_stccol
+bgt L120
+*line 573
+*line 574
+move #2,(sp)
+move #19,-(sp)
+jsr _setsqm
+addq.l #2,sp
+*line 575
+clr R0
+bra L89
+*line 576
+bra L121
+L120:
+*line 577
+*line 578
+clr R0
+move 10+_seqbuf,R0
+and #255,R0
+move R0,R8
+move.l #_sqopreq,R9
+tst.b 0(R8,R9.l)
+beq L122
+cmp #43,_stccol
+bne L122
+*line 579
+*line 580
+move #53,(sp)
+move #19,-(sp)
+jsr _setsqm
+addq.l #2,sp
+*line 581
+clr R0
+bra L89
+*line 582
+bra L123
+L122:
+*line 583
+*line 584
+*line 585
+jsr _sqenter
+bra L89
+L123:L121:
+*line 586
+*line 587
+*line 588
+bra L124
+L119:
+*line 589
+move #-1,R0
+bra L89
+L124:L118:L112:L106:L96:
+*line 590
+*line 591
+bra L125
+L90:
+*line 592
+*line 593
+*line 594
+*line 595
+*line 596
+*line 597
+cmp #2,_vtccol
+blt L126
+cmp #14,_vtccol
+bgt L126
+*line 597
+move _vtcrow,R7
+add #-18,R7
+bra L127
+L126:
+*line 598
+*line 599
+cmp #17,_vtccol
+blt L128
+cmp #27,_vtccol
+bgt L128
+*line 599
+move _vtcrow,R7
+add #-14,R7
+bra L129
+L128:
+*line 600
+*line 601
+cmp #30,_vtccol
+blt L130
+cmp #40,_vtccol
+bgt L130
+*line 601
+move _vtcrow,R7
+add #-10,R7
+bra L131
+L130:
+*line 602
+*line 603
+cmp #43,_vtccol
+blt L132
+cmp #50,_vtccol
+bgt L132
+*line 603
+move _vtcrow,R7
+sub #6,R7
+bra L133
+L132:
+*line 604
+*line 605
+cmp #53,_vtccol
+blt L134
+cmp #60,_vtccol
+bgt L134
+*line 605
+move _vtcrow,R7
+sub #1,R7
+*line 606
+bra L135
+L134:
+*line 607
+move #-1,R0
+bra L89
+L135:L133:L131:L129:L127:
+*line 608
+*line 609
+*line 610
+move _sqmenu,R0
+bra L137
+*line 611
+L138:
+*line 612
+L139:
+*line 613
+*line 614
+*line 615
+*line 616
+cmp #18,R7
+blt L140
+cmp #21,R7
+bgt L140
+*line 616
+move #-1,R0
+bra L89
+*line 617
+L140:
+*line 618
+move _action,R0
+bra L142
+*line 619
+L143:
+*line 620
+*line 621
+*line 622
+move R7,R8
+add.l R8,R8
+move.l #_sqatype,R9
+move 0(R8,R9.l),R0
+move R0,2+_seqbuf
+and #255,R0
+move R0,-2(R14)
+*line 623
+move R7,R8
+add.l R8,R8
+move.l #_sqidata,R9
+move 0(R8,R9.l),R0
+move R0,4+_seqbuf
+lsr #8,R0
+and #15,R0
+move R0,-4(R14)
+bra L141
+*line 624
+*line 625
+L144:
+*line 626
+*line 627
+*line 628
+move R7,R8
+add.l R8,R8
+move.l #_sqatype,R9
+move 0(R8,R9.l),R0
+move R0,6+_seqbuf
+and #255,R0
+move R0,-2(R14)
+*line 629
+move R7,R8
+add.l R8,R8
+move.l #_sqidata,R9
+move 0(R8,R9.l),R0
+move R0,8+_seqbuf
+lsr #8,R0
+and #15,R0
+move R0,-4(R14)
+bra L141
+*line 630
+*line 631
+L145:
+*line 632
+*line 633
+*line 634
+*line 635
+*line 636
+cmp #4,R7
+beq L10009
+cmp #8,R7
+beq L10009
+cmp #12,R7
+beq L10009
+cmp #15,R7
+blt L146
+cmp #17,R7
+bgt L146
+L10009:*line 636
+move #-1,R0
+bra L89
+*line 637
+L146:
+*line 638
+move R7,R8
+add.l R8,R8
+move.l #_sqatype,R9
+move 0(R8,R9.l),R0
+move R0,10+_seqbuf
+and #255,R0
+move R0,-2(R14)
+*line 639
+move R7,R8
+add.l R8,R8
+move.l #_sqidata,R9
+move 0(R8,R9.l),R0
+move R0,12+_seqbuf
+lsr #8,R0
+and #15,R0
+move R0,-4(R14)
+bra L141
+*line 640
+bra L141
+L142:tst R0
+beq L143
+cmp #1,R0
+beq L144
+cmp #2,R0
+beq L145
+bra L141
+L141:
+*line 641
+*line 642
+*line 643
+move #7,(sp)
+move.l #_seqbuf,-(sp)
+move _curslin,R0
+muls #14,R0
+add.l #_seqtab,R0
+move.l R0,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 644
+move _curslin,(sp)
+move.l #_sqdebuf,-(sp)
+jsr _dsqlin
+addq.l #4,sp
+*line 645
+move #1,_sqdeflg
+*line 646
+jsr _dcursq
+*line 647
+*line 648
+*line 649
+move -2(R14),R8
+move.l #_sqopreq,R9
+tst.b 0(R8,R9.l)
+beq L147
+*line 649
+move _action,R8
+move.l #_actlft,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+move -4(R14),R8
+move.l #_sqvcol,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+add R0,(sp)
+move _stcrow,-(sp)
+jsr _endssm
+addq.l #2,sp
+bra L148
+L147:
+*line 650
+*line 651
+cmp #13,-2(R14)
+beq L10010
+cmp #15,-2(R14)
+bne L149
+L10010:*line 651
+move _action,R8
+move.l #_nextact,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+move _stcrow,-(sp)
+jsr _endssm
+addq.l #2,sp
+*line 652
+bra L150
+L149:
+*line 653
+move _action,R8
+move.l #_actlft,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+move -2(R14),R8
+move.l #_actcol,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+add R0,(sp)
+move _stcrow,-(sp)
+jsr _endssm
+addq.l #2,sp
+L150:L148:
+*line 654
+*line 655
+clr R0
+bra L89
+*line 656
+*line 657
+L151:
+*line 658
+*line 659
+*line 660
+*line 661
+cmp #18,R7
+blt L10011
+cmp #21,R7
+ble L152
+L10011:*line 661
+move #-1,R0
+bra L89
+*line 662
+L152:
+*line 663
+move _action,R0
+bra L154
+*line 664
+L155:
+*line 665
+*line 666
+*line 667
+*line 668
+clr R0
+move 2+_seqbuf,R0
+and #255,R0
+move R0,-2(R14)
+move R0,R8
+move.l #_sqopreq,R9
+tst.b 0(R8,R9.l)
+bne L156
+*line 668
+move #-1,R0
+bra L89
+*line 669
+L156:
+*line 670
+clr R0
+move 4+_seqbuf,R0
+and #-4096,R0
+move R7,R9
+add #-18,R9
+add.l R9,R9
+add.l #_sqndata,R9
+move (R9),R1
+or R1,R0
+move R0,4+_seqbuf
+bra L153
+*line 671
+*line 672
+L157:
+*line 673
+*line 674
+*line 675
+*line 676
+clr R0
+move 6+_seqbuf,R0
+and #255,R0
+move R0,-2(R14)
+move R0,R8
+move.l #_sqopreq,R9
+tst.b 0(R8,R9.l)
+bne L158
+*line 676
+move #-1,R0
+bra L89
+*line 677
+L158:
+*line 678
+clr R0
+move 8+_seqbuf,R0
+and #-4096,R0
+move R7,R9
+add #-18,R9
+add.l R9,R9
+add.l #_sqndata,R9
+move (R9),R1
+or R1,R0
+move R0,8+_seqbuf
+bra L153
+*line 679
+*line 680
+L159:
+*line 681
+*line 682
+*line 683
+*line 684
+clr R0
+move 10+_seqbuf,R0
+and #255,R0
+move R0,-2(R14)
+move R0,R8
+move.l #_sqopreq,R9
+tst.b 0(R8,R9.l)
+bne L160
+*line 684
+move #-1,R0
+bra L89
+*line 685
+L160:
+*line 686
+clr R0
+move 12+_seqbuf,R0
+and #-4096,R0
+move R7,R9
+add #-18,R9
+add.l R9,R9
+add.l #_sqndata,R9
+move (R9),R1
+or R1,R0
+move R0,12+_seqbuf
+bra L153
+*line 687
+bra L153
+L154:tst R0
+beq L155
+cmp #1,R0
+beq L157
+cmp #2,R0
+beq L159
+bra L153
+L153:
+*line 688
+*line 689
+bra L136
+*line 690
+*line 691
+L161:
+*line 692
+*line 693
+*line 694
+move _stccol,(sp)
+move _stcrow,-(sp)
+jsr _endssm
+addq.l #2,sp
+*line 695
+move #-1,R0
+bra L89
+bra L136
+L137:cmp #1,R0
+beq L138
+cmp #2,R0
+beq L151
+cmp #4,R0
+beq L139
+bra L161
+L136:
+*line 696
+*line 697
+*line 698
+move #7,(sp)
+move.l #_seqbuf,-(sp)
+move _curslin,R0
+muls #14,R0
+add.l #_seqtab,R0
+move.l R0,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 699
+move _curslin,(sp)
+move.l #_sqdebuf,-(sp)
+jsr _dsqlin
+addq.l #4,sp
+*line 700
+move #1,_sqdeflg
+*line 701
+jsr _dcursq
+*line 702
+move _action,R8
+move.l #_actlft,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,(sp) 
+move.l #_seqvcol,R8
+move.b -18(R8,R7),R0
+ext.w R0
+add R0,(sp)
+move _stcrow,-(sp)
+jsr _endssm
+addq.l #2,sp
+*line 703
+clr R0
+bra L89
+L125:
+*line 706
+move #-1,R0
+bra L89
+L89:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
Index: alcyon/sqwrite.s
===================================================================
--- alcyon/sqwrite.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/sqwrite.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,387 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.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 _stmptr
+.globl _defptr
+.globl _patches
+.globl _defents
+.globl _seqtab
+.globl _seqflag
+.globl _seqline
+.globl _seqstim
+.globl _seqtime
+.globl _sregval
+.globl _trstate
+.globl _filecat
+.globl _sqsizer
+.text
+_sqsizer:
+~~sqsizer:
+link R14,#0
+movem.l R4-R7,-(sp)
+~i=R7
+~na=R6
+~nb=R5
+*line 42
+clr.l R5
+*line 44
+clr R7
+bra L4
+L5:
+*line 45
+*line 46
+clr R6
+*line 47
+*line 48
+*line 49
+move R7,R0
+muls #14,R0
+move.l R0,R8
+move.l #_seqtab,R9
+tst 0(R8,R9.l)
+beq L6
+*line 49
+add #2,R6
+*line 50
+L6:
+*line 51
+*line 52
+move R7,R0
+muls #14,R0
+move.l R0,R8
+move.l #_seqtab,R9
+tst 2(R8,R9.l)
+beq L7
+*line 52
+add #4,R6
+*line 53
+L7:
+*line 54
+*line 55
+move R7,R0
+muls #14,R0
+move.l R0,R8
+move.l #_seqtab,R9
+tst 6(R8,R9.l)
+beq L8
+*line 55
+add #4,R6
+*line 56
+L8:
+*line 57
+*line 58
+move R7,R0
+muls #14,R0
+move.l R0,R8
+move.l #_seqtab,R9
+tst 10(R8,R9.l)
+beq L9
+*line 58
+add #4,R6
+*line 59
+L9:
+*line 60
+*line 61
+tst R6
+beq L10
+*line 61
+move R6,R0
+add #3,R0
+ext.l R0
+add.l R0,R5
+L10:L3:
+*line 44
+add #1,R7
+L4:
+*line 44
+cmp #1000,R7
+blt L5
+L2:
+*line 64
+*line 65
+tst.l R5
+beq L11
+*line 65
+add.l #$1,R5
+*line 66
+*line 70
+*line 71
+L11:
+*line 72
+move.l R5,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _sqwrite
+.text
+_sqwrite:
+~~sqwrite:
+~fp=R13
+link R14,#-54
+movem.l R7-R7/R13-R13,-(sp)
+~seq=-2
+~cb=-4
+~zero=-6
+~scid=-54
+*line 97
+move.l 8(R14),R13
+*line 97
+clr.b -6(R14)
+*line 99
+*line 100
+move #9,(sp)
+move #12,-(sp)
+move.l #L14,-(sp)
+clr.l -(sp)
+move.l #L13,-(sp)
+jsr _ldwmsg
+adda.l #14,sp
+*line 102
+clr -2(R14)
+bra L17
+L18:
+*line 103
+*line 104
+clr.b -4(R14)
+*line 105
+*line 106
+*line 107
+move -2(R14),R0
+muls #14,R0
+move.l R0,R8
+move.l #_seqtab,R9
+tst 0(R8,R9.l)
+beq L19
+*line 107
+or.b #8,-4(R14)
+*line 108
+L19:
+*line 109
+*line 110
+move -2(R14),R0
+muls #14,R0
+move.l R0,R8
+move.l #_seqtab,R9
+tst 2(R8,R9.l)
+beq L20
+*line 110
+or.b #4,-4(R14)
+*line 111
+L20:
+*line 112
+*line 113
+move -2(R14),R0
+muls #14,R0
+move.l R0,R8
+move.l #_seqtab,R9
+tst 6(R8,R9.l)
+beq L21
+*line 113
+or.b #2,-4(R14)
+*line 114
+L21:
+*line 115
+*line 116
+move -2(R14),R0
+muls #14,R0
+move.l R0,R8
+move.l #_seqtab,R9
+tst 10(R8,R9.l)
+beq L22
+*line 116
+or.b #1,-4(R14)
+*line 117
+L22:
+*line 118
+*line 119
+tst.b -4(R14)
+beq L16
+*line 120
+*line 121
+*line 122
+move.l #$1,(sp)
+move.l R14,-(sp)
+sub.l #4,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L23
+*line 122
+move #-1,R0
+bra L12
+*line 123
+L23:
+*line 124
+*line 125
+move.l #$2,(sp)
+move.l R14,-(sp)
+sub.l #2,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L24
+*line 125
+move #-1,R0
+bra L12
+*line 126
+L24:
+*line 127
+*line 128
+btst #3,-4(R14)
+beq L25
+*line 128
+*line 129
+move.l #$2,(sp)
+move -2(R14),R0
+muls #14,R0
+add.l #_seqtab,R0
+move.l R0,-(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L26
+*line 129
+move #-1,R0
+bra L12
+*line 130
+L26:L25:
+*line 131
+*line 132
+btst #2,-4(R14)
+beq L27
+*line 132
+*line 133
+move.l #$4,(sp)
+move -2(R14),R0
+muls #14,R0
+add.l #_seqtab,R0
+move.l R0,-(sp)
+add.l #2,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L28
+*line 133
+move #-1,R0
+bra L12
+*line 134
+L28:L27:
+*line 135
+*line 136
+btst #1,-4(R14)
+beq L29
+*line 136
+*line 137
+move.l #$4,(sp)
+move -2(R14),R0
+muls #14,R0
+add.l #_seqtab,R0
+move.l R0,-(sp)
+add.l #6,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L30
+*line 137
+move #-1,R0
+bra L12
+*line 138
+L30:L29:
+*line 139
+*line 140
+btst #0,-4(R14)
+beq L31
+*line 140
+*line 141
+move.l #$4,(sp)
+move -2(R14),R0
+muls #14,R0
+add.l #_seqtab,R0
+move.l R0,-(sp)
+add.l #10,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L32
+*line 141
+move #-1,R0
+bra L12
+L32:L31:L16:
+*line 102
+add #1,-2(R14)
+L17:
+*line 102
+cmp #1000,-2(R14)
+blt L18
+L15:
+*line 144
+*line 145
+move.l #$1,(sp)
+move.l R14,-(sp)
+sub.l #6,(sp)
+move.l R13,-(sp)
+jsr _wr_ec
+addq.l #8,sp
+tst R0
+beq L33
+*line 145
+move #-1,R0
+bra L12
+*line 146
+*line 150
+*line 151
+L33:
+*line 152
+clr R0
+bra L12
+L12:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.data
+L13:.dc.b $42,$75,$73,$79,$20,$2D,$2D,$20,$50,$6C,$65,$61,$73,$65,$20,$73,$74,$61,$6E,$64,$20,$62,$79,$0
+L14:.dc.b $20,$20,$77,$72,$69,$74,$69,$6E,$67,$20,$73,$65,$71,$75,$65,$6E,$63,$65,$73,$0
Index: alcyon/stcpos.s
===================================================================
--- alcyon/stcpos.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/stcpos.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1017 @@
+.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 _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _obj3
+.globl _cxval
+.globl _cyval
+.globl _stcrow
+.globl _stccol
+.globl _sctctab
+.globl _sctccon
+.data
+_sctccon:
+.dc.w $3
+.dc.w $3
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.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 $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.dc.w $4
+.globl _stcclr
+.text
+_stcclr:
+~~stcclr:
+link R14,#0
+movem.l R4-R7/R13-R13,-(sp)
+~obj=R13
+~i=R7
+~j=R6
+~k=R5
+*line 174
+*line 175
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+cmp #256,R0
+beq L2
+*line 175
+move #1,(sp)
+jsr _vbank
+*line 176
+L2:
+*line 177
+clr _stcrow
+*line 178
+clr _stccol
+*line 180
+move.l _obj3,R13
+*line 182
+clr R7
+bra L5
+L6:
+*line 183
+*line 184
+clr R6
+bra L9
+L10:
+*line 185
+*line 186
+move R7,R0
+asl #7,R0
+ext.l R0
+move R6,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_sctctab,R9
+move 0(R8,R9.l),(sp)
+jsr _exp_c
+move R0,R5
+*line 187
+*line 188
+move R5,(R13)+
+*line 189
+move R5,(R13)+
+L8:
+*line 184
+add #1,R6
+L9:
+*line 184
+cmp #64,R6
+blt L10
+L7:
+*line 190
+*line 191
+*line 192
+clr R6
+bra L13
+L14:
+*line 193
+*line 194
+cmp #5,R7
+bne L10000
+move #9,R0
+bra L10002
+L10000:move R7,R0
+L10002:asl #7,R0
+ext.l R0
+move R6,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_sctctab,R9
+move 0(R8,R9.l),(sp)
+jsr _exp_c
+move R0,R5
+*line 195
+*line 196
+move R5,(R13)+
+*line 197
+move R5,(R13)+
+L12:
+*line 192
+add #1,R6
+L13:
+*line 192
+cmp #64,R6
+blt L14
+L11:
+*line 198
+L4:
+*line 182
+add #1,R7
+L5:
+*line 182
+cmp #9,R7
+blt L6
+L3:L1:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.globl _stcoff
+.text
+_stcoff:
+~~stcoff:
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~ccv=R7
+~tcp=R13
+~tcrow=R6
+*line 216
+tst _stcrow
+beq L10003
+move _stcrow,R0
+add #-16,R0
+bra L10005
+L10003:clr R0
+L10005:move R0,R6
+*line 218
+*line 219
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+cmp #256,R0
+beq L16
+*line 219
+move #1,(sp)
+jsr _vbank
+*line 220
+L16:
+*line 221
+move R6,R0
+asl #8,R0
+asl #1,R0
+ext.l R0
+move.l R0,R13
+move _stccol,R0
+asl #1,R0
+asl #1,R0
+ext.l R0
+add.l R0,R13
+add.l _obj3,R13
+*line 225
+move R6,R0
+asl #7,R0
+ext.l R0
+move _stccol,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_sctctab,R9
+move 0(R8,R9.l),(sp)
+jsr _exp_c
+move R0,R7
+*line 227
+move R7,(R13)+
+*line 228
+move R7,(R13)
+L15:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.globl _stcpos
+.text
+_stcpos:
+~~stcpos:
+~row=8
+~col=10
+link R14,#0
+movem.l R3-R7/R12-R13,-(sp)
+~ccp=R13
+~tcp=R12
+~curson=R7
+~ccv=R6
+~ncrow=R5
+~tcrow=R4
+*line 247
+tst _stcrow
+beq L10006
+move _stcrow,R0
+add #-16,R0
+bra L10008
+L10006:clr R0
+L10008:move R0,R4
+*line 248
+tst 8(R14)
+beq L10009
+move 8(R14),R0
+add #-16,R0
+bra L10011
+L10009:clr R0
+L10011:move R0,R5
+*line 250
+*line 251
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+cmp #256,R0
+beq L18
+*line 251
+move #1,(sp)
+jsr _vbank
+*line 252
+L18:
+*line 253
+move #15,(sp)
+jsr _exp_c
+move R0,R7
+*line 257
+move R4,R0
+asl #7,R0
+ext.l R0
+move _stccol,R1
+asl #1,R1
+ext.l R1
+add.l R1,R0
+move.l R0,R8
+move.l #_sctctab,R9
+move 0(R8,R9.l),(sp)
+jsr _exp_c
+move R0,R6
+*line 259
+move R4,R0
+asl #8,R0
+asl #1,R0
+ext.l R0
+move.l R0,R12
+move _stccol,R0
+asl #1,R0
+asl #1,R0
+ext.l R0
+add.l R0,R12
+add.l _obj3,R12
+*line 260
+move R5,R0
+asl #8,R0
+asl #1,R0
+ext.l R0
+move.l R0,R13
+move 10(R14),R0
+asl #1,R0
+asl #1,R0
+ext.l R0
+add.l R0,R13
+add.l _obj3,R13
+*line 262
+move R6,(R12)+
+*line 263
+move R6,(R12)
+*line 265
+move R7,(R13)+
+*line 266
+move R7,(R13)
+*line 268
+move 8(R14),_stcrow
+*line 269
+move 10(R14),_stccol
+L17:tst.l (sp)+
+movem.l (sp)+,R4-R7/R12-R13
+unlk R14
+rts
+.globl _advscur
+.text
+_advscur:
+~~advscur:
+link R14,#0
+movem.l R6-R7,-(sp)
+~newcol=R7
+*line 285
+*line 286
+move.l _curfet,(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+jsr _infield
+addq.l #4,sp
+tst R0
+beq L20
+*line 286
+move.l _infetp,_cfetp
+*line 287
+bra L21
+L20:bra L19
+L21:
+*line 290
+move _stccol,R7
+add #1,R7
+*line 292
+*line 293
+move.l _cfetp,R8
+cmp 4(R8),R7
+bgt L22
+*line 293
+move R7,(sp)
+move _stcrow,-(sp)
+jsr _stcpos
+addq.l #2,sp
+L22:L19:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _stcset
+.text
+_stcset:
+~~stcset:
+link R14,#-4
+*line 304
+move #640,(sp)
+move.l #_sctccon,-(sp)
+move.l #_sctctab,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+L23:unlk R14
+rts
+.data
Index: alcyon/stmproc.s
===================================================================
--- alcyon/stmproc.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/stmproc.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,2154 @@
+.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 _seqtab
+.globl _seqflag
+.globl _seqline
+.globl _seqstim
+.globl _seqtime
+.globl _sregval
+.globl _trstate
+.globl _ptegood
+.globl _ptedfok
+.globl _ptestok
+.globl _ptedsok
+.globl _ptedtok
+.globl _ptedef
+.globl _ptestm
+.globl _ptespec
+.globl _ptesuba
+.globl _ptedat1
+.globl _pteset
+.globl _ptecpos
+.globl _ptepred
+.globl _ptesucc
+.globl _ptebuf
+.globl _ptdebuf
+.globl _dtfree
+.comm _dtfree,2
+.globl _ptfree
+.comm _ptfree,2
+.globl _dpepred
+.comm _dpepred,2
+.globl _dpecpos
+.comm _dpecpos,2
+.globl _dpesucc
+.comm _dpesucc,2
+.globl _ptdsbuf
+.comm _ptdsbuf,50
+.globl _defptr
+.comm _defptr,5120
+.globl _stmptr
+.comm _stmptr,5120
+.globl _defents
+.comm _defents,2560
+.globl _patches
+.comm _patches,4096
+.globl _ptefifo
+.comm _ptefifo,16
+.globl _ptewrds
+.comm _ptewrds,512
+.globl _dmatch
+.data
+_dmatch:
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $1
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $0
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.dc.b $1
+.even
+.globl _initpt
+.text
+_initpt:
+~~initpt:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 107
+move #64,(sp)
+move #192,-(sp)
+move #256,-(sp)
+move.l #_ptewrds,-(sp)
+move.l #_ptefifo,-(sp)
+jsr _setwq
+adda.l #12,sp
+*line 111
+move #5120,(sp)
+clr -(sp)
+move.l #_defptr,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 112
+move #5120,(sp)
+clr -(sp)
+move.l #_stmptr,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 116
+move #4096,(sp)
+clr -(sp)
+move.l #_patches,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 118
+move #1,R7
+bra L4
+L5:
+*line 119
+clr R0
+move R7,R0
+add #1,R0
+clr R1
+move R7,R1
+lsl #4,R1
+swap R1
+clr R1
+swap R1
+add.l #_patches,R1
+move.l R1,R9
+move R0,(R9)
+L3:
+*line 118
+add #1,R7
+L4:
+*line 118
+cmp #255,R7
+blo L5
+L2:
+*line 121
+move #1,_ptfree
+*line 125
+move #2560,(sp)
+clr -(sp)
+move.l #_defents,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 127
+move #1,R7
+bra L8
+L9:
+*line 128
+clr R0
+move R7,R0
+add #1,R0
+clr R1
+move R7,R1
+mulu #10,R1
+add.l #_defents,R1
+move.l R1,R9
+move R0,(R9)
+L7:
+*line 127
+add #1,R7
+L8:
+*line 127
+cmp #255,R7
+blo L9
+L6:
+*line 130
+move #1,_dtfree
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _pt_alc
+.text
+_pt_alc:
+~~pt_alc:
+link R14,#0
+movem.l R6-R7,-(sp)
+~pe=R7
+*line 147
+*line 148
+move _ptfree,R7
+tst R7
+beq L11
+*line 148
+clr R0
+move R7,R0
+lsl #4,R0
+swap R0
+clr R0
+swap R0
+add.l #_patches,R0
+move.l R0,R8
+move (R8),_ptfree
+*line 149
+L11:
+*line 150
+clr R0
+move R7,R0
+bra L10
+L10:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _pt_del
+.text
+_pt_del:
+~~pt_del:
+~pe=R7
+link R14,#0
+movem.l R6-R7,-(sp)
+*line 162
+move 8(R14),R7
+*line 162
+clr R0
+move R7,R0
+lsl #4,R0
+swap R0
+clr R0
+swap R0
+add.l #_patches,R0
+move.l R0,R8
+move _ptfree,(R8)
+*line 163
+move R7,_ptfree
+L12:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _dt_alc
+.text
+_dt_alc:
+~~dt_alc:
+link R14,#0
+movem.l R6-R7,-(sp)
+~de=R7
+*line 180
+*line 181
+move _dtfree,R7
+tst R7
+beq L14
+*line 181
+clr R0
+move R7,R0
+mulu #10,R0
+add.l #_defents,R0
+move.l R0,R8
+move (R8),_dtfree
+*line 182
+L14:
+*line 183
+clr R0
+move R7,R0
+bra L13
+L13:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _dt_del
+.text
+_dt_del:
+~~dt_del:
+~de=R7
+link R14,#0
+movem.l R6-R7,-(sp)
+*line 195
+move 8(R14),R7
+*line 195
+clr R0
+move R7,R0
+mulu #10,R0
+add.l #_defents,R0
+move.l R0,R8
+move _dtfree,(R8)
+*line 196
+move R7,_dtfree
+L15:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _cprdpe
+.text
+_cprdpe:
+~~cprdpe:
+~np=8
+link R14,#0
+movem.l R4-R7/R13-R13,-(sp)
+~ca=R7
+~cb=R6
+~ct=R5
+~pp=R13
+*line 220
+clr R0
+move 8(R14),R0
+mulu #10,R0
+move.l R0,R13
+add.l #_defents,R13
+*line 222
+*line 223
+move _ptestm,R6
+clr R0
+move R6,R0
+move 2(R13),R5
+clr R1
+move R5,R1
+cmp R1,R0
+bcc L17
+*line 223
+move #-1,R0
+bra L16
+*line 224
+L17:
+*line 225
+*line 226
+cmp R5,R6
+bls L18
+*line 226
+move #1,R0
+bra L16
+*line 227
+L18:
+*line 228
+*line 229
+move _ptespec,R7
+and #255,R7
+clr R0
+move R7,R0
+move 4(R13),R5
+and #255,R5
+clr R1
+move R5,R1
+cmp R1,R0
+bcc L19
+*line 229
+move #-1,R0
+bra L16
+*line 230
+L19:
+*line 231
+*line 232
+cmp R5,R7
+bls L20
+*line 232
+move #1,R0
+bra L16
+*line 233
+L20:
+*line 234
+*line 235
+move _ptesuba,R6
+clr R0
+move R6,R0
+move 6(R13),R5
+clr R1
+move R5,R1
+cmp R1,R0
+bcc L21
+*line 235
+move #-1,R0
+bra L16
+*line 236
+L21:
+*line 237
+*line 238
+cmp R5,R6
+bls L22
+*line 238
+move #1,R0
+bra L16
+*line 239
+*line 240
+*line 241
+*line 242
+L22:
+*line 243
+*line 243
+move.l #_dmatch,R8
+tst.b 0(R8,R7)
+beq L23
+*line 244
+*line 245
+*line 246
+move _ptedat1,R6
+clr R0
+move R6,R0
+move 8(R13),R5
+clr R1
+move R5,R1
+cmp R1,R0
+bcc L24
+*line 246
+move #-1,R0
+bra L16
+*line 247
+L24:
+*line 248
+*line 249
+cmp R5,R6
+bls L25
+*line 249
+move #1,R0
+bra L16
+*line 250
+bra L26
+L25:
+*line 251
+clr R0
+bra L16
+L26:
+*line 252
+bra L27
+L23:
+*line 253
+*line 254
+*line 255
+clr R0
+bra L16
+L27:L16:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.globl _finddpe
+.text
+_finddpe:
+~~finddpe:
+link R14,#0
+movem.l R5-R7,-(sp)
+~c=R7
+~idef=R6
+*line 281
+clr _dpepred
+*line 282
+clr _dpecpos
+*line 283
+clr _dpesucc
+*line 298
+*line 298
+clr R0
+move 4+_ptebuf,R0
+and #8191,R0
+move R0,R8
+move.l #_defptr,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,R6
+tst R6
+bne L29
+*line 299
+*line 307
+*line 308
+*line 309
+move #1,R0
+bra L28
+*line 310
+*line 311
+*line 312
+*line 313
+*line 314
+L29:
+*line 315
+bra L32
+L31:
+*line 316
+*line 317
+*line 318
+*line 319
+*line 319
+move R6,(sp)
+jsr _cprdpe
+move R0,R7
+cmp #1,R7
+beq L33
+*line 320
+*line 321
+*line 321
+tst R7
+bne L34
+*line 322
+*line 323
+move R6,_dpecpos
+*line 324
+clr R0
+move R6,R0
+mulu #10,R0
+add.l #_defents,R0
+move.l R0,R8
+move (R8),_dpesucc
+*line 325
+*line 326
+*line 327
+*line 337
+L34:
+*line 338
+clr R0
+move R7,R0
+bra L28
+*line 339
+*line 340
+L33:
+*line 341
+move R6,_dpepred
+*line 342
+clr R0
+move R6,R0
+mulu #10,R0
+add.l #_defents,R0
+move.l R0,R8
+move (R8),R6
+L32:
+*line 343
+tst R6
+bne L31
+L30:
+*line 354
+move #-1,R0
+bra L28
+L28:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _cprpte
+.text
+_cprpte:
+~~cprpte:
+~np=8
+link R14,#0
+movem.l R4-R7/R12-R13,-(sp)
+~ca=R7
+~cb=R6
+~ct=R5
+~pb=R13
+~pp=R12
+*line 378
+move.l #_ptebuf,R13
+*line 379
+clr R0
+move 8(R14),R0
+lsl #4,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R12
+add.l #_patches,R12
+*line 381
+*line 382
+move 6(R13),R6
+clr R0
+move R6,R0
+move 6(R12),R5
+clr R1
+move R5,R1
+cmp R1,R0
+bcc L36
+*line 382
+move #-1,R0
+bra L35
+*line 383
+L36:
+*line 384
+*line 385
+cmp R5,R6
+bls L37
+*line 385
+move #1,R0
+bra L35
+*line 386
+L37:
+*line 387
+*line 388
+move 4(R13),R6
+clr R0
+move R6,R0
+move 4(R12),R5
+clr R1
+move R5,R1
+cmp R1,R0
+bcc L38
+*line 388
+move #-1,R0
+bra L35
+*line 389
+L38:
+*line 390
+*line 391
+cmp R5,R6
+bls L39
+*line 391
+move #1,R0
+bra L35
+*line 392
+L39:
+*line 393
+*line 394
+move 8(R13),R7
+and #255,R7
+clr R0
+move R7,R0
+move 8(R12),R5
+and #255,R5
+clr R1
+move R5,R1
+cmp R1,R0
+bcc L40
+*line 394
+move #-1,R0
+bra L35
+*line 395
+L40:
+*line 396
+*line 397
+cmp R5,R7
+bls L41
+*line 397
+move #1,R0
+bra L35
+*line 398
+L41:
+*line 399
+*line 400
+move 10(R13),R6
+clr R0
+move R6,R0
+move 10(R12),R5
+clr R1
+move R5,R1
+cmp R1,R0
+bcc L42
+*line 400
+move #-1,R0
+bra L35
+*line 401
+L42:
+*line 402
+*line 403
+cmp R5,R6
+bls L43
+*line 403
+move #1,R0
+bra L35
+*line 404
+*line 405
+*line 406
+*line 407
+L43:
+*line 408
+*line 408
+move.l #_dmatch,R8
+tst.b 0(R8,R7)
+beq L44
+*line 409
+*line 410
+*line 411
+move 12(R13),R6
+clr R0
+move R6,R0
+move 12(R12),R5
+clr R1
+move R5,R1
+cmp R1,R0
+bcc L45
+*line 411
+move #-1,R0
+bra L35
+*line 412
+L45:
+*line 413
+*line 414
+cmp R5,R6
+bls L46
+*line 414
+move #1,R0
+bra L35
+*line 415
+bra L47
+L46:
+*line 416
+clr R0
+bra L35
+L47:
+*line 417
+bra L48
+L44:
+*line 418
+*line 419
+*line 420
+clr R0
+bra L35
+L48:L35:tst.l (sp)+
+movem.l (sp)+,R5-R7/R12-R13
+unlk R14
+rts
+.globl _findpte
+.text
+_findpte:
+~~findpte:
+link R14,#0
+movem.l R5-R7,-(sp)
+~c=R7
+~istim=R6
+*line 446
+clr _ptepred
+*line 447
+clr _ptecpos
+*line 448
+clr _ptesucc
+*line 463
+*line 463
+clr R0
+move 6+_ptebuf,R0
+and #8191,R0
+move R0,R8
+move.l #_stmptr,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,R6
+tst R6
+bne L50
+*line 464
+*line 472
+*line 473
+*line 474
+move #1,R0
+bra L49
+*line 475
+*line 476
+*line 477
+*line 478
+*line 479
+L50:
+*line 480
+bra L53
+L52:
+*line 481
+*line 482
+*line 483
+*line 484
+*line 484
+move R6,(sp)
+jsr _cprpte
+move R0,R7
+cmp #1,R7
+beq L54
+*line 485
+*line 486
+*line 486
+tst R7
+bne L55
+*line 487
+*line 488
+move R6,_ptecpos
+*line 489
+clr R0
+move R6,R0
+lsl #4,R0
+swap R0
+clr R0
+swap R0
+add.l #_patches,R0
+move.l R0,R8
+move (R8),_ptesucc
+*line 490
+*line 491
+*line 492
+*line 502
+L55:
+*line 503
+clr R0
+move R7,R0
+bra L49
+*line 504
+*line 505
+L54:
+*line 506
+move R6,_ptepred
+*line 507
+clr R0
+move R6,R0
+lsl #4,R0
+swap R0
+clr R0
+swap R0
+add.l #_patches,R0
+move.l R0,R8
+move (R8),R6
+L53:
+*line 508
+tst R6
+bne L52
+L51:
+*line 519
+move #-1,R0
+bra L49
+L49:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _entrpte
+.text
+_entrpte:
+~~entrpte:
+link R14,#0
+movem.l R4-R7,-(sp)
+~c=R7
+~np=R6
+~stim=R5
+*line 536
+tst _ptedfok
+beq L10001
+tst _ptestok
+beq L10001
+tst _ptedsok
+beq L10001
+tst _ptedtok
+bne L10000
+L10001:clr R0
+bra L10002
+L10000:move #1,R0
+L10002:move R0,_ptegood
+*line 538
+*line 538
+tst _ptegood
+beq L57
+*line 539
+*line 540
+jsr _buf2pte
+*line 541
+*line 542
+jsr _findpte
+move R0,R7
+*line 543
+*line 544
+*line 544
+tst R7
+bne L58
+*line 545
+*line 546
+move #6,(sp)
+move.l #4+_ptebuf,-(sp)
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 547
+*line 548
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+or #-32768,8(R8)
+*line 549
+*line 558
+*line 559
+bra L56
+*line 560
+*line 561
+*line 562
+*line 563
+*line 564
+*line 565
+L58:
+*line 566
+*line 566
+jsr _pt_alc
+move R0,_ptecpos
+bne L59
+*line 567
+*line 571
+bra L56
+*line 572
+*line 573
+*line 574
+L59:
+*line 575
+move #6,(sp)
+move.l #4+_ptebuf,-(sp)
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 576
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+or #-32768,8(R8)
+*line 577
+move 6+_ptebuf,R5
+and #8191,R5
+*line 578
+*line 579
+*line 579
+cmp #1,R7
+bne L60
+*line 580
+*line 581
+clr _ptepred
+*line 582
+move _ptecpos,R0
+clr R9
+move R5,R9
+add.l #_stmptr,R9
+move.b R0,(R9)
+*line 583
+*line 584
+*line 585
+*line 586
+*line 587
+L60:
+*line 588
+*line 588
+tst _ptepred
+beq L61
+*line 589
+*line 590
+move _ptepred,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+move (R8),_ptesucc
+*line 591
+*line 592
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+move _ptesucc,(R8)
+*line 593
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+move _ptepred,2(R8)
+*line 594
+*line 595
+move _ptepred,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+move _ptecpos,(R8)
+*line 596
+*line 597
+*line 598
+tst _ptesucc
+beq L62
+*line 598
+move _ptesucc,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+move _ptecpos,2(R8)
+*line 599
+L62:bra L63
+L61:
+*line 600
+*line 601
+*line 602
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+clr 2(R8)
+*line 603
+*line 604
+*line 604
+cmp #-1,R7
+bne L64
+*line 605
+*line 606
+move.l #_stmptr,R8
+move.b 0(R8,R5),R0
+ext.w R0
+move R0,_ptesucc
+*line 607
+*line 608
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+move _ptesucc,(R8)
+*line 609
+*line 610
+move _ptesucc,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+move _ptecpos,2(R8)
+*line 611
+*line 612
+move _ptecpos,R0
+clr R9
+move R5,R9
+add.l #_stmptr,R9
+move.b R0,(R9)
+*line 613
+bra L65
+L64:
+*line 614
+*line 615
+*line 616
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+clr (R8)
+L65:
+*line 617
+L63:
+*line 618
+*line 619
+*line 620
+*line 621
+*line 622
+*line 623
+*line 623
+jsr _finddpe
+move R0,R7
+tst R7
+bne L66
+*line 624
+*line 628
+bra L56
+*line 629
+*line 630
+*line 631
+L66:
+*line 632
+*line 632
+jsr _dt_alc
+move R0,_dpecpos
+bne L67
+*line 633
+*line 637
+bra L56
+*line 638
+*line 639
+*line 640
+L67:
+*line 641
+clr R0
+move _dpecpos,R0
+mulu #10,R0
+add.l #_defents,R0
+move.l R0,R8
+clr (R8)
+*line 642
+clr R0
+move _dpecpos,R0
+mulu #10,R0
+add.l #_defents,R0
+move.l R0,R8
+move _ptestm,2(R8)
+*line 643
+clr R0
+move _dpecpos,R0
+mulu #10,R0
+add.l #_defents,R0
+move.l R0,R8
+move _ptespec,4(R8)
+*line 644
+clr R0
+move _dpecpos,R0
+mulu #10,R0
+add.l #_defents,R0
+move.l R0,R8
+move _ptesuba,6(R8)
+*line 645
+clr R0
+move _dpecpos,R0
+mulu #10,R0
+add.l #_defents,R0
+move.l R0,R8
+move _ptedat1,8(R8)
+*line 646
+*line 647
+move 4+_ptebuf,R6
+and #8191,R6
+*line 648
+*line 649
+*line 649
+cmp #1,R7
+bne L68
+*line 650
+*line 651
+clr _dpepred
+*line 652
+clr R0
+move _dpecpos,R0
+clr R9
+move R6,R9
+add.l #_defptr,R9
+move.b R0,(R9)
+*line 653
+*line 654
+L68:
+*line 655
+*line 655
+tst _dpepred
+beq L69
+*line 656
+*line 657
+clr R0
+move _dpepred,R0
+mulu #10,R0
+add.l #_defents,R0
+move.l R0,R8
+move (R8),_dpesucc
+*line 658
+clr R0
+move _dpecpos,R0
+mulu #10,R0
+add.l #_defents,R0
+move.l R0,R8
+move _dpesucc,(R8)
+*line 659
+clr R0
+move _dpepred,R0
+mulu #10,R0
+add.l #_defents,R0
+move.l R0,R8
+move _dpecpos,(R8)
+*line 660
+bra L70
+L69:
+*line 661
+*line 662
+*line 663
+*line 663
+cmp #-1,R7
+bne L71
+*line 664
+*line 665
+move.l #_defptr,R8
+move.b 0(R8,R6),R0
+ext.w R0
+move R0,_dpesucc
+*line 666
+clr R0
+move _dpecpos,R0
+mulu #10,R0
+add.l #_defents,R0
+move.l R0,R8
+move _dpesucc,(R8)
+*line 667
+clr R0
+move _dpecpos,R0
+clr R9
+move R6,R9
+add.l #_defptr,R9
+move.b R0,(R9)
+*line 668
+bra L72
+L71:
+*line 669
+*line 670
+*line 671
+clr R0
+move _dpecpos,R0
+mulu #10,R0
+add.l #_defents,R0
+move.l R0,R8
+clr (R8)
+L72:
+*line 672
+L70:
+*line 673
+*line 674
+*line 683
+bra L56
+*line 684
+*line 685
+*line 686
+*line 695
+L57:L56:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _find1st
+.text
+_find1st:
+~~find1st:
+link R14,#0
+movem.l R5-R7,-(sp)
+~cp=R7
+~pp=R6
+*line 712
+clr R7
+bra L76
+L77:
+*line 713
+*line 714
+move.l #_stmptr,R8
+move.b 0(R8,R7),R0
+ext.w R0
+move R0,R6
+and #255,R6
+tst R6
+beq L78
+*line 714
+move R6,R0
+bra L73
+*line 715
+L78:L75:
+*line 712
+add #1,R7
+L76:
+*line 712
+cmp #5120,R7
+blt L77
+L74:
+*line 716
+clr R0
+bra L73
+L73:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _findnxt
+.text
+_findnxt:
+~~findnxt:
+~cp=8
+link R14,#0
+movem.l R5-R7,-(sp)
+~np=R7
+~stim=R6
+*line 731
+*line 732
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+move (R8),R7
+tst R7
+beq L80
+*line 732
+move R7,R0
+bra L79
+*line 733
+L80:
+*line 734
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+move 6(R8),R6
+and #8191,R6
+*line 736
+bra L83
+L82:
+*line 737
+*line 738
+move.l #_stmptr,R8
+move.b 0(R8,R6),R0
+ext.w R0
+move R0,R7
+and #255,R7
+tst R7
+beq L84
+*line 738
+move R7,R0
+bra L79
+*line 739
+L84:L83:
+*line 740
+add #1,R6
+move R6,R0
+cmp #5120,R0
+blt L82
+L81:
+*line 740
+clr R0
+bra L79
+L79:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _findprv
+.text
+_findprv:
+~~findprv:
+~cp=8
+link R14,#0
+movem.l R4-R7,-(sp)
+~np=R7
+~pp=R6
+~stim=R5
+*line 758
+*line 759
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+move 2(R8),R7
+tst R7
+beq L86
+*line 759
+move R7,R0
+bra L85
+*line 760
+L86:
+*line 761
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+move 6(R8),R5
+and #8191,R5
+*line 763
+bra L89
+L88:
+*line 764
+*line 765
+*line 765
+move.l #_stmptr,R8
+move.b 0(R8,R5),R0
+ext.w R0
+move R0,R7
+and #255,R7
+tst R7
+beq L90
+*line 766
+*line 767
+*line 768
+*line 769
+bra L93
+L92:
+*line 770
+move R6,R7
+L93:
+*line 770
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,R8
+move (R8),R6
+bne L92
+L91:
+*line 771
+*line 772
+move R7,R0
+bra L85
+*line 773
+L90:L89:
+*line 774
+sub #1,R5
+bge L88
+L87:
+*line 776
+clr R0
+bra L85
+L85:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _dpte
+.text
+_dpte:
+~~dpte:
+~pe=R7
+~row=R6
+~atr=R5
+link R14,#0
+movem.l R3-R7,-(sp)
+~i=R4
+*line 793
+move 8(R14),R7
+*line 793
+move 10(R14),R6
+*line 793
+move 12(R14),R5
+*line 793
+move #50,(sp)
+move #32,-(sp)
+move.l #_ptdsbuf,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 795
+*line 795
+tst R7
+beq L95
+*line 796
+*line 797
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_patches,R9
+move 4(R8,R9.l),(sp)
+move.l #2+_ptdsbuf,-(sp)
+jsr _dspdfst
+addq.l #4,sp
+*line 798
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_patches,R9
+move 6(R8,R9.l),(sp)
+move.l #15+_ptdsbuf,-(sp)
+jsr _dspdfst
+addq.l #4,sp
+*line 799
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,(sp)
+move.l #28+_ptdsbuf,-(sp)
+jsr _dspdest
+addq.l #4,sp
+*line 800
+*line 801
+clr R4
+bra L98
+L99:
+*line 802
+*line 803
+move R4,R8
+add.l #_ptdsbuf,R8
+tst.b (R8)
+bne L100
+*line 803
+move R4,R8
+add.l #_ptdsbuf,R8
+move.b #32,(R8)
+*line 804
+L100:L97:
+*line 801
+add #1,R4
+L98:
+*line 801
+cmp #50,R4
+blt L99
+L96:
+*line 805
+clr.b 48+_ptdsbuf
+*line 806
+*line 807
+L95:
+*line 808
+move #226,(sp)
+move.l #L101,-(sp)
+clr -(sp)
+move R6,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+*line 809
+move R5,(sp)
+move.l #1+_ptdsbuf,-(sp)
+move #1,-(sp)
+move R6,-(sp)
+jsr _UpdVid
+addq.l #8,sp
+L94:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _dptw
+.text
+_dptw:
+~~dptw:
+link R14,#0
+movem.l R3-R7,-(sp)
+~cp=R7
+~r=R6
+~row=R5
+~pp=R4
+*line 830
+*line 830
+tst _ptecpos
+beq L103
+*line 831
+*line 832
+*line 833
+*line 834
+move #7,R5
+*line 835
+move _ptecpos,R4
+*line 836
+*line 837
+bra L106
+L105:
+*line 838
+*line 839
+move R7,R4
+*line 840
+*line 841
+*line 842
+sub #1,R5
+beq L104
+L106:
+*line 843
+move R4,(sp)
+jsr _findprv
+move R0,R7
+tst R7
+bne L105
+L104:
+*line 844
+*line 848
+*line 849
+*line 850
+*line 850
+tst R5
+beq L107
+*line 851
+*line 852
+clr R6
+bra L110
+L111:
+*line 853
+move #18,(sp)
+move R6,-(sp)
+clr -(sp)
+jsr _dpte
+addq.l #4,sp
+L109:
+*line 852
+add #1,R6
+L110:
+*line 852
+cmp R5,R6
+blt L111
+L108:
+*line 853
+*line 854
+*line 855
+L107:
+*line 856
+bra L114
+L113:
+*line 857
+*line 858
+move #18,(sp)
+move R5,-(sp)
+move R4,-(sp)
+jsr _dpte
+addq.l #4,sp
+add #1,R5
+*line 859
+move R4,(sp)
+jsr _findnxt
+move R0,R4
+L114:
+*line 860
+cmp #7,R5
+blt L113
+L112:
+*line 861
+*line 862
+*line 863
+*line 864
+*line 869
+*line 870
+*line 871
+move #18,(sp)
+move R5,-(sp)
+move R4,-(sp)
+jsr _dpte
+addq.l #4,sp
+add #1,R5
+*line 872
+*line 873
+*line 874
+*line 875
+bra L117
+L116:
+*line 876
+*line 877
+move #18,(sp)
+move R5,-(sp)
+move R4,-(sp)
+jsr _dpte
+addq.l #4,sp
+add #1,R5
+*line 878
+*line 879
+*line 880
+cmp #15,R5
+bgt L115
+L117:
+*line 881
+move R4,(sp)
+jsr _findnxt
+move R0,R4
+tst R4
+bne L116
+L115:
+*line 882
+*line 883
+*line 884
+bra L120
+L119:
+*line 885
+move #18,(sp)
+move R5,-(sp)
+clr -(sp)
+jsr _dpte
+addq.l #4,sp
+add #1,R5
+L120:
+*line 885
+cmp #16,R5
+blt L119
+L118:
+*line 886
+*line 887
+bra L121
+L103:
+*line 888
+*line 889
+*line 890
+*line 890
+jsr _find1st
+move R0,_ptecpos
+beq L122
+*line 891
+*line 895
+*line 896
+*line 897
+*line 898
+*line 899
+clr R5
+bra L125
+L126:
+*line 900
+move #18,(sp)
+move R5,-(sp)
+clr -(sp)
+jsr _dpte
+addq.l #4,sp
+L124:
+*line 899
+add #1,R5
+L125:
+*line 899
+cmp #7,R5
+blt L126
+L123:
+*line 900
+*line 901
+*line 902
+*line 903
+*line 904
+move #18,(sp)
+move R5,-(sp)
+move _ptecpos,R4
+move R4,-(sp)
+jsr _dpte
+addq.l #4,sp
+add #1,R5
+*line 905
+*line 906
+*line 907
+*line 908
+bra L129
+L128:
+*line 909
+*line 910
+move #18,(sp)
+move R5,-(sp)
+move R4,-(sp)
+jsr _dpte
+addq.l #4,sp
+add #1,R5
+*line 911
+*line 912
+*line 913
+cmp #15,R5
+bgt L127
+L129:
+*line 914
+move R4,(sp)
+jsr _findnxt
+move R0,R4
+tst R4
+bne L128
+L127:
+*line 915
+*line 916
+*line 917
+*line 918
+bra L132
+L131:
+*line 919
+move #18,(sp)
+move R5,-(sp)
+clr -(sp)
+jsr _dpte
+addq.l #4,sp
+add #1,R5
+L132:
+*line 919
+cmp #16,R5
+blt L131
+L130:
+*line 920
+*line 921
+bra L133
+L122:
+*line 922
+*line 923
+*line 927
+*line 928
+*line 929
+*line 930
+*line 931
+clr R5
+bra L136
+L137:
+*line 932
+cmp #7,R5
+bne L10003
+move #18,(sp)
+bra L10005
+L10003:move #18,(sp)
+L10005:move R5,-(sp)
+clr -(sp)
+jsr _dpte
+addq.l #4,sp
+L135:
+*line 931
+add #1,R5
+L136:
+*line 931
+cmp #16,R5
+blt L137
+L134:
+*line 932
+L133:
+*line 933
+L121:
+*line 936
+*line 936
+tst _ptecpos
+beq L138
+*line 937
+*line 938
+move #6,(sp)
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+move.l #4+_ptebuf,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 939
+move #1,_pteset
+*line 940
+jsr _pte2buf
+*line 941
+*line 946
+*line 947
+bra L139
+L138:
+*line 948
+*line 949
+*line 950
+clr _pteset
+*line 951
+jsr _voidpb
+*line 952
+*line 957
+*line 958
+*line 959
+L139:L102:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _srdspte
+.text
+_srdspte:
+~~srdspte:
+link R14,#-10
+~oldcpos=-2
+~oldpred=-4
+~oldsucc=-6
+*line 980
+tst _ptedfok
+beq L10007
+tst _ptestok
+beq L10007
+tst _ptedsok
+beq L10007
+tst _ptedtok
+bne L10006
+L10007:clr R0
+bra L10008
+L10006:move #1,R0
+L10008:move R0,_ptegood
+*line 1002
+*line 1002
+tst _ptegood
+beq L141
+*line 1003
+*line 1004
+move _ptecpos,-2(R14)
+*line 1005
+move _ptepred,-4(R14)
+*line 1006
+move _ptesucc,-6(R14)
+*line 1007
+*line 1008
+jsr _buf2pte
+*line 1009
+*line 1010
+*line 1010
+jsr _findpte
+tst R0
+bne L142
+*line 1011
+*line 1015
+*line 1016
+*line 1017
+move #6,(sp)
+move _ptecpos,R0
+asl #4,R0
+ext.l R0
+add.l #_patches,R0
+move.l R0,-(sp)
+add.l #4,(sp)
+move.l #4+_ptebuf,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 1018
+move #1,_pteset
+*line 1019
+jsr _pte2buf
+*line 1020
+jsr _dptw
+*line 1021
+bra L143
+L142:
+*line 1022
+*line 1023
+*line 1024
+move -2(R14),_ptecpos
+*line 1025
+move -4(R14),_ptepred
+*line 1026
+move -6(R14),_ptesucc
+*line 1027
+*line 1037
+*line 1038
+L143:
+*line 1039
+*line 1040
+*line 1041
+*line 1045
+*line 1046
+L141:L140:unlk R14
+rts
+.globl _stmproc
+.text
+_stmproc:
+~~stmproc:
+~trg=R7
+link R14,#-4
+movem.l R2-R7/R12-R13,-(sp)
+~nextdef=R13
+~nextpch=R12
+~adspec=R6
+~adsuba=R5
+~np=R4
+~stim=R3
+~addat1=-2
+~adrtag=-4
+*line 1068
+move 8(R14),R7
+*line 1068
+clr R0
+move R7,R0
+and #8191,R0
+move R0,R8
+move.l #_defptr,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,R4
+and #255,R4
+*line 1069
+tst R4
+beq L10009
+clr R0
+move R4,R0
+mulu #10,R0
+add.l #_defents,R0
+bra L10011
+L10009:clr.l R0
+L10011:move.l R0,R13
+*line 1073
+bra L147
+L146:
+*line 1074
+*line 1075
+*line 1076
+*line 1077
+move 4(R13),R6
+*line 1078
+move 6(R13),R5
+*line 1079
+move 8(R13),-2(R14)
+*line 1080
+move 2(R13),R3
+*line 1081
+move.l #_dmatch,R8
+move.b 0(R8,R6),R0
+ext.w R0
+move R0,-4(R14)
+*line 1082
+*line 1083
+*line 1084
+*line 1085
+clr R0
+move R3,R0
+and #8191,R0
+move R0,R8
+move.l #_stmptr,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,R4
+and #255,R4
+*line 1086
+tst R4
+beq L10012
+clr R0
+move R4,R0
+lsl #4,R0
+swap R0
+clr R0
+swap R0
+add.l #_patches,R0
+bra L10014
+L10012:clr.l R0
+L10014:move.l R0,R12
+*line 1087
+*line 1088
+bra L150
+L149:
+*line 1089
+*line 1090
+*line 1091
+*line 1092
+*line 1093
+*line 1094
+cmp 6(R12),R3
+bne L151
+clr R0
+move 8(R12),R0
+and #255,R0
+cmp R0,R6
+bne L151
+cmp 10(R12),R5
+bne L151
+*line 1095
+*line 1096
+*line 1097
+tst -4(R14)
+beq L10015
+tst -4(R14)
+beq L152
+clr R0
+move 12(R12),R0
+cmp -2(R14),R0
+bne L152
+L10015:*line 1098
+*line 1099
+*line 1100
+cmp 4(R12),R7
+bne L153
+*line 1100
+or #-32768,8(R12)
+*line 1101
+bra L154
+L153:
+*line 1102
+and #32767,8(R12)
+L154:
+*line 1103
+L152:
+*line 1104
+*line 1105
+*line 1106
+*line 1107
+L151:
+*line 1108
+move (R12),R4
+*line 1109
+tst R4
+beq L10016
+clr R0
+move R4,R0
+lsl #4,R0
+swap R0
+clr R0
+swap R0
+add.l #_patches,R0
+bra L10018
+L10016:clr.l R0
+L10018:move.l R0,R12
+L150:
+*line 1110
+move.l R12,R0
+bne L149
+L148:
+*line 1111
+*line 1112
+*line 1113
+*line 1114
+move (R13),R4
+*line 1115
+tst R4
+beq L10019
+clr R0
+move R4,R0
+mulu #10,R0
+add.l #_defents,R0
+bra L10021
+L10019:clr.l R0
+L10021:move.l R0,R13
+L147:
+*line 1116
+move.l R13,R0
+bne L146
+L145:
+*line 1124
+clr R0
+move R7,R0
+and #8191,R0
+move R0,R8
+move.l #_stmptr,R9
+move.b 0(R8,R9.l),R0
+ext.w R0
+move R0,R4
+and #255,R4
+*line 1125
+tst R4
+beq L10022
+clr R0
+move R4,R0
+lsl #4,R0
+swap R0
+clr R0
+swap R0
+add.l #_patches,R0
+bra L10024
+L10022:clr.l R0
+L10024:move.l R0,R12
+*line 1129
+bra L157
+L156:
+*line 1130
+*line 1131
+*line 1132
+*line 1133
+clr R0
+move 8(R12),R0
+and #-32768,R0
+beq L158
+cmp 6(R12),R7
+bne L158
+*line 1133
+move.l R12,(sp)
+jsr _dopatch
+*line 1134
+*line 1135
+*line 1136
+L158:
+*line 1137
+move (R12),R4
+*line 1138
+tst R4
+beq L10025
+clr R0
+move R4,R0
+lsl #4,R0
+swap R0
+clr R0
+swap R0
+add.l #_patches,R0
+bra L10027
+L10025:clr.l R0
+L10027:move.l R0,R12
+L157:
+*line 1139
+move.l R12,R0
+bne L156
+L155:L144:tst.l (sp)+
+movem.l (sp)+,R3-R7/R12-R13
+unlk R14
+rts
+.data
+L101:.dc.b $B0,$20,$0
Index: alcyon/str2lc.s
===================================================================
--- alcyon/str2lc.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/str2lc.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,35 @@
+.globl _str2lc
+.text
+_str2lc:
+~~str2lc:
+~s=R13
+link R14,#0
+movem.l R6-R7/R12-R13,-(sp)
+~c=R7
+~r=R12
+*line 13
+move.l R13,R12
+*line 15
+move.l 8(R14),R13
+*line 15
+bra L4
+L3:
+*line 16
+move.b R7,R0
+ext.w R0
+move R0,(sp) 
+jsr _tolower
+move.b R0,(R13)+
+L4:
+*line 16
+move.b (R13),R7
+bne L3
+L2:
+*line 18
+move.l R12,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R12-R13
+unlk R14
+rts
+.data
Index: alcyon/str2uc.s
===================================================================
--- alcyon/str2uc.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/str2uc.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,35 @@
+.globl _str2uc
+.text
+_str2uc:
+~~str2uc:
+~s=R13
+link R14,#0
+movem.l R6-R7/R12-R13,-(sp)
+~c=R7
+~r=R12
+*line 13
+move.l R13,R12
+*line 15
+move.l 8(R14),R13
+*line 15
+bra L4
+L3:
+*line 16
+move.b R7,R0
+ext.w R0
+move R0,(sp) 
+jsr _toupper
+move.b R0,(R13)+
+L4:
+*line 16
+move.b (R13),R7
+bne L3
+L2:
+*line 18
+move.l R12,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R12-R13
+unlk R14
+rts
+.data
Index: alcyon/strcat.s
===================================================================
--- alcyon/strcat.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/strcat.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,39 @@
+.globl _strcat
+.text
+_strcat:
+~~strcat:
+~s1=R13
+~s2=R12
+link R14,#0
+movem.l R7-R7/R11-R13,-(sp)
+~os1=R11
+*line 17
+move.l 8(R14),R13
+*line 17
+move.l 12(R14),R12
+*line 17
+move.l R13,R11
+*line 19
+bra L4
+L3:L4:
+*line 20
+tst.b (R13)+
+bne L3
+L2:
+*line 22
+sub.l #1,R13
+*line 24
+bra L7
+L6:L7:
+*line 25
+move.b (R12)+,(R13)+
+bne L6
+L5:
+*line 27
+move.l R11,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R11-R13
+unlk R14
+rts
+.data
Index: alcyon/strccpy.s
===================================================================
--- alcyon/strccpy.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/strccpy.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,42 @@
+.globl _strccpy
+.text
+_strccpy:
+~~strccpy:
+~s1=R13
+~s2=R12
+~c=R7
+link R14,#0
+movem.l R5-R7/R11-R13,-(sp)
+~os1=R11
+~x=R6
+*line 25
+move.l 8(R14),R13
+*line 25
+move.l 12(R14),R12
+*line 25
+move.b 17(R14),R7
+*line 25
+move.l R13,R11
+*line 27
+bra L4
+L3:
+*line 28
+move.b R6,(R12)+
+L4:
+*line 28
+move.b R7,R0
+ext.w R0
+move.b (R13)+,R1
+ext.w R1
+move.b R1,R6
+cmp R1,R0
+bne L3
+L2:
+*line 30
+move.l R11,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R6-R7/R11-R13
+unlk R14
+rts
+.data
Index: alcyon/strchr.s
===================================================================
--- alcyon/strchr.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/strchr.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,34 @@
+.globl _strchr
+.text
+_strchr:
+~~strchr:
+~sp=R13
+~c=R7
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+*line 16
+move.l 8(R14),R13
+*line 16
+move.b 13(R14),R7
+*line 16
+L4:
+*line 17
+*line 18
+cmp.b (R13),R7
+bne L5
+*line 18
+move.l R13,R0
+bra L1
+L5:L3:
+*line 19
+tst.b (R13)+
+bne L4
+L2:
+*line 21
+clr.l R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/strcmp.s
===================================================================
--- alcyon/strcmp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/strcmp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,51 @@
+.globl _strcmp
+.text
+_strcmp:
+~~strcmp:
+~s1=R13
+~s2=R12
+link R14,#0
+movem.l R7-R7/R12-R13,-(sp)
+*line 14
+move.l 8(R14),R13
+*line 14
+move.l 12(R14),R12
+*line 14
+*line 15
+cmp.l R12,R13
+bne L2
+*line 15
+clr R0
+bra L1
+*line 16
+L2:
+*line 17
+bra L5
+L4:
+*line 18
+*line 19
+tst.b (R13)+
+bne L6
+*line 19
+clr R0
+bra L1
+*line 20
+L6:L5:
+*line 21
+move.b (R13),R0
+ext.w R0
+cmp.b (R12)+,R0
+beq L4
+L3:
+*line 21
+move.b (R13),R0
+ext.w R0
+move.b -(R12),R1
+ext.w R1
+sub R1,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R12-R13
+unlk R14
+rts
+.data
Index: alcyon/strcpy.s
===================================================================
--- alcyon/strcpy.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/strcpy.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,30 @@
+.globl _strcpy
+.text
+_strcpy:
+~~strcpy:
+~s1=R13
+~s2=R12
+link R14,#0
+movem.l R7-R7/R11-R13,-(sp)
+~os1=R11
+*line 17
+move.l 8(R14),R13
+*line 17
+move.l 12(R14),R12
+*line 17
+move.l R13,R11
+*line 19
+bra L4
+L3:L4:
+*line 20
+move.b (R12)+,(R13)+
+bne L3
+L2:
+*line 22
+move.l R11,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R11-R13
+unlk R14
+rts
+.data
Index: alcyon/strcspn.s
===================================================================
--- alcyon/strcspn.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/strcspn.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,58 @@
+.globl _strcspn
+.text
+_strcspn:
+~~strcspn:
+~charset=R13
+~string=8
+link R14,#0
+movem.l R6-R7/R11-R13,-(sp)
+~p=R12
+~q=R11
+~n=R7
+*line 17
+clr R7
+*line 19
+move.l 12(R14),R13
+*line 19
+move.l 8(R14),R11
+bra L4
+L5:
+*line 20
+*line 21
+move.l R13,R12
+bra L8
+L9:L7:
+*line 21
+add.l #1,R12
+L8:
+*line 21
+tst.b (R12)
+beq L10000
+move.b (R12),R0
+ext.w R0
+cmp.b (R11),R0
+bne L9
+L10000:L6:
+*line 22
+*line 23
+*line 24
+*line 25
+tst.b (R12)
+bne L2
+L3:
+*line 19
+add.l #1,R11
+add #1,R7
+L4:
+*line 19
+tst.b (R11)
+bne L5
+L2:
+*line 28
+move R7,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R11-R13
+unlk R14
+rts
+.data
Index: alcyon/strfill.s
===================================================================
--- alcyon/strfill.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/strfill.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,43 @@
+.globl _strfill
+.text
+_strfill:
+~~strfill:
+~s=R13
+~c=R7
+~n=R6
+link R14,#-4
+movem.l R4-R7/R13-R13,-(sp)
+~i=R5
+~p=-4
+*line 24
+move.l 8(R14),R13
+*line 24
+move.b 13(R14),R7
+*line 24
+move 14(R14),R6
+*line 24
+move.l R13,-4(R14)
+*line 26
+move R6,R5
+bra L4
+L5:
+*line 27
+move.b R7,(R13)+
+L3:L4:
+*line 26
+clr R0
+move R5,R0
+sub #1,R5
+tst R0
+bne L5
+L2:
+*line 29
+clr.b (R13)
+*line 30
+move.l -4(R14),R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/strlcmp.s
===================================================================
--- alcyon/strlcmp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/strlcmp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,49 @@
+.globl _strlcmp
+.text
+_strlcmp:
+~~strlcmp:
+~s=8
+~l=12
+link R14,#-6
+~rc=-2
+*line 23
+clr -2(R14)
+*line 25
+bra L4
+L3:
+*line 26
+*line 27
+*line 28
+move.l 12(R14),R8
+move -2(R14),R9
+add.l R9,R9
+add.l R9,R9
+move.l 0(R8,R9.l),(sp)
+move.l 8(R14),-(sp)
+jsr _strcmp
+addq.l #4,sp
+tst R0
+bne L5
+*line 28
+add #1,-2(R14)
+move -2(R14),R0
+bra L1
+*line 29
+L5:
+*line 30
+add #1,-2(R14)
+L4:
+*line 31
+move.l 12(R14),R8
+move -2(R14),R9
+add.l R9,R9
+add.l R9,R9
+tst.l 0(R8,R9.l)
+bne L3
+L2:
+*line 33
+clr R0
+bra L1
+L1:unlk R14
+rts
+.data
Index: alcyon/strlen.s
===================================================================
--- alcyon/strlen.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/strlen.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,30 @@
+.globl _strlen
+.text
+_strlen:
+~~strlen:
+~s=R13
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~n=R7
+*line 15
+clr R7
+*line 17
+move.l 8(R14),R13
+*line 17
+bra L4
+L3:
+*line 18
+add #1,R7
+L4:
+*line 18
+tst.b (R13)+
+bne L3
+L2:
+*line 20
+move R7,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/strltrm.s
===================================================================
--- alcyon/strltrm.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/strltrm.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,55 @@
+.globl _strltrm
+.text
+_strltrm:
+~~strltrm:
+~s=R13
+link R14,#0
+movem.l R6-R7/R11-R13,-(sp)
+~c=R7
+~lp=R12
+~rp=R11
+*line 19
+move.l 8(R14),R13
+*line 19
+*line 20
+cmp.b #32,(R13)
+beq L2
+*line 20
+move.l R13,R0
+bra L1
+*line 21
+L2:
+*line 22
+move.l R13,R12
+*line 23
+move.l R13,R11
+*line 25
+bra L5
+L4:
+*line 26
+add.l #1,R11
+L5:
+*line 26
+cmp.b #32,(R11)
+beq L4
+L3:
+*line 28
+bra L8
+L7:
+*line 29
+move.b R7,(R12)+
+L8:
+*line 29
+move.b (R11)+,R7
+bne L7
+L6:
+*line 31
+clr.b (R12)
+*line 33
+move.l R13,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R11-R13
+unlk R14
+rts
+.data
Index: alcyon/strncat.s
===================================================================
--- alcyon/strncat.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/strncat.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,54 @@
+.globl _strncat
+.text
+_strncat:
+~~strncat:
+~s1=R13
+~s2=R12
+~n=R7
+link R14,#0
+movem.l R6-R7/R11-R13,-(sp)
+~os1=R11
+*line 19
+move.l 8(R14),R13
+*line 19
+move.l 12(R14),R12
+*line 19
+move 16(R14),R7
+*line 19
+move.l R13,R11
+*line 21
+bra L4
+L3:L4:
+*line 22
+tst.b (R13)+
+bne L3
+L2:
+*line 24
+sub.l #1,R13
+*line 26
+bra L7
+L6:
+*line 27
+*line 27
+sub #1,R7
+bge L8
+*line 28
+*line 29
+clr.b -(R13)
+bra L5
+*line 30
+*line 31
+*line 32
+L8:L7:
+*line 33
+move.b (R12)+,(R13)+
+bne L6
+L5:
+*line 33
+move.l R11,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R11-R13
+unlk R14
+rts
+.data
Index: alcyon/strncmp.s
===================================================================
--- alcyon/strncmp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/strncmp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,60 @@
+.globl _strncmp
+.text
+_strncmp:
+~~strncmp:
+~s1=R13
+~s2=R12
+~n=R7
+link R14,#0
+movem.l R6-R7/R12-R13,-(sp)
+*line 16
+move.l 8(R14),R13
+*line 16
+move.l 12(R14),R12
+*line 16
+move 16(R14),R7
+*line 16
+*line 17
+cmp.l R12,R13
+bne L2
+*line 17
+clr R0
+bra L1
+*line 18
+L2:
+*line 19
+bra L5
+L4:
+*line 20
+*line 21
+tst.b (R13)+
+bne L6
+*line 21
+clr R0
+bra L1
+*line 22
+L6:L5:
+*line 23
+sub #1,R7
+blt L10000
+move.b (R13),R0
+ext.w R0
+cmp.b (R12)+,R0
+beq L4
+L10000:L3:
+*line 23
+tst R7
+bge L10001
+clr R0
+bra L10003
+L10001:move.b (R13),R0
+ext.w R0
+move.b -(R12),R1
+ext.w R1
+sub R1,R0
+L10003:bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R12-R13
+unlk R14
+rts
+.data
Index: alcyon/strncpy.s
===================================================================
--- alcyon/strncpy.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/strncpy.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,49 @@
+.globl _strncpy
+.text
+_strncpy:
+~~strncpy:
+~s1=R13
+~s2=R12
+~n=R7
+link R14,#0
+movem.l R6-R7/R11-R13,-(sp)
+~os1=R11
+*line 16
+move.l R13,R11
+*line 18
+move.l 8(R14),R13
+*line 18
+move.l 12(R14),R12
+*line 18
+move 16(R14),R7
+*line 18
+bra L4
+L3:
+*line 19
+*line 20
+move.b (R12)+,(R13)+
+bne L5
+*line 20
+bra L8
+L7:
+*line 21
+clr.b (R13)+
+L8:
+*line 21
+sub #1,R7
+bge L7
+L6:
+*line 22
+L5:L4:
+*line 23
+sub #1,R7
+bge L3
+L2:
+*line 23
+move.l R11,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R11-R13
+unlk R14
+rts
+.data
Index: alcyon/strpbrk.s
===================================================================
--- alcyon/strpbrk.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/strpbrk.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,55 @@
+.globl _strpbrk
+.text
+_strpbrk:
+~~strpbrk:
+~string=R13
+~brkset=R12
+link R14,#0
+movem.l R7-R7/R11-R13,-(sp)
+~p=R11
+*line 17
+move.l 8(R14),R13
+*line 17
+move.l 12(R14),R12
+*line 17
+L4:
+*line 18
+*line 19
+move.l R12,R11
+bra L7
+L8:L6:
+*line 19
+add.l #1,R11
+L7:
+*line 19
+tst.b (R11)
+beq L10000
+move.b (R11),R0
+ext.w R0
+cmp.b (R13),R0
+bne L8
+L10000:L5:
+*line 20
+*line 21
+*line 22
+*line 23
+tst.b (R11)
+beq L9
+*line 23
+move.l R13,R0
+bra L1
+L9:L3:
+*line 24
+*line 25
+*line 26
+tst.b (R13)+
+bne L4
+L2:
+*line 29
+clr.l R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R11-R13
+unlk R14
+rts
+.data
Index: alcyon/strrchr.s
===================================================================
--- alcyon/strrchr.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/strrchr.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,38 @@
+.globl _strrchr
+.text
+_strrchr:
+~~strrchr:
+~sp=R13
+~c=R7
+link R14,#0
+movem.l R6-R7/R12-R13,-(sp)
+~r=R12
+*line 19
+move.l 8(R14),R13
+*line 19
+move.b 13(R14),R7
+*line 19
+clr.l R12
+*line 21
+L4:
+*line 22
+*line 23
+*line 24
+cmp.b (R13),R7
+bne L5
+*line 24
+move.l R13,R12
+*line 25
+L5:L3:
+*line 26
+tst.b (R13)+
+bne L4
+L2:
+*line 28
+move.l R12,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R12-R13
+unlk R14
+rts
+.data
Index: alcyon/strrev.s
===================================================================
--- alcyon/strrev.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/strrev.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,55 @@
+.globl _strrev
+.text
+_strrev:
+~~strrev:
+~s2=R13
+~s1=8
+link R14,#0
+movem.l R6-R7/R12-R13,-(sp)
+~s3=R12
+~i=R7
+*line 24
+move.l 12(R14),R13
+*line 24
+clr.l R7
+*line 25
+move.l 8(R14),R12
+*line 27
+bra L4
+L3:
+*line 28
+*line 29
+add.l #1,R13
+*line 30
+add.l #$1,R7
+L4:
+*line 31
+tst.b (R13)
+bne L3
+L2:
+*line 33
+sub.l #1,R13
+*line 35
+bra L7
+L6:
+*line 36
+move.l R13,R8
+move.b (R8),(R12)+
+sub.l #1,R13
+L7:
+*line 36
+move.l R7,R0
+sub.l #$1,R7
+tst.l R0
+bne L6
+L5:
+*line 38
+clr.b (R12)
+*line 39
+move.l 8(R14),R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R12-R13
+unlk R14
+rts
+.data
Index: alcyon/strrevi.s
===================================================================
--- alcyon/strrevi.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/strrevi.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,61 @@
+.globl _strrevi
+.text
+_strrevi:
+~~strrevi:
+~s=8
+link R14,#0
+movem.l R5-R7/R12-R13,-(sp)
+~p1=R13
+~p2=R12
+~i=R7
+~c=R6
+*line 22
+move.l 8(R14),R13
+*line 23
+move.l 8(R14),R12
+*line 24
+clr.l R7
+*line 26
+bra L4
+L3:
+*line 27
+*line 28
+add.l #$1,R7
+*line 29
+add.l #1,R12
+L4:
+*line 30
+tst.b (R12)
+bne L3
+L2:
+*line 32
+sub.l #1,R12
+*line 33
+asr.l #$1,R7
+*line 35
+bra L7
+L6:
+*line 36
+*line 37
+move.b (R12),R6
+*line 38
+move.l R12,R8
+move.b (R13),(R8)
+sub.l #1,R12
+*line 39
+move.b R6,(R13)+
+L7:
+*line 40
+move.l R7,R0
+sub.l #$1,R7
+tst.l R0
+bne L6
+L5:
+*line 42
+move.l 8(R14),R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R6-R7/R12-R13
+unlk R14
+rts
+.data
Index: alcyon/strrtrm.s
===================================================================
--- alcyon/strrtrm.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/strrtrm.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,53 @@
+.globl _strrtrm
+.text
+_strrtrm:
+~~strrtrm:
+~s=8
+link R14,#0
+movem.l R7-R7/R12-R13,-(sp)
+~lp=R13
+~rp=R12
+*line 18
+move.l 8(R14),R13
+*line 19
+move.l 8(R14),R12
+*line 21
+bra L4
+L3:
+*line 22
+add.l #1,R12
+L4:
+*line 22
+tst.b (R12)
+bne L3
+L2:
+*line 24
+bra L7
+L6:
+*line 25
+*line 26
+*line 27
+cmp.b #32,(R12)
+bne L8
+*line 27
+clr.b (R12)
+*line 28
+bra L9
+L8:bra L5
+L9:
+*line 29
+L7:
+*line 30
+sub.l #1,R12
+move.l R12,R0
+cmp.l R0,R13
+ble L6
+L5:
+*line 32
+move.l R13,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R12-R13
+unlk R14
+rts
+.data
Index: alcyon/strspn.s
===================================================================
--- alcyon/strspn.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/strspn.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,60 @@
+.globl _strspn
+.text
+_strspn:
+~~strspn:
+~charset=R13
+~string=8
+link R14,#0
+movem.l R6-R7/R11-R13,-(sp)
+~p=R12
+~q=R11
+~n=R7
+*line 17
+clr R7
+*line 19
+move.l 12(R14),R13
+*line 19
+move.l 8(R14),R11
+bra L4
+L5:
+*line 20
+*line 21
+move.l R13,R12
+bra L8
+L9:L7:
+*line 21
+add.l #1,R12
+L8:
+*line 21
+tst.b (R12)
+beq L10000
+move.b (R12),R0
+ext.w R0
+cmp.b (R11),R0
+bne L9
+L10000:L6:
+*line 22
+*line 23
+*line 24
+*line 25
+tst.b (R12)
+beq L2
+*line 26
+*line 27
+add #1,R7
+L3:
+*line 19
+add.l #1,R11
+L4:
+*line 19
+tst.b (R11)
+bne L5
+L2:
+*line 30
+move R7,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R11-R13
+unlk R14
+rts
+.data
Index: alcyon/strtok.s
===================================================================
--- alcyon/strtok.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/strtok.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,77 @@
+.globl _strtok
+.text
+_strtok:
+~~strtok:
+~string=8
+~sepset=12
+link R14,#0
+movem.l R7-R7/R11-R13,-(sp)
+~p=R13
+~q=R12
+~r=R11
+~savept=L2
+.bss
+L2:.ds.b 4
+.text
+*line 27
+tst.l 8(R14)
+bne L10000
+move.l L2,R0
+bra L10002
+L10000:move.l 8(R14),R0
+L10002:move.l R0,R13
+*line 29
+*line 30
+move.l R13,R0
+bne L3
+*line 30
+clr.l R0
+bra L1
+*line 31
+L3:
+*line 32
+move.l 12(R14),(sp)
+move.l R13,-(sp)
+jsr _strspn
+addq.l #4,sp
+ext.l R0
+move.l R0,R12
+move.l R13,R0
+add.l R0,R12
+*line 34
+*line 35
+tst.b (R12)
+bne L4
+*line 35
+clr.l R0
+bra L1
+*line 36
+L4:
+*line 37
+*line 38
+move.l 12(R14),(sp)
+move.l R12,-(sp)
+jsr _strpbrk
+addq.l #4,sp
+move.l R0,R11
+move.l R11,R0
+bne L5
+*line 38
+clr.l L2
+bra L6
+L5:
+*line 39
+*line 40
+clr.b (R11)
+*line 41
+add.l #1,R11
+move.l R11,L2
+L6:
+*line 44
+move.l R12,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R11-R13
+unlk R14
+rts
+.data
Index: alcyon/strtol.s
===================================================================
--- alcyon/strtol.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/strtol.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,265 @@
+.globl ___atab
+.globl _strtol
+.text
+_strtol:
+~~strtol:
+~str=R13
+~base=R7
+~ptr=12
+link R14,#-4
+movem.l R4-R7/R13-R13,-(sp)
+~val=R6
+~c=R5
+~xx=-2
+~neg=-4
+*line 22
+clr -4(R14)
+*line 24
+move.l 8(R14),R13
+*line 24
+move 16(R14),R7
+*line 24
+*line 25
+tst.l 12(R14)
+beq L2
+*line 25
+move.l 12(R14),R8
+move.l R13,(R8)
+*line 26
+L2:
+*line 27
+*line 28
+tst R7
+blt L10000
+cmp #36,R7
+ble L3
+L10000:*line 28
+clr.l R0
+bra L1
+*line 29
+L3:
+*line 30
+*line 30
+move.b (R13),R5
+ext.w R5
+move.l #___atab,R8
+move.b 0(R8,R5),R0
+ext.w R0
+and #28,R0
+bne L4
+*line 31
+*line 32
+bra L7
+L6:
+*line 33
+add.l #1,R13
+move.b (R13),R5
+ext.w R5
+L7:
+*line 33
+move R5,R8
+add.l #___atab,R8
+btst #5,(R8)
+bne L6
+L5:
+*line 34
+*line 35
+move R5,R0
+bra L9
+*line 36
+L10:
+*line 37
+*line 38
+add #1,-4(R14)
+*line 39
+L11:
+*line 40
+*line 41
+add.l #1,R13
+move.b (R13),R5
+ext.w R5
+bra L8
+L9:cmp #43,R0
+beq L11
+cmp #45,R0
+beq L10
+bra L8
+L8:
+*line 42
+*line 43
+*line 44
+L4:
+*line 45
+*line 46
+tst R7
+bne L12
+*line 46
+*line 47
+cmp #48,R5
+beq L13
+*line 47
+move #10,R7
+bra L14
+L13:
+*line 48
+*line 49
+cmp.b #120,1(R13)
+beq L10001
+cmp.b #88,1(R13)
+bne L15
+L10001:*line 49
+move #16,R7
+*line 50
+bra L16
+L15:
+*line 51
+move #8,R7
+L16:L14:
+*line 52
+*line 53
+*line 54
+*line 55
+*line 56
+L12:
+*line 57
+*line 58
+move.l #___atab,R8
+move.b 0(R8,R5),R0
+ext.w R0
+and #28,R0
+beq L10002
+move R5,R8
+add.l #___atab,R8
+btst #2,(R8)
+beq L10003
+move R5,R0
+add #-48,R0
+bra L10005
+L10003:move R5,R8
+add.l #___atab,R8
+btst #4,(R8)
+beq L10006
+move R5,R0
+add #-87,R0
+bra L10008
+L10006:move R5,R0
+add #-55,R0
+L10008:L10005:move R0,-2(R14)
+cmp R0,R7
+bgt L17
+L10002:*line 58
+clr.l R0
+bra L1
+*line 59
+L17:
+*line 60
+*line 61
+*line 62
+cmp #16,R7
+bne L18
+cmp #48,R5
+bne L18
+move.b 2(R13),R0
+ext.w R0
+ext.l R0
+add.l #___atab,R0
+move.l R0,R8
+btst #7,(R8)
+beq L18
+cmp.b #120,1(R13)
+beq L10009
+cmp.b #88,1(R13)
+bne L18
+L10009:*line 62
+add.l #2,R13
+move.b (R13),R5
+ext.w R5
+*line 63
+L18:
+*line 64
+move R5,R8
+add.l #___atab,R8
+btst #2,(R8)
+beq L10010
+move R5,R0
+add #-48,R0
+bra L10012
+L10010:move R5,R8
+add.l #___atab,R8
+btst #4,(R8)
+beq L10013
+move R5,R0
+add #-87,R0
+bra L10015
+L10013:move R5,R0
+add #-55,R0
+L10015:L10012:neg R0
+ext.l R0
+move.l R0,R6
+bra L21
+L22:
+*line 65
+*line 66
+move R7,R0
+ext.l R0
+move.l R0,-(sp)
+move.l R6,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,R6
+move -2(R14),R0
+ext.l R0
+sub.l R0,R6
+L20:L21:
+*line 64
+add.l #1,R13
+move.b (R13),R0
+ext.w R0
+move R0,R5
+move.l #___atab,R8
+move.b 0(R8,R5),R0
+ext.w R0
+and #28,R0
+beq L10016
+move R5,R8
+add.l #___atab,R8
+btst #2,(R8)
+beq L10017
+move R5,R0
+add #-48,R0
+bra L10019
+L10017:move R5,R8
+add.l #___atab,R8
+btst #4,(R8)
+beq L10020
+move R5,R0
+add #-87,R0
+bra L10022
+L10020:move R5,R0
+add #-55,R0
+L10022:L10019:move R0,-2(R14)
+cmp R0,R7
+bgt L22
+L10016:L19:
+*line 68
+*line 69
+tst.l 12(R14)
+beq L23
+*line 69
+move.l 12(R14),R8
+move.l R13,(R8)
+*line 70
+L23:
+*line 71
+tst -4(R14)
+beq L10023
+move.l R6,R0
+bra L10025
+L10023:move.l R6,R0
+neg.l R0
+L10025:bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R5-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/swinit.s
===================================================================
--- alcyon/swinit.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/swinit.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,340 @@
+.globl _v_obtab
+.globl _v_curob
+.globl _v_nobj
+.globl _v_obpri
+.globl _filecat
+.globl _swctrl
+.globl _swdir
+.globl _swfiin
+.globl _swflag
+.globl _swfifo
+.globl _se_chg
+.comm _se_chg,2
+.globl _oldsw
+.comm _oldsw,4
+.globl _swpt
+.comm _swpt,4
+.globl _aswtbl
+.comm _aswtbl,56
+.globl _curmove
+.comm _curmove,4
+.globl _curtype
+.comm _curtype,4
+.globl _cx_key
+.comm _cx_key,4
+.globl _cx_upd
+.comm _cx_upd,4
+.globl _cy_key
+.comm _cy_key,4
+.globl _cy_upd
+.comm _cy_upd,4
+.globl _d_key
+.comm _d_key,4
+.globl _e_key
+.comm _e_key,4
+.globl _m_key
+.comm _m_key,4
+.globl _itxput
+.comm _itxput,4
+.globl _not_fld
+.comm _not_fld,4
+.globl _olddkey
+.comm _olddkey,4
+.globl _oldekey
+.comm _oldekey,4
+.globl _oldmkey
+.comm _oldmkey,4
+.globl _oldxkey
+.comm _oldxkey,4
+.globl _premove
+.comm _premove,4
+.globl _pstmove
+.comm _pstmove,4
+.globl _vt_adv
+.comm _vt_adv,4
+.globl _vt_bsp
+.comm _vt_bsp,4
+.globl _vt_cdn
+.comm _vt_cdn,4
+.globl _vt_cup
+.comm _vt_cup,4
+.globl _vt_dsp
+.comm _vt_dsp,4
+.globl _vt_stop
+.comm _vt_stop,4
+.globl _x_key
+.comm _x_key,4
+.globl _xy_dn
+.comm _xy_dn,4
+.globl _xy_up
+.comm _xy_up,4
+.globl _cratex
+.comm _cratex,4
+.globl _cratey
+.comm _cratey,4
+.globl _BotEdge
+.comm _BotEdge,2
+.globl _LftEdge
+.comm _LftEdge,2
+.globl _RgtEdge
+.comm _RgtEdge,2
+.globl _TopEdge
+.comm _TopEdge,2
+.globl _BarBcur
+.comm _BarBcur,28
+.globl _BarCcur
+.comm _BarCcur,28
+.globl _BGeq
+.comm _BGeq,28
+.globl _BGother
+.comm _BGother,28
+.globl _BGprmtr
+.comm _BGprmtr,28
+.globl _articen
+.comm _articen,24
+.globl _grpdyn
+.comm _grpdyn,24
+.globl _grploc
+.comm _grploc,24
+.globl _grpmode
+.comm _grpmode,24
+.globl _grpsel
+.comm _grpsel,24
+.globl _grpstat
+.comm _grpstat,24
+.globl _grptmap
+.comm _grptmap,24
+.globl _gtctab
+.comm _gtctab,24
+.globl _ins2grp
+.comm _ins2grp,24
+.globl _instmod
+.comm _instmod,24
+.globl _key2grp
+.comm _key2grp,176
+.globl _lastart
+.comm _lastart,32
+.globl _lastvce
+.comm _lastvce,24
+.globl _lastvel
+.comm _lastvel,24
+.globl _ldmap
+.comm _ldmap,40
+.globl _mctlnum
+.comm _mctlnum,8
+.globl _mpbend
+.comm _mpbend,96
+.globl _msmstv
+.comm _msmstv,6
+.globl _offsets
+.comm _offsets,512
+.globl _oldtun
+.comm _oldtun,256
+.globl _prstab
+.comm _prstab,12288
+.globl _s_inst
+.comm _s_inst,24
+.globl _s_trns
+.comm _s_trns,24
+.globl _swfifo
+.comm _swfifo,200
+.globl _txfifo
+.comm _txfifo,200
+.globl _tyfifo
+.comm _tyfifo,200
+.globl _tuntab
+.comm _tuntab,256
+.globl _vce2grp
+.comm _vce2grp,24
+.globl _vce2trg
+.comm _vce2trg,24
+.globl _veltab
+.comm _veltab,12288
+.globl _vmtab
+.comm _vmtab,64
+.globl _wsbuf
+.comm _wsbuf,512
+.globl _lmln22
+.comm _lmln22,4
+.globl _lmln23
+.comm _lmln23,4
+.globl _lmln24
+.comm _lmln24,4
+.globl _vtdeptr
+.comm _vtdeptr,4
+.globl _funcndx
+.comm _funcndx,2048
+.globl _vlbptr
+.comm _vlbptr,12
+.globl _bfs
+.comm _bfs,128
+.globl _caname
+.comm _caname,16
+.globl _dspbuf
+.comm _dspbuf,66
+.globl _ebuf
+.comm _ebuf,82
+.globl _errbuf
+.comm _errbuf,66
+.globl _idbuf
+.comm _idbuf,66
+.globl _keystat
+.comm _keystat,24
+.globl _ldcmnt
+.comm _ldcmnt,38
+.globl _ldfile
+.comm _ldfile,10
+.globl _ldmsg1
+.comm _ldmsg1,66
+.globl _ldmsg2
+.comm _ldmsg2,66
+.globl _ldmsg3
+.comm _ldmsg3,66
+.globl _loadedc
+.comm _loadedc,296
+.globl _loadedf
+.comm _loadedf,64
+.globl _masens
+.comm _masens,4
+.globl _mctlval
+.comm _mctlval,6144
+.globl _mdbyte
+.comm _mdbyte,4
+.globl _mpsust
+.comm _mpsust,48
+.globl _mrstat
+.comm _mrstat,4
+.globl _scname
+.comm _scname,320
+.globl _trgtab
+.comm _trgtab,6144
+.globl _tuncurn
+.comm _tuncurn,34
+.globl _tunname
+.comm _tunname,320
+.globl _pspool
+.comm _pspool,4
+.globl _afi
+.comm _afi,4
+.globl _curtime
+.comm _curtime,4
+.globl _ctime
+.comm _ctime,4
+.globl _dvwork
+.comm _dvwork,4
+.globl _frags
+.comm _frags,4
+.globl _iotime
+.comm _iotime,4
+.globl _lcdontm
+.comm _lcdontm,4
+.globl _lcdtime
+.comm _lcdtime,4
+.globl _lcsum
+.comm _lcsum,4
+.globl _ndbytes
+.comm _ndbytes,4
+.globl _noteoff
+.comm _noteoff,4
+.globl _noteon
+.comm _noteon,4
+.globl _noteper
+.comm _noteper,4
+.globl _noteval
+.comm _noteval,4
+.globl _nrest
+.comm _nrest,4
+.globl _schksum
+.comm _schksum,4
+.globl _se1_cnt
+.comm _se1_cnt,4
+.globl _se2_cnt
+.comm _se2_cnt,4
+.globl _se3_cnt
+.comm _se3_cnt,4
+.globl _snbreq
+.comm _snbreq,4
+.globl _snlreq
+.comm _snlreq,4
+.globl _sntbreq
+.comm _sntbreq,4
+.globl _sntlreq
+.comm _sntlreq,4
+.globl _spcount
+.comm _spcount,4
+.globl _swcount
+.comm _swcount,4
+.globl _swrate
+.comm _swrate,4
+.globl _swtemp
+.comm _swtemp,4
+.globl _t_bak
+.comm _t_bak,4
+.globl _t_cbgn
+.comm _t_cbgn,4
+.globl _t_cend
+.comm _t_cend,4
+.globl _t_cur
+.comm _t_cur,4
+.globl _t_ctr
+.comm _t_ctr,4
+.globl _t_fwd
+.comm _t_fwd,4
+.globl _t_ins
+.comm _t_ins,4
+.globl _t_note
+.comm _t_note,4
+.globl _t_sbgn
+.comm _t_sbgn,4
+.globl _t_sec1
+.comm _t_sec1,4
+.globl _t_sec2
+.comm _t_sec2,4
+.globl _t_sect
+.comm _t_sect,4
+.globl _t_send
+.comm _t_send,4
+.globl _wshfac
+.comm _wshfac,4
+.globl _hwave
+.comm _hwave,1024
+.globl _nlpersc
+.comm _nlpersc,80
+.globl _scsums
+.comm _scsums,80
+.globl _spool
+.comm _spool,131072
+.globl _vknm
+.comm _vknm,32768
+.globl _swrmin
+.data
+_swrmin:
+.dc.l $8
+.globl _swinit
+.text
+_swinit:
+~~swinit:
+link R14,#-4
+*line 217
+clr _swflag
+*line 218
+clr _swctrl
+*line 219
+clr _swdir
+*line 220
+clr.l _swrate
+*line 221
+clr.l _swcount
+*line 223
+move #100,(sp)
+clr -(sp)
+move.l #_swfifo,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 224
+clr _swfiin
+*line 226
+jsr _tkinit
+L1:unlk R14
+rts
+.data
Index: alcyon/tdfield.s
===================================================================
--- alcyon/tdfield.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/tdfield.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1932 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _cxval
+.globl _cyval
+.globl _cxrate
+.globl _cyrate
+.globl _stcrow
+.globl _stccol
+.globl _submenu
+.globl _vtcrow
+.globl _vtccol
+.globl _vtwrow
+.globl _vtwcol
+.globl _vtxval
+.globl _vtyval
+.globl _crate1
+.globl _csbp
+.globl _tdboxes
+.globl _tunmod
+.globl _tdnamsw
+.globl _td_fet1
+.data
+_td_fet1:
+.dc.w $0
+.dc.w $6
+.dc.w $A
+.dc.w $0
+*line 49
+.dc.l _et_tpch
+*line 49
+.dc.l _ef_tpch
+*line 49
+.dc.l _rd_tpch
+*line 49
+.dc.l _nd_tpch
+.dc.w $1
+.dc.w $6
+.dc.w $A
+.dc.w $0
+*line 50
+.dc.l _et_tpch
+*line 50
+.dc.l _ef_tpch
+*line 50
+.dc.l _rd_tpch
+*line 50
+.dc.l _nd_tpch
+.dc.w $2
+.dc.w $6
+.dc.w $A
+.dc.w $0
+*line 51
+.dc.l _et_tpch
+*line 51
+.dc.l _ef_tpch
+*line 51
+.dc.l _rd_tpch
+*line 51
+.dc.l _nd_tpch
+.dc.w $3
+.dc.w $6
+.dc.w $A
+.dc.w $0
+*line 52
+.dc.l _et_tpch
+*line 52
+.dc.l _ef_tpch
+*line 52
+.dc.l _rd_tpch
+*line 52
+.dc.l _nd_tpch
+.dc.w $4
+.dc.w $6
+.dc.w $A
+.dc.w $0
+*line 53
+.dc.l _et_tpch
+*line 53
+.dc.l _ef_tpch
+*line 53
+.dc.l _rd_tpch
+*line 53
+.dc.l _nd_tpch
+.dc.w $5
+.dc.w $6
+.dc.w $A
+.dc.w $0
+*line 54
+.dc.l _et_tpch
+*line 54
+.dc.l _ef_tpch
+*line 54
+.dc.l _rd_tpch
+*line 54
+.dc.l _nd_tpch
+.dc.w $6
+.dc.w $6
+.dc.w $A
+.dc.w $0
+*line 55
+.dc.l _et_tpch
+*line 55
+.dc.l _ef_tpch
+*line 55
+.dc.l _rd_tpch
+*line 55
+.dc.l _nd_tpch
+.dc.w $7
+.dc.w $6
+.dc.w $A
+.dc.w $0
+*line 56
+.dc.l _et_tpch
+*line 56
+.dc.l _ef_tpch
+*line 56
+.dc.l _rd_tpch
+*line 56
+.dc.l _nd_tpch
+.dc.w $8
+.dc.w $6
+.dc.w $A
+.dc.w $0
+*line 57
+.dc.l _et_tpch
+*line 57
+.dc.l _ef_tpch
+*line 57
+.dc.l _rd_tpch
+*line 57
+.dc.l _nd_tpch
+.dc.w $9
+.dc.w $6
+.dc.w $A
+.dc.w $0
+*line 58
+.dc.l _et_tpch
+*line 58
+.dc.l _ef_tpch
+*line 58
+.dc.l _rd_tpch
+*line 58
+.dc.l _nd_tpch
+.dc.w $A
+.dc.w $6
+.dc.w $A
+.dc.w $0
+*line 59
+.dc.l _et_tpch
+*line 59
+.dc.l _ef_tpch
+*line 59
+.dc.l _rd_tpch
+*line 59
+.dc.l _nd_tpch
+.dc.w $B
+.dc.w $6
+.dc.w $A
+.dc.w $0
+*line 60
+.dc.l _et_tpch
+*line 60
+.dc.l _ef_tpch
+*line 60
+.dc.l _rd_tpch
+*line 60
+.dc.l _nd_tpch
+.dc.w $C
+.dc.w $6
+.dc.w $A
+.dc.w $0
+*line 61
+.dc.l _et_tpch
+*line 61
+.dc.l _ef_tpch
+*line 61
+.dc.l _rd_tpch
+*line 61
+.dc.l _nd_tpch
+.dc.w $D
+.dc.w $6
+.dc.w $A
+.dc.w $0
+*line 62
+.dc.l _et_tpch
+*line 62
+.dc.l _ef_tpch
+*line 62
+.dc.l _rd_tpch
+*line 62
+.dc.l _nd_tpch
+.dc.w $E
+.dc.w $6
+.dc.w $A
+.dc.w $0
+*line 63
+.dc.l _et_tpch
+*line 63
+.dc.l _ef_tpch
+*line 63
+.dc.l _rd_tpch
+*line 63
+.dc.l _nd_tpch
+.dc.w $F
+.dc.w $6
+.dc.w $A
+.dc.w $0
+*line 64
+.dc.l _et_tpch
+*line 64
+.dc.l _ef_tpch
+*line 64
+.dc.l _rd_tpch
+*line 64
+.dc.l _nd_tpch
+.dc.w $10
+.dc.w $6
+.dc.w $A
+.dc.w $0
+*line 65
+.dc.l _et_tpch
+*line 65
+.dc.l _ef_tpch
+*line 65
+.dc.l _rd_tpch
+*line 65
+.dc.l _nd_tpch
+.dc.w $11
+.dc.w $6
+.dc.w $A
+.dc.w $0
+*line 66
+.dc.l _et_tpch
+*line 66
+.dc.l _ef_tpch
+*line 66
+.dc.l _rd_tpch
+*line 66
+.dc.l _nd_tpch
+.dc.w $12
+.dc.w $6
+.dc.w $A
+.dc.w $0
+*line 67
+.dc.l _et_tpch
+*line 67
+.dc.l _ef_tpch
+*line 67
+.dc.l _rd_tpch
+*line 67
+.dc.l _nd_tpch
+.dc.w $13
+.dc.w $6
+.dc.w $A
+.dc.w $0
+*line 68
+.dc.l _et_tpch
+*line 68
+.dc.l _ef_tpch
+*line 68
+.dc.l _rd_tpch
+*line 68
+.dc.l _nd_tpch
+.dc.w $14
+.dc.w $6
+.dc.w $A
+.dc.w $0
+*line 69
+.dc.l _et_tpch
+*line 69
+.dc.l _ef_tpch
+*line 69
+.dc.l _rd_tpch
+*line 69
+.dc.l _nd_tpch
+.dc.w $15
+.dc.w $6
+.dc.w $A
+.dc.w $0
+*line 70
+.dc.l _et_tpch
+*line 70
+.dc.l _ef_tpch
+*line 70
+.dc.l _rd_tpch
+*line 70
+.dc.l _nd_tpch
+.dc.w $16
+.dc.w $6
+.dc.w $A
+.dc.w $0
+*line 71
+.dc.l _et_tpch
+*line 71
+.dc.l _ef_tpch
+*line 71
+.dc.l _rd_tpch
+*line 71
+.dc.l _nd_tpch
+.dc.w $17
+.dc.w $6
+.dc.w $A
+.dc.w $0
+*line 72
+.dc.l _et_tpch
+*line 72
+.dc.l _ef_tpch
+*line 72
+.dc.l _rd_tpch
+*line 72
+.dc.l _nd_tpch
+.dc.w $0
+.dc.w $10
+.dc.w $14
+.dc.w $1
+*line 74
+.dc.l _et_tpch
+*line 74
+.dc.l _ef_tpch
+*line 74
+.dc.l _rd_tpch
+*line 74
+.dc.l _nd_tpch
+.dc.w $1
+.dc.w $10
+.dc.w $14
+.dc.w $1
+*line 75
+.dc.l _et_tpch
+*line 75
+.dc.l _ef_tpch
+*line 75
+.dc.l _rd_tpch
+*line 75
+.dc.l _nd_tpch
+.dc.w $2
+.dc.w $10
+.dc.w $14
+.dc.w $1
+*line 76
+.dc.l _et_tpch
+*line 76
+.dc.l _ef_tpch
+*line 76
+.dc.l _rd_tpch
+*line 76
+.dc.l _nd_tpch
+.dc.w $3
+.dc.w $10
+.dc.w $14
+.dc.w $1
+*line 77
+.dc.l _et_tpch
+*line 77
+.dc.l _ef_tpch
+*line 77
+.dc.l _rd_tpch
+*line 77
+.dc.l _nd_tpch
+.dc.w $4
+.dc.w $10
+.dc.w $14
+.dc.w $1
+*line 78
+.dc.l _et_tpch
+*line 78
+.dc.l _ef_tpch
+*line 78
+.dc.l _rd_tpch
+*line 78
+.dc.l _nd_tpch
+.dc.w $5
+.dc.w $10
+.dc.w $14
+.dc.w $1
+*line 79
+.dc.l _et_tpch
+*line 79
+.dc.l _ef_tpch
+*line 79
+.dc.l _rd_tpch
+*line 79
+.dc.l _nd_tpch
+.dc.w $6
+.dc.w $10
+.dc.w $14
+.dc.w $1
+*line 80
+.dc.l _et_tpch
+*line 80
+.dc.l _ef_tpch
+*line 80
+.dc.l _rd_tpch
+*line 80
+.dc.l _nd_tpch
+.dc.w $7
+.dc.w $10
+.dc.w $14
+.dc.w $1
+*line 81
+.dc.l _et_tpch
+*line 81
+.dc.l _ef_tpch
+*line 81
+.dc.l _rd_tpch
+*line 81
+.dc.l _nd_tpch
+.dc.w $8
+.dc.w $10
+.dc.w $14
+.dc.w $1
+*line 82
+.dc.l _et_tpch
+*line 82
+.dc.l _ef_tpch
+*line 82
+.dc.l _rd_tpch
+*line 82
+.dc.l _nd_tpch
+.dc.w $9
+.dc.w $10
+.dc.w $14
+.dc.w $1
+*line 83
+.dc.l _et_tpch
+*line 83
+.dc.l _ef_tpch
+*line 83
+.dc.l _rd_tpch
+*line 83
+.dc.l _nd_tpch
+.dc.w $A
+.dc.w $10
+.dc.w $14
+.dc.w $1
+*line 84
+.dc.l _et_tpch
+*line 84
+.dc.l _ef_tpch
+*line 84
+.dc.l _rd_tpch
+*line 84
+.dc.l _nd_tpch
+.dc.w $B
+.dc.w $10
+.dc.w $14
+.dc.w $1
+*line 85
+.dc.l _et_tpch
+*line 85
+.dc.l _ef_tpch
+*line 85
+.dc.l _rd_tpch
+*line 85
+.dc.l _nd_tpch
+.dc.w $C
+.dc.w $10
+.dc.w $14
+.dc.w $1
+*line 86
+.dc.l _et_tpch
+*line 86
+.dc.l _ef_tpch
+*line 86
+.dc.l _rd_tpch
+*line 86
+.dc.l _nd_tpch
+.dc.w $D
+.dc.w $10
+.dc.w $14
+.dc.w $1
+*line 87
+.dc.l _et_tpch
+*line 87
+.dc.l _ef_tpch
+*line 87
+.dc.l _rd_tpch
+*line 87
+.dc.l _nd_tpch
+.dc.w $E
+.dc.w $10
+.dc.w $14
+.dc.w $1
+*line 88
+.dc.l _et_tpch
+*line 88
+.dc.l _ef_tpch
+*line 88
+.dc.l _rd_tpch
+*line 88
+.dc.l _nd_tpch
+.dc.w $F
+.dc.w $10
+.dc.w $14
+.dc.w $1
+*line 89
+.dc.l _et_tpch
+*line 89
+.dc.l _ef_tpch
+*line 89
+.dc.l _rd_tpch
+*line 89
+.dc.l _nd_tpch
+.dc.w $10
+.dc.w $10
+.dc.w $14
+.dc.w $1
+*line 90
+.dc.l _et_tpch
+*line 90
+.dc.l _ef_tpch
+*line 90
+.dc.l _rd_tpch
+*line 90
+.dc.l _nd_tpch
+.dc.w $11
+.dc.w $10
+.dc.w $14
+.dc.w $1
+*line 91
+.dc.l _et_tpch
+*line 91
+.dc.l _ef_tpch
+*line 91
+.dc.l _rd_tpch
+*line 91
+.dc.l _nd_tpch
+.dc.w $12
+.dc.w $10
+.dc.w $14
+.dc.w $1
+*line 92
+.dc.l _et_tpch
+*line 92
+.dc.l _ef_tpch
+*line 92
+.dc.l _rd_tpch
+*line 92
+.dc.l _nd_tpch
+.dc.w $13
+.dc.w $10
+.dc.w $14
+.dc.w $1
+*line 93
+.dc.l _et_tpch
+*line 93
+.dc.l _ef_tpch
+*line 93
+.dc.l _rd_tpch
+*line 93
+.dc.l _nd_tpch
+.dc.w $14
+.dc.w $10
+.dc.w $14
+.dc.w $1
+*line 94
+.dc.l _et_tpch
+*line 94
+.dc.l _ef_tpch
+*line 94
+.dc.l _rd_tpch
+*line 94
+.dc.l _nd_tpch
+.dc.w $15
+.dc.w $10
+.dc.w $14
+.dc.w $1
+*line 95
+.dc.l _et_tpch
+*line 95
+.dc.l _ef_tpch
+*line 95
+.dc.l _rd_tpch
+*line 95
+.dc.l _nd_tpch
+.dc.w $16
+.dc.w $10
+.dc.w $14
+.dc.w $1
+*line 96
+.dc.l _et_tpch
+*line 96
+.dc.l _ef_tpch
+*line 96
+.dc.l _rd_tpch
+*line 96
+.dc.l _nd_tpch
+.dc.w $17
+.dc.w $10
+.dc.w $14
+.dc.w $1
+*line 97
+.dc.l _et_tpch
+*line 97
+.dc.l _ef_tpch
+*line 97
+.dc.l _rd_tpch
+*line 97
+.dc.l _nd_tpch
+.dc.w $0
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 100
+.dc.l _et_tpch
+*line 100
+.dc.l _ef_tpch
+*line 100
+.dc.l _rd_tpch
+*line 100
+.dc.l _nd_tpch
+.dc.w $1
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 101
+.dc.l _et_tpch
+*line 101
+.dc.l _ef_tpch
+*line 101
+.dc.l _rd_tpch
+*line 101
+.dc.l _nd_tpch
+.dc.w $2
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 102
+.dc.l _et_tpch
+*line 102
+.dc.l _ef_tpch
+*line 102
+.dc.l _rd_tpch
+*line 102
+.dc.l _nd_tpch
+.dc.w $3
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 103
+.dc.l _et_tpch
+*line 103
+.dc.l _ef_tpch
+*line 103
+.dc.l _rd_tpch
+*line 103
+.dc.l _nd_tpch
+.dc.w $4
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 104
+.dc.l _et_tpch
+*line 104
+.dc.l _ef_tpch
+*line 104
+.dc.l _rd_tpch
+*line 104
+.dc.l _nd_tpch
+.dc.w $5
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 105
+.dc.l _et_tpch
+*line 105
+.dc.l _ef_tpch
+*line 105
+.dc.l _rd_tpch
+*line 105
+.dc.l _nd_tpch
+.dc.w $6
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 106
+.dc.l _et_tpch
+*line 106
+.dc.l _ef_tpch
+*line 106
+.dc.l _rd_tpch
+*line 106
+.dc.l _nd_tpch
+.dc.w $7
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 107
+.dc.l _et_tpch
+*line 107
+.dc.l _ef_tpch
+*line 107
+.dc.l _rd_tpch
+*line 107
+.dc.l _nd_tpch
+.dc.w $8
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 108
+.dc.l _et_tpch
+*line 108
+.dc.l _ef_tpch
+*line 108
+.dc.l _rd_tpch
+*line 108
+.dc.l _nd_tpch
+.dc.w $9
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 109
+.dc.l _et_tpch
+*line 109
+.dc.l _ef_tpch
+*line 109
+.dc.l _rd_tpch
+*line 109
+.dc.l _nd_tpch
+.dc.w $A
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 110
+.dc.l _et_tpch
+*line 110
+.dc.l _ef_tpch
+*line 110
+.dc.l _rd_tpch
+*line 110
+.dc.l _nd_tpch
+.dc.w $B
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 111
+.dc.l _et_tpch
+*line 111
+.dc.l _ef_tpch
+*line 111
+.dc.l _rd_tpch
+*line 111
+.dc.l _nd_tpch
+.dc.w $C
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 112
+.dc.l _et_tpch
+*line 112
+.dc.l _ef_tpch
+*line 112
+.dc.l _rd_tpch
+*line 112
+.dc.l _nd_tpch
+.dc.w $D
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 113
+.dc.l _et_tpch
+*line 113
+.dc.l _ef_tpch
+*line 113
+.dc.l _rd_tpch
+*line 113
+.dc.l _nd_tpch
+.dc.w $E
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 114
+.dc.l _et_tpch
+*line 114
+.dc.l _ef_tpch
+*line 114
+.dc.l _rd_tpch
+*line 114
+.dc.l _nd_tpch
+.dc.w $F
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 115
+.dc.l _et_tpch
+*line 115
+.dc.l _ef_tpch
+*line 115
+.dc.l _rd_tpch
+*line 115
+.dc.l _nd_tpch
+.dc.w $10
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 116
+.dc.l _et_tpch
+*line 116
+.dc.l _ef_tpch
+*line 116
+.dc.l _rd_tpch
+*line 116
+.dc.l _nd_tpch
+.dc.w $11
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 117
+.dc.l _et_tpch
+*line 117
+.dc.l _ef_tpch
+*line 117
+.dc.l _rd_tpch
+*line 117
+.dc.l _nd_tpch
+.dc.w $12
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 118
+.dc.l _et_tpch
+*line 118
+.dc.l _ef_tpch
+*line 118
+.dc.l _rd_tpch
+*line 118
+.dc.l _nd_tpch
+.dc.w $13
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 119
+.dc.l _et_tpch
+*line 119
+.dc.l _ef_tpch
+*line 119
+.dc.l _rd_tpch
+*line 119
+.dc.l _nd_tpch
+.dc.w $14
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 120
+.dc.l _et_tpch
+*line 120
+.dc.l _ef_tpch
+*line 120
+.dc.l _rd_tpch
+*line 120
+.dc.l _nd_tpch
+.dc.w $15
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 121
+.dc.l _et_tpch
+*line 121
+.dc.l _ef_tpch
+*line 121
+.dc.l _rd_tpch
+*line 121
+.dc.l _nd_tpch
+.dc.w $16
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 122
+.dc.l _et_tpch
+*line 122
+.dc.l _ef_tpch
+*line 122
+.dc.l _rd_tpch
+*line 122
+.dc.l _nd_tpch
+.dc.w $17
+.dc.w $1A
+.dc.w $1E
+.dc.w $2
+*line 123
+.dc.l _et_tpch
+*line 123
+.dc.l _ef_tpch
+*line 123
+.dc.l _rd_tpch
+*line 123
+.dc.l _nd_tpch
+.dc.w $0
+.dc.w $24
+.dc.w $28
+.dc.w $3
+*line 125
+.dc.l _et_tpch
+*line 125
+.dc.l _ef_tpch
+*line 125
+.dc.l _rd_tpch
+*line 125
+.dc.l _nd_tpch
+.dc.w $1
+.dc.w $24
+.dc.w $28
+.dc.w $3
+*line 126
+.dc.l _et_tpch
+*line 126
+.dc.l _ef_tpch
+*line 126
+.dc.l _rd_tpch
+*line 126
+.dc.l _nd_tpch
+.dc.w $2
+.dc.w $24
+.dc.w $28
+.dc.w $3
+*line 127
+.dc.l _et_tpch
+*line 127
+.dc.l _ef_tpch
+*line 127
+.dc.l _rd_tpch
+*line 127
+.dc.l _nd_tpch
+.dc.w $3
+.dc.w $24
+.dc.w $28
+.dc.w $3
+*line 128
+.dc.l _et_tpch
+*line 128
+.dc.l _ef_tpch
+*line 128
+.dc.l _rd_tpch
+*line 128
+.dc.l _nd_tpch
+.dc.w $4
+.dc.w $24
+.dc.w $28
+.dc.w $3
+*line 129
+.dc.l _et_tpch
+*line 129
+.dc.l _ef_tpch
+*line 129
+.dc.l _rd_tpch
+*line 129
+.dc.l _nd_tpch
+.dc.w $5
+.dc.w $24
+.dc.w $28
+.dc.w $3
+*line 130
+.dc.l _et_tpch
+*line 130
+.dc.l _ef_tpch
+*line 130
+.dc.l _rd_tpch
+*line 130
+.dc.l _nd_tpch
+.dc.w $6
+.dc.w $24
+.dc.w $28
+.dc.w $3
+*line 131
+.dc.l _et_tpch
+*line 131
+.dc.l _ef_tpch
+*line 131
+.dc.l _rd_tpch
+*line 131
+.dc.l _nd_tpch
+.dc.w $7
+.dc.w $24
+.dc.w $28
+.dc.w $3
+*line 132
+.dc.l _et_tpch
+*line 132
+.dc.l _ef_tpch
+*line 132
+.dc.l _rd_tpch
+*line 132
+.dc.l _nd_tpch
+.dc.w $8
+.dc.w $24
+.dc.w $28
+.dc.w $3
+*line 133
+.dc.l _et_tpch
+*line 133
+.dc.l _ef_tpch
+*line 133
+.dc.l _rd_tpch
+*line 133
+.dc.l _nd_tpch
+.dc.w $9
+.dc.w $24
+.dc.w $28
+.dc.w $3
+*line 134
+.dc.l _et_tpch
+*line 134
+.dc.l _ef_tpch
+*line 134
+.dc.l _rd_tpch
+*line 134
+.dc.l _nd_tpch
+.dc.w $A
+.dc.w $24
+.dc.w $28
+.dc.w $3
+*line 135
+.dc.l _et_tpch
+*line 135
+.dc.l _ef_tpch
+*line 135
+.dc.l _rd_tpch
+*line 135
+.dc.l _nd_tpch
+.dc.w $B
+.dc.w $24
+.dc.w $28
+.dc.w $3
+*line 136
+.dc.l _et_tpch
+*line 136
+.dc.l _ef_tpch
+*line 136
+.dc.l _rd_tpch
+*line 136
+.dc.l _nd_tpch
+.dc.w $C
+.dc.w $24
+.dc.w $28
+.dc.w $3
+*line 137
+.dc.l _et_tpch
+*line 137
+.dc.l _ef_tpch
+*line 137
+.dc.l _rd_tpch
+*line 137
+.dc.l _nd_tpch
+.dc.w $D
+.dc.w $24
+.dc.w $28
+.dc.w $3
+*line 138
+.dc.l _et_tpch
+*line 138
+.dc.l _ef_tpch
+*line 138
+.dc.l _rd_tpch
+*line 138
+.dc.l _nd_tpch
+.dc.w $E
+.dc.w $24
+.dc.w $28
+.dc.w $3
+*line 139
+.dc.l _et_tpch
+*line 139
+.dc.l _ef_tpch
+*line 139
+.dc.l _rd_tpch
+*line 139
+.dc.l _nd_tpch
+.dc.w $F
+.dc.w $24
+.dc.w $28
+.dc.w $3
+*line 140
+.dc.l _et_tpch
+*line 140
+.dc.l _ef_tpch
+*line 140
+.dc.l _rd_tpch
+*line 140
+.dc.l _nd_tpch
+.dc.w $10
+.dc.w $24
+.dc.w $28
+.dc.w $3
+*line 141
+.dc.l _et_tpch
+*line 141
+.dc.l _ef_tpch
+*line 141
+.dc.l _rd_tpch
+*line 141
+.dc.l _nd_tpch
+.dc.w $11
+.dc.w $24
+.dc.w $28
+.dc.w $3
+*line 142
+.dc.l _et_tpch
+*line 142
+.dc.l _ef_tpch
+*line 142
+.dc.l _rd_tpch
+*line 142
+.dc.l _nd_tpch
+.dc.w $12
+.dc.w $24
+.dc.w $28
+.dc.w $3
+*line 143
+.dc.l _et_tpch
+*line 143
+.dc.l _ef_tpch
+*line 143
+.dc.l _rd_tpch
+*line 143
+.dc.l _nd_tpch
+.dc.w $13
+.dc.w $24
+.dc.w $28
+.dc.w $3
+*line 144
+.dc.l _et_tpch
+*line 144
+.dc.l _ef_tpch
+*line 144
+.dc.l _rd_tpch
+*line 144
+.dc.l _nd_tpch
+.dc.w $14
+.dc.w $24
+.dc.w $28
+.dc.w $3
+*line 145
+.dc.l _et_tpch
+*line 145
+.dc.l _ef_tpch
+*line 145
+.dc.l _rd_tpch
+*line 145
+.dc.l _nd_tpch
+.dc.w $15
+.dc.w $24
+.dc.w $28
+.dc.w $3
+*line 146
+.dc.l _et_tpch
+*line 146
+.dc.l _ef_tpch
+*line 146
+.dc.l _rd_tpch
+*line 146
+.dc.l _nd_tpch
+.dc.w $16
+.dc.w $24
+.dc.w $28
+.dc.w $3
+*line 147
+.dc.l _et_tpch
+*line 147
+.dc.l _ef_tpch
+*line 147
+.dc.l _rd_tpch
+*line 147
+.dc.l _nd_tpch
+.dc.w $17
+.dc.w $24
+.dc.w $28
+.dc.w $3
+*line 148
+.dc.l _et_tpch
+*line 148
+.dc.l _ef_tpch
+*line 148
+.dc.l _rd_tpch
+*line 148
+.dc.l _nd_tpch
+.dc.w $0
+.dc.w $2F
+.dc.w $33
+.dc.w $4
+*line 151
+.dc.l _et_tpch
+*line 151
+.dc.l _ef_tpch
+*line 151
+.dc.l _rd_tpch
+*line 151
+.dc.l _nd_tpch
+.dc.w $1
+.dc.w $2F
+.dc.w $33
+.dc.w $4
+*line 152
+.dc.l _et_tpch
+*line 152
+.dc.l _ef_tpch
+*line 152
+.dc.l _rd_tpch
+*line 152
+.dc.l _nd_tpch
+.dc.w $2
+.dc.w $2F
+.dc.w $33
+.dc.w $4
+*line 153
+.dc.l _et_tpch
+*line 153
+.dc.l _ef_tpch
+*line 153
+.dc.l _rd_tpch
+*line 153
+.dc.l _nd_tpch
+.dc.w $3
+.dc.w $2F
+.dc.w $33
+.dc.w $4
+*line 154
+.dc.l _et_tpch
+*line 154
+.dc.l _ef_tpch
+*line 154
+.dc.l _rd_tpch
+*line 154
+.dc.l _nd_tpch
+.dc.w $4
+.dc.w $2F
+.dc.w $33
+.dc.w $4
+*line 155
+.dc.l _et_tpch
+*line 155
+.dc.l _ef_tpch
+*line 155
+.dc.l _rd_tpch
+*line 155
+.dc.l _nd_tpch
+.dc.w $5
+.dc.w $2F
+.dc.w $33
+.dc.w $4
+*line 156
+.dc.l _et_tpch
+*line 156
+.dc.l _ef_tpch
+*line 156
+.dc.l _rd_tpch
+*line 156
+.dc.l _nd_tpch
+.dc.w $6
+.dc.w $2F
+.dc.w $33
+.dc.w $4
+*line 157
+.dc.l _et_tpch
+*line 157
+.dc.l _ef_tpch
+*line 157
+.dc.l _rd_tpch
+*line 157
+.dc.l _nd_tpch
+.dc.w $7
+.dc.w $2F
+.dc.w $33
+.dc.w $4
+*line 158
+.dc.l _et_tpch
+*line 158
+.dc.l _ef_tpch
+*line 158
+.dc.l _rd_tpch
+*line 158
+.dc.l _nd_tpch
+.dc.w $8
+.dc.w $2F
+.dc.w $33
+.dc.w $4
+*line 159
+.dc.l _et_tpch
+*line 159
+.dc.l _ef_tpch
+*line 159
+.dc.l _rd_tpch
+*line 159
+.dc.l _nd_tpch
+.dc.w $9
+.dc.w $2F
+.dc.w $33
+.dc.w $4
+*line 160
+.dc.l _et_tpch
+*line 160
+.dc.l _ef_tpch
+*line 160
+.dc.l _rd_tpch
+*line 160
+.dc.l _nd_tpch
+.dc.w $A
+.dc.w $2F
+.dc.w $33
+.dc.w $4
+*line 161
+.dc.l _et_tpch
+*line 161
+.dc.l _ef_tpch
+*line 161
+.dc.l _rd_tpch
+*line 161
+.dc.l _nd_tpch
+.dc.w $B
+.dc.w $2F
+.dc.w $33
+.dc.w $4
+*line 162
+.dc.l _et_tpch
+*line 162
+.dc.l _ef_tpch
+*line 162
+.dc.l _rd_tpch
+*line 162
+.dc.l _nd_tpch
+.dc.w $C
+.dc.w $2F
+.dc.w $33
+.dc.w $4
+*line 163
+.dc.l _et_tpch
+*line 163
+.dc.l _ef_tpch
+*line 163
+.dc.l _rd_tpch
+*line 163
+.dc.l _nd_tpch
+.dc.w $D
+.dc.w $2F
+.dc.w $33
+.dc.w $4
+*line 164
+.dc.l _et_tpch
+*line 164
+.dc.l _ef_tpch
+*line 164
+.dc.l _rd_tpch
+*line 164
+.dc.l _nd_tpch
+.dc.w $E
+.dc.w $2F
+.dc.w $33
+.dc.w $4
+*line 165
+.dc.l _et_tpch
+*line 165
+.dc.l _ef_tpch
+*line 165
+.dc.l _rd_tpch
+*line 165
+.dc.l _nd_tpch
+.dc.w $F
+.dc.w $2F
+.dc.w $33
+.dc.w $4
+*line 166
+.dc.l _et_tpch
+*line 166
+.dc.l _ef_tpch
+*line 166
+.dc.l _rd_tpch
+*line 166
+.dc.l _nd_tpch
+.dc.w $10
+.dc.w $2F
+.dc.w $33
+.dc.w $4
+*line 167
+.dc.l _et_tpch
+*line 167
+.dc.l _ef_tpch
+*line 167
+.dc.l _rd_tpch
+*line 167
+.dc.l _nd_tpch
+.dc.w $11
+.dc.w $2F
+.dc.w $33
+.dc.w $4
+*line 168
+.dc.l _et_tpch
+*line 168
+.dc.l _ef_tpch
+*line 168
+.dc.l _rd_tpch
+*line 168
+.dc.l _nd_tpch
+.dc.w $12
+.dc.w $2F
+.dc.w $33
+.dc.w $4
+*line 169
+.dc.l _et_tpch
+*line 169
+.dc.l _ef_tpch
+*line 169
+.dc.l _rd_tpch
+*line 169
+.dc.l _nd_tpch
+.dc.w $13
+.dc.w $2F
+.dc.w $33
+.dc.w $4
+*line 170
+.dc.l _et_tpch
+*line 170
+.dc.l _ef_tpch
+*line 170
+.dc.l _rd_tpch
+*line 170
+.dc.l _nd_tpch
+.dc.w $14
+.dc.w $2F
+.dc.w $33
+.dc.w $4
+*line 171
+.dc.l _et_tpch
+*line 171
+.dc.l _ef_tpch
+*line 171
+.dc.l _rd_tpch
+*line 171
+.dc.l _nd_tpch
+.dc.w $15
+.dc.w $2F
+.dc.w $33
+.dc.w $4
+*line 172
+.dc.l _et_tpch
+*line 172
+.dc.l _ef_tpch
+*line 172
+.dc.l _rd_tpch
+*line 172
+.dc.l _nd_tpch
+.dc.w $16
+.dc.w $2F
+.dc.w $33
+.dc.w $4
+*line 173
+.dc.l _et_tpch
+*line 173
+.dc.l _ef_tpch
+*line 173
+.dc.l _rd_tpch
+*line 173
+.dc.l _nd_tpch
+.dc.w $17
+.dc.w $2F
+.dc.w $33
+.dc.w $4
+*line 174
+.dc.l _et_tpch
+*line 174
+.dc.l _ef_tpch
+*line 174
+.dc.l _rd_tpch
+*line 174
+.dc.l _nd_tpch
+.dc.w $0
+.dc.w $3A
+.dc.w $3E
+.dc.w $5
+*line 176
+.dc.l _et_tpch
+*line 176
+.dc.l _ef_tpch
+*line 176
+.dc.l _rd_tpch
+*line 176
+.dc.l _nd_tpch
+.dc.w $1
+.dc.w $3A
+.dc.w $3E
+.dc.w $5
+*line 177
+.dc.l _et_tpch
+*line 177
+.dc.l _ef_tpch
+*line 177
+.dc.l _rd_tpch
+*line 177
+.dc.l _nd_tpch
+.dc.w $2
+.dc.w $3A
+.dc.w $3E
+.dc.w $5
+*line 178
+.dc.l _et_tpch
+*line 178
+.dc.l _ef_tpch
+*line 178
+.dc.l _rd_tpch
+*line 178
+.dc.l _nd_tpch
+.dc.w $3
+.dc.w $3A
+.dc.w $3E
+.dc.w $5
+*line 179
+.dc.l _et_tpch
+*line 179
+.dc.l _ef_tpch
+*line 179
+.dc.l _rd_tpch
+*line 179
+.dc.l _nd_tpch
+.dc.w $4
+.dc.w $3A
+.dc.w $3E
+.dc.w $5
+*line 180
+.dc.l _et_tpch
+*line 180
+.dc.l _ef_tpch
+*line 180
+.dc.l _rd_tpch
+*line 180
+.dc.l _nd_tpch
+.dc.w $5
+.dc.w $3A
+.dc.w $3E
+.dc.w $5
+*line 181
+.dc.l _et_tpch
+*line 181
+.dc.l _ef_tpch
+*line 181
+.dc.l _rd_tpch
+*line 181
+.dc.l _nd_tpch
+.dc.w $6
+.dc.w $3A
+.dc.w $3E
+.dc.w $5
+*line 182
+.dc.l _et_tpch
+*line 182
+.dc.l _ef_tpch
+*line 182
+.dc.l _rd_tpch
+*line 182
+.dc.l _nd_tpch
+.dc.w $7
+.dc.w $3A
+.dc.w $3E
+.dc.w $5
+*line 183
+.dc.l _et_tpch
+*line 183
+.dc.l _ef_tpch
+*line 183
+.dc.l _rd_tpch
+*line 183
+.dc.l _nd_tpch
+.dc.w $12
+.dc.w $3A
+.dc.w $3E
+.dc.w $6
+*line 185
+.dc.l _et_tval
+*line 185
+.dc.l _ef_tval
+*line 185
+.dc.l _rd_tval
+*line 185
+.dc.l _nd_tval
+.dc.w $18
+.dc.w $7
+.dc.w $26
+.dc.w $7
+*line 187
+.dc.l _et_null
+*line 187
+.dc.l _ef_null
+*line 187
+.dc.l _rd_null
+*line 187
+.dc.l _nd_null
+.dc.w $18
+.dc.w $3D
+.dc.w $3D
+.dc.w $6
+*line 188
+.dc.l _et_ttab
+*line 188
+.dc.l _ef_ttab
+*line 188
+.dc.l _rd_ttab
+*line 188
+.dc.l _nd_ttab
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.l $0
+.dc.l $0
+.dc.l $0
+.dc.l $0
+.globl _tdbox
+.data
+_tdbox:
+.dc.w $0
+.dc.w $0
+.dc.w $5F
+.dc.w $14F
+.dc.w $B
+.dc.w $5
+.dc.w $0
+.dc.w $1
+.dc.w $60
+.dc.w $0
+.dc.w $AF
+.dc.w $14F
+.dc.w $B
+.dc.w $8
+.dc.w $0
+.dc.w $D
+.dc.w $B0
+.dc.w $0
+.dc.w $FF
+.dc.w $14F
+.dc.w $B
+.dc.w $5
+.dc.w $0
+.dc.w $17
+.dc.w $100
+.dc.w $0
+.dc.w $14F
+.dc.w $14F
+.dc.w $B
+.dc.w $8
+.dc.w $0
+.dc.w $21
+.dc.w $150
+.dc.w $0
+.dc.w $1A7
+.dc.w $14F
+.dc.w $B
+.dc.w $5
+.dc.w $0
+.dc.w $2B
+.dc.w $1A8
+.dc.w $0
+.dc.w $1FF
+.dc.w $76
+.dc.w $B
+.dc.w $8
+.dc.w $0
+.dc.w $36
+.dc.w $1A8
+.dc.w $77
+.dc.w $1FF
+.dc.w $15D
+.dc.w $B
+.dc.w $6
+.dc.w $9
+.dc.w $36
+.dc.w $0
+.dc.w $150
+.dc.w $1A7
+.dc.w $15D
+.dc.w $B
+.dc.w $4
+.dc.w $18
+.dc.w $1
+.globl _tdbxlb
+.data
+_tdbxlb:
+*line 210
+.dc.l L1
+*line 211
+.dc.l L2
+*line 212
+.dc.l L3
+*line 213
+.dc.l L4
+*line 214
+.dc.l L5
+*line 215
+.dc.l L6
+*line 216
+.dc.l L7
+*line 218
+.dc.l L8
+.globl _td_flds
+.data
+_td_flds:
+*line 225
+.dc.l _stdctp0
+*line 226
+.dc.l _nokey
+*line 227
+.dc.l _nokey
+*line 228
+.dc.l _cxkstd
+*line 229
+.dc.l _cykstd
+*line 230
+.dc.l _tdcxupd
+*line 231
+.dc.l _tdcyupd
+*line 232
+.dc.l _nokey
+*line 233
+.dc.l _nokey
+*line 234
+.dc.l _nokey
+*line 235
+.dc.l _select
+*line 236
+.dc.l _stdmkey
+*line 237
+.dc.l _stddkey
+*line 238
+.dc.l _nokey
+*line 239
+.dc.l _td_fet1
+*line 240
+.dc.l _tdboxes
+*line 241
+.dc.l _crate1
+*line 242
+.dc.l _crate1
+.dc.w $1
+.dc.w $1E8
+.dc.w $150
+.globl _tdcyupd
+.text
+_tdcyupd:
+~~tdcyupd:
+link R14,#0
+movem.l R4-R7,-(sp)
+~pval=R7
+~vh=R6
+~vl=R5
+*line 261
+*line 261
+tst _tdnamsw
+beq L10
+*line 262
+*line 263
+move _cyrate,R0
+add R0,_vtyval
+move _vtyval,R0
+ext.l R0
+divs #14,R0
+move R0,_vtcrow
+*line 264
+*line 265
+*line 266
+move _vtwrow,R0
+add #2,R0
+cmp _vtcrow,R0
+bge L11
+*line 266
+move _vtwrow,R0
+add #2,R0
+move R0,_vtcrow
+muls #14,R0
+move R0,_vtyval
+bra L12
+L11:
+*line 267
+*line 268
+move _vtcrow,R0
+cmp _vtwrow,R0
+bge L13
+*line 268
+move _vtwrow,R0
+move R0,_vtcrow
+muls #14,R0
+move R0,_vtyval
+*line 269
+L13:L12:bra L14
+L10:
+*line 270
+*line 271
+*line 272
+move _cyrate,R0
+add R0,_cyval
+*line 273
+*line 274
+*line 275
+cmp #348,_cyval
+ble L15
+*line 275
+move #348,_cyval
+bra L16
+L15:
+*line 276
+*line 277
+cmp #1,_cyval
+bge L17
+*line 277
+move #1,_cyval
+L17:L16:L14:L9:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _tdcxupd
+.text
+_tdcxupd:
+~~tdcxupd:
+link R14,#-4
+*line 293
+*line 293
+tst _tdnamsw
+beq L19
+*line 294
+*line 295
+move _cxrate,R0
+add R0,_vtxval
+move _vtxval,R0
+asr #3,R0
+move R0,_vtccol
+*line 296
+*line 297
+*line 298
+move _vtwcol,R0
+add #29,R0
+cmp _vtccol,R0
+bge L20
+*line 298
+move _vtwcol,R0
+add #29,R0
+move R0,_vtccol
+asl #3,R0
+move R0,_vtxval
+bra L21
+L20:
+*line 299
+*line 300
+move _vtccol,R0
+cmp _vtwcol,R0
+bge L22
+*line 300
+move _vtwcol,R0
+move R0,_vtccol
+asl #3,R0
+move R0,_vtxval
+*line 301
+L22:L21:bra L23
+L19:
+*line 302
+*line 303
+*line 304
+move _cxrate,R0
+add R0,_cxval
+*line 305
+*line 306
+*line 307
+cmp #510,_cxval
+ble L24
+*line 307
+move #510,_cxval
+bra L25
+L24:
+*line 308
+*line 309
+cmp #1,_cxval
+bge L26
+*line 309
+move #1,_cxval
+L26:L25:L23:L18:unlk R14
+rts
+.globl _tdfield
+.text
+_tdfield:
+~~tdfield:
+link R14,#-4
+*line 324
+clr _tdnamsw
+*line 325
+clr _submenu
+*line 327
+move.l #_td_flds,(sp)
+jsr _curset
+L27:unlk R14
+rts
+.data
+L1:.dc.b $0
+L2:.dc.b $0
+L3:.dc.b $0
+L4:.dc.b $0
+L5:.dc.b $0
+L6:.dc.b $0
+L7:.dc.b $0
+L8:.dc.b $4E,$61,$6D,$65,$3A,$0
Index: alcyon/tdselbx.s
===================================================================
--- alcyon/tdselbx.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/tdselbx.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1028 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _hitbox
+.globl _cxval
+.globl _cyval
+.globl _hitcx
+.globl _hitcy
+.globl _submenu
+.globl _tunmod
+.globl _curtun
+.globl _tdnamsw
+.globl _ttcmdsv
+.globl _ttsel1
+.globl _ttsel2
+.globl _ttsel3
+.globl _tdbox
+.globl _csbp
+.globl _curboxp
+.globl _tunob
+.globl _tuntab
+.globl _oldtun
+.globl _tuncurn
+.globl _vtlin1
+.globl _vtlin2
+.globl _vtlin3
+.globl _tdboxes
+.data
+_tdboxes:
+.dc.w $0
+.dc.w $0
+.dc.w $5F
+.dc.w $14F
+.dc.w $0
+*line 45
+.dc.l _tdfnbox
+.dc.w $60
+.dc.w $0
+.dc.w $AF
+.dc.w $14F
+.dc.w $1
+*line 46
+.dc.l _tdfnbox
+.dc.w $B0
+.dc.w $0
+.dc.w $FF
+.dc.w $14F
+.dc.w $2
+*line 47
+.dc.l _tdfnbox
+.dc.w $100
+.dc.w $0
+.dc.w $14F
+.dc.w $14F
+.dc.w $3
+*line 48
+.dc.l _tdfnbox
+.dc.w $150
+.dc.w $0
+.dc.w $1A7
+.dc.w $14F
+.dc.w $4
+*line 49
+.dc.l _tdfnbox
+.dc.w $1A8
+.dc.w $0
+.dc.w $1FF
+.dc.w $76
+.dc.w $5
+*line 50
+.dc.l _tdfnbox
+.dc.w $1A8
+.dc.w $77
+.dc.w $1FF
+.dc.w $15D
+.dc.w $6
+*line 51
+.dc.l _tdfnbox
+.dc.w $0
+.dc.w $150
+.dc.w $1A7
+.dc.w $15D
+.dc.w $7
+*line 52
+.dc.l _tdfnbox
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.l $0
+.globl _endttyp
+.text
+_endttyp:
+~~endttyp:
+link R14,#-4
+*line 68
+clr _tdnamsw
+*line 69
+clr _submenu
+*line 70
+clr (sp)
+jsr _tdswin
+*line 71
+move #1,(sp)
+jsr _tdswin
+*line 72
+move #2,(sp)
+jsr _tdswin
+*line 73
+move #6,(sp)
+jsr _tdswin
+L1:unlk R14
+rts
+.globl _tcoladj
+.text
+_tcoladj:
+~~tcoladj:
+~icol=8
+link R14,#-4
+*line 86
+*line 87
+cmp #12,8(R14)
+bge L3
+*line 87
+move #6,R0
+bra L2
+bra L4
+L3:
+*line 88
+*line 89
+cmp #22,8(R14)
+bge L5
+*line 89
+move #16,R0
+bra L2
+bra L6
+L5:
+*line 90
+*line 91
+cmp #32,8(R14)
+bge L7
+*line 91
+move #26,R0
+bra L2
+bra L8
+L7:
+*line 92
+*line 93
+cmp #42,8(R14)
+bge L9
+*line 93
+move #36,R0
+bra L2
+bra L10
+L9:
+*line 94
+*line 95
+cmp #53,8(R14)
+bge L11
+*line 95
+move #47,R0
+bra L2
+*line 96
+bra L12
+L11:
+*line 97
+move #58,R0
+bra L2
+L12:L10:L8:L6:L4:L2:unlk R14
+rts
+.globl _tdhilit
+.text
+_tdhilit:
+~~tdhilit:
+~from=8
+~to=10
+link R14,#0
+movem.l R3-R7,-(sp)
+~i=R7
+~row=R6
+~col=R5
+~box=R4
+*line 114
+*line 114
+move 10(R14),R0
+cmp 8(R14),R0
+bge L14
+*line 115
+*line 116
+move 10(R14),R7
+*line 117
+move 8(R14),10(R14)
+*line 118
+move R7,8(R14)
+*line 119
+*line 120
+*line 121
+L14:
+*line 122
+move 8(R14),R7
+bra L17
+L18:
+*line 123
+*line 124
+*line 124
+cmp #24,R7
+bge L19
+*line 125
+*line 126
+move R7,R6
+*line 127
+move #6,R5
+*line 128
+clr R4
+*line 129
+bra L20
+L19:
+*line 130
+*line 130
+cmp #48,R7
+bge L21
+*line 131
+*line 132
+move R7,R6
+add #-24,R6
+*line 133
+move #16,R5
+*line 134
+move #1,R4
+*line 135
+bra L22
+L21:
+*line 136
+*line 136
+cmp #72,R7
+bge L23
+*line 137
+*line 138
+move R7,R6
+add #-48,R6
+*line 139
+move #26,R5
+*line 140
+move #2,R4
+*line 141
+bra L24
+L23:
+*line 142
+*line 142
+cmp #96,R7
+bge L25
+*line 143
+*line 144
+move R7,R6
+add #-72,R6
+*line 145
+move #36,R5
+*line 146
+move #3,R4
+*line 147
+bra L26
+L25:
+*line 148
+*line 148
+cmp #120,R7
+bge L27
+*line 149
+*line 150
+move R7,R6
+add #-96,R6
+*line 151
+move #47,R5
+*line 152
+move #4,R4
+*line 153
+bra L28
+L27:
+*line 154
+*line 155
+*line 156
+move R7,R6
+add #-120,R6
+*line 157
+move #58,R5
+*line 158
+move #5,R4
+L28:L26:L24:L22:L20:
+*line 159
+*line 160
+*line 161
+move R4,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 10(R8,R9.l),(sp)
+move #13,-(sp)
+move R7,R8
+add.l R8,R8
+move.l #_tuntab,R9
+move 0(R8,R9.l),-(sp)
+move R5,-(sp)
+move R6,-(sp)
+jsr _dsttval
+addq.l #8,sp
+L16:
+*line 122
+add #1,R7
+L17:
+*line 122
+cmp 10(R14),R7
+ble L18
+L15:L13:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _tdfnbox
+.text
+_tdfnbox:
+~~tdfnbox:
+~n=8
+link R14,#0
+movem.l R2-R7,-(sp)
+~i=R7
+~key=R6
+~dcol=R5
+~row=R4
+~col=R3
+*line 180
+move _hitcy,R4
+ext.l R4
+divs #14,R4
+*line 181
+move _hitcx,R3
+asr #3,R3
+*line 183
+move _hitbox,R0
+bra L31
+*line 184
+L32:
+*line 185
+L33:
+*line 186
+L34:
+*line 187
+L35:
+*line 188
+L36:
+*line 189
+L37:
+*line 190
+*line 191
+*line 192
+move _ttcmdsv,R0
+bra L39
+*line 193
+L40:
+*line 194
+*line 195
+*line 196
+jsr _enterit
+*line 197
+clr R0
+bra L29
+*line 198
+*line 199
+L41:
+*line 200
+*line 201
+*line 202
+move R3,(sp)
+move R4,-(sp)
+jsr _loc2key
+addq.l #2,sp
+move R0,_ttsel1
+*line 203
+*line 204
+*line 204
+tst _ttsel1
+bge L42
+*line 205
+*line 206
+clr _ttcmdsv
+*line 207
+move #6,(sp)
+jsr _tdswin
+*line 208
+clr R0
+bra L29
+*line 209
+*line 210
+L42:
+*line 211
+move #2,_ttcmdsv
+*line 212
+move R3,(sp)
+jsr _tcoladj
+move R0,R5
+*line 213
+*line 214
+move _hitbox,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 10(R8,R9.l),(sp)
+move #13,-(sp)
+move _ttsel1,R8
+add.l R8,R8
+move.l #_tuntab,R9
+move 0(R8,R9.l),-(sp)
+move R5,-(sp)
+move R4,-(sp)
+jsr _dsttval
+addq.l #8,sp
+*line 215
+*line 216
+clr R0
+bra L29
+*line 217
+L43:
+*line 218
+*line 219
+*line 220
+move R3,(sp)
+move R4,-(sp)
+jsr _loc2key
+addq.l #2,sp
+move R0,_ttsel2
+*line 221
+*line 222
+*line 222
+tst _ttsel2
+bge L44
+*line 223
+*line 224
+clr _ttcmdsv
+*line 225
+move #6,(sp)
+jsr _tdswin
+*line 226
+clr R0
+bra L29
+*line 227
+*line 228
+L44:
+*line 229
+move #3,_ttcmdsv
+*line 230
+move _ttsel2,(sp)
+move _ttsel1,-(sp)
+jsr _tdhilit
+addq.l #2,sp
+*line 231
+clr R0
+bra L29
+*line 232
+L45:
+*line 233
+*line 234
+*line 235
+move R3,(sp)
+move R4,-(sp)
+jsr _loc2key
+addq.l #2,sp
+move R0,_ttsel3
+*line 236
+*line 237
+*line 238
+tst _ttsel3
+blt L46
+*line 238
+move _ttsel3,(sp)
+move _ttsel2,-(sp)
+move _ttsel1,-(sp)
+jsr _tt_trcp
+addq.l #4,sp
+*line 239
+L46:
+*line 240
+clr _ttcmdsv
+*line 241
+*line 242
+clr R7
+bra L49
+L50:
+*line 243
+move R7,(sp)
+jsr _tdswin
+L48:
+*line 242
+add #1,R7
+L49:
+*line 242
+cmp #7,R7
+blt L50
+L47:
+*line 243
+*line 244
+*line 245
+clr R0
+bra L29
+*line 246
+*line 247
+L51:
+*line 248
+*line 249
+*line 250
+move R3,(sp)
+move R4,-(sp)
+jsr _loc2key
+addq.l #2,sp
+move R0,_ttsel1
+*line 251
+*line 252
+*line 252
+tst _ttsel1
+bge L52
+*line 253
+*line 254
+clr _ttcmdsv
+*line 255
+move #6,(sp)
+jsr _tdswin
+*line 256
+clr R0
+bra L29
+*line 257
+*line 258
+L52:
+*line 259
+move #5,_ttcmdsv
+*line 260
+move R3,(sp)
+jsr _tcoladj
+move R0,R5
+*line 261
+*line 262
+move _hitbox,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 10(R8,R9.l),(sp)
+move #13,-(sp)
+move _ttsel1,R8
+add.l R8,R8
+move.l #_tuntab,R9
+move 0(R8,R9.l),-(sp)
+move R5,-(sp)
+move R4,-(sp)
+jsr _dsttval
+addq.l #8,sp
+*line 263
+*line 264
+clr R0
+bra L29
+*line 265
+L53:
+*line 266
+*line 267
+*line 268
+move R3,(sp)
+move R4,-(sp)
+jsr _loc2key
+addq.l #2,sp
+move R0,_ttsel2
+*line 269
+*line 270
+*line 271
+tst _ttsel2
+blt L54
+*line 271
+move _ttsel2,(sp)
+move _ttsel1,-(sp)
+jsr _tt_incr
+addq.l #2,sp
+*line 272
+L54:
+*line 273
+clr _ttcmdsv
+*line 274
+*line 275
+clr R7
+bra L57
+L58:
+*line 276
+move R7,(sp)
+jsr _tdswin
+L56:
+*line 275
+add #1,R7
+L57:
+*line 275
+cmp #7,R7
+blt L58
+L55:
+*line 276
+*line 277
+*line 278
+clr R0
+bra L29
+*line 279
+*line 280
+L59:
+*line 281
+*line 282
+*line 283
+move R3,(sp)
+move R4,-(sp)
+jsr _loc2key
+addq.l #2,sp
+move R0,_ttsel1
+*line 284
+*line 285
+*line 285
+tst _ttsel1
+bge L60
+*line 286
+*line 287
+clr _ttcmdsv
+*line 288
+move #6,(sp)
+jsr _tdswin
+*line 289
+clr R0
+bra L29
+*line 290
+*line 291
+L60:
+*line 292
+move #7,_ttcmdsv
+*line 293
+move R3,(sp)
+jsr _tcoladj
+move R0,R5
+*line 294
+*line 295
+move _hitbox,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 10(R8,R9.l),(sp)
+move #13,-(sp)
+move _ttsel1,R8
+add.l R8,R8
+move.l #_tuntab,R9
+move 0(R8,R9.l),-(sp)
+move R5,-(sp)
+move R4,-(sp)
+jsr _dsttval
+addq.l #8,sp
+*line 296
+*line 297
+clr R0
+bra L29
+*line 298
+L61:
+*line 299
+*line 300
+*line 301
+move R3,(sp)
+move R4,-(sp)
+jsr _loc2key
+addq.l #2,sp
+move R0,_ttsel2
+*line 302
+*line 303
+*line 304
+tst _ttsel2
+blt L62
+*line 304
+move _ttsel2,(sp)
+move _ttsel1,-(sp)
+jsr _tt_intp
+addq.l #2,sp
+*line 305
+L62:
+*line 306
+clr _ttcmdsv
+*line 307
+*line 308
+clr R7
+bra L65
+L66:
+*line 309
+move R7,(sp)
+jsr _tdswin
+L64:
+*line 308
+add #1,R7
+L65:
+*line 308
+cmp #7,R7
+blt L66
+L63:
+*line 309
+*line 310
+*line 311
+clr R0
+bra L29
+bra L38
+L39:cmp #7,R0
+bhi L38
+asl #2,R0
+move R0,R8
+add.l #L67,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L67:.dc.l L40
+.dc.l L41
+.dc.l L43
+.dc.l L45
+.dc.l L51
+.dc.l L53
+.dc.l L59
+.dc.l L61
+.text
+L38:
+*line 312
+*line 313
+*line 314
+move #-1,R0
+bra L29
+*line 315
+*line 316
+L68:
+*line 317
+*line 318
+*line 319
+move R4,R0
+bra L70
+*line 320
+L71:
+*line 321
+L72:
+*line 322
+*line 323
+*line 324
+move #1,_ttcmdsv
+*line 325
+move #1,(sp)
+jsr _td_trcp
+*line 326
+clr R0
+bra L29
+*line 327
+L73:
+*line 328
+*line 329
+*line 330
+move #4,_ttcmdsv
+*line 331
+move #1,(sp)
+jsr _td_incr
+*line 332
+clr R0
+bra L29
+*line 333
+L74:
+*line 334
+*line 335
+*line 336
+move #6,_ttcmdsv
+*line 337
+move #1,(sp)
+jsr _td_intp
+*line 338
+clr R0
+bra L29
+*line 339
+L75:
+*line 340
+*line 341
+*line 342
+clr _ttcmdsv
+*line 343
+move #128,(sp)
+move.l #_oldtun,-(sp)
+move.l #_tuntab,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 344
+jsr _twins
+*line 345
+clr R0
+bra L29
+*line 346
+*line 347
+L76:
+*line 348
+L77:
+*line 349
+*line 350
+*line 351
+jsr _enterit
+*line 352
+clr R0
+bra L29
+*line 353
+L78:
+*line 354
+*line 355
+*line 356
+*line 357
+tst _curtun
+bne L79
+*line 357
+move #-1,R0
+bra L29
+*line 358
+L79:
+*line 359
+move _curtun,(sp)
+jsr _puttun
+*line 360
+move #128,(sp)
+move.l #_tuntab,-(sp)
+move.l #_oldtun,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 361
+move #6,(sp)
+jsr _tdswin
+*line 362
+clr R0
+bra L29
+*line 363
+L80:
+*line 364
+*line 365
+*line 366
+move _curtun,(sp)
+jsr _gettun
+*line 367
+move #128,(sp)
+move.l #_tuntab,-(sp)
+move.l #_oldtun,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 368
+jsr _twins
+*line 369
+clr R0
+bra L29
+bra L69
+L70:sub #9,R0
+cmp #15,R0
+bhi L69
+asl #2,R0
+move R0,R8
+add.l #L81,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L81:.dc.l L71
+.dc.l L72
+.dc.l L69
+.dc.l L73
+.dc.l L69
+.dc.l L74
+.dc.l L69
+.dc.l L75
+.dc.l L69
+.dc.l L76
+.dc.l L69
+.dc.l L78
+.dc.l L69
+.dc.l L80
+.dc.l L69
+.dc.l L77
+.text
+L69:
+*line 370
+*line 371
+*line 372
+move #-1,R0
+bra L29
+*line 373
+*line 374
+*line 375
+L82:
+*line 376
+*line 377
+*line 378
+*line 379
+cmp #7,R3
+blt L10000
+cmp #38,R3
+ble L83
+L10000:*line 379
+move #-1,R0
+bra L29
+*line 380
+L83:
+*line 381
+*line 381
+tst _tdnamsw
+beq L84
+*line 382
+*line 383
+jsr _vtyper
+*line 384
+move #1,_tunmod
+*line 385
+bra L85
+L84:
+*line 386
+*line 387
+*line 388
+clr (sp)
+jsr _vbank
+*line 389
+*line 390
+move #7,(sp)
+jsr _exp_c
+move R0,(sp)
+move #335,-(sp)
+move #247,-(sp)
+move #294,-(sp)
+move #8,-(sp)
+move #128,-(sp)
+move.l _tunob,-(sp)
+jsr _vbfill4
+adda.l #14,sp
+*line 391
+*line 392
+move #14,(sp)
+move.l #_vtlin1,-(sp)
+move #1,-(sp)
+move #21,-(sp)
+move #11,-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 393
+move #14,(sp)
+move.l #_vtlin2,-(sp)
+move #1,-(sp)
+move #22,-(sp)
+move #11,-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 394
+move #14,(sp)
+move.l #_vtlin3,-(sp)
+move #1,-(sp)
+move #23,-(sp)
+move #11,-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 395
+*line 396
+*line 397
+*line 398
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 10(R8,R9.l),(sp)
+move 8(R14),R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 8(R8,R9.l),-(sp)
+move.l #_endttyp,-(sp)
+move.l #_nokey,-(sp)
+move.l #_nokey,-(sp)
+move.l #_bsptcur,-(sp)
+move.l #_advtcur,-(sp)
+move #1,-(sp)
+move #21,-(sp)
+move.l #_tuncurn,-(sp)
+move #7,-(sp)
+move.l #_vtdisp,-(sp)
+move.l _tunob,-(sp)
+jsr _vtsetup
+adda.l #40,sp
+*line 399
+*line 400
+move #1,_tdnamsw
+*line 401
+move #1,_submenu
+L85:
+*line 402
+*line 403
+*line 404
+clr R0
+bra L29
+bra L30
+L31:cmp #7,R0
+bhi L30
+asl #2,R0
+move R0,R8
+add.l #L86,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L86:.dc.l L32
+.dc.l L33
+.dc.l L34
+.dc.l L35
+.dc.l L36
+.dc.l L37
+.dc.l L68
+.dc.l L82
+.text
+L30:
+*line 407
+move #-1,R0
+bra L29
+L29:tst.l (sp)+
+movem.l (sp)+,R3-R7
+unlk R14
+rts
+.data
Index: alcyon/tolower.s
===================================================================
--- alcyon/tolower.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/tolower.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,45 @@
+.globl ___atab
+.globl _tolower
+.text
+_tolower:
+~~tolower:
+~c=8
+link R14,#-6
+~x=-2
+*line 22
+*line 22
+move 8(R14),R0
+and #-128,R0
+bne L2
+*line 23
+*line 24
+*line 25
+move.l #___atab,R8
+move 8(R14),R9
+add.l R9,R8
+btst #3,(R8)
+beq L3
+*line 25
+move 8(R14),R0
+add #32,R0
+move R0,-2(R14)
+*line 26
+bra L4
+L3:
+*line 27
+move 8(R14),-2(R14)
+L4:
+*line 28
+bra L5
+L2:
+*line 29
+*line 30
+*line 31
+move 8(R14),-2(R14)
+L5:
+*line 34
+move -2(R14),R0
+bra L1
+L1:unlk R14
+rts
+.data
Index: alcyon/toupper.s
===================================================================
--- alcyon/toupper.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/toupper.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,43 @@
+.globl ___atab
+.globl _toupper
+.text
+_toupper:
+~~toupper:
+~c=8
+link R14,#-6
+~x=-2
+*line 22
+*line 22
+move 8(R14),R0
+and #-128,R0
+bne L2
+*line 23
+*line 24
+*line 25
+move.l #___atab,R8
+move 8(R14),R9
+add.l R9,R8
+btst #4,(R8)
+beq L3
+*line 25
+move 8(R14),R0
+add #-32,R0
+move R0,-2(R14)
+*line 26
+bra L4
+L3:
+*line 27
+move 8(R14),-2(R14)
+L4:bra L5
+L2:
+*line 28
+*line 29
+*line 30
+move 8(R14),-2(R14)
+L5:
+*line 33
+move -2(R14),R0
+bra L1
+L1:unlk R14
+rts
+.data
Index: alcyon/ttcpos.s
===================================================================
--- alcyon/ttcpos.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/ttcpos.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,207 @@
+.globl _v_obtab
+.globl _v_curob
+.globl _v_nobj
+.globl _v_obpri
+.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 _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _filecat
+.globl _vtcrow
+.globl _vtccol
+.data
+L1:.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.text
+.globl _ttcini
+.text
+_ttcini:
+~~ttcini:
+~color=8
+link R14,#-4
+*line 63
+*line 64
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+cmp #256,R0
+beq L3
+*line 64
+move #1,(sp)
+jsr _vbank
+*line 65
+L3:
+*line 66
+move #64,(sp)
+move 8(R14),-(sp)
+jsr _exp_c
+addq.l #2,sp
+move R0,-(sp)
+move.l #L1,-(sp)
+move.l #_v_tcur,-(sp)
+jsr _andcopy
+adda.l #10,sp
+L2:unlk R14
+rts
+.globl _ttcpos
+.text
+_ttcpos:
+~~ttcpos:
+~row=R7
+~col=R6
+link R14,#0
+movem.l R3-R7/R13-R13,-(sp)
+~yrow=R5
+~xcol=R4
+~op=R13
+*line 81
+move 8(R14),R7
+*line 81
+move 10(R14),R6
+*line 81
+*line 82
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L5
+*line 82
+clr (sp)
+jsr _vbank
+*line 83
+L5:
+*line 84
+move R7,R5
+muls #14,R5
+*line 85
+move R6,R4
+asl #3,R4
+*line 87
+move.l #36+_v_obtab,R13
+*line 89
+or #16,112+_v_odtab
+*line 90
+move #14,(sp)
+jsr _objclr
+*line 92
+move R4,4(R13)
+*line 93
+move R5,6(R13)
+*line 94
+move R4,R0
+asr #1,R0
+and #1023,R0
+or #1024,R0
+move R0,16(R13)
+*line 96
+move #14,(sp)
+move #2,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 98
+move R7,_vtcrow
+*line 99
+move R6,_vtccol
+L4:tst.l (sp)+
+movem.l (sp)+,R4-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/tundsp.s
===================================================================
--- alcyon/tundsp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/tundsp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1909 @@
+.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 _stcrow
+.globl _stccol
+.globl _cxval
+.globl _cyval
+.globl _curtun
+.globl _submenu
+.globl _tunmod
+.globl _tunval
+.globl _ttcmdsv
+.globl _tdnamsw
+.globl _oldtun
+.globl _tuntab
+.globl _tunlib
+.globl _panlkey
+.globl _lclkmap
+.globl _tuncurn
+.globl _tunname
+.globl _sfdsp
+.globl _obj0
+.globl _obj2
+.globl _bfs
+.globl _tdbxlb
+.globl _tdbox
+.globl _tunob
+.globl _tdoct
+.globl _tunpal
+.data
+_tunpal:
+.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 $0
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $1
+.dc.w $1
+.dc.w $0
+.dc.w $1
+.dc.w $0
+.dc.w $1
+.dc.w $0
+.dc.w $1
+.dc.w $1
+.dc.w $0
+.dc.w $1
+.dc.w $1
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $0
+.dc.w $2
+.dc.w $3
+.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 $3
+.dc.w $0
+.dc.w $3
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3
+.data
+L1:.dc.b $4C,$6F,$63,$61,$6C,$20,$33,$72,$64,$73,$20,$2B,$20,$4D,$49,$44,$49,$20,$31,$32,$20,$74,$6F,$6E,$65,$20,$73,$63,$61,$6C
+.dc.b $65,$20,$0
+.even
+.text
+.globl _tdlabl
+.data
+_tdlabl:
+*line 82
+.dc.l L3
+*line 82
+.dc.l L4
+*line 82
+.dc.l L5
+*line 82
+.dc.l L6
+*line 82
+.dc.l L7
+*line 82
+.dc.l L8
+*line 82
+.dc.l L9
+*line 82
+.dc.l L10
+*line 83
+.dc.l L11
+*line 83
+.dc.l L12
+*line 83
+.dc.l L13
+*line 83
+.dc.l L14
+*line 83
+.dc.l L15
+*line 83
+.dc.l L16
+*line 83
+.dc.l L17
+*line 83
+.dc.l L18
+*line 84
+.dc.l L19
+*line 84
+.dc.l L20
+*line 84
+.dc.l L21
+*line 84
+.dc.l L22
+*line 84
+.dc.l L23
+*line 84
+.dc.l L24
+*line 84
+.dc.l L25
+*line 85
+.dc.l L26
+.globl _gettun
+.text
+_gettun:
+~~gettun:
+~n=8
+link R14,#-4
+*line 99
+move #128,(sp)
+move 8(R14),R0
+asl #8,R0
+ext.l R0
+add.l #_tunlib,R0
+move.l R0,-(sp)
+move.l #_tuntab,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 100
+move #32,(sp)
+move 8(R14),R0
+asl #5,R0
+ext.l R0
+add.l #_tunname,R0
+move.l R0,-(sp)
+move.l #_tuncurn,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 101
+move 8(R14),_curtun
+*line 102
+clr _tunmod
+L27:unlk R14
+rts
+.globl _puttun
+.text
+_puttun:
+~~puttun:
+~n=8
+link R14,#-4
+*line 114
+move #128,(sp)
+move.l #_tuntab,-(sp)
+move 8(R14),R0
+asl #8,R0
+ext.l R0
+add.l #_tunlib,R0
+move.l R0,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 115
+move #32,(sp)
+move.l #_tuncurn,-(sp)
+move 8(R14),R0
+asl #5,R0
+ext.l R0
+add.l #_tunname,R0
+move.l R0,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 116
+clr _tunmod
+L28:unlk R14
+rts
+.globl _inittt
+.text
+_inittt:
+~~inittt:
+~n=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 133
+clr R7
+bra L32
+L33:
+*line 134
+*line 135
+cmp #21,R7
+bge L10000
+move #160,R0
+bra L10002
+L10000:cmp #108,R7
+ble L10003
+move #10960,R0
+bra L10005
+L10003:move R7,R0
+add #-12,R0
+muls #100,R0
+add #160,R0
+L10005:L10002:asl #1,R0
+move 8(R14),R1
+asl #8,R1
+ext.l R1
+move R7,R2
+asl #1,R2
+ext.l R2
+add.l R2,R1
+add.l #_tunlib,R1
+move.l R1,R9
+move R0,(R9)
+L31:
+*line 133
+add #1,R7
+L32:
+*line 133
+cmp #128,R7
+blt L33
+L30:
+*line 137
+clr R7
+bra L36
+L37:
+*line 138
+move R7,R8
+add.l R8,R8
+move.l #_panlkey,R9
+move 0(R8,R9.l),R0
+asl #1,R0
+move 8(R14),R1
+asl #8,R1
+ext.l R1
+move R7,R10
+add.l R10,R10
+add.l #_lclkmap,R10
+move (R10),R2
+asl #1,R2
+ext.l R2
+add.l R2,R1
+add.l #_tunlib,R1
+move.l R1,R9
+move R0,(R9)
+L35:
+*line 137
+add #1,R7
+L36:
+*line 137
+cmp #24,R7
+blt L37
+L34:
+*line 140
+move.l #L1,(sp)
+move 8(R14),R0
+asl #5,R0
+ext.l R0
+add.l #_tunname,R0
+move.l R0,-(sp)
+jsr _strcpy
+addq.l #4,sp
+L29:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _inittl
+.text
+_inittl:
+~~inittl:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 154
+clr R7
+bra L41
+L42:
+*line 155
+move R7,(sp)
+jsr _inittt
+L40:
+*line 154
+add #1,R7
+L41:
+*line 154
+cmp #10,R7
+blt L42
+L39:
+*line 157
+move #200,_tunval
+*line 158
+clr (sp)
+jsr _gettun
+*line 159
+move #128,(sp)
+move.l #_tuntab,-(sp)
+move.l #_oldtun,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+L38:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _tt_trcp
+.text
+_tt_trcp:
+~~tt_trcp:
+~start=8
+~finish=10
+~dest=12
+link R14,#0
+movem.l R5-R7,-(sp)
+~i=R7
+~v=R6
+*line 177
+move #128,(sp)
+move.l #_tuntab,-(sp)
+move.l #_oldtun,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 179
+*line 179
+move 8(R14),R0
+cmp 10(R14),R0
+ble L44
+*line 180
+*line 181
+move 10(R14),R7
+bra L47
+L48:
+*line 182
+*line 183
+*line 184
+*line 185
+move R7,R8
+add.l R8,R8
+move.l #_oldtun,R9
+move 0(R8,R9.l),R0
+ext.l R0
+move.l R0,R6
+move _tunval,R0
+ext.l R0
+add.l R0,R6
+*line 186
+*line 187
+*line 188
+cmp.l #$55a0,R6
+ble L49
+*line 188
+move.l #$55a0,R6
+bra L50
+L49:
+*line 189
+*line 190
+cmp.l #$140,R6
+bge L51
+*line 190
+move.l #$140,R6
+*line 191
+L51:L50:
+*line 192
+move.l R6,R0
+move 12(R14),R9
+add.l R9,R9
+add.l #_tuntab,R9
+move R0,(R9)
+add #1,12(R14)
+L46:
+*line 181
+add #1,R7
+L47:
+*line 181
+cmp 8(R14),R7
+bgt L10006
+cmp #128,12(R14)
+blt L48
+L10006:L45:
+*line 193
+*line 194
+bra L52
+L44:
+*line 195
+*line 196
+*line 197
+move 8(R14),R7
+bra L55
+L56:
+*line 198
+*line 199
+*line 200
+*line 201
+move R7,R8
+add.l R8,R8
+move.l #_oldtun,R9
+move 0(R8,R9.l),R0
+ext.l R0
+move.l R0,R6
+move _tunval,R0
+ext.l R0
+add.l R0,R6
+*line 202
+*line 203
+*line 204
+cmp.l #$55a0,R6
+ble L57
+*line 204
+move.l #$55a0,R6
+bra L58
+L57:
+*line 205
+*line 206
+cmp.l #$140,R6
+bge L59
+*line 206
+move.l #$140,R6
+*line 207
+L59:L58:
+*line 208
+move.l R6,R0
+move 12(R14),R9
+add.l R9,R9
+add.l #_tuntab,R9
+move R0,(R9)
+add #1,12(R14)
+L54:
+*line 197
+add #1,R7
+L55:
+*line 197
+cmp 10(R14),R7
+bgt L10007
+cmp #128,12(R14)
+blt L56
+L10007:L53:
+*line 209
+L52:
+*line 212
+move #1,_tunmod
+L43:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _tt_intp
+.text
+_tt_intp:
+~~tt_intp:
+~from=8
+~to=10
+link R14,#0
+movem.l R2-R7,-(sp)
+~i=R7
+~j=R6
+~k=R5
+~n=R4
+~t=R3
+*line 231
+move #128,(sp)
+move.l #_tuntab,-(sp)
+move.l #_oldtun,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 233
+*line 233
+move 8(R14),R0
+cmp 10(R14),R0
+ble L61
+*line 234
+*line 235
+move 8(R14),R7
+*line 236
+move 10(R14),8(R14)
+*line 237
+move R7,10(R14)
+*line 238
+*line 239
+L61:
+*line 240
+move 10(R14),R4
+sub 8(R14),R4
+*line 242
+*line 243
+cmp #2,R4
+bge L62
+*line 243
+move #-1,R0
+bra L60
+*line 244
+L62:
+*line 245
+move 8(R14),R8
+add.l R8,R8
+add.l #_tuntab,R8
+move (R8),R5
+*line 246
+move R4,R0
+ext.l R0
+move.l R0,-(sp)
+move 10(R14),R8
+add.l R8,R8
+move.l #_tuntab,R9
+move 0(R8,R9.l),R0
+ext.l R0
+move R5,R1
+ext.l R1
+sub.l R1,R0
+move.l #$10,R1
+asl.l R1,R0
+move.l R0,-(sp)
+jsr ldiv
+addq.l #8,sp
+move.l R0,R3
+*line 247
+move 8(R14),R6
+add #1,R6
+*line 248
+sub #1,R4
+*line 250
+clr R7
+bra L65
+L66:
+*line 251
+move R7,R0
+add #1,R0
+ext.l R0
+move.l R0,-(sp)
+move.l R3,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l #$10,R1
+asr.l R1,R0
+move R0,-(sp)
+move R5,R0
+add R0,(sp)
+move R6,R8
+add.l R8,R8
+add.l #_tuntab,R8
+move (sp)+,(R8)
+add #1,R6
+L64:
+*line 250
+add #1,R7
+L65:
+*line 250
+cmp R4,R7
+blt L66
+L63:
+*line 253
+move #1,_tunmod
+*line 254
+clr R0
+bra L60
+L60:tst.l (sp)+
+movem.l (sp)+,R3-R7
+unlk R14
+rts
+.globl _tt_incr
+.text
+_tt_incr:
+~~tt_incr:
+~from=8
+~to=10
+link R14,#0
+movem.l R5-R7,-(sp)
+~i=R7
+~v=R6
+*line 272
+move #128,(sp)
+move.l #_tuntab,-(sp)
+move.l #_oldtun,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 274
+*line 274
+move 8(R14),R0
+cmp 10(R14),R0
+ble L68
+*line 275
+*line 276
+move 8(R14),R7
+*line 277
+move 10(R14),8(R14)
+*line 278
+move R7,10(R14)
+*line 279
+*line 280
+*line 281
+L68:
+*line 282
+move 8(R14),R8
+add.l R8,R8
+move.l #_oldtun,R9
+move 0(R8,R9.l),R0
+ext.l R0
+move.l R0,R6
+*line 284
+*line 285
+move 8(R14),R0
+cmp 10(R14),R0
+move sr,R0
+add #1,8(R14)
+move R0,ccr
+bne L69
+*line 285
+move #-1,R0
+bra L67
+*line 286
+L69:
+*line 287
+move 8(R14),R7
+bra L72
+L73:
+*line 288
+*line 289
+move _tunval,R0
+ext.l R0
+add.l R0,R6
+*line 290
+*line 291
+*line 292
+cmp.l #$55a0,R6
+ble L74
+*line 292
+move.l #$55a0,R6
+bra L75
+L74:
+*line 293
+*line 294
+cmp.l #$140,R6
+bge L76
+*line 294
+move.l #$140,R6
+*line 295
+L76:L75:
+*line 296
+move.l R6,R0
+move R7,R9
+add.l R9,R9
+add.l #_tuntab,R9
+move R0,(R9)
+L71:
+*line 287
+add #1,R7
+L72:
+*line 287
+cmp 10(R14),R7
+ble L73
+L70:
+*line 299
+move #1,_tunmod
+*line 300
+clr R0
+bra L67
+L67:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _td_trcp
+.text
+_td_trcp:
+~~td_trcp:
+~mode=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~cx=R7
+*line 317
+tst 8(R14)
+beq L10008
+move #13,(sp)
+bra L10010
+L10008:move 104+_tdbox,(sp)
+L10010:jsr _exp_c
+move R0,R7
+*line 318
+clr (sp)
+jsr _vbank
+*line 319
+move #14,(sp)
+move.l #L78,-(sp)
+move #54,-(sp)
+move #9,-(sp)
+move 106+_tdbox,-(sp)
+move R7,-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 320
+move #14,(sp)
+move.l #L79,-(sp)
+move #54,-(sp)
+move #10,-(sp)
+move 106+_tdbox,-(sp)
+move R7,-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+L77:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _td_incr
+.text
+_td_incr:
+~~td_incr:
+~mode=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~cx=R7
+*line 334
+tst 8(R14)
+beq L10011
+move #13,(sp)
+bra L10013
+L10011:move 104+_tdbox,(sp)
+L10013:jsr _exp_c
+move R0,R7
+*line 335
+clr (sp)
+jsr _vbank
+*line 336
+move #14,(sp)
+move.l #L81,-(sp)
+move #54,-(sp)
+move #12,-(sp)
+move 106+_tdbox,-(sp)
+move R7,-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+L80:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _td_intp
+.text
+_td_intp:
+~~td_intp:
+~mode=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~cx=R7
+*line 350
+tst 8(R14)
+beq L10014
+move #13,(sp)
+bra L10016
+L10014:move 104+_tdbox,(sp)
+L10016:jsr _exp_c
+move R0,R7
+*line 351
+clr (sp)
+jsr _vbank
+*line 352
+move #14,(sp)
+move.l #L83,-(sp)
+move #54,-(sp)
+move #14,-(sp)
+move 106+_tdbox,-(sp)
+move R7,-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+L82:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _advtcur
+.text
+_advtcur:
+~~advtcur:
+link R14,#0
+movem.l R6-R7,-(sp)
+~newcol=R7
+*line 368
+*line 369
+move.l _curfet,(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+jsr _infield
+addq.l #4,sp
+tst R0
+beq L85
+*line 369
+move.l _infetp,_cfetp
+*line 370
+bra L86
+L85:bra L84
+L86:
+*line 373
+move _stccol,R7
+add #1,R7
+*line 375
+*line 376
+move.l _cfetp,R8
+cmp 4(R8),R7
+bgt L87
+*line 376
+move R7,(sp)
+move _stcrow,-(sp)
+jsr _itcpos
+addq.l #2,sp
+*line 377
+L87:
+*line 378
+move _stccol,R0
+asl #3,R0
+move R0,_cxval
+*line 379
+move _stcrow,R0
+muls #14,R0
+move R0,_cyval
+L84:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _bsptcur
+.text
+_bsptcur:
+~~bsptcur:
+link R14,#0
+movem.l R6-R7,-(sp)
+~newcol=R7
+*line 392
+*line 393
+move.l _curfet,(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+jsr _infield
+addq.l #4,sp
+tst R0
+beq L89
+*line 393
+move.l _infetp,_cfetp
+*line 394
+bra L90
+L89:bra L88
+L90:
+*line 397
+move _stccol,R7
+sub #1,R7
+*line 399
+*line 400
+move.l _cfetp,R8
+cmp 2(R8),R7
+blt L91
+*line 400
+move R7,(sp)
+move _stcrow,-(sp)
+jsr _itcpos
+addq.l #2,sp
+*line 401
+L91:
+*line 402
+move _stccol,R0
+asl #3,R0
+move R0,_cxval
+*line 403
+move _stcrow,R0
+muls #14,R0
+move R0,_cyval
+L88:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _dsttval
+.text
+_dsttval:
+~~dsttval:
+~row=8
+~col=10
+~val=12
+~fg=14
+~bg=16
+link R14,#0
+movem.l R5-R7,-(sp)
+~cfg=R7
+~cbg=R6
+*line 421
+move 14(R14),(sp)
+jsr _exp_c
+move R0,R7
+*line 422
+move 16(R14),(sp)
+jsr _exp_c
+move R0,R6
+*line 424
+move 12(R14),R0
+asr #1,R0
+move R0,(sp)
+move.l #_bfs,-(sp)
+jsr _cnvc2p
+addq.l #4,sp
+*line 426
+add.b #48,_bfs
+*line 427
+add.b #65,1+_bfs
+*line 428
+move.b 2+_bfs,R0
+ext.w R0
+ext.l R0
+add.l #_sfdsp,R0
+move.l R0,R8
+move.b -7(R8),2+_bfs
+*line 429
+add.b #48,3+_bfs
+*line 430
+add.b #48,4+_bfs
+*line 431
+clr.b 5+_bfs
+*line 433
+clr (sp)
+jsr _vbank
+*line 434
+move #14,(sp)
+move.l #_bfs,-(sp)
+move 10(R14),-(sp)
+move 8(R14),-(sp)
+move R6,-(sp)
+move R7,-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+L92:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _tdswin
+.text
+_tdswin:
+~~tdswin:
+~n=R7
+link R14,#-2
+movem.l R3-R7,-(sp)
+~cx=R6
+~i=R5
+~tv=R4
+~ts=-2
+*line 452
+move 8(R14),R7
+*line 452
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 10(R8,R9.l),(sp)
+jsr _exp_c
+move R0,R6
+*line 456
+clr (sp)
+jsr _vbank
+*line 457
+*line 458
+move R6,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 6(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 4(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 2(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 0(R8,R9.l),-(sp)
+move #128,-(sp)
+move.l _tunob,-(sp)
+jsr _vbfill4
+adda.l #14,sp
+*line 462
+*line 463
+move #14,(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_tdbxlb,R9
+move.l 0(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 14(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 12(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 467
+move R7,R0
+bra L95
+*line 468
+L96:
+*line 469
+*line 470
+*line 471
+clr R5
+bra L99
+L100:
+*line 472
+*line 473
+move #14,(sp)
+move R5,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_tdlabl,R9
+move.l 0(R8,R9.l),-(sp)
+move #1,-(sp)
+move R5,-(sp)
+move #9,-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 474
+move R5,(sp)
+add #1,(sp)
+move.l #L101,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 475
+move #14,(sp)
+move.l #_bfs,-(sp)
+move #3,-(sp)
+move R5,-(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 476
+*line 477
+*line 478
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 10(R8,R9.l),(sp)
+move R5,R8
+add.l R8,R8
+add.l #_tuntab,R8
+cmp #320,(R8)
+beq L10018
+move R5,R8
+add.l R8,R8
+add.l #_tuntab,R8
+cmp #21920,(R8)
+bne L10017
+L10018:move #10,-(sp)
+bra L10020
+L10017:move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 8(R8,R9.l),-(sp)
+L10020:move R5,R8
+add.l R8,R8
+move.l #_tuntab,R9
+move 0(R8,R9.l),-(sp)
+move #6,-(sp)
+move R5,-(sp)
+jsr _dsttval
+addq.l #8,sp
+L98:
+*line 471
+add #1,R5
+L99:
+*line 471
+cmp #24,R5
+blt L100
+L97:
+*line 479
+*line 480
+bra L93
+*line 481
+*line 482
+L102:
+*line 483
+*line 484
+*line 485
+move #24,R5
+bra L105
+L106:
+*line 486
+*line 487
+move R5,(sp)
+add #1,(sp)
+move.l #L107,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 488
+move #14,(sp)
+move.l #_bfs,-(sp)
+move #13,-(sp)
+move R5,-(sp)
+add #-24,(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 489
+*line 490
+*line 491
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 10(R8,R9.l),(sp)
+move R5,R8
+add.l R8,R8
+add.l #_tuntab,R8
+cmp #320,(R8)
+beq L10022
+move R5,R8
+add.l R8,R8
+add.l #_tuntab,R8
+cmp #21920,(R8)
+bne L10021
+L10022:move #10,-(sp)
+bra L10024
+L10021:move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 8(R8,R9.l),-(sp)
+L10024:move R5,R8
+add.l R8,R8
+move.l #_tuntab,R9
+move 0(R8,R9.l),-(sp)
+move #16,-(sp)
+move R5,-(sp)
+add #-24,(sp)
+jsr _dsttval
+addq.l #8,sp
+L104:
+*line 485
+add #1,R5
+L105:
+*line 485
+cmp #48,R5
+blt L106
+L103:
+*line 492
+*line 493
+bra L93
+*line 494
+*line 495
+L108:
+*line 496
+*line 497
+*line 498
+move #48,R5
+bra L111
+L112:
+*line 499
+*line 500
+move R5,(sp)
+add #1,(sp)
+move.l #L113,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 501
+move #14,(sp)
+move.l #_bfs,-(sp)
+move #23,-(sp)
+move R5,-(sp)
+add #-48,(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 502
+*line 503
+*line 504
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 10(R8,R9.l),(sp)
+move R5,R8
+add.l R8,R8
+add.l #_tuntab,R8
+cmp #320,(R8)
+beq L10026
+move R5,R8
+add.l R8,R8
+add.l #_tuntab,R8
+cmp #21920,(R8)
+bne L10025
+L10026:move #10,-(sp)
+bra L10028
+L10025:move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 8(R8,R9.l),-(sp)
+L10028:move R5,R8
+add.l R8,R8
+move.l #_tuntab,R9
+move 0(R8,R9.l),-(sp)
+move #26,-(sp)
+move R5,-(sp)
+add #-48,(sp)
+jsr _dsttval
+addq.l #8,sp
+L110:
+*line 498
+add #1,R5
+L111:
+*line 498
+cmp #72,R5
+blt L112
+L109:
+*line 505
+*line 506
+bra L93
+*line 507
+*line 508
+*line 509
+L114:
+*line 510
+*line 511
+*line 512
+move #72,R5
+bra L117
+L118:
+*line 513
+*line 514
+move R5,(sp)
+add #1,(sp)
+move.l #L119,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 515
+move #14,(sp)
+move.l #_bfs,-(sp)
+move #33,-(sp)
+move R5,-(sp)
+add #-72,(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 516
+*line 517
+*line 518
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 10(R8,R9.l),(sp)
+move R5,R8
+add.l R8,R8
+add.l #_tuntab,R8
+cmp #320,(R8)
+beq L10030
+move R5,R8
+add.l R8,R8
+add.l #_tuntab,R8
+cmp #21920,(R8)
+bne L10029
+L10030:move #10,-(sp)
+bra L10032
+L10029:move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 8(R8,R9.l),-(sp)
+L10032:move R5,R8
+add.l R8,R8
+move.l #_tuntab,R9
+move 0(R8,R9.l),-(sp)
+move #36,-(sp)
+move R5,-(sp)
+add #-72,(sp)
+jsr _dsttval
+addq.l #8,sp
+L116:
+*line 512
+add #1,R5
+L117:
+*line 512
+cmp #96,R5
+blt L118
+L115:
+*line 519
+*line 520
+bra L93
+*line 521
+*line 522
+L120:
+*line 523
+*line 524
+*line 525
+move #96,R5
+bra L123
+L124:
+*line 526
+*line 527
+move R5,(sp)
+add #1,(sp)
+move.l #L125,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 528
+move #14,(sp)
+move.l #_bfs,-(sp)
+move #43,-(sp)
+move R5,-(sp)
+add #-96,(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 529
+*line 530
+*line 531
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 10(R8,R9.l),(sp)
+move R5,R8
+add.l R8,R8
+add.l #_tuntab,R8
+cmp #320,(R8)
+beq L10034
+move R5,R8
+add.l R8,R8
+add.l #_tuntab,R8
+cmp #21920,(R8)
+bne L10033
+L10034:move #10,-(sp)
+bra L10036
+L10033:move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 8(R8,R9.l),-(sp)
+L10036:move R5,R8
+add.l R8,R8
+move.l #_tuntab,R9
+move 0(R8,R9.l),-(sp)
+move #47,-(sp)
+move R5,-(sp)
+add #-96,(sp)
+jsr _dsttval
+addq.l #8,sp
+L122:
+*line 525
+add #1,R5
+L123:
+*line 525
+cmp #120,R5
+blt L124
+L121:
+*line 532
+*line 533
+bra L93
+*line 534
+*line 535
+L126:
+*line 536
+*line 537
+*line 538
+move #120,R5
+bra L129
+L130:
+*line 539
+*line 540
+move R5,(sp)
+add #1,(sp)
+move.l #L131,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 541
+move #14,(sp)
+move.l #_bfs,-(sp)
+move #54,-(sp)
+move R5,-(sp)
+add #-120,(sp)
+move #10,-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 542
+*line 543
+*line 544
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 10(R8,R9.l),(sp)
+move R5,R8
+add.l R8,R8
+add.l #_tuntab,R8
+cmp #320,(R8)
+beq L10038
+move R5,R8
+add.l R8,R8
+add.l #_tuntab,R8
+cmp #21920,(R8)
+bne L10037
+L10038:move #10,-(sp)
+bra L10040
+L10037:move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 8(R8,R9.l),-(sp)
+L10040:move R5,R8
+add.l R8,R8
+move.l #_tuntab,R9
+move 0(R8,R9.l),-(sp)
+move #58,-(sp)
+move R5,-(sp)
+add #-120,(sp)
+jsr _dsttval
+addq.l #8,sp
+L128:
+*line 538
+add #1,R5
+L129:
+*line 538
+cmp #128,R5
+blt L130
+L127:
+*line 545
+*line 546
+bra L93
+*line 547
+*line 548
+*line 549
+L132:
+*line 550
+*line 551
+*line 552
+clr (sp)
+jsr _td_trcp
+*line 553
+clr (sp)
+jsr _td_incr
+*line 554
+clr (sp)
+jsr _td_intp
+*line 555
+move #14,(sp)
+move.l #L133,-(sp)
+move #54,-(sp)
+move #16,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 556
+*line 557
+tst _tunval
+blt L10041
+move _tunval,R0
+bra L10043
+L10041:move _tunval,R0
+neg R0
+L10043:move R0,R4
+asr R4
+*line 558
+tst _tunval
+blt L10044
+move #43,R0
+bra L10046
+L10044:move #45,R0
+L10046:move.b R0,-2(R14)
+*line 559
+move R4,(sp)
+move.b -2(R14),R0
+ext.w R0
+move R0,-(sp) 
+move.l #L134,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 560
+move #14,(sp)
+move.l #_bfs,-(sp)
+move #54,-(sp)
+move #18,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 561
+*line 562
+move #14,(sp)
+move.l #L135,-(sp)
+move #54,-(sp)
+move #20,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 563
+move #14,(sp)
+move.l #L136,-(sp)
+move #54,-(sp)
+move #22,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 564
+*line 565
+move #14,(sp)
+move.l #L137,-(sp)
+move #54,-(sp)
+move #24,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 566
+move _curtun,R0
+add #48,R0
+move.b R0,_bfs
+*line 567
+clr.b 1+_bfs
+*line 568
+*line 569
+move #14,(sp)
+move.l #_bfs,-(sp)
+move #61,-(sp)
+move #24,-(sp)
+tst _tunmod
+beq L10047
+move #14,-(sp)
+bra L10049
+L10047:move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 8(R8,R9.l),-(sp)
+L10049:move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 570
+bra L93
+*line 571
+*line 572
+L138:
+*line 573
+*line 574
+*line 575
+move #14,(sp)
+move.l #_tuncurn,-(sp)
+move #7,-(sp)
+move #24,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_tdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _tunob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+bra L93
+*line 576
+bra L94
+L95:cmp #7,R0
+bhi L94
+asl #2,R0
+move R0,R8
+add.l #L139,R8
+move.l (R8),R8
+jmp (R8)
+.data
+L139:.dc.l L96
+.dc.l L102
+.dc.l L108
+.dc.l L114
+.dc.l L120
+.dc.l L126
+.dc.l L132
+.dc.l L138
+.text
+L94:L93:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _twins
+.text
+_twins:
+~~twins:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 593
+clr R7
+bra L143
+L144:
+*line 594
+move R7,(sp)
+jsr _tdswin
+L142:
+*line 593
+add #1,R7
+L143:
+*line 593
+cmp #8,R7
+blt L144
+L141:L140:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _tundsp
+.text
+_tundsp:
+~~tundsp:
+link R14,#-4
+*line 608
+move.l #_v_score,_tunob
+*line 609
+move.l #_v_curs0,_obj0
+*line 610
+move.l #_v_tcur,_obj2
+*line 611
+move.l #144+_v_obtab,_tdoct
+*line 613
+clr _ttcmdsv
+*line 614
+clr _tdnamsw
+*line 615
+clr _submenu
+*line 617
+jsr _dswap
+*line 619
+*line 620
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L146
+*line 620
+clr (sp)
+jsr _vbank
+*line 621
+L146:
+*line 622
+move #32767,(sp)
+clr -(sp)
+move.l _tunob,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 623
+move #12033,(sp)
+clr -(sp)
+move.l _tunob,R0
+add.l #$fffe,R0
+move.l R0,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 625
+move #-1,(sp)
+move #1536,-(sp)
+clr -(sp)
+clr -(sp)
+move #350,-(sp)
+move #512,-(sp)
+move.l _tunob,-(sp)
+clr -(sp)
+clr -(sp)
+move #8,-(sp)
+jsr _SetObj
+adda.l #20,sp
+*line 626
+move #-1,(sp)
+move #1540,-(sp)
+move #336,-(sp)
+move #488,-(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 627
+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 629
+move #1,(sp)
+jsr _arcurs
+*line 630
+move #1,(sp)
+jsr _itcini
+*line 631
+move #3,(sp)
+jsr _ttcini
+*line 633
+jsr _twins
+*line 635
+move #8,(sp)
+move #8,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 637
+move #61,(sp)
+move #24,-(sp)
+jsr _settc
+addq.l #2,sp
+*line 639
+move.l #_tunpal,(sp)
+jsr _vsndpal
+L145:unlk R14
+rts
+.data
+L3:.dc.b $43,$0
+L4:.dc.b $23,$0
+L5:.dc.b $44,$0
+L6:.dc.b $23,$0
+L7:.dc.b $45,$0
+L8:.dc.b $46,$0
+L9:.dc.b $23,$0
+L10:.dc.b $47,$0
+L11:.dc.b $23,$0
+L12:.dc.b $41,$0
+L13:.dc.b $23,$0
+L14:.dc.b $42,$0
+L15:.dc.b $43,$0
+L16:.dc.b $23,$0
+L17:.dc.b $44,$0
+L18:.dc.b $23,$0
+L19:.dc.b $45,$0
+L20:.dc.b $46,$0
+L21:.dc.b $23,$0
+L22:.dc.b $47,$0
+L23:.dc.b $23,$0
+L24:.dc.b $41,$0
+L25:.dc.b $23,$0
+L26:.dc.b $42,$0
+L78:.dc.b $54,$72,$61,$6E,$73,$70,$6F,$73,$65,$0
+L79:.dc.b $61,$6E,$64,$20,$43,$6F,$70,$79,$0
+L81:.dc.b $49,$6E,$63,$72,$65,$6D,$65,$6E,$74,$0
+L83:.dc.b $49,$6E,$74,$72,$70,$6F,$6C,$61,$74,$0
+L101:.dc.b $25,$32,$64,$0
+L107:.dc.b $25,$32,$64,$0
+L113:.dc.b $25,$32,$64,$0
+L119:.dc.b $25,$32,$64,$0
+L125:.dc.b $25,$33,$64,$0
+L131:.dc.b $25,$33,$64,$0
+L133:.dc.b $55,$6E,$64,$6F,$0
+L134:.dc.b $56,$61,$6C,$20,$25,$63,$25,$30,$34,$64,$0
+L135:.dc.b $53,$74,$6F,$72,$65,$0
+L136:.dc.b $52,$65,$74,$72,$69,$65,$76,$65,$0
+L137:.dc.b $54,$61,$62,$6C,$65,$20,$23,$0
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
Index: alcyon/ungetc.s
===================================================================
--- alcyon/ungetc.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/ungetc.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,40 @@
+.globl _Cbuffs
+.globl _Stdbufs
+.globl _Stdbuf
+.globl _ungetc
+.text
+_ungetc:
+~~ungetc:
+~c=R7
+~ptr=R13
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+*line 16
+move 8(R14),R7
+*line 16
+move.l 10(R14),R13
+*line 16
+*line 17
+cmp #-1,R7
+beq L10000
+move.l (R13),R0
+cmp.l 8(R13),R0
+bhi L2
+L10000:*line 17
+move #-1,R0
+bra L1
+*line 18
+L2:
+*line 19
+sub.l #1,(R13)
+move R7,R0
+move.l (R13),R9
+move.b R0,(R9)
+*line 21
+move R7,R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/unlink.s
===================================================================
--- alcyon/unlink.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/unlink.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,30 @@
+.globl _unlink
+.text
+_unlink:
+~~unlink:
+~name=8
+link R14,#-60
+~delfcb=-56
+*line 33
+*line 34
+move.l R14,(sp)
+add.l #-56,(sp)
+move.l 8(R14),-(sp)
+jsr _fcbinit
+addq.l #4,sp
+tst R0
+beq L2
+*line 34
+move #-1,R0
+bra L1
+*line 35
+*line 43
+L2:
+*line 44
+move.l R14,(sp)
+add.l #-56,(sp)
+jsr _DelFile
+bra L1
+L1:unlk R14
+rts
+.data
Index: alcyon/uslice.s
===================================================================
--- alcyon/uslice.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/uslice.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1702 @@
+.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 _scrl
+.globl _sbase
+.globl _sd
+.globl _soffset
+.globl _consl
+.globl _cursl
+.globl _nxtsl
+.globl _prvsl
+.globl _saddr
+.globl _slices
+.globl _gtctab
+.globl _gdfsep
+.globl _gdstbc
+.globl _gdstbn
+.globl _gdstbp
+.globl _gdfsl
+.globl _lintab1
+.data
+_lintab1:
+.dc.w $CD
+.dc.w $CD
+.dc.w $C9
+.dc.w $C5
+.dc.w $C5
+.dc.w $C1
+.dc.w $C1
+.dc.w $BD
+.dc.w $B9
+.dc.w $B9
+.dc.w $B5
+.dc.w $B5
+.dc.w $B1
+.dc.w $B1
+.dc.w $AD
+.dc.w $A9
+.dc.w $A9
+.dc.w $A5
+.dc.w $A5
+.dc.w $A1
+.dc.w $9D
+.dc.w $9D
+.dc.w $99
+.dc.w $99
+.dc.w $95
+.dc.w $95
+.dc.w $91
+.dc.w $8D
+.dc.w $8D
+.dc.w $89
+.dc.w $89
+.dc.w $85
+.dc.w $81
+.dc.w $81
+.dc.w $7D
+.dc.w $7D
+.dc.w $79
+.dc.w $79
+.dc.w $75
+.dc.w $71
+.dc.w $71
+.dc.w $6D
+.dc.w $6D
+.dc.w $69
+.dc.w $65
+.dc.w $65
+.dc.w $61
+.dc.w $61
+.dc.w $5D
+.dc.w $5D
+.dc.w $59
+.dc.w $55
+.dc.w $55
+.dc.w $51
+.dc.w $51
+.dc.w $4D
+.dc.w $49
+.dc.w $49
+.dc.w $45
+.dc.w $45
+.dc.w $41
+.dc.w $41
+.dc.w $3D
+.dc.w $39
+.dc.w $39
+.dc.w $35
+.dc.w $35
+.dc.w $31
+.dc.w $2D
+.dc.w $2D
+.dc.w $29
+.dc.w $29
+.dc.w $25
+.dc.w $25
+.dc.w $21
+.dc.w $1D
+.dc.w $1D
+.dc.w $19
+.dc.w $19
+.dc.w $15
+.dc.w $11
+.dc.w $11
+.dc.w $D
+.dc.w $D
+.dc.w $9
+.dc.w $9
+.dc.w $5
+.dc.w $1
+.globl _lintab2
+.data
+_lintab2:
+.dc.w $CD
+.dc.w $C9
+.dc.w $C9
+.dc.w $C5
+.dc.w $C1
+.dc.w $C1
+.dc.w $BD
+.dc.w $BD
+.dc.w $B9
+.dc.w $B5
+.dc.w $B5
+.dc.w $B1
+.dc.w $B1
+.dc.w $AD
+.dc.w $AD
+.dc.w $A9
+.dc.w $A5
+.dc.w $A5
+.dc.w $A1
+.dc.w $A1
+.dc.w $9D
+.dc.w $99
+.dc.w $99
+.dc.w $95
+.dc.w $95
+.dc.w $91
+.dc.w $91
+.dc.w $8D
+.dc.w $89
+.dc.w $89
+.dc.w $85
+.dc.w $85
+.dc.w $81
+.dc.w $7D
+.dc.w $7D
+.dc.w $79
+.dc.w $79
+.dc.w $75
+.dc.w $75
+.dc.w $71
+.dc.w $6D
+.dc.w $6D
+.dc.w $69
+.dc.w $69
+.dc.w $65
+.dc.w $61
+.dc.w $61
+.dc.w $5D
+.dc.w $5D
+.dc.w $59
+.dc.w $59
+.dc.w $55
+.dc.w $51
+.dc.w $51
+.dc.w $4D
+.dc.w $4D
+.dc.w $49
+.dc.w $45
+.dc.w $45
+.dc.w $41
+.dc.w $41
+.dc.w $3D
+.dc.w $3D
+.dc.w $39
+.dc.w $35
+.dc.w $35
+.dc.w $31
+.dc.w $31
+.dc.w $2D
+.dc.w $29
+.dc.w $29
+.dc.w $25
+.dc.w $25
+.dc.w $21
+.dc.w $21
+.dc.w $1D
+.dc.w $19
+.dc.w $19
+.dc.w $15
+.dc.w $15
+.dc.w $11
+.dc.w $D
+.dc.w $D
+.dc.w $9
+.dc.w $9
+.dc.w $5
+.dc.w $5
+.dc.w $1
+.globl _nttab1
+.data
+_nttab1:
+.dc.w $0
+.dc.w $2
+.dc.w $3
+.dc.w $3
+.dc.w $5
+.dc.w $3
+.dc.w $0
+.globl _nttab2
+.data
+_nttab2:
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $3
+.dc.w $0
+.dc.w $4
+.dc.w $0
+.globl _pxtbl
+.data
+_pxtbl:
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FFFF
+.dc.w $0
+.dc.w $0
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $0
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $0
+.dc.w $FFFF
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $0
+.dc.w $0
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $0
+.globl _epxtbl
+.data
+_epxtbl:
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $FFFF
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.globl _uslice
+.text
+_uslice:
+~~uslice:
+~mask1=R7
+~mask2=R6
+~slice=8
+~gdstb=16
+link R14,#-26
+movem.l R2-R7/R11-R13,-(sp)
+~pxptr=R13
+~slptr=R12
+~gdsep=R11
+~i=R5
+~ncolor=R4
+~w=R3
+~ncptr=-4
+~nctabp=-8
+~gdstp=-12
+~gdprv=-16
+~gdnxt=-20
+~wrote=-22
+~lintab=-26
+*line 195
+move 12(R14),R7
+*line 195
+move 14(R14),R6
+*line 199
+move.l 16(R14),-12(R14)
+*line 200
+tst _sd
+beq L10000
+move.l #_nttab2,R0
+bra L10002
+L10000:move.l #_nttab1,R0
+L10002:move.l R0,-8(R14)
+*line 201
+move.l #_gtctab,-4(R14)
+*line 202
+clr -22(R14)
+*line 204
+cmp.b #4,_ac_code
+bne L10003
+move.l #_lintab1,R0
+bra L10005
+L10003:move.l #_lintab2,R0
+L10005:move.l R0,-26(R14)
+*line 206
+*line 206
+move.l 16(R14),R8
+tst.l 64(R8)
+beq L2
+*line 207
+*line 208
+move.l 8(R14),R12
+*line 209
+move R7,R4
+and #13107,R4
+*line 210
+*line 211
+move #211,R5
+bra L5
+L6:
+*line 212
+clr R0
+move R4,R0
+clr R1
+move R6,R1
+and (R12),R1
+or R1,R0
+move R0,(R12)+
+L4:L5:
+*line 211
+clr R0
+move R5,R0
+sub #1,R5
+tst R0
+bne L6
+L3:
+*line 212
+*line 213
+*line 214
+move.l 16(R14),R8
+move.l #$0,64(R8)
+*line 215
+*line 216
+*line 217
+*line 218
+*line 219
+L2:
+*line 220
+clr R5
+bra L9
+L10:
+*line 221
+*line 222
+move R7,R4
+move.l -4(R14),R8
+move (R8),R0
+and R0,R4
+add.l #2,-4(R14)
+*line 223
+move.l -12(R14),-16(R14)
+*line 224
+move.l -12(R14),R8
+move.l (R8),R11
+add.l #4,-12(R14)
+*line 225
+*line 226
+*line 226
+move.l R11,R0
+beq L11
+*line 227
+*line 228
+add #1,-22(R14)
+*line 229
+*line 230
+L14:
+*line 231
+*line 232
+*line 233
+*line 234
+move.l -26(R14),R8
+move 4(R11),R9
+add.l R9,R9
+move 0(R8,R9.l),R0
+asl #1,R0
+ext.l R0
+move.l R0,R12
+add.l 8(R14),R12
+*line 235
+move 6(R11),R0
+asl #3,R0
+ext.l R0
+move.l R0,R13
+add.l #_pxtbl,R13
+*line 236
+*line 237
+*line 238
+*line 239
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R4,R1
+and (R13)+,R1
+or R1,R0
+move R0,(R12)+
+*line 240
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R4,R1
+and (R13)+,R1
+or R1,R0
+move R0,(R12)+
+*line 241
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R4,R1
+and (R13)+,R1
+or R1,R0
+move R0,(R12)
+*line 242
+*line 243
+move.l (R11),-20(R14)
+*line 244
+*line 245
+*line 246
+*line 247
+*line 247
+move 6(R11),R8
+add.l R8,R8
+add.l -8(R14),R8
+move (R8),6(R11)
+bne L15
+*line 248
+*line 249
+*line 250
+*line 251
+move.l -16(R14),R8
+move.l -20(R14),(R8)
+*line 252
+move.l _gdfsep,(R11)
+*line 253
+move.l R11,_gdfsep
+*line 254
+*line 255
+bra L16
+L15:
+*line 256
+move.l R11,-16(R14)
+L16:
+*line 257
+*line 258
+move.l -20(R14),R11
+*line 259
+L13:
+*line 260
+move.l R11,R0
+bne L14
+L12:
+*line 261
+L11:L8:
+*line 220
+add #1,R5
+L9:
+*line 220
+cmp #12,R5
+blo L10
+L7:bra L19
+L20:
+*line 266
+*line 267
+*line 268
+move.l -12(R14),-16(R14)
+*line 269
+move.l -12(R14),R8
+move.l (R8),R11
+add.l #4,-12(R14)
+*line 270
+*line 271
+*line 271
+move.l R11,R0
+beq L21
+*line 272
+*line 273
+add #1,-22(R14)
+*line 274
+*line 275
+L24:
+*line 276
+*line 277
+*line 278
+*line 279
+move.l 8(R14),R12
+add.l #424,R12
+*line 280
+move 6(R11),R0
+asl #5,R0
+ext.l R0
+move.l R0,R13
+add.l #_epxtbl,R13
+*line 281
+*line 282
+*line 283
+*line 284
+move R7,R4
+and 4(R11),R4
+*line 285
+*line 286
+*line 287
+*line 288
+*line 289
+move (R13)+,R3
+beq L25
+*line 289
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R3,R1
+and R4,R1
+or R1,R0
+move R0,(R12)
+*line 290
+L25:
+*line 291
+add.l #2,R12
+*line 292
+*line 293
+*line 294
+move (R13)+,R3
+beq L26
+*line 294
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R3,R1
+and R4,R1
+or R1,R0
+move R0,(R12)
+*line 295
+L26:
+*line 296
+add.l #2,R12
+*line 297
+*line 298
+*line 299
+move (R13)+,R3
+beq L27
+*line 299
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R3,R1
+and R4,R1
+or R1,R0
+move R0,(R12)
+*line 300
+L27:
+*line 301
+add.l #2,R12
+*line 302
+*line 303
+*line 304
+move (R13)+,R3
+beq L28
+*line 304
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R3,R1
+and R4,R1
+or R1,R0
+move R0,(R12)
+*line 305
+L28:
+*line 306
+add.l #2,R12
+*line 307
+*line 308
+*line 309
+move (R13)+,R3
+beq L29
+*line 309
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R3,R1
+and R4,R1
+or R1,R0
+move R0,(R12)
+*line 310
+L29:
+*line 311
+add.l #2,R12
+*line 312
+*line 313
+*line 314
+move (R13)+,R3
+beq L30
+*line 314
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R3,R1
+and R4,R1
+or R1,R0
+move R0,(R12)
+*line 315
+L30:
+*line 316
+add.l #2,R12
+*line 317
+*line 318
+*line 319
+move (R13)+,R3
+beq L31
+*line 319
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R3,R1
+and R4,R1
+or R1,R0
+move R0,(R12)
+*line 320
+L31:
+*line 321
+add.l #2,R12
+*line 322
+*line 323
+*line 324
+move (R13)+,R3
+beq L32
+*line 324
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R3,R1
+and R4,R1
+or R1,R0
+move R0,(R12)
+*line 325
+L32:
+*line 326
+add.l #2,R12
+*line 327
+*line 328
+*line 329
+move (R13)+,R3
+beq L33
+*line 329
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R3,R1
+and R4,R1
+or R1,R0
+move R0,(R12)
+*line 330
+L33:
+*line 331
+add.l #2,R12
+*line 332
+*line 333
+*line 334
+move (R13)+,R3
+beq L34
+*line 334
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R3,R1
+and R4,R1
+or R1,R0
+move R0,(R12)
+*line 335
+L34:
+*line 336
+add.l #2,R12
+*line 337
+*line 338
+*line 339
+move (R13)+,R3
+beq L35
+*line 339
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R3,R1
+and R4,R1
+or R1,R0
+move R0,(R12)
+*line 340
+L35:
+*line 341
+add.l #2,R12
+*line 342
+*line 343
+*line 344
+move (R13),R3
+beq L36
+*line 344
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R3,R1
+and R4,R1
+or R1,R0
+move R0,(R12)
+*line 345
+L36:
+*line 346
+move.l (R11),-20(R14)
+*line 347
+move.l -16(R14),R8
+move.l -20(R14),(R8)
+*line 348
+move.l _gdfsep,(R11)
+*line 349
+move.l R11,_gdfsep
+*line 350
+move.l -20(R14),R11
+*line 351
+L23:
+*line 352
+move.l R11,R0
+bne L24
+L22:
+*line 353
+L21:L18:
+*line 266
+add #1,R5
+L19:
+*line 266
+cmp #16,R5
+blo L20
+L17:
+*line 358
+move -22(R14),R0
+bra L1
+L1:tst.l (sp)+
+movem.l (sp)+,R3-R7/R11-R13
+unlk R14
+rts
+.globl _rslice
+.text
+_rslice:
+~~rslice:
+~gdstb=8
+link R14,#-8
+movem.l R5-R7/R11-R13,-(sp)
+~gdsep=R13
+~gdstp=R12
+~nctabp=R11
+~i=R7
+~nc=R6
+~gdprv=-4
+~gdnxt=-8
+*line 391
+tst _sd
+beq L10006
+move.l #_nttab2,R0
+bra L10008
+L10006:move.l #_nttab1,R0
+L10008:move.l R0,R11
+*line 392
+move.l 8(R14),R12
+*line 398
+clr R7
+bra L40
+L41:
+*line 399
+*line 400
+move.l R12,-4(R14)
+*line 401
+move.l (R12)+,R13
+*line 402
+*line 403
+*line 403
+move.l R13,R0
+beq L42
+*line 404
+*line 405
+L45:
+*line 406
+*line 407
+move.l (R13),-8(R14)
+*line 408
+*line 409
+*line 410
+*line 411
+*line 411
+move 6(R13),R6
+move.l R11,R8
+clr R1
+move R6,R1
+lsl #1,R1
+swap R1
+clr R1
+swap R1
+add.l R1,R8
+move (R8),6(R13)
+bne L46
+*line 412
+*line 417
+*line 418
+*line 419
+*line 420
+*line 421
+move.l -4(R14),R8
+move.l -8(R14),(R8)
+*line 422
+move.l _gdfsep,(R13)
+*line 423
+move.l R13,_gdfsep
+*line 424
+bra L47
+L46:
+*line 425
+*line 426
+*line 431
+*line 432
+*line 433
+move.l R13,-4(R14)
+L47:
+*line 434
+*line 435
+*line 436
+move.l -8(R14),R13
+*line 437
+L44:
+*line 438
+move.l R13,R0
+bne L45
+L43:
+*line 439
+L42:L39:
+*line 398
+add #1,R7
+L40:
+*line 398
+cmp #12,R7
+blo L41
+L38:bra L50
+L51:
+*line 446
+*line 447
+*line 448
+move.l R12,-4(R14)
+*line 449
+move.l (R12)+,R13
+*line 450
+*line 451
+*line 451
+move.l R13,R0
+beq L52
+*line 452
+*line 453
+L55:
+*line 454
+*line 455
+move.l (R13),-8(R14)
+*line 456
+move.l -4(R14),R8
+move.l -8(R14),(R8)
+*line 457
+move.l _gdfsep,(R13)
+*line 458
+move.l R13,_gdfsep
+*line 459
+move.l -8(R14),R13
+*line 460
+L54:
+*line 461
+move.l R13,R0
+bne L55
+L53:
+*line 462
+L52:L49:
+*line 446
+add #1,R7
+L50:
+*line 446
+cmp #16,R7
+blo L51
+L48:
+*line 465
+move.l 8(R14),R8
+move.l #$0,64(R8)
+L37:tst.l (sp)+
+movem.l (sp)+,R6-R7/R11-R13
+unlk R14
+rts
+.globl _cslice
+.text
+_cslice:
+~~cslice:
+~mask1=R7
+~mask2=R6
+~slice=8
+~gdstb=16
+link R14,#-26
+movem.l R2-R7/R11-R13,-(sp)
+~pxptr=R13
+~slptr=R12
+~gdsep=R11
+~i=R5
+~ncolor=R4
+~w=R3
+~ncptr=-4
+~nctabp=-8
+~gdstp=-12
+~gdprv=-16
+~gdnxt=-20
+~wrote=-22
+~lintab=-26
+*line 508
+move 12(R14),R7
+*line 508
+move 14(R14),R6
+*line 512
+move.l 16(R14),-12(R14)
+*line 513
+tst _sd
+beq L10009
+move.l #_nttab2,R0
+bra L10011
+L10009:move.l #_nttab1,R0
+L10011:move.l R0,-8(R14)
+*line 514
+move.l #_gtctab,-4(R14)
+*line 515
+clr -22(R14)
+*line 517
+cmp.b #4,_ac_code
+bne L10012
+move.l #_lintab1,R0
+bra L10014
+L10012:move.l #_lintab2,R0
+L10014:move.l R0,-26(R14)
+*line 519
+*line 519
+move.l 16(R14),R8
+tst.l 64(R8)
+beq L57
+*line 520
+*line 521
+move.l 8(R14),R12
+*line 522
+move R7,R4
+and #13107,R4
+*line 523
+*line 524
+move #211,R5
+bra L60
+L61:
+*line 525
+clr R0
+move R4,R0
+clr R1
+move R6,R1
+and (R12),R1
+or R1,R0
+move R0,(R12)+
+L59:L60:
+*line 524
+clr R0
+move R5,R0
+sub #1,R5
+tst R0
+bne L61
+L58:
+*line 525
+*line 526
+*line 527
+move.l 16(R14),R8
+move.l #$0,64(R8)
+*line 528
+*line 529
+*line 530
+*line 531
+*line 532
+L57:
+*line 533
+clr R5
+bra L64
+L65:
+*line 534
+*line 535
+move.l -4(R14),R8
+move (R8),R4
+add.l #2,-4(R14)
+*line 536
+move.l -12(R14),-16(R14)
+*line 537
+move.l -12(R14),R8
+move.l (R8),R11
+add.l #4,-12(R14)
+*line 538
+*line 539
+*line 539
+move.l R11,R0
+beq L66
+*line 540
+*line 543
+*line 544
+add #1,-22(R14)
+*line 545
+*line 546
+L69:
+*line 547
+*line 548
+*line 549
+*line 550
+move.l -26(R14),R8
+move 4(R11),R9
+add.l R9,R9
+move 0(R8,R9.l),R0
+asl #1,R0
+ext.l R0
+move.l R0,R12
+add.l 8(R14),R12
+*line 551
+move 6(R11),R0
+asl #3,R0
+ext.l R0
+move.l R0,R13
+add.l #_pxtbl,R13
+*line 552
+*line 553
+*line 554
+*line 555
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R4,R1
+and (R13)+,R1
+or R1,R0
+move R0,(R12)+
+*line 556
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R4,R1
+and (R13)+,R1
+or R1,R0
+move R0,(R12)+
+*line 557
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R4,R1
+and (R13)+,R1
+or R1,R0
+move R0,(R12)
+*line 558
+*line 559
+move.l (R11),-20(R14)
+*line 560
+move.l R11,-16(R14)
+*line 561
+move.l -20(R14),R11
+*line 562
+L68:
+*line 563
+move.l R11,R0
+bne L69
+L67:
+*line 564
+L66:L63:
+*line 533
+add #1,R5
+L64:
+*line 533
+cmp #12,R5
+blo L65
+L62:bra L72
+L73:
+*line 569
+*line 570
+*line 571
+move.l -12(R14),-16(R14)
+*line 572
+move.l -12(R14),R8
+move.l (R8),R11
+add.l #4,-12(R14)
+*line 573
+*line 574
+*line 574
+move.l R11,R0
+beq L74
+*line 575
+*line 576
+add #1,-22(R14)
+*line 577
+*line 578
+L77:
+*line 579
+*line 580
+*line 581
+*line 582
+move.l 8(R14),R12
+add.l #424,R12
+*line 583
+move 6(R11),R0
+asl #5,R0
+ext.l R0
+move.l R0,R13
+add.l #_epxtbl,R13
+*line 584
+*line 585
+move 4(R11),R4
+*line 586
+*line 587
+*line 588
+*line 589
+*line 590
+move (R13)+,R3
+beq L78
+*line 590
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R3,R1
+and R4,R1
+or R1,R0
+move R0,(R12)
+*line 591
+L78:
+*line 592
+add.l #2,R12
+*line 593
+*line 594
+*line 595
+move (R13)+,R3
+beq L79
+*line 595
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R3,R1
+and R4,R1
+or R1,R0
+move R0,(R12)
+*line 596
+L79:
+*line 597
+add.l #2,R12
+*line 598
+*line 599
+*line 600
+move (R13)+,R3
+beq L80
+*line 600
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R3,R1
+and R4,R1
+or R1,R0
+move R0,(R12)
+*line 601
+L80:
+*line 602
+add.l #2,R12
+*line 603
+*line 604
+*line 605
+move (R13)+,R3
+beq L81
+*line 605
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R3,R1
+and R4,R1
+or R1,R0
+move R0,(R12)
+*line 606
+L81:
+*line 607
+add.l #2,R12
+*line 608
+*line 609
+*line 610
+move (R13)+,R3
+beq L82
+*line 610
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R3,R1
+and R4,R1
+or R1,R0
+move R0,(R12)
+*line 611
+L82:
+*line 612
+add.l #2,R12
+*line 613
+*line 614
+*line 615
+move (R13)+,R3
+beq L83
+*line 615
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R3,R1
+and R4,R1
+or R1,R0
+move R0,(R12)
+*line 616
+L83:
+*line 617
+add.l #2,R12
+*line 618
+*line 619
+*line 620
+move (R13)+,R3
+beq L84
+*line 620
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R3,R1
+and R4,R1
+or R1,R0
+move R0,(R12)
+*line 621
+L84:
+*line 622
+add.l #2,R12
+*line 623
+*line 624
+*line 625
+move (R13)+,R3
+beq L85
+*line 625
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R3,R1
+and R4,R1
+or R1,R0
+move R0,(R12)
+*line 626
+L85:
+*line 627
+add.l #2,R12
+*line 628
+*line 629
+*line 630
+move (R13)+,R3
+beq L86
+*line 630
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R3,R1
+and R4,R1
+or R1,R0
+move R0,(R12)
+*line 631
+L86:
+*line 632
+add.l #2,R12
+*line 633
+*line 634
+*line 635
+move (R13)+,R3
+beq L87
+*line 635
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R3,R1
+and R4,R1
+or R1,R0
+move R0,(R12)
+*line 636
+L87:
+*line 637
+add.l #2,R12
+*line 638
+*line 639
+*line 640
+move (R13)+,R3
+beq L88
+*line 640
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R3,R1
+and R4,R1
+or R1,R0
+move R0,(R12)
+*line 641
+L88:
+*line 642
+add.l #2,R12
+*line 643
+*line 644
+*line 645
+move (R13),R3
+beq L89
+*line 645
+clr R0
+move R6,R0
+and (R12),R0
+clr R1
+move R3,R1
+and R4,R1
+or R1,R0
+move R0,(R12)
+*line 646
+L89:
+*line 647
+move.l (R11),-20(R14)
+*line 648
+move.l -16(R14),R8
+move.l -20(R14),(R8)
+*line 649
+move.l _gdfsep,(R11)
+*line 650
+move.l R11,_gdfsep
+*line 651
+move.l -20(R14),R11
+*line 652
+L76:
+*line 653
+move.l R11,R0
+bne L77
+L75:
+*line 654
+L74:L71:
+*line 569
+add #1,R5
+L72:
+*line 569
+cmp #16,R5
+blo L73
+L70:
+*line 659
+move -22(R14),R0
+bra L56
+L56:tst.l (sp)+
+movem.l (sp)+,R3-R7/R11-R13
+unlk R14
+rts
+.globl _clrsctl
+.text
+_clrsctl:
+~~clrsctl:
+link R14,#-16
+movem.l R5-R7/R11-R13,-(sp)
+~gdsp=R13
+~gnxt=R12
+~gp=R11
+~i=R7
+*line 676
+move.l #_gdfsl,R13
+move.l R13,_gdfsep
+*line 677
+move.l #8+_gdfsl,R12
+*line 679
+move #255,R7
+bra L93
+L94:
+*line 680
+*line 681
+clr 6(R13)
+*line 682
+clr 4(R13)
+*line 683
+move.l R12,(R13)
+*line 684
+*line 685
+add.l #8,R13
+*line 686
+add.l #8,R12
+L92:L93:
+*line 679
+move R7,R0
+sub #1,R7
+tst R0
+bne L94
+L91:
+*line 689
+clr 6(R13)
+*line 690
+clr 4(R13)
+*line 691
+clr.l (R13)
+*line 693
+move.l #_gdstbc,R11
+*line 695
+move #17,R7
+bra L97
+L98:
+*line 696
+clr.l (R11)+
+L96:L97:
+*line 695
+move R7,R0
+sub #1,R7
+tst R0
+bne L98
+L95:
+*line 698
+move.l #_gdstbn,R11
+*line 700
+move #17,R7
+bra L101
+L102:
+*line 701
+clr.l (R11)+
+L100:L101:
+*line 700
+move R7,R0
+sub #1,R7
+tst R0
+bne L102
+L99:
+*line 703
+move.l #_gdstbp,R11
+*line 705
+move #17,R7
+bra L105
+L106:
+*line 706
+clr.l (R11)+
+L104:L105:
+*line 705
+move R7,R0
+sub #1,R7
+tst R0
+bne L106
+L103:
+*line 708
+clr _sbase
+*line 709
+clr _soffset
+*line 710
+move _sbase,R0
+asl #1,R0
+ext.l R0
+add.l #_v_score,R0
+move.l R0,_saddr
+*line 712
+move.l #1344+_slices,_consl
+*line 713
+move.l #896+_slices,_prvsl
+*line 714
+move.l #448+_slices,_cursl
+*line 715
+move.l #_slices,_nxtsl
+*line 718
+*line 719
+*line 720
+*line 721
+*line 722
+move.l _consl,-4(R14)
+*line 723
+move.l _nxtsl,-8(R14)
+*line 724
+move.l _cursl,-12(R14)
+*line 725
+move.l _prvsl,-16(R14)
+*line 726
+*line 727
+move #224,R7
+bra L109
+L110:
+*line 728
+*line 729
+move.l -4(R14),R8
+move (R8),R6
+add.l #2,-4(R14)
+*line 730
+move.l -8(R14),R8
+move R6,(R8)
+add.l #2,-8(R14)
+*line 731
+move.l -12(R14),R8
+move R6,(R8)
+add.l #2,-12(R14)
+*line 732
+move.l -16(R14),R8
+move R6,(R8)
+add.l #2,-16(R14)
+L108:L109:
+*line 727
+move R7,R0
+sub #1,R7
+tst R0
+bne L110
+L107:
+*line 733
+L90:tst.l (sp)+
+movem.l (sp)+,R6-R7/R11-R13
+unlk R14
+rts
+.data
Index: alcyon/vbfill4.s
===================================================================
--- alcyon/vbfill4.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/vbfill4.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,857 @@
+.data
+L1:.dc.w $F
+.dc.w $FF
+.dc.w $FFF
+.dc.w $FFFF
+.dc.w $F0
+.dc.w $FF0
+.dc.w $FFF0
+.dc.w $F00
+.dc.w $FF00
+.dc.w $F000
+.text
+.globl _vbfill4
+.text
+_vbfill4:
+~~vbfill4:
+~color=R7
+~obj=8
+~obwidth=12
+~xmin=14
+~ymin=16
+~xmax=18
+~ymax=20
+link R14,#-6
+movem.l R2-R7/R12-R13,-(sp)
+~mw=-2
+~nl=-4
+~width=-6
+~fwp=R13
+~wp=R12
+~lmask=R6
+~rmask=R5
+~i=R4
+~j=R3
+*line 42
+move 22(R14),R7
+*line 42
+move 12(R14),R8
+move.l R8,-(sp)
+move 16(R14),R8
+move.l R8,-(sp)
+jsr lmul
+addq.l #8,sp
+asl.l #1,R0
+move.l R0,R13
+move 14(R14),R0
+asr #2,R0
+ext.l R0
+asl.l #1,R0
+add.l R0,R13
+add.l 8(R14),R13
+*line 43
+move 18(R14),R0
+sub 14(R14),R0
+add #1,R0
+move R0,-6(R14)
+*line 44
+move 20(R14),R0
+sub 16(R14),R0
+add #1,R0
+move R0,-4(R14)
+*line 45
+clr R5
+move R5,R6
+*line 49
+move 14(R14),R0
+and #3,R0
+bra L4
+*line 50
+L5:
+*line 51
+*line 52
+*line 53
+*line 53
+cmp #4,-6(R14)
+ble L6
+*line 54
+*line 55
+sub #5,-6(R14)
+*line 56
+move 6+L1,R6
+*line 57
+move -6(R14),R0
+asr #2,R0
+move R0,-2(R14)
+*line 58
+*line 59
+*line 59
+tst -2(R14)
+beq L7
+*line 60
+*line 61
+move -6(R14),R0
+and #3,R0
+move R0,R8
+add.l R8,R8
+add.l #L1,R8
+move (R8),R5
+*line 62
+*line 63
+clr R4
+bra L10
+L11:
+*line 64
+*line 65
+move.l R13,R12
+*line 66
+move 12(R14),R0
+asl #1,R0
+ext.l R0
+add.l R0,R13
+*line 67
+clr R0
+move R6,R0
+not R0
+and (R12),R0
+clr R1
+move R7,R1
+and R6,R1
+or R1,R0
+move R0,(R12)+
+*line 68
+*line 69
+clr R3
+bra L14
+L15:
+*line 70
+move R7,(R12)+
+L13:
+*line 69
+add #1,R3
+L14:
+*line 69
+cmp -2(R14),R3
+blt L15
+L12:
+*line 70
+*line 71
+*line 72
+clr R0
+move R5,R0
+not R0
+and (R12),R0
+clr R1
+move R7,R1
+and R5,R1
+or R1,R0
+move R0,(R12)
+L9:
+*line 63
+add #1,R4
+L10:
+*line 63
+cmp -4(R14),R4
+blt L11
+L8:
+*line 73
+*line 74
+bra L16
+L7:
+*line 75
+*line 76
+*line 77
+move -6(R14),R0
+and #3,R0
+move R0,R8
+add.l R8,R8
+add.l #L1,R8
+move (R8),R5
+*line 78
+*line 79
+clr R4
+bra L19
+L20:
+*line 80
+*line 81
+move.l R13,R12
+*line 82
+move 12(R14),R0
+asl #1,R0
+ext.l R0
+add.l R0,R13
+*line 83
+clr R0
+move R6,R0
+not R0
+and (R12),R0
+clr R1
+move R7,R1
+and R6,R1
+or R1,R0
+move R0,(R12)+
+*line 84
+clr R0
+move R5,R0
+not R0
+and (R12),R0
+clr R1
+move R7,R1
+and R5,R1
+or R1,R0
+move R0,(R12)
+L18:
+*line 79
+add #1,R4
+L19:
+*line 79
+cmp -4(R14),R4
+blt L20
+L17:
+*line 85
+L16:
+*line 86
+*line 87
+bra L21
+L6:
+*line 88
+*line 89
+*line 90
+move -6(R14),R8
+sub #1,R8
+add.l R8,R8
+add.l #L1,R8
+move (R8),R6
+*line 91
+*line 92
+clr R4
+bra L24
+L25:
+*line 93
+*line 94
+move.l R13,R12
+*line 95
+move 12(R14),R0
+asl #1,R0
+ext.l R0
+add.l R0,R13
+*line 96
+clr R0
+move R6,R0
+not R0
+and (R12),R0
+clr R1
+move R7,R1
+and R6,R1
+or R1,R0
+move R0,(R12)
+L23:
+*line 92
+add #1,R4
+L24:
+*line 92
+cmp -4(R14),R4
+blt L25
+L22:
+*line 97
+L21:
+*line 98
+*line 99
+bra L2
+*line 100
+*line 101
+*line 102
+*line 103
+L26:
+*line 104
+*line 105
+*line 106
+*line 106
+cmp #3,-6(R14)
+ble L27
+*line 107
+*line 108
+sub #4,-6(R14)
+*line 109
+move 12+L1,R6
+*line 110
+move -6(R14),R0
+asr #2,R0
+move R0,-2(R14)
+*line 111
+*line 112
+*line 112
+tst -2(R14)
+beq L28
+*line 113
+*line 114
+move -6(R14),R0
+and #3,R0
+move R0,R8
+add.l R8,R8
+add.l #L1,R8
+move (R8),R5
+*line 115
+*line 116
+clr R4
+bra L31
+L32:
+*line 117
+*line 118
+move.l R13,R12
+*line 119
+move 12(R14),R0
+asl #1,R0
+ext.l R0
+add.l R0,R13
+*line 120
+clr R0
+move R6,R0
+not R0
+and (R12),R0
+clr R1
+move R7,R1
+and R6,R1
+or R1,R0
+move R0,(R12)+
+*line 121
+*line 122
+clr R3
+bra L35
+L36:
+*line 123
+move R7,(R12)+
+L34:
+*line 122
+add #1,R3
+L35:
+*line 122
+cmp -2(R14),R3
+blt L36
+L33:
+*line 123
+*line 124
+*line 125
+clr R0
+move R5,R0
+not R0
+and (R12),R0
+clr R1
+move R7,R1
+and R5,R1
+or R1,R0
+move R0,(R12)
+L30:
+*line 116
+add #1,R4
+L31:
+*line 116
+cmp -4(R14),R4
+blt L32
+L29:
+*line 126
+*line 127
+bra L37
+L28:
+*line 128
+*line 129
+*line 130
+move -6(R14),R0
+and #3,R0
+move R0,R8
+add.l R8,R8
+add.l #L1,R8
+move (R8),R5
+*line 131
+*line 132
+clr R4
+bra L40
+L41:
+*line 133
+*line 134
+move.l R13,R12
+*line 135
+move 12(R14),R0
+asl #1,R0
+ext.l R0
+add.l R0,R13
+*line 136
+clr R0
+move R6,R0
+not R0
+and (R12),R0
+clr R1
+move R7,R1
+and R6,R1
+or R1,R0
+move R0,(R12)+
+*line 137
+clr R0
+move R5,R0
+not R0
+and (R12),R0
+clr R1
+move R7,R1
+and R5,R1
+or R1,R0
+move R0,(R12)
+L39:
+*line 132
+add #1,R4
+L40:
+*line 132
+cmp -4(R14),R4
+blt L41
+L38:
+*line 138
+L37:
+*line 139
+*line 140
+bra L42
+L27:
+*line 141
+*line 142
+*line 143
+move -6(R14),R8
+add #3,R8
+add.l R8,R8
+add.l #L1,R8
+move (R8),R6
+*line 144
+*line 145
+clr R4
+bra L45
+L46:
+*line 146
+*line 147
+move.l R13,R12
+*line 148
+move 12(R14),R0
+asl #1,R0
+ext.l R0
+add.l R0,R13
+*line 149
+clr R0
+move R6,R0
+not R0
+and (R12),R0
+clr R1
+move R7,R1
+and R6,R1
+or R1,R0
+move R0,(R12)
+L44:
+*line 145
+add #1,R4
+L45:
+*line 145
+cmp -4(R14),R4
+blt L46
+L43:
+*line 150
+L42:
+*line 151
+*line 152
+bra L2
+*line 153
+*line 154
+*line 155
+*line 156
+L47:
+*line 157
+*line 158
+*line 159
+*line 159
+cmp #2,-6(R14)
+ble L48
+*line 160
+*line 161
+sub #3,-6(R14)
+*line 162
+move 16+L1,R6
+*line 163
+move -6(R14),R0
+asr #2,R0
+move R0,-2(R14)
+*line 164
+*line 165
+*line 165
+tst -2(R14)
+beq L49
+*line 166
+*line 167
+move -6(R14),R0
+and #3,R0
+move R0,R8
+add.l R8,R8
+add.l #L1,R8
+move (R8),R5
+*line 168
+*line 169
+clr R4
+bra L52
+L53:
+*line 170
+*line 171
+move.l R13,R12
+*line 172
+move 12(R14),R0
+asl #1,R0
+ext.l R0
+add.l R0,R13
+*line 173
+clr R0
+move R6,R0
+not R0
+and (R12),R0
+clr R1
+move R7,R1
+and R6,R1
+or R1,R0
+move R0,(R12)+
+*line 174
+*line 175
+clr R3
+bra L56
+L57:
+*line 176
+move R7,(R12)+
+L55:
+*line 175
+add #1,R3
+L56:
+*line 175
+cmp -2(R14),R3
+blt L57
+L54:
+*line 176
+*line 177
+*line 178
+clr R0
+move R5,R0
+not R0
+and (R12),R0
+clr R1
+move R7,R1
+and R5,R1
+or R1,R0
+move R0,(R12)
+L51:
+*line 169
+add #1,R4
+L52:
+*line 169
+cmp -4(R14),R4
+blt L53
+L50:
+*line 179
+*line 180
+bra L58
+L49:
+*line 181
+*line 182
+*line 183
+move -6(R14),R0
+and #3,R0
+move R0,R8
+add.l R8,R8
+add.l #L1,R8
+move (R8),R5
+*line 184
+*line 185
+clr R4
+bra L61
+L62:
+*line 186
+*line 187
+move.l R13,R12
+*line 188
+move 12(R14),R0
+asl #1,R0
+ext.l R0
+add.l R0,R13
+*line 189
+clr R0
+move R6,R0
+not R0
+and (R12),R0
+clr R1
+move R7,R1
+and R6,R1
+or R1,R0
+move R0,(R12)+
+*line 190
+clr R0
+move R5,R0
+not R0
+and (R12),R0
+clr R1
+move R7,R1
+and R5,R1
+or R1,R0
+move R0,(R12)
+L60:
+*line 185
+add #1,R4
+L61:
+*line 185
+cmp -4(R14),R4
+blt L62
+L59:
+*line 191
+L58:
+*line 192
+*line 193
+bra L63
+L48:
+*line 194
+*line 195
+*line 196
+move -6(R14),R8
+add #6,R8
+add.l R8,R8
+add.l #L1,R8
+move (R8),R6
+*line 197
+*line 198
+clr R4
+bra L66
+L67:
+*line 199
+*line 200
+move.l R13,R12
+*line 201
+move 12(R14),R0
+asl #1,R0
+ext.l R0
+add.l R0,R13
+*line 202
+clr R0
+move R6,R0
+not R0
+and (R12),R0
+clr R1
+move R7,R1
+and R6,R1
+or R1,R0
+move R0,(R12)
+L65:
+*line 198
+add #1,R4
+L66:
+*line 198
+cmp -4(R14),R4
+blt L67
+L64:
+*line 203
+L63:
+*line 204
+*line 205
+bra L2
+*line 206
+*line 207
+*line 208
+*line 209
+L68:
+*line 210
+*line 211
+*line 212
+*line 212
+cmp #1,-6(R14)
+ble L69
+*line 213
+*line 214
+sub #2,-6(R14)
+*line 215
+move 18+L1,R6
+*line 216
+move -6(R14),R0
+asr #2,R0
+move R0,-2(R14)
+*line 217
+*line 218
+*line 218
+tst -2(R14)
+beq L70
+*line 219
+*line 220
+move -6(R14),R0
+and #3,R0
+move R0,R8
+add.l R8,R8
+add.l #L1,R8
+move (R8),R5
+*line 221
+*line 222
+clr R4
+bra L73
+L74:
+*line 223
+*line 224
+move.l R13,R12
+*line 225
+move 12(R14),R0
+asl #1,R0
+ext.l R0
+add.l R0,R13
+*line 226
+clr R0
+move R6,R0
+not R0
+and (R12),R0
+clr R1
+move R7,R1
+and R6,R1
+or R1,R0
+move R0,(R12)+
+*line 227
+*line 228
+clr R3
+bra L77
+L78:
+*line 229
+move R7,(R12)+
+L76:
+*line 228
+add #1,R3
+L77:
+*line 228
+cmp -2(R14),R3
+blt L78
+L75:
+*line 229
+*line 230
+*line 231
+clr R0
+move R5,R0
+not R0
+and (R12),R0
+clr R1
+move R7,R1
+and R5,R1
+or R1,R0
+move R0,(R12)
+L72:
+*line 222
+add #1,R4
+L73:
+*line 222
+cmp -4(R14),R4
+blt L74
+L71:
+*line 232
+*line 233
+bra L79
+L70:
+*line 234
+*line 235
+*line 236
+move -6(R14),R0
+and #3,R0
+move R0,R8
+add.l R8,R8
+add.l #L1,R8
+move (R8),R5
+*line 237
+*line 238
+clr R4
+bra L82
+L83:
+*line 239
+*line 240
+move.l R13,R12
+*line 241
+move 12(R14),R0
+asl #1,R0
+ext.l R0
+add.l R0,R13
+*line 242
+clr R0
+move R6,R0
+not R0
+and (R12),R0
+clr R1
+move R7,R1
+and R6,R1
+or R1,R0
+move R0,(R12)+
+*line 243
+clr R0
+move R5,R0
+not R0
+and (R12),R0
+clr R1
+move R7,R1
+and R5,R1
+or R1,R0
+move R0,(R12)
+L81:
+*line 238
+add #1,R4
+L82:
+*line 238
+cmp -4(R14),R4
+blt L83
+L80:
+*line 244
+L79:
+*line 245
+*line 246
+bra L84
+L69:
+*line 247
+*line 248
+*line 249
+move 18+L1,R6
+*line 250
+*line 251
+clr R4
+bra L87
+L88:
+*line 252
+*line 253
+move.l R13,R12
+*line 254
+move 12(R14),R0
+asl #1,R0
+ext.l R0
+add.l R0,R13
+*line 255
+clr R0
+move R6,R0
+not R0
+and (R12),R0
+clr R1
+move R7,R1
+and R6,R1
+or R1,R0
+move R0,(R12)
+L86:
+*line 251
+add #1,R4
+L87:
+*line 251
+cmp -4(R14),R4
+blt L88
+L85:
+*line 256
+L84:
+*line 257
+*line 258
+bra L2
+*line 259
+bra L3
+L4:tst R0
+beq L5
+cmp #1,R0
+beq L26
+cmp #2,R0
+beq L47
+cmp #3,R0
+beq L68
+bra L3
+L3:L2:tst.l (sp)+
+movem.l (sp)+,R3-R7/R12-R13
+unlk R14
+rts
+.data
Index: alcyon/vclrs.s
===================================================================
--- alcyon/vclrs.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/vclrs.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,38 @@
+.globl _vclrs
+.text
+_vclrs:
+~~vclrs:
+~obase=-2
+~nc=R7
+~obase=8
+~row=12
+~col=14
+~ch=18
+~atr=20
+link R14,#0
+movem.l R6-R7,-(sp)
+*line 32
+move 16(R14),R7
+*line 32
+bra L4
+L3:
+*line 33
+move 20(R14),(sp)
+move 18(R14),-(sp)
+move 14(R14),-(sp)
+move 12(R14),-(sp)
+move.l 8(R14),-(sp)
+jsr _vputc
+adda.l #10,sp
+add #1,14(R14)
+L4:
+*line 33
+move R7,R0
+sub #1,R7
+tst R0
+bne L3
+L2:L1:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.data
Index: alcyon/vhinit.s
===================================================================
--- alcyon/vhinit.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/vhinit.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,108 @@
+.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 _cgtable
+.globl _cg_rows
+.globl _v_obtab
+.comm _v_obtab,288
+.globl _v_curob
+.comm _v_curob,4
+.globl _v_nobj
+.comm _v_nobj,2
+.globl _v_obpri
+.comm _v_obpri,2
+.globl _vr_data
+.data
+_vr_data:
+.dc.w $825B
+.dc.w $C474
+.dc.w $6
+.dc.w $100
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $40
+.dc.w $80
+.dc.w $10
+.dc.w $FF
+.dc.w $0
+.dc.w $C08
+.dc.w $140A
+.dc.w $9568
+.dc.w $A16A
+.globl _VHinit
+.text
+_VHinit:
+~~VHinit:
+link R14,#-4
+*line 79
+clr (sp)
+jsr _vbank
+*line 83
+move #16,(sp)
+move.l #_vr_data,-(sp)
+move.l #_v_regs,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 87
+move #350,(sp)
+move #-1,-(sp)
+move.l #_v_actab,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 91
+move #64,(sp)
+clr -(sp)
+move.l #_v_odtab,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 95
+move #4096,(sp)
+clr -(sp)
+move.l #_v_cgtab,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 96
+move _cg_rows,R0
+asl #8,R0
+move R0,(sp)
+move.l #_cgtable,-(sp)
+move.l #_v_cgtab,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+L1:unlk R14
+rts
+.data
Index: alcyon/vmput.s
===================================================================
--- alcyon/vmput.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/vmput.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,134 @@
+.globl _vmput
+.text
+_vmput:
+~~vmput:
+~sbase=8
+~row=12
+~col=14
+~ms=16
+~ma=20
+link R14,#-4
+movem.l R4-R7,-(sp)
+~c=R7
+~tc=R6
+~tr=R5
+~cp=-4
+*line 39
+move 12(R14),R5
+*line 41
+bra L4
+L3:
+*line 42
+*line 43
+move 14(R14),R6
+*line 44
+*line 45
+bra L7
+L6:
+*line 46
+move 20(R14),(sp)
+move R7,-(sp)
+move R6,-(sp)
+move R5,-(sp)
+move.l 8(R14),-(sp)
+jsr _vputc
+adda.l #10,sp
+add #1,R6
+L7:
+*line 46
+move.l -4(R14),R8
+move.b (R8),R0
+ext.w R0
+move R0,R7
+clr R0
+move R7,R0
+add.l #1,-4(R14)
+tst R0
+bne L6
+L5:
+*line 47
+*line 48
+add #1,R5
+L4:
+*line 49
+move.l 16(R14),R8
+move.l (R8),R0
+move.l R0,-4(R14)
+add.l #4,16(R14)
+tst.l R0
+bne L3
+L2:L1:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.globl _vmputa
+.text
+_vmputa:
+~~vmputa:
+~sbase=8
+~row=12
+~col=14
+~ms=16
+~ma=20
+link R14,#-8
+movem.l R4-R7,-(sp)
+~c=R7
+~tc=R6
+~tr=R5
+~tm=-4
+~cp=-8
+*line 69
+move 12(R14),R5
+*line 71
+bra L11
+L10:
+*line 72
+*line 73
+move 14(R14),R6
+*line 74
+move.l 20(R14),R8
+move.l (R8),-4(R14)
+add.l #4,20(R14)
+*line 75
+*line 76
+bra L14
+L13:
+*line 77
+move.l -4(R14),R8
+move (R8),(sp)
+move R7,-(sp)
+move R6,-(sp)
+move R5,-(sp)
+move.l 8(R14),-(sp)
+jsr _vputc
+adda.l #10,sp
+add.l #2,-4(R14)
+add #1,R6
+L14:
+*line 77
+move.l -8(R14),R8
+move.b (R8),R0
+ext.w R0
+move R0,R7
+clr R0
+move R7,R0
+add.l #1,-8(R14)
+tst R0
+bne L13
+L12:
+*line 78
+*line 79
+add #1,R5
+L11:
+*line 80
+move.l 16(R14),R8
+move.l (R8),R0
+move.l R0,-8(R14)
+add.l #4,16(R14)
+tst.l R0
+bne L10
+L9:L8:tst.l (sp)+
+movem.l (sp)+,R5-R7
+unlk R14
+rts
+.data
Index: alcyon/vobjfns.s
===================================================================
--- alcyon/vobjfns.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/vobjfns.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,487 @@
+.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 _wsize
+.comm _wsize,2
+.globl _vi_dis
+.comm _vi_dis,2
+.globl _vi_ctl
+.comm _vi_ctl,2
+.globl _SelObj
+.text
+_SelObj:
+~~SelObj:
+~obj=8
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~op=R13
+~newbank=R7
+*line 83
+move 8(R14),R0
+muls #18,R0
+move.l R0,R13
+add.l #_v_obtab,R13
+*line 85
+move.b 13(R13),R7
+ext.w R7
+and #1,R7
+lsl #8,R7
+move.b 13(R13),R0
+ext.w R0
+and #2,R0
+asl #6,R0
+or R0,R7
+*line 87
+move 8(R14),_v_nobj
+*line 88
+move.l R13,_v_curob
+*line 89
+move.b 12(R13),R0
+ext.w R0
+move R0,_v_obpri
+*line 91
+*line 92
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+cmp R0,R7
+beq L2
+*line 92
+move.b 13(R13),R0
+ext.w R0
+move R0,(sp) 
+and #3,(sp)
+jsr _vbank
+L2:L1:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _SetPri
+.text
+_SetPri:
+~~SetPri:
+~obj=R7
+~pri=R6
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~op=R13
+*line 113
+move 8(R14),R7
+*line 113
+move 10(R14),R6
+*line 113
+*line 114
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L4
+*line 114
+clr (sp)
+jsr _vbank
+*line 115
+L4:
+*line 116
+move R7,R0
+muls #18,R0
+move.l R0,R13
+add.l #_v_obtab,R13
+*line 117
+move.b R6,12(R13)
+*line 119
+clr R0
+move 14(R13),R0
+or #16,R0
+move R6,R1
+asl #3,R1
+ext.l R1
+add.l #_v_odtab,R1
+move.l R1,R9
+move R0,(R9)
+*line 120
+move R6,R0
+asl #3,R0
+ext.l R0
+add.l #_v_odtab,R0
+move.l R0,R8
+move 16(R13),2(R8)
+*line 121
+move.l 8(R13),R0
+asr.l #1,R0
+move R6,R1
+asl #3,R1
+ext.l R1
+add.l #_v_odtab,R1
+move.l R1,R9
+move R0,4(R9)
+*line 123
+move (R13),(sp)
+move 6(R13),-(sp)
+move R6,-(sp)
+jsr _objon
+addq.l #4,sp
+*line 125
+*line 126
+tst _vi_dis
+bne L3
+*line 127
+*line 128
+move #7,(sp)
+jsr _setipl
+*line 130
+move #1,R0
+move R6,R1
+asl R1,R0
+or R0,_vi_ctl
+*line 132
+*line 133
+move.l $64,R0
+cmp.l #_VIint,R0
+beq L5
+*line 133
+move.l #_VIint,(sp)
+move #25,-(sp)
+move #5,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 134
+L5:
+*line 135
+clr (sp)
+jsr _setipl
+L3:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.globl _SetObj
+.text
+_SetObj:
+~~SetObj:
+~obj=8
+~type=10
+~bank=12
+~base=14
+~xpix=18
+~ypix=20
+~x0=22
+~y0=24
+~flags=26
+~pri=28
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+~op=R13
+*line 154
+*line 155
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L7
+*line 155
+clr (sp)
+jsr _vbank
+*line 156
+L7:
+*line 157
+move 8(R14),R0
+muls #18,R0
+move.l R0,R13
+add.l #_v_obtab,R13
+*line 159
+move.l R13,_v_curob
+*line 160
+move 8(R14),_v_nobj
+*line 161
+move 28(R14),_v_obpri
+*line 163
+move 20(R14),(R13)
+*line 164
+move 18(R14),2(R13)
+*line 165
+move 22(R14),4(R13)
+*line 166
+move 24(R14),6(R13)
+*line 167
+move.l 14(R14),8(R13)
+*line 168
+move 28(R14),R0
+move.b R0,12(R13)
+*line 169
+move 12(R14),R0
+and #3,R0
+move.b R0,13(R13)
+*line 173
+*line 173
+tst 10(R14)
+beq L8
+*line 174
+*line 175
+move 26(R14),R0
+and #-1537,R0
+or #-17408,R0
+move R0,14(R13)
+*line 176
+*line 177
+clr R0
+move 14(R13),R0
+and #1536,R0
+bra L10
+*line 178
+L11:
+*line 179
+*line 180
+*line 181
+move 18(R14),R0
+ext.l R0
+divs #128,R0
+move R0,_wsize
+bra L9
+*line 182
+*line 183
+L12:
+*line 184
+*line 185
+*line 186
+move 18(R14),R0
+ext.l R0
+divs #48,R0
+move R0,_wsize
+bra L9
+*line 187
+*line 188
+L13:
+*line 189
+*line 190
+*line 191
+move 18(R14),R0
+ext.l R0
+divs #64,R0
+move R0,_wsize
+bra L9
+*line 192
+*line 193
+L14:
+*line 194
+*line 195
+*line 196
+move 18(R14),R0
+ext.l R0
+divs #96,R0
+move R0,_wsize
+bra L9
+*line 197
+bra L9
+L10:tst R0
+beq L11
+cmp #512,R0
+beq L12
+cmp #1024,R0
+beq L13
+cmp #1536,R0
+beq L14
+bra L9
+L9:
+*line 198
+*line 199
+*line 200
+*line 201
+btst #6,15(R13)
+beq L15
+*line 201
+move _wsize,R0
+asl #1,R0
+add _wsize,R0
+move R0,_wsize
+*line 202
+*line 203
+*line 204
+L15:bra L16
+L8:
+*line 205
+*line 206
+*line 207
+move 26(R14),R0
+and #3639,R0
+move 12(R14),R1
+and #3,R1
+asl #6,R1
+or R1,R0
+move R0,14(R13)
+*line 208
+*line 209
+clr R0
+move 14(R13),R0
+and #1536,R0
+bra L18
+*line 210
+L19:
+*line 211
+L20:
+*line 212
+*line 213
+*line 214
+clr _wsize
+bra L17
+*line 215
+*line 216
+L21:
+*line 217
+*line 218
+*line 219
+move 18(R14),R0
+ext.l R0
+divs #32,R0
+move R0,_wsize
+bra L17
+*line 220
+*line 221
+L22:
+*line 222
+*line 223
+*line 224
+move 18(R14),R0
+ext.l R0
+divs #16,R0
+move R0,_wsize
+bra L17
+*line 225
+bra L17
+L18:tst R0
+beq L19
+cmp #512,R0
+beq L20
+cmp #1024,R0
+beq L21
+cmp #1536,R0
+beq L22
+bra L17
+L17:
+*line 226
+L16:
+*line 229
+move 22(R14),R0
+asr #1,R0
+and #1023,R0
+move _wsize,R1
+move #10,R2
+asl R2,R1
+and #-1024,R1
+or R1,R0
+move R0,16(R13)
+*line 231
+*line 232
+tst 28(R14)
+blt L6
+*line 233
+*line 234
+move 28(R14),(sp)
+move 8(R14),-(sp)
+jsr _SetPri
+addq.l #2,sp
+L6:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _CpyObj
+.text
+_CpyObj:
+~~CpyObj:
+~from=R13
+~to=R12
+~w=R7
+~h=R6
+~sw=R5
+link R14,#0
+movem.l R2-R7/R11-R13,-(sp)
+~tp=R11
+~i=R4
+~j=R3
+*line 257
+move.l 8(R14),R13
+*line 257
+move.l 12(R14),R12
+*line 257
+move 16(R14),R7
+*line 257
+move 18(R14),R6
+*line 257
+move 20(R14),R5
+*line 257
+move R6,R4
+bra L26
+L27:
+*line 258
+*line 259
+move.l R12,R11
+*line 260
+*line 261
+move R7,R3
+bra L30
+L31:
+*line 262
+move (R13)+,(R11)+
+L29:L30:
+*line 261
+clr R0
+move R3,R0
+sub #1,R3
+tst R0
+bne L31
+L28:
+*line 262
+*line 263
+*line 264
+clr R0
+move R5,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l R0,R12
+L25:L26:
+*line 257
+clr R0
+move R4,R0
+sub #1,R4
+tst R0
+bne L27
+L24:L23:tst.l (sp)+
+movem.l (sp)+,R3-R7/R11-R13
+unlk R14
+rts
+.data
Index: alcyon/vputs.s
===================================================================
--- alcyon/vputs.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/vputs.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,117 @@
+.globl _vputs
+.text
+_vputs:
+~~vputs:
+~sbase=8
+~row=12
+~col=14
+~str=16
+~attrib=20
+link R14,#-6
+~c=-2
+*line 35
+bra L4
+L3:
+*line 36
+*line 37
+move 20(R14),(sp)
+move -2(R14),-(sp)
+move 14(R14),-(sp)
+move 12(R14),-(sp)
+move.l 8(R14),-(sp)
+jsr _vputc
+adda.l #10,sp
+*line 38
+*line 39
+*line 39
+add #1,14(R14)
+clr R0
+move 14(R14),R0
+cmp #64,R0
+blo L5
+*line 40
+*line 41
+clr 14(R14)
+*line 42
+*line 43
+*line 44
+add #1,12(R14)
+clr R0
+move 12(R14),R0
+cmp #25,R0
+blo L6
+*line 44
+clr 12(R14)
+L6:
+*line 45
+L5:L4:
+*line 46
+move.l 16(R14),R8
+move.b (R8),R0
+ext.w R0
+move R0,-2(R14)
+add.l #1,16(R14)
+tst R0
+bne L3
+L2:L1:unlk R14
+rts
+.globl _vputsa
+.text
+_vputsa:
+~~vputsa:
+~sbase=8
+~row=12
+~col=14
+~str=16
+~attrib=20
+link R14,#-6
+~c=-2
+*line 66
+bra L10
+L9:
+*line 67
+*line 68
+move.l 20(R14),R8
+move (R8),(sp)
+move -2(R14),-(sp)
+move 14(R14),-(sp)
+move 12(R14),-(sp)
+move.l 8(R14),-(sp)
+jsr _vputc
+adda.l #10,sp
+add.l #2,20(R14)
+*line 69
+*line 70
+*line 70
+add #1,14(R14)
+clr R0
+move 14(R14),R0
+cmp #64,R0
+blo L11
+*line 71
+*line 72
+clr 14(R14)
+*line 73
+*line 74
+*line 75
+add #1,12(R14)
+clr R0
+move 12(R14),R0
+cmp #25,R0
+blo L12
+*line 75
+clr 12(R14)
+L12:
+*line 76
+L11:L10:
+*line 77
+move.l 16(R14),R8
+move.b (R8),R0
+ext.w R0
+move R0,-2(R14)
+add.l #1,16(R14)
+tst R0
+bne L9
+L8:L7:unlk R14
+rts
+.data
Index: alcyon/vputsv.s
===================================================================
--- alcyon/vputsv.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/vputsv.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,121 @@
+.globl _vputsv
+.text
+_vputsv:
+~~vputsv:
+~sbase=8
+~row=12
+~col=14
+~str=16
+~attrib=20
+~len=22
+link R14,#-6
+~c=-2
+*line 36
+bra L4
+L3:
+*line 37
+*line 38
+move 22(R14),(sp)
+move 20(R14),-(sp)
+move -2(R14),-(sp)
+move 14(R14),-(sp)
+move 12(R14),-(sp)
+move.l 8(R14),-(sp)
+jsr _vputcv
+adda.l #12,sp
+*line 39
+*line 40
+*line 40
+add #1,14(R14)
+clr R0
+move 14(R14),R0
+cmp #64,R0
+blo L5
+*line 41
+*line 42
+clr 14(R14)
+*line 43
+*line 44
+*line 45
+add #1,12(R14)
+clr R0
+move 12(R14),R0
+cmp #25,R0
+blo L6
+*line 45
+clr 12(R14)
+L6:
+*line 46
+L5:L4:
+*line 47
+move.l 16(R14),R8
+move.b (R8),R0
+ext.w R0
+move R0,-2(R14)
+add.l #1,16(R14)
+tst R0
+bne L3
+L2:L1:unlk R14
+rts
+.globl _vputsav
+.text
+_vputsav:
+~~vputsav:
+~sbase=8
+~row=12
+~col=14
+~str=16
+~attrib=20
+~len=24
+link R14,#-6
+~c=-2
+*line 69
+bra L10
+L9:
+*line 70
+*line 71
+move 24(R14),(sp)
+move.l 20(R14),R8
+move (R8),-(sp)
+move -2(R14),-(sp)
+move 14(R14),-(sp)
+move 12(R14),-(sp)
+move.l 8(R14),-(sp)
+jsr _vputcv
+adda.l #12,sp
+add.l #2,20(R14)
+*line 72
+*line 73
+*line 73
+add #1,14(R14)
+clr R0
+move 14(R14),R0
+cmp #64,R0
+blo L11
+*line 74
+*line 75
+clr 14(R14)
+*line 76
+*line 77
+*line 78
+add #1,12(R14)
+clr R0
+move 12(R14),R0
+cmp #25,R0
+blo L12
+*line 78
+clr 12(R14)
+L12:
+*line 79
+L11:L10:
+*line 80
+move.l 16(R14),R8
+move.b (R8),R0
+ext.w R0
+move R0,-2(R14)
+add.l #1,16(R14)
+tst R0
+bne L9
+L8:L7:unlk R14
+rts
+.data
Index: alcyon/vsetpal.s
===================================================================
--- alcyon/vsetpal.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/vsetpal.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,159 @@
+.globl _dfltpal
+.data
+_dfltpal:
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $1
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $2
+.dc.w $0
+.dc.w $0
+.dc.w $3
+.dc.w $0
+.dc.w $2
+.dc.w $0
+.dc.w $0
+.dc.w $3
+.dc.w $0
+.dc.w $0
+.dc.w $2
+.dc.w $2
+.dc.w $0
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $0
+.dc.w $0
+.dc.w $3
+.dc.w $1
+.dc.w $0
+.dc.w $3
+.dc.w $0
+.dc.w $3
+.dc.w $3
+.dc.w $1
+.dc.w $2
+.dc.w $3
+.dc.w $2
+.dc.w $0
+.dc.w $2
+.dc.w $3
+.dc.w $0
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.globl _vsetpal
+.text
+_vsetpal:
+~~vsetpal:
+~slot=R7
+~red=R6
+~grn=R5
+~blu=R4
+link R14,#-4
+movem.l R2-R7,-(sp)
+~palval=R3
+~pal=-4
+*line 52
+move 8(R14),R7
+*line 52
+move 10(R14),R6
+*line 52
+move 12(R14),R5
+*line 52
+move 14(R14),R4
+*line 52
+move.l #$280000,-4(R14)
+*line 54
+*line 55
+*line 56
+*line 57
+move R7,R3
+lsl #6,R3
+clr R0
+move R6,R0
+and #1,R0
+lsl #5,R0
+or R0,R3
+clr R0
+move R6,R0
+and #2,R0
+lsl #1,R0
+or R0,R3
+clr R0
+move R5,R0
+and #1,R0
+lsl #4,R0
+or R0,R3
+clr R0
+move R5,R0
+and #2,R0
+or R0,R3
+clr R0
+move R4,R0
+and #1,R0
+lsl #3,R0
+or R0,R3
+clr R0
+move R4,R0
+and #2,R0
+lsr #1,R0
+or R0,R3
+*line 59
+clr R0
+move R3,R0
+move #63,R1
+eor R1,R0
+move.l -4(R14),R9
+move R0,(R9)
+L1:tst.l (sp)+
+movem.l (sp)+,R3-R7
+unlk R14
+rts
+.globl _vsndpal
+.text
+_vsndpal:
+~~vsndpal:
+~pp=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 85
+clr R7
+bra L5
+L6:
+*line 86
+move.l 8(R14),R8
+move R7,R1
+muls #6,R1
+move 4(R8,R1.l),(sp)
+move.l 8(R14),R8
+move R7,R1
+muls #6,R1
+move 2(R8,R1.l),-(sp)
+move.l 8(R14),R8
+move R7,R1
+muls #6,R1
+move 0(R8,R1.l),-(sp)
+move R7,-(sp)
+jsr _vsetpal
+addq.l #6,sp
+L4:
+*line 85
+add #1,R7
+L5:
+*line 85
+cmp #16,R7
+blt L6
+L3:L2:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.data
Index: alcyon/vsinit.s
===================================================================
--- alcyon/vsinit.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/vsinit.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,60 @@
+.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 _VSinit
+.text
+_VSinit:
+~~VSinit:
+link R14,#-4
+*line 23
+clr _v_nobj
+*line 24
+clr _v_obpri
+*line 25
+move #9,(sp)
+clr -(sp)
+move.l #_v_obtab,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 26
+move.l #_v_obtab,_v_curob
+L1:unlk R14
+rts
+.data
Index: alcyon/vspray4.s
===================================================================
--- alcyon/vspray4.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/vspray4.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,108 @@
+.bss
+L1:.ds.b 82
+.text
+.globl _vspray4
+.text
+_vspray4:
+~~vspray4:
+~vobj=8
+~vwid=12
+~fg=14
+~ml=16
+~vb=20
+~pitch=22
+link R14,#0
+movem.l R3-R7/R12-R13,-(sp)
+~cp=R13
+~lp=R12
+~c=R7
+~j=R6
+~k=R5
+~row=R4
+*line 39
+clr R4
+*line 41
+and #15,14(R14)
+*line 42
+move 14(R14),R0
+asl #4,R0
+or R0,14(R14)
+*line 43
+move 14(R14),R0
+asl #8,R0
+or R0,14(R14)
+*line 45
+*line 46
+cmp #-1,20(R14)
+beq L3
+*line 46
+move 20(R14),(sp)
+jsr _vbank
+*line 47
+L3:
+*line 48
+bra L6
+L5:
+*line 49
+*line 50
+move.l #L1,R12
+*line 51
+*line 52
+bra L9
+L8:
+*line 53
+*line 54
+and #255,R6
+*line 55
+move.b (R13)+,R7
+*line 56
+*line 57
+clr R5
+bra L12
+L13:
+*line 58
+move.b R7,(R12)+
+L11:
+*line 57
+add #1,R5
+L12:
+*line 57
+cmp R6,R5
+blt L13
+L10:
+*line 58
+L9:
+*line 59
+move.b (R13)+,R6
+ext.w R6
+cmp #-1,R6
+bne L8
+L7:
+*line 60
+*line 61
+clr.b (R12)
+*line 62
+*line 63
+move 22(R14),(sp)
+move.l #L1,-(sp)
+clr -(sp)
+move R4,-(sp)
+move 14(R14),-(sp)
+move 12(R14),-(sp)
+move.l 8(R14),-(sp)
+jsr _tsplot4
+adda.l #16,sp
+add #1,R4
+L6:
+*line 64
+move.l 16(R14),R8
+move.l (R8),R13
+move.l R13,R0
+add.l #4,16(R14)
+tst.l R0
+bne L5
+L4:L2:tst.l (sp)+
+movem.l (sp)+,R4-R7/R12-R13
+unlk R14
+rts
+.data
Index: alcyon/vtext.s
===================================================================
--- alcyon/vtext.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/vtext.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,89 @@
+.data
+L1:.dc.w $FF00
+.dc.w $FF
+.text
+.globl _vtext
+.text
+_vtext:
+~~vtext:
+~obj=R13
+~nc=R7
+~row=R6
+~col=R5
+~ip=R12
+link R14,#0
+movem.l R4-R7/R11-R13,-(sp)
+~op=R11
+*line 18
+move.l 8(R14),R13
+*line 18
+move 12(R14),R7
+*line 18
+move 14(R14),R6
+*line 18
+move 16(R14),R5
+*line 18
+move.l 18(R14),R12
+*line 18
+bra L5
+L4:
+*line 19
+*line 20
+move.l R13,R11
+clr R0
+move R6,R0
+clr R1
+move R7,R1
+lsr #1,R1
+mulu R1,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l R0,R11
+clr R0
+move R5,R0
+lsr #1,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+add.l R0,R11
+*line 21
+*line 22
+*line 23
+clr R0
+move R5,R0
+and #1,R0
+lsl #1,R0
+swap R0
+clr R0
+swap R0
+move.l R0,R8
+move.l #L1,R9
+clr R0
+move 0(R8,R9.l),R0
+and (R11),R0
+move.b (R12)+,R1
+ext.w R1
+and #255,R1
+btst #0,R5
+beq L10000
+move #8,R2
+bra L10002
+L10000:clr R2
+L10002:asl R2,R1
+or R1,R0
+move R0,(R11)
+*line 24
+*line 25
+add #1,R5
+L5:
+*line 26
+tst.b (R12)
+bne L4
+L3:L2:tst.l (sp)+
+movem.l (sp)+,R5-R7/R11-R13
+unlk R14
+rts
+.data
Index: alcyon/vtyper.s
===================================================================
--- alcyon/vtyper.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/vtyper.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,459 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _cxrate
+.globl _cyrate
+.globl _stccol
+.globl _stcrow
+.globl _vtccol
+.globl _vtcrow
+.globl _vtdecol
+.globl _vtxval
+.globl _vtyval
+.globl _vtdeptr
+.globl _vtdechr
+.globl _bfs
+.globl _vtwrow
+.globl _vtwcol
+.globl _vt_adv
+.globl _vt_bsp
+.globl _vt_cdn
+.globl _vt_cup
+.globl _vt_stop
+.globl _vt_dsp
+.globl _vtobj
+.globl _vtfgval
+.globl _vtbgval
+.globl _vtlin1
+.data
+_vtlin1:
+.dc.b $41,$42,$43,$44,$45,$46,$47,$48,$49,$4A,$4B,$4C,$4D,$4E,$4F,$50,$51,$52,$53,$54,$55,$56,$57,$58,$59,$5A,$20,$20,$7C,$20,$0
+.even
+.globl _vtlin2
+.data
+_vtlin2:
+.dc.b $61,$62,$63,$64,$65,$66,$67,$68,$69,$6A,$6B,$6C,$6D,$6E,$6F,$70,$71,$72,$73,$74,$75,$76,$77,$78,$79,$7A,$20,$2D,$2A,$2D,$0
+.even
+.globl _vtlin3
+.data
+_vtlin3:
+.dc.b $20,$30,$31,$32,$33,$34,$35,$36,$37,$38,$39,$2B,$2D,$2F,$23,$28,$29,$2E,$2C,$3A,$3B,$21,$3F,$26,$3C,$3E,$20,$20,$7C,$20,$0
+.even
+.globl _vtsetup
+.text
+_vtsetup:
+~~vtsetup:
+~obj=8
+~dsp=12
+~col=16
+~ptr=18
+~tr=22
+~tc=24
+~adv=26
+~bsp=30
+~cup=34
+~cdn=38
+~stop=42
+~fg=46
+~bg=48
+link R14,#-4
+*line 89
+move.l 8(R14),_vtobj
+*line 90
+move.l 26(R14),_vt_adv
+*line 91
+move.l 30(R14),_vt_bsp
+*line 92
+move.l 34(R14),_vt_cup
+*line 93
+move.l 38(R14),_vt_cdn
+*line 94
+move.l 12(R14),_vt_dsp
+*line 95
+move.l 42(R14),_vt_stop
+*line 96
+move 22(R14),_vtwrow
+*line 97
+move 24(R14),_vtwcol
+*line 98
+move 16(R14),_vtdecol
+*line 99
+move.l 18(R14),_vtdeptr
+*line 100
+move 46(R14),(sp)
+jsr _exp_c
+move R0,_vtfgval
+*line 101
+move 48(R14),(sp)
+jsr _exp_c
+move R0,_vtbgval
+*line 102
+move #14,(sp)
+move #2,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 103
+move 24(R14),R0
+asl #3,R0
+move R0,_vtxval
+*line 104
+move 22(R14),R0
+ext.l R0
+divs #14,R0
+move R0,_vtyval
+*line 105
+move 24(R14),(sp)
+move 22(R14),-(sp)
+jsr _ttcpos
+addq.l #2,sp
+L4:unlk R14
+rts
+.globl _vtcxupd
+.text
+_vtcxupd:
+~~vtcxupd:
+link R14,#-4
+*line 124
+move _cxrate,R0
+add R0,_vtxval
+move _vtxval,R0
+asr #3,R0
+move R0,_vtccol
+*line 126
+*line 127
+move _vtwcol,R0
+add #29,R0
+cmp _vtccol,R0
+bge L6
+*line 127
+move _vtwcol,R0
+add #29,R0
+move R0,_vtccol
+asl #3,R0
+move R0,_vtxval
+bra L7
+L6:
+*line 128
+*line 129
+move _vtccol,R0
+cmp _vtwcol,R0
+bge L8
+*line 129
+move _vtwcol,R0
+move R0,_vtccol
+asl #3,R0
+move R0,_vtxval
+L8:L7:L5:unlk R14
+rts
+.globl _vtcyupd
+.text
+_vtcyupd:
+~~vtcyupd:
+link R14,#-4
+*line 145
+move _cyrate,R0
+add R0,_vtyval
+move _vtyval,R0
+ext.l R0
+divs #14,R0
+move R0,_vtcrow
+*line 147
+*line 148
+move _vtwrow,R0
+add #2,R0
+cmp _vtcrow,R0
+bge L10
+*line 148
+move _vtwrow,R0
+add #2,R0
+move R0,_vtcrow
+muls #14,R0
+move R0,_vtyval
+bra L11
+L10:
+*line 149
+*line 150
+move _vtcrow,R0
+cmp _vtwrow,R0
+bge L12
+*line 150
+move _vtwrow,R0
+move R0,_vtcrow
+muls #14,R0
+move R0,_vtyval
+L12:L11:L9:unlk R14
+rts
+.globl _vtdisp
+.text
+_vtdisp:
+~~vtdisp:
+~obj=8
+~fg=12
+~bg=14
+~row=16
+~col=18
+~buf=20
+link R14,#-4
+*line 172
+*line 173
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L14
+*line 173
+clr (sp)
+jsr _vbank
+*line 174
+L14:
+*line 175
+move #14,(sp)
+move.l 20(R14),-(sp)
+move 18(R14),-(sp)
+move 16(R14),-(sp)
+move 14(R14),-(sp)
+move 12(R14),-(sp)
+move #64,-(sp)
+move.l 8(R14),-(sp)
+jsr _vcputsv
+adda.l #18,sp
+L13:unlk R14
+rts
+.globl _vtyper
+.text
+_vtyper:
+~~vtyper:
+link R14,#-4
+*line 194
+*line 194
+move _vtwcol,R0
+add #26,R0
+cmp _vtccol,R0
+ble L16
+*line 195
+*line 196
+*line 197
+*line 198
+*line 199
+move _vtcrow,R0
+cmp _vtwrow,R0
+bne L17
+*line 199
+move _vtccol,R8
+sub _vtwcol,R8
+add.l #_vtlin1,R8
+move.b (R8),_vtdechr
+bra L18
+L17:
+*line 200
+*line 201
+move _vtwrow,R0
+add #1,R0
+cmp _vtcrow,R0
+bne L19
+*line 201
+move _vtccol,R8
+sub _vtwcol,R8
+add.l #_vtlin2,R8
+move.b (R8),_vtdechr
+bra L20
+L19:
+*line 202
+*line 203
+move _vtwrow,R0
+add #2,R0
+cmp _vtcrow,R0
+bne L21
+*line 203
+move _vtccol,R8
+sub _vtwcol,R8
+add.l #_vtlin3,R8
+move.b (R8),_vtdechr
+bra L22
+L21:
+*line 204
+*line 205
+*line 206
+move.b #42,_vtdechr
+*line 207
+clr R0
+bra L15
+L22:L20:L18:
+*line 208
+*line 209
+*line 210
+move _stccol,R8
+sub _vtdecol,R8
+add.l _vtdeptr,R8
+move.b _vtdechr,(R8)
+*line 211
+*line 212
+*line 213
+*line 214
+move.b _vtdechr,_bfs
+*line 215
+clr.b 1+_bfs
+*line 216
+*line 217
+move.l #_bfs,-(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+move _vtbgval,-(sp)
+move _vtfgval,-(sp)
+move.l _vtobj,-(sp)
+move.l _vt_dsp,R8
+jsr (R8)
+adda.l #16,sp
+*line 218
+*line 219
+move.l _vt_adv,R8
+jsr (R8)
+*line 220
+move #1,R0
+bra L15
+*line 221
+*line 222
+*line 223
+*line 224
+bra L23
+L16:
+*line 225
+*line 226
+move _vtwrow,R0
+add #1,R0
+cmp _vtcrow,R0
+bne L24
+move _vtwcol,R0
+add #28,R0
+cmp _vtccol,R0
+bne L24
+*line 227
+*line 228
+move #14,(sp)
+jsr _objclr
+*line 229
+move.l _vt_stop,R8
+jsr (R8)
+*line 230
+clr R0
+bra L15
+*line 231
+bra L25
+L24:
+*line 232
+*line 233
+move _vtcrow,R0
+cmp _vtwrow,R0
+bne L26
+move _vtwcol,R0
+add #28,R0
+cmp _vtccol,R0
+bne L26
+*line 234
+*line 235
+move.l _vt_cup,R8
+jsr (R8)
+*line 236
+clr R0
+bra L15
+*line 237
+bra L27
+L26:
+*line 238
+*line 239
+move _vtwrow,R0
+add #2,R0
+cmp _vtcrow,R0
+bne L28
+move _vtwcol,R0
+add #28,R0
+cmp _vtccol,R0
+bne L28
+*line 240
+*line 241
+move.l _vt_cdn,R8
+jsr (R8)
+*line 242
+clr R0
+bra L15
+*line 243
+bra L29
+L28:
+*line 244
+*line 245
+move _vtwrow,R0
+add #1,R0
+cmp _vtcrow,R0
+bne L30
+move _vtwcol,R0
+add #27,R0
+cmp _vtccol,R0
+bne L30
+*line 246
+*line 247
+move.l _vt_bsp,R8
+jsr (R8)
+*line 248
+clr R0
+bra L15
+*line 249
+bra L31
+L30:
+*line 250
+*line 251
+move _vtwrow,R0
+add #1,R0
+cmp _vtcrow,R0
+bne L32
+move _vtwcol,R0
+add #29,R0
+cmp _vtccol,R0
+bne L32
+*line 252
+*line 253
+move.l _vt_adv,R8
+jsr (R8)
+*line 254
+clr R0
+bra L15
+*line 255
+L32:L31:L29:L27:L25:L23:L15:unlk R14
+rts
+.data
Index: alcyon/vwputm.s
===================================================================
--- alcyon/vwputm.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/vwputm.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,38 @@
+.globl _vwputm
+.text
+_vwputm:
+~~vwputm:
+~ml=-4
+~obase=8
+~nw=12
+~fg=14
+~bg=16
+~row=18
+~col=20
+~ml=22
+link R14,#-4
+*line 33
+bra L4
+L3:
+*line 34
+*line 35
+move.l 22(R14),R8
+move.l (R8),(sp)
+move 20(R14),-(sp)
+move 18(R14),-(sp)
+move 16(R14),-(sp)
+move 14(R14),-(sp)
+move 12(R14),-(sp)
+move.l 8(R14),-(sp)
+jsr _vwputs
+adda.l #14,sp
+add.l #4,22(R14)
+add #1,18(R14)
+L4:
+*line 36
+move.l 22(R14),R8
+tst.l (R8)
+bne L3
+L2:L1:unlk R14
+rts
+.data
Index: alcyon/waitcr.s
===================================================================
--- alcyon/waitcr.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/waitcr.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,39 @@
+.globl _waitcr
+.text
+_waitcr:
+~~waitcr:
+link R14,#-6
+~c=-2
+*line 28
+move #7,(sp)
+move #2,-(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+*line 32
+bra L4
+L3:
+*line 33
+*line 34
+cmp #7,-2(R14)
+bne L5
+*line 34
+jsr _xtrap15
+*line 35
+L5:L4:
+*line 36
+move #2,(sp)
+move #2,-(sp)
+jsr _trap13
+addq.l #2,sp
+and #127,R0
+move R0,-2(R14)
+cmp #13,R0
+bne L3
+L2:
+*line 36
+move -2(R14),R0
+bra L1
+L1:unlk R14
+rts
+.data
Index: alcyon/wdfield.s
===================================================================
--- alcyon/wdfield.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/wdfield.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,2115 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _astat
+.globl _cmtype
+.globl _curfunc
+.globl _curinst
+.globl _curslim
+.globl _curvce
+.globl _curwave
+.globl _curwdth
+.globl _curwfnl
+.globl _curwhrm
+.globl _curwhrv
+.globl _curwoff
+.globl _curwpnt
+.globl _curwslt
+.globl _cxrate
+.globl _cxval
+.globl _cyrate
+.globl _cyval
+.globl _hitbox
+.globl _lstwoff
+.globl _lstwpnt
+.globl _stccol
+.globl _stcrow
+.globl _wdupdfl
+.globl _wplast
+.globl _wpntsv
+.globl _wvlast
+.globl _crate1
+.globl _offsets
+.globl _vmtab
+.globl _wsbuf
+.globl _wsnmod
+.globl _waveob
+.globl _bfs
+.globl _vbufs
+.globl _csbp
+.globl _wdboxes
+.globl _wdcurtb
+.data
+_wdcurtb:
+.dc.w $7FFF
+.dc.w $7FFB
+.dc.w $7FEC
+.dc.w $7FD3
+.dc.w $7FB1
+.dc.w $7F84
+.dc.w $7F4E
+.dc.w $7F0E
+.dc.w $7EC5
+.dc.w $7E71
+.dc.w $7E15
+.dc.w $7DAE
+.dc.w $7D3E
+.dc.w $7CC5
+.dc.w $7C42
+.dc.w $7BB6
+.dc.w $7B20
+.dc.w $7A82
+.dc.w $79DB
+.dc.w $792A
+.dc.w $7871
+.dc.w $77AF
+.dc.w $76E5
+.dc.w $7612
+.dc.w $7536
+.dc.w $7453
+.dc.w $7367
+.dc.w $7274
+.dc.w $7179
+.dc.w $7076
+.dc.w $6F6B
+.dc.w $6E5A
+.dc.w $6D41
+.dc.w $6C21
+.dc.w $6AFB
+.dc.w $69CD
+.dc.w $689A
+.dc.w $6760
+.dc.w $6620
+.dc.w $64DA
+.dc.w $638E
+.dc.w $623D
+.dc.w $60E7
+.dc.w $5F8B
+.dc.w $5E2B
+.dc.w $5CC6
+.dc.w $5B5D
+.dc.w $59EF
+.dc.w $587E
+.dc.w $5708
+.dc.w $558F
+.dc.w $5413
+.dc.w $5294
+.dc.w $5112
+.dc.w $4F8D
+.dc.w $4E06
+.dc.w $4C7C
+.dc.w $4AF1
+.dc.w $4964
+.dc.w $47D5
+.dc.w $4646
+.dc.w $44B5
+.dc.w $4324
+.dc.w $4192
+.dc.w $4000
+.dc.w $3E6E
+.dc.w $3CDC
+.dc.w $3B4B
+.dc.w $39BA
+.dc.w $382A
+.dc.w $369C
+.dc.w $350F
+.dc.w $3383
+.dc.w $31FA
+.dc.w $3073
+.dc.w $2EEE
+.dc.w $2D6C
+.dc.w $2BEC
+.dc.w $2A70
+.dc.w $28F7
+.dc.w $2782
+.dc.w $2610
+.dc.w $24A3
+.dc.w $2339
+.dc.w $21D4
+.dc.w $2074
+.dc.w $1F19
+.dc.w $1DC2
+.dc.w $1C71
+.dc.w $1B26
+.dc.w $19E0
+.dc.w $18A0
+.dc.w $1766
+.dc.w $1632
+.dc.w $1505
+.dc.w $13DE
+.dc.w $12BE
+.dc.w $11A6
+.dc.w $1094
+.dc.w $F8A
+.dc.w $E87
+.dc.w $D8B
+.dc.w $C98
+.dc.w $BAC
+.dc.w $AC9
+.dc.w $9EE
+.dc.w $91B
+.dc.w $850
+.dc.w $78E
+.dc.w $6D5
+.dc.w $625
+.dc.w $57D
+.dc.w $4DF
+.dc.w $449
+.dc.w $3BD
+.dc.w $33B
+.dc.w $2C1
+.dc.w $251
+.dc.w $1EB
+.dc.w $18E
+.dc.w $13A
+.dc.w $F1
+.dc.w $B1
+.dc.w $7B
+.dc.w $4E
+.dc.w $2C
+.dc.w $13
+.dc.w $4
+.globl _wdcurct
+.data
+_wdcurct:
+.dc.w $1
+.dc.w $80
+.dc.w $2
+.dc.w $40
+.dc.w $4
+.dc.w $20
+.dc.w $8
+.dc.w $10
+.dc.w $10
+.dc.w $8
+.dc.w $20
+.dc.w $4
+.dc.w $40
+.dc.w $2
+.dc.w $80
+.dc.w $1
+.globl _wxrate
+.data
+_wxrate:
+.dc.w $1
+.globl _wd_fet1
+.data
+_wd_fet1:
+.dc.w $17
+.dc.w $A
+.dc.w $B
+.dc.w $2
+*line 106
+.dc.l _et_wavs
+*line 106
+.dc.l _ef_wavs
+*line 106
+.dc.l _rd_wavs
+*line 106
+.dc.l _nd_wavs
+.dc.w $17
+.dc.w $13
+.dc.w $14
+.dc.w $102
+*line 107
+.dc.l _et_wvce
+*line 107
+.dc.l _ef_wvce
+*line 107
+.dc.l _rd_wvce
+*line 107
+.dc.l _nd_wvce
+.dc.w $17
+.dc.w $22
+.dc.w $24
+.dc.w $4
+*line 108
+.dc.l _et_wpnt
+*line 108
+.dc.l _ef_wpnt
+*line 108
+.dc.l _rd_wpnt
+*line 108
+.dc.l _nd_wpnt
+.dc.w $17
+.dc.w $2C
+.dc.w $30
+.dc.w $104
+*line 109
+.dc.l _et_woff
+*line 109
+.dc.l _ef_woff
+*line 109
+.dc.l _rd_woff
+*line 109
+.dc.l _nd_woff
+.dc.w $17
+.dc.w $3D
+.dc.w $3E
+.dc.w $5
+*line 110
+.dc.l _et_whar
+*line 110
+.dc.l _ef_whar
+*line 110
+.dc.l _rd_whar
+*line 110
+.dc.l _nd_whar
+.dc.w $18
+.dc.w $14
+.dc.w $14
+.dc.w $302
+*line 112
+.dc.l _et_wslt
+*line 112
+.dc.l _ef_wslt
+*line 112
+.dc.l _rd_wslt
+*line 112
+.dc.l _nd_wslt
+.dc.w $18
+.dc.w $39
+.dc.w $3C
+.dc.w $105
+*line 113
+.dc.l _et_whrv
+*line 113
+.dc.l _ef_whrv
+*line 113
+.dc.l _rd_whrv
+*line 113
+.dc.l _nd_whrv
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.l $0
+.dc.l $0
+.dc.l $0
+.dc.l $0
+.globl _wdbox
+.data
+_wdbox:
+.dc.w $1
+.dc.w $1
+.dc.w $1FE
+.dc.w $133
+.dc.w $B
+.dc.w $3
+.dc.w $0
+.dc.w $1
+.dc.w $1
+.dc.w $135
+.dc.w $1FE
+.dc.w $140
+.dc.w $B
+.dc.w $4
+.dc.w $16
+.dc.w $0
+.dc.w $1
+.dc.w $142
+.dc.w $AE
+.dc.w $15C
+.dc.w $B
+.dc.w $5
+.dc.w $17
+.dc.w $1
+.dc.w $B0
+.dc.w $142
+.dc.w $E6
+.dc.w $15C
+.dc.w $B
+.dc.w $E
+.dc.w $17
+.dc.w $17
+.dc.w $E8
+.dc.w $142
+.dc.w $18E
+.dc.w $15C
+.dc.w $B
+.dc.w $5
+.dc.w $17
+.dc.w $1E
+.dc.w $190
+.dc.w $142
+.dc.w $1FE
+.dc.w $15C
+.dc.w $B
+.dc.w $E
+.dc.w $17
+.dc.w $33
+.globl _wdbxlb0
+.data
+_wdbxlb0:
+*line 130
+.dc.l L1
+*line 134
+.dc.l L2
+*line 136
+.dc.l L3
+*line 137
+.dc.l L4
+*line 138
+.dc.l L5
+*line 140
+.dc.l L6
+.globl _wdbxlb1
+.data
+_wdbxlb1:
+*line 144
+.dc.l L7
+*line 145
+.dc.l L8
+*line 146
+.dc.l L9
+*line 147
+.dc.l L10
+*line 148
+.dc.l L11
+*line 150
+.dc.l L12
+.globl _wd_flds
+.data
+_wd_flds:
+*line 157
+.dc.l _stdctp1
+*line 158
+.dc.l _nokey
+*line 159
+.dc.l _nokey
+*line 160
+.dc.l _cxkstd
+*line 161
+.dc.l _cykstd
+*line 162
+.dc.l _wdcxupd
+*line 163
+.dc.l _wdcyupd
+*line 164
+.dc.l _wdykup
+*line 165
+.dc.l _wdykdn
+*line 166
+.dc.l _wdxkey
+*line 167
+.dc.l _select
+*line 168
+.dc.l _stdmkey
+*line 169
+.dc.l _stddkey
+*line 170
+.dc.l _wdnfld
+*line 171
+.dc.l _wd_fet1
+*line 172
+.dc.l _wdboxes
+*line 173
+.dc.l _crate1
+*line 174
+.dc.l _crate1
+.dc.w $0
+.dc.w $100
+.dc.w $80
+.globl _updfpu
+.text
+_updfpu:
+~~updfpu:
+link R14,#0
+movem.l R6-R7/R12-R13,-(sp)
+~i=R7
+~wsp1=R13
+~wsp2=R12
+*line 196
+move _curvce,R0
+move #9,R1
+asl R1,R0
+asl #1,R0
+ext.l R0
+move.l R0,R13
+tst _curwslt
+beq L10000
+clr R0
+bra L10002
+L10000:move #256,R0
+L10002:asl #1,R0
+ext.l R0
+add.l R0,R13
+add.l #_io_fpu,R13
+add.l #$2,R13
+*line 197
+tst _curwslt
+beq L10003
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+add.l #2858,R0
+bra L10005
+L10003:move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+add.l #1778,R0
+L10005:move.l R0,R12
+*line 199
+move #254,(sp)
+move.l R12,-(sp)
+move.l R13,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 203
+move -2(R12),-2(R13)
+*line 204
+move 506(R12),508(R13)
+*line 210
+move #254,(sp)
+move.l R12,-(sp)
+move.l R13,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 212
+move -2(R12),-2(R13)
+*line 213
+move 506(R12),508(R13)
+*line 216
+move _curwpnt,R8
+add.l R8,R8
+move 0(R12,R8.l),R0
+asr #5,R0
+move R0,_curwfnl
+L13:tst.l (sp)+
+movem.l (sp)+,R7-R7/R12-R13
+unlk R14
+rts
+.globl _wsupd
+.text
+_wsupd:
+~~wsupd:
+link R14,#0
+movem.l R6-R7/R12-R13,-(sp)
+~i=R7
+~wsp1=R13
+~wsp2=R12
+*line 235
+tst _curwslt
+beq L10006
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+add.l #3366,R0
+bra L10008
+L10006:move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+add.l #2286,R0
+L10008:move.l R0,R12
+*line 237
+clr R7
+bra L17
+L18:
+*line 238
+move R7,R8
+add.l R8,R8
+move 0(R12,R8.l),R0
+asr #5,R0
+move R7,R9
+add #1,R9
+add.l R9,R9
+add.l #_offsets,R9
+move R0,(R9)
+L16:
+*line 237
+add #1,R7
+L17:
+*line 237
+cmp #254,R7
+blt L18
+L15:
+*line 240
+move 2+_offsets,_offsets
+*line 242
+jsr _wscalc
+*line 246
+tst _curwslt
+beq L10009
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+add.l #2858,R0
+bra L10011
+L10009:move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+add.l #1778,R0
+L10011:move.l R0,R13
+*line 248
+clr R7
+bra L21
+L22:
+*line 249
+move R7,R8
+add #1,R8
+add.l R8,R8
+move.l #_wsbuf,R9
+move 0(R8,R9.l),R0
+asl #5,R0
+move.l R13,R9
+move R7,R10
+add.l R10,R10
+add.l R10,R9
+move R0,(R9)
+L20:
+*line 248
+add #1,R7
+L21:
+*line 248
+cmp #254,R7
+blt L22
+L19:
+*line 251
+jsr _updfpu
+*line 252
+move _curvce,R8
+add.l R8,R8
+add.l R8,R8
+move _curwslt,R9
+add.l R9,R9
+add.l R9,R8
+add.l #_wsnmod,R8
+move #1,(R8)
+L14:tst.l (sp)+
+movem.l (sp)+,R7-R7/R12-R13
+unlk R14
+rts
+.globl _whupd
+.text
+_whupd:
+~~whupd:
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~i=R7
+~wsp1=R13
+*line 268
+tst _curwslt
+beq L10012
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+add.l #2858,R0
+bra L10014
+L10012:move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+add.l #1778,R0
+L10014:move.l R0,R13
+*line 270
+clr R7
+bra L26
+L27:
+*line 271
+move R7,R8
+add #1,R8
+add.l R8,R8
+move.l #_wsbuf,R9
+move 0(R8,R9.l),R0
+asl #5,R0
+move.l R13,R9
+move R7,R10
+add.l R10,R10
+add.l R10,R9
+move R0,(R9)
+L25:
+*line 270
+add #1,R7
+L26:
+*line 270
+cmp #254,R7
+blt L27
+L24:
+*line 273
+jsr _updfpu
+*line 274
+move _curvce,R8
+add.l R8,R8
+add.l R8,R8
+move _curwslt,R9
+add.l R9,R9
+add.l R9,R8
+add.l #_wsnmod,R8
+move #1,(R8)
+L23:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _pntsup
+.text
+_pntsup:
+~~pntsup:
+link R14,#-8
+movem.l R2-R7/R13-R13,-(sp)
+~ip=R13
+~ov=-4
+~i=R7
+~j=R6
+~k=R5
+~tv=R4
+~curdif=R3
+~cwnp=-6
+~cwin=-8
+*line 293
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 295
+*line 296
+tst _curwslt
+beq L10015
+move.l R13,R0
+add.l #3366,R0
+bra L10017
+L10015:move.l R13,R0
+add.l #2286,R0
+L10017:move.l R0,-4(R14)
+*line 298
+move _curwdth,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_wdcurct,R8
+move (R8),-6(R14)
+*line 300
+move _curwdth,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_wdcurct,R8
+move 2(R8),-8(R14)
+*line 302
+move _lstwoff,R3
+sub _curwoff,R3
+*line 306
+clr R7
+clr R5
+bra L31
+L32:
+*line 307
+*line 308
+*line 308
+tst R7
+bne L33
+*line 309
+*line 310
+move _curwoff,R0
+asl #5,R0
+move _curwpnt,R9
+add.l R9,R9
+add.l -4(R14),R9
+move R0,(R9)
+*line 311
+bra L34
+L33:
+*line 312
+*line 313
+*line 314
+move R7,R6
+add _curwpnt,R6
+*line 315
+*line 316
+*line 316
+cmp #254,R6
+bge L35
+*line 317
+*line 318
+*line 319
+*line 320
+move.l #$8000,-(sp)
+move R5,R8
+add.l R8,R8
+move.l #_wdcurtb,R9
+move 0(R8,R9.l),R0
+ext.l R0
+move.l R0,-(sp)
+move R3,R8
+move.l R8,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,-(sp)
+add.l #$4000,(sp)
+jsr ldiv
+addq.l #8,sp
+move.l R0,-(sp)
+move.l -4(R14),R8
+move R6,R9
+add.l R9,R9
+move 0(R8,R9.l),R0
+asr #5,R0
+ext.l R0
+sub.l (sp)+,R0
+move R0,R4
+*line 321
+*line 322
+*line 323
+cmp #1023,R4
+ble L36
+*line 323
+move #1023,R4
+bra L37
+L36:
+*line 324
+*line 325
+cmp #-1023,R4
+bge L38
+*line 325
+move #-1023,R4
+*line 326
+L38:L37:
+*line 327
+move R4,R0
+asl #5,R0
+move R6,R9
+add.l R9,R9
+add.l -4(R14),R9
+move R0,(R9)
+*line 328
+*line 329
+L35:
+*line 330
+move _curwpnt,R6
+sub R7,R6
+*line 331
+*line 332
+*line 332
+tst R6
+blt L39
+*line 333
+*line 334
+*line 335
+*line 336
+move.l #$8000,-(sp)
+move R5,R8
+add.l R8,R8
+move.l #_wdcurtb,R9
+move 0(R8,R9.l),R0
+ext.l R0
+move.l R0,-(sp)
+move R3,R8
+move.l R8,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,-(sp)
+add.l #$4000,(sp)
+jsr ldiv
+addq.l #8,sp
+move.l R0,-(sp)
+move.l -4(R14),R8
+move R6,R9
+add.l R9,R9
+move 0(R8,R9.l),R0
+asr #5,R0
+ext.l R0
+sub.l (sp)+,R0
+move R0,R4
+*line 337
+*line 338
+*line 339
+cmp #1023,R4
+ble L40
+*line 339
+move #1023,R4
+bra L41
+L40:
+*line 340
+*line 341
+cmp #-1023,R4
+bge L42
+*line 341
+move #-1023,R4
+*line 342
+L42:L41:
+*line 343
+move R4,R0
+asl #5,R0
+move R6,R9
+add.l R9,R9
+add.l -4(R14),R9
+move R0,(R9)
+*line 344
+L39:L34:
+*line 345
+L30:
+*line 306
+add #1,R7
+add -8(R14),R5
+L31:
+*line 306
+cmp -6(R14),R7
+blt L32
+L29:
+*line 348
+jsr _wsupd
+L28:tst.l (sp)+
+movem.l (sp)+,R3-R7/R13-R13
+unlk R14
+rts
+.globl _wdintp
+.text
+_wdintp:
+~~wdintp:
+link R14,#-4
+movem.l R2-R7/R12-R13,-(sp)
+~ip=R13
+~ov=R12
+~i=R7
+~j=R6
+~k=R5
+~n=R4
+~t=R3
+~to=-2
+~from=-4
+*line 368
+move _curwpnt,-2(R14)
+*line 369
+move _wplast,-4(R14)
+*line 371
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 372
+tst _curwslt
+beq L10018
+move.l R13,R0
+add.l #3366,R0
+bra L10020
+L10018:move.l R13,R0
+add.l #2286,R0
+L10020:move.l R0,R12
+*line 374
+move _curwoff,R0
+asl #5,R0
+move.l R12,R9
+move _curwpnt,R10
+add.l R10,R10
+add.l R10,R9
+move R0,(R9)
+*line 376
+*line 376
+move -4(R14),R0
+cmp -2(R14),R0
+ble L44
+*line 377
+*line 378
+move -4(R14),R7
+*line 379
+move -2(R14),-4(R14)
+*line 380
+move R7,-2(R14)
+*line 381
+*line 382
+L44:
+*line 383
+move -2(R14),R4
+sub -4(R14),R4
+*line 385
+*line 385
+cmp #1,R4
+ble L45
+*line 386
+*line 387
+move.l R12,R8
+move -4(R14),R9
+add.l R9,R9
+add.l R9,R8
+move (R8),R5
+asr #5,R5
+*line 388
+move R4,R0
+ext.l R0
+move.l R0,-(sp)
+move -2(R14),R8
+add.l R8,R8
+move 0(R12,R8.l),R0
+asr #5,R0
+ext.l R0
+move R5,R1
+ext.l R1
+sub.l R1,R0
+move.l #$10,R1
+asl.l R1,R0
+move.l R0,-(sp)
+jsr ldiv
+addq.l #8,sp
+move.l R0,R3
+*line 389
+move -4(R14),R6
+add #1,R6
+*line 390
+sub #1,R4
+*line 391
+*line 392
+clr R7
+bra L48
+L49:
+*line 393
+move R7,R0
+add #1,R0
+ext.l R0
+move.l R0,-(sp)
+move.l R3,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l #$10,R1
+asr.l R1,R0
+add R5,R0
+asl #5,R0
+move R0,-(sp)
+move.l R12,R8
+move R6,R9
+add.l R9,R9
+add.l R9,R8
+move (sp)+,(R8)
+add #1,R6
+L47:
+*line 392
+add #1,R7
+L48:
+*line 392
+cmp R4,R7
+blt L49
+L46:
+*line 393
+*line 394
+*line 395
+L45:
+*line 396
+move _curwpnt,_wplast
+*line 397
+move _curwoff,_wvlast
+*line 399
+jsr _wsupd
+L43:tst.l (sp)+
+movem.l (sp)+,R3-R7/R12-R13
+unlk R14
+rts
+.globl _wdykdn
+.text
+_wdykdn:
+~~wdykdn:
+link R14,#-4
+*line 413
+*line 414
+tst _wpntsv
+beq L50
+*line 415
+*line 416
+move _curwpnt,_lstwpnt
+*line 417
+move _curwoff,_lstwoff
+L50:unlk R14
+rts
+.globl _wdykup
+.text
+_wdykup:
+~~wdykup:
+link R14,#-4
+*line 428
+*line 429
+tst _wpntsv
+beq L51
+tst _wdupdfl
+beq L51
+*line 430
+*line 431
+*line 431
+cmp #1,_wpntsv
+bne L52
+*line 432
+*line 433
+*line 434
+cmp #8,_curwdth
+bne L53
+*line 434
+jsr _wdintp
+*line 435
+bra L54
+L53:
+*line 436
+jsr _pntsup
+L54:
+*line 437
+bra L55
+L52:
+*line 438
+*line 439
+*line 440
+move _curwhrm,(sp)
+jsr _adj
+*line 441
+jsr _wscalc
+*line 442
+jsr _whupd
+L55:
+*line 445
+clr (sp)
+jsr _wdswin
+*line 446
+move #2,(sp)
+jsr _wdswin
+*line 447
+move #4,(sp)
+jsr _wdswin
+*line 449
+clr _wdupdfl
+L51:unlk R14
+rts
+.globl _wdcyupd
+.text
+_wdcyupd:
+~~wdcyupd:
+link R14,#-6
+movem.l R2-R7/R11-R13,-(sp)
+~ip=R13
+~ov=R12
+~hv=R11
+~i=R7
+~j=R6
+~k=R5
+~tv=R4
+~wsgn=R3
+~wval=-2
+~cwnp=-4
+~cwin=-6
+*line 469
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 471
+move _wpntsv,R0
+bra L58
+*line 472
+L59:
+*line 473
+*line 474
+*line 475
+move _cyrate,R0
+add R0,_cyval
+*line 476
+*line 477
+*line 478
+cmp #348,_cyval
+ble L60
+*line 478
+move #348,_cyval
+bra L61
+L60:
+*line 479
+*line 480
+cmp #1,_cyval
+bge L62
+*line 480
+move #1,_cyval
+*line 481
+L62:L61:bra L56
+*line 482
+*line 483
+*line 484
+L63:
+*line 485
+*line 486
+*line 487
+move _cyrate,R0
+sub R0,_curwoff
+*line 488
+*line 489
+*line 490
+cmp #1023,_curwoff
+ble L64
+*line 490
+move #1023,_curwoff
+bra L65
+L64:
+*line 491
+*line 492
+cmp #-1023,_curwoff
+bge L66
+*line 492
+move #-1023,_curwoff
+*line 493
+L66:L65:
+*line 494
+move #133,R0
+move _curwoff,R1
+ext.l R1
+divs #8,R1
+sub R1,R0
+move R0,_cyval
+*line 495
+*line 496
+*line 496
+tst _curwoff
+bge L67
+*line 497
+*line 498
+move _curwoff,R0
+neg R0
+move R0,-2(R14)
+*line 499
+move.b #45,R3
+*line 500
+bra L68
+L67:
+*line 501
+*line 502
+*line 503
+move _curwoff,-2(R14)
+*line 504
+move.b #43,R3
+L68:
+*line 505
+*line 506
+*line 507
+move -2(R14),(sp)
+move.b R3,R0
+ext.w R0
+move R0,-(sp) 
+move.l #L69,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 508
+*line 509
+*line 510
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L70
+*line 510
+clr (sp)
+jsr _vbank
+*line 511
+L70:
+*line 512
+*line 513
+move #14,(sp)
+move.l #_bfs,-(sp)
+move 78+_wdbox,-(sp)
+add #14,(sp)
+move 76+_wdbox,-(sp)
+move 74+_wdbox,-(sp)
+move 72+_wdbox,-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 514
+*line 515
+move #1,_wdupdfl
+bra L56
+*line 516
+*line 517
+*line 518
+L71:
+*line 519
+*line 520
+*line 521
+tst _curwslt
+beq L10021
+move.l R13,R0
+add.l #3874,R0
+bra L10023
+L10021:move.l R13,R0
+add.l #2794,R0
+L10023:move.l R0,R11
+*line 522
+*line 523
+move.l R11,R8
+move _curwhrm,R9
+add.l R9,R9
+add.l R9,R8
+tst (R8)
+bge L10024
+move _curwhrm,R8
+add.l R8,R8
+move 0(R11,R8.l),R0
+neg R0
+bra L10026
+L10024:move _curwhrm,R8
+add.l R8,R8
+move 0(R11,R8.l),R0
+L10026:sub _cyrate,R0
+move R0,_curwhrv
+*line 524
+*line 525
+*line 526
+cmp #100,_curwhrv
+ble L72
+*line 526
+move #100,_curwhrv
+bra L73
+L72:
+*line 527
+*line 528
+tst _curwhrv
+bge L74
+*line 528
+clr _curwhrv
+*line 529
+L74:L73:
+*line 530
+move.l R11,R8
+move _curwhrm,R9
+add.l R9,R9
+add.l R9,R8
+tst (R8)
+bge L10027
+move _curwhrv,R0
+neg R0
+bra L10029
+L10027:move _curwhrv,R0
+L10029:move R0,_curwhrv
+*line 531
+*line 532
+move.l R11,R8
+move _curwhrm,R9
+add.l R9,R9
+add.l R9,R8
+move _curwhrv,(R8)
+*line 533
+move _curwhrm,R8
+add.l R8,R8
+add.l #_vmtab,R8
+move _curwhrv,(R8)
+*line 534
+*line 535
+*line 535
+tst _curwhrv
+bge L75
+*line 536
+*line 537
+move _curwhrv,R0
+neg R0
+move R0,-2(R14)
+*line 538
+move.b #45,R3
+*line 539
+bra L76
+L75:
+*line 540
+*line 541
+*line 542
+move _curwhrv,-2(R14)
+*line 543
+move.b #43,R3
+L76:
+*line 544
+*line 545
+*line 546
+*line 547
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L77
+*line 547
+clr (sp)
+jsr _vbank
+*line 548
+L77:
+*line 549
+move -2(R14),(sp)
+move.b R3,R0
+ext.w R0
+move R0,-(sp) 
+move.l #L78,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 550
+*line 551
+*line 552
+move #14,(sp)
+move.l #_bfs,-(sp)
+move 94+_wdbox,-(sp)
+add #6,(sp)
+move 92+_wdbox,-(sp)
+add #1,(sp)
+move 90+_wdbox,-(sp)
+move 88+_wdbox,-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+*line 553
+*line 554
+*line 555
+tst _curwhrv
+bge L79
+*line 555
+move #306,R0
+move _curwhrv,R1
+neg R1
+asl #7,R1
+ext.l R1
+divs #100,R1
+sub R1,R0
+move R0,_cyval
+*line 556
+bra L80
+L79:
+*line 557
+move #306,R0
+move _curwhrv,R1
+asl #7,R1
+ext.l R1
+divs #100,R1
+sub R1,R0
+move R0,_cyval
+L80:
+*line 558
+*line 559
+move #1,_wdupdfl
+bra L56
+*line 560
+bra L57
+L58:tst R0
+beq L59
+cmp #1,R0
+beq L63
+cmp #2,R0
+beq L71
+bra L57
+L57:L56:tst.l (sp)+
+movem.l (sp)+,R3-R7/R11-R13
+unlk R14
+rts
+.globl _wdcxupd
+.text
+_wdcxupd:
+~~wdcxupd:
+link R14,#-4
+*line 575
+move _wpntsv,R0
+bra L83
+*line 576
+L84:
+*line 577
+*line 578
+*line 579
+move _cxrate,R0
+add R0,_cxval
+*line 580
+*line 581
+*line 582
+cmp #510,_cxval
+ble L85
+*line 582
+move #510,_cxval
+bra L86
+L85:
+*line 583
+*line 584
+cmp #1,_cxval
+bge L87
+*line 584
+move #1,_cxval
+*line 585
+L87:L86:bra L81
+*line 586
+*line 587
+L88:
+*line 588
+*line 589
+*line 590
+*line 591
+cmp #8,_curwdth
+bne L81
+*line 592
+*line 593
+tst _cxrate
+bge L10030
+move _wxrate,R0
+neg R0
+bra L10032
+L10030:move _wxrate,R0
+L10032:add R0,_curwpnt
+*line 594
+*line 595
+*line 596
+cmp #254,_curwpnt
+blt L89
+*line 596
+move #253,_curwpnt
+bra L90
+L89:
+*line 597
+*line 598
+tst _curwpnt
+bge L91
+*line 598
+clr _curwpnt
+*line 599
+L91:L90:
+*line 600
+move _curwpnt,R0
+asl #1,R0
+add #2,R0
+move R0,_cxval
+*line 601
+*line 602
+*line 603
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L92
+*line 603
+clr (sp)
+jsr _vbank
+*line 604
+L92:
+*line 605
+move _curwpnt,(sp)
+move.l #L93,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 606
+*line 607
+move #14,(sp)
+move.l #_bfs,-(sp)
+move 78+_wdbox,-(sp)
+add #4,(sp)
+move 76+_wdbox,-(sp)
+move 74+_wdbox,-(sp)
+move 72+_wdbox,-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _vcputsv
+adda.l #18,sp
+bra L82
+L83:tst R0
+beq L84
+cmp #1,R0
+beq L88
+bra L82
+L82:L81:unlk R14
+rts
+.globl _wdnfld
+.text
+_wdnfld:
+~~wdnfld:
+~k=8
+link R14,#0
+movem.l R7-R7/R12-R13,-(sp)
+~hv=R13
+~ip=R12
+*line 627
+*line 627
+tst _astat
+beq L95
+*line 628
+*line 629
+*line 629
+jsr _whatbox
+tst R0
+beq L96
+*line 630
+*line 631
+move _curvce,R0
+muls #3938,R0
+move.l R0,R12
+add.l #_vbufs,R12
+*line 632
+tst _curwslt
+beq L10033
+move.l R12,R0
+add.l #3874,R0
+bra L10035
+L10033:move.l R12,R0
+add.l #2794,R0
+L10035:move.l R0,R13
+*line 633
+*line 634
+*line 634
+tst _hitbox
+bne L97
+*line 635
+*line 636
+move _wpntsv,R0
+bra L99
+*line 637
+L100:
+*line 638
+*line 639
+*line 640
+*line 640
+cmp #8,8(R14)
+bne L101
+*line 641
+*line 642
+*line 643
+sub #1,_curwdth
+bge L102
+*line 643
+move #8,_curwdth
+*line 644
+L102:
+*line 645
+move #4,(sp)
+jsr _wdswin
+*line 646
+clr R0
+bra L94
+*line 647
+bra L103
+L101:
+*line 648
+*line 648
+cmp #9,8(R14)
+bne L104
+*line 649
+*line 650
+*line 651
+add #1,_curwdth
+move _curwdth,R0
+cmp #8,R0
+ble L105
+*line 651
+clr _curwdth
+*line 652
+L105:
+*line 653
+move #4,(sp)
+jsr _wdswin
+*line 654
+clr R0
+bra L94
+*line 655
+*line 656
+L104:L103:
+*line 657
+move #-1,R0
+bra L94
+*line 658
+*line 659
+L106:
+*line 660
+*line 661
+*line 662
+*line 662
+cmp #8,8(R14)
+bne L107
+*line 663
+*line 664
+*line 665
+cmp #8,_curwdth
+bne L108
+*line 665
+move #-1,R0
+bra L94
+*line 666
+L108:
+*line 667
+*line 668
+sub #1,_curwdth
+bge L109
+*line 668
+move #7,_curwdth
+*line 669
+L109:
+*line 670
+move #4,(sp)
+jsr _wdswin
+*line 671
+clr R0
+bra L94
+*line 672
+bra L110
+L107:
+*line 673
+*line 673
+cmp #9,8(R14)
+bne L111
+*line 674
+*line 675
+*line 675
+cmp #8,_curwdth
+bne L112
+*line 676
+*line 677
+jsr _wdintp
+*line 678
+clr (sp)
+jsr _wdswin
+*line 679
+move #2,(sp)
+jsr _wdswin
+*line 680
+bra L113
+L112:
+*line 681
+*line 682
+add #1,_curwdth
+move _curwdth,R0
+cmp #8,R0
+blt L114
+*line 682
+clr _curwdth
+*line 683
+L114:L113:
+*line 684
+move #4,(sp)
+jsr _wdswin
+*line 685
+clr R0
+bra L94
+*line 686
+*line 687
+L111:L110:
+*line 688
+move #-1,R0
+bra L94
+*line 689
+*line 690
+L115:
+*line 691
+*line 692
+*line 693
+*line 693
+cmp #8,8(R14)
+bne L116
+*line 694
+*line 695
+*line 696
+move.l R13,R8
+move _curwhrm,R9
+add.l R9,R9
+add.l R9,R8
+tst (R8)
+ble L117
+*line 696
+move _curwhrm,R8
+add.l R8,R8
+move 0(R13,R8.l),R0
+neg R0
+move.l R13,R9
+move _curwhrm,R10
+add.l R10,R10
+add.l R10,R9
+move R0,(R9)
+*line 697
+bra L118
+L117:
+*line 698
+move #-1,R0
+bra L94
+L118:
+*line 699
+bra L119
+L116:
+*line 700
+*line 700
+cmp #9,8(R14)
+bne L120
+*line 701
+*line 702
+*line 703
+move.l R13,R8
+move _curwhrm,R9
+add.l R9,R9
+add.l R9,R8
+tst (R8)
+bge L121
+*line 703
+move _curwhrm,R8
+add.l R8,R8
+move 0(R13,R8.l),R0
+neg R0
+move.l R13,R9
+move _curwhrm,R10
+add.l R10,R10
+add.l R10,R9
+move R0,(R9)
+*line 704
+bra L122
+L121:
+*line 705
+move #-1,R0
+bra L94
+L122:
+*line 706
+bra L123
+L120:
+*line 707
+*line 708
+*line 709
+move #-1,R0
+bra L94
+L123:L119:
+*line 710
+*line 711
+*line 712
+move.l R13,R8
+move _curwhrm,R9
+add.l R9,R9
+add.l R9,R8
+move (R8),_curwhrv
+*line 713
+move _curwhrm,R8
+add.l R8,R8
+add.l #_vmtab,R8
+move _curwhrv,(R8)
+*line 714
+move _curwhrm,(sp)
+jsr _adj
+*line 715
+jsr _wscalc
+*line 716
+jsr _whupd
+*line 717
+clr (sp)
+jsr _wdswin
+*line 718
+move #4,(sp)
+jsr _wdswin
+*line 719
+move #5,(sp)
+jsr _wdswin
+*line 720
+clr R0
+bra L94
+bra L98
+L99:tst R0
+beq L100
+cmp #1,R0
+beq L106
+cmp #2,R0
+beq L115
+bra L98
+L98:
+*line 721
+*line 722
+bra L124
+L97:
+*line 723
+*line 724
+move #-1,R0
+bra L94
+L124:
+*line 725
+*line 726
+bra L125
+L96:
+*line 727
+*line 727
+cmp #1,_hitbox
+bne L126
+*line 728
+*line 729
+*line 729
+cmp #8,8(R14)
+bne L127
+*line 730
+*line 731
+*line 732
+move.l R13,R8
+move _curwhrm,R9
+add.l R9,R9
+add.l R9,R8
+tst (R8)
+ble L128
+*line 732
+move _curwhrm,R8
+add.l R8,R8
+move 0(R13,R8.l),R0
+neg R0
+move.l R13,R9
+move _curwhrm,R10
+add.l R10,R10
+add.l R10,R9
+move R0,(R9)
+*line 733
+bra L129
+L128:
+*line 734
+move #-1,R0
+bra L94
+L129:
+*line 735
+bra L130
+L127:
+*line 736
+*line 736
+cmp #9,8(R14)
+bne L131
+*line 737
+*line 738
+*line 739
+move.l R13,R8
+move _curwhrm,R9
+add.l R9,R9
+add.l R9,R8
+tst (R8)
+bge L132
+*line 739
+move _curwhrm,R8
+add.l R8,R8
+move 0(R13,R8.l),R0
+neg R0
+move.l R13,R9
+move _curwhrm,R10
+add.l R10,R10
+add.l R10,R9
+move R0,(R9)
+*line 740
+bra L133
+L132:
+*line 741
+move #-1,R0
+bra L94
+L133:
+*line 742
+bra L134
+L131:
+*line 743
+*line 744
+*line 745
+move #-1,R0
+bra L94
+L134:L130:
+*line 746
+*line 747
+*line 748
+move.l R13,R8
+move _curwhrm,R9
+add.l R9,R9
+add.l R9,R8
+move (R8),_curwhrv
+*line 749
+move _curwhrm,R8
+add.l R8,R8
+add.l #_vmtab,R8
+move _curwhrv,(R8)
+*line 750
+move _curwhrm,(sp)
+jsr _adj
+*line 751
+jsr _wscalc
+*line 752
+jsr _whupd
+*line 753
+clr (sp)
+jsr _wdswin
+*line 754
+move #4,(sp)
+jsr _wdswin
+*line 755
+move #5,(sp)
+jsr _wdswin
+*line 756
+clr R0
+bra L94
+*line 757
+*line 758
+L126:L125:
+*line 759
+move #-1,R0
+bra L94
+*line 760
+L95:L94:tst.l (sp)+
+movem.l (sp)+,R12-R13
+unlk R14
+rts
+.globl _wdxkey
+.text
+_wdxkey:
+~~wdxkey:
+link R14,#-4
+*line 775
+*line 776
+tst _astat
+bne L136
+*line 776
+move #-1,R0
+bra L135
+*line 777
+L136:
+*line 778
+move _cyval,R0
+ext.l R0
+divs #14,R0
+move R0,_stcrow
+*line 779
+move _cxval,R0
+asr #3,R0
+move R0,_stccol
+*line 781
+*line 781
+cmp #23,_stcrow
+bne L137
+*line 782
+*line 783
+*line 783
+cmp #2,_stccol
+bge L10036
+cmp #8,_stccol
+bgt L138
+L10036:*line 784
+*line 785
+jsr _clrws
+*line 786
+bra L139
+L138:
+*line 787
+*line 787
+cmp #38,_stccol
+blt L140
+cmp #42,_stccol
+bgt L140
+*line 788
+*line 789
+*line 790
+*line 791
+move #254,(sp)
+clr -(sp)
+tst _curwslt
+beq L10037
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,-(sp)
+add.l #3366,(sp)
+bra L10039
+L10037:move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,-(sp)
+add.l #3366,(sp)
+L10039:jsr _memsetw
+addq.l #6,sp
+*line 792
+*line 793
+clr _curwoff
+*line 794
+jsr _wsupd
+*line 795
+bra L141
+L140:
+*line 796
+*line 796
+cmp #51,_stccol
+blt L142
+cmp #58,_stccol
+bgt L142
+*line 797
+*line 798
+move #32,(sp)
+clr -(sp)
+move.l #_vmtab,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 799
+clr _curwhrv
+*line 800
+jsr _wadj
+*line 801
+jsr _wscalc
+*line 802
+jsr _whupd
+*line 803
+bra L143
+L142:
+*line 804
+*line 805
+*line 806
+move #-1,R0
+bra L135
+L143:L141:L139:
+*line 807
+*line 808
+*line 809
+move _curvce,R8
+add.l R8,R8
+add.l R8,R8
+move _curwslt,R9
+add.l R9,R9
+add.l R9,R8
+add.l #_wsnmod,R8
+move #1,(R8)
+*line 810
+jsr _wwins
+*line 811
+clr R0
+bra L135
+*line 812
+*line 813
+L137:
+*line 814
+move #-1,R0
+bra L135
+L135:unlk R14
+rts
+.globl _wdfield
+.text
+_wdfield:
+~~wdfield:
+link R14,#-4
+*line 828
+move #307,_curslim
+*line 830
+move.l #_wd_flds,(sp)
+jsr _curset
+L144:unlk R14
+rts
+.data
+L1:.dc.b $0
+L2:.dc.b $D0,$C1,$20,$20,$D0,$C3,$20,$20,$D0,$C5,$20,$20,$D0,$C7,$20,$20,$D0,$C9,$20,$20,$D1,$C1,$20,$20,$D1,$C3,$20,$20,$D1,$C5
+.dc.b $20,$20,$D1,$C7,$20,$20,$D1,$C9,$20,$20,$D2,$C1,$20,$20,$D2,$C3,$20,$20,$D2,$C5,$20,$20,$D2,$C7,$20,$20,$D2,$C9,$20,$20
+.dc.b $D3,$C1,$20,$20,$0
+L3:.dc.b $57,$61,$76,$65,$73,$68,$70,$65,$20,$20,$20,$20,$56,$6F,$69,$63,$65,$0
+L4:.dc.b $53,$74,$6F,$72,$65,$0
+L5:.dc.b $50,$6E,$74,$20,$20,$20,$20,$20,$4F,$66,$66,$73,$74,$0
+L6:.dc.b $48,$61,$72,$6D,$6F,$6E,$69,$63,$20,$23,$0
+L7:.dc.b $0
+L8:.dc.b $0
+L9:.dc.b $49,$6E,$73,$74,$72,$75,$6D,$65,$6E,$74,$20,$20,$20,$20,$53,$6C,$6F,$74,$0
+L10:.dc.b $46,$65,$74,$63,$68,$0
+L11:.dc.b $20,$20,$20,$20,$20,$20,$20,$20,$46,$69,$6E,$61,$6C,$0
+L12:.dc.b $56,$61,$6C,$75,$65,$0
+L69:.dc.b $25,$63,$25,$30,$34,$64,$0
+L78:.dc.b $25,$63,$25,$30,$33,$64,$0
+L93:.dc.b $25,$30,$33,$64,$0
Index: alcyon/wdselbx.s
===================================================================
--- alcyon/wdselbx.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/wdselbx.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,635 @@
+.globl _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.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 _curvce
+.globl _curwdth
+.globl _cursbox
+.globl _hitbox
+.globl _cxval
+.globl _cyval
+.globl _hitcx
+.globl _hitcy
+.globl _curwave
+.globl _curwfnl
+.globl _curwpnt
+.globl _curwoff
+.globl _curwhrm
+.globl _curwhrv
+.globl _curwslt
+.globl _wdupdfl
+.globl _wpntsv
+.globl _wplast
+.globl _wvlast
+.globl _lstwoff
+.globl _lstwpnt
+.globl _offsets
+.globl _vmtab
+.globl _wsbuf
+.globl _vknm
+.globl _wdbox
+.globl _wsnmod
+.globl _crate1
+.globl _crate2
+.globl _cratex
+.globl _cratey
+.globl _csbp
+.globl _curboxp
+.globl _vbufs
+.globl _wslib
+.globl _wdboxes
+.data
+_wdboxes:
+.dc.w $1
+.dc.w $1
+.dc.w $1FE
+.dc.w $133
+.dc.w $0
+*line 54
+.dc.l _wdfnbox
+.dc.w $1
+.dc.w $134
+.dc.w $1FE
+.dc.w $140
+.dc.w $1
+*line 55
+.dc.l _wdfnbox
+.dc.w $1
+.dc.w $142
+.dc.w $AE
+.dc.w $15C
+.dc.w $2
+*line 56
+.dc.l _enterit
+.dc.w $B0
+.dc.w $142
+.dc.w $E6
+.dc.w $15C
+.dc.w $3
+*line 57
+.dc.l _wdfnbox
+.dc.w $E8
+.dc.w $142
+.dc.w $18E
+.dc.w $15C
+.dc.w $4
+*line 58
+.dc.l _enterit
+.dc.w $190
+.dc.w $142
+.dc.w $1FE
+.dc.w $15C
+.dc.w $5
+*line 59
+.dc.l _enterit
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.l $0
+.globl _dsnewws
+.text
+_dsnewws:
+~~dsnewws:
+link R14,#-4
+*line 72
+clr (sp)
+jsr _wdswin
+*line 73
+move #2,(sp)
+jsr _wdswin
+*line 74
+move #4,(sp)
+jsr _wdswin
+*line 75
+move #5,(sp)
+jsr _wdswin
+L1:unlk R14
+rts
+.globl _newws
+.text
+_newws:
+~~newws:
+link R14,#0
+movem.l R6-R7/R13-R13,-(sp)
+~i=R7
+~ip=R13
+*line 92
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 94
+*line 94
+tst _curwslt
+beq L3
+*line 95
+*line 96
+clr R7
+bra L6
+L7:
+*line 97
+*line 98
+move.l R13,R8
+move R7,R9
+add.l R9,R9
+add.l R9,R8
+move 3366(R8),R0
+asr #5,R0
+move R7,R9
+add #1,R9
+add.l R9,R9
+add.l #_offsets,R9
+move R0,(R9)
+*line 99
+move.l R13,R8
+move R7,R9
+add.l R9,R9
+add.l R9,R8
+move 2858(R8),R0
+asr #5,R0
+move R7,R9
+add #1,R9
+add.l R9,R9
+add.l #_wsbuf,R9
+move R0,(R9)
+L5:
+*line 96
+add #1,R7
+L6:
+*line 96
+cmp #254,R7
+blt L7
+L4:
+*line 100
+*line 101
+*line 102
+move #32,(sp)
+move.l R13,-(sp)
+add.l #3874,(sp)
+move.l #_vmtab,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 103
+bra L8
+L3:
+*line 104
+*line 105
+*line 106
+clr R7
+bra L11
+L12:
+*line 107
+*line 108
+move.l R13,R8
+move R7,R9
+add.l R9,R9
+add.l R9,R8
+move 2286(R8),R0
+asr #5,R0
+move R7,R9
+add #1,R9
+add.l R9,R9
+add.l #_offsets,R9
+move R0,(R9)
+*line 109
+move.l R13,R8
+move R7,R9
+add.l R9,R9
+add.l R9,R8
+move 1778(R8),R0
+asr #5,R0
+move R7,R9
+add #1,R9
+add.l R9,R9
+add.l #_wsbuf,R9
+move R0,(R9)
+L10:
+*line 106
+add #1,R7
+L11:
+*line 106
+cmp #254,R7
+blt L12
+L9:
+*line 110
+*line 111
+*line 112
+move #32,(sp)
+move.l R13,-(sp)
+add.l #2794,(sp)
+move.l #_vmtab,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+L8:
+*line 115
+move 2+_offsets,_offsets
+*line 116
+move 2+_wsbuf,_wsbuf
+*line 118
+move _curwhrm,R8
+add.l R8,R8
+add.l #_vmtab,R8
+move (R8),_curwhrv
+*line 119
+move _curwpnt,R8
+add #1,R8
+add.l R8,R8
+move.l #_offsets,R9
+move 0(R8,R9.l),R0
+move R0,_curwoff
+move R0,_wvlast
+move R0,_lstwoff
+*line 120
+move _curwpnt,R8
+add #1,R8
+add.l R8,R8
+add.l #_wsbuf,R8
+move (R8),_curwfnl
+*line 121
+move _curwpnt,R0
+move R0,_wplast
+move R0,_lstwpnt
+*line 123
+move #16384,(sp)
+clr -(sp)
+move.l #_vknm,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 124
+jsr _wadj
+L2:tst.l (sp)+
+movem.l (sp)+,R7-R7/R13-R13
+unlk R14
+rts
+.globl _wdfnbox
+.text
+_wdfnbox:
+~~wdfnbox:
+~n=8
+link R14,#0
+movem.l R5-R7/R13-R13,-(sp)
+~wval=R7
+~wsgn=R6
+~fpuws=R13
+*line 144
+move 8(R14),R0
+bra L15
+*line 145
+L16:
+*line 146
+*line 147
+*line 148
+move _wpntsv,R0
+bra L18
+*line 149
+L19:
+*line 150
+*line 151
+*line 152
+move #1,_wpntsv
+*line 153
+move _cxval,R0
+sub #2,R0
+ext.l R0
+divs #2,R0
+move R0,_curwpnt
+*line 154
+*line 155
+*line 156
+cmp #254,_curwpnt
+blt L20
+*line 156
+move #253,_curwpnt
+bra L21
+L20:
+*line 157
+*line 158
+tst _curwpnt
+bge L22
+*line 158
+clr _curwpnt
+*line 159
+L22:L21:
+*line 160
+move.l #_crate2,_cratex
+*line 161
+move.l #_crate2,_cratey
+*line 162
+jsr _newws
+*line 163
+move #133,R0
+move _curwoff,R1
+ext.l R1
+divs #8,R1
+sub R1,R0
+move R0,_cyval
+*line 164
+move _curwpnt,R0
+asl #1,R0
+add #2,R0
+move R0,_cxval
+*line 165
+move #13,(sp)
+jsr _arcurs
+*line 166
+move _cyval,(sp)
+move _cxval,-(sp)
+jsr _gcurpos
+addq.l #2,sp
+*line 167
+move _curwpnt,_wplast
+*line 168
+move _curwoff,_wvlast
+*line 169
+move #4,(sp)
+jsr _wdswin
+bra L17
+*line 170
+*line 171
+*line 172
+L23:
+*line 173
+*line 174
+*line 175
+clr _wpntsv
+*line 176
+move.l #_crate1,_cratex
+*line 177
+move.l #_crate1,_cratey
+*line 178
+*line 179
+move #1,(sp)
+jsr _arcurs
+*line 180
+move _cyval,(sp)
+move _cxval,-(sp)
+jsr _gcurpos
+addq.l #2,sp
+bra L17
+*line 181
+*line 182
+L24:
+*line 183
+*line 184
+*line 185
+clr _wpntsv
+*line 186
+move.l #_crate1,_cratex
+*line 187
+move.l #_crate1,_cratey
+*line 188
+*line 189
+move #1,(sp)
+jsr _arcurs
+*line 190
+move _curwhrm,R0
+asl #1,R0
+move R0,(sp)
+add #1,(sp)
+move #22,-(sp)
+jsr _settc
+addq.l #2,sp
+bra L17
+*line 191
+bra L17
+L18:tst R0
+beq L19
+cmp #1,R0
+beq L23
+cmp #2,R0
+beq L24
+bra L17
+L17:
+*line 192
+*line 193
+*line 194
+move #1,R0
+bra L13
+*line 195
+L25:
+*line 196
+*line 197
+*line 198
+move #2,_wpntsv
+*line 199
+move.l #_crate1,_cratex
+*line 200
+move.l #_crate1,_cratey
+*line 201
+*line 202
+move _cxval,R0
+asr #4,R0
+move R0,_curwhrm
+*line 203
+move _curwhrm,R8
+add.l R8,R8
+add.l #_vmtab,R8
+move (R8),_curwhrv
+*line 204
+*line 205
+move _curwhrm,R0
+asl #4,R0
+add #8,R0
+move R0,_cxval
+*line 206
+*line 207
+*line 207
+tst _curwhrv
+bge L26
+*line 208
+*line 209
+move #306,R0
+move _curwhrv,R1
+neg R1
+asl #7,R1
+ext.l R1
+divs #100,R1
+sub R1,R0
+move R0,_cyval
+*line 210
+bra L27
+L26:
+*line 211
+*line 212
+*line 213
+move #306,R0
+move _curwhrv,R1
+asl #7,R1
+ext.l R1
+divs #100,R1
+sub R1,R0
+move R0,_cyval
+L27:
+*line 214
+*line 215
+*line 216
+move #13,(sp)
+jsr _arcurs
+*line 217
+move _cyval,(sp)
+move _cxval,-(sp)
+jsr _gcurpos
+addq.l #2,sp
+*line 218
+move #5,(sp)
+jsr _wdswin
+*line 219
+move #1,R0
+bra L13
+*line 220
+*line 221
+L28:
+*line 222
+*line 223
+*line 224
+move _curvce,R8
+add.l R8,R8
+add.l R8,R8
+move _curwslt,R9
+add.l R9,R9
+add.l R9,R8
+add.l #_wsnmod,R8
+clr (R8)
+*line 225
+*line 226
+*line 226
+cmp #336,_cyval
+bge L29
+*line 227
+*line 228
+*line 229
+*line 230
+*line 231
+move #540,(sp)
+tst _curwslt
+beq L10000
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,-(sp)
+add.l #2858,(sp)
+bra L10002
+L10000:move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,-(sp)
+add.l #1778,(sp)
+L10002:move _curwave,R0
+muls #1080,R0
+add.l #_wslib,R0
+move.l R0,-(sp)
+jsr _memcpyw
+addq.l #8,sp
+*line 232
+*line 233
+move #2,(sp)
+jsr _wdswin
+*line 234
+bra L30
+L29:
+*line 235
+*line 236
+*line 237
+*line 238
+*line 239
+*line 240
+move #540,(sp)
+move _curwave,R0
+muls #1080,R0
+add.l #_wslib,R0
+move.l R0,-(sp)
+tst _curwslt
+beq L10003
+move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,-(sp)
+add.l #2858,(sp)
+bra L10005
+L10003:move _curvce,R0
+muls #3938,R0
+add.l #_vbufs,R0
+move.l R0,-(sp)
+add.l #1778,(sp)
+L10005:jsr _memcpyw
+addq.l #8,sp
+*line 241
+*line 242
+jsr _updfpu
+*line 243
+jsr _newws
+*line 244
+jsr _dsnewws
+L30:
+*line 245
+*line 246
+*line 247
+move.l #_crate1,_cratex
+*line 248
+move.l #_crate1,_cratey
+*line 249
+move #1,R0
+bra L13
+*line 250
+L31:
+*line 251
+*line 252
+*line 253
+move.l #_crate1,_cratex
+*line 254
+move.l #_crate1,_cratey
+*line 255
+clr R0
+bra L13
+bra L14
+L15:tst R0
+beq L16
+cmp #1,R0
+beq L25
+cmp #3,R0
+beq L28
+bra L31
+L14:L13:tst.l (sp)+
+movem.l (sp)+,R6-R7/R13-R13
+unlk R14
+rts
+.data
Index: alcyon/wheel.s
===================================================================
--- alcyon/wheel.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/wheel.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,2355 @@
+.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 _ebflag
+.globl _ebuf
+.globl _curfet
+.globl _cfetp
+.globl _infetp
+.globl _timers
+.globl _M_error
+.comm _M_error,2
+.globl _M_state
+.comm _M_state,2
+.globl _M_oldbs
+.comm _M_oldbs,2
+.globl _M_strng
+.comm _M_strng,32
+.globl _msctrl
+.comm _msctrl,2
+.globl _msflag
+.comm _msflag,2
+.globl _msrtag
+.comm _msrtag,2
+.globl _msxres
+.comm _msxres,2
+.globl _msyres
+.comm _msyres,2
+.globl _msxmov
+.comm _msxmov,2
+.globl _msymov
+.comm _msymov,2
+.globl _msxdiv
+.comm _msxdiv,2
+.globl _msydiv
+.comm _msydiv,2
+.globl _tkboth
+.comm _tkboth,2
+.globl _txdiv
+.comm _txdiv,2
+.globl _tydiv
+.comm _tydiv,2
+.globl _tkxdvr
+.data
+_tkxdvr:
+.dc.w $4
+.globl _tkydvr
+.data
+_tkydvr:
+.dc.w $6
+.globl _tkhdvr
+.data
+_tkhdvr:
+.dc.w $6
+.globl _tkvdvr
+.data
+_tkvdvr:
+.dc.w $6
+.globl _msxgdv
+.data
+_msxgdv:
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.globl _msygdv
+.data
+_msygdv:
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.globl _curmove
+.globl _cx_upd
+.globl _cy_upd
+.globl _xy_dn
+.globl _xy_up
+.globl _e_key
+.globl _m_key
+.globl _x_key
+.globl _asig
+.globl _astat
+.globl _aval
+.globl _chtime
+.globl _chwait
+.globl _clkctl
+.globl _clkrun
+.globl _cmfirst
+.globl _cmtype
+.globl _ctrsw
+.globl _curhold
+.globl _cvtime
+.globl _cvwait
+.globl _cxrate
+.globl _cxval
+.globl _cyrate
+.globl _cyval
+.globl _msctrl
+.globl _msflag
+.globl _msxdiv
+.globl _msydiv
+.globl _nchwait
+.globl _ncvwait
+.globl _ndisp
+.globl _ss_ptsw
+.globl _ss_sqsw
+.globl _stccol
+.globl _stcrow
+.globl _swback
+.globl _swctrl
+.globl _swdelta
+.globl _swdir
+.globl _swfiin
+.globl _swflag
+.globl _swlast
+.globl _swndx
+.globl _swstop
+.globl _swthr
+.globl _swtime
+.globl _swwait
+.globl _tkback
+.globl _tkctrl
+.globl _tkrmin
+.globl _tkthr
+.globl _tktime
+.globl _tkwait
+.globl _trkball
+.globl _txfiin
+.globl _txflag
+.globl _txlast
+.globl _tyfiin
+.globl _tyflag
+.globl _tylast
+.globl _txstop
+.globl _tystop
+.globl _vtccol
+.globl _vtcrow
+.globl _vtpcol
+.globl _vtprow
+.globl _xkstat
+.globl _ykstat
+.globl _swcount
+.globl _swrate
+.globl _swrmin
+.globl _swtemp
+.globl _cratex
+.globl _cratey
+.globl _sigtab
+.globl _swfifo
+.globl _txfifo
+.globl _tyfifo
+.globl _swrtab
+.data
+_swrtab:
+.dc.l $0
+.dc.l $800
+.dc.l $1000
+.dc.l $1800
+.dc.l $2000
+.dc.l $2800
+.dc.l $3000
+.dc.l $3800
+.dc.l $4000
+.dc.l $4800
+.dc.l $5000
+.dc.l $5800
+.dc.l $6000
+.dc.l $6800
+.dc.l $7000
+.dc.l $7800
+.dc.l $8000
+.dc.l $8800
+.dc.l $9000
+.dc.l $9800
+.dc.l $A000
+.dc.l $A800
+.dc.l $B000
+.dc.l $B800
+.dc.l $C000
+.dc.l $C800
+.dc.l $D000
+.dc.l $D800
+.dc.l $E000
+.dc.l $E800
+.dc.l $F000
+.dc.l $F800
+.dc.l $10000
+.dc.l $10800
+.dc.l $11000
+.dc.l $11800
+.dc.l $12000
+.dc.l $12800
+.dc.l $13000
+.dc.l $13800
+.dc.l $14000
+.dc.l $14800
+.dc.l $15000
+.dc.l $15800
+.dc.l $16000
+.dc.l $16800
+.dc.l $17000
+.dc.l $17800
+.dc.l $18000
+.dc.l $18800
+.dc.l $19000
+.dc.l $19800
+.dc.l $1A000
+.dc.l $1A800
+.dc.l $1B000
+.dc.l $1B800
+.dc.l $1C000
+.dc.l $1C800
+.dc.l $1D000
+.dc.l $1D800
+.dc.l $1E000
+.dc.l $1E800
+.dc.l $1F000
+.dc.l $1F800
+.dc.l $20000
+.dc.l $20800
+.dc.l $21000
+.dc.l $21800
+.dc.l $22000
+.dc.l $22800
+.dc.l $23000
+.dc.l $23800
+.dc.l $24000
+.dc.l $24800
+.dc.l $25000
+.dc.l $25800
+.dc.l $26000
+.dc.l $26800
+.dc.l $27000
+.dc.l $27800
+.dc.l $28000
+.dc.l $28800
+.dc.l $29000
+.dc.l $29800
+.dc.l $2A000
+.dc.l $2A800
+.dc.l $2B000
+.dc.l $2B800
+.dc.l $2C000
+.dc.l $2C800
+.dc.l $2D000
+.dc.l $2D800
+.dc.l $2E000
+.dc.l $2E800
+.dc.l $2F000
+.dc.l $2F800
+.dc.l $30000
+.dc.l $30800
+.dc.l $31000
+.dc.l $31800
+.dc.l $32000
+.dc.l $32800
+.dc.l $33000
+.dc.l $33800
+.dc.l $34000
+.dc.l $34800
+.dc.l $35000
+.dc.l $35800
+.dc.l $36000
+.dc.l $36800
+.dc.l $37000
+.dc.l $37800
+.dc.l $38000
+.dc.l $38800
+.dc.l $39000
+.dc.l $39800
+.dc.l $3A000
+.dc.l $3A800
+.dc.l $3B000
+.dc.l $3B800
+.dc.l $3C000
+.dc.l $3C800
+.dc.l $3D000
+.dc.l $3D800
+.dc.l $3E000
+.dc.l $3E800
+.dc.l $3F000
+.dc.l $3F800
+.globl _MouseRT
+.text
+_MouseRT:
+~~MouseRT:
+~t=8
+link R14,#-6
+~oldi=-2
+*line 238
+move #4,(sp)
+jsr _setipl
+move R0,-2(R14)
+*line 240
+move 8(R14),10+_timers
+*line 242
+move -2(R14),(sp)
+jsr _setipl
+L1:unlk R14
+rts
+.globl _MouseRD
+.text
+_MouseRD:
+~~MouseRD:
+~str=8
+~nc=12
+~nt=14
+link R14,#-8
+~tc=-4
+*line 265
+move 14(R14),R0
+muls #500,R0
+move.l R0,-4(R14)
+*line 267
+bra L5
+L4:
+*line 268
+*line 269
+*line 269
+clr (sp)
+move #1,-(sp)
+jsr _trap13
+addq.l #2,sp
+tst.l R0
+beq L6
+*line 270
+*line 271
+move.l 8(R14),-(sp)
+clr -(sp)
+move #2,-(sp)
+jsr _trap13
+addq.l #4,sp
+ext.w R0
+move.l (sp)+,R8
+move.b R0,(R8)
+add.l #1,8(R14)
+*line 272
+move.l 8(R14),R8
+clr.b (R8)
+*line 273
+sub #1,12(R14)
+*line 274
+bra L7
+L6:
+*line 275
+*line 276
+*line 277
+*line 278
+move.l -4(R14),R0
+sub.l #$1,-4(R14)
+tst.l R0
+bgt L8
+*line 278
+move #-1,R0
+bra L2
+L8:L7:
+*line 279
+L5:
+*line 280
+tst 12(R14)
+bgt L4
+L3:
+*line 282
+clr R0
+bra L2
+L2:unlk R14
+rts
+.globl _MouseWR
+.text
+_MouseWR:
+~~MouseWR:
+~str=8
+link R14,#0
+movem.l R6-R7,-(sp)
+~c=R7
+*line 301
+bra L12
+L11:
+*line 302
+move R7,(sp)
+clr -(sp)
+move #3,-(sp)
+jsr _trap13
+addq.l #4,sp
+L12:
+*line 302
+move.l 8(R14),R8
+move.b (R8),R0
+ext.w R0
+move R0,R7
+and #255,R7
+clr R0
+move R7,R0
+add.l #1,8(R14)
+tst R0
+bne L11
+L10:L9:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _MouseFL
+.text
+_MouseFL:
+~~MouseFL:
+~tc=8
+link R14,#-8
+~flushed=-4
+*line 320
+clr.l -4(R14)
+*line 322
+clr _M_state
+*line 323
+clr _msflag
+*line 324
+clr _msctrl
+*line 326
+bra L16
+L15:
+*line 327
+*line 328
+clr (sp)
+move #2,-(sp)
+jsr _trap13
+addq.l #2,sp
+*line 329
+add.l #$1,-4(R14)
+*line 330
+*line 331
+*line 331
+sub #1,8(R14)
+bgt L17
+*line 332
+*line 336
+*line 337
+*line 338
+move #-1,R0
+bra L13
+*line 339
+L17:L16:
+*line 340
+clr (sp)
+move #1,-(sp)
+jsr _trap13
+addq.l #2,sp
+tst.l R0
+bne L15
+L14:
+*line 347
+clr R0
+bra L13
+L13:unlk R14
+rts
+.globl _MouseWK
+.text
+_MouseWK:
+~~MouseWK:
+link R14,#-6
+~tries=-2
+*line 364
+clr _M_error
+*line 365
+clr _M_oldbs
+*line 366
+clr _M_state
+*line 370
+move #192,(sp)
+move #70,-(sp)
+move #-1,-(sp)
+clr -(sp)
+clr -(sp)
+move #1,-(sp)
+jsr _trap14
+adda.l #10,sp
+*line 372
+*line 372
+move #1024,(sp)
+jsr _MouseFL
+tst R0
+beq L19
+*line 373
+*line 374
+move #1,_M_error
+*line 375
+*line 379
+*line 380
+*line 381
+move #-1,R0
+bra L18
+*line 382
+*line 383
+L19:
+*line 384
+clr -2(R14)
+bra L22
+L23:
+*line 385
+*line 386
+move.l #L24,(sp)
+jsr _MouseWR
+*line 387
+*line 388
+*line 388
+move #2,(sp)
+move #2,-(sp)
+move.l #_M_strng,-(sp)
+jsr _MouseRD
+addq.l #6,sp
+tst R0
+beq L25
+*line 389
+*line 390
+move #3,_M_error
+*line 391
+bra L26
+L25:
+*line 392
+*line 392
+move.l #_M_strng,(sp)
+move.l #L27,-(sp)
+jsr _strcmp
+addq.l #4,sp
+tst R0
+beq L28
+*line 393
+*line 394
+move #4,_M_error
+*line 395
+*line 396
+*line 397
+move #1024,(sp)
+jsr _MouseFL
+tst R0
+beq L29
+*line 397
+move #1,_M_error
+*line 398
+L29:bra L30
+L28:
+*line 399
+*line 400
+*line 401
+clr _M_error
+*line 402
+move #2000,(sp)
+jsr _MouseRT
+*line 403
+*line 407
+*line 408
+clr R0
+bra L18
+L30:L26:
+*line 409
+L21:
+*line 384
+add #1,-2(R14)
+L22:
+*line 384
+cmp #10,-2(R14)
+blt L23
+L20:
+*line 417
+move #-1,R0
+bra L18
+L18:unlk R14
+rts
+.globl _MouseEX
+.text
+_MouseEX:
+~~MouseEX:
+~str=8
+link R14,#-10
+~oldi=-2
+~msc=-4
+~mst=-6
+*line 441
+clr _M_error
+*line 443
+*line 443
+move.l 8(R14),R8
+btst #6,(R8)
+bne L32
+*line 444
+*line 445
+*line 446
+move #1024,(sp)
+jsr _MouseFL
+tst R0
+beq L33
+*line 446
+move #1,_M_error
+*line 447
+bra L34
+L33:
+*line 448
+move #2,_M_error
+L34:
+*line 449
+*line 450
+clr _M_state
+*line 451
+move #2000,(sp)
+jsr _MouseRT
+*line 452
+*line 456
+*line 457
+bra L31
+*line 458
+*line 459
+*line 460
+L32:
+*line 461
+move.l 8(R14),R8
+move.b (R8),R0
+ext.w R0
+and #48,R0
+move R0,-6(R14)
+*line 462
+move _M_oldbs,R0
+clr R1
+move -6(R14),R1
+eor R1,R0
+move R0,-4(R14)
+*line 463
+move -6(R14),_M_oldbs
+*line 465
+*line 465
+tst -4(R14)
+beq L35
+*line 466
+*line 467
+*line 467
+btst #4,-3(R14)
+beq L36
+*line 468
+*line 469
+clr R0
+move -6(R14),R0
+and #16,R0
+lsr #4,R0
+move R0,_astat
+*line 470
+move.l _m_key,R8
+jsr (R8)
+*line 471
+*line 472
+L36:
+*line 473
+*line 473
+btst #5,-3(R14)
+beq L37
+*line 474
+*line 475
+clr R0
+move -6(R14),R0
+and #32,R0
+lsr #5,R0
+move R0,_astat
+*line 476
+move.l _e_key,R8
+jsr (R8)
+*line 477
+L37:
+*line 478
+*line 479
+L35:
+*line 480
+*line 480
+tst _ss_ptsw
+bne L10000
+tst _ss_sqsw
+beq L38
+L10000:*line 481
+*line 482
+clr _cxrate
+*line 483
+clr _cyrate
+bra L31
+*line 484
+*line 485
+*line 486
+*line 487
+*line 488
+*line 489
+L38:
+*line 490
+move.l 8(R14),R8
+move.b 1(R8),R0
+ext.w R0
+move.l 8(R14),R9
+move.b (R9),R1
+ext.w R1
+and #3,R1
+asl #6,R1
+or R1,R0
+move R0,_msxmov
+*line 492
+*line 493
+btst #7,1+_msxmov
+beq L39
+*line 493
+or #-128,_msxmov
+*line 494
+L39:
+*line 495
+move _msxres,R0
+add R0,_msxmov
+*line 497
+move.l 8(R14),R8
+move.b 2(R8),R0
+ext.w R0
+move.l 8(R14),R9
+move.b (R9),R1
+ext.w R1
+and #12,R1
+asl #4,R1
+add R1,R0
+move R0,_msymov
+*line 499
+*line 500
+btst #7,1+_msymov
+beq L40
+*line 500
+or #-128,_msymov
+*line 501
+L40:
+*line 502
+move _msyres,R0
+add R0,_msymov
+*line 504
+move _ndisp,R8
+add #1,R8
+add.l R8,R8
+add.l #_msxgdv,R8
+move (R8),_msxdiv
+*line 505
+move _ndisp,R8
+add #1,R8
+add.l R8,R8
+add.l #_msygdv,R8
+move (R8),_msydiv
+*line 509
+*line 510
+cmp #1,_msxdiv
+ble L41
+*line 510
+move _msxmov,R0
+ext.l R0
+divs _msxdiv,R0
+move R0,_cxrate
+*line 511
+bra L42
+L41:
+*line 512
+move _msxmov,_cxrate
+L42:
+*line 514
+*line 515
+cmp #1,_msydiv
+ble L43
+*line 515
+move _msymov,R0
+ext.l R0
+divs _msydiv,R0
+move R0,_cyrate
+*line 516
+bra L44
+L43:
+*line 517
+move _msymov,_cyrate
+L44:
+*line 521
+*line 522
+cmp #1,_msxdiv
+ble L45
+*line 522
+move _msxmov,R0
+ext.l R0
+divs _msxdiv,R0
+swap R0
+move R0,_msxres
+*line 523
+bra L46
+L45:
+*line 524
+clr _msxres
+L46:
+*line 526
+*line 527
+cmp #1,_msydiv
+ble L47
+*line 527
+move _msymov,R0
+ext.l R0
+divs _msydiv,R0
+swap R0
+move R0,_msyres
+*line 528
+bra L48
+L47:
+*line 529
+clr _msyres
+L48:
+*line 534
+*line 535
+tst _cxrate
+bne L10001
+tst _cyrate
+beq L31
+L10001:*line 536
+*line 537
+move #1,_msctrl
+*line 538
+clr _cmfirst
+*line 539
+clr _trkball
+*line 541
+clr _cvtime
+*line 542
+clr _ncvwait
+*line 543
+clr _chtime
+*line 544
+clr _nchwait
+*line 545
+clr _curhold
+*line 547
+*line 548
+tst _msflag
+bne L49
+*line 548
+move.l _xy_dn,R8
+jsr (R8)
+*line 549
+L49:
+*line 550
+move #4,(sp)
+jsr _setipl
+move R0,-2(R14)
+*line 551
+move #125,8+_timers
+*line 552
+move -2(R14),(sp)
+jsr _setipl
+*line 554
+move #1,_msflag
+L31:unlk R14
+rts
+.globl _MouseIN
+.text
+_MouseIN:
+~~MouseIN:
+~c=8
+link R14,#-4
+*line 569
+and #255,8(R14)
+*line 576
+*line 576
+tst _M_state
+blt L51
+cmp #3,_M_state
+bge L51
+*line 577
+*line 578
+move 8(R14),R0
+move.l #_M_strng,R9
+move _M_state,R10
+add.l R10,R9
+move.b R0,(R9)
+*line 579
+*line 580
+*line 580
+cmp #2,_M_state
+bne L52
+*line 581
+*line 582
+move.l #_M_strng,(sp)
+jsr _MouseEX
+*line 583
+clr _M_state
+*line 584
+bra L53
+L52:
+*line 585
+*line 586
+*line 587
+add #1,_M_state
+L53:
+*line 588
+*line 589
+L51:L50:unlk R14
+rts
+.globl _wheel
+.text
+_wheel:
+~~wheel:
+link R14,#0
+movem.l R5-R7,-(sp)
+~i=R7
+~oldi=R6
+*line 658
+*line 658
+tst _astat
+beq L55
+*line 659
+*line 660
+*line 660
+tst _swflag
+bne L56
+*line 661
+*line 662
+*line 663
+*line 664
+move #1,_swflag
+*line 665
+clr _swctrl
+*line 666
+clr _swfiin
+*line 667
+move _aval,_swlast
+*line 668
+move _swwait,_swstop
+*line 669
+clr.l _swcount
+*line 670
+*line 671
+clr R7
+bra L59
+L60:
+*line 672
+move R7,R8
+add.l R8,R8
+add.l #_swfifo,R8
+move _aval,(R8)
+L58:
+*line 671
+add #1,R7
+L59:
+*line 671
+cmp #100,R7
+blt L60
+L57:
+*line 672
+*line 673
+*line 674
+bra L61
+L56:
+*line 675
+*line 676
+*line 677
+*line 677
+tst _swstop
+bne L62
+*line 678
+*line 679
+move _swlast,R0
+sub _aval,R0
+move R0,_swdelta
+*line 680
+*line 681
+*line 681
+move _swdelta,R0
+cmp _swthr,R0
+blt L63
+*line 682
+*line 683
+*line 684
+*line 685
+cmp #6,_clkctl
+beq L10002
+cmp #6,_clkctl
+beq L64
+tst _clkrun
+bne L64
+L10002:*line 686
+*line 687
+*line 688
+*line 689
+move _swdelta,R0
+ext.l R0
+divs _swthr,R0
+ext.l R0
+move.l R0,_swtemp
+*line 690
+move #4,(sp)
+jsr _setipl
+move R0,R6
+*line 691
+move.l _swtemp,R0
+add.l R0,_fc_val
+*line 692
+*line 693
+*line 694
+move.l _fc_val,R0
+cmp.l #$ffffff,R0
+blt L65
+*line 694
+move.l #$ffffff,_fc_val
+*line 695
+L65:
+*line 696
+move R6,(sp)
+jsr _setipl
+*line 697
+move _aval,_swlast
+*line 698
+*line 699
+L64:bra L66
+L63:
+*line 700
+*line 700
+tst _swdelta
+bge L10003
+move _swdelta,R0
+neg R0
+bra L10005
+L10003:move _swdelta,R0
+L10005:move R0,_swdelta
+cmp _swthr,R0
+blt L67
+*line 701
+*line 702
+*line 703
+*line 704
+cmp #6,_clkctl
+beq L10006
+cmp #6,_clkctl
+beq L68
+tst _clkrun
+bne L68
+L10006:*line 705
+*line 706
+*line 707
+*line 708
+move _swdelta,R0
+ext.l R0
+divs _swthr,R0
+ext.l R0
+move.l R0,_swtemp
+*line 709
+move #4,(sp)
+jsr _setipl
+move R0,R6
+*line 710
+move.l _swtemp,R0
+sub.l R0,_fc_val
+*line 711
+*line 712
+*line 713
+tst.l _fc_val
+bge L69
+*line 713
+clr.l _fc_val
+*line 714
+L69:
+*line 715
+move R6,(sp)
+jsr _setipl
+*line 716
+move _aval,_swlast
+*line 717
+L68:
+*line 718
+*line 719
+L67:L66:bra L70
+L62:
+*line 720
+*line 721
+*line 722
+move _aval,_swlast
+*line 723
+sub #1,_swstop
+L70:
+*line 724
+L61:
+*line 725
+*line 726
+*line 727
+bra L71
+L55:
+*line 728
+*line 729
+*line 730
+move _aval,_swlast
+*line 731
+clr _swflag
+*line 732
+clr _swctrl
+*line 733
+*line 734
+*line 735
+*line 736
+cmp #6,_clkctl
+beq L10007
+cmp #6,_clkctl
+beq L72
+tst _clkrun
+bne L72
+L10007:*line 737
+*line 738
+move _swfiin,R0
+sub _swback,R0
+move R0,_swndx
+*line 739
+*line 740
+*line 741
+tst _swndx
+bge L73
+*line 741
+add #100,_swndx
+*line 742
+L73:
+*line 743
+move _swndx,R8
+add.l R8,R8
+move.l #_swfifo,R9
+move 0(R8,R9.l),R0
+sub _swlast,R0
+ext.l R0
+move.l R0,_swrate
+*line 744
+*line 745
+*line 745
+move.l _swrate,R0
+cmp.l _swrmin,R0
+ble L74
+*line 746
+*line 747
+clr _swdir
+*line 748
+move.l _swrate,R8
+sub.l _swrmin,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_swrtab,R8
+move.l (R8),_swrate
+*line 749
+move #1,_swctrl
+*line 750
+bra L75
+L74:
+*line 751
+*line 751
+tst.l _swrate
+bge L10008
+move.l _swrate,R0
+neg.l R0
+bra L10010
+L10008:move.l _swrate,R0
+L10010:move.l R0,_swrate
+cmp.l _swrmin,R0
+ble L76
+*line 752
+*line 753
+move #1,_swdir
+*line 754
+move.l _swrate,R8
+sub.l _swrmin,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_swrtab,R8
+move.l (R8),_swrate
+*line 755
+move #1,_swctrl
+*line 756
+bra L77
+L76:
+*line 757
+*line 758
+*line 759
+clr.l _swrate
+L77:L75:
+*line 760
+*line 761
+L72:L71:L54:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _txyup
+.text
+_txyup:
+~~txyup:
+link R14,#0
+movem.l R3-R7,-(sp)
+~txndx=R7
+~tyndx=R6
+~txrate=R5
+~tyrate=R4
+*line 783
+clr _tkboth
+*line 785
+clr _txdiv
+*line 786
+clr _tydiv
+*line 788
+*line 789
+move _txfiin,R7
+sub _tkback,R7
+bge L79
+*line 789
+add #100,R7
+*line 790
+L79:
+*line 791
+move R7,R8
+add.l R8,R8
+add.l #_txfifo,R8
+move (R8),R5
+sub _txlast,R5
+*line 798
+*line 799
+cmp _tkrmin,R5
+blt L80
+*line 799
+move.l _cratex,R8
+move R5,R9
+sub _tkrmin,R9
+add.l R9,R9
+move 0(R8,R9.l),R0
+neg R0
+move R0,_cxrate
+bra L81
+L80:
+*line 800
+*line 801
+tst R5
+bge L10011
+move R5,R0
+neg R0
+bra L10013
+L10011:move R5,R0
+L10013:move R0,R5
+move R5,R0
+cmp _tkrmin,R0
+blt L82
+*line 801
+move R5,R8
+sub _tkrmin,R8
+add.l R8,R8
+add.l _cratex,R8
+move (R8),_cxrate
+*line 802
+bra L83
+L82:
+*line 803
+clr _cxrate
+L83:L81:
+*line 807
+*line 808
+move _tyfiin,R6
+sub _tkback,R6
+bge L84
+*line 808
+add #100,R6
+*line 809
+L84:
+*line 810
+move R6,R8
+add.l R8,R8
+add.l #_tyfifo,R8
+move (R8),R4
+sub _tylast,R4
+*line 817
+*line 818
+cmp _tkrmin,R4
+blt L85
+*line 818
+move R4,R8
+sub _tkrmin,R8
+add.l R8,R8
+add.l _cratey,R8
+move (R8),_cyrate
+bra L86
+L85:
+*line 819
+*line 820
+tst R4
+bge L10014
+move R4,R0
+neg R0
+bra L10016
+L10014:move R4,R0
+L10016:move R0,R4
+move R4,R0
+cmp _tkrmin,R0
+blt L87
+*line 820
+move.l _cratey,R8
+move R4,R9
+sub _tkrmin,R9
+add.l R9,R9
+move 0(R8,R9.l),R0
+neg R0
+move R0,_cyrate
+*line 821
+bra L88
+L87:
+*line 822
+clr _cyrate
+L88:L86:
+*line 824
+*line 824
+tst _cxrate
+bne L89
+tst _cyrate
+bne L89
+*line 825
+*line 826
+clr _tkctrl
+*line 827
+move.l _xy_up,R8
+jsr (R8)
+*line 828
+bra L90
+L89:
+*line 829
+*line 830
+*line 831
+move #1,_tkctrl
+L90:L78:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _txydn
+.text
+_txydn:
+~~txydn:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 861
+move #1,_tkboth
+*line 862
+move.l _xy_dn,R8
+jsr (R8)
+*line 864
+clr _tkctrl
+*line 865
+clr _cxrate
+*line 866
+clr _cyrate
+*line 868
+clr _txfiin
+*line 869
+clr _tyfiin
+*line 871
+clr R7
+bra L94
+L95:
+*line 872
+*line 873
+move R7,R8
+add.l R8,R8
+add.l #_txfifo,R8
+move _txlast,(R8)
+*line 874
+move R7,R8
+add.l R8,R8
+add.l #_tyfifo,R8
+move _tylast,(R8)
+L93:
+*line 871
+add #1,R7
+L94:
+*line 871
+cmp #100,R7
+blt L95
+L92:L91:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _txstd
+.text
+_txstd:
+~~txstd:
+link R14,#0
+movem.l R2-R7,-(sp)
+~i=R7
+~oldcx=R6
+~oldi=R5
+~txdelta=R4
+~txcdvr=R3
+*line 896
+move #1,_trkball
+*line 897
+clr _cmfirst
+*line 898
+move _tktime,_chtime
+*line 899
+move _tktime,_nchwait
+*line 900
+move _tktime,_chwait
+*line 905
+tst _cmtype
+bne L10017
+move _tkthr,R0
+bra L10019
+L10017:move _tkhdvr,R0
+L10019:move R0,R3
+*line 907
+*line 907
+tst _astat
+beq L97
+*line 908
+*line 909
+*line 909
+tst _txflag
+bne L98
+*line 910
+*line 911
+*line 912
+*line 913
+move #1,_txflag
+*line 914
+move _tkwait,_txstop
+*line 915
+move _aval,_txlast
+*line 916
+*line 917
+*line 918
+tst _tyflag
+beq L99
+tst _tkboth
+bne L99
+*line 918
+jsr _txydn
+*line 919
+*line 920
+*line 921
+L99:bra L100
+L98:
+*line 922
+*line 923
+*line 924
+*line 924
+tst _txstop
+bgt L101
+*line 925
+*line 926
+move _txlast,R4
+sub _aval,R4
+*line 927
+move _cxval,R6
+*line 928
+*line 929
+*line 929
+cmp R3,R4
+blt L102
+*line 930
+*line 931
+*line 932
+*line 933
+move R4,R0
+ext.l R0
+divs R3,R0
+neg R0
+move R0,_cxrate
+*line 934
+*line 935
+move.l _cx_upd,R8
+jsr (R8)
+*line 936
+*line 937
+*line 938
+cmp _cxval,R6
+beq L103
+*line 938
+move.l _curmove,R8
+jsr (R8)
+*line 939
+L103:
+*line 940
+move _aval,_txlast
+*line 941
+clr _cxrate
+*line 942
+bra L104
+L102:
+*line 943
+*line 943
+tst R4
+bge L10020
+move R4,R0
+neg R0
+bra L10022
+L10020:move R4,R0
+L10022:move R0,R4
+move R4,R0
+cmp R0,R3
+bgt L105
+*line 944
+*line 945
+*line 946
+*line 947
+move R4,R0
+ext.l R0
+divs R3,R0
+move R0,_cxrate
+*line 948
+*line 949
+move.l _cx_upd,R8
+jsr (R8)
+*line 950
+*line 951
+*line 952
+cmp _cxval,R6
+beq L106
+*line 952
+move.l _curmove,R8
+jsr (R8)
+*line 953
+L106:
+*line 954
+move _aval,_txlast
+*line 955
+clr _cxrate
+*line 956
+*line 957
+L105:L104:bra L107
+L101:
+*line 958
+*line 959
+*line 960
+move _aval,_txlast
+*line 961
+sub #1,_txstop
+L107:
+*line 962
+L100:
+*line 963
+*line 964
+*line 965
+bra L108
+L97:
+*line 966
+*line 967
+*line 968
+move _aval,_txlast
+*line 969
+clr _txflag
+*line 970
+*line 971
+*line 972
+tst _tyflag
+bne L109
+*line 972
+jsr _txyup
+L109:L108:L96:tst.l (sp)+
+movem.l (sp)+,R3-R7
+unlk R14
+rts
+.globl _tystd
+.text
+_tystd:
+~~tystd:
+link R14,#0
+movem.l R2-R7,-(sp)
+~i=R7
+~oldcy=R6
+~oldi=R5
+~tydelta=R4
+~tycdvr=R3
+*line 989
+move #1,_trkball
+*line 990
+clr _cmfirst
+*line 991
+move _tktime,_cvtime
+*line 992
+move _tktime,_ncvwait
+*line 993
+move _tktime,_cvwait
+*line 997
+tst _cmtype
+bne L10023
+move _tkthr,R0
+bra L10025
+L10023:move _tkvdvr,R0
+L10025:move R0,R3
+*line 999
+*line 999
+tst _astat
+beq L111
+*line 1000
+*line 1001
+*line 1001
+tst _tyflag
+bne L112
+*line 1002
+*line 1003
+*line 1004
+*line 1005
+move #1,_tyflag
+*line 1006
+move _tkwait,_tystop
+*line 1007
+move _aval,_tylast
+*line 1008
+*line 1009
+*line 1010
+tst _txflag
+beq L113
+tst _tkboth
+bne L113
+*line 1010
+jsr _txydn
+*line 1011
+*line 1012
+L113:bra L114
+L112:
+*line 1013
+*line 1014
+*line 1015
+*line 1015
+tst _tystop
+bgt L115
+*line 1016
+*line 1017
+move _tylast,R4
+sub _aval,R4
+*line 1018
+move _cyval,R6
+*line 1019
+*line 1020
+*line 1020
+cmp R3,R4
+blt L116
+*line 1021
+*line 1022
+*line 1023
+*line 1024
+move R4,R0
+ext.l R0
+divs R3,R0
+move R0,_cyrate
+*line 1025
+*line 1026
+move.l _cy_upd,R8
+jsr (R8)
+*line 1027
+*line 1028
+*line 1029
+cmp _cyval,R6
+beq L117
+*line 1029
+move.l _curmove,R8
+jsr (R8)
+*line 1030
+L117:
+*line 1031
+move _aval,_tylast
+*line 1032
+clr _cyrate
+*line 1033
+bra L118
+L116:
+*line 1034
+*line 1034
+tst R4
+bge L10026
+move R4,R0
+neg R0
+bra L10028
+L10026:move R4,R0
+L10028:move R0,R4
+move R4,R0
+cmp R0,R3
+bgt L119
+*line 1035
+*line 1036
+*line 1037
+*line 1038
+move R4,R0
+ext.l R0
+divs R3,R0
+neg R0
+move R0,_cyrate
+*line 1039
+*line 1040
+move.l _cy_upd,R8
+jsr (R8)
+*line 1041
+*line 1042
+*line 1043
+cmp _cyval,R6
+beq L120
+*line 1043
+move.l _curmove,R8
+jsr (R8)
+*line 1044
+L120:
+*line 1045
+move _aval,_tylast
+*line 1046
+clr _cyrate
+*line 1047
+*line 1048
+L119:L118:bra L121
+L115:
+*line 1049
+*line 1050
+*line 1051
+move _aval,_tylast
+*line 1052
+sub #1,_tystop
+L121:
+*line 1053
+L114:
+*line 1054
+*line 1055
+*line 1056
+bra L122
+L111:
+*line 1057
+*line 1058
+*line 1059
+move _aval,_tylast
+*line 1060
+clr _tyflag
+*line 1061
+*line 1062
+*line 1063
+tst _txflag
+bne L123
+*line 1063
+jsr _txyup
+L123:L122:L110:tst.l (sp)+
+movem.l (sp)+,R3-R7
+unlk R14
+rts
+.globl _curproc
+.text
+_curproc:
+~~curproc:
+link R14,#-4
+movem.l R3-R7,-(sp)
+~i=R7
+~cxprev=R6
+~cyprev=R5
+~oldcx=-2
+~oldcy=-4
+~oldi=R4
+*line 1084
+move 2+_timers,_chwait
+*line 1085
+move 4+_timers,_cvwait
+*line 1087
+*line 1087
+tst _trkball
+beq L125
+*line 1088
+*line 1089
+*line 1089
+tst _txflag
+beq L126
+tst _chwait
+bgt L126
+*line 1090
+*line 1091
+*line 1092
+*line 1093
+move _txfiin,R8
+add.l R8,R8
+add.l #_txfifo,R8
+move 220+_sigtab,(R8)
+*line 1094
+*line 1097
+*line 1098
+*line 1099
+*line 1100
+add #1,_txfiin
+move _txfiin,R0
+cmp #100,R0
+blt L127
+*line 1100
+clr _txfiin
+L127:
+*line 1101
+*line 1102
+L126:
+*line 1103
+*line 1103
+tst _tyflag
+beq L128
+tst _cvwait
+bgt L128
+*line 1104
+*line 1105
+*line 1106
+*line 1107
+move _tyfiin,R8
+add.l R8,R8
+add.l #_tyfifo,R8
+move 224+_sigtab,(R8)
+*line 1108
+*line 1111
+*line 1112
+*line 1113
+*line 1114
+add #1,_tyfiin
+move _tyfiin,R0
+cmp #100,R0
+blt L129
+*line 1114
+clr _tyfiin
+L129:
+*line 1115
+L128:
+*line 1116
+*line 1117
+*line 1118
+*line 1119
+*line 1120
+L125:
+*line 1121
+*line 1121
+clr (sp)
+move #1,-(sp)
+jsr _trap13
+addq.l #2,sp
+tst.l R0
+beq L130
+*line 1122
+*line 1123
+clr (sp)
+move #2,-(sp)
+jsr _trap13
+addq.l #2,sp
+move R0,(sp)
+jsr _MouseIN
+*line 1124
+*line 1125
+move #2000,(sp)
+jsr _MouseRT
+*line 1126
+*line 1127
+*line 1128
+*line 1129
+L130:
+*line 1130
+*line 1130
+tst _cvwait
+bgt L131
+*line 1131
+*line 1132
+*line 1133
+tst _ss_ptsw
+beq L132
+*line 1133
+move _ss_ptsw,(sp)
+jsr _smy_up
+*line 1134
+L132:
+*line 1135
+*line 1136
+tst _ss_sqsw
+beq L133
+*line 1136
+move _ss_sqsw,(sp)
+jsr _sqy_up
+L133:
+*line 1137
+*line 1138
+L131:
+*line 1139
+*line 1140
+tst _msctrl
+bne L10029
+tst _cvwait
+ble L10029
+tst _chwait
+bgt L134
+L10029:*line 1141
+*line 1142
+*line 1142
+tst _msctrl
+bne L10030
+tst _tkctrl
+bne L10030
+tst _xkstat
+beq L135
+tst _ykstat
+beq L135
+L10030:*line 1143
+*line 1144
+move _cxrate,-2(R14)
+*line 1145
+move _cyrate,-4(R14)
+*line 1146
+move _cxval,R6
+*line 1147
+move _cyval,R5
+*line 1148
+move _vtcrow,_vtprow
+*line 1149
+move _vtccol,_vtpcol
+*line 1150
+*line 1151
+*line 1152
+tst _msctrl
+bne L136
+*line 1152
+jsr _cmfix
+*line 1153
+*line 1154
+*line 1155
+L136:
+*line 1156
+*line 1157
+tst _cxrate
+beq L137
+tst _msctrl
+bne L10031
+tst _chwait
+bgt L137
+L10031:*line 1157
+move.l _cx_upd,R8
+jsr (R8)
+*line 1158
+L137:
+*line 1159
+*line 1160
+tst _cyrate
+beq L138
+tst _msctrl
+bne L10032
+tst _cvwait
+bgt L138
+L10032:*line 1160
+move.l _cy_upd,R8
+jsr (R8)
+*line 1161
+L138:
+*line 1162
+move -2(R14),_cxrate
+*line 1163
+move -4(R14),_cyrate
+*line 1164
+*line 1165
+*line 1166
+*line 1167
+*line 1168
+cmp _cxval,R6
+bne L10033
+cmp _cyval,R5
+bne L10033
+move _vtprow,R0
+cmp _vtcrow,R0
+bne L10033
+move _vtpcol,R0
+cmp _vtccol,R0
+beq L139
+L10033:*line 1169
+*line 1170
+move.l _curmove,R8
+jsr (R8)
+*line 1171
+*line 1172
+*line 1172
+tst _ebflag
+beq L140
+*line 1173
+*line 1174
+*line 1174
+tst.l _curfet
+beq L141
+*line 1175
+*line 1176
+*line 1176
+move.l _curfet,(sp)
+move _stccol,-(sp)
+move _stcrow,-(sp)
+jsr _infield
+addq.l #4,sp
+tst R0
+beq L142
+*line 1177
+*line 1178
+*line 1179
+tst.l _cfetp
+beq L143
+move.l _cfetp,R0
+cmp.l _infetp,R0
+beq L143
+*line 1180
+*line 1181
+move.l _cfetp,R8
+move 6(R8),-(sp)
+move.l _cfetp,R8
+move.l 16(R8),R8
+jsr (R8)
+addq.l #2,sp
+*line 1182
+clr _ebflag
+*line 1183
+*line 1184
+L143:bra L144
+L142:
+*line 1185
+*line 1186
+*line 1187
+*line 1188
+tst.l _cfetp
+beq L145
+*line 1188
+move.l _cfetp,R8
+move 6(R8),-(sp)
+move.l _cfetp,R8
+move.l 16(R8),R8
+jsr (R8)
+addq.l #2,sp
+*line 1189
+L145:
+*line 1190
+clr _ebflag
+L144:
+*line 1191
+*line 1192
+bra L146
+L141:
+*line 1193
+*line 1194
+*line 1195
+clr _ebflag
+L146:
+*line 1196
+*line 1197
+L140:
+*line 1198
+L139:
+*line 1199
+L135:
+*line 1200
+*line 1201
+*line 1202
+*line 1203
+*line 1204
+L134:
+*line 1205
+*line 1205
+tst _msflag
+beq L147
+tst 8+_timers
+bne L147
+*line 1206
+*line 1207
+move.l _xy_up,R8
+jsr (R8)
+*line 1208
+*line 1209
+clr _msflag
+*line 1210
+*line 1211
+L147:
+*line 1212
+clr _msctrl
+*line 1217
+*line 1217
+tst 10+_timers
+bne L148
+*line 1218
+*line 1219
+*line 1220
+tst _M_state
+beq L149
+*line 1220
+*line 1221
+move #1024,(sp)
+jsr _MouseFL
+tst R0
+beq L150
+*line 1221
+move #1,_M_error
+*line 1222
+L150:L149:
+*line 1223
+clr _M_state
+*line 1224
+move #2000,(sp)
+jsr _MouseRT
+*line 1225
+*line 1229
+*line 1230
+*line 1231
+*line 1232
+*line 1233
+*line 1234
+*line 1235
+L148:
+*line 1236
+*line 1236
+tst _cvwait
+bgt L151
+*line 1237
+*line 1238
+move _ncvwait,_cvwait
+*line 1239
+move _cvtime,_ncvwait
+*line 1240
+*line 1241
+move #4,(sp)
+jsr _setipl
+move R0,R4
+*line 1242
+move _cvwait,4+_timers
+*line 1243
+move R4,(sp)
+jsr _setipl
+*line 1244
+*line 1245
+*line 1246
+L151:
+*line 1247
+*line 1247
+tst _chwait
+bgt L152
+*line 1248
+*line 1249
+move _nchwait,_chwait
+*line 1250
+move _chtime,_nchwait
+*line 1251
+*line 1252
+move #4,(sp)
+jsr _setipl
+move R0,R4
+*line 1253
+move _chwait,2+_timers
+*line 1254
+move R4,(sp)
+jsr _setipl
+*line 1255
+*line 1256
+*line 1257
+*line 1258
+*line 1259
+L152:
+*line 1260
+*line 1260
+tst _timers
+bne L153
+*line 1261
+*line 1262
+*line 1262
+tst _swflag
+beq L154
+*line 1263
+*line 1264
+move _swfiin,R8
+add.l R8,R8
+add.l #_swfifo,R8
+move 236+_sigtab,(R8)
+*line 1265
+*line 1266
+*line 1267
+add #1,_swfiin
+move _swfiin,R0
+cmp #100,R0
+blt L155
+*line 1267
+clr _swfiin
+L155:
+*line 1268
+*line 1269
+L154:
+*line 1270
+*line 1270
+tst _swctrl
+beq L156
+*line 1271
+*line 1272
+move.l _swcount,R0
+add.l _swrate,R0
+move.l R0,_swtemp
+*line 1273
+move.l _swtemp,R0
+and.l #$ffff,R0
+move.l R0,_swcount
+*line 1274
+move.l #$10,R1
+move.l _swtemp,R0
+asr.l R1,R0
+move.l R0,_swtemp
+*line 1275
+*line 1276
+*line 1276
+tst _swdir
+bne L157
+*line 1277
+*line 1278
+move #4,(sp)
+jsr _setipl
+move R0,R4
+*line 1279
+move.l _swtemp,R0
+add.l R0,_fc_val
+*line 1280
+*line 1281
+*line 1281
+move.l _fc_val,R0
+cmp.l #$ffffff,R0
+blt L158
+*line 1282
+*line 1283
+clr _swctrl
+*line 1284
+move.l #$ffffff,_fc_val
+*line 1285
+*line 1286
+L158:
+*line 1287
+move R4,(sp)
+jsr _setipl
+*line 1288
+bra L159
+L157:
+*line 1289
+*line 1290
+*line 1291
+move #4,(sp)
+jsr _setipl
+move R0,R4
+*line 1292
+move.l _swtemp,R0
+sub.l R0,_fc_val
+*line 1293
+*line 1294
+*line 1294
+tst.l _fc_val
+bge L160
+*line 1295
+*line 1296
+clr _swctrl
+*line 1297
+clr.l _fc_val
+*line 1298
+*line 1299
+L160:
+*line 1300
+move R4,(sp)
+jsr _setipl
+L159:
+*line 1301
+*line 1302
+*line 1303
+*line 1304
+L156:
+*line 1305
+*line 1305
+tst _swflag
+bne L10034
+tst _swctrl
+beq L161
+L10034:*line 1306
+*line 1307
+move #4,(sp)
+jsr _setipl
+move R0,R4
+*line 1308
+move _swtime,_timers
+*line 1309
+move R4,(sp)
+jsr _setipl
+*line 1310
+L161:
+*line 1311
+L153:L124:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _tkinit
+.text
+_tkinit:
+~~tkinit:
+link R14,#-4
+*line 1325
+clr _trkball
+*line 1326
+clr _txflag
+*line 1327
+clr _tyflag
+*line 1328
+clr _tkctrl
+*line 1329
+clr _tkboth
+*line 1331
+move #100,(sp)
+clr -(sp)
+move.l #_txfifo,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 1332
+clr _txfiin
+*line 1334
+move #100,(sp)
+clr -(sp)
+move.l #_tyfifo,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 1335
+clr _tyfiin
+L162:unlk R14
+rts
+.data
+L24:.dc.b $74,$0
+L27:.dc.b $56,$4F,$0
Index: alcyon/write.s
===================================================================
--- alcyon/write.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/write.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,443 @@
+.globl _chantab
+.globl _Wrkbuf
+.globl _errno
+.globl __fatmod
+.globl __thefat
+.globl __thebpb
+.data
+L1:
+*line 37
+.dc.l __badfd
+*line 38
+.dc.l __filewr
+*line 40
+.dc.l __conwr
+.text
+.globl __putsec
+.text
+__putsec:
+~~_putsec:
+~fp=R13
+~buf=12
+~len=16
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+*line 63
+move.l 8(R14),R13
+*line 63
+*line 63
+move.l #_Wrkbuf,(sp)
+move.l R13,-(sp)
+jsr _ReadRN
+addq.l #4,sp
+move R0,_errno
+cmp #1,R0
+bne L3
+*line 64
+*line 69
+*line 70
+*line 71
+clr _errno
+*line 72
+move #512,(sp)
+move #26,-(sp)
+move.l #_Wrkbuf,-(sp)
+jsr _memset
+addq.l #6,sp
+*line 73
+bra L4
+L3:
+*line 74
+*line 75
+tst _errno
+beq L5
+*line 75
+move #-1,R0
+bra L2
+*line 76
+L5:L4:
+*line 77
+move 16(R14),(sp)
+move.l 12(R14),-(sp)
+clr R0
+move 38(R13),R0
+swap R0
+clr R0
+swap R0
+add.l #_Wrkbuf,R0
+move.l R0,-(sp)
+jsr _memcpy
+addq.l #8,sp
+*line 79
+*line 79
+move.l #_Wrkbuf,(sp)
+move.l R13,-(sp)
+jsr _WriteRN
+addq.l #4,sp
+move R0,_errno
+beq L6
+*line 80
+*line 85
+*line 86
+*line 87
+move #-1,R0
+bra L2
+*line 88
+*line 89
+L6:
+*line 90
+*line 90
+clr R0
+move 38(R13),R0
+add 16(R14),R0
+and #511,R0
+move R0,38(R13)
+bne L7
+*line 91
+*line 92
+add.l #$1,40(R13)
+*line 93
+*line 94
+*line 94
+move.l R13,(sp)
+jsr __seek
+tst R0
+bge L8
+*line 95
+*line 100
+*line 101
+*line 102
+move #-1,R0
+bra L2
+*line 103
+L8:
+*line 104
+*line 105
+*line 110
+*line 111
+L7:
+*line 112
+clr R0
+bra L2
+L2:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl __filewr
+.text
+__filewr:
+~~_filewr:
+~fp=R13
+~buffer=R12
+~len=R7
+link R14,#-2
+movem.l R2-R7/R12-R13,-(sp)
+~j=R6
+~k=R5
+~l=R4
+~clustr=-2
+~curpos=R3
+*line 135
+move.l 8(R14),R13
+*line 135
+move.l 12(R14),R12
+*line 135
+move 16(R14),R7
+*line 135
+clr.l R3
+move 38(R13),R3
+move.l 40(R13),R0
+move.l #$9,R1
+asl.l R1,R0
+add.l R0,R3
+*line 137
+*line 137
+tst 26(R13)
+bne L10
+*line 138
+*line 144
+*line 145
+*line 146
+*line 146
+jsr __newcls
+move R0,-2(R14)
+bne L11
+*line 147
+*line 148
+move #5,_errno
+*line 149
+clr R0
+move R7,R0
+bra L9
+*line 150
+*line 151
+L11:
+*line 152
+move -2(R14),(sp)
+jsr _micons
+move R0,26(R13)
+*line 153
+move #4088,(sp)
+move -2(R14),-(sp)
+move.l #__thefat,-(sp)
+jsr __ptcl12
+addq.l #6,sp
+*line 154
+move #1,__fatmod
+*line 155
+move -2(R14),(sp)
+move.l __thebpb,-(sp)
+jsr __cl2lsn
+addq.l #4,sp
+ext.l R0
+move.l R0,44(R13)
+*line 156
+move -2(R14),36(R13)
+*line 157
+clr 34(R13)
+*line 158
+move.l __thebpb,R8
+clr R0
+move 2(R8),R0
+swap R0
+clr R0
+swap R0
+move.l R0,52(R13)
+*line 166
+*line 167
+*line 168
+L10:
+*line 169
+clr R4
+*line 177
+*line 177
+tst 38(R13)
+beq L12
+*line 178
+*line 179
+*line 180
+move #512,R4
+sub 38(R13),R4
+clr R0
+move R4,R0
+cmp R0,R7
+bcc L13
+*line 180
+move R7,R4
+*line 181
+L13:
+*line 182
+*line 183
+move R4,(sp)
+move.l R12,-(sp)
+move.l R13,-(sp)
+jsr __putsec
+addq.l #8,sp
+tst R0
+beq L14
+*line 183
+move #-1,R0
+bra L9
+L14:
+*line 184
+*line 185
+L12:
+*line 186
+*line 186
+move R7,R5
+sub R4,R5
+move #9,R0
+lsr R0,R5
+beq L15
+*line 187
+*line 188
+*line 188
+move R5,(sp)
+move.l R12,R0
+clr.l R1
+move R4,R1
+add.l R1,R0
+move.l R0,-(sp)
+move.l R13,-(sp)
+jsr _blkwr
+addq.l #8,sp
+move R0,R6
+tst R6
+beq L16
+*line 189
+*line 190
+clr R0
+move R5,R0
+sub R6,R0
+move #9,R1
+lsl R1,R0
+add R0,R4
+*line 191
+*line 192
+*line 193
+move.l R3,R0
+clr.l R1
+move R4,R1
+add.l R1,R0
+cmp.l 48(R13),R0
+ble L17
+*line 193
+move.l R3,R0
+clr.l R1
+move R4,R1
+add.l R1,R0
+move.l R0,48(R13)
+move.l R0,(sp)
+jsr _miconl
+move.l R0,28(R13)
+*line 194
+*line 199
+*line 200
+L17:
+*line 201
+clr R0
+move R4,R0
+bra L9
+*line 202
+*line 203
+L16:
+*line 204
+clr R0
+move R5,R0
+move #9,R1
+lsl R1,R0
+add R0,R4
+*line 205
+*line 206
+*line 207
+L15:
+*line 208
+*line 208
+cmp R7,R4
+bcc L18
+*line 209
+*line 210
+*line 210
+move R7,(sp)
+clr R0
+move R4,R0
+sub R0,(sp)
+move.l R12,R0
+clr.l R1
+move R4,R1
+add.l R1,R0
+move.l R0,-(sp)
+move.l R13,-(sp)
+jsr __putsec
+addq.l #8,sp
+tst R0
+beq L19
+*line 211
+*line 212
+*line 213
+move.l R3,R0
+clr.l R1
+move R4,R1
+add.l R1,R0
+cmp.l 48(R13),R0
+ble L20
+*line 213
+move.l R3,R0
+clr.l R1
+move R4,R1
+add.l R1,R0
+move.l R0,48(R13)
+move.l R0,(sp)
+jsr _miconl
+move.l R0,28(R13)
+*line 214
+*line 219
+*line 220
+L20:
+*line 221
+clr R0
+move R4,R0
+bra L9
+*line 222
+L19:
+*line 223
+*line 224
+L18:
+*line 225
+*line 226
+move.l R3,R0
+clr.l R1
+move R7,R1
+add.l R1,R0
+cmp.l 48(R13),R0
+ble L21
+*line 226
+move.l R3,R0
+clr.l R1
+move R7,R1
+add.l R1,R0
+move.l R0,48(R13)
+move.l R0,(sp)
+jsr _miconl
+move.l R0,28(R13)
+*line 227
+*line 232
+*line 233
+L21:
+*line 234
+clr R0
+move R7,R0
+bra L9
+L9:tst.l (sp)+
+movem.l (sp)+,R3-R7/R12-R13
+unlk R14
+rts
+.globl _write
+.text
+_write:
+~~write:
+~fd=8
+~buff=10
+~len=14
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+~chp=R13
+*line 254
+*line 254
+tst 8(R14)
+blt L10000
+cmp #11,8(R14)
+ble L23
+L10000:*line 255
+*line 256
+move #9,_errno
+*line 257
+move #-1,R0
+bra L22
+*line 258
+*line 259
+L23:
+*line 260
+move 8(R14),R0
+muls #12,R0
+move.l R0,R13
+add.l #_chantab,R13
+*line 262
+move 14(R14),-(sp)
+move.l 10(R14),-(sp)
+move.l 8(R13),-(sp)
+move.b 1(R13),R0
+ext.w R0
+move R0,R8
+add.l R8,R8
+add.l R8,R8
+move.l #L1,R9
+move.l 0(R8,R9.l),R8
+jsr (R8)
+adda.l #10,sp
+bra L22
+L22:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.data
Index: alcyon/writern.s
===================================================================
--- alcyon/writern.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/writern.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,104 @@
+.globl _errno
+.globl __berrno
+.globl _WriteRN
+.text
+_WriteRN:
+~~WriteRN:
+~fcp=8
+~buf=12
+link R14,#-10
+~sv=-2
+~brc=-6
+*line 53
+*line 53
+move.l 8(R14),(sp)
+jsr __seek
+move R0,-2(R14)
+beq L2
+*line 54
+*line 55
+*line 55
+tst -2(R14)
+bge L3
+*line 56
+*line 61
+*line 62
+*line 63
+move #5,_errno
+*line 64
+move #-1,R0
+bra L1
+*line 65
+bra L4
+L3:
+*line 66
+*line 66
+cmp #2,-2(R14)
+bne L5
+*line 67
+*line 68
+*line 68
+move.l 8(R14),(sp)
+jsr __alcnew
+tst R0
+beq L6
+*line 69
+*line 70
+move #5,_errno
+*line 71
+move #-1,R0
+bra L1
+*line 72
+*line 77
+*line 78
+L6:
+*line 79
+L5:L4:
+*line 80
+*line 81
+*line 86
+*line 87
+*line 88
+*line 89
+L2:
+*line 90
+*line 90
+clr (sp)
+move.l 8(R14),R8
+move.l 44(R8),R0
+move R0,-(sp)
+move #1,-(sp)
+move.l 12(R14),-(sp)
+move #1,-(sp)
+move #4,-(sp)
+jsr _trap13
+adda.l #12,sp
+move.l R0,-6(R14)
+beq L7
+*line 91
+*line 95
+*line 96
+*line 97
+move.l -6(R14),__berrno
+*line 98
+move #5,_errno
+*line 99
+move #-1,R0
+bra L1
+*line 100
+*line 101
+*line 102
+L7:
+*line 103
+move.l 8(R14),R8
+move.l 44(R8),R0
+move R0,(sp)
+move.l 12(R14),-(sp)
+jsr __secwr
+addq.l #4,sp
+*line 106
+clr R0
+bra L1
+L1:unlk R14
+rts
+.data
Index: alcyon/wscalc.s
===================================================================
--- alcyon/wscalc.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/wscalc.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,8515 @@
+.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 _curwhrm
+.globl _hwave
+.globl _offsets
+.globl _vmtab
+.globl _wsbuf
+.globl _vknm
+.globl _knmtab
+.data
+_knmtab:
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC0B
+.dc.w $FC14
+.dc.w $FC1D
+.dc.w $FC26
+.dc.w $FC2E
+.dc.w $FC37
+.dc.w $FC40
+.dc.w $FC49
+.dc.w $FC52
+.dc.w $FC5B
+.dc.w $FC64
+.dc.w $FC6D
+.dc.w $FC76
+.dc.w $FC7F
+.dc.w $FC87
+.dc.w $FC90
+.dc.w $FC99
+.dc.w $FCA2
+.dc.w $FCAB
+.dc.w $FCB4
+.dc.w $FCBD
+.dc.w $FCC6
+.dc.w $FCCF
+.dc.w $FCD8
+.dc.w $FCE0
+.dc.w $FCE9
+.dc.w $FCF2
+.dc.w $FCFB
+.dc.w $FD04
+.dc.w $FD0D
+.dc.w $FD16
+.dc.w $FD1F
+.dc.w $FD28
+.dc.w $FD30
+.dc.w $FD39
+.dc.w $FD42
+.dc.w $FD4B
+.dc.w $FD54
+.dc.w $FD5D
+.dc.w $FD66
+.dc.w $FD6F
+.dc.w $FD78
+.dc.w $FD81
+.dc.w $FD89
+.dc.w $FD92
+.dc.w $FD9B
+.dc.w $FDA4
+.dc.w $FDAD
+.dc.w $FDB6
+.dc.w $FDBF
+.dc.w $FDC8
+.dc.w $FDD1
+.dc.w $FDD9
+.dc.w $FDE2
+.dc.w $FDEB
+.dc.w $FDF4
+.dc.w $FDFD
+.dc.w $FE06
+.dc.w $FE0F
+.dc.w $FE18
+.dc.w $FE21
+.dc.w $FE2A
+.dc.w $FE32
+.dc.w $FE3B
+.dc.w $FE44
+.dc.w $FE4D
+.dc.w $FE56
+.dc.w $FE5F
+.dc.w $FE68
+.dc.w $FE71
+.dc.w $FE7A
+.dc.w $FE82
+.dc.w $FE8B
+.dc.w $FE94
+.dc.w $FE9D
+.dc.w $FEA6
+.dc.w $FEAF
+.dc.w $FEB8
+.dc.w $FEC1
+.dc.w $FECA
+.dc.w $FED3
+.dc.w $FEDB
+.dc.w $FEE4
+.dc.w $FEED
+.dc.w $FEF6
+.dc.w $FEFF
+.dc.w $FF08
+.dc.w $FF11
+.dc.w $FF1A
+.dc.w $FF23
+.dc.w $FF2C
+.dc.w $FF34
+.dc.w $FF3D
+.dc.w $FF46
+.dc.w $FF4F
+.dc.w $FF58
+.dc.w $FF61
+.dc.w $FF6A
+.dc.w $FF73
+.dc.w $FF7C
+.dc.w $FF84
+.dc.w $FF8D
+.dc.w $FF96
+.dc.w $FF9F
+.dc.w $FFA8
+.dc.w $FFB1
+.dc.w $FFBA
+.dc.w $FFC3
+.dc.w $FFCC
+.dc.w $FFD5
+.dc.w $FFDD
+.dc.w $FFE6
+.dc.w $FFEF
+.dc.w $FFF8
+.dc.w $0
+.dc.w $9
+.dc.w $12
+.dc.w $1B
+.dc.w $24
+.dc.w $2C
+.dc.w $35
+.dc.w $3E
+.dc.w $47
+.dc.w $50
+.dc.w $59
+.dc.w $62
+.dc.w $6B
+.dc.w $74
+.dc.w $7D
+.dc.w $85
+.dc.w $8E
+.dc.w $97
+.dc.w $A0
+.dc.w $A9
+.dc.w $B2
+.dc.w $BB
+.dc.w $C4
+.dc.w $CD
+.dc.w $D6
+.dc.w $DE
+.dc.w $E7
+.dc.w $F0
+.dc.w $F9
+.dc.w $102
+.dc.w $10B
+.dc.w $114
+.dc.w $11D
+.dc.w $126
+.dc.w $12E
+.dc.w $137
+.dc.w $140
+.dc.w $149
+.dc.w $152
+.dc.w $15B
+.dc.w $164
+.dc.w $16D
+.dc.w $176
+.dc.w $17F
+.dc.w $187
+.dc.w $190
+.dc.w $199
+.dc.w $1A2
+.dc.w $1AB
+.dc.w $1B4
+.dc.w $1BD
+.dc.w $1C6
+.dc.w $1CF
+.dc.w $1D7
+.dc.w $1E0
+.dc.w $1E9
+.dc.w $1F2
+.dc.w $1FB
+.dc.w $204
+.dc.w $20D
+.dc.w $216
+.dc.w $21F
+.dc.w $228
+.dc.w $230
+.dc.w $239
+.dc.w $242
+.dc.w $24B
+.dc.w $254
+.dc.w $25D
+.dc.w $266
+.dc.w $26F
+.dc.w $278
+.dc.w $280
+.dc.w $289
+.dc.w $292
+.dc.w $29B
+.dc.w $2A4
+.dc.w $2AD
+.dc.w $2B6
+.dc.w $2BF
+.dc.w $2C8
+.dc.w $2D1
+.dc.w $2D9
+.dc.w $2E2
+.dc.w $2EB
+.dc.w $2F4
+.dc.w $2FD
+.dc.w $306
+.dc.w $30F
+.dc.w $318
+.dc.w $321
+.dc.w $32A
+.dc.w $332
+.dc.w $33B
+.dc.w $344
+.dc.w $34D
+.dc.w $356
+.dc.w $35F
+.dc.w $368
+.dc.w $371
+.dc.w $37A
+.dc.w $382
+.dc.w $38B
+.dc.w $394
+.dc.w $39D
+.dc.w $3A6
+.dc.w $3AF
+.dc.w $3B8
+.dc.w $3C1
+.dc.w $3CA
+.dc.w $3D3
+.dc.w $3DB
+.dc.w $3E4
+.dc.w $3ED
+.dc.w $3F6
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3DC
+.dc.w $3B8
+.dc.w $396
+.dc.w $373
+.dc.w $351
+.dc.w $32F
+.dc.w $30D
+.dc.w $2EC
+.dc.w $2CB
+.dc.w $2AB
+.dc.w $28A
+.dc.w $26A
+.dc.w $24B
+.dc.w $22B
+.dc.w $20C
+.dc.w $1ED
+.dc.w $1CF
+.dc.w $1B1
+.dc.w $193
+.dc.w $175
+.dc.w $158
+.dc.w $13B
+.dc.w $11E
+.dc.w $102
+.dc.w $E6
+.dc.w $CA
+.dc.w $AF
+.dc.w $94
+.dc.w $79
+.dc.w $5F
+.dc.w $45
+.dc.w $2B
+.dc.w $11
+.dc.w $FFF9
+.dc.w $FFE0
+.dc.w $FFC7
+.dc.w $FFAF
+.dc.w $FF97
+.dc.w $FF80
+.dc.w $FF68
+.dc.w $FF51
+.dc.w $FF3A
+.dc.w $FF24
+.dc.w $FF0E
+.dc.w $FEF8
+.dc.w $FEE3
+.dc.w $FECD
+.dc.w $FEB8
+.dc.w $FEA4
+.dc.w $FE90
+.dc.w $FE7C
+.dc.w $FE68
+.dc.w $FE55
+.dc.w $FE42
+.dc.w $FE2F
+.dc.w $FE1D
+.dc.w $FE0A
+.dc.w $FDF9
+.dc.w $FDE7
+.dc.w $FDD6
+.dc.w $FDC5
+.dc.w $FDB5
+.dc.w $FDA4
+.dc.w $FD94
+.dc.w $FD85
+.dc.w $FD75
+.dc.w $FD66
+.dc.w $FD58
+.dc.w $FD49
+.dc.w $FD3B
+.dc.w $FD2D
+.dc.w $FD20
+.dc.w $FD13
+.dc.w $FD06
+.dc.w $FCFA
+.dc.w $FCED
+.dc.w $FCE1
+.dc.w $FCD6
+.dc.w $FCCA
+.dc.w $FCC0
+.dc.w $FCB5
+.dc.w $FCAA
+.dc.w $FCA0
+.dc.w $FC97
+.dc.w $FC8D
+.dc.w $FC84
+.dc.w $FC7B
+.dc.w $FC73
+.dc.w $FC6B
+.dc.w $FC63
+.dc.w $FC5B
+.dc.w $FC54
+.dc.w $FC4D
+.dc.w $FC46
+.dc.w $FC40
+.dc.w $FC3A
+.dc.w $FC34
+.dc.w $FC2F
+.dc.w $FC2A
+.dc.w $FC25
+.dc.w $FC20
+.dc.w $FC1C
+.dc.w $FC18
+.dc.w $FC15
+.dc.w $FC11
+.dc.w $FC0F
+.dc.w $FC0C
+.dc.w $FC0A
+.dc.w $FC08
+.dc.w $FC06
+.dc.w $FC04
+.dc.w $FC03
+.dc.w $FC03
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC03
+.dc.w $FC03
+.dc.w $FC04
+.dc.w $FC06
+.dc.w $FC08
+.dc.w $FC0A
+.dc.w $FC0C
+.dc.w $FC0F
+.dc.w $FC11
+.dc.w $FC15
+.dc.w $FC18
+.dc.w $FC1C
+.dc.w $FC20
+.dc.w $FC25
+.dc.w $FC2A
+.dc.w $FC2F
+.dc.w $FC34
+.dc.w $FC3A
+.dc.w $FC40
+.dc.w $FC46
+.dc.w $FC4D
+.dc.w $FC54
+.dc.w $FC5B
+.dc.w $FC63
+.dc.w $FC6B
+.dc.w $FC73
+.dc.w $FC7B
+.dc.w $FC84
+.dc.w $FC8D
+.dc.w $FC97
+.dc.w $FCA0
+.dc.w $FCAA
+.dc.w $FCB5
+.dc.w $FCC0
+.dc.w $FCCB
+.dc.w $FCD6
+.dc.w $FCE1
+.dc.w $FCED
+.dc.w $FCFA
+.dc.w $FD06
+.dc.w $FD13
+.dc.w $FD20
+.dc.w $FD2E
+.dc.w $FD3B
+.dc.w $FD49
+.dc.w $FD58
+.dc.w $FD66
+.dc.w $FD75
+.dc.w $FD85
+.dc.w $FD94
+.dc.w $FDA4
+.dc.w $FDB5
+.dc.w $FDC5
+.dc.w $FDD6
+.dc.w $FDE7
+.dc.w $FDF9
+.dc.w $FE0A
+.dc.w $FE1D
+.dc.w $FE2F
+.dc.w $FE42
+.dc.w $FE55
+.dc.w $FE68
+.dc.w $FE7C
+.dc.w $FE90
+.dc.w $FEA4
+.dc.w $FEB8
+.dc.w $FECD
+.dc.w $FEE3
+.dc.w $FEF8
+.dc.w $FF0E
+.dc.w $FF24
+.dc.w $FF3A
+.dc.w $FF51
+.dc.w $FF68
+.dc.w $FF80
+.dc.w $FF97
+.dc.w $FFAF
+.dc.w $FFC8
+.dc.w $FFE0
+.dc.w $FFF9
+.dc.w $11
+.dc.w $2B
+.dc.w $45
+.dc.w $5F
+.dc.w $79
+.dc.w $94
+.dc.w $AF
+.dc.w $CA
+.dc.w $E6
+.dc.w $102
+.dc.w $11E
+.dc.w $13B
+.dc.w $158
+.dc.w $175
+.dc.w $193
+.dc.w $1B1
+.dc.w $1CF
+.dc.w $1ED
+.dc.w $20C
+.dc.w $22B
+.dc.w $24B
+.dc.w $26A
+.dc.w $28A
+.dc.w $2AB
+.dc.w $2CB
+.dc.w $2EC
+.dc.w $30E
+.dc.w $32F
+.dc.w $351
+.dc.w $373
+.dc.w $396
+.dc.w $3B8
+.dc.w $3DC
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC51
+.dc.w $FC9E
+.dc.w $FCEA
+.dc.w $FD34
+.dc.w $FD7B
+.dc.w $FDC2
+.dc.w $FE06
+.dc.w $FE48
+.dc.w $FE89
+.dc.w $FEC9
+.dc.w $FF06
+.dc.w $FF42
+.dc.w $FF7C
+.dc.w $FFB4
+.dc.w $FFEB
+.dc.w $1F
+.dc.w $53
+.dc.w $85
+.dc.w $B6
+.dc.w $E4
+.dc.w $112
+.dc.w $13E
+.dc.w $168
+.dc.w $191
+.dc.w $1B8
+.dc.w $1DE
+.dc.w $203
+.dc.w $226
+.dc.w $248
+.dc.w $268
+.dc.w $287
+.dc.w $2A5
+.dc.w $2C1
+.dc.w $2DC
+.dc.w $2F5
+.dc.w $30E
+.dc.w $325
+.dc.w $33B
+.dc.w $34F
+.dc.w $362
+.dc.w $375
+.dc.w $385
+.dc.w $395
+.dc.w $3A4
+.dc.w $3B1
+.dc.w $3BE
+.dc.w $3C9
+.dc.w $3D3
+.dc.w $3DC
+.dc.w $3E4
+.dc.w $3EB
+.dc.w $3F1
+.dc.w $3F5
+.dc.w $3F9
+.dc.w $3FC
+.dc.w $3FE
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FE
+.dc.w $3FC
+.dc.w $3F9
+.dc.w $3F6
+.dc.w $3F1
+.dc.w $3EC
+.dc.w $3E6
+.dc.w $3DF
+.dc.w $3D7
+.dc.w $3CF
+.dc.w $3C6
+.dc.w $3BC
+.dc.w $3B1
+.dc.w $3A6
+.dc.w $39A
+.dc.w $38D
+.dc.w $37F
+.dc.w $371
+.dc.w $362
+.dc.w $353
+.dc.w $343
+.dc.w $333
+.dc.w $322
+.dc.w $310
+.dc.w $2FE
+.dc.w $2EB
+.dc.w $2D8
+.dc.w $2C4
+.dc.w $2B0
+.dc.w $29C
+.dc.w $287
+.dc.w $271
+.dc.w $25B
+.dc.w $245
+.dc.w $22E
+.dc.w $217
+.dc.w $200
+.dc.w $1E9
+.dc.w $1D1
+.dc.w $1B8
+.dc.w $1A0
+.dc.w $187
+.dc.w $16E
+.dc.w $155
+.dc.w $13C
+.dc.w $122
+.dc.w $108
+.dc.w $EE
+.dc.w $D4
+.dc.w $BA
+.dc.w $A0
+.dc.w $85
+.dc.w $6B
+.dc.w $50
+.dc.w $35
+.dc.w $1B
+.dc.w $0
+.dc.w $FFE6
+.dc.w $FFCC
+.dc.w $FFB1
+.dc.w $FF96
+.dc.w $FF7C
+.dc.w $FF61
+.dc.w $FF47
+.dc.w $FF2D
+.dc.w $FF13
+.dc.w $FEF9
+.dc.w $FEDF
+.dc.w $FEC5
+.dc.w $FEAC
+.dc.w $FE93
+.dc.w $FE7A
+.dc.w $FE61
+.dc.w $FE49
+.dc.w $FE30
+.dc.w $FE18
+.dc.w $FE01
+.dc.w $FDE9
+.dc.w $FDD3
+.dc.w $FDBC
+.dc.w $FDA6
+.dc.w $FD90
+.dc.w $FD7A
+.dc.w $FD65
+.dc.w $FD51
+.dc.w $FD3D
+.dc.w $FD29
+.dc.w $FD16
+.dc.w $FD03
+.dc.w $FCF1
+.dc.w $FCDF
+.dc.w $FCCE
+.dc.w $FCBE
+.dc.w $FCAE
+.dc.w $FC9F
+.dc.w $FC90
+.dc.w $FC82
+.dc.w $FC74
+.dc.w $FC67
+.dc.w $FC5B
+.dc.w $FC50
+.dc.w $FC45
+.dc.w $FC3B
+.dc.w $FC32
+.dc.w $FC2A
+.dc.w $FC22
+.dc.w $FC1B
+.dc.w $FC15
+.dc.w $FC10
+.dc.w $FC0B
+.dc.w $FC08
+.dc.w $FC05
+.dc.w $FC03
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC03
+.dc.w $FC05
+.dc.w $FC08
+.dc.w $FC0C
+.dc.w $FC10
+.dc.w $FC16
+.dc.w $FC1D
+.dc.w $FC25
+.dc.w $FC2E
+.dc.w $FC38
+.dc.w $FC43
+.dc.w $FC50
+.dc.w $FC5D
+.dc.w $FC6C
+.dc.w $FC7C
+.dc.w $FC8C
+.dc.w $FC9F
+.dc.w $FCB2
+.dc.w $FCC6
+.dc.w $FCDC
+.dc.w $FCF3
+.dc.w $FD0C
+.dc.w $FD25
+.dc.w $FD40
+.dc.w $FD5C
+.dc.w $FD7A
+.dc.w $FD99
+.dc.w $FDB9
+.dc.w $FDDB
+.dc.w $FDFE
+.dc.w $FE23
+.dc.w $FE49
+.dc.w $FE70
+.dc.w $FE99
+.dc.w $FEC3
+.dc.w $FEEF
+.dc.w $FF1D
+.dc.w $FF4B
+.dc.w $FF7C
+.dc.w $FFAE
+.dc.w $FFE2
+.dc.w $16
+.dc.w $4D
+.dc.w $85
+.dc.w $BF
+.dc.w $FB
+.dc.w $139
+.dc.w $178
+.dc.w $1B9
+.dc.w $1FB
+.dc.w $23F
+.dc.w $286
+.dc.w $2CD
+.dc.w $317
+.dc.w $363
+.dc.w $3B0
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $374
+.dc.w $2EF
+.dc.w $26F
+.dc.w $1F6
+.dc.w $182
+.dc.w $114
+.dc.w $AB
+.dc.w $47
+.dc.w $FFEA
+.dc.w $FF91
+.dc.w $FF3D
+.dc.w $FEED
+.dc.w $FEA3
+.dc.w $FE5D
+.dc.w $FE1B
+.dc.w $FDDE
+.dc.w $FDA5
+.dc.w $FD70
+.dc.w $FD3F
+.dc.w $FD12
+.dc.w $FCE9
+.dc.w $FCC4
+.dc.w $FCA2
+.dc.w $FC84
+.dc.w $FC6A
+.dc.w $FC52
+.dc.w $FC3E
+.dc.w $FC2D
+.dc.w $FC1F
+.dc.w $FC14
+.dc.w $FC0B
+.dc.w $FC06
+.dc.w $FC03
+.dc.w $FC02
+.dc.w $FC04
+.dc.w $FC08
+.dc.w $FC0F
+.dc.w $FC18
+.dc.w $FC23
+.dc.w $FC30
+.dc.w $FC3E
+.dc.w $FC4F
+.dc.w $FC62
+.dc.w $FC76
+.dc.w $FC8B
+.dc.w $FCA2
+.dc.w $FCBB
+.dc.w $FCD5
+.dc.w $FCF0
+.dc.w $FD0D
+.dc.w $FD2A
+.dc.w $FD49
+.dc.w $FD69
+.dc.w $FD89
+.dc.w $FDAB
+.dc.w $FDCD
+.dc.w $FDF0
+.dc.w $FE13
+.dc.w $FE38
+.dc.w $FE5C
+.dc.w $FE81
+.dc.w $FEA7
+.dc.w $FECD
+.dc.w $FEF3
+.dc.w $FF19
+.dc.w $FF40
+.dc.w $FF67
+.dc.w $FF8D
+.dc.w $FFB4
+.dc.w $FFDB
+.dc.w $0
+.dc.w $27
+.dc.w $4D
+.dc.w $73
+.dc.w $99
+.dc.w $BE
+.dc.w $E3
+.dc.w $108
+.dc.w $12C
+.dc.w $14F
+.dc.w $172
+.dc.w $195
+.dc.w $1B6
+.dc.w $1D8
+.dc.w $1F8
+.dc.w $218
+.dc.w $237
+.dc.w $255
+.dc.w $272
+.dc.w $28F
+.dc.w $2AA
+.dc.w $2C5
+.dc.w $2DE
+.dc.w $2F7
+.dc.w $30F
+.dc.w $326
+.dc.w $33B
+.dc.w $350
+.dc.w $364
+.dc.w $376
+.dc.w $388
+.dc.w $398
+.dc.w $3A7
+.dc.w $3B5
+.dc.w $3C2
+.dc.w $3CD
+.dc.w $3D8
+.dc.w $3E1
+.dc.w $3E9
+.dc.w $3F0
+.dc.w $3F5
+.dc.w $3F9
+.dc.w $3FD
+.dc.w $3FE
+.dc.w $3FF
+.dc.w $3FE
+.dc.w $3FD
+.dc.w $3F9
+.dc.w $3F5
+.dc.w $3F0
+.dc.w $3E9
+.dc.w $3E1
+.dc.w $3D8
+.dc.w $3CD
+.dc.w $3C2
+.dc.w $3B5
+.dc.w $3A7
+.dc.w $398
+.dc.w $387
+.dc.w $376
+.dc.w $364
+.dc.w $350
+.dc.w $33B
+.dc.w $326
+.dc.w $30F
+.dc.w $2F7
+.dc.w $2DE
+.dc.w $2C5
+.dc.w $2AA
+.dc.w $28E
+.dc.w $272
+.dc.w $255
+.dc.w $237
+.dc.w $218
+.dc.w $1F8
+.dc.w $1D7
+.dc.w $1B6
+.dc.w $195
+.dc.w $172
+.dc.w $14F
+.dc.w $12C
+.dc.w $107
+.dc.w $E3
+.dc.w $BE
+.dc.w $99
+.dc.w $73
+.dc.w $4D
+.dc.w $27
+.dc.w $0
+.dc.w $FFDB
+.dc.w $FFB4
+.dc.w $FF8D
+.dc.w $FF67
+.dc.w $FF40
+.dc.w $FF19
+.dc.w $FEF3
+.dc.w $FECD
+.dc.w $FEA7
+.dc.w $FE81
+.dc.w $FE5C
+.dc.w $FE38
+.dc.w $FE13
+.dc.w $FDF0
+.dc.w $FDCD
+.dc.w $FDAB
+.dc.w $FD89
+.dc.w $FD69
+.dc.w $FD49
+.dc.w $FD2A
+.dc.w $FD0D
+.dc.w $FCF0
+.dc.w $FCD5
+.dc.w $FCBB
+.dc.w $FCA2
+.dc.w $FC8B
+.dc.w $FC76
+.dc.w $FC61
+.dc.w $FC4F
+.dc.w $FC3E
+.dc.w $FC30
+.dc.w $FC23
+.dc.w $FC18
+.dc.w $FC0F
+.dc.w $FC08
+.dc.w $FC04
+.dc.w $FC02
+.dc.w $FC03
+.dc.w $FC06
+.dc.w $FC0B
+.dc.w $FC14
+.dc.w $FC1F
+.dc.w $FC2D
+.dc.w $FC3E
+.dc.w $FC52
+.dc.w $FC6A
+.dc.w $FC84
+.dc.w $FCA2
+.dc.w $FCC4
+.dc.w $FCE9
+.dc.w $FD12
+.dc.w $FD3F
+.dc.w $FD70
+.dc.w $FDA5
+.dc.w $FDDE
+.dc.w $FE1B
+.dc.w $FE5D
+.dc.w $FEA3
+.dc.w $FEED
+.dc.w $FF3D
+.dc.w $FF91
+.dc.w $FFEA
+.dc.w $48
+.dc.w $AB
+.dc.w $114
+.dc.w $182
+.dc.w $1F6
+.dc.w $26F
+.dc.w $2EF
+.dc.w $374
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FCD9
+.dc.w $FDA1
+.dc.w $FE5A
+.dc.w $FF06
+.dc.w $FFA4
+.dc.w $35
+.dc.w $BA
+.dc.w $133
+.dc.w $1A2
+.dc.w $205
+.dc.w $25E
+.dc.w $2AD
+.dc.w $2F3
+.dc.w $32F
+.dc.w $363
+.dc.w $38F
+.dc.w $3B3
+.dc.w $3CF
+.dc.w $3E5
+.dc.w $3F4
+.dc.w $3FC
+.dc.w $3FF
+.dc.w $3FC
+.dc.w $3F4
+.dc.w $3E7
+.dc.w $3D5
+.dc.w $3BF
+.dc.w $3A5
+.dc.w $387
+.dc.w $366
+.dc.w $342
+.dc.w $31B
+.dc.w $2F1
+.dc.w $2C5
+.dc.w $297
+.dc.w $267
+.dc.w $235
+.dc.w $202
+.dc.w $1CE
+.dc.w $198
+.dc.w $162
+.dc.w $12B
+.dc.w $F4
+.dc.w $BD
+.dc.w $85
+.dc.w $4E
+.dc.w $16
+.dc.w $FFE0
+.dc.w $FFAA
+.dc.w $FF74
+.dc.w $FF3F
+.dc.w $FF0B
+.dc.w $FED8
+.dc.w $FEA6
+.dc.w $FE75
+.dc.w $FE46
+.dc.w $FE18
+.dc.w $FDEB
+.dc.w $FDC1
+.dc.w $FD97
+.dc.w $FD70
+.dc.w $FD4A
+.dc.w $FD26
+.dc.w $FD04
+.dc.w $FCE4
+.dc.w $FCC6
+.dc.w $FCAA
+.dc.w $FC91
+.dc.w $FC79
+.dc.w $FC63
+.dc.w $FC50
+.dc.w $FC3E
+.dc.w $FC2F
+.dc.w $FC22
+.dc.w $FC18
+.dc.w $FC0F
+.dc.w $FC09
+.dc.w $FC04
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC05
+.dc.w $FC09
+.dc.w $FC0F
+.dc.w $FC18
+.dc.w $FC22
+.dc.w $FC2F
+.dc.w $FC3D
+.dc.w $FC4D
+.dc.w $FC5F
+.dc.w $FC73
+.dc.w $FC89
+.dc.w $FCA0
+.dc.w $FCBA
+.dc.w $FCD4
+.dc.w $FCF0
+.dc.w $FD0E
+.dc.w $FD2D
+.dc.w $FD4E
+.dc.w $FD70
+.dc.w $FD93
+.dc.w $FDB7
+.dc.w $FDDC
+.dc.w $FE02
+.dc.w $FE2A
+.dc.w $FE52
+.dc.w $FE7A
+.dc.w $FEA4
+.dc.w $FECE
+.dc.w $FEF9
+.dc.w $FF24
+.dc.w $FF50
+.dc.w $FF7C
+.dc.w $FFA8
+.dc.w $FFD5
+.dc.w $0
+.dc.w $2D
+.dc.w $59
+.dc.w $85
+.dc.w $B1
+.dc.w $DD
+.dc.w $108
+.dc.w $133
+.dc.w $15D
+.dc.w $187
+.dc.w $1AF
+.dc.w $1D8
+.dc.w $1FF
+.dc.w $225
+.dc.w $24A
+.dc.w $26E
+.dc.w $291
+.dc.w $2B3
+.dc.w $2D4
+.dc.w $2F3
+.dc.w $311
+.dc.w $32D
+.dc.w $347
+.dc.w $361
+.dc.w $378
+.dc.w $38E
+.dc.w $3A2
+.dc.w $3B4
+.dc.w $3C4
+.dc.w $3D2
+.dc.w $3DF
+.dc.w $3E9
+.dc.w $3F2
+.dc.w $3F8
+.dc.w $3FC
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FD
+.dc.w $3F8
+.dc.w $3F2
+.dc.w $3E9
+.dc.w $3DF
+.dc.w $3D2
+.dc.w $3C3
+.dc.w $3B1
+.dc.w $39E
+.dc.w $388
+.dc.w $370
+.dc.w $357
+.dc.w $33B
+.dc.w $31D
+.dc.w $2FD
+.dc.w $2DB
+.dc.w $2B7
+.dc.w $291
+.dc.w $26A
+.dc.w $240
+.dc.w $216
+.dc.w $1E9
+.dc.w $1BB
+.dc.w $18C
+.dc.w $15B
+.dc.w $129
+.dc.w $F6
+.dc.w $C2
+.dc.w $8D
+.dc.w $57
+.dc.w $21
+.dc.w $FFEB
+.dc.w $FFB3
+.dc.w $FF7C
+.dc.w $FF44
+.dc.w $FF0D
+.dc.w $FED6
+.dc.w $FE9F
+.dc.w $FE69
+.dc.w $FE33
+.dc.w $FDFF
+.dc.w $FDCC
+.dc.w $FD9A
+.dc.w $FD6A
+.dc.w $FD3C
+.dc.w $FD10
+.dc.w $FCE6
+.dc.w $FCBF
+.dc.w $FC9B
+.dc.w $FC7A
+.dc.w $FC5C
+.dc.w $FC42
+.dc.w $FC2C
+.dc.w $FC1A
+.dc.w $FC0D
+.dc.w $FC05
+.dc.w $FC02
+.dc.w $FC05
+.dc.w $FC0D
+.dc.w $FC1C
+.dc.w $FC32
+.dc.w $FC4E
+.dc.w $FC72
+.dc.w $FC9E
+.dc.w $FCD2
+.dc.w $FD0E
+.dc.w $FD54
+.dc.w $FDA3
+.dc.w $FDFC
+.dc.w $FE5F
+.dc.w $FECE
+.dc.w $FF47
+.dc.w $FFCC
+.dc.w $5D
+.dc.w $FB
+.dc.w $1A7
+.dc.w $260
+.dc.w $328
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $2CF
+.dc.w $1BD
+.dc.w $C8
+.dc.w $FFF0
+.dc.w $FF31
+.dc.w $FE89
+.dc.w $FDF9
+.dc.w $FD7D
+.dc.w $FD16
+.dc.w $FCC1
+.dc.w $FC7D
+.dc.w $FC49
+.dc.w $FC25
+.dc.w $FC0D
+.dc.w $FC03
+.dc.w $FC04
+.dc.w $FC0F
+.dc.w $FC25
+.dc.w $FC42
+.dc.w $FC68
+.dc.w $FC95
+.dc.w $FCC7
+.dc.w $FD00
+.dc.w $FD3C
+.dc.w $FD7D
+.dc.w $FDC1
+.dc.w $FE08
+.dc.w $FE52
+.dc.w $FE9C
+.dc.w $FEE8
+.dc.w $FF34
+.dc.w $FF81
+.dc.w $FFCD
+.dc.w $18
+.dc.w $63
+.dc.w $AC
+.dc.w $F3
+.dc.w $139
+.dc.w $17C
+.dc.w $1BD
+.dc.w $1FB
+.dc.w $236
+.dc.w $26E
+.dc.w $2A3
+.dc.w $2D4
+.dc.w $302
+.dc.w $32C
+.dc.w $352
+.dc.w $375
+.dc.w $394
+.dc.w $3AE
+.dc.w $3C5
+.dc.w $3D9
+.dc.w $3E8
+.dc.w $3F3
+.dc.w $3FB
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FB
+.dc.w $3F4
+.dc.w $3E9
+.dc.w $3DB
+.dc.w $3C9
+.dc.w $3B4
+.dc.w $39C
+.dc.w $381
+.dc.w $364
+.dc.w $343
+.dc.w $320
+.dc.w $2FB
+.dc.w $2D3
+.dc.w $2A9
+.dc.w $27D
+.dc.w $24F
+.dc.w $220
+.dc.w $1EF
+.dc.w $1BD
+.dc.w $189
+.dc.w $155
+.dc.w $11F
+.dc.w $E9
+.dc.w $B3
+.dc.w $7C
+.dc.w $44
+.dc.w $D
+.dc.w $FFD7
+.dc.w $FFA0
+.dc.w $FF69
+.dc.w $FF33
+.dc.w $FEFE
+.dc.w $FEC9
+.dc.w $FE96
+.dc.w $FE64
+.dc.w $FE33
+.dc.w $FE03
+.dc.w $FDD5
+.dc.w $FDA8
+.dc.w $FD7D
+.dc.w $FD54
+.dc.w $FD2D
+.dc.w $FD08
+.dc.w $FCE5
+.dc.w $FCC5
+.dc.w $FCA6
+.dc.w $FC8A
+.dc.w $FC71
+.dc.w $FC5A
+.dc.w $FC46
+.dc.w $FC34
+.dc.w $FC25
+.dc.w $FC18
+.dc.w $FC0E
+.dc.w $FC08
+.dc.w $FC03
+.dc.w $FC02
+.dc.w $FC03
+.dc.w $FC08
+.dc.w $FC0F
+.dc.w $FC18
+.dc.w $FC25
+.dc.w $FC34
+.dc.w $FC46
+.dc.w $FC5A
+.dc.w $FC71
+.dc.w $FC8A
+.dc.w $FCA6
+.dc.w $FCC5
+.dc.w $FCE5
+.dc.w $FD08
+.dc.w $FD2D
+.dc.w $FD54
+.dc.w $FD7D
+.dc.w $FDA8
+.dc.w $FDD5
+.dc.w $FE03
+.dc.w $FE33
+.dc.w $FE64
+.dc.w $FE96
+.dc.w $FECA
+.dc.w $FEFE
+.dc.w $FF33
+.dc.w $FF69
+.dc.w $FFA0
+.dc.w $FFD7
+.dc.w $D
+.dc.w $44
+.dc.w $7C
+.dc.w $B3
+.dc.w $E9
+.dc.w $11F
+.dc.w $155
+.dc.w $189
+.dc.w $1BD
+.dc.w $1EF
+.dc.w $220
+.dc.w $24F
+.dc.w $27D
+.dc.w $2A9
+.dc.w $2D3
+.dc.w $2FB
+.dc.w $320
+.dc.w $343
+.dc.w $364
+.dc.w $381
+.dc.w $39C
+.dc.w $3B4
+.dc.w $3C9
+.dc.w $3DB
+.dc.w $3E9
+.dc.w $3F4
+.dc.w $3FB
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FB
+.dc.w $3F3
+.dc.w $3E8
+.dc.w $3D9
+.dc.w $3C5
+.dc.w $3AE
+.dc.w $393
+.dc.w $375
+.dc.w $352
+.dc.w $32C
+.dc.w $301
+.dc.w $2D4
+.dc.w $2A2
+.dc.w $26E
+.dc.w $236
+.dc.w $1FB
+.dc.w $1BD
+.dc.w $17C
+.dc.w $139
+.dc.w $F3
+.dc.w $AC
+.dc.w $62
+.dc.w $18
+.dc.w $FFCD
+.dc.w $FF81
+.dc.w $FF34
+.dc.w $FEE8
+.dc.w $FE9C
+.dc.w $FE51
+.dc.w $FE08
+.dc.w $FDC1
+.dc.w $FD7D
+.dc.w $FD3C
+.dc.w $FCFF
+.dc.w $FCC7
+.dc.w $FC95
+.dc.w $FC68
+.dc.w $FC42
+.dc.w $FC25
+.dc.w $FC0F
+.dc.w $FC04
+.dc.w $FC03
+.dc.w $FC0E
+.dc.w $FC25
+.dc.w $FC4A
+.dc.w $FC7D
+.dc.w $FCC1
+.dc.w $FD16
+.dc.w $FD7D
+.dc.w $FDF9
+.dc.w $FE89
+.dc.w $FF31
+.dc.w $FFF0
+.dc.w $C9
+.dc.w $1BD
+.dc.w $2CF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FD98
+.dc.w $FEF7
+.dc.w $20
+.dc.w $11C
+.dc.w $1EB
+.dc.w $293
+.dc.w $317
+.dc.w $37A
+.dc.w $3C0
+.dc.w $3EA
+.dc.w $3FD
+.dc.w $3FB
+.dc.w $3E7
+.dc.w $3C1
+.dc.w $38E
+.dc.w $34F
+.dc.w $306
+.dc.w $2B4
+.dc.w $25B
+.dc.w $1FE
+.dc.w $19C
+.dc.w $138
+.dc.w $D3
+.dc.w $6E
+.dc.w $9
+.dc.w $FFA7
+.dc.w $FF46
+.dc.w $FEE9
+.dc.w $FE8F
+.dc.w $FE3A
+.dc.w $FDEA
+.dc.w $FD9F
+.dc.w $FD59
+.dc.w $FD1A
+.dc.w $FCE1
+.dc.w $FCAE
+.dc.w $FC82
+.dc.w $FC5C
+.dc.w $FC3D
+.dc.w $FC25
+.dc.w $FC13
+.dc.w $FC07
+.dc.w $FC02
+.dc.w $FC04
+.dc.w $FC0B
+.dc.w $FC18
+.dc.w $FC2B
+.dc.w $FC43
+.dc.w $FC61
+.dc.w $FC83
+.dc.w $FCAA
+.dc.w $FCD5
+.dc.w $FD04
+.dc.w $FD37
+.dc.w $FD6E
+.dc.w $FDA7
+.dc.w $FDE3
+.dc.w $FE21
+.dc.w $FE61
+.dc.w $FEA3
+.dc.w $FEE6
+.dc.w $FF2B
+.dc.w $FF6F
+.dc.w $FFB5
+.dc.w $FFFA
+.dc.w $3E
+.dc.w $82
+.dc.w $C6
+.dc.w $108
+.dc.w $149
+.dc.w $188
+.dc.w $1C5
+.dc.w $200
+.dc.w $239
+.dc.w $26F
+.dc.w $2A2
+.dc.w $2D3
+.dc.w $300
+.dc.w $329
+.dc.w $350
+.dc.w $373
+.dc.w $392
+.dc.w $3AD
+.dc.w $3C5
+.dc.w $3D8
+.dc.w $3E8
+.dc.w $3F3
+.dc.w $3FB
+.dc.w $3FF
+.dc.w $3FE
+.dc.w $3FA
+.dc.w $3F2
+.dc.w $3E6
+.dc.w $3D6
+.dc.w $3C2
+.dc.w $3AB
+.dc.w $390
+.dc.w $371
+.dc.w $350
+.dc.w $32B
+.dc.w $303
+.dc.w $2D9
+.dc.w $2AC
+.dc.w $27C
+.dc.w $24A
+.dc.w $215
+.dc.w $1DF
+.dc.w $1A7
+.dc.w $16D
+.dc.w $133
+.dc.w $F7
+.dc.w $BA
+.dc.w $7C
+.dc.w $3E
+.dc.w $0
+.dc.w $FFC3
+.dc.w $FF85
+.dc.w $FF47
+.dc.w $FF0A
+.dc.w $FECE
+.dc.w $FE93
+.dc.w $FE5A
+.dc.w $FE22
+.dc.w $FDEC
+.dc.w $FDB7
+.dc.w $FD85
+.dc.w $FD55
+.dc.w $FD28
+.dc.w $FCFE
+.dc.w $FCD6
+.dc.w $FCB1
+.dc.w $FC8F
+.dc.w $FC71
+.dc.w $FC56
+.dc.w $FC3F
+.dc.w $FC2B
+.dc.w $FC1B
+.dc.w $FC0F
+.dc.w $FC07
+.dc.w $FC03
+.dc.w $FC02
+.dc.w $FC06
+.dc.w $FC0E
+.dc.w $FC19
+.dc.w $FC29
+.dc.w $FC3D
+.dc.w $FC54
+.dc.w $FC6F
+.dc.w $FC8E
+.dc.w $FCB1
+.dc.w $FCD8
+.dc.w $FD01
+.dc.w $FD2E
+.dc.w $FD5F
+.dc.w $FD92
+.dc.w $FDC8
+.dc.w $FE01
+.dc.w $FE3C
+.dc.w $FE79
+.dc.w $FEB8
+.dc.w $FEF9
+.dc.w $FF3B
+.dc.w $FF7F
+.dc.w $FFC3
+.dc.w $7
+.dc.w $4C
+.dc.w $92
+.dc.w $D7
+.dc.w $11B
+.dc.w $15E
+.dc.w $1A0
+.dc.w $1E0
+.dc.w $21E
+.dc.w $25A
+.dc.w $294
+.dc.w $2CA
+.dc.w $2FD
+.dc.w $32C
+.dc.w $357
+.dc.w $37E
+.dc.w $3A0
+.dc.w $3BE
+.dc.w $3D6
+.dc.w $3E9
+.dc.w $3F6
+.dc.w $3FD
+.dc.w $3FF
+.dc.w $3FA
+.dc.w $3EE
+.dc.w $3DC
+.dc.w $3C4
+.dc.w $3A5
+.dc.w $37F
+.dc.w $353
+.dc.w $320
+.dc.w $2E7
+.dc.w $2A7
+.dc.w $262
+.dc.w $217
+.dc.w $1C7
+.dc.w $172
+.dc.w $118
+.dc.w $BB
+.dc.w $5A
+.dc.w $FFF8
+.dc.w $FF93
+.dc.w $FF2E
+.dc.w $FEC9
+.dc.w $FE65
+.dc.w $FE03
+.dc.w $FDA5
+.dc.w $FD4D
+.dc.w $FCFB
+.dc.w $FCB2
+.dc.w $FC73
+.dc.w $FC3F
+.dc.w $FC1A
+.dc.w $FC06
+.dc.w $FC04
+.dc.w $FC17
+.dc.w $FC41
+.dc.w $FC87
+.dc.w $FCEA
+.dc.w $FD6E
+.dc.w $FE16
+.dc.w $FEE5
+.dc.w $FFE1
+.dc.w $10A
+.dc.w $269
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $1F8
+.dc.w $4E
+.dc.w $FEF9
+.dc.w $FDEE
+.dc.w $FD25
+.dc.w $FC97
+.dc.w $FC3B
+.dc.w $FC0C
+.dc.w $FC03
+.dc.w $FC1B
+.dc.w $FC4D
+.dc.w $FC97
+.dc.w $FCF2
+.dc.w $FD5C
+.dc.w $FDD0
+.dc.w $FE4C
+.dc.w $FECC
+.dc.w $FF4E
+.dc.w $FFD0
+.dc.w $4F
+.dc.w $CA
+.dc.w $140
+.dc.w $1B0
+.dc.w $217
+.dc.w $276
+.dc.w $2CB
+.dc.w $316
+.dc.w $357
+.dc.w $38E
+.dc.w $3B9
+.dc.w $3DA
+.dc.w $3F1
+.dc.w $3FD
+.dc.w $3FF
+.dc.w $3F7
+.dc.w $3E5
+.dc.w $3CB
+.dc.w $3A8
+.dc.w $37E
+.dc.w $34C
+.dc.w $314
+.dc.w $2D6
+.dc.w $293
+.dc.w $24B
+.dc.w $1FF
+.dc.w $1B0
+.dc.w $15E
+.dc.w $10A
+.dc.w $B5
+.dc.w $5F
+.dc.w $9
+.dc.w $FFB5
+.dc.w $FF61
+.dc.w $FF0E
+.dc.w $FEBE
+.dc.w $FE70
+.dc.w $FE25
+.dc.w $FDDE
+.dc.w $FD9B
+.dc.w $FD5C
+.dc.w $FD22
+.dc.w $FCEC
+.dc.w $FCBC
+.dc.w $FC90
+.dc.w $FC6B
+.dc.w $FC4B
+.dc.w $FC31
+.dc.w $FC1C
+.dc.w $FC0E
+.dc.w $FC05
+.dc.w $FC02
+.dc.w $FC05
+.dc.w $FC0E
+.dc.w $FC1C
+.dc.w $FC30
+.dc.w $FC49
+.dc.w $FC67
+.dc.w $FC8A
+.dc.w $FCB2
+.dc.w $FCDE
+.dc.w $FD0E
+.dc.w $FD42
+.dc.w $FD7A
+.dc.w $FDB5
+.dc.w $FDF3
+.dc.w $FE33
+.dc.w $FE76
+.dc.w $FEBA
+.dc.w $FF00
+.dc.w $FF48
+.dc.w $FF90
+.dc.w $FFD8
+.dc.w $20
+.dc.w $68
+.dc.w $B0
+.dc.w $F6
+.dc.w $13C
+.dc.w $17F
+.dc.w $1C1
+.dc.w $200
+.dc.w $23D
+.dc.w $277
+.dc.w $2AE
+.dc.w $2E1
+.dc.w $311
+.dc.w $33D
+.dc.w $364
+.dc.w $388
+.dc.w $3A7
+.dc.w $3C2
+.dc.w $3D8
+.dc.w $3E9
+.dc.w $3F5
+.dc.w $3FD
+.dc.w $3FF
+.dc.w $3FD
+.dc.w $3F5
+.dc.w $3E9
+.dc.w $3D8
+.dc.w $3C2
+.dc.w $3A7
+.dc.w $388
+.dc.w $364
+.dc.w $33D
+.dc.w $311
+.dc.w $2E1
+.dc.w $2AE
+.dc.w $277
+.dc.w $23D
+.dc.w $200
+.dc.w $1C1
+.dc.w $17F
+.dc.w $13B
+.dc.w $F6
+.dc.w $AF
+.dc.w $68
+.dc.w $20
+.dc.w $FFD8
+.dc.w $FF8F
+.dc.w $FF47
+.dc.w $FF00
+.dc.w $FEBA
+.dc.w $FE76
+.dc.w $FE33
+.dc.w $FDF2
+.dc.w $FDB5
+.dc.w $FD7A
+.dc.w $FD42
+.dc.w $FD0E
+.dc.w $FCDE
+.dc.w $FCB1
+.dc.w $FC8A
+.dc.w $FC67
+.dc.w $FC49
+.dc.w $FC30
+.dc.w $FC1C
+.dc.w $FC0E
+.dc.w $FC05
+.dc.w $FC02
+.dc.w $FC05
+.dc.w $FC0E
+.dc.w $FC1C
+.dc.w $FC31
+.dc.w $FC4B
+.dc.w $FC6B
+.dc.w $FC91
+.dc.w $FCBC
+.dc.w $FCEC
+.dc.w $FD22
+.dc.w $FD5C
+.dc.w $FD9B
+.dc.w $FDDE
+.dc.w $FE26
+.dc.w $FE70
+.dc.w $FEBE
+.dc.w $FF0E
+.dc.w $FF61
+.dc.w $FFB5
+.dc.w $9
+.dc.w $5F
+.dc.w $B5
+.dc.w $10A
+.dc.w $15E
+.dc.w $1B0
+.dc.w $1FF
+.dc.w $24B
+.dc.w $293
+.dc.w $2D6
+.dc.w $314
+.dc.w $34D
+.dc.w $37E
+.dc.w $3A9
+.dc.w $3CB
+.dc.w $3E5
+.dc.w $3F7
+.dc.w $3FF
+.dc.w $3FD
+.dc.w $3F1
+.dc.w $3DA
+.dc.w $3B9
+.dc.w $38E
+.dc.w $357
+.dc.w $316
+.dc.w $2CB
+.dc.w $276
+.dc.w $217
+.dc.w $1B0
+.dc.w $140
+.dc.w $CA
+.dc.w $4F
+.dc.w $FFD0
+.dc.w $FF4E
+.dc.w $FECC
+.dc.w $FE4C
+.dc.w $FDD0
+.dc.w $FD5C
+.dc.w $FCF2
+.dc.w $FC97
+.dc.w $FC4D
+.dc.w $FC1A
+.dc.w $FC03
+.dc.w $FC0C
+.dc.w $FC3B
+.dc.w $FC97
+.dc.w $FD25
+.dc.w $FDEE
+.dc.w $FEF9
+.dc.w $4E
+.dc.w $1F8
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FE83
+.dc.w $71
+.dc.w $1E1
+.dc.w $2E5
+.dc.w $38C
+.dc.w $3E6
+.dc.w $3FF
+.dc.w $3E3
+.dc.w $39C
+.dc.w $335
+.dc.w $2B5
+.dc.w $223
+.dc.w $186
+.dc.w $E4
+.dc.w $41
+.dc.w $FFA3
+.dc.w $FF0A
+.dc.w $FE7B
+.dc.w $FDF7
+.dc.w $FD81
+.dc.w $FD1A
+.dc.w $FCC2
+.dc.w $FC7B
+.dc.w $FC44
+.dc.w $FC1E
+.dc.w $FC08
+.dc.w $FC02
+.dc.w $FC0B
+.dc.w $FC22
+.dc.w $FC47
+.dc.w $FC77
+.dc.w $FCB3
+.dc.w $FCF9
+.dc.w $FD48
+.dc.w $FD9E
+.dc.w $FDFA
+.dc.w $FE5B
+.dc.w $FEC0
+.dc.w $FF27
+.dc.w $FF90
+.dc.w $FFF9
+.dc.w $60
+.dc.w $C6
+.dc.w $129
+.dc.w $188
+.dc.w $1E3
+.dc.w $238
+.dc.w $288
+.dc.w $2D1
+.dc.w $313
+.dc.w $34D
+.dc.w $37F
+.dc.w $3A9
+.dc.w $3CB
+.dc.w $3E5
+.dc.w $3F6
+.dc.w $3FE
+.dc.w $3FE
+.dc.w $3F6
+.dc.w $3E5
+.dc.w $3CD
+.dc.w $3AE
+.dc.w $387
+.dc.w $359
+.dc.w $325
+.dc.w $2EC
+.dc.w $2AD
+.dc.w $269
+.dc.w $221
+.dc.w $1D5
+.dc.w $187
+.dc.w $135
+.dc.w $E2
+.dc.w $8E
+.dc.w $39
+.dc.w $FFE5
+.dc.w $FF90
+.dc.w $FF3C
+.dc.w $FEEA
+.dc.w $FE9A
+.dc.w $FE4D
+.dc.w $FE03
+.dc.w $FDBC
+.dc.w $FD7A
+.dc.w $FD3C
+.dc.w $FD02
+.dc.w $FCCE
+.dc.w $FC9F
+.dc.w $FC76
+.dc.w $FC53
+.dc.w $FC36
+.dc.w $FC20
+.dc.w $FC0F
+.dc.w $FC05
+.dc.w $FC02
+.dc.w $FC05
+.dc.w $FC0E
+.dc.w $FC1E
+.dc.w $FC34
+.dc.w $FC50
+.dc.w $FC72
+.dc.w $FC9A
+.dc.w $FCC6
+.dc.w $FCF8
+.dc.w $FD2F
+.dc.w $FD6A
+.dc.w $FDA9
+.dc.w $FDEC
+.dc.w $FE32
+.dc.w $FE7B
+.dc.w $FEC6
+.dc.w $FF13
+.dc.w $FF62
+.dc.w $FFB1
+.dc.w $0
+.dc.w $50
+.dc.w $A0
+.dc.w $EE
+.dc.w $13B
+.dc.w $186
+.dc.w $1CF
+.dc.w $215
+.dc.w $258
+.dc.w $297
+.dc.w $2D2
+.dc.w $309
+.dc.w $33B
+.dc.w $368
+.dc.w $38F
+.dc.w $3B1
+.dc.w $3CD
+.dc.w $3E3
+.dc.w $3F3
+.dc.w $3FC
+.dc.w $3FF
+.dc.w $3FC
+.dc.w $3F2
+.dc.w $3E1
+.dc.w $3CB
+.dc.w $3AE
+.dc.w $38B
+.dc.w $362
+.dc.w $333
+.dc.w $2FF
+.dc.w $2C5
+.dc.w $287
+.dc.w $245
+.dc.w $1FE
+.dc.w $1B4
+.dc.w $167
+.dc.w $117
+.dc.w $C5
+.dc.w $71
+.dc.w $1C
+.dc.w $FFC8
+.dc.w $FF73
+.dc.w $FF1E
+.dc.w $FECB
+.dc.w $FE7A
+.dc.w $FE2B
+.dc.w $FDE0
+.dc.w $FD98
+.dc.w $FD54
+.dc.w $FD15
+.dc.w $FCDB
+.dc.w $FCA8
+.dc.w $FC7A
+.dc.w $FC53
+.dc.w $FC34
+.dc.w $FC1C
+.dc.w $FC0B
+.dc.w $FC03
+.dc.w $FC03
+.dc.w $FC0B
+.dc.w $FC1C
+.dc.w $FC36
+.dc.w $FC58
+.dc.w $FC82
+.dc.w $FCB4
+.dc.w $FCEF
+.dc.w $FD30
+.dc.w $FD79
+.dc.w $FDC9
+.dc.w $FE1E
+.dc.w $FE79
+.dc.w $FED8
+.dc.w $FF3B
+.dc.w $FFA1
+.dc.w $8
+.dc.w $71
+.dc.w $DA
+.dc.w $141
+.dc.w $1A6
+.dc.w $207
+.dc.w $264
+.dc.w $2BA
+.dc.w $308
+.dc.w $34E
+.dc.w $38A
+.dc.w $3BB
+.dc.w $3DF
+.dc.w $3F6
+.dc.w $3FF
+.dc.w $3F9
+.dc.w $3E3
+.dc.w $3BD
+.dc.w $386
+.dc.w $33F
+.dc.w $2E7
+.dc.w $280
+.dc.w $20A
+.dc.w $186
+.dc.w $F7
+.dc.w $5E
+.dc.w $FFBF
+.dc.w $FF1D
+.dc.w $FE7A
+.dc.w $FDDE
+.dc.w $FD4C
+.dc.w $FCCC
+.dc.w $FC65
+.dc.w $FC1E
+.dc.w $FC02
+.dc.w $FC1B
+.dc.w $FC75
+.dc.w $FD1C
+.dc.w $FE20
+.dc.w $FF91
+.dc.w $17E
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FE
+.dc.w $FED6
+.dc.w $FD60
+.dc.w $FC7D
+.dc.w $FC13
+.dc.w $FC07
+.dc.w $FC46
+.dc.w $FCBB
+.dc.w $FD57
+.dc.w $FE0D
+.dc.w $FED0
+.dc.w $FF98
+.dc.w $5B
+.dc.w $114
+.dc.w $1BF
+.dc.w $257
+.dc.w $2DA
+.dc.w $345
+.dc.w $398
+.dc.w $3D2
+.dc.w $3F4
+.dc.w $3FF
+.dc.w $3F3
+.dc.w $3D3
+.dc.w $39F
+.dc.w $35B
+.dc.w $307
+.dc.w $2A7
+.dc.w $23C
+.dc.w $1CA
+.dc.w $151
+.dc.w $D4
+.dc.w $56
+.dc.w $FFD9
+.dc.w $FF5D
+.dc.w $FEE5
+.dc.w $FE72
+.dc.w $FE07
+.dc.w $FDA3
+.dc.w $FD48
+.dc.w $FCF7
+.dc.w $FCB1
+.dc.w $FC77
+.dc.w $FC48
+.dc.w $FC25
+.dc.w $FC0E
+.dc.w $FC03
+.dc.w $FC04
+.dc.w $FC11
+.dc.w $FC29
+.dc.w $FC4B
+.dc.w $FC78
+.dc.w $FCAF
+.dc.w $FCED
+.dc.w $FD34
+.dc.w $FD82
+.dc.w $FDD6
+.dc.w $FE2F
+.dc.w $FE8C
+.dc.w $FEEC
+.dc.w $FF4E
+.dc.w $FFB2
+.dc.w $15
+.dc.w $78
+.dc.w $DA
+.dc.w $139
+.dc.w $195
+.dc.w $1EC
+.dc.w $23F
+.dc.w $28D
+.dc.w $2D4
+.dc.w $315
+.dc.w $34E
+.dc.w $380
+.dc.w $3AA
+.dc.w $3CC
+.dc.w $3E5
+.dc.w $3F6
+.dc.w $3FE
+.dc.w $3FE
+.dc.w $3F5
+.dc.w $3E4
+.dc.w $3CA
+.dc.w $3A9
+.dc.w $381
+.dc.w $351
+.dc.w $31A
+.dc.w $2DD
+.dc.w $29B
+.dc.w $253
+.dc.w $206
+.dc.w $1B6
+.dc.w $163
+.dc.w $10C
+.dc.w $B4
+.dc.w $5B
+.dc.w $1
+.dc.w $FFA8
+.dc.w $FF4F
+.dc.w $FEF7
+.dc.w $FEA2
+.dc.w $FE4F
+.dc.w $FE00
+.dc.w $FDB5
+.dc.w $FD6E
+.dc.w $FD2C
+.dc.w $FCF0
+.dc.w $FCBA
+.dc.w $FC8A
+.dc.w $FC61
+.dc.w $FC3F
+.dc.w $FC25
+.dc.w $FC11
+.dc.w $FC06
+.dc.w $FC02
+.dc.w $FC06
+.dc.w $FC11
+.dc.w $FC25
+.dc.w $FC3F
+.dc.w $FC61
+.dc.w $FC8A
+.dc.w $FCBA
+.dc.w $FCF0
+.dc.w $FD2C
+.dc.w $FD6E
+.dc.w $FDB5
+.dc.w $FE00
+.dc.w $FE4F
+.dc.w $FEA2
+.dc.w $FEF7
+.dc.w $FF4F
+.dc.w $FFA8
+.dc.w $1
+.dc.w $5B
+.dc.w $B4
+.dc.w $10D
+.dc.w $163
+.dc.w $1B6
+.dc.w $207
+.dc.w $253
+.dc.w $29B
+.dc.w $2DD
+.dc.w $31A
+.dc.w $351
+.dc.w $381
+.dc.w $3A9
+.dc.w $3CB
+.dc.w $3E4
+.dc.w $3F5
+.dc.w $3FE
+.dc.w $3FE
+.dc.w $3F6
+.dc.w $3E5
+.dc.w $3CC
+.dc.w $3AA
+.dc.w $380
+.dc.w $34E
+.dc.w $315
+.dc.w $2D4
+.dc.w $28D
+.dc.w $23F
+.dc.w $1EC
+.dc.w $195
+.dc.w $139
+.dc.w $DA
+.dc.w $78
+.dc.w $15
+.dc.w $FFB2
+.dc.w $FF4E
+.dc.w $FEEC
+.dc.w $FE8C
+.dc.w $FE2E
+.dc.w $FDD6
+.dc.w $FD82
+.dc.w $FD34
+.dc.w $FCED
+.dc.w $FCAE
+.dc.w $FC78
+.dc.w $FC4B
+.dc.w $FC29
+.dc.w $FC11
+.dc.w $FC04
+.dc.w $FC03
+.dc.w $FC0E
+.dc.w $FC25
+.dc.w $FC48
+.dc.w $FC77
+.dc.w $FCB1
+.dc.w $FCF7
+.dc.w $FD48
+.dc.w $FDA3
+.dc.w $FE07
+.dc.w $FE73
+.dc.w $FEE5
+.dc.w $FF5D
+.dc.w $FFD9
+.dc.w $56
+.dc.w $D4
+.dc.w $151
+.dc.w $1CA
+.dc.w $23C
+.dc.w $2A7
+.dc.w $307
+.dc.w $35B
+.dc.w $39F
+.dc.w $3D3
+.dc.w $3F3
+.dc.w $3FF
+.dc.w $3F4
+.dc.w $3D2
+.dc.w $398
+.dc.w $345
+.dc.w $2DA
+.dc.w $257
+.dc.w $1BF
+.dc.w $114
+.dc.w $5A
+.dc.w $FF97
+.dc.w $FED0
+.dc.w $FE0C
+.dc.w $FD57
+.dc.w $FCBB
+.dc.w $FC46
+.dc.w $FC07
+.dc.w $FC13
+.dc.w $FC7D
+.dc.w $FD60
+.dc.w $FED6
+.dc.w $FE
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FF88
+.dc.w $1DC
+.dc.w $33F
+.dc.w $3E4
+.dc.w $3F8
+.dc.w $3A3
+.dc.w $304
+.dc.w $235
+.dc.w $14D
+.dc.w $5D
+.dc.w $FF74
+.dc.w $FE9B
+.dc.w $FDDA
+.dc.w $FD37
+.dc.w $FCB6
+.dc.w $FC57
+.dc.w $FC1C
+.dc.w $FC03
+.dc.w $FC0B
+.dc.w $FC30
+.dc.w $FC71
+.dc.w $FCC9
+.dc.w $FD35
+.dc.w $FDB1
+.dc.w $FE39
+.dc.w $FEC9
+.dc.w $FF5E
+.dc.w $FFF4
+.dc.w $87
+.dc.w $116
+.dc.w $19E
+.dc.w $21B
+.dc.w $28D
+.dc.w $2F2
+.dc.w $347
+.dc.w $38D
+.dc.w $3C3
+.dc.w $3E7
+.dc.w $3FB
+.dc.w $3FE
+.dc.w $3F1
+.dc.w $3D5
+.dc.w $3A9
+.dc.w $370
+.dc.w $32B
+.dc.w $2DA
+.dc.w $280
+.dc.w $21E
+.dc.w $1B4
+.dc.w $146
+.dc.w $D4
+.dc.w $60
+.dc.w $FFED
+.dc.w $FF79
+.dc.w $FF08
+.dc.w $FE9B
+.dc.w $FE33
+.dc.w $FDD1
+.dc.w $FD77
+.dc.w $FD25
+.dc.w $FCDC
+.dc.w $FC9C
+.dc.w $FC67
+.dc.w $FC3D
+.dc.w $FC1E
+.dc.w $FC0B
+.dc.w $FC02
+.dc.w $FC05
+.dc.w $FC14
+.dc.w $FC2D
+.dc.w $FC50
+.dc.w $FC7E
+.dc.w $FCB5
+.dc.w $FCF4
+.dc.w $FD3C
+.dc.w $FD8A
+.dc.w $FDDF
+.dc.w $FE39
+.dc.w $FE98
+.dc.w $FEFA
+.dc.w $FF5E
+.dc.w $FFC4
+.dc.w $29
+.dc.w $8E
+.dc.w $F2
+.dc.w $153
+.dc.w $1B0
+.dc.w $209
+.dc.w $25D
+.dc.w $2AB
+.dc.w $2F2
+.dc.w $332
+.dc.w $36A
+.dc.w $39A
+.dc.w $3C0
+.dc.w $3DE
+.dc.w $3F2
+.dc.w $3FD
+.dc.w $3FE
+.dc.w $3F6
+.dc.w $3E4
+.dc.w $3CA
+.dc.w $3A6
+.dc.w $379
+.dc.w $345
+.dc.w $308
+.dc.w $2C5
+.dc.w $27B
+.dc.w $22C
+.dc.w $1D7
+.dc.w $17E
+.dc.w $121
+.dc.w $C2
+.dc.w $62
+.dc.w $0
+.dc.w $FF9F
+.dc.w $FF3E
+.dc.w $FEDF
+.dc.w $FE83
+.dc.w $FE2A
+.dc.w $FDD5
+.dc.w $FD86
+.dc.w $FD3C
+.dc.w $FCF8
+.dc.w $FCBC
+.dc.w $FC88
+.dc.w $FC5B
+.dc.w $FC37
+.dc.w $FC1D
+.dc.w $FC0B
+.dc.w $FC03
+.dc.w $FC04
+.dc.w $FC0F
+.dc.w $FC23
+.dc.w $FC41
+.dc.w $FC68
+.dc.w $FC97
+.dc.w $FCCF
+.dc.w $FD0F
+.dc.w $FD56
+.dc.w $FDA4
+.dc.w $FDF8
+.dc.w $FE51
+.dc.w $FEAE
+.dc.w $FF0F
+.dc.w $FF73
+.dc.w $FFD8
+.dc.w $3D
+.dc.w $A3
+.dc.w $107
+.dc.w $169
+.dc.w $1C8
+.dc.w $222
+.dc.w $277
+.dc.w $2C5
+.dc.w $30D
+.dc.w $34C
+.dc.w $383
+.dc.w $3B1
+.dc.w $3D4
+.dc.w $3ED
+.dc.w $3FC
+.dc.w $3FF
+.dc.w $3F6
+.dc.w $3E3
+.dc.w $3C4
+.dc.w $39A
+.dc.w $365
+.dc.w $325
+.dc.w $2DC
+.dc.w $28A
+.dc.w $22F
+.dc.w $1CE
+.dc.w $166
+.dc.w $F8
+.dc.w $88
+.dc.w $14
+.dc.w $FFA1
+.dc.w $FF2D
+.dc.w $FEBB
+.dc.w $FE4C
+.dc.w $FDE3
+.dc.w $FD81
+.dc.w $FD26
+.dc.w $FCD6
+.dc.w $FC91
+.dc.w $FC58
+.dc.w $FC2C
+.dc.w $FC10
+.dc.w $FC03
+.dc.w $FC06
+.dc.w $FC1A
+.dc.w $FC3E
+.dc.w $FC74
+.dc.w $FCBA
+.dc.w $FD0F
+.dc.w $FD74
+.dc.w $FDE6
+.dc.w $FE63
+.dc.w $FEEB
+.dc.w $FF7A
+.dc.w $D
+.dc.w $A3
+.dc.w $138
+.dc.w $1C9
+.dc.w $250
+.dc.w $2CC
+.dc.w $338
+.dc.w $390
+.dc.w $3D1
+.dc.w $3F6
+.dc.w $3FE
+.dc.w $3E5
+.dc.w $3AA
+.dc.w $34B
+.dc.w $2CA
+.dc.w $227
+.dc.w $166
+.dc.w $8D
+.dc.w $FFA4
+.dc.w $FEB4
+.dc.w $FDCC
+.dc.w $FCFD
+.dc.w $FC5E
+.dc.w $FC09
+.dc.w $FC1D
+.dc.w $FCC3
+.dc.w $FE25
+.dc.w $7A
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FFF4
+.dc.w $FD85
+.dc.w $FC51
+.dc.w $FC03
+.dc.w $FC57
+.dc.w $FD16
+.dc.w $FE13
+.dc.w $FF2C
+.dc.w $44
+.dc.w $14B
+.dc.w $230
+.dc.w $2EB
+.dc.w $377
+.dc.w $3D1
+.dc.w $3FB
+.dc.w $3F7
+.dc.w $3C9
+.dc.w $377
+.dc.w $305
+.dc.w $27B
+.dc.w $1DE
+.dc.w $136
+.dc.w $86
+.dc.w $FFD8
+.dc.w $FF2C
+.dc.w $FE8A
+.dc.w $FDF4
+.dc.w $FD6E
+.dc.w $FCFB
+.dc.w $FC9C
+.dc.w $FC54
+.dc.w $FC22
+.dc.w $FC07
+.dc.w $FC03
+.dc.w $FC15
+.dc.w $FC3C
+.dc.w $FC76
+.dc.w $FCC1
+.dc.w $FD1C
+.dc.w $FD85
+.dc.w $FDF8
+.dc.w $FE74
+.dc.w $FEF6
+.dc.w $FF7B
+.dc.w $1
+.dc.w $87
+.dc.w $109
+.dc.w $186
+.dc.w $1FB
+.dc.w $268
+.dc.w $2C9
+.dc.w $31F
+.dc.w $368
+.dc.w $3A4
+.dc.w $3D0
+.dc.w $3EE
+.dc.w $3FD
+.dc.w $3FD
+.dc.w $3EE
+.dc.w $3D2
+.dc.w $3A7
+.dc.w $370
+.dc.w $32D
+.dc.w $2DF
+.dc.w $287
+.dc.w $228
+.dc.w $1C1
+.dc.w $155
+.dc.w $E5
+.dc.w $72
+.dc.w $0
+.dc.w $FF8D
+.dc.w $FF1C
+.dc.w $FEAE
+.dc.w $FE44
+.dc.w $FDE1
+.dc.w $FD85
+.dc.w $FD30
+.dc.w $FCE5
+.dc.w $FCA3
+.dc.w $FC6C
+.dc.w $FC40
+.dc.w $FC20
+.dc.w $FC0B
+.dc.w $FC02
+.dc.w $FC05
+.dc.w $FC14
+.dc.w $FC2F
+.dc.w $FC55
+.dc.w $FC85
+.dc.w $FCC0
+.dc.w $FD04
+.dc.w $FD50
+.dc.w $FDA4
+.dc.w $FDFF
+.dc.w $FE5F
+.dc.w $FEC4
+.dc.w $FF2C
+.dc.w $FF97
+.dc.w $1
+.dc.w $6D
+.dc.w $D7
+.dc.w $13E
+.dc.w $1A2
+.dc.w $202
+.dc.w $25B
+.dc.w $2AE
+.dc.w $2FA
+.dc.w $33D
+.dc.w $377
+.dc.w $3A7
+.dc.w $3CD
+.dc.w $3E9
+.dc.w $3F9
+.dc.w $3FF
+.dc.w $3F9
+.dc.w $3E9
+.dc.w $3CD
+.dc.w $3A7
+.dc.w $377
+.dc.w $33D
+.dc.w $2FA
+.dc.w $2AE
+.dc.w $25B
+.dc.w $202
+.dc.w $1A2
+.dc.w $13E
+.dc.w $D7
+.dc.w $6C
+.dc.w $1
+.dc.w $FF96
+.dc.w $FF2C
+.dc.w $FEC4
+.dc.w $FE5F
+.dc.w $FDFF
+.dc.w $FDA4
+.dc.w $FD50
+.dc.w $FD03
+.dc.w $FCC0
+.dc.w $FC85
+.dc.w $FC55
+.dc.w $FC2F
+.dc.w $FC14
+.dc.w $FC05
+.dc.w $FC02
+.dc.w $FC0B
+.dc.w $FC20
+.dc.w $FC40
+.dc.w $FC6C
+.dc.w $FCA3
+.dc.w $FCE5
+.dc.w $FD30
+.dc.w $FD85
+.dc.w $FDE1
+.dc.w $FE45
+.dc.w $FEAE
+.dc.w $FF1C
+.dc.w $FF8D
+.dc.w $0
+.dc.w $73
+.dc.w $E5
+.dc.w $155
+.dc.w $1C1
+.dc.w $228
+.dc.w $287
+.dc.w $2DF
+.dc.w $32D
+.dc.w $370
+.dc.w $3A7
+.dc.w $3D2
+.dc.w $3EE
+.dc.w $3FD
+.dc.w $3FD
+.dc.w $3EE
+.dc.w $3D0
+.dc.w $3A3
+.dc.w $368
+.dc.w $31F
+.dc.w $2C9
+.dc.w $267
+.dc.w $1FB
+.dc.w $186
+.dc.w $109
+.dc.w $87
+.dc.w $1
+.dc.w $FF7B
+.dc.w $FEF6
+.dc.w $FE74
+.dc.w $FDF8
+.dc.w $FD85
+.dc.w $FD1C
+.dc.w $FCC1
+.dc.w $FC76
+.dc.w $FC3C
+.dc.w $FC15
+.dc.w $FC03
+.dc.w $FC07
+.dc.w $FC22
+.dc.w $FC54
+.dc.w $FC9C
+.dc.w $FCFB
+.dc.w $FD6E
+.dc.w $FDF4
+.dc.w $FE8A
+.dc.w $FF2C
+.dc.w $FFD8
+.dc.w $87
+.dc.w $136
+.dc.w $1DF
+.dc.w $27B
+.dc.w $305
+.dc.w $377
+.dc.w $3CA
+.dc.w $3F7
+.dc.w $3FB
+.dc.w $3D1
+.dc.w $377
+.dc.w $2EB
+.dc.w $230
+.dc.w $14A
+.dc.w $44
+.dc.w $FF2C
+.dc.w $FE13
+.dc.w $FD16
+.dc.w $FC57
+.dc.w $FC03
+.dc.w $FC51
+.dc.w $FD85
+.dc.w $FFF4
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $94
+.dc.w $306
+.dc.w $3F1
+.dc.w $3D2
+.dc.w $30A
+.dc.w $1E5
+.dc.w $9C
+.dc.w $FF59
+.dc.w $FE36
+.dc.w $FD48
+.dc.w $FC99
+.dc.w $FC2D
+.dc.w $FC03
+.dc.w $FC16
+.dc.w $FC60
+.dc.w $FCD7
+.dc.w $FD72
+.dc.w $FE27
+.dc.w $FEEC
+.dc.w $FFB8
+.dc.w $82
+.dc.w $143
+.dc.w $1F5
+.dc.w $292
+.dc.w $315
+.dc.w $37D
+.dc.w $3C7
+.dc.w $3F2
+.dc.w $3FF
+.dc.w $3EE
+.dc.w $3C1
+.dc.w $37B
+.dc.w $31E
+.dc.w $2AE
+.dc.w $22D
+.dc.w $1A1
+.dc.w $10C
+.dc.w $72
+.dc.w $FFD9
+.dc.w $FF41
+.dc.w $FEAE
+.dc.w $FE25
+.dc.w $FDA6
+.dc.w $FD36
+.dc.w $FCD5
+.dc.w $FC85
+.dc.w $FC47
+.dc.w $FC1D
+.dc.w $FC06
+.dc.w $FC03
+.dc.w $FC13
+.dc.w $FC35
+.dc.w $FC69
+.dc.w $FCAC
+.dc.w $FCFF
+.dc.w $FD5E
+.dc.w $FDC9
+.dc.w $FE3C
+.dc.w $FEB7
+.dc.w $FF36
+.dc.w $FFB8
+.dc.w $3A
+.dc.w $BB
+.dc.w $138
+.dc.w $1B0
+.dc.w $220
+.dc.w $288
+.dc.w $2E5
+.dc.w $336
+.dc.w $37B
+.dc.w $3B2
+.dc.w $3DA
+.dc.w $3F4
+.dc.w $3FF
+.dc.w $3FA
+.dc.w $3E8
+.dc.w $3C6
+.dc.w $397
+.dc.w $35B
+.dc.w $314
+.dc.w $2C1
+.dc.w $264
+.dc.w $200
+.dc.w $195
+.dc.w $124
+.dc.w $AF
+.dc.w $39
+.dc.w $FFC3
+.dc.w $FF4D
+.dc.w $FEDA
+.dc.w $FE6B
+.dc.w $FE01
+.dc.w $FD9F
+.dc.w $FD44
+.dc.w $FCF4
+.dc.w $FCAD
+.dc.w $FC72
+.dc.w $FC43
+.dc.w $FC20
+.dc.w $FC0B
+.dc.w $FC02
+.dc.w $FC07
+.dc.w $FC19
+.dc.w $FC38
+.dc.w $FC63
+.dc.w $FC9A
+.dc.w $FCDD
+.dc.w $FD29
+.dc.w $FD7F
+.dc.w $FDDD
+.dc.w $FE42
+.dc.w $FEAD
+.dc.w $FF1C
+.dc.w $FF8E
+.dc.w $0
+.dc.w $74
+.dc.w $E5
+.dc.w $154
+.dc.w $1BF
+.dc.w $224
+.dc.w $282
+.dc.w $2D8
+.dc.w $325
+.dc.w $367
+.dc.w $39E
+.dc.w $3C9
+.dc.w $3E8
+.dc.w $3FA
+.dc.w $3FF
+.dc.w $3F6
+.dc.w $3E1
+.dc.w $3BE
+.dc.w $38F
+.dc.w $354
+.dc.w $30D
+.dc.w $2BC
+.dc.w $262
+.dc.w $200
+.dc.w $196
+.dc.w $127
+.dc.w $B4
+.dc.w $3E
+.dc.w $FFC8
+.dc.w $FF51
+.dc.w $FEDD
+.dc.w $FE6C
+.dc.w $FE01
+.dc.w $FD9C
+.dc.w $FD40
+.dc.w $FCED
+.dc.w $FCA5
+.dc.w $FC6A
+.dc.w $FC3B
+.dc.w $FC19
+.dc.w $FC07
+.dc.w $FC02
+.dc.w $FC0D
+.dc.w $FC27
+.dc.w $FC4F
+.dc.w $FC86
+.dc.w $FCCB
+.dc.w $FD1C
+.dc.w $FD79
+.dc.w $FDE1
+.dc.w $FE51
+.dc.w $FEC9
+.dc.w $FF46
+.dc.w $FFC7
+.dc.w $49
+.dc.w $CB
+.dc.w $14A
+.dc.w $1C5
+.dc.w $238
+.dc.w $2A3
+.dc.w $302
+.dc.w $355
+.dc.w $398
+.dc.w $3CC
+.dc.w $3EE
+.dc.w $3FE
+.dc.w $3FB
+.dc.w $3E4
+.dc.w $3B9
+.dc.w $37C
+.dc.w $32C
+.dc.w $2CB
+.dc.w $25B
+.dc.w $1DC
+.dc.w $153
+.dc.w $C0
+.dc.w $28
+.dc.w $FF8E
+.dc.w $FEF5
+.dc.w $FE60
+.dc.w $FDD3
+.dc.w $FD53
+.dc.w $FCE3
+.dc.w $FC86
+.dc.w $FC40
+.dc.w $FC13
+.dc.w $FC02
+.dc.w $FC0F
+.dc.w $FC3A
+.dc.w $FC84
+.dc.w $FCEC
+.dc.w $FD6F
+.dc.w $FE0C
+.dc.w $FEBE
+.dc.w $FF7F
+.dc.w $49
+.dc.w $115
+.dc.w $1DA
+.dc.w $28F
+.dc.w $32A
+.dc.w $3A1
+.dc.w $3EB
+.dc.w $3FE
+.dc.w $3D4
+.dc.w $368
+.dc.w $2B9
+.dc.w $1CB
+.dc.w $A8
+.dc.w $FF65
+.dc.w $FE1B
+.dc.w $FCF6
+.dc.w $FC2F
+.dc.w $FC10
+.dc.w $FCFC
+.dc.w $FF6D
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FEE9
+.dc.w $FC8D
+.dc.w $FC04
+.dc.w $FC9F
+.dc.w $FDDA
+.dc.w $FF54
+.dc.w $C9
+.dc.w $20F
+.dc.w $30A
+.dc.w $3AE
+.dc.w $3F9
+.dc.w $3F0
+.dc.w $39E
+.dc.w $310
+.dc.w $255
+.dc.w $17C
+.dc.w $93
+.dc.w $FFAA
+.dc.w $FECA
+.dc.w $FDFE
+.dc.w $FD4E
+.dc.w $FCC1
+.dc.w $FC59
+.dc.w $FC19
+.dc.w $FC02
+.dc.w $FC12
+.dc.w $FC46
+.dc.w $FC9B
+.dc.w $FD0D
+.dc.w $FD97
+.dc.w $FE32
+.dc.w $FEDA
+.dc.w $FF89
+.dc.w $38
+.dc.w $E4
+.dc.w $188
+.dc.w $220
+.dc.w $2A6
+.dc.w $31A
+.dc.w $377
+.dc.w $3BD
+.dc.w $3EA
+.dc.w $3FE
+.dc.w $3F9
+.dc.w $3DC
+.dc.w $3A8
+.dc.w $35F
+.dc.w $303
+.dc.w $296
+.dc.w $21C
+.dc.w $196
+.dc.w $10A
+.dc.w $78
+.dc.w $FFE6
+.dc.w $FF54
+.dc.w $FEC7
+.dc.w $FE41
+.dc.w $FDC4
+.dc.w $FD54
+.dc.w $FCF1
+.dc.w $FC9E
+.dc.w $FC5C
+.dc.w $FC2B
+.dc.w $FC0D
+.dc.w $FC02
+.dc.w $FC09
+.dc.w $FC23
+.dc.w $FC4E
+.dc.w $FC8A
+.dc.w $FCD5
+.dc.w $FD2F
+.dc.w $FD94
+.dc.w $FE03
+.dc.w $FE7B
+.dc.w $FEF9
+.dc.w $FF7B
+.dc.w $FFFF
+.dc.w $81
+.dc.w $102
+.dc.w $17E
+.dc.w $1F4
+.dc.w $261
+.dc.w $2C4
+.dc.w $31C
+.dc.w $366
+.dc.w $3A3
+.dc.w $3D1
+.dc.w $3EF
+.dc.w $3FE
+.dc.w $3FC
+.dc.w $3EB
+.dc.w $3CA
+.dc.w $39B
+.dc.w $35D
+.dc.w $312
+.dc.w $2BB
+.dc.w $25A
+.dc.w $1F0
+.dc.w $17F
+.dc.w $107
+.dc.w $8C
+.dc.w $F
+.dc.w $FF93
+.dc.w $FF18
+.dc.w $FEA0
+.dc.w $FE2E
+.dc.w $FDC3
+.dc.w $FD60
+.dc.w $FD07
+.dc.w $FCBA
+.dc.w $FC79
+.dc.w $FC45
+.dc.w $FC20
+.dc.w $FC0A
+.dc.w $FC02
+.dc.w $FC0A
+.dc.w $FC20
+.dc.w $FC46
+.dc.w $FC79
+.dc.w $FCBA
+.dc.w $FD07
+.dc.w $FD60
+.dc.w $FDC3
+.dc.w $FE2E
+.dc.w $FEA1
+.dc.w $FF18
+.dc.w $FF94
+.dc.w $10
+.dc.w $8D
+.dc.w $108
+.dc.w $17F
+.dc.w $1F0
+.dc.w $25A
+.dc.w $2BC
+.dc.w $312
+.dc.w $35D
+.dc.w $39B
+.dc.w $3CA
+.dc.w $3EB
+.dc.w $3FC
+.dc.w $3FE
+.dc.w $3EF
+.dc.w $3D1
+.dc.w $3A3
+.dc.w $366
+.dc.w $31C
+.dc.w $2C4
+.dc.w $261
+.dc.w $1F4
+.dc.w $17E
+.dc.w $102
+.dc.w $81
+.dc.w $FFFF
+.dc.w $FF7B
+.dc.w $FEF9
+.dc.w $FE7B
+.dc.w $FE03
+.dc.w $FD94
+.dc.w $FD2E
+.dc.w $FCD5
+.dc.w $FC8A
+.dc.w $FC4E
+.dc.w $FC23
+.dc.w $FC09
+.dc.w $FC02
+.dc.w $FC0D
+.dc.w $FC2B
+.dc.w $FC5C
+.dc.w $FC9E
+.dc.w $FCF1
+.dc.w $FD54
+.dc.w $FDC5
+.dc.w $FE41
+.dc.w $FEC7
+.dc.w $FF54
+.dc.w $FFE6
+.dc.w $78
+.dc.w $10A
+.dc.w $197
+.dc.w $21C
+.dc.w $296
+.dc.w $303
+.dc.w $35F
+.dc.w $3A8
+.dc.w $3DC
+.dc.w $3F9
+.dc.w $3FE
+.dc.w $3EA
+.dc.w $3BD
+.dc.w $377
+.dc.w $31A
+.dc.w $2A6
+.dc.w $21F
+.dc.w $188
+.dc.w $E4
+.dc.w $38
+.dc.w $FF88
+.dc.w $FEDA
+.dc.w $FE32
+.dc.w $FD96
+.dc.w $FD0D
+.dc.w $FC9B
+.dc.w $FC46
+.dc.w $FC12
+.dc.w $FC02
+.dc.w $FC1A
+.dc.w $FC59
+.dc.w $FCC1
+.dc.w $FD4E
+.dc.w $FDFE
+.dc.w $FECA
+.dc.w $FFAA
+.dc.w $93
+.dc.w $17C
+.dc.w $255
+.dc.w $310
+.dc.w $39E
+.dc.w $3F0
+.dc.w $3F9
+.dc.w $3AE
+.dc.w $309
+.dc.w $20E
+.dc.w $C9
+.dc.w $FF54
+.dc.w $FDDA
+.dc.w $FC9F
+.dc.w $FC04
+.dc.w $FC8D
+.dc.w $FEE9
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $197
+.dc.w $3C5
+.dc.w $3D4
+.dc.w $2B5
+.dc.w $114
+.dc.w $FF63
+.dc.w $FDEC
+.dc.w $FCD6
+.dc.w $FC32
+.dc.w $FC02
+.dc.w $FC3A
+.dc.w $FCC7
+.dc.w $FD94
+.dc.w $FE8A
+.dc.w $FF94
+.dc.w $9C
+.dc.w $194
+.dc.w $26D
+.dc.w $31C
+.dc.w $39C
+.dc.w $3E7
+.dc.w $3FF
+.dc.w $3E5
+.dc.w $39C
+.dc.w $32B
+.dc.w $29A
+.dc.w $1EE
+.dc.w $131
+.dc.w $6B
+.dc.w $FFA5
+.dc.w $FEE4
+.dc.w $FE30
+.dc.w $FD8E
+.dc.w $FD04
+.dc.w $FC96
+.dc.w $FC45
+.dc.w $FC13
+.dc.w $FC02
+.dc.w $FC10
+.dc.w $FC3C
+.dc.w $FC84
+.dc.w $FCE5
+.dc.w $FD5C
+.dc.w $FDE5
+.dc.w $FE7B
+.dc.w $FF1A
+.dc.w $FFBE
+.dc.w $62
+.dc.w $103
+.dc.w $19C
+.dc.w $22A
+.dc.w $2A9
+.dc.w $317
+.dc.w $371
+.dc.w $3B6
+.dc.w $3E5
+.dc.w $3FC
+.dc.w $3FC
+.dc.w $3E5
+.dc.w $3B8
+.dc.w $377
+.dc.w $322
+.dc.w $2BD
+.dc.w $249
+.dc.w $1C9
+.dc.w $141
+.dc.w $B2
+.dc.w $21
+.dc.w $FF90
+.dc.w $FF01
+.dc.w $FE78
+.dc.w $FDF7
+.dc.w $FD81
+.dc.w $FD18
+.dc.w $FCBE
+.dc.w $FC74
+.dc.w $FC3C
+.dc.w $FC17
+.dc.w $FC04
+.dc.w $FC05
+.dc.w $FC19
+.dc.w $FC3F
+.dc.w $FC77
+.dc.w $FCBF
+.dc.w $FD17
+.dc.w $FD7C
+.dc.w $FDEC
+.dc.w $FE66
+.dc.w $FEE7
+.dc.w $FF6D
+.dc.w $FFF5
+.dc.w $7C
+.dc.w $101
+.dc.w $182
+.dc.w $1FC
+.dc.w $26D
+.dc.w $2D3
+.dc.w $32C
+.dc.w $376
+.dc.w $3B2
+.dc.w $3DD
+.dc.w $3F7
+.dc.w $3FF
+.dc.w $3F6
+.dc.w $3DB
+.dc.w $3B0
+.dc.w $374
+.dc.w $32A
+.dc.w $2D2
+.dc.w $26D
+.dc.w $1FE
+.dc.w $186
+.dc.w $108
+.dc.w $85
+.dc.w $0
+.dc.w $FF7C
+.dc.w $FEF9
+.dc.w $FE7B
+.dc.w $FE03
+.dc.w $FD94
+.dc.w $FD2F
+.dc.w $FCD7
+.dc.w $FC8C
+.dc.w $FC51
+.dc.w $FC26
+.dc.w $FC0B
+.dc.w $FC02
+.dc.w $FC0A
+.dc.w $FC24
+.dc.w $FC4F
+.dc.w $FC8B
+.dc.w $FCD6
+.dc.w $FD2F
+.dc.w $FD94
+.dc.w $FE05
+.dc.w $FE7F
+.dc.w $FF00
+.dc.w $FF85
+.dc.w $C
+.dc.w $94
+.dc.w $11A
+.dc.w $19B
+.dc.w $215
+.dc.w $285
+.dc.w $2EA
+.dc.w $342
+.dc.w $38A
+.dc.w $3C2
+.dc.w $3E8
+.dc.w $3FC
+.dc.w $3FD
+.dc.w $3EA
+.dc.w $3C5
+.dc.w $38D
+.dc.w $343
+.dc.w $2E8
+.dc.w $27F
+.dc.w $209
+.dc.w $189
+.dc.w $FF
+.dc.w $71
+.dc.w $FFE0
+.dc.w $FF4E
+.dc.w $FEC0
+.dc.w $FE37
+.dc.w $FDB8
+.dc.w $FD44
+.dc.w $FCDF
+.dc.w $FC8A
+.dc.w $FC49
+.dc.w $FC1C
+.dc.w $FC05
+.dc.w $FC05
+.dc.w $FC1C
+.dc.w $FC4B
+.dc.w $FC90
+.dc.w $FCEA
+.dc.w $FD58
+.dc.w $FDD7
+.dc.w $FE65
+.dc.w $FEFE
+.dc.w $FF9F
+.dc.w $43
+.dc.w $E7
+.dc.w $186
+.dc.w $21C
+.dc.w $2A5
+.dc.w $31C
+.dc.w $37D
+.dc.w $3C5
+.dc.w $3F1
+.dc.w $3FF
+.dc.w $3ED
+.dc.w $3BC
+.dc.w $36B
+.dc.w $2FC
+.dc.w $272
+.dc.w $1D1
+.dc.w $11D
+.dc.w $5C
+.dc.w $FF95
+.dc.w $FECF
+.dc.w $FE13
+.dc.w $FD67
+.dc.w $FCD5
+.dc.w $FC65
+.dc.w $FC1C
+.dc.w $FC02
+.dc.w $FC1A
+.dc.w $FC66
+.dc.w $FCE5
+.dc.w $FD94
+.dc.w $FE6D
+.dc.w $FF65
+.dc.w $6D
+.dc.w $177
+.dc.w $26D
+.dc.w $33A
+.dc.w $3C7
+.dc.w $3FF
+.dc.w $3CE
+.dc.w $32B
+.dc.w $215
+.dc.w $9D
+.dc.w $FEED
+.dc.w $FD4C
+.dc.w $FC2D
+.dc.w $FC3D
+.dc.w $FE6A
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FDF2
+.dc.w $FC0E
+.dc.w $FC8A
+.dc.w $FE29
+.dc.w $18
+.dc.w $1D8
+.dc.w $321
+.dc.w $3D7
+.dc.w $3FB
+.dc.w $39E
+.dc.w $2DD
+.dc.w $1D8
+.dc.w $B0
+.dc.w $FF83
+.dc.w $FE69
+.dc.w $FD78
+.dc.w $FCBD
+.dc.w $FC41
+.dc.w $FC07
+.dc.w $FC0E
+.dc.w $FC52
+.dc.w $FCCB
+.dc.w $FD6E
+.dc.w $FE32
+.dc.w $FF0A
+.dc.w $FFEA
+.dc.w $C7
+.dc.w $198
+.dc.w $253
+.dc.w $2F2
+.dc.w $36F
+.dc.w $3C6
+.dc.w $3F6
+.dc.w $3FD
+.dc.w $3DD
+.dc.w $399
+.dc.w $334
+.dc.w $2B3
+.dc.w $21C
+.dc.w $173
+.dc.w $C0
+.dc.w $8
+.dc.w $FF53
+.dc.w $FEA3
+.dc.w $FE00
+.dc.w $FD6E
+.dc.w $FCF1
+.dc.w $FC8C
+.dc.w $FC42
+.dc.w $FC14
+.dc.w $FC02
+.dc.w $FC0D
+.dc.w $FC34
+.dc.w $FC75
+.dc.w $FCCE
+.dc.w $FD3C
+.dc.w $FDBC
+.dc.w $FE4A
+.dc.w $FEE3
+.dc.w $FF82
+.dc.w $22
+.dc.w $C2
+.dc.w $15C
+.dc.w $1ED
+.dc.w $271
+.dc.w $2E6
+.dc.w $349
+.dc.w $398
+.dc.w $3D1
+.dc.w $3F4
+.dc.w $3FF
+.dc.w $3F3
+.dc.w $3D1
+.dc.w $399
+.dc.w $34D
+.dc.w $2EE
+.dc.w $280
+.dc.w $204
+.dc.w $17D
+.dc.w $EF
+.dc.w $5C
+.dc.w $FFC8
+.dc.w $FF35
+.dc.w $FEA7
+.dc.w $FE20
+.dc.w $FDA3
+.dc.w $FD33
+.dc.w $FCD3
+.dc.w $FC83
+.dc.w $FC45
+.dc.w $FC1B
+.dc.w $FC05
+.dc.w $FC04
+.dc.w $FC17
+.dc.w $FC3E
+.dc.w $FC78
+.dc.w $FCC5
+.dc.w $FD21
+.dc.w $FD8C
+.dc.w $FE03
+.dc.w $FE84
+.dc.w $FF0C
+.dc.w $FF99
+.dc.w $27
+.dc.w $B5
+.dc.w $13F
+.dc.w $1C3
+.dc.w $23F
+.dc.w $2AF
+.dc.w $311
+.dc.w $365
+.dc.w $3A7
+.dc.w $3D8
+.dc.w $3F5
+.dc.w $3FF
+.dc.w $3F5
+.dc.w $3D8
+.dc.w $3A7
+.dc.w $364
+.dc.w $311
+.dc.w $2AE
+.dc.w $23E
+.dc.w $1C3
+.dc.w $13F
+.dc.w $B5
+.dc.w $27
+.dc.w $FF99
+.dc.w $FF0C
+.dc.w $FE84
+.dc.w $FE03
+.dc.w $FD8C
+.dc.w $FD21
+.dc.w $FCC4
+.dc.w $FC78
+.dc.w $FC3E
+.dc.w $FC17
+.dc.w $FC04
+.dc.w $FC05
+.dc.w $FC1B
+.dc.w $FC45
+.dc.w $FC83
+.dc.w $FCD3
+.dc.w $FD34
+.dc.w $FDA3
+.dc.w $FE20
+.dc.w $FEA7
+.dc.w $FF35
+.dc.w $FFC8
+.dc.w $5C
+.dc.w $EF
+.dc.w $17D
+.dc.w $204
+.dc.w $280
+.dc.w $2EE
+.dc.w $34D
+.dc.w $399
+.dc.w $3D1
+.dc.w $3F3
+.dc.w $3FF
+.dc.w $3F4
+.dc.w $3D1
+.dc.w $398
+.dc.w $349
+.dc.w $2E6
+.dc.w $271
+.dc.w $1EC
+.dc.w $15C
+.dc.w $C1
+.dc.w $22
+.dc.w $FF82
+.dc.w $FEE3
+.dc.w $FE4A
+.dc.w $FDBC
+.dc.w $FD3C
+.dc.w $FCCE
+.dc.w $FC75
+.dc.w $FC34
+.dc.w $FC0D
+.dc.w $FC02
+.dc.w $FC14
+.dc.w $FC42
+.dc.w $FC8C
+.dc.w $FCF1
+.dc.w $FD6E
+.dc.w $FE00
+.dc.w $FEA3
+.dc.w $FF53
+.dc.w $8
+.dc.w $C0
+.dc.w $174
+.dc.w $21C
+.dc.w $2B4
+.dc.w $335
+.dc.w $399
+.dc.w $3DD
+.dc.w $3FD
+.dc.w $3F6
+.dc.w $3C6
+.dc.w $36F
+.dc.w $2F2
+.dc.w $253
+.dc.w $197
+.dc.w $C6
+.dc.w $FFEA
+.dc.w $FF09
+.dc.w $FE32
+.dc.w $FD6E
+.dc.w $FCCB
+.dc.w $FC52
+.dc.w $FC0E
+.dc.w $FC07
+.dc.w $FC41
+.dc.w $FCBD
+.dc.w $FD78
+.dc.w $FE6A
+.dc.w $FF83
+.dc.w $B0
+.dc.w $1D8
+.dc.w $2DD
+.dc.w $39E
+.dc.w $3FB
+.dc.w $3D7
+.dc.w $321
+.dc.w $1D7
+.dc.w $18
+.dc.w $FE29
+.dc.w $FC8A
+.dc.w $FC0E
+.dc.w $FDF2
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $27E
+.dc.w $3FE
+.dc.w $2EC
+.dc.w $DA
+.dc.w $FEC0
+.dc.w $FD21
+.dc.w $FC36
+.dc.w $FC07
+.dc.w $FC79
+.dc.w $FD65
+.dc.w $FE9B
+.dc.w $FFEE
+.dc.w $136
+.dc.w $254
+.dc.w $332
+.dc.w $3C1
+.dc.w $3FD
+.dc.w $3E7
+.dc.w $388
+.dc.w $2EB
+.dc.w $21E
+.dc.w $133
+.dc.w $39
+.dc.w $FF42
+.dc.w $FE59
+.dc.w $FD8B
+.dc.w $FCE3
+.dc.w $FC67
+.dc.w $FC1C
+.dc.w $FC02
+.dc.w $FC1A
+.dc.w $FC5F
+.dc.w $FCCE
+.dc.w $FD5F
+.dc.w $FE0C
+.dc.w $FECB
+.dc.w $FF96
+.dc.w $61
+.dc.w $127
+.dc.w $1E1
+.dc.w $286
+.dc.w $311
+.dc.w $37F
+.dc.w $3CC
+.dc.w $3F6
+.dc.w $3FD
+.dc.w $3E2
+.dc.w $3A5
+.dc.w $34A
+.dc.w $2D4
+.dc.w $249
+.dc.w $1AB
+.dc.w $102
+.dc.w $52
+.dc.w $FFA1
+.dc.w $FEF3
+.dc.w $FE4F
+.dc.w $FDB8
+.dc.w $FD32
+.dc.w $FCC2
+.dc.w $FC6A
+.dc.w $FC2C
+.dc.w $FC0A
+.dc.w $FC03
+.dc.w $FC18
+.dc.w $FC48
+.dc.w $FC91
+.dc.w $FCF0
+.dc.w $FD64
+.dc.w $FDE9
+.dc.w $FE7B
+.dc.w $FF16
+.dc.w $FFB7
+.dc.w $58
+.dc.w $F7
+.dc.w $190
+.dc.w $21E
+.dc.w $29F
+.dc.w $30E
+.dc.w $36B
+.dc.w $3B2
+.dc.w $3E3
+.dc.w $3FC
+.dc.w $3FC
+.dc.w $3E5
+.dc.w $3B6
+.dc.w $372
+.dc.w $319
+.dc.w $2AE
+.dc.w $234
+.dc.w $1AD
+.dc.w $11C
+.dc.w $85
+.dc.w $FFED
+.dc.w $FF54
+.dc.w $FEBF
+.dc.w $FE32
+.dc.w $FDAF
+.dc.w $FD3A
+.dc.w $FCD4
+.dc.w $FC81
+.dc.w $FC42
+.dc.w $FC18
+.dc.w $FC04
+.dc.w $FC06
+.dc.w $FC1F
+.dc.w $FC4E
+.dc.w $FC91
+.dc.w $FCE8
+.dc.w $FD50
+.dc.w $FDC7
+.dc.w $FE4A
+.dc.w $FED7
+.dc.w $FF6A
+.dc.w $0
+.dc.w $97
+.dc.w $12A
+.dc.w $1B7
+.dc.w $23A
+.dc.w $2B1
+.dc.w $319
+.dc.w $370
+.dc.w $3B3
+.dc.w $3E2
+.dc.w $3FB
+.dc.w $3FD
+.dc.w $3E9
+.dc.w $3BF
+.dc.w $380
+.dc.w $32C
+.dc.w $2C7
+.dc.w $252
+.dc.w $1CF
+.dc.w $142
+.dc.w $AD
+.dc.w $14
+.dc.w $FF7B
+.dc.w $FEE5
+.dc.w $FE54
+.dc.w $FDCD
+.dc.w $FD53
+.dc.w $FCE8
+.dc.w $FC8F
+.dc.w $FC4A
+.dc.w $FC1C
+.dc.w $FC05
+.dc.w $FC05
+.dc.w $FC1E
+.dc.w $FC4F
+.dc.w $FC96
+.dc.w $FCF3
+.dc.w $FD63
+.dc.w $FDE3
+.dc.w $FE71
+.dc.w $FF0A
+.dc.w $FFA9
+.dc.w $4A
+.dc.w $EB
+.dc.w $186
+.dc.w $218
+.dc.w $29D
+.dc.w $311
+.dc.w $371
+.dc.w $3B9
+.dc.w $3E9
+.dc.w $3FE
+.dc.w $3F7
+.dc.w $3D5
+.dc.w $397
+.dc.w $33E
+.dc.w $2CE
+.dc.w $249
+.dc.w $1B2
+.dc.w $10D
+.dc.w $60
+.dc.w $FFAF
+.dc.w $FEFF
+.dc.w $FE55
+.dc.w $FDB8
+.dc.w $FD2C
+.dc.w $FCB7
+.dc.w $FC5C
+.dc.w $FC1F
+.dc.w $FC04
+.dc.w $FC0B
+.dc.w $FC35
+.dc.w $FC82
+.dc.w $FCF0
+.dc.w $FD7C
+.dc.w $FE21
+.dc.w $FEDA
+.dc.w $FFA0
+.dc.w $6C
+.dc.w $136
+.dc.w $1F5
+.dc.w $2A2
+.dc.w $333
+.dc.w $3A2
+.dc.w $3E7
+.dc.w $3FF
+.dc.w $3E5
+.dc.w $39A
+.dc.w $31E
+.dc.w $276
+.dc.w $1A8
+.dc.w $BF
+.dc.w $FFC8
+.dc.w $FECE
+.dc.w $FDE3
+.dc.w $FD16
+.dc.w $FC79
+.dc.w $FC1A
+.dc.w $FC04
+.dc.w $FC40
+.dc.w $FCCF
+.dc.w $FDAD
+.dc.w $FECB
+.dc.w $13
+.dc.w $166
+.dc.w $29C
+.dc.w $388
+.dc.w $3FA
+.dc.w $3CB
+.dc.w $2E0
+.dc.w $141
+.dc.w $FF26
+.dc.w $FD14
+.dc.w $FC03
+.dc.w $FD84
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FD20
+.dc.w $FC1B
+.dc.w $FDC6
+.dc.w $32
+.dc.w $24E
+.dc.w $39C
+.dc.w $3FF
+.dc.w $390
+.dc.w $287
+.dc.w $126
+.dc.w $FFAC
+.dc.w $FE4B
+.dc.w $FD2C
+.dc.w $FC68
+.dc.w $FC0A
+.dc.w $FC13
+.dc.w $FC79
+.dc.w $FD2C
+.dc.w $FE16
+.dc.w $FF22
+.dc.w $39
+.dc.w $146
+.dc.w $237
+.dc.w $2FE
+.dc.w $390
+.dc.w $3E6
+.dc.w $3FF
+.dc.w $3DB
+.dc.w $381
+.dc.w $2F6
+.dc.w $245
+.dc.w $178
+.dc.w $9A
+.dc.w $FFB9
+.dc.w $FEDD
+.dc.w $FE11
+.dc.w $FD5E
+.dc.w $FCCC
+.dc.w $FC5F
+.dc.w $FC1B
+.dc.w $FC02
+.dc.w $FC14
+.dc.w $FC4E
+.dc.w $FCAE
+.dc.w $FD2F
+.dc.w $FDCA
+.dc.w $FE7A
+.dc.w $FF37
+.dc.w $FFFA
+.dc.w $BA
+.dc.w $174
+.dc.w $21F
+.dc.w $2B7
+.dc.w $335
+.dc.w $397
+.dc.w $3D9
+.dc.w $3FB
+.dc.w $3FB
+.dc.w $3DA
+.dc.w $39A
+.dc.w $33D
+.dc.w $2C6
+.dc.w $23A
+.dc.w $19E
+.dc.w $F5
+.dc.w $46
+.dc.w $FF97
+.dc.w $FEEA
+.dc.w $FE47
+.dc.w $FDB1
+.dc.w $FD2C
+.dc.w $FCBD
+.dc.w $FC66
+.dc.w $FC29
+.dc.w $FC08
+.dc.w $FC04
+.dc.w $FC1B
+.dc.w $FC4E
+.dc.w $FC9A
+.dc.w $FCFE
+.dc.w $FD76
+.dc.w $FDFF
+.dc.w $FE96
+.dc.w $FF35
+.dc.w $FFDA
+.dc.w $7E
+.dc.w $120
+.dc.w $1BA
+.dc.w $248
+.dc.w $2C7
+.dc.w $333
+.dc.w $38A
+.dc.w $3CA
+.dc.w $3F1
+.dc.w $3FF
+.dc.w $3F3
+.dc.w $3CD
+.dc.w $390
+.dc.w $33B
+.dc.w $2D2
+.dc.w $257
+.dc.w $1CE
+.dc.w $139
+.dc.w $9C
+.dc.w $FFFD
+.dc.w $FF5D
+.dc.w $FEC1
+.dc.w $FE2D
+.dc.w $FDA5
+.dc.w $FD2C
+.dc.w $FCC4
+.dc.w $FC71
+.dc.w $FC34
+.dc.w $FC0E
+.dc.w $FC02
+.dc.w $FC0F
+.dc.w $FC34
+.dc.w $FC71
+.dc.w $FCC4
+.dc.w $FD2C
+.dc.w $FDA5
+.dc.w $FE2E
+.dc.w $FEC2
+.dc.w $FF5E
+.dc.w $FFFD
+.dc.w $9D
+.dc.w $139
+.dc.w $1CE
+.dc.w $257
+.dc.w $2D2
+.dc.w $33B
+.dc.w $390
+.dc.w $3CD
+.dc.w $3F3
+.dc.w $3FF
+.dc.w $3F1
+.dc.w $3CA
+.dc.w $38A
+.dc.w $333
+.dc.w $2C6
+.dc.w $248
+.dc.w $1BA
+.dc.w $120
+.dc.w $7E
+.dc.w $FFDA
+.dc.w $FF35
+.dc.w $FE95
+.dc.w $FDFF
+.dc.w $FD76
+.dc.w $FCFE
+.dc.w $FC9A
+.dc.w $FC4E
+.dc.w $FC1B
+.dc.w $FC04
+.dc.w $FC08
+.dc.w $FC29
+.dc.w $FC66
+.dc.w $FCBD
+.dc.w $FD2D
+.dc.w $FDB1
+.dc.w $FE47
+.dc.w $FEEB
+.dc.w $FF97
+.dc.w $47
+.dc.w $F6
+.dc.w $19E
+.dc.w $23B
+.dc.w $2C6
+.dc.w $33D
+.dc.w $39A
+.dc.w $3DA
+.dc.w $3FB
+.dc.w $3FB
+.dc.w $3D9
+.dc.w $397
+.dc.w $335
+.dc.w $2B6
+.dc.w $21F
+.dc.w $174
+.dc.w $BA
+.dc.w $FFF9
+.dc.w $FF36
+.dc.w $FE7A
+.dc.w $FDCA
+.dc.w $FD2F
+.dc.w $FCAE
+.dc.w $FC4E
+.dc.w $FC14
+.dc.w $FC02
+.dc.w $FC1B
+.dc.w $FC5F
+.dc.w $FCCC
+.dc.w $FD5E
+.dc.w $FE11
+.dc.w $FEDD
+.dc.w $FFB9
+.dc.w $9B
+.dc.w $178
+.dc.w $245
+.dc.w $2F6
+.dc.w $381
+.dc.w $3DB
+.dc.w $3FF
+.dc.w $3E6
+.dc.w $38F
+.dc.w $2FE
+.dc.w $237
+.dc.w $146
+.dc.w $38
+.dc.w $FF22
+.dc.w $FE16
+.dc.w $FD2B
+.dc.w $FC79
+.dc.w $FC13
+.dc.w $FC0A
+.dc.w $FC68
+.dc.w $FD2C
+.dc.w $FE4B
+.dc.w $FFAC
+.dc.w $127
+.dc.w $288
+.dc.w $390
+.dc.w $3FF
+.dc.w $39C
+.dc.w $24E
+.dc.w $32
+.dc.w $FDC6
+.dc.w $FC1B
+.dc.w $FD20
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $338
+.dc.w $3AB
+.dc.w $16B
+.dc.w $FEC5
+.dc.w $FCD9
+.dc.w $FC09
+.dc.w $FC4B
+.dc.w $FD5B
+.dc.w $FEE0
+.dc.w $83
+.dc.w $200
+.dc.w $324
+.dc.w $3D0
+.dc.w $3FE
+.dc.w $3B3
+.dc.w $302
+.dc.w $207
+.dc.w $E0
+.dc.w $FFAC
+.dc.w $FE86
+.dc.w $FD86
+.dc.w $FCBF
+.dc.w $FC3C
+.dc.w $FC04
+.dc.w $FC17
+.dc.w $FC6E
+.dc.w $FD02
+.dc.w $FDC5
+.dc.w $FEA9
+.dc.w $FF9F
+.dc.w $97
+.dc.w $183
+.dc.w $257
+.dc.w $307
+.dc.w $38B
+.dc.w $3DF
+.dc.w $3FF
+.dc.w $3EB
+.dc.w $3A6
+.dc.w $335
+.dc.w $29F
+.dc.w $1EB
+.dc.w $122
+.dc.w $4E
+.dc.w $FF7A
+.dc.w $FEAC
+.dc.w $FDEE
+.dc.w $FD48
+.dc.w $FCBF
+.dc.w $FC5A
+.dc.w $FC1A
+.dc.w $FC02
+.dc.w $FC12
+.dc.w $FC48
+.dc.w $FCA2
+.dc.w $FD1B
+.dc.w $FDB0
+.dc.w $FE58
+.dc.w $FF0F
+.dc.w $FFCE
+.dc.w $8D
+.dc.w $146
+.dc.w $1F4
+.dc.w $28F
+.dc.w $314
+.dc.w $37D
+.dc.w $3C9
+.dc.w $3F4
+.dc.w $3FE
+.dc.w $3E7
+.dc.w $3B0
+.dc.w $35C
+.dc.w $2EC
+.dc.w $265
+.dc.w $1CC
+.dc.w $125
+.dc.w $76
+.dc.w $FFC4
+.dc.w $FF14
+.dc.w $FE6C
+.dc.w $FDD0
+.dc.w $FD45
+.dc.w $FCD0
+.dc.w $FC72
+.dc.w $FC30
+.dc.w $FC0B
+.dc.w $FC03
+.dc.w $FC18
+.dc.w $FC4B
+.dc.w $FC98
+.dc.w $FCFF
+.dc.w $FD7B
+.dc.w $FE09
+.dc.w $FEA5
+.dc.w $FF4A
+.dc.w $FFF5
+.dc.w $9F
+.dc.w $144
+.dc.w $1E1
+.dc.w $270
+.dc.w $2EE
+.dc.w $357
+.dc.w $3A8
+.dc.w $3DF
+.dc.w $3FB
+.dc.w $3FC
+.dc.w $3E0
+.dc.w $3A9
+.dc.w $358
+.dc.w $2F0
+.dc.w $274
+.dc.w $1E6
+.dc.w $14C
+.dc.w $A8
+.dc.w $0
+.dc.w $FF59
+.dc.w $FEB5
+.dc.w $FE1A
+.dc.w $FD8D
+.dc.w $FD11
+.dc.w $FCA9
+.dc.w $FC58
+.dc.w $FC21
+.dc.w $FC05
+.dc.w $FC06
+.dc.w $FC22
+.dc.w $FC59
+.dc.w $FCAA
+.dc.w $FD13
+.dc.w $FD91
+.dc.w $FE20
+.dc.w $FEBD
+.dc.w $FF63
+.dc.w $C
+.dc.w $B7
+.dc.w $15D
+.dc.w $1F9
+.dc.w $287
+.dc.w $303
+.dc.w $369
+.dc.w $3B6
+.dc.w $3E9
+.dc.w $3FE
+.dc.w $3F6
+.dc.w $3D1
+.dc.w $38E
+.dc.w $331
+.dc.w $2BC
+.dc.w $231
+.dc.w $195
+.dc.w $ED
+.dc.w $3D
+.dc.w $FF8B
+.dc.w $FEDC
+.dc.w $FE35
+.dc.w $FD9B
+.dc.w $FD15
+.dc.w $FCA5
+.dc.w $FC50
+.dc.w $FC1A
+.dc.w $FC03
+.dc.w $FC0D
+.dc.w $FC38
+.dc.w $FC84
+.dc.w $FCED
+.dc.w $FD72
+.dc.w $FE0E
+.dc.w $FEBB
+.dc.w $FF75
+.dc.w $33
+.dc.w $F2
+.dc.w $1A9
+.dc.w $252
+.dc.w $2E6
+.dc.w $35F
+.dc.w $3B9
+.dc.w $3EF
+.dc.w $3FF
+.dc.w $3E7
+.dc.w $3A7
+.dc.w $341
+.dc.w $2B9
+.dc.w $213
+.dc.w $155
+.dc.w $87
+.dc.w $FFB3
+.dc.w $FEDF
+.dc.w $FE16
+.dc.w $FD62
+.dc.w $FCCC
+.dc.w $FC5B
+.dc.w $FC16
+.dc.w $FC02
+.dc.w $FC22
+.dc.w $FC76
+.dc.w $FCFA
+.dc.w $FDAA
+.dc.w $FE7E
+.dc.w $FF6A
+.dc.w $62
+.dc.w $158
+.dc.w $23C
+.dc.w $2FF
+.dc.w $393
+.dc.w $3EA
+.dc.w $3FD
+.dc.w $3C4
+.dc.w $342
+.dc.w $27A
+.dc.w $17B
+.dc.w $54
+.dc.w $FF20
+.dc.w $FDF9
+.dc.w $FCFE
+.dc.w $FC4E
+.dc.w $FC03
+.dc.w $FC31
+.dc.w $FCDE
+.dc.w $FE01
+.dc.w $FF7E
+.dc.w $122
+.dc.w $2A7
+.dc.w $3B6
+.dc.w $3F8
+.dc.w $328
+.dc.w $13B
+.dc.w $FE96
+.dc.w $FC56
+.dc.w $FCC9
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FC80
+.dc.w $FCB1
+.dc.w $FF79
+.dc.w $22F
+.dc.w $3BC
+.dc.w $3E9
+.dc.w $2F9
+.dc.w $15E
+.dc.w $FF8F
+.dc.w $FDEC
+.dc.w $FCB8
+.dc.w $FC18
+.dc.w $FC12
+.dc.w $FC97
+.dc.w $FD89
+.dc.w $FEC0
+.dc.w $13
+.dc.w $15B
+.dc.w $278
+.dc.w $351
+.dc.w $3D5
+.dc.w $3FF
+.dc.w $3D0
+.dc.w $351
+.dc.w $291
+.dc.w $1A2
+.dc.w $97
+.dc.w $FF87
+.dc.w $FE82
+.dc.w $FD9B
+.dc.w $FCE0
+.dc.w $FC5A
+.dc.w $FC10
+.dc.w $FC05
+.dc.w $FC36
+.dc.w $FCA0
+.dc.w $FD39
+.dc.w $FDF7
+.dc.w $FED1
+.dc.w $FFB8
+.dc.w $A0
+.dc.w $17E
+.dc.w $247
+.dc.w $2F2
+.dc.w $377
+.dc.w $3D0
+.dc.w $3FB
+.dc.w $3F7
+.dc.w $3C4
+.dc.w $367
+.dc.w $2E4
+.dc.w $241
+.dc.w $187
+.dc.w $BE
+.dc.w $FFEF
+.dc.w $FF20
+.dc.w $FE5D
+.dc.w $FDAB
+.dc.w $FD12
+.dc.w $FC98
+.dc.w $FC40
+.dc.w $FC0E
+.dc.w $FC03
+.dc.w $FC1E
+.dc.w $FC5F
+.dc.w $FCC1
+.dc.w $FD42
+.dc.w $FDDC
+.dc.w $FE89
+.dc.w $FF43
+.dc.w $2
+.dc.w $C1
+.dc.w $178
+.dc.w $222
+.dc.w $2B9
+.dc.w $337
+.dc.w $398
+.dc.w $3DB
+.dc.w $3FB
+.dc.w $3FA
+.dc.w $3D7
+.dc.w $394
+.dc.w $332
+.dc.w $2B6
+.dc.w $224
+.dc.w $181
+.dc.w $D2
+.dc.w $1C
+.dc.w $FF67
+.dc.w $FEB6
+.dc.w $FE10
+.dc.w $FD79
+.dc.w $FCF8
+.dc.w $FC8F
+.dc.w $FC42
+.dc.w $FC12
+.dc.w $FC02
+.dc.w $FC12
+.dc.w $FC40
+.dc.w $FC8C
+.dc.w $FCF3
+.dc.w $FD72
+.dc.w $FE05
+.dc.w $FEA7
+.dc.w $FF54
+.dc.w $4
+.dc.w $B6
+.dc.w $162
+.dc.w $203
+.dc.w $294
+.dc.w $311
+.dc.w $377
+.dc.w $3C2
+.dc.w $3F0
+.dc.w $3FF
+.dc.w $3F0
+.dc.w $3C2
+.dc.w $377
+.dc.w $311
+.dc.w $294
+.dc.w $202
+.dc.w $161
+.dc.w $B5
+.dc.w $4
+.dc.w $FF53
+.dc.w $FEA7
+.dc.w $FE05
+.dc.w $FD72
+.dc.w $FCF3
+.dc.w $FC8C
+.dc.w $FC40
+.dc.w $FC11
+.dc.w $FC02
+.dc.w $FC12
+.dc.w $FC42
+.dc.w $FC8F
+.dc.w $FCF8
+.dc.w $FD7A
+.dc.w $FE10
+.dc.w $FEB6
+.dc.w $FF67
+.dc.w $1C
+.dc.w $D2
+.dc.w $181
+.dc.w $225
+.dc.w $2B7
+.dc.w $332
+.dc.w $394
+.dc.w $3D7
+.dc.w $3FA
+.dc.w $3FB
+.dc.w $3DA
+.dc.w $398
+.dc.w $336
+.dc.w $2B8
+.dc.w $222
+.dc.w $178
+.dc.w $C1
+.dc.w $2
+.dc.w $FF43
+.dc.w $FE89
+.dc.w $FDDC
+.dc.w $FD42
+.dc.w $FCC1
+.dc.w $FC5F
+.dc.w $FC1E
+.dc.w $FC03
+.dc.w $FC0E
+.dc.w $FC40
+.dc.w $FC98
+.dc.w $FD13
+.dc.w $FDAB
+.dc.w $FE5D
+.dc.w $FF21
+.dc.w $FFEF
+.dc.w $BE
+.dc.w $187
+.dc.w $241
+.dc.w $2E4
+.dc.w $367
+.dc.w $3C4
+.dc.w $3F7
+.dc.w $3FB
+.dc.w $3D0
+.dc.w $377
+.dc.w $2F2
+.dc.w $247
+.dc.w $17E
+.dc.w $9F
+.dc.w $FFB8
+.dc.w $FED0
+.dc.w $FDF7
+.dc.w $FD38
+.dc.w $FC9F
+.dc.w $FC36
+.dc.w $FC05
+.dc.w $FC11
+.dc.w $FC5A
+.dc.w $FCE0
+.dc.w $FD9C
+.dc.w $FE83
+.dc.w $FF87
+.dc.w $98
+.dc.w $1A2
+.dc.w $292
+.dc.w $352
+.dc.w $3D0
+.dc.w $3FF
+.dc.w $3D5
+.dc.w $350
+.dc.w $278
+.dc.w $15B
+.dc.w $12
+.dc.w $FEC0
+.dc.w $FD89
+.dc.w $FC97
+.dc.w $FC12
+.dc.w $FC18
+.dc.w $FCB8
+.dc.w $FDEC
+.dc.w $FF90
+.dc.w $15F
+.dc.w $2FA
+.dc.w $3E9
+.dc.w $3BC
+.dc.w $22F
+.dc.w $FF78
+.dc.w $FCB1
+.dc.w $FC80
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $3BA
+.dc.w $2D7
+.dc.w $FFA0
+.dc.w $FD05
+.dc.w $FC04
+.dc.w $FC8F
+.dc.w $FE21
+.dc.w $1A
+.dc.w $1F3
+.dc.w $34B
+.dc.w $3F1
+.dc.w $3DE
+.dc.w $32A
+.dc.w $201
+.dc.w $98
+.dc.w $FF27
+.dc.w $FDDA
+.dc.w $FCD7
+.dc.w $FC37
+.dc.w $FC02
+.dc.w $FC38
+.dc.w $FCCD
+.dc.w $FDAC
+.dc.w $FEBD
+.dc.w $FFE7
+.dc.w $10C
+.dc.w $217
+.dc.w $2F4
+.dc.w $394
+.dc.w $3ED
+.dc.w $3FC
+.dc.w $3C2
+.dc.w $347
+.dc.w $296
+.dc.w $1BB
+.dc.w $C6
+.dc.w $FFC9
+.dc.w $FED1
+.dc.w $FDED
+.dc.w $FD2B
+.dc.w $FC95
+.dc.w $FC31
+.dc.w $FC04
+.dc.w $FC10
+.dc.w $FC51
+.dc.w $FCC3
+.dc.w $FD5F
+.dc.w $FE1C
+.dc.w $FEF0
+.dc.w $FFD0
+.dc.w $B0
+.dc.w $186
+.dc.w $249
+.dc.w $2F0
+.dc.w $372
+.dc.w $3CC
+.dc.w $3F9
+.dc.w $3F9
+.dc.w $3CD
+.dc.w $376
+.dc.w $2FA
+.dc.w $25E
+.dc.w $1A9
+.dc.w $E3
+.dc.w $15
+.dc.w $FF48
+.dc.w $FE83
+.dc.w $FDCD
+.dc.w $FD2F
+.dc.w $FCAE
+.dc.w $FC4F
+.dc.w $FC15
+.dc.w $FC02
+.dc.w $FC16
+.dc.w $FC50
+.dc.w $FCAE
+.dc.w $FD2B
+.dc.w $FDC3
+.dc.w $FE70
+.dc.w $FF2B
+.dc.w $FFED
+.dc.w $AE
+.dc.w $16A
+.dc.w $218
+.dc.w $2B3
+.dc.w $334
+.dc.w $398
+.dc.w $3DB
+.dc.w $3FC
+.dc.w $3F9
+.dc.w $3D2
+.dc.w $389
+.dc.w $322
+.dc.w $29E
+.dc.w $204
+.dc.w $159
+.dc.w $A2
+.dc.w $FFE6
+.dc.w $FF2B
+.dc.w $FE77
+.dc.w $FDD1
+.dc.w $FD3E
+.dc.w $FCC3
+.dc.w $FC64
+.dc.w $FC24
+.dc.w $FC05
+.dc.w $FC08
+.dc.w $FC2D
+.dc.w $FC73
+.dc.w $FCD7
+.dc.w $FD56
+.dc.w $FDEC
+.dc.w $FE94
+.dc.w $FF47
+.dc.w $0
+.dc.w $BA
+.dc.w $16E
+.dc.w $215
+.dc.w $2AB
+.dc.w $32A
+.dc.w $38E
+.dc.w $3D4
+.dc.w $3F9
+.dc.w $3FC
+.dc.w $3DD
+.dc.w $39D
+.dc.w $33E
+.dc.w $2C3
+.dc.w $22F
+.dc.w $189
+.dc.w $D5
+.dc.w $1A
+.dc.w $FF5F
+.dc.w $FEA8
+.dc.w $FDFC
+.dc.w $FD62
+.dc.w $FCDF
+.dc.w $FC77
+.dc.w $FC2F
+.dc.w $FC08
+.dc.w $FC05
+.dc.w $FC26
+.dc.w $FC69
+.dc.w $FCCD
+.dc.w $FD4F
+.dc.w $FDE9
+.dc.w $FE97
+.dc.w $FF53
+.dc.w $14
+.dc.w $D7
+.dc.w $191
+.dc.w $23E
+.dc.w $2D6
+.dc.w $353
+.dc.w $3B1
+.dc.w $3EB
+.dc.w $3FF
+.dc.w $3EC
+.dc.w $3B2
+.dc.w $353
+.dc.w $2D1
+.dc.w $233
+.dc.w $17E
+.dc.w $B8
+.dc.w $FFEB
+.dc.w $FF1D
+.dc.w $FE58
+.dc.w $FDA3
+.dc.w $FD07
+.dc.w $FC8B
+.dc.w $FC34
+.dc.w $FC08
+.dc.w $FC08
+.dc.w $FC35
+.dc.w $FC8F
+.dc.w $FD12
+.dc.w $FDB8
+.dc.w $FE7B
+.dc.w $FF52
+.dc.w $31
+.dc.w $111
+.dc.w $1E5
+.dc.w $2A2
+.dc.w $33E
+.dc.w $3B0
+.dc.w $3F1
+.dc.w $3FC
+.dc.w $3D0
+.dc.w $36C
+.dc.w $2D6
+.dc.w $214
+.dc.w $130
+.dc.w $38
+.dc.w $FF3A
+.dc.w $FE46
+.dc.w $FD6B
+.dc.w $FCB9
+.dc.w $FC3F
+.dc.w $FC05
+.dc.w $FC14
+.dc.w $FC6D
+.dc.w $FD0D
+.dc.w $FDEA
+.dc.w $FEF6
+.dc.w $1B
+.dc.w $144
+.dc.w $255
+.dc.w $335
+.dc.w $3C9
+.dc.w $3FF
+.dc.w $3CA
+.dc.w $329
+.dc.w $227
+.dc.w $DA
+.dc.w $FF68
+.dc.w $FE00
+.dc.w $FCD7
+.dc.w $FC23
+.dc.w $FC10
+.dc.w $FCB6
+.dc.w $FE0E
+.dc.w $FFE7
+.dc.w $1E1
+.dc.w $373
+.dc.w $3FD
+.dc.w $2FC
+.dc.w $61
+.dc.w $FD2A
+.dc.w $FC47
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FC1F
+.dc.w $FDBD
+.dc.w $146
+.dc.w $393
+.dc.w $3E4
+.dc.w $29F
+.dc.w $8D
+.dc.w $FE72
+.dc.w $FCDB
+.dc.w $FC13
+.dc.w $FC29
+.dc.w $FCFD
+.dc.w $FE53
+.dc.w $FFE6
+.dc.w $16F
+.dc.w $2B8
+.dc.w $399
+.dc.w $3FB
+.dc.w $3DC
+.dc.w $34A
+.dc.w $25B
+.dc.w $130
+.dc.w $FFEC
+.dc.w $FEB0
+.dc.w $FD99
+.dc.w $FCC0
+.dc.w $FC36
+.dc.w $FC02
+.dc.w $FC26
+.dc.w $FC99
+.dc.w $FD51
+.dc.w $FE3B
+.dc.w $FF45
+.dc.w $58
+.dc.w $162
+.dc.w $251
+.dc.w $315
+.dc.w $3A1
+.dc.w $3EF
+.dc.w $3FC
+.dc.w $3C8
+.dc.w $359
+.dc.w $2B6
+.dc.w $1EC
+.dc.w $107
+.dc.w $14
+.dc.w $FF23
+.dc.w $FE40
+.dc.w $FD76
+.dc.w $FCD2
+.dc.w $FC5A
+.dc.w $FC14
+.dc.w $FC03
+.dc.w $FC26
+.dc.w $FC7B
+.dc.w $FCFC
+.dc.w $FDA3
+.dc.w $FE66
+.dc.w $FF3C
+.dc.w $1A
+.dc.w $F5
+.dc.w $1C5
+.dc.w $27E
+.dc.w $319
+.dc.w $390
+.dc.w $3DD
+.dc.w $3FE
+.dc.w $3F2
+.dc.w $3B9
+.dc.w $358
+.dc.w $2D2
+.dc.w $22E
+.dc.w $173
+.dc.w $A9
+.dc.w $FFD9
+.dc.w $FF0B
+.dc.w $FE48
+.dc.w $FD98
+.dc.w $FD01
+.dc.w $FC89
+.dc.w $FC36
+.dc.w $FC09
+.dc.w $FC05
+.dc.w $FC29
+.dc.w $FC74
+.dc.w $FCE2
+.dc.w $FD6F
+.dc.w $FE15
+.dc.w $FECE
+.dc.w $FF92
+.dc.w $59
+.dc.w $11D
+.dc.w $1D6
+.dc.w $27D
+.dc.w $30C
+.dc.w $37D
+.dc.w $3CC
+.dc.w $3F7
+.dc.w $3FC
+.dc.w $3DC
+.dc.w $396
+.dc.w $32F
+.dc.w $2A9
+.dc.w $20B
+.dc.w $159
+.dc.w $9B
+.dc.w $FFD9
+.dc.w $FF17
+.dc.w $FE5D
+.dc.w $FDB3
+.dc.w $FD1F
+.dc.w $FCA6
+.dc.w $FC4C
+.dc.w $FC15
+.dc.w $FC02
+.dc.w $FC15
+.dc.w $FC4C
+.dc.w $FCA6
+.dc.w $FD1F
+.dc.w $FDB4
+.dc.w $FE5E
+.dc.w $FF17
+.dc.w $FFD9
+.dc.w $9C
+.dc.w $15A
+.dc.w $20B
+.dc.w $2AA
+.dc.w $32F
+.dc.w $396
+.dc.w $3DC
+.dc.w $3FC
+.dc.w $3F7
+.dc.w $3CC
+.dc.w $37D
+.dc.w $30C
+.dc.w $27D
+.dc.w $1D6
+.dc.w $11D
+.dc.w $59
+.dc.w $FF92
+.dc.w $FECE
+.dc.w $FE15
+.dc.w $FD6F
+.dc.w $FCE2
+.dc.w $FC74
+.dc.w $FC29
+.dc.w $FC05
+.dc.w $FC09
+.dc.w $FC36
+.dc.w $FC89
+.dc.w $FD01
+.dc.w $FD98
+.dc.w $FE49
+.dc.w $FF0C
+.dc.w $FFDA
+.dc.w $A9
+.dc.w $173
+.dc.w $22E
+.dc.w $2D2
+.dc.w $358
+.dc.w $3B9
+.dc.w $3F2
+.dc.w $3FE
+.dc.w $3DD
+.dc.w $390
+.dc.w $319
+.dc.w $27E
+.dc.w $1C4
+.dc.w $F5
+.dc.w $19
+.dc.w $FF3C
+.dc.w $FE66
+.dc.w $FDA3
+.dc.w $FCFC
+.dc.w $FC7B
+.dc.w $FC26
+.dc.w $FC03
+.dc.w $FC14
+.dc.w $FC5A
+.dc.w $FCD2
+.dc.w $FD77
+.dc.w $FE40
+.dc.w $FF24
+.dc.w $14
+.dc.w $107
+.dc.w $1EC
+.dc.w $2B7
+.dc.w $359
+.dc.w $3C8
+.dc.w $3FC
+.dc.w $3EF
+.dc.w $3A1
+.dc.w $314
+.dc.w $251
+.dc.w $162
+.dc.w $57
+.dc.w $FF44
+.dc.w $FE3B
+.dc.w $FD50
+.dc.w $FC99
+.dc.w $FC26
+.dc.w $FC02
+.dc.w $FC36
+.dc.w $FCC1
+.dc.w $FD99
+.dc.w $FEB0
+.dc.w $FFED
+.dc.w $130
+.dc.w $25B
+.dc.w $34A
+.dc.w $3DC
+.dc.w $3FB
+.dc.w $398
+.dc.w $2B8
+.dc.w $16F
+.dc.w $FFE6
+.dc.w $FE53
+.dc.w $FCFD
+.dc.w $FC29
+.dc.w $FC13
+.dc.w $FCDB
+.dc.w $FE72
+.dc.w $8D
+.dc.w $2A0
+.dc.w $3E5
+.dc.w $393
+.dc.w $145
+.dc.w $FDBC
+.dc.w $FC1F
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $3F9
+.dc.w $19E
+.dc.w $FDE8
+.dc.w $FC16
+.dc.w $FC8B
+.dc.w $FE7B
+.dc.w $D8
+.dc.w $2CD
+.dc.w $3DB
+.dc.w $3E2
+.dc.w $303
+.dc.w $189
+.dc.w $FFD1
+.dc.w $FE30
+.dc.w $FCEA
+.dc.w $FC2C
+.dc.w $FC07
+.dc.w $FC74
+.dc.w $FD59
+.dc.w $FE91
+.dc.w $FFF0
+.dc.w $149
+.dc.w $276
+.dc.w $359
+.dc.w $3DE
+.dc.w $3FD
+.dc.w $3B6
+.dc.w $317
+.dc.w $231
+.dc.w $11C
+.dc.w $FFF3
+.dc.w $FECE
+.dc.w $FDC6
+.dc.w $FCF0
+.dc.w $FC59
+.dc.w $FC0C
+.dc.w $FC0B
+.dc.w $FC55
+.dc.w $FCE1
+.dc.w $FDA5
+.dc.w $FE90
+.dc.w $FF91
+.dc.w $97
+.dc.w $192
+.dc.w $271
+.dc.w $326
+.dc.w $3A9
+.dc.w $3F1
+.dc.w $3FC
+.dc.w $3CB
+.dc.w $361
+.dc.w $2C7
+.dc.w $205
+.dc.w $127
+.dc.w $3B
+.dc.w $FF4E
+.dc.w $FE6B
+.dc.w $FD9F
+.dc.w $FCF4
+.dc.w $FC73
+.dc.w $FC21
+.dc.w $FC02
+.dc.w $FC17
+.dc.w $FC5E
+.dc.w $FCD3
+.dc.w $FD6F
+.dc.w $FE2A
+.dc.w $FEFB
+.dc.w $FFD8
+.dc.w $B5
+.dc.w $189
+.dc.w $24B
+.dc.w $2F0
+.dc.w $373
+.dc.w $3CC
+.dc.w $3FA
+.dc.w $3F9
+.dc.w $3CB
+.dc.w $372
+.dc.w $2F2
+.dc.w $252
+.dc.w $198
+.dc.w $CD
+.dc.w $FFFB
+.dc.w $FF29
+.dc.w $FE60
+.dc.w $FDA9
+.dc.w $FD0C
+.dc.w $FC90
+.dc.w $FC38
+.dc.w $FC0A
+.dc.w $FC05
+.dc.w $FC2B
+.dc.w $FC7A
+.dc.w $FCED
+.dc.w $FD81
+.dc.w $FE2F
+.dc.w $FEEF
+.dc.w $FFBB
+.dc.w $88
+.dc.w $150
+.dc.w $20B
+.dc.w $2B0
+.dc.w $339
+.dc.w $3A1
+.dc.w $3E4
+.dc.w $3FF
+.dc.w $3F0
+.dc.w $3BA
+.dc.w $35D
+.dc.w $2DE
+.dc.w $242
+.dc.w $18E
+.dc.w $CB
+.dc.w $0
+.dc.w $FF36
+.dc.w $FE72
+.dc.w $FDBF
+.dc.w $FD23
+.dc.w $FCA4
+.dc.w $FC47
+.dc.w $FC11
+.dc.w $FC02
+.dc.w $FC1D
+.dc.w $FC60
+.dc.w $FCC8
+.dc.w $FD51
+.dc.w $FDF7
+.dc.w $FEB1
+.dc.w $FF7A
+.dc.w $47
+.dc.w $112
+.dc.w $1D2
+.dc.w $280
+.dc.w $314
+.dc.w $387
+.dc.w $3D6
+.dc.w $3FC
+.dc.w $3F7
+.dc.w $3C8
+.dc.w $371
+.dc.w $2F4
+.dc.w $258
+.dc.w $1A1
+.dc.w $D8
+.dc.w $5
+.dc.w $FF33
+.dc.w $FE68
+.dc.w $FDAE
+.dc.w $FD0E
+.dc.w $FC8F
+.dc.w $FC36
+.dc.w $FC08
+.dc.w $FC08
+.dc.w $FC35
+.dc.w $FC8F
+.dc.w $FD11
+.dc.w $FDB7
+.dc.w $FE78
+.dc.w $FF4C
+.dc.w $29
+.dc.w $106
+.dc.w $1D7
+.dc.w $292
+.dc.w $32E
+.dc.w $3A3
+.dc.w $3EA
+.dc.w $3FF
+.dc.w $3E0
+.dc.w $38E
+.dc.w $30D
+.dc.w $262
+.dc.w $196
+.dc.w $B3
+.dc.w $FFC6
+.dc.w $FED9
+.dc.w $FDFC
+.dc.w $FD3A
+.dc.w $FCA0
+.dc.w $FC36
+.dc.w $FC05
+.dc.w $FC10
+.dc.w $FC59
+.dc.w $FCDB
+.dc.w $FD91
+.dc.w $FE70
+.dc.w $FF6A
+.dc.w $70
+.dc.w $172
+.dc.w $25D
+.dc.w $320
+.dc.w $3AC
+.dc.w $3F6
+.dc.w $3F5
+.dc.w $3A8
+.dc.w $311
+.dc.w $23A
+.dc.w $133
+.dc.w $E
+.dc.w $FEE5
+.dc.w $FDD0
+.dc.w $FCEA
+.dc.w $FC4A
+.dc.w $FC04
+.dc.w $FC23
+.dc.w $FCA8
+.dc.w $FD8B
+.dc.w $FEB9
+.dc.w $11
+.dc.w $170
+.dc.w $2A8
+.dc.w $38D
+.dc.w $3FA
+.dc.w $3D5
+.dc.w $317
+.dc.w $1D1
+.dc.w $2F
+.dc.w $FE77
+.dc.w $FCFE
+.dc.w $FC1F
+.dc.w $FC26
+.dc.w $FD35
+.dc.w $FF2A
+.dc.w $187
+.dc.w $376
+.dc.w $3EB
+.dc.w $219
+.dc.w $FE63
+.dc.w $FC08
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FC02
+.dc.w $FF18
+.dc.w $2D1
+.dc.w $3FD
+.dc.w $2BA
+.dc.w $44
+.dc.w $FDDF
+.dc.w $FC5B
+.dc.w $FC0B
+.dc.w $FCD8
+.dc.w $FE67
+.dc.w $44
+.dc.w $202
+.dc.w $34C
+.dc.w $3F0
+.dc.w $3E0
+.dc.w $32E
+.dc.w $203
+.dc.w $92
+.dc.w $FF17
+.dc.w $FDC2
+.dc.w $FCBD
+.dc.w $FC25
+.dc.w $FC05
+.dc.w $FC5B
+.dc.w $FD16
+.dc.w $FE1D
+.dc.w $FF53
+.dc.w $95
+.dc.w $1C4
+.dc.w $2C5
+.dc.w $381
+.dc.w $3EA
+.dc.w $3FB
+.dc.w $3B4
+.dc.w $31F
+.dc.w $24A
+.dc.w $149
+.dc.w $31
+.dc.w $FF19
+.dc.w $FE15
+.dc.w $FD36
+.dc.w $FC8D
+.dc.w $FC25
+.dc.w $FC02
+.dc.w $FC26
+.dc.w $FC8B
+.dc.w $FD2B
+.dc.w $FDF9
+.dc.w $FEE7
+.dc.w $FFE5
+.dc.w $E2
+.dc.w $1D1
+.dc.w $2A2
+.dc.w $348
+.dc.w $3BC
+.dc.w $3F8
+.dc.w $3F8
+.dc.w $3BD
+.dc.w $34D
+.dc.w $2AE
+.dc.w $1EA
+.dc.w $10C
+.dc.w $20
+.dc.w $FF35
+.dc.w $FE55
+.dc.w $FD8C
+.dc.w $FCE5
+.dc.w $FC68
+.dc.w $FC1C
+.dc.w $FC02
+.dc.w $FC1C
+.dc.w $FC69
+.dc.w $FCE3
+.dc.w $FD84
+.dc.w $FE44
+.dc.w $FF1A
+.dc.w $FFF9
+.dc.w $D8
+.dc.w $1AC
+.dc.w $26C
+.dc.w $30D
+.dc.w $389
+.dc.w $3DB
+.dc.w $3FE
+.dc.w $3F1
+.dc.w $3B6
+.dc.w $34F
+.dc.w $2C1
+.dc.w $214
+.dc.w $14F
+.dc.w $7A
+.dc.w $FFA2
+.dc.w $FECE
+.dc.w $FE07
+.dc.w $FD57
+.dc.w $FCC7
+.dc.w $FC5B
+.dc.w $FC18
+.dc.w $FC02
+.dc.w $FC19
+.dc.w $FC5C
+.dc.w $FCC8
+.dc.w $FD58
+.dc.w $FE06
+.dc.w $FECA
+.dc.w $FF9B
+.dc.w $70
+.dc.w $140
+.dc.w $203
+.dc.w $2AF
+.dc.w $33D
+.dc.w $3A7
+.dc.w $3E9
+.dc.w $3FF
+.dc.w $3E9
+.dc.w $3A7
+.dc.w $33D
+.dc.w $2AE
+.dc.w $202
+.dc.w $140
+.dc.w $6F
+.dc.w $FF9B
+.dc.w $FEC9
+.dc.w $FE06
+.dc.w $FD58
+.dc.w $FCC8
+.dc.w $FC5C
+.dc.w $FC19
+.dc.w $FC02
+.dc.w $FC18
+.dc.w $FC5B
+.dc.w $FCC7
+.dc.w $FD58
+.dc.w $FE07
+.dc.w $FECE
+.dc.w $FFA3
+.dc.w $7B
+.dc.w $14F
+.dc.w $214
+.dc.w $2C2
+.dc.w $34F
+.dc.w $3B6
+.dc.w $3F1
+.dc.w $3FE
+.dc.w $3DB
+.dc.w $389
+.dc.w $30D
+.dc.w $26C
+.dc.w $1AC
+.dc.w $D8
+.dc.w $FFF9
+.dc.w $FF19
+.dc.w $FE44
+.dc.w $FD84
+.dc.w $FCE3
+.dc.w $FC69
+.dc.w $FC1C
+.dc.w $FC02
+.dc.w $FC1C
+.dc.w $FC69
+.dc.w $FCE6
+.dc.w $FD8C
+.dc.w $FE55
+.dc.w $FF35
+.dc.w $21
+.dc.w $10C
+.dc.w $1EA
+.dc.w $2AF
+.dc.w $34D
+.dc.w $3BE
+.dc.w $3F8
+.dc.w $3F8
+.dc.w $3BC
+.dc.w $348
+.dc.w $2A1
+.dc.w $1D1
+.dc.w $E2
+.dc.w $FFE5
+.dc.w $FEE7
+.dc.w $FDF9
+.dc.w $FD2B
+.dc.w $FC8B
+.dc.w $FC25
+.dc.w $FC02
+.dc.w $FC25
+.dc.w $FC8E
+.dc.w $FD37
+.dc.w $FE15
+.dc.w $FF1A
+.dc.w $32
+.dc.w $14A
+.dc.w $24B
+.dc.w $31F
+.dc.w $3B4
+.dc.w $3FB
+.dc.w $3EA
+.dc.w $381
+.dc.w $2C5
+.dc.w $1C4
+.dc.w $94
+.dc.w $FF53
+.dc.w $FE1D
+.dc.w $FD15
+.dc.w $FC5A
+.dc.w $FC05
+.dc.w $FC25
+.dc.w $FCBE
+.dc.w $FDC2
+.dc.w $FF17
+.dc.w $93
+.dc.w $203
+.dc.w $32F
+.dc.w $3E0
+.dc.w $3F0
+.dc.w $34C
+.dc.w $202
+.dc.w $43
+.dc.w $FE66
+.dc.w $FCD7
+.dc.w $FC0B
+.dc.w $FC5B
+.dc.w $FDDF
+.dc.w $45
+.dc.w $2BA
+.dc.w $3FD
+.dc.w $2D1
+.dc.w $FF18
+.dc.w $FC02
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $3F2
+.dc.w $2C
+.dc.w $FC9E
+.dc.w $FC39
+.dc.w $FE40
+.dc.w $105
+.dc.w $32A
+.dc.w $3FE
+.dc.w $372
+.dc.w $1E4
+.dc.w $FFE4
+.dc.w $FDFE
+.dc.w $FCA0
+.dc.w $FC07
+.dc.w $FC3F
+.dc.w $FD29
+.dc.w $FE8F
+.dc.w $29
+.dc.w $1B3
+.dc.w $2F3
+.dc.w $3BE
+.dc.w $3FF
+.dc.w $3B6
+.dc.w $2F4
+.dc.w $1D8
+.dc.w $88
+.dc.w $FF2F
+.dc.w $FDF1
+.dc.w $FCF2
+.dc.w $FC49
+.dc.w $FC03
+.dc.w $FC25
+.dc.w $FCA6
+.dc.w $FD78
+.dc.w $FE82
+.dc.w $FFAD
+.dc.w $DA
+.dc.w $1F3
+.dc.w $2DE
+.dc.w $38A
+.dc.w $3EB
+.dc.w $3FB
+.dc.w $3BB
+.dc.w $332
+.dc.w $26D
+.dc.w $17B
+.dc.w $6F
+.dc.w $FF5E
+.dc.w $FE5A
+.dc.w $FD75
+.dc.w $FCBF
+.dc.w $FC42
+.dc.w $FC07
+.dc.w $FC0F
+.dc.w $FC59
+.dc.w $FCDF
+.dc.w $FD97
+.dc.w $FE75
+.dc.w $FF6A
+.dc.w $66
+.dc.w $15C
+.dc.w $23B
+.dc.w $2F7
+.dc.w $386
+.dc.w $3DF
+.dc.w $3FF
+.dc.w $3E4
+.dc.w $390
+.dc.w $309
+.dc.w $258
+.dc.w $185
+.dc.w $9E
+.dc.w $FFB1
+.dc.w $FEC7
+.dc.w $FDF0
+.dc.w $FD35
+.dc.w $FCA1
+.dc.w $FC3B
+.dc.w $FC08
+.dc.w $FC0A
+.dc.w $FC40
+.dc.w $FCA8
+.dc.w $FD3C
+.dc.w $FDF3
+.dc.w $FEC4
+.dc.w $FFA5
+.dc.w $89
+.dc.w $167
+.dc.w $232
+.dc.w $2E1
+.dc.w $36C
+.dc.w $3CB
+.dc.w $3FA
+.dc.w $3F7
+.dc.w $3C4
+.dc.w $361
+.dc.w $2D5
+.dc.w $226
+.dc.w $15D
+.dc.w $83
+.dc.w $FFA4
+.dc.w $FEC9
+.dc.w $FDFD
+.dc.w $FD4A
+.dc.w $FCB8
+.dc.w $FC4E
+.dc.w $FC11
+.dc.w $FC03
+.dc.w $FC26
+.dc.w $FC77
+.dc.w $FCF3
+.dc.w $FD94
+.dc.w $FE52
+.dc.w $FF25
+.dc.w $0
+.dc.w $DD
+.dc.w $1AF
+.dc.w $26D
+.dc.w $30E
+.dc.w $38A
+.dc.w $3DB
+.dc.w $3FE
+.dc.w $3F0
+.dc.w $3B3
+.dc.w $349
+.dc.w $2B7
+.dc.w $203
+.dc.w $137
+.dc.w $5C
+.dc.w $FF7E
+.dc.w $FEA4
+.dc.w $FDDB
+.dc.w $FD2C
+.dc.w $FCA0
+.dc.w $FC3D
+.dc.w $FC0A
+.dc.w $FC07
+.dc.w $FC36
+.dc.w $FC96
+.dc.w $FD20
+.dc.w $FDCF
+.dc.w $FE9A
+.dc.w $FF78
+.dc.w $5C
+.dc.w $13D
+.dc.w $20E
+.dc.w $2C6
+.dc.w $359
+.dc.w $3C1
+.dc.w $3F7
+.dc.w $3F9
+.dc.w $3C6
+.dc.w $360
+.dc.w $2CC
+.dc.w $211
+.dc.w $139
+.dc.w $50
+.dc.w $FF62
+.dc.w $FE7B
+.dc.w $FDA9
+.dc.w $FCF8
+.dc.w $FC71
+.dc.w $FC1D
+.dc.w $FC02
+.dc.w $FC22
+.dc.w $FC7B
+.dc.w $FD0A
+.dc.w $FDC6
+.dc.w $FEA6
+.dc.w $FF9B
+.dc.w $98
+.dc.w $18D
+.dc.w $26B
+.dc.w $323
+.dc.w $3A8
+.dc.w $3F2
+.dc.w $3FA
+.dc.w $3BE
+.dc.w $342
+.dc.w $28C
+.dc.w $1A7
+.dc.w $A2
+.dc.w $FF92
+.dc.w $FE86
+.dc.w $FD94
+.dc.w $FCCE
+.dc.w $FC46
+.dc.w $FC06
+.dc.w $FC16
+.dc.w $FC77
+.dc.w $FD23
+.dc.w $FE0F
+.dc.w $FF27
+.dc.w $55
+.dc.w $17F
+.dc.w $28A
+.dc.w $35B
+.dc.w $3DC
+.dc.w $3FE
+.dc.w $3B8
+.dc.w $30F
+.dc.w $20F
+.dc.w $D2
+.dc.w $FF78
+.dc.w $FE29
+.dc.w $FD0C
+.dc.w $FC4B
+.dc.w $FC02
+.dc.w $FC44
+.dc.w $FD0E
+.dc.w $FE4E
+.dc.w $FFD9
+.dc.w $172
+.dc.w $2D8
+.dc.w $3C3
+.dc.w $3FA
+.dc.w $360
+.dc.w $202
+.dc.w $1D
+.dc.w $FE1D
+.dc.w $FC8F
+.dc.w $FC03
+.dc.w $FCD7
+.dc.w $FEFD
+.dc.w $1C2
+.dc.w $3C8
+.dc.w $363
+.dc.w $FFD5
+.dc.w $FC0F
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FC2D
+.dc.w $93
+.dc.w $3C7
+.dc.w $34F
+.dc.w $A1
+.dc.w $FDCF
+.dc.w $FC32
+.dc.w $FC39
+.dc.w $FD9E
+.dc.w $FFB7
+.dc.w $1CF
+.dc.w $356
+.dc.w $3FB
+.dc.w $3AF
+.dc.w $29A
+.dc.w $104
+.dc.w $FF49
+.dc.w $FDB9
+.dc.w $FC98
+.dc.w $FC0C
+.dc.w $FC23
+.dc.w $FCCE
+.dc.w $FDED
+.dc.w $FF50
+.dc.w $C4
+.dc.w $219
+.dc.w $325
+.dc.w $3CC
+.dc.w $3FF
+.dc.w $3BC
+.dc.w $30F
+.dc.w $211
+.dc.w $DE
+.dc.w $FF99
+.dc.w $FE62
+.dc.w $FD56
+.dc.w $FC8F
+.dc.w $FC1C
+.dc.w $FC05
+.dc.w $FC4A
+.dc.w $FCE2
+.dc.w $FDBE
+.dc.w $FEC8
+.dc.w $FFEB
+.dc.w $10B
+.dc.w $215
+.dc.w $2F3
+.dc.w $394
+.dc.w $3EE
+.dc.w $3FB
+.dc.w $3BC
+.dc.w $338
+.dc.w $279
+.dc.w $18E
+.dc.w $88
+.dc.w $FF7C
+.dc.w $FE79
+.dc.w $FD92
+.dc.w $FCD7
+.dc.w $FC52
+.dc.w $FC0C
+.dc.w $FC09
+.dc.w $FC46
+.dc.w $FCC1
+.dc.w $FD6F
+.dc.w $FE46
+.dc.w $FF37
+.dc.w $32
+.dc.w $12B
+.dc.w $210
+.dc.w $2D5
+.dc.w $36E
+.dc.w $3D3
+.dc.w $3FE
+.dc.w $3ED
+.dc.w $3A2
+.dc.w $322
+.dc.w $275
+.dc.w $1A5
+.dc.w $BE
+.dc.w $FFCD
+.dc.w $FEDF
+.dc.w $FE02
+.dc.w $FD42
+.dc.w $FCA8
+.dc.w $FC3E
+.dc.w $FC08
+.dc.w $FC0A
+.dc.w $FC41
+.dc.w $FCAD
+.dc.w $FD45
+.dc.w $FE02
+.dc.w $FEDA
+.dc.w $FFC2
+.dc.w $AB
+.dc.w $18C
+.dc.w $258
+.dc.w $304
+.dc.w $388
+.dc.w $3DD
+.dc.w $3FF
+.dc.w $3EB
+.dc.w $3A4
+.dc.w $32E
+.dc.w $28D
+.dc.w $1CB
+.dc.w $F2
+.dc.w $D
+.dc.w $FF28
+.dc.w $FE4D
+.dc.w $FD89
+.dc.w $FCE4
+.dc.w $FC69
+.dc.w $FC1C
+.dc.w $FC02
+.dc.w $FC1C
+.dc.w $FC69
+.dc.w $FCE5
+.dc.w $FD89
+.dc.w $FE4D
+.dc.w $FF28
+.dc.w $D
+.dc.w $F3
+.dc.w $1CC
+.dc.w $28E
+.dc.w $32E
+.dc.w $3A5
+.dc.w $3EB
+.dc.w $3FE
+.dc.w $3DD
+.dc.w $388
+.dc.w $304
+.dc.w $257
+.dc.w $18B
+.dc.w $AA
+.dc.w $FFC1
+.dc.w $FEDA
+.dc.w $FE02
+.dc.w $FD45
+.dc.w $FCAC
+.dc.w $FC41
+.dc.w $FC09
+.dc.w $FC08
+.dc.w $FC3E
+.dc.w $FCA9
+.dc.w $FD42
+.dc.w $FE03
+.dc.w $FEE0
+.dc.w $FFCE
+.dc.w $BE
+.dc.w $1A5
+.dc.w $276
+.dc.w $323
+.dc.w $3A2
+.dc.w $3ED
+.dc.w $3FE
+.dc.w $3D3
+.dc.w $36E
+.dc.w $2D5
+.dc.w $210
+.dc.w $12A
+.dc.w $32
+.dc.w $FF36
+.dc.w $FE45
+.dc.w $FD6F
+.dc.w $FCC0
+.dc.w $FC46
+.dc.w $FC09
+.dc.w $FC0C
+.dc.w $FC52
+.dc.w $FCD7
+.dc.w $FD93
+.dc.w $FE79
+.dc.w $FF7C
+.dc.w $89
+.dc.w $18E
+.dc.w $279
+.dc.w $338
+.dc.w $3BC
+.dc.w $3FB
+.dc.w $3ED
+.dc.w $394
+.dc.w $2F2
+.dc.w $215
+.dc.w $10B
+.dc.w $FFEA
+.dc.w $FEC8
+.dc.w $FDBD
+.dc.w $FCE2
+.dc.w $FC4A
+.dc.w $FC05
+.dc.w $FC1C
+.dc.w $FC8F
+.dc.w $FD56
+.dc.w $FE62
+.dc.w $FF9A
+.dc.w $DF
+.dc.w $211
+.dc.w $310
+.dc.w $3BC
+.dc.w $3FF
+.dc.w $3CC
+.dc.w $325
+.dc.w $218
+.dc.w $C3
+.dc.w $FF4F
+.dc.w $FDEC
+.dc.w $FCCE
+.dc.w $FC23
+.dc.w $FC0C
+.dc.w $FC98
+.dc.w $FDBA
+.dc.w $FF4A
+.dc.w $105
+.dc.w $29A
+.dc.w $3B0
+.dc.w $3FB
+.dc.w $356
+.dc.w $1CE
+.dc.w $FFB7
+.dc.w $FD9D
+.dc.w $FC39
+.dc.w $FC32
+.dc.w $FDCF
+.dc.w $A2
+.dc.w $350
+.dc.w $3C7
+.dc.w $92
+.dc.w $FC2D
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $3A5
+.dc.w $FEB5
+.dc.w $FC07
+.dc.w $FD65
+.dc.w $8C
+.dc.w $326
+.dc.w $3FE
+.dc.w $30A
+.dc.w $F5
+.dc.w $FEA4
+.dc.w $FCD9
+.dc.w $FC0A
+.dc.w $FC51
+.dc.w $FD82
+.dc.w $FF3E
+.dc.w $117
+.dc.w $2AB
+.dc.w $3B0
+.dc.w $3FE
+.dc.w $396
+.dc.w $295
+.dc.w $12D
+.dc.w $FF9F
+.dc.w $FE25
+.dc.w $FCF7
+.dc.w $FC3A
+.dc.w $FC03
+.dc.w $FC52
+.dc.w $FD17
+.dc.w $FE35
+.dc.w $FF86
+.dc.w $E0
+.dc.w $21E
+.dc.w $31C
+.dc.w $3C1
+.dc.w $3FF
+.dc.w $3D3
+.dc.w $345
+.dc.w $266
+.dc.w $14E
+.dc.w $19
+.dc.w $FEE5
+.dc.w $FDCD
+.dc.w $FCEA
+.dc.w $FC4F
+.dc.w $FC07
+.dc.w $FC16
+.dc.w $FC79
+.dc.w $FD26
+.dc.w $FE0D
+.dc.w $FF1B
+.dc.w $38
+.dc.w $150
+.dc.w $24C
+.dc.w $31A
+.dc.w $3AB
+.dc.w $3F6
+.dc.w $3F6
+.dc.w $3AC
+.dc.w $320
+.dc.w $25B
+.dc.w $16E
+.dc.w $68
+.dc.w $FF5D
+.dc.w $FE5E
+.dc.w $FD7C
+.dc.w $FCC6
+.dc.w $FC48
+.dc.w $FC09
+.dc.w $FC0C
+.dc.w $FC51
+.dc.w $FCD2
+.dc.w $FD86
+.dc.w $FE62
+.dc.w $FF57
+.dc.w $55
+.dc.w $14E
+.dc.w $231
+.dc.w $2F2
+.dc.w $384
+.dc.w $3DF
+.dc.w $3FF
+.dc.w $3E2
+.dc.w $389
+.dc.w $2FB
+.dc.w $241
+.dc.w $166
+.dc.w $76
+.dc.w $FF81
+.dc.w $FE92
+.dc.w $FDBA
+.dc.w $FD03
+.dc.w $FC78
+.dc.w $FC21
+.dc.w $FC02
+.dc.w $FC1D
+.dc.w $FC71
+.dc.w $FCF7
+.dc.w $FDA9
+.dc.w $FE7C
+.dc.w $FF65
+.dc.w $55
+.dc.w $141
+.dc.w $21B
+.dc.w $2D7
+.dc.w $36B
+.dc.w $3CF
+.dc.w $3FC
+.dc.w $3F2
+.dc.w $3B0
+.dc.w $33A
+.dc.w $296
+.dc.w $1CF
+.dc.w $EE
+.dc.w $0
+.dc.w $FF13
+.dc.w $FE32
+.dc.w $FD6A
+.dc.w $FCC7
+.dc.w $FC51
+.dc.w $FC0F
+.dc.w $FC05
+.dc.w $FC33
+.dc.w $FC96
+.dc.w $FD2A
+.dc.w $FDE6
+.dc.w $FEC0
+.dc.w $FFAD
+.dc.w $9D
+.dc.w $185
+.dc.w $259
+.dc.w $30A
+.dc.w $391
+.dc.w $3E4
+.dc.w $3FF
+.dc.w $3E0
+.dc.w $389
+.dc.w $2FE
+.dc.w $247
+.dc.w $16E
+.dc.w $80
+.dc.w $FF8B
+.dc.w $FE9B
+.dc.w $FDBF
+.dc.w $FD05
+.dc.w $FC78
+.dc.w $FC1F
+.dc.w $FC02
+.dc.w $FC22
+.dc.w $FC7D
+.dc.w $FD10
+.dc.w $FDD0
+.dc.w $FEB4
+.dc.w $FFAC
+.dc.w $AA
+.dc.w $19F
+.dc.w $27B
+.dc.w $32F
+.dc.w $3B0
+.dc.w $3F5
+.dc.w $3F8
+.dc.w $3B9
+.dc.w $33B
+.dc.w $285
+.dc.w $1A3
+.dc.w $A3
+.dc.w $FF99
+.dc.w $FE93
+.dc.w $FDA5
+.dc.w $FCE1
+.dc.w $FC55
+.dc.w $FC0B
+.dc.w $FC0B
+.dc.w $FC56
+.dc.w $FCE7
+.dc.w $FDB5
+.dc.w $FEB2
+.dc.w $FFCA
+.dc.w $E7
+.dc.w $1F4
+.dc.w $2DB
+.dc.w $388
+.dc.w $3EB
+.dc.w $3FA
+.dc.w $3B2
+.dc.w $316
+.dc.w $233
+.dc.w $11B
+.dc.w $FFE8
+.dc.w $FEB3
+.dc.w $FD9B
+.dc.w $FCBC
+.dc.w $FC2E
+.dc.w $FC02
+.dc.w $FC41
+.dc.w $FCE6
+.dc.w $FDE4
+.dc.w $FF21
+.dc.w $7B
+.dc.w $1CD
+.dc.w $2EB
+.dc.w $3B0
+.dc.w $3FE
+.dc.w $3C7
+.dc.w $30A
+.dc.w $1DB
+.dc.w $62
+.dc.w $FED3
+.dc.w $FD6C
+.dc.w $FC6B
+.dc.w $FC03
+.dc.w $FC52
+.dc.w $FD56
+.dc.w $FEEA
+.dc.w $C4
+.dc.w $280
+.dc.w $3B0
+.dc.w $3F7
+.dc.w $328
+.dc.w $15C
+.dc.w $FF0B
+.dc.w $FCF6
+.dc.w $FC03
+.dc.w $FCDC
+.dc.w $FF75
+.dc.w $29C
+.dc.w $3FA
+.dc.w $14C
+.dc.w $FC5C
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FC9B
+.dc.w $1FA
+.dc.w $3F7
+.dc.w $1BA
+.dc.w $FE53
+.dc.w $FC3C
+.dc.w $FC51
+.dc.w $FE20
+.dc.w $9F
+.dc.w $2C7
+.dc.w $3E6
+.dc.w $3C5
+.dc.w $28F
+.dc.w $B4
+.dc.w $FEBB
+.dc.w $FD1C
+.dc.w $FC2C
+.dc.w $FC11
+.dc.w $FCBF
+.dc.w $FE09
+.dc.w $FFA7
+.dc.w $14B
+.dc.w $2B2
+.dc.w $3A2
+.dc.w $3FE
+.dc.w $3C0
+.dc.w $2F7
+.dc.w $1C7
+.dc.w $5E
+.dc.w $FEEE
+.dc.w $FDA5
+.dc.w $FCAC
+.dc.w $FC1E
+.dc.w $FC08
+.dc.w $FC68
+.dc.w $FD2F
+.dc.w $FE44
+.dc.w $FF86
+.dc.w $D1
+.dc.w $204
+.dc.w $2FF
+.dc.w $3AC
+.dc.w $3FB
+.dc.w $3E7
+.dc.w $375
+.dc.w $2B1
+.dc.w $1B0
+.dc.w $8A
+.dc.w $FF5B
+.dc.w $FE3B
+.dc.w $FD45
+.dc.w $FC8C
+.dc.w $FC1E
+.dc.w $FC03
+.dc.w $FC3C
+.dc.w $FCC3
+.dc.w $FD8B
+.dc.w $FE83
+.dc.w $FF97
+.dc.w $B2
+.dc.w $1BE
+.dc.w $2A7
+.dc.w $35D
+.dc.w $3D2
+.dc.w $3FF
+.dc.w $3E1
+.dc.w $37C
+.dc.w $2D9
+.dc.w $202
+.dc.w $108
+.dc.w $FFFE
+.dc.w $FEF4
+.dc.w $FDFE
+.dc.w $FD2B
+.dc.w $FC8A
+.dc.w $FC25
+.dc.w $FC02
+.dc.w $FC23
+.dc.w $FC84
+.dc.w $FD20
+.dc.w $FDEB
+.dc.w $FED8
+.dc.w $FFD7
+.dc.w $D7
+.dc.w $1CA
+.dc.w $2A0
+.dc.w $34B
+.dc.w $3C0
+.dc.w $3FA
+.dc.w $3F4
+.dc.w $3B0
+.dc.w $331
+.dc.w $281
+.dc.w $1AA
+.dc.w $B9
+.dc.w $FFBE
+.dc.w $FEC7
+.dc.w $FDE3
+.dc.w $FD20
+.dc.w $FC8A
+.dc.w $FC29
+.dc.w $FC02
+.dc.w $FC1A
+.dc.w $FC6C
+.dc.w $FCF5
+.dc.w $FDAD
+.dc.w $FE87
+.dc.w $FF78
+.dc.w $70
+.dc.w $162
+.dc.w $23F
+.dc.w $2FA
+.dc.w $388
+.dc.w $3E1
+.dc.w $3FF
+.dc.w $3E1
+.dc.w $388
+.dc.w $2FA
+.dc.w $23F
+.dc.w $161
+.dc.w $6F
+.dc.w $FF77
+.dc.w $FE87
+.dc.w $FDAC
+.dc.w $FCF5
+.dc.w $FC6C
+.dc.w $FC19
+.dc.w $FC02
+.dc.w $FC29
+.dc.w $FC8A
+.dc.w $FD20
+.dc.w $FDE3
+.dc.w $FEC8
+.dc.w $FFBF
+.dc.w $B9
+.dc.w $1AA
+.dc.w $281
+.dc.w $332
+.dc.w $3B0
+.dc.w $3F4
+.dc.w $3FA
+.dc.w $3C0
+.dc.w $34A
+.dc.w $29F
+.dc.w $1CA
+.dc.w $D7
+.dc.w $FFD6
+.dc.w $FED7
+.dc.w $FDEA
+.dc.w $FD1F
+.dc.w $FC84
+.dc.w $FC22
+.dc.w $FC02
+.dc.w $FC25
+.dc.w $FC8A
+.dc.w $FD2C
+.dc.w $FDFE
+.dc.w $FEF5
+.dc.w $FFFF
+.dc.w $109
+.dc.w $203
+.dc.w $2D9
+.dc.w $37D
+.dc.w $3E1
+.dc.w $3FF
+.dc.w $3D2
+.dc.w $35C
+.dc.w $2A7
+.dc.w $1BE
+.dc.w $B1
+.dc.w $FF97
+.dc.w $FE82
+.dc.w $FD8A
+.dc.w $FCC2
+.dc.w $FC3C
+.dc.w $FC03
+.dc.w $FC1E
+.dc.w $FC8C
+.dc.w $FD45
+.dc.w $FE3C
+.dc.w $FF5B
+.dc.w $8A
+.dc.w $1B0
+.dc.w $2B1
+.dc.w $375
+.dc.w $3E7
+.dc.w $3FB
+.dc.w $3AB
+.dc.w $2FF
+.dc.w $203
+.dc.w $D0
+.dc.w $FF85
+.dc.w $FE43
+.dc.w $FD2F
+.dc.w $FC68
+.dc.w $FC08
+.dc.w $FC1E
+.dc.w $FCAD
+.dc.w $FDA5
+.dc.w $FEEE
+.dc.w $5E
+.dc.w $1C8
+.dc.w $2F8
+.dc.w $3C0
+.dc.w $3FE
+.dc.w $3A2
+.dc.w $2B1
+.dc.w $14B
+.dc.w $FFA6
+.dc.w $FE08
+.dc.w $FCBF
+.dc.w $FC11
+.dc.w $FC2D
+.dc.w $FD1C
+.dc.w $FEBB
+.dc.w $B4
+.dc.w $28F
+.dc.w $3C5
+.dc.w $3E6
+.dc.w $2C6
+.dc.w $9E
+.dc.w $FE1F
+.dc.w $FC51
+.dc.w $FC3D
+.dc.w $FE54
+.dc.w $1BB
+.dc.w $3F7
+.dc.w $1FA
+.dc.w $FC9B
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $318
+.dc.w $FD6A
+.dc.w $FC42
+.dc.w $FF47
+.dc.w $2AA
+.dc.w $3FF
+.dc.w $2EF
+.dc.w $75
+.dc.w $FDE7
+.dc.w $FC4C
+.dc.w $FC1B
+.dc.w $FD38
+.dc.w $FF27
+.dc.w $144
+.dc.w $2FA
+.dc.w $3E5
+.dc.w $3DC
+.dc.w $2F5
+.dc.w $172
+.dc.w $FFAC
+.dc.w $FE00
+.dc.w $FCBC
+.dc.w $FC14
+.dc.w $FC1D
+.dc.w $FCCB
+.dc.w $FDFA
+.dc.w $FF75
+.dc.w $FF
+.dc.w $25E
+.dc.w $363
+.dc.w $3ED
+.dc.w $3EF
+.dc.w $36D
+.dc.w $27D
+.dc.w $141
+.dc.w $FFE2
+.dc.w $FE8A
+.dc.w $FD61
+.dc.w $FC87
+.dc.w $FC13
+.dc.w $FC0D
+.dc.w $FC74
+.dc.w $FD39
+.dc.w $FE46
+.dc.w $FF7E
+.dc.w $C0
+.dc.w $1ED
+.dc.w $2E8
+.dc.w $39A
+.dc.w $3F5
+.dc.w $3F1
+.dc.w $392
+.dc.w $2E1
+.dc.w $1F0
+.dc.w $D5
+.dc.w $FFAA
+.dc.w $FE87
+.dc.w $FD86
+.dc.w $FCBC
+.dc.w $FC37
+.dc.w $FC03
+.dc.w $FC21
+.dc.w $FC8F
+.dc.w $FD42
+.dc.w $FE2B
+.dc.w $FF38
+.dc.w $52
+.dc.w $165
+.dc.w $25D
+.dc.w $326
+.dc.w $3B2
+.dc.w $3F8
+.dc.w $3F3
+.dc.w $3A4
+.dc.w $313
+.dc.w $249
+.dc.w $156
+.dc.w $4C
+.dc.w $FF3E
+.dc.w $FE3E
+.dc.w $FD5E
+.dc.w $FCAD
+.dc.w $FC37
+.dc.w $FC04
+.dc.w $FC16
+.dc.w $FC6D
+.dc.w $FD01
+.dc.w $FDC8
+.dc.w $FEB5
+.dc.w $FFB8
+.dc.w $BE
+.dc.w $1B8
+.dc.w $294
+.dc.w $345
+.dc.w $3BF
+.dc.w $3FA
+.dc.w $3F3
+.dc.w $3AA
+.dc.w $325
+.dc.w $26C
+.dc.w $18C
+.dc.w $92
+.dc.w $FF90
+.dc.w $FE95
+.dc.w $FDB1
+.dc.w $FCF3
+.dc.w $FC67
+.dc.w $FC15
+.dc.w $FC04
+.dc.w $FC33
+.dc.w $FC9F
+.dc.w $FD43
+.dc.w $FE13
+.dc.w $FF02
+.dc.w $0
+.dc.w $100
+.dc.w $1EF
+.dc.w $2BE
+.dc.w $362
+.dc.w $3CE
+.dc.w $3FD
+.dc.w $3EB
+.dc.w $39A
+.dc.w $30E
+.dc.w $24F
+.dc.w $16B
+.dc.w $70
+.dc.w $FF6E
+.dc.w $FE75
+.dc.w $FD94
+.dc.w $FCDC
+.dc.w $FC57
+.dc.w $FC0E
+.dc.w $FC07
+.dc.w $FC43
+.dc.w $FCBC
+.dc.w $FD6D
+.dc.w $FE4A
+.dc.w $FF44
+.dc.w $4A
+.dc.w $14C
+.dc.w $239
+.dc.w $300
+.dc.w $394
+.dc.w $3EB
+.dc.w $3FD
+.dc.w $3CA
+.dc.w $354
+.dc.w $2A3
+.dc.w $1C3
+.dc.w $C2
+.dc.w $FFB5
+.dc.w $FEAA
+.dc.w $FDB8
+.dc.w $FCEE
+.dc.w $FC5C
+.dc.w $FC0E
+.dc.w $FC09
+.dc.w $FC4F
+.dc.w $FCDB
+.dc.w $FDA4
+.dc.w $FE9C
+.dc.w $FFB0
+.dc.w $CA
+.dc.w $1D7
+.dc.w $2C0
+.dc.w $373
+.dc.w $3E0
+.dc.w $3FE
+.dc.w $3CA
+.dc.w $345
+.dc.w $27A
+.dc.w $179
+.dc.w $57
+.dc.w $FF2C
+.dc.w $FE11
+.dc.w $FD20
+.dc.w $FC6F
+.dc.w $FC10
+.dc.w $FC0C
+.dc.w $FC67
+.dc.w $FD1A
+.dc.w $FE15
+.dc.w $FF42
+.dc.w $83
+.dc.w $1BB
+.dc.w $2C8
+.dc.w $38D
+.dc.w $3F4
+.dc.w $3EE
+.dc.w $379
+.dc.w $29F
+.dc.w $176
+.dc.w $1E
+.dc.w $FEC0
+.dc.w $FD84
+.dc.w $FC94
+.dc.w $FC12
+.dc.w $FC14
+.dc.w $FC9E
+.dc.w $FDA3
+.dc.w $FF03
+.dc.w $8C
+.dc.w $207
+.dc.w $336
+.dc.w $3E4
+.dc.w $3ED
+.dc.w $345
+.dc.w $201
+.dc.w $54
+.dc.w $FE8F
+.dc.w $FD0B
+.dc.w $FC25
+.dc.w $FC1C
+.dc.w $FD07
+.dc.w $FEBE
+.dc.w $DA
+.dc.w $2C9
+.dc.w $3E6
+.dc.w $3B5
+.dc.w $21A
+.dc.w $FF8C
+.dc.w $FD11
+.dc.w $FC02
+.dc.w $FD58
+.dc.w $BA
+.dc.w $3BF
+.dc.w $296
+.dc.w $FCE9
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FD46
+.dc.w $31C
+.dc.w $355
+.dc.w $FFAD
+.dc.w $FC96
+.dc.w $FC33
+.dc.w $FE2E
+.dc.w $108
+.dc.w $342
+.dc.w $3FE
+.dc.w $327
+.dc.w $138
+.dc.w $FEF4
+.dc.w $FD14
+.dc.w $FC19
+.dc.w $FC32
+.dc.w $FD42
+.dc.w $FEF4
+.dc.w $D9
+.dc.w $285
+.dc.w $3A1
+.dc.w $3FF
+.dc.w $397
+.dc.w $287
+.dc.w $108
+.dc.w $FF64
+.dc.w $FDDF
+.dc.w $FCB8
+.dc.w $FC19
+.dc.w $FC12
+.dc.w $FCA1
+.dc.w $FDA9
+.dc.w $FF01
+.dc.w $78
+.dc.w $1DB
+.dc.w $2FC
+.dc.w $3BA
+.dc.w $3FF
+.dc.w $3C7
+.dc.w $31D
+.dc.w $217
+.dc.w $D6
+.dc.w $FF81
+.dc.w $FE3D
+.dc.w $FD2C
+.dc.w $FC6A
+.dc.w $FC0B
+.dc.w $FC15
+.dc.w $FC85
+.dc.w $FD4E
+.dc.w $FE5A
+.dc.w $FF8D
+.dc.w $C8
+.dc.w $1F0
+.dc.w $2E7
+.dc.w $398
+.dc.w $3F3
+.dc.w $3F3
+.dc.w $399
+.dc.w $2EE
+.dc.w $202
+.dc.w $EB
+.dc.w $FFC2
+.dc.w $FE9F
+.dc.w $FD9B
+.dc.w $FCCB
+.dc.w $FC40
+.dc.w $FC04
+.dc.w $FC1B
+.dc.w $FC82
+.dc.w $FD30
+.dc.w $FE16
+.dc.w $FF22
+.dc.w $3D
+.dc.w $154
+.dc.w $24F
+.dc.w $31D
+.dc.w $3AE
+.dc.w $3F7
+.dc.w $3F4
+.dc.w $3A6
+.dc.w $313
+.dc.w $246
+.dc.w $14F
+.dc.w $41
+.dc.w $FF2F
+.dc.w $FE2C
+.dc.w $FD4C
+.dc.w $FC9D
+.dc.w $FC2D
+.dc.w $FC02
+.dc.w $FC20
+.dc.w $FC84
+.dc.w $FD26
+.dc.w $FDFB
+.dc.w $FEF3
+.dc.w $FFFF
+.dc.w $109
+.dc.w $201
+.dc.w $2D6
+.dc.w $378
+.dc.w $3DD
+.dc.w $3FF
+.dc.w $3DB
+.dc.w $373
+.dc.w $2CF
+.dc.w $1FA
+.dc.w $103
+.dc.w $FFFC
+.dc.w $FEF4
+.dc.w $FDFE
+.dc.w $FD2B
+.dc.w $FC8A
+.dc.w $FC25
+.dc.w $FC02
+.dc.w $FC25
+.dc.w $FC8A
+.dc.w $FD2C
+.dc.w $FDFF
+.dc.w $FEF4
+.dc.w $FFFC
+.dc.w $104
+.dc.w $1FB
+.dc.w $2CF
+.dc.w $373
+.dc.w $3DB
+.dc.w $3FF
+.dc.w $3DD
+.dc.w $378
+.dc.w $2D5
+.dc.w $200
+.dc.w $108
+.dc.w $FFFE
+.dc.w $FEF3
+.dc.w $FDFA
+.dc.w $FD25
+.dc.w $FC83
+.dc.w $FC20
+.dc.w $FC02
+.dc.w $FC2D
+.dc.w $FC9E
+.dc.w $FD4C
+.dc.w $FE2D
+.dc.w $FF30
+.dc.w $41
+.dc.w $150
+.dc.w $246
+.dc.w $313
+.dc.w $3A6
+.dc.w $3F4
+.dc.w $3F7
+.dc.w $3AD
+.dc.w $31D
+.dc.w $24F
+.dc.w $153
+.dc.w $3C
+.dc.w $FF21
+.dc.w $FE15
+.dc.w $FD2F
+.dc.w $FC82
+.dc.w $FC1B
+.dc.w $FC04
+.dc.w $FC40
+.dc.w $FCCC
+.dc.w $FD9C
+.dc.w $FEA0
+.dc.w $FFC3
+.dc.w $EB
+.dc.w $202
+.dc.w $2EE
+.dc.w $399
+.dc.w $3F3
+.dc.w $3F3
+.dc.w $397
+.dc.w $2E6
+.dc.w $1EF
+.dc.w $C8
+.dc.w $FF8C
+.dc.w $FE59
+.dc.w $FD4D
+.dc.w $FC85
+.dc.w $FC15
+.dc.w $FC0B
+.dc.w $FC6A
+.dc.w $FD2C
+.dc.w $FE3D
+.dc.w $FF82
+.dc.w $D7
+.dc.w $217
+.dc.w $31D
+.dc.w $3C7
+.dc.w $3FF
+.dc.w $3B9
+.dc.w $2FC
+.dc.w $1DA
+.dc.w $77
+.dc.w $FF01
+.dc.w $FDA8
+.dc.w $FCA0
+.dc.w $FC12
+.dc.w $FC19
+.dc.w $FCB9
+.dc.w $FDE0
+.dc.w $FF65
+.dc.w $109
+.dc.w $287
+.dc.w $397
+.dc.w $3FF
+.dc.w $3A1
+.dc.w $284
+.dc.w $D8
+.dc.w $FEF3
+.dc.w $FD41
+.dc.w $FC32
+.dc.w $FC19
+.dc.w $FD15
+.dc.w $FEF5
+.dc.w $138
+.dc.w $327
+.dc.w $3FE
+.dc.w $341
+.dc.w $107
+.dc.w $FE2E
+.dc.w $FC32
+.dc.w $FC97
+.dc.w $FFAE
+.dc.w $355
+.dc.w $31B
+.dc.w $FD45
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $FC02
+.dc.w $253
+.dc.w $FC7C
+.dc.w $FD42
+.dc.w $15C
+.dc.w $3DF
+.dc.w $338
+.dc.w $7E
+.dc.w $FDA1
+.dc.w $FC1B
+.dc.w $FC6B
+.dc.w $FE34
+.dc.w $9A
+.dc.w $2B6
+.dc.w $3DF
+.dc.w $3D0
+.dc.w $2AA
+.dc.w $D3
+.dc.w $FED2
+.dc.w $FD26
+.dc.w $FC2D
+.dc.w $FC13
+.dc.w $FCD0
+.dc.w $FE30
+.dc.w $FFE6
+.dc.w $198
+.dc.w $2FA
+.dc.w $3CF
+.dc.w $3F9
+.dc.w $37A
+.dc.w $26D
+.dc.w $102
+.dc.w $FF75
+.dc.w $FE01
+.dc.w $FCDC
+.dc.w $FC2C
+.dc.w $FC06
+.dc.w $FC6A
+.dc.w $FD47
+.dc.w $FE7C
+.dc.w $FFE0
+.dc.w $143
+.dc.w $27D
+.dc.w $367
+.dc.w $3E9
+.dc.w $3F6
+.dc.w $38F
+.dc.w $2C3
+.dc.w $1AA
+.dc.w $66
+.dc.w $FF19
+.dc.w $FDE7
+.dc.w $FCEE
+.dc.w $FC48
+.dc.w $FC03
+.dc.w $FC25
+.dc.w $FCA9
+.dc.w $FD7E
+.dc.w $FE91
+.dc.w $FFC5
+.dc.w $FD
+.dc.w $21C
+.dc.w $307
+.dc.w $3AB
+.dc.w $3F9
+.dc.w $3EC
+.dc.w $385
+.dc.w $2D0
+.dc.w $1DD
+.dc.w $C2
+.dc.w $FF98
+.dc.w $FE77
+.dc.w $FD78
+.dc.w $FCB1
+.dc.w $FC31
+.dc.w $FC02
+.dc.w $FC27
+.dc.w $FC9C
+.dc.w $FD57
+.dc.w $FE48
+.dc.w $FF5C
+.dc.w $7B
+.dc.w $191
+.dc.w $286
+.dc.w $348
+.dc.w $3C9
+.dc.w $3FE
+.dc.w $3E4
+.dc.w $37E
+.dc.w $2D4
+.dc.w $1F3
+.dc.w $ED
+.dc.w $FFD7
+.dc.w $FEC3
+.dc.w $FDC7
+.dc.w $FCF7
+.dc.w $FC60
+.dc.w $FC0F
+.dc.w $FC09
+.dc.w $FC4D
+.dc.w $FCD7
+.dc.w $FD9D
+.dc.w $FE8F
+.dc.w $FF9C
+.dc.w $AF
+.dc.w $1B6
+.dc.w $29D
+.dc.w $354
+.dc.w $3CC
+.dc.w $3FE
+.dc.w $3E6
+.dc.w $385
+.dc.w $2E4
+.dc.w $20D
+.dc.w $110
+.dc.w $0
+.dc.w $FEF0
+.dc.w $FDF4
+.dc.w $FD1D
+.dc.w $FC7B
+.dc.w $FC1B
+.dc.w $FC03
+.dc.w $FC35
+.dc.w $FCAE
+.dc.w $FD64
+.dc.w $FE4B
+.dc.w $FF52
+.dc.w $65
+.dc.w $172
+.dc.w $265
+.dc.w $32A
+.dc.w $3B4
+.dc.w $3F9
+.dc.w $3F2
+.dc.w $3A1
+.dc.w $30A
+.dc.w $239
+.dc.w $13E
+.dc.w $2A
+.dc.w $FF13
+.dc.w $FE0D
+.dc.w $FD2D
+.dc.w $FC83
+.dc.w $FC1D
+.dc.w $FC03
+.dc.w $FC38
+.dc.w $FCB9
+.dc.w $FD7B
+.dc.w $FE71
+.dc.w $FF86
+.dc.w $A5
+.dc.w $1B9
+.dc.w $2AA
+.dc.w $365
+.dc.w $3DA
+.dc.w $3FF
+.dc.w $3D0
+.dc.w $34F
+.dc.w $288
+.dc.w $18A
+.dc.w $69
+.dc.w $FF3F
+.dc.w $FE24
+.dc.w $FD30
+.dc.w $FC7B
+.dc.w $FC15
+.dc.w $FC08
+.dc.w $FC56
+.dc.w $FCFA
+.dc.w $FDE6
+.dc.w $FF05
+.dc.w $3C
+.dc.w $170
+.dc.w $283
+.dc.w $359
+.dc.w $3DC
+.dc.w $3FE
+.dc.w $3B9
+.dc.w $312
+.dc.w $21A
+.dc.w $E7
+.dc.w $FF9B
+.dc.w $FE56
+.dc.w $FD3E
+.dc.w $FC72
+.dc.w $FC0B
+.dc.w $FC18
+.dc.w $FC9A
+.dc.w $FD85
+.dc.w $FEBE
+.dc.w $22
+.dc.w $185
+.dc.w $2BA
+.dc.w $397
+.dc.w $3FB
+.dc.w $3D5
+.dc.w $325
+.dc.w $200
+.dc.w $8C
+.dc.w $FEFF
+.dc.w $FD94
+.dc.w $FC87
+.dc.w $FC08
+.dc.w $FC33
+.dc.w $FD08
+.dc.w $FE69
+.dc.w $1C
+.dc.w $1D1
+.dc.w $331
+.dc.w $3EE
+.dc.w $3D4
+.dc.w $2DB
+.dc.w $12F
+.dc.w $FF2E
+.dc.w $FD56
+.dc.w $FC31
+.dc.w $FC22
+.dc.w $FD4B
+.dc.w $FF67
+.dc.w $1CD
+.dc.w $396
+.dc.w $3E6
+.dc.w $25F
+.dc.w $FF83
+.dc.w $FCC8
+.dc.w $FC22
+.dc.w $FEA6
+.dc.w $2BF
+.dc.w $385
+.dc.w $FDAE
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $FE21
+.dc.w $3D0
+.dc.w $204
+.dc.w $FDB6
+.dc.w $FC03
+.dc.w $FDB5
+.dc.w $E7
+.dc.w $363
+.dc.w $3EF
+.dc.w $28E
+.dc.w $1B
+.dc.w $FDB5
+.dc.w $FC3E
+.dc.w $FC21
+.dc.w $FD47
+.dc.w $FF3A
+.dc.w $158
+.dc.w $30D
+.dc.w $3EC
+.dc.w $3CF
+.dc.w $2CB
+.dc.w $12B
+.dc.w $FF52
+.dc.w $FDA5
+.dc.w $FC7A
+.dc.w $FC03
+.dc.w $FC4F
+.dc.w $FD47
+.dc.w $FEB6
+.dc.w $59
+.dc.w $1E8
+.dc.w $323
+.dc.w $3DA
+.dc.w $3F7
+.dc.w $37A
+.dc.w $27C
+.dc.w $125
+.dc.w $FFA9
+.dc.w $FE3C
+.dc.w $FD0F
+.dc.w $FC4A
+.dc.w $FC02
+.dc.w $FC3E
+.dc.w $FCF1
+.dc.w $FE04
+.dc.w $FF53
+.dc.w $B2
+.dc.w $1FB
+.dc.w $307
+.dc.w $3B9
+.dc.w $3FE
+.dc.w $3D2
+.dc.w $33B
+.dc.w $24C
+.dc.w $120
+.dc.w $FFD8
+.dc.w $FE96
+.dc.w $FD7A
+.dc.w $FCA2
+.dc.w $FC22
+.dc.w $FC04
+.dc.w $FC4B
+.dc.w $FCEF
+.dc.w $FDDD
+.dc.w $FEFE
+.dc.w $35
+.dc.w $168
+.dc.w $277
+.dc.w $34B
+.dc.w $3D2
+.dc.w $3FF
+.dc.w $3D0
+.dc.w $34B
+.dc.w $27B
+.dc.w $174
+.dc.w $4E
+.dc.w $FF22
+.dc.w $FE0A
+.dc.w $FD1E
+.dc.w $FC71
+.dc.w $FC12
+.dc.w $FC08
+.dc.w $FC53
+.dc.w $FCED
+.dc.w $FDC7
+.dc.w $FECF
+.dc.w $FFF1
+.dc.w $111
+.dc.w $21C
+.dc.w $2FB
+.dc.w $39C
+.dc.w $3F2
+.dc.w $3F7
+.dc.w $3AB
+.dc.w $315
+.dc.w $240
+.dc.w $13F
+.dc.w $24
+.dc.w $FF08
+.dc.w $FDFF
+.dc.w $FD1E
+.dc.w $FC77
+.dc.w $FC17
+.dc.w $FC05
+.dc.w $FC42
+.dc.w $FCC9
+.dc.w $FD90
+.dc.w $FE88
+.dc.w $FF9C
+.dc.w $B6
+.dc.w $1C4
+.dc.w $2AF
+.dc.w $365
+.dc.w $3D8
+.dc.w $3FF
+.dc.w $3D8
+.dc.w $364
+.dc.w $2AE
+.dc.w $1C4
+.dc.w $B6
+.dc.w $FF9B
+.dc.w $FE87
+.dc.w $FD90
+.dc.w $FCC9
+.dc.w $FC42
+.dc.w $FC05
+.dc.w $FC17
+.dc.w $FC77
+.dc.w $FD1E
+.dc.w $FDFF
+.dc.w $FF08
+.dc.w $25
+.dc.w $13F
+.dc.w $241
+.dc.w $315
+.dc.w $3AC
+.dc.w $3F7
+.dc.w $3F2
+.dc.w $39B
+.dc.w $2FB
+.dc.w $21C
+.dc.w $111
+.dc.w $FFF0
+.dc.w $FECF
+.dc.w $FDC6
+.dc.w $FCEC
+.dc.w $FC53
+.dc.w $FC08
+.dc.w $FC13
+.dc.w $FC72
+.dc.w $FD1E
+.dc.w $FE0B
+.dc.w $FF23
+.dc.w $4E
+.dc.w $175
+.dc.w $27B
+.dc.w $34B
+.dc.w $3D0
+.dc.w $3FF
+.dc.w $3D1
+.dc.w $34B
+.dc.w $277
+.dc.w $167
+.dc.w $35
+.dc.w $FEFD
+.dc.w $FDDC
+.dc.w $FCEE
+.dc.w $FC4B
+.dc.w $FC04
+.dc.w $FC22
+.dc.w $FCA2
+.dc.w $FD7B
+.dc.w $FE96
+.dc.w $FFD9
+.dc.w $120
+.dc.w $24D
+.dc.w $33C
+.dc.w $3D2
+.dc.w $3FE
+.dc.w $3B9
+.dc.w $307
+.dc.w $1FB
+.dc.w $B2
+.dc.w $FF52
+.dc.w $FE04
+.dc.w $FCF1
+.dc.w $FC3D
+.dc.w $FC02
+.dc.w $FC4A
+.dc.w $FD10
+.dc.w $FE3C
+.dc.w $FFA9
+.dc.w $125
+.dc.w $27D
+.dc.w $37B
+.dc.w $3F7
+.dc.w $3DA
+.dc.w $322
+.dc.w $1E8
+.dc.w $58
+.dc.w $FEB6
+.dc.w $FD46
+.dc.w $FC4F
+.dc.w $FC03
+.dc.w $FC7A
+.dc.w $FDA6
+.dc.w $FF52
+.dc.w $12B
+.dc.w $2CC
+.dc.w $3CF
+.dc.w $3EC
+.dc.w $30C
+.dc.w $158
+.dc.w $FF39
+.dc.w $FD46
+.dc.w $FC21
+.dc.w $FC3E
+.dc.w $FDB6
+.dc.w $1C
+.dc.w $28E
+.dc.w $3EF
+.dc.w $363
+.dc.w $E6
+.dc.w $FDB4
+.dc.w $FC03
+.dc.w $FDB6
+.dc.w $204
+.dc.w $3CF
+.dc.w $FE20
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.dc.w $3FF
+.globl _adj
+.text
+_adj:
+~~adj:
+~wshar=R7
+link R14,#0
+movem.l R4-R7/R12-R13,-(sp)
+~wspnt=R6
+~harval=R5
+~kp=R13
+~vp=R12
+*line 49
+move 8(R14),R7
+*line 49
+move R7,R0
+move #10,R1
+asl R1,R0
+ext.l R0
+move.l R0,R12
+add.l #_vknm,R12
+*line 51
+move R7,R8
+add.l R8,R8
+move.l #_vmtab,R9
+move 0(R8,R9.l),R0
+ext.l R0
+move.l R0,R5
+*line 53
+*line 53
+tst.l R5
+beq L2
+*line 54
+*line 55
+move R7,R0
+move #9,R1
+asl R1,R0
+ext.l R0
+move.l R0,R13
+add.l #_knmtab,R13
+*line 56
+*line 57
+clr R6
+bra L5
+L6:
+*line 58
+move (R13)+,R0
+ext.l R0
+move.l R0,-(sp)
+move.l R5,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l R0,(R12)+
+L4:
+*line 57
+add #1,R6
+L5:
+*line 57
+cmp #256,R6
+blt L6
+L3:
+*line 58
+*line 59
+bra L7
+L2:
+*line 60
+*line 61
+*line 62
+clr R6
+bra L10
+L11:
+*line 63
+clr.l (R12)+
+L9:
+*line 62
+add #1,R6
+L10:
+*line 62
+cmp #256,R6
+blt L11
+L8:
+*line 63
+L7:L1:tst.l (sp)+
+movem.l (sp)+,R5-R7/R12-R13
+unlk R14
+rts
+.globl _wadj
+.text
+_wadj:
+~~wadj:
+link R14,#0
+movem.l R6-R7,-(sp)
+~wshar=R7
+*line 80
+clr R7
+bra L15
+L16:
+*line 81
+move R7,(sp)
+jsr _adj
+L14:
+*line 80
+add #1,R7
+L15:
+*line 80
+cmp #32,R7
+blt L16
+L13:L12:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _clrwsa
+.text
+_clrwsa:
+~~clrwsa:
+link R14,#-4
+*line 92
+move #256,(sp)
+clr -(sp)
+move.l #_offsets,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 93
+move #16384,(sp)
+clr -(sp)
+move.l #_vknm,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 94
+move #32,(sp)
+clr -(sp)
+move.l #_vmtab,-(sp)
+jsr _memsetw
+addq.l #6,sp
+L17:unlk R14
+rts
+.globl _wscalc
+.text
+_wscalc:
+~~wscalc:
+link R14,#0
+movem.l R2-R7,-(sp)
+~wspnt=R7
+~wshar=R6
+~hfac=R5
+~hmax=R4
+~temp=R3
+*line 111
+move.l #$3ff,R4
+*line 113
+clr R7
+bra L21
+L22:
+*line 114
+*line 115
+clr.l R3
+*line 116
+*line 117
+clr R6
+bra L25
+L26:
+*line 118
+move R6,R0
+move #10,R1
+asl R1,R0
+ext.l R0
+move R7,R1
+asl #2,R1
+ext.l R1
+add.l R1,R0
+add.l #_vknm,R0
+move.l R0,R8
+move.l (R8),R0
+add.l R0,R3
+L24:
+*line 117
+add #1,R6
+L25:
+*line 117
+cmp #32,R6
+blt L26
+L23:
+*line 118
+*line 119
+*line 120
+*line 121
+*line 122
+move.l #$64,-(sp)
+move.l R3,-(sp)
+jsr ldiv
+addq.l #8,sp
+move R7,R9
+add.l R9,R9
+add.l #_offsets,R9
+move (R9),R1
+ext.l R1
+add.l R1,R0
+move.l R0,-(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_hwave,R8
+move.l (sp)+,(R8)
+*line 123
+*line 124
+*line 125
+*line 126
+*line 127
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+add.l #_hwave,R8
+tst.l (R8)
+bge L10000
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_hwave,R9
+move.l 0(R8,R9.l),R0
+neg.l R0
+bra L10002
+L10000:move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_hwave,R9
+move.l 0(R8,R9.l),R0
+L10002:move.l R0,R3
+move.l R3,R0
+cmp.l R0,R4
+bge L27
+*line 127
+move.l R3,R4
+L27:L20:
+*line 113
+add #1,R7
+L21:
+*line 113
+cmp #256,R7
+blt L22
+L19:
+*line 132
+move.l R4,-(sp)
+move.l #$3ff0000,-(sp)
+jsr ldiv
+addq.l #8,sp
+move.l R0,R5
+*line 136
+clr R7
+bra L30
+L31:
+*line 137
+move R7,R8
+add.l R8,R8
+add.l #_wsbuf,R8
+move.l R8,-(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_hwave,R9
+move.l 0(R8,R9.l),-(sp)
+move.l R5,-(sp)
+jsr lmul
+addq.l #8,sp
+move.l #$10,R1
+asr.l R1,R0
+move.l (sp)+,R8
+move R0,(R8)
+L29:
+*line 136
+add #1,R7
+L30:
+*line 136
+cmp #256,R7
+blt L31
+L28:L18:tst.l (sp)+
+movem.l (sp)+,R3-R7
+unlk R14
+rts
+.data
Index: alcyon/wsdsp.s
===================================================================
--- alcyon/wsdsp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
+++ alcyon/wsdsp.s	(revision 7bf3856f4ff505a2174d89c937caf328029e3574)
@@ -0,0 +1,1513 @@
+.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 _obj0
+.globl _bfs
+.globl _wdbxlb0
+.globl _wdbxlb1
+.globl _wdbox
+.globl _vbufs
+.globl _curinst
+.globl _curvce
+.globl _curwave
+.globl _curwdth
+.globl _curwfnl
+.globl _curwhrm
+.globl _curwhrv
+.globl _curwpnt
+.globl _curwoff
+.globl _curwslt
+.globl _cxval
+.globl _cyval
+.globl _lstwoff
+.globl _lstwpnt
+.globl _stccol
+.globl _stcrow
+.globl _wpntsv
+.globl _wplast
+.globl _wvlast
+.globl _vmtab
+.globl _wsbuf
+.globl _vknm
+.globl _waveob
+.globl _wsnmod
+.globl _wslib
+.globl _wdoct
+.globl _wavpal
+.data
+_wavpal:
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.dc.w $3
+.dc.w $3
+.dc.w $3
+.dc.w $2
+.dc.w $2
+.dc.w $2
+.dc.w $0
+.dc.w $1
+.dc.w $1
+.dc.w $1
+.dc.w $0
+.dc.w $1
+.dc.w $0
+.dc.w $1
+.dc.w $1
+.dc.w $2
+.dc.w $1
+.dc.w $2
+.dc.w $0
+.dc.w $3
+.dc.w $0
+.dc.w $2
+.dc.w $0
+.dc.w $0
+.dc.w $2
+.dc.w $0
+.dc.w $2
+.dc.w $0
+.dc.w $0
+.dc.w $0
+.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 $1
+.dc.w $0
+.dc.w $0
+.dc.w $3
+.globl _advwcur
+.text
+_advwcur:
+~~advwcur:
+link R14,#0
+movem.l R6-R7,-(sp)
+~newcol=R7
+*line 117
+move _stccol,R7
+add #1,R7
+*line 119
+*line 120
+move.l _cfetp,R8
+cmp 4(R8),R7
+bgt L2
+*line 120
+move R7,(sp)
+move _stcrow,-(sp)
+jsr _itcpos
+addq.l #2,sp
+L2:L1:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _hdraw
+.text
+_hdraw:
+~~hdraw:
+~hv=R13
+~h=12
+link R14,#0
+movem.l R3-R7/R13-R13,-(sp)
+~bc=R7
+~bx=R6
+~by=R5
+~j=R4
+*line 138
+move.l 8(R14),R13
+*line 138
+move 12(R14),R6
+asl #4,R6
+add #4,R6
+*line 140
+*line 140
+move.l R13,R8
+move 12(R14),R9
+add.l R9,R9
+add.l R9,R8
+tst (R8)
+bge L4
+*line 141
+*line 142
+move #306,R5
+move 12(R14),R8
+add.l R8,R8
+move 0(R13,R8.l),R0
+neg R0
+asl #7,R0
+ext.l R0
+divs #100,R0
+sub R0,R5
+*line 143
+move #8,R7
+*line 144
+bra L5
+L4:
+*line 145
+*line 146
+*line 147
+move #306,R5
+move 12(R14),R8
+add.l R8,R8
+move 0(R13,R8.l),R0
+asl #7,R0
+ext.l R0
+divs #100,R0
+sub R0,R5
+*line 148
+move #9,R7
+L5:
+*line 151
+clr R4
+bra L8
+L9:
+*line 152
+*line 153
+move R7,(sp)
+move R5,-(sp)
+move R6,-(sp)
+move #306,-(sp)
+move R6,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 154
+add #1,R6
+L7:
+*line 151
+add #1,R4
+L8:
+*line 151
+cmp #8,R4
+blt L9
+L6:L3:tst.l (sp)+
+movem.l (sp)+,R4-R7/R13-R13
+unlk R14
+rts
+.globl _dsws
+.text
+_dsws:
+~~dsws:
+~how=8
+link R14,#-6
+movem.l R6-R7/R11-R13,-(sp)
+~ip=R13
+~fv=R12
+~hv=R11
+~ov=-4
+~i=R7
+~cx=-6
+*line 175
+move _wdbox,(sp)
+jsr _exp_c
+move R0,-6(R14)
+*line 177
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 178
+tst _curwslt
+beq L10000
+move.l R13,R0
+add.l #2858,R0
+bra L10002
+L10000:move.l R13,R0
+add.l #1778,R0
+L10002:move.l R0,R12
+*line 179
+tst _curwslt
+beq L10003
+move.l R13,R0
+add.l #3366,R0
+bra L10005
+L10003:move.l R13,R0
+add.l #2286,R0
+L10005:move.l R0,-4(R14)
+*line 180
+tst _curwslt
+beq L10006
+move.l R13,R0
+add.l #3874,R0
+bra L10008
+L10006:move.l R13,R0
+add.l #2794,R0
+L10008:move.l R0,R11
+*line 182
+move.l #_wdpoint,_point
+*line 184
+*line 185
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L11
+*line 185
+clr (sp)
+jsr _vbank
+*line 186
+L11:
+*line 187
+*line 188
+tst 8(R14)
+beq L12
+*line 189
+move -6(R14),(sp)
+move 6+_wdbox,-(sp)
+move 4+_wdbox,-(sp)
+move 2+_wdbox,-(sp)
+move _wdbox,-(sp)
+move #128,-(sp)
+move.l _waveob,-(sp)
+jsr _vbfill4
+adda.l #14,sp
+*line 190
+L12:
+*line 191
+move #10,(sp)
+move #133,-(sp)
+move #510,-(sp)
+move #133,-(sp)
+move #1,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 192
+move #10,(sp)
+move #266,-(sp)
+move #510,-(sp)
+move #266,-(sp)
+move #1,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 194
+clr R7
+bra L15
+L16:
+*line 195
+move R7,(sp)
+move.l R11,-(sp)
+jsr _hdraw
+addq.l #4,sp
+L14:
+*line 194
+add #1,R7
+L15:
+*line 194
+cmp #32,R7
+blt L16
+L13:
+*line 197
+clr R7
+bra L19
+L20:
+*line 198
+*line 199
+*line 200
+*line 201
+*line 202
+move #6,(sp)
+move #133,-(sp)
+move.l -4(R14),R8
+move R7,R9
+add.l R9,R9
+move 0(R8,R9.l),R0
+asr #5,R0
+ext.l R0
+divs #8,R0
+sub R0,(sp)
+move R7,R0
+asl #1,R0
+move R0,-(sp)
+add #2,(sp)
+jsr _wdpoint
+addq.l #4,sp
+*line 203
+*line 204
+*line 205
+*line 206
+*line 207
+move #7,(sp)
+move #133,-(sp)
+move R7,R8
+add.l R8,R8
+move 0(R12,R8.l),R0
+asr #5,R0
+ext.l R0
+divs #8,R0
+sub R0,(sp)
+move R7,R0
+asl #1,R0
+move R0,-(sp)
+add #2,(sp)
+jsr _wdpoint
+addq.l #4,sp
+L18:
+*line 197
+add #1,R7
+L19:
+*line 197
+cmp #254,R7
+blt L20
+L17:L10:tst.l (sp)+
+movem.l (sp)+,R7-R7/R11-R13
+unlk R14
+rts
+.globl _wdswin
+.text
+_wdswin:
+~~wdswin:
+~n=R7
+link R14,#0
+movem.l R3-R7,-(sp)
+~cx=R6
+~wval=R5
+~wsgn=R4
+*line 226
+move 8(R14),R7
+*line 226
+move R7,R0
+asl #4,R0
+ext.l R0
+add.l #_wdbox,R0
+move.l R0,R8
+move 10(R8),R6
+*line 227
+move R6,R0
+asl #4,R0
+or R0,R6
+*line 228
+move R6,R0
+asl #8,R0
+or R0,R6
+*line 232
+*line 233
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L22
+*line 233
+clr (sp)
+jsr _vbank
+*line 234
+L22:
+*line 235
+*line 236
+move R6,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 6(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 4(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 2(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 0(R8,R9.l),-(sp)
+move #128,-(sp)
+move.l _waveob,-(sp)
+jsr _vbfill4
+adda.l #14,sp
+*line 240
+*line 241
+move #14,(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_wdbxlb0,R9
+move.l 0(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 14(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 12(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 243
+*line 244
+move #14,(sp)
+move R7,R8
+add.l R8,R8
+add.l R8,R8
+move.l #_wdbxlb1,R9
+move.l 0(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 14(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,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 #_wdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 248
+move R7,R0
+bra L24
+*line 249
+L25:
+*line 250
+*line 251
+*line 252
+clr (sp)
+jsr _dsws
+bra L21
+*line 253
+*line 254
+L26:
+*line 255
+*line 256
+*line 257
+move _curwave,(sp)
+add #1,(sp)
+move.l #L27,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 258
+*line 259
+*line 260
+move #14,(sp)
+move.l #_bfs,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,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 #_wdbox,R9
+move 12(R8,R9.l),-(sp)
+move _curvce,R8
+add.l R8,R8
+add.l R8,R8
+move _curwslt,R9
+add.l R9,R9
+add.l R9,R8
+move.l #_wsnmod,R9
+tst 0(R8,R9.l)
+beq L10009
+move #13,-(sp)
+bra L10011
+L10009:move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 8(R8,R9.l),-(sp)
+L10011:jsr _exp_c
+addq.l #2,sp
+move R0,-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 261
+*line 262
+move _curvce,(sp)
+add #1,(sp)
+move.l #L28,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 263
+*line 264
+move #14,(sp)
+move.l #_bfs,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 14(R8,R9.l),-(sp)
+add #18,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 12(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 265
+*line 266
+move _curinst,(sp)
+move.l #L29,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 267
+*line 268
+move #14,(sp)
+move.l #_bfs,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 14(R8,R9.l),-(sp)
+add #11,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,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 #_wdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 269
+*line 270
+move _curwslt,(sp)
+add #65,(sp)
+move.l #L30,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 271
+*line 272
+move #14,(sp)
+move.l #_bfs,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 14(R8,R9.l),-(sp)
+add #19,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,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 #_wdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 273
+bra L21
+*line 274
+*line 275
+*line 276
+*line 277
+L31:
+*line 278
+*line 279
+*line 280
+move _curwpnt,(sp)
+move.l #L32,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 281
+*line 282
+move #14,(sp)
+move.l #_bfs,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,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 #_wdbox,R9
+move 12(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 283
+*line 284
+*line 284
+tst _curwoff
+bge L33
+*line 285
+*line 286
+move _curwoff,R0
+neg R0
+move R0,R5
+*line 287
+move.b #45,R4
+*line 288
+bra L34
+L33:
+*line 289
+*line 290
+*line 291
+move _curwoff,R5
+*line 292
+move.b #43,R4
+L34:
+*line 293
+*line 294
+*line 295
+move R5,(sp)
+move.b R4,R0
+ext.w R0
+move R0,-(sp) 
+move.l #L35,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 296
+*line 297
+move #14,(sp)
+move.l #_bfs,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 14(R8,R9.l),-(sp)
+add #14,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 12(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 298
+*line 299
+*line 299
+cmp #8,_curwdth
+bne L36
+*line 300
+*line 301
+*line 302
+move #14,(sp)
+move.l #L37,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 14(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,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 #_wdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 303
+bra L38
+L36:
+*line 304
+*line 305
+*line 306
+*line 307
+move #14,(sp)
+move.l #L39,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 14(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,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 #_wdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 308
+*line 309
+move _curwdth,(sp)
+move.l #L40,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 310
+*line 311
+move #14,(sp)
+move.l #_bfs,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 14(R8,R9.l),-(sp)
+add #6,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,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 #_wdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+L38:
+*line 312
+*line 313
+*line 314
+*line 314
+tst _curwfnl
+bge L41
+*line 315
+*line 316
+move _curwfnl,R0
+neg R0
+move R0,R5
+*line 317
+move.b #45,R4
+*line 318
+bra L42
+L41:
+*line 319
+*line 320
+*line 321
+move _curwfnl,R5
+*line 322
+move.b #43,R4
+L42:
+*line 323
+*line 324
+*line 325
+move R5,(sp)
+move.b R4,R0
+ext.w R0
+move R0,-(sp) 
+move.l #L43,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 326
+*line 327
+move #14,(sp)
+move.l #_bfs,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 14(R8,R9.l),-(sp)
+add #14,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,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 #_wdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 328
+bra L21
+*line 329
+*line 330
+*line 331
+L44:
+*line 332
+*line 333
+*line 334
+move _curwhrm,(sp)
+add #1,(sp)
+move.l #L45,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+addq.l #8,sp
+*line 335
+*line 336
+move #14,(sp)
+move.l #_bfs,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 14(R8,R9.l),-(sp)
+add #10,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 12(R8,R9.l),-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 337
+*line 338
+*line 338
+tst _curwhrv
+bge L46
+*line 339
+*line 340
+move _curwhrv,R0
+neg R0
+move R0,R5
+*line 341
+move.b #45,R4
+*line 342
+bra L47
+L46:
+*line 343
+*line 344
+*line 345
+move _curwhrv,R5
+*line 346
+move.b #43,R4
+L47:
+*line 347
+*line 348
+*line 349
+move R5,(sp)
+move.b R4,R0
+ext.w R0
+move R0,-(sp) 
+move.l #L48,-(sp)
+move.l #_bfs,-(sp)
+jsr _sprintf
+adda.l #10,sp
+*line 350
+*line 351
+move #14,(sp)
+move.l #_bfs,-(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,R9
+move 14(R8,R9.l),-(sp)
+add #6,(sp)
+move R7,R0
+asl #4,R0
+ext.l R0
+move.l R0,R8
+move.l #_wdbox,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 #_wdbox,R9
+move 8(R8,R9.l),-(sp)
+move #64,-(sp)
+move.l _waveob,-(sp)
+jsr _tsplot4
+adda.l #16,sp
+*line 352
+bra L21
+*line 353
+*line 354
+bra L23
+L24:tst R0
+beq L25
+cmp #2,R0
+beq L26
+cmp #4,R0
+beq L31
+cmp #5,R0
+beq L44
+bra L23
+L23:L21:tst.l (sp)+
+movem.l (sp)+,R4-R7
+unlk R14
+rts
+.globl _wwins
+.text
+_wwins:
+~~wwins:
+link R14,#0
+movem.l R6-R7,-(sp)
+~i=R7
+*line 371
+clr R7
+bra L52
+L53:
+*line 372
+move R7,(sp)
+jsr _wdswin
+L51:
+*line 371
+add #1,R7
+L52:
+*line 371
+cmp #6,R7
+blt L53
+L50:L49:tst.l (sp)+
+movem.l (sp)+,R7-R7
+unlk R14
+rts
+.globl _wdpoint
+.text
+_wdpoint:
+~~wdpoint:
+~x=8
+~y=10
+~pen=12
+link R14,#-4
+*line 384
+*line 385
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L55
+*line 385
+clr (sp)
+jsr _vbank
+*line 386
+L55:
+*line 387
+move 12(R14),(sp)
+move 10(R14),-(sp)
+move 8(R14),-(sp)
+move.l _wdoct,-(sp)
+jsr _vputp
+addq.l #8,sp
+L54:unlk R14
+rts
+.globl _wdbord
+.text
+_wdbord:
+~~wdbord:
+link R14,#-4
+*line 401
+move.l #_wdpoint,_point
+*line 403
+move #2,(sp)
+clr -(sp)
+move #511,-(sp)
+clr -(sp)
+clr -(sp)
+jsr _lseg
+addq.l #8,sp
+*line 404
+move #2,(sp)
+move #349,-(sp)
+move #511,-(sp)
+clr -(sp)
+move #511,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 405
+move #2,(sp)
+move #349,-(sp)
+clr -(sp)
+move #349,-(sp)
+move #511,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 406
+move #2,(sp)
+clr -(sp)
+clr -(sp)
+move #349,-(sp)
+clr -(sp)
+jsr _lseg
+addq.l #8,sp
+*line 408
+move #2,(sp)
+move #308,-(sp)
+move #511,-(sp)
+move #308,-(sp)
+clr -(sp)
+jsr _lseg
+addq.l #8,sp
+*line 409
+move #2,(sp)
+move #321,-(sp)
+clr -(sp)
+move #321,-(sp)
+move #511,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 411
+move #2,(sp)
+move #349,-(sp)
+move #175,-(sp)
+move #322,-(sp)
+move #175,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 412
+move #2,(sp)
+move #349,-(sp)
+move #231,-(sp)
+move #322,-(sp)
+move #231,-(sp)
+jsr _lseg
+addq.l #8,sp
+*line 413
+move #2,(sp)
+move #349,-(sp)
+move #399,-(sp)
+move #322,-(sp)
+move #399,-(sp)
+jsr _lseg
+addq.l #8,sp
+L56:unlk R14
+rts
+.globl _clrws
+.text
+_clrws:
+~~clrws:
+link R14,#0
+movem.l R7-R7/R13-R13,-(sp)
+~ip=R13
+*line 429
+move _curvce,R0
+muls #3938,R0
+move.l R0,R13
+add.l #_vbufs,R13
+*line 431
+*line 431
+tst _curwslt
+beq L58
+*line 432
+*line 433
+move #32,(sp)
+clr -(sp)
+move.l R13,-(sp)
+add.l #3874,(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 434
+move #254,(sp)
+clr -(sp)
+move.l R13,-(sp)
+add.l #3366,(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 435
+move #254,(sp)
+clr -(sp)
+move.l R13,-(sp)
+add.l #2858,(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 436
+bra L59
+L58:
+*line 437
+*line 438
+*line 439
+move #32,(sp)
+clr -(sp)
+move.l R13,-(sp)
+add.l #2794,(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 440
+move #254,(sp)
+clr -(sp)
+move.l R13,-(sp)
+add.l #2286,(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 441
+move #254,(sp)
+clr -(sp)
+move.l R13,-(sp)
+add.l #1778,(sp)
+jsr _memsetw
+addq.l #6,sp
+L59:
+*line 444
+jsr _clrwsa
+*line 446
+move _curwpnt,R0
+move R0,_wplast
+move R0,_lstwpnt
+*line 448
+clr R0
+move R0,_curwoff
+move R0,_curwfnl
+move R0,_wvlast
+move R0,_lstwoff
+*line 450
+clr _curwhrv
+*line 452
+jsr _updfpu
+*line 453
+move _curvce,R8
+add.l R8,R8
+add.l R8,R8
+move _curwslt,R9
+add.l R9,R9
+add.l R9,R8
+add.l #_wsnmod,R8
+move #1,(R8)
+L57:tst.l (sp)+
+movem.l (sp)+,R13-R13
+unlk R14
+rts
+.globl _iniwslb
+.text
+_iniwslb:
+~~iniwslb:
+link R14,#0
+movem.l R5-R7,-(sp)
+~i=R7
+~j=R6
+*line 469
+move #24,(sp)
+clr -(sp)
+move.l #_wsnmod,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 471
+clr R7
+bra L63
+L64:
+*line 472
+*line 473
+clr R6
+bra L67
+L68:
+*line 474
+*line 475
+move R6,R0
+add #1,R0
+asl #8,R0
+move #-32768,R1
+eor R1,R0
+move R7,R1
+muls #1080,R1
+move R6,R2
+asl #1,R2
+ext.l R2
+add.l R2,R1
+add.l #_wslib,R1
+move.l R1,R9
+move R0,(R9)
+*line 476
+move R6,R0
+add #1,R0
+asl #8,R0
+move #-32768,R1
+eor R1,R0
+move R7,R1
+muls #1080,R1
+move R6,R2
+asl #1,R2
+ext.l R2
+add.l R2,R1
+add.l #_wslib,R1
+move.l R1,R9
+move R0,508(R9)
+L66:
+*line 473
+add #1,R6
+L67:
+*line 473
+cmp #254,R6
+blt L68
+L65:
+*line 477
+*line 478
+*line 479
+move #32,(sp)
+clr -(sp)
+move R7,R0
+muls #1080,R0
+add.l #_wslib,R0
+move.l R0,-(sp)
+add.l #1016,(sp)
+jsr _memsetw
+addq.l #6,sp
+L62:
+*line 471
+add #1,R7
+L63:
+*line 471
+cmp #20,R7
+blt L64
+L61:L60:tst.l (sp)+
+movem.l (sp)+,R6-R7
+unlk R14
+rts
+.globl _wsdsp
+.text
+_wsdsp:
+~~wsdsp:
+link R14,#-4
+*line 494
+move.l #_v_score,_waveob
+*line 495
+move.l #_v_curs0,_obj0
+*line 496
+move.l #144+_v_obtab,_wdoct
+*line 498
+clr _wpntsv
+*line 499
+jsr _newws
+*line 501
+jsr _dswap
+*line 503
+*line 504
+clr R0
+move 10+_v_regs,R0
+and #384,R0
+beq L70
+*line 504
+clr (sp)
+jsr _vbank
+*line 505
+L70:
+*line 506
+move #32767,(sp)
+clr -(sp)
+move.l _waveob,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 507
+move #12033,(sp)
+clr -(sp)
+move.l _waveob,R0
+add.l #$fffe,R0
+move.l R0,-(sp)
+jsr _memsetw
+addq.l #6,sp
+*line 509
+move #-1,(sp)
+move #1536,-(sp)
+clr -(sp)
+clr -(sp)
+move #350,-(sp)
+move #512,-(sp)
+move.l _waveob,-(sp)
+clr -(sp)
+clr -(sp)
+move #8,-(sp)
+jsr _SetObj
+adda.l #20,sp
+*line 510
+move #-1,(sp)
+move #1540,-(sp)
+move #128,-(sp)
+move #256,-(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 512
+move #1,(sp)
+jsr _arcurs
+*line 513
+move #1,(sp)
+jsr _itcini
+*line 515
+jsr _wdbord
+*line 516
+jsr _wwins
+*line 518
+move #8,(sp)
+move #8,-(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 519
+move #15,(sp)
+clr -(sp)
+jsr _SetPri
+addq.l #2,sp
+*line 520
+move #128,(sp)
+move #256,-(sp)
+jsr _setgc
+addq.l #2,sp
+*line 522
+move.l #_wavpal,(sp)
+jsr _vsndpal
+L69:unlk R14
+rts
+.data
+L27:.dc.b $25,$30,$32,$64,$0
+L28:.dc.b $25,$30,$32,$64,$0
+L29:.dc.b $25,$30,$32,$64,$0
+L30:.dc.b $25,$63,$0
+L32:.dc.b $25,$30,$33,$64,$0
+L35:.dc.b $25,$63,$25,$30,$34,$64,$0
+L37:.dc.b $49,$6E,$74,$65,$72,$70,$0
+L39:.dc.b $57,$69,$64,$74,$68,$0
+L40:.dc.b $25,$30,$31,$64,$0
+L43:.dc.b $25,$63,$25,$30,$34,$64,$0
+L45:.dc.b $25,$30,$32,$64,$0
+L48:.dc.b $25,$63,$25,$30,$33,$64,$0
