MINI SPREADSHEET

00000000: 01 08 12 08 0A 00 8F 20  4D 49 4E 49 20 53 48 45  |....... MINI SHE|
00000010: 45 54 00 37 08 0F 00 8F  20 46 52 4F 4D 20 43 43  |ET.7.... FROM CC|
00000020: 49 20 54 59 50 45 44 20  49 4E 20 42 59 20 54 48  |I TYPED IN BY TH|
00000030: 45 20 4C 4F 4E 45 52 00  53 08 14 00 97 35 33 32  |E LONER.S....532|
00000040: 38 31 2C 32 3A 97 35 33  32 38 30 2C 31 35 3A 42  |81,2:.53280,15:B|
00000050: 5A B2 34 00 73 08 1E 00  48 24 B2 C7 28 31 39 29  |Z.4.s...H$..(19)|
00000060: 3A 43 24 B2 C7 28 31 34  37 29 3A 44 24 B2 C7 28  |:C$..(147):D$..(|
00000070: 31 37 29 00 92 08 28 00  4A 24 B2 C7 28 31 34 34  |17)...(.J$..(144|
00000080: 29 3A 42 24 B2 C7 28 35  29 3A 45 24 B2 C7 28 33  |):B$..(5):E$..(3|
00000090: 30 29 00 AB 08 32 00 52  52 B2 31 35 3A 99 43 24  |0)...2.RR.15:.C$|
000000A0: 44 24 45 24 3A 81 57 B2  31 A4 39 00 C5 08 3C 00  |D$E$:.W.1.9...<.|
000000B0: 99 A6 31 33 29 22 2A 20  4D 49 4E 49 20 53 48 45  |..13)"* MINI SHE|
000000C0: 45 54 20 2A 22 00 E0 08  46 00 82 3A 81 57 B2 31  |ET *"...F..:.W.1|
000000D0: A4 38 3A 53 50 24 B2 53  50 24 AA 22 20 22 3A 82  |.8:SP$.SP$." ":.|
000000E0: 00 FA 08 50 00 81 57 B2  31 A4 37 35 3A 53 31 24  |...P..W.1.75:S1$|
000000F0: B2 53 31 24 AA 22 20 22  3A 82 00 1A 09 5A 00 53  |.S1$." ":....Z.S|
00000100: 32 24 B2 C8 28 53 31 24  2C 36 35 29 3A 53 33 24  |2$..(S1$,65):S3$|
00000110: B2 C8 28 53 31 24 2C 33  33 29 00 3A 09 64 00 53  |..(S1$,33).:.d.S|
00000120: 34 24 B2 C8 28 53 31 24  2C 32 30 29 3A 53 35 24  |4$..(S1$,20):S5$|
00000130: B2 C8 28 53 31 24 2C 31  33 29 00 56 09 6E 00 4B  |..(S1$,13).V.n.K|
00000140: 4B B2 33 3A 52 24 B2 C7  28 31 38 29 3A 46 24 B2  |K.3:R$..(18):F$.|
00000150: C7 28 31 34 36 29 00 82  09 78 00 86 56 24 28 52  |.(146)...x..V$(R|
00000160: 52 2C 4B 4B 2C 42 5A 29  2C 4E 24 28 52 52 2C 4B  |R,KK,BZ),N$(RR,K|
00000170: 4B 2C 42 5A 29 2C 43 25  28 52 52 2C 4B 4B 2C 42  |K,BZ),C%(RR,KK,B|
00000180: 5A 29 00 98 09 82 00 5A  B2 35 33 32 36 39 3A 97  |Z).....Z.53269:.|
00000190: 5A 2C 30 3A 8D 39 30 30  00 B1 09 8C 00 99 C7 28  |Z,0:.900.......(|
000001A0: 38 29 3A 50 24 B2 C7 28  31 35 32 29 3A 89 39 35  |8):P$..(152):.95|
000001B0: 30 00 BF 09 96 00 8F 20  43 4F 4D 50 55 54 45 00  |0...... COMPUTE.|
000001C0: DF 09 A0 00 97 5A 2C 30  3A 99 43 24 44 24 44 24  |.....Z,0:.C$D$D$|
000001D0: 44 24 22 41 31 3D 2D 56  41 4C 28 56 24 22 3B 00  |D$"A1=-VAL(V$";.|
000001E0: 03 0A AA 00 99 22 28 52  2C 43 2C 4C 43 29 29 2A  |....."(R,C,LC))*|
000001F0: 43 25 28 52 2C 43 2C 4C  43 29 3A 47 4F 54 4F 32  |C%(R,C,LC):GOTO2|
00000200: 31 30 22 00 1F 0A B4 00  81 43 B2 30 A4 4B 4B 3A  |10"......C.0.KK:|
00000210: 81 52 B2 30 A4 52 52 3A  99 48 24 44 24 44 24 00  |.R.0.RR:.H$D$D$.|
00000220: 3D 0A BE 00 99 48 24 44  24 44 24 44 24 C7 28 36  |=....H$D$D$D$.(6|
00000230: 35 AA 52 29 C7 28 34 39  AA 43 29 48 24 00 52 0A  |5.R).(49.C)H$.R.|
00000240: C8 00 97 31 39 38 2C 31  3A 97 36 33 31 2C 31 33  |...198,1:.631,13|
00000250: 3A 80 00 62 0A D2 00 82  3A 82 3A 43 B2 30 3A 52  |:..b....:.:C.0:R|
00000260: B2 30 00 87 0A DC 00 57  24 B2 4E 24 28 52 2C 43  |.0.....W$.N$(R,C|
00000270: 2C 4C 43 29 3A 8B A8 28  43 25 28 52 2C 43 2C 4C  |,LC):..(C%(R,C,L|
00000280: 43 29 29 A7 32 39 30 00  A2 0A E6 00 99 43 24 44  |C)).290......C$D|
00000290: 24 44 24 3A 99 42 24 22  43 45 3D 22 45 24 57 24  |$D$:.B$"CE="E$W$|
000002A0: 42 24 00 BB 0A F0 00 99  44 24 44 24 C7 28 36 35  |B$......D$D$.(65|
000002B0: AA 52 29 C7 28 34 39 AA  43 29 3B 00 CE 0A FA 00  |.R).(49.C);.....|
000002C0: 99 22 3D 43 45 3A 47 4F  54 4F 32 38 30 22 00 E9  |."=CE:GOTO280"..|
000002D0: 0A 04 01 99 22 47 4F 54  4F 34 38 30 22 50 24 48  |...."GOTO480"P$H|
000002E0: 24 3A 97 36 33 33 2C 31  33 00 06 0B 0E 01 97 31  |$:.633,13......1|
000002F0: 39 38 2C 33 3A 97 36 33  31 2C 31 33 3A 97 36 33  |98,3:.631,13:.63|
00000300: 32 2C 31 33 3A 80 00 14  0B 18 01 57 B2 43 45 3A  |2,13:......W.CE:|
00000310: 8D 33 32 30 00 2E 0B 22  01 52 B2 52 AA 31 3A 8B  |.320...".R.R.1:.|
00000320: 52 B1 52 52 A7 52 B2 30  3A 43 B2 43 AA 31 00 3D  |R.RR.R.0:C.C.1.=|
00000330: 0B 2C 01 8B 43 B3 B2 4B  4B A7 32 32 30 00 4B 0B  |.,..C..KK.220.K.|
00000340: 36 01 8D 37 39 30 3A 89  39 35 30 00 5B 0B 40 01  |6..790:.950.[.@.|
00000350: 8F 20 52 4F 55 4E 44 20  4F 46 46 00 73 0B 4A 01  |. ROUND OFF.s.J.|
00000360: 8B 57 B2 30 A7 57 24 B2  22 30 2E 30 30 22 3A 89  |.W.0.W$."0.00":.|
00000370: 34 37 30 00 84 0B 54 01  42 B2 32 3A 8B 57 B3 30  |470...T.B.2:.W.0|
00000380: A7 42 B2 31 00 A4 0B 5E  01 41 B2 28 57 B3 39 39  |.B.1...^.A.(W.99|
00000390: 39 39 39 39 39 29 AF 28  57 B1 B2 AB 39 39 39 39  |99999).(W...9999|
000003A0: 39 39 39 29 00 C2 0B 68  01 41 B2 28 41 29 AF 28  |999)...h.A.(A).(|
000003B0: B6 28 57 29 B1 B2 30 2E  30 31 29 3A 8B 41 A7 34  |.(W)..0.01):.A.4|
000003C0: 32 30 00 D9 0B 72 01 45  B2 B5 28 BC 28 B6 28 57  |20...r.E..(.(.(W|
000003D0: 29 29 AD BC 28 31 30 29  29 00 EC 0B 7C 01 41 B2  |))..(10))...|.A.|
000003E0: 32 3A 8B 28 45 B3 30 29  A7 41 B2 31 00 08 0C 86  |2:.(E.0).A.1....|
000003F0: 01 45 45 24 B2 CA 28 C4  28 45 29 2C 41 29 3A 57  |.EE$..(.(E),A):W|
00000400: 31 B2 C3 28 45 45 24 29  00 23 0C 90 01 57 24 B2  |1..(EE$).#...W$.|
00000410: CA 28 C4 28 57 AD 31 30  AE 45 29 2C 42 2C 37 B2  |.(.(W.10.E),B,7.|
00000420: 57 31 29 00 3A 0C 9A 01  57 24 B2 57 24 AA 22 45  |W1).:...W$.W$."E|
00000430: 22 AA 45 45 24 3A 89 34  37 30 00 58 0C A4 01 57  |".EE$:.470.X...W|
00000440: 24 B2 C4 28 B4 28 57 29  AC B5 28 B6 28 57 29 AC  |$..(.(W)..(.(W).|
00000450: 31 30 30 AA 2E 35 29 29  00 69 0C AE 01 8B C3 28  |100..5)).i.....(|
00000460: 57 24 29 B1 32 A7 34 35  30 00 84 0C B8 01 57 24  |W$).2.450.....W$|
00000470: B2 C8 28 57 24 2C 31 29  AA 22 30 22 AA C9 28 57  |..(W$,1)."0"..(W|
00000480: 24 2C 31 29 00 9A 0C C2  01 57 31 24 B2 C8 28 57  |$,1).....W1$..(W|
00000490: 24 2C C3 28 57 24 29 AB  32 29 00 B8 0C CC 01 57  |$,.(W$).2).....W|
000004A0: 24 B2 CA 28 57 31 24 AA  22 2E 22 AA C9 28 57 24  |$..(W1$."."..(W$|
000004B0: 2C 32 29 2C 42 2C 38 29  00 D5 0C D6 01 56 24 28  |,2),B,8).....V$(|
000004C0: 52 2C 43 2C 4C 43 29 B2  C9 28 53 50 24 AA 57 24  |R,C,LC)..(SP$.W$|
000004D0: 2C 38 29 3A 8E 00 EC 0C  E0 01 41 44 B2 C3 28 57  |,8):......AD..(W|
000004E0: 24 29 AB 31 3A 81 57 B2  33 A4 41 44 00 07 0D EA  |$).1:.W.3.AD....|
000004F0: 01 8B CA 28 57 24 2C 57  2C 31 29 B3 B1 22 5C 22  |...(W$,W,1).."\"|
00000500: A7 82 3A 89 35 36 30 00  27 0D F4 01 57 31 24 B2  |..:.560.'...W1$.|
00000510: C8 28 57 24 2C 57 AB 33  29 3A 57 33 24 B2 CA 28  |.(W$,W.3):W3$..(|
00000520: 57 24 2C 57 AA 32 29 00  46 0D FE 01 41 31 24 B2  |W$,W.2).F...A1$.|
00000530: C4 28 C6 28 CA 28 57 24  2C 57 AB 32 29 29 AB 36  |.(.(.(W$,W.2)).6|
00000540: 35 29 AA 22 2C 22 00 64  0D 08 02 41 32 24 B2 C4  |5).",".d...A2$..|
00000550: 28 C5 28 CA 28 57 24 2C  57 AB 31 29 29 AB 31 29  |(.(.(W$,W.1)).1)|
00000560: AA 22 2C 22 00 76 0D 12  02 41 33 24 B2 CA 28 57  |.",".v...A3$..(W|
00000570: 24 2C 57 AA 31 29 00 99  0D 1C 02 57 32 24 B2 22  |$,W.1).....W2$."|
00000580: 56 41 4C 28 56 24 28 22  AA 41 31 24 AA 41 32 24  |VAL(V$(".A1$.A2$|
00000590: AA 41 33 24 AA 22 29 29  22 00 B8 0D 26 02 57 24  |.A3$."))"...&.W$|
000005A0: B2 57 31 24 AA 57 32 24  AA 57 33 24 3A 57 B2 41  |.W1$.W2$.W3$:W.A|
000005B0: 44 3A 82 3A 89 32 33 30  00 C7 0D 30 02 81 57 B2  |D:.:.230...0..W.|
000005C0: 32 A4 C3 28 57 24 29 00  E2 0D 3A 02 8B CA 28 57  |2..(W$)...:...(W|
000005D0: 24 2C 57 2C 31 29 B3 B1  22 5C 22 A7 82 3A 89 36  |$,W,1).."\"..:.6|
000005E0: 30 30 00 01 0E 44 02 57  24 B2 C8 28 57 24 2C 57  |00...D.W$..(W$,W|
000005F0: AB 31 29 AA 22 3A 22 AA  CA 28 57 24 2C 57 AA 31  |.1).":"..(W$,W.1|
00000600: 29 00 14 0E 4E 02 57 B2  C3 28 57 24 29 3A 82 3A  |)...N.W..(W$):.:|
00000610: 89 32 33 30 00 29 0E 58  02 57 24 B2 C9 28 22 5A  |.230.).X.W$..("Z|
00000620: 5A 5A 22 AA 57 24 2C 33  29 00 3F 0E 62 02 8B C9  |ZZ".W$,3).?.b...|
00000630: 28 57 24 2C 31 29 B3 B1  22 24 22 A7 36 36 30 00  |(W$,1).."$".660.|
00000640: 5E 0E 6C 02 52 B2 C6 28  57 24 29 AB 36 35 3A 43  |^.l.R..(W$).65:C|
00000650: B2 C6 28 CA 28 57 24 2C  32 29 29 AB 34 39 00 74  |..(.(W$,2)).49.t|
00000660: 0E 76 02 8B 28 52 B3 30  29 B0 28 52 B1 52 52 29  |.v..(R.0).(R.RR)|
00000670: A7 36 36 30 00 8A 0E 80  02 8B 28 43 B3 30 29 B0  |.660......(C.0).|
00000680: 28 43 B1 4B 4B 29 A7 36  36 30 00 93 0E 8A 02 89  |(C.KK).660......|
00000690: 32 32 30 00 AC 0E 94 02  99 45 24 22 45 52 52 4F  |220......E$"ERRO|
000006A0: 52 20 43 41 55 53 45 44  20 42 59 22 00 C0 0E 9E  |R CAUSED BY"....|
000006B0: 02 99 22 52 4F 57 20 22  C7 28 52 AA 36 35 29 3B  |.."ROW ".(R.65);|
000006C0: 00 DA 0E A8 02 99 22 20  3A 43 4F 4C 20 22 C7 28  |......" :COL ".(|
000006D0: 43 AA 34 39 29 3B 50 24  44 24 00 F3 0E B2 02 8D  |C.49);P$D$......|
000006E0: 31 38 38 30 3A 99 43 24  3A 8D 31 35 33 30 3A 89  |1880:.C$:.1530:.|
000006F0: 39 35 30 00 01 0F BC 02  8F 20 53 48 4F 57 20 53  |950...... SHOW S|
00000700: 53 00 1E 0F C6 02 99 48  24 53 35 24 22 20 20 22  |S......H$S5$"  "|
00000710: 4A 24 22 4D 49 4E 49 20  53 48 45 45 54 22 00 37  |J$"MINI SHEET".7|
00000720: 0F D0 02 99 45 24 22 54  49 54 4C 45 3A 22 50 24  |....E$"TITLE:"P$|
00000730: 54 24 28 4C 43 29 3B 00  4D 0F DA 02 99 A3 32 38  |T$(LC);.M.....28|
00000740: 29 22 50 41 47 45 20 4E  4F 2E 22 4C 43 00 71 0F  |)"PAGE NO."LC.q.|
00000750: E4 02 99 52 24 44 24 45  24 22 20 2E 2E 2E 31 2E  |...R$D$E$" ...1.|
00000760: 2E 2E 20 20 2E 2E 2E 32  2E 2E 2E 20 20 20 20 22  |..  ...2...    "|
00000770: 3B 00 8E 0F EE 02 99 22  2E 2E 2E 33 2E 2E 2E 20  |;......"...3... |
00000780: 20 20 2E 2E 2E 34 2E 2E  2E 20 20 20 22 3B 00 AC  |  ...4...   ";..|
00000790: 0F F8 02 81 52 B2 30 A4  52 52 3A 99 45 24 52 24  |....R.0.RR:.E$R$|
000007A0: C7 28 36 35 AA 52 29 46  24 50 24 3B 00 C6 0F 02  |.(65.R)F$P$;....|
000007B0: 03 81 43 B2 30 A4 4B 4B  3A 99 56 24 28 52 2C 43  |..C.0.KK:.V$(R,C|
000007C0: 2C 4C 43 29 50 24 00 D0  0F 0C 03 82 3A 82 3A 8E  |,LC)P$......:.:.|
000007D0: 00 DE 0F 16 03 8F 20 44  49 53 50 4C 41 59 00 F3  |...... DISPLAY..|
000007E0: 0F 20 03 99 43 24 3A 8D  37 30 30 3A 52 B2 30 3A  |. ..C$:.700:R.0:|
000007F0: 43 B2 30 00 FE 0F 2A 03  8D 38 32 30 3A 8E 00 0E  |C.0...*..820:...|
00000800: 10 34 03 8F 20 53 48 4F  57 20 43 45 4C 4C 00 2A  |.4.. SHOW CELL.*|
00000810: 10 3E 03 44 B2 31 3A 99  48 24 50 24 C7 28 36 35  |.>.D.1:.H$P$.(65|
00000820: AA 52 29 C7 28 34 39 AA  43 29 00 44 10 48 03 97  |.R).(49.C).D.H..|
00000830: 37 38 31 2C 32 30 3A 97  37 38 32 2C 30 3A 9E 36  |781,20:.782,0:.6|
00000840: 35 35 32 30 00 4D 10 52  03 99 53 31 24 00 65 10  |5520.M.R..S1$.e.|
00000850: 5C 03 9E 36 35 35 32 30  3A 97 5A 2C 30 3A 56 B2  |\..65520:.Z,0:V.|
00000860: 35 33 32 36 34 00 88 10  66 03 99 4E 24 28 52 2C  |53264...f..N$(R,|
00000870: 43 2C 4C 43 29 3A 58 B2  43 AC 38 30 AA 33 32 3A  |C,LC):X.C.80.32:|
00000880: 59 B2 52 AC 38 AA 38 31  00 A0 10 70 03 97 56 2C  |Y.R.8.81...p..V,|
00000890: 30 3A 8B 43 B2 33 A7 58  B2 31 36 3A 97 56 2C 31  |0:.C.3.X.16:.V,1|
000008A0: 00 B6 10 7A 03 97 5A AB  32 31 2C 58 3A 97 5A AB  |...z..Z.21,X:.Z.|
000008B0: 32 31 2C 59 3A 8E 00 C3  10 84 03 8F 20 53 50 52  |21,Y:....... SPR|
000008C0: 49 54 45 00 DD 10 8E 03  97 5A AA 31 38 2C 37 3A  |ITE......Z.18,7:|
000008D0: 97 5A AA 38 2C 31 3A 97  5A AA 36 2C 31 00 F1 10  |.Z.8,1:.Z.6,1...|
000008E0: 98 03 97 5A AA 32 2C 30  3A 97 32 30 34 30 2C 31  |...Z.2,0:.2040,1|
000008F0: 31 00 07 11 A2 03 81 57  B2 37 33 31 A4 37 36 37  |1......W.731.767|
00000900: 3A 97 57 2C 30 3A 82 00  21 11 AC 03 81 57 B2 37  |:.W,0:..!....W.7|
00000910: 30 34 A4 37 33 30 3A 97  57 2C 32 35 35 3A 82 3A  |04.730:.W,255:.:|
00000920: 8E 00 2F 11 B6 03 8F 20  43 4F 4E 54 52 4F 4C 00  |../.... CONTROL.|
00000930: 49 11 C0 03 97 37 38 31  2C 32 32 3A 97 37 38 32  |I....781,22:.782|
00000940: 2C 30 3A 9E 36 35 35 32  30 00 6C 11 CA 03 99 4A  |,0:.65520.l....J|
00000950: 24 22 5F 3D 43 4C 45 41  52 20 43 45 4C 4C 20 3F  |$"_=CLEAR CELL ?|
00000960: 3D 50 52 49 4E 54 20 43  3D 43 22 3B 00 83 11 D4  |=PRINT C=C";....|
00000970: 03 99 22 4C 52 5E 20 5C  3D 4E 45 58 54 20 50 41  |.."LR^ \=NEXT PA|
00000980: 47 45 22 00 A1 11 DE 03  99 45 24 22 46 31 3D 4C  |GE"......E$"F1=L|
00000990: 41 42 45 4C 20 46 33 3D  4E 55 4D 42 45 52 20 22  |ABEL F3=NUMBER "|
000009A0: 3B 00 C1 11 E8 03 99 22  46 35 3D 46 4F 52 4D 55  |;......"F5=FORMU|
000009B0: 4C 41 20 46 37 3D 44 49  53 50 4C 41 59 22 4A 24  |LA F7=DISPLAY"J$|
000009C0: 3B 00 DD 11 F2 03 99 22  46 32 3D 43 4F 4D 50 20  |;......"F2=COMP |
000009D0: 20 46 34 3D 54 49 54 4C  45 20 20 22 3B 00 FB 11  | F4=TITLE  ";...|
000009E0: FC 03 99 22 46 36 3D 53  41 56 45 20 20 20 20 46  |..."F6=SAVE    F|
000009F0: 38 3D 4C 4F 41 44 22 48  24 50 24 00 10 12 06 04  |8=LOAD"H$P$.....|
00000A00: A1 57 24 3A 8B 57 24 B3  B1 22 22 A7 31 30 33 30  |.W$:.W$.."".1030|
00000A10: 00 29 12 10 04 97 5A 2C  44 3A A1 57 24 3A 8B 57  |.)....Z,D:.W$:.W|
00000A20: 24 B2 22 22 A7 31 30 34  30 00 3E 12 1A 04 57 B2  |$."".1040.>...W.|
00000A30: C6 28 57 24 29 3A 8B 44  B2 30 A7 99 43 24 00 57  |.(W$):.D.0..C$.W|
00000A40: 12 24 04 8B 28 57 24 B2  22 5F 22 29 AF 28 44 B2  |.$..(W$."_").(D.|
00000A50: 31 29 A7 31 33 39 30 00  70 12 2E 04 8B 28 57 24  |1).1390.p....(W$|
00000A60: B2 22 3F 22 29 A7 8D 32  31 34 30 3A 89 39 35 30  |."?")..2140:.950|
00000A70: 00 84 12 38 04 8B 28 57  24 B3 B1 22 5C 22 29 A7  |...8..(W$.."\").|
00000A80: 31 31 31 30 00 A0 12 42  04 4C 43 B2 4C 43 AA 31  |1110...B.LC.LC.1|
00000A90: 3A 8B 4C 43 B2 28 42 5A  AA 31 29 A7 4C 43 B2 30  |:.LC.(BZ.1).LC.0|
00000AA0: 00 AA 12 4C 04 89 31 32  37 30 00 CE 12 56 04 4B  |...L..1270...V.K|
00000AB0: B2 28 57 B2 31 37 29 B0  28 57 B2 32 39 29 B0 28  |.(W.17).(W.29).(|
00000AC0: 57 B2 31 35 37 29 B0 28  57 B2 31 34 35 29 00 DF  |W.157).(W.145)..|
00000AD0: 12 60 04 8B 57 24 B2 22  43 22 A7 31 31 37 30 00  |.`..W$."C".1170.|
00000AE0: EB 12 6A 04 8B 4B A7 31  33 33 30 00 04 13 74 04  |..j..K.1330...t.|
00000AF0: 8B 28 57 B3 31 33 33 29  B0 28 57 B1 31 34 30 29  |.(W.133).(W.140)|
00000B00: A7 39 35 30 00 23 13 7E  04 91 57 AB 31 33 32 89  |.950.#.~..W.132.|
00000B10: 31 33 31 30 2C 31 33 32  30 2C 31 32 38 30 2C 31  |1310,1320,1280,1|
00000B20: 32 37 30 00 41 13 88 04  91 57 AB 31 33 36 89 31  |270.A....W.136.1|
00000B30: 35 30 2C 31 32 39 30 2C  31 32 35 30 2C 31 32 36  |50,1290,1250,126|
00000B40: 30 00 66 13 92 04 99 43  24 45 24 22 43 4C 45 41  |0.f....C$E$"CLEA|
00000B50: 52 20 53 48 45 45 54 3A  22 50 24 22 53 55 52 45  |R SHEET:"P$"SURE|
00000B60: 3F 20 59 2F 4E 22 00 7A  13 A6 04 A1 57 24 3A 8B  |? Y/N".z....W$:.|
00000B70: 57 24 B2 22 22 A7 31 31  39 30 00 8C 13 B0 04 8B  |W$."".1190......|
00000B80: 57 24 B3 B1 22 59 22 A7  31 32 37 30 00 A3 13 BA  |W$.."Y".1270....|
00000B90: 04 99 43 24 3A 81 52 B2  30 A4 31 35 3A 81 43 B2  |..C$:.R.0.15:.C.|
00000BA0: 30 A4 33 00 B4 13 C4 04  43 25 28 52 2C 43 2C 4C  |0.3.....C%(R,C,L|
00000BB0: 43 29 B2 30 00 D4 13 CE  04 4E 24 28 52 2C 43 2C  |C).0.....N$(R,C,|
00000BC0: 4C 43 29 B2 22 22 3A 56  24 28 52 2C 43 2C 4C 43  |LC)."":V$(R,C,LC|
00000BD0: 29 B2 22 22 00 EC 13 D8  04 82 3A 82 3A 54 24 28  |).""......:.:T$(|
00000BE0: 4C 43 29 B2 22 22 3A 89  31 32 37 30 00 04 14 E2  |LC)."":.1270....|
00000BF0: 04 44 B2 30 3A 97 5A 2C  30 3A 8D 31 36 36 30 3A  |.D.0:.Z,0:.1660:|
00000C00: 89 39 35 30 00 1C 14 EC  04 44 B2 30 3A 97 5A 2C  |.950.....D.0:.Z,|
00000C10: 30 3A 8D 31 37 34 30 3A  89 39 35 30 00 2A 14 F6  |0:.1740:.950.*..|
00000C20: 04 8D 37 39 30 3A 89 39  35 30 00 39 14 00 05 8D  |..790:.950.9....|
00000C30: 31 34 31 30 3A 89 39 35  30 00 59 14 0A 05 97 5A  |1410:.950.Y....Z|
00000C40: 2C 30 3A 99 43 24 44 24  3A 85 22 54 49 54 4C 45  |,0:.C$D$:."TITLE|
00000C50: 3D 22 3B 54 24 28 4C 43  29 00 7B 14 14 05 54 24  |=";T$(LC).{...T$|
00000C60: 28 4C 43 29 B2 C8 28 54  24 28 4C 43 29 2C 31 36  |(LC)..(T$(LC),16|
00000C70: 29 3A 8D 37 39 30 3A 89  39 35 30 00 8A 14 1E 05  |):.790:.950.....|
00000C80: 8D 31 35 36 30 3A 89 39  35 30 00 99 14 28 05 8D  |.1560:.950...(..|
00000C90: 31 36 32 30 3A 89 39 35  30 00 A6 14 32 05 8B 44  |1620:.950...2..D|
00000CA0: B2 30 A7 39 35 30 00 BF  14 3C 05 8B 28 57 B2 31  |.0.950...<..(W.1|
00000CB0: 37 29 AF 28 52 B3 52 52  29 A7 52 B2 52 AA 31 00  |7).(R.RR).R.R.1.|
00000CC0: D8 14 46 05 8B 28 57 B2  32 39 29 AF 28 43 B3 4B  |..F..(W.29).(C.K|
00000CD0: 4B 29 A7 43 B2 43 AA 31  00 F1 14 50 05 8B 28 57  |K).C.C.1...P..(W|
00000CE0: B2 31 34 35 29 AF 28 52  B1 30 29 A7 52 B2 52 AB  |.145).(R.0).R.R.|
00000CF0: 31 00 0A 15 5A 05 8B 28  57 B2 31 35 37 29 AF 28  |1...Z..(W.157).(|
00000D00: 43 B1 30 29 A7 43 B2 43  AB 31 00 19 15 64 05 8D  |C.0).C.C.1...d..|
00000D10: 38 32 30 3A 89 31 30 33  30 00 46 15 6E 05 4E 24  |820:.1030.F.n.N$|
00000D20: 28 52 2C 43 2C 4C 43 29  B2 22 22 3A 56 24 28 52  |(R,C,LC)."":V$(R|
00000D30: 2C 43 2C 4C 43 29 B2 22  22 3A 43 25 28 52 2C 43  |,C,LC)."":C%(R,C|
00000D40: 2C 4C 43 29 B2 30 00 59  15 78 05 99 43 24 3A 8D  |,LC).0.Y.x..C$:.|
00000D50: 31 35 33 30 3A 89 39 35  30 00 6B 15 82 05 8F 20  |1530:.950.k.... |
00000D60: 47 45 54 20 46 4F 52 4D  55 4C 41 00 76 15 8C 05  |GET FORMULA.v...|
00000D70: 8B 44 B2 30 A7 8E 00 90  15 96 05 97 37 38 31 2C  |.D.0........781,|
00000D80: 32 30 3A 97 37 38 32 2C  30 3A 9E 36 35 35 32 30  |20:.782,0:.65520|
00000D90: 00 9B 15 A0 05 99 22 20  20 22 3B 00 AC 15 AA 05  |......"  ";.....|
00000DA0: 99 4E 24 28 52 2C 43 2C  4C 43 29 3B 00 CC 15 B4  |.N$(R,C,LC);....|
00000DB0: 05 99 C8 28 53 32 24 2C  28 36 35 AB C3 28 4E 24  |...(S2$,(65..(N$|
00000DC0: 28 52 2C 43 2C 4C 43 29  29 29 29 3B 00 D7 15 BE  |(R,C,LC))));....|
00000DD0: 05 9E 36 35 35 32 30 00  FD 15 C8 05 85 4E 24 28  |..65520......N$(|
00000DE0: 52 2C 43 2C 4C 43 29 3A  56 24 28 52 2C 43 2C 4C  |R,C,LC):V$(R,C,L|
00000DF0: 43 29 B2 22 20 20 20 20  20 20 20 3F 22 00 1D 16  |C)."       ?"...|
00000E00: D2 05 4E 24 28 52 2C 43  2C 4C 43 29 B2 C8 28 4E  |..N$(R,C,LC)..(N|
00000E10: 24 28 52 2C 43 2C 4C 43  29 2C 36 35 29 00 3B 16  |$(R,C,LC),65).;.|
00000E20: DC 05 43 25 28 52 2C 43  2C 4C 43 29 B2 4E 24 28  |..C%(R,C,LC).N$(|
00000E30: 52 2C 43 2C 4C 43 29 B3  B1 22 22 00 4C 16 E6 05  |R,C,LC).."".L...|
00000E40: 8B 57 B2 31 33 35 A7 8D  31 35 33 30 00 52 16 F0  |.W.135..1530.R..|
00000E50: 05 8E 00 68 16 FA 05 8F  20 55 50 44 41 54 45 20  |...h.... UPDATE |
00000E60: 20 44 49 53 50 4C 41 59  00 7B 16 04 06 52 41 B2  | DISPLAY.{...RA.|
00000E70: 52 3A 4B 41 B2 43 3A 8D  37 30 30 00 90 16 0E 06  |R:KA.C:.700.....|
00000E80: 52 B2 52 41 3A 43 B2 4B  41 3A 8D 38 32 30 3A 8E  |R.RA:C.KA:.820:.|
00000E90: 00 9C 16 18 06 8F 20 4C  41 42 45 4C 00 A7 16 22  |...... LABEL..."|
00000EA0: 06 8B 44 B2 30 A7 8E 00  BE 16 2C 06 8D 31 34 31  |..D.0.....,..141|
00000EB0: 30 3A 43 25 28 52 2C 43  2C 4C 43 29 B2 30 00 DE  |0:C%(R,C,LC).0..|
00000EC0: 16 36 06 57 24 B2 C9 28  53 50 24 AA C8 28 4E 24  |.6.W$..(SP$..(N$|
00000ED0: 28 52 2C 43 2C 4C 43 29  2C 38 29 2C 38 29 00 F7  |(R,C,LC),8),8)..|
00000EE0: 16 40 06 56 24 28 52 2C  43 2C 4C 43 29 B2 C7 28  |.@.V$(R,C,LC)..(|
00000EF0: 31 35 31 29 AA 57 24 00  03 17 4A 06 8D 31 35 33  |151).W$...J..153|
00000F00: 30 3A 8E 00 10 17 54 06  8F 20 4E 55 4D 42 45 52  |0:....T.. NUMBER|
00000F10: 00 1B 17 5E 06 8B 44 B2  30 A7 8E 00 3A 17 68 06  |...^..D.0...:.h.|
00000F20: 8D 31 34 31 30 3A 57 B2  C5 28 4E 24 28 52 2C 43  |.1410:W..(N$(R,C|
00000F30: 2C 4C 43 29 29 3A 8D 33  32 30 00 5C 17 72 06 4E  |,LC)):.320.\.r.N|
00000F40: 24 28 52 2C 43 2C 4C 43  29 B2 56 24 28 52 2C 43  |$(R,C,LC).V$(R,C|
00000F50: 2C 4C 43 29 3A 8D 31 35  33 30 3A 8E 00 67 17 7C  |,LC):.1530:..g.||
00000F60: 06 8F 20 53 41 56 45 00  84 17 86 06 99 43 24 45  |.. SAVE......C$E|
00000F70: 24 22 53 41 56 45 20 20  4D 4F 44 45 22 50 24 3A  |$"SAVE  MODE"P$:|
00000F80: 53 41 B2 31 00 A0 17 90  06 53 41 24 B2 22 57 22  |SA.1.....SA$."W"|
00000F90: 3A 8B 54 24 28 4C 43 29  B2 22 22 A7 31 38 37 30  |:.T$(LC)."".1870|
00000FA0: 00 AF 17 9A 06 8D 31 39  33 30 3A 8B 57 A7 8E 00  |......1930:.W...|
00000FB0: CD 17 A4 06 43 48 24 B2  C7 28 33 34 29 3A 81 52  |....CH$..(34):.R|
00000FC0: B2 30 A4 52 52 3A 81 43  B2 30 A4 4B 4B 00 E9 17  |.0.RR:.C.0.KK...|
00000FD0: AE 06 98 38 2C 43 48 24  22 20 22 AA 56 24 28 52  |...8,CH$" ".V$(R|
00000FE0: 2C 43 2C 4C 43 29 43 48  24 00 05 18 B8 06 98 38  |,C,LC)CH$......8|
00000FF0: 2C 43 48 24 22 20 22 AA  4E 24 28 52 2C 43 2C 4C  |,CH$" ".N$(R,C,L|
00001000: 43 29 43 48 24 00 21 18  C2 06 98 38 2C 43 25 28  |C)CH$.!....8,C%(|
00001010: 52 2C 43 2C 4C 43 29 3A  82 3A 82 3A 89 31 38 35  |R,C,LC):.:.:.185|
00001020: 30 00 2C 18 CC 06 8F 20  4C 4F 41 44 00 4D 18 D6  |0.,.... LOAD.M..|
00001030: 06 99 43 24 45 24 22 4C  4F 41 44 20 4D 4F 44 45  |..C$E$"LOAD MODE|
00001040: 22 50 24 3A 54 24 28 4C  43 29 B2 22 22 00 68 18  |"P$:T$(LC)."".h.|
00001050: E0 06 99 44 24 22 47 49  56 45 54 49 54 4C 45 54  |...D$"GIVETITLET|
00001060: 4F 20 4C 4F 41 44 22 3B  00 81 18 EA 06 53 41 B2  |O LOAD";.....SA.|
00001070: 30 3A 53 41 24 B2 22 52  22 3A 85 54 24 28 4C 43  |0:SA$."R":.T$(LC|
00001080: 29 00 95 18 F4 06 8B 54  24 28 4C 43 29 B2 22 22  |)......T$(LC).""|
00001090: A7 31 38 37 30 00 9F 18  FE 06 8D 31 39 33 30 00  |.1870......1930.|
000010A0: B9 18 08 07 8B 28 57 29  B0 28 45 45 29 A7 54 24  |.....(W).(EE).T$|
000010B0: 28 4C 43 29 B2 22 22 3A  8E 00 CD 18 12 07 81 52  |(LC)."":.......R|
000010C0: B2 30 A4 52 52 3A 81 43  B2 30 A4 4B 4B 00 EA 18  |.0.RR:.C.0.KK...|
000010D0: 1C 07 84 38 2C 57 24 3A  56 24 28 52 2C 43 2C 4C  |...8,W$:V$(R,C,L|
000010E0: 43 29 B2 CA 28 57 24 2C  32 29 00 07 19 26 07 84  |C)..(W$,2)...&..|
000010F0: 38 2C 57 24 3A 4E 24 28  52 2C 43 2C 4C 43 29 B2  |8,W$:N$(R,C,LC).|
00001100: CA 28 57 24 2C 32 29 00  1D 19 30 07 84 38 2C 43  |.(W$,2)...0..8,C|
00001110: 25 28 52 2C 43 2C 4C 43  29 3A 82 3A 82 00 2A 19  |%(R,C,LC):.:..*.|
00001120: 3A 07 8D 32 30 34 30 3A  A0 38 00 42 19 44 07 A0  |:..2040:.8.B.D..|
00001130: 31 35 3A 99 45 24 22 46  49 4E 49 53 48 45 44 22  |15:.E$"FINISHED"|
00001140: 3A 8E 00 58 19 4E 07 99  44 24 45 24 22 4E 4F 20  |:..X.N..D$E$"NO |
00001150: 54 49 54 4C 45 22 44 24  00 63 19 58 07 8F 20 57  |TITLE"D$.c.X.. W|
00001160: 41 49 54 00 78 19 62 07  A1 57 24 3A 8B 57 24 B3  |AIT.x.b..W$:.W$.|
00001170: B1 22 22 A7 31 38 39 30  00 9A 19 6C 07 99 50 24  |."".1890...l..P$|
00001180: 22 50 52 45 53 53 20 52  45 54 55 52 4E 20 54 4F  |"PRESS RETURN TO|
00001190: 20 43 4F 4E 54 49 4E 55  45 22 00 B2 19 76 07 A1  | CONTINUE"...v..|
000011A0: 57 24 3A 8B 57 24 B3 B1  C7 28 31 33 29 A7 31 39  |W$:.W$...(13).19|
000011B0: 31 30 00 BC 19 80 07 99  43 24 3A 8E 00 CF 19 8A  |10......C$:.....|
000011C0: 07 8F 20 44 49 53 4B 20  4F 52 20 54 41 50 45 00  |.. DISK OR TAPE.|
000011D0: EE 19 94 07 99 44 24 22  49 4E 53 45 52 54 20 44  |.....D$"INSERT D|
000011E0: 49 53 43 20 4F 52 20 54  41 50 45 22 44 24 00 0C  |ISC OR TAPE"D$..|
000011F0: 1A 9E 07 57 B2 30 3A 44  54 B2 30 3A A1 57 24 3A  |...W.0:DT.0:.W$:|
00001200: 8B 57 24 B3 B1 22 22 A7  31 39 35 30 00 2C 1A A8  |.W$.."".1950.,..|
00001210: 07 99 50 24 22 54 48 45  4E 3A 54 41 50 45 20 4F  |..P$"THEN:TAPE O|
00001220: 52 20 44 49 53 4B 3F 20  54 2F 44 22 00 40 1A B2  |R DISK? T/D".@..|
00001230: 07 A1 57 24 3A 8B 57 24  B2 22 22 A7 31 39 37 30  |..W$:.W$."".1970|
00001240: 00 61 1A BC 07 8B 57 24  B2 22 54 22 A7 9F 38 2C  |.a....W$."T"..8,|
00001250: 31 2C 53 41 2C 54 24 28  4C 43 29 3A 89 32 30 33  |1,SA,T$(LC):.203|
00001260: 30 00 79 1A C6 07 8B 57  24 B3 B1 22 44 22 A7 57  |0.y....W$.."D".W|
00001270: B2 AB 31 3A 99 43 24 3A  8E 00 86 1A D0 07 9F 31  |..1:.C$:.......1|
00001280: 35 2C 38 2C 31 35 00 A1  1A DA 07 8B 53 41 B2 31  |5,8,15......SA.1|
00001290: A7 98 31 35 2C 22 53 4F  3A 22 AA 54 24 28 4C 43  |..15,"SO:".T$(LC|
000012A0: 29 00 C8 1A E4 07 9F 38  2C 38 2C 38 2C 22 4F 3A  |)......8,8,8,"O:|
000012B0: 22 AA 54 24 28 4C 43 29  AA 22 2C 53 2C 22 AA 53  |".T$(LC).",S,".S|
000012C0: 41 24 3A 44 54 B2 AB 31  00 D4 1A EE 07 8D 32 30  |A$:DT..1......20|
000012D0: 34 30 3A 8E 00 E6 1A F8  07 8F 20 45 52 52 4F 52  |40:....... ERROR|
000012E0: 20 43 48 45 43 4B 00 FB  1A 02 08 45 45 B2 30 3A  | CHECK.....EE.0:|
000012F0: 8B 44 54 B2 AB 31 A7 32  30 38 30 00 16 1B 0C 08  |.DT..1.2080.....|
00001300: 8B 28 28 28 53 54 29 AF  28 36 33 29 29 B3 B1 30  |.(((ST).(63))..0|
00001310: 29 A7 32 31 30 30 00 1C  1B 16 08 8E 00 2C 1B 20  |).2100.......,. |
00001320: 08 84 31 35 2C 41 37 24  2C 42 37 24 00 3D 1B 2A  |..15,A7$,B7$.=.*|
00001330: 08 8B C5 28 41 37 24 29  B3 32 30 A7 8E 00 4E 1B  |...(A7$).20...N.|
00001340: 34 08 A0 38 3A A0 31 35  3A 45 45 B2 AB 31 00 6F  |4..8:.15:EE..1.o|
00001350: 1B 3E 08 99 43 24 45 24  22 44 49 53 43 20 2F 20  |.>..C$E$"DISC / |
00001360: 54 41 50 45 20 45 52 52  4F 52 20 22 41 37 24 00  |TAPE ERROR "A7$.|
00001370: 8F 1B 48 08 8B 44 54 A7  99 44 24 22 57 48 49 43  |..H..DT..D$"WHIC|
00001380: 48 20 4D 45 41 4E 53 20  20 22 42 37 24 44 24 00  |H MEANS  "B7$D$.|
00001390: 9B 1B 52 08 8D 31 38 38  30 3A 8E 00 A7 1B 5C 08  |..R..1880:....\.|
000013A0: 8F 20 50 52 49 4E 54 00  B4 1B 66 08 97 5A 2C 30  |. PRINT...f..Z,0|
000013B0: 3A 44 B2 30 00 D3 1B 70  08 99 43 24 50 24 44 24  |:D.0...p..C$P$D$|
000013C0: 22 53 57 49 54 43 48 20  50 52 49 4E 54 45 52 20  |"SWITCH PRINTER |
000013D0: 4F 4E 22 00 E8 1B 7A 08  8D 31 38 38 30 3A 9F 34  |ON"...z..1880:.4|
000013E0: 2C 34 3A 8D 32 32 35 30  00 03 1C 84 08 98 34 2C  |,4:.2250......4,|
000013F0: 53 33 24 22 2A 20 4D 49  4E 49 20 53 48 45 45 54  |S3$"* MINI SHEET|
00001400: 20 2A 22 00 21 1C 8E 08  98 34 2C 53 34 24 22 54  | *".!....4,S4$"T|
00001410: 49 54 4C 45 3A 22 54 24  28 4C 43 29 C7 28 31 33  |ITLE:"T$(LC).(13|
00001420: 29 00 35 1C 98 08 81 52  B2 30 A4 52 52 3A 98 34  |).5....R.0.RR:.4|
00001430: 2C 53 34 24 3B 00 51 1C  A2 08 98 34 2C C7 28 36  |,S4$;.Q....4,.(6|
00001440: 35 AA 52 29 22 3A 20 22  3B 3A 81 43 B2 30 A4 4B  |5.R)": ";:.C.0.K|
00001450: 4B 00 71 1C AC 08 98 34  2C C9 28 53 50 24 AA 56  |K.q....4,.(SP$.V|
00001460: 24 28 52 2C 43 2C 4C 43  29 2C 38 29 3B 22 20 22  |$(R,C,LC),8);" "|
00001470: 3B 00 7C 1C B6 08 82 3A  98 34 3A 82 00 8B 1C C0  |;.|....:.4:.....|
00001480: 08 8D 32 32 35 30 3A A0  34 3A 8E 00 9F 1C CA 08  |..2250:.4:......|
00001490: 98 34 2C 53 34 24 3B 3A  81 57 B2 31 A4 33 38 00  |.4,S4$;:.W.1.38.|
000014A0: B2 1C D4 08 98 34 2C 22  2D 22 3B 3A 82 3A 98 34  |.....4,"-";:.:.4|
000014B0: 3A 8E 00 B8 1C 02 D9 90  00 00 00                 |:..........     |

....... MINI SHEET.7.... FROM CCI TYPED 
IN BY THE LONER.S....53281,2:.53280,15:B
Z.4.S...H$.G(19):C$.G(147):D$.G(17)...(.
J$.G(144):B$.G(5):E$.G(30)...2.RR.15:.C$
D$E$:.W.1.9.E.<...13)"* MINI SHEET *"...
F..:.W.1.8:SP$.SP$." ":....P..W.1.75:S1$
.S1$." ":....Z.S2$.H(S1$,65):S3$.H(S1$,3
3).:.D.S4$.H(S1$,20):S5$.H(S1$,13).V.N.K
K.3:R$.G(18):F$.G(146)...X..V$(RR,KK,BZ)
,N$(RR,KK,BZ),C%(RR,KK,BZ).....Z.53269:.
Z,0:.900......G(8):P$.G(152):.950...... 
COMPUTE... ..Z,0:.C$D$D$D$"A1=-VAL(V$";.
....."(R,C,LC))*C%(R,C,LC):GOTO210".....
.C.0.KK:.R.0.RR:.H$D$D$.=....H$D$D$D$G(6
5.R)G(49.C)H$.R.H..198,1:.631,13:..B.R..
:.:C.0:R.0.....W$.N$(R,C,LC):..(C%(R,C,L
C)).290......C$D$D$:.B$"CE="E$W$B$......
D$D$G(65.R)G(49.C);.N...."=CE:GOTO280"..
...."GOTO480"P$H$:.633,13......198,3:.63
1,13:.632,13:......W.CE:.320...".R.R.1:.
R.RR.R.0:C.C.1.=.,..C..KK.220.K.6..790:.
950.[.@.. ROUND OFF.S.J..W.0.W$."0.00":.
470...T.B.2:.W.0.B.1...^.A.(W.9999999).(
W...9999999).B.H.A.(A).(.(W)..0.01):.A.4
20.Y.R.E..(.(.(W))..(10))...|.A.2:.(E.0)
.A.1.....EE$.J(D(E),A):W1.C(EE$).#...W$.
J(D(W.10.E),B,7.W1).:...W$.W$."E".EE$:.4
70.X...W$.D(.(W)..(.(W).100..5)).I....C(
W$).2.450.....W$.H(W$,1)."0".I(W$,1)...B
.W1$.H(W$,C(W$).2)...L.W$.J(W1$.".".I(W$
,2),B,8).U.V.V$(R,C,LC).I(SP$.W$,8):....
..AD.C(W$).1:.W.3.AD......J(W$,W,1).."\"
..:.560.'...W1$.H(W$,W.3):W3$.J(W$,W.2).
F...A1$.D(F(J(W$,W.2)).65).",".D...A2$.D
(E(J(W$,W.1)).1).",".V...A3$.J(W$,W.1)..
...W2$."VAL(V$(".A1$.A2$.A3$."))"...&.W$
.W1$.W2$.W3$:W.AD:.:.230.G.0..W.2.C(W$).
..:..J(W$,W,1).."\"..:.600...D.W$.H(W$,W
.1).":".J(W$,W.1)...N.W.C(W$):.:.230.).X
.W$.I("ZZZ".W$,3).?.B..I(W$,1).."$".660.
^.L.R.F(W$).65:C.F(J(W$,2)).49.T.V..(R.0
).(R.RR).660......(C.0).(C.KK).660......
220......E$"ERROR CAUSED BY"......"ROW "
G(R.65);.Z...." :COL "G(C.49);P$D$......
1880:.C$:.1530:.950...... SHOW SS...F..H
$S5$"  "J$"MINI SHEET".7.P..E$"TITLE:"P$
T$(LC);.M.Z...28)"PAGE NO."LC.Q....R$D$E
$" ...1...  ...2...    ";......"...3... 
  ...4...   ";......R.0.RR:.E$R$G(65.R)F
$P$;.F....C.0.KK:.V$(R,C,LC)P$.P....:.:.
...... DISPLAY... ..C$:.700:R.0:C.0...*.
.820:....4.. SHOW CELL.*.>.D.1:.H$P$G(65
.R)G(49.C).D.H..781,20:.782,0:.65520.M.R
..S1$.E.\..65520:.Z,0:V.53264...F..N$(R,
C,LC):X.C.80.32:Y.R.8.81. .P..V,0:.C.3.X
.16:.V,1...Z..Z.21,X:.Z.21,Y:..C.... SPR
ITE......Z.18,7:.Z.8,1:.Z.6,1......Z.2,0
:.2040,11......W.731.767:.W,0:..!....W.7
04.730:.W,255:.:../.... CONTROL.I....781
,22:.782,0:.65520.L.J..J$"_=CLEAR CELL ?
=PRINT C=C";...T.."LR^ \=NEXT PAGE".....
.E$"F1=LABEL F3=NUMBER ";.A...."F5=FORMU
LA F7=DISPLAY"J$;......"F2=COMP  F4=TITL
E  ";......"F6=SAVE    F8=LOAD"H$P$.....
.W$:.W$.."".1030.)....Z,D:.W$:.W$."".104
0.>...W.F(W$):.D.0..C$.W.$..(W$."_").(D.
1).1390.P....(W$."?")..2140:.950...8..(W
$.."\").1110. .B.LC.LC.1:.LC.(BZ.1).LC.0
...L..1270.N.V.K.(W.17).(W.29).(W.157).(
W.145)...`..W$."C".1170...J..K.1330...T.
.(W.133).(W.140).950.#.~..W.132.1310,132
0,1280,1270.A....W.136.150,1290,1250,126
0.F....C$E$"CLEAR SHEET:"P$"SURE? Y/N".Z
....W$:.W$."".1190......W$.."Y".1270....
..C$:.R.0.15:.C.0.3...D.C%(R,C,LC).0.T.N
.N$(R,C,LC)."":V$(R,C,LC).""...X..:.:T$(
LC)."":.1270.....D.0:.Z,0:.1660:.950....
.D.0:.Z,0:.1740:.950.*....790:.950.9....
1410:.950.Y....Z,0:.C$D$:."TITLE=";T$(LC
).{...T$(LC).H(T$(LC),16):.790:.950.....
.1560:.950...(..1620:.950...2..D.0.950..
.<..(W.17).(R.RR).R.R.1.X.F..(W.29).(C.K
K).C.C.1...P..(W.145).(R.0).R.R.1...Z..(
W.157).(C.0).C.C.1...D..820:.1030.F.N.N$
(R,C,LC)."":V$(R,C,LC)."":C%(R,C,LC).0.Y
.X..C$:.1530:.950.K.... GET FORMULA.V...
.D.0........781,20:.782,0:.65520... .." 
 ";......N$(R,C,LC);.L....H(S2$,(65.C(N$
(R,C,LC))));.W....65520...H..N$(R,C,LC):
V$(R,C,LC)."       ?"...R.N$(R,C,LC).H(N
$(R,C,LC),65).;...C%(R,C,LC).N$(R,C,LC).
."".L....W.135..1530.R.....H.... UPDATE 
 DISPLAY.{...RA.R:KA.C:.700.....R.RA:C.K
A:.820:....... LABEL..."..D.0.....,..141
0:C%(R,C,LC).0...6.W$.I(SP$.H(N$(R,C,LC)
,8),8)...@.V$(R,C,LC).G(151).W$...J..153
0:....T.. NUMBER...^..D.0...:.H..1410:W.
E(N$(R,C,LC)):.320.\.R.N$(R,C,LC).V$(R,C
,LC):.1530:..G.|.. SAVE......C$E$"SAVE  
MODE"P$:SA.1. ...SA$."W":.T$(LC)."".1870
......1930:.W...M...CH$.G(34):.R.0.RR:.C
.0.KK......8,CH$" ".V$(R,C,LC)CH$......8
,CH$" ".N$(R,C,LC)CH$.!.B..8,C%(R,C,LC):
.:.:.1850.,.L.. LOAD.M.V..C$E$"LOAD MODE
"P$:T$(LC)."".H....D$"GIVETITLETO LOAD";
.....SA.0:SA$."R":.T$(LC)......T$(LC).""
.1870......1930......(W).(EE).T$(LC)."":
..M....R.0.RR:.C.0.KK......8,W$:V$(R,C,L
C).J(W$,2)...&..8,W$:N$(R,C,LC).J(W$,2).
..0..8,C%(R,C,LC):.:..*.:..2040: 8.B.D. 
15:.E$"FINISHED":..X.N..D$E$"NO TITLE"D$
.C.X.. WAIT.X.B..W$:.W$.."".1890...L..P$
"PRESS RETURN TO CONTINUE"...V..W$:.W$..
G(13).1910......C$:..O.... DISK OR TAPE.
.....D$"INSERT DISC OR TAPE"D$.....W.0:D
T.0:.W$:.W$.."".1950.,....P$"THEN:TAPE O
R DISK? T/D".@....W$:.W$."".1970.A....W$
."T"..8,1,SA,T$(LC):.2030.Y.F..W$.."D".W
..1:.C$:....P..15,8,15...Z..SA.1..15,"SO
:".T$(LC).H....8,8,8,"O:".T$(LC).",S,".S
A$:DT..1.T....2040:....... ERROR CHECK..
...EE.0:.DT..1.2080......(((ST).(63))..0
).2100.......,. ..15,A7$,B7$.=.*..E(A7$)
.20...N.4. 8: 15:EE..1.O.>..C$E$"DISC / 
TAPE ERROR "A7$...H..DT..D$"WHICH MEANS 
 "B7$D$...R..1880:....\.. PRINT...F..Z,0
:D.0.S.P..C$P$D$"SWITCH PRINTER ON"...Z.
.1880:.4,4:.2250......4,S3$"* MINI SHEET
 *".!....4,S4$"TITLE:"T$(LC)G(13).5....R
.0.RR:.4,S4$;.Q....4,G(65.R)": ";:.C.0.K
K.Q....4,I(SP$.V$(R,C,LC),8);" ";.|....:
.4:.......2250: 4:....J..4,S4$;:.W.1.38.
..T..4,"-";:.:.4:.....Y....

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL