DIARY MANAGER
FILE INFORMATION
FILENAME(S): DIARY MANAGER
FILE TYPE(S): PRG
FILE SIZE: 10K
FIRST SEEN: 2025-11-30 20:19:04
APPEARS ON: 1 disk(s)
FILE HASH
c2c12be5251e142c591e25eca47f81c866fdbca48ca267643fbb032ec635a9e6
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| JAYCE INC | DIARY MANAGER | PRG | Curtcool, Malcom | 33 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 40 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 20 41 42 52 41 53 43 4F 20 4C 54 44 |983 ABRASCO LTD|
00000040: 00 90 08 46 00 99 22 93 22 3A 97 35 33 32 38 30 |...F..".":.53280|
00000050: 2C 36 3A 48 4F 24 B2 22 C8 41 4E 47 2D 4F 4E 20 |,6:HO$.".ANG-ON |
00000060: 57 48 49 4C 45 20 53 45 41 52 43 48 49 4E 47 22 |WHILE SEARCHING"|
00000070: 3A 48 56 24 B2 22 C8 41 56 45 20 46 4F 55 4E 44 |:HV$.".AVE FOUND|
00000080: 20 54 48 45 20 46 4F 4C 4C 4F 57 49 4E 47 3A 22 | THE FOLLOWING:"|
00000090: 00 A4 08 50 00 97 35 33 32 37 32 2C 32 33 3A 99 |...P..53272,23:.|
000000A0: C7 28 38 29 00 F5 08 5A 00 45 4E B2 30 3A 50 45 |.(8)...Z.EN.0:PE|
000000B0: 24 B2 22 93 D0 4C 45 41 53 45 20 45 4E 54 45 52 |$."..LEASE ENTER|
000000C0: 20 54 48 45 20 46 4F 4C 4C 4F 57 49 4E 47 20 49 | THE FOLLOWING I|
000000D0: 4E 46 4F 52 4D 41 54 49 4F 4E 3A 22 3A 86 4D 4F |NFORMATION:":.MO|
000000E0: 24 28 31 32 29 2C 54 54 24 28 34 29 2C 54 52 24 |$(12),TT$(4),TR$|
000000F0: 28 34 35 35 29 00 3D 09 69 00 81 4E B2 31 A4 34 |(455).=.i..N.1.4|
00000100: 3A 87 54 54 24 28 4E 29 3A 82 3A 81 4E B2 31 A4 |:.TT$(N):.:.N.1.|
00000110: 31 32 3A 87 4D 4F 24 28 4E 29 3A 82 3A 53 50 24 |12:.MO$(N):.:SP$|
00000120: B2 22 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 20 22 00 8F 09 | "...|
00000140: 6E 00 43 4F 24 B2 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |n.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 1D 22 3A |..............":|
00000170: 4C 4E 24 B2 22 11 11 11 11 11 11 11 11 11 11 11 |LN$."...........|
00000180: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 00 |..............".|
00000190: D4 09 78 00 99 22 93 22 3B 3A 8D 33 35 35 30 30 |..x..".";:.35500|
000001A0: 3A 99 22 12 81 20 20 20 20 20 20 C4 A0 C9 A0 C1 |:.".. .....|
000001B0: A0 D2 A0 D9 A0 A0 A0 CD A0 C1 A0 CE A0 C1 A0 C7 |................|
000001C0: A0 C5 A0 D2 A0 A0 A0 A0 A0 A0 92 9A 22 3A 8D 33 |............":.3|
000001D0: 35 35 30 30 00 18 0A 7D 00 99 A3 38 29 22 11 11 |5500...}...8)"..|
000001E0: 12 81 20 D0 52 45 53 53 20 92 9A 20 CF 50 54 49 |.. .RESS .. .PTI|
000001F0: 4F 4E 20 CE 55 4D 42 45 52 3A 22 3A 99 A3 38 29 |ON .UMBER:":..8)|
00000200: 22 11 11 11 12 81 20 31 20 92 9A 20 CE 45 57 20 |"..... 1 .. .EW |
00000210: 45 4E 54 52 49 45 53 22 00 56 0A 8C 00 99 A3 38 |ENTRIES".V.....8|
00000220: 29 22 11 81 12 20 32 20 9A 92 20 C4 45 4C 45 54 |)"... 2 .. .ELET|
00000230: 49 4F 4E 53 22 3A 99 A3 38 29 22 11 81 12 20 33 |IONS":..8)"... 3|
00000240: 20 9A 92 20 D3 45 41 52 43 48 20 26 20 D2 45 54 | .. .EARCH & .ET|
00000250: 52 49 45 56 45 22 00 95 0A 96 00 99 A3 38 29 22 |RIEVE".......8)"|
00000260: 11 81 12 20 34 20 9A 92 20 D0 52 49 4E 54 20 44 |... 4 .. .RINT D|
00000270: 45 54 41 49 4C 53 22 3A 99 A3 38 29 22 11 81 12 |ETAILS":..8)"...|
00000280: 20 35 20 9A 92 20 CC 4F 41 44 2F D3 41 56 45 20 | 5 .. .OAD/.AVE |
00000290: 44 41 54 41 22 00 B1 0A A0 00 99 A3 38 29 22 11 |DATA".......8)".|
000002A0: 81 12 20 36 20 9A 92 20 D3 49 47 4E 2D 4F 46 46 |.. 6 .. .IGN-OFF|
000002B0: 22 00 E3 0A B4 00 8D 31 34 36 30 30 3A 91 C5 28 |"......14600:..(|
000002C0: 41 24 29 89 33 30 30 2C 39 30 30 2C 31 37 30 30 |A$).300,900,1700|
000002D0: 2C 32 35 30 30 2C 31 31 30 30 2C 31 38 35 3A 89 |,2500,1100,185:.|
000002E0: 31 38 30 00 F7 0A B9 00 8D 39 30 30 30 3A 8B 50 |180......9000:.P|
000002F0: 36 B2 32 A7 31 32 30 00 35 0B BE 00 99 22 93 11 |6.2.120.5...."..|
00000300: 22 A3 39 29 22 4F 4B 2C 20 4E 4F 57 20 53 49 47 |".9)"OK, NOW SIG|
00000310: 4E 49 4E 47 2D 4F 46 46 22 3A 97 35 33 32 38 30 |NING-OFF":.53280|
00000320: 2C 31 34 3A 99 C7 28 39 29 3A 97 35 33 32 37 32 |,14:..(9):.53272|
00000330: 2C 32 31 3A 80 00 48 0B 2C 01 8B 59 52 24 B2 22 |,21:..H.,..YR$."|
00000340: 22 A7 8D 32 36 31 30 30 00 58 0B 2F 01 8B 45 4E |"..26100.X./..EN|
00000350: B3 34 35 35 A7 33 31 30 00 9C 0B 31 01 99 22 93 |.455.310...1..".|
00000360: D3 4F 52 52 59 2C 20 4E 4F 20 4D 4F 52 45 20 52 |.ORRY, NO MORE R|
00000370: 4F 4F 4D 20 49 4E 20 4D 45 4D 4F 52 59 22 3A 99 |OOM IN MEMORY":.|
00000380: 22 11 12 C8 49 54 20 41 4E 59 20 4B 45 59 92 22 |"...IT ANY KEY."|
00000390: 3A 8D 31 34 36 30 30 3A 89 31 32 30 00 DE 0B 36 |:.14600:.120...6|
000003A0: 01 99 22 93 11 11 11 22 A3 39 29 22 CE A0 C5 A0 |.."....".9)"....|
000003B0: D7 A0 A0 A0 C5 A0 CE A0 D4 A0 D2 A0 C9 A0 C5 A0 |................|
000003C0: D3 22 3A 99 A3 39 29 22 A3 A3 A3 A3 A3 A3 A3 A3 |.":..9)"........|
000003D0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 00 1C |............."..|
000003E0: 0C 40 01 99 A3 39 29 22 11 12 20 31 20 92 20 C4 |.@...9)".. 1 . .|
000003F0: 41 54 45 53 20 54 4F 20 52 45 4D 45 4D 42 45 52 |ATES TO REMEMBER|
00000400: 22 3A 99 A3 39 29 22 11 12 20 32 20 92 20 C4 41 |":..9)".. 2 . .A|
00000410: 49 4C 59 20 45 4E 54 52 49 45 53 22 00 5E 0C 54 |ILY ENTRIES".^.T|
00000420: 01 99 A3 39 29 22 11 12 20 33 20 92 20 C2 41 43 |...9)".. 3 . .AC|
00000430: 4B 20 54 4F 20 4D 41 49 4E 20 4D 45 4E 55 22 3A |K TO MAIN MENU":|
00000440: 99 A3 39 29 22 11 11 12 20 D0 52 45 53 53 20 4F |..9)"... .RESS O|
00000450: 50 54 49 4F 4E 20 4E 55 4D 42 45 52 20 22 00 81 |PTION NUMBER "..|
00000460: 0C 68 01 8D 31 34 36 30 30 3A 91 C5 28 41 24 29 |.h..14600:..(A$)|
00000470: 89 35 35 30 2C 33 38 30 2C 31 32 30 3A 89 33 36 |.550,380,120:.36|
00000480: 30 00 C7 0C 7C 01 99 50 45 24 3A 99 22 11 11 C4 |0...|..PE$:."...|
00000490: 41 54 45 20 12 C4 C4 CD CD 92 3A 20 20 22 3B 3A |ATE ......: ";:|
000004A0: 50 33 B2 34 3A 8D 32 39 35 30 30 3A 99 22 11 11 |P3.4:.29500:."..|
000004B0: C8 4F 55 52 20 12 C8 C8 CD CD 92 3A 20 20 22 3B |.OUR ......: ";|
000004C0: 3A 8D 32 39 35 30 30 00 05 0D 86 01 99 22 11 11 |:.29500......"..|
000004D0: CE 41 4D 45 20 20 20 20 20 3A 20 20 22 3B 3A 50 |.AME : ";:P|
000004E0: 33 B2 32 35 3A 8D 32 39 35 30 30 3A 99 22 11 11 |3.25:.29500:."..|
000004F0: C5 56 45 4E 54 20 20 20 20 3A 20 20 22 3B 3A 8D |.VENT : ";:.|
00000500: 32 39 35 30 30 00 3E 0D 90 01 4C 4E B2 34 3A 8D |29500.>...LN.4:.|
00000510: 32 39 38 30 30 3A 99 A3 31 31 29 3B 3A 50 33 B2 |29800:..11);:P3.|
00000520: 34 3A 50 34 B2 34 3A 8D 33 30 30 30 30 3A 8D 32 |4:P4.4:.30000:.2|
00000530: 35 30 30 30 3A 8B 50 36 B2 31 A7 34 30 30 00 56 |5000:.P6.1.400.V|
00000540: 0D 9F 01 44 54 24 B2 C9 28 50 24 2C 32 29 AA C8 |...DT$..(P$,2)..|
00000550: 28 50 24 2C 32 29 00 90 0D A4 01 99 22 11 11 22 |(P$,2)......".."|
00000560: A3 31 31 29 3B 3A 50 33 B2 34 3A 50 34 B2 30 3A |.11);:P3.4:P4.0:|
00000570: 8D 33 30 30 30 30 3A 8D 32 35 32 30 30 3A 8B 50 |.30000:.25200:.P|
00000580: 36 B2 31 A7 99 22 91 91 91 91 22 3A 89 34 32 30 |6.1.."....":.420|
00000590: 00 9B 0D AE 01 48 52 24 B2 50 24 00 C7 0D B8 01 |.....HR$.P$.....|
000005A0: 99 22 11 11 22 A3 31 31 29 3B 3A 50 33 B2 32 35 |."..".11);:P3.25|
000005B0: 3A 50 34 B2 30 3A 8D 33 30 30 30 30 3A 8B 50 24 |:P4.0:.30000:.P$|
000005C0: B2 22 22 A7 34 35 30 00 E5 0D BD 01 8D 32 34 30 |."".450......240|
000005D0: 30 30 3A 8B 50 36 B2 31 A7 99 22 91 91 91 91 22 |00:.P6.1.."...."|
000005E0: 3A 89 34 34 30 00 F0 0D C2 01 4E 41 24 B2 50 24 |:.440.....NA$.P$|
000005F0: 00 2B 0E CC 01 99 22 11 11 22 A3 31 31 29 3B 3A |.+...."..".11);:|
00000600: 50 33 B2 32 35 3A 50 34 B2 31 3A 8D 33 30 30 30 |P3.25:P4.1:.3000|
00000610: 30 3A 8D 32 34 30 30 30 3A 8B 50 36 B2 31 A7 99 |0:.24000:.P6.1..|
00000620: 22 91 91 91 91 22 3A 89 34 36 30 00 5A 0E E0 01 |"....":.460.Z...|
00000630: 45 56 24 B2 50 24 3A 99 22 11 11 11 11 1D 1D 1D |EV$.P$:.".......|
00000640: 1D C1 43 43 45 50 54 22 3B 3A 8D 32 36 30 30 30 |..CCEPT";:.26000|
00000650: 3A 8B 50 36 B2 32 A7 33 38 30 00 A3 0E F4 01 99 |:.P6.2.380......|
00000660: 22 93 C8 41 4E 47 2D 4F 4E 20 57 48 49 4C 45 20 |"..ANG-ON WHILE |
00000670: 50 4F 53 54 49 4E 47 22 3A 4E B2 45 4E 3A 54 52 |POSTING":N.EN:TR|
00000680: 24 28 4E 29 B2 44 54 24 AA 22 31 22 AA 48 52 24 |$(N).DT$."1".HR$|
00000690: AA 4E 41 24 AA 22 2A 22 AA 45 56 24 3A 8D 32 37 |.NA$."*".EV$:.27|
000006A0: 30 30 30 00 D2 0E FE 01 99 22 11 11 CF 4B 2C 20 |000......"...K, |
000006B0: 41 4E 59 20 4F 54 48 45 52 20 45 4E 54 52 59 22 |ANY OTHER ENTRY"|
000006C0: 3B 3A 8D 32 36 30 30 30 3A 8B 50 36 B2 31 A7 33 |;:.26000:.P6.1.3|
000006D0: 38 30 00 DB 0E 08 02 89 33 31 30 00 25 0F 26 02 |80......310.%.&.|
000006E0: 99 50 45 24 3A 99 22 11 11 C4 41 54 45 20 12 C4 |.PE$:."...ATE ..|
000006F0: C4 CD CD 92 3A 20 20 22 3B 3A 50 33 B2 34 3A 8D |....: ";:P3.4:.|
00000700: 32 39 35 30 30 3A 99 22 11 11 CE 41 4D 45 20 20 |29500:."...AME |
00000710: 20 20 20 3A 20 20 22 3B 3A 50 33 B2 32 35 3A 8D | : ";:P3.25:.|
00000720: 32 39 35 30 30 00 6F 0F 30 02 99 22 11 11 C5 56 |29500.o.0.."...V|
00000730: 45 4E 54 20 20 20 20 3A 20 20 31 2E 20 22 54 54 |ENT : 1. "TT|
00000740: 24 28 31 29 22 20 20 20 32 2E 20 22 54 54 24 28 |$(1)" 2. "TT$(|
00000750: 32 29 3A 99 A3 31 32 29 22 33 2E 20 22 54 54 24 |2):..12)"3. "TT$|
00000760: 28 33 29 22 20 34 2E 20 22 54 54 24 28 34 29 00 |(3)" 4. "TT$(4).|
00000770: A8 0F 62 02 4C 4E B2 34 3A 8D 32 39 38 30 30 3A |..b.LN.4:.29800:|
00000780: 99 A3 31 31 29 3B 3A 50 33 B2 34 3A 50 34 B2 34 |..11);:P3.4:P4.4|
00000790: 3A 8D 33 30 30 30 30 3A 8D 32 35 30 30 30 3A 8B |:.30000:.25000:.|
000007A0: 50 36 B2 31 A7 36 31 30 00 C0 0F 69 02 44 54 24 |P6.1.610...i.DT$|
000007B0: B2 C9 28 50 24 2C 32 29 AA C8 28 50 24 2C 32 29 |..(P$,2)..(P$,2)|
000007C0: 00 FB 0F 6C 02 99 22 11 11 22 A3 31 31 29 3B 3A |...l.."..".11);:|
000007D0: 50 33 B2 32 35 3A 50 34 B2 31 3A 8D 33 30 30 30 |P3.25:P4.1:.3000|
000007E0: 30 3A 8D 32 34 30 30 30 3A 8B 50 36 B2 31 A7 99 |0:.24000:.P6.1..|
000007F0: 22 91 91 91 22 3B 3A 89 36 32 30 00 12 10 74 02 |"...";:.620...t.|
00000800: 4E 41 24 B2 50 24 3A 99 A3 31 31 29 22 11 11 3E |NA$.P$:..11)"..>|
00000810: 22 3B 00 2D 10 76 02 A1 41 24 3A 8B 41 24 B3 22 |";.-.v..A$:.A$."|
00000820: 31 22 B0 41 24 B1 22 34 22 A7 36 33 30 00 53 10 |1".A$."4".630.S.|
00000830: 79 02 99 53 50 24 3A 99 A3 31 31 29 53 50 24 3A |y..SP$:..11)SP$:|
00000840: 99 22 91 91 22 3B 3A 8B 41 24 B3 B1 22 34 22 A7 |."..";:.A$.."4".|
00000850: 36 34 30 00 88 10 7B 02 50 33 B2 32 35 3A 50 34 |640...{.P3.25:P4|
00000860: B2 31 3A 99 A3 31 31 29 3B 3A 8D 33 30 30 30 30 |.1:..11);:.30000|
00000870: 3A 8D 32 34 30 30 30 3A 8B 50 36 B2 31 A7 99 22 |:.24000:.P6.1.."|
00000880: 91 22 3B 3A 89 36 33 35 00 97 10 7D 02 41 24 B2 |.";:.635...}.A$.|
00000890: 50 24 3A 89 36 35 30 00 B5 10 80 02 99 A3 31 32 |P$:.650.......12|
000008A0: 29 54 54 24 28 C5 28 41 24 29 29 3A 99 A3 31 31 |)TT$(.(A$)):..11|
000008B0: 29 22 91 20 22 00 E3 10 8A 02 45 56 24 B2 41 24 |)". ".....EV$.A$|
000008C0: 3A 99 22 11 11 11 1D 1D 1D 1D C1 43 43 45 50 54 |:."........CCEPT|
000008D0: 22 3B 3A 8D 32 36 30 30 30 3A 8B 50 36 B2 32 A7 |";:.26000:.P6.2.|
000008E0: 35 35 30 00 28 11 DA 02 99 22 93 C8 41 4E 47 2D |550.(...."..ANG-|
000008F0: 4F 4E 20 57 48 49 4C 45 20 50 4F 53 54 49 4E 47 |ON WHILE POSTING|
00000900: 22 3A 4E B2 45 4E 3A 54 52 24 28 4E 29 B2 44 54 |":N.EN:TR$(N).DT|
00000910: 24 AA 22 32 22 AA 4E 41 24 AA 22 2A 22 AA 45 56 |$."2".NA$."*".EV|
00000920: 24 3A 8D 32 34 30 35 30 00 57 11 E4 02 99 22 11 |$:.24050.W....".|
00000930: 11 CF 4B 2C 20 41 4E 59 20 4F 54 48 45 52 20 45 |..K, ANY OTHER E|
00000940: 4E 54 52 59 22 3B 3A 8D 32 36 30 30 30 3A 8B 50 |NTRY";:.26000:.P|
00000950: 36 B2 31 A7 35 35 30 00 60 11 F8 02 89 33 31 30 |6.1.550.`....310|
00000960: 00 A9 11 84 03 8B 54 52 24 28 30 29 B2 22 22 A7 |......TR$(0)."".|
00000970: 99 22 93 D4 48 45 52 45 20 41 52 45 20 4E 4F 20 |."..HERE ARE NO |
00000980: 45 4E 54 52 49 45 53 20 59 45 54 22 3A 99 22 11 |ENTRIES YET":.".|
00000990: C8 49 54 20 41 4E 59 20 4B 45 59 22 3B 3A 8D 31 |.IT ANY KEY";:.1|
000009A0: 34 36 30 30 3A 89 31 32 30 00 BD 11 87 03 8D 39 |4600:.120......9|
000009B0: 30 30 30 3A 8B 50 36 B2 32 A7 31 32 30 00 D0 11 |000:.P6.2.120...|
000009C0: 89 03 8B 59 52 24 B2 22 22 A7 8D 32 36 31 30 30 |...YR$.""..26100|
000009D0: 00 0C 12 8E 03 99 22 93 22 A3 37 29 22 2A 2A 20 |......".".7)"** |
000009E0: C4 A0 C5 A0 CC A0 C5 A0 D4 A0 C9 A0 CF A0 CE A0 |................|
000009F0: D3 20 2A 2A 22 3A 99 22 11 11 22 3B 3A 8D 31 34 |. **":."..";:.14|
00000A00: 37 35 30 3A 99 22 11 11 22 48 4F 24 00 2F 12 A2 |750:.".."HO$./..|
00000A10: 03 5A 54 24 B2 44 54 24 3A 58 58 B2 34 3A 8D 32 |.ZT$.DT$:XX.4:.2|
00000A20: 37 31 30 30 3A 8B 50 37 B2 32 A7 31 30 35 35 00 |7100:.P7.2.1055.|
00000A30: 40 12 AC 03 8B 5A 54 B3 5A 42 A7 5A 42 B2 5A 54 |@....ZT.ZB.ZB.ZT|
00000A40: 00 49 12 B6 03 4E B2 5A 42 00 7E 12 C0 03 99 22 |.I...N.ZB.~...."|
00000A50: 93 C5 4E 54 52 59 20 4E 4F 20 22 4E AA 31 3A 99 |..NTRY NO "N.1:.|
00000A60: 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 3A 99 |"............":.|
00000A70: 3A 8D 32 37 36 30 30 3A 8D 32 37 37 30 30 00 C6 |:.27600:.27700..|
00000A80: 12 CA 03 4C 4E B2 32 30 3A 43 4F B2 31 3A 8D 32 |...LN.20:CO.1:.2|
00000A90: 39 38 30 30 3A 99 22 12 D0 52 45 53 53 3A 92 20 |9800:."..RESS:. |
00000AA0: 12 C4 92 20 D4 4F 20 44 45 4C 45 54 45 22 3A 99 |... .O DELETE":.|
00000AB0: A3 37 29 22 12 2B 92 20 D4 4F 20 47 4F 20 46 4F |.7)".+. .O GO FO|
00000AC0: 52 57 41 52 44 22 00 E4 12 D4 03 99 A3 37 29 22 |RWARD".......7)"|
00000AD0: 12 CD 92 20 D4 4F 20 45 58 49 54 20 54 4F 20 4D |... .O EXIT TO M|
00000AE0: 45 4E 55 22 00 FC 12 DE 03 8D 31 34 36 30 30 3A |ENU"......14600:|
00000AF0: 8B 41 24 B2 22 44 22 A7 31 30 31 30 00 1D 13 E8 |.A$."D".1010....|
00000B00: 03 8B 41 24 B2 22 2B 22 AF 4E AA 31 B3 B2 45 4E |..A$."+".N.1..EN|
00000B10: AB 31 A7 4E B2 4E AA 31 3A 89 39 36 30 00 2D 13 |.1.N.N.1:.960.-.|
00000B20: ED 03 8B 41 24 B2 22 4D 22 A7 31 32 30 00 36 13 |...A$."M".120.6.|
00000B30: EF 03 89 39 39 30 00 5A 13 F2 03 99 22 93 C8 41 |...990.Z...."..A|
00000B40: 4E 47 2D 4F 4E 20 57 48 49 4C 45 20 44 45 4C 45 |NG-ON WHILE DELE|
00000B50: 54 49 4E 47 22 3A 50 4F B2 4E 00 8A 13 FC 03 81 |TING":PO.N......|
00000B60: 4E B2 50 4F A4 45 4E AB 31 3A 54 52 24 28 4E 29 |N.PO.EN.1:TR$(N)|
00000B70: B2 54 52 24 28 4E AA 31 29 3A 82 3A 45 4E B2 45 |.TR$(N.1):.:EN.E|
00000B80: 4E AB 31 3A 99 22 11 CF 4B 22 00 B7 13 06 04 99 |N.1:."..K"......|
00000B90: 22 11 C1 4E 59 20 4F 54 48 45 52 20 44 45 4C 45 |"..NY OTHER DELE|
00000BA0: 54 49 4F 4E 22 3B 3A 8D 32 36 30 30 30 3A 8B 50 |TION";:.26000:.P|
00000BB0: 36 B2 31 A7 39 31 30 00 C0 13 10 04 89 31 32 30 |6.1.910......120|
00000BC0: 00 F4 13 1F 04 99 22 11 C8 41 56 45 20 4E 4F 54 |......"..AVE NOT|
00000BD0: 20 46 4F 55 4E 44 20 41 4E 59 20 45 4E 54 52 59 | FOUND ANY ENTRY|
00000BE0: 20 4F 4E 20 54 48 49 53 20 44 41 54 45 22 3A 89 | ON THIS DATE":.|
00000BF0: 31 30 33 30 00 08 14 4C 04 8D 39 30 30 30 3A 8B |1030...L..9000:.|
00000C00: 50 36 B2 32 A7 31 32 30 00 3B 14 51 04 99 22 93 |P6.2.120.;.Q..".|
00000C10: 11 11 11 11 11 11 11 11 11 11 C4 4F 20 59 4F 55 |...........O YOU|
00000C20: 20 57 49 53 48 20 54 4F 20 12 CC 92 4F 41 44 20 | WISH TO ...OAD |
00000C30: 4F 52 20 12 D3 92 41 56 45 3F 22 00 59 14 56 04 |OR ...AVE?".Y.V.|
00000C40: A1 41 24 3A 8B 41 24 B3 B1 22 4C 22 AF 41 24 B3 |.A$:.A$.."L".A$.|
00000C50: B1 22 53 22 A7 31 31 31 30 00 6A 14 60 04 8B 41 |."S".1110.j.`..A|
00000C60: 24 B2 22 4C 22 A7 31 33 35 30 00 AC 14 B0 04 99 |$."L".1350......|
00000C70: 22 93 C5 4E 54 45 52 20 4E 41 4D 45 20 4F 46 20 |"..NTER NAME OF |
00000C80: 46 49 4C 45 20 54 4F 20 42 45 20 53 41 56 45 44 |FILE TO BE SAVED|
00000C90: 22 3A 99 22 11 CD 41 58 20 12 31 36 92 20 43 48 |":."..AX .16. CH|
00000CA0: 41 52 41 43 54 45 52 53 3A 22 3B 3A 00 D3 14 BA |ARACTERS:";:....|
00000CB0: 04 50 33 B2 31 36 3A 50 34 B2 31 3A 8D 33 30 30 |.P3.16:P4.1:.300|
00000CC0: 30 30 3A 8D 35 35 30 30 3A 8B 50 36 B2 32 A7 31 |00:.5500:.P6.2.1|
00000CD0: 32 30 30 00 1C 15 C4 04 46 24 B2 50 24 3A 99 22 |200.....F$.P$:."|
00000CE0: 11 11 12 CC 4F 41 44 92 20 59 4F 55 52 20 44 41 |....OAD. YOUR DA|
00000CF0: 54 41 20 44 49 53 4B 20 49 4E 20 44 52 49 56 45 |TA DISK IN DRIVE|
00000D00: 20 30 22 3A 99 22 11 12 C8 49 54 92 20 41 4E 59 | 0":."...IT. ANY|
00000D10: 20 4B 45 59 22 3A 8D 31 34 36 30 30 00 4B 15 14 | KEY":.14600.K..|
00000D20: 05 9F 33 2C 38 2C 33 2C 22 40 30 3A 22 AA 46 24 |..3,8,3,"@0:".F$|
00000D30: AA 22 2C 53 2C 57 22 3A 8D 39 35 30 30 3A 8B 50 |.",S,W":.9500:.P|
00000D40: 36 B2 31 A7 A0 33 3A 89 31 32 30 00 7E 15 1A 05 |6.1..3:.120.~...|
00000D50: 98 33 2C 59 52 24 3A 98 33 2C 45 4E 3A 81 4E B2 |.3,YR$:.3,EN:.N.|
00000D60: 30 A4 45 4E AB 31 3A 98 33 2C 54 52 24 28 4E 29 |0.EN.1:.3,TR$(N)|
00000D70: 3A 82 3A A0 33 3A A0 31 35 3A 89 31 32 30 00 C6 |:.:.3:.15:.120..|
00000D80: 15 46 05 99 22 93 C4 4F 20 59 4F 55 20 57 49 53 |.F.."..O YOU WIS|
00000D90: 48 20 54 4F 20 4C 4F 41 44 20 49 4D 50 4F 52 54 |H TO LOAD IMPORT|
00000DA0: 41 4E 54 20 44 41 54 45 53 22 3A 99 22 4F 4E 4C |ANT DATES":."ONL|
00000DB0: 59 20 22 3B 3A 8D 32 36 30 30 30 3A 8B 50 36 B2 |Y ";:.26000:.P6.|
00000DC0: 32 A7 31 34 30 30 00 D2 15 4B 05 99 22 20 D9 45 |2.1400...K.." .E|
00000DD0: 53 22 00 1B 16 50 05 99 22 11 D0 4C 45 41 53 45 |S"...P.."..LEASE|
00000DE0: 20 45 4E 54 45 52 20 4E 41 4D 45 20 4F 46 20 46 | ENTER NAME OF F|
00000DF0: 49 4C 45 20 54 4F 20 42 45 20 4C 4F 41 44 45 44 |ILE TO BE LOADED|
00000E00: 22 3A 99 22 11 CD 41 58 20 12 31 36 92 20 43 48 |":."..AX .16. CH|
00000E10: 41 52 41 43 54 45 52 53 20 22 3B 00 4C 16 55 05 |ARACTERS ";.L.U.|
00000E20: 50 33 B2 31 36 3A 50 34 B2 31 3A 8D 33 30 30 30 |P3.16:P4.1:.3000|
00000E30: 30 3A 8D 35 35 30 30 3A 8B 50 36 B2 32 A7 99 22 |0:.5500:.P6.2.."|
00000E40: 91 91 91 91 91 22 3A 89 31 33 36 30 00 96 16 5A |.....":.1360...Z|
00000E50: 05 99 22 11 D0 4C 45 41 53 45 20 12 CC 4F 41 44 |.."..LEASE ..OAD|
00000E60: 92 20 59 4F 55 52 20 44 41 54 41 20 44 49 53 4B |. YOUR DATA DISK|
00000E70: 20 49 4E 20 44 52 49 56 45 20 30 22 3A 99 22 11 | IN DRIVE 0":.".|
00000E80: 12 C8 49 54 92 20 41 4E 59 20 4B 45 59 11 22 3A |..IT. ANY KEY.":|
00000E90: 8D 31 34 36 30 30 00 B8 16 5F 05 9F 33 2C 38 2C |.14600..._..3,8,|
00000EA0: 33 2C 50 24 3A 8D 39 35 30 30 3A 8B 50 36 B2 31 |3,P$:.9500:.P6.1|
00000EB0: A7 A0 33 3A 89 31 32 30 00 F9 16 64 05 84 33 2C |..3:.120...d..3,|
00000EC0: 59 52 24 2C 45 4E 3A 4D B2 30 3A 81 4E B2 30 A4 |YR$,EN:M.0:.N.0.|
00000ED0: 45 4E AB 31 3A 84 33 2C 41 24 3A 8B CA 28 41 24 |EN.1:.3,A$:..(A$|
00000EE0: 2C 35 2C 31 29 B2 22 32 22 A7 54 52 24 28 4D 29 |,5,1)."2".TR$(M)|
00000EF0: B2 41 24 3A 4D B2 4D AA 31 00 18 17 6E 05 82 4E |.A$:M.M.1...n..N|
00000F00: 3A 45 4E B2 4D 3A 59 52 24 B2 22 22 3A A0 33 3A |:EN.M:YR$."":.3:|
00000F10: A0 31 35 3A 89 31 32 30 00 61 17 78 05 99 22 93 |.15:.120.a.x..".|
00000F20: D0 4C 45 41 53 45 20 45 4E 54 45 52 20 4E 41 4D |.LEASE ENTER NAM|
00000F30: 45 20 4F 46 20 46 49 4C 45 20 54 4F 20 42 45 20 |E OF FILE TO BE |
00000F40: 4C 4F 41 44 45 44 22 3A 99 22 11 CD 41 58 20 12 |LOADED":."..AX .|
00000F50: 31 36 92 20 43 48 41 52 41 43 54 45 52 53 20 22 |16. CHARACTERS "|
00000F60: 3B 00 88 17 7D 05 50 33 B2 31 36 3A 50 34 B2 31 |;...}.P3.16:P4.1|
00000F70: 3A 8D 33 30 30 30 30 3A 8D 35 35 30 30 3A 8B 50 |:.30000:.5500:.P|
00000F80: 36 B2 32 A7 31 34 30 30 00 D2 17 82 05 99 22 11 |6.2.1400......".|
00000F90: D0 4C 45 41 53 45 20 12 CC 4F 41 44 92 20 59 4F |.LEASE ..OAD. YO|
00000FA0: 55 52 20 44 41 54 41 20 44 49 53 4B 20 49 4E 20 |UR DATA DISK IN |
00000FB0: 44 52 49 56 45 20 30 22 3A 99 22 11 12 C8 49 54 |DRIVE 0":."...IT|
00000FC0: 92 20 41 4E 59 20 4B 45 59 11 22 3A 8D 31 34 36 |. ANY KEY.":.146|
00000FD0: 30 30 00 F4 17 CD 05 9F 33 2C 38 2C 33 2C 50 24 |00......3,8,3,P$|
00000FE0: 3A 8D 39 35 30 30 3A 8B 50 36 B2 31 A7 A0 33 3A |:.9500:.P6.1..3:|
00000FF0: 89 31 32 30 00 24 18 D2 05 84 33 2C 59 52 24 2C |.120.$....3,YR$,|
00001000: 45 4E 3A 81 4E B2 30 A4 45 4E AB 31 3A 84 33 2C |EN:.N.0.EN.1:.3,|
00001010: 54 52 24 28 4E 29 3A 82 3A A0 33 3A A0 31 35 3A |TR$(N):.:.3:.15:|
00001020: 89 31 32 30 00 37 18 A4 06 8B 59 52 24 B2 22 22 |.120.7....YR$.""|
00001030: A7 8D 32 36 31 30 30 00 72 18 EA 06 99 22 93 11 |..26100.r...."..|
00001040: 11 22 A3 31 31 29 22 D3 C5 C1 D2 C3 C8 A0 26 A0 |.".11)".......&.|
00001050: D2 C5 D4 D2 C9 C5 D6 C5 22 3A 99 A3 31 31 29 22 |........":..11)"|
00001060: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00001070: A3 22 00 B9 18 F4 06 99 A3 37 29 22 11 12 20 31 |.".......7)".. 1|
00001080: 20 92 20 C4 41 54 45 53 20 54 4F 20 52 45 4D 45 | . .ATES TO REME|
00001090: 4D 42 45 52 22 3A 99 A3 37 29 22 11 12 20 32 20 |MBER":..7)".. 2 |
000010A0: 92 20 C2 52 4F 57 53 45 20 54 48 52 4F 55 47 48 |. .ROWSE THROUGH|
000010B0: 20 45 4E 54 52 49 45 53 22 00 FF 18 08 07 99 A3 | ENTRIES".......|
000010C0: 37 29 22 11 12 20 33 20 92 20 D3 54 41 54 45 4D |7)".. 3 . .TATEM|
000010D0: 45 4E 54 20 20 4F 46 20 20 45 4E 54 52 49 45 53 |ENT OF ENTRIES|
000010E0: 22 3A 99 A3 37 29 22 11 12 20 34 20 92 20 D3 45 |":..7)".. 4 . .E|
000010F0: 41 52 43 48 20 20 42 59 20 20 4E 41 4D 45 22 00 |ARCH BY NAME".|
00001100: 43 19 0D 07 99 A3 37 29 22 11 12 20 35 20 92 20 |C.....7)".. 5 . |
00001110: C2 41 43 4B 20 20 54 4F 20 20 4D 41 49 4E 20 20 |.ACK TO MAIN |
00001120: 4D 45 4E 55 22 3A 99 A3 31 31 29 22 11 11 12 D0 |MENU":..11)"....|
00001130: 52 45 53 53 20 4F 50 54 49 4F 4E 20 4E 55 4D 42 |RESS OPTION NUMB|
00001140: 45 52 22 00 73 19 26 07 8D 31 34 36 30 30 3A 91 |ER".s.&..14600:.|
00001150: C5 28 41 24 29 89 31 38 35 30 2C 32 31 32 30 2C |.(A$).1850,2120,|
00001160: 32 33 30 30 2C 32 37 30 30 2C 31 32 30 3A 89 31 |2300,2700,120:.1|
00001170: 38 33 30 00 BD 19 3A 07 8B 54 52 24 28 30 29 B2 |830...:..TR$(0).|
00001180: 22 22 A7 99 22 93 D4 48 45 52 45 20 41 52 45 20 |"".."..HERE ARE |
00001190: 4E 4F 20 45 4E 54 52 49 45 53 20 59 45 54 22 3A |NO ENTRIES YET":|
000011A0: 99 22 11 C8 49 54 20 41 4E 59 20 4B 45 59 22 3B |."..IT ANY KEY";|
000011B0: 3A 8D 31 34 36 30 30 3A 89 31 37 37 30 00 EE 19 |:.14600:.1770...|
000011C0: 44 07 99 22 93 C5 4E 54 45 52 20 4D 4F 4E 54 48 |D.."..NTER MONTH|
000011D0: 20 52 45 51 55 49 52 45 44 3A 20 22 3B 3A 50 33 | REQUIRED: ";:P3|
000011E0: B2 32 3A 50 34 B2 31 3A 8D 33 30 30 30 30 00 09 |.2:P4.1:.30000..|
000011F0: 1A 49 07 8B C5 28 50 24 29 B3 31 B0 C5 28 50 24 |.I...(P$).1..(P$|
00001200: 29 B1 31 32 A7 31 38 36 30 00 28 1A 4B 07 99 22 |).12.1860.(.K.."|
00001210: 11 22 48 4F 24 3A 8B C3 28 50 24 29 B2 31 A7 50 |."HO$:..(P$).1.P|
00001220: 24 B2 22 30 22 AA 50 24 00 6F 1A 4E 07 5A 54 24 |$."0".P$.o.N.ZT$|
00001230: B2 50 24 3A 58 58 B2 32 3A 8D 32 37 31 30 30 3A |.P$:XX.2:.27100:|
00001240: 8B 50 37 B2 32 A7 99 22 11 D4 48 45 52 45 20 41 |.P7.2.."..HERE A|
00001250: 52 45 20 4E 4F 20 45 4E 54 52 49 45 53 20 54 48 |RE NO ENTRIES TH|
00001260: 49 53 20 4D 4F 4E 54 48 22 3A 89 31 39 34 30 00 |IS MONTH":.1940.|
00001270: 78 1A 53 07 4D B2 5A 42 00 BE 1A 58 07 99 22 93 |x.S.M.ZB...X..".|
00001280: C4 41 54 45 53 20 54 4F 20 52 45 4D 45 4D 42 45 |.ATES TO REMEMBE|
00001290: 52 20 49 4E 20 22 4D 4F 24 28 C5 28 50 24 29 29 |R IN "MO$(.(P$))|
000012A0: 22 20 31 39 22 59 52 24 3A 99 3A 81 4E B2 4D A4 |" 19"YR$:.:.N.M.|
000012B0: 4D AA 39 3A 8B 4E B1 5A 54 A7 31 39 34 30 00 E3 |M.9:.N.ZT.1940..|
000012C0: 1A 76 07 8B CA 28 54 52 24 28 4E 29 2C 35 2C 31 |.v...(TR$(N),5,1|
000012D0: 29 B2 22 32 22 A7 8D 32 37 36 30 30 3A 8D 32 34 |)."2"..27600:.24|
000012E0: 31 30 30 00 19 1B 80 07 82 4E 3A 99 22 11 12 C8 |100......N:."...|
000012F0: 49 54 20 41 4E 59 20 4B 45 59 20 54 4F 20 43 4F |IT ANY KEY TO CO|
00001300: 4E 54 49 4E 55 45 92 22 3A 8D 31 34 36 30 30 3A |NTINUE.":.14600:|
00001310: 4D B2 4E 3A 89 31 38 38 30 00 3E 1B 94 07 99 22 |M.N:.1880.>...."|
00001320: 11 C1 4E 59 20 4F 54 48 45 52 22 3B 3A 8D 32 36 |..NY OTHER";:.26|
00001330: 30 30 30 3A 8B 50 36 B2 31 A7 31 38 36 30 00 48 |000:.P6.1.1860.H|
00001340: 1B 9E 07 89 31 37 37 30 00 92 1B 48 08 8B 54 52 |....1770...H..TR|
00001350: 24 28 30 29 B2 22 22 A7 99 22 93 D4 48 45 52 45 |$(0)."".."..HERE|
00001360: 20 41 52 45 20 4E 4F 20 45 4E 54 52 49 45 53 20 | ARE NO ENTRIES |
00001370: 59 45 54 22 3A 99 22 11 C8 49 54 20 41 4E 59 20 |YET":."..IT ANY |
00001380: 4B 45 59 22 3B 3A 8D 31 34 36 30 30 3A 89 31 37 |KEY";:.14600:.17|
00001390: 37 30 00 CA 1B 4D 08 99 22 93 C2 52 4F 57 53 49 |70...M.."..ROWSI|
000013A0: 4E 47 20 53 54 41 52 54 53 20 4F 4E 2F 42 45 46 |NG STARTS ON/BEF|
000013B0: 4F 52 45 20 44 41 54 45 20 45 4E 54 45 52 45 44 |ORE DATE ENTERED|
000013C0: 22 3A 99 3A 8D 31 34 37 35 30 00 ED 1B 52 08 5A |":.:.14750...R.Z|
000013D0: 54 24 B2 44 54 24 3A 58 58 B2 34 3A 8D 32 37 31 |T$.DT$:XX.4:.271|
000013E0: 30 30 3A 8B 50 37 B2 32 A7 32 32 34 30 00 FE 1B |00:.P7.2.2240...|
000013F0: 57 08 8B 5A 42 B3 5A 54 A7 5A 54 B2 5A 42 00 0D |W..ZB.ZT.ZT.ZB..|
00001400: 1C 5C 08 4E B2 5A 54 3A 50 4F B2 5A 54 00 42 1C |.\.N.ZT:PO.ZT.B.|
00001410: 66 08 99 22 93 C5 4E 54 52 59 20 CE 4F 20 22 3B |f.."..NTRY .O ";|
00001420: 4E AA 31 3A 99 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |N.1:."..........|
00001430: A3 22 3A 99 3A 8D 32 37 36 30 30 3A 8D 32 37 37 |.":.:.27600:.277|
00001440: 30 30 00 7D 1C 70 08 4C 4E B2 32 30 3A 43 4F B2 |00.}.p.LN.20:CO.|
00001450: 31 3A 8D 32 39 38 30 30 3A 99 22 12 D0 52 45 53 |1:.29800:."..RES|
00001460: 53 3A 92 20 12 2B 92 20 C6 4F 52 20 42 52 4F 57 |S:. .+. .OR BROW|
00001470: 53 49 4E 47 20 46 4F 52 57 41 52 44 22 00 B3 1C |SING FORWARD"...|
00001480: 7A 08 99 A3 37 29 22 12 2D 92 20 C6 4F 52 20 42 |z...7)".-. .OR B|
00001490: 52 4F 57 53 49 4E 47 20 42 41 43 4B 57 41 52 44 |ROWSING BACKWARD|
000014A0: 22 3A 99 A3 37 29 22 12 53 92 20 D4 4F 20 53 54 |":..7)".S. .O ST|
000014B0: 4F 50 22 00 D9 1C 84 08 A1 41 24 3A 8B 41 24 B3 |OP"......A$:.A$.|
000014C0: B1 22 2B 22 AF 41 24 B3 B1 22 2D 22 AF 41 24 B3 |."+".A$.."-".A$.|
000014D0: B1 22 53 22 A7 32 31 38 30 00 EA 1C 8E 08 8B 41 |."S".2180......A|
000014E0: 24 B2 22 2B 22 A7 32 32 32 30 00 FB 1C 98 08 8B |$."+".2220......|
000014F0: 41 24 B2 22 2D 22 A7 32 32 33 30 00 05 1D A2 08 |A$."-".2230.....|
00001500: 89 31 37 37 30 00 20 1D AC 08 8B 4E AA 31 B3 B2 |.1770. ....N.1..|
00001510: 45 4E AB 31 A7 4E B2 4E AA 31 3A 89 32 31 35 30 |EN.1.N.N.1:.2150|
00001520: 00 2A 1D B1 08 89 32 31 38 30 00 42 1D B6 08 8B |.*....2180.B....|
00001530: 4E AB 31 B1 B2 30 A7 4E B2 4E AB 31 3A 89 32 31 |N.1..0.N.N.1:.21|
00001540: 35 30 00 4C 1D BB 08 89 32 31 38 30 00 5B 1D C0 |50.L....2180.[..|
00001550: 08 4E B2 5A 4D 3A 89 32 31 35 30 00 A4 1D FC 08 |.N.ZM:.2150.....|
00001560: 8B 54 52 24 28 30 29 B2 22 22 A7 99 22 93 D4 48 |.TR$(0)."".."..H|
00001570: 45 52 45 20 41 52 45 20 4E 4F 20 45 4E 54 52 49 |ERE ARE NO ENTRI|
00001580: 45 53 20 59 45 54 22 3A 99 22 11 C8 49 54 20 41 |ES YET":."..IT A|
00001590: 4E 59 20 4B 45 59 22 3A 8D 31 34 36 30 30 3A 89 |NY KEY":.14600:.|
000015A0: 31 37 37 30 00 DD 1D FF 08 99 22 93 D3 54 41 54 |1770......"..TAT|
000015B0: 45 4D 45 4E 54 20 57 49 4C 4C 20 53 54 41 52 54 |EMENT WILL START|
000015C0: 20 41 53 20 4F 46 20 44 41 54 45 20 45 4E 54 45 | AS OF DATE ENTE|
000015D0: 52 45 44 22 3A 99 3A 8D 31 34 37 35 30 00 01 1E |RED":.:.14750...|
000015E0: 01 09 8B 44 54 24 B1 C8 28 54 52 24 28 45 4E AB |...DT$..(TR$(EN.|
000015F0: 31 29 2C 34 29 A7 50 53 B2 45 4E 3A 89 32 33 31 |1),4).PS.EN:.231|
00001600: 37 00 22 1E 03 09 8B 44 54 24 B3 B2 C8 28 54 52 |7."....DT$...(TR|
00001610: 24 28 30 29 2C 34 29 A7 50 53 B2 30 3A 89 32 33 |$(0),4).PS.0:.23|
00001620: 31 37 00 4C 1E 06 09 5A 54 24 B2 44 54 24 3A 58 |17.L...ZT$.DT$:X|
00001630: 58 B2 34 3A 8D 32 37 31 30 30 3A 8B 50 37 B2 32 |X.4:.27100:.P7.2|
00001640: A7 50 53 B2 5A 42 3A 89 32 33 31 37 00 5D 1E 08 |.PS.ZB:.2317.]..|
00001650: 09 8B 5A 42 B3 5A 54 A7 5A 54 B2 5A 42 00 67 1E |..ZB.ZT.ZT.ZB.g.|
00001660: 0B 09 50 53 B2 5A 54 00 95 1E 0D 09 44 54 24 B2 |..PS.ZT.....DT$.|
00001670: C9 28 44 54 24 2C 32 29 AA 22 20 22 AA 4D 4F 24 |.(DT$,2)." ".MO$|
00001680: 28 C5 28 C8 28 44 54 24 2C 32 29 29 29 3A 8B 46 |(.(.(DT$,2))):.F|
00001690: 50 B2 31 A7 8E 00 C8 1E 10 09 99 22 93 C5 4E 54 |P.1........"..NT|
000016A0: 52 49 45 53 20 53 54 41 52 54 49 4E 47 20 22 44 |RIES STARTING "D|
000016B0: 54 24 22 20 31 39 22 59 52 24 3A 99 3A 81 4E B2 |T$" 19"YR$:.:.N.|
000016C0: 50 53 20 A4 50 53 AA 35 00 F0 1E 24 09 8B 4E B2 |PS .PS.5...$..N.|
000016D0: 45 4E A7 99 22 1D 1D 1D 1D 1D 1D C5 4E 44 20 4F |EN..".......ND O|
000016E0: 46 20 45 4E 54 52 49 45 53 22 3A 89 32 33 36 30 |F ENTRIES":.2360|
000016F0: 00 05 1F 2E 09 8D 32 37 36 30 30 3A 8D 32 34 31 |......27600:.241|
00001700: 30 30 3A 82 4E 00 3E 1F 38 09 99 22 11 12 D0 52 |00:.N.>.8.."...R|
00001710: 45 53 53 3A 92 20 12 2D 92 20 C6 4F 52 20 50 52 |ESS:. .-. .OR PR|
00001720: 45 56 49 4F 55 53 20 50 41 47 45 22 A3 32 39 29 |EVIOUS PAGE".29)|
00001730: 22 12 CD 92 20 C6 4F 52 20 4D 45 4E 55 22 00 5A |"... .OR MENU".Z|
00001740: 1F 42 09 99 A3 37 29 22 12 2B 92 20 C6 4F 52 20 |.B...7)".+. .OR |
00001750: 4E 45 58 54 20 50 41 47 45 22 00 80 1F 7E 09 A1 |NEXT PAGE"...~..|
00001760: 41 24 3A 8B 41 24 B3 B1 22 2B 22 AF 41 24 B3 B1 |A$:.A$.."+".A$..|
00001770: 22 4D 22 AF 41 24 B3 B1 22 2D 22 A7 32 34 33 30 |"M".A$.."-".2430|
00001780: 00 91 1F 88 09 8B 41 24 B2 22 4D 22 A7 31 37 37 |......A$."M".177|
00001790: 30 00 AD 1F 92 09 8B 41 24 B2 22 2B 22 AF 4E B3 |0......A$."+".N.|
000017A0: 45 4E A7 50 53 B2 4E 3A 89 32 33 32 30 00 CC 1F |EN.PS.N:.2320...|
000017B0: 9C 09 8B 41 24 B2 22 2D 22 AF 50 53 B1 30 A7 50 |...A$."-".PS.0.P|
000017C0: 53 B2 50 53 AB 36 3A 89 32 34 36 35 00 D6 1F 9E |S.PS.6:.2465....|
000017D0: 09 89 32 34 33 30 00 F7 1F A1 09 8B 50 53 B3 B2 |..2430......PS..|
000017E0: 30 A7 50 53 B2 30 3A 44 54 24 B2 22 30 31 30 31 |0.PS.0:DT$."0101|
000017F0: 22 3A 89 32 33 31 37 00 12 20 A6 09 44 54 24 B2 |":.2317.. ..DT$.|
00001800: C8 28 54 52 24 28 50 53 29 2C 34 29 3A 89 32 33 |.(TR$(PS),4):.23|
00001810: 31 37 00 5A 20 C4 09 8B 54 52 24 28 30 29 B2 22 |17.Z ...TR$(0)."|
00001820: 22 A7 99 22 93 D4 48 45 52 45 20 41 52 45 20 4E |".."..HERE ARE N|
00001830: 4F 20 45 4E 54 52 49 45 53 20 59 45 54 22 3A 99 |O ENTRIES YET":.|
00001840: 22 11 C8 49 54 20 41 4E 59 20 4B 45 59 22 3A 8D |"..IT ANY KEY":.|
00001850: 31 34 36 30 30 3A 89 31 32 30 00 6E 20 C5 09 8D |14600:.120.n ...|
00001860: 39 30 30 30 3A 8B 50 36 B2 32 A7 31 32 30 00 AB |9000:.P6.2.120..|
00001870: 20 C6 09 99 22 93 22 A3 39 29 22 C4 4F 20 59 4F | ...".".9)".O YO|
00001880: 55 20 57 49 53 48 20 54 4F 20 50 52 49 4E 54 3A |U WISH TO PRINT:|
00001890: 22 3A 99 A3 39 29 22 11 11 12 20 31 20 92 20 C1 |":..9)"... 1 . .|
000018A0: 4C 4C 20 45 4E 54 52 49 45 53 22 00 CF 20 C8 09 |LL ENTRIES".. ..|
000018B0: 99 A3 39 29 22 11 12 20 32 20 92 20 C1 20 53 50 |..9)".. 2 . . SP|
000018C0: 45 43 49 46 49 45 44 20 4E 55 4D 42 45 52 22 00 |ECIFIED NUMBER".|
000018D0: ED 20 CA 09 A1 41 24 3A 8B 41 24 B3 B1 22 31 22 |. ...A$:.A$.."1"|
000018E0: AF 41 24 B3 B1 22 32 22 A7 32 35 30 36 00 05 21 |.A$.."2".2506..!|
000018F0: CB 09 8B 41 24 B2 22 31 22 A7 4E 55 B2 45 4E 3A |...A$."1".NU.EN:|
00001900: 89 32 35 31 35 00 29 21 CD 09 99 22 93 D4 4F 54 |.2515.)!..."..OT|
00001910: 41 4C 20 45 4E 54 52 49 45 53 20 49 4E 20 4D 45 |AL ENTRIES IN ME|
00001920: 4D 4F 52 59 3A 20 22 45 4E 00 63 21 CE 09 99 22 |MORY: "EN.c!..."|
00001930: 11 C5 4E 54 45 52 20 4E 55 4D 42 45 52 20 52 45 |..NTER NUMBER RE|
00001940: 51 55 49 52 45 44 20 20 22 3B 3A 50 33 B2 33 3A |QUIRED ";:P3.3:|
00001950: 50 34 B2 31 3A 8D 33 30 30 30 30 3A 41 B2 C5 28 |P4.1:.30000:A..(|
00001960: 50 24 29 00 7F 21 D0 09 8B 41 B3 B2 30 B0 41 B1 |P$)..!...A..0.A.|
00001970: 45 4E A7 99 22 91 91 91 22 3A 89 32 35 31 30 00 |EN.."...":.2510.|
00001980: 8D 21 D2 09 4E 55 B2 50 53 AA 41 AB 31 00 A1 21 |.!..NU.PS.A.1..!|
00001990: D3 09 46 50 B2 31 3A 8D 32 33 30 33 3A 46 50 B2 |..FP.1:.2303:FP.|
000019A0: 30 00 D1 21 D8 09 97 35 33 32 36 35 2C 31 31 3A |0..!...53265,11:|
000019B0: 9F 34 2C 34 2C 37 3A 98 34 2C C7 28 31 35 29 3A |.4,4,7:.4,.(15):|
000019C0: 44 24 B2 C7 28 31 36 29 3A 45 24 B2 C7 28 31 37 |D$..(16):E$..(17|
000019D0: 29 00 FC 21 E2 09 98 34 2C 45 24 22 C5 4E 54 52 |)..!...4,E$".NTR|
000019E0: 49 45 53 20 53 54 41 52 54 49 4E 47 20 22 44 54 |IES STARTING "DT|
000019F0: 24 22 20 31 39 22 59 52 24 3A 98 34 00 2A 22 F6 |$" 19"YR$:.4.*".|
00001A00: 09 98 34 2C 45 24 22 20 20 C4 A0 C1 A0 D4 A0 C5 |..4,E$" .......|
00001A10: 20 20 20 20 20 DD 20 20 20 20 20 20 C4 A0 C5 A0 | . ....|
00001A20: D4 A0 C1 A0 C9 A0 CC A0 D3 22 00 4B 22 00 0A 81 |.........".K"...|
00001A30: 4D B2 31 A4 33 38 3A 98 34 2C 45 24 22 A3 22 3B |M.1.38:.4,E$".";|
00001A40: 3A 82 3A 98 34 2C 45 24 22 A3 22 00 7E 22 0A 0A |:.:.4,E$".".~"..|
00001A50: 81 4E B2 50 53 A4 4E 55 3A 8B 4E B2 45 4E A7 98 |.N.PS.NU:.N.EN..|
00001A60: 34 2C 45 24 44 24 22 31 35 C5 4E 44 20 4F 46 20 |4,E$D$"15.ND OF |
00001A70: 45 4E 54 52 49 45 53 22 3A 89 32 36 35 30 00 BC |ENTRIES":.2650..|
00001A80: 22 14 0A 8D 32 37 36 30 30 3A 98 34 2C 45 24 44 |"...27600:.4,E$D|
00001A90: 54 24 3B 3A 8B 48 52 24 B3 B1 22 22 A7 98 34 2C |T$;:.HR$..""..4,|
00001AA0: 45 24 44 24 22 31 35 22 48 52 24 22 20 48 4F 55 |E$D$"15"HR$" HOU|
00001AB0: 52 53 3A 20 22 3B 3A 89 32 35 39 30 00 CD 22 19 |RS: ";:.2590..".|
00001AC0: 0A 98 34 2C 45 24 44 24 22 31 35 22 3B 00 E2 22 |..4,E$D$"15";.."|
00001AD0: 1E 0A 98 34 2C 45 24 4E 41 24 22 20 2D 20 22 45 |...4,E$NA$" - "E|
00001AE0: 56 24 00 EC 22 28 0A 98 34 3A 82 4E 00 0C 23 5A |V$.."(..4:.N..#Z|
00001AF0: 0A 98 34 2C C7 28 31 34 35 29 3A A0 34 3A 97 35 |..4,.(145):.4:.5|
00001B00: 33 32 36 35 2C 32 37 3A 89 31 32 30 00 46 23 8C |3265,27:.120.F#.|
00001B10: 0A 99 22 93 C5 4E 54 45 52 20 4E 41 4D 45 3A 20 |.."..NTER NAME: |
00001B20: 22 3B 3A 50 33 B2 32 35 3A 50 34 B2 31 3A 8D 33 |";:P3.25:P4.1:.3|
00001B30: 30 30 30 30 3A 8D 32 34 30 30 30 3A 8B 50 36 B2 |0000:.24000:.P6.|
00001B40: 31 A7 32 37 30 30 00 86 23 96 0A 99 22 93 C5 4E |1.2700..#..."..N|
00001B50: 54 52 49 45 53 20 46 4F 52 3A 20 22 50 24 3A 99 |TRIES FOR: "P$:.|
00001B60: 3A 43 B2 30 3A 81 4E B2 30 A4 45 4E AB 31 3A 8B |:C.0:.N.0.EN.1:.|
00001B70: CA 28 54 52 24 28 4E 29 2C 35 2C 31 29 B2 22 32 |.(TR$(N),5,1)."2|
00001B80: 22 A7 32 37 35 30 00 BB 23 B4 0A 8B CA 28 54 52 |".2750..#....(TR|
00001B90: 24 28 4E 29 2C 31 30 2C C3 28 50 24 29 29 B2 50 |$(N),10,.(P$)).P|
00001BA0: 24 A7 8D 32 37 36 30 30 3A 8D 32 34 31 30 30 3A |$..27600:.24100:|
00001BB0: 43 B2 43 AA 31 3A 89 32 37 35 35 00 E9 23 BE 0A |C.C.1:.2755..#..|
00001BC0: 8B CA 28 54 52 24 28 4E 29 2C 36 2C C3 28 50 24 |..(TR$(N),6,.(P$|
00001BD0: 29 29 B2 50 24 A7 8D 32 37 36 30 30 3A 8D 32 34 |)).P$..27600:.24|
00001BE0: 31 30 30 3A 43 B2 43 AA 31 00 F7 23 C3 0A 8B 43 |100:C.C.1..#...C|
00001BF0: B3 37 A7 32 37 37 30 00 0D 24 C8 0A 8B 43 AD 37 |.7.2770..$...C.7|
00001C00: B2 B5 28 43 AD 37 29 A7 8D 32 38 30 30 00 14 24 |..(C.7)..2800..$|
00001C10: D2 0A 82 4E 00 37 24 DC 0A 8B 43 B2 30 A7 99 22 |...N.7$...C.0.."|
00001C20: 11 D3 4F 52 52 59 20 4E 4F 20 45 4E 54 52 59 20 |..ORRY NO ENTRY |
00001C30: 46 4F 52 20 22 50 24 00 5C 24 E6 0A 99 22 11 C1 |FOR "P$.\$..."..|
00001C40: 4E 59 20 4F 54 48 45 52 22 3B 3A 8D 32 36 30 30 |NY OTHER";:.2600|
00001C50: 30 3A 8B 50 36 B2 31 A7 32 37 30 30 00 66 24 EB |0:.P6.1.2700.f$.|
00001C60: 0A 89 31 37 37 30 00 A7 24 F0 0A 99 22 11 12 C8 |..1770..$..."...|
00001C70: 49 54 20 41 4E 59 20 4B 45 59 20 54 4F 20 43 4F |IT ANY KEY TO CO|
00001C80: 4E 54 49 4E 55 45 92 22 3A 8D 31 34 36 30 30 3A |NTINUE.":.14600:|
00001C90: 99 22 93 C5 4E 54 52 49 45 53 20 46 4F 52 3A 20 |."..NTRIES FOR: |
00001CA0: 22 50 24 3A 99 3A 8E 00 ED 24 7C 15 50 36 B2 31 |"P$:.:...$|.P6.1|
00001CB0: 3A 41 B2 C6 28 50 24 29 3A 8B 28 41 B3 36 35 B0 |:A..(P$):.(A.65.|
00001CC0: 41 B1 39 30 29 B0 50 24 B2 22 4E 22 B0 50 24 B2 |A.90).P$."N".P$.|
00001CD0: 22 56 22 B0 50 24 B2 22 43 22 B0 50 24 B2 22 53 |"V".P$."C".P$."S|
00001CE0: 22 B0 50 24 B2 22 49 22 A7 50 36 B2 32 00 F3 24 |".P$."I".P6.2..$|
00001CF0: 86 15 8E 00 12 25 28 23 99 22 93 C1 52 45 20 59 |.....%(#."..RE Y|
00001D00: 4F 55 20 53 55 52 45 22 3B 3A 8D 32 36 30 30 30 |OU SURE";:.26000|
00001D10: 3A 8E 00 3F 25 1C 25 50 36 B2 30 3A 9F 31 35 2C |:..?%.%P6.0:.15,|
00001D20: 38 2C 31 35 3A 84 31 35 2C 45 52 2C 45 52 24 2C |8,15:.15,ER,ER$,|
00001D30: 54 52 2C 42 4C 3A 8B 45 52 B3 32 30 A7 20 8E 00 |TR,BL:.ER.20. ..|
00001D40: 7E 25 26 25 99 22 11 12 C4 49 53 4B 20 45 52 52 |~%&%."...ISK ERR|
00001D50: 4F 52 3A 92 20 22 45 52 22 20 22 45 52 24 54 52 |OR:. "ER" "ER$TR|
00001D60: 3B 42 4C 3A 99 22 11 12 C8 49 54 20 41 4E 59 20 |;BL:."...IT ANY |
00001D70: 4B 45 59 20 46 4F 52 20 4D 45 4E 55 92 22 00 94 |KEY FOR MENU."..|
00001D80: 25 30 25 8D 31 34 36 30 30 3A A0 31 35 3A 50 36 |%0%.14600:.15:P6|
00001D90: B2 31 3A 8E 00 A9 25 08 39 A1 41 24 3A 8B 41 24 |.1:...%.9.A$:.A$|
00001DA0: B2 22 22 A7 31 34 36 30 30 00 AF 25 12 39 8E 00 |."".14600..%.9..|
00001DB0: EA 25 9E 39 99 22 D0 4C 45 41 53 45 20 45 4E 54 |.%.9.".LEASE ENT|
00001DC0: 45 52 20 44 41 54 45 20 12 C4 C4 CD CD 92 3A 20 |ER DATE ......: |
00001DD0: 22 3B 3A 50 33 B2 34 3A 50 34 B2 34 3A 8D 33 30 |";:P3.4:P4.4:.30|
00001DE0: 30 30 30 3A 8D 32 35 30 30 30 00 01 26 A3 39 8B |000:.25000..&.9.|
00001DF0: 50 36 B2 31 A7 99 22 91 22 3B 3A 89 31 34 37 35 |P6.1..".";:.1475|
00001E00: 30 00 21 26 A8 39 8B 50 36 B2 30 A7 44 54 24 B2 |0.!&.9.P6.0.DT$.|
00001E10: C9 28 50 24 2C 32 29 AA C8 28 50 24 2C 32 29 3A |.(P$,2)..(P$,2):|
00001E20: 8E 00 50 26 C0 5D 50 36 B2 30 3A 41 B2 C6 28 50 |..P&.]P6.0:A..(P|
00001E30: 24 29 3A 8B 41 B3 36 35 B0 28 41 B1 39 30 AF 41 |$):.A.65.(A.90.A|
00001E40: B3 31 39 32 29 B0 41 B1 32 31 38 A7 50 36 B2 31 |.192).A.218.P6.1|
00001E50: 00 56 26 CA 5D 8E 00 65 26 F2 5D 8B 4E B2 30 A7 |.V&.]..e&.].N.0.|
00001E60: 32 34 30 38 30 00 8A 26 FC 5D 8B C8 28 54 52 24 |24080..&.]..(TR$|
00001E70: 28 4E 29 2C 34 29 B1 C8 28 54 52 24 28 4E AB 31 |(N),4)..(TR$(N.1|
00001E80: 29 2C 34 29 A7 32 34 30 38 30 00 A2 26 06 5E 8D |),4).24080..&.^.|
00001E90: 32 37 30 35 30 3A 4E B2 4E AB 31 3A 89 32 34 30 |27050:N.N.1:.240|
00001EA0: 35 30 00 B5 26 10 5E 45 4E B2 45 4E AA 31 3A 46 |50..&.^EN.EN.1:F|
00001EB0: 32 B2 31 3A 8E 00 E0 26 24 5E 99 44 54 24 A3 31 |2.1:...&$^.DT$.1|
00001EC0: 34 29 3B 3A 8B 48 52 24 B3 B1 22 22 A7 99 48 52 |4);:.HR$..""..HR|
00001ED0: 24 22 20 C8 4F 55 52 53 22 3A 99 A3 31 34 29 3B |$" .OURS":..14);|
00001EE0: 00 F4 26 2E 5E 99 4E 41 24 3A 99 A3 31 34 29 45 |..&.^.NA$:..14)E|
00001EF0: 56 24 3A 8E 00 36 27 A8 61 41 4D 24 B2 22 33 31 |V$:..6'.aAM$."31|
00001F00: 32 38 33 31 33 30 33 31 33 30 33 31 33 31 33 30 |2831303130313130|
00001F10: 33 31 33 30 33 31 22 3A 41 4C 24 B2 22 33 31 32 |313031":AL$."312|
00001F20: 39 33 31 33 30 33 31 33 30 33 31 33 31 33 30 33 |9313031303131303|
00001F30: 31 33 30 33 31 22 00 5C 27 16 62 50 36 B2 30 3A |13031".\'.bP6.0:|
00001F40: 8B 50 24 B3 B2 22 30 30 30 30 22 B0 50 24 B1 22 |.P$.."0000".P$."|
00001F50: 33 31 31 32 22 A7 50 36 B2 31 3A 8E 00 9A 27 20 |3112".P6.1:...' |
00001F60: 62 50 44 B2 C5 28 C8 28 50 24 2C 32 29 29 3A 50 |bPD..(.(P$,2)):P|
00001F70: 4D B2 C5 28 C9 28 50 24 2C 32 29 29 3A 8B 50 4D |M..(.(P$,2)):.PM|
00001F80: B3 31 B0 50 4D B1 31 32 B0 50 44 B3 31 B0 50 44 |.1.PM.12.PD.1.PD|
00001F90: B1 33 31 A7 50 36 B2 31 3A 8E 00 C3 27 2C 62 41 |.31.P6.1:...',bA|
00001FA0: 52 B2 C5 28 59 52 24 29 AA 31 39 30 30 3A 8B B5 |R..(YR$).1900:..|
00001FB0: 28 41 52 AD 34 29 B2 41 52 AD 34 A7 41 4D 24 B2 |(AR.4).AR.4.AM$.|
00001FC0: 41 4C 24 00 E3 27 2E 62 8B 50 44 B1 C5 28 CA 28 |AL$..'.b.PD..(.(|
00001FD0: 41 4D 24 2C 50 4D AC 32 AB 31 2C 32 29 29 A7 50 |AM$,PM.2.1,2)).P|
00001FE0: 36 B2 31 00 E9 27 30 62 8E 00 17 28 70 62 8B 50 |6.1..'0b...(pb.P|
00001FF0: 24 B2 22 22 A7 50 24 B2 22 30 30 30 30 22 3A 99 |$."".P$."0000":.|
00002000: 22 13 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D |"...............|
00002010: 1D 1D 1D 1D 22 50 24 00 43 28 75 62 50 36 B2 30 |...."P$.C(ubP6.0|
00002020: 3A 41 24 B2 C8 28 50 24 2C 32 29 3A 8B 41 24 B3 |:A$..(P$,2):.A$.|
00002030: 22 30 30 22 B0 41 24 B1 22 32 33 22 A7 50 36 B2 |"00".A$."23".P6.|
00002040: 31 3A 8E 00 6A 28 7A 62 41 24 B2 C9 28 50 24 2C |1:..j(zbA$..(P$,|
00002050: 32 29 3A 8B 41 24 B3 22 30 30 22 B0 41 24 B1 22 |2):.A$."00".A$."|
00002060: 35 39 22 A7 50 36 B2 31 3A 8E 00 70 28 84 62 8E |59".P6.1:..p(.b.|
00002070: 00 89 28 90 65 99 22 20 81 12 D9 9A 92 45 53 2F |..(.e." .....ES/|
00002080: 81 12 CE 92 9A 4F 3F 22 3B 00 A8 28 9A 65 A1 41 |.....O?";..(.e.A|
00002090: 24 3A 8B 41 24 B3 B1 22 59 22 AF 41 24 B3 B1 22 |$:.A$.."Y".A$.."|
000020A0: 4E 22 A7 32 36 30 31 30 00 BB 28 A4 65 8B 41 24 |N".26010..(.e.A$|
000020B0: B2 22 59 22 A7 50 36 B2 31 3A 8E 00 C6 28 AE 65 |."Y".P6.1:...(.e|
000020C0: 50 36 B2 32 3A 8E 00 0E 29 F4 65 99 22 93 D0 4C |P6.2:...).e."..L|
000020D0: 45 41 53 45 20 45 4E 54 45 52 20 59 45 41 52 3A |EASE ENTER YEAR:|
000020E0: 20 31 39 20 22 3B 3A 50 33 B2 32 3A 50 34 B2 32 | 19 ";:P3.2:P4.2|
000020F0: 3A 8D 33 30 30 30 30 3A 8B 50 24 B3 22 37 30 22 |:.30000:.P$."70"|
00002100: B0 50 24 B1 22 39 39 22 A7 32 36 31 30 30 00 1B |.P$."99".26100..|
00002110: 29 03 66 59 52 24 B2 50 24 3A 8E 00 2A 29 78 69 |).fYR$.P$:..*)xi|
00002120: 8B 4E B2 30 A7 32 37 30 33 30 00 50 29 82 69 8B |.N.0.27030.P).i.|
00002130: C8 28 54 52 24 28 4E 29 2C 34 29 B1 B2 C8 28 54 |.(TR$(N),4)...(T|
00002140: 52 24 28 4E AB 31 29 2C 34 29 A7 32 37 30 33 30 |R$(N.1),4).27030|
00002150: 00 68 29 8C 69 8D 32 37 30 35 30 3A 4E B2 4E AB |.h).i.27050:N.N.|
00002160: 31 3A 89 32 37 30 30 30 00 95 29 96 69 8B CA 28 |1:.27000..).i..(|
00002170: 54 52 24 28 4E 29 2C 35 2C 31 29 B2 22 31 22 A7 |TR$(N),5,1)."1".|
00002180: 8D 32 37 30 36 30 3A 45 4E B2 45 4E AA 31 3A 46 |.27060:EN.EN.1:F|
00002190: 32 B2 31 3A 8E 00 C1 29 AA 69 41 24 B2 54 52 24 |2.1:...).iA$.TR$|
000021A0: 28 4E 29 3A 54 52 24 28 4E 29 B2 54 52 24 28 4E |(N):TR$(N).TR$(N|
000021B0: AB 31 29 3A 54 52 24 28 4E AB 31 29 B2 41 24 3A |.1):TR$(N.1).A$:|
000021C0: 8E 00 CC 29 B4 69 8B 4E B2 30 A7 8E 00 E7 29 B9 |...).i.N.0....).|
000021D0: 69 8B CA 28 54 52 24 28 4E AB 31 29 2C 35 2C 31 |i..(TR$(N.1),5,1|
000021E0: 29 B2 22 32 22 A7 8E 00 0D 2A BE 69 8B CA 28 54 |)."2"....*.i..(T|
000021F0: 52 24 28 4E 29 2C 36 2C 34 29 B1 B2 CA 28 54 52 |R$(N),6,4)...(TR|
00002200: 24 28 4E AB 31 29 2C 36 2C 34 29 A7 8E 00 25 2A |$(N.1),6,4)...%*|
00002210: C8 69 8D 32 37 30 35 30 3A 4E B2 4E AB 31 3A 89 |.i.27050:N.N.1:.|
00002220: 32 37 30 36 30 00 39 2A DC 69 5A 54 B2 30 3A 5A |27060.9*.iZT.0:Z|
00002230: 42 B2 45 4E 3A 50 37 B2 30 00 71 2A E1 69 5A 4D |B.EN:P7.0.q*.iZM|
00002240: B2 5A 54 AA B5 28 28 5A 42 AB 5A 54 29 AD 32 29 |.ZT..((ZB.ZT).2)|
00002250: 3A 5A 49 24 B2 C8 28 54 52 24 28 5A 4D 29 2C 58 |:ZI$..(TR$(ZM),X|
00002260: 58 29 3A 8B 5A 49 24 B2 5A 54 24 A7 32 37 32 33 |X):.ZI$.ZT$.2723|
00002270: 30 00 82 2A 22 6A 8B 5A 54 B2 5A 4D A7 32 37 34 |0..*"j.ZT.ZM.274|
00002280: 37 30 00 A3 2A 36 6A 8B 5A 49 24 B2 22 22 B0 5A |70..*6j.ZI$."".Z|
00002290: 54 24 B1 5A 49 24 A7 5A 54 B2 5A 4D 3A 89 32 37 |T$.ZI$.ZT.ZM:.27|
000022A0: 31 30 35 00 B4 2A 40 6A 5A 42 B2 5A 4D 3A 89 32 |105..*@jZB.ZM:.2|
000022B0: 37 31 30 35 00 BE 2A 5E 6A 5A 42 B2 5A 4D 00 D0 |7105..*^jZB.ZM..|
000022C0: 2A 68 6A 8B 5A 42 AB 31 B3 30 A7 32 37 33 32 30 |*hj.ZB.1.0.27320|
000022D0: 00 F8 2A 72 6A 5A 49 24 B2 C8 28 54 52 24 28 5A |..*rjZI$..(TR$(Z|
000022E0: 42 AB 31 29 2C 58 58 29 3A 8B 5A 49 24 B3 B1 5A |B.1),XX):.ZI$..Z|
000022F0: 54 24 A7 32 37 33 32 30 00 0B 2B 9A 6A 5A 42 B2 |T$.27320..+.jZB.|
00002300: 5A 42 AB 31 3A 89 32 37 32 34 30 00 15 2B B8 6A |ZB.1:.27240..+.j|
00002310: 5A 54 B2 5A 4D 00 28 2B C2 6A 8B 5A 54 AA 31 B1 |ZT.ZM.(+.j.ZT.1.|
00002320: 45 4E A7 32 37 34 31 30 00 50 2B CC 6A 5A 49 24 |EN.27410.P+.jZI$|
00002330: B2 C8 28 54 52 24 28 5A 54 AA 31 29 2C 58 58 29 |..(TR$(ZT.1),XX)|
00002340: 3A 8B 5A 49 24 B3 B1 5A 54 24 A7 32 37 34 31 30 |:.ZI$..ZT$.27410|
00002350: 00 63 2B F4 6A 5A 54 B2 5A 54 AA 31 3A 89 32 37 |.c+.jZT.ZT.1:.27|
00002360: 33 33 30 00 6E 2B 12 6B 50 37 B2 31 3A 8E 00 79 |330.n+.kP7.1:..y|
00002370: 2B 4E 6B 50 37 B2 32 3A 8E 00 B9 2B D0 6B 41 24 |+NkP7.2:...+.kA$|
00002380: B2 54 52 24 28 4E 29 3A 44 54 24 B2 CA 28 41 24 |.TR$(N):DT$..(A$|
00002390: 2C 33 2C 32 29 AA 22 20 22 AA 4D 4F 24 28 C5 28 |,3,2)." ".MO$(.(|
000023A0: C8 28 41 24 2C 32 29 29 29 3A 41 41 B2 C5 28 CA |.(A$,2))):AA..(.|
000023B0: 28 41 24 2C 35 2C 31 29 29 00 E3 2B DA 6B 41 24 |(A$,5,1))..+.kA$|
000023C0: B2 C9 28 41 24 2C C3 28 41 24 29 AB 35 29 3A 8B |..(A$,.(A$).5):.|
000023D0: 41 41 B3 B1 31 A7 48 52 24 B2 22 22 3A 89 32 37 |AA..1.HR$."":.27|
000023E0: 36 33 30 00 12 2C E9 6B 48 52 24 B2 C8 28 41 24 |630..,.kHR$..(A$|
000023F0: 2C 32 29 AA 22 3A 22 AA CA 28 41 24 2C 33 2C 32 |,2).":"..(A$,3,2|
00002400: 29 3A 41 24 B2 C9 28 41 24 2C C3 28 41 24 29 AB |):A$..(A$,.(A$).|
00002410: 34 29 00 36 2C EE 6B 81 4D B2 31 A4 C3 28 41 24 |4).6,.k.M.1..(A$|
00002420: 29 3A 8B CA 28 41 24 2C 4D 2C 31 29 B2 22 2A 22 |):..(A$,M,1)."*"|
00002430: A7 32 37 36 35 30 00 3D 2C F8 6B 82 4D 00 61 2C |.27650.=,.k.M.a,|
00002440: 02 6C 4E 41 24 B2 C8 28 41 24 2C 4D AB 31 29 3A |.lNA$..(A$,M.1):|
00002450: 45 56 24 B2 C9 28 41 24 2C C3 28 41 24 29 AB 4D |EV$..(A$,.(A$).M|
00002460: 29 00 95 2C 0C 6C 8B 41 41 B2 32 AF 28 45 56 24 |)..,.l.AA.2.(EV$|
00002470: B2 22 31 22 B0 45 56 24 B2 22 32 22 B0 45 56 24 |."1".EV$."2".EV$|
00002480: B2 22 33 22 29 A7 45 56 24 B2 54 54 24 28 C5 28 |."3").EV$.TT$(.(|
00002490: 45 56 24 29 29 00 9B 2C 16 6C 8E 00 D7 2C 34 6C |EV$))..,.l...,4l|
000024A0: 99 22 C4 41 54 45 22 A3 31 30 29 22 3A 20 22 44 |.".ATE".10)": "D|
000024B0: 54 24 22 20 31 39 22 59 52 24 3A 8B 48 52 24 B3 |T$" 19"YR$:.HR$.|
000024C0: B1 22 22 A7 99 22 11 C8 4F 55 52 22 A3 31 30 29 |."".."..OUR".10)|
000024D0: 22 3A 20 22 48 52 24 00 06 2D 48 6C 99 22 11 CE |": "HR$..-Hl."..|
000024E0: 41 4D 45 22 A3 31 30 29 22 3A 20 22 4E 41 24 3A |AME".10)": "NA$:|
000024F0: 99 22 11 C5 56 45 4E 54 22 A3 31 30 29 22 3A 20 |."..VENT".10)": |
00002500: 22 45 56 24 3A 8E 00 1E 2D 3C 73 81 51 B2 31 A4 |"EV$:...-<s.Q.1.|
00002510: 50 33 3A 99 22 A4 22 3B 3A 82 3A 99 3A 8E 00 3C |P3:.".";:.:.:..<|
00002520: 2D 68 74 99 22 13 22 3B 3A 8B 43 4F B1 31 A7 99 |-ht.".";:.CO.1..|
00002530: C8 28 43 4F 24 2C 43 4F AB 31 29 3B 00 54 2D 72 |.(CO$,CO.1);.T-r|
00002540: 74 8B 4C 4E B1 31 A7 99 C8 28 4C 4E 24 2C 4C 4E |t.LN.1...(LN$,LN|
00002550: AB 31 29 3B 00 5A 2D 7C 74 8E 00 64 2D 30 75 99 |.1);.Z-|t..d-0u.|
00002560: 22 3E 22 3B 00 95 2D 3A 75 81 51 B2 31 A4 50 33 |">";..-:u.Q.1.P3|
00002570: 3A 99 22 A4 22 3B 3A 82 51 3A 81 51 B2 31 A4 50 |:.".";:.Q:.Q.1.P|
00002580: 33 3A 99 22 9D 22 3B 3A 82 51 3A 50 24 B2 22 22 |3:.".";:.Q:P$.""|
00002590: 3A 50 58 B2 30 00 AA 2D D0 75 A1 41 24 3A 8B 41 |:PX.0..-.u.A$:.A|
000025A0: 24 B2 22 22 A7 33 30 31 36 30 00 C9 2D DA 75 41 |$."".30160..-.uA|
000025B0: B2 C6 28 41 24 29 3A 8B 41 B1 31 39 31 AF 41 B3 |..(A$):.A.191.A.|
000025C0: 32 31 39 A7 33 30 32 30 30 00 08 2E E4 75 8B 28 |219.30200....u.(|
000025D0: 41 B1 33 31 AF 41 B3 B1 34 34 AF 41 B3 B1 33 34 |A.31.A..44.A..34|
000025E0: AF 41 B3 B1 35 38 AF 41 B3 B1 35 39 AF 41 B3 39 |.A..58.A..59.A.9|
000025F0: 37 29 B0 41 B2 31 33 B0 41 B2 32 30 B0 41 B2 31 |7).A.13.A.20.A.1|
00002600: 35 37 A7 33 30 32 30 30 00 13 2E EE 75 89 33 30 |57.30200....u.30|
00002610: 31 36 30 00 23 2E F8 75 8B 41 B2 31 33 A7 33 30 |160.#..u.A.13.30|
00002620: 33 32 30 00 33 2E 0C 76 8B 41 B2 32 30 A7 33 30 |320.3..v.A.20.30|
00002630: 32 35 30 00 44 2E 11 76 8B 50 58 B2 50 33 A7 33 |250.D..v.PX.P3.3|
00002640: 30 31 36 30 00 56 2E 16 76 8B 41 B3 B1 31 35 37 |0160.V..v.A..157|
00002650: A7 33 30 32 38 30 00 7D 2E 1B 76 50 58 B2 C3 28 |.30280.}..vPX..(|
00002660: 50 24 29 3A 81 51 B2 31 A4 50 58 AA 31 3A 99 22 |P$):.Q.1.PX.1:."|
00002670: 9D 22 3B 3A 82 51 3A 89 33 30 30 30 30 00 8E 2E |.";:.Q:.30000...|
00002680: 2A 76 8B 50 24 B2 22 22 A7 33 30 31 36 30 00 BB |*v.P$."".30160..|
00002690: 2E 34 76 50 24 B2 C8 28 50 24 2C C3 28 50 24 29 |.4vP$..(P$,.(P$)|
000026A0: AB 31 29 3A 41 24 B2 22 9D A4 9D 22 3A 50 58 B2 |.1):A$."...":PX.|
000026B0: 50 58 AB 31 3A 89 33 30 33 30 30 00 CB 2E 48 76 |PX.1:.30300...Hv|
000026C0: 8B C3 28 50 24 29 B2 50 33 A7 8E 00 E1 2E 52 76 |..(P$).P3.....Rv|
000026D0: 50 24 B2 50 24 AA 41 24 3A 50 58 B2 C3 28 50 24 |P$.P$.A$:PX..(P$|
000026E0: 29 00 F1 2E 5C 76 99 41 24 3B 3A 89 33 30 31 36 |)...\v.A$;:.3016|
000026F0: 30 00 05 2F 70 76 8B C3 28 50 24 29 B3 50 34 A7 |0../pv..(P$).P4.|
00002700: 33 30 31 36 30 00 22 2F 7A 76 81 51 B2 31 A4 50 |30160."/zv.Q.1.P|
00002710: 58 AA 31 3A 99 22 9D 22 3B 3A 82 3A 99 22 20 22 |X.1:.".";:.:." "|
00002720: 3A 8E 00 3A 2F AC 8A 81 51 B2 31 A4 33 37 3A 99 |:..:/...Q.1.37:.|
00002730: 22 C0 22 3B 3A 82 3A 99 3A 8E 00 82 2F 50 C3 83 |".";:.:.:.../P..|
00002740: 42 49 52 54 48 44 41 59 2C 57 45 44 44 49 4E 47 |BIRTHDAY,WEDDING|
00002750: 2C 45 4E 47 41 47 45 4D 45 4E 54 2C 4F 54 48 45 |,ENGAGEMENT,OTHE|
00002760: 52 2C 4A 41 4E 55 41 52 59 2C 46 45 42 52 55 41 |R,JANUARY,FEBRUA|
00002770: 52 59 2C 4D 41 52 43 48 2C 41 50 52 49 4C 2C 4D |RY,MARCH,APRIL,M|
00002780: 41 59 00 BC 2F 5A C3 83 4A 55 4E 45 2C 4A 55 4C |AY../Z..JUNE,JUL|
00002790: 59 2C 41 55 47 55 53 54 2C 53 45 50 54 45 4D 42 |Y,AUGUST,SEPTEMB|
000027A0: 45 52 2C 4F 43 54 4F 42 45 52 2C 4E 4F 56 45 4D |ER,OCTOBER,NOVEM|
000027B0: 42 45 52 2C 44 45 43 45 4D 42 45 52 00 CA 2F 03 |BER,DECEMBER../.|
000027C0: D9 8F 20 56 32 2E 30 28 44 29 00 00 00 FF FF 9D |.. V2.0(D)......|
..@.... * DIARY MANAGER * BY BERNARD HAB
ET (C) 1983 ABRASCO LTD...F..".":.53280
,6:HO$."HANG-ON WHILE SEARCHING":HV$."HA
VE FOUND THE FOLLOWING:"...P..53272,23:.
G(8)...Z.EN.0:PE$.".PLEASE ENTER THE FOL
LOWING INFORMATION:":.MO$(12),TT$(4),TR$
(455).=.I..N.1.4:.TT$(N):.:.N.1.12:.MO$(
N):.:SP$." "...
N.CO$.".................................
......":LN$.".........................".
T.X..".";:.35500:.".. D I A R Y M
A N A G E R ..":.35500...}...8)"..
.. PRESS .. OPTION NUMBER:":..8)"..... 1
.. NEW ENTRIES".V.....8)"... 2 .. DELET
IONS":..8)"... 3 .. SEARCH & RETRIEVE"..
.....8)"... 4 .. PRINT DETAILS":..8)"...
5 .. LOAD/SAVE DATA"... ...8)"... 6 ..
SIGN-OFF"......14600:.E(A$).300,900,1700
,2500,1100,185:.180......9000:.P6.2.120.
5...."..".9)"OK, NOW SIGNING-OFF":.53280
,14:.G(9):.53272,21:..H.,..YR$.""..26100
.X./..EN.455.310...1..".SORRY, NO MORE R
OOM 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 . DA
ILY ENTRIES".^.T...9)".. 3 . BACK TO MAI
N MENU":..9)"... PRESS OPTION NUMBER "..
.H..14600:.E(A$).550,380,120:.360.G.|..P
E$:."..DATE .DDMM.: ";:P3.4:.29500:."..
HOUR .HHMM.: ";:.29500......"..NAME
: ";:P3.25:.29500:."..EVENT : ";:.
29500.>...LN.4:.29800:..11);:P3.4:P4.4:.
30000:.25000:.P6.1.400.V...DT$.I(P$,2).H
(P$,2)......"..".11);:P3.4:P4.0:.30000:.
25200:.P6.1.."....":.420.....HR$.P$.G...
."..".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.Z...EV$.P$:.".......
.ACCEPT";:.26000:.P6.2.380......".HANG-O
N WHILE POSTING":N.EN:TR$(N).DT$."1".HR$
.NA$."*".EV$:.27000.R...."..OK, ANY OTHE
R ENTRY";:.26000:.P6.1.380......310.%.&.
.PE$:."..DATE .DDMM.: ";:P3.4:.29500:."
..NAME : ";:P3.25:.29500.O.0.."..EV
ENT : 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);:
P3.25:P4.1:.30000:.24000:.P6.1.."...";:.
620...T.NA$.P$:..11)"..>";.-.V..A$:.A$."
1".A$."4".630.S.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.W...."..OK, ANY
OTHER ENTRY";:.26000:.P6.1.550.`....310
......TR$(0).""..".THERE ARE NO ENTRIES
YET":.".HIT ANY KEY";:.14600:.120......9
000:.P6.2.120.P....YR$.""..26100......".
".7)"** D E L E T I O N S **":."..";:.14
750:.".."HO$./...ZT$.DT$:XX.4:.27100:.P7
.2.1055.@....ZT.ZB.ZB.ZT.I...N.ZB.~...."
.ENTRY NO "N.1:."............":.:.27600:
.27700.F.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.6....990.Z....".HA
NG-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
OR .S.AVE?".Y.V..A$:.A$.."L".A$.."S".111
0.J.`..A$."L".1350......".ENTER NAME OF
FILE TO BE SAVED":.".MAX .16. CHARACTERS
:";:.S...P3.16:P4.1:.30000:.5500:.P6.2.1
200...D.F$.P$:."...LOAD. YOUR DATA DISK
IN DRIVE 0":."..HIT. ANY KEY":.14600.K..
..3,8,3,"@0:".F$.",S,W":.9500:.P6.1. 3:.
120.~....3,YR$:.3,EN:.N.0.EN.1:.3,TR$(N)
:.: 3: 15:.120.F.F..".DO YOU WISH TO LOA
D IMPORTANT DATES":."ONLY ";:.26000:.P6.
2.1400.R.K.." YES"...P..".PLEASE ENTER N
AME OF FILE TO BE LOADED":.".MAX .16. CH
ARACTERS ";.L.U.P3.16:P4.1:.30000:.5500:
.P6.2..".....":.1360...Z..".PLEASE .LOAD
. YOUR DATA DISK IN DRIVE 0":."..HIT. AN
Y KEY.":.14600..._..3,8,3,P$:.9500:.P6.1
. 3:.120...D..3,YR$,EN:M.0:.N.0.EN.1:.3,
A$:.J(A$,5,1)."2".TR$(M).A$:M.M.1...N..N
:EN.M:YR$."": 3: 15:.120.A.X..".PLEASE E
NTER NAME OF FILE TO BE LOADED":.".MAX .
16. CHARACTERS ";...}.P3.16:P4.1:.30000:
.5500:.P6.2.1400.R....".PLEASE .LOAD. YO
UR DATA DISK IN DRIVE 0":."..HIT. ANY KE
Y.":.14600...M..3,8,3,P$:.9500:.P6.1. 3:
.120.$.R..3,YR$,EN:.N.0.EN.1:.3,TR$(N):.
: 3: 15:.120.7....YR$.""..26100.R...."..
.".11)"SEARCH & RETRIEVE":..11)"........
.........".......7)".. 1 . DATES TO REME
MBER":..7)".. 2 . BROWSE THROUGH ENTRIES
".......7)".. 3 . STATEMENT OF ENTRIES
":..7)".. 4 . SEARCH BY NAME".C.....7)
".. 5 . BACK TO MAIN MENU":..11)"...P
RESS OPTION NUMBER".S.&..14600:.E(A$).18
50,2120,2300,2700,120:.1830...:..TR$(0).
""..".THERE ARE NO ENTRIES YET":.".HIT A
NY KEY";:.14600:.1770...D..".ENTER MONTH
REQUIRED: ";:P3.2:P4.1:.30000...I..E(P$
).1.E(P$).12.1860.(.K.."."HO$:.C(P$).1.P
$."0".P$.O.N.ZT$.P$:XX.2:.27100:.P7.2.."
.THERE ARE NO ENTRIES THIS MONTH":.1940.
X.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:."..HIT ANY KEY TO CONTINUE.":.14600:
M.N:.1880.>....".ANY OTHER";:.26000:.P6.
1.1860.H....1770...H..TR$(0).""..".THERE
ARE NO ENTRIES YET":.".HIT ANY KEY";:.1
4600:.1770.J.M..".BROWSING STARTS ON/BEF
ORE DATE ENTERED":.:.14750...R.ZT$.DT$:X
X.4:.27100:.P7.2.2240...W..ZB.ZT.ZT.ZB..
.\.N.ZT:PO.ZT.B.F..".ENTRY NO ";N.1:."..
.........":.:.27600:.27700.}.P.LN.20:CO.
1:.29800:.".PRESS:. .+. FOR BROWSING FOR
WARD"...Z...7)".-. FOR BROWSING BACKWARD
":..7)".S. TO STOP".Y....A$:.A$.."+".A$.
."-".A$.."S".2180......A$."+".2220......
A$."-".2230......1770. ....N.1..EN.1.N.N
.1:.2150.*....2180.B....N.1..0.N.N.1:.21
50.L....2180.[...N.ZM:.2150......TR$(0).
""..".THERE ARE NO ENTRIES YET":.".HIT A
NY KEY":.14600:.1770......".STATEMENT WI
LL START AS OF DATE ENTERED":.:.14750...
...DT$.H(TR$(EN.1),4).PS.EN:.2317."....D
T$..H(TR$(0),4).PS.0:.2317.L...ZT$.DT$:X
X.4:.27100:.P7.2.PS.ZB:.2317.]....ZB.ZT.
ZT.ZB.G...PS.ZT.....DT$.I(DT$,2)." ".MO$
(E(H(DT$,2))):.FP.1...H....".ENTRIES STA
RTING "DT$" 19"YR$:.:.N.PS .PS.5...$..N.
EN.."......END OF ENTRIES":.2360......27
600:.24100:.N.>.8.."..PRESS:. .-. FOR PR
EVIOUS PAGE".29)".M. FOR MENU".Z.B...7)"
.+. FOR NEXT PAGE"...~..A$:.A$.."+".A$..
"M".A$.."-".2430......A$."M".1770......A
$."+".N.EN.PS.N:.2320.L....A$."-".PS.0.P
S.PS.6:.2465.V....2430......PS..0.PS.0:D
T$."0101":.2317.. ..DT$.H(TR$(PS),4):.23
17.Z D..TR$(0).""..".THERE ARE NO ENTRIE
S YET":.".HIT ANY KEY":.14600:.120.N E..
9000:.P6.2.120.. F..".".9)"DO YOU WISH T
O PRINT:":..9)"... 1 . ALL ENTRIES".O H.
..9)".. 2 . A SPECIFIED NUMBER".. J..A$:
.A$.."1".A$.."2".2506..!K..A$."1".NU.EN:
.2515.)!M..".TOTAL ENTRIES IN MEMORY: "E
N.C!N..".ENTER NUMBER REQUIRED ";:P3.3:
P4.1:.30000:A.E(P$).!P..A..0.A.EN.."...
":.2510..!R.NU.PS.A.1..!S.FP.1:.2303:FP.
0.Q!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".K"...M.1.38:.4,E$".";
:.:.4,E$".".~"...N.PS.NU:.N.EN..4,E$D$"1
5END OF ENTRIES":.2650.."...27600:.4,E$D
T$;:.HR$..""..4,E$D$"15"HR$" HOURS: ";:.
2590.M"...4,E$D$"15";.."...4,E$NA$" - "E
V$.."(..4:.N..#Z..4,G(145): 4:.53265,27:
.120.F#...".ENTER NAME: ";:P3.25:P4.1:.3
0000:.24000:.P6.1.2700..#...".ENTRIES FO
R: "P$:.:C.0:.N.0.EN.1:.J(TR$(N),5,1)."2
".2750..#...J(TR$(N),10,C(P$)).P$..27600
:.24100: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..$R..N.7$...C.0.."
.SORRY NO ENTRY FOR "P$.\$...".ANY OTHER
";:.26000:.P6.1.2700.F$...1770..$..."..H
IT ANY KEY TO CONTINUE.":.14600:.".ENTRI
ES FOR: "P$:.:...$|.P6.1:A.F(P$):.(A.65.
A.90).P$."N".P$."V".P$."C".P$."S".P$."I"
.P6.2..$.....%(#.".ARE YOU SURE";:.26000
:..?%.%P6.0:.15,8,15:.15,ER,ER$,TR,BL:.E
R.20. ..~%&%."..DISK ERROR:. "ER" "ER$TR
;BL:."..HIT ANY KEY FOR MENU."..%0%.1460
0: 15:P6.1:...%.9.A$:.A$."".14600..%.9..
.%.9."PLEASE ENTER DATE .DDMM.: ";:P3.4:
P4.4:.30000:.25000..&.9.P6.1..".";:.1475
0.!&.9.P6.0.DT$.I(P$,2).H(P$,2):..P&.]P6
.0:A.F(P$):.A.65.(A.90.A.192).A.218.P6.1
.V&J]..E&.].N.0.24080..&.].H(TR$(N),4).H
(TR$(N.1),4).24080..&.^.27050:N.N.1:.240
50..&.^EN.EN.1:F2.1:...&$^.DT$.14);:.HR$
..""..HR$" HOURS":..14);..&.^.NA$:..14)E
V$:..6'.AAM$."312831303130313130313031":
AL$."312931303130313130313031".\'.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:..C',BAR.E(YR$).1900:..(AR.4).A
R.4.AM$.AL$..'.B.PD.E(J(AM$,PM.2.1,2)).P
6.1..'0B...(PB.P$."".P$."0000":.".......
............"P$.C(UBP6.0:A$.H(P$,2):.A$.
"00".A$."23".P6.1:..J(ZBA$.I(P$,2):.A$."
00".A$."59".P6.1:..P(.B...(.E." ..Y..ES/
..N..O?";..(.E.A$:.A$.."Y".A$.."N".26010
..(.E.A$."Y".P6.1:..F(.EP6.2:...).E.".PL
EASE ENTER YEAR: 19 ";:P3.2:P4.2:.30000:
.P$."70".P$."99".26100..).FYR$.P$:..*)XI
.N.0.27030.P).I.H(TR$(N),4)..H(TR$(N.1),
4).27030.H).I.27050:N.N.1:.27000..).I.J(
TR$(N),5,1)."1"..27060:EN.EN.1:F2.1:..A)
.IA$.TR$(N):TR$(N).TR$(N.1):TR$(N.1).A$:
..L).I.N.0....).I.J(TR$(N.1),5,1)."2"...
.*.I.J(TR$(N),6,4)..J(TR$(N.1),6,4)...%*
HI.27050:N.N.1:.27060.9*.IZT.0:ZB.EN:P7.
0.Q*.IZM.ZT..((ZB.ZT).2):ZI$.H(TR$(ZM),X
X):.ZI$.ZT$.27230..*"J.ZT.ZM.27470..*6J.
ZI$."".ZT$.ZI$.ZT.ZM:.27105..*@JZB.ZM:.2
7105..*^JZB.ZM.P*HJ.ZB.1.0.27320..*RJZI$
.H(TR$(ZB.1),XX):.ZI$..ZT$.27320..+.JZB.
ZB.1:.27240..+.JZT.ZM.(+BJ.ZT.1.EN.27410
.P+LJZI$.H(TR$(ZT.1),XX):.ZI$..ZT$.27410
.C+.JZT.ZT.1:.27330.N+.KP7.1:..Y+NKP7.2:
...+PKA$.TR$(N):DT$.J(A$,3,2)." ".MO$(E(
H(A$,2))):AA.E(J(A$,5,1))..+ZKA$.I(A$,C(
A$).5):.AA..1.HR$."":.27630..,.KHR$.H(A$
,2).":".J(A$,3,2):A$.I(A$,C(A$).4).6,.K.
M.1.C(A$):.J(A$,M,1)."*".27650.=,.K.M.A,
.LNA$.H(A$,M.1):EV$.I(A$,C(A$).M)..,.L.A
A.2.(EV$."1".EV$."2".EV$."3").EV$.TT$(E(
EV$))..,.L..W,4L."DATE".10)": "DT$" 19"Y
R$:.HR$..""..".HOUR".10)": "HR$..-HL.".N
AME".10)": "NA$:.".EVENT".10)": "EV$:...
-<S.Q.1.P3:.".";:.:.:..<-HT.".";:.CO.1..
H(CO$,CO.1);.T-RT.LN.1..H(LN$,LN.1);.Z-|
T..D-0U.">";..-:U.Q.1.P3:.".";:.Q:.Q.1.P
3:.".";:.Q:P$."":PX.0..-PU.A$:.A$."".301
60.I-ZUA.F(A$):.A.191.A.219.30200....U.(
A.31.A..44.A..34.A..58.A..59.A.97).A.13.
A.20.A.157.30200....U.30160.#..U.A.13.30
320.3..V.A.20.30250.D..V.PX.P3.30160.V..
V.A..157.30280.}..VPX.C(P$):.Q.1.PX.1:."
.";:.Q:.30000...*V.P$."".30160...4VP$.H(
P$,C(P$).1):A$."...":PX.PX.1:.30300.K.HV
.C(P$).P3.....RVP$.P$.A$:PX.C(P$)...\V.A
$;:.30160../PV.C(P$).P4.30160."/ZV.Q.1.P
X.1:.".";:.:." ":..:/...Q.1.37:.".";:.:.
:.../PC.BIRTHDAY,WEDDING,ENGAGEMENT,OTHE
R,JANUARY,FEBRUARY,MARCH,APRIL,MAY../ZC.
JUNE,JULY,AUGUST,SEPTEMBER,OCTOBER,NOVEM
BER,DECEMBER.J/.Y. V2.0(D)......
> CLICK IMAGE PREVIEW FOR FULL MODAL