Home » CEEFAX disks » telesoftware11.adl » MIDI
MIDI
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
Tape/disk: | Home » CEEFAX disks » telesoftware11.adl |
Filename: | MIDI |
Read OK: | ✔ |
File size: | 0140 bytes |
Load address: | FFFF0E00 |
Exec address: | FFFF802B |
File contents
10FORA%=0 TO 3 STEP3 20P%=&C00 30[ 40OPT A% 50LDA#3:STA&FCF0 60LDA#22:STA&FCF0 70LDX#0 80.l1 90TXA:JSRout 100JSRin:STA&2000,X 110INX:BNEl1 120RTS 130.in 140LDA&FCF0:AND#1:BEQin 150LDA&FCF0:STA&2100,X 160LDA&FCF1:RTS 170.out 180PHA 190.out1 200LDA&FCF0:AND#2:BEQout1 210LDA&FCF0:STA&2200,X 220PLA:STA&FCF1:RTS 230] 240NEXT
�A%=0 � 3 �3 P%=&C00 [ ( OPT A% 2LDA#3:STA&FCF0 <LDA#22:STA&FCF0 F LDX#0 P.l1 ZTXA:JSRout dJSRin:STA&2000,X n INX:BNEl1 xRTS �.in �LDA&FCF0:�#1:BEQin �LDA&FCF0:STA&2100,X �LDA&FCF1:RTS �.out �PHA � .out1 �LDA&FCF0:�#2:BEQout1 �LDA&FCF0:STA&2200,X �PLA:STA&FCF1:RTS �] �� �
00000000 0d 00 0a 10 e3 41 25 3d 30 20 b8 20 33 20 88 33 |.....A%=0 . 3 .3| 00000010 0d 00 14 0b 50 25 3d 26 43 30 30 0d 00 1e 05 5b |....P%=&C00....[| 00000020 0d 00 28 0a 4f 50 54 20 41 25 0d 00 32 12 4c 44 |..(.OPT A%..2.LD| 00000030 41 23 33 3a 53 54 41 26 46 43 46 30 0d 00 3c 13 |A#3:STA&FCF0..<.| 00000040 4c 44 41 23 32 32 3a 53 54 41 26 46 43 46 30 0d |LDA#22:STA&FCF0.| 00000050 00 46 09 4c 44 58 23 30 0d 00 50 07 2e 6c 31 0d |.F.LDX#0..P..l1.| 00000060 00 5a 0e 54 58 41 3a 4a 53 52 6f 75 74 0d 00 64 |.Z.TXA:JSRout..d| 00000070 14 4a 53 52 69 6e 3a 53 54 41 26 32 30 30 30 2c |.JSRin:STA&2000,| 00000080 58 0d 00 6e 0d 49 4e 58 3a 42 4e 45 6c 31 0d 00 |X..n.INX:BNEl1..| 00000090 78 07 52 54 53 0d 00 82 07 2e 69 6e 0d 00 8c 16 |x.RTS.....in....| 000000a0 4c 44 41 26 46 43 46 30 3a 80 23 31 3a 42 45 51 |LDA&FCF0:.#1:BEQ| 000000b0 69 6e 0d 00 96 17 4c 44 41 26 46 43 46 30 3a 53 |in....LDA&FCF0:S| 000000c0 54 41 26 32 31 30 30 2c 58 0d 00 a0 10 4c 44 41 |TA&2100,X....LDA| 000000d0 26 46 43 46 31 3a 52 54 53 0d 00 aa 08 2e 6f 75 |&FCF1:RTS.....ou| 000000e0 74 0d 00 b4 07 50 48 41 0d 00 be 09 2e 6f 75 74 |t....PHA.....out| 000000f0 31 0d 00 c8 18 4c 44 41 26 46 43 46 30 3a 80 23 |1....LDA&FCF0:.#| 00000100 32 3a 42 45 51 6f 75 74 31 0d 00 d2 17 4c 44 41 |2:BEQout1....LDA| 00000110 26 46 43 46 30 3a 53 54 41 26 32 32 30 30 2c 58 |&FCF0:STA&2200,X| 00000120 0d 00 dc 14 50 4c 41 3a 53 54 41 26 46 43 46 31 |....PLA:STA&FCF1| 00000130 3a 52 54 53 0d 00 e6 05 5d 0d 00 f0 05 ed 0d ff |:RTS....].......| 00000140