> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 24 08 0A 00 99 22 93 11 1D 1D 2A 2A 2A 20 |..$...."....*** |
00000010: 20 52 45 47 45 4C 53 20 57 49 53 53 45 4E 20 20 | REGELS WISSEN |
00000020: 2A 2A 2A 22 00 65 08 14 00 99 22 11 44 49 54 20 |***".e....".DIT |
00000030: 50 52 4F 47 52 41 4D 4D 41 20 57 49 53 54 20 42 |PROGRAMMA WIST B|
00000040: 45 50 41 41 4C 44 45 20 52 45 47 45 4C 53 20 56 |EPAALDE REGELS V|
00000050: 41 4E 20 20 48 45 54 20 42 45 45 4C 44 53 43 48 |AN HET BEELDSCH|
00000060: 45 52 4D 2E 22 00 7B 08 1E 00 99 22 11 20 20 56 |ERM.".{....". V|
00000070: 41 52 49 41 42 45 4C 45 4E 3A 22 00 9D 08 28 00 |ARIABELEN:"...(.|
00000080: 99 22 11 52 4E 20 3D 20 52 45 47 45 4C 4E 55 4D |.".RN = REGELNUM|
00000090: 4D 45 52 20 28 30 20 2D 20 32 34 29 22 00 B4 08 |MER (0 - 24)"...|
000000A0: 32 00 99 22 11 56 52 20 3D 20 56 41 4E 20 52 45 |2..".VR = VAN RE|
000000B0: 47 45 4C 22 00 CB 08 3C 00 99 22 11 54 52 20 3D |GEL"...<..".TR =|
000000C0: 20 54 4F 54 20 52 45 47 45 4C 22 00 E9 08 46 00 | TOT REGEL"...F.|
000000D0: 99 22 11 44 49 54 20 49 53 20 48 45 54 20 50 52 |.".DIT IS HET PR|
000000E0: 4F 47 52 41 4D 4D 41 3A 22 00 18 09 4B 00 99 22 |OGRAMMA:"...K.."|
000000F0: 20 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 | ...............|
00000100: D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 |................|
00000110: D2 D2 D2 D2 D2 D2 D2 22 00 47 09 50 00 99 22 20 |.......".G.P.." |
00000120: B5 31 30 20 46 4F 52 20 52 4E 20 3D 20 56 52 20 |.10 FOR RN = VR |
00000130: 54 4F 20 54 52 20 3A 20 50 4F 4B 45 20 37 38 31 |TO TR : POKE 781|
00000140: 2C 52 4E 20 3A B6 22 00 76 09 55 00 99 22 20 B5 |,RN :.".v.U.." .|
00000150: 53 59 53 20 35 39 39 30 33 20 3A 20 4E 45 58 54 |SYS 59903 : NEXT|
00000160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000170: 20 20 20 20 B6 22 00 A5 09 58 00 99 22 20 B7 B7 | ."...X.." ..|
00000180: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................|
00000190: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................|
000001A0: B7 B7 B7 B7 22 00 CF 09 5A 00 99 22 56 4F 4F 52 |...."...Z.."VOOR|
000001B0: 20 48 45 54 20 57 49 53 53 45 4E 20 56 41 4E 20 | HET WISSEN VAN |
000001C0: 31 20 52 45 47 45 4C 20 47 45 4C 44 54 3A 22 00 |1 REGEL GELDT:".|
000001D0: FE 09 5F 00 99 22 20 D2 D2 D2 D2 D2 D2 D2 D2 D2 |.._.." .........|
000001E0: D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 |................|
000001F0: D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 22 00 2D |.............".-|
00000200: 0A 64 00 99 22 20 B5 31 30 20 50 4F 4B 45 20 37 |.d.." .10 POKE 7|
00000210: 38 31 2C 52 4E 20 3A 20 53 59 53 20 35 39 39 30 |81,RN : SYS 5990|
00000220: 33 20 20 20 20 20 20 20 20 20 20 B6 22 00 5C 0A |3 .".\.|
00000230: 69 00 99 22 20 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |i.." ...........|
00000240: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................|
00000250: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 22 00 8B 0A 6E |..........."...n|
00000260: 00 99 22 56 4F 4F 52 20 45 45 4E 20 44 45 4D 4F |.."VOOR EEN DEMO|
00000270: 4E 53 54 52 41 54 49 45 3A 44 55 57 20 4F 50 20 |NSTRATIE:DUW OP |
00000280: 45 45 4E 20 54 4F 45 54 53 2E 22 00 9E 0A 78 00 |EEN TOETS."...x.|
00000290: A1 41 24 3A 8B 41 24 B2 22 22 A7 31 32 30 00 A8 |.A$:.A$."".120..|
000002A0: 0A 82 00 99 22 93 13 22 00 B1 0A 87 00 99 22 91 |....".."......".|
000002B0: 22 00 BE 0A 8C 00 81 4E B2 31 A4 38 30 30 00 D1 |"......N.1.800..|
000002C0: 0A 96 00 47 44 B2 BB 28 31 29 AC 39 33 20 AA 33 |...GD..(1).93 .3|
000002D0: 34 00 DD 0A A0 00 99 C7 28 47 44 29 3B 00 E3 0A |4.......(GD);...|
000002E0: AA 00 82 00 E9 0A AF 00 99 00 05 0B B4 00 99 22 |..............."|
000002F0: 20 31 2E 20 45 45 4E 20 52 45 47 45 4C 20 57 49 | 1. EEN REGEL WI|
00000300: 53 53 45 4E 2E 00 29 0B BE 00 99 22 11 20 32 2E |SSEN..)....". 2.|
00000310: 20 4D 45 45 52 44 45 52 45 20 52 45 47 45 4C 53 | MEERDERE REGELS|
00000320: 20 57 49 53 53 45 4E 2E 22 00 47 0B C8 00 A1 42 | WISSEN.".G....B|
00000330: 24 20 3A 8B 42 24 B3 B1 22 31 22 AF 42 24 B3 B1 |$ :.B$.."1".B$..|
00000340: 22 32 22 A7 32 30 30 00 53 0B CD 00 42 B2 C5 28 |"2".200.S...B..(|
00000350: 42 24 29 00 62 0B D2 00 91 42 89 33 30 30 2C 34 |B$).b....B.300,4|
00000360: 30 30 00 81 0B 2C 01 81 52 4E B2 32 30 A4 32 34 |00...,..RN.20.24|
00000370: 3A 97 37 38 31 2C 52 4E 3A 9E 35 39 39 30 33 3A |:.781,RN:.59903:|
00000380: 82 00 8D 0B 36 01 99 22 91 91 91 91 22 00 B6 0B |....6.."...."...|
00000390: 40 01 85 22 47 45 45 46 20 44 45 20 54 45 20 57 |@.."GEEF DE TE W|
000003A0: 49 53 53 45 4E 20 52 45 47 45 4C 20 28 30 2D 31 |ISSEN REGEL (0-1|
000003B0: 39 29 22 3B 52 4E 00 C9 0B 4A 01 97 37 38 31 2C |9)";RN...J..781,|
000003C0: 52 4E 3A 9E 35 39 39 30 33 00 E0 0B 54 01 99 22 |RN:.59903...T.."|
000003D0: 11 4E 4F 47 20 45 45 4E 53 20 28 4A 2F 4E 29 22 |.NOG EENS (J/N)"|
000003E0: 00 F3 0B 5E 01 A1 43 24 3A 8B 43 24 B2 22 22 A7 |...^..C$:.C$."".|
000003F0: 33 35 30 00 01 0C 63 01 8B 43 24 B2 22 4E 22 A7 |350...c..C$."N".|
00000400: 90 00 0A 0C 68 01 89 33 30 30 00 29 0C 90 01 81 |....h..300.)....|
00000410: 52 4E B2 32 30 A4 32 34 3A 97 37 38 31 2C 52 4E |RN.20.24:.781,RN|
00000420: 3A 9E 35 39 39 30 33 3A 82 00 36 0C 9A 01 99 22 |:.59903:..6...."|
00000430: 91 91 91 91 91 22 00 60 0C A4 01 85 22 56 41 4E |.....".`...."VAN|
00000440: 41 46 20 57 45 4C 4B 45 20 52 45 47 45 4C 20 57 |AF WELKE REGEL W|
00000450: 49 53 53 45 4E 20 28 30 2D 31 39 29 22 3B 56 52 |ISSEN (0-19)";VR|
00000460: 00 88 0C AE 01 85 22 54 4F 54 20 57 45 4C 4B 45 |......"TOT WELKE|
00000470: 20 52 45 47 45 4C 20 57 49 53 53 45 4E 20 28 30 | REGEL WISSEN (0|
00000480: 2D 31 39 29 22 3B 54 52 00 A7 0C B8 01 81 52 4E |-19)";TR......RN|
00000490: B2 56 52 A4 54 52 3A 97 37 38 31 2C 52 4E 3A 9E |.VR.TR:.781,RN:.|
000004A0: 35 39 39 30 33 3A 82 00 BE 0C C2 01 99 22 11 4E |59903:.......".N|
000004B0: 4F 47 20 45 45 4E 53 20 28 4A 2F 4E 29 22 00 D1 |OG EENS (J/N)"..|
000004C0: 0C CC 01 A1 44 24 3A 8B 44 24 B2 22 22 A7 34 36 |....D$:.D$."".46|
000004D0: 30 00 DF 0C D1 01 8B 44 24 B2 22 4E 22 A7 90 00 |0......D$."N"...|
000004E0: E8 0C D6 01 89 34 30 30 00 00 00 |.....400... |
..$...."....*** REGELS WISSEN ***".E..
..".DIT PROGRAMMA WIST BEPAALDE REGELS V
AN HET BEELDSCHERM.".{....". VARIABELE
N:"...(..".RN = REGELNUMMER (0 - 24)"...
2..".VR = VAN REGEL".K.<..".TR = TOT REG
EL"...F..".DIT IS HET PROGRAMMA:"...K.."
RRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRR"
.G.P.." .10 FOR RN = VR TO TR : POKE 781
,RN :.".V.U.." .SYS 59903 : NEXT
."...X.." ..................
....................".O.Z.."VOOR HET WIS
SEN VAN 1 REGEL GELDT:"..._.." RRRRRRRRR
RRRRRRRRRRRRRRRRRRRRRRRRRRRRR".-.D.." .1
0 POKE 781,RN : SYS 59903 .".\.
I.." ...................................
..."...N.."VOOR EEN DEMONSTRATIE:DUW OP
EEN TOETS."...X..A$:.A$."".120......".."
......"."......N.1.800.Q...GD..(1).93 .3
4... ..G(GD);.................." 1. EEN
REGEL WISSEN..)....". 2. MEERDERE REGELS
WISSEN.".G.H..B$ :.B$.."1".B$.."2".200.
S.M.B.E(B$).B.R..B.300,400...,..RN.20.24
:.781,RN:.59903:....6.."...."...@.."GEEF
DE TE WISSEN REGEL (0-19)";RN.I.J..781,
RN:.59903...T..".NOG EENS (J/N)"...^..C$
:.C$."".350...C..C$."N".....H..300.)....
RN.20.24:.781,RN:.59903:..6....".....".`
...."VANAF WELKE REGEL WISSEN (0-19)";VR
......"TOT WELKE REGEL WISSEN (0-19)";TR
......RN.VR.TR:.781,RN:.59903:....B..".N
OG EENS (J/N)".Q.L..D$:.D$."".460...Q..D
$."N".....V..400...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL