MIDISEND
FILE INFORMATION
FILENAME(S): MIDISEND
FILE TYPE(S): PRG
FILE SIZE: 3.9K
FIRST SEEN: 2025-11-30 18:12:15
APPEARS ON: 1 disk(s)
FILE HASH
1d1eba67a35f9496721c546d02bcab27c74fb636c8089089d8312caee282809a
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 38 S 1 | MIDISEND | PRG | Sailor, Ganheden | 19 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0F 08 0A 00 8D 36 30 31 30 30 20 3A 9C 00 |.......60100 :..|
00000010: 32 08 1E 00 97 35 33 32 38 30 2C 30 3A 97 35 33 |2....53280,0:.53|
00000020: 32 38 31 2C 30 3A 99 C7 28 31 34 29 3A 99 22 93 |281,0:..(14):.".|
00000030: 9E 22 00 3E 08 28 00 86 4B 59 28 39 30 29 00 54 |.".>.(..KY(90).T|
00000040: 08 32 00 81 49 B2 31 A4 39 30 3A 4B 59 28 49 29 |.2..I.1.90:KY(I)|
00000050: B2 30 3A 82 00 7C 08 3C 00 81 49 B2 36 30 A4 38 |.0:..|.<..I.60.8|
00000060: 35 3A 87 4A 3A 4B 59 28 4A 29 B2 49 3A 8B 49 B1 |5:.J:KY(J).I:.I.|
00000070: 37 32 A7 4B 59 28 4A 29 B2 49 AB 31 00 82 08 46 |72.KY(J).I.1...F|
00000080: 00 82 00 AE 08 50 00 83 39 30 2C 38 33 2C 38 38 |.....P..90,83,88|
00000090: 2C 36 38 2C 36 37 2C 38 36 2C 37 31 2C 36 36 2C |,68,67,86,71,66,|
000000A0: 37 32 2C 37 38 2C 37 34 2C 37 37 2C 34 34 00 DA |72,78,74,77,44..|
000000B0: 08 5A 00 83 38 31 2C 35 30 2C 38 37 2C 35 31 2C |.Z..81,50,87,51,|
000000C0: 36 39 2C 38 32 2C 35 33 2C 38 34 2C 35 34 2C 38 |69,82,53,84,54,8|
000000D0: 39 2C 35 35 2C 38 35 2C 37 33 00 E5 08 64 00 46 |9,55,85,73...d.F|
000000E0: 4C 41 47 B2 30 00 EE 08 6E 00 99 22 93 22 00 1D |LAG.0...n.."."..|
000000F0: 09 78 00 99 A3 32 29 22 B0 C0 C0 C0 C0 C0 C0 C0 |.x...2)"........|
00000100: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000110: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE 22 00 4C 09 |............".L.|
00000120: 82 00 99 A3 32 29 22 DD 20 20 20 20 20 20 20 20 |....2)". |
00000130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000140: 20 20 20 20 20 20 20 20 20 20 DD 22 00 7B 09 8C | .".{..|
00000150: 00 99 A3 32 29 22 DD 20 20 20 20 CD C9 C4 C9 20 |...2)". .... |
00000160: D0 4C 41 59 42 41 43 4B 20 D4 45 53 54 20 D0 52 |.LAYBACK .EST .R|
00000170: 4F 47 52 41 4D 20 20 20 20 DD 22 00 AA 09 96 00 |OGRAM .".....|
00000180: 99 A3 32 29 22 DD 20 20 20 20 20 20 20 20 20 20 |..2)". |
00000190: 20 20 20 20 20 57 49 54 48 20 20 20 20 20 20 20 | WITH |
000001A0: 20 20 20 20 20 20 20 20 DD 22 00 D9 09 A0 00 99 | ."......|
000001B0: A3 32 29 22 DD 20 D3 45 51 55 45 4E 54 49 41 4C |.2)". .EQUENTIAL|
000001C0: 20 4F 52 20 D0 41 53 53 50 4F 52 54 20 C9 4E 54 | OR .ASSPORT .NT|
000001D0: 45 52 46 41 43 45 20 DD 22 00 08 0A AA 00 99 A3 |ERFACE .".......|
000001E0: 32 29 22 DD 20 20 20 20 20 20 20 20 20 20 20 20 |2)". |
000001F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000200: 20 20 20 20 20 20 DD 22 00 37 0A B4 00 99 A3 32 | .".7.....2|
00000210: 29 22 DD 20 20 20 20 20 20 20 20 20 C4 41 56 49 |)". .AVI|
00000220: 44 20 D2 2E 20 C2 52 4F 4F 4B 53 20 20 20 20 20 |D .. .ROOKS |
00000230: 20 20 20 20 20 DD 22 00 66 0A BE 00 99 A3 32 29 | .".f.....2)|
00000240: 22 DD 20 20 20 20 20 20 20 20 20 20 20 20 CA 55 |". .U|
00000250: 4E 45 20 31 39 38 36 20 20 20 20 20 20 20 20 20 |NE 1986 |
00000260: 20 20 20 20 DD 22 00 95 0A C8 00 99 A3 32 29 22 | .".......2)"|
00000270: AD C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000280: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000290: C0 C0 C0 BD 22 00 B4 0A D2 00 54 58 B2 32 3A 8F |....".....TX.2:.|
000002A0: 20 54 52 41 4E 53 4D 49 54 20 52 45 41 44 59 20 | TRANSMIT READY |
000002B0: 46 4C 41 47 00 DA 0A DC 00 56 4E B2 36 34 3A 8F |FLAG.....VN.64:.|
000002C0: 20 56 45 4C 4F 43 49 54 59 20 42 59 54 45 20 46 | VELOCITY BYTE F|
000002D0: 4F 52 20 4E 4F 54 45 20 4F 4E 00 00 0B E6 00 56 |OR NOTE ON.....V|
000002E0: 4F B2 30 3A 8F 20 56 45 4C 4F 43 49 54 59 20 42 |O.0:. VELOCITY B|
000002F0: 59 54 45 20 46 4F 52 20 4E 4F 54 45 20 4F 46 46 |YTE FOR NOTE OFF|
00000300: 00 17 0B F0 00 44 44 B2 32 30 3A 8F 20 44 45 4C |.....DD.20:. DEL|
00000310: 41 59 20 54 49 4D 45 00 2B 0B FA 00 8B 46 4C 41 |AY TIME.+....FLA|
00000320: 47 B3 B1 30 A7 99 3A 89 33 36 30 00 49 0B 04 01 |G..0..:.360.I...|
00000330: 99 3A 99 A3 31 30 29 22 D7 48 49 43 48 20 49 4E |.:..10)".HICH IN|
00000340: 54 45 52 46 41 43 45 3F 22 00 61 0B 0E 01 99 A3 |TERFACE?".a.....|
00000350: 31 30 29 22 12 D3 92 45 51 55 45 4E 54 49 41 4C |10)"...EQUENTIAL|
00000360: 22 00 7E 0B 18 01 99 A3 31 30 29 22 12 D0 92 41 |".~.....10)"...A|
00000370: 53 53 50 4F 52 54 22 3A 97 31 39 38 2C 2E 00 91 |SSPORT":.198,...|
00000380: 0B 22 01 A1 5A 24 3A 8B 5A 24 B2 22 22 A7 32 39 |."..Z$:.Z$."".29|
00000390: 30 00 B8 0B 2C 01 8B 5A 24 B2 22 53 22 B0 5A 24 |0...,..Z$."S".Z$|
000003A0: B2 22 D3 22 20 A7 8D 31 30 36 30 3A 99 22 91 91 |."." ..1060:."..|
000003B0: 91 91 22 3A 89 33 35 30 00 DF 0B 36 01 8B 5A 24 |..":.350...6..Z$|
000003C0: B2 22 50 22 B0 5A 24 B2 22 D0 22 20 A7 8D 31 31 |."P".Z$."." ..11|
000003D0: 32 30 3A 99 22 91 91 91 91 22 3A 89 33 35 30 00 |20:."....":.350.|
000003E0: E8 0B 54 01 89 32 39 30 00 F3 0B 5E 01 46 4C 41 |..T..290...^.FLA|
000003F0: 47 B2 31 00 F9 0B 68 01 3A 00 23 0C 72 01 99 A3 |G.1...h.:.#.r...|
00000400: 31 30 29 22 12 D0 92 20 2D 20 D0 4C 41 59 20 D3 |10)"... - .LAY .|
00000410: 43 41 4C 45 20 20 20 20 20 20 20 20 20 20 20 20 |CALE |
00000420: 20 20 22 00 4D 0C 7C 01 99 A3 31 30 29 22 12 CE | ".M.|...10)"..|
00000430: 92 20 2D 20 D0 4C 41 59 20 CE 4F 54 45 53 20 C6 |. - .LAY .OTES .|
00000440: 52 4F 4D 20 CB 45 59 42 4F 41 52 44 22 00 77 0C |ROM .EYBOARD".w.|
00000450: 86 01 99 A3 31 30 29 22 12 C3 92 20 2D 20 C3 48 |....10)"... - .H|
00000460: 41 4E 47 45 20 D0 52 4F 47 52 41 4D 20 20 20 20 |ANGE .ROGRAM |
00000470: 20 20 20 20 20 20 22 00 A1 0C 90 01 99 A3 31 30 | ".......10|
00000480: 29 22 12 D1 92 20 2D 20 D1 55 49 54 20 20 20 20 |)"... - .UIT |
00000490: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000004A0: 22 00 A7 0C 95 01 99 00 D8 0C 9A 01 99 22 20 20 |"............" |
000004B0: 20 20 20 20 20 20 20 20 20 20 C5 4E 54 45 52 20 | .NTER |
000004C0: D3 45 4C 45 43 54 49 4F 4E 3A 20 20 20 20 20 20 |.ELECTION: |
000004D0: 20 20 20 20 20 20 22 3B 00 EB 0C A4 01 A1 4A 24 | ";......J$|
000004E0: 3A 8B 4A 24 B2 22 22 A7 34 32 30 00 03 0D AE 01 |:.J$."".420.....|
000004F0: 8B 4A 24 B2 22 D0 22 B0 4A 24 B2 22 50 22 A7 20 |.J$.".".J$."P". |
00000500: 34 37 30 00 1B 0D AF 01 8B 4A 24 B2 22 CE 22 B0 |470......J$.".".|
00000510: 4A 24 B2 22 4E 22 A7 20 37 32 30 00 33 0D B1 01 |J$."N". 720.3...|
00000520: 8B 4A 24 B2 22 C3 22 B0 4A 24 B2 22 43 22 A7 20 |.J$.".".J$."C". |
00000530: 36 32 30 00 4C 0D B5 01 8B 4A 24 B2 22 D1 22 B0 |620.L....J$.".".|
00000540: 4A 24 B2 22 51 22 A7 20 31 30 34 30 00 56 0D B8 |J$."Q". 1040.V..|
00000550: 01 89 20 34 32 30 00 5C 0D C2 01 3A 00 7B 0D CC |.. 420.\...:.{..|
00000560: 01 8F 20 2A 2A 2A 20 50 4C 41 59 20 41 53 43 45 |.. *** PLAY ASCE|
00000570: 4E 44 49 4E 47 20 53 43 41 4C 45 00 9B 0D D6 01 |NDING SCALE.....|
00000580: 92 53 52 2C 54 58 3A 8F 20 52 45 41 44 59 20 54 |.SR,TX:. READY T|
00000590: 4F 20 54 52 41 4E 53 4D 49 54 3F 00 D6 0D E0 01 |O TRANSMIT?.....|
000005A0: 97 54 52 2C 31 34 34 3A 8F 20 49 46 20 53 4F 2C |.TR,144:. IF SO,|
000005B0: 20 53 45 4E 44 20 53 54 41 54 55 53 20 42 59 54 | SEND STATUS BYT|
000005C0: 45 20 46 4F 52 20 4E 4F 54 45 20 4F 4E 2F 4E 4F |E FOR NOTE ON/NO|
000005D0: 54 45 20 4F 46 46 00 E3 0D EA 01 81 4E B2 36 30 |TE OFF......N.60|
000005E0: A4 38 38 00 EE 0D F4 01 92 53 52 2C 54 58 00 0B |.88......SR,TX..|
000005F0: 0E FE 01 97 54 52 2C 4E 3A 8F 20 53 45 4E 44 20 |....TR,N:. SEND |
00000600: 4E 4F 54 45 20 4E 55 4D 42 45 52 00 16 0E 08 02 |NOTE NUMBER.....|
00000610: 92 53 52 2C 54 58 00 36 0E 12 02 97 54 52 2C 56 |.SR,TX.6....TR,V|
00000620: 4E 3A 8F 20 53 45 4E 44 20 56 45 4C 4F 43 49 54 |N:. SEND VELOCIT|
00000630: 59 20 42 59 54 45 00 5C 0E 1C 02 81 4B B2 31 A4 |Y BYTE.\....K.1.|
00000640: 44 44 3A 82 3A 8F 20 44 4F 2D 4E 4F 54 48 49 4E |DD:.:. DO-NOTHIN|
00000650: 47 20 44 45 4C 41 59 20 4C 4F 4F 50 00 67 0E 26 |G DELAY LOOP.g.&|
00000660: 02 92 53 52 2C 54 58 00 84 0E 30 02 97 54 52 2C |..SR,TX...0..TR,|
00000670: 4E 3A 8F 20 53 45 4E 44 20 4E 4F 54 45 20 4E 55 |N:. SEND NOTE NU|
00000680: 4D 42 45 52 00 8F 0E 3A 02 92 53 52 2C 54 58 00 |MBER...:..SR,TX.|
00000690: B5 0E 44 02 97 54 52 2C 56 4F 3A 8F 20 53 45 4E |..D..TR,VO:. SEN|
000006A0: 44 20 30 20 42 59 54 45 20 46 4F 52 20 4E 4F 54 |D 0 BYTE FOR NOT|
000006B0: 45 20 4F 46 46 00 E4 0E 4E 02 81 4B B2 31 A4 31 |E OFF...N..K.1.1|
000006C0: 30 3A 82 3A 8F 20 44 4F 2D 4E 4F 54 48 49 4E 47 |0:.:. DO-NOTHING|
000006D0: 20 42 52 45 41 4B 20 42 45 54 57 45 45 4E 20 4E | BREAK BETWEEN N|
000006E0: 4F 54 45 53 00 EA 0E 58 02 82 00 F3 0E 62 02 89 |OTES...X.....b..|
000006F0: 31 31 30 00 15 0F 6C 02 99 22 93 D3 45 4E 44 20 |110...l.."..END |
00000700: 50 52 4F 47 52 41 4D 20 43 48 41 4E 47 45 53 2E |PROGRAM CHANGES.|
00000710: 2E 2E 22 3A 99 00 35 0F 76 02 92 53 52 2C 54 58 |..":..5.v..SR,TX|
00000720: 3A 8F 20 52 45 41 44 59 20 54 4F 20 54 52 41 4E |:. READY TO TRAN|
00000730: 53 4D 49 54 3F 00 5E 0F 80 02 97 54 52 2C 31 39 |SMIT?.^....TR,19|
00000740: 32 3A 8F 20 50 52 4F 47 52 41 4D 20 43 48 41 4E |2:. PROGRAM CHAN|
00000750: 47 45 20 53 54 41 54 55 53 20 42 59 54 45 00 77 |GE STATUS BYTE.w|
00000760: 0F 8A 02 85 22 D0 52 4F 47 52 41 4D 20 4E 55 4D |....".ROGRAM NUM|
00000770: 42 45 52 22 3B 50 4E 00 82 0F 94 02 92 53 52 2C |BER";PN......SR,|
00000780: 54 58 00 8D 0F 9E 02 97 54 52 2C 50 4E 00 A1 0F |TX......TR,PN...|
00000790: A8 02 99 22 C1 47 41 49 4E 20 28 59 2F 4E 29 3F |...".GAIN (Y/N)?|
000007A0: 22 00 B4 0F B2 02 A1 4A 24 3A 8B 4A 24 B2 22 22 |"......J$:.J$.""|
000007B0: A7 36 39 30 00 C4 0F BC 02 8B 4A 24 B2 22 59 22 |.690......J$."Y"|
000007C0: A7 36 32 30 00 CD 0F C6 02 89 31 31 30 00 EB 0F |.620......110...|
000007D0: D0 02 99 22 93 50 4C 41 59 20 46 52 4F 4D 20 4B |...".PLAY FROM K|
000007E0: 45 59 42 4F 41 52 44 2E 2E 2E 22 00 F7 0F DA 02 |EYBOARD...".....|
000007F0: 99 C7 28 31 34 32 29 00 0C 10 E4 02 99 22 20 20 |..(142)......" |
00000800: 32 20 33 20 20 20 34 20 35 20 36 22 00 24 10 EE |2 3 4 5 6".$..|
00000810: 02 99 22 20 51 20 57 20 45 20 52 20 54 20 59 20 |.." Q W E R T Y |
00000820: 55 20 49 22 00 49 10 F8 02 99 22 A7 12 20 92 20 |U I".I....".. . |
00000830: 12 20 92 20 12 20 C2 20 92 20 12 20 92 20 12 20 |. . . . . . . . |
00000840: 92 20 12 20 C2 20 92 A5 22 00 6E 10 02 03 99 22 |. . . ..".n...."|
00000850: A7 12 20 92 20 12 20 92 20 12 20 C2 20 92 20 12 |.. . . . . . . .|
00000860: 20 92 20 12 20 92 20 12 20 C2 20 92 A5 22 00 A2 | . . . . . .."..|
00000870: 10 0C 03 99 22 A7 12 20 92 20 12 20 92 20 12 20 |....".. . . . . |
00000880: C2 20 92 20 12 20 92 20 12 20 92 20 12 20 C2 20 |. . . . . . . . |
00000890: 92 A5 20 28 55 50 50 45 52 20 4F 43 54 41 56 45 |.. (UPPER OCTAVE|
000008A0: 29 22 00 BD 10 16 03 99 22 A7 12 20 C2 20 C2 20 |)"......".. . . |
000008B0: C2 20 C2 20 C2 20 C2 20 C2 20 92 A5 22 00 D8 10 |. . . . . .."...|
000008C0: 20 03 99 22 A7 12 20 C2 20 C2 20 C2 20 C2 20 C2 | ..".. . . . . .|
000008D0: 20 C2 20 C2 20 92 A5 22 00 DF 10 2A 03 99 3A 00 | . . .."...*..:.|
000008E0: F4 10 34 03 99 22 20 20 53 20 44 20 20 20 47 20 |..4.." S D G |
000008F0: 48 20 4A 22 00 0C 11 3E 03 99 22 20 5A 20 58 20 |H J"...>.." Z X |
00000900: 43 20 56 20 42 20 4E 20 4D 20 2C 22 00 31 11 48 |C V B N M ,".1.H|
00000910: 03 99 22 A7 12 20 92 20 12 20 92 20 12 20 C2 20 |..".. . . . . . |
00000920: 92 20 12 20 92 20 12 20 92 20 12 20 C2 20 92 A5 |. . . . . . . ..|
00000930: 22 00 56 11 52 03 99 22 A7 12 20 92 20 12 20 92 |".V.R..".. . . .|
00000940: 20 12 20 C2 20 92 20 12 20 92 20 12 20 92 20 12 | . . . . . . . .|
00000950: 20 C2 20 92 A5 22 00 8A 11 5C 03 99 22 A7 12 20 | . .."...\..".. |
00000960: 92 20 12 20 92 20 12 20 C2 20 92 20 12 20 92 20 |. . . . . . . . |
00000970: 12 20 92 20 12 20 C2 20 92 A5 20 28 4C 4F 57 45 |. . . . .. (LOWE|
00000980: 52 20 4F 43 54 41 56 45 29 22 00 A5 11 66 03 99 |R OCTAVE)"...f..|
00000990: 22 A7 12 20 C2 20 C2 20 C2 20 C2 20 C2 20 C2 20 |".. . . . . . . |
000009A0: C2 20 92 A5 22 00 C0 11 70 03 99 22 A7 12 20 C2 |. .."...p..".. .|
000009B0: 20 C2 20 C2 20 C2 20 C2 20 C2 20 C2 20 92 A5 22 | . . . . . . .."|
000009C0: 00 E3 11 7A 03 99 3A 99 22 50 52 45 53 53 20 53 |...z..:."PRESS S|
000009D0: 50 41 43 45 42 41 52 20 54 4F 20 51 55 49 54 2E |PACEBAR TO QUIT.|
000009E0: 2E 2E 22 00 EE 11 84 03 92 53 52 2C 54 58 00 FA |.."......SR,TX..|
000009F0: 11 8E 03 97 54 52 2C 31 34 34 00 0D 12 98 03 A1 |....TR,144......|
00000A00: 4B 24 3A 8B 4B 24 B2 22 22 A7 39 32 30 00 27 12 |K$:.K$."".920.'.|
00000A10: A2 03 8B C6 28 4B 24 29 B2 33 32 A7 99 C7 28 31 |....(K$).32...(1|
00000A20: 34 29 3A 89 31 31 30 00 32 12 AC 03 92 53 52 2C |4):.110.2....SR,|
00000A30: 54 58 00 44 12 B6 03 97 54 52 2C 4B 59 28 C6 28 |TX.D....TR,KY(.(|
00000A40: 4B 24 29 29 00 4F 12 C0 03 92 53 52 2C 54 58 00 |K$)).O....SR,TX.|
00000A50: 5A 12 CA 03 97 54 52 2C 56 4E 00 68 12 D4 03 81 |Z....TR,VN.h....|
00000A60: 49 B2 31 A4 44 44 3A 82 00 73 12 DE 03 92 53 52 |I.1.DD:..s....SR|
00000A70: 2C 54 58 00 85 12 E8 03 97 54 52 2C 4B 59 28 C6 |,TX......TR,KY(.|
00000A80: 28 4B 24 29 29 00 90 12 F2 03 92 53 52 2C 54 58 |(K$))......SR,TX|
00000A90: 00 9B 12 FC 03 97 54 52 2C 56 4F 00 A4 12 06 04 |......TR,VO.....|
00000AA0: 89 39 32 30 00 D6 12 10 04 99 22 91 20 20 20 20 |.920......". |
00000AB0: 20 20 20 20 20 20 20 C1 52 45 20 D9 4F 55 20 D3 | .RE .OU .|
00000AC0: 55 52 45 3F 20 28 D9 2F CE 29 20 20 20 20 20 20 |URE? (./.) |
00000AD0: 20 20 20 20 22 3B 00 EC 12 11 04 A1 41 24 3A 8B | ";......A$:.|
00000AE0: 41 24 B2 22 22 20 A7 20 31 30 34 31 00 04 13 12 |A$."" . 1041....|
00000AF0: 04 8B 41 24 B2 22 59 22 B0 41 24 B2 22 D9 22 A7 |..A$."Y".A$.".".|
00000B00: 31 30 34 35 00 24 13 13 04 8B 41 24 B2 22 4E 22 |1045.$....A$."N"|
00000B10: B0 41 24 B2 22 CE 22 A7 20 99 22 91 22 3B 3A 89 |.A$.".". .".";:.|
00000B20: 20 34 31 30 00 2F 13 14 04 89 20 31 30 34 31 00 | 410./.... 1041.|
00000B30: 68 13 15 04 9F 31 35 2C 38 2C 31 35 2C 22 52 30 |h....15,8,15,"R0|
00000B40: 3A 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 3D 48 |:HELLO CONNECT=H|
00000B50: 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 22 3A 84 31 |ELLO CONNECT":.1|
00000B60: 35 2C 45 52 3A A0 31 35 00 76 13 16 04 8B 45 52 |5,ER:.15.v....ER|
00000B70: B3 B1 36 33 A7 80 00 8D 13 17 04 93 22 48 45 4C |..63........"HEL|
00000B80: 4C 4F 20 43 4F 4E 4E 45 43 54 22 2C 38 00 B1 13 |LO CONNECT",8...|
00000B90: 1A 04 8F 20 2A 2A 2A 20 53 45 51 55 45 4E 54 49 |... *** SEQUENTI|
00000BA0: 41 4C 20 49 4E 49 54 49 41 4C 49 5A 41 54 49 4F |AL INITIALIZATIO|
00000BB0: 4E 00 D6 13 24 04 43 52 B2 35 36 38 33 32 3A 8F |N...$.CR.56832:.|
00000BC0: 20 41 43 49 41 20 43 4F 4E 54 52 4F 4C 20 52 45 | ACIA CONTROL RE|
00000BD0: 47 49 53 54 45 52 00 0A 14 2E 04 54 52 B2 43 52 |GISTER.....TR.CR|
00000BE0: AA 31 3A 53 52 B2 43 52 AA 32 3A 8F 20 54 52 41 |.1:SR.CR.2:. TRA|
00000BF0: 4E 53 4D 49 54 20 41 4E 44 20 53 54 41 54 55 53 |NSMIT AND STATUS|
00000C00: 20 52 45 47 49 53 54 45 52 53 00 28 14 38 04 97 | REGISTERS.(.8..|
00000C10: 43 52 2C 33 3A 8F 20 41 43 49 41 20 4D 41 53 54 |CR,3:. ACIA MAST|
00000C20: 45 52 20 52 45 53 45 54 00 4C 14 42 04 97 43 52 |ER RESET.L.B..CR|
00000C30: 2C 32 31 3A 8F 20 44 49 53 41 42 4C 45 20 41 43 |,21:. DISABLE AC|
00000C40: 49 41 20 49 4E 54 45 52 52 55 50 54 00 52 14 4C |IA INTERRUPT.R.L|
00000C50: 04 8E 00 74 14 56 04 8F 20 2A 2A 2A 20 50 41 53 |...t.V.. *** PAS|
00000C60: 53 50 4F 52 54 20 49 4E 49 54 49 41 4C 49 5A 41 |SPORT INITIALIZA|
00000C70: 54 49 4F 4E 00 99 14 60 04 43 52 B2 35 36 38 34 |TION...`.CR.5684|
00000C80: 30 3A 8F 20 41 43 49 41 20 43 4F 4E 54 52 4F 4C |0:. ACIA CONTROL|
00000C90: 20 52 45 47 49 53 54 45 52 00 CB 14 6A 04 54 52 | REGISTER...j.TR|
00000CA0: B2 43 52 AA 31 3A 53 52 B2 43 52 3A 8F 20 54 52 |.CR.1:SR.CR:. TR|
00000CB0: 41 4E 53 4D 49 54 20 41 4E 44 20 53 54 41 54 55 |ANSMIT AND STATU|
00000CC0: 53 20 52 45 47 49 53 54 45 52 53 00 EA 14 74 04 |S REGISTERS...t.|
00000CD0: 97 43 52 2C 31 39 3A 8F 20 41 43 49 41 20 4D 41 |.CR,19:. ACIA MA|
00000CE0: 53 54 45 52 20 52 45 53 45 54 00 0E 15 7E 04 97 |STER RESET...~..|
00000CF0: 43 52 2C 31 37 3A 8F 20 44 49 53 41 42 4C 45 20 |CR,17:. DISABLE |
00000D00: 41 43 49 41 20 49 4E 54 45 52 52 55 50 54 00 14 |ACIA INTERRUPT..|
00000D10: 15 88 04 8E 00 2A 15 C4 EA 97 35 33 32 38 30 2C |.....*....53280,|
00000D20: 31 3A 97 35 33 32 38 31 2C 31 00 5F 15 CE EA 99 |1:.53281,1._....|
00000D30: 22 93 08 0E 1E B0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |"...............|
00000D40: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000D50: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE 22 3B 00 |.............";.|
00000D60: 7A 15 D8 EA 81 41 B2 31 A4 32 33 3A 99 22 DD 22 |z....A.1.23:."."|
00000D70: A6 33 38 29 22 DD 22 3B 3A 82 00 AD 15 E2 EA 99 |.38)".";:.......|
00000D80: 22 AD C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |"...............|
00000D90: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000DA0: C0 C0 C0 C0 C0 C0 C0 BD 9D 94 C0 13 22 00 CA 15 |............"...|
00000DB0: EC EA 81 41 B2 32 31 37 A4 32 34 32 3A 97 41 2C |...A.217.242:.A,|
00000DC0: C2 28 41 29 B0 31 32 38 3A 82 00 F3 15 F6 EA 99 |.(A).128:.......|
00000DD0: 22 13 11 11 1D 20 20 20 20 20 20 20 20 20 20 1C |".... .|
00000DE0: CC CF C1 C4 D3 D4 C1 D2 20 D0 52 45 53 45 4E 54 |........ .RESENT|
00000DF0: 53 3A 22 00 21 16 00 EB 99 22 11 11 11 11 11 1D |S:".!...."......|
00000E00: 20 20 20 20 20 20 20 20 1F 12 20 20 20 20 20 20 | .. |
00000E10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E20: 22 00 4C 16 0A EB 99 22 1D 20 20 20 20 20 20 20 |".L....". |
00000E30: 20 1F 12 20 20 20 20 20 20 CD C9 C4 C9 20 20 D3 | .. .... .|
00000E40: 45 4E 44 20 20 20 20 20 20 9B 20 22 00 77 16 14 |END . ".w..|
00000E50: EB 99 22 1D 20 20 20 20 20 20 20 20 1F 12 20 20 |..". .. |
00000E60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E70: 20 20 20 20 9B 20 22 00 A2 16 1E EB 99 22 1D 20 | . "......". |
00000E80: 20 20 20 20 20 20 20 1F 12 20 20 20 C2 59 20 20 | .. .Y |
00000E90: C4 41 56 49 44 20 C2 52 4F 4F 4B 53 20 20 20 9B |.AVID .ROOKS .|
00000EA0: 20 22 00 CD 16 28 EB 99 22 1D 20 20 20 20 20 20 | "...(..". |
00000EB0: 20 20 1F 12 20 20 20 20 20 20 20 20 20 20 20 20 | .. |
00000EC0: 20 20 20 20 20 20 20 20 20 20 9B 20 22 00 F8 16 | . "...|
00000ED0: 32 EB 99 22 1D 20 20 20 20 20 20 20 20 1F 12 20 |2..". .. |
00000EE0: 20 20 20 C3 4F 50 59 52 49 47 48 54 20 31 39 38 | .OPYRIGHT 198|
00000EF0: 37 20 20 20 20 9B 20 22 00 23 17 3C EB 99 22 1D |7 . ".#.<..".|
00000F00: 20 20 20 20 20 20 20 20 1F 12 20 20 20 20 20 20 | .. |
00000F10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000F20: 9B 20 22 00 4C 17 46 EB 99 22 1D 20 20 20 20 20 |. ".L.F..". |
00000F30: 20 20 20 20 12 20 20 20 20 20 20 20 20 20 20 20 | . |
00000F40: 20 20 20 20 20 20 20 20 20 20 20 22 00 7A 17 50 | ".z.P|
00000F50: EB 99 22 11 11 11 11 11 1D 20 20 20 20 20 20 20 |.."...... |
00000F60: 20 1C D0 52 45 53 53 20 D3 D0 C1 C3 C5 20 54 4F | ..RESS ..... TO|
00000F70: 20 43 4F 4E 54 49 4E 55 45 22 00 90 17 5A EB 8B | CONTINUE"...Z..|
00000F80: C2 28 32 30 33 29 B3 B1 36 30 A7 36 30 32 35 30 |.(203)..60.60250|
00000F90: 00 96 17 64 EB 8E 00 00 00 |...d..... |
.......60100 :..2....53280,0:.53281,0:.G
(14):."..".>.(..KY(90).T.2..I.1.90:KY(I)
.0:..|.<..I.60.85:.J:KY(J).I:.I.72.KY(J)
.I.1...F.....P..90,83,88,68,67,86,71,66,
72,78,74,77,44.Z.Z..81,50,87,51,69,82,53
,84,54,89,55,85,73...D.FLAG.0...N.."."..
.X...2)"................................
....".L.....2)".
.".{.....2)". MIDI PLAYBACK
TEST PROGRAM .".......2)".
WITH .".Y. ...2)". SE
QUENTIAL OR PASSPORT INTERFACE .".......
2)". ."
.7.....2)". DAVID R. BROOKS
.".F.....2)". JUNE 1986
."...H...2)"................
...................."...R.TX.2:. TRANSMI
T READY FLAG.Z...VN.64:. VELOCITY BYTE F
OR NOTE ON.....VO.0:. VELOCITY BYTE FOR
NOTE OFF.....DD.20:. DELAY TIME.+....FLA
G..0..:.360.I....:..10)"WHICH INTERFACE?
".A.....10)".S.EQUENTIAL".~.....10)".P.A
SSPORT":.198,...."..Z$:.Z$."".290...,..Z
$."S".Z$."S" ..1060:."....":.350...6..Z$
."P".Z$."P" ..1120:."....":.350...T..290
...^.FLAG.1...H.:.#.R...10)".P. - PLAY S
CALE ".M.|...10)".N. - PLAY
NOTES FROM KEYBOARD".W.....10)".C. - CH
ANGE PROGRAM ".......10)".Q. -
QUIT ".......X...."
ENTER SELECTION: ";
......J$:.J$."".420......J$."P".J$."P".
470......J$."N".J$."N". 720.3....J$."C".
J$."C". 620.L....J$."Q".J$."Q". 1040.V..
.. 420.\.B.:.{.L.. *** PLAY ASCENDING SC
ALE...V..SR,TX:. READY TO TRANSMIT?.V...
.TR,144:. IF SO, SEND STATUS BYTE FOR NO
TE ON/NOTE OFF......N.60.88......SR,TX..
....TR,N:. SEND NOTE NUMBER......SR,TX.6
....TR,VN:. SEND VELOCITY BYTE.\....K.1.
DD:.:. DO-NOTHING DELAY LOOP.G.&..SR,TX.
..0..TR,N:. SEND NOTE NUMBER...:..SR,TX.
..D..TR,VO:. SEND 0 BYTE FOR NOTE OFF...
N..K.1.10:.:. DO-NOTHING BREAK BETWEEN N
OTES...X.....B..110...L..".SEND PROGRAM
CHANGES...":..5.V..SR,TX:. READY TO TRAN
SMIT?.^....TR,192:. PROGRAM CHANGE STATU
S BYTE.W...."PROGRAM NUMBER";PN......SR,
TX......TR,PN......"AGAIN (Y/N)?"......J
$:.J$."".690.D....J$."Y".620.M.F..110...
P..".PLAY FROM KEYBOARD..."...Z..G(142).
....." 2 3 4 5 6".$...." Q W E R T Y
U I".I....".. . . . . B . . . . . . B ..
".N....".. . . . . B . . . . . . B .."..
....".. . . . . B . . . . . . B .. (UPPE
R OCTAVE)"......".. B B B B B B B ..".X.
..".. B B B B B B B .."...*..:...4.."
S D G H J"...>.." Z X C V B N M ,".1.H
..".. . . . . B . . . . . . B ..".V.R.."
.. . . . . B . . . . . . B .."...\.."..
. . . . B . . . . . . B .. (LOWER OCTAVE
)"...F..".. B B B B B B B .."...P..".. B
B B B B B B .."...Z..:."PRESS SPACEBAR
TO QUIT..."......SR,TX......TR,144......
K$:.K$."".920.'....F(K$).32..G(14):.110.
2....SR,TX.D....TR,KY(F(K$)).O....SR,TX.
Z.J..TR,VN.H.T..I.1.DD:..S....SR,TX.....
.TR,KY(F(K$))......SR,TX......TR,VO.....
.920.V....". ARE YOU SURE? (Y/
N) ";......A$:.A$."" . 1041....
..A$."Y".A$."Y".1045.$....A$."N".A$."N".
.".";:. 410./.... 1041.H....15,8,15,"R0
:HELLO CONNECT=HELLO CONNECT":.15,ER: 15
.V....ER..63........"HELLO CONNECT",8...
... *** SEQUENTIAL INITIALIZATION.V.$.CR
.56832:. ACIA CONTROL REGISTER.....TR.CR
.1:SR.CR.2:. TRANSMIT AND STATUS REGISTE
RS.(.8..CR,3:. ACIA MASTER RESET.L.B..CR
,21:. DISABLE ACIA INTERRUPT.R.L...T.V..
*** PASSPORT INITIALIZATION...`.CR.5684
0:. ACIA CONTROL REGISTER.K.J.TR.CR.1:SR
.CR:. TRANSMIT AND STATUS REGISTERS...T.
.CR,19:. ACIA MASTER RESET...~..CR,17:.
DISABLE ACIA INTERRUPT.......*.D..53280,
1:.53281,1._.N..".......................
.....................";.Z.X..A.1.23:."."
.38)".";:.......".......................
....................".J....A.217.242:.A,
B(A).128:.......".... .LOADSTAR
PRESENTS:".!...."...... ..
".L....". ..
MIDI SEND . ".W....". ..
. "......". .
. BY DAVID BROOKS . ".M.(..".
.. . "...2..".
.. COPYRIGHT 1987 . ".#.<..".
.. . ".L.F.
.". . ".Z.P
.."...... .PRESS SPACE TO CONTINU
E"...Z..B(203)..60.60250...D.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL