SPELL

FILE INFORMATION

FILENAME(S): SPELL

FILE TYPE(S): PRG

FILE SIZE: 1.1K

FIRST SEEN: 2025-10-20 14:37:12

APPEARS ON: 1 disk(s)

FILE HASH

130de28266f39362be654c55a2c39db341436f3345b025ccab89c6e74592d448

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
HAPPY 7 8 9 87	SPELL	PRG	Treasure Chest - LehrerMIL	10	2	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 28 08 0A 00 86 53  50 28 31 30 30 29 2C 57  |..(....SP(100),W|
00000010: 41 28 31 30 30 29 2C 57  45 28 31 30 30 29 2C 42  |A(100),WE(100),B|
00000020: 49 24 28 33 30 30 30 29  00 3E 08 0F 00 8F 20 4C  |I$(3000).>.... L|
00000030: 49 45 53 20 42 49 42 4C  49 4F 54 48 45 4B 00 5D  |IES BIBLIOTHEK.]|
00000040: 08 14 00 9F 31 2C 38 2C  30 2C 22 42 49 42 4C 53  |....1,8,0,"BIBLS|
00000050: 50 45 4C 4C 2E 44 41 54  2C 53 2C 52 22 00 67 08  |PELL.DAT,S,R".g.|
00000060: 1E 00 84 31 2C 57 5A 00  73 08 28 00 81 54 B2 31  |...1,WZ.s.(..T.1|
00000070: A4 57 5A 00 81 08 32 00  84 31 2C 42 49 24 28 54  |.WZ...2..1,BI$(T|
00000080: 29 00 87 08 3C 00 82 00  8E 08 46 00 A0 31 00 A2  |)...<.....F..1..|
00000090: 08 50 00 8F 20 49 4E 50  55 54 2D 52 4F 55 54 49  |.P.. INPUT-ROUTI|
000000A0: 4E 45 00 C1 08 5A 00 99  22 54 45 58 54 45 49 4E  |NE...Z.."TEXTEIN|
000000B0: 47 41 42 45 3A 12 20 92  22 3B 3A 45 49 24 B2 22  |GABE:. .";:EI$."|
000000C0: 22 00 D4 08 64 00 A1 41  24 3A 8B 41 24 B2 22 22  |"...d..A$:.A$.""|
000000D0: A7 31 30 30 00 05 09 6E  00 8B C3 28 45 49 24 29  |.100...n...(EI$)|
000000E0: B3 B1 30 AF 41 24 B2 C7  28 32 30 29 A7 45 49 24  |..0.A$..(20).EI$|
000000F0: B2 C8 28 45 49 24 2C C3  28 45 49 24 29 AB 31 29  |..(EI$,.(EI$).1)|
00000100: 3A 89 31 34 30 00 17 09  73 00 8B 41 24 B2 C7 28  |:.140...s..A$..(|
00000110: 31 33 29 A7 31 35 30 00  2E 09 78 00 8B 41 24 B3  |13).150...x..A$.|
00000120: 22 20 22 B0 41 24 B1 22  5A 22 A7 31 30 30 00 3D  |" ".A$."Z".100.=|
00000130: 09 82 00 45 49 24 B2 45  49 24 AA 41 24 00 56 09  |...EI$.EI$.A$.V.|
00000140: 8C 00 99 C7 28 32 30 29  41 24 3B 22 12 20 92 22  |....(20)A$;". ."|
00000150: 3B 3A 89 31 30 30 00 61  09 96 00 99 C7 28 32 30  |;:.100.a.....(20|
00000160: 29 00 6E 09 B4 00 8F 20  50 41 52 53 45 52 00 7E  |).n.... PARSER.~|
00000170: 09 BE 00 81 54 B2 31 A4  C3 28 45 49 24 29 00 90  |....T.1..(EI$)..|
00000180: 09 C8 00 49 24 B2 CA 28  45 49 24 2C 54 2C 31 29  |...I$..(EI$,T,1)|
00000190: 00 CA 09 D2 00 8B 49 24  B2 22 2C 22 B0 49 24 B2  |......I$.",".I$.|
000001A0: 22 21 22 B0 49 24 B2 22  27 22 B0 49 24 B2 22 2E  |"!".I$."'".I$.".|
000001B0: 22 B0 49 24 B2 22 3A 22  B0 49 24 B2 22 3F 22 B0  |".I$.":".I$."?".|
000001C0: 49 24 B2 22 3B 22 A7 32  33 30 00 D3 09 DC 00 89  |I$.";".230......|
000001D0: 32 34 30 00 FA 09 E6 00  45 49 24 B2 C8 28 45 49  |240.....EI$..(EI|
000001E0: 24 2C 54 AB 31 29 AA 22  20 22 AA C9 28 45 49 24  |$,T.1)." "..(EI$|
000001F0: 2C C3 28 45 49 24 29 AB  54 29 00 00 0A F0 00 82  |,.(EI$).T)......|
00000200: 00 10 0A FA 00 45 49 24  B2 45 49 24 AA 22 20 22  |.....EI$.EI$." "|
00000210: 00 1D 0A 04 01 57 41 B2  30 3A 5A B2 31 00 2D 0A  |.....WA.0:Z.1.-.|
00000220: 0E 01 81 54 B2 31 A4 C3  28 45 49 24 29 00 69 0A  |...T.1..(EI$).i.|
00000230: 18 01 8B CA 28 45 49 24  2C 54 2C 31 29 B2 22 20  |....(EI$,T,1)." |
00000240: 22 A7 53 50 28 5A 29 B2  54 3A 57 45 28 5A 29 B2  |".SP(Z).T:WE(Z).|
00000250: 54 AB 31 3A 57 41 28 5A  29 B2 57 41 AA 31 3A 57  |T.1:WA(Z).WA.1:W|
00000260: 41 B2 54 3A 5A B2 5A AA  31 00 6F 0A 22 01 82 00  |A.T:Z.Z.1.o."...|
00000270: 97 0A 2C 01 8F 20 55 4E  54 45 52 53 55 43 48 45  |..,.. UNTERSUCHE|
00000280: 20 45 49 4E 47 41 42 45  20 41 55 46 20 42 49 42  | EINGABE AUF BIB|
00000290: 4C 49 4F 54 48 45 4B 00  A9 0A 40 01 99 22 93 22  |LIOTHEK...@.."."|
000002A0: 3A 81 54 B2 31 A4 5A AB  31 00 B2 0A 4A 01 47 45  |:.T.1.Z.1...J.GE|
000002B0: B2 30 00 BF 0A 54 01 81  54 32 B2 30 A4 57 5A 00  |.0...T..T2.0.WZ.|
000002C0: E2 0A 5E 01 50 41 24 B2  CA 28 45 49 24 2C 57 41  |..^.PA$..(EI$,WA|
000002D0: 28 54 29 2C 57 45 28 54  29 AB 57 41 28 54 29 AA  |(T),WE(T).WA(T).|
000002E0: 31 29 00 01 0B 68 01 47  45 B2 50 41 24 B2 42 49  |1)...h.GE.PA$.BI|
000002F0: 24 28 54 32 29 3A 8B 28  47 45 29 A7 54 32 B2 57  |$(T2):.(GE).T2.W|
00000300: 5A 00 07 0B 72 01 82 00  10 0B 7C 01 99 50 41 24  |Z...r.....|..PA$|
00000310: 00 1E 0B 86 01 8B 28 47  45 29 A7 34 36 30 00 62  |......(GE).460.b|
00000320: 0B 90 01 85 22 49 53 54  20 44 41 53 20 4C 45 54  |...."IST DAS LET|
00000330: 5A 54 45 20 57 4F 52 54  20 52 49 43 48 54 49 47  |ZTE WORT RICHTIG|
00000340: 20 28 4A 2F 4E 29 22 3B  41 31 24 3A 8B 41 31 24  | (J/N)";A1$:.A1$|
00000350: B3 B1 22 4A 22 AF 41 31  24 B3 B1 22 4E 22 A7 34  |.."J".A1$.."N".4|
00000360: 30 30 00 73 0B 95 01 8B  41 31 24 B2 22 4E 22 A7  |00.s....A1$."N".|
00000370: 34 33 30 00 B3 0B 9A 01  85 22 49 4E 20 42 49 42  |430......"IN BIB|
00000380: 4C 49 4F 54 48 45 4B 20  41 55 46 4E 45 48 4D 45  |LIOTHEK AUFNEHME|
00000390: 4E 20 28 4A 2F 4E 29 22  3B 41 32 24 3A 8B 41 32  |N (J/N)";A2$:.A2|
000003A0: 24 B3 B1 22 4A 22 AF 41  32 24 B3 B1 22 4E 22 A7  |$.."J".A2$.."N".|
000003B0: 34 31 30 00 CC 0B A4 01  8B 41 31 24 B2 22 4E 22  |410......A1$."N"|
000003C0: AF 41 32 24 B2 22 4A 22  A7 34 33 30 00 DD 0B A9  |.A2$."J".430....|
000003D0: 01 8B 41 32 24 B2 22 4A  22 A7 34 35 30 00 08 0C  |..A2$."J".450...|
000003E0: AE 01 85 22 47 45 42 45  4E 20 53 49 45 20 45 53  |..."GEBEN SIE ES|
000003F0: 20 42 49 54 54 45 20 52  49 43 48 54 49 47 20 45  | BITTE RICHTIG E|
00000400: 49 4E 3A 22 3B 50 41 24  00 20 0C C2 01 42 49 24  |IN:";PA$. ...BI$|
00000410: 28 57 5A 29 B2 50 41 24  3A 57 5A B2 57 5A AA 31  |(WZ).PA$:WZ.WZ.1|
00000420: 00 26 0C CC 01 82 00 44  0C D1 01 8F 20 4C 45 47  |.&.....D.... LEG|
00000430: 45 20 4E 45 55 45 20 42  49 42 4C 49 4F 54 48 45  |E NEUE BIBLIOTHE|
00000440: 4B 20 41 4E 00 65 0C D6  01 9F 31 2C 38 2C 31 2C  |K AN.e....1,8,1,|
00000450: 22 40 3A 42 49 42 4C 53  50 45 4C 4C 2E 44 41 54  |"@:BIBLSPELL.DAT|
00000460: 2C 53 2C 57 22 00 71 0C  DB 01 98 31 2C 57 5A AB  |,S,W".q....1,WZ.|
00000470: 31 00 8E 0C E0 01 81 54  B2 31 A4 57 5A AB 31 3A  |1......T.1.WZ.1:|
00000480: 98 31 2C 42 49 24 28 54  29 3A 82 3A A0 31 00 00  |.1,BI$(T):.:.1..|
00000490: 00                                                |.               |

..(....SP(100),WA(100),WE(100),BI$(3000)
.>.... LIES BIBLIOTHEK.]....1,8,0,"BIBLS
PELL.DAT,S,R".G....1,WZ.S.(..T.1.WZ...2.
.1,BI$(T)...<.....F. 1...P.. INPUT-ROUTI
NE.A.Z.."TEXTEINGABE:. .";:EI$."".T.D..A
$:.A$."".100...N..C(EI$)..0.A$.G(20).EI$
.H(EI$,C(EI$).1):.140...S..A$.G(13).150.
..X..A$." ".A$."Z".100.=...EI$.EI$.A$.V.
...G(20)A$;". .";:.100.A....G(20).N.... 
PARSER.~....T.1.C(EI$)...H.I$.J(EI$,T,1)
.J.R..I$.",".I$."!".I$."'".I$.".".I$.":"
.I$."?".I$.";".230.S....240.....EI$.H(EI
$,T.1)." ".I(EI$,C(EI$).T)...........EI$
.EI$." ".....WA.0:Z.1.-....T.1.C(EI$).I.
...J(EI$,T,1)." ".SP(Z).T:WE(Z).T.1:WA(Z
).WA.1:WA.T:Z.Z.1.O.".....,.. UNTERSUCHE
 EINGABE AUF BIBLIOTHEK...@..".":.T.1.Z.
1...J.GE.0...T..T2.0.WZ...^.PA$.J(EI$,WA
(T),WE(T).WA(T).1)...H.GE.PA$.BI$(T2):.(
GE).T2.WZ...R.....|..PA$......(GE).460.B
...."IST DAS LETZTE WORT RICHTIG (J/N)";
A1$:.A1$.."J".A1$.."N".400.S....A1$."N".
430......"IN BIBLIOTHEK AUFNEHMEN (J/N)"
;A2$:.A2$.."J".A2$.."N".410.L....A1$."N"
.A2$."J".430......A2$."J".450......"GEBE
N SIE ES BITTE RICHTIG EIN:";PA$. .B.BI$
(WZ).PA$:WZ.WZ.1.&.L...D.Q.. LEGE NEUE B
IBLIOTHEK AN.E.V..1,8,1,"@:BIBLSPELL.DAT
,S,W".Q....1,WZ.1......T.1.WZ.1:.1,BI$(T
):.: 1...

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL