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

DIARY DISC

FILE INFORMATION

FILENAME(S): DIARY DISC

FILE TYPE(S): PRG

FILE SIZE: 9.5K

FIRST SEEN: 2025-12-02 00:01:57

APPEARS ON: 2 disk(s)

FILE HASH

377bb76be65e3e85dc4d59244f332bfd56f2db4ed4625a0022ff180edf4bf6a1

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
DE GROOT DIARY DISC PRG earthshaker 13 12 DOWNLOAD FILE
DE GROOT DIARY DISC PRG earthshaker 20 16 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 3F 08 05 00 8F 20  2A 20 44 49 41 52 59 20  |..?.... * DIARY |
00000010: 4D 41 4E 41 47 45 52 20  2A 20 42 59 20 42 45 52  |MANAGER * BY BER|
00000020: 4E 41 52 44 20 48 41 42  45 54 20 28 43 29 20 31  |NARD HABET (C) 1|
00000030: 39 38 33 20 41 42 52 41  53 43 4F 20 4C 54 44 00  |983 ABRASCO LTD.|
00000040: 8F 08 46 00 99 22 93 22  3A 97 35 33 32 38 30 2C  |..F..".":.53280,|
00000050: 36 3A 48 4F 24 B2 22 C8  41 4E 47 2D 4F 4E 20 57  |6:HO$.".ANG-ON W|
00000060: 48 49 4C 45 20 53 45 41  52 43 48 49 4E 47 22 3A  |HILE SEARCHING":|
00000070: 48 56 24 B2 22 C8 41 56  45 20 46 4F 55 4E 44 20  |HV$.".AVE FOUND |
00000080: 54 48 45 20 46 4F 4C 4C  4F 57 49 4E 47 3A 22 00  |THE FOLLOWING:".|
00000090: A3 08 50 00 97 35 33 32  37 32 2C 32 33 3A 99 C7  |..P..53272,23:..|
000000A0: 28 38 29 00 F4 08 5A 00  45 4E B2 30 3A 50 45 24  |(8)...Z.EN.0:PE$|
000000B0: B2 22 93 D0 4C 45 41 53  45 20 45 4E 54 45 52 20  |."..LEASE ENTER |
000000C0: 54 48 45 20 46 4F 4C 4C  4F 57 49 4E 47 20 49 4E  |THE FOLLOWING IN|
000000D0: 46 4F 52 4D 41 54 49 4F  4E 3A 22 3A 86 4D 4F 24  |FORMATION:":.MO$|
000000E0: 28 31 32 29 2C 54 54 24  28 34 29 2C 54 52 24 28  |(12),TT$(4),TR$(|
000000F0: 34 35 35 29 00 3C 09 69  00 81 4E B2 31 A4 34 3A  |455).<.i..N.1.4:|
00000100: 87 54 54 24 28 4E 29 3A  82 3A 81 4E B2 31 A4 31  |.TT$(N):.:.N.1.1|
00000110: 32 3A 87 4D 4F 24 28 4E  29 3A 82 3A 53 50 24 B2  |2:.MO$(N):.:SP$.|
00000120: 22 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |"               |
00000130: 20 20 20 20 20 20 20 20  20 20 20 22 00 8E 09 6E  |           "...n|
00000140: 00 43 4F 24 B2 22 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |.CO$."..........|
00000150: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |................|
00000160: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 22 3A 4C  |.............":L|
00000170: 4E 24 B2 22 11 11 11 11  11 11 11 11 11 11 11 11  |N$."............|
00000180: 11 11 11 11 11 11 11 11  11 11 11 11 11 22 00 D3  |............."..|
00000190: 09 78 00 99 22 93 22 3B  3A 8D 33 35 35 30 30 3A  |.x..".";:.35500:|
000001A0: 99 22 12 81 20 20 20 20  20 20 C4 A0 C9 A0 C1 A0  |."..      ......|
000001B0: D2 A0 D9 A0 A0 A0 CD A0  C1 A0 CE A0 C1 A0 C7 A0  |................|
000001C0: C5 A0 D2 A0 A0 A0 A0 A0  A0 92 9A 22 3A 8D 33 35  |...........":.35|
000001D0: 35 30 30 00 17 0A 82 00  99 A3 38 29 22 11 11 12  |500.......8)"...|
000001E0: 81 20 D0 52 45 53 53 20  92 9A 20 CF 50 54 49 4F  |. .RESS .. .PTIO|
000001F0: 4E 20 CE 55 4D 42 45 52  3A 22 3A 99 A3 38 29 22  |N .UMBER:":..8)"|
00000200: 11 11 11 81 12 20 31 20  9A 92 20 CE 45 57 20 45  |..... 1 .. .EW E|
00000210: 4E 54 52 49 45 53 22 00  55 0A 8C 00 99 A3 38 29  |NTRIES".U.....8)|
00000220: 22 11 81 12 20 32 20 9A  92 20 C4 45 4C 45 54 49  |"... 2 .. .ELETI|
00000230: 4F 4E 53 22 3A 99 A3 38  29 22 11 12 81 20 33 20  |ONS":..8)"... 3 |
00000240: 9A 92 20 D3 45 41 52 43  48 20 26 20 D2 45 54 52  |.. .EARCH & .ETR|
00000250: 49 45 56 45 22 00 94 0A  96 00 99 A3 38 29 22 11  |IEVE".......8)".|
00000260: 81 12 20 34 20 9A 92 20  D0 52 49 4E 54 20 44 45  |.. 4 .. .RINT DE|
00000270: 54 41 49 4C 53 22 3A 99  A3 38 29 22 11 81 12 20  |TAILS":..8)"... |
00000280: 35 20 9A 92 20 CC 4F 41  44 2F D3 41 56 45 20 44  |5 .. .OAD/.AVE D|
00000290: 41 54 41 22 00 B0 0A A0  00 99 A3 38 29 22 11 81  |ATA".......8)"..|
000002A0: 12 20 36 20 9A 92 20 D3  49 47 4E 2D 4F 46 46 22  |. 6 .. .IGN-OFF"|
000002B0: 00 E2 0A B4 00 8D 31 34  36 30 30 3A 91 C5 28 41  |......14600:..(A|
000002C0: 24 29 89 33 30 30 2C 39  30 30 2C 31 37 30 30 2C  |$).300,900,1700,|
000002D0: 32 35 30 30 2C 31 31 30  30 2C 31 38 35 3A 89 31  |2500,1100,185:.1|
000002E0: 38 30 00 F6 0A B9 00 8D  39 30 30 30 3A 8B 50 36  |80......9000:.P6|
000002F0: B2 32 A7 31 32 30 00 34  0B BE 00 99 22 93 11 22  |.2.120.4....".."|
00000300: A3 39 29 22 4F 4B 2C 20  4E 4F 57 20 53 49 47 4E  |.9)"OK, NOW SIGN|
00000310: 49 4E 47 2D 4F 46 46 22  3A 97 35 33 32 38 30 2C  |ING-OFF":.53280,|
00000320: 31 34 3A 99 C7 28 39 29  3A 97 35 33 32 37 32 2C  |14:..(9):.53272,|
00000330: 32 31 3A 80 00 47 0B 2C  01 8B 59 52 24 B2 22 22  |21:..G.,..YR$.""|
00000340: A7 8D 32 36 31 30 30 00  57 0B 2F 01 8B 45 4E B3  |..26100.W./..EN.|
00000350: 34 35 35 A7 33 31 30 00  9B 0B 31 01 99 22 93 D3  |455.310...1.."..|
00000360: 4F 52 52 59 2C 20 4E 4F  20 4D 4F 52 45 20 52 4F  |ORRY, NO MORE RO|
00000370: 4F 4D 20 49 4E 20 4D 45  4D 4F 52 59 22 3A 99 22  |OM IN MEMORY":."|
00000380: 11 12 C8 49 54 20 41 4E  59 20 4B 45 59 92 22 3A  |...IT ANY KEY.":|
00000390: 8D 31 34 36 30 30 3A 89  31 32 30 00 DD 0B 36 01  |.14600:.120...6.|
000003A0: 99 22 93 11 11 11 22 A3  39 29 22 CE A0 C5 A0 D7  |."....".9)".....|
000003B0: A0 A0 A0 C5 A0 CE A0 D4  A0 D2 A0 C9 A0 C5 A0 D3  |................|
000003C0: 22 3A 99 A3 39 29 22 A3  A3 A3 A3 A3 A3 A3 A3 A3  |":..9)".........|
000003D0: A3 A3 A3 A3 A3 A3 A3 A3  A3 A3 A3 A3 22 00 1B 0C  |............"...|
000003E0: 40 01 99 A3 39 29 22 11  12 20 31 20 92 20 C4 41  |@...9)".. 1 . .A|
000003F0: 54 45 53 20 54 4F 20 52  45 4D 45 4D 42 45 52 22  |TES TO REMEMBER"|
00000400: 3A 99 A3 39 29 22 11 12  20 32 20 92 20 C4 41 49  |:..9)".. 2 . .AI|
00000410: 4C 59 20 45 4E 54 52 49  45 53 22 00 5D 0C 54 01  |LY ENTRIES".].T.|
00000420: 99 A3 39 29 22 11 12 20  33 20 92 20 C2 41 43 4B  |..9)".. 3 . .ACK|
00000430: 20 54 4F 20 4D 41 49 4E  20 4D 45 4E 55 22 3A 99  | TO MAIN MENU":.|
00000440: A3 39 29 22 11 11 12 20  D0 52 45 53 53 20 4F 50  |.9)"... .RESS OP|
00000450: 54 49 4F 4E 20 4E 55 4D  42 45 52 20 22 00 80 0C  |TION NUMBER "...|
00000460: 68 01 8D 31 34 36 30 30  3A 91 C5 28 41 24 29 89  |h..14600:..(A$).|
00000470: 35 35 30 2C 33 38 30 2C  31 32 30 3A 89 33 36 30  |550,380,120:.360|
00000480: 00 C6 0C 7C 01 99 50 45  24 3A 99 22 11 11 C4 41  |...|..PE$:."...A|
00000490: 54 45 20 12 C4 C4 CD CD  92 3A 20 20 22 3B 3A 50  |TE ......:  ";:P|
000004A0: 33 B2 34 3A 8D 32 39 35  30 30 3A 99 22 11 11 C8  |3.4:.29500:."...|
000004B0: 4F 55 52 20 12 C8 C8 CD  CD 92 3A 20 20 22 3B 3A  |OUR ......:  ";:|
000004C0: 8D 32 39 35 30 30 00 04  0D 86 01 99 22 11 11 CE  |.29500......"...|
000004D0: 41 4D 45 20 20 20 20 20  3A 20 20 22 3B 3A 50 33  |AME     :  ";:P3|
000004E0: B2 32 35 3A 8D 32 39 35  30 30 3A 99 22 11 11 C5  |.25:.29500:."...|
000004F0: 56 45 4E 54 20 20 20 20  3A 20 20 22 3B 3A 8D 32  |VENT    :  ";:.2|
00000500: 39 35 30 30 00 3D 0D 90  01 4C 4E B2 34 3A 8D 32  |9500.=...LN.4:.2|
00000510: 39 38 30 30 3A 99 A3 31  31 29 3B 3A 50 33 B2 34  |9800:..11);:P3.4|
00000520: 3A 50 34 B2 34 3A 8D 33  30 30 30 30 3A 8D 32 35  |:P4.4:.30000:.25|
00000530: 30 30 30 3A 8B 50 36 B2  31 A7 34 30 30 00 55 0D  |000:.P6.1.400.U.|
00000540: 9F 01 44 54 24 B2 C9 28  50 24 2C 32 29 AA C8 28  |..DT$..(P$,2)..(|
00000550: 50 24 2C 32 29 00 8F 0D  A4 01 99 22 11 11 22 A3  |P$,2)......"..".|
00000560: 31 31 29 3B 3A 50 33 B2  34 3A 50 34 B2 30 3A 8D  |11);:P3.4:P4.0:.|
00000570: 33 30 30 30 30 3A 8D 32  35 32 30 30 3A 8B 50 36  |30000:.25200:.P6|
00000580: B2 31 A7 99 22 91 91 91  91 22 3A 89 34 32 30 00  |.1.."....":.420.|
00000590: 9A 0D AE 01 48 52 24 B2  50 24 00 C6 0D B8 01 99  |....HR$.P$......|
000005A0: 22 11 11 22 A3 31 31 29  3B 3A 50 33 B2 32 35 3A  |"..".11);:P3.25:|
000005B0: 50 34 B2 30 3A 8D 33 30  30 30 30 3A 8B 50 24 B2  |P4.0:.30000:.P$.|
000005C0: 22 22 A7 34 35 30 00 E4  0D BD 01 8D 32 34 30 30  |"".450......2400|
000005D0: 30 3A 8B 50 36 B2 31 A7  99 22 91 91 91 91 22 3A  |0:.P6.1.."....":|
000005E0: 89 34 34 30 00 EF 0D C2  01 4E 41 24 B2 50 24 00  |.440.....NA$.P$.|
000005F0: 2A 0E CC 01 99 22 11 11  22 A3 31 31 29 3B 3A 50  |*...."..".11);:P|
00000600: 33 B2 32 35 3A 50 34 B2  31 3A 8D 33 30 30 30 30  |3.25:P4.1:.30000|
00000610: 3A 8D 32 34 30 30 30 3A  8B 50 36 B2 31 A7 99 22  |:.24000:.P6.1.."|
00000620: 91 91 91 91 22 3A 89 34  36 30 00 59 0E E0 01 45  |....":.460.Y...E|
00000630: 56 24 B2 50 24 3A 99 22  11 11 11 11 1D 1D 1D 1D  |V$.P$:."........|
00000640: C1 43 43 45 50 54 22 3B  3A 8D 32 36 30 30 30 3A  |.CCEPT";:.26000:|
00000650: 8B 50 36 B2 32 A7 33 38  30 00 A2 0E F4 01 99 22  |.P6.2.380......"|
00000660: 93 C8 41 4E 47 2D 4F 4E  20 57 48 49 4C 45 20 50  |..ANG-ON WHILE P|
00000670: 4F 53 54 49 4E 47 22 3A  4E B2 45 4E 3A 54 52 24  |OSTING":N.EN:TR$|
00000680: 28 4E 29 B2 44 54 24 AA  22 31 22 AA 48 52 24 AA  |(N).DT$."1".HR$.|
00000690: 4E 41 24 AA 22 2A 22 AA  45 56 24 3A 8D 32 37 30  |NA$."*".EV$:.270|
000006A0: 30 30 00 D1 0E FE 01 99  22 11 11 CF 4B 2C 20 41  |00......"...K, A|
000006B0: 4E 59 20 4F 54 48 45 52  20 45 4E 54 52 59 22 3B  |NY OTHER ENTRY";|
000006C0: 3A 8D 32 36 30 30 30 3A  8B 50 36 B2 31 A7 33 38  |:.26000:.P6.1.38|
000006D0: 30 00 DA 0E 08 02 89 33  31 30 00 24 0F 26 02 99  |0......310.$.&..|
000006E0: 50 45 24 3A 99 22 11 11  C4 41 54 45 20 12 C4 C4  |PE$:."...ATE ...|
000006F0: CD CD 92 3A 20 20 22 3B  3A 50 33 B2 34 3A 8D 32  |...:  ";:P3.4:.2|
00000700: 39 35 30 30 3A 99 22 11  11 CE 41 4D 45 20 20 20  |9500:."...AME   |
00000710: 20 20 3A 20 20 22 3B 3A  50 33 B2 32 35 3A 8D 32  |  :  ";:P3.25:.2|
00000720: 39 35 30 30 00 6E 0F 30  02 99 22 11 11 C5 56 45  |9500.n.0.."...VE|
00000730: 4E 54 20 20 20 20 3A 20  20 31 2E 20 22 54 54 24  |NT    :  1. "TT$|
00000740: 28 31 29 22 20 20 20 32  2E 20 22 54 54 24 28 32  |(1)"   2. "TT$(2|
00000750: 29 3A 99 A3 31 32 29 22  33 2E 20 22 54 54 24 28  |):..12)"3. "TT$(|
00000760: 33 29 22 20 34 2E 20 22  54 54 24 28 34 29 00 A7  |3)" 4. "TT$(4)..|
00000770: 0F 62 02 4C 4E B2 34 3A  8D 32 39 38 30 30 3A 99  |.b.LN.4:.29800:.|
00000780: A3 31 31 29 3B 3A 50 33  B2 34 3A 50 34 B2 34 3A  |.11);:P3.4:P4.4:|
00000790: 8D 33 30 30 30 30 3A 8D  32 35 30 30 30 3A 8B 50  |.30000:.25000:.P|
000007A0: 36 B2 31 A7 36 31 30 00  BF 0F 69 02 44 54 24 B2  |6.1.610...i.DT$.|
000007B0: C9 28 50 24 2C 32 29 AA  C8 28 50 24 2C 32 29 00  |.(P$,2)..(P$,2).|
000007C0: FA 0F 6C 02 99 22 11 11  22 A3 31 31 29 3B 3A 50  |..l.."..".11);:P|
000007D0: 33 B2 32 35 3A 50 34 B2  31 3A 8D 33 30 30 30 30  |3.25:P4.1:.30000|
000007E0: 3A 8D 32 34 30 30 30 3A  8B 50 36 B2 31 A7 99 22  |:.24000:.P6.1.."|
000007F0: 91 91 91 22 3B 3A 89 36  32 30 00 11 10 74 02 4E  |...";:.620...t.N|
00000800: 41 24 B2 50 24 3A 99 A3  31 31 29 22 11 11 3E 22  |A$.P$:..11)"..>"|
00000810: 3B 00 2C 10 76 02 A1 41  24 3A 8B 41 24 B3 22 31  |;.,.v..A$:.A$."1|
00000820: 22 B0 41 24 B1 22 34 22  A7 36 33 30 00 52 10 79  |".A$."4".630.R.y|
00000830: 02 99 53 50 24 3A 99 A3  31 31 29 53 50 24 3A 99  |..SP$:..11)SP$:.|
00000840: 22 91 91 22 3B 3A 8B 41  24 B3 B1 22 34 22 A7 36  |"..";:.A$.."4".6|
00000850: 34 30 00 87 10 7B 02 50  33 B2 32 35 3A 50 34 B2  |40...{.P3.25:P4.|
00000860: 31 3A 99 A3 31 31 29 3B  3A 8D 33 30 30 30 30 3A  |1:..11);:.30000:|
00000870: 8D 32 34 30 30 30 3A 8B  50 36 B2 31 A7 99 22 91  |.24000:.P6.1..".|
00000880: 22 3B 3A 89 36 33 35 00  96 10 7D 02 41 24 B2 50  |";:.635...}.A$.P|
00000890: 24 3A 89 36 35 30 00 B4  10 80 02 99 A3 31 32 29  |$:.650.......12)|
000008A0: 54 54 24 28 C5 28 41 24  29 29 3A 99 A3 31 31 29  |TT$(.(A$)):..11)|
000008B0: 22 91 20 22 00 E2 10 8A  02 45 56 24 B2 41 24 3A  |". ".....EV$.A$:|
000008C0: 99 22 11 11 11 1D 1D 1D  1D C1 43 43 45 50 54 22  |."........CCEPT"|
000008D0: 3B 3A 8D 32 36 30 30 30  3A 8B 50 36 B2 32 A7 35  |;:.26000:.P6.2.5|
000008E0: 35 30 00 27 11 DA 02 99  22 93 C8 41 4E 47 2D 4F  |50.'...."..ANG-O|
000008F0: 4E 20 57 48 49 4C 45 20  50 4F 53 54 49 4E 47 22  |N WHILE POSTING"|
00000900: 3A 4E B2 45 4E 3A 54 52  24 28 4E 29 B2 44 54 24  |:N.EN:TR$(N).DT$|
00000910: AA 22 32 22 AA 4E 41 24  AA 22 2A 22 AA 45 56 24  |."2".NA$."*".EV$|
00000920: 3A 8D 32 34 30 35 30 00  56 11 E4 02 99 22 11 11  |:.24050.V...."..|
00000930: CF 4B 2C 20 41 4E 59 20  4F 54 48 45 52 20 45 4E  |.K, ANY OTHER EN|
00000940: 54 52 59 22 3B 3A 8D 32  36 30 30 30 3A 8B 50 36  |TRY";:.26000:.P6|
00000950: B2 31 A7 35 35 30 00 5F  11 F8 02 89 33 31 30 00  |.1.550._....310.|
00000960: A8 11 84 03 8B 54 52 24  28 30 29 B2 22 22 A7 99  |.....TR$(0).""..|
00000970: 22 93 D4 48 45 52 45 20  41 52 45 20 4E 4F 20 45  |"..HERE ARE NO E|
00000980: 4E 54 52 49 45 53 20 59  45 54 22 3A 99 22 11 C8  |NTRIES YET":."..|
00000990: 49 54 20 41 4E 59 20 4B  45 59 22 3B 3A 8D 31 34  |IT ANY KEY";:.14|
000009A0: 36 30 30 3A 89 31 32 30  00 BC 11 87 03 8D 39 30  |600:.120......90|
000009B0: 30 30 3A 8B 50 36 B2 32  A7 31 32 30 00 CF 11 89  |00:.P6.2.120....|
000009C0: 03 8B 59 52 24 B2 22 22  A7 8D 32 36 31 30 30 00  |..YR$.""..26100.|
000009D0: 0B 12 8E 03 99 22 93 22  A3 37 29 22 2A 2A 20 C4  |.....".".7)"** .|
000009E0: A0 C5 A0 CC A0 C5 A0 D4  A0 C9 A0 CF A0 CE A0 D3  |................|
000009F0: 20 2A 2A 22 3A 99 22 11  11 22 3B 3A 8D 31 34 37  | **":."..";:.147|
00000A00: 35 30 3A 99 22 11 11 22  48 4F 24 00 2E 12 A2 03  |50:.".."HO$.....|
00000A10: 5A 54 24 B2 44 54 24 3A  58 58 B2 34 3A 8D 32 37  |ZT$.DT$:XX.4:.27|
00000A20: 31 30 30 3A 8B 50 37 B2  32 A7 31 30 35 35 00 3F  |100:.P7.2.1055.?|
00000A30: 12 AC 03 8B 5A 54 B3 5A  42 A7 5A 42 B2 5A 54 00  |....ZT.ZB.ZB.ZT.|
00000A40: 48 12 B6 03 4E B2 5A 42  00 7D 12 C0 03 99 22 93  |H...N.ZB.}....".|
00000A50: C5 4E 54 52 59 20 4E 4F  20 22 4E AA 31 3A 99 22  |.NTRY NO "N.1:."|
00000A60: A3 A3 A3 A3 A3 A3 A3 A3  A3 A3 A3 A3 22 3A 99 3A  |............":.:|
00000A70: 8D 32 37 36 30 30 3A 8D  32 37 37 30 30 00 C5 12  |.27600:.27700...|
00000A80: CA 03 4C 4E B2 32 30 3A  43 4F B2 31 3A 8D 32 39  |..LN.20:CO.1:.29|
00000A90: 38 30 30 3A 99 22 12 D0  52 45 53 53 3A 92 20 12  |800:."..RESS:. .|
00000AA0: C4 92 20 D4 4F 20 44 45  4C 45 54 45 22 3A 99 A3  |.. .O DELETE":..|
00000AB0: 37 29 22 12 2B 92 20 D4  4F 20 47 4F 20 46 4F 52  |7)".+. .O GO FOR|
00000AC0: 57 41 52 44 22 00 E3 12  D4 03 99 A3 37 29 22 12  |WARD".......7)".|
00000AD0: CD 92 20 D4 4F 20 45 58  49 54 20 54 4F 20 4D 45  |.. .O EXIT TO ME|
00000AE0: 4E 55 22 00 FB 12 DE 03  8D 31 34 36 30 30 3A 8B  |NU"......14600:.|
00000AF0: 41 24 B2 22 44 22 A7 31  30 31 30 00 1C 13 E8 03  |A$."D".1010.....|
00000B00: 8B 41 24 B2 22 2B 22 AF  4E AA 31 B3 B2 45 4E AB  |.A$."+".N.1..EN.|
00000B10: 31 A7 4E B2 4E AA 31 3A  89 39 36 30 00 2C 13 ED  |1.N.N.1:.960.,..|
00000B20: 03 8B 41 24 B2 22 4D 22  A7 31 32 30 00 35 13 EF  |..A$."M".120.5..|
00000B30: 03 89 39 39 30 00 59 13  F2 03 99 22 93 C8 41 4E  |..990.Y...."..AN|
00000B40: 47 2D 4F 4E 20 57 48 49  4C 45 20 44 45 4C 45 54  |G-ON WHILE DELET|
00000B50: 49 4E 47 22 3A 50 4F B2  4E 00 89 13 FC 03 81 4E  |ING":PO.N......N|
00000B60: B2 50 4F A4 45 4E AB 31  3A 54 52 24 28 4E 29 B2  |.PO.EN.1:TR$(N).|
00000B70: 54 52 24 28 4E AA 31 29  3A 82 3A 45 4E B2 45 4E  |TR$(N.1):.:EN.EN|
00000B80: AB 31 3A 99 22 11 CF 4B  22 00 B6 13 06 04 99 22  |.1:."..K"......"|
00000B90: 11 C1 4E 59 20 4F 54 48  45 52 20 44 45 4C 45 54  |..NY OTHER DELET|
00000BA0: 49 4F 4E 22 3B 3A 8D 32  36 30 30 30 3A 8B 50 36  |ION";:.26000:.P6|
00000BB0: B2 31 A7 39 31 30 00 BF  13 10 04 89 31 32 30 00  |.1.910......120.|
00000BC0: F3 13 1F 04 99 22 11 C8  41 56 45 20 4E 4F 54 20  |....."..AVE NOT |
00000BD0: 46 4F 55 4E 44 20 41 4E  59 20 45 4E 54 52 59 20  |FOUND ANY ENTRY |
00000BE0: 4F 4E 20 54 48 49 53 20  44 41 54 45 22 3A 89 31  |ON THIS DATE":.1|
00000BF0: 30 33 30 00 07 14 4C 04  8D 39 30 30 30 3A 8B 50  |030...L..9000:.P|
00000C00: 36 B2 32 A7 31 32 30 00  3A 14 51 04 99 22 93 11  |6.2.120.:.Q.."..|
00000C10: 11 11 11 11 11 11 11 11  11 C4 4F 20 59 4F 55 20  |..........O YOU |
00000C20: 57 49 53 48 20 54 4F 20  12 CC 92 4F 41 44 20 4F  |WISH TO ...OAD O|
00000C30: 52 20 12 D3 92 41 56 45  3F 22 00 58 14 56 04 A1  |R ...AVE?".X.V..|
00000C40: 41 24 3A 8B 41 24 B3 B1  22 4C 22 AF 41 24 B3 B1  |A$:.A$.."L".A$..|
00000C50: 22 53 22 A7 31 31 31 30  00 69 14 60 04 8B 41 24  |"S".1110.i.`..A$|
00000C60: B2 22 4C 22 A7 31 33 35  30 00 AB 14 B0 04 99 22  |."L".1350......"|
00000C70: 93 C5 4E 54 45 52 20 4E  41 4D 45 20 4F 46 20 46  |..NTER NAME OF F|
00000C80: 49 4C 45 20 54 4F 20 42  45 20 53 41 56 45 44 22  |ILE TO BE SAVED"|
00000C90: 3A 99 22 11 CD 41 58 20  12 31 36 92 20 43 48 41  |:."..AX .16. CHA|
00000CA0: 52 41 43 54 45 52 53 3A  22 3B 3A 00 C9 14 C4 04  |RACTERS:";:.....|
00000CB0: 50 33 B2 31 36 3A 50 34  B2 31 3A 8D 33 30 30 30  |P3.16:P4.1:.3000|
00000CC0: 30 3A 46 24 B2 50 24 3A  99 00 F7 14 C9 04 99 22  |0:F$.P$:......."|
00000CD0: 11 12 CC 4F 41 44 92 20  59 4F 55 52 20 44 49 53  |...OAD. YOUR DIS|
00000CE0: 43 20 54 48 45 4E 20 12  C8 49 54 92 20 41 4E 59  |C THEN ..IT. ANY|
00000CF0: 20 4B 45 59 22 3A 99 00  19 15 1A 05 8D 31 34 36  | KEY":.......146|
00000D00: 30 30 3A 9F 33 2C 38 2C  31 2C 46 24 3A 98 33 2C  |00:.3,8,1,F$:.3,|
00000D10: 59 52 24 3A 98 33 2C 45  4E 00 3B 15 1B 05 81 4E  |YR$:.3,EN.;....N|
00000D20: B2 30 A4 45 4E AB 31 3A  98 33 2C 54 52 24 28 4E  |.0.EN.1:.3,TR$(N|
00000D30: 29 3A 82 3A A0 33 3A 89  31 32 30 00 83 15 46 05  |):.:.3:.120...F.|
00000D40: 99 22 93 C4 4F 20 59 4F  55 20 57 49 53 48 20 54  |."..O YOU WISH T|
00000D50: 4F 20 4C 4F 41 44 20 49  4D 50 4F 52 54 41 4E 54  |O LOAD IMPORTANT|
00000D60: 20 44 41 54 45 53 22 3A  99 22 4F 4E 4C 59 20 22  | DATES":."ONLY "|
00000D70: 3B 3A 8D 32 36 30 30 30  3A 8B 50 36 B2 32 A7 31  |;:.26000:.P6.2.1|
00000D80: 34 30 30 00 8F 15 4B 05  99 22 20 D9 45 53 22 00  |400...K.." .ES".|
00000D90: D8 15 50 05 99 22 11 D0  4C 45 41 53 45 20 45 4E  |..P.."..LEASE EN|
00000DA0: 54 45 52 20 4E 41 4D 45  20 4F 46 20 46 49 4C 45  |TER NAME OF FILE|
00000DB0: 20 54 4F 20 42 45 20 4C  4F 41 44 45 44 22 3A 99  | TO BE LOADED":.|
00000DC0: 22 11 CD 41 58 20 12 31  36 92 20 43 48 41 52 41  |"..AX .16. CHARA|
00000DD0: 43 54 45 52 53 20 22 3B  00 EE 15 5A 05 50 33 B2  |CTERS ";...Z.P3.|
00000DE0: 31 36 3A 50 34 B2 31 3A  8D 33 30 30 30 30 00 29  |16:P4.1:.30000.)|
00000DF0: 16 5B 05 99 22 11 D0 4C  45 41 53 45 20 12 CC 4F  |.[.."..LEASE ..O|
00000E00: 41 44 92 20 59 4F 55 52  20 44 49 53 43 20 54 48  |AD. YOUR DISC TH|
00000E10: 45 4E 20 12 C8 49 54 92  20 41 4E 59 20 4B 45 59  |EN ..IT. ANY KEY|
00000E20: 11 22 3A 8D 31 34 36 30  30 00 58 16 64 05 9F 33  |.":.14600.X.d..3|
00000E30: 2C 38 2C 30 2C 50 24 3A  84 33 2C 59 52 24 3A 84  |,8,0,P$:.3,YR$:.|
00000E40: 33 2C 45 4E 3A 4D B2 30  3A 81 4E B2 30 A4 45 4E  |3,EN:M.0:.N.0.EN|
00000E50: AB 31 3A 84 33 2C 41 24  00 7B 16 69 05 8B CA 28  |.1:.3,A$.{.i...(|
00000E60: 41 24 2C 35 2C 31 29 B2  22 32 22 A7 54 52 24 28  |A$,5,1)."2".TR$(|
00000E70: 4D 29 B2 41 24 3A 4D B2  4D AA 31 00 96 16 6E 05  |M).A$:M.M.1...n.|
00000E80: 82 4E 3A A0 33 3A 45 4E  B2 4D 3A 59 52 24 B2 22  |.N:.3:EN.M:YR$."|
00000E90: 22 3A 89 31 32 30 00 DF  16 78 05 99 22 93 D0 4C  |":.120...x.."..L|
00000EA0: 45 41 53 45 20 45 4E 54  45 52 20 4E 41 4D 45 20  |EASE ENTER NAME |
00000EB0: 4F 46 20 46 49 4C 45 20  54 4F 20 42 45 20 4C 4F  |OF FILE TO BE LO|
00000EC0: 41 44 45 44 22 3A 99 22  11 CD 41 58 20 12 31 36  |ADED":."..AX .16|
00000ED0: 92 20 43 48 41 52 41 43  54 45 52 53 20 22 3B 00  |. CHARACTERS ";.|
00000EE0: 1A 17 82 05 99 22 11 D0  4C 45 41 53 45 20 12 CC  |....."..LEASE ..|
00000EF0: 4F 41 44 92 20 59 4F 55  52 20 44 49 53 43 20 54  |OAD. YOUR DISC T|
00000F00: 48 45 4E 20 12 C8 49 54  92 20 41 4E 59 20 4B 45  |HEN ..IT. ANY KE|
00000F10: 59 11 22 3A 8D 31 34 36  30 30 00 35 17 CD 05 9F  |Y.":.14600.5....|
00000F20: 33 2C 38 2C 30 2C 50 24  3A 84 33 2C 59 52 24 3A  |3,8,0,P$:.3,YR$:|
00000F30: 84 33 2C 45 4E 00 57 17  D2 05 81 4E B2 30 A4 45  |.3,EN.W....N.0.E|
00000F40: 4E AB 31 3A 84 33 2C 54  52 24 28 4E 29 3A 82 3A  |N.1:.3,TR$(N):.:|
00000F50: A0 33 3A 89 31 32 30 00  6A 17 A4 06 8B 59 52 24  |.3:.120.j....YR$|
00000F60: B2 22 22 A7 8D 32 36 31  30 30 00 A5 17 EA 06 99  |.""..26100......|
00000F70: 22 93 11 11 22 A3 31 31  29 22 D3 C5 C1 D2 C3 C8  |"...".11)"......|
00000F80: A0 26 A0 D2 C5 D4 D2 C9  C5 D6 C5 22 3A 99 A3 31  |.&.........":..1|
00000F90: 31 29 22 A3 A3 A3 A3 A3  A3 A3 A3 A3 A3 A3 A3 A3  |1)".............|
00000FA0: A3 A3 A3 A3 22 00 EC 17  F4 06 99 A3 37 29 22 11  |....".......7)".|
00000FB0: 12 20 31 20 92 20 C4 41  54 45 53 20 54 4F 20 52  |. 1 . .ATES TO R|
00000FC0: 45 4D 45 4D 42 45 52 22  3A 99 A3 37 29 22 11 12  |EMEMBER":..7)"..|
00000FD0: 20 32 20 92 20 C2 52 4F  57 53 45 20 54 48 52 4F  | 2 . .ROWSE THRO|
00000FE0: 55 47 48 20 45 4E 54 52  49 45 53 22 00 32 18 08  |UGH ENTRIES".2..|
00000FF0: 07 99 A3 37 29 22 11 12  20 33 20 92 20 D3 54 41  |...7)".. 3 . .TA|
00001000: 54 45 4D 45 4E 54 20 20  4F 46 20 20 45 4E 54 52  |TEMENT  OF  ENTR|
00001010: 49 45 53 22 3A 99 A3 37  29 22 11 12 20 34 20 92  |IES":..7)".. 4 .|
00001020: 20 D3 45 41 52 43 48 20  20 42 59 20 20 4E 41 4D  | .EARCH  BY  NAM|
00001030: 45 22 00 76 18 0D 07 99  A3 37 29 22 11 12 20 35  |E".v.....7)".. 5|
00001040: 20 92 20 C2 41 43 4B 20  20 54 4F 20 20 4D 41 49  | . .ACK  TO  MAI|
00001050: 4E 20 20 4D 45 4E 55 22  3A 99 A3 31 31 29 22 11  |N  MENU":..11)".|
00001060: 11 12 D0 52 45 53 53 20  4F 50 54 49 4F 4E 20 4E  |...RESS OPTION N|
00001070: 55 4D 42 45 52 22 00 A6  18 26 07 8D 31 34 36 30  |UMBER"...&..1460|
00001080: 30 3A 91 C5 28 41 24 29  89 31 38 35 30 2C 32 31  |0:..(A$).1850,21|
00001090: 32 30 2C 32 33 30 30 2C  32 37 30 30 2C 31 32 30  |20,2300,2700,120|
000010A0: 3A 89 31 38 33 30 00 F0  18 3A 07 8B 54 52 24 28  |:.1830...:..TR$(|
000010B0: 30 29 B2 22 22 A7 99 22  93 D4 48 45 52 45 20 41  |0)."".."..HERE A|
000010C0: 52 45 20 4E 4F 20 45 4E  54 52 49 45 53 20 59 45  |RE NO ENTRIES YE|
000010D0: 54 22 3A 99 22 11 C8 49  54 20 41 4E 59 20 4B 45  |T":."..IT ANY KE|
000010E0: 59 22 3B 3A 8D 31 34 36  30 30 3A 89 31 37 37 30  |Y";:.14600:.1770|
000010F0: 00 21 19 44 07 99 22 93  C5 4E 54 45 52 20 4D 4F  |.!.D.."..NTER MO|
00001100: 4E 54 48 20 52 45 51 55  49 52 45 44 3A 20 22 3B  |NTH REQUIRED: ";|
00001110: 3A 50 33 B2 32 3A 50 34  B2 31 3A 8D 33 30 30 30  |:P3.2:P4.1:.3000|
00001120: 30 00 3C 19 49 07 8B C5  28 50 24 29 B3 31 B0 C5  |0.<.I...(P$).1..|
00001130: 28 50 24 29 B1 31 32 A7  31 38 36 30 00 5B 19 4B  |(P$).12.1860.[.K|
00001140: 07 99 22 11 22 48 4F 24  3A 8B C3 28 50 24 29 B2  |.."."HO$:..(P$).|
00001150: 31 A7 50 24 B2 22 30 22  AA 50 24 00 A2 19 4E 07  |1.P$."0".P$...N.|
00001160: 5A 54 24 B2 50 24 3A 58  58 B2 32 3A 8D 32 37 31  |ZT$.P$:XX.2:.271|
00001170: 30 30 3A 8B 50 37 B2 32  A7 99 22 11 D4 48 45 52  |00:.P7.2.."..HER|
00001180: 45 20 41 52 45 20 4E 4F  20 45 4E 54 52 49 45 53  |E ARE NO ENTRIES|
00001190: 20 54 48 49 53 20 4D 4F  4E 54 48 22 3A 89 31 39  | THIS MONTH":.19|
000011A0: 34 30 00 AB 19 53 07 4D  B2 5A 42 00 F1 19 58 07  |40...S.M.ZB...X.|
000011B0: 99 22 93 C4 41 54 45 53  20 54 4F 20 52 45 4D 45  |."..ATES TO REME|
000011C0: 4D 42 45 52 20 49 4E 20  22 4D 4F 24 28 C5 28 50  |MBER IN "MO$(.(P|
000011D0: 24 29 29 22 20 31 39 22  59 52 24 3A 99 3A 81 4E  |$))" 19"YR$:.:.N|
000011E0: B2 4D A4 4D AA 39 3A 8B  4E B1 5A 54 A7 31 39 34  |.M.M.9:.N.ZT.194|
000011F0: 30 00 16 1A 76 07 8B CA  28 54 52 24 28 4E 29 2C  |0...v...(TR$(N),|
00001200: 35 2C 31 29 B2 22 32 22  A7 8D 32 37 36 30 30 3A  |5,1)."2"..27600:|
00001210: 8D 32 34 31 30 30 00 4C  1A 80 07 82 4E 3A 99 22  |.24100.L....N:."|
00001220: 11 12 C8 49 54 20 41 4E  59 20 4B 45 59 20 54 4F  |...IT ANY KEY TO|
00001230: 20 43 4F 4E 54 49 4E 55  45 92 22 3A 8D 31 34 36  | CONTINUE.":.146|
00001240: 30 30 3A 4D B2 4E 3A 89  31 38 38 30 00 71 1A 94  |00:M.N:.1880.q..|
00001250: 07 99 22 11 C1 4E 59 20  4F 54 48 45 52 22 3B 3A  |.."..NY OTHER";:|
00001260: 8D 32 36 30 30 30 3A 8B  50 36 B2 31 A7 31 38 36  |.26000:.P6.1.186|
00001270: 30 00 7B 1A 9E 07 89 31  37 37 30 00 C5 1A 48 08  |0.{....1770...H.|
00001280: 8B 54 52 24 28 30 29 B2  22 22 A7 99 22 93 D4 48  |.TR$(0)."".."..H|
00001290: 45 52 45 20 41 52 45 20  4E 4F 20 45 4E 54 52 49  |ERE ARE NO ENTRI|
000012A0: 45 53 20 59 45 54 22 3A  99 22 11 C8 49 54 20 41  |ES YET":."..IT A|
000012B0: 4E 59 20 4B 45 59 22 3B  3A 8D 31 34 36 30 30 3A  |NY KEY";:.14600:|
000012C0: 89 31 37 37 30 00 FD 1A  4D 08 99 22 93 C2 52 4F  |.1770...M.."..RO|
000012D0: 57 53 49 4E 47 20 53 54  41 52 54 53 20 4F 4E 2F  |WSING STARTS ON/|
000012E0: 42 45 46 4F 52 45 20 44  41 54 45 20 45 4E 54 45  |BEFORE DATE ENTE|
000012F0: 52 45 44 22 3A 99 3A 8D  31 34 37 35 30 00 20 1B  |RED":.:.14750. .|
00001300: 52 08 5A 54 24 B2 44 54  24 3A 58 58 B2 34 3A 8D  |R.ZT$.DT$:XX.4:.|
00001310: 32 37 31 30 30 3A 8B 50  37 B2 32 A7 32 32 34 30  |27100:.P7.2.2240|
00001320: 00 31 1B 57 08 8B 5A 42  B3 5A 54 A7 5A 54 B2 5A  |.1.W..ZB.ZT.ZT.Z|
00001330: 42 00 40 1B 5C 08 4E B2  5A 54 3A 50 4F B2 5A 54  |B.@.\.N.ZT:PO.ZT|
00001340: 00 75 1B 66 08 99 22 93  C5 4E 54 52 59 20 CE 4F  |.u.f.."..NTRY .O|
00001350: 20 22 3B 4E AA 31 3A 99  22 A3 A3 A3 A3 A3 A3 A3  | ";N.1:.".......|
00001360: A3 A3 A3 A3 22 3A 99 3A  8D 32 37 36 30 30 3A 8D  |....":.:.27600:.|
00001370: 32 37 37 30 30 00 B0 1B  70 08 4C 4E B2 32 30 3A  |27700...p.LN.20:|
00001380: 43 4F B2 31 3A 8D 32 39  38 30 30 3A 99 22 12 D0  |CO.1:.29800:."..|
00001390: 52 45 53 53 3A 92 20 12  2B 92 20 C6 4F 52 20 42  |RESS:. .+. .OR B|
000013A0: 52 4F 57 53 49 4E 47 20  46 4F 52 57 41 52 44 22  |ROWSING FORWARD"|
000013B0: 00 E6 1B 7A 08 99 A3 37  29 22 12 2D 92 20 C6 4F  |...z...7)".-. .O|
000013C0: 52 20 42 52 4F 57 53 49  4E 47 20 42 41 43 4B 57  |R BROWSING BACKW|
000013D0: 41 52 44 22 3A 99 A3 37  29 22 12 53 92 20 D4 4F  |ARD":..7)".S. .O|
000013E0: 20 53 54 4F 50 22 00 0C  1C 84 08 A1 41 24 3A 8B  | STOP"......A$:.|
000013F0: 41 24 B3 B1 22 2B 22 AF  41 24 B3 B1 22 2D 22 AF  |A$.."+".A$.."-".|
00001400: 41 24 B3 B1 22 53 22 A7  32 31 38 30 00 1D 1C 8E  |A$.."S".2180....|
00001410: 08 8B 41 24 B2 22 2B 22  A7 32 32 32 30 00 2E 1C  |..A$."+".2220...|
00001420: 98 08 8B 41 24 B2 22 2D  22 A7 32 32 33 30 00 38  |...A$."-".2230.8|
00001430: 1C A2 08 89 31 37 37 30  00 53 1C AC 08 8B 4E AA  |....1770.S....N.|
00001440: 31 B3 B2 45 4E AB 31 A7  4E B2 4E AA 31 3A 89 32  |1..EN.1.N.N.1:.2|
00001450: 31 35 30 00 5D 1C B1 08  89 32 31 38 30 00 75 1C  |150.]....2180.u.|
00001460: B6 08 8B 4E AB 31 B1 B2  30 A7 4E B2 4E AB 31 3A  |...N.1..0.N.N.1:|
00001470: 89 32 31 35 30 00 7F 1C  BB 08 89 32 31 38 30 00  |.2150......2180.|
00001480: 8E 1C C0 08 4E B2 5A 4D  3A 89 32 31 35 30 00 D7  |....N.ZM:.2150..|
00001490: 1C FC 08 8B 54 52 24 28  30 29 B2 22 22 A7 99 22  |....TR$(0)."".."|
000014A0: 93 D4 48 45 52 45 20 41  52 45 20 4E 4F 20 45 4E  |..HERE ARE NO EN|
000014B0: 54 52 49 45 53 20 59 45  54 22 3A 99 22 11 C8 49  |TRIES YET":."..I|
000014C0: 54 20 41 4E 59 20 4B 45  59 22 3A 8D 31 34 36 30  |T ANY KEY":.1460|
000014D0: 30 3A 89 31 37 37 30 00  0F 1D FF 08 99 22 93 D3  |0:.1770......"..|
000014E0: 54 41 54 45 4D 45 4E 54  20 57 49 4C 4C 20 53 54  |TATEMENT WILL ST|
000014F0: 41 52 54 20 46 52 4F 4D  20 44 41 54 45 20 45 4E  |ART FROM DATE EN|
00001500: 54 45 52 45 44 22 3A 99  3A 8D 31 34 37 35 30 00  |TERED":.:.14750.|
00001510: 33 1D 01 09 8B 44 54 24  B1 C8 28 54 52 24 28 45  |3....DT$..(TR$(E|
00001520: 4E AB 31 29 2C 34 29 A7  50 53 B2 45 4E 3A 89 32  |N.1),4).PS.EN:.2|
00001530: 33 31 37 00 54 1D 03 09  8B 44 54 24 B3 B2 C8 28  |317.T....DT$...(|
00001540: 54 52 24 28 30 29 2C 34  29 A7 50 53 B2 30 3A 89  |TR$(0),4).PS.0:.|
00001550: 32 33 31 37 00 7E 1D 06  09 5A 54 24 B2 44 54 24  |2317.~...ZT$.DT$|
00001560: 3A 58 58 B2 34 3A 8D 32  37 31 30 30 3A 8B 50 37  |:XX.4:.27100:.P7|
00001570: B2 32 A7 50 53 B2 5A 42  3A 89 32 33 31 37 00 8F  |.2.PS.ZB:.2317..|
00001580: 1D 08 09 8B 5A 42 B3 5A  54 A7 5A 54 B2 5A 42 00  |....ZB.ZT.ZT.ZB.|
00001590: 99 1D 0B 09 50 53 B2 5A  54 00 C7 1D 0D 09 44 54  |....PS.ZT.....DT|
000015A0: 24 B2 C9 28 44 54 24 2C  32 29 AA 22 20 22 AA 4D  |$..(DT$,2)." ".M|
000015B0: 4F 24 28 C5 28 C8 28 44  54 24 2C 32 29 29 29 3A  |O$(.(.(DT$,2))):|
000015C0: 8B 46 50 B2 31 A7 8E 00  FA 1D 10 09 99 22 93 C5  |.FP.1........"..|
000015D0: 4E 54 52 49 45 53 20 53  54 41 52 54 49 4E 47 20  |NTRIES STARTING |
000015E0: 22 44 54 24 22 20 31 39  22 59 52 24 3A 99 3A 81  |"DT$" 19"YR$:.:.|
000015F0: 4E B2 50 53 20 A4 50 53  AA 35 00 22 1E 24 09 8B  |N.PS .PS.5.".$..|
00001600: 4E B2 45 4E A7 99 22 1D  1D 1D 1D 1D 1D C5 4E 44  |N.EN..".......ND|
00001610: 20 4F 46 20 45 4E 54 52  49 45 53 22 3A 89 32 33  | OF ENTRIES":.23|
00001620: 36 30 00 37 1E 2E 09 8D  32 37 36 30 30 3A 8D 32  |60.7....27600:.2|
00001630: 34 31 30 30 3A 82 4E 00  70 1E 38 09 99 22 11 12  |4100:.N.p.8.."..|
00001640: D0 52 45 53 53 3A 92 20  12 2D 92 20 C6 4F 52 20  |.RESS:. .-. .OR |
00001650: 50 52 45 56 49 4F 55 53  20 50 41 47 45 22 A3 32  |PREVIOUS PAGE".2|
00001660: 39 29 22 12 CD 92 20 C6  4F 52 20 4D 45 4E 55 22  |9)"... .OR MENU"|
00001670: 00 8C 1E 42 09 99 A3 37  29 22 12 2B 92 20 C6 4F  |...B...7)".+. .O|
00001680: 52 20 4E 45 58 54 20 50  41 47 45 22 00 B2 1E 7E  |R NEXT PAGE"...~|
00001690: 09 A1 41 24 3A 8B 41 24  B3 B1 22 2B 22 AF 41 24  |..A$:.A$.."+".A$|
000016A0: B3 B1 22 4D 22 AF 41 24  B3 B1 22 2D 22 A7 32 34  |.."M".A$.."-".24|
000016B0: 33 30 00 C3 1E 88 09 8B  41 24 B2 22 4D 22 A7 31  |30......A$."M".1|
000016C0: 37 37 30 00 DF 1E 92 09  8B 41 24 B2 22 2B 22 AF  |770......A$."+".|
000016D0: 4E B3 45 4E A7 50 53 B2  4E 3A 89 32 33 32 30 00  |N.EN.PS.N:.2320.|
000016E0: FE 1E 9C 09 8B 41 24 B2  22 2D 22 AF 50 53 B1 30  |.....A$."-".PS.0|
000016F0: A7 50 53 B2 50 53 AB 36  3A 89 32 34 36 35 00 08  |.PS.PS.6:.2465..|
00001700: 1F 9E 09 89 32 34 33 30  00 29 1F A1 09 8B 50 53  |....2430.)....PS|
00001710: B3 B2 30 A7 50 53 B2 30  3A 44 54 24 B2 22 30 31  |..0.PS.0:DT$."01|
00001720: 30 31 22 3A 89 32 33 31  37 00 44 1F A6 09 44 54  |01":.2317.D...DT|
00001730: 24 B2 C8 28 54 52 24 28  50 53 29 2C 34 29 3A 89  |$..(TR$(PS),4):.|
00001740: 32 33 31 37 00 8C 1F C4  09 8B 54 52 24 28 30 29  |2317......TR$(0)|
00001750: B2 22 22 A7 99 22 93 D4  48 45 52 45 20 41 52 45  |."".."..HERE ARE|
00001760: 20 4E 4F 20 45 4E 54 52  49 45 53 20 59 45 54 22  | NO ENTRIES YET"|
00001770: 3A 99 22 11 C8 49 54 20  41 4E 59 20 4B 45 59 22  |:."..IT ANY KEY"|
00001780: 3A 8D 31 34 36 30 30 3A  89 31 32 30 00 A0 1F C5  |:.14600:.120....|
00001790: 09 8D 39 30 30 30 3A 8B  50 36 B2 32 A7 31 32 30  |..9000:.P6.2.120|
000017A0: 00 DD 1F C6 09 99 22 93  22 A3 39 29 22 C4 4F 20  |......".".9)".O |
000017B0: 59 4F 55 20 57 49 53 48  20 54 4F 20 50 52 49 4E  |YOU WISH TO PRIN|
000017C0: 54 3A 22 3A 99 A3 39 29  22 11 11 12 20 31 20 92  |T:":..9)"... 1 .|
000017D0: 20 C1 4C 4C 20 45 4E 54  52 49 45 53 22 00 01 20  | .LL ENTRIES".. |
000017E0: C8 09 99 A3 39 29 22 11  12 20 32 20 92 20 C1 20  |....9)".. 2 . . |
000017F0: 53 50 45 43 49 46 49 45  44 20 4E 55 4D 42 45 52  |SPECIFIED NUMBER|
00001800: 22 00 1F 20 CA 09 A1 41  24 3A 8B 41 24 B3 B1 22  |".. ...A$:.A$.."|
00001810: 31 22 AF 41 24 B3 B1 22  32 22 A7 32 35 30 36 00  |1".A$.."2".2506.|
00001820: 37 20 CB 09 8B 41 24 B2  22 31 22 A7 4E 55 B2 45  |7 ...A$."1".NU.E|
00001830: 4E 3A 89 32 35 31 35 00  5B 20 CD 09 99 22 93 D4  |N:.2515.[ ..."..|
00001840: 4F 54 41 4C 20 45 4E 54  52 49 45 53 20 49 4E 20  |OTAL ENTRIES IN |
00001850: 4D 45 4D 4F 52 59 3A 20  22 45 4E 00 95 20 CE 09  |MEMORY: "EN.. ..|
00001860: 99 22 11 C5 4E 54 45 52  20 4E 55 4D 42 45 52 20  |."..NTER NUMBER |
00001870: 52 45 51 55 49 52 45 44  20 20 22 3B 3A 50 33 B2  |REQUIRED  ";:P3.|
00001880: 33 3A 50 34 B2 31 3A 8D  33 30 30 30 30 3A 41 B2  |3:P4.1:.30000:A.|
00001890: C5 28 50 24 29 00 B1 20  D0 09 8B 41 B3 B2 30 B0  |.(P$).. ...A..0.|
000018A0: 41 B1 45 4E A7 99 22 91  91 91 22 3A 89 32 35 31  |A.EN.."...":.251|
000018B0: 30 00 BF 20 D2 09 4E 55  B2 50 53 AA 41 AB 31 00  |0.. ..NU.PS.A.1.|
000018C0: D3 20 D3 09 46 50 B2 31  3A 8D 32 33 30 33 3A 46  |. ..FP.1:.2303:F|
000018D0: 50 B2 30 00 03 21 D8 09  97 35 33 32 36 35 2C 31  |P.0..!...53265,1|
000018E0: 31 3A 9F 34 2C 34 2C 37  3A 98 34 2C C7 28 31 35  |1:.4,4,7:.4,.(15|
000018F0: 29 3A 44 24 B2 C7 28 31  36 29 3A 45 24 B2 C7 28  |):D$..(16):E$..(|
00001900: 31 37 29 00 2E 21 E2 09  98 34 2C 45 24 22 C5 4E  |17)..!...4,E$".N|
00001910: 54 52 49 45 53 20 53 54  41 52 54 49 4E 47 20 22  |TRIES STARTING "|
00001920: 44 54 24 22 20 31 39 22  59 52 24 3A 98 34 00 5C  |DT$" 19"YR$:.4.\|
00001930: 21 F6 09 98 34 2C 45 24  22 20 20 C4 A0 C1 A0 D4  |!...4,E$"  .....|
00001940: A0 C5 20 20 20 20 20 DD  20 20 20 20 20 20 C4 A0  |..     .      ..|
00001950: C5 A0 D4 A0 C1 A0 C9 A0  CC A0 D3 22 00 7D 21 00  |...........".}!.|
00001960: 0A 81 4D B2 31 A4 33 38  3A 98 34 2C 45 24 22 A3  |..M.1.38:.4,E$".|
00001970: 22 3B 3A 82 3A 98 34 2C  45 24 22 A3 22 00 B0 21  |";:.:.4,E$"."..!|
00001980: 0A 0A 81 4E B2 50 53 A4  4E 55 3A 8B 4E B2 45 4E  |...N.PS.NU:.N.EN|
00001990: A7 98 34 2C 45 24 44 24  22 31 35 C5 4E 44 20 4F  |..4,E$D$"15.ND O|
000019A0: 46 20 45 4E 54 52 49 45  53 22 3A 89 32 36 35 30  |F ENTRIES":.2650|
000019B0: 00 EE 21 14 0A 8D 32 37  36 30 30 3A 98 34 2C 45  |..!...27600:.4,E|
000019C0: 24 44 54 24 3B 3A 8B 48  52 24 B3 B1 22 22 A7 98  |$DT$;:.HR$..""..|
000019D0: 34 2C 45 24 44 24 22 31  35 22 48 52 24 22 20 48  |4,E$D$"15"HR$" H|
000019E0: 4F 55 52 53 3A 20 22 3B  3A 89 32 35 39 30 00 FF  |OURS: ";:.2590..|
000019F0: 21 19 0A 98 34 2C 45 24  44 24 22 31 35 22 3B 00  |!...4,E$D$"15";.|
00001A00: 14 22 1E 0A 98 34 2C 45  24 4E 41 24 22 20 2D 20  |."...4,E$NA$" - |
00001A10: 22 45 56 24 00 1E 22 28  0A 98 34 3A 82 4E 00 3E  |"EV$.."(..4:.N.>|
00001A20: 22 5A 0A 98 34 2C C7 28  31 34 35 29 3A A0 34 3A  |"Z..4,.(145):.4:|
00001A30: 97 35 33 32 36 35 2C 32  37 3A 89 31 32 30 00 78  |.53265,27:.120.x|
00001A40: 22 8C 0A 99 22 93 C5 4E  54 45 52 20 4E 41 4D 45  |"..."..NTER NAME|
00001A50: 3A 20 22 3B 3A 50 33 B2  32 35 3A 50 34 B2 31 3A  |: ";:P3.25:P4.1:|
00001A60: 8D 33 30 30 30 30 3A 8D  32 34 30 30 30 3A 8B 50  |.30000:.24000:.P|
00001A70: 36 B2 31 A7 32 37 30 30  00 B8 22 96 0A 99 22 93  |6.1.2700.."...".|
00001A80: C5 4E 54 52 49 45 53 20  46 4F 52 3A 20 22 50 24  |.NTRIES FOR: "P$|
00001A90: 3A 99 3A 43 B2 30 3A 81  4E B2 30 A4 45 4E AB 31  |:.:C.0:.N.0.EN.1|
00001AA0: 3A 8B CA 28 54 52 24 28  4E 29 2C 35 2C 31 29 B2  |:..(TR$(N),5,1).|
00001AB0: 22 32 22 A7 32 37 35 30  00 ED 22 B4 0A 8B CA 28  |"2".2750.."....(|
00001AC0: 54 52 24 28 4E 29 2C 31  30 2C C3 28 50 24 29 29  |TR$(N),10,.(P$))|
00001AD0: B2 50 24 A7 8D 32 37 36  30 30 3A 8D 32 34 31 30  |.P$..27600:.2410|
00001AE0: 30 3A 43 B2 43 AA 31 3A  89 32 37 35 35 00 1B 23  |0:C.C.1:.2755..#|
00001AF0: BE 0A 8B CA 28 54 52 24  28 4E 29 2C 36 2C C3 28  |....(TR$(N),6,.(|
00001B00: 50 24 29 29 B2 50 24 A7  8D 32 37 36 30 30 3A 8D  |P$)).P$..27600:.|
00001B10: 32 34 31 30 30 3A 43 B2  43 AA 31 00 29 23 C3 0A  |24100:C.C.1.)#..|
00001B20: 8B 43 B3 37 A7 32 37 37  30 00 3F 23 C8 0A 8B 43  |.C.7.2770.?#...C|
00001B30: AD 37 B2 B5 28 43 AD 37  29 A7 8D 32 38 30 30 00  |.7..(C.7)..2800.|
00001B40: 46 23 D2 0A 82 4E 00 69  23 DC 0A 8B 43 B2 30 A7  |F#...N.i#...C.0.|
00001B50: 99 22 11 D3 4F 52 52 59  20 4E 4F 20 45 4E 54 52  |."..ORRY NO ENTR|
00001B60: 59 20 46 4F 52 20 22 50  24 00 8E 23 E6 0A 99 22  |Y FOR "P$..#..."|
00001B70: 11 C1 4E 59 20 4F 54 48  45 52 22 3B 3A 8D 32 36  |..NY OTHER";:.26|
00001B80: 30 30 30 3A 8B 50 36 B2  31 A7 32 37 30 30 00 98  |000:.P6.1.2700..|
00001B90: 23 EB 0A 89 31 37 37 30  00 D9 23 F0 0A 99 22 11  |#...1770..#...".|
00001BA0: 12 C8 49 54 20 41 4E 59  20 4B 45 59 20 54 4F 20  |..IT ANY KEY TO |
00001BB0: 43 4F 4E 54 49 4E 55 45  92 22 3A 8D 31 34 36 30  |CONTINUE.":.1460|
00001BC0: 30 3A 99 22 93 C5 4E 54  52 49 45 53 20 46 4F 52  |0:."..NTRIES FOR|
00001BD0: 3A 20 22 50 24 3A 99 3A  8E 00 F8 23 28 23 99 22  |: "P$:.:...#(#."|
00001BE0: 93 C1 52 45 20 59 4F 55  20 53 55 52 45 22 3B 3A  |..RE YOU SURE";:|
00001BF0: 8D 32 36 30 30 30 3A 8E  00 0D 24 08 39 A1 41 24  |.26000:...$.9.A$|
00001C00: 3A 8B 41 24 B2 22 22 A7  31 34 36 30 30 00 13 24  |:.A$."".14600..$|
00001C10: 12 39 8E 00 4E 24 9E 39  99 22 D0 4C 45 41 53 45  |.9..N$.9.".LEASE|
00001C20: 20 45 4E 54 45 52 20 44  41 54 45 20 12 C4 C4 CD  | ENTER DATE ....|
00001C30: CD 92 3A 20 22 3B 3A 50  33 B2 34 3A 50 34 B2 34  |..: ";:P3.4:P4.4|
00001C40: 3A 8D 33 30 30 30 30 3A  8D 32 35 30 30 30 00 65  |:.30000:.25000.e|
00001C50: 24 A3 39 8B 50 36 B2 31  A7 99 22 91 22 3B 3A 89  |$.9.P6.1..".";:.|
00001C60: 31 34 37 35 30 00 85 24  A8 39 8B 50 36 B2 30 A7  |14750..$.9.P6.0.|
00001C70: 44 54 24 B2 C9 28 50 24  2C 32 29 AA C8 28 50 24  |DT$..(P$,2)..(P$|
00001C80: 2C 32 29 3A 8E 00 B4 24  C0 5D 50 36 B2 30 3A 41  |,2):...$.]P6.0:A|
00001C90: B2 C6 28 50 24 29 3A 8B  41 B3 36 35 B0 28 41 B1  |..(P$):.A.65.(A.|
00001CA0: 39 30 AF 41 B3 31 39 32  29 B0 41 B1 32 31 38 A7  |90.A.192).A.218.|
00001CB0: 50 36 B2 31 00 BA 24 CA  5D 8E 00 C9 24 F2 5D 8B  |P6.1..$.]...$.].|
00001CC0: 4E B2 30 A7 32 34 30 38  30 00 EE 24 FC 5D 8B C8  |N.0.24080..$.]..|
00001CD0: 28 54 52 24 28 4E 29 2C  34 29 B1 C8 28 54 52 24  |(TR$(N),4)..(TR$|
00001CE0: 28 4E AB 31 29 2C 34 29  A7 32 34 30 38 30 00 06  |(N.1),4).24080..|
00001CF0: 25 06 5E 8D 32 37 30 35  30 3A 4E B2 4E AB 31 3A  |%.^.27050:N.N.1:|
00001D00: 89 32 34 30 35 30 00 19  25 10 5E 45 4E B2 45 4E  |.24050..%.^EN.EN|
00001D10: AA 31 3A 46 32 B2 31 3A  8E 00 44 25 24 5E 99 44  |.1:F2.1:..D%$^.D|
00001D20: 54 24 A3 31 34 29 3B 3A  8B 48 52 24 B3 B1 22 22  |T$.14);:.HR$..""|
00001D30: A7 99 48 52 24 22 20 C8  4F 55 52 53 22 3A 99 A3  |..HR$" .OURS":..|
00001D40: 31 34 29 3B 00 58 25 2E  5E 99 4E 41 24 3A 99 A3  |14);.X%.^.NA$:..|
00001D50: 31 34 29 45 56 24 3A 8E  00 9A 25 A8 61 41 4D 24  |14)EV$:...%.aAM$|
00001D60: B2 22 33 31 32 38 33 31  33 30 33 31 33 30 33 31  |."31283130313031|
00001D70: 33 31 33 30 33 31 33 30  33 31 22 3A 41 4C 24 B2  |3130313031":AL$.|
00001D80: 22 33 31 32 39 33 31 33  30 33 31 33 30 33 31 33  |"312931303130313|
00001D90: 31 33 30 33 31 33 30 33  31 22 00 C0 25 16 62 50  |130313031"..%.bP|
00001DA0: 36 B2 30 3A 8B 50 24 B3  B2 22 30 30 30 30 22 B0  |6.0:.P$.."0000".|
00001DB0: 50 24 B1 22 33 31 31 32  22 A7 50 36 B2 31 3A 8E  |P$."3112".P6.1:.|
00001DC0: 00 FE 25 20 62 50 44 B2  C5 28 C8 28 50 24 2C 32  |..% bPD..(.(P$,2|
00001DD0: 29 29 3A 50 4D B2 C5 28  C9 28 50 24 2C 32 29 29  |)):PM..(.(P$,2))|
00001DE0: 3A 8B 50 4D B3 31 B0 50  4D B1 31 32 B0 50 44 B3  |:.PM.1.PM.12.PD.|
00001DF0: 31 B0 50 44 B1 33 31 A7  50 36 B2 31 3A 8E 00 27  |1.PD.31.P6.1:..'|
00001E00: 26 2C 62 41 52 B2 C5 28  59 52 24 29 AA 31 39 30  |&,bAR..(YR$).190|
00001E10: 30 3A 8B B5 28 41 52 AD  34 29 B2 41 52 AD 34 A7  |0:..(AR.4).AR.4.|
00001E20: 41 4D 24 B2 41 4C 24 00  47 26 2E 62 8B 50 44 B1  |AM$.AL$.G&.b.PD.|
00001E30: C5 28 CA 28 41 4D 24 2C  50 4D AC 32 AB 31 2C 32  |.(.(AM$,PM.2.1,2|
00001E40: 29 29 A7 50 36 B2 31 00  4D 26 30 62 8E 00 7B 26  |)).P6.1.M&0b..{&|
00001E50: 70 62 8B 50 24 B2 22 22  A7 50 24 B2 22 30 30 30  |pb.P$."".P$."000|
00001E60: 30 22 3A 99 22 13 11 11  11 11 11 11 1D 1D 1D 1D  |0":."...........|
00001E70: 1D 1D 1D 1D 1D 1D 1D 1D  22 50 24 00 A7 26 75 62  |........"P$..&ub|
00001E80: 50 36 B2 30 3A 41 24 B2  C8 28 50 24 2C 32 29 3A  |P6.0:A$..(P$,2):|
00001E90: 8B 41 24 B3 22 30 30 22  B0 41 24 B1 22 32 33 22  |.A$."00".A$."23"|
00001EA0: A7 50 36 B2 31 3A 8E 00  CE 26 7A 62 41 24 B2 C9  |.P6.1:...&zbA$..|
00001EB0: 28 50 24 2C 32 29 3A 8B  41 24 B3 22 30 30 22 B0  |(P$,2):.A$."00".|
00001EC0: 41 24 B1 22 35 39 22 A7  50 36 B2 31 3A 8E 00 D4  |A$."59".P6.1:...|
00001ED0: 26 84 62 8E 00 ED 26 90  65 99 22 20 81 12 D9 9A  |&.b...&.e." ....|
00001EE0: 92 45 53 2F 12 81 CE 9A  92 4F 3F 22 3B 00 0C 27  |.ES/.....O?";..'|
00001EF0: 9A 65 A1 41 24 3A 8B 41  24 B3 B1 22 59 22 AF 41  |.e.A$:.A$.."Y".A|
00001F00: 24 B3 B1 22 4E 22 A7 32  36 30 31 30 00 1F 27 A4  |$.."N".26010..'.|
00001F10: 65 8B 41 24 B2 22 59 22  A7 50 36 B2 31 3A 8E 00  |e.A$."Y".P6.1:..|
00001F20: 2A 27 AE 65 50 36 B2 32  3A 8E 00 72 27 F4 65 99  |*'.eP6.2:..r'.e.|
00001F30: 22 93 D0 4C 45 41 53 45  20 45 4E 54 45 52 20 59  |"..LEASE ENTER Y|
00001F40: 45 41 52 3A 20 31 39 20  22 3B 3A 50 33 B2 32 3A  |EAR: 19 ";:P3.2:|
00001F50: 50 34 B2 32 3A 8D 33 30  30 30 30 3A 8B 50 24 B3  |P4.2:.30000:.P$.|
00001F60: 22 37 30 22 B0 50 24 B1  22 39 39 22 A7 32 36 31  |"70".P$."99".261|
00001F70: 30 30 00 7F 27 03 66 59  52 24 B2 50 24 3A 8E 00  |00..'.fYR$.P$:..|
00001F80: 8E 27 78 69 8B 4E B2 30  A7 32 37 30 33 30 00 B4  |.'xi.N.0.27030..|
00001F90: 27 82 69 8B C8 28 54 52  24 28 4E 29 2C 34 29 B1  |'.i..(TR$(N),4).|
00001FA0: B2 C8 28 54 52 24 28 4E  AB 31 29 2C 34 29 A7 32  |..(TR$(N.1),4).2|
00001FB0: 37 30 33 30 00 CC 27 8C  69 8D 32 37 30 35 30 3A  |7030..'.i.27050:|
00001FC0: 4E B2 4E AB 31 3A 89 32  37 30 30 30 00 F9 27 96  |N.N.1:.27000..'.|
00001FD0: 69 8B CA 28 54 52 24 28  4E 29 2C 35 2C 31 29 B2  |i..(TR$(N),5,1).|
00001FE0: 22 31 22 A7 8D 32 37 30  36 30 3A 45 4E B2 45 4E  |"1"..27060:EN.EN|
00001FF0: AA 31 3A 46 32 B2 31 3A  8E 00 25 28 AA 69 41 24  |.1:F2.1:..%(.iA$|
00002000: B2 54 52 24 28 4E 29 3A  54 52 24 28 4E 29 B2 54  |.TR$(N):TR$(N).T|
00002010: 52 24 28 4E AB 31 29 3A  54 52 24 28 4E AB 31 29  |R$(N.1):TR$(N.1)|
00002020: B2 41 24 3A 8E 00 30 28  B4 69 8B 4E B2 30 A7 8E  |.A$:..0(.i.N.0..|
00002030: 00 4B 28 B9 69 8B CA 28  54 52 24 28 4E AB 31 29  |.K(.i..(TR$(N.1)|
00002040: 2C 35 2C 31 29 B2 22 32  22 A7 8E 00 71 28 BE 69  |,5,1)."2"...q(.i|
00002050: 8B CA 28 54 52 24 28 4E  29 2C 36 2C 34 29 B1 B2  |..(TR$(N),6,4)..|
00002060: CA 28 54 52 24 28 4E AB  31 29 2C 36 2C 34 29 A7  |.(TR$(N.1),6,4).|
00002070: 8E 00 89 28 C8 69 8D 32  37 30 35 30 3A 4E B2 4E  |...(.i.27050:N.N|
00002080: AB 31 3A 89 32 37 30 36  30 00 9D 28 DC 69 5A 54  |.1:.27060..(.iZT|
00002090: B2 30 3A 5A 42 B2 45 4E  3A 50 37 B2 30 00 D5 28  |.0:ZB.EN:P7.0..(|
000020A0: E1 69 5A 4D B2 5A 54 AA  B5 28 28 5A 42 AB 5A 54  |.iZM.ZT..((ZB.ZT|
000020B0: 29 AD 32 29 3A 5A 49 24  B2 C8 28 54 52 24 28 5A  |).2):ZI$..(TR$(Z|
000020C0: 4D 29 2C 58 58 29 3A 8B  5A 49 24 B2 5A 54 24 A7  |M),XX):.ZI$.ZT$.|
000020D0: 32 37 32 33 30 00 E6 28  22 6A 8B 5A 54 B2 5A 4D  |27230..("j.ZT.ZM|
000020E0: A7 32 37 34 37 30 00 07  29 36 6A 8B 5A 49 24 B2  |.27470..)6j.ZI$.|
000020F0: 22 22 B0 5A 54 24 B1 5A  49 24 A7 5A 54 B2 5A 4D  |"".ZT$.ZI$.ZT.ZM|
00002100: 3A 89 32 37 31 30 35 00  18 29 40 6A 5A 42 B2 5A  |:.27105..)@jZB.Z|
00002110: 4D 3A 89 32 37 31 30 35  00 22 29 5E 6A 5A 42 B2  |M:.27105.")^jZB.|
00002120: 5A 4D 00 34 29 68 6A 8B  5A 42 AB 31 B3 30 A7 32  |ZM.4)hj.ZB.1.0.2|
00002130: 37 33 32 30 00 5C 29 72  6A 5A 49 24 B2 C8 28 54  |7320.\)rjZI$..(T|
00002140: 52 24 28 5A 42 AB 31 29  2C 58 58 29 3A 8B 5A 49  |R$(ZB.1),XX):.ZI|
00002150: 24 B3 B1 5A 54 24 A7 32  37 33 32 30 00 6F 29 9A  |$..ZT$.27320.o).|
00002160: 6A 5A 42 B2 5A 42 AB 31  3A 89 32 37 32 34 30 00  |jZB.ZB.1:.27240.|
00002170: 79 29 B8 6A 5A 54 B2 5A  4D 00 8C 29 C2 6A 8B 5A  |y).jZT.ZM..).j.Z|
00002180: 54 AA 31 B1 45 4E A7 32  37 34 31 30 00 B4 29 CC  |T.1.EN.27410..).|
00002190: 6A 5A 49 24 B2 C8 28 54  52 24 28 5A 54 AA 31 29  |jZI$..(TR$(ZT.1)|
000021A0: 2C 58 58 29 3A 8B 5A 49  24 B3 B1 5A 54 24 A7 32  |,XX):.ZI$..ZT$.2|
000021B0: 37 34 31 30 00 C7 29 F4  6A 5A 54 B2 5A 54 AA 31  |7410..).jZT.ZT.1|
000021C0: 3A 89 32 37 33 33 30 00  D2 29 12 6B 50 37 B2 31  |:.27330..).kP7.1|
000021D0: 3A 8E 00 DD 29 4E 6B 50  37 B2 32 3A 8E 00 1D 2A  |:...)NkP7.2:...*|
000021E0: D0 6B 41 24 B2 54 52 24  28 4E 29 3A 44 54 24 B2  |.kA$.TR$(N):DT$.|
000021F0: CA 28 41 24 2C 33 2C 32  29 AA 22 20 22 AA 4D 4F  |.(A$,3,2)." ".MO|
00002200: 24 28 C5 28 C8 28 41 24  2C 32 29 29 29 3A 41 41  |$(.(.(A$,2))):AA|
00002210: B2 C5 28 CA 28 41 24 2C  35 2C 31 29 29 00 47 2A  |..(.(A$,5,1)).G*|
00002220: DA 6B 41 24 B2 C9 28 41  24 2C C3 28 41 24 29 AB  |.kA$..(A$,.(A$).|
00002230: 35 29 3A 8B 41 41 B3 B1  31 A7 48 52 24 B2 22 22  |5):.AA..1.HR$.""|
00002240: 3A 89 32 37 36 33 30 00  76 2A E9 6B 48 52 24 B2  |:.27630.v*.kHR$.|
00002250: C8 28 41 24 2C 32 29 AA  22 3A 22 AA CA 28 41 24  |.(A$,2).":"..(A$|
00002260: 2C 33 2C 32 29 3A 41 24  B2 C9 28 41 24 2C C3 28  |,3,2):A$..(A$,.(|
00002270: 41 24 29 AB 34 29 00 9A  2A EE 6B 81 4D B2 31 A4  |A$).4)..*.k.M.1.|
00002280: C3 28 41 24 29 3A 8B CA  28 41 24 2C 4D 2C 31 29  |.(A$):..(A$,M,1)|
00002290: B2 22 2A 22 A7 32 37 36  35 30 00 A1 2A F8 6B 82  |."*".27650..*.k.|
000022A0: 4D 00 C5 2A 02 6C 4E 41  24 B2 C8 28 41 24 2C 4D  |M..*.lNA$..(A$,M|
000022B0: AB 31 29 3A 45 56 24 B2  C9 28 41 24 2C C3 28 41  |.1):EV$..(A$,.(A|
000022C0: 24 29 AB 4D 29 00 F9 2A  0C 6C 8B 41 41 B2 32 AF  |$).M)..*.l.AA.2.|
000022D0: 28 45 56 24 B2 22 31 22  B0 45 56 24 B2 22 32 22  |(EV$."1".EV$."2"|
000022E0: B0 45 56 24 B2 22 33 22  29 A7 45 56 24 B2 54 54  |.EV$."3").EV$.TT|
000022F0: 24 28 C5 28 45 56 24 29  29 00 FF 2A 16 6C 8E 00  |$(.(EV$))..*.l..|
00002300: 3B 2B 34 6C 99 22 C4 41  54 45 22 A3 31 30 29 22  |;+4l.".ATE".10)"|
00002310: 3A 20 22 44 54 24 22 20  31 39 22 59 52 24 3A 8B  |: "DT$" 19"YR$:.|
00002320: 48 52 24 B3 B1 22 22 A7  99 22 11 C8 4F 55 52 22  |HR$.."".."..OUR"|
00002330: A3 31 30 29 22 3A 20 22  48 52 24 00 6A 2B 48 6C  |.10)": "HR$.j+Hl|
00002340: 99 22 11 CE 41 4D 45 22  A3 31 30 29 22 3A 20 22  |."..AME".10)": "|
00002350: 4E 41 24 3A 99 22 11 C5  56 45 4E 54 22 A3 31 30  |NA$:."..VENT".10|
00002360: 29 22 3A 20 22 45 56 24  3A 8E 00 82 2B 3C 73 81  |)": "EV$:...+<s.|
00002370: 51 B2 31 A4 50 33 3A 99  22 A4 22 3B 3A 82 3A 99  |Q.1.P3:.".";:.:.|
00002380: 3A 8E 00 A0 2B 68 74 99  22 13 22 3B 3A 8B 43 4F  |:...+ht.".";:.CO|
00002390: B1 31 A7 99 C8 28 43 4F  24 2C 43 4F AB 31 29 3B  |.1...(CO$,CO.1);|
000023A0: 00 B8 2B 72 74 8B 4C 4E  B1 31 A7 99 C8 28 4C 4E  |..+rt.LN.1...(LN|
000023B0: 24 2C 4C 4E AB 31 29 3B  00 BE 2B 7C 74 8E 00 C8  |$,LN.1);..+|t...|
000023C0: 2B 30 75 99 22 3E 22 3B  00 F9 2B 3A 75 81 51 B2  |+0u.">";..+:u.Q.|
000023D0: 31 A4 50 33 3A 99 22 A4  22 3B 3A 82 51 3A 81 51  |1.P3:.".";:.Q:.Q|
000023E0: B2 31 A4 50 33 3A 99 22  9D 22 3B 3A 82 51 3A 50  |.1.P3:.".";:.Q:P|
000023F0: 24 B2 22 22 3A 50 58 B2  30 00 0E 2C D0 75 A1 41  |$."":PX.0..,.u.A|
00002400: 24 3A 8B 41 24 B2 22 22  A7 33 30 31 36 30 00 2D  |$:.A$."".30160.-|
00002410: 2C DA 75 41 B2 C6 28 41  24 29 3A 8B 41 B1 31 39  |,.uA..(A$):.A.19|
00002420: 31 AF 41 B3 32 31 39 A7  33 30 32 30 30 00 6C 2C  |1.A.219.30200.l,|
00002430: E4 75 8B 28 41 B1 33 31  AF 41 B3 B1 34 34 AF 41  |.u.(A.31.A..44.A|
00002440: B3 B1 33 34 AF 41 B3 B1  35 38 AF 41 B3 B1 35 39  |..34.A..58.A..59|
00002450: AF 41 B3 39 37 29 B0 41  B2 31 33 B0 41 B2 32 30  |.A.97).A.13.A.20|
00002460: B0 41 B2 31 35 37 A7 33  30 32 30 30 00 77 2C EE  |.A.157.30200.w,.|
00002470: 75 89 33 30 31 36 30 00  87 2C F8 75 8B 41 B2 31  |u.30160..,.u.A.1|
00002480: 33 A7 33 30 33 32 30 00  97 2C 0C 76 8B 41 B2 32  |3.30320..,.v.A.2|
00002490: 30 A7 33 30 32 35 30 00  A8 2C 11 76 8B 50 58 B2  |0.30250..,.v.PX.|
000024A0: 50 33 A7 33 30 31 36 30  00 BA 2C 16 76 8B 41 B3  |P3.30160..,.v.A.|
000024B0: B1 31 35 37 A7 33 30 32  38 30 00 E1 2C 1B 76 50  |.157.30280..,.vP|
000024C0: 58 B2 C3 28 50 24 29 3A  81 51 B2 31 A4 50 58 AA  |X..(P$):.Q.1.PX.|
000024D0: 31 3A 99 22 9D 22 3B 3A  82 51 3A 89 33 30 30 30  |1:.".";:.Q:.3000|
000024E0: 30 00 F2 2C 2A 76 8B 50  24 B2 22 22 A7 33 30 31  |0..,*v.P$."".301|
000024F0: 36 30 00 1F 2D 34 76 50  24 B2 C8 28 50 24 2C C3  |60..-4vP$..(P$,.|
00002500: 28 50 24 29 AB 31 29 3A  41 24 B2 22 9D A4 9D 22  |(P$).1):A$."..."|
00002510: 3A 50 58 B2 50 58 AB 31  3A 89 33 30 33 30 30 00  |:PX.PX.1:.30300.|
00002520: 2F 2D 48 76 8B C3 28 50  24 29 B2 50 33 A7 8E 00  |/-Hv..(P$).P3...|
00002530: 45 2D 52 76 50 24 B2 50  24 AA 41 24 3A 50 58 B2  |E-RvP$.P$.A$:PX.|
00002540: C3 28 50 24 29 00 55 2D  5C 76 99 41 24 3B 3A 89  |.(P$).U-\v.A$;:.|
00002550: 33 30 31 36 30 00 69 2D  70 76 8B C3 28 50 24 29  |30160.i-pv..(P$)|
00002560: B3 50 34 A7 33 30 31 36  30 00 86 2D 7A 76 81 51  |.P4.30160..-zv.Q|
00002570: B2 31 A4 50 58 AA 31 3A  99 22 9D 22 3B 3A 82 3A  |.1.PX.1:.".";:.:|
00002580: 99 22 20 22 3A 8E 00 9E  2D AC 8A 81 51 B2 31 A4  |." ":...-...Q.1.|
00002590: 33 37 3A 99 22 C0 22 3B  3A 82 3A 99 3A 8E 00 E6  |37:.".";:.:.:...|
000025A0: 2D 50 C3 83 42 49 52 54  48 44 41 59 2C 57 45 44  |-P..BIRTHDAY,WED|
000025B0: 44 49 4E 47 2C 45 4E 47  41 47 45 4D 45 4E 54 2C  |DING,ENGAGEMENT,|
000025C0: 4F 54 48 45 52 2C 4A 41  4E 55 41 52 59 2C 46 45  |OTHER,JANUARY,FE|
000025D0: 42 52 55 41 52 59 2C 4D  41 52 43 48 2C 41 50 52  |BRUARY,MARCH,APR|
000025E0: 49 4C 2C 4D 41 59 00 20  2E 5A C3 83 4A 55 4E 45  |IL,MAY. .Z..JUNE|
000025F0: 2C 4A 55 4C 59 2C 41 55  47 55 53 54 2C 53 45 50  |,JULY,AUGUST,SEP|
00002600: 54 45 4D 42 45 52 2C 4F  43 54 4F 42 45 52 2C 4E  |TEMBER,OCTOBER,N|
00002610: 4F 56 45 4D 42 45 52 2C  44 45 43 45 4D 42 45 52  |OVEMBER,DECEMBER|
00002620: 00 2E 2E 38 C7 8F 20 56  32 2E 30 28 54 29 00 00  |...8.. V2.0(T)..|
00002630: 00 00 00                                          |...             |
..?.... * DIARY MANAGER * BY BERNARD HAB
ET (C) 1983 ABRASCO LTD...F..".":.53280,
6:HO$."HANG-ON WHILE SEARCHING":HV$."HAV
E FOUND THE FOLLOWING:"...P..53272,23:.G
(8)...Z.EN.0:PE$.".PLEASE ENTER THE FOLL
OWING INFORMATION:":.MO$(12),TT$(4),TR$(
455).<.I..N.1.4:.TT$(N):.:.N.1.12:.MO$(N
):.:SP$."                          "...N
.CO$."..................................
.....":LN$.".........................".S
.X..".";:.35500:."..      D I A R Y   M 
A N A G E R      ..":.35500.......8)"...
. PRESS .. OPTION NUMBER:":..8)"..... 1 
.. NEW ENTRIES".U.....8)"... 2 .. DELETI
ONS":..8)"... 3 .. SEARCH & RETRIEVE"...
....8)"... 4 .. PRINT DETAILS":..8)"... 
5 .. LOAD/SAVE DATA"... ...8)"... 6 .. S
IGN-OFF"......14600:.E(A$).300,900,1700,
2500,1100,185:.180......9000:.P6.2.120.4
...."..".9)"OK, NOW SIGNING-OFF":.53280,
14:.G(9):.53272,21:..G.,..YR$.""..26100.
W./..EN.455.310...1..".SORRY, NO MORE RO
OM IN MEMORY":."..HIT ANY KEY.":.14600:.
120...6.."....".9)"N E W   E N T R I E S
":..9)"....................."...@...9)".
. 1 . DATES TO REMEMBER":..9)".. 2 . DAI
LY ENTRIES".].T...9)".. 3 . BACK TO MAIN
 MENU":..9)"... PRESS OPTION NUMBER "...
H..14600:.E(A$).550,380,120:.360.F.|..PE
$:."..DATE .DDMM.:  ";:P3.4:.29500:."..H
OUR .HHMM.:  ";:.29500......"..NAME     
:  ";:P3.25:.29500:."..EVENT    :  ";:.2
9500.=...LN.4:.29800:..11);:P3.4:P4.4:.3
0000:.25000:.P6.1.400.U...DT$.I(P$,2).H(
P$,2)......"..".11);:P3.4:P4.0:.30000:.2
5200:.P6.1.."....":.420.....HR$.P$.F....
"..".11);:P3.25:P4.0:.30000:.P$."".450..
....24000:.P6.1.."....":.440...B.NA$.P$.
*.L.."..".11);:P3.25:P4.1:.30000:.24000:
.P6.1.."....":.460.Y...EV$.P$:."........
ACCEPT";:.26000:.P6.2.380......".HANG-ON
 WHILE POSTING":N.EN:TR$(N).DT$."1".HR$.
NA$."*".EV$:.27000.Q...."..OK, ANY OTHER
 ENTRY";:.26000:.P6.1.380.Z....310.$.&..
PE$:."..DATE .DDMM.:  ";:P3.4:.29500:.".
.NAME     :  ";:P3.25:.29500.N.0.."..EVE
NT    :  1. "TT$(1)"   2. "TT$(2):..12)"
3. "TT$(3)" 4. "TT$(4)...B.LN.4:.29800:.
.11);:P3.4:P4.4:.30000:.25000:.P6.1.610.
..I.DT$.I(P$,2).H(P$,2)...L.."..".11);:P
3.25:P4.1:.30000:.24000:.P6.1.."...";:.6
20...T.NA$.P$:..11)"..>";.,.V..A$:.A$."1
".A$."4".630.R.Y..SP$:..11)SP$:."..";:.A
$.."4".640...{.P3.25:P4.1:..11);:.30000:
.24000:.P6.1..".";:.635...}.A$.P$:.650..
.....12)TT$(E(A$)):..11)". ".....EV$.A$:
.".......ACCEPT";:.26000:.P6.2.550.'.Z..
".HANG-ON WHILE POSTING":N.EN:TR$(N).DT$
."2".NA$."*".EV$:.24050.V...."..OK, ANY 
OTHER ENTRY";:.26000:.P6.1.550._....310.
.....TR$(0).""..".THERE ARE NO ENTRIES Y
ET":.".HIT ANY KEY";:.14600:.120......90
00:.P6.2.120.O....YR$.""..26100......"."
.7)"** D E L E T I O N S **":."..";:.147
50:.".."HO$.....ZT$.DT$:XX.4:.27100:.P7.
2.1055.?....ZT.ZB.ZB.ZT.H...N.ZB.}....".
ENTRY NO "N.1:."............":.:.27600:.
27700.E.J.LN.20:CO.1:.29800:.".PRESS:. .
D. TO DELETE":..7)".+. TO GO FORWARD"...
T...7)".M. TO EXIT TO MENU"......14600:.
A$."D".1010......A$."+".N.1..EN.1.N.N.1:
.960.,....A$."M".120.5....990.Y....".HAN
G-ON WHILE DELETING":PO.N......N.PO.EN.1
:TR$(N).TR$(N.1):.:EN.EN.1:.".OK"......"
.ANY OTHER DELETION";:.26000:.P6.1.910..
....120......".HAVE NOT FOUND ANY ENTRY 
ON THIS DATE":.1030...L..9000:.P6.2.120.
:.Q.."...........DO YOU WISH TO .L.OAD O
R .S.AVE?".X.V..A$:.A$.."L".A$.."S".1110
.I.`..A$."L".1350......".ENTER NAME OF F
ILE TO BE SAVED":.".MAX .16. CHARACTERS:
";:.I.D.P3.16:P4.1:.30000:F$.P$:....I.."
..LOAD. YOUR DISC THEN .HIT. ANY KEY":..
.....14600:.3,8,1,F$:.3,YR$:.3,EN.;....N
.0.EN.1:.3,TR$(N):.: 3:.120...F..".DO YO
U WISH TO LOAD IMPORTANT DATES":."ONLY "
;:.26000:.P6.2.1400...K.." YES".X.P..".P
LEASE ENTER NAME OF FILE TO BE LOADED":.
".MAX .16. CHARACTERS ";...Z.P3.16:P4.1:
.30000.).[..".PLEASE .LOAD. YOUR DISC TH
EN .HIT. ANY KEY.":.14600.X.D..3,8,0,P$:
.3,YR$:.3,EN:M.0:.N.0.EN.1:.3,A$.{.I..J(
A$,5,1)."2".TR$(M).A$:M.M.1...N..N: 3:EN
.M:YR$."":.120...X..".PLEASE ENTER NAME 
OF FILE TO BE LOADED":.".MAX .16. CHARAC
TERS ";......".PLEASE .LOAD. YOUR DISC T
HEN .HIT. ANY KEY.":.14600.5.M..3,8,0,P$
:.3,YR$:.3,EN.W.R..N.0.EN.1:.3,TR$(N):.:
 3:.120.J....YR$.""..26100......"...".11
)"SEARCH & RETRIEVE":..11)".............
....".......7)".. 1 . DATES TO REMEMBER"
:..7)".. 2 . BROWSE THROUGH ENTRIES".2..
...7)".. 3 . STATEMENT  OF  ENTRIES":..7
)".. 4 . SEARCH  BY  NAME".V.....7)".. 5
 . BACK  TO  MAIN  MENU":..11)"...PRESS 
OPTION NUMBER"...&..14600:.E(A$).1850,21
20,2300,2700,120:.1830...:..TR$(0)."".."
.THERE ARE NO ENTRIES YET":.".HIT ANY KE
Y";:.14600:.1770.!.D..".ENTER MONTH REQU
IRED: ";:P3.2:P4.1:.30000.<.I..E(P$).1.E
(P$).12.1860.[.K.."."HO$:.C(P$).1.P$."0"
.P$...N.ZT$.P$:XX.2:.27100:.P7.2..".THER
E ARE NO ENTRIES THIS MONTH":.1940...S.M
.ZB...X..".DATES TO REMEMBER IN "MO$(E(P
$))" 19"YR$:.:.N.M.M.9:.N.ZT.1940...V..J
(TR$(N),5,1)."2"..27600:.24100.L....N:."
..HIT ANY KEY TO CONTINUE.":.14600:M.N:.
1880.Q....".ANY OTHER";:.26000:.P6.1.186
0.{....1770.E.H..TR$(0).""..".THERE ARE 
NO ENTRIES YET":.".HIT ANY KEY";:.14600:
.1770...M..".BROWSING STARTS ON/BEFORE D
ATE ENTERED":.:.14750. .R.ZT$.DT$:XX.4:.
27100:.P7.2.2240.1.W..ZB.ZT.ZT.ZB.@.\.N.
ZT:PO.ZT.U.F..".ENTRY NO ";N.1:.".......
....":.:.27600:.27700...P.LN.20:CO.1:.29
800:.".PRESS:. .+. FOR BROWSING FORWARD"
...Z...7)".-. FOR BROWSING BACKWARD":..7
)".S. TO STOP"......A$:.A$.."+".A$.."-".
A$.."S".2180......A$."+".2220......A$."-
".2230.8....1770.S....N.1..EN.1.N.N.1:.2
150.]....2180.U....N.1..0.N.N.1:.2150..
...2180.....N.ZM:.2150.W....TR$(0)."".."
.THERE ARE NO ENTRIES YET":.".HIT ANY KE
Y":.14600:.1770......".STATEMENT WILL ST
ART FROM DATE ENTERED":.:.14750.3....DT$
.H(TR$(EN.1),4).PS.EN:.2317.T....DT$..H(
TR$(0),4).PS.0:.2317.~...ZT$.DT$:XX.4:.2
7100:.P7.2.PS.ZB:.2317......ZB.ZT.ZT.ZB.
....PS.ZT.G...DT$.I(DT$,2)." ".MO$(E(H(D
T$,2))):.FP.1........".ENTRIES STARTING 
"DT$" 19"YR$:.:.N.PS .PS.5.".$..N.EN..".
.....END OF ENTRIES":.2360.7....27600:.2
4100:.N.P.8.."..PRESS:. .-. FOR PREVIOUS
 PAGE".29)".M. FOR MENU"...B...7)".+. FO
R NEXT PAGE"...~..A$:.A$.."+".A$.."M".A$
.."-".2430.C....A$."M".1770......A$."+".
N.EN.PS.N:.2320......A$."-".PS.0.PS.PS.6
:.2465......2430.)....PS..0.PS.0:DT$."01
01":.2317.D...DT$.H(TR$(PS),4):.2317...D
..TR$(0).""..".THERE ARE NO ENTRIES YET"
:.".HIT ANY KEY":.14600:.120. .E..9000:.
P6.2.120...F..".".9)"DO YOU WISH TO PRIN
T:":..9)"... 1 . ALL ENTRIES".. H...9)".
. 2 . A SPECIFIED NUMBER".. J..A$:.A$.."
1".A$.."2".2506.7 K..A$."1".NU.EN:.2515.
[ M..".TOTAL ENTRIES IN MEMORY: "EN.. N.
.".ENTER NUMBER REQUIRED  ";:P3.3:P4.1:.
30000:A.E(P$).. P..A..0.A.EN.."...":.251
0.. R.NU.PS.A.1.S S.FP.1:.2303:FP.0..!X.
.53265,11:.4,4,7:.4,G(15):D$.G(16):E$.G(
17)..!...4,E$"ENTRIES STARTING "DT$" 19"
YR$:.4.\!...4,E$"  D A T E     .      D 
E T A I L S".}!...M.1.38:.4,E$".";:.:.4,
E$"."..!...N.PS.NU:.N.EN..4,E$D$"15END O
F ENTRIES":.2650..!...27600:.4,E$DT$;:.H
R$..""..4,E$D$"15"HR$" HOURS: ";:.2590..
!...4,E$D$"15";.."...4,E$NA$" - "EV$.."(
..4:.N.>"Z..4,G(145): 4:.53265,27:.120.X
"...".ENTER NAME: ";:P3.25:P4.1:.30000:.
24000:.P6.1.2700.."...".ENTRIES FOR: "P$
:.:C.0:.N.0.EN.1:.J(TR$(N),5,1)."2".2750
.."...J(TR$(N),10,C(P$)).P$..27600:.2410
0:C.C.1:.2755..#...J(TR$(N),6,C(P$)).P$.
.27600:.24100:C.C.1.)#C..C.7.2770.?#H..C
.7..(C.7)..2800.F#R..N.I#...C.0..".SORRY
 NO ENTRY FOR "P$..#...".ANY OTHER";:.26
000:.P6.1.2700..#...1770.Y#..."..HIT ANY
 KEY TO CONTINUE.":.14600:.".ENTRIES FOR
: "P$:.:...#(#.".ARE YOU SURE";:.26000:.
..$.9.A$:.A$."".14600..$.9..N$.9."PLEASE
 ENTER DATE .DDMM.: ";:P3.4:P4.4:.30000:
.25000.E$.9.P6.1..".";:.14750..$.9.P6.0.
DT$.I(P$,2).H(P$,2):...$.]P6.0:A.F(P$):.
A.65.(A.90.A.192).A.218.P6.1..$J]..I$.].
N.0.24080..$.].H(TR$(N),4).H(TR$(N.1),4)
.24080..%.^.27050:N.N.1:.24050..%.^EN.EN
.1:F2.1:..D%$^.DT$.14);:.HR$..""..HR$" H
OURS":..14);.X%.^.NA$:..14)EV$:...%.AAM$
."312831303130313130313031":AL$."3129313
03130313130313031"..%.BP6.0:.P$.."0000".
P$."3112".P6.1:...% BPD.E(H(P$,2)):PM.E(
I(P$,2)):.PM.1.PM.12.PD.1.PD.31.P6.1:..'
&,BAR.E(YR$).1900:..(AR.4).AR.4.AM$.AL$.
G&.B.PD.E(J(AM$,PM.2.1,2)).P6.1.M&0B..{&
PB.P$."".P$."0000":."...................
"P$..&UBP6.0:A$.H(P$,2):.A$."00".A$."23"
.P6.1:..N&ZBA$.I(P$,2):.A$."00".A$."59".
P6.1:..T&.B...&.E." ..Y..ES/..N..O?";..'
.E.A$:.A$.."Y".A$.."N".26010..'.E.A$."Y"
.P6.1:..*'.EP6.2:..R'.E.".PLEASE ENTER Y
EAR: 19 ";:P3.2:P4.2:.30000:.P$."70".P$.
"99".26100.'.FYR$.P$:...'XI.N.0.27030..
'.I.H(TR$(N),4)..H(TR$(N.1),4).27030.L'.
I.27050:N.N.1:.27000..'.I.J(TR$(N),5,1).
"1"..27060:EN.EN.1:F2.1:..%(.IA$.TR$(N):
TR$(N).TR$(N.1):TR$(N.1).A$:..0(.I.N.0..
.K(.I.J(TR$(N.1),5,1)."2"...Q(.I.J(TR$(N
),6,4)..J(TR$(N.1),6,4)....(HI.27050:N.N
.1:.27060..(.IZT.0:ZB.EN:P7.0.U(.IZM.ZT.
.((ZB.ZT).2):ZI$.H(TR$(ZM),XX):.ZI$.ZT$.
27230..("J.ZT.ZM.27470..)6J.ZI$."".ZT$.Z
I$.ZT.ZM:.27105..)@JZB.ZM:.27105.")^JZB.
ZM.4)HJ.ZB.1.0.27320.\)RJZI$.H(TR$(ZB.1)
,XX):.ZI$..ZT$.27320.O).JZB.ZB.1:.27240.
Y).JZT.ZM..)BJ.ZT.1.EN.27410..)LJZI$.H(T
R$(ZT.1),XX):.ZI$..ZT$.27410.G).JZT.ZT.1
:.27330.R).KP7.1:...)NKP7.2:...*PKA$.TR$
(N):DT$.J(A$,3,2)." ".MO$(E(H(A$,2))):AA
.E(J(A$,5,1)).G*ZKA$.I(A$,C(A$).5):.AA..
1.HR$."":.27630.V*.KHR$.H(A$,2).":".J(A$
,3,2):A$.I(A$,C(A$).4)..*.K.M.1.C(A$):.J
(A$,M,1)."*".27650..*.K.M.E*.LNA$.H(A$,M
.1):EV$.I(A$,C(A$).M)..*.L.AA.2.(EV$."1"
.EV$."2".EV$."3").EV$.TT$(E(EV$))..*.L..
;+4L."DATE".10)": "DT$" 19"YR$:.HR$.."".
.".HOUR".10)": "HR$.J+HL.".NAME".10)": "
NA$:.".EVENT".10)": "EV$:...+<S.Q.1.P3:.
".";:.:.:.. +HT.".";:.CO.1..H(CO$,CO.1);
..+RT.LN.1..H(LN$,LN.1);..+|T..H+0U.">";
..+:U.Q.1.P3:.".";:.Q:.Q.1.P3:.".";:.Q:P
$."":PX.0..,PU.A$:.A$."".30160.-,ZUA.F(A
$):.A.191.A.219.30200.L,.U.(A.31.A..44.A
..34.A..58.A..59.A.97).A.13.A.20.A.157.3
0200.W,.U.30160..,.U.A.13.30320..,.V.A.2
0.30250..,.V.PX.P3.30160..,.V.A..157.302
80..,.VPX.C(P$):.Q.1.PX.1:.".";:.Q:.3000
0..,*V.P$."".30160..-4VP$.H(P$,C(P$).1):
A$."...":PX.PX.1:.30300./-HV.C(P$).P3...
E-RVP$.P$.A$:PX.C(P$).U-\V.A$;:.30160.I-
PV.C(P$).P4.30160..-ZV.Q.1.PX.1:.".";:.:
." ":...-...Q.1.37:.".";:.:.:...-PC.BIRT
HDAY,WEDDING,ENGAGEMENT,OTHER,JANUARY,FE
BRUARY,MARCH,APRIL,MAY. .ZC.JUNE,JULY,AU
GUST,SEPTEMBER,OCTOBER,NOVEMBER,DECEMBER
...8G. V2.0(T).....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL