dos33fsprogs/ootw/physicist.s

35 lines
444 B
ArmAsm
Raw Normal View History

2019-01-17 21:58:19 +00:00
;======================================
; draw physicist
;======================================
draw_physicist:
lda GAIT
and #$f
sta GAIT
tax
lda phys_walk_progression,X
sta INL
lda phys_walk_progression+1,X
sta INH
lda PHYSICIST_X
sta XPOS
2019-01-18 05:18:06 +00:00
2019-01-17 21:58:19 +00:00
lda PHYSICIST_Y
2019-01-18 05:18:06 +00:00
sec
sbc EARTH_OFFSET ; adjust for earthquakes
2019-01-17 21:58:19 +00:00
sta YPOS
lda DIRECTION
bne facing_right
facing_left:
jmp put_sprite
facing_right:
jmp put_sprite_flipped