D. QT.BORDERCLOC
FILE INFORMATION
FILENAME(S): D. QT.BORDERCLOC
FILE TYPE(S): PRG
FILE SIZE: 6.1K
FIRST SEEN: 2025-11-30 18:06:23
APPEARS ON: 2 disk(s)
FILE HASH
39fbd53e976a6bc31b3bb7eed13198dd1e250c5e569fb485889f95e1d84adf81
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DIGITAL TALK 04 | D. QT.BORDERCLOC | PRG | Xii | 7 | 4 | DOWNLOAD FILE |
| DIGITAL TALK 04 | D. QT.BORDERCLOC | PRG | Xii | 7 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 14 2D 1A 2D 0A 00 3B 00 40 2D 14 00 3B 2A 2A 2A |.-.-..;.@-..;***|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 66 2D |*************.f-|
00000030: 1E 00 3B 2A 20 20 20 20 42 4F 52 44 45 52 55 48 |..;* BORDERUH|
00000040: 52 20 2D 20 44 41 4E 54 45 27 39 33 20 20 20 20 |R - DANTE'93 |
00000050: 20 20 2A 00 8C 2D 28 00 3B 2A 20 20 20 20 3D 3D | *..-(.;* ==|
00000060: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000070: 3D 3D 20 20 20 20 20 20 2A 00 B2 2D 32 00 3B 2A |== *..-2.;*|
00000080: 20 20 5A 45 49 54 45 49 4E 47 41 42 45 3A 53 59 | ZEITEINGABE:SY|
00000090: 53 20 35 32 34 38 30 2C 53 54 2C 4D 49 20 2A 00 |S 52480,ST,MI *.|
000000A0: D8 2D 3C 00 3B 2A 20 41 4C 41 52 4D 45 49 4E 47 |.-<.;* ALARMEING|
000000B0: 41 42 45 3A 53 59 53 20 35 32 34 38 33 2C 53 54 |ABE:SYS 52483,ST|
000000C0: 2C 4D 49 20 2A 00 FE 2D 46 00 3B 2A 20 41 4C 41 |,MI *..-F.;* ALA|
000000D0: 52 4D 20 4C 4F 45 53 43 48 45 4E 3A 53 59 53 20 |RM LOESCHEN:SYS |
000000E0: 35 32 34 38 33 2C 30 2C 30 20 2A 00 24 2E 50 00 |52483,0,0 *.$.P.|
000000F0: 3B 2A 20 20 20 20 20 41 4C 41 52 4D 20 53 54 4F |;* ALARM STO|
00000100: 50 3A 3C 43 54 52 4C 3E 20 20 20 20 20 20 20 20 |P:<CTRL> |
00000110: 2A 00 4A 2E 5A 00 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A |*.J.Z.;*********|
00000120: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000130: 2A 2A 2A 2A 2A 2A 2A 00 50 2E 64 00 3B 00 5E 2E |*******.P.d.;.^.|
00000140: 6E 00 2E 42 41 20 24 43 44 30 30 00 64 2E 78 00 |n..BA $CD00.d.x.|
00000150: 3B 00 7B 2E 82 00 3B 2A 2A 2A 20 56 41 52 49 41 |;.{...;*** VARIA|
00000160: 42 4C 45 4E 20 2A 2A 2A 00 81 2E 8C 00 3B 00 94 |BLEN ***.....;..|
00000170: 2E 96 00 2E 45 51 20 52 41 4E 44 3D 24 44 30 32 |....EQ RAND=$D02|
00000180: 30 00 A7 2E A0 00 2E 45 51 20 42 49 4C 44 3D 24 |0......EQ BILD=$|
00000190: 44 30 32 31 00 B9 2E AA 00 2E 45 51 20 53 49 44 |D021......EQ SID|
000001A0: 3D 24 44 34 30 30 00 CD 2E B4 00 2E 45 51 20 5A |=$D400......EQ Z|
000001B0: 45 48 4E 54 3D 24 44 44 30 38 00 E1 2E BE 00 2E |EHNT=$DD08......|
000001C0: 45 51 20 53 45 4B 55 4E 3D 24 44 44 30 39 00 F5 |EQ SEKUN=$DD09..|
000001D0: 2E C8 00 2E 45 51 20 4D 49 4E 55 54 3D 24 44 44 |....EQ MINUT=$DD|
000001E0: 30 41 00 09 2F D2 00 2E 45 51 20 53 54 55 4E 44 |0A../...EQ STUND|
000001F0: 3D 24 44 44 30 42 00 1B 2F DC 00 2E 45 51 20 49 |=$DD0B../...EQ I|
00000200: 43 52 3D 24 44 44 30 44 00 2D 2F E6 00 2E 45 51 |CR=$DD0D.-/...EQ|
00000210: 20 43 52 41 3D 24 44 44 30 45 00 3F 2F F0 00 2E | CRA=$DD0E.?/...|
00000220: 45 51 20 43 52 42 3D 24 44 44 30 46 00 45 2F FA |EQ CRB=$DD0F.E/.|
00000230: 00 3B 00 52 2F 04 01 20 4A 4D 50 49 4E 49 54 00 |.;.R/.. JMPINIT.|
00000240: 58 2F 0E 01 3B 00 66 2F 18 01 20 4A 4D 50 41 4C |X/..;.f/.. JMPAL|
00000250: 41 52 4D 00 6C 2F 22 01 3B 00 7B 2F 2C 01 43 4F |ARM.l/".;.{/,.CO|
00000260: 4C 4F 52 20 2E 42 59 37 00 8A 2F 36 01 5A 45 49 |LOR .BY7../6.ZEI|
00000270: 54 48 20 2E 42 59 30 00 99 2F 40 01 5A 45 49 54 |TH .BY0../@.ZEIT|
00000280: 4D 20 2E 42 59 30 00 A8 2F 4A 01 5A 45 49 54 53 |M .BY0../J.ZEITS|
00000290: 20 2E 42 59 30 00 B7 2F 54 01 5A 45 49 54 5A 20 | .BY0../T.ZEITZ |
000002A0: 2E 42 59 30 00 BD 2F 5E 01 3B 00 DD 2F 68 01 2E |.BY0../^.;../h..|
000002B0: 54 58 20 22 42 4F 52 44 45 52 55 48 52 20 2D 20 |TX "BORDERUHR - |
000002C0: 44 41 4E 54 45 20 27 39 33 22 00 E3 2F 72 01 3B |DANTE '93"../r.;|
000002D0: 00 00 30 7C 01 3B 2A 2A 2A 20 49 4E 49 54 49 41 |..0|.;*** INITIA|
000002E0: 4C 49 53 49 45 52 55 4E 47 20 2A 2A 2A 00 06 30 |LISIERUNG ***..0|
000002F0: 86 01 3B 00 21 30 90 01 49 4E 49 54 20 4A 53 52 |..;.!0..INIT JSR|
00000300: 47 45 54 3B 5A 45 49 54 20 48 4F 4C 45 4E 00 3D |GET;ZEIT HOLEN.=|
00000310: 30 9A 01 20 4C 44 41 43 52 41 3B 45 43 48 54 5A |0.. LDACRA;ECHTZ|
00000320: 45 49 54 55 48 52 46 52 45 2D 00 5A 30 A4 01 20 |EITUHRFRE-.Z0.. |
00000330: 4F 52 41 23 24 38 30 3B 51 55 45 4E 5A 20 41 55 |ORA#$80;QUENZ AU|
00000340: 46 20 35 30 20 48 5A 00 6D 30 AE 01 20 53 54 41 |F 50 HZ.m0.. STA|
00000350: 43 52 41 3B 53 45 54 5A 45 4E 00 88 30 B8 01 20 |CRA;SETZEN..0.. |
00000360: 4C 44 41 43 52 42 3B 55 48 52 5A 45 49 54 20 53 |LDACRB;UHRZEIT S|
00000370: 45 54 5A 45 4E 00 95 30 C2 01 20 41 4E 44 23 24 |ETZEN..0.. AND#$|
00000380: 37 46 00 A1 30 CC 01 20 53 54 41 43 52 42 00 BC |7F..0.. STACRB..|
00000390: 30 D6 01 20 4C 44 41 54 49 4D 45 48 3B 53 54 55 |0.. LDATIMEH;STU|
000003A0: 4E 44 45 20 48 4F 4C 45 4E 00 CA 30 E0 01 20 53 |NDE HOLEN..0.. S|
000003B0: 54 41 53 54 55 4E 44 00 E5 30 EA 01 20 4C 44 41 |TASTUND..0.. LDA|
000003C0: 54 49 4D 45 4D 3B 4D 49 4E 55 54 45 20 48 4F 4C |TIMEM;MINUTE HOL|
000003D0: 45 4E 00 F3 30 F4 01 20 53 54 41 4D 49 4E 55 54 |EN..0.. STAMINUT|
000003E0: 00 0B 31 FE 01 20 4C 44 41 23 30 3B 53 45 4B 55 |..1.. LDA#0;SEKU|
000003F0: 4E 44 45 4E 20 55 4E 44 00 27 31 08 02 20 53 54 |NDEN UND.'1.. ST|
00000400: 41 53 45 4B 55 4E 3B 5A 45 48 4E 54 45 4C 20 41 |ASEKUN;ZEHNTEL A|
00000410: 55 46 20 30 00 44 31 12 02 20 53 54 41 5A 45 48 |UF 0.D1.. STAZEH|
00000420: 4E 54 3B 53 45 54 5A 45 4E 20 2D 3E 53 54 41 52 |NT;SETZEN ->STAR|
00000430: 54 00 4D 31 1C 02 20 54 41 58 00 6F 31 26 02 49 |T.M1.. TAX.o1&.I|
00000440: 4E 31 20 53 54 41 24 30 33 34 30 2C 58 3B 53 50 |N1 STA$0340,X;SP|
00000450: 52 49 54 45 53 50 45 49 43 48 45 52 00 81 31 30 |RITESPEICHER..10|
00000460: 02 20 49 4E 58 3B 4C 4F 45 53 43 48 45 4E 00 8E |. INX;LOESCHEN..|
00000470: 31 3A 02 20 43 50 58 23 24 43 30 00 9A 31 44 02 |1:. CPX#$C0..1D.|
00000480: 20 42 43 43 49 4E 31 00 A0 31 4E 02 3B 00 B8 31 | BCCIN1..1N.;..1|
00000490: 58 02 20 53 45 49 3B 49 52 51 20 49 4E 49 54 2E |X. SEI;IRQ INIT.|
000004A0: 20 46 55 45 52 00 D7 31 62 02 20 4C 44 58 23 3C | FUER..1b. LDX#<|
000004B0: 28 49 52 51 29 3B 5A 45 49 54 41 4E 5A 45 49 47 |(IRQ);ZEITANZEIG|
000004C0: 45 20 49 4D 00 EC 31 6C 02 20 4C 44 41 23 3E 28 |E IM..1l. LDA#>(|
000004D0: 49 52 51 29 3B 52 41 4E 44 00 FA 31 76 02 20 53 |IRQ);RAND..1v. S|
000004E0: 54 58 24 30 33 31 34 00 08 32 80 02 20 53 54 41 |TX$0314..2.. STA|
000004F0: 24 30 33 31 35 00 15 32 8A 02 20 4C 44 41 23 24 |$0315..2.. LDA#$|
00000500: 38 31 00 23 32 94 02 20 53 54 41 24 44 30 31 41 |81.#2.. STA$D01A|
00000510: 00 31 32 9E 02 20 4C 44 41 24 44 30 31 31 00 3E |.12.. LDA$D011.>|
00000520: 32 A8 02 20 41 4E 44 23 24 37 46 00 4C 32 B2 02 |2.. AND#$7F.L2..|
00000530: 20 53 54 41 24 44 30 31 31 00 59 32 BC 02 20 4C | STA$D011.Y2.. L|
00000540: 44 41 23 24 46 39 00 67 32 C6 02 20 53 54 41 24 |DA#$F9.g2.. STA$|
00000550: 44 30 31 32 00 6D 32 D0 02 3B 00 79 32 DA 02 20 |D012.m2..;.y2.. |
00000560: 4C 44 41 24 30 31 00 86 32 E4 02 20 53 54 41 48 |LDA$01..2.. STAH|
00000570: 45 4C 50 00 93 32 EE 02 20 4C 44 41 23 24 33 33 |ELP..2.. LDA#$33|
00000580: 00 9F 32 F8 02 20 53 54 41 24 30 31 00 AC 32 02 |..2.. STA$01..2.|
00000590: 03 20 4C 44 58 23 24 30 30 00 B9 32 0C 03 20 4C |. LDX#$00..2.. L|
000005A0: 44 59 23 24 30 30 00 CC 32 16 03 49 52 30 20 4C |DY#$00..2..IR0 L|
000005B0: 44 41 24 44 31 44 30 2C 58 00 DC 32 20 03 20 53 |DA$D1D0,X..2 . S|
000005C0: 54 41 24 30 33 38 30 2C 59 00 EC 32 2A 03 20 53 |TA$0380,Y..2*. S|
000005D0: 54 41 24 30 33 43 30 2C 59 00 F5 32 34 03 20 49 |TA$03C0,Y..24. I|
000005E0: 4E 59 00 FE 32 3E 03 20 49 4E 59 00 07 33 48 03 |NY..2>. INY..3H.|
000005F0: 20 49 4E 59 00 10 33 52 03 20 49 4E 58 00 1D 33 | INY..3R. INX..3|
00000600: 5C 03 20 43 50 58 23 24 30 38 00 29 33 66 03 20 |\. CPX#$08.)3f. |
00000610: 42 43 43 49 52 30 00 36 33 70 03 20 4C 44 41 48 |BCCIR0.63p. LDAH|
00000620: 45 4C 50 00 42 33 7A 03 20 53 54 41 24 30 31 00 |ELP.B3z. STA$01.|
00000630: 4B 33 84 03 20 43 4C 49 00 54 33 8E 03 20 52 54 |K3.. CLI.T3.. RT|
00000640: 53 00 5A 33 98 03 3B 00 77 33 A2 03 49 52 51 20 |S.Z3..;.w3..IRQ |
00000650: 4C 44 41 24 44 30 31 39 3B 49 52 51 2D 52 45 51 |LDA$D019;IRQ-REQ|
00000660: 55 45 53 54 00 8E 33 AC 03 20 53 54 41 24 44 30 |UEST..3.. STA$D0|
00000670: 31 39 3B 4C 4F 45 53 43 48 45 4E 00 A7 33 B6 03 |19;LOESCHEN..3..|
00000680: 20 42 4D 49 49 52 31 3B 52 41 53 54 45 52 2D 49 | BMIIR1;RASTER-I|
00000690: 52 51 20 3F 00 C5 33 C0 03 20 4C 44 41 24 44 43 |RQ ?..3.. LDA$DC|
000006A0: 30 44 3B 4E 45 49 4E 2D 3E 53 59 53 54 45 4D 49 |0D;NEIN->SYSTEMI|
000006B0: 52 51 00 CE 33 CA 03 20 43 4C 49 00 DC 33 D4 03 |RQ..3.. CLI..3..|
000006C0: 20 4A 4D 50 24 45 41 33 31 00 E2 33 DE 03 3B 00 | JMP$EA31..3..;.|
000006D0: FB 33 E8 03 3B 2A 2A 2A 20 49 52 51 2D 52 4F 55 |.3..;*** IRQ-ROU|
000006E0: 54 49 4E 45 20 2A 2A 2A 00 01 34 F2 03 3B 00 1B |TINE ***..4..;..|
000006F0: 34 FC 03 49 52 31 20 4C 44 41 24 44 30 31 31 3B |4..IR1 LDA$D011;|
00000700: 52 41 4E 44 20 41 55 53 00 28 34 06 04 20 41 4E |RAND AUS.(4.. AN|
00000710: 44 23 24 46 37 00 36 34 10 04 20 53 54 41 24 44 |D#$F7.64.. STA$D|
00000720: 30 31 31 00 3C 34 1A 04 3B 00 57 34 24 04 20 4C |011.<4..;.W4$. L|
00000730: 44 41 24 44 30 31 35 3B 56 49 43 2D 52 45 47 49 |DA$D015;VIC-REGI|
00000740: 53 54 45 52 00 71 34 2E 04 20 4F 52 41 23 24 45 |STER.q4.. ORA#$E|
00000750: 30 3B 46 55 45 52 20 42 4F 52 44 45 52 2D 00 8E |0;FUER BORDER-..|
00000760: 34 38 04 20 53 54 41 24 44 30 31 35 3B 53 50 52 |48. STA$D015;SPR|
00000770: 49 54 45 53 20 53 45 54 5A 45 4E 00 9C 34 42 04 |ITES SETZEN..4B.|
00000780: 20 4C 44 41 24 44 30 31 37 00 A9 34 4C 04 20 41 | LDA$D017..4L. A|
00000790: 4E 44 23 24 31 46 00 B7 34 56 04 20 53 54 41 24 |ND#$1F..4V. STA$|
000007A0: 44 30 31 37 00 C5 34 60 04 20 4C 44 41 24 44 30 |D017..4`. LDA$D0|
000007B0: 31 42 00 D2 34 6A 04 20 41 4E 44 23 24 31 46 00 |1B..4j. AND#$1F.|
000007C0: E0 34 74 04 20 53 54 41 24 44 30 31 42 00 EE 34 |.4t. STA$D01B..4|
000007D0: 7E 04 20 4C 44 41 24 44 30 31 43 00 FB 34 88 04 |~. LDA$D01C..4..|
000007E0: 20 41 4E 44 23 24 31 46 00 09 35 92 04 20 53 54 | AND#$1F..5.. ST|
000007F0: 41 24 44 30 31 43 00 17 35 9C 04 20 4C 44 41 24 |A$D01C..5.. LDA$|
00000800: 44 30 31 44 00 24 35 A6 04 20 41 4E 44 23 24 31 |D01D.$5.. AND#$1|
00000810: 46 00 32 35 B0 04 20 53 54 41 24 44 30 31 44 00 |F.25.. STA$D01D.|
00000820: 38 35 BA 04 3B 00 55 35 C4 04 20 4C 44 58 23 24 |85..;.U5.. LDX#$|
00000830: 30 44 3B 53 50 52 49 54 45 2D 53 50 45 49 43 48 |0D;SPRITE-SPEICH|
00000840: 45 52 00 6C 35 CE 04 49 52 32 20 54 58 41 3B 55 |ER.l5..IR2 TXA;U|
00000850: 4E 44 20 2D 46 41 52 42 45 00 86 35 D8 04 20 53 |ND -FARBE..5.. S|
00000860: 54 41 24 30 37 46 30 2C 58 3B 46 45 53 54 4C 45 |TA$07F0,X;FESTLE|
00000870: 47 45 4E 00 94 35 E2 04 20 4C 44 41 43 4F 4C 4F |GEN..5.. LDACOLO|
00000880: 52 00 A4 35 EC 04 20 53 54 41 24 44 30 31 46 2C |R..5.. STA$D01F,|
00000890: 58 00 AD 35 F6 04 20 49 4E 58 00 BA 35 00 05 20 |X..5.. INX..5.. |
000008A0: 43 50 58 23 24 31 30 00 C6 35 0A 05 20 42 4E 45 |CPX#$10..5.. BNE|
000008B0: 49 52 32 00 E3 35 14 05 3B 20 20 20 20 20 20 20 |IR2..5..; |
000008C0: 20 20 20 20 20 20 20 20 20 20 A0 A0 A0 A0 A0 A0 | ......|
000008D0: 00 FF 35 1E 05 20 4C 44 58 23 24 30 30 3B 53 50 |..5.. LDX#$00;SP|
000008E0: 52 49 54 45 4B 4F 4F 52 44 49 4E 2E 00 17 36 28 |RITEKOORDIN...6(|
000008F0: 05 49 52 33 20 4C 44 41 53 50 52 2C 58 3B 53 45 |.IR3 LDASPR,X;SE|
00000900: 54 5A 45 4E 00 27 36 32 05 20 53 54 41 24 44 30 |TZEN.'62. STA$D0|
00000910: 30 41 2C 58 00 30 36 3C 05 20 49 4E 58 00 3D 36 |0A,X.06<. INX.=6|
00000920: 46 05 20 43 50 58 23 24 30 37 00 49 36 50 05 20 |F. CPX#$07.I6P. |
00000930: 42 4E 45 49 52 33 00 4F 36 5A 05 3B 00 66 36 64 |BNEIR3.O6Z.;.f6d|
00000940: 05 20 4A 53 52 48 4F 4C 3B 5A 45 49 54 20 48 4F |. JSRHOL;ZEIT HO|
00000950: 4C 45 4E 00 6C 36 6E 05 3B 00 86 36 78 05 20 4A |LEN.l6n.;..6x. J|
00000960: 53 52 4F 55 54 3B 5A 45 49 54 20 41 55 53 47 45 |SROUT;ZEIT AUSGE|
00000970: 42 45 4E 00 8C 36 82 05 3B 00 A2 36 8C 05 20 4A |BEN..6..;..6.. J|
00000980: 53 52 43 48 45 43 4B 3B 41 4C 41 52 4D 20 3F 00 |SRCHECK;ALARM ?.|
00000990: A8 36 96 05 3B 00 C9 36 A0 05 45 4E 44 20 4C 44 |.6..;..6..END LD|
000009A0: 41 24 44 30 31 31 3B 57 41 52 54 45 4E 2C 42 49 |A$D011;WARTEN,BI|
000009B0: 53 20 52 41 53 2D 00 E5 36 AA 05 20 41 4E 44 23 |S RAS-..6.. AND#|
000009C0: 24 38 30 3B 54 45 52 5A 45 49 4C 45 20 30 20 45 |$80;TERZEILE 0 E|
000009D0: 52 2D 00 FC 36 B4 05 20 42 4E 45 45 4E 44 3B 52 |R-..6.. BNEEND;R|
000009E0: 45 49 43 48 54 20 49 53 54 00 09 37 BE 05 20 4C |EICHT IST..7.. L|
000009F0: 44 41 42 49 4C 44 00 16 37 C8 05 20 53 54 41 52 |DABILD..7.. STAR|
00000A00: 41 4E 44 00 2D 37 D2 05 20 4C 44 41 24 44 30 31 |AND.-7.. LDA$D01|
00000A10: 31 3B 52 41 4E 44 20 45 49 4E 00 3A 37 DC 05 20 |1;RAND EIN.:7.. |
00000A20: 4F 52 41 23 24 30 38 00 48 37 E6 05 20 53 54 41 |ORA#$08.H7.. STA|
00000A30: 24 44 30 31 31 00 62 37 F0 05 20 4A 4D 50 24 45 |$D011.b7.. JMP$E|
00000A40: 41 38 31 3B 55 4E 44 20 53 43 48 4C 55 53 53 00 |A81;UND SCHLUSS.|
00000A50: 68 37 FA 05 3B 00 80 37 04 06 3B 2A 2A 2A 20 5A |h7..;..7..;*** Z|
00000A60: 45 49 54 20 48 4F 4C 45 4E 20 2A 2A 2A 00 86 37 |EIT HOLEN ***..7|
00000A70: 0E 06 3B 00 A4 37 18 06 48 4F 4C 20 4C 44 41 53 |..;..7..HOL LDAS|
00000A80: 54 55 4E 44 3B 53 54 55 4E 44 45 20 48 4F 4C 45 |TUND;STUNDE HOLE|
00000A90: 4E 00 B1 37 22 06 20 53 54 41 48 45 4C 50 00 BE |N..7". STAHELP..|
00000AA0: 37 2C 06 20 41 4E 44 23 24 31 46 00 CC 37 36 06 |7,. AND#$1F..76.|
00000AB0: 20 4A 53 52 57 41 4E 44 45 00 DA 37 40 06 20 53 | JSRWANDE..7@. S|
00000AC0: 54 41 5A 45 49 54 48 00 E7 37 4A 06 20 4C 44 41 |TAZEITH..7J. LDA|
00000AD0: 48 45 4C 50 00 F4 37 54 06 20 41 4E 44 23 24 38 |HELP..7T. AND#$8|
00000AE0: 30 00 01 38 5E 06 20 42 4E 45 48 4F 4C 30 00 0F |0..8^. BNEHOL0..|
00000AF0: 38 68 06 20 4C 44 41 5A 45 49 54 48 00 1C 38 72 |8h. LDAZEITH..8r|
00000B00: 06 20 43 4D 50 23 24 30 43 00 29 38 7C 06 20 42 |. CMP#$0C.)8|. B|
00000B10: 4E 45 48 4F 4C 31 00 36 38 86 06 20 4C 44 41 23 |NEHOL1.68.. LDA#|
00000B20: 24 30 30 00 44 38 90 06 20 53 54 41 5A 45 49 54 |$00.D8.. STAZEIT|
00000B30: 48 00 51 38 9A 06 20 42 45 51 48 4F 4C 31 00 5E |H.Q8.. BEQHOL1.^|
00000B40: 38 A4 06 48 4F 4C 30 20 43 4C 43 00 6C 38 AE 06 |8..HOL0 CLC.l8..|
00000B50: 20 4C 44 41 5A 45 49 54 48 00 79 38 B8 06 20 41 | LDAZEITH.y8.. A|
00000B60: 44 43 23 24 30 43 00 87 38 C2 06 20 53 54 41 5A |DC#$0C..8.. STAZ|
00000B70: 45 49 54 48 00 A1 38 CC 06 48 4F 4C 31 20 4C 44 |EITH..8..HOL1 LD|
00000B80: 41 4D 49 4E 55 54 3B 4D 49 4E 55 54 45 4E 00 AF |AMINUT;MINUTEN..|
00000B90: 38 D6 06 20 4A 53 52 57 41 4E 44 45 00 BD 38 E0 |8.. JSRWANDE..8.|
00000BA0: 06 20 53 54 41 5A 45 49 54 4D 00 D4 38 EA 06 20 |. STAZEITM..8.. |
00000BB0: 4C 44 41 53 45 4B 55 4E 3B 53 45 4B 55 4E 44 45 |LDASEKUN;SEKUNDE|
00000BC0: 4E 00 E2 38 F4 06 20 4A 53 52 57 41 4E 44 45 00 |N..8.. JSRWANDE.|
00000BD0: F0 38 FE 06 20 53 54 41 5A 45 49 54 53 00 06 39 |.8.. STAZEITS..9|
00000BE0: 08 07 20 4C 44 41 5A 45 48 4E 54 3B 5A 45 48 4E |.. LDAZEHNT;ZEHN|
00000BF0: 54 45 4C 00 13 39 12 07 20 41 4E 44 23 24 30 46 |TEL..9.. AND#$0F|
00000C00: 00 21 39 1C 07 20 4A 53 52 57 41 4E 44 45 00 2F |.!9.. JSRWANDE./|
00000C10: 39 26 07 20 53 54 41 5A 45 49 54 5A 00 38 39 30 |9&. STAZEITZ.890|
00000C20: 07 20 52 54 53 00 3E 39 3A 07 3B 00 58 39 44 07 |. RTS.>9:.;.X9D.|
00000C30: 3B 2A 2A 2A 20 42 43 44 20 4E 41 43 48 20 48 45 |;*** BCD NACH HE|
00000C40: 58 20 2A 2A 2A 00 5E 39 4E 07 3B 00 6C 39 58 07 |X ***.^9N.;.l9X.|
00000C50: 57 41 4E 44 45 20 54 41 58 00 79 39 62 07 20 41 |WANDE TAX.y9b. A|
00000C60: 4E 44 23 24 30 46 00 82 39 6C 07 20 54 41 59 00 |ND#$0F..9l. TAY.|
00000C70: 8B 39 76 07 20 54 58 41 00 98 39 80 07 20 41 4E |.9v. TXA..9.. AN|
00000C80: 44 23 24 46 30 00 A1 39 8A 07 20 4C 53 52 00 AA |D#$F0..9.. LSR..|
00000C90: 39 94 07 20 4C 53 52 00 B3 39 9E 07 20 4C 53 52 |9.. LSR..9.. LSR|
00000CA0: 00 BC 39 A8 07 20 4C 53 52 00 C5 39 B2 07 20 54 |..9.. LSR..9.. T|
00000CB0: 41 58 00 CE 39 BC 07 20 54 59 41 00 DB 39 C6 07 |AX..9.. TYA..9..|
00000CC0: 57 41 4E 31 20 44 45 58 00 E8 39 D0 07 20 42 4D |WAN1 DEX..9.. BM|
00000CD0: 49 57 41 4E 32 00 F1 39 DA 07 20 43 4C 43 00 FE |IWAN2..9.. CLC..|
00000CE0: 39 E4 07 20 41 44 43 23 24 30 41 00 0B 3A EE 07 |9.. ADC#$0A..:..|
00000CF0: 20 42 4E 45 57 41 4E 31 00 18 3A F8 07 57 41 4E | BNEWAN1..:..WAN|
00000D00: 32 20 52 54 53 00 1E 3A 02 08 3B 00 39 3A 0C 08 |2 RTS..:..;.9:..|
00000D10: 3B 2A 2A 2A 20 5A 45 49 54 20 41 55 53 47 45 42 |;*** ZEIT AUSGEB|
00000D20: 45 4E 20 2A 2A 2A 00 3F 3A 16 08 3B 00 5A 3A 20 |EN ***.?:..;.Z: |
00000D30: 08 4F 55 54 20 4C 44 41 24 30 31 3B 24 30 31 20 |.OUT LDA$01;$01 |
00000D40: 53 49 43 48 45 52 4E 00 63 3A 2A 08 20 50 48 41 |SICHERN.c:*. PHA|
00000D50: 00 80 3A 34 08 20 4C 44 41 23 24 33 33 3B 43 48 |..:4. LDA#$33;CH|
00000D60: 41 52 53 45 54 2D 52 4F 4D 20 45 49 4E 00 8C 3A |ARSET-ROM EIN..:|
00000D70: 3E 08 20 53 54 41 24 30 31 00 A6 3A 48 08 20 4C |>. STA$01..:H. L|
00000D80: 44 59 23 24 34 31 3B 5A 45 49 54 57 45 52 54 20 |DY#$41;ZEITWERT |
00000D90: 55 4E 44 00 C0 3A 52 08 20 4C 44 41 5A 45 49 54 |UND..:R. LDAZEIT|
00000DA0: 48 3B 4B 4F 4F 52 44 49 4E 41 54 45 4E 00 D8 3A |H;KOORDINATEN..:|
00000DB0: 5C 08 20 4A 53 52 4F 55 54 41 3B 55 45 42 45 52 |\. JSROUTA;UEBER|
00000DC0: 47 45 42 45 4E 00 E5 3A 66 08 20 4C 44 59 23 24 |GEBEN..:f. LDY#$|
00000DD0: 38 31 00 F3 3A 70 08 20 4C 44 41 5A 45 49 54 4D |81..:p. LDAZEITM|
00000DE0: 00 00 3B 7A 08 20 4A 53 52 4F 55 54 41 00 0D 3B |..;z. JSROUTA..;|
00000DF0: 84 08 20 4C 44 59 23 24 43 31 00 1B 3B 8E 08 20 |.. LDY#$C1..;.. |
00000E00: 4C 44 41 5A 45 49 54 53 00 28 3B 98 08 20 4A 53 |LDAZEITS.(;.. JS|
00000E10: 52 4F 55 54 41 00 31 3B A2 08 20 50 4C 41 00 3D |ROUTA.1;.. PLA.=|
00000E20: 3B AC 08 20 53 54 41 24 30 31 00 46 3B B6 08 20 |;.. STA$01.F;.. |
00000E30: 52 54 53 00 4C 3B C0 08 3B 00 6E 3B CA 08 4F 55 |RTS.L;..;.n;..OU|
00000E40: 54 41 20 53 54 59 4F 55 54 41 33 2B 31 3B 5A 45 |TA STYOUTA3+1;ZE|
00000E50: 49 54 20 41 55 53 47 45 42 45 4E 00 7A 3B D4 08 |IT AUSGEBEN.z;..|
00000E60: 20 4A 53 52 44 45 5A 00 87 3B DE 08 20 4C 44 41 | JSRDEZ..;.. LDA|
00000E70: 48 45 4C 50 00 94 3B E8 08 20 41 4E 44 23 24 46 |HELP..;.. AND#$F|
00000E80: 30 00 9D 3B F2 08 20 4C 53 52 00 AB 3B FC 08 20 |0..;.. LSR..;.. |
00000E90: 4A 53 52 4F 55 54 41 31 00 BB 3B 06 09 20 49 4E |JSROUTA1..;.. IN|
00000EA0: 43 4F 55 54 41 33 2B 31 00 C8 3B 10 09 20 4C 44 |COUTA3+1..;.. LD|
00000EB0: 41 48 45 4C 50 00 D5 3B 1A 09 20 41 4E 44 23 24 |AHELP..;.. AND#$|
00000EC0: 30 46 00 DE 3B 24 09 20 41 53 4C 00 E7 3B 2E 09 |0F..;$. ASL..;..|
00000ED0: 20 41 53 4C 00 F0 3B 38 09 20 41 53 4C 00 FE 3B | ASL..;8. ASL..;|
00000EE0: 42 09 4F 55 54 41 31 20 54 41 58 00 0B 3C 4C 09 |B.OUTA1 TAX..<L.|
00000EF0: 20 4C 44 59 23 24 30 30 00 20 3C 56 09 4F 55 54 | LDY#$00. <V.OUT|
00000F00: 41 32 20 4C 44 41 24 44 31 38 30 2C 58 00 35 3C |A2 LDA$D180,X.5<|
00000F10: 60 09 4F 55 54 41 33 20 53 54 41 24 30 33 34 30 |`.OUTA3 STA$0340|
00000F20: 2C 59 00 3E 3C 6A 09 20 49 4E 58 00 47 3C 74 09 |,Y.><j. INX.G<t.|
00000F30: 20 49 4E 59 00 50 3C 7E 09 20 49 4E 59 00 59 3C | INY.P<~. INY.Y<|
00000F40: 88 09 20 49 4E 59 00 65 3C 92 09 20 43 50 59 23 |.. INY.e<.. CPY#|
00000F50: 32 34 00 73 3C 9C 09 20 42 43 43 4F 55 54 41 32 |24.s<.. BCCOUTA2|
00000F60: 00 7C 3C A6 09 20 52 54 53 00 82 3C B0 09 3B 00 |.|<.. RTS..<..;.|
00000F70: 9C 3C BA 09 3B 2A 2A 2A 20 48 45 58 20 4E 41 43 |.<..;*** HEX NAC|
00000F80: 48 20 42 43 44 20 2A 2A 2A 00 A2 3C C4 09 3B 00 |H BCD ***..<..;.|
00000F90: AE 3C CE 09 44 45 5A 20 54 41 58 00 BB 3C D8 09 |.<..DEZ TAX..<..|
00000FA0: 20 4C 44 41 23 24 30 30 00 CC 3C E2 09 44 45 5A | LDA#$00..<..DEZ|
00000FB0: 31 20 4C 44 59 23 24 30 30 00 D9 3C EC 09 20 53 |1 LDY#$00..<.. S|
00000FC0: 54 59 48 45 4C 50 00 E6 3C F6 09 44 45 5A 32 20 |TYHELP..<..DEZ2 |
00000FD0: 44 45 58 00 F3 3C 00 0A 20 43 50 58 23 24 46 46 |DEX..<.. CPX#$FF|
00000FE0: 00 00 3D 0A 0A 20 42 45 51 44 45 5A 33 00 0D 3D |..=.. BEQDEZ3..=|
00000FF0: 14 0A 20 49 4E 43 48 45 4C 50 00 1A 3D 1E 0A 20 |.. INCHELP..=.. |
00001000: 4C 44 59 48 45 4C 50 00 27 3D 28 0A 20 43 50 59 |LDYHELP.'=(. CPY|
00001010: 23 24 30 41 00 34 3D 32 0A 20 42 43 43 44 45 5A |#$0A.4=2. BCCDEZ|
00001020: 32 00 3D 3D 3C 0A 20 43 4C 43 00 4A 3D 46 0A 20 |2.==<. CLC.J=F. |
00001030: 41 44 43 23 24 31 30 00 57 3D 50 0A 20 42 4E 45 |ADC#$10.W=P. BNE|
00001040: 44 45 5A 31 00 64 3D 5A 0A 44 45 5A 33 20 43 4C |DEZ1.d=Z.DEZ3 CL|
00001050: 43 00 71 3D 64 0A 20 41 44 43 48 45 4C 50 00 7E |C.q=d. ADCHELP.~|
00001060: 3D 6E 0A 20 53 54 41 48 45 4C 50 00 87 3D 78 0A |=n. STAHELP..=x.|
00001070: 20 52 54 53 00 8D 3D 82 0A 3B 00 A5 3D 8C 0A 3B | RTS..=..;..=..;|
00001080: 2A 2A 2A 20 41 4C 41 52 4D 43 48 45 43 4B 20 2A |*** ALARMCHECK *|
00001090: 2A 2A 00 AB 3D 96 0A 3B 00 BD 3D A0 0A 43 48 45 |**..=..;..=..CHE|
000010A0: 43 4B 20 4C 44 41 41 4C 4D 48 00 C9 3D AA 0A 20 |CK LDAALMH..=.. |
000010B0: 42 4E 45 43 48 31 00 D6 3D B4 0A 20 4C 44 41 41 |BNECH1..=.. LDAA|
000010C0: 4C 4D 4D 00 E3 3D BE 0A 20 42 45 51 54 41 53 30 |LMM..=.. BEQTAS0|
000010D0: 00 F3 3D C8 0A 43 48 31 20 4C 44 58 23 24 30 30 |..=..CH1 LDX#$00|
000010E0: 00 00 3E D2 0A 20 4C 44 59 23 24 30 30 00 12 3E |..>.. LDY#$00..>|
000010F0: DC 0A 43 48 32 20 4C 44 41 43 48 41 52 2C 58 00 |..CH2 LDACHAR,X.|
00001100: 22 3E E6 0A 20 53 54 41 24 30 33 34 30 2C 59 00 |">.. STA$0340,Y.|
00001110: 2B 3E F0 0A 20 49 4E 59 00 34 3E FA 0A 20 49 4E |+>.. INY.4>.. IN|
00001120: 59 00 3D 3E 04 0B 20 49 4E 59 00 46 3E 0E 0B 20 |Y.=>.. INY.F>.. |
00001130: 49 4E 58 00 53 3E 18 0B 20 43 50 58 23 24 30 38 |INX.S>.. CPX#$08|
00001140: 00 5F 3E 22 0B 20 42 4E 45 43 48 32 00 6C 3E 2C |._>". BNECH2.l>,|
00001150: 0B 20 4C 44 41 41 4C 4D 48 00 7A 3E 36 0B 20 43 |. LDAALMH.z>6. C|
00001160: 4D 50 5A 45 49 54 48 00 86 3E 40 0B 20 42 4E 45 |MPZEITH..>@. BNE|
00001170: 43 48 35 00 93 3E 4A 0B 20 4C 44 41 41 4C 4D 4D |CH5..>J. LDAALMM|
00001180: 00 A1 3E 54 0B 20 43 4D 50 5A 45 49 54 4D 00 AD |..>T. CMPZEITM..|
00001190: 3E 5E 0B 20 42 4E 45 43 48 35 00 BA 3E 68 0B 20 |>^. BNECH5..>h. |
000011A0: 4A 53 52 42 45 4C 4C 00 C6 3E 72 0B 43 48 35 20 |JSRBELL..>r.CH5 |
000011B0: 52 54 53 00 CC 3E 7C 0B 3B 00 E3 3E 86 0B 3B 2A |RTS..>|.;..>..;*|
000011C0: 2A 2A 20 41 4C 41 52 4D 20 21 21 21 20 2A 2A 2A |** ALARM !!! ***|
000011D0: 00 E9 3E 90 0B 3B 00 F8 3E 9A 0B 42 45 4C 4C 20 |..>..;..>..BELL |
000011E0: 4C 44 59 23 30 00 0B 3F A4 0B 42 45 4C 31 20 4C |LDY#0..?..BEL1 L|
000011F0: 44 41 54 4F 4E 31 2C 59 00 17 3F AE 0B 20 53 54 |DATON1,Y..?.. ST|
00001200: 41 53 49 44 00 26 3F B8 0B 20 4C 44 41 54 4F 4E |ASID.&?.. LDATON|
00001210: 32 2C 59 00 34 3F C2 0B 20 53 54 41 53 49 44 2B |2,Y.4?.. STASID+|
00001220: 31 00 40 3F CC 0B 20 4C 44 41 23 31 35 00 4F 3F |1.@?.. LDA#15.O?|
00001230: D6 0B 20 53 54 41 53 49 44 2B 32 34 00 5C 3F E0 |.. STASID+24.\?.|
00001240: 0B 20 4C 44 41 23 32 34 30 00 6A 3F EA 0B 20 53 |. LDA#240.j?.. S|
00001250: 54 41 53 49 44 2B 36 00 76 3F F4 0B 20 4C 44 41 |TASID+6.v?.. LDA|
00001260: 23 33 33 00 84 3F FE 0B 20 53 54 41 53 49 44 2B |#33..?.. STASID+|
00001270: 34 00 91 3F 08 0C 20 4C 44 58 23 24 32 30 00 9E |4..?.. LDX#$20..|
00001280: 3F 12 0C 20 53 54 58 48 45 4C 50 00 A9 3F 1C 0C |?.. STXHELP..?..|
00001290: 20 4C 44 58 23 30 00 BA 3F 26 0C 42 45 4C 32 20 | LDX#0..?&.BEL2 |
000012A0: 4A 4D 50 54 41 53 54 00 C7 3F 30 0C 42 45 4C 33 |JMPTAST..?0.BEL3|
000012B0: 20 44 45 58 00 D4 3F 3A 0C 20 42 4E 45 42 45 4C | DEX..?:. BNEBEL|
000012C0: 32 00 E1 3F 44 0C 20 44 45 43 48 45 4C 50 00 EE |2..?D. DECHELP..|
000012D0: 3F 4E 0C 20 42 4E 45 42 45 4C 32 00 F7 3F 58 0C |?N. BNEBEL2..?X.|
000012E0: 20 49 4E 59 00 04 40 62 0C 20 43 50 59 23 24 30 | INY..@b. CPY#$0|
000012F0: 32 00 11 40 6C 0C 20 42 4E 45 42 45 4C 31 00 1E |2..@l. BNEBEL1..|
00001300: 40 76 0C 20 4A 4D 50 42 45 4C 4C 00 24 40 80 0C |@v. JMPBELL.$@..|
00001310: 3B 00 4A 40 8A 0C 3B 2A 2A 2A 20 54 41 53 54 41 |;.J@..;*** TASTA|
00001320: 54 55 52 41 42 46 52 41 47 45 20 42 45 49 20 41 |TURABFRAGE BEI A|
00001330: 4C 41 52 4D 20 2A 2A 00 50 40 94 0C 3B 00 62 40 |LARM **.P@..;.b@|
00001340: 9E 0C 54 41 53 54 20 4C 44 41 24 44 43 30 30 00 |..TAST LDA$DC00.|
00001350: 6F 40 A8 0C 20 41 4E 44 23 24 37 46 00 7D 40 B2 |o@.. AND#$7F.}@.|
00001360: 0C 20 53 54 41 24 44 43 30 30 00 8B 40 BC 0C 20 |. STA$DC00..@.. |
00001370: 4C 44 41 24 44 43 30 31 00 94 40 C6 0C 20 43 4C |LDA$DC01..@.. CL|
00001380: 43 00 9D 40 D0 0C 20 4C 53 52 00 A6 40 DA 0C 20 |C..@.. LSR..@.. |
00001390: 4C 53 52 00 AF 40 E4 0C 20 4C 53 52 00 BC 40 EE |LSR..@.. LSR..@.|
000013A0: 0C 20 42 43 53 42 45 4C 33 00 CD 40 F8 0C 54 41 |. BCSBEL3..@..TA|
000013B0: 53 30 20 4C 44 41 23 24 30 30 00 DA 40 02 0D 20 |S0 LDA#$00..@.. |
000013C0: 53 54 41 41 4C 4D 48 00 E7 40 0C 0D 20 53 54 41 |STAALMH..@.. STA|
000013D0: 41 4C 4D 4D 00 F5 40 16 0D 20 53 54 41 53 49 44 |ALMM..@.. STASID|
000013E0: 2B 34 00 04 41 20 0D 20 53 54 41 53 49 44 2B 32 |+4..A . STASID+2|
000013F0: 34 00 0D 41 2A 0D 20 54 41 58 00 21 41 34 0D 54 |4..A*. TAX.!A4.T|
00001400: 41 53 31 20 53 54 41 24 30 33 34 30 2C 58 00 2A |AS1 STA$0340,X.*|
00001410: 41 3E 0D 20 49 4E 58 00 33 41 48 0D 20 49 4E 58 |A>. INX.3AH. INX|
00001420: 00 3C 41 52 0D 20 49 4E 58 00 48 41 5C 0D 20 43 |.<AR. INX.HA\. C|
00001430: 50 58 23 32 34 00 55 41 66 0D 20 42 43 43 54 41 |PX#24.UAf. BCCTA|
00001440: 53 31 00 5E 41 70 0D 20 52 54 53 00 64 41 7A 0D |S1.^Ap. RTS.dAz.|
00001450: 3B 00 80 41 84 0D 3B 2A 2A 2A 20 41 4C 41 52 4D |;..A..;*** ALARM|
00001460: 20 45 49 4E 47 45 42 45 4E 20 2A 2A 2A 00 86 41 | EINGEBEN ***..A|
00001470: 8E 0D 3B 00 99 41 98 0D 41 4C 41 52 4D 20 4A 53 |..;..A..ALARM JS|
00001480: 52 24 45 32 30 30 00 A5 41 A2 0D 20 43 50 58 23 |R$E200..A.. CPX#|
00001490: 32 34 00 B3 41 AC 0D 20 42 43 53 45 52 52 4F 52 |24..A.. BCSERROR|
000014A0: 00 C0 41 B6 0D 20 53 54 58 41 4C 4D 48 00 CE 41 |..A.. STXALMH..A|
000014B0: C0 0D 20 4A 53 52 24 45 32 30 30 00 DA 41 CA 0D |.. JSR$E200..A..|
000014C0: 20 43 50 58 23 36 30 00 E8 41 D4 0D 20 42 43 53 | CPX#60..A.. BCS|
000014D0: 45 52 52 4F 52 00 F5 41 DE 0D 20 53 54 58 41 4C |ERROR..A.. STXAL|
000014E0: 4D 4D 00 FE 41 E8 0D 20 52 54 53 00 04 42 F2 0D |MM..A.. RTS..B..|
000014F0: 3B 00 1D 42 FC 0D 3B 2A 2A 2A 20 42 59 54 45 53 |;..B..;*** BYTES|
00001500: 20 48 4F 4C 45 4E 20 2A 2A 2A 00 23 42 06 0E 3B | HOLEN ***.#B..;|
00001510: 00 41 42 10 0E 47 45 54 20 4A 53 52 24 45 32 30 |.AB..GET JSR$E20|
00001520: 30 3B 53 54 55 4E 44 45 20 48 4F 4C 45 4E 00 55 |0;STUNDE HOLEN.U|
00001530: 42 1A 0E 20 43 50 58 23 24 31 38 3B 58 3E 32 34 |B.. CPX#$18;X>24|
00001540: 20 3F 00 6E 42 24 0E 20 42 43 53 45 52 52 4F 52 | ?.nB$. BCSERROR|
00001550: 3B 4A 41 2D 3E 46 45 48 4C 45 52 00 77 42 2E 0E |;JA->FEHLER.wB..|
00001560: 20 54 58 41 00 84 42 38 0E 20 43 4D 50 23 24 30 | TXA..B8. CMP#$0|
00001570: 41 00 91 42 42 0E 20 42 43 43 47 45 54 31 00 9E |A..BB. BCCGET1..|
00001580: 42 4C 0E 20 43 4D 50 23 24 30 43 00 AB 42 56 0E |BL. CMP#$0C..BV.|
00001590: 20 42 43 53 47 45 54 32 00 B4 42 60 0E 20 53 45 | BCSGET2..B`. SE|
000015A0: 43 00 C1 42 6A 0E 20 53 42 43 23 24 30 41 00 CE |C..Bj. SBC#$0A..|
000015B0: 42 74 0E 20 4F 52 41 23 24 31 30 00 E0 42 7E 0E |Bt. ORA#$10..B~.|
000015C0: 47 45 54 31 20 53 54 41 54 49 4D 45 48 00 ED 42 |GET1 STATIMEH..B|
000015D0: 88 0E 20 4A 4D 50 47 45 54 34 00 FA 42 92 0E 47 |.. JMPGET4..B..G|
000015E0: 45 54 32 20 53 45 43 00 07 43 9C 0E 20 53 42 43 |ET2 SEC..C.. SBC|
000015F0: 23 24 30 43 00 14 43 A6 0E 20 43 4D 50 23 24 30 |#$0C..C.. CMP#$0|
00001600: 41 00 21 43 B0 0E 20 42 43 43 47 45 54 33 00 2A |A.!C.. BCCGET3.*|
00001610: 43 BA 0E 20 53 45 43 00 37 43 C4 0E 20 53 42 43 |C.. SEC.7C.. SBC|
00001620: 23 24 30 41 00 44 43 CE 0E 20 4F 52 41 23 24 31 |#$0A.DC.. ORA#$1|
00001630: 30 00 55 43 D8 0E 47 45 54 33 20 4F 52 41 23 24 |0.UC..GET3 ORA#$|
00001640: 38 30 00 63 43 E2 0E 20 53 54 41 54 49 4D 45 48 |80.cC.. STATIMEH|
00001650: 00 82 43 EC 0E 47 45 54 34 20 4A 53 52 24 45 32 |..C..GET4 JSR$E2|
00001660: 30 30 3B 4D 49 4E 55 54 45 20 48 4F 4C 45 4E 00 |00;MINUTE HOLEN.|
00001670: 96 43 F6 0E 20 43 50 58 23 36 30 3B 58 3D 3E 36 |.C.. CPX#60;X=>6|
00001680: 30 20 3F 00 AF 43 00 0F 20 42 43 53 45 52 52 4F |0 ?..C.. BCSERRO|
00001690: 52 3B 4A 41 2D 3E 46 45 48 4C 45 52 00 BA 43 0A |R;JA->FEHLER..C.|
000016A0: 0F 20 4C 44 59 23 30 00 C3 43 14 0F 20 54 58 41 |. LDY#0..C.. TXA|
000016B0: 00 D4 43 1E 0F 47 45 54 35 20 43 4D 50 23 24 30 |..C..GET5 CMP#$0|
000016C0: 41 00 E1 43 28 0F 20 42 43 43 47 45 54 36 00 EA |A..C(. BCCGET6..|
000016D0: 43 32 0F 20 53 45 43 00 F7 43 3C 0F 20 53 42 43 |C2. SEC..C<. SBC|
000016E0: 23 24 30 41 00 00 44 46 0F 20 49 4E 59 00 0D 44 |#$0A..DF. INY..D|
000016F0: 50 0F 20 42 4E 45 47 45 54 35 00 1F 44 5A 0F 47 |P. BNEGET5..DZ.G|
00001700: 45 54 36 20 53 54 41 54 49 4D 45 4D 00 28 44 64 |ET6 STATIMEM.(Dd|
00001710: 0F 20 54 59 41 00 31 44 6E 0F 20 41 53 4C 00 3A |. TYA.1Dn. ASL.:|
00001720: 44 78 0F 20 41 53 4C 00 43 44 82 0F 20 41 53 4C |Dx. ASL.CD.. ASL|
00001730: 00 4C 44 8C 0F 20 41 53 4C 00 5A 44 96 0F 20 4F |.LD.. ASL.ZD.. O|
00001740: 52 41 54 49 4D 45 4D 00 68 44 A0 0F 20 53 54 41 |RATIMEM.hD.. STA|
00001750: 54 49 4D 45 4D 00 71 44 AA 0F 20 52 54 53 00 84 |TIMEM.qD.. RTS..|
00001760: 44 B4 0F 45 52 52 4F 52 20 4A 4D 50 24 42 32 34 |D..ERROR JMP$B24|
00001770: 38 00 8A 44 BE 0F 3B 00 A5 44 C8 0F 3B 2A 2A 2A |8..D..;..D..;***|
00001780: 20 48 49 4C 46 53 53 50 45 49 43 48 45 52 20 2A | HILFSSPEICHER *|
00001790: 2A 2A 00 AB 44 D2 0F 3B 00 B9 44 DC 0F 48 45 4C |**..D..;..D..HEL|
000017A0: 50 20 2E 42 59 30 00 C8 44 E6 0F 54 49 4D 45 48 |P .BY0..D..TIMEH|
000017B0: 20 2E 42 59 30 00 D7 44 F0 0F 54 49 4D 45 4D 20 | .BY0..D..TIMEM |
000017C0: 2E 42 59 30 00 E5 44 FA 0F 41 4C 4D 48 20 2E 42 |.BY0..D..ALMH .B|
000017D0: 59 30 00 F3 44 04 10 41 4C 4D 4D 20 2E 42 59 30 |Y0..D..ALMM .BY0|
000017E0: 00 1A 45 0E 10 53 50 52 20 2E 42 59 24 31 30 2C |..E..SPR .BY$10,|
000017F0: 24 32 30 2C 24 32 38 2C 24 32 30 2C 24 34 30 2C |$20,$28,$20,$40,|
00001800: 24 32 30 2C 24 45 30 00 46 45 18 10 43 48 41 52 |$20,$E0.FE..CHAR|
00001810: 20 2E 42 59 24 31 38 2C 24 31 38 2C 24 33 43 2C | .BY$18,$18,$3C,|
00001820: 24 33 43 2C 24 33 43 2C 24 37 45 2C 24 38 31 2C |$3C,$3C,$7E,$81,|
00001830: 24 37 45 00 5A 45 22 10 54 4F 4E 31 20 2E 42 59 |$7E.ZE".TON1 .BY|
00001840: 31 38 30 2C 31 35 38 00 6B 45 2C 10 54 4F 4E 32 |180,158.kE,.TON2|
00001850: 20 2E 42 59 38 2C 31 31 00 00 00 | .BY8,11... |
.-.-..;.@-..;***************************
*****.F-..;* BORDERUHR - DANTE'93
*..-(.;* ====================
*..-2.;* ZEITEINGABE:SYS 52480,ST,MI *.
X-<.;* ALARMEINGABE:SYS 52483,ST,MI *..-
F.;* ALARM LOESCHEN:SYS 52483,0,0 *.$.P.
;* ALARM STOP:<CTRL> *.J.Z.;*
*******************************.P.D.;.^.
N..BA $CD00.D.X.;.{...;*** VARIABLEN ***
.....;......EQ RAND=$D020... ..EQ BILD=$
D021......EQ SID=$D400.M....EQ ZEHNT=$DD
08......EQ SEKUN=$DD09...H..EQ MINUT=$DD
0A../R..EQ STUND=$DD0B../...EQ ICR=$DD0D
.-/...EQ CRA=$DD0E.?/...EQ CRB=$DD0F.E/.
.;.R/.. JMPINIT.X/..;.F/.. JMPALARM.L/".
;.{/,.COLOR .BY7../6.ZEITH .BY0../@.ZEIT
M .BY0../J.ZEITS .BY0../T.ZEITZ .BY0../^
.;../H..TX "BORDERUHR - DANTE '93"../R.;
..0|.;*** INITIALISIERUNG ***..0..;.!0..
INIT JSRGET;ZEIT HOLEN.=0.. LDACRA;ECHTZ
EITUHRFRE-.Z0.. ORA#$80;QUENZ AUF 50 HZ.
M0.. STACRA;SETZEN..0.. LDACRB;UHRZEIT S
ETZEN..0B. AND#$7F..0L. STACRB..0V. LDAT
IMEH;STUNDE HOLEN.J0.. STASTUND..0.. LDA
TIMEM;MINUTE HOLEN..0.. STAMINUT..1.. LD
A#0;SEKUNDEN UND.'1.. STASEKUN;ZEHNTEL A
UF 0.D1.. STAZEHNT;SETZEN ->START.M1.. T
AX.O1&.IN1 STA$0340,X;SPRITESPEICHER..10
. INX;LOESCHEN..1:. CPX#$C0..1D. BCCIN1.
1N.;..1X. SEI;IRQ INIT. FUER.W1B. LDX#<
(IRQ);ZEITANZEIGE IM..1L. LDA#>(IRQ);RAN
D..1V. STX$0314..2.. STA$0315..2.. LDA#$
81.#2.. STA$D01A.12.. LDA$D011.>2.. AND#
$7F.L2.. STA$D011.Y2.. LDA#$F9.G2F. STA$
D012.M2P.;.Y2Z. LDA$01..2.. STAHELP..2..
LDA#$33..2.. STA$01..2.. LDX#$00..2.. L
DY#$00.L2..IR0 LDA$D1D0,X..2 . STA$0380,
Y..2*. STA$03C0,Y..24. INY..2>. INY..3H.
INY..3R. INX..3\. CPX#$08.)3F. BCCIR0.6
3P. LDAHELP.B3Z. STA$01.K3.. CLI.T3.. RT
S.Z3..;.W3..IRQ LDA$D019;IRQ-REQUEST..3.
. STA$D019;LOESCHEN..3.. BMIIR1;RASTER-I
RQ ?.E3.. LDA$DC0D;NEIN->SYSTEMIRQ.N3J.
CLI..3T. JMP$EA31..3..;..3..;*** IRQ-ROU
TINE ***..4..;..4..IR1 LDA$D011;RAND AUS
.(4.. AND#$F7.64.. STA$D011.<4..;.W4$. L
DA$D015;VIC-REGISTER.Q4.. ORA#$E0;FUER B
ORDER-..48. STA$D015;SPRITES SETZEN..4B.
LDA$D017..4L. AND#$1F..4V. STA$D017.E4`
. LDA$D01B.R4J. AND#$1F..4T. STA$D01B..4
~. LDA$D01C..4.. AND#$1F..5.. STA$D01C..
5.. LDA$D01D.$5.. AND#$1F.25.. STA$D01D.
85..;.U5D. LDX#$0D;SPRITE-SPEICHER.L5N.I
R2 TXA;UND -FARBE..5X. STA$07F0,X;FESTLE
GEN..5.. LDACOLOR..5.. STA$D01F,X..5.. I
NX..5.. CPX#$10.F5.. BNEIR2..5..;
..5.. LDX#$00;SPRITEKOOR
DIN...6(.IR3 LDASPR,X;SETZEN.'62. STA$D0
0A,X.06<. INX.=6F. CPX#$07.I6P. BNEIR3.O
6Z.;.F6D. JSRHOL;ZEIT HOLEN.L6N.;..6X. J
SROUT;ZEIT AUSGEBEN..6..;..6.. JSRCHECK;
ALARM ?..6..;.I6 .END LDA$D011;WARTEN,BI
S RAS-..6.. AND#$80;TERZEILE 0 ER-..6..
BNEEND;REICHT IST..7.. LDABILD..7H. STAR
AND.-7R. LDA$D011;RAND EIN.:7.. ORA#$08.
H7.. STA$D011.B7.. JMP$EA81;UND SCHLUSS.
H7..;..7..;*** ZEIT HOLEN ***..7..;..7..
HOL LDASTUND;STUNDE HOLEN..7". STAHELP..
7,. AND#$1F.L76. JSRWANDE.Z7@. STAZEITH.
.7J. LDAHELP..7T. AND#$80..8^. BNEHOL0..
8H. LDAZEITH..8R. CMP#$0C.)8|. BNEHOL1.6
8.. LDA#$00.D8.. STAZEITH.Q8.. BEQHOL1.^
8..HOL0 CLC.L8.. LDAZEITH.Y8.. ADC#$0C..
8B. STAZEITH..8L.HOL1 LDAMINUT;MINUTEN..
8V. JSRWANDE..8.. STAZEITM.T8.. LDASEKUN
;SEKUNDEN..8.. JSRWANDE..8.. STAZEITS..9
.. LDAZEHNT;ZEHNTEL..9.. AND#$0F.!9.. JS
RWANDE./9&. STAZEITZ.890. RTS.>9:.;.X9D.
;*** BCD NACH HEX ***.^9N.;.L9X.WANDE TA
X.Y9B. AND#$0F..9L. TAY..9V. TXA..9.. AN
D#$F0..9.. LSR..9.. LSR..9.. LSR..9.. LS
R.E9.. TAX.N9.. TYA..9F.WAN1 DEX..9P. BM
IWAN2..9Z. CLC..9.. ADC#$0A..:.. BNEWAN1
..:..WAN2 RTS..:..;.9:..;*** ZEIT AUSGEB
EN ***.?:..;.Z: .OUT LDA$01;$01 SICHERN.
C:*. PHA..:4. LDA#$33;CHARSET-ROM EIN..:
>. STA$01..:H. LDY#$41;ZEITWERT UND..:R.
LDAZEITH;KOORDINATEN.X:\. JSROUTA;UEBER
GEBEN..:F. LDY#$81..:P. LDAZEITM..;Z. JS
ROUTA..;.. LDY#$C1..;.. LDAZEITS.(;.. JS
ROUTA.1;.. PLA.=;.. STA$01.F;.. RTS.L;..
;.N;J.OUTA STYOUTA3+1;ZEIT AUSGEBEN.Z;T.
JSRDEZ..;.. LDAHELP..;.. AND#$F0..;.. L
SR..;.. JSROUTA1..;.. INCOUTA3+1.H;.. LD
AHELP.U;.. AND#$0F..;$. ASL..;.. ASL..;8
. ASL..;B.OUTA1 TAX..<L. LDY#$00. <V.OUT
A2 LDA$D180,X.5<`.OUTA3 STA$0340,Y.><J.
INX.G<T. INY.P<~. INY.Y<.. INY.E<.. CPY#
24.S<.. BCCOUTA2.|<.. RTS..<..;..<..;***
HEX NACH BCD ***..<D.;..<N.DEZ TAX..<X.
LDA#$00.L<..DEZ1 LDY#$00.Y<.. STYHELP..
<..DEZ2 DEX..<.. CPX#$FF..=.. BEQDEZ3..=
.. INCHELP..=.. LDYHELP.'=(. CPY#$0A.4=2
. BCCDEZ2.==<. CLC.J=F. ADC#$10.W=P. BNE
DEZ1.D=Z.DEZ3 CLC.Q=D. ADCHELP.~=N. STAH
ELP..=X. RTS..=..;..=..;*** ALARMCHECK *
**..=..;..= .CHECK LDAALMH.I=.. BNECH1.V
=.. LDAALMM..=.. BEQTAS0..=H.CH1 LDX#$00
..>R. LDY#$00..>..CH2 LDACHAR,X.">.. STA
$0340,Y.+>.. INY.4>.. INY.=>.. INY.F>..
INX.S>.. CPX#$08._>". BNECH2.L>,. LDAALM
H.Z>6. CMPZEITH..>@. BNECH5..>J. LDAALMM
..>T. CMPZEITM..>^. BNECH5..>H. JSRBELL.
F>R.CH5 RTS.L>|.;..>..;*** ALARM !!! ***
..>..;..>..BELL LDY#0..?..BEL1 LDATON1,Y
..?.. STASID.&?.. LDATON2,Y.4?B. STASID+
1.@?L. LDA#15.O?V. STASID+24.\?.. LDA#24
0.J?.. STASID+6.V?.. LDA#33..?.. STASID+
4..?.. LDX#$20..?.. STXHELP..?.. LDX#0..
?&.BEL2 JMPTAST.G?0.BEL3 DEX.T?:. BNEBEL
2..?D. DECHELP..?N. BNEBEL2..?X. INY..@B
. CPY#$02..@L. BNEBEL1..@V. JMPBELL.$@..
;.J@..;*** TASTATURABFRAGE BEI ALARM **.
P@..;.B@..TAST LDA$DC00.O@.. AND#$7F.}@.
. STA$DC00..@.. LDA$DC01..@F. CLC..@P. L
SR..@Z. LSR..@.. LSR..@.. BCSBEL3.M@..TA
S0 LDA#$00.Z@.. STAALMH..@.. STAALMM..@.
. STASID+4..A . STASID+24..A*. TAX.!A4.T
AS1 STA$0340,X.*A>. INX.3AH. INX.<AR. IN
X.HA\. CPX#24.UAF. BCCTAS1.^AP. RTS.DAZ.
;..A..;*** ALARM EINGEBEN ***..A..;..A..
ALARM JSR$E200..A.. CPX#24..A.. BCSERROR
..A.. STXALMH.NA.. JSR$E200.ZAJ. CPX#60.
.AT. BCSERROR..A.. STXALMM..A.. RTS..B..
;..B..;*** BYTES HOLEN ***.#B..;.AB..GET
JSR$E200;STUNDE HOLEN.UB.. CPX#$18;X>24
?.NB$. BCSERROR;JA->FEHLER.WB.. TXA..B8
. CMP#$0A..BB. BCCGET1..BL. CMP#$0C..BV.
BCSGET2..B`. SEC.ABJ. SBC#$0A.NBT. ORA#
$10..B~.GET1 STATIMEH..B.. JMPGET4..B..G
ET2 SEC..C.. SBC#$0C..C.. CMP#$0A.!C.. B
CCGET3.*C.. SEC.7CD. SBC#$0A.DCN. ORA#$1
0.UCX.GET3 ORA#$80.CC.. STATIMEH..C..GET
4 JSR$E200;MINUTE HOLEN..C.. CPX#60;X=>6
0 ?..C.. BCSERROR;JA->FEHLER..C.. LDY#0.
CC.. TXA.TC..GET5 CMP#$0A..C(. BCCGET6..
C2. SEC..C<. SBC#$0A..DF. INY..DP. BNEGE
T5..DZ.GET6 STATIMEM.(DD. TYA.1DN. ASL.:
DX. ASL.CD.. ASL.LD.. ASL.ZD.. ORATIMEM.
HD . STATIMEM.QD.. RTS..D..ERROR JMP$B24
8..D..;..DH.;*** HILFSSPEICHER ***..DR.;
..D..HELP .BY0.HD..TIMEH .BY0.WD..TIMEM
.BY0..D..ALMH .BY0..D..ALMM .BY0..E..SPR
.BY$10,$20,$28,$20,$40,$20,$E0.FE..CHAR
.BY$18,$18,$3C,$3C,$3C,$7E,$81,$7E.ZE".
TON1 .BY180,158.KE,.TON2 .BY8,11...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL