mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-09-10 08:54:51 +00:00
ootw: initial vent motion
This commit is contained in:
parent
17df881305
commit
cb522d4fb3
@ -6,6 +6,13 @@ ootw_vent:
|
||||
; init
|
||||
|
||||
lda #0
|
||||
sta GAIT
|
||||
|
||||
lda #17
|
||||
sta PHYSICIST_X
|
||||
|
||||
lda #2
|
||||
sta PHYSICIST_Y
|
||||
|
||||
; load background
|
||||
lda #>(vent_rle)
|
||||
@ -58,8 +65,50 @@ vent_loop:
|
||||
|
||||
;===============================
|
||||
; check keyboard
|
||||
;===============================
|
||||
|
||||
jsr handle_keypress
|
||||
lda KEYPRESS
|
||||
bpl vent_done_keyboard
|
||||
|
||||
cmp #27+$80
|
||||
beq vent_escape
|
||||
|
||||
cmp #'A'+$80
|
||||
beq vent_left_pressed
|
||||
cmp #8+$80
|
||||
beq vent_left_pressed
|
||||
|
||||
cmp #'D'+$80
|
||||
beq vent_right_pressed
|
||||
cmp #$15+$80
|
||||
beq vent_right_pressed
|
||||
|
||||
jmp vent_done_keyboard
|
||||
|
||||
vent_escape:
|
||||
lda #$ff
|
||||
sta GAME_OVER
|
||||
bne vent_done_keyboard ; bra
|
||||
|
||||
|
||||
vent_left_pressed:
|
||||
dec PHYSICIST_X
|
||||
dec GAIT
|
||||
dec GAIT
|
||||
jmp vent_adjust_gait
|
||||
|
||||
vent_right_pressed:
|
||||
inc PHYSICIST_X
|
||||
inc GAIT
|
||||
inc GAIT
|
||||
|
||||
vent_adjust_gait:
|
||||
lda GAIT
|
||||
and #$7
|
||||
sta GAIT
|
||||
|
||||
vent_done_keyboard:
|
||||
bit KEYRESET
|
||||
|
||||
;===============================
|
||||
; move physicist
|
||||
@ -75,8 +124,21 @@ vent_loop:
|
||||
;===============
|
||||
; draw physicist
|
||||
|
||||
; jsr draw_physicist
|
||||
lda PHYSICIST_X
|
||||
sta XPOS
|
||||
lda PHYSICIST_Y
|
||||
sta YPOS
|
||||
|
||||
lda GAIT
|
||||
and #$fe
|
||||
tay
|
||||
|
||||
lda rolling_progression,Y
|
||||
sta INL
|
||||
lda rolling_progression+1,Y
|
||||
sta INH
|
||||
|
||||
jsr put_sprite_crop
|
||||
|
||||
;===============
|
||||
; page flip
|
||||
|
@ -1,37 +1,36 @@
|
||||
vent_rle: .byte $28 ; ysize=48
|
||||
.byte $00, $AC,$20, $50, $A5,$20, $22, $00,$00, $22
|
||||
.byte $A0,$11,$20, $00, $22, $AB,$00, $05, $A6,$00, $90
|
||||
.byte $4B, $A0,$11,$00, $22, $00, $22, $00,$00, $A0,$10,$20
|
||||
.byte $29, $2B, $AF,$20, $00,$00, $22, $00, $22
|
||||
.byte $00,$00, $22, $A0,$1F,$00, $22, $00,$00, $22, $00
|
||||
.byte $A0,$11,$20, $00, $22, $AB,$00, $05, $A0,$19,$00, $22
|
||||
.byte $00, $22, $00,$00, $A0,$21,$20, $00,$00, $22, $00
|
||||
.byte $22, $00,$00, $22, $A0,$1F,$00, $22, $00,$00, $22
|
||||
.byte $00, $22, $00,$00, $A3,$02, $22, $A5,$20, $A0,$17,$00
|
||||
.byte $22, $00,$00, $22, $00, $22, $AA,$00, $55
|
||||
.byte $A4,$02, $22, $A5,$20, $A6,$00, $88,$88, $8F, $FF
|
||||
.byte $A3,$00, $22, $00,$00, $22, $00, $A4,$02, $22
|
||||
.byte $A5,$20, $AB,$00, $22, $A6,$00, $2B, $00, $0B
|
||||
.byte $22, $A3,$00, $22, $00,$00, $22, $AA,$00, $A5,$02
|
||||
.byte $22, $A4,$20, $00,$00, $22, $A6,$00, $22, $00,$00
|
||||
.byte $22, $A3,$00, $22, $00,$00, $22, $A0,$13,$00, $22
|
||||
.byte $00,$00, $22, $A6,$00, $22, $00,$00, $22, $A3,$00
|
||||
.byte $22, $00,$00, $22, $A0,$13,$00, $22, $00,$00, $22
|
||||
.byte $A6,$00, $22, $00,$00, $22, $A3,$00, $22, $00,$00
|
||||
.byte $02, $A4,$00, $22, $AD,$02, $55, $02, $00,$00
|
||||
.byte $02, $55, $A6,$02, $00,$00, $22, $A3,$00, $22
|
||||
.byte $A7,$00, $22, $A0,$1B,$00, $22, $A3,$00, $22, $A7,$00
|
||||
.byte $22, $00,$00, $A0,$17,$20, $00,$00, $22, $A3,$00, $22
|
||||
.byte $00,$00, $22, $A4,$00, $22, $00,$00, $22, $A0,$15,$00
|
||||
.byte $22, $00,$00, $22, $A3,$00, $22, $00,$00, $22
|
||||
.byte $A4,$00, $22, $00,$00, $22, $A0,$15,$00, $22, $00,$00
|
||||
.byte $22, $A3,$00, $22, $00,$00, $22, $A5,$02, $00,$00
|
||||
.byte $22, $A7,$00, $22, $AE,$02, $00,$00, $A5,$02, $00,$00
|
||||
.byte $22, $A7,$00, $22, $A7,$00, $22, $A0,$17,$00, $22
|
||||
.byte $A4,$02, $22, $00,$00, $22, $A7,$00, $22, $00,$00
|
||||
.byte $22, $A0,$11,$02, $22, $00,$00, $22, $A4,$00, $22
|
||||
.byte $00,$00, $22, $A7,$00, $22, $00,$00, $22, $A0,$11,$00
|
||||
.byte $00, $22, $00,$00, $22, $A0,$1F,$00, $22, $00,$00
|
||||
.byte $22, $00, $22, $00,$00, $A3,$02, $22, $A5,$20
|
||||
.byte $A0,$17,$00, $22, $00,$00, $22, $00, $22, $AA,$00
|
||||
.byte $55, $A4,$02, $22, $A5,$20, $A6,$00, $88,$88, $8F
|
||||
.byte $FF, $A3,$00, $22, $00,$00, $22, $00, $A4,$02
|
||||
.byte $22, $A5,$20, $AB,$00, $22, $A6,$00, $2B, $00
|
||||
.byte $0B, $22, $A3,$00, $22, $00,$00, $22, $AA,$00
|
||||
.byte $A5,$02, $22, $A4,$20, $00,$00, $22, $A6,$00, $22
|
||||
.byte $00,$00, $22, $A3,$00, $22, $00,$00, $22, $A0,$13,$00
|
||||
.byte $22, $00,$00, $22, $A6,$00, $22, $00,$00, $22
|
||||
.byte $A3,$00, $22, $00,$00, $22, $A0,$13,$00, $22, $00,$00
|
||||
.byte $22, $A6,$00, $22, $00,$00, $22, $A3,$00, $22
|
||||
.byte $00,$00, $02, $A4,$00, $22, $AD,$02, $55, $02
|
||||
.byte $00,$00, $02, $55, $A6,$02, $00,$00, $22, $A3,$00
|
||||
.byte $22, $A7,$00, $22, $A0,$1B,$00, $22, $A3,$00, $22
|
||||
.byte $A7,$00, $22, $00,$00, $A0,$17,$20, $00,$00, $22, $A3,$00
|
||||
.byte $22, $00,$00, $22, $A4,$00, $22, $00,$00, $22
|
||||
.byte $A7,$00, $22, $00,$00, $22, $A0,$11,$00, $22, $00,$00
|
||||
.byte $22, $A4,$00, $22, $00,$00, $A9,$02, $00,$00, $A0,$13,$02
|
||||
.byte $00,$00, $22, $A4,$00, $22, $A0,$22,$00, $22, $A4,$00
|
||||
.byte $A0,$10,$02, $22, $00,$00, $22, $A0,$10,$02
|
||||
.byte $A0,$15,$00, $22, $00,$00, $22, $A3,$00, $22, $00,$00
|
||||
.byte $22, $A4,$00, $22, $00,$00, $22, $A0,$15,$00, $22
|
||||
.byte $00,$00, $22, $A3,$00, $22, $00,$00, $22, $A5,$02
|
||||
.byte $00,$00, $22, $A7,$00, $22, $AE,$02, $00,$00, $A5,$02
|
||||
.byte $00,$00, $22, $A7,$00, $22, $A7,$00, $22, $A0,$17,$00
|
||||
.byte $22, $A4,$02, $22, $00,$00, $22, $A7,$00, $22
|
||||
.byte $00,$00, $22, $A0,$11,$02, $22, $00,$00, $22, $A4,$00
|
||||
.byte $22, $00,$00, $22, $A7,$00, $22, $00,$00, $22
|
||||
.byte $A0,$11,$00, $22, $00,$00, $22, $A4,$00, $22, $00,$00
|
||||
.byte $22, $A7,$00, $22, $00,$00, $22, $A0,$11,$00, $22
|
||||
.byte $00,$00, $22, $A4,$00, $22, $00,$00, $A9,$02, $00,$00
|
||||
.byte $A0,$13,$02, $00,$00, $22, $A4,$00, $22, $A0,$22,$00, $22
|
||||
.byte $A4,$00, $A0,$10,$02, $22, $00,$00, $22, $A0,$10,$02
|
||||
.byte $A1
|
||||
|
Binary file not shown.
Before Width: | Height: | Size: 6.4 KiB After Width: | Height: | Size: 6.2 KiB |
Loading…
Reference in New Issue
Block a user