OP.AUTO-SAVE
FILE INFORMATION
FILENAME(S): OP.AUTO-SAVE
FILE TYPE(S): PRG
FILE SIZE: 3.4K
FIRST SEEN: 2025-11-30 01:12:41
APPEARS ON: 2 disk(s)
FILE HASH
c0c159eadbd33549b0569669406b8c7e29402a5131cec0d8fbe9d629f1413e16
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 64 ER SONDERH 67 | OP.AUTO-SAVE | PRG | C64er | 16 | 0 | DOWNLOAD FILE |
| 64 ER SONDERH 67 | OP.AUTO-SAVE | PRG | DuncanTwain | 16 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0C 08 0A 00 9E 33 36 38 36 34 00 18 08 14 |.......36864....| 00000010: 00 2E 4F 50 54 20 4F 4F 00 25 08 1E 00 AC B2 20 |..OPT OO.%..... | 00000020: 24 43 38 30 30 00 34 08 64 00 43 49 41 20 B2 24 |$C800.4.d.CIA .$| 00000030: 44 44 30 30 00 44 08 66 00 44 44 52 41 20 B2 43 |DD00.D.f.DDRA .C| 00000040: 49 41 AA 32 00 54 08 68 00 44 44 52 42 20 B2 43 |IA.2.T.h.DDRB .C| 00000050: 49 41 AA 33 00 62 08 6A 00 50 52 54 41 20 B2 43 |IA.3.b.j.PRTA .C| 00000060: 49 41 00 72 08 6C 00 50 52 54 42 20 B2 43 49 41 |IA.r.l.PRTB .CIA| 00000070: AA 31 00 84 08 6E 00 45 52 52 4F 55 54 20 B2 24 |.1...n.ERROUT .$| 00000080: 41 34 34 35 00 94 08 70 00 45 52 52 50 54 52 20 |A445...p.ERRPTR | 00000090: B2 24 32 32 00 A3 08 74 00 4E 41 4D 45 4C 20 B2 |.$22...t.NAMEL .| 000000A0: 24 42 37 00 B2 08 76 00 4E 41 4D 45 50 20 B2 24 |$B7...v.NAMEP .$| 000000B0: 42 42 00 C4 08 78 00 53 54 52 4F 55 54 20 B2 24 |BB...x.STROUT .$| 000000C0: 41 42 31 45 00 D4 08 7A 00 4F 4C 44 94 20 B2 24 |AB1E...z.OLD. .$| 000000D0: 46 35 45 44 00 E1 08 7C 00 94 56 20 B2 24 33 33 |F5ED...|..V .$33| 000000E0: 32 00 ED 08 7E 00 47 41 20 B2 24 42 41 00 FF 08 |2...~.GA .$BA...| 000000F0: 80 00 53 45 54 50 41 52 20 B2 24 46 46 42 41 00 |..SETPAR .$FFBA.| 00000100: 0C 09 82 00 9F 20 B2 24 46 46 43 30 00 17 09 84 |..... .$FFC0....| 00000110: 00 A0 20 B2 9F AA 33 00 26 09 86 00 52 44 31 20 |.. ...3.&...RD1 | 00000120: B2 35 33 32 36 36 00 33 09 88 00 52 44 32 20 B2 |.53266.3...RD2 .| 00000130: 31 36 32 00 41 09 8A 00 A1 58 20 B2 24 42 37 46 |162.A....X .$B7F| 00000140: 31 00 4D 09 F4 01 4A 4D 50 20 53 57 91 00 5B 09 |1.M...JMP SW..[.| 00000150: F6 01 4A 4D 50 20 53 57 4F 46 46 00 7D 09 58 02 |..JMP SWOFF.}.X.| 00000160: 45 52 52 54 20 2E C6 20 22 55 4E 41 42 4C 45 20 |ERRT .. "UNABLE | 00000170: 54 4F 20 41 43 43 45 53 53 20 52 54 C3 00 AC 09 |TO ACCESS RT....| 00000180: 62 02 48 49 20 2E C6 20 22 11 41 55 54 4F 2D 53 |b.HI .. ".AUTO-S| 00000190: 41 56 45 20 45 49 4E 47 45 53 43 48 41 4C 54 45 |AVE EINGESCHALTE| 000001A0: 54 22 3A 2E 42 59 54 20 31 33 2C 30 00 DB 09 6C |T":.BYT 13,0...l| 000001B0: 02 54 53 20 2E C6 20 22 11 41 55 54 4F 2D 53 41 |.TS .. ".AUTO-SA| 000001C0: 56 45 20 41 42 47 45 53 43 48 41 4C 54 45 54 20 |VE ABGESCHALTET | 000001D0: 22 3A 2E 42 59 54 20 31 33 2C 30 00 F7 09 76 02 |":.BYT 13,0...v.| 000001E0: 46 49 C3 20 2E 57 B0 20 30 2C 30 2C 30 2C 30 2C |FI. .W. 0,0,0,0,| 000001F0: 30 2C 30 2C 30 2C 30 00 04 0A 78 02 2E C6 20 22 |0,0,0,0...x... "| 00000200: 2C 55 2C 57 00 11 0A C2 02 42 55 43 31 20 42 52 |,U,W.....BUC1 BR| 00000210: 4B 00 1E 0A C4 02 42 55 43 32 20 42 52 4B 00 2A |K.....BUC2 BRK.*| 00000220: 0A C6 02 41 52 54 20 42 52 4B 00 37 0A CC 02 58 |...ART BRK.7...X| 00000230: 4D 45 4D 20 42 52 4B 00 44 0A CE 02 59 4D 45 4D |MEM BRK.D...YMEM| 00000240: 20 42 52 4B 00 51 0A D0 02 44 8B 46 45 20 42 52 | BRK.Q...D.FE BR| 00000250: 4B 00 61 0A D2 02 53 44 20 2E 42 59 54 20 31 32 |K.a...SD .BYT 12| 00000260: 33 00 8F 0A 20 03 41 54 31 20 2E 42 59 54 20 32 |3... .AT1 .BYT 2| 00000270: 30 2C 30 2C 31 33 2C 31 34 31 2C 31 34 38 2C 33 |0,0,13,141,148,3| 00000280: 34 2C 31 36 30 3A 2E C6 20 22 2A 3D 2C 3F 3A 00 |4,160:.. "*=,?:.| 00000290: 9A 0A 21 03 45 54 31 20 B2 AC 00 B4 0A 4C 04 4D |..!.ET1 .....L.M| 000002A0: 41 4B 45 4E 20 4C 44 59 20 23 31 35 3A 4C 44 41 |AKEN LDY #15:LDA| 000002B0: 20 23 33 32 00 D4 0A 4E 04 9C 4E 20 53 54 41 20 | #32...N..N STA | 000002C0: 46 49 C3 2C 59 3A 44 45 59 3A 42 50 4C 20 9C 4E |FI.,Y:DEY:BPL .N| 000002D0: 3A 49 4E 59 00 1C 0B 50 04 43 4F 50 4E 20 43 50 |:INY...P.COPN CP| 000002E0: 59 20 4E 41 4D 45 4C 3A 42 43 53 20 46 55 4C 4E |Y NAMEL:BCS FULN| 000002F0: 3A 4C 44 41 20 28 4E 41 4D 45 50 29 2C 59 3A 53 |:LDA (NAMEP),Y:S| 00000300: 54 41 20 46 49 C3 2C 59 3A 49 4E 59 3A 43 50 59 |TA FI.,Y:INY:CPY| 00000310: 20 23 34 3A 42 43 43 20 43 4F 50 4E 00 2C 0B 52 | #4:BCC COPN.,.R| 00000320: 04 46 55 4C 4E 20 4C 44 59 20 23 35 00 6C 0B 54 |.FULN LDY #5.l.T| 00000330: 04 4C 44 58 20 23 37 3A 4A 53 52 20 44 41 53 3A |.LDX #7:JSR DAS:| 00000340: 4C 44 58 20 23 36 3A 4A 53 52 20 44 41 53 3A 4C |LDX #6:JSR DAS:L| 00000350: 44 58 20 23 39 3A 4A 53 52 20 44 41 53 3A 4C 44 |DX #9:JSR DAS:LD| 00000360: 58 20 23 38 3A 4A 53 52 20 44 41 53 00 94 0B 56 |X #8:JSR DAS...V| 00000370: 04 4C 44 58 20 23 31 31 3A 4A 53 52 20 44 41 53 |.LDX #11:JSR DAS| 00000380: 3A 4C 44 58 20 23 31 30 3A 4A 53 52 20 44 41 53 |:LDX #10:JSR DAS| 00000390: 3A 49 4E 59 00 D4 0B 58 04 4C 44 58 20 23 35 3A |:INY...X.LDX #5:| 000003A0: 4A 53 52 20 44 41 53 3A 4C 44 58 20 23 34 3A 4A |JSR DAS:LDX #4:J| 000003B0: 53 52 20 44 41 53 3A 4C 44 58 20 23 33 3A 4A 53 |SR DAS:LDX #3:JS| 000003C0: 52 20 44 41 53 3A 4C 44 58 20 23 32 3A 4A 53 52 |R DAS:LDX #2:JSR| 000003D0: 20 44 41 53 00 14 0C 5A 04 4C 44 41 20 23 32 30 | DAS...Z.LDA #20| 000003E0: 3A 53 54 41 20 4E 41 4D 45 4C 3A 4C 44 41 20 23 |:STA NAMEL:LDA #| 000003F0: B3 46 49 C3 3A 4C 44 59 20 23 B1 46 49 C3 3A 53 |.FI.:LDY #.FI.:S| 00000400: 54 41 20 4E 41 4D 45 50 3A 53 54 59 20 4E 41 4D |TA NAMEP:STY NAM| 00000410: 45 50 AA 31 00 4D 0C 5C 04 4C 44 58 20 47 41 3A |EP.1.M.\.LDX GA:| 00000420: 4C 44 41 20 23 35 37 3A 4C 44 59 20 23 38 3A 4A |LDA #57:LDY #8:J| 00000430: 53 52 20 53 45 54 50 41 52 3A 4A 53 52 20 9F 3A |SR SETPAR:JSR .:| 00000440: 4C 44 41 20 23 35 37 3A 4A 53 52 20 A0 00 69 0C |LDA #57:JSR ..i.| 00000450: 5D 04 4C 44 41 20 44 8B 46 45 3A 42 4E 45 20 53 |].LDA D.FE:BNE S| 00000460: 54 52 49 43 48 3A 52 54 53 00 85 0C 5E 04 53 54 |TRICH:RTS...^.ST| 00000470: 52 49 43 48 20 4C 44 41 20 23 22 2D 22 3A 4C 44 |RICH LDA #"-":LD| 00000480: 58 20 23 31 33 00 A3 0C 60 04 53 50 49 20 53 54 |X #13...`.SPI ST| 00000490: 41 20 46 49 C3 2C 58 3A 44 45 58 3A 42 50 4C 20 |A FI.,X:DEX:BPL | 000004A0: 53 50 49 00 DD 0C 62 04 4A 53 52 20 BB 3A 53 54 |SPI...b.JSR .:ST| 000004B0: 41 20 46 49 C3 AA 31 34 3A 4A 53 52 20 BB 3A 53 |A FI..14:JSR .:S| 000004C0: 54 41 20 46 49 C3 AA 31 35 3A 4A 53 52 20 9F 3A |TA FI..15:JSR .:| 000004D0: 4C 44 41 20 23 35 37 3A 4A 4D 50 20 A0 00 1A 0D |LDA #57:JMP ....| 000004E0: 7E 04 BB 20 4C 44 41 20 52 44 31 3A 41 44 43 20 |~.. LDA RD1:ADC | 000004F0: 53 44 3A 45 B0 20 52 44 32 3A 41 53 4C 3A 41 44 |SD:E. RD2:ASL:AD| 00000500: 43 20 23 30 3A 53 54 41 20 53 44 3A 4C 44 58 20 |C #0:STA SD:LDX | 00000510: 23 45 54 31 AB 41 54 31 AB 31 00 44 0D 80 04 41 |#ET1.AT1.1.D...A| 00000520: 54 54 4E 20 43 4D 50 20 41 54 31 2C 58 3A 42 45 |TTN CMP AT1,X:BE| 00000530: 51 20 BB 3A 44 45 58 3A 42 50 4C 20 41 54 54 4E |Q .:DEX:BPL ATTN| 00000540: 3A 52 54 53 00 6B 0D B0 04 44 41 53 20 4A 53 52 |:RTS.k...DAS JSR| 00000550: 20 C2 3A B0 41 20 23 34 38 3A 53 54 41 20 46 49 | .:.A #48:STA FI| 00000560: C3 2C 59 3A 49 4E 59 3A 52 54 53 00 9B 0D 14 05 |.,Y:INY:RTS.....| 00000570: 53 57 4F 46 46 20 4C 44 41 20 23 B3 4F 4C 44 94 |SWOFF LDA #.OLD.| 00000580: 3A 4C 44 59 20 23 B1 4F 4C 44 94 3A 53 54 41 20 |:LDY #.OLD.:STA | 00000590: 94 56 3A 53 54 59 20 94 56 AA 31 00 BC 0D 16 05 |.V:STY .V.1.....| 000005A0: 4C 44 41 20 23 B3 54 53 3A 4C 44 59 20 23 B1 54 |LDA #.TS:LDY #.T| 000005B0: 53 3A 4A 4D 50 20 53 54 52 4F 55 54 00 E0 0D 1E |S:JMP STROUT....| 000005C0: 05 53 57 91 20 4A 53 52 20 A1 58 3A 53 54 58 20 |.SW. JSR .X:STX | 000005D0: 44 8B 46 45 3A 4A 53 52 20 49 4E 49 54 52 54 43 |D.FE:JSR INITRTC| 000005E0: 00 0A 0E 20 05 4C 44 41 20 23 B3 4E 45 55 94 3A |... .LDA #.NEU.:| 000005F0: 4C 44 59 20 23 B1 4E 45 55 94 3A 53 54 41 20 94 |LDY #.NEU.:STA .| 00000600: 56 3A 53 54 59 20 94 56 AA 31 00 2B 0E 22 05 4C |V:STY .V.1.+.".L| 00000610: 44 41 20 23 B3 48 49 3A 4C 44 59 20 23 B1 48 49 |DA #.HI:LDY #.HI| 00000620: 3A 4A 4D 50 20 53 54 52 4F 55 54 00 3D 0E 78 05 |:JMP STROUT.=.x.| 00000630: 4E 45 55 94 20 4A 53 52 20 4F 4C 44 94 00 5C 0E |NEU. JSR OLD..\.| 00000640: 7A 05 4C 44 41 20 47 41 3A 43 4D 50 20 23 38 3A |z.LDA GA:CMP #8:| 00000650: 42 43 53 20 44 91 45 55 3A 52 54 53 00 6F 0E 7C |BCS D.EU:RTS.o.|| 00000660: 05 44 91 45 55 20 4A 4D 50 20 4D 41 4B 45 4E 00 |.D.EU JMP MAKEN.| 00000670: 89 0E D0 07 3B 20 52 45 47 49 53 54 45 52 20 58 |....; REGISTER X| 00000680: 20 41 4E 46 41 48 52 45 4E 00 C2 0E D2 07 52 45 | ANFAHREN.....RE| 00000690: 47 58 20 4C 44 41 20 50 52 54 41 3A B0 41 20 23 |GX LDA PRTA:.A #| 000006A0: 34 3A 53 54 41 20 50 52 54 41 3A AF 20 23 32 35 |4:STA PRTA:. #25| 000006B0: 31 3A 53 54 41 20 50 52 54 41 20 3B 20 52 45 53 |1:STA PRTA ; RES| 000006C0: 45 54 00 F8 0E D4 07 4C 31 20 4C 44 41 20 50 52 |ET.....L1 LDA PR| 000006D0: 54 42 3A AF 20 23 31 36 3A 42 4E 45 20 45 52 52 |TB:. #16:BNE ERR| 000006E0: B0 20 3B 20 51 35 20 44 41 52 46 20 4E 49 43 48 |. ; Q5 DARF NICH| 000006F0: 54 20 31 20 53 45 49 4E 00 1E 0F D6 07 54 58 41 |T 1 SEIN.....TXA| 00000700: 3A 42 45 51 20 52 45 41 43 48 20 3B 20 52 45 47 |:BEQ REACH ; REG| 00000710: 49 53 54 45 52 20 45 52 52 45 49 43 48 54 00 53 |ISTER ERREICHT.S| 00000720: 0F D8 07 4C 44 41 20 50 52 54 42 3A AF 20 23 32 |...LDA PRTB:. #2| 00000730: 32 33 3A 53 54 41 20 50 52 54 42 3A B0 41 20 23 |23:STA PRTB:.A #| 00000740: 33 32 3A 53 54 41 20 50 52 54 42 20 3B 20 43 4C |32:STA PRTB ; CL| 00000750: 4F 43 4B 00 72 0F DA 07 44 45 58 3A 42 4E 45 20 |OCK.r...DEX:BNE | 00000760: 4C 31 20 3B 20 58 20 4D 41 4C 20 43 4C 4F 43 4B |L1 ; X MAL CLOCK| 00000770: 45 4E 00 80 0F DC 07 52 45 41 43 48 20 52 54 53 |EN.....REACH RTS| 00000780: 00 A2 0F 34 08 3B 20 50 4C 41 54 49 4E 45 20 4E |...4.; PLATINE N| 00000790: 49 43 48 54 20 41 4E 47 45 53 43 48 4C 4F 53 53 |ICHT ANGESCHLOSS| 000007A0: 45 4E 00 D7 0F 38 08 45 52 52 B0 20 4C 44 41 20 |EN...8.ERR. LDA | 000007B0: 23 B3 45 52 52 54 3A 53 54 41 20 45 52 52 50 54 |#.ERRT:STA ERRPT| 000007C0: 52 3A 4C 44 41 20 23 B1 45 52 52 54 3A 4A 4D 50 |R:LDA #.ERRT:JMP| 000007D0: 20 45 52 52 4F 55 54 00 F5 0F 98 08 3B 20 52 45 | ERROUT.....; RE| 000007E0: 47 49 53 54 45 52 20 58 20 4E 41 43 48 20 41 20 |GISTER X NACH A | 000007F0: 4C 45 53 45 4E 00 11 10 9A 08 C2 20 4A 53 52 20 |LESEN...... JSR | 00000800: 52 45 47 58 20 3B 20 58 20 41 4E 46 41 48 52 45 |REGX ; X ANFAHRE| 00000810: 4E 00 39 10 9C 08 4C 44 41 20 23 32 32 34 3A 53 |N.9...LDA #224:S| 00000820: 54 41 20 44 44 52 42 20 3B 20 50 B0 54 20 41 55 |TA DDRB ; P.T AU| 00000830: 46 20 45 49 4E 47 41 42 45 00 61 10 9E 08 4C 44 |F EINGABE.a...LD| 00000840: 41 20 50 52 54 42 3A AF 20 23 31 32 37 3A 53 54 |A PRTB:. #127:ST| 00000850: 41 20 50 52 54 42 20 3B 20 87 AB 53 49 47 4E 41 |A PRTB ; ..SIGNA| 00000860: 4C 00 84 10 A0 08 4C 44 41 20 50 52 54 42 3A AF |L.....LDA PRTB:.| 00000870: 20 23 31 35 3A 50 48 41 20 3B 20 50 B0 54 20 4C | #15:PHA ; P.T L| 00000880: 45 53 45 4E 00 B2 10 A2 08 4C 44 41 20 50 52 54 |ESEN.....LDA PRT| 00000890: 42 3A B0 41 20 23 31 39 32 3A 53 54 41 20 50 52 |B:.A #192:STA PR| 000008A0: 54 42 20 3B 20 87 20 26 20 57 52 49 54 45 20 41 |TB ; . & WRITE A| 000008B0: 55 53 00 BE 10 A4 08 50 4C 41 3A 52 54 53 00 D7 |US.....PLA:RTS..| 000008C0: 10 FC 08 3B 20 43 49 41 20 49 4E 49 54 49 41 4C |...; CIA INITIAL| 000008D0: 49 53 49 45 52 45 4E 00 0B 11 FE 08 43 49 41 49 |ISIEREN.....CIAI| 000008E0: 4E 49 54 20 4C 44 41 20 44 44 52 41 3A B0 41 20 |NIT LDA DDRA:.A | 000008F0: 23 34 3A 53 54 41 20 44 44 52 41 20 3B 20 52 45 |#4:STA DDRA ; RE| 00000900: 53 45 54 20 41 55 53 47 41 4E 47 00 33 11 00 09 |SET AUSGANG.3...| 00000910: 4C 44 41 20 23 32 32 34 3A 53 54 41 20 44 44 52 |LDA #224:STA DDR| 00000920: 42 20 3B 20 50 B0 54 20 41 55 46 20 45 49 4E 47 |B ; P.T AUF EING| 00000930: 41 4E 47 00 55 11 02 09 53 54 41 20 50 52 54 42 |ANG.U...STA PRTB| 00000940: 20 3B 20 AB 43 4C 4B 2C 20 AB 57 52 2C 20 AB 52 | ; .CLK, .WR, .R| 00000950: 44 20 41 55 53 00 5D 11 04 09 52 54 53 00 76 11 |D AUS.]...RTS.v.| 00000960: 60 09 3B 20 55 48 52 20 49 4E 49 54 49 41 4C 49 |`.; UHR INITIALI| 00000970: 53 49 45 52 45 4E 00 8E 11 62 09 49 4E 49 54 52 |SIEREN...b.INITR| 00000980: 54 43 20 4A 53 52 20 43 49 41 49 4E 49 54 00 AF |TC JSR CIAINIT..| 00000990: 11 64 09 3B 20 54 45 53 54 2C 20 4F 42 20 52 54 |.d.; TEST, OB RT| 000009A0: 43 20 41 4E 47 45 53 43 48 4C 4F 53 53 45 4E 00 |C ANGESCHLOSSEN.| 000009B0: E3 11 6A 09 4C 44 41 20 50 52 54 41 3A B0 41 20 |..j.LDA PRTA:.A | 000009C0: 23 34 3A 53 54 41 20 50 52 54 41 3A AF 20 23 32 |#4:STA PRTA:. #2| 000009D0: 35 31 3A 53 54 41 20 50 52 54 41 20 3B 20 52 45 |51:STA PRTA ; RE| 000009E0: 53 45 54 00 00 12 6C 09 4C 44 58 20 23 31 36 20 |SET...l.LDX #16 | 000009F0: 3B 20 31 36 20 4D 41 4C 20 43 4C 4F 43 4B 45 4E |; 16 MAL CLOCKEN| 00000A00: 00 16 12 6E 09 4C 32 20 4C 44 41 20 50 52 54 42 |...n.L2 LDA PRTB| 00000A10: 3A AF 20 23 31 36 00 3A 12 6F 09 42 4E 45 20 45 |:. #16.:.o.BNE E| 00000A20: 52 52 B0 20 3B 20 51 35 20 44 41 52 46 20 4E 49 |RR. ; Q5 DARF NI| 00000A30: 43 48 54 20 31 20 53 45 49 4E 00 6F 12 70 09 4C |CHT 1 SEIN.o.p.L| 00000A40: 44 41 20 50 52 54 42 3A AF 20 23 32 32 33 3A 53 |DA PRTB:. #223:S| 00000A50: 54 41 20 50 52 54 42 3A B0 41 20 23 33 32 3A 53 |TA PRTB:.A #32:S| 00000A60: 54 41 20 50 52 54 42 20 3B 20 43 4C 4F 43 4B 00 |TA PRTB ; CLOCK.| 00000A70: 7E 12 72 09 44 45 58 3A 42 4E 45 20 4C 32 00 9B |~.r.DEX:BNE L2..| 00000A80: 12 74 09 4C 44 58 20 23 31 36 20 3B 20 31 36 20 |.t.LDX #16 ; 16 | 00000A90: 4D 41 4C 20 43 4C 4F 43 4B 45 4E 00 CB 12 76 09 |MAL CLOCKEN...v.| 00000AA0: 4C 33 20 4C 44 41 20 50 52 54 42 3A AF 20 23 31 |L3 LDA PRTB:. #1| 00000AB0: 36 3A 42 45 51 20 45 52 52 B0 20 3B 20 51 35 20 |6:BEQ ERR. ; Q5 | 00000AC0: 4D 55 53 53 20 31 20 53 45 49 4E 00 00 13 78 09 |MUSS 1 SEIN...x.| 00000AD0: 4C 44 41 20 50 52 54 42 3A AF 20 23 32 32 33 3A |LDA PRTB:. #223:| 00000AE0: 53 54 41 20 50 52 54 42 3A B0 41 20 23 33 32 3A |STA PRTB:.A #32:| 00000AF0: 53 54 41 20 50 52 54 42 20 3B 20 43 4C 4F 43 4B |STA PRTB ; CLOCK| 00000B00: 00 0F 13 7A 09 44 45 58 3A 42 4E 45 20 4C 33 00 |...z.DEX:BNE L3.| 00000B10: 4B 13 7C 09 4C 44 41 20 50 52 54 42 3A AF 20 23 |K.|.LDA PRTB:. #| 00000B20: 31 36 3A 42 45 51 20 4E 55 44 45 4E 3A 4A 4D 50 |16:BEQ NUDEN:JMP| 00000B30: 20 45 52 52 B0 3B 20 51 35 20 44 41 52 46 20 4E | ERR.; Q5 DARF N| 00000B40: 49 43 48 54 20 31 20 53 45 49 4E 00 60 13 7E 09 |ICHT 1 SEIN.`.~.| 00000B50: 3B 20 55 48 52 20 48 4F 43 48 46 41 48 52 45 4E |; UHR HOCHFAHREN| 00000B60: 00 96 13 80 09 4E 55 44 45 4E 20 4C 44 41 20 23 |.....NUDEN LDA #| 00000B70: 30 3A 4C 44 58 20 23 31 33 3A 4A 53 52 20 97 20 |0:LDX #13:JSR . | 00000B80: 3B 20 52 45 47 49 53 54 45 52 20 31 33 20 4C 4F |; REGISTER 13 LO| 00000B90: 45 53 43 48 45 4E 00 C9 13 82 09 4C 44 41 20 23 |ESCHEN.....LDA #| 00000BA0: 31 3A 4C 44 58 20 23 31 34 3A 4A 53 52 20 97 20 |1:LDX #14:JSR . | 00000BB0: 3B 20 52 45 47 49 53 54 45 52 20 31 34 20 52 55 |; REGISTER 14 RU| 00000BC0: 45 43 4B 53 45 54 5A 45 4E 00 0D 14 84 09 4C 44 |ECKSETZEN.....LD| 00000BD0: 41 20 23 34 3A 4C 44 58 20 23 31 35 20 20 20 20 |A #4:LDX #15 | 00000BE0: 20 20 20 20 20 20 3B 20 52 45 47 49 53 54 45 52 | ; REGISTER| 00000BF0: 20 31 35 20 55 48 52 20 41 4E 46 41 48 52 45 4E | 15 UHR ANFAHREN| 00000C00: 20 32 34 20 53 54 44 20 4D 4F 44 55 53 00 2C 14 | 24 STD MODUS.,.| 00000C10: C4 09 3B 20 53 43 48 52 45 49 42 54 20 41 20 49 |..; SCHREIBT A I| 00000C20: 4E 20 52 45 47 49 53 54 45 52 20 58 00 58 14 C6 |N REGISTER X.X..| 00000C30: 09 97 20 AF 20 23 31 35 3A 53 54 41 20 54 45 50 |.. . #15:STA TEP| 00000C40: AA 31 3A 4A 53 52 20 52 45 47 58 20 3B 20 58 20 |.1:JSR REGX ; X | 00000C50: 41 4E 46 41 48 52 45 4E 00 86 14 C8 09 4C 44 41 |ANFAHREN.....LDA| 00000C60: 20 50 52 54 42 3A B0 41 20 23 31 39 32 3A 53 54 | PRTB:.A #192:ST| 00000C70: 41 20 50 52 54 42 20 3B 20 87 20 26 20 57 52 49 |A PRTB ; . & WRI| 00000C80: 54 45 20 41 55 53 00 AE 14 CA 09 4C 44 41 20 23 |TE AUS.....LDA #| 00000C90: 32 33 39 3A 53 54 41 20 44 44 52 42 20 3B 20 50 |239:STA DDRB ; P| 00000CA0: B0 54 20 41 55 46 20 41 55 53 47 41 4E 47 00 C2 |.T AUF AUSGANG..| 00000CB0: 14 CC 09 4C 44 41 20 50 52 54 42 3A AF 20 23 32 |...LDA PRTB:. #2| 00000CC0: 34 30 00 E5 14 CD 09 54 45 50 20 B0 41 20 23 30 |40.....TEP .A #0| 00000CD0: 3A 53 54 41 20 50 52 54 42 20 3B 20 41 20 41 55 |:STA PRTB ; A AU| 00000CE0: 46 20 50 B0 54 00 0A 15 CE 09 4C 44 41 20 50 52 |F P.T.....LDA PR| 00000CF0: 54 42 3A AF 20 23 31 39 31 3A 53 54 41 20 50 52 |TB:. #191:STA PR| 00000D00: 54 42 20 3B 20 57 52 49 54 45 00 38 15 D0 09 4C |TB ; WRITE.8...L| 00000D10: 44 41 20 50 52 54 42 3A B0 41 20 23 31 39 32 3A |DA PRTB:.A #192:| 00000D20: 53 54 41 20 50 52 54 42 20 3B 20 87 20 26 20 57 |STA PRTB ; . & W| 00000D30: 52 49 54 45 20 41 55 53 00 60 15 D2 09 4C 44 41 |RITE AUS.`...LDA| 00000D40: 20 23 32 32 34 3A 53 54 41 20 44 44 52 42 20 3B | #224:STA DDRB ;| 00000D50: 20 50 B0 54 20 41 55 46 20 45 49 4E 47 41 4E 47 | P.T AUF EINGANG| 00000D60: 00 68 15 D4 09 52 54 53 00 00 00 |.h...RTS... |
.......36864......OPT OO.%..... $C800.4.
D.CIA .$DD00.D.F.DDRA .CIA.2.T.H.DDRB .C
IA.3.B.J.PRTA .CIA.R.L.PRTB .CIA.1...N.E
RROUT .$A445...P.ERRPTR .$22...T.NAMEL .
$B7...V.NAMEP .$BB.D.X.STROUT .$AB1E.T.Z
.OLD. .$F5ED...|..V .$332...~.GA .$BA...
..SETPAR .$FFBA...... .$FFC0..... ...3.
&...RD1 .53266.3...RD2 .162.A....X .$B7F
1.M...JMP SW..[...JMP SWOFF.}.X.ERRT .F
"UNABLE TO ACCESS RTC...B.HI .F ".AUTO-S
AVE EINGESCHALTET":.BYT 13,0...L.TS .F "
.AUTO-SAVE ABGESCHALTET ":.BYT 13,0...V.
FIC .W. 0,0,0,0,0,0,0,0...X..F ",U,W...B
.BUC1 BRK...D.BUC2 BRK.*.F.ART BRK.7.L.X
MEM BRK.D.N.YMEM BRK.Q.P.D.FE BRK.A.R.SD
.BYT 123... .AT1 .BYT 20,0,13,141,148,3
4,160:.F "*=,?:...!.ET1 .....L.MAKEN LDY
#15:LDA #32.T.N..N STA FIC,Y:DEY:BPL .N
:INY...P.COPN CPY NAMEL:BCS FULN:LDA (NA
MEP),Y:STA FIC,Y:INY:CPY #4:BCC COPN.,.R
.FULN LDY #5.L.T.LDX #7:JSR DAS:LDX #6:J
SR DAS:LDX #9:JSR DAS:LDX #8:JSR DAS...V
.LDX #11:JSR DAS:LDX #10:JSR DAS:INY.T.X
.LDX #5:JSR DAS:LDX #4:JSR DAS:LDX #3:JS
R DAS:LDX #2:JSR DAS...Z.LDA #20:STA NAM
EL:LDA #.FIC:LDY #.FIC:STA NAMEP:STY NAM
EP.1.M.\.LDX GA:LDA #57:LDY #8:JSR SETPA
R:JSR .:LDA #57:JSR .I.].LDA D.FE:BNE S
TRICH:RTS...^.STRICH LDA #"-":LDX #13...
`.SPI STA FIC,X:DEX:BPL SPI...B.JSR .:ST
A FIC.14:JSR .:STA FIC.15:JSR .:LDA #57:
JMP ...~.. LDA RD1:ADC SD:E. RD2:ASL:AD
C #0:STA SD:LDX #ET1.AT1.1.D...ATTN CMP
AT1,X:BEQ .:DEX:BPL ATTN:RTS.K...DAS JSR
B:.A #48:STA FIC,Y:INY:RTS.....SWOFF LD
A #.OLD.:LDY #.OLD.:STA .V:STY .V.1.....
LDA #.TS:LDY #.TS:JMP STROUT.....SW. JSR
.X:STX D.FE:JSR INITRTC... .LDA #.NEU.:
LDY #.NEU.:STA .V:STY .V.1.+.".LDA #.HI:
LDY #.HI:JMP STROUT.=.X.NEU. JSR OLD..\.
Z.LDA GA:CMP #8:BCS D.EU:RTS.O.|.D.EU JM
P MAKEN...P.; REGISTER X ANFAHREN.B.R.RE
GX LDA PRTA:.A #4:STA PRTA:. #251:STA PR
TA ; RESET...T.L1 LDA PRTB:. #16:BNE ERR
. ; Q5 DARF NICHT 1 SEIN...V.TXA:BEQ REA
CH ; REGISTER ERREICHT.S.X.LDA PRTB:. #2
23:STA PRTB:.A #32:STA PRTB ; CLOCK.R.Z.
DEX:BNE L1 ; X MAL CLOCKEN.....REACH RTS
...4.; PLATINE NICHT ANGESCHLOSSEN.W.8.E
RR. LDA #.ERRT:STA ERRPTR:LDA #.ERRT:JMP
ERROUT.....; REGISTER X NACH A LESEN...
..B JSR REGX ; X ANFAHREN.9...LDA #224:S
TA DDRB ; P.T AUF EINGABE.A...LDA PRTB:.
#127:STA PRTB ; ..SIGNAL... .LDA PRTB:.
#15:PHA ; P.T LESEN.....LDA PRTB:.A #19
2:STA PRTB ; . & WRITE AUS.....PLA:RTS.W
...; CIA INITIALISIEREN.....CIAINIT LDA
DDRA:.A #4:STA DDRA ; RESET AUSGANG.3...
LDA #224:STA DDRB ; P.T AUF EINGANG.U...
STA PRTB ; .CLK, .WR, .RD AUS.]...RTS.V.
`.; UHR INITIALISIEREN...B.INITRTC JSR C
IAINIT...D.; TEST, OB RTC ANGESCHLOSSEN.
..J.LDA PRTA:.A #4:STA PRTA:. #251:STA P
RTA ; RESET...L.LDX #16 ; 16 MAL CLOCKEN
...N.L2 LDA PRTB:. #16.:.O.BNE ERR. ; Q5
DARF NICHT 1 SEIN.O.P.LDA PRTB:. #223:S
TA PRTB:.A #32:STA PRTB ; CLOCK.~.R.DEX:
BNE L2...T.LDX #16 ; 16 MAL CLOCKEN.K.V.
L3 LDA PRTB:. #16:BEQ ERR. ; Q5 MUSS 1 S
EIN...X.LDA PRTB:. #223:STA PRTB:.A #32:
STA PRTB ; CLOCK...Z.DEX:BNE L3.K.|.LDA
PRTB:. #16:BEQ NUDEN:JMP ERR.; Q5 DARF N
ICHT 1 SEIN.`.~.; UHR HOCHFAHREN.....NUD
EN LDA #0:LDX #13:JSR . ; REGISTER 13 LO
ESCHEN.I...LDA #1:LDX #14:JSR . ; REGIST
ER 14 RUECKSETZEN.....LDA #4:LDX #15
; REGISTER 15 UHR ANFAHREN 24 STD
MODUS.,.D.; SCHREIBT A IN REGISTER X.X.F
.. . #15:STA TEP.1:JSR REGX ; X ANFAHREN
...H.LDA PRTB:.A #192:STA PRTB ; . & WRI
TE AUS...J.LDA #239:STA DDRB ; P.T AUF A
USGANG.B.L.LDA PRTB:. #240...M.TEP .A #0
:STA PRTB ; A AUF P.T...N.LDA PRTB:. #19
1:STA PRTB ; WRITE.8.P.LDA PRTB:.A #192:
STA PRTB ; . & WRITE AUS.`.R.LDA #224:ST
A DDRB ; P.T AUF EINGANG.H.T.RTS...
> CLICK IMAGE PREVIEW FOR FULL MODAL