64HOME INVENTORY

00000000: 01 08 26 08 0A 00 8F 20  2A 2A 20 48 4F 55 53 45  |..&.... ** HOUSE|
00000010: 20 49 4E 56 45 4E 54 4F  52 59 20 2A 2A 2A 20 44  | INVENTORY *** D|
00000020: 49 53 4B 20 2A 2A 00 2C  08 14 00 8F 00 4A 08 1E  |ISK **.,.....J..|
00000030: 00 8F 20 20 20 20 20 20  20 20 20 52 4F 42 45 52  |..         ROBER|
00000040: 54 20 57 2E 20 42 41 4B  45 52 00 6F 08 28 00 8F  |T W. BAKER.o.(..|
00000050: 20 31 35 20 57 49 4E 44  53 4F 52 20 44 52 2E 2C  | 15 WINDSOR DR.,|
00000060: 20 41 54 43 4F 2C 20 4E  4A 20 30 38 30 30 34 00  | ATCO, NJ 08004.|
00000070: 75 08 32 00 8F 00 9B 08  3C 00 8F 20 2A 2A 2A 2A  |u.2.....<.. ****|
00000080: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000090: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 00 A1 08 46 00  |***********...F.|
000000A0: 3A 00 D2 08 50 00 99 22  93 20 20 20 20 20 48 4F  |:...P..".     HO|
000000B0: 55 53 45 48 4F 4C 44 20  49 4E 56 45 4E 54 4F 52  |USEHOLD INVENTOR|
000000C0: 59 20 50 52 4F 47 52 41  4D 22 3A 20 8D 20 31 32  |Y PROGRAM": . 12|
000000D0: 39 30 00 00 09 5A 00 99  22 44 45 53 49 52 45 44  |90...Z.."DESIRED|
000000E0: 20 50 52 4F 47 52 41 4D  20 4D 4F 44 45 3A 22 3A  | PROGRAM MODE:":|
000000F0: 20 99 3A 20 99 22 20 30  20 3D 20 44 4F 4E 45 22  | .: ." 0 = DONE"|
00000100: 00 16 09 64 00 99 22 20  31 20 3D 20 52 45 41 44  |...d.." 1 = READ|
00000110: 20 44 41 54 41 22 00 4E  09 6E 00 99 22 20 32 20  | DATA".N.n.." 2 |
00000120: 3D 20 57 52 49 54 45 20  4E 45 57 20 44 41 54 41  |= WRITE NEW DATA|
00000130: 20 46 49 4C 45 22 3A 20  99 22 20 33 20 3D 20 43  | FILE": ." 3 = C|
00000140: 4F 50 59 20 44 41 54 41  20 46 49 4C 45 22 00 85  |OPY DATA FILE"..|
00000150: 09 78 00 99 22 20 34 20  3D 20 45 44 49 54 20 44  |.x.." 4 = EDIT D|
00000160: 41 54 41 20 46 49 4C 45  22 3A 20 99 22 20 35 20  |ATA FILE": ." 5 |
00000170: 3D 20 48 45 4C 50 20 28  49 4E 46 4F 52 4D 41 54  |= HELP (INFORMAT|
00000180: 49 4F 4E 29 22 00 9F 09  82 00 8D 20 31 32 39 30  |ION)"...... 1290|
00000190: 3A 20 99 3A 20 99 22 4D  4F 44 45 20 3F 22 3B 00  |: .: ."MODE ?";.|
000001A0: BF 09 8C 00 8D 20 31 33  36 30 3A 20 8B 20 52 24  |..... 1360: . R$|
000001B0: B2 22 30 22 20 A7 20 99  22 93 3A 20 45 4E 44 00  |."0" . .".: END.|
000001C0: DE 09 96 00 52 B2 C5 28  52 24 29 3A 20 8B 20 52  |....R..(R$): . R|
000001D0: B3 31 20 B0 20 52 B1 35  20 A7 20 31 34 30 00 F4  |.1 . R.5 . 140..|
000001E0: 09 A0 00 8B 20 5A B3 35  20 A7 20 9F 20 31 35 2C  |.... Z.5 . . 15,|
000001F0: 38 2C 31 35 00 18 0A AA  00 5A B2 52 3A 20 91 20  |8,15.....Z.R: . |
00000200: 52 20 89 20 33 31 30 2C  31 38 30 2C 33 31 30 2C  |R . 310,180,310,|
00000210: 33 31 30 2C 31 34 30 30  00 23 0A B4 00 8D 20 31  |310,1400.#.... 1|
00000220: 32 35 30 00 5F 0A BE 00  85 22 91 20 4F 55 54 50  |250._....". OUTP|
00000230: 55 54 20 54 4F 20 44 49  53 4B 20 44 52 49 56 45  |UT TO DISK DRIVE|
00000240: 23 20 28 30 20 4F 52 20  31 29 20 20 30 9D 9D 9D  |# (0 OR 1)  0...|
00000250: 22 3B 54 24 3A 54 24 B2  C8 28 54 24 2C 31 29 00  |";T$:T$..(T$,1).|
00000260: 85 0A D2 00 54 B2 C5 28  54 24 29 3A 20 8B 20 54  |....T..(T$): . T|
00000270: 24 B3 B1 22 30 22 20 AF  20 54 24 B3 B1 22 31 22  |$.."0" . T$.."1"|
00000280: 20 A7 20 38 30 00 A0 0A  DC 00 99 3A 20 99 22 4F  | . 80......: ."O|
00000290: 55 54 50 55 54 20 22 3B  3A 20 8D 20 31 33 34 30  |UTPUT ";: . 1340|
000002A0: 00 B4 0A E6 00 8B 20 46  24 B3 B1 22 2D 22 20 A7  |...... F$.."-" .|
000002B0: 20 32 36 30 00 CC 0A F0  00 46 24 B2 22 49 4E 56  | 260.....F$."INV|
000002C0: 45 4E 54 4F 52 59 20 44  41 54 41 22 00 EF 0A FA  |ENTORY DATA"....|
000002D0: 00 99 3A 99 22 44 45 46  41 55 4C 54 20 46 49 4C  |..:."DEFAULT FIL|
000002E0: 45 20 3D 20 22 3B 54 24  3B 32 3A 22 3B 46 24 00  |E = ";T$;2:";F$.|
000002F0: 14 0B 04 01 9F 20 32 2C  38 2C 35 2C 54 24 AA 22  |..... 2,8,5,T$."|
00000300: 3A 22 AA 46 24 AA 22 2C  53 2C 57 22 3A 20 8D 20  |:".F$.",S,W": . |
00000310: 31 36 30 30 00 24 0B 0E  01 8B 20 5A B2 33 20 A7  |1600.$.... Z.3 .|
00000320: 20 35 36 30 00 34 0B 18  01 8B 20 5A B2 34 20 A7  | 560.4.... Z.4 .|
00000330: 20 36 31 30 00 53 0B 22  01 8D 20 39 30 30 3A 20  | 610.S.".. 900: |
00000340: 8B 20 43 20 A7 20 8D 20  31 31 33 30 3A 20 89 20  |. C . . 1130: . |
00000350: 32 39 30 00 5D 0B 2C 01  89 20 35 35 30 00 68 0B  |290.].,.. 550.h.|
00000360: 36 01 8D 20 31 32 35 30  00 9A 0B 40 01 85 22 91  |6.. 1250...@..".|
00000370: 20 49 4E 50 55 54 20 46  52 4F 4D 20 44 49 53 4B  | INPUT FROM DISK|
00000380: 20 44 52 49 56 45 23 20  28 30 20 4F 52 20 31 29  | DRIVE# (0 OR 1)|
00000390: 20 20 30 9D 9D 9D 22 3B  54 24 00 B2 0B 4A 01 54  |  0...";T$...J.T|
000003A0: B2 C5 28 54 24 29 3A 20  54 24 B2 C8 28 54 24 2C  |..(T$): T$..(T$,|
000003B0: 31 29 00 CF 0B 54 01 8B  20 54 24 B3 B1 22 30 22  |1)...T.. T$.."0"|
000003C0: 20 AF 20 54 24 B3 B1 22  31 22 20 A7 20 38 30 00  | . T$.."1" . 80.|
000003D0: E9 0B 5E 01 99 3A 20 99  22 49 4E 50 55 54 20 22  |..^..: ."INPUT "|
000003E0: 3B 3A 20 8D 20 31 33 34  30 00 2B 0C 68 01 8B 20  |;: . 1340.+.h.. |
000003F0: 46 24 B2 22 2D 22 20 A7  20 46 24 B2 22 49 4E 56  |F$."-" . F$."INV|
00000400: 45 4E 54 4F 52 59 20 44  41 54 41 22 3A 20 99 22  |ENTORY DATA": ."|
00000410: 91 20 44 45 46 41 55 4C  54 20 46 49 4C 45 20 3D  |. DEFAULT FILE =|
00000420: 22 3B 54 24 3B 22 3A 22  3B 46 24 00 50 0C 72 01  |";T$;":";F$.P.r.|
00000430: 9F 20 31 2C 38 2C 36 2C  54 24 AA 22 3A 22 AA 46  |. 1,8,6,T$.":".F|
00000440: 24 AA 22 2C 53 2C 52 22  3A 20 8D 20 31 36 30 30  |$.",S,R": . 1600|
00000450: 00 5A 0C 7C 01 58 24 B2  22 22 00 6A 0C 86 01 8B  |.Z.|.X$."".j....|
00000460: 20 5A B1 32 20 A7 20 31  39 30 00 82 0C 90 01 8D  | Z.2 . 190......|
00000470: 20 31 31 36 30 3A 20 8B  20 43 B1 31 20 A7 20 34  | 1160: . C.1 . 4|
00000480: 39 30 00 98 0C 9A 01 8D  20 31 30 39 30 3A 20 8B  |90...... 1090: .|
00000490: 20 43 20 A7 20 35 31 30  00 B0 0C A4 01 8D 20 31  | C . 510...... 1|
000004A0: 31 36 30 3A 20 8B 20 43  B1 31 20 A7 20 35 31 30  |160: . C.1 . 510|
000004B0: 00 C6 0C AE 01 8D 20 31  31 30 30 3A 20 8B 20 43  |...... 1100: . C|
000004C0: 20 A7 20 35 31 30 00 DE  0C B8 01 8D 20 31 31 36  | . 510...... 116|
000004D0: 30 3A 20 8B 20 43 B1 31  20 A7 20 35 31 30 00 F4  |0: . C.1 . 510..|
000004E0: 0C C2 01 8D 20 31 31 39  39 3A 20 8B 20 43 20 A7  |.... 1199: . C .|
000004F0: 20 35 31 30 00 FF 0C CC  01 8D 20 31 33 30 30 00  | 510...... 1300.|
00000500: 1B 0D D6 01 8D 20 31 33  38 30 3A 20 8B 20 52 24  |..... 1380: . R$|
00000510: B3 B1 22 44 22 20 A7 20  34 30 30 00 25 0D E0 01  |.."D" . 400.%...|
00000520: 89 20 35 35 30 00 5A 0D  EA 01 99 22 93 12 20 45  |. 550.Z....".. E|
00000530: 4E 44 20 4F 46 20 4D 4F  44 45 20 23 31 92 20 20  |ND OF MODE #1.  |
00000540: 44 4F 4E 45 20 52 45 41  44 49 4E 47 20 44 41 54  |DONE READING DAT|
00000550: 41 20 46 49 4C 45 22 3A  20 99 00 65 0D FE 01 8D  |A FILE": ..e....|
00000560: 20 31 33 30 30 00 86 0D  08 02 8B 20 43 B2 31 20  | 1300...... C.1 |
00000570: A7 20 99 22 45 4E 44 20  4F 46 20 44 41 54 41 20  |. ."END OF DATA |
00000580: 46 49 4C 45 21 22 00 B1  0D 12 02 8B 20 43 B1 31  |FILE!"...... C.1|
00000590: 20 A7 20 99 22 44 49 53  4B 20 45 52 52 4F 52 20  | . ."DISK ERROR |
000005A0: 28 53 54 41 54 55 53 20  3D 22 3B 53 54 3B 22 29  |(STATUS =";ST;")|
000005B0: 22 00 BC 0D 1C 02 8D 20  31 33 35 30 00 D5 0D 26  |"...... 1350...&|
000005C0: 02 A0 20 31 3A 20 A0 20  32 3A 20 A0 20 31 35 3A  |.. 1: . 2: . 15:|
000005D0: 20 89 20 38 30 00 16 0E  30 02 49 39 24 B2 22 22  | . 80...0.I9$.""|
000005E0: 3A 20 8D 20 31 32 35 30  3A 20 99 22 12 50 4C 45  |: . 1250: .".PLE|
000005F0: 41 53 45 20 57 41 49 54  92 20 20 2A 2A 2A 2A 2A  |ASE WAIT.  *****|
00000600: 2A 20 43 4F 50 59 49 4E  47 20 44 41 54 41 20 46  |* COPYING DATA F|
00000610: 49 4C 45 21 91 22 00 2D  0E 3A 02 8D 20 31 31 36  |ILE!.".-.:.. 116|
00000620: 30 3A 8B 20 43 B1 31 20  A7 20 38 32 30 00 5A 0E  |0:. C.1 . 820.Z.|
00000630: 44 02 8B 20 5A B2 34 20  AF 20 C8 28 49 24 2C C3  |D.. Z.4 . .(I$,.|
00000640: 28 49 39 24 29 29 B2 49  39 24 20 A7 20 8D 20 31  |(I9$)).I9$ . . 1|
00000650: 32 35 30 3A 20 89 20 36  32 30 00 72 0E 4E 02 8D  |250: . 620.r.N..|
00000660: 20 31 31 33 30 3A 20 8B  20 43 B2 31 20 A7 20 38  | 1130: . C.1 . 8|
00000670: 32 30 00 8C 0E 58 02 8B  20 5A B2 33 20 B0 20 49  |20...X.. Z.3 . I|
00000680: 39 24 B3 B1 22 22 20 A7  20 35 37 30 00 A4 0E 62  |9$.."" . 570...b|
00000690: 02 8D 20 31 31 36 30 3A  20 8B 20 43 B1 31 20 A7  |.. 1160: . C.1 .|
000006A0: 20 38 32 30 00 D6 0E 6C  02 8D 20 31 32 35 30 3A  | 820...l.. 1250:|
000006B0: 20 8D 20 31 31 30 30 3A  20 8D 20 31 32 39 30 3A  | . 1100: . 1290:|
000006C0: 20 99 22 44 45 53 49 52  45 44 20 41 43 54 49 4F  | ."DESIRED ACTIO|
000006D0: 4E 3A 22 3A 20 99 00 FC  0E 76 02 99 22 20 31 20  |N:": ....v.." 1 |
000006E0: 3D 20 43 4F 50 59 20 54  48 49 53 20 49 54 45 4D  |= COPY THIS ITEM|
000006F0: 2C 20 4E 4F 20 43 48 41  4E 47 45 22 00 19 0F 80  |, NO CHANGE"....|
00000700: 02 99 22 20 32 20 3D 20  44 45 4C 45 54 45 20 54  |.." 2 = DELETE T|
00000710: 48 49 53 20 49 54 45 4D  22 00 42 0F 8A 02 99 22  |HIS ITEM".B...."|
00000720: 20 33 20 3D 20 49 4E 53  45 52 54 20 49 54 45 4D  | 3 = INSERT ITEM|
00000730: 53 20 42 45 46 4F 52 45  20 54 48 49 53 20 4F 4E  |S BEFORE THIS ON|
00000740: 45 22 00 6F 0F 94 02 99  22 20 34 20 3D 20 53 45  |E".o...." 4 = SE|
00000750: 41 52 43 48 20 26 20 43  4F 50 59 20 54 49 4C 4C  |ARCH & COPY TILL|
00000760: 20 49 54 45 4D 20 46 4F  55 4E 44 22 3A 20 99 00  | ITEM FOUND": ..|
00000770: 78 0F B2 02 99 20 52 24  00 A3 0F BC 02 99 22 4F  |x.... R$......"O|
00000780: 4B 22 3A 20 49 39 24 B2  22 22 3A 20 91 20 52 20  |K": I9$."": . R |
00000790: 89 20 35 39 30 2C 20 37  31 30 2C 20 37 33 30 2C  |. 590, 710, 730,|
000007A0: 37 36 30 00 B3 0F C6 02  8B 20 43 B2 31 20 A7 20  |760...... C.1 . |
000007B0: 38 32 30 00 BD 0F D0 02  89 20 36 31 30 00 F6 0F  |820...... 610...|
000007C0: DA 02 49 39 24 B2 49 24  3A 20 57 39 24 B2 57 24  |..I9$.I$: W9$.W$|
000007D0: 3A 20 4D 39 24 B2 4D 24  3A 20 53 39 24 B2 53 24  |: M9$.M$: S9$.S$|
000007E0: 3A 20 44 39 24 B2 44 24  3A 20 56 39 24 B2 56 24  |: D9$.D$: V9$.V$|
000007F0: 3A 20 43 39 B2 43 00 15  10 E4 02 8D 20 39 30 30  |: C9.C...... 900|
00000800: 3A 20 8B 20 43 20 A7 20  8D 20 31 31 33 30 3A 20  |: . C . . 1130: |
00000810: 89 20 37 34 30 00 54 10  EE 02 49 24 B2 49 39 24  |. 740.T...I$.I9$|
00000820: 3A 20 57 24 B2 57 39 24  3A 20 4D 24 B2 4D 39 24  |: W$.W9$: M$.M9$|
00000830: 3A 20 53 24 B2 53 39 24  3A 20 44 24 B2 44 39 24  |: S$.S9$: D$.D9$|
00000840: 3A 20 56 24 B2 56 39 24  3A 43 B2 43 39 3A 20 89  |: V$.V9$:C.C9: .|
00000850: 20 36 32 30 00 84 10 F8  02 8D 20 31 32 35 30 3A  | 620...... 1250:|
00000860: 20 99 22 41 4C 4C 20 45  4E 54 52 49 45 53 20 57  | ."ALL ENTRIES W|
00000870: 49 4C 4C 20 42 45 20 43  4F 50 49 45 44 20 55 4E  |ILL BE COPIED UN|
00000880: 54 49 4C 22 00 A5 10 02  03 99 3A 20 99 22 44 45  |TIL"......: ."DE|
00000890: 53 49 52 45 44 20 49 54  45 4D 20 49 53 20 46 4F  |SIRED ITEM IS FO|
000008A0: 55 4E 44 3B 22 00 CC 10  0C 03 99 3A 20 99 3A 20  |UND;"......: .: |
000008B0: 99 22 45 4E 54 45 52 20  49 54 45 4D 20 54 4F 20  |."ENTER ITEM TO |
000008C0: 53 45 41 52 43 48 20 46  4F 52 3A 22 00 DE 10 16  |SEARCH FOR:"....|
000008D0: 03 85 22 20 20 2D 9D 9D  9D 22 3B 49 39 24 00 12  |.."  -...";I9$..|
000008E0: 11 20 03 8B 20 49 39 24  B2 22 2D 22 20 A7 20 49  |. .. I9$."-" . I|
000008F0: 39 24 B2 22 22 3A 20 99  22 91 91 91 53 45 41 52  |9$."": ."...SEAR|
00000900: 43 48 20 41 42 4F 52 54  45 44 22 3A 20 89 20 36  |CH ABORTED": . 6|
00000910: 32 30 00 33 11 2A 03 99  3A 20 99 3A 20 99 3A 20  |20.3.*..: .: .: |
00000920: 99 22 53 45 41 52 43 48  49 4E 47 22 3A 20 89 20  |."SEARCHING": . |
00000930: 35 38 30 00 43 11 34 03  8B 20 5A B2 33 20 A7 20  |580.C.4.. Z.3 . |
00000940: 35 32 30 00 5B 11 3E 03  8D 20 31 32 35 30 3A 20  |520.[.>.. 1250: |
00000950: 8B 20 43 B1 31 20 A7 20  35 33 30 00 75 11 48 03  |. C.1 . 530.u.H.|
00000960: 99 22 45 4E 44 20 4F 46  20 49 4E 50 55 54 20 46  |."END OF INPUT F|
00000970: 49 4C 45 21 22 00 A5 11  52 03 99 3A 20 99 22 44  |ILE!"...R..: ."D|
00000980: 4F 20 59 4F 55 20 57 41  4E 54 20 54 4F 20 41 44  |O YOU WANT TO AD|
00000990: 44 20 41 4E 59 20 45 4E  54 52 49 45 53 20 54 4F  |D ANY ENTRIES TO|
000009A0: 20 54 48 45 22 00 C5 11  5C 03 99 3A 20 99 22 45  | THE"...\..: ."E|
000009B0: 4E 44 20 4F 46 20 54 48  45 20 44 41 54 41 20 46  |ND OF THE DATA F|
000009C0: 49 4C 45 22 3B 00 E0 11  66 03 8D 20 31 33 31 30  |ILE";...f.. 1310|
000009D0: 3A 20 8B 20 52 24 B2 22  4E 22 20 A7 20 35 35 30  |: . R$."N" . 550|
000009E0: 00 FF 11 70 03 8D 20 39  30 30 3A 20 8B 20 43 20  |...p.. 900: . C |
000009F0: A7 20 8D 20 31 31 33 30  3A 20 89 20 38 38 30 00  |. . 1130: . 880.|
00000A00: 09 12 7A 03 89 20 35 35  30 00 4A 12 84 03 43 B2  |..z.. 550.J...C.|
00000A10: 30 3A 20 99 22 93 45 4E  54 45 52 20 49 54 45 4D  |0: .".ENTER ITEM|
00000A20: 20 49 4E 46 4F 52 4D 41  54 49 4F 4E 3A 91 22 3A  | INFORMATION:.":|
00000A30: 20 99 22 44 20 3D 20 44  4F 4E 45 20 45 4E 54 45  | ."D = DONE ENTE|
00000A40: 52 49 4E 47 20 44 41 54  41 22 00 70 12 8E 03 99  |RING DATA".p....|
00000A50: 22 45 20 3D 20 45 52 52  4F 52 2C 20 52 45 53 54  |"E = ERROR, REST|
00000A60: 41 52 54 20 45 4E 54 49  52 45 20 49 54 45 4D 22  |ART ENTIRE ITEM"|
00000A70: 00 A0 12 98 03 99 3A 20  99 22 44 4F 20 4E 4F 54  |......: ."DO NOT|
00000A80: 20 55 53 45 20 27 2C 27  20 4F 52 20 27 3A 27 20  | USE ',' OR ':' |
00000A90: 57 49 54 48 49 4E 20 54  48 45 20 44 41 54 41 22  |WITHIN THE DATA"|
00000AA0: 00 C9 12 A2 03 99 3A 20  99 22 50 52 45 53 53 12  |......: ."PRESS.|
00000AB0: 52 45 54 55 52 4E 92 20  41 46 54 45 52 20 45 41  |RETURN. AFTER EA|
00000AC0: 43 48 20 45 4E 54 52 59  22 00 F8 12 AC 03 8D 20  |CH ENTRY"...... |
00000AD0: 31 32 39 30 3A 20 85 22  12 49 54 45 4D 92 20 20  |1290: .".ITEM.  |
00000AE0: 20 3F 9D 9D 9D 22 3B 49  24 3A 8B 20 49 24 B2 22  | ?...";I$:. I$."|
00000AF0: 45 22 20 A7 20 39 30 30  00 09 13 B6 03 8B 20 49  |E" . 900...... I|
00000B00: 24 B2 22 44 22 20 A7 20  8E 00 31 13 C0 03 85 22  |$."D" . ..1...."|
00000B10: 12 4D 41 4B 45 92 20 20  20 3F 9D 9D 9D 22 3B 57  |.MAKE.   ?...";W|
00000B20: 24 3A 20 8B 20 57 24 B2  22 45 22 20 A7 20 39 30  |$: . W$."E" . 90|
00000B30: 30 00 42 13 CA 03 8B 20  57 24 B2 22 44 22 20 A7  |0.B.... W$."D" .|
00000B40: 20 8E 00 6B 13 D4 03 85  22 12 4D 4F 44 45 4C 92  | ..k....".MODEL.|
00000B50: 20 20 20 3F 9D 9D 9D 22  3B 4D 24 3A 20 8B 20 4D  |   ?...";M$: . M|
00000B60: 24 B2 22 45 22 20 A7 20  39 30 30 00 7C 13 DE 03  |$."E" . 900.|...|
00000B70: 8B 20 4D 24 B2 22 44 22  20 A7 20 8E 00 AA 13 E8  |. M$."D" . .....|
00000B80: 03 85 22 12 53 45 52 49  41 4C 23 2F 49 44 92 20  |..".SERIAL#/ID. |
00000B90: 20 20 3F 9D 9D 9D 22 3B  53 24 3A 20 8B 20 53 24  |  ?...";S$: . S$|
00000BA0: B2 22 45 22 20 A7 20 39  30 30 00 BB 13 F2 03 8B  |."E" . 900......|
00000BB0: 20 53 24 B2 22 44 22 20  A7 20 8E 00 FD 13 FC 03  | S$."D" . ......|
00000BC0: 85 22 12 44 41 54 45 20  41 43 51 27 44 92 20 20  |.".DATE ACQ'D.  |
00000BD0: 20 3F 9D 9D 9D 20 28 4D  4F 4E 54 48 2F 44 41 59  | ?... (MONTH/DAY|
00000BE0: 2F 59 45 41 52 29 3F 9D  9D 22 3B 44 24 3A 20 8B  |/YEAR)?..";D$: .|
00000BF0: 20 44 24 B2 22 45 22 20  A7 20 39 30 30 00 1A 14  | D$."E" . 900...|
00000C00: 06 04 44 24 B2 C8 28 44  24 2C 38 29 3A 20 8B 20  |..D$..(D$,8): . |
00000C10: 44 24 B2 22 44 22 20 A7  20 8E 00 44 14 10 04 85  |D$."D" . ..D....|
00000C20: 22 12 24 56 41 4C 55 45  92 20 20 20 3F 9D 9D 9D  |".$VALUE.   ?...|
00000C30: 22 3B 56 24 3A 20 8B 20  56 24 B2 22 45 22 20 A7  |";V$: . V$."E" .|
00000C40: 20 39 30 30 00 55 14 1A  04 8B 20 56 24 B2 22 44  | 900.U.... V$."D|
00000C50: 22 20 A7 20 8E 00 68 14  24 04 8D 20 31 30 39 30  |" . ..h.$.. 1090|
00000C60: 3A 20 8D 20 31 32 39 30  00 9E 14 2E 04 99 22 49  |: . 1290......"I|
00000C70: 53 20 54 48 49 53 20 45  4E 54 52 59 20 43 4F 52  |S THIS ENTRY COR|
00000C80: 52 45 43 54 22 3B 3A 20  8D 20 31 33 31 30 3A 20  |RECT";: . 1310: |
00000C90: 8B 20 52 24 B2 22 4E 22  20 A7 20 39 30 30 00 A9  |. R$."N" . 900..|
00000CA0: 14 38 04 43 B2 31 3A 20  8E 00 B3 14 42 04 99 22  |.8.C.1: ....B.."|
00000CB0: 93 22 3B 00 E8 14 4C 04  99 22 12 49 54 45 4D 3A  |.";...L..".ITEM:|
00000CC0: 92 20 22 3B 49 24 3A 20  99 22 12 4D 41 4B 45 3A  |. ";I$: .".MAKE:|
00000CD0: 92 20 22 3B 57 24 20 3A  20 99 22 12 4D 4F 44 45  |. ";W$ : .".MODE|
00000CE0: 4C 3A 92 20 22 2C 4D 24  00 01 15 56 04 99 22 12  |L:. ",M$...V..".|
00000CF0: 53 45 52 49 41 4C 23 2F  49 44 3A 92 20 22 3B 53  |SERIAL#/ID:. ";S|
00000D00: 24 00 34 15 60 04 99 22  12 44 41 54 45 20 41 43  |$.4.`..".DATE AC|
00000D10: 51 27 44 3A 92 20 22 44  24 3B A3 32 32 29 3B 22  |Q'D:. "D$;.22);"|
00000D20: 12 56 41 4C 55 45 3A 92  20 24 22 3B 56 24 3A 20  |.VALUE:. $";V$: |
00000D30: 99 3A 20 8E 00 64 15 6A  04 58 24 B2 49 24 3A 20  |.: ..d.j.X$.I$: |
00000D40: 8D 20 31 31 35 30 3A 20  58 24 B2 57 24 3A 20 8D  |. 1150: X$.W$: .|
00000D50: 20 31 31 35 30 3A 20 58  24 B2 4D 24 3A 20 8D 20  | 1150: X$.M$: . |
00000D60: 31 31 35 30 00 8C 15 74  04 58 24 B2 53 24 3A 20  |1150...t.X$.S$: |
00000D70: 8D 20 31 31 35 30 3A 20  58 24 B2 44 24 3A 20 8D  |. 1150: X$.D$: .|
00000D80: 20 31 31 35 30 3A 20 58  24 B2 56 24 00 A5 15 7E  | 1150: X$.V$...~|
00000D90: 04 98 32 2C 58 24 3B C7  28 31 33 29 3B 3A 20 89  |..2,X$;.(13);: .|
00000DA0: 20 31 36 30 30 00 C0 15  88 04 8D 20 31 32 33 30  | 1600...... 1230|
00000DB0: 3A 20 49 24 B2 58 24 3A  20 8B 20 43 20 A7 20 8E  |: I$.X$: . C . .|
00000DC0: 00 DB 15 92 04 8D 20 31  32 33 30 3A 20 57 24 B2  |...... 1230: W$.|
00000DD0: 58 24 3A 20 8B 20 43 20  A7 20 8E 00 F6 15 9C 04  |X$: . C . ......|
00000DE0: 8D 20 31 32 33 30 3A 20  4D 24 B2 58 24 3A 20 8B  |. 1230: M$.X$: .|
00000DF0: 20 43 20 A7 20 8E 00 11  16 A6 04 8D 20 31 32 33  | C . ....... 123|
00000E00: 30 3A 20 53 24 B2 58 24  3A 20 8B 20 43 20 A7 20  |0: S$.X$: . C . |
00000E10: 8E 00 2C 16 B0 04 8D 20  31 32 33 30 3A 20 44 24  |..,.... 1230: D$|
00000E20: B2 58 24 3A 20 8B 20 43  20 A7 20 8E 00 4B 16 BA  |.X$: . C . ..K..|
00000E30: 04 8D 20 31 32 33 30 3A  20 56 24 B2 58 24 3A 20  |.. 1230: V$.X$: |
00000E40: 8B 20 43 B2 32 20 A7 20  43 B2 31 00 51 16 C4 04  |. C.2 . C.1.Q...|
00000E50: 8E 00 7B 16 CE 04 43 B2  30 3A 20 84 31 2C 58 24  |..{...C.0: .1,X$|
00000E60: 3A 20 8B 20 53 54 20 A7  20 43 B2 33 3A 20 8B 20  |: . ST . C.3: . |
00000E70: 53 54 B2 36 34 20 A7 20  43 B2 32 00 86 16 D8 04  |ST.64 . C.2.....|
00000E80: 89 20 31 36 30 30 00 AF  16 E2 04 8B 20 5A B2 31  |. 1600...... Z.1|
00000E90: 20 A7 20 99 22 93 12 4D  4F 44 45 23 31 92 20 20  | . ."..MODE#1.  |
00000EA0: 52 45 41 44 20 44 41 54  41 20 46 49 4C 45 22 00  |READ DATA FILE".|
00000EB0: DD 16 EC 04 8B 20 5A B2  32 20 A7 20 99 22 93 12  |..... Z.2 . ."..|
00000EC0: 4D 4F 44 45 23 32 92 20  20 57 52 49 54 45 20 4E  |MODE#2.  WRITE N|
00000ED0: 45 57 20 44 41 54 41 20  46 49 4C 45 22 00 06 17  |EW DATA FILE"...|
00000EE0: F6 04 8B 20 5A B2 33 20  A7 20 99 22 93 12 4D 4F  |... Z.3 . ."..MO|
00000EF0: 44 45 23 33 92 20 20 43  4F 50 59 20 44 41 54 41  |DE#3.  COPY DATA|
00000F00: 20 46 49 4C 45 22 00 2F  17 00 05 8B 20 5A B2 34  | FILE"./.... Z.4|
00000F10: 20 A7 20 99 22 93 12 4D  4F 44 45 23 34 92 20 20  | . ."..MODE#4.  |
00000F20: 45 44 49 54 20 44 41 54  41 20 46 49 4C 45 22 00  |EDIT DATA FILE".|
00000F30: 35 17 0A 05 99 00 59 17  14 05 99 22 2D 2D 2D 2D  |5.....Y...."----|
00000F40: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000F50: 2D 2D 22 3A 20 99 3A 20  8E 00 6B 17 1E 05 99 22  |--": .: ..k...."|
00000F60: 20 28 59 2F 4E 29 20 3F  20 22 3B 00 92 17 28 05  | (Y/N) ? ";...(.|
00000F70: 8D 20 31 33 36 30 3A 20  8B 20 52 24 B3 B1 22 59  |. 1360: . R$.."Y|
00000F80: 22 20 AF 20 52 24 B3 B1  22 4E 22 20 A7 20 31 33  |" . R$.."N" . 13|
00000F90: 32 30 00 9E 17 32 05 99  20 52 24 3A 20 8E 00 BC  |20...2.. R$: ...|
00000FA0: 17 3C 05 85 22 46 49 4C  45 4E 41 4D 45 20 20 20  |.<.."FILENAME   |
00000FB0: 20 2D 9D 9D 9D 22 3B 46  24 3A 20 8E 00 F2 17 46  | -...";F$: ....F|
00000FC0: 05 99 3A 20 99 22 48 49  54 20 41 4E 59 20 4B 45  |..: ."HIT ANY KE|
00000FD0: 59 20 57 48 45 4E 20 52  45 41 44 59 20 54 4F 20  |Y WHEN READY TO |
00000FE0: 43 4F 4E 54 49 4E 55 45  22 3B 3A 20 89 20 31 33  |CONTINUE";: . 13|
00000FF0: 39 30 00 0B 18 50 05 A1  20 52 24 3A 20 8B 20 52  |90...P.. R$: . R|
00001000: 24 B2 22 22 20 A7 20 31  33 36 30 00 11 18 5A 05  |$."" . 1360...Z.|
00001010: 8E 00 3C 18 64 05 99 3A  20 99 22 48 49 54 20 41  |..<.d..: ."HIT A|
00001020: 4E 59 20 4B 45 59 20 54  4F 20 43 4F 4E 54 49 4E  |NY KEY TO CONTIN|
00001030: 55 45 2C 20 44 3D 44 4F  4E 45 22 3B 00 54 18 6E  |UE, D=DONE";.T.n|
00001040: 05 8D 20 31 33 36 30 3A  20 99 3A 20 99 22 4F 4B  |.. 1360: .: ."OK|
00001050: 22 3A 20 8E 00 80 18 78  05 99 22 93 54 48 49 53  |": ....x..".THIS|
00001060: 20 50 52 4F 47 52 41 4D  20 57 41 53 20 44 45 53  | PROGRAM WAS DES|
00001070: 49 47 4E 45 44 20 54 4F  20 57 52 49 54 45 2C 22  |IGNED TO WRITE,"|
00001080: 00 AB 18 82 05 99 22 52  45 41 44 2C 20 43 4F 50  |......"READ, COP|
00001090: 59 2C 20 4F 52 20 45 44  49 54 20 44 49 53 4B 20  |Y, OR EDIT DISK |
000010A0: 44 41 54 41 20 46 49 4C  45 53 22 00 D1 18 8C 05  |DATA FILES".....|
000010B0: 99 22 43 4F 4E 54 41 49  4E 49 4E 47 20 49 4E 46  |."CONTAINING INF|
000010C0: 4F 52 4D 41 54 49 4F 4E  20 4F 4E 20 59 4F 55 52  |ORMATION ON YOUR|
000010D0: 22 00 01 19 96 05 99 22  48 4F 55 53 45 48 4F 4C  |"......"HOUSEHOL|
000010E0: 44 20 50 4F 53 53 45 53  53 49 4F 4E 53 2E 20 20  |D POSSESSIONS.  |
000010F0: 54 48 49 53 20 49 4E 46  4F 52 4D 41 54 49 4F 4E  |THIS INFORMATION|
00001100: 22 00 30 19 A0 05 99 22  49 4E 43 4C 55 44 45 53  |".0...."INCLUDES|
00001110: 20 41 4E 20 49 54 45 4D  20 44 45 53 43 52 49 50  | AN ITEM DESCRIP|
00001120: 54 49 4F 4E 20 41 4C 4F  4E 47 20 57 49 54 48 22  |TION ALONG WITH"|
00001130: 00 5A 19 AA 05 99 22 54  48 45 20 4D 41 4B 45 2C  |.Z...."THE MAKE,|
00001140: 20 4D 4F 44 45 4C 2C 20  53 45 52 49 41 4C 20 4E  | MODEL, SERIAL N|
00001150: 55 4D 42 45 52 20 28 4F  52 22 00 89 19 B4 05 99  |UMBER (OR"......|
00001160: 22 4F 54 48 45 52 20 49  44 45 4E 54 49 46 59 49  |"OTHER IDENTIFYI|
00001170: 4E 47 20 4D 41 52 4B 53  29 2C 20 44 41 54 45 20  |NG MARKS), DATE |
00001180: 41 43 51 55 49 52 45 44  22 00 B7 19 BE 05 99 22  |ACQUIRED"......"|
00001190: 41 4E 44 20 54 48 45 20  56 41 4C 55 45 2E 20 20  |AND THE VALUE.  |
000011A0: 54 48 49 53 20 44 41 54  41 20 53 48 4F 55 4C 44  |THIS DATA SHOULD|
000011B0: 20 42 45 20 4F 46 22 00  E0 19 C8 05 99 22 47 52  | BE OF"......"GR|
000011C0: 45 41 54 20 56 41 4C 55  45 20 46 4F 52 20 49 4E  |EAT VALUE FOR IN|
000011D0: 53 55 52 41 4E 43 45 20  52 45 43 4F 52 44 53 22  |SURANCE RECORDS"|
000011E0: 00 0E 1A D2 05 99 22 49  4E 20 43 41 53 45 20 4F  |......"IN CASE O|
000011F0: 46 20 46 49 52 45 20 4F  52 20 54 48 45 46 54 3B  |F FIRE OR THEFT;|
00001200: 20 41 4E 44 20 4D 41 59  20 45 56 45 4E 22 00 35  | AND MAY EVEN".5|
00001210: 1A DC 05 99 22 42 45 20  4F 46 20 53 4F 4D 45 20  |...."BE OF SOME |
00001220: 55 53 45 20 46 4F 52 20  54 41 58 20 52 45 43 4F  |USE FOR TAX RECO|
00001230: 52 44 53 2E 22 00 67 1A  E6 05 99 3A 20 99 22 44  |RDS.".g....: ."D|
00001240: 49 53 4B 20 46 49 4C 45  20 48 41 4E 44 4C 49 4E  |ISK FILE HANDLIN|
00001250: 47 20 48 41 53 20 42 45  45 4E 20 49 4E 43 4C 55  |G HAS BEEN INCLU|
00001260: 44 45 44 20 54 4F 22 00  92 1A F0 05 99 22 41 4C  |DED TO"......"AL|
00001270: 4C 4F 57 20 55 53 49 4E  47 20 53 45 50 41 52 41  |LOW USING SEPARA|
00001280: 54 45 20 46 49 4C 45 53  20 46 4F 52 20 45 41 43  |TE FILES FOR EAC|
00001290: 48 22 00 B9 1A FA 05 99  22 52 4F 4F 4D 2C 20 53  |H"......"ROOM, S|
000012A0: 50 45 43 49 41 4C 20 43  4F 4C 4C 45 43 54 49 4F  |PECIAL COLLECTIO|
000012B0: 4E 53 2C 20 45 54 43 2E  22 00 E4 1A 04 06 99 22  |NS, ETC."......"|
000012C0: 54 48 49 53 20 50 52 4F  56 49 44 45 53 20 45 41  |THIS PROVIDES EA|
000012D0: 53 59 20 44 41 54 41 20  4D 41 49 4E 54 45 4E 41  |SY DATA MAINTENA|
000012E0: 4E 43 45 22 00 12 1B 0E  06 99 22 57 48 49 4C 45  |NCE"......"WHILE|
000012F0: 20 41 4C 4C 20 44 41 54  41 20 43 41 4E 20 45 41  | ALL DATA CAN EA|
00001300: 53 49 4C 59 20 42 45 20  53 54 4F 52 45 44 20 4F  |SILY BE STORED O|
00001310: 4E 22 00 2C 1B 18 06 99  22 41 20 53 49 4E 47 4C  |N".,...."A SINGL|
00001320: 45 20 44 49 53 4B 45 54  54 45 2E 22 00 57 1B 22  |E DISKETTE.".W."|
00001330: 06 99 3A 20 99 22 57 48  59 20 4E 4F 54 20 4B 45  |..: ."WHY NOT KE|
00001340: 45 50 20 41 20 43 4F 50  59 20 49 4E 20 59 4F 55  |EP A COPY IN YOU|
00001350: 52 20 42 41 4E 4B 22 00  83 1B 2C 06 99 22 53 41  |R BANK"...,.."SA|
00001360: 46 45 54 59 20 44 45 50  4F 53 49 54 20 42 4F 58  |FETY DEPOSIT BOX|
00001370: 20 46 4F 52 20 53 41 46  45 20 4B 45 45 50 49 4E  | FOR SAFE KEEPIN|
00001380: 47 3F 22 00 94 1B 36 06  8D 20 31 33 35 30 3A 20  |G?"...6.. 1350: |
00001390: 89 20 38 30 00 B5 1B 40  06 84 31 35 2C 45 4E 2C  |. 80...@..15,EN,|
000013A0: 45 4D 24 2C 45 54 2C 45  53 3A 20 8B 20 45 4E B2  |EM$,ET,ES: . EN.|
000013B0: 30 20 A7 20 8E 00 CD 1B  4A 06 99 22 93 12 44 49  |0 . ....J.."..DI|
000013C0: 53 4B 20 45 52 52 4F 52  92 22 3A 20 99 00 E0 1B  |SK ERROR.": ....|
000013D0: 54 06 99 20 45 4E 2C 45  4D 24 3B 45 54 3B 45 53  |T.. EN,EM$;ET;ES|
000013E0: 00 F2 1B 5E 06 8D 20 31  32 39 30 3A 20 89 20 35  |...^.. 1290: . 5|
000013F0: 34 30 00 00 00                                    |40...           |

..&.... ** HOUSE INVENTORY *** DISK **.,
.....J....         ROBERT W. BAKER.O.(..
 15 WINDSOR DR., ATCO, NJ 08004.U.2.....
<.. *******************************...F.
:.R.P..".     HOUSEHOLD INVENTORY PROGRA
M": . 1290...Z.."DESIRED PROGRAM MODE:":
 .: ." 0 = DONE"...D.." 1 = READ DATA".N
.N.." 2 = WRITE NEW DATA FILE": ." 3 = C
OPY DATA FILE"...X.." 4 = EDIT DATA FILE
": ." 5 = HELP (INFORMATION)"...... 1290
: .: ."MODE ?";...... 1360: . R$."0" . .
".: END.....R.E(R$): . R.1 . R.5 . 140..
. .. Z.5 . . 15,8,15.....Z.R: . R . 310,
180,310,310,1400.#.... 1250._....". OUTP
UT TO DISK DRIVE# (0 OR 1)  0...";T$:T$.
H(T$,1)...R.T.E(T$): . T$.."0" . T$.."1"
 . 80. ....: ."OUTPUT ";: . 1340...... F
$.."-" . 260.L...F$."INVENTORY DATA"....
..:."DEFAULT FILE = ";T$;2:";F$...... 2,
8,5,T$.":".F$.",S,W": . 1600.$.... Z.3 .
 560.4.... Z.4 . 610.S.".. 900: . C . . 
1130: . 290.].,.. 550.H.6.. 1250...@..".
 INPUT FROM DISK DRIVE# (0 OR 1)  0...";
T$...J.T.E(T$): T$.H(T$,1).O.T.. T$.."0"
 . T$.."1" . 80...^..: ."INPUT ";: . 134
0.+.H.. F$."-" . F$."INVENTORY DATA": ."
. DEFAULT FILE =";T$;":";F$.P.R.. 1,8,6,
T$.":".F$.",S,R": . 1600.Z.|.X$."".J....
 Z.2 . 190...... 1160: . C.1 . 490......
 1090: . C . 510...... 1160: . C.1 . 510
.F.... 1100: . C . 510...... 1160: . C.1
 . 510...B.. 1199: . C . 510...L.. 1300.
..V.. 1380: . R$.."D" . 400.%.... 550.Z.
...".. END OF MODE #1.  DONE READING DAT
A FILE": ..E.... 1300...... C.1 . ."END 
OF DATA FILE!"...... C.1 . ."DISK ERROR 
(STATUS =";ST;")"...... 1350.U.&.  1:   
2:   15: . 80...0.I9$."": . 1250: .".PLE
ASE WAIT.  ****** COPYING DATA FILE!.".-
.:.. 1160:. C.1 . 820.Z.D.. Z.4 . H(I$,C
(I9$)).I9$ . . 1250: . 620.R.N.. 1130: .
 C.1 . 820...X.. Z.3 . I9$.."" . 570...B
.. 1160: . C.1 . 820.V.L.. 1250: . 1100:
 . 1290: ."DESIRED ACTION:": ....V.." 1 
= COPY THIS ITEM, NO CHANGE"......" 2 = 
DELETE THIS ITEM".B...." 3 = INSERT ITEM
S BEFORE THIS ONE".O...." 4 = SEARCH & C
OPY TILL ITEM FOUND": ..X.... R$......"O
K": I9$."": . R . 590, 710, 730,760...F.
. C.1 . 820...P.. 610...Z.I9$.I$: W9$.W$
: M9$.M$: S9$.S$: D9$.D$: V9$.V$: C9.C..
.... 900: . C . . 1130: . 740.T...I$.I9$
: W$.W9$: M$.M9$: S$.S9$: D$.D9$: V$.V9$
:C.C9: . 620...... 1250: ."ALL ENTRIES W
ILL BE COPIED UNTIL"......: ."DESIRED IT
EM IS FOUND;".L....: .: ."ENTER ITEM TO 
SEARCH FOR:"......"  -...";I9$... .. I9$
."-" . I9$."": ."...SEARCH ABORTED": . 6
20.3.*..: .: .: ."SEARCHING": . 580.C.4.
. Z.3 . 520.[.>.. 1250: . C.1 . 530.U.H.
."END OF INPUT FILE!"...R..: ."DO YOU WA
NT TO ADD ANY ENTRIES TO THE".E.\..: ."E
ND OF THE DATA FILE";...F.. 1310: . R$."
N" . 550...P.. 900: . C . . 1130: . 880.
..Z.. 550.J...C.0: .".ENTER ITEM INFORMA
TION:.": ."D = DONE ENTERING DATA".P....
"E = ERROR, RESTART ENTIRE ITEM". ....: 
."DO NOT USE ',' OR ':' WITHIN THE DATA"
.I....: ."PRESS.RETURN. AFTER EACH ENTRY
"...... 1290: .".ITEM.   ?...";I$:. I$."
E" . 900...... I$."D" . ..1....".MAKE.  
 ?...";W$: . W$."E" . 900.B.J.. W$."D" .
 ..K.T..".MODEL.   ?...";M$: . M$."E" . 
900.|.... M$."D" . .......".SERIAL#/ID. 
  ?...";S$: . S$."E" . 900...... S$."D" 
. .......".DATE ACQ'D.   ?... (MONTH/DAY
/YEAR)?..";D$: . D$."E" . 900.....D$.H(D
$,8): . D$."D" . ..D....".$VALUE.   ?...
";V$: . V$."E" . 900.U.... V$."D" . ..H.
$.. 1090: . 1290......"IS THIS ENTRY COR
RECT";: . 1310: . R$."N" . 900...8.C.1: 
....B..".";...L..".ITEM:. ";I$: .".MAKE:
. ";W$ : .".MODEL:. ",M$...V..".SERIAL#/
ID:. ";S$.4.`..".DATE ACQ'D:. "D$;.22);"
.VALUE:. $";V$: .: ..D.J.X$.I$: . 1150: 
X$.W$: . 1150: X$.M$: . 1150...T.X$.S$: 
. 1150: X$.D$: . 1150: X$.V$...~..2,X$;G
(13);: . 1600...... 1230: I$.X$: . C . .
...... 1230: W$.X$: . C . ....... 1230: 
M$.X$: . C . ....... 1230: S$.X$: . C . 
..,.... 1230: D$.X$: . C . ..K.... 1230:
 V$.X$: . C.2 . C.1.Q.D...{.N.C.0: .1,X$
: . ST . C.3: . ST.64 . C.2...X.. 1600..
.... Z.1 . ."..MODE#1.  READ DATA FILE".
..... Z.2 . ."..MODE#2.  WRITE NEW DATA 
FILE"...... Z.3 . ."..MODE#3.  COPY DATA
 FILE"./.... Z.4 . ."..MODE#4.  EDIT DAT
A FILE".5.....Y...."--------------------
--": .: ..K...." (Y/N) ? ";...(.. 1360: 
. R$.."Y" . R$.."N" . 1320...2.. R$: ...
.<.."FILENAME    -...";F$: ....F..: ."HI
T ANY KEY WHEN READY TO CONTINUE";: . 13
90...P.. R$: . R$."" . 1360...Z...<.D..:
 ."HIT ANY KEY TO CONTINUE, D=DONE";.T.N
.. 1360: .: ."OK": ....X..".THIS PROGRAM
 WAS DESIGNED TO WRITE,"......"READ, COP
Y, OR EDIT DISK DATA FILES".Q...."CONTAI
NING INFORMATION ON YOUR"......"HOUSEHOL
D POSSESSIONS.  THIS INFORMATION".0. .."
INCLUDES AN ITEM DESCRIPTION ALONG WITH"
.Z...."THE MAKE, MODEL, SERIAL NUMBER (O
R"......"OTHER IDENTIFYING MARKS), DATE 
ACQUIRED"......"AND THE VALUE.  THIS DAT
A SHOULD BE OF"...H.."GREAT VALUE FOR IN
SURANCE RECORDS"...R.."IN CASE OF FIRE O
R THEFT; AND MAY EVEN".5...."BE OF SOME 
USE FOR TAX RECORDS.".G....: ."DISK FILE
 HANDLING HAS BEEN INCLUDED TO"......"AL
LOW USING SEPARATE FILES FOR EACH"......
"ROOM, SPECIAL COLLECTIONS, ETC."......"
THIS PROVIDES EASY DATA MAINTENANCE"....
.."WHILE ALL DATA CAN EASILY BE STORED O
N".,...."A SINGLE DISKETTE.".W."..: ."WH
Y NOT KEEP A COPY IN YOUR BANK"...,.."SA
FETY DEPOSIT BOX FOR SAFE KEEPING?"...6.
. 1350: . 80...@..15,EN,EM$,ET,ES: . EN.
0 . ..M.J.."..DISK ERROR.": ....T.. EN,E
M$;ET;ES...^.. 1290: . 540...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL