mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-09-26 20:54:37 +00:00
tfv: flight turning
This commit is contained in:
parent
6f1ece4a0e
commit
e907b00c6e
@ -130,7 +130,19 @@ check_left:
|
|||||||
; LEFT PRESSED
|
; LEFT PRESSED
|
||||||
;=============
|
;=============
|
||||||
|
|
||||||
inc TURNING
|
lda TURNING
|
||||||
|
bmi turn_left
|
||||||
|
beq turn_left
|
||||||
|
|
||||||
|
lda #$0
|
||||||
|
sta TURNING
|
||||||
|
clv
|
||||||
|
bvc check_right
|
||||||
|
|
||||||
|
turn_left:
|
||||||
|
lda #253 ; -3
|
||||||
|
sta TURNING
|
||||||
|
|
||||||
dec ANGLE
|
dec ANGLE
|
||||||
|
|
||||||
check_right:
|
check_right:
|
||||||
@ -141,7 +153,17 @@ check_right:
|
|||||||
; RIGHT PRESSED
|
; RIGHT PRESSED
|
||||||
;==============
|
;==============
|
||||||
|
|
||||||
dec TURNING
|
lda TURNING ;; FIXME: optimize me
|
||||||
|
bpl turn_right
|
||||||
|
lda #0
|
||||||
|
sta TURNING
|
||||||
|
clv
|
||||||
|
bvc check_speedup
|
||||||
|
|
||||||
|
turn_right:
|
||||||
|
lda #3
|
||||||
|
sta TURNING
|
||||||
|
|
||||||
inc ANGLE
|
inc ANGLE
|
||||||
|
|
||||||
check_speedup:
|
check_speedup:
|
||||||
@ -270,10 +292,24 @@ draw_background:
|
|||||||
|
|
||||||
clv
|
clv
|
||||||
lda TURNING
|
lda TURNING
|
||||||
bmi draw_ship_right
|
beq draw_ship_forward
|
||||||
bne draw_ship_left
|
bpl draw_ship_right
|
||||||
|
bmi draw_ship_left ;; FIXME: optimize order
|
||||||
|
|
||||||
draw_ship_forward:
|
draw_ship_forward:
|
||||||
|
; Draw Shadow
|
||||||
|
lda #>shadow_forward
|
||||||
|
sta INH
|
||||||
|
lda #<shadow_forward
|
||||||
|
sta INL
|
||||||
|
lda #(SHIPX+3)
|
||||||
|
sta XPOS
|
||||||
|
clc
|
||||||
|
lda SPACEZ_I
|
||||||
|
adc #31
|
||||||
|
sta YPOS
|
||||||
|
jsr put_sprite
|
||||||
|
|
||||||
lda #>ship_forward
|
lda #>ship_forward
|
||||||
sta INH
|
sta INH
|
||||||
lda #<ship_forward
|
lda #<ship_forward
|
||||||
@ -281,6 +317,22 @@ draw_ship_forward:
|
|||||||
bvc draw_ship
|
bvc draw_ship
|
||||||
|
|
||||||
draw_ship_right:
|
draw_ship_right:
|
||||||
|
|
||||||
|
dec TURNING
|
||||||
|
|
||||||
|
; Draw Shadow
|
||||||
|
lda #>shadow_right
|
||||||
|
sta INH
|
||||||
|
lda #<shadow_right
|
||||||
|
sta INL
|
||||||
|
lda #(SHIPX+3)
|
||||||
|
sta XPOS
|
||||||
|
clc
|
||||||
|
lda SPACEZ_I
|
||||||
|
adc #31
|
||||||
|
sta YPOS
|
||||||
|
jsr put_sprite
|
||||||
|
|
||||||
lda #>ship_right
|
lda #>ship_right
|
||||||
sta INH
|
sta INH
|
||||||
lda #<ship_right
|
lda #<ship_right
|
||||||
@ -288,6 +340,22 @@ draw_ship_right:
|
|||||||
bvc draw_ship
|
bvc draw_ship
|
||||||
|
|
||||||
draw_ship_left:
|
draw_ship_left:
|
||||||
|
|
||||||
|
inc TURNING
|
||||||
|
|
||||||
|
; Draw Shadow
|
||||||
|
lda #>shadow_left
|
||||||
|
sta INH
|
||||||
|
lda #<shadow_left
|
||||||
|
sta INL
|
||||||
|
lda #(SHIPX+3)
|
||||||
|
sta XPOS
|
||||||
|
clc
|
||||||
|
lda SPACEZ_I
|
||||||
|
adc #31
|
||||||
|
sta YPOS
|
||||||
|
jsr put_sprite
|
||||||
|
|
||||||
lda #>ship_left
|
lda #>ship_left
|
||||||
sta INH
|
sta INH
|
||||||
lda #<ship_left
|
lda #<ship_left
|
||||||
|
Loading…
Reference in New Issue
Block a user