.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