MUSIK
FILE INFORMATION
FILENAME(S): MUSIK
FILE TYPE(S): PRG
FILE SIZE: 3.1K
FIRST SEEN: 2025-11-30 19:47:38
APPEARS ON: 1 disk(s)
FILE HASH
1e036823801711ff54d07aaa79a24104b05edc15c4ed673eb1af0eaa19be4edf
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| KOPIDISK 11 2 | MUSIK | PRG | Curtcool, Frank | 25 | 12 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2A 08 05 00 8F 2A 2A 2A 36 34 4D 55 53 49 |..*....***64MUSI|
00000010: 43 20 42 59 20 49 41 4E 20 57 45 44 47 45 2C 20 |C BY IAN WEDGE, |
00000020: 32 36 2F 35 2F 38 33 2A 2A 2A 00 58 08 0A 00 4C |26/5/83***.X...L|
00000030: 58 B2 35 33 32 36 37 3A 4C 59 B2 4C 58 AA 31 3A |X.53267:LY.LX.1:|
00000040: 86 57 46 25 28 35 30 29 2C 48 46 25 28 35 30 29 |.WF%(50),HF%(50)|
00000050: 2C 4C 46 25 28 35 30 29 00 70 08 19 00 81 5A B2 |,LF%(50).p....Z.|
00000060: 31 A4 38 3A 87 48 28 5A 29 2C 4C 28 5A 29 3A 82 |1.8:.H(Z),L(Z):.|
00000070: 00 94 08 1E 00 56 B2 35 34 32 39 36 3A 57 B2 35 |.....V.54296:W.5|
00000080: 34 32 37 36 3A 48 B2 35 34 32 37 33 3A 4C B2 35 |4276:H.54273:L.5|
00000090: 34 32 37 32 00 A7 08 28 00 99 22 93 90 22 3A 97 |4272...(.."..":.|
000000A0: 35 33 32 38 31 2C 31 00 B0 08 2D 00 8D 35 30 30 |53281,1...-..500|
000000B0: 00 B9 08 2E 00 99 22 93 22 00 C2 08 32 00 8D 37 |......"."...2..7|
000000C0: 30 30 00 CB 08 3C 00 8D 38 30 30 00 D4 08 46 00 |00...<..800...F.|
000000D0: 8D 38 30 30 00 02 09 50 00 99 22 90 57 31 20 12 |.800...P..".W1 .|
000000E0: 20 1D 1D 1D 20 1D 1D 1D 20 1D 1D 1D 20 1D 1D 1D | ... ... ... ...|
000000F0: 20 1D 1D 1D 20 1D 1D 1D 20 1D 1D 1D 20 1D 1D 1D | ... ... ... ...|
00000100: 20 22 00 0B 09 5A 00 8D 37 30 30 00 14 09 64 00 | "...Z..700...d.|
00000110: 8D 38 30 30 00 1D 09 6E 00 8D 38 30 30 00 4B 09 |.800...n..800.K.|
00000120: 78 00 99 22 90 57 32 20 12 20 1D 1D 1D 20 1D 1D |x..".W2 . ... ..|
00000130: 1D 20 1D 1D 1D 20 1D 1D 1D 20 1D 1D 1D 20 1D 1D |. ... ... ... ..|
00000140: 1D 20 1D 1D 1D 20 1D 1D 1D 20 22 00 54 09 82 00 |. ... ... ".T...|
00000150: 8D 37 30 30 00 5D 09 8C 00 8D 38 30 30 00 66 09 |.700.]....800.f.|
00000160: 96 00 8D 38 30 30 00 94 09 A0 00 99 22 90 57 33 |...800......".W3|
00000170: 20 12 20 1D 1D 1D 20 1D 1D 1D 20 1D 1D 1D 20 1D | . ... ... ... .|
00000180: 1D 1D 20 1D 1D 1D 20 1D 1D 1D 20 1D 1D 1D 20 1D |.. ... ... ... .|
00000190: 1D 1D 20 22 00 9D 09 AA 00 8D 37 30 30 00 C7 09 |.. "......700...|
000001A0: B4 00 99 22 20 20 20 20 20 43 20 20 20 44 20 20 |..." C D |
000001B0: 20 45 20 20 20 46 20 20 20 47 20 20 20 41 20 20 | E F G A |
000001C0: 20 42 20 20 20 43 22 00 F4 09 B5 00 99 3A 99 22 | B C"......:."|
000001D0: 1D 1D 1D 1D 1D 1D 1D 1D 53 54 4F 50 20 20 20 20 |........STOP |
000001E0: 20 20 20 2A 20 20 20 20 20 20 20 52 45 50 4C 41 | * REPLA|
000001F0: 59 22 3A 99 00 24 0A B6 00 99 22 50 52 45 53 53 |Y":..$...."PRESS|
00000200: 20 54 48 45 20 4C 45 46 54 20 48 41 4E 44 20 53 | THE LEFT HAND S|
00000210: 48 49 46 54 20 4B 45 59 20 54 4F 20 4F 50 45 52 |HIFT KEY TO OPER|
00000220: 41 54 45 22 00 55 0A B7 00 99 22 C0 C0 C0 C0 C0 |ATE".U....".....|
00000230: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000240: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000250: C0 C0 C0 22 3B 00 6B 0A B8 00 99 22 41 54 54 41 |...";.k...."ATTA|
00000260: 43 4B 2F 44 45 43 41 59 22 41 44 00 84 0A BA 00 |CK/DECAY"AD.....|
00000270: 99 22 53 55 53 54 41 49 4E 2F 52 45 4C 45 41 53 |."SUSTAIN/RELEAS|
00000280: 45 22 53 52 00 AD 0A BB 00 99 22 48 49 47 48 20 |E"SR......"HIGH |
00000290: 50 55 4C 53 45 22 50 48 3B 3A 99 A3 32 30 29 22 |PULSE"PH;:..20)"|
000002A0: 4C 4F 57 20 50 55 4C 53 45 22 50 4C 3B 00 CC 0A |LOW PULSE"PL;...|
000002B0: BE 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...*************|
000002C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 EB 0A BF |************....|
000002D0: 00 8F 2A 46 49 4E 44 20 4C 49 47 48 54 2D 50 45 |..*FIND LIGHT-PE|
000002E0: 4E 20 50 4F 53 49 54 49 4F 4E 2A 00 0A 0B C0 00 |N POSITION*.....|
000002F0: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
00000300: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 37 0B C1 00 81 |**********.7....|
00000310: 5A B2 31 A4 33 30 3A 57 46 25 28 5A 29 B2 30 3A |Z.1.30:WF%(Z).0:|
00000320: 48 46 25 28 5A 29 B2 30 3A 4C 46 25 28 5A 29 B2 |HF%(Z).0:LF%(Z).|
00000330: 30 3A 82 3A 51 B2 30 00 46 0B C8 00 50 4D 51 B2 |0:.:Q.0.F...PMQ.|
00000340: C2 28 36 35 34 29 00 59 0B CD 00 8B 20 50 4D 51 |.(654).Y.... PMQ|
00000350: B3 B1 31 20 A7 20 32 30 30 00 68 0B D2 00 50 4D |..1 . 200.h...PM|
00000360: 51 B2 C2 28 36 35 34 29 00 7C 0B DC 00 58 B2 C2 |Q..(654).|...X..|
00000370: 28 4C 58 29 3A 59 B2 C2 28 4C 59 29 00 8E 0B E1 |(LX):Y..(LY)....|
00000380: 00 8B 20 50 4D 51 B2 31 20 A7 20 32 31 30 00 C5 |.. PMQ.1 . 210..|
00000390: 0B E6 00 58 25 B2 28 58 AB 33 30 29 AD 34 3A 59 |...X%.(X.30).4:Y|
000003A0: 25 B2 28 59 AB 34 34 29 AD 38 3A 8B 58 25 B3 34 |%.(Y.44).8:.X%.4|
000003B0: B0 58 25 B1 33 35 B0 59 25 B3 32 B0 59 25 B1 32 |.X%.35.Y%.2.Y%.2|
000003C0: 34 A7 32 32 30 00 F9 0B 04 01 99 22 13 58 20 20 |4.220......".X |
000003D0: 20 20 9D 9D 9D 9D 22 58 25 2C 22 59 20 20 20 20 | ...."X%,"Y |
000003E0: 9D 9D 9D 9D 22 59 25 2C 22 4E 4F 54 45 20 20 20 |...."Y%,"NOTE |
000003F0: 20 9D 9D 9D 9D 22 51 AA 31 00 0E 0C 0E 01 8B 59 | ...."Q.1......Y|
00000400: 25 B1 31 AF 59 25 B3 35 A7 57 46 B2 31 37 00 23 |%.1.Y%.5.WF.17.#|
00000410: 0C 18 01 8B 59 25 B1 35 AF 59 25 B3 39 A7 57 46 |....Y%.5.Y%.9.WF|
00000420: B2 33 33 00 39 0C 22 01 8B 59 25 B1 39 AF 59 25 |.33.9."..Y%.9.Y%|
00000430: B3 31 32 A7 57 46 B2 36 35 00 48 0C 27 01 8B 59 |.12.WF.65.H.'..Y|
00000440: 25 B1 31 32 A7 34 30 30 00 56 0C 2C 01 4E B2 B5 |%.12.400.V.,.N..|
00000450: 28 58 25 AD 34 29 00 60 0C 31 01 51 B2 51 AA 31 |(X%.4).`.1.Q.Q.1|
00000460: 00 94 0C 36 01 97 56 2C 31 35 3A 97 35 34 32 37 |...6..V,15:.5427|
00000470: 37 2C 41 44 3A 97 35 34 32 37 38 2C 53 52 3A 97 |7,AD:.54278,SR:.|
00000480: 57 2C 57 46 3A 97 48 2C 48 28 4E 29 3A 97 4C 2C |W,WF:.H,H(N):.L,|
00000490: 4C 28 4E 29 00 B3 0C 37 01 8B 57 46 B2 36 35 A7 |L(N)...7..WF.65.|
000004A0: 97 35 34 32 37 35 2C 50 48 3A 97 35 34 32 37 34 |.54275,PH:.54274|
000004B0: 2C 50 4C 00 DF 0C 3B 01 8B 51 B3 35 31 A7 57 46 |,PL...;..Q.51.WF|
000004C0: 25 28 51 29 B2 57 46 3A 48 46 25 28 51 29 B2 48 |%(Q).WF:HF%(Q).H|
000004D0: 28 4E 29 3A 4C 46 25 28 51 29 B2 4C 28 4E 29 00 |(N):LF%(Q).L(N).|
000004E0: E8 0C 40 01 89 32 30 30 00 00 0D 8D 01 8F 2A 2A |..@..200......**|
000004F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000500: 00 18 0D 8E 01 8F 2A 53 57 49 54 43 48 20 53 4F |......*SWITCH SO|
00000510: 55 4E 44 20 4F 46 46 2A 00 30 0D 8F 01 8F 2A 2A |UND OFF*.0....**|
00000520: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000530: 00 55 0D 90 01 97 57 2C 30 3A 97 48 2C 30 3A 97 |.U....W,0:.H,0:.|
00000540: 4C 2C 30 3A 97 35 34 32 37 35 2C 30 3A 97 35 34 |L,0:.54275,0:.54|
00000550: 32 37 34 2C 30 00 63 0D 9A 01 8B 59 25 B1 32 30 |274,0.c....Y%.20|
00000560: A7 34 30 00 73 0D 9F 01 8B 58 25 B1 32 30 A7 31 |.40.s....X%.20.1|
00000570: 30 30 30 00 7C 0D A4 01 89 31 39 33 00 A6 0D F3 |000.|....193....|
00000580: 01 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..**************|
00000590: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000005A0: 2A 2A 2A 2A 2A 2A 00 D0 0D F4 01 8F 2A 41 54 54 |******......*ATT|
000005B0: 41 43 4B 2F 44 45 4C 41 59 2D 53 55 53 54 41 49 |ACK/DELAY-SUSTAI|
000005C0: 4E 2F 52 45 4C 45 41 53 45 2D 50 55 4C 53 45 2A |N/RELEASE-PULSE*|
000005D0: 00 FA 0D F5 01 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |......**********|
000005E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000005F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 1E 0E F9 01 99 |**********......|
00000600: 22 20 20 20 20 20 20 20 20 20 20 20 20 2A 2A 2A |" ***|
00000610: 20 36 34 20 4D 55 53 49 43 20 2A 2A 2A 22 00 38 | 64 MUSIC ***".8|
00000620: 0E FE 01 99 22 13 22 3B 3A 81 5A B2 31 A4 31 30 |....".";:.Z.1.10|
00000630: 3A 99 22 11 22 3B 3A 82 00 63 0E 00 02 99 22 41 |:.".";:..c...."A|
00000640: 54 54 41 43 4B 2F 44 45 43 41 59 20 28 30 2D 32 |TTACK/DECAY (0-2|
00000650: 35 35 29 20 20 20 20 20 20 20 9D 9D 9D 9D 9D 9D |55) ......|
00000660: 9D 22 3B 00 6B 0E 03 02 45 B2 30 00 7D 0E 06 02 |.";.k...E.0.}...|
00000670: 81 5A B2 31 A4 31 30 3A A1 41 24 3A 82 00 8B 0E |.Z.1.10:.A$:....|
00000680: 08 02 85 20 41 24 3A 8D 39 30 30 00 98 0E 0D 02 |... A$:.900.....|
00000690: 8B 45 B2 31 A7 35 31 30 00 B6 0E 0F 02 41 44 B2 |.E.1.510.....AD.|
000006A0: C5 28 41 24 29 3A 8B 41 44 B3 30 B0 41 44 B1 32 |.(A$):.AD.0.AD.2|
000006B0: 35 35 A7 35 31 30 00 D0 0E 12 02 99 22 13 22 3B |55.510......".";|
000006C0: 3A 81 5A B2 31 A4 31 31 3A 99 22 11 22 3B 3A 82 |:.Z.1.11:.".";:.|
000006D0: 00 FE 0E 14 02 99 22 53 55 53 54 41 49 4E 2F 52 |......"SUSTAIN/R|
000006E0: 45 4C 45 41 53 45 20 28 30 2D 32 35 35 29 20 20 |ELEASE (0-255) |
000006F0: 20 20 20 20 20 9D 9D 9D 9D 9D 9D 9D 22 3B 00 06 | .......";..|
00000700: 0F 17 02 45 B2 30 00 18 0F 1A 02 81 5A B2 31 A4 |...E.0......Z.1.|
00000710: 31 30 3A A1 41 24 3A 82 00 25 0F 1C 02 85 41 24 |10:.A$:..%....A$|
00000720: 3A 8D 39 30 30 00 32 0F 21 02 8B 45 B2 31 A7 35 |:.900.2.!..E.1.5|
00000730: 33 30 00 50 0F 23 02 53 52 B2 C5 28 41 24 29 3A |30.P.#.SR..(A$):|
00000740: 8B 53 52 B3 30 B0 53 52 B1 32 35 35 A7 35 33 30 |.SR.0.SR.255.530|
00000750: 00 6A 0F 26 02 99 22 13 22 3B 3A 81 5A B2 31 A4 |.j.&..".";:.Z.1.|
00000760: 31 32 3A 99 22 11 22 3B 3A 82 00 92 0F 28 02 99 |12:.".";:....(..|
00000770: 22 48 49 47 48 20 50 55 4C 53 45 20 28 30 2D 31 |"HIGH PULSE (0-1|
00000780: 35 29 20 20 20 20 20 20 20 9D 9D 9D 9D 9D 9D 9D |5) .......|
00000790: 22 3B 00 B1 0F 2B 02 45 B2 30 3A 81 5A B2 31 A4 |";...+.E.0:.Z.1.|
000007A0: 31 30 3A A1 41 24 3A 82 3A 85 41 24 3A 8D 39 30 |10:.A$:.:.A$:.90|
000007B0: 30 00 BE 0F 30 02 8B 45 B2 31 A7 35 35 30 00 DB |0...0..E.1.550..|
000007C0: 0F 35 02 50 48 B2 C5 28 41 24 29 3A 8B 50 48 B3 |.5.PH..(A$):.PH.|
000007D0: 30 B0 50 48 B1 31 35 A7 35 35 30 00 F5 0F 3A 02 |0.PH.15.550...:.|
000007E0: 99 22 13 22 3B 3A 81 5A B2 31 A4 31 33 3A 99 22 |.".";:.Z.1.13:."|
000007F0: 11 22 3B 3A 82 00 1D 10 3C 02 99 22 4C 4F 57 20 |.";:....<.."LOW |
00000800: 50 55 4C 53 45 20 28 30 2D 32 35 35 29 20 20 20 |PULSE (0-255) |
00000810: 20 20 20 20 9D 9D 9D 9D 9D 9D 9D 22 3B 00 3C 10 | .......";.<.|
00000820: 3F 02 45 B2 30 3A 81 5A B2 31 A4 31 30 3A A1 41 |?.E.0:.Z.1.10:.A|
00000830: 24 3A 82 3A 85 41 24 3A 8D 39 30 30 00 49 10 44 |$:.:.A$:.900.I.D|
00000840: 02 8B 45 B2 31 A7 35 37 30 00 67 10 49 02 50 4C |..E.1.570.g.I.PL|
00000850: B2 C5 28 41 24 29 3A 8B 50 4C B3 30 B0 50 4C B1 |..(A$):.PL.0.PL.|
00000860: 32 35 35 A7 35 37 30 00 6D 10 4E 02 8E 00 83 10 |255.570.m.N.....|
00000870: 55 02 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |U..*************|
00000880: 2A 2A 2A 00 99 10 56 02 8F 2A 44 41 54 41 20 46 |***...V..*DATA F|
00000890: 4F 52 20 4E 4F 54 45 53 2A 00 AF 10 57 02 8F 2A |OR NOTES*...W..*|
000008A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
000008B0: E9 10 58 02 83 33 34 2C 37 35 2C 33 38 2C 31 32 |..X..34,75,38,12|
000008C0: 36 2C 34 33 2C 35 32 2C 34 35 2C 31 39 38 2C 35 |6,43,52,45,198,5|
000008D0: 31 2C 39 37 2C 35 37 2C 31 37 32 2C 36 34 2C 31 |1,97,57,172,64,1|
000008E0: 38 38 2C 36 38 2C 31 34 39 00 FE 10 B9 02 8F 2A |88,68,149......*|
000008F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 13 |**************..|
00000900: 11 BA 02 8F 2A 53 43 52 45 45 4E 20 4C 41 59 4F |....*SCREEN LAYO|
00000910: 55 54 2A 00 28 11 BB 02 8F 2A 2A 2A 2A 2A 2A 2A |UT*.(....*******|
00000920: 2A 2A 2A 2A 2A 2A 2A 2A 00 58 11 BC 02 99 22 12 |********.X....".|
00000930: 90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00000940: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000950: 20 20 20 20 20 22 3A 8E 00 88 11 20 03 99 22 12 | ":.... ..".|
00000960: 90 1D 1D 1D 20 1D 1D 1D 20 1D 1D 1D 20 1D 1D 1D |.... ... ... ...|
00000970: 20 1D 1D 1D 20 1D 1D 1D 20 1D 1D 1D 20 1D 1D 1D | ... ... ... ...|
00000980: 20 1D 1D 1D 20 22 3A 8E 00 A3 11 83 03 8F 2A 2A | ... ":.......**|
00000990: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000009A0: 2A 2A 2A 00 BE 11 84 03 8F 2A 49 4E 50 55 54 20 |***......*INPUT |
000009B0: 43 48 45 43 4B 20 52 4F 55 54 49 4E 45 2A 00 D9 |CHECK ROUTINE*..|
000009C0: 11 85 03 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |....************|
000009D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 ED 11 8E 03 8B 41 |*********......A|
000009E0: 24 B2 22 22 A7 45 B2 31 3A 89 39 33 30 00 22 12 |$."".E.1:.930.".|
000009F0: 98 03 81 5A B2 31 A4 C3 28 41 24 29 3A 42 24 B2 |...Z.1..(A$):B$.|
00000A00: CA 28 41 24 2C 5A 2C 31 29 3A 8B C6 28 42 24 29 |.(A$,Z,1):..(B$)|
00000A10: B3 34 38 B0 C6 28 42 24 29 B1 35 37 A7 45 B2 31 |.48..(B$).57.E.1|
00000A20: 3A 82 00 28 12 A2 03 8E 00 37 12 E8 03 8F 20 2A |:..(.....7.... *|
00000A30: 2A 2A 2A 2A 2A 2A 2A 00 46 12 E9 03 8F 20 2A 52 |*******.F.... *R|
00000A40: 45 50 4C 41 59 2A 00 55 12 EA 03 8F 20 2A 2A 2A |EPLAY*.U.... ***|
00000A50: 2A 2A 2A 2A 2A 00 6C 12 ED 03 51 31 B2 51 AA 28 |*****.l...Q1.Q.(|
00000A60: 51 B1 35 30 29 AC 28 51 AB 35 30 29 00 78 12 F2 |Q.50).(Q.50).x..|
00000A70: 03 81 5A B2 31 A4 51 31 00 AE 12 FC 03 97 35 34 |..Z.1.Q1......54|
00000A80: 32 37 37 2C 41 44 3A 97 35 34 32 37 38 2C 53 52 |277,AD:.54278,SR|
00000A90: 3A 97 57 2C 57 46 25 28 5A 29 3A 97 48 2C 48 46 |:.W,WF%(Z):.H,HF|
00000AA0: 25 28 5A 29 3A 97 4C 2C 4C 46 25 28 5A 29 00 D1 |%(Z):.L,LF%(Z)..|
00000AB0: 12 01 04 8B 57 46 25 28 5A 29 B2 36 35 A7 97 35 |....WF%(Z).65..5|
00000AC0: 34 32 37 35 2C 50 48 3A 97 35 34 32 37 34 2C 50 |4275,PH:.54274,P|
00000AD0: 4C 00 E0 12 06 04 81 4E B2 31 A4 31 32 35 3A 82 |L......N.1.125:.|
00000AE0: 00 E7 12 10 04 82 5A 00 0C 13 1A 04 97 57 2C 30 |......Z......W,0|
00000AF0: 3A 97 48 2C 30 3A 97 4C 2C 30 3A 97 35 34 32 37 |:.H,0:.L,0:.5427|
00000B00: 35 2C 30 3A 97 35 34 32 37 34 2C 30 00 2C 13 33 |5,0:.54274,0.,.3|
00000B10: 04 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
00000B20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 4C 13 34 |************.L.4|
00000B30: 04 8F 20 2A 46 49 4E 44 20 4C 49 47 48 54 2D 50 |.. *FIND LIGHT-P|
00000B40: 45 4E 20 50 4F 53 49 54 49 4F 4E 2A 00 6C 13 35 |EN POSITION*.l.5|
00000B50: 04 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
00000B60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 7B 13 38 |************.{.8|
00000B70: 04 50 4D 51 B2 C2 28 36 35 34 29 00 8F 13 3D 04 |.PMQ..(654)...=.|
00000B80: 8B 20 50 4D 51 B3 B1 31 20 A7 20 31 30 38 30 00 |. PMQ..1 . 1080.|
00000B90: 9E 13 42 04 50 4D 51 B2 C2 28 36 35 34 29 00 B2 |..B.PMQ..(654)..|
00000BA0: 13 4C 04 58 B2 C2 28 4C 58 29 3A 59 B2 C2 28 4C |.L.X..(LX):Y..(L|
00000BB0: 59 29 00 C5 13 51 04 8B 20 50 4D 51 B2 31 20 A7 |Y)...Q.. PMQ.1 .|
00000BC0: 20 31 30 39 30 00 FD 13 56 04 58 25 B2 28 58 AB | 1090...V.X%.(X.|
00000BD0: 33 30 29 AD 34 3A 59 25 B2 28 59 AB 34 34 29 AD |30).4:Y%.(Y.44).|
00000BE0: 38 3A 8B 58 25 B3 34 B0 58 25 B1 33 35 B0 59 25 |8:.X%.4.X%.35.Y%|
00000BF0: B3 32 B0 59 25 B1 32 34 A7 31 31 30 30 00 0F 14 |.2.Y%.24.1100...|
00000C00: 5B 04 8B 20 50 4D 51 B2 31 20 A7 20 32 31 30 00 |[.. PMQ.1 . 210.|
00000C10: 31 14 74 04 99 22 13 58 20 20 20 20 9D 9D 9D 9D |1.t..".X ....|
00000C20: 22 58 25 2C 22 59 20 20 20 20 9D 9D 9D 9D 22 59 |"X%,"Y ...."Y|
00000C30: 25 00 3F 14 7E 04 8B 59 25 B1 32 30 A7 34 30 00 |%.?.~..Y%.20.40.|
00000C40: 55 14 88 04 8B 58 25 B1 32 30 AF 59 25 B1 31 32 |U....X%.20.Y%.12|
00000C50: A7 31 30 30 30 00 63 14 92 04 8B 51 B1 35 30 A7 |.1000.c....Q.50.|
00000C60: 31 39 33 00 6C 14 9C 04 89 32 30 30 00 00 16 |193.l....200... |
..*....***64MUSIC BY IAN WEDGE, 26/5/83*
**.X...LX.53267:LY.LX.1:.WF%(50),HF%(50)
,LF%(50).P....Z.1.8:.H(Z),L(Z):......V.5
4296:W.54276:H.54273:L.54272...(.."..":.
53281,1...-..500......".".B.2..700.K.<..
800.T.F..800...P..".W1 . ... ... ... ...
... ... ... ... "...Z..700...D..800...N
..800.K.X..".W2 . ... ... ... ... ... ..
. ... ... ".T....700.]....800.F....800..
. ..".W3 . ... ... ... ... ... ... ... .
.. "......700.G...." C D E F
G A B C"......:."........STOP
* REPLAY":..$...."PRESS THE LEF
T HAND SHIFT KEY TO OPERATE".U....".....
...................................";.K.
..."ATTACK/DECAY"AD......"SUSTAIN/RELEAS
E"SR......"HIGH PULSE"PH;:..20)"LOW PULS
E"PL;.L....*************************....
..*FIND LIGHT-PEN POSITION*......*******
******************.7.A..Z.1.30:WF%(Z).0:
HF%(Z).0:LF%(Z).0:.:Q.0.F.H.PMQ.B(654).Y
.M.. PMQ..1 . 200.H.R.PMQ.B(654).|...X.B
(LX):Y.B(LY)...... PMQ.1 . 210.E...X%.(X
.30).4:Y%.(Y.44).8:.X%.4.X%.35.Y%.2.Y%.2
4.220......".X ...."X%,"Y ...."Y%,
"NOTE ...."Q.1......Y%.1.Y%.5.WF.17.#
....Y%.5.Y%.9.WF.33.9."..Y%.9.Y%.12.WF.6
5.H.'..Y%.12.400.V.,.N..(X%.4).`.1.Q.Q.1
...6..V,15:.54277,AD:.54278,SR:.W,WF:.H,
H(N):.L,L(N)...7..WF.65..54275,PH:.54274
,PL...;..Q.51.WF%(Q).WF:HF%(Q).H(N):LF%(
Q).L(N)...@..200......******************
......*SWITCH SOUND OFF*.0....**********
********.U....W,0:.H,0:.L,0:.54275,0:.54
274,0.C....Y%.20.40.S....X%.20.1000.|...
.193......******************************
******.P....*ATTACK/DELAY-SUSTAIN/RELEAS
E-PULSE*......**************************
**********......" *** 64 MUSI
C ***".8....".";:.Z.1.10:.".";:..C...."A
TTACK/DECAY (0-255) .......";.K...
E.0.}....Z.1.10:.A$:....... A$:.900.....
.E.1.510.....AD.E(A$):.AD.0.AD.255.510.P
....".";:.Z.1.11:.".";:......."SUSTAIN/R
ELEASE (0-255) .......";.....E.0..
....Z.1.10:.A$:..%....A$:.900.2.!..E.1.5
30.P.#.SR.E(A$):.SR.0.SR.255.530.J.&..".
";:.Z.1.12:.".";:....(.."HIGH PULSE (0-1
5) .......";...+.E.0:.Z.1.10:.A$:.
:.A$:.900...0..E.1.550...5.PH.E(A$):.PH.
0.PH.15.550...:..".";:.Z.1.13:.".";:....
<.."LOW PULSE (0-255) .......";.<.
?.E.0:.Z.1.10:.A$:.:.A$:.900.I.D..E.1.57
0.G.I.PL.E(A$):.PL.0.PL.255.570.M.N.....
U..****************...V..*DATA FOR NOTES
*...W..****************...X..34,75,38,12
6,43,52,45,198,51,97,57,172,64,188,68,14
9......***************......*SCREEN LAYO
UT*.(....***************.X...."..
":.... ..".
.... ... ... ... ... ... ... ... ... ":.
......*********************......*INPUT
CHECK ROUTINE*.Y....********************
*......A$."".E.1:.930."....Z.1.C(A$):B$.
J(A$,Z,1):.F(B$).48.F(B$).57.E.1:..(....
.7.... ********.F.... *REPLAY*.U.... ***
*****.L...Q1.Q.(Q.50).(Q.50).X....Z.1.Q1
......54277,AD:.54278,SR:.W,WF%(Z):.H,HF
%(Z):.L,LF%(Z).Q....WF%(Z).65..54275,PH:
.54274,PL......N.1.125:.......Z......W,0
:.H,0:.L,0:.54275,0:.54274,0.,.3.. *****
********************.L.4.. *FIND LIGHT-P
EN POSITION*.L.5.. *********************
****.{.8.PMQ.B(654)...=.. PMQ..1 . 1080.
..B.PMQ.B(654)...L.X.B(LX):Y.B(LY).E.Q..
PMQ.1 . 1090...V.X%.(X.30).4:Y%.(Y.44).
8:.X%.4.X%.35.Y%.2.Y%.24.1100...[.. PMQ.
1 . 210.1.T..".X ...."X%,"Y ...."Y
%.?.~..Y%.20.40.U....X%.20.Y%.12.1000.C.
...Q.50.193.L....200...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL