Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2025-08-15 08:27:41 +00:00
Code Issues Projects Releases Wiki Activity

space_bars: initial space bars

Browse Source
This commit is contained in:
Vince Weaver
2018-10-08 12:00:10 -04:00
parent f8f236d03e
commit eed24cc5f6
1 changed files with 86 additions and 29 deletions
Download Patch File Download Diff File Expand all files Collapse all files

115
space_bars/game.s
View File

@@ -39,32 +39,35 @@ game:
;================== ;==================
; setup framebuffer ; setup framebuffer
lda #$12 lda #0
sta FRAMEBUFFER+0 sta ZPOS
lda #$3f
sta FRAMEBUFFER+1 ; lda #$12
lda #$56 ; sta FRAMEBUFFER+0
sta FRAMEBUFFER+2 ; lda #$3f
lda #$78 ; sta FRAMEBUFFER+1
sta FRAMEBUFFER+3 ; lda #$56
lda #$9A ; sta FRAMEBUFFER+2
sta FRAMEBUFFER+4 ; lda #$78
lda #$BC ; sta FRAMEBUFFER+3
sta FRAMEBUFFER+5 ; lda #$9A
lda #$DE ; sta FRAMEBUFFER+4
sta FRAMEBUFFER+6 ; lda #$BC
lda #$F0 ; sta FRAMEBUFFER+5
sta FRAMEBUFFER+7 ; lda #$DE
lda #$12 ; sta FRAMEBUFFER+6
sta FRAMEBUFFER+8 ; lda #$F0
lda #$3f ; sta FRAMEBUFFER+7
sta FRAMEBUFFER+9 ; lda #$12
lda #$56 ; sta FRAMEBUFFER+8
sta FRAMEBUFFER+10 ; lda #$3f
lda #$78 ; sta FRAMEBUFFER+9
sta FRAMEBUFFER+11 ; lda #$56
lda #$9A ; sta FRAMEBUFFER+10
sta FRAMEBUFFER+12 ; lda #$78
; sta FRAMEBUFFER+11
; lda #$9A
; sta FRAMEBUFFER+12
@@ -286,20 +289,26 @@ sbloopF:dex ; 2
; do_nothing should be 4550 ; do_nothing should be 4550
; -3470 draw_framebuffer ; -3470 draw_framebuffer
; -193 setup framebuffer
; -34 keypress ; -34 keypress
; -1 adjust center mark back ; -1 adjust center mark back
; =========== ; ===========
; 1045 ; 852
; Try X=6 Y=29 cycles=1045 ; Try X=6 Y=29 cycles=1045
; Try X=20 Y=8 cycles=849 R3
ldy #29 ; 2 lda $0
sbloop1:ldx #6 ; 2
ldy #8 ; 2
sbloop1:ldx #20 ; 2
sbloop2:dex ; 2 sbloop2:dex ; 2
bne sbloop2 ; 2nt/3 bne sbloop2 ; 2nt/3
dey ; 2 dey ; 2
bne sbloop1 ; 2nt/3 bne sbloop1 ; 2nt/3
jsr setup_framebuffer ; 6+187
jsr draw_framebuffer ; 6+3464 jsr draw_framebuffer ; 6+3464
@@ -461,3 +470,51 @@ background_hgr_end:
score_text: score_text:
.byte 0,0 .byte 0,0
.asciiz "LEVEL:6 LIVES:2 SCORE:001978 HI:002018" .asciiz "LEVEL:6 LIVES:2 SCORE:001978 HI:002018"
; Note on the distance calculations
; we use something simplistic here
; see http://www.extentofthejam.com/pseudo/
; "Texture": 64?
; 0 GREY 5,7,f,7,5,0,0,0
; 1 0,0,0,0,0,0,0,0
; 2 BLUE 2,6,f,6,2,0,0,0
; 3 0,0,0,0,0,0,0,0
; 4 GREEN 4,c,f,c,4,0,0,0
; 5 0,0,0,0,0,0,0,0
; 6 RED 1,b,f,b,1,0,0,0
; 7 0,0,0,0,0,0,0,0
.align 64
raster_texture:
.byte $5,$7,$f,$7,$5,$0,$0,$0
.byte $0,$0,$0,$0,$0,$0,$0,$0
.byte $2,$6,$f,$6,$2,$0,$0,$0
.byte $0,$0,$0,$0,$0,$0,$0,$0
.byte $4,$c,$f,$c,$4,$0,$0,$0
.byte $0,$0,$0,$0,$0,$0,$0,$0
.byte $1,$b,$f,$b,$1,$0,$0,$0
.byte $0,$0,$0,$0,$0,$0,$0,$0
; 2 + 15*12 + 5 = 187
setup_framebuffer:
ldx #0 ; 2
setup_fb_loop:
lda raster_texture,x ; 4
sta FRAMEBUFFER,x ; 4
inx ; 2
cpx #12 ; 2
bne setup_fb_loop ; 3
;===========
; 15
; -1
rts ; 6