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

HR.GRAPHICS DEMO

FILE INFORMATION

FILENAME(S): HR.GRAPHICS DEMO

FILE TYPE(S): PRG

FILE SIZE: 1.3K

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

APPEARS ON: 1 disk(s)

FILE HASH

b221ec9bdeca8bcf00159af06614678f4d7aeb8e2f13c306fbf1d355a17196de

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
0140B HR.GRAPHICS DEMO PRG Sailor, Ganheden 21 9 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 F0 09  |AVE HIRES PIC...|
000001E0: 32 00 A1 41 24 3A A1 42  24 3A 99 41 24 3B 42 24  |2..A$:.B$:.A$;B$|
000001F0: 00 05 0A 64 00 9E 20 49  4E 49 54 41 4C 4C 2C 30  |...d.. INITALL,0|
00000200: 2C 31 2C 31 34 00 1F 0A  6E 00 9E 20 42 4C 4F 43  |,1,14...n.. BLOC|
00000210: 4B 2C 35 2C 35 2C 32 30  2C 32 30 2C 31 2C 35 00  |K,5,5,20,20,1,5.|
00000220: 3A 0A 78 00 9E 20 42 4C  4F 43 4B 2C 35 2C 31 32  |:.x.. BLOCK,5,12|
00000230: 2C 32 30 2C 32 30 2C 30  2C 36 00 56 0A 82 00 9E  |,20,20,0,6.V....|
00000240: 20 42 4C 4F 43 4B 2C 32  30 2C 31 32 2C 33 35 2C  | BLOCK,20,12,35,|
00000250: 32 30 2C 31 2C 32 00 71  0A 8C 00 9E 20 42 4C 4F  |20,1,2.q.... BLO|
00000260: 43 4B 2C 32 30 2C 35 2C  33 35 2C 31 32 2C 30 2C  |CK,20,5,35,12,0,|
00000270: 34 00 8A 0A 96 00 9E 20  4C 49 4E 45 2C 30 2C 30  |4...... LINE,0,0|
00000280: 2C 33 32 30 2C 31 39 39  2C 31 00 A3 0A A0 00 9E  |,320,199,1......|
00000290: 20 4C 49 4E 45 2C 30 2C  38 38 2C 33 31 39 2C 38  | LINE,0,88,319,8|
000002A0: 38 2C 31 00 BE 0A AA 00  9E 20 4C 49 4E 45 2C 31  |8,1...... LINE,1|
000002B0: 36 30 2C 30 2C 31 36 30  2C 31 39 39 2C 32 00 D7  |60,0,160,199,2..|
000002C0: 0A B4 00 9E 20 4C 49 4E  45 2C 35 35 2C 31 32 2C  |.... LINE,55,12,|
000002D0: 35 35 2C 32 38 2C 31 00  F0 0A BE 00 9E 20 4C 49  |55,28,1...... LI|
000002E0: 4E 45 2C 37 35 2C 31 32  2C 37 35 2C 32 38 2C 31  |NE,75,12,75,28,1|
000002F0: 00 0A 0B C8 00 9E 20 4C  49 4E 45 2C 38 35 2C 31  |...... LINE,85,1|
00000300: 32 2C 31 30 30 2C 31 32  2C 31 00 24 0B D2 00 9E  |2,100,12,1.$....|
00000310: 20 4C 49 4E 45 2C 38 35  2C 32 37 2C 31 30 30 2C  | LINE,85,27,100,|
00000320: 32 37 2C 31 00 3D 0B DC  00 9E 20 4C 49 4E 45 2C  |27,1.=.... LINE,|
00000330: 39 32 2C 31 32 2C 39 32  2C 32 37 2C 31 00 56 0B  |92,12,92,27,1.V.|
00000340: E6 00 9E 20 4C 49 4E 45  2C 35 35 2C 32 30 2C 37  |... LINE,55,20,7|
00000350: 35 2C 32 30 2C 31 00 71  0B F0 00 9E 20 4C 49 4E  |5,20,1.q.... LIN|
00000360: 45 2C 31 36 30 2C 31 30  30 2C 30 2C 31 39 39 2C  |E,160,100,0,199,|
00000370: 32 00 8C 0B FA 00 9E 20  4C 49 4E 45 2C 31 36 30  |2...... LINE,160|
00000380: 2C 31 30 30 2C 33 31 39  2C 30 2C 31 00 A4 0B 04  |,100,319,0,1....|
00000390: 01 9E 20 42 4F 58 2C 30  2C 30 2C 33 31 39 2C 31  |.. BOX,0,0,319,1|
000003A0: 39 39 2C 31 00 BC 0B 0E  01 9E 20 42 4F 58 2C 31  |99,1...... BOX,1|
000003B0: 2C 31 2C 33 31 38 2C 31  39 38 2C 31 00 D5 0B 18  |,1,318,198,1....|
000003C0: 01 9E 20 42 4F 58 2C 31  30 2C 31 30 2C 33 31 30  |.. BOX,10,10,310|
000003D0: 2C 33 30 2C 31 00 EF 0B  22 01 9E 20 46 49 4C 2C  |,30,1...".. FIL,|
000003E0: 31 30 2C 31 30 30 2C 38  30 2C 31 35 30 2C 32 00  |10,100,80,150,2.|
000003F0: 0E 0C 2C 01 9E 20 43 49  52 43 2C 31 36 30 2C 31  |..,.. CIRC,160,1|
00000400: 30 30 2C 35 30 2C 2E 37  35 AC 35 30 2C 31 00 28  |00,50,.75.50,1.(|
00000410: 0C 36 01 9E 20 43 49 52  43 2C 31 36 30 2C 35 30  |.6.. CIRC,160,50|
00000420: 2C 35 30 2C 35 30 2C 31  00 43 0C 40 01 9E 20 43  |,50,50,1.C.@.. C|
00000430: 49 52 43 2C 31 36 30 2C  31 35 30 2C 35 30 2C 35  |IRC,160,150,50,5|
00000440: 30 2C 31 00 5E 0C 4A 01  9E 20 43 49 52 43 2C 32  |0,1.^.J.. CIRC,2|
00000450: 31 30 2C 31 30 30 2C 35  30 2C 32 30 2C 31 00 79  |10,100,50,20,1.y|
00000460: 0C 54 01 9E 20 43 49 52  43 2C 31 31 30 2C 31 30  |.T.. CIRC,110,10|
00000470: 30 2C 35 30 2C 32 30 2C  32 00 8C 0C 5E 01 A1 41  |0,50,20,2...^..A|
00000480: 24 3A 8B 41 24 B2 22 22  A7 33 35 30 00 97 0C 68  |$:.A$."".350...h|
00000490: 01 9E 45 44 2C 31 33 00  A8 0C 72 01 9E 43 4F 4C  |..ED,13...r..COL|
000004A0: 4F 55 52 2C 31 34 2C 36  00 BB 0C 7C 01 A1 41 24  |OUR,14,6...|..A$|
000004B0: 3A 8B 41 24 B2 22 22 A7  33 38 30 00 DA 0C 86 01  |:.A$."".380.....|
000004C0: 99 22 93 11 11 11 11 20  20 20 20 20 20 C2 41 43  |.".....      .AC|
000004D0: 4B 20 54 4F 20 54 45 58  54 22 00 E5 0C 90 01 9E  |K TO TEXT"......|
000004E0: 20 42 41 43 4B 00 F8 0C  9A 01 A1 41 24 3A 8B 41  | BACK......A$:.A|
000004F0: 24 B2 22 22 A7 34 31 30  00 07 0D A4 01 9E 20 48  |$."".410...... H|
00000500: 49 52 45 53 2C 31 35 00  1A 0D AE 01 A1 41 24 3A  |IRES,15......A$:|
00000510: 8B 41 24 B2 22 22 A7 34  33 30 00 29 0D B8 01 9E  |.A$."".430.)....|
00000520: 20 43 4C 53 2C 36 2C 31  34 00 4F 0D C2 01 99 22  | CLS,6,14.O...."|
00000530: 93 11 11 11 11 11 11 20  20 20 20 20 D4 48 45 52  |.......     .HER|
00000540: 45 20 59 4F 55 20 48 41  56 45 20 49 54 21 22 00  |E YOU HAVE IT!".|
00000550: 62 0D CC 01 A1 41 24 3A  8B 41 24 B2 22 22 A7 34  |b....A$:.A$."".4|
00000560: 36 30 00 00 00                                    |60...           |
..*....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...
2..A$:.B$:.A$;B$...D.. INITALL,0,1,14...
N.. BLOCK,5,5,20,20,1,5.:.X.. BLOCK,5,12
,20,20,0,6.V.... BLOCK,20,12,35,20,1,2.Q
.... BLOCK,20,5,35,12,0,4...... LINE,0,0
,320,199,1... .. LINE,0,88,319,88,1.....
. LINE,160,0,160,199,2.W.... LINE,55,12,
55,28,1...... LINE,75,12,75,28,1...H.. L
INE,85,12,100,12,1.$.R.. LINE,85,27,100,
27,1.=.... LINE,92,12,92,27,1.V.... LINE
,55,20,75,20,1.Q.... LINE,160,100,0,199,
2...... LINE,160,100,319,0,1...... BOX,0
,0,319,199,1...... BOX,1,1,318,198,1.U..
.. BOX,10,10,310,30,1...".. FIL,10,100,8
0,150,2...,.. CIRC,160,100,50,.75.50,1.(
.6.. CIRC,160,50,50,50,1.C.@.. CIRC,160,
150,50,50,1.^.J.. CIRC,210,100,50,20,1.Y
.T.. CIRC,110,100,50,20,2...^..A$:.A$.""
.350...H..ED,13...R..COLOUR,14,6...|..A$
:.A$."".380.Z....".....      BACK TO TEX
T"...... BACK......A$:.A$."".410...... H
IRES,15......A$:.A$."".430.).... CLS,6,1
4.O.B..".......     THERE YOU HAVE IT!".
B.L..A$:.A$."".460...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL