BLOCKVERFOLGER
FILE INFORMATION
FILENAME(S): BLOCKVERFOLGER
FILE TYPE(S): PRG
FILE SIZE: 2.6K
FIRST SEEN: 2025-11-30 20:14:55
APPEARS ON: 1 disk(s)
FILE HASH
becc86f78591a7516633a7eb4f1f7bd3cfc571187b276f55130dfbd062c1af17
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HILFSPROGRAMME | BLOCKVERFOLGER | PRG | Curtcool, LPN | 6 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 00 00 89 31 30 30 00 2F 08 01 00 9F |.......100./....| 00000010: 31 2C 38 2C 31 35 3A 84 31 2C 41 2C 42 24 2C 43 |1,8,15:.1,A,B$,C| 00000020: 2C 44 3A 99 41 2C 42 24 2C 43 2C 44 3A A0 31 00 |,D:.A,B$,C,D:.1.| 00000030: 35 08 02 00 90 00 6A 08 64 00 48 58 24 B2 22 30 |5.....j.d.HX$."0| 00000040: 31 32 33 34 35 36 37 38 39 41 42 43 44 45 46 22 |123456789ABCDEF"| 00000050: 3A 86 4B 24 28 37 35 29 3A 81 49 B2 31 A4 37 35 |:.K$(75):.I.1.75| 00000060: 3A 87 4B 24 28 49 29 3A 82 49 00 82 08 6E 00 8F |:.K$(I):.I...n..| 00000070: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************| 00000080: 2A 2A 00 99 08 78 00 8F 20 20 42 4C 4F 43 4B 56 |**...x.. BLOCKV| 00000090: 45 52 46 4F 4C 47 55 4E 47 00 B1 08 82 00 8F 20 |ERFOLGUNG...... | 000000A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000000B0: 2A 00 BD 08 8C 00 99 C7 28 31 34 37 29 00 D1 08 |*.......(147)...| 000000C0: 96 00 99 22 28 31 29 20 44 49 52 45 43 54 4F 52 |..."(1) DIRECTOR| 000000D0: 59 00 EB 08 A0 00 99 22 28 32 29 20 42 4C 4F 43 |Y......"(2) BLOC| 000000E0: 4B 56 45 52 4B 45 54 54 55 4E 47 00 06 09 AA 00 |KVERKETTUNG.....| 000000F0: 99 22 28 33 29 20 42 4C 4F 43 4B 41 55 53 47 41 |."(3) BLOCKAUSGA| 00000100: 42 45 20 41 53 43 00 24 09 B4 00 99 22 28 34 29 |BE ASC.$...."(4)| 00000110: 20 42 4C 4F 43 4B 41 55 53 47 41 42 45 20 54 4F | BLOCKAUSGABE TO| 00000120: 4B 45 4E 53 00 3A 09 BE 00 99 22 28 35 29 20 46 |KENS.:...."(5) F| 00000130: 45 48 4C 45 52 4B 41 4E 41 4C 00 58 09 C8 00 99 |EHLERKANAL.X....| 00000140: 3A 99 22 54 52 45 46 46 45 4E 20 53 49 45 20 49 |:."TREFFEN SIE I| 00000150: 48 52 45 20 57 41 48 4C 00 61 09 D2 00 8D 39 39 |HRE WAHL.a....99| 00000160: 30 00 75 09 DC 00 8B 41 B3 31 20 B0 20 41 B1 35 |0.u....A.1 . A.5| 00000170: 20 A7 32 31 30 00 90 09 E6 00 91 41 8D 32 35 30 | .210......A.250| 00000180: 2C 34 35 30 2C 35 34 30 2C 37 31 30 2C 38 38 30 |,450,540,710,880| 00000190: 00 99 09 F0 00 89 31 34 30 00 A9 09 FA 00 8F 20 |......140...... | 000001A0: 44 49 52 45 43 54 4F 52 59 00 B6 09 04 01 54 B2 |DIRECTORY.....T.| 000001B0: 31 38 3A 53 B2 31 00 CD 09 0E 01 9F 31 2C 38 2C |18:S.1......1,8,| 000001C0: 31 35 3A 9F 32 2C 38 2C 32 2C 22 23 22 00 F4 09 |15:.2,8,2,"#"...| 000001D0: 18 01 99 C7 28 31 34 37 29 3B 22 45 49 4E 54 52 |....(147);"EINTR| 000001E0: 41 47 20 20 20 20 20 20 20 20 20 20 54 52 20 20 |AG TR | 000001F0: 20 53 45 22 00 08 0A 22 01 98 31 2C 22 55 31 3A | SE"..."..1,"U1:| 00000200: 22 32 2C 30 2C 54 2C 53 00 1C 0A 2C 01 8D 31 30 |"2,0,T,S...,..10| 00000210: 33 30 3A 54 B2 54 58 3A 53 B2 53 58 00 27 0A 36 |30:T.TX:S.SX.'.6| 00000220: 01 81 49 B2 30 A4 37 00 3D 0A 40 01 98 31 2C 22 |..I.0.7.=.@..1,"| 00000230: 42 2D 50 3A 22 32 2C 49 AC 33 32 AA 32 00 57 0A |B-P:"2,I.32.2.W.| 00000240: 4A 01 A1 23 32 2C 41 24 3A 8B 41 24 B2 22 22 A7 |J..#2,A$:.A$."".| 00000250: 41 24 B2 C7 28 30 29 00 6A 0A 54 01 8B C6 28 41 |A$..(0).j.T...(A| 00000260: 24 29 B3 31 32 38 A7 34 31 30 00 74 0A 5E 01 8D |$).128.410.t.^..| 00000270: 31 30 33 30 00 80 0A 68 01 81 55 B2 31 A4 31 36 |1030...h..U.1.16| 00000280: 00 99 0A 72 01 A1 23 32 2C 41 24 3A 8B 41 24 B2 |...r..#2,A$:.A$.| 00000290: 22 22 A7 41 24 B2 22 20 22 00 AF 0A 7C 01 8B C6 |"".A$." "...|...| 000002A0: 28 41 24 29 B2 31 36 30 A7 41 24 B2 22 20 22 00 |(A$).160.A$." ".| 000002B0: BF 0A 86 01 4E 24 B2 4E 24 AA 41 24 3A 82 55 00 |....N$.N$.A$:.U.| 000002C0: D3 0A 90 01 99 4E 24 3B 54 58 3B 53 58 3A 4E 24 |.....N$;TX;SX:N$| 000002D0: B2 22 22 00 DA 0A 9A 01 82 49 00 E8 0A A4 01 8B |.""......I......| 000002E0: 54 B3 B1 30 89 32 39 30 00 0A 0B AE 01 99 3A 99 |T..0.290......:.| 000002F0: 42 49 54 54 45 20 45 49 4E 45 20 54 41 53 54 45 |BITTE EINE TASTE| 00000300: 20 44 52 55 45 43 4B 45 4E 22 00 1B 0B B8 01 A0 | DRUECKEN"......| 00000310: 31 3A A0 32 3A 8D 39 39 30 3A 8E 00 2C 0B C2 01 |1:.2:.990:..,...| 00000320: 8F 20 56 45 52 4B 45 54 54 55 4E 47 00 3A 0B CC |. VERKETTUNG.:..| 00000330: 01 8D 31 30 39 30 3A 43 B2 31 00 63 0B D6 01 99 |..1090:C.1.c....| 00000340: 22 42 4C 4F 43 4B 20 4E 52 2E 22 3B 43 3B 22 20 |"BLOCK NR.";C;" | 00000350: 20 20 54 52 3A 22 3B 54 3B 22 20 20 20 53 45 3A | TR:";T;" SE:| 00000360: 22 3B 53 00 77 0B E0 01 98 31 2C 22 55 31 3A 22 |";S.w....1,"U1:"| 00000370: 32 2C 30 2C 54 2C 53 00 9A 0B EA 01 8D 31 30 33 |2,0,T,S......103| 00000380: 30 3A 54 B2 54 58 3A 53 B2 53 58 3A 43 B2 43 AA |0:T.TX:S.SX:C.C.| 00000390: 31 3A 8B 54 B2 30 A7 35 31 30 00 A3 0B F4 01 89 |1:.T.0.510......| 000003A0: 34 37 30 00 C8 0B FE 01 99 22 4C 45 54 5A 54 45 |470......"LETZTE| 000003B0: 52 20 42 4C 4F 43 4B 20 48 41 54 20 3A 22 3B 53 |R BLOCK HAT :";S| 000003C0: 3B 22 42 59 54 45 53 22 00 F1 0B 08 02 A0 31 3A |;"BYTES"......1:| 000003D0: A0 32 3A 99 3A 99 22 42 49 54 54 45 20 45 49 4E |.2:.:."BITTE EIN| 000003E0: 45 20 54 41 53 54 45 20 44 52 55 45 43 4B 45 4E |E TASTE DRUECKEN| 000003F0: 22 00 FC 0B 12 02 8D 39 39 30 3A 8E 00 0A 0C 1C |"......990:.....| 00000400: 02 8F 20 41 55 53 20 41 53 43 00 14 0C 26 02 8D |.. AUS ASC...&..| 00000410: 31 30 39 30 00 1E 0C 30 02 8D 31 31 35 30 00 2A |1090...0..1150.*| 00000420: 0C 3A 02 81 49 B2 30 A4 33 31 00 35 0C 44 02 81 |.:..I.0.31.5.D..| 00000430: 55 B2 30 A4 37 00 4F 0C 4E 02 A1 23 32 2C 41 24 |U.0.7.O.N..#2,A$| 00000440: 3A 8B 41 24 B2 22 22 A7 41 24 B2 C7 28 30 29 00 |:.A$."".A$..(0).| 00000450: 59 0C 58 02 8D 31 31 39 30 00 82 0C 62 02 8B C6 |Y.X..1190...b...| 00000460: 28 41 24 29 B3 33 32 B0 C6 28 41 24 29 B1 31 32 |(A$).32..(A$).12| 00000470: 37 AF C6 28 41 24 29 B3 31 36 30 A7 41 24 B2 22 |7..(A$).160.A$."| 00000480: 2E 22 00 8F 0C 6C 02 4E 24 B2 4E 24 AA 41 24 00 |."...l.N$.N$.A$.| 00000490: 9C 0C 76 02 99 48 24 3B 22 20 22 3B 00 A3 0C 80 |..v..H$;" ";....| 000004A0: 02 82 55 00 B1 0C 8A 02 99 4E 24 3A 4E 24 B2 22 |..U......N$:N$."| 000004B0: 22 00 B8 0C 94 02 82 49 00 F6 0C 9E 02 99 3A 99 |"......I......:.| 000004C0: 22 42 49 54 54 45 20 45 49 4E 45 20 54 41 53 54 |"BITTE EINE TAST| 000004D0: 45 20 44 52 55 45 43 4B 45 4E 20 4F 44 45 52 20 |E DRUECKEN ODER | 000004E0: 46 4F 4C 47 45 2D 20 20 20 42 4C 4F 43 4B 20 4D |FOLGE- BLOCK M| 000004F0: 49 46 20 27 46 27 00 10 0D A8 02 8D 39 39 30 3A |IF 'F'......990:| 00000500: 8B 41 24 B3 B1 22 46 22 A7 A0 31 3A A0 32 3A 8E |.A$.."F"..1:.2:.| 00000510: 00 2B 0D B2 02 54 B2 54 58 3A 53 B2 53 58 3A 8B |.+...T.TX:S.SX:.| 00000520: 54 B2 30 A7 A0 31 3A A0 32 3A 8E 00 34 0D BC 02 |T.0..1:.2:..4...| 00000530: 89 35 36 30 00 44 0D C6 02 8F 20 41 55 53 20 54 |.560.D.... AUS T| 00000540: 4F 4B 45 4E 00 4E 0D D0 02 8D 31 30 39 30 00 58 |OKEN.N....1090.X| 00000550: 0D DA 02 8D 31 31 35 30 00 64 0D E4 02 81 49 B2 |....1150.d....I.| 00000560: 30 A4 33 31 00 6F 0D EE 02 81 55 B2 30 A4 37 00 |0.31.o....U.0.7.| 00000570: 89 0D F8 02 A1 23 32 2C 41 24 3A 8B 41 24 B2 22 |.....#2,A$:.A$."| 00000580: 22 A7 41 24 B2 C7 28 30 29 00 93 0D 02 03 8D 31 |".A$..(0)......1| 00000590: 31 39 30 00 A8 0D 0C 03 8B C6 28 41 24 29 B3 33 |190.......(A$).3| 000005A0: 32 A7 41 24 B2 22 2E 22 00 D2 0D 16 03 8B C6 28 |2.A$.".".......(| 000005B0: 41 24 29 B1 31 32 37 AF C6 28 41 24 29 B3 32 30 |A$).127..(A$).20| 000005C0: 33 A7 41 24 B2 4B 24 28 C6 28 41 24 29 AB 31 32 |3.A$.K$(.(A$).12| 000005D0: 37 29 00 E8 0D 20 03 4E 24 B2 4E 24 AA 41 24 3A |7)... .N$.N$.A$:| 000005E0: 99 48 24 3B 22 20 22 3B 00 F0 0D 2A 03 82 20 55 |.H$;" ";...*.. U| 000005F0: 00 FE 0D 34 03 99 4E 24 3A 4E 24 B2 22 22 00 05 |...4..N$:N$.""..| 00000600: 0E 3E 03 82 49 00 43 0E 48 03 99 3A 99 22 42 49 |.>..I.C.H..:."BI| 00000610: 54 54 45 20 45 49 4E 45 20 54 41 53 54 45 20 44 |TTE EINE TASTE D| 00000620: 52 55 45 43 4B 45 4E 20 4F 44 45 52 20 46 4F 4C |RUECKEN ODER FOL| 00000630: 47 45 2D 20 20 20 42 4C 4F 43 4B 20 4D 49 46 20 |GE- BLOCK MIF | 00000640: 27 46 27 00 5D 0E 52 03 8D 39 39 30 3A 8B 41 24 |'F'.].R..990:.A$| 00000650: B3 B1 22 46 22 A7 A0 31 3A A0 32 3A 8E 00 78 0E |.."F"..1:.2:..x.| 00000660: 5C 03 54 B2 54 58 3A 53 B2 53 58 3A 8B 54 B2 30 |\.T.TX:S.SX:.T.0| 00000670: A7 A0 31 3A A0 32 3A 8E 00 81 0E 66 03 89 37 33 |..1:.2:....f..73| 00000680: 30 00 93 0E 70 03 8F 20 46 45 48 4C 45 52 4B 41 |0...p.. FEHLERKA| 00000690: 4E 41 4C 00 9F 0E 7A 03 9F 31 2C 38 2C 31 35 00 |NAL...z..1,8,15.| 000006A0: AF 0E 84 03 84 31 2C 41 2C 53 24 2C 44 2C 46 00 |.....1,A,S$,D,F.| 000006B0: BB 0E 8E 03 99 C7 28 31 34 37 29 00 D3 0E 98 03 |......(147).....| 000006C0: 99 22 46 45 48 4C 45 52 4E 55 4D 4D 45 52 20 3A |."FEHLERNUMMER :| 000006D0: 22 3B 41 00 EC 0E A2 03 99 22 54 59 50 20 20 20 |";A......"TYP | 000006E0: 20 20 20 20 20 20 20 3A 22 3B 53 24 00 04 0F AC | :";S$....| 000006F0: 03 99 22 42 4C 4F 43 4B 20 20 20 20 20 20 20 20 |.."BLOCK | 00000700: 3A 22 3B 44 00 1C 0F B6 03 99 22 53 45 43 54 4F |:";D......"SECTO| 00000710: 52 20 20 20 20 20 20 20 3A 22 3B 46 00 23 0F C0 |R :";F.#..| 00000720: 03 A0 31 00 46 0F CA 03 99 3A 99 22 42 49 54 54 |..1.F....:."BITT| 00000730: 45 20 45 49 4E 45 20 54 41 53 54 45 20 44 52 55 |E EINE TASTE DRU| 00000740: 45 43 4B 45 4E 22 00 51 0F D4 03 8D 39 39 30 3A |ECKEN".Q....990:| 00000750: 8E 00 65 0F DE 03 8F 20 5A 45 49 43 48 45 4E 20 |..e.... ZEICHEN | 00000760: 48 4F 4C 45 4E 00 79 0F E8 03 A1 41 24 3A 8B 41 |HOLEN.y....A$:.A| 00000770: 24 B2 22 22 A7 31 30 30 30 00 85 0F F2 03 41 B2 |$."".1000.....A.| 00000780: C5 28 41 24 29 00 8B 0F FC 03 8E 00 9E 0F 06 04 |.(A$)...........| 00000790: 8F 20 32 20 42 59 54 45 20 48 4F 4C 45 4E 00 B8 |. 2 BYTE HOLEN..| 000007A0: 0F 10 04 A1 23 32 2C 41 24 3A 8B 41 24 B2 22 22 |....#2,A$:.A$.""| 000007B0: A7 41 24 B2 C7 28 30 29 00 C5 0F 1A 04 54 58 B2 |.A$..(0).....TX.| 000007C0: C6 28 41 24 29 00 DF 0F 24 04 A1 23 32 2C 41 24 |.(A$)...$..#2,A$| 000007D0: 3A 8B 41 24 B2 22 22 A7 41 24 B2 C7 28 30 29 00 |:.A$."".A$..(0).| 000007E0: EC 0F 2E 04 53 58 B2 C6 28 41 24 29 00 F2 0F 38 |....SX..(A$)...8| 000007F0: 04 8E 00 0D 10 42 04 8F 20 45 49 4E 47 41 42 45 |.....B.. EINGABE| 00000800: 20 54 52 41 43 4B 2C 53 45 43 54 4F 52 00 19 10 | TRACK,SECTOR...| 00000810: 4C 04 99 C7 28 31 34 37 29 00 2B 10 56 04 85 22 |L...(147).+.V.."| 00000820: 54 52 41 43 4B 20 20 3A 22 3B 54 00 3D 10 60 04 |TRACK :";T.=.`.| 00000830: 85 22 53 45 43 54 4F 52 20 3A 22 3B 53 00 54 10 |."SECTOR :";S.T.| 00000840: 6A 04 9F 31 2C 38 2C 31 35 3A 9F 32 2C 38 2C 32 |j..1,8,15:.2,8,2| 00000850: 2C 22 23 22 00 5A 10 74 04 8E 00 6C 10 7E 04 8F |,"#".Z.t...l.~..| 00000860: 20 42 4C 4F 43 4B 20 4C 45 53 45 4E 00 80 10 88 | BLOCK LESEN....| 00000870: 04 98 31 2C 22 55 31 3A 22 32 2C 30 2C 54 2C 53 |..1,"U1:"2,0,T,S| 00000880: 00 97 10 92 04 8D 31 30 33 30 3A 98 31 2C 22 42 |......1030:.1,"B| 00000890: 2D 50 3A 22 32 2C 30 00 9D 10 9C 04 8E 00 AD 10 |-P:"2,0.........| 000008A0: A6 04 8F 20 48 45 58 57 41 4E 44 45 4C 00 B9 10 |... HEXWANDEL...| 000008B0: B0 04 41 B2 C6 28 41 24 29 00 C8 10 BA 04 41 31 |..A..(A$).....A1| 000008C0: B2 B5 28 41 AD 31 36 29 00 D7 10 C4 04 41 32 B2 |..(A.16).....A2.| 000008D0: 41 AB 41 31 AC 31 36 00 EC 10 CE 04 48 24 B2 CA |A.A1.16.....H$..| 000008E0: 28 48 58 24 2C 41 31 AA 31 2C 31 29 00 04 11 D8 |(HX$,A1.1,1)....| 000008F0: 04 48 24 B2 48 24 AA CA 28 48 58 24 2C 41 32 AA |.H$.H$..(HX$,A2.| 00000900: 31 2C 31 29 00 0A 11 E2 04 8E 00 55 11 EC 04 83 |1,1).......U....| 00000910: 45 4E 44 2C 46 4F 52 2C 4E 45 58 54 2C 44 41 54 |END,FOR,NEXT,DAT| 00000920: 41 2C 49 4E 50 55 54 23 2C 49 4E 50 55 54 2C 44 |A,INPUT#,INPUT,D| 00000930: 49 4D 2C 52 45 41 44 2C 4C 45 54 2C 47 4F 54 4F |IM,READ,LET,GOTO| 00000940: 2C 52 55 4E 2C 49 46 2C 52 45 53 54 4F 52 45 2C |,RUN,IF,RESTORE,| 00000950: 47 4F 53 55 42 00 9E 11 F6 04 83 52 45 54 55 52 |GOSUB......RETUR| 00000960: 4E 2C 52 45 4D 2C 53 54 4F 50 2C 4F 4E 2C 57 41 |N,REM,STOP,ON,WA| 00000970: 49 54 2C 4C 4F 41 44 2C 53 41 56 45 2C 56 45 52 |IT,LOAD,SAVE,VER| 00000980: 49 46 59 2C 44 45 46 2C 50 4F 4B 45 2C 50 52 49 |IFY,DEF,POKE,PRI| 00000990: 4E 54 23 2C 50 52 49 4E 54 2C 43 4F 4E 54 00 E5 |NT#,PRINT,CONT..| 000009A0: 11 00 05 83 4C 49 53 54 2C 43 4C 52 2C 43 4D 44 |....LIST,CLR,CMD| 000009B0: 2C 53 59 53 2C 4F 50 45 4E 2C 43 4C 4F 53 45 2C |,SYS,OPEN,CLOSE,| 000009C0: 47 45 54 2C 4E 45 57 2C 54 41 42 28 2C 54 4F 2C |GET,NEW,TAB(,TO,| 000009D0: 46 4E 2C 53 50 43 28 2C 54 48 45 4E 2C 4E 4F 54 |FN,SPC(,THEN,NOT| 000009E0: 2C 53 54 45 50 00 31 12 0A 05 83 2B 2C 2D 2C 2A |,STEP.1....+,-,*| 000009F0: 2C 2F 2C 5E 2C 41 4E 44 2C 4F 52 2C 3E 2C 3D 2C |,/,^,AND,OR,>,=,| 00000A00: 3C 2C 53 47 4E 2C 49 4E 54 2C 41 42 53 2C 55 53 |<,SGN,INT,ABS,US| 00000A10: 52 2C 46 52 45 2C 50 4F 53 2C 53 51 52 2C 52 4E |R,FRE,POS,SQR,RN| 00000A20: 44 2C 4C 4F 47 2C 45 58 50 2C 43 4F 53 2C 53 49 |D,LOG,EXP,COS,SI| 00000A30: 4E 00 6D 12 14 05 83 54 41 4E 2C 41 54 4E 2C 50 |N.m....TAN,ATN,P| 00000A40: 45 45 4B 2C 4C 45 4E 2C 53 54 52 24 2C 56 41 4C |EEK,LEN,STR$,VAL| 00000A50: 2C 41 53 43 2C 43 48 52 24 2C 4C 45 46 54 24 2C |,ASC,CHR$,LEFT$,| 00000A60: 52 49 47 48 54 24 2C 4D 49 44 53 2C 2C 00 00 00 |RIGHT$,MIDS,,...|
.......100./....1,8,15:.1,A,B$,C,D:.A,B$
,C,D: 1.5.....J.D.HX$."0123456789ABCDEF"
:.K$(75):.I.1.75:.K$(I):.I...N.. *******
**********...X.. BLOCKVERFOLGUNG......
*****************......G(147).Q...."(1)
DIRECTORY... .."(2) BLOCKVERKETTUNG.....
."(3) BLOCKAUSGABE ASC.$...."(4) BLOCKAU
SGABE TOKENS.:...."(5) FEHLERKANAL.X.H..
:."TREFFEN SIE IHRE WAHL.A.R..990.U....A
.1 . A.5 .210......A.250,450,540,710,880
......140...... DIRECTORY.....T.18:S.1.M
....1,8,15:.2,8,2,"#"......G(147);"EINTR
AG TR SE"..."..1,"U1:"2,0,T,S
...,..1030:T.TX:S.SX.'.6..I.0.7.=.@..1,"
B-P:"2,I.32.2.W.J..#2,A$:.A$."".A$.G(0).
J.T..F(A$).128.410.T.^..1030...H..U.1.16
...R..#2,A$:.A$."".A$." "...|..F(A$).160
.A$." ".....N$.N$.A$:.U.S....N$;TX;SX:N$
."".Z....I......T..0.290......:.BITTE EI
NE TASTE DRUECKEN"..... 1: 2:.990:..,.B.
. VERKETTUNG.:.L..1090:C.1.C.V.."BLOCK N
R.";C;" TR:";T;" SE:";S.W....1,"U1:"
2,0,T,S......1030:T.TX:S.SX:C.C.1:.T.0.5
10......470.H...."LETZTER BLOCK HAT :";S
;"BYTES"..... 1: 2:.:."BITTE EINE TASTE
DRUECKEN"......990:....... AUS ASC...&..
1090...0..1150.*.:..I.0.31.5.D..U.0.7.O.
N..#2,A$:.A$."".A$.G(0).Y.X..1190...B..F
(A$).32.F(A$).127.F(A$).160.A$."."...L.N
$.N$.A$...V..H$;" ";......U......N$:N$."
"......I......:."BITTE EINE TASTE DRUECK
EN ODER FOLGE- BLOCK MIF 'F'......990:
.A$.."F". 1: 2:..+...T.TX:S.SX:.T.0. 1:
2:..4....560.D.F.. AUS TOKEN.N.P..1090.X
.Z..1150.D....I.0.31.O....U.0.7......#2,
A$:.A$."".A$.G(0)......1190......F(A$).3
2.A$.".".R....F(A$).127.F(A$).203.A$.K$(
F(A$).127)... .N$.N$.A$:.H$;" ";...*.. U
...4..N$:N$.""...>..I.C.H..:."BITTE EINE
TASTE DRUECKEN ODER FOLGE- BLOCK MIF
'F'.].R..990:.A$.."F". 1: 2:..X.\.T.TX:S
.SX:.T.0. 1: 2:....F..730...P.. FEHLERKA
NAL...Z..1,8,15......1,A,S$,D,F......G(1
47).S...."FEHLERNUMMER :";A......"TYP
:";S$......"BLOCK :";D....
.."SECTOR :";F.#... 1.F.J..:."BITT
E EINE TASTE DRUECKEN".Q.T..990:..E....
ZEICHEN HOLEN.Y....A$:.A$."".1000.....A.
E(A$)............ 2 BYTE HOLEN......#2,A
$:.A$."".A$.G(0).E...TX.F(A$)...$..#2,A$
:.A$."".A$.G(0).....SX.F(A$)...8.....B..
EINGABE TRACK,SECTOR...L..G(147).+.V.."
TRACK :";T.=.`.."SECTOR :";S.T.J..1,8,1
5:.2,8,2,"#".Z.T...L.~.. BLOCK LESEN....
..1,"U1:"2,0,T,S......1030:.1,"B-P:"2,0.
........... HEXWANDEL.....A.F(A$).H...A1
..(A.16).W.D.A2.A.A1.16...N.H$.J(HX$,A1.
1,1)...X.H$.H$.J(HX$,A2.1,1).......U....
END,FOR,NEXT,DATA,INPUT#,INPUT,DIM,READ,
LET,GOTO,RUN,IF,RESTORE,GOSUB......RETUR
N,REM,STOP,ON,WAIT,LOAD,SAVE,VERIFY,DEF,
POKE,PRINT#,PRINT,CONT......LIST,CLR,CMD
,SYS,OPEN,CLOSE,GET,NEW,TAB(,TO,FN,SPC(,
THEN,NOT,STEP.1....+,-,*,/,^,AND,OR,>,=,
<,SGN,INT,ABS,USR,FRE,POS,SQR,RND,LOG,EX
P,COS,SIN.M....TAN,ATN,PEEK,LEN,STR$,VAL
,ASC,CHR$,LEFT$,RIGHT$,MIDS,,...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL