EASYCALC
FILE INFORMATION
FILENAME(S): EASYCALC
FILE TYPE(S): PRG
FILE SIZE: 3.8K
FIRST SEEN: 2025-11-02 16:39:46
APPEARS ON: 1 disk(s)
FILE HASH
86e365ca1fc9252dab6b651b0d63b63eb1c4c72c853aaee786899faa4cac8e25
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ANWENDER PRG | EASYCALC | PRG | Treasure Chest - Plattfuss | 32 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2F 08 E6 00 86 20 46 24 28 32 36 2C 35 34 |../.... F$(26,54|
00000010: 29 3A 58 B2 31 3A 59 B2 31 3A 50 B2 30 3A 97 35 |):X.1:Y.1:P.0:.5|
00000020: 33 32 38 30 2C 36 3A 97 35 33 32 38 31 2C 36 00 |3280,6:.53281,6.|
00000030: 49 08 F0 00 86 53 24 28 35 30 29 2C 4D 24 28 35 |I....S$(50),M$(5|
00000040: 30 29 3A 4C 41 53 54 B2 31 00 84 08 FA 00 4B 56 |0):LAST.1.....KV|
00000050: 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |$." |
00000060: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000070: 20 20 20 20 20 20 20 20 20 20 22 3A 8F 20 33 39 | ":. 39|
00000080: 20 53 50 43 00 A6 08 04 01 4B 5A 24 B2 22 13 11 | SPC.....KZ$."..|
00000090: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000000A0: 11 11 11 11 11 22 00 AF 08 0E 01 8D 33 31 30 00 |....."......310.|
000000B0: B8 08 18 01 8D 34 31 30 00 C1 08 22 01 89 35 31 |.....410..."..51|
000000C0: 30 00 E3 08 2C 01 8F 20 2A 2A 2A 2A 20 53 55 42 |0...,.. **** SUB|
000000D0: 52 4F 55 54 49 4E 45 20 53 54 41 4D 50 41 20 2A |ROUTINE STAMPA *|
000000E0: 2A 2A 2A 00 0C 09 36 01 99 22 93 9E 22 3B A3 31 |***...6.."..";.1|
000000F0: 32 29 3B 22 2A 2A 2A 20 45 41 53 59 43 41 4C 43 |2);"*** EASYCALC|
00000100: 20 2A 2A 2A 11 22 3A 99 A6 33 29 3B 00 18 09 40 | ***.":..3);...@|
00000110: 01 81 20 49 B2 31 A4 33 00 31 09 4A 01 99 A6 34 |.. I.1.3.1.J...4|
00000120: 29 3B C7 28 49 AA 36 34 AA 4C 31 29 3B A6 34 29 |);.(I.64.L1);.4)|
00000130: 3B 00 49 09 54 01 82 3A 99 A6 34 29 3B C7 28 49 |;.I.T..:..4);.(I|
00000140: AA 36 34 AA 4C 31 29 3A 99 00 54 09 5E 01 99 22 |.64.L1):..T.^.."|
00000150: 91 22 20 3B 00 60 09 68 01 81 49 B2 31 A4 31 38 |." ;.`.h..I.1.18|
00000160: 00 86 09 72 01 99 22 2A 9D 22 3B 49 AA 4C 32 3B |...r.."*.";I.L2;|
00000170: 22 9D 22 3B A6 33 AB C3 28 C4 28 49 AA 4C 32 29 |".";.3..(.(I.L2)|
00000180: 29 29 3B 22 C7 22 00 8D 09 7C 01 99 3B 00 93 09 |));"."...|..;...|
00000190: 86 01 82 00 99 09 90 01 8E 00 B5 09 9A 01 8F 20 |............... |
000001A0: 2A 2A 2A 2A 2A 2A 2A 20 43 55 52 53 4F 52 20 2A |******* CURSOR *|
000001B0: 2A 2A 2A 2A 2A 00 CF 09 A4 01 53 24 B2 46 24 28 |*****.....S$.F$(|
000001C0: 58 AA 4C 31 2C 59 AA 4C 32 29 3A 99 22 13 22 00 |X.L1,Y.L2):.".".|
000001D0: D9 09 AE 01 43 24 B2 22 22 00 F6 09 B8 01 81 49 |....C$.""......I|
000001E0: B2 C3 28 53 24 29 AA 31 A4 38 3A 43 24 B2 43 24 |..(S$).1.8:C$.C$|
000001F0: AA 22 20 22 3A 82 00 08 0A C2 01 43 24 B2 C8 28 |." ":......C$..(|
00000200: 53 24 AA 43 24 2C 38 29 00 1D 0A CC 01 81 20 49 |S$.C$,8)...... I|
00000210: B2 31 20 A4 20 59 3A 99 3A 82 49 3A 99 00 30 0A |.1 . Y:.:.I:..0.|
00000220: D6 01 99 20 A3 39 AC 28 58 AB 31 29 AA 34 29 3B |... .9.(X.1).4);|
00000230: 00 40 0A E0 01 8B 20 50 B2 31 A7 20 99 43 24 3B |.@.... P.1. .C$;|
00000240: 00 58 0A EA 01 8B 20 50 B2 30 A7 20 99 22 12 22 |.X.... P.0. ."."|
00000250: 3B 43 24 3B 22 92 22 3B 00 5E 0A F4 01 8E 00 7E |;C$;".";.^.....~|
00000260: 0A FE 01 8F 20 2A 2A 2A 2A 2A 20 49 4E 50 55 54 |.... ***** INPUT|
00000270: 20 43 4F 4D 41 4E 44 49 20 2A 2A 2A 2A 2A 00 88 | COMANDI *****..|
00000280: 0A 08 02 99 22 9E 22 3B 00 92 0A 12 02 99 4B 5A |....".";......KZ|
00000290: 24 3B 00 9A 0A 1C 02 47 B2 31 00 A4 0A 26 02 8D |$;.....G.1...&..|
000002A0: 31 36 36 30 00 B9 0A 30 02 A1 20 41 24 3A 8B 20 |1660...0.. A$:. |
000002B0: 41 24 B2 22 22 A7 35 36 30 00 D9 0A 3A 02 8F 20 |A$."".560...:.. |
000002C0: 49 46 41 24 3D 22 4C 22 54 48 45 4E 32 30 30 30 |IFA$="L"THEN2000|
000002D0: 3A 52 45 4D 20 4C 4F 41 44 00 FE 0A 44 02 8F 20 |:REM LOAD...D.. |
000002E0: 49 46 41 24 3D 22 57 22 54 48 45 4E 47 4F 53 55 |IFA$="W"THENGOSU|
000002F0: 42 33 30 30 30 3A 52 45 4D 20 53 41 56 45 00 1A |B3000:REM SAVE..|
00000300: 0B 4E 02 8B 41 24 B2 22 53 22 A7 8D 31 36 30 30 |.N..A$."S"..1600|
00000310: 3A 8F 20 53 48 4F 57 20 46 2E 00 36 0B 58 02 8B |:. SHOW F..6.X..|
00000320: 41 24 B2 22 91 22 A7 37 33 30 3A 8F 20 43 55 52 |A$.".".730:. CUR|
00000330: 53 4F 52 20 55 50 00 54 0B 62 02 8B 41 24 B2 22 |SOR UP.T.b..A$."|
00000340: 11 22 A7 37 37 30 3A 8F 20 43 55 52 53 4F 52 20 |.".770:. CURSOR |
00000350: 44 4F 57 4E 00 72 0B 6C 02 8B 41 24 B2 22 9D 22 |DOWN.r.l..A$."."|
00000360: A7 38 31 30 3A 8F 20 43 55 52 53 4F 52 20 4C 45 |.810:. CURSOR LE|
00000370: 46 54 00 91 0B 76 02 8B 41 24 B2 22 1D 22 A7 38 |FT...v..A$.".".8|
00000380: 35 30 3A 8F 20 43 55 52 53 4F 52 20 52 49 47 48 |50:. CURSOR RIGH|
00000390: 54 00 AD 0B 80 02 8B 41 24 B2 22 86 22 A7 39 30 |T......A$.".".90|
000003A0: 30 3A 8F 20 53 43 52 45 45 4E 20 55 50 00 CB 0B |0:. SCREEN UP...|
000003B0: 8A 02 8B 41 24 B2 22 85 22 A7 39 32 30 3A 8F 20 |...A$.".".920:. |
000003C0: 53 43 52 45 45 4E 20 44 4F 57 4E 00 E9 0B 94 02 |SCREEN DOWN.....|
000003D0: 8B 41 24 B2 22 87 22 A7 39 35 30 3A 8F 20 53 43 |.A$.".".950:. SC|
000003E0: 52 45 45 4E 20 4C 45 46 54 00 08 0C 9E 02 8B 41 |REEN LEFT......A|
000003F0: 24 B2 22 88 22 A7 39 38 30 3A 8F 20 53 43 52 45 |$.".".980:. SCRE|
00000400: 45 4E 20 52 49 47 48 54 00 27 0C A8 02 8B 41 24 |EN RIGHT.'....A$|
00000410: B2 22 56 22 A7 31 30 31 30 3A 8F 20 49 4E 53 54 |."V".1010:. INST|
00000420: 2E 20 56 41 4C 55 45 00 48 0C B2 02 8B 41 24 B2 |. VALUE.H....A$.|
00000430: 22 46 22 A7 31 30 38 30 3A 8F 20 49 4E 53 54 2E |"F".1080:. INST.|
00000440: 20 46 4F 52 4D 55 4C 41 00 63 0C BC 02 8B 41 24 | FORMULA.c....A$|
00000450: B2 22 43 22 A7 31 34 31 30 3A 8F 20 43 41 4C 43 |."C".1410:. CALC|
00000460: 4F 4C 41 00 84 0C C6 02 8B 41 24 B2 22 45 22 A7 |OLA......A$."E".|
00000470: 31 37 31 30 3A 8F 20 45 52 41 53 45 20 46 4F 52 |1710:. ERASE FOR|
00000480: 4D 55 4C 41 00 8D 0C D0 02 89 35 33 30 00 A7 0C |MULA......530...|
00000490: DA 02 8F 20 2A 2A 2A 2A 20 43 55 52 53 4F 52 20 |... **** CURSOR |
000004A0: 55 50 20 2A 2A 2A 2A 00 B4 0C E4 02 50 B2 31 3A |UP ****.....P.1:|
000004B0: 8D 34 31 30 00 CB 0C EE 02 59 B2 59 AB 31 3A 50 |.410.....Y.Y.1:P|
000004C0: B2 30 3A 8B 59 B3 31 A7 39 32 30 00 D9 0C F8 02 |.0:.Y.1.920.....|
000004D0: 8D 34 31 30 3A 89 35 31 30 00 F7 0C 02 03 8F 20 |.410:.510...... |
000004E0: 2A 2A 2A 2A 2A 20 43 55 52 53 4F 52 20 44 4F 57 |***** CURSOR DOW|
000004F0: 4E 20 2A 2A 2A 2A 2A 00 04 0D 0C 03 50 B2 31 3A |N *****.....P.1:|
00000500: 8D 34 31 30 00 1C 0D 16 03 59 B2 59 AA 31 3A 50 |.410.....Y.Y.1:P|
00000510: B2 30 3A 8B 59 B1 31 38 A7 39 30 30 00 2A 0D 20 |.0:.Y.18.900.*. |
00000520: 03 8D 34 31 30 3A 89 35 31 30 00 46 0D 2A 03 8F |..410:.510.F.*..|
00000530: 20 2A 2A 2A 2A 20 43 55 52 53 4F 52 20 4C 45 46 | **** CURSOR LEF|
00000540: 54 20 2A 2A 2A 2A 00 53 0D 34 03 50 B2 31 3A 8D |T ****.S.4.P.1:.|
00000550: 34 31 30 00 6A 0D 3E 03 58 B2 58 AB 31 3A 50 B2 |410.j.>.X.X.1:P.|
00000560: 30 3A 8B 58 B3 31 A7 39 35 30 00 78 0D 48 03 8D |0:.X.1.950.x.H..|
00000570: 34 31 30 3A 89 35 31 30 00 97 0D 52 03 8F 20 2A |410:.510...R.. *|
00000580: 2A 2A 2A 2A 20 43 55 52 53 4F 52 20 52 49 47 48 |**** CURSOR RIGH|
00000590: 54 20 2A 2A 2A 2A 2A 00 A4 0D 5C 03 50 B2 31 3A |T *****...\.P.1:|
000005A0: 8D 34 31 30 00 BB 0D 66 03 58 B2 58 AA 31 3A 50 |.410...f.X.X.1:P|
000005B0: B2 30 3A 8B 58 B1 34 A7 39 38 30 00 C9 0D 70 03 |.0:.X.4.980...p.|
000005C0: 8D 34 31 30 3A 89 35 31 30 00 E6 0D 7A 03 8F 20 |.410:.510...z.. |
000005D0: 2A 2A 2A 2A 2A 20 53 43 52 45 45 4E 20 55 50 20 |***** SCREEN UP |
000005E0: 2A 2A 2A 2A 2A 2A 00 01 0E 84 03 4C 32 B2 4C 32 |******.....L2.L2|
000005F0: AA 39 3A 8B 4C 32 B1 33 36 A7 4C 32 B2 4C 32 AB |.9:.L2.36.L2.L2.|
00000600: 39 00 1F 0E 8E 03 8D 33 31 30 3A 59 B2 31 30 3A |9......310:Y.10:|
00000610: 8D 31 33 33 30 3A 8D 34 31 30 3A 89 35 31 30 00 |.1330:.410:.510.|
00000620: 3D 0E 98 03 8F 20 2A 2A 2A 2A 2A 20 53 43 52 45 |=.... ***** SCRE|
00000630: 45 4E 20 44 4F 57 4E 20 2A 2A 2A 2A 2A 00 57 0E |EN DOWN *****.W.|
00000640: A2 03 4C 32 B2 4C 32 AB 39 3A 8B 4C 32 B3 30 A7 |..L2.L2.9:.L2.0.|
00000650: 4C 32 B2 4C 32 AA 39 00 75 0E AC 03 8D 33 31 30 |L2.L2.9.u....310|
00000660: 3A 59 B2 31 38 3A 8D 31 33 33 30 3A 8D 34 31 30 |:Y.18:.1330:.410|
00000670: 3A 89 35 31 30 00 94 0E B6 03 8F 20 2A 2A 2A 2A |:.510...... ****|
00000680: 2A 2A 20 53 43 52 45 45 4E 20 4C 45 46 54 20 2A |** SCREEN LEFT *|
00000690: 2A 2A 2A 2A 00 AE 0E C0 03 4C 31 B2 4C 31 AB 32 |****.....L1.L1.2|
000006A0: 3A 8B 4C 31 B3 30 A7 4C 31 B2 4C 31 AA 32 00 CC |:.L1.0.L1.L1.2..|
000006B0: 0E CA 03 8D 33 31 30 3A 58 B2 31 3A 8D 31 33 33 |....310:X.1:.133|
000006C0: 30 3A 8D 34 31 30 3A 20 89 35 31 30 00 EB 0E D4 |0:.410: .510....|
000006D0: 03 8F 20 2A 2A 2A 2A 2A 20 53 43 52 45 45 4E 20 |.. ***** SCREEN |
000006E0: 52 49 47 48 54 20 2A 2A 2A 2A 2A 00 06 0F DE 03 |RIGHT *****.....|
000006F0: 4C 31 B2 4C 31 AA 32 3A 8B 4C 31 B1 32 32 A7 4C |L1.L1.2:.L1.22.L|
00000700: 31 B2 4C 31 AB 32 00 23 0F E8 03 8D 33 31 30 3A |1.L1.2.#....310:|
00000710: 58 B2 34 3A 8D 31 33 33 30 3A 8D 34 31 30 3A 89 |X.4:.1330:.410:.|
00000720: 35 31 30 00 40 0F F2 03 8F 20 2A 2A 2A 2A 20 49 |510.@.... **** I|
00000730: 4E 53 45 52 54 20 56 41 4C 55 45 20 2A 2A 2A 2A |NSERT VALUE ****|
00000740: 00 69 0F FC 03 99 4B 5A 24 3B 22 56 41 4C 55 45 |.i....KZ$;"VALUE|
00000750: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00000760: 3A 8F 20 31 35 20 53 50 43 00 76 0F 06 04 99 4B |:. 15 SPC.v....K|
00000770: 56 24 3B 22 91 22 00 87 0F 10 04 85 42 24 3A 99 |V$;"."......B$:.|
00000780: 22 91 22 3B 4B 56 24 00 B8 0F 1A 04 99 22 91 91 |".";KV$......"..|
00000790: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000007A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3A | ":|
000007B0: 8F 20 33 30 20 53 50 43 00 D2 0F 24 04 46 24 28 |. 30 SPC...$.F$(|
000007C0: 58 AA 4C 31 2C 59 AA 4C 32 29 B2 C8 28 42 24 2C |X.L1,Y.L2)..(B$,|
000007D0: 38 29 00 E0 0F 2E 04 8D 34 31 30 3A 89 35 31 30 |8)......410:.510|
000007E0: 00 FF 0F 38 04 8F 20 2A 2A 2A 2A 20 49 4E 53 45 |...8.. **** INSE|
000007F0: 52 54 20 46 4F 52 4D 55 4C 41 20 2A 2A 2A 2A 00 |RT FORMULA ****.|
00000800: 1F 10 42 04 99 4B 5A 24 3B 22 46 4F 52 4D 55 4C |..B..KZ$;"FORMUL|
00000810: 41 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 |A ".|
00000820: 2C 10 4C 04 99 4B 56 24 3B 22 91 22 00 3D 10 56 |,.L..KV$;".".=.V|
00000830: 04 85 46 24 3A 99 22 91 22 3B 4B 56 24 00 4D 10 |..F$:.".";KV$.M.|
00000840: 60 04 53 24 28 4C 41 53 54 29 B2 46 24 00 59 10 |`.S$(LAST).F$.Y.|
00000850: 6A 04 47 B2 C3 28 46 24 29 00 61 10 74 04 46 B2 |j.G..(F$).a.t.F.|
00000860: 31 00 87 10 7E 04 8B CA 28 46 24 2C 46 2C 31 29 |1...~...(F$,F,1)|
00000870: B3 22 41 22 B0 CA 28 46 24 2C 46 2C 31 29 B1 22 |."A"..(F$,F,1)."|
00000880: 5A 22 A7 31 32 33 30 00 9A 10 88 04 4A 24 B2 CA |Z".1230.....J$..|
00000890: 28 46 24 2C 46 AA 31 2C 31 29 00 B5 10 92 04 8B |(F$,F.1,1)......|
000008A0: 4A 24 B1 B2 22 41 22 AF 4A 24 B3 B2 22 5A 22 A7 |J$.."A".J$.."Z".|
000008B0: 46 B2 46 AA 34 00 C8 10 9C 04 5A 24 B2 CA 28 46 |F.F.4.....Z$..(F|
000008C0: 24 2C 46 AA 32 2C 31 29 00 E2 10 A6 04 8B 5A 24 |$,F.2,1)......Z$|
000008D0: B1 B2 22 30 22 AF 5A 24 B3 B2 22 39 22 A7 31 37 |.."0".Z$.."9".17|
000008E0: 37 30 00 06 11 B0 04 47 24 B2 CA 28 46 24 2C 46 |70.....G$..(F$,F|
000008F0: AA 31 2C 31 29 AA 22 29 29 22 AA CA 28 46 24 2C |.1,1)."))"..(F$,|
00000900: 46 AA 32 2C 47 29 00 3B 11 BA 04 46 24 B2 C8 28 |F.2,G).;...F$..(|
00000910: 46 24 2C 46 AB 31 29 AA 22 56 41 4C 28 46 24 28 |F$,F.1)."VAL(F$(|
00000920: 22 AA C4 28 C6 28 CA 28 46 24 2C 46 2C 31 29 29 |"..(.(.(F$,F,1))|
00000930: AB 36 34 29 AA 22 2C 22 AA 47 24 00 45 11 C4 04 |.64).",".G$.E...|
00000940: 46 B2 46 AA 35 00 61 11 CE 04 47 B2 C3 28 46 24 |F.F.5.a...G..(F$|
00000950: 29 3A 46 B2 46 AA 31 3A 8B 46 B3 47 A7 31 31 35 |):F.F.1:.F.G.115|
00000960: 30 00 76 11 D8 04 46 24 B2 C9 28 46 24 2C C3 28 |0.v...F$..(F$,.(|
00000970: 46 24 29 AB 34 29 00 85 11 E2 04 81 46 B2 31 A4 |F$).4)......F.1.|
00000980: C3 28 46 24 29 00 9E 11 EC 04 8B CA 28 46 24 2C |.(F$).......(F$,|
00000990: 46 2C 31 29 B3 B1 22 3D 22 A7 31 32 39 30 00 C9 |F,1).."=".1290..|
000009A0: 11 F6 04 46 24 B2 C8 28 46 24 2C 46 29 AA 22 53 |...F$..(F$,F)."S|
000009B0: 54 52 24 28 22 AA CA 28 46 24 2C 46 AA 31 2C C3 |TR$("..(F$,F.1,.|
000009C0: 28 46 24 29 29 AA 22 29 22 00 E8 11 00 05 46 24 |(F$)).")".....F$|
000009D0: B2 C8 28 46 24 2C 46 AB 32 29 AA CA 28 46 24 2C |..(F$,F.2)..(F$,|
000009E0: 46 2C C3 28 46 24 29 29 00 EE 11 0A 05 82 00 06 |F,.(F$))........|
000009F0: 12 14 05 8B C3 28 46 24 29 B1 37 39 A7 45 B2 31 |.....(F$).79.E.1|
00000A00: 3A 89 20 35 31 30 00 22 12 1E 05 4D 24 28 4C 41 |:. 510."...M$(LA|
00000A10: 53 54 29 B2 46 24 3A 4C 41 53 54 B2 4C 41 53 54 |ST).F$:LAST.LAST|
00000A20: AA 31 00 2C 12 28 05 89 31 34 31 30 00 47 12 32 |.1.,.(..1410.G.2|
00000A30: 05 8F 20 2A 2A 2A 2A 2A 20 41 47 47 49 4F 52 4E |.. ***** AGGIORN|
00000A40: 41 20 2A 2A 2A 2A 2A 00 5C 12 3C 05 81 59 31 B2 |A *****.\.<..Y1.|
00000A50: 31 A4 31 38 3A 81 58 31 B2 31 A4 34 00 73 12 46 |1.18:.X1.1.4.s.F|
00000A60: 05 53 24 B2 46 24 28 58 31 AA 4C 31 2C 59 31 AA |.S$.F$(X1.L1,Y1.|
00000A70: 4C 32 29 00 83 12 50 05 8B 53 24 B2 22 22 A7 31 |L2)...P..S$."".1|
00000A80: 34 30 30 00 8C 12 5A 05 99 22 13 22 00 9E 12 64 |400...Z.."."...d|
00000A90: 05 81 49 B2 31 A4 59 31 3A 99 3A 82 3A 99 00 B8 |..I.1.Y1:.:.:...|
00000AA0: 12 6E 05 99 A3 39 AC 28 58 31 AB 31 29 AA 34 29 |.n...9.(X1.1).4)|
00000AB0: 3B C8 28 53 24 2C 38 29 00 C6 12 78 05 82 58 31 |;.(S$,8)...x..X1|
00000AC0: 3A 82 59 31 3A 8E 00 E0 12 82 05 8F 20 2A 2A 2A |:.Y1:....... ***|
00000AD0: 2A 2A 20 43 41 4C 43 4F 4C 41 20 2A 2A 2A 2A 2A |** CALCOLA *****|
00000AE0: 00 F0 12 8C 05 81 46 B2 31 A4 4C 41 53 54 AB 31 |......F.1.LAST.1|
00000AF0: 00 03 13 96 05 8B 4D 24 28 46 29 B2 22 22 A7 31 |......M$(F)."".1|
00000B00: 35 36 30 00 0D 13 A0 05 99 22 93 11 22 00 1D 13 |560......".."...|
00000B10: AA 05 99 22 1F 22 3B 4D 24 28 46 29 3B 00 39 13 |...".";M$(F);.9.|
00000B20: B4 05 8B C5 28 CA 28 4D 24 28 46 29 2C 35 2C 32 |....(.(M$(F),5,2|
00000B30: 29 29 B1 39 A7 52 52 B2 31 00 78 13 BE 05 52 31 |)).9.RR.1.x...R1|
00000B40: B2 C5 28 CA 28 4D 24 28 46 29 2C 35 2C 32 29 29 |..(.(M$(F),5,2))|
00000B50: 3A 52 32 B2 C5 28 CA 28 4D 24 28 46 29 2C 37 AA |:R2..(.(M$(F),7.|
00000B60: 52 52 2C 32 29 29 3A 52 52 B2 30 3A 46 24 28 52 |RR,2)):RR.0:F$(R|
00000B70: 31 2C 52 32 29 B2 22 22 00 84 13 C8 05 97 36 33 |1,R2).""......63|
00000B80: 31 2C 31 33 00 B9 13 D2 05 97 36 33 32 2C 37 31 |1,13......632,71|
00000B90: 3A 97 36 33 33 2C 31 31 31 3A 97 36 33 34 2C 34 |:.633,111:.634,4|
00000BA0: 39 3A 97 36 33 35 2C 35 33 3A 97 36 33 36 2C 35 |9:.635,53:.636,5|
00000BB0: 31 3A 97 36 33 37 2C 34 38 00 C5 13 DC 05 97 36 |1:.637,48......6|
00000BC0: 33 38 2C 31 33 00 D1 13 E6 05 97 31 39 38 2C 31 |38,13......198,1|
00000BD0: 30 00 DF 13 F0 05 99 22 91 91 91 22 3B 3A 80 00 |0......"...";:..|
00000BE0: F6 13 FA 05 8B 46 24 28 52 31 2C 52 32 29 B2 22 |.....F$(R1,R2)."|
00000BF0: 22 A7 31 35 37 30 00 15 14 04 06 8B CA 28 46 24 |".1570.......(F$|
00000C00: 28 52 31 2C 52 32 29 2C 31 2C 31 29 B2 22 2D 22 |(R1,R2),1,1)."-"|
00000C10: A7 31 35 36 30 00 3F 14 0E 06 46 24 28 52 31 2C |.1560.?...F$(R1,|
00000C20: 52 32 29 B2 C9 28 46 24 28 52 31 2C 52 32 29 2C |R2)..(F$(R1,R2),|
00000C30: C3 28 46 24 28 52 31 2C 52 32 29 29 AB 31 29 00 |.(F$(R1,R2)).1).|
00000C40: 46 14 18 06 82 46 00 5F 14 22 06 99 22 9E 22 3A |F....F._."..".":|
00000C50: 8D 33 31 30 3A 8D 31 33 33 30 3A 8D 34 31 30 00 |.310:.1330:.410.|
00000C60: 68 14 2C 06 89 35 31 30 00 85 14 36 06 8F 20 2A |h.,..510...6.. *|
00000C70: 2A 2A 2A 20 53 48 4F 57 20 46 4F 52 4D 55 4C 41 |*** SHOW FORMULA|
00000C80: 20 2A 2A 2A 2A 00 95 14 40 06 81 57 B2 31 A4 4C | ****...@..W.1.L|
00000C90: 41 53 54 AB 31 00 AD 14 4A 06 8B C5 28 CA 28 46 |AST.1...J...(.(F|
00000CA0: 24 2C 35 2C 32 29 29 B3 39 A7 5A B2 31 00 E0 14 |$,5,2)).9.Z.1...|
00000CB0: 54 06 99 22 20 20 20 20 20 20 20 20 20 20 20 20 |T.." |
00000CC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000CD0: 20 20 20 20 20 20 20 20 20 22 3A 99 22 91 22 3B | ":.".";|
00000CE0: 00 16 15 5E 06 8B C5 28 CA 28 4D 24 28 57 29 2C |...^...(.(M$(W),|
00000CF0: 35 2C 32 29 29 B2 58 AA 4C 31 AF C5 28 CA 28 4D |5,2)).X.L1..(.(M|
00000D00: 24 28 57 29 2C 38 AB 5A 2C 32 29 29 B2 59 AA 4C |$(W),8.Z,2)).Y.L|
00000D10: 32 A7 31 37 38 30 00 1E 15 68 06 48 B2 30 00 24 |2.1780...h.H.0.$|
00000D20: 15 72 06 82 00 4A 15 7C 06 8B 45 B2 31 A7 99 22 |.r...J.|..E.1.."|
00000D30: 46 4F 52 4D 55 4C 41 20 54 4F 4F 20 43 4F 4D 50 |FORMULA TOO COMP|
00000D40: 4C 45 58 22 3A 89 31 36 38 30 00 80 15 86 06 8B |LEX":.1680......|
00000D50: 47 B2 30 20 A7 20 99 22 20 20 20 20 20 20 20 20 |G.0 . ." |
00000D60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000D70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00000D80: 00 8C 15 90 06 47 B2 30 3A 45 B2 30 00 92 15 9A |.....G.0:E.0....|
00000D90: 06 8E 00 B0 15 A4 06 8F 20 2A 2A 2A 2A 20 45 52 |........ **** ER|
00000DA0: 41 53 45 20 46 4F 52 4D 55 4C 41 20 2A 2A 2A 2A |ASE FORMULA ****|
00000DB0: 00 C0 15 AE 06 81 57 B2 31 A4 4C 41 53 54 AB 31 |......W.1.LAST.1|
00000DC0: 00 D8 15 B8 06 8B C5 28 CA 28 46 24 2C 35 2C 32 |.......(.(F$,5,2|
00000DD0: 29 29 B3 39 A7 5A B2 31 00 0F 16 C2 06 8B C5 28 |)).9.Z.1.......(|
00000DE0: CA 28 4D 24 28 57 29 2C 35 2C 32 29 29 B2 58 AA |.(M$(W),5,2)).X.|
00000DF0: 4C 31 AF 20 C5 28 CA 28 4D 24 28 57 29 2C 38 AB |L1. .(.(M$(W),8.|
00000E00: 5A 2C 32 29 29 B2 59 AA 4C 32 A7 31 37 35 30 00 |Z,2)).Y.L2.1750.|
00000E10: 1A 16 CC 06 82 3A 89 35 31 30 00 35 16 D6 06 48 |.....:.510.5...H|
00000E20: 48 B2 30 3A 53 24 28 57 29 B2 22 22 3A 4D 24 28 |H.0:S$(W)."":M$(|
00000E30: 57 29 B2 22 22 00 3E 16 E0 06 89 35 31 30 00 68 |W)."".>....510.h|
00000E40: 16 EA 06 47 24 B2 CA 28 46 24 2C 46 AA 31 2C 32 |...G$..(F$,F.1,2|
00000E50: 29 AA 22 29 29 22 AA CA 28 46 24 2C 46 AA 33 2C |)."))"..(F$,F.3,|
00000E60: 47 29 3A 89 31 32 31 30 00 77 16 F4 06 99 53 24 |G):.1210.w....S$|
00000E70: 28 57 29 3A 47 B2 31 00 81 16 FE 06 89 31 36 34 |(W):G.1......164|
00000E80: 30 00 00 00 34 30 2C 32 32 34 2C 30 2C 32 32 34 |0...40,224,0,224|
00000E90: 2C 31 39 32 2C 30 00 C9 16 26 2A 83 32 34 30 2C |,192,0...&*.240,|
00000EA0: 31 32 38 2C 30 2C 31 32 34 2C 30 2C 30 2C 36 33 |128,0,124,0,0,63|
00000EB0: 2C 31 32 38 2C 30 2C 31 35 2C 31 39 32 2C 30 2C |,128,0,15,192,0,|
00000EC0: 31 33 31 2C 32 32 34 2C 30 00 EB 16 44 2A 83 31 |131,224,0...D*.1|
00000ED0: 37 33 2C 31 37 2C 32 30 38 2C 34 31 2C 32 33 39 |73,17,208,41,239|
00000EE0: 2C 31 34 31 2C 31 37 2C 32 30 38 00 0E 17 4E 2A |,141,17,208...N*|
00000EF0: 83 31 36 32 2C 31 32 37 2C 31 36 30 2C 36 34 2C |.162,127,160,64,|
../.... F$(26,54):X.1:Y.1:P.0:.53280,6:.
53281,6.I....S$(50),M$(50):LAST.1.....KV
$."
":. 39 SPC.....KZ$."..................
....."......310......410.A."..510...,..
**** SUBROUTINE STAMPA ****...6.."..";.1
2);"*** EASYCALC ***.":..3);...@.. I.1.3
.1.J...4);G(I.64.L1);.4);.I.T..:..4);G(I
.64.L1):..T.^.."." ;.`.H..I.1.18...R.."*
.";I.L2;".";.3.C(D(I.L2)));"G"...|..;...
............... ******* CURSOR ******.O.
..S$.F$(X.L1,Y.L2):.".".Y...C$.""......I
.C(S$).1.8:C$.C$." ":....B.C$.H(S$.C$,8)
...L.. I.1 . Y:.:.I:..0.V.. .9.(X.1).4);
.@.... P.1. .C$;.X.... P.0. .".";C$;".";
.^.....~.... ***** INPUT COMANDI *****..
....".";......KZ$;.....G.1...&..1660...0
.. A$:. A$."".560.Y.:.. IFA$="L"THEN2000
:REM LOAD...D.. IFA$="W"THENGOSUB3000:RE
M SAVE...N..A$."S"..1600:. SHOW F..6.X..
A$.".".730:. CURSOR UP.T.B..A$.".".770:.
CURSOR DOWN.R.L..A$.".".810:. CURSOR LE
FT...V..A$.".".850:. CURSOR RIGHT......A
$.".".900:. SCREEN UP.K....A$.".".920:.
SCREEN DOWN......A$.".".950:. SCREEN LEF
T......A$.".".980:. SCREEN RIGHT.'....A$
."V".1010:. INST. VALUE.H....A$."F".1080
:. INST. FORMULA.C....A$."C".1410:. CALC
OLA...F..A$."E".1710:. ERASE FORMULA...P
..530...Z.. **** CURSOR UP ****.....P.1:
.410.K...Y.Y.1:P.0:.Y.1.920.Y....410:.51
0...... ***** CURSOR DOWN *****.....P.1:
.410.....Y.Y.1:P.0:.Y.18.900.*. ..410:.5
10.F.*.. **** CURSOR LEFT ****.S.4.P.1:.
410.J.>.X.X.1:P.0:.X.1.950.X.H..410:.510
...R.. ***** CURSOR RIGHT *****...\.P.1:
.410...F.X.X.1:P.0:.X.4.980.I.P..410:.51
0...Z.. ***** SCREEN UP ******.....L2.L2
.9:.L2.36.L2.L2.9......310:Y.10:.1330:.4
10:.510.=.... ***** SCREEN DOWN *****.W.
..L2.L2.9:.L2.0.L2.L2.9.U....310:Y.18:.1
330:.410:.510...... ****** SCREEN LEFT *
****.....L1.L1.2:.L1.0.L1.L1.2.L.J..310:
X.1:.1330:.410: .510...T.. ***** SCREEN
RIGHT *****.....L1.L1.2:.L1.22.L1.L1.2.#
....310:X.4:.1330:.410:.510.@.... **** I
NSERT VALUE ****.I....KZ$;"VALUE
":. 15 SPC.V....KV$;"."......B$:.
".";KV$......"..
":. 30 SPC.R.$.F$(X.L1,Y.L2).H(B$,
8)......410:.510...8.. **** INSERT FORMU
LA ****...B..KZ$;"FORMULA ".
,.L..KV$;".".=.V..F$:.".";KV$.M.`.S$(LAS
T).F$.Y.J.G.C(F$).A.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.H...Z$.J(F
$,F.2,1)......Z$.."0".Z$.."9".1770.....G
$.J(F$,F.1,1)."))".J(F$,F.2,G).;...F$.H(
F$,F.1)."VAL(F$(".D(F(J(F$,F,1)).64).","
.G$.E.D.F.F.5.A.N.G.C(F$):F.F.1:.F.G.115
0.V.X.F$.I(F$,C(F$).4)......F.1.C(F$)...
...J(F$,F,1).."=".1290.I...F$.H(F$,F)."S
TR$(".J(F$,F.1,C(F$)).")".....F$.H(F$,F.
2).J(F$,F,C(F$))............C(F$).79.E.1
:. 510."...M$(LAST).F$:LAST.LAST.1.,.(..
1410.G.2.. ***** AGGIORNA *****.\.<..Y1.
1.18:.X1.1.4.S.F.S$.F$(X1.L1,Y1.L2)...P.
.S$."".1400...Z.."."...D..I.1.Y1:.:.:...
.N...9.(X1.1).4);H(S$,8).F.X..X1:.Y1:...
.... ***** CALCOLA *****......F.1.LAST.1
......M$(F)."".1560... ..".."......".";M
$(F);.9....E(J(M$(F),5,2)).9.RR.1.X...R1
.E(J(M$(F),5,2)):R2.E(J(M$(F),7.RR,2)):R
R.0:F$(R1,R2).""...H..631,13...R..632,71
:.633,111:.634,49:.635,53:.636,51:.637,4
8.E....638,13.Q....198,10......"...";:..
.....F$(R1,R2)."".1570......J(F$(R1,R2),
1,1)."-".1560.?...F$(R1,R2).I(F$(R1,R2),
C(F$(R1,R2)).1).F....F._."..".":.310:.13
30:.410.H.,..510...6.. **** SHOW FORMULA
****...@..W.1.LAST.1...J..E(J(F$,5,2)).
9.Z.1...T.."
":.".";...^..E(J(M$(W),5,2)).X.
L1.E(J(M$(W),8.Z,2)).Y.L2.1780...H.H.0.$
.R...J.|..E.1.."FORMULA TOO COMPLEX":.16
80......G.0 . ."
".....G.0:E.0............
**** ERASE FORMULA ****......W.1.LAST.1
.X....E(J(F$,5,2)).9.Z.1...B..E(J(M$(W),
5,2)).X.L1. E(J(M$(W),8.Z,2)).Y.L2.1750.
..L..:.510.5.V.HH.0:S$(W)."":M$(W)."".>.
...510.H...G$.J(F$,F.1,2)."))".J(F$,F.3,
G):.1210.W....S$(W):G.1......1640...40,2
24,0,224,192,0.I.&*.240,128,0,124,0,0,63
,128,0,15,192,0,131,224,0...D*.173,17,20
8,41,239,141,17,208...N*.162,127,160,64,
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL