EASYCALC-I
FILE INFORMATION
FILENAME(S): EASYCALC-I
FILE TYPE(S): PRG
FILE SIZE: 3.7K
FIRST SEEN: 2025-12-01 13:51:02
APPEARS ON: 1 disk(s)
FILE HASH
c17633c9534db3fcd95262c6969da28f74cbc7ef31d2c5aef288c2af7ba047d8
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| CX015 | EASYCALC-I | PRG | hedning, Knutsson | 20 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 17 08 C8 00 8F 20 20 20 20 20 20 20 20 45 |....... E|
00000010: 41 53 59 43 41 4C 43 00 2C 08 D2 00 8F 20 20 20 |ASYCALC.,.... |
00000020: 20 20 20 20 20 28 43 29 20 20 42 59 00 43 08 DC | (C) BY.C..|
00000030: 00 8F 20 20 20 20 20 20 20 20 4E 45 4C 56 41 53 |.. NELVAS|
00000040: 4F 46 54 00 49 08 E1 00 8F 00 7F 08 E6 00 86 46 |OFT.I..........F|
00000050: 24 28 32 36 2C 35 34 29 3A 58 B2 31 3A 59 B2 31 |$(26,54):X.1:Y.1|
00000060: 3A 50 B2 30 3A 97 35 33 32 38 30 2C 36 3A 97 35 |:P.0:.53280,6:.5|
00000070: 33 32 38 31 2C 36 3A 97 36 35 30 2C 31 32 38 00 |3281,6:.650,128.|
00000080: 99 08 F0 00 86 53 24 28 35 30 29 2C 4D 24 28 35 |.....S$(50),M$(5|
00000090: 30 29 3A 4C 41 53 54 B2 31 00 CB 08 FA 00 4B 56 |0):LAST.1.....KV|
000000A0: 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |$." |
000000B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000C0: 20 20 20 20 20 20 20 20 20 20 22 00 ED 08 04 01 | ".....|
000000D0: 4B 5A 24 B2 22 13 11 11 11 11 11 11 11 11 11 11 |KZ$."...........|
000000E0: 11 11 11 11 11 11 11 11 11 11 11 11 22 00 F6 08 |............"...|
000000F0: 0E 01 8D 33 31 30 00 FF 08 18 01 8D 34 31 30 00 |...310......410.|
00000100: 08 09 22 01 89 35 31 30 00 29 09 2C 01 8F 2A 2A |.."..510.).,..**|
00000110: 2A 2A 20 53 55 42 52 4F 55 54 49 4E 45 20 53 54 |** SUBROUTINE ST|
00000120: 41 4D 50 41 20 2A 2A 2A 2A 00 52 09 36 01 99 22 |AMPA ****.R.6.."|
00000130: 93 9E 22 3B A3 31 32 29 3B 22 2A 2A 2A 20 45 41 |..";.12);"*** EA|
00000140: 53 59 43 41 4C 43 20 2A 2A 2A 11 22 3A 99 A6 33 |SYCALC ***.":..3|
00000150: 29 3B 00 5D 09 40 01 81 49 B2 31 A4 33 00 76 09 |);.].@..I.1.3.v.|
00000160: 4A 01 99 A6 34 29 3B C7 28 49 AA 36 34 AA 4C 31 |J...4);.(I.64.L1|
00000170: 29 3B A6 34 29 3B 00 8E 09 54 01 82 3A 99 A6 34 |);.4);...T..:..4|
00000180: 29 3B C7 28 49 AA 36 34 AA 4C 31 29 3A 99 00 99 |);.(I.64.L1):...|
00000190: 09 5E 01 99 22 91 22 20 3B 00 A5 09 68 01 81 49 |.^.."." ;...h..I|
000001A0: B2 31 A4 31 38 00 CB 08 72 01 99 22 2A 9D 22 3B |.1.18...r.."*.";|
000001B0: 49 AA 4C 32 3B 22 9D 22 3B A6 33 AB C3 28 C4 28 |I.L2;".";.3..(.(|
000001C0: 49 AA 4C 32 29 29 29 3B 22 C2 22 00 D2 09 7C 01 |I.L2)));"."...|.|
000001D0: 99 3B 00 D8 09 86 01 82 00 DE 09 90 01 8E 00 FB |.;..............|
000001E0: 09 9A 01 8F 2A 2A 2A 2A 2A 2A 2A 20 43 55 52 53 |....******* CURS|
000001F0: 4F 52 20 2A 2A 2A 2A 2A 2A 2A 2A 00 15 0A A4 01 |OR ********.....|
00000200: 53 24 B2 46 24 28 58 AA 4C 31 2C 59 AA 4C 32 29 |S$.F$(X.L1,Y.L2)|
00000210: 3A 99 22 13 22 00 1F 0A AE 01 43 24 B2 22 22 00 |:.".".....C$."".|
00000220: 3C 0A B8 01 81 49 B2 C3 28 53 24 29 AA 31 A4 38 |<....I..(S$).1.8|
00000230: 3A 43 24 B2 43 24 AA 22 20 22 3A 82 00 4E 0A C2 |:C$.C$." ":..N..|
00000240: 01 43 24 B2 C8 28 53 24 AA 43 24 2C 38 29 00 60 |.C$..(S$.C$,8).`|
00000250: 0A CC 01 81 49 B2 31 A4 59 3A 99 3A 82 49 3A 99 |....I.1.Y:.:.I:.|
00000260: 00 72 0A D6 01 99 A3 39 AC 28 58 AB 31 29 AA 34 |.r.....9.(X.1).4|
00000270: 29 3B 00 7F 0A E0 01 8B 50 B2 31 A7 99 43 24 00 |);......P.1..C$.|
00000280: 95 0A EA 01 8B 50 B2 30 A7 99 22 12 22 3B 43 24 |.....P.0..".";C$|
00000290: 3B 22 92 22 3B 00 9B 0A F4 01 8E 00 BD 0A FE 01 |;".";...........|
000002A0: 8F 2A 2A 2A 2A 2A 2A 20 49 4E 50 55 54 20 43 4F |.****** INPUT CO|
000002B0: 4D 41 4E 44 49 20 2A 2A 2A 2A 2A 2A 2A 00 C7 0A |MANDI *******...|
000002C0: 08 02 99 22 9E 22 3B 00 D1 0A 12 02 99 4B 5A 24 |...".";......KZ$|
000002D0: 3B 00 D9 0A 1C 02 47 B2 31 00 E3 0A 26 02 8D 31 |;.....G.1...&..1|
000002E0: 36 36 30 00 F6 0A 30 02 A1 41 24 3A 8B 41 24 B2 |660...0..A$:.A$.|
000002F0: 22 22 A7 35 36 30 00 16 0B 3A 02 8F 20 49 46 41 |"".560...:.. IFA|
00000300: 24 3D 22 4C 22 54 48 45 4E 32 30 30 30 3A 52 45 |$="L"THEN2000:RE|
00000310: 4D 20 4C 4F 41 44 00 3B 0B 44 02 8F 20 49 46 41 |M LOAD.;.D.. IFA|
00000320: 24 3D 22 57 22 54 48 45 4E 47 4F 53 55 42 33 30 |$="W"THENGOSUB30|
00000330: 30 30 3A 52 45 4D 20 53 41 56 45 00 57 0B 4E 02 |00:REM SAVE.W.N.|
00000340: 8B 41 24 B2 22 53 22 A7 8D 31 36 30 30 3A 8F 20 |.A$."S"..1600:. |
00000350: 53 48 4F 57 20 46 2E 00 71 0B 58 02 8B 41 24 B2 |SHOW F..q.X..A$.|
00000360: 22 91 22 A7 37 33 30 3A 8F 20 43 52 53 52 20 55 |".".730:. CRSR U|
00000370: 50 00 8D 0B 62 02 8B 41 24 B2 22 11 22 A7 37 37 |P...b..A$.".".77|
00000380: 30 3A 8F 20 43 52 53 52 20 44 4F 57 4E 00 A9 0B |0:. CRSR DOWN...|
00000390: 6C 02 8B 41 24 B2 22 9D 22 A7 38 31 30 3A 8F 20 |l..A$.".".810:. |
000003A0: 43 52 53 52 20 4C 45 46 54 00 C6 0B 76 02 8B 41 |CRSR LEFT...v..A|
000003B0: 24 B2 22 1D 22 A7 38 35 30 3A 8F 20 43 52 53 52 |$.".".850:. CRSR|
000003C0: 20 52 49 47 48 54 00 E2 0B 80 02 8B 41 24 B2 22 | RIGHT......A$."|
000003D0: 86 22 A7 39 30 30 3A 8F 20 53 43 52 45 45 4E 20 |.".900:. SCREEN |
000003E0: 55 50 00 00 0C 8A 02 8B 41 24 B2 22 85 22 A7 39 |UP......A$.".".9|
000003F0: 32 30 3A 8F 20 53 43 52 45 45 4E 20 44 4F 57 4E |20:. SCREEN DOWN|
00000400: 00 1E 0C 94 02 8B 41 24 B2 22 87 22 A7 39 35 30 |......A$.".".950|
00000410: 3A 8F 20 53 43 52 45 45 4E 20 4C 45 46 54 00 3D |:. SCREEN LEFT.=|
00000420: 0C 9E 02 8B 41 24 B2 22 88 22 A7 39 38 30 3A 8F |....A$.".".980:.|
00000430: 20 53 43 52 45 45 4E 20 52 49 47 48 54 00 5A 0C | SCREEN RIGHT.Z.|
00000440: A8 02 8B 41 24 B2 22 56 22 A7 31 30 31 30 3A 8F |...A$."V".1010:.|
00000450: 20 64 57 2E 20 56 41 4C 55 45 00 79 0C B2 02 8B | dW. VALUE.y....|
00000460: 41 24 B2 22 46 22 A7 31 30 38 30 3A 8F 20 64 57 |A$."F".1080:. dW|
00000470: 2E 20 46 4F 52 4D 55 4C 41 00 94 0C BC 02 8B 41 |. FORMULA......A|
00000480: 24 B2 22 43 22 A7 31 34 31 30 3A 8F 20 43 41 4C |$."C".1410:. CAL|
00000490: 43 4F 4C 41 00 B5 0C C6 02 8B 41 24 B2 22 45 22 |COLA......A$."E"|
000004A0: A7 31 37 31 30 3A 8F 20 45 52 41 53 45 20 46 4F |.1710:. ERASE FO|
000004B0: 52 4D 55 4C 41 00 BE 0C D0 02 89 35 33 30 00 D9 |RMULA......530..|
000004C0: 0C DA 02 8F 2A 2A 2A 2A 2A 2A 20 43 52 53 52 20 |....****** CRSR |
000004D0: 55 50 20 2A 2A 2A 2A 2A 2A 00 E6 0C E4 02 50 B2 |UP ******.....P.|
000004E0: 31 3A 8D 34 31 30 00 FD 0C EE 02 59 B2 59 AB 31 |1:.410.....Y.Y.1|
000004F0: 3A 50 B2 30 3A 8B 59 B3 31 A7 39 32 30 00 0B 0D |:P.0:.Y.1.920...|
00000500: F8 02 8D 34 31 30 3A 89 35 31 30 00 26 0D 02 03 |...410:.510.&...|
00000510: 8F 2A 2A 2A 2A 2A 2A 20 43 52 53 52 20 44 4F 57 |.****** CRSR DOW|
00000520: 4E 20 2A 2A 2A 2A 00 33 0D 0C 03 50 B2 31 3A 8D |N ****.3...P.1:.|
00000530: 34 31 30 00 4B 0D 16 03 59 B2 59 AA 31 3A 50 B2 |410.K...Y.Y.1:P.|
00000540: 30 3A 8B 59 B1 31 38 A7 39 30 30 00 59 0D 20 03 |0:.Y.18.900.Y. .|
00000550: 8D 34 31 30 3A 89 35 31 30 00 74 0D 2A 03 8F 2A |.410:.510.t.*..*|
00000560: 2A 2A 2A 2A 2A 20 43 52 53 52 20 4C 45 46 54 20 |***** CRSR LEFT |
00000570: 2A 2A 2A 2A 00 81 0D 34 03 50 B2 31 3A 8D 34 31 |****...4.P.1:.41|
00000580: 30 00 98 0D 3E 03 58 B2 58 AB 31 3A 50 B2 30 3A |0...>.X.X.1:P.0:|
00000590: 8B 58 B3 31 A7 39 35 30 00 A6 0D 48 03 8D 34 31 |.X.1.950...H..41|
000005A0: 30 3A 89 35 31 30 00 C1 0D 52 03 8F 2A 2A 2A 2A |0:.510...R..****|
000005B0: 2A 2A 20 43 52 53 52 20 52 49 47 48 54 20 2A 2A |** CRSR RIGHT **|
000005C0: 2A 00 CE 0D 5C 03 50 B2 31 3A 8D 34 31 30 00 E5 |*...\.P.1:.410..|
000005D0: 0D 66 03 58 B2 58 AA 31 3A 50 B2 30 3A 8B 58 B1 |.f.X.X.1:P.0:.X.|
000005E0: 34 A7 39 38 30 00 F3 0D 70 03 8D 34 31 30 3A 89 |4.980...p..410:.|
000005F0: 35 31 30 00 0D 0E 7A 03 8F 2A 2A 2A 20 53 43 52 |510...z..*** SCR|
00000600: 45 45 4E 20 55 50 20 2A 2A 2A 2A 2A 2A 00 28 0E |EEN UP ******.(.|
00000610: 80 03 4C 32 B2 4C 32 AA 39 3A 8B 4C 32 B1 33 36 |..L2.L2.9:.L2.36|
00000620: A7 4C 32 B2 4C 32 AB 39 00 46 0E 8E 03 8D 33 31 |.L2.L2.9.F....31|
00000630: 30 3A 59 B2 31 30 3A 8D 31 33 33 30 3A 8D 34 31 |0:Y.10:.1330:.41|
00000640: 30 3A 89 35 31 30 00 60 0E 98 03 8F 2A 2A 2A 20 |0:.510.`....*** |
00000650: 53 43 52 45 45 4E 20 44 4F 57 4E 20 2A 2A 2A 2A |SCREEN DOWN ****|
00000660: 00 7A 0E A2 03 4C 32 B2 4C 32 AB 39 3A 8B 4C 32 |.z...L2.L2.9:.L2|
00000670: B3 30 A7 4C 32 B2 4C 32 AA 39 00 98 0E AC 03 8D |.0.L2.L2.9......|
00000680: 33 31 30 3A 59 B2 31 38 3A 8D 31 33 33 30 3A 8D |310:Y.18:.1330:.|
00000690: 34 31 30 3A 89 35 31 30 00 B2 0E B6 03 8F 2A 2A |410:.510......**|
000006A0: 2A 20 53 43 52 45 45 4E 20 4C 45 46 54 20 2A 2A |* SCREEN LEFT **|
000006B0: 2A 2A 00 CC 0E C0 03 4C 31 B2 4C 31 AB 32 3A 8B |**.....L1.L1.2:.|
000006C0: 4C 31 B3 30 A7 4C 31 B2 4C 31 AA 32 00 E9 0E CA |L1.0.L1.L1.2....|
000006D0: 03 8D 33 31 30 3A 58 B2 31 3A 8D 31 33 33 30 3A |..310:X.1:.1330:|
000006E0: 8D 34 31 30 3A 89 35 30 30 00 03 0F D4 03 8F 2A |.410:.500......*|
000006F0: 2A 2A 20 53 43 52 45 45 4E 20 52 49 47 48 54 20 |** SCREEN RIGHT |
00000700: 2A 2A 2A 00 1E 0F DE 03 4C 31 B2 4C 31 AA 32 3A |***.....L1.L1.2:|
00000710: 8B 4C 31 B1 32 32 A7 4C 31 B2 4C 31 AB 32 00 3B |.L1.22.L1.L1.2.;|
00000720: 0F E8 03 8D 33 31 30 3A 58 B2 34 3A 8D 31 33 33 |....310:X.4:.133|
00000730: 30 3A 8D 34 31 30 3A 89 35 31 30 00 54 0F F2 03 |0:.410:.510.T...|
00000740: 8F 2A 2A 2A 20 49 53 45 52 54 20 56 41 4C 55 45 |.*** ISERT VALUE|
00000750: 20 2A 2A 2A 00 74 0F FC 03 99 4B 5A 24 3B 22 56 | ***.t....KZ$;"V|
00000760: 41 4C 55 45 20 20 20 20 20 20 20 20 20 20 20 20 |ALUE |
00000770: 20 20 20 22 00 81 0F 06 04 99 4B 56 24 3B 22 91 | "......KV$;".|
00000780: 22 00 92 0F 10 04 85 42 24 3A 99 22 91 22 3B 4B |"......B$:.".";K|
00000790: 56 24 00 BA 0F 1A 04 99 22 91 91 20 20 20 20 20 |V$......".. |
000007A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000007B0: 20 20 20 20 20 20 20 20 20 22 00 D4 0F 24 04 46 | "...$.F|
000007C0: 24 28 58 AA 4C 31 2C 59 AA 4C 32 29 B2 C8 28 42 |$(X.L1,Y.L2)..(B|
000007D0: 24 2C 38 29 00 E2 0F 2E 04 8D 34 31 30 3A 89 35 |$,8)......410:.5|
000007E0: 31 30 00 FB 0F 38 04 8F 2A 2A 2A 20 49 53 45 52 |10...8..*** ISER|
000007F0: 54 20 46 4F 52 4D 55 4C 41 20 2A 00 1B 10 42 04 |T FORMULA *...B.|
00000800: 99 4B 5A 24 3B 22 46 4F 52 4D 55 4C 41 20 20 20 |.KZ$;"FORMULA |
00000810: 20 20 20 20 20 20 20 20 20 20 22 00 28 10 4C 04 | ".(.L.|
00000820: 99 4B 56 24 3B 22 91 22 00 39 10 56 00 85 46 24 |.KV$;".".9.V..F$|
00000830: 3A 99 22 91 22 3B 4B 56 24 00 49 10 60 04 53 24 |:.".";KV$.I.`.S$|
00000840: 28 4C 41 53 54 29 B2 46 24 00 55 10 6A 04 47 B2 |(LAST).F$.U.j.G.|
00000850: C3 28 46 24 29 00 5D 10 74 04 46 B2 31 00 83 10 |.(F$).].t.F.1...|
00000860: 7E 04 8B CA 28 46 24 2C 46 2C 31 29 B3 22 41 22 |~...(F$,F,1)."A"|
00000870: B0 CA 28 46 20 2C 46 2C 31 29 B1 22 5A 22 A7 31 |..(F ,F,1)."Z".1|
00000880: 32 33 30 00 96 10 88 04 4A 24 B2 CA 28 46 24 2C |230.....J$..(F$,|
00000890: 46 AA 31 2C 31 29 00 B1 10 92 04 8B 4A 24 B1 B2 |F.1,1)......J$..|
000008A0: 22 41 22 AF 4A 24 B3 B2 22 5A 22 A7 46 B2 46 AA |"A".J$.."Z".F.F.|
000008B0: 34 00 C4 10 9C 04 5A 24 B2 CA 28 46 24 2C 46 AA |4.....Z$..(F$,F.|
000008C0: 32 2C 31 29 00 DE 10 A6 04 8B 5A 24 B1 B2 22 30 |2,1)......Z$.."0|
000008D0: 22 AF 5A 24 B3 B2 22 39 22 A7 31 37 37 30 00 02 |".Z$.."9".1770..|
000008E0: 11 B0 04 47 24 B2 CA 28 46 24 2C 46 AA 31 2C 31 |...G$..(F$,F.1,1|
000008F0: 29 AA 22 29 29 22 AA CA 28 42 24 2C 46 AA 32 2C |)."))"..(B$,F.2,|
00000900: 47 29 00 37 11 BA 04 46 24 B2 C8 28 46 24 2C 46 |G).7...F$..(F$,F|
00000910: AB 31 29 AA 22 56 41 4C 28 46 24 28 22 AA C4 28 |.1)."VAL(F$("..(|
00000920: C6 28 CA 28 46 24 2C 46 2C 31 29 29 AB 36 34 29 |.(.(F$,F,1)).64)|
00000930: AA 22 2C 22 AA 47 24 00 41 11 C4 04 46 B2 46 AA |.",".G$.A...F.F.|
00000940: 35 00 5D 11 CE 04 47 B2 C3 28 46 24 29 3A 46 B2 |5.]...G..(F$):F.|
00000950: 46 AA 31 3A 8B 46 B3 47 A7 31 31 35 30 00 72 11 |F.1:.F.G.1150.r.|
00000960: D8 04 46 24 B2 C9 28 46 24 2C C3 28 46 24 29 AB |..F$..(F$,.(F$).|
00000970: 34 29 00 81 11 E2 04 81 46 B2 31 A4 C3 28 46 24 |4)......F.1..(F$|
00000980: 29 00 9A 11 EC 04 8B CA 28 46 24 2C 46 2C 31 29 |).......(F$,F,1)|
00000990: B3 B1 22 3D 22 A7 31 32 39 30 00 C5 11 F6 04 46 |.."=".1290.....F|
000009A0: 24 B2 C8 28 46 24 2C 46 28 AA 22 53 54 52 24 28 |$..(F$,F(."STR$(|
000009B0: 22 AA CA 28 46 24 2C 46 AA 31 2C C3 28 46 24 29 |"..(F$,F.1,.(F$)|
000009C0: 29 AA 22 29 22 00 E4 11 00 05 46 24 B2 C8 28 46 |).")".....F$..(F|
000009D0: 24 2C 46 AB 32 29 AA CA 28 46 24 2C 46 2C C3 28 |$,F.2)..(F$,F,.(|
000009E0: 46 24 29 29 00 EA 11 0A 05 82 00 01 12 14 05 8B |F$))............|
000009F0: C3 28 46 24 29 B1 37 39 A7 45 B2 30 3A 89 35 31 |.(F$).79.E.0:.51|
00000A00: 30 00 1D 12 1E 05 4D 24 28 4C 41 53 54 29 B2 46 |0.....M$(LAST).F|
00000A10: 24 3A 4C 41 53 54 B2 4C 41 53 54 AA 31 00 27 12 |$:LAST.LAST.1.'.|
00000A20: 28 05 89 31 34 31 30 00 41 12 32 05 8F 2A 2A 2A |(..1410.A.2..***|
00000A30: 2A 2A 2A 20 41 47 47 49 4F 52 4E 41 20 2A 2A 2A |*** AGGIORNA ***|
00000A40: 2A 00 56 12 3C 05 81 59 31 B2 31 A4 31 38 3A 81 |*.V.<..Y1.1.18:.|
00000A50: 58 31 B2 31 A4 34 00 6D 12 46 05 53 24 B2 46 24 |X1.1.4.m.F.S$.F$|
00000A60: 28 58 31 AA 4C 31 2C 59 31 AA 4C 32 29 00 7D 12 |(X1.L1,Y1.L2).}.|
00000A70: 50 05 8B 53 24 B2 22 22 A7 31 34 30 30 00 86 12 |P..S$."".1400...|
00000A80: 5A 05 99 22 13 22 00 98 12 64 05 81 49 B2 31 A4 |Z.."."...d..I.1.|
00000A90: 59 31 3A 99 3A 82 3A 99 00 B2 12 6E 05 99 A3 39 |Y1:.:.:....n...9|
00000AA0: AC 28 58 31 AB 31 29 AA 34 29 3B C8 28 53 24 2C |.(X1.1).4);.(S$,|
00000AB0: 38 29 00 C0 12 78 05 82 58 31 3A 82 59 31 3A 8E |8)...x..X1:.Y1:.|
00000AC0: 00 DA 12 82 05 8F 2A 2A 2A 2A 2A 2A 20 43 41 4C |......****** CAL|
00000AD0: 43 4F 4C 41 20 2A 2A 2A 2A 2A 00 EA 12 8C 05 81 |COLA *****......|
00000AE0: 46 B2 31 A4 4C 41 53 54 AB 31 00 FD 12 96 05 8B |F.1.LAST.1......|
00000AF0: 4D 24 28 46 29 B2 22 22 A7 31 35 36 30 00 07 13 |M$(F)."".1560...|
00000B00: A0 05 99 22 93 11 22 00 17 13 AA 05 99 22 1F 22 |...".."......"."|
00000B10: 3B 4D 24 28 46 29 3B 00 33 13 B4 05 8B C5 28 CA |;M$(F);.3.....(.|
00000B20: 28 4D 24 28 46 29 2C 35 2C 32 29 29 B1 39 A7 52 |(M$(F),5,2)).9.R|
00000B30: 52 B2 31 00 72 13 BE 05 52 31 B2 C5 28 CA 28 4D |R.1.r...R1..(.(M|
00000B40: 24 28 46 29 2C 35 2C 32 29 29 3A 52 32 B2 C5 28 |$(F),5,2)):R2..(|
00000B50: CA 28 4D 24 28 46 29 2C 37 AA 52 52 2C 32 29 29 |.(M$(F),7.RR,2))|
00000B60: 3A 52 52 B2 30 3A 46 24 28 52 31 2C 52 32 29 B2 |:RR.0:F$(R1,R2).|
00000B70: 22 22 00 7E 13 C8 05 97 36 33 31 2C 31 33 00 B3 |"".~....631,13..|
00000B80: 13 D2 05 97 36 33 32 2C 37 31 3A 97 36 33 33 2C |....632,71:.633,|
00000B90: 31 31 31 3A 97 36 33 34 2C 34 39 3A 97 36 33 35 |111:.634,49:.635|
00000BA0: 2C 35 33 3A 97 36 33 36 2C 35 31 3A 97 36 33 37 |,53:.636,51:.637|
00000BB0: 2C 34 38 00 BF 13 DC 05 97 36 33 38 2C 31 33 00 |,48......638,13.|
00000BC0: CB 13 E6 05 97 31 39 38 2C 31 30 00 D9 13 F0 05 |.....198,10.....|
00000BD0: 99 22 91 91 91 22 3B 3A 80 00 F0 13 FA 05 8B 46 |."...";:.......F|
00000BE0: 24 28 52 31 2C 52 32 29 B2 22 22 A7 31 35 37 30 |$(R1,R2)."".1570|
00000BF0: 00 0F 14 04 06 8B CA 28 46 24 28 52 31 2C 52 32 |.......(F$(R1,R2|
00000C00: 29 2C 31 2C 31 29 B2 22 2D 22 A7 31 35 32 30 00 |),1,1)."-".1520.|
00000C10: 39 14 0E 06 46 24 28 52 31 2C 52 32 29 B2 C9 28 |9...F$(R1,R2)..(|
00000C20: 46 24 28 52 31 2C 52 32 29 2C C3 28 46 24 28 52 |F$(R1,R2),.(F$(R|
00000C30: 31 2C 52 32 29 29 AB 31 29 00 40 14 18 06 82 46 |1,R2)).1).@....F|
00000C40: 00 59 14 22 06 99 22 9E 22 3A 8D 33 31 30 3A 8D |.Y."..".":.310:.|
00000C50: 31 33 33 30 3A 8D 34 31 30 00 62 14 2C 06 89 35 |1330:.410.b.,..5|
00000C60: 31 30 00 7D 14 36 06 8F 2A 2A 2A 2A 20 53 48 4F |10.}.6..**** SHO|
00000C70: 57 20 46 4F 52 4D 55 4C 41 20 2A 2A 2A 00 8D 14 |W FORMULA ***...|
00000C80: 40 06 81 57 B2 31 A4 4C 41 53 54 AB 31 00 A5 14 |@..W.1.LAST.1...|
00000C90: 4A 06 8B C5 28 CA 28 46 24 2C 35 2C 32 29 29 B3 |J...(.(F$,5,2)).|
00000CA0: 39 A7 5A B2 31 00 D8 14 54 06 99 22 20 20 20 20 |9.Z.1...T.." |
00000CB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000CC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000CD0: 20 22 3A 99 22 91 22 3B 00 0E 15 5E 06 8B C5 28 | ":.".";...^...(|
00000CE0: CA 28 4D 24 28 57 29 2C 35 2C 32 29 29 B2 58 AA |.(M$(W),5,2)).X.|
00000CF0: 4C 31 AF C5 28 CA 28 4D 24 28 57 29 2C 38 AB 5A |L1..(.(M$(W),8.Z|
00000D00: 2C 32 29 29 B2 59 AA 4C 32 A7 31 37 38 30 00 16 |,2)).Y.L2.1780..|
00000D10: 15 68 06 48 B2 30 00 1C 15 72 06 82 00 42 15 7C |.h.H.0...r...B.||
00000D20: 06 8B 45 B2 31 A7 99 22 46 4F 52 4D 55 4C 41 20 |..E.1.."FORMULA |
00000D30: 54 4F 4F 20 43 4F 4D 50 4C 45 58 22 3A 89 31 36 |TOO COMPLEX":.16|
00000D40: 38 30 00 76 15 86 06 8B 47 B2 30 A7 99 22 20 20 |80.v....G.0.." |
00000D50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000D60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000D70: 20 20 20 20 20 22 00 82 15 90 06 47 B2 30 3A 45 | ".....G.0:E|
00000D80: B2 30 00 88 15 9A 06 8E 00 A6 15 A4 06 8F 2A 2A |.0............**|
00000D90: 2A 2A 2A 20 45 52 41 53 45 20 46 4F 52 4D 55 4C |*** ERASE FORMUL|
00000DA0: 41 20 2A 2A 2A 2A 00 B6 15 AE 06 81 57 B2 31 A4 |A ****......W.1.|
00000DB0: 4C 41 53 54 AB 31 00 CE 15 B8 06 8B C5 28 CA 28 |LAST.1.......(.(|
00000DC0: 46 24 2C 35 2C 32 29 29 B3 33 A7 5A B2 31 00 04 |F$,5,2)).3.Z.1..|
00000DD0: 16 C2 06 8B C5 28 CA 28 4D 24 28 57 29 2C 35 2C |.....(.(M$(W),5,|
00000DE0: 32 29 29 B2 58 AA 4C 31 AF C5 28 CA 28 4D 24 28 |2)).X.L1..(.(M$(|
00000DF0: 57 29 2C 38 AB 5A 2C 32 29 29 B2 59 AA 4C 32 A7 |W),8.Z,2)).Y.L2.|
00000E00: 31 37 35 30 00 0F 16 CC 06 82 3A 89 35 31 30 00 |1750......:.510.|
00000E10: 2A 16 D6 06 48 48 B2 30 3A 53 24 28 53 29 B2 22 |*...HH.0:S$(S)."|
00000E20: 22 3A 4D 24 28 57 29 B2 22 22 00 33 16 E0 06 89 |":M$(W)."".3....|
00000E30: 35 31 30 00 5D 16 EA 06 47 24 B2 CA 28 46 24 2C |510.]...G$..(F$,|
00000E40: 46 AA 31 2C 32 29 AA 22 29 29 22 AA CA 28 46 24 |F.1,2)."))"..(F$|
00000E50: 2C 46 AA 33 2C 47 29 3A 89 31 32 31 30 00 6C 16 |,F.3,G):.1210.l.|
00000E60: F4 06 99 53 24 28 57 29 3A 47 B2 31 00 76 16 FE |...S$(W):G.1.v..|
00000E70: 06 89 31 36 34 30 00 7C 16 03 07 8F 00 9E 16 08 |..1640.|........|
00000E80: 07 8F 50 45 52 20 53 41 56 45 20 53 41 4C 56 41 |..PER SAVE SALVA|
00000E90: 52 45 20 4C 45 20 4D 41 54 52 49 43 49 3A 00 C3 |RE LE MATRICI:..|
00000EA0: 16 12 07 8F 20 46 24 20 20 53 24 20 20 4D 24 20 |.... F$ S$ M$ |
00000EB0: 20 45 20 4C 41 20 56 41 52 49 41 42 49 4C 45 20 | E LA VARIABILE |
00000EC0: 20 4C 41 00 00 00 | LA... |
....H.. EASYCALC.,.R.. (C)
BY.C.... NELVASOFT.I.........F
$(26,54):X.1:Y.1:P.0:.53280,6:.53281,6:.
650,128......S$(50),M$(50):LAST.1.K...KV
$."
".....KZ$."......................."...
...310......410..."..510.).,..**** SUBRO
UTINE STAMPA ****.R.6.."..";.12);"*** EA
SYCALC ***.":..3);.].@..I.1.3.V.J...4);G
(I.64.L1);.4);...T..:..4);G(I.64.L1):...
.^.."." ;...H..I.1.18.K.R.."*.";I.L2;"."
;.3.C(D(I.L2)));"B".R.|..;.X............
....******* CURSOR ********.....S$.F$(X.
L1,Y.L2):.".".....C$."".<....I.C(S$).1.8
:C$.C$." ":..N.B.C$.H(S$.C$,8).`.L..I.1.
Y:.:.I:..R.V...9.(X.1).4);.....P.1..C$.
.....P.0..".";C$;".";............******
INPUT COMANDI *******.G....".";.Q....KZ$
;.Y...G.1...&..1660...0..A$:.A$."".560..
.:.. IFA$="L"THEN2000:REM LOAD.;.D.. IFA
$="W"THENGOSUB3000:REM SAVE.W.N..A$."S".
.1600:. SHOW F..Q.X..A$.".".730:. CRSR U
P...B..A$.".".770:. CRSR DOWN...L..A$.".
".810:. CRSR LEFT.F.V..A$.".".850:. CRSR
RIGHT......A$.".".900:. SCREEN UP......
A$.".".920:. SCREEN DOWN......A$.".".950
:. SCREEN LEFT.=....A$.".".980:. SCREEN
RIGHT.Z....A$."V".1010:. DW. VALUE.Y....
A$."F".1080:. DW. FORMULA......A$."C".14
10:. CALCOLA...F..A$."E".1710:. ERASE FO
RMULA...P..530.Y.Z..****** CRSR UP *****
*.....P.1:.410.....Y.Y.1:P.0:.Y.1.920...
...410:.510.&....****** CRSR DOWN ****.3
...P.1:.410.K...Y.Y.1:P.0:.Y.18.900.Y. .
.410:.510.T.*..****** CRSR LEFT ****...4
.P.1:.410...>.X.X.1:P.0:.X.1.950...H..41
0:.510.A.R..****** CRSR RIGHT ***.N.\.P.
1:.410...F.X.X.1:P.0:.X.4.980...P..410:.
510...Z..*** SCREEN UP ******.(...L2.L2.
9:.L2.36.L2.L2.9.F....310:Y.10:.1330:.41
0:.510.`....*** SCREEN DOWN ****.Z...L2.
L2.9:.L2.0.L2.L2.9......310:Y.18:.1330:.
410:.510......*** SCREEN LEFT ****.L...L
1.L1.2:.L1.0.L1.L1.2...J..310:X.1:.1330:
.410:.500...T..*** SCREEN RIGHT ***.....
L1.L1.2:.L1.22.L1.L1.2.;....310:X.4:.133
0:.410:.510.T....*** ISERT VALUE ***.T..
..KZ$;"VALUE "......KV$;".
"......B$:.".";KV$......"..
".T.$.F$(X.L1,Y.L2).H(B
$,8)......410:.510...8..*** ISERT FORMUL
A *...B..KZ$;"FORMULA ".(.L.
.KV$;".".9.V..F$:.".";KV$.I.`.S$(LAST).F
$.U.J.G.C(F$).].T.F.1...~..J(F$,F,1)."A"
.J(F ,F,1)."Z".1230.....J$.J(F$,F.1,1)..
....J$.."A".J$.."Z".F.F.4.D...Z$.J(F$,F.
2,1)......Z$.."0".Z$.."9".1770.....G$.J(
F$,F.1,1)."))".J(B$,F.2,G).7...F$.H(F$,F
.1)."VAL(F$(".D(F(J(F$,F,1)).64).",".G$.
A.D.F.F.5.].N.G.C(F$):F.F.1:.F.G.1150.R.
X.F$.I(F$,C(F$).4)......F.1.C(F$)......J
(F$,F,1).."=".1290.E...F$.H(F$,F(."STR$(
".J(F$,F.1,C(F$)).")".....F$.H(F$,F.2).J
(F$,F,C(F$))............C(F$).79.E.0:.51
0.....M$(LAST).F$:LAST.LAST.1.'.(..1410.
A.2..****** AGGIORNA ****.V.<..Y1.1.18:.
X1.1.4.M.F.S$.F$(X1.L1,Y1.L2).}.P..S$.""
.1400...Z.."."...D..I.1.Y1:.:.:....N...9
.(X1.1).4);H(S$,8)...X..X1:.Y1:..Z....**
**** CALCOLA *****......F.1.LAST.1......
M$(F)."".1560... ..".."......".";M$(F);.
3....E(J(M$(F),5,2)).9.RR.1.R...R1.E(J(M
$(F),5,2)):R2.E(J(M$(F),7.RR,2)):RR.0:F$
(R1,R2)."".~.H..631,13...R..632,71:.633,
111:.634,49:.635,53:.636,51:.637,48.....
.638,13.K....198,10.Y...."...";:.......F
$(R1,R2)."".1570......J(F$(R1,R2),1,1)."
-".1520.9...F$(R1,R2).I(F$(R1,R2),C(F$(R
1,R2)).1).@....F.Y."..".":.310:.1330:.41
0.B.,..510.}.6..**** SHOW FORMULA ***...
@..W.1.LAST.1...J..E(J(F$,5,2)).9.Z.1.X.
T.."
":.".";...^..E(J(M$(W),5,2)).X.L1.E(J(M
$(W),8.Z,2)).Y.L2.1780...H.H.0...R...B.|
..E.1.."FORMULA TOO COMPLEX":.1680.V....
G.0.."
".....G.0:E.0............***** ERAS
E FORMULA ****......W.1.LAST.1.N....E(J(
F$,5,2)).3.Z.1...B..E(J(M$(W),5,2)).X.L1
.E(J(M$(W),8.Z,2)).Y.L2.1750...L..:.510.
*.V.HH.0:S$(S)."":M$(W)."".3....510.]...
G$.J(F$,F.1,2)."))".J(F$,F.3,G):.1210.L.
...S$(W):G.1.V....1640.|..........PER SA
VE SALVARE LE MATRICI:.C.... F$ S$ M$
E LA VARIABILE LA...
> CLICK IMAGE PREVIEW FOR FULL MODAL