2851 lines
114 KiB
Plaintext
2851 lines
114 KiB
Plaintext
0000 029f 0012 jmp 0x0012
|
|
0002 0000 nop
|
|
0003 0000 nop
|
|
0004 02ff rti
|
|
0005 0000 nop
|
|
0006 02ff rti
|
|
0007 0000 nop
|
|
0008 02ff rti
|
|
0009 0000 nop
|
|
000a 02ff rti
|
|
000b 0000 nop
|
|
000c 02ff rti
|
|
000d 0000 nop
|
|
000e 029f 0725 jmp 0x0725
|
|
0010 029f 0059 jmp 0x0059
|
|
0012 1205 sbclr #0x05
|
|
0013 02bf 0062 call 0x0062
|
|
0015 8100 clr $ACC0
|
|
0016 009f 1000 lri $AC1.M, #0x1000
|
|
0018 0080 0000 lri $AR0, #0x0000
|
|
001a 005f loop $AC1.M
|
|
001b 1b1e srri @$AR0, $AC0.M
|
|
001c 02bf 07f5 call 0x07f5
|
|
001e 02bf 0f44 call 0x0f44
|
|
0020 0e00 lris $AC0.M, #0x00
|
|
0021 02bf 07d7 call 0x07d7
|
|
0023 009e 1111 lri $AC0.M, #0x1111
|
|
// SEND_f355(0x1111)
|
|
0025 02bf 07e1 call 0x07e1
|
|
0027 0e00 lris $AC0.M, #0x00
|
|
0028 00fe 034e sr @0x034e, $AC0.M
|
|
002a 1305 sbset #0x05
|
|
002b 3a00 orr $AC0.M, $AX1.H
|
|
002c 7400 incm $AC0.M
|
|
002d 1f7e mrr $AX1.H, $AC0.M
|
|
002e 0240 00ff andi $AC0.M, #0x00ff
|
|
0030 0200 5500 addi $AC0.M, #0x5500
|
|
0032 02bf 00a0 call 0x00a0
|
|
0034 029f 0832 jmp 0x0832
|
|
0036 00df 0357 lr $AC1.M, @0x0357
|
|
0038 00ff 0345 sr @0x0345, $AC1.M
|
|
003a 00de 0356 lr $AC0.M, @0x0356
|
|
003c 1ffe mrr $AC1.M, $AC0.M
|
|
003d 0340 00ff andi $AC1.M, #0x00ff
|
|
003f 00ff 0344 sr @0x0344, $AC1.M
|
|
0041 1479 lsr $ACC0, #-7
|
|
0042 0240 007e andi $AC0.M, #0x007e
|
|
0044 00fe 0343 sr @0x0343, $AC0.M
|
|
0046 0200 0080 addi $AC0.M, #0x0080
|
|
0048 1c1e mrr $AR0, $AC0.M
|
|
0049 170f jmpr $AR0
|
|
004a 0092 00ff lri $CR, #0x00ff
|
|
004c 009e cafe lri $AC0.M, #0xcafe
|
|
004e 02bf 00a0 call 0x00a0
|
|
0050 0e04 lris $AC0.M, #0x04
|
|
0051 02bf 07d7 call 0x07d7
|
|
0053 00de 0356 lr $AC0.M, @0x0356
|
|
0055 02bf 07e1 call 0x07e1
|
|
0057 029f 002b jmp 0x002b
|
|
0059 1205 sbclr #0x05
|
|
005a 02bf 0062 call 0x0062
|
|
005c 0e01 lris $AC0.M, #0x01
|
|
005d 02bf 07d7 call 0x07d7
|
|
005f 1305 sbset #0x05
|
|
0060 029f 002b jmp 0x002b
|
|
0062 1202 sbclr #0x02
|
|
0063 1203 sbclr #0x03
|
|
0064 1204 sbclr #0x04
|
|
0065 1306 sbset #0x06
|
|
0066 8e00 set16
|
|
0067 8c00 clr15
|
|
0068 8b00 m0
|
|
0069 009e ffff lri $AC0.M, #0xffff
|
|
006b 1d1e mrr $WR0, $AC0.M
|
|
006c 1d3e mrr $WR1, $AC0.M
|
|
006d 1d5e mrr $WR2, $AC0.M
|
|
006e 1d7e mrr $WR3, $AC0.M
|
|
006f 0092 00ff lri $CR, #0x00ff
|
|
0071 02df ret
|
|
0072 0081 0358 lri $AR1, #0x0358
|
|
0074 0090 0000 lri $AC0.H, #0x0000
|
|
0076 0c00 lris $AC0.L, #0x00
|
|
0077 007e 007c bloop $AC0.M, 0x007c
|
|
0079 193e lrri $AC0.M, @$AR1
|
|
007a 1b1e srri @$AR0, $AC0.M
|
|
007b 193e lrri $AC0.M, @$AR1
|
|
007c 1b1e srri @$AR0, $AC0.M
|
|
007d 02df ret
|
|
007e 029f 004a jmp 0x004a
|
|
0080 029f 004a jmp 0x004a
|
|
0082 029f 00d9 jmp 0x00d9
|
|
0084 029f 02e3 jmp 0x02e3
|
|
0086 029f 007e jmp 0x007e
|
|
0088 029f 066e jmp 0x066e
|
|
008a 029f 0680 jmp 0x0680
|
|
008c 029f 004a jmp 0x004a
|
|
008e 029f 05b7 jmp 0x05b7
|
|
0090 029f 0603 jmp 0x0603
|
|
0092 029f 05e7 jmp 0x05e7
|
|
0094 029f 004a jmp 0x004a
|
|
0096 029f 004a jmp 0x004a
|
|
0098 029f 004a jmp 0x004a
|
|
009a 029f 0103 jmp 0x0103
|
|
009c 029f 00f6 jmp 0x00f6
|
|
009e 029f 004a jmp 0x004a
|
|
00a0 00fe 0b00 sr @0x0b00, $AC0.M
|
|
00a2 8100 clr $ACC0
|
|
00a3 00de 0354 lr $AC0.M, @0x0354
|
|
00a5 1408 lsl $ACC0, #8
|
|
00a6 00df 0341 lr $AC1.M, @0x0341
|
|
00a8 3e00 cw 0x3e00 ; *** UNKNOWN OPCODE ***
|
|
00a9 00fe 0b01 sr @0x0b01, $AC0.M
|
|
00ab 00de 0350 lr $AC0.M, @0x0350
|
|
00ad 00fe 0b02 sr @0x0b02, $AC0.M
|
|
00af 00de 0351 lr $AC0.M, @0x0351
|
|
00b1 00fe 0b03 sr @0x0b03, $AC0.M
|
|
00b3 00de 0352 lr $AC0.M, @0x0352
|
|
00b5 00fe 0b04 sr @0x0b04, $AC0.M
|
|
00b7 00de 037d lr $AC0.M, @0x037d
|
|
00b9 00dc 037e lr $AC0.L, @0x037e
|
|
00bb 009f 0b00 lri $AC1.M, #0x0b00
|
|
00bd 0080 0010 lri $AR0, #0x0010
|
|
00bf 0090 0001 lri $AC0.H, #0x0001
|
|
00c1 1c3f mrr $AR1, $AC1.M
|
|
00c2 0f0a lris $AC1.M, #0x0a
|
|
00c3 2fd1 srs @SampleFormat, $AC1.M
|
|
00c4 1f5e mrr $AX0.H, $AC0.M
|
|
00c5 1f1c mrr $AX0.L, $AC0.L
|
|
00c6 009e ffff lri $AC0.M, #0xffff
|
|
00c8 2ed6 srs @ACEAH, $AC0.M
|
|
00c9 2ed7 srs @ACEAL, $AC0.M
|
|
00ca 1fda mrr $AC0.M, $AX0.H
|
|
00cb 1f98 mrr $AC0.L, $AX0.L
|
|
00cc 147f lsr $ACC0, #-1
|
|
00cd 2ed8 srs @ACCAH, $AC0.M
|
|
00ce 2cd9 srs @ACCAL, $AC0.L
|
|
00cf 1f40 mrr $AX0.H, $AR0
|
|
00d0 007a 00d7 bloop $AX0.H, 0x00d7
|
|
00d2 193e lrri $AC0.M, @$AR1
|
|
00d3 2ed3 srs @UnkZelda, $AC0.M
|
|
00d4 0000 nop
|
|
00d5 0000 nop
|
|
00d6 0000 nop
|
|
00d7 0000 nop
|
|
00d8 02df ret
|
|
00d9 0080 0380 lri $AR0, #0x0380
|
|
00db 0e04 lris $AC0.M, #0x04
|
|
00dc 02bf 0072 call 0x0072
|
|
00de 0081 0382 lri $AR1, #0x0382
|
|
00e0 009f 0000 lri $AC1.M, #0x0000
|
|
00e2 0080 0280 lri $AR0, #0x0280
|
|
00e4 02bf 063e call 0x063e
|
|
00e6 0081 0384 lri $AR1, #0x0384
|
|
00e8 009f 0300 lri $AC1.M, #0x0300
|
|
00ea 0080 0020 lri $AR0, #0x0020
|
|
00ec 02bf 063e call 0x063e
|
|
00ee 00de 0345 lr $AC0.M, @0x0345
|
|
00f0 00fe 0342 sr @0x0342, $AC0.M
|
|
00f2 02bf 0d3b call 0x0d3b
|
|
00f4 029f 004a jmp 0x004a
|
|
00f6 0080 037d lri $AR0, #0x037d
|
|
00f8 0e01 lris $AC0.M, #0x01
|
|
00f9 02bf 0072 call 0x0072
|
|
00fb 00de 037d lr $AC0.M, @0x037d
|
|
00fd 0240 7fff andi $AC0.M, #0x7fff
|
|
00ff 00fe 037d sr @0x037d, $AC0.M
|
|
0101 029f 004a jmp 0x004a
|
|
0103 0080 0374 lri $AR0, #0x0374
|
|
0105 0e01 lris $AC0.M, #0x01
|
|
0106 00fe 0377 sr @0x0377, $AC0.M
|
|
0108 00fe 037c sr @0x037c, $AC0.M
|
|
010a 02bf 0072 call 0x0072
|
|
010c 00de 0345 lr $AC0.M, @0x0345
|
|
010e 00fe 0376 sr @0x0376, $AC0.M
|
|
0110 029f 004a jmp 0x004a
|
|
0112 0081 034c lri $AR1, #0x034c
|
|
0114 009f 0400 lri $AC1.M, #0x0400
|
|
0116 0080 00c0 lri $AR0, #0x00c0
|
|
0118 02bf 063e call 0x063e
|
|
011a 02df ret
|
|
011b 0081 034c lri $AR1, #0x034c
|
|
011d 009f 0400 lri $AC1.M, #0x0400
|
|
011f 0080 0080 lri $AR0, #0x0080
|
|
0121 0081 034c lri $AR1, #0x034c
|
|
0123 193e lrri $AC0.M, @$AR1
|
|
0124 193c lrri $AC0.L, @$AR1
|
|
0125 0098 0000 lri $AX0.L, #0x0000
|
|
0127 7000 addaxl $ACC0, $AX0.L
|
|
0128 02bf 064d call 0x064d
|
|
012a 02df ret
|
|
012b 191e lrri $AC0.M, @$AR0
|
|
012c 191a lrri $AX0.H, @$AR0
|
|
012d 005f loop $AC1.M
|
|
012e 64a0 movr'ls $ACC0, $AX0.H : $AX0.H, $AC0.M
|
|
012f 1b7e srri @$AR3, $AC0.M
|
|
0130 1b7a srri @$AR3, $AX0.H
|
|
0131 02df ret
|
|
0132 0000 nop
|
|
0133 007f 0138 bloop $AC1.M, 0x0138
|
|
0135 191e lrri $AC0.M, @$AR0
|
|
0136 1b7e srri @$AR3, $AC0.M
|
|
0137 191e lrri $AC0.M, @$AR0
|
|
0138 1b7e srri @$AR3, $AC0.M
|
|
0139 0000 nop
|
|
013a 02df ret
|
|
013b 191e lrri $AC0.M, @$AR0
|
|
013c 191a lrri $AX0.H, @$AR0
|
|
013d 007f 0142 bloop $AC1.M, 0x0142
|
|
013f 32b2 xorr'sl $AC0.M, $AX1.H : $AC0.M, $AX1.H
|
|
0140 65a0 movr'ls $ACC1, $AX0.H : $AX0.H, $AC0.M
|
|
0141 33ba xorr'slm $AC1.M, $AX1.H : $AC0.M, $AX1.H
|
|
0142 64a1 movr'ls $ACC0, $AX0.H : $AX0.H, $AC1.M
|
|
0143 0000 nop
|
|
0144 02df ret
|
|
0145 8a00 m2
|
|
0146 157f lsr $ACC1, #-1
|
|
0147 1c20 mrr $AR1, $AR0
|
|
0148 1c03 mrr $AR0, $AR3
|
|
0149 193a lrri $AX0.H, @$AR1
|
|
014a 9051 mul'l $AX0.L, $AX0.H : $AX0.H, @$AR1
|
|
014b 925b mulmvz'l $AX0.L, $AX0.H, $ACC0 : $AX1.H, @$AR3
|
|
014c 007f 0151 bloop $AC1.M, 0x0151
|
|
014e 4651 addr'l $ACC0, $AX1.H : $AX0.H, @$AR1
|
|
014f 92b2 mulmvz'sl $AX0.L, $AX0.H, $ACC0 : $AC0.M, $AX1.H
|
|
0150 4651 addr'l $ACC0, $AX1.H : $AX0.H, @$AR1
|
|
0151 92b2 mulmvz'sl $AX0.L, $AX0.H, $ACC0 : $AC0.M, $AX1.H
|
|
0152 8b00 m0
|
|
0153 02df ret
|
|
0154 8a00 m2
|
|
0155 191a lrri $AX0.H, @$AR0
|
|
0156 9050 mul'l $AX0.L, $AX0.H : $AX0.H, @$AR0
|
|
0157 9250 mulmvz'l $AX0.L, $AX0.H, $ACC0 : $AX0.H, @$AR0
|
|
0158 005f loop $AC1.M
|
|
0159 92a0 mulmvz'ls $AX0.L, $AX0.H, $ACC0 : $AX0.H, $AC0.M
|
|
015a 8b00 m0
|
|
015b 02df ret
|
|
015c 8100 clr $ACC0
|
|
015d 8900 clr $ACC1
|
|
015e 0e50 lris $AC0.M, #0x50
|
|
015f 0080 0d00 lri $AR0, #0x0d00
|
|
0161 005e loop $AC0.M
|
|
0162 1b1f srri @$AR0, $AC1.M
|
|
0163 0080 0d60 lri $AR0, #0x0d60
|
|
0165 005e loop $AC0.M
|
|
0166 1b1f srri @$AR0, $AC1.M
|
|
0167 00da 0374 lr $AX0.H, @0x0374
|
|
0169 8600 tstaxh $AX0.H
|
|
016a 02b5 0f6f callz 0x0f6f
|
|
016c 8100 clr $ACC0
|
|
016d 8900 clr $ACC1
|
|
016e 0e50 lris $AC0.M, #0x50
|
|
016f 0080 0ca0 lri $AR0, #0x0ca0
|
|
0171 005e loop $AC0.M
|
|
0172 1b1f srri @$AR0, $AC1.M
|
|
0173 0080 0f40 lri $AR0, #0x0f40
|
|
0175 005e loop $AC0.M
|
|
0176 1b1f srri @$AR0, $AC1.M
|
|
0177 0080 0fa0 lri $AR0, #0x0fa0
|
|
0179 005e loop $AC0.M
|
|
017a 1b1f srri @$AR0, $AC1.M
|
|
017b 0080 0a00 lri $AR0, #0x0a00
|
|
017d 005e loop $AC0.M
|
|
017e 1b1f srri @$AR0, $AC1.M
|
|
017f 0080 09a0 lri $AR0, #0x09a0
|
|
0181 005e loop $AC0.M
|
|
0182 1b1f srri @$AR0, $AC1.M
|
|
0183 0f04 lris $AC1.M, #0x04
|
|
0184 0080 0e10 lri $AR0, #0x0e10
|
|
0186 0083 0dc0 lri $AR3, #0x0dc0
|
|
0188 02bf 0132 call 0x0132
|
|
018a 0080 0e70 lri $AR0, #0x0e70
|
|
018c 0083 0e20 lri $AR3, #0x0e20
|
|
018e 02bf 0132 call 0x0132
|
|
0190 0080 0ed0 lri $AR0, #0x0ed0
|
|
0192 0083 0e80 lri $AR3, #0x0e80
|
|
0194 02bf 0132 call 0x0132
|
|
0196 0080 0f30 lri $AR0, #0x0f30
|
|
0198 0083 0ee0 lri $AR3, #0x0ee0
|
|
019a 02bf 0132 call 0x0132
|
|
019c 8100 clr $ACC0
|
|
019d 0e50 lris $AC0.M, #0x50
|
|
019e 8900 clr $ACC1
|
|
019f 0080 0dc8 lri $AR0, #0x0dc8
|
|
01a1 005e loop $AC0.M
|
|
01a2 1b1f srri @$AR0, $AC1.M
|
|
01a3 0080 0e28 lri $AR0, #0x0e28
|
|
01a5 005e loop $AC0.M
|
|
01a6 1b1f srri @$AR0, $AC1.M
|
|
01a7 0080 0e88 lri $AR0, #0x0e88
|
|
01a9 005e loop $AC0.M
|
|
01aa 1b1f srri @$AR0, $AC1.M
|
|
01ab 0080 0ee8 lri $AR0, #0x0ee8
|
|
01ad 005e loop $AC0.M
|
|
01ae 1b1f srri @$AR0, $AC1.M
|
|
01af 02df ret
|
|
01b0 009f 0580 lri $AC1.M, #0x0580
|
|
01b2 009b 00a0 lri $AX1.H, #0x00a0
|
|
01b4 0081 0393 lri $AR1, #0x0393
|
|
01b6 18bc lrrd $AC0.L, @$AR1
|
|
01b7 b871 mulx'l $AX0.H, $AX1.H : $AC0.M, @$AR1
|
|
01b8 bc00 mulxac $AX0.H, $AX1.H, $ACC0
|
|
01b9 0080 0050 lri $AR0, #0x0050
|
|
01bb 02bf 0640 call 0x0640
|
|
01bd 02df ret
|
|
01be 00df 03a1 lr $AC1.M, @0x03a1
|
|
01c0 0508 addis $ACC1, #0x08
|
|
01c1 0080 0580 lri $AR0, #0x0580
|
|
01c3 1c7f mrr $AR3, $AC1.M
|
|
01c4 0098 7fff lri $AX0.L, #0x7fff
|
|
01c6 8900 clr $ACC1
|
|
01c7 0f50 lris $AC1.M, #0x50
|
|
01c8 02bf 0145 call 0x0145
|
|
01ca 02df ret
|
|
01cb 00c0 03a0 lr $AR0, @0x03a0
|
|
01cd 191a lrri $AX0.H, @$AR0
|
|
01ce 02bf 01b0 call 0x01b0
|
|
01d0 02bf 01be call 0x01be
|
|
01d2 8100 clr $ACC0
|
|
01d3 8900 clr $ACC1
|
|
01d4 00de 0390 lr $AC0.M, @0x0390
|
|
01d6 02a0 0001 andf $AC0.M, #0x0001
|
|
01d8 029d 01e1 jlz 0x01e1
|
|
01da 0080 0398 lri $AR0, #0x0398
|
|
01dc 0e08 lris $AC0.M, #0x08
|
|
01dd 00c1 03a1 lr $AR1, @0x03a1
|
|
01df 02bf 0c7d call 0x0c7d
|
|
01e1 0f50 lris $AC1.M, #0x50
|
|
01e2 00c0 03a1 lr $AR0, @0x03a1
|
|
01e4 00da 0394 lr $AX0.H, @0x0394
|
|
01e6 8600 tstaxh $AX0.H
|
|
01e7 0295 01ee jz 0x01ee
|
|
01e9 1c7a mrr $AR3, $AX0.H
|
|
01ea 00d8 0395 lr $AX0.L, @0x0395
|
|
01ec 02bf 0145 call 0x0145
|
|
01ee 0f50 lris $AC1.M, #0x50
|
|
01ef 00c0 03a1 lr $AR0, @0x03a1
|
|
01f1 00da 0396 lr $AX0.H, @0x0396
|
|
01f3 8600 tstaxh $AX0.H
|
|
01f4 0295 01fb jz 0x01fb
|
|
01f6 1c7a mrr $AR3, $AX0.H
|
|
01f7 00d8 0397 lr $AX0.L, @0x0397
|
|
01f9 02bf 0145 call 0x0145
|
|
01fb 00de 0390 lr $AC0.M, @0x0390
|
|
01fd 02a0 0002 andf $AC0.M, #0x0002
|
|
01ff 02dd retlz
|
|
0200 0080 0398 lri $AR0, #0x0398
|
|
0202 0e08 lris $AC0.M, #0x08
|
|
0203 00c1 03a1 lr $AR1, @0x03a1
|
|
0205 02bf 0c7d call 0x0c7d
|
|
0207 02df ret
|
|
0208 8900 clr $ACC1
|
|
0209 009f 0dc0 lri $AC1.M, #0x0dc0
|
|
020b 00ff 03a1 sr @0x03a1, $AC1.M
|
|
020d 009f 03a8 lri $AC1.M, #0x03a8
|
|
020f 00ff 03a2 sr @0x03a2, $AC1.M
|
|
0211 009f 03a4 lri $AC1.M, #0x03a4
|
|
0213 00ff 03a0 sr @0x03a0, $AC1.M
|
|
0215 1104 0235 bloopi #0x04, 0x0235
|
|
0217 00c0 03a2 lr $AR0, @0x03a2
|
|
0219 0083 0390 lri $AR3, #0x0390
|
|
021b 8900 clr $ACC1
|
|
021c 0f08 lris $AC1.M, #0x08
|
|
021d 02bf 0132 call 0x0132
|
|
021f 00da 0390 lr $AX0.H, @0x0390
|
|
0221 8600 tstaxh $AX0.H
|
|
0222 0295 0226 jz 0x0226
|
|
0224 02bf 01cb call 0x01cb
|
|
0226 8100 clr $ACC0
|
|
0227 00de 03a2 lr $AC0.M, @0x03a2
|
|
0229 0410 addis $ACC0, #0x10
|
|
022a 00fe 03a2 sr @0x03a2, $AC0.M
|
|
022c 00de 03a1 lr $AC0.M, @0x03a1
|
|
022e 0460 addis $ACC0, #0x60
|
|
022f 00fe 03a1 sr @0x03a1, $AC0.M
|
|
0231 00de 03a0 lr $AC0.M, @0x03a0
|
|
0233 7400 incm $AC0.M
|
|
0234 00fe 03a0 sr @0x03a0, $AC0.M
|
|
0236 00da 0374 lr $AX0.H, @0x0374
|
|
0238 8600 tstaxh $AX0.H
|
|
0239 0294 025f jnz 0x025f
|
|
023b 0f50 lris $AC1.M, #0x50
|
|
023c 0080 0be0 lri $AR0, #0x0be0
|
|
023e 0083 0e80 lri $AR3, #0x0e80
|
|
0240 0098 7fff lri $AX0.L, #0x7fff
|
|
0242 02bf 0145 call 0x0145
|
|
0244 0f50 lris $AC1.M, #0x50
|
|
0245 0080 0be0 lri $AR0, #0x0be0
|
|
0247 0083 0ee0 lri $AR3, #0x0ee0
|
|
0249 0098 b820 lri $AX0.L, #0xb820
|
|
024b 02bf 0145 call 0x0145
|
|
024d 0f28 lris $AC1.M, #0x28
|
|
024e 0080 0c68 lri $AR0, #0x0c68
|
|
0250 0083 0e80 lri $AR3, #0x0e80
|
|
0252 0098 b820 lri $AX0.L, #0xb820
|
|
0254 02bf 0145 call 0x0145
|
|
0256 0f28 lris $AC1.M, #0x28
|
|
0257 0080 0c68 lri $AR0, #0x0c68
|
|
0259 0083 0ee0 lri $AR3, #0x0ee0
|
|
025b 0098 7fff lri $AX0.L, #0x7fff
|
|
025d 02bf 0145 call 0x0145
|
|
025f 8100 clr $ACC0
|
|
0260 8900 clr $ACC1
|
|
0261 0e50 lris $AC0.M, #0x50
|
|
0262 0080 0be0 lri $AR0, #0x0be0
|
|
0264 005e loop $AC0.M
|
|
0265 1b1f srri @$AR0, $AC1.M
|
|
0266 0080 0c40 lri $AR0, #0x0c40
|
|
0268 005e loop $AC0.M
|
|
0269 1b1f srri @$AR0, $AC1.M
|
|
026a 02df ret
|
|
026b 00c0 03a0 lr $AR0, @0x03a0
|
|
026d 181a lrr $AX0.H, @$AR0
|
|
026e 8100 clr $ACC0
|
|
026f 181e lrr $AC0.M, @$AR0
|
|
0270 00db 0391 lr $AX1.H, @0x0391
|
|
0272 7400 incm $AC0.M
|
|
0273 d100 cmpar $ACC1, $AX0.H
|
|
0274 0270 ifge
|
|
0275 8100 clr $ACC0
|
|
0276 1b1e srri @$AR0, $AC0.M
|
|
0277 00df 03a1 lr $AC1.M, @0x03a1
|
|
0279 009b 00a0 lri $AX1.H, #0x00a0
|
|
027b 0081 0393 lri $AR1, #0x0393
|
|
027d 18bc lrrd $AC0.L, @$AR1
|
|
027e b871 mulx'l $AX0.H, $AX1.H : $AC0.M, @$AR1
|
|
027f bc00 mulxac $AX0.H, $AX1.H, $ACC0
|
|
0280 0080 0050 lri $AR0, #0x0050
|
|
0282 02bf 064d call 0x064d
|
|
0284 02df ret
|
|
0285 00da 0374 lr $AX0.H, @0x0374
|
|
0287 8600 tstaxh $AX0.H
|
|
0288 0294 029e jnz 0x029e
|
|
028a 8900 clr $ACC1
|
|
028b 0f28 lris $AC1.M, #0x28
|
|
028c 0080 0c40 lri $AR0, #0x0c40
|
|
028e 0083 0ea8 lri $AR3, #0x0ea8
|
|
0290 0098 b820 lri $AX0.L, #0xb820
|
|
0292 02bf 0145 call 0x0145
|
|
0294 8900 clr $ACC1
|
|
0295 0f28 lris $AC1.M, #0x28
|
|
0296 0080 0c40 lri $AR0, #0x0c40
|
|
0298 0083 0f08 lri $AR3, #0x0f08
|
|
029a 0098 7fff lri $AX0.L, #0x7fff
|
|
029c 02bf 0145 call 0x0145
|
|
029e 009f 0dc0 lri $AC1.M, #0x0dc0
|
|
02a0 00ff 03a1 sr @0x03a1, $AC1.M
|
|
02a2 009f 03a8 lri $AC1.M, #0x03a8
|
|
02a4 00ff 03a2 sr @0x03a2, $AC1.M
|
|
02a6 009f 03a4 lri $AC1.M, #0x03a4
|
|
02a8 00ff 03a0 sr @0x03a0, $AC1.M
|
|
02aa 1104 02c8 bloopi #0x04, 0x02c8
|
|
02ac 00c0 03a2 lr $AR0, @0x03a2
|
|
02ae 0083 0390 lri $AR3, #0x0390
|
|
02b0 0f08 lris $AC1.M, #0x08
|
|
02b1 02bf 0132 call 0x0132
|
|
02b3 00da 0390 lr $AX0.H, @0x0390
|
|
02b5 8600 tstaxh $AX0.H
|
|
02b6 0295 02ba jz 0x02ba
|
|
02b8 02bf 026b call 0x026b
|
|
02ba 00de 03a2 lr $AC0.M, @0x03a2
|
|
02bc 0410 addis $ACC0, #0x10
|
|
02bd 00fe 03a2 sr @0x03a2, $AC0.M
|
|
02bf 00de 03a1 lr $AC0.M, @0x03a1
|
|
02c1 0460 addis $ACC0, #0x60
|
|
02c2 00fe 03a1 sr @0x03a1, $AC0.M
|
|
02c4 00de 03a0 lr $AC0.M, @0x03a0
|
|
02c6 7400 incm $AC0.M
|
|
02c7 00fe 03a0 sr @0x03a0, $AC0.M
|
|
02c9 02df ret
|
|
02ca 0081 0386 lri $AR1, #0x0386
|
|
02cc 009f 03a8 lri $AC1.M, #0x03a8
|
|
02ce 0080 0040 lri $AR0, #0x0040
|
|
02d0 02bf 063e call 0x063e
|
|
02d2 02df ret
|
|
02d3 191e lrri $AC0.M, @$AR0
|
|
02d4 189c lrrd $AC0.L, @$AR0
|
|
02d5 4800 addax $ACC0, $AX0.L
|
|
02d6 1b1e srri @$AR0, $AC0.M
|
|
02d7 1b1c srri @$AR0, $AC0.L
|
|
02d8 02df ret
|
|
02d9 8100 clr $ACC0
|
|
02da 8900 clr $ACC1
|
|
02db 00df 0354 lr $AC1.M, @0x0354
|
|
02dd 00de 034e lr $AC0.M, @0x034e
|
|
02df 8200 cmp
|
|
02e0 0293 02d9 jle 0x02d9
|
|
02e2 02df ret
|
|
02e3 0080 0388 lri $AR0, #0x0388
|
|
02e5 0081 0072 lri $AR1, #0x0072
|
|
02e7 0e02 lris $AC0.M, #0x02
|
|
02e8 173f callr $AR1
|
|
02e9 02bf 04ce call 0x04ce
|
|
02eb 00de 0344 lr $AC0.M, @0x0344
|
|
02ed 00fe 0341 sr @0x0341, $AC0.M
|
|
02ef 00de 0345 lr $AC0.M, @0x0345
|
|
02f1 00fe 038e sr @0x038e, $AC0.M
|
|
02f3 8100 clr $ACC0
|
|
02f4 00fe 0355 sr @0x0355, $AC0.M
|
|
02f6 02bf 02ca call 0x02ca
|
|
02f8 02bf 0692 call 0x0692
|
|
02fa 0092 00ff lri $CR, #0x00ff
|
|
02fc 00de 0341 lr $AC0.M, @0x0341
|
|
02fe 007e 04c5 bloop $AC0.M, 0x04c5
|
|
0300 02bf 015c call 0x015c
|
|
0302 02bf 0208 call 0x0208
|
|
0304 02bf 053a call 0x053a
|
|
0306 02bf 0acb call 0x0acb
|
|
0308 00de 0355 lr $AC0.M, @0x0355
|
|
030a 7400 incm $AC0.M
|
|
030b 00fe 0355 sr @0x0355, $AC0.M
|
|
030d 8100 clr $ACC0
|
|
030e 00fe 0354 sr @0x0354, $AC0.M
|
|
0310 00de 0342 lr $AC0.M, @0x0342
|
|
0312 007e 0465 bloop $AC0.M, 0x0465
|
|
0314 009e fead lri $AC0.M, #0xfead
|
|
0316 02bf 00a0 call 0x00a0
|
|
0318 02bf 02d9 call 0x02d9
|
|
031a 009e d0d0 lri $AC0.M, #0xd0d0
|
|
031c 02bf 00a0 call 0x00a0
|
|
031e 8100 clr $ACC0
|
|
031f 8900 clr $ACC1
|
|
0320 00de 0354 lr $AC0.M, @0x0354
|
|
0322 147c lsr $ACC0, #-4
|
|
0323 0200 04fc addi $AC0.M, #0x04fc
|
|
0325 1c1e mrr $AR0, $AC0.M
|
|
0326 181f lrr $AC1.M, @$AR0
|
|
0327 00de 0354 lr $AC0.M, @0x0354
|
|
0329 0240 000f andi $AC0.M, #0x000f
|
|
032b 3d80 lsrnr $ACC1
|
|
032c 03c0 8000 andcf $AC1.M, #0x8000
|
|
032e 029c 0461 jlnz 0x0461
|
|
0330 00d8 0354 lr $AX0.L, @0x0354
|
|
0332 009a 0180 lri $AX0.H, #0x0180
|
|
0334 8100 clr $ACC0
|
|
0335 00de 0380 lr $AC0.M, @0x0380
|
|
0337 00dc 0381 lr $AC0.L, @0x0381
|
|
0339 9000 mul $AX0.L, $AX0.H
|
|
033a 9400 mulac $AX0.L, $AX0.H, $ACC0
|
|
033b 00fe 034c sr @0x034c, $AC0.M
|
|
033d 00fc 034d sr @0x034d, $AC0.L
|
|
033f 02bf 0112 call 0x0112
|
|
0341 00da 0400 lr $AX0.H, @0x0400
|
|
0343 8600 tstaxh $AX0.H
|
|
0344 0295 0461 jz 0x0461
|
|
0346 00da 0401 lr $AX0.H, @0x0401
|
|
0348 8600 tstaxh $AX0.H
|
|
0349 0294 0461 jnz 0x0461
|
|
034b 00da 0433 lr $AX0.H, @0x0433
|
|
034d 00fa 03f8 sr @0x03f8, $AX0.H
|
|
034f 00da 0406 lr $AX0.H, @0x0406
|
|
0351 8600 tstaxh $AX0.H
|
|
0352 0294 0f2f jnz 0x0f2f
|
|
0354 8100 clr $ACC0
|
|
0355 00de 0480 lr $AC0.M, @0x0480
|
|
0357 0609 cmpis $ACC0, #0x09
|
|
0358 0295 036b jz 0x036b
|
|
035a 0605 cmpis $ACC0, #0x05
|
|
035b 0295 036b jz 0x036b
|
|
035d 0608 cmpis $ACC0, #0x08
|
|
035e 0295 0afb jz 0x0afb
|
|
0360 0610 cmpis $ACC0, #0x10
|
|
0361 0295 0b78 jz 0x0b78
|
|
0363 0620 cmpis $ACC0, #0x20
|
|
0364 0295 0be9 jz 0x0be9
|
|
0366 0621 cmpis $ACC0, #0x21
|
|
0367 0295 0bf1 jz 0x0bf1
|
|
0369 029f 09e8 jmp 0x09e8
|
|
036b 00d8 0402 lr $AX0.L, @0x0402
|
|
036d 8100 clr $ACC0
|
|
036e 8900 clr $ACC1
|
|
036f 00dc 0430 lr $AC0.L, @0x0430
|
|
0371 8d00 set15
|
|
0372 0950 lris $AX1.L, #0x50
|
|
0373 a000 mulx $AX0.L, $AX1.L
|
|
0374 a400 mulxac $AX0.L, $AX1.L, $ACC0
|
|
0375 1404 lsl $ACC0, #4
|
|
0376 8c00 clr15
|
|
0377 1ffe mrr $AC1.M, $AC0.M
|
|
0378 0083 0580 lri $AR3, #0x0580
|
|
037a 02bf 08aa call 0x08aa
|
|
037c 029f 037e jmp 0x037e
|
|
037e 0080 0580 lri $AR0, #0x0580
|
|
0380 0081 0520 lri $AR1, #0x0520
|
|
0382 0099 0000 lri $AX1.L, #0x0000
|
|
0384 02bf 0eaf call 0x0eaf
|
|
0386 009e 0520 lri $AC0.M, #0x0520
|
|
0388 00fe 038f sr @0x038f, $AC0.M
|
|
038a 8900 clr $ACC1
|
|
038b 00df 0484 lr $AC1.M, @0x0484
|
|
038d 0340 001f andi $AC1.M, #0x001f
|
|
038f b900 tst $ACC1
|
|
0390 0295 03b6 jz 0x03b6
|
|
0392 00de 038f lr $AC0.M, @0x038f
|
|
0394 5c00 sub $ACC0, $ACC1
|
|
0395 00fe 038f sr @0x038f, $AC0.M
|
|
0397 1c7e mrr $AR3, $AC0.M
|
|
0398 0080 0440 lri $AR0, #0x0440
|
|
039a 05fe addis $ACC1, #0xfe
|
|
039b 02bf 012b call 0x012b
|
|
039d 0080 0490 lri $AR0, #0x0490
|
|
039f 00c1 038f lr $AR1, @0x038f
|
|
03a1 8900 clr $ACC1
|
|
03a2 00df 0484 lr $AC1.M, @0x0484
|
|
03a4 0340 001f andi $AC1.M, #0x001f
|
|
03a6 02bf 0c9c call 0x0c9c
|
|
03a8 00de 038f lr $AC0.M, @0x038f
|
|
03aa 0450 addis $ACC0, #0x50
|
|
03ab 1c1e mrr $AR0, $AC0.M
|
|
03ac 0083 0440 lri $AR3, #0x0440
|
|
03ae 8900 clr $ACC1
|
|
03af 00df 0484 lr $AC1.M, @0x0484
|
|
03b1 0340 001f andi $AC1.M, #0x001f
|
|
03b3 05fe addis $ACC1, #0xfe
|
|
03b4 02bf 012b call 0x012b
|
|
03b6 00de 0484 lr $AC0.M, @0x0484
|
|
03b8 0240 0020 andi $AC0.M, #0x0020
|
|
03ba 0295 03d8 jz 0x03d8
|
|
03bc 0080 04a4 lri $AR0, #0x04a4
|
|
03be 00c1 038f lr $AR1, @0x038f
|
|
03c0 0082 0454 lri $AR2, #0x0454
|
|
03c2 0083 04a7 lri $AR3, #0x04a7
|
|
03c4 18fa lrrd $AX0.H, @$AR3
|
|
03c5 8600 tstaxh $AX0.H
|
|
03c6 0294 03d6 jnz 0x03d6
|
|
03c8 18fa lrrd $AX0.H, @$AR3
|
|
03c9 8600 tstaxh $AX0.H
|
|
03ca 0294 03d6 jnz 0x03d6
|
|
03cc 18fa lrrd $AX0.H, @$AR3
|
|
03cd 8600 tstaxh $AX0.H
|
|
03ce 0294 03d6 jnz 0x03d6
|
|
03d0 8100 clr $ACC0
|
|
03d1 18fe lrrd $AC0.M, @$AR3
|
|
03d2 0280 7fff cmpi $AC0.M, #0x7fff
|
|
03d4 0295 03d8 jz 0x03d8
|
|
03d6 02bf 0cb7 call 0x0cb7
|
|
03d8 8100 clr $ACC0
|
|
03d9 00de 042c lr $AC0.M, @0x042c
|
|
03db b100 tst $ACC0
|
|
03dc 0295 03e2 jz 0x03e2
|
|
03de 02bf 0dfd call 0x0dfd
|
|
03e0 029f 0457 jmp 0x0457
|
|
03e2 8100 clr $ACC0
|
|
03e3 1c9e mrr $IX0, $AC0.M
|
|
03e4 1cde mrr $IX2, $AC0.M
|
|
03e5 7400 incm $AC0.M
|
|
03e6 1cfe mrr $IX3, $AC0.M
|
|
03e7 8100 clr $ACC0
|
|
03e8 00de 0407 lr $AC0.M, @0x0407
|
|
03ea b100 tst $ACC0
|
|
03eb 0295 03fa jz 0x03fa
|
|
03ed 00c3 038f lr $AR3, @0x038f
|
|
03ef 0007 dar $AR3
|
|
03f0 0080 0477 lri $AR0, #0x0477
|
|
03f2 0084 ffff lri $IX0, #0xffff
|
|
03f4 0087 ffff lri $IX3, #0xffff
|
|
03f6 199a lrrn $AX0.H, @$AR0
|
|
03f7 6554 movr'ln $ACC1, $AX0.H : $AX0.H, @$AR0
|
|
03f8 005e loop $AC0.M
|
|
03f9 65ad movr'lsnm $ACC1, $AX0.H : $AX0.H, $AC1.M
|
|
03fa 00da 0485 lr $AX0.H, @0x0485
|
|
03fc 8600 tstaxh $AX0.H
|
|
03fd 0295 0410 jz 0x0410
|
|
03ff 8900 clr $ACC1
|
|
0400 0086 0005 lri $IX2, #0x0005
|
|
0402 0082 040a lri $AR2, #0x040a
|
|
0404 1106 0408 bloopi #0x06, 0x0408
|
|
0406 18de lrrd $AC0.M, @$AR2
|
|
0407 147f lsr $ACC0, #-1
|
|
0408 4d36 add'sn $ACC1, $ACC0 : @$AR2, $AC0.M
|
|
0409 b900 tst $ACC1
|
|
040a 0294 0410 jnz 0x0410
|
|
040c 009a 0001 lri $AX0.H, #0x0001
|
|
040e 00fa 0401 sr @0x0401, $AX0.H
|
|
0410 8f00 set40
|
|
0411 0086 0002 lri $IX2, #0x0002
|
|
0413 0082 0408 lri $AR2, #0x0408
|
|
0415 1106 0440 bloopi #0x06, 0x0440
|
|
0417 8100 clr $ACC0
|
|
0418 195e lrri $AC0.M, @$AR2
|
|
0419 1200 sbclr #0x00
|
|
041a b100 tst $ACC0
|
|
041b 0275 ifz
|
|
041c 1300 sbset #0x00
|
|
041d 1c7e mrr $AR3, $AC0.M
|
|
041e 195e lrri $AC0.M, @$AR2
|
|
041f 195f lrri $AC1.M, @$AR2
|
|
0420 5c00 sub $ACC0, $ACC1
|
|
0421 14fb asr $ACC0, #-5
|
|
0422 1f5e mrr $AX0.H, $AC0.M
|
|
0423 1f1c mrr $AX0.L, $AC0.L
|
|
0424 185e lrr $AC0.M, @$AR2
|
|
0425 0240 00ff andi $AC0.M, #0x00ff
|
|
0427 1f7e mrr $AX1.H, $AC0.M
|
|
0428 185e lrr $AC0.M, @$AR2
|
|
0429 1478 lsr $ACC0, #-8
|
|
042a 009c 0000 lri $AC0.L, #0x0000
|
|
042c d100 cmpar $ACC1, $AX0.H
|
|
042d 0295 0435 jz 0x0435
|
|
042f 185e lrr $AC0.M, @$AR2
|
|
0430 0272 ifg
|
|
0431 7400 incm $AC0.M
|
|
0432 0271 ifl
|
|
0433 7800 decm $AC0.M
|
|
0434 1a5e srr @$AR2, $AC0.M
|
|
0435 0006 dar $AR2
|
|
0436 00de 038f lr $AC0.M, @0x038f
|
|
0438 5600 subr $ACC0, $AX1.H
|
|
0439 029d 043e jlz 0x043e
|
|
043b 1c1e mrr $AR0, $AC0.M
|
|
043c 02bf 0dd3 call 0x0dd3
|
|
043e 0000 nop
|
|
043f 1b5f srri @$AR2, $AC1.M
|
|
0440 000a iar $AR2
|
|
0441 8e00 set16
|
|
0442 8100 clr $ACC0
|
|
0443 00de 0407 lr $AC0.M, @0x0407
|
|
0445 b100 tst $ACC0
|
|
0446 0295 0457 jz 0x0457
|
|
0448 00c3 038f lr $AR3, @0x038f
|
|
044a 0087 004f lri $IX3, #0x004f
|
|
044c 001f addarn $AR3, $IX3
|
|
044d 0080 0477 lri $AR0, #0x0477
|
|
044f 0084 ffff lri $IX0, #0xffff
|
|
0451 0087 ffff lri $IX3, #0xffff
|
|
0453 19fa lrrn $AX0.H, @$AR3
|
|
0454 6557 movr'ln $ACC1, $AX0.H : $AX0.H, @$AR3
|
|
0455 005e loop $AC0.M
|
|
0456 65af movr'slnm $ACC1, $AX0.H : $AC1.M, $AX0.H
|
|
0457 00da 0406 lr $AX0.H, @0x0406
|
|
0459 8600 tstaxh $AX0.H
|
|
045a 0294 045f jnz 0x045f
|
|
045c 8100 clr $ACC0
|
|
045d 00fe 0404 sr @0x0404, $AC0.M
|
|
045f 02bf 011b call 0x011b
|
|
0461 00de 0354 lr $AC0.M, @0x0354
|
|
0463 7400 incm $AC0.M
|
|
0464 00fe 0354 sr @0x0354, $AC0.M
|
|
0466 009e b05e lri $AC0.M, #0xb05e
|
|
0468 02bf 00a0 call 0x00a0
|
|
046a 0e00 lris $AC0.M, #0x00
|
|
046b 00fe 034e sr @0x034e, $AC0.M
|
|
046d 0e04 lris $AC0.M, #0x04
|
|
046e 02bf 07d7 call 0x07d7
|
|
0470 00de 0355 lr $AC0.M, @0x0355
|
|
0472 0260 ff00 ori $AC0.M, #0xff00
|
|
0474 02bf 07e1 call 0x07e1
|
|
0476 02bf 0d59 call 0x0d59
|
|
0478 02bf 0d6b call 0x0d6b
|
|
047a 02bf 0dc0 call 0x0dc0
|
|
047c 00de 0341 lr $AC0.M, @0x0341
|
|
047e 7800 decm $AC0.M
|
|
047f 00fe 0341 sr @0x0341, $AC0.M
|
|
0481 0080 09a0 lri $AR0, #0x09a0
|
|
0483 0083 0d00 lri $AR3, #0x0d00
|
|
0485 0f50 lris $AC1.M, #0x50
|
|
0486 0098 5a82 lri $AX0.L, #0x5a82
|
|
0488 02bf 0145 call 0x0145
|
|
048a 0080 09a0 lri $AR0, #0x09a0
|
|
048c 0083 0d60 lri $AR3, #0x0d60
|
|
048e 0f50 lris $AC1.M, #0x50
|
|
048f 02bf 0145 call 0x0145
|
|
0491 0083 0d00 lri $AR3, #0x0d00
|
|
0493 02bf 0deb call 0x0deb
|
|
0495 0081 0388 lri $AR1, #0x0388
|
|
0497 009f 0d00 lri $AC1.M, #0x0d00
|
|
0499 0080 0050 lri $AR0, #0x0050
|
|
049b 02bf 064b call 0x064b
|
|
049d 0080 0fa0 lri $AR0, #0x0fa0
|
|
049f 0083 0d60 lri $AR3, #0x0d60
|
|
04a1 0f50 lris $AC1.M, #0x50
|
|
04a2 0098 8000 lri $AX0.L, #0x8000
|
|
04a4 02bf 0145 call 0x0145
|
|
04a6 0083 0d60 lri $AR3, #0x0d60
|
|
04a8 02bf 0deb call 0x0deb
|
|
04aa 0081 038a lri $AR1, #0x038a
|
|
04ac 009f 0d60 lri $AC1.M, #0x0d60
|
|
04ae 0080 0050 lri $AR0, #0x0050
|
|
04b0 02bf 064b call 0x064b
|
|
04b2 009a 0000 lri $AX0.H, #0x0000
|
|
04b4 0098 00a0 lri $AX0.L, #0x00a0
|
|
04b6 0080 0388 lri $AR0, #0x0388
|
|
04b8 02bf 02d3 call 0x02d3
|
|
04ba 0080 038a lri $AR0, #0x038a
|
|
04bc 02bf 02d3 call 0x02d3
|
|
04be 02bf 0285 call 0x0285
|
|
04c0 02bf 0509 call 0x0509
|
|
04c2 02bf 04e0 call 0x04e0
|
|
04c4 0000 nop
|
|
04c5 0000 nop
|
|
04c6 009e 0dac lri $AC0.M, #0x0dac
|
|
04c8 02bf 00a0 call 0x00a0
|
|
04ca 0080 002b lri $AR0, #0x002b
|
|
04cc 029f 0770 jmp 0x0770
|
|
04ce 0080 0374 lri $AR0, #0x0374
|
|
04d0 0e02 lris $AC0.M, #0x02
|
|
04d1 02bf 0074 call 0x0074
|
|
04d3 00de 0374 lr $AC0.M, @0x0374
|
|
04d5 0240 7fff andi $AC0.M, #0x7fff
|
|
04d7 00fe 0374 sr @0x0374, $AC0.M
|
|
04d9 00de 0376 lr $AC0.M, @0x0376
|
|
04db 0240 7fff andi $AC0.M, #0x7fff
|
|
04dd 00fe 0376 sr @0x0376, $AC0.M
|
|
04df 02df ret
|
|
04e0 00da 0374 lr $AX0.H, @0x0374
|
|
04e2 8600 tstaxh $AX0.H
|
|
04e3 02d5 retz
|
|
04e4 0083 0f40 lri $AR3, #0x0f40
|
|
04e6 02bf 0deb call 0x0deb
|
|
04e8 0083 0ca0 lri $AR3, #0x0ca0
|
|
04ea 02bf 0deb call 0x0deb
|
|
04ec 0081 0374 lri $AR1, #0x0374
|
|
04ee 009f 0f40 lri $AC1.M, #0x0f40
|
|
04f0 0080 0050 lri $AR0, #0x0050
|
|
04f2 02bf 064b call 0x064b
|
|
04f4 0081 0376 lri $AR1, #0x0376
|
|
04f6 009f 0ca0 lri $AC1.M, #0x0ca0
|
|
04f8 0080 0050 lri $AR0, #0x0050
|
|
04fa 02bf 064b call 0x064b
|
|
04fc 009a 0000 lri $AX0.H, #0x0000
|
|
04fe 0098 00a0 lri $AX0.L, #0x00a0
|
|
0500 0080 0374 lri $AR0, #0x0374
|
|
0502 02bf 02d3 call 0x02d3
|
|
0504 0080 0376 lri $AR0, #0x0376
|
|
0506 02bf 02d3 call 0x02d3
|
|
0508 02df ret
|
|
0509 00da 0374 lr $AX0.H, @0x0374
|
|
050b 8600 tstaxh $AX0.H
|
|
050c 02d5 retz
|
|
050d 009f 0be0 lri $AC1.M, #0x0be0
|
|
050f 00ff 03a1 sr @0x03a1, $AC1.M
|
|
0511 00df 03ca lr $AC1.M, @0x03ca
|
|
0513 00ff 0392 sr @0x0392, $AC1.M
|
|
0515 00df 03cb lr $AC1.M, @0x03cb
|
|
0517 00ff 0393 sr @0x0393, $AC1.M
|
|
0519 009f 03a6 lri $AC1.M, #0x03a6
|
|
051b 00ff 03a0 sr @0x03a0, $AC1.M
|
|
051d 00df 03c9 lr $AC1.M, @0x03c9
|
|
051f 00ff 0391 sr @0x0391, $AC1.M
|
|
0521 02bf 026b call 0x026b
|
|
0523 009f 0c40 lri $AC1.M, #0x0c40
|
|
0525 00ff 03a1 sr @0x03a1, $AC1.M
|
|
0527 00df 03da lr $AC1.M, @0x03da
|
|
0529 00ff 0392 sr @0x0392, $AC1.M
|
|
052b 00df 03db lr $AC1.M, @0x03db
|
|
052d 00ff 0393 sr @0x0393, $AC1.M
|
|
052f 009f 03a7 lri $AC1.M, #0x03a7
|
|
0531 00ff 03a0 sr @0x03a0, $AC1.M
|
|
0533 00df 03d9 lr $AC1.M, @0x03d9
|
|
0535 00ff 0391 sr @0x0391, $AC1.M
|
|
0537 02bf 026b call 0x026b
|
|
0539 02df ret
|
|
053a 00da 0374 lr $AX0.H, @0x0374
|
|
053c 8600 tstaxh $AX0.H
|
|
053d 02d5 retz
|
|
053e 00da 03d8 lr $AX0.H, @0x03d8
|
|
0540 8600 tstaxh $AX0.H
|
|
0541 02d5 retz
|
|
0542 0083 0be0 lri $AR3, #0x0be0
|
|
0544 0080 0c30 lri $AR0, #0x0c30
|
|
0546 0f04 lris $AC1.M, #0x04
|
|
0547 02bf 0132 call 0x0132
|
|
0549 0083 0c40 lri $AR3, #0x0c40
|
|
054b 0080 0c90 lri $AR0, #0x0c90
|
|
054d 0f04 lris $AC1.M, #0x04
|
|
054e 02bf 0132 call 0x0132
|
|
0550 00df 03ca lr $AC1.M, @0x03ca
|
|
0552 00ff 0392 sr @0x0392, $AC1.M
|
|
0554 00df 03cb lr $AC1.M, @0x03cb
|
|
0556 00ff 0393 sr @0x0393, $AC1.M
|
|
0558 00df 03a6 lr $AC1.M, @0x03a6
|
|
055a 7500 incm $AC1.M
|
|
055b 1f5f mrr $AX0.H, $AC1.M
|
|
055c 009f 0be8 lri $AC1.M, #0x0be8
|
|
055e 02bf 01b2 call 0x01b2
|
|
0560 00df 03da lr $AC1.M, @0x03da
|
|
0562 00ff 0392 sr @0x0392, $AC1.M
|
|
0564 00df 03db lr $AC1.M, @0x03db
|
|
0566 00ff 0393 sr @0x0393, $AC1.M
|
|
0568 00df 03a7 lr $AC1.M, @0x03a7
|
|
056a 7500 incm $AC1.M
|
|
056b 1f5f mrr $AX0.H, $AC1.M
|
|
056c 009f 0c48 lri $AC1.M, #0x0c48
|
|
056e 02bf 01b2 call 0x01b2
|
|
0570 00de 03c8 lr $AC0.M, @0x03c8
|
|
0572 02a0 0001 andf $AC0.M, #0x0001
|
|
0574 029d 057d jlz 0x057d
|
|
0576 0080 03d0 lri $AR0, #0x03d0
|
|
0578 0e08 lris $AC0.M, #0x08
|
|
0579 0081 0be0 lri $AR1, #0x0be0
|
|
057b 02bf 0c7d call 0x0c7d
|
|
057d 00de 03d8 lr $AC0.M, @0x03d8
|
|
057f 02a0 0001 andf $AC0.M, #0x0001
|
|
0581 029d 058a jlz 0x058a
|
|
0583 0080 03e0 lri $AR0, #0x03e0
|
|
0585 0e08 lris $AC0.M, #0x08
|
|
0586 0081 0c40 lri $AR1, #0x0c40
|
|
0588 02bf 0c7d call 0x0c7d
|
|
058a 0f50 lris $AC1.M, #0x50
|
|
058b 0080 0be0 lri $AR0, #0x0be0
|
|
058d 0083 0f40 lri $AR3, #0x0f40
|
|
058f 00d8 03cd lr $AX0.L, @0x03cd
|
|
0591 02bf 0145 call 0x0145
|
|
0593 0f50 lris $AC1.M, #0x50
|
|
0594 0080 0c40 lri $AR0, #0x0c40
|
|
0596 0083 0ca0 lri $AR3, #0x0ca0
|
|
0598 00d8 03df lr $AX0.L, @0x03df
|
|
059a 02bf 0145 call 0x0145
|
|
059c 00de 03c8 lr $AC0.M, @0x03c8
|
|
059e 02a0 0002 andf $AC0.M, #0x0002
|
|
05a0 029d 05a9 jlz 0x05a9
|
|
05a2 0080 03d0 lri $AR0, #0x03d0
|
|
05a4 0e08 lris $AC0.M, #0x08
|
|
05a5 0081 0be0 lri $AR1, #0x0be0
|
|
05a7 02bf 0c7d call 0x0c7d
|
|
05a9 00de 03d8 lr $AC0.M, @0x03d8
|
|
05ab 02a0 0002 andf $AC0.M, #0x0002
|
|
05ad 029d 05b6 jlz 0x05b6
|
|
05af 0080 03e0 lri $AR0, #0x03e0
|
|
05b1 0e08 lris $AC0.M, #0x08
|
|
05b2 0081 0c40 lri $AR1, #0x0c40
|
|
05b4 02bf 0c7d call 0x0c7d
|
|
05b6 02df ret
|
|
05b7 0080 0346 lri $AR0, #0x0346
|
|
05b9 02bf 0072 call 0x0072
|
|
05bb 02bf 0072 call 0x0072
|
|
05bd 0081 0346 lri $AR1, #0x0346
|
|
05bf 193e lrri $AC0.M, @$AR1
|
|
05c0 193c lrri $AC0.L, @$AR1
|
|
05c1 009f 0400 lri $AC1.M, #0x0400
|
|
05c3 00c0 0345 lr $AR0, @0x0345
|
|
05c5 02bf 0640 call 0x0640
|
|
05c7 0081 0348 lri $AR1, #0x0348
|
|
05c9 193e lrri $AC0.M, @$AR1
|
|
05ca 193c lrri $AC0.L, @$AR1
|
|
05cb 009f 0800 lri $AC1.M, #0x0800
|
|
05cd 00c0 0345 lr $AR0, @0x0345
|
|
05cf 02bf 0640 call 0x0640
|
|
05d1 0081 0346 lri $AR1, #0x0346
|
|
05d3 193e lrri $AC0.M, @$AR1
|
|
05d4 193c lrri $AC0.L, @$AR1
|
|
05d5 009f 0800 lri $AC1.M, #0x0800
|
|
05d7 00c0 0345 lr $AR0, @0x0345
|
|
05d9 02bf 064d call 0x064d
|
|
05db 0081 0348 lri $AR1, #0x0348
|
|
05dd 193e lrri $AC0.M, @$AR1
|
|
05de 193c lrri $AC0.L, @$AR1
|
|
05df 009f 0400 lri $AC1.M, #0x0400
|
|
05e1 00c0 0345 lr $AR0, @0x0345
|
|
05e3 02bf 064d call 0x064d
|
|
05e5 029f 004a jmp 0x004a
|
|
05e7 0080 0346 lri $AR0, #0x0346
|
|
05e9 02bf 0072 call 0x0072
|
|
05eb 02bf 0072 call 0x0072
|
|
05ed 0081 0346 lri $AR1, #0x0346
|
|
05ef 193e lrri $AC0.M, @$AR1
|
|
05f0 193c lrri $AC0.L, @$AR1
|
|
05f1 009f 0400 lri $AC1.M, #0x0400
|
|
05f3 00c0 0345 lr $AR0, @0x0345
|
|
05f5 02bf 0640 call 0x0640
|
|
05f7 0081 0348 lri $AR1, #0x0348
|
|
05f9 193e lrri $AC0.M, @$AR1
|
|
05fa 193c lrri $AC0.L, @$AR1
|
|
05fb 009f 0400 lri $AC1.M, #0x0400
|
|
05fd 00c0 0345 lr $AR0, @0x0345
|
|
05ff 02bf 064d call 0x064d
|
|
0601 029f 004a jmp 0x004a
|
|
0603 0080 0346 lri $AR0, #0x0346
|
|
0605 02bf 0072 call 0x0072
|
|
0607 02bf 0072 call 0x0072
|
|
0609 0081 0346 lri $AR1, #0x0346
|
|
060b 193e lrri $AC0.M, @$AR1
|
|
060c 193c lrri $AC0.L, @$AR1
|
|
060d 009f 0400 lri $AC1.M, #0x0400
|
|
060f 00c0 0344 lr $AR0, @0x0344
|
|
0611 02bf 0640 call 0x0640
|
|
0613 0081 0348 lri $AR1, #0x0348
|
|
0615 193e lrri $AC0.M, @$AR1
|
|
0616 193c lrri $AC0.L, @$AR1
|
|
0617 009f 0800 lri $AC1.M, #0x0800
|
|
0619 00c0 0344 lr $AR0, @0x0344
|
|
061b 02bf 0640 call 0x0640
|
|
061d 0080 0400 lri $AR0, #0x0400
|
|
061f 0083 0800 lri $AR3, #0x0800
|
|
0621 0084 0000 lri $IX0, #0x0000
|
|
0623 00da 0345 lr $AX0.H, @0x0345
|
|
0625 00df 0344 lr $AC1.M, @0x0344
|
|
0627 8f00 set40
|
|
0628 197b lrri $AX1.H, @$AR3
|
|
0629 b800 mulx $AX0.H, $AX1.H
|
|
062a 197b lrri $AX1.H, @$AR3
|
|
062b 007f 0630 bloop $AC1.M, 0x0630
|
|
062d 199e lrrn $AC0.M, @$AR0
|
|
062e bc00 mulxac $AX0.H, $AX1.H, $ACC0
|
|
062f 80b2 nx'sl : $AC0.M, $AX1.H
|
|
0630 0000 nop
|
|
0631 8e00 set16
|
|
0632 0081 0346 lri $AR1, #0x0346
|
|
0634 193e lrri $AC0.M, @$AR1
|
|
0635 193c lrri $AC0.L, @$AR1
|
|
0636 009f 0400 lri $AC1.M, #0x0400
|
|
0638 00c0 0344 lr $AR0, @0x0344
|
|
063a 02bf 064d call 0x064d
|
|
063c 029f 004a jmp 0x004a
|
|
063e 193e lrri $AC0.M, @$AR1
|
|
063f 193c lrri $AC0.L, @$AR1
|
|
0640 2fcd srs @DSPA, $AC1.M
|
|
0641 0f00 lris $AC1.M, #0x00
|
|
0642 2fc9 srs @DSCR, $AC1.M
|
|
0643 2ece srs @DSMAH, $AC0.M
|
|
0644 2ccf srs @DSMAL, $AC0.L
|
|
0645 1fe0 mrr $AC1.M, $AR0
|
|
0646 1501 lsl $ACC1, #1
|
|
0647 2fcb srs @DSBL, $AC1.M
|
|
0648 02bf 0651 call 0x0651
|
|
064a 02df ret
|
|
064b 193e lrri $AC0.M, @$AR1
|
|
064c 193c lrri $AC0.L, @$AR1
|
|
064d 2fcd srs @DSPA, $AC1.M
|
|
064e 0f01 lris $AC1.M, #0x01
|
|
064f 029f 0642 jmp 0x0642
|
|
0651 26c9 lrs $AC0.M, @DSCR
|
|
0652 02a0 0004 andf $AC0.M, #0x0004
|
|
0654 029c 0651 jlnz 0x0651
|
|
0656 02df ret
|
|
0657 193e lrri $AC0.M, @$AR1
|
|
0658 193c lrri $AC0.L, @$AR1
|
|
0659 00ff ffcd sr @DSPA, $AC1.M
|
|
065b 0f00 lris $AC1.M, #0x00
|
|
065c 00ff ffc9 sr @DSCR, $AC1.M
|
|
065e 00fe ffce sr @DSMAH, $AC0.M
|
|
0660 00fc ffcf sr @DSMAL, $AC0.L
|
|
0662 1fe0 mrr $AC1.M, $AR0
|
|
0663 1501 lsl $ACC1, #1
|
|
0664 00ff ffcb sr @DSBL, $AC1.M
|
|
0666 02df ret
|
|
0667 00de ffc9 lr $AC0.M, @DSCR
|
|
0669 02a0 0004 andf $AC0.M, #0x0004
|
|
066b 029c 0667 jlnz 0x0667
|
|
066d 02df ret
|
|
066e 0080 0346 lri $AR0, #0x0346
|
|
0670 02bf 0072 call 0x0072
|
|
0672 02bf 0072 call 0x0072
|
|
0674 0081 0346 lri $AR1, #0x0346
|
|
0676 00df 0349 lr $AC1.M, @0x0349
|
|
0678 0340 ffff andi $AC1.M, #0xffff
|
|
067a 00c0 0345 lr $AR0, @0x0345
|
|
067c 02bf 063e call 0x063e
|
|
067e 029f 004a jmp 0x004a
|
|
0680 0080 0346 lri $AR0, #0x0346
|
|
0682 02bf 0072 call 0x0072
|
|
0684 02bf 0072 call 0x0072
|
|
0686 0081 0346 lri $AR1, #0x0346
|
|
0688 00df 0349 lr $AC1.M, @0x0349
|
|
068a 0340 ffff andi $AC1.M, #0xffff
|
|
068c 00c0 0345 lr $AR0, @0x0345
|
|
068e 02bf 064b call 0x064b
|
|
0690 029f 004a jmp 0x004a
|
|
0692 0092 00ff lri $CR, #0x00ff
|
|
0694 009e ffff lri $AC0.M, #0xffff
|
|
0696 2ed4 srs @ACSAH, $AC0.M
|
|
0697 2ed5 srs @ACSAL, $AC0.M
|
|
0698 2ed6 srs @ACEAH, $AC0.M
|
|
0699 2ed7 srs @ACEAL, $AC0.M
|
|
069a 02df ret
|
|
069b 00ff ffd1 sr @SampleFormat, $AC1.M
|
|
069d 0340 0003 andi $AC1.M, #0x0003
|
|
069f 7900 decm $AC1.M
|
|
06a0 02ca lsrn
|
|
06a1 00df 037d lr $AC1.M, @0x037d
|
|
06a3 00dd 037e lr $AC1.L, @0x037e
|
|
06a5 4c00 add $ACC0, $ACC1
|
|
06a6 00fe ffd8 sr @ACCAH, $AC0.M
|
|
06a8 00fc ffd9 sr @ACCAL, $AC0.L
|
|
06aa 02df ret
|
|
06ab 1fc3 mrr $AC0.M, $AR3
|
|
06ac 043f addis $ACC0, #0x3f
|
|
06ad 0240 fff0 andi $AC0.M, #0xfff0
|
|
06af 00fe ffcd sr @DSPA, $AC0.M
|
|
06b1 1c1a mrr $AR0, $AX0.H
|
|
06b2 00da 037f lr $AX0.H, @0x037f
|
|
06b4 4400 addr $ACC0, $AX0.H
|
|
06b5 1f40 mrr $AX0.H, $AR0
|
|
06b6 1c1e mrr $AR0, $AC0.M
|
|
06b7 1fda mrr $AC0.M, $AX0.H
|
|
06b8 041f addis $ACC0, #0x1f
|
|
06b9 0240 fff0 andi $AC0.M, #0xfff0
|
|
06bb 1401 lsl $ACC0, #1
|
|
06bc 00fe ffcb sr @DSBL, $AC0.M
|
|
06be 00de ffc9 lr $AC0.M, @DSCR
|
|
06c0 02a0 0004 andf $AC0.M, #0x0004
|
|
06c2 029c 06be jlnz 0x06be
|
|
06c4 007a 06c7 bloop $AX0.H, 0x06c7
|
|
06c6 191e lrri $AC0.M, @$AR0
|
|
06c7 1b7e srri @$AR3, $AC0.M
|
|
06c8 02df ret
|
|
06c9 8900 clr $ACC1
|
|
06ca 1ffc mrr $AC1.M, $AC0.L
|
|
06cb 0340 001f andi $AC1.M, #0x001f
|
|
06cd 00ff 037f sr @0x037f, $AC1.M
|
|
06cf 1ffc mrr $AC1.M, $AC0.L
|
|
06d0 0340 ffe0 andi $AC1.M, #0xffe0
|
|
06d2 1f9f mrr $AC0.L, $AC1.M
|
|
06d3 00df 037d lr $AC1.M, @0x037d
|
|
06d5 00dd 037e lr $AC1.L, @0x037e
|
|
06d7 4c00 add $ACC0, $ACC1
|
|
06d8 00fe ffce sr @DSMAH, $AC0.M
|
|
06da 00fc ffcf sr @DSMAL, $AC0.L
|
|
06dc 0f00 lris $AC1.M, #0x00
|
|
06dd 00ff ffc9 sr @DSCR, $AC1.M
|
|
06df 02df ret
|
|
06e0 00df 037f lr $AC1.M, @0x037f
|
|
06e2 157f lsr $ACC1, #-1
|
|
06e3 00ff 037f sr @0x037f, $AC1.M
|
|
06e5 02df ret
|
|
06e6 8600 tstaxh $AX0.H
|
|
06e7 02d5 retz
|
|
06e8 1f1a mrr $AX0.L, $AX0.H
|
|
06e9 009e 0780 lri $AC0.M, #0x0780
|
|
06eb 00fe ffcd sr @DSPA, $AC0.M
|
|
06ed 1fda mrr $AC0.M, $AX0.H
|
|
06ee 043f addis $ACC0, #0x3f
|
|
06ef 0240 ffe0 andi $AC0.M, #0xffe0
|
|
06f1 00fe ffcb sr @DSBL, $AC0.M
|
|
06f3 00de ffc9 lr $AC0.M, @DSCR
|
|
06f5 02a0 0004 andf $AC0.M, #0x0004
|
|
06f7 029c 06f3 jlnz 0x06f3
|
|
06f9 8100 clr $ACC0
|
|
06fa 00de 037f lr $AC0.M, @0x037f
|
|
06fc 147f lsr $ACC0, #-1
|
|
06fd 0200 0780 addi $AC0.M, #0x0780
|
|
06ff 1c1e mrr $AR0, $AC0.M
|
|
0700 00de 037f lr $AC0.M, @0x037f
|
|
0702 02a0 0001 andf $AC0.M, #0x0001
|
|
0704 029d 070d jlz 0x070d
|
|
0706 8100 clr $ACC0
|
|
0707 191e lrri $AC0.M, @$AR0
|
|
0708 1488 asl $ACC0, #8
|
|
0709 1b7e srri @$AR3, $AC0.M
|
|
070a 1fda mrr $AC0.M, $AX0.H
|
|
070b 7800 decm $AC0.M
|
|
070c 1f5e mrr $AX0.H, $AC0.M
|
|
070d 8100 clr $ACC0
|
|
070e 1fda mrr $AC0.M, $AX0.H
|
|
070f 147f lsr $ACC0, #-1
|
|
0710 007e 0719 bloop $AC0.M, 0x0719
|
|
0712 8100 clr $ACC0
|
|
0713 181e lrr $AC0.M, @$AR0
|
|
0714 0240 ff00 andi $AC0.M, #0xff00
|
|
0716 1b7e srri @$AR3, $AC0.M
|
|
0717 191e lrri $AC0.M, @$AR0
|
|
0718 1488 asl $ACC0, #8
|
|
0719 1b7e srri @$AR3, $AC0.M
|
|
071a 1fda mrr $AC0.M, $AX0.H
|
|
071b 1f58 mrr $AX0.H, $AX0.L
|
|
071c 02a0 0001 andf $AC0.M, #0x0001
|
|
071e 02dd retlz
|
|
071f 8100 clr $ACC0
|
|
0720 181e lrr $AC0.M, @$AR0
|
|
0721 0240 ff00 andi $AC0.M, #0xff00
|
|
0723 1b7e srri @$AR3, $AC0.M
|
|
0724 02df ret
|
|
0725 1205 sbclr #0x05
|
|
0726 8e00 set16
|
|
0727 00f0 03fd sr @0x03fd, $AC0.H
|
|
0729 00fc 03ff sr @0x03ff, $AC0.L
|
|
072b f400 lsr16 $ACC0
|
|
072c 00fc 03fe sr @0x03fe, $AC0.L
|
|
072e 00fa 03fa sr @0x03fa, $AX0.H
|
|
0730 8100 clr $ACC0
|
|
0731 00de fffe lr $AC0.M, @CMBH
|
|
0733 02c0 8000 andcf $AC0.M, #0x8000
|
|
0735 029c 0826 jlnz 0x0826
|
|
0737 00da ffff lr $AX0.H, @CMBL
|
|
0739 8600 tstaxh $AX0.H
|
|
073a 0294 07ff jnz 0x07ff
|
|
073c 00de fffe lr $AC0.M, @CMBH
|
|
073e 02c0 8000 andcf $AC0.M, #0x8000
|
|
0740 029c 073c jlnz 0x073c
|
|
0742 0240 000f andi $AC0.M, #0x000f
|
|
0744 1f5e mrr $AX0.H, $AC0.M
|
|
0745 7400 incm $AC0.M
|
|
0746 0c00 lris $AC0.L, #0x00
|
|
0747 1404 lsl $ACC0, #4
|
|
0748 00fe 034e sr @0x034e, $AC0.M
|
|
074a 1fda mrr $AC0.M, $AX0.H
|
|
074b 1f40 mrr $AX0.H, $AR0
|
|
074c 0200 04fc addi $AC0.M, #0x04fc
|
|
074e 1c1e mrr $AR0, $AC0.M
|
|
074f 00de ffff lr $AC0.M, @CMBL
|
|
0751 1a1e srr @$AR0, $AC0.M
|
|
0752 1c1a mrr $AR0, $AX0.H
|
|
0753 00de 03fe lr $AC0.M, @0x03fe
|
|
0755 00dc 03ff lr $AC0.L, @0x03ff
|
|
0757 00d0 03fd lr $AC0.H, @0x03fd
|
|
0759 00da 03fa lr $AX0.H, @0x03fa
|
|
075b 1305 sbset #0x05
|
|
075c 02ff rti
|
|
075d 009a 0002 lri $AX0.H, #0x0002
|
|
075f 00fa 03a3 sr @0x03a3, $AX0.H
|
|
0761 00e0 03f9 sr @0x03f9, $AR0
|
|
0763 02bf 07e9 call 0x07e9
|
|
0765 16fc dcd1 si @DMBH, #0xdcd1
|
|
0767 16fd 0002 si @DMBL, #0x0002
|
|
0769 16fb 0001 si @DIRQ, #0x0001
|
|
076b 0021 halt
|
|
076c 0784 cmpis $ACC1, #0x84
|
|
076d 0785 cmpis $ACC1, #0x85
|
|
076e 07c5 cmpis $ACC1, #0xc5
|
|
076f 07c8 cmpis $ACC1, #0xc8
|
|
0770 00e0 03f9 sr @0x03f9, $AR0
|
|
0772 009e 0005 lri $AC0.M, #0x0005
|
|
0774 02bf 07d7 call 0x07d7
|
|
0776 8e00 set16
|
|
0777 8100 clr $ACC0
|
|
0778 8900 clr $ACC1
|
|
0779 02bf 07cb call 0x07cb
|
|
077b 27ff lrs $AC1.M, @CMBL
|
|
077c 009e 076c lri $AC0.M, #0x076c
|
|
077e 4c00 add $ACC0, $ACC1
|
|
077f 1c7e mrr $AR3, $AC0.M
|
|
0780 0313 ilrr $AC1.M, @$AR3
|
|
0781 1c7f mrr $AR3, $AC1.M
|
|
0782 176f jmpr $AR3
|
|
0783 0021 halt
|
|
0784 0021 halt
|
|
0785 009a 0002 lri $AX0.H, #0x0002
|
|
0787 00fa 03a3 sr @0x03a3, $AX0.H
|
|
0789 8100 clr $ACC0
|
|
078a 8900 clr $ACC1
|
|
078b 02bf 07cb call 0x07cb
|
|
078d 24ff lrs $AC0.L, @CMBL
|
|
078e 02bf 07d1 call 0x07d1
|
|
0790 25ff lrs $AC1.L, @CMBL
|
|
0791 02bf 07d1 call 0x07d1
|
|
0793 27ff lrs $AC1.M, @CMBL
|
|
0794 2ece srs @DSMAH, $AC0.M
|
|
0795 2ccf srs @DSMAL, $AC0.L
|
|
0796 16c9 0001 si @DSCR, #0x0001
|
|
0798 2fcd srs @DSPA, $AC1.M
|
|
0799 2dcb srs @DSBL, $AC1.L
|
|
079a 8100 clr $ACC0
|
|
079b 8900 clr $ACC1
|
|
079c 02bf 07cb call 0x07cb
|
|
079e 24ff lrs $AC0.L, @CMBL
|
|
079f 1c9e mrr $IX0, $AC0.M
|
|
07a0 1cbc mrr $IX1, $AC0.L
|
|
07a1 02bf 07d1 call 0x07d1
|
|
07a3 25ff lrs $AC1.L, @CMBL
|
|
07a4 02bf 07d1 call 0x07d1
|
|
07a6 27ff lrs $AC1.M, @CMBL
|
|
07a7 1cdf mrr $IX2, $AC1.M
|
|
07a8 1cfd mrr $IX3, $AC1.L
|
|
07a9 8100 clr $ACC0
|
|
07aa 02bf 07cb call 0x07cb
|
|
07ac 26ff lrs $AC0.M, @CMBL
|
|
07ad 1c1e mrr $AR0, $AC0.M
|
|
07ae 8900 clr $ACC1
|
|
07af 02bf 07d1 call 0x07d1
|
|
07b1 20ff lrs $AX0.L, @CMBL
|
|
07b2 1f5f mrr $AX0.H, $AC1.M
|
|
07b3 02bf 07cb call 0x07cb
|
|
07b5 21ff lrs $AX1.L, @CMBL
|
|
07b6 02bf 07cb call 0x07cb
|
|
07b8 23ff lrs $AX1.H, @CMBL
|
|
07b9 26c9 lrs $AC0.M, @DSCR
|
|
07ba 02a0 0004 andf $AC0.M, #0x0004
|
|
07bc 029c 07b9 jlnz 0x07b9
|
|
07be 1206 sbclr #0x06
|
|
07bf 1203 sbclr #0x03
|
|
07c0 1204 sbclr #0x04
|
|
07c1 1205 sbclr #0x05
|
|
07c2 029f 80b5 jmp 0x80b5
|
|
07c4 0021 halt
|
|
07c5 029f 8000 jmp 0x8000
|
|
07c7 0021 halt
|
|
07c8 00c0 03f9 lr $AR0, @0x03f9
|
|
07ca 170f jmpr $AR0
|
|
07cb 26fe lrs $AC0.M, @CMBH
|
|
07cc 02c0 8000 andcf $AC0.M, #0x8000
|
|
07ce 029c 07cb jlnz 0x07cb
|
|
07d0 02df ret
|
|
07d1 27fe lrs $AC1.M, @CMBH
|
|
07d2 03c0 8000 andcf $AC1.M, #0x8000
|
|
07d4 029c 07d1 jlnz 0x07d1
|
|
07d6 02df ret
|
|
|
|
void SEND_DCD1(AC0.M) {
|
|
07d7 02bf 07ef call 0x07ef
|
|
07d9 16fc dcd1 si @DMBH, #0xdcd1
|
|
07db 2efd srs @DMBL, $AC0.M
|
|
07dc 16fb 0001 si @DIRQ, #0x0001
|
|
07de 02bf 07ef call 0x07ef
|
|
07e0 02df ret
|
|
}
|
|
|
|
void SEND_F355(AC0.M) {
|
|
07e1 02bf 07ef call 0x07ef
|
|
07e3 16fc f355 si @DMBH, #0xf355
|
|
07e5 2efd srs @DMBL, $AC0.M
|
|
07e6 02bf 07ef call 0x07ef
|
|
07e8 02df ret
|
|
}
|
|
|
|
07e9 26fc lrs $AC0.M, @DMBH
|
|
07ea 02c0 8000 andcf $AC0.M, #0x8000
|
|
07ec 029d 07e9 jlz 0x07e9
|
|
07ee 02df ret
|
|
07ef 27fc lrs $AC1.M, @DMBH
|
|
07f0 03c0 8000 andcf $AC1.M, #0x8000
|
|
07f2 029d 07ef jlz 0x07ef
|
|
07f4 02df ret
|
|
07f5 009a 0280 lri $AX0.H, #0x0280
|
|
07f7 00fa 0350 sr @0x0350, $AX0.H
|
|
07f9 00fa 0351 sr @0x0351, $AX0.H
|
|
07fb 0a00 lris $AX0.H, #0x00
|
|
07fc 00fa 0352 sr @0x0352, $AX0.H
|
|
07fe 02df ret
|
|
07ff 00e0 03fb sr @0x03fb, $AR0
|
|
0801 00e8 03fc sr @0x03fc, $WR0
|
|
0803 00c0 0350 lr $AR0, @0x0350
|
|
0805 0088 002f lri $WR0, #0x002f
|
|
0807 1b1a srri @$AR0, $AX0.H
|
|
0808 00de fffe lr $AC0.M, @CMBH
|
|
080a 02c0 8000 andcf $AC0.M, #0x8000
|
|
080c 029c 0808 jlnz 0x0808
|
|
080e 00dc ffff lr $AC0.L, @CMBL
|
|
0810 1b1e srri @$AR0, $AC0.M
|
|
0811 1b1c srri @$AR0, $AC0.L
|
|
0812 1fda mrr $AC0.M, $AX0.H
|
|
0813 7800 decm $AC0.M
|
|
0814 1f5e mrr $AX0.H, $AC0.M
|
|
0815 8600 tstaxh $AX0.H
|
|
0816 0294 0808 jnz 0x0808
|
|
0818 8100 clr $ACC0
|
|
0819 00de 0352 lr $AC0.M, @0x0352
|
|
081b 7400 incm $AC0.M
|
|
081c 00fe 0352 sr @0x0352, $AC0.M
|
|
081e 00e0 0350 sr @0x0350, $AR0
|
|
0820 00c0 03fb lr $AR0, @0x03fb
|
|
0822 00c8 03fc lr $WR0, @0x03fc
|
|
0824 029f 0753 jmp 0x0753
|
|
0826 00e0 03fb sr @0x03fb, $AR0
|
|
0828 00e8 03fc sr @0x03fc, $WR0
|
|
082a 00c0 0350 lr $AR0, @0x0350
|
|
082c 0088 002f lri $WR0, #0x002f
|
|
082e 0a00 lris $AX0.H, #0x00
|
|
082f 1b1a srri @$AR0, $AX0.H
|
|
0830 029f 0818 jmp 0x0818
|
|
0832 00c0 0351 lr $AR0, @0x0351
|
|
0834 0088 002f lri $WR0, #0x002f
|
|
0836 00da 0352 lr $AX0.H, @0x0352
|
|
0838 8600 tstaxh $AX0.H
|
|
0839 0295 085a jz 0x085a
|
|
083b 1205 sbclr #0x05
|
|
083c 00da 0352 lr $AX0.H, @0x0352
|
|
083e 1fda mrr $AC0.M, $AX0.H
|
|
083f 7800 decm $AC0.M
|
|
0840 00fe 0352 sr @0x0352, $AC0.M
|
|
0842 1305 sbset #0x05
|
|
0843 0081 0356 lri $AR1, #0x0356
|
|
0845 191e lrri $AC0.M, @$AR0
|
|
0846 02c0 8000 andcf $AC0.M, #0x8000
|
|
0848 029d 085e jlz 0x085e
|
|
084a 1f5e mrr $AX0.H, $AC0.M
|
|
084b 8600 tstaxh $AX0.H
|
|
084c 0295 0862 jz 0x0862
|
|
084e 007a 0853 bloop $AX0.H, 0x0853
|
|
0850 191e lrri $AC0.M, @$AR0
|
|
0851 1b3e srri @$AR1, $AC0.M
|
|
0852 191e lrri $AC0.M, @$AR0
|
|
0853 1b3e srri @$AR1, $AC0.M
|
|
0854 00e0 0351 sr @0x0351, $AR0
|
|
0856 0088 ffff lri $WR0, #0xffff
|
|
0858 029f 0036 jmp 0x0036
|
|
085a 0088 ffff lri $WR0, #0xffff
|
|
085c 029f 002b jmp 0x002b
|
|
085e 00e0 0351 sr @0x0351, $AR0
|
|
0860 029f 0836 jmp 0x0836
|
|
0862 0080 0832 lri $AR0, #0x0832
|
|
0864 029f 075d jmp 0x075d
|
|
0866 8100 clr $ACC0
|
|
0867 0e10 lris $AC0.M, #0x10
|
|
0868 2232 lrs $AX0.H, @0x0032
|
|
0869 8600 tstaxh $AX0.H
|
|
086a 02d5 retz
|
|
086b 5400 subr $ACC0, $AX0.H
|
|
086c 0200 0458 addi $AC0.M, #0x0458
|
|
086e 1c1e mrr $AR0, $AC0.M
|
|
086f 1fda mrr $AC0.M, $AX0.H
|
|
0870 04fe addis $ACC0, #0xfe
|
|
0871 1f1e mrr $AX0.L, $AC0.M
|
|
0872 191e lrri $AC0.M, @$AR0
|
|
0873 0291 0879 jl 0x0879
|
|
0875 191a lrri $AX0.H, @$AR0
|
|
0876 0058 loop $AX0.L
|
|
0877 64a0 movr'ls $ACC0, $AX0.H : $AX0.H, $AC0.M
|
|
0878 6433 movr's $ACC0, $AX0.H : @$AR3, $AC0.M
|
|
0879 1b7e srri @$AR3, $AC0.M
|
|
087a 02df ret
|
|
087b 02bf 0866 call 0x0866
|
|
087d 8100 clr $ACC0
|
|
087e 2632 lrs $AC0.M, @0x0032
|
|
087f 5c00 sub $ACC0, $ACC1
|
|
0880 2e32 srs @0x0032, $AC0.M
|
|
0881 0092 00ff lri $CR, #0x00ff
|
|
0883 02df ret
|
|
0884 00de 04fb lr $AC0.M, @0x04fb
|
|
0886 7400 incm $AC0.M
|
|
0887 00fe 04fb sr @0x04fb, $AC0.M
|
|
0889 8100 clr $ACC0
|
|
088a 2e32 srs @0x0032, $AC0.M
|
|
088b 2e66 srs @0x0066, $AC0.M
|
|
088c 2e67 srs @0x0067, $AC0.M
|
|
088d 268a lrs $AC0.M, @0xff8a
|
|
088e 248b lrs $AC0.L, @0xff8b
|
|
088f 2e3a srs @0x003a, $AC0.M
|
|
0890 2c3b srs @0x003b, $AC0.L
|
|
0891 268c lrs $AC0.M, @0xff8c
|
|
0892 248d lrs $AC0.L, @0xff8d
|
|
0893 2e38 srs @0x0038, $AC0.M
|
|
0894 2c39 srs @0x0039, $AC0.L
|
|
0895 02df ret
|
|
0896 8100 clr $ACC0
|
|
0897 2689 lrs $AC0.M, @0xff89
|
|
0898 0240 000f andi $AC0.M, #0x000f
|
|
089a 1f5e mrr $AX0.H, $AC0.M
|
|
089b 8100 clr $ACC0
|
|
089c 0e10 lris $AC0.M, #0x10
|
|
089d 5400 subr $ACC0, $AX0.H
|
|
089e 2e32 srs @0x0032, $AC0.M
|
|
089f 268a lrs $AC0.M, @0xff8a
|
|
08a0 248b lrs $AC0.L, @0xff8b
|
|
08a1 2288 lrs $AX0.H, @0xff88
|
|
08a2 2089 lrs $AX0.L, @0xff89
|
|
08a3 5800 subax $ACC0, $AX0.L
|
|
08a4 0a00 lris $AX0.H, #0x00
|
|
08a5 2032 lrs $AX0.L, @0x0032
|
|
08a6 5800 subax $ACC0, $AX0.L
|
|
08a7 2e3a srs @0x003a, $AC0.M
|
|
08a8 2c3b srs @0x003b, $AC0.L
|
|
08a9 02df ret
|
|
08aa 0092 0004 lri $CR, #0x0004
|
|
08ac 8100 clr $ACC0
|
|
08ad 2604 lrs $AC0.M, @0x0004
|
|
08ae b100 tst $ACC0
|
|
08af 02b4 0884 callnz 0x0884
|
|
08b1 8100 clr $ACC0
|
|
08b2 2601 lrs $AC0.M, @0x0001
|
|
08b3 b100 tst $ACC0
|
|
08b4 0294 0952 jnz 0x0952
|
|
08b6 2232 lrs $AX0.H, @0x0032
|
|
08b7 c900 cmpar $ACC0, $AX1.H
|
|
08b8 0293 087b jle 0x087b
|
|
08ba 5500 subr $ACC1, $AX0.H
|
|
08bb 02bf 0866 call 0x0866
|
|
08bd 223a lrs $AX0.H, @0x003a
|
|
08be 8600 tstaxh $AX0.H
|
|
08bf 0294 08c6 jnz 0x08c6
|
|
08c1 8100 clr $ACC0
|
|
08c2 263b lrs $AC0.M, @0x003b
|
|
08c3 8200 cmp
|
|
08c4 0291 0918 jl 0x0918
|
|
08c6 8100 clr $ACC0
|
|
08c7 1fdf mrr $AC0.M, $AC1.M
|
|
08c8 040f addis $ACC0, #0x0f
|
|
08c9 147c lsr $ACC0, #-4
|
|
08ca 1f7e mrr $AX1.H, $AC0.M
|
|
08cb 0c00 lris $AC0.L, #0x00
|
|
08cc 1404 lsl $ACC0, #4
|
|
08cd 1f1e mrr $AX0.L, $AC0.M
|
|
08ce 0a00 lris $AX0.H, #0x00
|
|
08cf 8100 clr $ACC0
|
|
08d0 263a lrs $AC0.M, @0x003a
|
|
08d1 243b lrs $AC0.L, @0x003b
|
|
08d2 5800 subax $ACC0, $AX0.L
|
|
08d3 0290 08de jge 0x08de
|
|
08d5 8100 clr $ACC0
|
|
08d6 263b lrs $AC0.M, @0x003b
|
|
08d7 5c00 sub $ACC0, $ACC1
|
|
08d8 2e32 srs @0x0032, $AC0.M
|
|
08d9 8100 clr $ACC0
|
|
08da 2e3a srs @0x003a, $AC0.M
|
|
08db 2e3b srs @0x003b, $AC0.M
|
|
08dc 029f 08e4 jmp 0x08e4
|
|
08de 2e3a srs @0x003a, $AC0.M
|
|
08df 2c3b srs @0x003b, $AC0.L
|
|
08e0 0c00 lris $AC0.L, #0x00
|
|
08e1 1fd8 mrr $AC0.M, $AX0.L
|
|
08e2 5c00 sub $ACC0, $ACC1
|
|
08e3 2e32 srs @0x0032, $AC0.M
|
|
08e4 8100 clr $ACC0
|
|
08e5 1fdb mrr $AC0.M, $AX1.H
|
|
08e6 02bf 0958 call 0x0958
|
|
08e8 2232 lrs $AX0.H, @0x0032
|
|
08e9 8600 tstaxh $AX0.H
|
|
08ea 0295 0915 jz 0x0915
|
|
08ec 0a10 lris $AX0.H, #0x10
|
|
08ed 8100 clr $ACC0
|
|
08ee 1fc3 mrr $AC0.M, $AR3
|
|
08ef 5400 subr $ACC0, $AX0.H
|
|
08f0 1c7e mrr $AR3, $AC0.M
|
|
08f1 0080 0458 lri $AR0, #0x0458
|
|
08f3 197e lrri $AC0.M, @$AR3
|
|
08f4 197a lrri $AX0.H, @$AR3
|
|
08f5 100e loopi #0x0e
|
|
08f6 64a2 movr'sl $ACC0, $AX0.H : $AC0.M, $AX0.H
|
|
08f7 1b1e srri @$AR0, $AC0.M
|
|
08f8 1b1a srri @$AR0, $AX0.H
|
|
08f9 8100 clr $ACC0
|
|
08fa 263a lrs $AC0.M, @0x003a
|
|
08fb 243b lrs $AC0.L, @0x003b
|
|
08fc b100 tst $ACC0
|
|
08fd 0294 0915 jnz 0x0915
|
|
08ff 2232 lrs $AX0.H, @0x0032
|
|
0900 8600 tstaxh $AX0.H
|
|
0901 0295 0915 jz 0x0915
|
|
0903 0080 0467 lri $AR0, #0x0467
|
|
0905 8100 clr $ACC0
|
|
0906 268b lrs $AC0.M, @0xff8b
|
|
0907 b100 tst $ACC0
|
|
0908 0295 0915 jz 0x0915
|
|
090a 0200 000f addi $AC0.M, #0x000f
|
|
090c 0240 000f andi $AC0.M, #0x000f
|
|
090e 0200 0458 addi $AC0.M, #0x0458
|
|
0910 1c7e mrr $AR3, $AC0.M
|
|
0911 007a 0914 bloop $AX0.H, 0x0914
|
|
0913 18fe lrrd $AC0.M, @$AR3
|
|
0914 1a9e srrd @$AR0, $AC0.M
|
|
0915 0092 00ff lri $CR, #0x00ff
|
|
0917 02df ret
|
|
0918 b100 tst $ACC0
|
|
0919 0295 0928 jz 0x0928
|
|
091b 5d00 sub $ACC1, $ACC0
|
|
091c 040f addis $ACC0, #0x0f
|
|
091d 147c lsr $ACC0, #-4
|
|
091e 0c00 lris $AC0.L, #0x00
|
|
091f 00e3 0363 sr @0x0363, $AR3
|
|
0921 02bf 0958 call 0x0958
|
|
0923 00de 0363 lr $AC0.M, @0x0363
|
|
0925 223b lrs $AX0.H, @0x003b
|
|
0926 4400 addr $ACC0, $AX0.H
|
|
0927 1c7e mrr $AR3, $AC0.M
|
|
0928 8100 clr $ACC0
|
|
0929 2681 lrs $AC0.M, @0xff81
|
|
092a b100 tst $ACC0
|
|
092b 0295 0950 jz 0x0950
|
|
092d 2380 lrs $AX1.H, @0xff80
|
|
092e 2688 lrs $AC0.M, @0xff88
|
|
092f 2489 lrs $AC0.L, @0xff89
|
|
0930 1408 lsl $ACC0, #8
|
|
0931 14f4 asr $ACC0, #-12
|
|
0932 2380 lrs $AX1.H, @0xff80
|
|
0933 8d00 set15
|
|
0934 c810 mulc'mv $AC0.M, $AX1.H : $AX0.L, $AC0.L
|
|
0935 ae00 mulxmv $AX0.L, $AX1.H, $ACC0
|
|
0936 8c00 clr15
|
|
0937 f000 lsl16 $ACC0
|
|
0938 4e00 addp $ACC0
|
|
0939 238c lrs $AX1.H, @0xff8c
|
|
093a 218d lrs $AX1.L, @0xff8d
|
|
093b 4a00 addax $ACC0, $AX1.L
|
|
093c 2e38 srs @0x0038, $AC0.M
|
|
093d 2c39 srs @0x0039, $AC0.L
|
|
093e 2682 lrs $AC0.M, @0xff82
|
|
093f 2e67 srs @0x0067, $AC0.M
|
|
0940 2683 lrs $AC0.M, @0xff83
|
|
0941 2e66 srs @0x0066, $AC0.M
|
|
0942 00e3 0363 sr @0x0363, $AR3
|
|
0944 0083 0458 lri $AR3, #0x0458
|
|
0946 8100 clr $ACC0
|
|
0947 0e01 lris $AC0.M, #0x01
|
|
0948 02bf 0958 call 0x0958
|
|
094a 00c3 0363 lr $AR3, @0x0363
|
|
094c 02bf 0896 call 0x0896
|
|
094e 029f 08b6 jmp 0x08b6
|
|
0950 0e01 lris $AC0.M, #0x01
|
|
0951 2e01 srs @0x0001, $AC0.M
|
|
0952 8100 clr $ACC0
|
|
0953 005f loop $AC1.M
|
|
0954 1b7e srri @$AR3, $AC0.M
|
|
0955 0092 00ff lri $CR, #0x00ff
|
|
0957 02df ret
|
|
0958 00ff 0360 sr @0x0360, $AC1.M
|
|
095a 00fe 0361 sr @0x0361, $AC0.M
|
|
095c 2638 lrs $AC0.M, @0x0038
|
|
095d 2439 lrs $AC0.L, @0x0039
|
|
095e 0f05 lris $AC1.M, #0x05
|
|
095f 02bf 069b call 0x069b
|
|
0961 2638 lrs $AC0.M, @0x0038
|
|
0962 2439 lrs $AC0.L, @0x0039
|
|
0963 8900 clr $ACC1
|
|
0964 00df 0361 lr $AC1.M, @0x0361
|
|
0966 2280 lrs $AX0.H, @0xff80
|
|
0967 d000 mulc $AC1.M, $AX0.H
|
|
0968 6f00 movp $ACC1
|
|
0969 4c00 add $ACC0, $ACC1
|
|
096a 2e38 srs @0x0038, $AC0.M
|
|
096b 2c39 srs @0x0039, $AC0.L
|
|
096c 8100 clr $ACC0
|
|
096d 00de 0361 lr $AC0.M, @0x0361
|
|
096f 007e 09d6 bloop $AC0.M, 0x09d6
|
|
0971 0080 ffd3 lri $AR0, #0xffd3
|
|
0973 0084 0000 lri $IX0, #0x0000
|
|
0975 199e lrrn $AC0.M, @$AR0
|
|
0976 8900 clr $ACC1
|
|
0977 1ffe mrr $AC1.M, $AC0.M
|
|
0978 1401 lsl $ACC0, #1
|
|
0979 0240 001e andi $AC0.M, #0x001e
|
|
097b 0200 0300 addi $AC0.M, #0x0300
|
|
097d 1c3e mrr $AR1, $AC0.M
|
|
097e 157c lsr $ACC1, #-4
|
|
097f 0340 000f andi $AC1.M, #0x000f
|
|
0981 0a11 lris $AX0.H, #0x11
|
|
0982 5500 subr $ACC1, $AX0.H
|
|
0983 8100 clr $ACC0
|
|
0984 2680 lrs $AC0.M, @0xff80
|
|
0985 0605 cmpis $ACC0, #0x05
|
|
0986 0295 099f jz 0x099f
|
|
0988 009a 00f0 lri $AX0.H, #0x00f0
|
|
098a 0b0f lris $AX1.H, #0x0f
|
|
098b 0082 0364 lri $AR2, #0x0364
|
|
098d 1998 lrrn $AX0.L, @$AR0
|
|
098e 6000 movr $ACC0, $AX0.L
|
|
098f 1107 0996 bloopi #0x07, 0x0996
|
|
0991 3400 andr $AC0.M, $AX0.H
|
|
0992 1408 lsl $ACC0, #8
|
|
0993 6032 movr's $ACC0, $AX0.L : @$AR2, $AC0.M
|
|
0994 3644 andr'ln $AC0.M, $AX1.H : $AX0.L, @$AR0
|
|
0995 140c lsl $ACC0, #12
|
|
0996 6032 movr's $ACC0, $AX0.L : @$AR2, $AC0.M
|
|
0997 3400 andr $AC0.M, $AX0.H
|
|
0998 1408 lsl $ACC0, #8
|
|
0999 6032 movr's $ACC0, $AX0.L : @$AR2, $AC0.M
|
|
099a 3600 andr $AC0.M, $AX1.H
|
|
099b 140c lsl $ACC0, #12
|
|
099c 1b5e srri @$AR2, $AC0.M
|
|
099d 029f 09bf jmp 0x09bf
|
|
099f 009a c000 lri $AX0.H, #0xc000
|
|
09a1 0082 0364 lri $AR2, #0x0364
|
|
09a3 1998 lrrn $AX0.L, @$AR0
|
|
09a4 6000 movr $ACC0, $AX0.L
|
|
09a5 1103 09b2 bloopi #0x03, 0x09b2
|
|
09a7 1408 lsl $ACC0, #8
|
|
09a8 3400 andr $AC0.M, $AX0.H
|
|
09a9 6032 movr's $ACC0, $AX0.L : @$AR2, $AC0.M
|
|
09aa 140a lsl $ACC0, #10
|
|
09ab 3400 andr $AC0.M, $AX0.H
|
|
09ac 6032 movr's $ACC0, $AX0.L : @$AR2, $AC0.M
|
|
09ad 140c lsl $ACC0, #12
|
|
09ae 3400 andr $AC0.M, $AX0.H
|
|
09af 6032 movr's $ACC0, $AX0.L : @$AR2, $AC0.M
|
|
09b0 140e lsl $ACC0, #14
|
|
09b1 3444 andr'ln $AC0.M, $AX0.H : $AX0.L, @$AR0
|
|
09b2 6032 movr's $ACC0, $AX0.L : @$AR2, $AC0.M
|
|
09b3 1408 lsl $ACC0, #8
|
|
09b4 3400 andr $AC0.M, $AX0.H
|
|
09b5 6032 movr's $ACC0, $AX0.L : @$AR2, $AC0.M
|
|
09b6 140a lsl $ACC0, #10
|
|
09b7 3400 andr $AC0.M, $AX0.H
|
|
09b8 6032 movr's $ACC0, $AX0.L : @$AR2, $AC0.M
|
|
09b9 140c lsl $ACC0, #12
|
|
09ba 3400 andr $AC0.M, $AX0.H
|
|
09bb 6032 movr's $ACC0, $AX0.L : @$AR2, $AC0.M
|
|
09bc 140e lsl $ACC0, #14
|
|
09bd 3400 andr $AC0.M, $AX0.H
|
|
09be 1b5e srri @$AR2, $AC0.M
|
|
09bf 8f00 set40
|
|
09c0 1f7f mrr $AX1.H, $AC1.M
|
|
09c1 2066 lrs $AX0.L, @0x0066
|
|
09c2 2767 lrs $AC1.M, @0x0067
|
|
09c3 193a lrri $AX0.H, @$AR1
|
|
09c4 1939 lrri $AX1.L, @$AR1
|
|
09c5 0080 0364 lri $AR0, #0x0364
|
|
09c7 a000 mulx $AX0.L, $AX1.L
|
|
09c8 ea70 maddc'l $AC1.M, $AX1.L : $AC0.M, @$AR0
|
|
09c9 1108 09d2 bloopi #0x08, 0x09d2
|
|
09cb 3a93 orr'sl $AC0.M, $AX1.H : $AC1.M, $AX1.L
|
|
09cc a478 mulxac'l $AX0.L, $AX1.L, $ACC0 : $AC1.M, @$AR0
|
|
09cd 1485 asl $ACC0, #5
|
|
09ce e833 maddc's $AC0.M, $AX1.L : @$AR3, $AC0.M
|
|
09cf 3b92 orr'sl $AC1.M, $AX1.H : $AC0.M, $AX1.L
|
|
09d0 a570 mulxac'l $AX0.L, $AX1.L, $ACC1 : $AC0.M, @$AR0
|
|
09d1 1585 asl $ACC1, #5
|
|
09d2 ea3b maddc's $AC1.M, $AX1.L : @$AR3, $AC1.M
|
|
09d3 2f67 srs @0x0067, $AC1.M
|
|
09d4 8e00 set16
|
|
09d5 1ff8 mrr $AC1.M, $AX0.L
|
|
09d6 2f66 srs @0x0066, $AC1.M
|
|
09d7 8900 clr $ACC1
|
|
09d8 00df 0360 lr $AC1.M, @0x0360
|
|
09da 02df ret
|
|
09db b100 tst $ACC0
|
|
09dc 02d5 retz
|
|
09dd 04fe addis $ACC0, #0xfe
|
|
09de 1f1e mrr $AX0.L, $AC0.M
|
|
09df 191e lrri $AC0.M, @$AR0
|
|
09e0 0291 09e6 jl 0x09e6
|
|
09e2 191a lrri $AX0.H, @$AR0
|
|
09e3 0058 loop $AX0.L
|
|
09e4 64a0 movr'ls $ACC0, $AX0.H : $AX0.H, $AC0.M
|
|
09e5 6433 movr's $ACC0, $AX0.H : @$AR3, $AC0.M
|
|
09e6 1b7e srri @$AR3, $AC0.M
|
|
09e7 02df ret
|
|
09e8 8100 clr $ACC0
|
|
09e9 1f5e mrr $AX0.H, $AC0.M
|
|
09ea 00d8 0402 lr $AX0.L, @0x0402
|
|
09ec 00dc 0430 lr $AC0.L, @0x0430
|
|
09ee 0080 0520 lri $AR0, #0x0520
|
|
09f0 00df 0480 lr $AC1.M, @0x0480
|
|
09f2 1501 lsl $ACC1, #1
|
|
09f3 0340 007e andi $AC1.M, #0x007e
|
|
09f5 0300 09fd addi $AC1.M, #0x09fd
|
|
09f7 1c5f mrr $AR2, $AC1.M
|
|
09f8 175f callr $AR2
|
|
09f9 00fc 0430 sr @0x0430, $AC0.L
|
|
09fb 029f 0386 jmp 0x0386
|
|
09fd 029f 0a1e jmp 0x0a1e
|
|
09ff 029f 0a59 jmp 0x0a59
|
|
0a01 029f 0a41 jmp 0x0a41
|
|
0a03 029f 0a2e jmp 0x0a2e
|
|
0a05 029f 0a67 jmp 0x0a67
|
|
0a07 029f 0a1d jmp 0x0a1d
|
|
0a09 029f 0a85 jmp 0x0a85
|
|
0a0b 029f 0a88 jmp 0x0a88
|
|
0a0d 029f 0a1d jmp 0x0a1d
|
|
0a0f 029f 0a1d jmp 0x0a1d
|
|
0a11 029f 0aa6 jmp 0x0aa6
|
|
0a13 029f 0a5f jmp 0x0a5f
|
|
0a15 029f 0a63 jmp 0x0a63
|
|
0a17 029f 0a1d jmp 0x0a1d
|
|
0a19 029f 0a1d jmp 0x0a1d
|
|
0a1b 029f 0a1d jmp 0x0a1d
|
|
0a1d 02df ret
|
|
0a1e 1401 lsl $ACC0, #1
|
|
0a1f 009b c000 lri $AX1.H, #0xc000
|
|
0a21 0099 4000 lri $AX1.L, #0x4000
|
|
0a23 1150 0a2b bloopi #0x50, 0x0a2b
|
|
0a25 02c0 0001 andcf $AC0.M, #0x0001
|
|
0a27 027c iflnz
|
|
0a28 1b1b srri @$AR0, $AX1.H
|
|
0a29 027d iflz
|
|
0a2a 1b19 srri @$AR0, $AX1.L
|
|
0a2b 4800 addax $ACC0, $AX0.L
|
|
0a2c 147f lsr $ACC0, #-1
|
|
0a2d 02df ret
|
|
0a2e 1402 lsl $ACC0, #2
|
|
0a2f 8900 clr $ACC1
|
|
0a30 1fb8 mrr $AC1.L, $AX0.L
|
|
0a31 1501 lsl $ACC1, #1
|
|
0a32 009b c000 lri $AX1.H, #0xc000
|
|
0a34 0099 4000 lri $AX1.L, #0x4000
|
|
0a36 1150 0a3e bloopi #0x50, 0x0a3e
|
|
0a38 02c0 0003 andcf $AC0.M, #0x0003
|
|
0a3a 027c iflnz
|
|
0a3b 1b1b srri @$AR0, $AX1.H
|
|
0a3c 027d iflz
|
|
0a3d 1b19 srri @$AR0, $AX1.L
|
|
0a3e 4c00 add $ACC0, $ACC1
|
|
0a3f 147e lsr $ACC0, #-2
|
|
0a40 02df ret
|
|
0a41 1401 lsl $ACC0, #1
|
|
0a42 0081 0ca0 lri $AR1, #0x0ca0
|
|
0a44 009b c000 lri $AX1.H, #0xc000
|
|
0a46 0099 4000 lri $AX1.L, #0x4000
|
|
0a48 8900 clr $ACC1
|
|
0a49 0082 0000 lri $AR2, #0x0000
|
|
0a4b 1150 0a56 bloopi #0x50, 0x0a56
|
|
0a4d 02c0 0001 andcf $AC0.M, #0x0001
|
|
0a4f 027c iflnz
|
|
0a50 1b1b srri @$AR0, $AX1.H
|
|
0a51 027d iflz
|
|
0a52 1b19 srri @$AR0, $AX1.L
|
|
0a53 183d lrr $AC1.L, @$AR1
|
|
0a54 4900 addax $ACC1, $AX0.L
|
|
0a55 1fe2 mrr $AC1.M, $AR2
|
|
0a56 4c39 add's $ACC0, $ACC1 : @$AR1, $AC1.M
|
|
0a57 147f lsr $ACC0, #-1
|
|
0a58 02df ret
|
|
0a59 8900 clr $ACC1
|
|
0a5a 1fb8 mrr $AC1.L, $AX0.L
|
|
0a5b 157f lsr $ACC1, #-1
|
|
0a5c 1050 loopi #0x50
|
|
0a5d 4c20 add's $ACC0, $ACC1 : @$AR0, $AC0.L
|
|
0a5e 02df ret
|
|
0a5f 0082 0180 lri $AR2, #0x0180
|
|
0a61 029f 0a69 jmp 0x0a69
|
|
0a63 0082 01c0 lri $AR2, #0x01c0
|
|
0a65 029f 0a69 jmp 0x0a69
|
|
0a67 0082 0140 lri $AR2, #0x0140
|
|
0a69 008a 003f lri $WR2, #0x003f
|
|
0a6b 0086 0000 lri $IX2, #0x0000
|
|
0a6d 1406 lsl $ACC0, #6
|
|
0a6e 8900 clr $ACC1
|
|
0a6f 1fb8 mrr $AC1.L, $AX0.L
|
|
0a70 1505 lsl $ACC1, #5
|
|
0a71 009b 003f lri $AX1.H, #0x003f
|
|
0a73 009a 0000 lri $AX0.H, #0x0000
|
|
0a75 3600 andr $AC0.M, $AX1.H
|
|
0a76 1cde mrr $IX2, $AC0.M
|
|
0a77 001a addarn $AR2, $IX2
|
|
0a78 3400 andr $AC0.M, $AX0.H
|
|
0a79 1150 0a7f bloopi #0x50, 0x0a7f
|
|
0a7b 4c4a add'l $ACC0, $ACC1 : $AX1.L, @$AR2
|
|
0a7c 3606 andr'dr $AC0.M, $AX1.H : $AR2
|
|
0a7d 1cde mrr $IX2, $AC0.M
|
|
0a7e 340e andr'nr $AC0.M, $AX0.H : $AR2
|
|
0a7f 1b19 srri @$AR0, $AX1.L
|
|
0a80 1fc2 mrr $AC0.M, $AR2
|
|
0a81 147a lsr $ACC0, #-6
|
|
0a82 008a ffff lri $WR2, #0xffff
|
|
0a84 02df ret
|
|
0a85 1050 loopi #0x50
|
|
0a86 1b18 srri @$AR0, $AX0.L
|
|
0a87 02df ret
|
|
0a88 0082 0100 lri $AR2, #0x0100
|
|
0a8a 008a 003f lri $WR2, #0x003f
|
|
0a8c 0086 0000 lri $IX2, #0x0000
|
|
0a8e 1406 lsl $ACC0, #6
|
|
0a8f 8900 clr $ACC1
|
|
0a90 1fb8 mrr $AC1.L, $AX0.L
|
|
0a91 1505 lsl $ACC1, #5
|
|
0a92 009b 003f lri $AX1.H, #0x003f
|
|
0a94 009a 0000 lri $AX0.H, #0x0000
|
|
0a96 3600 andr $AC0.M, $AX1.H
|
|
0a97 1cde mrr $IX2, $AC0.M
|
|
0a98 001a addarn $AR2, $IX2
|
|
0a99 3400 andr $AC0.M, $AX0.H
|
|
0a9a 1150 0aa0 bloopi #0x50, 0x0aa0
|
|
0a9c 4c4a add'l $ACC0, $ACC1 : $AX1.L, @$AR2
|
|
0a9d 3606 andr'dr $AC0.M, $AX1.H : $AR2
|
|
0a9e 1cde mrr $IX2, $AC0.M
|
|
0a9f 340e andr'nr $AC0.M, $AX0.H : $AR2
|
|
0aa0 1b19 srri @$AR0, $AX1.L
|
|
0aa1 1fc2 mrr $AC0.M, $AR2
|
|
0aa2 147a lsr $ACC0, #-6
|
|
0aa3 008a ffff lri $WR2, #0xffff
|
|
0aa5 02df ret
|
|
0aa6 0082 0100 lri $AR2, #0x0100
|
|
0aa8 008a 003f lri $WR2, #0x003f
|
|
0aaa 0086 0000 lri $IX2, #0x0000
|
|
0aac 0081 0ca0 lri $AR1, #0x0ca0
|
|
0aae 1406 lsl $ACC0, #6
|
|
0aaf 8900 clr $ACC1
|
|
0ab0 1fb8 mrr $AC1.L, $AX0.L
|
|
0ab1 1505 lsl $ACC1, #5
|
|
0ab2 009b 003f lri $AX1.H, #0x003f
|
|
0ab4 009a 0000 lri $AX0.H, #0x0000
|
|
0ab6 3600 andr $AC0.M, $AX1.H
|
|
0ab7 1cde mrr $IX2, $AC0.M
|
|
0ab8 001a addarn $AR2, $IX2
|
|
0ab9 3400 andr $AC0.M, $AX0.H
|
|
0aba 1150 0ac5 bloopi #0x50, 0x0ac5
|
|
0abc 1939 lrri $AX1.L, @$AR1
|
|
0abd a000 mulx $AX0.L, $AX1.L
|
|
0abe 140a lsl $ACC0, #10
|
|
0abf 4e00 addp $ACC0
|
|
0ac0 1476 lsr $ACC0, #-10
|
|
0ac1 4c4a add'l $ACC0, $ACC1 : $AX1.L, @$AR2
|
|
0ac2 3606 andr'dr $AC0.M, $AX1.H : $AR2
|
|
0ac3 1cde mrr $IX2, $AC0.M
|
|
0ac4 340e andr'nr $AC0.M, $AX0.H : $AR2
|
|
0ac5 1b19 srri @$AR0, $AX1.L
|
|
0ac6 1fc2 mrr $AC0.M, $AR2
|
|
0ac7 147a lsr $ACC0, #-6
|
|
0ac8 008a ffff lri $WR2, #0xffff
|
|
0aca 02df ret
|
|
0acb 0080 01be lri $AR0, #0x01be
|
|
0acd 1918 lrri $AX0.L, @$AR0
|
|
0ace 191a lrri $AX0.H, @$AR0
|
|
0acf 0080 0180 lri $AR0, #0x0180
|
|
0ad1 0083 0180 lri $AR3, #0x0180
|
|
0ad3 9070 mul'l $AX0.L, $AX0.H : $AC0.M, @$AR0
|
|
0ad4 1ffe mrr $AC1.M, $AC0.M
|
|
0ad5 1120 0adc bloopi #0x20, 0x0adc
|
|
0ad7 7c00 neg $ACC0
|
|
0ad8 d450 mulcac'l $AC1.M, $AX0.H, $ACC0 : $AX0.H, @$AR0
|
|
0ad9 6533 movr's $ACC1, $AX0.H : @$AR3, $AC0.M
|
|
0ada c550 mulcac'l $AC0.M, $AX0.H, $ACC1 : $AX0.H, @$AR0
|
|
0adb 1501 lsl $ACC1, #1
|
|
0adc 643b movr's $ACC0, $AX0.H : @$AR3, $AC1.M
|
|
0add 0080 01fe lri $AR0, #0x01fe
|
|
0adf 191a lrri $AX0.H, @$AR0
|
|
0ae0 1918 lrri $AX0.L, @$AR0
|
|
0ae1 0080 01c0 lri $AR0, #0x01c0
|
|
0ae3 0083 01c0 lri $AR3, #0x01c0
|
|
0ae5 1ff8 mrr $AC1.M, $AX0.L
|
|
0ae6 9070 mul'l $AX0.L, $AX0.H : $AC0.M, @$AR0
|
|
0ae7 f800 addpaxz $ACC0, $AX0.H
|
|
0ae8 0240 01ff andi $AC0.M, #0x01ff
|
|
0aea 0260 2000 ori $AC0.M, #0x2000
|
|
0aec 02bf 0aef call 0x0aef
|
|
0aee 02df ret
|
|
0aef b900 tst $ACC1
|
|
0af0 0272 ifg
|
|
0af1 7c00 neg $ACC0
|
|
0af2 1f7e mrr $AX1.H, $AC0.M
|
|
0af3 4700 addr $ACC1, $AX1.H
|
|
0af4 1110 0af9 bloopi #0x10, 0x0af9
|
|
0af6 473b addr's $ACC1, $AX1.H : @$AR3, $AC1.M
|
|
0af7 473b addr's $ACC1, $AX1.H : @$AR3, $AC1.M
|
|
0af8 473b addr's $ACC1, $AX1.H : @$AR3, $AC1.M
|
|
0af9 473b addr's $ACC1, $AX1.H : @$AR3, $AC1.M
|
|
0afa 02df ret
|
|
0afb 02bf 0b68 call 0x0b68
|
|
0afd 2201 lrs $AX0.H, @0x0001
|
|
0afe 8600 tstaxh $AX0.H
|
|
0aff 0294 0b10 jnz 0x0b10
|
|
0b01 2204 lrs $AX0.H, @0x0004
|
|
0b02 8600 tstaxh $AX0.H
|
|
0b03 02b4 0b57 callnz 0x0b57
|
|
0b05 8100 clr $ACC0
|
|
0b06 2605 lrs $AC0.M, @0x0005
|
|
0b07 b100 tst $ACC0
|
|
0b08 0295 0b1d jz 0x0b1d
|
|
0b0a 8100 clr $ACC0
|
|
0b0b 2e05 srs @0x0005, $AC0.M
|
|
0b0c 2281 lrs $AX0.H, @0xff81
|
|
0b0d 8600 tstaxh $AX0.H
|
|
0b0e 0294 0b17 jnz 0x0b17
|
|
0b10 8100 clr $ACC0
|
|
0b11 005f loop $AC1.M
|
|
0b12 1b7e srri @$AR3, $AC0.M
|
|
0b13 7400 incm $AC0.M
|
|
0b14 2e01 srs @0x0001, $AC0.M
|
|
0b15 029f 0b50 jmp 0x0b50
|
|
0b17 2688 lrs $AC0.M, @0xff88
|
|
0b18 2489 lrs $AC0.L, @0xff89
|
|
0b19 2e34 srs @0x0034, $AC0.M
|
|
0b1a 2c35 srs @0x0035, $AC0.L
|
|
0b1b 02bf 0b57 call 0x0b57
|
|
0b1d 00ff 0360 sr @0x0360, $AC1.M
|
|
0b1f 2638 lrs $AC0.M, @0x0038
|
|
0b20 2439 lrs $AC0.L, @0x0039
|
|
0b21 02bf 06c9 call 0x06c9
|
|
0b23 00df 0360 lr $AC1.M, @0x0360
|
|
0b25 8100 clr $ACC0
|
|
0b26 263a lrs $AC0.M, @0x003a
|
|
0b27 b100 tst $ACC0
|
|
0b28 0294 0b37 jnz 0x0b37
|
|
0b2a 263b lrs $AC0.M, @0x003b
|
|
0b2b 5c00 sub $ACC0, $ACC1
|
|
0b2c 0290 0b37 jge 0x0b37
|
|
0b2e 223b lrs $AX0.H, @0x003b
|
|
0b2f 02bf 06e6 call 0x06e6
|
|
0b31 5500 subr $ACC1, $AX0.H
|
|
0b32 0a01 lris $AX0.H, #0x01
|
|
0b33 00fa 0405 sr @0x0405, $AX0.H
|
|
0b35 029f 0b0a jmp 0x0b0a
|
|
0b37 1f5f mrr $AX0.H, $AC1.M
|
|
0b38 02bf 06e6 call 0x06e6
|
|
0b3a 00fa 0362 sr @0x0362, $AX0.H
|
|
0b3c 8100 clr $ACC0
|
|
0b3d 263a lrs $AC0.M, @0x003a
|
|
0b3e 243b lrs $AC0.L, @0x003b
|
|
0b3f 1570 lsr $ACC1, #-16
|
|
0b40 0a01 lris $AX0.H, #0x01
|
|
0b41 0081 0405 lri $AR1, #0x0405
|
|
0b43 5c00 sub $ACC0, $ACC1
|
|
0b44 b100 tst $ACC0
|
|
0b45 0275 ifz
|
|
0b46 1a3a srr @$AR1, $AX0.H
|
|
0b47 2e3a srs @0x003a, $AC0.M
|
|
0b48 2c3b srs @0x003b, $AC0.L
|
|
0b49 2638 lrs $AC0.M, @0x0038
|
|
0b4a 2439 lrs $AC0.L, @0x0039
|
|
0b4b 00d8 0362 lr $AX0.L, @0x0362
|
|
0b4d 7000 addaxl $ACC0, $AX0.L
|
|
0b4e 2c39 srs @0x0039, $AC0.L
|
|
0b4f 2e38 srs @0x0038, $AC0.M
|
|
0b50 0092 00ff lri $CR, #0x00ff
|
|
0b52 029f 037e jmp 0x037e
|
|
0b54 8100 clr $ACC0
|
|
0b55 2e34 srs @0x0034, $AC0.M
|
|
0b56 2e35 srs @0x0035, $AC0.M
|
|
0b57 2334 lrs $AX1.H, @0x0034
|
|
0b58 2135 lrs $AX1.L, @0x0035
|
|
0b59 268a lrs $AC0.M, @0xff8a
|
|
0b5a 248b lrs $AC0.L, @0xff8b
|
|
0b5b 5a00 subax $ACC0, $AX1.L
|
|
0b5c 2e3a srs @0x003a, $AC0.M
|
|
0b5d 2c3b srs @0x003b, $AC0.L
|
|
0b5e 2634 lrs $AC0.M, @0x0034
|
|
0b5f 2435 lrs $AC0.L, @0x0035
|
|
0b60 238c lrs $AX1.H, @0xff8c
|
|
0b61 218d lrs $AX1.L, @0xff8d
|
|
0b62 4a00 addax $ACC0, $AX1.L
|
|
0b63 2e38 srs @0x0038, $AC0.M
|
|
0b64 2c39 srs @0x0039, $AC0.L
|
|
0b65 8100 clr $ACC0
|
|
0b66 2e05 srs @0x0005, $AC0.M
|
|
0b67 02df ret
|
|
0b68 0092 0004 lri $CR, #0x0004
|
|
0b6a 2002 lrs $AX0.L, @0x0002
|
|
0b6b 8100 clr $ACC0
|
|
0b6c 8900 clr $ACC1
|
|
0b6d 2430 lrs $AC0.L, @0x0030
|
|
0b6e 8d00 set15
|
|
0b6f 0950 lris $AX1.L, #0x50
|
|
0b70 a000 mulx $AX0.L, $AX1.L
|
|
0b71 a400 mulxac $AX0.L, $AX1.L, $ACC0
|
|
0b72 1404 lsl $ACC0, #4
|
|
0b73 8c00 clr15
|
|
0b74 1ffe mrr $AC1.M, $AC0.M
|
|
0b75 0083 0580 lri $AR3, #0x0580
|
|
0b77 02df ret
|
|
0b78 02bf 0b68 call 0x0b68
|
|
0b7a 2201 lrs $AX0.H, @0x0001
|
|
0b7b 8600 tstaxh $AX0.H
|
|
0b7c 0294 0b8d jnz 0x0b8d
|
|
0b7e 2204 lrs $AX0.H, @0x0004
|
|
0b7f 8600 tstaxh $AX0.H
|
|
0b80 02b4 0bd7 callnz 0x0bd7
|
|
0b82 8100 clr $ACC0
|
|
0b83 2605 lrs $AC0.M, @0x0005
|
|
0b84 b100 tst $ACC0
|
|
0b85 0295 0b9a jz 0x0b9a
|
|
0b87 8100 clr $ACC0
|
|
0b88 2e05 srs @0x0005, $AC0.M
|
|
0b89 2281 lrs $AX0.H, @0xff81
|
|
0b8a 8600 tstaxh $AX0.H
|
|
0b8b 0294 0b94 jnz 0x0b94
|
|
0b8d 8100 clr $ACC0
|
|
0b8e 005f loop $AC1.M
|
|
0b8f 1b7e srri @$AR3, $AC0.M
|
|
0b90 7400 incm $AC0.M
|
|
0b91 2e01 srs @0x0001, $AC0.M
|
|
0b92 029f 0bd0 jmp 0x0bd0
|
|
0b94 2688 lrs $AC0.M, @0xff88
|
|
0b95 2489 lrs $AC0.L, @0xff89
|
|
0b96 2e34 srs @0x0034, $AC0.M
|
|
0b97 2c35 srs @0x0035, $AC0.L
|
|
0b98 02bf 0bd7 call 0x0bd7
|
|
0b9a 00ff 0360 sr @0x0360, $AC1.M
|
|
0b9c 2638 lrs $AC0.M, @0x0038
|
|
0b9d 2439 lrs $AC0.L, @0x0039
|
|
0b9e 02bf 06c9 call 0x06c9
|
|
0ba0 02bf 06e0 call 0x06e0
|
|
0ba2 00df 0360 lr $AC1.M, @0x0360
|
|
0ba4 8100 clr $ACC0
|
|
0ba5 263a lrs $AC0.M, @0x003a
|
|
0ba6 b100 tst $ACC0
|
|
0ba7 0294 0bb6 jnz 0x0bb6
|
|
0ba9 263b lrs $AC0.M, @0x003b
|
|
0baa 5c00 sub $ACC0, $ACC1
|
|
0bab 0290 0bb6 jge 0x0bb6
|
|
0bad 223b lrs $AX0.H, @0x003b
|
|
0bae 02bf 06ab call 0x06ab
|
|
0bb0 5500 subr $ACC1, $AX0.H
|
|
0bb1 0a01 lris $AX0.H, #0x01
|
|
0bb2 00fa 0405 sr @0x0405, $AX0.H
|
|
0bb4 029f 0b87 jmp 0x0b87
|
|
0bb6 1f5f mrr $AX0.H, $AC1.M
|
|
0bb7 02bf 06ab call 0x06ab
|
|
0bb9 00fa 0362 sr @0x0362, $AX0.H
|
|
0bbb 8100 clr $ACC0
|
|
0bbc 263a lrs $AC0.M, @0x003a
|
|
0bbd 243b lrs $AC0.L, @0x003b
|
|
0bbe 1570 lsr $ACC1, #-16
|
|
0bbf 0a01 lris $AX0.H, #0x01
|
|
0bc0 0081 0405 lri $AR1, #0x0405
|
|
0bc2 5c00 sub $ACC0, $ACC1
|
|
0bc3 b100 tst $ACC0
|
|
0bc4 0275 ifz
|
|
0bc5 1a3a srr @$AR1, $AX0.H
|
|
0bc6 2e3a srs @0x003a, $AC0.M
|
|
0bc7 2c3b srs @0x003b, $AC0.L
|
|
0bc8 2638 lrs $AC0.M, @0x0038
|
|
0bc9 2439 lrs $AC0.L, @0x0039
|
|
0bca 00d8 0362 lr $AX0.L, @0x0362
|
|
0bcc 7000 addaxl $ACC0, $AX0.L
|
|
0bcd 7000 addaxl $ACC0, $AX0.L
|
|
0bce 2c39 srs @0x0039, $AC0.L
|
|
0bcf 2e38 srs @0x0038, $AC0.M
|
|
0bd0 0092 00ff lri $CR, #0x00ff
|
|
0bd2 029f 037e jmp 0x037e
|
|
0bd4 8100 clr $ACC0
|
|
0bd5 2e34 srs @0x0034, $AC0.M
|
|
0bd6 2e35 srs @0x0035, $AC0.M
|
|
0bd7 2334 lrs $AX1.H, @0x0034
|
|
0bd8 2135 lrs $AX1.L, @0x0035
|
|
0bd9 268a lrs $AC0.M, @0xff8a
|
|
0bda 248b lrs $AC0.L, @0xff8b
|
|
0bdb 5a00 subax $ACC0, $AX1.L
|
|
0bdc 2e3a srs @0x003a, $AC0.M
|
|
0bdd 2c3b srs @0x003b, $AC0.L
|
|
0bde 2634 lrs $AC0.M, @0x0034
|
|
0bdf 2435 lrs $AC0.L, @0x0035
|
|
0be0 1401 lsl $ACC0, #1
|
|
0be1 238c lrs $AX1.H, @0xff8c
|
|
0be2 218d lrs $AX1.L, @0xff8d
|
|
0be3 4a00 addax $ACC0, $AX1.L
|
|
0be4 2e38 srs @0x0038, $AC0.M
|
|
0be5 2c39 srs @0x0039, $AC0.L
|
|
0be6 8100 clr $ACC0
|
|
0be7 2e05 srs @0x0005, $AC0.M
|
|
0be8 02df ret
|
|
0be9 8900 clr $ACC1
|
|
0bea 0f50 lris $AC1.M, #0x50
|
|
0beb 0083 0520 lri $AR3, #0x0520
|
|
0bed 02bf 0c02 call 0x0c02
|
|
0bef 029f 0386 jmp 0x0386
|
|
0bf1 00d8 0402 lr $AX0.L, @0x0402
|
|
0bf3 8100 clr $ACC0
|
|
0bf4 8900 clr $ACC1
|
|
0bf5 00dc 0430 lr $AC0.L, @0x0430
|
|
0bf7 0a50 lris $AX0.H, #0x50
|
|
0bf8 9000 mul $AX0.L, $AX0.H
|
|
0bf9 9400 mulac $AX0.L, $AX0.H, $ACC0
|
|
0bfa 1404 lsl $ACC0, #4
|
|
0bfb 1ffe mrr $AC1.M, $AC0.M
|
|
0bfc 0083 0580 lri $AR3, #0x0580
|
|
0bfe 02bf 0c02 call 0x0c02
|
|
0c00 029f 037e jmp 0x037e
|
|
0c02 0092 0004 lri $CR, #0x0004
|
|
0c04 8100 clr $ACC0
|
|
0c05 263a lrs $AC0.M, @0x003a
|
|
0c06 243b lrs $AC0.L, @0x003b
|
|
0c07 1f1f mrr $AX0.L, $AC1.M
|
|
0c08 0a00 lris $AX0.H, #0x00
|
|
0c09 5800 subax $ACC0, $AX0.L
|
|
0c0a 0292 0c20 jg 0x0c20
|
|
0c0c 8900 clr $ACC1
|
|
0c0d 00c0 043b lr $AR0, @0x043b
|
|
0c0f 02bf 0c45 call 0x0c45
|
|
0c11 8100 clr $ACC0
|
|
0c12 1fd8 mrr $AC0.M, $AX0.L
|
|
0c13 223b lrs $AX0.H, @0x003b
|
|
0c14 5400 subr $ACC0, $AX0.H
|
|
0c15 0007 dar $AR3
|
|
0c16 1979 lrri $AX1.L, @$AR3
|
|
0c17 005e loop $AC0.M
|
|
0c18 1b79 srri @$AR3, $AX1.L
|
|
0c19 0f01 lris $AC1.M, #0x01
|
|
0c1a 2f01 srs @0x0001, $AC1.M
|
|
0c1b 8900 clr $ACC1
|
|
0c1c 2f3b srs @0x003b, $AC1.M
|
|
0c1d 0092 00ff lri $CR, #0x00ff
|
|
0c1f 02df ret
|
|
0c20 2e3a srs @0x003a, $AC0.M
|
|
0c21 2c3b srs @0x003b, $AC0.L
|
|
0c22 8100 clr $ACC0
|
|
0c23 8900 clr $ACC1
|
|
0c24 268a lrs $AC0.M, @0xff8a
|
|
0c25 2734 lrs $AC1.M, @0x0034
|
|
0c26 5c00 sub $ACC0, $ACC1
|
|
0c27 2e36 srs @0x0036, $AC0.M
|
|
0c28 5000 subr $ACC0, $AX0.L
|
|
0c29 0290 0c3f jge 0x0c3f
|
|
0c2b 00c0 0436 lr $AR0, @0x0436
|
|
0c2d 02bf 0c45 call 0x0c45
|
|
0c2f 8100 clr $ACC0
|
|
0c30 1fd8 mrr $AC0.M, $AX0.L
|
|
0c31 2236 lrs $AX0.H, @0x0036
|
|
0c32 5400 subr $ACC0, $AX0.H
|
|
0c33 1c1e mrr $AR0, $AC0.M
|
|
0c34 8100 clr $ACC0
|
|
0c35 2e34 srs @0x0034, $AC0.M
|
|
0c36 2688 lrs $AC0.M, @0xff88
|
|
0c37 2489 lrs $AC0.L, @0xff89
|
|
0c38 2e8c srs @0xff8c, $AC0.M
|
|
0c39 2c8d srs @0xff8d, $AC0.L
|
|
0c3a 02bf 0c45 call 0x0c45
|
|
0c3c 0092 00ff lri $CR, #0x00ff
|
|
0c3e 02df ret
|
|
0c3f 1c18 mrr $AR0, $AX0.L
|
|
0c40 02bf 0c45 call 0x0c45
|
|
0c42 0092 00ff lri $CR, #0x00ff
|
|
0c44 02df ret
|
|
0c45 8100 clr $ACC0
|
|
0c46 1fc0 mrr $AC0.M, $AR0
|
|
0c47 b100 tst $ACC0
|
|
0c48 02d5 retz
|
|
0c49 8900 clr $ACC1
|
|
0c4a 2734 lrs $AC1.M, @0x0034
|
|
0c4b 0340 0001 andi $AC1.M, #0x0001
|
|
0c4d 0b00 lris $AX1.H, #0x00
|
|
0c4e 1f3f mrr $AX1.L, $AC1.M
|
|
0c4f 268c lrs $AC0.M, @0xff8c
|
|
0c50 248d lrs $AC0.L, @0xff8d
|
|
0c51 8900 clr $ACC1
|
|
0c52 2534 lrs $AC1.L, @0x0034
|
|
0c53 1501 lsl $ACC1, #1
|
|
0c54 4c00 add $ACC0, $ACC1
|
|
0c55 5a00 subax $ACC0, $AX1.L
|
|
0c56 5a00 subax $ACC0, $AX1.L
|
|
0c57 1c20 mrr $AR1, $AR0
|
|
0c58 1fe0 mrr $AC1.M, $AR0
|
|
0c59 0502 addis $ACC1, #0x02
|
|
0c5a 1c1f mrr $AR0, $AC1.M
|
|
0c5b 009f 0b00 lri $AC1.M, #0x0b00
|
|
0c5d 0092 00ff lri $CR, #0x00ff
|
|
0c5f 02bf 0640 call 0x0640
|
|
0c61 0092 0004 lri $CR, #0x0004
|
|
0c63 2734 lrs $AC1.M, @0x0034
|
|
0c64 1f61 mrr $AX1.H, $AR1
|
|
0c65 4700 addr $ACC1, $AX1.H
|
|
0c66 2f34 srs @0x0034, $AC1.M
|
|
0c67 0080 0b00 lri $AR0, #0x0b00
|
|
0c69 8900 clr $ACC1
|
|
0c6a 1ff9 mrr $AC1.M, $AX1.L
|
|
0c6b b900 tst $ACC1
|
|
0c6c 0274 ifnz
|
|
0c6d 0008 iar $AR0
|
|
0c6e 8900 clr $ACC1
|
|
0c6f 1fe1 mrr $AC1.M, $AR1
|
|
0c70 191e lrri $AC0.M, @$AR0
|
|
0c71 0701 cmpis $ACC1, #0x01
|
|
0c72 0293 0c7b jle 0x0c7b
|
|
0c74 191a lrri $AX0.H, @$AR0
|
|
0c75 05fe addis $ACC1, #0xfe
|
|
0c76 005f loop $AC1.M
|
|
0c77 64a0 movr'ls $ACC0, $AX0.H : $AX0.H, $AC0.M
|
|
0c78 1b7e srri @$AR3, $AC0.M
|
|
0c79 1b7a srri @$AR3, $AX0.H
|
|
0c7a 02df ret
|
|
0c7b 1b7e srri @$AR3, $AC0.M
|
|
0c7c 02df ret
|
|
0c7d 0083 03e8 lri $AR3, #0x03e8
|
|
0c7f 191e lrri $AC0.M, @$AR0
|
|
0c80 191a lrri $AX0.H, @$AR0
|
|
0c81 1006 loopi #0x06
|
|
0c82 64a0 movr'ls $ACC0, $AX0.H : $AX0.H, $AC0.M
|
|
0c83 1b7e srri @$AR3, $AC0.M
|
|
0c84 1b7a srri @$AR3, $AX0.H
|
|
0c85 0080 03e8 lri $AR0, #0x03e8
|
|
0c87 8a00 m2
|
|
0c88 0088 0007 lri $WR0, #0x0007
|
|
0c8a 1150 0c97 bloopi #0x50, 0x0c97
|
|
0c8c 1c61 mrr $AR3, $AR1
|
|
0c8d 84c3 clrp'ld : $AX0.L, $AX1.L, @$AR3
|
|
0c8e f2c3 madd'ld $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
|
|
0c8f f2c3 madd'ld $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
|
|
0c90 f2c3 madd'ld $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
|
|
0c91 f2c3 madd'ld $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
|
|
0c92 f2c3 madd'ld $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
|
|
0c93 f2c3 madd'ld $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
|
|
0c94 f2c3 madd'ld $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
|
|
0c95 f200 madd $AX0.L, $AX0.H
|
|
0c96 fe00 movpz $ACC0
|
|
0c97 1b3e srri @$AR1, $AC0.M
|
|
0c98 0088 ffff lri $WR0, #0xffff
|
|
0c9a 8b00 m0
|
|
0c9b 02df ret
|
|
0c9c 8a00 m2
|
|
0c9d 05fe addis $ACC1, #0xfe
|
|
0c9e 0083 03e8 lri $AR3, #0x03e8
|
|
0ca0 191e lrri $AC0.M, @$AR0
|
|
0ca1 191a lrri $AX0.H, @$AR0
|
|
0ca2 005f loop $AC1.M
|
|
0ca3 64a0 movr'ls $ACC0, $AX0.H : $AX0.H, $AC0.M
|
|
0ca4 1b7e srri @$AR3, $AC0.M
|
|
0ca5 1b7a srri @$AR3, $AX0.H
|
|
0ca6 0080 03e8 lri $AR0, #0x03e8
|
|
0ca8 0501 addis $ACC1, #0x01
|
|
0ca9 1d1f mrr $WR0, $AC1.M
|
|
0caa 1150 0cb2 bloopi #0x50, 0x0cb2
|
|
0cac 1c61 mrr $AR3, $AR1
|
|
0cad 84c3 clrp'ld : $AX0.L, $AX1.L, @$AR3
|
|
0cae 005f loop $AC1.M
|
|
0caf f2c3 madd'ld $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
|
|
0cb0 f200 madd $AX0.L, $AX0.H
|
|
0cb1 fe00 movpz $ACC0
|
|
0cb2 1b3e srri @$AR1, $AC0.M
|
|
0cb3 0088 ffff lri $WR0, #0xffff
|
|
0cb5 8b00 m0
|
|
0cb6 02df ret
|
|
0cb7 0083 03e8 lri $AR3, #0x03e8
|
|
0cb9 191e lrri $AC0.M, @$AR0
|
|
0cba 191a lrri $AX0.H, @$AR0
|
|
0cbb 64a0 movr'ls $ACC0, $AX0.H : $AX0.H, $AC0.M
|
|
0cbc 64a0 movr'ls $ACC0, $AX0.H : $AX0.H, $AC0.M
|
|
0cbd 1b7e srri @$AR3, $AC0.M
|
|
0cbe 1b7a srri @$AR3, $AX0.H
|
|
0cbf 0080 03e8 lri $AR0, #0x03e8
|
|
0cc1 0088 0003 lri $WR0, #0x0003
|
|
0cc3 0085 0000 lri $IX1, #0x0000
|
|
0cc5 0087 0000 lri $IX3, #0x0000
|
|
0cc7 1fc2 mrr $AC0.M, $AR2
|
|
0cc8 195b lrri $AX1.H, @$AR2
|
|
0cc9 1959 lrri $AX1.L, @$AR2
|
|
0cca 195f lrri $AC1.M, @$AR2
|
|
0ccb 195a lrri $AX0.H, @$AR2
|
|
0ccc 1c5e mrr $AR2, $AC0.M
|
|
0ccd 1fda mrr $AC0.M, $AX0.H
|
|
0cce 1c61 mrr $AR3, $AR1
|
|
0ccf 8a00 m2
|
|
0cd0 8f00 set40
|
|
0cd1 191a lrri $AX0.H, @$AR0
|
|
0cd2 b850 mulx'l $AX0.H, $AX1.H : $AX0.H, @$AR0
|
|
0cd3 e250 maddx'l $AX0.H, $AX1.L : $AX0.H, @$AR0
|
|
0cd4 ea50 maddc'l $AC1.M, $AX1.L : $AX0.H, @$AR0
|
|
0cd5 e8e8 maddc'ldm $AC0.M, $AX1.L : $AX0.H, $AX1.L, @$AR0
|
|
0cd6 b650 mulxmv'l $AX0.H, $AX1.L, $ACC0 : $AX0.H, @$AR0
|
|
0cd7 1127 0ce2 bloopi #0x27, 0x0ce2
|
|
0cd9 e3a8 maddx'lsm $AX0.H, $AX1.H : $AX0.H, $AC0.M
|
|
0cda 197e lrri $AC0.M, @$AR3
|
|
0cdb e850 maddc'l $AC0.M, $AX1.L : $AX0.H, @$AR0
|
|
0cdc eaf8 maddc'ldm $AC1.M, $AX1.L : $AX0.H, $AX1.H, @$AR0
|
|
0cdd bf50 mulxmv'l $AX0.H, $AX1.H, $ACC1 : $AX0.H, @$AR0
|
|
0cde e2a9 maddx'lsm $AX0.H, $AX1.L : $AX0.H, $AC1.M
|
|
0cdf 197f lrri $AC1.M, @$AR3
|
|
0ce0 ea50 maddc'l $AC1.M, $AX1.L : $AX0.H, @$AR0
|
|
0ce1 e8e8 maddc'ldm $AC0.M, $AX1.L : $AX0.H, $AX1.L, @$AR0
|
|
0ce2 b650 mulxmv'l $AX0.H, $AX1.L, $ACC0 : $AX0.H, @$AR0
|
|
0ce3 e3a8 maddx'lsm $AX0.H, $AX1.H : $AX0.H, $AC0.M
|
|
0ce4 197e lrri $AC0.M, @$AR3
|
|
0ce5 e850 maddc'l $AC0.M, $AX1.L : $AX0.H, @$AR0
|
|
0ce6 eaf8 maddc'ldm $AC1.M, $AX1.L : $AX0.H, $AX1.H, @$AR0
|
|
0ce7 bf00 mulxmv $AX0.H, $AX1.H, $ACC1
|
|
0ce8 1bff srrn @$AR3, $AC1.M
|
|
0ce9 197f lrri $AC1.M, @$AR3
|
|
0cea 8e00 set16
|
|
0ceb 8b00 m0
|
|
0cec 0088 ffff lri $WR0, #0xffff
|
|
0cee 1b5b srri @$AR2, $AX1.H
|
|
0cef 1b59 srri @$AR2, $AX1.L
|
|
0cf0 1b5f srri @$AR2, $AC1.M
|
|
0cf1 1b5e srri @$AR2, $AC0.M
|
|
0cf2 02df ret
|
|
0cf3 0083 03e8 lri $AR3, #0x03e8
|
|
0cf5 191e lrri $AC0.M, @$AR0
|
|
0cf6 191a lrri $AX0.H, @$AR0
|
|
0cf7 64a0 movr'ls $ACC0, $AX0.H : $AX0.H, $AC0.M
|
|
0cf8 64a0 movr'ls $ACC0, $AX0.H : $AX0.H, $AC0.M
|
|
0cf9 1b7e srri @$AR3, $AC0.M
|
|
0cfa 1b7a srri @$AR3, $AX0.H
|
|
0cfb 0080 03e8 lri $AR0, #0x03e8
|
|
0cfd 0088 0003 lri $WR0, #0x0003
|
|
0cff 0085 0000 lri $IX1, #0x0000
|
|
0d01 0087 0000 lri $IX3, #0x0000
|
|
0d03 1fc2 mrr $AC0.M, $AR2
|
|
0d04 195b lrri $AX1.H, @$AR2
|
|
0d05 1959 lrri $AX1.L, @$AR2
|
|
0d06 195f lrri $AC1.M, @$AR2
|
|
0d07 195a lrri $AX0.H, @$AR2
|
|
0d08 1c5e mrr $AR2, $AC0.M
|
|
0d09 1fda mrr $AC0.M, $AX0.H
|
|
0d0a 1c61 mrr $AR3, $AR1
|
|
0d0b 8a00 m2
|
|
0d0c 8f00 set40
|
|
0d0d 191a lrri $AX0.H, @$AR0
|
|
0d0e b800 mulx $AX0.H, $AX1.H
|
|
0d0f e350 maddx'l $AX0.H, $AX1.H : $AX0.H, @$AR0
|
|
0d10 e250 maddx'l $AX0.H, $AX1.L : $AX0.H, @$AR0
|
|
0d11 ea00 maddc $AC1.M, $AX1.L
|
|
0d12 ea50 maddc'l $AC1.M, $AX1.L : $AX0.H, @$AR0
|
|
0d13 e877 maddc'ln $AC0.M, $AX1.L : $AC0.M, @$AR3
|
|
0d14 ece8 msubc'ldm $AC0.M, $AX1.L : $AX0.H, $AX1.L, @$AR0
|
|
0d15 b200 mulxmvz $AX0.H, $AX1.L, $ACC0
|
|
0d16 1127 0d27 bloopi #0x27, 0x0d27
|
|
0d18 e250 maddx'l $AX0.H, $AX1.L : $AX0.H, @$AR0
|
|
0d19 e3a8 maddx'lsm $AX0.H, $AX1.H : $AX0.H, $AC0.M
|
|
0d1a 197e lrri $AC0.M, @$AR3
|
|
0d1b e800 maddc $AC0.M, $AX1.L
|
|
0d1c e850 maddc'l $AC0.M, $AX1.L : $AX0.H, @$AR0
|
|
0d1d ea7f maddc'ln $AC1.M, $AX1.L : $AC1.M, @$AR3
|
|
0d1e eef8 msubc'ldm $AC1.M, $AX1.L : $AX0.H, $AX1.H, @$AR0
|
|
0d1f bb00 mulxmvz $AX0.H, $AX1.H, $ACC1
|
|
0d20 e350 maddx'l $AX0.H, $AX1.H : $AX0.H, @$AR0
|
|
0d21 e2a9 maddx'lsm $AX0.H, $AX1.L : $AX0.H, $AC1.M
|
|
0d22 197f lrri $AC1.M, @$AR3
|
|
0d23 ea00 maddc $AC1.M, $AX1.L
|
|
0d24 ea50 maddc'l $AC1.M, $AX1.L : $AX0.H, @$AR0
|
|
0d25 e877 maddc'ln $AC0.M, $AX1.L : $AC0.M, @$AR3
|
|
0d26 ece8 msubc'ldm $AC0.M, $AX1.L : $AX0.H, $AX1.L, @$AR0
|
|
0d27 b200 mulxmvz $AX0.H, $AX1.L, $ACC0
|
|
0d28 e250 maddx'l $AX0.H, $AX1.L : $AX0.H, @$AR0
|
|
0d29 e3a8 maddx'lsm $AX0.H, $AX1.H : $AX0.H, $AC0.M
|
|
0d2a 197e lrri $AC0.M, @$AR3
|
|
0d2b e800 maddc $AC0.M, $AX1.L
|
|
0d2c e850 maddc'l $AC0.M, $AX1.L : $AX0.H, @$AR0
|
|
0d2d ea7f maddc'ln $AC1.M, $AX1.L : $AC1.M, @$AR3
|
|
0d2e eef8 msubc'ldm $AC1.M, $AX1.L : $AX0.H, $AX1.H, @$AR0
|
|
0d2f bb00 mulxmvz $AX0.H, $AX1.H, $ACC1
|
|
0d30 1bff srrn @$AR3, $AC1.M
|
|
0d31 197f lrri $AC1.M, @$AR3
|
|
0d32 8e00 set16
|
|
0d33 8b00 m0
|
|
0d34 0088 ffff lri $WR0, #0xffff
|
|
0d36 1b5b srri @$AR2, $AX1.H
|
|
0d37 1b59 srri @$AR2, $AX1.L
|
|
0d38 1b5f srri @$AR2, $AC1.M
|
|
0d39 1b5e srri @$AR2, $AC0.M
|
|
0d3a 02df ret
|
|
0d3b 0eff lris $AC0.M, #0xff
|
|
0d3c 00fe 03f2 sr @0x03f2, $AC0.M
|
|
0d3e 8100 clr $ACC0
|
|
0d3f 00fe 03f0 sr @0x03f0, $AC0.M
|
|
0d41 00fe 03f6 sr @0x03f6, $AC0.M
|
|
0d43 009e 0100 lri $AC0.M, #0x0100
|
|
0d45 00fe 03f7 sr @0x03f7, $AC0.M
|
|
0d47 00da 03f7 lr $AX0.H, @0x03f7
|
|
0d49 009e 8000 lri $AC0.M, #0x8000
|
|
0d4b 5400 subr $ACC0, $AX0.H
|
|
0d4c 00fe 03f5 sr @0x03f5, $AC0.M
|
|
0d4e 0e30 lris $AC0.M, #0x30
|
|
0d4f 00fe 03f3 sr @0x03f3, $AC0.M
|
|
0d51 0e10 lris $AC0.M, #0x10
|
|
0d52 00fe 03f4 sr @0x03f4, $AC0.M
|
|
0d54 009e 0096 lri $AC0.M, #0x0096
|
|
0d56 00fe 03f1 sr @0x03f1, $AC0.M
|
|
0d58 02df ret
|
|
0d59 0080 0a00 lri $AR0, #0x0a00
|
|
0d5b 8100 clr $ACC0
|
|
0d5c 00de 03f0 lr $AC0.M, @0x03f0
|
|
0d5e 8900 clr $ACC1
|
|
0d5f b100 tst $ACC0
|
|
0d60 0275 ifz
|
|
0d61 0550 addis $ACC1, #0x50
|
|
0d62 00ff 03f0 sr @0x03f0, $AC1.M
|
|
0d64 0200 0a60 addi $AC0.M, #0x0a60
|
|
0d66 1c7e mrr $AR3, $AC0.M
|
|
0d67 0f4e lris $AC1.M, #0x4e
|
|
0d68 02bf 012b call 0x012b
|
|
0d6a 02df ret
|
|
0d6b 00de 03f1 lr $AC0.M, @0x03f1
|
|
0d6d 0200 0a60 addi $AC0.M, #0x0a60
|
|
0d6f 1c7e mrr $AR3, $AC0.M
|
|
0d70 8100 clr $ACC0
|
|
0d71 8900 clr $ACC1
|
|
0d72 009f 00a0 lri $AC1.M, #0x00a0
|
|
0d74 00de 03f1 lr $AC0.M, @0x03f1
|
|
0d76 5d00 sub $ACC1, $ACC0
|
|
0d77 0e50 lris $AC0.M, #0x50
|
|
0d78 0750 cmpis $ACC1, #0x50
|
|
0d79 0270 ifge
|
|
0d7a 5d00 sub $ACC1, $ACC0
|
|
0d7b 00da 03f2 lr $AX0.H, @0x03f2
|
|
0d7d 8600 tstaxh $AX0.H
|
|
0d7e 0290 0d9c jge 0x0d9c
|
|
0d80 00de 03f3 lr $AC0.M, @0x03f3
|
|
0d82 5c00 sub $ACC0, $ACC1
|
|
0d83 0293 0d87 jle 0x0d87
|
|
0d85 029f 0da1 jmp 0x0da1
|
|
0d87 00db 03f7 lr $AX1.H, @0x03f7
|
|
0d89 009e 8000 lri $AC0.M, #0x8000
|
|
0d8b 4600 addr $ACC0, $AX1.H
|
|
0d8c 029f 0d93 jmp 0x0d93
|
|
0d8e 00db 03f7 lr $AX1.H, @0x03f7
|
|
0d90 009e 8000 lri $AC0.M, #0x8000
|
|
0d92 5600 subr $ACC0, $AX1.H
|
|
0d93 00fe 03f5 sr @0x03f5, $AC0.M
|
|
0d95 1fda mrr $AC0.M, $AX0.H
|
|
0d96 7c00 neg $ACC0
|
|
0d97 1f5e mrr $AX0.H, $AC0.M
|
|
0d98 00fe 03f2 sr @0x03f2, $AC0.M
|
|
0d9a 029f 0da1 jmp 0x0da1
|
|
0d9c 00de 03f4 lr $AC0.M, @0x03f4
|
|
0d9e 5d00 sub $ACC1, $ACC0
|
|
0d9f 0293 0d8e jle 0x0d8e
|
|
0da1 8900 clr $ACC1
|
|
0da2 00dd 03f5 lr $AC1.L, @0x03f5
|
|
0da4 1501 lsl $ACC1, #1
|
|
0da5 8100 clr $ACC0
|
|
0da6 00dc 03f6 lr $AC0.L, @0x03f6
|
|
0da8 008b 009f lri $WR3, #0x009f
|
|
0daa 0080 0a00 lri $AR0, #0x0a00
|
|
0dac 0900 lris $AX1.L, #0x00
|
|
0dad 1150 0db4 bloopi #0x50, 0x0db4
|
|
0daf 1878 lrr $AX0.L, @$AR3
|
|
0db0 4c00 add $ACC0, $ACC1
|
|
0db1 1cfe mrr $IX3, $AC0.M
|
|
0db2 001f addarn $AR3, $IX3
|
|
0db3 1fd9 mrr $AC0.M, $AX1.L
|
|
0db4 1b18 srri @$AR0, $AX0.L
|
|
0db5 009f 0a60 lri $AC1.M, #0x0a60
|
|
0db7 1fc3 mrr $AC0.M, $AR3
|
|
0db8 5c00 sub $ACC0, $ACC1
|
|
0db9 00fe 03f1 sr @0x03f1, $AC0.M
|
|
0dbb 00fc 03f6 sr @0x03f6, $AC0.L
|
|
0dbd 008b ffff lri $WR3, #0xffff
|
|
0dbf 02df ret
|
|
0dc0 0f50 lris $AC1.M, #0x50
|
|
0dc1 0080 0a00 lri $AR0, #0x0a00
|
|
0dc3 0083 0d60 lri $AR3, #0x0d60
|
|
0dc5 0098 3fff lri $AX0.L, #0x3fff
|
|
0dc7 02bf 0145 call 0x0145
|
|
0dc9 0f50 lris $AC1.M, #0x50
|
|
0dca 0080 0a00 lri $AR0, #0x0a00
|
|
0dcc 0083 0d00 lri $AR3, #0x0d00
|
|
0dce 0098 3fff lri $AX0.L, #0x3fff
|
|
0dd0 02bf 0145 call 0x0145
|
|
0dd2 02df ret
|
|
0dd3 b900 tst $ACC1
|
|
0dd4 0294 0dd9 jnz 0x0dd9
|
|
0dd6 6800 movax $ACC0, $AX0.L
|
|
0dd7 b100 tst $ACC0
|
|
0dd8 02d5 retz
|
|
0dd9 1c23 mrr $AR1, $AR3
|
|
0dda 197e lrri $AC0.M, @$AR3
|
|
0ddb 191b lrri $AX1.H, @$AR0
|
|
0ddc d858 mulc'l $AC1.M, $AX1.H : $AX1.H, @$AR0
|
|
0ddd 1120 0de3 bloopi #0x20, 0x0de3
|
|
0ddf dcd3 mulcac'ld $AC1.M, $AX1.H, $ACC0 : $AX0.L, $AX1.H, @$AR3
|
|
0de0 6231 movr's $ACC0, $AX1.L : @$AR1, $AC0.M
|
|
0de1 dcd3 mulcac'ld $AC1.M, $AX1.H, $ACC0 : $AX0.L, $AX1.H, @$AR3
|
|
0de2 6231 movr's $ACC0, $AX1.L : @$AR1, $AC0.M
|
|
0de3 4900 addax $ACC1, $AX0.L
|
|
0de4 1108 0de9 bloopi #0x08, 0x0de9
|
|
0de6 dcd3 mulcac'ld $AC1.M, $AX1.H, $ACC0 : $AX0.L, $AX1.H, @$AR3
|
|
0de7 6231 movr's $ACC0, $AX1.L : @$AR1, $AC0.M
|
|
0de8 dcd3 mulcac'ld $AC1.M, $AX1.H, $ACC0 : $AX0.L, $AX1.H, @$AR3
|
|
0de9 6231 movr's $ACC0, $AX1.L : @$AR1, $AC0.M
|
|
0dea 02df ret
|
|
0deb 8f00 set40
|
|
0dec 8d00 set15
|
|
0ded 1c03 mrr $AR0, $AR3
|
|
0dee 00d9 038e lr $AX1.L, @0x038e
|
|
0df0 0b04 lris $AX1.H, #0x04
|
|
0df1 197a lrri $AX0.H, @$AR3
|
|
0df2 b053 mulx'l $AX0.H, $AX1.L : $AX0.H, @$AR3
|
|
0df3 b600 mulxmv $AX0.H, $AX1.L, $ACC0
|
|
0df4 1128 0df9 bloopi #0x28, 0x0df9
|
|
0df6 3ad3 orr'ld $AC0.M, $AX1.H : $AX0.L, $AX1.H, @$AR3
|
|
0df7 b630 mulxmv's $AX0.H, $AX1.L, $ACC0 : @$AR0, $AC0.M
|
|
0df8 3ad3 orr'ld $AC0.M, $AX1.H : $AX0.L, $AX1.H, @$AR3
|
|
0df9 b630 mulxmv's $AX0.H, $AX1.L, $ACC0 : @$AR0, $AC0.M
|
|
0dfa 8c00 clr15
|
|
0dfb 8e00 set16
|
|
0dfc 02df ret
|
|
0dfd 00da 0485 lr $AX0.H, @0x0485
|
|
0dff 8600 tstaxh $AX0.H
|
|
0e00 0295 0e0e jz 0x0e0e
|
|
0e02 8100 clr $ACC0
|
|
0e03 00de 042a lr $AC0.M, @0x042a
|
|
0e05 147f lsr $ACC0, #-1
|
|
0e06 00fe 042b sr @0x042b, $AC0.M
|
|
0e08 b100 tst $ACC0
|
|
0e09 0294 0e0e jnz 0x0e0e
|
|
0e0b 0a01 lris $AX0.H, #0x01
|
|
0e0c 00fa 0401 sr @0x0401, $AX0.H
|
|
0e0e 8f00 set40
|
|
0e0f 8100 clr $ACC0
|
|
0e10 00de 0428 lr $AC0.M, @0x0428
|
|
0e12 1478 lsr $ACC0, #-8
|
|
0e13 00df 0428 lr $AC1.M, @0x0428
|
|
0e15 0340 007f andi $AC1.M, #0x007f
|
|
0e17 1f1e mrr $AX0.L, $AC0.M
|
|
0e18 1f5f mrr $AX0.H, $AC1.M
|
|
0e19 0220 007f xori $ACC0, #0x007f
|
|
0e1b 1f3e mrr $AX1.L, $AC0.M
|
|
0e1c 0320 007f xori $ACC1, #0x007f
|
|
0e1e 1f7f mrr $AX1.H, $AC1.M
|
|
0e1f 8100 clr $ACC0
|
|
0e20 8900 clr $ACC1
|
|
0e21 009f 0200 lri $AC1.M, #0x0200
|
|
0e23 1fd8 mrr $AC0.M, $AX0.L
|
|
0e24 4c00 add $ACC0, $ACC1
|
|
0e25 1c1e mrr $AR0, $AC0.M
|
|
0e26 1818 lrr $AX0.L, @$AR0
|
|
0e27 1fda mrr $AC0.M, $AX0.H
|
|
0e28 4c00 add $ACC0, $ACC1
|
|
0e29 1c1e mrr $AR0, $AC0.M
|
|
0e2a 181a lrr $AX0.H, @$AR0
|
|
0e2b 1fd9 mrr $AC0.M, $AX1.L
|
|
0e2c 4c00 add $ACC0, $ACC1
|
|
0e2d 1c1e mrr $AR0, $AC0.M
|
|
0e2e 1819 lrr $AX1.L, @$AR0
|
|
0e2f 1fdb mrr $AC0.M, $AX1.H
|
|
0e30 4c00 add $ACC0, $ACC1
|
|
0e31 1c1e mrr $AR0, $AC0.M
|
|
0e32 181b lrr $AX1.H, @$AR0
|
|
0e33 8a00 m2
|
|
0e34 0080 0b00 lri $AR0, #0x0b00
|
|
0e36 9800 mul $AX1.L, $AX1.H
|
|
0e37 ae00 mulxmv $AX0.L, $AX1.H, $ACC0
|
|
0e38 b630 mulxmv's $AX0.H, $AX1.L, $ACC0 : @$AR0, $AC0.M
|
|
0e39 9630 mulmv's $AX0.L, $AX0.H, $ACC0 : @$AR0, $AC0.M
|
|
0e3a 6e30 movp's $ACC0 : @$AR0, $AC0.M
|
|
0e3b 1b1e srri @$AR0, $AC0.M
|
|
0e3c 8b00 m0
|
|
0e3d 0080 0b00 lri $AR0, #0x0b00
|
|
0e3f 0081 0b04 lri $AR1, #0x0b04
|
|
0e41 00da 042a lr $AX0.H, @0x042a
|
|
0e43 02bf 0e8e call 0x0e8e
|
|
0e45 0081 0b08 lri $AR1, #0x0b08
|
|
0e47 0080 0b00 lri $AR0, #0x0b00
|
|
0e49 00da 042a lr $AX0.H, @0x042a
|
|
0e4b 00de 0429 lr $AC0.M, @0x0429
|
|
0e4d 8a00 m2
|
|
0e4e c000 mulc $AC0.M, $AX0.H
|
|
0e4f 8b00 m0
|
|
0e50 6e00 movp $ACC0
|
|
0e51 1f5e mrr $AX0.H, $AC0.M
|
|
0e52 02bf 0e8e call 0x0e8e
|
|
0e54 0080 0b00 lri $AR0, #0x0b00
|
|
0e56 0081 0b0c lri $AR1, #0x0b0c
|
|
0e58 8100 clr $ACC0
|
|
0e59 8900 clr $ACC1
|
|
0e5a 00de 042b lr $AC0.M, @0x042b
|
|
0e5c 00df 042a lr $AC1.M, @0x042a
|
|
0e5e 00fe 042a sr @0x042a, $AC0.M
|
|
0e60 5c00 sub $ACC0, $ACC1
|
|
0e61 1f5e mrr $AX0.H, $AC0.M
|
|
0e62 02bf 0e99 call 0x0e99
|
|
0e64 0080 0b0c lri $AR0, #0x0b0c
|
|
0e66 0081 0b10 lri $AR1, #0x0b10
|
|
0e68 00da 0429 lr $AX0.H, @0x0429
|
|
0e6a 02bf 0e8e call 0x0e8e
|
|
0e6c 0081 0b04 lri $AR1, #0x0b04
|
|
0e6e 0082 0b0c lri $AR2, #0x0b0c
|
|
0e70 0083 0ea7 lri $AR3, #0x0ea7
|
|
0e72 1108 0e8b bloopi #0x08, 0x0e8b
|
|
0e74 195f lrri $AC1.M, @$AR2
|
|
0e75 15fb asr $ACC1, #-5
|
|
0e76 1f1d mrr $AX0.L, $AC1.L
|
|
0e77 1f5f mrr $AX0.H, $AC1.M
|
|
0e78 193f lrri $AC1.M, @$AR1
|
|
0e79 00e1 0b24 sr @0x0b24, $AR1
|
|
0e7b 00e2 0b25 sr @0x0b25, $AR2
|
|
0e7d 021b ilrri $AC0.M, @$AR3
|
|
0e7e 00e3 0b26 sr @0x0b26, $AR3
|
|
0e80 1c7e mrr $AR3, $AC0.M
|
|
0e81 00c0 038f lr $AR0, @0x038f
|
|
0e83 02bf 0dd3 call 0x0dd3
|
|
0e85 00c1 0b24 lr $AR1, @0x0b24
|
|
0e87 00c2 0b25 lr $AR2, @0x0b25
|
|
0e89 00c3 0b26 lr $AR3, @0x0b26
|
|
0e8b 0000 nop
|
|
0e8c 8e00 set16
|
|
0e8d 02df ret
|
|
0e8e 8a00 m2
|
|
0e8f 191f lrri $AC1.M, @$AR0
|
|
0e90 d078 mulc'l $AC1.M, $AX0.H : $AC1.M, @$AR0
|
|
0e91 d678 mulcmv'l $AC1.M, $AX0.H, $ACC0 : $AC1.M, @$AR0
|
|
0e92 d631 mulcmv's $AC1.M, $AX0.H, $ACC0 : @$AR1, $AC0.M
|
|
0e93 191f lrri $AC1.M, @$AR0
|
|
0e94 d631 mulcmv's $AC1.M, $AX0.H, $ACC0 : @$AR1, $AC0.M
|
|
0e95 6e31 movp's $ACC0 : @$AR1, $AC0.M
|
|
0e96 1b3e srri @$AR1, $AC0.M
|
|
0e97 8b00 m0
|
|
0e98 02df ret
|
|
0e99 8a00 m2
|
|
0e9a 8d00 set15
|
|
0e9b 1f7e mrr $AX1.H, $AC0.M
|
|
0e9c 1918 lrri $AX0.L, @$AR0
|
|
0e9d a840 mulx'l $AX0.L, $AX1.H : $AX0.L, @$AR0
|
|
0e9e ae40 mulxmv'l $AX0.L, $AX1.H, $ACC0 : $AX0.L, @$AR0
|
|
0e9f ae31 mulxmv's $AX0.L, $AX1.H, $ACC0 : @$AR1, $AC0.M
|
|
0ea0 1918 lrri $AX0.L, @$AR0
|
|
0ea1 ae31 mulxmv's $AX0.L, $AX1.H, $ACC0 : @$AR1, $AC0.M
|
|
0ea2 6e31 movp's $ACC0 : @$AR1, $AC0.M
|
|
0ea3 1b3e srri @$AR1, $AC0.M
|
|
0ea4 8c00 clr15
|
|
0ea5 8b00 m0
|
|
0ea6 02df ret
|
|
0ea7 0d00 lris $AC1.L, #0x00
|
|
0ea8 0d60 lris $AC1.L, #0x60
|
|
0ea9 0f40 lris $AC1.M, #0x40
|
|
0eaa 0ca0 lris $AC0.L, #0xa0
|
|
0eab 0e80 lris $AC0.M, #0x80
|
|
0eac 0ee0 lris $AC0.M, #0xe0
|
|
0ead 0be0 lris $AX1.H, #0xe0
|
|
0eae 0c40 lris $AC0.L, #0x40
|
|
0eaf 00f9 0361 sr @0x0361, $AX1.L
|
|
0eb1 1fc0 mrr $AC0.M, $AR0
|
|
0eb2 0200 fffc addi $AC0.M, #0xfffc
|
|
0eb4 1c1e mrr $AR0, $AC0.M
|
|
0eb5 1c5e mrr $AR2, $AC0.M
|
|
0eb6 0083 043c lri $AR3, #0x043c
|
|
0eb8 197e lrri $AC0.M, @$AR3
|
|
0eb9 197f lrri $AC1.M, @$AR3
|
|
0eba 80a2 nx'sl : $AC0.M, $AX0.H
|
|
0ebb 64a3 movr'sl $ACC0, $AX0.H : $AC1.M, $AX0.H
|
|
0ebc 6530 movr's $ACC1, $AX0.H : @$AR0, $AC0.M
|
|
0ebd 1b1f srri @$AR0, $AC1.M
|
|
0ebe 1c02 mrr $AR0, $AR2
|
|
0ebf 8100 clr $ACC0
|
|
0ec0 00de 0402 lr $AC0.M, @0x0402
|
|
0ec2 00fe 0362 sr @0x0362, $AC0.M
|
|
0ec4 1474 lsr $ACC0, #-12
|
|
0ec5 1f7e mrr $AX1.H, $AC0.M
|
|
0ec6 1f3c mrr $AX1.L, $AC0.L
|
|
0ec7 8900 clr $ACC1
|
|
0ec8 00dd 0430 lr $AC1.L, @0x0430
|
|
0eca 1504 lsl $ACC1, #4
|
|
0ecb 0604 cmpis $ACC0, #0x04
|
|
0ecc 0290 0f23 jge 0x0f23
|
|
0ece 1fdd mrr $AC0.M, $AC1.L
|
|
0ecf 0082 02b0 lri $AR2, #0x02b0
|
|
0ed1 1050 loopi #0x50
|
|
0ed2 4b2a addax's $ACC1, $AX1.L : @$AR2, $AC1.L
|
|
0ed3 1fbe mrr $AC1.L, $AC0.M
|
|
0ed4 00fe 0360 sr @0x0360, $AC0.M
|
|
0ed6 8900 clr $ACC1
|
|
0ed7 1fbe mrr $AC1.L, $AC0.M
|
|
0ed8 0af8 lris $AX0.H, #0xf8
|
|
0ed9 009b 00fc lri $AX1.H, #0x00fc
|
|
0edb 00d8 0361 lr $AX0.L, @0x0361
|
|
0edd 0082 02b0 lri $AR2, #0x02b0
|
|
0edf 0083 02b0 lri $AR3, #0x02b0
|
|
0ee1 195e lrri $AC0.M, @$AR2
|
|
0ee2 3480 andr'ls $AC0.M, $AX0.H : $AX0.L, $AC0.M
|
|
0ee3 1128 0ee8 bloopi #0x28, 0x0ee8
|
|
0ee5 367a andr'l $AC0.M, $AX1.H : $AC1.M, @$AR2
|
|
0ee6 35b3 andr'sl $AC1.M, $AX0.H : $AC1.M, $AX1.H
|
|
0ee7 3772 andr'l $AC1.M, $AX1.H : $AC0.M, @$AR2
|
|
0ee8 34bb andr'slm $AC0.M, $AX0.H : $AC1.M, $AX1.H
|
|
0ee9 8a00 m2
|
|
0eea 0082 02b0 lri $AR2, #0x02b0
|
|
0eec 00dd 0430 lr $AC1.L, @0x0430
|
|
0eee 1504 lsl $ACC1, #4
|
|
0eef 1fe0 mrr $AC1.M, $AR0
|
|
0ef0 8100 clr $ACC0
|
|
0ef1 00de 0362 lr $AC0.M, @0x0362
|
|
0ef3 1474 lsr $ACC0, #-12
|
|
0ef4 1f7e mrr $AX1.H, $AC0.M
|
|
0ef5 1f3c mrr $AX1.L, $AC0.L
|
|
0ef6 8f00 set40
|
|
0ef7 1943 lrri $AR3, @$AR2
|
|
0ef8 4bc3 addax'ld $ACC1, $AX1.L : $AX0.L, $AX1.L, @$AR3
|
|
0ef9 90c3 mul'ld $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
|
|
0efa f2c3 madd'ld $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
|
|
0efb f2c3 madd'ld $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
|
|
0efc f200 madd $AX0.L, $AX0.H
|
|
0efd fe00 movpz $ACC0
|
|
0efe 1c1f mrr $AR0, $AC1.M
|
|
0eff 1943 lrri $AR3, @$AR2
|
|
0f00 4bc3 addax'ld $ACC1, $AX1.L : $AX0.L, $AX1.L, @$AR3
|
|
0f01 90c3 mul'ld $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
|
|
0f02 114e 0f0a bloopi #0x4e, 0x0f0a
|
|
0f04 f2c3 madd'ld $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
|
|
0f05 f2c3 madd'ld $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
|
|
0f06 f231 madd's $AX0.L, $AX0.H : @$AR1, $AC0.M
|
|
0f07 1c1f mrr $AR0, $AC1.M
|
|
0f08 1943 lrri $AR3, @$AR2
|
|
0f09 4bc3 addax'ld $ACC1, $AX1.L : $AX0.L, $AX1.L, @$AR3
|
|
0f0a 92c3 mulmvz'ld $AX0.L, $AX0.H, $ACC0 : $AX0.L, $AX1.L, @$AR3
|
|
0f0b f2c3 madd'ld $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
|
|
0f0c f2c3 madd'ld $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
|
|
0f0d f231 madd's $AX0.L, $AX0.H : @$AR1, $AC0.M
|
|
0f0e fe00 movpz $ACC0
|
|
0f0f 1b3e srri @$AR1, $AC0.M
|
|
0f10 8b00 m0
|
|
0f11 8e00 set16
|
|
0f12 00fe 0433 sr @0x0433, $AC0.M
|
|
0f14 1c1f mrr $AR0, $AC1.M
|
|
0f15 150c lsl $ACC1, #12
|
|
0f16 0340 0fff andi $AC1.M, #0x0fff
|
|
0f18 00ff 0430 sr @0x0430, $AC1.M
|
|
0f1a 0083 043c lri $AR3, #0x043c
|
|
0f1c 191e lrri $AC0.M, @$AR0
|
|
0f1d 191f lrri $AC1.M, @$AR0
|
|
0f1e 80a0 nx'ls : $AX0.H, $AC0.M
|
|
0f1f 64a1 movr'ls $ACC0, $AX0.H : $AX0.H, $AC1.M
|
|
0f20 6533 movr's $ACC1, $AX0.H : @$AR3, $AC0.M
|
|
0f21 1b7f srri @$AR3, $AC1.M
|
|
0f22 02df ret
|
|
0f23 1fe0 mrr $AC1.M, $AR0
|
|
0f24 1c1f mrr $AR0, $AC1.M
|
|
0f25 1128 0f2c bloopi #0x28, 0x0f2c
|
|
0f27 4b70 addax'l $ACC1, $AX1.L : $AC0.M, @$AR0
|
|
0f28 1b3e srri @$AR1, $AC0.M
|
|
0f29 1c1f mrr $AR0, $AC1.M
|
|
0f2a 4b70 addax'l $ACC1, $AX1.L : $AC0.M, @$AR0
|
|
0f2b 1b3e srri @$AR1, $AC0.M
|
|
0f2c 1c1f mrr $AR0, $AC1.M
|
|
0f2d 029f 0f12 jmp 0x0f12
|
|
0f2f 0083 0520 lri $AR3, #0x0520
|
|
0f31 00de 0433 lr $AC0.M, @0x0433
|
|
0f33 1050 loopi #0x50
|
|
0f34 1b7e srri @$AR3, $AC0.M
|
|
0f35 029f 0386 jmp 0x0386
|
|
0f37 1c20 mrr $AR1, $AR0
|
|
0f38 185f lrr $AC1.M, @$AR2
|
|
0f39 1f7f mrr $AX1.H, $AC1.M
|
|
0f3a 193a lrri $AX0.H, @$AR1
|
|
0f3b 6400 movr $ACC0, $AX0.H
|
|
0f3c 0078 0f41 bloop $AX0.L, 0x0f41
|
|
0f3e 5659 subr'l $ACC0, $AX1.H : $AX1.H, @$AR1
|
|
0f3f 6730 movr's $ACC1, $AX1.H : @$AR0, $AC0.M
|
|
0f40 5551 subr'l $ACC1, $AX0.H : $AX0.H, @$AR1
|
|
0f41 6438 movr's $ACC0, $AX0.H : @$AR0, $AC1.M
|
|
0f42 1a5b srr @$AR2, $AX1.H
|
|
0f43 02df ret
|
|
0f44 0098 8240 lri $AX0.L, #0x8240
|
|
0f46 00f8 04e8 sr @0x04e8, $AX0.L
|
|
0f48 0098 7fff lri $AX0.L, #0x7fff
|
|
0f4a 00f8 04e9 sr @0x04e9, $AX0.L
|
|
0f4c 0098 7dbf lri $AX0.L, #0x7dbf
|
|
0f4e 00f8 04ea sr @0x04ea, $AX0.L
|
|
0f50 0098 843f lri $AX0.L, #0x843f
|
|
0f52 00f8 04eb sr @0x04eb, $AX0.L
|
|
0f54 0098 b23b lri $AX0.L, #0xb23b
|
|
0f56 00f8 04f0 sr @0x04f0, $AX0.L
|
|
0f58 0098 7fff lri $AX0.L, #0x7fff
|
|
0f5a 00f8 04f1 sr @0x04f1, $AX0.L
|
|
0f5c 0098 4dc4 lri $AX0.L, #0x4dc4
|
|
0f5e 00f8 04f2 sr @0x04f2, $AX0.L
|
|
0f60 0098 d808 lri $AX0.L, #0xd808
|
|
0f62 00f8 04f3 sr @0x04f3, $AX0.L
|
|
0f64 0098 0000 lri $AX0.L, #0x0000
|
|
0f66 0080 04ec lri $AR0, #0x04ec
|
|
0f68 1004 loopi #0x04
|
|
0f69 1b18 srri @$AR0, $AX0.L
|
|
0f6a 0080 04f4 lri $AR0, #0x04f4
|
|
0f6c 1004 loopi #0x04
|
|
0f6d 1b18 srri @$AR0, $AX0.L
|
|
0f6e 02df ret
|
|
0f6f 0080 0f40 lri $AR0, #0x0f40
|
|
0f71 0083 0b00 lri $AR3, #0x0b00
|
|
0f73 8900 clr $ACC1
|
|
0f74 0f50 lris $AC1.M, #0x50
|
|
0f75 0098 6784 lri $AX0.L, #0x6784
|
|
0f77 02bf 0154 call 0x0154
|
|
0f79 0080 04e8 lri $AR0, #0x04e8
|
|
0f7b 0082 04ec lri $AR2, #0x04ec
|
|
0f7d 0081 0b00 lri $AR1, #0x0b00
|
|
0f7f 8900 clr $ACC1
|
|
0f80 0f50 lris $AC1.M, #0x50
|
|
0f81 0080 0b00 lri $AR0, #0x0b00
|
|
0f83 0083 0d00 lri $AR3, #0x0d00
|
|
0f85 0098 7fff lri $AX0.L, #0x7fff
|
|
0f87 02bf 0145 call 0x0145
|
|
0f89 8900 clr $ACC1
|
|
0f8a 0f50 lris $AC1.M, #0x50
|
|
0f8b 0080 0b00 lri $AR0, #0x0b00
|
|
0f8d 0083 0d60 lri $AR3, #0x0d60
|
|
0f8f 0098 b820 lri $AX0.L, #0xb820
|
|
0f91 02bf 0145 call 0x0145
|
|
0f93 0080 0ca0 lri $AR0, #0x0ca0
|
|
0f95 0083 0b00 lri $AR3, #0x0b00
|
|
0f97 8900 clr $ACC1
|
|
0f98 0f50 lris $AC1.M, #0x50
|
|
0f99 0098 6784 lri $AX0.L, #0x6784
|
|
0f9b 02bf 0154 call 0x0154
|
|
0f9d 0080 04e8 lri $AR0, #0x04e8
|
|
0f9f 0082 04f4 lri $AR2, #0x04f4
|
|
0fa1 0081 0b00 lri $AR1, #0x0b00
|
|
0fa3 8900 clr $ACC1
|
|
0fa4 0f50 lris $AC1.M, #0x50
|
|
0fa5 0080 0b00 lri $AR0, #0x0b00
|
|
0fa7 0083 0d00 lri $AR3, #0x0d00
|
|
0fa9 0098 47e0 lri $AX0.L, #0x47e0
|
|
0fab 02bf 0145 call 0x0145
|
|
0fad 8900 clr $ACC1
|
|
0fae 0f50 lris $AC1.M, #0x50
|
|
0faf 0080 0b00 lri $AR0, #0x0b00
|
|
0fb1 0083 0d60 lri $AR3, #0x0d60
|
|
0fb3 0098 8001 lri $AX0.L, #0x8001
|
|
0fb5 02bf 0145 call 0x0145
|
|
0fb7 02df ret
|
|
0fb8 0000 nop
|
|
0fb9 0000 nop
|
|
0fba 0000 nop
|
|
0fbb 0000 nop
|
|
0fbc 0000 nop
|
|
0fbd 0000 nop
|
|
0fbe 0000 nop
|
|
0fbf 0000 nop
|