spiral: putting way too much work ingo this

think I understand what's going on fully now though
This commit is contained in:
Vince Weaver 2024-04-26 11:38:26 -04:00
parent 1a9f28c7a2
commit 5330100fde
3 changed files with 21 additions and 4 deletions

View File

@ -0,0 +1,10 @@
# reverse engineering what the pattern we picked actually looks like
#
# Number of shapes
1
START
NRT NDN NOP
NUP DN NLT
NLT NUP NOP
NUP UP NOP
STOP

View File

@ -93,8 +93,8 @@ tiny_loop:
our_shape = $E2DF ; location in the Applesoft ROM
; that holds $11,$F0,$03,$20,$00
; which makes an offset right-angle
; double line-ish pattern when
; which makes two offset lines,
; one up, one down, when
; interpreted as a shape table
; (it points into the code for the FRE()
; BASIC routine but that's not important)
@ -118,7 +118,7 @@ our_shape = $E2DF ; location in the Applesoft ROM
; x is the starting point, * are the two line segments drawn
; .
; ^
; *
; . x *
; . . .
; . . V

View File

@ -0,0 +1,7 @@
10 HIMEM:8167
20 POKE 232,231:POKE 233,31
30 FOR L=8167 TO 8175: READ B:POKE L,B:NEXT L
35 HGR:ROT=0:SCALE=2
40 FOR I=1 TO 1: XDRAW I AT I*10,100:NEXT I
90 END
100 DATA 1,0,4,0,17,240,3,32,0