DOORTELLEN
FILE INFORMATION
FILENAME(S): DOORTELLEN
FILE TYPE(S): PRG
FILE SIZE: 4.5K
FIRST SEEN: 2025-11-30 21:24:44
APPEARS ON: 1 disk(s)
FILE HASH
6f4a50fc926b3b8fbfc381618c2996ace66893c1bbc8e33a1978ceb5014abfa3
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 7 | DOORTELLEN | PRG | DuncanTwain | 4 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 23 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 00 45 08 6E 00 8F 2A 20 44 4F 4F 52 54 |***.E.n..* DOORT|
00000030: 45 4C 4C 45 4E 2E 33 20 20 28 43 29 31 39 38 33 |ELLEN.3 (C)1983|
00000040: 2F 31 31 20 2A 00 67 08 6F 00 8F 2A 2A 2A 2A 2A |/11 *.g.o..*****|
00000050: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000060: 2A 2A 2A 2A 2A 2A 2A 00 6D 08 70 00 3A 00 8E 08 |*******.m.p.:...|
00000070: 71 00 8F 2A 20 2A 20 2A 20 2A 50 52 4F 47 52 41 |q..* * * *PROGRA|
00000080: 4D 4D 45 55 52 2A 20 2A 20 2A 20 2A 20 2A 00 B0 |MMEUR* * * * *..|
00000090: 08 77 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.w..************|
000000A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000B0: 00 D2 08 78 00 8F 2A 20 52 2E 4A 2E 4D 2E 20 4D |...x..* R.J.M. M|
000000C0: 49 4C 54 45 4E 42 55 52 47 20 20 20 20 20 20 20 |ILTENBURG |
000000D0: 20 2A 00 F4 08 82 00 8F 2A 20 47 45 45 52 54 52 | *......* GEERTR|
000000E0: 55 49 44 45 4E 42 45 52 47 53 54 52 41 41 54 20 |UIDENBERGSTRAAT |
000000F0: 34 33 20 2A 00 16 09 8C 00 8F 2A 20 33 30 38 36 |43 *......* 3086|
00000100: 20 57 45 20 20 52 4F 54 54 45 52 44 41 4D 20 20 | WE ROTTERDAM |
00000110: 20 20 20 20 20 2A 00 38 09 96 00 8F 2A 2A 2A 2A | *.8....****|
00000120: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000130: 2A 2A 2A 2A 2A 2A 2A 2A 00 3E 09 97 00 3A 00 60 |********.>...:.`|
00000140: 09 98 00 8F 2A 20 44 49 44 41 43 54 49 53 43 48 |....* DIDACTISCH|
00000150: 45 20 53 50 45 43 49 46 49 43 41 54 49 45 20 2A |E SPECIFICATIE *|
00000160: 00 82 09 99 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |......**********|
00000170: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000180: 2A 2A 00 A4 09 9A 00 8F 2A 20 48 2E 20 56 41 4E |**......* H. VAN|
00000190: 20 5A 49 4A 4C 20 20 20 20 20 20 20 20 20 20 20 | ZIJL |
000001A0: 20 20 20 2A 00 C6 09 9B 00 8F 2A 20 53 54 45 52 | *......* STER|
000001B0: 52 45 4D 4F 53 20 34 20 20 20 20 20 20 20 20 20 |REMOS 4 |
000001C0: 20 20 20 20 20 2A 00 E8 09 9C 00 8F 2A 20 33 30 | *......* 30|
000001D0: 36 39 20 41 53 20 20 52 4F 54 54 45 52 44 41 4D |69 AS ROTTERDAM|
000001E0: 20 20 20 20 20 20 20 2A 00 0A 0A 9D 00 8F 2A 2A | *......**|
000001F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000200: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 36 0A A0 00 99 |**********.6....|
00000210: 22 93 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 |"...............|
00000220: 20 44 20 4F 20 4F 20 52 20 54 20 45 20 4C 20 4C | D O O R T E L L|
00000230: 20 45 20 4E 20 22 00 5A 0A A1 00 99 22 11 11 11 | E N ".Z...."...|
00000240: 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000250: 1D 28 43 29 20 31 39 38 33 22 00 84 0A A2 00 99 |.(C) 1983"......|
00000260: 22 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |"...............|
00000270: 1D 1D 52 2E 4A 2E 4D 2E 20 4D 49 4C 54 45 4E 42 |..R.J.M. MILTENB|
00000280: 55 52 47 22 00 AC 0A A3 00 99 22 11 11 11 1D 1D |URG"......".....|
00000290: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 2D 45 4E 2D 20 48 |..........-EN- H|
000002A0: 2E 20 56 41 4E 20 5A 49 4A 4C 2E 22 00 C1 0A A4 |. VAN ZIJL."....|
000002B0: 00 A1 54 24 3A 8B 54 24 B3 B1 22 20 22 A7 31 36 |..T$:.T$.." ".16|
000002C0: 34 00 CB 0A A9 00 8D 31 33 33 30 00 EE 0A AA 00 |4......1330.....|
000002D0: 48 24 28 31 29 B2 22 1F BC B8 BE 91 9D 9D 9D B6 |H$(1).".........|
000002E0: 12 95 20 1F 92 B5 91 9D 9D 9D AC B9 BB 22 00 11 |.. .........."..|
000002F0: 0B B4 00 48 24 28 32 29 B2 22 1F CC AF BA 91 9D |...H$(2)."......|
00000300: 9D 9D B4 12 95 20 92 1F AA 91 9D 9D 9D CF B7 D0 |..... ..........|
00000310: 22 00 34 0B BE 00 48 24 28 33 29 B2 22 1F 12 20 |".4...H$(3).".. |
00000320: 20 20 91 9D 9D 9D 20 95 20 1F 20 91 9D 9D 9D 20 | .... . . .... |
00000330: 20 20 92 22 00 57 0B C8 00 48 24 28 34 29 B2 22 | .".W...H$(4)."|
00000340: 1F D6 D6 D6 91 9D 9D 9D D6 95 12 20 92 1F D6 91 |........... ....|
00000350: 9D 9D 9D D6 D6 D6 22 00 7E 0B D2 00 48 24 28 35 |......".~...H$(5|
00000360: 29 B2 22 1F D1 12 20 92 D1 91 9D 9D 9D 12 20 95 |)."... ....... .|
00000370: 20 1F 20 92 91 9D 9D 9D D1 12 20 92 D1 22 00 A1 | . ....... .."..|
00000380: 0B DC 00 48 24 28 36 29 B2 22 1F CE 2A CD 91 9D |...H$(6)."..*...|
00000390: 9D 9D 2A 12 95 20 92 1F 2A 91 9D 9D 9D CD 2A CE |..*.. ..*.....*.|
000003A0: 22 00 C4 0B E6 00 48 24 28 37 29 B2 22 1F 41 42 |".....H$(7).".AB|
000003B0: 43 91 9D 9D 9D 41 12 95 20 1F 92 42 91 9D 9D 9D |C....A.. ..B....|
000003C0: 41 42 43 22 00 D2 0B F0 00 48 24 B2 48 24 28 4D |ABC".....H$.H$(M|
000003D0: 47 29 00 DF 0B FA 00 86 52 28 4C 49 2C 36 29 00 |G)......R(LI,6).|
000003E0: F7 0B 04 01 97 36 35 30 2C 30 3A 8F 20 52 45 50 |.....650,0:. REP|
000003F0: 45 41 54 20 41 41 4E 00 0E 0C 0E 01 8F 20 53 45 |EAT AAN...... SE|
00000400: 54 20 44 45 46 49 4E 49 54 49 4F 4E 53 2E 00 4B |T DEFINITIONS..K|
00000410: 0C 18 01 96 20 A5 4B 28 5A 29 B2 31 31 34 35 AA |.... .K(Z).1145.|
00000420: 28 28 B5 28 28 49 AB 31 29 AD 31 30 29 29 AC 31 |((.((I.1).10)).1|
00000430: 32 30 29 AA 28 B6 28 B5 28 28 49 AB 31 29 AD 31 |20).(.(.((I.1).1|
00000440: 30 29 AC 31 30 AB 49 29 AC 33 29 00 88 0C 22 01 |0).10.I).3)...".|
00000450: 96 20 A5 50 28 5A 29 B2 31 31 34 35 AA 28 28 B5 |. .P(Z).1145.((.|
00000460: 28 28 43 AB 31 29 AD 31 30 29 29 AC 31 32 30 29 |((C.1).10)).120)|
00000470: AA 28 B6 28 B5 28 28 43 AB 31 29 AD 31 30 29 AC |.(.(.((C.1).10).|
00000480: 31 30 AB 43 29 AC 33 29 00 A3 0C 2C 01 8F 20 47 |10.C).3)...,.. G|
00000490: 45 54 20 55 4E 4B 4E 4F 57 4E 20 4E 55 4D 42 45 |ET UNKNOWN NUMBE|
000004A0: 52 53 2E 00 C9 0C 36 01 41 B2 BB 28 AB 54 49 29 |RS....6.A..(.TI)|
000004B0: 3A 8F 20 42 59 20 45 56 45 52 59 20 53 54 41 52 |:. BY EVERY STAR|
000004C0: 54 20 52 41 4E 44 4F 4D 2E 00 E0 0C 40 01 45 4E |T RANDOM....@.EN|
000004D0: B2 34 31 AB 28 4D 41 58 AC 32 29 3A 55 50 B2 30 |.41.(MAX.2):UP.0|
000004E0: 00 13 0D 4A 01 41 B2 B5 28 BB 28 31 29 AC 45 4E |...J.A..(.(1).EN|
000004F0: 29 AA 38 3A 42 B2 41 AA B5 28 BB 28 31 29 AC 4D |).8:B.A..(.(1).M|
00000500: 41 58 AA 31 29 3A 56 45 B2 42 AB 41 3A 44 B2 42 |AX.1):VE.B.A:D.B|
00000510: AA 56 45 00 2D 0D 54 01 51 B2 41 AB 28 B5 28 BB |.VE.-.T.Q.A.(.(.|
00000520: 28 31 29 AC 34 29 AA 32 29 3A 45 B2 30 00 49 0D |(1).4).2):E.0.I.|
00000530: 5E 01 8D 31 31 32 30 3A 8F 2A 20 4D 41 41 4B 20 |^..1120:.* MAAK |
00000540: 53 43 48 45 52 4D 20 4F 50 00 52 0D 68 01 54 55 |SCHERM OP.R.h.TU|
00000550: B2 30 00 75 0D 72 01 8D 31 32 34 30 3A 8F 20 41 |.0.u.r..1240:. A|
00000560: 42 43 20 49 4E 20 4D 41 54 52 49 58 20 50 4C 41 |BC IN MATRIX PLA|
00000570: 41 54 53 45 4E 00 96 0D 7C 01 8F 20 57 41 49 54 |ATSEN...|.. WAIT|
00000580: 20 46 4F 52 20 49 4E 50 55 54 20 49 4E 43 52 45 | FOR INPUT INCRE|
00000590: 4D 45 4E 54 20 43 00 A8 0D 86 01 8D 38 30 30 3A |MENT C......800:|
000005A0: 8B 4B B2 31 A7 34 34 30 00 C0 0D 90 01 8B 43 B2 |.K.1.440......C.|
000005B0: 35 30 A7 97 A5 50 28 43 29 2C 33 32 3A 43 B2 30 |50...P(C),32:C.0|
000005C0: 00 CE 0D 9A 01 8B 56 B2 30 A7 56 B2 33 32 00 F9 |......V.0.V.32..|
000005D0: 0D A4 01 97 A5 50 28 43 29 2C 56 3A 43 B2 43 AA |.....P(C),V:C.C.|
000005E0: 31 3A 56 B2 C2 28 A5 50 28 43 29 29 AF 31 32 37 |1:V..(.P(C)).127|
000005F0: 3A 97 A5 50 28 43 29 2C 33 00 02 0E AE 01 89 33 |:..P(C),3......3|
00000600: 38 30 00 18 0E B8 01 8F 20 49 4E 50 55 54 20 3D |80...... INPUT =|
00000610: 20 27 5A 45 4B 45 52 27 00 25 0E C2 01 8B 43 B2 | 'ZEKER'.%....C.|
00000620: 44 A7 36 36 30 00 38 0E CC 01 8F 20 57 52 4F 4E |D.660.8.... WRON|
00000630: 47 20 49 4E 50 55 54 2E 00 53 0E D6 01 8B 43 B3 |G INPUT..S....C.|
00000640: 41 A7 52 28 56 45 2C 33 29 B2 52 28 56 45 2C 33 |A.R(VE,3).R(VE,3|
00000650: 29 AA 31 00 74 0E E0 01 8B 43 B1 B2 41 AF 43 B3 |).1.t....C..A.C.|
00000660: B2 42 A7 52 28 56 45 2C 34 29 B2 52 28 56 45 2C |.B.R(VE,4).R(VE,|
00000670: 34 29 AA 31 00 94 0E EA 01 8B 43 B1 42 AF 43 B3 |4).1......C.B.C.|
00000680: B2 44 A7 52 28 56 45 2C 35 29 B2 52 28 56 45 2C |.D.R(VE,5).R(VE,|
00000690: 35 29 AA 31 00 AF 0E F4 01 8B 43 B1 44 A7 52 28 |5).1......C.D.R(|
000006A0: 56 45 2C 36 29 B2 52 28 56 45 2C 36 29 AA 31 00 |VE,6).R(VE,6).1.|
000006B0: CB 0E FE 01 46 B2 46 AA 31 3A 52 28 56 45 2C 32 |....F.F.1:R(VE,2|
000006C0: 29 B2 52 28 56 45 2C 32 29 AA 31 00 D7 0E 08 02 |).R(VE,2).1.....|
000006D0: 43 4F B2 43 4F AB 32 00 08 0F 12 02 8B 43 4F B3 |CO.CO.2......CO.|
000006E0: AB 32 AF 4D 47 B1 31 A7 4D 47 B2 4D 47 AB 31 3A |.2.MG.1.MG.MG.1:|
000006F0: 43 4F B2 30 3A 48 24 B2 48 24 28 4D 47 29 3A 55 |CO.0:H$.H$(MG):U|
00000700: 50 B2 31 3A 89 35 35 30 00 2D 0F 1C 02 8B 43 4F |P.1:.550.-....CO|
00000710: B3 AB 32 AF 4D 41 58 B1 33 A7 4D 41 58 B2 4D 41 |..2.MAX.3.MAX.MA|
00000720: 58 AB 31 3A 55 50 B2 31 3A 43 4F B2 30 00 3F 0F |X.1:UP.1:CO.0.?.|
00000730: 26 02 58 B2 31 38 3A 59 B2 30 3A 8D 38 39 30 00 |&.X.18:Y.0:.890.|
00000740: 76 0F 30 02 81 49 B2 31 A4 35 3A 99 22 20 20 20 |v.0..I.1.5:." |
00000750: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000760: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000770: 20 20 20 22 3A 82 00 A6 0F 3A 02 58 B2 31 39 3A | ":....:.X.19:|
00000780: 59 B2 31 30 3A 8D 38 39 30 3A 99 22 12 46 4F 55 |Y.10:.890:.".FOU|
00000790: 54 22 3B 3A 8B 55 50 B2 30 A7 99 22 20 4F 50 4E |T";:.UP.0.." OPN|
000007A0: 49 45 55 57 22 3B 00 B1 0F 44 02 99 3A 54 55 B2 |IEUW";...D..:TU.|
000007B0: 31 00 C4 0F 4E 02 8D 38 31 30 3A 8B 4B B3 B1 30 |1...N..810:.K..0|
000007C0: A7 35 39 30 00 D2 0F 58 02 8B 55 50 B2 31 A7 33 |.590...X..UP.1.3|
000007D0: 32 30 00 E0 0F 62 02 8B 54 55 B2 30 A7 33 35 30 |20...b..TU.0.350|
000007E0: 00 EF 0F 6C 02 81 49 B2 31 A4 32 35 30 3A 82 00 |...l..I.1.250:..|
000007F0: 08 10 76 02 81 49 B2 31 A4 35 30 3A 97 A5 4B 28 |..v..I.1.50:..K(|
00000800: 4A 2A 2C 31 36 30 3A 82 00 2C 10 80 02 58 B2 31 |J*,160:..,...X.1|
00000810: 39 3A 59 B2 31 30 3A 8D 38 39 30 3A 99 22 20 20 |9:Y.10:.890:." |
00000820: 20 20 20 20 20 20 20 20 20 20 20 22 00 35 10 8A | ".5..|
00000830: 02 89 33 37 30 00 48 10 94 02 8F 20 47 4F 45 44 |..370.H.... GOED|
00000840: 45 20 49 4E 56 4F 45 52 00 6B 10 9E 02 58 B2 31 |E INVOER.k...X.1|
00000850: 38 3A 59 B2 31 34 3A 8D 38 39 30 3A 99 22 12 1C |8:Y.14:.890:."..|
00000860: 47 4F 45 44 20 5A 4F 21 22 3A 99 00 87 10 A8 02 |GOED ZO!":......|
00000870: 47 B2 47 AA 31 3A 52 28 56 45 2C 31 29 B2 52 28 |G.G.1:R(VE,1).R(|
00000880: 56 45 2C 31 29 AA 31 00 9D 10 B2 02 8B 47 B1 31 |VE,1).1......G.1|
00000890: 30 AF 28 46 B3 47 AD 34 29 A7 37 33 30 00 B0 10 |0.(F.G.4).730...|
000008A0: BC 02 58 B2 32 30 3A 59 B2 32 30 3A 8D 38 39 30 |..X.20:Y.20:.890|
000008B0: 00 C5 10 C6 02 99 A3 32 30 29 41 22 2B 22 42 AB |.......20)A"+"B.|
000008C0: 41 22 3D 22 42 00 DA 10 D0 02 99 A3 32 30 29 42 |A"="B.......20)B|
000008D0: 22 2B 22 43 AB 42 22 3D 22 43 00 E4 10 DA 02 4E |"+"C.B"="C.....N|
000008E0: B2 4E AA 31 00 F0 10 E4 02 43 4F B2 43 4F AA 31 |.N.1.....CO.CO.1|
000008F0: 00 16 11 EE 02 8B 43 4F B2 4E 56 AF 4D 41 58 B3 |......CO.NV.MAX.|
00000900: 4C 49 A7 4D 41 58 B2 4D 41 58 AA 31 3A 43 4F B2 |LI.MAX.MAX.1:CO.|
00000910: 30 3A 89 37 37 30 00 3F 11 F8 02 8B 43 4F B2 4E |0:.770.?....CO.N|
00000920: 56 AC 32 AF 4D 47 B3 37 A7 4D 47 B2 4D 47 AA 31 |V.2.MG.7.MG.MG.1|
00000930: 3A 43 4F B2 30 3A 48 24 B2 48 24 28 4D 47 29 00 |:CO.0:H$.H$(MG).|
00000940: 57 11 02 03 54 55 B2 31 3A 8D 38 30 30 3A 8B 4B |W...TU.1:.800:.K|
00000950: B3 B1 30 A7 37 37 30 00 65 11 0C 03 8B 4E B3 4F |..0.770.e....N.O|
00000960: 50 A7 33 32 30 00 73 11 16 03 54 55 B2 30 3A 89 |P.320.s...TU.0:.|
00000970: 39 31 30 00 99 11 20 03 8F 20 47 45 54 20 53 50 |910... .. GET SP|
00000980: 41 43 45 20 28 4B 3D 30 29 20 4F 52 20 52 45 54 |ACE (K=0) OR RET|
00000990: 55 52 4E 20 28 4B 3D 31 29 00 AD 11 2A 03 A1 4B |URN (K=1)...*..K|
000009A0: 24 3A 8B 4B 24 B3 B1 22 22 A7 38 31 30 00 C0 11 |$:.K$.."".810...|
000009B0: 34 03 A1 4B 24 3A 8B 4B 24 B2 22 22 A7 38 32 30 |4..K$:.K$."".820|
000009C0: 00 D4 11 3E 03 8B 4B 24 B2 C7 28 31 33 29 A7 4B |...>..K$..(13).K|
000009D0: B2 31 3A 8E 00 ED 11 48 03 8B 4B 24 B2 22 25 22 |.1:....H..K$."%"|
000009E0: A7 54 55 B2 54 55 AA 31 3A 8D 39 31 30 00 FE 11 |.TU.TU.1:.910...|
000009F0: 52 03 8B 4B 24 B3 B1 22 20 22 A7 38 32 30 00 08 |R..K$.." ".820..|
00000A00: 12 5C 03 4B B2 30 3A 8E 00 29 12 66 03 8F 20 57 |.\.K.0:..).f.. W|
00000A10: 41 49 54 20 41 4E 44 20 53 45 54 20 43 55 52 53 |AIT AND SET CURS|
00000A20: 4F 52 20 54 4F 20 58 2C 59 00 36 12 70 03 81 4A |OR TO X,Y.6.p..J|
00000A30: B2 31 A4 31 3A 82 00 65 12 7A 03 99 C8 28 22 13 |.1.1:..e.z...(".|
00000A40: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000A50: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 2C |..............",|
00000A60: 58 AA 31 29 3B 00 9C 12 84 03 99 C8 28 22 1D 1D |X.1);.......("..|
00000A70: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000A80: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000A90: 1D 1D 1D 1D 1D 22 2C 59 29 3B 3A 8E 00 BA 12 8E |.....",Y);:.....|
00000AA0: 03 8F 20 50 52 49 4E 54 20 28 54 55 53 53 45 4E |.. PRINT (TUSSEN|
00000AB0: 29 52 45 53 55 4C 54 41 41 54 00 D0 12 98 03 97 |)RESULTAAT......|
00000AC0: 35 33 32 38 31 2C 36 3A 97 35 33 32 38 30 2C 35 |53281,6:.53280,5|
00000AD0: 00 F9 12 A2 03 99 22 93 11 1D 1D 1D 1D 1D 1D 1D |......".........|
00000AE0: 1D 9E 22 3B 3A 8B 54 55 B3 B1 30 A7 99 22 9D 9D |..";:.TU..0.."..|
00000AF0: 9D 54 55 53 53 45 4E 22 3B 00 17 13 AC 03 99 22 |.TUSSEN";......"|
00000B00: 52 45 53 55 4C 54 41 41 54 20 4E 41 22 4E 22 4F |RESULTAAT NA"N"O|
00000B10: 50 47 41 56 45 4E 22 00 43 13 B6 03 99 22 1D 90 |PGAVEN".C...."..|
00000B20: B0 C0 C0 B2 C0 C0 C0 C0 B2 C0 C0 C0 C0 B2 C0 C0 |................|
00000B30: C0 C0 B2 C0 C0 C0 C0 B2 C0 C0 C0 C0 B2 C0 C0 C0 |................|
00000B40: C0 AE 22 00 7C 13 C0 03 99 22 1D DD 9E 54 52 90 |..".|...."...TR.|
00000B50: DD 9E 47 4F 45 44 90 DD 9E 46 4F 55 54 90 DD 9E |..GOED...FOUT...|
00000B60: 30 2D 41 20 90 DD 9E 41 2D 42 20 90 DD 9E 42 2D |0-A ...A-B ...B-|
00000B70: 45 20 90 DD 9E 45 2D 35 30 90 DD 22 00 A7 13 CA |E ...E-50.."....|
00000B80: 03 99 22 1D AB C0 C0 DB C0 C0 C0 C0 DB C0 C0 C0 |..".............|
00000B90: C0 DB C0 C0 C0 C0 DB C0 C0 C0 C0 DB C0 C0 C0 C0 |................|
00000BA0: DB C0 C0 C0 C0 B3 22 00 CB 13 D4 03 81 49 B2 31 |......"......I.1|
00000BB0: A4 4C 49 3A 99 22 1D DD 9E 22 3B 3A 8B 49 AB 31 |.LI:."...";:.I.1|
00000BC0: B3 B2 4D 41 58 A7 99 22 12 22 3B 00 E2 13 DE 03 |..MAX..".";.....|
00000BD0: 99 C9 28 C4 28 49 AB 31 29 2C 32 29 22 92 90 DD |..(.(I.1),2)"...|
00000BE0: 22 3B 00 ED 13 E8 03 81 4A B2 31 A4 36 00 0B 14 |";......J.1.6...|
00000BF0: F2 03 99 22 9E 20 22 C9 28 C4 28 52 28 49 2C 4A |...". ".(.(R(I,J|
00000C00: 29 29 2C 32 29 22 20 90 DD 22 3B 00 12 14 FC 03 |)),2)" ..";.....|
00000C10: 82 4A 00 18 14 06 04 99 00 1F 14 10 04 82 49 00 |.J............I.|
00000C20: 4A 14 1A 04 99 22 1D AD C0 C0 B1 C0 C0 C0 C0 B1 |J...."..........|
00000C30: C0 C0 C0 C0 B1 C0 C0 C0 C0 B1 C0 C0 C0 C0 B1 C0 |................|
00000C40: C0 C0 C0 B1 C0 C0 C0 C0 BD 22 00 5D 14 24 04 58 |.........".].$.X|
00000C50: B2 32 33 3A 59 B2 33 31 3A 8D 38 37 30 00 6F 14 |.23:Y.31:.870.o.|
00000C60: 2E 04 8B 54 55 B2 30 A7 99 22 91 22 3B 3A 80 00 |...TU.0..".";:..|
00000C70: 83 14 38 04 99 22 05 5B 12 53 50 41 54 49 45 92 |..8..".[.SPATIE.|
00000C80: 5D 22 3B 00 99 14 42 04 A1 41 24 3A 8B 41 24 B3 |]";...B..A$:.A$.|
00000C90: B1 22 20 22 A7 31 30 39 30 00 B1 14 4C 04 8B 54 |." ".1090...L..T|
00000CA0: 55 B2 32 A7 54 55 B2 30 3A 4B 24 B2 22 20 22 3A |U.2.TU.0:K$." ":|
00000CB0: 8E 00 C8 14 56 04 54 55 B2 30 3A 8D 31 31 32 30 |....V.TU.0:.1120|
00000CC0: 3A 8D 31 32 34 30 3A 8E 00 E1 14 60 04 8F 20 50 |:.1240:....`.. P|
00000CD0: 52 49 4E 54 20 35 2A 31 30 20 4D 41 54 52 49 58 |RINT 5*10 MATRIX|
00000CE0: 2E 00 FF 14 6A 04 4B 4C B2 31 35 3A 97 35 33 32 |....j.KL.15:.532|
00000CF0: 38 30 2C 4B 4C 3A 97 35 33 32 38 31 2C 4B 4C 00 |80,KL:.53281,KL.|
00000D00: 1D 15 74 04 99 22 90 93 20 20 20 22 3B 3A 81 49 |..t..".. ";:.I|
00000D10: B2 31 A4 31 30 3A 99 49 3B 3A 82 3A 99 00 4A 15 |.1.10:.I;:.:..J.|
00000D20: 7E 04 99 22 13 20 20 11 12 B0 C0 C0 C0 C0 C0 C0 |~..". .........|
00000D30: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000D40: C0 C0 C0 C0 C0 C0 C0 C0 AE 22 00 56 15 88 04 81 |.........".V....|
00000D50: 49 B2 31 A4 31 35 00 81 15 92 04 99 22 20 20 12 |I.1.15......" .|
00000D60: DD 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00000D70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DD | .|
00000D80: 22 00 87 15 9C 04 82 00 B2 15 A6 04 99 22 20 20 |"............" |
00000D90: 12 AD C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000DA0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000DB0: BD 22 00 DB 15 B0 04 99 22 13 11 11 11 22 3B 3A |."......"....";:|
00000DC0: 81 49 B2 30 A4 34 30 A9 31 30 3A 99 C9 28 C4 28 |.I.0.40.10:..(.(|
00000DD0: 49 29 2C 32 29 22 11 11 22 3A 82 00 EC 15 BA 04 |I),2)"..":......|
00000DE0: 99 22 13 11 11 11 11 1D 1D 1D 22 3B 00 1A 16 C4 |."........";....|
00000DF0: 04 81 49 B2 31 A4 35 3A 81 4A B2 31 A4 31 30 3A |..I.1.5:.J.1.10:|
00000E00: 99 48 24 22 11 11 22 3B 3A 82 3A 99 22 11 11 22 |.H$"..";:.:.".."|
00000E10: 3A 99 22 1D 1D 1D 22 3B 3A 82 00 20 16 CE 04 8E |:."...";:.. ....|
00000E20: 00 46 16 D8 04 8F 20 50 52 49 4E 54 20 54 48 45 |.F.... PRINT THE|
00000E30: 20 54 48 52 45 45 20 43 48 41 52 2E 20 49 4E 20 | THREE CHAR. IN |
00000E40: 4D 41 54 52 49 58 00 66 16 E2 04 81 49 B2 31 A4 |MATRIX.f....I.1.|
00000E50: 41 AB 31 3A 97 A5 4B 28 49 29 2C 31 3A 97 A5 4B |A.1:..K(I),1:..K|
00000E60: 28 49 29 2C 33 32 00 75 16 EC 04 82 3A 97 A5 4B |(I),32.u....:..K|
00000E70: 28 49 29 2C 31 00 91 16 F6 04 81 49 B2 31 A4 42 |(I),1......I.1.B|
00000E80: AB 31 3A 8B 49 B3 B1 41 A7 97 A5 4B 28 49 29 2C |.1:.I..A...K(I),|
00000E90: 32 00 A5 16 00 05 8B 49 B3 B1 41 A7 97 A5 4B 28 |2......I..A...K(|
00000EA0: 49 29 2C 33 32 00 B4 16 0A 05 82 3A 97 A5 4B 28 |I),32......:..K(|
00000EB0: 49 29 2C 32 00 D2 16 14 05 81 43 B2 31 A4 51 3A |I),2......C.1.Q:|
00000EC0: 97 A5 50 28 43 29 2C 33 3A 97 A5 50 28 43 29 2C |..P(C),3:..P(C),|
00000ED0: 33 32 00 E1 16 1E 05 82 3A 97 A5 50 28 43 29 2C |32......:..P(C),|
00000EE0: 33 00 E7 16 28 05 8E 00 0B 17 32 05 8F 2A 2A 2A |3...(.....2..***|
00000EF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000F00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 2F 17 3C 05 |***********./.<.|
00000F10: 8F 2A 20 47 45 45 46 20 56 41 52 49 41 42 45 4C |.* GEEF VARIABEL|
00000F20: 45 4E 20 45 45 4E 20 57 41 41 52 44 45 20 2A 00 |EN EEN WAARDE *.|
00000F30: 53 17 46 05 8F 2A 20 4B 41 4E 20 56 45 52 56 41 |S.F..* KAN VERVA|
00000F40: 4E 47 45 4E 20 57 4F 52 44 45 4E 20 44 4F 4F 52 |NGEN WORDEN DOOR|
00000F50: 20 20 2A 00 77 17 50 05 8F 2A 20 44 4F 4F 52 20 | *.w.P..* DOOR |
00000F60: 45 45 4E 20 52 4F 55 54 49 4E 45 20 44 49 45 20 |EEN ROUTINE DIE |
00000F70: 57 41 41 52 2D 20 2A 00 9B 17 5A 05 8F 2A 20 44 |WAAR- *...Z..* D|
00000F80: 45 4E 20 56 41 4E 41 46 20 45 45 4E 20 53 43 48 |EN VANAF EEN SCH|
00000F90: 49 4A 46 20 4C 45 45 53 54 20 2A 00 BF 17 64 05 |IJF LEEST *...d.|
00000FA0: 8F 2A 20 5A 4F 44 41 54 20 44 45 20 4D 4F 45 49 |.* ZODAT DE MOEI|
00000FB0: 4C 49 4A 4B 48 45 49 44 53 2D 20 20 20 20 2A 00 |LIJKHEIDS- *.|
00000FC0: E3 17 6E 05 8F 2A 20 47 52 41 41 44 20 56 41 4E |..n..* GRAAD VAN|
00000FD0: 20 48 45 54 20 50 52 4F 47 2E 20 41 41 4E 20 44 | HET PROG. AAN D|
00000FE0: 45 20 2A 00 07 18 78 05 8F 2A 20 4B 57 41 4C 49 |E *...x..* KWALI|
00000FF0: 54 45 49 54 45 4E 20 56 41 4E 20 44 45 20 4C 45 |TEITEN VAN DE LE|
00001000: 45 52 4C 49 4E 47 2A 00 2B 18 82 05 8F 2A 20 41 |ERLING*.+....* A|
00001010: 41 4E 47 45 50 41 53 54 20 4B 41 4E 20 57 4F 52 |ANGEPAST KAN WOR|
00001020: 44 45 4E 2E 20 20 20 20 20 20 2A 00 4F 18 8C 05 |DEN. *.O...|
00001030: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
00001040: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00001050: 73 18 96 05 4D 41 58 B2 35 20 20 3A 8F 20 4D 41 |s...MAX.5 :. MA|
00001060: 58 20 53 50 41 54 49 45 53 20 54 55 53 53 45 4E |X SPATIES TUSSEN|
00001070: 20 44 45 00 90 18 A0 05 3A 20 20 20 20 20 20 3A | DE.....: :|
00001080: 8F 20 4C 45 54 54 45 52 53 20 28 33 2D 31 35 29 |. LETTERS (3-15)|
00001090: 00 B5 18 AA 05 4D 47 B2 31 20 20 20 3A 8F 20 4D |.....MG.1 :. M|
000010A0: 4F 45 49 4C 49 4A 4B 48 45 49 44 53 47 52 41 41 |OEILIJKHEIDSGRAA|
000010B0: 44 20 56 41 4E 00 D9 18 B4 05 3A 20 20 20 20 20 |D VAN.....: |
000010C0: 20 3A 8F 20 46 49 47 55 55 52 20 57 41 41 52 49 | :. FIGUUR WAARI|
000010D0: 4E 20 4C 45 54 54 45 52 53 00 F9 18 BE 05 3A 20 |N LETTERS.....: |
000010E0: 20 20 20 20 20 3A 8F 20 56 45 52 53 43 48 49 4A | :. VERSCHIJ|
000010F0: 4E 45 4E 20 28 31 2D 37 29 00 1A 19 C8 05 4F 50 |NEN (1-7).....OP|
00001100: B2 32 35 20 20 3A 8F 20 41 41 4E 54 41 4C 20 4F |.25 :. AANTAL O|
00001110: 50 47 41 56 45 4E 20 28 58 29 00 37 19 D2 05 4C |PGAVEN (X).7...L|
00001120: 49 B2 31 35 20 20 3A 8F 20 4C 49 4D 49 45 54 20 |I.15 :. LIMIET |
00001130: 56 41 4E 20 4D 41 58 00 5A 19 DC 05 4E 56 B2 33 |VAN MAX.Z...NV.3|
00001140: 20 20 20 3A 8F 20 4E 41 20 4E 56 20 47 4F 45 44 | :. NA NV GOED|
00001150: 45 20 41 4E 54 57 4F 4F 52 2D 00 7C 19 E6 05 3A |E ANTWOOR-.|...:|
00001160: 20 20 20 20 20 20 3A 8F 20 44 45 4E 20 28 45 4E | :. DEN (EN|
00001170: 20 47 45 45 4E 20 46 4F 55 54 45 29 00 9E 19 F0 | GEEN FOUTE)....|
00001180: 05 3A 20 20 20 20 20 20 3A 8F 20 53 54 49 4A 47 |.: :. STIJG|
00001190: 54 20 48 45 54 20 4E 49 56 4F 20 56 41 4E 00 C0 |T HET NIVO VAN..|
000011A0: 19 FA 05 3A 20 20 20 20 20 20 3A 8F 20 44 45 20 |...: :. DE |
000011B0: 4C 45 45 52 4C 2E 20 28 4D 47 3D 4D 47 2B 31 2C |LEERL. (MG=MG+1,|
000011C0: 00 DD 19 04 06 3A 20 20 20 20 20 20 3A 8F 20 4F |.....: :. O|
000011D0: 46 20 4D 41 58 3D 4D 41 58 2B 31 29 2E 00 E3 19 |F MAX=MAX+1)....|
000011E0: 0E 06 8E 00 00 00 |...... |
..#.D..****************************.E.N.
.* DOORTELLEN.3 (C)1983/11 *.G.O..*****
***********************.M.P.:...Q..* * *
*PROGRAMMEUR* * * * *...W..************
****************.R.X..* R.J.M. MILTENBUR
G *......* GEERTRUIDENBERGSTRAAT
43 *......* 3086 WE ROTTERDAM *.8
....****************************.>...:.`
....* DIDACTISCHE SPECIFICATIE *......**
**************************......* H. VAN
ZIJL *.F....* STERREMOS 4
*......* 3069 AS ROTTERDAM
*......**************************
**.6. .."............... D O O R T E L L
E N ".Z...."....................(C) 198
3"......".................R.J.M. MILTENB
URG"......"...............-EN- H. VAN ZI
JL.".A....T$:.T$.." ".164.K....1330.....
H$(1)."........... ..........".....H$(2)
.".L......... .......O.P".4...H$(3)."..
.... . . .... .".W.H.H$(4).".VVV....
V.. ..V....VVV".~.R.H$(5).".Q. .Q..... .
. .....Q. .Q".....H$(6).".N*M....*.. ..
*....M*N".D...H$(7).".ABC....A.. ..B....
ABC".R...H$.H$(MG)......R(LI,6)......650
,0:. REPEAT AAN...... SET DEFINITIONS..K
.... .K(Z).1145.((.((I.1).10)).120).(.(.
((I.1).10).10.I).3)...".. .P(Z).1145.((.
((C.1).10)).120).(.(.((C.1).10).10.C).3)
...,.. GET UNKNOWN NUMBERS..I.6.A..(.TI)
:. BY EVERY START RANDOM....@.EN.41.(MAX
.2):UP.0...J.A..(.(1).EN).8:B.A..(.(1).M
AX.1):VE.B.A:D.B.VE.-.T.Q.A.(.(.(1).4).2
):E.0.I.^..1120:.* MAAK SCHERM OP.R.H.TU
.0.U.R..1240:. ABC IN MATRIX PLAATSEN...
|.. WAIT FOR INPUT INCREMENT C......800:
.K.1.440......C.50...P(C),32:C.0.N....V.
0.V.32.......P(C),V:C.C.1:V.B(.P(C)).127
:..P(C),3......380...... INPUT = 'ZEKER'
.%.B..C.D.660.8.L.. WRONG INPUT..S.V..C.
A.R(VE,3).R(VE,3).1.T....C..A.C..B.R(VE,
4).R(VE,4).1......C.B.C..D.R(VE,5).R(VE,
5).1......C.D.R(VE,6).R(VE,6).1.K...F.F.
1:R(VE,2).R(VE,2).1.W...CO.CO.2......CO.
.2.MG.1.MG.MG.1:CO.0:H$.H$(MG):UP.1:.550
.-....CO..2.MAX.3.MAX.MAX.1:UP.1:CO.0.?.
&.X.18:Y.0:.890.V.0..I.1.5:."
":....:.X.19:
Y.10:.890:.".FOUT";:.UP.0.." OPNIEUW";..
.D..:TU.1.D.N..810:.K..0.590.R.X..UP.1.3
20...B..TU.0.350...L..I.1.250:....V..I.1
.50:..K(J*,160:..,...X.19:Y.10:.890:."
".5....370.H.... GOEDE INVOER
.K...X.18:Y.14:.890:."..GOED ZO!":......
G.G.1:R(VE,1).R(VE,1).1......G.10.(F.G.4
).730.....X.20:Y.20:.890.E.F...20)A"+"B.
A"="B.Z.P...20)B"+"C.B"="C...Z.N.N.1....
.CO.CO.1......CO.NV.MAX.LI.MAX.MAX.1:CO.
0:.770.?....CO.NV.2.MG.7.MG.MG.1:CO.0:H$
.H$(MG).W...TU.1:.800:.K..0.770.E....N.O
P.320.S...TU.0:.910... .. GET SPACE (K=0
) OR RETURN (K=1)...*..K$:.K$.."".810...
4..K$:.K$."".820.T.>..K$.G(13).K.1:....H
..K$."%".TU.TU.1:.910...R..K$.." ".820..
.\.K.0:..).F.. WAIT AND SET CURSOR TO X,
Y.6.P..J.1.1:..E.Z..H(".................
..............",X.1);......H("..........
.............................",Y);:.....
.. PRINT (TUSSEN)RESULTAAT.P....53281,6:
.53280,5......"...........";:.TU..0.."..
.TUSSEN";......"RESULTAAT NA"N"OPGAVEN".
C...."..................................
..".|...."...TR...GOED...FOUT...0-A ...A
-B ...B-E ...E-50.."...J..".............
......................".K.T..I.1.LI:."..
.";:.I.1..MAX..".";......I(D(I.1),2)"...
";......J.1.6......". "I(D(R(I,J)),2)" .
.";......J............I.J...."..........
.........................".].$.X.23:Y.31
:.870.O....TU.0..".";:....8..".[.SPATIE.
]";...B..A$:.A$.." ".1090...L..TU.2.TU.0
:K$." ":..H.V.TU.0:.1120:.1240:....`.. P
RINT 5*10 MATRIX....J.KL.15:.53280,KL:.5
3281,KL...T..".. ";:.I.1.10:.I;:.:..J.
~..". .................................
.".V....I.1.15......" ..
."............" ........
........................."......"....";:
.I.0.40.10:.I(D(I),2)"..":......."......
..";...D..I.1.5:.J.1.10:.H$"..";:.:.".."
:."...";:.. .N...F.X.. PRINT THE THREE C
HAR. IN MATRIX.F....I.1.A.1:..K(I),1:..K
(I),32.U....:..K(I),1......I.1.B.1:.I..A
...K(I),2......I..A...K(I),32......:..K(
I),2.R....C.1.Q:..P(C),3:..P(C),32......
:..P(C),3...(.....2..*******************
***********./.<..* GEEF VARIABELEN EEN W
AARDE *.S.F..* KAN VERVANGEN WORDEN DOOR
*.W.P..* DOOR EEN ROUTINE DIE WAAR- *.
..Z..* DEN VANAF EEN SCHIJF LEEST *...D.
.* ZODAT DE MOEILIJKHEIDS- *...N..* G
RAAD VAN HET PROG. AAN DE *...X..* KWALI
TEITEN VAN DE LEERLING*.+....* AANGEPAST
KAN WORDEN. *.O....***************
***************.S...MAX.5 :. MAX SPATIE
S TUSSEN DE... .: :. LETTERS (3-15)
.....MG.1 :. MOEILIJKHEIDSGRAAD VAN.Y.
..: :. FIGUUR WAARIN LETTERS.....:
:. VERSCHIJNEN (1-7)...H.OP.25 :.
AANTAL OPGAVEN (X).7.R.LI.15 :. LIMIET
VAN MAX.Z...NV.3 :. NA NV GOEDE ANTWOO
R-.|...: :. DEN (EN GEEN FOUTE)....
.: :. STIJGT HET NIVO VAN.....:
:. DE LEERL. (MG=MG+1,.....: :. O
F MAX=MAX+1)..........
> CLICK IMAGE PREVIEW FOR FULL MODAL