Skip to content

Instantly share code, notes, and snippets.

@xenit

xenit/apple48.txt

Last active August 25, 2019 12:05
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save xenit/10a2fe4557cc4289ccf3ad90f9718864 to your computer and use it in GitHub Desktop.
Save xenit/10a2fe4557cc4289ccf3ad90f9718864 to your computer and use it in GitHub Desktop.
Download ZIP
Apple ][ version of my C64/6502 coding challenge entry, 48 bytes
Raw
apple48.txt
* = $802
!let L=$06
!let R=v
jsr $fB40
sta $c052
jsr $f832
ldx #23
loop: txa
jsr $f847
lda #$77
ldy L
sta ($26),y
inc L
ldy R
sta ($26),y
dec R
asl pattern
bcc loop
inc pattern
dex
bpl loop
inf: bmi inf
pattern:!byte $6d
v: !byte 39
@xenit
Copy link
Author

xenit commented Aug 25, 2019

Cannot draw all the 25 lines tho, unless aspect ratio changed. Now draws all 48 lines in lo-res graphics mode (24 lines duplicated).

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment