DIFF.-CALC
FILE INFORMATION
FILENAME(S): DIFF.-CALC
FILE TYPE(S): PRG
FILE SIZE: 3K
FIRST SEEN: 2025-11-02 16:54:37
APPEARS ON: 1 disk(s)
FILE HASH
ee331519ac9c4c089b1e293c5fcba5f87ae6649e5852f9fa8e0cb48bacc1de38
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 64 ER 8 85 | DIFF.-CALC | PRG | Treasure Chest - Reamigation | 12 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 17 08 64 00 97 35 33 32 38 30 2C 30 3A 97 |....d..53280,0:.|
00000010: 35 33 32 38 31 2C 30 00 3C 08 6E 00 99 22 93 1E |53281,0.<.n.."..|
00000020: 1D 1D 1D 1D 1D 1D 1D 12 44 49 46 46 45 52 45 4E |........DIFFEREN|
00000030: 5A 4B 41 4C 4B 55 4C 41 54 49 4F 4E 00 44 08 78 |ZKALKULATION.D.x|
00000040: 00 99 3A 99 00 86 08 82 00 8F 20 45 52 53 54 45 |..:....... ERSTE|
00000050: 4C 4C 54 20 56 4F 4E 20 48 4F 52 53 54 20 52 45 |LLT VON HORST RE|
00000060: 49 43 48 45 52 54 20 54 48 2E 2D 48 45 55 53 53 |ICHERT TH.-HEUSS|
00000070: 2D 53 54 52 2E 32 39 20 38 35 39 32 20 57 55 4E |-STR.29 8592 WUN|
00000080: 53 49 45 44 45 4C 00 AF 08 8C 00 8F 20 56 41 52 |SIEDEL...... VAR|
00000090: 49 41 42 4C 45 20 45 52 4B 45 4E 4E 42 41 52 20 |IABLE ERKENNBAR |
000000A0: 41 4E 20 44 45 4E 20 45 49 4E 47 41 42 45 4E 00 |AN DEN EINGABEN.|
000000B0: B5 08 E8 03 3A 00 BB 08 F2 03 3A 00 D9 08 F7 03 |....:.....:.....|
000000C0: 85 22 41 52 54 49 4B 45 4C 42 45 5A 45 49 43 48 |."ARTIKELBEZEICH|
000000D0: 4E 55 4E 47 20 22 3B 42 24 00 F7 08 FC 03 85 22 |NUNG ";B$......"|
000000E0: 46 45 52 54 49 47 55 4E 47 53 4D 41 54 45 52 49 |FERTIGUNGSMATERI|
000000F0: 41 4C 20 22 3B 46 31 00 15 09 06 04 85 22 4D 47 |AL ";F1......"MG|
00000100: 4B 5A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |KZ |
00000110: 20 22 3B 4D 31 00 33 09 10 04 85 22 46 45 52 54 | ";M1.3...."FERT|
00000120: 49 47 55 4E 47 53 4C 4F 48 4E 20 20 20 20 20 22 |IGUNGSLOHN "|
00000130: 3B 4C 31 00 51 09 1A 04 85 22 46 47 4B 5A 20 20 |;L1.Q...."FGKZ |
00000140: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3B 46 | ";F|
00000150: 32 00 6F 09 24 04 85 22 53 45 4B 46 20 20 20 20 |2.o.$.."SEKF |
00000160: 20 20 20 20 20 20 20 20 20 20 20 22 3B 53 32 00 | ";S2.|
00000170: 8D 09 2E 04 85 22 56 57 47 4B 5A 20 20 20 20 20 |....."VWGKZ |
00000180: 20 20 20 20 20 20 20 20 20 22 3B 56 31 00 AB 09 | ";V1...|
00000190: 38 04 85 22 53 45 4B 56 20 20 20 20 20 20 20 20 |8.."SEKV |
000001A0: 20 20 20 20 20 20 20 22 3B 53 33 00 C9 09 42 04 | ";S3...B.|
000001B0: 85 22 4B 55 4E 44 45 4E 53 4B 4F 4E 54 4F 20 25 |."KUNDENSKONTO %|
000001C0: 20 20 20 20 20 22 3B 4B 31 00 E7 09 4C 04 85 22 | ";K1...L.."|
000001D0: 4B 55 4E 44 45 4E 52 41 42 41 54 54 20 25 20 20 |KUNDENRABATT % |
000001E0: 20 20 20 22 3B 52 31 00 05 0A 56 04 85 22 4C 56 | ";R1...V.."LV|
000001F0: 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |P |
00000200: 20 22 3B 4C 32 00 0D 0A 60 04 99 3A 99 00 13 0A | ";L2...`..:....|
00000210: D0 07 3A 00 19 0A DA 07 3A 00 2D 0A E4 07 8F 20 |..:.....:.-.... |
00000220: 52 45 43 48 45 4E 42 45 52 45 49 43 48 00 49 0A |RECHENBEREICH.I.|
00000230: EE 07 96 20 A5 52 28 42 29 B2 B5 28 42 AC 31 30 |... .R(B)..(B.10|
00000240: 30 AA 2E 35 29 AD 31 30 30 00 64 0A F8 07 4D 32 |0..5).100.d...M2|
00000250: B2 46 31 AC 4D 31 AD 31 30 30 3A 4D 32 B2 A5 52 |.F1.M1.100:M2..R|
00000260: 28 4D 32 29 00 71 0A 02 08 53 31 B2 46 31 AA 4D |(M2).q...S1.F1.M|
00000270: 32 00 8C 0A 0C 08 46 33 B2 4C 31 AC 46 32 AD 31 |2.....F3.L1.F2.1|
00000280: 30 30 3A 46 33 B2 A5 52 28 46 33 29 00 9E 0A 16 |00:F3..R(F3)....|
00000290: 08 48 B2 4C 31 AA 46 33 AA 53 32 AA 53 31 00 B8 |.H.L1.F3.S2.S1..|
000002A0: 0A 20 08 56 32 B2 48 AC 56 31 AD 31 30 30 3A 56 |. .V2.H.V1.100:V|
000002B0: 32 B2 A5 52 28 56 32 29 00 C7 0A 2A 08 53 34 B2 |2..R(V2)...*.S4.|
000002C0: 48 AA 56 32 AA 53 33 00 E2 0A 34 08 52 32 B2 4C |H.V2.S3...4.R2.L|
000002D0: 32 AC 52 31 AD 31 30 30 3A 52 32 B2 A5 52 28 52 |2.R1.100:R2..R(R|
000002E0: 32 29 00 EE 0A 3E 08 5A B2 4C 32 AB 52 32 00 08 |2)...>.Z.L2.R2..|
000002F0: 0B 48 08 4B 32 B2 5A AC 4B 31 AD 31 30 30 3A 4B |.H.K2.Z.K1.100:K|
00000300: 32 B2 A5 52 28 4B 32 29 00 13 0B 52 08 42 B2 5A |2..R(K2)...R.B.Z|
00000310: AB 4B 32 00 29 0B 5C 08 47 31 B2 42 AB 53 34 3A |.K2.).\.G1.B.S4:|
00000320: 47 31 B2 A5 52 28 47 31 29 00 44 0B 66 08 47 32 |G1..R(G1).D.f.G2|
00000330: B2 47 31 AC 31 30 30 AD 53 34 3A 47 32 B2 A5 52 |.G1.100.S4:G2..R|
00000340: 28 47 32 29 00 4A 0B B8 0B 3A 00 50 0B C2 0B 3A |(G2).J...:.P...:|
00000350: 00 6D 0B CC 0B 8F 20 41 55 53 47 41 42 45 20 41 |.m.... AUSGABE A|
00000360: 55 46 20 42 49 4C 44 53 43 48 49 52 4D 00 8F 0B |UF BILDSCHIRM...|
00000370: D6 0B 99 22 46 45 52 54 49 47 55 4E 47 53 4D 41 |..."FERTIGUNGSMA|
00000380: 54 45 52 49 41 4C 22 3B A3 32 35 29 3B 46 31 00 |TERIAL";.25);F1.|
00000390: A9 0B E0 0B 99 22 2B 20 4D 47 4B 22 4D 31 22 25 |....."+ MGK"M1"%|
000003A0: 22 3B A3 32 35 29 3B 4D 32 00 C4 0B EA 0B 99 22 |";.25);M2......"|
000003B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000003C0: 2D 2D 2D 2D 00 DF 0B F4 0B 99 22 53 54 4F 46 46 |----......"STOFF|
000003D0: 4B 4F 53 54 45 4E 22 3B A3 32 35 29 3B 53 31 00 |KOSTEN";.25);S1.|
000003E0: 01 0C FE 0B 99 22 2B 20 46 45 52 54 49 47 55 4E |....."+ FERTIGUN|
000003F0: 47 53 4C 4F 45 48 4E 45 22 3B A3 32 35 29 3B 4C |GSLOEHNE";.25);L|
00000400: 31 00 1B 0C 08 0C 99 22 2B 20 46 47 4B 22 46 32 |1......"+ FGK"F2|
00000410: 22 25 22 3B A3 32 35 29 3B 46 33 00 31 0C 12 0C |"%";.25);F3.1...|
00000420: 99 22 2B 20 53 45 4B 46 22 3B A3 32 35 29 3B 53 |."+ SEKF";.25);S|
00000430: 32 00 4C 0C 1C 0C 99 22 2D 2D 2D 2D 2D 2D 2D 2D |2.L...."--------|
00000440: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 69 0C 26 |------------.i.&|
00000450: 0C 99 22 48 45 52 53 54 45 4C 4C 4B 4F 53 54 45 |.."HERSTELLKOSTE|
00000460: 4E 22 3B A3 32 35 29 3B 48 00 89 0C 30 0C 99 22 |N";.25);H...0.."|
00000470: 2B 20 56 57 2E 2B 56 54 2E 47 4B 22 56 31 22 25 |+ VW.+VT.GK"V1"%|
00000480: 22 3B A3 32 35 29 3B 56 32 00 9F 0C 3A 0C 99 22 |";.25);V2...:.."|
00000490: 2B 20 53 45 4B 56 22 3B A3 32 35 29 3B 53 33 00 |+ SEKV";.25);S3.|
000004A0: BA 0C 44 0C 99 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |..D.."----------|
000004B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 D6 0C 4E 0C 99 |----------...N..|
000004C0: 22 53 45 4C 42 53 54 4B 4F 53 54 45 4E 22 3B A3 |"SELBSTKOSTEN";.|
000004D0: 32 35 29 3B 53 34 00 F7 0C 58 0C 99 22 2B 20 47 |25);S4...X.."+ G|
000004E0: 45 57 2E 2F 56 45 52 4C 2E 22 47 32 22 25 22 3B |EW./VERL."G2"%";|
000004F0: A3 32 35 29 3B 47 31 00 12 0D 62 0C 99 22 2D 2D |.25);G1...b.."--|
00000500: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000510: 2D 2D 00 31 0D 6C 0C 99 22 42 41 52 56 45 52 4B |--.1.l.."BARVERK|
00000520: 41 55 46 53 50 52 45 49 53 22 3B A3 32 35 29 3B |AUFSPREIS";.25);|
00000530: 42 00 53 0D 76 0C 99 22 2B 20 4B 55 4E 44 45 4E |B.S.v.."+ KUNDEN|
00000540: 53 4B 54 4F 2E 22 4B 31 22 25 22 3B A3 32 35 29 |SKTO."K1"%";.25)|
00000550: 3B 4B 32 00 6E 0D 80 0C 99 22 2D 2D 2D 2D 2D 2D |;K2.n...."------|
00000560: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 8E |--------------..|
00000570: 0D 8A 0C 99 22 5A 49 45 4C 56 45 52 4B 41 55 46 |...."ZIELVERKAUF|
00000580: 53 50 52 45 49 53 22 3B A3 32 35 29 3B 5A 00 AF |SPREIS";.25);Z..|
00000590: 0D 94 0C 99 22 2B 20 4B 55 4E 44 45 4E 52 41 42 |...."+ KUNDENRAB|
000005A0: 2E 22 52 31 22 25 22 3B A3 32 35 29 3B 52 32 00 |."R1"%";.25);R2.|
000005B0: CA 0D 9E 0C 99 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |....."----------|
000005C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 DD 0D A8 0C 99 |----------......|
000005D0: 22 4C 56 50 22 3B A3 32 35 29 3B 4C 32 00 F9 0D |"LVP";.25);L2...|
000005E0: B2 0C 99 22 57 45 49 54 45 52 20 3F 20 44 41 4E |..."WEITER ? DAN|
000005F0: 4E 20 12 53 50 41 43 45 92 00 11 0E BC 0C A1 50 |N .SPACE.......P|
00000600: 4A 24 3A 8B 50 4A 24 B3 B1 22 20 22 A7 33 32 36 |J$:.PJ$.." ".326|
00000610: 30 00 3B 0E C6 0C 99 22 91 20 20 20 20 20 20 20 |0.;....". |
00000620: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000630: 20 20 20 20 20 20 20 20 20 20 22 00 41 0E D0 0C | ".A...|
00000640: 99 00 67 0E DA 0C 8B 47 32 B3 B1 B6 28 47 32 29 |..g....G2...(G2)|
00000650: A7 99 22 12 56 45 52 4C 55 53 54 22 47 32 22 25 |..".VERLUST"G2"%|
00000660: 22 3A 89 33 33 31 30 00 7B 0E E4 0C 99 22 12 47 |":.3310.{....".G|
00000670: 45 57 49 4E 4E 22 47 32 22 25 22 00 85 0E EE 0C |EWINN"G2"%".....|
00000680: 99 3A 99 3A 99 00 8B 0E AC 0D 3A 00 91 0E B6 0D |.:.:......:.....|
00000690: 3A 00 B1 0E C0 0D 8F 20 41 42 46 52 41 47 45 20 |:...... ABFRAGE |
000006A0: 4F 42 20 41 55 53 44 52 55 43 4B 20 4C 4F 48 4E |OB AUSDRUCK LOHN|
000006B0: 54 00 DA 0E CA 0D 99 22 53 4F 4C 4C 20 12 41 55 |T......"SOLL .AU|
000006C0: 53 47 45 44 52 55 43 4B 54 92 20 57 45 52 44 45 |SGEDRUCKT. WERDE|
000006D0: 4E 20 3F 20 20 28 4A 2F 4E 29 00 EE 0E D4 0D A1 |N ? (J/N)......|
000006E0: 41 24 3A 8B 41 24 B2 22 22 A7 33 35 34 30 00 00 |A$:.A$."".3540..|
000006F0: 0F DE 0D 8B 41 24 B2 22 4A 22 A7 20 34 30 30 30 |....A$."J". 4000|
00000700: 00 12 0F E8 0D 8B 41 24 B2 22 4E 22 A7 20 35 30 |......A$."N". 50|
00000710: 30 30 00 1C 0F F2 0D 89 33 35 34 30 00 22 0F A0 |00......3540."..|
00000720: 0F 3A 00 28 0F AA 0F 3A 00 42 0F B4 0F 8F 20 41 |.:.(...:.B.... A|
00000730: 55 53 47 41 42 45 20 41 55 46 20 44 52 55 43 4B |USGABE AUF DRUCK|
00000740: 45 52 00 5C 0F BE 0F 9F 31 2C 34 3A 9F 32 2C 34 |ER.\....1,4:.2,4|
00000750: 2C 30 3A 9F 34 2C 34 2C 34 3A 98 34 00 73 0F C8 |,0:.4,4,4:.4.s..|
00000760: 0F 98 32 2C C7 28 31 33 29 C7 28 31 33 29 C7 28 |..2,.(13).(13).(|
00000770: 31 33 29 00 80 0F D2 0F 52 24 B2 C7 28 32 39 29 |13).....R$..(29)|
00000780: 00 A7 0F DC 0F 98 31 2C C7 28 31 29 22 44 49 46 |......1,.(1)"DIF|
00000790: 46 45 52 45 4E 5A 4B 41 4C 4B 55 4C 41 54 49 4F |FERENZKALKULATIO|
000007A0: 4E 22 C7 28 31 33 29 00 BC 0F E6 0F 98 31 2C 22 |N".(13)......1,"|
000007B0: 41 52 54 49 4B 45 4C 3A 20 22 42 24 00 E4 0F 04 |ARTIKEL: "B$....|
000007C0: 10 98 32 2C 22 46 45 52 54 49 47 55 4E 47 53 4D |..2,"FERTIGUNGSM|
000007D0: 41 54 45 52 49 41 4C 22 3B 52 24 3B 46 31 3B C7 |ATERIAL";R$;F1;.|
000007E0: 28 31 33 29 00 FE 0F 0E 10 98 32 2C 22 2B 20 4D |(13)......2,"+ M|
000007F0: 47 4B 22 4D 31 22 25 22 3B 52 24 3B 4D 32 00 1C |GK"M1"%";R$;M2..|
00000800: 10 18 10 98 32 2C 22 2D 2D 2D 2D 2D 2D 2D 2D 2D |....2,"---------|
00000810: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 37 10 22 |------------.7."|
00000820: 10 98 32 2C 22 53 54 4F 46 46 4B 4F 53 54 45 4E |..2,"STOFFKOSTEN|
00000830: 22 3B 52 24 3B 53 31 00 54 10 2C 10 98 32 2C 22 |";R$;S1.T.,..2,"|
00000840: 2B 20 46 45 52 54 2E 4C 4F 45 48 4E 45 22 3B 52 |+ FERT.LOEHNE";R|
00000850: 24 3B 4C 31 00 6E 10 36 10 98 32 2C 22 2B 20 46 |$;L1.n.6..2,"+ F|
00000860: 47 4B 22 46 32 22 25 22 3B 52 24 3B 46 33 00 84 |GK"F2"%";R$;F3..|
00000870: 10 40 10 98 32 2C 22 2B 20 53 45 4B 46 22 3B 52 |.@..2,"+ SEKF";R|
00000880: 24 3B 53 32 00 A2 10 4A 10 98 32 2C 22 2D 2D 2D |$;S2...J..2,"---|
00000890: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000008A0: 2D 2D 00 BF 10 54 10 98 32 2C 22 48 45 52 53 54 |--...T..2,"HERST|
000008B0: 45 4C 4C 4B 4F 53 54 45 4E 22 3B 52 24 3B 48 00 |ELLKOSTEN";R$;H.|
000008C0: DF 10 5E 10 98 32 2C 22 2B 20 56 57 2E 2B 56 54 |..^..2,"+ VW.+VT|
000008D0: 2E 47 4B 22 56 31 22 25 22 3B 52 24 3B 56 32 00 |.GK"V1"%";R$;V2.|
000008E0: F5 10 68 10 98 32 2C 22 2B 20 53 45 4B 56 22 3B |..h..2,"+ SEKV";|
000008F0: 52 24 3B 53 33 00 13 11 72 10 98 32 2C 22 2D 2D |R$;S3...r..2,"--|
00000900: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000910: 2D 2D 2D 00 35 11 7C 10 98 32 2C 22 53 45 4C 42 |---.5.|..2,"SELB|
00000920: 53 54 4B 4F 53 54 45 4E 22 3B 52 24 3B 53 34 3B |STKOSTEN";R$;S4;|
00000930: C7 28 31 33 29 00 60 11 86 10 8B 42 B3 53 34 A7 |.(13).`....B.S4.|
00000940: 98 32 2C 22 12 2D 20 56 45 52 4C 55 53 54 22 47 |.2,".- VERLUST"G|
00000950: 32 22 25 22 3B 52 24 3B 47 31 3A 89 34 32 35 30 |2"%";R$;G1:.4250|
00000960: 00 7D 11 90 10 98 32 2C 22 2B 20 47 45 57 49 4E |.}....2,"+ GEWIN|
00000970: 4E 22 47 32 22 25 22 3B 52 24 3B 47 31 00 A0 11 |N"G2"%";R$;G1...|
00000980: 9A 10 98 32 2C C7 28 31 33 29 22 2D 2D 2D 2D 2D |...2,.(13)"-----|
00000990: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000009A0: 00 BF 11 A4 10 98 32 2C 22 42 41 52 56 45 52 4B |......2,"BARVERK|
000009B0: 41 55 46 53 50 52 45 49 53 22 3B 52 24 3B 42 00 |AUFSPREIS";R$;B.|
000009C0: E1 11 AE 10 98 32 2C 22 2B 20 4B 55 4E 44 45 4E |.....2,"+ KUNDEN|
000009D0: 53 4B 54 4F 2E 22 4B 31 22 25 22 3B 52 24 3B 4B |SKTO."K1"%";R$;K|
000009E0: 32 00 FF 11 B8 10 98 32 2C 22 2D 2D 2D 2D 2D 2D |2......2,"------|
000009F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 |---------------.|
00000A00: 1A 12 C2 10 98 32 2C 22 5A 49 45 4C 56 45 52 4B |.....2,"ZIELVERK|
00000A10: 2E 50 52 2E 22 3B 52 24 3B 5A 00 39 12 CC 10 98 |.PR.";R$;Z.9....|
00000A20: 32 2C 22 2B 20 4B 2E 52 41 42 41 54 54 22 52 31 |2,"+ K.RABATT"R1|
00000A30: 22 25 22 3B 52 24 3B 52 32 00 57 12 D6 10 98 32 |"%";R$;R2.W....2|
00000A40: 2C 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |,"--------------|
00000A50: 2D 2D 2D 2D 2D 2D 2D 00 75 12 E0 10 98 32 2C 22 |-------.u....2,"|
00000A60: 4C 49 53 54 45 4E 56 45 52 4B 2E 50 52 2E 22 3B |LISTENVERK.PR.";|
00000A70: 52 24 3B 4C 32 00 99 12 EA 10 98 32 2C 22 3D 3D |R$;L2......2,"==|
00000A80: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000A90: 3D 3D 3D 22 C7 28 31 33 29 00 D2 12 F4 10 8B 47 |===".(13)......G|
00000AA0: 32 B3 B1 B6 28 47 32 29 A7 98 32 2C 22 44 45 52 |2...(G2)..2,"DER|
00000AB0: 20 56 45 52 4C 55 53 54 20 42 45 54 52 41 45 47 | VERLUST BETRAEG|
00000AC0: 54 20 22 3B 52 24 3B 47 32 22 25 22 3A 89 34 33 |T ";R$;G2"%":.43|
00000AD0: 35 35 00 F5 12 FE 10 98 32 2C 22 44 45 52 20 47 |55......2,"DER G|
00000AE0: 45 57 49 4E 4E 20 42 45 54 52 41 45 47 54 20 22 |EWINN BETRAEGT "|
00000AF0: 3B 52 24 3B 47 00 0C 13 03 11 98 32 2C C7 28 31 |;R$;G......2,.(1|
00000B00: 33 29 C7 28 31 33 29 C7 28 31 33 29 00 16 13 08 |3).(13).(13)....|
00000B10: 11 A0 31 3A A0 32 00 1C 13 88 13 3A 00 22 13 92 |..1:.2.....:."..|
00000B20: 13 3A 00 34 13 9C 13 8F 20 45 4E 44 45 41 42 46 |.:.4.... ENDEABF|
00000B30: 52 41 47 45 00 3A 13 A1 13 99 00 58 13 A6 13 99 |RAGE.:.....X....|
00000B40: 22 57 45 49 54 45 52 45 20 42 45 52 45 43 48 4E |"WEITERE BERECHN|
00000B50: 55 4E 47 45 4E 20 3F 22 00 6C 13 B0 13 A1 41 24 |UNGEN ?".l....A$|
00000B60: 3A 8B 41 24 B2 22 22 A7 35 30 34 30 00 82 13 BA |:.A$."".5040....|
00000B70: 13 8B 41 24 B2 22 4A 22 A7 20 99 3A 89 20 31 30 |..A$."J". .:. 10|
00000B80: 30 30 00 95 13 C4 13 8B 20 41 24 B2 22 4E 22 A7 |00...... A$."N".|
00000B90: 20 35 30 38 30 00 9F 13 CE 13 89 35 30 34 30 00 | 5080......5040.|
00000BA0: C5 13 D8 13 99 22 93 4C 4F 41 44 22 3B C7 28 33 |.....".LOAD";.(3|
00000BB0: 34 29 3B 22 31 3A 23 23 2A 22 3B C7 28 33 34 29 |4);"1:##*";.(34)|
00000BC0: 3B 22 2C 38 22 00 F5 13 E2 13 99 22 11 11 11 11 |;",8"......"....|
00000BD0: 52 55 4E 22 3A 97 36 32 33 2C 31 39 3A 97 36 32 |RUN":.623,19:.62|
00000BE0: 34 2C 31 33 3A 97 36 32 35 2C 31 33 3A 97 31 35 |4,13:.625,13:.15|
00000BF0: 38 2C 33 3A 80 00 00 00 FF 00 00 FF |8,3:........ |
....D..53280,0:.53281,0.<.N.."..........
DIFFERENZKALKULATION.D.X..:....... ERSTE
LLT VON HORST REICHERT TH.-HEUSS-STR.29
8592 WUNSIEDEL...... VARIABLE ERKENNBAR
AN DEN EINGABEN.....:.....:.Y...."ARTIKE
LBEZEICHNUNG ";B$......"FERTIGUNGSMATERI
AL ";F1......"MGKZ ";M1.3.
..."FERTIGUNGSLOHN ";L1.Q...."FGKZ
";F2.O.$.."SEKF
";S2......"VWGKZ ";V1...
8.."SEKV ";S3.I.B.."KUNDEN
SKONTO % ";K1...L.."KUNDENRABATT %
";R1...V.."LVP ";L2...
`..:....P.:...Z.:.-.... RECHENBEREICH.I.
... .R(B)..(B.100..5).100.D...M2.F1.M1.1
00:M2..R(M2).Q...S1.F1.M2.....F3.L1.F2.1
00:F3..R(F3).....H.L1.F3.S2.S1... .V2.H.
V1.100:V2..R(V2).G.*.S4.H.V2.S3...4.R2.L
2.R1.100:R2..R(R2)...>.Z.L2.R2...H.K2.Z.
K1.100:K2..R(K2)...R.B.Z.K2.).\.G1.B.S4:
G1..R(G1).D.F.G2.G1.100.S4:G2..R(G2).J..
.:.P.B.:.M.L.. AUSGABE AUF BILDSCHIRM...
V.."FERTIGUNGSMATERIAL";.25);F1......"+
MGK"M1"%";.25);M2.D...."----------------
----......"STOFFKOSTEN";.25);S1......"+
FERTIGUNGSLOEHNE";.25);L1......"+ FGK"F2
"%";.25);F3.1...."+ SEKF";.25);S2.L...."
--------------------.I.&.."HERSTELLKOSTE
N";.25);H...0.."+ VW.+VT.GK"V1"%";.25);V
2...:.."+ SEKV";.25);S3...D.."----------
----------.V.N.."SELBSTKOSTEN";.25);S4..
.X.."+ GEW./VERL."G2"%";.25);G1...B.."--
------------------.1.L.."BARVERKAUFSPREI
S";.25);B.S.V.."+ KUNDENSKTO."K1"%";.25)
;K2.N...."--------------------......"ZIE
LVERKAUFSPREIS";.25);Z......"+ KUNDENRAB
."R1"%";.25);R2.J...."------------------
--......"LVP";.25);L2......"WEITER ? DAN
N .SPACE.......PJ$:.PJ$.." ".3260.;.F.."
. ".A.P.
..G.Z..G2...(G2)..".VERLUST"G2"%":.3310.
{....".GEWINN"G2"%"......:.:......:.....
:...... ABFRAGE OB AUSDRUCK LOHNT.Z.J.."
SOLL .AUSGEDRUCKT. WERDEN ? (J/N)...T..
A$:.A$."".3540......A$."J". 4000......A$
."N". 5000......3540.". .:.(...:.B.... A
USGABE AUF DRUCKER.\....1,4:.2,4,0:.4,4,
4:.4.S.H..2,G(13)G(13)G(13)...R.R$.G(29)
......1,G(1)"DIFFERENZKALKULATION"G(13).
.....1,"ARTIKEL: "B$......2,"FERTIGUNGSM
ATERIAL";R$;F1;G(13)......2,"+ MGK"M1"%"
;R$;M2......2,"---------------------.7."
..2,"STOFFKOSTEN";R$;S1.T.,..2,"+ FERT.L
OEHNE";R$;L1.N.6..2,"+ FGK"F2"%";R$;F3..
.@..2,"+ SEKF";R$;S2...J..2,"-----------
----------...T..2,"HERSTELLKOSTEN";R$;H.
..^..2,"+ VW.+VT.GK"V1"%";R$;V2...H..2,"
+ SEKV";R$;S3...R..2,"------------------
---.5.|..2,"SELBSTKOSTEN";R$;S4;G(13).`.
...B.S4..2,".- VERLUST"G2"%";R$;G1:.4250
.}....2,"+ GEWINN"G2"%";R$;G1. ....2,G(1
3)"---------------------......2,"BARVERK
AUFSPREIS";R$;B......2,"+ KUNDENSKTO."K1
"%";R$;K2......2,"---------------------.
..B..2,"ZIELVERK.PR.";R$;Z.9.L..2,"+ K.R
ABATT"R1"%";R$;R2.W.V..2,"--------------
-------.U....2,"LISTENVERK.PR.";R$;L2...
...2,"====================="G(13).R....G
2...(G2)..2,"DER VERLUST BETRAEGT ";R$;G
2"%":.4355......2,"DER GEWINN BETRAEGT "
;R$;G......2,G(13)G(13)G(13)..... 1: 2..
...:."...:.4.... ENDEABFRAGE.:.....X....
"WEITERE BERECHNUNGEN ?".L....A$:.A$."".
5040......A$."J". .:. 1000...D.. A$."N".
5080...N..5040.E.X..".LOAD";G(34);"1:##
*";G(34);",8"......"....RUN":.623,19:.62
4,13:.625,13:.158,3:........
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL