00000000: D8 1F F9 1F 03 00 3B 20 53 55 43 48 52 4F 55 54 |......; SUCHROUT|
00000010: 49 4E 45 20 46 55 45 52 20 44 43 2D 4D 45 4D 4F |INE FUER DC-MEMO|
00000020: 52 59 00 09 20 04 00 3B 20 52 2E 4D 41 45 54 43 |RY.. ..; R.MAETC|
00000030: 48 45 00 2E 20 05 00 3B 20 41 4E 46 41 4E 47 53 |HE.. ..; ANFANGS|
00000040: 42 4C 4F 43 4B 20 53 54 45 48 54 20 49 4E 20 50 |BLOCK STEHT IN P|
00000050: 55 46 46 45 52 20 30 00 54 20 06 00 3B 20 53 55 |UFFER 0.T ..; SU|
00000060: 43 48 53 54 52 49 4E 47 20 41 42 20 24 30 34 41 |CHSTRING AB $04A|
00000070: 30 2C 20 45 4E 44 4D 41 52 4B 45 3D 30 00 69 20 |0, ENDMARKE=0.i |
00000080: 07 00 3B 20 4B 4F 4D 4D 55 42 4E 7C 5E 77 E0 70 |..; KOMMUBN|^w.p|
00000090: 78 8E EE E9 8E EE FE 8E 9E E8 70 74 78 EE 71 8E |x.........ptx.q.|
000000A0: 8E 8E 8E 9E E8 70 78 84 82 EF EC 01 8E 20 18 00 |.....px...... ..|
000000B0: 2E 20 E2 EF EE E8 EE E1 2E 3E 20 2C 8E E7 E9 EE |. .......> ,....|
000000C0: 78 EB 00 B1 20 0A 00 3B 20 43 4F 4D 42 55 46 2B |x... ..; COMBUF+|
000000D0: 32 20 3D 20 53 45 43 54 4F 52 00 D4 20 0B 00 3B |2 = SECTOR.. ..;|
000000E0: 20 43 4F 4D 42 55 46 2B 33 20 3D 20 50 4F 49 4E | COMBUF+3 = POIN|
000000F0: 54 45 52 20 5A 55 20 31 2E 42 59 54 45 00 F0 20 |TER ZU 1.BYTE.. |
00000100: 0C 00 3B 20 43 4F 4D 42 55 46 2B 34 20 3D 20 46 |..; COMBUF+4 = F|
00000110: 45 48 4C 45 52 43 4F 44 45 00 15 21 0D 00 3B 20 |EHLERCODE..!..; |
00000120: 30 20 20 49 4E 20 43 4F 4E 54 52 4F 4C 20 20 2D |0 IN CONTROL -|
00000130: 3E 20 31 2E 4D 41 4C 20 53 55 43 48 45 4E 00 3A |> 1.MAL SUCHEN.:|
00000140: 21 0E 00 3B 20 31 20 20 49 4E 20 43 4F 4E 54 52 |!..; 1 IN CONTR|
00000150: 4F 4C 20 20 2D 3E 20 57 45 49 54 45 52 53 55 43 |OL -> WEITERSUC|
00000160: 48 45 4E 00 62 21 0F 00 3B 20 3E 31 20 49 4E 20 |HEN.b!..; >1 IN |
00000170: 43 4F 4E 54 52 4F 4C 20 20 2D 3E 20 44 41 54 45 |CONTROL -> DATE|
00000180: 4E 53 41 54 5A 20 48 4F 4C 45 4E 00 87 21 10 00 |NSATZ HOLEN..!..|
00000190: 3B 20 46 45 48 4C 45 52 43 4F 44 45 20 20 3D 20 |; FEHLERCODE = |
000001A0: 30 30 2D 3E 20 4B 45 49 4E 20 46 45 48 4C 45 52 |00-> KEIN FEHLER|
000001B0: 00 AB 21 11 00 3B 20 46 45 48 4C 45 52 43 4F 44 |..!..; FEHLERCOD|
000001C0: 45 20 20 3D 20 39 39 2D 3E 20 44 41 54 45 49 2D |E = 99-> DATEI-|
000001D0: 45 4E 44 45 00 C2 21 12 00 2E 45 51 20 42 4C 4B |ENDE..!...EQ BLK|
000001E0: 42 55 46 20 3D 20 24 30 33 30 30 00 D9 21 13 00 |BUF = $0300..!..|
000001F0: 2E 45 51 20 4E 54 52 41 43 4B 20 3D |.EQ NTRACK = |
X.....; SUCHROUTINE FUER DC-MEMORY.. ..;
R.MAETCHE.. ..; ANFANGSBLOCK STEHT IN P
UFFER 0.T ..; SUCHSTRING AB $04A0, ENDMA
RKE=0.I ..; KOMMUBN|^W.PX.........PTX.Q.
.....PX...... ... .......> ,....X... ..;
COMBUF+2 = SECTOR.T ..; COMBUF+3 = POIN
TER ZU 1.BYTE.. ..; COMBUF+4 = FEHLERCOD
E..!..; 0 IN CONTROL -> 1.MAL SUCHEN.:
!..; 1 IN CONTROL -> WEITERSUCHEN.B!..
; >1 IN CONTROL -> DATENSATZ HOLEN..!..
; FEHLERCODE = 00-> KEIN FEHLER..!..; F
EHLERCODE = 99-> DATEI-ENDE.B!...EQ BLK
BUF = $0300.Y!...EQ NTRACK =
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL