TOPO FRANKRIJK
FILE INFORMATION
FILENAME(S): TOPO FRANKRIJK
FILE TYPE(S): PRG
FILE SIZE: 7.8K
FIRST SEEN: 2025-12-02 02:08:04
APPEARS ON: 1 disk(s)
FILE HASH
d7812b302558ee0b8131944b9682bbb1142cb2e4314a3131fd96d4e9dd596ba7
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| AARDR LBO3 | TOPO FRANKRIJK | PRG | Shocktrooper | 10 | 11 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 01 00 89 39 31 30 00 2A 08 02 00 8F |.......910.*....| 00000010: 20 2A 2A 20 4D 4C 20 53 54 4F 50 20 4B 45 59 20 | ** ML STOP KEY | 00000020: 44 49 53 41 42 4C 45 20 2A 2A 00 55 08 03 00 99 |DISABLE **.U....| 00000030: 22 78 A9 3D 8D 14 03 A9 08 8D 15 03 58 60 20 EA |"x.=........X` .| 00000040: FF A9 FF 85 91 4C 34 EA 78 A9 31 8D 14 03 A9 EA |.....L4.x.1.....| 00000050: 8D 15 03 58 60 00 74 08 04 00 99 22 78 68 68 68 |...X`.t...."xhhh| 00000060: AA 68 A8 68 68 68 68 68 68 68 98 48 8A 48 58 60 |.h.hhhhhhh.H.HX`| 00000070: 31 31 31 22 00 85 08 05 00 99 22 68 68 68 68 68 |111"......"hhhhh| 00000080: 68 68 60 31 22 00 A7 08 06 00 8F 20 2A 2A 20 34 |hh`1"...... ** 4| 00000090: 20 2D 20 50 4F 50 20 4D 4C 20 53 55 42 52 4F 55 | - POP ML SUBROU| 000000A0: 54 49 4E 45 20 2A 2A 00 C8 08 0A 00 8F 20 2A 2A |TINE **...... **| 000000B0: 47 45 4E 45 52 41 4C 20 49 4E 50 55 54 20 52 4F |GENERAL INPUT RO| 000000C0: 55 54 49 4E 45 20 2A 2A 00 EE 08 0B 00 8F 20 2D |UTINE **...... -| 000000D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000000E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 14 |--------------..| 000000F0: 09 0C 00 8F 20 2D 2D 2D 20 20 20 20 20 4D 41 44 |.... --- MAD| 00000100: 45 20 42 59 20 45 55 4E 49 43 45 20 48 20 20 20 |E BY EUNICE H | 00000110: 20 2D 2D 2D 00 3A 09 0D 00 8F 20 2D 2D 2D 52 45 | ---.:.... ---RE| 00000120: 56 49 53 45 44 20 42 59 20 52 49 43 48 41 52 44 |VISED BY RICHARD| 00000130: 20 44 45 42 4F 45 52 2D 2D 2D 00 60 09 0E 00 8F | DEBOER---.`....| 00000140: 20 2D 2D 2D 56 45 52 54 2E 3A 20 50 2E 46 2E 4A | ---VERT.: P.F.J| 00000150: 2E 4D 2E 20 4B 4E 45 47 54 45 4C 2C 20 2D 2D 2D |.M. KNEGTEL, ---| 00000160: 00 7A 09 0F 00 3A 20 20 20 AB AB AB 41 58 45 4C |.z...: ...AXEL| 00000170: 20 44 45 43 2E 20 31 39 38 34 00 A0 09 10 00 8F | DEC. 1984......| 00000180: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------| 00000190: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000001A0: 00 A6 09 11 00 3A 00 AC 09 1E 00 3A 00 C8 09 23 |.....:.....:...#| 000001B0: 00 8F 20 2B 2B 2B 20 49 4E 50 55 54 20 53 45 43 |.. +++ INPUT SEC| 000001C0: 54 49 4F 4E 20 2B 2B 2B 00 E0 09 28 00 97 55 4F |TION +++...(..UO| 000001D0: 2C 30 3A 55 52 24 B2 22 22 3A 55 49 24 B2 22 22 |,0:UR$."":UI$.""| 000001E0: 00 F0 09 2A 00 8B 55 4C B2 30 A7 55 4C B2 38 30 |...*..UL.0.UL.80| 000001F0: 00 FA 09 2D 00 97 55 43 2C 30 00 0E 0A 32 00 A1 |...-..UC,0...2..| 00000200: 55 49 24 3A 8B 55 49 24 B2 22 22 A7 35 30 00 38 |UI$:.UI$."".50.8| 00000210: 0A 37 00 8B 55 49 24 B2 C7 28 31 33 29 AF C3 28 |.7..UI$..(13)..(| 00000220: 55 52 24 29 B1 B2 31 A7 97 55 43 2C 31 3A 99 22 |UR$)..1..UC,1:."| 00000230: 20 9D 22 3B 3A 89 38 35 00 4B 0A 3C 00 8B 55 49 | .";:.85.K.<..UI| 00000240: 24 B2 C7 28 32 30 29 A7 31 30 35 00 5F 0A 3E 00 |$..(20).105._.>.| 00000250: 8B 20 C3 28 55 52 24 29 B2 B1 55 4C A7 35 30 00 |. .(UR$)..UL.50.| 00000260: 84 0A 41 00 8D 31 32 30 3A 8F 20 43 48 45 43 4B |..A..120:. CHECK| 00000270: 20 46 4F 52 20 56 41 4C 49 44 20 43 48 41 52 41 | FOR VALID CHARA| 00000280: 43 54 45 52 00 94 0A 46 00 55 52 24 B2 55 52 24 |CTER...F.UR$.UR$| 00000290: AA 55 49 24 00 9E 0A 4B 00 99 55 49 24 3B 00 A6 |.UI$...K..UI$;..| 000002A0: 0A 50 00 89 35 30 00 CB 0A 55 00 8F 20 2B 2B 2B |.P..50...U.. +++| 000002B0: 20 43 48 45 43 4B 20 46 4F 52 20 48 45 4C 50 20 | CHECK FOR HELP | 000002C0: 52 45 51 55 45 53 54 20 2B 2B 2B 00 F3 0A 5A 00 |REQUEST +++...Z.| 000002D0: 8B 55 52 24 B2 55 58 24 A7 31 39 35 3A 8F 20 45 |.UR$.UX$.195:. E| 000002E0: 58 49 54 20 54 4F 20 48 45 4C 50 20 52 4F 55 54 |XIT TO HELP ROUT| 000002F0: 49 4E 45 00 02 0B 5F 00 8B 55 46 B2 31 A7 8D 32 |INE..._..UF.1..2| 00000300: 34 30 00 0F 0B 64 00 55 46 B2 30 3A 99 3A 8E 00 |40...d.UF.0:.:..| 00000310: 28 0B 66 00 8F 20 2B 2B 20 43 48 45 43 4B 20 44 |(.f.. ++ CHECK D| 00000320: 45 4C 45 54 45 20 2B 2B 00 39 0B 69 00 8B C3 28 |ELETE ++.9.i...(| 00000330: 55 52 24 29 B3 31 A7 35 30 00 51 0B 6E 00 55 52 |UR$).1.50.Q.n.UR| 00000340: 24 B2 C8 28 55 52 24 2C C3 28 55 52 24 29 AB 31 |$..(UR$,.(UR$).1| 00000350: 29 00 63 0B 73 00 99 22 9D 20 20 9D 9D 22 3B 3A |).c.s..". ..";:| 00000360: 89 35 30 00 8A 0B 78 00 8F 20 2B 2B 20 43 48 45 |.50...x.. ++ CHE| 00000370: 43 4B 20 46 4F 52 20 56 41 4C 49 44 20 43 48 41 |CK FOR VALID CHA| 00000380: 52 41 43 54 45 52 53 20 2B 2B 00 9C 0B 7D 00 8B |RACTERS ++...}..| 00000390: C3 28 55 53 24 29 B2 30 A7 31 35 30 00 AC 0B 7F |.(US$).0.150....| 000003A0: 00 55 53 24 B2 55 53 24 AA 55 58 24 00 BD 0B 82 |.US$.US$.UX$....| 000003B0: 00 81 55 53 B2 31 A4 C3 28 55 53 24 29 00 D4 0B |..US.1..(US$)...| 000003C0: 87 00 8B 55 49 24 B2 CA 28 55 53 24 2C 55 53 2C |...UI$..(US$,US,| 000003D0: 31 29 A7 8E 00 DA 0B 8C 00 82 00 E7 0B 91 00 55 |1).............U| 000003E0: 49 24 B2 22 22 3A 8E 00 02 0C 96 00 8F 20 2A 2A |I$."":....... **| 000003F0: 20 53 54 41 4E 44 41 52 44 20 49 4E 50 55 54 20 | STANDARD INPUT | 00000400: 2A 2A 00 13 0C 98 00 8B C6 28 55 49 24 29 B2 34 |**.......(UI$).4| 00000410: 36 A7 8E 00 24 0C 9B 00 8B 55 49 24 B2 C7 28 33 |6...$....UI$..(3| 00000420: 32 29 A7 8E 00 41 0C A0 00 8B C6 28 55 49 24 29 |2)...A.....(UI$)| 00000430: B3 34 38 B0 C6 28 55 49 24 29 B1 35 37 A7 31 37 |.48..(UI$).57.17| 00000440: 30 00 47 0C A5 00 8E 00 64 0C AA 00 8B C6 28 55 |0.G.....d.....(U| 00000450: 49 24 29 B3 36 35 B0 C6 28 55 49 24 29 B1 39 30 |I$).65..(UI$).90| 00000460: A7 31 38 30 00 6A 0C AF 00 8E 00 8E 0C B4 00 8B |.180.j..........| 00000470: C6 28 55 49 24 29 B3 31 39 33 B0 C6 28 55 49 24 |.(UI$).193..(UI$| 00000480: 29 B1 32 31 38 A7 55 49 24 B2 22 22 3A 8E 00 B1 |).218.UI$."":...| 00000490: 0C B9 00 8B C2 28 55 54 29 B2 55 55 25 A7 55 49 |.....(UT).UU%.UI| 000004A0: 24 B2 C7 28 C6 28 55 49 24 29 AB 31 32 38 29 3A |$..(.(UI$).128):| 000004B0: 8E 00 B7 0C BB 00 8E 00 C4 0C BE 00 55 49 24 B2 |............UI$.| 000004C0: 22 22 3A 8E 00 E9 0C C3 00 55 46 B2 31 3A 8F 20 |"":......UF.1:. | 000004D0: 2B 2B 2B 20 48 45 4C 50 20 52 4F 55 54 49 4E 45 |+++ HELP ROUTINE| 000004E0: 20 45 58 49 54 20 2B 2B 2B 00 F2 0C C5 00 8D 32 | EXIT +++......2| 000004F0: 35 30 00 FB 0C C8 00 8D 32 34 35 00 1A 0D CD 00 |50......245.....| 00000500: 81 55 51 B2 55 42 A4 28 55 32 25 AC 32 35 36 AA |.UQ.UB.(U2%.256.| 00000510: 55 31 25 AA 55 33 25 AB 32 29 00 36 0D D2 00 55 |U1%.U3%.2).6...U| 00000520: 51 25 28 55 51 AB 55 42 29 B2 C2 28 55 51 29 3A |Q%(UQ.UB)..(UQ):| 00000530: 82 3A 99 22 93 22 00 49 0D D7 00 55 5A B2 31 3A |.:.".".I...UZ.1:| 00000540: 55 56 25 B2 C2 28 55 54 29 00 52 0D D8 00 89 33 |UV%..(UT).R....3| 00000550: 30 30 00 96 0D D9 00 55 5A B2 30 3A 55 53 24 B2 |00.....UZ.0:US$.| 00000560: 55 4A 24 3A 55 47 24 B2 55 4B 24 3A 55 50 B2 55 |UJ$:UG$.UK$:UP.U| 00000570: 4A 3A 55 4C B2 55 4B 3A 8B C2 28 35 30 30 30 33 |J:UL.UK:..(50003| 00000580: 29 B2 30 A7 97 35 33 32 38 31 2C 36 3A 97 35 33 |).0..53281,6:.53| 00000590: 32 38 30 2C 31 34 00 CB 0D DC 00 55 54 24 B2 55 |280,14.....UT$.U| 000005A0: 4C 24 3A 99 22 93 22 3B 3A 97 55 54 2C 55 56 25 |L$:.".";:.UT,UV%| 000005B0: 3A 81 55 51 B2 55 42 A4 28 55 32 25 AC 32 35 36 |:.UQ.UB.(U2%.256| 000005C0: AA 55 31 25 AA 55 33 25 AB 33 29 00 E0 0D E1 00 |.U1%.U3%.3).....| 000005D0: 97 55 51 2C 55 51 25 28 55 51 AB 55 42 29 3A 82 |.UQ,UQ%(UQ.UB):.| 000005E0: 00 EC 0D E6 00 97 55 31 2C 55 31 25 00 F8 0D E8 |......U1,U1%....| 000005F0: 00 97 55 32 2C 55 32 25 00 04 0E E9 00 97 55 34 |..U2,U2%......U4| 00000600: 2C 55 34 25 00 12 0E EA 00 97 55 33 2C 55 33 25 |,U4%......U3,U3%| 00000610: AB 31 00 1A 0E EB 00 89 33 35 00 4C 0E F0 00 55 |.1......35.L...U| 00000620: 44 25 B2 28 28 55 32 25 AC 32 35 36 AA 55 31 25 |D%.((U2%.256.U1%| 00000630: AA 55 33 25 29 AB 55 42 29 AD 34 30 3A 99 C8 28 |.U3%).UB).40:..(| 00000640: 55 44 24 2C 55 44 25 AA 31 29 3A 8E 00 87 0E F5 |UD$,UD%.1):.....| 00000650: 00 99 C8 28 55 44 24 2C 32 34 29 3B 22 20 20 20 |...(UD$,24);" | 00000660: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000670: 20 20 20 12 20 48 55 4C 50 20 4B 4F 4D 54 20 20 | . HULP KOMT | 00000680: 20 92 20 20 22 3A 8E 00 B3 0E FA 00 55 31 25 B2 | . ":......U1%.| 00000690: C2 28 55 31 29 3A 55 32 25 B2 C2 28 55 32 29 3A |.(U1):U2%..(U2):| 000006A0: 55 33 25 B2 C2 28 55 33 29 3A 55 34 25 B2 C2 28 |U3%..(U3):U4%..(| 000006B0: 55 34 29 00 DB 0E FB 00 55 4A 24 B2 55 53 24 3A |U4).....UJ$.US$:| 000006C0: 55 4B 24 B2 55 47 24 3A 55 4C 24 B2 55 54 24 3A |UK$.UG$:UL$.UT$:| 000006D0: 55 4A B2 55 50 3A 55 4B B2 55 4C 00 E1 0E FF 00 |UJ.UP:UK.UL.....| 000006E0: 8E 00 F2 0E 2C 01 8F 20 2A 2A 20 4D 45 4E 55 20 |....,.. ** MENU | 000006F0: 2A 2A 00 F8 0E 2D 01 3A 00 27 0F 2E 01 99 22 93 |**...-.:.'....".| 00000700: 22 3A 97 55 54 2C 55 55 25 3A 8B C2 28 35 30 30 |":.UT,UU%:..(500| 00000710: 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 39 3A 97 |03).0..53281,9:.| 00000720: 35 33 32 38 30 2C 38 00 2D 0F 2F 01 3A 00 4A 0F |53280,8.-./.:.J.| 00000730: 31 01 99 22 13 20 20 20 20 20 20 20 20 20 20 20 |1..". | 00000740: 20 20 20 20 20 4D 45 4E 55 22 00 79 0F 36 01 99 | MENU".y.6..| 00000750: 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |" --------------| 00000760: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000770: 2D 2D 2D 2D 2D 2D 2D 2D 22 00 A5 0F 3B 01 99 22 |--------"...;.."| 00000780: 11 11 20 20 20 20 20 20 20 31 2E 20 20 20 53 54 |.. 1. ST| 00000790: 41 52 54 20 46 52 41 4E 53 45 20 54 4F 50 4F 47 |ART FRANSE TOPOG| 000007A0: 52 41 46 49 45 00 D0 0F 40 01 99 22 11 11 20 20 |RAFIE...@..".. | 000007B0: 20 20 20 20 20 32 2E 20 20 20 4C 45 45 52 4C 49 | 2. LEERLI| 000007C0: 4E 47 20 49 4E 53 54 52 55 4B 54 49 45 20 20 22 |NG INSTRUKTIE "| 000007D0: 00 FD 0F 45 01 99 22 11 11 20 20 20 20 20 20 20 |...E..".. | 000007E0: 33 2E 20 20 20 4C 45 45 52 4B 52 41 43 48 54 20 |3. LEERKRACHT | 000007F0: 49 4E 53 54 52 55 4B 54 49 45 20 20 22 00 19 10 |INSTRUKTIE "...| 00000800: 4F 01 99 22 11 11 20 20 20 20 20 20 20 34 2E 20 |O..".. 4. | 00000810: 20 20 53 54 4F 50 11 11 22 00 48 10 54 01 99 22 | STOP..".H.T.."| 00000820: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------| 00000830: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000840: 2D 2D 2D 2D 2D 2D 2D 22 00 73 10 59 01 99 22 11 |-------".s.Y..".| 00000850: 11 20 20 20 20 20 20 20 4D 41 41 4B 20 4A 45 20 |. MAAK JE | 00000860: 4B 45 55 5A 45 20 55 49 54 3A 20 28 31 2D 34 29 |KEUZE UIT: (1-4)| 00000870: 20 22 3B 00 9B 10 5E 01 55 4C B2 31 3A 55 53 24 | ";...^.UL.1:US$| 00000880: B2 22 31 32 33 34 22 3A 8D 33 35 3A 8F 20 49 4E |."1234":.35:. IN| 00000890: 50 55 54 20 52 4F 55 54 49 4E 45 00 AD 10 5F 01 |PUT ROUTINE..._.| 000008A0: 8B C3 28 55 52 24 29 B1 31 A7 33 30 30 00 B8 10 |..(UR$).1.300...| 000008B0: 60 01 55 53 24 B2 22 22 00 D5 10 63 01 91 C5 28 |`.US$.""...c...(| 000008C0: 55 52 24 29 8D 31 30 30 30 2C 34 30 30 2C 35 30 |UR$).1000,400,50| 000008D0: 30 2C 33 39 36 00 DE 10 68 01 89 33 30 30 00 05 |0,396...h..300..| 000008E0: 11 8B 01 8F 20 2A 2A 20 52 45 2D 45 4E 41 42 4C |.... ** RE-ENABL| 000008F0: 45 20 53 54 4F 50 20 4B 45 59 20 41 4E 44 20 45 |E STOP KEY AND E| 00000900: 4E 44 20 2A 2A 00 34 11 8C 01 8B C2 28 35 30 30 |ND **.4.....(500| 00000910: 30 33 29 B3 B1 31 AF C2 28 35 30 30 30 33 29 B3 |03)..1..(50003).| 00000920: B1 31 36 30 AF C2 28 35 30 30 30 33 29 B3 B1 30 |.160..(50003)..0| 00000930: A7 33 39 39 00 5E 11 8D 01 9E 55 55 AA 37 31 3A |.399.^....UU.71:| 00000940: 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 |..(50003).0..532| 00000950: 38 31 2C 36 3A 97 35 33 32 38 30 2C 31 34 00 6A |81,6:.53280,14.j| 00000960: 11 8E 01 99 22 9A 93 22 3A 80 00 75 11 8F 01 8D |...."..":..u....| 00000970: 38 37 35 3A 8E 00 96 11 90 01 8F 20 2A 2A 20 53 |875:....... ** S| 00000980: 54 55 44 45 4E 54 20 49 4E 53 54 52 55 43 54 49 |TUDENT INSTRUCTI| 00000990: 4F 4E 53 20 2A 2A 00 B3 11 92 01 55 54 24 B2 22 |ONS **.....UT$."| 000009A0: 20 C6 52 41 4E 53 45 20 54 4F 50 4F 47 52 41 46 | .RANSE TOPOGRAF| 000009B0: 49 45 22 00 E2 11 95 01 99 22 93 22 3A 97 55 54 |IE"......".":.UT| 000009C0: 2C 55 4C 25 3A 8B C2 28 35 30 30 30 33 29 B2 30 |,UL%:..(50003).0| 000009D0: A7 97 35 33 32 38 31 2C 30 3A 97 35 33 32 38 30 |..53281,0:.53280| 000009E0: 2C 30 00 04 12 9A 01 55 50 B2 30 3A 55 47 24 B2 |,0.....UP.0:UG$.| 000009F0: 22 CC 45 45 52 4C 49 4E 47 20 C9 4E 53 54 22 3A |".EERLING .NST":| 00000A00: 8D 38 35 30 00 18 12 C7 01 8D 31 33 37 30 3A 55 |.850......1370:U| 00000A10: 50 B2 32 3A 8D 38 35 30 00 47 12 CC 01 99 22 20 |P.2:.850.G...." | 00000A20: 11 11 CE 4F 4F 54 3A 11 11 11 4F 4D 20 4E 41 41 |...OOT:...OM NAA| 00000A30: 52 20 44 45 20 56 4F 4C 47 45 4E 44 45 20 56 52 |R DE VOLGENDE VR| 00000A40: 41 41 47 20 54 45 22 00 70 12 D6 01 99 22 20 11 |AAG TE".p...." .| 00000A50: 47 41 41 4E 2C 20 44 52 55 4B 20 4A 45 20 4F 50 |GAAN, DRUK JE OP| 00000A60: 20 44 45 20 D3 D0 C1 D4 C9 C5 42 41 4C 4B 20 22 | DE ......BALK "| 00000A70: 00 A1 12 DB 01 99 22 20 11 11 1D 1D 1D 1D 1D D7 |......" ........| 00000A80: 49 4C 20 4A 45 20 54 45 52 55 47 20 4E 41 41 52 |IL JE TERUG NAAR| 00000A90: 20 48 45 54 20 4D 45 4E 55 2C 20 44 52 55 4B 20 | HET MENU, DRUK | 00000AA0: 22 00 BA 12 E0 01 99 22 20 11 44 41 4E 20 4F 50 |"......" .DAN OP| 00000AB0: 20 48 20 D2 C5 D4 D5 D2 CE 22 00 C3 12 E5 01 8D | H ......"......| 00000AC0: 38 33 35 00 D7 12 EA 01 8B 55 5A B2 31 A7 9E 55 |835......UZ.1..U| 00000AD0: 50 25 3A 89 32 31 37 00 DD 12 F3 01 8E 00 FE 12 |P%:.217.........| 00000AE0: F4 01 8F 20 2A 2A 20 54 45 41 43 48 45 52 20 49 |... ** TEACHER I| 00000AF0: 4E 53 54 52 55 43 54 49 4F 4E 53 20 2A 2A 00 2E |NSTRUCTIONS **..| 00000B00: 13 F5 01 99 22 93 22 3A 97 55 54 2C 55 4C 25 3A |....".":.UT,UL%:| 00000B10: 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 |..(50003).0..532| 00000B20: 38 31 2C 32 3A 97 35 33 32 38 30 2C 31 30 00 68 |81,2:.53280,10.h| 00000B30: 13 F6 01 55 54 24 B2 22 20 C6 52 41 4E 53 45 20 |...UT$." .RANSE | 00000B40: 54 4F 50 4F 47 52 41 46 49 45 22 3A 55 50 B2 30 |TOPOGRAFIE":UP.0| 00000B50: 3A 55 47 24 B2 22 4C 45 52 41 41 52 20 20 C9 4E |:UG$."LERAAR .N| 00000B60: 53 54 22 3A 8D 38 35 30 00 7E 13 00 02 55 50 B2 |ST":.850.~...UP.| 00000B70: 31 3A 8D 20 38 33 35 3A 8D 20 38 35 30 3A 00 AF |1:. 835:. 850:..| 00000B80: 13 01 02 99 22 20 20 20 20 20 11 11 D0 52 4F 47 |...." ...ROG| 00000B90: 52 41 4D 4D 41 20 4E 41 41 4D 3A 20 C6 52 41 4E |RAMMA NAAM: .RAN| 00000BA0: 53 45 20 54 4F 50 4F 47 52 41 46 49 45 20 11 00 |SE TOPOGRAFIE ..| 00000BB0: D7 13 02 02 99 22 20 20 20 20 20 C7 45 53 43 48 |....." .ESCH| 00000BC0: 52 45 56 45 4E 20 44 4F 4F 52 20 3A 20 C5 55 4E |REVEN DOOR : .UN| 00000BD0: 49 43 45 20 C8 2E 11 00 08 14 03 02 99 22 20 20 |ICE ........." | 00000BE0: 20 20 20 D6 45 52 54 41 4C 49 4E 47 20 44 4F 4F | .ERTALING DOO| 00000BF0: 52 20 20 3A 20 D0 2E C6 2E CA 2E CD 2E 20 CB 4E |R : ........ .N| 00000C00: 45 47 54 45 4C 20 20 11 00 33 14 04 02 99 22 20 |EGTEL ..3...." | 00000C10: 20 20 20 20 11 C4 49 54 20 50 52 4F 47 52 2E 20 | ..IT PROGR. | 00000C20: 49 53 20 47 45 53 43 48 49 4B 54 20 56 4F 4F 52 |IS GESCHIKT VOOR| 00000C30: 3A 11 11 00 5A 14 05 02 99 22 20 20 20 20 20 20 |:...Z...." | 00000C40: 20 20 20 C2 C1 D3 C9 C3 A0 32 2E 30 20 D0 C5 D4 | ......2.0 ...| 00000C50: 20 C3 CF CD D0 D5 D4 C5 D2 11 00 81 14 06 02 99 | ...............| 00000C60: 22 20 20 20 20 20 20 20 20 20 C2 C1 D3 C9 C3 20 |" ..... | 00000C70: 34 2E 30 20 D0 C5 D4 A0 C3 CF CD D0 D5 D4 C5 D2 |4.0 ............| 00000C80: 11 00 A3 14 07 02 99 22 20 20 20 20 20 20 20 20 |......." | 00000C90: 20 38 30 33 32 20 C3 C2 CD 20 C3 CF CD D0 D5 D4 | 8032 ... ......| 00000CA0: C5 D2 11 00 C8 14 08 02 99 22 20 20 20 20 20 20 |........." | 00000CB0: 20 20 20 C3 CF CD CD CF C4 CF D2 C5 20 36 34 20 | ......... 64 | 00000CC0: C3 CF CD D0 D5 D4 C5 D2 00 D1 14 44 02 8D 38 33 |...........D..83| 00000CD0: 35 00 E5 14 4E 02 8B 55 5A B2 31 A7 9E 55 50 25 |5...N..UZ.1..UP%| 00000CE0: 3A 89 32 31 37 00 EB 14 57 02 8E 00 11 15 58 02 |:.217...W.....X.| 00000CF0: 8F 20 2A 2A 20 50 52 4F 47 52 41 4D 20 4D 4F 44 |. ** PROGRAM MOD| 00000D00: 49 46 49 43 41 54 49 4F 4E 20 49 4E 53 54 20 2A |IFICATION INST *| 00000D10: 2A 00 22 15 59 02 99 22 93 22 3A 97 55 54 2C 55 |*.".Y..".":.UT,U| 00000D20: 4C 25 00 42 15 5D 02 55 50 B2 30 3A 55 47 24 B2 |L%.B.].UP.0:UG$.| 00000D30: 22 D0 52 4F 47 52 41 4D 20 CD 4F 44 22 3A 8D 38 |".ROGRAM .OD":.8| 00000D40: 35 30 00 4B 15 94 02 8D 38 33 35 00 5F 15 B2 02 |50.K....835._...| 00000D50: 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 32 31 37 00 |.UZ.1..UP%:.217.| 00000D60: 65 15 BB 02 8E 00 8A 15 BC 02 8F 20 2A 2A 20 54 |e.......... ** T| 00000D70: 4F 20 55 53 45 20 38 30 33 32 20 4C 4F 41 44 20 |O USE 8032 LOAD | 00000D80: 43 42 4D 34 30 33 32 20 2A 2A 00 C0 15 C6 02 99 |CBM4032 **......| 00000D90: 22 93 11 11 11 05 42 45 46 4F 52 45 20 52 55 4E |".....BEFORE RUN| 00000DA0: 4E 49 4E 47 20 54 48 49 53 20 50 52 4F 47 52 41 |NING THIS PROGRA| 00000DB0: 4D 20 4F 4E 20 41 4E 20 38 30 33 32 20 20 11 11 |M ON AN 8032 ..| 00000DC0: 00 F6 15 D0 02 99 22 20 20 20 20 20 20 4C 4F 41 |......" LOA| 00000DD0: 44 20 54 48 45 20 27 43 42 4D 20 34 30 33 32 27 |D THE 'CBM 4032'| 00000DE0: 20 50 52 4F 47 52 41 4D 11 11 11 11 11 11 11 11 | PROGRAM........| 00000DF0: 11 11 11 11 11 22 00 01 16 DA 02 9E 55 55 AA 37 |....."......UU.7| 00000E00: 31 00 07 16 E4 02 80 00 2C 16 1D 03 8F 20 2A 2A |1.......,.... **| 00000E10: 20 54 4F 20 55 53 45 20 38 30 33 32 20 4C 4F 41 | TO USE 8032 LOA| 00000E20: 44 20 43 42 4D 34 30 33 32 20 2A 2A 00 77 16 1E |D CBM4032 **.w..| 00000E30: 03 99 22 93 11 11 11 42 45 46 4F 52 45 20 52 55 |.."....BEFORE RU| 00000E40: 4E 4E 49 4E 47 20 54 48 49 53 20 50 52 4F 47 52 |NNING THIS PROGR| 00000E50: 41 4D 20 4F 4E 20 41 4E 20 38 30 33 32 20 20 11 |AM ON AN 8032 .| 00000E60: 11 4C 4F 41 44 20 43 42 4D 20 34 30 33 32 20 50 |.LOAD CBM 4032 P| 00000E70: 52 4F 47 52 41 4D 22 00 83 16 1F 03 9E 31 30 39 |ROGRAM"......109| 00000E80: 33 3A 80 00 A3 16 20 03 8F 20 2A 2A 20 54 20 49 |3:.... .. ** T I| 00000E90: 20 54 20 4C 20 45 20 20 20 50 20 41 20 47 20 45 | T L E P A G E| 00000EA0: 20 2A 2A 00 D7 16 22 03 99 22 93 11 1D 05 22 3B | **...".."....";| 00000EB0: 3A 97 55 54 2C 55 55 25 3A 8B C2 28 35 30 30 30 |:.UT,UU%:..(5000| 00000EC0: 33 29 B2 30 A7 97 35 33 32 38 30 2C 31 34 3A 97 |3).0..53280,14:.| 00000ED0: 35 33 32 38 31 2C 36 00 ED 16 24 03 81 49 B2 31 |53281,6...$..I.1| 00000EE0: A4 33 38 3A 99 22 12 A6 92 22 3B 3A 82 00 05 17 |.38:."...";:....| 00000EF0: 26 03 81 49 B2 31 A4 32 32 3A 99 22 11 9D 12 A6 |&..I.1.22:."....| 00000F00: 92 22 3B 3A 82 00 1D 17 28 03 81 49 B2 31 A4 33 |.";:....(..I.1.3| 00000F10: 37 3A 99 22 9D 9D 12 A6 92 22 3B 3A 82 00 35 17 |7:.".....";:..5.| 00000F20: 2A 03 81 49 B2 31 A4 32 32 3A 99 22 91 9D 12 A6 |*..I.1.22:."....| 00000F30: 92 22 3B 3A 82 00 5A 17 2C 03 99 22 13 11 11 11 |.";:..Z.,.."....| 00000F40: 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 00000F50: 1D 1D 1D 1D 1D 12 A9 20 20 92 00 7C 17 2E 03 99 |....... ..|....| 00000F60: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |"...............| 00000F70: 1D 1D 1D 12 20 92 20 20 12 20 92 A9 00 9D 17 30 |.... . . .....0| 00000F80: 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |..".............| 00000F90: 1D 1D 1D 1D 1D 12 20 92 20 20 12 A3 DF 00 BB 17 |...... . ......| 00000FA0: 32 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |2.."............| 00000FB0: 1D 1D 1D 1D 1D 1D DF 12 20 20 92 00 E3 17 34 03 |........ ....4.| 00000FC0: 99 22 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |."..............| 00000FD0: 43 20 4F 20 4D 20 4D 20 4F 20 44 20 4F 20 52 20 |C O M M O D O R | 00000FE0: 45 11 11 00 06 18 36 03 99 22 1D 1D 1D 1D 1D 1D |E.....6.."......| 00000FF0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 45 44 55 43 41 54 49 |.........EDUCATI| 00001000: 45 56 45 20 11 11 00 25 18 38 03 99 22 1D 1D 1D |EVE ...%.8.."...| 00001010: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 53 4F 46 |.............SOF| 00001020: 54 57 41 52 45 00 40 18 3A 03 8F 20 2A 2A 20 43 |TWARE.@.:.. ** C| 00001030: 4F 4D 4D 4F 44 4F 52 45 20 4C 4F 47 4F 20 2A 2A |OMMODORE LOGO **| 00001040: 00 78 18 3B 03 99 C8 28 55 44 24 2C 32 34 29 3B |.x.;...(UD$,24);| 00001050: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 44 52 55 4B 20 |"..........DRUK | 00001060: 4F 50 20 44 45 20 53 50 41 54 49 45 42 41 4C 4B |OP DE SPATIEBALK| 00001070: 20 20 92 22 3A 49 B2 30 00 9A 18 3C 03 A1 41 24 | .":I.0...<..A$| 00001080: 3A 8B 41 24 B3 B1 22 20 22 A7 49 B2 49 AA 31 3A |:.A$.." ".I.I.1:| 00001090: 8B 49 B3 32 35 30 A7 38 32 38 00 BE 18 3E 03 54 |.I.250.828...>.T| 000010A0: 31 24 B2 22 22 3A 54 32 24 B2 22 22 3A 54 33 24 |1$."":T2$."":T3$| 000010B0: B2 22 22 3A 54 34 24 B2 22 22 3A 49 B2 30 00 C7 |."":T4$."":I.0..| 000010C0: 18 40 03 89 33 30 30 00 E3 18 43 03 8F 20 2A 2A |.@..300...C.. **| 000010D0: 20 53 50 41 43 45 20 42 41 52 20 50 52 45 53 53 | SPACE BAR PRESS| 000010E0: 20 2A 2A 00 1E 19 48 03 97 55 4F 2C 30 3A 99 C8 | **...H..UO,0:..| 000010F0: 28 55 44 24 2C 32 34 29 3B 22 1D 1D 1D 1D 1D 1D |(UD$,24);"......| 00001100: 12 44 52 55 4B 20 4F 50 20 44 45 20 53 50 41 54 |.DRUK OP DE SPAT| 00001110: 49 45 42 41 4C 4B 20 20 20 20 20 20 92 22 00 35 |IEBALK .".5| 00001120: 19 4C 03 A1 55 49 24 3A 8B 55 49 24 B3 B1 22 20 |.L..UI$:.UI$.." | 00001130: 22 A7 38 34 34 00 3B 19 4E 03 8E 00 5B 19 52 03 |".844.;.N...[.R.| 00001140: 8F 20 2A 2A 20 50 41 47 45 20 44 45 53 49 47 4E |. ** PAGE DESIGN| 00001150: 20 52 4F 55 54 49 4E 45 20 2A 2A 00 67 19 54 03 | ROUTINE **.g.T.| 00001160: 55 50 B2 55 50 AA 31 00 91 19 57 03 99 22 93 22 |UP.UP.1...W.."."| 00001170: C8 28 55 54 24 AA 55 50 24 2C 32 31 29 3B C9 28 |.(UT$.UP$,21);.(| 00001180: 55 50 24 AA 55 47 24 AA C4 28 55 50 29 2C 31 38 |UP$.UG$..(UP),18| 00001190: 29 00 C0 19 5C 03 99 22 20 2D 2D 2D 2D 2D 2D 2D |)...\.." -------| 000011A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000011B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 |---------------"| 000011C0: 00 CF 19 60 03 8B 55 48 B3 B1 30 A7 38 37 30 00 |...`..UH..0.870.| 000011D0: 03 1A 61 03 99 C8 28 55 44 24 2C 32 34 29 3B C8 |..a...(UD$,24);.| 000011E0: 28 55 50 24 2C 37 29 3B 22 48 55 4C 50 20 2D 20 |(UP$,7);"HULP - | 000011F0: 44 52 55 4B 20 4F 50 20 48 20 3C 52 45 54 55 52 |DRUK OP H <RETUR| 00001200: 4E 3E 22 00 14 1A 66 03 55 48 B2 30 3A 99 22 13 |N>"...f.UH.0:.".| 00001210: 11 22 3A 8E 00 33 1A 6B 03 8F 20 2A 2A 20 50 4C |.":..3.k.. ** PL| 00001220: 45 41 53 45 20 57 41 49 54 20 52 45 4D 41 52 4B |EASE WAIT REMARK| 00001230: 20 2A 2A 00 69 1A 70 03 99 C8 28 55 44 24 2C 32 | **.i.p...(UD$,2| 00001240: 34 29 3B 22 20 20 20 20 20 20 20 20 20 20 20 45 |4);" E| 00001250: 45 4E 20 4D 4F 4D 45 4E 54 20 41 2E 55 2E 42 2E |EN MOMENT A.U.B.| 00001260: 2E 2E 2E 20 20 20 20 20 22 00 6F 1A 75 03 8E 00 |... ".o.u...| 00001270: 8C 1A 84 03 8F 20 2A 2A 20 53 45 54 20 55 50 20 |..... ** SET UP | 00001280: 56 41 52 49 41 42 4C 45 53 20 2A 2A 00 D7 1A 85 |VARIABLES **....| 00001290: 03 55 58 24 B2 22 48 22 3A 86 55 51 25 28 31 30 |.UX$."H":.UQ%(10| 000012A0: 30 30 29 3A 55 42 B2 33 32 37 36 38 3A 55 31 B2 |00):UB.32768:U1.| 000012B0: 31 39 36 3A 55 32 B2 31 39 37 3A 55 33 B2 31 39 |196:U2.197:U3.19| 000012C0: 38 3A 55 34 B2 32 31 36 3A 55 43 B2 31 36 37 3A |8:U4.216:UC.167:| 000012D0: 55 55 B2 31 30 32 34 00 15 1B 86 03 55 54 B2 35 |UU.1024.....UT.5| 000012E0: 39 34 36 38 3A 55 55 25 B2 31 32 3A 55 4C 25 B2 |9468:UU%.12:UL%.| 000012F0: 31 34 3A 55 50 25 B2 31 31 34 36 3A 55 4D B2 33 |14:UP%.1146:UM.3| 00001300: 32 37 36 38 3A 55 4F B2 31 35 38 3A 97 20 35 30 |2768:UO.158:. 50| 00001310: 30 30 33 2C 30 00 58 1B 87 03 8B C2 28 35 30 30 |003,0.X.....(500| 00001320: 30 33 29 B2 30 A7 55 42 B2 31 30 32 34 3A 55 31 |03).0.UB.1024:U1| 00001330: B2 32 30 39 3A 55 32 B2 32 31 30 3A 55 33 B2 32 |.209:U2.210:U3.2| 00001340: 31 31 3A 55 34 B2 32 31 34 3A 55 43 B2 32 30 34 |11:U4.214:UC.204| 00001350: 3A 55 55 B2 32 30 34 38 00 97 1B 88 03 8B C2 28 |:UU.2048.......(| 00001360: 35 30 30 30 33 29 B2 30 A7 55 54 B2 35 33 32 37 |50003).0.UT.5327| 00001370: 32 3A 55 55 25 B2 32 31 3A 55 4C 25 B2 32 33 3A |2:UU%.21:UL%.23:| 00001380: 55 50 25 B2 32 31 33 39 3A 55 4D B2 31 30 32 34 |UP%.2139:UM.1024| 00001390: 3A 55 4F B2 31 39 38 00 BB 1B 89 03 55 44 24 B2 |:UO.198.....UD$.| 000013A0: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............| 000013B0: 11 11 11 11 11 11 11 11 11 11 22 00 ED 1B 8A 03 |..........".....| 000013C0: 55 50 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 |UP$." | 000013D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000013E0: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 3B 1C | ".;.| 000013F0: 8B 03 55 54 24 B2 22 20 C6 D2 C1 CE D3 C5 A0 D4 |..UT$." ........| 00001400: CF D0 CF C7 D2 C1 C6 C9 C5 3A 52 45 4D 20 50 4C |.........:REM PL| 00001410: 41 43 45 20 50 52 4F 47 52 41 4D 20 54 49 54 4C |ACE PROGRAM TITL| 00001420: 45 20 48 45 52 45 20 21 21 21 21 21 21 21 21 21 |E HERE !!!!!!!!!| 00001430: 21 21 21 21 21 21 21 21 2A 2A 2A 00 57 1C 8C 03 |!!!!!!!!***.W...| 00001440: 86 51 24 28 31 32 29 2C 41 4E 24 28 31 32 29 2C |.Q$(12),AN$(12),| 00001450: 52 28 31 32 29 3A 8E 00 71 1C 8E 03 8F 20 2A 2A |R(12):..q.... **| 00001460: 20 53 45 54 20 56 41 52 49 41 42 4C 45 53 20 2A | SET VARIABLES *| 00001470: 2A 00 7A 1C 93 03 8D 39 30 30 00 80 1C 94 03 3A |*.z....900.....:| 00001480: 00 86 1C 95 03 3A 00 A1 1C 98 03 8F 20 2A 2A 20 |.....:...... ** | 00001490: 43 48 45 43 4B 20 46 4F 52 20 38 30 33 32 20 2A |CHECK FOR 8032 *| 000014A0: 2A 00 BF 1C 9D 03 99 22 93 22 3A 99 22 A0 22 3A |*......".":.".":| 000014B0: 8F 20 53 48 49 46 54 45 44 20 53 50 41 43 45 00 |. SHIFTED SPACE.| 000014C0: D6 1C A2 03 8B C2 28 55 42 AA 34 30 29 B3 B1 39 |......(UB.40)..9| 000014D0: 36 A7 8D 37 30 30 00 EF 1C A3 03 8F 20 2A 2A 20 |6..700...... ** | 000014E0: 4D 45 4D 4F 52 59 20 43 48 45 43 4B 20 2A 2A 00 |MEMORY CHECK **.| 000014F0: 03 1D A4 03 8B 20 B8 28 30 29 B1 32 30 30 30 A7 |..... .(0).2000.| 00001500: 39 33 37 00 31 1D A5 03 99 22 93 11 11 05 54 48 |937.1...."....TH| 00001510: 49 53 20 4D 41 43 48 49 4E 45 20 44 4F 45 53 20 |IS MACHINE DOES | 00001520: 4E 4F 54 20 48 41 56 45 20 45 4E 4F 55 47 48 11 |NOT HAVE ENOUGH.| 00001530: 22 00 55 1D A6 03 99 22 4D 45 4D 4F 52 59 20 54 |".U...."MEMORY T| 00001540: 4F 20 52 55 4E 20 54 48 49 53 20 50 52 4F 47 52 |O RUN THIS PROGR| 00001550: 41 4D 20 21 22 00 60 1D A7 03 9E 55 55 AA 37 31 |AM !".`....UU.71| 00001560: 00 66 1D A8 03 80 00 80 1D A9 03 99 22 93 05 22 |.f..........".."| 00001570: 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 39 36 32 |:..(50003).0.962| 00001580: 00 AF 1D AC 03 8F 20 2A 2A 20 42 41 53 49 43 20 |...... ** BASIC | 00001590: 32 2E 30 20 20 4F 52 20 20 34 2E 30 20 20 4F 52 |2.0 OR 4.0 OR| 000015A0: 20 20 43 2D 36 34 20 53 45 54 55 50 20 2A 2A 00 | C-64 SETUP **.| 000015B0: ED 1D AD 03 97 31 30 37 35 2C 31 33 33 3A 97 31 |.....1075,133:.1| 000015C0: 30 37 36 2C 31 34 34 3A 97 31 30 37 37 2C 32 33 |076,144:.1077,23| 000015D0: 34 3A 97 31 30 37 39 2C 34 3A 97 31 30 38 30 2C |4:.1079,4:.1080,| 000015E0: 31 33 33 3A 97 31 30 38 31 2C 31 34 35 00 23 1E |133:.1081,145.#.| 000015F0: AE 03 97 31 30 39 31 2C 31 35 35 3A 97 31 30 39 |...1091,155:.109| 00001600: 38 2C 31 33 33 3A 97 31 30 39 39 2C 31 34 34 3A |8,133:.1099,144:| 00001610: 97 31 31 30 30 2C 32 33 34 3A 97 31 31 30 33 2C |.1100,234:.1103,| 00001620: 31 33 33 00 45 1E AF 03 97 31 31 30 34 2C 31 34 |133.E....1104,14| 00001630: 35 3A 97 31 31 30 35 2C 32 33 34 3A 97 31 30 38 |5:.1105,234:.108| 00001640: 32 2C 32 33 34 00 5C 1E B1 03 8B C2 28 35 30 30 |2,234.\.....(500| 00001650: 30 33 29 B3 B1 31 36 30 A7 39 35 35 00 8B 1E B6 |03)..160.955....| 00001660: 03 97 31 30 39 33 2C 38 38 3A 97 31 30 39 34 2C |..1093,88:.1094,| 00001670: 32 32 38 3A 97 31 30 39 37 2C 38 35 3A 97 31 31 |228:.1097,85:.11| 00001680: 30 32 2C 32 32 38 3A 89 39 36 35 00 A0 1E BB 03 |02,228:.965.....| 00001690: 8B C2 28 35 30 30 30 33 29 B3 B1 31 A7 39 39 30 |..(50003)..1.990| 000016A0: 00 CF 1E C0 03 97 31 30 39 33 2C 34 39 3A 97 31 |......1093,49:.1| 000016B0: 30 39 34 2C 32 33 30 3A 97 31 30 39 37 2C 34 36 |094,230:.1097,46| 000016C0: 3A 97 31 31 30 32 2C 32 33 30 3A 89 39 36 35 00 |:.1102,230:.965.| 000016D0: 09 1F C2 03 97 32 30 39 39 2C 31 34 31 3A 97 32 |.....2099,141:.2| 000016E0: 31 30 30 2C 32 30 3A 97 32 31 30 31 2C 33 3A 97 |100,20:.2101,3:.| 000016F0: 32 31 30 33 2C 38 3A 97 32 31 30 34 2C 31 34 31 |2103,8:.2104,141| 00001700: 3A 97 32 31 30 35 2C 32 31 00 45 1F C3 03 97 32 |:.2105,21.E....2| 00001710: 31 30 36 2C 33 3A 97 32 31 31 35 2C 31 34 35 3A |106,3:.2115,145:| 00001720: 97 32 31 31 37 2C 35 32 3A 97 32 31 31 38 2C 32 |.2117,52:.2118,2| 00001730: 33 34 3A 97 32 31 32 31 2C 34 39 3A 97 32 31 32 |34:.2121,49:.212| 00001740: 32 2C 31 34 31 00 7F 1F C4 03 97 32 31 32 33 2C |2,141......2123,| 00001750: 32 30 3A 97 32 31 32 34 2C 33 3A 97 32 31 32 36 |20:.2124,3:.2126| 00001760: 2C 32 33 34 3A 97 32 31 32 37 2C 31 34 31 3A 97 |,234:.2127,141:.| 00001770: 32 31 32 38 2C 32 31 3A 97 32 31 32 39 2C 33 00 |2128,21:.2129,3.| 00001780: 9D 1F C5 03 9E 55 55 AA 34 38 3A 8F 20 44 49 53 |.....UU.48:. DIS| 00001790: 41 42 4C 45 20 53 54 4F 50 20 4B 45 59 00 AE 1F |ABLE STOP KEY...| 000017A0: CA 03 8D 38 30 30 3A 8F 20 54 49 54 4C 45 00 BE |...800:. TITLE..| 000017B0: 1F D4 03 89 33 30 30 3A 8F 20 4D 45 4E 55 00 EF |....300:. MENU..| 000017C0: 1F DE 03 99 22 93 54 48 45 20 50 47 4D 20 57 49 |....".THE PGM WI| 000017D0: 4C 4C 20 4E 4F 54 20 57 4F 52 4B 20 4F 4E 20 54 |LL NOT WORK ON T| 000017E0: 48 49 53 20 4D 41 43 48 49 4E 45 21 22 3A 80 00 |HIS MACHINE!":..| 000017F0: 24 20 E8 03 8B 55 5A B2 31 A7 9E 55 50 25 3A 9E |$ ...UZ.1..UP%:.| 00001800: 55 50 25 3A 55 5A B2 30 3A 8F 20 2A 2A 20 50 52 |UP%:UZ.0:. ** PR| 00001810: 4F 47 52 41 4D 20 53 54 41 52 54 53 20 48 45 52 |OGRAM STARTS HER| 00001820: 45 20 2A 2A 00 50 20 E9 03 99 22 93 05 22 3B 3A |E **.P ..."..";:| 00001830: 8C 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 |.:..(50003).0..5| 00001840: 33 32 38 31 2C 36 3A 97 35 33 32 38 30 2C 31 34 |3281,6:.53280,14| 00001850: 00 74 20 EB 03 9C 3A 8D 39 30 30 3A 55 54 24 B2 |.t ...:.900:UT$.| 00001860: 22 20 46 52 41 4E 53 45 20 54 4F 50 4F 47 52 41 |" FRANSE TOPOGRA| 00001870: 46 49 45 22 00 91 20 EC 03 81 4A B2 30 A4 31 31 |FIE".. ...J.0.11| 00001880: 3A 87 51 24 28 4A 29 2C 41 4E 24 28 4A 29 3A 82 |:.Q$(J),AN$(J):.| 00001890: 4A 00 C4 20 88 04 4E 43 B2 30 3A 83 49 4E 20 57 |J.. ..NC.0:.IN W| 000018A0: 45 4C 4B 20 57 45 52 45 4C 44 44 45 45 4C 20 4C |ELK WERELDDEEL L| 000018B0: 49 47 54 20 46 52 41 4E 4B 52 49 4A 4B 2C 45 55 |IGT FRANKRIJK,EU| 000018C0: 52 4F 50 41 00 F2 20 92 04 83 57 41 54 20 49 53 |ROPA.. ...WAT IS| 000018D0: 20 44 45 20 48 4F 4F 46 44 53 54 41 44 20 56 41 | DE HOOFDSTAD VA| 000018E0: 4E 20 46 52 41 4E 4B 52 49 4A 4B 2C 50 41 52 49 |N FRANKRIJK,PARI| 000018F0: 4A 53 00 2A 21 9C 04 83 41 41 4E 20 57 45 4C 4B |JS.*!...AAN WELK| 00001900: 45 20 4F 43 45 41 41 4E 20 4C 49 47 54 20 46 52 |E OCEAAN LIGT FR| 00001910: 41 4E 4B 52 49 4A 4B 2C 41 54 4C 41 4E 54 49 53 |ANKRIJK,ATLANTIS| 00001920: 43 48 45 20 4F 43 45 41 41 4E 00 5F 21 A6 04 83 |CHE OCEAAN._!...| 00001930: 57 45 4C 4B 45 20 5A 45 45 20 47 52 45 4E 53 54 |WELKE ZEE GRENST| 00001940: 20 41 41 4E 20 46 52 41 4E 4B 52 49 4A 4B 2C 4D | AAN FRANKRIJK,M| 00001950: 49 44 44 45 4C 4C 41 4E 44 53 45 20 5A 45 45 00 |IDDELLANDSE ZEE.| 00001960: 8C 21 B0 04 83 57 45 4C 4B 45 20 47 45 4C 44 53 |.!...WELKE GELDS| 00001970: 4F 4F 52 54 20 47 45 42 52 55 49 4B 45 4E 20 5A |OORT GEBRUIKEN Z| 00001980: 45 20 48 49 45 52 2C 46 52 41 4E 43 00 C7 21 BA |E HIER,FRANC..!.| 00001990: 04 83 57 41 54 20 56 4F 4F 52 20 45 45 4E 20 53 |..WAT VOOR EEN S| 000019A0: 50 4F 52 54 20 49 53 20 44 45 20 22 54 4F 55 52 |PORT IS DE "TOUR| 000019B0: 20 44 45 20 46 52 41 4E 2D 43 45 22 2C 57 49 45 | DE FRAN-CE",WIE| 000019C0: 4C 52 45 4E 4E 45 4E 00 FA 21 C4 04 83 48 4F 45 |LRENNEN..!...HOE| 000019D0: 20 48 45 45 54 20 48 45 54 20 46 52 41 4E 53 45 | HEET HET FRANSE| 000019E0: 20 56 4F 4C 4B 53 4C 49 45 44 2C 44 45 20 4D 41 | VOLKSLIED,DE MA| 000019F0: 52 53 45 49 4C 4C 41 49 53 45 00 2E 22 CE 04 83 |RSEILLAISE.."...| 00001A00: 57 41 54 20 49 53 20 46 52 41 4E 4B 52 49 4A 4B |WAT IS FRANKRIJK| 00001A10: 53 27 53 20 4E 41 54 49 4F 4E 41 4C 45 20 46 45 |S'S NATIONALE FE| 00001A20: 45 53 54 44 41 47 2C 31 34 20 4A 55 4C 49 00 54 |ESTDAG,14 JULI.T| 00001A30: 22 D8 04 83 57 45 4C 4B 45 20 52 49 56 49 45 52 |"...WELKE RIVIER| 00001A40: 20 49 53 20 44 45 20 4C 41 4E 47 53 54 45 2C 4C | IS DE LANGSTE,L| 00001A50: 4F 49 52 45 00 8B 22 E2 04 83 57 45 4C 4B 45 20 |OIRE.."...WELKE | 00001A60: 52 49 56 49 45 52 20 53 54 52 4F 4F 4D 54 20 49 |RIVIER STROOMT I| 00001A70: 4E 20 44 45 20 4D 49 44 44 45 4C 4C 41 4E 44 53 |N DE MIDDELLANDS| 00001A80: 45 20 5A 45 45 2C 52 48 4F 4E 45 00 C5 22 EC 04 |E ZEE,RHONE.."..| 00001A90: 83 57 45 4C 4B 20 47 45 42 45 52 47 54 45 20 4C |.WELK GEBERGTE L| 00001AA0: 49 47 54 20 4F 50 20 44 45 20 47 52 45 4E 53 20 |IGT OP DE GRENS | 00001AB0: 4D 45 54 20 53 50 41 4E 2D 4A 45 2C 50 59 52 45 |MET SPAN-JE,PYRE| 00001AC0: 4E 45 45 45 4E 00 04 23 F6 04 83 48 4F 45 20 48 |NEEEN..#...HOE H| 00001AD0: 45 45 54 20 44 45 20 4C 41 4E 47 53 54 45 20 54 |EET DE LANGSTE T| 00001AE0: 55 4E 4E 45 4C 20 49 4E 20 46 52 41 4E 4B 52 49 |UNNEL IN FRANKRI| 00001AF0: 4A 4B 2C 4D 4F 4E 54 20 42 4C 41 4E 43 20 54 55 |JK,MONT BLANC TU| 00001B00: 4E 4E 45 4C 00 0E 23 32 05 89 31 34 34 30 00 3B |NNEL..#2..1440.;| 00001B10: 23 5A 05 99 22 11 11 1D 1D 1D 1D C4 49 54 20 50 |#Z..".......IT P| 00001B20: 52 4F 47 52 41 4D 4D 41 20 47 45 45 46 54 20 4A |ROGRAMMA GEEFT J| 00001B30: 4F 55 20 56 52 41 47 45 4E 2E 22 00 67 23 64 05 |OU VRAGEN.".g#d.| 00001B40: 99 22 11 11 1D 1D 1D 1D CA 49 4A 20 4D 4F 45 54 |.".......IJ MOET| 00001B50: 20 44 49 45 20 44 41 4E 20 42 45 41 4E 54 57 4F | DIE DAN BEANTWO| 00001B60: 4F 52 44 45 4E 2E 22 00 94 23 6E 05 99 22 11 11 |ORDEN."..#n.."..| 00001B70: 1D 1D 1D 1D C1 4C 53 20 4A 4F 55 57 20 41 4E 54 |.....LS JOUW ANT| 00001B80: 57 4F 4F 52 44 20 47 4F 45 44 20 49 53 2C 20 47 |WOORD GOED IS, G| 00001B90: 41 20 20 22 00 BF 23 78 05 99 22 11 11 1D 1D 1D |A "..#x..".....| 00001BA0: 1D 1D 1D 1D 4A 45 20 4E 41 41 52 20 44 45 20 56 |....JE NAAR DE V| 00001BB0: 4F 4C 47 45 4E 44 45 20 56 52 41 41 47 2E 22 00 |OLGENDE VRAAG.".| 00001BC0: EC 23 82 05 99 22 11 11 1D 1D 1D 1D C1 4C 53 20 |.#...".......LS | 00001BD0: 48 45 54 20 46 4F 55 54 20 49 53 2C 20 4D 41 47 |HET FOUT IS, MAG| 00001BE0: 20 4A 45 20 48 45 54 20 4E 4F 47 22 00 1A 24 8C | JE HET NOG"..$.| 00001BF0: 05 99 22 11 11 11 1D 1D 1D 54 57 45 45 20 4B 45 |.."......TWEE KE| 00001C00: 45 52 20 50 52 4F 42 45 52 45 4E 2E C2 4F 4E 4E |ER PROBEREN..ONN| 00001C10: 45 20 C3 48 41 4E 43 45 21 22 00 25 24 96 05 8D |E .HANCE!".%$...| 00001C20: 38 33 35 3A 8E 00 4A 24 A0 05 55 48 B2 31 3A 8D |835:..J$..UH.1:.| 00001C30: 38 35 30 3A 8D 38 38 30 3A 81 4A B2 31 A4 31 31 |850:.880:.J.1.11| 00001C40: 3A 52 28 4A 29 B2 30 3A 82 4A 00 56 24 B4 05 81 |:R(J).0:.J.V$...| 00001C50: 4A B2 30 A4 31 31 00 68 24 BE 05 59 25 B2 BB 28 |J.0.11.h$..Y%..(| 00001C60: 54 31 29 AC 31 31 AA 31 00 82 24 C8 05 81 4B B2 |T1).11.1..$...K.| 00001C70: 31 A4 4A 3A 8B 52 28 4B 29 B2 59 25 A7 89 31 34 |1.J:.R(K).Y%..14| 00001C80: 37 30 00 A3 24 DC 05 82 4B 3A 52 28 4A 29 B2 59 |70..$...K:R(J).Y| 00001C90: 25 3A 82 4A 3A 55 50 B2 30 3A 55 48 B2 31 3A 8D |%:.J:UP.0:UH.1:.| 00001CA0: 38 35 30 00 D2 24 0E 06 99 C8 28 55 44 24 2C 31 |850..$....(UD$,1| 00001CB0: 30 29 22 1D 20 20 48 4F 45 56 45 45 4C 20 56 52 |0)". HOEVEEL VR| 00001CC0: 41 47 45 4E 20 57 49 4C 20 4A 45 20 48 45 42 42 |AGEN WIL JE HEBB| 00001CD0: 45 4E 00 E7 24 13 06 99 A3 31 36 29 22 11 28 31 |EN..$....16)".(1| 00001CE0: 2D 39 29 3F 20 22 3B 00 0E 25 18 06 55 53 24 B2 |-9)? ";..%..US$.| 00001CF0: 22 31 32 33 34 35 36 37 38 39 22 3A 55 4C B2 31 |"123456789":UL.1| 00001D00: 3A 8D 33 35 3A 4E 55 B2 C5 28 55 52 24 29 00 24 |:.35:NU..(UR$).$| 00001D10: 25 22 06 55 50 B2 30 3A 81 4A B2 31 A4 4E 55 3A |%".UP.0:.J.1.NU:| 00001D20: 4B 39 B2 30 00 3E 25 40 06 8D 38 35 30 3A 99 22 |K9.0.>%@..850:."| 00001D30: 20 11 22 51 24 28 52 28 4A 29 29 22 3F 22 00 64 | ."Q$(R(J))"?".d| 00001D40: 25 4A 06 99 22 20 11 11 3E 22 3B 3A 55 53 24 B2 |%J.." ..>";:US$.| 00001D50: 22 22 3A 55 4C B2 32 30 3A 8D 33 35 3A 55 41 24 |"":UL.20:.35:UA$| 00001D60: B2 55 52 24 00 70 25 54 06 4B 39 B2 4B 39 AA 31 |.UR$.p%T.K9.K9.1| 00001D70: 00 88 25 68 06 8B 55 41 24 B2 41 4E 24 28 52 28 |..%h..UA$.AN$(R(| 00001D80: 4A 29 29 A7 31 37 36 30 00 97 25 72 06 8B 4B 39 |J)).1760..%r..K9| 00001D90: B1 32 89 31 37 30 30 00 B4 25 7C 06 51 51 B2 51 |.2.1700..%|.QQ.Q| 00001DA0: 51 AA 31 3A 8B 51 51 B1 32 A7 51 51 B2 30 3A 89 |Q.1:.QQ.2.QQ.0:.| 00001DB0: 31 37 30 30 00 E1 25 7E 06 99 C8 28 55 44 24 2C |1700..%~...(UD$,| 00001DC0: 31 32 29 22 20 20 20 20 20 20 20 20 20 20 20 46 |12)" F| 00001DD0: 4F 55 54 2E 20 20 20 4E 4F 47 20 45 45 4E 53 2E |OUT. NOG EENS.| 00001DE0: 22 00 F8 25 86 06 55 50 B2 55 50 AB 31 3A 8D 38 |"..%..UP.UP.1:.8| 00001DF0: 33 35 3A 89 31 36 30 30 00 32 26 A4 06 5A 24 B2 |35:.1600.2&..Z$.| 00001E00: 22 4E 45 45 2C 48 45 54 20 49 53 20 22 AA 41 4E |"NEE,HET IS ".AN| 00001E10: 24 28 52 28 4A 29 29 3A 99 C8 28 55 44 24 2C 31 |$(R(J)):..(UD$,1| 00001E20: 32 29 A3 28 34 30 AB C3 28 5A 24 29 29 AD 32 29 |2).(40..(Z$)).2)| 00001E30: 5A 24 00 41 26 B8 06 51 51 B2 30 3A 89 31 37 37 |Z$.A&..QQ.0:.177| 00001E40: 30 00 76 26 E0 06 4E 43 B2 4E 43 AA 31 3A 99 C8 |0.v&..NC.NC.1:..| 00001E50: 28 55 44 24 2C 31 32 29 22 20 20 20 20 20 20 20 |(UD$,12)" | 00001E60: 20 20 20 20 20 20 12 2A 2A 2A 43 4F 52 52 45 43 | .***CORREC| 00001E70: 54 2A 2A 2A 92 22 00 82 26 EA 06 8D 38 33 35 3A |T***."..&...835:| 00001E80: 82 4A 00 90 26 F4 06 55 48 B2 31 3A 8D 38 35 30 |.J..&..UH.1:.850| 00001E90: 00 BB 26 FE 06 99 22 11 11 11 11 11 20 4A 49 4A |..&..."..... JIJ| 00001EA0: 20 42 45 41 4E 54 57 4F 4F 52 44 44 45 20 22 4E | BEANTWOORDDE "N| 00001EB0: 55 22 56 52 41 47 45 4E 2E 22 3B 00 C6 26 03 07 |U"VRAGEN.";..&..| 00001EC0: 99 22 91 22 3A 99 00 EC 26 08 07 99 22 11 11 20 |.".":...&...".. | 00001ED0: 4A 49 4A 20 48 41 44 20 45 52 22 4E 43 22 47 4F |JIJ HAD ER"NC"GO| 00001EE0: 45 44 20 45 4E 20 22 4E 55 AB 4E 43 00 FC 26 12 |ED EN "NU.NC..&.| 00001EF0: 07 99 22 11 11 20 46 4F 55 54 2E 22 00 0A 27 1C |..".. FOUT."..'.| 00001F00: 07 8D 38 33 35 3A 89 33 30 30 00 00 00 53 |..835:.300...S |
.......910.*.... ** ML STOP KEY DISABLE
**.U...."X.=........X` ......L4.X.1.....
...X`.T...."XHHH.H.HHHHHHH.H.HX`111"....
.."HHHHHHH`1"...... ** 4 - POP ML SUBROU
TINE **.H.... **GENERAL INPUT ROUTINE **
...... -------------------------------..
.... --- MADE BY EUNICE H ---.:..
.. ---REVISED BY RICHARD DEBOER---.`....
---VERT.: P.F.J.M. KNEGTEL, ---.Z...:
...AXEL DEC. 1984. .... ---------------
----------------.....:.....:.H.#.. +++ I
NPUT SECTION +++...(..UO,0:UR$."":UI$.""
...*..UL.0.UL.80...-..UC,0...2..UI$:.UI$
."".50.8.7..UI$.G(13).C(UR$)..1..UC,1:."
.";:.85.K.<..UI$.G(20).105._.>.. C(UR$)
..UL.50...A..120:. CHECK FOR VALID CHARA
CTER...F.UR$.UR$.UI$...K..UI$;...P..50.K
.U.. +++ CHECK FOR HELP REQUEST +++...Z.
.UR$.UX$.195:. EXIT TO HELP ROUTINE..._.
.UF.1..240...D.UF.0:.:..(.F.. ++ CHECK D
ELETE ++.9.I..C(UR$).1.50.Q.N.UR$.H(UR$,
C(UR$).1).C.S..". ..";:.50...X.. ++ CHE
CK FOR VALID CHARACTERS ++...}..C(US$).0
.150....US$.US$.UX$......US.1.C(US$).T.
...UI$.J(US$,US,1)...Z.........UI$."":..
..... ** STANDARD INPUT **......F(UI$).4
6...$....UI$.G(32)...A. ..F(UI$).48.F(UI
$).57.170.G.....D....F(UI$).65.F(UI$).90
.180.J..........F(UI$).193.F(UI$).218.UI
$."":.......B(UT).UU%.UI$.G(F(UI$).128):
........D...UI$."":....C.UF.1:. +++ HELP
ROUTINE EXIT +++...E..250...H..245...M.
.UQ.UB.(U2%.256.U1%.U3%.2).6.R.UQ%(UQ.UB
).B(UQ):.:.".".I.W.UZ.1:UV%.B(UT).R.X..3
00...Y.UZ.0:US$.UJ$:UG$.UK$:UP.UJ:UL.UK:
.B(50003).0..53281,6:.53280,14.K...UT$.U
L$:.".";:.UT,UV%:.UQ.UB.(U2%.256.U1%.U3%
.3)......UQ,UQ%(UQ.UB):.......U1,U1%....
..U2,U2%......U4,U4%......U3,U3%.1......
35.L...UD%.((U2%.256.U1%.U3%).UB).40:.H(
UD$,UD%.1):.......H(UD$,24);"
. HULP KOMT . ":......U1%.
B(U1):U2%.B(U2):U3%.B(U3):U4%.B(U4).....
UJ$.US$:UK$.UG$:UL$.UT$:UJ.UP:UK.UL.....
....,.. ** MENU **...-.:.'....".":.UT,UU
%:.B(50003).0..53281,9:.53280,8.-./.:.J.
1..". MENU".Y.6.." ------
--------------------------------"...;.."
.. 1. START FRANSE TOPOGRAFIE.P.
@..".. 2. LEERLING INSTRUKTIE "
...E..".. 3. LEERKRACHT INSTRUKT
IE "...O..".. 4. STOP..".H.T.."
--------------------------------------"
.S.Y..".. MAAK JE KEUZE UIT: (1-4)
";...^.UL.1:US$."1234":.35:. INPUT ROUT
INE..._..C(UR$).1.300...`.US$."".U.C..E(
UR$).1000,400,500,396...H..300...... **
RE-ENABLE STOP KEY AND END **.4....B(500
03)..1.B(50003)..160.B(50003)..0.399.^..
..UU.71:.B(50003).0..53281,6:.53280,14.J
...."..":..U....875:....... ** STUDENT I
NSTRUCTIONS **.....UT$." FRANSE TOPOGRAF
IE"......".":.UT,UL%:.B(50003).0..53281,
0:.53280,0.....UP.0:UG$."LEERLING INST":
.850...G..1370:UP.2:.850.G.L.." ..NOOT:.
..OM NAAR DE VOLGENDE VRAAG TE".P.V.." .
GAAN, DRUK JE OP DE SPATIEBALK "......"
.......WIL JE TERUG NAAR HET MENU, DRUK
"......" .DAN OP H RETURN".C....835.W...
.UZ.1..UP%:.217............ ** TEACHER I
NSTRUCTIONS **......".":.UT,UL%:.B(50003
).0..53281,2:.53280,10.H...UT$." FRANSE
TOPOGRAFIE":UP.0:UG$."LERAAR INST":.850
.~...UP.1:. 835:. 850:......" ..PROG
RAMMA NAAM: FRANSE TOPOGRAFIE ..W...."
GESCHREVEN DOOR : EUNICE H........"
VERTALING DOOR : P.F.J.M. KNEGTEL .
.3...." .DIT PROGR. IS GESCHIKT VOOR
:...Z...." BASIC 2.0 PET COMPUTE
R......." BASIC 4.0 PET COMPUTER
......." 8032 CBM COMPUTER..H...
." COMMODORE 64 COMPUTER.Q.D..83
5...N..UZ.1..UP%:.217...W.....X.. ** PRO
GRAM MODIFICATION INST **.".Y..".":.UT,U
L%.B.].UP.0:UG$."PROGRAM MOD":.850.K....
835._....UZ.1..UP%:.217.E.......... ** T
O USE 8032 LOAD CBM4032 **...F..".....BE
FORE RUNNING THIS PROGRAM ON AN 8032 ..
...P.." LOAD THE 'CBM 4032' PROGRAM
............."...Z..UU.71.......,.... **
TO USE 8032 LOAD CBM4032 **.W...."....B
EFORE RUNNING THIS PROGRAM ON AN 8032 .
.LOAD CBM 4032 PROGRAM"......1093:.... .
. ** T I T L E P A G E **.W.".."....";
:.UT,UU%:.B(50003).0..53280,14:.53281,6.
..$..I.1.38:."...";:....&..I.1.22:."....
.";:....(..I.1.37:.".....";:..5.*..I.1.2
2:.".....";:..Z.,.."....................
....... ..|...."................... .
. .....0.."................... . ......
2..".................... ....4.."......
........C O M M O D O R E.....6.."......
.........EDUCATIEVE ...%.8.."...........
.....SOFTWARE.@.:.. ** COMMODORE LOGO **
.X.;..H(UD$,24);"..........DRUK OP DE SP
ATIEBALK .":I.0...<..A$:.A$.." ".I.I.1:
.I.250.828...>.T1$."":T2$."":T3$."":T4$.
"":I.0.G.@..300...C.. ** SPACE BAR PRESS
**...H..UO,0:.H(UD$,24);".......DRUK OP
DE SPATIEBALK .".5.L..UI$:.UI$.."
".844.;.N...[.R.. ** PAGE DESIGN ROUTINE
**.G.T.UP.UP.1...W.."."H(UT$.UP$,21);I(
UP$.UG$.D(UP),18)...\.." ---------------
-----------------------".O.`..UH..0.870.
..A..H(UD$,24);H(UP$,7);"HULP - DRUK OP
H <RETURN>"...F.UH.0:."..":..3.K.. ** PL
EASE WAIT REMARK **.I.P..H(UD$,24);"
EEN MOMENT A.U.B.... ".O.U...
..... ** SET UP VARIABLES **.W...UX$."H"
:.UQ%(1000):UB.32768:U1.196:U2.197:U3.19
8:U4.216:UC.167:UU.1024.....UT.59468:UU%
.12:UL%.14:UP%.1146:UM.32768:UO.158:. 50
003,0.X....B(50003).0.UB.1024:U1.209:U2.
210:U3.211:U4.214:UC.204:UU.2048......B(
50003).0.UT.53272:UU%.21:UL%.23:UP%.2139
:UM.1024:UO.198.....UD$."...............
..........".....UP$."
".;...UT$." FRANSE T
OPOGRAFIE:REM PLACE PROGRAM TITLE HERE !
!!!!!!!!!!!!!!!!***.W....Q$(12),AN$(12),
R(12):..Q.... ** SET VARIABLES **.Z....9
00.....:.....:...... ** CHECK FOR 8032 *
*......".":." ":. SHIFTED SPACE.V....B(U
B.40)..96..700...... ** MEMORY CHECK **.
..... .(0).2000.937.1...."....THIS MACHI
NE DOES NOT HAVE ENOUGH.".U...."MEMORY T
O RUN THIS PROGRAM !".`....UU.71.F......
...."..":.B(50003).0.962...... ** BASIC
2.0 OR 4.0 OR C-64 SETUP **......107
5,133:.1076,144:.1077,234:.1079,4:.1080,
133:.1081,145.#....1091,155:.1098,133:.1
099,144:.1100,234:.1103,133.E....1104,14
5:.1105,234:.1082,234.\....B(50003)..160
.955......1093,88:.1094,228:.1097,85:.11
02,228:.965. ....B(50003)..1.990.O....10
93,49:.1094,230:.1097,46:.1102,230:.965.
..B..2099,141:.2100,20:.2101,3:.2103,8:.
2104,141:.2105,21.E.C..2106,3:.2115,145:
.2117,52:.2118,234:.2121,49:.2122,141..
D..2123,20:.2124,3:.2126,234:.2127,141:.
2128,21:.2129,3...E..UU.48:. DISABLE STO
P KEY...J..800:. TITLE...T..300:. MENU..
....".THE PGM WILL NOT WORK ON THIS MACH
INE!":..$ ...UZ.1..UP%:.UP%:UZ.0:. ** PR
OGRAM STARTS HERE **.P ..."..";:.:.B(500
03).0..53281,6:.53280,14.T ...:.900:UT$.
" FRANSE TOPOGRAFIE".. ...J.0.11:.Q$(J),
AN$(J):.J.D ..NC.0:.IN WELK WERELDDEEL L
IGT FRANKRIJK,EUROPA.. ...WAT IS DE HOOF
DSTAD VAN FRANKRIJK,PARIJS.*!...AAN WELK
E OCEAAN LIGT FRANKRIJK,ATLANTISCHE OCEA
AN._!...WELKE ZEE GRENST AAN FRANKRIJK,M
IDDELLANDSE ZEE..!...WELKE GELDSOORT GEB
RUIKEN ZE HIER,FRANC.G!...WAT VOOR EEN S
PORT IS DE "TOUR DE FRAN-CE",WIELRENNEN.
.!D..HOE HEET HET FRANSE VOLKSLIED,DE MA
RSEILLAISE.."N..WAT IS FRANKRIJKS'S NATI
ONALE FEESTDAG,14 JULI.T"X..WELKE RIVIER
IS DE LANGSTE,LOIRE.."...WELKE RIVIER S
TROOMT IN DE MIDDELLANDSE ZEE,RHONE.E"..
.WELK GEBERGTE LIGT OP DE GRENS MET SPAN
-JE,PYRENEEEN..#...HOE HEET DE LANGSTE T
UNNEL IN FRANKRIJK,MONT BLANC TUNNEL..#2
..1440.;#Z.."......DIT PROGRAMMA GEEFT J
OU VRAGEN.".G#D.."......JIJ MOET DIE DAN
BEANTWOORDEN."..#N.."......ALS JOUW ANT
WOORD GOED IS, GA "..#X..".........JE N
AAR DE VOLGENDE VRAAG."..#..."......ALS
HET FOUT IS, MAG JE HET NOG"..$...".....
.TWEE KEER PROBEREN.BONNE CHANCE!".%$...
835:..J$ .UH.1:.850:.880:.J.1.11:R(J).0:
.J.V$...J.0.11.H$..Y%..(T1).11.1..$H..K.
1.J:.R(K).Y%..1470..$...K:R(J).Y%:.J:UP.
0:UH.1:.850.R$...H(UD$,10)". HOEVEEL VR
AGEN WIL JE HEBBEN..$....16)".(1-9)? ";.
.%..US$."123456789":UL.1:.35:NU.E(UR$).$
%".UP.0:.J.1.NU:K9.0.>%@..850:." ."Q$(R(
J))"?".D%J.." ..>";:US$."":UL.20:.35:UA$
.UR$.P%T.K9.K9.1..%H..UA$.AN$(R(J)).1760
..%R..K9.2.1700..%|.QQ.QQ.1:.QQ.2.QQ.0:.
1700..%~..H(UD$,12)" FOUT. N
OG EENS."..%..UP.UP.1:.835:.1600.2&..Z$.
"NEE,HET IS ".AN$(R(J)):.H(UD$,12).(40.C
(Z$)).2)Z$.A&..QQ.0:.1770.V&..NC.NC.1:.H
(UD$,12)" .***CORRECT***."..
&...835:.J..&..UH.1:.850..&..."..... JIJ
BEANTWOORDDE "NU"VRAGEN.";.F&...".":...
&...".. JIJ HAD ER"NC"GOED EN "NU.NC..&.
..".. FOUT."..'...835:.300...S
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL