> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2A 08 05 00 8B C2 28 35 30 31 38 33 29 B3 |..*.....(50183).|
00000010: B1 37 36 A7 93 22 48 52 2E 47 52 41 50 48 49 43 |.76.."HR.GRAPHIC|
00000020: 53 20 4F 42 4A 22 2C 38 2C 31 00 50 08 0A 00 49 |S OBJ",8,1.P...I|
00000030: 4E 49 54 41 4C 4C 20 B2 20 35 30 31 38 33 3A 8F |NITALL . 50183:.|
00000040: 20 49 4E 49 54 20 41 4C 4C 20 53 43 52 45 45 4E | INIT ALL SCREEN|
00000050: 00 77 08 0B 00 42 4C 4F 43 4B 20 20 20 B2 20 35 |.w...BLOCK . 5|
00000060: 30 31 39 32 3A 8F 20 43 4F 4C 4F 55 52 20 53 55 |0192:. COLOUR SU|
00000070: 42 53 43 52 45 45 4E 00 98 08 0C 00 46 49 4C 4C |BSCREEN.....FILL|
00000080: 42 4F 58 20 B2 20 35 30 31 39 35 3A 8F 20 46 49 |BOX . 50195:. FI|
00000090: 4C 4C 45 44 20 42 4F 58 00 BC 08 0D 00 43 4F 4C |LLED BOX.....COL|
000000A0: 4F 55 52 20 20 B2 20 35 30 31 39 38 3A 8F 20 49 |OUR . 50198:. I|
000000B0: 4E 20 55 53 45 20 43 4F 4C 4F 55 52 00 D8 08 0E |N USE COLOUR....|
000000C0: 00 50 4C 4F 54 20 20 20 20 B2 20 35 30 32 30 31 |.PLOT . 50201|
000000D0: 3A 8F 20 50 4F 49 4E 54 00 F9 08 0F 00 45 44 47 |:. POINT.....EDG|
000000E0: 45 20 20 20 20 B2 20 35 30 32 30 34 3A 8F 20 53 |E . 50204:. S|
000000F0: 45 54 20 42 4F 52 44 45 52 00 1D 09 10 00 42 41 |ET BORDER.....BA|
00000100: 43 4B 20 20 20 20 B2 20 35 30 32 30 37 3A 8F 20 |CK . 50207:. |
00000110: 52 45 53 45 54 20 54 4F 20 54 45 58 54 00 3A 09 |RESET TO TEXT.:.|
00000120: 11 00 43 49 52 43 4C 45 20 20 B2 20 35 30 32 31 |..CIRCLE . 5021|
00000130: 30 3A 8F 20 43 49 52 43 4C 45 00 55 09 12 00 4C |0:. CIRCLE.U...L|
00000140: 49 4E 45 20 20 20 20 B2 20 35 30 32 31 33 3A 8F |INE . 50213:.|
00000150: 20 4C 49 4E 45 00 6F 09 13 00 42 4F 58 20 20 20 | LINE.o...BOX |
00000160: 20 20 B2 20 35 30 32 31 36 3A 8F 20 42 4F 58 00 | . 50216:. BOX.|
00000170: 91 09 14 00 48 49 52 45 53 20 20 20 B2 20 35 30 |....HIRES . 50|
00000180: 32 31 39 3A 8F 20 53 45 54 20 53 43 52 45 45 4E |219:. SET SCREEN|
00000190: 53 00 B8 09 15 00 43 4C 53 20 20 20 20 20 B2 20 |S.....CLS . |
000001A0: 35 30 32 32 32 3A 8F 20 43 4C 52 20 48 49 52 45 |50222:. CLR HIRE|
000001B0: 53 20 53 43 52 45 45 4E 00 DD 09 16 00 50 49 43 |S SCREEN.....PIC|
000001C0: 20 20 20 20 20 B2 20 35 30 31 38 36 3A 8F 20 53 | . 50186:. S|
000001D0: 41 56 45 20 48 49 52 45 53 20 50 49 43 00 FA 09 |AVE HIRES PIC...|
000001E0: 5A 00 8B 20 41 B2 30 20 A7 20 9E 20 49 4E 49 54 |Z.. A.0 . . INIT|
000001F0: 41 4C 4C 2C 30 2C 31 35 2C 32 00 09 0A 64 00 9E |ALL,0,15,2...d..|
00000200: 20 48 49 52 45 53 2C 31 34 00 2A 0A 6E 00 8B 41 | HIRES,14.*.n..A|
00000210: B2 30 A7 41 B2 31 3A 93 22 48 52 2E 50 49 43 54 |.0.A.1:."HR.PICT|
00000220: 55 52 45 20 31 22 2C 38 2C 31 00 3E 0A E8 03 A1 |URE 1",8,1.>....|
00000230: 41 24 3A 8B 41 24 B2 22 22 A7 31 30 30 30 00 00 |A$:.A$."".1000..|
00000240: 00 |. |
..*....B(50183)..76.."HR.GRAPHICS OBJ",8
,1.P...INITALL . 50183:. INIT ALL SCREEN
.W...BLOCK . 50192:. COLOUR SUBSCREEN.
....FILLBOX . 50195:. FILLED BOX.....COL
OUR . 50198:. IN USE COLOUR.X...PLOT
. 50201:. POINT.....EDGE . 50204:. S
ET BORDER.....BACK . 50207:. RESET TO
TEXT.:...CIRCLE . 50210:. CIRCLE.U...L
INE . 50213:. LINE.O...BOX . 5021
6:. BOX.....HIRES . 50219:. SET SCREEN
S.....CLS . 50222:. CLR HIRES SCREEN
.....PIC . 50186:. SAVE HIRES PIC...
Z.. A.0 . . INITALL,0,15,2...D.. HIRES,1
4.*.N..A.0.A.1:."HR.PICTURE 1",8,1.>....
A$:.A$."".1000...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL