COLR SELECTOR.C

00000000: 01 08 24 08 05 00 8F 20  43 4C 45 41 52 20 53 43  |..$.... CLEAR SC|
00000010: 52 45 45 4E 20 26 20 54  4F 20 4C 4F 57 45 52 20  |REEN & TO LOWER |
00000020: 43 41 53 45 00 38 08 0A  00 3A 99 C7 28 31 34 37  |CASE.8...:..(147|
00000030: 29 3B C7 28 31 34 29 3B  00 4D 08 0F 00 8F 20 54  |);.(14);.M.... T|
00000040: 49 54 4C 45 20 26 20 43  52 45 44 49 54 00 83 08  |ITLE & CREDIT...|
00000050: 14 00 3A 99 22 11 11 1D  1D 1D 1D 1D 22 3B C7 28  |..:.".......";.(|
00000060: 31 38 29 22 20 C3 CF CC  CF D5 D2 A0 C3 CF CD C2  |18)" ...........|
00000070: C9 CE C1 D4 C9 CF CE D3  20 D3 C5 CC C5 C3 D4 CF  |........ .......|
00000080: D2 20 22 00 B4 08 1E 00  3A 99 22 11 11 1D 1D C3  |. ".....:.".....|
00000090: 48 41 52 4C 49 45 20 D0  41 54 45 52 53 4F 4E 20  |HARLIE .ATERSON |
000000A0: 20 20 D4 4F 52 4F 4E 54  4F 20 20 20 C3 41 4E 41  |  .ORONTO   .ANA|
000000B0: 44 41 20 22 00 E0 08 28  00 3A 99 22 11 1D 1D 1D  |DA "...(.:."....|
000000C0: 1D 1D D4 D0 D5 C7 A0 23  32 32 38 30 1D 1D 1D 1D  |.......#2280....|
000000D0: 1D 1D 1D 1D 1D 1D 31 39  38 33 20 30 38 20 30 38  |......1983 08 08|
000000E0: 00 F3 08 2D 00 8F 20 49  4E 53 54 52 55 43 54 49  |...-.. INSTRUCTI|
000000F0: 4F 4E 53 00 24 09 32 00  3A 99 22 11 11 1D 1D 1D  |ONS.$.2.:.".....|
00000100: 1D 1D D4 52 59 20 59 4F  55 52 20 53 45 4C 45 43  |...RY YOUR SELEC|
00000110: 54 49 4F 4E 53 20 46 52  4F 4D 20 54 48 45 20 34  |TIONS FROM THE 4|
00000120: 30 39 36 22 00 53 09 3C  00 3A 99 22 20 20 53 43  |096".S.<.:."  SC|
00000130: 52 45 45 4E 20 20 43 4F  4C 4F 55 52 20 20 43 4F  |REEN  COLOUR  CO|
00000140: 4D 42 49 4E 41 54 49 4F  4E 53 20 20 4F 46 20 54  |MBINATIONS  OF T|
00000150: 48 45 22 00 81 09 46 00  3A 99 22 20 20 C3 36 34  |HE"...F.:."  .64|
00000160: 2E 20 C1 D4 D4 D2 C1 C3  D4 C9 D6 C5 20 2D 2D 20  |. .......... -- |
00000170: 54 4F 20 2D 2D 20 D2 C5  D0 D5 CC D3 C9 D6 C5 2E  |TO -- ..........|
00000180: 22 00 B0 09 50 00 3A 99  22 20 20 C3 48 4F 4F 53  |"...P.:."  .HOOS|
00000190: 45 20 59 4F 55 52 20 50  52 45 46 45 52 45 4E 43  |E YOUR PREFERENC|
000001A0: 45 53 20 46 4F 52 20 42  4F 52 44 45 52 53 2C 22  |ES FOR BORDERS,"|
000001B0: 00 FD 09 5A 00 99 22 20  20 42 41 43 4B 47 52 4F  |...Z.."  BACKGRO|
000001C0: 55 4E 44 53 2C 20 41 4E  44 20 43 48 41 52 41 43  |UNDS, AND CHARAC|
000001D0: 54 45 52 53 2E 20 CD 41  4B 45 20 41 20 20 20 20  |TERS. .AKE A    |
000001E0: 20 C2 CC C1 C3 CB C8 CF  CC C5 A0 4F 52 20 41 4E  | ..........OR AN|
000001F0: 20 C5 D9 C5 A0 C4 C1 DA  DA CC C5 D2 2E 00 2B 0A  | .............+.|
00000200: 64 00 99 22 20 20 20 20  20 D7 48 45 4E 20 41 20  |d.."     .HEN A |
00000210: 44 49 53 50 4C 41 59 20  49 53 20 41 54 54 52 41  |DISPLAY IS ATTRA|
00000220: 43 54 49 56 45 2C 20 59  4F 55 22 00 59 0A 6E 00  |CTIVE, YOU".Y.n.|
00000230: 99 22 20 20 43 41 4E 20  53 54 4F 50 20 54 48 45  |."  CAN STOP THE|
00000240: 20 50 52 45 53 45 54 20  56 49 45 57 49 4E 47 20  | PRESET VIEWING |
00000250: 54 49 4D 45 20 41 4E 44  22 00 86 0A 78 00 99 22  |TIME AND"...x.."|
00000260: 20 20 48 4F 4C 44 2D 55  4E 54 49 4C 4C 20 59 4F  |  HOLD-UNTILL YO|
00000270: 55 20 43 48 4F 4F 53 45  20 54 4F 20 43 4F 4E 54  |U CHOOSE TO CONT|
00000280: 49 4E 55 45 2E 22 00 B4  0A 82 00 99 22 11 20 20  |INUE."......".  |
00000290: 20 20 20 CF CB 21 20 CD  C1 D3 D4 C5 D2 A0 C3 CF  |   ..! .........|
000002A0: CC CF D5 D2 A0 C3 CF 2D  CF D2 C4 C9 CE C1 D4 CF  |.......-........|
000002B0: D2 11 11 22 00 F5 0A 8C  00 3A 99 22 20 20 20 20  |...".....:."    |
000002C0: 20 20 20 20 20 20 22 C7  28 31 38 29 C7 28 31 32  |      ".(18).(12|
000002D0: 39 29 22 20 D0 C1 D2 D4  C9 C3 C9 D0 C1 D4 C5 A0  |9)" ............|
000002E0: 22 C7 28 33 30 29 22 20  C5 CE CA CF D9 20 22 C7  |".(30)" ..... ".|
000002F0: 28 31 35 34 29 00 0D 0B  91 00 8F 20 49 4E 53 54  |(154)...... INST|
00000300: 52 55 43 54 49 4F 4E 20  44 45 4C 41 59 00 28 0B  |RUCTION DELAY.(.|
00000310: 96 00 3A 81 20 54 4D 20  B2 20 31 20 A4 20 31 35  |..:. TM . 1 . 15|
00000320: 30 30 30 3A 82 20 54 4D  00 4B 0B 9B 00 8F 20 43  |000:. TM.K.... C|
00000330: 4C 45 41 52 20 53 43 52  45 45 4E 20 26 20 54 4F  |LEAR SCREEN & TO|
00000340: 20 55 50 50 45 52 20 43  41 53 45 00 5F 0B A0 00  | UPPER CASE._...|
00000350: 99 20 C7 28 31 34 37 29  3B C7 28 31 34 32 29 00  |. .(147);.(142).|
00000360: 71 0B A5 00 8F 20 43 4F  4C 4F 55 52 20 44 41 54  |q.... COLOUR DAT|
00000370: 41 00 93 0B AA 00 3A 83  20 31 34 34 2C 35 2C 32  |A.....:. 144,5,2|
00000380: 38 2C 31 35 39 2C 31 35  36 2C 33 30 2C 33 31 2C  |8,159,156,30,31,|
00000390: 31 35 38 00 BA 0B B4 00  3A 83 20 31 32 39 2C 31  |158.....:. 129,1|
000003A0: 34 39 2C 31 35 30 2C 31  35 31 2C 31 35 32 2C 31  |49,150,151,152,1|
000003B0: 35 33 2C 31 35 34 2C 31  35 35 00 DD 0B B9 00 8F  |53,154,155......|
000003C0: 20 43 4F 4C 4F 55 52 20  44 49 53 50 4C 41 59 20  | COLOUR DISPLAY |
000003D0: 52 4F 55 54 49 4E 45 20  28 39 39 35 29 00 E9 0B  |ROUTINE (995)...|
000003E0: BE 00 3A 8D 20 31 30 30  30 00 FF 0B C3 00 8F 20  |..:. 1000...... |
000003F0: 43 4F 4C 4F 55 52 20 52  45 51 55 45 53 54 53 00  |COLOUR REQUESTS.|
00000400: 3A 0C C8 00 3A 99 20 C7  28 31 38 29 22 1D 20 50  |:...:. .(18)". P|
00000410: 4C 45 41 53 45 20 54 59  50 45 20 41 20 23 20 46  |LEASE TYPE A # F|
00000420: 52 4F 4D 20 30 20 54 4F  20 31 35 20 4F 4E 4C 59  |ROM 0 TO 15 ONLY|
00000430: 20 11 22 3B C7 28 31 34  36 29 00 63 0C D2 00 3A  | .";.(146).c...:|
00000440: 85 22 43 4F 4C 4F 55 52  20 4E 55 4D 42 45 52 20  |."COLOUR NUMBER |
00000450: 46 4F 52 20 42 4F 52 44  45 52 22 3B 42 4F 3A 99  |FOR BORDER";BO:.|
00000460: 22 11 22 00 7F 0C DC 00  3A 8B 20 42 4F 20 B3 30  |".".....:. BO .0|
00000470: 20 B0 20 42 4F 20 B1 31  35 20 A7 20 32 31 30 00  | . BO .15 . 210.|
00000480: AC 0C E6 00 3A 85 22 43  4F 4C 4F 55 52 20 4E 55  |....:."COLOUR NU|
00000490: 4D 42 45 52 20 46 4F 52  20 42 41 43 4B 47 52 4F  |MBER FOR BACKGRO|
000004A0: 55 4E 44 22 3B 42 41 3A  99 22 11 22 00 CA 0C F0  |UND";BA:."."....|
000004B0: 00 3A 8B 20 42 41 20 B3  20 30 20 B0 20 42 41 20  |.:. BA . 0 . BA |
000004C0: B1 20 31 35 20 A7 20 32  33 30 00 F2 0C FA 00 3A  |. 15 . 230.....:|
000004D0: 85 22 43 4F 4C 4F 55 52  20 4E 55 4D 42 45 52 20  |."COLOUR NUMBER |
000004E0: 46 4F 52 20 43 48 41 52  41 43 54 45 52 53 22 3B  |FOR CHARACTERS";|
000004F0: 43 48 00 10 0D 04 01 3A  8B 20 43 48 20 B3 20 4F  |CH.....:. CH . O|
00000500: 20 B0 20 43 48 20 B1 20  31 35 20 A7 20 32 35 30  | . CH . 15 . 250|
00000510: 00 28 0D 09 01 8F 20 53  45 54 20 42 4F 52 44 45  |.(.... SET BORDE|
00000520: 52 20 43 4F 4C 4F 55 52  00 3A 0D 0E 01 3A 20 97  |R COLOUR.:...: .|
00000530: 20 35 33 32 38 30 2C 20  42 4F 00 56 0D 13 01 8F  | 53280, BO.V....|
00000540: 20 53 45 54 20 42 41 43  4B 47 52 4F 55 4E 44 20  | SET BACKGROUND |
00000550: 43 4F 4C 4F 55 52 00 69  0D 18 01 3A 20 20 97 20  |COLOUR.i...:  . |
00000560: 35 33 32 38 31 2C 20 42  41 00 84 0D 1D 01 8F 20  |53281, BA...... |
00000570: 53 45 54 20 43 48 41 52  41 43 54 45 52 20 43 4F  |SET CHARACTER CO|
00000580: 4C 4F 55 52 00 96 0D 22  01 3A 81 20 43 20 B2 20  |LOUR...".:. C . |
00000590: 30 20 A4 20 31 35 00 A1  0D 2C 01 3A 20 87 20 43  |0 . 15...,.: . C|
000005A0: 4E 00 B7 0D 36 01 3A 8B  20 43 20 B2 20 43 48 20  |N...6.:. C . CH |
000005B0: A7 20 43 43 B2 43 4E 00  C0 0D 40 01 3A 82 20 43  |. CC.CN...@.:. C|
000005C0: 00 CE 0D 4A 01 3A 20 99  20 C7 28 43 43 29 00 EB  |...J.: . .(CC)..|
000005D0: 0D 4F 01 8F 20 44 49 53  50 4C 41 59 20 43 4F 4C  |.O.. DISPLAY COL|
000005E0: 4F 55 52 20 4E 55 4D 42  45 52 53 00 0E 0E 54 01  |OUR NUMBERS...T.|
000005F0: 3A 99 C7 28 31 34 37 29  3B 22 11 22 3B 22 20 20  |:..(147);".";"  |
00000600: 20 43 4F 4C 4F 55 52 53  20 20 20 11 11 22 00 3B  | COLOURS   ..".;|
00000610: 0E 5E 01 3A 99 C7 28 31  38 29 3B 22 42 4F 52 44  |.^.:..(18);"BORD|
00000620: 45 52 20 20 20 20 20 3D  22 3B C2 28 35 33 32 38  |ER     =";.(5328|
00000630: 30 29 20 AF 20 31 35 22  9D 20 22 00 6D 0E 68 01  |0) . 15". ".m.h.|
00000640: 3A 99 22 11 11 22 3B C7  28 31 38 29 3B 22 42 41  |:."..";.(18);"BA|
00000650: 43 4B 47 52 4F 55 4E 44  20 3D 22 3B C2 28 35 33  |CKGROUND =";.(53|
00000660: 32 38 31 29 20 AF 20 31  35 22 9D 20 22 00 8A 0E  |281) . 15". "...|
00000670: 72 01 3A 99 22 11 11 22  3B 22 43 48 41 52 41 43  |r.:."..";"CHARAC|
00000680: 54 45 52 53 20 3D 22 3B  43 48 00 AB 0E 77 01 8F  |TERS =";CH...w..|
00000690: 20 48 4F 4C 44 20 50 41  54 45 52 4E 20 52 4F 55  | HOLD PATERN ROU|
000006A0: 54 49 4E 45 20 28 31 32  39 35 29 00 B8 0E 7C 01  |TINE (1295)...|.|
000006B0: 3A 20 8D 20 31 33 30 30  00 DD 0E 81 01 8F 20 56  |: . 1300...... V|
000006C0: 49 45 57 20 54 49 4D 45  20 46 4F 52 20 45 41 43  |IEW TIME FOR EAC|
000006D0: 48 20 43 4F 4D 42 49 4E  41 54 49 4F 4E 00 F2 0E  |H COMBINATION...|
000006E0: 86 01 3A 20 20 81 20 58  20 B2 20 31 20 A4 20 35  |..:  . X . 1 . 5|
000006F0: 30 30 00 0B 0F 8B 01 8F  20 48 4F 4C 44 20 50 41  |00...... HOLD PA|
00000700: 54 45 52 4E 20 53 45 4C  45 43 54 00 27 0F 90 01  |TERN SELECT.'...|
00000710: 3A 20 A1 20 41 24 3A 8B  20 41 24 20 B3 B1 22 20  |: . A$:. A$ .." |
00000720: 22 20 A7 20 34 32 30 00  44 0F 95 01 8F 20 52 45  |" . 420.D.... RE|
00000730: 53 54 41 52 54 20 52 4F  55 54 49 4E 45 20 28 31  |START ROUTINE (1|
00000740: 33 39 35 29 00 51 0F 9A  01 3A 20 8D 20 31 34 30  |395).Q...: . 140|
00000750: 30 00 5A 0F A4 01 3A 82  20 58 00 61 0F AE 01 3A  |0.Z...:. X.a...:|
00000760: 8C 00 68 0F B8 01 3A 9C  00 73 0F C2 01 3A 58 20  |..h...:..s...:X |
00000770: B2 20 30 00 99 0F C7 01  8F 20 52 45 51 55 45 53  |. 0...... REQUES|
00000780: 54 20 46 4F 52 20 41 4E  4F 54 48 45 52 20 43 4F  |T FOR ANOTHER CO|
00000790: 4D 42 49 4E 41 54 49 4F  4E 00 CA 0F CC 01 3A 99  |MBINATION.....:.|
000007A0: C7 28 31 34 37 29 3B C7  28 31 35 34 29 3B 3A 97  |.(147);.(154);:.|
000007B0: 20 35 33 32 38 30 2C 31  34 3A 97 20 35 33 32 38  | 53280,14:. 5328|
000007C0: 31 2C 36 3A 99 22 11 11  22 3B 00 F3 0F D6 01 3A  |1,6:."..";.....:|
000007D0: 85 22 20 20 44 4F 20 59  4F 55 20 57 41 4E 54 20  |."  DO YOU WANT |
000007E0: 41 4E 4F 54 48 45 52 20  4F 4E 45 20 59 2F 4E 22  |ANOTHER ONE Y/N"|
000007F0: 3B 41 24 00 13 10 E0 01  3A 20 8B 20 41 24 20 B3  |;A$.....: . A$ .|
00000800: 22 4E 22 20 B0 20 41 24  20 B1 22 59 22 20 A7 20  |"N" . A$ ."Y" . |
00000810: 34 37 30 00 31 10 EA 01  3A 20 8B 20 41 24 20 B1  |470.1...: . A$ .|
00000820: 22 4E 22 AF 20 41 24 20  B3 22 59 22 A7 20 34 37  |"N". A$ ."Y". 47|
00000830: 30 00 47 10 F4 01 3A 20  8B 20 41 24 20 B2 22 4E  |0.G...: . A$ ."N|
00000840: 22 20 A7 20 35 32 30 00  53 10 FE 01 3A 20 89 20  |" . 520.S...: . |
00000850: 31 36 30 00 69 10 03 02  8F 20 42 59 45 20 42 59  |160.i.... BYE BY|
00000860: 45 20 52 4F 55 54 49 4E  45 00 8B 10 08 02 3A 99  |E ROUTINE.....:.|
00000870: C7 28 31 34 37 29 3B 3A  97 20 35 33 32 38 30 2C  |.(147);:. 53280,|
00000880: 34 3A 97 20 35 33 32 38  31 2C 33 00 B0 10 0D 02  |4:. 53281,3.....|
00000890: 8F 20 52 45 50 45 41 54  20 43 48 41 52 41 43 54  |. REPEAT CHARACT|
000008A0: 45 52 20 43 4F 4C 4F 55  52 20 43 48 41 4E 47 45  |ER COLOUR CHANGE|
000008B0: 00 C1 10 12 02 3A 81 20  52 20 B2 20 31 20 A4 20  |.....:. R . 1 . |
000008C0: 36 00 D3 10 1C 02 3A 81  20 43 20 B2 20 30 20 A4  |6.....:. C . 0 .|
000008D0: 20 31 35 00 ED 10 21 02  8F 20 4D 45 53 53 41 47  | 15...!.. MESSAG|
000008E0: 45 20 50 4F 53 49 54 49  4F 4E 49 4E 47 00 10 11  |E POSITIONING...|
000008F0: 26 02 3A 20 81 20 44 4E  20 B2 20 31 20 A4 20 31  |&.: . DN . 1 . 1|
00000900: 30 3A 99 22 11 22 3B 3A  20 82 20 44 4E 33 30 30  |0:.".";: . DN300|
00000910: 00 2F 11 30 02 3A 20 20  81 20 52 54 20 B2 20 31  |./.0.:  . RT . 1|
00000920: 20 A4 20 39 3A 99 22 1D  22 3B 3A 82 20 52 54 00  | . 9:.".";:. RT.|
00000930: 43 11 35 02 8F 20 4D 45  53 53 41 47 45 20 50 52  |C.5.. MESSAGE PR|
00000940: 49 4E 54 00 4F 11 3A 02  3A 20 20 20 87 20 4C 00  |INT.O.:.:   . L.|
00000950: 5E 11 44 02 3A 20 20 20  99 C7 28 4C 29 3B 00 82  |^.D.:   ..(L);..|
00000960: 11 4E 02 3A 20 20 20 20  99 20 22 20 42 59 45 20  |.N.:    . " BYE |
00000970: 42 59 45 20 52 41 49 4E  42 4F 57 20 45 59 45 53  |BYE RAINBOW EYES|
00000980: 20 22 00 9B 11 53 02 8F  20 4D 45 53 53 41 47 45  | "...S.. MESSAGE|
00000990: 20 56 49 45 57 20 44 45  4C 41 59 00 B4 11 58 02  | VIEW DELAY...X.|
000009A0: 3A 20 20 20 81 20 54 20  B2 20 31 20 A4 20 39 30  |:   . T . 1 . 90|
000009B0: 3A 82 20 54 00 C3 11 62  02 3A 20 99 20 C7 28 31  |:. T...b.: . .(1|
000009C0: 39 29 3B 00 CC 11 6C 02  3A 82 20 43 00 D7 11 76  |9);...l.:. C...v|
000009D0: 02 3A 8C 3A 82 20 52 00  FD 11 7B 02 8F 20 53 43  |.:.:. R...{.. SC|
000009E0: 52 45 45 4E 20 54 4F 20  53 54 41 4E 44 41 52 44  |REEN TO STANDARD|
000009F0: 20 43 4F 4C 4F 55 52 20  26 20 45 4E 44 00 2A 12  | COLOUR & END.*.|
00000A00: 80 02 3A 99 C7 28 31 34  37 29 3B 3A 97 20 35 33  |..:..(147);:. 53|
00000A10: 32 38 30 2C 31 34 3A 97  20 35 33 32 38 31 2C 36  |280,14:. 53281,6|
00000A20: 3A 99 C7 28 31 35 34 29  3A 80 00 3F 12 E3 03 8F  |:..(154):..?....|
00000A30: 20 43 4F 4C 4F 55 52 20  44 49 53 50 4C 41 59 00  | COLOUR DISPLAY.|
00000A40: 59 12 E8 03 3A 99 20 C7  28 31 39 29 3B 3A 43 20  |Y...:. .(19);:C |
00000A50: B2 20 30 3A 53 20 B2 20  30 00 6B 12 F2 03 3A 20  |. 0:S . 0.k...: |
00000A60: 81 20 52 20 B2 20 31 20  A4 20 32 00 7E 12 FC 03  |. R . 1 . 2.~...|
00000A70: 3A 20 20 81 20 42 20 B2  20 31 20 A4 20 38 00 92  |:  . B . 1 . 8..|
00000A80: 12 06 04 3A 20 20 20 81  20 54 20 B2 20 31 20 A4  |...:   . T . 1 .|
00000A90: 20 35 00 B4 12 10 04 3A  20 20 20 20 97 20 31 30  | 5.....:    . 10|
00000AA0: 36 34 AA 53 2C 31 36 30  3A 97 20 35 35 33 33 36  |64.S,160:. 55336|
00000AB0: AA 53 2C 43 00 C5 12 1A  04 3A 20 20 20 20 53 20  |.S,C.....:    S |
00000AC0: B2 20 53 AA 31 00 D1 12  24 04 3A 20 20 20 82 20  |. S.1...$.:   . |
00000AD0: 54 00 E1 12 2E 04 3A 20  20 20 43 20 B2 20 43 AA  |T.....:   C . C.|
00000AE0: 31 00 EC 12 38 04 3A 20  20 82 20 42 00 FC 12 42  |1...8.:  . B...B|
00000AF0: 04 3A 20 20 53 20 B2 20  53 AA 38 30 00 06 13 4C  |.:  S . S.80...L|
00000B00: 04 3A 20 82 20 52 00 1B  13 51 04 8F 20 4E 55 4D  |.: . R...Q.. NUM|
00000B10: 42 45 52 20 43 4F 4C 4F  55 52 53 00 36 13 56 04  |BER COLOURS.6.V.|
00000B20: 3A 99 20 C7 28 31 35 39  29 3B 22 11 11 1D 22 3B  |:. .(159);"...";|
00000B30: 3A 4E 20 B2 20 30 00 48  13 60 04 3A 20 81 20 52  |:N . 0.H.`.: . R|
00000B40: 20 B2 20 31 20 A4 20 32  00 5B 13 6A 04 3A 20 20  | . 1 . 2.[.j.:  |
00000B50: 81 20 42 20 B2 20 31 20  A4 20 38 00 7B 13 74 04  |. B . 1 . 8.{.t.|
00000B60: 3A 20 20 20 99 20 4E 22  1D 1D 22 3B 3A 8B 20 4E  |:   . N"..";:. N|
00000B70: 20 B1 39 20 A7 20 99 22  9D 22 3B 00 8B 13 7E 04  | .9 . .".";...~.|
00000B80: 3A 20 20 20 4E 20 B2 20  4E AA 31 00 96 13 88 04  |:   N . N.1.....|
00000B90: 3A 20 20 82 20 42 00 A5  13 92 04 3A 20 20 99 20  |:  . B.....:  . |
00000BA0: 22 11 11 22 3B 00 AF 13  9C 04 3A 20 82 20 52 00  |"..";.....: . R.|
00000BB0: B6 13 A6 04 3A 8E 00 CE  13 0F 05 8F 20 48 4F 4C  |....:....... HOL|
00000BC0: 44 20 49 4E 53 54 52 55  43 54 49 4F 4E 53 00 EB  |D INSTRUCTIONS..|
00000BD0: 13 14 05 83 31 36 30 2C  31 34 34 2C 31 34 36 2C  |....160,144,146,|
00000BE0: 31 33 33 2C 31 34 37 2C  31 34 37 00 08 14 1E 05  |133,147,147.....|
00000BF0: 83 31 36 30 2C 31 34 37  2C 31 34 34 2C 31 32 39  |.160,147,144,129|
00000C00: 2C 31 33 31 2C 31 33 33  00 29 14 28 05 83 31 36  |,131,133.).(..16|
00000C10: 30 2C 31 33 30 2C 31 32  39 2C 31 34 36 2C 31 36  |0,130,129,146,16|
00000C20: 30 2C 31 34 38 2C 31 34  33 00 46 14 32 05 83 31  |0,148,143.F.2..1|
00000C30: 36 30 2C 31 33 36 2C 31  34 33 2C 31 34 30 2C 31  |60,136,143,140,1|
00000C40: 33 32 2C 31 36 30 00 67  14 3C 05 3A 49 43 20 B2  |32,160.g.<.:IC .|
00000C50: 20 42 41 AA 31 3A 8B 20  42 41 20 B2 20 34 20 A7  | BA.1:. BA . 4 .|
00000C60: 20 49 43 20 B2 20 30 00  7A 14 46 05 3A 20 81 20  | IC . 0.z.F.: . |
00000C70: 54 20 B2 20 30 20 A4 20  32 34 00 85 14 50 05 3A  |T . 0 . 24...P.:|
00000C80: 20 20 87 20 4C 00 A4 14  5A 05 3A 20 20 97 20 31  |  . L...Z.:  . 1|
00000C90: 39 30 34 AA 54 2C 4C 3A  97 20 35 36 31 37 36 AA  |904.T,L:. 56176.|
00000CA0: 54 2C 49 43 00 AE 14 64  05 3A 20 82 20 54 00 B5  |T,IC...d.: . T..|
00000CB0: 14 6E 05 3A 8E 00 D0 14  73 05 8F 20 52 45 53 54  |.n.:....s.. REST|
00000CC0: 41 52 54 20 49 4E 53 54  52 55 43 54 49 4F 4E 53  |ART INSTRUCTIONS|
00000CD0: 00 F2 14 78 05 3A 83 31  36 30 2C 31 34 38 2C 31  |...x.:.160,148,1|
00000CE0: 34 33 2C 31 36 30 2C 31  34 36 2C 31 34 39 2C 31  |43,160,146,149,1|
00000CF0: 34 32 00 10 15 82 05 3A  83 31 36 30 2C 31 34 34  |42.....:.160,144|
00000D00: 2C 31 34 36 2C 31 33 33  2C 31 34 37 2C 31 34 37  |,146,133,147,147|
00000D10: 00 2E 15 8C 05 3A 83 31  36 30 2C 31 34 37 2C 31  |.....:.160,147,1|
00000D20: 34 34 2C 31 32 39 2C 31  33 31 2C 31 33 33 00 48  |44,129,131,133.H|
00000D30: 15 96 05 3A 83 31 36 30  2C 31 33 30 2C 31 32 39  |...:.160,130,129|
00000D40: 2C 31 34 36 2C 31 36 30  00 5B 15 A0 05 3A 20 81  |,146,160.[...: .|
00000D50: 20 54 20 B2 20 30 20 A4  20 32 33 00 66 15 AA 05  | T . 0 . 23.f...|
00000D60: 3A 20 20 87 20 4C 00 85  15 B4 05 3A 20 20 97 20  |:  . L.....:  . |
00000D70: 31 39 30 34 AA 54 2C 4C  3A 97 20 35 36 31 37 36  |1904.T,L:. 56176|
00000D80: AA 54 2C 49 43 00 8F 15  BE 05 3A 20 82 20 54 00  |.T,IC.....: . T.|
00000D90: A5 15 C3 05 8F 20 52 45  53 54 41 52 54 20 43 4F  |..... RESTART CO|
00000DA0: 4D 4D 41 4E 44 00 C1 15  C8 05 3A A1 20 41 24 3A  |MMAND.....:. A$:|
00000DB0: 8B 20 41 24 20 B3 B1 22  20 22 20 A7 20 31 34 38  |. A$ .." " . 148|
00000DC0: 30 00 CC 15 D2 05 3A 89  20 34 33 30 00 00 00     |0.....:. 430... |

..$.... CLEAR SCREEN & TO LOWER CASE.8..
.:.G(147);G(14);.M.... TITLE & CREDIT...
..:.".......";G(18)" COLOUR COMBINATIONS
 SELECTOR ".....:."....CHARLIE PATERSON 
  TORONTO   CANADA "...(.:."......TPUG #
2280..........1983 08 08...-.. INSTRUCTI
ONS.$.2.:.".......TRY YOUR SELECTIONS FR
OM THE 4096".S.<.:."  SCREEN  COLOUR  CO
MBINATIONS  OF THE"...F.:."  C64. ATTRAC
TIVE -- TO -- REPULSIVE."...P.:."  CHOOS
E YOUR PREFERENCES FOR BORDERS,"...Z.." 
 BACKGROUNDS, AND CHARACTERS. MAKE A    
 BLACKHOLE OR AN EYE DAZZLER..+.D.."    
 WHEN A DISPLAY IS ATTRACTIVE, YOU".Y.N.
."  CAN STOP THE PRESET VIEWING TIME AND
"...X.."  HOLD-UNTILL YOU CHOOSE TO CONT
INUE."......".     OK! MASTER COLOUR CO-
ORDINATOR..".....:."          "G(18)G(12
9)" PARTICIPATE "G(30)" ENJOY "G(154)...
... INSTRUCTION DELAY.(...:. TM . 1 . 15
000:. TM.K.... CLEAR SCREEN & TO UPPER C
ASE._. .. G(147);G(142).Q.... COLOUR DAT
A.....:. 144,5,28,159,156,30,31,158.....
:. 129,149,150,151,152,153,154,155......
 COLOUR DISPLAY ROUTINE (995).....:. 100
0...C.. COLOUR REQUESTS.:.H.:. G(18)". P
LEASE TYPE A # FROM 0 TO 15 ONLY .";G(14
6).C.R.:."COLOUR NUMBER FOR BORDER";BO:.
"."....:. BO .0 . BO .15 . 210.....:."C
OLOUR NUMBER FOR BACKGROUND";BA:.".".J..
.:. BA . 0 . BA . 15 . 230.....:."COLOUR
 NUMBER FOR CHARACTERS";CH.....:. CH . O
 . CH . 15 . 250.(.... SET BORDER COLOUR
.:...: . 53280, BO.V.... SET BACKGROUND 
COLOUR.I...:  . 53281, BA...... SET CHAR
ACTER COLOUR...".:. C . 0 . 15...,.: . C
N...6.:. C . CH . CC.CN...@.:. C.N.J.: .
 G(CC)...O.. DISPLAY COLOUR NUMBERS...T.
:.G(147);".";"   COLOURS   ..".;.^.:.G(1
8);"BORDER     =";B(53280) . 15". ".M.H.
:."..";G(18);"BACKGROUND =";B(53281) . 1
5". "...R.:."..";"CHARACTERS =";CH...W..
 HOLD PATERN ROUTINE (1295)...|.: . 1300
...... VIEW TIME FOR EACH COMBINATION...
..:  . X . 1 . 500...... HOLD PATERN SEL
ECT.'...: . A$:. A$ .." " . 420.D.... RE
START ROUTINE (1395).Q...: . 1400.Z...:.
 X.A...:..H...:..S.B.:X . 0...G.. REQUES
T FOR ANOTHER COMBINATION.J.L.:.G(147);G
(154);:. 53280,14:. 53281,6:."..";...V.:
."  DO YOU WANT ANOTHER ONE Y/N";A$.....
: . A$ ."N" . A$ ."Y" . 470.1...: . A$ .
"N". A$ ."Y". 470.G...: . A$ ."N" . 520.
S...: . 160.I.... BYE BYE ROUTINE.....:.
G(147);:. 53280,4:. 53281,3...... REPEAT
 CHARACTER COLOUR CHANGE.A...:. R . 1 . 
6.S...:. C . 0 . 15...!.. MESSAGE POSITI
ONING...&.: . DN . 1 . 10:.".";: . DN300
./.0.:  . RT . 1 . 9:.".";:. RT.C.5.. ME
SSAGE PRINT.O.:.:   . L.^.D.:   .G(L);..
.N.:    . " BYE BYE RAINBOW EYES "...S..
 MESSAGE VIEW DELAY...X.:   . T . 1 . 90
:. T.C.B.: . G(19);.L.L.:. C.W.V.:.:. R.
..{.. SCREEN TO STANDARD COLOUR & END.*.
..:.G(147);:. 53280,14:. 53281,6:.G(154)
:..?.... COLOUR DISPLAY.Y...:. G(19);:C 
. 0:S . 0.K...: . R . 1 . 2.~...:  . B .
 1 . 8.....:   . T . 1 . 5.....:    . 10
64.S,160:. 55336.S,C.E...:    S . S.1.Q.
$.:   . T.....:   C . C.1...8.:  . B...B
.:  S . S.80...L.: . R...Q.. NUMBER COLO
URS.6.V.:. G(159);"...";:N . 0.H.`.: . R
 . 1 . 2.[.J.:  . B . 1 . 8.{.T.:   . N"
..";:. N .9 . .".";...~.:   N . N.1.....
:  . B.....:  . "..";.....: . R.....:..N
.... HOLD INSTRUCTIONS......160,144,146,
133,147,147......160,147,144,129,131,133
.).(..160,130,129,146,160,148,143.F.2..1
60,136,143,140,132,160.G.<.:IC . BA.1:. 
BA . 4 . IC . 0.Z.F.: . T . 0 . 24...P.:
  . L...Z.:  . 1904.T,L:. 56176.T,IC...D
.: . T...N.:..P.S.. RESTART INSTRUCTIONS
...X.:.160,148,143,160,146,149,142.....:
.160,144,146,133,147,147.....:.160,147,1
44,129,131,133.H...:.160,130,129,146,160
.[. .: . T . 0 . 23.F...:  . L.....:  . 
1904.T,L:. 56176.T,IC.....: . T...C.. RE
START COMMAND.A.H.:. A$:. A$ .." " . 148
0.L.R.:. 430...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL