Apple-2gs-SW
/
GSCats
mirror of https://github.com/blondie7575/GSCats.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

Cleanup

This commit is contained in:
blondie7575 2017-12-27 09:57:52 -07:00
parent d2c5ef675f
commit 3e5a8ab86f
3 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
gamemanager.s
View File

@ -58,7 +58,7 @@ gameplayLoop:
; beq gameplayLoopKbd
BORDER_COLOR #$3
jsr renderTerrainSpans
jsr unrenderTerrainSpans
; jsr unrenderTerrainSpans
stz terrainDirty
BORDER_COLOR #$1

BIN
gscats.2mg
View File

Binary file not shown.

6
terrain.s
View File

@ -11,6 +11,8 @@ COMPILEDTERRAINROW = TERRAINWIDTH/4+3 ; In words, +2 to make room for clipping j
VISIBLETERRAINWIDTH = TERRAINWIDTH/4 ; In words- width minus jump return padding
VISIBLETERRAINWINDOW = 80 ; In words
MAXSPANSPERROW = 15
SPANROWBYTES = MAXSPANSPERROW*2 + 2 ; In bytes
.if 0
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
@ -118,7 +120,7 @@ renderTerrainRowSpans:
; Find row data
lda PARAML1
asl ; Shifts must match MAXSPANSPERROW*2 + 2
asl ; Shifts must match SPANROWBYTES
asl
asl
asl
@ -647,7 +649,7 @@ compileTerrainSpansRow:
SAVE_AXY
lda PARAML1
asl ; Shifts must match MAXSPANSPERROW*2 + 2
asl ; Shifts must match SPANROWBYTES
asl
asl
asl