_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

POLYCON.64

FILE INFORMATION

FILENAME(S): POLYCON.64

FILE TYPE(S): PRG

FILE SIZE: 2.7K

FIRST SEEN: 2025-12-01 13:49:06

APPEARS ON: 1 disk(s)

FILE HASH

f152c6daabcdc9c1f53202207ee1bf8b10ab1bca80c2a482bf4d08f091870532

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
HJ 1987 POLYCON.64 PRG hedning, Helsinborg 28 2 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 3A 08 64 00 99 20  C7 28 31 34 37 29 3A 99  |..:.d.. .(147):.|
00000010: 20 22 20 53 49 44 50 4C  41 59 45 52 20 50 4F 4C  | " SIDPLAYER POL|
00000020: 59 50 48 4F 4E 59 20 43  4F 4E 56 45 52 53 49 4F  |YPHONY CONVERSIO|
00000030: 4E 20 55 54 49 4C 49 54  59 22 00 5A 08 6E 00 99  |N UTILITY".Z.n..|
00000040: 20 22 20 42 59 20 43 52  41 49 47 20 43 48 41 4D  | " BY CRAIG CHAM|
00000050: 42 45 52 4C 41 49 4E 22  3A 99 00 8D 08 78 00 44  |BERLAIN":....x.D|
00000060: 4E B2 38 3A 53 41 B2 37  38 30 3A 53 58 B2 37 38  |N.8:SA.780:SX.78|
00000070: 31 3A 53 59 B2 37 38 32  3A 53 50 B2 37 38 33 3A  |1:SY.782:SP.783:|
00000080: 86 20 56 4C 28 32 29 2C  56 41 28 32 29 00 B9 08  |. VL(2),VA(2)...|
00000090: 82 00 96 20 A5 48 28 4E  29 B2 B5 28 4E AD 32 35  |... .H(N)..(N.25|
000000A0: 36 29 3A 96 20 A5 4C 28  4E 29 B2 4E AB 32 35 36  |6):. .L(N).N.256|
000000B0: AC B5 28 4E AD 32 35 36  29 00 D6 08 8C 00 96 20  |..(N.256)...... |
000000C0: A5 44 50 28 4E 29 B2 C2  28 4E 29 AA 32 35 36 AC  |.DP(N)..(N).256.|
000000D0: C2 28 4E AA 31 29 00 F2  08 96 00 4D 56 B2 34 33  |.(N.1).....MV.43|
000000E0: 39 35 3A 46 4D B2 34 35  34 31 3A 50 59 B2 34 36  |95:FM.4541:PY.46|
000000F0: 32 39 00 14 09 A0 00 4C  41 B2 A5 44 50 28 34 39  |29.....LA..DP(49|
00000100: 29 AA 35 30 30 3A 4D 54  B2 A5 44 50 28 35 31 29  |).500:MT..DP(51)|
00000110: AB 35 30 30 00 4D 09 2C  01 46 24 B2 22 22 3A 85  |.500.M.,.F$."":.|
00000120: 20 22 20 4C 4F 41 44 20  46 49 4C 45 4E 41 4D 45  | " LOAD FILENAME|
00000130: 22 3B 46 24 3A 8B 20 46  24 B2 22 22 20 B0 20 C3  |";F$:. F$."" . .|
00000140: 28 46 24 29 B1 31 32 20  89 20 33 30 30 00 76 09  |(F$).12 . 300.v.|
00000150: 36 01 8D 20 36 30 30 3A  97 20 53 41 2C 30 3A 97  |6.. 600:. SA,0:.|
00000160: 20 53 58 2C A5 4C 28 4C  41 29 3A 97 20 53 59 2C  | SX,.L(LA):. SY,|
00000170: A5 48 28 4C 41 29 00 92  09 40 01 9E 20 36 35 34  |.H(LA)...@.. 654|
00000180: 39 33 3A 8B 20 C2 28 53  50 29 AF 31 20 89 20 37  |93:. .(SP).1 . 7|
00000190: 30 30 00 BF 09 4A 01 81  20 4B B2 30 20 A4 20 32  |00...J.. K.0 . 2|
000001A0: 3A 56 4C 28 4B 29 B2 A5  44 50 28 4C 41 AA 32 AC  |:VL(K)..DP(LA.2.|
000001B0: 4B 29 3A 82 3A 45 41 B2  A5 44 50 28 53 58 29 00  |K):.:EA..DP(SX).|
000001C0: F8 09 90 01 85 20 22 20  53 4F 55 52 43 45 20 56  |..... " SOURCE V|
000001D0: 4F 49 43 45 22 3B 53 56  3A 8B 20 53 56 B3 31 20  |OICE";SV:. SV.1 |
000001E0: B0 20 53 56 B1 33 20 B0  20 53 56 B3 B1 B5 28 53  |. SV.3 . SV...(S|
000001F0: 56 29 20 89 20 34 30 30  00 30 0A 94 01 53 56 B2  |V) . 400.0...SV.|
00000200: 53 56 AB 31 3A 99 3A 41  53 B2 4C 41 AA 36 3A 8B  |SV.1:.:AS.LA.6:.|
00000210: 20 53 56 20 A7 20 81 20  4B B2 30 20 A4 20 53 56  | SV . . K.0 . SV|
00000220: AB 31 3A 41 53 B2 41 53  AA 56 4C 28 4B 29 3A 82  |.1:AS.AS.VL(K):.|
00000230: 00 41 0A 96 01 53 42 B2  41 53 AA 56 4C 28 53 56  |.A...SB.AS.VL(SV|
00000240: 29 00 7C 0A 9A 01 53 4D  B2 AB 31 3A 85 20 22 20  |).|...SM..1:. " |
00000250: 53 54 41 52 54 49 4E 47  20 4D 45 41 53 55 52 45  |STARTING MEASURE|
00000260: 22 3B 53 4D 3A 53 4D B2  B5 28 53 4D 29 3A 8B 20  |";SM:SM..(SM):. |
00000270: 53 4D B1 39 39 39 20 89  20 34 31 30 00 91 0A 9C  |SM.999 . 410....|
00000280: 01 8B 20 53 4D B3 30 20  A7 20 99 3A 89 20 34 32  |.. SM.0 . .:. 42|
00000290: 30 00 CF 0A 9E 01 9E 20  46 4D 2C 41 53 2C 53 42  |0...... FM,AS,SB|
000002A0: 2C 53 4D 3A 8B 20 A5 44  50 28 32 35 31 29 B2 53  |,SM:. .DP(251).S|
000002B0: 42 20 A7 20 99 20 22 20  45 52 52 4F 52 3A 20 4E  |B . . " ERROR: N|
000002C0: 4F 54 20 46 4F 55 4E 44  22 3A 89 20 34 31 30 00  |OT FOUND":. 410.|
000002D0: E1 0A A0 01 41 53 B2 A5  44 50 28 32 35 31 29 3A  |....AS..DP(251):|
000002E0: 99 00 1C 0B A4 01 45 4D  B2 31 30 30 30 3A 85 20  |......EM.1000:. |
000002F0: 22 20 20 20 45 4E 44 49  4E 47 20 4D 45 41 53 55  |"   ENDING MEASU|
00000300: 52 45 22 3B 45 4D 3A 45  4D B2 B5 28 45 4D 29 3A  |RE";EM:EM..(EM):|
00000310: 8B 20 45 4D B3 30 20 89  20 34 32 30 00 33 0B A6  |. EM.0 . 420.3..|
00000320: 01 8B 20 45 4D B1 39 39  39 20 A7 20 99 3A 89 20  |.. EM.999 . .:. |
00000330: 34 33 30 00 71 0B A8 01  9E 20 46 4D 2C 41 53 2C  |430.q.... FM,AS,|
00000340: 53 42 2C 45 4D 3A 8B 20  A5 44 50 28 32 35 31 29  |SB,EM:. .DP(251)|
00000350: B2 53 42 20 A7 20 99 20  22 20 45 52 52 4F 52 3A  |.SB . . " ERROR:|
00000360: 20 4E 4F 54 20 46 4F 55  4E 44 22 3A 89 20 34 32  | NOT FOUND":. 42|
00000370: 30 00 83 0B AA 01 53 42  B2 A5 44 50 28 32 35 31  |0.....SB..DP(251|
00000380: 29 3A 99 00 B9 0B AE 01  50 43 B2 30 3A 81 20 4B  |):......PC.0:. K|
00000390: B2 30 20 A4 20 32 3A 99  20 22 20 50 4F 4C 59 50  |.0 . 2:. " POLYP|
000003A0: 48 4F 4E 59 20 4F 4E 20  56 4F 49 43 45 22 20 4B  |HONY ON VOICE" K|
000003B0: AA 31 20 22 9D 3F 20 22  3B 00 F4 0B AF 01 92 20  |.1 ".? ";...... |
000003C0: 31 39 38 2C 31 35 3A A1  20 4B 24 3A 8B 20 4B 24  |198,15:. K$:. K$|
000003D0: B2 22 59 22 20 A7 20 99  20 22 59 45 53 22 3A 56  |."Y" . . "YES":V|
000003E0: 41 28 4B 29 B2 31 3A 50  43 B2 50 43 AA 31 3A 89  |A(K).1:PC.PC.1:.|
000003F0: 20 34 33 34 00 08 0C B0  01 8B 20 4B 24 B3 B1 22  | 434...... K$.."|
00000400: 4E 22 20 89 20 34 33 31  00 1B 0C B1 01 99 20 22  |N" . 431...... "|
00000410: 4E 4F 22 3A 56 41 28 4B  29 B2 30 00 3C 0C B2 01  |NO":VA(K).0.<...|
00000420: 82 3A 99 3A 91 20 50 43  AA 31 20 89 20 34 33 38  |.:.:. PC.1 . 438|
00000430: 2C 34 33 36 2C 34 34 30  2C 34 34 30 00 7D 0C B4  |,436,440,440.}..|
00000440: 01 8B 20 56 41 28 53 56  29 B2 30 20 A7 20 99 20  |.. VA(SV).0 . . |
00000450: 22 20 57 41 52 4E 49 4E  47 3A 20 4E 4F 54 20 50  |" WARNING: NOT P|
00000460: 4F 4C 59 50 48 4F 4E 59  20 41 52 52 41 4E 47 45  |OLYPHONY ARRANGE|
00000470: 4D 45 4E 54 22 3A 99 3A  89 20 34 34 30 00 A7 0C  |MENT":.:. 440...|
00000480: B6 01 99 20 22 20 45 52  52 4F 52 3A 20 4E 4F 54  |... " ERROR: NOT|
00000490: 20 45 4E 4F 55 47 48 20  56 4F 49 43 45 53 22 3A  | ENOUGH VOICES":|
000004A0: 99 3A 89 20 34 33 30 00  DD 0C B8 01 53 4C B2 53  |.:. 430.....SL.S|
000004B0: 42 AB 41 53 3A 56 41 B2  4C 41 AA 36 3A 81 20 4B  |B.AS:VA.LA.6:. K|
000004C0: B2 30 20 A4 20 32 3A 8B  20 56 41 28 4B 29 B2 30  |.0 . 2:. VA(K).0|
000004D0: 20 B0 20 4B B2 53 56 20  89 20 34 36 38 00 00 0D  | . K.SV . 468...|
000004E0: BA 01 50 41 B2 56 41 3A  50 42 B2 50 41 AA 56 4C  |..PA.VA:PB.PA.VL|
000004F0: 28 4B 29 3A 8B 20 53 4D  B3 30 20 89 20 34 35 30  |(K):. SM.0 . 450|
00000500: 00 35 0D BC 01 9E 20 46  4D 2C 50 41 2C 50 42 2C  |.5.... FM,PA,PB,|
00000510: 53 4D 3A 8B 20 A5 44 50  28 32 35 31 29 B3 B1 50  |SM:. .DP(251)..P|
00000520: 42 20 A7 20 50 41 B2 A5  44 50 28 32 35 31 29 3A  |B . PA..DP(251):|
00000530: 89 20 34 35 30 00 6A 0D  BE 01 99 20 22 20 45 52  |. 450.j.... " ER|
00000540: 52 4F 52 3A 20 56 4F 49  43 45 22 20 4B AA 31 20  |ROR: VOICE" K.1 |
00000550: 22 4D 45 41 53 55 52 45  22 20 53 4D 20 22 4E 4F  |"MEASURE" SM "NO|
00000560: 54 20 46 4F 55 4E 44 22  3A 80 00 7D 0D C2 01 8B  |T FOUND":..}....|
00000570: 20 45 4D B1 39 39 39 20  89 20 34 36 30 00 B2 0D  | EM.999 . 460...|
00000580: C4 01 9E 20 46 4D 2C 50  41 2C 50 42 2C 45 4D 3A  |... FM,PA,PB,EM:|
00000590: 8B 20 A5 44 50 28 32 35  31 29 B3 B1 50 42 20 A7  |. .DP(251)..PB .|
000005A0: 20 50 42 B2 A5 44 50 28  32 35 31 29 3A 89 20 34  | PB..DP(251):. 4|
000005B0: 36 30 00 E7 0D C6 01 99  20 22 20 45 52 52 4F 52  |60...... " ERROR|
000005C0: 3A 20 56 4F 49 43 45 22  20 4B AA 31 20 22 4D 45  |: VOICE" K.1 "ME|
000005D0: 41 53 55 52 45 22 20 45  4D 20 22 4E 4F 54 20 46  |ASURE" EM "NOT F|
000005E0: 4F 55 4E 44 22 3A 80 00  24 0E CC 01 44 4D B2 53  |OUND":..$...DM.S|
000005F0: 4C AB 50 42 AA 50 41 3A  8B 20 45 41 AA 44 4D B1  |L.PB.PA:. EA.DM.|
00000600: 4D 54 20 A7 20 99 20 22  20 45 52 52 4F 52 3A 20  |MT . . " ERROR: |
00000610: 4E 4F 54 20 45 4E 4F 55  47 48 20 4D 45 4D 4F 52  |NOT ENOUGH MEMOR|
00000620: 59 22 3A 80 00 3C 0E CE  01 9E 20 4D 56 2C 50 42  |Y":..<.... MV,PB|
00000630: 2C 45 41 AB 50 42 2C 50  41 AA 53 4C 00 73 0E D0  |,EA.PB,PA.SL.s..|
00000640: 01 56 4C 28 4B 29 B2 56  4C 28 4B 29 AA 44 4D 3A  |.VL(K).VL(K).DM:|
00000650: 45 41 B2 45 41 AA 44 4D  3A 8B 20 53 56 B1 4B 20  |EA.EA.DM:. SV.K |
00000660: A7 20 41 53 B2 41 53 AA  44 4D 3A 53 42 B2 53 42  |. AS.AS.DM:SB.SB|
00000670: AA 44 4D 00 8E 0E D2 01  9E 20 4D 56 2C 41 53 2C  |.DM...... MV,AS,|
00000680: 53 4C 2C 50 41 3A 56 41  28 4B 29 B2 50 41 00 B5  |SL,PA:VA(K).PA..|
00000690: 0E D4 01 56 41 B2 56 41  AA 56 4C 28 4B 29 3A 82  |...VA.VA.VL(K):.|
000006A0: 3A 8B 20 56 41 28 53 56  29 20 A7 20 56 41 28 53  |:. VA(SV) . VA(S|
000006B0: 56 29 B2 41 53 00 C6 0E  D6 01 8B 20 50 43 B2 31  |V).AS...... PC.1|
000006C0: 20 89 20 34 38 30 00 05  0F D8 01 49 4E B2 31 3A  | . 480.....IN.1:|
000006D0: 81 20 4B B2 30 20 A4 20  32 3A 8B 20 56 41 28 4B  |. K.0 . 2:. VA(K|
000006E0: 29 20 A7 20 9E 20 50 59  2C 56 41 28 4B 29 2C 56  |) . . PY,VA(K),V|
000006F0: 41 28 4B 29 AA 53 4C 2C  50 43 2C 49 4E 3A 49 4E  |A(K).SL,PC,IN:IN|
00000700: B2 49 4E AA 31 00 0B 0F  DA 01 82 00 2C 0F E0 01  |.IN.1.......,...|
00000710: 99 20 22 20 43 4F 4E 56  45 52 54 20 41 4E 4F 54  |. " CONVERT ANOT|
00000720: 48 45 52 20 50 41 52 54  3F 20 22 3B 00 59 0F E2  |HER PART? ";.Y..|
00000730: 01 92 20 31 39 38 2C 31  35 3A A1 20 4B 24 3A 8B  |.. 198,15:. K$:.|
00000740: 20 4B 24 B2 22 59 22 20  A7 20 99 20 22 59 45 53  | K$."Y" . . "YES|
00000750: 22 3A 99 3A 89 20 34 30  30 00 6D 0F E4 01 8B 20  |":.:. 400.m.... |
00000760: 4B 24 B3 B1 22 4E 22 20  89 20 34 38 32 00 7A 0F  |K$.."N" . 482.z.|
00000770: E6 01 99 20 22 4E 4F 22  3A 99 00 B2 0F F4 01 81  |... "NO":.......|
00000780: 20 4B B2 30 20 A4 20 32  3A 97 20 4C 41 AA 32 AC  | K.0 . 2:. LA.2.|
00000790: 4B 2C A5 4C 28 56 4C 28  4B 29 29 3A 97 20 4C 41  |K,.L(VL(K)):. LA|
000007A0: AA 32 AC 4B AA 31 2C A5  48 28 56 4C 28 4B 29 29  |.2.K.1,.H(VL(K))|
000007B0: 3A 82 00 EB 0F FE 01 46  24 B2 22 22 3A 85 20 22  |:......F$."":. "|
000007C0: 20 53 41 56 45 20 46 49  4C 45 4E 41 4D 45 22 3B  | SAVE FILENAME";|
000007D0: 46 24 3A 8B 20 46 24 B2  22 22 20 B0 20 C3 28 46  |F$:. F$."" . .(F|
000007E0: 24 29 B1 31 32 20 89 20  35 31 30 00 18 10 08 02  |$).12 . 510.....|
000007F0: 8D 20 36 30 30 3A 97 20  53 41 2C 32 35 31 3A 97  |. 600:. SA,251:.|
00000800: 20 32 35 31 2C A5 4C 28  4C 41 29 3A 97 20 32 35  | 251,.L(LA):. 25|
00000810: 32 2C A5 48 28 4C 41 29  00 4C 10 12 02 97 20 53  |2,.H(LA).L.... S|
00000820: 58 2C A5 4C 28 45 41 29  3A 97 20 53 59 2C A5 48  |X,.L(EA):. SY,.H|
00000830: 28 45 41 29 3A 9E 20 36  35 34 39 36 3A 8B 20 C2  |(EA):. 65496:. .|
00000840: 28 53 50 29 AF 31 20 89  20 37 30 30 00 6B 10 1C  |(SP).1 . 700.k..|
00000850: 02 99 20 22 20 53 41 56  45 44 22 20 45 41 AB 4C  |.. " SAVED" EA.L|
00000860: 41 20 22 42 59 54 45 53  22 3A 80 00 9C 10 58 02  |A "BYTES":....X.|
00000870: 99 3A 97 20 53 41 2C 31  3A 97 20 53 58 2C 44 4E  |.:. SA,1:. SX,DN|
00000880: 3A 97 20 53 59 2C 30 3A  9E 20 36 35 34 36 36 3A  |:. SY,0:. 65466:|
00000890: 46 24 B2 46 24 AA 22 2E  4D 55 53 22 00 C3 10 62  |F$.F$.".MUS"...b|
000008A0: 02 81 20 4B B2 31 20 A4  20 C3 28 46 24 29 3A 97  |.. K.1 . .(F$):.|
000008B0: 20 35 38 34 AA 4B 2C C6  28 CA 28 46 24 2C 4B 29  | 584.K,.(.(F$,K)|
000008C0: 29 3A 82 00 EB 10 6C 02  97 20 53 41 2C C3 28 46  |):....l.. SA,.(F|
000008D0: 24 29 3A 97 20 53 58 2C  37 33 3A 97 20 53 59 2C  |$):. SX,73:. SY,|
000008E0: 32 3A 9E 20 36 35 34 36  39 3A 8E 00 18 11 BC 02  |2:. 65469:......|
000008F0: 8B 20 C2 28 53 41 29 B2  34 20 A7 20 99 20 22 20  |. .(SA).4 . . " |
00000900: 45 52 52 4F 52 3A 20 46  49 4C 45 20 4E 4F 54 20  |ERROR: FILE NOT |
00000910: 46 4F 55 4E 44 22 3A 80  00 29 11 C6 02 99 20 22  |FOUND":..).... "|
00000920: 20 45 52 52 4F 52 22 3A  80 00 00 00 20 FD AE 20  | ERROR":.... .. |
00000930: 8A AD 20 F7 B7 84 FB 85  FC 20 FD AE 20 8A AD 20  |.. ...... .. .. |
00000940: F7 B7 8C BB 11 8D BC 11  20 FD AE 20 8A AD 20 F7  |........ .. .. .|
00000950: B7 84 FD 85 FE 98 38 E5  FB AA A5 FE E5 FC A8 8A  |......8.........|
00000960: CD BB 11 98 ED BC 11 90  23 A0 00 AE BC 11 F0 0E  |........#.......|
00000970: B1 FB 91 FD C8 D0 F9 E6  FC E6 FE CA D0 F2 AE BB  |................|
00000980: 11 F0 08 B1 FB 91 FD C8  CA D0 F8 60 AD BC 11 A8  |...........`....|
00000990: 65 FC 85 FC 98 18 65 FE  85 FE AC BB 11 F0 08 88  |e.....e.........|
000009A0: B1 FB 91 FD 98 D0 F8 AE  BC 11 F0 0F C6 FC C6 FE  |................|
000009B0: 88 B1 FB 91 FD 98 D0 F8  CA D0 F1 60 00 00 20 FD  |...........`.. .|
000009C0: AE 20 8A AD 20 F7 B7 84  FB 85 FC 20 FD AE 20 8A  |. .. ...... .. .|
000009D0: AD 20 F7 B7 84 FD 85 FE  20 FD AE 20 8A AD 20 F7  |. ...... .. .. .|
000009E0: B7 8C 14 12 4A 6A 6A 09  1E 8D 13 12 A0 00 B1 FB  |....Jjj.........|
000009F0: CD 13 12 D0 09 C8 B1 FB  88 CD 14 12 F0 15 A5 FB  |................|
00000A00: 18 69 02 85 FB 90 02 E6  FC C5 FD D0 E1 A5 FC C5  |.i..............|
00000A10: FE D0 DB 60 00 00 20 FD  AE 20 8A AD 20 F7 B7 84  |...`.. .. .. ...|
00000A20: FB 85 FC 20 FD AE 20 8A  AD 20 F7 B7 84 FD 85 FE  |... .. .. ......|
00000A30: 20 F1 B7 86 FF 20 F1 B7  A0 00 8C A5 12 8C A6 12  | .... ..........|
00000A40: B1 FB 29 03 D0 48 B1 FB  8D A3 12 F0 41 C8 B1 FB  |..)..H......A...|
00000A50: F0 3B CD A5 12 8D A5 12  F0 05 AD A6 12 F0 09 A9  |.;..............|
00000A60: 00 8D A6 12 AE A4 12 E8  CA 8E A4 12 F0 14 A9 00  |................|
00000A70: 91 FB 88 B1 FB 29 BF D1  FB 91 FB F0 11 EE A6 12  |.....)..........|
00000A80: D0 0C A6 FF AD A3 12 0A  10 03 8C A6 12 88 A5 FB  |................|
00000A90: 18 69 02 85 FB 90 02 E6  FC C5 FD D0 A3 A5 FC C5  |.i..............|
00000AA0: FE D0 9D 60 00 00 00 00                           |...`....        |
..:.D.. G(147):. " SIDPLAYER POLYPHONY C
ONVERSION UTILITY".Z.N.. " BY CRAIG CHAM
BERLAIN":....X.DN.8:SA.780:SX.781:SY.782
:SP.783:. VL(2),VA(2)...... .H(N)..(N.25
6):. .L(N).N.256..(N.256).V.... .DP(N).B
(N).256.B(N.1).....MV.4395:FM.4541:PY.46
29... .LA..DP(49).500:MT..DP(51).500.M.,
.F$."":. " LOAD FILENAME";F$:. F$."" . C
(F$).12 . 300.V.6.. 600:. SA,0:. SX,.L(L
A):. SY,.H(LA)...@.. 65493:. B(SP).1 . 7
00...J.. K.0 . 2:VL(K)..DP(LA.2.K):.:EA.
.DP(SX)...... " SOURCE VOICE";SV:. SV.1 
. SV.3 . SV...(SV) . 400.0...SV.SV.1:.:A
S.LA.6:. SV . . K.0 . SV.1:AS.AS.VL(K):.
.A...SB.AS.VL(SV).|...SM..1:. " STARTING
 MEASURE";SM:SM..(SM):. SM.999 . 410....
.. SM.0 . .:. 420.O.... FM,AS,SB,SM:. .D
P(251).SB . . " ERROR: NOT FOUND":. 410.
.. .AS..DP(251):......EM.1000:. "   ENDI
NG MEASURE";EM:EM..(EM):. EM.0 . 420.3..
.. EM.999 . .:. 430.Q.... FM,AS,SB,EM:. 
.DP(251).SB . . " ERROR: NOT FOUND":. 42
0.....SB..DP(251):......PC.0:. K.0 . 2:.
 " POLYPHONY ON VOICE" K.1 ".? ";...... 
198,15:. K$:. K$."Y" . . "YES":VA(K).1:P
C.PC.1:. 434...... K$.."N" . 431...... "
NO":VA(K).0.<....:.:. PC.1 . 438,436,440
,440.}.... VA(SV).0 . . " WARNING: NOT P
OLYPHONY ARRANGEMENT":.:. 440...... " ER
ROR: NOT ENOUGH VOICES":.:. 430.....SL.S
B.AS:VA.LA.6:. K.0 . 2:. VA(K).0 . K.SV 
. 468.....PA.VA:PB.PA.VL(K):. SM.0 . 450
.5.... FM,PA,PB,SM:. .DP(251)..PB . PA..
DP(251):. 450.J.... " ERROR: VOICE" K.1 
"MEASURE" SM "NOT FOUND":..}.B.. EM.999 
. 460...D.. FM,PA,PB,EM:. .DP(251)..PB .
 PB..DP(251):. 460...F.. " ERROR: VOICE"
 K.1 "MEASURE" EM "NOT FOUND":..$.L.DM.S
L.PB.PA:. EA.DM.MT . . " ERROR: NOT ENOU
GH MEMORY":..<.N.. MV,PB,EA.PB,PA.SL.S.P
.VL(K).VL(K).DM:EA.EA.DM:. SV.K . AS.AS.
DM:SB.SB.DM...R.. MV,AS,SL,PA:VA(K).PA..
.T.VA.VA.VL(K):.:. VA(SV) . VA(SV).AS.F.
V.. PC.1 . 480...X.IN.1:. K.0 . 2:. VA(K
) . . PY,VA(K),VA(K).SL,PC,IN:IN.IN.1...
Z...,.... " CONVERT ANOTHER PART? ";.Y..
.. 198,15:. K$:. K$."Y" . . "YES":.:. 40
0.M.... K$.."N" . 482.Z.... "NO":.......
 K.0 . 2:. LA.2.K,.L(VL(K)):. LA.2.K.1,.
H(VL(K)):......F$."":. " SAVE FILENAME";
F$:. F$."" . C(F$).12 . 510...... 600:. 
SA,251:. 251,.L(LA):. 252,.H(LA).L.... S
X,.L(EA):. SY,.H(EA):. 65496:. B(SP).1 .
 700.K.... " SAVED" EA.LA "BYTES":....X.
.:. SA,1:. SX,DN:. SY,0:. 65466:F$.F$.".
MUS".C.B.. K.1 . C(F$):. 584.K,F(J(F$,K)
):....L.. SA,C(F$):. SX,73:. SY,2:. 6546
9:....... B(SA).4 . . " ERROR: FILE NOT 
FOUND":..).F.. " ERROR":.... .. .. .....
. .. .. ........ .. .. .......8.........
M.......# ..........HP.....JP..........H
JP.`....E.....E..............P......F.F.
......P.JP.`.. .. .. ...... .. .. ......
 .. .. .....JJJ..... ...M..P.H...M......
.I.......E.P...E.P.`.. .. .. ...... .. .
. ...... .... .. .........).PH......AH..
.;M.....................J............).Q
........P................I.......E.P...E
.P.`....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL