mirror of
https://github.com/deater/dos33fsprogs.git
synced 2025-08-15 08:27:41 +00:00
ootw: initial vent motion
This commit is contained in:
@@ -6,6 +6,13 @@ ootw_vent:
|
|||||||
; init
|
; init
|
||||||
|
|
||||||
lda #0
|
lda #0
|
||||||
|
sta GAIT
|
||||||
|
|
||||||
|
lda #17
|
||||||
|
sta PHYSICIST_X
|
||||||
|
|
||||||
|
lda #2
|
||||||
|
sta PHYSICIST_Y
|
||||||
|
|
||||||
; load background
|
; load background
|
||||||
lda #>(vent_rle)
|
lda #>(vent_rle)
|
||||||
@@ -58,8 +65,50 @@ vent_loop:
|
|||||||
|
|
||||||
;===============================
|
;===============================
|
||||||
; check keyboard
|
; 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
|
; move physicist
|
||||||
@@ -75,8 +124,21 @@ vent_loop:
|
|||||||
;===============
|
;===============
|
||||||
; draw physicist
|
; 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
|
; page flip
|
||||||
|
@@ -1,37 +1,36 @@
|
|||||||
vent_rle: .byte $28 ; ysize=48
|
vent_rle: .byte $28 ; ysize=48
|
||||||
.byte $00, $AC,$20, $50, $A5,$20, $22, $00,$00, $22
|
.byte $00, $AC,$20, $50, $A5,$20, $22, $00,$00, $22
|
||||||
.byte $A0,$11,$20, $00, $22, $AB,$00, $05, $A6,$00, $90
|
.byte $A0,$11,$20, $00, $22, $AB,$00, $05, $A0,$19,$00, $22
|
||||||
.byte $4B, $A0,$11,$00, $22, $00, $22, $00,$00, $A0,$10,$20
|
.byte $00, $22, $00,$00, $A0,$21,$20, $00,$00, $22, $00
|
||||||
.byte $29, $2B, $AF,$20, $00,$00, $22, $00, $22
|
|
||||||
.byte $00,$00, $22, $A0,$1F,$00, $22, $00,$00, $22, $00
|
|
||||||
.byte $22, $00,$00, $22, $A0,$1F,$00, $22, $00,$00, $22
|
.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 $00, $22, $00,$00, $22, $A0,$1F,$00, $22, $00,$00
|
||||||
.byte $22, $00,$00, $22, $00, $22, $AA,$00, $55
|
.byte $22, $00, $22, $00,$00, $A3,$02, $22, $A5,$20
|
||||||
.byte $A4,$02, $22, $A5,$20, $A6,$00, $88,$88, $8F, $FF
|
.byte $A0,$17,$00, $22, $00,$00, $22, $00, $22, $AA,$00
|
||||||
.byte $A3,$00, $22, $00,$00, $22, $00, $A4,$02, $22
|
.byte $55, $A4,$02, $22, $A5,$20, $A6,$00, $88,$88, $8F
|
||||||
.byte $A5,$20, $AB,$00, $22, $A6,$00, $2B, $00, $0B
|
.byte $FF, $A3,$00, $22, $00,$00, $22, $00, $A4,$02
|
||||||
.byte $22, $A3,$00, $22, $00,$00, $22, $AA,$00, $A5,$02
|
.byte $22, $A5,$20, $AB,$00, $22, $A6,$00, $2B, $00
|
||||||
.byte $22, $A4,$20, $00,$00, $22, $A6,$00, $22, $00,$00
|
.byte $0B, $22, $A3,$00, $22, $00,$00, $22, $AA,$00
|
||||||
.byte $22, $A3,$00, $22, $00,$00, $22, $A0,$13,$00, $22
|
.byte $A5,$02, $22, $A4,$20, $00,$00, $22, $A6,$00, $22
|
||||||
.byte $00,$00, $22, $A6,$00, $22, $00,$00, $22, $A3,$00
|
.byte $00,$00, $22, $A3,$00, $22, $00,$00, $22, $A0,$13,$00
|
||||||
.byte $22, $00,$00, $22, $A0,$13,$00, $22, $00,$00, $22
|
.byte $22, $00,$00, $22, $A6,$00, $22, $00,$00, $22
|
||||||
.byte $A6,$00, $22, $00,$00, $22, $A3,$00, $22, $00,$00
|
.byte $A3,$00, $22, $00,$00, $22, $A0,$13,$00, $22, $00,$00
|
||||||
.byte $02, $A4,$00, $22, $AD,$02, $55, $02, $00,$00
|
.byte $22, $A6,$00, $22, $00,$00, $22, $A3,$00, $22
|
||||||
.byte $02, $55, $A6,$02, $00,$00, $22, $A3,$00, $22
|
.byte $00,$00, $02, $A4,$00, $22, $AD,$02, $55, $02
|
||||||
.byte $A7,$00, $22, $A0,$1B,$00, $22, $A3,$00, $22, $A7,$00
|
.byte $00,$00, $02, $55, $A6,$02, $00,$00, $22, $A3,$00
|
||||||
.byte $22, $00,$00, $A0,$17,$20, $00,$00, $22, $A3,$00, $22
|
.byte $22, $A7,$00, $22, $A0,$1B,$00, $22, $A3,$00, $22
|
||||||
.byte $00,$00, $22, $A4,$00, $22, $00,$00, $22, $A0,$15,$00
|
.byte $A7,$00, $22, $00,$00, $A0,$17,$20, $00,$00, $22, $A3,$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 $22, $00,$00, $22, $A4,$00, $22, $00,$00, $22
|
.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 $A0,$15,$00, $22, $00,$00, $22, $A3,$00, $22, $00,$00
|
||||||
.byte $22, $A4,$00, $22, $00,$00, $A9,$02, $00,$00, $A0,$13,$02
|
.byte $22, $A4,$00, $22, $00,$00, $22, $A0,$15,$00, $22
|
||||||
.byte $00,$00, $22, $A4,$00, $22, $A0,$22,$00, $22, $A4,$00
|
.byte $00,$00, $22, $A3,$00, $22, $00,$00, $22, $A5,$02
|
||||||
.byte $A0,$10,$02, $22, $00,$00, $22, $A0,$10,$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
|
.byte $A1
|
||||||
|
Binary file not shown.
Before Width: | Height: | Size: 6.4 KiB After Width: | Height: | Size: 6.2 KiB |
Reference in New Issue
Block a user