HI-RES DEMO

FILE INFORMATION

FILENAME(S): HI-RES DEMO

FILE TYPE(S): PRG

FILE SIZE: 1.7K

FIRST SEEN: 2025-12-01 01:08:05

APPEARS ON: 1 disk(s)

FILE HASH

f58fc3149fa3e1c68f39653fc73f32f4d7112f920a19ddc9c1a32eece7247fbb

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
0107A	HI-RES DEMO	PRG	hedning, Kaevlinge	5	6	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 28 08 0A 00 8F 2A  2A 2A 2A 2A 2A 2A 2A 2A  |..(....*********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A  00 4F 08 14 00 8F 2A 20  |********.O....* |
00000030: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000040: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 2A 00  |              *.|
00000050: 76 08 1E 00 8F 2A 20 20  44 45 4D 4F 20 50 52 4F  |v....*  DEMO PRO|
00000060: 47 52 41 4D 20 46 4F 52  20 48 49 52 45 53 20 20  |GRAM FOR HIRES  |
00000070: 20 20 20 20 20 2A 00 9D  08 28 00 8F 2A 20 20 20  |     *...(..*   |
00000080: 20 20 20 20 20 52 4F 55  54 49 4E 45 53 20 20 20  |     ROUTINES   |
00000090: 20 20 20 20 20 20 20 20  20 20 20 20 2A 00 C4 08  |            *...|
000000A0: 32 00 8F 2A 20 20 20 20  20 20 20 20 20 20 20 20  |2..*            |
000000B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000C0: 20 20 20 2A 00 EB 08 3C  00 8F 2A 2A 2A 2A 2A 2A  |   *...<..******|
000000D0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000000E0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 00 F1 08 46 00  |***********...F.|
000000F0: 8F 00 F7 08 50 00 8F 00  17 09 5A 00 8B 20 41 B2  |....P.....Z.. A.|
00000100: 30 A7 20 41 B2 31 3A 93  20 22 48 49 52 45 53 2E  |0. A.1:. "HIRES.|
00000110: 4D 43 22 2C 38 2C 31 00  24 09 64 00 41 44 B2 34  |MC",8,1.$.d.AD.4|
00000120: 39 31 35 32 00 3D 09 6E  00 53 48 B2 41 44 3A 8F  |9152.=.n.SH.AD:.|
00000130: 20 53 45 54 20 55 50 20  48 49 52 45 53 00 58 09  | SET UP HIRES.X.|
00000140: 78 00 54 58 B2 41 44 AA  33 3A 8F 20 54 45 58 54  |x.TX.AD.3:. TEXT|
00000150: 20 52 45 53 54 4F 52 45  00 73 09 82 00 43 48 B2  | RESTORE.s...CH.|
00000160: 41 44 AA 36 3A 8F 20 43  4C 45 41 52 20 53 43 52  |AD.6:. CLEAR SCR|
00000170: 45 45 4E 00 8E 09 8C 00  43 43 B2 41 44 AA 39 3A  |EEN.....CC.AD.9:|
00000180: 8F 20 43 4C 45 41 52 20  43 4F 4C 4F 55 52 00 A8  |. CLEAR COLOUR..|
00000190: 09 96 00 50 48 B2 41 44  AA 31 32 3A 8F 20 50 4C  |...PH.AD.12:. PL|
000001A0: 4F 54 20 48 49 52 45 53  00 C3 09 A0 00 50 43 B2  |OT HIRES.....PC.|
000001B0: 41 44 AA 31 35 3A 8F 20  50 4C 4F 54 20 43 4F 4C  |AD.15:. PLOT COL|
000001C0: 4F 55 52 00 DC 09 AA 00  50 42 B2 41 44 AA 31 38  |OUR.....PB.AD.18|
000001D0: 3A 8F 20 50 4C 4F 54 20  42 4F 54 48 00 F5 09 AC  |:. PLOT BOTH....|
000001E0: 00 4C 44 B2 41 44 AA 32  31 3A 8F 20 50 4C 4F 54  |.LD.AD.21:. PLOT|
000001F0: 20 4C 49 4E 45 00 0F 0A  AE 00 48 4C B2 41 44 AA  | LINE.....HL.AD.|
00000200: 32 34 3A 8F 20 48 4F 52  49 5A 20 4C 49 4E 45 00  |24:. HORIZ LINE.|
00000210: 28 0A B0 00 56 4C B2 41  44 AA 32 37 3A 8F 20 56  |(...VL.AD.27:. V|
00000220: 45 52 54 20 4C 49 4E 45  00 40 0A B2 00 44 42 B2  |ERT LINE.@...DB.|
00000230: 41 44 AA 33 30 3A 8F 20  42 4F 58 20 44 52 41 57  |AD.30:. BOX DRAW|
00000240: 00 53 0A B4 00 58 4C B2  32 35 31 3A 8F 20 58 20  |.S...XL.251:. X |
00000250: 4C 4F 57 00 67 0A BE 00  58 48 B2 32 35 32 3A 8F  |LOW.g...XH.252:.|
00000260: 20 58 20 48 49 47 48 00  7C 0A C8 00 59 4C B2 32  | X HIGH.|...YL.2|
00000270: 35 33 3A 8F 20 59 20 43  4F 4F 52 44 00 93 0A CA  |53:. Y COORD....|
00000280: 00 58 31 B2 31 34 3A 8F  20 45 4E 44 20 58 20 20  |.X1.14:. END X  |
00000290: 4C 4F 57 00 AB 0A CC 00  58 32 B2 31 35 3A 8F 20  |LOW.....X2.15:. |
000002A0: 45 4E 44 20 58 20 20 48  49 47 48 00 BE 0A CE 00  |END X  HIGH.....|
000002B0: 59 31 B2 32 35 35 3A 8F  20 45 4E 44 20 59 00 D5  |Y1.255:. END Y..|
000002C0: 0A D2 00 43 42 B2 32 3A  8F 20 43 4F 4C 4F 55 52  |...CB.2:. COLOUR|
000002D0: 20 42 59 54 45 00 F1 0A  DC 00 50 58 B2 32 35 34  | BYTE.....PX.254|
000002E0: 3A 8F 20 50 4C 4F 54 20  49 4E 44 49 43 41 54 4F  |:. PLOT INDICATO|
000002F0: 52 00 F7 0A E6 00 8F 00  02 0B F0 00 8F 20 4D 45  |R............ ME|
00000300: 4E 55 00 08 0B FA 00 8F  00 12 0B 04 01 99 20 22  |NU............ "|
00000310: 93 22 00 37 0B 0E 01 99  20 22 9E 20 20 20 20 20  |.".7.... ".     |
00000320: 20 20 20 20 20 4C 49 4E  45 20 44 52 41 57 49 4E  |     LINE DRAWIN|
00000330: 47 20 44 45 4D 4F 22 00  58 0B 18 01 99 3A 99 20  |G DEMO".X....:. |
00000340: A3 31 30 29 3B 22 1E 31  2E 20 20 52 41 4E 44 4F  |.10);".1.  RANDO|
00000350: 4D 20 4C 49 4E 45 53 22  00 78 0B 22 01 99 3A 99  |M LINES".x."..:.|
00000360: 20 A3 31 30 29 3B 22 32  2E 20 20 52 41 4E 44 4F  | .10);"2.  RANDO|
00000370: 4D 20 42 4F 58 45 53 22  00 99 0B 2C 01 99 3A 99  |M BOXES"...,..:.|
00000380: 20 A3 31 30 29 3B 22 33  2E 20 20 42 4F 54 48 20  | .10);"3.  BOTH |
00000390: 54 4F 47 45 54 48 45 52  22 00 B6 0B 36 01 99 3A  |TOGETHER"...6..:|
000003A0: 99 20 A3 31 30 29 3B 22  9E 45 4E 54 45 52 20 4F  |. .10);".ENTER O|
000003B0: 50 54 49 4F 4E 22 00 E4  0B 38 01 99 3A 99 20 22  |PTION"...8..:. "|
000003C0: 4E 4F 54 45 3A 20 54 48  49 53 20 50 52 4F 47 52  |NOTE: THIS PROGR|
000003D0: 41 4D 20 49 53 20 4F 4E  4C 59 20 49 4E 54 45 4E  |AM IS ONLY INTEN|
000003E0: 44 45 44 22 00 0D 0C 3A  01 99 20 22 41 53 20 41  |DED"...:.. "AS A|
000003F0: 4E 20 49 4C 4C 55 53 54  52 41 54 49 4F 4E 2E 20  |N ILLUSTRATION. |
00000400: 49 54 20 4D 41 59 20 43  52 41 53 48 22 00 39 0C  |IT MAY CRASH".9.|
00000410: 3C 01 99 20 22 4F 43 43  41 53 49 4F 4E 41 4C 4C  |<.. "OCCASIONALL|
00000420: 59 20 41 53 20 54 48 45  20 48 49 2D 52 45 53 20  |Y AS THE HI-RES |
00000430: 52 4F 55 54 49 4E 45 53  22 00 6B 0C 3E 01 99 20  |ROUTINES".k.>.. |
00000440: 22 55 53 45 20 53 4F 4D  45 20 4F 46 20 54 48 45  |"USE SOME OF THE|
00000450: 20 53 41 4D 45 20 4C 4F  43 41 54 49 4F 4E 53 20  | SAME LOCATIONS |
00000460: 41 53 20 42 41 53 49 43  22 3A 99 00 82 0C 40 01  |AS BASIC":....@.|
00000470: A1 20 49 24 3A 8B 20 49  24 B2 22 22 20 A7 20 33  |. I$:. I$."" . 3|
00000480: 32 30 00 9E 0C 4A 01 8B  20 49 24 B1 22 33 22 20  |20...J.. I$."3" |
00000490: B0 20 49 24 B3 22 31 22  20 A7 20 33 32 30 00 AA  |. I$."1" . 320..|
000004A0: 0C 4B 01 49 B2 C5 28 49  24 29 00 C3 0C 54 01 91  |.K.I..(I$)...T..|
000004B0: 20 49 20 8D 20 31 30 30  30 2C 32 30 30 30 2C 33  | I . 1000,2000,3|
000004C0: 30 30 30 00 D2 0C 68 01  9E 20 54 58 3A 89 20 32  |000...h.. TX:. 2|
000004D0: 36 30 00 D8 0C 84 03 8F  00 EB 0C 8E 03 8F 52 41  |60............RA|
000004E0: 4E 44 4F 4D 20 20 4C 49  4E 45 53 00 F1 0C 98 03  |NDOM  LINES.....|
000004F0: 8F 00 03 0D E8 03 97 20  50 58 2C 32 35 35 3A 9E  |....... PX,255:.|
00000500: 20 53 48 00 13 0D F2 03  8D 20 35 30 30 30 3A 9E  | SH...... 5000:.|
00000510: 20 4C 44 00 2B 0D FC 03  A1 20 49 24 3A 8B 20 49  | LD.+.... I$:. I|
00000520: 24 B2 22 22 20 A7 20 31  30 31 30 00 31 0D 06 04  |$."" . 1010.1...|
00000530: 8E 00 37 0D 6C 07 8F 00  4A 0D 76 07 8F 20 52 41  |..7.l...J.v.. RA|
00000540: 4E 44 4F 4D 20 42 4F 58  45 53 00 50 0D 80 07 8F  |NDOM BOXES.P....|
00000550: 00 6A 0D D0 07 97 20 50  58 2C 32 35 35 3A 97 20  |.j.... PX,255:. |
00000560: 43 42 2C 36 37 3A 9E 20  53 48 00 7A 0D DA 07 8D  |CB,67:. SH.z....|
00000570: 20 35 30 30 30 3A 9E 20  44 42 00 92 0D E4 07 A1  | 5000:. DB......|
00000580: 20 49 24 3A 8B 20 49 24  B2 22 22 20 A7 20 32 30  | I$:. I$."" . 20|
00000590: 31 30 00 98 0D EE 07 8E  00 9E 0D 2A 08 8F 00 AC  |10.........*....|
000005A0: 0D 34 08 8F 20 44 4F 20  42 4F 54 48 00 B2 0D 3E  |.4.. DO BOTH...>|
000005B0: 08 8F 00 CC 0D B8 0B 97  20 50 58 2C 32 35 35 3A  |........ PX,255:|
000005C0: 97 20 43 42 2C 36 37 3A  9E 20 53 48 00 E8 0D C2  |. CB,67:. SH....|
000005D0: 0B 8D 20 35 30 30 30 3A  9E 20 4C 44 3A 8D 20 35  |.. 5000:. LD:. 5|
000005E0: 30 30 30 3A 9E 20 44 42  00 00 0E CC 0B A1 20 49  |000:. DB...... I|
000005F0: 24 3A 8B 20 49 24 B2 22  22 20 A7 20 33 30 31 30  |$:. I$."" . 3010|
00000600: 00 06 0E D6 0B 8E 00 0C  0E 24 13 8F 00 20 0E 2E  |.........$... ..|
00000610: 13 8F 20 53 45 54 20 55  50 20 43 4F 4F 52 44 53  |.. SET UP COORDS|
00000620: 00 26 0E 38 13 8F 00 41  0E 88 13 97 20 50 58 2C  |.&.8...A.... PX,|
00000630: 32 35 35 3A 58 B2 B5 28  BB 28 31 29 AC 33 31 39  |255:X..(.(1).319|
00000640: 29 00 67 0E 92 13 97 20  58 4C 2C 58 AB B5 28 58  |).g.... XL,X..(X|
00000650: AD 32 35 36 29 AC 32 35  36 3A 97 20 58 48 2C B5  |.256).256:. XH,.|
00000660: 28 58 AD 32 35 36 29 00  79 0E 9C 13 58 B2 B5 28  |(X.256).y...X..(|
00000670: BB 28 31 29 AC 33 31 39  29 00 9F 0E A6 13 97 20  |.(1).319)...... |
00000680: 58 31 2C 58 AB B5 28 58  AD 32 35 36 29 AC 32 35  |X1,X..(X.256).25|
00000690: 36 3A 97 20 58 32 2C B5  28 58 AD 32 35 36 29 00  |6:. X2,.(X.256).|
000006A0: C5 0E B0 13 97 20 59 4C  2C B5 28 BB 28 31 29 AC  |..... YL,.(.(1).|
000006B0: 31 39 39 29 3A 97 20 59  31 2C B5 28 BB 28 31 29  |199):. Y1,.(.(1)|
000006C0: AC 31 39 39 29 00 CB 0E  BA 13 8E 00 00 00        |.199).........  |

..(....*********************************
.O....*                               *.
V....*  DEMO PROGRAM FOR HIRES       *..
.(..*        ROUTINES               *.D.
2..*                               *...<
..*********************************...F.
....P.....Z.. A.0. A.1:. "HIRES.MC",8,1.
$.D.AD.49152.=.N.SH.AD:. SET UP HIRES.X.
X.TX.AD.3:. TEXT RESTORE.S...CH.AD.6:. C
LEAR SCREEN.....CC.AD.9:. CLEAR COLOUR..
...PH.AD.12:. PLOT HIRES.C. .PC.AD.15:. 
PLOT COLOUR.....PB.AD.18:. PLOT BOTH....
.LD.AD.21:. PLOT LINE.....HL.AD.24:. HOR
IZ LINE.(...VL.AD.27:. VERT LINE.@...DB.
AD.30:. BOX DRAW.S...XL.251:. X LOW.G...
XH.252:. X HIGH.|.H.YL.253:. Y COORD...J
.X1.14:. END X  LOW...L.X2.15:. END X  H
IGH...N.Y1.255:. END Y.U.R.CB.2:. COLOUR
 BYTE.....PX.254:. PLOT INDICATOR.......
..... MENU............ ".".7.... ".     
     LINE DRAWING DEMO".X....:. .10);".1
.  RANDOM LINES".X."..:. .10);"2.  RANDO
M BOXES"...,..:. .10);"3.  BOTH TOGETHER
"...6..:. .10);".ENTER OPTION"...8..:. "
NOTE: THIS PROGRAM IS ONLY INTENDED"...:
.. "AS AN ILLUSTRATION. IT MAY CRASH".9.
<.. "OCCASIONALLY AS THE HI-RES ROUTINES
".K.>.. "USE SOME OF THE SAME LOCATIONS 
AS BASIC":....@.. I$:. I$."" . 320...J..
 I$."3" . I$."1" . 320...K.I.E(I$).C.T..
 I . 1000,2000,3000.R.H.. TX:. 260.X....
......RANDOM  LINES............ PX,255:.
 SH...... 5000:. LD.+.... I$:. I$."" . 1
010.1.....7.L...J.V.. RANDOM BOXES.P....
.J.P.. PX,255:. CB,67:. SH.Z.Z.. 5000:. 
DB...... I$:. I$."" . 2010.........*....
.4.. DO BOTH...>...L.... PX,255:. CB,67:
. SH...B.. 5000:. LD:. 5000:. DB...L.. I
$:. I$."" . 3010...V.....$... .... SET U
P COORDS.&.8...A.... PX,255:X..(.(1).319
).G.... XL,X..(X.256).256:. XH,.(X.256).
Y...X..(.(1).319)...... X1,X..(X.256).25
6:. X2,.(X.256).E.... YL,.(.(1).199):. Y
1,.(.(1).199).K.......

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL