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

TV TIMES PROG

FILE INFORMATION

FILENAME(S): TV TIMES PROG

FILE TYPE(S): PRG

FILE SIZE: 2.7K

FIRST SEEN: 2025-11-30 16:44:26

APPEARS ON: 1 disk(s)

FILE HASH

cc5a534844fed1a58cc8dad68ca9e89e984cb6be58f253dfb377a58065fd19f1

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
DEMO229A TV TIMES PROG PRG High Voltage Complete C64 Collection 23 6 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 0B 08 0A 00 8D 20  39 35 30 00 24 08 0F 00  |....... 950.$...|
00000010: 43 48 B2 31 3A 44 41 B2  31 3A 99 C7 28 38 29 3A  |CH.1:DA.1:..(8):|
00000020: 8D 36 38 30 00 5F 08 1E  00 99 22 93 50 52 4F 47  |.680._....".PROG|
00000030: 52 41 4D 4D 45 53 20 46  4F 52 20 22 3B 44 41 24  |RAMMES FOR ";DA$|
00000040: 28 44 41 29 3B 43 48 24  28 43 48 29 3B 22 20 20  |(DA);CH$(CH);"  |
00000050: 20 20 9D 9D 9D 9D 22 3B  4E 28 44 41 29 AA 31 00  |  ....";N(DA).1.|
00000060: 8F 08 1F 00 99 22 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |....."==========|
00000070: 3D 3D 3D 3D 3D 3D 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |================|
00000080: 3D 3D 3D 3D 3D 3D 3D 3D  3D 3D 3D 3D 3D 3D 22 00  |==============".|
00000090: AE 08 21 00 99 20 22 12  46 31 92 20 54 4F 20 43  |..!.. ".F1. TO C|
000000A0: 48 41 4E 47 45 20 43 48  41 4E 4E 45 4C 22 00 C9  |HANGE CHANNEL"..|
000000B0: 08 22 00 99 20 22 12 46  33 92 20 54 4F 20 43 48  |.".. ".F3. TO CH|
000000C0: 41 4E 47 45 20 44 41 59  22 00 DF 08 23 00 99 20  |ANGE DAY"...#.. |
000000D0: 22 12 46 35 92 20 54 4F  20 50 52 49 4E 54 22 00  |".F5. TO PRINT".|
000000E0: F3 08 24 00 99 20 22 12  46 37 92 20 54 4F 20 45  |..$.. ".F7. TO E|
000000F0: 4E 44 22 00 12 09 28 00  99 22 11 11 53 54 41 52  |ND"...(.."..STAR|
00000100: 54 20 20 54 49 4D 45 3A  20 20 22 3B 3A 8D 20 32  |T  TIME:  ";:. 2|
00000110: 30 30 00 2C 09 2D 00 48  52 B2 48 3A 4D 52 B2 4D  |00.,.-.HR.H:MR.M|
00000120: 3A 52 24 B2 54 24 3A 4D  4D B2 4D 4E 00 4B 09 32  |:R$.T$:MM.MN.K.2|
00000130: 00 99 22 11 11 46 49 4E  49 53 48 20 54 49 4D 45  |.."..FINISH TIME|
00000140: 3A 20 20 22 3B 3A 8D 20  32 30 30 00 5F 09 37 00  |:  ";:. 200._.7.|
00000150: 48 50 B2 48 3A 4D 50 B2  4D 3A 50 24 B2 54 24 00  |HP.H:MP.M:P$.T$.|
00000160: 7E 09 3C 00 99 22 11 11  44 55 52 41 54 49 4F 4E  |~.<.."..DURATION|
00000170: 3A 20 20 20 20 20 22 3B  3A 8D 20 33 30 30 00 9D  |:     ";:. 300..|
00000180: 09 46 00 99 22 11 11 50  52 4F 47 52 41 4D 4D 45  |.F.."..PROGRAMME|
00000190: 3A 20 20 20 20 22 3B 3A  8D 20 35 34 30 00 BB 09  |:    ";:. 540...|
000001A0: 50 00 99 22 11 11 43 4F  52 52 45 43 54 20 28 59  |P.."..CORRECT (Y|
000001B0: 2F 4E 29 20 22 3B 3A 8D  35 35 30 00 CC 09 5A 00  |/N) ";:.550...Z.|
000001C0: 8B 20 41 24 B2 22 4E 22  20 89 33 30 00 DA 09 5B  |. A$."N" .30...[|
000001D0: 00 49 B2 4E 28 44 41 29  AA 31 00 1E 0A 5C 00 50  |.I.N(DA).1...\.P|
000001E0: 52 24 28 49 2C 44 41 29  B2 42 24 3A 52 52 24 28  |R$(I,DA).B$:RR$(|
000001F0: 49 2C 44 41 29 B2 52 24  3A 50 50 24 28 49 2C 44  |I,DA).R$:PP$(I,D|
00000200: 41 29 B2 50 24 3A 4D 4E  28 49 2C 44 41 29 B2 4D  |A).P$:MN(I,DA).M|
00000210: 4D 3A 44 55 24 28 49 2C  44 41 29 B2 44 24 00 41  |M:DU$(I,DA).D$.A|
00000220: 0A 5F 00 5A 28 49 2C 44  41 29 B2 43 48 3A 4E 28  |._.Z(I,DA).CH:N(|
00000230: 44 41 29 B2 4E 28 44 41  29 AA 31 3A 54 B2 54 AA  |DA).N(DA).1:T.T.|
00000240: 31 00 52 0A 64 00 8B 54  B1 B2 31 34 30 89 20 31  |1.R.d..T..140. 1|
00000250: 31 30 00 5B 0A 69 00 89  20 33 30 00 73 0A 6E 00  |10.[.i.. 30.s.n.|
00000260: 81 49 B2 31 A4 37 3A 8B  4E 28 49 29 B2 30 89 20  |.I.1.7:.N(I).0. |
00000270: 31 39 30 00 81 0A 73 00  54 50 B2 4E 28 49 29 AA  |190...s.TP.N(I).|
00000280: 31 00 8D 0A 78 00 81 4A  B2 31 A4 54 50 00 A3 0A  |1...x..J.1.TP...|
00000290: 7C 00 50 B2 4A 3A 8B 5A  28 4A 2C 49 29 B2 30 89  ||.P.J:.Z(J,I).0.|
000002A0: 31 38 35 00 BD 0A 7D 00  81 4B B2 31 A4 54 50 3A  |185...}..K.1.TP:|
000002B0: 8B 5A 28 4B 2C 49 29 B2  30 89 31 33 35 00 D7 0A  |.Z(K,I).0.135...|
000002C0: 82 00 8B 20 4D 4E 28 4B  2C 49 29 B3 4D 4E 28 50  |... MN(K,I).MN(P|
000002D0: 2C 49 29 A7 50 B2 4B 00  DE 0A 87 00 82 4B 00 26  |,I).P.K......K.&|
000002E0: 0B 8C 00 98 34 2C 44 41  24 28 49 29 22 20 20 22  |....4,DA$(I)"  "|
000002F0: 52 52 24 28 50 2C 49 29  22 20 20 22 50 50 24 28  |RR$(P,I)"  "PP$(|
00000300: 50 2C 49 29 22 20 20 22  5A 28 50 2C 49 29 22 20  |P,I)"  "Z(P,I)" |
00000310: 20 22 44 55 24 28 50 2C  49 29 22 20 20 22 50 52  | "DU$(P,I)"  "PR|
00000320: 24 28 50 2C 49 29 00 33  0B 96 00 5A 28 50 2C 49  |$(P,I).3...Z(P,I|
00000330: 29 B2 30 00 43 0B A0 00  8B 20 4A B3 B1 4B A7 89  |).0.C.... J..K..|
00000340: 31 32 34 00 4A 0B B9 00  82 4A 00 51 0B BE 00 82  |124.J....J.Q....|
00000350: 49 00 57 0B C7 00 8A 00  72 0B C8 00 8D 39 30 32  |I.W.....r....902|
00000360: 3A 48 54 24 B2 41 24 3A  54 24 B2 41 24 3A 48 54  |:HT$.A$:T$.A$:HT|
00000370: B2 41 00 89 0B D2 00 8B  20 48 54 B3 32 A7 8D 39  |.A...... HT.2..9|
00000380: 30 39 3A 48 55 24 B2 41  24 00 A0 0B D7 00 8B 20  |09:HU$.A$...... |
00000390: 48 54 B2 32 A7 8D 39 30  33 3A 48 55 24 B2 41 24  |HT.2..903:HU$.A$|
000003A0: 00 C1 0B DA 00 48 B2 31  30 AC 48 54 AA 41 3A 54  |.....H.10.HT.A:T|
000003B0: 24 B2 54 24 AA 41 24 AA  22 3A 22 3A 99 22 3A 22  |$.T$.A$.":":.":"|
000003C0: 3B 00 DF 0B DC 00 8D 39  30 35 3A 4D 54 24 B2 41  |;......905:MT$.A|
000003D0: 24 3A 4D 54 B2 41 3A 54  24 B2 54 24 AA 41 24 00  |$:MT.A:T$.T$.A$.|
000003E0: 02 0C E6 00 8D 39 30 39  3A 4D 55 24 B2 41 24 3A  |.....909:MU$.A$:|
000003F0: 4D B2 4D 54 AC 31 30 AA  41 3A 54 24 B2 54 24 AA  |M.MT.10.A:T$.T$.|
00000400: 41 24 00 12 0C F0 00 99  3A 4D 4E B2 48 AC 36 30  |A$......:MN.H.60|
00000410: AA 4D 00 18 0C 2B 01 8E  00 2C 0C 2C 01 8B 48 50  |.M...+...,.,..HP|
00000420: B3 48 52 A7 48 50 B2 48  50 AA 32 34 00 4B 0C 36  |.HR.HP.HP.24.K.6|
00000430: 01 8B 20 28 48 50 B2 48  52 29 AF 28 4D 50 B3 4D  |.. (HP.HR).(MP.M|
00000440: 52 29 A7 48 50 B2 48 50  AA 32 34 00 61 0C 40 01  |R).HP.HP.24.a.@.|
00000450: 48 44 B2 48 50 AB 48 52  3A 4D 44 B2 4D 50 AB 4D  |HD.HP.HR:MD.MP.M|
00000460: 52 00 7D 0C 4A 01 8B 20  4D 44 B3 30 A7 4D 44 B2  |R.}.J.. MD.0.MD.|
00000470: 4D 44 AA 36 30 3A 48 44  B2 48 44 AB 31 00 87 0C  |MD.60:HD.HD.1...|
00000480: 54 01 44 24 B2 22 22 00  9A 0C 5E 01 44 44 28 31  |T.D$.""...^.DD(1|
00000490: 29 B2 B5 28 48 44 AD 31  30 29 00 B0 0C 68 01 44  |)..(HD.10)...h.D|
000004A0: 44 28 32 29 B2 48 44 AB  31 30 AC 44 44 28 31 29  |D(2).HD.10.DD(1)|
000004B0: 00 C4 0C 72 01 44 44 28  33 29 B2 C6 28 22 3A 22  |...r.DD(3)..(":"|
000004C0: 29 AB 34 38 00 D7 0C 7C  01 44 44 28 34 29 B2 B5  |).48...|.DD(4)..|
000004D0: 28 4D 44 AD 31 30 29 00  ED 0C 86 01 44 44 28 35  |(MD.10).....DD(5|
000004E0: 29 B2 4D 44 AB 31 30 AC  44 44 28 34 29 00 0E 0D  |).MD.10.DD(4)...|
000004F0: 90 01 81 49 49 B2 31 A4  35 3A 44 24 B2 44 24 AA  |...II.1.5:D$.D$.|
00000500: C7 28 34 38 AA 44 44 28  49 49 29 29 3A 82 00 19  |.(48.DD(II)):...|
00000510: 0D 9A 01 99 20 44 24 3A  8E 00 30 0D F4 01 43 48  |.... D$:..0...CH|
00000520: B2 43 48 AA 31 3A 8B 43  48 B1 34 A7 43 48 B2 31  |.CH.1:.CH.4.CH.1|
00000530: 00 3C 0D F5 01 8D 20 35  31 37 3A 8E 00 53 0D FE  |.<.... 517:..S..|
00000540: 01 44 41 B2 44 41 AA 31  3A 8B 44 41 B1 37 A7 44  |.DA.DA.1:.DA.7.D|
00000550: 41 B2 31 00 6B 0D FF 01  8B 20 4E 28 44 41 29 B1  |A.1.k.... N(DA).|
00000560: B2 32 30 A7 44 41 B2 44  41 AA 31 00 77 0D 00 02  |.20.DA.DA.1.w...|
00000570: 8D 20 35 31 37 3A 8E 00  A3 0D 05 02 52 4C B2 C2  |. 517:......RL..|
00000580: 28 32 30 39 29 3A 52 55  B2 C2 28 32 31 30 29 3A  |(209):RU..(210):|
00000590: 43 4F B2 C2 28 32 31 31  29 3A 52 57 B2 C2 28 32  |CO..(211):RW..(2|
000005A0: 31 34 29 00 DE 0D 06 02  99 22 13 1D 1D 1D 1D 1D  |14)......"......|
000005B0: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 22 3B 44 41 24 28  |..........";DA$(|
000005C0: 44 41 29 3B 43 48 24 28  43 48 29 3B 22 20 20 20  |DA);CH$(CH);"   |
000005D0: 20 9D 9D 9D 9D 22 3B 4E  28 44 41 29 AA 31 00 04  | ....";N(DA).1..|
000005E0: 0E 07 02 97 32 30 39 2C  52 4C 3A 97 32 31 30 2C  |....209,RL:.210,|
000005F0: 52 55 3A 97 32 31 31 2C  43 4F 3A 97 32 31 34 2C  |RU:.211,CO:.214,|
00000600: 52 57 3A 8E 00 0C 0E 08  02 A1 41 24 00 23 0E 09  |RW:.......A$.#..|
00000610: 02 8B 41 24 B2 22 85 22  A7 8D 35 30 30 3A 89 20  |..A$."."..500:. |
00000620: 35 32 30 00 3A 0E 0A 02  8B 41 24 B2 22 86 22 A7  |520.:....A$.".".|
00000630: 8D 35 31 30 3A 89 20 35  32 30 00 4B 0E 0B 02 8B  |.510:. 520.K....|
00000640: 41 24 B2 22 87 22 A7 89  31 31 30 00 5E 0E 0C 02  |A$."."..110.^...|
00000650: 8B 41 24 B2 22 88 22 A7  99 22 93 22 3A A2 00 64  |.A$."."..".":..d|
00000660: 0E 0D 02 8E 00 81 0E 10  02 8D 35 32 30 3A 99 22  |..........520:."|
00000670: 12 3F 92 9D 22 3B 3A 8B  41 24 B2 22 22 89 35 32  |.?..";:.A$."".52|
00000680: 38 00 87 0E 11 02 8E 00  A9 0E 12 02 8D 35 32 38  |8............528|
00000690: 3A 8B 41 24 B3 47 4C 24  B0 41 24 B1 47 55 24 A7  |:.A$.GL$.A$.GU$.|
000006A0: 8D 36 39 30 3A 89 35 33  30 00 C1 0E 16 02 99 41  |.690:.530......A|
000006B0: 24 3B 3A 8D 36 38 30 3A  41 B2 C5 28 41 24 29 3A  |$;:.680:A..(A$):|
000006C0: 8E 00 D0 0E 1C 02 42 24  B2 22 22 3A 42 42 B2 30  |......B$."":BB.0|
000006D0: 00 EA 0E 1D 02 8D 35 32  38 3A 8B 41 24 B2 C7 28  |......528:.A$..(|
000006E0: 31 33 29 A7 99 22 20 22  3A 8E 00 16 0F 1F 02 8B  |13).." ":.......|
000006F0: 41 24 B2 C7 28 32 30 29  AF 42 42 B1 30 A7 42 42  |A$..(20).BB.0.BB|
00000700: B2 42 42 AB 31 3A 42 24  B2 C8 28 42 24 2C 42 42  |.BB.1:B$..(B$,BB|
00000710: 29 3A 89 35 34 36 00 3D  0F 20 02 8B 41 24 B3 C7  |):.546.=. ..A$..|
00000720: 28 33 32 29 B0 41 24 B1  C7 28 39 35 29 A7 8D 36  |(32).A$..(95)..6|
00000730: 39 30 3A 41 24 B2 22 22  3A 89 35 34 31 00 52 0F  |90:A$."":.541.R.|
00000740: 21 02 42 24 B2 42 24 AA  41 24 3A 42 42 B2 42 42  |!.B$.B$.A$:BB.BB|
00000750: AA 31 00 6E 0F 22 02 99  41 24 3B 3A 8D 20 36 38  |.1.n."..A$;:. 68|
00000760: 30 3A 8B 20 42 42 B3 B2  32 35 89 35 34 31 00 76  |0:. BB..25.541.v|
00000770: 0F 23 02 99 3A 8E 00 9A  0F 26 02 8D 35 32 38 3A  |.#..:....&..528:|
00000780: 8B 41 24 B3 B1 22 59 22  AF 41 24 B3 B1 22 4E 22  |.A$.."Y".A$.."N"|
00000790: A7 8D 36 39 30 3A 89 35  35 30 00 A5 0F 28 02 8D  |..690:.550...(..|
000007A0: 36 38 30 3A 8E 00 BD 0F  A8 02 97 53 41 2C 30 3A  |680:.......SA,0:|
000007B0: 97 53 53 2C 32 34 30 3A  97 53 56 2C 35 00 D6 0F  |.SS,240:.SV,5...|
000007C0: A9 02 97 53 4C 2C 33 30  3A 97 53 48 2C 32 35 3A  |...SL,30:.SH,25:|
000007D0: 97 53 47 2C 33 33 00 EB  0F AA 02 8D 36 39 36 3A  |.SG,33......696:|
000007E0: 97 53 47 2C 33 32 3A 89  36 39 39 00 04 10 B2 02  |.SG,32:.699.....|
000007F0: 97 53 41 2C 30 3A 97 53  53 2C 32 34 30 3A 97 53  |.SA,0:.SS,240:.S|
00000800: 56 2C 31 35 00 17 10 B3  02 97 53 4C 2C 32 31 38  |V,15......SL,218|
00000810: 3A 97 53 48 2C 31 31 00  2E 10 B4 02 97 53 47 2C  |:.SH,11......SG,|
00000820: 33 33 3A 8D 36 39 35 3A  97 53 47 2C 33 32 00 45  |33:.695:.SG,32.E|
00000830: 10 B5 02 8D 36 39 35 3A  97 53 4C 2C 39 37 20 3A  |....695:.SL,97 :|
00000840: 97 53 48 2C 38 00 61 10  B6 02 97 53 47 2C 33 33  |.SH,8.a....SG,33|
00000850: 3A 8D 36 39 35 3A 97 53  47 2C 33 32 3A 89 36 39  |:.695:.SG,32:.69|
00000860: 39 00 72 10 B7 02 81 44  4C B2 31 A4 32 35 3A 82  |9.r....DL.1.25:.|
00000870: 3A 8E 00 83 10 B8 02 81  44 4C B2 31 A4 31 30 3A  |:.......DL.1.10:|
00000880: 82 3A 8E 00 8F 10 BB 02  97 53 56 2C 30 3A 8E 00  |.:.......SV,0:..|
00000890: AA 10 86 03 47 4C 24 B2  22 30 22 3A 47 55 24 B2  |....GL$."0":GU$.|
000008A0: 22 32 22 3A 8D 35 33 30  3A 8E 00 C5 10 87 03 47  |"2":.530:......G|
000008B0: 4C 24 B2 22 30 22 3A 47  55 24 B2 22 33 22 3A 8D  |L$."0":GU$."3":.|
000008C0: 35 33 30 3A 8E 00 E0 10  89 03 47 4C 24 B2 22 30  |530:......GL$."0|
000008D0: 22 3A 47 55 24 B2 22 35  22 3A 8D 35 33 30 3A 8E  |":GU$."5":.530:.|
000008E0: 00 FB 10 8D 03 47 4C 24  B2 22 30 22 3A 47 55 24  |.....GL$."0":GU$|
000008F0: B2 22 39 22 3A 8D 35 33  30 3A 8E 00 1A 11 B6 03  |."9":.530:......|
00000900: 53 41 B2 35 34 32 37 37  3A 53 53 B2 35 34 32 37  |SA.54277:SS.5427|
00000910: 38 3A 53 56 B2 35 34 32  39 36 00 39 11 B7 03 53  |8:SV.54296.9...S|
00000920: 4C B2 35 34 32 37 32 3A  53 48 B2 35 34 32 37 33  |L.54272:SH.54273|
00000930: 3A 53 47 B2 35 34 32 37  36 00 50 11 B8 03 81 49  |:SG.54276.P....I|
00000940: B2 53 4C A4 53 4C AA 32  34 3A 97 49 2C 30 3A 82  |.SL.SL.24:.I,0:.|
00000950: 00 94 11 B9 03 86 20 50  52 24 28 32 30 2C 37 29  |...... PR$(20,7)|
00000960: 2C 44 55 24 28 32 30 2C  37 29 2C 50 50 24 28 32  |,DU$(20,7),PP$(2|
00000970: 30 2C 37 29 2C 52 52 24  28 32 30 2C 37 29 2C 5A  |0,7),RR$(20,7),Z|
00000980: 28 32 30 2C 37 29 2C 4E  28 37 29 2C 4D 4E 28 32  |(20,7),N(7),MN(2|
00000990: 30 2C 37 29 00 9F 11 C0  03 9F 34 2C 34 2C 30 00  |0,7)......4,4,0.|
000009A0: B7 11 C1 03 44 41 24 28  31 29 B2 22 53 41 54 55  |....DA$(1)."SATU|
000009B0: 52 44 41 59 20 20 22 00  CF 11 C2 03 44 41 24 28  |RDAY  ".....DA$(|
000009C0: 32 29 B2 22 53 55 4E 44  41 59 20 20 20 20 22 00  |2)."SUNDAY    ".|
000009D0: E7 11 C3 03 44 41 24 28  33 29 B2 22 4D 4F 4E 44  |....DA$(3)."MOND|
000009E0: 41 59 20 20 20 20 22 00  FF 11 C4 03 44 41 24 28  |AY    ".....DA$(|
000009F0: 34 29 B2 22 54 55 45 53  44 41 59 20 20 20 22 00  |4)."TUESDAY   ".|
00000A00: 17 12 C5 03 44 41 24 28  35 29 B2 22 57 45 44 4E  |....DA$(5)."WEDN|
00000A10: 45 53 44 41 59 20 22 00  2F 12 C6 03 44 41 24 28  |ESDAY "./...DA$(|
00000A20: 36 29 B2 22 54 48 55 52  53 44 41 59 20 20 22 00  |6)."THURSDAY  ".|
00000A30: 47 12 C7 03 44 41 24 28  37 29 B2 22 46 52 49 44  |G...DA$(7)."FRID|
00000A40: 41 59 20 20 20 20 22 00  5F 12 CB 03 43 48 24 28  |AY    "._...CH$(|
00000A50: 31 29 B2 22 42 42 43 31  20 20 20 20 20 20 22 00  |1)."BBC1      ".|
00000A60: 77 12 CC 03 43 48 24 28  32 29 B2 22 42 42 43 32  |w...CH$(2)."BBC2|
00000A70: 20 20 20 20 20 20 22 00  8F 12 CD 03 43 48 24 28  |      ".....CH$(|
00000A80: 33 29 B2 22 49 54 56 20  20 20 20 20 20 20 22 00  |3)."ITV       ".|
00000A90: A7 12 CE 03 43 48 24 28  34 29 B2 22 43 48 41 4E  |....CH$(4)."CHAN|
00000AA0: 4E 45 4C 20 34 20 22 00  AD 12 CF 03 8E 00 00 00  |NEL 4 ".........|
....... 950.$...CH.1:DA.1:.G(8):.680._..
..".PROGRAMMES FOR ";DA$(DA);CH$(CH);"  
  ....";N(DA).1......"==================
======================"...!.. ".F1. TO C
HANGE CHANNEL".I.".. ".F3. TO CHANGE DAY
"...#.. ".F5. TO PRINT"...$.. ".F7. TO E
ND"...(.."..START  TIME:  ";:. 200.,.-.H
R.H:MR.M:R$.T$:MM.MN.K.2.."..FINISH TIME
:  ";:. 200._.7.HP.H:MP.M:P$.T$.~.<.."..
DURATION:     ";:. 300...F.."..PROGRAMME
:    ";:. 540...P.."..CORRECT (Y/N) ";:.
550.L.Z.. A$."N" .30.Z.[.I.N(DA).1...\.P
R$(I,DA).B$:RR$(I,DA).R$:PP$(I,DA).P$:MN
(I,DA).MM:DU$(I,DA).D$.A._.Z(I,DA).CH:N(
DA).N(DA).1:T.T.1.R.D..T..140. 110.[.I..
 30.S.N..I.1.7:.N(I).0. 190...S.TP.N(I).
1...X..J.1.TP...|.P.J:.Z(J,I).0.185...}.
.K.1.TP:.Z(K,I).0.135.W.... MN(K,I).MN(P
,I).P.K......K.&....4,DA$(I)"  "RR$(P,I)
"  "PP$(P,I)"  "Z(P,I)"  "DU$(P,I)"  "PR
$(P,I).3...Z(P,I).0.C. .. J..K..124.J...
.J.Q....I.W.G...R.H..902:HT$.A$:T$.A$:HT
.A...R.. HT.2..909:HU$.A$. .W.. HT.2..90
3:HU$.A$.A.Z.H.10.HT.A:T$.T$.A$.":":.":"
;......905:MT$.A$:MT.A:T$.T$.A$......909
:MU$.A$:M.MT.10.A:T$.T$.A$......:MN.H.60
.M...+...,.,..HP.HR.HP.HP.24.K.6.. (HP.H
R).(MP.MR).HP.HP.24.A.@.HD.HP.HR:MD.MP.M
R.}.J.. MD.0.MD.MD.60:HD.HD.1...T.D$."".
..^.DD(1)..(HD.10)...H.DD(2).HD.10.DD(1)
.D.R.DD(3).F(":").48.W.|.DD(4)..(MD.10).
....DD(5).MD.10.DD(4)......II.1.5:D$.D$.
G(48.DD(II)):....... D$:..0...CH.CH.1:.C
H.4.CH.1.<.... 517:..S...DA.DA.1:.DA.7.D
A.1.K.... N(DA)..20.DA.DA.1.W.... 517:..
....RL.B(209):RU.B(210):CO.B(211):RW.B(2
14)......"................";DA$(DA);CH$(
CH);"    ....";N(DA).1......209,RL:.210,
RU:.211,CO:.214,RW:.......A$.#....A$."."
..500:. 520.:....A$."."..510:. 520.K....
A$."."..110.^....A$."."..".":..D........
..520:.".?..";:.A$."".528............528
:.A$.GL$.A$.GU$..690:.530.A....A$;:.680:
A.E(A$):..P...B$."":BB.0......528:.A$.G(
13).." ":.......A$.G(20).BB.0.BB.BB.1:B$
.H(B$,BB):.546.=. ..A$.G(32).A$.G(95)..6
90:A$."":.541.R.!.B$.B$.A$:BB.BB.1.N."..
A$;:. 680:. BB..25.541.V.#..:....&..528:
.A$.."Y".A$.."N"..690:.550...(..680:....
...SA,0:.SS,240:.SV,5.V....SL,30:.SH,25:
.SG,33......696:.SG,32:.699......SA,0:.S
S,240:.SV,15......SL,218:.SH,11......SG,
33:.695:.SG,32.E....695:.SL,97 :.SH,8.A.
...SG,33:.695:.SG,32:.699.R....DL.1.25:.
:.......DL.1.10:.:.......SV,0:......GL$.
"0":GU$."2":.530:..E...GL$."0":GU$."3":.
530:......GL$."0":GU$."5":.530:......GL$
."0":GU$."9":.530:......SA.54277:SS.5427
8:SV.54296.9...SL.54272:SH.54273:SG.5427
6.P....I.SL.SL.24:.I,0:....... PR$(20,7)
,DU$(20,7),PP$(20,7),RR$(20,7),Z(20,7),N
(7),MN(20,7)......4,4,0...A.DA$(1)."SATU
RDAY  ".O.B.DA$(2)."SUNDAY    "...C.DA$(
3)."MONDAY    "...D.DA$(4)."TUESDAY   ".
..E.DA$(5)."WEDNESDAY "./.F.DA$(6)."THUR
SDAY  ".G.G.DA$(7)."FRIDAY    "._.K.CH$(
1)."BBC1      ".W.L.CH$(2)."BBC2      ".
..M.CH$(3)."ITV       "...N.CH$(4)."CHAN
NEL 4 "...O.....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL