GEOINFO V0.8
FILE INFORMATION
FILENAME(S): GEOINFO V0.8
FILE TYPE(S): PRG
FILE SIZE: 2.8K
FIRST SEEN: 2025-10-20 14:31:21
APPEARS ON: 3 disk(s)
FILE HASH
760a4d4449b69ccc2752e6b811430a83884435763c882a36174669bb5150f96d
FOUND ON DISKS (3 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| G PD 22 | GEOINFO V0.8 | PRG | Treasure Chest - Klaus Der Suhler | 27 | 10 | DOWNLOAD FILE |
| G H P B | GEOINFO V0.8 | PRG | DuncanTwain | 6 | 3 | DOWNLOAD FILE |
| G PD 22 | GEOINFO V0.8 | PRG | marcus | 27 | 10 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 27 08 64 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |..'.d..*********| 00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000020: 2A 2A 2A 2A 2A 2A 2A 00 4D 08 69 00 8F 2A 2A 2A |*******.M.i..***| 00000030: 20 20 20 20 20 20 20 47 45 4F 49 4E 46 4F 20 56 | GEOINFO V| 00000040: 30 2E 38 20 20 20 20 20 20 20 2A 2A 2A 00 73 08 |0.8 ***.s.| 00000050: 6E 00 8F 2A 2A 2A 20 20 57 52 49 54 54 45 4E 20 |n..*** WRITTEN | 00000060: 42 59 20 4D 49 4B 45 20 53 45 4C 4C 45 52 53 20 |BY MIKE SELLERS | 00000070: 2A 2A 2A 00 99 08 73 00 8F 2A 2A 2A 20 43 41 53 |***...s..*** CAS| 00000080: 54 4C 45 20 41 46 42 2C 43 41 20 20 31 33 20 4A |TLE AFB,CA 13 J| 00000090: 55 4E 20 38 37 20 2A 2A 2A 00 BF 08 78 00 8F 2A |UN 87 ***...x..*| 000000A0: 2A 2A 20 20 20 51 55 41 4E 54 55 4D 4C 49 4E 4B |** QUANTUMLINK| 000000B0: 20 28 4D 49 4B 35 35 29 20 20 20 20 2A 2A 2A 00 | (MIK55) ***.| 000000C0: E5 08 7D 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..}..***********| 000000D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000000E0: 2A 2A 2A 2A 2A 00 16 09 82 00 86 47 31 24 28 32 |*****......G1$(2| 000000F0: 30 29 3A 86 47 32 24 28 36 29 3A 97 35 33 32 38 |0):.G2$(6):.5328| 00000100: 30 2C 30 3A 97 35 33 32 38 31 2C 30 3A 97 35 33 |0,0:.53281,0:.53| 00000110: 32 37 32 2C 32 33 00 3F 09 87 00 81 20 49 B2 30 |272,23.?.... I.0| 00000120: A4 35 3A 87 46 54 24 28 49 29 3A 82 49 3A 81 49 |.5:.FT$(I):.I:.I| 00000130: B2 30 A4 35 3A 87 47 32 24 28 49 29 3A 82 49 00 |.0.5:.G2$(I):.I.| 00000140: 57 09 8C 00 81 20 49 B2 30 A4 31 39 3A 87 47 31 |W.... I.0.19:.G1| 00000150: 24 28 49 29 3A 82 49 00 68 09 8E 00 99 C7 28 31 |$(I):.I.h.....(1| 00000160: 34 29 C7 28 31 34 37 29 00 87 09 91 00 99 A6 31 |4).(147).......1| 00000170: 30 29 22 47 45 4F 49 4E 46 4F 20 56 30 2E 33 20 |0)"GEOINFO V0.3 | 00000180: 2D 20 31 35 34 31 22 00 A7 09 96 00 99 A6 31 30 |- 1541".......10| 00000190: 29 22 49 4E 53 45 52 54 20 44 49 53 4B 20 49 4E |)"INSERT DISK IN| 000001A0: 20 44 52 49 56 45 22 00 D9 09 9B 00 99 A6 38 29 | DRIVE".......8)| 000001B0: 22 50 52 45 53 53 20 22 C7 28 31 38 29 22 52 45 |"PRESS ".(18)"RE| 000001C0: 54 55 52 4E 22 C7 28 31 34 36 29 22 20 54 4F 20 |TURN".(146)" TO | 000001D0: 43 4F 4E 54 49 4E 55 45 22 00 EC 09 A0 00 A1 43 |CONTINUE"......C| 000001E0: 24 3A 8B 43 24 B2 22 22 A7 31 36 30 00 FF 09 A5 |$:.C$."".160....| 000001F0: 00 8B 43 24 B3 B1 C7 28 31 33 29 89 31 36 30 00 |..C$...(13).160.| 00000200: 33 0A AA 00 9F 31 35 2C 38 2C 31 35 2C 22 49 30 |3....15,8,15,"I0| 00000210: 22 3A 84 31 35 2C 45 4E 24 2C 45 4D 24 2C 45 54 |":.15,EN$,EM$,ET| 00000220: 24 2C 45 53 24 3A 8B 45 4E 24 B2 22 30 30 22 A7 |$,ES$:.EN$."00".| 00000230: 31 38 35 00 55 0A AF 00 99 45 4E 24 22 2C 20 22 |185.U....EN$", "| 00000240: 45 4D 24 22 2C 22 45 54 24 22 2C 22 45 53 24 3A |EM$","ET$","ES$:| 00000250: A0 31 35 3A 80 00 6C 0A B4 00 8F 2A 2A 2A 20 53 |.15:..l....*** S| 00000260: 54 41 52 54 20 50 52 4F 47 52 41 4D 00 A1 0A B9 |TART PROGRAM....| 00000270: 00 99 3A 99 3A 97 31 39 2C 33 32 3A 85 22 20 20 |..:.:.19,32:." | 00000280: 20 20 20 20 20 49 4E 50 55 54 20 49 4E 46 4F 52 | INPUT INFOR| 00000290: 4D 41 54 49 4F 4E 20 54 52 4B 20 20 22 3B 54 3A |MATION TRK ";T:| 000002A0: 99 00 C9 0A BE 00 85 22 20 20 20 20 20 20 20 49 |......." I| 000002B0: 4E 50 55 54 20 49 4E 46 4F 52 4D 41 54 49 4F 4E |NPUT INFORMATION| 000002C0: 20 53 45 43 20 20 22 3B 53 00 ED 0A C3 00 81 49 | SEC ";S......I| 000002D0: B2 30 A4 33 3A 99 3A 82 49 3A 99 A6 31 36 29 C7 |.0.3:.:.I:..16).| 000002E0: 28 32 38 29 22 57 41 49 54 2E 2E 2E 22 00 22 0B |(28)"WAIT...".".| 000002F0: C8 00 9F 34 2C 33 3A 3A 9F 32 2C 38 2C 32 2C 22 |...4,3::.2,8,2,"| 00000300: 23 22 3A 98 31 35 2C 22 55 31 22 3B 32 3B 30 3B |#":.15,"U1";2;0;| 00000310: 54 3B 53 3A 98 31 35 2C 22 42 2D 50 22 3B 32 3B |T;S:.15,"B-P";2;| 00000320: 36 38 00 49 0B CD 00 A1 23 32 2C 42 24 3A 46 54 |68.I....#2,B$:FT| 00000330: B2 C6 28 42 24 AA C7 28 30 29 29 3A 46 54 24 B2 |..(B$..(0)):FT$.| 00000340: 46 54 24 28 37 AF 46 54 29 00 6E 0B D2 00 A1 23 |FT$(7.FT).n....#| 00000350: 32 2C 42 24 3A 47 31 B2 C6 28 42 24 AA C7 28 30 |2,B$:G1..(B$..(0| 00000360: 29 29 3A 47 31 24 B2 47 31 24 28 47 31 29 00 93 |)):G1$.G1$(G1)..| 00000370: 0B D7 00 A1 23 32 2C 42 24 3A 47 32 B2 C6 28 42 |....#2,B$:G2..(B| 00000380: 24 AA C7 28 30 29 29 3A 47 32 24 B2 47 32 24 28 |$..(0)):G2$.G2$(| 00000390: 47 32 29 00 AA 0B DC 00 81 49 B2 37 31 A4 37 36 |G2)......I.71.76| 000003A0: 3A A1 23 32 2C 42 24 3A 82 49 00 C3 0B E1 00 5A |:.#2,B$:.I.....Z| 000003B0: 5A B2 30 3A 81 49 B2 37 37 A4 39 36 3A A1 23 32 |Z.0:.I.77.96:.#2| 000003C0: 2C 42 24 00 CD 0B E6 00 8D 35 36 35 20 00 DE 0B |,B$......565 ...| 000003D0: EB 00 8B 20 41 B2 30 20 A7 20 5A 5A B2 31 00 EF |... A.0 . ZZ.1..| 000003E0: 0B F0 00 8B 20 5A 5A B2 31 20 A7 32 35 30 20 00 |.... ZZ.1 .250 .| 000003F0: 00 0C F5 00 47 33 24 B2 47 33 24 AA C7 28 41 29 |....G3$.G3$..(A)| 00000400: 00 07 0C FA 00 82 49 00 21 0C FF 00 5A 5A B2 30 |......I.!...ZZ.0| 00000410: 3A 81 49 B2 39 37 A4 31 31 36 3A A1 23 32 2C 42 |:.I.97.116:.#2,B| 00000420: 24 00 2B 0C 04 01 8D 35 36 35 20 00 3C 0C 09 01 |$.+....565 .<...| 00000430: 8B 20 41 B2 30 20 A7 20 5A 5A B2 31 00 4D 0C 0E |. A.0 . ZZ.1.M..| 00000440: 01 8B 20 5A 5A B2 31 20 A7 32 38 30 20 00 5E 0C |.. ZZ.1 .280 .^.| 00000450: 13 01 47 34 24 B2 47 34 24 AA C7 28 41 29 00 65 |..G4$.G4$..(A).e| 00000460: 0C 18 01 82 49 00 79 0C 1D 01 5A 5A B2 30 3A 81 |....I.y...ZZ.0:.| 00000470: 49 B2 31 31 37 A4 31 32 37 00 89 0C 22 01 A1 23 |I.117.127..."..#| 00000480: 32 2C 42 24 3A 8D 35 36 35 00 9A 0C 27 01 8B 20 |2,B$:.565...'.. | 00000490: 41 B2 30 20 A7 20 5A 5A B2 31 00 AB 0C 2C 01 8B |A.0 . ZZ.1...,..| 000004A0: 20 5A 5A B2 31 20 A7 33 31 30 20 00 BC 0C 31 01 | ZZ.1 .310 ...1.| 000004B0: 47 35 24 B2 47 35 24 AA C7 28 41 29 00 C3 0C 36 |G5$.G5$..(A)...6| 000004C0: 01 82 49 00 D3 0C 3B 01 A1 23 32 2C 42 24 3A 8D |..I...;..#2,B$:.| 000004D0: 35 36 35 00 EA 0C 40 01 46 31 24 B2 C4 28 41 29 |565...@.F1$..(A)| 000004E0: 3A 8B 5A 5A B2 31 A7 33 33 30 00 FB 0C 45 01 47 |:.ZZ.1.330...E.G| 000004F0: 35 24 B2 47 35 24 AA C7 28 41 29 00 0B 0D 4A 01 |5$.G5$..(A)...J.| 00000500: A1 23 32 2C 42 24 3A 8D 35 36 35 00 22 0D 4F 01 |.#2,B$:.565.".O.| 00000510: 46 32 24 B2 C4 28 41 29 3A 8B 5A 5A B2 31 A7 33 |F2$..(A):.ZZ.1.3| 00000520: 34 35 00 33 0D 54 01 47 35 24 B2 47 35 24 AA C7 |45.3.T.G5$.G5$..| 00000530: 28 41 29 00 42 0D 59 01 81 49 B2 31 33 30 A4 31 |(A).B.Y..I.130.1| 00000540: 33 36 00 52 0D 5E 01 A1 23 32 2C 42 24 3A 8D 35 |36.R.^..#2,B$:.5| 00000550: 36 35 00 60 0D 63 01 8B 5A 5A B2 31 A7 33 36 35 |65.`.c..ZZ.1.365| 00000560: 00 71 0D 68 01 47 35 24 B2 47 35 24 AA C7 28 41 |.q.h.G5$.G5$..(A| 00000570: 29 00 78 0D 6D 01 82 49 00 91 0D 72 01 81 49 B2 |).x.m..I...r..I.| 00000580: 31 33 37 A4 31 35 39 3A A1 23 32 2C 42 24 3A 82 |137.159:.#2,B$:.| 00000590: 49 00 A5 0D 77 01 5A 5A B2 30 3A 81 49 B2 31 36 |I...w.ZZ.0:.I.16| 000005A0: 30 A4 32 35 35 00 B5 0D 7C 01 A1 23 32 2C 42 24 |0.255...|..#2,B$| 000005B0: 3A 8D 35 36 35 00 C6 0D 81 01 8B 20 41 B2 30 20 |:.565...... A.0 | 000005C0: A7 20 5A 5A B2 31 00 D7 0D 86 01 8B 20 5A 5A B2 |. ZZ.1...... ZZ.| 000005D0: 31 20 A7 34 30 30 20 00 E8 0D 8B 01 47 36 24 B2 |1 .400 .....G6$.| 000005E0: 47 36 24 AA C7 28 41 29 00 EF 0D 90 01 82 49 00 |G6$..(A)......I.| 000005F0: FD 0D 95 01 98 34 2C C7 28 31 34 37 29 00 29 0E |.....4,.(147).).| 00000600: 9A 01 98 34 2C A6 36 29 22 47 45 4F 53 20 46 49 |...4,.6)"GEOS FI| 00000610: 4C 45 20 49 4E 46 4F 52 4D 41 54 49 4F 4E 3A 22 |LE INFORMATION:"| 00000620: 3B 54 22 2D 22 53 3A 98 34 00 4E 0E 9F 01 98 34 |;T"-"S:.4.N....4| 00000630: 2C C7 28 33 30 29 22 20 20 20 C4 CF D3 20 46 49 |,.(30)" ... FI| 00000640: 4C 45 20 54 59 50 45 3A 20 20 22 46 54 24 00 6E |LE TYPE: "FT$.n| 00000650: 0E A4 01 98 34 2C 22 20 20 47 45 4F 53 20 46 49 |....4," GEOS FI| 00000660: 4C 45 20 54 59 50 45 3A 20 20 22 47 31 24 00 8E |LE TYPE: "G1$..| 00000670: 0E A9 01 98 34 2C 22 20 20 20 20 20 20 20 20 20 |....4," | 00000680: 20 20 43 4C 41 53 53 3A 20 20 22 47 33 24 00 AE | CLASS: "G3$..| 00000690: 0E AE 01 98 34 2C 22 20 20 20 20 20 20 20 53 54 |....4," ST| 000006A0: 52 55 43 54 55 52 45 3A 20 20 22 47 32 24 00 D0 |RUCTURE: "G2$..| 000006B0: 0E B3 01 8B 20 47 31 24 B3 B1 47 31 24 28 33 29 |.... G1$..G1$(3)| 000006C0: B0 47 31 24 B3 B1 47 31 24 28 37 29 A7 34 34 35 |.G1$..G1$(7).445| 000006D0: 00 F0 0E B8 01 98 34 2C 22 41 50 50 4C 49 43 41 |......4,"APPLICA| 000006E0: 54 49 4F 4E 20 44 41 54 41 3A 20 20 22 47 35 24 |TION DATA: "G5$| 000006F0: 00 1B 0F BD 01 8B 47 31 24 B2 47 31 24 28 38 29 |......G1$.G1$(8)| 00000700: A7 98 34 2C 22 20 20 46 4F 4E 54 20 49 44 20 4E |..4," FONT ID N| 00000710: 55 4D 42 45 52 3A 20 22 46 31 24 00 3C 0F C2 01 |UMBER: "F1$.<...| 00000720: 8B 47 31 24 B3 B1 47 31 24 28 31 29 B0 47 31 24 |.G1$..G1$(1).G1$| 00000730: B3 B1 47 31 24 28 32 29 A7 34 35 31 00 5D 0F C3 |..G1$(2).451.]..| 00000740: 01 8B 47 31 24 B3 B1 47 31 24 28 34 29 B0 47 31 |..G1$..G1$(4).G1| 00000750: 24 B3 B1 47 31 24 28 35 29 A7 34 35 33 00 7E 0F |$..G1$(5).453.~.| 00000760: C5 01 8B 47 31 24 B3 B1 47 31 24 28 36 29 B0 47 |...G1$..G1$(6).G| 00000770: 31 24 B3 B1 47 31 24 28 39 29 A7 34 35 34 00 A1 |1$..G1$(9).454..| 00000780: 0F C6 01 8B 47 31 24 B3 B1 47 31 24 28 31 30 29 |....G1$..G1$(10)| 00000790: B0 47 31 24 B3 B1 47 31 24 28 31 32 29 A7 34 35 |.G1$..G1$(12).45| 000007A0: 35 00 B7 0F C7 01 8B 47 31 24 B3 B1 47 31 24 28 |5......G1$..G1$(| 000007B0: 31 34 29 A7 34 36 35 00 D7 0F CC 01 98 34 2C 22 |14).465......4,"| 000007C0: 20 20 20 20 20 20 20 20 20 20 41 55 54 48 4F 52 | AUTHOR| 000007D0: 3A 20 20 22 47 34 24 00 EB 0F D1 01 98 34 3A 98 |: "G4$......4:.| 000007E0: 34 2C 22 D4 C5 D8 D4 3A 20 20 22 00 F9 0F D6 01 |4,"....: ".....| 000007F0: 98 34 3A 98 34 2C 47 36 24 00 03 10 DB 01 A0 34 |.4:.4,G6$......4| 00000800: 3A A0 32 00 1F 10 E0 01 84 31 35 2C 45 4E 24 2C |:.2......15,EN$,| 00000810: 45 4D 24 2C 45 54 24 2C 45 53 24 3A A0 31 35 00 |EM$,ET$,ES$:.15.| 00000820: 46 10 E5 01 99 3A 99 3A 99 A6 31 31 29 C7 28 33 |F....:.:..11).(3| 00000830: 31 29 22 41 4E 4F 54 48 45 52 20 44 49 53 4B 20 |1)"ANOTHER DISK | 00000840: 28 59 2F 4E 29 22 00 5E 10 EA 01 A1 20 41 44 24 |(Y/N)".^.... AD$| 00000850: 3A 8B 20 41 44 24 B2 22 22 20 A7 34 39 30 00 73 |:. AD$."" .490.s| 00000860: 10 EF 01 8B 20 41 44 24 B3 B1 22 59 22 20 A7 35 |.... AD$.."Y" .5| 00000870: 30 35 20 00 7E 10 F4 01 9C 3A 89 31 32 30 00 8B |05 .~....:.120..| 00000880: 10 F9 01 99 22 45 4E 44 22 3A 80 00 A0 10 FE 01 |...."END":......| 00000890: 8F 20 2A 2A 2A 20 46 49 4C 45 20 54 59 50 45 53 |. *** FILE TYPES| 000008A0: 00 DF 10 03 02 83 20 22 C4 C5 CC C5 D4 C5 22 2C |...... "......",| 000008B0: 22 D3 C5 D1 D5 C5 CE D4 C9 C1 CC 22 2C 22 D0 D2 |"..........","..| 000008C0: CF C7 D2 C1 CD 22 2C 22 D5 D3 C5 D2 22 2C 22 D2 |.....","....",".| 000008D0: C5 CC C1 D4 C9 D6 C5 22 2C 22 D5 CE CB CE 22 00 |.......","....".| 000008E0: FE 10 08 02 8F 20 2A 2A 2A 20 47 45 4F 53 20 46 |..... *** GEOS F| 000008F0: 49 4C 45 20 53 54 52 55 43 54 55 52 45 53 00 34 |ILE STRUCTURES.4| 00000900: 11 0D 02 83 20 22 D3 C5 D1 D5 C5 CE D4 C9 C1 CC |.... "..........| 00000910: 22 2C 22 D6 CC C9 D2 22 2C 22 D5 CE CB CE 22 2C |","....","....",| 00000920: 22 D5 CE CB CE 22 2C 22 D5 CE CB CE 22 2C 22 D5 |"....","....",".| 00000930: CE CB CE 22 00 4E 11 12 02 8F 20 2A 2A 2A 20 47 |...".N.... *** G| 00000940: 45 4F 53 20 46 49 4C 45 20 54 59 50 45 53 00 90 |EOS FILE TYPES..| 00000950: 11 17 02 83 20 22 C3 3D 20 D0 52 4F 47 52 41 4D |.... ".= .ROGRAM| 00000960: 22 2C 22 C2 41 53 49 43 20 D0 52 4F 47 52 41 4D |",".ASIC .ROGRAM| 00000970: 22 2C 22 C1 53 53 45 4D 42 4C 59 20 D0 52 4F 47 |",".SSEMBLY .ROG| 00000980: 52 41 4D 22 2C 22 C4 41 54 41 20 C6 49 4C 45 22 |RAM",".ATA .ILE"| 00000990: 00 D6 11 1C 02 83 20 22 D3 59 53 54 45 4D 20 C6 |...... ".YSTEM .| 000009A0: 49 4C 45 22 2C 22 C4 45 53 4B 20 C1 43 43 45 53 |ILE",".ESK .CCES| 000009B0: 53 4F 52 59 22 2C 22 C1 50 50 4C 49 43 41 54 49 |SORY",".PPLICATI| 000009C0: 4F 4E 22 2C 22 C1 50 50 4C 49 43 41 54 49 4F 4E |ON",".PPLICATION| 000009D0: 20 C4 41 54 41 22 00 16 12 21 02 83 20 22 C6 4F | .ATA"...!.. ".O| 000009E0: 4E 54 20 C6 49 4C 45 22 2C 22 D0 52 49 4E 54 45 |NT .ILE",".RINTE| 000009F0: 52 20 C4 52 49 56 45 52 22 2C 22 C9 4E 50 55 54 |R .RIVER",".NPUT| 00000A00: 20 C4 52 49 56 45 52 22 2C 22 C4 49 53 4B 20 C4 | .RIVER",".ISK .| 00000A10: 52 49 56 45 52 22 00 55 12 26 02 83 20 22 D3 59 |RIVER".U.&.. ".Y| 00000A20: 53 54 45 4D 20 C2 4F 4F 54 20 C6 49 4C 45 22 2C |STEM .OOT .ILE",| 00000A30: 22 C6 49 4C 45 20 4F 46 46 20 44 45 53 4B D4 4F |".ILE OFF DESK.O| 00000A40: 50 20 28 3F 29 22 2C 22 C1 55 54 4F 2D C5 58 45 |P (?)",".UTO-.XE| 00000A50: 43 55 54 45 22 00 7E 12 2B 02 83 20 22 55 4E 4B |CUTE".~.+.. "UNK| 00000A60: 4E 22 2C 22 55 4E 4B 4E 22 2C 22 55 4E 4B 4E 22 |N","UNKN","UNKN"| 00000A70: 2C 22 55 4E 4B 4E 22 2C 22 55 4E 4B 4E 22 00 93 |,"UNKN","UNKN"..| 00000A80: 12 30 02 8F 20 2A 2A 2A 20 47 45 54 20 41 20 42 |.0.. *** GET A B| 00000A90: 59 54 45 00 A6 12 35 02 8B 42 24 B2 22 22 A7 42 |YTE...5..B$."".B| 00000AA0: 24 B2 C7 28 30 29 00 B4 12 3A 02 41 20 B2 20 C6 |$..(0)...:.A . .| 00000AB0: 28 42 24 29 00 CE 12 3F 02 8B 20 41 20 B1 20 39 |(B$)...?.. A . 9| 00000AC0: 36 20 A7 20 41 20 B2 20 41 20 AB 20 33 32 00 E1 |6 . A . A . 32..| 00000AD0: 12 44 02 8B 20 41 20 B1 20 39 36 20 A7 35 37 35 |.D.. A . 96 .575| 00000AE0: 20 00 F7 12 49 02 8B 20 41 20 B2 20 39 36 20 A7 | ...I.. A . 96 .| 00000AF0: 20 41 20 B2 20 33 32 00 FF 12 4E 02 8E 3A 90 00 | A . 32...N..:..| 00000B00: 00 00 |.. |
..'.D..********************************.
M.I..*** GEOINFO V0.8 ***.S.
N..*** WRITTEN BY MIKE SELLERS ***...S.
.*** CASTLE AFB,CA 13 JUN 87 ***...X..*
** QUANTUMLINK (MIK55) ***...}..***
*****************************......G1$(2
0):.G2$(6):.53280,0:.53281,0:.53272,23.?
.... I.0.5:.FT$(I):.I:.I.0.5:.G2$(I):.I.
W.... I.0.19:.G1$(I):.I.H....G(14)G(147)
.......10)"GEOINFO V0.3 - 1541".......10
)"INSERT DISK IN DRIVE".Y.....8)"PRESS "
G(18)"RETURN"G(146)" TO CONTINUE"... ..C
$:.C$."".160......C$..G(13).160.3....15,
8,15,"I0":.15,EN$,EM$,ET$,ES$:.EN$."00".
185.U....EN$", "EM$","ET$","ES$: 15:..L.
...*** START PROGRAM......:.:.19,32:."
INPUT INFORMATION TRK ";T:..I...."
INPUT INFORMATION SEC ";S...C..I
.0.3:.:.I:..16)G(28)"WAIT...".".H..4,3::
.2,8,2,"#":.15,"U1";2;0;T;S:.15,"B-P";2;
68.I.M..#2,B$:FT.F(B$.G(0)):FT$.FT$(7.FT
).N.R..#2,B$:G1.F(B$.G(0)):G1$.G1$(G1)..
.W..#2,B$:G2.F(B$.G(0)):G2$.G2$(G2).....
.I.71.76:.#2,B$:.I.C...ZZ.0:.I.77.96:.#2
,B$.M....565 ...... A.0 . ZZ.1...... ZZ.
1 .250 .....G3$.G3$.G(A)......I.!...ZZ.0
:.I.97.116:.#2,B$.+....565 .<.... A.0 .
ZZ.1.M.... ZZ.1 .280 .^...G4$.G4$.G(A).E
....I.Y...ZZ.0:.I.117.127..."..#2,B$:.56
5...'.. A.0 . ZZ.1...,.. ZZ.1 .310 ...1.
G5$.G5$.G(A).C.6..I.S.;..#2,B$:.565...@.
F1$.D(A):.ZZ.1.330...E.G5$.G5$.G(A)...J.
.#2,B$:.565.".O.F2$.D(A):.ZZ.1.345.3.T.G
5$.G5$.G(A).B.Y..I.130.136.R.^..#2,B$:.5
65.`.C..ZZ.1.365.Q.H.G5$.G5$.G(A).X.M..I
...R..I.137.159:.#2,B$:.I...W.ZZ.0:.I.16
0.255...|..#2,B$:.565.F.... A.0 . ZZ.1.W
.... ZZ.1 .400 .....G6$.G6$.G(A)......I.
.....4,G(147).)....4,.6)"GEOS FILE INFOR
MATION:";T"-"S:.4.N....4,G(30)" DOS FI
LE TYPE: "FT$.N....4," GEOS FILE TYPE:
"G1$......4," CLASS: "G3$..
....4," STRUCTURE: "G2$.P.... G1$
..G1$(3).G1$..G1$(7).445......4,"APPLICA
TION DATA: "G5$......G1$.G1$(8)..4," F
ONT ID NUMBER: "F1$.<.B..G1$..G1$(1).G1$
..G1$(2).451.].C..G1$..G1$(4).G1$..G1$(5
).453.~.E..G1$..G1$(6).G1$..G1$(9).454..
.F..G1$..G1$(10).G1$..G1$(12).455...G..G
1$..G1$(14).465.W.L..4," AUTHOR
: "G4$...Q..4:.4,"TEXT: "...V..4:.4,G6
$..... 4: 2......15,EN$,EM$,ET$,ES$: 15.
F....:.:..11)G(31)"ANOTHER DISK (Y/N)".^
.... AD$:. AD$."" .490.S.... AD$.."Y" .5
05 .~....:.120......"END":.. .... *** FI
LE TYPES...... "DELETE","SEQUENTIAL","PR
OGRAM","USER","RELATIVE","UNKN"...... **
* GEOS FILE STRUCTURES.4.... "SEQUENTIAL
","VLIR","UNKN","UNKN","UNKN","UNKN".N..
.. *** GEOS FILE TYPES...... "C= PROGRAM
","BASIC PROGRAM","ASSEMBLY PROGRAM","DA
TA FILE".V.... "SYSTEM FILE","DESK ACCES
SORY","APPLICATION","APPLICATION DATA"..
.!.. "FONT FILE","PRINTER DRIVER","INPUT
DRIVER","DISK DRIVER".U.&.. "SYSTEM BOO
T FILE","FILE OFF DESKTOP (?)","AUTO-EXE
CUTE".~.+.. "UNKN","UNKN","UNKN","UNKN",
"UNKN"...0.. *** GET A BYTE...5..B$."".B
$.G(0)...:.A . F(B$).N.?.. A . 96 . A .
A . 32...D.. A . 96 .575 ...I.. A . 96 .
A . 32...N..:....
> CLICK IMAGE PREVIEW FOR FULL MODAL