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
