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

AGENDA-T

FILE INFORMATION

FILENAME(S): AGENDA-T

FILE TYPE(S): PRG

FILE SIZE: 9.6K

FIRST SEEN: 2025-12-02 02:07:16

APPEARS ON: 1 disk(s)

FILE HASH

92cff74fb3de584948f39fe8688db01b26529e5ac0ecc8aefee62a191eae13f8

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
CHR TEKSTVERWERK AGENDA-T PRG Shocktrooper 28 4 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 F3 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 3A 99 22 11 12 CC 4F  |0:F$.P$:.:."...O|
00000CD0: 41 44 92 20 59 4F 55 52  20 54 41 50 45 20 54 48  |AD. YOUR TAPE TH|
00000CE0: 45 4E 20 12 C8 49 54 92  20 41 4E 59 20 4B 45 59  |EN ..IT. ANY KEY|
00000CF0: 22 3A 99 00 33 15 1A 05  8D 31 34 36 30 30 3A 9F  |":..3....14600:.|
00000D00: 33 2C 31 2C 31 2C 46 24  3A 98 33 2C 59 52 24 3A  |3,1,1,F$:.3,YR$:|
00000D10: 98 33 2C 45 4E 3A 81 4E  B2 30 A4 45 4E AB 31 3A  |.3,EN:.N.0.EN.1:|
00000D20: 98 33 2C 54 52 24 28 4E  29 3A 82 3A A0 33 3A 89  |.3,TR$(N):.:.3:.|
00000D30: 31 32 30 00 7B 15 46 05  99 22 93 C4 4F 20 59 4F  |120.{.F.."..O YO|
00000D40: 55 20 57 49 53 48 20 54  4F 20 4C 4F 41 44 20 49  |U WISH TO LOAD I|
00000D50: 4D 50 4F 52 54 41 4E 54  20 44 41 54 45 53 22 3A  |MPORTANT DATES":|
00000D60: 99 22 4F 4E 4C 59 20 22  3B 3A 8D 32 36 30 30 30  |."ONLY ";:.26000|
00000D70: 3A 8B 50 36 B2 32 A7 31  34 30 30 00 87 15 4B 05  |:.P6.2.1400...K.|
00000D80: 99 22 20 D9 45 53 22 00  D0 15 50 05 99 22 11 D0  |." .ES"...P.."..|
00000D90: 4C 45 41 53 45 20 45 4E  54 45 52 20 4E 41 4D 45  |LEASE ENTER NAME|
00000DA0: 20 4F 46 20 46 49 4C 45  20 54 4F 20 42 45 20 4C  | OF FILE TO BE L|
00000DB0: 4F 41 44 45 44 22 3A 99  22 11 CD 41 58 20 12 31  |OADED":."..AX .1|
00000DC0: 36 92 20 43 48 41 52 41  43 54 45 52 53 20 22 3B  |6. CHARACTERS ";|
00000DD0: 00 1D 16 5A 05 50 33 B2  31 36 3A 50 34 B2 31 3A  |...Z.P3.16:P4.1:|
00000DE0: 8D 33 30 30 30 30 3A 99  22 11 D0 4C 45 41 53 45  |.30000:."..LEASE|
00000DF0: 20 12 CC 4F 41 44 92 20  59 4F 55 52 20 54 41 50  | ..OAD. YOUR TAP|
00000E00: 45 20 54 48 45 4E 20 12  C8 49 54 92 20 41 4E 59  |E THEN ..IT. ANY|
00000E10: 20 4B 45 59 11 22 3A 8D  31 34 36 30 30 00 4C 16  | KEY.":.14600.L.|
00000E20: 64 05 9F 33 2C 31 2C 30  2C 50 24 3A 84 33 2C 59  |d..3,1,0,P$:.3,Y|
00000E30: 52 24 3A 84 33 2C 45 4E  3A 4D B2 30 3A 81 4E B2  |R$:.3,EN:M.0:.N.|
00000E40: 30 A4 45 4E AB 31 3A 84  33 2C 41 24 00 6F 16 69  |0.EN.1:.3,A$.o.i|
00000E50: 05 8B CA 28 41 24 2C 35  2C 31 29 B2 22 32 22 A7  |...(A$,5,1)."2".|
00000E60: 54 52 24 28 4D 29 B2 41  24 3A 4D B2 4D AA 31 00  |TR$(M).A$:M.M.1.|
00000E70: 8A 16 6E 05 82 4E 3A A0  33 3A 45 4E B2 4D 3A 59  |..n..N:.3:EN.M:Y|
00000E80: 52 24 B2 22 22 3A 89 31  32 30 00 D3 16 78 05 99  |R$."":.120...x..|
00000E90: 22 93 D0 4C 45 41 53 45  20 45 4E 54 45 52 20 4E  |"..LEASE ENTER N|
00000EA0: 41 4D 45 20 4F 46 20 46  49 4C 45 20 54 4F 20 42  |AME OF FILE TO B|
00000EB0: 45 20 4C 4F 41 44 45 44  22 3A 99 22 11 CD 41 58  |E LOADED":."..AX|
00000EC0: 20 12 31 36 92 20 43 48  41 52 41 43 54 45 52 53  | .16. CHARACTERS|
00000ED0: 20 22 3B 00 20 17 82 05  50 33 B2 31 36 3A 50 34  | ";. ...P3.16:P4|
00000EE0: B2 31 3A 8D 33 30 30 30  30 3A 99 22 11 D0 4C 45  |.1:.30000:."..LE|
00000EF0: 41 53 45 20 12 CC 4F 41  44 92 20 59 4F 55 52 20  |ASE ..OAD. YOUR |
00000F00: 54 41 50 45 20 54 48 45  4E 20 12 C8 49 54 92 20  |TAPE THEN ..IT. |
00000F10: 41 4E 59 20 4B 45 59 11  22 3A 8D 31 34 36 30 30  |ANY KEY.":.14600|
00000F20: 00 59 17 CD 05 9F 33 2C  31 2C 30 2C 50 24 3A 84  |.Y....3,1,0,P$:.|
00000F30: 33 2C 59 52 24 3A 84 33  2C 45 4E 3A 81 4E B2 30  |3,YR$:.3,EN:.N.0|
00000F40: A4 45 4E AB 31 3A 84 33  2C 54 52 24 28 4E 29 3A  |.EN.1:.3,TR$(N):|
00000F50: 82 3A A0 33 3A 89 31 32  30 00 6C 17 A4 06 8B 59  |.:.3:.120.l....Y|
00000F60: 52 24 B2 22 22 A7 8D 32  36 31 30 30 00 A7 17 EA  |R$.""..26100....|
00000F70: 06 99 22 93 11 11 22 A3  31 31 29 22 D3 C5 C1 D2  |.."...".11)"....|
00000F80: C3 C8 A0 26 A0 D2 C5 D4  D2 C9 C5 D6 C5 22 3A 99  |...&.........":.|
00000F90: A3 31 31 29 22 A3 A3 A3  A3 A3 A3 A3 A3 A3 A3 A3  |.11)"...........|
00000FA0: A3 A3 A3 A3 A3 A3 22 00  EE 17 F4 06 99 A3 37 29  |......".......7)|
00000FB0: 22 11 12 20 31 20 92 20  C4 41 54 45 53 20 54 4F  |".. 1 . .ATES TO|
00000FC0: 20 52 45 4D 45 4D 42 45  52 22 3A 99 A3 37 29 22  | REMEMBER":..7)"|
00000FD0: 11 12 20 32 20 92 20 C2  52 4F 57 53 45 20 54 48  |.. 2 . .ROWSE TH|
00000FE0: 52 4F 55 47 48 20 45 4E  54 52 49 45 53 22 00 34  |ROUGH ENTRIES".4|
00000FF0: 18 08 07 99 A3 37 29 22  11 12 20 33 20 92 20 D3  |.....7)".. 3 . .|
00001000: 54 41 54 45 4D 45 4E 54  20 20 4F 46 20 20 45 4E  |TATEMENT  OF  EN|
00001010: 54 52 49 45 53 22 3A 99  A3 37 29 22 11 12 20 34  |TRIES":..7)".. 4|
00001020: 20 92 20 D3 45 41 52 43  48 20 20 42 59 20 20 4E  | . .EARCH  BY  N|
00001030: 41 4D 45 22 00 78 18 0D  07 99 A3 37 29 22 11 12  |AME".x.....7)"..|
00001040: 20 35 20 92 20 C2 41 43  4B 20 20 54 4F 20 20 4D  | 5 . .ACK  TO  M|
00001050: 41 49 4E 20 20 4D 45 4E  55 22 3A 99 A3 31 31 29  |AIN  MENU":..11)|
00001060: 22 11 11 12 D0 52 45 53  53 20 4F 50 54 49 4F 4E  |"....RESS OPTION|
00001070: 20 4E 55 4D 42 45 52 22  00 A8 18 26 07 8D 31 34  | NUMBER"...&..14|
00001080: 36 30 30 3A 91 C5 28 41  24 29 89 31 38 35 30 2C  |600:..(A$).1850,|
00001090: 32 31 32 30 2C 32 33 30  30 2C 32 37 30 30 2C 31  |2120,2300,2700,1|
000010A0: 32 30 3A 89 31 38 33 30  00 F2 18 3A 07 8B 54 52  |20:.1830...:..TR|
000010B0: 24 28 30 29 B2 22 22 A7  99 22 93 D4 48 45 52 45  |$(0)."".."..HERE|
000010C0: 20 41 52 45 20 4E 4F 20  45 4E 54 52 49 45 53 20  | ARE NO ENTRIES |
000010D0: 59 45 54 22 3A 99 22 11  C8 49 54 20 41 4E 59 20  |YET":."..IT ANY |
000010E0: 4B 45 59 22 3B 3A 8D 31  34 36 30 30 3A 89 31 37  |KEY";:.14600:.17|
000010F0: 37 30 00 23 19 44 07 99  22 93 C5 4E 54 45 52 20  |70.#.D.."..NTER |
00001100: 4D 4F 4E 54 48 20 52 45  51 55 49 52 45 44 3A 20  |MONTH REQUIRED: |
00001110: 22 3B 3A 50 33 B2 32 3A  50 34 B2 31 3A 8D 33 30  |";:P3.2:P4.1:.30|
00001120: 30 30 30 00 3E 19 49 07  8B C5 28 50 24 29 B3 31  |000.>.I...(P$).1|
00001130: B0 C5 28 50 24 29 B1 31  32 A7 31 38 36 30 00 5D  |..(P$).12.1860.]|
00001140: 19 4B 07 99 22 11 22 48  4F 24 3A 8B C3 28 50 24  |.K.."."HO$:..(P$|
00001150: 29 B2 31 A7 50 24 B2 22  30 22 AA 50 24 00 A4 19  |).1.P$."0".P$...|
00001160: 4E 07 5A 54 24 B2 50 24  3A 58 58 B2 32 3A 8D 32  |N.ZT$.P$:XX.2:.2|
00001170: 37 31 30 30 3A 8B 50 37  B2 32 A7 99 22 11 D4 48  |7100:.P7.2.."..H|
00001180: 45 52 45 20 41 52 45 20  4E 4F 20 45 4E 54 52 49  |ERE ARE NO ENTRI|
00001190: 45 53 20 54 48 49 53 20  4D 4F 4E 54 48 22 3A 89  |ES THIS MONTH":.|
000011A0: 31 39 34 30 00 AD 19 53  07 4D B2 5A 42 00 F3 19  |1940...S.M.ZB...|
000011B0: 58 07 99 22 93 C4 41 54  45 53 20 54 4F 20 52 45  |X.."..ATES TO RE|
000011C0: 4D 45 4D 42 45 52 20 49  4E 20 22 4D 4F 24 28 C5  |MEMBER IN "MO$(.|
000011D0: 28 50 24 29 29 22 20 31  39 22 59 52 24 3A 99 3A  |(P$))" 19"YR$:.:|
000011E0: 81 4E B2 4D A4 4D AA 39  3A 8B 4E B1 5A 54 A7 31  |.N.M.M.9:.N.ZT.1|
000011F0: 39 34 30 00 18 1A 76 07  8B CA 28 54 52 24 28 4E  |940...v...(TR$(N|
00001200: 29 2C 35 2C 31 29 B2 22  32 22 A7 8D 32 37 36 30  |),5,1)."2"..2760|
00001210: 30 3A 8D 32 34 31 30 30  00 4E 1A 80 07 82 4E 3A  |0:.24100.N....N:|
00001220: 99 22 11 12 C8 49 54 20  41 4E 59 20 4B 45 59 20  |."...IT ANY KEY |
00001230: 54 4F 20 43 4F 4E 54 49  4E 55 45 92 22 3A 8D 31  |TO CONTINUE.":.1|
00001240: 34 36 30 30 3A 4D B2 4E  3A 89 31 38 38 30 00 73  |4600:M.N:.1880.s|
00001250: 1A 94 07 99 22 11 C1 4E  59 20 4F 54 48 45 52 22  |...."..NY OTHER"|
00001260: 3B 3A 8D 32 36 30 30 30  3A 8B 50 36 B2 31 A7 31  |;:.26000:.P6.1.1|
00001270: 38 36 30 00 7D 1A 9E 07  89 31 37 37 30 00 C7 1A  |860.}....1770...|
00001280: 48 08 8B 54 52 24 28 30  29 B2 22 22 A7 99 22 93  |H..TR$(0).""..".|
00001290: D4 48 45 52 45 20 41 52  45 20 4E 4F 20 45 4E 54  |.HERE ARE NO ENT|
000012A0: 52 49 45 53 20 59 45 54  22 3A 99 22 11 C8 49 54  |RIES YET":."..IT|
000012B0: 20 41 4E 59 20 4B 45 59  22 3B 3A 8D 31 34 36 30  | ANY KEY";:.1460|
000012C0: 30 3A 89 31 37 37 30 00  FF 1A 4D 08 99 22 93 C2  |0:.1770...M.."..|
000012D0: 52 4F 57 53 49 4E 47 20  53 54 41 52 54 53 20 4F  |ROWSING STARTS O|
000012E0: 4E 2F 42 45 46 4F 52 45  20 44 41 54 45 20 45 4E  |N/BEFORE DATE EN|
000012F0: 54 45 52 45 44 22 3A 99  3A 8D 31 34 37 35 30 00  |TERED":.:.14750.|
00001300: 22 1B 52 08 5A 54 24 B2  44 54 24 3A 58 58 B2 34  |".R.ZT$.DT$:XX.4|
00001310: 3A 8D 32 37 31 30 30 3A  8B 50 37 B2 32 A7 32 32  |:.27100:.P7.2.22|
00001320: 34 30 00 33 1B 57 08 8B  5A 42 B3 5A 54 A7 5A 54  |40.3.W..ZB.ZT.ZT|
00001330: B2 5A 42 00 42 1B 5C 08  4E B2 5A 54 3A 50 4F B2  |.ZB.B.\.N.ZT:PO.|
00001340: 5A 54 00 77 1B 66 08 99  22 93 C5 4E 54 52 59 20  |ZT.w.f.."..NTRY |
00001350: CE 4F 20 22 3B 4E AA 31  3A 99 22 A3 A3 A3 A3 A3  |.O ";N.1:.".....|
00001360: A3 A3 A3 A3 A3 A3 22 3A  99 3A 8D 32 37 36 30 30  |......":.:.27600|
00001370: 3A 8D 32 37 37 30 30 00  B2 1B 70 08 4C 4E B2 32  |:.27700...p.LN.2|
00001380: 30 3A 43 4F B2 31 3A 8D  32 39 38 30 30 3A 99 22  |0:CO.1:.29800:."|
00001390: 12 D0 52 45 53 53 3A 92  20 12 2B 92 20 C6 4F 52  |..RESS:. .+. .OR|
000013A0: 20 42 52 4F 57 53 49 4E  47 20 46 4F 52 57 41 52  | BROWSING FORWAR|
000013B0: 44 22 00 E8 1B 7A 08 99  A3 37 29 22 12 2D 92 20  |D"...z...7)".-. |
000013C0: C6 4F 52 20 42 52 4F 57  53 49 4E 47 20 42 41 43  |.OR BROWSING BAC|
000013D0: 4B 57 41 52 44 22 3A 99  A3 37 29 22 12 53 92 20  |KWARD":..7)".S. |
000013E0: D4 4F 20 53 54 4F 50 22  00 0E 1C 84 08 A1 41 24  |.O STOP"......A$|
000013F0: 3A 8B 41 24 B3 B1 22 2B  22 AF 41 24 B3 B1 22 2D  |:.A$.."+".A$.."-|
00001400: 22 AF 41 24 B3 B1 22 53  22 A7 32 31 38 30 00 1F  |".A$.."S".2180..|
00001410: 1C 8E 08 8B 41 24 B2 22  2B 22 A7 32 32 32 30 00  |....A$."+".2220.|
00001420: 30 1C 98 08 8B 41 24 B2  22 2D 22 A7 32 32 33 30  |0....A$."-".2230|
00001430: 00 3A 1C A2 08 89 31 37  37 30 00 55 1C AC 08 8B  |.:....1770.U....|
00001440: 4E AA 31 B3 B2 45 4E AB  31 A7 4E B2 4E AA 31 3A  |N.1..EN.1.N.N.1:|
00001450: 89 32 31 35 30 00 5F 1C  B1 08 89 32 31 38 30 00  |.2150._....2180.|
00001460: 77 1C B6 08 8B 4E AB 31  B1 B2 30 A7 4E B2 4E AB  |w....N.1..0.N.N.|
00001470: 31 3A 89 32 31 35 30 00  81 1C BB 08 89 32 31 38  |1:.2150......218|
00001480: 30 00 90 1C C0 08 4E B2  5A 4D 3A 89 32 31 35 30  |0.....N.ZM:.2150|
00001490: 00 D9 1C FC 08 8B 54 52  24 28 30 29 B2 22 22 A7  |......TR$(0)."".|
000014A0: 99 22 93 D4 48 45 52 45  20 41 52 45 20 4E 4F 20  |."..HERE ARE NO |
000014B0: 45 4E 54 52 49 45 53 20  59 45 54 22 3A 99 22 11  |ENTRIES YET":.".|
000014C0: C8 49 54 20 41 4E 59 20  4B 45 59 22 3A 8D 31 34  |.IT ANY KEY":.14|
000014D0: 36 30 30 3A 89 31 37 37  30 00 11 1D FF 08 99 22  |600:.1770......"|
000014E0: 93 D3 54 41 54 45 4D 45  4E 54 20 57 49 4C 4C 20  |..TATEMENT WILL |
000014F0: 53 54 41 52 54 20 46 52  4F 4D 20 44 41 54 45 20  |START FROM DATE |
00001500: 45 4E 54 45 52 45 44 22  3A 99 3A 8D 31 34 37 35  |ENTERED":.:.1475|
00001510: 30 00 35 1D 01 09 8B 44  54 24 B1 C8 28 54 52 24  |0.5....DT$..(TR$|
00001520: 28 45 4E AB 31 29 2C 34  29 A7 50 53 B2 45 4E 3A  |(EN.1),4).PS.EN:|
00001530: 89 32 33 31 37 00 56 1D  03 09 8B 44 54 24 B3 B2  |.2317.V....DT$..|
00001540: C8 28 54 52 24 28 30 29  2C 34 29 A7 50 53 B2 30  |.(TR$(0),4).PS.0|
00001550: 3A 89 32 33 31 37 00 80  1D 06 09 5A 54 24 B2 44  |:.2317.....ZT$.D|
00001560: 54 24 3A 58 58 B2 34 3A  8D 32 37 31 30 30 3A 8B  |T$:XX.4:.27100:.|
00001570: 50 37 B2 32 A7 50 53 B2  5A 42 3A 89 32 33 31 37  |P7.2.PS.ZB:.2317|
00001580: 00 91 1D 08 09 8B 5A 42  B3 5A 54 A7 5A 54 B2 5A  |......ZB.ZT.ZT.Z|
00001590: 42 00 9B 1D 0B 09 50 53  B2 5A 54 00 C9 1D 0D 09  |B.....PS.ZT.....|
000015A0: 44 54 24 B2 C9 28 44 54  24 2C 32 29 AA 22 20 22  |DT$..(DT$,2)." "|
000015B0: AA 4D 4F 24 28 C5 28 C8  28 44 54 24 2C 32 29 29  |.MO$(.(.(DT$,2))|
000015C0: 29 3A 8B 46 50 B2 31 A7  8E 00 FC 1D 10 09 99 22  |):.FP.1........"|
000015D0: 93 C5 4E 54 52 49 45 53  20 53 54 41 52 54 49 4E  |..NTRIES STARTIN|
000015E0: 47 20 22 44 54 24 22 20  31 39 22 59 52 24 3A 99  |G "DT$" 19"YR$:.|
000015F0: 3A 81 4E B2 50 53 20 A4  50 53 AA 35 00 24 1E 24  |:.N.PS .PS.5.$.$|
00001600: 09 8B 4E B2 45 4E A7 99  22 1D 1D 1D 1D 1D 1D C5  |..N.EN..".......|
00001610: 4E 44 20 4F 46 20 45 4E  54 52 49 45 53 22 3A 89  |ND OF ENTRIES":.|
00001620: 32 33 36 30 00 39 1E 2E  09 8D 32 37 36 30 30 3A  |2360.9....27600:|
00001630: 8D 32 34 31 30 30 3A 82  4E 00 72 1E 38 09 99 22  |.24100:.N.r.8.."|
00001640: 11 12 D0 52 45 53 53 3A  92 20 12 2D 92 20 C6 4F  |...RESS:. .-. .O|
00001650: 52 20 50 52 45 56 49 4F  55 53 20 50 41 47 45 22  |R PREVIOUS PAGE"|
00001660: A3 32 39 29 22 12 CD 92  20 C6 4F 52 20 4D 45 4E  |.29)"... .OR MEN|
00001670: 55 22 00 8E 1E 42 09 99  A3 37 29 22 12 2B 92 20  |U"...B...7)".+. |
00001680: C6 4F 52 20 4E 45 58 54  20 50 41 47 45 22 00 B4  |.OR NEXT PAGE"..|
00001690: 1E 7E 09 A1 41 24 3A 8B  41 24 B3 B1 22 2B 22 AF  |.~..A$:.A$.."+".|
000016A0: 41 24 B3 B1 22 4D 22 AF  41 24 B3 B1 22 2D 22 A7  |A$.."M".A$.."-".|
000016B0: 32 34 33 30 00 C5 1E 88  09 8B 41 24 B2 22 4D 22  |2430......A$."M"|
000016C0: A7 31 37 37 30 00 E1 1E  92 09 8B 41 24 B2 22 2B  |.1770......A$."+|
000016D0: 22 AF 4E B3 45 4E A7 50  53 B2 4E 3A 89 32 33 32  |".N.EN.PS.N:.232|
000016E0: 30 00 00 1F 9C 09 8B 41  24 B2 22 2D 22 AF 50 53  |0......A$."-".PS|
000016F0: B1 30 A7 50 53 B2 50 53  AB 36 3A 89 32 34 36 35  |.0.PS.PS.6:.2465|
00001700: 00 0A 1F 9E 09 89 32 34  33 30 00 2B 1F A1 09 8B  |......2430.+....|
00001710: 50 53 B3 B2 30 A7 50 53  B2 30 3A 44 54 24 B2 22  |PS..0.PS.0:DT$."|
00001720: 30 31 30 31 22 3A 89 32  33 31 37 00 46 1F A6 09  |0101":.2317.F...|
00001730: 44 54 24 B2 C8 28 54 52  24 28 50 53 29 2C 34 29  |DT$..(TR$(PS),4)|
00001740: 3A 89 32 33 31 37 00 8E  1F C4 09 8B 54 52 24 28  |:.2317......TR$(|
00001750: 30 29 B2 22 22 A7 99 22  93 D4 48 45 52 45 20 41  |0)."".."..HERE A|
00001760: 52 45 20 4E 4F 20 45 4E  54 52 49 45 53 20 59 45  |RE NO ENTRIES YE|
00001770: 54 22 3A 99 22 11 C8 49  54 20 41 4E 59 20 4B 45  |T":."..IT ANY KE|
00001780: 59 22 3A 8D 31 34 36 30  30 3A 89 31 32 30 00 A2  |Y":.14600:.120..|
00001790: 1F C5 09 8D 39 30 30 30  3A 8B 50 36 B2 32 A7 31  |....9000:.P6.2.1|
000017A0: 32 30 00 DF 1F C6 09 99  22 93 22 A3 39 29 22 C4  |20......".".9)".|
000017B0: 4F 20 59 4F 55 20 57 49  53 48 20 54 4F 20 50 52  |O YOU WISH TO PR|
000017C0: 49 4E 54 3A 22 3A 99 A3  39 29 22 11 11 12 20 31  |INT:":..9)"... 1|
000017D0: 20 92 20 C1 4C 4C 20 45  4E 54 52 49 45 53 22 00  | . .LL ENTRIES".|
000017E0: 03 20 C8 09 99 A3 39 29  22 11 12 20 32 20 92 20  |. ....9)".. 2 . |
000017F0: C1 20 53 50 45 43 49 46  49 45 44 20 4E 55 4D 42  |. SPECIFIED NUMB|
00001800: 45 52 22 00 21 20 CA 09  A1 41 24 3A 8B 41 24 B3  |ER".! ...A$:.A$.|
00001810: B1 22 31 22 AF 41 24 B3  B1 22 32 22 A7 32 35 30  |."1".A$.."2".250|
00001820: 36 00 39 20 CB 09 8B 41  24 B2 22 31 22 A7 4E 55  |6.9 ...A$."1".NU|
00001830: B2 45 4E 3A 89 32 35 31  35 00 5D 20 CD 09 99 22  |.EN:.2515.] ..."|
00001840: 93 D4 4F 54 41 4C 20 45  4E 54 52 49 45 53 20 49  |..OTAL ENTRIES I|
00001850: 4E 20 4D 45 4D 4F 52 59  3A 20 22 45 4E 00 97 20  |N MEMORY: "EN.. |
00001860: CE 09 99 22 11 C5 4E 54  45 52 20 4E 55 4D 42 45  |..."..NTER NUMBE|
00001870: 52 20 52 45 51 55 49 52  45 44 20 20 22 3B 3A 50  |R REQUIRED  ";:P|
00001880: 33 B2 33 3A 50 34 B2 31  3A 8D 33 30 30 30 30 3A  |3.3:P4.1:.30000:|
00001890: 41 B2 C5 28 50 24 29 00  B3 20 D0 09 8B 41 B3 B2  |A..(P$).. ...A..|
000018A0: 30 B0 41 B1 45 4E A7 99  22 91 91 91 22 3A 89 32  |0.A.EN.."...":.2|
000018B0: 35 31 30 00 C1 20 D2 09  4E 55 B2 50 53 AA 41 AB  |510.. ..NU.PS.A.|
000018C0: 31 00 D5 20 D3 09 46 50  B2 31 3A 8D 32 33 30 33  |1.. ..FP.1:.2303|
000018D0: 3A 46 50 B2 30 00 05 21  D8 09 97 35 33 32 36 35  |:FP.0..!...53265|
000018E0: 2C 31 31 3A 9F 34 2C 34  2C 37 3A 98 34 2C C7 28  |,11:.4,4,7:.4,.(|
000018F0: 31 35 29 3A 44 24 B2 C7  28 31 36 29 3A 45 24 B2  |15):D$..(16):E$.|
00001900: C7 28 31 37 29 00 30 21  E2 09 98 34 2C 45 24 22  |.(17).0!...4,E$"|
00001910: C5 4E 54 52 49 45 53 20  53 54 41 52 54 49 4E 47  |.NTRIES STARTING|
00001920: 20 22 44 54 24 22 20 31  39 22 59 52 24 3A 98 34  | "DT$" 19"YR$:.4|
00001930: 00 5E 21 F6 09 98 34 2C  45 24 22 20 20 C4 A0 C1  |.^!...4,E$"  ...|
00001940: A0 D4 A0 C5 20 20 20 20  20 DD 20 20 20 20 20 20  |....     .      |
00001950: C4 A0 C5 A0 D4 A0 C1 A0  C9 A0 CC A0 D3 22 00 7F  |............."..|
00001960: 21 00 0A 81 4D B2 31 A4  33 38 3A 98 34 2C 45 24  |!...M.1.38:.4,E$|
00001970: 22 A3 22 3B 3A 82 3A 98  34 2C 45 24 22 A3 22 00  |".";:.:.4,E$".".|
00001980: B2 21 0A 0A 81 4E B2 50  53 A4 4E 55 3A 8B 4E B2  |.!...N.PS.NU:.N.|
00001990: 45 4E A7 98 34 2C 45 24  44 24 22 31 35 C5 4E 44  |EN..4,E$D$"15.ND|
000019A0: 20 4F 46 20 45 4E 54 52  49 45 53 22 3A 89 32 36  | OF ENTRIES":.26|
000019B0: 35 30 00 F0 21 14 0A 8D  32 37 36 30 30 3A 98 34  |50..!...27600:.4|
000019C0: 2C 45 24 44 54 24 3B 3A  8B 48 52 24 B3 B1 22 22  |,E$DT$;:.HR$..""|
000019D0: A7 98 34 2C 45 24 44 24  22 31 35 22 48 52 24 22  |..4,E$D$"15"HR$"|
000019E0: 20 48 4F 55 52 53 3A 20  22 3B 3A 89 32 35 39 30  | HOURS: ";:.2590|
000019F0: 00 01 22 19 0A 98 34 2C  45 24 44 24 22 31 35 22  |.."...4,E$D$"15"|
00001A00: 3B 00 16 22 1E 0A 98 34  2C 45 24 4E 41 24 22 20  |;.."...4,E$NA$" |
00001A10: 2D 20 22 45 56 24 00 20  22 28 0A 98 34 3A 82 4E  |- "EV$. "(..4:.N|
00001A20: 00 40 22 5A 0A 98 34 2C  C7 28 31 34 35 29 3A A0  |.@"Z..4,.(145):.|
00001A30: 34 3A 97 35 33 32 36 35  2C 32 37 3A 89 31 32 30  |4:.53265,27:.120|
00001A40: 00 7A 22 8C 0A 99 22 93  C5 4E 54 45 52 20 4E 41  |.z"..."..NTER NA|
00001A50: 4D 45 3A 20 22 3B 3A 50  33 B2 32 35 3A 50 34 B2  |ME: ";:P3.25:P4.|
00001A60: 31 3A 8D 33 30 30 30 30  3A 8D 32 34 30 30 30 3A  |1:.30000:.24000:|
00001A70: 8B 50 36 B2 31 A7 32 37  30 30 00 BA 22 96 0A 99  |.P6.1.2700.."...|
00001A80: 22 93 C5 4E 54 52 49 45  53 20 46 4F 52 3A 20 22  |"..NTRIES FOR: "|
00001A90: 50 24 3A 99 3A 43 B2 30  3A 81 4E B2 30 A4 45 4E  |P$:.:C.0:.N.0.EN|
00001AA0: AB 31 3A 8B CA 28 54 52  24 28 4E 29 2C 35 2C 31  |.1:..(TR$(N),5,1|
00001AB0: 29 B2 22 32 22 A7 32 37  35 30 00 EF 22 B4 0A 8B  |)."2".2750.."...|
00001AC0: CA 28 54 52 24 28 4E 29  2C 31 30 2C C3 28 50 24  |.(TR$(N),10,.(P$|
00001AD0: 29 29 B2 50 24 A7 8D 32  37 36 30 30 3A 8D 32 34  |)).P$..27600:.24|
00001AE0: 31 30 30 3A 43 B2 43 AA  31 3A 89 32 37 35 35 00  |100:C.C.1:.2755.|
00001AF0: 1D 23 BE 0A 8B CA 28 54  52 24 28 4E 29 2C 36 2C  |.#....(TR$(N),6,|
00001B00: C3 28 50 24 29 29 B2 50  24 A7 8D 32 37 36 30 30  |.(P$)).P$..27600|
00001B10: 3A 8D 32 34 31 30 30 3A  43 B2 43 AA 31 00 2B 23  |:.24100:C.C.1.+#|
00001B20: C3 0A 8B 43 B3 37 A7 32  37 37 30 00 41 23 C8 0A  |...C.7.2770.A#..|
00001B30: 8B 43 AD 37 B2 B5 28 43  AD 37 29 A7 8D 32 38 30  |.C.7..(C.7)..280|
00001B40: 30 00 48 23 D2 0A 82 4E  00 6B 23 DC 0A 8B 43 B2  |0.H#...N.k#...C.|
00001B50: 30 A7 99 22 11 D3 4F 52  52 59 20 4E 4F 20 45 4E  |0.."..ORRY NO EN|
00001B60: 54 52 59 20 46 4F 52 20  22 50 24 00 90 23 E6 0A  |TRY FOR "P$..#..|
00001B70: 99 22 11 C1 4E 59 20 4F  54 48 45 52 22 3B 3A 8D  |."..NY OTHER";:.|
00001B80: 32 36 30 30 30 3A 8B 50  36 B2 31 A7 32 37 30 30  |26000:.P6.1.2700|
00001B90: 00 9A 23 EB 0A 89 31 37  37 30 00 DB 23 F0 0A 99  |..#...1770..#...|
00001BA0: 22 11 12 C8 49 54 20 41  4E 59 20 4B 45 59 20 54  |"...IT ANY KEY T|
00001BB0: 4F 20 43 4F 4E 54 49 4E  55 45 92 22 3A 8D 31 34  |O CONTINUE.":.14|
00001BC0: 36 30 30 3A 99 22 93 C5  4E 54 52 49 45 53 20 46  |600:."..NTRIES F|
00001BD0: 4F 52 3A 20 22 50 24 3A  99 3A 8E 00 FA 23 28 23  |OR: "P$:.:...#(#|
00001BE0: 99 22 93 C1 52 45 20 59  4F 55 20 53 55 52 45 22  |."..RE YOU SURE"|
00001BF0: 3B 3A 8D 32 36 30 30 30  3A 8E 00 0F 24 08 39 A1  |;:.26000:...$.9.|
00001C00: 41 24 3A 8B 41 24 B2 22  22 A7 31 34 36 30 30 00  |A$:.A$."".14600.|
00001C10: 15 24 12 39 8E 00 50 24  9E 39 99 22 D0 4C 45 41  |.$.9..P$.9.".LEA|
00001C20: 53 45 20 45 4E 54 45 52  20 44 41 54 45 20 12 C4  |SE ENTER DATE ..|
00001C30: C4 CD CD 92 3A 20 22 3B  3A 50 33 B2 34 3A 50 34  |....: ";:P3.4:P4|
00001C40: B2 34 3A 8D 33 30 30 30  30 3A 8D 32 35 30 30 30  |.4:.30000:.25000|
00001C50: 00 67 24 A3 39 8B 50 36  B2 31 A7 99 22 91 22 3B  |.g$.9.P6.1..".";|
00001C60: 3A 89 31 34 37 35 30 00  87 24 A8 39 8B 50 36 B2  |:.14750..$.9.P6.|
00001C70: 30 A7 44 54 24 B2 C9 28  50 24 2C 32 29 AA C8 28  |0.DT$..(P$,2)..(|
00001C80: 50 24 2C 32 29 3A 8E 00  B6 24 C0 5D 50 36 B2 30  |P$,2):...$.]P6.0|
00001C90: 3A 41 B2 C6 28 50 24 29  3A 8B 41 B3 36 35 B0 28  |:A..(P$):.A.65.(|
00001CA0: 41 B1 39 30 AF 41 B3 31  39 32 29 B0 41 B1 32 31  |A.90.A.192).A.21|
00001CB0: 38 A7 50 36 B2 31 00 BC  24 CA 5D 8E 00 CB 24 F2  |8.P6.1..$.]...$.|
00001CC0: 5D 8B 4E B2 30 A7 32 34  30 38 30 00 F0 24 FC 5D  |].N.0.24080..$.]|
00001CD0: 8B C8 28 54 52 24 28 4E  29 2C 34 29 B1 C8 28 54  |..(TR$(N),4)..(T|
00001CE0: 52 24 28 4E AB 31 29 2C  34 29 A7 32 34 30 38 30  |R$(N.1),4).24080|
00001CF0: 00 08 25 06 5E 8D 32 37  30 35 30 3A 4E B2 4E AB  |..%.^.27050:N.N.|
00001D00: 31 3A 89 32 34 30 35 30  00 1B 25 10 5E 45 4E B2  |1:.24050..%.^EN.|
00001D10: 45 4E AA 31 3A 46 32 B2  31 3A 8E 00 46 25 24 5E  |EN.1:F2.1:..F%$^|
00001D20: 99 44 54 24 A3 31 34 29  3B 3A 8B 48 52 24 B3 B1  |.DT$.14);:.HR$..|
00001D30: 22 22 A7 99 48 52 24 22  20 C8 4F 55 52 53 22 3A  |""..HR$" .OURS":|
00001D40: 99 A3 31 34 29 3B 00 5A  25 2E 5E 99 4E 41 24 3A  |..14);.Z%.^.NA$:|
00001D50: 99 A3 31 34 29 45 56 24  3A 8E 00 9C 25 A8 61 41  |..14)EV$:...%.aA|
00001D60: 4D 24 B2 22 33 31 32 38  33 31 33 30 33 31 33 30  |M$."312831303130|
00001D70: 33 31 33 31 33 30 33 31  33 30 33 31 22 3A 41 4C  |313130313031":AL|
00001D80: 24 B2 22 33 31 32 39 33  31 33 30 33 31 33 30 33  |$."3129313031303|
00001D90: 31 33 31 33 30 33 31 33  30 33 31 22 00 C2 25 16  |13130313031"..%.|
00001DA0: 62 50 36 B2 30 3A 8B 50  24 B3 B2 22 30 30 30 30  |bP6.0:.P$.."0000|
00001DB0: 22 B0 50 24 B1 22 33 31  31 32 22 A7 50 36 B2 31  |".P$."3112".P6.1|
00001DC0: 3A 8E 00 00 26 20 62 50  44 B2 C5 28 C8 28 50 24  |:...& bPD..(.(P$|
00001DD0: 2C 32 29 29 3A 50 4D B2  C5 28 C9 28 50 24 2C 32  |,2)):PM..(.(P$,2|
00001DE0: 29 29 3A 8B 50 4D B3 31  B0 50 4D B1 31 32 B0 50  |)):.PM.1.PM.12.P|
00001DF0: 44 B3 31 B0 50 44 B1 33  31 A7 50 36 B2 31 3A 8E  |D.1.PD.31.P6.1:.|
00001E00: 00 29 26 2C 62 41 52 B2  C5 28 59 52 24 29 AA 31  |.)&,bAR..(YR$).1|
00001E10: 39 30 30 3A 8B B5 28 41  52 AD 34 29 B2 41 52 AD  |900:..(AR.4).AR.|
00001E20: 34 A7 41 4D 24 B2 41 4C  24 00 49 26 2E 62 8B 50  |4.AM$.AL$.I&.b.P|
00001E30: 44 B1 C5 28 CA 28 41 4D  24 2C 50 4D AC 32 AB 31  |D..(.(AM$,PM.2.1|
00001E40: 2C 32 29 29 A7 50 36 B2  31 00 4F 26 30 62 8E 00  |,2)).P6.1.O&0b..|
00001E50: 7D 26 70 62 8B 50 24 B2  22 22 A7 50 24 B2 22 30  |}&pb.P$."".P$."0|
00001E60: 30 30 30 22 3A 99 22 13  11 11 11 11 11 11 1D 1D  |000":.".........|
00001E70: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 22 50 24 00 A9 26  |.........."P$..&|
00001E80: 75 62 50 36 B2 30 3A 41  24 B2 C8 28 50 24 2C 32  |ubP6.0:A$..(P$,2|
00001E90: 29 3A 8B 41 24 B3 22 30  30 22 B0 41 24 B1 22 32  |):.A$."00".A$."2|
00001EA0: 33 22 A7 50 36 B2 31 3A  8E 00 D0 26 7A 62 41 24  |3".P6.1:...&zbA$|
00001EB0: B2 C9 28 50 24 2C 32 29  3A 8B 41 24 B3 22 30 30  |..(P$,2):.A$."00|
00001EC0: 22 B0 41 24 B1 22 35 39  22 A7 50 36 B2 31 3A 8E  |".A$."59".P6.1:.|
00001ED0: 00 D6 26 84 62 8E 00 EF  26 90 65 99 22 20 81 12  |..&.b...&.e." ..|
00001EE0: D9 9A 92 45 53 2F 12 81  CE 9A 92 4F 3F 22 3B 00  |...ES/.....O?";.|
00001EF0: 0E 27 9A 65 A1 41 24 3A  8B 41 24 B3 B1 22 59 22  |.'.e.A$:.A$.."Y"|
00001F00: AF 41 24 B3 B1 22 4E 22  A7 32 36 30 31 30 00 21  |.A$.."N".26010.!|
00001F10: 27 A4 65 8B 41 24 B2 22  59 22 A7 50 36 B2 31 3A  |'.e.A$."Y".P6.1:|
00001F20: 8E 00 2C 27 AE 65 50 36  B2 32 3A 8E 00 74 27 F4  |..,'.eP6.2:..t'.|
00001F30: 65 99 22 93 D0 4C 45 41  53 45 20 45 4E 54 45 52  |e."..LEASE ENTER|
00001F40: 20 59 45 41 52 3A 20 31  39 20 22 3B 3A 50 33 B2  | YEAR: 19 ";:P3.|
00001F50: 32 3A 50 34 B2 32 3A 8D  33 30 30 30 30 3A 8B 50  |2:P4.2:.30000:.P|
00001F60: 24 B3 22 37 30 22 B0 50  24 B1 22 39 39 22 A7 32  |$."70".P$."99".2|
00001F70: 36 31 30 30 00 81 27 03  66 59 52 24 B2 50 24 3A  |6100..'.fYR$.P$:|
00001F80: 8E 00 90 27 78 69 8B 4E  B2 30 A7 32 37 30 33 30  |...'xi.N.0.27030|
00001F90: 00 B6 27 82 69 8B C8 28  54 52 24 28 4E 29 2C 34  |..'.i..(TR$(N),4|
00001FA0: 29 B1 B2 C8 28 54 52 24  28 4E AB 31 29 2C 34 29  |)...(TR$(N.1),4)|
00001FB0: A7 32 37 30 33 30 00 CE  27 8C 69 8D 32 37 30 35  |.27030..'.i.2705|
00001FC0: 30 3A 4E B2 4E AB 31 3A  89 32 37 30 30 30 00 FB  |0:N.N.1:.27000..|
00001FD0: 27 96 69 8B CA 28 54 52  24 28 4E 29 2C 35 2C 31  |'.i..(TR$(N),5,1|
00001FE0: 29 B2 22 31 22 A7 8D 32  37 30 36 30 3A 45 4E B2  |)."1"..27060:EN.|
00001FF0: 45 4E AA 31 3A 46 32 B2  31 3A 8E 00 27 28 AA 69  |EN.1:F2.1:..'(.i|
00002000: 41 24 B2 54 52 24 28 4E  29 3A 54 52 24 28 4E 29  |A$.TR$(N):TR$(N)|
00002010: B2 54 52 24 28 4E AB 31  29 3A 54 52 24 28 4E AB  |.TR$(N.1):TR$(N.|
00002020: 31 29 B2 41 24 3A 8E 00  32 28 B4 69 8B 4E B2 30  |1).A$:..2(.i.N.0|
00002030: A7 8E 00 4D 28 B9 69 8B  CA 28 54 52 24 28 4E AB  |...M(.i..(TR$(N.|
00002040: 31 29 2C 35 2C 31 29 B2  22 32 22 A7 8E 00 73 28  |1),5,1)."2"...s(|
00002050: BE 69 8B CA 28 54 52 24  28 4E 29 2C 36 2C 34 29  |.i..(TR$(N),6,4)|
00002060: B1 B2 CA 28 54 52 24 28  4E AB 31 29 2C 36 2C 34  |...(TR$(N.1),6,4|
00002070: 29 A7 8E 00 8B 28 C8 69  8D 32 37 30 35 30 3A 4E  |)....(.i.27050:N|
00002080: B2 4E AB 31 3A 89 32 37  30 36 30 00 9F 28 DC 69  |.N.1:.27060..(.i|
00002090: 5A 54 B2 30 3A 5A 42 B2  45 4E 3A 50 37 B2 30 00  |ZT.0:ZB.EN:P7.0.|
000020A0: D7 28 E1 69 5A 4D B2 5A  54 AA B5 28 28 5A 42 AB  |.(.iZM.ZT..((ZB.|
000020B0: 5A 54 29 AD 32 29 3A 5A  49 24 B2 C8 28 54 52 24  |ZT).2):ZI$..(TR$|
000020C0: 28 5A 4D 29 2C 58 58 29  3A 8B 5A 49 24 B2 5A 54  |(ZM),XX):.ZI$.ZT|
000020D0: 24 A7 32 37 32 33 30 00  E8 28 22 6A 8B 5A 54 B2  |$.27230..("j.ZT.|
000020E0: 5A 4D A7 32 37 34 37 30  00 09 29 36 6A 8B 5A 49  |ZM.27470..)6j.ZI|
000020F0: 24 B2 22 22 B0 5A 54 24  B1 5A 49 24 A7 5A 54 B2  |$."".ZT$.ZI$.ZT.|
00002100: 5A 4D 3A 89 32 37 31 30  35 00 1A 29 40 6A 5A 42  |ZM:.27105..)@jZB|
00002110: B2 5A 4D 3A 89 32 37 31  30 35 00 24 29 5E 6A 5A  |.ZM:.27105.$)^jZ|
00002120: 42 B2 5A 4D 00 36 29 68  6A 8B 5A 42 AB 31 B3 30  |B.ZM.6)hj.ZB.1.0|
00002130: A7 32 37 33 32 30 00 5E  29 72 6A 5A 49 24 B2 C8  |.27320.^)rjZI$..|
00002140: 28 54 52 24 28 5A 42 AB  31 29 2C 58 58 29 3A 8B  |(TR$(ZB.1),XX):.|
00002150: 5A 49 24 B3 B1 5A 54 24  A7 32 37 33 32 30 00 71  |ZI$..ZT$.27320.q|
00002160: 29 9A 6A 5A 42 B2 5A 42  AB 31 3A 89 32 37 32 34  |).jZB.ZB.1:.2724|
00002170: 30 00 7B 29 B8 6A 5A 54  B2 5A 4D 00 8E 29 C2 6A  |0.{).jZT.ZM..).j|
00002180: 8B 5A 54 AA 31 B1 45 4E  A7 32 37 34 31 30 00 B6  |.ZT.1.EN.27410..|
00002190: 29 CC 6A 5A 49 24 B2 C8  28 54 52 24 28 5A 54 AA  |).jZI$..(TR$(ZT.|
000021A0: 31 29 2C 58 58 29 3A 8B  5A 49 24 B3 B1 5A 54 24  |1),XX):.ZI$..ZT$|
000021B0: A7 32 37 34 31 30 00 C9  29 F4 6A 5A 54 B2 5A 54  |.27410..).jZT.ZT|
000021C0: AA 31 3A 89 32 37 33 33  30 00 D4 29 12 6B 50 37  |.1:.27330..).kP7|
000021D0: B2 31 3A 8E 00 DF 29 4E  6B 50 37 B2 32 3A 8E 00  |.1:...)NkP7.2:..|
000021E0: 1F 2A D0 6B 41 24 B2 54  52 24 28 4E 29 3A 44 54  |.*.kA$.TR$(N):DT|
000021F0: 24 B2 CA 28 41 24 2C 33  2C 32 29 AA 22 20 22 AA  |$..(A$,3,2)." ".|
00002200: 4D 4F 24 28 C5 28 C8 28  41 24 2C 32 29 29 29 3A  |MO$(.(.(A$,2))):|
00002210: 41 41 B2 C5 28 CA 28 41  24 2C 35 2C 31 29 29 00  |AA..(.(A$,5,1)).|
00002220: 49 2A DA 6B 41 24 B2 C9  28 41 24 2C C3 28 41 24  |I*.kA$..(A$,.(A$|
00002230: 29 AB 35 29 3A 8B 41 41  B3 B1 31 A7 48 52 24 B2  |).5):.AA..1.HR$.|
00002240: 22 22 3A 89 32 37 36 33  30 00 78 2A E9 6B 48 52  |"":.27630.x*.kHR|
00002250: 24 B2 C8 28 41 24 2C 32  29 AA 22 3A 22 AA CA 28  |$..(A$,2).":"..(|
00002260: 41 24 2C 33 2C 32 29 3A  41 24 B2 C9 28 41 24 2C  |A$,3,2):A$..(A$,|
00002270: C3 28 41 24 29 AB 34 29  00 9C 2A EE 6B 81 4D B2  |.(A$).4)..*.k.M.|
00002280: 31 A4 C3 28 41 24 29 3A  8B CA 28 41 24 2C 4D 2C  |1..(A$):..(A$,M,|
00002290: 31 29 B2 22 2A 22 A7 32  37 36 35 30 00 A3 2A F8  |1)."*".27650..*.|
000022A0: 6B 82 4D 00 C7 2A 02 6C  4E 41 24 B2 C8 28 41 24  |k.M..*.lNA$..(A$|
000022B0: 2C 4D AB 31 29 3A 45 56  24 B2 C9 28 41 24 2C C3  |,M.1):EV$..(A$,.|
000022C0: 28 41 24 29 AB 4D 29 00  FB 2A 0C 6C 8B 41 41 B2  |(A$).M)..*.l.AA.|
000022D0: 32 AF 28 45 56 24 B2 22  31 22 B0 45 56 24 B2 22  |2.(EV$."1".EV$."|
000022E0: 32 22 B0 45 56 24 B2 22  33 22 29 A7 45 56 24 B2  |2".EV$."3").EV$.|
000022F0: 54 54 24 28 C5 28 45 56  24 29 29 00 01 2B 16 6C  |TT$(.(EV$))..+.l|
00002300: 8E 00 3D 2B 34 6C 99 22  C4 41 54 45 22 A3 31 30  |..=+4l.".ATE".10|
00002310: 29 22 3A 20 22 44 54 24  22 20 31 39 22 59 52 24  |)": "DT$" 19"YR$|
00002320: 3A 8B 48 52 24 B3 B1 22  22 A7 99 22 11 C8 4F 55  |:.HR$.."".."..OU|
00002330: 52 22 A3 31 30 29 22 3A  20 22 48 52 24 00 6C 2B  |R".10)": "HR$.l+|
00002340: 48 6C 99 22 11 CE 41 4D  45 22 A3 31 30 29 22 3A  |Hl."..AME".10)":|
00002350: 20 22 4E 41 24 3A 99 22  11 C5 56 45 4E 54 22 A3  | "NA$:."..VENT".|
00002360: 31 30 29 22 3A 20 22 45  56 24 3A 8E 00 84 2B 3C  |10)": "EV$:...+<|
00002370: 73 81 51 B2 31 A4 50 33  3A 99 22 A4 22 3B 3A 82  |s.Q.1.P3:.".";:.|
00002380: 3A 99 3A 8E 00 A2 2B 68  74 99 22 13 22 3B 3A 8B  |:.:...+ht.".";:.|
00002390: 43 4F B1 31 A7 99 C8 28  43 4F 24 2C 43 4F AB 31  |CO.1...(CO$,CO.1|
000023A0: 29 3B 00 BA 2B 72 74 8B  4C 4E B1 31 A7 99 C8 28  |);..+rt.LN.1...(|
000023B0: 4C 4E 24 2C 4C 4E AB 31  29 3B 00 C0 2B 7C 74 8E  |LN$,LN.1);..+|t.|
000023C0: 00 CA 2B 30 75 99 22 3E  22 3B 00 FB 2B 3A 75 81  |..+0u.">";..+:u.|
000023D0: 51 B2 31 A4 50 33 3A 99  22 A4 22 3B 3A 82 51 3A  |Q.1.P3:.".";:.Q:|
000023E0: 81 51 B2 31 A4 50 33 3A  99 22 9D 22 3B 3A 82 51  |.Q.1.P3:.".";:.Q|
000023F0: 3A 50 24 B2 22 22 3A 50  58 B2 30 00 10 2C D0 75  |:P$."":PX.0..,.u|
00002400: A1 41 24 3A 8B 41 24 B2  22 22 A7 33 30 31 36 30  |.A$:.A$."".30160|
00002410: 00 2F 2C DA 75 41 B2 C6  28 41 24 29 3A 8B 41 B1  |./,.uA..(A$):.A.|
00002420: 31 39 31 AF 41 B3 32 31  39 A7 33 30 32 30 30 00  |191.A.219.30200.|
00002430: 6E 2C E4 75 8B 28 41 B1  33 31 AF 41 B3 B1 34 34  |n,.u.(A.31.A..44|
00002440: AF 41 B3 B1 33 34 AF 41  B3 B1 35 38 AF 41 B3 B1  |.A..34.A..58.A..|
00002450: 35 39 AF 41 B3 39 37 29  B0 41 B2 31 33 B0 41 B2  |59.A.97).A.13.A.|
00002460: 32 30 B0 41 B2 31 35 37  A7 33 30 32 30 30 00 79  |20.A.157.30200.y|
00002470: 2C EE 75 89 33 30 31 36  30 00 89 2C F8 75 8B 41  |,.u.30160..,.u.A|
00002480: B2 31 33 A7 33 30 33 32  30 00 99 2C 0C 76 8B 41  |.13.30320..,.v.A|
00002490: B2 32 30 A7 33 30 32 35  30 00 AA 2C 11 76 8B 50  |.20.30250..,.v.P|
000024A0: 58 B2 50 33 A7 33 30 31  36 30 00 BC 2C 16 76 8B  |X.P3.30160..,.v.|
000024B0: 41 B3 B1 31 35 37 A7 33  30 32 38 30 00 E3 2C 1B  |A..157.30280..,.|
000024C0: 76 50 58 B2 C3 28 50 24  29 3A 81 51 B2 31 A4 50  |vPX..(P$):.Q.1.P|
000024D0: 58 AA 31 3A 99 22 9D 22  3B 3A 82 51 3A 89 33 30  |X.1:.".";:.Q:.30|
000024E0: 30 30 30 00 F4 2C 2A 76  8B 50 24 B2 22 22 A7 33  |000..,*v.P$."".3|
000024F0: 30 31 36 30 00 21 2D 34  76 50 24 B2 C8 28 50 24  |0160.!-4vP$..(P$|
00002500: 2C C3 28 50 24 29 AB 31  29 3A 41 24 B2 22 9D A4  |,.(P$).1):A$."..|
00002510: 9D 22 3A 50 58 B2 50 58  AB 31 3A 89 33 30 33 30  |.":PX.PX.1:.3030|
00002520: 30 00 31 2D 48 76 8B C3  28 50 24 29 B2 50 33 A7  |0.1-Hv..(P$).P3.|
00002530: 8E 00 47 2D 52 76 50 24  B2 50 24 AA 41 24 3A 50  |..G-RvP$.P$.A$:P|
00002540: 58 B2 C3 28 50 24 29 00  57 2D 5C 76 99 41 24 3B  |X..(P$).W-\v.A$;|
00002550: 3A 89 33 30 31 36 30 00  6B 2D 70 76 8B C3 28 50  |:.30160.k-pv..(P|
00002560: 24 29 B3 50 34 A7 33 30  31 36 30 00 88 2D 7A 76  |$).P4.30160..-zv|
00002570: 81 51 B2 31 A4 50 58 AA  31 3A 99 22 9D 22 3B 3A  |.Q.1.PX.1:.".";:|
00002580: 82 3A 99 22 20 22 3A 8E  00 A0 2D AC 8A 81 51 B2  |.:." ":...-...Q.|
00002590: 31 A4 33 37 3A 99 22 C0  22 3B 3A 82 3A 99 3A 8E  |1.37:.".";:.:.:.|
000025A0: 00 E8 2D 50 C3 83 42 49  52 54 48 44 41 59 2C 57  |..-P..BIRTHDAY,W|
000025B0: 45 44 44 49 4E 47 2C 45  4E 47 41 47 45 4D 45 4E  |EDDING,ENGAGEMEN|
000025C0: 54 2C 4F 54 48 45 52 2C  4A 41 4E 55 41 52 59 2C  |T,OTHER,JANUARY,|
000025D0: 46 45 42 52 55 41 52 59  2C 4D 41 52 43 48 2C 41  |FEBRUARY,MARCH,A|
000025E0: 50 52 49 4C 2C 4D 41 59  00 22 2E 5A C3 83 4A 55  |PRIL,MAY.".Z..JU|
000025F0: 4E 45 2C 4A 55 4C 59 2C  41 55 47 55 53 54 2C 53  |NE,JULY,AUGUST,S|
00002600: 45 50 54 45 4D 42 45 52  2C 4F 43 54 4F 42 45 52  |EPTEMBER,OCTOBER|
00002610: 2C 4E 4F 56 45 4D 42 45  52 2C 44 45 43 45 4D 42  |,NOVEMBER,DECEMB|
00002620: 45 52 00 30 2E 38 C7 8F  20 56 32 2E 30 28 54 29  |ER.0.8.. V2.0(T)|
00002630: 00 00 00 39 32 35 00 49                           |...925.I        |
..?.... * 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:
";:...D.P3.16:P4.1:.30000:F$.P$:.:."..LO
AD. YOUR TAPE THEN .HIT. ANY KEY":..3...
.14600:.3,1,1,F$:.3,YR$:.3,EN:.N.0.EN.1:
.3,TR$(N):.: 3:.120.{.F..".DO YOU WISH T
O LOAD IMPORTANT DATES":."ONLY ";:.26000
:.P6.2.1400...K.." YES".P.P..".PLEASE EN
TER NAME OF FILE TO BE LOADED":.".MAX .1
6. CHARACTERS ";...Z.P3.16:P4.1:.30000:.
".PLEASE .LOAD. YOUR TAPE THEN .HIT. ANY
 KEY.":.14600.L.D..3,1,0,P$:.3,YR$:.3,EN
:M.0:.N.0.EN.1:.3,A$.O.I..J(A$,5,1)."2".
TR$(M).A$:M.M.1...N..N: 3:EN.M:YR$."":.1
20.S.X..".PLEASE ENTER NAME OF FILE TO B
E LOADED":.".MAX .16. CHARACTERS ";. ...
P3.16:P4.1:.30000:.".PLEASE .LOAD. YOUR 
TAPE THEN .HIT. ANY KEY.":.14600.Y.M..3,
1,0,P$:.3,YR$:.3,EN:.N.0.EN.1:.3,TR$(N):
.: 3:.120.L....YR$.""..26100......"...".
11)"SEARCH & RETRIEVE":..11)"...........
......".......7)".. 1 . DATES TO REMEMBE
R":..7)".. 2 . BROWSE THROUGH ENTRIES".4
.....7)".. 3 . STATEMENT  OF  ENTRIES":.
.7)".. 4 . SEARCH  BY  NAME".X.....7)"..
 5 . BACK  TO  MAIN  MENU":..11)"...PRES
S OPTION NUMBER"...&..14600:.E(A$).1850,
2120,2300,2700,120:.1830...:..TR$(0)."".
.".THERE ARE NO ENTRIES YET":.".HIT ANY 
KEY";:.14600:.1770.#.D..".ENTER MONTH RE
QUIRED: ";: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..".TH
ERE 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.N....N:
."..HIT ANY KEY TO CONTINUE.":.14600:M.N
:.1880.S....".ANY OTHER";:.26000:.P6.1.1
860.}....1770.G.H..TR$(0).""..".THERE AR
E NO ENTRIES YET":.".HIT ANY KEY";:.1460
0:.1770...M..".BROWSING STARTS ON/BEFORE
 DATE ENTERED":.:.14750.".R.ZT$.DT$:XX.4
:.27100:.P7.2.2240.3.W..ZB.ZT.ZT.ZB.B.\.
N.ZT:PO.ZT.W.F..".ENTRY NO ";N.1:.".....
......":.:.27600:.27700...P.LN.20:CO.1:.
29800:.".PRESS:. .+. FOR BROWSING FORWAR
D"...Z...7)".-. FOR BROWSING BACKWARD":.
.7)".S. TO STOP"......A$:.A$.."+".A$.."-
".A$.."S".2180......A$."+".2220.0....A$.
"-".2230.:....1770.U....N.1..EN.1.N.N.1:
.2150._....2180.W....N.1..0.N.N.1:.2150.
.....2180.....N.ZM:.2150.Y....TR$(0)."".
.".THERE ARE NO ENTRIES YET":.".HIT ANY 
KEY":.14600:.1770......".STATEMENT WILL 
START FROM DATE ENTERED":.:.14750.5....D
T$.H(TR$(EN.1),4).PS.EN:.2317.V....DT$..
H(TR$(0),4).PS.0:.2317.....ZT$.DT$:XX.4:
.27100:.P7.2.PS.ZB:.2317......ZB.ZT.ZT.Z
B.....PS.ZT.I...DT$.I(DT$,2)." ".MO$(E(H
(DT$,2))):.FP.1........".ENTRIES STARTIN
G "DT$" 19"YR$:.:.N.PS .PS.5.$.$..N.EN..
"......END OF ENTRIES":.2360.9....27600:
.24100:.N.R.8.."..PRESS:. .-. FOR PREVIO
US PAGE".29)".M. FOR MENU"...B...7)".+. 
FOR NEXT PAGE"...~..A$:.A$.."+".A$.."M".
A$.."-".2430.E....A$."M".1770......A$."+
".N.EN.PS.N:.2320......A$."-".PS.0.PS.PS
.6:.2465......2430.+....PS..0.PS.0:DT$."
0101":.2317.F...DT$.H(TR$(PS),4):.2317..
.D..TR$(0).""..".THERE ARE NO ENTRIES YE
T":.".HIT ANY KEY":.14600:.120...E..9000
:.P6.2.120...F..".".9)"DO YOU WISH TO PR
INT:":..9)"... 1 . ALL ENTRIES".. H...9)
".. 2 . A SPECIFIED NUMBER".! J..A$:.A$.
."1".A$.."2".2506.9 K..A$."1".NU.EN:.251
5.] M..".TOTAL ENTRIES IN MEMORY: "EN.. 
N..".ENTER NUMBER REQUIRED  ";:P3.3:P4.1
:.30000:A.E(P$).. P..A..0.A.EN.."...":.2
510.A R.NU.PS.A.1.U S.FP.1:.2303:FP.0..!
X..53265,11:.4,4,7:.4,G(15):D$.G(16):E$.
G(17).0!...4,E$"ENTRIES STARTING "DT$" 1
9"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
 OF ENTRIES":.2650..!...27600:.4,E$DT$;:
.HR$..""..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
.Z"...".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".27
50.."...J(TR$(N),10,C(P$)).P$..27600:.24
100:C.C.1:.2755..#...J(TR$(N),6,C(P$)).P
$..27600:.24100:C.C.1.+#C..C.7.2770.A#H.
.C.7..(C.7)..2800.H#R..N.K#...C.0..".SOR
RY NO ENTRY FOR "P$..#...".ANY OTHER";:.
26000:.P6.1.2700..#...1770..#..."..HIT A
NY KEY TO CONTINUE.":.14600:.".ENTRIES F
OR: "P$:.:...#(#.".ARE YOU SURE";:.26000
:...$.9.A$:.A$."".14600..$.9..P$.9."PLEA
SE ENTER DATE .DDMM.: ";:P3.4:P4.4:.3000
0:.25000.G$.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]..K$.
].N.0.24080..$.].H(TR$(N),4).H(TR$(N.1),
4).24080..%.^.27050:N.N.1:.24050..%.^EN.
EN.1:F2.1:..F%$^.DT$.14);:.HR$..""..HR$"
 HOURS":..14);.Z%.^.NA$:..14)EV$:...%.AA
M$."312831303130313130313031":AL$."31293
1303130313130313031".B%.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
$.I&.B.PD.E(J(AM$,PM.2.1,2)).P6.1.O&0B..
}&PB.P$."".P$."0000":.".................
.."P$..&UBP6.0:A$.H(P$,2):.A$."00".A$."2
3".P6.1:..P&ZBA$.I(P$,2):.A$."00".A$."59
".P6.1:..V&.B...&.E." ..Y..ES/..N..O?";.
.'.E.A$:.A$.."Y".A$.."N".26010.!'.E.A$."
Y".P6.1:..,'.EP6.2:..T'.E.".PLEASE ENTER
 YEAR: 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.N
'.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$:..2(.I.N.0
...M(.I.J(TR$(N.1),5,1)."2"...S(.I.J(TR$
(N),6,4)..J(TR$(N.1),6,4)....(HI.27050:N
.N.1:.27060..(.IZT.0:ZB.EN:P7.0.W(.IZM.Z
T..((ZB.ZT).2):ZI$.H(TR$(ZM),XX):.ZI$.ZT
$.27230..("J.ZT.ZM.27470..)6J.ZI$."".ZT$
.ZI$.ZT.ZM:.27105..)@JZB.ZM:.27105.$)^JZ
B.ZM.6)HJ.ZB.1.0.27320.^)RJZI$.H(TR$(ZB.
1),XX):.ZI$..ZT$.27320.Q).JZB.ZB.1:.2724
0.{).JZT.ZM..)BJ.ZT.1.EN.27410..)LJZI$.H
(TR$(ZT.1),XX):.ZI$..ZT$.27410.I).JZT.ZT
.1:.27330.T).KP7.1:...)NKP7.2:...*PKA$.T
R$(N):DT$.J(A$,3,2)." ".MO$(E(H(A$,2))):
AA.E(J(A$,5,1)).I*ZKA$.I(A$,C(A$).5):.AA
..1.HR$."":.27630.X*.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.G*.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$.L+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..J+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.N,.U.(A.31.A..44
.A..34.A..58.A..59.A.97).A.13.A.20.A.157
.30200.Y,.U.30160..,.U.A.13.30320..,.V.A
.20.30250..,.V.PX.P3.30160..,.V.A..157.3
0280..,.VPX.C(P$):.Q.1.PX.1:.".";:.Q:.30
000..,*V.P$."".30160.!-4VP$.H(P$,C(P$).1
):A$."...":PX.PX.1:.30300.1-HV.C(P$).P3.
..G-RVP$.P$.A$:PX.C(P$).W-\V.A$;:.30160.
K-PV.C(P$).P4.30160..-ZV.Q.1.PX.1:.".";:
.:." ":.. -...Q.1.37:.".";:.:.:...-PC.BI
RTHDAY,WEDDING,ENGAGEMENT,OTHER,JANUARY,
FEBRUARY,MARCH,APRIL,MAY.".ZC.JUNE,JULY,
AUGUST,SEPTEMBER,OCTOBER,NOVEMBER,DECEMB
ER.0.8G. V2.0(T)...925.I
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL