LR.VERFAHREN.EIG

FILE INFORMATION

FILENAME(S): LR.VERFAHREN.EIG

FILE TYPE(S): PRG

FILE SIZE: 1.3K

FIRST SEEN: 2025-12-02 23:47:32

APPEARS ON: 1 disk(s)

FILE HASH

5686184fa3a417a3d15bdf9fb768c2255d4ba4803ea467e95d9c69614d4c9542

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
SPIELE 38	LR.VERFAHREN.EIG	PRG	swasti, flohmarkt	29	10	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 20 08 0A 00 99 C7  28 31 34 37 29 3A 87 20  |.. .....(147):. |
00000010: 4E 2C 45 50 2C 47 45 3A  47 45 B2 31 30 AE 47 45  |N,EP,GE:GE.10.GE|
00000020: 00 3D 08 14 00 99 20 22  45 49 47 45 4E 57 45 52  |.=.... "EIGENWER|
00000030: 54 20 42 45 52 45 43 48  4E 55 4E 47 22 00 60 08  |T BERECHNUNG".`.|
00000040: 1E 00 86 20 41 28 4E 2C  4E 29 2C 43 28 4E 2C 4E  |... A(N,N),C(N,N|
00000050: 29 2C 43 31 28 4E 2C 4E  29 2C 52 28 4E 2C 4E 29  |),C1(N,N),R(N,N)|
00000060: 00 6E 08 28 00 86 20 41  43 28 4E 2C 4E 29 00 86  |.n.(.. AC(N,N)..|
00000070: 08 32 00 81 20 49 B2 31  20 A4 20 4E 3A 81 20 4A  |.2.. I.1 . N:. J|
00000080: B2 31 20 A4 20 4E 00 9B  08 3C 00 87 20 41 28 49  |.1 . N...<.. A(I|
00000090: 2C 4A 29 3A 82 20 4A 3A  82 20 49 00 A6 08 46 00  |,J):. J:. I...F.|
000000A0: 8D 20 31 30 30 30 00 D5  08 50 00 81 20 49 B2 31  |. 1000...P.. I.1|
000000B0: 20 A4 20 4E 3A 99 22 45  49 47 45 4E 57 45 52 54  | . N:."EIGENWERT|
000000C0: 20 22 3B 49 3B 22 20 3D  20 22 3B 52 28 49 2C 49  | ";I;" = ";R(I,I|
000000D0: 29 3A 82 20 49 00 0F 09  55 00 81 20 49 B2 31 20  |):. I...U.. I.1 |
000000E0: A4 20 4E 3A 81 20 4A B2  31 20 A4 20 4E 3A 5A 25  |. N:. J.1 . N:Z%|
000000F0: B2 43 31 28 49 2C 4A 29  AC 47 45 3A 5A B2 5A 25  |.C1(I,J).GE:Z.Z%|
00000100: AD 47 45 3A 99 5A 2C 3A  82 20 4A 3A 99 3A 82 00  |.GE:.Z,:. J:.:..|
00000110: 28 09 5A 00 99 22 49 54  45 52 41 54 49 4F 4E 45  |(.Z.."ITERATIONE|
00000120: 4E 20 3D 22 3B 49 5A 25  00 2E 09 64 00 80 00 40  |N =";IZ%...d...@|
00000130: 09 F4 01 83 20 33 2C 2E  30 30 30 30 30 31 2C 33  |.... 3,.000001,3|
00000140: 00 4D 09 FE 01 83 20 32  2C 2D 31 2C 30 00 5B 09  |.M.... 2,-1,0.[.|
00000150: 08 02 83 20 2D 31 2C 32  2C 2D 31 00 68 09 12 02  |... -1,2,-1.h...|
00000160: 83 20 30 2C 2D 31 2C 32  00 7C 09 1C 02 83 20 2E  |. 0,-1,2.|.... .|
00000170: 30 39 2C 2E 30 35 2C 30  2C 2E 30 35 00 97 09 E8  |09,.05,0,.05....|
00000180: 03 81 20 49 B2 31 20 A4  20 4E 3A 43 28 49 2C 49  |.. I.1 . N:C(I,I|
00000190: 29 B2 31 3A 82 20 49 00  B6 09 FC 03 49 5A 25 B2  |).1:. I.....IZ%.|
000001A0: 30 3A 8F 20 49 54 45 52  41 54 49 4F 4E 45 4E 5A  |0:. ITERATIONENZ|
000001B0: 41 45 48 4C 45 52 00 C9  09 06 04 49 5A 25 B2 49  |AEHLER.....IZ%.I|
000001C0: 5A 25 AA 31 3A 99 49 5A  25 00 E1 09 10 04 81 20  |Z%.1:.IZ%...... |
000001D0: 49 B2 31 20 A4 20 4E 3A  81 20 4A B2 31 20 A4 20  |I.1 . N:. J.1 . |
000001E0: 4E 00 F9 09 1A 04 41 43  28 49 2C 4A 29 B2 30 3A  |N.....AC(I,J).0:|
000001F0: 81 20 4B B2 31 20 A4 20  4E 00 1B 0A 24 04 41 43  |. K.1 . N...$.AC|
00000200: 28 49 2C 4A 29 B2 41 43  28 49 2C 4A 29 AA 41 28  |(I,J).AC(I,J).A(|
00000210: 49 2C 4B 29 AC 43 28 4B  2C 4A 29 00 2B 0A 2E 04  |I,K).C(K,J).+...|
00000220: 82 20 4B 3A 82 20 4A 3A  82 20 49 00 31 0A 38 04  |. K:. J:. I.1.8.|
00000230: 3A 00 3F 0A 42 04 81 20  4B B2 31 20 A4 20 4E 00  |:.?.B.. K.1 . N.|
00000240: 54 0A 4C 04 43 31 28 4B  2C 4B 29 B2 31 3A 4B 31  |T.L.C1(K,K).1:K1|
00000250: B2 4B AB 31 00 74 0A 56  04 81 20 4A B2 4B 20 A4  |.K.1.t.V.. J.K .|
00000260: 20 4E 3A 53 B2 30 3A 8B  20 4B 31 B3 31 20 89 20  | N:S.0:. K1.1 . |
00000270: 31 31 33 30 00 9A 0A 60  04 81 20 50 B2 31 20 A4  |1130...`.. P.1 .|
00000280: 20 4B 31 3A 53 B2 53 AA  43 31 28 4B 2C 50 29 AC  | K1:S.S.C1(K,P).|
00000290: 52 28 50 2C 4A 29 3A 82  20 50 00 B3 0A 6A 04 52  |R(P,J):. P...j.R|
000002A0: 28 4B 2C 4A 29 B2 41 43  28 4B 2C 4A 29 AB 53 3A  |(K,J).AC(K,J).S:|
000002B0: 82 20 4A 00 CE 0A 74 04  4B 50 B2 4B AA 31 3A 8B  |. J...t.KP.K.1:.|
000002C0: 20 4B 50 20 B1 20 4E 20  89 20 31 31 38 30 00 EE  | KP . N . 1180..|
000002D0: 0A 7E 04 81 20 49 B2 4B  50 20 A4 4E 3A 53 B2 30  |.~.. I.KP .N:S.0|
000002E0: 3A 8B 20 4B 31 B3 31 20  89 20 31 31 37 30 00 14  |:. K1.1 . 1170..|
000002F0: 0B 88 04 81 20 50 B2 31  20 A4 20 4B 31 3A 53 B2  |.... P.1 . K1:S.|
00000300: 53 AA 43 31 28 49 2C 50  29 AC 52 28 50 2C 4B 29  |S.C1(I,P).R(P,K)|
00000310: 3A 82 20 50 00 37 0B 92  04 43 31 28 49 2C 4B 29  |:. P.7...C1(I,K)|
00000320: B2 28 41 43 28 49 2C 4B  29 AB 53 29 AD 52 28 4B  |.(AC(I,K).S).R(K|
00000330: 2C 4B 29 3A 82 20 49 00  3F 0B 9C 04 82 20 4B 00  |,K):. I.?.... K.|
00000340: 5D 0B A6 04 49 45 25 B2  30 3A 81 20 49 B2 31 20  |]...IE%.0:. I.1 |
00000350: A4 20 4E 3A 81 20 4A B2  31 20 A4 20 49 00 80 0B  |. N:. J.1 . I...|
00000360: B0 04 8B 20 B6 28 43 28  49 2C 4A 29 AB 43 31 28  |... .(C(I,J).C1(|
00000370: 49 2C 4A 29 29 B1 45 50  20 A7 20 49 45 25 B2 31  |I,J)).EP . IE%.1|
00000380: 00 9B 0B BA 04 43 28 49  2C 4A 29 B2 43 31 28 49  |.....C(I,J).C1(I|
00000390: 2C 4A 29 3A 82 20 4A 3A  82 20 49 00 AE 0B C4 04  |,J):. J:. I.....|
000003A0: 8B 20 49 45 25 B2 31 20  89 20 31 30 33 30 00 D0  |. IE%.1 . 1030..|
000003B0: 0B CE 04 8F 20 42 52 45  43 48 4E 55 4E 47 20 44  |.... BRECHNUNG D|
000003C0: 45 52 20 45 49 47 45 4E  56 45 4B 54 4F 52 45 4E  |ER EIGENVEKTOREN|
000003D0: 00 F3 0B D8 04 8F 20 56  28 41 29 3D 43 2A 56 28  |...... V(A)=C*V(|
000003E0: 52 29 20 28 45 49 47 2E  20 56 45 4B 2E 20 56 2E  |R) (EIG. VEK. V.|
000003F0: 20 52 29 00 01 0C E2 04  81 20 49 B2 31 20 A4 20  | R)...... I.1 . |
00000400: 4E 00 12 0C EC 04 8B 20  49 B2 4E 20 89 20 31 32  |N...... I.N . 12|
00000410: 38 30 00 30 0C F6 04 81  20 4A B2 49 AA 31 20 A4  |80.0.... J.I.1 .|
00000420: 20 4E 3A 41 43 28 4A 2C  49 29 B2 30 3A 82 20 4A  | N:AC(J,I).0:. J|
00000430: 00 4B 0C 00 05 41 43 28  49 2C 49 29 B2 31 3A 8B  |.K...AC(I,I).1:.|
00000440: 20 49 B2 31 20 89 20 31  33 32 30 00 64 0C 0A 05  | I.1 . 1320.d...|
00000450: 81 20 4A B2 49 AB 31 20  A4 20 31 20 A9 20 AB 31  |. J.I.1 . 1 . .1|
00000460: 3A 53 B2 30 00 8B 0C 14  05 81 20 4B B2 4A AA 31  |:S.0...... K.J.1|
00000470: 20 A4 20 4E 3A 53 B2 53  AA 52 28 4A 2C 4B 29 AC  | . N:S.S.R(J,K).|
00000480: 41 43 28 4B 2C 49 29 3A  82 20 4B 00 AE 0C 1E 05  |AC(K,I):. K.....|
00000490: 41 43 28 4A 2C 49 29 B2  AB 53 AD 28 52 28 4A 2C  |AC(J,I)..S.(R(J,|
000004A0: 4A 29 AB 52 28 49 2C 49  29 29 3A 82 20 4A 00 B6  |J).R(I,I)):. J..|
000004B0: 0C 28 05 82 20 49 00 CE  0C 46 05 81 20 49 B2 31  |.(.. I...F.. I.1|
000004C0: 20 A4 20 4E 3A 81 20 4A  B2 31 20 A4 20 4E 00 E6  | . N:. J.1 . N..|
000004D0: 0C 50 05 43 31 28 49 2C  4A 29 B2 30 3A 81 20 4B  |.P.C1(I,J).0:. K|
000004E0: B2 31 20 A4 20 4E 00 09  0D 5A 05 43 31 28 49 2C  |.1 . N...Z.C1(I,|
000004F0: 4A 29 B2 43 31 28 49 2C  4A 29 AA 43 28 49 2C 4B  |J).C1(I,J).C(I,K|
00000500: 29 AC 41 43 28 4B 2C 4A  29 00 19 0D 64 05 82 20  |).AC(K,J)...d.. |
00000510: 4B 3A 82 20 4A 3A 82 20  49 00 1F 0D 6E 05 8E 00  |K:. J:. I...n...|
00000520: 00 00                                             |..              |

.. ....G(147):. N,EP,GE:GE.10.GE.=.... "
EIGENWERT BERECHNUNG".`.... A(N,N),C(N,N
),C1(N,N),R(N,N).N.(.. AC(N,N)...2.. I.1
 . N:. J.1 . N...<.. A(I,J):. J:. I...F.
. 1000.U.P.. I.1 . N:."EIGENWERT ";I;" =
 ";R(I,I):. I...U.. I.1 . N:. J.1 . N:Z%
.C1(I,J).GE:Z.Z%.GE:.Z,:. J:.:..(.Z.."IT
ERATIONEN =";IZ%...D...@.... 3,.000001,3
.M.... 2,-1,0.[.... -1,2,-1.H.... 0,-1,2
.|.... .09,.05,0,.05...... I.1 . N:C(I,I
).1:. I.....IZ%.0:. ITERATIONENZAEHLER.I
...IZ%.IZ%.1:.IZ%...... I.1 . N:. J.1 . 
N.....AC(I,J).0:. K.1 . N...$.AC(I,J).AC
(I,J).A(I,K).C(K,J).+.... K:. J:. I.1.8.
:.?.B.. K.1 . N.T.L.C1(K,K).1:K1.K.1.T.V
.. J.K . N:S.0:. K1.1 . 1130...`.. P.1 .
 K1:S.S.C1(K,P).R(P,J):. P...J.R(K,J).AC
(K,J).S:. J.N.T.KP.K.1:. KP . N . 1180..
.~.. I.KP .N:S.0:. K1.1 . 1170...... P.1
 . K1:S.S.C1(I,P).R(P,K):. P.7...C1(I,K)
.(AC(I,K).S).R(K,K):. I.?.... K.]...IE%.
0:. I.1 . N:. J.1 . I...... .(C(I,J).C1(
I,J)).EP . IE%.1.....C(I,J).C1(I,J):. J:
. I...D.. IE%.1 . 1030.P.N.. BRECHNUNG D
ER EIGENVEKTOREN...X.. V(A)=C*V(R) (EIG.
 VEK. V. R)...... I.1 . N...... I.N . 12
80.0.... J.I.1 . N:AC(J,I).0:. J.K...AC(
I,I).1:. I.1 . 1320.D.... J.I.1 . 1 . .1
:S.0...... K.J.1 . N:S.S.R(J,K).AC(K,I):
. K.....AC(J,I)..S.(R(J,J).R(I,I)):. J..
.(.. I.N.F.. I.1 . N:. J.1 . N...P.C1(I,
J).0:. K.1 . N...Z.C1(I,J).C1(I,J).C(I,K
).AC(K,J)...D.. K:. J:. I...N.....

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL