GEOCHECK TEIL 2

00000000: 01 08 1F 08 64 00 8F 20  2A 2A 2A 20 47 45 4F 43  |....d.. *** GEOC|
00000010: 48 45 43 4B 20 2D 20 50  54 20 32 20 2A 2A 2A 00  |HECK - PT 2 ***.|
00000020: 3D 08 69 00 8F 20 2A 2A  2A 20 46 4C 4F 52 49 41  |=.i.. *** FLORIA|
00000030: 4E 20 4D 55 45 4C 4C 45  52 20 2A 2A 2A 00 43 08  |N MUELLER ***.C.|
00000040: 6E 00 8F 00 90 08 73 00  8F 20 42 41 53 45 44 20  |n.....s.. BASED |
00000050: 4F 4E 20 54 48 45 20 50  52 4F 47 52 41 4D 20 22  |ON THE PROGRAM "|
00000060: 47 45 4F 53 20 46 49 4C  45 2D 41 4E 41 4C 59 5A  |GEOS FILE-ANALYZ|
00000070: 45 52 22 20 28 43 3D 2D  42 55 43 48 20 22 41 4C  |ER" (C=-BUCH "AL|
00000080: 4C 45 53 20 55 45 42 45  52 20 47 45 4F 53 22 29  |LES UEBER GEOS")|
00000090: 00 96 08 78 00 3A 00 9C  08 7D 00 3A 00 BF 08 82  |...x.:...}.:....|
000000A0: 00 9C 3A 81 20 46 B2 34  39 31 35 32 20 A4 20 34  |..:. F.49152 . 4|
000000B0: 39 31 38 39 3A 87 20 58  3A 97 46 2C 58 3A 82 00  |9189:. X:.F,X:..|
000000C0: CB 08 87 00 9E 20 34 39  31 35 32 00 F8 08 8C 00  |..... 49152.....|
000000D0: 83 20 31 36 39 20 2C 31  31 2C 20 31 36 30 2C 20  |. 169 ,11, 160, |
000000E0: 31 39 32 2C 20 31 34 31  2C 20 33 38 2C 20 33 2C  |192, 141, 38, 3,|
000000F0: 20 31 34 30 2C 20 33 39  00 11 09 91 00 83 33 2C  | 140, 39......3,|
00000100: 20 39 36 2C 20 32 30 31  2C 20 36 35 2C 20 31 34  | 96, 201, 65, 14|
00000110: 34 00 59 09 96 00 83 39  2C 32 30 31 2C 39 31 2C  |4.Y....9,201,91,|
00000120: 31 37 36 2C 35 2C 37 33  20 2C 33 32 2C 20 37 36  |176,5,73 ,32, 76|
00000130: 2C 20 32 30 32 2C 20 32  34 31 2C 32 30 31 2C 39  |, 202, 241,201,9|
00000140: 37 2C 31 34 34 2C 32 34  39 2C 32 30 31 2C 31 32  |7,144,249,201,12|
00000150: 33 2C 31 37 36 2C 32 34  35 00 73 09 9B 00 83 37  |3,176,245.s....7|
00000160: 33 2C 33 32 2C 37 36 2C  32 30 32 2C 32 34 31 2C  |3,32,76,202,241,|
00000170: 32 35 35 00 95 09 A0 00  99 22 0E 22 3A 43 24 B2  |255......".":C$.|
00000180: 22 20 22 3A 81 46 B2 31  A4 36 3A 43 24 B2 43 24  |" ":.F.1.6:C$.C$|
00000190: AA 43 24 3A 82 00 B9 09  A5 00 53 53 24 B2 C7 28  |.C$:......SS$..(|
000001A0: 31 36 30 29 3A 81 46 B2  31 A4 34 3A 53 53 24 B2  |160):.F.1.4:SS$.|
000001B0: 53 53 24 AA 53 53 24 3A  82 00 F9 09 AA 00 4D 24  |SS$.SS$:......M$|
000001C0: B2 22 47 45 4F 53 20 22  AA C7 28 31 30 32 29 AA  |."GEOS "..(102).|
000001D0: C7 28 31 31 31 29 AA C7  28 31 31 34 29 AA C7 28  |.(111)..(114)..(|
000001E0: 31 30 39 29 AA C7 28 39  37 29 AA C7 28 31 31 36  |109)..(97)..(116|
000001F0: 29 AA 22 20 56 31 2E 30  22 00 45 0A AF 00 86 44  |)." V1.0".E....D|
00000200: 24 28 31 35 30 29 2C 54  24 28 31 35 30 29 2C 53  |$(150),T$(150),S|
00000210: 24 28 31 35 30 29 2C 44  53 28 31 35 30 29 2C 44  |$(150),DS(150),D|
00000220: 42 28 31 35 30 29 2C 46  44 24 28 37 29 2C 46 53  |B(150),FD$(7),FS|
00000230: 24 28 31 29 2C 46 47 24  28 31 34 29 2C 49 42 24  |$(1),FG$(14),IB$|
00000240: 28 32 35 36 29 00 51 0A  B4 00 86 52 24 28 32 30  |(256).Q....R$(20|
00000250: 29 00 6A 0A B9 00 81 20  46 B2 30 20 A4 20 37 3A  |).j.... F.0 . 7:|
00000260: 87 20 46 44 24 28 46 29  3A 82 00 90 0A BE 00 83  |. FD$(F):.......|
00000270: 20 44 45 4C 2C 53 45 51  2C 50 52 47 2C 55 53 52  | DEL,SEQ,PRG,USR|
00000280: 2C 52 45 4C 2C 3F 3F 3F  2C 3F 3F 3F 2C 3F 3F 3F  |,REL,???,???,???|
00000290: 00 B7 0A C3 00 46 53 24  28 30 29 B2 22 53 45 51  |.....FS$(0)."SEQ|
000002A0: 55 45 4E 54 49 45 4C 4C  22 3A 46 53 24 28 31 29  |UENTIELL":FS$(1)|
000002B0: B2 22 56 4C 49 52 22 00  D1 0A C8 00 81 20 46 B2  |."VLIR"...... F.|
000002C0: 30 20 A4 20 31 34 3A 87  20 46 47 24 28 46 29 3A  |0 . 14:. FG$(F):|
000002D0: 82 00 18 0B CD 00 83 20  22 43 3D 20 50 52 47 22  |....... "C= PRG"|
000002E0: 2C 22 42 41 53 49 43 2D  50 52 4F 47 52 41 4D 4D  |,"BASIC-PROGRAMM|
000002F0: 22 2C 41 53 53 45 4D 42  4C 45 52 50 52 4F 47 2E  |",ASSEMBLERPROG.|
00000300: 2C 52 45 49 4E 45 20 44  41 54 45 4E 2C 53 59 53  |,REINE DATEN,SYS|
00000310: 54 45 4D 44 41 54 45 49  00 59 0B D2 00 83 20 48  |TEMDATEI.Y.... H|
00000320: 49 4C 46 53 50 52 4F 47  52 41 4D 4D 2C 41 4E 57  |ILFSPROGRAMM,ANW|
00000330: 45 4E 44 55 4E 47 2C 44  4F 4B 55 4D 45 4E 54 2C  |ENDUNG,DOKUMENT,|
00000340: 53 43 48 52 49 46 54 41  52 54 2C 44 52 55 43 4B  |SCHRIFTART,DRUCK|
00000350: 45 52 54 52 45 49 42 45  52 00 A5 0B D7 00 83 20  |ERTREIBER...... |
00000360: 45 49 4E 47 41 42 45 54  52 45 49 42 45 52 2C 44  |EINGABETREIBER,D|
00000370: 49 53 4B 2D 54 52 45 49  42 45 52 2C 53 54 41 52  |ISK-TREIBER,STAR|
00000380: 54 50 52 4F 47 52 41 4D  4D 2C 54 45 4D 50 4F 52  |TPROGRAMM,TEMPOR|
00000390: 41 45 52 2C 53 45 4C 42  53 54 41 55 53 46 55 45  |AER,SELBSTAUSFUE|
000003A0: 48 52 45 4E 44 00 AF 0B  DC 00 89 20 33 32 35 00  |HREND...... 325.|
000003B0: B9 0B E1 00 8F 20 53 55  42 00 D1 0B E6 00 97 38  |..... SUB......8|
000003C0: 30 36 2C 32 30 32 3A 97  38 30 37 2C 32 34 31 3A  |06,202:.807,241:|
000003D0: 8E 00 F1 0B EB 00 44 53  B2 31 3A 50 B2 31 3A 9F  |......DS.1:P.1:.|
000003E0: 31 2C 38 2C 31 35 3A 9F  32 2C 38 2C 32 2C 22 23  |1,8,15:.2,8,2,"#|
000003F0: 22 00 07 0C F0 00 98 31  2C 22 55 31 20 32 20 30  |"......1,"U1 2 0|
00000400: 20 31 38 22 3B 44 53 00  28 0C F5 00 A1 23 32 2C  | 18";DS.(....#2,|
00000410: 4E 54 24 3A A1 23 32 2C  4E 53 24 3A 4E 54 24 B2  |NT$:.#2,NS$:NT$.|
00000420: 4E 54 24 AA C7 28 30 29  00 44 0C FA 00 81 49 B2  |NT$..(0).D....I.|
00000430: 30 A4 37 3A 8B 20 50 B1  31 20 A7 20 99 22 13 22  |0.7:. P.1 . ."."|
00000440: 3B 50 AB 31 00 5A 0C FF  00 98 31 2C 22 42 2D 50  |;P.1.Z....1,"B-P|
00000450: 20 32 22 3B 49 AC 33 32  AA 32 00 8C 0C 04 01 A1  | 2";I.32.2......|
00000460: 23 32 2C 54 59 24 3A 54  59 24 B2 54 59 24 AA C7  |#2,TY$:TY$.TY$..|
00000470: 28 30 29 3A 8B 54 59 24  B2 C7 28 30 29 B0 54 59  |(0):.TY$..(0).TY|
00000480: 24 B2 C7 28 31 32 38 29  A7 32 38 30 00 A2 0C 09  |$..(128).280....|
00000490: 01 98 31 2C 22 42 2D 50  20 32 22 3B 49 AC 33 32  |..1,"B-P 2";I.32|
000004A0: AA 35 00 DA 0C 0E 01 81  4A B2 31 A4 31 36 3A A1  |.5......J.1.16:.|
000004B0: 23 32 2C 41 24 3A 44 24  28 50 29 B2 44 24 28 50  |#2,A$:D$(P).D$(P|
000004C0: 29 AA 41 24 3A 82 3A 44  53 28 50 29 B2 44 53 3A  |).A$:.:DS(P).DS:|
000004D0: 44 42 28 50 29 B2 49 AC  33 32 00 0E 0D 13 01 A1  |DB(P).I.32......|
000004E0: 23 32 2C 54 24 3A A1 23  32 2C 53 24 3A 54 24 28  |#2,T$:.#2,S$:T$(|
000004F0: 50 29 B2 54 24 AA C7 28  30 29 3A 53 24 28 50 29  |P).T$..(0):S$(P)|
00000500: B2 53 24 AA C7 28 30 29  3A 50 B2 50 AA 31 00 1F  |.S$..(0):P.P.1..|
00000510: 0D 18 01 82 3A 8B 50 B1  31 34 39 A7 32 39 30 00  |....:.P.149.290.|
00000520: 3D 0D 1D 01 8B 4E 54 24  B3 B1 C7 28 30 29 A7 44  |=....NT$...(0).D|
00000530: 53 B2 C6 28 4E 53 24 29  3A 89 32 34 30 00 4F 0D  |S..(NS$):.240.O.|
00000540: 22 01 A0 32 3A A0 31 3A  50 B2 50 AB 31 3A 8E 00  |"..2:.1:P.P.1:..|
00000550: 66 0D 27 01 9F 31 2C 38  2C 31 35 3A 9F 32 2C 38  |f.'..1,8,15:.2,8|
00000560: 2C 32 2C 22 23 22 00 7B  0D 2C 01 98 31 2C 22 55  |,2,"#".{.,..1,"U|
00000570: 31 20 32 20 30 20 31 38  20 30 22 00 94 0D 31 01  |1 2 0 18 0"...1.|
00000580: 98 31 2C 22 42 2D 50 20  32 20 31 37 33 22 3A 49  |.1,"B-P 2 173":I|
00000590: 24 B2 22 22 00 B2 0D 36  01 81 49 B2 31 A4 31 36  |$.""...6..I.1.16|
000005A0: 3A A1 23 32 2C 41 24 3A  49 24 B2 49 24 AA 41 24  |:.#2,A$:I$.I$.A$|
000005B0: 3A 82 00 BE 0D 3B 01 A0  32 3A A0 31 3A 8E 00 C4  |:....;..2:.1:...|
000005C0: 0D 40 01 3A 00 E0 0D 45  01 8F 20 2A 2A 2A 20 48  |.@.:...E.. *** H|
000005D0: 41 55 50 54 50 52 4F 47  52 41 4D 4D 20 2A 2A 2A  |AUPTPROGRAMM ***|
000005E0: 00 E6 0D 4A 01 3A 00 1A  0E 4F 01 99 22 93 11 12  |...J.:...O.."...|
000005F0: 47 45 4F C3 48 45 43 4B  20 20 54 45 49 4C 20 32  |GEO.HECK  TEIL 2|
00000600: 20 28 43 48 45 43 4B 20  53 43 52 41 50 20 45 52  | (CHECK SCRAP ER|
00000610: 53 54 45 4C 4C 45 4E 29  92 22 00 4A 0E 54 01 99  |STELLEN).".J.T..|
00000620: 3A 99 22 20 56 4F 4E 20  C6 4C 4F 52 49 41 4E 20  |:." VON .LORIAN |
00000630: CD 55 45 4C 4C 45 52 20  28 CD 41 52 4B 54 20 26  |.UELLER (.ARKT &|
00000640: 20 D4 45 43 48 4E 49 4B  29 22 00 96 0E 59 01 99  | .ECHNIK)"...Y..|
00000650: 22 20 41 55 54 4F 52 20  56 4F 4E 20 27 43 36 34  |" AUTOR VON 'C64|
00000660: 20 2D 20 41 4C 4C 45 53  20 55 45 42 45 52 20 47  | - ALLES UEBER G|
00000670: 45 4F 53 20 31 2E 32 27  20 20 55 4E 44 20 27 43  |EOS 1.2'  UND 'C|
00000680: 36 34 20 2D 20 47 45 4F  53 20 31 2E 33 20 44 45  |64 - GEOS 1.3 DE|
00000690: 55 54 53 43 48 27 00 DC  0E 5E 01 99 22 11 11 11  |UTSCH'...^.."...|
000006A0: 11 20 C2 49 54 54 45 20  45 49 4E 45 20 C7 C5 CF  |. .ITTE EINE ...|
000006B0: D3 2D C4 49 53 4B 45 54  54 45 20 45 49 4E 4C 45  |.-.ISKETTE EINLE|
000006C0: 47 45 4E 20 55 4E 44 20  20 20 3C D2 C5 D4 D5 D2  |GEN UND   <.....|
000006D0: CE 3E 20 44 52 55 45 43  4B 45 4E 22 00 F3 0E 63  |.> DRUECKEN"...c|
000006E0: 01 97 35 33 32 39 36 2C  30 3A 97 35 33 32 36 35  |..53296,0:.53265|
000006F0: 2C 32 37 00 0A 0F 68 01  A1 41 24 3A 8B 41 24 B3  |,27...h..A$:.A$.|
00000700: B1 C7 28 31 33 29 A7 33  36 30 00 25 0F 6D 01 8D  |..(13).360.%.m..|
00000710: 32 32 35 3A 8D 32 39 35  3A 8B 49 24 B3 B1 4D 24  |225:.295:.I$..M$|
00000720: A7 20 33 35 30 00 5F 0F  72 01 99 22 93 11 11 11  |. 350._.r.."....|
00000730: 11 11 11 11 12 20 20 20  20 20 20 20 20 20 C4 49  |.....         .I|
00000740: 52 45 43 54 4F 52 59 20  57 49 52 44 20 47 45 4C  |RECTORY WIRD GEL|
00000750: 45 53 45 4E 2E 20 20 20  20 20 20 20 20 92 22 00  |ESEN.        .".|
00000760: 90 0F 77 01 99 22 13 20  20 20 20 5F 20 C1 4E 5A  |..w..".    _ .NZ|
00000770: 41 48 4C 20 44 45 52 20  47 45 4C 45 53 45 4E 45  |AHL DER GELESENE|
00000780: 4E 20 C6 49 4C 45 45 49  4E 54 52 41 45 47 45 22  |N .ILEEINTRAEGE"|
00000790: 00 9D 0F 7C 01 8D 32 33  35 3A 4F B2 31 00 A3 0F  |...|..235:O.1...|
000007A0: 81 01 3A 00 A9 0F 86 01  3A 00 DC 0F 8B 01 99 22  |..:.....:......"|
000007B0: 93 11 12 20 20 20 20 20  C6 49 4C 45 20 5A 55 52  |...     .ILE ZUR|
000007C0: 20 C2 45 41 52 42 45 49  54 55 4E 47 20 41 55 53  | .EARBEITUNG AUS|
000007D0: 57 41 45 48 4C 45 4E 20  20 20 20 22 00 13 10 90  |WAEHLEN    "....|
000007E0: 01 99 22 11 11 20 C4 49  53 4B 20 45 4E 54 48 41  |..".. .ISK ENTHA|
000007F0: 45 4C 54 20 12 22 3B 50  3B 22 9D 20 92 20 C6 49  |ELT .";P;". . .I|
00000800: 4C 45 22 3B 3A 8B B5 28  50 29 B3 B1 31 A7 99 22  |LE";:..(P)..1.."|
00000810: 53 22 3B 00 1C 10 95 01  99 22 2E 22 00 63 10 9A  |S";......".".c..|
00000820: 01 99 22 11 11 20 12 C3  D5 D2 D3 CF D2 20 D5 D0  |..".. ....... ..|
00000830: 92 20 20 20 20 31 20 C6  49 4C 45 20 5A 55 52 55  |.    1 .ILE ZURU|
00000840: 45 43 4B 22 3A 99 22 11  20 12 C3 D5 D2 D3 CF D2  |ECK":.". .......|
00000850: 20 C4 CF D7 CE 92 20 20  31 20 C6 49 4C 45 20 56  | .....  1 .ILE V|
00000860: 4F 52 22 00 A9 10 9F 01  99 22 11 20 12 D2 C5 D4  |OR"......". ....|
00000870: D5 D2 CE 92 20 20 20 20  20 20 20 C6 49 4C 45 20  |....       .ILE |
00000880: 4E 45 48 4D 45 4E 22 3A  99 22 11 20 12 C6 31 92  |NEHMEN":.". ..1.|
00000890: 20 20 20 20 20 20 20 20  20 20 20 CE 45 55 45 20  |           .EUE |
000008A0: C4 49 53 4B 45 54 54 45  22 00 E7 10 A4 01 9E 34  |.ISKETTE"......4|
000008B0: 39 31 35 32 3A 99 22 13  11 11 11 11 11 11 11 11  |9152:.".........|
000008C0: 11 11 11 11 11 11 11 11  11 22 3B 43 24 3A 99 22  |.........";C$:."|
000008D0: 91 C6 49 4C 45 20 23 22  3B 4F 3B 22 3A 20 20 20  |..ILE #";O;":   |
000008E0: 22 3B 44 24 28 4F 29 00  FA 10 A9 01 A1 41 24 3A  |";D$(O)......A$:|
000008F0: 8B 41 24 B2 22 22 A7 34  32 35 00 15 11 AE 01 8B  |.A$."".425......|
00000900: 41 24 B2 22 91 22 A7 4F  B2 4F AB 31 3A 8B 4F B2  |A$.".".O.O.1:.O.|
00000910: 30 A7 4F B2 50 00 30 11  B3 01 8B 41 24 B2 22 11  |0.O.P.0....A$.".|
00000920: 22 A7 4F B2 4F AA 31 3A  8B 4F B1 50 A7 4F B2 31  |".O.O.1:.O.P.O.1|
00000930: 00 41 11 B8 01 8B 41 24  B2 22 85 22 A7 8A 31 33  |.A....A$."."..13|
00000940: 35 00 54 11 BD 01 8B 41  24 B3 B1 C7 28 31 33 29  |5.T....A$...(13)|
00000950: A7 34 32 30 00 70 11 C2  01 8B 54 24 28 4F 29 B3  |.420.p....T$(O).|
00000960: B1 C7 28 30 29 A7 99 3A  99 3A 99 3A 89 34 38 30  |..(0)..:.:.:.480|
00000970: 00 89 11 C7 01 99 22 93  CB 45 49 4E 20 C7 C5 CF  |......"..EIN ...|
00000980: D3 2D C6 49 4C 45 20 21  22 00 8F 11 CC 01 99 00  |.-.ILE !".......|
00000990: A1 11 D1 01 99 22 11 11  3C D2 C5 D4 D5 D2 CE 3E  |....."..<......>|
000009A0: 22 00 B8 11 D6 01 A1 41  24 3A 8B 41 24 B3 B1 C7  |"......A$:.A$...|
000009B0: 28 31 33 29 A7 34 37 30  00 C2 11 DB 01 89 20 33  |(13).470...... 3|
000009C0: 39 35 00 C8 11 E0 01 3A  00 D6 11 E5 01 4E 24 B2  |95.....:.....N$.|
000009D0: 22 22 3A 49 B2 31 00 F6  11 EA 01 8B 20 CA 28 44  |"":I.1...... .(D|
000009E0: 24 28 4F 29 2C 49 2C 31  29 B2 C7 28 31 36 30 29  |$(O),I,1)..(160)|
000009F0: 20 A7 20 35 30 30 00 21  12 EF 01 4E 24 B2 4E 24  | . 500.!...N$.N$|
00000A00: AA CA 28 44 24 28 4F 29  2C 49 2C 31 29 3A 49 B2  |..(D$(O),I,1):I.|
00000A10: 49 AA 31 3A 8B 20 49 B3  B2 31 36 20 A7 20 34 39  |I.1:. I..16 . 49|
00000A20: 30 00 31 12 F4 01 46 45  24 B2 22 22 3A 8D 32 32  |0.1...FE$."":.22|
00000A30: 35 00 4E 12 F9 01 9F 20  31 2C 38 2C 31 35 2C 22  |5.N.... 1,8,15,"|
00000A40: 49 22 3A 9F 20 32 2C 38  2C 32 2C 22 23 22 00 67  |I":. 2,8,2,"#".g|
00000A50: 12 FE 01 98 31 2C 22 55  31 20 32 20 30 20 31 38  |....1,"U1 2 0 18|
00000A60: 22 3B 44 53 28 4F 29 00  7C 12 03 02 98 31 2C 22  |";DS(O).|....1,"|
00000A70: 42 2D 50 20 32 22 3B 44  42 28 4F 29 00 8B 12 08  |B-P 2";DB(O)....|
00000A80: 02 81 20 46 B2 31 20 A4  20 33 32 00 A9 12 0D 02  |.. F.1 . 32.....|
00000A90: 3A A1 23 32 2C 41 24 3A  8B 20 41 24 B2 22 22 20  |:.#2,A$:. A$."" |
00000AA0: A7 20 41 24 B2 C7 28 30  29 00 B9 12 12 02 3A 46  |. A$..(0).....:F|
00000AB0: 45 24 B2 46 45 24 AA 41  24 00 BF 12 17 02 82 00  |E$.FE$.A$.......|
00000AC0: C9 12 1C 02 A0 31 3A A0  32 00 E4 12 21 02 49 54  |.....1:.2...!.IT|
00000AD0: B2 C6 28 CA 28 46 45 24  2C 32 32 2C 31 29 AA C7  |..(.(FE$,22,1)..|
00000AE0: 28 30 29 29 00 FF 12 26  02 49 53 B2 C6 28 CA 28  |(0))...&.IS..(.(|
00000AF0: 46 45 24 2C 32 33 2C 31  29 AA C7 28 30 29 29 00  |FE$,23,1)..(0)).|
00000B00: 1A 13 2B 02 46 47 B2 C6  28 CA 28 46 45 24 2C 32  |..+.FG..(.(FE$,2|
00000B10: 35 2C 31 29 AA C7 28 30  29 29 00 35 13 30 02 44  |5,1)..(0)).5.0.D|
00000B20: 59 B2 C6 28 CA 28 46 45  24 2C 32 36 2C 31 29 AA  |Y..(.(FE$,26,1).|
00000B30: C7 28 30 29 29 00 50 13  35 02 44 4D B2 C6 28 CA  |.(0)).P.5.DM..(.|
00000B40: 28 46 45 24 2C 32 37 2C  31 29 AA C7 28 30 29 29  |(FE$,27,1)..(0))|
00000B50: 00 6B 13 3A 02 44 44 B2  C6 28 CA 28 46 45 24 2C  |.k.:.DD..(.(FE$,|
00000B60: 32 38 2C 31 29 AA C7 28  30 29 29 00 86 13 3F 02  |28,1)..(0))...?.|
00000B70: 44 48 B2 C6 28 CA 28 46  45 24 2C 32 39 2C 31 29  |DH..(.(FE$,29,1)|
00000B80: AA C7 28 30 29 29 00 A1  13 44 02 4D 49 B2 C6 28  |..(0))...D.MI..(|
00000B90: CA 28 46 45 24 2C 33 30  2C 31 29 AA C7 28 30 29  |.(FE$,30,1)..(0)|
00000BA0: 29 00 B9 13 49 02 99 20  22 46 49 4C 45 45 49 4E  |)...I.. "FILEEIN|
00000BB0: 54 52 41 47 20 23 22 3B  4F 00 E5 13 4E 02 99 20  |TRAG #";O...N.. |
00000BC0: 22 46 49 4C 45 45 49 4E  54 52 41 47 20 41 55 46  |"FILEEINTRAG AUF|
00000BD0: 20 53 50 55 52 20 31 38  2F 42 4C 4F 43 4B 22 3B  | SPUR 18/BLOCK";|
00000BE0: 44 53 28 4F 29 00 11 14  53 02 99 20 22 49 4E 46  |DS(O)...S.. "INF|
00000BF0: 4F 2D 42 4C 4F 43 4B 20  41 55 46 20 53 50 55 52  |O-BLOCK AUF SPUR|
00000C00: 22 3B 49 54 3B 22 2F 53  45 4B 54 4F 52 22 3B 49  |";IT;"/SEKTOR";I|
00000C10: 53 00 2E 14 58 02 99 20  22 47 45 4F 53 2D 46 49  |S...X.. "GEOS-FI|
00000C20: 4C 45 54 59 50 3A 20 20  20 20 20 20 22 3B 00 53  |LETYP:      ";.S|
00000C30: 14 5D 02 8B 20 46 47 B1  31 34 20 A7 20 99 20 22  |.].. FG.14 . . "|
00000C40: 46 55 45 48 52 54 20 5A  55 20 41 42 53 54 55 52  |FUEHRT ZU ABSTUR|
00000C50: 5A 22 3B 00 6D 14 62 02  8B 20 46 47 B3 B2 31 34  |Z";.m.b.. FG..14|
00000C60: 20 A7 20 99 20 46 47 24  28 46 47 29 3B 00 7F 14  | . . FG$(FG);...|
00000C70: 67 02 99 20 22 20 28 22  3B 46 47 3B 22 29 22 00  |g.. " (";FG;")".|
00000C80: A7 14 6C 02 99 20 22 44  41 54 55 4D 20 44 45 52  |..l.. "DATUM DER|
00000C90: 20 4C 45 54 5A 54 45 4E  20 4D 4F 44 49 46 49 4B  | LETZTEN MODIFIK|
00000CA0: 41 54 49 4F 4E 3A 22 00  DC 14 71 02 99 20 C9 28  |ATION:"...q.. .(|
00000CB0: C4 28 44 44 AA 31 30 30  29 2C 32 29 3B 22 2E 22  |.(DD.100),2);"."|
00000CC0: 3B C9 28 C4 28 44 4D AA  31 30 30 29 2C 32 29 3B  |;.(.(DM.100),2);|
00000CD0: 22 2E 22 3B 44 59 AA 31  39 30 30 3B 00 0B 15 76  |".";DY.1900;...v|
00000CE0: 02 99 20 22 20 20 20 20  22 3B C9 28 C4 28 44 48  |.. "    ";.(.(DH|
00000CF0: AA 31 30 30 29 2C 32 29  3B 22 2E 22 3B C9 28 C4  |.100),2);".";.(.|
00000D00: 28 4D 49 AA 31 30 30 29  2C 32 29 00 14 15 7B 02  |(MI.100),2)...{.|
00000D10: 8D 32 32 35 00 45 15 80  02 99 3A 99 3A 99 22 4E  |.225.E....:.:."N|
00000D20: 55 4E 20 57 49 52 44 20  44 45 52 20 49 4E 46 4F  |UN WIRD DER INFO|
00000D30: 2D 42 4C 4F 43 4B 20 45  49 4E 47 45 4C 45 53 45  |-BLOCK EINGELESE|
00000D40: 4E 2E 22 3A 99 00 4B 15  85 02 3A 00 68 15 8A 02  |N.":..K...:.h...|
00000D50: 9F 20 31 2C 38 2C 31 35  2C 22 49 22 3A 9F 20 32  |. 1,8,15,"I":. 2|
00000D60: 2C 38 2C 32 2C 22 23 22  00 7E 15 8F 02 98 31 2C  |,8,2,"#".~....1,|
00000D70: 22 55 31 20 32 20 30 22  3B 49 54 3B 49 53 00 8F  |"U1 2 0";IT;IS..|
00000D80: 15 94 02 98 31 2C 22 42  2D 50 20 32 20 30 22 00  |....1,"B-P 2 0".|
00000D90: 95 15 99 02 3A 00 A5 15  9E 02 81 20 46 B2 31 20  |....:...... F.1 |
00000DA0: A4 20 32 35 36 00 C2 15  A3 02 A1 23 32 2C 41 24  |. 256......#2,A$|
00000DB0: 3A 8B 20 41 24 B2 22 22  20 A7 20 41 24 B2 C7 28  |:. A$."" . A$..(|
00000DC0: 30 29 00 D0 15 A8 02 49  42 24 28 46 29 B2 41 24  |0).....IB$(F).A$|
00000DD0: 00 D6 15 AD 02 82 00 DC  15 B2 02 3A 00 E6 15 B7  |...........:....|
00000DE0: 02 A0 31 3A A0 32 00 EC  15 BC 02 3A 00 14 16 BD  |..1:.2.....:....|
00000DF0: 02 9F 31 2C 38 2C 30 2C  44 24 28 4F 29 AA 22 2C  |..1,8,0,D$(O).",|
00000E00: 50 2C 52 22 3A A1 20 23  31 2C 42 31 24 2C 42 32  |P,R":. #1,B1$,B2|
00000E10: 24 3A A0 31 00 2C 16 BE  02 8B 20 42 31 24 B2 22  |$:.1.,.... B1$."|
00000E20: 22 20 A7 20 42 31 24 B2  C7 28 30 29 00 44 16 BF  |" . B1$..(0).D..|
00000E30: 02 8B 20 42 32 24 B2 22  22 20 A7 20 42 32 24 B2  |.. B2$."" . B2$.|
00000E40: C7 28 30 29 00 6C 16 C0  02 99 22 42 59 54 45 20  |.(0).l...."BYTE |
00000E50: 23 31 3A 22 C6 28 42 31  24 29 3A 99 22 42 59 54  |#1:".(B1$):."BYT|
00000E60: 45 20 23 32 3A 22 C6 28  42 32 24 29 00 91 16 C1  |E #2:".(B2$)....|
00000E70: 02 8F 20 2A 2A 2A 20 49  4E 46 4F 2D 42 4C 4F 43  |.. *** INFO-BLOC|
00000E80: 4B 20 53 54 45 48 54 20  4A 45 54 5A 54 20 2A 2A  |K STEHT JETZT **|
00000E90: 2A 00 B6 16 C6 02 8F 20  2A 2A 2A 20 20 20 20 20  |*...... ***     |
00000EA0: 49 4D 20 41 52 52 41 59  20 49 42 24 28 29 20 20  |IM ARRAY IB$()  |
00000EB0: 20 20 20 2A 2A 2A 00 BC  16 CB 02 3A 00 C2 16 D0  |   ***.....:....|
00000EC0: 02 3A 00 E5 16 D5 02 8F  20 2A 2A 2A 20 41 42 4C  |.:...... *** ABL|
00000ED0: 45 47 45 4E 20 44 45 52  20 45 49 4E 47 45 4C 45  |EGEN DER EINGELE|
00000EE0: 53 45 4E 45 4E 00 0A 17  DA 02 8F 20 2A 2A 2A 20  |SENEN...... *** |
00000EF0: 44 41 54 45 4E 20 49 4E  20 45 49 4E 45 4D 20 43  |DATEN IN EINEM C|
00000F00: 48 45 43 4B 20 53 43 52  41 50 00 10 17 DF 02 3A  |HECK SCRAP.....:|
00000F10: 00 3E 17 E4 02 99 22 11  11 C2 49 54 54 45 20 4E  |.>...."...ITTE N|
00000F20: 55 4E 20 45 49 4E 45 20  DA 49 45 4C 44 49 53 4B  |UN EINE .IELDISK|
00000F30: 45 54 54 45 20 46 55 45  52 20 44 41 53 22 00 6D  |ETTE FUER DAS".m|
00000F40: 17 E9 02 99 22 11 47 45  4F C3 48 45 43 4B 2D C6  |....".GEO.HECK-.|
00000F50: 49 4C 45 20 45 49 4E 4C  45 47 45 4E 2E 20 C4 49  |ILE EINLEGEN. .I|
00000F60: 45 53 45 20 C4 49 53 4B  45 54 54 45 22 00 9B 17  |ESE .ISKETTE"...|
00000F70: EE 02 99 22 11 4D 55 53  53 20 4E 49 43 48 54 20  |...".MUSS NICHT |
00000F80: 44 41 53 20 C7 C5 CF D3  2D C6 4F 52 4D 41 54 20  |DAS ....-.ORMAT |
00000F90: 41 55 46 57 45 49 53 45  4E 2E 22 00 A1 17 F3 02  |AUFWEISEN.".....|
00000FA0: 3A 00 B3 17 F8 02 99 22  11 11 12 3C 53 48 49 46  |:......"...<SHIF|
00000FB0: 54 3E 22 00 C5 17 FD 02  97 36 35 33 2C 30 3A 92  |T>"......653,0:.|
00000FC0: 36 35 33 2C 31 00 E1 17  02 03 9F 31 2C 38 2C 31  |653,1......1,8,1|
00000FD0: 35 2C 22 53 3A 43 48 45  43 4B 20 53 43 52 41 50  |5,"S:CHECK SCRAP|
00000FE0: 22 00 02 18 07 03 84 31  2C 41 2C 41 24 2C 42 2C  |"......1,A,A$,B,|
00000FF0: 43 3A 99 22 44 49 53 4B  3A 22 41 3B 41 24 3B 42  |C:."DISK:"A;A$;B|
00001000: 3B 43 00 14 18 0C 03 A0  31 3A 8B 20 41 B1 31 39  |;C......1:. A.19|
00001010: 20 A7 20 90 00 34 18 11  03 A0 31 3A 9F 32 2C 38  | . ..4....1:.2,8|
00001020: 2C 32 2C 22 43 48 45 43  4B 20 53 43 52 41 50 2C  |,2,"CHECK SCRAP,|
00001030: 50 2C 57 22 00 5B 18 16  03 98 32 2C C7 28 46 47  |P,W".[....2,.(FG|
00001040: 29 C7 28 44 59 29 C7 28  44 4D 29 C7 28 44 44 29  |).(DY).(DM).(DD)|
00001050: C7 28 44 48 29 C7 28 4D  49 29 3B 00 73 18 17 03  |.(DH).(MI);.s...|
00001060: 8B 20 42 31 24 B2 22 22  20 A7 20 42 31 24 B2 C7  |. B1$."" . B1$..|
00001070: 28 30 29 00 8B 18 18 03  8B 20 42 32 24 B2 22 22  |(0)...... B2$.""|
00001080: 20 A7 20 42 32 24 B2 C7  28 30 29 00 9B 18 19 03  | . B2$..(0).....|
00001090: 98 32 2C 42 31 24 3B 42  32 24 3B 00 B8 18 1B 03  |.2,B1$;B2$;.....|
000010A0: 81 20 46 B2 31 20 A4 20  32 35 36 3A 98 32 2C 49  |. F.1 . 256:.2,I|
000010B0: 42 24 28 46 29 3B 3A 82  00 BF 18 20 03 A0 32 00  |B$(F);:.... ..2.|
000010C0: EB 18 25 03 99 22 53 43  48 52 45 49 42 56 4F 52  |..%.."SCHREIBVOR|
000010D0: 47 41 4E 47 20 41 42 47  45 53 43 48 4C 4F 53 53  |GANG ABGESCHLOSS|
000010E0: 45 4E 2E 22 3A 8D 32 32  35 3A 80 00 00 00        |EN.":.225:....  |

....D.. *** GEOCHECK - PT 2 ***.=.I.. **
* FLORIAN MUELLER ***.C.N.....S.. BASED 
ON THE PROGRAM "GEOS FILE-ANALYZER" (C=-
BUCH "ALLES UEBER GEOS")...X.:...}.:....
..:. F.49152 . 49189:. X:.F,X:..K.... 49
152...... 169 ,11, 160, 192, 141, 38, 3,
 140, 39......3, 96, 201, 65, 144.Y....9
,201,91,176,5,73 ,32, 76, 202, 241,201,9
7,144,249,201,123,176,245.S....73,32,76,
202,241,255... ..".":C$." ":.F.1.6:C$.C$
.C$:......SS$.G(160):.F.1.4:SS$.SS$.SS$:
......M$."GEOS ".G(102).G(111).G(114).G(
109).G(97).G(116)." V1.0".E....D$(150),T
$(150),S$(150),DS(150),DB(150),FD$(7),FS
$(1),FG$(14),IB$(256).Q....R$(20).J.... 
F.0 . 7:. FD$(F):....... DEL,SEQ,PRG,USR
,REL,???,???,???...C.FS$(0)."SEQUENTIELL
":FS$(1)."VLIR".Q.H.. F.0 . 14:. FG$(F):
....M.. "C= PRG","BASIC-PROGRAMM",ASSEMB
LERPROG.,REINE DATEN,SYSTEMDATEI.Y.R.. H
ILFSPROGRAMM,ANWENDUNG,DOKUMENT,SCHRIFTA
RT,DRUCKERTREIBER...W.. EINGABETREIBER,D
ISK-TREIBER,STARTPROGRAMM,TEMPORAER,SELB
STAUSFUEHREND...... 325...... SUB.Q....8
06,202:.807,241:......DS.1:P.1:.1,8,15:.
2,8,2,"#"......1,"U1 2 0 18";DS.(....#2,
NT$:.#2,NS$:NT$.NT$.G(0).D....I.0.7:. P.
1 . .".";P.1.Z....1,"B-P 2";I.32.2......
#2,TY$:TY$.TY$.G(0):.TY$.G(0).TY$.G(128)
.280......1,"B-P 2";I.32.5.Z....J.1.16:.
#2,A$:D$(P).D$(P).A$:.:DS(P).DS:DB(P).I.
32......#2,T$:.#2,S$:T$(P).T$.G(0):S$(P)
.S$.G(0):P.P.1......:.P.149.290.=....NT$
..G(0).DS.F(NS$):.240.O.". 2: 1:P.P.1:..
F.'..1,8,15:.2,8,2,"#".{.,..1,"U1 2 0 18
 0"...1..1,"B-P 2 173":I$.""...6..I.1.16
:.#2,A$:I$.I$.A$:....;. 2: 1:..D.@.:...E
.. *** HAUPTPROGRAMM ***...J.:...O.."...
GEOCHECK  TEIL 2 (CHECK SCRAP ERSTELLEN)
.".J.T..:." VON FLORIAN MUELLER (MARKT &
 TECHNIK)"...Y.." AUTOR VON 'C64 - ALLES
 UEBER GEOS 1.2'  UND 'C64 - GEOS 1.3 DE
UTSCH'...^..".... BITTE EINE GEOS-DISKET
TE EINLEGEN UND   <RETURN> DRUECKEN"...C
..53296,0:.53265,27...H..A$:.A$..G(13).3
60.%.M..225:.295:.I$..M$. 350._.R.."....
.....         DIRECTORY WIRD GELESEN.   
     ."...W..".    _ ANZAHL DER GELESENE
N FILEEINTRAEGE"...|..235:O.1.....:.....
:......"...     FILE ZUR BEARBEITUNG AUS
WAEHLEN    "......".. DISK ENTHAELT .";P
;". . FILE";:..(P)..1.."S";......".".C..
..".. .CURSOR UP.    1 FILE ZURUECK":.".
 .CURSOR DOWN.  1 FILE VOR"......". .RET
URN.       FILE NEHMEN":.". .F1.        
   NEUE DISKETTE"......49152:.".........
.........";C$:.".FILE #";O;":   ";D$(O).
.....A$:.A$."".425......A$.".".O.O.1:.O.
0.O.P.0....A$.".".O.O.1:.O.P.O.1.A....A$
."."..135.T....A$..G(13).420.P.B..T$(O).
.G(0)..:.:.:.480...G..".KEIN GEOS-FILE !
"...L.....Q.."..<RETURN>"...V..A$:.A$..G
(13).470.B.... 395.H...:.V...N$."":I.1..
.... J(D$(O),I,1).G(160) . 500.!...N$.N$
.J(D$(O),I,1):I.I.1:. I..16 . 490.1...FE
$."":.225.N.... 1,8,15,"I":. 2,8,2,"#".G
....1,"U1 2 0 18";DS(O).|....1,"B-P 2";D
B(O)...... F.1 . 32.....:.#2,A$:. A$."" 
. A$.G(0).....:FE$.FE$.A$.......I... 1: 
2...!.IT.F(J(FE$,22,1).G(0))...&.IS.F(J(
FE$,23,1).G(0))...+.FG.F(J(FE$,25,1).G(0
)).5.0.DY.F(J(FE$,26,1).G(0)).P.5.DM.F(J
(FE$,27,1).G(0)).K.:.DD.F(J(FE$,28,1).G(
0))...?.DH.F(J(FE$,29,1).G(0))...D.MI.F(
J(FE$,30,1).G(0))...I.. "FILEEINTRAG #";
O...N.. "FILEEINTRAG AUF SPUR 18/BLOCK";
DS(O)...S.. "INFO-BLOCK AUF SPUR";IT;"/S
EKTOR";IS...X.. "GEOS-FILETYP:      ";.S
.].. FG.14 . . "FUEHRT ZU ABSTURZ";.M.B.
. FG..14 . . FG$(FG);..G.. " (";FG;")".
..L.. "DATUM DER LETZTEN MODIFIKATION:".
..Q.. I(D(DD.100),2);".";I(D(DM.100),2);
".";DY.1900;...V.. "    ";I(D(DH.100),2)
;".";I(D(MI.100),2)...{..225.E....:.:."N
UN WIRD DER INFO-BLOCK EINGELESEN.":..K.
..:.H.... 1,8,15,"I":. 2,8,2,"#".~....1,
"U1 2 0";IT;IS......1,"B-P 2 0".....:...
... F.1 . 256.B....#2,A$:. A$."" . A$.G(
0).P...IB$(F).A$.V.........:..... 1: 2..
...:......1,8,0,D$(O).",P,R":. #1,B1$,B2
$: 1.,.... B1$."" . B1$.G(0).D.... B2$."
" . B2$.G(0).L...."BYTE #1:"F(B1$):."BYT
E #2:"F(B2$)...A.. *** INFO-BLOCK STEHT 
JETZT ***...F.. ***     IM ARRAY IB$()  
   ***...K.:.B.P.:...U.. *** ABLEGEN DER
 EINGELESENEN...Z.. *** DATEN IN EINEM C
HECK SCRAP.....:.>...."..BITTE NUN EINE 
ZIELDISKETTE FUER DAS".M....".GEOCHECK-F
ILE EINLEGEN. DIESE DISKETTE"......".MUS
S NICHT DAS GEOS-FORMAT AUFWEISEN.".....
:......"...<SHIFT>".E....653,0:.653,1...
...1,8,15,"S:CHECK SCRAP"......1,A,A$,B,
C:."DISK:"A;A$;B;C..... 1:. A.19 . ..4..
. 1:.2,8,2,"CHECK SCRAP,P,W".[....2,G(FG
)G(DY)G(DM)G(DD)G(DH)G(MI);.S.... B1$.""
 . B1$.G(0)...... B2$."" . B2$.G(0).....
.2,B1$;B2$;...... F.1 . 256:.2,IB$(F);:.
... . 2...%.."SCHREIBVORGANG ABGESCHLOSS
EN.":.225:....

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL