> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 13 08 E8 03 99 C7 28 31 34 32 29 C7 28 31 |........(142).(1|
00000010: 34 37 29 00 38 08 E9 03 99 22 20 20 20 20 20 20 |47).8...." |
00000020: 20 20 20 20 20 41 43 43 45 53 53 20 20 20 20 20 | ACCESS |
00000030: 20 44 45 4E 49 45 44 22 00 70 08 ED 03 97 32 35 | DENIED".p....25|
00000040: 34 2C C2 28 35 36 29 3A 97 35 36 2C 35 36 3A 9C |4,.(56):.56,56:.|
00000050: 3A 8F 20 50 52 4F 54 45 43 54 20 43 48 41 52 2E |:. PROTECT CHAR.|
00000060: 20 4D 45 4D 2E 20 46 52 4F 4D 20 42 41 53 49 43 | MEM. FROM BASIC|
00000070: 00 B2 08 EE 03 86 4E 28 37 29 3A 4E 28 30 29 B2 |......N(7):N(0).|
00000080: 33 3A 4E 28 31 29 B2 31 3A 4E 28 32 29 B2 36 3A |3:N(1).1:N(2).6:|
00000090: 4E 28 33 29 B2 30 3A 4E 28 34 29 B2 35 3A 4E 28 |N(3).0:N(4).5:N(|
000000A0: 35 29 B2 37 3A 4E 28 36 29 B2 34 3A 4E 28 37 29 |5).7:N(6).4:N(7)|
000000B0: B2 32 00 CB 08 EF 03 97 20 35 36 33 33 34 2C C2 |.2...... 56334,.|
000000C0: 28 35 36 33 33 34 29 AF 32 35 34 00 DC 08 F0 03 |(56334).254.....|
000000D0: 97 20 31 2C C2 28 31 29 AF 32 35 31 00 1A 09 F1 |. 1,.(1).251....|
000000E0: 03 81 49 B2 30 A4 32 37 32 3A 97 49 AA 31 34 33 |..I.0.272:.I.143|
000000F0: 33 36 2C C2 28 49 AA 35 33 32 34 38 29 3A 82 3A |36,.(I.53248):.:|
00000100: 8F 20 4D 4F 56 45 20 46 49 52 53 54 20 33 34 20 |. MOVE FIRST 34 |
00000110: 43 48 41 52 41 43 54 45 52 53 00 28 09 F2 03 97 |CHARACTERS.(....|
00000120: 31 2C C2 28 31 29 B0 34 00 3E 09 F3 03 97 35 36 |1,.(1).4.>....56|
00000130: 33 33 34 2C C2 28 35 36 33 33 34 29 B0 31 00 75 |334,.(56334).1.u|
00000140: 09 F4 03 97 35 33 32 37 32 2C 28 C2 28 35 33 32 |....53272,(.(532|
00000150: 37 32 29 AF 32 34 30 29 B0 31 34 3A 8F 20 4E 45 |72).240).14:. NE|
00000160: 57 20 43 48 41 52 2E 20 4D 45 4D 2E 20 4C 4F 43 |W CHAR. MEM. LOC|
00000170: 41 54 49 4F 4E 00 A3 09 F5 03 99 A3 38 33 29 22 |ATION.......83)"|
00000180: 59 4F 55 20 41 52 45 20 4E 4F 54 20 41 20 4D 45 |YOU ARE NOT A ME|
00000190: 4D 42 45 52 20 4F 46 20 43 4F 4D 50 55 53 43 49 |MBER OF COMPUSCI|
000001A0: 21 20 22 00 C4 09 F6 03 81 49 B2 30 A4 37 3A 42 |! "......I.0.7:B|
000001B0: 49 28 49 29 B2 32 AE 49 3A 82 3A 8F 20 53 45 54 |I(I).2.I:.:. SET|
000001C0: 20 42 49 54 00 DE 09 F7 03 81 4A B2 30 A4 37 3A | BIT......J.0.7:|
000001D0: 81 49 B2 31 34 33 34 34 A4 31 34 36 30 38 00 17 |.I.14344.14608..|
000001E0: 0A F8 03 97 49 2C C2 28 49 29 AF A8 28 42 49 28 |....I,.(I)..(BI(|
000001F0: 4E 28 4A 29 29 29 3A 82 3A 82 3A 8F 20 57 49 50 |N(J))):.:.:. WIP|
00000200: 45 20 4F 55 54 20 43 48 41 52 27 53 20 42 49 54 |E OUT CHAR'S BIT|
00000210: 20 42 59 20 42 49 54 00 52 0A F9 03 99 22 93 22 | BY BIT.R...."."|
00000220: 3A 97 35 33 32 37 32 2C 28 C2 28 35 33 32 37 32 |:.53272,(.(53272|
00000230: 29 AF 32 34 30 29 B0 34 3A 8F 20 52 45 54 55 52 |).240).4:. RETUR|
00000240: 4E 20 54 4F 20 52 4F 4D 20 43 48 41 52 20 4D 45 |N TO ROM CHAR ME|
00000250: 4D 2E 00 79 0A FA 03 97 35 36 2C C2 28 32 35 34 |M..y....56,.(254|
00000260: 29 3A 9C 3A 8F 20 50 55 54 20 54 4F 50 20 4F 46 |):.:. PUT TOP OF|
00000270: 20 4D 45 4D 20 42 41 43 4B 00 8B 0A FB 03 99 C7 | MEM BACK.......|
00000280: 28 31 34 32 29 C7 28 31 34 37 29 00 00 00 |(142).(147)... |
.......G(142)G(147).8...." ACC
ESS DENIED".P....254,B(56):.56,56:.
:. PROTECT CHAR. MEM. FROM BASIC......N(
7):N(0).3:N(1).1:N(2).6:N(3).0:N(4).5:N(
5).7:N(6).4:N(7).2.K.... 56334,B(56334).
254...... 1,B(1).251......I.0.272:.I.143
36,B(I.53248):.:. MOVE FIRST 34 CHARACTE
RS.(....1,B(1).4.>....56334,B(56334).1.U
....53272,(B(53272).240).14:. NEW CHAR.
MEM. LOCATION.......83)"YOU ARE NOT A ME
MBER OF COMPUSCI! ".D....I.0.7:BI(I).2.I
:.:. SET BIT......J.0.7:.I.14344.14608..
....I,B(I)..(BI(N(J))):.:.:. WIPE OUT CH
AR'S BIT BY BIT.R....".":.53272,(B(53272
).240).4:. RETURN TO ROM CHAR MEM..Y....
56,B(254):.:. PUT TOP OF MEM BACK......G
(142)G(147)...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL