> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 36 08 0A 00 3A 99 C7 28 31 34 37 29 3B C7 |..6...:..(147);.|
00000010: 28 31 34 29 3B 3A 8F 20 43 4C 45 41 52 20 20 20 |(14);:. CLEAR |
00000020: 20 20 20 53 43 52 45 45 4E 20 2D 20 4C 4F 57 45 | SCREEN - LOWE|
00000030: 52 20 43 41 53 45 00 6E 08 14 00 3A 99 22 11 11 |R CASE.n...:."..|
00000040: 22 2C C7 28 31 38 29 3B 22 20 D2 C1 CE C4 CF CD |",.(18);" ......|
00000050: A0 C3 CF CC CF D5 D2 A0 C2 C1 D2 D3 A0 22 3A 8F |.............":.|
00000060: 20 54 49 54 4C 45 28 52 56 53 20 4F 4E 29 00 8C | TITLE(RVS ON)..|
00000070: 08 19 00 8F 20 43 52 45 44 49 54 20 41 4E 44 20 |.... CREDIT AND |
00000080: 49 4E 53 54 52 55 43 54 49 4F 4E 53 00 BC 08 1E |INSTRUCTIONS....|
00000090: 00 3A 99 22 11 11 1D 1D C3 48 41 52 4C 49 45 20 |.:.".....HARLIE |
000000A0: D0 41 54 45 52 53 4F 4E 20 20 20 D4 4F 52 4F 4E |.ATERSON .ORON|
000000B0: 54 4F 20 20 20 C3 41 4E 41 44 41 22 00 E9 08 22 |TO .ANADA"..."|
000000C0: 00 3A 99 22 11 20 20 20 20 20 D4 D0 D5 C7 A0 23 |.:.". .....#|
000000D0: 32 32 38 30 20 20 20 20 20 20 20 20 20 20 31 39 |2280 19|
000000E0: 38 33 20 30 37 20 31 34 22 00 18 09 28 00 3A 99 |83 07 14"...(.:.|
000000F0: 22 11 11 20 20 20 20 20 20 D4 48 49 53 20 50 52 |".. .HIS PR|
00000100: 4F 47 52 41 4D 20 57 49 4C 4C 20 43 4F 4E 54 49 |OGRAM WILL CONTI|
00000110: 4E 55 4F 55 53 4C 59 22 00 43 09 32 00 3A 99 22 |NUOUSLY".C.2.:."|
00000120: 20 44 49 53 50 4C 41 59 20 41 20 52 41 4E 44 4F | DISPLAY A RANDO|
00000130: 4D 20 53 45 4C 45 43 54 49 4F 4E 20 4F 46 20 54 |M SELECTION OF T|
00000140: 48 45 22 00 72 09 3C 00 3A 99 22 20 53 49 58 54 |HE".r.<.:." SIXT|
00000150: 45 45 4E 20 43 4F 4C 4F 55 52 53 20 41 56 41 49 |EEN COLOURS AVAI|
00000160: 4C 41 42 4C 45 20 4F 4E 20 54 48 45 20 C3 36 34 |LABLE ON THE .64|
00000170: 2E 22 00 B7 09 46 00 3A 99 22 20 20 20 20 20 20 |."...F.:." |
00000180: D7 48 45 4E 20 45 59 45 42 41 4C 4C 20 52 45 4C |.HEN EYEBALL REL|
00000190: 49 45 46 20 4E 45 45 44 45 44 20 50 52 45 53 53 |IEF NEEDED PRESS|
000001A0: 20 20 20 D2 D5 CE 2F D3 D4 CF D0 20 26 20 D2 C5 | .../.... & ..|
000001B0: D3 D4 CF D2 C5 2E 22 00 F3 09 50 00 3A 81 20 54 |......"...P.:. T|
000001C0: 4D 20 B2 20 31 20 A4 20 37 30 30 30 3A 82 20 54 |M . 1 . 7000:. T|
000001D0: 4D 3A 8F 20 54 49 4D 45 20 20 20 20 20 44 45 4C |M:. TIME DEL|
000001E0: 41 59 20 46 4F 52 20 49 4E 53 54 52 55 43 54 49 |AY FOR INSTRUCTI|
000001F0: 4F 4E 53 00 28 0A 5A 00 3A 99 20 C7 28 31 34 37 |ONS.(.Z.:. .(147|
00000200: 29 3B C7 28 31 34 32 29 3B 3A 8F 20 43 4C 45 41 |);.(142);:. CLEA|
00000210: 52 20 20 20 20 53 43 52 45 45 4E 20 2D 20 55 50 |R SCREEN - UP|
00000220: 50 45 52 20 43 41 53 45 00 3B 0A 5F 00 8F 20 43 |PER CASE.;._.. C|
00000230: 4F 4C 4F 55 52 53 20 44 41 54 41 00 5D 0A 64 00 |OLOURS DATA.].d.|
00000240: 3A 83 20 35 2C 32 38 2C 33 30 2C 33 31 2C 31 32 |:. 5,28,30,31,12|
00000250: 39 2C 31 34 34 2C 31 34 39 2C 31 35 30 00 84 0A |9,144,149,150...|
00000260: 6E 00 3A 83 20 31 35 31 2C 31 35 32 2C 31 35 33 |n.:. 151,152,153|
00000270: 2C 31 35 34 2C 31 35 35 2C 31 35 36 2C 31 35 38 |,154,155,156,158|
00000280: 2C 31 35 39 00 9B 0A 73 00 8F 20 50 52 49 4E 54 |,159...s.. PRINT|
00000290: 20 43 4F 4C 4F 55 52 20 42 41 52 00 B4 0A 78 00 | COLOUR BAR...x.|
000002A0: 3A 99 20 C7 28 31 38 29 3B 20 22 20 20 20 20 20 |:. .(18); " |
000002B0: 20 20 22 3B 00 DA 0A 7D 00 8F 20 52 41 4E 44 4F | ";...}.. RANDO|
000002C0: 4D 20 43 4F 4C 4F 55 52 20 53 45 4C 45 43 54 49 |M COLOUR SELECTI|
000002D0: 4F 4E 20 50 52 4F 47 52 41 4D 00 F0 0A 82 00 3A |ON PROGRAM.....:|
000002E0: 41 20 B2 20 B5 28 31 36 AC BB 28 31 29 29 AA 31 |A . .(16..(1)).1|
000002F0: 00 03 0B 8C 00 3A 20 81 20 54 20 B2 20 31 20 A4 |.....: . T . 1 .|
00000300: 20 31 36 00 0E 0B 96 00 3A 20 87 20 43 4C 00 27 | 16.....: . CL.'|
00000310: 0B A0 00 3A 20 8B 20 54 20 B2 20 41 20 A7 20 99 |...: . T . A . .|
00000320: 20 C7 28 43 4C 29 3B 00 30 0B AA 00 3A 82 20 54 | .(CL);.0...:. T|
00000330: 00 6A 0B B4 00 9C 3A 8C 3A 89 20 31 32 30 3A 8F |.j....:.:. 120:.|
00000340: 20 47 4F 20 46 4F 52 20 4E 45 58 54 20 20 20 20 | GO FOR NEXT |
00000350: 50 52 49 4E 54 20 41 4E 44 20 43 4F 4C 4F 55 52 |PRINT AND COLOUR|
00000360: 20 53 45 4C 45 43 54 49 4F 4E 00 00 00 | SELECTION... |
..6...:.G(147);G(14);:. CLEAR SCREE
N - LOWER CASE.N...:."..",G(18);" RANDOM
COLOUR BARS ":. TITLE(RVS ON)...... CRE
DIT AND INSTRUCTIONS.....:."....CHARLIE
PATERSON TORONTO CANADA"...".:.".
TPUG #2280 1983 07 14"...(.:.
".. THIS PROGRAM WILL CONTINUOUSLY"
.C.2.:." DISPLAY A RANDOM SELECTION OF T
HE".R.<.:." SIXTEEN COLOURS AVAILABLE ON
THE C64."...F.:." WHEN EYEBALL REL
IEF NEEDED PRESS RUN/STOP & RESTORE.".
..P.:. TM . 1 . 7000:. TM:. TIME DEL
AY FOR INSTRUCTIONS.(.Z.:. G(147);G(142)
;:. CLEAR SCREEN - UPPER CASE.;._.. C
OLOURS DATA.].D.:. 5,28,30,31,129,144,14
9,150...N.:. 151,152,153,154,155,156,158
,159...S.. PRINT COLOUR BAR...X.:. G(18)
; " ";.Z.}.. RANDOM COLOUR SELECTI
ON PROGRAM.....:A . .(16..(1)).1.....: .
T . 1 . 16.....: . CL.'. .: . T . A . .
G(CL);.0...:. T.J....:.:. 120:. GO FOR
NEXT PRINT AND COLOUR SELECTION...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL