ALARMKLOK
FILE INFORMATION
FILENAME(S): ALARMKLOK
FILE TYPE(S): PRG
FILE SIZE: 4.6K
FIRST SEEN: 2025-11-30 21:13:15
APPEARS ON: 1 disk(s)
FILE HASH
90d12f0f0c226d1094d7dcfabf74520540a3d1f8c88672ae5a4e96be743f5ec1
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| D 64002 | ALARMKLOK | PRG | DuncanTwain | 19 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 17 08 64 00 97 35 33 32 38 30 2C 30 3A 97 |....d..53280,0:.|
00000010: 35 33 32 38 31 2C 30 00 21 08 69 00 99 22 93 22 |53281,0.!.i.."."|
00000020: 3A 00 2D 08 6E 00 50 41 24 B2 22 12 22 00 39 08 |:.-.n.PA$.".".9.|
00000030: 78 00 50 42 24 B2 22 92 22 00 4F 08 82 00 86 47 |x.PB$.".".O....G|
00000040: 24 28 31 30 2C 31 30 29 2C 44 48 24 28 37 29 00 |$(10,10),DH$(7).|
00000050: 5F 08 8C 00 86 4E 28 36 29 3A 86 4D 28 36 29 00 |_....N(6):.M(6).|
00000060: 68 08 96 00 8D 39 35 30 00 71 08 A0 00 8D 36 38 |h....950.q....68|
00000070: 30 00 7B 08 AA 00 8D 32 33 35 30 00 84 08 B4 00 |0.{....2350.....|
00000080: 8D 37 30 30 00 8E 08 B9 00 8D 31 38 33 30 00 97 |.700......1830..|
00000090: 08 BE 00 99 54 49 24 00 A0 08 C8 00 8D 38 30 30 |....TI$......800|
000000A0: 00 A8 08 D2 00 5A B2 30 00 C0 08 DC 00 41 24 B2 |.....Z.0.....A$.|
000000B0: C8 28 54 49 24 2C 31 29 3A 41 B2 C5 28 41 24 29 |.(TI$,1):A..(A$)|
000000C0: 00 C8 08 E6 00 A1 58 24 00 D8 08 F0 00 8B 58 24 |......X$......X$|
000000D0: B2 22 41 22 89 32 39 30 00 E8 08 FA 00 8B 58 24 |."A".290......X$|
000000E0: B2 22 43 22 89 33 32 30 00 F8 08 04 01 8B 58 24 |."C".320......X$|
000000F0: B2 22 44 22 89 33 34 30 00 09 09 0E 01 8B 58 24 |."D".340......X$|
00000100: B2 22 45 22 89 32 35 31 30 00 12 09 18 01 89 33 |."E".2510......3|
00000110: 36 30 00 1B 09 22 01 8D 37 32 30 00 24 09 2C 01 |60..."..720.$.,.|
00000120: 8D 38 30 30 00 2D 09 36 01 89 33 36 30 00 37 09 |.800.-.6..360.7.|
00000130: 40 01 8D 31 37 37 30 00 40 09 4A 01 89 33 36 30 |@..1770.@.J..360|
00000140: 00 4A 09 54 01 8D 31 38 33 30 00 53 09 5E 01 89 |.J.T..1830.S.^..|
00000150: 33 36 30 00 6D 09 68 01 42 24 B2 CA 28 54 49 24 |360.m.h.B$..(TI$|
00000160: 2C 32 2C 31 29 3A 42 B2 C5 28 42 24 29 00 7D 09 |,2,1):B..(B$).}.|
00000170: 72 01 8B 50 31 B2 31 A7 8D 31 36 36 30 00 97 09 |r..P1.1..1660...|
00000180: 7C 01 43 24 B2 CA 28 54 49 24 2C 33 2C 31 29 3A ||.C$..(TI$,3,1):|
00000190: 43 B2 C5 28 43 24 29 00 B1 09 86 01 44 24 B2 CA |C..(C$).....D$..|
000001A0: 28 54 49 24 2C 34 2C 31 29 3A 44 B2 C5 28 44 24 |(TI$,4,1):D..(D$|
000001B0: 29 00 CB 09 90 01 45 24 B2 CA 28 54 49 24 2C 35 |).....E$..(TI$,5|
000001C0: 2C 31 29 3A 45 B2 C5 28 45 24 29 00 E3 09 9A 01 |,1):E..(E$).....|
000001D0: 46 24 B2 C9 28 54 49 24 2C 31 29 3A 46 B2 C5 28 |F$..(TI$,1):F..(|
000001E0: 46 24 29 00 EC 09 A4 01 8D 38 37 30 00 F9 09 AE |F$)......870....|
000001F0: 01 8B 5A B2 31 89 32 30 30 00 07 0A B8 01 8B 44 |..Z.1.200......D|
00000200: 46 B2 31 A7 34 36 30 00 11 0A C2 01 8D 32 31 31 |F.1.460......211|
00000210: 30 00 2A 0A CC 01 4E 28 31 29 B2 46 3A 4E 28 32 |0.*...N(1).F:N(2|
00000220: 29 B2 45 3A 4E 28 33 29 B2 44 00 43 0A D6 01 4E |).E:N(3).D.C...N|
00000230: 28 34 29 B2 43 3A 4E 28 35 29 B2 42 3A 4E 28 36 |(4).C:N(5).B:N(6|
00000240: 29 B2 41 00 51 0A E0 01 81 20 4A B2 31 20 A4 20 |).A.Q.... J.1 . |
00000250: 36 00 69 0A EA 01 8B 20 4E 28 4A 29 20 B2 20 4D |6.i.... N(J) . M|
00000260: 28 4A 29 20 89 20 35 39 30 00 74 0A F4 01 50 B2 |(J) . 590.t...P.|
00000270: 4E 28 4A 29 00 7E 0A FE 01 8D 20 36 31 30 00 8D |N(J).~.... 610..|
00000280: 0A 08 02 4C 24 B2 C9 28 52 24 2C 4B 29 00 A4 0A |...L$..(R$,K)...|
00000290: 12 02 99 22 13 11 11 11 11 11 11 11 11 11 11 22 |..."..........."|
000002A0: 3B 4C 24 3B 00 B4 0A 1C 02 81 20 49 20 B2 20 31 |;L$;...... I . 1|
000002B0: 20 A4 20 37 00 C1 0A 26 02 99 47 24 28 50 2C 49 | . 7...&..G$(P,I|
000002C0: 29 00 CA 0A 30 02 99 4C 24 3B 00 D2 0A 3A 02 82 |)...0..L$;...:..|
000002D0: 20 49 00 DD 0A 44 02 4D 28 4A 29 B2 50 00 E5 0A | I...D.M(J).P...|
000002E0: 4E 02 82 20 4A 00 EF 0A 58 02 89 20 32 32 30 00 |N.. J...X.. 220.|
000002F0: FD 0A 62 02 8B 4A B2 31 A7 4B B2 33 34 00 0B 0B |..b..J.1.K.34...|
00000300: 6C 02 8B 4A B2 32 A7 4B B2 32 38 00 19 0B 76 02 |l..J.2.K.28...v.|
00000310: 8B 4A B2 33 A7 4B B2 32 31 00 27 0B 80 02 8B 4A |.J.3.K.21.'....J|
00000320: B2 34 A7 4B B2 31 35 00 34 0B 8A 02 8B 4A B2 35 |.4.K.15.4....J.5|
00000330: A7 4B B2 37 00 41 0B 94 02 8B 4A B2 36 A7 4B B2 |.K.7.A....J.6.K.|
00000340: 31 00 47 0B 9E 02 8E 00 8D 0B A8 02 52 24 B2 22 |1.G.........R$."|
00000350: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000360: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000370: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000380: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 00 93 0B |............"...|
00000390: B2 02 8E 00 B7 0B BC 02 99 22 93 11 49 4E 50 55 |........."..INPU|
000003A0: 54 20 54 49 4A 44 20 41 4C 53 20 48 48 4D 4D 53 |T TIJD ALS HHMMS|
000003B0: 53 22 A3 33 30 29 3B 00 E2 0B C6 02 85 54 54 24 |S".30);......TT$|
000003C0: 3A 8B C3 28 54 54 24 29 B3 36 B0 C3 28 54 54 24 |:..(TT$).6..(TT$|
000003D0: 29 B1 36 A7 99 22 91 22 A3 33 30 29 3B 3A 89 37 |).6..".".30);:.7|
000003E0: 31 30 00 12 0C D0 02 54 49 24 B2 54 54 24 3A 99 |10.....TI$.TT$:.|
000003F0: 22 13 11 11 11 11 41 4C 41 52 4D 20 54 49 4A 44 |".....ALARM TIJD|
00000400: 20 41 4C 53 20 48 48 4D 4D 53 53 20 22 A3 33 30 | ALS HHMMSS ".30|
00000410: 29 3B 00 3A 0C DA 02 85 41 24 3A 8B C3 28 41 24 |);.:....A$:..(A$|
00000420: 29 B3 36 B0 C3 28 41 24 29 B1 36 A7 99 22 91 22 |).6..(A$).6.."."|
00000430: A3 33 30 29 3B 3A 89 37 33 30 00 5E 0C E4 02 99 |.30);:.730.^....|
00000440: 22 11 49 4E 50 55 54 20 41 4C 41 52 4D 20 42 4F |".INPUT ALARM BO|
00000450: 4F 44 53 43 48 41 50 3A 22 A3 33 30 29 3B 00 66 |ODSCHAP:".30);.f|
00000460: 0C EE 02 85 50 24 00 76 0C F8 02 50 24 B2 C8 28 |....P$.v...P$..(|
00000470: 50 24 2C 32 30 29 00 7F 0C 02 03 44 46 B2 30 00 |P$,20).....DF.0.|
00000480: 85 0C 0C 03 99 00 8B 0C 16 03 8E 00 C8 0C 20 03 |.............. .|
00000490: 99 22 93 11 11 11 11 11 11 11 11 22 3B 22 12 20 |.".........";". |
000004A0: 20 20 20 20 55 52 45 4E 20 20 20 20 20 20 20 20 | UREN |
000004B0: 20 4D 49 4E 55 54 45 4E 20 20 20 20 20 20 53 45 | MINUTEN SE|
000004C0: 43 4F 4E 44 45 4E 20 22 00 00 0D 2A 03 99 22 13 |CONDEN "...*..".|
000004D0: 11 11 11 11 11 11 11 11 11 11 11 11 22 3B 22 20 |............";" |
000004E0: 20 20 20 20 20 20 20 20 20 20 20 20 12 20 92 20 | . . |
000004F0: 20 20 20 20 20 20 20 20 20 20 20 12 A1 92 A1 22 | ...."|
00000500: 00 47 0D 3E 03 99 22 13 11 11 11 11 11 11 11 11 |.G.>..".........|
00000510: 11 11 11 11 11 11 11 11 11 11 11 22 3B 22 A6 A6 |...........";"..|
00000520: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 |................|
00000530: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 |................|
00000540: A6 A6 A6 A6 A6 A6 22 00 4D 0D 48 03 99 00 63 0D |......".M.H...c.|
00000550: 52 03 81 49 B2 31 A4 36 3A 4D 28 49 29 B2 AB 31 |R..I.1.6:M(I)..1|
00000560: 3A 82 49 00 69 0D 5C 03 8E 00 77 0D 66 03 54 58 |:.I.i.\...w.f.TX|
00000570: B2 C5 28 54 49 24 29 00 88 0D 70 03 54 42 24 B2 |..(TI$)...p.TB$.|
00000580: C8 28 54 41 24 2C 36 29 00 96 0D 7A 03 54 41 B2 |.(TA$,6)...z.TA.|
00000590: C5 28 54 42 24 29 00 A4 0D 84 03 8B 54 41 B2 30 |.(TB$)......TA.0|
000005A0: 89 39 33 30 00 B4 0D 8E 03 8B 54 41 B3 B1 54 58 |.930......TA..TX|
000005B0: 89 39 33 30 00 BD 0D 98 03 50 31 B2 31 00 C3 0D |.930.....P1.1...|
000005C0: A2 03 8E 00 DD 0D AC 03 8F 2A 2A 2A 20 43 4C 4F |.........*** CLO|
000005D0: 43 4B 20 44 49 47 49 54 53 20 2A 2A 2A 00 F4 0D |CK DIGITS ***...|
000005E0: B6 03 88 47 24 28 30 2C 31 29 B2 22 12 A9 20 20 |...G$(0,1).".. |
000005F0: 20 12 DF 22 00 0A 0E C0 03 88 47 24 28 30 2C 32 | .."......G$(0,2|
00000600: 29 B2 22 12 20 20 20 20 20 22 00 22 0E CA 03 88 |).". "."....|
00000610: 47 24 28 30 2C 33 29 B2 22 12 20 20 92 20 12 20 |G$(0,3).". . . |
00000620: 20 22 00 3A 0E D4 03 88 47 24 28 30 2C 34 29 B2 | ".:....G$(0,4).|
00000630: 22 12 20 20 92 20 12 20 20 22 00 52 0E DE 03 88 |". . . ".R....|
00000640: 47 24 28 30 2C 35 29 B2 22 12 20 20 92 20 12 20 |G$(0,5).". . . |
00000650: 20 22 00 68 0E E8 03 88 47 24 28 30 2C 36 29 B2 | ".h....G$(0,6).|
00000660: 22 12 20 20 20 20 20 22 00 7F 0E F2 03 88 47 24 |". "......G$|
00000670: 28 30 2C 37 29 B2 22 DF 12 20 20 20 92 A9 22 00 |(0,7).".. ..".|
00000680: 96 0E FC 03 88 47 24 28 31 2C 31 29 B2 22 20 12 |.....G$(1,1)." .|
00000690: A9 20 20 92 20 22 00 AD 0E 06 04 88 47 24 28 31 |. . "......G$(1|
000006A0: 2C 32 29 B2 22 20 20 12 20 20 92 20 22 00 C4 0E |,2)." . . "...|
000006B0: 10 04 88 47 24 28 31 2C 33 29 B2 22 20 20 12 20 |...G$(1,3)." . |
000006C0: 20 92 20 22 00 DB 0E 1A 04 88 47 24 28 31 2C 34 | . "......G$(1,4|
000006D0: 29 B2 22 20 20 12 20 20 92 20 22 00 F2 0E 24 04 |)." . . "...$.|
000006E0: 88 47 24 28 31 2C 35 29 B2 22 20 20 12 20 20 92 |.G$(1,5)." . .|
000006F0: 20 22 00 09 0F 2E 04 88 47 24 28 31 2C 36 29 B2 | "......G$(1,6).|
00000700: 22 20 20 12 20 20 92 20 22 00 20 0F 38 04 88 47 |" . . ". .8..G|
00000710: 24 28 31 2C 37 29 B2 22 20 20 12 20 20 92 20 22 |$(1,7)." . . "|
00000720: 00 36 0F 42 04 88 47 24 28 32 2C 31 29 B2 22 12 |.6.B..G$(2,1).".|
00000730: A9 20 20 20 DF 22 00 4E 0F 4C 04 88 47 24 28 32 |. .".N.L..G$(2|
00000740: 2C 32 29 B2 22 12 20 20 92 20 12 20 20 22 00 65 |,2).". . . ".e|
00000750: 0F 56 04 88 47 24 28 32 2C 33 29 B2 22 20 20 12 |.V..G$(2,3)." .|
00000760: A9 20 92 A9 22 00 7B 0F 60 04 88 47 24 28 32 2C |. ..".{.`..G$(2,|
00000770: 34 29 B2 22 20 12 A9 20 92 A9 22 00 92 0F 6A 04 |4)." .. .."...j.|
00000780: 88 47 24 28 32 2C 35 29 B2 22 12 A9 20 92 A9 20 |.G$(2,5).".. .. |
00000790: 20 22 00 A9 0F 74 04 88 47 24 28 32 2C 36 29 B2 | "...t..G$(2,6).|
000007A0: 22 12 20 20 92 20 20 20 22 00 BF 0F 7E 04 88 47 |". . "...~..G|
000007B0: 24 28 32 2C 37 29 B2 22 12 20 20 20 20 20 22 00 |$(2,7).". ".|
000007C0: D5 0F 88 04 88 47 24 28 33 2C 31 29 B2 22 12 A9 |.....G$(3,1)."..|
000007D0: 20 20 20 DF 22 00 ED 0F 92 04 88 47 24 28 33 2C | ."......G$(3,|
000007E0: 32 29 B2 22 12 20 20 92 20 12 20 20 22 00 04 10 |2).". . . "...|
000007F0: 9C 04 88 47 24 28 33 2C 33 29 B2 22 20 20 20 12 |...G$(3,3)." .|
00000800: 20 92 A9 22 00 1A 10 A6 04 88 47 24 28 33 2C 34 | .."......G$(3,4|
00000810: 29 B2 22 20 12 20 20 20 DF 22 00 30 10 B0 04 88 |)." . .".0....|
00000820: 47 24 28 33 2C 35 29 B2 22 20 20 20 12 20 20 22 |G$(3,5)." . "|
00000830: 00 48 10 BA 04 88 47 24 28 33 2C 36 29 B2 22 12 |.H....G$(3,6).".|
00000840: 20 20 92 20 12 20 20 22 00 5F 10 C4 04 88 47 24 | . . "._....G$|
00000850: 28 33 2C 37 29 B2 22 DF 12 20 20 20 92 A9 22 00 |(3,7).".. ..".|
00000860: 76 10 CE 04 88 47 24 28 34 2C 31 29 B2 22 12 20 |v....G$(4,1).". |
00000870: 20 92 20 20 20 22 00 8D 10 D8 04 88 47 24 28 34 | . "......G$(4|
00000880: 2C 32 29 B2 22 12 20 20 92 20 20 20 22 00 A4 10 |,2).". . "...|
00000890: E2 04 88 47 24 28 34 2C 33 29 B2 22 12 20 20 92 |...G$(4,3).". .|
000008A0: 20 20 20 22 00 BD 10 EC 04 88 47 24 28 34 2C 34 | "......G$(4,4|
000008B0: 29 B2 22 12 20 20 92 20 12 20 92 20 22 00 D3 10 |).". . . . "...|
000008C0: F6 04 88 47 24 28 34 2C 35 29 B2 22 12 20 20 20 |...G$(4,5).". |
000008D0: 20 20 22 00 EA 10 00 05 88 47 24 28 34 2C 36 29 | "......G$(4,6)|
000008E0: B2 22 20 20 20 12 20 92 20 22 00 01 11 0A 05 88 |." . . "......|
000008F0: 47 24 28 34 2C 37 29 B2 22 20 20 20 12 20 92 20 |G$(4,7)." . . |
00000900: 22 00 17 11 14 05 88 47 24 28 35 2C 31 29 B2 22 |"......G$(5,1)."|
00000910: 12 20 20 20 20 20 22 00 2E 11 1E 05 88 47 24 28 |. "......G$(|
00000920: 35 2C 32 29 B2 22 12 20 20 92 20 20 20 22 00 44 |5,2).". . ".D|
00000930: 11 28 05 88 47 24 28 35 2C 33 29 B2 22 12 20 20 |.(..G$(5,3).". |
00000940: 20 20 DF 22 00 5A 11 32 05 88 47 24 28 35 2C 34 | .".Z.2..G$(5,4|
00000950: 29 B2 22 20 20 20 12 20 20 22 00 70 11 3C 05 88 |)." . ".p.<..|
00000960: 47 24 28 35 2C 35 29 B2 22 20 20 20 12 20 20 22 |G$(5,5)." . "|
00000970: 00 88 11 46 05 88 47 24 28 35 2C 36 29 B2 22 12 |...F..G$(5,6).".|
00000980: 20 20 92 20 12 20 20 22 00 9F 11 50 05 88 47 24 | . . "...P..G$|
00000990: 28 35 2C 37 29 B2 22 DF 12 20 20 20 92 A9 22 00 |(5,7).".. ..".|
000009A0: B5 11 5A 05 88 47 24 28 36 2C 31 29 B2 22 12 A9 |..Z..G$(6,1)."..|
000009B0: 20 20 20 DF 22 00 CD 11 64 05 88 47 24 28 36 2C | ."...d..G$(6,|
000009C0: 32 29 B2 22 12 20 20 92 20 12 20 20 22 00 E4 11 |2).". . . "...|
000009D0: 6E 05 88 47 24 28 36 2C 33 29 B2 22 12 20 20 92 |n..G$(6,3).". .|
000009E0: 20 20 20 22 00 FA 11 78 05 88 47 24 28 36 2C 34 | "...x..G$(6,4|
000009F0: 29 B2 22 12 20 20 20 20 DF 22 00 12 12 82 05 88 |).". ."......|
00000A00: 47 24 28 36 2C 35 29 B2 22 12 20 20 92 20 12 20 |G$(6,5).". . . |
00000A10: 20 22 00 2A 12 8C 05 88 47 24 28 36 2C 36 29 B2 | ".*....G$(6,6).|
00000A20: 22 12 20 20 92 20 12 20 20 22 00 41 12 96 05 88 |". . . ".A....|
00000A30: 47 24 28 36 2C 37 29 B2 22 DF 12 20 20 20 92 A9 |G$(6,7).".. ..|
00000A40: 22 00 57 12 A0 05 88 47 24 28 37 2C 31 29 B2 22 |".W....G$(7,1)."|
00000A50: 12 20 20 20 20 20 22 00 6F 12 AA 05 88 47 24 28 |. ".o....G$(|
00000A60: 37 2C 32 29 B2 22 12 20 20 92 20 12 20 20 22 00 |7,2).". . . ".|
00000A70: 85 12 B4 05 88 47 24 28 37 2C 33 29 B2 22 20 20 |.....G$(7,3)." |
00000A80: 20 12 20 20 22 00 9B 12 BE 05 88 47 24 28 37 2C | . "......G$(7,|
00000A90: 34 29 B2 22 20 20 20 12 20 20 22 00 B1 12 C8 05 |4)." . ".....|
00000AA0: 88 47 24 28 37 2C 35 29 B2 22 20 20 20 12 20 20 |.G$(7,5)." . |
00000AB0: 22 00 C7 12 D2 05 88 47 24 28 37 2C 36 29 B2 22 |"......G$(7,6)."|
00000AC0: 20 20 20 12 20 20 22 00 DD 12 DC 05 88 47 24 28 | . "......G$(|
00000AD0: 37 2C 37 29 B2 22 20 20 20 12 20 20 22 00 F3 12 |7,7)." . "...|
00000AE0: E6 05 88 47 24 28 38 2C 31 29 B2 22 12 A9 20 20 |...G$(8,1).".. |
00000AF0: 20 DF 22 00 0B 13 F0 05 88 47 24 28 38 2C 32 29 | ."......G$(8,2)|
00000B00: B2 22 12 20 20 92 20 12 20 20 22 00 24 13 FA 05 |.". . . ".$...|
00000B10: 88 47 24 28 38 2C 33 29 B2 22 DF 12 20 92 20 12 |.G$(8,3).".. . .|
00000B20: 20 92 A9 22 00 3A 13 04 06 88 47 24 28 38 2C 34 | ..".:....G$(8,4|
00000B30: 29 B2 22 12 A9 20 20 20 DF 22 00 52 13 0E 06 88 |).".. .".R....|
00000B40: 47 24 28 38 2C 35 29 B2 22 12 20 20 92 20 12 20 |G$(8,5).". . . |
00000B50: 20 22 00 6A 13 18 06 88 47 24 28 38 2C 36 29 B2 | ".j....G$(8,6).|
00000B60: 22 12 20 20 92 20 12 20 20 22 00 81 13 22 06 88 |". . . "..."..|
00000B70: 47 24 28 38 2C 37 29 B2 22 DF 12 20 20 20 92 A9 |G$(8,7).".. ..|
00000B80: 22 00 97 13 2C 06 88 47 24 28 39 2C 31 29 B2 22 |"...,..G$(9,1)."|
00000B90: 12 A9 20 20 20 DF 22 00 AF 13 36 06 88 47 24 28 |.. ."...6..G$(|
00000BA0: 39 2C 32 29 B2 22 12 20 20 92 20 12 20 20 22 00 |9,2).". . . ".|
00000BB0: C7 13 40 06 88 47 24 28 39 2C 33 29 B2 22 12 20 |..@..G$(9,3).". |
00000BC0: 20 92 20 12 20 20 22 00 DD 13 4A 06 88 47 24 28 | . . "...J..G$(|
00000BD0: 39 2C 34 29 B2 22 DF 12 20 20 20 20 22 00 F3 13 |9,4).".. "...|
00000BE0: 54 06 88 47 24 28 39 2C 35 29 B2 22 20 20 20 12 |T..G$(9,5)." .|
00000BF0: 20 20 22 00 0B 14 5E 06 88 47 24 28 39 2C 36 29 | "...^..G$(9,6)|
00000C00: B2 22 12 20 20 92 20 12 20 20 22 00 22 14 68 06 |.". . . ".".h.|
00000C10: 88 47 24 28 39 2C 37 29 B2 22 DF 12 20 20 20 92 |.G$(9,7).".. .|
00000C20: A9 22 00 28 14 72 06 8E 00 3F 14 7C 06 8F 2A 2A |.".(.r...?.|..**|
00000C30: 2A 20 41 4C 41 52 4D 20 44 49 53 50 4C 41 59 00 |* ALARM DISPLAY.|
00000C40: 51 14 86 06 8B 50 43 24 B2 50 41 24 A7 31 37 30 |Q....PC$.PA$.170|
00000C50: 30 00 5D 14 90 06 50 43 24 B2 50 41 24 00 67 14 |0.]...PC$.PA$.g.|
00000C60: 9A 06 89 31 37 32 30 00 73 14 A4 06 50 43 24 B2 |...1720.s...PC$.|
00000C70: 50 42 24 00 7D 14 AE 06 89 31 37 32 30 00 9A 14 |PB$.}....1720...|
00000C80: B8 06 99 22 13 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D |..."............|
00000C90: 1D 1D 22 3B 50 43 24 AA 50 24 00 AE 14 C2 06 99 |..";PC$.P$......|
00000CA0: 22 13 11 11 11 11 1D 1D 1D 1D 1D 1D 22 3B 00 D4 |"...........";..|
00000CB0: 14 CC 06 99 22 12 44 52 55 4B 20 4F 50 20 27 43 |....".DRUK OP 'C|
00000CC0: 27 20 55 49 54 5A 45 54 54 45 4E 20 41 4C 41 52 |' UITZETTEN ALAR|
00000CD0: 4D 92 22 3B 00 DA 14 D6 06 8E 00 F7 14 E0 06 8F |M.";............|
00000CE0: 2A 2A 2A 20 43 4C 45 41 52 20 41 4C 41 52 4D 20 |*** CLEAR ALARM |
00000CF0: 44 49 53 50 4C 41 59 00 00 15 EA 06 50 31 B2 30 |DISPLAY.....P1.0|
00000D00: 00 0C 15 F4 06 99 22 13 11 11 22 3B 00 24 15 FE |......"...";.$..|
00000D10: 06 81 49 B2 30 A4 33 39 3A 99 A3 49 29 3B 22 20 |..I.0.39:..I);" |
00000D20: 22 3B 3A 82 00 2A 15 08 07 99 00 43 15 12 07 81 |";:..*.....C....|
00000D30: 49 B2 30 A4 33 39 3A 99 A3 49 29 3B 22 20 22 3B |I.0.39:..I);" ";|
00000D40: 3A 82 49 00 49 15 1C 07 8E 00 5D 15 26 07 8F 2A |:.I.I.....].&..*|
00000D50: 2A 2A 20 44 41 54 45 20 49 4E 50 55 54 00 83 15 |** DATE INPUT...|
00000D60: 30 07 99 22 11 49 4E 50 55 54 20 44 41 54 55 4D |0..".INPUT DATUM|
00000D70: 20 41 4C 53 20 44 44 4D 4D 59 59 20 3A 20 22 A3 | ALS DDMMYY : ".|
00000D80: 33 30 29 00 8C 15 3A 07 85 44 54 24 00 9D 15 44 |30)...:..DT$...D|
00000D90: 07 44 44 24 B2 C8 28 44 54 24 2C 32 29 00 B0 15 |.DD$..(DT$,2)...|
00000DA0: 4E 07 44 4D 24 B2 CA 28 44 54 24 2C 33 2C 32 29 |N.DM$..(DT$,3,2)|
00000DB0: 00 C3 15 58 07 44 59 24 B2 CA 28 44 54 24 2C 35 |...X.DY$..(DT$,5|
00000DC0: 2C 32 29 00 D1 15 62 07 44 44 B2 C5 28 44 44 24 |,2)...b.DD..(DD$|
00000DD0: 29 00 E0 15 6C 07 8B 44 44 B3 31 A7 32 30 30 30 |)...l..DD.1.2000|
00000DE0: 00 EE 15 76 07 44 4D B2 C5 28 44 4D 24 29 00 FD |...v.DM..(DM$)..|
00000DF0: 15 80 07 8B 44 4D B3 31 89 32 30 30 30 00 0D 16 |....DM.1.2000...|
00000E00: 8A 07 8B 44 4D B1 31 32 89 32 30 30 30 00 21 16 |...DM.12.2000.!.|
00000E10: 94 07 8B 44 44 B1 44 5A 28 44 4D 29 A7 32 30 30 |...DD.DZ(DM).200|
00000E20: 30 00 2F 16 9E 07 44 59 B2 C5 28 44 59 24 29 00 |0./...DY..(DY$).|
00000E30: 3E 16 A8 07 8B 44 59 B3 31 89 32 30 30 30 00 4E |>....DY.1.2000.N|
00000E40: 16 B2 07 8B 44 59 B1 39 39 89 32 30 30 30 00 58 |....DY.99.2000.X|
00000E50: 16 BC 07 44 43 B2 32 30 00 62 16 C6 07 89 32 30 |...DC.20.b....20|
00000E60: 32 30 00 76 16 D0 07 99 22 91 22 A3 33 30 29 3B |20.v....".".30);|
00000E70: 3A 89 31 38 35 30 00 80 16 DA 07 89 31 38 34 30 |:.1850......1840|
00000E80: 00 93 16 E4 07 8B 44 4D B1 B2 33 A7 44 4E B2 44 |......DM..3.DN.D|
00000E90: 4D AB 32 00 A6 16 EE 07 8B 44 4D B3 33 A7 44 4E |M.2......DM.3.DN|
00000EA0: B2 44 4D AA 31 30 00 B7 16 F8 07 44 4B B2 32 2E |.DM.10.....DK.2.|
00000EB0: 36 AC 44 4E AB 2E 32 00 E3 16 02 08 44 41 B2 B5 |6.DN..2.....DA..|
00000EC0: 28 44 4B 29 AA 44 44 AA 44 59 AA B5 28 44 59 AD |(DK).DD.DY..(DY.|
00000ED0: 34 29 AA B5 28 44 43 AD 34 29 AB 32 AC 44 43 AA |4)..(DC.4).2.DC.|
00000EE0: 37 30 30 00 F9 16 0C 08 44 41 B2 44 41 AB 28 B5 |700.....DA.DA.(.|
00000EF0: 28 44 41 AD 37 29 AC 37 29 00 05 17 16 08 44 41 |(DA.7).7).....DA|
00000F00: B2 44 41 AA 31 00 14 17 20 08 8B 44 41 B1 36 A7 |.DA.1... ..DA.6.|
00000F10: 44 41 B2 30 00 1D 17 2A 08 44 46 B2 30 00 23 17 |DA.0...*.DF.0.#.|
00000F20: 34 08 8E 00 39 17 3E 08 8F 2A 2A 2A 20 44 41 54 |4...9.>..*** DAT|
00000F30: 45 20 44 49 53 50 4C 41 59 00 48 17 48 08 8B 44 |E DISPLAY.H.H..D|
00000F40: 44 B2 30 89 32 33 34 30 00 55 17 52 08 99 22 13 |D.0.2340.U.R..".|
00000F50: 11 11 11 22 3B 00 6E 17 5C 08 81 49 B2 30 A4 33 |...";.n.\..I.0.3|
00000F60: 39 3A 99 A3 49 29 3B 22 20 22 3B 3A 82 49 00 8E |9:..I);" ";:.I..|
00000F70: 17 66 08 99 22 13 11 11 11 11 11 11 11 11 11 11 |.f.."...........|
00000F80: 11 11 11 11 11 11 11 11 11 11 11 11 22 3B 00 A7 |............";..|
00000F90: 17 70 08 81 49 B2 30 A4 33 39 3A 99 A3 49 29 3B |.p..I.0.39:..I);|
00000FA0: 22 20 22 3B 3A 82 49 00 D0 17 7A 08 99 22 13 11 |" ";:.I...z.."..|
00000FB0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000FC0: 11 11 11 11 11 22 3B 22 44 45 20 22 3B 44 44 3B |.....";"DE ";DD;|
00000FD0: 00 DF 17 84 08 8B 44 44 B2 31 A7 32 33 31 30 00 |......DD.1.2310.|
00000FE0: EF 17 8E 08 8B 44 44 B2 32 31 A7 32 33 31 30 00 |.....DD.21.2310.|
00000FF0: FF 17 98 08 8B 44 44 B2 33 31 A7 32 33 31 30 00 |.....DD.31.2310.|
00001000: 0E 18 A2 08 8B 44 44 B2 32 A7 32 32 39 30 00 1E |.....DD.2.2290..|
00001010: 18 AC 08 8B 44 44 B2 32 32 A7 32 32 39 30 00 2D |....DD.22.2290.-|
00001020: 18 B6 08 8B 44 44 B2 33 A7 32 32 37 30 00 3D 18 |....DD.3.2270.=.|
00001030: C0 08 8B 44 44 B2 32 33 A7 32 32 37 30 00 47 18 |...DD.23.2270.G.|
00001040: CA 08 99 22 45 22 3B 00 51 18 D4 08 89 32 33 32 |..."E";.Q....232|
00001050: 30 00 5B 18 DE 08 99 22 45 22 3B 00 65 18 E8 08 |0.[...."E";.e...|
00001060: 89 32 33 32 30 00 6F 18 F2 08 99 22 45 22 3B 00 |.2320.o...."E";.|
00001070: 79 18 FC 08 89 32 33 32 30 00 83 18 06 09 99 22 |y....2320......"|
00001080: 45 22 3B 00 BA 18 10 09 99 22 20 56 41 4E 20 22 |E";......" VAN "|
00001090: 3B 44 4A 24 28 44 4D 29 3B 22 20 31 39 22 3B 44 |;DJ$(DM);" 19";D|
000010A0: 59 24 3B 22 20 20 A2 20 20 22 3B 44 48 24 28 44 |Y$;" . ";DH$(D|
000010B0: 41 AA 31 29 3B 22 44 41 47 22 00 C3 18 1A 09 44 |A.1);"DAG".....D|
000010C0: 46 B2 31 00 C9 18 24 09 8E 00 DE 18 2E 09 8F 2A |F.1...$........*|
000010D0: 2A 2A 20 53 45 54 20 53 54 52 49 4E 47 53 00 F2 |** SET STRINGS..|
000010E0: 18 38 09 86 44 4A 24 28 31 32 29 2C 44 5A 28 31 |.8..DJ$(12),DZ(1|
000010F0: 32 29 00 FE 18 42 09 81 44 58 B2 31 A4 37 00 0B |2)...B..DX.1.7..|
00001100: 19 4C 09 87 44 48 24 28 44 58 29 00 44 19 56 09 |.L..DH$(DX).D.V.|
00001110: 83 22 5A 4F 4E 22 2C 22 4D 41 41 4E 22 2C 22 44 |."ZON","MAAN","D|
00001120: 49 4E 53 22 2C 22 57 4F 45 4E 53 22 2C 22 44 4F |INS","WOENS","DO|
00001130: 4E 44 45 52 22 2C 22 56 52 49 4A 22 2C 22 5A 41 |NDER","VRIJ","ZA|
00001140: 54 45 52 22 00 4C 19 60 09 82 44 58 00 59 19 6A |TER".L.`..DX.Y.j|
00001150: 09 81 44 58 B2 31 A4 31 32 00 66 19 74 09 87 44 |..DX.1.12.f.t..D|
00001160: 4A 24 28 44 58 29 00 A4 19 7E 09 83 22 4A 41 4E |J$(DX)...~.."JAN|
00001170: 55 41 52 49 22 2C 22 46 45 42 52 55 41 52 49 22 |UARI","FEBRUARI"|
00001180: 2C 22 4D 41 41 52 54 22 2C 22 41 50 52 49 4C 22 |,"MAART","APRIL"|
00001190: 2C 22 4D 45 49 22 2C 22 4A 55 4E 49 22 2C 22 4A |,"MEI","JUNI","J|
000011A0: 55 4C 49 22 00 E0 19 88 09 83 22 41 55 47 55 53 |ULI"......"AUGUS|
000011B0: 54 55 53 22 2C 22 53 45 50 54 45 4D 42 45 52 22 |TUS","SEPTEMBER"|
000011C0: 2C 22 4F 4B 54 4F 42 45 52 22 2C 22 4E 4F 56 45 |,"OKTOBER","NOVE|
000011D0: 4D 42 45 52 22 2C 22 44 45 43 45 4D 42 45 52 22 |MBER","DECEMBER"|
000011E0: 00 E8 19 92 09 82 44 58 00 F5 19 9C 09 81 44 58 |......DX......DX|
000011F0: B2 31 A4 31 32 00 01 1A A6 09 87 44 5A 28 44 58 |.1.12......DZ(DX|
00001200: 29 00 2A 1A B0 09 83 33 31 2C 32 39 2C 33 31 2C |).*....31,29,31,|
00001210: 33 30 2C 33 31 2C 33 30 2C 33 31 2C 33 31 2C 33 |30,31,30,31,31,3|
00001220: 30 2C 33 31 2C 33 30 2C 33 31 00 32 1A BA 09 82 |0,31,30,31.2....|
00001230: 44 58 00 38 1A C4 09 8E 00 64 1A CE 09 99 22 93 |DX.8.....d....".|
00001240: 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001250: 1D 1D 1D 12 4B 4C 4F 4B 20 49 53 20 47 45 53 54 |....KLOK IS GEST|
00001260: 4F 50 54 22 00 6A 1A D8 09 80 00 00 00 |OPT".j....... |
....D..53280,0:.53281,0.!.I..".":.-.N.PA
$.".".9.X.PB$.".".O....G$(10,10),DH$(7).
_....N(6):.M(6).H....950.Q. ..680.{....2
350......700......1830......TI$. .H..800
...R.Z.0.....A$.H(TI$,1):A.E(A$).H....X$
.X....X$."A".290......X$."C".320......X$
."D".340......X$."E".2510......360..."..
720.$.,..800.-.6..360.7.@..1770.@.J..360
.J.T..1830.S.^..360.M.H.B$.J(TI$,2,1):B.
E(B$).}.R..P1.1..1660...|.C$.J(TI$,3,1):
C.E(C$).....D$.J(TI$,4,1):D.E(D$).K...E$
.J(TI$,5,1):E.E(E$).....F$.I(TI$,1):F.E(
F$)......870......Z.1.200......DF.1.460.
..B..2110.*.L.N(1).F:N(2).E:N(3).D.C.V.N
(4).C:N(5).B:N(6).A.Q.... J.1 . 6.I....
N(J) . M(J) . 590.T...P.N(J).~.... 610..
...L$.I(R$,K)......"...........";L$;....
.. I . 1 . 7.A.&..G$(P,I).J.0..L$;.R.:..
I...D.M(J).P...N.. J...X.. 220...B..J.1
.K.34...L..J.2.K.28...V..J.3.K.21.'....J
.4.K.15.4....J.5.K.7.A....J.6.K.1.G.....
....R$."................................
............................"...........
."..INPUT TIJD ALS HHMMSS".30);...F..TT$
:.C(TT$).6.C(TT$).6..".".30);:.710...P.T
I$.TT$:.".....ALARM TIJD ALS HHMMSS ".30
);.:.Z..A$:.C(A$).6.C(A$).6..".".30);:.7
30.^....".INPUT ALARM BOODSCHAP:".30);.F
....P$.V...P$.H(P$,20)....DF.0.........
....H. ..".........";". UREN
MINUTEN SECONDEN "...*..".........
....";" . . ...."
.G.>.."....................";"..........
..............................".M.H...C.
R..I.1.6:M(I)..1:.I.I.\...W.F.TX.E(TI$).
..P.TB$.H(TA$,6)...Z.TA.E(TB$)......TA.0
.930......TA..TX.930.....P1.1.C.........
.*** CLOCK DIGITS ***......G$(0,1)."..
.."......G$(0,2).". ".".J..G$(0,3).
". . . ".:.T..G$(0,4).". . . ".R....
G$(0,5).". . . ".H....G$(0,6).". "
.....G$(0,7).".. .."......G$(1,1)." .
. . "......G$(1,2)." . . ".D....G$(1,
3)." . . "......G$(1,4)." . . "...$.
.G$(1,5)." . . "......G$(1,6)." . .
". .8..G$(1,7)." . . ".6.B..G$(2,1).".
. .".N.L..G$(2,2).". . . ".E.V..G$(2
,3)." .. ..".{.`..G$(2,4)." .. .."...J.
.G$(2,5).".. .. "...T..G$(2,6).". .
"...~..G$(2,7).". ".U....G$(3,1)."..
."......G$(3,2).". . . "......G$(3,
3)." . .."......G$(3,4)." . .".0....
G$(3,5)." . ".H....G$(3,6).". . . "
._.D..G$(3,7).".. ..".V.N..G$(4,1).".
. "...X..G$(4,2).". . "......G$(4,
3).". . "......G$(4,4).". . . . ".S.
...G$(4,5).". "......G$(4,6)." . .
"......G$(4,7)." . . "......G$(5,1)."
. "......G$(5,2).". . ".D.(..G$(5
,3).". .".Z.2..G$(5,4)." . ".P.<..
G$(5,5)." . "...F..G$(5,6).". . . "
...P..G$(5,7).".. .."...Z..G$(6,1)."..
.".M.D..G$(6,2).". . . "...N..G$(6,
3).". . "...X..G$(6,4).". ."......
G$(6,5).". . . ".*....G$(6,6).". . .
".A....G$(6,7).".. ..".W. ..G$(7,1)."
. ".O....G$(7,2).". . . "......G$(
7,3)." . "......G$(7,4)." . "...H.
.G$(7,5)." . ".G.R..G$(7,6)." . ".
.....G$(7,7)." . "......G$(8,1)."..
."......G$(8,2).". . . ".$....G$(8,3)
.".. . . ..".:....G$(8,4).".. .".R....
G$(8,5).". . . ".J....G$(8,6).". . .
"..."..G$(8,7).".. .."...,..G$(9,1)."
.. ."...6..G$(9,2).". . . ".G.@..G$(
9,3).". . . "...J..G$(9,4).".. "...
T..G$(9,5)." . "...^..G$(9,6).". . .
".".H..G$(9,7).".. ..".(.R...?.|..**
* ALARM DISPLAY.Q....PC$.PA$.1700.]...PC
$.PA$.G....1720.S...PC$.PB$.}....1720...
..."..............";PC$.P$...B..".......
....";.T.L..".DRUK OP 'C' UITZETTEN ALAR
M.";.Z.V........*** CLEAR ALARM DISPLAY.
....P1.0......"...";.$....I.0.39:..I);"
";:..*.....C....I.0.39:..I);" ";:.I.I...
..].&..*** DATE INPUT...0..".INPUT DATUM
ALS DDMMYY : ".30)...:..DT$...D.DD$.H(D
T$,2)...N.DM$.J(DT$,3,2).C.X.DY$.J(DT$,5
,2).Q.B.DD.E(DD$)...L..DD.1.2000...V.DM.
E(DM$)......DM.1.2000......DM.12.2000.!.
...DD.DZ(DM).2000./...DY.E(DY$).>....DY.
1.2000.N....DY.99.2000.X...DC.20.B.F..20
20.V.P..".".30);:.1850...Z..1840......DM
..3.DN.DM.2......DM.3.DN.DM.10.....DK.2.
6.DN..2.....DA..(DK).DD.DY..(DY.4)..(DC.
4).2.DC.700.....DA.DA.(.(DA.7).7).....DA
.DA.1... ..DA.6.DA.0...*.DF.0.#.4...9.>.
.*** DATE DISPLAY.H.H..DD.0.2340.U.R..".
...";.N.\..I.0.39:..I);" ";:.I...F.."...
....................";...P..I.0.39:..I);
" ";:.I.P.Z..".......................";"
DE ";DD;......DD.1.2310......DD.21.2310.
.....DD.31.2310......DD.2.2290......DD.2
2.2290.-....DD.3.2270.=....DD.23.2270.G.
J.."E";.Q.T..2320.[...."E";.E....2320.O.
..."E";.Y....2320......"E";......" VAN "
;DJ$(DM);" 19";DY$;" . ";DH$(DA.1);"DA
G".C...DF.1.I.$........*** SET STRINGS..
.8..DJ$(12),DZ(12)...B..DX.1.7...L..DH$(
DX).D.V.."ZON","MAAN","DINS","WOENS","DO
NDER","VRIJ","ZATER".L.`..DX.Y.J..DX.1.1
2.F.T..DJ$(DX)...~.."JANUARI","FEBRUARI"
,"MAART","APRIL","MEI","JUNI","JULI"....
.."AUGUSTUS","SEPTEMBER","OKTOBER","NOVE
MBER","DECEMBER"......DX......DX.1.12...
...DZ(DX).*....31,29,31,30,31,30,31,31,3
0,31,30,31.2....DX.8.D...D.N..".........
............KLOK IS GESTOPT".J.X.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL