MIDI RANDOM TONE
FILE INFORMATION
FILENAME(S): MIDI RANDOM TONE
FILE TYPE(S): PRG
FILE SIZE: 3.2K
FIRST SEEN: 2025-11-30 21:13:15
APPEARS ON: 1 disk(s)
FILE HASH
539207b190ac8c3565bed1f0fe4cb83f36a92346ab2d66104c42295d12d2fa3b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ABC | MIDI RANDOM TONE | PRG | DuncanTwain | 2 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 20 08 01 00 8F 20 50 52 4F 47 52 41 4D 20 |.. .... PROGRAM | 00000010: 4D 49 44 49 20 52 41 4E 44 4F 4D 20 54 4F 4E 45 |MIDI RANDOM TONE| 00000020: 00 26 08 02 00 3A 00 3C 08 14 00 97 35 33 32 38 |.&...:.<....5328| 00000030: 30 2C 30 3A 97 35 33 32 38 31 2C 30 00 49 08 1E |0,0:.53281,0.I..| 00000040: 00 54 B2 36 30 3A 52 B2 31 00 71 08 23 00 99 22 |.T.60:R.1.q.#.."| 00000050: 93 11 12 2A 2A 2A 2A 20 52 41 4E 44 4F 4D 20 54 |...**** RANDOM T| 00000060: 4F 4E 45 20 2A 2A 2A 2A 92 20 20 20 4D 49 44 49 |ONE ****. MIDI| 00000070: 22 00 9F 08 24 00 99 22 20 20 20 20 11 12 43 92 |"...$.." ..C.| 00000080: 20 31 39 38 34 20 42 59 20 55 53 45 52 20 47 31 | 1984 BY USER G1| 00000090: 2D 31 35 35 35 39 26 50 49 54 22 3A 99 3A 99 00 |-15559&PIT":.:..| 000000A0: B9 08 26 00 85 22 43 48 41 4E 4E 45 4C 20 20 1D |..&.."CHANNEL .| 000000B0: 1D 31 9D 9D 9D 22 3B 4D 43 00 D4 08 28 00 85 22 |.1...";MC...(.."| 000000C0: 56 45 4C 4F 43 49 54 59 1D 1D 1D 38 30 9D 9D 9D |VELOCITY...80...| 000000D0: 9D 22 3B 56 00 ED 08 32 00 85 22 53 50 45 45 44 |.";V...2.."SPEED| 000000E0: 20 20 20 1D 1D 1D 35 9D 9D 9D 22 3B 53 00 0B 09 | ...5...";S...| 000000F0: 33 00 8F 49 4E 50 55 54 22 52 41 4E 47 45 20 20 |3..INPUT"RANGE | 00000100: 20 1D 1D 1D 31 9D 9D 9D 22 3B 52 00 29 09 37 00 | ...1...";R.).7.| 00000110: 99 22 11 43 55 52 53 4F 52 20 3D 20 43 48 41 4E |.".CURSOR = CHAN| 00000120: 47 45 20 53 50 45 45 44 22 00 51 09 38 00 99 22 |GE SPEED".Q.8.."| 00000130: 53 50 41 43 45 20 20 3D 20 53 54 4F 50 20 41 4E |SPACE = STOP AN| 00000140: 44 20 43 4F 4E 54 49 4E 55 45 22 3A 99 3A 99 3A |D CONTINUE":.:.:| 00000150: 99 00 57 09 3A 00 3A 00 62 09 3B 00 8F 20 4C 4F |..W.:.:.b.;.. LO| 00000160: 4F 50 00 74 09 3C 00 8D 32 30 30 3A 8F 20 4B 45 |OP.t.<..200:. KE| 00000170: 59 20 4F 4E 00 8C 09 3D 00 A1 44 53 24 3A 8B 44 |Y ON...=..DS$:.D| 00000180: 53 24 B2 22 11 22 A7 53 B2 53 AA 31 00 9F 09 46 |S$.".".S.S.1...F| 00000190: 00 8B 44 53 24 B2 22 1D 22 A7 53 B2 53 AB 31 00 |..DS$.".".S.S.1.| 000001A0: B8 09 47 00 8B 44 53 24 B2 22 20 22 A7 39 30 30 |..G..DS$." ".900| 000001B0: 3A 8F 20 50 41 55 53 45 00 C5 09 48 00 8B 53 B3 |:. PAUSE...H..S.| 000001C0: 30 A7 53 B2 30 00 DD 09 50 00 99 22 91 91 53 50 |0.S.0...P.."..SP| 000001D0: 45 45 44 3A 20 20 20 9D 9D 9D 22 3B 53 00 EE 09 |EED: ...";S...| 000001E0: 5A 00 99 22 54 4F 4E 45 20 3A 22 3B 54 25 00 05 |Z.."TONE :";T%..| 000001F0: 0A 64 00 54 25 B2 B5 28 33 36 AA 52 AC 36 30 AC |.d.T%..(36.R.60.| 00000200: BB 28 31 29 29 00 1A 0A 82 00 81 49 B2 31 A4 53 |.(1))......I.1.S| 00000210: 3A 82 3A 8F 20 44 45 4C 41 59 00 2D 0A 8C 00 8D |:.:. DELAY.-....| 00000220: 33 30 30 3A 8F 20 4B 45 59 20 4F 46 46 00 35 0A |300:. KEY OFF.5.| 00000230: 96 00 89 36 30 00 44 0A BE 00 8F 20 4C 4F 4F 50 |...60.D.... LOOP| 00000240: 20 45 4E 44 00 4A 0A BF 00 3A 00 50 0A C0 00 3A | END.J...:.P...:| 00000250: 00 64 0A C1 00 8F 20 20 20 53 55 42 52 4F 55 54 |.d.... SUBROUT| 00000260: 49 4E 45 53 00 6A 0A C2 00 3A 00 89 0A C8 00 97 |INES.j...:......| 00000270: 32 35 31 2C 31 34 33 AA 4D 43 3A 97 32 35 32 2C |251,143.MC:.252,| 00000280: 54 25 3A 97 32 35 33 2C 56 00 A4 0A D2 00 9E 34 |T%:.253,V......4| 00000290: 39 36 36 34 3A 8E 3A 20 20 20 20 20 8F 20 4B 45 |9664:.: . KE| 000002A0: 59 20 4F 4E 00 AA 0A 22 01 3A 00 B5 0A 2C 01 97 |Y ON...".:...,..| 000002B0: 32 35 33 2C 30 00 D1 0A 36 01 9E 34 39 36 36 34 |253,0...6..49664| 000002C0: 3A 8E 3A 20 20 20 20 20 8F 20 4B 45 59 20 4F 46 |:.: . KEY OF| 000002D0: 46 00 D7 0A 81 03 3A 00 DD 0A 82 03 3A 00 E3 0A |F.....:.....:...| 000002E0: 83 03 3A 00 EC 0A 84 03 8D 33 30 30 00 13 0B 85 |..:......300....| 000002F0: 03 99 22 11 11 11 11 11 20 45 20 3D 20 45 4E 44 |.."..... E = END| 00000300: 20 20 53 50 41 43 45 20 3D 20 43 4F 4E 54 49 4E | SPACE = CONTIN| 00000310: 55 45 22 00 28 0B 86 03 A1 44 53 24 3A 8B 44 53 |UE".(....DS$:.DS| 00000320: 24 B2 22 22 A7 39 30 32 00 37 0B 8E 03 8B 44 53 |$."".902.7....DS| 00000330: 24 B2 22 45 22 A7 80 00 6E 0B 98 03 8B 44 53 24 |$."E"...n....DS$| 00000340: B2 22 20 22 A7 99 22 91 20 20 20 20 20 20 20 20 |." "..". | 00000350: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000360: 20 20 20 91 91 91 91 91 91 22 3A 89 36 30 00 77 | ......":.60.w| 00000370: 0B A2 03 89 39 30 32 00 00 00 AA AA AA AA AA AA |....902.........| 00000380: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00000390: AA AA A5 2D 85 22 A5 2E 85 23 A5 37 85 24 A5 38 |...-."...#.7.$.8| 000003A0: 85 25 A0 00 A5 22 D0 02 C6 23 C6 22 B1 22 D0 3C |.%..."...#.".".<| 000003B0: A5 22 D0 02 C6 23 C6 22 B1 22 F0 21 85 26 A5 22 |."...#.".".!.&."| 000003C0: D0 02 C6 23 C6 22 B1 22 18 65 24 AA A5 26 65 25 |...#.".".e$..&e%| 000003D0: 48 A5 37 D0 02 C6 38 C6 37 68 91 37 8A 48 A5 37 |H.7...8.7h.7.H.7| 000003E0: D0 02 C6 38 C6 37 68 91 37 18 90 B6 C9 4F D0 ED |...8.7h.7....O..| 000003F0: A5 37 85 33 A5 38 85 34 6C 37 00 4F 4F 4F 4F AD |.7.3.8.4l7.OOOO.| 00000400: E6 FF 00 8D 16 03 AD E7 FF 00 8D 17 03 A9 80 20 |............... | 00000410: 90 FF 00 00 D8 68 8D 3E 02 68 8D 3D 02 68 8D 3C |.....h.>.h.=.h.<| 00000420: 02 68 8D 3B 02 68 AA 68 A8 38 8A E9 02 8D 3A 02 |.h.;.h.h.8....:.| 00000430: 98 E9 00 00 8D 39 02 BA 8E 3F 02 20 57 FD 00 A2 |.....9...?. W...| 00000440: 42 A9 2A 20 57 FA 00 A9 52 D0 34 E6 C1 D0 06 E6 |B.* W...R.4.....| 00000450: C2 D0 02 E6 26 60 20 CF FF C9 0D D0 F8 68 68 A9 |....&` ......hh.| 00000460: 90 20 D2 FF A9 00 00 85 26 A2 0D A9 2E 20 57 FA |. ......&.... W.| 00000470: 00 A9 05 20 D2 FF 20 3E F8 00 C9 2E F0 F9 C9 20 |... .. >....... | 00000480: F0 F5 A2 0E DD B7 FF 00 D0 0C 8A 0A AA BD C7 FF |................| 00000490: 00 48 BD C6 FF 00 48 60 CA 10 EC 4C ED FA 00 A5 |.H....H`...L....| 000004A0: C1 8D 3A 02 A5 C2 8D 39 02 60 A9 08 85 1D A0 00 |..:....9.`......| 000004B0: 00 20 54 FD 00 B1 C1 20 48 FA 00 20 33 F8 00 C6 |. T.... H.. 3...| 000004C0: 1D D0 F1 60 20 88 FA 00 90 0B A2 00 00 81 C1 C1 |...` ...........| 000004D0: C1 F0 03 4C ED FA 00 20 33 F8 00 C6 1D 60 A9 3B |...L... 3....`.;| 000004E0: 85 C1 A9 02 85 C2 A9 05 60 98 48 20 57 FD 00 68 |........`.H W..h| 000004F0: A2 2E 4C 57 FA 00 A9 90 20 D2 FF A2 00 00 BD EA |..LW.... .......| 00000500: FF 00 20 D2 FF E8 E0 16 D0 F5 A0 3B 20 C2 F8 00 |.. ........; ...| 00000510: AD 39 02 20 48 FA 00 AD 3A 02 20 48 FA 00 20 B7 |.9. H...:. H.. .| 00000520: F8 00 20 8D F8 00 F0 5C 20 3E F8 00 20 79 FA 00 |.. ....\ >.. y..| 00000530: 90 33 20 69 FA 00 20 3E F8 00 20 79 FA 00 90 28 |.3 i.. >.. y...(| 00000540: 20 69 FA 00 A9 90 20 D2 FF 20 E1 FF F0 3C A6 26 | i.... .. ...<.&| 00000550: D0 38 A5 C3 C5 C1 A5 C4 E5 C2 90 2E A0 3A 20 C2 |.8...........: .| 00000560: F8 00 20 41 FA 00 20 8B F8 00 F0 E0 4C ED FA 00 |.. A.. .....L...| 00000570: 20 79 FA 00 90 03 20 80 F8 00 20 B7 F8 00 D0 07 | y.... ... .....| 00000580: 20 79 FA 00 90 EB A9 08 85 1D 20 3E F8 00 20 A1 | y........ >.. .| 00000590: F8 00 D0 F8 4C 47 F8 00 20 CF FF C9 0D F0 0C C9 |....LG.. .......| 000005A0: 20 D0 D1 20 79 FA 00 90 03 20 80 F8 00 A9 90 20 | .. y.... ..... | 000005B0: D2 FF AE 3F 02 9A 78 AD 39 02 48 AD 3A 02 48 AD |...?..x.9.H.:.H.| 000005C0: 3B 02 48 AD 3C 02 AE 3D 02 AC 3E 02 40 A9 90 20 |;.H.<..=..>.@.. | 000005D0: D2 FF AE 3F 02 9A 6C 02 A0 A0 01 84 BA 84 B9 88 |...?..l.........| 000005E0: 84 B7 84 90 84 93 A9 40 85 BB A9 02 85 BC 20 CF |.......@...... .| 000005F0: FF C9 20 F0 F9 C9 0D F0 38 C9 22 D0 14 20 CF FF |.. .....8.".. ..| 00000600: C9 22 F0 10 C9 0D F0 29 91 BB E6 B7 C8 C0 10 D0 |.".....)........| 00000610: EC 4C ED FA 00 20 CF FF C9 0D F0 16 C9 2C D0 DC |.L... .......,..| 00000620: 20 88 FA 00 29 0F F0 E9 C9 03 F0 E5 85 BA 20 CF | ...)......... .| 00000630: FF C9 0D 60 6C 30 03 6C 32 03 20 96 F9 00 D0 D4 |...`l0.l2. .....| 00000640: A9 90 20 D2 FF A9 00 00 20 EF F9 00 A5 90 29 10 |.. ..... .....).| 00000650: D0 C4 4C 47 F8 00 20 96 F9 00 C9 2C D0 BA 20 79 |..LG.. ....,.. y| 00000660: FA 00 20 69 FA 00 20 CF FF C9 2C D0 AD 20 79 FA |.. i.. ...,.. y.| 00000670: 00 A5 C1 85 AE A5 C2 85 AF 20 69 FA 00 20 CF FF |......... i.. ..| 00000680: C9 0D D0 98 A9 90 20 D2 FF 20 F2 F9 00 4C 47 F8 |...... .. ...LG.| 00000690: 00 A5 C2 20 48 FA 00 A5 C1 48 4A 4A 4A 4A 20 60 |... H....HJJJJ `| 000006A0: FA 00 AA 68 29 0F 20 60 FA 00 48 8A 20 D2 FF 68 |...h). `..H. ..h| 000006B0: 4C D2 FF 09 30 C9 3A 90 02 69 06 60 A2 02 B5 C0 |L...0.:..i.`....| 000006C0: 48 B5 C2 95 C0 68 95 C2 CA D0 F3 60 20 88 FA 00 |H....h.....` ...| 000006D0: 90 02 85 C2 20 88 FA 00 90 02 85 C1 60 A9 00 00 |.... .......`...| 000006E0: 85 2A 20 3E F8 00 C9 20 D0 09 20 3E F8 00 C9 20 |.* >... .. >... | 000006F0: D0 0E 18 60 20 AF FA 00 0A 0A 0A 0A 85 2A 20 3E |...` ........* >| 00000700: F8 00 20 AF FA 00 05 2A 38 60 C9 3A 90 02 69 08 |.. ....*8`.:..i.| 00000710: 29 0F 60 A2 02 2C A2 00 00 B4 C1 D0 08 B4 C2 D0 |).`..,..........| 00000720: 02 E6 26 D6 C2 D6 C1 60 20 3E F8 00 C9 20 F0 F9 |..&....` >... ..| 00000730: 60 A9 00 00 8D 00 00 01 20 CC FA 00 20 8F FA 00 |`....... ... ...| 00000740: 20 7C FA 00 90 09 60 20 3E F8 00 20 79 FA 00 B0 | |....` >.. y...| 00000750: DE AE 3F 02 9A A9 90 20 D2 FF A9 3F 20 D2 FF 4C |..?.... ...? ..L| 00000760: 47 F8 00 20 54 FD 00 CA D0 FA 60 E6 C3 D0 02 E6 |G.. T.....`.....| 00000770: C4 60 A2 02 B5 C0 48 B5 27 95 C0 68 95 27 CA D0 |.`....H.'..h.'..| 00000780: F3 60 A5 C3 A4 C4 38 E9 02 B0 0E 88 90 0B A5 28 |.`....8........(| 00000790: A4 29 4C 33 FB 00 A5 C3 A4 C4 38 E5 C1 85 1E 98 |.)L3......8.....| 000007A0: E5 C2 A8 05 1E 60 20 D4 FA 00 20 69 FA 00 20 E5 |.....` ... i.. .| 000007B0: FA 00 20 0C FB 00 20 E5 FA 00 20 2F FB 00 20 69 |.. ... ... /.. i| 000007C0: FA 00 90 15 A6 26 D0 64 20 28 FB 00 90 5F A1 C1 |.....&.d (..._..| 000007D0: 81 C3 20 05 FB 00 20 33 F8 00 D0 EB 20 28 FB 00 |.. ... 3.... (..| 000007E0: 18 A5 1E 65 C3 85 C3 98 65 C4 85 C4 20 0C FB 00 |...e....e... ...| 000007F0: A6 26 D0 3D A1 C1 81 C3 20 28 FB 00 B0 34 20 B8 |.&.=.... (...4 .| 00000800: FA 00 20 BB FA 00 4C 7D FB 00 20 D4 FA 00 20 69 |.. ...L}.. ... i| 00000810: FA 00 20 E5 FA 00 20 69 FA 00 20 3E F8 00 20 88 |.. ... i.. >.. .| 00000820: FA 00 90 14 85 1D A6 26 D0 11 20 2F FB 00 90 0C |.......&.. /....| 00000830: A5 1D 81 C1 20 33 F8 00 D0 EE 4C ED FA 00 4C 47 |.... 3....L...LG| 00000840: F8 00 20 D4 FA 00 20 69 FA 00 20 E5 FA 00 20 69 |.. ... i.. ... i| 00000850: FA 00 20 3E F8 00 A2 00 00 20 3E F8 00 C9 27 D0 |.. >..... >...'.| 00000860: 14 20 3E F8 00 9D 10 02 E8 20 CF FF C9 0D F0 22 |. >...... ....."| 00000870: E0 20 D0 F1 F0 1C 8E 00 00 01 20 8F FA 00 90 C6 |. ........ .....| 00000880: 9D 10 02 E8 20 CF FF C9 0D F0 09 20 88 FA 00 90 |.... ...... ....| 00000890: B6 E0 20 D0 EC 86 1C A9 90 20 D2 FF 20 57 FD 00 |.. ...... .. W..| 000008A0: A2 00 00 A0 00 00 B1 C1 DD 10 02 D0 0C C8 E8 E4 |................| 000008B0: 1C D0 F3 20 41 FA 00 20 54 FD 00 20 33 F8 00 A6 |... A.. T.. 3...| 000008C0: 26 D0 8D 20 2F FB 00 B0 DD 4C 47 F8 00 20 D4 FA |&.. /....LG.. ..| 000008D0: 00 85 20 A5 C2 85 21 A2 00 00 86 28 A9 93 20 D2 |.. ...!....(.. .| 000008E0: FF A9 90 20 D2 FF A9 16 85 1D 20 6A FC 00 20 CA |... ...... j.. .| 000008F0: FC 00 85 C1 84 C2 C6 1D D0 F2 A9 91 20 D2 FF 4C |............ ..L| 00000900: 47 F8 00 A0 2C 20 C2 F8 00 20 54 FD 00 20 41 FA |G..., ... T.. A.| 00000910: 00 20 54 FD 00 A2 00 00 A1 C1 20 D9 FC 00 48 20 |. T....... ...H | 00000920: 1F FD 00 68 20 35 FD 00 A2 06 E0 03 D0 12 A4 1F |...h 5..........| 00000930: F0 0E A5 2A C9 E8 B1 C1 B0 1C 20 C2 FC 00 88 D0 |...*...... .....| 00000940: F2 06 2A 90 0E BD 2A FF 00 20 A5 FD 00 BD 30 FF |..*...*.. ....0.| 00000950: 00 F0 03 20 A5 FD 00 CA D0 D5 60 20 CD FC 00 AA |... ......` ....| 00000960: E8 D0 01 C8 98 20 C2 FC 00 8A 86 1C 20 48 FA 00 |..... ...... H..| 00000970: A6 1C 60 A5 1F 38 A4 C2 AA 10 01 88 65 C1 90 01 |..`..8......e...| 00000980: C8 60 A8 4A 90 0B 4A B0 17 C9 22 F0 13 29 07 09 |.`.J..J..."..)..| 00000990: 80 4A AA BD D9 FE 00 B0 04 4A 4A 4A 4A 29 0F D0 |.J.......JJJJ)..| 000009A0: 04 A0 80 A9 00 00 AA BD 1D FF 00 85 2A 29 03 85 |............*)..| 000009B0: 1F 98 29 8F AA 98 A0 03 E0 8A F0 0B 4A 90 08 4A |..).........J..J| 000009C0: 4A 09 20 88 D0 FA C8 88 D0 F2 60 B1 C1 20 C2 FC |J. .......`.. ..| 000009D0: 00 A2 01 20 FE FA 00 C4 1F C8 90 F1 A2 03 C0 04 |... ............| 000009E0: 90 F2 60 A8 B9 37 FF 00 85 28 B9 77 FF 00 85 29 |..`..7...(.w...)| 000009F0: A9 00 00 A0 05 06 29 26 28 2A 88 D0 F8 69 3F 20 |......)&(*...i? | 00000A00: D2 FF CA D0 EC A9 20 2C A9 0D 4C D2 FF 20 D4 FA |...... ,..L.. ..| 00000A10: 00 20 69 FA 00 20 E5 FA 00 20 69 FA 00 A2 00 00 |. i.. ... i.....| 00000A20: 86 28 A9 90 20 D2 FF 20 57 FD 00 20 72 FC 00 20 |.(.. .. W.. r.. | 00000A30: CA FC 00 85 C1 84 C2 20 E1 FF F0 05 20 2F FB 00 |....... .... /..| 00000A40: B0 E9 4C 47 F8 00 20 D4 FA 00 A9 03 85 1D 20 3E |..LG.. ....... >| 00000A50: F8 00 20 A1 F8 00 D0 F8 A5 20 85 C1 A5 21 85 C2 |.. ...... ...!..| 00000A60: 4C 46 FC 00 C5 28 F0 03 20 D2 FF 60 20 D4 FA 00 |LF...(.. ..` ...| 00000A70: 20 69 FA 00 8E 11 02 A2 03 20 CC FA 00 48 CA D0 | i....... ...H..| 00000A80: F9 A2 03 68 38 E9 3F A0 05 4A 6E 11 02 6E 10 02 |...h8.?..Jn..n..| 00000A90: 88 D0 F6 CA D0 ED A2 02 20 CF FF C9 0D F0 1E C9 |........ .......| 00000AA0: 20 F0 F5 20 D0 FE 00 B0 0F 20 9C FA 00 A4 C1 84 | .. ..... ......| 00000AB0: C2 85 C1 A9 30 9D 10 02 E8 9D 10 02 E8 D0 DB 86 |....0...........| 00000AC0: 28 A2 00 00 86 26 F0 04 E6 26 F0 75 A2 00 00 86 |(....&...&.u....| 00000AD0: 1D A5 26 20 D9 FC 00 A6 2A 86 29 AA BC 37 FF 00 |..& ....*.)..7..| 00000AE0: BD 77 FF 00 20 B9 FE 00 D0 E3 A2 06 E0 03 D0 19 |.w.. ...........| 00000AF0: A4 1F F0 15 A5 2A C9 E8 A9 30 B0 21 20 BF FE 00 |.....*...0.! ...| 00000B00: D0 CC 20 C1 FE 00 D0 C7 88 D0 EB 06 2A 90 0B BC |.. .........*...| 00000B10: 30 FF 00 BD 2A FF 00 20 B9 FE 00 D0 B5 CA D0 D1 |0...*.. ........| 00000B20: F0 0A 20 B8 FE 00 D0 AB 20 B8 FE 00 D0 A6 A5 28 |.. ..... ......(| 00000B30: C5 1D D0 A0 20 69 FA 00 A4 1F F0 28 A5 29 C9 9D |.... i.....(.)..| 00000B40: D0 1A 20 1C FB 00 90 0A 98 D0 04 A5 1E 10 0A 4C |.. ............L| 00000B50: ED FA 00 C8 D0 FA A5 1E 10 F6 A4 1F D0 03 B9 C2 |................| 00000B60: 00 00 91 C1 88 D0 F8 A5 26 91 C1 20 CA FC 00 85 |........&.. ....| 00000B70: C1 84 C2 A9 90 20 D2 FF A0 41 20 C2 F8 00 20 54 |..... ...A ... T| 00000B80: FD 00 20 41 FA 00 20 54 FD 00 A9 05 20 D2 FF 4C |.. A.. T.... ..L| 00000B90: B0 FD 00 A8 20 BF FE 00 D0 11 98 F0 0E 86 1C A6 |.... ...........| 00000BA0: 1D DD 10 02 08 E8 86 1D A6 1C 28 60 C9 30 90 03 |..........(`.0..| 00000BB0: C9 47 60 38 60 40 02 45 03 D0 08 40 09 30 22 45 |.G`8`@.E...@.0"E| 00000BC0: 33 D0 08 40 09 40 02 45 33 D0 08 40 09 40 02 45 |3..@.@.E3..@.@.E| 00000BD0: B3 D0 08 40 09 00 00 22 44 33 D0 8C 44 00 00 11 |...@..."D3..D...| 00000BE0: 22 44 33 D0 8C 44 9A 10 22 44 33 D0 08 40 09 10 |"D3..D.."D3..@..| 00000BF0: 22 44 33 D0 08 40 09 62 13 78 A9 00 00 21 81 82 |"D3..@.b.x...!..| 00000C00: 00 00 00 00 59 4D 91 92 86 4A 85 9D 2C 29 2C 23 |....YM...J..,),#| 00000C10: 28 24 59 00 00 58 24 24 00 00 1C 8A 1C 23 5D 8B |($Y..X$$.....#].| 00000C20: 1B A1 9D 8A 1D 23 9D 8B 1D A1 00 00 29 19 AE 69 |.....#......)..i| 00000C30: A8 19 23 24 53 1B 23 24 53 19 A1 00 00 1A 5B 5B |..#$S.#$S.....[[| 00000C40: A5 69 24 24 AE AE A8 AD 29 00 00 7C 00 00 15 9C |.i$$....)..|....| 00000C50: 6D 9C A5 69 29 53 84 13 34 11 A5 69 23 A0 D8 62 |m..i)S..4..i#..b| 00000C60: 5A 48 26 62 94 88 54 44 C8 54 68 44 E8 94 00 00 |ZH&b..TD.ThD....| 00000C70: B4 08 84 74 B4 28 6E 74 F4 CC 4A 72 F2 A4 8A 00 |...t.(nt..Jr....| 00000C80: 00 AA A2 A2 74 74 74 72 44 68 B2 32 B2 00 00 22 |....tttrDh.2..."| 00000C90: 00 00 1A 1A 26 26 72 72 88 C8 C4 CA 26 48 44 44 |....&&rr....&HDD| 00000CA0: A2 C8 3A 3B 52 4D 47 58 4C 53 54 46 48 44 50 2C |..:;RMGXLSTFHDP,| 00000CB0: 41 42 F9 00 35 F9 00 CC F8 00 F7 F8 00 56 F9 00 |AB..5........V..| 00000CC0: 89 F9 00 F4 F9 00 0C FA 00 3E FB 00 92 FB 00 C0 |.........>......| 00000CD0: FB 00 38 FC 00 5B FD 00 8A FD 00 AC FD 00 46 F8 |..8..[........F.| 00000CE0: 00 FF F7 00 ED F7 00 0D 20 20 20 50 43 20 20 53 |........ PC S| 00000CF0: 52 20 41 43 20 58 52 20 59 52 20 53 50 FF 00 |R AC XR YR SP.. |
.. .... PROGRAM MIDI RANDOM TONE.&...:.<
....53280,0:.53281,0.I...T.60:R.1.Q.#.."
...**** RANDOM TONE ****. MIDI"...$.."
..C. 1984 BY USER G1-15559&PIT":.:..
..&.."CHANNEL ..1...";MC.T.(.."VELOCITY
...80....";V...2.."SPEED ...5...";S...
3..INPUT"RANGE ...1...";R.).7..".CURSO
R = CHANGE SPEED".Q.8.."SPACE = STOP AN
D CONTINUE":.:.:..W.:.:.B.;.. LOOP.T.<..
200:. KEY ON...=..DS$:.DS$.".".S.S.1...F
..DS$.".".S.S.1...G..DS$." ".900:. PAUSE
.E.H..S.0.S.0...P.."..SPEED: ...";S...
Z.."TONE :";T%...D.T%..(36.R.60..(1))...
...I.1.S:.:. DELAY.-....300:. KEY OFF.5.
...60.D.... LOOP END.J...:.P...:.D.A..
SUBROUTINES.J.B.:...H..251,143.MC:.252,
T%:.253,V...R..49664:.: . KEY ON..."
.:...,..253,0.Q.6..49664:.: . KEY OF
F.W...:.....:.....:......300......".....
E = END SPACE = CONTINUE".(....DS$:.DS
$."".902.7....DS$."E"...N....DS$." "..".
......":.60.W
....902............................-."..
.#.7.$.8.% .."P.F#F"."P<."P.F#F".".!.&."
P.F#F".".E$..&E%H.7P.F8F7H.7.H.7P.F8F7H.
7...IOP..7.3.8.4L7.OOOO................
....XH.>.H.=.H.<.H.;.H.H.8....:......9..
.?. W...B.* W...RP4.AP..BP..&` O.I.P.HH.
. R.....&.... W.... R. >..I...I ........
P.....G..H.F..H`J..L....A.:..B.9.`.... .
. T...A H.. 3..F.P.` .........AAA..L...
3..F.`.;.A...B..`.H W..H..LW.... R......
.. R....P. ; B...9. H...:. H.. ... ....\
>.. Y...3 I.. >.. Y...( I.... R. ...<.&
P8.CEA.D.B.. : B.. A.. .....L... Y.... .
.. ...P. Y........ >.. ...P.LG.. O.I...I
PQ Y.... ..... R..?..X.9.H.:.H.;.H.<..=
..>.@.. R..?..L. .............@...... O
.I ..I..8I"P. O.I"..I..)....H..P.L... O.
I...I,P. ...)...I..... O.I.`L0.L2. ...PT
.. R.... .....).PDLG.. ...I,P. Y.. I.. O
.I,P. Y...A...B.. I.. O.I.P... R. ...LG.
..B H...AHJJJJ `...H). `..H. R.HLR..0I:.
.I.`....H.B..H.BJP.` ......B ......A`...
.* >..I P. >..I P..` ........* >.. ....*
8`I:..I.).`..,....AP..BP..&VBVA` >..I ..
`....... L.. ... |....` >.. Y.....?....
R..? R.LG.. T..JP.`.CP..D`....H.'..H.'JP
.`.C.D8........(.)L3...C.D8.A....B...` T
.. I.. ... ... ... /.. I.....&PD (..._.A
.C ... 3..P. (.....EC.C.ED.D ....&P=.A.C
(...4 ... ...L}.. T.. I.. ... I.. >.. .
.......&P. /.......A 3..P.L...LG.. T.. I
.. ... I.. >..... >..I'P. >...... O.I.."
. P....... ....F.... O.I... ...... P....
. R. W..... ...A...P.H...P. A.. T.. 3...
&P. /....LG.. T... .B.!....(.. R... R...
.. J.. J...A.BF.P... R.LG.. , B.. T.. A.
. T......A Y..H ...H 5......P......*I..A
.. B...P..*...*.. ....0.... ...JPU` M...
.P.H. B..... H....`..8.B....EA..H`.J..J.
.I"..)...J..Y....JJJJ).P. ..........*)..
..)... .....J..JJ. .P.H.P.`.A B.... ...D
.H........`..7...(.W...)... ..)&(*.P.I?
R.JP.. ,..LR. T.. I.. ... I......(.. R.
W.. R.. J...A.B .... /....LG.. T...... >
.. ...P.. .A.!.BLF..E(.. R.` T.. I......
. L..HJP...H8.? .JN..N...P.JP... O.I...I
.. P.... ....A.B.A.0........P..(....&..
.&.U......& Y...*.)..7...W.. ...P.....P.
.....*I..0.! ...PL A..PG.P..*...0...*..
...P.JPQ.. ...P. ...P..(E.P I.....(.)I.
P. ......P.....L...HP.......P..B...A.P..
&.A J...A.B.. R. A B.. T.. A.. T.... R.L
.... ...P.................(`I0..IG`8`@.E
.P.@.0"E3P.@.@.E3P.@.@.E.P.@..."D3P.D...
"D3P.D.."D3P.@.."D3P.@.B.X...!......YM..
.J..,),#($Y..X$$.....#]......#......)..I
..#$S.#$S.....[[.I$$....)..|....M..I)S..
4..I# XBZH&B..TDHTHD.......T.(NT.LJR....
....TTTRDH.2..."....&&RR.HDJ&HDD.H:;RMGX
LSTFHDP,AB..5..L.....V...........>......
..8..[........F......... PC SR AC XR
YR SP..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL