mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-11-16 23:20:43 +00:00
sb: add initial back_off code
This commit is contained in:
Vince Weaver
parent
c96e9932b7
commit
8d8dda40b0
@ -12,7 +12,7 @@ all: sb.dsk
|
||||
|
||||
####
|
||||
|
||||
sb.dsk: QBOOT QLOAD TITLE DUCK_POND ROOF ASPLODE TARGET CLIFF RAT
|
||||
sb.dsk: QBOOT QLOAD TITLE DUCK_POND ROOF ASPLODE BACK_OFF TARGET CLIFF RAT
|
||||
cp $(EMPTY_DISK) sb.dsk
|
||||
$(DOS33_RAW) sb.dsk 0 0 QBOOT 0 1
|
||||
$(DOS33_RAW) sb.dsk 0 2 QBOOT 1 1
|
||||
@ -79,6 +79,21 @@ asplode_graphics/sb_title.hgr.zx02:
|
||||
asplode_sound/asplode.btc.zx02:
|
||||
cd asplode_sound && make
|
||||
|
||||
|
||||
####
|
||||
|
||||
BACK_OFF: back_off.o
|
||||
ld65 -o BACK_OFF back_off.o -C $(LINKER_SCRIPTS)/apple2_6000.inc
|
||||
|
||||
back_off.o: back_off.s zx02_optim.s \
|
||||
asplode_graphics/bob_bg.hgr.zx02 \
|
||||
asplode_graphics/sb_sprites.inc \
|
||||
asplode_sound/back_off.btc.zx02 \
|
||||
audio.s play_asplode.s asplode_head.s \
|
||||
hgr_sprite_big.s cycle_colors.s \
|
||||
zp.inc hardware.inc
|
||||
ca65 -o back_off.o back_off.s -l back_off.lst
|
||||
|
||||
####
|
||||
|
||||
CLIFF: cliff.o
|
||||
|
||||
@ -12,7 +12,9 @@ HGR_SPRITE = ../../../utils/hgr-utils/hgr_make_sprite
|
||||
|
||||
all: sb_zone.hgr.zx02 sb_zone2.hgr.zx02 \
|
||||
sb_combined.hgr.zx02 \
|
||||
sb_title.hgr.zx02 sb_sprites.inc
|
||||
sb_title.hgr.zx02 sb_sprites.inc \
|
||||
bob_bg.hgr.zx02
|
||||
|
||||
|
||||
####
|
||||
|
||||
@ -24,6 +26,15 @@ sb_combined.hgr.zx02: sb_zone.hgr sb_zone2.hgr
|
||||
sb_zone.hgr: sb_zone.png
|
||||
$(PNG_TO_HGR) sb_zone.png > sb_zone.hgr
|
||||
|
||||
|
||||
####
|
||||
|
||||
bob_bg.hgr.zx02: bob_bg.hgr
|
||||
$(ZX02) bob_bg.hgr bob_bg.hgr.zx02
|
||||
|
||||
bob_bg.hgr: bob_bg.png
|
||||
$(PNG_TO_HGR) bob_bg.png > bob_bg.hgr
|
||||
|
||||
####
|
||||
|
||||
sb_zone.hgr.zx02: sb_zone.hgr
|
||||
|
||||
BIN
games/sb/asplode_graphics/bob_bg.png
Normal file
BIN
games/sb/asplode_graphics/bob_bg.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 19 KiB |
BIN
games/sb/asplode_graphics/bob_sprites.png
Normal file
BIN
games/sb/asplode_graphics/bob_sprites.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 25 KiB |
@ -1,6 +1,6 @@
|
||||
ZX02 = ~/research/6502_compression/zx02.git/build/zx02 -f
|
||||
|
||||
all: asplode.btc.zx02 asplode_sound.btc.zx02
|
||||
all: asplode.btc.zx02 asplode_sound.btc.zx02 back_off.btc.zx02
|
||||
|
||||
asplode.btc.zx02: asplode.btc
|
||||
$(ZX02) asplode.btc asplode.btc.zx02
|
||||
@ -18,5 +18,10 @@ asplode_sound.btc: asplode.btc bim.btc boom.btc twang.btc
|
||||
dd if=twang.btc bs=1 count=2048 >> asplode_sound.btc
|
||||
|
||||
|
||||
back_off.btc.zx02: back_off.btc
|
||||
$(ZX02) back_off.btc back_off.btc.zx02
|
||||
|
||||
|
||||
|
||||
clean:
|
||||
rm -f *~ asplode_sound.btc
|
||||
|
||||
1
games/sb/asplode_sound/back_off.btc
Normal file
1
games/sb/asplode_sound/back_off.btc
Normal file
File diff suppressed because one or more lines are too long
557
games/sb/back_off.s
Normal file
557
games/sb/back_off.s
Normal file
@ -0,0 +1,557 @@
|
||||
; Strongbad Zone -- Back Off Ladies section
|
||||
;
|
||||
; by popular demand. Too lazy to try to fit it in with the
|
||||
; main program so it gets loaded separately
|
||||
;
|
||||
; Yet Another HSR project
|
||||
;
|
||||
; by deater (Vince Weaver) <vince@deater.net>
|
||||
|
||||
.include "zp.inc"
|
||||
.include "hardware.inc"
|
||||
|
||||
div7_table = $400
|
||||
mod7_table = $500
|
||||
hposn_high = $600
|
||||
hposn_low = $700
|
||||
|
||||
|
||||
back_off_start:
|
||||
|
||||
;===================
|
||||
; set graphics mode
|
||||
;===================
|
||||
|
||||
; assume already in graphics mode
|
||||
|
||||
;====================
|
||||
; set up tables
|
||||
;====================
|
||||
|
||||
; assume tables already there
|
||||
|
||||
;==========================
|
||||
; Load Sound
|
||||
;===========================
|
||||
|
||||
lda SOUND_STATUS
|
||||
and #SOUND_IN_LC
|
||||
beq done_load_sound
|
||||
|
||||
; read/write RAM, use $d000 bank1
|
||||
bit $C083
|
||||
bit $C083
|
||||
|
||||
lda #<sound_data
|
||||
sta ZX0_src
|
||||
lda #>sound_data
|
||||
sta ZX0_src+1
|
||||
|
||||
lda #$D0
|
||||
|
||||
jsr full_decomp
|
||||
|
||||
; read ROM/no-write
|
||||
bit $C082
|
||||
|
||||
|
||||
done_load_sound:
|
||||
|
||||
;=================
|
||||
; Load Background
|
||||
;=================
|
||||
; this is tricky as there's not enough room
|
||||
; so we are over-writing stuff carefully
|
||||
|
||||
load_backgrounds:
|
||||
|
||||
lda #<bg1_data
|
||||
sta ZX0_src
|
||||
lda #>bg1_data
|
||||
sta ZX0_src+1
|
||||
|
||||
lda #$A0
|
||||
|
||||
jsr full_decomp
|
||||
|
||||
;===================
|
||||
; set up variables
|
||||
.if 0
|
||||
lda #16
|
||||
sta STRONGBAD_X
|
||||
sta PLAYER_X
|
||||
|
||||
lda #1
|
||||
sta STRONGBAD_DIR
|
||||
sta BULLET_YDIR
|
||||
|
||||
lda #SHIELD_DOWN
|
||||
sta SHIELD_POSITION
|
||||
sta SHIELD_COUNT
|
||||
|
||||
lda #0
|
||||
sta BULLET_X_L
|
||||
sta BULLET_X_VEL
|
||||
sta HEAD_DAMAGE
|
||||
|
||||
lda #$80
|
||||
sta BULLET_X_VEL_L
|
||||
|
||||
lda #20
|
||||
sta BULLET_X
|
||||
lda #0
|
||||
sta BULLET_Y
|
||||
.endif
|
||||
|
||||
|
||||
jsr do_back_off
|
||||
|
||||
;==========================
|
||||
; done game
|
||||
;==========================
|
||||
|
||||
done_game:
|
||||
lda #0
|
||||
sta WHICH_LOAD
|
||||
rts
|
||||
|
||||
|
||||
|
||||
|
||||
wait_until_keypress:
|
||||
lda KEYPRESS ; 4
|
||||
bpl wait_until_keypress ; 3
|
||||
bit KEYRESET ; clear the keyboard buffer
|
||||
rts
|
||||
|
||||
|
||||
;==============================
|
||||
; do the asplode routine
|
||||
;==============================
|
||||
; should move head to center
|
||||
; player explosion happens
|
||||
; do the "YOUR HEAD A SPLODE" animation
|
||||
; try to interleave the sound
|
||||
; in theory the background should pulse too but
|
||||
; that might be too much
|
||||
do_back_off:
|
||||
|
||||
lda #0
|
||||
sta FRAME
|
||||
|
||||
lda #16
|
||||
sta STRONGBAD_X
|
||||
|
||||
asplode_loop:
|
||||
;===================
|
||||
; copy background
|
||||
;===================
|
||||
|
||||
lda #$a0
|
||||
jsr hgr_copy
|
||||
|
||||
;==========================
|
||||
; draw big head
|
||||
;==========================
|
||||
|
||||
ldx HEAD_DAMAGE
|
||||
lda head_sprites_l,X
|
||||
sta INL
|
||||
lda head_sprites_h,X
|
||||
sta INH
|
||||
lda #16 ; center
|
||||
sta SPRITE_X
|
||||
lda #36
|
||||
sta SPRITE_Y
|
||||
jsr hgr_draw_sprite_big
|
||||
|
||||
;==========================
|
||||
; draw new sprite
|
||||
;==========================
|
||||
|
||||
ldx FRAME
|
||||
lda asplode_sprite_l,X
|
||||
sta INL
|
||||
lda asplode_sprite_h,X
|
||||
sta INH
|
||||
|
||||
|
||||
cpx #11
|
||||
bcs use_hardcoded_x
|
||||
|
||||
ldy BULLET_X
|
||||
dey
|
||||
tya
|
||||
|
||||
jmp asplode_it_x
|
||||
|
||||
use_hardcoded_x:
|
||||
lda asplode_sprite_x,X
|
||||
asplode_it_x:
|
||||
sta SPRITE_X
|
||||
|
||||
lda asplode_sprite_y,X
|
||||
sta SPRITE_Y
|
||||
jsr hgr_draw_sprite_big
|
||||
|
||||
ldx FRAME
|
||||
cpx #17
|
||||
bcc done_extra_sprites
|
||||
|
||||
;==========================
|
||||
; draw your
|
||||
;==========================
|
||||
|
||||
lda #<your_sprite
|
||||
sta INL
|
||||
lda #>your_sprite
|
||||
sta INH
|
||||
lda #8
|
||||
sta SPRITE_X
|
||||
lda #133
|
||||
sta SPRITE_Y
|
||||
jsr hgr_draw_sprite_big
|
||||
|
||||
ldx FRAME
|
||||
cpx #23
|
||||
bcc done_extra_sprites
|
||||
|
||||
;==========================
|
||||
; draw head
|
||||
;==========================
|
||||
|
||||
lda #<head_sprite
|
||||
sta INL
|
||||
lda #>head_sprite
|
||||
sta INH
|
||||
lda #16
|
||||
sta SPRITE_X
|
||||
lda #133
|
||||
sta SPRITE_Y
|
||||
jsr hgr_draw_sprite_big
|
||||
|
||||
ldx FRAME
|
||||
cpx #29
|
||||
bcc done_extra_sprites
|
||||
|
||||
;==========================
|
||||
; draw A
|
||||
;==========================
|
||||
|
||||
lda #<a_sprite
|
||||
sta INL
|
||||
lda #>a_sprite
|
||||
sta INH
|
||||
lda #22
|
||||
sta SPRITE_X
|
||||
lda #133
|
||||
sta SPRITE_Y
|
||||
jsr hgr_draw_sprite_big
|
||||
|
||||
done_extra_sprites:
|
||||
|
||||
|
||||
|
||||
jsr flip_page
|
||||
|
||||
|
||||
ldx FRAME
|
||||
|
||||
|
||||
sound_check_explode:
|
||||
cpx #2
|
||||
bne sound_check_your
|
||||
; play sound
|
||||
ldy #7
|
||||
bne do_play_asplode ; bra
|
||||
|
||||
sound_check_your:
|
||||
cpx #16
|
||||
bne sound_check_head
|
||||
; play sound
|
||||
ldy #0
|
||||
beq do_play_asplode ; bra
|
||||
|
||||
sound_check_head:
|
||||
cpx #22
|
||||
bne sound_check_a
|
||||
ldy #1
|
||||
bne do_play_asplode
|
||||
sound_check_a:
|
||||
cpx #28
|
||||
bne sound_check_splode
|
||||
ldy #2
|
||||
bne do_play_asplode
|
||||
|
||||
sound_check_splode:
|
||||
cpx #34
|
||||
bne sound_check_done
|
||||
ldy #3
|
||||
|
||||
do_play_asplode:
|
||||
jsr play_asplode
|
||||
|
||||
sound_check_done:
|
||||
|
||||
inc FRAME
|
||||
lda FRAME
|
||||
cmp #35
|
||||
bcs done_asplode_head
|
||||
|
||||
jmp asplode_loop
|
||||
|
||||
done_asplode_head:
|
||||
|
||||
lda #20
|
||||
jsr long_wait ; tail call
|
||||
|
||||
; reset things
|
||||
|
||||
lda #0
|
||||
sta SHIELD_POSITION
|
||||
sta BULLET_Y
|
||||
sta SHIELD_COUNT
|
||||
|
||||
lda #1
|
||||
sta BULLET_YDIR
|
||||
|
||||
bit KEYRESET ; clear any keypresses during asplode
|
||||
|
||||
rts
|
||||
|
||||
|
||||
asplode_sprite_l:
|
||||
; begining explosion
|
||||
.byte <asploding1_sprite ; 0
|
||||
.byte <asploding1_sprite ; 1
|
||||
.byte <asploding2_sprite ; 2
|
||||
.byte <asploding3_sprite ; 3
|
||||
.byte <asploding4_sprite ; 4
|
||||
.byte <asploding2_sprite ; 5
|
||||
.byte <asploding3_sprite ; 6
|
||||
.byte <asploding4_sprite ; 7
|
||||
.byte <asploding2_sprite ; 8
|
||||
.byte <asploding3_sprite ; 9
|
||||
.byte <asploding4_sprite ; 10
|
||||
; your
|
||||
.byte <your_sm_sprite ; 11
|
||||
.byte <your_sm_sprite ; 12
|
||||
.byte <your_med_sprite ; 13
|
||||
.byte <your_med_sprite ; 14
|
||||
.byte <your_sprite ; 15
|
||||
.byte <your_sprite ; 16
|
||||
; head
|
||||
.byte <head_sm_sprite ; 17
|
||||
.byte <head_sm_sprite ; 18
|
||||
.byte <head_med_sprite ; 19
|
||||
.byte <head_med_sprite ; 20
|
||||
.byte <head_sprite ; 21
|
||||
.byte <head_sprite ; 22
|
||||
; a
|
||||
.byte <a_sm_sprite ; 23
|
||||
.byte <a_sm_sprite ; 24
|
||||
.byte <a_med_sprite ; 25
|
||||
.byte <a_med_sprite ; 26
|
||||
.byte <a_sprite ; 27
|
||||
.byte <a_sprite ; 28
|
||||
; splode
|
||||
.byte <splode_sm_sprite ; 29
|
||||
.byte <splode_sm_sprite ; 30
|
||||
.byte <splode_med_sprite ; 31
|
||||
.byte <splode_med_sprite ; 32
|
||||
.byte <splode_sprite ; 33
|
||||
.byte <splode_sprite ; 34
|
||||
|
||||
asplode_sprite_h:
|
||||
.byte >asploding1_sprite
|
||||
.byte >asploding1_sprite
|
||||
.byte >asploding2_sprite
|
||||
.byte >asploding3_sprite
|
||||
.byte >asploding4_sprite
|
||||
.byte >asploding2_sprite
|
||||
.byte >asploding3_sprite
|
||||
.byte >asploding4_sprite
|
||||
.byte >asploding2_sprite
|
||||
.byte >asploding3_sprite
|
||||
.byte >asploding4_sprite
|
||||
; your
|
||||
.byte >your_sm_sprite
|
||||
.byte >your_sm_sprite
|
||||
.byte >your_med_sprite
|
||||
.byte >your_med_sprite
|
||||
.byte >your_sprite
|
||||
.byte >your_sprite
|
||||
; head
|
||||
.byte >head_sm_sprite
|
||||
.byte >head_sm_sprite
|
||||
.byte >head_med_sprite
|
||||
.byte >head_med_sprite
|
||||
.byte >head_sprite
|
||||
.byte >head_sprite
|
||||
; a
|
||||
.byte >a_sm_sprite
|
||||
.byte >a_sm_sprite
|
||||
.byte >a_med_sprite
|
||||
.byte >a_med_sprite
|
||||
.byte >a_sprite
|
||||
.byte >a_sprite
|
||||
; splode
|
||||
.byte >splode_sm_sprite
|
||||
.byte >splode_sm_sprite
|
||||
.byte >splode_med_sprite
|
||||
.byte >splode_med_sprite
|
||||
.byte >splode_sprite
|
||||
.byte >splode_sprite
|
||||
|
||||
asplode_sprite_x:
|
||||
.byte 19 ; FIXME: adjust for current pos
|
||||
.byte 19
|
||||
.byte 19
|
||||
.byte 19
|
||||
.byte 19
|
||||
.byte 19
|
||||
.byte 19
|
||||
.byte 19
|
||||
.byte 19
|
||||
.byte 19
|
||||
.byte 19
|
||||
; your
|
||||
.byte 18
|
||||
.byte 17
|
||||
.byte 14
|
||||
.byte 12
|
||||
.byte 9
|
||||
.byte 8
|
||||
; head
|
||||
.byte 18
|
||||
.byte 18
|
||||
.byte 17
|
||||
.byte 17
|
||||
.byte 16
|
||||
.byte 16
|
||||
; a
|
||||
.byte 19
|
||||
.byte 20
|
||||
.byte 20
|
||||
.byte 21
|
||||
.byte 22
|
||||
.byte 22
|
||||
; splode
|
||||
.byte 18
|
||||
.byte 20
|
||||
.byte 20
|
||||
.byte 21
|
||||
.byte 22
|
||||
.byte 24
|
||||
|
||||
asplode_sprite_y:
|
||||
.byte 150
|
||||
.byte 150
|
||||
.byte 150
|
||||
.byte 150
|
||||
.byte 150
|
||||
.byte 150
|
||||
.byte 150
|
||||
.byte 150
|
||||
.byte 150
|
||||
.byte 150
|
||||
.byte 150
|
||||
; your
|
||||
.byte 80
|
||||
.byte 90
|
||||
.byte 100
|
||||
.byte 111
|
||||
.byte 122
|
||||
.byte 133
|
||||
; head
|
||||
.byte 80
|
||||
.byte 90
|
||||
.byte 100
|
||||
.byte 111
|
||||
.byte 122
|
||||
.byte 133
|
||||
; a
|
||||
.byte 80
|
||||
.byte 90
|
||||
.byte 100
|
||||
.byte 111
|
||||
.byte 122
|
||||
.byte 133
|
||||
; splode
|
||||
.byte 80
|
||||
.byte 90
|
||||
.byte 100
|
||||
.byte 111
|
||||
.byte 122
|
||||
.byte 133
|
||||
|
||||
|
||||
long_wait:
|
||||
ldx #10
|
||||
long_wait_loop:
|
||||
lda #255
|
||||
jsr WAIT
|
||||
dex
|
||||
bne long_wait_loop
|
||||
rts
|
||||
|
||||
|
||||
;==========
|
||||
; flip page
|
||||
;==========
|
||||
flip_page:
|
||||
lda DRAW_PAGE
|
||||
beq draw_page2
|
||||
draw_page1:
|
||||
bit PAGE2
|
||||
lda #0
|
||||
|
||||
beq done_flip
|
||||
|
||||
draw_page2:
|
||||
bit PAGE1
|
||||
lda #$20
|
||||
|
||||
done_flip:
|
||||
sta DRAW_PAGE
|
||||
|
||||
rts
|
||||
|
||||
|
||||
|
||||
.include "hgr_sprite_big.s"
|
||||
.include "hgr_copy_fast.s"
|
||||
.include "audio.s"
|
||||
.include "play_asplode.s"
|
||||
|
||||
.include "asplode_graphics/sb_sprites.inc"
|
||||
|
||||
|
||||
shield_sprites_l:
|
||||
.byte <player_sprite,<shield_left_sprite
|
||||
.byte <shield_center_sprite,<shield_right_sprite
|
||||
|
||||
shield_sprites_h:
|
||||
.byte >player_sprite,>shield_left_sprite
|
||||
.byte >shield_center_sprite,>shield_right_sprite
|
||||
|
||||
|
||||
head_sprites_l:
|
||||
.byte <big_head0_sprite,<big_head1_sprite,<big_head2_sprite
|
||||
.byte <big_head3_sprite,<big_head4_sprite
|
||||
|
||||
head_sprites_h:
|
||||
.byte >big_head0_sprite,>big_head1_sprite,>big_head2_sprite
|
||||
.byte >big_head3_sprite,>big_head4_sprite
|
||||
|
||||
|
||||
bg1_data:
|
||||
.incbin "asplode_graphics/bob_bg.hgr.zx02"
|
||||
|
||||
sound_data:
|
||||
.incbin "asplode_sound/back_off.btc.zx02"
|
||||
|
||||
.include "zx02_optim.s"
|
||||
|
||||
; start at least 8k in?
|
||||
|
||||
Loading…
Reference in New Issue
Block a user