DISC11
FILE INFORMATION
FILENAME(S): DISC11
FILE TYPE(S): DEL
FILE SIZE: 8K
FIRST SEEN: 2025-11-30 21:11:47
APPEARS ON: 1 disk(s)
FILE HASH
903e09798f130d4f16d7c2ab448cca0fb797f2df1fa40d031a0e2c9a66bc4268
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 ASSEMBLER | DISC11 | DEL | DuncanTwain | 30 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 20 4C 44 41 20 20 30 30 36 39 8F FF FF FF 8D FF | LDA 0069......| 00000010: 9B FF 9F FF 9B FF FF FF 01 48 FF 44 01 FF 68 08 |.........H.D..h.| 00000020: 08 08 08 08 89 C9 9A 48 08 0C 04 44 08 08 08 08 |.......H...D....| 00000030: 08 05 CB FA F9 9D D9 FA 68 08 FF FF FF FF FF FF |........h.......| 00000040: FF FF FF FF FF FF FF AE FF FF FF FF FF FF FF FF |................| 00000050: FF FF FF FF FF FF FF FF FF FF FF AD 0E FF 6F FF |..............o.| 00000060: FF FF FF FF FF FF FF FF FF FF FF FF FF FF AD FF |................| 00000070: AD 0E FF FF FF FF FF FF FF FF FF FF FF 3C 08 FD |.............<..| 00000080: FF 68 08 08 08 08 08 8E 8D 9E C1 FB C9 F9 CA 9D |.h..............| 00000090: A8 8E C9 DA 48 08 08 08 08 08 08 08 05 CB CA F9 |....H...........| 000000A0: FA FB 68 89 CA 9D 9E 89 DB CB C9 DB A1 91 68 08 |..h...........h.| 000000B0: 08 08 08 08 89 F9 99 48 08 0C 0C 04 A5 FF 08 FD |.......H........| 000000C0: FF 05 48 FF A5 FF FF FF FF FF FF FF FF FF FF FF |..H.............| 000000D0: 2F FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |/...............| 000000E0: FF FF FF FF FF 6D AD FF FF FF AD FF FF FF FF FF |.....m..........| 000000F0: 22 E0 D2 02 02 02 02 02 04 34 D5 02 02 33 30 30 |"........4...300| 00000100: 0D 20 20 20 20 20 20 42 43 53 20 20 4B 4C 41 46 |. BCS KLAF| 00000110: 31 0D 20 20 20 20 20 20 41 44 43 20 20 30 33 33 |1. ADC 033| 00000120: 0D 4B 4C 41 46 31 20 53 54 41 20 20 30 30 36 39 |.KLAF1 STA 0069| 00000130: 30 2C 58 0D 20 20 20 20 20 20 52 54 53 0D 47 52 |0,X. RTS.GR| 00000140: 46 49 58 20 4A 53 52 20 20 4B 54 4E 58 54 20 3B |FIX JSR KTNXT ;| 00000150: 4B 54 2C 4C 54 2C 53 54 20 49 4E 2E 0D 47 52 46 |KT,LT,ST IN..GRF| 00000160: 49 59 20 4A 53 52 20 20 4C 54 4E 59 54 20 3B 58 |IY JSR LTNYT ;X| 00000170: 54 2C 4C 54 2C 53 54 20 49 4E 2E 0D 47 52 46 49 |T,LT,ST IN..GRFI| 00000180: 5A 20 4C 44 41 20 20 30 30 36 39 32 20 3B 58 54 |Z LDA 00692 ;XT| 00000190: 2C 59 54 2C 53 54 20 49 4E 2E 0D 20 20 20 20 20 |,YT,ST IN.. | 000001A0: 20 41 4E 44 20 23 30 36 33 0D 20 20 20 20 20 20 | AND #063. | 000001B0: 53 54 41 20 20 30 30 36 39 39 0D 20 20 20 20 20 |STA 00699. | 000001C0: 20 45 4F 52 20 20 30 30 36 39 32 0D 20 20 20 20 | EOR 00692. | 000001D0: 20 20 42 45 51 20 20 47 52 46 49 31 0D 20 20 20 | BEQ GRFI1. | 000001E0: 20 20 20 43 4C 43 0D 20 20 20 20 20 20 2E 42 59 | CLC. .BY| 000001F0: 54 45 20 24 32 41 0D 20 20 20 20 20 20 2E 42 59 |TE $2A. .BY| 00000200: 54 45 20 24 32 41 0D 20 20 20 20 20 20 2E 42 59 |TE $2A. .BY| 00000210: 54 45 20 24 32 41 0D 20 20 20 20 20 20 2E 42 59 |TE $2A. .BY| 00000220: 54 45 20 24 32 41 0D 20 20 20 20 20 20 54 41 58 |TE $2A. TAX| 00000230: 0D 20 20 20 20 20 20 44 45 58 0D 20 20 20 20 20 |. DEX. | 00000240: 20 44 45 58 0D 20 20 20 20 20 20 4C 44 41 20 20 | DEX. LDA | 00000250: 30 30 37 31 30 2C 58 20 3B 47 45 5A 45 54 20 44 |00710,X ;GEZET D| 00000260: 4F 4F 52 0D 20 20 20 20 20 20 53 54 41 20 20 30 |OOR. STA 0| 00000270: 30 36 38 36 20 20 20 3B 49 4E 4C 4F 4F 50 2E 0D |0686 ;INLOOP..| 00000280: 20 20 20 20 20 20 4C 44 41 20 20 30 30 37 31 31 | LDA 00711| 00000290: 2C 58 0D 20 20 20 20 20 20 53 54 41 20 20 30 30 |,X. STA 00| 000002A0: 36 38 37 0D 20 20 20 20 20 20 4C 44 41 20 20 30 |687. LDA 0| 000002B0: 30 37 31 34 2C 58 0D 20 20 20 20 20 20 53 54 41 |0714,X. STA| 000002C0: 20 20 30 30 36 37 39 0D 20 20 20 20 20 20 4C 44 | 00679. LD| 000002D0: 41 20 20 30 30 37 31 35 2C 58 0D 20 20 20 20 20 |A 00715,X. | 000002E0: 20 53 54 41 20 20 30 30 36 38 FF FB FF FF FF FF | STA 0068......| 000002F0: FF FF FF FF FF FF FF FF FF FF 33 32 20 20 20 3B |..........32 ;| 00000300: 2A 20 56 45 4C 53 43 41 20 2A 0D 47 52 46 49 31 |* VELSCA *.GRFI1| 00000310: 20 52 54 53 0D 42 55 46 41 44 20 4C 44 41 20 20 | RTS.BUFAD LDA | 00000320: 30 30 36 38 34 20 20 3B 42 55 46 46 45 52 41 44 |00684 ;BUFFERAD| 00000330: 52 45 53 20 55 49 54 0D 20 20 20 20 20 20 53 54 |RES UIT. ST| 00000340: 41 20 20 32 35 34 20 20 20 20 3B 4B 4F 4C 4F 4D |A 254 ;KOLOM| 00000350: 20 28 36 39 30 29 3D 4B 54 2E 0D 20 20 20 20 20 | (690)=KT.. | 00000360: 20 4C 44 41 20 23 30 30 30 20 20 20 20 3B 41 44 | LDA #000 ;AD| 00000370: 52 45 53 20 28 32 35 34 2C 32 35 33 29 0D 20 20 |RES (254,253). | 00000380: 20 20 20 20 53 54 41 20 20 32 35 33 20 20 20 20 | STA 253 | 00000390: 3B 55 49 54 20 32 35 36 2A 28 36 38 34 29 2B 0D |;UIT 256*(684)+.| 000003A0: 20 20 20 20 20 20 4C 44 58 20 23 30 39 31 20 20 | LDX #091 | 000003B0: 20 20 3B 20 20 20 20 2B 39 31 2A 4B 54 2E 0D 20 | ; +91*KT.. | 000003C0: 20 20 20 20 20 4C 44 59 20 20 30 30 36 39 30 20 | LDY 00690 | 000003D0: 20 3B 47 45 42 52 55 49 4B 54 20 52 45 47 53 2E | ;GEBRUIKT REGS.| 000003E0: 0D 20 20 20 20 20 20 4A 53 52 20 20 56 4D 4F 50 |. JSR VMOP| 000003F0: 54 20 20 3B 58 20 45 4E 20 5B FF FB FF FF FF FF |T ;X EN [......| 00000400: FF FF FF FF FF FA D6 FF FF E2 ED FF FF FF FF FF |................| 00000410: FF FF FF FF FF 39 FF FF 8D 7D 7C 77 FF 94 94 FF |.....9...}|w....| 00000420: FF FF 77 8C 85 FF FF FF FF FF FF FF FF 77 FF FF |..w..........w..| 00000430: FF 89 87 99 FF FF FF FF 8D FF 78 8E FF 9B FF FF |..........x.....| 00000440: 9C FF FF FF 79 FF 77 85 FF FF FF FF FF FF FF FF |....y.w.........| 00000450: FF FF FF 88 9F 8F 8F FF FF FF FF 8D FF 75 8D FF |.............u..| 00000460: FF 9B 8D 10 2B 3D 4B 54 2E 0D 20 20 20 20 20 20 |....+=KT.. | 00000470: 53 54 41 20 20 32 35 34 20 20 20 20 3B 55 49 54 |STA 254 ;UIT| 00000480: 3A 28 8B FF FF FF 9B FF FF FF 07 FF FF FF FF FF |:(..............| 00000490: FF 33 13 3A FF FF FF FF FF FF FF FF FF FF FF FF |.3.:............| 000004A0: FF 3A 1B FF 27 FF FF FF FF FF FF 33 13 3E FF FF |.:..'......3.>..| 000004B0: FF FF FF FF 0A 27 FF FF FF FF FF FF 36 FF FF FF |.....'......6...| 000004C0: FF 3D 37 1F 1A 3B 27 FF FF FF FF FF FF 33 13 3A |.=7..;'......3.:| 000004D0: FF FF FF FF FF A7 FF FF FF FF FF FF 33 13 3E 08 |............3.>.| 000004E0: 08 04 0C EC 91 68 08 08 08 08 08 89 F9 99 48 08 |.....h........H.| 000004F0: 0C 0C 04 A5 FF 81 20 20 20 20 20 20 43 4D 50 20 |...... CMP | 00000500: 23 30 34 35 0D 20 20 20 20 20 20 42 43 43 20 20 |#045. BCC | 00000510: 4B 54 4E 58 31 0D 20 20 20 20 20 20 54 58 41 0D |KTNX1. TXA.| 00000520: 20 20 20 20 20 20 53 42 43 20 23 30 36 34 0D 20 | SBC #064. | 00000530: 20 20 20 20 20 54 41 58 0D 20 20 20 20 20 20 54 | TAX. T| 00000540: 59 41 0D 20 20 20 20 20 20 53 42 43 20 23 30 30 |YA. SBC #00| 00000550: 31 0D 20 20 20 20 20 20 54 41 59 0D 4B 54 4E 58 |1. TAY.KTNX| 00000560: 31 20 53 54 58 20 20 30 30 36 39 37 0D 20 20 20 |1 STX 00697. | 00000570: 20 20 20 53 54 59 20 20 30 30 36 39 38 0D 20 20 | STY 00698. | 00000580: 20 20 20 20 52 54 53 0D 4C 54 4E 59 54 20 43 4C | RTS.LTNYT CL| 00000590: 43 20 20 20 20 20 20 20 20 20 3B 5B 4C 54 5D 2D |C ;[LT]-| 000005A0: 2D 3E 28 59 54 29 2E 0D 20 20 20 20 20 20 4C 44 |->(YT).. LD| 000005B0: 41 20 20 30 30 36 38 38 20 20 3B 59 42 2D 34 32 |A 00688 ;YB-42| 000005C0: 3E 3D 30 20 49 4E 0D 20 20 20 20 20 20 41 44 43 |>=0 IN. ADC| 000005D0: 20 20 30 30 36 39 31 20 20 3B 28 36 38 38 29 20 | 00691 ;(688) | 000005E0: 45 45 52 53 54 2E 0D 20 20 20 20 20 20 41 44 43 |EERST.. ADC| 000005F0: 20 20 30 30 36 39 11 20 20 3B 49 4E 3A 20 28 8B | 0069. ;IN: (.| 00000600: FF FF 9C 1E FF 77 85 FF FF FF FF FF FF FF FF FF |.....w..........| 00000610: FF FF FF 8F 8F 8B FF FF FF FF 8D 77 FF 77 8D FF |...........w.w..| 00000620: FF FF 04 A1 FF 1E 1B FF 27 FF FF FF FF FF FF 3B |........'......;| 00000630: 32 BA 07 FF FF FF FF FF FF 33 13 32 FF FF FF FF |2........3.2....| 00000640: FF FF 0A 27 FF FF FF FF FF FF FF B7 1A FF FF FF |...'............| 00000650: FF FF A7 FF FF FF FF FF FF FF FF FF FF FF 33 1B |..............3.| 00000660: 37 3E 0A A7 FF FF FF FF FF FF FF B3 FF A7 FF FF |7>..............| 00000670: FF FF FF FF 3B 3A 12 A7 FF FF FF FF FF FF 32 B3 |....;:........2.| 00000680: FF FF FF FF FF FF 27 FF FF FF FF FF FF 3B 32 BA |......'......;2.| 00000690: 07 13 1B 37 3E CF FF FF 77 FF FF FF 8F 8F 8B FF |...7>...w.......| 000006A0: FF 27 FF FF FF FF FF FF FF 3B FF A7 FF 3B BA 3F |.'.......;...;.?| 000006B0: FF FF 36 FF FF FF FF FF 3B BF 32 B3 FF FF FF BA |..6.....;.2.....| 000006C0: 3F 13 BB FF FF FF 3B BF 3F 33 FF 27 FF FF FF FF |?.....;.?3.'....| 000006D0: FF FF 33 13 32 FF FF FF FF FF FF FF FF FF FF BD |..3.2...........| 000006E0: 32 B7 32 BF FF 36 BF 13 1F 17 FF 36 BB FF 27 FF |2.2..6.....6..'.| 000006F0: FF FF 20 20 20 53 54 41 20 20 32 35 31 20 20 20 |.. STA 251 | 00000700: 20 3B 41 41 4E 54 41 4C 20 4B 4F 4C 4F 4D 4D 45 | ;AANTAL KOLOMME| 00000710: 4E 0D 20 20 20 20 20 20 4C 44 41 20 23 30 39 31 |N. LDA #091| 00000720: 20 20 20 20 3B 49 4E 20 28 32 33 29 2E 0D 20 20 | ;IN (23).. | 00000730: 20 20 20 20 53 54 41 20 20 30 32 34 0D 20 20 20 | STA 024. | 00000740: 20 20 20 53 54 41 20 20 30 33 34 0D 20 20 20 20 | STA 034. | 00000750: 20 20 4C 44 41 20 23 30 30 30 0D 20 20 20 20 20 | LDA #000. | 00000760: 20 53 54 41 20 20 30 33 35 0D 20 20 20 20 20 20 | STA 035. | 00000770: 4A 53 52 20 20 33 31 34 33 34 20 20 20 3B 2A 20 |JSR 31434 ;* | 00000780: 42 4C 4F 56 55 4C 20 2A 0D 20 20 20 20 20 20 52 |BLOVUL *. R| 00000790: 54 53 0D 42 55 56 55 20 20 4A 53 52 20 20 42 55 |TS.BUVU JSR BU| 000007A0: 46 41 44 20 20 3B 42 55 46 46 45 52 20 56 55 4C |FAD ;BUFFER VUL| 000007B0: 4C 45 4E 2E 0D 20 20 20 20 20 20 4A 53 52 20 20 |LEN.. JSR | 000007C0: 4C 4F 52 4F 50 20 20 3B 49 4E 50 55 54 3A 0D 20 |LOROP ;INPUT:. | 000007D0: 20 20 20 20 20 4C 44 59 20 23 30 30 30 20 20 20 | LDY #000 | 000007E0: 20 3B 4B 54 3D 28 36 39 30 29 2E 0D 20 20 20 20 | ;KT=(690).. | 000007F0: 20 20 4C 44 41 20 28 32 35 33 29 2C 59 FF 8D FF | LDA (253),Y...| 00000800: 77 8E FF 9B FF FF 9C 85 FF FF FF FF FF FF FF FF |w...............| 00000810: 74 7F FF 88 9F FF B0 20 20 20 20 3B 53 54 3D 28 |t...... ;ST=(| 00000820: 36 39 32 29 2E 0D 20 20 20 20 20 20 42 43 53 20 |692).. BCS | 00000830: 20 42 55 56 31 20 20 20 3B 53 54 20 42 49 54 53 | BUV1 ;ST BITS| 00000840: 20 37 20 45 4E 20 36 0D 20 20 20 20 20 20 41 44 | 7 EN 6. AD| 00000850: 43 20 23 30 30 32 20 20 20 20 3B 47 52 4F 45 50 |C #002 ;GROEP| 00000860: 20 31 20 4F 46 20 32 2E 0D 20 20 20 20 20 20 4C | 1 OF 2.. L| 00000870: 44 59 20 23 30 30 30 20 20 20 20 3B 53 54 20 42 |DY #000 ;ST B| 00000880: 49 54 53 20 35 2E 2E 2E 30 0D 20 20 20 20 20 20 |ITS 5...0. | 00000890: 53 54 41 20 28 32 35 33 29 2C 59 20 3B 49 4E 44 |STA (253),Y ;IND| 000008A0: 45 58 20 49 4E 20 47 52 4F 45 50 2E 0D 20 20 20 |EX IN GROEP.. | 000008B0: 20 20 20 54 41 59 0D 20 20 20 20 20 20 4C 44 41 | TAY. LDA| 000008C0: 20 20 30 30 36 39 32 0D 20 20 20 20 20 20 53 54 | 00692. ST| 000008D0: 41 20 28 32 35 33 29 2C 59 0D 20 20 20 20 20 20 |A (253),Y. | 000008E0: 44 45 59 0D 20 20 20 20 20 20 4C 44 41 20 20 30 |DEY. LDA 0| 000008F0: 30 36 39 31 0D 20 20 20 20 20 20 53 54 41 20 28 |0691. STA (| 00000900: 32 35 33 29 2C 59 0D 42 55 56 31 20 20 4A 53 52 |253),Y.BUV1 JSR| 00000910: 20 20 4C 4F 52 44 49 0D 20 20 20 20 20 20 52 54 | LORDI. RT| 00000920: 53 0D 42 55 44 4D 20 20 4A 53 52 20 20 42 55 46 |S.BUDM JSR BUF| 00000930: 41 44 20 20 3B 42 59 54 45 50 41 52 45 4E 20 57 |AD ;BYTEPAREN W| 00000940: 45 47 2D 0D 20 20 20 20 20 20 4A 53 52 20 20 4C |EG-. JSR L| 00000950: 4F 52 4F 50 20 20 3B 48 41 4C 45 4E 20 56 4F 4F |OROP ;HALEN VOO| 00000960: 52 0D 20 20 20 20 20 20 4C 44 59 20 23 30 30 30 |R. LDY #000| 00000970: 20 20 20 20 3B 4B 4F 4C 4F 4D 20 4B 54 20 45 4E | ;KOLOM KT EN| 00000980: 0D 20 20 20 20 20 20 4C 44 41 20 28 32 35 33 29 |. LDA (253)| 00000990: 2C 59 20 3B 52 45 47 45 4C 20 4C 54 2E 0D 20 20 |,Y ;REGEL LT.. | 000009A0: 20 20 20 20 42 45 51 20 20 42 55 44 35 20 20 20 | BEQ BUD5 | 000009B0: 3B 50 41 41 52 20 28 4C 54 2C 53 54 29 2E 0D 20 |;PAAR (LT,ST).. | 000009C0: 20 20 20 20 20 53 54 41 20 20 30 33 31 20 20 20 | STA 031 | 000009D0: 20 3B 4B 54 3D 28 36 39 30 29 2E 0D 20 20 20 20 | ;KT=(690).. | 000009E0: 20 20 4C 44 59 20 23 30 30 30 20 20 20 20 3B 4C | LDY #000 ;L| 000009F0: 54 3D 28 36 39 31 29 2E 0D 20 20 20 20 20 20 53 |T=(691).. S| 00000A00: 54 59 20 20 30 33 32 20 20 20 20 3B 47 41 54 45 |TY 032 ;GATE| 00000A10: 4E 20 57 45 47 2C 57 41 41 52 2D 0D 42 55 44 31 |N WEG,WAAR-.BUD1| 00000A20: 20 20 49 4E 59 20 20 20 20 20 20 20 20 20 3B 4E | INY ;N| 00000A30: 41 20 41 41 4E 54 41 4C 20 57 4F 52 44 54 0D 20 |A AANTAL WORDT. | 00000A40: 20 20 20 20 20 4C 44 41 20 28 32 35 33 29 2C 59 | LDA (253),Y| 00000A50: 20 3B 42 49 4A 47 45 57 45 52 4B 54 2E 0D 20 20 | ;BIJGEWERKT.. | 00000A60: 20 20 20 20 49 4E 59 0D 20 20 20 20 20 20 43 4D | INY. CM| 00000A70: 50 20 20 30 30 36 39 31 0D 20 20 20 20 20 20 42 |P 00691. B| 00000A80: 45 51 20 20 42 55 44 32 20 0D 20 20 20 20 20 20 |EQ BUD2 . | 00000A90: 54 41 58 0D 20 20 20 20 20 20 4C 44 41 20 28 32 |TAX. LDA (2| 00000AA0: 35 33 29 2C 59 0D 20 20 20 20 20 20 49 4E 43 20 |53),Y. INC | 00000AB0: 20 30 33 32 0D 20 20 20 20 20 20 49 4E 43 20 20 | 032. INC | 00000AC0: 30 33 32 0D 20 20 20 20 20 20 43 50 59 20 20 30 |032. CPY 0| 00000AD0: 33 32 0D 20 20 20 20 20 20 42 45 51 20 20 42 55 |32. BEQ BU| 00000AE0: 44 32 20 0D 20 20 20 20 20 20 53 54 59 20 20 30 |D2 . STY 0| 00000AF0: 33 33 0D 20 20 20 20 20 20 4C 44 59 20 20 30 33 |33. LDY 03| 00000B00: 32 0D 20 20 20 20 20 20 53 54 41 20 28 32 35 33 |2. STA (253| 00000B10: 29 2C 59 0D 20 20 20 20 20 20 44 45 59 0D 20 20 |),Y. DEY. | 00000B20: 20 20 20 20 54 58 41 0D 20 20 20 20 20 20 53 54 | TXA. ST| 00000B30: 41 20 28 32 35 33 29 2C 59 0D 20 20 20 20 20 20 |A (253),Y. | 00000B40: 4C 44 59 20 20 30 33 33 0D 42 55 44 32 20 20 43 |LDY 033.BUD2 C| 00000B50: 50 59 20 20 30 33 31 0D 20 20 20 20 20 20 42 43 |PY 031. BC| 00000B60: 43 20 20 42 55 44 31 20 0D 20 20 20 20 20 20 4C |C BUD1 . L| 00000B70: 44 59 20 23 30 30 30 0D 20 20 20 20 20 20 4C 44 |DY #000. LD| 00000B80: 41 20 20 30 33 32 0D 20 20 20 20 20 20 53 54 41 |A 032. STA| 00000B90: 20 28 32 35 33 29 2C 59 0D 20 20 20 20 20 20 4C | (253),Y. L| 00000BA0: 44 59 20 20 30 33 32 0D 20 20 20 20 20 20 4C 44 |DY 032. LD| 00000BB0: 41 20 23 30 30 30 0D 20 20 20 20 20 20 42 45 51 |A #000. BEQ| 00000BC0: 20 20 42 55 44 34 20 0D 42 55 44 33 20 20 49 4E | BUD4 .BUD3 IN| 00000BD0: 59 0D 20 20 20 20 20 20 53 54 41 20 28 32 35 33 |Y. STA (253| 00000BE0: 29 2C 59 0D 42 55 44 34 20 20 43 50 59 20 20 30 |),Y.BUD4 CPY 0| 00000BF0: 33 31 0D 20 20 20 20 20 20 42 43 43 20 20 42 55 |31. BCC BU| 00000C00: 44 33 0D 42 55 44 35 20 20 4A 53 52 20 20 4C 4F |D3.BUD5 JSR LO| 00000C10: 52 44 49 0D 20 20 20 20 20 20 52 54 53 0D 42 55 |RDI. RTS.BU| 00000C20: 4D 50 20 20 4C 44 41 20 20 30 30 36 39 30 20 20 |MP LDA 00690 | 00000C30: 3B 44 55 4D 50 20 42 55 46 46 45 52 20 41 46 0D |;DUMP BUFFER AF.| 00000C40: 20 20 20 20 20 20 53 54 41 20 20 30 32 35 20 20 | STA 025 | 00000C50: 20 20 3B 4B 4F 4C 4F 4D 20 28 36 39 30 29 3D 4B | ;KOLOM (690)=K| 00000C60: 54 2E 0D 20 20 20 20 20 20 4C 44 41 20 20 30 32 |T.. LDA 02| 00000C70: 33 20 20 20 20 3B 41 41 4E 54 41 4C 20 49 4E 20 |3 ;AANTAL IN | 00000C80: 28 32 33 29 2E 0D 20 20 20 20 20 20 53 54 41 20 |(23).. STA | 00000C90: 20 30 32 36 0D 20 20 20 20 20 20 4A 53 52 20 20 | 026. JSR | 00000CA0: 42 55 46 41 44 0D 20 20 20 20 20 20 4C 44 41 20 |BUFAD. LDA | 00000CB0: 20 32 35 33 0D 20 20 20 20 20 20 53 54 41 20 20 | 253. STA | 00000CC0: 30 33 34 0D 20 20 20 20 20 20 4C 44 41 20 20 32 |034. LDA 2| 00000CD0: 35 34 0D 20 20 20 20 20 20 53 54 41 20 20 30 33 |54. STA 03| 00000CE0: 35 0D 20 20 20 20 20 20 4A 53 52 20 20 4C 4F 52 |5. JSR LOR| 00000CF0: 4F 50 0D 42 55 4D 67 FF FF FF FF FF FF FF FF FF |OP.BUMg.........| 00000D00: FF FB FF FF FF FF FF FF FF DA D3 FF FF FF EE DB |................| 00000D10: FF FF FB FF FF FF FF FF FF FF FF FF FF FF FF FF |................| 00000D20: FF FB FF FF FF FF FF FF FF FF FF FF FF C0 44 CA |..............D.| 00000D30: FF 8F FF 16 80 80 80 80 80 88 A8 9D D4 80 88 A8 |................| 00000D40: DD B6 44 88 16 80 80 80 80 80 88 D9 9C FF 1F A8 |..D.............| 00000D50: DD B6 40 80 88 9F 99 94 80 FF C0 44 CA FF 8F FF |..@........D....| 00000D60: 16 80 80 80 80 80 88 EC D9 94 80 80 C0 C0 4A FF |..............J.| 00000D70: 48 16 80 80 80 80 80 88 99 9D FF 16 80 80 80 80 |H...............| 00000D80: 80 88 9F 99 94 80 FF C0 44 CA FF 8F FF 16 80 80 |........D.......| 00000D90: 80 80 80 88 EC D9 94 80 80 C0 C0 4A FF CC 16 80 |...........J....| 00000DA0: 80 80 80 80 88 99 9D FF 16 80 80 80 80 80 88 EC |................| 00000DB0: D9 FF 80 80 C0 40 C9 16 80 80 80 80 80 88 B8 EC |.....@..........| 00000DC0: E0 80 88 AD E8 A9 FF FF 16 80 80 80 80 80 88 9F |................| 00000DD0: 99 FF 80 80 C0 40 C9 16 80 80 80 80 80 88 A8 B9 |.....@..........| 00000DE0: 9E 80 88 A0 55 4D 32 20 0D 42 55 4D 33 20 20 43 |....UM2 .BUM3 C| 00000DF0: 4C 43 0D 20 20 20 20 20 20 4C 44 41 20 20 30 33 |LC. LDA 03| 00000E00: 34 0D 20 20 20 20 20 20 41 44 43 20 23 30 39 31 |4. ADC #091| 00000E10: 0D 20 20 20 20 20 20 53 54 41 20 20 30 33 34 0D |. STA 034.| 00000E20: 20 20 20 20 20 20 4C 44 41 20 20 30 33 35 0D 20 | LDA 035. | 00000E30: 20 20 20 20 20 41 44 43 20 23 30 30 30 0D 20 20 | ADC #000. | 00000E40: 20 20 20 20 53 54 41 20 20 30 33 35 0D 20 20 20 | STA 035. | 00000E50: 20 20 20 49 4E 43 20 20 30 30 36 39 30 0D 20 20 | INC 00690. | 00000E60: 20 20 20 20 43 4C 43 0D 20 20 20 20 20 20 42 43 | CLC. BC| 00000E70: 43 20 20 42 55 4D 31 20 0D 42 55 4D 34 20 20 4A |C BUM1 .BUM4 J| 00000E80: 53 52 20 20 4C 4F 52 44 49 0D 20 20 20 20 20 20 |SR LORDI. | 00000E90: 4C 44 41 20 20 30 32 35 0D 20 20 20 20 20 20 53 |LDA 025. S| 00000EA0: 54 41 20 20 30 30 36 39 30 0D 20 20 20 20 20 20 |TA 00690. | 00000EB0: 52 54 53 0D 42 55 4C 45 20 20 4C 44 41 20 23 30 |RTS.BULE LDA #0| 00000EC0: 38 39 20 20 20 20 3B 5A 4F 45 4B 20 45 2E 56 2E |89 ;ZOEK E.V.| 00000ED0: 4C 45 47 45 0D 20 20 20 20 20 20 53 54 41 20 20 |LEGE. STA | 00000EE0: 30 30 36 39 8F FF FF 8D 7C 70 FF 70 74 FF FF 75 |0069....|p.pt..u| 00000EF0: FF FF FF F4 FF FF FF FF FF FF FF FF 79 FF FF FF |............y...| 00000F00: FF 71 FF FF FF FF 8D 78 FF 71 FF FF 79 FF FF 71 |.q.....x.q..y..q| 00000F10: FF FF FF 75 FF 85 FF FF FF FF FF FF FF FF FF 79 |...u...........y| 00000F20: FF FF FF 70 79 FF 7F FF FF 8D 77 FF 77 8D FF 9B |...py.....w.w...| 00000F30: FF 9F FF 95 FF FF FF FF FF FF FF FF FF FF FF FF |................| 00000F40: 8F 8F 8B FF B0 20 20 3B 3B 6F FF FF D0 FF FF FB |..... ;;o......| 00000F50: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................| 00000F60: FF FF FF FF FF FF FF FF FF D5 FF FA FF EE FF C4 |................| 00000F70: 80 88 9F 99 94 80 FF 40 CE 44 10 8F FF 16 80 80 |.......@.D......| 00000F80: 80 80 80 88 A8 B9 9E 80 88 A8 DD 96 FF 22 FF FF |............."..| 00000F90: FF FF FF FF 23 FF 3B FF FF FF FF FF FF FF 23 31 |....#.;.......#1| 00000FA0: 33 FF FF FF FF FF FF FF FF FF FF FF FF 23 FF FF |3............#..| 00000FB0: FF FF FF FF E0 AA FF FF FF FF FF FF 23 FF B3 FF |............#...| 00000FC0: FF FF FF FF FF FF FF FF FF FF FF 23 31 33 FF FF |...........#13..| 00000FD0: FF FF FF B2 FF FF FF FF FF FF 23 FF FF FF FF FF |..........#.....| 00000FE0: 30 30 30 0D 20 20 20 20 20 20 53 54 41 20 20 32 |000. STA 2| 00000FF0: 35 34 0D 20 20 20 20 20 20 44 45 58 0D 20 20 20 |54. DEX. | 00001000: 20 20 20 42 50 4C 20 20 42 55 4C 31 20 0D 42 55 | BPL BUL1 .BU| 00001010: 4C 32 20 20 49 4E 58 0D 20 20 20 20 20 20 53 54 |L2 INX. ST| 00001020: 58 20 20 30 30 36 39 FF FB FF FF FF FF FF FF FF |X 0069.........| 00001030: FF FF FF FF FF D0 FF FF D2 FB FF FF FF FF FF FF |................| 00001040: FF FF FF FA FF D2 FF D1 FF FF FF FF FF FF FF FF |................| 00001050: FF FF FF FF FF FF FF FF FF D0 FF FF FF FF FF FF |................| 00001060: D0 D7 FF D0 FF FB FF FF FF FF FF FF FF FF FF FF |................| 00001070: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF DB |................| 00001080: FF FB FF FF FF FF FF FF FF FF E3 FF FF FF FF FF |................| 00001090: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................| 000010A0: FF FF FF FA FF D2 EF FF FF FF FF FF FF FF FF FF |................| 000010B0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................| 000010C0: FF FF E3 FF FF FB FF FF FF FF FF FF FF FF FF FF |................| 000010D0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF 29 20 |..............) | 000010E0: 20 20 20 3D 59 31 2E 0D 20 20 20 20 20 20 53 54 | =Y1.. ST| 000010F0: 41 20 20 30 32 38 2C 58 20 20 20 3B 28 37 30 35 |A 028,X ;(705| 00001100: 2C 37 30 34 29 3D 58 31 2E 0D 20 20 20 20 20 20 |,704)=X1.. | 00001110: 45 4F 52 20 20 30 30 37 30 31 2C 59 0D 20 20 20 |EOR 00701,Y. | 00001120: 20 20 20 53 54 41 20 20 30 37 36 2C 58 0D 20 20 | STA 076,X. | 00001130: 20 20 20 20 4C 44 41 20 20 30 30 37 30 32 2C 59 | LDA 00702,Y| 00001140: 0D 20 20 20 20 20 20 43 4C 43 0D 20 20 20 20 20 |. CLC. | 00001150: 20 2E 42 59 54 45 20 24 36 41 0D 20 20 20 20 20 | .BYTE $6A. | 00001160: 20 52 4F 52 20 20 30 37 36 2C 58 0D 20 20 20 20 | ROR 076,X. | 00001170: 20 20 4C 44 41 20 20 30 30 37 30 30 2C 59 0D 20 | LDA 00700,Y. | 00001180: 20 20 20 20 20 41 4E 44 20 23 30 30 37 0D 20 20 | AND #007. | 00001190: 20 20 20 20 53 54 41 20 20 30 32 39 2C 58 0D 20 | STA 029,X. | 000011A0: 20 20 20 20 20 45 4F 52 20 20 30 30 37 30 30 2C | EOR 00700,| 000011B0: 59 0D 20 20 20 20 20 20 2E 42 59 54 45 20 24 34 |Y. .BYTE $4| 000011C0: 41 0D 20 20 20 20 20 20 2E 42 59 54 45 20 24 34 |A. .BYTE $4| 000011D0: 41 0D 20 20 20 20 20 20 2E 42 59 54 45 20 24 34 |A. .BYTE $4| 000011E0: 41 0D 20 20 20 20 20 20 53 54 41 20 20 30 37 37 |A. STA 077| 000011F0: 2C 58 0D 20 20 20 20 20 20 44 45 58 0D 20 20 20 |,X. DEX. | 00001200: 20 20 20 44 45 58 0D 20 20 20 20 20 20 44 45 59 | DEX. DEY| 00001210: 0D 20 20 20 20 20 20 44 45 59 0D 20 20 20 20 20 |. DEY. | 00001220: 20 44 45 59 0D 20 20 20 20 20 20 42 50 4C 20 20 | DEY. BPL | 00001230: 44 49 50 31 20 0D 20 20 20 20 20 20 4A 53 52 20 |DIP1 . JSR | 00001240: 20 33 32 32 34 32 0D 20 20 20 20 20 20 4C 44 41 | 32242. LDA| 00001250: 20 20 30 37 36 0D 20 20 20 20 20 20 43 4D 50 20 | 076. CMP | 00001260: 20 30 37 38 0D 20 20 20 20 20 20 42 45 51 20 20 | 078. BEQ | 00001270: 44 49 50 35 20 0D 20 20 20 20 20 20 4C 44 58 20 |DIP5 . LDX | 00001280: 20 30 32 38 0D 20 20 20 20 20 20 42 45 51 20 20 | 028. BEQ | 00001290: 44 49 50 32 20 0D 20 20 20 20 20 20 4A 53 52 20 |DIP2 . JSR | 000012A0: 20 57 52 45 20 20 0D 20 20 20 20 20 20 53 54 41 | WRE . STA| 000012B0: 20 20 30 30 32 0D 20 20 20 20 20 20 4C 44 58 20 | 002. LDX | 000012C0: 20 30 37 36 0D 20 20 20 20 20 20 4A 53 52 20 20 | 076. JSR | 000012D0: 57 49 54 20 20 0D 20 20 20 20 20 20 43 4C 43 0D |WIT . CLC.| 000012E0: 20 20 20 20 20 20 4C 44 41 20 20 30 37 36 0D 20 | LDA 076. | 000012F0: 20 20 20 20 20 41 44 43 20 23 30 30 34 0D 20 20 | ADC #004. | 00001300: 20 20 20 20 53 54 41 20 20 30 37 36 0D 44 49 50 | STA 076.DIP| 00001310: 32 20 20 4C 44 58 20 20 30 33 30 0D 20 20 20 20 |2 LDX 030. | 00001320: 20 20 43 50 58 20 23 30 30 37 0D 20 20 20 20 20 | CPX #007. | 00001330: 20 42 45 51 20 20 44 49 50 33 20 0D 20 20 20 20 | BEQ DIP3 . | 00001340: 20 20 4A 53 52 20 20 57 4C 49 20 20 0D 20 20 20 | JSR WLI . | 00001350: 20 20 20 53 54 41 20 20 30 30 32 0D 20 20 20 20 | STA 002. | 00001360: 20 20 4C 44 58 20 20 30 37 38 0D 20 20 20 20 20 | LDX 078. | 00001370: 20 4A 53 52 20 20 57 49 54 20 20 0D 20 20 20 20 | JSR WIT . | 00001380: 20 20 53 45 43 0D 20 20 20 20 20 20 4C 44 41 20 | SEC. LDA | 00001390: 20 30 37 38 0D 20 20 20 20 20 20 53 42 43 20 23 | 078. SBC #| 000013A0: 30 30 34 0D 20 20 20 20 20 20 53 54 41 20 20 30 |004. STA 0| 000013B0: 37 38 0D 44 49 50 33 20 20 4C 44 41 20 20 30 37 |78.DIP3 LDA 07| 000013C0: 38 0D 20 20 20 20 20 20 43 4D 50 20 20 30 37 36 |8. CMP 076| 000013D0: 0D 20 20 20 20 20 20 42 43 43 20 20 44 49 50 38 |. BCC DIP8| 000013E0: 20 0D 20 20 20 20 20 20 4C 44 41 20 23 30 30 30 | . LDA #000| 000013F0: 0D 20 20 20 20 20 20 53 54 41 20 20 30 30 32 0D |. STA 002.| 00001400: 44 49 50 34 20 20 4C 44 58 20 20 30 37 36 0D 20 |DIP4 LDX 076. | 00001410: 20 20 20 20 20 4A 53 52 20 20 57 49 54 20 20 0D | JSR WIT .| 00001420: 20 20 20 20 20 20 43 4C 43 0D 20 20 20 20 20 20 | CLC. | 00001430: 4C 44 41 20 20 30 37 36 0D 20 20 20 20 20 20 41 |LDA 076. A| 00001440: 44 43 20 23 30 30 34 0D 20 20 20 20 20 20 53 54 |DC #004. ST| 00001450: 41 20 20 30 37 36 0D 20 20 20 20 20 20 4C 44 41 |A 076. LDA| 00001460: 20 20 30 37 38 0D 20 20 20 20 20 20 43 4D 50 20 | 078. CMP | 00001470: 20 30 37 36 0D 20 20 20 20 20 20 42 43 53 20 20 | 076. BCS | 00001480: 44 49 50 34 20 0D 20 20 20 20 20 20 42 43 43 20 |DIP4 . BCC | 00001490: 20 44 49 50 38 20 0D 44 49 50 35 20 20 4C 44 41 | DIP8 .DIP5 LDA| 000014A0: 20 20 30 32 38 0D 20 20 20 20 20 20 42 4E 45 20 | 028. BNE | 000014B0: 20 44 49 50 36 20 0D 20 20 20 20 20 20 4C 44 41 | DIP6 . LDA| 000014C0: 20 20 30 33 30 0D 20 20 20 20 20 20 43 4D 50 20 | 030. CMP | 000014D0: 23 30 30 37 0D 20 20 20 20 20 20 42 4E 45 20 20 |#007. BNE | 000014E0: 44 49 50 36 20 0D 20 20 20 20 20 20 4C 44 41 20 |DIP6 . LDA | 000014F0: 23 30 30 30 0D 20 20 20 20 20 20 42 45 51 20 20 |#000. BEQ | 00001500: 44 49 50 37 20 0D 44 49 50 36 20 20 4C 44 58 20 |DIP7 .DIP6 LDX | 00001510: 20 30 32 38 0D 20 20 20 20 20 20 4A 53 52 20 20 | 028. JSR | 00001520: 57 52 45 20 20 0D 20 20 20 20 20 20 53 54 41 20 |WRE . STA | 00001530: 20 30 30 32 0D 20 20 20 20 20 20 4C 44 58 20 20 | 002. LDX | 00001540: 30 33 30 0D 20 20 20 20 20 20 4A 53 52 20 20 57 |030. JSR W| 00001550: 4C 49 20 20 0D 20 20 20 20 20 20 4F 52 41 20 20 |LI . ORA | 00001560: 30 30 32 0D 44 49 50 37 20 20 53 54 41 20 20 30 |002.DIP7 STA 0| 00001570: 30 32 0D 20 20 20 20 20 20 4C 44 58 20 20 30 37 |02. LDX 07| 00001580: 36 0D 20 20 20 20 20 20 4A 53 52 20 20 57 49 54 |6. JSR WIT| 00001590: 20 20 0D 44 49 50 38 20 20 4A 53 52 20 20 33 32 | .DIP8 JSR 32| 000015A0: 32 34 39 0D 20 20 20 20 20 20 4A 53 52 20 20 33 |249. JSR 3| 000015B0: 32 32 33 33 0D 20 20 20 20 20 20 52 54 53 0D 57 |2233. RTS.W| 000015C0: 49 54 20 20 20 4C 44 59 20 20 30 37 37 0D 20 20 |IT LDY 077. | 000015D0: 20 20 20 20 4A 53 52 20 20 41 44 52 20 20 0D 20 | JSR ADR . | 000015E0: 20 20 20 20 20 4C 44 41 20 20 32 35 33 0D 20 20 | LDA 253. | 000015F0: 20 20 20 20 53 54 41 20 20 32 35 31 0D 20 20 20 | STA 251. | 00001600: 20 20 20 4C 44 41 20 20 32 35 34 0D 20 20 20 20 | LDA 254. | 00001610: 20 20 53 54 41 20 20 32 35 32 0D 20 20 20 20 20 | STA 252. | 00001620: 20 4C 44 59 20 20 30 37 39 0D 20 20 20 20 20 20 | LDY 079. | 00001630: 4A 53 52 20 20 41 44 52 20 20 0D 20 20 20 20 20 |JSR ADR . | 00001640: 20 4C 44 59 20 20 30 32 39 0D 57 49 30 20 20 20 | LDY 029.WI0 | 00001650: 4C 44 41 20 20 32 35 32 0D 20 20 20 20 20 20 43 |LDA 252. C| 00001660: 4D 50 20 20 32 35 34 0D 20 20 20 20 20 20 42 4E |MP 254. BN| 00001670: 45 20 20 57 49 31 20 20 0D 20 20 20 20 20 20 4C |E WI1 . L| 00001680: 44 41 20 20 32 35 31 0D 20 20 20 20 20 20 43 4D |DA 251. CM| 00001690: 50 20 20 32 35 33 0D 20 20 20 20 20 20 42 45 51 |P 253. BEQ| 000016A0: 20 20 57 49 32 20 20 0D 57 49 31 20 20 20 4C 44 | WI2 .WI1 LD| 000016B0: 41 20 28 32 35 31 29 2C 59 0D 20 20 20 20 20 20 |A (251),Y. | 000016C0: 41 4E 44 20 20 30 30 32 0D 20 20 20 20 20 20 53 |AND 002. S| 000016D0: 54 41 20 28 32 35 31 29 2C 59 0D 20 20 20 20 20 |TA (251),Y. | 000016E0: 20 49 4E 59 0D 20 20 20 20 20 20 43 50 59 20 23 | INY. CPY #| 000016F0: 30 30 38 0D 20 20 20 20 20 20 42 43 43 20 20 57 |008. BCC W| 00001700: 49 31 20 20 0D 20 20 20 20 20 20 43 4C 43 0D 20 |I1 . CLC. | 00001710: 20 20 20 20 20 4C 44 41 20 20 32 35 31 0D 20 20 | LDA 251. | 00001720: 20 20 20 20 41 44 43 20 23 30 36 34 0D 20 20 20 | ADC #064. | 00001730: 20 20 20 53 54 41 20 20 32 35 31 0D 20 20 20 20 | STA 251. | 00001740: 20 20 4C 44 41 20 20 32 35 32 0D 20 20 20 20 20 | LDA 252. | 00001750: 20 41 44 43 20 23 30 30 31 0D 20 20 20 20 20 20 | ADC #001. | 00001760: 53 54 41 20 20 32 35 32 0D 20 20 20 20 20 20 4C |STA 252. L| 00001770: 44 59 20 23 30 30 30 0D 20 20 20 20 20 20 42 45 |DY #000. BE| 00001780: 51 20 20 57 49 30 20 20 0D 57 49 32 20 20 20 4C |Q WI0 .WI2 L| 00001790: 44 41 20 28 32 35 31 29 2C 59 0D 20 20 20 20 20 |DA (251),Y. | 000017A0: 20 41 4E 44 20 20 30 30 32 0D 20 20 20 20 20 20 | AND 002. | 000017B0: 53 54 41 20 28 32 35 31 29 2C 59 0D 20 20 20 20 |STA (251),Y. | 000017C0: 20 20 49 4E 59 0D 20 20 20 20 20 20 43 50 59 20 | INY. CPY | 000017D0: 20 30 33 31 0D 20 20 20 20 20 20 42 43 43 20 20 | 031. BCC | 000017E0: 57 49 32 20 20 0D 20 20 20 20 20 20 42 45 51 20 |WI2 . BEQ | 000017F0: 20 57 49 32 20 20 0D 20 20 20 20 20 20 52 54 53 | WI2 . RTS| 00001800: 0D 41 44 52 20 20 20 53 54 59 20 20 32 35 34 0D |.ADR STY 254.| 00001810: 20 20 20 20 20 20 43 4C 43 0D 20 20 20 20 20 20 | CLC. | 00001820: 4C 44 41 20 23 30 30 30 0D 20 20 20 20 20 20 53 |LDA #000. S| 00001830: 54 41 20 20 30 33 32 0D 20 20 20 20 20 20 52 4F |TA 032. RO| 00001840: 52 20 20 32 35 34 0D 20 20 20 20 20 20 2E 42 59 |R 254. .BY| 00001850: 54 45 20 24 36 41 0D 20 20 20 20 20 20 52 4F 52 |TE $6A. ROR| 00001860: 20 20 32 35 34 0D 20 20 20 20 20 20 2E 42 59 54 | 254. .BYT| 00001870: 45 20 24 36 41 0D 20 20 20 20 20 20 53 54 41 20 |E $6A. STA | 00001880: 20 32 35 33 0D 20 20 20 20 20 20 54 59 41 0D 20 | 253. TYA. | 00001890: 20 20 20 20 20 41 44 43 20 20 32 35 34 0D 20 20 | ADC 254. | 000018A0: 20 20 20 20 41 44 43 20 20 30 30 36 38 31 0D 20 | ADC 00681. | 000018B0: 20 20 20 20 20 53 54 41 20 20 32 35 34 0D 20 20 | STA 254. | 000018C0: 20 20 20 20 54 58 41 0D 20 20 20 20 20 20 2E 42 | TXA. .B| 000018D0: 59 54 45 20 24 32 41 0D 20 20 20 20 20 20 52 4F |YTE $2A. RO| 000018E0: 4C 20 20 30 33 32 0D 20 20 20 20 20 20 41 44 43 |L 032. ADC| 000018F0: 20 20 32 35 33 0D 20 20 20 20 20 20 53 54 41 20 | 253. STA | 00001900: 20 32 35 33 0D 20 20 20 20 20 20 4C 44 41 20 20 | 253. LDA | 00001910: 30 33 32 0D 20 20 20 20 20 20 41 44 43 20 20 32 |032. ADC 2| 00001920: 35 34 0D 20 20 20 20 20 20 53 54 41 20 20 32 35 |54. STA 25| 00001930: 34 0D 20 20 20 20 20 20 52 54 53 0D 57 52 45 20 |4. RTS.WRE | 00001940: 20 20 4C 44 41 20 23 30 30 30 0D 20 20 20 20 20 | LDA #000. | 00001950: 20 42 45 51 20 20 57 52 31 20 20 0D 57 52 30 20 | BEQ WR1 .WR0 | 00001960: 20 20 53 45 43 0D 20 20 20 20 20 20 2E 42 59 54 | SEC. .BYT| 00001970: 45 20 24 36 41 0D 57 52 31 20 20 20 44 45 58 0D |E $6A.WR1 DEX.| 00001980: 20 20 20 20 20 20 42 50 4C 20 20 57 52 30 20 20 | BPL WR0 | 00001990: 0D 20 20 20 20 20 20 52 54 53 0D 57 4C 49 20 20 |. RTS.WLI | 000019A0: 20 4C 44 41 20 23 32 35 35 0D 57 4C 30 20 20 20 | LDA #255.WL0 | 000019B0: 2E 42 59 54 45 20 24 34 41 0D 20 20 20 20 20 20 |.BYTE $4A. | 000019C0: 44 45 58 0D 20 20 20 20 20 20 42 50 4C 20 20 57 |DEX. BPL W| 000019D0: 4C 30 20 20 0D 20 20 20 20 20 20 52 54 53 0D 44 |L0 . RTS.D| 000019E0: 49 57 58 20 20 4C 44 58 20 20 31 36 38 0D 20 20 |IWX LDX 168. | 000019F0: 20 20 20 20 43 50 58 20 20 31 36 37 0D 20 20 20 | CPX 167. | 00001A00: 20 20 20 42 43 53 20 20 44 49 30 0D 20 20 20 20 | BCS DI0. | 00001A10: 20 20 52 54 53 0D 44 49 30 20 20 20 4C 44 41 20 | RTS.DI0 LDA | 00001A20: 20 31 36 37 0D 20 20 20 20 20 20 53 54 41 20 20 | 167. STA | 00001A30: 30 30 36 39 30 0D 20 20 20 20 20 20 4A 53 52 20 |00690. JSR | 00001A40: 20 4B 54 4E 58 54 0D 20 20 20 20 20 20 4C 44 41 | KTNXT. LDA| 00001A50: 20 20 30 30 36 39 37 0D 20 20 20 20 20 20 53 54 | 00697. ST| 00001A60: 41 20 20 30 33 36 0D 20 20 20 20 20 20 4C 44 41 |A 036. LDA| 00001A70: 20 20 30 30 36 39 38 0D 20 20 20 20 20 20 53 54 | 00698. ST| 00001A80: 41 20 20 30 33 37 0D 20 20 20 20 20 20 43 50 58 |A 037. CPX| 00001A90: 20 20 31 36 37 0D 20 20 20 20 20 20 42 45 51 20 | 167. BEQ | 00001AA0: 20 44 49 31 0D 20 20 20 20 20 20 53 54 58 20 20 | DI1. STX | 00001AB0: 30 30 36 39 30 0D 20 20 20 20 20 20 4A 53 52 20 |00690. JSR | 00001AC0: 20 4B 54 4E 58 54 0D 44 49 31 20 20 20 4C 44 59 | KTNXT.DI1 LDY| 00001AD0: 20 23 24 30 30 0D 20 20 20 20 20 20 43 50 58 20 | #$00. CPX | 00001AE0: 23 30 34 35 0D 20 20 20 20 20 20 42 43 43 20 20 |#045. BCC | 00001AF0: 44 49 34 0D 20 20 20 20 20 20 4C 44 41 20 20 31 |DI4. LDA 1| 00001B00: 36 37 0D 20 20 20 20 20 20 43 4D 50 20 23 30 34 |67. CMP #04| 00001B10: 35 0D 20 20 20 20 20 20 42 43 53 20 20 44 49 33 |5. BCS DI3| 00001B20: 0D 20 20 20 20 20 20 4A 53 52 20 20 58 42 4D 0D |. JSR XBM.| 00001B30: 20 20 20 20 20 20 4C 44 41 20 23 24 30 30 0D 20 | LDA #$00. | 00001B40: 20 20 20 20 20 53 54 41 20 20 30 30 37 30 30 0D | STA 00700.| 00001B50: 20 20 20 20 20 20 4C 44 41 20 23 24 34 30 0D 20 | LDA #$40. | 00001B60: 20 20 20 20 20 53 54 41 20 20 30 30 37 30 34 0D | STA 00704.| 00001B70: 20 20 20 20 20 20 4C 44 41 20 23 24 30 31 0D 20 | LDA #$01. | 00001B80: 20 20 20 20 20 53 54 41 20 20 30 30 37 30 35 0D | STA 00705.| 00001B90: 20 20 20 20 20 20 4C 44 41 20 23 30 39 35 0D 20 | LDA #095. | 00001BA0: 20 20 20 20 20 53 54 41 20 20 30 30 37 30 33 0D | STA 00703.| 00001BB0: 20 20 20 20 20 20 4A 53 52 20 20 44 49 50 4F 0D | JSR DIPO.| 00001BC0: 20 20 20 20 20 20 4C 44 41 20 23 30 30 33 0D 20 | LDA #003. | 00001BD0: 20 20 20 20 20 53 54 41 20 20 30 33 36 0D 20 20 | STA 036. | 00001BE0: 20 20 20 20 4C 44 41 20 23 30 30 30 0D 20 20 20 | LDA #000. | 00001BF0: 20 20 20 53 54 41 20 20 30 33 37 0D 44 49 33 20 | STA 037.DI3 | 00001C00: 20 20 4C 44 59 20 23 31 30 34 0D 44 49 34 20 20 | LDY #104.DI4 | 00001C10: 20 53 54 59 20 20 30 30 37 30 30 0D 20 20 20 20 | STY 00700. | 00001C20: 20 20 4A 53 52 20 20 58 42 4D 0D 20 20 20 20 20 | JSR XBM. | 00001C30: 20 43 4C 43 0D 20 20 20 20 20 20 4C 44 41 20 20 | CLC. LDA | 00001C40: 30 30 36 39 37 0D 20 20 20 20 20 20 41 44 43 20 |00697. ADC | 00001C50: 23 30 30 33 0D 20 20 20 20 20 20 53 54 41 20 20 |#003. STA | 00001C60: 30 30 37 30 34 0D 20 20 20 20 20 20 4C 44 41 20 |00704. LDA | 00001C70: 20 30 30 36 39 38 0D 20 20 20 20 20 20 41 44 43 | 00698. ADC| 00001C80: 20 23 30 30 30 0D 20 20 20 20 20 20 53 54 41 20 | #000. STA | 00001C90: 20 30 30 37 30 35 0D 20 20 20 20 20 20 43 4C 43 | 00705. CLC| 00001CA0: 0D 20 20 20 20 20 20 4C 44 41 20 20 30 30 37 30 |. LDA 0070| 00001CB0: 30 0D 20 20 20 20 20 20 41 44 43 20 23 30 39 35 |0. ADC #095| 00001CC0: 0D 20 20 20 20 20 20 53 54 41 20 20 30 30 37 30 |. STA 0070| 00001CD0: 33 0D 20 20 20 20 20 20 4A 53 52 20 20 44 49 50 |3. JSR DIP| 00001CE0: 4F 0D 20 20 20 20 20 20 52 54 53 0D 58 42 4D 20 |O. RTS.XBM | 00001CF0: 20 20 53 45 43 0D 20 20 20 20 20 20 4C 44 41 20 | SEC. LDA | 00001D00: 20 30 33 36 0D 20 20 20 20 20 20 53 42 43 20 23 | 036. SBC #| 00001D10: 30 30 33 0D 20 20 20 20 20 20 53 54 41 20 20 30 |003. STA 0| 00001D20: 30 37 30 31 0D 20 20 20 20 20 20 4C 44 41 20 20 |0701. LDA | 00001D30: 30 33 37 0D 20 20 20 20 20 20 53 42 43 20 23 30 |037. SBC #0| 00001D40: 30 30 0D 20 20 20 20 20 20 53 54 41 20 20 30 30 |00. STA 00| 00001D50: 37 30 32 0D 20 20 20 20 20 20 52 54 53 0D 44 55 |702. RTS.DU| 00001D60: 4D 50 20 20 4A 53 52 20 20 44 49 57 58 0D 20 20 |MP JSR DIWX. | 00001D70: 20 20 20 20 4C 44 41 20 20 31 36 37 0D 20 20 20 | LDA 167. | 00001D80: 20 20 20 53 54 41 20 20 30 30 36 39 30 0D 20 20 | STA 00690. | 00001D90: 20 20 20 20 53 45 43 0D 20 20 20 20 20 20 4C 44 | SEC. LD| 00001DA0: 41 20 20 31 36 38 0D 20 20 20 20 20 20 41 44 43 |A 168. ADC| 00001DB0: 20 23 30 30 30 0D 20 20 20 20 20 20 53 42 43 20 | #000. SBC | 00001DC0: 20 31 36 37 0D 20 20 20 20 20 20 53 54 41 20 20 | 167. STA | 00001DD0: 30 33 35 0D 20 20 20 20 20 20 42 4E 45 20 20 44 |035. BNE D| 00001DE0: 55 4D 31 0D 20 20 20 20 20 20 42 45 51 20 20 44 |UM1. BEQ D| 00001DF0: 55 4D 31 0D 20 20 20 20 20 20 4A 53 52 20 20 42 |UM1. JSR B| 00001E00: 55 4D 50 0D 44 55 4D 31 20 20 52 54 53 0D 54 4F |UMP.DUM1 RTS.TO| 00001E10: 43 4F 20 20 4C 44 41 20 20 30 30 36 39 34 20 20 |CO LDA 00694 | 00001E20: 3B 54 4F 45 54 53 49 4E 44 45 58 0D 20 20 20 20 |;TOETSINDEX. | 00001E30: 20 20 41 4E 44 20 23 30 33 31 20 20 20 20 3B 41 | AND #031 ;A| 00001E40: 53 43 49 49 20 28 36 39 34 29 20 49 4E 0D 20 20 |SCII (694) IN. | 00001E50: 20 20 20 20 54 41 58 20 20 20 20 20 20 20 20 20 | TAX | 00001E60: 3B 43 4F 44 45 49 4E 44 2E 20 28 36 39 35 29 2E |;CODEIND. (695).| 00001E70: 0D 20 20 20 20 20 20 45 4F 52 20 20 30 30 36 39 |. EOR 0069| 00001E80: 34 20 20 3B 28 36 39 35 29 3C 31 32 38 3A 4F 4B |4 ;(695)<128:OK| 00001E90: 45 45 2E 0D 20 20 20 20 20 20 41 4E 44 20 23 31 |EE.. AND #1| 00001EA0: 39 32 0D 20 20 20 20 20 20 2E 42 59 54 45 20 24 |92. .BYTE $| 00001EB0: 34 41 0D 20 20 20 20 20 20 53 54 41 20 20 30 30 |4A. STA 00| 00001EC0: 32 0D 20 20 20 20 20 20 45 4F 52 20 20 30 30 36 |2. EOR 006| 00001ED0: 39 34 0D 20 20 20 20 20 20 2E 42 59 54 45 20 24 |94. .BYTE $| 00001EE0: 32 41 0D 20 20 20 20 20 20 2E 42 59 54 45 20 24 |2A. .BYTE $| 00001EF0: 32 41 0D 20 20 20 20 20 20 45 4F 52 20 23 31 32 |2A. EOR #12| 00001F00: 38 0D 20 20 20 20 20 20 41 4E 44 20 23 31 32 38 |8. AND #128| 00001F10: 0D 20 20 20 20 20 20 45 4F 52 20 20 30 30 32 0D |. EOR 002.| 00001F20: 20 20 20 20 20 20 53 54 41 20 20 30 30 32 0D 20 | STA 002. | 00001F30: 20 20 20 20 20 54 58 41 0D 20 20 20 20 20 20 45 | TXA. E| 00001F40: 4F 52 20 20 30 30 32 0D 20 20 20 20 20 20 53 54 |OR 002. ST| 00001F50: 41 20 20 30 30 36 39 35 0D 20 20 20 20 20 20 52 |A 00695. R| 00001F60: 54 53 0D 20 20 20 20 20 20 2E 42 59 54 45 20 32 |TS. .BYTE 2| 00001F70: 35 35 2C 32 35 35 2C 32 35 35 0D 20 20 20 20 20 |55,255,255. | 00001F80: 20 2E 42 59 54 45 20 32 35 35 2C 32 35 35 2C 32 | .BYTE 255,255,2| 00001F90: 35 35 0D 20 20 20 20 20 20 2E 42 59 54 45 20 32 |55. .BYTE 2| 00001FA0: 35 35 2C 32 35 35 2C 32 35 35 0D 20 20 20 20 20 |55,255,255. | 00001FB0: 20 2E 42 59 54 45 20 32 35 35 2C 32 35 35 2C 32 | .BYTE 255,255,2| 00001FC0: 35 35 0D 20 20 20 20 20 20 2E 45 4E 44 0D |55. .END. |
LDA 0069...............H.D..H......I.H
...D......K...Y.H.......................
..............O.........................
.....<...H........A.I.J...IZH........KJ.
..H.J....KI...H........H..........H.....
......../....................M..........
".R......4U..300. BCS KLAF1.
ADC 033.KLAF1 STA 00690,X. RTS.GR
FIX JSR KTNXT ;KT,LT,ST IN..GRFIY JSR
LTNYT ;XT,LT,ST IN..GRFIZ LDA 00692 ;XT
,YT,ST IN.. AND #063. STA 006
99. EOR 00692. BEQ GRFI1.
CLC. .BYTE $2A. .BYTE $2A.
.BYTE $2A. .BYTE $2A. TAX
. DEX. DEX. LDA 00710,X
;GEZET DOOR. STA 00686 ;INLOOP..
LDA 00711,X. STA 00687.
LDA 00714,X. STA 00679. LD
A 00715,X. STA 0068..............
..32 ;* VELSCA *.GRFI1 RTS.BUFAD LDA
00684 ;BUFFERADRES UIT. STA 254
;KOLOM (690)=KT.. LDA #000 ;AD
RES (254,253). STA 253 ;UIT 256
*(684)+. LDX #091 ; +91*KT..
LDY 00690 ;GEBRUIKT REGS.. J
SR VMOPT ;X EN [............V.........
.....9...}|W......W..........W..........
..X.........Y.W......................U..
....+=KT.. STA 254 ;UIT:(......
.........3.:.............:..'......3.>..
.....'......6....=7..;'......3.:........
....3.>......H........H....... CMP
#045. BCC KTNX1. TXA. SB
C #064. TAX. TYA. SBC #00
1. TAY.KTNX1 STX 00697. STY
00698. RTS.LTNYT CLC ;[LT]-
->(YT).. LDA 00688 ;YB-42>=0 IN.
ADC 00691 ;(688) EERST.. ADC
0069. ;IN: (......W..................
...W.W..........'......;2........3.2....
...'..........................3.7>......
............;:........2.......'......;2.
...7>O..W........'.......;...;.?..6.....
;.2.....?.....;.?3.'......3.2...........
2.2..6.....6..'... STA 251 ;AANTAL
KOLOMMEN. LDA #091 ;IN (23)..
STA 024. STA 034. LDA #0
00. STA 035. JSR 31434 ;*
BLOVUL *. RTS.BUVU JSR BUFAD ;BU
FFER VULLEN.. JSR LOROP ;INPUT:.
LDY #000 ;KT=(690).. LDA (2
53),Y...W...............T..... ;ST=(
692).. BCS BUV1 ;ST BITS 7 EN 6.
ADC #002 ;GROEP 1 OF 2.. L
DY #000 ;ST BITS 5...0. STA (253
),Y ;INDEX IN GROEP.. TAY. LDA
00692. STA (253),Y. DEY.
LDA 00691. STA (253),Y.BUV1 JSR
LORDI. RTS.BUDM JSR BUFAD ;BYT
EPAREN WEG-. JSR LOROP ;HALEN VOO
R. LDY #000 ;KOLOM KT EN. L
DA (253),Y ;REGEL LT.. BEQ BUD5
;PAAR (LT,ST).. STA 031 ;KT=(69
0).. LDY #000 ;LT=(691).. S
TY 032 ;GATEN WEG,WAAR-.BUD1 INY
;NA AANTAL WORDT. LDA (253),Y
;BIJGEWERKT.. INY. CMP 00691
. BEQ BUD2 . TAX. LDA (2
53),Y. INC 032. INC 032.
CPY 032. BEQ BUD2 . STY 0
33. LDY 032. STA (253),Y.
DEY. TXA. STA (253),Y.
LDY 033.BUD2 CPY 031. BCC BUD1
. LDY #000. LDA 032. STA
(253),Y. LDY 032. LDA #000.
BEQ BUD4 .BUD3 INY. STA (253
),Y.BUD4 CPY 031. BCC BUD3.BUD5
JSR LORDI. RTS.BUMP LDA 00690
;DUMP BUFFER AF. STA 025 ;KOLOM
(690)=KT.. LDA 023 ;AANTAL IN
(23).. STA 026. JSR BUFAD.
LDA 253. STA 034. LDA 2
54. STA 035. JSR LOROP.BUMG.
.................ZS.....................
..............DJ............T.....D.....
...Y......@........DJ...........Y.....J.
H.......................DJ...........Y..
...J.L..................Y....@I.........
.....................@I............ UM2
.BUM3 CLC. LDA 034. ADC #091
. STA 034. LDA 035. ADC
#000. STA 035. INC 00690.
CLC. BCC BUM1 .BUM4 JSR LORD
I. LDA 025. STA 00690.
RTS.BULE LDA #089 ;ZOEK E.V.LEGE.
STA 0069....|P.PT..U............Y...
.Q.....X.Q..Y..Q...U...........Y...PY..
..W.W........................ ;;O..P...
.........................U.....D.......@
ND..................."......#.;.......#1
3............#..............#...........
...#13............#.....000. STA 2
54. DEX. BPL BUL1 .BUL2 INX.
STX 0069..............P..R.......
.....R.Q.................P......PW.P....
........................................
.....................R..................
......................................)
=Y1.. STA 028,X ;(705,704)=X1
.. EOR 00701,Y. STA 076,X.
LDA 00702,Y. CLC. .BYTE $
6A. ROR 076,X. LDA 00700,Y.
AND #007. STA 029,X. EOR
00700,Y. .BYTE $4A. .BYTE $4
A. .BYTE $4A. STA 077,X.
DEX. DEX. DEY. DEY.
DEY. BPL DIP1 . JSR 32242.
LDA 076. CMP 078. BEQ
DIP5 . LDX 028. BEQ DIP2 .
JSR WRE . STA 002. LDX
076. JSR WIT . CLC. LD
A 076. ADC #004. STA 076.DIP
2 LDX 030. CPX #007. BEQ DI
P3 . JSR WLI . STA 002.
LDX 078. JSR WIT . SEC.
LDA 078. SBC #004. STA 0
78.DIP3 LDA 078. CMP 076. B
CC DIP8 . LDA #000. STA 002.
DIP4 LDX 076. JSR WIT . CL
C. LDA 076. ADC #004. ST
A 076. LDA 078. CMP 076.
BCS DIP4 . BCC DIP8 .DIP5 LDA
028. BNE DIP6 . LDA 030.
CMP #007. BNE DIP6 . LDA
#000. BEQ DIP7 .DIP6 LDX 028.
JSR WRE . STA 002. LDX
030. JSR WLI . ORA 002.DIP7
STA 002. LDX 076. JSR WIT
.DIP8 JSR 32249. JSR 32233.
RTS.WIT LDY 077. JSR ADR .
LDA 253. STA 251. LDA
254. STA 252. LDY 079.
JSR ADR . LDY 029.WI0 LDA 252
. CMP 254. BNE WI1 . L
DA 251. CMP 253. BEQ WI2 .
WI1 LDA (251),Y. AND 002. S
TA (251),Y. INY. CPY #008.
BCC WI1 . CLC. LDA 251.
ADC #064. STA 251. LDA 2
52. ADC #001. STA 252. L
DY #000. BEQ WI0 .WI2 LDA (251)
,Y. AND 002. STA (251),Y.
INY. CPY 031. BCC WI2 .
BEQ WI2 . RTS.ADR STY 254.
CLC. LDA #000. STA 032.
ROR 254. .BYTE $6A. ROR
254. .BYTE $6A. STA 253.
TYA. ADC 254. ADC 00681.
STA 254. TXA. .BYTE $2A.
ROL 032. ADC 253. STA
253. LDA 032. ADC 254.
STA 254. RTS.WRE LDA #000.
BEQ WR1 .WR0 SEC. .BYTE $6A.WR
1 DEX. BPL WR0 . RTS.WLI
LDA #255.WL0 .BYTE $4A. DEX.
BPL WL0 . RTS.DIWX LDX 168.
CPX 167. BCS DI0. RTS.DI
0 LDA 167. STA 00690. JSR
KTNXT. LDA 00697. STA 036.
LDA 00698. STA 037. CPX
167. BEQ DI1. STX 00690.
JSR KTNXT.DI1 LDY #$00. CPX
#045. BCC DI4. LDA 167.
CMP #045. BCS DI3. JSR XBM.
LDA #$00. STA 00700. LD
A #$40. STA 00704. LDA #$01.
STA 00705. LDA #095. STA
00703. JSR DIPO. LDA #003.
STA 036. LDA #000. STA
037.DI3 LDY #104.DI4 STY 00700.
JSR XBM. CLC. LDA 00697.
ADC #003. STA 00704. LDA
00698. ADC #000. STA 00705.
CLC. LDA 00700. ADC #095
. STA 00703. JSR DIPO.
RTS.XBM SEC. LDA 036. SBC #
003. STA 00701. LDA 037.
SBC #000. STA 00702. RTS.DU
MP JSR DIWX. LDA 167. STA
00690. SEC. LDA 168. ADC
#000. SBC 167. STA 035.
BNE DUM1. BEQ DUM1. JSR B
UMP.DUM1 RTS.TOCO LDA 00694 ;TOETSIN
DEX. AND #031 ;ASCII (694) IN.
TAX ;CODEIND. (695).. E
OR 00694 ;(695)<128:OKEE.. AND #1
92. .BYTE $4A. STA 002.
EOR 00694. .BYTE $2A. .BYTE $
2A. EOR #128. AND #128. E
OR 002. STA 002. TXA. E
OR 002. STA 00695. RTS.
.BYTE 255,255,255. .BYTE 255,255,2
55. .BYTE 255,255,255. .BYTE 2
55,255,255. .END.
> CLICK IMAGE PREVIEW FOR FULL MODAL