KLOKV1-4
FILE INFORMATION
FILENAME(S): KLOKV1-4
FILE TYPE(S): PRG
FILE SIZE: 2.5K
FIRST SEEN: 2025-11-30 21:06:41
APPEARS ON: 1 disk(s)
FILE HASH
5ccca4c7203c813fed00c9a1aa943e3aa5cf36ebb9caabd3a973c95a4d66e790
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| STR I BASIC | KLOKV1-4 | PRG | DuncanTwain | 16 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0B 08 0A 00 89 31 30 30 30 00 15 08 14 00 |.......1000.....|
00000010: 89 31 30 31 30 00 21 08 64 00 99 22 93 22 3B 3A |.1010.!.d..".";:|
00000020: 8E 00 51 08 6E 00 99 C8 28 22 13 11 11 11 11 11 |..Q.n...("......|
00000030: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000040: 11 11 11 22 2C B6 28 B5 28 56 45 AA 31 29 29 29 |...",.(.(VE.1)))|
00000050: 3B 00 61 08 70 00 99 A6 B6 28 48 4F 29 29 3B 3A |;.a.p....(HO));:|
00000060: 8E 00 86 08 78 00 48 4F B2 C2 28 32 30 39 29 AA |....x.HO..(209).|
00000070: 32 35 36 AC C2 28 32 31 30 29 AB 31 30 32 34 AA |256..(210).1024.|
00000080: C2 28 32 31 31 29 00 A4 08 79 00 56 45 B2 B5 28 |.(211)...y.VE..(|
00000090: 48 4F AD 34 30 29 3A 48 4F B2 48 4F AB 34 30 AC |HO.40):HO.HO.40.|
000000A0: 56 45 3A 8E 00 AF 08 C8 00 A1 49 4E 24 3A 8E 00 |VE:.......IN$:..|
000000B0: C4 08 D2 00 A1 49 4E 24 3A 8B 49 4E 24 B2 22 22 |.....IN$:.IN$.""|
000000C0: 89 32 31 30 00 CA 08 DC 00 8E 00 DA 08 E8 03 88 |.210............|
000000D0: 20 41 B2 31 30 30 3A 89 32 30 00 F0 08 F2 03 8F | A.100:.20......|
000000E0: 20 2A 2A 2A 20 54 45 4C 45 41 43 2D 4B 4C 4F 4B | *** TELEAC-KLOK|
000000F0: 00 08 09 FC 03 8F 20 2A 2A 2A 20 49 4E 49 54 49 |...... *** INITI|
00000100: 41 4C 49 53 41 54 49 45 00 32 09 06 04 86 54 44 |ALISATIE.2....TD|
00000110: 28 33 29 2C 46 4F 55 54 28 34 29 2C 4D 41 58 28 |(3),FOUT(4),MAX(|
00000120: 33 29 2C 46 4F 55 54 24 28 34 29 2C 47 5A 24 28 |3),FOUT$(4),GZ$(|
00000130: 33 29 00 56 09 10 04 81 20 49 B2 20 31 A4 20 34 |3).V.... I. 1. 4|
00000140: 3A 87 46 4F 55 54 28 49 29 2C 46 4F 55 54 24 28 |:.FOUT(I),FOUT$(|
00000150: 49 29 3A 82 20 49 00 78 09 1A 04 81 20 49 B2 31 |I):. I.x.... I.1|
00000160: 20 A4 20 33 3A 87 20 47 5A 24 28 49 29 2C 4D 41 | . 3:. GZ$(I),MA|
00000170: 58 28 49 29 3A 82 20 49 00 93 09 24 04 88 20 43 |X(I):. I...$.. C|
00000180: 49 4A 46 45 52 24 B2 22 30 31 32 33 34 35 36 37 |IJFER$."01234567|
00000190: 38 39 22 00 9C 09 4C 04 8D 31 30 30 00 A2 09 56 |89"...L..100...V|
000001A0: 04 3A 00 C3 09 B0 04 8F 20 2A 2A 20 4E 55 20 4B |.:...... ** NU K|
000001B0: 4C 4F 4B 20 47 45 4C 49 4A 4B 20 5A 45 54 54 45 |LOK GELIJK ZETTE|
000001C0: 4E 2A 2A 00 CE 09 BA 04 8D 31 34 30 30 30 00 DE |N**......14000..|
000001D0: 09 C4 04 3A 20 81 20 49 B2 31 20 A4 20 33 00 F7 |...: . I.1 . 3..|
000001E0: 09 CE 04 3A 20 88 20 4B B2 49 3A 8D 31 31 30 30 |...: . K.I:.1100|
000001F0: 30 3A 88 20 4B B2 30 00 FF 09 D8 04 82 20 49 00 |0:. K.0...... I.|
00000200: 1D 0A 14 05 8F 20 2A 2A 20 44 45 20 4B 4C 4F 4B |..... ** DE KLOK|
00000210: 20 47 41 41 54 20 4C 4F 50 45 4E 2A 2A 00 2D 0A | GAAT LOPEN**.-.|
00000220: 1E 05 8D 31 30 30 3A 8D 31 33 30 30 30 00 40 0A |...100:.13000.@.|
00000230: 28 05 88 20 48 4F B2 33 3A 88 20 56 45 B2 31 32 |(.. HO.3:. VE.12|
00000240: 00 56 0A 32 05 3A 20 81 20 55 55 B2 54 44 28 31 |.V.2.: . UU.TD(1|
00000250: 29 20 A4 20 32 33 00 6E 0A 3C 05 3A 20 20 81 20 |) . 23.n.<.: . |
00000260: 4D 49 4E B2 54 44 28 32 29 20 A4 20 35 39 00 87 |MIN.TD(2) . 59..|
00000270: 0A 46 05 3A 20 20 20 81 20 53 45 43 B2 54 44 28 |.F.: . SEC.TD(|
00000280: 33 29 20 A4 20 35 39 00 97 0A 50 05 3A 20 20 20 |3) . 59...P.: |
00000290: 20 8D 31 32 30 30 30 00 C3 0A 5A 05 3A 20 20 20 | .12000...Z.: |
000002A0: 20 8D 31 31 30 3A 99 55 55 3B 22 20 22 3B 4D 49 | .110:.UU;" ";MI|
000002B0: 4E 3B 22 20 22 3B 53 45 43 22 20 20 22 3B 54 49 |N;" ";SEC" ";TI|
000002C0: 4D 45 24 00 DB 0A 64 05 3A 20 20 20 82 20 53 45 |ME$...d.: . SE|
000002D0: 43 3A 88 20 54 44 28 33 29 B2 30 00 F0 0A 6E 05 |C:. TD(3).0...n.|
000002E0: 3A 20 20 82 4D 49 4E 3A 88 54 44 28 32 29 B2 30 |: .MIN:.TD(2).0|
000002F0: 00 04 0B 78 05 3A 20 82 55 55 3A 88 20 54 44 28 |...x.: .UU:. TD(|
00000300: 31 29 B2 30 00 0A 0B 0F 27 80 00 1E 0B 10 27 8F |1).0....'.....'.|
00000310: 20 2A 2A 46 4F 55 54 4D 45 4C 44 49 4E 47 00 31 | **FOUTMELDING.1|
00000320: 0B 1A 27 88 20 48 31 B2 48 4F 3A 88 56 31 B2 56 |..'. H1.HO:.V1.V|
00000330: 45 00 48 0B 24 27 88 20 48 4F B2 30 3A 88 56 45 |E.H.$'. HO.0:.VE|
00000340: B2 32 32 3A 8D 31 31 30 00 58 0B 2E 27 99 46 4F |.22:.110.X..'.FO|
00000350: 55 54 24 28 46 52 29 3B 00 69 0B 38 27 88 20 56 |UT$(FR);.i.8'. V|
00000360: 45 B2 32 33 3A 8D 31 31 30 00 96 0B 42 27 99 22 |E.23:.110...B'."|
00000370: CD 45 54 20 45 45 4E 20 57 49 4C 4C 45 4B 45 55 |.ET EEN WILLEKEU|
00000380: 52 49 47 45 20 54 4F 45 54 53 20 56 45 52 44 45 |RIGE TOETS VERDE|
00000390: 52 47 41 41 4E 22 00 9F 0B 4C 27 8D 32 31 30 00 |RGAAN"...L'.210.|
000003A0: A5 0B 56 27 3A 00 B4 0B 60 27 81 20 56 45 B2 32 |..V':...`'. VE.2|
000003B0: 32 A4 32 33 00 E6 0B 6A 27 8D 31 31 30 3A 99 22 |2.23...j'.110:."|
000003C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003E0: 20 20 20 20 20 22 00 EF 0B 74 27 82 20 56 45 00 | "...t'. VE.|
000003F0: F5 0B 7E 27 3A 00 16 0C 7F 27 88 20 48 4F B2 33 |..~':....'. HO.3|
00000400: 33 AB 4C 3A 88 56 45 B2 4B AA 33 3A 8D 31 31 30 |3.L:.VE.K.3:.110|
00000410: 3A 99 22 20 20 22 00 36 0C 88 27 88 20 46 52 B2 |:." ".6..'. FR.|
00000420: 30 3A 8F 2A 2A 20 46 4F 55 54 20 41 46 47 45 48 |0:.** FOUT AFGEH|
00000430: 41 4E 44 45 4C 44 00 4F 0C 92 27 88 20 48 4F B2 |ANDELD.O..'. HO.|
00000440: 48 31 3A 88 20 56 45 B2 56 31 3A 8D 31 31 30 00 |H1:. VE.V1:.110.|
00000450: 55 0C 9C 27 8E 00 5B 0C A6 27 3A 00 7B 0C D8 27 |U..'..[..':.{..'|
00000460: 8F 20 2A 2A 20 46 4F 55 54 45 4E 20 45 4E 20 4D |. ** FOUTEN EN M|
00000470: 45 44 45 44 45 4C 49 4E 47 45 4E 00 8E 0C E2 27 |EDEDELINGEN....'|
00000480: 88 20 48 31 B2 48 4F 3A 88 56 31 B2 56 45 00 99 |. H1.HO:.V1.VE..|
00000490: 0C EC 27 88 20 48 4F B2 30 00 AD 0C F6 27 81 20 |..'. HO.0....'. |
000004A0: 56 45 B2 32 31 20 A4 20 32 34 20 A9 33 00 B6 0C |VE.21 . 24 .3...|
000004B0: 00 28 8D 31 31 30 00 CF 0C 0A 28 81 20 54 45 B2 |.(.110....(. TE.|
000004C0: 30 A4 33 38 3A 99 C7 28 36 31 29 3A 82 54 45 00 |0.38:..(61):.TE.|
000004D0: D7 0C 14 28 82 56 45 00 EF 0C 1E 28 88 20 48 4F |...(.VE....(. HO|
000004E0: B2 48 31 3A 88 56 45 B2 56 31 3A 8D 31 31 30 00 |.H1:.VE.V1:.110.|
000004F0: F5 0C 28 28 8E 00 FB 0C 32 28 3A 00 1B 0D F8 2A |..((....2(:....*|
00000500: 8F 20 2A 2A 53 55 42 52 2E 49 4E 56 4F 45 52 20 |. **SUBR.INVOER |
00000510: 45 4E 20 43 4F 4E 54 52 4F 4C 45 00 33 0D 02 2B |EN CONTROLE.3..+|
00000520: 88 20 48 4F B2 30 3A 88 56 45 B2 35 AA 4B 3A 8D |. HO.0:.VE.5.K:.|
00000530: 31 31 30 00 3F 0D 0C 2B 99 47 5A 24 28 4B 29 00 |110.?..+.GZ$(K).|
00000540: 50 0D 16 2B 88 20 48 4F B2 32 39 3A 8D 31 31 30 |P..+. HO.29:.110|
00000550: 00 5A 0D 20 2B 99 22 20 20 22 00 60 0D 2A 2B 3A |.Z. +." ".`.*+:|
00000560: 00 6D 0D 34 2B 3A 20 81 4C B2 31 A4 32 00 88 0D |.m.4+: .L.1.2...|
00000570: 3E 2B 3A 20 20 88 20 48 4F B2 32 38 AA 4C 3A 8D |>+: . HO.28.L:.|
00000580: 31 31 30 3A 8D 32 31 30 00 94 0D 48 2B 3A 20 20 |110:.210...H+: |
00000590: 99 49 4E 24 00 BC 0D 52 2B 3A 20 20 8B 20 28 49 |.IN$...R+: . (I|
000005A0: 4E 24 B3 C7 28 34 37 29 29 B0 28 49 4E 24 B1 C7 |N$..(47)).(IN$..|
000005B0: 28 35 37 29 29 A7 88 20 46 52 B2 34 00 D1 0D 5C |(57)).. FR.4...\|
000005C0: 2B 88 20 48 55 4C 50 28 4C 29 B2 C5 28 49 4E 24 |+. HULP(L)..(IN$|
000005D0: 29 00 D8 0D 66 2B 82 4C 00 DE 0D 70 2B 3A 00 F6 |)...f+.L...p+:..|
000005E0: 0D 7A 2B 8B 20 46 52 B2 34 A7 8D 31 30 30 30 3A |.z+. FR.4..1000:|
000005F0: 89 31 31 30 33 30 00 15 0E 84 2B 88 20 54 44 28 |.11030....+. TD(|
00000600: 4B 29 B2 31 30 AC 48 55 4C 50 28 31 29 AA 48 55 |K).10.HULP(1).HU|
00000610: 4C 50 28 32 29 00 3D 0E 8E 2B 8B 28 28 54 44 28 |LP(2).=..+.((TD(|
00000620: 4B 29 B1 B2 30 29 AF 28 54 44 28 4B 29 B3 B2 4D |K)..0).(TD(K)..M|
00000630: 41 58 28 4B 29 29 29 A7 31 31 31 38 30 00 55 0E |AX(K))).11180.U.|
00000640: 98 2B 88 20 46 52 B2 46 4F 55 54 28 4B 29 3A 8D |.+. FR.FOUT(K):.|
00000650: 31 30 30 30 30 00 60 0E A2 2B 89 31 31 30 33 30 |10000.`..+.11030|
00000660: 00 66 0E AC 2B 8E 00 6C 0E B6 2B 3A 00 8B 0E E0 |.f..+..l..+:....|
00000670: 2E 8F 20 2A 2A 20 57 41 43 48 54 4C 55 53 20 56 |.. ** WACHTLUS V|
00000680: 4F 4F 52 20 44 45 20 4B 4C 4F 4B 00 98 0E EA 2E |OOR DE KLOK.....|
00000690: 81 4B B2 31 A4 36 30 30 00 9F 0E F4 2E 82 4B 00 |.K.1.600......K.|
000006A0: A8 0E FE 2E 8D 32 30 30 00 E5 0E 08 2F 8B 49 4E |.....200..../.IN|
000006B0: 24 B2 22 53 22 A7 20 88 20 53 45 43 B2 35 39 3A |$."S". . SEC.59:|
000006C0: 88 20 4D 49 4E B2 35 39 3A 88 55 55 B2 32 33 3A |. MIN.59:.UU.23:|
000006D0: 99 22 C4 45 20 4B 4C 4F 4B 20 49 53 20 47 45 53 |.".E KLOK IS GES|
000006E0: 54 4F 50 54 22 00 EB 0E 12 2F 99 00 F8 0E 1C 2F |TOPT"..../...../|
000006F0: 88 20 49 4E 24 B2 22 22 00 FE 0E 26 2F 8E 00 04 |. IN$.""...&/...|
00000700: 0F 30 2F 3A 00 0A 0F 3A 2F 3A 00 24 0F C8 32 8F |.0/:...:/:.$..2.|
00000710: 20 2A 2A 20 48 4F 45 20 4B 4C 4F 4B 20 53 54 4F | ** HOE KLOK STO|
00000720: 50 50 45 4E 00 37 0F D2 32 88 20 48 31 B2 48 4F |PPEN.7..2. H1.HO|
00000730: 3A 88 56 31 B2 56 45 00 4E 0F DC 32 88 20 48 4F |:.V1.VE.N..2. HO|
00000740: B2 31 30 3A 88 56 45 B2 32 3A 8D 31 31 30 00 82 |.10:.VE.2:.110..|
00000750: 0F E6 32 99 22 C4 45 20 54 45 4C 45 41 43 2D 4B |..2.".E TELEAC-K|
00000760: 4C 4F 4B 2E D7 49 4C 54 20 D5 20 53 54 4F 50 50 |LOK..ILT . STOPP|
00000770: 45 4E 20 54 4F 45 54 53 20 44 41 4E 20 D3 20 49 |EN TOETS DAN . I|
00000780: 4E 22 00 9A 0F F0 32 88 20 48 4F B2 48 31 3A 88 |N"....2. HO.H1:.|
00000790: 56 45 B2 56 31 3A 8D 31 31 30 00 A0 0F FA 32 8E |VE.V1:.110....2.|
000007A0: 00 A6 0F 04 33 3A 00 B6 0F B0 36 8F 20 2A 2A 20 |....3:....6. ** |
000007B0: 55 49 54 4C 45 47 00 C9 0F BA 36 88 20 48 31 B2 |UITLEG....6. H1.|
000007C0: 48 4F 3A 88 56 31 B2 56 45 00 E0 0F C4 36 88 20 |HO:.V1.VE....6. |
000007D0: 48 4F B2 31 30 3A 88 56 45 B2 31 3A 8D 31 31 30 |HO.10:.VE.1:.110|
000007E0: 00 0B 10 CE 36 99 22 44 45 20 54 45 4C 45 41 43 |....6."DE TELEAC|
000007F0: 4B 4C 4F 4B 2E D6 4F 4F 52 44 41 54 20 48 49 4A |KLOK..OORDAT HIJ|
00000800: 20 42 45 47 49 4E 54 20 54 45 22 00 38 10 D3 36 | BEGINT TE".8..6|
00000810: 99 22 54 45 20 4C 4F 50 45 4E 20 4D 4F 45 54 20 |."TE LOPEN MOET |
00000820: 48 49 4A 20 47 45 4C 49 4A 4B 20 47 45 5A 45 54 |HIJ GELIJK GEZET|
00000830: 20 57 4F 52 44 45 4E 22 00 65 10 D8 36 99 22 54 | WORDEN".e..6."T|
00000840: 4F 45 54 53 20 48 49 45 52 56 4F 4F 52 20 53 54 |OETS HIERVOOR ST|
00000850: 45 45 44 53 20 D4 D7 C5 C5 20 43 49 4A 46 45 52 |EEDS .... CIJFER|
00000860: 53 20 49 4E 22 00 7E 10 E2 36 88 20 48 4F B2 48 |S IN".~..6. HO.H|
00000870: 31 3A 88 20 56 45 B2 56 31 3A 8D 31 31 30 00 84 |1:. VE.V1:.110..|
00000880: 10 EC 36 8E 00 8A 10 F6 36 3A 00 90 10 00 37 3A |..6.....6:....7:|
00000890: 00 A5 10 20 4E 8F 20 2A 2A 20 46 4F 55 54 4E 55 |... N. ** FOUTNU|
000008A0: 4D 4D 45 52 53 00 D5 10 2A 4E 83 20 31 2C 22 C4 |MMERS...*N. 1,".|
000008B0: 45 20 55 52 45 4E 20 4D 4F 45 54 45 4E 20 54 55 |E UREN MOETEN TU|
000008C0: 53 53 45 4E 20 30 30 20 45 4E 20 32 33 20 4C 49 |SSEN 00 EN 23 LI|
000008D0: 47 47 45 4E 22 00 08 11 34 4E 83 20 32 2C 22 C4 |GGEN"...4N. 2,".|
000008E0: 45 20 4D 49 4E 55 54 45 4E 20 4D 4F 45 54 45 4E |E MINUTEN MOETEN|
000008F0: 20 54 55 53 53 45 4E 20 30 30 20 45 4E 20 35 39 | TUSSEN 00 EN 59|
00000900: 20 4C 49 47 47 45 4E 22 00 3F 11 3E 4E 83 20 33 | LIGGEN".?.>N. 3|
00000910: 2C 22 44 45 20 53 45 43 4F 4E 44 45 4E 20 4D 4F |,"DE SECONDEN MO|
00000920: 45 54 45 4E 20 54 55 53 53 45 4E 20 44 45 20 30 |ETEN TUSSEN DE 0|
00000930: 30 20 45 4E 20 35 39 20 4C 49 47 47 45 4E 22 00 |0 EN 59 LIGGEN".|
00000940: 61 11 48 4E 83 20 34 2C 22 41 4C 45 45 4E 20 43 |a.HN. 4,"ALEEN C|
00000950: 49 4A 46 45 52 53 20 47 45 42 52 55 49 4B 45 4E |IJFERS GEBRUIKEN|
00000960: 22 00 85 11 52 4E 83 20 22 D4 4F 45 54 53 20 48 |"...RN. ".OETS H|
00000970: 45 54 20 55 55 52 20 49 4E 20 28 30 30 2D 32 33 |ET UUR IN (00-23|
00000980: 29 22 2C 32 33 00 AA 11 5C 4E 83 22 54 4F 45 54 |)",23...\N."TOET|
00000990: 53 20 44 45 20 4D 49 4E 55 54 45 4E 28 30 30 2D |S DE MINUTEN(00-|
000009A0: 35 39 29 20 49 4E 22 2C 35 39 00 D1 11 66 4E 83 |59) IN",59...fN.|
000009B0: 22 54 4F 45 54 53 20 44 45 20 53 45 43 4F 4E 44 |"TOETS DE SECOND|
000009C0: 45 4E 20 28 30 30 2D 35 39 29 20 49 4E 22 2C 35 |EN (00-59) IN",5|
000009D0: 39 00 00 00 |9... |
.......1000......1010.!.D..".";:..Q.N..H
(".........................",.(.(VE.1)))
;.A.P....(HO));:....X.HO.B(209).256.B(21
0).1024.B(211)...Y.VE..(HO.40):HO.HO.40.
VE:....H..IN$:..D.R..IN$:.IN$."".210.J..
...Z.... A.100:.20...... *** TELEAC-KLOK
...... *** INITIALISATIE.2....TD(3),FOUT
(4),MAX(3),FOUT$(4),GZ$(3).V.... I. 1. 4
:.FOUT(I),FOUT$(I):. I.X.... I.1 . 3:. G
Z$(I),MAX(I):. I...$.. CIJFER$."01234567
89"...L..100...V.:.C.... ** NU KLOK GELI
JK ZETTEN**.N....14000...D.: . I.1 . 3..
.N.: . K.I:.11000:. K.0...X.. I...... **
DE KLOK GAAT LOPEN**.-....100:.13000.@.
(.. HO.3:. VE.12.V.2.: . UU.TD(1) . 23.N
.<.: . MIN.TD(2) . 59...F.: . SEC.TD(
3) . 59...P.: .12000.C.Z.: .110:.U
U;" ";MIN;" ";SEC" ";TIME$...D.: . SE
C:. TD(3).0...N.: .MIN:.TD(2).0...X.: .
UU:. TD(1).0....'.....'. **FOUTMELDING.1
..'. H1.HO:.V1.VE.H.$'. HO.0:.VE.22:.110
.X..'.FOUT$(FR);.I.8'. VE.23:.110...B'."
MET EEN WILLEKEURIGE TOETS VERDERGAAN"..
.L'.210...V':...`'. VE.22.23...J'.110:."
"..
.T'. VE...~':...'. HO.33.L:.VE.K.3:.110
:." ".6..'. FR.0:.** FOUT AFGEHANDELD.O
..'. HO.H1:. VE.V1:.110.U..'..[..':.{.X'
. ** FOUTEN EN MEDEDELINGEN....'. H1.HO:
.V1.VE....'. HO.0....'. VE.21 . 24 .3...
.(.110.O..(. TE.0.38:.G(61):.TE.W..(.VE.
...(. HO.H1:.VE.V1:.110...((....2(:....*
. **SUBR.INVOER EN CONTROLE.3..+. HO.0:.
VE.5.K:.110.?..+.GZ$(K).P..+. HO.29:.110
.Z. +." ".`.*+:.M.4+: .L.1.2...>+: . H
O.28.L:.110:.210...H+: .IN$...R+: . (I
N$.G(47)).(IN$.G(57)).. FR.4.Q.\+. HULP(
L).E(IN$).X.F+.L...P+:...Z+. FR.4..1000:
.11030....+. TD(K).10.HULP(1).HULP(2).=.
.+.((TD(K)..0).(TD(K)..MAX(K))).11180.U.
.+. FR.FOUT(K):.10000.`..+.11030.F..+..L
..+:...... ** WACHTLUS VOOR DE KLOK.....
.K.1.600......K......200..../.IN$."S". .
SEC.59:. MIN.59:.UU.23:."DE KLOK IS GES
TOPT"..../...../. IN$.""...&/....0/:...:
/:.$.H2. ** HOE KLOK STOPPEN.7.R2. H1.HO
:.V1.VE.N..2. HO.10:.VE.2:.110....2."DE
TELEAC-KLOK.WILT U STOPPEN TOETS DAN S I
N"....2. HO.H1:.VE.V1:.110. ..2.....3:..
..6. ** UITLEG.I..6. H1.HO:.V1.VE...D6.
HO.10:.VE.1:.110...N6."DE TELEACKLOK.VOO
RDAT HIJ BEGINT TE".8.S6."TE LOPEN MOET
HIJ GELIJK GEZET WORDEN".E.X6."TOETS HIE
RVOOR STEEDS TWEE CIJFERS IN".~..6. HO.H
1:. VE.V1:.110....6.....6:....7:... N. *
* FOUTNUMMERS.U.*N. 1,"DE UREN MOETEN TU
SSEN 00 EN 23 LIGGEN"...4N. 2,"DE MINUTE
N MOETEN TUSSEN 00 EN 59 LIGGEN".?.>N. 3
,"DE SECONDEN MOETEN TUSSEN DE 00 EN 59
LIGGEN".A.HN. 4,"ALEEN CIJFERS GEBRUIKEN
"...RN. "TOETS HET UUR IN (00-23)",23...
\N."TOETS DE MINUTEN(00-59) IN",59.Q.FN.
"TOETS DE SECONDEN (00-59) IN",59...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL