> 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 31 36 35 30 30 3A 00 24 08 14 00 8F 20 23 |0,16500:.$.... #|
00000020: 43 4C 52 3B 00 33 08 19 00 8F 20 4C 41 42 45 4C |CLR;.3.... LABEL|
00000030: 3B 5A 3A 00 43 08 1E 00 8F 20 56 41 52 3B 58 2C |;Z:.C.... VAR;X,|
00000040: 32 35 3A 00 53 08 28 00 8F 20 56 41 52 3B 59 2C |25:.S.(.. VAR;Y,|
00000050: 31 35 3A 00 60 08 32 00 8F 20 42 44 52 3B 34 3A |15:.`.2.. BDR;4:|
00000060: 00 6E 08 3C 00 8F 20 42 41 43 4B 3B 35 3A 00 7A |.n.<.. BACK;5:.z|
00000070: 08 46 00 8F 20 57 49 50 45 3B 00 89 08 50 00 8F |.F.. WIPE;...P..|
00000080: 20 23 56 4F 4C 3B 31 35 3A 00 9C 08 51 00 8F 20 | #VOL;15:...Q.. |
00000090: 23 57 41 56 45 3B 31 32 38 2C 30 3A 00 B1 08 52 |#WAVE;128,0:...R|
000000A0: 00 8F 20 23 41 44 53 52 3B 30 2C 30 2C 31 36 30 |.. #ADSR;0,0,160|
000000B0: 3A 00 C3 08 53 00 8F 20 44 56 41 52 3B 46 2C 35 |:...S.. DVAR;F,5|
000000C0: 30 30 3A 00 D9 08 5A 00 8F 20 54 43 4F 3B 38 30 |00:...Z.. TCO;80|
000000D0: 2C 31 38 32 2C 32 2C 35 3A 00 E7 08 64 00 8F 20 |,182,2,5:...d.. |
000000E0: 43 41 4C 4C 3B 41 3A 00 FC 08 6E 00 8F 20 50 55 |CALL;A:...n.. PU|
000000F0: 54 3B 58 2C 59 2C 36 2C 22 53 22 3A 00 0B 09 78 |T;X,Y,6,"S":...x|
00000100: 00 8F 20 49 4E 43 3B 59 2C 31 3A 00 1B 09 82 00 |.. INC;Y,1:.....|
00000110: 8F 20 56 41 52 3B 58 2C 32 35 3A 00 29 09 8C 00 |. VAR;X,25:.)...|
00000120: 8F 20 43 41 4C 4C 3B 41 3A 00 3E 09 96 00 8F 20 |. CALL;A:.>.... |
00000130: 50 55 54 3B 58 2C 59 2C 36 2C 22 43 22 3A 00 4D |PUT;X,Y,6,"C":.M|
00000140: 09 A0 00 8F 20 49 4E 43 3B 59 2C 31 3A 00 5D 09 |.... INC;Y,1:.].|
00000150: AA 00 8F 20 56 41 52 3B 58 2C 32 35 3A 00 6B 09 |... VAR;X,25:.k.|
00000160: B4 00 8F 20 43 41 4C 4C 3B 41 3A 00 80 09 B9 00 |... CALL;A:.....|
00000170: 8F 20 50 55 54 3B 58 2C 59 2C 36 2C 22 4F 22 3A |. PUT;X,Y,6,"O":|
00000180: 00 8F 09 BE 00 8F 20 49 4E 43 3B 59 2C 31 3A 00 |...... INC;Y,1:.|
00000190: 9F 09 C8 00 8F 20 56 41 52 3B 58 2C 32 35 3A 00 |..... VAR;X,25:.|
000001A0: AD 09 CD 00 8F 20 43 41 4C 4C 3B 41 3A 00 C2 09 |..... CALL;A:...|
000001B0: D2 00 8F 20 50 55 54 3B 58 2C 59 2C 36 2C 22 50 |... PUT;X,Y,6,"P|
000001C0: 22 3A 00 D1 09 DC 00 8F 20 49 4E 43 3B 59 2C 31 |":...... INC;Y,1|
000001D0: 3A 00 E1 09 E6 00 8F 20 56 41 52 3B 58 2C 32 35 |:...... VAR;X,25|
000001E0: 3A 00 EF 09 F0 00 8F 20 43 41 4C 4C 3B 41 3A 00 |:...... CALL;A:.|
000001F0: 04 0A FA 00 8F 20 50 55 54 3B 58 2C 59 2C 36 2C |..... PUT;X,Y,6,|
00000200: 22 45 22 3A 00 20 0A 2C 01 8F 20 50 55 54 3B 39 |"E":. .,.. PUT;9|
00000210: 2C 35 2C 30 2C 22 43 4F 4D 50 55 54 45 52 22 3A |,5,0,"COMPUTER":|
00000220: 00 3D 0A 36 01 8F 20 50 55 54 3B 39 2C 31 34 2C |.=.6.. PUT;9,14,|
00000230: 36 2C 22 47 52 41 50 48 49 43 53 22 3A 00 5A 0A |6,"GRAPHICS":.Z.|
00000240: 40 01 8F 20 50 55 54 3B 39 2C 32 33 2C 30 2C 22 |@.. PUT;9,23,0,"|
00000250: 4C 41 4E 47 55 41 47 45 22 3A 00 6E 0A 45 01 8F |LANGUAGE":.n.E..|
00000260: 20 44 56 41 52 3B 46 2C 31 32 35 30 30 3A 00 80 | DVAR;F,12500:..|
00000270: 0A 47 01 8F 20 23 57 41 56 45 3B 33 32 2C 30 3A |.G.. #WAVE;32,0:|
00000280: 00 8F 0A 5E 01 8F 20 56 41 52 3B 43 2C 30 3A 00 |...^.. VAR;C,0:.|
00000290: 9E 0A 68 01 8F 20 4C 41 42 45 4C 3B 43 3A 00 B0 |..h.. LABEL;C:..|
000002A0: 0A 6D 01 8F 20 23 53 4F 55 4E 44 3B 46 2C 30 3A |.m.. #SOUND;F,0:|
000002B0: 00 BF 0A 70 01 8F 20 23 47 41 54 45 3B 30 3A 00 |...p.. #GATE;0:.|
000002C0: CC 0A 72 01 8F 20 53 43 52 3B 33 3A 00 DE 0A 77 |..r.. SCR;3:...w|
000002D0: 01 8F 20 4D 49 4E 55 53 3B 46 2C 37 35 3A 00 ED |.. MINUS;F,75:..|
000002E0: 0A 7C 01 8F 20 49 4E 43 3B 43 2C 31 3A 00 FC 0A |.|.. INC;C,1:...|
000002F0: 81 01 8F 20 50 41 55 53 45 3B 35 3A 00 13 0B 86 |... PAUSE;5:....|
00000300: 01 8F 20 54 45 53 54 3B 43 2C 32 30 2C 32 34 30 |.. TEST;C,20,240|
00000310: 2C 43 3A 00 26 0B 90 01 8F 20 23 57 41 56 45 3B |,C:.&.... #WAVE;|
00000320: 31 32 38 2C 30 3A 00 3B 0B 9A 01 8F 20 23 41 44 |128,0:.;.... #AD|
00000330: 53 52 3B 30 2C 39 2C 31 37 32 3A 00 4E 0B A4 01 |SR;0,9,172:.N...|
00000340: 8F 20 44 56 41 52 3B 46 2C 31 35 30 30 3A 00 60 |. DVAR;F,1500:.`|
00000350: 0B AE 01 8F 20 23 53 4F 55 4E 44 3B 46 2C 30 3A |.... #SOUND;F,0:|
00000360: 00 6F 0B B8 01 8F 20 23 47 41 54 45 3B 30 3A 00 |.o.... #GATE;0:.|
00000370: 80 0B C2 01 8F 20 50 41 55 53 45 3B 32 35 30 3A |..... PAUSE;250:|
00000380: 00 8F 0B CC 01 8F 20 23 52 4C 53 45 3B 30 3A 00 |...... #RLSE;0:.|
00000390: A0 0B 62 02 8F 20 50 41 55 53 45 3B 32 35 35 3A |..b.. PAUSE;255:|
000003A0: 00 B1 0B 6C 02 8F 20 50 41 55 53 45 3B 32 35 35 |...l.. PAUSE;255|
000003B0: 3A 00 BC 0B E8 03 8F 20 52 54 4E 3B 00 CB 0B F2 |:...... RTN;....|
000003C0: 03 8F 20 4C 41 42 45 4C 3B 41 3A 00 DD 0B F7 03 |.. LABEL;A:.....|
000003D0: 8F 20 23 53 4F 55 4E 44 3B 46 2C 30 3A 00 EC 0B |. #SOUND;F,0:...|
000003E0: F9 03 8F 20 23 47 41 54 45 3B 30 3A 00 01 0C FC |... #GATE;0:....|
000003F0: 03 8F 20 50 55 54 3B 58 2C 59 2C 30 2C 22 20 22 |.. PUT;X,Y,0," "|
00000400: 3A 00 10 0C 06 04 8F 20 44 45 43 3B 58 2C 31 3A |:...... DEC;X,1:|
00000410: 00 25 0C 10 04 8F 20 50 55 54 3B 58 2C 59 2C 31 |.%.... PUT;X,Y,1|
00000420: 2C 22 5E 22 3A 00 36 0C 12 04 8F 20 41 44 44 3B |,"^":.6.... ADD;|
00000430: 46 2C 31 30 30 3A 00 45 0C 15 04 8F 20 50 41 55 |F,100:.E.... PAU|
00000440: 53 45 3B 35 3A 00 5B 0C 1A 04 8F 20 54 45 53 54 |SE;5:.[.... TEST|
00000450: 3B 58 2C 35 2C 32 34 30 2C 41 3A 00 69 0C 1F 04 |;X,5,240,A:.i...|
00000460: 8F 20 43 41 4C 4C 3B 42 3A 00 78 0C 20 04 8F 20 |. CALL;B:.x. .. |
00000470: 23 52 4C 53 45 3B 30 3A 00 8A 0C 21 04 8F 20 44 |#RLSE;0:...!.. D|
00000480: 56 41 52 3B 46 2C 35 30 30 3A 00 95 0C 24 04 8F |VAR;F,500:...$..|
00000490: 20 45 4E 44 3B 00 A0 0C D0 07 8F 20 52 54 4E 3B | END;...... RTN;|
000004A0: 00 AF 0C DA 07 8F 20 4C 41 42 45 4C 3B 42 3A 00 |...... LABEL;B:.|
000004B0: C3 0C DC 07 8F 20 44 56 41 52 3B 43 2C 34 35 30 |..... DVAR;C,450|
000004C0: 30 30 3A 00 D5 0C DF 07 8F 20 23 53 4F 55 4E 44 |00:...... #SOUND|
000004D0: 3B 43 2C 30 3A 00 E4 0C E0 07 8F 20 23 47 41 54 |;C,0:...... #GAT|
000004E0: 45 3B 30 3A 00 F9 0C E4 07 8F 20 50 55 54 3B 58 |E;0:...... PUT;X|
000004F0: 2C 59 2C 34 2C 22 D6 22 3A 00 0A 0D EE 07 8F 20 |,Y,4,".":...... |
00000500: 50 41 55 53 45 3B 31 30 30 3A 00 1F 0D F8 07 8F |PAUSE;100:......|
00000510: 20 50 55 54 3B 58 2C 59 2C 34 2C 22 DB 22 3A 00 | PUT;X,Y,4,".":.|
00000520: 30 0D 02 08 8F 20 50 41 55 53 45 3B 31 30 30 3A |0.... PAUSE;100:|
00000530: 00 3F 0D 07 08 8F 20 23 52 4C 53 45 3B 30 3A 00 |.?.... #RLSE;0:.|
00000540: 4A 0D 0C 08 8F 20 45 4E 44 3B 00 55 0D 11 08 8F |J.... END;.U....|
00000550: 20 55 43 4F 3B 00 63 0D 16 08 8F 20 4A 55 4D 50 | UCO;.c.... JUMP|
00000560: 3B 5A 3A 00 6F 0D 0F 27 8F 20 23 43 4C 52 3B 00 |;Z:.o..'. #CLR;.|
00000570: 7B 0D 10 27 8F 20 45 58 49 54 3B 00 00 00 |{..'. EXIT;... |
....... ORG;15500,16500:.$.... #CLR;.3..
.. LABEL;Z:.C.... VAR;X,25:.S.(.. VAR;Y,
15:.`.2.. BDR;4:.N.<.. BACK;5:.Z.F.. WIP
E;...P.. #VOL;15:...Q.. #WAVE;128,0:...R
.. #ADSR;0,0,160:.C.S.. DVAR;F,500:.Y.Z.
. TCO;80,182,2,5:...D.. CALL;A:...N.. PU
T;X,Y,6,"S":...X.. INC;Y,1:...... VAR;X,
25:.).... CALL;A:.>.... PUT;X,Y,6,"C":.M
. .. INC;Y,1:.].... VAR;X,25:.K.... CALL
;A:...... PUT;X,Y,6,"O":...... INC;Y,1:.
..H.. VAR;X,25:...M.. CALL;A:.B.R.. PUT;
X,Y,6,"P":.Q.... INC;Y,1:...... VAR;X,25
:...... CALL;A:...... PUT;X,Y,6,"E":. .,
.. PUT;9,5,0,"COMPUTER":.=.6.. PUT;9,14,
6,"GRAPHICS":.Z.@.. PUT;9,23,0,"LANGUAGE
":.N.E.. DVAR;F,12500:...G.. #WAVE;32,0:
...^.. VAR;C,0:...H.. LABEL;C:...M.. #SO
UND;F,0:...P.. #GATE;0:.L.R.. SCR;3:...W
.. MINUS;F,75:...|.. INC;C,1:...... PAUS
E;5:...... TEST;C,20,240,C:.&.... #WAVE;
128,0:.;.... #ADSR;0,9,172:.N.... DVAR;F
,1500:.`.... #SOUND;F,0:.O.... #GATE;0:.
..B.. PAUSE;250:...L.. #RLSE;0:. .B.. PA
USE;255:...L.. PAUSE;255:...... RTN;.K..
.. LABEL;A:...... #SOUND;F,0:...... #GAT
E;0:...... PUT;X,Y,0," ":...... DEC;X,1:
.%.... PUT;X,Y,1,"^":.6.... ADD;F,100:.E
.... PAUSE;5:.[.... TEST;X,5,240,A:.I...
. CALL;B:.X. .. #RLSE;0:...!.. DVAR;F,50
0:...$.. END;. .P.. RTN;...Z.. LABEL;B:.
C.... DVAR;C,45000:.U.... #SOUND;C,0:...
... #GATE;0:...... PUT;X,Y,4,"V":......
PAUSE;100:...... PUT;X,Y,4,".":.0.... PA
USE;100:.?.... #RLSE;0:.J.... END;.U....
UCO;.C.... JUMP;Z:.O..'. #CLR;.{..'. EX
IT;...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL