zs7976/spo
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fixed indenting

Browse source
This commit is contained in:
zanostro 2025-10-22 19:33:57 +02:00
parent 4105c50e98
commit 39762e15e4
1 changed files with 77 additions and 77 deletions
Download patch file Download diff file Expand all files Collapse all files

154
zoge/zoge.asm
View file

@ -1,94 +1,94 @@
. code . code
bounce START 0 bounce START 0
LDA NUM_B LDA NUM_B
MUL D_SIZE MUL D_SIZE
STA MAXIDX STA MAXIDX
LOOP LDX INDEX LOOP LDX INDEX
LDA ballX,X LDA ballX,X
COMP maxX COMP maxX
JEQ X_WALL . hits right wall JEQ X_WALL . hits right wall
COMP ZERO COMP ZERO
JEQ X_WALL . hits left wall JEQ X_WALL . hits left wall
cmpY LDA ballY,X cmpY LDA ballY,X
COMP maxY COMP maxY
JEQ Y_WALL . hits bottom JEQ Y_WALL . hits bottom
COMP ZERO COMP ZERO
JEQ Y_WALL . hits top JEQ Y_WALL . hits top
endCOMP LDA bColour,X endCOMP LDA bColour,X
STA colour STA colour
LDA ballX,X LDA ballX,X
LDB ballY,X LDB ballY,X
LDT HEIGHT LDT HEIGHT
MULR T, B .flatten MULR T, B .flatten
ADDR B, A ADDR B, A
STX INDEX STX INDEX
RMO A, X . copy flattened old coordinates to X RMO A, X . copy flattened old coordinates to X
LDCH BLACK . clear screen LDCH BLACK . clear screen
+STCH SCREEN,X +STCH SCREEN,X
LDX INDEX LDX INDEX
LDA ballX,X .//calculae new X LDA ballX,X .//calculae new X
LDT bSpeedX,X LDT bSpeedX,X
ADDR T, A ADDR T, A
STA ballX,X STA ballX,X
LDB ballY,X . calculate new Y LDB ballY,X . calculate new Y
LDT bSpeedY, X LDT bSpeedY, X
ADDR T, B ADDR T, B
STB ballY,X STB ballY,X
LDT HEIGHT LDT HEIGHT
MULR T, B . flatten MULR T, B . flatten
ADDR B, A ADDR B, A
STX INDEX STX INDEX
RMO A, X . copy flattened old coordinates to X RMO A, X . copy flattened old coordinates to X
LDA colour LDA c olour
+STCH SCREEN,X . update screen +STCH SCREEN,X . update screen
LDX INDEX LDX INDEX
. reset . reset
LDA #3 LDA #3
ADDR A,X ADDR A,X
STX INDEX STX INDEX
LDA MAXIDX LDA MAXIDX
COMPR X,A COMPR X,A
JLT LOOP . while X < A -> keep looping balls JLT LOOP . while X < A -> keep looping balls
LDX #0 . wrap LDX #0 . wrap
STX INDEX STX INDEX
J LOOP J LOOP
halt J halt halt J halt
END bounce END bounce
. functions . functions
X_WALL LDB bSpeedX,X X_WALL LDB bSpeedX,X
LDT MINUS1 LDT MINUS1
MULR B, T MULR B, T
STT bSpeedX,X STT bSpeedX,X
J cmpY J cmpY
Y_WALL LDB bSpeedY,X Y_WALL LDB bSpeedY,X
LDT MINUS1 LDT MINUS1
MULR B, T MULR B, T
STT bSpeedY,X STT bSpeedY,X
J endCOMP J endCOMP
. data . data
@ -105,24 +105,24 @@ colour RESW 1
. ball data . ball data
ballX WORD 60 ballX WORD 60
WORD 32 WORD 32
WORD 32 WORD 32
ballY WORD 32 ballY WORD 32
WORD 32 WORD 32
WORD 32 WORD 32
bSpeedX WORD 1 bSpeedX WORD 1
WORD 0 WORD 0
WORD 1 WORD 1
bSpeedY WORD 1 bSpeedY WORD 1
WORD 1 WORD 1
WORD 0 WORD 0
bColour WORD 195 . blue bColour WORD 195 . blue
WORD 204 . green WORD 204 . green
WORD 240 . red WORD 240 . red
maxX WORD 63 maxX WORD 63
maxY WORD 63 maxY WORD 63
@ -133,5 +133,5 @@ HEIGHT WORD 64
BLACK BYTE 0 BLACK BYTE 0
. screen . screen
ORG 0xA000 ORG 0xA000
SCREEN RESB 4096 SCREEN RESB 4096