WMUSIC
FILE INFORMATION
FILENAME(S): WMUSIC
FILE TYPE(S): PRG
FILE SIZE: 1.5K
FIRST SEEN: 2025-11-30 21:23:19
APPEARS ON: 1 disk(s)
FILE HASH
fd9ba362409958207cc3cca5dea559efb7d9e731ca098e43b888a6d714c71ed4
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 SPEL 98 1 | WMUSIC | PRG | DuncanTwain | 16 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 18 08 0A 00 8F 20 4F 52 47 3B 31 35 35 30 |....... ORG;1550| 00000010: 30 2C 32 30 30 30 30 3A 00 24 08 0B 00 8F 20 23 |0,20000:.$.... #| 00000020: 43 4C 52 3B 00 36 08 0C 00 8F 20 23 57 41 56 45 |CLR;.6.... #WAVE| 00000030: 3B 31 36 2C 32 3A 00 44 08 0D 00 8F 20 58 42 44 |;16,2:.D.... XBD| 00000040: 52 3B 31 3A 00 50 08 0E 00 8F 20 57 49 50 45 3B |R;1:.P.... WIPE;| 00000050: 00 62 08 0F 00 8F 20 23 57 41 56 45 3B 31 36 2C |.b.... #WAVE;16,| 00000060: 30 3A 00 71 08 10 00 8F 20 56 41 52 3B 51 2C 30 |0:.q.... VAR;Q,0| 00000070: 3A 00 86 08 11 00 8F 20 23 41 44 53 52 3B 32 2C |:...... #ADSR;2,| 00000080: 30 2C 32 34 30 3A 00 98 08 12 00 8F 20 23 57 41 |0,240:...... #WA| 00000090: 56 45 3B 31 36 2C 31 3A 00 AE 08 13 00 8F 20 23 |VE;16,1:...... #| 000000A0: 41 44 53 52 3B 31 2C 31 32 2C 31 37 32 3A 00 C2 |ADSR;1,12,172:..| 000000B0: 08 14 00 8F 20 23 41 44 53 52 3B 30 2C 31 3A 34 |.... #ADSR;0,1:4| 000000C0: 35 3A 00 D5 08 15 00 8F 20 44 56 41 52 3B 59 2C |5:...... DVAR;Y,| 000000D0: 31 34 33 32 3A 00 E7 08 16 00 8F 20 23 53 4F 55 |1432:...... #SOU| 000000E0: 4E 44 3B 59 2C 32 3A 00 F6 08 17 00 8F 20 23 47 |ND;Y,2:...... #G| 000000F0: 41 54 45 3B 32 3A 00 05 09 19 00 8F 20 23 56 4F |ATE;2:...... #VO| 00000100: 4C 3B 31 35 3A 00 10 09 1B 00 8F 20 52 54 4E 3B |L;15:...... RTN;| 00000110: 00 1F 09 1E 00 8F 20 4C 41 42 45 4C 3B 41 3A 00 |...... LABEL;A:.| 00000120: 2E 09 28 00 8F 20 23 47 41 54 45 3B 30 3A 00 3E |..(.. #GATE;0:.>| 00000130: 09 2D 00 8F 20 50 41 55 53 45 3B 32 30 3A 00 4D |.-.. PAUSE;20:.M| 00000140: 09 32 00 8F 20 23 52 4C 53 45 3B 30 3A 00 5D 09 |.2.. #RLSE;0:.].| 00000150: 34 00 8F 20 50 41 55 53 45 3B 32 30 3A 00 68 09 |4.. PAUSE;20:.h.| 00000160: 37 00 8F 20 45 4E 44 3B 00 73 09 38 00 8F 20 52 |7.. END;.s.8.. R| 00000170: 54 4E 3B 00 82 09 3A 00 8F 20 4C 41 42 45 4C 3B |TN;...:.. LABEL;| 00000180: 42 3A 00 9E 09 3C 00 8F 20 23 4D 55 53 49 43 3B |B:...<.. #MUSIC;| 00000190: 41 2C 34 38 2C 35 30 2C 35 33 2C 35 37 3A 00 C6 |A,48,50,53,57:..| 000001A0: 09 41 00 8F 20 23 4D 55 53 49 43 3B 41 2C 36 34 |.A.. #MUSIC;A,64| 000001B0: 2C 36 36 2C 36 39 2C 37 33 2C 38 30 2C 38 32 2C |,66,69,73,80,82,| 000001C0: 38 35 2C 38 39 3A 00 EE 09 46 00 8F 20 23 4D 55 |85,89:...F.. #MU| 000001D0: 53 49 43 3B 41 2C 39 36 2C 38 39 2C 38 35 2C 38 |SIC;A,96,89,85,8| 000001E0: 32 2C 38 30 2C 37 33 2C 36 39 2C 36 36 3A 00 10 |2,80,73,69,66:..| 000001F0: 0A 4B 00 8F 20 23 4D 55 53 49 43 3B 41 2C 36 34 |.K.. #MUSIC;A,64| 00000200: 2C 35 37 2C 35 33 2C 35 30 2C 34 38 2C 34 31 3A |,57,53,50,48,41:| 00000210: 00 1B 0A 50 00 8F 20 45 4E 44 3B 00 26 0A 52 00 |...P.. END;.&.R.| 00000220: 8F 20 52 54 4E 3B 00 35 0A 55 00 8F 20 4C 41 42 |. RTN;.5.U.. LAB| 00000230: 45 4C 3B 43 3A 00 48 0A 5A 00 8F 20 44 56 41 52 |EL;C:.H.Z.. DVAR| 00000240: 3B 41 2C 32 31 34 35 3A 00 56 0A 5C 00 8F 20 43 |;A,2145:.V.\.. C| 00000250: 41 4C 4C 3B 44 3A 00 64 0A 5D 00 8F 20 43 41 4C |ALL;D:.d.].. CAL| 00000260: 4C 3B 42 3A 00 72 0A 5E 00 8F 20 43 41 4C 4C 3B |L;B:.r.^.. CALL;| 00000270: 4A 3A 00 85 0A 5F 00 8F 20 44 56 41 52 3B 41 2C |J:..._.. DVAR;A,| 00000280: 32 34 30 38 3A 00 93 0A 60 00 8F 20 43 41 4C 4C |2408:...`.. CALL| 00000290: 3B 44 3A 00 A1 0A 62 00 8F 20 43 41 4C 4C 3B 42 |;D:...b.. CALL;B| 000002A0: 3A 00 AF 0A 63 00 8F 20 43 41 4C 4C 3B 4A 3A 00 |:...c.. CALL;J:.| 000002B0: C2 0A 64 00 8F 20 44 56 41 52 3B 41 2C 33 36 30 |..d.. DVAR;A,360| 000002C0: 38 3A 00 D0 0A 69 00 8F 20 43 41 4C 4C 3B 44 3A |8:...i.. CALL;D:| 000002D0: 00 DE 0A 6E 00 8F 20 43 41 4C 4C 3B 42 3A 00 EC |...n.. CALL;B:..| 000002E0: 0A 70 00 8F 20 43 41 4C 4C 3B 4A 3A 00 FF 0A 73 |.p.. CALL;J:...s| 000002F0: 00 8F 20 44 56 41 52 3B 41 2C 32 38 36 34 3A 00 |.. DVAR;A,2864:.| 00000300: 0D 0B 78 00 8F 20 43 41 4C 4C 3B 44 3A 00 1B 0B |..x.. CALL;D:...| 00000310: 7D 00 8F 20 43 41 4C 4C 3B 42 3A 00 29 0B 7F 00 |}.. CALL;B:.)...| 00000320: 8F 20 43 41 4C 4C 3B 4A 3A 00 38 0B 82 00 8F 20 |. CALL;J:.8.... | 00000330: 49 4E 43 3B 41 2C 31 3A 00 4E 0B 87 00 8F 20 54 |INC;A,1:.N.... T| 00000340: 45 53 54 3B 41 2C 32 2C 32 34 30 2C 43 3A 00 59 |EST;A,2,240,C:.Y| 00000350: 0B 8C 00 8F 20 45 4E 44 3B 00 64 0B A0 00 8F 20 |.... END;.d.... | 00000360: 52 54 4E 3B 00 73 0B A2 00 8F 20 4C 41 42 45 4C |RTN;.s.... LABEL| 00000370: 3B 44 3A 00 85 0B A5 00 8F 20 23 53 4F 55 4E 44 |;D:...... #SOUND| 00000380: 3B 41 2C 31 3A 00 94 0B A8 00 8F 20 23 47 41 54 |;A,1:...... #GAT| 00000390: 45 3B 31 3A 00 A4 0B AA 00 8F 20 50 41 55 53 45 |E;1:...... PAUSE| 000003A0: 2C 32 35 3A 00 B3 0B AC 00 8F 20 23 52 4C 53 45 |,25:...... #RLSE| 000003B0: 3B 31 3A 00 BE 0B AF 00 8F 20 45 4E 44 3B 00 CD |;1:...... END;..| 000003C0: 0B B1 00 8F 20 56 41 52 3B 41 2C 30 3A 00 DB 0B |.... VAR;A,0:...| 000003D0: B4 00 8F 20 43 41 4C 4C 3B 43 3A 00 ED 0B B9 00 |... CALL;C:.....| 000003E0: 8F 20 23 57 41 56 45 3B 33 32 2C 31 3A 00 FC 0B |. #WAVE;32,1:...| 000003F0: BB 00 8F 20 56 41 52 3B 41 2C 30 3A 00 0A 0C BE |... VAR;A,0:....| 00000400: 00 8F 20 43 41 4C 4C 3B 43 3A 00 1C 0C C3 00 8F |.. CALL;C:......| 00000410: 20 23 57 41 56 45 3B 36 34 2C 31 3A 00 2F 0C C6 | #WAVE;64,1:./..| 00000420: 00 8F 20 44 56 41 52 3B 5A 2C 32 30 34 38 3A 00 |.. DVAR;Z,2048:.| 00000430: 41 0C C8 00 8F 20 23 50 55 4C 53 45 3B 5A 2C 31 |A.... #PULSE;Z,1| 00000440: 3A 00 4F 0C C9 00 8F 20 23 56 4F 4C 3B 35 3A 00 |:.O.... #VOL;5:.| 00000450: 5E 0C CA 00 8F 20 56 41 52 3B 41 2C 30 3A 00 6C |^.... VAR;A,0:.l| 00000460: 0C CD 00 8F 20 43 41 4C 4C 3B 43 3A 00 7E 0C CF |.... CALL;C:.~..| 00000470: 00 8F 20 23 57 41 56 45 3B 33 32 2C 31 3A 00 8C |.. #WAVE;32,1:..| 00000480: 0C D2 00 8F 20 23 56 4F 4C 3B 32 3A 00 9B 0C D7 |.... #VOL;2:....| 00000490: 00 8F 20 56 41 52 3B 41 2C 30 3A 00 A9 0C DC 00 |.. VAR;A,0:.....| 000004A0: 8F 20 43 41 4C 4C 3B 43 3A 00 B5 0C E1 00 8F 20 |. CALL;C:...... | 000004B0: 23 43 4C 52 3B 00 C0 0C E6 00 8F 20 52 54 4E 3B |#CLR;...... RTN;| 000004C0: 00 CF 0C E7 00 8F 20 4C 41 42 45 4C 3B 4A 3A 00 |...... LABEL;J:.| 000004D0: DD 0C EA 00 8F 20 42 41 43 4B 3B 51 3A 00 EA 0C |..... BACK;Q:...| 000004E0: EB 00 8F 20 42 44 52 3B 51 3A 00 11 0D EE 00 8F |... BDR;Q:......| 000004F0: 20 50 55 54 3B 32 34 2C 31 31 2C 34 2C 22 20 20 | PUT;24,11,4," | 00000500: 20 20 53 20 43 20 4F 20 50 20 45 20 20 20 20 22 | S C O P E "| 00000510: 3A 00 1E 0D F0 00 8F 20 53 43 52 3B 32 3A 00 45 |:...... SCR;2:.E| 00000520: 0D F1 00 8F 20 50 55 54 3B 32 34 2C 31 31 2C 35 |.... PUT;24,11,5| 00000530: 2C 22 43 4F 4D 50 55 54 45 52 20 47 52 41 50 48 |,"COMPUTER GRAPH| 00000540: 49 43 53 22 3A 00 52 0D F2 00 8F 20 53 43 52 3B |ICS":.R.... SCR;| 00000550: 32 3A 00 79 0D F3 00 8F 20 50 55 54 3B 32 34 2C |2:.y.... PUT;24,| 00000560: 31 31 2C 37 2C 22 20 20 20 20 4C 41 4E 47 55 41 |11,7," LANGUA| 00000570: 47 45 20 20 20 20 20 22 3A 00 86 0D F4 00 8F 20 |GE ":...... | 00000580: 53 43 52 3B 32 3A 00 AD 0D F5 00 8F 20 50 55 54 |SCR;2:...... PUT| 00000590: 3B 32 34 2C 31 31 2C 37 2C 22 20 20 20 20 20 20 |;24,11,7," | 000005A0: 20 20 20 20 20 20 20 20 20 20 20 22 3A 00 BA 0D | ":...| 000005B0: F6 00 8F 20 53 43 52 3B 32 3A 00 C9 0D F8 00 8F |... SCR;2:......| 000005C0: 20 49 4E 43 3B 51 2C 31 3A 00 D4 0D 04 01 8F 20 | INC;Q,1:...... | 000005D0: 45 4E 44 3B 00 E0 0D 0F 27 8F 20 45 58 49 54 3B |END;....'. EXIT;| 000005E0: 00 00 00 |... |
....... ORG;15500,20000:.$.... #CLR;.6..
.. #WAVE;16,2:.D.... XBDR;1:.P.... WIPE;
.B.... #WAVE;16,0:.Q.... VAR;Q,0:......
#ADSR;2,0,240:...... #WAVE;16,1:...... #
ADSR;1,12,172:.B.... #ADSR;0,1:45:.U....
DVAR;Y,1432:...... #SOUND;Y,2:...... #G
ATE;2:...... #VOL;15:...... RTN;...... L
ABEL;A:...(.. #GATE;0:.>.-.. PAUSE;20:.M
.2.. #RLSE;0:.].4.. PAUSE;20:.H.7.. END;
.S.8.. RTN;...:.. LABEL;B:...<.. #MUSIC;
A,48,50,53,57:.F.A.. #MUSIC;A,64,66,69,7
3,80,82,85,89:...F.. #MUSIC;A,96,89,85,8
2,80,73,69,66:...K.. #MUSIC;A,64,57,53,5
0,48,41:...P.. END;.&.R.. RTN;.5.U.. LAB
EL;C:.H.Z.. DVAR;A,2145:.V.\.. CALL;D:.D
.].. CALL;B:.R.^.. CALL;J:..._.. DVAR;A,
2408:...`.. CALL;D:...B.. CALL;B:...C..
CALL;J:.B.D.. DVAR;A,3608:.P.I.. CALL;D:
...N.. CALL;B:...P.. CALL;J:...S.. DVAR;
A,2864:...X.. CALL;D:...}.. CALL;B:.)..
. CALL;J:.8.... INC;A,1:.N.... TEST;A,2,
240,C:.Y.... END;.D. .. RTN;.S.... LABEL
;D:...... #SOUND;A,1:...... #GATE;1:....
.. PAUSE,25:...... #RLSE;1:...... END;.M
.... VAR;A,0:...... CALL;C:...... #WAVE;
32,1:...... VAR;A,0:...... CALL;C:...C..
#WAVE;64,1:./.F.. DVAR;Z,2048:.A.H.. #P
ULSE;Z,1:.O.I.. #VOL;5:.^.J.. VAR;A,0:.L
.M.. CALL;C:.~.O.. #WAVE;32,1:...R.. #VO
L;2:...W.. VAR;A,0:...... CALL;C:......
#CLR;...... RTN;.O.... LABEL;J:...... BA
CK;Q:...... BDR;Q:...... PUT;24,11,4,"
S C O P E ":...... SCR;2:.E.... PUT
;24,11,5,"COMPUTER GRAPHICS":.R.... SCR;
2:.Y.... PUT;24,11,7," LANGUAGE "
:...... SCR;2:...... PUT;24,11,7,"
":...... SCR;2:.I.... INC;Q,1
:.T.... END;....'. EXIT;...
> CLICK IMAGE PREVIEW FOR FULL MODAL