CARS
FILE INFORMATION
FILENAME(S): CARS
FILE TYPE(S): PRG
FILE SIZE: 5.9K
FIRST SEEN: 2025-11-30 21:07:11
APPEARS ON: 1 disk(s)
FILE HASH
b43ad79fe01af03d7cf3b45cfd6c6e8ec8a45c65e1ca5c3cd00cb158a92ca957
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| CURSOR 3 | CARS | PRG | DuncanTwain | 25 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 2A 04 01 00 8F 20 43 41 52 53 20 43 4F 50 |..*.... CARS COP|
00000010: 59 52 49 47 48 54 20 28 43 29 20 31 39 37 39 20 |YRIGHT (C) 1979 |
00000020: 4A 4F 48 4E 20 47 52 4F 56 45 00 47 04 02 00 8F |JOHN GROVE.G....|
00000030: 20 43 55 52 53 4F 52 20 23 31 33 2C 20 53 45 50 | CURSOR #13, SEP|
00000040: 2E 2C 20 31 39 37 39 00 68 04 03 00 8F 20 42 4F |., 1979.h.... BO|
00000050: 58 20 35 35 30 2C 20 47 4F 4C 45 54 41 2C 20 43 |X 550, GOLETA, C|
00000060: 41 2E 20 39 33 30 31 37 00 7E 04 0A 00 8F 20 41 |A. 93017.~.... A|
00000070: 53 20 4F 46 20 31 36 20 53 45 50 20 37 39 00 8E |S OF 16 SEP 79..|
00000080: 04 5A 00 9C 3A 97 35 39 34 36 38 2C 31 32 00 D2 |.Z..:.59468,12..|
00000090: 04 64 00 51 52 24 B2 22 12 52 45 54 55 52 4E 92 |.d.QR$.".RETURN.|
000000A0: 22 3A 51 50 24 B2 22 50 52 45 53 53 20 22 AA 51 |":QP$."PRESS ".Q|
000000B0: 52 24 AA 22 20 54 4F 20 22 3A 51 43 24 B2 22 11 |R$." TO ":QC$.".|
000000C0: 1D 1D 22 AA 51 50 24 AA 22 43 4F 4E 54 49 4E 55 |..".QP$."CONTINU|
000000D0: 45 22 00 11 05 65 00 51 4D 24 B2 22 4F 44 4F 4D |E"...e.QM$."ODOM|
000000E0: 45 54 45 52 20 22 3A 51 4B 24 B2 22 4D 49 4C 45 |ETER ":QK$."MILE|
000000F0: 53 22 3A 51 4A 24 B2 22 47 41 4C 22 3A 56 24 B2 |S":QJ$."GAL":V$.|
00000100: 22 20 56 45 48 49 43 4C 45 22 3A 8D 36 32 30 30 |" VEHICLE":.6200|
00000110: 30 00 3D 05 6C 00 54 B2 33 3A 4D 58 B2 54 3A 86 |0.=.l.T.3:MX.T:.|
00000120: 43 28 33 30 29 2C 44 28 33 30 29 3A 43 52 24 B2 |C(30),D(30):CR$.|
00000130: C7 28 31 33 29 3A 57 B2 31 3A 56 B2 31 00 85 05 |.(13):W.1:V.1...|
00000140: 6D 00 86 43 41 24 28 54 29 2C 49 53 28 54 29 2C |m..CA$(T),IS(T),|
00000150: 56 41 28 54 29 2C 44 50 28 54 29 2C 46 43 28 54 |VA(T),DP(T),FC(T|
00000160: 29 2C 4C 43 28 54 29 2C 46 58 28 54 29 2C 4D 4D |),LC(T),FX(T),MM|
00000170: 28 54 29 2C 4D 47 28 54 29 2C 4D 43 28 54 29 2C |(T),MG(T),MC(T),|
00000180: 4D 45 28 54 29 00 A9 05 6E 00 99 22 93 4C 41 53 |ME(T)...n..".LAS|
00000190: 54 20 44 41 54 41 20 4F 4E 20 54 41 50 45 3F 20 |T DATA ON TAPE? |
000001A0: 22 3B 3A 8D 36 30 30 30 30 00 C6 05 78 00 8B C8 |";:.60000...x...|
000001B0: 28 49 4E 24 2C 31 29 B2 22 4E 22 A7 8D 36 30 30 |(IN$,1)."N"..600|
000001C0: 30 3A 89 31 33 35 00 D0 05 7D 00 8D 35 30 30 30 |0:.135...}..5000|
000001D0: 00 ED 05 82 00 99 22 93 57 41 4E 54 20 54 4F 20 |......".WANT TO |
000001E0: 53 45 54 2F 43 48 41 4E 47 45 22 56 24 00 27 06 |SET/CHANGE"V$.'.|
000001F0: 83 00 99 22 11 4E 41 4D 45 53 2F 46 49 58 45 44 |...".NAMES/FIXED|
00000200: 20 43 48 41 52 47 45 53 3F 20 22 3B 3A 8D 36 30 | CHARGES? ";:.60|
00000210: 30 30 30 3A 8B C8 28 49 4E 24 2C 31 29 B2 22 59 |000:..(IN$,1)."Y|
00000220: 22 A7 8D 36 30 30 30 00 69 06 87 00 99 22 93 53 |"..6000.i....".S|
00000230: 45 4C 45 43 54 20 49 4E 50 55 54 20 55 4E 49 54 |ELECT INPUT UNIT|
00000240: 53 3A 22 3A 8D 33 30 30 30 3A 58 39 B2 42 39 3A |S:":.3000:X9.B9:|
00000250: 99 22 11 11 53 45 4C 45 43 54 20 4F 55 54 50 55 |."..SELECT OUTPU|
00000260: 54 20 55 4E 49 54 53 3A 22 00 9C 06 8C 00 8D 33 |T UNITS:"......3|
00000270: 30 30 30 3A 59 39 B2 42 39 3A 8B 59 39 B2 32 A7 |000:Y9.B9:.Y9.2.|
00000280: 51 4B 24 B2 22 4B 49 4C 4F 4D 45 54 45 52 53 22 |QK$."KILOMETERS"|
00000290: 3A 51 4A 24 B2 22 4C 49 54 52 45 22 00 BA 06 8E |:QJ$."LITRE"....|
000002A0: 00 57 B2 31 3A 56 B2 31 3A 8B 59 39 B2 33 A7 51 |.W.1:V.1:.Y9.3.Q|
000002B0: 4A 24 B2 22 4C 49 54 52 45 22 00 D8 06 8F 00 8B |J$."LITRE"......|
000002C0: 58 39 B2 31 AF 59 39 B2 32 A7 57 B2 31 2E 36 31 |X9.1.Y9.2.W.1.61|
000002D0: 3A 56 B2 33 2E 37 38 35 00 EF 06 90 00 8B 58 39 |:V.3.785......X9|
000002E0: B2 31 AF 59 39 B2 33 A7 56 B2 33 2E 37 38 35 00 |.1.Y9.3.V.3.785.|
000002F0: 0D 07 91 00 8B 58 39 B2 32 AF 59 39 B2 31 A7 57 |.....X9.2.Y9.1.W|
00000300: B2 2E 36 32 31 3A 56 B2 2E 32 36 34 32 00 23 07 |..621:V..2642.#.|
00000310: 92 00 8B 58 39 B2 32 AF 59 39 B2 33 A7 57 B2 2E |...X9.2.Y9.3.W..|
00000320: 36 32 31 00 3A 07 93 00 8B 58 39 B2 33 AF 59 39 |621.:....X9.3.Y9|
00000330: B2 31 A7 56 B2 2E 32 36 34 32 00 50 07 94 00 8B |.1.V..2642.P....|
00000340: 58 39 B2 33 AF 59 39 B2 32 A7 57 B2 31 2E 36 31 |X9.3.Y9.2.W.1.61|
00000350: 00 7B 07 96 00 8D 34 38 35 30 3A 99 22 11 57 48 |.{....4850:.".WH|
00000360: 41 54 20 4D 4F 4E 54 48 3F 20 22 3B 3A 8D 36 30 |AT MONTH? ";:.60|
00000370: 30 30 30 3A 4D 4F 24 B2 49 4E 24 00 96 07 AA 00 |000:MO$.IN$.....|
00000380: 99 22 11 57 48 41 54 22 56 24 22 3F 20 22 3B 3A |.".WHAT"V$"? ";:|
00000390: 8D 36 30 30 30 30 00 B3 07 B4 00 81 43 58 B2 31 |.60000......CX.1|
000003A0: A4 54 3A 8B 43 41 24 28 43 58 29 B2 49 4E 24 89 |.T:.CA$(CX).IN$.|
000003B0: 32 30 30 00 BB 07 C0 00 82 43 58 00 D5 07 C2 00 |200......CX.....|
000003C0: 99 22 11 4E 4F 20 53 55 43 48 22 56 24 22 20 4B |.".NO SUCH"V$" K|
000003D0: 4E 4F 57 4E 2E 00 08 08 C4 00 99 22 11 57 41 4E |NOWN.......".WAN|
000003E0: 54 20 54 4F 20 41 44 44 20 49 54 3F 20 22 3B 3A |T TO ADD IT? ";:|
000003F0: 8D 36 30 30 30 30 3A 8B C8 28 49 4E 24 2C 31 29 |.60000:..(IN$,1)|
00000400: B2 22 59 22 89 31 33 30 00 11 08 C6 00 89 31 37 |."Y".130......17|
00000410: 30 00 2C 08 C8 00 99 22 11 49 53 20 4C 41 53 54 |0.,....".IS LAST|
00000420: 20 45 4E 44 49 4E 47 20 22 51 4D 24 00 62 08 C9 | ENDING "QM$.b..|
00000430: 00 99 22 11 46 4F 52 22 56 24 22 20 49 4E 20 4D |..".FOR"V$" IN M|
00000440: 45 4D 4F 52 59 3F 20 22 3B 3A 8D 36 30 30 30 30 |EMORY? ";:.60000|
00000450: 3A 8B C8 28 49 4E 24 2C 31 29 B2 22 4E 22 89 32 |:..(IN$,1)."N".2|
00000460: 30 35 00 96 08 CB 00 41 B2 4D 45 28 43 58 29 3A |05.....A.ME(CX):|
00000470: 99 22 11 42 45 47 49 4E 4E 49 4E 47 20 22 51 4D |.".BEGINNING "QM|
00000480: 24 22 46 4F 52 20 22 4D 4F 24 22 20 49 53 20 22 |$"FOR "MO$" IS "|
00000490: 41 3A 89 33 30 30 00 BD 08 CD 00 99 22 11 42 45 |A:.300......".BE|
000004A0: 47 49 4E 4E 49 4E 47 20 22 51 4D 24 3B 3A 8D 36 |GINNING "QM$;:.6|
000004B0: 30 30 30 30 3A 41 B2 C5 28 49 4E 24 29 00 E1 08 |0000:A..(IN$)...|
000004C0: 2C 01 99 22 11 45 4E 44 49 4E 47 20 22 51 4D 24 |,..".ENDING "QM$|
000004D0: 3B 3A 8D 36 30 30 30 30 3A 42 B2 C5 28 49 4E 24 |;:.60000:B..(IN$|
000004E0: 29 00 FD 08 68 01 8D 34 38 35 30 3A 99 A3 31 34 |)...h..4850:..14|
000004F0: 29 22 11 12 46 55 45 4C 20 44 41 54 41 00 2B 09 |)"..FUEL DATA.+.|
00000500: 90 01 99 22 11 49 4E 50 55 54 20 46 55 45 4C 3A |...".INPUT FUEL:|
00000510: 22 51 50 24 22 45 4E 44 2E 22 3A 8D 39 30 30 3A |"QP$"END.":.900:|
00000520: 43 32 B2 43 31 3A 44 32 B2 44 31 00 46 09 9A 01 |C2.C1:D2.D1.F...|
00000530: 8D 34 38 35 30 3A 99 A3 31 34 29 22 11 12 4F 49 |.4850:..14)"..OI|
00000540: 4C 20 44 41 54 41 00 77 09 9F 01 99 22 11 41 4E |L DATA.w....".AN|
00000550: 59 20 4F 49 4C 20 44 41 54 41 3F 20 22 3B 3A 8D |Y OIL DATA? ";:.|
00000560: 36 30 30 30 30 3A 8B C8 28 49 4E 24 2C 31 29 B2 |60000:..(IN$,1).|
00000570: 22 4E 22 89 34 33 30 00 A4 09 A4 01 99 22 11 49 |"N".430......".I|
00000580: 4E 50 55 54 20 4F 49 4C 3A 22 51 50 24 22 45 4E |NPUT OIL:"QP$"EN|
00000590: 44 2E 22 3A 8D 39 30 30 3A 45 31 B2 43 31 3A 46 |D.":.900:E1.C1:F|
000005A0: 31 B2 44 31 00 C5 09 AE 01 8D 34 38 35 30 3A 99 |1.D1......4850:.|
000005B0: A3 31 32 29 22 11 12 4D 49 53 43 2E 20 45 58 50 |.12)"..MISC. EXP|
000005C0: 45 4E 53 45 53 00 FD 09 B3 01 99 22 11 41 4E 59 |ENSES......".ANY|
000005D0: 20 4D 49 53 43 2E 20 45 58 50 45 4E 53 45 53 3F | MISC. EXPENSES?|
000005E0: 20 22 3B 3A 8D 36 30 30 30 30 3A 8B C8 28 49 4E | ";:.60000:..(IN|
000005F0: 24 2C 31 29 B2 22 4E 22 89 31 34 30 30 00 2E 0A |$,1)."N".1400...|
00000600: C2 01 99 A3 31 32 29 22 11 23 22 A3 31 38 29 22 |....12)".#".18)"|
00000610: 43 4F 53 54 22 3A 81 49 B2 31 A4 33 30 3A 43 28 |COST":.I.1.30:C(|
00000620: 49 29 B2 30 3A 44 28 49 29 B2 30 3A 82 49 00 4C |I).0:D(I).0:.I.L|
00000630: 0A CC 01 99 A3 31 32 29 3B 3A 8D 36 30 30 30 30 |.....12);:.60000|
00000640: 3A 8B 49 4E 24 B2 22 22 89 35 30 30 00 7D 0A E0 |:.IN$."".500.}..|
00000650: 01 4D 31 B2 C5 28 49 4E 24 29 3A 99 A3 31 37 29 |.M1..(IN$):..17)|
00000660: 22 91 22 3B 3A 8D 36 30 30 30 30 3A 43 28 4D 31 |".";:.60000:C(M1|
00000670: 29 B2 C5 28 49 4E 24 29 3A 89 34 36 30 00 A9 0A |)..(IN$):.460...|
00000680: F4 01 99 22 41 52 45 20 54 48 45 20 41 42 4F 56 |..."ARE THE ABOV|
00000690: 45 20 44 41 54 41 20 43 4F 52 52 45 43 54 3F 20 |E DATA CORRECT? |
000006A0: 22 3B 3A 8D 36 30 30 30 30 00 BF 0A FE 01 8B C8 |";:.60000.......|
000006B0: 28 49 4E 24 2C 31 29 B2 22 4E 22 89 34 35 30 00 |(IN$,1)."N".450.|
000006C0: E1 0A 08 02 47 B2 30 3A 81 49 B2 31 A4 33 30 3A |....G.0:.I.1.30:|
000006D0: 47 B2 47 AA 43 28 49 29 3A 82 49 3A 89 31 34 30 |G.G.C(I):.I:.140|
000006E0: 30 00 08 0B 84 03 43 31 B2 30 3A 44 31 B2 30 3A |0.....C1.0:D1.0:|
000006F0: 81 49 B2 31 A4 33 30 3A 43 28 49 29 B2 30 3A 44 |.I.1.30:C(I).0:D|
00000700: 28 49 29 B2 30 3A 82 49 00 2B 0B 8E 03 99 A3 35 |(I).0:.I.+.....5|
00000710: 29 22 11 23 22 A3 31 30 29 22 41 4D 4F 55 4E 54 |)".#".10)"AMOUNT|
00000720: 22 A3 32 35 29 22 43 4F 53 54 22 00 5D 0B 98 03 |".25)"COST".]...|
00000730: 8D 34 38 30 30 3A 99 22 41 52 45 20 54 48 45 20 |.4800:."ARE THE |
00000740: 41 42 4F 56 45 20 44 41 54 41 20 43 4F 52 52 45 |ABOVE DATA CORRE|
00000750: 43 54 3F 20 22 3B 3A 8D 36 30 30 30 30 00 73 0B |CT? ";:.60000.s.|
00000760: AC 03 8B C8 28 49 4E 24 2C 31 29 B2 22 4E 22 89 |....(IN$,1)."N".|
00000770: 39 31 30 00 9A 0B C0 03 81 49 B2 31 A4 33 30 3A |910......I.1.30:|
00000780: 43 31 B2 43 31 AA 43 28 49 29 3A 44 31 B2 44 31 |C1.C1.C(I):D1.D1|
00000790: AA 44 28 49 29 3A 82 49 3A 8E 00 CC 0B 78 05 99 |.D(I):.I:....x..|
000007A0: 22 93 22 A3 32 29 22 12 53 55 4D 4D 41 52 49 45 |".".2)".SUMMARIE|
000007B0: 53 20 46 4F 52 20 22 4D 4F 24 22 20 46 4F 52 20 |S FOR "MO$" FOR |
000007C0: 54 48 45 20 22 43 41 24 28 43 58 29 00 F3 0B AA |THE "CA$(CX)....|
000007D0: 05 5A 39 B2 41 3A 8D 34 39 30 30 3A 99 22 11 42 |.Z9.A:.4900:.".B|
000007E0: 45 47 49 4E 49 4E 47 20 22 51 4D 24 A3 32 35 29 |EGINING "QM$.25)|
000007F0: 5A 31 24 00 21 0C B4 05 5A 39 B2 42 3A 8D 34 39 |Z1$.!...Z9.B:.49|
00000800: 30 30 3A 99 22 45 4E 44 49 4E 47 20 22 51 4D 24 |00:."ENDING "QM$|
00000810: A3 32 35 29 5A 31 24 3A 55 B2 28 42 AB 41 29 AC |.25)Z1$:U.(B.A).|
00000820: 57 00 55 0C C8 05 5A 39 B2 55 3A 8D 34 39 30 30 |W.U...Z9.U:.4900|
00000830: 3A 99 22 11 54 4F 54 41 4C 20 22 51 4B 24 A3 32 |:.".TOTAL "QK$.2|
00000840: 38 29 22 12 22 C9 28 5A 31 24 2C 38 29 3A 56 39 |8)".".(Z1$,8):V9|
00000850: B2 43 32 AC 56 00 80 0C DC 05 5A 39 B2 56 39 3A |.C2.V.....Z9.V9:|
00000860: 8D 34 39 30 30 3A 99 22 11 54 4F 54 41 4C 20 46 |.4900:.".TOTAL F|
00000870: 55 45 4C 20 55 53 45 44 22 A3 32 35 29 5A 31 24 |UEL USED".25)Z1$|
00000880: 00 B5 0C F0 05 5A 39 B2 44 32 3A 8D 34 39 30 30 |.....Z9.D2:.4900|
00000890: 3A 99 22 54 4F 54 41 4C 20 46 55 45 4C 20 43 4F |:."TOTAL FUEL CO|
000008A0: 53 54 22 A3 32 35 29 5A 31 24 3A 8B 43 32 B2 30 |ST".25)Z1$:.C2.0|
000008B0: 89 31 35 36 30 00 DE 0C 04 06 44 33 B2 44 32 AD |.1560.....D3.D2.|
000008C0: 56 39 3A 44 34 B2 55 AD 56 39 3A 51 54 24 B2 C8 |V9:D4.U.V9:QT$..|
000008D0: 28 51 4B 24 2C C3 28 51 4B 24 29 AB 31 29 00 04 |(QK$,.(QK$).1)..|
000008E0: 0D 18 06 5A 39 B2 44 33 3A 8D 34 39 30 30 3A 99 |...Z9.D3:.4900:.|
000008F0: 22 11 43 4F 53 54 2F 22 51 4A 24 3A 99 A3 32 35 |".COST/"QJ$:..25|
00000900: 29 5A 31 24 00 30 0D 2C 06 5A 39 B2 44 34 3A 8D |)Z1$.0.,.Z9.D4:.|
00000910: 34 39 30 30 3A 99 51 4B 24 22 2F 22 51 4A 24 3A |4900:.QK$"/"QJ$:|
00000920: 99 A3 33 30 29 22 12 22 C9 28 5A 31 24 2C 36 29 |..30)".".(Z1$,6)|
00000930: 00 5A 0D 40 06 5A 39 B2 46 31 3A 8D 34 39 30 30 |.Z.@.Z9.F1:.4900|
00000940: 3A 99 22 11 54 4F 54 41 4C 20 4F 49 4C 20 43 4F |:.".TOTAL OIL CO|
00000950: 53 54 22 A3 32 35 29 5A 31 24 00 9B 0D 54 06 5A |ST".25)Z1$...T.Z|
00000960: 39 B2 47 3A 8D 34 39 30 30 3A 99 22 54 4F 54 41 |9.G:.4900:."TOTA|
00000970: 4C 20 4D 49 53 43 20 43 4F 53 54 22 A3 32 35 29 |L MISC COST".25)|
00000980: 5A 31 24 3A 44 34 B2 44 32 AA 46 31 AA 47 3A 44 |Z1$:D4.D2.F1.G:D|
00000990: 35 B2 44 34 AA 46 58 28 43 58 29 00 D4 0D 68 06 |5.D4.FX(CX)...h.|
000009A0: 44 36 B2 44 35 AD 28 42 AB 41 29 3A 5A 39 B2 44 |D6.D5.(B.A):Z9.D|
000009B0: 34 3A 8D 34 39 30 30 3A 99 22 11 43 4F 53 54 20 |4:.4900:.".COST |
000009C0: 4F 46 20 4F 50 45 52 41 54 49 4F 4E 22 A3 32 35 |OF OPERATION".25|
000009D0: 29 5A 31 24 00 FD 0D 7C 06 5A 39 B2 44 35 3A 8D |)Z1$...|.Z9.D5:.|
000009E0: 34 39 30 30 3A 99 22 11 54 4F 54 41 4C 20 45 58 |4900:.".TOTAL EX|
000009F0: 50 45 4E 53 45 22 A3 32 35 29 5A 31 24 00 29 0E |PENSE".25)Z1$.).|
00000A00: 90 06 5A 39 B2 44 36 3A 8D 34 39 30 30 3A 99 22 |..Z9.D6:.4900:."|
00000A10: 11 43 4F 53 54 2F 22 51 54 24 A3 33 32 29 22 12 |.COST/"QT$.32)".|
00000A20: 22 C9 28 5A 31 24 2C 34 29 00 33 0E A4 06 8D 37 |".(Z1$,4).3....7|
00000A30: 30 30 30 00 5E 0E 08 07 99 A3 32 29 22 12 53 55 |000.^.....2)".SU|
00000A40: 4D 4D 41 52 59 20 54 4F 2D 44 41 54 45 20 46 4F |MMARY TO-DATE FO|
00000A50: 52 20 54 48 45 20 22 43 41 24 28 43 58 29 00 9D |R THE "CA$(CX)..|
00000A60: 0E 1C 07 4D 4D 28 43 58 29 B2 4D 4D 28 43 58 29 |...MM(CX).MM(CX)|
00000A70: AA 55 3A 4D 47 28 43 58 29 B2 4D 47 28 43 58 29 |.U:MG(CX).MG(CX)|
00000A80: AA 56 39 3A 4D 43 28 43 58 29 B2 4D 43 28 43 58 |.V9:MC(CX).MC(CX|
00000A90: 29 AA 44 35 3A 4D 45 28 43 58 29 B2 42 00 C3 0E |).D5:ME(CX).B...|
00000AA0: 30 07 41 56 B2 4D 4D 28 43 58 29 AD 4D 47 28 43 |0.AV.MM(CX).MG(C|
00000AB0: 58 29 3A 43 4D B2 4D 43 28 43 58 29 AD 4D 4D 28 |X):CM.MC(CX).MM(|
00000AC0: 43 58 29 00 EF 0E 44 07 5A 39 B2 4D 4D 28 43 58 |CX)...D.Z9.MM(CX|
00000AD0: 29 3A 8D 34 39 30 30 3A 99 22 11 54 4F 54 41 4C |):.4900:.".TOTAL|
00000AE0: 20 22 51 4B 24 3B 3A 99 A3 32 35 29 5A 31 24 00 | "QK$;:..25)Z1$.|
00000AF0: 19 0F 58 07 5A 39 B2 4D 47 28 43 58 29 3A 8D 34 |..X.Z9.MG(CX):.4|
00000B00: 39 30 30 3A 99 22 11 54 4F 54 41 4C 20 46 55 45 |900:.".TOTAL FUE|
00000B10: 4C 22 A3 32 35 29 5A 31 24 00 49 0F 6C 07 5A 39 |L".25)Z1$.I.l.Z9|
00000B20: B2 41 56 3A 8D 34 39 30 30 3A 99 22 11 22 51 4B |.AV:.4900:."."QK|
00000B30: 24 22 2F 22 51 4A 24 3B 3A 99 A3 33 30 29 22 12 |$"/"QJ$;:..30)".|
00000B40: 22 C9 28 5A 31 24 2C 36 29 00 73 0F 80 07 5A 39 |".(Z1$,6).s...Z9|
00000B50: B2 4D 43 28 43 58 29 3A 8D 34 39 30 30 3A 99 22 |.MC(CX):.4900:."|
00000B60: 11 54 4F 54 41 4C 20 43 4F 53 54 22 A3 32 35 29 |.TOTAL COST".25)|
00000B70: 5A 31 24 00 A8 0F 94 07 5A 39 B2 43 4D 3A 8D 34 |Z1$.....Z9.CM:.4|
00000B80: 39 30 30 3A 99 22 11 43 4F 53 54 2F 22 51 54 24 |900:.".COST/"QT$|
00000B90: 3B 3A 99 A3 33 32 29 22 12 22 C9 28 5A 31 24 2C |;:..32)".".(Z1$,|
00000BA0: 34 29 3A 8D 37 30 30 30 00 DD 0F AD 07 99 22 11 |4):.7000......".|
00000BB0: 4D 4F 52 45 20 4F 4E 20 54 48 49 53 22 56 24 22 |MORE ON THIS"V$"|
00000BC0: 3F 20 22 3B 3A 8D 36 30 30 30 30 3A 8B C8 28 49 |? ";:.60000:..(I|
00000BD0: 4E 24 2C 31 29 B2 22 59 22 89 31 35 30 00 13 10 |N$,1)."Y".150...|
00000BE0: B7 07 99 22 11 41 4E 59 20 4D 4F 52 45 20 56 45 |...".ANY MORE VE|
00000BF0: 48 49 43 4C 45 53 3F 20 22 3B 3A 8D 36 30 30 30 |HICLES? ";:.6000|
00000C00: 30 3A 8B C8 28 49 4E 24 2C 31 29 B2 22 59 22 89 |0:..(IN$,1)."Y".|
00000C10: 31 33 30 00 4F 10 C1 07 99 22 11 53 54 4F 52 45 |130.O....".STORE|
00000C20: 20 54 48 45 20 44 41 54 41 20 4F 4E 20 54 41 50 | THE DATA ON TAP|
00000C30: 45 3F 20 22 3B 3A 8D 36 30 30 30 30 3A 8B C8 28 |E? ";:.60000:..(|
00000C40: 49 4E 24 2C 31 29 B2 22 4E 22 89 31 39 39 39 00 |IN$,1)."N".1999.|
00000C50: 59 10 C8 07 8D 32 30 30 30 00 5F 10 CF 07 80 00 |Y....2000._.....|
00000C60: 91 10 D0 07 99 22 93 4D 4F 55 4E 54 20 54 41 50 |.....".MOUNT TAP|
00000C70: 45 20 41 4E 44 20 52 45 57 49 4E 44 2E 22 3A 99 |E AND REWIND.":.|
00000C80: 51 43 24 3A 8D 36 30 30 30 30 3A 9F 31 2C 31 2C |QC$:.60000:.1,1,|
00000C90: 31 00 9C 10 EE 07 81 4A B2 31 A4 54 00 A5 10 F0 |1......J.1.T....|
00000CA0: 07 4C B2 54 49 00 D2 10 F3 07 98 31 2C 22 2E 22 |.L.TI......1,"."|
00000CB0: AA 43 41 24 28 4A 29 3A 98 31 2C 49 53 28 4A 29 |.CA$(J):.1,IS(J)|
00000CC0: 3A 98 31 2C 56 41 28 4A 29 3A 98 31 2C 44 50 28 |:.1,VA(J):.1,DP(|
00000CD0: 4A 29 00 FA 10 07 08 98 31 2C 46 43 28 4A 29 3A |J)......1,FC(J):|
00000CE0: 98 31 2C 4C 43 28 4A 29 3A 98 31 2C 46 58 28 4A |.1,LC(J):.1,FX(J|
00000CF0: 29 3A 98 31 2C 4D 4D 28 4A 29 00 19 11 1B 08 98 |):.1,MM(J)......|
00000D00: 31 2C 4D 47 28 4A 29 3A 98 31 2C 4D 43 28 4A 29 |1,MG(J):.1,MC(J)|
00000D10: 3A 98 31 2C 4D 45 28 4A 29 00 24 11 1D 08 4C B2 |:.1,ME(J).$...L.|
00000D20: 54 49 AB 4C 00 33 11 20 08 8B 4C B3 31 30 89 32 |TI.L.3. ..L.10.2|
00000D30: 30 39 30 00 49 11 22 08 97 35 39 34 31 31 2C 35 |090.I."..59411,5|
00000D40: 33 3A 4C B2 54 49 AA 32 30 00 58 11 24 08 8B 54 |3:L.TI.20.X.$..T|
00000D50: 49 B3 4C 89 32 30 38 34 00 66 11 26 08 97 35 39 |I.L.2084.f.&..59|
00000D60: 34 31 31 2C 36 31 00 6D 11 2A 08 82 4A 00 74 11 |411,61.m.*..J.t.|
00000D70: 2F 08 A0 31 00 9F 11 34 08 99 22 11 12 44 4F 4E |/..1...4.."..DON|
00000D80: 45 92 20 57 52 49 54 49 4E 47 20 54 41 50 45 3B |E. WRITING TAPE;|
00000D90: 20 52 45 57 49 4E 44 20 4E 4F 57 2E 22 3A 8E 00 | REWIND NOW.":..|
00000DA0: E2 11 B8 0B 99 22 11 31 2E 20 4D 49 4C 45 53 3A |.....".1. MILES:|
00000DB0: 47 41 4C 53 22 3A 99 22 11 32 2E 20 4B 49 4C 4F |GALS":.".2. KILO|
00000DC0: 4D 45 54 45 52 53 3A 4C 49 54 52 45 53 22 3A 99 |METERS:LITRES":.|
00000DD0: 22 11 33 2E 20 4D 49 4C 45 53 3A 4C 49 54 52 45 |".3. MILES:LITRE|
00000DE0: 53 22 00 FF 11 BD 0B 99 22 11 3F 20 22 3B 3A 8D |S"......".? ";:.|
00000DF0: 36 30 30 30 30 3A 42 39 B2 C5 28 49 4E 24 29 00 |60000:B9..(IN$).|
00000E00: 05 12 C2 0B 8E 00 23 12 C0 12 99 A3 35 29 3B 3A |......#.....5);:|
00000E10: 8D 36 30 30 30 30 3A 8B 49 4E 24 B2 22 22 89 34 |.60000:.IN$."".4|
00000E20: 38 34 30 00 42 12 C8 12 4E 39 B2 C5 28 49 4E 24 |840.B...N9..(IN$|
00000E30: 29 3A 99 A3 31 31 29 22 91 22 3B 3A 8D 36 30 30 |):..11)".";:.600|
00000E40: 30 30 00 78 12 CA 12 43 28 4E 39 29 B2 C5 28 49 |00.x...C(N9)..(I|
00000E50: 4E 24 29 3A 99 A3 32 35 29 22 91 22 3B 3A 8D 36 |N$):..25)".";:.6|
00000E60: 30 30 30 30 3B 3A 44 28 4E 39 29 B2 C5 28 49 4E |0000;:D(N9)..(IN|
00000E70: 24 29 3A 89 34 38 30 30 00 7E 12 E8 12 8E 00 A6 |$):.4800.~......|
00000E80: 12 F2 12 99 22 93 22 3B A3 31 30 29 3B 22 12 4D |....".";.10);".M|
00000E90: 4F 4E 54 48 4C 59 20 43 48 41 52 47 45 20 44 41 |ONTHLY CHARGE DA|
00000EA0: 54 41 92 22 3A 8E 00 C3 12 24 13 5A 39 24 B2 CA |TA.":....$.Z9$..|
00000EB0: 28 C4 28 B5 28 5A 39 AC 31 30 30 AA 2E 35 29 29 |(.(.(Z9.100..5))|
00000EC0: 2C 32 29 00 E3 12 2E 13 8B C3 28 5A 39 24 29 B3 |,2).......(Z9$).|
00000ED0: 33 A7 5A 39 24 B2 C9 28 22 30 30 22 AA 5A 39 24 |3.Z9$..("00".Z9$|
00000EE0: 2C 33 29 00 08 13 38 13 5A 39 24 B2 C8 28 5A 39 |,3)...8.Z9$..(Z9|
00000EF0: 24 2C C3 28 5A 39 24 29 AB 32 29 AA 22 2E 22 AA |$,.(Z9$).2).".".|
00000F00: C9 28 5A 39 24 2C 32 29 00 1E 13 3D 13 8B 5A 39 |.(Z9$,2)...=..Z9|
00000F10: B3 30 A7 5A 39 24 B2 22 2D 22 AA 5A 39 24 00 3B |.0.Z9$."-".Z9$.;|
00000F20: 13 42 13 5A 31 24 B2 C9 28 22 20 20 20 20 20 20 |.B.Z1$..(" |
00000F30: 20 20 22 AA 5A 39 24 2C 31 31 29 00 41 13 4C 13 | ".Z9$,11).A.L.|
00000F40: 8E 00 79 13 88 13 99 22 93 4D 4F 55 4E 54 20 4C |..y....".MOUNT L|
00000F50: 41 53 54 20 44 41 54 41 20 54 41 50 45 20 41 4E |AST DATA TAPE AN|
00000F60: 44 20 52 45 57 49 4E 44 22 3A 99 51 43 24 3B 3A |D REWIND":.QC$;:|
00000F70: 8D 36 30 30 30 30 3A 9F 31 00 84 13 92 13 81 4A |.60000:.1......J|
00000F80: B2 31 A4 54 00 8E 13 97 13 99 22 2E 22 3B 00 D5 |.1.T......".";..|
00000F90: 13 9C 13 84 31 2C 43 41 24 2C 49 53 28 4A 29 2C |....1,CA$,IS(J),|
00000FA0: 56 41 28 4A 29 2C 44 50 28 4A 29 2C 46 43 28 4A |VA(J),DP(J),FC(J|
00000FB0: 29 2C 4C 43 28 4A 29 2C 46 58 28 4A 29 2C 4D 4D |),LC(J),FX(J),MM|
00000FC0: 28 4A 29 2C 4D 47 28 4A 29 2C 4D 43 28 4A 29 2C |(J),MG(J),MC(J),|
00000FD0: 4D 45 28 4A 29 00 E9 13 A1 13 43 41 24 28 4A 29 |ME(J).....CA$(J)|
00000FE0: B2 CA 28 43 41 24 2C 32 29 00 F0 13 A6 13 82 4A |..(CA$,2)......J|
00000FF0: 00 22 14 B0 13 A0 31 3A 99 22 11 12 44 4F 4E 45 |."....1:."..DONE|
00001000: 92 20 52 45 41 44 49 4E 47 20 54 41 50 45 3B 20 |. READING TAPE; |
00001010: 52 45 57 49 4E 44 20 4E 4F 57 2E 22 3A 8D 37 30 |REWIND NOW.":.70|
00001020: 30 30 00 28 14 C4 13 8E 00 66 14 70 17 99 22 93 |00.(.....f.p..".|
00001030: 43 48 41 4E 47 45 2F 53 45 54 20 57 48 41 54 3F |CHANGE/SET WHAT?|
00001040: 22 3A 99 22 11 31 2E 22 56 24 22 20 4E 41 4D 45 |":.".1."V$" NAME|
00001050: 53 22 3A 99 22 11 32 2E 20 46 49 58 45 44 20 43 |S":.".2. FIXED C|
00001060: 48 41 52 47 45 53 00 91 14 73 17 99 22 11 3F 20 |HARGES...s..".? |
00001070: 22 3B 3A 8D 36 30 30 30 30 3A 46 43 B2 C5 28 49 |";:.60000:FC..(I|
00001080: 4E 24 29 3A 91 46 43 89 36 31 30 30 2C 36 33 30 |N$):.FC.6100,630|
00001090: 30 00 97 14 CF 17 8E 00 B0 14 D4 17 99 22 93 11 |0............"..|
000010A0: 54 48 45 53 45 22 56 24 22 53 20 45 58 49 53 54 |THESE"V$"S EXIST|
000010B0: 00 D7 14 10 18 81 4A 58 B2 31 A4 4D 58 3A 99 22 |......JX.1.MX:."|
000010C0: 11 1D 1D 1D 1D 22 4A 58 22 1D 1D 22 43 41 24 28 |....."JX".."CA$(|
000010D0: 4A 58 29 3A 82 4A 58 00 F1 14 38 18 99 22 11 22 |JX):.JX...8.."."|
000010E0: 56 24 22 20 54 4F 20 43 48 41 4E 47 45 2F 41 44 |V$" TO CHANGE/AD|
000010F0: 44 00 13 15 42 18 99 22 11 1D 1D 1D 1D 22 3B 3A |D...B..".....";:|
00001100: 8D 36 30 30 30 30 3A 8B 49 4E 24 B2 22 22 89 36 |.60000:.IN$."".6|
00001110: 32 35 30 00 48 15 4C 18 49 58 B2 C5 28 49 4E 24 |250.H.L.IX..(IN$|
00001120: 29 3A 99 22 91 1D 1D 1D 1D 1D 1D 1D 1D 22 3B 3A |):.".........";:|
00001130: 8D 36 30 30 30 30 3A 43 41 24 28 49 58 29 B2 49 |.60000:CA$(IX).I|
00001140: 4E 24 3A 89 36 32 31 30 00 78 15 6A 18 99 22 41 |N$:.6210.x.j.."A|
00001150: 4C 4C 20 43 4F 52 52 45 43 54 3F 20 22 3B 3A 8D |LL CORRECT? ";:.|
00001160: 36 30 30 30 30 3A 8B C8 28 49 4E 24 2C 31 29 B2 |60000:..(IN$,1).|
00001170: 22 4E 22 89 36 32 30 30 00 83 15 74 18 89 20 36 |"N".6200...t.. 6|
00001180: 30 30 30 00 A8 15 9C 18 99 22 93 57 48 41 54 22 |000......".WHAT"|
00001190: 56 24 22 3F 20 22 3A 99 22 11 1D 1D 1D 1D 1D 22 |V$"? ":."......"|
000011A0: 3B 3A 8D 36 30 30 30 30 00 C7 15 AB 18 81 4A 58 |;:.60000......JX|
000011B0: B2 31 A4 4D 58 3A 8B 49 4E 24 B2 43 41 24 28 4A |.1.MX:.IN$.CA$(J|
000011C0: 58 29 89 36 33 33 30 00 CF 15 B0 18 82 4A 58 00 |X).6330......JX.|
000011D0: 06 16 B5 18 99 22 11 4E 4F 20 53 55 43 48 22 56 |.....".NO SUCH"V|
000011E0: 24 22 3B 20 55 53 45 20 4F 50 54 49 4F 4E 20 31 |$"; USE OPTION 1|
000011F0: 22 3A 81 5A 5A B2 31 A4 32 30 30 30 3A 82 5A 5A |":.ZZ.1.2000:.ZZ|
00001200: 3A 89 36 30 30 30 00 3E 16 BA 18 99 22 93 49 4E |:.6000.>....".IN|
00001210: 50 55 54 20 4E 45 57 20 56 41 4C 55 45 20 4F 52 |PUT NEW VALUE OR|
00001220: 20 22 51 50 24 3A 99 22 11 4B 45 45 50 20 45 58 | "QP$:.".KEEP EX|
00001230: 49 53 54 49 4E 47 20 56 41 4C 55 45 2E 11 00 6C |ISTING VALUE...l|
00001240: 16 C0 18 99 A3 32 33 29 22 4F 4C 44 22 A3 33 33 |.....23)"OLD".33|
00001250: 29 22 4E 45 57 22 3A 99 22 11 59 45 41 52 4C 59 |)"NEW":.".YEARLY|
00001260: 20 49 4E 53 55 52 41 4E 43 45 22 3B 00 80 16 C4 | INSURANCE";....|
00001270: 18 5A 39 B2 49 53 28 4A 58 29 3A 8D 36 35 30 30 |.Z9.IS(JX):.6500|
00001280: 00 9B 16 C9 18 8B 49 4E 24 B3 B1 22 22 A7 49 53 |......IN$.."".IS|
00001290: 28 4A 58 29 B2 C5 28 49 4E 24 29 00 BB 16 CD 18 |(JX)..(IN$).....|
000012A0: 99 22 11 1D 1D 22 56 24 22 20 4C 45 41 53 45 44 |."..."V$" LEASED|
000012B0: 3F 20 22 3B 3A 8D 36 30 30 30 30 00 D3 16 CE 18 |? ";:.60000.....|
000012C0: 8B C8 28 49 4E 24 2C 31 29 B3 B1 22 59 22 89 36 |..(IN$,1).."Y".6|
000012D0: 33 35 35 00 01 17 CF 18 99 22 11 59 52 4C 59 20 |355......".YRLY |
000012E0: 4C 45 41 53 45 20 43 48 47 53 22 3B 3A 5A 39 B2 |LEASE CHGS";:Z9.|
000012F0: 46 43 28 4A 58 29 3A 8D 36 35 30 30 3A 54 4D B2 |FC(JX):.6500:TM.|
00001300: 31 00 1C 17 D0 18 8B 49 4E 24 B3 B1 22 22 A7 46 |1......IN$.."".F|
00001310: 43 28 4A 58 29 B2 C5 28 49 4E 24 29 00 26 17 D2 |C(JX)..(IN$).&..|
00001320: 18 89 36 34 30 35 00 64 17 D3 18 99 22 11 43 55 |..6405.d....".CU|
00001330: 52 52 45 4E 54 20 56 41 4C 55 45 22 3B 3A 5A 39 |RRENT VALUE";:Z9|
00001340: B2 56 41 28 4A 58 29 3A 8D 36 35 30 30 3A 8B 49 |.VA(JX):.6500:.I|
00001350: 4E 24 B3 B1 22 22 A7 56 41 28 4A 58 29 B2 C5 28 |N$.."".VA(JX)..(|
00001360: 49 4E 24 29 00 8E 17 E2 18 99 22 11 44 45 50 52 |IN$)......".DEPR|
00001370: 45 43 49 41 54 49 4F 4E 20 28 25 29 22 3B 3A 5A |ECIATION (%)";:Z|
00001380: 39 B2 44 50 28 4A 58 29 3A 8D 36 35 30 30 00 A9 |9.DP(JX):.6500..|
00001390: 17 EC 18 8B 49 4E 24 B3 B1 22 22 A7 44 50 28 4A |....IN$.."".DP(J|
000013A0: 58 29 B2 C5 28 49 4E 24 29 00 E6 17 F6 18 99 22 |X)..(IN$)......"|
000013B0: 11 46 49 4E 41 4E 43 45 20 43 48 47 53 22 3B 3A |.FINANCE CHGS";:|
000013C0: 5A 39 B2 46 43 28 4A 58 29 3A 8D 36 35 30 30 3A |Z9.FC(JX):.6500:|
000013D0: 8B 49 4E 24 B3 B1 22 22 A7 46 43 28 4A 58 29 B2 |.IN$.."".FC(JX).|
000013E0: C5 28 49 4E 24 29 00 24 18 05 19 99 22 11 4C 49 |.(IN$).$....".LI|
000013F0: 43 45 4E 53 45 2F 43 4C 55 42 53 22 3B 3A 5A 39 |CENSE/CLUBS";:Z9|
00001400: B2 4C 43 28 4A 58 29 3A 8D 36 35 30 30 3A 8B 49 |.LC(JX):.6500:.I|
00001410: 4E 24 B3 B1 22 22 A7 4C 43 28 4A 58 29 B2 C5 28 |N$.."".LC(JX)..(|
00001420: 49 4E 24 29 00 33 18 14 19 8B 54 4D B2 31 89 36 |IN$).3....TM.1.6|
00001430: 34 33 30 00 74 18 19 19 46 58 28 4A 58 29 B2 28 |430.t...FX(JX).(|
00001440: 49 53 28 4A 58 29 AA 28 56 41 28 4A 58 29 AC 28 |IS(JX).(VA(JX).(|
00001450: 44 50 28 4A 58 29 AD 31 30 30 29 29 AA 46 43 28 |DP(JX).100)).FC(|
00001460: 4A 58 29 AA 4C 43 28 4A 58 29 29 AD 31 32 3A 89 |JX).LC(JX)).12:.|
00001470: 36 34 33 35 00 9E 18 1E 19 54 4D B2 30 3A 46 58 |6435.....TM.0:FX|
00001480: 28 4A 58 29 B2 28 49 53 28 4A 58 29 AA 46 43 28 |(JX).(IS(JX).FC(|
00001490: 4A 58 29 AA 4C 43 28 4A 58 29 29 AD 31 32 00 D3 |JX).LC(JX)).12..|
000014A0: 18 23 19 99 22 11 1D 1D 4D 4F 4E 54 48 4C 59 20 |.#.."...MONTHLY |
000014B0: 46 49 58 45 44 20 43 48 41 52 47 45 20 22 3B A3 |FIXED CHARGE ";.|
000014C0: 32 35 29 3A 5A 39 B2 46 58 28 4A 58 29 3A 8D 34 |25):Z9.FX(JX):.4|
000014D0: 39 30 30 00 E9 18 24 19 99 22 12 22 3B C9 28 5A |900...$..".";.(Z|
000014E0: 31 24 2C 38 29 3B 22 92 22 00 0F 19 32 19 99 22 |1$,8);"."...2.."|
000014F0: 11 45 56 45 52 59 54 48 49 4E 47 20 43 4F 52 52 |.EVERYTHING CORR|
00001500: 45 43 54 20 3F 20 22 3B 3A 8D 36 30 30 30 30 00 |ECT ? ";:.60000.|
00001510: 26 19 37 19 8B C8 28 49 4E 24 2C 31 29 B2 22 4E |&.7...(IN$,1)."N|
00001520: 22 89 36 33 30 30 00 30 19 63 19 89 36 30 30 30 |".6300.0.c..6000|
00001530: 00 56 19 64 19 8D 34 39 30 30 3A 99 A3 31 36 29 |.V.d..4900:..16)|
00001540: 3A 99 5A 31 24 3B 22 1D 1D 1D 1D 22 3B 3A 8D 36 |:.Z1$;"....";:.6|
00001550: 30 30 30 30 3A 8E 00 68 19 58 1B 99 51 43 24 3B |0000:..h.X..QC$;|
00001560: 3A 8D 36 30 30 30 30 3B 00 79 19 BC 1B 99 22 93 |:.60000;.y....".|
00001570: 22 3A 99 22 13 22 3B 3A 8E 00 9A 19 60 EA 49 4E |":.".";:....`.IN|
00001580: 24 B2 22 20 22 3A 5A 54 B2 54 49 3A 5A 43 B2 32 |$." ":ZT.TI:ZC.2|
00001590: 3A 5A 44 24 B2 C7 28 32 30 29 00 B0 19 6A EA A1 |:ZD$..(20)...j..|
000015A0: 5A 24 3A 8B 5A 24 B3 B1 22 22 A7 36 30 30 37 30 |Z$:.Z$.."".60070|
000015B0: 00 E0 19 74 EA 8B 5A 54 B3 B2 54 49 A7 99 CA 28 |...t..ZT..TI...(|
000015C0: 22 20 A6 22 2C 5A 43 2C 31 29 3B 22 9D 22 3B 3A |" .",ZC,1);".";:|
000015D0: 5A 43 B2 33 AB 5A 43 3A 5A 54 B2 54 49 AA 31 35 |ZC.3.ZC:ZT.TI.15|
000015E0: 00 EB 19 7E EA 89 36 30 30 31 30 00 1B 1A A6 EA |...~..60010.....|
000015F0: 5A B2 C6 28 5A 24 29 3A 5A 4C B2 C3 28 49 4E 24 |Z..(Z$):ZL..(IN$|
00001600: 29 3A 8B 28 5A AF 31 32 37 29 B3 33 32 A7 99 22 |):.(Z.127).32.."|
00001610: 20 9D 22 3B 3A 89 36 30 31 31 30 00 4B 1A B0 EA | .";:.60110.K...|
00001620: 8B 46 4C AF 28 5A AF 31 32 37 29 B1 36 34 AF 28 |.FL.(Z.127).64.(|
00001630: 5A AF 31 32 37 29 B3 39 31 A7 5A 24 B2 C7 28 28 |Z.127).91.Z$..((|
00001640: 5A AA 31 32 38 29 AF 32 35 35 29 00 5D 1A BA EA |Z.128).255).]...|
00001650: 8B 5A 4C B1 32 35 34 A7 36 30 30 31 30 00 78 1A |.ZL.254.60010.x.|
00001660: C4 EA 49 4E 24 B2 49 4E 24 AA 5A 24 3A 99 5A 24 |..IN$.IN$.Z$:.Z$|
00001670: 3B 5A 44 24 3B 5A 24 3B 00 97 1A CE EA 8B 5A B2 |;ZD$;Z$;......Z.|
00001680: 31 33 A7 49 4E 24 B2 CA 28 49 4E 24 2C 32 29 3A |13.IN$..(IN$,2):|
00001690: 99 43 52 24 3B 3A 8E 00 C3 1A D8 EA 8B 5A B2 32 |.CR$;:.......Z.2|
000016A0: 30 AF 5A 4C B1 31 A7 49 4E 24 B2 C8 28 49 4E 24 |0.ZL.1.IN$..(IN$|
000016B0: 2C 5A 4C AB 31 29 3A 99 22 9D 22 3B 3A 89 36 30 |,ZL.1):.".";:.60|
000016C0: 30 31 30 00 F6 1A E2 EA 8B 5A B2 31 34 31 A7 5A |010......Z.141.Z|
000016D0: 24 B2 C7 28 AB 32 30 AC 28 5A 4C B1 31 29 29 3A |$..(.20.(ZL.1)):|
000016E0: 81 5A B2 32 A4 5A 4C 3A 99 5A 24 3B 3A 82 5A 3A |.Z.2.ZL:.Z$;:.Z:|
000016F0: 89 36 30 30 30 30 00 01 1B EC EA 89 36 30 30 31 |.60000......6001|
00001700: 30 00 20 1B 30 F2 99 22 93 11 11 22 A3 39 29 22 |0. .0.."...".9)"|
00001710: 43 55 52 53 4F 52 20 23 31 33 20 20 43 41 52 53 |CURSOR #13 CARS|
00001720: 00 5F 1B 3A F2 99 22 11 20 43 4F 50 59 52 49 47 |._.:..". COPYRIG|
00001730: 48 54 20 28 43 29 20 31 39 37 39 20 20 42 59 20 |HT (C) 1979 BY |
00001740: 4A 4F 48 4E 20 47 52 4F 56 45 11 22 3A 81 49 B2 |JOHN GROVE.":.I.|
00001750: 31 A4 31 30 3A 99 22 C6 C6 C6 C6 22 3B 3A 82 00 |1.10:."....";:..|
00001760: 94 1B 4E F2 99 22 11 4D 41 49 4E 54 41 49 4E 22 |..N..".MAINTAIN"|
00001770: 56 24 22 20 43 4F 53 54 20 52 45 43 4F 52 44 53 |V$" COST RECORDS|
00001780: 3A 22 3A 99 22 11 11 11 22 51 50 24 22 42 45 47 |:":."..."QP$"BEG|
00001790: 49 4E 3A 22 00 A9 1B 62 F2 A1 54 24 3A 8B 54 24 |IN:"...b..T$:.T$|
000017A0: B2 22 22 89 36 32 30 35 30 00 B4 1B 9E F2 99 22 |."".62050......"|
000017B0: 93 22 3A 8E 00 00 00 8E |.":..... |
..*.... CARS COPYRIGHT (C) 1979 JOHN GRO
VE.G.... CURSOR #13, SEP., 1979.H.... BO
X 550, GOLETA, CA. 93017.~.... AS OF 16
SEP 79...Z..:.59468,12.R.D.QR$.".RETURN.
":QP$."PRESS ".QR$." TO ":QC$."...".QP$.
"CONTINUE"...E.QM$."ODOMETER ":QK$."MILE
S":QJ$."GAL":V$." VEHICLE":.62000.=.L.T.
3:MX.T:.C(30),D(30):CR$.G(13):W.1:V.1...
M..CA$(T),IS(T),VA(T),DP(T),FC(T),LC(T),
FX(T),MM(T),MG(T),MC(T),ME(T)...N..".LAS
T DATA ON TAPE? ";:.60000.F.X..H(IN$,1).
"N"..6000:.135.P.}..5000......".WANT TO
SET/CHANGE"V$.'....".NAMES/FIXED CHARGES
? ";:.60000:.H(IN$,1)."Y"..6000.I....".S
ELECT INPUT UNITS:":.3000:X9.B9:."..SELE
CT OUTPUT UNITS:"......3000:Y9.B9:.Y9.2.
QK$."KILOMETERS":QJ$."LITRE".....W.1:V.1
:.Y9.3.QJ$."LITRE".X....X9.1.Y9.2.W.1.61
:V.3.785......X9.1.Y9.3.V.3.785......X9.
2.Y9.1.W..621:V..2642.#....X9.2.Y9.3.W..
621.:....X9.3.Y9.1.V..2642.P....X9.3.Y9.
2.W.1.61.{....4850:.".WHAT MONTH? ";:.60
000:MO$.IN$......".WHAT"V$"? ";:.60000..
....CX.1.T:.CA$(CX).IN$.200......CX.U.B.
.".NO SUCH"V$" KNOWN....D..".WANT TO ADD
IT? ";:.60000:.H(IN$,1)."Y".130...F..17
0.,.H..".IS LAST ENDING "QM$.B.I..".FOR"
V$" IN MEMORY? ";:.60000:.H(IN$,1)."N".2
05...K.A.ME(CX):.".BEGINNING "QM$"FOR "M
O$" IS "A:.300...M..".BEGINNING "QM$;:.6
0000:A.E(IN$)...,..".ENDING "QM$;:.60000
:B.E(IN$)...H..4850:..14)"..FUEL DATA.+.
...".INPUT FUEL:"QP$"END.":.900:C2.C1:D2
.D1.F....4850:..14)"..OIL DATA.W....".AN
Y OIL DATA? ";:.60000:.H(IN$,1)."N".430.
.....".INPUT OIL:"QP$"END.":.900:E1.C1:F
1.D1.E....4850:..12)"..MISC. EXPENSES...
...".ANY MISC. EXPENSES? ";:.60000:.H(IN
$,1)."N".1400...B...12)".#".18)"COST":.I
.1.30:C(I).0:D(I).0:.I.L.L...12);:.60000
:.IN$."".500.}...M1.E(IN$):..17)".";:.60
000:C(M1).E(IN$):.460......"ARE THE ABOV
E DATA CORRECT? ";:.60000......H(IN$,1).
"N".450.....G.0:.I.1.30:G.G.C(I):.I:.140
0.....C1.0:D1.0:.I.1.30:C(I).0:D(I).0:.I
.+.....5)".#".10)"AMOUNT".25)"COST".]...
.4800:."ARE THE ABOVE DATA CORRECT? ";:.
60000.S....H(IN$,1)."N".910......I.1.30:
C1.C1.C(I):D1.D1.D(I):.I:..L.X..".".2)".
SUMMARIES FOR "MO$" FOR THE "CA$(CX)....
.Z9.A:.4900:.".BEGINING "QM$.25)Z1$.!...
Z9.B:.4900:."ENDING "QM$.25)Z1$:U.(B.A).
W.U.H.Z9.U:.4900:.".TOTAL "QK$.28)"."I(Z
1$,8):V9.C2.V.....Z9.V9:.4900:.".TOTAL F
UEL USED".25)Z1$.....Z9.D2:.4900:."TOTAL
FUEL COST".25)Z1$:.C2.0.1560.....D3.D2.
V9:D4.U.V9:QT$.H(QK$,C(QK$).1).....Z9.D3
:.4900:.".COST/"QJ$:..25)Z1$.0.,.Z9.D4:.
4900:.QK$"/"QJ$:..30)"."I(Z1$,6).Z.@.Z9.
F1:.4900:.".TOTAL OIL COST".25)Z1$...T.Z
9.G:.4900:."TOTAL MISC COST".25)Z1$:D4.D
2.F1.G:D5.D4.FX(CX).T.H.D6.D5.(B.A):Z9.D
4:.4900:.".COST OF OPERATION".25)Z1$...|
.Z9.D5:.4900:.".TOTAL EXPENSE".25)Z1$.).
..Z9.D6:.4900:.".COST/"QT$.32)"."I(Z1$,4
).3....7000.^.....2)".SUMMARY TO-DATE FO
R THE "CA$(CX).....MM(CX).MM(CX).U:MG(CX
).MG(CX).V9:MC(CX).MC(CX).D5:ME(CX).B.C.
0.AV.MM(CX).MG(CX):CM.MC(CX).MM(CX)...D.
Z9.MM(CX):.4900:.".TOTAL "QK$;:..25)Z1$.
..X.Z9.MG(CX):.4900:.".TOTAL FUEL".25)Z1
$.I.L.Z9.AV:.4900:."."QK$"/"QJ$;:..30)".
"I(Z1$,6).S...Z9.MC(CX):.4900:.".TOTAL C
OST".25)Z1$.....Z9.CM:.4900:.".COST/"QT$
;:..32)"."I(Z1$,4):.7000......".MORE ON
THIS"V$"? ";:.60000:.H(IN$,1)."Y".150...
...".ANY MORE VEHICLES? ";:.60000:.H(IN$
,1)."Y".130.O.A..".STORE THE DATA ON TAP
E? ";:.60000:.H(IN$,1)."N".1999.Y.H..200
0._.O.....P..".MOUNT TAPE AND REWIND.":.
QC$:.60000:.1,1,1......J.1.T.....L.TI.R.
...1,".".CA$(J):.1,IS(J):.1,VA(J):.1,DP(
J)......1,FC(J):.1,LC(J):.1,FX(J):.1,MM(
J)......1,MG(J):.1,MC(J):.1,ME(J).$...L.
TI.L.3. ..L.10.2090.I."..59411,53:L.TI.2
0.X.$..TI.L.2084.F.&..59411,61.M.*..J.T.
/. 1...4.."..DONE. WRITING TAPE; REWIND
NOW.":.......".1. MILES:GALS":.".2. KILO
METERS:LITRES":.".3. MILES:LITRES"......
".? ";:.60000:B9.E(IN$)...B...#.....5);:
.60000:.IN$."".4840.B.H.N9.E(IN$):..11)"
.";:.60000.X.J.C(N9).E(IN$):..25)".";:.6
0000;:D(N9).E(IN$):.4800.~..........".";
.10);".MONTHLY CHARGE DATA.":..C.$.Z9$.J
(D(.(Z9.100..5)),2)......C(Z9$).3.Z9$.I(
"00".Z9$,3)...8.Z9$.H(Z9$,C(Z9$).2).".".
I(Z9$,2)...=..Z9.0.Z9$."-".Z9$.;.B.Z1$.I
(" ".Z9$,11).A.L...Y....".MOUNT L
AST DATA TAPE AND REWIND":.QC$;:.60000:.
1......J.1.T......".";.U....1,CA$,IS(J),
VA(J),DP(J),FC(J),LC(J),FX(J),MM(J),MG(J
),MC(J),ME(J).....CA$(J).J(CA$,2)......J
."... 1:."..DONE. READING TAPE; REWIND N
OW.":.7000.(.D...F.P..".CHANGE/SET WHAT?
":.".1."V$" NAMES":.".2. FIXED CHARGES..
.S..".? ";:.60000:FC.E(IN$):.FC.6100,630
0...O.....T.."..THESE"V$"S EXIST.W....JX
.1.MX:."....."JX".."CA$(JX):.JX...8.."."
V$" TO CHANGE/ADD...B..".....";:.60000:.
IN$."".6250.H.L.IX.E(IN$):.".........";:
.60000:CA$(IX).IN$:.6210.X.J.."ALL CORRE
CT? ";:.60000:.H(IN$,1)."N".6200...T.. 6
000......".WHAT"V$"? ":."......";:.60000
.G....JX.1.MX:.IN$.CA$(JX).6330.O....JX.
.....".NO SUCH"V$"; USE OPTION 1":.ZZ.1.
2000:.ZZ:.6000.>....".INPUT NEW VALUE OR
"QP$:.".KEEP EXISTING VALUE...L.....23)
"OLD".33)"NEW":.".YEARLY INSURANCE";...D
.Z9.IS(JX):.6500...I..IN$.."".IS(JX).E(I
N$)...M.."..."V$" LEASED? ";:.60000.S.N.
.H(IN$,1).."Y".6355...O..".YRLY LEASE CH
GS";:Z9.FC(JX):.6500:TM.1...P..IN$.."".F
C(JX).E(IN$).&.R..6405.D.S..".CURRENT VA
LUE";:Z9.VA(JX):.6500:.IN$.."".VA(JX).E(
IN$)......".DEPRECIATION (%)";:Z9.DP(JX)
:.6500......IN$.."".DP(JX).E(IN$)......"
.FINANCE CHGS";:Z9.FC(JX):.6500:.IN$..""
.FC(JX).E(IN$).$....".LICENSE/CLUBS";:Z9
.LC(JX):.6500:.IN$.."".LC(JX).E(IN$).3..
..TM.1.6430.T...FX(JX).(IS(JX).(VA(JX).(
DP(JX).100)).FC(JX).LC(JX)).12:.6435....
.TM.0:FX(JX).(IS(JX).FC(JX).LC(JX)).12.S
.#.."...MONTHLY FIXED CHARGE ";.25):Z9.F
X(JX):.4900...$..".";I(Z1$,8);"."...2.."
.EVERYTHING CORRECT ? ";:.60000.&.7..H(I
N$,1)."N".6300.0.C..6000.V.D..4900:..16)
:.Z1$;"....";:.60000:..H.X..QC$;:.60000;
.Y....".":.".";:....`.IN$." ":ZT.TI:ZC.2
:ZD$.G(20)...J..Z$:.Z$.."".60070...T..ZT
..TI..J(" .",ZC,1);".";:ZC.3.ZC:ZT.TI.15
...~..60010.....Z.F(Z$):ZL.C(IN$):.(Z.12
7).32.." .";:.60110.K....FL.(Z.127).64.(
Z.127).91.Z$.G((Z.128).255).]....ZL.254.
60010.X.D.IN$.IN$.Z$:.Z$;ZD$;Z$;...N..Z.
13.IN$.J(IN$,2):.CR$;:..C.X..Z.20.ZL.1.I
N$.H(IN$,ZL.1):.".";:.60010......Z.141.Z
$.G(.20.(ZL.1)):.Z.2.ZL:.Z$;:.Z:.60000..
....60010. .0.."...".9)"CURSOR #13 CARS
._.:..". COPYRIGHT (C) 1979 BY JOHN GRO
VE.":.I.1.10:."FFFF";:....N..".MAINTAIN"
V$" COST RECORDS:":."..."QP$"BEGIN:"...B
..T$:.T$."".62050......".":.....
> CLICK IMAGE PREVIEW FOR FULL MODAL