DSCALC 2.0
FILE INFORMATION
FILENAME(S): DSCALC 2.0
FILE TYPE(S): PRG
FILE SIZE: 12.8K
FIRST SEEN: 2025-12-01 02:03:33
APPEARS ON: 1 disk(s)
FILE HASH
9c0886132c59e56aa70ccefc414d0af2d8147016a6609ac8ee3a84eb48507043
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DANIEL | DSCALC 2.0 | PRG | hedning, pewp | 17 | 15 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 44 08 E8 03 8F 20 44 53 43 41 4C 43 20 2D |..D.... DSCALC -|
00000010: 20 41 20 53 50 52 45 41 44 53 48 45 45 54 20 50 | A SPREADSHEET P|
00000020: 52 4F 47 52 41 4D 20 20 20 20 20 20 20 20 20 20 |ROGRAM |
00000030: 46 4F 52 20 54 48 45 20 43 4F 4D 4D 4F 44 4F 52 |FOR THE COMMODOR|
00000040: 45 20 36 34 00 61 08 FC 03 8F 20 56 45 52 53 49 |E 64.a.... VERSI|
00000050: 4F 4E 20 31 20 42 59 20 44 49 43 4B 20 53 4F 57 |ON 1 BY DICK SOW|
00000060: 41 00 84 08 10 04 8F 20 56 45 52 53 49 4F 4E 20 |A...... VERSION |
00000070: 32 20 42 59 20 4D 41 52 43 20 52 2E 20 52 4F 55 |2 BY MARC R. ROU|
00000080: 53 53 45 4C 00 97 08 56 04 8F 20 54 49 54 4C 45 |SSEL...V.. TITLE|
00000090: 20 53 43 52 45 45 4E 00 BB 08 6A 04 97 35 33 32 | SCREEN...j..532|
000000A0: 38 31 2C 31 3A 97 35 33 32 38 30 2C 31 3A 99 C7 |81,1:.53280,1:..|
000000B0: 28 31 34 29 22 93 11 11 11 1C 22 00 EE 08 74 04 |(14)"....."...t.|
000000C0: 50 41 24 B2 22 1D 1C 3D 3D 3D 3D 3D 3D 3D 3D 3D |PA$."..=========|
000000D0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000000E0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 00 33 |=============".3|
000000F0: 09 7E 04 56 4D B2 31 30 32 34 3A 56 58 B2 56 4D |.~.VM.1024:VX.VM|
00000100: AA 39 39 39 3A 43 4D B2 35 35 32 39 36 3A 43 58 |.999:CM.55296:CX|
00000110: B2 43 4D AA 39 39 39 3A 97 56 4D 2C 32 34 30 3A |.CM.999:.VM,240:|
00000120: 97 43 4D 2C 32 3A 97 56 58 2C 32 35 33 3A 97 43 |.CM,2:.VX,253:.C|
00000130: 58 2C 32 00 6F 09 88 04 81 58 B2 31 A4 32 33 3A |X,2.o....X.1.23:|
00000140: 97 56 4D AA 34 30 AC 58 2C 32 32 31 3A 97 43 4D |.VM.40.X,221:.CM|
00000150: AA 34 30 AC 58 2C 32 3A 97 56 58 AB 34 30 AC 58 |.40.X,2:.VX.40.X|
00000160: 2C 32 32 31 3A 97 43 58 AB 34 30 AC 58 2C 32 00 |,221:.CX.40.X,2.|
00000170: A5 09 92 04 82 3A 97 56 4D AA 33 39 2C 32 33 38 |.....:.VM.39,238|
00000180: 3A 97 43 4D AA 33 39 2C 32 3A 97 56 58 AB 33 39 |:.CM.39,2:.VX.39|
00000190: 2C 32 33 37 3A 97 43 58 AB 33 39 2C 32 3A 81 58 |,237:.CX.39,2:.X|
000001A0: B2 31 A4 33 38 00 DB 09 9C 04 97 56 4D AA 33 39 |.1.38......VM.39|
000001B0: AB 58 2C 31 39 32 3A 97 43 4D AA 33 39 AB 58 2C |.X,192:.CM.39.X,|
000001C0: 32 3A 97 56 58 AB 33 39 AA 58 2C 31 39 32 3A 97 |2:.VX.39.X,192:.|
000001D0: 43 58 AB 33 39 AA 58 2C 32 3A 82 00 EE 09 A6 04 |CX.39.X,2:......|
000001E0: 99 22 11 11 22 50 41 24 22 13 11 11 11 22 00 2E |.".."PA$"...."..|
000001F0: 0A B0 04 99 22 1E 11 11 11 1D 20 20 20 C4 D3 C3 |...."..... ...|
00000200: C1 CC C3 20 32 2E 30 20 2D 20 C1 20 C2 C1 D3 C9 |... 2.0 - . ....|
00000210: C3 20 D3 50 52 45 41 44 53 48 45 45 54 22 3A 99 |. .PREADSHEET":.|
00000220: 50 41 24 3A 81 49 B2 31 A4 35 30 30 3A 82 00 55 |PA$:.I.1.500:..U|
00000230: 0A BA 04 99 22 11 11 1D 20 20 20 20 20 20 20 20 |...."... |
00000240: 28 43 29 20 31 39 38 35 20 42 59 20 C4 49 43 4B |(C) 1985 BY .ICK|
00000250: 20 D3 4F 57 41 00 81 0A C4 04 99 22 11 1D 20 20 | .OWA......".. |
00000260: 20 20 D6 45 52 53 49 4F 4E 20 32 2E 30 20 42 59 | .ERSION 2.0 BY|
00000270: 20 CD 41 52 43 20 D2 2E 20 D2 4F 55 53 53 45 4C | .ARC .. .OUSSEL|
00000280: 22 00 AD 0A CE 04 99 22 11 11 1C 1D 20 20 20 20 |"......".... |
00000290: 20 20 D3 4F 55 52 43 45 20 4D 55 53 54 20 42 45 | .OURCE MUST BE|
000002A0: 20 44 49 53 54 52 49 42 55 54 45 44 22 00 D1 0A | DISTRIBUTED"...|
000002B0: D8 04 99 22 1D 20 20 20 20 20 20 20 20 20 20 20 |...". |
000002C0: 57 49 54 48 20 45 58 45 43 55 54 41 42 4C 45 2E |WITH EXECUTABLE.|
000002D0: 22 00 F9 0A E2 04 99 3A 99 3A 99 3A 99 22 90 1D |"......:.:.:."..|
000002E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 D3 54 | .T|
000002F0: 41 4E 44 42 59 2E 2E 2E 22 00 22 0B EC 04 8D 34 |ANDBY..."."....4|
00000300: 38 36 30 3A 8F 20 44 59 4E 41 4D 49 43 20 45 58 |860:. DYNAMIC EX|
00000310: 50 52 45 53 53 49 4F 4E 20 45 56 41 4C 55 41 54 |PRESSION EVALUAT|
00000320: 4F 52 00 3E 0B F6 04 8D 35 32 37 30 3A 8F 20 53 |OR.>....5270:. S|
00000330: 45 51 20 46 49 4C 45 20 52 45 41 44 45 52 00 59 |EQ FILE READER.Y|
00000340: 0B 00 05 8F 20 54 59 28 52 2C 43 29 3D 30 20 42 |.... TY(R,C)=0 B|
00000350: 4C 41 4E 4B 20 43 45 4C 4C 00 77 0B 0A 05 8F 20 |LANK CELL.w.... |
00000360: 20 20 20 20 20 20 20 3D 31 20 4E 55 4D 45 52 49 | =1 NUMERI|
00000370: 43 20 56 41 4C 55 45 00 90 0B 14 05 8F 20 20 20 |C VALUE...... |
00000380: 20 20 20 20 20 3D 32 20 46 4F 52 4D 55 4C 41 53 | =2 FORMULAS|
00000390: 00 A5 0B 1E 05 8F 20 20 20 20 20 20 20 20 3D 33 |...... =3|
000003A0: 20 54 45 58 54 00 C5 0B 28 05 8F 20 20 20 20 20 | TEXT...(.. |
000003B0: 20 20 20 3D 34 20 53 55 4D 2C 20 4D 41 58 20 4F | =4 SUM, MAX O|
000003C0: 52 20 4D 49 4E 00 E6 0B 32 05 9C 3A 53 50 24 B2 |R MIN...2..:SP$.|
000003D0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
000003E0: 20 20 20 20 20 22 00 0A 0C 3C 05 4E 52 B2 34 30 | "...<.NR.40|
000003F0: 3A 8F 20 4E 55 4D 42 45 52 20 4F 46 20 50 4F 53 |:. NUMBER OF POS|
00000400: 53 49 42 4C 45 20 52 4F 57 53 00 2E 0C 46 05 4E |SIBLE ROWS...F.N|
00000410: 43 B2 31 34 3A 8F 20 4E 55 4D 42 45 52 20 4F 46 |C.14:. NUMBER OF|
00000420: 20 50 4F 53 53 49 42 4C 45 20 43 4F 4C 53 00 52 | POSSIBLE COLS.R|
00000430: 0C 50 05 53 52 B2 31 38 3A 8F 20 4D 41 58 20 4E |.P.SR.18:. MAX N|
00000440: 55 4D 20 4F 46 20 44 49 53 50 4C 41 59 20 52 4F |UM OF DISPLAY RO|
00000450: 57 53 00 76 0C 5A 05 53 43 B2 34 20 3A 8F 20 4D |WS.v.Z.SC.4 :. M|
00000460: 41 58 20 4E 55 4D 20 4F 46 20 44 49 53 50 4C 41 |AX NUM OF DISPLA|
00000470: 59 20 43 4F 4C 53 00 8F 0C 64 05 57 43 B2 38 20 |Y COLS...d.WC.8 |
00000480: 3A 8F 20 43 4F 4C 55 4D 4E 20 57 49 44 54 48 00 |:. COLUMN WIDTH.|
00000490: AF 0C 6E 05 42 4B 24 B2 22 20 20 20 20 20 20 20 |..n.BK$." |
000004A0: 20 22 3A 8F 20 42 4C 41 4E 4B 20 43 45 4C 4C 00 | ":. BLANK CELL.|
000004B0: F7 0C 78 05 86 52 4E 28 4E 52 29 2C 43 4E 28 4E |..x..RN(NR),CN(N|
000004C0: 43 29 2C 46 58 24 28 4E 52 2C 4E 43 29 2C 44 58 |C),FX$(NR,NC),DX|
000004D0: 24 28 4E 52 2C 4E 43 29 2C 54 59 28 4E 52 2C 4E |$(NR,NC),TY(NR,N|
000004E0: 43 29 2C 46 4D 24 28 4E 52 2C 4E 43 29 2C 46 58 |C),FM$(NR,NC),FX|
000004F0: 28 4E 52 2C 4E 43 29 00 1A 0D 82 05 86 4E 28 32 |(NR,NC)......N(2|
00000500: 31 29 3A 8F 20 4E 45 53 54 45 44 20 46 4F 52 4D |1):. NESTED FORM|
00000510: 55 4C 41 20 4C 45 56 45 4C 53 00 58 0D 8C 05 86 |ULA LEVELS.X....|
00000520: 20 46 4C 28 4E 52 2C 4E 43 29 2C 52 28 31 30 30 | FL(NR,NC),R(100|
00000530: 29 2C 43 28 31 30 30 29 2C 52 41 28 31 30 30 29 |),C(100),RA(100)|
00000540: 2C 52 42 28 31 30 30 29 2C 43 41 28 31 30 30 29 |,RB(100),CA(100)|
00000550: 2C 43 42 28 31 30 30 29 00 88 0D 96 05 81 52 B2 |,CB(100)......R.|
00000560: 31 A4 4E 52 3A 81 43 B2 31 A4 4E 43 3A 54 59 28 |1.NR:.C.1.NC:TY(|
00000570: 52 2C 43 29 B2 30 3A 82 3A 82 3A 8F 20 42 4C 41 |R,C).0:.:.:. BLA|
00000580: 4E 4B 20 43 45 4C 4C 53 00 A3 0D AA 05 8F 20 44 |NK CELLS...... D|
00000590: 49 53 50 4C 41 59 20 43 4F 4C 55 4D 4E 53 2F 52 |ISPLAY COLUMNS/R|
000005A0: 4F 57 53 00 BD 0D B4 05 43 31 B2 31 3A 43 32 B2 |OWS.....C1.1:C2.|
000005B0: 53 43 3A 52 31 B2 31 3A 52 32 B2 53 52 00 D5 0D |SC:R1.1:R2.SR...|
000005C0: BE 05 52 4F B2 32 3A 43 4F B2 34 3A 52 30 B2 31 |..RO.2:CO.4:R0.1|
000005D0: 3A 43 30 B2 31 00 DF 0D C8 05 8D 31 39 34 30 00 |:C0.1......1940.|
000005E0: E9 0D D2 05 8D 34 34 34 30 00 FE 0D DC 05 43 52 |.....4440.....CR|
000005F0: B2 32 30 3A 43 43 B2 30 3A 8D 32 30 39 30 00 08 |.20:CC.0:.2090..|
00000600: 0E E6 05 8D 34 36 39 30 00 25 0E F0 05 81 58 B2 |....4690.%....X.|
00000610: 32 32 A4 32 34 3A 97 37 38 31 2C 58 3A 9E 35 39 |22.24:.781,X:.59|
00000620: 39 30 33 3A 82 00 4D 0E FA 05 43 52 B2 32 32 3A |903:..M...CR.22:|
00000630: 43 43 B2 30 3A 8D 32 30 39 30 3A 99 22 1E 22 46 |CC.0:.2090:."."F|
00000640: 58 24 28 52 30 2C 43 30 29 22 90 22 3B 00 7E 0E |X$(R0,C0)".";.~.|
00000650: FF 05 8B 54 59 28 52 30 2C 43 30 29 B2 32 B0 54 |...TY(R0,C0).2.T|
00000660: 59 28 52 30 2C 43 30 29 B2 34 A7 99 22 1F 3D 22 |Y(R0,C0).4..".="|
00000670: 44 58 24 28 52 30 2C 43 30 29 22 90 22 3B 00 A3 |DX$(R0,C0)".";..|
00000680: 0E 04 06 43 52 B2 52 30 AB 52 31 AA 32 3A 43 43 |...CR.R0.R1.2:CC|
00000690: B2 57 43 AC 28 43 30 AB 43 31 29 AA 43 30 AB 43 |.WC.(C0.C1).C0.C|
000006A0: 31 AA 34 00 DA 0E 0E 06 8D 32 30 39 30 3A 8B C3 |1.4......2090:..|
000006B0: 28 44 58 24 28 52 30 2C 43 30 29 29 B1 38 A7 99 |(DX$(R0,C0)).8..|
000006C0: C8 28 44 58 24 28 52 30 2C 43 30 29 2C 37 29 AA |.(DX$(R0,C0),7).|
000006D0: 22 2B 22 3B 3A 89 31 35 36 30 00 EB 0E 13 06 99 |"+";:.1560......|
000006E0: 44 58 24 28 52 30 2C 43 30 29 3B 00 0D 0F 18 06 |DX$(R0,C0);.....|
000006F0: 8D 32 30 39 30 3A 8D 32 31 32 30 3A 8F 20 47 45 |.2090:.2120:. GE|
00000700: 54 20 41 20 43 48 41 52 41 43 54 45 52 00 29 0F |T A CHARACTER.).|
00000710: 2C 06 8F 20 43 48 45 43 4B 20 46 4F 52 20 43 55 |,.. CHECK FOR CU|
00000720: 52 53 4F 52 20 4B 45 59 53 00 6F 0F 36 06 91 AB |RSOR KEYS.o.6...|
00000730: 28 41 24 B2 22 1D 22 29 AC 31 AB 28 41 24 B2 22 |(A$.".").1.(A$."|
00000740: 9D 22 29 AC 32 AB 28 41 24 B2 22 11 22 29 AC 33 |.").2.(A$.".").3|
00000750: AB 28 41 24 B2 22 91 22 29 AC 34 89 31 37 33 30 |.(A$.".").4.1730|
00000760: 2C 31 37 38 30 2C 31 38 33 30 2C 31 38 38 30 00 |,1780,1830,1880.|
00000770: 8D 0F 4A 06 8F 20 43 48 45 43 4B 20 46 4F 52 20 |..J.. CHECK FOR |
00000780: 46 55 4E 43 54 49 4F 4E 20 4B 45 59 53 00 B0 0F |FUNCTION KEYS...|
00000790: 54 06 8B 41 24 B2 C7 28 31 33 33 29 A7 54 B2 31 |T..A$..(133).T.1|
000007A0: 3A 89 32 32 33 30 3A 8F 20 4E 55 4D 42 45 52 53 |:.2230:. NUMBERS|
000007B0: 00 D4 0F 5E 06 8B 41 24 B2 C7 28 31 33 34 29 A7 |...^..A$..(134).|
000007C0: 54 B2 32 3A 89 32 32 33 30 3A 8F 20 46 4F 52 4D |T.2:.2230:. FORM|
000007D0: 55 4C 41 53 00 01 10 68 06 8B 41 24 B2 C7 28 31 |ULAS...h..A$..(1|
000007E0: 33 35 29 A7 54 B2 33 3A 89 32 32 33 30 3A 8F 20 |35).T.3:.2230:. |
000007F0: 41 4C 50 48 41 4E 55 4D 45 52 49 43 20 54 45 58 |ALPHANUMERIC TEX|
00000800: 54 00 1C 10 72 06 8B 41 24 B2 C7 28 31 33 36 29 |T...r..A$..(136)|
00000810: A7 32 36 31 30 3A 8F 20 48 45 4C 50 00 37 10 7C |.2610:. HELP.7.||
00000820: 06 8B 41 24 B2 C7 28 31 33 37 29 A7 32 37 32 30 |..A$..(137).2720|
00000830: 3A 8F 20 4C 4F 41 44 00 52 10 86 06 8B 41 24 B2 |:. LOAD.R....A$.|
00000840: C7 28 31 33 38 29 A7 32 39 32 30 3A 8F 20 53 41 |.(138).2920:. SA|
00000850: 56 45 00 6F 10 90 06 8B 41 24 B2 C7 28 31 33 39 |VE.o....A$..(139|
00000860: 29 A7 33 31 34 30 3A 8F 20 52 45 43 41 4C 43 00 |).3140:. RECALC.|
00000870: 8A 10 9A 06 8B 41 24 B2 C7 28 31 34 30 29 A7 35 |.....A$..(140).5|
00000880: 34 31 30 3A 8F 20 51 55 49 54 00 A3 10 9F 06 8B |410:. QUIT......|
00000890: 41 24 B2 22 50 22 A7 36 32 30 30 3A 8F 20 50 52 |A$."P".6200:. PR|
000008A0: 49 4E 54 00 C9 10 A4 06 89 31 35 36 30 3A 8F 20 |INT......1560:. |
000008B0: 4E 4F 54 20 56 41 4C 49 44 20 43 48 41 52 2D 53 |NOT VALID CHAR-S|
000008C0: 54 41 52 54 20 4F 56 45 52 00 DC 10 B8 06 8F 20 |TART OVER...... |
000008D0: 43 55 52 53 4F 52 20 52 49 47 48 54 00 1C 11 C2 |CURSOR RIGHT....|
000008E0: 06 8B 43 30 B2 43 32 A7 8B 43 32 B3 B1 4E 43 A7 |..C0.C2..C2..NC.|
000008F0: 43 31 B2 43 31 AA 31 3A 43 32 B2 43 32 AA 31 3A |C1.C1.1:C2.C2.1:|
00000900: 43 30 B2 43 30 AA 31 3A 89 31 34 38 30 3A 8F 20 |C0.C0.1:.1480:. |
00000910: 53 48 49 46 54 20 53 43 52 45 45 4E 00 3A 11 CC |SHIFT SCREEN.:..|
00000920: 06 8B 43 30 B2 43 32 A7 31 35 36 30 3A 8F 20 43 |..C0.C2.1560:. C|
00000930: 41 4E 27 54 20 53 48 49 46 54 00 4C 11 D6 06 43 |AN'T SHIFT.L...C|
00000940: 30 B2 43 30 AA 31 3A 89 31 35 32 30 00 5E 11 EA |0.C0.1:.1520.^..|
00000950: 06 8F 20 43 55 52 53 4F 52 20 4C 45 46 54 00 9D |.. CURSOR LEFT..|
00000960: 11 F4 06 8B 43 30 B2 43 31 A7 8B 43 31 B3 B1 31 |....C0.C1..C1..1|
00000970: A7 43 31 B2 43 31 AB 31 3A 43 32 B2 43 32 AB 31 |.C1.C1.1:C2.C2.1|
00000980: 3A 43 30 B2 43 30 AB 31 3A 89 31 34 38 30 3A 8F |:C0.C0.1:.1480:.|
00000990: 20 53 48 49 46 54 20 53 43 52 45 45 4E 00 BB 11 | SHIFT SCREEN...|
000009A0: FE 06 8B 43 30 B2 43 31 A7 31 35 36 30 3A 8F 20 |...C0.C1.1560:. |
000009B0: 43 41 4E 27 54 20 53 48 49 46 54 00 CD 11 08 07 |CAN'T SHIFT.....|
000009C0: 43 30 B2 43 30 AB 31 3A 89 31 35 32 30 00 DF 11 |C0.C0.1:.1520...|
000009D0: 1C 07 8F 20 43 55 52 53 4F 52 20 44 4F 57 4E 00 |... CURSOR DOWN.|
000009E0: 1F 12 26 07 8B 52 30 B2 52 32 A7 8B 52 32 B3 B1 |..&..R0.R2..R2..|
000009F0: 4E 52 A7 52 31 B2 52 31 AA 31 3A 52 32 B2 52 32 |NR.R1.R1.1:R2.R2|
00000A00: AA 31 3A 52 30 B2 52 30 AA 31 3A 89 31 34 38 30 |.1:R0.R0.1:.1480|
00000A10: 3A 8F 20 53 48 49 46 54 20 53 43 52 45 45 4E 00 |:. SHIFT SCREEN.|
00000A20: 3D 12 30 07 8B 52 30 B2 52 32 A7 31 35 36 30 3A |=.0..R0.R2.1560:|
00000A30: 8F 20 43 41 4E 27 54 20 53 48 49 46 54 00 4F 12 |. CAN'T SHIFT.O.|
00000A40: 3A 07 52 30 B2 52 30 AA 31 3A 89 31 35 32 30 00 |:.R0.R0.1:.1520.|
00000A50: 5F 12 4E 07 8F 20 43 55 52 53 4F 52 20 55 50 00 |_.N.. CURSOR UP.|
00000A60: 9E 12 58 07 8B 52 30 B2 52 31 A7 8B 52 31 B3 B1 |..X..R0.R1..R1..|
00000A70: 31 A7 52 31 B2 52 31 AB 31 3A 52 32 B2 52 32 AB |1.R1.R1.1:R2.R2.|
00000A80: 31 3A 52 30 B2 52 30 AB 31 3A 89 31 34 38 30 3A |1:R0.R0.1:.1480:|
00000A90: 8F 20 53 48 49 46 54 20 53 43 52 45 45 4E 00 AD |. SHIFT SCREEN..|
00000AA0: 12 62 07 8B 52 30 B2 31 A7 31 35 36 30 00 BF 12 |.b..R0.1.1560...|
00000AB0: 6C 07 52 30 B2 52 30 AB 31 3A 89 31 35 32 30 00 |l.R0.R0.1:.1520.|
00000AC0: E0 12 8A 07 8F 20 44 49 53 50 4C 41 59 20 53 50 |..... DISPLAY SP|
00000AD0: 52 45 41 44 53 48 45 45 54 20 53 43 52 45 45 4E |READSHEET SCREEN|
00000AE0: 00 F1 12 94 07 99 22 90 93 22 C7 28 31 34 32 29 |......"..".(142)|
00000AF0: 3B 00 12 13 9E 07 81 43 B2 30 A4 33 3A 43 24 B2 |;......C.0.3:C$.|
00000B00: 22 30 22 AA CA 28 C4 28 43 AA 43 31 29 2C 32 2C |"0"..(.(C.C1),2,|
00000B10: 33 29 00 32 13 A8 07 99 A3 28 57 43 AA 31 29 AC |3).2.....(WC.1).|
00000B20: 43 AA 34 29 3B 22 43 22 C9 28 43 24 2C 32 29 3B |C.4);"C".(C$,2);|
00000B30: 3A 82 00 3A 13 B2 07 99 3A 99 00 5A 13 BC 07 81 |:..:....:..Z....|
00000B40: 52 B2 52 31 A4 52 32 3A 52 24 B2 22 30 22 AA CA |R.R1.R2:R$."0"..|
00000B50: 28 C4 28 52 29 2C 32 2C 33 29 00 6B 13 C6 07 99 |(.(R),2,3).k....|
00000B60: 22 52 22 C9 28 52 24 2C 32 29 3B 00 76 13 D0 07 |"R".(R$,2);.v...|
00000B70: 81 43 B2 30 A4 33 00 94 13 DA 07 99 A3 28 57 43 |.C.0.3.......(WC|
00000B80: AA 31 29 AC 43 AA 34 29 3B 3A 8F 20 52 4F 57 20 |.1).C.4);:. ROW |
00000B90: 4E 55 4D 53 00 B6 13 E4 07 8B 54 59 28 52 2C 43 |NUMS......TY(R,C|
00000BA0: AA 43 31 29 B2 30 A7 44 58 24 28 52 2C 43 AA 43 |.C1).0.DX$(R,C.C|
00000BB0: 31 29 B2 42 4B 24 00 E9 13 EE 07 8B C3 28 44 58 |1).BK$.......(DX|
00000BC0: 24 28 52 2C 43 AA 43 31 29 29 B1 38 A7 99 C8 28 |$(R,C.C1)).8...(|
00000BD0: 44 58 24 28 52 2C 43 AA 43 31 29 2C 37 29 AA 22 |DX$(R,C.C1),7)."|
00000BE0: 2B 22 3B 3A 89 32 30 34 30 00 FB 13 F3 07 99 44 |+";:.2040......D|
00000BF0: 58 24 28 52 2C 43 AA 43 31 29 3B 00 03 14 F8 07 |X$(R,C.C1);.....|
00000C00: 82 3A 99 00 09 14 02 08 82 00 0F 14 0C 08 8E 00 |.:..............|
00000C10: 37 14 20 08 8F 20 50 4F 53 4E 20 43 52 53 52 20 |7. .. POSN CRSR |
00000C20: 41 54 20 43 55 52 52 45 4E 54 20 43 45 4C 4C 20 |AT CURRENT CELL |
00000C30: 28 43 52 2C 43 43 29 00 5B 14 2A 08 97 37 38 31 |(CR,CC).[.*..781|
00000C40: 2C 43 52 3A 97 37 38 32 2C 43 43 3A 97 37 38 33 |,CR:.782,CC:.783|
00000C50: 2C 30 3A 9E 36 35 35 32 30 3A 8E 00 7D 14 3E 08 |,0:.65520:..}.>.|
00000C60: 8F 20 54 55 52 4E 20 4F 4E 20 43 52 53 52 20 26 |. TURN ON CRSR &|
00000C70: 20 47 45 54 20 4B 45 59 50 52 45 53 53 00 98 14 | GET KEYPRESS...|
00000C80: 48 08 97 32 30 34 2C 30 3A A1 41 24 3A 8B 41 24 |H..204,0:.A$:.A$|
00000C90: B2 22 22 A7 32 31 32 30 00 A3 14 52 08 97 32 30 |."".2120...R..20|
00000CA0: 35 2C 32 00 B8 14 5C 08 8B 20 C2 28 32 30 37 29 |5,2...\.. .(207)|
00000CB0: B3 B1 30 A7 32 31 34 30 00 C5 14 66 08 97 32 30 |..0.2140...f..20|
00000CC0: 34 2C 31 3A 8E 00 EA 14 84 08 8F 20 50 52 49 4E |4,1:....... PRIN|
00000CD0: 54 20 43 45 4C 4C 20 43 4F 4E 54 45 4E 54 53 20 |T CELL CONTENTS |
00000CE0: 4F 4E 20 4C 49 4E 45 20 32 32 00 07 15 8E 08 81 |ON LINE 22......|
00000CF0: 58 B2 32 32 A4 32 34 3A 97 37 38 31 2C 58 3A 9E |X.22.24:.781,X:.|
00000D00: 35 39 39 30 33 3A 82 00 1E 15 98 08 99 22 1E 22 |59903:......."."|
00000D10: 46 58 24 28 52 30 2C 43 30 29 22 90 22 3B 00 3F |FX$(R0,C0)".";.?|
00000D20: 15 AC 08 8F 20 46 31 2C 46 33 2C 46 35 20 41 43 |.... F1,F3,F5 AC|
00000D30: 43 45 50 54 20 43 45 4C 4C 20 49 4E 50 55 54 00 |CEPT CELL INPUT.|
00000D40: 60 15 B6 08 52 4F B2 43 52 3A 43 4F B2 43 43 3A |`...RO.CR:CO.CC:|
00000D50: 8F 20 53 41 56 45 20 43 52 53 52 20 50 4F 53 4E |. SAVE CRSR POSN|
00000D60: 00 7C 15 C0 08 8D 34 34 34 30 3A 8F 20 43 4C 45 |.|....4440:. CLE|
00000D70: 41 52 20 4D 45 4E 55 20 41 52 45 41 00 A5 15 CA |AR MENU AREA....|
00000D80: 08 43 52 B2 32 30 3A 43 43 B2 30 3A 8D 34 34 38 |.CR.20:CC.0:.448|
00000D90: 30 3A 8F 20 43 52 53 52 20 54 4F 20 4D 45 4E 55 |0:. CRSR TO MENU|
00000DA0: 20 41 52 45 41 00 C7 15 D4 08 91 54 8D 34 37 31 | AREA......T.471|
00000DB0: 30 2C 34 37 32 30 2C 34 37 33 30 3A 8F 20 4D 45 |0,4720,4730:. ME|
00000DC0: 4E 55 20 54 45 58 54 00 06 16 DE 08 4C B2 30 3A |NU TEXT.....L.0:|
00000DD0: 99 46 58 24 28 52 30 2C 43 30 29 3B 3A 43 52 B2 |.FX$(R0,C0);:CR.|
00000DE0: 32 31 3A 43 43 B2 30 3A 8D 32 30 39 30 3A 8F 20 |21:CC.0:.2090:. |
00000DF0: 50 52 49 4E 54 20 43 55 52 52 45 4E 54 20 43 4F |PRINT CURRENT CO|
00000E00: 4E 54 45 4E 54 53 00 1D 16 E8 08 8D 32 31 32 30 |NTENTS......2120|
00000E10: 3A 8F 20 47 45 54 20 41 20 43 48 41 52 00 37 16 |:. GET A CHAR.7.|
00000E20: FC 08 8F 20 46 49 4C 54 45 52 20 45 4E 54 45 52 |... FILTER ENTER|
00000E30: 45 44 20 44 41 54 41 00 51 16 06 09 8B 41 24 B2 |ED DATA.Q....A$.|
00000E40: C7 28 32 30 29 A7 8D 34 35 31 30 3A 89 32 32 38 |.(20)..4510:.228|
00000E50: 30 00 68 16 10 09 8B 41 24 B2 C7 28 31 33 29 AF |0.h....A$..(13).|
00000E60: 4C B2 30 A7 32 34 34 30 00 85 16 1A 09 8B 41 24 |L.0.2440......A$|
00000E70: B2 C7 28 31 33 29 A7 32 34 31 30 3A 8F 20 43 4C |..(13).2410:. CL|
00000E80: 45 41 4E 55 50 00 9B 16 24 09 91 54 89 32 33 35 |EANUP...$..T.235|
00000E90: 30 2C 32 33 37 30 2C 32 33 37 30 00 C5 16 2E 09 |0,2370,2370.....|
00000EA0: 8B 28 41 24 B3 22 30 22 B0 41 24 B1 22 39 22 29 |.(A$."0".A$."9")|
00000EB0: AF 41 24 B3 B1 22 2E 22 AF 41 24 B3 B1 22 2D 22 |.A$..".".A$.."-"|
00000EC0: A7 32 32 38 30 00 EF 16 38 09 8D 34 35 36 30 3A |.2280...8..4560:|
00000ED0: 89 32 32 38 30 3A 8F 20 47 4F 4F 44 20 43 48 41 |.2280:. GOOD CHA|
00000EE0: 52 20 26 20 47 45 54 20 41 4E 4F 54 48 45 52 00 |R & GET ANOTHER.|
00000EF0: 07 17 42 09 8B 41 24 B3 22 21 22 B0 41 24 B1 22 |..B..A$."!".A$."|
00000F00: 5F 22 A7 32 32 38 30 00 31 17 4C 09 8D 34 35 36 |_".2280.1.L..456|
00000F10: 30 3A 89 32 32 38 30 3A 8F 20 47 4F 4F 44 20 43 |0:.2280:. GOOD C|
00000F20: 48 41 52 20 26 20 47 45 54 20 41 4E 4F 54 48 45 |HAR & GET ANOTHE|
00000F30: 52 00 4A 17 60 09 8F 20 43 4C 45 41 4E 55 50 20 |R.J.`.. CLEANUP |
00000F40: 41 46 54 45 52 20 3C 43 52 3E 00 6A 17 6A 09 8D |AFTER <CR>.j.j..|
00000F50: 34 36 30 30 3A 8F 20 47 45 54 20 49 4E 24 20 46 |4600:. GET IN$ F|
00000F60: 52 4F 4D 20 53 43 52 45 45 4E 00 87 17 74 09 91 |ROM SCREEN...t..|
00000F70: 54 AA 31 89 32 34 34 30 2C 32 34 36 30 2C 32 35 |T.1.2440,2460,25|
00000F80: 30 30 2C 32 35 37 30 00 9A 17 7E 09 8F 20 42 4C |00,2570...~.. BL|
00000F90: 41 4E 4B 20 54 59 50 45 3D 30 00 CE 17 88 09 46 |ANK TYPE=0.....F|
00000FA0: 58 24 28 52 30 2C 43 30 29 B2 42 4B 24 3A 44 58 |X$(R0,C0).BK$:DX|
00000FB0: 24 28 52 30 2C 43 30 29 B2 42 4B 24 3A 54 59 28 |$(R0,C0).BK$:TY(|
00000FC0: 52 30 2C 43 30 29 B2 30 3A 89 31 34 39 30 00 E4 |R0,C0).0:.1490..|
00000FD0: 17 92 09 8F 20 56 41 4C 55 45 53 20 54 59 50 45 |.... VALUES TYPE|
00000FE0: 20 3D 20 31 00 14 18 9C 09 46 58 24 28 52 30 2C | = 1.....FX$(R0,|
00000FF0: 43 30 29 B2 49 4E 24 3A 54 59 28 52 30 2C 43 30 |C0).IN$:TY(R0,C0|
00001000: 29 B2 31 3A 46 58 28 52 30 2C 43 30 29 B2 C5 28 |).1:FX(R0,C0)..(|
00001010: 49 4E 24 29 00 30 18 A6 09 44 58 24 28 52 30 2C |IN$).0...DX$(R0,|
00001020: 43 30 29 B2 C8 28 49 4E 24 AA 42 4B 24 2C 38 29 |C0)..(IN$.BK$,8)|
00001030: 00 3A 18 B0 09 89 31 34 39 30 00 5B 18 BA 09 8F |.:....1490.[....|
00001040: 20 46 4F 52 4D 55 4C 41 53 20 54 59 50 45 3D 32 | FORMULAS TYPE=2|
00001050: 20 41 4E 44 20 54 59 50 45 3D 34 00 6B 18 C4 09 | AND TYPE=4.k...|
00001060: 41 24 B2 C8 28 49 4E 24 2C 33 29 00 99 18 C6 09 |A$..(IN$,3).....|
00001070: 8B 28 41 24 B3 B1 22 53 55 4D 22 29 AF 28 41 24 |.(A$.."SUM").(A$|
00001080: B3 B1 22 4D 41 58 22 29 AF 28 41 24 B3 B1 22 4D |.."MAX").(A$.."M|
00001090: 49 4E 22 29 A7 32 35 32 30 00 D4 18 CE 09 46 58 |IN").2520.....FX|
000010A0: 24 28 52 30 2C 43 30 29 B2 49 4E 24 3A 44 58 24 |$(R0,C0).IN$:DX$|
000010B0: 28 52 30 2C 43 30 29 B2 22 30 20 20 20 20 20 20 |(R0,C0)."0 |
000010C0: 20 22 3A 54 59 28 52 30 2C 43 30 29 B2 34 3A 89 | ":TY(R0,C0).4:.|
000010D0: 31 34 39 30 00 09 19 D8 09 46 58 24 28 52 30 2C |1490.....FX$(R0,|
000010E0: 43 30 29 B2 49 4E 24 3A 44 58 24 28 52 30 2C 43 |C0).IN$:DX$(R0,C|
000010F0: 30 29 B2 22 30 20 20 20 20 20 20 20 22 3A 54 59 |0)."0 ":TY|
00001100: 28 52 30 2C 43 30 29 B2 32 00 2F 19 E2 09 8D 34 |(R0,C0).2./....4|
00001110: 33 38 30 3A 8F 20 43 4F 4E 56 45 52 54 20 54 4F |380:. CONVERT TO|
00001120: 20 55 53 41 42 4C 45 20 46 4F 52 4D 55 4C 41 00 | USABLE FORMULA.|
00001130: 42 19 EC 09 46 4D 24 28 52 30 2C 43 30 29 B2 49 |B...FM$(R0,C0).I|
00001140: 4E 24 00 4C 19 F6 09 89 31 34 39 30 00 60 19 00 |N$.L....1490.`..|
00001150: 0A 8F 20 54 45 58 54 20 54 59 50 45 20 3D 20 33 |.. TEXT TYPE = 3|
00001160: 00 8E 19 0A 0A 46 58 24 28 52 30 2C 43 30 29 B2 |.....FX$(R0,C0).|
00001170: 49 4E 24 3A 44 58 24 28 52 30 2C 43 30 29 B2 49 |IN$:DX$(R0,C0).I|
00001180: 4E 24 3A 54 59 28 52 30 2C 43 30 29 B2 33 00 98 |N$:TY(R0,C0).3..|
00001190: 19 14 0A 89 31 34 39 30 00 B3 19 28 0A 8F 20 44 |....1490...(.. D|
000011A0: 49 53 50 4C 41 59 20 48 45 4C 50 20 53 43 52 45 |ISPLAY HELP SCRE|
000011B0: 45 4E 53 00 D6 19 32 0A 9F 31 35 2C 38 2C 31 35 |ENS...2..15,8,15|
000011C0: 3A 9F 32 2C 38 2C 32 2C 22 30 3A 44 53 43 41 4C |:.2,8,2,"0:DSCAL|
000011D0: 43 2E 48 4C 50 22 00 EB 19 3C 0A 84 31 35 2C 45 |C.HLP"...<..15,E|
000011E0: 3A 8B 45 B3 B1 30 A7 32 38 34 35 00 F6 19 46 0A |:.E..0.2845...F.|
000011F0: 99 22 93 90 22 3B 00 0F 1A 50 0A 9E 34 39 31 35 |."..";...P..4915|
00001200: 32 3A 8B 28 53 54 29 AF 36 34 A7 32 36 37 30 00 |2:.(ST).64.2670.|
00001210: 3F 1A 5A 0A 99 3A 99 22 1F 3C 53 50 41 43 45 3E |?.Z..:.".<SPACE>|
00001220: 3D 4E 45 58 54 20 53 43 52 45 45 4E 20 3C 41 4E |=NEXT SCREEN <AN|
00001230: 59 20 4B 45 59 3E 3D 41 42 4F 52 54 90 22 3B 00 |Y KEY>=ABORT.";.|
00001240: 65 1A 64 0A A1 41 24 3A 91 AB 28 41 24 B2 22 22 |e.d..A$:..(A$.""|
00001250: 29 89 32 36 36 30 3A 8B 41 24 B2 C7 28 33 32 29 |).2660:.A$..(32)|
00001260: A7 32 36 33 30 00 70 1A 6E 0A A0 32 3A A0 31 35 |.2630.p.n..2:.15|
00001270: 00 97 1A 78 0A 99 3A 99 22 1C 45 4E 44 20 4F 46 |...x..:.".END OF|
00001280: 20 48 45 4C 50 20 46 49 4C 45 22 3A 8D 33 30 37 | HELP FILE":.307|
00001290: 30 3A 89 31 34 38 30 00 BA 1A 96 0A 8F 20 4C 4F |0:.1480...... LO|
000012A0: 41 44 20 41 20 53 50 52 45 41 44 53 48 45 45 54 |AD A SPREADSHEET|
000012B0: 20 46 52 4F 4D 20 44 49 53 4B 00 DB 1A A0 0A 99 | FROM DISK......|
000012C0: 22 93 12 1C 4C 4F 41 44 20 41 20 53 50 52 45 41 |"...LOAD A SPREA|
000012D0: 44 53 48 45 45 54 92 1F 22 3A 99 00 09 1B AA 0A |DSHEET..":......|
000012E0: 99 22 1C 43 41 55 54 49 4F 4E 21 20 59 4F 55 20 |.".CAUTION! YOU |
000012F0: 57 49 4C 4C 20 4C 4F 53 45 20 43 55 52 52 45 4E |WILL LOSE CURREN|
00001300: 54 20 53 48 45 45 54 2E 22 00 21 1B B4 0A 99 22 |T SHEET.".!...."|
00001310: 43 4F 4E 54 49 4E 55 45 3F 20 28 59 2F 4E 29 90 |CONTINUE? (Y/N).|
00001320: 22 00 35 1B BE 0A A1 41 24 3A 8B 41 24 B2 22 22 |".5....A$:.A$.""|
00001330: A7 32 37 35 30 00 49 1B C8 0A 8B 41 24 B2 22 59 |.2750.I....A$."Y|
00001340: 22 A7 99 3A 89 32 37 38 30 00 53 1B D2 0A 89 31 |"..:.2780.S....1|
00001350: 34 38 30 00 83 1B DC 0A 99 3A 99 22 43 4C 45 41 |480......:."CLEA|
00001360: 52 49 4E 47 20 43 55 52 52 45 4E 54 20 53 48 45 |RING CURRENT SHE|
00001370: 45 54 2E 20 50 4C 45 41 53 45 20 57 41 49 54 2E |ET. PLEASE WAIT.|
00001380: 2E 2E 22 00 97 1B E6 0A 81 52 B2 31 A4 4E 52 3A |.."......R.1.NR:|
00001390: 81 43 B2 31 A4 4E 43 00 A9 1B F0 0A 54 59 28 52 |.C.1.NC.....TY(R|
000013A0: 2C 43 29 B2 30 3A 82 3A 82 00 CB 1B F3 0A 99 22 |,C).0:.:......."|
000013B0: 11 44 4F 20 59 4F 55 20 57 41 4E 54 20 41 20 44 |.DO YOU WANT A D|
000013C0: 49 52 45 43 54 4F 52 59 3F 11 22 00 E7 1B F5 0A |IRECTORY?.".....|
000013D0: A1 41 24 3A 8B 41 24 B2 22 59 22 A7 8D 36 30 30 |.A$:.A$."Y"..600|
000013E0: 30 3A 89 32 38 31 30 00 F9 1B F7 0A 8B 41 24 B3 |0:.2810......A$.|
000013F0: B1 22 4E 22 A7 32 38 30 35 00 14 1C FA 0A 99 3A |."N".2805......:|
00001400: 99 22 1F 45 4E 54 45 52 20 46 49 4C 45 4E 41 4D |.".ENTER FILENAM|
00001410: 45 90 22 3B 00 2D 1C 04 0B 85 46 49 24 3A 8B C3 |E.";.-....FI$:..|
00001420: 28 46 49 24 29 B1 31 36 A7 32 38 32 30 00 4A 1C |(FI$).16.2820.J.|
00001430: 0E 0B 9F 31 35 2C 38 2C 31 35 3A 9F 32 2C 38 2C |...15,8,15:.2,8,|
00001440: 32 2C 22 30 3A 22 AA 46 49 24 00 57 1C 18 0B 84 |2,"0:".FI$.W....|
00001450: 31 35 2C 45 2C 45 24 00 82 1C 1D 0B 8B 45 B3 B1 |15,E,E$......E..|
00001460: 30 A7 A0 32 3A A0 31 35 3A 99 22 1C 12 22 45 2C |0..2:.15:.".."E,|
00001470: 45 24 22 92 90 22 3A 8D 33 30 37 30 3A 89 31 34 |E$"..":.3070:.14|
00001480: 38 30 00 9E 1C 22 0B 84 32 2C 52 2C 43 2C 54 59 |80..."..2,R,C,TY|
00001490: 28 52 2C 43 29 2C 46 58 24 28 52 2C 43 29 00 B0 |(R,C),FX$(R,C)..|
000014A0: 1C 2C 0B 8B 28 53 54 29 AF 36 34 A7 32 38 38 30 |.,..(ST).64.2880|
000014B0: 00 BA 1C 36 0B 89 32 38 35 30 00 C5 1C 40 0B A0 |...6..2850...@..|
000014C0: 32 3A A0 31 35 00 CF 1C 4A 0B 89 33 33 33 30 00 |2:.15...J..3330.|
000014D0: F0 1C 5E 0B 8F 20 53 41 56 45 20 41 20 53 50 52 |..^.. SAVE A SPR|
000014E0: 45 41 44 53 48 45 45 54 20 54 4F 20 44 49 53 4B |EADSHEET TO DISK|
000014F0: 00 11 1D 68 0B 99 22 93 12 1C 53 41 56 45 20 41 |...h.."...SAVE A|
00001500: 20 53 50 52 45 41 44 53 48 45 45 54 92 1F 22 3A | SPREADSHEET..":|
00001510: 99 00 28 1D 72 0B 99 22 45 4E 54 45 52 20 46 49 |..(.r.."ENTER FI|
00001520: 4C 45 4E 41 4D 45 22 3B 00 41 1D 7C 0B 85 46 49 |LENAME";.A.|..FI|
00001530: 24 3A 8B C3 28 46 49 24 29 B1 31 36 A7 32 39 33 |$:..(FI$).16.293|
00001540: 30 00 52 1D 86 0B 8B 46 49 24 B2 22 22 A7 33 30 |0.R....FI$."".30|
00001550: 35 30 00 7D 1D 90 0B 9F 31 35 2C 38 2C 31 35 3A |50.}....15,8,15:|
00001560: 9F 32 2C 38 2C 32 2C 22 30 3A 22 AA 46 49 24 AA |.2,8,2,"0:".FI$.|
00001570: 22 2C 53 2C 57 22 3A 5A 24 B2 22 2C 22 00 9D 1D |",S,W":Z$.","...|
00001580: 9A 0B 84 31 35 2C 45 2C 45 24 3A 8B 45 B3 B1 30 |...15,E,E$:.E..0|
00001590: A7 A0 32 3A A0 31 35 3A 89 35 35 31 30 00 B1 1D |..2:.15:.5510...|
000015A0: A4 0B 81 52 B2 31 A4 4E 52 3A 81 43 B2 31 A4 4E |...R.1.NR:.C.1.N|
000015B0: 43 00 D8 1D AE 0B 8B 54 59 28 52 2C 43 29 B2 30 |C......TY(R,C).0|
000015C0: A7 33 30 33 30 3A 8F 20 53 4B 49 50 20 42 4C 41 |.3030:. SKIP BLA|
000015D0: 4E 4B 20 43 45 4C 4C 53 00 07 1E B8 0B 49 4E 24 |NK CELLS.....IN$|
000015E0: B2 C4 28 52 29 AA 5A 24 AA C4 28 43 29 AA 5A 24 |..(R).Z$..(C).Z$|
000015F0: AA C4 28 54 59 28 52 2C 43 29 29 AA 5A 24 AA 46 |..(TY(R,C)).Z$.F|
00001600: 58 24 28 52 2C 43 29 00 12 1E C2 0B 98 32 2C 49 |X$(R,C)......2,I|
00001610: 4E 24 00 2A 1E CC 0B 84 31 35 2C 45 2C 45 24 3A |N$.*....15,E,E$:|
00001620: 8B 45 B3 B1 30 A7 32 38 34 35 00 32 1E D6 0B 82 |.E..0.2845.2....|
00001630: 3A 82 00 3D 1E E0 0B A0 32 3A A0 31 35 00 47 1E |:..=....2:.15.G.|
00001640: EA 0B 89 31 34 38 30 00 5A 1E F4 0B 8F 20 57 41 |...1480.Z.... WA|
00001650: 49 54 20 52 4F 55 54 49 4E 45 00 79 1E FE 0B 99 |IT ROUTINE.y....|
00001660: 22 11 48 49 54 20 41 20 4B 45 59 20 54 4F 20 43 |".HIT A KEY TO C|
00001670: 4F 4E 54 49 4E 55 45 2E 22 00 8D 1E 08 0C A1 41 |ONTINUE."......A|
00001680: 24 3A 8B 41 24 B2 22 22 A7 33 30 38 30 00 93 1E |$:.A$."".3080...|
00001690: 12 0C 8E 00 B4 1E 3A 0C 8F 20 46 38 20 2D 20 43 |......:.. F8 - C|
000016A0: 41 4C 43 55 4C 41 54 45 20 53 50 52 45 41 44 53 |ALCULATE SPREADS|
000016B0: 48 45 45 54 00 BE 1E 44 0C 8D 34 34 34 30 00 E2 |HEET...D..4440..|
000016C0: 1E 4E 0C 8D 33 35 36 30 3A 8F 20 41 4E 41 4C 59 |.N..3560:. ANALY|
000016D0: 5A 45 20 46 4F 52 4D 55 4C 41 20 4E 45 53 54 49 |ZE FORMULA NESTI|
000016E0: 4E 47 00 F8 1E 58 0C 8B 45 52 B3 B1 30 A7 45 52 |NG...X..ER..0.ER|
000016F0: B2 30 3A 89 31 34 39 30 00 02 1F 62 0C 8D 34 34 |.0:.1490...b..44|
00001700: 34 30 00 23 1F 6C 0C 43 52 B2 32 31 3A 43 43 B2 |40.#.l.CR.21:CC.|
00001710: 30 3A 8D 32 30 39 30 3A 8F 20 50 4F 53 4E 20 43 |0:.2090:. POSN C|
00001720: 52 53 52 00 44 1F 76 0C 99 22 46 4F 52 4D 55 4C |RSR.D.v.."FORMUL|
00001730: 41 53 20 54 4F 20 43 41 4C 43 55 4C 41 54 45 3A |AS TO CALCULATE:|
00001740: 22 3B 54 46 00 69 1F 80 0C 81 49 B2 32 A4 46 4C |";TF.i....I.2.FL|
00001750: 3A 8F 20 46 4F 52 4D 55 4C 41 20 4C 45 56 45 4C |:. FORMULA LEVEL|
00001760: 53 20 54 4F 20 43 41 4C 43 00 85 1F 8A 0C 81 4A |S TO CALC......J|
00001770: B2 31 A4 4E 46 3A 8F 20 23 20 4F 46 20 46 4F 52 |.1.NF:. # OF FOR|
00001780: 4D 55 4C 41 53 00 BB 1F 94 0C 8B 46 4C 28 52 28 |MULAS......FL(R(|
00001790: 4A 29 2C 43 28 4A 29 29 B3 B1 49 A7 33 32 39 30 |J),C(J))..I.3290|
000017A0: 3A 8F 20 4E 45 58 54 20 46 4F 52 4D 55 4C 41 2D |:. NEXT FORMULA-|
000017B0: 57 52 4F 4E 47 20 4C 45 56 45 4C 00 F3 1F 9E 0C |WRONG LEVEL.....|
000017C0: 8B 54 59 28 52 28 4A 29 2C 43 28 4A 29 29 B2 34 |.TY(R(J),C(J)).4|
000017D0: A7 41 24 B2 C8 28 46 58 24 28 52 28 4A 29 2C 43 |.A$..(FX$(R(J),C|
000017E0: 28 4A 29 29 2C 33 29 3A 8D 33 34 39 30 3A 89 33 |(J)),3):.3490:.3|
000017F0: 32 36 30 00 0A 20 A8 0C 49 4E 24 B2 46 4D 24 28 |260.. ..IN$.FM$(|
00001800: 52 28 4A 29 2C 43 28 4A 29 29 00 1A 20 B2 0C 46 |R(J),C(J)).. ..F|
00001810: 58 B2 B7 28 30 29 2C 49 4E 24 00 44 20 BC 0C 44 |X..(0),IN$.D ..D|
00001820: 58 24 28 52 28 4A 29 2C 43 28 4A 29 29 B2 C4 28 |X$(R(J),C(J))..(|
00001830: 46 58 29 3A 46 58 28 52 28 4A 29 2C 43 28 4A 29 |FX):FX(R(J),C(J)|
00001840: 29 B2 46 58 00 6F 20 D0 0C 54 46 B2 54 46 AB 31 |).FX.o ..TF.TF.1|
00001850: 3A 43 52 B2 32 31 3A 43 43 B2 32 33 3A 8D 32 30 |:CR.21:CC.23:.20|
00001860: 39 30 3A 99 22 20 20 20 9D 9D 9D 22 54 46 3B 00 |90:." ..."TF;.|
00001870: 79 20 DA 0C 82 4A 3A 82 49 00 83 20 E4 0C 89 31 |y ...J:.I.. ...1|
00001880: 34 38 30 00 A1 20 F8 0C 8F 20 52 45 2D 47 45 4E |480.. ... RE-GEN|
00001890: 45 52 41 54 45 20 53 50 52 45 41 44 53 48 45 45 |ERATE SPREADSHEE|
000018A0: 54 00 BE 20 02 0D 99 3A 20 99 22 1F 4C 4F 41 44 |T.. ...: .".LOAD|
000018B0: 49 4E 47 20 43 4F 4D 50 4C 45 54 45 2E 22 00 E9 |ING COMPLETE."..|
000018C0: 20 0C 0D 99 22 52 45 2D 47 45 4E 45 52 41 54 49 | ..."RE-GENERATI|
000018D0: 4E 47 20 53 48 45 45 54 2C 20 50 4C 45 41 53 45 |NG SHEET, PLEASE|
000018E0: 20 57 41 49 54 2E 2E 2E 22 00 FD 20 16 0D 81 52 | WAIT...".. ...R|
000018F0: B2 31 A4 4E 52 3A 81 43 B2 31 A4 4E 43 00 25 21 |.1.NR:.C.1.NC.%!|
00001900: 20 0D 91 54 59 28 52 2C 43 29 AA 31 89 33 33 37 | ..TY(R,C).1.337|
00001910: 30 2C 33 33 38 30 2C 33 34 31 30 2C 33 34 33 30 |0,3380,3410,3430|
00001920: 2C 33 34 35 30 00 42 21 2A 0D 89 33 34 36 30 3A |,3450.B!*..3460:|
00001930: 8F 20 53 4B 49 50 20 42 4C 41 4E 4B 20 43 45 4C |. SKIP BLANK CEL|
00001940: 4C 53 00 6C 21 34 0D 44 58 24 28 52 2C 43 29 B2 |LS.l!4.DX$(R,C).|
00001950: 46 58 24 28 52 2C 43 29 3A 46 58 28 52 2C 43 29 |FX$(R,C):FX(R,C)|
00001960: B2 C5 28 46 58 24 28 52 2C 43 29 29 00 76 21 48 |..(FX$(R,C)).v!H|
00001970: 0D 89 33 34 36 30 00 A7 21 52 0D 44 58 24 28 52 |..3460..!R.DX$(R|
00001980: 2C 43 29 B2 22 30 22 3A 49 4E 24 B2 46 58 24 28 |,C)."0":IN$.FX$(|
00001990: 52 2C 43 29 3A 8D 34 33 38 30 3A 46 4D 24 28 52 |R,C):.4380:FM$(R|
000019A0: 2C 43 29 B2 49 4E 24 00 B1 21 5C 0D 89 33 34 36 |,C).IN$..!\..346|
000019B0: 30 00 CC 21 66 0D 44 58 24 28 52 2C 43 29 B2 C8 |0..!f.DX$(R,C)..|
000019C0: 28 46 58 24 28 52 2C 43 29 2C 38 29 00 D6 21 70 |(FX$(R,C),8)..!p|
000019D0: 0D 89 33 34 36 30 00 E7 21 7A 0D 44 58 24 28 52 |..3460..!z.DX$(R|
000019E0: 2C 43 29 B2 22 30 22 00 F5 21 84 0D 82 3A 82 3A |,C)."0"..!...:.:|
000019F0: 89 31 34 36 30 00 16 22 98 0D 8F 20 43 41 4C 43 |.1460.."... CALC|
00001A00: 55 4C 41 54 45 20 53 55 4D 2C 20 4D 41 58 20 41 |ULATE SUM, MAX A|
00001A10: 4E 44 20 4D 49 4E 00 29 22 A2 0D 8B 41 24 B2 22 |ND MIN.)"...A$."|
00001A20: 4D 41 58 22 A7 36 35 30 30 00 3C 22 A7 0D 8B 41 |MAX".6500.<"...A|
00001A30: 24 B2 22 4D 49 4E 22 A7 36 37 30 30 00 63 22 AA |$."MIN".6700.c".|
00001A40: 0D 46 58 B2 30 3A 81 4D B2 52 41 28 4A 29 A4 52 |.FX.0:.M.RA(J).R|
00001A50: 42 28 4A 29 3A 81 4E B2 43 41 28 4A 29 A4 43 42 |B(J):.N.CA(J).CB|
00001A60: 28 4A 29 00 75 22 AC 0D 46 58 B2 46 58 AA 46 58 |(J).u"..FX.FX.FX|
00001A70: 28 4D 2C 4E 29 00 7F 22 B6 0D 82 3A 82 3A 8E 00 |(M,N).."...:.:..|
00001A80: A1 22 CA 0D 8F 20 41 4E 41 4C 59 5A 45 20 46 4F |."... ANALYZE FO|
00001A90: 52 4D 55 4C 41 20 4E 45 53 54 49 4E 47 20 41 4E |RMULA NESTING AN|
00001AA0: 44 00 BF 22 D4 0D 8F 20 44 45 54 45 52 4D 49 4E |D.."... DETERMIN|
00001AB0: 45 20 43 41 4C 43 20 53 45 51 55 45 4E 43 45 00 |E CALC SEQUENCE.|
00001AC0: F6 22 DE 0D 8F 20 49 53 4F 4C 41 54 45 20 46 4F |."... ISOLATE FO|
00001AD0: 52 4D 55 4C 41 20 43 45 4C 4C 53 20 46 52 4F 4D |RMULA CELLS FROM|
00001AE0: 20 56 41 4C 55 45 20 41 4E 44 20 42 4C 41 4E 4B | VALUE AND BLANK|
00001AF0: 20 43 45 4C 4C 53 00 0C 23 E8 0D 45 52 B2 30 3A | CELLS..#..ER.0:|
00001B00: 8F 20 45 52 52 4F 52 20 46 4C 41 47 00 25 23 F2 |. ERROR FLAG.%#.|
00001B10: 0D 4E 46 B2 30 3A 8F 20 23 20 4F 46 20 46 4F 52 |.NF.0:. # OF FOR|
00001B20: 4D 55 4C 41 53 00 4E 23 FC 0D 46 4C B2 30 3A 8F |MULAS.N#..FL.0:.|
00001B30: 20 43 55 52 52 45 4E 54 20 46 4F 52 4D 55 4C 41 | CURRENT FORMULA|
00001B40: 20 4E 45 53 54 49 4E 47 20 4C 45 56 45 4C 00 69 | NESTING LEVEL.i|
00001B50: 23 06 0E 43 52 B2 32 31 3A 43 43 B2 30 3A 8D 32 |#..CR.21:CC.0:.2|
00001B60: 30 39 30 3A 8D 34 38 33 30 00 7D 23 10 0E 81 52 |090:.4830.}#...R|
00001B70: B2 31 A4 4E 52 3A 81 43 B2 31 A4 4E 43 00 AA 23 |.1.NR:.C.1.NC..#|
00001B80: 1A 0E 8B 54 59 28 52 2C 43 29 B2 31 A7 46 4C 28 |...TY(R,C).1.FL(|
00001B90: 52 2C 43 29 B2 31 3A 89 33 36 33 30 3A 8F 20 56 |R,C).1:.3630:. V|
00001BA0: 41 4C 55 45 20 43 45 4C 4C 53 00 E5 23 24 0E 8B |ALUE CELLS..#$..|
00001BB0: 54 59 28 52 2C 43 29 B2 32 B0 54 59 28 52 2C 43 |TY(R,C).2.TY(R,C|
00001BC0: 29 B2 34 A7 4E 46 B2 4E 46 AA 31 3A 52 28 4E 46 |).4.NF.NF.1:R(NF|
00001BD0: 29 B2 52 3A 43 28 4E 46 29 B2 43 3A 46 4C 28 52 |).R:C(NF).C:FL(R|
00001BE0: 2C 43 29 B2 32 00 F3 23 2E 0E 82 3A 82 3A 54 46 |,C).2..#...:.:TF|
00001BF0: B2 4E 46 00 13 24 38 0E 8B 4E 46 B2 30 A7 8E 3A |.NF..$8..NF.0..:|
00001C00: 8F 20 4E 4F 20 46 4F 52 4D 55 4C 41 53 20 46 4F |. NO FORMULAS FO|
00001C10: 55 4E 44 00 29 24 42 0E 8D 34 34 34 30 3A 8D 32 |UND.)$B..4440:.2|
00001C20: 30 39 30 3A 8D 34 38 32 30 00 60 24 56 0E 8F 20 |090:.4820.`$V.. |
00001C30: 46 4C 41 47 20 41 4E 44 20 44 52 4F 50 20 46 4F |FLAG AND DROP FO|
00001C40: 52 4D 55 4C 41 53 20 54 48 41 54 20 4F 4E 4C 59 |RMULAS THAT ONLY|
00001C50: 20 52 45 46 20 56 41 4C 55 45 20 43 45 4C 4C 53 | REF VALUE CELLS|
00001C60: 00 85 24 60 0E 8F 20 45 4E 54 52 59 3A 4E 46 20 |..$`.. ENTRY:NF |
00001C70: 3D 20 54 4F 54 41 4C 20 23 20 4F 46 20 46 4F 52 |= TOTAL # OF FOR|
00001C80: 4D 55 4C 41 53 00 B6 24 6A 0E 8F 20 20 20 20 20 |MULAS..$j.. |
00001C90: 20 20 54 59 28 52 2C 43 29 3D 30 20 46 4F 52 20 | TY(R,C)=0 FOR |
00001CA0: 41 4C 4C 20 54 45 58 54 20 26 20 42 4C 41 4E 4B |ALL TEXT & BLANK|
00001CB0: 20 43 45 4C 4C 53 00 E0 24 74 0E 8F 20 20 20 20 | CELLS..$t.. |
00001CC0: 20 20 20 46 4C 28 52 2C 43 29 3D 31 20 46 4F 52 | FL(R,C)=1 FOR|
00001CD0: 20 41 4C 4C 20 56 41 4C 55 45 20 43 45 4C 4C 53 | ALL VALUE CELLS|
00001CE0: 00 0C 25 7E 0E 8F 20 20 20 20 20 20 20 46 4C 28 |..%~.. FL(|
00001CF0: 52 2C 43 29 3D 32 20 46 4F 52 20 41 4C 4C 20 46 |R,C)=2 FOR ALL F|
00001D00: 4F 52 4D 55 4C 41 20 43 45 4C 4C 53 00 47 25 88 |ORMULA CELLS.G%.|
00001D10: 0E 8F 20 45 58 49 54 3A 20 46 4C 28 52 2C 43 29 |.. EXIT: FL(R,C)|
00001D20: 3E 3D 33 20 46 4F 52 20 41 4C 4C 20 43 45 4C 4C |>=3 FOR ALL CELL|
00001D30: 53 20 43 41 4C 4C 49 4E 47 20 46 4F 52 4D 55 4C |S CALLING FORMUL|
00001D40: 41 20 43 45 4C 4C 53 00 7D 25 92 0E 46 4C B2 32 |A CELLS.}%..FL.2|
00001D50: 3A 4E 28 46 4C 29 B2 4E 46 3A 8F 20 4E 28 46 4C |:N(FL).NF:. N(FL|
00001D60: 29 3D 23 20 4F 46 20 46 4F 52 4D 55 4C 41 53 20 |)=# OF FORMULAS |
00001D70: 41 54 20 45 41 43 48 20 4C 45 56 45 4C 00 B0 25 |AT EACH LEVEL..%|
00001D80: 9C 0E 4E 28 46 4C AA 31 29 B2 30 3A 81 49 B2 31 |..N(FL.1).0:.I.1|
00001D90: A4 4E 28 46 4C 29 3A 41 24 B2 46 58 24 28 52 28 |.N(FL):A$.FX$(R(|
00001DA0: 49 29 2C 43 28 49 29 29 3A 4C B2 C3 28 41 24 29 |I),C(I)):L..(A$)|
00001DB0: 00 CB 25 A6 0E 8B 54 59 28 52 28 49 29 2C 43 28 |..%...TY(R(I),C(|
00001DC0: 49 29 29 B2 34 A7 89 34 30 34 30 00 D6 25 B0 0E |I)).4..4040..%..|
00001DD0: 81 4A B2 31 A4 4C 00 04 26 BA 0E 8B CA 28 41 24 |.J.1.L..&....(A$|
00001DE0: 2C 4A 2C 31 29 B3 B1 22 5B 22 A7 33 38 34 30 3A |,J,1).."[".3840:|
00001DF0: 8F 20 54 52 59 20 4E 45 58 54 20 43 48 41 52 41 |. TRY NEXT CHARA|
00001E00: 43 54 45 52 00 25 26 C4 0E 8D 34 32 37 30 3A 8F |CTER.%&...4270:.|
00001E10: 20 50 41 52 53 45 20 43 45 4C 4C 20 52 45 46 45 | PARSE CELL REFE|
00001E20: 52 45 4E 43 45 00 50 26 CE 0E 8B 45 52 B3 B1 30 |RENCE.P&...ER..0|
00001E30: A7 52 B2 52 28 49 29 3A 43 B2 43 28 49 29 3A 4A |.R.R(I):C.C(I):J|
00001E40: B2 4C 3A 49 B2 4E 28 46 4C 29 3A 89 33 38 34 30 |.L:I.N(FL):.3840|
00001E50: 00 8B 26 D8 0E 8B 54 59 28 52 2C 43 29 B3 B1 30 |..&...TY(R,C)..0|
00001E60: AF 54 59 28 52 2C 43 29 B3 B1 33 A7 33 38 32 30 |.TY(R,C)..3.3820|
00001E70: 3A 8F 20 42 4C 41 4E 4B 2F 54 45 58 54 20 43 45 |:. BLANK/TEXT CE|
00001E80: 4C 4C 20 52 45 46 20 54 45 53 54 00 B8 26 E2 0E |LL REF TEST..&..|
00001E90: 45 52 B2 31 3A 52 B2 52 28 49 29 3A 43 B2 43 28 |ER.1:R.R(I):C.C(|
00001EA0: 49 29 3A 4A B2 C3 28 41 24 29 3A 49 B2 4E 28 46 |I):J..(A$):I.N(F|
00001EB0: 4C 29 3A 89 33 38 34 30 00 FC 26 EC 0E 8B 46 4C |L):.3840..&...FL|
00001EC0: 28 52 2C 43 29 B2 46 4C AB 31 A7 46 4C 28 52 28 |(R,C).FL.1.FL(R(|
00001ED0: 49 29 2C 43 28 49 29 29 B2 46 4C 3A 89 33 38 34 |I),C(I)).FL:.384|
00001EE0: 30 3A 8F 20 43 55 52 52 45 4E 54 20 43 45 4C 4C |0:. CURRENT CELL|
00001EF0: 20 4C 45 56 45 4C 20 49 53 20 4F 4B 00 45 27 F6 | LEVEL IS OK.E'.|
00001F00: 0E 8B 46 4C 28 52 2C 43 29 B1 B2 46 4C A7 46 4C |..FL(R,C)..FL.FL|
00001F10: 28 52 28 49 29 2C 43 28 49 29 29 B2 46 4C AA 31 |(R(I),C(I)).FL.1|
00001F20: 3A 4A B2 4C 3A 4E 28 46 4C AA 31 29 B2 4E 28 46 |:J.L:N(FL.1).N(F|
00001F30: 4C AA 31 29 AA 31 3A 8F 20 4E 45 58 54 20 46 4F |L.1).1:. NEXT FO|
00001F40: 52 4D 55 4C 41 00 4B 27 00 0F 82 00 51 27 0A 0F |RMULA.K'....Q'..|
00001F50: 82 00 6F 27 14 0F 8B 46 4C B2 32 A7 4E 28 46 4C |..o'...FL.2.N(FL|
00001F60: 29 B2 4E 28 46 4C 29 AB 4E 28 46 4C AA 31 29 00 |).N(FL).N(FL.1).|
00001F70: 8F 27 1E 0F 8B 46 4C B1 32 A7 4E 28 46 4C 29 B2 |.'...FL.2.N(FL).|
00001F80: 4E 28 46 4C AB 31 29 AB 4E 28 46 4C AA 31 29 00 |N(FL.1).N(FL.1).|
00001F90: 9F 27 28 0F 8B 45 52 B3 B1 30 A7 33 39 36 30 00 |.'(..ER..0.3960.|
00001FA0: CF 27 32 0F 8B 4E 28 46 4C AA 31 29 B2 30 A7 3A |.'2..N(FL.1).0.:|
00001FB0: 8E 3A 8F 20 43 55 52 52 45 4E 54 20 4C 45 56 45 |.:. CURRENT LEVE|
00001FC0: 4C 20 49 53 20 4C 41 53 54 20 4C 45 56 45 4C 00 |L IS LAST LEVEL.|
00001FD0: 0A 28 3C 0F 8B 46 4C B2 32 AF 4E 28 46 4C 29 B2 |.(<..FL.2.N(FL).|
00001FE0: 30 A7 45 52 B2 32 3A 89 33 39 36 30 3A 8F 20 4E |0.ER.2:.3960:. N|
00001FF0: 4F 20 52 45 46 20 54 4F 20 56 41 4C 55 45 20 43 |O REF TO VALUE C|
00002000: 45 4C 4C 53 20 45 52 52 4F 52 00 3E 28 46 0F 8B |ELLS ERROR.>(F..|
00002010: 4E 28 46 4C 29 B2 4E 28 46 4C AB 31 29 A7 45 52 |N(FL).N(FL.1).ER|
00002020: B2 33 3A 89 33 39 36 30 3A 8F 20 49 4E 46 49 4E |.3:.3960:. INFIN|
00002030: 49 54 45 20 4C 4F 4F 50 20 45 52 52 4F 52 00 74 |ITE LOOP ERROR.t|
00002040: 28 50 0F 46 4C B2 46 4C AA 31 3A 8B 46 4C B2 32 |(P.FL.FL.1:.FL.2|
00002050: 31 A7 45 52 B2 34 3A 89 33 39 36 30 3A 8F 20 45 |1.ER.4:.3960:. E|
00002060: 58 43 45 53 53 49 56 45 20 4C 4F 4F 50 53 20 45 |XCESSIVE LOOPS E|
00002070: 52 52 4F 52 00 7E 28 5A 0F 89 33 37 34 30 00 A1 |RROR.~(Z..3740..|
00002080: 28 6E 0F 8F 20 48 41 4E 44 4C 45 20 43 45 4C 4C |(n.. HANDLE CELL|
00002090: 20 52 45 46 45 52 45 4E 43 45 20 45 52 52 4F 52 | REFERENCE ERROR|
000020A0: 53 00 B8 28 78 0F 8D 34 34 34 30 3A 8F 20 43 4C |S..(x..4440:. CL|
000020B0: 45 41 52 20 4D 45 4E 55 00 DC 28 82 0F 52 4F B2 |EAR MENU..(..RO.|
000020C0: 43 52 3A 43 4F B2 43 43 3A 8D 34 34 38 30 3A 8F |CR:CO.CC:.4480:.|
000020D0: 20 4D 4F 56 45 20 43 55 52 53 4F 52 00 FD 28 8C | MOVE CURSOR..(.|
000020E0: 0F 91 45 52 8D 34 37 34 30 2C 34 37 36 30 2C 34 |..ER.4740,4760,4|
000020F0: 37 38 30 2C 34 38 30 30 2C 34 38 34 30 00 11 29 |780,4800,4840..)|
00002100: 96 0F A1 41 24 3A 8B 41 24 B2 22 22 A7 33 39 39 |...A$:.A$."".399|
00002110: 30 00 17 29 A0 0F 8E 00 50 29 BE 0F 8F 20 50 41 |0..)....P)... PA|
00002120: 52 53 45 20 53 55 4D 2C 20 4D 41 58 20 41 4E 44 |RSE SUM, MAX AND|
00002130: 20 4D 49 4E 3B 20 45 58 54 52 41 43 54 20 20 20 | MIN; EXTRACT |
00002140: 20 20 20 20 20 20 43 45 4C 4C 20 52 41 4E 47 45 | CELL RANGE|
00002150: 00 60 29 C8 0F 8B 4C B3 B1 31 35 A7 34 31 32 30 |.`)...L..15.4120|
00002160: 00 91 29 D2 0F 42 24 B2 CA 28 41 24 2C 34 2C 32 |..)..B$..(A$,4,2|
00002170: 29 AA CA 28 41 24 2C 38 2C 31 29 AA CA 28 41 24 |)..(A$,8,1)..(A$|
00002180: 2C 31 31 2C 31 29 AA CA 28 41 24 2C 31 34 2C 31 |,11,1)..(A$,14,1|
00002190: 29 00 C6 29 DC 0F 58 31 B2 C5 28 CA 28 41 24 2C |)..)..X1..(.(A$,|
000021A0: 36 2C 32 29 29 3A 58 32 B2 C5 28 CA 28 41 24 2C |6,2)):X2..(.(A$,|
000021B0: 39 2C 32 29 29 3A 58 33 B2 C5 28 CA 28 41 24 2C |9,2)):X3..(.(A$,|
000021C0: 31 32 2C 32 29 29 00 DF 29 E6 0F 8B 58 31 B2 30 |12,2))..)...X1.0|
000021D0: B0 58 32 B2 30 B0 58 33 B2 30 A7 34 31 32 30 00 |.X2.0.X3.0.4120.|
000021E0: F4 29 F0 0F 8B 42 24 B2 22 5B 43 52 2D 5D 22 A7 |.)...B$."[CR-]".|
000021F0: 34 31 33 30 00 09 2A FA 0F 8B 42 24 B2 22 5B 43 |4130..*...B$."[C|
00002200: 2D 52 5D 22 A7 34 31 34 30 00 1E 2A 04 10 8B 42 |-R]".4140..*...B|
00002210: 24 B2 22 5B 52 43 2D 5D 22 A7 34 31 35 30 00 33 |$."[RC-]".4150.3|
00002220: 2A 0E 10 8B 42 24 B2 22 5B 52 2D 43 5D 22 A7 34 |*...B$."[R-C]".4|
00002230: 31 36 30 00 67 2A 18 10 45 52 B2 35 3A 52 B2 52 |160.g*..ER.5:R.R|
00002240: 28 49 29 3A 43 B2 43 28 49 29 3A 49 B2 4E 28 46 |(I):C.C(I):I.N(F|
00002250: 4C 29 3A 89 33 38 35 30 3A 8F 20 53 59 4E 54 41 |L):.3850:. SYNTA|
00002260: 58 20 45 52 52 4F 52 00 95 2A 22 10 52 41 28 49 |X ERROR..*".RA(I|
00002270: 29 B2 58 32 3A 52 42 28 49 29 B2 58 33 3A 43 41 |).X2:RB(I).X3:CA|
00002280: 28 49 29 B2 58 31 3A 43 42 28 49 29 B2 58 31 3A |(I).X1:CB(I).X1:|
00002290: 89 34 31 37 30 00 C3 2A 2C 10 52 41 28 49 29 B2 |.4170..*,.RA(I).|
000022A0: 58 33 3A 52 42 28 49 29 B2 58 33 3A 43 41 28 49 |X3:RB(I).X3:CA(I|
000022B0: 29 B2 58 31 3A 43 42 28 49 29 B2 58 32 3A 89 34 |).X1:CB(I).X2:.4|
000022C0: 31 37 30 00 F1 2A 36 10 52 41 28 49 29 B2 58 31 |170..*6.RA(I).X1|
000022D0: 3A 52 42 28 49 29 B2 58 31 3A 43 41 28 49 29 B2 |:RB(I).X1:CA(I).|
000022E0: 58 32 3A 43 42 28 49 29 B2 58 33 3A 89 34 31 37 |X2:CB(I).X3:.417|
000022F0: 30 00 1F 2B 40 10 52 41 28 49 29 B2 58 31 3A 52 |0..+@.RA(I).X1:R|
00002300: 42 28 49 29 B2 58 32 3A 43 41 28 49 29 B2 58 33 |B(I).X2:CA(I).X3|
00002310: 3A 43 42 28 49 29 B2 58 33 3A 89 34 31 37 30 00 |:CB(I).X3:.4170.|
00002320: 41 2B 4A 10 81 4D B2 52 41 28 49 29 A4 52 42 28 |A+J..M.RA(I).RB(|
00002330: 49 29 3A 81 4E B2 43 41 28 49 29 A4 43 42 28 49 |I):.N.CA(I).CB(I|
00002340: 29 00 62 2B 54 10 8B 54 59 28 4D 2C 4E 29 B3 B1 |).b+T..TY(M,N)..|
00002350: 30 A7 8B 54 59 28 4D 2C 4E 29 B3 B1 33 A7 34 32 |0..TY(M,N)..3.42|
00002360: 30 30 00 97 2B 5E 10 45 52 B2 35 3A 4D B2 52 42 |00..+^.ER.5:M.RB|
00002370: 28 49 29 3A 4E B2 43 42 28 49 29 3A 52 B2 52 28 |(I):N.CB(I):R.R(|
00002380: 49 29 3A 43 B2 43 28 49 29 3A 49 B2 4E 28 46 4C |I):C.C(I):I.N(FL|
00002390: 29 3A 89 34 32 33 30 00 C0 2B 68 10 8B 46 4C 28 |):.4230..+h..FL(|
000023A0: 4D 2C 4E 29 B2 46 4C AB 31 A7 46 4C 28 52 28 49 |M,N).FL.1.FL(R(I|
000023B0: 29 2C 43 28 49 29 29 B2 46 4C 3A 89 34 32 33 30 |),C(I)).FL:.4230|
000023C0: 00 D5 2B 72 10 8B 46 4C 28 4D 2C 4E 29 B3 46 4C |..+r..FL(M,N).FL|
000023D0: A7 34 32 33 30 00 14 2C 7C 10 46 4C 28 52 28 49 |.4230..,|.FL(R(I|
000023E0: 29 2C 43 28 49 29 29 B2 46 4C AA 31 3A 4D B2 52 |),C(I)).FL.1:M.R|
000023F0: 42 28 49 29 3A 4E B2 43 42 28 49 29 3A 4E 28 46 |B(I):N.CB(I):N(F|
00002400: 4C AA 31 29 B2 4E 28 46 4C AA 31 29 AA 31 3A 89 |L.1).N(FL.1).1:.|
00002410: 34 32 33 30 00 1C 2C 86 10 82 3A 82 00 26 2C 90 |4230..,...:..&,.|
00002420: 10 89 33 38 35 30 00 53 2C A4 10 8F 20 45 58 54 |..3850.S,... EXT|
00002430: 52 41 43 54 20 43 45 4C 4C 20 52 45 46 45 52 45 |RACT CELL REFERE|
00002440: 4E 43 45 53 20 26 20 43 48 45 43 4B 20 53 59 4E |NCES & CHECK SYN|
00002450: 54 41 58 00 7C 2C AE 10 42 24 B2 CA 28 41 24 2C |TAX.|,..B$..(A$,|
00002460: 4A 2C 32 29 AA CA 28 41 24 2C 4A AA 34 2C 31 29 |J,2)..(A$,J.4,1)|
00002470: AA CA 28 41 24 2C 4A AA 37 2C 31 29 00 A4 2C B8 |..(A$,J.7,1)..,.|
00002480: 10 58 31 B2 C5 28 CA 28 41 24 2C 4A AA 32 2C 32 |.X1..(.(A$,J.2,2|
00002490: 29 29 3A 58 32 B2 C5 28 CA 28 41 24 2C 4A AA 35 |)):X2..(.(A$,J.5|
000024A0: 2C 32 29 29 00 BA 2C C2 10 8B 58 31 B2 30 B0 58 |,2))..,...X1.0.X|
000024B0: 32 B2 30 A7 45 52 B2 35 3A 8E 00 CE 2C CC 10 8B |2.0.ER.5:...,...|
000024C0: 42 24 B2 22 5B 52 43 5D 22 A7 34 33 33 30 00 E2 |B$."[RC]".4330..|
000024D0: 2C D6 10 8B 42 24 B2 22 5B 43 52 5D 22 A7 34 33 |,...B$."[CR]".43|
000024E0: 34 30 00 ED 2C E0 10 45 52 B2 35 3A 8E 00 FD 2C |40..,..ER.5:...,|
000024F0: EA 10 52 B2 58 31 3A 43 B2 58 32 3A 8E 00 0D 2D |..R.X1:C.X2:...-|
00002500: F4 10 52 B2 58 32 3A 43 B2 58 31 3A 8E 00 2E 2D |..R.X2:C.X1:...-|
00002510: 08 11 8F 20 43 4F 4E 56 45 52 54 20 45 4E 54 45 |... CONVERT ENTE|
00002520: 52 45 44 20 46 4F 52 4D 55 4C 41 20 54 4F 00 4B |RED FORMULA TO.K|
00002530: 2D 12 11 8F 20 4D 41 43 48 49 4E 45 20 55 53 41 |-... MACHINE USA|
00002540: 42 4C 45 20 46 4F 52 4D 55 4C 41 00 62 2D 1C 11 |BLE FORMULA.b-..|
00002550: 81 49 B2 31 A4 C3 28 49 4E 24 29 3A 49 31 24 B2 |.I.1..(IN$):I1$.|
00002560: 22 22 00 7B 2D 26 11 8B CA 28 49 4E 24 2C 49 2C |"".{-&...(IN$,I,|
00002570: 31 29 B3 B1 22 5B 22 A7 82 3A 8E 00 C1 2D 30 11 |1).."["..:...-0.|
00002580: 49 4E 24 B2 C8 28 49 4E 24 2C 49 AB 31 29 AA 22 |IN$..(IN$,I.1)."|
00002590: 46 58 28 22 AA CA 28 49 4E 24 2C 49 AA 32 2C 32 |FX("..(IN$,I.2,2|
000025A0: 29 AA 22 2C 22 AA CA 28 49 4E 24 2C 49 AA 35 2C |).","..(IN$,I.5,|
000025B0: 32 29 AA 22 29 22 AA CA 28 49 4E 24 2C 49 AA 38 |2).")"..(IN$,I.8|
000025C0: 29 00 C9 2D 3A 11 82 3A 8E 00 DD 2D 4E 11 8F 20 |)..-:..:...-N.. |
000025D0: 43 4C 52 20 4D 45 4E 55 20 41 52 45 41 00 FA 2D |CLR MENU AREA..-|
000025E0: 58 11 81 58 B2 32 30 A4 32 34 3A 97 37 38 31 2C |X..X.20.24:.781,|
000025F0: 58 3A 9E 35 39 39 30 33 3A 82 00 00 2E 62 11 8E |X:.59903:....b..|
00002600: 00 23 2E 76 11 8F 20 50 4F 53 4E 20 43 52 53 52 |.#.v.. POSN CRSR|
00002610: 20 41 54 20 43 52 2C 43 43 20 28 52 4F 57 2C 43 | AT CR,CC (ROW,C|
00002620: 4F 4C 29 00 47 2E 80 11 97 37 38 31 2C 43 52 3A |OL).G....781,CR:|
00002630: 97 37 38 32 2C 43 43 3A 97 37 38 33 2C 30 3A 9E |.782,CC:.783,0:.|
00002640: 36 35 35 32 30 3A 8E 00 5B 2E 94 11 8F 20 48 41 |65520:..[.... HA|
00002650: 4E 44 4C 45 20 44 45 4C 45 54 45 00 74 2E 9E 11 |NDLE DELETE.t...|
00002660: 8B 4C B2 31 A7 99 22 9D 20 9D 22 3B 3A 4C B2 4C |.L.1..". .";:L.L|
00002670: AB 31 3A 8E 00 90 2E A8 11 8B 4C B3 4D 4C AB 31 |.1:.......L.ML.1|
00002680: A7 99 22 9D 20 9D 22 3B 3A 4C B2 4C AB 31 3A 8E |..". .";:L.L.1:.|
00002690: 00 AB 2E B2 11 8B 4C B2 4D 4C AB 31 A7 99 22 20 |......L.ML.1.." |
000026A0: 9D 22 3B 3A 4C B2 4C AB 31 3A 8E 00 C7 2E C6 11 |.";:L.L.1:......|
000026B0: 8F 20 48 41 4E 44 4C 45 20 47 4F 4F 44 20 43 48 |. HANDLE GOOD CH|
000026C0: 41 52 41 43 54 45 52 00 E0 2E D0 11 8B 4C B3 4D |ARACTER......L.M|
000026D0: 4C AB 31 A7 4C B2 4C AA 31 3A 99 41 24 3B 3A 8E |L.1.L.L.1:.A$;:.|
000026E0: 00 F6 2E DA 11 8B 4C B2 4D 4C AB 31 A7 99 41 24 |......L.ML.1..A$|
000026F0: 22 9D 22 3B 3A 8E 00 10 2F EE 11 8F 20 47 45 54 |".";:.../... GET|
00002700: 20 49 4E 24 20 46 52 4F 4D 20 53 43 52 45 45 4E | IN$ FROM SCREEN|
00002710: 00 31 2F F8 11 43 52 B2 32 31 3A 43 43 B2 30 3A |.1/..CR.21:CC.0:|
00002720: 8D 32 30 39 30 3A 9F 31 2C 33 3A 49 4E 24 B2 22 |.2090:.1,3:IN$."|
00002730: 22 00 3C 2F 02 12 81 49 B2 30 A4 4C 00 58 2F 0C |".</...I.0.L.X/.|
00002740: 12 A1 23 31 2C 41 24 3A 49 4E 24 B2 49 4E 24 AA |..#1,A$:IN$.IN$.|
00002750: 41 24 3A 41 24 B2 22 22 00 5E 2F 16 12 82 00 67 |A$:A$."".^/....g|
00002760: 2F 20 12 A0 31 3A 8E 00 7C 2F 48 12 8F 20 4D 45 |/ ..1:..|/H.. ME|
00002770: 4E 55 20 41 52 45 41 20 54 45 58 54 00 B5 2F 52 |NU AREA TEXT../R|
00002780: 12 99 22 1F 12 46 31 92 4E 55 4D 53 20 12 46 33 |.."..F1.NUMS .F3|
00002790: 92 46 4F 52 4D 55 4C 41 20 12 46 35 92 41 4C 50 |.FORMULA .F5.ALP|
000027A0: 48 41 20 12 46 37 92 48 45 4C 50 20 12 50 92 50 |HA .F7.HELP .P.P|
000027B0: 52 49 4E 54 22 00 E9 2F 5C 12 99 22 12 46 32 92 |RINT"../\..".F2.|
000027C0: 4C 4F 41 44 20 12 46 34 92 53 41 56 45 20 20 20 |LOAD .F4.SAVE |
000027D0: 20 12 46 36 92 52 45 43 41 4C 43 12 46 38 92 51 | .F6.RECALC.F8.Q|
000027E0: 55 49 54 20 20 90 22 3A 8E 00 10 30 66 12 99 22 |UIT .":...0f.."|
000027F0: 12 1F 45 4E 54 45 52 20 4E 55 4D 45 52 49 43 20 |..ENTER NUMERIC |
00002800: 56 41 4C 55 45 53 90 92 22 3A 4D 4C B2 38 3A 8E |VALUES..":ML.8:.|
00002810: 00 31 30 70 12 99 22 12 1F 45 4E 54 45 52 20 46 |.10p.."..ENTER F|
00002820: 4F 52 4D 55 4C 41 92 90 22 3A 4D 4C B2 37 39 3A |ORMULA..":ML.79:|
00002830: 8E 00 5B 30 7A 12 99 22 12 1F 45 4E 54 45 52 20 |..[0z.."..ENTER |
00002840: 41 4C 50 48 41 4E 55 4D 45 52 49 43 20 54 45 58 |ALPHANUMERIC TEX|
00002850: 54 92 90 22 3A 4D 4C B2 38 3A 8E 00 87 30 84 12 |T..":ML.8:...0..|
00002860: 99 22 1C 12 42 4C 41 4E 4B 2F 54 45 58 54 20 43 |."..BLANK/TEXT C|
00002870: 45 4C 4C 20 52 45 46 45 52 45 4E 43 45 92 1F 20 |ELL REFERENCE.. |
00002880: 52 22 52 22 43 22 43 00 A1 30 8E 12 99 22 1E 50 |R"R"C"C..0...".P|
00002890: 52 45 53 53 20 41 4E 59 20 4B 45 59 90 22 3B 3A |RESS ANY KEY.";:|
000028A0: 8E 00 CD 30 98 12 99 22 1C 12 4E 4F 20 52 45 46 |...0..."..NO REF|
000028B0: 45 52 45 4E 43 45 20 54 4F 20 56 41 4C 55 45 20 |ERENCE TO VALUE |
000028C0: 43 45 4C 4C 20 45 52 52 4F 52 92 1E 22 00 FB 30 |CELL ERROR.."..0|
000028D0: AC 12 99 22 1C 12 49 4E 46 49 4E 49 54 45 20 4C |..."..INFINITE L|
000028E0: 4F 4F 50 20 43 45 4C 4C 20 52 45 46 45 52 45 4E |OOP CELL REFEREN|
000028F0: 43 45 20 45 52 52 4F 52 92 1E 22 00 14 31 B6 12 |CE ERROR.."..1..|
00002900: 99 22 50 52 45 53 53 20 41 4E 59 20 4B 45 59 90 |."PRESS ANY KEY.|
00002910: 22 3B 3A 8E 00 3F 31 C0 12 99 22 1C 12 4E 45 53 |";:..?1..."..NES|
00002920: 54 49 4E 47 20 45 58 43 45 45 44 53 20 32 30 20 |TING EXCEEDS 20 |
00002930: 4C 45 56 45 4C 53 20 45 52 52 4F 52 92 1E 22 00 |LEVELS ERROR..".|
00002940: 67 31 D4 12 99 22 1F 43 48 45 43 4B 49 4E 47 20 |g1...".CHECKING |
00002950: 46 4F 52 4D 55 4C 41 20 4E 45 53 54 49 4E 47 2E |FORMULA NESTING.|
00002960: 2E 2E 90 22 3B 3A 8E 00 88 31 DE 12 99 22 1F 53 |...";:...1...".S|
00002970: 43 41 4E 4E 49 4E 47 20 46 4F 52 4D 55 4C 41 53 |CANNING FORMULAS|
00002980: 2E 2E 2E 90 22 3B 3A 8E 00 B8 31 E8 12 99 22 1C |....";:...1...".|
00002990: 12 53 59 4E 54 41 58 20 45 52 52 4F 52 20 49 4E |.SYNTAX ERROR IN|
000029A0: 20 43 45 4C 4C 92 1F 20 52 22 52 22 43 22 43 22 | CELL.. R"R"C"C"|
000029B0: 1E 22 3A 89 34 37 39 30 00 04 32 FC 12 8F 20 2A |.":.4790..2... *|
000029C0: 44 41 54 41 20 4C 4F 41 44 45 52 20 46 4F 52 20 |DATA LOADER FOR |
000029D0: 22 45 58 50 45 56 41 4C 22 20 20 20 20 20 20 20 |"EXPEVAL" |
000029E0: 20 20 20 20 20 20 20 44 59 4E 41 4D 49 43 20 45 | DYNAMIC E|
000029F0: 58 50 52 45 53 53 49 4F 4E 20 45 56 41 4C 55 41 |XPRESSION EVALUA|
00002A00: 54 49 4F 4E 00 1A 32 06 13 8F 20 42 59 20 43 48 |TION..2... BY CH|
00002A10: 52 49 53 20 5A 41 4D 41 52 41 00 3B 32 10 13 8F |RIS ZAMARA.;2...|
00002A20: 20 54 52 41 4E 53 41 43 54 4F 52 20 56 4F 4C 20 | TRANSACTOR VOL |
00002A30: 35 2C 20 49 53 53 55 45 20 30 34 00 4F 32 42 13 |5, ISSUE 04.O2B.|
00002A40: 43 53 B2 30 3A 8F 20 43 48 45 43 4B 53 55 4D 00 |CS.0:. CHECKSUM.|
00002A50: 6B 32 4C 13 4F 53 B2 34 39 31 39 35 3A 8F 20 4F |k2L.OS.49195:. O|
00002A60: 42 4A 45 43 54 20 53 54 41 52 54 00 83 32 60 13 |BJECT START..2`.|
00002A70: 81 52 44 B2 30 A4 31 3A 8F 20 44 41 54 41 20 4C |.RD.0.1:. DATA L|
00002A80: 4F 4F 50 00 8A 32 6A 13 87 42 00 AA 32 74 13 8B |OOP..2j..B..2t..|
00002A90: 42 B2 B1 30 A7 97 4F 53 2C 42 3A 4F 53 B2 4F 53 |B..0..OS,B:OS.OS|
00002AA0: AA 31 3A 43 53 B2 43 53 AA 42 00 C4 32 7E 13 52 |.1:CS.CS.B..2~.R|
00002AB0: 44 B2 AB 28 42 B3 30 29 3A 8F 20 55 4E 54 49 4C |D..(B.0):. UNTIL|
00002AC0: 20 42 3C 30 00 CC 32 88 13 82 52 44 00 F7 32 9C | B<0..2...RD..2.|
00002AD0: 13 8B 43 53 B3 B1 31 30 39 32 38 20 A7 20 99 22 |..CS..10928 . ."|
00002AE0: 2A 2A 2A 43 48 45 43 4B 53 55 4D 20 45 52 52 4F |***CHECKSUM ERRO|
00002AF0: 52 2A 2A 2A 22 3A 80 00 0D 33 B0 13 97 20 37 38 |R***":...3... 78|
00002B00: 35 2C 34 33 3A 97 37 38 36 2C 31 39 32 00 29 33 |5,43:.786,192.)3|
00002B10: BA 13 8F 20 20 2A 2A 43 41 4C 4C 20 45 58 50 45 |... **CALL EXPE|
00002B20: 56 41 4C 20 57 49 54 48 3A 00 49 33 C4 13 8F 20 |VAL WITH:.I3... |
00002B30: 20 27 55 53 52 28 30 29 2C 53 54 52 49 4E 47 20 | 'USR(0),STRING |
00002B40: 56 41 52 49 41 42 4C 45 27 00 4F 33 D8 13 8E 00 |VARIABLE'.O3....|
00002B50: 6A 33 E2 13 83 33 32 2C 32 35 33 2C 31 37 34 2C |j3...32,253,174,|
00002B60: 33 32 2C 31 35 38 2C 31 37 33 00 84 33 EC 13 83 |32,158,173..3...|
00002B70: 33 32 2C 31 34 33 2C 31 37 33 2C 31 36 30 2C 30 |32,143,173,160,0|
00002B80: 2C 31 37 37 00 A1 33 F6 13 83 31 30 30 2C 31 37 |,177..3...100,17|
00002B90: 30 2C 32 30 30 2C 31 37 37 2C 31 30 30 2C 31 33 |0,200,177,100,13|
00002BA0: 33 00 BE 33 00 14 83 32 35 31 2C 32 30 30 2C 31 |3..3...251,200,1|
00002BB0: 37 37 2C 31 30 30 2C 31 33 33 2C 32 35 32 00 D6 |77,100,133,252..|
00002BC0: 33 0A 14 83 20 31 36 30 2C 30 2C 31 38 35 2C 30 |3... 160,0,185,0|
00002BD0: 2C 32 2C 31 35 33 00 EF 33 14 14 83 20 36 30 2C |,2,153..3... 60,|
00002BE0: 33 2C 31 37 37 2C 32 35 31 2C 31 35 33 2C 30 00 |3,177,251,153,0.|
00002BF0: 09 34 1E 14 83 32 2C 32 30 30 2C 31 39 32 2C 38 |.4...2,200,192,8|
00002C00: 30 2C 32 30 38 2C 32 34 30 00 20 34 28 14 83 31 |0,208,240. 4(..1|
00002C10: 36 39 2C 30 2C 31 35 37 2C 30 2C 32 2C 31 36 35 |69,0,157,0,2,165|
00002C20: 00 3B 34 32 14 83 31 32 32 2C 37 32 2C 31 36 35 |.;42..122,72,165|
00002C30: 2C 31 32 33 2C 37 32 2C 31 36 39 00 54 34 3C 14 |,123,72,169.T4<.|
00002C40: 83 30 2C 31 33 33 2C 31 32 32 2C 31 36 39 2C 32 |.0,133,122,169,2|
00002C50: 2C 31 33 33 00 6E 34 46 14 83 31 32 33 2C 33 32 |,133.n4F..123,32|
00002C60: 2C 31 32 31 2C 31 36 35 2C 31 36 39 2C 30 00 89 |,121,165,169,0..|
00002C70: 34 50 14 83 31 33 33 2C 31 32 32 2C 31 36 39 2C |4P..133,122,169,|
00002C80: 32 2C 31 33 33 2C 31 32 33 00 A5 34 5A 14 83 33 |2,133,123..4Z..3|
00002C90: 32 2C 31 35 38 2C 31 37 33 2C 31 30 34 2C 31 33 |2,158,173,104,13|
00002CA0: 33 2C 31 32 33 00 C1 34 64 14 83 31 30 34 2C 31 |3,123..4d..104,1|
00002CB0: 33 33 2C 31 32 32 2C 31 36 32 2C 37 39 2C 31 38 |33,122,162,79,18|
00002CC0: 39 00 D7 34 6E 14 83 36 30 2C 33 2C 31 35 37 2C |9..4n..60,3,157,|
00002CD0: 30 2C 32 2C 32 30 32 00 E9 34 78 14 83 31 36 2C |0,2,202..4x..16,|
00002CE0: 32 34 37 2C 39 36 2C 2D 31 00 FF 34 8C 14 8F 20 |247,96,-1..4... |
00002CF0: 53 45 51 20 46 49 4C 45 20 52 45 41 44 45 52 00 |SEQ FILE READER.|
00002D00: 24 35 96 14 81 41 44 B2 34 39 31 35 32 A4 34 39 |$5...AD.49152.49|
00002D10: 31 39 34 3A 87 44 41 3A 97 41 44 2C 44 41 3A 82 |194:.DA:.AD,DA:.|
00002D20: 41 44 3A 8E 00 3F 35 A0 14 83 31 36 39 2C 31 34 |AD:..?5...169,14|
00002D30: 2C 33 32 2C 32 31 30 2C 32 35 35 2C 31 36 30 00 |,32,210,255,160.|
00002D40: 57 35 AA 14 83 30 2C 31 36 32 2C 32 2C 33 32 2C |W5...0,162,2,32,|
00002D50: 31 39 38 2C 32 35 35 00 72 35 B4 14 83 33 32 2C |198,255.r5...32,|
00002D60: 32 30 37 2C 32 35 35 2C 31 34 31 2C 34 32 2C 31 |207,255,141,42,1|
00002D70: 39 32 00 8D 35 BE 14 83 33 32 2C 31 38 33 2C 32 |92..5...32,183,2|
00002D80: 35 35 2C 32 30 38 2C 31 35 2C 31 37 33 00 A8 35 |55,208,15,173..5|
00002D90: C8 14 83 34 32 2C 31 39 32 2C 33 32 2C 32 31 30 |...42,192,32,210|
00002DA0: 2C 32 35 35 2C 32 30 31 00 C3 35 D2 14 83 31 33 |,255,201..5...13|
00002DB0: 2C 32 30 38 2C 32 33 35 2C 32 30 30 2C 31 39 32 |,208,235,200,192|
00002DC0: 2C 32 31 00 DE 35 DC 14 83 32 30 38 2C 32 33 30 |,21..5...208,230|
00002DD0: 2C 33 32 2C 32 30 34 2C 32 35 35 2C 39 36 00 F8 |,32,204,255,96..|
00002DE0: 35 E6 14 83 31 33 2C 33 32 2C 32 35 33 2C 31 37 |5...13,32,253,17|
00002DF0: 34 2C 33 32 2C 31 35 38 00 0F 36 18 15 8F 20 51 |4,32,158..6... Q|
00002E00: 55 49 54 20 4D 45 4E 55 20 4F 50 54 49 4F 4E 00 |UIT MENU OPTION.|
00002E10: 3E 36 22 15 99 22 93 1C 41 52 45 20 59 4F 55 20 |>6".."..ARE YOU |
00002E20: 53 55 52 45 20 59 4F 55 20 57 41 4E 54 20 54 4F |SURE YOU WANT TO|
00002E30: 20 51 55 49 54 20 28 59 2F 4E 29 3F 1F 22 00 5D | QUIT (Y/N)?.".]|
00002E40: 36 2C 15 A1 41 24 3A 8B 41 24 B2 22 59 22 A7 99 |6,..A$:.A$."Y"..|
00002E50: 22 11 47 4F 4F 44 42 59 45 21 22 3A 80 00 6F 36 |".GOODBYE!":..o6|
00002E60: 36 15 8B 41 24 B3 B1 22 4E 22 A7 35 34 32 30 00 |6..A$.."N".5420.|
00002E70: 79 36 40 15 89 31 34 38 30 00 98 36 7C 15 8F 20 |y6@..1480..6|.. |
00002E80: 45 52 52 4F 52 20 4F 4E 20 57 52 49 54 45 20 46 |ERROR ON WRITE F|
00002E90: 49 4C 45 20 4F 50 45 4E 00 BD 36 86 15 8B 45 B3 |ILE OPEN..6...E.|
00002EA0: B1 36 33 A7 99 22 1C 12 22 45 2C 45 24 22 92 90 |.63..".."E,E$"..|
00002EB0: 22 3A 8D 33 30 37 30 3A 89 31 34 38 30 00 E4 36 |":.3070:.1480..6|
00002EC0: 90 15 99 22 46 49 4C 45 20 45 58 49 53 54 53 2E |..."FILE EXISTS.|
00002ED0: 20 20 52 45 50 4C 41 43 45 20 49 54 20 28 59 2F | REPLACE IT (Y/|
00002EE0: 4E 29 3F 22 00 F9 36 9A 15 A1 41 24 3A 8B 41 24 |N)?"..6...A$:.A$|
00002EF0: B2 22 4E 22 A7 31 34 38 30 00 0B 37 A4 15 8B 41 |."N".1480..7...A|
00002F00: 24 B3 B1 22 59 22 A7 35 35 33 30 00 2C 37 AE 15 |$.."Y".5530.,7..|
00002F10: 9F 31 35 2C 38 2C 31 35 2C 22 53 30 3A 22 AA 46 |.15,8,15,"S0:".F|
00002F20: 49 24 3A A0 31 35 3A 89 32 39 36 30 00 41 37 6F |I$:.15:.2960.A7o|
00002F30: 17 8F 20 44 49 53 4B 20 44 49 52 45 43 54 4F 52 |.. DISK DIRECTOR|
00002F40: 59 00 59 37 70 17 9F 31 2C 38 2C 30 2C 22 24 30 |Y.Y7p..1,8,0,"$0|
00002F50: 3A 2A 3D 53 22 3A 49 B2 30 00 67 37 7A 17 A1 23 |:*=S":I.0.g7z..#|
00002F60: 31 2C 41 24 2C 5A 24 00 75 37 84 17 A1 23 31 2C |1,A$,Z$.u7...#1,|
00002F70: 41 24 2C 5A 24 00 83 37 8E 17 A1 23 31 2C 41 24 |A$,Z$..7...#1,A$|
00002F80: 2C 5A 24 00 8B 37 98 17 4A B2 30 00 9F 37 A2 17 |,Z$..7..J.0..7..|
00002F90: 8B 41 24 B3 B1 22 22 A7 4A B2 C6 28 41 24 29 00 |.A$.."".J..(A$).|
00002FA0: B9 37 AC 17 8B 5A 24 B3 B1 22 22 A7 4A B2 4A AA |.7...Z$.."".J.J.|
00002FB0: 32 35 36 AC C6 28 5A 24 29 00 C1 37 B6 17 99 4A |256..(Z$)..7...J|
00002FC0: 3B 00 D8 37 C0 17 A1 23 31 2C 5A 24 3A 8B 53 54 |;..7...#1,Z$:.ST|
00002FD0: B3 B1 30 A7 36 31 35 30 00 EC 37 CA 17 8B 5A 24 |..0.6150..7...Z$|
00002FE0: B3 B1 C7 28 33 34 29 A7 36 30 38 30 00 0D 38 D4 |...(34).6080..8.|
00002FF0: 17 A1 23 31 2C 5A 24 3A 8B 5A 24 B3 B1 C7 28 33 |..#1,Z$:.Z$...(3|
00003000: 34 29 A7 99 5A 24 3B 3A 89 36 31 30 30 00 27 38 |4)..Z$;:.6100.'8|
00003010: DE 17 A1 23 31 2C 5A 24 3A 8B 5A 24 B2 C7 28 33 |...#1,Z$:.Z$..(3|
00003020: 32 29 A7 36 31 31 30 00 38 38 E8 17 99 A3 31 38 |2).6110.88....18|
00003030: 29 3B 3A 41 24 B2 22 22 00 59 38 F2 17 41 24 B2 |);:A$."".Y8..A$.|
00003040: 41 24 AA 5A 24 3A A1 23 31 2C 5A 24 3A 8B 5A 24 |A$.Z$:.#1,Z$:.Z$|
00003050: B3 B1 22 22 A7 36 31 33 30 00 7C 38 FC 17 99 C8 |.."".6130.|8....|
00003060: 28 41 24 2C 33 29 3A 49 B2 49 AA 31 3A 8B 49 B2 |(A$,3):I.I.1:.I.|
00003070: 32 30 A7 8D 33 30 37 30 3A 49 B2 30 00 8B 38 06 |20..3070:I.0..8.|
00003080: 18 8B 53 54 B2 30 A7 36 30 32 30 00 A4 38 10 18 |..ST.0.6020..8..|
00003090: 99 22 42 4C 4F 43 4B 53 20 46 52 45 45 11 22 3A |."BLOCKS FREE.":|
000030A0: A0 31 3A 8E 00 BB 38 37 18 8F 20 50 52 49 4E 54 |.1:...87.. PRINT|
000030B0: 49 4E 47 20 52 4F 55 54 49 4E 45 00 E6 38 38 18 |ING ROUTINE..88.|
000030C0: 99 22 93 90 4D 41 4B 45 20 53 55 52 45 20 50 52 |."..MAKE SURE PR|
000030D0: 49 4E 54 45 52 20 49 53 20 52 45 41 44 59 2E 22 |INTER IS READY."|
000030E0: 3A 8D 33 30 37 30 00 09 39 42 18 85 22 43 4F 4C |:.3070..9B.."COL|
000030F0: 55 4D 4E 20 52 41 4E 47 45 20 54 4F 20 50 52 49 |UMN RANGE TO PRI|
00003100: 4E 54 22 3B 43 31 2C 43 32 00 35 39 47 18 8B 43 |NT";C1,C2.59G..C|
00003110: 31 B3 31 B0 43 32 B1 4E 43 A7 99 22 42 41 44 20 |1.1.C2.NC.."BAD |
00003120: 43 4F 4C 55 4D 4E 20 52 41 4E 47 45 2E 11 22 3A |COLUMN RANGE..":|
00003130: 89 36 32 31 30 00 55 39 4C 18 85 22 52 4F 57 20 |.6210.U9L.."ROW |
00003140: 52 41 4E 47 45 20 54 4F 20 50 52 49 4E 54 22 3B |RANGE TO PRINT";|
00003150: 52 31 2C 52 32 00 7E 39 51 18 8B 52 31 B3 31 B0 |R1,R2.~9Q..R1.1.|
00003160: 52 32 B1 4E 52 A7 99 22 42 41 44 20 52 4F 57 20 |R2.NR.."BAD ROW |
00003170: 52 41 4E 47 45 2E 11 22 3A 89 36 32 32 30 00 89 |RANGE..":.6220..|
00003180: 39 53 18 9F 31 2C 34 2C 30 00 9F 39 56 18 81 49 |9S..1,4,0..9V..I|
00003190: B2 52 31 A4 52 32 3A 81 4A B2 43 31 A4 43 32 00 |.R1.R2:.J.C1.C2.|
000031A0: B1 39 5B 18 43 B2 C3 28 44 58 24 28 49 2C 4A 29 |.9[.C..(DX$(I,J)|
000031B0: 29 00 D4 39 60 18 8B 43 B3 B2 38 A7 98 31 2C 44 |)..9`..C..8..1,D|
000031C0: 58 24 28 49 2C 4A 29 3B A6 39 AB 43 29 3B 3A 89 |X$(I,J);.9.C);:.|
000031D0: 36 32 37 30 00 0B 3A 65 18 8B 4A B3 4E 43 A7 8B |6270..:e..J.NC..|
000031E0: 54 59 28 49 2C 4A AA 31 29 B2 30 A7 98 31 2C 44 |TY(I,J.1).0..1,D|
000031F0: 58 24 28 49 2C 4A 29 3B A6 31 38 AB 43 29 3B 3A |X$(I,J);.18.C);:|
00003200: 4A B2 4A AA 31 3A 89 36 32 37 30 00 26 3A 6A 18 |J.J.1:.6270.&:j.|
00003210: 98 31 2C C8 28 44 58 24 28 49 2C 4A 29 2C 37 29 |.1,.(DX$(I,J),7)|
00003220: AA 22 2B 20 22 3B 00 34 3A 7E 18 82 3A 98 31 3A |."+ ";.4:~..:.1:|
00003230: 82 3A A0 31 00 3E 3A 9C 18 89 31 34 36 30 00 52 |.:.1.>:...1460.R|
00003240: 3A 63 19 8F 20 43 41 4C 43 55 4C 41 54 45 20 4D |:c.. CALCULATE M|
00003250: 41 58 00 87 3A 64 19 46 58 B2 46 58 28 52 41 28 |AX..:d.FX.FX(RA(|
00003260: 4A 29 2C 43 41 28 4A 29 29 3A 81 4D B2 52 41 28 |J),CA(J)):.M.RA(|
00003270: 4A 29 A4 52 42 28 4A 29 3A 81 4E B2 43 41 28 4A |J).RB(J):.N.CA(J|
00003280: 29 A4 43 42 28 4A 29 00 A2 3A 6E 19 8B 46 58 28 |).CB(J)..:n..FX(|
00003290: 4D 2C 4E 29 B1 46 58 A7 46 58 B2 46 58 28 4D 2C |M,N).FX.FX.FX(M,|
000032A0: 4E 29 00 AC 3A 78 19 82 3A 82 3A 8E 00 C0 3A 2B |N)..:x..:.:...:+|
000032B0: 1A 8F 20 43 41 4C 43 55 4C 41 54 45 20 4D 49 4E |.. CALCULATE MIN|
000032C0: 00 F5 3A 2C 1A 46 58 B2 46 58 28 52 41 28 4A 29 |..:,.FX.FX(RA(J)|
000032D0: 2C 43 41 28 4A 29 29 3A 81 4D B2 52 41 28 4A 29 |,CA(J)):.M.RA(J)|
000032E0: A4 52 42 28 4A 29 3A 81 4E B2 43 41 28 4A 29 A4 |.RB(J):.N.CA(J).|
000032F0: 43 42 28 4A 29 00 10 3B 36 1A 8B 46 58 28 4D 2C |CB(J)..;6..FX(M,|
00003300: 4E 29 B3 46 58 A7 46 58 B2 46 58 28 4D 2C 4E 29 |N).FX.FX.FX(M,N)|
00003310: 00 1A 3B 40 1A 82 3A 82 3A 8E 00 00 00 |..;@..:.:.... |
..D.... DSCALC - A SPREADSHEET PROGRAM
FOR THE COMMODORE 64.A.... VERSI
ON 1 BY DICK SOWA...... VERSION 2 BY MAR
C R. ROUSSEL...V.. TITLE SCREEN...J..532
81,1:.53280,1:.G(14)"....."...T.PA$."..=
=====================================".3
.~.VM.1024:VX.VM.999:CM.55296:CX.CM.999:
.VM,240:.CM,2:.VX,253:.CX,2.O....X.1.23:
.VM.40.X,221:.CM.40.X,2:.VX.40.X,221:.CX
.40.X,2......:.VM.39,238:.CM.39,2:.VX.39
,237:.CX.39,2:.X.1.38......VM.39.X,192:.
CM.39.X,2:.VX.39.X,192:.CX.39.X,2:......
.".."PA$"...."......"..... DSCALC 2.0
- A BASIC SPREADSHEET":.PA$:.I.1.500:..U
...."... (C) 1985 BY DICK SOWA...
D..".. VERSION 2.0 BY MARC R. ROUSSEL
"...N..".... SOURCE MUST BE DISTRIB
UTED".Q.X..". WITH EXECUTABLE.
"......:.:.:.".. STANDBY...
"."....4860:. DYNAMIC EXPRESSION EVALUAT
OR.>....5270:. SEQ FILE READER.Y.... TY(
R,C)=0 BLANK CELL.W.... =1 NUMERI
C VALUE...... =2 FORMULAS......
=3 TEXT.E.(.. =4 SUM, MAX O
R MIN...2..:SP$." "..
.<.NR.40:. NUMBER OF POSSIBLE ROWS...F.N
C.14:. NUMBER OF POSSIBLE COLS.R.P.SR.18
:. MAX NUM OF DISPLAY ROWS.V.Z.SC.4 :. M
AX NUM OF DISPLAY COLS...D.WC.8 :. COLUM
N WIDTH...N.BK$." ":. BLANK CELL.
..X..RN(NR),CN(NC),FX$(NR,NC),DX$(NR,NC)
,TY(NR,NC),FM$(NR,NC),FX(NR,NC)......N(2
1):. NESTED FORMULA LEVELS.X.... FL(NR,N
C),R(100),C(100),RA(100),RB(100),CA(100)
,CB(100)......R.1.NR:.C.1.NC:TY(R,C).0:.
:.:. BLANK CELLS...... DISPLAY COLUMNS/R
OWS.....C1.1:C2.SC:R1.1:R2.SR.U...RO.2:C
O.4:R0.1:C0.1...H..1940...R..4440.....CR
.20:CC.0:.2090......4690.%....X.22.24:.7
81,X:.59903:..M...CR.22:CC.0:.2090:."."F
X$(R0,C0)".";.~....TY(R0,C0).2.TY(R0,C0)
.4..".="DX$(R0,C0)".";.....CR.R0.R1.2:CC
.WC.(C0.C1).C0.C1.4.Z....2090:.C(DX$(R0,
C0)).8..H(DX$(R0,C0),7)."+";:.1560......
DX$(R0,C0);......2090:.2120:. GET A CHAR
ACTER.).,.. CHECK FOR CURSOR KEYS.O.6...
(A$.".").1.(A$.".").2.(A$.".").3.(A$."."
).4.1730,1780,1830,1880...J.. CHECK FOR
FUNCTION KEYS...T..A$.G(133).T.1:.2230:.
NUMBERS.T.^..A$.G(134).T.2:.2230:. FORM
ULAS...H..A$.G(135).T.3:.2230:. ALPHANUM
ERIC TEXT...R..A$.G(136).2610:. HELP.7.|
..A$.G(137).2720:. LOAD.R....A$.G(138).2
920:. SAVE.O....A$.G(139).3140:. RECALC.
.....A$.G(140).5410:. QUIT......A$."P".6
200:. PRINT.I....1560:. NOT VALID CHAR-S
TART OVER...... CURSOR RIGHT...B..C0.C2.
.C2..NC.C1.C1.1:C2.C2.1:C0.C0.1:.1480:.
SHIFT SCREEN.:.L..C0.C2.1560:. CAN'T SHI
FT.L.V.C0.C0.1:.1520.^.... CURSOR LEFT..
....C0.C1..C1..1.C1.C1.1:C2.C2.1:C0.C0.1
:.1480:. SHIFT SCREEN......C0.C1.1560:.
CAN'T SHIFT.M...C0.C0.1:.1520...... CURS
OR DOWN...&..R0.R2..R2..NR.R1.R1.1:R2.R2
.1:R0.R0.1:.1480:. SHIFT SCREEN.=.0..R0.
R2.1560:. CAN'T SHIFT.O.:.R0.R0.1:.1520.
_.N.. CURSOR UP...X..R0.R1..R1..1.R1.R1.
1:R2.R2.1:R0.R0.1:.1480:. SHIFT SCREEN..
.B..R0.1.1560...L.R0.R0.1:.1520...... DI
SPLAY SPREADSHEET SCREEN......".."G(142)
;......C.0.3:C$."0".J(D(C.C1),2,3).2....
.(WC.1).C.4);"C"I(C$,2);:..:....:..Z....
R.R1.R2:R$."0".J(D(R),2,3).K.F.."R"I(R$,
2);.V.P..C.0.3...Z...(WC.1).C.4);:. ROW
NUMS......TY(R,C.C1).0.DX$(R,C.C1).BK$..
....C(DX$(R,C.C1)).8..H(DX$(R,C.C1),7)."
+";:.2040......DX$(R,C.C1);......:......
........7. .. POSN CRSR AT CURRENT CELL
(CR,CC).[.*..781,CR:.782,CC:.783,0:.6552
0:..}.>.. TURN ON CRSR & GET KEYPRESS...
H..204,0:.A$:.A$."".2120...R..205,2...\.
. B(207)..0.2140.E.F..204,1:....... PRIN
T CELL CONTENTS ON LINE 22......X.22.24:
.781,X:.59903:......."."FX$(R0,C0)".";.?
.... F1,F3,F5 ACCEPT CELL INPUT.`...RO.C
R:CO.CC:. SAVE CRSR POSN.|....4440:. CLE
AR MENU AREA...J.CR.20:CC.0:.4480:. CRSR
TO MENU AREA.G.T..T.4710,4720,4730:. ME
NU TEXT.....L.0:.FX$(R0,C0);:CR.21:CC.0:
.2090:. PRINT CURRENT CONTENTS......2120
:. GET A CHAR.7.... FILTER ENTERED DATA.
Q....A$.G(20)..4510:.2280.H....A$.G(13).
L.0.2440......A$.G(13).2410:. CLEANUP...
$..T.2350,2370,2370.E....(A$."0".A$."9")
.A$..".".A$.."-".2280...8..4560:.2280:.
GOOD CHAR & GET ANOTHER...B..A$."!".A$."
_".2280.1.L..4560:.2280:. GOOD CHAR & GE
T ANOTHER.J.`.. CLEANUP AFTER <CR>.J.J..
4600:. GET IN$ FROM SCREEN...T..T.1.2440
,2460,2500,2570...~.. BLANK TYPE=0.N...F
X$(R0,C0).BK$:DX$(R0,C0).BK$:TY(R0,C0).0
:.1490...... VALUES TYPE = 1.....FX$(R0,
C0).IN$:TY(R0,C0).1:FX(R0,C0).E(IN$).0..
.DX$(R0,C0).H(IN$.BK$,8).:....1490.[....
FORMULAS TYPE=2 AND TYPE=4.K.D.A$.H(IN$
,3)...F..(A$.."SUM").(A$.."MAX").(A$.."M
IN").2520.T.N.FX$(R0,C0).IN$:DX$(R0,C0).
"0 ":TY(R0,C0).4:.1490...X.FX$(R0,
C0).IN$:DX$(R0,C0)."0 ":TY(R0,C0).
2./....4380:. CONVERT TO USABLE FORMULA.
B...FM$(R0,C0).IN$.L....1490.`.... TEXT
TYPE = 3.....FX$(R0,C0).IN$:DX$(R0,C0).I
N$:TY(R0,C0).3......1490...(.. DISPLAY H
ELP SCREENS.V.2..15,8,15:.2,8,2,"0:DSCAL
C.HLP"...<..15,E:.E..0.2845...F.."..";..
.P..49152:.(ST).64.2670.?.Z..:.".<SPACE>
=NEXT SCREEN <ANY KEY>=ABORT.";.E.D..A$:
..(A$."").2660:.A$.G(32).2630.P.N. 2: 15
...X..:.".END OF HELP FILE":.3070:.1480.
..... LOAD A SPREADSHEET FROM DISK... ..
"...LOAD A SPREADSHEET..":.......".CAUTI
ON! YOU WILL LOSE CURRENT SHEET.".!...."
CONTINUE? (Y/N).".5....A$:.A$."".2750.I.
H..A$."Y"..:.2780.S.R..1480......:."CLEA
RING CURRENT SHEET. PLEASE WAIT...".....
.R.1.NR:.C.1.NC.....TY(R,C).0:.:..K...."
.DO YOU WANT A DIRECTORY?."......A$:.A$.
"Y"..6000:.2810......A$.."N".2805......:
.".ENTER FILENAME.";.-....FI$:.C(FI$).16
.2820.J....15,8,15:.2,8,2,"0:".FI$.W....
15,E,E$......E..0. 2: 15:.".."E,E$"..":.
3070:.1480..."..2,R,C,TY(R,C),FX$(R,C)..
.,..(ST).64.2880...6..2850.E.@. 2: 15.O.
J..3330...^.. SAVE A SPREADSHEET TO DISK
...H.."...SAVE A SPREADSHEET..":..(.R.."
ENTER FILENAME";.A.|..FI$:.C(FI$).16.293
0.R....FI$."".3050.}....15,8,15:.2,8,2,"
0:".FI$.",S,W":Z$.","......15,E,E$:.E..0
. 2: 15:.5510......R.1.NR:.C.1.NC.X....T
Y(R,C).0.3030:. SKIP BLANK CELLS.....IN$
.D(R).Z$.D(C).Z$.D(TY(R,C)).Z$.FX$(R,C).
..B..2,IN$.*.L..15,E,E$:.E..0.2845.2.V..
:..=... 2: 15.G....1480.Z.... WAIT ROUTI
NE.Y....".HIT A KEY TO CONTINUE."......A
$:.A$."".3080.........:.. F8 - CALCULATE
SPREADSHEET...D..4440...N..3560:. ANALY
ZE FORMULA NESTING...X..ER..0.ER.0:.1490
...B..4440.#.L.CR.21:CC.0:.2090:. POSN C
RSR.D.V.."FORMULAS TO CALCULATE:";TF.I..
..I.2.FL:. FORMULA LEVELS TO CALC......J
.1.NF:. # OF FORMULAS......FL(R(J),C(J))
..I.3290:. NEXT FORMULA-WRONG LEVEL.....
.TY(R(J),C(J)).4.A$.H(FX$(R(J),C(J)),3):
.3490:.3260.. ..IN$.FM$(R(J),C(J)).. ..F
X..(0),IN$.D ..DX$(R(J),C(J)).D(FX):FX(R
(J),C(J)).FX.O P.TF.TF.1:CR.21:CC.23:.20
90:." ..."TF;.Y Z..J:.I.. ...1480.. ..
. RE-GENERATE SPREADSHEET.. ...: .".LOAD
ING COMPLETE.".. ..."RE-GENERATING SHEET
, PLEASE WAIT...".. ...R.1.NR:.C.1.NC.%!
..TY(R,C).1.3370,3380,3410,3430,3450.B!
*..3460:. SKIP BLANK CELLS.L!4.DX$(R,C).
FX$(R,C):FX(R,C).E(FX$(R,C)).V!H..3460..
!R.DX$(R,C)."0":IN$.FX$(R,C):.4380:FM$(R
,C).IN$..!\..3460.L!F.DX$(R,C).H(FX$(R,C
),8).V!P..3460..!Z.DX$(R,C)."0"..!...:.:
.1460.."... CALCULATE SUM, MAX AND MIN.)
"...A$."MAX".6500.<"...A$."MIN".6700.C".
.FX.0:.M.RA(J).RB(J):.N.CA(J).CB(J).U"..
FX.FX.FX(M,N)."...:.:..."J.. ANALYZE FO
RMULA NESTING AND.."T.. DETERMINE CALC S
EQUENCE.."... ISOLATE FORMULA CELLS FROM
VALUE AND BLANK CELLS..#..ER.0:. ERROR
FLAG.%#..NF.0:. # OF FORMULAS.N#..FL.0:.
CURRENT FORMULA NESTING LEVEL.I#..CR.21
:CC.0:.2090:.4830.}#...R.1.NR:.C.1.NC..#
...TY(R,C).1.FL(R,C).1:.3630:. VALUE CEL
LS..#$..TY(R,C).2.TY(R,C).4.NF.NF.1:R(NF
).R:C(NF).C:FL(R,C).2..#...:.:TF.NF..$8.
.NF.0..:. NO FORMULAS FOUND.)$B..4440:.2
090:.4820.`$V.. FLAG AND DROP FORMULAS T
HAT ONLY REF VALUE CELLS..$`.. ENTRY:NF
= TOTAL # OF FORMULAS..$J.. TY(R,C
)=0 FOR ALL TEXT & BLANK CELLS..$T..
FL(R,C)=1 FOR ALL VALUE CELLS..%~..
FL(R,C)=2 FOR ALL FORMULA CELLS.G%.
.. EXIT: FL(R,C)>=3 FOR ALL CELLS CALLIN
G FORMULA CELLS.}%..FL.2:N(FL).NF:. N(FL
)=# OF FORMULAS AT EACH LEVEL..%..N(FL.1
).0:.I.1.N(FL):A$.FX$(R(I),C(I)):L.C(A$)
.K%...TY(R(I),C(I)).4..4040.V%...J.1.L..
&...J(A$,J,1).."[".3840:. TRY NEXT CHARA
CTER.%&D..4270:. PARSE CELL REFERENCE.P&
N..ER..0.R.R(I):C.C(I):J.L:I.N(FL):.3840
..&X..TY(R,C)..0.TY(R,C)..3.3820:. BLANK
/TEXT CELL REF TEST..&..ER.1:R.R(I):C.C(
I):J.C(A$):I.N(FL):.3840..&...FL(R,C).FL
.1.FL(R(I),C(I)).FL:.3840:. CURRENT CELL
LEVEL IS OK.E'...FL(R,C)..FL.FL(R(I),C(
I)).FL.1:J.L:N(FL.1).N(FL.1).1:. NEXT FO
RMULA.K'....Q'....O'...FL.2.N(FL).N(FL).
N(FL.1)..'...FL.2.N(FL).N(FL.1).N(FL.1).
.'(..ER..0.3960.O'2..N(FL.1).0.:.:. CURR
ENT LEVEL IS LAST LEVEL..(<..FL.2.N(FL).
0.ER.2:.3960:. NO REF TO VALUE CELLS ERR
OR.>(F..N(FL).N(FL.1).ER.3:.3960:. INFIN
ITE LOOP ERROR.T(P.FL.FL.1:.FL.21.ER.4:.
3960:. EXCESSIVE LOOPS ERROR.~(Z..3740..
(N.. HANDLE CELL REFERENCE ERRORS..(X..4
440:. CLEAR MENU..(..RO.CR:CO.CC:.4480:.
MOVE CURSOR..(...ER.4740,4760,4780,4800
,4840..)...A$:.A$."".3990..) ...P)... PA
RSE SUM, MAX AND MIN; EXTRACT CE
LL RANGE.`)H..L..15.4120..)R.B$.J(A$,4,2
).J(A$,8,1).J(A$,11,1).J(A$,14,1).F)..X1
.E(J(A$,6,2)):X2.E(J(A$,9,2)):X3.E(J(A$,
12,2))..)...X1.0.X2.0.X3.0.4120..)...B$.
"[CR-]".4130..*...B$."[C-R]".4140..*...B
$."[RC-]".4150.3*...B$."[R-C]".4160.G*..
ER.5:R.R(I):C.C(I):I.N(FL):.3850:. SYNTA
X ERROR..*".RA(I).X2:RB(I).X3:CA(I).X1:C
B(I).X1:.4170.C*,.RA(I).X3:RB(I).X3:CA(I
).X1:CB(I).X2:.4170..*6.RA(I).X1:RB(I).X
1:CA(I).X2:CB(I).X3:.4170..+@.RA(I).X1:R
B(I).X2:CA(I).X3:CB(I).X3:.4170.A+J..M.R
A(I).RB(I):.N.CA(I).CB(I).B+T..TY(M,N)..
0..TY(M,N)..3.4200..+^.ER.5:M.RB(I):N.CB
(I):R.R(I):C.C(I):I.N(FL):.4230..+H..FL(
M,N).FL.1.FL(R(I),C(I)).FL:.4230.U+R..FL
(M,N).FL.4230..,|.FL(R(I),C(I)).FL.1:M.R
B(I):N.CB(I):N(FL.1).N(FL.1).1:.4230..,.
..:..&,...3850.S,... EXTRACT CELL REFERE
NCES & CHECK SYNTAX.|,..B$.J(A$,J,2).J(A
$,J.4,1).J(A$,J.7,1)..,..X1.E(J(A$,J.2,2
)):X2.E(J(A$,J.5,2))..,B..X1.0.X2.0.ER.5
:..N,L..B$."[RC]".4330..,V..B$."[CR]".43
40..,..ER.5:...,..R.X1:C.X2:...-..R.X2:C
.X1:...-... CONVERT ENTERED FORMULA TO.K
-... MACHINE USABLE FORMULA.B-...I.1.C(I
N$):I1$."".{-&..J(IN$,I,1).."["..:..A-0.
IN$.H(IN$,I.1)."FX(".J(IN$,I.2,2).",".J(
IN$,I.5,2).")".J(IN$,I.8).I-:..:...-N..
CLR MENU AREA..-X..X.20.24:.781,X:.59903
:....B...#.V.. POSN CRSR AT CR,CC (ROW,C
OL).G....781,CR:.782,CC:.783,0:.65520:..
[.... HANDLE DELETE.T....L.1..". .";:L.L
.1:.......L.ML.1..". .";:L.L.1:.......L.
ML.1.." .";:L.L.1:..G.F.. HANDLE GOOD CH
ARACTER...P..L.ML.1.L.L.1:.A$;:....Z..L.
ML.1..A$".";:.../... GET IN$ FROM SCREEN
.1/..CR.21:CC.0:.2090:.1,3:IN$."".</...I
.0.L.X/...#1,A$:IN$.IN$.A$:A$."".^/....G
/ . 1:..|/H.. MENU AREA TEXT../R.."..F1.
NUMS .F3.FORMULA .F5.ALPHA .F7.HELP .P.P
RINT"../\..".F2.LOAD .F4.SAVE .F6.REC
ALC.F8.QUIT .":...0F.."..ENTER NUMERIC
VALUES..":ML.8:..10P.."..ENTER FORMULA..
":ML.79:..[0Z.."..ENTER ALPHANUMERIC TEX
T..":ML.8:...0..."..BLANK/TEXT CELL REFE
RENCE.. R"R"C"C..0...".PRESS ANY KEY.";:
..M0..."..NO REFERENCE TO VALUE CELL ERR
OR.."..0..."..INFINITE LOOP CELL REFEREN
CE ERROR.."..1..."PRESS ANY KEY.";:..?1.
.."..NESTING EXCEEDS 20 LEVELS ERROR..".
G1T..".CHECKING FORMULA NESTING....";:..
.1...".SCANNING FORMULAS....";:...1...".
.SYNTAX ERROR IN CELL.. R"R"C"C".":.4790
..2... *DATA LOADER FOR "EXPEVAL"
DYNAMIC EXPRESSION EVALUATION..2.
.. BY CHRIS ZAMARA.;2... TRANSACTOR VOL
5, ISSUE 04.O2B.CS.0:. CHECKSUM.K2L.OS.4
9195:. OBJECT START..2`..RD.0.1:. DATA L
OOP..2J..B..2T..B..0..OS,B:OS.OS.1:CS.CS
.B.D2~.RD..(B.0):. UNTIL B<0.L2...RD..2.
..CS..10928 . ."***CHECKSUM ERROR***":..
.3... 785,43:.786,192.)3... **CALL EXPE
VAL WITH:.I3D.. 'USR(0),STRING VARIABLE
'.O3X...J3...32,253,174,32,158,173..3...
32,143,173,160,0,177..3...100,170,200,17
7,100,133..3...251,200,177,100,133,252.V
3... 160,0,185,0,2,153..3... 60,3,177,25
1,153,0..4...2,200,192,80,208,240. 4(..1
69,0,157,0,2,165.;42..122,72,165,123,72,
169.T4<..0,133,122,169,2,133.N4F..123,32
,121,165,169,0..4P..133,122,169,2,133,12
3..4Z..32,158,173,104,133,123.A4D..104,1
33,122,162,79,189.W4N..60,3,157,0,2,202.
.4X..16,247,96,-1..4... SEQ FILE READER.
$5...AD.49152.49194:.DA:.AD,DA:.AD:..?5
..169,14,32,210,255,160.W5...0,162,2,32,
198,255.R5...32,207,255,141,42,192..5...
32,183,255,208,15,173..5H..42,192,32,210
,255,201.C5R..13,208,235,200,192,21..5..
.208,230,32,204,255,96..5...13,32,253,17
4,32,158..6... QUIT MENU OPTION.>6".."..
ARE YOU SURE YOU WANT TO QUIT (Y/N)?.".]
6,..A$:.A$."Y"..".GOODBYE!":..O66..A$.."
N".5420.Y6@..1480..6|.. ERROR ON WRITE F
ILE OPEN..6...E..63..".."E,E$"..":.3070:
.1480..6..."FILE EXISTS. REPLACE IT (Y/
N)?"..6...A$:.A$."N".1480..7...A$.."Y".5
530.,7...15,8,15,"S0:".FI$: 15:.2960.A7O
.. DISK DIRECTORY.Y7P..1,8,0,"$0:*=S":I.
0.G7Z..#1,A$,Z$.U7...#1,A$,Z$..7...#1,A$
,Z$..7..J.0..7...A$.."".J.F(A$)..7...Z$.
."".J.J.256.F(Z$).A7...J;.X7...#1,Z$:.ST
..0.6150..7J..Z$..G(34).6080..8T..#1,Z$:
.Z$..G(34)..Z$;:.6100.'8...#1,Z$:.Z$.G(3
2).6110.88....18);:A$."".Y8..A$.A$.Z$:.#
1,Z$:.Z$.."".6130.|8...H(A$,3):I.I.1:.I.
20..3070:I.0..8...ST.0.6020..8..."BLOCKS
FREE.": 1:...87.. PRINTING ROUTINE..88.
."..MAKE SURE PRINTER IS READY.":.3070..
9B.."COLUMN RANGE TO PRINT";C1,C2.59G..C
1.1.C2.NC.."BAD COLUMN RANGE..":.6210.U9
L.."ROW RANGE TO PRINT";R1,R2.~9Q..R1.1.
R2.NR.."BAD ROW RANGE..":.6220..9S..1,4,
0..9V..I.R1.R2:.J.C1.C2..9[.C.C(DX$(I,J)
).T9`..C..8..1,DX$(I,J);.9.C);:.6270..:E
..J.NC..TY(I,J.1).0..1,DX$(I,J);.18.C);:
J.J.1:.6270.&:J..1,H(DX$(I,J),7)."+ ";.4
:~..:.1:.: 1.>:...1460.R:C.. CALCULATE M
AX..:D.FX.FX(RA(J),CA(J)):.M.RA(J).RB(J)
:.N.CA(J).CB(J)..:N..FX(M,N).FX.FX.FX(M,
N)..:X..:.:...:+.. CALCULATE MIN..:,.FX.
FX(RA(J),CA(J)):.M.RA(J).RB(J):.N.CA(J).
CB(J)..;6..FX(M,N).FX.FX.FX(M,N)..;@..:.
:....
> CLICK IMAGE PREVIEW FOR FULL MODAL