DIENST
FILE INFORMATION
FILENAME(S): DIENST
FILE TYPE(S): PRG
FILE SIZE: 4.3K
FIRST SEEN: 2025-11-30 01:13:11
APPEARS ON: 3 disk(s)
FILE HASH
05141a28caa17b481ea248026ed5bc3843b50fc7df4f770789c9415a0ecfd457
FOUND ON DISKS (3 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 10910 10 899999 | DIENST | PRG | C64er | 1 | 6 | DOWNLOAD FILE |
| 10910 10 899999 | DIENST | PRG | DuncanTwain | 1 | 6 | DOWNLOAD FILE |
| THE GLUE M O C | DIENST | PRG | earthshaker | 1 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 23 08 01 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..#.... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 00 45 08 02 00 8F 20 2A 20 45 43 48 54 |***.E.... * ECHT|
00000030: 5A 45 49 54 55 48 52 20 37 32 34 32 31 20 36 34 |ZEITUHR 72421 64|
00000040: 27 45 52 20 2A 00 67 08 03 00 8F 20 2A 20 20 56 |'ER *.g.... * V|
00000050: 4F 4E 20 20 4E 49 4B 4F 4C 41 55 53 20 48 45 55 |ON NIKOLAUS HEU|
00000060: 53 4C 45 52 20 20 2A 00 89 08 04 00 8F 20 2A 20 |SLER *...... * |
00000070: 44 49 45 4E 53 54 2D 20 55 4E 44 20 44 45 4D 4F |DIENST- UND DEMO|
00000080: 50 52 4F 47 52 4D 2E 20 2A 00 AB 08 05 00 8F 20 |PROGRM. *...... |
00000090: 2A 20 28 43 29 20 4E 48 2D 31 32 30 35 38 39 2D |* (C) NH-120589-|
000000A0: 41 52 52 20 52 45 56 2E 31 20 2A 00 CD 08 06 00 |ARR REV.1 *.....|
000000B0: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
000000C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 D3 08 |*************...|
000000D0: 07 00 3A 00 F4 08 08 00 8F 20 2A 2A 2A 2A 20 50 |..:...... **** P|
000000E0: 4F 52 54 20 56 4F 52 42 45 52 45 49 54 45 4E 20 |ORT VORBEREITEN |
000000F0: 2A 2A 2A 2A 00 FA 08 09 00 3A 00 09 09 0A 00 97 |****.....:......|
00000100: 35 36 35 37 39 2C 32 32 34 00 2C 09 0B 00 8F 20 |56579,224.,.... |
00000110: 20 20 44 30 2D 44 33 2C 20 51 35 20 20 20 20 20 | D0-D3, Q5 |
00000120: 20 45 49 4E 47 41 4E 47 20 28 30 29 00 4F 09 0C | EINGANG (0).O..|
00000130: 00 8F 20 20 20 2D 43 4C 4B 2C 20 2D 52 44 2C 20 |.. -CLK, -RD, |
00000140: 2D 57 52 20 41 55 53 47 41 4E 47 20 28 31 29 00 |-WR AUSGANG (1).|
00000150: 55 09 0D 00 3A 00 6B 09 14 00 97 35 36 35 37 38 |U...:.k....56578|
00000160: 2C C2 28 35 36 35 37 38 29 B0 34 00 81 09 15 00 |,.(56578).4.....|
00000170: 8F 20 20 20 52 45 53 45 54 20 41 55 53 47 41 4E |. RESET AUSGAN|
00000180: 47 00 87 09 16 00 3A 00 92 09 18 00 9E 35 38 36 |G.....:......586|
00000190: 39 32 00 98 09 19 00 3A 00 A7 09 1E 00 97 35 36 |92.....:......56|
000001A0: 35 37 37 2C 32 32 34 00 C9 09 1F 00 8F 20 20 20 |577,224...... |
000001B0: 2D 43 4C 4B 2C 20 2D 52 44 2C 20 2D 57 52 20 41 |-CLK, -RD, -WR A|
000001C0: 42 53 43 48 41 4C 54 45 4E 00 CF 09 20 00 3A 00 |BSCHALTEN... .:.|
000001D0: D9 09 22 00 8D 32 30 30 30 00 F5 09 23 00 8F 20 |.."..2000...#.. |
000001E0: 20 20 49 53 54 20 55 48 52 20 56 4F 52 48 41 4E | IST UHR VORHAN|
000001F0: 44 45 4E 20 3F 00 FB 09 24 00 3A 00 0E 0A 28 00 |DEN ?...$.:...(.|
00000200: 58 B2 31 35 3A 41 B2 30 3A 8D 31 32 30 30 00 35 |X.15:A.0:.1200.5|
00000210: 0A 29 00 8F 20 20 20 52 45 47 49 53 54 45 52 20 |.).. REGISTER |
00000220: 31 35 20 4D 49 54 20 57 45 52 54 20 30 20 46 55 |15 MIT WERT 0 FU|
00000230: 45 4C 4C 45 4E 00 56 0A 2A 00 8F 20 20 20 55 48 |ELLEN.V.*.. UH|
00000240: 52 20 45 49 4E 53 43 48 41 4C 54 45 4E 20 28 31 |R EINSCHALTEN (1|
00000250: 32 20 53 54 44 29 00 5C 0A 3C 00 3A 00 7B 0A 46 |2 STD).\.<.:.{.F|
00000260: 00 8F 20 2A 2A 2A 2A 20 41 4E 57 45 4E 44 55 4E |.. **** ANWENDUN|
00000270: 47 53 42 53 50 2E 20 2A 2A 2A 2A 00 81 0A 50 00 |GSBSP. ****...P.|
00000280: 3A 00 A2 0A 5A 00 8F 20 20 20 47 4F 54 4F 20 31 |:...Z.. GOTO 1|
00000290: 30 30 20 20 4F 44 45 52 20 20 47 4F 54 4F 20 35 |00 ODER GOTO 5|
000002A0: 30 30 00 A8 0A 5F 00 3A 00 AE 0A 60 00 3A 00 D4 |00..._.:...`.:..|
000002B0: 0A 64 00 99 3A 99 3A 99 22 12 44 45 4D 4F 50 52 |.d..:.:.".DEMOPR|
000002C0: 4F 47 52 41 4D 4D 20 5A 55 52 20 52 54 43 20 37 |OGRAMM ZUR RTC 7|
000002D0: 32 34 32 31 00 FE 0A 6E 00 99 3A 99 22 57 4F 4C |2421...n..:."WOL|
000002E0: 4C 45 4E 20 53 49 45 20 45 49 4E 20 52 45 47 49 |LEN SIE EIN REGI|
000002F0: 53 54 45 52 20 4C 45 53 45 4E 20 28 31 29 00 28 |STER LESEN (1).(|
00000300: 0B 70 00 99 22 20 20 20 20 20 20 20 20 20 20 20 |.p.." |
00000310: 20 20 4F 44 45 52 20 42 45 53 43 48 52 45 49 42 | ODER BESCHREIB|
00000320: 45 4E 20 28 32 29 20 3F 00 2E 0B 72 00 99 00 44 |EN (2) ?...r...D|
00000330: 0B 74 00 99 22 42 49 54 54 45 20 57 41 45 48 4C |.t.."BITTE WAEHL|
00000340: 45 4E 20 21 00 51 0B 76 00 99 3A 97 31 39 38 2C |EN !.Q.v..:.198,|
00000350: 2E 00 59 0B 78 00 A1 41 24 00 69 0B 82 00 8B 41 |..Y.x..A$.i....A|
00000360: 24 B2 22 31 22 A7 32 30 30 00 79 0B 8C 00 8B 41 |$."1".200.y....A|
00000370: 24 B2 22 32 22 A7 33 30 30 00 82 0B 96 00 89 31 |$."2".300......1|
00000380: 32 30 00 B2 0B C8 00 99 3A 99 22 57 45 4C 43 48 |20......:."WELCH|
00000390: 45 53 20 52 45 47 49 53 54 45 52 20 4C 45 53 45 |ES REGISTER LESE|
000003A0: 4E 20 3F 20 28 4E 52 2E 20 30 20 42 49 53 20 31 |N ? (NR. 0 BIS 1|
000003B0: 35 29 00 C2 0B CA 00 85 22 4E 55 4D 4D 45 52 22 |5)......"NUMMER"|
000003C0: 3B 58 00 D4 0B CC 00 8B 58 B3 30 B0 58 B1 31 35 |;X......X.0.X.15|
000003D0: A7 31 30 30 00 DA 0B CE 00 3A 00 F7 0B D0 00 8D |.100.....:......|
000003E0: 31 31 30 30 20 3A 20 8F 20 52 45 47 49 53 54 45 |1100 : . REGISTE|
000003F0: 52 20 4C 45 53 45 4E 00 20 0C D2 00 99 3A 99 22 |R LESEN. ....:."|
00000400: 52 45 47 49 53 54 45 52 22 58 22 48 41 54 20 44 |REGISTER"X"HAT D|
00000410: 45 4E 20 49 4E 48 41 4C 54 22 41 3A 89 31 30 30 |EN INHALT"A:.100|
00000420: 00 48 0C 2C 01 99 3A 99 22 49 4E 20 57 45 4C 43 |.H.,..:."IN WELC|
00000430: 48 45 53 20 52 45 47 49 53 54 45 52 20 53 43 48 |HES REGISTER SCH|
00000440: 52 45 49 42 45 4E 20 3F 00 58 0C 2E 01 85 22 4E |REIBEN ?.X...."N|
00000450: 55 4D 4D 45 52 22 3B 58 00 6A 0C 30 01 8B 58 B3 |UMMER";X.j.0..X.|
00000460: 30 B0 58 B1 31 35 A7 31 30 30 00 8C 0C 32 01 99 |0.X.15.100...2..|
00000470: 3A 99 22 57 45 4C 43 48 45 4E 20 57 45 52 54 20 |:."WELCHEN WERT |
00000480: 3F 20 28 30 20 42 49 53 20 31 35 29 00 A2 0C 34 |? (0 BIS 15)...4|
00000490: 01 85 22 4E 45 55 45 52 20 49 4E 48 41 4C 54 22 |.."NEUER INHALT"|
000004A0: 3B 41 00 B4 0C 36 01 8B 41 B3 30 B0 41 B1 31 35 |;A...6..A.0.A.15|
000004B0: A7 31 30 30 00 BA 0C 38 01 3A 00 D9 0C 40 01 8D |.100...8.:...@..|
000004C0: 31 32 30 30 20 3A 20 8F 20 52 45 47 2E 20 42 45 |1200 : . REG. BE|
000004D0: 53 43 48 52 45 49 42 45 4E 00 E2 0C 4A 01 89 32 |SCHREIBEN...J..2|
000004E0: 30 38 00 E8 0C EA 01 3A 00 03 0D F4 01 8F 20 57 |08.....:...... W|
000004F0: 49 45 56 49 45 4C 20 55 48 52 20 49 53 54 20 45 |IEVIEL UHR IST E|
00000500: 53 20 3F 00 09 0D FE 01 3A 00 2D 0D 08 02 99 3A |S ?.....:.-....:|
00000510: 99 22 48 49 45 52 20 4B 4F 4D 4D 54 20 44 49 45 |."HIER KOMMT DIE|
00000520: 20 47 45 4E 41 55 45 20 5A 45 49 54 3A 00 47 0D | GENAUE ZEIT:.G.|
00000530: 12 02 99 3A 99 A3 31 32 29 22 45 53 20 49 53 54 |...:..12)"ES IST|
00000540: 22 3B 3A 4E 4D B2 30 00 4D 0D 1C 02 3A 00 5B 0D |";:NM.0.M...:.[.|
00000550: 1E 02 58 B2 35 3A 8D 31 31 30 30 00 78 0D 20 02 |..X.5:.1100.x. .|
00000560: 8F 20 20 20 53 54 55 4E 44 45 4E 2D 5A 45 48 4E |. STUNDEN-ZEHN|
00000570: 45 52 20 4C 45 53 45 4E 00 97 0D 26 02 8B 28 41 |ER LESEN...&..(A|
00000580: AF 34 29 B2 34 A7 4E 4D B2 31 3A 8F 20 4E 41 43 |.4).4.NM.1:. NAC|
00000590: 48 4D 49 54 54 41 47 00 A1 0D 28 02 48 B2 41 AF |HMITTAG...(.H.A.|
000005A0: 33 00 A7 0D 2A 02 3A 00 B5 0D 2C 02 58 B2 34 3A |3...*.:...,.X.4:|
000005B0: 8D 31 31 30 30 00 D1 0D 2E 02 8F 20 20 20 53 54 |.1100...... ST|
000005C0: 55 4E 44 45 4E 2D 45 49 4E 45 52 20 4C 45 53 45 |UNDEN-EINER LESE|
000005D0: 4E 00 F7 0D 30 02 48 B2 41 AA 48 AC 31 30 AA 4E |N...0.H.A.H.10.N|
000005E0: 4D AC 31 32 3A 8F 20 31 32 20 2D 3E 20 32 34 20 |M.12:. 12 -> 24 |
000005F0: 53 54 55 4E 44 45 4E 00 19 0E 32 02 48 24 B2 C4 |STUNDEN...2.H$..|
00000600: 28 48 29 3A 8B 48 B3 31 30 A7 48 24 B2 22 20 30 |(H):.H.10.H$." 0|
00000610: 22 AA C7 28 48 AA 34 38 29 00 25 0E 34 02 99 48 |"..(H.48).%.4..H|
00000620: 24 22 3A 22 3B 00 2B 0E 36 02 3A 00 39 0E 38 02 |$":";.+.6.:.9.8.|
00000630: 58 B2 33 3A 8D 31 31 30 30 00 56 0E 3A 02 8F 20 |X.3:.1100.V.:.. |
00000640: 20 20 4D 49 4E 55 54 45 4E 2D 5A 45 48 4E 45 52 | MINUTEN-ZEHNER|
00000650: 20 4C 45 53 45 4E 00 64 0E 3C 02 99 C7 28 41 AA | LESEN.d.<...(A.|
00000660: 34 38 29 3B 00 6A 0E 3E 02 3A 00 78 0E 42 02 58 |48);.j.>.:.x.B.X|
00000670: B2 32 3A 8D 31 31 30 30 00 94 0E 44 02 8F 20 20 |.2:.1100...D.. |
00000680: 20 4D 49 4E 55 54 45 4E 2D 45 49 4E 45 52 20 4C | MINUTEN-EINER L|
00000690: 45 53 45 4E 00 A5 0E 46 02 99 C7 28 41 AA 34 38 |ESEN...F...(A.48|
000006A0: 29 22 3A 22 3B 00 AB 0E 48 02 3A 00 B9 0E 4C 02 |)":";...H.:...L.|
000006B0: 58 B2 31 3A 8D 31 31 30 30 00 D7 0E 4E 02 8F 20 |X.1:.1100...N.. |
000006C0: 20 20 53 45 4B 55 4E 44 45 4E 2D 5A 45 48 4E 45 | SEKUNDEN-ZEHNE|
000006D0: 52 20 4C 45 53 45 4E 00 E5 0E 50 02 99 C7 28 41 |R LESEN...P...(A|
000006E0: AA 34 38 29 3B 00 EB 0E 52 02 3A 00 F9 0E 56 02 |.48);...R.:...V.|
000006F0: 58 B2 30 3A 8D 31 31 30 30 00 15 0F 58 02 8F 20 |X.0:.1100...X.. |
00000700: 20 20 4D 49 4E 55 54 45 4E 2D 45 49 4E 45 52 20 | MINUTEN-EINER |
00000710: 4C 45 53 45 4E 00 22 0F 5A 02 99 C7 28 41 AA 34 |LESEN.".Z...(A.4|
00000720: 38 29 00 28 0F 5C 02 3A 00 38 0F 62 02 99 22 91 |8).(.\.:.8.b..".|
00000730: 91 91 22 3A 89 35 33 30 00 3E 0F 6C 02 3A 00 51 |..":.530.>.l.:.Q|
00000740: 0F 75 02 8F 20 2D 20 4B 4F 4D 4D 45 4E 54 41 52 |.u.. - KOMMENTAR|
00000750: 3A 00 76 0F 76 02 8F 20 44 41 20 44 49 45 53 45 |:.v.v.. DA DIESE|
00000760: 20 52 4F 55 54 49 4E 45 4E 20 49 4E 20 42 41 53 | ROUTINEN IN BAS|
00000770: 49 43 20 47 45 2D 00 9B 0F 77 02 8F 20 53 43 48 |IC GE-...w.. SCH|
00000780: 52 49 45 42 45 4E 20 20 53 49 4E 44 2C 20 20 41 |RIEBEN SIND, A|
00000790: 52 42 45 49 54 45 4E 20 53 49 45 00 C0 0F 78 02 |RBEITEN SIE...x.|
000007A0: 8F 20 4E 41 54 55 45 52 4C 49 43 48 20 20 4E 49 |. NATUERLICH NI|
000007B0: 43 48 54 20 20 53 4F 20 20 53 43 48 4E 45 4C 4C |CHT SO SCHNELL|
000007C0: 00 E5 0F 79 02 8F 20 57 49 45 20 45 49 4E 20 41 |...y.. WIE EIN A|
000007D0: 53 53 45 4D 42 4C 45 52 50 52 4F 47 52 41 4D 4D |SSEMBLERPROGRAMM|
000007E0: 2E 20 42 45 2D 00 0A 10 7A 02 8F 20 53 4F 4E 44 |. BE-...z.. SOND|
000007F0: 45 52 53 20 20 44 41 53 20 41 4E 46 41 48 52 45 |ERS DAS ANFAHRE|
00000800: 4E 20 20 28 5A 45 49 4C 45 4E 00 2F 10 7B 02 8F |N (ZEILEN./.{..|
00000810: 20 31 30 30 30 46 46 29 20 20 56 45 52 5A 4F 45 | 1000FF) VERZOE|
00000820: 47 45 52 54 20 20 49 4E 20 20 42 41 53 49 43 00 |GERT IN BASIC.|
00000830: 42 10 7C 02 8F 20 44 4F 43 48 20 53 45 48 52 2E |B.|.. DOCH SEHR.|
00000840: 2E 2E 00 48 10 20 03 3A 00 4E 10 C0 03 3A 00 6D |...H. .:.N...:.m|
00000850: 10 CA 03 8F 20 2A 2A 2A 2A 20 44 49 45 4E 53 54 |.... **** DIENST|
00000860: 52 4F 55 54 49 4E 45 4E 20 2A 2A 2A 2A 00 73 10 |ROUTINEN ****.s.|
00000870: D4 03 3A 00 95 10 E8 03 8F 20 52 45 47 49 53 54 |..:...... REGIST|
00000880: 45 52 20 58 20 41 4E 46 41 48 52 45 4E 20 2A 2A |ER X ANFAHREN **|
00000890: 2A 2A 2A 2A 2A 00 9B 10 E9 03 3A 00 D4 10 EA 03 |*****.....:.....|
000008A0: 97 35 36 35 37 36 2C C2 28 35 36 35 37 36 29 B0 |.56576,.(56576).|
000008B0: 34 3A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |4: |
000008C0: 20 97 35 36 35 37 36 2C C2 28 35 36 35 37 36 29 | .56576,.(56576)|
000008D0: AF 32 35 31 00 F0 10 EC 03 8F 20 20 20 4B 55 52 |.251...... KUR|
000008E0: 5A 45 4E 20 52 45 53 45 54 2D 49 4D 50 55 4C 53 |ZEN RESET-IMPULS|
000008F0: 00 F6 10 ED 03 3A 00 1D 11 EE 03 8B 58 B2 2E A7 |.....:......X...|
00000900: 8E 20 3A 20 8F 20 52 45 47 49 53 54 45 52 20 30 |. : . REGISTER 0|
00000910: 20 49 53 54 20 45 52 52 45 49 43 48 54 00 23 11 | IST ERREICHT.#.|
00000920: EF 03 3A 00 46 11 F2 03 81 49 B2 31 A4 58 20 3A |..:.F....I.1.X :|
00000930: 20 8F 20 53 4F 4E 53 54 20 58 20 4D 41 4C 20 43 | . SONST X MAL C|
00000940: 4C 4F 43 4B 45 4E 00 7D 11 F6 03 97 35 36 35 37 |LOCKEN.}....5657|
00000950: 37 2C C2 28 35 36 35 37 37 29 AF 32 32 33 3A 20 |7,.(56577).223: |
00000960: 20 20 20 20 20 20 20 20 20 20 20 97 35 36 35 37 | .5657|
00000970: 37 2C C2 28 35 36 35 37 37 29 B0 33 32 00 A5 11 |7,.(56577).32...|
00000980: F8 03 8F 20 20 20 4B 55 52 5A 45 4E 20 43 4C 4F |... KURZEN CLO|
00000990: 43 4B 2D 49 4D 50 55 4C 53 20 28 4C 4F 57 20 41 |CK-IMPULS (LOW A|
000009A0: 4B 54 49 56 29 00 AD 11 FA 03 82 3A 8E 00 B3 11 |KTIV)......:....|
000009B0: FC 03 3A 00 D8 11 4C 04 8F 20 4C 45 53 45 20 52 |..:...L.. LESE R|
000009C0: 45 47 49 53 54 45 52 20 58 20 4E 41 43 48 20 41 |EGISTER X NACH A|
000009D0: 20 2A 2A 2A 2A 2A 2A 2A 00 DE 11 4D 04 3A 00 FE | *******...M.:..|
000009E0: 11 4E 04 8D 31 30 30 32 3A 8F 20 52 45 47 49 53 |.N..1002:. REGIS|
000009F0: 54 45 52 20 58 20 41 4E 46 41 48 52 45 4E 00 04 |TER X ANFAHREN..|
00000A00: 12 4F 04 3A 00 13 12 50 04 97 35 36 35 37 39 2C |.O.:...P..56579,|
00000A10: 32 32 34 00 3F 12 51 04 8F 20 20 20 44 30 2D 44 |224.?.Q.. D0-D|
00000A20: 33 20 41 55 46 20 45 49 4E 47 41 4E 47 20 20 20 |3 AUF EINGANG |
00000A30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A 00 | :.|
00000A40: 57 12 52 04 97 35 36 35 37 37 2C C2 28 35 36 35 |W.R..56577,.(565|
00000A50: 37 37 29 AF 31 32 37 00 83 12 53 04 8F 20 20 20 |77).127...S.. |
00000A60: 52 45 41 44 2D 53 49 47 4E 41 4C 20 20 20 20 20 |READ-SIGNAL |
00000A70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000A80: 20 20 3A 00 95 12 54 04 41 B2 C2 28 35 36 35 37 | :...T.A..(5657|
00000A90: 37 29 AF 31 35 00 C1 12 55 04 8F 20 20 20 44 30 |7).15...U.. D0|
00000AA0: 20 42 49 53 20 44 33 20 4C 45 53 45 4E 20 20 20 | BIS D3 LESEN |
00000AB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000AC0: 3A 00 D9 12 56 04 97 35 36 35 37 37 2C C2 28 35 |:...V..56577,.(5|
00000AD0: 36 35 37 37 29 B0 31 39 32 00 05 13 57 04 8F 20 |6577).192...W.. |
00000AE0: 20 20 52 45 41 44 20 55 4E 44 20 57 52 49 54 45 | READ UND WRITE|
00000AF0: 20 41 55 53 20 20 20 20 20 20 20 20 20 20 20 20 | AUS |
00000B00: 20 20 20 20 3A 00 0B 13 58 04 8E 00 11 13 60 04 | :...X.....`.|
00000B10: 3A 00 38 13 B0 04 8F 20 53 43 48 52 45 49 42 45 |:.8.... SCHREIBE|
00000B20: 20 41 20 49 4E 20 52 45 47 49 53 54 45 52 20 58 | A IN REGISTER X|
00000B30: 20 2A 2A 2A 2A 2A 2A 2A 00 3E 13 B1 04 3A 00 5E | *******.>...:.^|
00000B40: 13 B2 04 8D 31 30 30 32 3A 8F 20 52 45 47 49 53 |....1002:. REGIS|
00000B50: 54 45 52 20 58 20 41 4E 46 41 48 52 45 4E 00 9C |TER X ANFAHREN..|
00000B60: 13 B3 04 97 35 36 35 37 37 2C C2 28 35 36 35 37 |....56577,.(5657|
00000B70: 37 29 B0 31 39 32 3A 8F 20 52 45 41 44 20 55 4E |7).192:. READ UN|
00000B80: 44 20 57 52 49 54 45 20 41 55 53 20 28 5A 55 52 |D WRITE AUS (ZUR|
00000B90: 20 53 49 43 48 45 52 48 45 49 54 29 00 AB 13 B4 | SICHERHEIT)....|
00000BA0: 04 97 35 36 35 37 39 2C 32 33 39 00 D7 13 B5 04 |..56579,239.....|
00000BB0: 8F 20 20 20 44 30 2D 44 33 20 41 55 46 20 41 55 |. D0-D3 AUF AU|
00000BC0: 53 47 41 4E 47 20 20 20 20 20 20 20 20 20 20 20 |SGANG |
00000BD0: 20 20 20 20 20 20 3A 00 F8 13 B6 04 97 35 36 35 | :......565|
00000BE0: 37 37 2C 28 C2 28 35 36 35 37 37 29 AF 32 34 30 |77,(.(56577).240|
00000BF0: 29 B0 28 41 AF 31 35 29 00 24 14 B7 04 8F 20 20 |).(A.15).$.... |
00000C00: 20 41 20 41 55 46 20 44 30 2D 44 33 20 28 5A 55 | A AUF D0-D3 (ZU|
00000C10: 4D 20 50 4F 52 54 29 20 20 20 20 20 20 20 20 20 |M PORT) |
00000C20: 20 20 20 3A 00 3C 14 B8 04 97 35 36 35 37 37 2C | :.<....56577,|
00000C30: C2 28 35 36 35 37 37 29 AF 31 39 31 00 68 14 B9 |.(56577).191.h..|
00000C40: 04 8F 20 20 20 57 52 49 54 45 2D 53 49 47 4E 41 |.. WRITE-SIGNA|
00000C50: 4C 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |L |
00000C60: 20 20 20 20 20 20 20 3A 00 80 14 BA 04 97 35 36 | :......56|
00000C70: 35 37 37 2C C2 28 35 36 35 37 37 29 B0 31 39 32 |577,.(56577).192|
00000C80: 00 AC 14 BB 04 8F 20 20 20 57 52 49 54 45 20 55 |...... WRITE U|
00000C90: 4E 44 20 52 45 41 44 20 41 55 53 20 20 20 20 20 |ND READ AUS |
00000CA0: 20 20 20 20 20 20 20 20 20 20 20 3A 00 BB 14 BC | :....|
00000CB0: 04 97 35 36 35 37 39 2C 32 32 34 00 E7 14 BD 04 |..56579,224.....|
00000CC0: 8F 20 20 20 44 30 2D 44 33 20 41 55 46 20 45 49 |. D0-D3 AUF EI|
00000CD0: 4E 47 41 4E 47 20 20 20 20 20 20 20 20 20 20 20 |NGANG |
00000CE0: 20 20 20 20 20 20 3A 00 ED 14 BE 04 8E 00 F3 14 | :.........|
00000CF0: C0 04 3A 00 17 15 D0 07 8F 20 4D 4F 44 55 4C 20 |..:...... MODUL |
00000D00: 41 4E 47 45 53 43 48 4C 4F 53 53 45 4E 20 3F 20 |ANGESCHLOSSEN ? |
00000D10: 2A 2A 2A 2A 2A 2A 2A 00 1D 15 D1 07 3A 00 33 15 |*******.....:.3.|
00000D20: D2 07 97 35 36 35 37 36 2C C2 28 35 36 35 37 36 |...56576,.(56576|
00000D30: 29 B0 34 00 5F 15 D3 07 8F 20 20 20 52 45 53 45 |).4._.... RESE|
00000D40: 54 20 41 4E 20 20 20 20 20 20 20 20 20 20 20 20 |T AN |
00000D50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A 00 | :.|
00000D60: 77 15 D4 07 97 35 36 35 37 36 2C C2 28 35 36 35 |w....56576,.(565|
00000D70: 37 36 29 AF 32 35 31 00 89 15 D5 07 8F 20 20 20 |76).251...... |
00000D80: 52 45 53 45 54 20 41 55 53 00 8F 15 D6 07 3A 00 |RESET AUS.....:.|
00000D90: 9B 15 DA 07 81 49 B2 31 A4 31 36 00 C7 15 DB 07 |.....I.1.16.....|
00000DA0: 8F 20 20 20 31 36 20 4D 41 4C 20 43 4C 4F 43 4B |. 16 MAL CLOCK|
00000DB0: 45 4E 2C 20 44 34 20 54 45 53 54 45 4E 20 20 20 |EN, D4 TESTEN |
00000DC0: 20 20 20 20 20 20 3A 00 E2 15 DC 07 8B 28 C2 28 | :......(.(|
00000DD0: 35 36 35 37 37 29 AF 31 36 29 B2 31 36 A7 32 31 |56577).16).16.21|
00000DE0: 30 30 00 0E 16 DD 07 8F 20 20 20 57 45 4E 4E 20 |00...... WENN |
00000DF0: 5A 55 20 46 52 55 45 48 20 47 45 53 45 54 5A 54 |ZU FRUEH GESETZT|
00000E00: 2C 20 46 45 48 4C 45 52 20 20 20 20 20 3A 00 26 |, FEHLER :.&|
00000E10: 16 DE 07 97 35 36 35 37 37 2C C2 28 35 36 35 37 |....56577,.(5657|
00000E20: 37 29 AF 32 32 33 00 54 16 DF 07 8F 20 20 20 43 |7).223.T.... C|
00000E30: 4C 4F 43 4B 2D 53 49 47 4E 41 4C 20 20 20 20 20 |LOCK-SIGNAL |
00000E40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E50: 20 20 20 3A 00 6B 16 E0 07 97 35 36 35 37 37 2C | :.k....56577,|
00000E60: C2 28 35 36 35 37 37 29 B0 33 32 00 97 16 E1 07 |.(56577).32.....|
00000E70: 8F 20 20 20 43 4C 4F 43 4B 20 41 55 53 20 20 20 |. CLOCK AUS |
00000E80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E90: 20 20 20 20 20 20 3A 00 9D 16 E2 07 82 00 A3 16 | :.........|
00000EA0: E3 07 3A 00 AF 16 E4 07 81 49 B2 31 A4 31 36 00 |..:......I.1.16.|
00000EB0: DB 16 E5 07 8F 20 20 20 31 36 20 4D 41 4C 20 43 |..... 16 MAL C|
00000EC0: 4C 4F 43 4B 45 4E 2C 20 44 34 20 54 45 53 54 45 |LOCKEN, D4 TESTE|
00000ED0: 4E 20 20 20 20 20 20 20 20 20 3A 00 F5 16 E6 07 |N :.....|
00000EE0: 8B 28 C2 28 35 36 35 37 37 29 AF 31 36 29 B2 30 |.(.(56577).16).0|
00000EF0: A7 32 31 30 30 00 21 17 E7 07 8F 20 20 20 57 45 |.2100.!.... WE|
00000F00: 4E 4E 20 4E 49 43 48 54 20 47 45 53 45 54 5A 54 |NN NICHT GESETZT|
00000F10: 2C 20 46 45 48 4C 45 52 20 20 20 20 20 20 20 20 |, FEHLER |
00000F20: 3A 00 39 17 E8 07 97 35 36 35 37 37 2C C2 28 35 |:.9....56577,.(5|
00000F30: 36 35 37 37 29 AF 32 32 33 00 65 17 E9 07 8F 20 |6577).223.e.... |
00000F40: 20 20 43 4C 4F 43 4B 2D 53 49 47 4E 41 4C 20 20 | CLOCK-SIGNAL |
00000F50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000F60: 20 20 20 20 3A 00 7C 17 EA 07 97 35 36 35 37 37 | :.|....56577|
00000F70: 2C C2 28 35 36 35 37 37 29 B0 33 32 00 A8 17 EB |,.(56577).32....|
00000F80: 07 8F 20 20 20 43 4C 4F 43 4B 20 41 55 53 20 20 |.. CLOCK AUS |
00000F90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000FA0: 20 20 20 20 20 20 20 3A 00 AE 17 EC 07 82 00 B4 | :........|
00000FB0: 17 ED 07 3A 00 CF 17 EE 07 8B 28 C2 28 35 36 35 |...:......(.(565|
00000FC0: 37 37 29 AF 31 36 29 B2 31 36 A7 32 31 30 30 00 |77).16).16.2100.|
00000FD0: FB 17 EF 07 8F 20 20 20 57 45 4E 4E 20 44 34 20 |..... WENN D4 |
00000FE0: 4E 4F 43 48 20 47 45 53 45 54 5A 54 2C 20 46 45 |NOCH GESETZT, FE|
00000FF0: 48 4C 45 52 20 20 20 20 20 20 3A 00 06 18 F0 07 |HLER :.....|
00001000: 99 22 4F 4B 2E 22 00 0C 18 F2 07 8E 00 12 18 F3 |."OK."..........|
00001010: 07 3A 00 37 18 34 08 99 3A 99 22 4D 4F 44 55 4C |.:.7.4..:."MODUL|
00001020: 20 4E 49 43 48 54 20 41 4E 47 45 53 43 48 4C 4F | NICHT ANGESCHLO|
00001030: 53 53 45 4E 20 21 22 00 3D 18 38 08 80 00 43 18 |SSEN !".=.8...C.|
00001040: 3A 08 3A 00 49 18 98 08 3A 00 6E 18 9A 08 8F 20 |:.:.I...:.n.... |
00001050: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001060: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 92 |**************..|
00001070: 18 9C 08 8F 20 20 52 54 43 2D 45 4E 54 57 49 43 |.... RTC-ENTWIC|
00001080: 4B 4C 55 4E 47 3A 20 20 4E 2E 20 48 45 55 53 4C |KLUNG: N. HEUSL|
00001090: 45 52 00 B7 18 9E 08 8F 20 5A 57 45 4E 47 41 55 |ER...... ZWENGAU|
000010A0: 45 52 57 45 47 20 31 38 2C 20 38 20 4D 55 45 4E |ERWEG 18, 8 MUEN|
000010B0: 43 48 45 4E 20 37 31 00 DB 18 A0 08 8F 20 20 46 |CHEN 71...... F|
000010C0: 55 45 52 20 4D 45 48 52 20 49 4E 46 4F 20 28 52 |UER MEHR INFO (R|
000010D0: 55 45 43 4B 50 4F 52 54 4F 21 29 00 00 19 A2 08 |UECKPORTO!).....|
000010E0: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
000010F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001100: 00 00 00 |... |
..#.... ***************************.E...
. * ECHTZEITUHR 72421 64'ER *.G.... * V
ON NIKOLAUS HEUSLER *...... * DIENST-
UND DEMOPROGRM. *...... * (C) NH-120589-
ARR REV.1 *.M.... **********************
*****.S...:...... **** PORT VORBEREITEN
****.....:......56579,224.,.... D0-D3,
Q5 EINGANG (0).O.... -CLK, -RD,
-WR AUSGANG (1).U...:.K....56578,B(56578
).4...... RESET AUSGANG.....:......586
92.....:......56577,224.I.... -CLK, -R
D, -WR ABSCHALTEN.O. .:.Y."..2000...#..
IST UHR VORHANDEN ?...$.:...(.X.15:A.0
:.1200.5.).. REGISTER 15 MIT WERT 0 FU
ELLEN.V.*.. UHR EINSCHALTEN (12 STD).\
.<.:.{.F.. **** ANWENDUNGSBSP. ****...P.
:...Z.. GOTO 100 ODER GOTO 500..._.:
...`.:.T.D..:.:.".DEMOPROGRAMM ZUR RTC 7
2421...N..:."WOLLEN SIE EIN REGISTER LES
EN (1).(.P.." ODER BESCHREIB
EN (2) ?...R...D.T.."BITTE WAEHLEN !.Q.V
..:.198,..Y.X..A$.I....A$."1".200.Y....A
$."2".300......120...H..:."WELCHES REGIS
TER LESEN ? (NR. 0 BIS 15).B.J.."NUMMER"
;X.T.L..X.0.X.15.100.Z.N.:...P..1100 : .
REGISTER LESEN. .R..:."REGISTER"X"HAT D
EN INHALT"A:.100.H.,..:."IN WELCHES REGI
STER SCHREIBEN ?.X...."NUMMER";X.J.0..X.
0.X.15.100...2..:."WELCHEN WERT ? (0 BIS
15)...4.."NEUER INHALT";A...6..A.0.A.15
.100...8.:.Y.@..1200 : . REG. BESCHREIBE
N...J..208.....:...... WIEVIEL UHR IST E
S ?.....:.-....:."HIER KOMMT DIE GENAUE
ZEIT:.G....:..12)"ES IST";:NM.0.M...:.[.
..X.5:.1100.X. .. STUNDEN-ZEHNER LESEN
...&..(A.4).4.NM.1:. NACHMITTAG...(.H.A.
3...*.:...,.X.4:.1100.Q.... STUNDEN-EI
NER LESEN...0.H.A.H.10.NM.12:. 12 -> 24
STUNDEN...2.H$.D(H):.H.10.H$." 0".G(H.48
).%.4..H$":";.+.6.:.9.8.X.3:.1100.V.:..
MINUTEN-ZEHNER LESEN.D.<..G(A.48);.J.>
.:.X.B.X.2:.1100...D.. MINUTEN-EINER L
ESEN...F..G(A.48)":";...H.:...L.X.1:.110
0.W.N.. SEKUNDEN-ZEHNER LESEN...P..G(A
.48);...R.:...V.X.0:.1100...X.. MINUTE
N-EINER LESEN.".Z..G(A.48).(.\.:.8.B..".
..":.530.>.L.:.Q.U.. - KOMMENTAR:.V.V..
DA DIESE ROUTINEN IN BASIC GE-...W.. SCH
RIEBEN SIND, ARBEITEN SIE...X.. NATUER
LICH NICHT SO SCHNELL...Y.. WIE EIN A
SSEMBLERPROGRAMM. BE-...Z.. SONDERS DAS
ANFAHREN (ZEILEN./.{.. 1000FF) VERZOE
GERT IN BASIC.B.|.. DOCH SEHR....H. .:
.N...:.M.J.. **** DIENSTROUTINEN ****.S.
T.:...... REGISTER X ANFAHREN *******...
..:.T....56576,B(56576).4:
.56576,B(56576).251...... KURZEN RESE
T-IMPULS.....:......X.... : . REGISTER 0
IST ERREICHT.#...:.F....I.1.X : . SONST
X MAL CLOCKEN.}....56577,B(56577).223:
.56577,B(56577).32...... KU
RZEN CLOCK-IMPULS (LOW AKTIV)......:....
..:.X.L.. LESE REGISTER X NACH A *******
...M.:...N..1002:. REGISTER X ANFAHREN..
.O.:...P..56579,224.?.Q.. D0-D3 AUF EI
NGANG :.W.R..56577,B(565
77).127...S.. READ-SIGNAL
:...T.A.B(56577).15.A.U.. D0
BIS D3 LESEN :.Y.V..5
6577,B(56577).192...W.. READ UND WRITE
AUS :...X.....`.:.8....
SCHREIBE A IN REGISTER X *******.>...:.^
....1002:. REGISTER X ANFAHREN......5657
7,B(56577).192:. READ UND WRITE AUS (ZUR
SICHERHEIT)......56579,239.W.... D0-D
3 AUF AUSGANG :......565
77,(B(56577).240).(A.15).$.... A AUF D
0-D3 (ZUM PORT) :.<....56577,
B(56577).191.H.... WRITE-SIGNAL
:......56577,B(56577).192
...... WRITE UND READ AUS
:......56579,224...... D0-D3 AUF EI
NGANG :...........:...P.
. MODUL ANGESCHLOSSEN ? *******...Q.:.3.
R..56576,B(56576).4._.S.. RESET AN
:.W.T..56576,B(565
76).251...U.. RESET AUS...V.:...Z..I.1
.16.G.... 16 MAL CLOCKEN, D4 TESTEN
:......(B(56577).16).16.2100......
WENN ZU FRUEH GESETZT, FEHLER :.&
....56577,B(56577).223.T.... CLOCK-SIG
NAL :.K....56577,
B(56577).32...... CLOCK AUS
:...........:......I.1.16.
..... 16 MAL CLOCKEN, D4 TESTEN
:......(B(56577).16).0.2100.!.... WE
NN NICHT GESETZT, FEHLER :.9....5
6577,B(56577).223.E.... CLOCK-SIGNAL
:.|....56577,B(56577
).32...... CLOCK AUS
:...........:.O....(B(56577).16).
16.2100...... WENN D4 NOCH GESETZT, FE
HLER :......"OK."...........:.7.4..
:."MODUL NICHT ANGESCHLOSSEN !".=.8...C.
:.:.I...:.N.... ************************
******...... RTC-ENTWICKLUNG: N. HEUSL
ER...... ZWENGAUERWEG 18, 8 MUENCHEN 71.
.. .. FUER MEHR INFO (RUECKPORTO!).....
. ******************************...
> CLICK IMAGE PREVIEW FOR FULL MODAL