2 VERGELIJKINGEN
FILE INFORMATION
FILENAME(S): 2 VERGELIJKINGEN
FILE TYPE(S): PRG
FILE SIZE: 7.5K
FIRST SEEN: 2025-11-30 21:23:30
APPEARS ON: 1 disk(s)
FILE HASH
ca2aefa7441affcfabf5b1a10e4e62bd4dcf9604737529448b297edaab6dff15
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 SPEL 34 1 | 2 VERGELIJKINGEN | PRG | DuncanTwain | 3 | 0 | 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 E4 08 23 00 8F 20 2B |UTINE **...#.. +|
000000D0: 2B 2B 20 49 4E 50 55 54 20 53 45 43 54 49 4F 4E |++ INPUT SECTION|
000000E0: 20 2B 2B 2B 00 FC 08 28 00 97 55 4F 2C 30 3A 55 | +++...(..UO,0:U|
000000F0: 52 24 B2 22 22 3A 55 49 24 B2 22 22 00 0C 09 2A |R$."":UI$.""...*|
00000100: 00 8B 55 4C B2 30 A7 55 4C B2 38 30 00 16 09 2D |..UL.0.UL.80...-|
00000110: 00 97 55 43 2C 30 00 2A 09 32 00 A1 55 49 24 3A |..UC,0.*.2..UI$:|
00000120: 8B 55 49 24 B2 22 22 A7 35 30 00 54 09 37 00 8B |.UI$."".50.T.7..|
00000130: 55 49 24 B2 C7 28 31 33 29 AF C3 28 55 52 24 29 |UI$..(13)..(UR$)|
00000140: B1 B2 31 A7 97 55 43 2C 31 3A 99 22 20 9D 22 3B |..1..UC,1:." .";|
00000150: 3A 89 38 35 00 67 09 3C 00 8B 55 49 24 B2 C7 28 |:.85.g.<..UI$..(|
00000160: 32 30 29 A7 31 30 35 00 7B 09 3E 00 8B 20 C3 28 |20).105.{.>.. .(|
00000170: 55 52 24 29 B2 B1 55 4C A7 35 30 00 A0 09 41 00 |UR$)..UL.50...A.|
00000180: 8D 31 32 30 3A 8F 20 43 48 45 43 4B 20 46 4F 52 |.120:. CHECK FOR|
00000190: 20 56 41 4C 49 44 20 43 48 41 52 41 43 54 45 52 | VALID CHARACTER|
000001A0: 00 B0 09 46 00 55 52 24 B2 55 52 24 AA 55 49 24 |...F.UR$.UR$.UI$|
000001B0: 00 BA 09 4B 00 99 55 49 24 3B 00 C2 09 50 00 89 |...K..UI$;...P..|
000001C0: 35 30 00 E7 09 55 00 8F 20 2B 2B 2B 20 43 48 45 |50...U.. +++ CHE|
000001D0: 43 4B 20 46 4F 52 20 48 45 4C 50 20 52 45 51 55 |CK FOR HELP REQU|
000001E0: 45 53 54 20 2B 2B 2B 00 0F 0A 5A 00 8B 55 52 24 |EST +++...Z..UR$|
000001F0: B2 55 58 24 A7 31 39 35 3A 8F 20 45 58 49 54 20 |.UX$.195:. EXIT |
00000200: 54 4F 20 48 45 4C 50 20 52 4F 55 54 49 4E 45 00 |TO HELP ROUTINE.|
00000210: 1E 0A 5F 00 8B 55 46 B2 31 A7 8D 32 34 30 00 2B |.._..UF.1..240.+|
00000220: 0A 64 00 55 46 B2 30 3A 99 3A 8E 00 44 0A 66 00 |.d.UF.0:.:..D.f.|
00000230: 8F 20 2B 2B 20 43 48 45 43 4B 20 44 45 4C 45 54 |. ++ CHECK DELET|
00000240: 45 20 2B 2B 00 55 0A 69 00 8B C3 28 55 52 24 29 |E ++.U.i...(UR$)|
00000250: B3 31 A7 35 30 00 6D 0A 6E 00 55 52 24 B2 C8 28 |.1.50.m.n.UR$..(|
00000260: 55 52 24 2C C3 28 55 52 24 29 AB 31 29 00 7F 0A |UR$,.(UR$).1)...|
00000270: 73 00 99 22 9D 20 20 9D 9D 22 3B 3A 89 35 30 00 |s..". ..";:.50.|
00000280: A6 0A 78 00 8F 20 2B 2B 20 43 48 45 43 4B 20 46 |..x.. ++ CHECK F|
00000290: 4F 52 20 56 41 4C 49 44 20 43 48 41 52 41 43 54 |OR VALID CHARACT|
000002A0: 45 52 53 20 2B 2B 00 B8 0A 7D 00 8B C3 28 55 53 |ERS ++...}...(US|
000002B0: 24 29 B2 30 A7 31 35 30 00 C8 0A 7F 00 55 53 24 |$).0.150.....US$|
000002C0: B2 55 53 24 AA 55 58 24 00 D9 0A 82 00 81 55 53 |.US$.UX$......US|
000002D0: B2 31 A4 C3 28 55 53 24 29 00 F0 0A 87 00 8B 55 |.1..(US$)......U|
000002E0: 49 24 B2 CA 28 55 53 24 2C 55 53 2C 31 29 A7 8E |I$..(US$,US,1)..|
000002F0: 00 F6 0A 8C 00 82 00 03 0B 91 00 55 49 24 B2 22 |...........UI$."|
00000300: 22 3A 8E 00 1E 0B 96 00 8F 20 2A 2A 20 53 54 41 |":....... ** STA|
00000310: 4E 44 41 52 44 20 49 4E 50 55 54 20 2A 2A 00 2F |NDARD INPUT **./|
00000320: 0B 98 00 8B C6 28 55 49 24 29 B2 34 36 A7 8E 00 |.....(UI$).46...|
00000330: 40 0B 9B 00 8B 55 49 24 B2 C7 28 33 32 29 A7 8E |@....UI$..(32)..|
00000340: 00 5D 0B A0 00 8B C6 28 55 49 24 29 B3 34 35 B0 |.].....(UI$).45.|
00000350: C6 28 55 49 24 29 B1 35 37 A7 31 37 30 00 63 0B |.(UI$).57.170.c.|
00000360: A5 00 8E 00 80 0B AA 00 8B C6 28 55 49 24 29 B3 |..........(UI$).|
00000370: 36 35 B0 C6 28 55 49 24 29 B1 39 30 A7 31 38 30 |65..(UI$).90.180|
00000380: 00 86 0B AF 00 8E 00 AA 0B B4 00 8B C6 28 55 49 |.............(UI|
00000390: 24 29 B3 31 39 33 B0 C6 28 55 49 24 29 B1 32 31 |$).193..(UI$).21|
000003A0: 38 A7 55 49 24 B2 22 22 3A 8E 00 CD 0B B9 00 8B |8.UI$."":.......|
000003B0: C2 28 55 54 29 B2 55 55 25 A7 55 49 24 B2 C7 28 |.(UT).UU%.UI$..(|
000003C0: C6 28 55 49 24 29 AB 31 32 38 29 3A 8E 00 D3 0B |.(UI$).128):....|
000003D0: BB 00 8E 00 E0 0B BE 00 55 49 24 B2 22 22 3A 8E |........UI$."":.|
000003E0: 00 05 0C C3 00 55 46 B2 31 3A 8F 20 2B 2B 2B 20 |.....UF.1:. +++ |
000003F0: 48 45 4C 50 20 52 4F 55 54 49 4E 45 20 45 58 49 |HELP ROUTINE EXI|
00000400: 54 20 2B 2B 2B 00 0E 0C C5 00 8D 32 35 30 00 17 |T +++......250..|
00000410: 0C C8 00 8D 32 34 35 00 36 0C CD 00 81 55 51 B2 |....245.6....UQ.|
00000420: 55 42 A4 28 55 32 25 AC 32 35 36 AA 55 31 25 AA |UB.(U2%.256.U1%.|
00000430: 55 33 25 AB 32 29 00 52 0C D2 00 55 51 25 28 55 |U3%.2).R...UQ%(U|
00000440: 51 AB 55 42 29 B2 C2 28 55 51 29 3A 82 3A 99 22 |Q.UB)..(UQ):.:."|
00000450: 93 22 00 65 0C D7 00 55 5A B2 31 3A 55 56 25 B2 |.".e...UZ.1:UV%.|
00000460: C2 28 55 54 29 00 6E 0C D8 00 89 33 30 30 00 B2 |.(UT).n....300..|
00000470: 0C D9 00 55 5A B2 30 3A 55 53 24 B2 55 4A 24 3A |...UZ.0:US$.UJ$:|
00000480: 55 47 24 B2 55 4B 24 3A 55 50 B2 55 4A 3A 55 4C |UG$.UK$:UP.UJ:UL|
00000490: B2 55 4B 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 |.UK:..(50003).0.|
000004A0: 97 35 33 32 38 31 2C 36 3A 97 35 33 32 38 30 2C |.53281,6:.53280,|
000004B0: 31 34 00 C0 0C DA 00 97 35 39 34 36 38 2C 55 4F |14......59468,UO|
000004C0: 00 F5 0C DC 00 55 54 24 B2 55 4C 24 3A 99 22 93 |.....UT$.UL$:.".|
000004D0: 22 3B 3A 97 55 54 2C 55 56 25 3A 81 55 51 B2 55 |";:.UT,UV%:.UQ.U|
000004E0: 42 A4 28 55 32 25 AC 32 35 36 AA 55 31 25 AA 55 |B.(U2%.256.U1%.U|
000004F0: 33 25 AB 33 29 00 0A 0D E1 00 97 55 51 2C 55 51 |3%.3)......UQ,UQ|
00000500: 25 28 55 51 AB 55 42 29 3A 82 00 16 0D E6 00 97 |%(UQ.UB):.......|
00000510: 55 31 2C 55 31 25 00 22 0D E8 00 97 55 32 2C 55 |U1,U1%."....U2,U|
00000520: 32 25 00 2E 0D E9 00 97 55 34 2C 55 34 25 00 3C |2%......U4,U4%.<|
00000530: 0D EA 00 97 55 33 2C 55 33 25 AB 31 00 44 0D EB |....U3,U3%.1.D..|
00000540: 00 89 33 35 00 76 0D F0 00 55 44 25 B2 28 28 55 |..35.v...UD%.((U|
00000550: 32 25 AC 32 35 36 AA 55 31 25 AA 55 33 25 29 AB |2%.256.U1%.U3%).|
00000560: 55 42 29 AD 34 30 3A 99 C8 28 55 44 24 2C 55 44 |UB).40:..(UD$,UD|
00000570: 25 AA 31 29 3A 8E 00 B1 0D F5 00 99 C8 28 55 44 |%.1):........(UD|
00000580: 24 2C 32 34 29 3B 22 20 20 20 20 20 20 20 20 20 |$,24);" |
00000590: 20 20 20 20 20 20 20 20 20 20 20 20 20 12 20 48 | . H|
000005A0: 55 4C 50 20 4B 4F 4D 54 20 20 20 92 20 20 22 3A |ULP KOMT . ":|
000005B0: 8E 00 DD 0D FA 00 55 31 25 B2 C2 28 55 31 29 3A |......U1%..(U1):|
000005C0: 55 32 25 B2 C2 28 55 32 29 3A 55 33 25 B2 C2 28 |U2%..(U2):U3%..(|
000005D0: 55 33 29 3A 55 34 25 B2 C2 28 55 34 29 00 05 0E |U3):U4%..(U4)...|
000005E0: FB 00 55 4A 24 B2 55 53 24 3A 55 4B 24 B2 55 47 |..UJ$.US$:UK$.UG|
000005F0: 24 3A 55 4C 24 B2 55 54 24 3A 55 4A B2 55 50 3A |$:UL$.UT$:UJ.UP:|
00000600: 55 4B B2 55 4C 00 0B 0E FF 00 8E 00 1C 0E 2C 01 |UK.UL.........,.|
00000610: 8F 20 2A 2A 20 4D 45 4E 55 20 2A 2A 00 22 0E 2D |. ** MENU **.".-|
00000620: 01 3A 00 51 0E 2E 01 99 22 93 22 3A 97 55 54 2C |.:.Q....".":.UT,|
00000630: 55 55 25 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 |UU%:..(50003).0.|
00000640: 97 35 33 32 38 31 2C 39 3A 97 35 33 32 38 30 2C |.53281,9:.53280,|
00000650: 38 00 57 0E 2F 01 3A 00 74 0E 31 01 99 22 13 20 |8.W./.:.t.1..". |
00000660: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4D | M|
00000670: 45 4E 55 22 00 A3 0E 36 01 99 22 20 2D 2D 2D 2D |ENU"...6.." ----|
00000680: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000690: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000006A0: 2D 2D 22 00 CC 0E 3B 01 99 22 11 11 20 20 20 20 |--"...;..".. |
000006B0: 20 20 20 31 2E 20 20 20 54 57 45 45 20 56 45 52 | 1. TWEE VER|
000006C0: 47 45 4C 49 4A 4B 49 4E 47 45 4E 22 00 F6 0E 40 |GELIJKINGEN"...@|
000006D0: 01 99 22 11 11 20 20 20 20 20 20 20 32 2E 20 20 |..".. 2. |
000006E0: 20 4C 45 45 52 4C 49 4E 47 20 49 4E 53 54 52 55 | LEERLING INSTRU|
000006F0: 4B 54 49 45 20 22 00 1D 0F 45 01 99 22 11 11 20 |KTIE "...E..".. |
00000700: 20 20 20 20 20 20 33 2E 20 20 20 4C 45 52 41 41 | 3. LERAA|
00000710: 52 20 49 4E 53 54 52 55 4B 54 49 45 22 00 39 0F |R INSTRUKTIE".9.|
00000720: 4F 01 99 22 11 11 20 20 20 20 20 20 20 34 2E 20 |O..".. 4. |
00000730: 20 20 53 54 4F 50 11 11 22 00 68 0F 54 01 99 22 | STOP..".h.T.."|
00000740: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------|
00000750: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000760: 2D 2D 2D 2D 2D 2D 2D 22 00 91 0F 59 01 99 22 11 |-------"...Y..".|
00000770: 11 20 20 20 20 20 20 20 4B 49 45 53 20 45 45 4E |. KIES EEN|
00000780: 20 4E 55 4D 4D 45 52 20 20 28 31 2D 34 29 20 22 | NUMMER (1-4) "|
00000790: 3B 00 B8 0F 5E 01 55 4C B2 31 3A 55 53 24 B2 22 |;...^.UL.1:US$."|
000007A0: 31 32 33 34 22 3A 8D 33 35 3A 8F 20 49 4E 50 55 |1234":.35:. INPU|
000007B0: 54 20 52 64 7F 49 4E 45 00 CA 0F 5F 01 8B C3 28 |T Rd.INE..._...(|
000007C0: 55 52 24 29 B1 31 A7 33 30 30 00 D5 0F 60 01 55 |UR$).1.300...`.U|
000007D0: 53 24 B2 22 22 00 F2 0F 63 01 91 C5 28 55 52 24 |S$.""...c...(UR$|
000007E0: 29 8D 31 30 30 30 2C 34 30 30 2C 35 30 30 2C 33 |).1000,400,500,3|
000007F0: 39 36 00 FB 0F 68 01 89 33 30 30 00 22 10 8B 01 |96...h..300."...|
00000800: 8F 20 2A 2A 20 52 45 2D 45 4E 41 42 4C 45 20 53 |. ** RE-ENABLE S|
00000810: 54 4F 50 20 4B 45 59 20 41 4E 44 20 45 4E 44 20 |TOP KEY AND END |
00000820: 2A 2A 00 51 10 8C 01 8B C2 28 35 30 30 30 33 29 |**.Q.....(50003)|
00000830: B3 B1 31 AF C2 28 35 30 30 30 33 29 B3 B1 31 36 |..1..(50003)..16|
00000840: 30 AF C2 28 35 30 30 30 33 29 B3 B1 30 A7 33 39 |0..(50003)..0.39|
00000850: 39 00 7B 10 8D 01 9E 55 55 AA 37 31 3A 8B C2 28 |9.{....UU.71:..(|
00000860: 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C |50003).0..53281,|
00000870: 36 3A 97 35 33 32 38 30 2C 31 34 00 87 10 8E 01 |6:.53280,14.....|
00000880: 99 22 9A 93 22 3A 80 00 92 10 8F 01 8D 38 37 35 |."..":.......875|
00000890: 3A 8E 00 B3 10 90 01 8F 20 2A 2A 20 53 54 55 44 |:....... ** STUD|
000008A0: 45 4E 54 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 |ENT INSTRUCTIONS|
000008B0: 20 2A 2A 00 E2 10 95 01 99 22 93 22 3A 97 55 54 | **......".":.UT|
000008C0: 2C 55 4C 25 3A 8B C2 28 35 30 30 30 33 29 B2 30 |,UL%:..(50003).0|
000008D0: A7 97 35 33 32 38 31 2C 30 3A 97 35 33 32 38 30 |..53281,0:.53280|
000008E0: 2C 30 00 0A 11 9A 01 55 50 B2 30 3A 55 47 24 B2 |,0.....UP.0:UG$.|
000008F0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00000900: 20 20 20 20 22 3A 8D 38 35 30 00 52 11 C2 01 99 | ":.850.R....|
00000910: 22 11 20 C4 49 54 20 50 52 4F 47 52 41 4D 4D 41 |". .IT PROGRAMMA|
00000920: 20 4C 4F 53 54 20 54 57 45 45 20 56 45 52 47 45 | LOST TWEE VERGE|
00000930: 4C 49 4A 4B 49 4E 47 45 4E 20 20 4D 45 54 20 54 |LIJKINGEN MET T|
00000940: 57 45 45 20 4F 4E 42 45 4B 45 4E 44 45 4E 20 4F |WEE ONBEKENDEN O|
00000950: 50 2E 00 93 11 CC 01 99 22 11 11 20 CC 45 54 20 |P.......".. .ET |
00000960: 4F 50 3A 20 4E 41 20 49 4E 56 4F 45 52 20 56 41 |OP: NA INVOER VA|
00000970: 4E 20 45 45 4E 20 47 45 54 41 4C 20 20 20 20 20 |N EEN GETAL |
00000980: 20 20 20 20 54 4F 45 54 53 20 3C 52 45 54 55 52 | TOETS <RETUR|
00000990: 4E 3E 22 00 BE 11 DB 01 99 22 11 20 D4 45 52 55 |N>"......". .ERU|
000009A0: 47 20 4E 41 41 52 20 4D 45 4E 55 2C 54 4F 45 54 |G NAAR MENU,TOET|
000009B0: 53 20 48 20 3C 52 45 54 55 52 4E 3E 20 22 00 C7 |S H <RETURN> "..|
000009C0: 11 E5 01 8D 38 33 35 00 DB 11 EA 01 8B 55 5A B2 |....835......UZ.|
000009D0: 31 A7 9E 55 50 25 3A 89 32 31 37 00 E1 11 F3 01 |1..UP%:.217.....|
000009E0: 8E 00 02 12 F4 01 8F 20 2A 2A 20 54 45 41 43 48 |....... ** TEACH|
000009F0: 45 52 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 20 |ER INSTRUCTIONS |
00000A00: 2A 2A 00 32 12 F5 01 99 22 93 22 3A 97 55 54 2C |**.2....".":.UT,|
00000A10: 55 4C 25 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 |UL%:..(50003).0.|
00000A20: 97 35 33 32 38 31 2C 32 3A 97 35 33 32 38 30 2C |.53281,2:.53280,|
00000A30: 31 30 00 58 12 F6 01 55 50 B2 30 3A 55 47 24 B2 |10.X...UP.0:UG$.|
00000A40: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00000A50: 20 20 22 3A 8D 38 35 30 00 86 12 F7 01 99 22 11 | ":.850......".|
00000A60: 11 20 20 20 20 20 20 D4 4F 20 54 48 45 20 42 45 |. .O THE BE|
00000A70: 53 54 20 4F 46 20 4F 55 52 20 4B 4E 4F 57 4C 45 |ST OF OUR KNOWLE|
00000A80: 44 47 45 2C 11 22 00 AF 12 F8 01 99 22 20 20 20 |DGE,."......" |
00000A90: 54 48 49 53 20 50 52 4F 47 52 41 4D 20 49 53 20 |THIS PROGRAM IS |
00000AA0: 49 4E 20 54 48 45 20 50 55 42 4C 49 43 11 22 00 |IN THE PUBLIC.".|
00000AB0: DB 12 F9 01 99 22 20 20 20 44 4F 4D 41 49 4E 2E |....." DOMAIN.|
00000AC0: 20 20 C9 46 20 54 48 49 53 20 49 53 20 4E 4F 54 | .F THIS IS NOT|
00000AD0: 20 54 48 45 20 43 41 53 45 11 22 00 F8 12 FA 01 | THE CASE.".....|
00000AE0: 99 22 20 20 20 50 4C 45 41 53 45 20 43 4F 4E 54 |." PLEASE CONT|
00000AF0: 41 43 54 3A 11 11 11 22 00 22 13 FB 01 99 22 20 |ACT:..."."...." |
00000B00: 20 20 20 20 20 C3 4F 4D 4D 4F 44 4F 52 45 20 C2 | .OMMODORE .|
00000B10: 55 53 49 4E 45 53 53 20 CD 41 43 48 49 4E 45 53 |USINESS .ACHINES|
00000B20: 11 22 00 45 13 FC 01 99 22 20 20 20 20 20 20 20 |.".E...." |
00000B30: 20 20 20 33 33 37 30 20 D0 48 41 52 4D 41 43 59 | 3370 .HARMACY|
00000B40: 20 C1 56 45 2E 00 69 13 FD 01 99 22 20 20 20 20 | .VE..i...." |
00000B50: 20 20 20 20 20 20 C1 47 49 4E 43 4F 55 52 54 2C | .GINCOURT,|
00000B60: 20 CF 4E 54 41 52 49 4F 22 00 8B 13 FE 01 99 22 | .NTARIO"......"|
00000B70: 20 20 20 20 20 20 20 20 20 20 C3 41 4E 41 44 41 | .ANADA|
00000B80: 20 20 20 CD 31 D7 20 32 CB 34 22 00 AB 13 FF 01 | .1. 2.4".....|
00000B90: 99 22 20 20 20 20 20 20 20 20 20 20 28 34 31 36 |." (416|
00000BA0: 29 20 34 39 39 2D 34 32 39 32 22 00 C1 13 00 02 |) 499-4292".....|
00000BB0: 55 50 B2 31 3A 8D 20 38 33 35 3A 8D 20 38 35 30 |UP.1:. 835:. 850|
00000BC0: 3A 00 EC 13 01 02 99 22 20 20 20 20 20 11 11 D0 |:......" ...|
00000BD0: 52 4F 47 52 41 4D 20 CE 41 4D 45 3A 20 C9 4E 54 |ROGRAM .AME: .NT|
00000BE0: 45 52 53 45 43 54 20 CC 49 4E 45 11 00 13 14 02 |ERSECT .INE.....|
00000BF0: 02 99 22 20 20 20 20 20 D7 52 49 54 54 45 4E 20 |.." .RITTEN |
00000C00: C2 59 20 20 3A 20 C4 41 4C 45 20 CD 55 54 43 48 |.Y : .ALE .UTCH|
00000C10: 45 52 11 00 3D 14 03 02 99 22 20 20 20 20 20 D5 |ER..=...." .|
00000C20: 50 47 52 41 44 45 44 20 C2 59 20 3A 20 50 45 54 |PGRADED .Y : PET|
00000C30: 45 52 20 56 4F 4F 52 48 4F 52 53 54 11 00 68 14 |ER VOORHORST..h.|
00000C40: 04 02 99 22 20 20 20 20 20 11 D4 48 49 53 20 50 |..." ..HIS P|
00000C50: 52 4F 47 52 41 4D 20 57 49 4C 4C 20 52 55 4E 20 |ROGRAM WILL RUN |
00000C60: 4F 4E 20 41 4E 59 11 11 00 8F 14 05 02 99 22 20 |ON ANY........" |
00000C70: 20 20 20 20 20 20 20 20 C2 C1 D3 C9 C3 A0 32 2E | ......2.|
00000C80: 30 20 D0 C5 D4 20 C3 CF CD D0 D5 D4 C5 D2 11 00 |0 ... ..........|
00000C90: B6 14 06 02 99 22 20 20 20 20 20 20 20 20 20 C2 |....." .|
00000CA0: C1 D3 C9 C3 20 34 2E 30 20 D0 C5 D4 A0 C3 CF CD |.... 4.0 .......|
00000CB0: D0 D5 D4 C5 D2 11 00 D8 14 07 02 99 22 20 20 20 |............" |
00000CC0: 20 20 20 20 20 20 38 30 33 32 20 C3 C2 CD 20 C3 | 8032 ... .|
00000CD0: CF CD D0 D5 D4 C5 D2 11 00 FD 14 08 02 99 22 20 |.............." |
00000CE0: 20 20 20 20 20 20 20 20 C3 CF CD CD CF C4 CF D2 | ........|
00000CF0: C5 20 36 34 20 C3 CF CD D0 D5 D4 C5 D2 00 06 15 |. 64 ...........|
00000D00: 09 02 8D 38 33 35 00 1A 15 4E 02 8B 55 5A B2 31 |...835...N..UZ.1|
00000D10: A7 9E 55 50 25 3A 89 32 31 37 00 20 15 57 02 8E |..UP%:.217. .W..|
00000D20: 00 46 15 58 02 8F 20 2A 2A 20 50 52 4F 47 52 41 |.F.X.. ** PROGRA|
00000D30: 4D 20 4D 4F 44 49 46 49 43 41 54 49 4F 4E 20 49 |M MODIFICATION I|
00000D40: 4E 53 54 20 2A 2A 00 57 15 59 02 99 22 93 22 3A |NST **.W.Y..".":|
00000D50: 97 55 54 2C 55 4C 25 00 77 15 5D 02 55 50 B2 30 |.UT,UL%.w.].UP.0|
00000D60: 3A 55 47 24 B2 22 D0 52 4F 47 52 41 4D 20 CD 4F |:UG$.".ROGRAM .O|
00000D70: 44 22 3A 8D 38 35 30 00 80 15 94 02 8D 38 33 35 |D":.850......835|
00000D80: 00 94 15 B2 02 8B 55 5A B2 31 A7 9E 55 50 25 3A |......UZ.1..UP%:|
00000D90: 89 32 31 37 00 9A 15 BB 02 8E 00 BF 15 BC 02 8F |.217............|
00000DA0: 20 2A 2A 20 54 4F 20 55 53 45 20 38 30 33 32 20 | ** TO USE 8032 |
00000DB0: 4C 4F 41 44 20 43 42 4D 34 30 33 32 20 2A 2A 00 |LOAD CBM4032 **.|
00000DC0: F5 15 C6 02 99 22 93 11 11 11 05 42 45 46 4F 52 |.....".....BEFOR|
00000DD0: 45 20 52 55 4E 4E 49 4E 47 20 54 48 49 53 20 50 |E RUNNING THIS P|
00000DE0: 52 4F 47 52 41 4D 20 4F 4E 20 41 4E 20 38 30 33 |ROGRAM ON AN 803|
00000DF0: 32 20 20 11 11 00 2B 16 D0 02 99 22 20 20 20 20 |2 ...+...." |
00000E00: 20 20 4C 4F 41 44 20 54 48 45 20 27 43 42 4D 20 | LOAD THE 'CBM |
00000E10: 34 30 33 32 27 20 50 52 4F 47 52 41 4D 11 11 11 |4032' PROGRAM...|
00000E20: 11 11 11 11 11 11 11 11 11 11 22 00 36 16 DA 02 |..........".6...|
00000E30: 9E 55 55 AA 37 31 00 3C 16 E4 02 80 00 61 16 1D |.UU.71.<.....a..|
00000E40: 03 8F 20 2A 2A 20 54 4F 20 55 53 45 20 38 30 33 |.. ** TO USE 803|
00000E50: 32 20 4C 4F 41 44 20 43 42 4D 34 30 33 32 20 2A |2 LOAD CBM4032 *|
00000E60: 2A 00 AC 16 1E 03 99 22 93 11 11 11 42 45 46 4F |*......"....BEFO|
00000E70: 52 45 20 52 55 4E 4E 49 4E 47 20 54 48 49 53 20 |RE RUNNING THIS |
00000E80: 50 52 4F 47 52 41 4D 20 4F 4E 20 41 4E 20 38 30 |PROGRAM ON AN 80|
00000E90: 33 32 20 20 11 11 4C 4F 41 44 20 43 42 4D 20 34 |32 ..LOAD CBM 4|
00000EA0: 30 33 32 20 50 52 4F 47 52 41 4D 22 00 B8 16 1F |032 PROGRAM"....|
00000EB0: 03 9E 31 30 39 33 3A 80 00 D8 16 20 03 8F 20 2A |..1093:.... .. *|
00000EC0: 2A 20 54 20 49 20 54 20 4C 20 45 20 20 20 50 20 |* T I T L E P |
00000ED0: 41 20 47 20 45 20 2A 2A 00 0C 17 22 03 99 22 93 |A G E **..."..".|
00000EE0: 11 1D 05 22 3B 3A 97 55 54 2C 55 55 25 3A 8B C2 |...";:.UT,UU%:..|
00000EF0: 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 30 |(50003).0..53280|
00000F00: 2C 31 34 3A 97 35 33 32 38 31 2C 36 00 22 17 24 |,14:.53281,6.".$|
00000F10: 03 81 49 B2 31 A4 33 38 3A 99 22 12 A6 92 22 3B |..I.1.38:."...";|
00000F20: 3A 82 00 3A 17 26 03 81 49 B2 31 A4 32 32 3A 99 |:..:.&..I.1.22:.|
00000F30: 22 11 9D 12 A6 92 22 3B 3A 82 00 52 17 28 03 81 |".....";:..R.(..|
00000F40: 49 B2 31 A4 33 37 3A 99 22 9D 9D 12 A6 92 22 3B |I.1.37:.".....";|
00000F50: 3A 82 00 6A 17 2A 03 81 49 B2 31 A4 32 32 3A 99 |:..j.*..I.1.22:.|
00000F60: 22 91 9D 12 A6 92 22 3B 3A 82 00 8F 17 2C 03 99 |".....";:....,..|
00000F70: 22 13 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D |"...............|
00000F80: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 A9 20 20 92 00 |............ ..|
00000F90: B1 17 2E 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |....."..........|
00000FA0: 1D 1D 1D 1D 1D 1D 1D 1D 12 20 92 20 20 12 20 92 |......... . . .|
00000FB0: A9 00 D2 17 30 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D |....0.."........|
00000FC0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 20 92 20 20 12 |........... . .|
00000FD0: A3 DF 00 F0 17 32 03 99 22 1D 1D 1D 1D 1D 1D 1D |.....2..".......|
00000FE0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D DF 12 20 20 92 |............. .|
00000FF0: 00 18 18 34 03 99 22 11 11 1D 1D 1D 1D 1D 1D 1D |...4..".........|
00001000: 1D 1D 1D 1D 1D 43 20 4F 20 4D 20 4D 20 4F 20 44 |.....C O M M O D|
00001010: 20 4F 20 52 20 45 11 11 00 3B 18 36 03 99 22 1D | O R E...;.6..".|
00001020: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 45 44 |..............ED|
00001030: 55 43 41 54 49 4F 4E 41 4C 11 11 00 5A 18 38 03 |UCATIONAL...Z.8.|
00001040: 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |."..............|
00001050: 1D 1D 53 4F 46 54 57 41 52 45 00 75 18 3A 03 8F |..SOFTWARE.u.:..|
00001060: 20 2A 2A 20 43 4F 4D 4D 4F 44 4F 52 45 20 4C 4F | ** COMMODORE LO|
00001070: 47 4F 20 2A 2A 00 AD 18 3B 03 99 C8 28 55 44 24 |GO **...;...(UD$|
00001080: 2C 32 34 29 3B 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 |,24);"..........|
00001090: 54 4F 45 54 53 20 53 50 41 54 49 45 20 4F 46 20 |TOETS SPATIE OF |
000010A0: 57 41 43 48 54 20 20 92 22 3A 49 B2 30 00 CF 18 |WACHT .":I.0...|
000010B0: 3C 03 A1 41 24 3A 8B 41 24 B3 B1 22 20 22 A7 49 |<..A$:.A$.." ".I|
000010C0: B2 49 AA 31 3A 8B 49 B3 32 35 30 A7 38 32 38 00 |.I.1:.I.250.828.|
000010D0: F3 18 3E 03 54 31 24 B2 22 22 3A 54 32 24 B2 22 |..>.T1$."":T2$."|
000010E0: 22 3A 54 33 24 B2 22 22 3A 54 34 24 B2 22 22 3A |":T3$."":T4$."":|
000010F0: 49 B2 30 00 FC 18 40 03 89 33 30 30 00 18 19 43 |I.0...@..300...C|
00001100: 03 8F 20 2A 2A 20 53 50 41 43 45 20 42 41 52 20 |.. ** SPACE BAR |
00001110: 50 52 45 53 53 20 2A 2A 00 53 19 48 03 97 55 4F |PRESS **.S.H..UO|
00001120: 2C 30 3A 99 C8 28 55 44 24 2C 32 34 29 3B 22 1D |,0:..(UD$,24);".|
00001130: 1D 1D 1D 1D 1D 12 56 4F 4F 52 20 56 45 52 56 4F |......VOOR VERVO|
00001140: 4C 47 20 54 4F 45 54 53 20 53 50 41 54 49 45 20 |LG TOETS SPATIE |
00001150: 20 92 22 00 6A 19 4C 03 A1 55 49 24 3A 8B 55 49 | .".j.L..UI$:.UI|
00001160: 24 B3 B1 22 20 22 A7 38 34 34 00 70 19 4E 03 8E |$.." ".844.p.N..|
00001170: 00 90 19 52 03 8F 20 2A 2A 20 50 41 47 45 20 44 |...R.. ** PAGE D|
00001180: 45 53 49 47 4E 20 52 4F 55 54 49 4E 45 20 2A 2A |ESIGN ROUTINE **|
00001190: 00 9C 19 54 03 55 50 B2 55 50 AA 31 00 C6 19 57 |...T.UP.UP.1...W|
000011A0: 03 99 22 93 22 C8 28 55 54 24 AA 55 50 24 2C 32 |..".".(UT$.UP$,2|
000011B0: 31 29 3B C9 28 55 50 24 AA 55 47 24 AA C4 28 55 |1);.(UP$.UG$..(U|
000011C0: 50 29 2C 31 38 29 00 F5 19 5C 03 99 22 20 2D 2D |P),18)...\.." --|
000011D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000011E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000011F0: 2D 2D 2D 2D 22 00 04 1A 60 03 8B 55 48 B3 B1 30 |----"...`..UH..0|
00001200: A7 38 37 30 00 38 1A 61 03 99 C8 28 55 44 24 2C |.870.8.a...(UD$,|
00001210: 32 34 29 3B C8 28 55 50 24 2C 37 29 3B 22 48 45 |24);.(UP$,7);"HE|
00001220: 4C 50 20 2D 20 50 52 45 53 53 20 20 20 48 20 3C |LP - PRESS H <|
00001230: 52 45 54 55 52 4E 3E 22 00 4A 1A 66 03 97 55 4F |RETURN>".J.f..UO|
00001240: 2C 30 3A 99 22 13 11 22 3A 8E 00 69 1A 6B 03 8F |,0:."..":..i.k..|
00001250: 20 2A 2A 20 50 4C 45 41 53 45 20 57 41 49 54 20 | ** PLEASE WAIT |
00001260: 52 45 4D 41 52 4B 20 2A 2A 00 9F 1A 70 03 99 C8 |REMARK **...p...|
00001270: 28 55 44 24 2C 32 34 29 3B 22 20 20 20 20 20 20 |(UD$,24);" |
00001280: 20 20 20 20 20 45 45 4E 20 4D 4F 4D 45 4E 54 20 | EEN MOMENT |
00001290: 41 2E 55 2E 42 2E 2E 2E 2E 20 20 20 20 20 22 00 |A.U.B.... ".|
000012A0: A5 1A 75 03 8E 00 C2 1A 84 03 8F 20 2A 2A 20 53 |..u........ ** S|
000012B0: 45 54 20 55 50 20 56 41 52 49 41 42 4C 45 53 20 |ET UP VARIABLES |
000012C0: 2A 2A 00 0D 1B 85 03 55 58 24 B2 22 48 22 3A 86 |**.....UX$."H":.|
000012D0: 55 51 25 28 31 30 30 30 29 3A 55 42 B2 33 32 37 |UQ%(1000):UB.327|
000012E0: 36 38 3A 55 31 B2 31 39 36 3A 55 32 B2 31 39 37 |68:U1.196:U2.197|
000012F0: 3A 55 33 B2 31 39 38 3A 55 34 B2 32 31 36 3A 55 |:U3.198:U4.216:U|
00001300: 43 B2 31 36 37 3A 55 55 B2 31 30 32 34 00 4B 1B |C.167:UU.1024.K.|
00001310: 86 03 55 54 B2 35 39 34 36 38 3A 55 55 25 B2 31 |..UT.59468:UU%.1|
00001320: 32 3A 55 4C 25 B2 31 34 3A 55 50 25 B2 31 31 34 |2:UL%.14:UP%.114|
00001330: 36 3A 55 4D B2 33 32 37 36 38 3A 55 4F B2 31 35 |6:UM.32768:UO.15|
00001340: 38 3A 97 20 35 30 30 30 33 2C 30 00 8E 1B 87 03 |8:. 50003,0.....|
00001350: 8B C2 28 35 30 30 30 33 29 B2 30 A7 55 42 B2 31 |..(50003).0.UB.1|
00001360: 30 32 34 3A 55 31 B2 32 30 39 3A 55 32 B2 32 31 |024:U1.209:U2.21|
00001370: 30 3A 55 33 B2 32 31 31 3A 55 34 B2 32 31 34 3A |0:U3.211:U4.214:|
00001380: 55 43 B2 32 30 34 3A 55 55 B2 32 30 34 38 00 CD |UC.204:UU.2048..|
00001390: 1B 88 03 8B C2 28 35 30 30 30 33 29 B2 30 A7 55 |.....(50003).0.U|
000013A0: 54 B2 35 33 32 37 32 3A 55 55 25 B2 32 31 3A 55 |T.53272:UU%.21:U|
000013B0: 4C 25 B2 32 33 3A 55 50 25 B2 32 31 33 39 3A 55 |L%.23:UP%.2139:U|
000013C0: 4D B2 31 30 32 34 3A 55 4F B2 31 39 38 00 F1 1B |M.1024:UO.198...|
000013D0: 89 03 55 44 24 B2 22 13 11 11 11 11 11 11 11 11 |..UD$.".........|
000013E0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000013F0: 22 00 23 1C 8A 03 55 50 24 B2 22 20 20 20 20 20 |".#...UP$." |
00001400: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001410: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001420: 20 20 22 00 51 1C 8B 03 55 54 24 B2 22 54 57 45 | ".Q...UT$."TWE|
00001430: 45 20 56 45 52 47 45 4C 49 4A 4B 49 4E 47 45 4E |E VERGELIJKINGEN|
00001440: 22 3A 8F 20 50 52 4F 47 52 41 4D 20 54 49 54 4C |":. PROGRAM TITL|
00001450: 45 00 57 1C 8C 03 8E 00 71 1C 8E 03 8F 20 2A 2A |E.W.....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 5A 20 4C 04 8D 31 38 33 30 00 8C 20 74 04 99 |.Z L..1830.. t..|
00001860: 22 93 11 20 56 4F 45 52 20 44 45 20 43 4F 45 46 |".. VOER DE COEF|
00001870: 46 49 43 49 45 4E 54 45 4E 20 41 4C 53 20 56 4F |FICIENTEN ALS VO|
00001880: 4C 47 54 20 49 4E 20 3A 20 20 20 22 00 AC 20 88 |LGT IN : ".. .|
00001890: 04 99 22 11 20 20 20 20 20 20 20 20 20 41 31 58 |..". A1X|
000018A0: 20 2B 20 42 31 59 20 3D 20 43 31 22 00 CC 20 92 | + B1Y = C1".. .|
000018B0: 04 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 11 41 32 58 |.."..........A2X|
000018C0: 20 2B 20 42 32 59 20 3D 20 43 32 22 00 D7 20 9C | + B2Y = C2".. .|
000018D0: 04 81 49 B2 31 A4 32 00 E2 20 A6 04 81 4A B2 31 |..I.1.2.. ...J.1|
000018E0: A4 32 00 F0 20 B0 04 8B 49 B2 31 A7 31 32 32 30 |.2.. ...I.1.1220|
000018F0: 00 FE 20 BA 04 8B 49 B2 32 A7 31 32 35 30 00 18 |.. ...I.2.1250..|
00001900: 21 C4 04 8B 4A B2 31 A7 99 22 11 20 57 41 41 52 |!...J.1..". WAAR|
00001910: 44 45 20 41 31 3D 22 3B 00 32 21 CE 04 8B 4A B2 |DE A1=";.2!...J.|
00001920: 32 A7 99 22 11 20 57 41 41 52 44 45 20 42 31 3D |2..". WAARDE B1=|
00001930: 22 3B 00 3C 21 D8 04 89 31 32 37 30 00 56 21 E2 |";.<!...1270.V!.|
00001940: 04 8B 4A B2 31 A7 99 22 11 20 57 41 41 52 44 45 |..J.1..". WAARDE|
00001950: 20 41 32 3D 22 3B 00 70 21 EC 04 8B 4A B2 32 A7 | A2=";.p!...J.2.|
00001960: 99 22 11 20 57 41 41 52 44 45 20 42 32 3D 22 3B |.". WAARDE B2=";|
00001970: 00 9C 21 F6 04 55 53 24 B2 22 2D 30 31 32 33 34 |..!..US$."-01234|
00001980: 35 36 37 38 39 2E 22 3A 55 4C B2 36 3A 8D 33 35 |56789.":UL.6:.35|
00001990: 3A 41 24 28 49 2C 4A 29 B2 55 52 24 00 B2 21 FB |:A$(I,J).UR$..!.|
000019A0: 04 41 28 49 2C 4A 29 B2 C5 28 41 24 28 49 2C 4A |.A(I,J)..(A$(I,J|
000019B0: 29 29 00 B9 21 00 05 82 4A 00 D3 21 0A 05 8B 49 |))..!...J..!...I|
000019C0: B2 31 A7 99 22 11 20 57 41 41 52 44 45 20 43 31 |.1..". WAARDE C1|
000019D0: 3D 22 3B 00 ED 21 14 05 8B 49 B2 32 A7 99 22 11 |=";..!...I.2..".|
000019E0: 20 57 41 41 52 44 45 20 43 32 3D 22 3B 00 27 22 | WAARDE C2=";.'"|
000019F0: 1E 05 55 53 24 B2 22 2D 30 31 32 33 34 35 36 37 |..US$."-01234567|
00001A00: 38 39 2E 22 3A 55 4C B2 36 3A 8D 33 35 3A 42 24 |89.":UL.6:.35:B$|
00001A10: 28 49 2C 31 29 B2 55 52 24 3A 8F 20 49 4E 50 55 |(I,1).UR$:. INPU|
00001A20: 54 42 28 49 2C 31 29 00 3D 22 23 05 42 28 49 2C |TB(I,1).="#.B(I,|
00001A30: 31 29 B2 C5 28 42 24 28 49 2C 31 29 29 00 44 22 |1)..(B$(I,1)).D"|
00001A40: 28 05 82 49 00 70 22 32 05 8B 28 41 28 31 2C 31 |(..I.p"2..(A(1,1|
00001A50: 29 AC 41 28 32 2C 32 29 AB 41 28 31 2C 32 29 AC |).A(2,2).A(1,2).|
00001A60: 41 28 32 2C 31 29 B3 B1 30 29 A7 89 31 33 39 30 |A(2,1)..0)..1390|
00001A70: 00 A0 22 3C 05 99 22 11 20 4E 49 45 54 20 44 4F |.."<..". NIET DO|
00001A80: 4F 52 20 44 49 54 20 50 52 4F 47 52 41 4D 4D 41 |OR DIT PROGRAMMA|
00001A90: 20 4F 50 20 54 45 20 4C 4F 53 53 45 4E 20 20 22 | OP TE LOSSEN "|
00001AA0: 00 A9 22 50 05 8D 38 33 35 00 B2 22 5A 05 99 22 |.."P..835.."Z.."|
00001AB0: 93 22 00 BC 22 64 05 89 31 31 34 30 00 C7 22 6E |.".."d..1140.."n|
00001AC0: 05 81 49 B2 31 A4 32 00 D2 22 78 05 81 4A B2 33 |..I.1.2.."x..J.3|
00001AD0: A4 34 00 F4 22 82 05 41 28 49 2C 4A 29 B2 28 31 |.4.."..A(I,J).(1|
00001AE0: AE 28 49 AA 4A 29 AA 28 AB 31 29 AE 28 49 AA 4A |.(I.J).(.1).(I.J|
00001AF0: 29 29 AD 32 00 FB 22 8C 05 82 4A 00 02 23 96 05 |)).2.."...J..#..|
00001B00: 82 49 00 16 23 A0 05 8B 41 28 31 2C 31 29 B3 B1 |.I..#...A(1,1)..|
00001B10: 31 A7 31 34 36 30 00 2A 23 AA 05 8B 41 28 31 2C |1.1460.*#...A(1,|
00001B20: 32 29 B3 B1 31 A7 31 34 36 30 00 5A 23 B4 05 99 |2)..1.1460.Z#...|
00001B30: 22 93 11 11 20 20 20 20 20 20 20 20 20 20 20 11 |"... .|
00001B40: 11 44 45 20 56 45 52 47 45 4C 49 4A 4B 49 4E 47 |.DE VERGELIJKING|
00001B50: 45 4E 20 5A 49 4A 4E 20 3A 22 00 91 23 BE 05 99 |EN ZIJN :"..#...|
00001B60: 22 20 20 20 20 20 20 20 20 11 11 22 2C 41 28 31 |" ..",A(1|
00001B70: 2C 31 29 3B 22 20 58 20 2B 20 22 3B 41 28 31 2C |,1);" X + ";A(1,|
00001B80: 32 29 3B 22 20 59 20 3D 20 22 3B 42 28 31 2C 31 |2);" Y = ";B(1,1|
00001B90: 29 00 C8 23 C8 05 99 22 20 20 20 20 20 20 20 20 |)..#..." |
00001BA0: 11 11 22 2C 41 28 32 2C 31 29 3B 22 20 58 20 2B |..",A(2,1);" X +|
00001BB0: 20 22 3B 41 28 32 2C 32 29 3B 22 20 59 20 3D 20 | ";A(2,2);" Y = |
00001BC0: 22 3B 42 28 32 2C 31 29 00 D2 23 D2 05 89 31 35 |";B(2,1)..#...15|
00001BD0: 30 30 00 E8 23 DC 05 8B 28 41 28 31 2C 31 29 B3 |00..#...(A(1,1).|
00001BE0: B1 30 29 A7 31 35 36 30 00 F3 23 E6 05 81 4A B2 |.0).1560..#...J.|
00001BF0: 31 A4 32 00 00 24 F0 05 45 B2 41 28 31 2C 4A 29 |1.2..$..E.A(1,J)|
00001C00: 00 12 24 FA 05 41 28 31 2C 4A 29 B2 41 28 32 2C |..$..A(1,J).A(2,|
00001C10: 4A 29 00 1F 24 04 06 41 28 32 2C 4A 29 B2 45 00 |J)..$..A(2,J).E.|
00001C20: 26 24 0E 06 82 4A 00 33 24 18 06 44 B2 41 28 31 |&$...J.3$..D.A(1|
00001C30: 2C 31 29 00 3E 24 22 06 81 4A B2 31 A4 34 00 52 |,1).>$"..J.1.4.R|
00001C40: 24 2C 06 41 28 31 2C 4A 29 B2 41 28 31 2C 4A 29 |$,.A(1,J).A(1,J)|
00001C50: AD 44 00 59 24 36 06 82 4A 00 66 24 40 06 46 B2 |.D.Y$6..J.f$@.F.|
00001C60: 41 28 32 2C 31 29 00 71 24 4A 06 81 4A B2 31 A4 |A(2,1).q$J..J.1.|
00001C70: 34 00 8C 24 54 06 41 28 32 2C 4A 29 B2 41 28 32 |4..$T.A(2,J).A(2|
00001C80: 2C 4A 29 AB 46 AC 41 28 31 2C 4A 29 00 93 24 5E |,J).F.A(1,J)..$^|
00001C90: 06 82 4A 00 A0 24 68 06 47 B2 41 28 32 2C 32 29 |..J..$h.G.A(2,2)|
00001CA0: 00 AB 24 72 06 81 4A B2 31 A4 34 00 BF 24 7C 06 |..$r..J.1.4..$|.|
00001CB0: 41 28 32 2C 4A 29 B2 41 28 32 2C 4A 29 AD 47 00 |A(2,J).A(2,J).G.|
00001CC0: C6 24 86 06 82 4A 00 D3 24 90 06 48 B2 41 28 31 |.$...J..$..H.A(1|
00001CD0: 2C 32 29 00 DE 24 9A 06 81 4A B2 31 A4 34 00 F9 |,2)..$...J.1.4..|
00001CE0: 24 A4 06 41 28 31 2C 4A 29 B2 41 28 31 2C 4A 29 |$..A(1,J).A(1,J)|
00001CF0: AB 48 AC 41 28 32 2C 4A 29 00 00 25 AE 06 82 4A |.H.A(2,J)..%...J|
00001D00: 00 0B 25 B8 06 81 49 B2 31 A4 32 00 18 25 C2 06 |..%...I.1.2..%..|
00001D10: 43 28 49 2C 31 29 B2 30 00 23 25 CC 06 81 4A B2 |C(I,1).0.#%...J.|
00001D20: 31 A4 32 00 45 25 D6 06 43 28 49 2C 31 29 B2 43 |1.2.E%..C(I,1).C|
00001D30: 28 49 2C 31 29 AA 41 28 49 2C 4A AA 32 29 AC 42 |(I,1).A(I,J.2).B|
00001D40: 28 4A 2C 31 29 00 4C 25 E0 06 82 4A 00 53 25 EA |(J,1).L%...J.S%.|
00001D50: 06 82 49 00 5F 25 F4 06 99 22 11 11 11 11 22 00 |..I._%..."....".|
00001D60: 83 25 FE 06 99 22 20 20 20 20 20 20 20 20 20 20 |.%..." |
00001D70: 20 44 45 20 4F 50 4C 4F 53 53 49 4E 47 20 49 53 | DE OPLOSSING IS|
00001D80: 20 3A 22 00 AB 25 03 07 43 24 B2 22 28 22 AA C4 | :"..%..C$."("..|
00001D90: 28 43 28 31 2C 31 29 29 AA 22 2C 22 AA C4 28 43 |(C(1,1)).","..(C|
00001DA0: 28 32 2C 31 29 29 AA 22 20 29 22 00 C6 25 08 07 |(2,1))." )"..%..|
00001DB0: 99 22 11 11 11 22 3B A6 32 30 AB C3 28 43 24 29 |."...";.20..(C$)|
00001DC0: AD 32 29 3B 43 24 00 CF 25 0D 07 8D 38 33 35 00 |.2);C$..%...835.|
00001DD0: D5 25 12 07 8E 00 E1 25 26 07 43 24 B2 22 12 2A |.%.....%&.C$.".*|
00001DE0: 22 00 E7 25 30 07 8F 00 ED 25 76 07 8E 00 00 00 |"..%0....%v.....|
00001DF0: 49 |I |
.......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 **
...#.. +++ INPUT SECTION +++...(..UO,0:U
R$."":UI$.""...*..UL.0.UL.80...-..UC,0.*
.2..UI$:.UI$."".50.T.7..UI$.G(13).C(UR$)
..1..UC,1:." .";:.85.G.<..UI$.G(20).105.
{.>.. C(UR$)..UL.50. .A..120:. CHECK FOR
VALID CHARACTER...F.UR$.UR$.UI$...K..UI
$;.B.P..50...U.. +++ CHECK FOR HELP REQU
EST +++...Z..UR$.UX$.195:. EXIT TO HELP
ROUTINE..._..UF.1..240.+.D.UF.0:.:..D.F.
. ++ CHECK DELETE ++.U.I..C(UR$).1.50.M.
N.UR$.H(UR$,C(UR$).1)..S..". ..";:.50.
..X.. ++ CHECK FOR VALID CHARACTERS ++..
.}..C(US$).0.150.H..US$.US$.UX$.Y....US
.1.C(US$)......UI$.J(US$,US,1)..........
...UI$."":....... ** STANDARD INPUT **./
....F(UI$).46...@....UI$.G(32)...]. ..F(
UI$).45.F(UI$).57.170.C..........F(UI$).
65.F(UI$).90.180............F(UI$).193.F
(UI$).218.UI$."":..M....B(UT).UU%.UI$.G(
F(UI$).128):..S.........UI$."":....C.UF.
1:. +++ HELP ROUTINE EXIT +++...E..250..
.H..245.6.M..UQ.UB.(U2%.256.U1%.U3%.2).R
.R.UQ%(UQ.UB).B(UQ):.:.".".E.W.UZ.1:UV%.
B(UT).N.X..300...Y.UZ.0:US$.UJ$:UG$.UK$:
UP.UJ:UL.UK:.B(50003).0..53281,6:.53280,
14...Z..59468,UO.....UT$.UL$:.".";:.UT,U
V%:.UQ.UB.(U2%.256.U1%.U3%.3)......UQ,UQ
%(UQ.UB):.......U1,U1%."....U2,U2%......
U4,U4%.<....U3,U3%.1.D....35.V...UD%.((U
2%.256.U1%.U3%).UB).40:.H(UD$,UD%.1):...
....H(UD$,24);" . H
ULP KOMT . ":......U1%.B(U1):U2%.B(U2
):U3%.B(U3):U4%.B(U4).....UJ$.US$:UK$.UG
$:UL$.UT$:UJ.UP:UK.UL.........,.. ** MEN
U **.".-.:.Q....".":.UT,UU%:.B(50003).0.
.53281,9:.53280,8.W./.:.T.1..".
MENU"...6.." --------------------
------------------".L.;..".. 1.
TWEE VERGELIJKINGEN"...@..".. 2.
LEERLING INSTRUKTIE "...E..".. 3.
LERAAR INSTRUKTIE".9.O..".. 4.
STOP..".H.T.." -----------------------
---------------"...Y..".. KIES EEN
NUMMER (1-4) ";...^.UL.1:US$."1234":.3
5:. INPUT RDINE.J._..C(UR$).1.300.U.`.U
S$.""...C..E(UR$).1000,400,500,396...H..
300.".... ** RE-ENABLE STOP KEY AND END
**.Q....B(50003)..1.B(50003)..160.B(5000
3)..0.399.{....UU.71:.B(50003).0..53281,
6:.53280,14......"..":.......875:.......
** STUDENT INSTRUCTIONS **......".":.UT
,UL%:.B(50003).0..53281,0:.53280,0.....U
P.0:UG$." ":.850.R.B..
". DIT PROGRAMMA LOST TWEE VERGELIJKINGE
N MET TWEE ONBEKENDEN OP....L..".. LET
OP: NA INVOER VAN EEN GETAL TOET
S <RETURN>"......". TERUG NAAR MENU,TOET
S H <RETURN> ".G....835......UZ.1..UP%:.
217............ ** TEACHER INSTRUCTIONS
**.2....".":.UT,UL%:.B(50003).0..53281,2
:.53280,10.X...UP.0:UG$."
":.850......".. TO THE BEST OF OU
R KNOWLEDGE,."......" THIS PROGRAM IS
IN THE PUBLIC."......" DOMAIN. IF THI
S IS NOT THE CASE."......" PLEASE CONT
ACT:..."."...." COMMODORE BUSINESS
MACHINES.".E...." 3370 PHARMACY
AVE..I...." AGINCOURT, ONTARIO
"......" CANADA M1W 2K4".....
." (416) 499-4292".A...UP.1:. 8
35:. 850:......" ..PROGRAM NAME: INT
ERSECT LINE......." WRITTEN BY : DA
LE MUTCHER..=...." UPGRADED BY : PET
ER VOORHORST..H...." .THIS PROGRAM W
ILL RUN ON ANY........" BASIC 2.
0 PET COMPUTER......." BASIC 4.0
PET COMPUTER..X...." 8032 CBM C
OMPUTER......." COMMODORE 64 COM
PUTER......835...N..UZ.1..UP%:.217. .W..
.F.X.. ** PROGRAM MODIFICATION INST **.W
.Y..".":.UT,UL%.W.].UP.0:UG$."PROGRAM MO
D":.850......835......UZ.1..UP%:.217....
........ ** TO USE 8032 LOAD CBM4032 **.
..F..".....BEFORE RUNNING THIS PROGRAM O
N AN 8032 ...+.P.." LOAD THE 'CBM
4032' PROGRAM.............".6.Z..UU.71.<
.....A.... ** TO USE 8032 LOAD CBM4032 *
*......"....BEFORE RUNNING THIS PROGRAM
ON AN 8032 ..LOAD CBM 4032 PROGRAM"....
..1093:..X. .. ** T I T L E P A G E **
...".."....";:.UT,UU%:.B(50003).0..53280
,14:.53281,6.".$..I.1.38:."...";:..:.&..
I.1.22:.".....";:..R.(..I.1.37:.".....";
:..J.*..I.1.22:.".....";:....,..".......
.................... ......."..........
......... . . ...R.0.."................
... . ......2..".................... .
...4.."..............C O M M O D O R E..
.;.6.."...............EDUCATIONAL...Z.8.
."................SOFTWARE.U.:.. ** COMM
ODORE LOGO **...;..H(UD$,24);"..........
TOETS SPATIE OF WACHT .":I.0.O.<..A$:.A
$.." ".I.I.1:.I.250.828...>.T1$."":T2$."
":T3$."":T4$."":I.0...@..300...C.. ** SP
ACE BAR PRESS **.S.H..UO,0:.H(UD$,24);".
......VOOR VERVOLG TOETS SPATIE .".J.L.
.UI$:.UI$.." ".844.P.N.....R.. ** PAGE D
ESIGN ROUTINE **...T.UP.UP.1.F.W.."."H(U
T$.UP$,21);I(UP$.UG$.D(UP),18)...\.." --
------------------------------------"...
`..UH..0.870.8.A..H(UD$,24);H(UP$,7);"HE
LP - PRESS H <RETURN>".J.F..UO,0:.".."
:..I.K.. ** PLEASE WAIT REMARK **...P..H
(UD$,24);" EEN MOMENT A.U.B...
. "...U...B.... ** SET UP VARIABLES
**.....UX$."H":.UQ%(1000):UB.32768:U1.19
6:U2.197:U3.198:U4.216:UC.167:UU.1024.K.
..UT.59468:UU%.12:UL%.14:UP%.1146:UM.327
68:UO.158:. 50003,0......B(50003).0.UB.1
024:U1.209:U2.210:U3.211:U4.214:UC.204:U
U.2048.M....B(50003).0.UT.53272:UU%.21:U
L%.23:UP%.2139:UM.1024:UO.198.....UD$.".
........................".#...UP$."
".Q...
UT$."TWEE VERGELIJKINGEN":. PROGRAM TITL
E.W.....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.Z L..1830.. T..
".. VOER DE COEFFICIENTEN ALS VOLGT IN :
".. ...". A1X + B1Y = C1".L .
.."..........A2X + B2Y = C2".W ...I.1.2.
. ...J.1.2.. ...I.1.1220.. ...I.2.1250..
!D..J.1..". WAARDE A1=";.2!N..J.2..". WA
ARDE B1=";.<!X..1270.V!...J.1..". WAARDE
A2=";.P!...J.2..". WAARDE B2=";..!..US$
."-0123456789.":UL.6:.35:A$(I,J).UR$..!.
.A(I,J).E(A$(I,J))..!...J.S!...I.1..". W
AARDE C1=";..!...I.2..". WAARDE C2=";.'"
..US$."-0123456789.":UL.6:.35:B$(I,1).UR
$:. INPUTB(I,1).="#.B(I,1).E(B$(I,1)).D"
(..I.P"2..(A(1,1).A(2,2).A(1,2).A(2,1)..
0)..1390. "<..". NIET DOOR DIT PROGRAMMA
OP TE LOSSEN ".."P..835.."Z..".".."D..
1140.G"N..I.1.2.R"X..J.3.4.."..A(I,J).(1
.(I.J).(.1).(I.J)).2.."...J..#...I..# ..
A(1,1)..1.1460.*#...A(1,2)..1.1460.Z#...
"... ..DE VERGELIJKINGEN ZIJN
:"..#..." ..",A(1,1);" X + ";A(1,
2);" Y = ";B(1,1).H#H.." ..",A(2,
1);" X + ";A(2,2);" Y = ";B(2,1).R#R..15
00..#...(A(1,1)..0).1560..#...J.1.2..$..
E.A(1,J)..$..A(1,J).A(2,J)..$..A(2,J).E.
&$...J.3$..D.A(1,1).>$"..J.1.4.R$,.A(1,J
).A(1,J).D.Y$6..J.F$@.F.A(2,1).Q$J..J.1.
4..$T.A(2,J).A(2,J).F.A(1,J)..$^..J. $H.
G.A(2,2)..$R..J.1.4..$|.A(2,J).A(2,J).G.
F$...J.S$..H.A(1,2)..$...J.1.4..$..A(1,J
).A(1,J).H.A(2,J)..%...J..%...I.1.2..%B.
C(I,1).0.#%L..J.1.2.E%V.C(I,1).C(I,1).A(
I,J.2).B(J,1).L%...J.S%...I._%..."....".
.%..." DE OPLOSSING IS :"..%..
C$."(".D(C(1,1)).",".D(C(2,1))." )".F%..
."...";.20.C(C$).2);C$.O%...835.U%.....%
&.C$.".*"..%0....%V.....I
> CLICK IMAGE PREVIEW FOR FULL MODAL