_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

HR.PICTURE LOAD

FILE INFORMATION

FILENAME(S): HR.PICTURE LOAD

FILE TYPE(S): PRG

FILE SIZE: 577b

FIRST SEEN: 2025-11-30 18:13:15

APPEARS ON: 1 disk(s)

FILE HASH

2ef7cd9ee44bc7ab02d8d50c0088c2c0f7f49faaf95c756434d16edd20551000

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
0140B HR.PICTURE LOAD PRG Sailor, Ganheden 22 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> 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 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL