LGS 128
FILE INFORMATION
FILENAME(S): LGS 128
FILE TYPE(S): PRG
FILE SIZE: 5.2K
FIRST SEEN: 2025-11-02 16:39:37
APPEARS ON: 2 disk(s)
FILE HASH
a3a017761df7d472709bd6ba0ccef77fde583d6dc5237d7b94c2f2fd1eb8f342
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| COMMODORE DISC34 | LGS 128 | PRG | Treasure Chest - Plattfuss | 4 | 3 | DOWNLOAD FILE |
| COMMODORE DISC34 | LGS 128 | PRG | Treasure Chest - Plattfuss | 4 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 16 1C 0A 00 FE 25 3A 99 C7 28 31 34 29 22 |.......%:..(14)"|
00000010: 93 22 3A 89 35 35 00 4C 1C 0F 00 50 52 47 20 4C |.":.55.L...PRG L|
00000020: 47 53 20 31 32 38 2C 20 56 45 52 53 49 91 20 31 |GS 128, VERSI. 1|
00000030: 30 2E 38 39 20 46 55 45 52 20 43 31 32 38 20 28 |0.89 FUER C128 (|
00000040: 38 30 20 5A 2E AB 4D 4F 44 55 53 29 00 8C 1C 14 |80 Z..MODUS)....|
00000050: 00 4C 4F 45 53 55 4E 47 20 4C 49 4E 45 41 52 45 |.LOESUNG LINEARE|
00000060: 52 20 47 4C 45 49 43 48 55 4E 47 53 9E 54 45 4D |R GLEICHUNGS.TEM|
00000070: 45 20 44 55 52 43 48 20 4D 41 54 52 49 58 AB 44 |E DURCH MATRIX.D|
00000080: 49 41 CB 4E 41 4C 49 53 49 45 8A 47 00 A8 1C 19 |IA.NALISIE.G....|
00000090: 00 44 52 2E 20 4B 41 49 53 41 52 20 50 45 C0 49 |.DR. KAISAR PE.I|
000000A0: 44 45 53 2C 20 46 46 4D 00 F9 1C 1A 00 AB AB AB |DES, FFM........|
000000B0: AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB |................|
000000C0: AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB |................|
000000D0: AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB |................|
000000E0: AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB |................|
000000F0: AB AB AB AB AB AB AB AB AB 00 46 1D 1C 00 22 20 |..........F..." |
00000100: 20 20 20 0C 07 13 20 31 32 38 20 2D 20 10 12 07 | ... 128 - ...|
00000110: 20 1A 15 12 20 0C 0F 05 13 15 0E 07 20 0C 09 0E | ... ....... ...|
00000120: 05 01 12 05 12 20 07 0C 05 09 03 08 2E 20 13 19 |..... ....... ..|
00000130: 13 2E 20 28 38 30 2D 1A 05 09 03 08 2E 02 09 0C |.. (80-.........|
00000140: 04 13 03 08 2E 29 00 95 1D 1E 00 22 C4 49 45 20 |.....).....".IE |
00000150: C1 4E 5A 41 48 4C 20 44 45 52 20 C7 4C 45 49 43 |.NZAHL DER .LEIC|
00000160: 48 55 4E 47 45 4E 20 57 49 52 44 20 4E 55 52 20 |HUNGEN WIRD NUR |
00000170: 44 55 52 43 48 20 44 41 53 20 C2 49 4C 44 53 43 |DURCH DAS .ILDSC|
00000180: 48 49 52 4D 2D C6 4F 52 4D 41 54 20 42 45 47 52 |HIRM-.ORMAT BEGR|
00000190: 45 4E 5A 54 2E 00 E3 1D 1F 00 22 C4 49 45 20 CB |ENZT......".IE .|
000001A0: 4F 45 46 46 49 5A 49 45 4E 54 45 4E 20 55 4E 44 |OEFFIZIENTEN UND|
000001B0: 20 CB 4F 4E 53 54 41 4E 54 45 4E 20 28 41 42 53 | .ONSTANTEN (ABS|
000001C0: 4F 4C 2E 20 C7 4C 49 45 44 45 52 29 20 57 45 52 |OL. .LIEDER) WER|
000001D0: 44 45 4E 20 49 4E 20 44 45 52 20 47 4C 45 49 43 |DEN IN DER GLEIC|
000001E0: 48 45 4E 00 35 1E 20 00 22 D2 45 49 48 45 4E 46 |HEN.5. .".EIHENF|
000001F0: 4F 4C 47 45 2C 20 57 49 45 20 53 49 45 20 49 4E |OLGE, WIE SIE IN|
00000200: 20 44 45 4E 20 C7 4C 45 49 43 48 55 4E 47 45 4E | DEN .LEICHUNGEN|
00000210: 20 53 54 45 48 45 4E 2C 20 47 45 54 52 45 4E 4E | STEHEN, GETRENN|
00000220: 54 20 44 55 52 43 48 20 53 50 41 43 45 53 20 45 |T DURCH SPACES E|
00000230: 49 4E 47 45 2D 00 87 1E 21 00 22 47 45 42 45 4E |INGE-...!."GEBEN|
00000240: 2E 20 C6 45 48 4C 54 20 45 49 4E 45 20 D5 4E 42 |. .EHLT EINE .NB|
00000250: 45 4B 41 4E 4E 54 45 2C 20 53 4F 20 49 53 54 20 |EKANNTE, SO IST |
00000260: 46 55 45 52 20 53 49 45 20 44 45 52 20 CB 4F 45 |FUER SIE DER .OE|
00000270: 46 46 49 5A 49 45 4E 54 20 30 20 45 49 4E 5A 55 |FFIZIENT 0 EINZU|
00000280: 53 45 54 5A 45 4E 2E 00 AB 1E 22 00 22 5A 2E C2 |SETZEN...."."Z..|
00000290: 20 57 49 52 44 20 44 41 53 20 C7 4C 45 49 43 48 | WIRD DAS .LEICH|
000002A0: 55 4E 47 53 53 59 53 54 45 4D 3A 00 CB 1E 23 00 |UNGSSYSTEM:...#.|
000002B0: 22 20 20 31 29 20 20 20 20 20 32 58 20 2B 20 35 |" 1) 2X + 5|
000002C0: 59 20 2B 20 33 5A 20 3D 20 31 32 00 EB 1E 24 00 |Y + 3Z = 12...$.|
000002D0: 22 20 20 32 29 20 28 32 2F 33 29 58 20 2B 20 35 |" 2) (2/3)X + 5|
000002E0: 59 20 2D 20 32 5A 20 3D 20 20 34 00 0B 1F 25 00 |Y - 2Z = 4...%.|
000002F0: 22 20 20 33 29 20 20 20 20 20 20 58 20 20 20 20 |" 3) X |
00000300: 20 20 2B 20 34 5A 20 3D 20 20 39 00 1F 1F 26 00 | + 4Z = 9...&.|
00000310: 22 53 4F 20 45 49 4E 47 45 47 45 42 45 4E 3A 00 |"SO EINGEGEBEN:.|
00000320: 4C 1F 27 00 22 20 20 20 20 20 20 20 32 20 35 20 |L.'." 2 5 |
00000330: 33 20 31 32 20 20 20 20 20 20 20 20 20 20 20 20 |3 12 |
00000340: 20 20 32 20 20 35 20 20 33 20 31 32 00 79 1F 28 | 2 5 3 12.y.(|
00000350: 00 22 20 20 20 20 20 20 20 32 2F 33 20 35 20 2D |." 2/3 5 -|
00000360: 32 20 34 20 20 20 4F 44 45 52 3A 20 20 20 32 2F |2 4 ODER: 2/|
00000370: 33 20 35 20 2D 32 20 20 34 00 A6 1F 29 00 22 20 |3 5 -2 4...)." |
00000380: 20 20 20 20 20 20 31 20 30 20 34 20 39 20 20 20 | 1 0 4 9 |
00000390: 20 20 20 A0 20 20 20 20 20 20 20 20 31 20 20 30 | . 1 0|
000003A0: 20 20 34 20 20 39 00 F0 1F 2A 00 22 44 2E 48 2E | 4 9...*."D.H.|
000003B0: 20 41 4C 53 20 45 49 4E 45 20 33 58 34 20 CD 41 | ALS EINE 3X4 .A|
000003C0: 54 52 49 58 2E 20 C2 52 55 45 43 48 45 20 57 45 |TRIX. .RUECHE WE|
000003D0: 52 44 45 4E 20 57 49 45 20 47 45 5A 45 49 47 54 |RDEN WIE GEZEIGT|
000003E0: 20 45 49 4E 47 45 47 45 42 45 4E 3A 20 33 2F 37 | EINGEGEBEN: 3/7|
000003F0: 00 3E 20 2B 00 22 CA 45 44 45 20 CD 41 54 52 49 |.> +.".EDE .ATRI|
00000400: 58 5A 45 49 4C 45 20 4B 41 4E 4E 20 57 41 45 48 |XZEILE KANN WAEH|
00000410: 52 45 4E 44 20 44 45 52 20 C5 49 4E 47 41 42 45 |REND DER .INGABE|
00000420: 20 4D 49 54 20 44 45 4D 20 C3 55 52 53 4F 52 20 | MIT DEM .URSOR |
00000430: 41 4E 47 45 46 41 48 52 45 4E 20 55 4E 44 00 7F |ANGEFAHREN UND..|
00000440: 20 2C 00 22 47 45 41 45 4E 44 45 52 54 20 57 45 | ,."GEAENDERT WE|
00000450: 52 44 45 4E 2E 20 CD 49 54 20 4C 45 45 52 45 52 |RDEN. .IT LEERER|
00000460: 20 C5 49 4E 47 41 42 45 2C 20 27 23 27 20 4F 44 | .INGABE, '#' OD|
00000470: 45 52 20 27 2A 27 20 42 45 45 4E 44 45 4E 2E 00 |ER '*' BEENDEN..|
00000480: CF 20 2D 00 22 C4 49 45 20 D0 41 52 41 4D 45 54 |. -.".IE .ARAMET|
00000490: 45 52 20 45 49 4E 45 53 20 42 45 52 45 49 54 53 |ER EINES BEREITS|
000004A0: 20 42 45 52 45 43 48 4E 45 54 45 4E 20 D3 59 53 | BERECHNETEN .YS|
000004B0: 54 45 4D 53 20 4B 4F 45 4E 4E 45 4E 20 44 55 52 |TEMS KOENNEN DUR|
000004C0: 43 48 20 C4 52 55 45 43 4B 45 4E 20 44 45 52 00 |CH .RUECKEN DER.|
000004D0: 1E 21 2E 00 22 C6 31 2D D4 41 53 54 45 20 4E 45 |.!..".1-.ASTE NE|
000004E0: 55 20 41 55 46 47 45 4C 49 53 54 45 54 20 57 45 |U AUFGELISTET WE|
000004F0: 52 44 45 4E 2C 20 55 4D 20 4E 41 43 48 20 45 56 |RDEN, UM NACH EV|
00000500: 45 4E 54 55 45 4C 4C 45 52 20 CB 4F 52 52 45 4B |ENTUELLER .ORREK|
00000510: 54 55 52 20 44 41 53 20 D3 59 53 54 45 4D 00 6D |TUR DAS .YSTEM.m|
00000520: 21 2F 00 22 45 52 4E 45 55 54 20 5A 55 20 42 45 |!/."ERNEUT ZU BE|
00000530: 52 45 43 48 4E 45 4E 2E 20 C4 41 54 45 4E 20 56 |RECHNEN. .ATEN V|
00000540: 4F 4E 20 4E 49 43 48 54 20 47 45 41 45 4E 44 45 |ON NICHT GEAENDE|
00000550: 52 54 45 4E 20 DA 45 49 4C 45 4E 20 42 4C 45 49 |RTEN .EILEN BLEI|
00000560: 42 45 4E 20 45 52 48 41 4C 54 45 4E 21 00 B6 21 |BEN ERHALTEN!..!|
00000570: 30 00 22 CD 49 54 20 44 45 52 20 C6 32 2D D4 41 |0.".IT DER .2-.A|
00000580: 53 54 45 20 57 49 52 44 20 4E 41 43 48 20 44 45 |STE WIRD NACH DE|
00000590: 4D 20 45 52 53 54 45 4E 20 D3 54 41 52 54 20 44 |M ERSTEN .TART D|
000005A0: 45 52 20 4C 47 53 2D 4D 41 4B 45 52 20 45 52 52 |ER LGS-MAKER ERR|
000005B0: 45 49 43 48 54 2E 00 07 22 31 00 22 CD 49 54 20 |EICHT..."1.".IT |
000005C0: 27 5F 27 20 28 CC 49 4E 4B 53 50 46 45 49 4C 29 |'_' (.INKSPFEIL)|
000005D0: 20 4B 41 4E 4E 20 41 55 53 20 4A 45 44 45 52 20 | KANN AUS JEDER |
000005E0: CC 41 47 45 20 44 49 45 20 C5 49 4E 47 41 42 45 |.AGE DIE .INGABE|
000005F0: 53 43 48 4C 2E 20 56 45 52 4C 41 53 53 45 4E 20 |SCHL. VERLASSEN |
00000600: 57 45 52 44 45 4E 21 00 58 22 32 00 AB AB AB AB |WERDEN!.X"2.....|
00000610: AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB |................|
00000620: AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB |................|
00000630: AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB |................|
00000640: AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB |................|
00000650: AB AB AB AB AB AB AB AB 00 8F 22 37 00 F9 31 2C |.........."7..1,|
00000660: 22 47 4F 54 4F 36 30 30 3A 22 AA C7 28 31 33 29 |"GOTO600:"..(13)|
00000670: 3A F9 32 2C 22 47 4F 54 4F 31 30 30 30 3A 22 AA |:.2,"GOTO1000:".|
00000680: C7 28 31 33 29 3A 43 45 24 B2 C7 28 32 37 29 00 |.(13):CE$..(27).|
00000690: B7 22 3C 00 49 B2 30 3A 4A B2 30 3A 4B B2 30 3A |."<.I.0:J.0:K.0:|
000006A0: 4C B2 30 3A 4D B2 30 3A 4E B2 4E 3A 50 B2 30 3A |L.0:M.0:N.N:P.0:|
000006B0: 51 B2 30 3A 52 B2 30 00 E9 22 46 00 99 22 13 22 |Q.0:R.0.."F.."."|
000006C0: 3B 3A E7 35 2C 35 3A 99 22 12 CD 41 54 52 49 58 |;:.5,5:."..ATRIX|
000006D0: 20 5A 45 49 4C 45 4E 57 45 49 53 45 20 45 49 4E | ZEILENWEISE EIN|
000006E0: 47 45 42 45 4E 21 92 22 3B 00 1D 23 50 00 99 22 |GEBEN!.";..#P.."|
000006F0: 20 20 28 12 40 92 20 49 4E 46 4F 2C 20 20 12 5F | (.@. INFO, ._|
00000700: 92 20 45 4E 44 2C 20 20 12 5E 92 20 4C 47 53 2D |. END, .^. LGS-|
00000710: 4D 41 4B 45 52 29 22 3A E7 35 2C 31 30 00 23 23 |MAKER)":.5,10.##|
00000720: 5A 00 3A 00 37 23 64 00 8F 20 2A 2A 20 45 49 4E |Z.:.7#d.. ** EIN|
00000730: 47 41 42 45 20 2A 2A 00 74 23 69 00 97 32 31 2C |GABE **.t#i..21,|
00000740: 33 3A 85 54 58 24 3A 97 32 31 2C 30 3A 8F 20 45 |3:.TX$:.21,0:. E|
00000750: 49 4E 47 41 42 45 20 56 2E 20 42 49 4C 44 53 43 |INGABE V. BILDSC|
00000760: 48 2E 20 4F 48 4E 45 20 46 52 41 47 45 5A 45 49 |H. OHNE FRAGEZEI|
00000770: 43 48 45 4E 00 99 23 6E 00 50 B2 C2 28 32 33 35 |CHEN..#n.P..(235|
00000780: 29 3A 8F 20 43 55 52 53 4F 52 5A 45 49 4C 45 20 |):. CURSORZEILE |
00000790: 28 30 20 2D 20 32 34 21 29 00 B0 23 78 00 8B D4 |(0 - 24!)..#x...|
000007A0: 28 54 58 24 2C 22 5F 22 29 A7 99 22 93 22 3A 80 |(TX$,"_")..".":.|
000007B0: 00 D7 23 7A 00 8B D4 28 54 58 24 2C 22 40 22 29 |..#z...(TX$,"@")|
000007C0: A7 99 22 93 22 3B 3A 9B 32 36 AB 35 30 3A 8D 39 |..".";:.26.50:.9|
000007D0: 30 30 3A 89 36 30 30 00 F3 23 7C 00 8B D4 28 54 |00:.600..#|...(T|
000007E0: 58 24 2C 22 5E 22 29 A7 99 22 93 22 3B 3A 89 31 |X$,"^")..".";:.1|
000007F0: 30 30 30 00 2B 24 7E 00 8B 54 58 24 B2 22 22 AF |000.+$~..TX$."".|
00000800: 4E B2 30 A7 99 22 31 2E 20 DA 45 49 4C 45 20 45 |N.0.."1. .EILE E|
00000810: 49 4E 47 45 42 45 4E 21 22 3B 3A FE 0B 32 3A 99 |INGEBEN!";:..2:.|
00000820: 43 45 24 AA 22 44 22 3A 89 37 30 00 59 24 82 00 |CE$."D":.70.Y$..|
00000830: 8B 4E B2 30 AF 50 B1 31 A7 99 43 45 24 AA 22 50 |.N.0.P.1..CE$."P|
00000840: 22 22 13 22 3A 50 B2 31 3A 99 54 58 24 3B 3A 8F |"".":P.1:.TX$;:.|
00000850: 20 31 2E 20 5A 45 49 4C 45 00 7B 24 8C 00 99 3A | 1. ZEILE.{$...:|
00000860: 8B 4E B2 30 A7 8D 34 33 30 3A 8F 20 44 49 4D 45 |.N.0..430:. DIME|
00000870: 4E 53 49 4F 4E 49 45 52 55 4E 47 00 9A 24 96 00 |NSIONIERUNG..$..|
00000880: 54 24 28 50 29 B2 54 58 24 3A 8F 20 41 4B 54 55 |T$(P).TX$:. AKTU|
00000890: 45 4C 4C 45 20 5A 45 49 4C 45 00 B0 24 9B 00 8B |ELLE ZEILE..$...|
000008A0: C8 28 54 58 24 2C 31 29 B2 22 30 22 A7 31 37 30 |.(TX$,1)."0".170|
000008B0: 00 E6 24 A0 00 8B C5 28 54 58 24 29 B2 30 AF 50 |..$....(TX$).0.P|
000008C0: B3 B2 4E A7 99 22 91 22 4E AB 50 AA 31 22 C7 4C |..N.."."N.P.1".L|
000008D0: 45 49 43 48 2E 20 5A 55 20 57 45 4E 49 47 21 91 |EICH. ZU WENIG!.|
000008E0: 22 3A 89 31 30 30 00 21 25 AA 00 8B 54 58 24 B2 |":.100.!%...TX$.|
000008F0: 22 22 B0 54 58 24 B2 22 2A 22 B0 54 58 24 B2 22 |"".TX$."*".TX$."|
00000900: 23 22 A7 3A 8B 4E 89 32 36 30 3A D5 8B 4E B2 30 |#".:.N.260:..N.0|
00000910: A7 80 3A 8F 20 45 49 4E 47 41 42 45 2D 45 4E 44 |..:. EINGABE-END|
00000920: 45 00 55 25 B4 00 8B 50 B1 4E A7 99 22 91 C7 4C |E.U%...P.N.."..L|
00000930: 45 49 43 48 55 4E 47 20 5A 55 20 56 49 45 4C 21 |EICHUNG ZU VIEL!|
00000940: 91 22 3A FE 0B 32 3A 99 43 45 24 AA 22 44 22 3B |.":..2:.CE$."D";|
00000950: 3A 89 31 30 30 00 5B 25 BE 00 3A 00 91 25 C8 00 |:.100.[%..:..%..|
00000960: 4D B2 30 3A 4C B2 4C AA 31 3A 81 4A B2 31 A4 4E |M.0:L.L.1:.J.1.N|
00000970: AA 31 3A 8F 20 4C 45 45 52 53 54 45 4C 4C 45 4E |.1:. LEERSTELLEN|
00000980: 20 42 45 52 55 45 43 4B 53 49 43 48 54 49 47 45 | BERUECKSICHTIGE|
00000990: 4E 00 B4 25 D2 00 EB FD CA 28 54 24 28 50 29 2C |N..%.....(T$(P),|
000009A0: 4D AA 31 2C 31 29 B2 C7 28 33 32 29 3A 4D B2 4D |M.1,1)..(32):M.M|
000009B0: AA 31 3A EC 00 DD 25 DC 00 51 B2 D4 28 54 24 28 |.1:...%..Q..(T$(|
000009C0: 50 29 2C C7 28 33 32 29 2C 4D AA 31 29 3A 8B 51 |P),.(32),M.1):.Q|
000009D0: B2 30 A7 51 B2 C3 28 54 24 28 50 29 29 00 0B 26 |.0.Q..(T$(P))..&|
000009E0: DE 00 4B 24 28 50 2C 4A 29 B2 CA 28 54 24 28 50 |..K$(P,J)..(T$(P|
000009F0: 29 2C 4D AA 31 2C 51 AB 4D 29 3A 8F 20 4D 41 54 |),M.1,Q.M):. MAT|
00000A00: 52 49 58 45 4C 45 4D 45 4E 54 45 00 3C 26 E2 00 |RIXELEMENTE.<&..|
00000A10: 52 B2 D4 28 4B 24 28 50 2C 4A 29 2C 22 2F 22 29 |R..(K$(P,J),"/")|
00000A20: 3A 8B 52 B3 B1 30 A7 8D 38 30 30 3A 89 32 33 35 |:.R..0..800:.235|
00000A30: 3A 8F 20 42 52 55 43 48 46 4F 52 4D 00 52 26 E6 |:. BRUCHFORM.R&.|
00000A40: 00 4B 28 50 2C 4A 29 B2 C5 28 4B 24 28 50 2C 4A |.K(P,J)..(K$(P,J|
00000A50: 29 29 00 5A 26 EB 00 4D B2 51 00 70 26 F0 00 82 |)).Z&..M.Q.p&...|
00000A60: 3A 8B 58 24 B2 22 58 22 A7 58 24 B2 22 22 3A 8E |:.X$."X".X$."":.|
00000A70: 00 96 26 FA 00 8B 54 58 24 B3 B1 22 23 22 AF 54 |..&...TX$.."#".T|
00000A80: 58 24 B3 B1 C7 28 33 32 29 AF 54 58 24 B3 B1 22 |X$...(32).TX$.."|
00000A90: 2A 22 A7 31 30 30 00 9C 26 FF 00 3A 00 AD 26 04 |*".100..&..:..&.|
00000AA0: 01 49 54 B2 54 49 3A 81 4C B2 31 A4 4E 00 B8 26 |.IT.TI:.L.1.N..&|
00000AB0: 0E 01 81 49 B2 31 A4 4E 00 C5 26 18 01 8B 49 B2 |...I.1.N..&...I.|
00000AC0: 4C A7 33 35 30 00 E1 26 22 01 8B 4B 28 4C 2C 4C |L.350..&"..K(L,L|
00000AD0: 29 B2 30 AF 4C B3 4E A7 8D 37 30 30 3A 89 32 36 |).0.L.N..700:.26|
00000AE0: 30 00 03 27 2C 01 8B 4B 28 4C 2C 4C 29 B2 30 A7 |0..',..K(L,L).0.|
00000AF0: 99 22 4B 45 49 4E 45 20 CC 4F 45 53 55 4E 47 21 |."KEINE .OESUNG!|
00000B00: 22 3A 80 00 19 27 36 01 45 4B B2 AB 4B 28 49 2C |":...'6.EK..K(I,|
00000B10: 4C 29 AD 4B 28 4C 2C 4C 29 00 26 27 40 01 81 4A |L).K(L,L).&'@..J|
00000B20: B2 4C A4 4E AA 31 00 42 27 4A 01 4B 28 49 2C 4A |.L.N.1.B'J.K(I,J|
00000B30: 29 B2 4B 28 49 2C 4A 29 AA 4B 28 4C 2C 4A 29 AC |).K(I,J).K(L,J).|
00000B40: 45 4B 00 49 27 54 01 82 4A 00 50 27 5E 01 82 49 |EK.I'T..J.P'^..I|
00000B50: 00 57 27 68 01 82 4C 00 79 27 72 01 8F 20 2A 2A |.W'h..L.y'r.. **|
00000B60: 20 41 4E 5A 45 49 47 45 20 44 45 52 20 4C 4F 45 | ANZEIGE DER LOE|
00000B70: 53 55 4E 47 45 4E 20 2A 2A 00 84 27 77 01 81 4B |SUNGEN **..'w..K|
00000B80: B2 31 A4 4E 00 A8 27 7C 01 8B 4B 28 4B 2C 4B 29 |.1.N..'|..K(K,K)|
00000B90: B3 B1 30 A7 58 28 4B 29 B2 4B 28 4B 2C 4E AA 31 |..0.X(K).K(K,N.1|
00000BA0: 29 AD 4B 28 4B 2C 4B 29 00 C1 27 81 01 8B B6 28 |).K(K,K)..'....(|
00000BB0: 58 28 4B 29 29 B3 39 45 AB 37 A7 58 28 4B 29 B2 |X(K)).9E.7.X(K).|
00000BC0: 30 00 F6 27 86 01 99 22 58 22 CA 28 C4 28 4B 29 |0..'..."X".(.(K)|
00000BD0: 2C 32 29 22 20 20 3D 20 22 C5 28 C8 28 C4 28 58 |,2)" = ".(.(.(X|
00000BE0: 28 4B 29 AA 39 2E 45 AB 38 AC B4 28 58 28 4B 29 |(K).9.E.8..(X(K)|
00000BF0: 29 29 2C 39 29 29 00 29 28 90 01 82 3A 99 22 11 |)),9)).)(...:.".|
00000C00: 12 D2 45 43 48 45 4E 5A 45 49 54 92 20 3D 22 C8 |..ECHENZEIT. =".|
00000C10: 28 C4 28 28 54 49 AB 49 54 29 AD 36 30 29 2C 35 |(.((TI.IT).60),5|
00000C20: 29 22 20 53 45 43 20 21 22 00 45 28 9A 01 8B 54 |)" SEC !".E(...T|
00000C30: 58 24 B2 22 2A 22 B0 54 58 24 B2 22 23 22 A7 99 |X$."*".TX$."#"..|
00000C40: 3A 89 34 39 30 00 4B 28 A4 01 80 00 51 28 A9 01 |:.490.K(....Q(..|
00000C50: 3A 00 6D 28 AE 01 8F 20 2A 2A 20 44 49 4D 45 4E |:.m(... ** DIMEN|
00000C60: 53 49 4F 4E 49 45 52 55 4E 47 20 2A 2A 00 A5 28 |SIONIERUNG **..(|
00000C70: B8 01 4D B2 D4 28 54 58 24 2C C7 28 33 32 29 2C |..M..(TX$,.(32),|
00000C80: 4D AA 31 29 3A 8B 4D B2 30 AF 58 24 B2 22 58 22 |M.1):.M.0.X$."X"|
00000C90: A7 4E B2 4E AA 31 3A 89 34 37 30 3A D5 8B 4D B2 |.N.N.1:.470:..M.|
00000CA0: 30 89 34 37 30 00 C6 28 C2 01 EB FD CA 28 54 58 |0.470..(.....(TX|
00000CB0: 24 2C 4D AA 31 2C 31 29 B2 C7 28 33 32 29 3A 4D |$,M.1,1)..(32):M|
00000CC0: B2 4D AA 31 3A EC 00 D5 28 CC 01 4E B2 4E AA 31 |.M.1:...(..N.N.1|
00000CD0: 3A 89 34 34 30 00 12 29 D6 01 86 54 24 28 32 34 |:.440..)...T$(24|
00000CE0: 29 2C 4B 28 4E 2C 4E AA 31 29 2C 4B 24 28 4E 2C |),K(N,N.1),K$(N,|
00000CF0: 4E AA 31 29 2C 58 28 4E 29 3A 8F 20 4E 20 3D 20 |N.1),X(N):. N = |
00000D00: 41 4E 5A 41 48 4C 20 47 4C 45 49 43 48 55 4E 47 |ANZAHL GLEICHUNG|
00000D10: 45 4E 00 18 29 E0 01 8E 00 1E 29 EA 01 3A 00 40 |EN..).....)..:.@|
00000D20: 29 F4 01 8F 20 2A 2A 20 54 52 41 4E 53 46 4F 52 |)... ** TRANSFOR|
00000D30: 4D 49 45 52 54 45 20 4D 41 54 52 49 58 20 2A 2A |MIERTE MATRIX **|
00000D40: 00 61 29 FE 01 8B 4E B2 31 A7 35 39 30 3A D5 99 |.a)...N.1.590:..|
00000D50: 22 C4 49 41 47 4F 4E 41 4C 4D 41 54 52 49 58 3A |".IAGONALMATRIX:|
00000D60: 22 00 7D 29 08 02 46 4F 24 B2 22 3D 23 23 23 23 |".})..FO$."=####|
00000D70: 2E 23 23 22 3A 8F 20 46 4F 52 4D 41 54 00 91 29 |.##":. FORMAT..)|
00000D80: 12 02 81 49 B2 31 A4 4E 3A 81 4A B2 31 A4 4E AA |...I.1.N:.J.1.N.|
00000D90: 31 00 B2 29 1C 02 8B 54 58 24 B2 22 2A 22 A7 99 |1..)...TX$."*"..|
00000DA0: FB 46 4F 24 3B C5 28 C4 28 4B 28 49 2C 4A 29 29 |.FO$;.(.(K(I,J))|
00000DB0: 29 3B 00 CB 29 26 02 8B 54 58 24 B2 22 23 22 A7 |);..)&..TX$."#".|
00000DC0: 99 C4 28 4B 28 49 2C 4A 29 29 2C 00 D2 29 30 02 |..(K(I,J)),..)0.|
00000DD0: 82 4A 00 D8 29 3A 02 99 00 DF 29 44 02 82 49 00 |.J..):....)D..I.|
00000DE0: EB 29 4E 02 99 22 91 91 22 3A 80 00 F1 29 53 02 |.)N.."..":...)S.|
00000DF0: 3A 00 0C 2A 58 02 8F 20 2A 2A 20 45 49 4E 47 41 |:..*X.. ** EINGA|
00000E00: 42 45 2D 4D 41 54 52 49 58 20 2A 2A 00 33 2A 62 |BE-MATRIX **.3*b|
00000E10: 02 4B B2 30 3A 99 22 93 22 3A 8B 4E B2 30 AF 58 |.K.0:.".":.N.0.X|
00000E20: 24 B2 22 58 22 A7 31 30 30 30 3A D5 8B 4E B2 30 |$."X".1000:..N.0|
00000E30: A7 36 30 00 47 2A 6C 02 81 49 B2 31 A4 4E 3A 99 |.60.G*l..I.1.N:.|
00000E40: 54 24 28 49 29 3A 82 00 76 2A 76 02 8B 4E B1 30 |T$(I):..v*v..N.0|
00000E50: A7 81 49 B2 31 A4 4E 3A 81 4A B2 31 A4 4E AA 31 |..I.1.N:.J.1.N.1|
00000E60: 3A 4B 28 49 2C 4A 29 B2 C5 28 4B 24 28 49 2C 4A |:K(I,J)..(K$(I,J|
00000E70: 29 29 3A 82 3A 82 00 7E 2A 80 02 89 37 30 00 84 |)):.:..~*...70..|
00000E80: 2A 8A 02 3A 00 A6 2A BC 02 8F 20 2A 2A 20 56 45 |*..:..*... ** VE|
00000E90: 52 53 45 54 5A 55 4E 47 20 56 4F 4E 20 5A 45 49 |RSETZUNG VON ZEI|
00000EA0: 4C 45 4E 20 2A 2A 00 CB 2A C6 02 4B B2 4B AA 31 |LEN **..*..K.K.1|
00000EB0: 3A 8B 4B B1 4E AB 4C A7 99 22 4B 45 49 4E 45 20 |:.K.N.L.."KEINE |
00000EC0: CC 4F 45 53 55 4E 47 21 22 3A 80 00 F8 2A D0 02 |.OESUNG!":...*..|
00000ED0: E7 35 2C 36 3A 99 22 C7 4C 45 49 43 48 55 4E 47 |.5,6:.".LEICHUNG|
00000EE0: 22 4C 22 57 49 52 44 20 56 45 52 53 45 54 5A 54 |"L"WIRD VERSETZT|
00000EF0: 21 22 3A E7 35 2C 31 30 00 31 2B DA 02 54 24 28 |!":.5,10.1+..T$(|
00000F00: 30 29 B2 54 24 28 4C 29 3A 81 4A B2 31 A4 4E AA |0).T$(L):.J.1.N.|
00000F10: 31 3A 4B 24 28 30 2C 4A 29 B2 4B 24 28 4C 2C 4A |1:K$(0,J).K$(L,J|
00000F20: 29 3A 4B 28 30 2C 4A 29 B2 4B 28 4C 2C 4A 29 3A |):K(0,J).K(L,J):|
00000F30: 82 00 5A 2B E4 02 81 47 B2 4C A4 4E AB 31 3A 54 |..Z+...G.L.N.1:T|
00000F40: 24 28 47 29 B2 54 24 28 47 AA 31 29 3A 82 3A 54 |$(G).T$(G.1):.:T|
00000F50: 24 28 4E 29 B2 54 24 28 30 29 00 96 2B EE 02 81 |$(N).T$(0)..+...|
00000F60: 49 B2 4C A4 4E AB 31 3A 81 4A B2 31 A4 4E AA 31 |I.L.N.1:.J.1.N.1|
00000F70: 3A 4B 24 28 49 2C 4A 29 B2 4B 24 28 49 AA 31 2C |:K$(I,J).K$(I.1,|
00000F80: 4A 29 3A 4B 28 49 2C 4A 29 B2 4B 28 49 AA 31 2C |J):K(I,J).K(I.1,|
00000F90: 4A 29 3A 82 3A 82 00 C3 2B F8 02 81 4A B2 31 A4 |J):.:...+...J.1.|
00000FA0: 4E AA 31 3A 4B 24 28 4E 2C 4A 29 B2 4B 24 28 30 |N.1:K$(N,J).K$(0|
00000FB0: 2C 4A 29 3A 4B 28 4E 2C 4A 29 B2 4B 28 30 2C 4A |,J):K(N,J).K(0,J|
00000FC0: 29 3A 82 00 E0 2B 02 03 FE 0B 32 3A 99 22 93 22 |):...+....2:."."|
00000FD0: 3A 81 49 B2 31 A4 4E 3A 99 54 24 28 49 29 3A 82 |:.I.1.N:.T$(I):.|
00000FE0: 00 E8 2B 0C 03 99 3A 8E 00 EE 2B 16 03 3A 00 0D |..+...:...+..:..|
00000FF0: 2C 20 03 8F 20 2A 2A 20 4B 4F 45 46 46 2E 49 4E |, .. ** KOEFF.IN|
00001000: 20 42 52 55 43 48 46 4F 52 4D 20 2A 2A 00 50 2C | BRUCHFORM **.P,|
00001010: 2A 03 4B 28 50 2C 4A 29 B2 C5 28 C8 28 4B 24 28 |*.K(P,J)..(.(K$(|
00001020: 50 2C 4A 29 2C 52 29 29 AD C5 28 CA 28 4B 24 28 |P,J),R))..(.(K$(|
00001030: 50 2C 4A 29 2C 52 AA 31 2C 51 AB 52 29 29 3A 4B |P,J),R.1,Q.R)):K|
00001040: 24 28 50 2C 4A 29 B2 C4 28 4B 28 50 2C 4A 29 29 |$(P,J)..(K(P,J))|
00001050: 00 56 2C 34 03 8E 00 5C 2C 3E 03 3A 00 75 2C 84 |.V,4...\,>.:.u,.|
00001060: 03 8F 20 2A 2A 20 49 4E 46 4F 20 46 4F 52 4D 41 |.. ** INFO FORMA|
00001070: 54 2E 20 2A 2A 00 AB 2C 8E 03 99 22 13 22 3B 3A |T. **..,...".";:|
00001080: 81 49 B2 31 A4 32 33 3A 99 22 20 20 20 20 22 3A |.I.1.23:." ":|
00001090: 82 3A 99 C7 28 31 35 29 22 20 20 20 20 D4 41 53 |.:..(15)" .AS|
000010A0: 54 45 20 21 22 3B 3A A1 F9 53 24 00 B1 2C 98 03 |TE !";:..S$..,..|
000010B0: 8E 00 D5 2C A2 03 AC 20 AC 20 AC 20 AC 20 AC 20 |...,... . . . . |
000010C0: AC 20 AC 20 AC 20 AC 20 AC 20 AC 20 AC 20 AC 20 |. . . . . . . . |
000010D0: AC 20 AC 20 AC 00 EB 2C E8 03 8F 20 2A 2A 20 4C |. . ...,... ** L|
000010E0: 47 53 2D 4D 41 4B 45 52 20 2A 2A 00 14 2D EC 03 |GS-MAKER **..-..|
000010F0: 99 22 93 22 A3 34 29 22 4C 47 53 2D 4D 41 4B 45 |.".".4)"LGS-MAKE|
00001100: 52 22 3A 81 49 B2 31 A4 33 30 3A 99 22 2D 22 3B |R":.I.1.30:."-";|
00001110: 3A 82 3A 99 00 3A 2D EE 03 99 22 12 43 92 20 20 |:.:..:-...".C. |
00001120: 20 C3 4F 4D 50 55 54 45 52 20 45 52 4C 45 44 49 | .OMPUTER ERLEDI|
00001130: 47 54 20 41 4C 4C 45 53 11 22 00 63 2D F0 03 99 |GT ALLES.".c-...|
00001140: 22 12 4E 92 20 20 20 C1 4E 5A 41 48 4C 20 C7 4C |".N. .NZAHL .L|
00001150: 4E 20 20 53 45 4C 42 53 54 20 41 4E 47 45 42 45 |N SELBST ANGEBE|
00001160: 4E 11 22 00 8C 2D F2 03 99 22 12 58 92 20 20 20 |N."..-...".X. |
00001170: D5 4E 42 45 4B 41 4E 4E 54 45 4E 20 53 45 4C 42 |.NBEKANNTEN SELB|
00001180: 53 54 20 41 4E 47 45 42 45 4E 11 22 00 A9 2D F3 |ST ANGEBEN."..-.|
00001190: 03 99 22 12 45 92 20 20 20 C5 44 49 54 4F 52 2F |..".E. .DITOR/|
000011A0: C5 49 4E 47 41 42 45 11 22 00 D0 2D F4 03 99 22 |.INGABE."..-..."|
000011B0: 12 53 92 20 20 20 53 54 4F 50 22 3A 81 49 B2 31 |.S. STOP":.I.1|
000011C0: A4 33 30 3A 99 22 2D 22 3B 3A 82 3A 99 22 11 22 |.30:."-";:.:."."|
000011D0: 00 FE 2D F6 03 A1 F9 58 24 3A 4D B2 D4 28 22 43 |..-....X$:M..("C|
000011E0: 4E 58 45 53 22 2C 58 24 29 3A 8B 4D B2 30 A7 31 |NXES",X$):.M.0.1|
000011F0: 30 31 34 3A D5 8B 58 24 B2 22 53 22 A7 80 00 19 |014:..X$."S"....|
00001200: 2E F8 03 91 4D 89 31 30 32 30 2C 31 30 32 35 2C |....M.1020,1025,|
00001210: 31 30 31 37 3A 89 36 30 30 00 5B 2E F9 03 9C 3A |1017:.600.[....:|
00001220: 58 24 B2 22 58 22 3A 99 22 93 12 D5 4E 42 45 4B |X$."X":."...NBEK|
00001230: 41 4E 4E 54 45 4E 20 53 4F 20 41 4E 47 45 42 45 |ANNTEN SO ANGEBE|
00001240: 4E 92 3A 20 58 31 20 58 32 20 58 33 20 55 53 57 |N.: X1 X2 X3 USW|
00001250: 2E 20 3C D2 C5 D4 D5 D2 CE 3E 22 00 8C 2E FA 03 |. <......>".....|
00001260: 4D B2 30 3A 8D 31 30 30 3A 81 49 B2 31 A4 4E 3A |M.0:.100:.I.1.N:|
00001270: 58 28 49 29 B2 4B 28 50 2C 49 29 3A 82 3A 54 24 |X(I).K(P,I):.:T$|
00001280: 28 50 29 B2 22 22 3A 89 31 30 37 30 00 A7 2E FC |(P)."":.1070....|
00001290: 03 9C 3A 4E B2 B5 28 BB 28 30 29 AC 31 30 AA 31 |..:N..(.(0).10.1|
000012A0: 29 3A 89 31 30 33 30 00 C7 2E 01 04 9C 3A 85 22 |):.1030......:."|
000012B0: D7 49 45 56 49 45 4C 45 20 C7 4C 45 49 43 48 55 |.IEVIELE .LEICHU|
000012C0: 4E 47 45 4E 22 3B 4E 00 09 2F 06 04 86 54 24 28 |NGEN";N../...T$(|
000012D0: 32 34 29 2C 4B 28 4E 2C 4E AA 31 29 2C 4B 24 28 |24),K(N,N.1),K$(|
000012E0: 4E 2C 4E AA 31 29 2C 58 28 4E 29 2C 53 28 4E 29 |N,N.1),X(N),S(N)|
000012F0: 3A 8F 20 4E 20 3D 20 41 4E 5A 41 48 4C 20 47 4C |:. N = ANZAHL GL|
00001300: 45 49 43 48 55 4E 47 45 4E 00 21 2F 10 04 8F 20 |EICHUNGEN.!/... |
00001310: 2A 2A 20 55 4E 42 45 4B 41 4E 4E 54 45 20 20 2A |** UNBEKANNTE *|
00001320: 2A 00 4F 2F 1A 04 81 49 B2 31 A4 4E 3A 58 B2 B5 |*.O/...I.1.N:X..|
00001330: 28 BB 28 30 29 AC 31 30 29 3A 46 B2 28 BB 28 30 |(.(0).10):F.(.(0|
00001340: 29 B1 30 2E 36 29 3A 8B 46 A7 58 B2 46 AC 58 00 |).0.6):.F.X.F.X.|
00001350: 5C 2F 24 04 58 28 49 29 B2 58 3A 82 00 76 2F 2E |\/$.X(I).X:..v/.|
00001360: 04 8F 20 2A 2A 20 4B 4F 45 46 46 49 5A 49 45 4E |.. ** KOEFFIZIEN|
00001370: 54 45 4E 20 2A 2A 00 88 2F 38 04 81 49 B2 31 A4 |TEN **../8..I.1.|
00001380: 4E 3A 81 4A B2 31 A4 4E 00 AF 2F 42 04 5A B2 B5 |N:.J.1.N../B.Z..|
00001390: 28 BB 28 30 29 AC 31 30 29 3A 46 B2 28 BB 28 30 |(.(0).10):F.(.(0|
000013A0: 29 B1 30 2E 35 29 3A 8B 46 A7 5A B2 5A AC 46 00 |).0.5):.F.Z.Z.F.|
000013B0: ED 2F 4C 04 4B 28 49 2C 4A 29 B2 5A 3A 4B 24 28 |./L.K(I,J).Z:K$(|
000013C0: 49 2C 4A 29 B2 C4 28 5A 29 3A 54 24 28 49 29 B2 |I,J)..(Z):T$(I).|
000013D0: 54 24 28 49 29 AA 22 20 22 AA C4 28 5A 29 3A 53 |T$(I)." "..(Z):S|
000013E0: B2 53 AA 5A AC 58 28 4A 29 3A 99 5A 3B 00 F3 2F |.S.Z.X(J):.Z;../|
000013F0: 56 04 82 00 30 30 60 04 53 28 49 29 B2 53 3A 4B |V...00`.S(I).S:K|
00001400: 28 49 2C 4A 29 B2 53 3A 4B 24 28 49 2C 4A 29 B2 |(I,J).S:K$(I,J).|
00001410: C4 28 53 29 3A 54 24 28 49 29 B2 54 24 28 49 29 |.(S):T$(I).T$(I)|
00001420: AA 22 20 22 AA C4 28 53 29 3A 99 53 3A 53 B2 30 |." "..(S):.S:S.0|
00001430: 00 36 30 6A 04 82 00 3C 30 74 04 3A 00 60 30 7E |.60j...<0t.:.`0~|
00001440: 04 99 C7 28 31 35 29 22 20 D4 41 53 54 45 22 3B |...(15)" .ASTE";|
00001450: 3A A1 F9 58 24 3A 99 C7 28 32 37 29 AA 22 50 22 |:..X$:..(27)."P"|
00001460: 00 8F 30 88 04 81 49 B2 31 A4 4E 3A 99 22 58 22 |..0...I.1.N:."X"|
00001470: CA 28 C4 28 49 29 2C 32 29 22 20 3D 22 58 28 49 |.(.(I),2)" ="X(I|
00001480: 29 3A 82 3A 8F 20 4C 4F 45 53 55 4E 47 45 4E 00 |):.:. LOESUNGEN.|
00001490: B0 30 92 04 99 22 D7 45 49 54 45 52 45 20 C2 45 |.0...".EITERE .E|
000014A0: 41 52 42 45 49 54 55 4E 47 20 3F 20 12 4A 92 22 |ARBEITUNG ? .J."|
000014B0: 00 CE 30 9C 04 A1 F9 58 24 3A 8B 58 24 B2 22 4A |..0....X$:.X$."J|
000014C0: 22 B0 58 24 B2 C7 28 31 33 29 A7 36 30 30 00 00 |".X$..(13).600..|
000014D0: 00 |. |
.......%:.G(14)".":.55.L...PRG LGS 128,
VERSI. 10.89 FUER C128 (80 Z..MODUS)....
.LOESUNG LINEARER GLEICHUNGS.TEME DURCH
MATRIX.DIAKNALISIE.G.....DR. KAISAR PE.I
DES, FFM................................
........................................
..........F..." ... 128 - ... ... ...
.... ........ ....... .... (80-.........
.....)....."DIE ANZAHL DER GLEICHUNGEN W
IRD NUR DURCH DAS BILDSCHIRM-FORMAT BEGR
ENZT......"DIE KOEFFIZIENTEN UND KONSTAN
TEN (ABSOL. GLIEDER) WERDEN IN DER GLEIC
HEN.5. ."REIHENFOLGE, WIE SIE IN DEN GLE
ICHUNGEN STEHEN, GETRENNT DURCH SPACES E
INGE-...!."GEBEN. FEHLT EINE UNBEKANNTE,
SO IST FUER SIE DER KOEFFIZIENT 0 EINZU
SETZEN...."."Z.B WIRD DAS GLEICHUNGSSYST
EM:.K.#." 1) 2X + 5Y + 3Z = 12...$.
" 2) (2/3)X + 5Y - 2Z = 4...%." 3)
X + 4Z = 9...&."SO EINGEGEBEN:.
L.'." 2 5 3 12 2 5
3 12.Y.(." 2/3 5 -2 4 ODER: 2/
3 5 -2 4...)." 1 0 4 9
1 0 4 9...*."D.H. ALS EINE 3X4 MA
TRIX. BRUECHE WERDEN WIE GEZEIGT EINGEGE
BEN: 3/7.> +."JEDE MATRIXZEILE KANN WAEH
REND DER EINGABE MIT DEM CURSOR ANGEFAHR
EN UND. ,."GEAENDERT WERDEN. MIT LEERER
EINGABE, '#' ODER '*' BEENDEN..O -."DIE
PARAMETER EINES BEREITS BERECHNETEN SYS
TEMS KOENNEN DURCH DRUECKEN DER..!.."F1-
TASTE NEU AUFGELISTET WERDEN, UM NACH EV
ENTUELLER KORREKTUR DAS SYSTEM.M!/."ERNE
UT ZU BERECHNEN. DATEN VON NICHT GEAENDE
RTEN ZEILEN BLEIBEN ERHALTEN!..!0."MIT D
ER F2-TASTE WIRD NACH DEM ERSTEN START D
ER LGS-MAKER ERREICHT..."1."MIT '_' (LIN
KSPFEIL) KANN AUS JEDER LAGE DIE EINGABE
SCHL. VERLASSEN WERDEN!.X"2.............
........................................
.........................."7..1,"GOTO600
:".G(13):.2,"GOTO1000:".G(13):CE$.G(27).
."<.I.0:J.0:K.0:L.0:M.0:N.N:P.0:Q.0:R.0.
."F..".";:.5,5:.".MATRIX ZEILENWEISE EIN
GEBEN!.";..#P.." (.@. INFO, ._. END,
.^. LGS-MAKER)":.5,10.##Z.:.7#D.. ** EIN
GABE **.T#I..21,3:.TX$:.21,0:. EINGABE V
. BILDSCH. OHNE FRAGEZEICHEN..#N.P.B(235
):. CURSORZEILE (0 - 24!)..#X..T(TX$,"_"
)..".":..W#Z..T(TX$,"@")..".";:.26.50:.9
00:.600..#|..T(TX$,"^")..".";:.1000.+$~.
.TX$."".N.0.."1. ZEILE EINGEBEN!";:..2:.
CE$."D":.70.Y$...N.0.P.1..CE$."P"".":P.1
:.TX$;:. 1. ZEILE.{$...:.N.0..430:. DIME
NSIONIERUNG..$..T$(P).TX$:. AKTUELLE ZEI
LE..$...H(TX$,1)."0".170..$ ..E(TX$).0.P
..N.."."N.P.1"GLEICH. ZU WENIG!.":.100.!
%...TX$."".TX$."*".TX$."#".:.N.260:U.N.0
..:. EINGABE-ENDE.U%...P.N..".GLEICHUNG
ZU VIEL!.":..2:.CE$."D";:.100.[%..:..%H.
M.0:L.L.1:.J.1.N.1:. LEERSTELLEN BERUECK
SICHTIGEN..%R...J(T$(P),M.1,1).G(32):M.M
.1:...%..Q.T(T$(P),G(32),M.1):.Q.0.Q.C(T
$(P))..&..K$(P,J).J(T$(P),M.1,Q.M):. MAT
RIXELEMENTE.<&..R.T(K$(P,J),"/"):.R..0..
800:.235:. BRUCHFORM.R&..K(P,J).E(K$(P,J
)).Z&..M.Q.P&...:.X$."X".X$."":...&...TX
$.."#".TX$..G(32).TX$.."*".100..&..:..&.
.IT.TI:.L.1.N..&...I.1.N.E&...I.L.350..&
"..K(L,L).0.L.N..700:.260..',..K(L,L).0.
."KEINE LOESUNG!":...'6.EK..K(I,L).K(L,L
).&'@..J.L.N.1.B'J.K(I,J).K(I,J).K(L,J).
EK.I'T..J.P'^..I.W'H..L.Y'R.. ** ANZEIGE
DER LOESUNGEN **..'W..K.1.N..'|..K(K,K)
..0.X(K).K(K,N.1).K(K,K).A'....(X(K)).9E
.7.X(K).0..'..."X"J(D(K),2)" = "E(H(D(X
(K).9.E.8..(X(K))),9)).)(...:."..RECHENZ
EIT. ="H(D((TI.IT).60),5)" SEC !".E(...T
X$."*".TX$."#"..:.490.K(....Q(..:.M(...
** DIMENSIONIERUNG **..(..M.T(TX$,G(32),
M.1):.M.0.X$."X".N.N.1:.470:U.M.0.470.F(
B...J(TX$,M.1,1).G(32):M.M.1:..U(L.N.N.1
:.440..)V..T$(24),K(N,N.1),K$(N,N.1),X(N
):. N = ANZAHL GLEICHUNGEN..).....)..:.@
)... ** TRANSFORMIERTE MATRIX **.A)...N.
1.590:U."DIAGONALMATRIX:".})..FO$."=####
.##":. FORMAT..)...I.1.N:.J.1.N.1..)...T
X$."*"...FO$;E(D(K(I,J)));.K)&..TX$."#".
.D(K(I,J)),.R)0..J.X):....)D..I..)N.."..
":...)S.:..*X.. ** EINGABE-MATRIX **.3*B
.K.0:.".":.N.0.X$."X".1000:U.N.0.60.G*L.
.I.1.N:.T$(I):..V*V..N.0..I.1.N:.J.1.N.1
:K(I,J).E(K$(I,J)):.:..~*...70..*..:..*.
.. ** VERSETZUNG VON ZEILEN **.K*F.K.K.1
:.K.N.L.."KEINE LOESUNG!":...*P..5,6:."G
LEICHUNG"L"WIRD VERSETZT!":.5,10.1+Z.T$(
0).T$(L):.J.1.N.1:K$(0,J).K$(L,J):K(0,J)
.K(L,J):..Z+...G.L.N.1:T$(G).T$(G.1):.:T
$(N).T$(0)..+...I.L.N.1:.J.1.N.1:K$(I,J)
.K$(I.1,J):K(I,J).K(I.1,J):.:..C+...J.1.
N.1:K$(N,J).K$(0,J):K(N,J).K(0,J):...+..
..2:.".":.I.1.N:.T$(I):...+...:...+..:..
, .. ** KOEFF.IN BRUCHFORM **.P,*.K(P,J)
.E(H(K$(P,J),R)).E(J(K$(P,J),R.1,Q.R)):K
$(P,J).D(K(P,J)).V,4...\,>.:.U,... ** IN
FO FORMAT. **..,...".";:.I.1.23:." ":
.:.G(15)" TASTE !";:..S$..,....U,...
. . . . . . . . . . . . . . ...,... ** L
GS-MAKER **..-...".".4)"LGS-MAKER":.I.1.
30:."-";:.:..:-...".C. COMPUTER ERLEDI
GT ALLES.".C-...".N. ANZAHL GLN SELBS
T ANGEBEN."..-...".X. UNBEKANNTEN SELB
ST ANGEBEN."..-...".E. EDITOR/EINGABE.
".P-...".S. STOP":.I.1.30:."-";:.:."."
..-....X$:M.T("CNXES",X$):.M.0.1014:U.X$
."S"........M.1020,1025,1017:.600.[....:
X$."X":."..UNBEKANNTEN SO ANGEBEN.: X1 X
2 X3 USW. <RETURN>".....M.0:.100:.I.1.N:
X(I).K(P,I):.:T$(P)."":.1070......:N..(.
(0).10.1):.1030.G....:."WIEVIELE GLEICHU
NGEN";N../...T$(24),K(N,N.1),K$(N,N.1),X
(N),S(N):. N = ANZAHL GLEICHUNGEN.!/...
** UNBEKANNTE **.O/...I.1.N:X..(.(0).10
):F.(.(0).0.6):.F.X.F.X.\/$.X(I).X:..V/.
.. ** KOEFFIZIENTEN **../8..I.1.N:.J.1.N
../B.Z..(.(0).10):F.(.(0).0.5):.F.Z.Z.F.
./L.K(I,J).Z:K$(I,J).D(Z):T$(I).T$(I)."
".D(Z):S.S.Z.X(J):.Z;../V...00`.S(I).S:K
(I,J).S:K$(I,J).D(S):T$(I).T$(I)." ".D(S
):.S:S.0.60J...<0T.:.`0~..G(15)" TASTE";
:..X$:.G(27)."P"..0...I.1.N:."X"J(D(I),2
)" ="X(I):.:. LOESUNGEN..0..."WEITERE BE
ARBEITUNG ? .J.".N0....X$:.X$."J".X$.G(1
3).600...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL