_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

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 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL