/
This commit is contained in:
parent
e021590fa6
commit
0ff78394b6
3 changed files with 11 additions and 8 deletions
13
ass1/FA.dev
13
ass1/FA.dev
|
|
@ -1,6 +1,9 @@
|
|||
11
|
||||
12
|
||||
13
|
||||
14
|
||||
15
|
||||
1
|
||||
2
|
||||
3
|
||||
4
|
||||
5
|
||||
6
|
||||
7
|
||||
8
|
||||
0
|
||||
|
|
@ -11,7 +11,8 @@
|
|||
|
||||
SNAKE START 0
|
||||
|
||||
FIRST CLEAR A
|
||||
FIRST LDA #0x44
|
||||
STA DIREC
|
||||
LOOP JSUB RENDER
|
||||
|
||||
JSUB WAIT
|
||||
|
|
@ -64,7 +65,6 @@ L6 STCH DIREC
|
|||
L7 .check bounds
|
||||
.for (pos : snakex/y) assert x/y >= 0 && x/y <= 15
|
||||
|
||||
JSUB RENDER
|
||||
J LOOP
|
||||
|
||||
HALT J HALT
|
||||
|
|
|
|||
|
|
@ -87,7 +87,7 @@ SKIP1 WD STDOUT
|
|||
WD STDOUT
|
||||
RSUB
|
||||
|
||||
MASK1 WORD X'0000FF'
|
||||
MASK1 WORD X'0000FF'
|
||||
MASK WORD X'F00000'
|
||||
STDOUT BYTE X'01'
|
||||
DEVICE BYTE X'FA'
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue