0000 029f 0010 jmp         0x0010
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 02ff      rti         
000f 0000      nop    

// Entry
void 0010_Entry() 
{       
0010 1302      sbset       #0x02
0011 1303      sbset       #0x03
0012 1204      sbclr       #0x04
0013 1305      sbset       #0x05
0014 1306      sbset       #0x06
0015 8e00      set16       
0016 8c00      clr15       
0017 8b00      m0          
0018 009e ffff lri         $AC0.M, #0xffff
001a 1d1e      mrr         $WR0, $AC0.M
001b 1d3e      mrr         $WR1, $AC0.M
001c 1d5e      mrr         $WR2, $AC0.M
001d 1d7e      mrr         $WR3, $AC0.M
001e 0092 00ff lri         $CR, #0x00ff
0020 8100      clr         $ACC0
0021 009f 1000 lri         $AC1.M, #0x1000
0023 0080 0000 lri         $AR0, #0x0000
0025 005f      loop        $AC1.M
	0026 1b1e      srri        @$AR0, $AC0.M // clear dram
0027 26ff      lrs         $AC0.M, @CMBL
0028 16fc 8888 si          @DMBH, #0x8888
002a 16fd 1111 si          @DMBL, #0x1111 // SENDMAIL 0x88881111
002c 26fc      lrs         $AC0.M, @DMBH
002d 02a0 8000 andf        $AC0.M, #0x8000
002f 029c 002c jlnz        0x002c
}

void 0031_MainLoop()
{
0031 8100      clr         $ACC0
0032 8900      clr         $ACC1
0033 26fe      lrs         $AC0.M, @CMBH
0034 02c0 8000 andcf       $AC0.M, #0x8000
0036 029c 0031 jlnz        0x0031 // wait for mail
0038 27ff      lrs         $AC1.M, @CMBL
0039 00ff 0345 sr          @0x0345, $AC1.M
003b 1ffe      mrr         $AC1.M, $AC0.M
003c 0340 00ff andi        $AC1.M, #0x00ff
003e 00ff 0344 sr          @0x0344, $AC1.M
0040 1479      lsr         $ACC0, #-7
0041 0240 007e andi        $AC0.M, #0x007e
0043 0200 0062 addi        $AC0.M, #0x0062
0045 00fe 0343 sr          @0x0343, $AC0.M
0047 1c1e      mrr         $AR0, $AC0.M
0048 170f      jmpr        $AR0 // jump on CMD?
0049 009e 8000 lri         $AC0.M, #0x8000
004b 00dc 0343 lr          $AC0.L, @0x0343
004d 02bf 005a call        005a_SendMail(AC0.M,AC0.L) // sendmail 0x8000????
004f 029f 0031 jmp         0x0031
}

void 0051_WaitForMailAndStoreIt(DEST $AR0)
{
0051 26fe      lrs         $AC0.M, @CMBH
0052 02c0 8000 andcf       $AC0.M, #0x8000
0054 029c 0051 jlnz        0x0051
0056 24ff      lrs         $AC0.L, @CMBL
0057 1b1e      srri        @$AR0, $AC0.M
0058 1b1c      srri        @$AR0, $AC0.L
0059 02df      ret        
}

void 005a_SendMail(AC0.M,AC0.L)  
{  
005a 2efc      srs         @DMBH, $AC0.M
005b 2cfd      srs         @DMBL, $AC0.L
005c 26fc      lrs         $AC0.M, @DMBH
005d 02a0 8000 andf        $AC0.M, #0x8000
005f 029c 005c jlnz        0x005c
0061 02df      ret         
}

//CMDs 
0062 029f 0049 jmp         0x0049 // CMD_0
0064 029f 02bd jmp         0x02bd // CMD_1
0066 029f 0470 jmp         0x0470 // CMD_2
0068 029f 0031 jmp         0x0031 // CMD_3
006a 029f 00df jmp         0x00df // CMD_4
006c 029f 00f1 jmp         0x00f1 // CMD_5
006e 029f 05bb jmp         0x05bb // CMD_6
0070 029f 056f jmp         0x056f // CMD_7
0072 029f 05d7 jmp         0x05d7 // CMD_8
0074 029f 059f jmp         0x059f // CMD_9
0076 029f 0741 jmp         0x0741 // CMD_A
0078 029f 0618 jmp         0x0618 // CMD_B - jump to IROM area (0x8644)
007a 029f 0203 jmp         0x0203 // CMD_C

{ 
007c 193e      lrri        $AC0.M, @$AR1
007d 193c      lrri        $AC0.L, @$AR1
007e 2fcd      srs         @DSPA, $AC1.M
007f 0f00      lris        $AC1.M, #0x00
0080 2fc9      srs         @DSCR, $AC1.M // DMEM->CPU
0081 2ece      srs         @DSMAH, $AC0.M
0082 2ccf      srs         @DSMAL, $AC0.L
0083 1fe0      mrr         $AC1.M, $AR0
0084 1501      lsl         $ACC1, #1
0085 2fcb      srs         @DSBL, $AC1.M
0086 02bf 008f call        0x008f
0088 02df      ret       
}

{   
0089 193e      lrri        $AC0.M, @$AR1
008a 193c      lrri        $AC0.L, @$AR1
008b 2fcd      srs         @DSPA, $AC1.M
008c 0f01      lris        $AC1.M, #0x01
008d 029f 0080 jmp         0x0080
}

{
008f 26c9      lrs         $AC0.M, @DSCR
0090 02a0 0004 andf        $AC0.M, #0x0004
0092 029c 008f jlnz        0x008f
0094 02df      ret         
}

{ 
0095 193e      lrri        $AC0.M, @$AR1
0096 193c      lrri        $AC0.L, @$AR1
0097 00ff ffcd sr          @DSPA, $AC1.M
0099 0f00      lris        $AC1.M, #0x00
009a 00ff ffc9 sr          @DSCR, $AC1.M
009c 00fe ffce sr          @DSMAH, $AC0.M
009e 00fc ffcf sr          @DSMAL, $AC0.L
00a0 1fe0      mrr         $AC1.M, $AR0
00a1 1501      lsl         $ACC1, #1
00a2 00ff ffcb sr          @DSBL, $AC1.M
00a4 02df      ret         
} 

void 00a5_WaitForDMAend() 
{ 
00a5 00de ffc9 lr          $AC0.M, @DSCR
00a7 02a0 0004 andf        $AC0.M, #0x0004
00a9 029c 00a5 jlnz        0x00a5
00ab 02df      ret        
}

void 00ac_AccZeldaTypeRead()
{  
00ac 193e      lrri        $AC0.M, @$AR1
00ad 193c      lrri        $AC0.L, @$AR1
00ae 0240 7fff andi        $AC0.M, #0x7fff
00b0 02bf 00ba call        00ba_AccSetup()
00b2 007a 00b8 bloop       $AX0.H, 0x00b8
00b4 26d3      lrs         $AC0.M, @UnkZelda
00b5 1b3e      srri        @$AR1, $AC0.M
00b6 0000      nop         
00b7 0000      nop         
00b8 0000      nop         
00b9 02df      ret         
}

void 00ba_AccSetup()
{ 
00ba 1c3f      mrr         $AR1, $AC1.M
00bb 009f 0005 lri         $AC1.M, #0x0005
00bd 2fd1      srs         @SampleFormat, $AC1.M // reads will be u8
00be 1f5e      mrr         $AX0.H, $AC0.M
00bf 1f1c      mrr         $AX0.L, $AC0.L
00c0 2ed4      srs         @ACSAH, $AC0.M
00c1 2cd5      srs         @ACSAL, $AC0.L
00c2 8900      clr         $ACC1
00c3 1fa0      mrr         $AC1.L, $AR0
00c4 4c00      add         $ACC0, $ACC1
00c5 0200 0030 addi        $AC0.M, #0x0030
00c7 2ed6      srs         @ACEAH, $AC0.M
00c8 2cd7      srs         @ACEAL, $AC0.L
00c9 1fda      mrr         $AC0.M, $AX0.H
00ca 1f98      mrr         $AC0.L, $AX0.L
00cb 147f      lsr         $ACC0, #-1
00cc 2ed8      srs         @ACCAH, $AC0.M
00cd 2cd9      srs         @ACCAL, $AC0.L
00ce 1f40      mrr         $AX0.H, $AR0
00cf 02df      ret         
}

void 00d0_AccZeldaTypeWrite()
{  
00d0 193e      lrri        $AC0.M, @$AR1
00d1 193c      lrri        $AC0.L, @$AR1
00d2 0260 8000 ori         $AC0.M, #0x8000
00d4 02bf 00ba call        00ba_AccSetup()
00d6 007a 00dd bloop       $AX0.H, 0x00dd
{
	00d8 193e      lrri        $AC0.M, @$AR1
	00d9 2ed3      srs         @UnkZelda, $AC0.M
	00da 0000      nop         
	00db 0000      nop         
	00dc 0000      nop         
	00dd 0000      nop         
}
00de 02df      ret         
}

{ 
00df 0080 0346 lri         $AR0, #0x0346
00e1 02bf 0051 call        0x0051
00e3 02bf 0051 call        0x0051
00e5 0081 0346 lri         $AR1, #0x0346
00e7 00df 0349 lr          $AC1.M, @0x0349
00e9 0340 ffff andi        $AC1.M, #0xffff
00eb 00c0 0345 lr          $AR0, @0x0345
00ed 02bf 007c call        0x007c
00ef 029f 0049 jmp         0x0049
}

{ 
00f1 0080 0346 lri         $AR0, #0x0346
00f3 02bf 0051 call        0x0051
00f5 02bf 0051 call        0x0051
00f7 0081 0346 lri         $AR1, #0x0346
00f9 00df 0349 lr          $AC1.M, @0x0349
00fb 0340 ffff andi        $AC1.M, #0xffff
00fd 00c0 0345 lr          $AR0, @0x0345
00ff 02bf 0089 call        0x0089
0101 029f 0049 jmp         0x0049
}

{
0103 0092 00ff lri         $CR, #0x00ff
0105 2fd1      srs         @SampleFormat, $AC1.M
0106 0340 0003 andi        $AC1.M, #0x0003
0108 1f7f      mrr         $AX1.H, $AC1.M
0109 1f5e      mrr         $AX0.H, $AC0.M
010a 1f1c      mrr         $AX0.L, $AC0.L
010b 0200 0010 addi        $AC0.M, #0x0010
010d 2ed4      srs         @ACSAH, $AC0.M
010e 2cd5      srs         @ACSAL, $AC0.L
010f 8900      clr         $ACC1
0110 1fa0      mrr         $AC1.L, $AR0
0111 4c00      add         $ACC0, $ACC1
0112 0200 0030 addi        $AC0.M, #0x0030
0114 2ed6      srs         @ACEAH, $AC0.M
0115 2cd7      srs         @ACEAL, $AC0.L
0116 1fda      mrr         $AC0.M, $AX0.H
0117 1f98      mrr         $AC0.L, $AX0.L
0118 1ffb      mrr         $AC1.M, $AX1.H
0119 7900      decm        $AC1.M
011a 02ca      lsrn        
011b 2ed8      srs         @ACCAH, $AC0.M
011c 2cd9      srs         @ACCAL, $AC0.L
011d 02df      ret    
}     

//DSPLLE errors here!!! readw/writes from 0x3??? 
{
011e 1c23      mrr         $AR1, $AR3
011f 197e      lrri        $AC0.M, @$AR3
0120 191b      lrri        $AX1.H, @$AR0
0121 d858      mulc'l      $AC1.M, $AX1.H : $AX1.H, @$AR0
0122 1128 0128 bloopi      #0x28, 0x0128
0124 dcd3      mulcac'ld   $AC1.M, $AX1.H, $ACC0 : $AX0.L, $AX1.H, @$AR3
0125 6231      movr's      $ACC0, $AX1.L : @$AR1, $AC0.M
0126 dcd3      mulcac'ld   $AC1.M, $AX1.H, $ACC0 : $AX0.L, $AX1.H, @$AR3
0127 6231      movr's      $ACC0, $AX1.L : @$AR1, $AC0.M
0128 4900      addax       $ACC1, $AX0
0129 02df      ret       
}

{
012a 8f00      set40       
012b 1c03      mrr         $AR0, $AR3
012c 00db 038e lr          $AX1.H, @0x038e
012e 009a 0004 lri         $AX0.H, #0x0004
0130 1978      lrri        $AX0.L, @$AR3
0131 a843      mulx'l      $AX0.L, $AX1.H : $AX0.L, @$AR3
0132 ae00      mulxmv      $AX0.L, $AX1.H, $ACC0
0133 1128 0138 bloopi      #0x28, 0x0138
0135 38c3      asrnrx'l    $ACC0, $AX0.H : $AX0.L, @$AR3
0136 ae30      mulxmv's    $AX0.L, $AX1.H, $ACC0 : @$AR0, $AC0.M
0137 38c3      asrnrx'l    $ACC0, $AX0.H : $AX0.L, @$AR3
0138 ae30      mulxmv's    $AX0.L, $AX1.H, $ACC0 : @$AR0, $AC0.M
0139 8e00      set16       
013a 02df      ret     
}

{ 
013b 00f9 0361 sr          @0x0361, $AX1.L
013d 1fc0      mrr         $AC0.M, $AR0
013e 0200 fffc addi        $AC0.M, #0xfffc
0140 1c1e      mrr         $AR0, $AC0.M
0141 1c5e      mrr         $AR2, $AC0.M
0142 0083 0424 lri         $AR3, #0x0424
0144 197e      lrri        $AC0.M, @$AR3
0145 197f      lrri        $AC1.M, @$AR3
0146 80a2      nx'sl       : $AC0.M, $AX0.H
0147 64a3      movr'sl     $ACC0, $AX0.H : $AC1.M, $AX0.H
0148 6530      movr's      $ACC1, $AX0.H : @$AR0, $AC0.M
0149 1b1f      srri        @$AR0, $AC1.M
014a 1c02      mrr         $AR0, $AR2
014b 8100      clr         $ACC0
014c 00de 0402 lr          $AC0.M, @0x0402
014e 00fe 0362 sr          @0x0362, $AC0.M
0150 1474      lsr         $ACC0, #-12
0151 1f7e      mrr         $AX1.H, $AC0.M
0152 1f3c      mrr         $AX1.L, $AC0.L
0153 8900      clr         $ACC1
0154 00dd 0418 lr          $AC1.L, @0x0418
0156 1504      lsl         $ACC1, #4
0157 0604      cmpis       $AC0.M, #0x04
0158 0290 01b0 jge         0x01b0
015a 1fdd      mrr         $AC0.M, $AC1.L
015b 0082 0c00 lri         $AR2, #0x0c00
015d 1050      loopi       #0x50
015e 4b2a      addax's     $ACC1, $AX1 : @$AR2, $AC1.L
015f 1fbe      mrr         $AC1.L, $AC0.M
0160 00fe 0360 sr          @0x0360, $AC0.M
0162 8900      clr         $ACC1
0163 1fbe      mrr         $AC1.L, $AC0.M
0164 009a fff8 lri         $AX0.H, #0xfff8
0166 009b 00fc lri         $AX1.H, #0x00fc
0168 00d8 0361 lr          $AX0.L, @0x0361
016a 0082 0c00 lri         $AR2, #0x0c00
016c 0083 0c00 lri         $AR3, #0x0c00
016e 195e      lrri        $AC0.M, @$AR2
016f 3480      lsrnrx      $ACC0, $AX0.H
0170 1128 0175 bloopi      #0x28, 0x0175
0172 367a      andr'l      $AC0.M, $AX1.H : $AC1.M, @$AR2
0173 35b3      lsrnrx's    $ACC1, $AX0.H : @$AR3, $AC0.M
0174 3772      andr'l      $AC1.M, $AX1.H : $AC0.M, @$AR2
0175 34bb      lsrnrx's    $ACC0, $AX0.H : @$AR3, $AC1.M
0176 8a00      m2          
0177 0082 0c00 lri         $AR2, #0x0c00
0179 00dd 0418 lr          $AC1.L, @0x0418
017b 1504      lsl         $ACC1, #4
017c 1fe0      mrr         $AC1.M, $AR0
017d 8100      clr         $ACC0
017e 00de 0362 lr          $AC0.M, @0x0362
0180 1474      lsr         $ACC0, #-12
0181 1f7e      mrr         $AX1.H, $AC0.M
0182 1f3c      mrr         $AX1.L, $AC0.L
0183 8f00      set40       
0184 1943      lrri        $AR3, @$AR2
0185 4bc3      addax'ld    $ACC1, $AX1 : $AX0.L, $AX1.L, @$AR3
0186 90c3      mul'ld      $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
0187 f2c3      madd'ld     $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
0188 f2c3      madd'ld     $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
0189 f200      madd        $AX0.L, $AX0.H
018a fe00      movpz       $ACC0
018b 1c1f      mrr         $AR0, $AC1.M
018c 1943      lrri        $AR3, @$AR2
018d 4bc3      addax'ld    $ACC1, $AX1 : $AX0.L, $AX1.L, @$AR3
018e 90c3      mul'ld      $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
018f 114e 0197 bloopi      #0x4e, 0x0197
0191 f2c3      madd'ld     $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
0192 f2c3      madd'ld     $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
0193 f231      madd's      $AX0.L, $AX0.H : @$AR1, $AC0.M
0194 1c1f      mrr         $AR0, $AC1.M
0195 1943      lrri        $AR3, @$AR2
0196 4bc3      addax'ld    $ACC1, $AX1 : $AX0.L, $AX1.L, @$AR3
0197 92c3      mulmvz'ld   $AX0.L, $AX0.H, $ACC0 : $AX0.L, $AX1.L, @$AR3
0198 f2c3      madd'ld     $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
0199 f2c3      madd'ld     $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
019a f231      madd's      $AX0.L, $AX0.H : @$AR1, $AC0.M
019b fe00      movpz       $ACC0
019c 1b3e      srri        @$AR1, $AC0.M
019d 8b00      m0          
019e 8e00      set16       
019f 00fe 041b sr          @0x041b, $AC0.M
01a1 1c1f      mrr         $AR0, $AC1.M
01a2 150c      lsl         $ACC1, #12
01a3 0340 0fff andi        $AC1.M, #0x0fff
01a5 00ff 0418 sr          @0x0418, $AC1.M
01a7 0083 0424 lri         $AR3, #0x0424
01a9 191e      lrri        $AC0.M, @$AR0
01aa 191f      lrri        $AC1.M, @$AR0
01ab 80a0      nx'ls       : $AX0.H, $AC0.M
01ac 64a1      movr'ls     $ACC0, $AX0.H : $AX0.H, $AC1.M
01ad 6533      movr's      $ACC1, $AX0.H : @$AR3, $AC0.M
01ae 1b7f      srri        @$AR3, $AC1.M
01af 02df      ret         
}

{
01b0 1fe0      mrr         $AC1.M, $AR0
01b1 1c1f      mrr         $AR0, $AC1.M
01b2 1128 01b9 bloopi      #0x28, 0x01b9
01b4 4b70      addax'l     $ACC1, $AX1 : $AC0.M, @$AR0
01b5 1b3e      srri        @$AR1, $AC0.M
01b6 1c1f      mrr         $AR0, $AC1.M
01b7 4b70      addax'l     $ACC1, $AX1 : $AC0.M, @$AR0
01b8 1b3e      srri        @$AR1, $AC0.M
01b9 1c1f      mrr         $AR0, $AC1.M
01ba 029f 019f jmp         0x019f
}

{
01bc 8a00      m2          
01bd 0088 0007 lri         $WR0, #0x0007
01bf 1150 01cc bloopi      #0x50, 0x01cc
{
	01c1 1c61      mrr         $AR3, $AR1
	01c2 84c3      clrp'ld     : $AX0.L, $AX1.L, @$AR3
	01c3 f2c3      madd'ld     $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
	01c4 f2c3      madd'ld     $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
	01c5 f2c3      madd'ld     $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
	01c6 f2c3      madd'ld     $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
	01c7 f2c3      madd'ld     $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
	01c8 f2c3      madd'ld     $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
	01c9 f2c3      madd'ld     $AX0.L, $AX0.H : $AX0.L, $AX1.L, @$AR3
	01ca f200      madd        $AX0.L, $AX0.H
	01cb fe00      movpz       $ACC0
	01cc 1b3e      srri        @$AR1, $AC0.M
}
01cd 0088 ffff lri         $WR0, #0xffff
01cf 8b00      m0          
01d0 02df      ret         
}

{
01d1 0088 0003 lri         $WR0, #0x0003
01d3 0085 0000 lri         $IX1, #0x0000
01d5 0087 0000 lri         $IX3, #0x0000
01d7 1fc2      mrr         $AC0.M, $AR2
01d8 195b      lrri        $AX1.H, @$AR2
01d9 1959      lrri        $AX1.L, @$AR2
01da 195f      lrri        $AC1.M, @$AR2
01db 195a      lrri        $AX0.H, @$AR2
01dc 1c5e      mrr         $AR2, $AC0.M
01dd 1fda      mrr         $AC0.M, $AX0.H
01de 1c61      mrr         $AR3, $AR1
01df 8a00      m2          
01e0 8f00      set40       
01e1 191a      lrri        $AX0.H, @$AR0
01e2 b850      mulx'l      $AX0.H, $AX1.H : $AX0.H, @$AR0
01e3 e250      maddx'l     $AX0.H, $AX1.L : $AX0.H, @$AR0
01e4 ea50      maddc'l     $AC1.M, $AX1.L : $AX0.H, @$AR0
01e5 e8e8      maddc'ldm   $AC0.M, $AX1.L : $AX0.H, $AX1.L, @$AR0
01e6 b650      mulxmv'l    $AX0.H, $AX1.L, $ACC0 : $AX0.H, @$AR0
01e7 1127 01f2 bloopi      #0x27, 0x01f2
{
	01e9 e3a8      maddx'lsm   $AX0.H, $AX1.H : $AX0.H, $AC0.M
	01ea 197e      lrri        $AC0.M, @$AR3
	01eb e850      maddc'l     $AC0.M, $AX1.L : $AX0.H, @$AR0
	01ec eaf8      maddc'ldm   $AC1.M, $AX1.L : $AX0.H, $AX1.H, @$AR0
	01ed bf50      mulxmv'l    $AX0.H, $AX1.H, $ACC1 : $AX0.H, @$AR0
	01ee e2a9      maddx'lsm   $AX0.H, $AX1.L : $AX0.H, $AC1.M
	01ef 197f      lrri        $AC1.M, @$AR3
	01f0 ea50      maddc'l     $AC1.M, $AX1.L : $AX0.H, @$AR0
	01f1 e8e8      maddc'ldm   $AC0.M, $AX1.L : $AX0.H, $AX1.L, @$AR0
	01f2 b650      mulxmv'l    $AX0.H, $AX1.L, $ACC0 : $AX0.H, @$AR0
}
01f3 e3a8      maddx'lsm   $AX0.H, $AX1.H : $AX0.H, $AC0.M
01f4 197e      lrri        $AC0.M, @$AR3
01f5 e850      maddc'l     $AC0.M, $AX1.L : $AX0.H, @$AR0
01f6 eaf8      maddc'ldm   $AC1.M, $AX1.L : $AX0.H, $AX1.H, @$AR0
01f7 bf00      mulxmv      $AX0.H, $AX1.H, $ACC1
01f8 1bff      srrn        @$AR3, $AC1.M
01f9 197f      lrri        $AC1.M, @$AR3
01fa 8e00      set16       
01fb 8b00      m0          
01fc 0088 ffff lri         $WR0, #0xffff
01fe 1b5b      srri        @$AR2, $AX1.H
01ff 1b59      srri        @$AR2, $AX1.L
0200 1b5f      srri        @$AR2, $AC1.M
0201 1b5e      srri        @$AR2, $AC0.M
0202 02df      ret         
}

{
0203 0080 0346 lri         $AR0, #0x0346
0205 02bf 0051 call        0x0051
0207 02bf 0051 call        0x0051
0209 0081 0346 lri         $AR1, #0x0346
020b 009f 0580 lri         $AC1.M, #0x0580
020d 0080 0080 lri         $AR0, #0x0080
020f 02bf 007c call        0x007c
0211 0081 0348 lri         $AR1, #0x0348
0213 009f 0c00 lri         $AC1.M, #0x0c00
0215 0080 0080 lri         $AR0, #0x0080
0217 02bf 007c call        0x007c
0219 0080 0c00 lri         $AR0, #0x0c00
021b 0081 0580 lri         $AR1, #0x0580
021d 02bf 01d1 call        0x01d1
021f 0081 0346 lri         $AR1, #0x0346
0221 009f 0580 lri         $AC1.M, #0x0580
0223 0080 0080 lri         $AR0, #0x0080
0225 02bf 0089 call        0x0089
0227 0081 0348 lri         $AR1, #0x0348
0229 009f 0c00 lri         $AC1.M, #0x0c00
022b 0080 0080 lri         $AR0, #0x0080
022d 02bf 0089 call        0x0089
022f 029f 0049 jmp         0x0049
}

void 0231_FormatAudioSynths(format AC0.M) 
{
0231 8100      clr         $ACC0
0232 1f5e      mrr         $AX0.H, $AC0.M
0233 00d8 0402 lr          $AX0.L, @0x0402
0235 00dc 0418 lr          $AC0.L, @0x0418
0237 0080 0520 lri         $AR0, #0x0520
0239 00df 0440 lr          $AC1.M, @0x0440
023b 1501      lsl         $ACC1, #1
023c 0340 007e andi        $AC1.M, #0x007e
023e 0300 0246 addi        $AC1.M, #0x0246
0240 1c5f      mrr         $AR2, $AC1.M
0241 175f      callr       $AR2 // call 0x0246
0242 00fc 0418 sr          @0x0418, $AC0.L
0244 029f 04e7 jmp         0x04e7 // dummy
0246 029f 0257 jmp         0x0257 // 0x0 - Synth0 
0248 029f 028f jmp         0x028f // 0x1 - Synth1 
024a 029f 0277 jmp         0x0277 // 0x2 - Synth2 
024c 029f 0267 jmp         0x0267 // 0x3 - Synth3 
024e 029f 0292 jmp         0x0292 // 0x4 - Synth4 
0250 029f 0256 jmp         0x0256 // 0x5 - dummy 
0252 029f 02b1 jmp         0x02b1 // 0x6 - Synth6 
0254 029f 02ae jmp         0x02ae // 0x7 - Synth7 
0256 02df      ret         
}

void 0257_Synth0()
{ 
0257 1401      lsl         $ACC0, #1
0258 009b c000 lri         $AX1.H, #0xc000
025a 0099 4000 lri         $AX1.L, #0x4000
025c 1150 0264 bloopi      #0x50, 0x0264
{
	025e 02c0 0001 andcf       $AC0.M, #0x0001
	0260 027c      iflnz       
	0261 1b1b      srri        @$AR0, $AX1.H
	0262 027d      iflz        
	0263 1b19      srri        @$AR0, $AX1.L
	0264 4800      addax       $ACC0, $AX0
}
0265 147f      lsr         $ACC0, #-1
0266 02df      ret         
} 

void 0267_Synth3()
{
0267 1401      lsl         $ACC0, #1
0268 009b c000 lri         $AX1.H, #0xc000
026a 0099 4000 lri         $AX1.L, #0x4000
026c 1150 0274 bloopi      #0x50, 0x0274
{
	026e 02c0 0003 andcf       $AC0.M, #0x0003
	0270 027c      iflnz       
	0271 1b1b      srri        @$AR0, $AX1.H
	0272 027d      iflz        
	0273 1b19      srri        @$AR0, $AX1.L
	0274 4800      addax       $ACC0, $AX0
}
0275 147f      lsr         $ACC0, #-1
0276 02df      ret         
}

void 0277_Synth2()
{
0277 1401      lsl         $ACC0, #1
0278 0081 0ca0 lri         $AR1, #0x0ca0
027a 009b c000 lri         $AX1.H, #0xc000
027c 0099 4000 lri         $AX1.L, #0x4000
027e 8900      clr         $ACC1
027f 0082 0000 lri         $AR2, #0x0000
0281 1150 028c bloopi      #0x50, 0x028c
{
	0283 02c0 0001 andcf       $AC0.M, #0x0001
	0285 027c      iflnz       
	0286 1b1b      srri        @$AR0, $AX1.H
	0287 027d      iflz        
	0288 1b19      srri        @$AR0, $AX1.L
	0289 183d      lrr         $AC1.L, @$AR1
	028a 4900      addax       $ACC1, $AX0
	028b 1fe2      mrr         $AC1.M, $AR2
	028c 4c39      add's       $ACC0, $ACC1 : @$AR1, $AC1.M
}
028d 147f      lsr         $ACC0, #-1
028e 02df      ret         
}

void 028f_Synth1()
{
028f 1050      loopi       #0x50
	0290 4820      addax's     $ACC0, $AX0 : @$AR0, $AC0.L
0291 02df      ret       
}

void 0292_Synth4()
{
0292 0082 0140 lri         $AR2, #0x0140
0294 008a 003f lri         $WR2, #0x003f
0296 0086 0000 lri         $IX2, #0x0000
0298 1406      lsl         $ACC0, #6
0299 8900      clr         $ACC1
029a 1fb8      mrr         $AC1.L, $AX0.L
029b 1506      lsl         $ACC1, #6
029c 009b 003f lri         $AX1.H, #0x003f
029e 009a 0000 lri         $AX0.H, #0x0000
02a0 3600      andr        $AC0.M, $AX1.H
02a1 1cde      mrr         $IX2, $AC0.M
02a2 001a      addarn      $AR2, $IX2
02a3 3400      andr        $AC0.M, $AX0.H
02a4 1150 02aa bloopi      #0x50, 0x02aa
{
	02a6 4c00      add         $ACC0, $ACC1
	02a7 364a      andr'l      $AC0.M, $AX1.H : $AX1.L, @$AR2
	02a8 1cde      mrr         $IX2, $AC0.M
	02a9 340e      andr'nr     $AC0.M, $AX0.H : $AR2
	02aa 1b19      srri        @$AR0, $AX1.L
}
02ab 1fc2      mrr         $AC0.M, $AR2
02ac 147a      lsr         $ACC0, #-6
02ad 02df      ret         
}

void 02b1_Synth7()
{
02ae 1050      loopi       #0x50
	02af 1b18      srri        @$AR0, $AX0.L
02b0 02df      ret         
}

void 02b1_Synth6()
{
02b1 0083 0000 lri         $AR3, #0x0000
02b3 140f      lsl         $ACC0, #15
02b4 4853      addax'l     $ACC0, $AX0 : $AX0.H, @$AR3
02b5 1114 02ba bloopi      #0x14, 0x02ba
{
	02b7 48a2      addax'sl    $ACC0, $AX0 : $AC0.M, $AX0.H
	02b8 48a2      addax'sl    $ACC0, $AX0 : $AC0.M, $AX0.H
	02b9 48a2      addax'sl    $ACC0, $AX0 : $AC0.M, $AX0.H
	02ba 48a2      addax'sl    $ACC0, $AX0 : $AC0.M, $AX0.H
}
02bb 146f      lsr         $ACC0, #-17
02bc 02df      ret         
}

{
02bd 0080 0380 lri         $AR0, #0x0380
02bf 02bf 0051 call        0x0051
02c1 02bf 0051 call        0x0051
02c3 02bf 0051 call        0x0051
02c5 02bf 0051 call        0x0051
02c7 0081 0382 lri         $AR1, #0x0382
02c9 009f 0000 lri         $AC1.M, #0x0000
02cb 0080 0200 lri         $AR0, #0x0200
02cd 02bf 007c call        0x007c
02cf 0081 0384 lri         $AR1, #0x0384
02d1 009f 0300 lri         $AC1.M, #0x0300
02d3 0080 0020 lri         $AR0, #0x0020
02d5 02bf 007c call        0x007c
02d7 02bf 0351 call        0x0351
02d9 00de 0345 lr          $AC0.M, @0x0345
02db 00fe 0342 sr          @0x0342, $AC0.M
02dd 029f 0049 jmp         0x0049
}

{
02df 00de 0344 lr          $AC0.M, @0x0344
02e1 1404      lsl         $ACC0, #4
02e2 0200 03a8 addi        $AC0.M, #0x03a8
02e4 1c1e      mrr         $AR0, $AC0.M
02e5 02bf 0051 call        0x0051
02e7 02bf 0051 call        0x0051
02e9 02bf 0051 call        0x0051
02eb 00de 0345 lr          $AC0.M, @0x0345
02ed 1b1e      srri        @$AR0, $AC0.M
02ee 00de 0344 lr          $AC0.M, @0x0344
02f0 0200 03a4 addi        $AC0.M, #0x03a4
02f2 1c1e      mrr         $AR0, $AC0.M
02f3 8100      clr         $ACC0
02f4 1b1e      srri        @$AR0, $AC0.M
02f5 02df      ret         
}

{
02f6 00de 0344 lr          $AC0.M, @0x0344
02f8 1404      lsl         $ACC0, #4
02f9 0200 03b0 addi        $AC0.M, #0x03b0
02fb 1c1e      mrr         $AR0, $AC0.M
02fc 02bf 0051 call        0x0051
02fe 02bf 0051 call        0x0051
0300 02bf 0051 call        0x0051
0302 02bf 0051 call        0x0051
0304 02df      ret         
}

{
0305 0081 034c lri         $AR1, #0x034c
0307 009f 0400 lri         $AC1.M, #0x0400
0309 0080 0080 lri         $AR0, #0x0080
030b 02bf 007c call        0x007c
030d 02df      ret         
}

{
030e 0081 034c lri         $AR1, #0x034c
0310 009f 0a00 lri         $AC1.M, #0x0a00
0312 0080 0004 lri         $AR0, #0x0004
0314 02bf 00a5 call        00a5_WaitForDMAend()
0316 02bf 007c call        0x007c
0318 0081 034c lri         $AR1, #0x034c
031a 009f 0400 lri         $AC1.M, #0x0400
031c 0080 0080 lri         $AR0, #0x0080
031e 02bf 0095 call        0x0095
0320 02df      ret         
}

{
0321 0081 034c lri         $AR1, #0x034c
0323 009f 0400 lri         $AC1.M, #0x0400
0325 0080 0040 lri         $AR0, #0x0040
0327 0081 034c lri         $AR1, #0x034c
0329 193e      lrri        $AC0.M, @$AR1
032a 193c      lrri        $AC0.L, @$AR1
032b 0098 0000 lri         $AX0.L, #0x0000
032d 7000      addaxl      $ACC0, $AX0.L
032e 02bf 008b call        0x008b
0330 02df      ret         
}

{
0331 191e      lrri        $AC0.M, @$AR0
0332 191a      lrri        $AX0.H, @$AR0
0333 005f      loop        $AC1.M
0334 64a0      movr'ls     $ACC0, $AX0.H : $AX0.H, $AC0.M
0335 1b7e      srri        @$AR3, $AC0.M
0336 1b7a      srri        @$AR3, $AX0.H
0337 02df      ret   
}

{
0338 191e      lrri        $AC0.M, @$AR0
0339 191a      lrri        $AX0.H, @$AR0
033a 007f 033f bloop       $AC1.M, 0x033f
{
	033c 32b2      not's       $AC0.M : @$AR2, $AC0.M
	033d 65a0      movr'ls     $ACC1, $AX0.H : $AX0.H, $AC0.M
	033e 33ba      not's       $AC1.M : @$AR2, $AC1.M
	033f 64a1      movr'ls     $ACC0, $AX0.H : $AX0.H, $AC1.M
}
0340 0000      nop         
0341 02df      ret         
}

{
0342 8a00      m2          
0343 157f      lsr         $ACC1, #-1
0344 1c20      mrr         $AR1, $AR0
0345 1c03      mrr         $AR0, $AR3
0346 193a      lrri        $AX0.H, @$AR1
0347 9051      mul'l       $AX0.L, $AX0.H : $AX0.H, @$AR1
0348 925b      mulmvz'l    $AX0.L, $AX0.H, $ACC0 : $AX1.H, @$AR3
0349 007f 034e bloop       $AC1.M, 0x034e
{
	034b 4651      addr'l      $ACC0, $AX1.H : $AX0.H, @$AR1
	034c 92b2      mulmvz'sl   $AX0.L, $AX0.H, $ACC0 : $AC0.M, $AX1.H
	034d 4651      addr'l      $ACC0, $AX1.H : $AX0.H, @$AR1
	034e 92b2      mulmvz'sl   $AX0.L, $AX0.H, $ACC0 : $AC0.M, $AX1.H
}
034f 8b00      m0          
0350 02df      ret         
}

{
0351 0083 ffa0 lri         $AR3, #0xffa0
0353 0080 0300 lri         $AR0, #0x0300
0355 009f 000e lri         $AC1.M, #0x000e
0357 1108 035c bloopi      #0x08, 0x035c
{
	0359 191e      lrri        $AC0.M, @$AR0
	035a 1b7e      srri        @$AR3, $AC0.M
	035b 191e      lrri        $AC0.M, @$AR0
	035c 1b7e      srri        @$AR3, $AC0.M
}
035d 02df      ret         
}

{
035e 0080 0f40 lri         $AR0, #0x0f40
0360 0082 0d00 lri         $AR2, #0x0d00
0362 0083 0d60 lri         $AR3, #0x0d60
0364 009f 0028 lri         $AC1.M, #0x0028
0366 02bf 0338 call        0x0338
0368 8900      clr         $ACC1
0369 009e 0050 lri         $AC0.M, #0x0050
036b 0080 0ca0 lri         $AR0, #0x0ca0
036d 005e      loop        $AC0.M
	036e 1b1f      srri        @$AR0, $AC1.M
036f 0080 0f40 lri         $AR0, #0x0f40
0371 005e      loop        $AC0.M
	0372 1b1f      srri        @$AR0, $AC1.M
0373 0080 0fa0 lri         $AR0, #0x0fa0
0375 005e      loop        $AC0.M
	0376 1b1f      srri        @$AR0, $AC1.M
0377 02df      ret         
}

{
0378 0080 0dc0 lri         $AR0, #0x0dc0
037a 009e 0180 lri         $AC0.M, #0x0180
037c 8900      clr         $ACC1
037d 005e      loop        $AC0.M
	037e 1b1f      srri        @$AR0, $AC1.M
037f 02df      ret         
}

{
0380 00c0 03a0 lr          $AR0, @0x03a0
0382 191a      lrri        $AX0.H, @$AR0
0383 00df 03a1 lr          $AC1.M, @0x03a1
0385 009b 00a0 lri         $AX1.H, #0x00a0
0387 0081 0393 lri         $AR1, #0x0393
0389 18bc      lrrd        $AC0.L, @$AR1
038a b871      mulx'l      $AX0.H, $AX1.H : $AC0.M, @$AR1
038b bc00      mulxac      $AX0.H, $AX1.H, $ACC0
038c 0080 0050 lri         $AR0, #0x0050
038e 0508      addis       $AC1.M, #0x08
038f 02bf 007e call        0x007e
0391 00de 0390 lr          $AC0.M, @0x0390
0393 02a0 0001 andf        $AC0.M, #0x0001
0395 029d 039f jlz         0x039f
0397 0080 0398 lri         $AR0, #0x0398
0399 009e 0008 lri         $AC0.M, #0x0008
039b 00c1 03a1 lr          $AR1, @0x03a1
039d 02bf 01bc call        0x01bc
039f 009f 0050 lri         $AC1.M, #0x0050
03a1 00c0 03a1 lr          $AR0, @0x03a1
03a3 8100      clr         $ACC0
03a4 00de 0394 lr          $AC0.M, @0x0394
03a6 b100      tst         $ACC0
03a7 0295 03ae jz          0x03ae
03a9 1c7e      mrr         $AR3, $AC0.M
03aa 00d8 0395 lr          $AX0.L, @0x0395
03ac 02bf 0342 call        0x0342
03ae 009f 0050 lri         $AC1.M, #0x0050
03b0 00c0 03a1 lr          $AR0, @0x03a1
03b2 8100      clr         $ACC0
03b3 00de 0396 lr          $AC0.M, @0x0396
03b5 b100      tst         $ACC0
03b6 0295 03bd jz          0x03bd
03b8 1c7e      mrr         $AR3, $AC0.M
03b9 00d8 0397 lr          $AX0.L, @0x0397
03bb 02bf 0342 call        0x0342
03bd 00de 0390 lr          $AC0.M, @0x0390
03bf 02a0 0002 andf        $AC0.M, #0x0002
03c1 02dd      retlz       
03c2 0080 0398 lri         $AR0, #0x0398
03c4 009e 0008 lri         $AC0.M, #0x0008
03c6 00c1 03a1 lr          $AR1, @0x03a1
03c8 02bf 01bc call        0x01bc
03ca 02df      ret         
}

{
03cb 009f 0dc0 lri         $AC1.M, #0x0dc0
03cd 00ff 03a1 sr          @0x03a1, $AC1.M
03cf 009f 03a8 lri         $AC1.M, #0x03a8
03d1 00ff 03a2 sr          @0x03a2, $AC1.M
03d3 009f 03a4 lri         $AC1.M, #0x03a4
03d5 00ff 03a0 sr          @0x03a0, $AC1.M
03d7 1104 0400 bloopi      #0x04, 0x0400
{
	03d9 00c0 03a2 lr          $AR0, @0x03a2
	03db 0083 0390 lri         $AR3, #0x0390
	03dd 009f 000e lri         $AC1.M, #0x000e
	03df 02bf 0331 call        0x0331
	03e1 00da 0390 lr          $AX0.H, @0x0390
	03e3 8600      tstaxh      $AX0.H
	03e4 0295 03f1 jz          0x03f1
	03e6 00df 03a1 lr          $AC1.M, @0x03a1
	03e8 1c7f      mrr         $AR3, $AC1.M
	03e9 0550      addis       $AC1.M, #0x50
	03ea 1c1f      mrr         $AR0, $AC1.M
	03eb 009f 0006 lri         $AC1.M, #0x0006
	03ed 02bf 0331 call        0x0331
	03ef 02bf 0380 call        0x0380
	03f1 00de 03a2 lr          $AC0.M, @0x03a2
	03f3 0410      addis       $AC0.M, #0x10
	03f4 00fe 03a2 sr          @0x03a2, $AC0.M
	03f6 00de 03a1 lr          $AC0.M, @0x03a1
	03f8 0460      addis       $AC0.M, #0x60
	03f9 00fe 03a1 sr          @0x03a1, $AC0.M
	03fb 00de 03a0 lr          $AC0.M, @0x03a0
	03fd 7400      incm        $AC0.M
	03fe 00fe 03a0 sr          @0x03a0, $AC0.M
	0400 0000      nop         
}	
0401 02df      ret         
}

{
0402 00c0 03a0 lr          $AR0, @0x03a0
0404 181a      lrr         $AX0.H, @$AR0
0405 8100      clr         $ACC0
0406 181e      lrr         $AC0.M, @$AR0
0407 00db 0391 lr          $AX1.H, @0x0391
0409 7400      incm        $AC0.M
040a d100      cmpar       $ACC1, $AX0.H
040b 0270      ifge        
040c 8100      clr         $ACC0
040d 1b1e      srri        @$AR0, $AC0.M
040e 00df 03a1 lr          $AC1.M, @0x03a1
0410 009b 00a0 lri         $AX1.H, #0x00a0
0412 0081 0393 lri         $AR1, #0x0393
0414 18bc      lrrd        $AC0.L, @$AR1
0415 b871      mulx'l      $AX0.H, $AX1.H : $AC0.M, @$AR1
0416 bc00      mulxac      $AX0.H, $AX1.H, $ACC0
0417 0080 0050 lri         $AR0, #0x0050
0419 02bf 008b call        0x008b
041b 02df      ret         
}

{
041c 009f 0dc0 lri         $AC1.M, #0x0dc0
041e 00ff 03a1 sr          @0x03a1, $AC1.M
0420 009f 03a8 lri         $AC1.M, #0x03a8
0422 00ff 03a2 sr          @0x03a2, $AC1.M
0424 009f 03a4 lri         $AC1.M, #0x03a4
0426 00ff 03a0 sr          @0x03a0, $AC1.M
0428 1104 0448 bloopi      #0x04, 0x0448
{
	042a 00c0 03a2 lr          $AR0, @0x03a2
	042c 0083 0390 lri         $AR3, #0x0390
	042e 009f 000e lri         $AC1.M, #0x000e
	0430 02bf 0331 call        0x0331
	0432 00da 0390 lr          $AX0.H, @0x0390
	0434 8600      tstaxh      $AX0.H
	0435 0295 0439 jz          0x0439
	0437 02bf 0402 call        0x0402
	0439 00de 03a2 lr          $AC0.M, @0x03a2
	043b 0410      addis       $AC0.M, #0x10
	043c 00fe 03a2 sr          @0x03a2, $AC0.M
	043e 00de 03a1 lr          $AC0.M, @0x03a1
	0440 0460      addis       $AC0.M, #0x60
	0441 00fe 03a1 sr          @0x03a1, $AC0.M
	0443 00de 03a0 lr          $AC0.M, @0x03a0
	0445 7400      incm        $AC0.M
	0446 00fe 03a0 sr          @0x03a0, $AC0.M
	0448 0000      nop         
}	
0449 02df      ret        
}

{
044a 0081 0386 lri         $AR1, #0x0386
044c 009f 03a8 lri         $AC1.M, #0x03a8
044e 0080 0040 lri         $AR0, #0x0040
0450 02bf 007c call        0x007c
0452 02df      ret         
}

{
0453 191e      lrri        $AC0.M, @$AR0
0454 189c      lrrd        $AC0.L, @$AR0
0455 4800      addax       $ACC0, $AX0
0456 1b1e      srri        @$AR0, $AC0.M
0457 1b1c      srri        @$AR0, $AC0.L
0458 02df      ret         
0459 8100      clr         $ACC0
045a 26fe      lrs         $AC0.M, @CMBH
045b 02c0 8000 andcf       $AC0.M, #0x8000
045d 029c 045a jlnz        0x045a
045f 26ff      lrs         $AC0.M, @CMBL
0460 02df      ret     
}

{    
0461 0080 0388 lri         $AR0, #0x0388
0463 0081 0051 lri         $AR1, #0x0051
0465 173f      callr       $AR1 // call 0x0051
0466 00de 0344 lr          $AC0.M, @0x0344
0468 00fe 0341 sr          @0x0341, $AC0.M
046a 00de 0345 lr          $AC0.M, @0x0345
046c 00fe 038e sr          @0x038e, $AC0.M
046e 173f      callr       $AR1 // call 0x0051
046f 02df      ret     
}

{    
0470 02bf 0461 call        0x0461
0472 009e 8000 lri         $AC0.M, #0x8000
0474 00dc 0341 lr          $AC0.L, @0x0341
0476 02bf 005a call        005a_SendMail(AC0.M,AC0.L) // 0x8000????
0478 8100      clr         $ACC0
0479 00fe 0355 sr          @0x0355, $AC0.M
047b 02bf 044a call        0x044a
047d 00de 0341 lr          $AC0.M, @0x0341
047f 007e 056c bloop       $AC0.M, 0x056c
{
	0481 02bf 035e call        0x035e
	0483 02bf 03cb call        0x03cb
	0485 02bf 0459 call        0x0459
	0487 8100      clr         $ACC0
	0488 00fe 0354 sr          @0x0354, $AC0.M
	048a 00de 0342 lr          $AC0.M, @0x0342
	048c 007e 0538 bloop       $AC0.M, 0x0538
	{
		048e 00d8 0354 lr          $AX0.L, @0x0354
		0490 009a 0100 lri         $AX0.H, #0x0100
		0492 8100      clr         $ACC0
		0493 00de 0380 lr          $AC0.M, @0x0380
		0495 00dc 0381 lr          $AC0.L, @0x0381
		0497 9000      mul         $AX0.L, $AX0.H
		0498 9400      mulac       $AX0.L, $AX0.H, $ACC0
		0499 00fe 034c sr          @0x034c, $AC0.M
		049b 00fc 034d sr          @0x034d, $AC0.L
		049d 02bf 0305 call        0x0305
		049f 00da 0400 lr          $AX0.H, @0x0400
		04a1 8600      tstaxh      $AX0.H
		04a2 0295 0533 jz          0x0533
		04a4 00da 0401 lr          $AX0.H, @0x0401
		04a6 8600      tstaxh      $AX0.H
		04a7 0294 0533 jnz         0x0533
		04a9 00da 0406 lr          $AX0.H, @0x0406
		04ab 8600      tstaxh      $AX0.H
		04ac 0294 0930 jnz         0x0930
		04ae 8100      clr         $ACC0
		04af 00de 0440 lr          $AC0.M, @0x0440
		04b1 0607      cmpis       $AC0.M, #0x07 // format 0x7 or less (Synths)
		04b2 0293 0231 jle         0x0231
		04b4 0620      cmpis       $AC0.M, #0x20 // format 0x20
		04b5 0295 079e jz          0x079e
		04b7 0621      cmpis       $AC0.M, #0x21 // format 0x21
		04b8 0295 07a7 jz          0x07a7
		04ba 00d8 0402 lr          $AX0.L, @0x0402
		04bc 8100      clr         $ACC0
		04bd 8900      clr         $ACC1
		04be 00dc 0418 lr          $AC0.L, @0x0418
		04c0 8d00      set15       
		04c1 0099 0050 lri         $AX1.L, #0x0050
		04c3 a000      mulx        $AX0.L, $AX1.L
		04c4 a400      mulxac      $AX0.L, $AX1.L, $ACC0
		04c5 1404      lsl         $ACC0, #4
		04c6 8c00      clr15       
		04c7 1ffe      mrr         $AC1.M, $AC0.M
		04c8 0083 0580 lri         $AR3, #0x0580
		04ca 00da 0441 lr          $AX0.H, @0x0441
		04cc 8600      tstaxh      $AX0.H
		04cd 0295 04dd jz          0x04dd
		04cf 00da 0449 lr          $AX0.H, @0x0449
		04d1 8100      clr         $ACC0
		04d2 00de 044b lr          $AC0.M, @0x044b
		04d4 3800      orr         $AC0.M, $AX0.H
		04d5 0240 000f andi        $AC0.M, #0x000f
		04d7 0295 04dd jz          0x04dd
		04d9 02bf 06a6 call        0x06a6
		04db 029f 04df jmp         0x04df
		04dd 02bf 0837 call        0x0837
		//RAW21-jmp
		04df 0080 0580 lri         $AR0, #0x0580
		04e1 0081 0520 lri         $AR1, #0x0520
		04e3 0099 0000 lri         $AX1.L, #0x0000
		04e5 02bf 013b call        0x013b
		//RAW20-jmp
		04e7 0080 0450 lri         $AR0, #0x0450
		04e9 0081 0520 lri         $AR1, #0x0520
		04eb 0082 0428 lri         $AR2, #0x0428
		04ed 0083 0453 lri         $AR3, #0x0453
		04ef 18fa      lrrd        $AX0.H, @$AR3
		04f0 8600      tstaxh      $AX0.H
		04f1 0294 0501 jnz         0x0501
		04f3 18fa      lrrd        $AX0.H, @$AR3
		04f4 8600      tstaxh      $AX0.H
		04f5 0294 0501 jnz         0x0501
		04f7 18fa      lrrd        $AX0.H, @$AR3
		04f8 8600      tstaxh      $AX0.H
		04f9 0294 0501 jnz         0x0501
		04fb 8100      clr         $ACC0
		04fc 18fe      lrrd        $AC0.M, @$AR3
		04fd 0280 7fff cmpi        $AC0.M, #0x7fff
		04ff 0295 0505 jz          0x0505
		0501 02bf 01d1 call        0x01d1
		0503 029f 0505 jmp         0x0505
		0505 8100      clr         $ACC0
		0506 1c9e      mrr         $IX0, $AC0.M
		0507 1cde      mrr         $IX2, $AC0.M
		0508 7400      incm        $AC0.M
		0509 1cfe      mrr         $IX3, $AC0.M
		050a 8f00      set40       
		050b 0086 0002 lri         $IX2, #0x0002
		050d 0082 0408 lri         $AR2, #0x0408
		050f 1104 052f bloopi      #0x04, 0x052f
		{
			0511 8100      clr         $ACC0
			0512 195e      lrri        $AC0.M, @$AR2
			0513 1200      sbclr       #0x00
			0514 b100      tst         $ACC0
			0515 0275      ifz         
			0516 1300      sbset       #0x00
			0517 1c7e      mrr         $AR3, $AC0.M
			0518 195e      lrri        $AC0.M, @$AR2
			0519 14fa      asr         $ACC0, #-6
			051a 1f5e      mrr         $AX0.H, $AC0.M
			051b 1f1c      mrr         $AX0.L, $AC0.L
			051c 185f      lrr         $AC1.M, @$AR2
			051d 0080 0520 lri         $AR0, #0x0520
			051f 029d 0523 jlz         0x0523
			0521 02bf 011e call        0x011e
			0523 1b5f      srri        @$AR2, $AC1.M
			0524 8100      clr         $ACC0
			0525 185e      lrr         $AC0.M, @$AR2
			0526 000e      xar         $AR2		
			//; *** UNKNOWN OPCODE ***
			// 0xc/0xd/0xe/0xf is one opcode where last 2 bits define target $AR? reg
			//  (new value is based on orig $AR? and %WR? reg value = unknown)
			0527 b100      tst         $ACC0
			0528 0274      ifnz        
			0529 7800      decm        $AC0.M
			052a b100      tst         $ACC0
			052b 8900      clr         $ACC1
			052c 0275      ifz         
			052d 1a5f      srr         @$AR2, $AC1.M
			052e 001a      addarn      $AR2, $IX2
			052f 1b5e      srri        @$AR2, $AC0.M
		}	
		0530 8e00      set16       
		0531 02bf 0321 call        0x0321
		0533 00de 0354 lr          $AC0.M, @0x0354
		0535 7400      incm        $AC0.M
		0536 00fe 0354 sr          @0x0354, $AC0.M
		0538 0000      nop    
	}
	0539 16fb 0001 si          @DIRQ, #0x0001
	053b 0083 0d00 lri         $AR3, #0x0d00
	053d 02bf 012a call        0x012a
	053f 0081 0388 lri         $AR1, #0x0388
	0541 009f 0d00 lri         $AC1.M, #0x0d00
	0543 0080 0050 lri         $AR0, #0x0050
	0545 02bf 0089 call        0x0089
	0547 0080 0fa0 lri         $AR0, #0x0fa0
	0549 0083 0d60 lri         $AR3, #0x0d60
	054b 009f 0050 lri         $AC1.M, #0x0050
	054d 0098 8000 lri         $AX0.L, #0x8000
	054f 02bf 0342 call        0x0342
	0551 0083 0d60 lri         $AR3, #0x0d60
	0553 02bf 012a call        0x012a
	0555 0081 038a lri         $AR1, #0x038a
	0557 009f 0d60 lri         $AC1.M, #0x0d60
	0559 0080 0050 lri         $AR0, #0x0050
	055b 02bf 0089 call        0x0089
	055d 009a 0000 lri         $AX0.H, #0x0000
	055f 0098 00a0 lri         $AX0.L, #0x00a0
	0561 0080 0388 lri         $AR0, #0x0388
	0563 02bf 0453 call        0x0453
	0565 0080 038a lri         $AR0, #0x038a
	0567 02bf 0453 call        0x0453
	0569 02bf 041c call        0x041c
	056b 0000      nop         
	056c 0000      nop   
}      
056d 029f 0031 jmp         0x0031
}

{
056f 0080 0346 lri         $AR0, #0x0346
0571 02bf 0051 call        0x0051
0573 02bf 0051 call        0x0051
0575 0081 0346 lri         $AR1, #0x0346
0577 193e      lrri        $AC0.M, @$AR1
0578 193c      lrri        $AC0.L, @$AR1
0579 009f 0400 lri         $AC1.M, #0x0400
057b 00c0 0345 lr          $AR0, @0x0345
057d 02bf 007e call        0x007e
057f 0081 0348 lri         $AR1, #0x0348
0581 193e      lrri        $AC0.M, @$AR1
0582 193c      lrri        $AC0.L, @$AR1
0583 009f 0800 lri         $AC1.M, #0x0800
0585 00c0 0345 lr          $AR0, @0x0345
0587 02bf 007e call        0x007e
0589 0081 0346 lri         $AR1, #0x0346
058b 193e      lrri        $AC0.M, @$AR1
058c 193c      lrri        $AC0.L, @$AR1
058d 009f 0800 lri         $AC1.M, #0x0800
058f 00c0 0345 lr          $AR0, @0x0345
0591 02bf 008b call        0x008b
0593 0081 0348 lri         $AR1, #0x0348
0595 193e      lrri        $AC0.M, @$AR1
0596 193c      lrri        $AC0.L, @$AR1
0597 009f 0400 lri         $AC1.M, #0x0400
0599 00c0 0345 lr          $AR0, @0x0345
059b 02bf 008b call        0x008b
059d 029f 0049 jmp         0x0049
}

{
059f 0080 0346 lri         $AR0, #0x0346
05a1 02bf 0051 call        0x0051
05a3 02bf 0051 call        0x0051
05a5 0081 0346 lri         $AR1, #0x0346
05a7 193e      lrri        $AC0.M, @$AR1
05a8 193c      lrri        $AC0.L, @$AR1
05a9 009f 0400 lri         $AC1.M, #0x0400
05ab 00c0 0345 lr          $AR0, @0x0345
05ad 02bf 007e call        0x007e
05af 0081 0348 lri         $AR1, #0x0348
05b1 193e      lrri        $AC0.M, @$AR1
05b2 193c      lrri        $AC0.L, @$AR1
05b3 009f 0400 lri         $AC1.M, #0x0400
05b5 00c0 0345 lr          $AR0, @0x0345
05b7 02bf 008b call        0x008b
05b9 029f 0049 jmp         0x0049
}

{
05bb 0080 0346 lri         $AR0, #0x0346
05bd 02bf 0051 call        0x0051
05bf 02bf 0051 call        0x0051
05c1 0081 0346 lri         $AR1, #0x0346
05c3 193e      lrri        $AC0.M, @$AR1
05c4 193c      lrri        $AC0.L, @$AR1
05c5 009f 0400 lri         $AC1.M, #0x0400
05c7 00c0 0345 lr          $AR0, @0x0345
05c9 02bf 00ae call        0x00ae
05cb 0081 0348 lri         $AR1, #0x0348
05cd 193e      lrri        $AC0.M, @$AR1
05ce 193c      lrri        $AC0.L, @$AR1
05cf 009f 0400 lri         $AC1.M, #0x0400
05d1 00c0 0345 lr          $AR0, @0x0345
05d3 02bf 008b call        0x008b
05d5 029f 0049 jmp         0x0049
}

{
05d7 0080 0346 lri         $AR0, #0x0346
05d9 02bf 0051 call        0x0051
05db 02bf 0051 call        0x0051
05dd 0081 0346 lri         $AR1, #0x0346
05df 193e      lrri        $AC0.M, @$AR1
05e0 193c      lrri        $AC0.L, @$AR1
05e1 009f 0400 lri         $AC1.M, #0x0400
05e3 00c0 0344 lr          $AR0, @0x0344
05e5 02bf 007e call        0x007e
05e7 0081 0348 lri         $AR1, #0x0348
05e9 193e      lrri        $AC0.M, @$AR1
05ea 193c      lrri        $AC0.L, @$AR1
05eb 009f 0800 lri         $AC1.M, #0x0800
05ed 00c0 0344 lr          $AR0, @0x0344
05ef 02bf 007e call        0x007e
05f1 0080 0400 lri         $AR0, #0x0400
05f3 0083 0800 lri         $AR3, #0x0800
05f5 0084 0000 lri         $IX0, #0x0000
05f7 00da 0345 lr          $AX0.H, @0x0345
05f9 00df 0344 lr          $AC1.M, @0x0344
05fb 8f00      set40       
05fc 197b      lrri        $AX1.H, @$AR3
05fd b800      mulx        $AX0.H, $AX1.H
05fe 197b      lrri        $AX1.H, @$AR3
05ff 007f 0604 bloop       $AC1.M, 0x0604
0601 199e      lrrn        $AC0.M, @$AR0
0602 bc00      mulxac      $AX0.H, $AX1.H, $ACC0
0603 80b2      nx'sl       : $AC0.M, $AX1.H
0604 0000      nop         
0605 8e00      set16       
0606 0081 0346 lri         $AR1, #0x0346
0608 193e      lrri        $AC0.M, @$AR1
0609 193c      lrri        $AC0.L, @$AR1
060a 009f 0400 lri         $AC1.M, #0x0400
060c 00c0 0344 lr          $AR0, @0x0344
060e 02bf 008b call        0x008b
0610 009e 8200 lri         $AC0.M, #0x8200
0612 00dc 0344 lr          $AC0.L, @0x0344
0614 02bf 005a call        005a_SendMail(AC0.M,AC0.L) // 0x8200????
0616 029f 0031 jmp         0x0031
}

{
0618 0080 0346 lri         $AR0, #0x0346
061a 02bf 0051 call        0x0051
061c 0081 0346 lri         $AR1, #0x0346
061e 009f 0400 lri         $AC1.M, #0x0400
0620 00c0 0345 lr          $AR0, @0x0345
0622 02bf 007c call        0x007c
0624 02bf 8644 call        0x8644 // iROM!!!!
0626 029f 0049 jmp         0x0049
}

{
0628 009e 0430 lri         $AC0.M, #0x0430
062a 2219      lrs         $AX0.H, @0x0019
062b 4400      addr        $ACC0, $AX0.H
062c 1c1e      mrr         $AR0, $AC0.M
062d 1fda      mrr         $AC0.M, $AX0.H
062e 3280      not         $AC0.M
062f 7400      incm        $AC0.M
0630 221a      lrs         $AX0.H, @0x001a
0631 4400      addr        $ACC0, $AX0.H
0632 0090 0000 lri         $AC0.H, #0x0000
0634 029f 0645 jmp         0x0645
}

{
0636 009e 0430 lri         $AC0.M, #0x0430
0638 2219      lrs         $AX0.H, @0x0019
0639 4400      addr        $ACC0, $AX0.H
063a 1c1e      mrr         $AR0, $AC0.M
063b 1fda      mrr         $AC0.M, $AX0.H
063c 3280      not         $AC0.M
063d 7400      incm        $AC0.M
063e 221a      lrs         $AX0.H, @0x001a
063f 4400      addr        $ACC0, $AX0.H
0640 0090 0000 lri         $AC0.H, #0x0000
0642 8200      cmp         
0643 0270      ifge        
0644 1fdf      mrr         $AC0.M, $AC1.M
0645 1f3e      mrr         $AX1.L, $AC0.M
0646 02bf 0699 call        0x0699
0648 261c      lrs         $AC0.M, @0x001c
0649 241d      lrs         $AC0.L, @0x001d
064a 7200      addaxl      $ACC0, $AX1.L
064b 5300      subr        $ACC1, $AX1.L
064c 2e1c      srs         @0x001c, $AC0.M
064d 2c1d      srs         @0x001d, $AC0.L
064e 02df      ret         
}

{
064f 8100      clr         $ACC0
0650 221c      lrs         $AX0.H, @0x001c
0651 201d      lrs         $AX0.L, @0x001d
0652 4800      addax       $ACC0, $AX0
0653 147c      lsr         $ACC0, #-4
0654 2e1e      srs         @0x001e, $AC0.M
0655 2c1f      srs         @0x001f, $AC0.L
0656 2340      lrs         $AX1.H, @0x0040
0657 c814      mulc'mv     $AC0.M, $AX1.H : $AX1.L, $AC0.L
0658 9e00      mulmv       $AX1.L, $AX1.H, $ACC0
0659 f000      lsl16       $ACC0
065a 4e00      addp        $ACC0
065b 234c      lrs         $AX1.H, @0x004c
065c 214d      lrs         $AX1.L, @0x004d
065d 4a00      addax       $ACC0, $AX1
065e 2e20      srs         @0x0020, $AC0.M
065f 2c21      srs         @0x0021, $AC0.L
0660 1fd8      mrr         $AC0.M, $AX0.L
0661 0240 000f andi        $AC0.M, #0x000f
0663 2e19      srs         @0x0019, $AC0.M
0664 264a      lrs         $AC0.M, @0x004a
0665 244b      lrs         $AC0.L, @0x004b
0666 5800      subax       $ACC0, $AX0
0667 2e22      srs         @0x0022, $AC0.M
0668 2c23      srs         @0x0023, $AC0.L
0669 02df      ret         
}

{
066a 221e      lrs         $AX0.H, @0x001e
066b 201f      lrs         $AX0.L, @0x001f
066c 8100      clr         $ACC0
066d 264a      lrs         $AC0.M, @0x004a
066e 244b      lrs         $AC0.L, @0x004b
066f 147c      lsr         $ACC0, #-4
0670 5800      subax       $ACC0, $AX0
0671 0295 067a jz          0x067a
0673 02bf 06ec call        0x06ec
0675 0e10      lris        $AC0.M, #0x10
0676 2e1a      srs         @0x001a, $AC0.M
0677 8100      clr         $ACC0
0678 2e19      srs         @0x0019, $AC0.M
0679 02df      ret         
}

{
067a 224a      lrs         $AX0.H, @0x004a
067b 204b      lrs         $AX0.L, @0x004b
067c 8100      clr         $ACC0
067d 261c      lrs         $AC0.M, @0x001c
067e 241d      lrs         $AC0.L, @0x001d
067f 5800      subax       $ACC0, $AX0
0680 0290 0687 jge         0x0687
0682 02bf 06ec call        0x06ec
0684 2623      lrs         $AC0.M, @0x0023
0685 029f 0676 jmp         0x0676
}

{
0687 2648      lrs         $AC0.M, @0x0048
0688 2449      lrs         $AC0.L, @0x0049
0689 2e1c      srs         @0x001c, $AC0.M
068a 2c1d      srs         @0x001d, $AC0.L
068b 0e10      lris        $AC0.M, #0x10
068c 2e1a      srs         @0x001a, $AC0.M
068d 02bf 064f call        0x064f
068f 2642      lrs         $AC0.M, @0x0042
0690 2e3f      srs         @0x003f, $AC0.M
0691 2643      lrs         $AC0.M, @0x0043
0692 2e3e      srs         @0x003e, $AC0.M
0693 8100      clr         $ACC0
0694 00fe 0362 sr          @0x0362, $AC0.M
0696 02bf 06ec call        0x06ec
0698 02df      ret        
}

{
0699 b100      tst         $ACC0
069a 02d5      retz        
069b 04fe      addis       $AC0.M, #0xfe
069c 1f1e      mrr         $AX0.L, $AC0.M
069d 191e      lrri        $AC0.M, @$AR0
069e 0291 06a4 jl          0x06a4
06a0 191a      lrri        $AX0.H, @$AR0
06a1 0058      loop        $AX0.L
06a2 64a0      movr'ls     $ACC0, $AX0.H : $AX0.H, $AC0.M
06a3 6433      movr's      $ACC0, $AX0.H : @$AR3, $AC0.M
06a4 1b7e      srri        @$AR3, $AC0.M
06a5 02df      ret         
}

{
06a6 0092 0004 lri         $CR, #0x0004
06a8 02bf 064f call        0x064f
06aa 8100      clr         $ACC0
06ab 00fe 0362 sr          @0x0362, $AC0.M
06ad 8100      clr         $ACC0
06ae 2622      lrs         $AC0.M, @0x0022
06af 2423      lrs         $AC0.L, @0x0023
06b0 b100      tst         $ACC0
06b1 0294 06c3 jnz         0x06c3
06b3 02bf 066a call        0x066a
06b5 2219      lrs         $AX0.H, @0x0019
06b6 8600      tstaxh      $AX0.H
06b7 0294 06c0 jnz         0x06c0
06b9 02bf 0636 call        0x0636
06bb b900      tst         $ACC1
06bc 0295 06e9 jz          0x06e9
06be 02bf 064f call        0x064f
06c0 8100      clr         $ACC0
06c1 2622      lrs         $AC0.M, @0x0022
06c2 2423      lrs         $AC0.L, @0x0023
06c3 1f1f      mrr         $AX0.L, $AC1.M
06c4 009a 0000 lri         $AX0.H, #0x0000
06c6 5800      subax       $ACC0, $AX0
06c7 0290 06d6 jge         0x06d6
06c9 8100      clr         $ACC0
06ca 2619      lrs         $AC0.M, @0x0019
06cb b100      tst         $ACC0
06cc 0294 06d0 jnz         0x06d0
06ce 02bf 066a call        0x066a
06d0 02bf 0628 call        0x0628
06d2 02bf 064f call        0x064f
06d4 029f 06ad jmp         0x06ad
}

{
06d6 8100      clr         $ACC0
06d7 2619      lrs         $AC0.M, @0x0019
06d8 b100      tst         $ACC0
06d9 0294 06dd jnz         0x06dd
06db 02bf 066a call        0x066a
06dd 02bf 0636 call        0x0636
06df b900      tst         $ACC1
06e0 0295 06e9 jz          0x06e9
06e2 02bf 064f call        0x064f
06e4 029f 06d6 jmp         0x06d6
}

{
06e6 8100      clr         $ACC0
06e7 005f      loop        $AC1.M
06e8 1b7e      srri        @$AR3, $AC0.M
06e9 0092 00ff lri         $CR, #0x00ff
06eb 02df      ret         
}

{
06ec 00ff 0360 sr          @0x0360, $AC1.M
06ee 00da 0362 lr          $AX0.H, @0x0362
06f0 8600      tstaxh      $AX0.H
06f1 0294 06fe jnz         0x06fe
06f3 0a01      lris        $AX0.H, #0x01
06f4 00fa 0362 sr          @0x0362, $AX0.H
06f6 2620      lrs         $AC0.M, @0x0020
06f7 2421      lrs         $AC0.L, @0x0021
06f8 009f 0005 lri         $AC1.M, #0x0005
06fa 02bf 0103 call        0x0103
06fc 0092 0004 lri         $CR, #0x0004
06fe 0080 ffd3 lri         $AR0, #0xffd3
0700 0084 0000 lri         $IX0, #0x0000
0702 199e      lrrn        $AC0.M, @$AR0
0703 1ffe      mrr         $AC1.M, $AC0.M
0704 1401      lsl         $ACC0, #1
0705 0240 001e andi        $AC0.M, #0x001e
0707 0200 0300 addi        $AC0.M, #0x0300
0709 1c3e      mrr         $AR1, $AC0.M
070a 157c      lsr         $ACC1, #-4
070b 0340 000f andi        $AC1.M, #0x000f
070d 0a11      lris        $AX0.H, #0x11
070e 5500      subr        $ACC1, $AX0.H
070f 009a 00f0 lri         $AX0.H, #0x00f0
0711 009b 000f lri         $AX1.H, #0x000f
0713 0082 0370 lri         $AR2, #0x0370
0715 1998      lrrn        $AX0.L, @$AR0
0716 6000      movr        $ACC0, $AX0.L
0717 1107 071e bloopi      #0x07, 0x071e
{
	0719 3400      andr        $AC0.M, $AX0.H
	071a 1408      lsl         $ACC0, #8
	071b 6032      movr's      $ACC0, $AX0.L : @$AR2, $AC0.M
	071c 3644      andr'ln     $AC0.M, $AX1.H : $AX0.L, @$AR0
	071d 140c      lsl         $ACC0, #12
	071e 6032      movr's      $ACC0, $AX0.L : @$AR2, $AC0.M
}
071f 3400      andr        $AC0.M, $AX0.H
0720 1408      lsl         $ACC0, #8
0721 6032      movr's      $ACC0, $AX0.L : @$AR2, $AC0.M
0722 3600      andr        $AC0.M, $AX1.H
0723 140c      lsl         $ACC0, #12
0724 1b5e      srri        @$AR2, $AC0.M
0725 8f00      set40       
0726 1f7f      mrr         $AX1.H, $AC1.M
0727 203e      lrs         $AX0.L, @0x003e
0728 273f      lrs         $AC1.M, @0x003f
0729 193a      lrri        $AX0.H, @$AR1
072a 1939      lrri        $AX1.L, @$AR1
072b 0080 0370 lri         $AR0, #0x0370
072d 0081 0430 lri         $AR1, #0x0430
072f 1c80      mrr         $IX0, $AR0
0730 a000      mulx        $AX0.L, $AX1.L
0731 ea70      maddc'l     $AC1.M, $AX1.L : $AC0.M, @$AR0
0732 1108 073b bloopi      #0x08, 0x073b
0734 3a93      asrnrx'mv   $ACC0, $AX1.H : $AX0.L, $AC1.M
0735 a478      mulxac'l    $AX0.L, $AX1.L, $ACC0 : $AC1.M, @$AR0
0736 1485      asl         $ACC0, #5
0737 e831      maddc's     $AC0.M, $AX1.L : @$AR1, $AC0.M
0738 3b92      asrnrx'mv   $ACC1, $AX1.H : $AX0.L, $AC0.M
0739 a570      mulxac'l    $AX0.L, $AX1.L, $ACC1 : $AC0.M, @$AR0
073a 1585      asl         $ACC1, #5
073b ea39      maddc's     $AC1.M, $AX1.L : @$AR1, $AC1.M
073c 8e00      set16       
073d 8900      clr         $ACC1
073e 00df 0360 lr          $AC1.M, @0x0360
0740 02df      ret         
}

{
0741 0080 0346 lri         $AR0, #0x0346
0743 02bf 0051 call        0x0051
0745 8100      clr         $ACC0
0746 0080 0430 lri         $AR0, #0x0430
0748 1010      loopi       #0x10
	0749 1b1e      srri        @$AR0, $AC0.M
074a 00fe 0442 sr          @0x0442, $AC0.M
074c 00fe 0443 sr          @0x0443, $AC0.M
074e 009c 0000 lri         $AC0.L, #0x0000
0750 00fe 041c sr          @0x041c, $AC0.M
0752 00fc 041d sr          @0x041d, $AC0.L
0754 009e 0100 lri         $AC0.M, #0x0100
0756 009c f100 lri         $AC0.L, #0xf100
0758 00fe 044e sr          @0x044e, $AC0.M
075a 00fc 044f sr          @0x044f, $AC0.L
075c 009e 0040 lri         $AC0.M, #0x0040
075e 009c 0000 lri         $AC0.L, #0x0000
0760 00fe 044c sr          @0x044c, $AC0.M
0762 00fc 044d sr          @0x044d, $AC0.L
0764 009e 0009 lri         $AC0.M, #0x0009
0766 00fe 0440 sr          @0x0440, $AC0.M
0768 009e 0010 lri         $AC0.M, #0x0010
076a 00fe 041a sr          @0x041a, $AC0.M
076c 009e 0100 lri         $AC0.M, #0x0100
076e 009c f250 lri         $AC0.L, #0xf250
0770 00fe 044a sr          @0x044a, $AC0.M
0772 00fc 044b sr          @0x044b, $AC0.L
0774 009c 0000 lri         $AC0.L, #0x0000
0776 00fe 0448 sr          @0x0448, $AC0.M
0778 00fc 0449 sr          @0x0449, $AC0.L
077a 009e 0001 lri         $AC0.M, #0x0001
077c 00fe 0441 sr          @0x0441, $AC0.M
077e 8900      clr         $ACC1
077f 00ff 0401 sr          @0x0401, $AC1.M
0781 1180 079b bloopi      #0x80, 0x079b
{
	0783 0083 0580 lri         $AR3, #0x0580
	0785 009f 0100 lri         $AC1.M, #0x0100
	0787 02bf 06a6 call        0x06a6
	0789 0081 0346 lri         $AR1, #0x0346
	078b 193e      lrri        $AC0.M, @$AR1
	078c 18bc      lrrd        $AC0.L, @$AR1
	078d 009f 0580 lri         $AC1.M, #0x0580
	078f 0080 0100 lri         $AR0, #0x0100
	0791 02bf 008b call        0x008b
	0793 0081 0346 lri         $AR1, #0x0346
	0795 193e      lrri        $AC0.M, @$AR1
	0796 18bc      lrrd        $AC0.L, @$AR1
	0797 0098 0200 lri         $AX0.L, #0x0200
	0799 7000      addaxl      $ACC0, $AX0.L
	079a 1b3e      srri        @$AR1, $AC0.M
	079b 1abc      srrd        @$AR1, $AC0.L
}		
079c 029f 0049 jmp         0x0049
}

void 079e_AudioFormatRAW20()
{
079e 8900      clr         $ACC1
079f 009f 0050 lri         $AC1.M, #0x0050
07a1 0083 0520 lri         $AR3, #0x0520
07a3 02bf 07b9 call        0x07b9
07a5 029f 04e7 jmp         0x04e7
}

void 07a7_AudioFormatRAW21()
{
07a7 00d8 0402 lr          $AX0.L, @0x0402
07a9 8100      clr         $ACC0
07aa 8900      clr         $ACC1
07ab 00dc 0418 lr          $AC0.L, @0x0418
07ad 009a 0050 lri         $AX0.H, #0x0050
07af 9000      mul         $AX0.L, $AX0.H
07b0 9400      mulac       $AX0.L, $AX0.H, $ACC0
07b1 1404      lsl         $ACC0, #4
07b2 1ffe      mrr         $AC1.M, $AC0.M
07b3 0083 0580 lri         $AR3, #0x0580
07b5 02bf 07b9 call        0x07b9
07b7 029f 04df jmp         0x04df
}

{
07b9 0092 0004 lri         $CR, #0x0004
07bb 8100      clr         $ACC0
07bc 2622      lrs         $AC0.M, @0x0022
07bd 2423      lrs         $AC0.L, @0x0023
07be 1f1f      mrr         $AX0.L, $AC1.M
07bf 009a 0000 lri         $AX0.H, #0x0000
07c1 5800      subax       $ACC0, $AX0
07c2 0290 07d9 jge         0x07d9
07c4 8900      clr         $ACC1
07c5 00c0 0423 lr          $AR0, @0x0423
07c7 02bf 07fe call        0x07fe
07c9 8100      clr         $ACC0
07ca 1fd8      mrr         $AC0.M, $AX0.L
07cb 2223      lrs         $AX0.H, @0x0023
07cc 5400      subr        $ACC0, $AX0.H
07cd 0007      dar         $AR3
07ce 1979      lrri        $AX1.L, @$AR3
07cf 005e      loop        $AC0.M
07d0 1b79      srri        @$AR3, $AX1.L
07d1 009f 0001 lri         $AC1.M, #0x0001
07d3 2f01      srs         @0x0001, $AC1.M
07d4 8900      clr         $ACC1
07d5 2f23      srs         @0x0023, $AC1.M
07d6 0092 00ff lri         $CR, #0x00ff
07d8 02df      ret    
}

{      
07d9 2e22      srs         @0x0022, $AC0.M
07da 2c23      srs         @0x0023, $AC0.L
07db 8100      clr         $ACC0
07dc 8900      clr         $ACC1
07dd 264a      lrs         $AC0.M, @0x004a
07de 271c      lrs         $AC1.M, @0x001c
07df 5c00      sub         $ACC0, $ACC1
07e0 2e1e      srs         @0x001e, $AC0.M
07e1 5000      subr        $ACC0, $AX0.L
07e2 0290 07f8 jge         0x07f8
07e4 00c0 041e lr          $AR0, @0x041e
07e6 02bf 07fe call        0x07fe
07e8 8100      clr         $ACC0
07e9 1fd8      mrr         $AC0.M, $AX0.L
07ea 221e      lrs         $AX0.H, @0x001e
07eb 5400      subr        $ACC0, $AX0.H
07ec 1c1e      mrr         $AR0, $AC0.M
07ed 8100      clr         $ACC0
07ee 2e1c      srs         @0x001c, $AC0.M
07ef 2648      lrs         $AC0.M, @0x0048
07f0 2449      lrs         $AC0.L, @0x0049
07f1 2e4c      srs         @0x004c, $AC0.M
07f2 2c4d      srs         @0x004d, $AC0.L
07f3 02bf 07fe call        0x07fe
07f5 0092 00ff lri         $CR, #0x00ff
07f7 02df      ret         
} 

{
07f8 1c18      mrr         $AR0, $AX0.L
07f9 02bf 07fe call        0x07fe
07fb 0092 00ff lri         $CR, #0x00ff
07fd 02df      ret   
}

{     
07fe 8100      clr         $ACC0
07ff 1fc0      mrr         $AC0.M, $AR0
0800 b100      tst         $ACC0
0801 02d5      retz        
0802 8900      clr         $ACC1
0803 271c      lrs         $AC1.M, @0x001c
0804 0340 0001 andi        $AC1.M, #0x0001
0806 009b 0000 lri         $AX1.H, #0x0000
0808 1f3f      mrr         $AX1.L, $AC1.M
0809 264c      lrs         $AC0.M, @0x004c
080a 244d      lrs         $AC0.L, @0x004d
080b 8900      clr         $ACC1
080c 251c      lrs         $AC1.L, @0x001c
080d 1501      lsl         $ACC1, #1
080e 4c00      add         $ACC0, $ACC1
080f 5a00      subax       $ACC0, $AX1
0810 5a00      subax       $ACC0, $AX1
0811 1c20      mrr         $AR1, $AR0
0812 1fe0      mrr         $AC1.M, $AR0
0813 0502      addis       $AC1.M, #0x02
0814 1c1f      mrr         $AR0, $AC1.M
0815 009f 0a00 lri         $AC1.M, #0x0a00
0817 0092 00ff lri         $CR, #0x00ff
0819 02bf 007e call        0x007e
081b 0092 0004 lri         $CR, #0x0004
081d 271c      lrs         $AC1.M, @0x001c
081e 1f61      mrr         $AX1.H, $AR1
081f 4700      addr        $ACC1, $AX1.H
0820 2f1c      srs         @0x001c, $AC1.M
0821 0080 0a00 lri         $AR0, #0x0a00
0823 8900      clr         $ACC1
0824 1ff9      mrr         $AC1.M, $AX1.L
0825 b900      tst         $ACC1
0826 0274      ifnz        
0827 0008      iar         $AR0
0828 8900      clr         $ACC1
0829 1fe1      mrr         $AC1.M, $AR1
082a 191e      lrri        $AC0.M, @$AR0
082b 0701      cmpis       $AC1.M, #0x01
082c 0293 0835 jle         0x0835
082e 191a      lrri        $AX0.H, @$AR0
082f 05fe      addis       $AC1.M, #0xfe
0830 005f      loop        $AC1.M
0831 64a0      movr'ls     $ACC0, $AX0.H : $AX0.H, $AC0.M
0832 1b7e      srri        @$AR3, $AC0.M
0833 1b7a      srri        @$AR3, $AX0.H
0834 02df      ret      
}

{   
0835 1b7e      srri        @$AR3, $AC0.M
0836 02df      ret         
}

{
0837 0092 0004 lri         $CR, #0x0004
0839 2201      lrs         $AX0.H, @0x0001
083a 8600      tstaxh      $AX0.H
083b 0294 0868 jnz         0x0868
083d 2204      lrs         $AX0.H, @0x0004
083e 8600      tstaxh      $AX0.H
083f 02b4 08bc callnz      0x08bc
0841 2219      lrs         $AX0.H, @0x0019
0842 8600      tstaxh      $AX0.H
0843 0295 085d jz          0x085d
0845 009e 0430 lri         $AC0.M, #0x0430
0847 4400      addr        $ACC0, $AX0.H
0848 1c1e      mrr         $AR0, $AC0.M
0849 0e10      lris        $AC0.M, #0x10
084a 5400      subr        $ACC0, $AX0.H
084b 1f7e      mrr         $AX1.H, $AC0.M
084c 02bf 0699 call        0x0699
084e d900      cmpar       $ACC1, $AX1.H
084f 0292 085c jg          0x085c
0851 0295 0858 jz          0x0858
0853 2619      lrs         $AC0.M, @0x0019
0854 4c00      add         $ACC0, $ACC1
0855 2e19      srs         @0x0019, $AC0.M
0856 029f 08b9 jmp         0x08b9

0858 8100      clr         $ACC0
0859 2e19      srs         @0x0019, $AC0.M
085a 029f 08b9 jmp         0x08b9

085c 5700      subr        $ACC1, $AX1.H
085d 8100      clr         $ACC0
085e 2605      lrs         $AC0.M, @0x0005
085f b100      tst         $ACC0
0860 0295 0879 jz          0x0879
0862 8100      clr         $ACC0
0863 2e05      srs         @0x0005, $AC0.M
0864 2241      lrs         $AX0.H, @0x0041
0865 8600      tstaxh      $AX0.H
0866 0294 086f jnz         0x086f
0868 8100      clr         $ACC0
0869 005f      loop        $AC1.M
086a 1b7e      srri        @$AR3, $AC0.M
086b 7400      incm        $AC0.M
086c 2e01      srs         @0x0001, $AC0.M
086d 029f 08b9 jmp         0x08b9

086f 2648      lrs         $AC0.M, @0x0048
0870 2449      lrs         $AC0.L, @0x0049
0871 2e1c      srs         @0x001c, $AC0.M
0872 2c1d      srs         @0x001d, $AC0.L
0873 02bf 08c1 call        0x08c1
0875 2642      lrs         $AC0.M, @0x0042
0876 2443      lrs         $AC0.L, @0x0043
0877 2e3f      srs         @0x003f, $AC0.M
0878 2c3e      srs         @0x003e, $AC0.L
0879 00ff 0360 sr          @0x0360, $AC1.M
087b 2620      lrs         $AC0.M, @0x0020
087c 2421      lrs         $AC0.L, @0x0021
087d 009f 0005 lri         $AC1.M, #0x0005
087f 02bf 0103 call        0x0103
0881 0092 0004 lri         $CR, #0x0004
0883 8900      clr         $ACC1
0884 00ff 0362 sr          @0x0362, $AC1.M
0886 00df 0360 lr          $AC1.M, @0x0360
0888 02bf 08db call        0x08db
088a 8100      clr         $ACC0
088b 00de 0362 lr          $AC0.M, @0x0362
088d 2240      lrs         $AX0.H, @0x0040
088e 4400      addr        $ACC0, $AX0.H
088f 00fe 0362 sr          @0x0362, $AC0.M
0891 8100      clr         $ACC0
0892 2622      lrs         $AC0.M, @0x0022
0893 2423      lrs         $AC0.L, @0x0023
0894 0a01      lris        $AX0.H, #0x01
0895 0081 0405 lri         $AR1, #0x0405
0897 7a00      dec         $ACC0
0898 b100      tst         $ACC0
0899 0275      ifz         
089a 1a3a      srr         @$AR1, $AX0.H
089b 2e22      srs         @0x0022, $AC0.M
089c 2c23      srs         @0x0023, $AC0.L
089d 0710      cmpis       $AC1.M, #0x10
089e 0293 08a7 jle         0x08a7
08a0 05f0      addis       $AC1.M, #0xf0
08a1 2205      lrs         $AX0.H, @0x0005
08a2 8600      tstaxh      $AX0.H
08a3 0294 0862 jnz         0x0862
08a5 029f 0888 jmp         0x0888
08a7 0275      ifz         
08a8 8900      clr         $ACC1
08a9 2f19      srs         @0x0019, $AC1.M
08aa 1fc3      mrr         $AC0.M, $AR3
08ab 04f0      addis       $AC0.M, #0xf0
08ac 1c1e      mrr         $AR0, $AC0.M
08ad 0083 0430 lri         $AR3, #0x0430
08af 0e10      lris        $AC0.M, #0x10
08b0 02bf 0699 call        0x0699
08b2 2620      lrs         $AC0.M, @0x0020
08b3 2421      lrs         $AC0.L, @0x0021
08b4 00d8 0362 lr          $AX0.L, @0x0362
08b6 7000      addaxl      $ACC0, $AX0.L
08b7 2c21      srs         @0x0021, $AC0.L
08b8 2e20      srs         @0x0020, $AC0.M
08b9 0092 00ff lri         $CR, #0x00ff
08bb 02df      ret         
}

{
08bc 8100      clr         $ACC0
08bd 2e1c      srs         @0x001c, $AC0.M
08be 2e1d      srs         @0x001d, $AC0.M
08bf 2e3e      srs         @0x003e, $AC0.M
08c0 2e3f      srs         @0x003f, $AC0.M
08c1 231c      lrs         $AX1.H, @0x001c
08c2 211d      lrs         $AX1.L, @0x001d
08c3 264a      lrs         $AC0.M, @0x004a
08c4 244b      lrs         $AC0.L, @0x004b
08c5 5a00      subax       $ACC0, $AX1
08c6 147c      lsr         $ACC0, #-4
08c7 2e22      srs         @0x0022, $AC0.M
08c8 2c23      srs         @0x0023, $AC0.L
08c9 261c      lrs         $AC0.M, @0x001c
08ca 241d      lrs         $AC0.L, @0x001d
08cb 147c      lsr         $ACC0, #-4
08cc 2240      lrs         $AX0.H, @0x0040
08cd c010      mulc'mv     $AC0.M, $AX0.H : $AX0.L, $AC0.L
08ce 9600      mulmv       $AX0.L, $AX0.H, $ACC0
08cf f000      lsl16       $ACC0
08d0 4e00      addp        $ACC0
08d1 234c      lrs         $AX1.H, @0x004c
08d2 214d      lrs         $AX1.L, @0x004d
08d3 4a00      addax       $ACC0, $AX1
08d4 2e20      srs         @0x0020, $AC0.M
08d5 2c21      srs         @0x0021, $AC0.L
08d6 8100      clr         $ACC0
08d7 2e05      srs         @0x0005, $AC0.M
08d8 2e19      srs         @0x0019, $AC0.M
08d9 2e04      srs         @0x0004, $AC0.M
08da 02df      ret      
}

{
08db 00ff 0360 sr          @0x0360, $AC1.M
08dd 0080 ffd3 lri         $AR0, #0xffd3
08df 0084 0000 lri         $IX0, #0x0000
08e1 199e      lrrn        $AC0.M, @$AR0
08e2 1ffe      mrr         $AC1.M, $AC0.M
08e3 1401      lsl         $ACC0, #1
08e4 0240 001e andi        $AC0.M, #0x001e
08e6 0200 0300 addi        $AC0.M, #0x0300
08e8 1c3e      mrr         $AR1, $AC0.M
08e9 157c      lsr         $ACC1, #-4
08ea 0340 000f andi        $AC1.M, #0x000f
08ec 0a11      lris        $AX0.H, #0x11
08ed 5500      subr        $ACC1, $AX0.H
08ee 009a 00f0 lri         $AX0.H, #0x00f0
08f0 009b 000f lri         $AX1.H, #0x000f
08f2 0082 0370 lri         $AR2, #0x0370
08f4 1998      lrrn        $AX0.L, @$AR0
08f5 6000      movr        $ACC0, $AX0.L
08f6 1107 08fd bloopi      #0x07, 0x08fd
{
	08f8 3400      andr        $AC0.M, $AX0.H
	08f9 1408      lsl         $ACC0, #8
	08fa 6032      movr's      $ACC0, $AX0.L : @$AR2, $AC0.M
	08fb 3644      andr'ln     $AC0.M, $AX1.H : $AX0.L, @$AR0
	08fc 140c      lsl         $ACC0, #12
	08fd 6032      movr's      $ACC0, $AX0.L : @$AR2, $AC0.M
}
08fe 3400      andr        $AC0.M, $AX0.H
08ff 1408      lsl         $ACC0, #8
0900 6032      movr's      $ACC0, $AX0.L : @$AR2, $AC0.M
0901 3600      andr        $AC0.M, $AX1.H
0902 140c      lsl         $ACC0, #12
0903 1b5e      srri        @$AR2, $AC0.M
0904 8f00      set40       
0905 1f7f      mrr         $AX1.H, $AC1.M
0906 203e      lrs         $AX0.L, @0x003e
0907 273f      lrs         $AC1.M, @0x003f
0908 193a      lrri        $AX0.H, @$AR1
0909 1939      lrri        $AX1.L, @$AR1
090a 0080 0370 lri         $AR0, #0x0370
090c 1c80      mrr         $IX0, $AR0
090d a000      mulx        $AX0.L, $AX1.L
090e ea70      maddc'l     $AC1.M, $AX1.L : $AC0.M, @$AR0
090f 3a93      asrnrx'mv   $ACC0, $AX1.H : $AX0.L, $AC1.M
0910 a478      mulxac'l    $AX0.L, $AX1.L, $ACC0 : $AC1.M, @$AR0
0911 1485      asl         $ACC0, #5
0912 e833      maddc's     $AC0.M, $AX1.L : @$AR3, $AC0.M
0913 3b92      asrnrx'mv   $ACC1, $AX1.H : $AX0.L, $AC0.M
0914 a570      mulxac'l    $AX0.L, $AX1.L, $ACC1 : $AC0.M, @$AR0
0915 1585      asl         $ACC1, #5
0916 ea3b      maddc's     $AC1.M, $AX1.L : @$AR3, $AC1.M
0917 1106 0920 bloopi      #0x06, 0x0920
{
	0919 3a93      asrnrx'mv   $ACC0, $AX1.H : $AX0.L, $AC1.M
	091a a478      mulxac'l    $AX0.L, $AX1.L, $ACC0 : $AC1.M, @$AR0
	091b 1485      asl         $ACC0, #5
	091c e833      maddc's     $AC0.M, $AX1.L : @$AR3, $AC0.M
	091d 3b92      asrnrx'mv   $ACC1, $AX1.H : $AX0.L, $AC0.M
	091e a570      mulxac'l    $AX0.L, $AX1.L, $ACC1 : $AC0.M, @$AR0
	091f 1585      asl         $ACC1, #5
	0920 ea3b      maddc's     $AC1.M, $AX1.L : @$AR3, $AC1.M
}
0921 3a93      asrnrx'mv   $ACC0, $AX1.H : $AX0.L, $AC1.M
0922 a478      mulxac'l    $AX0.L, $AX1.L, $ACC0 : $AC1.M, @$AR0
0923 1485      asl         $ACC0, #5
0924 e833      maddc's     $AC0.M, $AX1.L : @$AR3, $AC0.M
0925 3b92      asrnrx'mv   $ACC1, $AX1.H : $AX0.L, $AC0.M
0926 a500      mulxac      $AX0.L, $AX1.L, $ACC1
0927 1585      asl         $ACC1, #5
0928 1b7f      srri        @$AR3, $AC1.M
0929 2e3e      srs         @0x003e, $AC0.M
092a 2f3f      srs         @0x003f, $AC1.M
092b 8e00      set16       
092c 8900      clr         $ACC1
092d 00df 0360 lr          $AC1.M, @0x0360
092f 02df      ret  
}

{    
0930 0083 0520 lri         $AR3, #0x0520
0932 00de 041b lr          $AC0.M, @0x041b
0934 1050      loopi       #0x50
	0935 1b7e      srri        @$AR3, $AC0.M
0936 029f 04e7 jmp         0x04e7
}

0938 0000      nop         
0939 0000      nop         
093a 0000      nop         
093b 0000      nop         
093c 0000      nop         
093d 0000      nop         
093e 0000      nop         
093f 0000      nop