> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 17 08 0A 00 97 35 33 32 38 30 2C 30 3A 97 |.......53280,0:.|
00000010: 35 33 32 38 31 2C 30 00 4A 08 14 00 99 22 93 05 |53281,0.J...."..|
00000020: D5 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................|
00000030: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................|
00000040: C3 C3 C3 C3 C3 C3 C3 C9 22 3B 00 7D 08 1E 00 99 |........";.}....|
00000050: 22 C2 12 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 92 C2 22 3B 00 B0 08 | ..";...|
00000080: 28 00 99 22 C2 12 44 20 49 20 58 20 59 20 20 2D |(.."..D I X Y -|
00000090: 20 20 43 20 4C 20 55 20 42 20 20 50 20 52 20 45 | C L U B P R E|
000000A0: 20 53 20 45 20 4E 20 54 20 53 3A 20 92 C2 22 3B | S E N T S: ..";|
000000B0: 00 E3 08 32 00 99 22 C2 12 20 20 20 20 20 20 20 |...2..".. |
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 20 20 20 20 20 20 20 92 | .|
000000E0: C2 22 3B 00 16 09 3C 00 99 22 C2 12 20 20 20 20 |.";...<..".. |
000000F0: 20 20 55 20 54 20 49 20 4C 20 49 20 54 20 49 20 | U T I L I T I |
00000100: 45 20 20 20 20 4E 20 52 2E 20 20 31 20 20 20 20 |E N R. 1 |
00000110: 20 20 92 C2 22 3B 00 49 09 46 00 99 22 C2 12 20 | ..";.I.F..".. |
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: 20 20 20 20 20 92 C2 22 3B 00 7C 09 50 00 99 22 | ..";.|.P.."|
00000150: C2 12 20 20 20 20 57 52 49 54 54 45 4E 20 3C 31 |.. WRITTEN <1|
00000160: 39 38 36 3E 20 42 59 20 44 49 45 54 45 52 20 50 |986> BY DIETER P|
00000170: 4C 41 55 4D 20 20 20 20 92 C2 22 3B 00 AF 09 5A |LAUM ..";...Z|
00000180: 00 99 22 C2 12 20 20 20 20 20 20 20 20 20 20 20 |..".. |
00000190: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001A0: 20 20 20 20 20 20 20 20 20 20 20 92 C2 22 3B 00 | ..";.|
000001B0: DF 09 64 00 99 22 CA C3 C3 C3 C3 C3 C3 C3 C3 C3 |..d.."..........|
000001C0: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................|
000001D0: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 CB 22 00 |..............".|
000001E0: 2D 0A 6E 00 99 22 44 49 45 53 45 53 20 4B 4C 45 |-.n.."DIESES KLE|
000001F0: 49 4E 45 20 44 45 4D 4F 2D 50 52 4F 47 52 41 4D |INE DEMO-PROGRAM|
00000200: 4D 20 5A 45 49 47 54 2C 20 57 49 45 20 20 4D 41 |M ZEIGT, WIE MA|
00000210: 4E 20 5A 2E 42 2E 20 49 4E 20 45 49 4E 45 52 20 |N Z.B. IN EINER |
00000220: 44 41 54 45 49 20 45 49 4E 45 4E 22 3B 00 7F 0A |DATEI EINEN";...|
00000230: 78 00 99 22 20 4E 41 4D 45 4E 20 53 55 2D 20 43 |x.." NAMEN SU- C|
00000240: 48 45 4E 20 4B 41 4E 4E 2C 20 4F 48 4E 45 20 44 |HEN KANN, OHNE D|
00000250: 41 53 53 20 44 49 45 53 45 52 20 56 4F 4C 4C 20 |ASS DIESER VOLL |
00000260: 41 55 53 47 45 2D 20 53 43 48 52 49 45 42 45 4E |AUSGE- SCHRIEBEN|
00000270: 20 57 45 52 44 45 4E 20 4D 55 53 53 2E 22 3B 00 | WERDEN MUSS.";.|
00000280: CF 0A 82 00 99 22 20 47 45 42 45 4E 20 53 49 45 |....." GEBEN SIE|
00000290: 20 5A 55 20 44 49 45 2D 53 45 4D 20 44 45 4D 4F | ZU DIE-SEM DEMO|
000002A0: 2D 50 52 4F 47 52 41 4D 4D 20 4D 41 58 2E 20 31 |-PROGRAMM MAX. 1|
000002B0: 30 20 4E 41 4D 45 4E 20 45 49 4E 20 55 4E 44 20 |0 NAMEN EIN UND |
000002C0: 56 45 52 46 41 48 52 45 4E 20 53 49 45 22 3B 00 |VERFAHREN SIE";.|
000002D0: F2 0A 8C 00 99 22 20 57 49 45 20 49 4D 20 50 52 |....." WIE IM PR|
000002E0: 4F 47 52 41 4D 4D 20 41 4E 47 45 47 45 42 45 4E |OGRAMM ANGEGEBEN|
000002F0: 2E 22 00 29 0B 96 00 99 22 44 49 45 20 57 49 43 |.".)...."DIE WIC|
00000300: 48 54 49 47 53 54 45 4E 20 5A 45 49 4C 45 4E 20 |HTIGSTEN ZEILEN |
00000310: 4C 49 45 47 45 4E 20 41 42 20 5A 45 49 4C 45 20 |LIEGEN AB ZEILE |
00000320: 20 4E 52 2E 20 32 31 30 22 00 62 0B A0 00 99 A6 | NR. 210".b.....|
00000330: 39 29 22 11 11 12 42 49 54 54 45 20 54 41 53 54 |9)"...BITTE TAST|
00000340: 45 20 44 52 55 45 43 4B 45 4E 20 21 22 3A 97 31 |E DRUECKEN !":.1|
00000350: 39 38 2C 30 3A 92 31 39 38 2C 31 3A 97 31 39 38 |98,0:.198,1:.198|
00000360: 2C 30 00 94 0B AA 00 99 22 93 12 20 20 20 20 20 |,0......".. |
00000370: 20 20 20 20 20 20 20 44 45 4D 4F 20 2D 20 50 52 | DEMO - PR|
00000380: 4F 47 52 41 4D 4D 20 20 20 20 20 20 20 20 20 20 |OGRAMM |
00000390: 20 20 20 22 00 9E 0B AF 00 41 B2 41 AA 31 00 B3 | ".....A.A.1..|
000003A0: 0B B0 00 99 22 13 11 11 11 11 45 4E 44 45 20 3D |....".....ENDE =|
000003B0: 20 2A 22 00 D5 0B B4 00 85 22 13 11 11 11 11 11 | *"......"......|
000003C0: 11 56 4F 52 4E 41 4D 45 20 20 3A 20 22 3B 41 24 |.VORNAME : ";A$|
000003D0: 28 41 2C 31 29 00 F9 0B BE 00 85 22 13 11 11 11 |(A,1)......"....|
000003E0: 11 11 11 11 11 4E 41 43 48 4E 41 4D 45 20 3A 20 |.....NACHNAME : |
000003F0: 22 3B 41 24 28 41 2C 32 29 00 0E 0C C4 00 8B 41 |";A$(A,2)......A|
00000400: 24 28 41 2C 31 29 B2 22 2A 22 A7 32 31 30 00 1C |$(A,1)."*".210..|
00000410: 0C C8 00 8B 41 B3 31 30 A7 31 37 35 00 4E 0C D2 |....A.10.175.N..|
00000420: 00 99 22 93 12 20 20 20 20 20 20 20 20 20 20 20 |..".. |
00000430: 20 20 20 53 55 43 48 52 4F 55 54 49 4E 45 20 20 | SUCHROUTINE |
00000440: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 9B | "..|
00000450: 0C DC 00 99 22 11 11 42 49 54 54 45 20 47 45 42 |...."..BITTE GEB|
00000460: 45 4E 20 53 49 45 20 44 45 4E 20 5A 55 20 53 55 |EN SIE DEN ZU SU|
00000470: 43 48 45 4E 44 45 4E 20 4E 41 43 48 2D 20 20 4E |CHENDEN NACH- N|
00000480: 41 4D 45 4E 20 4F 44 45 52 20 4E 55 52 20 45 49 |AMEN ODER NUR EI|
00000490: 4E 45 4E 20 54 45 49 4C 20 22 3B 00 B0 0C E6 00 |NEN TEIL ";.....|
000004A0: 99 22 44 41 56 4F 4E 20 45 49 4E 20 3A 20 11 22 |."DAVON EIN : ."|
000004B0: 00 C0 0C F0 00 85 42 24 3A 50 B2 C3 28 42 24 29 |......B$:P..(B$)|
000004C0: 00 CB 0C FA 00 81 4B B2 31 A4 41 00 E9 0C 04 01 |......K.1.A.....|
000004D0: 8B C8 28 41 24 28 4B 2C 32 29 2C 50 29 B2 C8 28 |..(A$(K,2),P)..(|
000004E0: 42 24 2C 50 29 A7 32 38 30 00 F0 0C 0E 01 82 4B |B$,P).280......K|
000004F0: 00 1D 0D 18 01 99 22 11 11 44 45 52 20 47 45 53 |......"..DER GES|
00000500: 55 43 48 54 45 20 56 4F 52 4E 41 4D 45 20 49 53 |UCHTE VORNAME IS|
00000510: 54 20 20 20 12 22 41 24 28 4B 2C 31 29 00 4A 0D |T ."A$(K,1).J.|
00000520: 22 01 99 22 11 11 44 45 52 20 47 45 53 55 43 48 |".."..DER GESUCH|
00000530: 54 45 20 4E 41 43 48 4E 41 4D 45 20 49 53 54 20 |TE NACHNAME IST |
00000540: 20 12 22 41 24 28 4B 2C 32 29 00 6F 0D 2C 01 99 | ."A$(K,2).o.,..|
00000550: A6 39 29 22 11 11 57 45 49 54 45 52 53 55 43 48 |.9)"..WEITERSUCH|
00000560: 45 4E 20 3C 12 20 4A 2F 4E 20 92 3E 20 3F 22 00 |EN <. J/N .> ?".|
00000570: 82 0D 36 01 A1 45 24 3A 8B 45 24 B2 22 22 A7 33 |..6..E$:.E$."".3|
00000580: 31 30 00 92 0D 40 01 8B 45 24 B2 22 4A 22 A7 32 |10...@..E$."J".2|
00000590: 31 30 00 A0 0D 4A 01 8B 45 24 B2 22 4E 22 A7 80 |10...J..E$."N"..|
000005A0: 00 A9 0D 54 01 89 33 31 30 00 00 00 |...T..310... |
.......53280,0:.53281,0.J...."..UCCCCCCC
CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCI";.}....
"B.
.B";...(.."B.D I X Y - C L U B P R E
S E N T S: .B";...2.."B.
.B";...<.."B.
U T I L I T I E N R. 1 .B";.I
.F.."B.
.B";.|.P.."B. WRITTEN <1986> BY
DIETER PLAUM .B";...Z.."B.
.B";...D.."JC
CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCK".
-.N.."DIESES KLEINE DEMO-PROGRAMM ZEIGT,
WIE MAN Z.B. IN EINER DATEI EINEN";..
X.." NAMEN SU- CHEN KANN, OHNE DASS DIES
ER VOLL AUSGE- SCHRIEBEN WERDEN MUSS.";.
O...." GEBEN SIE ZU DIE-SEM DEMO-PROGRAM
M MAX. 10 NAMEN EIN UND VERFAHREN SIE";.
....." WIE IM PROGRAMM ANGEGEBEN.".)....
"DIE WICHTIGSTEN ZEILEN LIEGEN AB ZEILE
NR. 210".B. ...9)"...BITTE TASTE DRUECK
EN !":.198,0:.198,1:.198,0......"..
DEMO - PROGRAMM "....
.A.A.1......".....ENDE = *".U...."......
.VORNAME : ";A$(A,1)......".........NAC
HNAME : ";A$(A,2)...D..A$(A,1)."*".210..
.H..A.10.175.N.R..".. SUCHR
OUTINE "......"..BITTE GEB
EN SIE DEN ZU SUCHENDEN NACH- NAMEN ODE
R NUR EINEN TEIL ";......"DAVON EIN : ."
......B$:P.C(B$).K....K.1.A......H(A$(K,
2),P).H(B$,P).280......K......"..DER GES
UCHTE VORNAME IST ."A$(K,1).J.".."..DE
R GESUCHTE NACHNAME IST ."A$(K,2).O.,..
.9)"..WEITERSUCHEN <. J/N .> ?"...6..E$:
.E$."".310...@..E$."J".210. .J..E$."N"..
...T..310...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL