MAGIC MUSIC BOX
FILE INFORMATION
FILENAME(S): MAGIC MUSIC BOX
FILE TYPE(S): PRG
FILE SIZE: 4.9K
FIRST SEEN: 2025-11-30 18:12:07
APPEARS ON: 1 disk(s)
FILE HASH
8e9a93f9db8d8bf0183afbdf58c3e3d543a6d2e4a842ec4595fb3a8b9b05e345
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 34 S 1 | MAGIC MUSIC BOX | PRG | Sailor, Ganheden | 10 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 64 00 97 35 33 32 38 31 2C 31 3A 42 |....d..53281,1:B|
00000010: 47 B2 35 33 32 38 30 3A 97 42 47 2C 31 34 00 46 |G.53280:.BG,14.F|
00000020: 08 6E 00 99 22 93 1F 11 0E 20 20 20 20 20 20 20 |.n..".... |
00000030: 20 20 20 CC CF C1 C4 D3 D4 C1 D2 20 D0 52 45 53 | ........ .RES|
00000040: 45 4E 54 53 3A 22 00 69 08 78 00 99 22 20 20 20 |ENTS:".i.x.." |
00000050: 20 20 20 20 20 20 20 20 20 20 C3 4F 4D 4D 4F 44 | .OMMOD|
00000060: 4F 52 45 20 36 34 20 20 22 00 8E 08 82 00 99 22 |ORE 64 "......"|
00000070: 1C 20 20 20 20 20 20 20 20 20 20 20 20 CD 41 47 |. .AG|
00000080: 49 43 20 CD 55 53 49 43 20 C2 4F 58 20 22 00 BB |IC .USIC .OX "..|
00000090: 08 8C 00 99 22 11 90 20 20 20 20 D7 52 49 54 54 |....".. .RITT|
000000A0: 45 4E 20 42 59 3A 20 C4 4F 4E 41 4C 44 20 CA 2E |EN BY: .ONALD ..|
000000B0: 20 C5 44 44 49 4E 47 54 4F 4E 22 00 DF 08 96 00 | .DDINGTON".....|
000000C0: 99 22 20 20 20 20 20 20 20 20 20 20 28 43 29 20 |." (C) |
000000D0: C3 4F 50 59 52 49 47 48 54 20 31 39 38 37 22 00 |.OPYRIGHT 1987".|
000000E0: 01 09 A0 00 81 4E B2 31 A4 39 3A 87 48 2C 4C 3A |.....N.1.9:.H,L:|
000000F0: 4E 48 28 4E 29 B2 48 3A 4E 4C 28 4E 29 B2 4C 3A |NH(N).H:NL(N).L:|
00000100: 82 00 41 09 AA 00 83 31 36 2C 31 39 35 2C 31 38 |..A....16,195,18|
00000110: 2C 32 30 39 2C 32 31 2C 33 31 2C 32 32 2C 39 36 |,209,21,31,22,96|
00000120: 2C 32 35 2C 33 30 2C 32 38 2C 34 39 2C 33 31 2C |,25,30,28,49,31,|
00000130: 31 36 35 2C 33 33 2C 31 33 35 2C 33 37 2C 31 36 |165,33,135,37,16|
00000140: 32 00 63 09 B4 00 97 35 34 32 39 36 2C 31 30 3A |2.c....54296,10:|
00000150: 97 35 34 32 37 37 2C 34 37 3A 97 35 34 32 37 38 |.54277,47:.54278|
00000160: 2C 31 32 00 90 09 BE 00 99 22 11 11 97 20 20 20 |,12......"... |
00000170: 20 D4 48 49 53 20 50 52 4F 47 52 41 4D 20 54 41 | .HIS PROGRAM TA|
00000180: 4B 45 53 20 59 4F 55 52 20 4D 45 4C 4F 44 59 22 |KES YOUR MELODY"|
00000190: 00 BF 09 C8 00 99 22 11 20 41 4E 44 20 46 45 45 |......". AND FEE|
000001A0: 44 53 20 49 54 20 49 4E 54 4F 20 54 48 45 20 CD |DS IT INTO THE .|
000001B0: 41 47 49 43 20 CD 55 53 49 43 20 C2 4F 58 22 00 |AGIC .USIC .OX".|
000001C0: EB 09 D2 00 99 22 11 20 20 57 48 49 43 48 20 50 |.....". WHICH P|
000001D0: 52 4F 43 45 53 53 45 53 20 49 54 2C 20 54 48 45 |ROCESSES IT, THE|
000001E0: 4E 20 50 4C 41 59 53 20 49 54 22 00 19 0A DC 00 |N PLAYS IT".....|
000001F0: 99 22 11 20 20 20 20 1E 46 4F 52 57 41 52 44 53 |.". .FORWARDS|
00000200: 2C 20 1C 42 41 43 4B 57 41 52 44 53 2C 20 1F 49 |, .BACKWARDS, .I|
00000210: 4E 56 45 52 54 45 44 2C 22 00 43 0A E6 00 99 22 |NVERTED,".C...."|
00000220: 11 20 20 20 20 20 20 9C 4F 52 20 42 41 43 4B 57 |. .OR BACKW|
00000230: 41 52 44 53 20 41 4E 44 20 49 4E 56 45 52 54 45 |ARDS AND INVERTE|
00000240: 44 2E 22 00 71 0A F0 00 99 22 11 11 11 11 1C 20 |D.".q...."..... |
00000250: 20 20 20 20 D0 52 45 53 53 20 5B D3 D0 C1 C3 C5 | .RESS [.....|
00000260: C2 C1 D2 5D 20 54 4F 20 43 4F 4E 54 49 4E 55 45 |...] TO CONTINUE|
00000270: 22 00 98 0A FA 00 99 22 20 20 20 20 20 20 20 20 |"......" |
00000280: 4F 52 20 50 52 45 53 53 20 5B C6 31 5D 20 46 4F |OR PRESS [.1] FO|
00000290: 52 20 44 45 4D 4F 2E 22 00 D1 0A 04 01 4D 24 B2 |R DEMO.".....M$.|
000002A0: 22 34 30 34 35 30 35 36 38 36 34 30 31 34 30 34 |"404505686401404|
000002B0: 35 34 35 36 36 36 34 30 31 34 30 34 35 30 35 36 |5456664014045056|
000002C0: 38 36 34 34 30 39 30 30 35 30 38 36 36 36 34 34 |8644090050866644|
000002D0: 22 00 FC 0A 0E 01 97 31 39 38 2C 30 3A 92 31 39 |"......198,0:.19|
000002E0: 38 2C 31 3A A1 41 24 3A 8B 41 24 B3 B1 22 20 22 |8,1:.A$:.A$.." "|
000002F0: AF 41 24 B3 B1 22 85 22 A7 32 37 30 00 14 0B 18 |.A$..".".270....|
00000300: 01 8B 41 24 B2 22 85 22 A7 44 45 4D 4F B2 31 3A |..A$.".".DEMO.1:|
00000310: 89 34 36 30 00 43 0B 22 01 99 22 93 11 11 90 20 |.460.C."..".... |
00000320: 20 20 20 20 CE 4F 57 2C 20 45 4E 54 45 52 20 59 | .OW, ENTER Y|
00000330: 4F 55 52 20 53 45 52 49 45 53 20 4F 46 20 4E 4F |OUR SERIES OF NO|
00000340: 54 45 53 00 69 0B 2C 01 99 22 20 20 20 20 20 20 |TES.i.,.." |
00000350: 20 20 20 20 20 55 53 49 4E 47 20 54 48 49 53 20 | USING THIS |
00000360: 53 59 53 54 45 4D 3A 11 22 00 A6 0B 36 01 99 22 |SYSTEM:."...6.."|
00000370: 31 3D 4D 49 44 2D 43 22 2C 22 32 3D 44 22 2C 22 |1=MID-C","2=D","|
00000380: 33 3D 45 22 2C 22 34 3D 46 22 3A 99 22 35 3D 47 |3=E","4=F":."5=G|
00000390: 22 2C 22 36 3D 41 22 2C 22 37 3D 42 22 2C 22 38 |","6=A","7=B","8|
000003A0: 3D 48 49 2D 43 22 00 BD 0B 40 01 99 22 39 3D 48 |=HI-C"...@.."9=H|
000003B0: 49 2D 44 22 2C 22 30 3D 52 45 53 54 22 00 ED 0B |I-D","0=REST"...|
000003C0: 4A 01 99 22 11 11 C5 4E 54 45 52 20 59 4F 55 52 |J.."...NTER YOUR|
000003D0: 20 4D 45 4C 4F 44 59 2C 20 54 48 45 4E 20 50 52 | MELODY, THEN PR|
000003E0: 45 53 53 20 5B D2 C5 D4 D5 D2 CE 5D 22 00 08 0C |ESS [......]"...|
000003F0: 54 01 4C 53 B2 37 38 3A 8D 31 33 34 30 3A 8B 4D |T.LS.78:.1340:.M|
00000400: 24 B2 22 22 A7 32 39 30 00 3C 0C 5E 01 99 22 93 |$."".290.<.^..".|
00000410: 11 11 1C 0E 20 CE 4F 57 2C 20 53 45 4C 45 43 54 |.... .OW, SELECT|
00000420: 20 54 48 45 20 57 41 59 20 59 4F 55 20 57 41 4E | THE WAY YOU WAN|
00000430: 54 20 49 54 20 50 4C 41 59 45 44 22 00 65 0C 68 |T IT PLAYED".e.h|
00000440: 01 99 22 11 11 1E 20 C1 3E 20 C6 CF D2 D7 C1 D2 |.."... .> ......|
00000450: C4 D3 22 3A 99 22 1C 20 C2 3E 20 C2 C1 C3 CB D7 |..":.". .> .....|
00000460: C1 D2 C4 D3 22 00 7A 0C 72 01 99 22 1F 20 C3 3E |....".z.r..". .>|
00000470: 20 C9 CE D6 C5 D2 D4 C5 C4 22 00 B7 0C 7C 01 99 | ........"...|..|
00000480: 22 9C 20 C4 3E 20 C2 C1 C3 CB D7 C1 D2 C4 D3 20 |". .> ......... |
00000490: 41 4E 44 20 C9 CE D6 C5 D2 D4 C5 C4 22 3A 99 22 |AND ........":."|
000004A0: 11 90 20 C5 3E 20 C9 CE D0 D5 D4 20 CE C5 D7 20 |.. .> ..... ... |
000004B0: CD C5 CC CF C4 D9 22 00 E6 0C 86 01 99 22 95 20 |......"......". |
000004C0: C6 3E 20 C5 CE C4 20 D0 D2 CF C7 D2 C1 CD 20 20 |.> ... ....... |
000004D0: 28 D2 45 54 55 52 4E 20 54 4F 20 CC CF C1 C4 D3 |(.ETURN TO .....|
000004E0: D4 C1 D2 29 90 22 00 12 0D 90 01 99 22 95 20 C7 |...)."......". .|
000004F0: 3E 20 C2 C1 C3 CB A0 D4 CF A0 C6 C9 D2 D3 D4 A0 |> ..............|
00000500: D3 C3 D2 C5 C5 CE 20 28 46 4F 52 20 44 45 4D 4F |...... (FOR DEMO|
00000510: 29 22 00 3B 0D 9A 01 97 31 39 38 2C 30 3A 92 31 |)".;....198,0:.1|
00000520: 39 38 2C 31 3A A1 57 24 3A 8B 57 24 B3 22 41 22 |98,1:.W$:.W$."A"|
00000530: B0 57 24 B1 22 47 22 A7 34 31 30 00 4A 0D A4 01 |.W$."G".410.J...|
00000540: 57 B2 C6 28 57 24 29 AB 36 34 00 50 0D AE 01 3A |W..(W$).64.P...:|
00000550: 00 70 0D B8 01 91 57 89 34 36 30 2C 36 32 30 2C |.p....W.460,620,|
00000560: 37 37 30 2C 39 33 30 2C 32 39 30 2C 31 31 30 30 |770,930,290,1100|
00000570: 00 7B 0D C2 01 8B 57 B2 37 A7 8A 00 A0 0D CC 01 |.{....W.7.......|
00000580: 8F 20 50 4C 41 59 20 54 48 45 20 4D 45 4C 4F 44 |. PLAY THE MELOD|
00000590: 59 20 2A 2A 2D 46 4F 52 57 41 52 44 53 2D 2A 2A |Y **-FORWARDS-**|
000005A0: 00 D3 0D D6 01 99 22 93 11 11 22 C7 28 31 34 32 |......"...".(142|
000005B0: 29 2C 22 20 20 12 1E 20 20 46 4F 52 57 41 52 44 |)," .. FORWARD|
000005C0: 53 20 20 20 11 11 22 3A 97 42 47 2C 35 3A 8D 31 |S ..":.BG,5:.1|
000005D0: 31 34 30 00 01 0E E0 01 99 2C 22 11 95 20 49 54 |140......,".. IT|
000005E0: 20 47 4F 45 53 20 49 4E 20 48 45 52 45 21 21 97 | GOES IN HERE!!.|
000005F0: 22 3A 99 4D 24 3A 81 44 B2 31 A4 35 30 30 3A 82 |":.M$:.D.1.500:.|
00000600: 44 00 21 0E EA 01 41 24 B2 4D 24 3A 46 24 B2 4D |D.!...A$.M$:F$.M|
00000610: 24 3A 99 22 13 11 11 11 11 11 11 11 22 3B 41 24 |$:."........";A$|
00000620: 3B 00 4E 0E F4 01 50 B2 C3 28 41 24 29 AB 31 3A |;.N...P..(A$).1:|
00000630: 81 54 B2 31 A4 C3 28 41 24 29 3A 41 24 B2 22 20 |.T.1..(A$):A$." |
00000640: 22 AA C8 28 41 24 2C 50 29 AA 22 20 CE 22 00 80 |"..(A$,P)." ."..|
00000650: 0E FE 01 99 22 13 11 11 11 11 11 11 11 22 3B 41 |...."........";A|
00000660: 24 3B 3A 81 44 B2 31 A4 33 34 3A 82 44 20 3A 81 |$;:.D.1.34:.D :.|
00000670: 4B B2 31 A4 33 3A 8D 31 32 33 30 3A 82 4B 2C 54 |K.1.3:.1230:.K,T|
00000680: 00 95 0E 08 02 97 31 33 34 34 AA 49 2C 33 32 3A |......1344.I,32:|
00000690: 8D 31 32 38 30 00 CA 0E 12 02 81 54 B2 30 A4 C3 |.1280......T.0..|
000006A0: 28 4D 24 29 3A 54 24 B2 C9 28 4D 24 2C 54 29 3A |(M$):T$..(M$,T):|
000006B0: 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 |."..............|
000006C0: 22 A6 38 29 22 CD 20 22 54 24 00 E5 0E 1C 02 81 |".8)". "T$......|
000006D0: 44 B2 31 A4 35 30 3A 82 3A 82 3A 81 44 B2 31 A4 |D.1.50:.:.:.D.1.|
000006E0: 35 30 30 3A 82 00 F4 0E 26 02 81 51 B2 31 A4 C3 |500:....&..Q.1..|
000006F0: 28 4D 24 29 00 0C 0F 30 02 47 B2 28 C6 28 CA 28 |(M$)...0.G.(.(.(|
00000700: 4D 24 2C 51 2C 31 29 29 AB 34 38 29 00 1D 0F 3A |M$,Q,1)).48)...:|
00000710: 02 8B 47 B3 30 B0 47 B1 39 A7 47 B2 30 00 45 0F |..G.0.G.9.G.0.E.|
00000720: 44 02 97 35 34 32 37 33 2C 4E 48 28 47 29 3A 97 |D..54273,NH(G):.|
00000730: 35 34 32 37 32 2C 4E 4C 28 47 29 3A 97 35 34 32 |54272,NL(G):.542|
00000740: 37 36 2C 33 33 00 61 0F 4E 02 81 44 B2 31 A4 37 |76,33.a.N..D.1.7|
00000750: 37 3A 82 44 3A 97 35 34 32 37 36 2C 33 32 3A 82 |7:.D:.54276,32:.|
00000760: 51 00 8B 0F 58 02 81 58 B2 31 A4 31 32 33 34 3A |Q...X..X.1.1234:|
00000770: 82 3A 97 35 34 32 37 33 2C 30 3A 97 35 34 32 37 |.:.54273,0:.5427|
00000780: 32 2C 30 3A 8B 44 45 4D 4F A7 8A 00 94 0F 62 02 |2,0:.DEMO.....b.|
00000790: 89 33 35 30 00 BA 0F 6C 02 8F 20 50 4C 41 59 20 |.350...l.. PLAY |
000007A0: 54 48 45 20 4D 45 4C 4F 44 59 20 2A 2A 2D 42 41 |THE MELODY **-BA|
000007B0: 43 4B 57 41 52 44 53 2D 2A 2A 00 EE 0F 76 02 99 |CKWARDS-**...v..|
000007C0: 22 93 11 11 22 C7 28 31 34 32 29 2C 22 20 20 12 |"...".(142)," .|
000007D0: 1C 20 20 42 41 43 4B 57 41 52 44 53 21 20 20 11 |. BACKWARDS! .|
000007E0: 11 22 3A 97 42 47 2C 32 3A 8D 31 31 34 30 00 1C |.":.BG,2:.1140..|
000007F0: 10 80 02 99 2C 22 11 95 20 49 54 20 47 4F 45 53 |....,".. IT GOES|
00000800: 20 49 4E 20 48 45 52 45 21 21 97 22 3A 99 4D 24 | IN HERE!!.":.M$|
00000810: 3A 81 44 B2 31 A4 35 30 30 3A 82 44 00 55 10 8A |:.D.1.500:.D.U..|
00000820: 02 41 24 B2 4D 24 3A 81 54 B2 C3 28 4D 24 29 A4 |.A$.M$:.T..(M$).|
00000830: 31 A9 AB 31 3A 42 24 B2 42 24 AA CA 28 4D 24 2C |1..1:B$.B$..(M$,|
00000840: 54 2C 31 29 3A 82 3A 99 22 13 11 11 11 11 11 11 |T,1):.:.".......|
00000850: 11 22 41 24 3B 00 82 10 94 02 50 B2 C3 28 41 24 |."A$;.....P..(A$|
00000860: 29 AB 31 3A 81 54 B2 31 A4 C3 28 41 24 29 3A 41 |).1:.T.1..(A$):A|
00000870: 24 B2 22 20 22 AA C8 28 41 24 2C 50 29 AA 22 20 |$." "..(A$,P)." |
00000880: CE 22 00 B4 10 9E 02 99 22 13 11 11 11 11 11 11 |."......".......|
00000890: 11 22 3B 41 24 3B 3A 81 44 B2 31 A4 33 34 3A 82 |.";A$;:.D.1.34:.|
000008A0: 44 20 3A 81 4B B2 31 A4 33 3A 8D 31 32 33 30 3A |D :.K.1.3:.1230:|
000008B0: 82 4B 2C 54 00 C9 10 A8 02 97 31 33 34 34 AA 49 |.K,T......1344.I|
000008C0: 2C 33 32 3A 8D 31 32 38 30 00 FE 10 B2 02 81 54 |,32:.1280......T|
000008D0: B2 30 A4 C3 28 4D 24 29 3A 54 24 B2 C9 28 42 24 |.0..(M$):T$..(B$|
000008E0: 2C 54 29 3A 99 22 13 11 11 11 11 11 11 11 11 11 |,T):."..........|
000008F0: 11 11 11 11 22 A6 38 29 22 CD 20 22 54 24 00 19 |....".8)". "T$..|
00000900: 11 BC 02 81 44 B2 31 A4 35 30 3A 82 3A 82 3A 81 |....D.1.50:.:.:.|
00000910: 44 B2 31 A4 35 30 30 3A 82 00 2B 11 C6 02 81 51 |D.1.500:..+....Q|
00000920: B2 C3 28 4D 24 29 A4 31 A9 AB 31 00 43 11 D0 02 |..(M$).1..1.C...|
00000930: 47 B2 28 C6 28 CA 28 4D 24 2C 51 2C 31 29 29 AB |G.(.(.(M$,Q,1)).|
00000940: 34 38 29 00 54 11 DA 02 8B 47 B3 30 B0 47 B1 39 |48).T....G.0.G.9|
00000950: A7 47 B2 30 00 7C 11 E4 02 97 35 34 32 37 33 2C |.G.0.|....54273,|
00000960: 4E 48 28 47 29 3A 97 35 34 32 37 32 2C 4E 4C 28 |NH(G):.54272,NL(|
00000970: 47 29 3A 97 35 34 32 37 36 2C 33 33 00 98 11 EE |G):.54276,33....|
00000980: 02 81 44 B2 31 A4 37 37 3A 82 44 3A 97 35 34 32 |..D.1.77:.D:.542|
00000990: 37 36 2C 33 32 3A 82 51 00 BF 11 F8 02 81 58 B2 |76,32:.Q......X.|
000009A0: 31 A4 31 32 33 34 3A 82 3A 97 35 34 32 37 33 2C |1.1234:.:.54273,|
000009B0: 30 3A 97 35 34 32 37 32 2C 30 3A 89 33 35 30 00 |0:.54272,0:.350.|
000009C0: E4 11 02 03 8F 20 50 4C 41 59 20 54 48 45 20 4D |..... PLAY THE M|
000009D0: 45 4C 4F 44 59 20 2A 2A 2D 49 4E 56 45 52 54 45 |ELODY **-INVERTE|
000009E0: 44 2D 2A 2A 00 16 12 0C 03 99 22 93 11 11 22 C7 |D-**......"...".|
000009F0: 28 31 34 32 29 2C 22 20 20 12 1F 20 49 4E 56 45 |(142)," .. INVE|
00000A00: 52 54 45 44 21 21 20 11 11 22 3A 97 42 47 2C 36 |RTED!! ..":.BG,6|
00000A10: 3A 8D 31 31 34 30 00 44 12 16 03 99 2C 22 11 95 |:.1140.D....,"..|
00000A20: 20 49 54 20 47 4F 45 53 20 49 4E 20 48 45 52 45 | IT GOES IN HERE|
00000A30: 21 21 97 22 3A 99 4D 24 3A 81 44 B2 31 A4 35 30 |!!.":.M$:.D.1.50|
00000A40: 30 3A 82 44 00 82 12 20 03 41 24 B2 4D 24 3A 81 |0:.D... .A$.M$:.|
00000A50: 54 B2 31 A4 C3 28 4D 24 29 3A 53 B2 31 30 AB 28 |T.1..(M$):S.10.(|
00000A60: C5 28 CA 28 4D 24 2C 54 2C 31 29 29 29 3A 8B 53 |.(.(M$,T,1))):.S|
00000A70: B2 31 30 A7 49 24 B2 49 24 AA 22 30 22 3A 89 38 |.10.I$.I$."0":.8|
00000A80: 30 37 00 94 12 25 03 49 24 B2 49 24 AA C7 28 53 |07...%.I$.I$..(S|
00000A90: AA 34 38 29 00 9A 12 27 03 82 00 D6 12 2A 03 99 |.48)...'.....*..|
00000AA0: 22 13 11 11 11 11 11 11 11 22 41 24 3B 3A 50 B2 |"........"A$;:P.|
00000AB0: C3 28 41 24 29 AB 31 3A 81 54 B2 31 A4 C3 28 41 |.(A$).1:.T.1..(A|
00000AC0: 24 29 3A 41 24 B2 22 20 22 AA C8 28 41 24 2C 50 |$):A$." "..(A$,P|
00000AD0: 29 AA 22 20 CE 22 00 08 13 34 03 99 22 13 11 11 |)." ."...4.."...|
00000AE0: 11 11 11 11 11 22 3B 41 24 3B 3A 81 44 B2 31 A4 |.....";A$;:.D.1.|
00000AF0: 33 34 3A 82 44 20 3A 81 4B B2 31 A4 33 3A 8D 31 |34:.D :.K.1.3:.1|
00000B00: 32 33 30 3A 82 4B 2C 54 00 1D 13 3E 03 97 31 33 |230:.K,T...>..13|
00000B10: 34 34 AA 49 2C 33 32 3A 8D 31 32 38 30 00 52 13 |44.I,32:.1280.R.|
00000B20: 48 03 81 54 B2 30 A4 C3 28 4D 24 29 3A 54 24 B2 |H..T.0..(M$):T$.|
00000B30: C9 28 49 24 2C 54 29 3A 99 22 13 11 11 11 11 11 |.(I$,T):."......|
00000B40: 11 11 11 11 11 11 11 11 22 A6 38 29 22 CD 20 22 |........".8)". "|
00000B50: 54 24 00 6D 13 66 03 81 44 B2 31 A4 35 30 3A 82 |T$.m.f..D.1.50:.|
00000B60: 3A 82 3A 81 44 B2 31 A4 35 30 30 3A 82 00 7C 13 |:.:.D.1.500:..|.|
00000B70: 70 03 81 51 B2 31 A4 C3 28 4D 24 29 00 94 13 7A |p..Q.1..(M$)...z|
00000B80: 03 47 B2 31 30 AB 28 C5 28 CA 28 4D 24 2C 51 2C |.G.10.(.(.(M$,Q,|
00000B90: 31 29 29 29 00 BC 13 84 03 97 35 34 32 37 33 2C |1)))......54273,|
00000BA0: 4E 48 28 47 29 3A 97 35 34 32 37 32 2C 4E 4C 28 |NH(G):.54272,NL(|
00000BB0: 47 29 3A 97 35 34 32 37 36 2C 33 33 00 D8 13 8E |G):.54276,33....|
00000BC0: 03 81 44 B2 31 A4 37 37 3A 82 44 3A 97 35 34 32 |..D.1.77:.D:.542|
00000BD0: 37 36 2C 33 32 3A 82 51 00 FF 13 98 03 81 58 B2 |76,32:.Q......X.|
00000BE0: 31 A4 31 32 33 34 3A 82 3A 97 35 34 32 37 33 2C |1.1234:.:.54273,|
00000BF0: 30 3A 97 35 34 32 37 32 2C 30 3A 89 33 35 30 00 |0:.54272,0:.350.|
00000C00: 32 14 A2 03 8F 20 50 4C 41 59 20 54 48 45 20 4D |2.... PLAY THE M|
00000C10: 45 4C 4F 44 59 20 2A 2A 2D 49 4E 56 45 52 54 45 |ELODY **-INVERTE|
00000C20: 44 20 41 4E 44 20 42 41 43 4B 57 41 52 44 53 2D |D AND BACKWARDS-|
00000C30: 2A 2A 00 71 14 AC 03 99 22 93 11 11 22 C7 28 31 |**.q...."...".(1|
00000C40: 34 32 29 2C 22 9D 9D 9D 20 12 20 49 4E 56 45 52 |42),"... . INVER|
00000C50: 54 45 44 20 41 4E 44 20 42 41 43 4B 57 41 52 44 |TED AND BACKWARD|
00000C60: 53 20 11 11 22 3A 97 42 47 2C 34 3A 8D 31 31 34 |S ..":.BG,4:.114|
00000C70: 30 00 9F 14 B6 03 99 2C 22 11 95 20 49 54 20 47 |0......,".. IT G|
00000C80: 4F 45 53 20 49 4E 20 48 45 52 45 21 21 97 22 3A |OES IN HERE!!.":|
00000C90: 99 4D 24 3A 81 44 B2 31 A4 35 30 30 3A 82 44 00 |.M$:.D.1.500:.D.|
00000CA0: CB 14 C0 03 41 24 B2 4D 24 3A 81 54 B2 C3 28 4D |....A$.M$:.T..(M|
00000CB0: 24 29 A4 31 A9 AB 31 3A 53 B2 31 30 AB 28 C5 28 |$).1..1:S.10.(.(|
00000CC0: CA 28 4D 24 2C 54 2C 31 29 29 29 00 E6 14 C5 03 |.(M$,T,1))).....|
00000CD0: 8B 53 B2 31 30 A7 49 42 24 B2 49 42 24 AA 22 30 |.S.10.IB$.IB$."0|
00000CE0: 22 3A 89 39 37 32 00 FA 14 CA 03 49 42 24 B2 49 |":.972.....IB$.I|
00000CF0: 42 24 AA C7 28 53 AA 34 38 29 00 00 15 CC 03 82 |B$..(S.48)......|
00000D00: 00 3C 15 D4 03 99 22 13 11 11 11 11 11 11 11 22 |.<...."........"|
00000D10: 41 24 3B 3A 50 B2 C3 28 41 24 29 AB 31 3A 81 54 |A$;:P..(A$).1:.T|
00000D20: B2 31 A4 C3 28 41 24 29 3A 41 24 B2 22 20 22 AA |.1..(A$):A$." ".|
00000D30: C8 28 41 24 2C 50 29 AA 22 20 CE 22 00 6E 15 DE |.(A$,P)." .".n..|
00000D40: 03 99 22 13 11 11 11 11 11 11 11 22 3B 41 24 3B |.."........";A$;|
00000D50: 3A 81 44 B2 31 A4 33 34 3A 82 44 20 3A 81 4B B2 |:.D.1.34:.D :.K.|
00000D60: 31 A4 33 3A 8D 31 32 33 30 3A 82 4B 2C 54 00 83 |1.3:.1230:.K,T..|
00000D70: 15 E8 03 97 31 33 34 34 AA 49 2C 33 32 3A 8D 31 |....1344.I,32:.1|
00000D80: 32 38 30 00 B9 15 F2 03 81 54 B2 30 A4 C3 28 4D |280......T.0..(M|
00000D90: 24 29 3A 54 24 B2 C9 28 49 42 24 2C 54 29 3A 99 |$):T$..(IB$,T):.|
00000DA0: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 22 |".............."|
00000DB0: A6 38 29 22 CD 20 22 54 24 00 D4 15 10 04 81 44 |.8)". "T$......D|
00000DC0: B2 31 A4 35 30 3A 82 3A 82 3A 81 44 B2 31 A4 35 |.1.50:.:.:.D.1.5|
00000DD0: 30 30 3A 82 00 E6 15 1A 04 81 51 B2 C3 28 4D 24 |00:.......Q..(M$|
00000DE0: 29 A4 31 A9 AB 31 00 FE 15 24 04 47 B2 31 30 AB |).1..1...$.G.10.|
00000DF0: 28 C5 28 CA 28 4D 24 2C 51 2C 31 29 29 29 00 26 |(.(.(M$,Q,1))).&|
00000E00: 16 2E 04 97 35 34 32 37 33 2C 4E 48 28 47 29 3A |....54273,NH(G):|
00000E10: 97 35 34 32 37 32 2C 4E 4C 28 47 29 3A 97 35 34 |.54272,NL(G):.54|
00000E20: 32 37 36 2C 33 33 00 42 16 38 04 81 44 B2 31 A4 |276,33.B.8..D.1.|
00000E30: 37 37 3A 82 44 3A 97 35 34 32 37 36 2C 33 32 3A |77:.D:.54276,32:|
00000E40: 82 51 00 69 16 42 04 81 58 B2 31 A4 31 32 33 34 |.Q.i.B..X.1.1234|
00000E50: 3A 82 3A 97 35 34 32 37 33 2C 30 3A 97 35 34 32 |:.:.54273,0:.542|
00000E60: 37 32 2C 30 3A 89 33 35 30 00 A5 16 4C 04 8F 20 |72,0:.350...L.. |
00000E70: 54 48 45 20 50 52 4F 47 52 41 4D 20 45 4E 44 53 |THE PROGRAM ENDS|
00000E80: 20 57 49 54 48 20 41 20 53 49 52 45 4E 20 2F 20 | WITH A SIREN / |
00000E90: 43 4F 4C 4F 52 20 2F 20 50 52 49 4E 54 20 52 4F |COLOR / PRINT RO|
00000EA0: 55 54 49 4E 45 00 CA 16 56 04 99 22 11 11 11 11 |UTINE...V.."....|
00000EB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 12 20 | . |
00000EC0: D4 48 45 20 45 4E 44 21 20 22 00 DA 16 60 04 81 |.HE END! "...`..|
00000ED0: 44 B2 31 A4 31 31 31 31 3A 82 00 E4 16 6A 04 89 |D.1.1111:....j..|
00000EE0: 31 34 39 30 00 0A 17 74 04 8F 20 44 52 41 57 20 |1490...t.. DRAW |
00000EF0: 50 49 43 54 55 52 45 20 4F 46 20 4D 41 47 49 43 |PICTURE OF MAGIC|
00000F00: 20 4D 55 53 49 43 20 42 4F 58 00 36 17 7E 04 97 | MUSIC BOX.6.~..|
00000F10: 31 33 38 34 2C 37 39 3A 97 31 34 32 33 2C 38 30 |1384,79:.1423,80|
00000F20: 3A 81 54 B2 31 33 38 35 A4 31 34 32 32 3A 97 54 |:.T.1385.1422:.T|
00000F30: 2C 31 31 39 3A 82 00 50 17 88 04 81 54 B2 35 35 |,119:..P....T.55|
00000F40: 36 35 36 A4 35 35 36 39 35 3A 97 54 2C 30 3A 82 |656.55695:.T,0:.|
00000F50: 00 87 17 92 04 53 50 B2 C3 28 4D 24 29 3A 97 31 |.....SP..(M$):.1|
00000F60: 33 34 34 AA 53 50 2C 37 38 3A 97 31 33 34 34 AA |344.SP,78:.1344.|
00000F70: 53 50 AA 33 39 2C 33 32 3A 97 31 33 34 34 AA 53 |SP.39,32:.1344.S|
00000F80: 50 AA 33 38 2C 33 32 00 A5 17 9C 04 97 35 35 36 |P.38,32......556|
00000F90: 31 36 AA 53 50 2C 30 3A 97 31 33 34 34 AA 53 50 |16.SP,0:.1344.SP|
00000FA0: AB 31 2C 33 32 00 CF 17 A6 04 97 31 34 32 34 2C |.1,32......1424,|
00000FB0: 31 31 36 3A 97 31 34 36 33 2C 31 30 36 3A 97 35 |116:.1463,106:.5|
00000FC0: 35 36 39 36 2C 30 3A 97 35 35 37 33 35 2C 30 00 |5696,0:.55735,0.|
00000FD0: FC 17 B0 04 97 31 34 36 34 2C 37 36 3A 97 31 35 |.....1464,76:.15|
00000FE0: 30 33 2C 31 32 32 3A 81 54 B2 31 34 36 35 A4 31 |03,122:.T.1465.1|
00000FF0: 35 30 32 3A 97 54 2C 31 31 31 3A 82 00 16 18 BA |502:.T,111:.....|
00001000: 04 81 54 B2 35 35 37 33 36 A4 35 35 37 37 35 3A |..T.55736.55775:|
00001010: 97 54 2C 30 3A 82 00 1C 18 C4 04 8E 00 4E 18 CE |.T,0:........N..|
00001020: 04 8F 20 4D 41 4B 45 20 54 48 45 20 4D 41 47 49 |.. MAKE THE MAGI|
00001030: 43 20 4D 55 53 49 43 20 42 4F 58 20 50 52 4F 43 |C MUSIC BOX PROC|
00001040: 45 53 53 20 54 48 45 20 4D 45 4C 4F 44 59 00 86 |ESS THE MELODY..|
00001050: 18 D8 04 47 B2 BB 28 31 29 AC 33 38 3A 43 B2 BB |...G..(1).38:C..|
00001060: 28 31 29 AC 31 36 3A 4A B2 28 BB 28 31 29 AC 31 |(1).16:J.(.(1).1|
00001070: 31 29 AA 34 38 3A 49 B2 53 50 AB 31 3A 4E B2 BB |1).48:I.SP.1:N..|
00001080: 28 31 29 AC 31 30 00 B5 18 E2 04 97 31 34 32 35 |(1).10......1425|
00001090: AA 47 2C 4A 3A 97 35 35 36 39 37 AA 47 2C 43 3A |.G,J:.55697.G,C:|
000010A0: 97 31 33 34 34 AA 49 2C 38 36 3A 97 35 35 36 31 |.1344.I,86:.5561|
000010B0: 36 AA 49 2C 43 00 EE 18 EC 04 97 35 34 32 37 33 |6.I,C......54273|
000010C0: 2C 4E 48 28 4E 29 3A 97 35 34 32 37 32 2C 4E 4C |,NH(N):.54272,NL|
000010D0: 28 4E 29 3A 97 35 34 32 37 36 2C 31 37 3A 81 44 |(N):.54276,17:.D|
000010E0: B2 31 A4 33 3A 97 35 34 32 37 36 2C 31 36 00 F4 |.1.3:.54276,16..|
000010F0: 18 F6 04 8E 00 2A 19 00 05 8F 20 4F 50 45 4E 20 |.....*.... OPEN |
00001100: 54 48 45 20 4D 41 47 49 43 20 4D 55 53 49 43 20 |THE MAGIC MUSIC |
00001110: 42 4F 58 20 41 4E 44 20 4C 45 54 20 54 48 45 20 |BOX AND LET THE |
00001120: 4D 45 4C 4F 44 59 20 4F 55 54 00 56 19 0A 05 81 |MELODY OUT.V....|
00001130: 54 B2 35 35 37 33 36 A4 35 35 37 37 35 3A 97 54 |T.55736.55775:.T|
00001140: 2C 30 3A 82 3A 97 31 34 37 31 2C 33 32 3A 97 31 |,0:.:.1471,32:.1|
00001150: 34 37 32 2C 33 32 00 6C 19 14 05 97 31 35 31 31 |472,32.l....1511|
00001160: 2C 37 37 3A 97 35 35 37 38 33 2C 30 00 A6 19 1E |,77:.55783,0....|
00001170: 05 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 |..".............|
00001180: 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 90 41 |...............A|
00001190: 4E 44 20 49 54 20 43 4F 4D 45 53 20 4F 55 54 20 |ND IT COMES OUT |
000011A0: 48 45 52 45 21 22 00 B6 19 28 05 81 44 B2 31 A4 |HERE!"...(..D.1.|
000011B0: 31 31 31 31 3A 82 00 BC 19 32 05 8E 00 D1 19 3C |1111:....2.....<|
000011C0: 05 8F 20 49 4E 50 55 54 20 41 20 53 54 52 49 4E |.. INPUT A STRIN|
000011D0: 47 00 DB 19 46 05 4D 24 B2 22 22 00 E7 19 50 05 |G...F.M$.""...P.|
000011E0: 41 47 24 B2 22 A4 22 00 F1 19 5A 05 99 22 3E 22 |AG$."."...Z..">"|
000011F0: 3B 00 FE 19 64 05 99 41 47 24 22 9D 22 3B 00 14 |;...d..AG$".";..|
00001200: 1A 6E 05 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 |.n..198,0:.198,1|
00001210: 3A A1 41 24 00 27 1A 78 05 8B 41 24 B2 C7 28 31 |:.A$.'.x..A$..(1|
00001220: 33 29 A7 31 34 38 30 00 5F 1A 82 05 46 4C B2 30 |3).1480._...FL.0|
00001230: 3A 8B 41 24 B2 22 9D 22 B0 41 24 B2 C7 28 32 30 |:.A$.".".A$..(20|
00001240: 29 A7 41 47 B2 C3 28 4D 24 29 3A 8B 41 47 B1 30 |).AG..(M$):.AG.0|
00001250: A7 99 22 20 9D 9D 20 9D 22 3B 3A 46 4C B2 31 00 |.." .. .";:FL.1.|
00001260: 7D 1A 8C 05 8B 46 4C B2 31 A7 4D 24 B2 C8 28 4D |}....FL.1.M$..(M|
00001270: 24 2C 41 47 AB 31 29 3A 89 31 33 38 30 00 95 1A |$,AG.1):.1380...|
00001280: 96 05 8B 41 24 B3 22 30 22 B0 41 24 B1 22 39 22 |...A$."0".A$."9"|
00001290: A7 31 33 39 30 00 A8 1A A0 05 8B C3 28 4D 24 29 |.1390.......(M$)|
000012A0: B2 4C 53 A7 31 34 36 30 00 BA 1A AA 05 99 41 24 |.LS.1460......A$|
000012B0: 3B 3A 4D 24 B2 4D 24 AA 41 24 00 C4 1A B4 05 89 |;:M$.M$.A$......|
000012C0: 31 33 38 30 00 CA 1A BE 05 3A 00 E3 1A C8 05 8B |1380.....:......|
000012D0: C3 28 4D 24 29 B2 34 30 A7 4D 24 B2 4D 24 AA 22 |.(M$).40.M$.M$."|
000012E0: 30 30 22 00 FD 1A CA 05 8B C3 28 4D 24 29 B2 33 |00".......(M$).3|
000012F0: 39 A7 4D 24 B2 4D 24 AA 22 30 30 30 22 00 17 1B |9.M$.M$."000"...|
00001300: CD 05 8E 20 3A 20 8F 20 4D 24 3D 49 4E 50 55 54 |... : . M$=INPUT|
00001310: 20 53 54 52 49 4E 47 00 28 1B D2 05 8F 20 52 45 | STRING.(.... RE|
00001320: 2D 43 4F 4E 4E 45 43 54 00 61 1B DC 05 9F 31 35 |-CONNECT.a....15|
00001330: 2C 38 2C 31 35 2C 22 52 30 3A 48 45 4C 4C 4F 20 |,8,15,"R0:HELLO |
00001340: 43 4F 4E 4E 45 43 54 3D 48 45 4C 4C 4F 20 43 4F |CONNECT=HELLO CO|
00001350: 4E 4E 45 43 54 22 3A 84 31 35 2C 45 52 3A A0 31 |NNECT":.15,ER:.1|
00001360: 35 00 6F 1B E6 05 8B 45 52 B3 B1 36 33 A7 80 00 |5.o....ER..63...|
00001370: 85 1B F0 05 9F 31 35 2C 38 2C 31 35 2C 22 49 30 |.....15,8,15,"I0|
00001380: 22 3A A0 31 35 00 9C 1B FA 05 93 22 48 45 4C 4C |":.15......"HELL|
00001390: 4F 20 43 4F 4E 4E 45 43 54 22 2C 38 00 00 00 |O CONNECT",8... |
....D..53281,1:BG.53280:.BG,14.F.N.."...
. LOADSTAR PRESENTS:".I.X.."
COMMODORE 64 "......".
MAGIC MUSIC BOX "......".. WRITT
EN BY: DONALD J. EDDINGTON"......"
(C) COPYRIGHT 1987"... ..N.1.9:.H,L:
NH(N).H:NL(N).L:..A....16,195,18,209,21,
31,22,96,25,30,28,49,31,165,33,135,37,16
2.C....54296,10:.54277,47:.54278,12.....
."... THIS PROGRAM TAKES YOUR MELODY"
...H..". AND FEEDS IT INTO THE MAGIC MUS
IC BOX"...R..". WHICH PROCESSES IT, THE
N PLAYS IT"......". .FORWARDS, .BACKW
ARDS, .INVERTED,".C....". .OR BACKW
ARDS AND INVERTED.".Q...."..... PRES
S [SPACEBAR] TO CONTINUE"......"
OR PRESS [F1] FOR DEMO.".Q...M$."4045056
8640140454566640140450568644090050866644
"......198,0:.198,1:.A$:.A$.." ".A$.."."
.270......A$.".".DEMO.1:.460.C.".."....
NOW, ENTER YOUR SERIES OF NOTES.I.,.
." USING THIS SYSTEM:."...6.."
1=MID-C","2=D","3=E","4=F":."5=G","6=A",
"7=B","8=HI-C"...@.."9=HI-D","0=REST"...
J.."..ENTER YOUR MELODY, THEN PRESS [RET
URN]"...T.LS.78:.1340:.M$."".290.<.^..".
.... NOW, SELECT THE WAY YOU WANT IT PLA
YED".E.H.."... A> FORWARDS":.". B> BACKW
ARDS".Z.R..". C> INVERTED"...|..". D> BA
CKWARDS AND INVERTED":.".. E> INPUT NEW
MELODY"......". F> END PROGRAM (RETURN
TO LOADSTAR)."......". G> BACK TO FIRST
SCREEN (FOR DEMO)".;....198,0:.198,1:.W$
:.W$."A".W$."G".410.J...W.F(W$).64.P...:
.P....W.460,620,770,930,290,1100.{.B..W.
7... .L.. PLAY THE MELODY **-FORWARDS-**
.S.V.."..."G(142)," .. FORWARDS ..":
.BG,5:.1140......,".. IT GOES IN HERE!!.
":.M$:.D.1.500:.D.!...A$.M$:F$.M$:."....
....";A$;.N...P.C(A$).1:.T.1.C(A$):A$."
".H(A$,P)." N"......"........";A$;:.D.1.
34:.D :.K.1.3:.1230:.K,T......1344.I,32:
.1280.J....T.0.C(M$):T$.I(M$,T):."......
........".8)"M "T$......D.1.50:.:.:.D.1.
500:....&..Q.1.C(M$)...0.G.(F(J(M$,Q,1))
.48)...:..G.0.G.9.G.0.E.D..54273,NH(G):.
54272,NL(G):.54276,33.A.N..D.1.77:.D:.54
276,32:.Q...X..X.1.1234:.:.54273,0:.5427
2,0:.DEMO.....B..350...L.. PLAY THE MELO
DY **-BACKWARDS-**...V.."..."G(142)," .
. BACKWARDS! ..":.BG,2:.1140......,"..
IT GOES IN HERE!!.":.M$:.D.1.500:.D.U..
.A$.M$:.T.C(M$).1..1:B$.B$.J(M$,T,1):.:.
"........"A$;.....P.C(A$).1:.T.1.C(A$):A
$." ".H(A$,P)." N"......"........";A$;:.
D.1.34:.D :.K.1.3:.1230:.K,T.I....1344.I
,32:.1280......T.0.C(M$):T$.I(B$,T):."..
............".8)"M "T$......D.1.50:.:.:.
D.1.500:..+.F..Q.C(M$).1..1.C.P.G.(F(J(M
$,Q,1)).48).T.Z..G.0.G.9.G.0.|....54273,
NH(G):.54272,NL(G):.54276,33......D.1.77
:.D:.54276,32:.Q......X.1.1234:.:.54273,
0:.54272,0:.350...... PLAY THE MELODY **
-INVERTED-**......"..."G(142)," .. INVE
RTED!! ..":.BG,6:.1140.D....,".. IT GOES
IN HERE!!.":.M$:.D.1.500:.D... .A$.M$:.
T.1.C(M$):S.10.(E(J(M$,T,1))):.S.10.I$.I
$."0":.807...%.I$.I$.G(S.48)...'...V.*..
"........"A$;:P.C(A$).1:.T.1.C(A$):A$."
".H(A$,P)." N"...4.."........";A$;:.D.1.
34:.D :.K.1.3:.1230:.K,T...>..1344.I,32:
.1280.R.H..T.0.C(M$):T$.I(I$,T):."......
........".8)"M "T$.M.F..D.1.50:.:.:.D.1.
500:..|.P..Q.1.C(M$)...Z.G.10.(E(J(M$,Q,
1)))......54273,NH(G):.54272,NL(G):.5427
6,33.X....D.1.77:.D:.54276,32:.Q......X.
1.1234:.:.54273,0:.54272,0:.350.2.... PL
AY THE MELODY **-INVERTED AND BACKWARDS-
**.Q...."..."G(142),"... . INVERTED AND
BACKWARDS ..":.BG,4:.1140......,".. IT G
OES IN HERE!!.":.M$:.D.1.500:.D.K...A$.M
$:.T.C(M$).1..1:S.10.(E(J(M$,T,1)))...E.
.S.10.IB$.IB$."0":.972...J.IB$.IB$.G(S.4
8)...L...<.T.."........"A$;:P.C(A$).1:.T
.1.C(A$):A$." ".H(A$,P)." N".N....".....
...";A$;:.D.1.34:.D :.K.1.3:.1230:.K,T..
....1344.I,32:.1280......T.0.C(M$):T$.I(
IB$,T):."..............".8)"M "T$.T....D
.1.50:.:.:.D.1.500:.......Q.C(M$).1..1..
.$.G.10.(E(J(M$,Q,1))).&....54273,NH(G):
.54272,NL(G):.54276,33.B.8..D.1.77:.D:.5
4276,32:.Q.I.B..X.1.1234:.:.54273,0:.542
72,0:.350...L.. THE PROGRAM ENDS WITH A
SIREN / COLOR / PRINT ROUTINE.J.V.."....
. THE END! ".Z.`..D.1.1111
:....J..1490...T.. DRAW PICTURE OF MAGIC
MUSIC BOX.6.~..1384,79:.1423,80:.T.1385
.1422:.T,119:..P....T.55656.55695:.T,0:.
.....SP.C(M$):.1344.SP,78:.1344.SP.39,32
:.1344.SP.38,32......55616.SP,0:.1344.SP
.1,32.O....1424,116:.1463,106:.55696,0:.
55735,0......1464,76:.1503,122:.T.1465.1
502:.T,111:.......T.55736.55775:.T,0:...
.D...N.N.. MAKE THE MAGIC MUSIC BOX PROC
ESS THE MELODY...X.G..(1).38:C..(1).16:J
.(.(1).11).48:I.SP.1:N..(1).10......1425
.G,J:.55697.G,C:.1344.I,86:.55616.I,C...
...54273,NH(N):.54272,NL(N):.54276,17:.D
.1.3:.54276,16.......*.... OPEN THE MAGI
C MUSIC BOX AND LET THE MELODY OUT.V....
T.55736.55775:.T,0:.:.1471,32:.1472,32.L
....1511,77:.55783,0......".............
...............AND IT COMES OUT HERE!"..
.(..D.1.1111:....2...Q.<.. INPUT A STRIN
G...F.M$.""...P.AG$."."...Z..">";...D..A
G$".";...N..198,0:.198,1:.A$.'.X..A$.G(1
3).1480._...FL.0:.A$.".".A$.G(20).AG.C(M
$):.AG.0.." .. .";:FL.1.}....FL.1.M$.H(M
$,AG.1):.1380......A$."0".A$."9".1390...
..C(M$).LS.1460......A$;:M$.M$.A$.D....
1380.J...:...H..C(M$).40.M$.M$."00"...J.
.C(M$).39.M$.M$."000"...M.. : . M$=INPUT
STRING.(.R.. RE-CONNECT.A....15,8,15,"R
0:HELLO CONNECT=HELLO CONNECT":.15,ER: 1
5.O....ER..63........15,8,15,"I0": 15...
..."HELLO CONNECT",8...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL