L4.TEDMON
FILE INFORMATION
FILENAME(S): L4.TEDMON
FILE TYPE(S): PRG
FILE SIZE: 1.2K
FIRST SEEN: 2025-11-30 01:12:39
APPEARS ON: 1 disk(s)
FILE HASH
817d3a75bd16383c146951a64b302a9b02daaf84068e4d6d4b0d6ddbbb095479
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SONDERHEFT 10 86 | L4.TEDMON | PRG | C64er, DuncanTwain | 16 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 25 1C 64 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..%.d.. ********| 00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000020: 2A 2A 2A 2A 2A 00 49 1C 6E 00 8F 20 2A 20 20 20 |*****.I.n.. * | 00000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000040: 20 20 20 20 20 20 20 20 2A 00 6D 1C 78 00 8F 20 | *.m.x.. | 00000050: 2A 20 53 49 4D 55 4C 41 54 49 4F 4E 20 44 45 53 |* SIMULATION DES| 00000060: 20 4D 4F 4E 49 54 4F 52 42 45 2D 20 2A 00 91 1C | MONITORBE- *...| 00000070: 82 00 8F 20 2A 20 20 20 20 20 20 20 20 20 20 20 |... * | 00000080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000090: 2A 00 B5 1C 8C 00 8F 20 2A 20 20 46 45 48 4C 53 |*...... * FEHLS| 000000A0: 20 27 43 27 20 4D 49 54 54 45 4C 53 20 42 41 53 | 'C' MITTELS BAS| 000000B0: 49 43 20 20 2A 00 D9 1C 96 00 8F 20 2A 20 20 20 |IC *...... * | 000000C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000000D0: 20 20 20 20 20 20 20 20 2A 00 FD 1C A0 00 8F 20 | *...... | 000000E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000000F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 21 1D |*************.!.| 00000100: AA 00 8F 20 2A 20 20 20 20 20 20 20 20 20 20 20 |... * | 00000110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000120: 2A 00 45 1D B4 00 8F 20 2A 20 20 31 39 38 36 20 |*.E.... * 1986 | 00000130: 42 59 20 46 4C 4F 52 49 41 4E 20 4D 55 45 4C 4C |BY FLORIAN MUELL| 00000140: 45 52 20 20 2A 00 69 1D BE 00 8F 20 2A 20 20 20 |ER *.i.... * | 00000150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000160: 20 20 20 20 20 20 20 20 2A 00 8D 1D C8 00 8F 20 | *...... | 00000170: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000180: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 93 1D |*************...| 00000190: D2 00 3A 00 C7 1D DC 00 99 C7 28 31 33 29 C7 28 |..:.......(13).(| 000001A0: 31 33 29 22 56 45 52 47 4C 45 49 43 48 45 4E 20 |13)"VERGLEICHEN | 000001B0: 4D 49 54 54 45 4C 53 20 42 41 53 49 43 22 C7 28 |MITTELS BASIC".(| 000001C0: 37 29 C7 28 31 33 29 00 EF 1D E6 00 85 20 22 53 |7).(13)...... "S| 000001D0: 50 45 49 43 48 45 52 42 41 4E 4B 20 44 45 53 20 |PEICHERBANK DES | 000001E0: 31 2E 20 42 45 52 45 49 43 48 53 22 3B 42 31 00 |1. BEREICHS";B1.| 000001F0: 22 1E F0 00 85 20 22 41 4E 46 41 4E 47 53 41 44 |".... "ANFANGSAD| 00000200: 52 45 53 53 45 20 44 2E 31 2E 20 42 45 52 45 49 |RESSE D.1. BEREI| 00000210: 43 48 53 22 3B 41 31 24 3A 41 31 B2 D1 28 41 31 |CHS";A1$:A1..(A1| 00000220: 24 29 00 55 1E FA 00 85 20 22 45 4E 44 41 44 52 |$).U.... "ENDADR| 00000230: 45 53 53 45 20 20 20 44 45 53 20 31 2E 20 42 45 |ESSE DES 1. BE| 00000240: 52 45 49 43 48 53 22 3B 45 31 24 3A 45 31 B2 D1 |REICHS";E1$:E1..| 00000250: 28 45 31 24 29 00 7D 1E 04 01 85 20 22 53 50 45 |(E1$).}.... "SPE| 00000260: 49 43 48 45 52 42 41 4E 4B 20 44 45 53 20 32 2E |ICHERBANK DES 2.| 00000270: 20 42 45 52 45 49 43 48 53 22 3B 42 32 00 B0 1E | BEREICHS";B2...| 00000280: 0E 01 85 20 22 41 4E 46 41 4E 47 53 41 44 52 45 |... "ANFANGSADRE| 00000290: 53 53 45 20 44 2E 32 2E 20 42 45 52 45 49 43 48 |SSE D.2. BEREICH| 000002A0: 53 22 3B 41 32 24 3A 41 32 B2 D1 28 41 32 24 29 |S";A2$:A2..(A2$)| 000002B0: 00 E4 1E 18 01 45 32 B2 41 32 AA 28 45 31 AB 41 |.....E2.A2.(E1.A| 000002C0: 31 29 3A 8F 20 45 4E 44 45 20 44 45 53 20 5A 49 |1):. ENDE DES ZI| 000002D0: 45 4C 42 45 52 45 49 43 48 53 20 42 45 52 45 43 |ELBEREICHS BEREC| 000002E0: 48 4E 45 4E 00 13 1F 22 01 99 22 3D 3E 20 45 4E |HNEN...".."=> EN| 000002F0: 44 41 44 52 45 53 53 45 20 44 45 53 20 32 2E 20 |DADRESSE DES 2. | 00000300: 42 45 52 45 49 43 48 53 20 3D 20 24 22 3B D2 28 |BEREICHS = $";.(| 00000310: 45 32 29 00 43 1F 27 01 99 3A 99 22 4E 49 43 48 |E2).C.'..:."NICH| 00000320: 54 20 55 45 42 45 52 45 49 4E 53 54 49 4D 4D 45 |T UEBEREINSTIMME| 00000330: 4E 44 45 20 41 44 52 45 53 53 45 4E 3A 22 C7 28 |NDE ADRESSEN:".(| 00000340: 31 33 29 00 49 1F 2C 01 3A 00 97 1F 36 01 54 31 |13).I.,.:...6.T1| 00000350: B2 41 31 3A 54 32 B2 41 32 3A 8F 20 5A 55 20 54 |.A1:T2.A2:. ZU T| 00000360: 45 53 54 45 4E 44 45 20 41 44 52 45 53 53 45 4E |ESTENDE ADRESSEN| 00000370: 20 42 45 53 54 49 4D 4D 45 4E 20 28 4D 49 54 20 | BESTIMMEN (MIT | 00000380: 41 4E 46 41 4E 47 53 57 45 52 54 45 4E 20 42 45 |ANFANGSWERTEN BE| 00000390: 47 49 4E 4E 45 4E 29 00 9D 1F 40 01 3A 00 AB 1F |GINNEN)...@.:...| 000003A0: 4A 01 EB 20 FC 20 54 31 B1 45 31 00 DD 1F 54 01 |J.. . T1.E1...T.| 000003B0: 3A FE 02 20 42 31 3A 57 31 B2 C2 28 54 31 29 3A |:.. B1:W1..(T1):| 000003C0: 8F 20 57 45 52 54 20 41 55 53 20 42 45 52 45 49 |. WERT AUS BEREI| 000003D0: 43 48 20 31 20 41 55 53 4C 45 53 45 4E 00 0F 20 |CH 1 AUSLESEN.. | 000003E0: 5E 01 3A FE 02 20 42 32 3A 57 32 B2 C2 28 54 32 |^.:.. B2:W2..(T2| 000003F0: 29 3A 8F 20 57 45 52 54 20 41 55 53 20 42 45 52 |):. WERT AUS BER| 00000400: 45 49 43 48 20 32 20 41 55 53 4C 45 53 45 4E 00 |EICH 2 AUSLESEN.| 00000410: 63 20 68 01 3A 8B 20 57 31 B3 B1 57 32 20 A7 20 |c h.:. W1..W2 . | 00000420: 99 20 C9 28 D2 28 42 31 29 2C 31 29 3B D2 28 54 |. .(.(B1),1);.(T| 00000430: 31 29 2C 3A 8F 20 4B 45 49 4E 45 20 55 45 42 45 |1),:. KEINE UEBE| 00000440: 52 45 49 4E 53 54 49 4D 4D 55 4E 47 2C 20 44 41 |REINSTIMMUNG, DA| 00000450: 4E 4E 20 41 44 52 45 53 53 45 20 41 55 53 47 45 |NN ADRESSE AUSGE| 00000460: 42 45 4E 00 8C 20 72 01 3A 54 31 B2 54 31 AA 31 |BEN.. r.:T1.T1.1| 00000470: 3A 54 32 B2 54 32 AA 31 3A 8F 20 41 44 52 45 53 |:T2.T2.1:. ADRES| 00000480: 53 45 4E 20 45 52 48 4F 45 48 45 4E 00 92 20 7C |SEN ERHOEHEN.. || 00000490: 01 EC 00 98 20 86 01 3A 00 9E 20 90 01 8A 00 00 |.... ..:.. .....| 000004A0: 00 24 |.$ |
..%.D.. *****************************.I.
N.. * *.M.X..
* SIMULATION DES MONITORBE- *...... *
*...... * FEHLS
'C' MITTELS BASIC *.Y.... *
*... .. ****************
*************.!.... *
*.E.... * 1986 BY FLORIAN MUELL
ER *.I.... *
*...H.. *****************************...
R.:.G....G(13)G(13)"VERGLEICHEN MITTELS
BASIC"G(7)G(13)...... "SPEICHERBANK DES
1. BEREICHS";B1.".... "ANFANGSADRESSE D.
1. BEREICHS";A1$:A1.Q(A1$).U.... "ENDADR
ESSE DES 1. BEREICHS";E1$:E1.Q(E1$).}.
... "SPEICHERBANK DES 2. BEREICHS";B2...
... "ANFANGSADRESSE D.2. BEREICHS";A2$:A
2.Q(A2$).....E2.A2.(E1.A1):. ENDE DES ZI
ELBEREICHS BERECHNEN...".."=> ENDADRESSE
DES 2. BEREICHS = $";R(E2).C.'..:."NICH
T UEBEREINSTIMMENDE ADRESSEN:"G(13).I.,.
:...6.T1.A1:T2.A2:. ZU TESTENDE ADRESSEN
BESTIMMEN (MIT ANFANGSWERTEN BEGINNEN).
..@.:...J.. . T1.E1...T.:.. B1:W1.B(T1):
. WERT AUS BEREICH 1 AUSLESEN.. ^.:.. B2
:W2.B(T2):. WERT AUS BEREICH 2 AUSLESEN.
C H.:. W1..W2 . . I(R(B1),1);R(T1),:. KE
INE UEBEREINSTIMMUNG, DANN ADRESSE AUSGE
BEN.. R.:T1.T1.1:T2.T2.1:. ADRESSEN ERHO
EHEN.. |.... ..:.. ......$
> CLICK IMAGE PREVIEW FOR FULL MODAL