> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 29 08 0A 00 99 22 20 20 20 20 20 20 20 46 |..)...." F|
00000010: 55 4E 4B 54 49 45 27 53 20 56 4F 4F 52 20 49 4E |UNKTIE'S VOOR IN|
00000020: 20 45 45 4E 20 50 52 47 22 00 31 08 14 00 99 3A | EEN PRG".1....:|
00000030: 99 00 53 08 1E 00 99 22 50 52 49 4E 54 20 3D 20 |..S...."PRINT = |
00000040: 5A 45 54 20 4F 50 20 48 45 54 20 53 43 48 45 52 |ZET OP HET SCHER|
00000050: 4D 2E 22 00 66 08 28 00 99 22 52 45 4D 20 3D 20 |M.".f.(.."REM = |
00000060: 53 48 4F 57 2E 22 00 91 08 32 00 99 22 49 4E 50 |SHOW."...2.."INP|
00000070: 55 54 20 3D 20 48 45 54 20 54 59 50 20 42 4C 4F |UT = HET TYP BLO|
00000080: 4B 4A 45 20 4C 41 54 45 4E 20 4B 4F 4D 45 4E 2E |KJE LATEN KOMEN.|
00000090: 22 00 AD 08 3C 00 99 22 47 4F 54 4F 20 3D 20 47 |"...<.."GOTO = G|
000000A0: 41 20 4E 41 41 52 20 52 45 47 45 4C 22 00 EB 08 |A NAAR REGEL"...|
000000B0: 46 00 99 22 49 46 2E 2E 2E 2E 54 48 45 4E 20 3D |F.."IF....THEN =|
000000C0: 20 49 53 20 2E 2E 47 52 4F 54 45 52 2F 4B 4C 45 | IS ..GROTER/KLE|
000000D0: 49 4E 45 52 2F 47 45 4C 49 4A 4B 20 44 41 4E 20 |INER/GELIJK DAN |
000000E0: 2E 2E 20 44 41 4E 20 2E 2E 2E 22 00 29 09 50 00 |.. DAN ...".).P.|
000000F0: 99 22 49 4E 54 2D 52 4E 44 20 3D 20 45 45 4E 20 |."INT-RND = EEN |
00000100: 54 4F 45 56 41 4C 20 52 45 47 45 4C 28 43 4F 4D |TOEVAL REGEL(COM|
00000110: 50 55 54 45 52 20 4B 49 45 53 54 20 57 49 4C 4C |PUTER KIEST WILL|
00000120: 45 4B 45 55 52 49 47 2E 22 00 3C 09 5A 00 99 22 |EKEURIG.".<.Z.."|
00000130: 50 4F 4B 45 20 3D 4B 4C 45 55 52 22 00 5F 09 64 |POKE =KLEUR"._.d|
00000140: 00 99 22 53 41 56 45 20 27 4E 41 41 4D 27 2C 38 |.."SAVE 'NAAM',8|
00000150: 20 3D 20 4F 50 20 44 49 53 4B 45 54 54 45 22 00 | = OP DISKETTE".|
00000160: 84 09 6E 00 99 22 46 4F 52 20 3D 20 45 45 4E 20 |..n.."FOR = EEN |
00000170: 57 41 43 48 54 20 4C 45 54 54 45 52 20 4D 41 4B |WACHT LETTER MAK|
00000180: 45 4E 2E 22 00 B0 09 78 00 99 22 4E 45 58 54 20 |EN."...x.."NEXT |
00000190: 3D 20 57 41 43 48 54 45 4E 20 4F 50 20 44 45 20 |= WACHTEN OP DE |
000001A0: 4C 45 54 54 45 52 20 56 41 4E 20 46 4F 52 2E 22 |LETTER VAN FOR."|
000001B0: 00 D5 09 82 00 99 22 53 50 45 50 20 3D 20 57 41 |......"SPEP = WA|
000001C0: 43 48 54 54 49 4A 44 20 2E 2E 2A 20 5A 4F 20 53 |CHTTIJD ..* ZO S|
000001D0: 4E 45 4C 2E 22 00 FB 09 8C 00 99 22 4A 45 20 4B |NEL."......"JE K|
000001E0: 55 4E 54 20 4E 41 41 52 20 42 4F 56 45 4E 20 41 |UNT NAAR BOVEN A|
000001F0: 4C 53 20 4A 45 20 54 59 50 54 22 00 0E 0A 96 00 |LS JE TYPT".....|
00000200: 99 22 31 30 20 50 52 49 4E 54 27 2A 27 22 00 2A |."10 PRINT'*'".*|
00000210: 0A A0 00 99 22 2A 3D 5B 53 48 49 46 54 5D 20 4D |...."*=[SHIFT] M|
00000220: 45 54 20 5B 43 52 53 52 5D 22 00 52 0A AA 00 99 |ET [CRSR]".R....|
00000230: 22 4A 45 20 4B 55 4E 54 20 4E 41 41 52 20 42 45 |"JE KUNT NAAR BE|
00000240: 4E 45 44 45 4E 20 41 4C 53 20 4A 45 20 54 59 50 |NEDEN ALS JE TYP|
00000250: 54 22 00 65 0A B4 00 99 22 31 30 20 50 52 49 4E |T".e...."10 PRIN|
00000260: 54 27 2A 27 22 00 7B 0A BE 00 99 22 2A 20 3D 20 |T'*'".{...."* = |
00000270: 4D 45 54 20 5B 43 52 53 52 5D 22 00 A2 0A C8 00 |MET [CRSR]".....|
00000280: 99 22 4A 45 20 4B 55 4E 54 20 4E 41 41 52 20 52 |."JE KUNT NAAR R|
00000290: 45 43 48 54 53 20 41 4C 53 20 4A 45 20 54 59 50 |ECHTS ALS JE TYP|
000002A0: 54 22 00 B5 0A D2 00 99 22 31 30 20 50 52 49 4E |T"......"10 PRIN|
000002B0: 54 27 2A 27 22 00 CB 0A DC 00 99 22 2A 20 3D 20 |T'*'"......"* = |
000002C0: 4D 45 54 20 5B 43 52 53 52 5D 22 00 F1 0A E6 00 |MET [CRSR]".....|
000002D0: 99 22 4A 45 20 4B 55 4E 54 20 4E 41 41 52 20 4C |."JE KUNT NAAR L|
000002E0: 49 4E 4B 53 20 41 4C 53 20 4A 45 20 54 59 50 54 |INKS ALS JE TYPT|
000002F0: 22 00 04 0B F0 00 99 22 31 30 20 50 52 49 4E 54 |"......"10 PRINT|
00000300: 27 2A 27 22 00 20 0B FA 00 99 22 2A 20 3D 20 53 |'*'". ...."* = S|
00000310: 48 49 46 54 20 4D 45 54 20 5B 43 52 53 52 5D 22 |HIFT MET [CRSR]"|
00000320: 00 00 00 |... |
..)...." FUNKTIE'S VOOR IN EEN PRG
".1....:..S...."PRINT = ZET OP HET SCHER
M.".F.(.."REM = SHOW."...2.."INPUT = HET
TYP BLOKJE LATEN KOMEN."...<.."GOTO = G
A NAAR REGEL"...F.."IF....THEN = IS ..GR
OTER/KLEINER/GELIJK DAN .. DAN ...".).P.
."INT-RND = EEN TOEVAL REGEL(COMPUTER KI
EST WILLEKEURIG.".<.Z.."POKE =KLEUR"._.D
.."SAVE 'NAAM',8 = OP DISKETTE"...N.."FO
R = EEN WACHT LETTER MAKEN."...X.."NEXT
= WACHTEN OP DE LETTER VAN FOR.".U...."S
PEP = WACHTTIJD ..* ZO SNEL."......"JE K
UNT NAAR BOVEN ALS JE TYPT"......"10 PRI
NT'*'".*. .."*=[SHIFT] MET [CRSR]".R....
"JE KUNT NAAR BENEDEN ALS JE TYPT".E....
"10 PRINT'*'".{...."* = MET [CRSR]"...H.
."JE KUNT NAAR RECHTS ALS JE TYPT"...R..
"10 PRINT'*'".K...."* = MET [CRSR]".....
."JE KUNT NAAR LINKS ALS JE TYPT"......"
10 PRINT'*'". ...."* = SHIFT MET [CRSR]"
...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL