55
FILE INFORMATION
FILENAME(S): 55
FILE TYPE(S): PRG
FILE SIZE: 3.6K
FIRST SEEN: 2025-11-30 20:31:02
APPEARS ON: 1 disk(s)
FILE HASH
723f5febc010b60751ed1aae0c2c8e326fb9726d17f370d43272bb4a269a49f1
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DR ZIG | 55 | PRG | Curtcool, Nigel | 30 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 0D 0D 43 4F 4C 31 20 20 20 20 20 3D 20 24 30 31 |..COL1 = $01| 00000010: 0D 0D 20 20 20 20 20 20 20 20 20 2A 3D 20 24 31 |.. *= $1| 00000020: 30 30 30 0D 0D 20 20 20 20 20 20 20 20 20 43 4C |000.. CL| 00000030: 49 0D 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 |I.. LDA | 00000040: 23 24 35 30 0D 20 20 20 20 20 20 20 20 20 53 54 |#$50. ST| 00000050: 41 20 24 42 30 0D 20 20 20 20 20 20 20 20 20 53 |A $B0. S| 00000060: 54 41 20 24 42 33 0D 20 20 20 20 20 20 20 20 20 |TA $B3. | 00000070: 4C 44 41 20 23 24 30 30 0D 20 20 20 20 20 20 20 |LDA #$00. | 00000080: 20 20 53 54 41 20 24 42 31 0D 20 20 20 20 20 20 | STA $B1. | 00000090: 20 20 20 53 54 41 20 24 42 34 0D 0D 20 20 20 20 | STA $B4.. | 000000A0: 20 20 20 20 20 4C 44 41 20 23 43 4F 4C 31 0D 20 | LDA #COL1. | 000000B0: 20 20 20 20 20 20 20 20 53 54 41 20 24 30 32 38 | STA $028| 000000C0: 36 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 24 |6. JSR $| 000000D0: 45 35 34 34 0D 0D 20 20 20 20 20 20 20 20 20 4C |E544.. L| 000000E0: 44 41 20 23 24 30 38 0D 20 20 20 20 20 20 20 20 |DA #$08. | 000000F0: 20 4A 53 52 20 24 46 46 44 32 0D 20 20 20 20 20 | JSR $FFD2. | 00000100: 20 20 20 20 4C 44 41 20 23 24 30 30 0D 20 20 20 | LDA #$00. | 00000110: 20 20 20 20 20 20 53 54 41 20 24 44 30 32 30 0D | STA $D020.| 00000120: 20 20 20 20 20 20 20 20 20 53 54 41 20 24 44 30 | STA $D0| 00000130: 32 31 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |21. STA | 00000140: 24 34 34 0D 20 20 20 20 20 20 20 20 20 53 54 41 |$44. STA| 00000150: 20 24 36 35 0D 20 20 20 20 20 20 20 20 20 53 54 | $65. ST| 00000160: 41 20 24 31 31 0D 0D 20 20 20 20 20 20 20 20 20 |A $11.. | 00000170: 4C 44 58 20 23 24 30 30 0D 43 4F 43 0D 20 20 20 |LDX #$00.COC. | 00000180: 20 20 20 20 20 20 4C 44 41 20 23 24 31 30 0D 20 | LDA #$10. | 00000190: 20 20 20 20 20 20 20 20 53 54 41 20 24 32 30 30 | STA $200| 000001A0: 30 2C 58 0D 20 20 20 20 20 20 20 20 20 53 54 41 |0,X. STA| 000001B0: 20 24 32 31 30 30 2C 58 0D 20 20 20 20 20 20 20 | $2100,X. | 000001C0: 20 20 53 54 41 20 24 32 32 30 30 2C 58 0D 20 20 | STA $2200,X. | 000001D0: 20 20 20 20 20 20 20 53 54 41 20 24 32 33 30 30 | STA $2300| 000001E0: 2C 58 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |,X. STA | 000001F0: 24 32 34 30 30 2C 58 0D 20 20 20 20 20 20 20 20 |$2400,X. | 00000200: 20 53 54 41 20 24 32 35 30 30 2C 58 0D 20 20 20 | STA $2500,X. | 00000210: 20 20 20 20 20 20 53 54 41 20 24 32 36 30 30 2C | STA $2600,| 00000220: 58 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 |X. STA $| 00000230: 32 37 30 30 2C 58 0D 20 20 20 20 20 20 20 20 20 |2700,X. | 00000240: 53 54 41 20 24 32 38 30 30 2C 58 0D 20 20 20 20 |STA $2800,X. | 00000250: 20 20 20 20 20 53 54 41 20 24 32 39 30 30 2C 58 | STA $2900,X| 00000260: 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 32 |. STA $2| 00000270: 41 30 30 2C 58 0D 20 20 20 20 20 20 20 20 20 53 |A00,X. S| 00000280: 54 41 20 24 32 42 30 30 2C 58 0D 20 20 20 20 20 |TA $2B00,X. | 00000290: 20 20 20 20 53 54 41 20 24 32 43 30 30 2C 58 0D | STA $2C00,X.| 000002A0: 20 20 20 20 20 20 20 20 20 53 54 41 20 24 32 44 | STA $2D| 000002B0: 30 30 2C 58 0D 20 20 20 20 20 20 20 20 20 53 54 |00,X. ST| 000002C0: 41 20 24 32 45 30 30 2C 58 0D 20 20 20 20 20 20 |A $2E00,X. | 000002D0: 20 20 20 53 54 41 20 24 32 46 30 30 2C 58 0D 0D | STA $2F00,X..| 000002E0: 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 31 | LDA #$1| 000002F0: 30 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 |0. STA $| 00000300: 30 34 30 30 2C 58 0D 20 20 20 20 20 20 20 20 20 |0400,X. | 00000310: 53 54 41 20 24 30 34 45 30 2C 58 0D 20 20 20 20 |STA $04E0,X. | 00000320: 20 20 20 20 20 49 4E 58 0D 20 20 20 20 20 20 20 | INX. | 00000330: 20 20 42 4E 45 20 43 4F 43 0D 3B 2D 2D 2D 2D 2D | BNE COC.;-----| 00000340: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000350: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000360: 2D 2D 0D 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |--.. LDA| 00000370: 20 23 24 31 38 0D 20 20 20 20 20 20 20 20 20 53 | #$18. S| 00000380: 54 41 20 24 44 30 31 38 0D 20 20 20 20 20 20 20 |TA $D018. | 00000390: 20 20 4C 44 41 20 23 24 43 38 0D 20 20 20 20 20 | LDA #$C8. | 000003A0: 20 20 20 20 53 54 41 20 24 44 30 31 36 0D 0D 20 | STA $D016.. | 000003B0: 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 30 30 | LDA #$00| 000003C0: 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 42 |. STA $B| 000003D0: 35 0D 0D 20 20 20 20 20 20 20 20 20 4C 44 58 20 |5.. LDX | 000003E0: 24 42 30 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |$B0. LDA| 000003F0: 20 23 24 33 30 0D 20 20 20 20 20 20 20 20 20 43 | #$30. C| 00000400: 4C 43 0D 20 20 20 20 20 20 20 20 20 41 44 43 20 |LC. ADC | 00000410: 53 49 4E 32 2C 58 0D 20 20 20 20 20 20 20 20 20 |SIN2,X. | 00000420: 42 43 43 20 50 4F 50 0D 20 20 20 20 20 20 20 20 |BCC POP. | 00000430: 20 49 4E 43 20 24 42 35 0D 50 4F 50 0D 20 20 20 | INC $B5.POP. | 00000440: 20 20 20 20 20 20 50 48 41 0D 20 20 20 20 20 20 | PHA. | 00000450: 20 20 20 4C 44 41 20 53 49 4E 31 2C 58 0D 20 20 | LDA SIN1,X. | 00000460: 20 20 20 20 20 20 20 53 45 43 0D 20 20 20 20 20 | SEC. | 00000470: 20 20 20 20 53 42 43 20 23 24 33 34 0D 20 20 20 | SBC #$34. | 00000480: 20 20 20 20 20 20 54 41 59 0D 20 20 20 20 20 20 | TAY. | 00000490: 20 20 20 50 4C 41 0D 20 20 20 20 20 20 20 20 20 | PLA. | 000004A0: 54 41 58 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |TAX. LDA| 000004B0: 20 24 42 35 0D 0D 20 20 20 20 20 20 20 20 20 4A | $B5.. J| 000004C0: 53 52 20 50 4C 4F 54 0D 20 20 20 20 20 20 20 20 |SR PLOT. | 000004D0: 20 4A 53 52 20 50 4C 4F 54 32 0D 0D 20 20 20 20 | JSR PLOT2.. | 000004E0: 20 20 20 20 20 4C 44 41 20 23 24 30 30 0D 20 20 | LDA #$00. | 000004F0: 20 20 20 20 20 20 20 53 54 41 20 24 42 35 0D 0D | STA $B5..| 00000500: 20 20 20 20 20 20 20 20 20 4C 44 58 20 24 42 31 | LDX $B1| 00000510: 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 |. LDA #$| 00000520: 33 30 0D 20 20 20 20 20 20 20 20 20 43 4C 43 0D |30. CLC.| 00000530: 20 20 20 20 20 20 20 20 20 41 44 43 20 53 49 4E | ADC SIN| 00000540: 32 2C 58 0D 20 20 20 20 20 20 20 20 20 42 43 43 |2,X. BCC| 00000550: 20 50 4F 50 31 0D 20 20 20 20 20 20 20 20 20 49 | POP1. I| 00000560: 4E 43 20 24 42 35 0D 50 4F 50 31 0D 20 20 20 20 |NC $B5.POP1. | 00000570: 20 20 20 20 20 50 48 41 0D 20 20 20 20 20 20 20 | PHA. | 00000580: 20 20 4C 44 41 20 53 49 4E 31 2C 58 0D 20 20 20 | LDA SIN1,X. | 00000590: 20 20 20 20 20 20 53 45 43 0D 20 20 20 20 20 20 | SEC. | 000005A0: 20 20 20 53 42 43 20 23 24 33 34 0D 20 20 20 20 | SBC #$34. | 000005B0: 20 20 20 20 20 54 41 59 0D 20 20 20 20 20 20 20 | TAY. | 000005C0: 20 20 50 4C 41 0D 20 20 20 20 20 20 20 20 20 54 | PLA. T| 000005D0: 41 58 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 |AX. LDA | 000005E0: 24 42 35 0D 0D 20 20 20 20 20 20 20 20 20 4A 53 |$B5.. JS| 000005F0: 52 20 50 4C 4F 54 0D 20 20 20 20 20 20 20 20 20 |R PLOT. | 00000600: 4A 53 52 20 50 4C 4F 54 33 0D 0D 20 20 20 20 20 |JSR PLOT3.. | 00000610: 20 20 20 20 49 4E 43 20 24 42 30 0D 20 20 20 20 | INC $B0. | 00000620: 20 20 20 20 20 49 4E 43 20 24 42 31 0D 0D 0D 20 | INC $B1... | 00000630: 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 30 30 | LDA #$00| 00000640: 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 42 |. STA $B| 00000650: 35 0D 0D 20 20 20 20 20 20 20 20 20 4C 44 58 20 |5.. LDX | 00000660: 24 42 33 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |$B3. LDA| 00000670: 20 23 24 30 30 0D 20 20 20 20 20 20 20 20 20 53 | #$00. S| 00000680: 45 43 0D 20 20 20 20 20 20 20 20 20 53 42 43 20 |EC. SBC | 00000690: 53 49 4E 32 2C 58 0D 20 20 20 20 20 20 20 20 20 |SIN2,X. | 000006A0: 42 43 43 20 50 4F 50 33 0D 20 20 20 20 20 20 20 |BCC POP3. | 000006B0: 20 20 49 4E 43 20 24 42 35 0D 50 4F 50 33 0D 20 | INC $B5.POP3. | 000006C0: 20 20 20 20 20 20 20 20 50 48 41 0D 20 20 20 20 | PHA. | 000006D0: 20 20 20 20 20 4C 44 41 20 53 49 4E 31 2C 58 0D | LDA SIN1,X.| 000006E0: 20 20 20 20 20 20 20 20 20 53 45 43 0D 20 20 20 | SEC. | 000006F0: 20 20 20 20 20 20 53 42 43 20 23 24 33 34 0D 20 | SBC #$34. | 00000700: 20 20 20 20 20 20 20 20 54 41 59 0D 20 20 20 20 | TAY. | 00000710: 20 20 20 20 20 50 4C 41 0D 20 20 20 20 20 20 20 | PLA. | 00000720: 20 20 54 41 58 0D 20 20 20 20 20 20 20 20 20 4C | TAX. L| 00000730: 44 41 20 24 42 35 0D 0D 20 20 20 20 20 20 20 20 |DA $B5.. | 00000740: 20 4A 53 52 20 50 4C 4F 54 0D 20 20 20 20 20 20 | JSR PLOT. | 00000750: 20 20 20 4A 53 52 20 50 4C 4F 54 32 0D 0D 20 20 | JSR PLOT2.. | 00000760: 20 20 20 20 20 20 20 4C 44 41 20 23 24 30 30 0D | LDA #$00.| 00000770: 20 20 20 20 20 20 20 20 20 53 54 41 20 24 42 35 | STA $B5| 00000780: 0D 0D 20 20 20 20 20 20 20 20 20 4C 44 58 20 24 |.. LDX $| 00000790: 42 34 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 |B4. LDA | 000007A0: 23 24 30 30 0D 20 20 20 20 20 20 20 20 20 53 45 |#$00. SE| 000007B0: 43 0D 20 20 20 20 20 20 20 20 20 53 42 43 20 53 |C. SBC S| 000007C0: 49 4E 32 2C 58 0D 20 20 20 20 20 20 20 20 20 42 |IN2,X. B| 000007D0: 43 43 20 50 4F 50 34 0D 20 20 20 20 20 20 20 20 |CC POP4. | 000007E0: 20 49 4E 43 20 24 42 35 0D 50 4F 50 34 0D 20 20 | INC $B5.POP4. | 000007F0: 20 20 20 20 20 20 20 50 48 41 0D 20 20 20 20 20 | PHA. | 00000800: 20 20 20 20 4C 44 41 20 53 49 4E 31 2C 58 0D 20 | LDA SIN1,X. | 00000810: 20 20 20 20 20 20 20 20 53 45 43 0D 20 20 20 20 | SEC. | 00000820: 20 20 20 20 20 53 42 43 20 23 24 33 34 0D 20 20 | SBC #$34. | 00000830: 20 20 20 20 20 20 20 54 41 59 0D 20 20 20 20 20 | TAY. | 00000840: 20 20 20 20 50 4C 41 0D 20 20 20 20 20 20 20 20 | PLA. | 00000850: 20 54 41 58 0D 20 20 20 20 20 20 20 20 20 4C 44 | TAX. LD| 00000860: 41 20 24 42 35 0D 0D 20 20 20 20 20 20 20 20 20 |A $B5.. | 00000870: 4A 53 52 20 50 4C 4F 54 0D 20 20 20 20 20 20 20 |JSR PLOT. | 00000880: 20 20 4A 53 52 20 50 4C 4F 54 33 0D 0D 20 20 20 | JSR PLOT3.. | 00000890: 20 20 20 20 20 20 49 4E 43 20 24 42 33 0D 20 20 | INC $B3. | 000008A0: 20 20 20 20 20 20 20 49 4E 43 20 24 42 34 0D 0D | INC $B4..| 000008B0: 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |;---------------| 000008C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000008D0: 2D 2D 2D 2D 2D 2D 2D 2D 0D 0D 0D 0D 50 4C 4F 54 |--------....PLOT| 000008E0: 0D 20 20 20 20 20 20 20 20 20 53 54 58 20 24 46 |. STX $F| 000008F0: 38 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 |8. STA $| 00000900: 46 39 0D 20 20 20 20 20 20 20 20 20 53 54 59 20 |F9. STY | 00000910: 24 46 41 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |$FA. LDA| 00000920: 20 23 24 32 30 0D 20 20 20 20 20 20 20 20 20 53 | #$20. S| 00000930: 54 41 20 24 46 43 0D 20 20 20 20 20 20 20 20 20 |TA $FC. | 00000940: 4C 44 41 20 23 24 30 30 0D 20 20 20 20 20 20 20 |LDA #$00. | 00000950: 20 20 53 54 41 20 24 46 42 0D 20 20 20 20 20 20 | STA $FB. | 00000960: 20 20 20 53 54 41 20 24 46 44 0D 20 20 20 20 20 | STA $FD. | 00000970: 20 20 20 20 4C 44 41 20 24 46 41 0D 20 20 20 20 | LDA $FA. | 00000980: 20 20 20 20 20 4C 53 52 20 41 0D 20 20 20 20 20 | LSR A. | 00000990: 20 20 20 20 4C 53 52 20 41 0D 20 20 20 20 20 20 | LSR A. | 000009A0: 20 20 20 4C 53 52 20 41 0D 20 20 20 20 20 20 20 | LSR A. | 000009B0: 20 20 53 54 41 20 24 46 45 0D 0D 20 20 20 20 20 | STA $FE.. | 000009C0: 20 20 20 20 43 4C 43 0D 20 20 20 20 20 20 20 20 | CLC. | 000009D0: 20 4C 44 41 20 24 46 42 0D 20 20 20 20 20 20 20 | LDA $FB. | 000009E0: 20 20 41 44 43 20 24 46 44 0D 20 20 20 20 20 20 | ADC $FD. | 000009F0: 20 20 20 53 54 41 20 24 46 42 0D 20 20 20 20 20 | STA $FB. | 00000A00: 20 20 20 20 4C 44 41 20 24 46 43 0D 20 20 20 20 | LDA $FC. | 00000A10: 20 20 20 20 20 41 44 43 20 24 46 45 0D 20 20 20 | ADC $FE. | 00000A20: 20 20 20 20 20 20 53 54 41 20 24 46 43 0D 0D 20 | STA $FC.. | 00000A30: 20 20 20 20 20 20 20 20 43 4C 43 0D 20 20 20 20 | CLC. | 00000A40: 20 20 20 20 20 4C 53 52 20 24 46 45 0D 20 20 20 | LSR $FE. | 00000A50: 20 20 20 20 20 20 52 4F 52 20 24 46 44 0D 20 20 | ROR $FD. | 00000A60: 20 20 20 20 20 20 20 4C 53 52 20 24 46 45 0D 20 | LSR $FE. | 00000A70: 20 20 20 20 20 20 20 20 52 4F 52 20 24 46 44 0D | ROR $FD.| 00000A80: 0D 20 20 20 20 20 20 20 20 20 43 4C 43 0D 20 20 |. CLC. | 00000A90: 20 20 20 20 20 20 20 4C 44 41 20 24 46 42 0D 20 | LDA $FB. | 00000AA0: 20 20 20 20 20 20 20 20 41 44 43 20 24 46 44 0D | ADC $FD.| 00000AB0: 20 20 20 20 20 20 20 20 20 53 54 41 20 24 46 42 | STA $FB| 00000AC0: 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 24 46 |. LDA $F| 00000AD0: 43 0D 20 20 20 20 20 20 20 20 20 41 44 43 20 24 |C. ADC $| 00000AE0: 46 45 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |FE. STA | 00000AF0: 24 46 43 0D 0D 20 20 20 20 20 20 20 20 20 4C 44 |$FC.. LD| 00000B00: 41 20 24 46 39 0D 20 20 20 20 20 20 20 20 20 53 |A $F9. S| 00000B10: 54 41 20 24 46 45 0D 20 20 20 20 20 20 20 20 20 |TA $FE. | 00000B20: 4C 44 41 20 24 46 38 0D 20 20 20 20 20 20 20 20 |LDA $F8. | 00000B30: 20 41 4E 44 20 23 24 46 38 0D 20 20 20 20 20 20 | AND #$F8. | 00000B40: 20 20 20 53 54 41 20 24 46 44 0D 0D 20 20 20 20 | STA $FD.. | 00000B50: 20 20 20 20 20 43 4C 43 0D 20 20 20 20 20 20 20 | CLC. | 00000B60: 20 20 4C 44 41 20 24 46 42 0D 20 20 20 20 20 20 | LDA $FB. | 00000B70: 20 20 20 41 44 43 20 24 46 44 0D 20 20 20 20 20 | ADC $FD. | 00000B80: 20 20 20 20 53 54 41 20 24 46 42 0D 20 20 20 20 | STA $FB. | 00000B90: 20 20 20 20 20 4C 44 41 20 24 46 43 0D 20 20 20 | LDA $FC. | 00000BA0: 20 20 20 20 20 20 41 44 43 20 24 46 45 0D 20 20 | ADC $FE. | 00000BB0: 20 20 20 20 20 20 20 53 54 41 20 24 46 43 0D 0D | STA $FC..| 00000BC0: 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 30 | LDA #$0| 00000BD0: 30 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 |0. STA $| 00000BE0: 46 45 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 |FE. LDA | 00000BF0: 24 46 41 0D 20 20 20 20 20 20 20 20 20 41 4E 44 |$FA. AND| 00000C00: 20 23 24 30 37 0D 20 20 20 20 20 20 20 20 20 53 | #$07. S| 00000C10: 54 41 20 24 46 44 0D 0D 20 20 20 20 20 20 20 20 |TA $FD.. | 00000C20: 20 43 4C 43 0D 20 20 20 20 20 20 20 20 20 4C 44 | CLC. LD| 00000C30: 41 20 24 46 42 0D 20 20 20 20 20 20 20 20 20 41 |A $FB. A| 00000C40: 44 43 20 24 46 44 0D 20 20 20 20 20 20 20 20 20 |DC $FD. | 00000C50: 53 54 41 20 24 46 42 0D 20 20 20 20 20 20 20 20 |STA $FB. | 00000C60: 20 4C 44 41 20 24 46 43 0D 20 20 20 20 20 20 20 | LDA $FC. | 00000C70: 20 20 41 44 43 20 24 46 45 0D 20 20 20 20 20 20 | ADC $FE. | 00000C80: 20 20 20 53 54 41 20 24 46 43 0D 0D 20 20 20 20 | STA $FC.. | 00000C90: 20 20 20 20 20 4C 44 41 20 24 46 38 0D 20 20 20 | LDA $F8. | 00000CA0: 20 20 20 20 20 20 41 4E 44 20 23 24 30 37 0D 20 | AND #$07. | 00000CB0: 20 20 20 20 20 20 20 20 53 54 41 20 24 46 44 0D | STA $FD.| 00000CC0: 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 30 | LDA #$0| 00000CD0: 37 0D 20 20 20 20 20 20 20 20 20 53 45 43 0D 20 |7. SEC. | 00000CE0: 20 20 20 20 20 20 20 20 53 42 43 20 24 46 44 0D | SBC $FD.| 00000CF0: 20 20 20 20 20 20 20 20 20 54 41 58 0D 20 20 20 | TAX. | 00000D00: 20 20 20 20 20 20 49 4E 58 0D 20 20 20 20 20 20 | INX. | 00000D10: 20 20 20 43 4C 43 0D 20 20 20 20 20 20 20 20 20 | CLC. | 00000D20: 4C 44 41 20 23 24 30 31 0D 4E 41 52 0D 20 20 20 |LDA #$01.NAR. | 00000D30: 20 20 20 20 20 20 44 45 58 0D 20 20 20 20 20 20 | DEX. | 00000D40: 20 20 20 43 50 58 20 23 24 30 30 0D 20 20 20 20 | CPX #$00. | 00000D50: 20 20 20 20 20 42 45 51 20 44 4F 50 45 0D 20 20 | BEQ DOPE. | 00000D60: 20 20 20 20 20 20 20 41 53 4C 20 41 0D 20 20 20 | ASL A. | 00000D70: 20 20 20 20 20 20 43 4C 43 0D 20 20 20 20 20 20 | CLC. | 00000D80: 20 20 20 42 43 43 20 4E 41 52 0D 44 4F 50 45 0D | BCC NAR.DOPE.| 00000D90: 20 20 20 20 20 20 20 20 20 52 54 53 0D 0D 50 4C | RTS..PL| 00000DA0: 4F 54 32 0D 20 20 20 20 20 20 20 20 20 4C 44 59 |OT2. LDY| 00000DB0: 20 23 24 30 30 0D 20 20 20 20 20 20 20 20 20 4F | #$00. O| 00000DC0: 52 41 20 28 24 46 42 29 2C 59 0D 20 20 20 20 20 |RA ($FB),Y. | 00000DD0: 20 20 20 20 53 54 41 20 28 24 46 42 29 2C 59 0D | STA ($FB),Y.| 00000DE0: 20 20 20 20 20 20 20 20 20 52 54 53 0D 50 4C 4F | RTS.PLO| 00000DF0: 54 33 0D 20 20 20 20 20 20 20 20 20 4C 44 59 20 |T3. LDY | 00000E00: 23 24 30 30 0D 20 20 20 20 20 20 20 20 20 45 4F |#$00. EO| 00000E10: 52 20 23 24 46 46 0D 20 20 20 20 20 20 20 20 20 |R #$FF. | 00000E20: 41 4E 44 20 28 24 46 42 29 2C 59 0D 20 20 20 20 |AND ($FB),Y. | 00000E30: 20 20 20 20 20 53 54 41 20 28 24 46 42 29 2C 59 | STA ($FB),Y| 00000E40: 0D 20 20 20 20 20 20 20 20 20 52 54 53 0D 0D |. RTS.. |
..COL1 = $01.. *= $1000..
CLI.. LDA #$50. ST
A $B0. STA $B3. LDA #$00
. STA $B1. STA $B4..
LDA #COL1. STA $0286.
JSR $E544.. LDA #$08.
JSR $FFD2. LDA #$00. ST
A $D020. STA $D021. STA
$44. STA $65. STA $11..
LDX #$00.COC. LDA #$10.
STA $2000,X. STA $2100,X
. STA $2200,X. STA $2300
,X. STA $2400,X. STA $25
00,X. STA $2600,X. STA $
2700,X. STA $2800,X. STA
$2900,X. STA $2A00,X. S
TA $2B00,X. STA $2C00,X.
STA $2D00,X. STA $2E00,X.
STA $2F00,X.. LDA #$10.
STA $0400,X. STA $04E0,X.
INX. BNE COC.;-------------
--------------------------.. LDA
#$18. STA $D018. LDA #$
C8. STA $D016.. LDA #$00
. STA $B5.. LDX $B0.
LDA #$30. CLC. ADC
SIN2,X. BCC POP. INC $B5
.POP. PHA. LDA SIN1,X.
SEC. SBC #$34. TA
Y. PLA. TAX. LDA
$B5.. JSR PLOT. JSR PLO
T2.. LDA #$00. STA $B5..
LDX $B1. LDA #$30.
CLC. ADC SIN2,X. BCC
POP1. INC $B5.POP1. PHA
. LDA SIN1,X. SEC.
SBC #$34. TAY. PLA.
TAX. LDA $B5.. JS
R PLOT. JSR PLOT3.. INC
$B0. INC $B1... LDA #$00
. STA $B5.. LDX $B3.
LDA #$00. SEC. SBC
SIN2,X. BCC POP3. INC $B
5.POP3. PHA. LDA SIN1,X.
SEC. SBC #$34.
TAY. PLA. TAX. L
DA $B5.. JSR PLOT. JSR P
LOT2.. LDA #$00. STA $B5
.. LDX $B4. LDA #$00.
SEC. SBC SIN2,X. B
CC POP4. INC $B5.POP4. P
HA. LDA SIN1,X. SEC.
SBC #$34. TAY. PLA.
TAX. LDA $B5..
JSR PLOT. JSR PLOT3.. IN
C $B3. INC $B4..;---------------
------------------------....PLOT.
STX $F8. STA $F9. STY
$FA. LDA #$20. STA $FC.
LDA #$00. STA $FB.
STA $FD. LDA $FA. LSR
A. LSR A. LSR A.
STA $FE.. CLC. LDA $FB
. ADC $FD. STA $FB.
LDA $FC. ADC $FE. ST
A $FC.. CLC. LSR $FE.
ROR $FD. LSR $FE.
ROR $FD.. CLC. LDA $FB.
ADC $FD. STA $FB.
LDA $FC. ADC $FE. STA
$FC.. LDA $F9. STA $FE.
LDA $F8. AND #$F8.
STA $FD.. CLC. LDA $F
B. ADC $FD. STA $FB.
LDA $FC. ADC $FE. S
TA $FC.. LDA #$00. STA $
FE. LDA $FA. AND #$07.
STA $FD.. CLC. LD
A $FB. ADC $FD. STA $FB.
LDA $FC. ADC $FE.
STA $FC.. LDA $F8. AN
D #$07. STA $FD. LDA #$0
7. SEC. SBC $FD.
TAX. INX. CLC.
LDA #$01.NAR. DEX. CPX #
$00. BEQ DOPE. ASL A.
CLC. BCC NAR.DOPE.
RTS..PLOT2. LDY #$00. O
RA ($FB),Y. STA ($FB),Y.
RTS.PLOT3. LDY #$00. EO
R #$FF. AND ($FB),Y. STA
($FB),Y. RTS..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL