7.7
FILE INFORMATION
FILENAME(S): 7.7
FILE TYPE(S): PRG
FILE SIZE: 1.2K
FIRST SEEN: 2025-10-20 14:30:22
APPEARS ON: 1 disk(s)
FILE HASH
adb40131833e4173f9c896c3e82ebf97cd66e2284b2e2edb54b7f0205314b1f2
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MAGIC DISK 64 | 7.7 | PRG | Treasure Chest - Klaus Der Suhler, Treasure Chest - ToGuMi | 10 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 00 40 38 30 20 D0 D2 C9 CE D4 20 22 42 45 54 52 |.@80 ..... "BETR| 00000010: 41 45 47 54 22 3B 20 20 20 20 20 20 20 20 20 20 |AEGT"; | 00000020: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000030: 20 20 20 20 20 20 20 38 35 20 D0 D2 C9 CE D4 20 | 85 ..... | 00000040: 4F 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |O | 00000050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000060: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000070: 20 20 20 20 20 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: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000000A0: 20 D7 87 52 44 45 4E 20 20 D3 49 45 20 20 44 49 | ..RDEN .IE DI| 000000B0: 45 53 45 20 20 42 45 49 44 45 4E 20 20 DA 45 49 |ESE BEIDEN .EI| 000000C0: 4C 45 4E 20 20 49 4E 20 55 4E 53 45 52 20 D0 52 |LEN IN UNSER .R| 000000D0: 4F 47 52 41 4D 4D 45 49 4E 46 87 47 45 4E 2C 20 |OGRAMMEINF.GEN, | 000000E0: 53 4F 20 4B 85 4D 45 4E 20 D3 49 45 20 45 42 45 |SO K.MEN .IE EBE| 000000F0: 4E 46 41 4C 4C 53 20 5A 55 4D 20 53 45 4C 42 45 |NFALLS ZUM SELBE| 00000100: 4E 20 C5 52 47 45 42 4E 49 53 2E 20 20 20 20 20 |N .RGEBNIS. | 00000110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000140: CE 55 4E 20 57 45 49 54 45 52 20 49 4E 20 44 45 |.UN WEITER IN DE| 00000150: 4E 20 46 4F 4C 47 45 4E 44 45 4E 20 DA 45 49 4C |N FOLGENDEN .EIL| 00000160: 45 4E 2C 20 56 4F 4E 20 39 30 2D 31 31 30 2E 20 |EN, VON 90-110. | 00000170: 20 C8 49 45 52 47 49 42 54 20 45 53 20 4E 85 4D | .IERGIBT ES N.M| 00000180: 4C 49 43 48 20 57 49 45 44 45 52 20 45 54 57 41 |LICH WIEDER ETWA| 00000190: 53 20 20 4E 45 55 45 53 20 20 5A 55 20 20 4C 45 |S NEUES ZU LE| 000001A0: 52 4E 45 4E 3A 20 20 44 45 52 C9 C6 2D D4 C8 C5 |RNEN: DER..-...| 000001B0: CE 2D C2 45 46 45 48 4C 2E 20 20 C9 43 48 20 20 |.-.EFEHL. .CH | 000001C0: 4C 49 53 54 45 20 20 C9 48 4E 45 4E 20 20 44 49 |LISTE .HNEN DI| 000001D0: 45 53 45 20 DA 45 49 4C 45 4E 20 48 49 45 52 4E |ESE .EILEN HIERN| 000001E0: 4F 43 48 20 45 49 4E 4D 41 4C 20 41 55 46 2C 20 |OCH EINMAL AUF, | 000001F0: 44 41 4D 49 54 20 D3 49 45 20 53 49 43 48 20 44 |DAMIT .IE SICH D| 00000200: 41 53 20 45 49 4E 20 57 45 4E 49 47 20 47 45 4E |AS EIN WENIG GEN| 00000210: 41 55 45 52 41 4E 53 45 48 45 4E 20 4B 86 4E 4E |AUERANSEHEN K.NN| 00000220: 45 4E 3A 20 20 20 20 20 20 20 20 20 20 20 20 20 |EN: | 00000230: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000240: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000250: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000270: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 39 30 | 90| 00000280: 20 49 4E 50 55 54 22 5B 32 20 C4 CF D7 CE 5D CE | INPUT"[2 ....].| 00000290: 4F 43 48 20 45 49 4E 45 20 C2 45 52 45 43 48 4E |OCH EINE .ERECHN| 000002A0: 55 4E 47 20 28 CA 2F CE 29 22 3B 41 24 20 20 20 |UNG (./.)";A$ | 000002B0: 20 20 20 31 30 30 20 49 46 20 41 24 3D 22 4A 22 | 100 IF A$="J"| 000002C0: 54 48 45 4E 20 52 55 4E 20 20 20 20 20 20 20 20 |THEN RUN | 000002D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000002E0: 20 20 20 20 20 20 20 20 31 31 30 20 45 4E 44 20 | 110 END | 000002F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000300: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000310: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000320: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000330: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000340: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000350: 20 20 DA 55 4E 85 43 48 53 54 20 45 49 4E 4D 41 | .UN.CHST EINMA| 00000360: 4C 20 DA 45 49 4C 45 20 39 30 2E 20 C8 49 45 52 |L .EILE 90. .IER| 00000370: 20 20 46 52 41 47 45 4E 20 20 57 49 52 2C 20 20 | FRAGEN WIR, | 00000380: 4E 41 43 48 44 45 4D 57 49 52 20 20 44 49 45 20 |NACHDEMWIR DIE | 00000390: 20 C1 55 47 41 42 45 20 55 4D 20 32 20 DA 45 49 | .UGABE UM 2 .EI| 000003A0: 4C 45 4E 20 4E 41 43 48 20 55 4E 54 45 4E 20 47 |LEN NACH UNTEN G| 000003B0: 45 53 43 48 4F 42 45 4E 20 48 41 2D 42 45 4E 2C |ESCHOBEN HA-BEN,| 000003C0: 20 55 4D 20 44 45 4D 20 47 41 4E 5A 45 4E 20 45 | UM DEM GANZEN E| 000003D0: 49 4E 45 4E 20 42 45 53 53 45 52 45 4E 20 C5 49 |INEN BESSEREN .I| 000003E0: 4E 44 52 55 43 4B 20 5A 55 20 56 45 52 4C 45 49 |NDRUCK ZU VERLEI| 000003F0: 2D 48 45 4E 20 5A 55 4E 85 43 48 53 54 20 45 49 |-HEN ZUN.CHST EI| 00000400: 4E 4D 41 4C 2C 20 4F 42 20 44 45 52 20 C2 45 4E |NMAL, OB DER .EN| 00000410: 55 54 5A 45 52 20 4E 4F 43 48 20 45 49 4E 45 20 |UTZER NOCH EINE | 00000420: 57 45 49 54 45 2D 52 45 20 DA 59 4C 49 4E 44 45 |WEITE-RE .YLINDE| 00000430: 52 42 45 52 45 43 48 4E 55 4E 47 20 56 45 52 4C |RBERECHNUNG VERL| 00000440: 41 4E 47 54 2E 20 C4 41 53 20 48 45 49 88 54 2C |ANGT. .AS HEI.T,| 00000450: 20 4F 42 20 45 52 20 20 44 45 4E D2 45 43 48 45 | OB ER DEN.ECHE| 00000460: 4E 56 4F 52 47 41 4E 47 20 20 20 45 56 45 4E 54 |NVORGANG EVENT| 00000470: 55 45 4C 4C 20 20 20 57 49 45 44 45 52 48 4F 4C |UELL WIEDERHOL| 00000480: 45 4E 20 20 4D 86 43 48 54 45 20 20 4F 44 45 52 |EN M.CHTE ODER| 00000490: 4E 49 43 48 54 2E 20 20 20 20 20 20 20 20 20 20 |NICHT. | 000004A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000004B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000004C0: 20 20 20 20 20 | |
.@80 PRINT "BETRAEGT";
85 PRINT O
W.RDEN SIE DIESE BEIDEN ZEILEN IN
UNSER PROGRAMMEINF.GEN, SO K.MEN SIE EBE
NFALLS ZUM SELBEN ERGEBNIS.
NUN WEITER IN DEN FOLGENDEN ZEILEN, VON
90-110. HIERGIBT ES N.MLICH WIEDER ETWA
S NEUES ZU LERNEN: DERIF-THEN-BEFEHL
. ICH LISTE IHNEN DIESE ZEILEN HIERN
OCH EINMAL AUF, DAMIT SIE SICH DAS EIN W
ENIG GENAUERANSEHEN K.NNEN:
90
INPUT"[2 DOWN]NOCH EINE BERECHNUNG (J/N
)";A$ 100 IF A$="J"THEN RUN
110 END
ZUN.CHST EINMAL ZEILE 90. HIER
FRAGEN WIR, NACHDEMWIR DIE AUGABE
UM 2 ZEILEN NACH UNTEN GESCHOBEN HA-BEN,
UM DEM GANZEN EINEN BESSEREN EINDRUCK Z
U VERLEI-HEN ZUN.CHST EINMAL, OB DER BEN
UTZER NOCH EINE WEITE-RE ZYLINDERBERECHN
UNG VERLANGT. DAS HEI.T, OB ER DENRECHE
NVORGANG EVENTUELL WIEDERHOLEN M.CH
TE ODERNICHT.
> CLICK IMAGE PREVIEW FOR FULL MODAL