ROT
FILE INFORMATION
FILENAME(S): ROT
FILE TYPE(S): PRG
FILE SIZE: 2.1K
FIRST SEEN: 2025-12-01 13:46:33
APPEARS ON: 1 disk(s)
FILE HASH
83e9976e8d49cd7e7722de676146ae6df0416754e5741a8d9c7904b5fade6487
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PRG DISK THOMAS | ROT | PRG | hedning, Tom | 17 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1F 08 00 00 12 22 50 52 47 20 44 49 53 4B |......."PRG DISK| 00000010: 20 54 48 4F 4D 41 53 20 22 20 41 35 20 32 41 00 | THOMAS " A5 2A.| 00000020: 58 08 64 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |X.d.. **********| 00000030: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000040: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000050: 2A 2A 2A 2A 2A 2A 2A 2A 00 91 08 6E 00 8F 20 2A |********...n.. *| 00000060: 20 20 20 20 20 20 52 4F 4F 54 20 20 20 20 20 20 | ROOT | 00000070: 20 20 20 20 20 20 53 43 48 4D 49 44 54 42 41 55 | SCHMIDTBAU| 00000080: 45 52 20 31 39 38 38 20 20 20 20 20 20 20 20 20 |ER 1988 | 00000090: 2A 00 CA 08 78 00 8F 20 2A 20 50 52 4F 47 52 41 |*...x.. * PROGRA| 000000A0: 4D 4D 45 54 20 42 45 52 41 4B 4E 41 52 20 4F 43 |MMET BERAKNAR OC| 000000B0: 48 20 4C 49 53 54 41 52 20 54 49 4C 4C 20 45 4E |H LISTAR TILL EN| 000000C0: 20 20 20 20 20 20 20 20 20 2A 00 03 09 82 00 8F | *......| 000000D0: 20 2A 20 4E 3A 54 45 47 52 41 44 53 45 4B 56 41 | * N:TEGRADSEKVA| 000000E0: 54 49 4F 4E 20 20 20 20 20 20 20 20 20 20 20 20 |TION | 000000F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000100: 20 20 2A 00 3C 09 8C 00 8F 20 2A 2A 2A 2A 2A 2A | *.<.... ******| 00000110: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000120: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000130: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 51 09 96 |************.Q..| 00000140: 00 96 B5 20 49 2C 4A 2C 4D 2C 4E 2C 54 3A 43 4C |... I,J,M,N,T:CL| 00000150: 53 00 7A 09 A0 00 85 22 47 52 41 44 54 41 4C 3F |S.z...."GRADTAL?| 00000160: 20 22 2C 4E 3A 99 3A 4E 31 B2 4E 3A 81 20 4A B2 | ",N:.:N1.N:. J.| 00000170: 4E 20 A4 20 30 20 A9 20 AB 31 00 A1 09 AA 00 99 |N . 0 . .1......| 00000180: 22 4B 4F 45 46 46 2C 20 46 4F 52 20 58 27 22 3B |"KOEFF, FOR X'";| 00000190: 4A 3B 3A 85 20 41 28 4E AB 4A 29 3A 82 3A 54 B2 |J;:. A(N.J):.:T.| 000001A0: 31 00 C9 09 B4 00 99 3A 99 3A 81 20 4A B2 30 20 |1......:.:. J.0 | 000001B0: A4 20 4E 3A 48 28 4A AA 32 29 B2 41 28 4A 29 3A |. N:H(J.2).A(J):| 000001C0: 82 3A 4B B2 31 45 AA 30 38 00 FB 09 BE 00 8B 20 |.:K.1E.08...... | 000001D0: 48 28 4E AA 32 29 B2 30 20 A7 20 55 28 4E 29 B2 |H(N.2).0 . U(N).| 000001E0: 30 3A 56 28 4E 29 B2 30 3A 5A 28 4E 29 B2 4B 3A |0:V(N).0:Z(N).K:| 000001F0: 4E B2 4E AB 31 3A 89 20 31 39 30 00 0B 0A C8 00 |N.N.1:. 190.....| 00000200: 8B 20 4E B2 30 20 A7 20 36 39 30 00 41 0A D2 00 |. N.0 . 690.A...| 00000210: 50 31 B2 30 3A 51 31 B2 30 3A 50 32 B2 30 3A 51 |P1.0:Q1.0:P2.0:Q| 00000220: 32 B2 30 3A 53 B2 30 3A 52 31 B2 31 3A 4B B2 31 |2.0:S.0:R1.1:K.1| 00000230: 45 AA 30 38 3A 8B 20 4E B3 B1 31 20 A7 20 32 33 |E.08:. N..1 . 23| 00000240: 30 00 58 0A DC 00 52 B2 AB 48 28 33 29 AD 48 28 |0.X...R..H(3).H(| 00000250: 32 29 3A 89 20 35 30 30 00 85 0A E6 00 81 20 4A |2):. 500...... J| 00000260: B2 30 20 A4 20 4E 3A 8B 20 48 28 4A AA 32 29 B3 |.0 . N:. H(J.2).| 00000270: B1 30 20 A7 3A 53 B2 53 AA BC 28 B6 28 48 28 4A |.0 .:S.S..(.(H(J| 00000280: AA 32 29 29 29 00 B4 0A F0 00 82 3A 53 B2 BD 28 |.2)))......:S..(| 00000290: 53 AD 28 4E AA 31 29 29 3A 81 20 4A B2 30 20 A4 |S.(N.1)):. J.0 .| 000002A0: 20 4E 3A 48 28 4A AA 32 29 B2 48 28 4A AA 32 29 | N:H(J.2).H(J.2)| 000002B0: AD 53 3A 82 00 CA 0A FA 00 54 B2 AB 54 3A 4D B2 |.S:......T..T:M.| 000002C0: B5 28 28 4E AB 31 29 AD 32 29 00 FE 0A 04 01 81 |.((N.1).2)......| 000002D0: 20 4A B2 30 20 A4 20 4D 3A 53 B2 48 28 4A AA 32 | J.0 . M:S.H(J.2| 000002E0: 29 3A 48 28 4A AA 32 29 B2 48 28 4E AB 4A AA 32 |):H(J.2).H(N.J.2| 000002F0: 29 3A 48 28 4E AB 4A AA 32 29 B2 53 3A 82 00 1C |):H(N.J.2).S:...| 00000300: 0B 0E 01 8B 20 51 31 B3 B1 30 20 A7 3A 50 B2 50 |.... Q1..0 .:P.P| 00000310: 31 3A 51 B2 51 31 3A 89 20 33 32 30 00 3A 0B 18 |1:Q.Q1:. 320.:..| 00000320: 01 8B 20 48 28 4E 29 B2 30 20 A7 3A 51 B2 31 3A |.. H(N).0 .:Q.1:| 00000330: 50 B2 AB 32 3A 89 20 33 30 30 00 65 0B 22 01 51 |P..2:. 300.e.".Q| 00000340: B2 48 28 4E AA 32 29 AD 48 28 4E 29 3A 50 B2 28 |.H(N.2).H(N):P.(| 00000350: 48 28 4E AA 31 29 AB 51 AC 48 28 4E AB 31 29 29 |H(N.1).Q.H(N.1))| 00000360: AD 48 28 4E 29 00 75 0B 2C 01 8B 20 4E B2 32 20 |.H(N).u.,.. N.2 | 00000370: A7 20 35 37 30 00 7D 0B 36 01 52 B2 30 00 B5 0B |. 570.}.6.R.0...| 00000380: 40 01 81 20 49 B2 31 20 A4 20 31 30 30 3A 81 20 |@.. I.1 . 100:. | 00000390: 4A B2 30 20 A4 20 4E 3A 42 28 4A AA 32 29 B2 48 |J.0 . N:B(J.2).H| 000003A0: 28 4A AA 32 29 AB 50 AC 42 28 4A AA 31 29 AB 51 |(J.2).P.B(J.1).Q| 000003B0: AC 42 28 4A 29 00 F6 0B 4A 01 43 28 4A AA 32 29 |.B(J)...J.C(J.2)| 000003C0: B2 42 28 4A AA 32 29 AB 50 AC 43 28 4A AA 31 29 |.B(J.2).P.C(J.1)| 000003D0: AB 51 AC 43 28 4A 29 3A 82 20 4A 33 34 30 20 8B |.Q.C(J):. J340 .| 000003E0: 20 48 28 4E AA 31 29 AC 42 28 4E AA 31 29 B2 30 | H(N.1).B(N.1).0| 000003F0: 20 A7 20 33 37 30 00 15 0C 5E 01 8B 20 B6 28 48 | . 370...^.. .(H| 00000400: 28 4E AA 31 29 AD 42 28 4E AA 31 29 29 B3 4B 20 |(N.1).B(N.1)).K | 00000410: A7 20 33 39 30 00 2E 0C 68 01 42 28 4E AA 32 29 |. 390...h.B(N.2)| 00000420: B2 48 28 4E AA 32 29 AB 51 AC 42 28 4E 29 00 43 |.H(N.2).Q.B(N).C| 00000430: 0C 72 01 8B 20 42 28 4E AA 32 29 B2 30 20 A7 20 |.r.. B(N.2).0 . | 00000440: 35 37 30 00 62 0C 7C 01 8B 20 4B B3 B6 28 48 28 |570.b.|.. K..(H(| 00000450: 4E AA 32 29 AD 42 28 4E AA 32 29 29 20 A7 20 35 |N.2).B(N.2)) . 5| 00000460: 37 30 00 9E 0C 86 01 81 20 4A B2 30 20 A4 20 4E |70...... J.0 . N| 00000470: 3A 44 28 4A AA 32 29 B2 48 28 4A AA 32 29 AA 52 |:D(J.2).H(J.2).R| 00000480: AC 44 28 4A AA 31 29 3A 45 28 4A AA 32 29 B2 44 |.D(J.1):E(J.2).D| 00000490: 28 4A AA 32 29 AA 52 AC 45 28 4A AA 31 29 00 B4 |(J.2).R.E(J.1)..| 000004A0: 0C 90 01 82 3A 8B 20 44 28 4E AA 32 29 B2 30 20 |....:. D(N.2).0 | 000004B0: A7 35 30 30 00 D3 0C 9A 01 8B 20 4B B3 B6 28 48 |.500...... K..(H| 000004C0: 28 4E AA 32 29 AD 44 28 4E AA 32 29 29 20 A7 20 |(N.2).D(N.2)) . | 000004D0: 35 30 30 00 09 0D A4 01 43 28 4E AA 31 29 B2 AB |500.....C(N.1)..| 000004E0: 50 AC 43 28 4E 29 AB 51 AC 43 28 4E AB 31 29 3A |P.C(N).Q.C(N.1):| 000004F0: 53 B2 43 28 4E 29 AC 43 28 4E 29 AB 43 28 4E AA |S.C(N).C(N).C(N.| 00000500: 31 29 AC 43 28 4E AB 31 29 00 50 0D AE 01 8B 20 |1).C(N.1).P.... | 00000510: 53 B2 30 20 A7 3A 50 B2 50 AB 32 3A 51 B2 51 AC |S.0 .:P.P.2:Q.Q.| 00000520: 28 51 AA 31 29 3A 89 20 34 36 30 34 34 30 20 50 |(Q.1):. 460440 P| 00000530: B2 50 AA 28 42 28 4E AA 31 29 AC 43 28 4E 29 AB |.P.(B(N.1).C(N).| 00000540: 42 28 4E AA 32 29 AC 43 28 4E AB 31 29 29 AD 53 |B(N.2).C(N.1)).S| 00000550: 00 77 0D C2 01 51 B2 51 AA 28 AB 42 28 4E AA 31 |.w...Q.Q.(.B(N.1| 00000560: 29 AC 43 28 4E AA 31 29 AA 42 28 4E AA 32 29 AC |).C(N.1).B(N.2).| 00000570: 43 28 4E 29 29 AD 53 00 94 0D CC 01 8B 20 45 28 |C(N)).S...... E(| 00000580: 4E AA 31 29 B2 30 20 A7 3A 52 B2 52 AB 31 3A 89 |N.1).0 .:R.R.1:.| 00000590: 20 34 38 30 00 AA 0D D6 01 52 B2 52 AB 44 28 4E | 480.....R.R.D(N| 000005A0: AA 32 29 AD 45 28 4E AA 31 29 00 D8 0D E0 01 82 |.2).E(N.1)......| 000005B0: 20 49 3A 50 31 B2 50 32 3A 51 31 B2 51 32 3A 50 | I:P1.P2:Q1.Q2:P| 000005C0: 32 B2 50 3A 51 32 B2 51 3A 8B 20 52 31 B3 30 20 |2.P:Q2.Q:. R1.0 | 000005D0: A7 20 4B B2 4B AD 31 30 00 E9 0D EA 01 52 31 B2 |. K.K.10.....R1.| 000005E0: AB 52 31 3A 89 20 32 35 30 00 FB 0D F4 01 8B 20 |.R1:. 250...... | 000005F0: 54 B3 30 20 A7 20 52 B2 31 AD 52 00 24 0E FE 01 |T.0 . R.1.R.$...| 00000600: 55 28 4E 29 B2 52 3A 56 28 4E 29 B2 30 3A 5A 28 |U(N).R:V(N).0:Z(| 00000610: 4E 29 B2 4B 3A 4E B2 4E AB 31 3A 81 20 4A B2 30 |N).K:N.N.1:. J.0| 00000620: 20 A4 20 4E 00 43 0E 08 02 8B 20 44 28 4A AA 32 | . N.C.... D(J.2| 00000630: 29 B2 30 20 A7 20 44 28 4A AA 32 29 B2 2E 30 30 |).0 . D(J.2)..00| 00000640: 30 30 31 00 6E 0E 12 02 8B 20 B6 28 48 28 4A AA |001.n.... .(H(J.| 00000650: 32 29 AD 44 28 4A AA 32 29 29 B1 B2 4B 20 A7 20 |2).D(J.2))..K . | 00000660: 48 28 4A AA 32 29 B2 30 3A 89 20 35 35 30 00 80 |H(J.2).0:. 550..| 00000670: 0E 1C 02 48 28 4A AA 32 29 B2 44 28 4A AA 32 29 |...H(J.2).D(J.2)| 00000680: 00 92 0E 26 02 82 3A 8B 20 4E B2 30 20 A7 20 36 |...&..:. N.0 . 6| 00000690: 39 30 00 9C 0E 30 02 89 20 33 32 30 00 B4 0E 3A |90...0.. 320...:| 000006A0: 02 8B 20 54 B3 30 20 A7 20 50 B2 50 AD 51 3A 51 |.. T.0 . P.P.Q:Q| 000006B0: B2 31 AD 51 00 CB 0E 44 02 8B 20 51 AB 50 AC 50 |.1.Q...D.. Q.P.P| 000006C0: AD 34 B3 B2 30 20 A7 20 36 31 30 00 E5 0E 4E 02 |.4..0 . 610...N.| 000006D0: 55 28 4E 29 B2 AB 50 AD 32 3A 55 28 4E AB 31 29 |U(N)..P.2:U(N.1)| 000006E0: B2 AB 50 AD 32 00 0D 0F 58 02 53 B2 BA 28 51 AB |..P.2...X.S..(Q.| 000006F0: 50 AC 50 AD 34 29 3A 56 28 4E 29 B2 53 3A 56 28 |P.P.4):V(N).S:V(| 00000700: 4E AB 31 29 B2 AB 53 3A 89 20 36 34 30 00 38 0F |N.1)..S:. 640.8.| 00000710: 62 02 53 B2 BA 28 50 AC 50 AD 34 AB 51 29 3A 8B |b.S..(P.P.4.Q):.| 00000720: 20 50 B3 30 20 A7 20 55 28 4E 29 B2 AB 50 AD 32 | P.0 . U(N)..P.2| 00000730: AA 53 3A 89 20 36 33 30 00 48 0F 6C 02 55 28 4E |.S:. 630.H.l.U(N| 00000740: 29 B2 AB 50 AD 32 AB 53 00 6A 0F 76 02 55 28 4E |)..P.2.S.j.v.U(N| 00000750: AB 31 29 B2 51 AD 55 28 4E 29 3A 56 28 4E 29 B2 |.1).Q.U(N):V(N).| 00000760: 30 3A 56 28 4E AB 31 29 B2 30 00 84 0F 80 02 5A |0:V(N.1).0.....Z| 00000770: 28 4E 29 B2 4B 3A 5A 28 4E AB 31 29 B2 4B 3A 4E |(N).K:Z(N.1).K:N| 00000780: B2 4E AB 32 00 AD 0F 8A 02 81 20 4A B2 30 20 A4 |.N.2...... J.0 .| 00000790: 20 4E 3A 8B 20 42 28 4A AA 32 29 B2 30 20 A7 20 | N:. B(J.2).0 . | 000007A0: 42 28 4A AA 32 29 B2 2E 30 30 30 30 31 00 D8 0F |B(J.2)..00001...| 000007B0: 94 02 8B 20 B6 28 48 28 4A AA 32 29 AD 42 28 4A |... .(H(J.2).B(J| 000007C0: AA 32 29 29 B1 B2 4B 20 A7 20 48 28 4A AA 32 29 |.2))..K . H(J.2)| 000007D0: B2 30 3A 89 20 36 38 30 00 F6 0F 98 02 42 4C 4F |.0:. 680.....BLO| 000007E0: 43 4B 53 20 46 52 45 45 2E 20 20 20 20 20 20 20 |CKS FREE. | 000007F0: 20 20 20 20 20 20 00 08 10 9E 02 48 28 4A AA 32 | .....H(J.2| 00000800: 29 B2 42 28 4A AA 31 29 00 14 10 A8 02 82 3A 89 |).B(J.1)......:.| 00000810: 20 32 30 30 00 30 10 B2 02 99 22 52 4F 54 54 45 | 200.0...."ROTTE| 00000820: 52 3A 22 3A 99 3A 81 20 4A B2 31 20 A4 20 4E 31 |R:":.:. J.1 . N1| 00000830: 00 4B 10 BC 02 99 20 55 28 4A 29 3B 22 2B 22 3B |.K.... U(J);"+";| 00000840: 56 28 4A 29 3B 22 2A 4A 22 3A 82 00 00 00 |V(J);"*J":.... |
......."PRG DISK THOMAS " A5 2A.X.D.. **
****************************************
********...N.. * ROOT SC
HMIDTBAUER 1988 *.J.X.. * PROGRA
MMET BERAKNAR OCH LISTAR TILL EN
*...... * N:TEGRADSEKVATION
*.<.... **************
************************************.Q..
... I,J,M,N,T:CLS.Z. .."GRADTAL? ",N:.:N
1.N:. J.N . 0 . .1......"KOEFF, FOR X'";
J;:. A(N.J):.:T.1.I....:.:. J.0 . N:H(J.
2).A(J):.:K.1E.08...... H(N.2).0 . U(N).
0:V(N).0:Z(N).K:N.N.1:. 190...H.. N.0 .
690.A.R.P1.0:Q1.0:P2.0:Q2.0:S.0:R1.1:K.1
E.08:. N..1 . 230.X...R..H(3).H(2):. 500
...... J.0 . N:. H(J.2)..0 .:S.S..(.(H(J
.2)))......:S..(S.(N.1)):. J.0 . N:H(J.2
).H(J.2).S:..J...T..T:M..((N.1).2)......
J.0 . M:S.H(J.2):H(J.2).H(N.J.2):H(N.J.
2).S:....... Q1..0 .:P.P1:Q.Q1:. 320.:..
.. H(N).0 .:Q.1:P..2:. 300.E.".Q.H(N.2).
H(N):P.(H(N.1).Q.H(N.1)).H(N).U.,.. N.2
. 570.}.6.R.0...@.. I.1 . 100:. J.0 . N:
B(J.2).H(J.2).P.B(J.1).Q.B(J)...J.C(J.2)
.B(J.2).P.C(J.1).Q.C(J):. J340 . H(N.1).
B(N.1).0 . 370...^.. .(H(N.1).B(N.1)).K
. 390...H.B(N.2).H(N.2).Q.B(N).C.R.. B(N
.2).0 . 570.B.|.. K..(H(N.2).B(N.2)) . 5
70...... J.0 . N:D(J.2).H(J.2).R.D(J.1):
E(J.2).D(J.2).R.E(J.1)......:. D(N.2).0
.500.S.... K..(H(N.2).D(N.2)) . 500.....
C(N.1)..P.C(N).Q.C(N.1):S.C(N).C(N).C(N.
1).C(N.1).P.... S.0 .:P.P.2:Q.Q.(Q.1):.
460440 P.P.(B(N.1).C(N).B(N.2).C(N.1)).S
.W.B.Q.Q.(.B(N.1).C(N.1).B(N.2).C(N)).S.
..L.. E(N.1).0 .:R.R.1:. 480...V.R.R.D(N
.2).E(N.1).X.... I:P1.P2:Q1.Q2:P2.P:Q2.Q
:. R1.0 . K.K.10.....R1..R1:. 250......
T.0 . R.1.R.$...U(N).R:V(N).0:Z(N).K:N.N
.1:. J.0 . N.C.... D(J.2).0 . D(J.2)..00
001.N.... .(H(J.2).D(J.2))..K . H(J.2).0
:. 550.....H(J.2).D(J.2)...&..:. N.0 . 6
90...0.. 320...:.. T.0 . P.P.Q:Q.1.Q.K.D
.. Q.P.P.4..0 . 610...N.U(N)..P.2:U(N.1)
..P.2...X.S..(Q.P.P.4):V(N).S:V(N.1)..S:
. 640.8.B.S..(P.P.4.Q):. P.0 . U(N)..P.2
.S:. 630.H.L.U(N)..P.2.S.J.V.U(N.1).Q.U(
N):V(N).0:V(N.1).0.....Z(N).K:Z(N.1).K:N
.N.2...... J.0 . N:. B(J.2).0 . B(J.2)..
00001.X.... .(H(J.2).B(J.2))..K . H(J.2)
.0:. 680.....BLOCKS FREE. ..
...H(J.2).B(J.1)......:. 200.0...."ROTTE
R:":.:. J.1 . N1.K.... U(J);"+";V(J);"*J
":....
> CLICK IMAGE PREVIEW FOR FULL MODAL