IF.ASM
FILE INFORMATION
FILENAME(S): IF.ASM
FILE TYPE(S): PRG
FILE SIZE: 4.6K
FIRST SEEN: 2025-11-30 16:18:11
APPEARS ON: 1 disk(s)
FILE HASH
45e968cb8d36f111501c0a001c744e8c785b24b6c77c6938cf21150ead815ad4
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ERICH | IF.ASM | PRG | BrainSkull, Leopold Zyka | 32 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 16 08 4E 02 99 22 4C 41 44 45 4E 20 44 45 |....N.."LADEN DE|
00000010: 53 20 41 53 53 22 00 2E 08 58 02 8B 41 B2 30 A7 |S ASS"...X..A.0.|
00000020: 41 B2 31 3A 93 22 41 53 53 22 2C 38 2C 31 00 51 |A.1:."ASS",8,1.Q|
00000030: 08 6C 02 99 22 4C 4F 45 53 43 48 45 4E 20 44 45 |.l.."LOESCHEN DE|
00000040: 53 20 41 4C 54 45 4E 20 41 53 4D 2D 43 4F 44 45 |S ALTEN ASM-CODE|
00000050: 22 00 6B 08 76 02 9F 39 2C 38 2C 31 35 2C 22 53 |".k.v..9,8,15,"S|
00000060: 3A 49 46 2E 4D 4B 20 22 3A A0 39 00 8E 08 80 02 |:IF.MK ":.9.....|
00000070: 99 22 45 52 5A 45 55 47 45 4E 20 44 45 53 20 4E |."ERZEUGEN DES N|
00000080: 45 55 45 4E 20 41 53 4D 2D 43 4F 44 45 22 00 A2 |EUEN ASM-CODE"..|
00000090: 08 8A 02 9F 31 2C 38 2C 31 2C 22 49 46 2E 4D 4B |....1,8,1,"IF.MK|
000000A0: 20 22 00 AE 08 BC 02 9E 39 AC 34 30 39 36 00 BA | "......9.4096..|
000000B0: 08 EE 02 2E 4F 50 54 20 4F 31 00 CF 08 14 05 45 |....OPT O1.....E|
000000C0: 49 4E 47 41 4E 47 31 20 B2 20 24 30 33 33 43 00 |INGANG1 . $033C.|
000000D0: E4 08 1E 05 45 49 4E 47 41 4E 47 32 20 B2 20 24 |....EINGANG2 . $|
000000E0: 30 33 33 44 00 F9 08 28 05 45 49 4E 47 41 4E 47 |033D...(.EINGANG|
000000F0: 33 20 B2 20 24 30 33 33 45 00 0E 09 32 05 45 49 |3 . $033E...2.EI|
00000100: 4E 47 41 4E 47 34 20 B2 20 24 30 33 33 46 00 1F |NGANG4 . $033F..|
00000110: 09 46 05 5A 59 4B C3 20 B2 20 24 30 33 34 30 00 |.F.ZYK. . $0340.|
00000120: 30 09 50 05 50 B0 54 83 20 3D 20 24 44 44 30 31 |0.P.P.T. = $DD01|
00000130: 00 42 09 5A 05 53 45 52 49 83 20 3D 20 24 30 33 |.B.Z.SERI. = $03|
00000140: 34 31 00 57 09 64 05 54 49 4D 45 48 49 47 48 20 |41.W.d.TIMEHIGH |
00000150: B2 20 24 30 33 34 32 00 6B 09 6E 05 54 49 4D 45 |. $0342.k.n.TIME|
00000160: 4C 4F 57 20 B2 20 24 30 33 34 33 00 7C 09 73 05 |LOW . $0343.|.s.|
00000170: 4D 50 58 31 20 B2 20 24 30 33 34 34 00 8F 09 78 |MPX1 . $0344...x|
00000180: 05 46 4C 41 4E 4B 45 20 B2 20 24 30 33 34 35 00 |.FLANKE . $0345.|
00000190: A0 09 7D 05 4B B0 52 83 20 3D 20 24 30 33 34 36 |..}.K.R. = $0346|
000001A0: 00 B1 09 82 05 83 42 45 49 20 3D 20 24 30 33 34 |......BEI = $034|
000001B0: 37 00 C3 09 8C 05 53 54 41 52 54 20 B2 20 24 43 |7.....START . $C|
000001C0: 30 30 30 00 D0 09 96 05 AC B2 20 53 54 41 52 54 |000....... START|
000001D0: 00 EA 09 DC 05 3B AC AC AC AC AC AC AC AC AC AC |.....;..........|
000001E0: AC AC AC AC AC AC AC AC AC AC 00 01 0A E1 05 3B |...............;|
000001F0: 20 45 49 4E 4C 45 49 54 55 4E 47 20 48 50 52 47 | EINLEITUNG HPRG|
00000200: 4D 00 1B 0A E6 05 3B AC AC AC AC AC AC AC AC AC |M.....;.........|
00000210: AC AC AC AC AC AC AC AC AC AC AC 00 2C 0A F0 05 |............,...|
00000220: AE 20 20 20 20 20 20 20 20 4E 4F 50 00 40 0A F2 |. NOP.@..|
00000230: 05 AE 20 20 20 20 20 20 20 20 4C 44 41 20 23 30 |.. LDA #0|
00000240: 00 56 0A F4 05 AE 20 20 20 20 20 20 20 20 53 54 |.V.... ST|
00000250: 41 20 4B B0 52 83 00 6D 0A FA 05 AE 20 20 20 20 |A K.R..m.... |
00000260: 20 20 20 20 4C 44 41 20 53 45 52 49 83 00 82 0A | LDA SERI....|
00000270: 04 06 AE 20 20 20 20 20 20 20 20 45 B0 20 4B B0 |... E. K.|
00000280: 52 83 00 99 0A 0E 06 AE 20 20 20 20 20 20 20 20 |R....... |
00000290: 53 54 41 20 53 45 52 49 83 00 AD 0A 18 06 AE 20 |STA SERI....... |
000002A0: 20 20 20 20 20 20 20 4C 44 41 20 23 30 00 C5 0A | LDA #0...|
000002B0: 2C 06 AE 20 20 20 20 20 20 20 20 53 54 41 20 46 |,.. STA F|
000002C0: 4C 41 4E 4B 45 00 D9 0A 36 06 AE 20 20 20 20 20 |LANKE...6.. |
000002D0: 20 20 20 4C 44 41 20 23 38 00 EF 0A 40 06 AE 20 | LDA #8...@.. |
000002E0: 20 20 20 20 20 20 20 53 54 41 20 5A 59 4B C3 00 | STA ZYK..|
000002F0: 05 0B 4A 06 AE 20 20 20 20 20 20 20 20 4C 44 41 |..J.. LDA|
00000300: 20 23 24 30 38 00 1E 0B 54 06 AE 20 20 20 20 20 | #$08...T.. |
00000310: 20 20 20 53 54 41 20 54 49 4D 45 4C 4F 57 00 34 | STA TIMELOW.4|
00000320: 0B 5E 06 AE 20 20 20 20 20 20 20 20 4C 44 41 20 |.^.. LDA |
00000330: 23 24 30 30 00 4E 0B 68 06 AE 20 20 20 20 20 20 |#$00.N.h.. |
00000340: 20 20 53 54 41 20 54 49 4D 45 48 49 47 48 00 68 | STA TIMEHIGH.h|
00000350: 0B A4 06 3B AC AC AC AC AC AC AC AC AC AC AC AC |...;............|
00000360: AC AC AC AC AC AC AC AC 00 82 0B AE 06 3B AC 20 |.............;. |
00000370: 53 45 52 49 45 4C 4C 45 53 20 48 50 52 47 20 20 |SERIELLES HPRG |
00000380: 20 AC 00 9C 0B B8 06 3B AC AC AC AC AC AC AC AC | ......;........|
00000390: AC AC AC AC AC AC AC AC AC AC AC AC 00 A2 0B C2 |................|
000003A0: 06 3B 00 BC 0B CC 06 AE 20 20 20 20 20 20 20 20 |.;...... |
000003B0: 4A 53 52 20 53 55 42 43 4C 4F 43 4B 00 D2 0B D6 |JSR SUBCLOCK....|
000003C0: 06 48 50 52 47 31 20 20 20 20 4A 53 52 20 53 55 |.HPRG1 JSR SU|
000003D0: 42 83 00 EB 0B E0 06 AE 20 20 20 20 20 20 20 20 |B....... |
000003E0: 4A 53 52 20 53 55 42 54 49 4D 45 00 05 0C EA 06 |JSR SUBTIME.....|
000003F0: AE 20 20 20 20 20 20 20 20 4A 53 52 20 53 55 42 |. JSR SUB|
00000400: 43 4C 4F 43 4B 00 1E 0C EF 06 AE 20 20 20 20 20 |CLOCK...... |
00000410: 20 20 20 4A 53 52 20 53 55 42 54 49 4D 45 00 38 | JSR SUBTIME.8|
00000420: 0C F2 06 AE 20 20 20 20 20 20 20 20 4A 53 52 20 |.... JSR |
00000430: 53 55 42 43 4C 4F 43 4B 00 4E 0C F4 06 AE 20 20 |SUBCLOCK.N.... |
00000440: 20 20 20 20 20 20 44 45 43 20 5A 59 4B C3 00 64 | DEC ZYK..d|
00000450: 0C FE 06 AE 20 20 20 20 20 20 20 20 4C 44 41 20 |.... LDA |
00000460: 5A 59 4B C3 00 7B 0C 08 07 AE 20 20 20 20 20 20 |ZYK..{.... |
00000470: 20 20 42 45 51 20 48 50 52 47 32 00 92 0C 12 07 | BEQ HPRG2.....|
00000480: AE 20 20 20 20 20 20 20 20 4A 4D 50 20 48 50 52 |. JMP HPR|
00000490: 47 31 00 AC 0C 1C 07 48 50 52 47 32 20 20 20 20 |G1.....HPRG2 |
000004A0: 4A 53 52 20 53 55 42 43 4C 4F 43 4B 00 BD 0C 26 |JSR SUBCLOCK...&|
000004B0: 07 AE 20 20 20 20 20 20 20 20 52 54 53 00 D7 0C |.. RTS...|
000004C0: B8 0B 3B AC AC AC AC AC AC AC AC AC AC AC AC AC |..;.............|
000004D0: AC AC AC AC AC AC AC 00 F1 0C C2 0B 3B AC 20 53 |............;. S|
000004E0: 55 42 52 4F 55 54 49 4E 45 20 54 49 4D 45 20 20 |UBROUTINE TIME |
000004F0: AC 00 0B 0D CC 0B 3B AC AC AC AC AC AC AC AC AC |......;.........|
00000500: AC AC AC AC AC AC AC AC AC AC AC 00 11 0D E0 0B |................|
00000510: 3B 00 2A 0D EA 0B 53 55 42 54 49 4D 45 20 20 4C |;.*...SUBTIME L|
00000520: 44 58 20 54 49 4D 45 4C 4F 57 00 41 0D F4 0B 54 |DX TIMELOW.A...T|
00000530: 49 4D 45 32 20 20 20 20 42 45 51 20 54 49 4D 45 |IME2 BEQ TIME|
00000540: 31 00 52 0D FE 0B AE 20 20 20 20 20 20 20 20 44 |1.R.... D|
00000550: 45 58 00 69 0D 08 0C AE 20 20 20 20 20 20 20 20 |EX.i.... |
00000560: 42 45 51 20 54 49 4D 45 31 00 80 0D 12 0C AE 20 |BEQ TIME1...... |
00000570: 20 20 20 20 20 20 20 4A 4D 50 20 54 49 4D 45 32 | JMP TIME2|
00000580: 00 86 0D 1C 0C 3B 00 A0 0D 26 0C 54 49 4D 45 31 |.....;...&.TIME1|
00000590: 20 20 20 20 4C 44 59 20 54 49 4D 45 48 49 47 48 | LDY TIMEHIGH|
000005A0: 00 B7 0D 30 0C AE 20 20 20 20 20 20 20 20 42 45 |...0.. BE|
000005B0: 51 20 54 49 4D 45 33 00 C8 0D 3A 0C AE 20 20 20 |Q TIME3...:.. |
000005C0: 20 20 20 20 20 44 45 59 00 DF 0D 44 0C AE 20 20 | DEY...D.. |
000005D0: 20 20 20 20 20 20 42 45 51 20 54 49 4D 45 33 00 | BEQ TIME3.|
000005E0: F8 0D 4E 0C AE 20 20 20 20 20 20 20 20 4A 4D 50 |..N.. JMP|
000005F0: 20 53 55 42 54 49 4D 45 00 09 0E 58 0C 54 49 4D | SUBTIME...X.TIM|
00000600: 45 33 20 20 20 20 52 54 53 00 23 0E A0 0F 3B AC |E3 RTS.#...;.|
00000610: AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC |................|
00000620: AC AC AC 00 3D 0E AA 0F 3B AC 20 53 55 42 43 4C |....=...;. SUBCL|
00000630: 4F 43 4B 20 20 20 20 20 20 20 20 20 AC 00 57 0E |OCK ..W.|
00000640: B4 0F 3B AC AC AC AC AC AC AC AC AC AC AC AC AC |..;.............|
00000650: AC AC AC AC AC AC AC 00 5D 0E BE 0F 3B 00 63 0E |........]...;.c.|
00000660: C8 0F 3B 00 7B 0E D2 0F 53 55 42 43 4C 4F 43 4B |..;.{...SUBCLOCK|
00000670: 20 4C 44 41 20 46 4C 41 4E 4B 45 00 93 0E DC 0F | LDA FLANKE.....|
00000680: AE 20 20 20 20 20 20 20 20 42 45 51 20 46 4C 41 |. BEQ FLA|
00000690: 4E 4B 31 00 A9 0E E1 0F AE 20 20 20 20 20 20 20 |NK1...... |
000006A0: 20 4C 44 41 20 50 B0 54 83 00 CC 0E E6 0F AE 20 | LDA P.T....... |
000006B0: 20 20 20 20 20 20 20 B0 41 20 23 25 31 30 30 30 | .A #%1000|
000006C0: 30 30 30 30 20 3B 43 4C 4F 43 4B AB 00 EE 0E F0 |0000 ;CLOCK.....|
000006D0: 0F AE 20 20 20 20 20 20 20 20 53 54 41 20 50 B0 |.. STA P.|
000006E0: 54 83 20 20 20 3B 41 55 53 47 41 4E 47 2E 00 02 |T. ;AUSGANG...|
000006F0: 0F F2 0F AE 20 20 20 20 20 20 20 20 4C 44 41 20 |.... LDA |
00000700: 23 30 00 1A 0F F3 0F AE 20 20 20 20 20 20 20 20 |#0...... |
00000710: 53 54 41 20 46 4C 41 4E 4B 45 00 2B 0F F5 0F AE |STA FLANKE.+....|
00000720: 20 20 20 20 20 20 20 20 52 54 53 00 48 0F FA 0F | RTS.H...|
00000730: 46 4C 41 4E 4B 31 20 20 20 4C 44 41 20 50 B0 54 |FLANK1 LDA P.T|
00000740: 83 20 20 20 3B 50 42 37 00 6C 0F 04 10 AE 20 20 |. ;PB7.l.... |
00000750: 20 20 20 20 20 20 AF 20 23 25 30 31 31 31 31 31 | . #%011111|
00000760: 31 31 20 3B 52 55 45 43 4B 53 45 54 00 82 0F 0E |11 ;RUECKSET....|
00000770: 10 AE 20 20 20 20 20 20 20 20 53 54 41 20 50 B0 |.. STA P.|
00000780: 54 83 00 96 0F 18 10 AE 20 20 20 20 20 20 20 20 |T....... |
00000790: 4C 44 41 20 23 31 00 AE 0F 22 10 AE 20 20 20 20 |LDA #1...".. |
000007A0: 20 20 20 20 53 54 41 20 46 4C 41 4E 4B 45 00 BF | STA FLANKE..|
000007B0: 0F 2C 10 AE 20 20 20 20 20 20 20 20 52 54 53 00 |.,.. RTS.|
000007C0: C5 0F 36 10 3B 00 E0 0F 88 13 3B AC AC AC AC AC |..6.;.....;.....|
000007D0: AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC |................|
000007E0: 00 F8 0F 8D 13 3B AC 20 20 20 53 55 42 83 20 20 |.....;. SUB. |
000007F0: 20 20 20 20 20 20 20 2A 00 13 10 92 13 3B AC AC | *.....;..|
00000800: AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC |................|
00000810: AC AC AC 00 19 10 9C 13 3B 00 1F 10 A6 13 3B 00 |........;.....;.|
00000820: 36 10 B0 13 53 55 42 83 20 20 4C 44 41 20 53 45 |6...SUB. LDA SE|
00000830: 52 49 44 41 54 41 00 50 10 CE 13 AE 20 20 20 20 |RIDATA.P.... |
00000840: 20 20 20 20 AF 20 23 25 30 30 30 30 30 30 30 31 | . #%00000001|
00000850: 00 66 10 DD 13 AE 20 20 20 20 20 20 20 20 42 45 |.f.... BE|
00000860: 51 20 44 41 54 31 00 7C 10 E2 13 AE 20 20 20 20 |Q DAT1.|.... |
00000870: 20 20 20 20 4C 44 41 20 50 B0 54 83 00 97 10 EC | LDA P.T.....|
00000880: 13 AE 20 20 20 20 20 20 20 20 B0 41 20 23 25 30 |.. .A #%0|
00000890: 31 30 30 30 30 30 30 00 AD 10 00 14 AE 20 20 20 |1000000...... |
000008A0: 20 20 20 20 20 53 54 41 20 50 B0 54 83 00 C3 10 | STA P.T....|
000008B0: 0A 14 AE 20 20 20 20 20 20 20 20 4A 4D 50 20 44 |... JMP D|
000008C0: 41 54 32 00 D9 10 14 14 44 41 54 31 20 20 20 20 |AT2.....DAT1 |
000008D0: 20 4C 44 41 20 50 B0 54 83 00 F3 10 1E 14 AE 20 | LDA P.T....... |
000008E0: 20 20 20 20 20 20 20 AF 20 23 25 31 30 31 31 31 | . #%10111|
000008F0: 31 31 31 00 09 11 28 14 AE 20 20 20 20 20 20 20 |111...(.. |
00000900: 20 53 54 41 20 50 B0 54 83 00 20 11 3C 14 44 41 | STA P.T.. .<.DA|
00000910: 54 32 20 20 20 20 20 4C 44 41 20 53 45 52 49 83 |T2 LDA SERI.|
00000920: 00 31 11 46 14 AE 20 20 20 20 20 20 20 20 4C 53 |.1.F.. LS|
00000930: 52 00 48 11 50 14 AE 20 20 20 20 20 20 20 20 53 |R.H.P.. S|
00000940: 54 41 20 53 45 52 49 83 00 59 11 5A 14 AE 20 20 |TA SERI..Y.Z.. |
00000950: 20 20 20 20 20 20 52 54 53 00 74 11 70 17 3B AC | RTS.t.p.;.|
00000960: AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC |................|
00000970: AC AC AC AC 00 8F 11 7A 17 3B AC 20 4D 50 58 20 |.......z.;. MPX |
00000980: AB 20 41 4E 20 26 20 41 55 53 20 20 20 20 AC 00 |. AN & AUS ..|
00000990: AA 11 84 17 3B AC AC AC AC AC AC AC AC AC AC AC |....;...........|
000009A0: AC AC AC AC AC AC AC AC AC AC 00 B0 11 8E 17 3B |...............;|
000009B0: 00 C2 11 98 17 AC B2 20 53 54 41 52 54 20 AA 32 |....... START .2|
000009C0: 30 30 00 C8 11 A2 17 3B 00 DE 11 D4 17 4D 50 58 |00.....;.....MPX|
000009D0: 31 45 49 4E 20 20 4C 44 41 20 50 B0 54 83 00 F9 |1EIN LDA P.T...|
000009E0: 11 DE 17 AE 20 20 20 20 20 20 20 20 B0 41 20 23 |.... .A #|
000009F0: 25 30 30 31 30 30 30 30 30 00 0F 12 E8 17 AE 20 |%00100000...... |
00000A00: 20 20 20 20 20 20 20 53 54 41 20 50 B0 54 83 00 | STA P.T..|
00000A10: 23 12 EA 17 AE 20 20 20 20 20 20 20 20 4C 44 41 |#.... LDA|
00000A20: 20 23 31 00 39 12 EC 17 AE 20 20 20 20 20 20 20 | #1.9.... |
00000A30: 20 53 54 41 20 4D 50 58 31 00 4A 12 FC 17 AE 20 | STA MPX1.J.... |
00000A40: 20 20 20 20 20 20 20 52 54 53 00 5C 12 06 18 AC | RTS.\....|
00000A50: B2 20 53 54 41 52 54 20 AA 32 33 30 00 72 12 10 |. START .230.r..|
00000A60: 18 4D 50 58 31 41 55 53 20 20 4C 44 41 20 50 B0 |.MPX1AUS LDA P.|
00000A70: 54 83 00 8C 12 1A 18 AE 20 20 20 20 20 20 20 20 |T....... |
00000A80: AF 20 23 25 31 31 30 31 31 31 31 31 00 A2 12 24 |. #%11011111...$|
00000A90: 18 AE 20 20 20 20 20 20 20 20 53 54 41 20 50 B0 |.. STA P.|
00000AA0: 54 83 00 B6 12 26 18 AE 20 20 20 20 20 20 20 20 |T....&.. |
00000AB0: 4C 44 41 20 23 30 00 CC 12 28 18 AE 20 20 20 20 |LDA #0...(.. |
00000AC0: 20 20 20 20 53 54 41 20 4D 50 58 31 00 DD 12 2E | STA MPX1....|
00000AD0: 18 AE 20 20 20 20 20 20 20 20 52 54 53 00 E3 12 |.. RTS...|
00000AE0: 58 1B 3B 00 F5 12 62 1B AC B2 20 53 54 41 52 54 |X.;...b... START|
00000AF0: 20 AA 32 35 30 00 FB 12 6C 1B 3B 00 11 13 BC 1B | .250...l.;.....|
00000B00: 4D 50 58 32 45 49 4E 20 20 4C 44 41 20 50 B0 54 |MPX2EIN LDA P.T|
00000B10: 83 00 31 13 C6 1B AE 20 20 20 20 20 20 20 20 B0 |..1.... .|
00000B20: 41 20 23 25 30 30 30 31 30 30 30 30 20 3B 50 42 |A #%00010000 ;PB|
00000B30: 34 00 47 13 D0 1B AE 20 20 20 20 20 20 20 20 53 |4.G.... S|
00000B40: 54 41 20 50 B0 54 83 00 58 13 E4 1B AE 20 20 20 |TA P.T..X.... |
00000B50: 20 20 20 20 20 52 54 53 00 6A 13 EE 1B AC B2 20 | RTS.j..... |
00000B60: 53 54 41 52 54 20 AA 32 38 30 00 80 13 F8 1B 4D |START .280.....M|
00000B70: 50 58 32 41 55 53 20 20 4C 44 41 20 50 B0 54 83 |PX2AUS LDA P.T.|
00000B80: 00 9A 13 02 1C AE 20 20 20 20 20 20 20 20 AF 20 |...... . |
00000B90: 23 25 31 31 31 30 31 31 31 31 00 B0 13 0C 1C AE |#%11101111......|
00000BA0: 20 20 20 20 20 20 20 20 53 54 41 20 50 B0 54 83 | STA P.T.|
00000BB0: 00 C1 13 16 1C AE 20 20 20 20 20 20 20 20 52 54 |...... RT|
00000BC0: 53 00 DD 13 4C 1D 3B AC AC AC AC AC AC AC AC AC |S...L.;.........|
00000BD0: AC AC AC AC AC AC AC AC AC AC AC AC AC 00 F9 13 |................|
00000BE0: 56 1D 3B AC 20 20 54 52 49 41 43 53 20 41 4E 20 |V.;. TRIACS AN |
00000BF0: 26 20 41 55 53 20 20 20 AC 00 15 14 60 1D 3B AC |& AUS ....`.;.|
00000C00: AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC |................|
00000C10: AC AC AC AC AC 00 1B 14 6A 1D 3B 00 2D 14 74 1D |........j.;.-.t.|
00000C20: AC B2 20 53 54 41 52 54 20 AA 33 30 30 00 43 14 |.. START .300.C.|
00000C30: 7E 1D 54 52 49 41 43 31 41 4E 20 4C 44 41 20 50 |~.TRIAC1AN LDA P|
00000C40: B0 54 83 00 5E 14 88 1D AE 20 20 20 20 20 20 20 |.T..^.... |
00000C50: 20 B0 41 20 23 25 30 30 30 30 30 30 30 31 00 74 | .A #%00000001.t|
00000C60: 14 92 1D AE 20 20 20 20 20 20 20 20 53 54 41 20 |.... STA |
00000C70: 50 B0 54 83 00 85 14 9C 1D AE 20 20 20 20 20 20 |P.T....... |
00000C80: 20 20 52 54 53 00 97 14 A6 1D AC B2 20 53 54 41 | RTS....... STA|
00000C90: 52 54 20 AA 33 32 30 00 AD 14 B0 1D 54 52 49 41 |RT .320.....TRIA|
00000CA0: 43 31 41 55 20 4C 44 41 20 50 B0 54 83 00 C7 14 |C1AU LDA P.T....|
00000CB0: BA 1D AE 20 20 20 20 20 20 20 20 AF 20 23 25 31 |... . #%1|
00000CC0: 31 31 31 31 31 31 30 00 DD 14 C4 1D AE 20 20 20 |1111110...... |
00000CD0: 20 20 20 20 20 53 54 41 20 50 B0 54 83 00 EE 14 | STA P.T....|
00000CE0: CE 1D AE 20 20 20 20 20 20 20 20 52 54 53 00 00 |... RTS..|
00000CF0: 15 0A 1E AC B2 20 53 54 41 52 54 20 AA 33 34 30 |..... START .340|
00000D00: 00 16 15 14 1E 54 52 49 41 43 32 41 55 20 4C 44 |.....TRIAC2AU LD|
00000D10: 41 20 50 B0 54 83 00 30 15 1E 1E AE 20 20 20 20 |A P.T..0.... |
00000D20: 20 20 20 20 AF 20 23 25 31 31 31 31 31 31 30 31 | . #%11111101|
00000D30: 00 46 15 28 1E AE 20 20 20 20 20 20 20 20 53 54 |.F.(.. ST|
00000D40: 41 20 50 B0 54 83 00 57 15 32 1E AE 20 20 20 20 |A P.T..W.2.. |
00000D50: 20 20 20 20 52 54 53 00 69 15 3C 1E AC B2 20 53 | RTS.i.<... S|
00000D60: 54 41 52 54 20 AA 33 36 30 00 7F 15 46 1E 54 52 |TART .360...F.TR|
00000D70: 49 41 43 32 41 4E 20 4C 44 41 20 50 B0 54 83 00 |IAC2AN LDA P.T..|
00000D80: 9A 15 50 1E AE 20 20 20 20 20 20 20 20 B0 41 20 |..P.. .A |
00000D90: 23 25 30 30 30 30 30 30 31 30 00 B0 15 5A 1E AE |#%00000010...Z..|
00000DA0: 20 20 20 20 20 20 20 20 53 54 41 20 50 B0 54 83 | STA P.T.|
00000DB0: 00 C1 15 64 1E AE 20 20 20 20 20 20 20 20 52 54 |...d.. RT|
00000DC0: 53 00 DE 15 40 1F 3B AC AC AC AC AC AC AC AC AC |S...@.;.........|
00000DD0: AC AC AC AC AC AC AC AC AC AC AC AC AC AC 00 FB |................|
00000DE0: 15 4A 1F 3B AC 20 20 45 49 4E 47 41 45 4E 47 45 |.J.;. EINGAENGE|
00000DF0: 20 31 AB 32 AB 33 AB 34 20 20 AC 00 18 16 54 1F | 1.2.3.4 ....T.|
00000E00: 3B AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC |;...............|
00000E10: AC AC AC AC AC AC AC AC 00 1E 16 5E 1F 3B 00 30 |...........^.;.0|
00000E20: 16 68 1F AC B2 20 53 54 41 52 54 20 AA 34 30 30 |.h... START .400|
00000E30: 00 46 16 72 1F 53 55 42 45 49 4E 47 20 20 4C 44 |.F.r.SUBEING LD|
00000E40: 41 20 4D 50 58 31 00 5C 16 7C 1F AE 20 20 20 20 |A MPX1.\.|.. |
00000E50: 20 20 20 20 42 45 51 20 45 49 4E 31 00 72 16 86 | BEQ EIN1.r..|
00000E60: 1F AE 20 20 20 20 20 20 20 20 4C 44 41 20 50 B0 |.. LDA P.|
00000E70: 54 83 00 8C 16 90 1F AE 20 20 20 20 20 20 20 20 |T....... |
00000E80: AF 20 23 25 30 30 30 30 30 31 30 30 00 A2 16 9A |. #%00000100....|
00000E90: 1F AE 20 20 20 20 20 20 20 20 42 4E 45 20 45 49 |.. BNE EI|
00000EA0: 4E 32 00 BC 16 A4 1F AE 20 20 20 20 20 20 20 20 |N2...... |
00000EB0: 53 54 41 20 45 49 4E 47 41 4E 47 31 00 D2 16 AE |STA EINGANG1....|
00000EC0: 1F AE 20 20 20 20 20 20 20 20 4A 4D 50 20 45 49 |.. JMP EI|
00000ED0: 4E 33 00 E6 16 B8 1F 45 49 4E 32 20 20 20 20 20 |N3.....EIN2 |
00000EE0: 4C 44 41 20 23 31 00 00 17 C2 1F AE 20 20 20 20 |LDA #1...... |
00000EF0: 20 20 20 20 53 54 41 20 45 49 4E 47 41 4E 47 31 | STA EINGANG1|
00000F00: 00 06 17 08 20 3B 00 1C 17 4E 20 45 49 4E 33 20 |.... ;...N EIN3 |
00000F10: 20 20 20 20 4C 44 41 20 50 B0 54 83 00 36 17 58 | LDA P.T..6.X|
00000F20: 20 AE 20 20 20 20 20 20 20 20 AF 20 23 25 30 30 | . . #%00|
00000F30: 30 30 31 30 30 30 00 4C 17 62 20 AE 20 20 20 20 |001000.L.b . |
00000F40: 20 20 20 20 42 4E 45 20 45 49 4E 34 00 66 17 6C | BNE EIN4.f.l|
00000F50: 20 AE 20 20 20 20 20 20 20 20 53 54 41 20 45 49 | . STA EI|
00000F60: 4E 47 41 4E 47 32 00 7C 17 76 20 AE 20 20 20 20 |NGANG2.|.v . |
00000F70: 20 20 20 20 4A 4D 50 20 45 49 4E 35 00 90 17 80 | JMP EIN5....|
00000F80: 20 45 49 4E 34 20 20 20 20 20 4C 44 41 20 23 31 | EIN4 LDA #1|
00000F90: 00 AA 17 8A 20 AE 20 20 20 20 20 20 20 20 53 54 |.... . ST|
00000FA0: 41 20 45 49 4E 47 41 4E 47 32 00 C0 17 CA 21 AE |A EINGANG2....!.|
00000FB0: 20 20 20 20 20 20 20 20 4A 4D 50 20 45 49 4E 35 | JMP EIN5|
00000FC0: 00 C6 17 D4 21 3B 00 DC 17 DE 21 45 49 4E 31 20 |....!;....!EIN1 |
00000FD0: 20 20 20 20 4C 44 41 20 50 B0 54 83 00 F6 17 E8 | LDA P.T.....|
00000FE0: 21 AE 20 20 20 20 20 20 20 20 AF 20 23 25 30 30 |!. . #%00|
00000FF0: 30 30 30 31 30 30 00 0C 18 F2 21 AE 20 20 20 20 |000100....!. |
00001000: 20 20 20 20 42 4E 45 20 45 49 4E 36 00 26 18 FC | BNE EIN6.&..|
00001010: 21 AE 20 20 20 20 20 20 20 20 53 54 41 20 45 49 |!. STA EI|
00001020: 4E 47 41 4E 47 33 00 3C 18 06 22 AE 20 20 20 20 |NGANG3.<..". |
00001030: 20 20 20 20 4A 4D 50 20 45 49 4E 37 00 50 18 10 | JMP EIN7.P..|
00001040: 22 45 49 4E 36 20 20 20 20 20 4C 44 41 20 23 31 |"EIN6 LDA #1|
00001050: 00 6A 18 1A 22 AE 20 20 20 20 20 20 20 20 53 54 |.j..". ST|
00001060: 41 20 45 49 4E 47 41 4E 47 33 00 70 18 60 22 3B |A EINGANG3.p.`";|
00001070: 00 86 18 A6 22 45 49 4E 37 20 20 20 20 20 4C 44 |...."EIN7 LD|
00001080: 41 20 50 B0 54 83 00 A0 18 B0 22 AE 20 20 20 20 |A P.T.....". |
00001090: 20 20 20 20 AF 20 23 25 30 30 30 30 31 30 30 30 | . #%00001000|
000010A0: 00 B6 18 BA 22 AE 20 20 20 20 20 20 20 20 42 4E |....". BN|
000010B0: 45 20 45 49 4E 38 00 D0 18 C4 22 AE 20 20 20 20 |E EIN8....". |
000010C0: 20 20 20 20 53 54 41 20 45 49 4E 47 41 4E 47 34 | STA EINGANG4|
000010D0: 00 E6 18 CE 22 AE 20 20 20 20 20 20 20 20 4A 4D |....". JM|
000010E0: 50 20 45 49 4E 35 00 FA 18 D8 22 45 49 4E 38 20 |P EIN5...."EIN8 |
000010F0: 20 20 20 20 4C 44 41 20 23 31 00 14 19 E2 22 AE | LDA #1....".|
00001100: 20 20 20 20 20 20 20 20 53 54 41 20 45 49 4E 47 | STA EING|
00001110: 41 4E 47 34 00 25 19 F6 22 45 49 4E 35 20 20 20 |ANG4.%.."EIN5 |
00001120: 20 20 52 54 53 00 3F 19 28 23 3B AC AC AC AC AC | RTS.?.(#;.....|
00001130: AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC 00 |................|
00001140: 58 19 32 23 3B AC 20 49 4E 49 54 49 41 4C AB 20 |X.2#;. INITIAL. |
00001150: 50 B0 54 20 20 20 20 AC 00 72 19 3C 23 3B AC AC |P.T ..r.<#;..|
00001160: AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC |................|
00001170: AC AC 00 78 19 50 23 3B 00 89 19 5A 23 AC B2 20 |...x.P#;...Z#.. |
00001180: 53 54 41 52 54 AA 35 35 30 00 AD 19 64 23 53 55 |START.550...d#SU|
00001190: 42 49 4E 49 54 20 20 4C 44 41 20 23 25 31 31 31 |BINIT LDA #%111|
000011A0: 31 30 30 31 31 20 3B 44 44 52 20 23 31 00 C4 19 |10011 ;DDR #1...|
000011B0: 6E 23 AE 20 20 20 20 20 20 20 20 53 54 41 20 24 |n#. STA $|
000011C0: 44 44 30 33 00 D8 19 73 23 AE 20 20 20 20 20 20 |DD03...s#. |
000011D0: 20 20 4A 4D 50 20 80 45 00 F4 19 78 23 AE 20 20 | JMP .E...x#. |
000011E0: 20 20 20 20 20 20 4C 44 41 20 23 25 31 31 31 31 | LDA #%1111|
000011F0: 31 31 31 31 00 18 1A 82 23 AE 20 20 20 20 20 20 |1111....#. |
00001200: 20 20 53 54 41 20 24 44 44 30 45 20 20 20 20 20 | STA $DD0E |
00001210: 20 3B 43 52 41 20 23 32 00 34 1A 8C 23 AE 20 20 | ;CRA #2.4..#. |
00001220: 20 20 20 20 20 20 4C 44 41 20 23 25 31 30 30 30 | LDA #%1000|
00001230: 30 30 30 30 00 58 1A 96 23 AE 20 20 20 20 20 20 |0000.X..#. |
00001240: 20 20 53 54 41 20 24 44 44 30 46 20 20 20 20 20 | STA $DD0F |
00001250: 20 3B 43 52 42 20 23 32 00 67 1A A0 23 80 45 20 | ;CRB #2.g..#.E |
00001260: 20 20 20 20 52 54 53 00 00 00 | RTS... |
....N.."LADEN DES ASS"...X..A.0.A.1:."AS
S",8,1.Q.L.."LOESCHEN DES ALTEN ASM-CODE
".K.V..9,8,15,"S:IF.MK ": 9......"ERZEUG
EN DES NEUEN ASM-CODE"......1,8,1,"IF.MK
"......9.4096......OPT O1.O...EINGANG1
. $033C.....EINGANG2 . $033D...(.EINGANG
3 . $033E...2.EINGANG4 . $033F...F.ZYKC
. $0340.0.P.P.T. = $DD01.B.Z.SERI. = $03
41.W.D.TIMEHIGH . $0342.K.N.TIMELOW . $0
343.|.S.MPX1 . $0344...X.FLANKE . $0345.
.}.K.R. = $0346......BEI = $0347.C...ST
ART . $C000.P..... START.....;..........
...............; EINLEITUNG HPRGM.....;.
....................,.... NOP.@..
.. LDA #0.V.... STA K.R..M
.... LDA SERI....... E. K.
R....... STA SERI....... L
DA #0.E.,.. STA FLANKE.Y.6..
LDA #8...@.. STA ZYKC...J..
LDA #$08...T.. STA TIMELOW.4
.^.. LDA #$00.N.H.. STA TI
MEHIGH.H...;.........................;.
SERIELLES HPRG ......;................
.......B.;...L.. JSR SUBCLOCK.R.V
.HPRG1 JSR SUB....... JSR SUBT
IME...... JSR SUBCLOCK......
JSR SUBTIME.8.... JSR SUBCLOCK
.N.... DEC ZYKC.D.... LDA
ZYKC.{.... BEQ HPRG2......
JMP HPRG1.....HPRG2 JSR SUBCLOCK...&
.. RTS.W...;.....................
..B.;. SUBROUTINE TIME ....L.;.........
................;.*...SUBTIME LDX TIMEL
OW.A...TIME2 BEQ TIME1.R.... D
EX.I.... BEQ TIME1...... J
MP TIME2.....;. .&.TIME1 LDY TIMEHIGH
...0.. BEQ TIME3.H.:.. DEY
...D.. BEQ TIME3...N.. JMP
SUBTIME...X.TIME3 RTS.#. .;.........
............=...;. SUBCLOCK ..W.
..;.....................]...;.C.H.;.{.R.
SUBCLOCK LDA FLANKE...... BEQ FLA
NK1...... LDA P.T..L.... .
A #%10000000 ;CLOCK....... STA P.
T. ;AUSGANG....... LDA #0......
STA FLANKE.+.... RTS.H...
FLANK1 LDA P.T. ;PB7.L.... .
#%01111111 ;RUECKSET...... STA P.
T....... LDA #1...".. STA
FLANKE...,.. RTS.E.6.;.....;.....
.....................;. SUB. *
.....;..........................;.....;.
6...SUB. LDA SERIDATA.P.N.. . #%
00000001.F.... BEQ DAT1.|....
LDA P.T....... .A #%01000000.
..... STA P.T..C.... JMP D
AT2.Y...DAT1 LDA P.T....... .
#%10111111...(.. STA P.T.. .<.DA
T2 LDA SERI..1.F.. LSR.H.P..
STA SERI..Y.Z.. RTS.T.P.;.
.......................Z.;. MPX . AN & A
US ......;..........................;
.B..... START .200.H...;...T.MPX1EIN LD
A P.T....... .A #%00100000......
STA P.T..#.... LDA #1.9...
. STA MPX1.J.... RTS.\....
. START .230.R...MPX1AUS LDA P.T.......
. #%11011111...$.. STA P.
T....&.. LDA #0.L.(.. STA
MPX1...... RTS...X.;...B... START
.250...L.;.....MPX2EIN LDA P.T..1.F..
.A #%00010000 ;PB4.G.P.. S
TA P.T..X.... RTS.J..... START .2
80.....MPX2AUS LDA P.T....... .
#%11101111...... STA P.T..A....
RTS...L.;.........................
V.;. TRIACS AN & AUS ....`.;.........
................J.;.-.T... START .300.C.
~.TRIAC1AN LDA P.T..^.... .A #%00
000001.T.... STA P.T.......
RTS....... START .320.....TRIAC1AU LDA
P.T..G.... . #%11111110...D..
STA P.T....N.. RTS....... ST
ART .340.....TRIAC2AU LDA P.T..0....
. #%11111101.F.(.. STA P.T..W
.2.. RTS.I.<... START .360..F.TR
IAC2AN LDA P.T....P.. .A #%000000
10...Z.. STA P.T..A.D.. RT
S...@.;..........................J.;. E
INGAENGE 1.2.3.4 ....T.;...............
...........^.;.0.H... START .400.F.R.SUB
EING LDA MPX1.\.|.. BEQ EIN1.R..
.. LDA P.T....... . #%0000
0100...... BNE EIN2......
STA EINGANG1.R.... JMP EIN3.....E
IN2 LDA #1...B.. STA EINGANG1
.... ;...N EIN3 LDA P.T..6.X .
. #%00001000.L.B . BNE EIN4.F.L
. STA EINGANG2.|.V . JMP
EIN5.... EIN4 LDA #1.... . ST
A EINGANG2...J!. JMP EIN5.F.T!;..
..!EIN1 LDA P.T.....!. . #%00
000100....!. BNE EIN6.&..!.
STA EINGANG3.<..". JMP EIN7.P..
"EIN6 LDA #1.J..". STA EINGAN
G3.P.`";...."EIN7 LDA P.T.. ..".
. #%00001000....". BNE EIN8.P
.D". STA EINGANG4...N". JM
P EIN5...X"EIN8 LDA #1....".
STA EINGANG4.%.."EIN5 RTS.?.(#;.....
................X.2#;. INITIAL. P.T .
.R.<#;.....................X.P#;...Z#..
START.550...D#SUBINIT LDA #%11110011 ;D
DR #1.D.N#. STA $DD03.X.S#.
JMP .E...X#. LDA #%11111111....
#. STA $DD0E ;CRA #2.4..#.
LDA #%10000000.X..#. STA $D
D0F ;CRB #2.G. #.E RTS...
> CLICK IMAGE PREVIEW FOR FULL MODAL