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
