mirror of
https://github.com/badvision/lawless-legends.git
synced 2024-10-03 06:54:42 +00:00
Turned on double buffering, and enabled multiple steps. At least we can see the speed now.
This commit is contained in:
parent
133c493c1c
commit
98ec58291c
@ -19,8 +19,8 @@ codeBeg = *
|
|||||||
jmp selectMip5
|
jmp selectMip5
|
||||||
|
|
||||||
; Conditional assembly flags
|
; Conditional assembly flags
|
||||||
DOUBLE_BUFFER = 0 ; whether to double-buffer
|
DOUBLE_BUFFER = 1 ; whether to double-buffer
|
||||||
DEBUG = 1 ; turn on verbose logging
|
DEBUG = 0 ; turn on verbose logging
|
||||||
|
|
||||||
; Constants
|
; Constants
|
||||||
TOP_LINE = $2180 ; 24 lines down from top
|
TOP_LINE = $2180 ; 24 lines down from top
|
||||||
@ -59,7 +59,7 @@ deltaDistX = $52 ; len 1
|
|||||||
deltaDistY = $53 ; len 1
|
deltaDistY = $53 ; len 1
|
||||||
dist = $54 ; len 2
|
dist = $54 ; len 2
|
||||||
diff = $56 ; len 2
|
diff = $56 ; len 2
|
||||||
playerDir = $57 ; len 1
|
playerDir = $58 ; len 1
|
||||||
|
|
||||||
; Other monitor locations
|
; Other monitor locations
|
||||||
a2l = $3E
|
a2l = $3E
|
||||||
@ -1186,12 +1186,15 @@ test:
|
|||||||
sta resetVec+2
|
sta resetVec+2
|
||||||
|
|
||||||
; Establish the initial player position and direction
|
; Establish the initial player position and direction
|
||||||
; X=2.5, Y=2.5
|
; X=5.5
|
||||||
lda #2
|
lda #5
|
||||||
sta playerX+1
|
sta playerX+1
|
||||||
sta playerY+1
|
|
||||||
lda #$80
|
lda #$80
|
||||||
sta playerX
|
sta playerX
|
||||||
|
; Y=2.5
|
||||||
|
lda #2
|
||||||
|
sta playerY+1
|
||||||
|
lda #$80
|
||||||
sta playerY
|
sta playerY
|
||||||
; direction=0
|
; direction=0
|
||||||
lda #0
|
lda #0
|
||||||
@ -1262,6 +1265,16 @@ test:
|
|||||||
lda #>@frameName
|
lda #>@frameName
|
||||||
jsr bload
|
jsr bload
|
||||||
|
|
||||||
|
.if DOUBLE_BUFFER
|
||||||
|
lda #>$4000
|
||||||
|
pha
|
||||||
|
lda #<$4000
|
||||||
|
pha
|
||||||
|
ldx #<@frameName
|
||||||
|
lda #>@frameName
|
||||||
|
jsr bload
|
||||||
|
.endif
|
||||||
|
|
||||||
; Build all the unrolls and tables
|
; Build all the unrolls and tables
|
||||||
DEBUG_STR "Making tables."
|
DEBUG_STR "Making tables."
|
||||||
jsr makeBlit
|
jsr makeBlit
|
||||||
@ -1361,8 +1374,18 @@ test:
|
|||||||
@pauseLup:
|
@pauseLup:
|
||||||
lda kbd
|
lda kbd
|
||||||
bpl @pauseLup
|
bpl @pauseLup
|
||||||
@done:
|
|
||||||
sta kbdStrobe ; eat the keypress
|
sta kbdStrobe ; eat the keypress
|
||||||
|
cmp #$9B
|
||||||
|
beq @done
|
||||||
|
; advance
|
||||||
|
lda playerX
|
||||||
|
clc
|
||||||
|
adc #$40
|
||||||
|
sta playerX
|
||||||
|
bcc :+
|
||||||
|
inc playerX+1
|
||||||
|
: jmp @oneLevel
|
||||||
|
@done:
|
||||||
bit setText
|
bit setText
|
||||||
bit page1
|
bit page1
|
||||||
; quit to monitor
|
; quit to monitor
|
||||||
|
Loading…
Reference in New Issue
Block a user