mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-06-16 07:29:29 +00:00
62 lines
829 B
ArmAsm
62 lines
829 B
ArmAsm
|
|
||
|
|
;============================
|
||
|
|
; draw peasant
|
||
|
|
;============================
|
||
|
|
draw_peasant:
|
||
|
|
lda PEASANT_X
|
||
|
|
sta CURSOR_X
|
||
|
|
lda PEASANT_Y
|
||
|
|
sta CURSOR_Y
|
||
|
|
|
||
|
|
lda PEASANT_DIR
|
||
|
|
cmp #PEASANT_DIR_RIGHT
|
||
|
|
beq peasant_right
|
||
|
|
|
||
|
|
;=====================
|
||
|
|
; up up up up
|
||
|
|
peasant_up:
|
||
|
|
|
||
|
|
lda FRAME
|
||
|
|
and #1
|
||
|
|
beq peasant_up1
|
||
|
|
|
||
|
|
|
||
|
|
peasant_up2:
|
||
|
|
lda #<peasant_up2_sprite
|
||
|
|
sta INL
|
||
|
|
lda #>peasant_up2_sprite
|
||
|
|
jmp done_pick_draw
|
||
|
|
|
||
|
|
peasant_up1:
|
||
|
|
lda #<peasant_up1_sprite
|
||
|
|
sta INL
|
||
|
|
lda #>peasant_up1_sprite
|
||
|
|
jmp done_pick_draw
|
||
|
|
|
||
|
|
|
||
|
|
peasant_right:
|
||
|
|
lda CURSOR_X
|
||
|
|
and #1
|
||
|
|
bne draw_right1
|
||
|
|
|
||
|
|
draw_right2:
|
||
|
|
lda #<peasant_right2_sprite
|
||
|
|
sta INL
|
||
|
|
lda #>peasant_right2_sprite
|
||
|
|
jmp done_pick_draw
|
||
|
|
|
||
|
|
draw_right1:
|
||
|
|
lda #<peasant_right1_sprite
|
||
|
|
sta INL
|
||
|
|
lda #>peasant_right1_sprite
|
||
|
|
|
||
|
|
done_pick_draw:
|
||
|
|
sta INH
|
||
|
|
|
||
|
|
jsr hgr_draw_sprite_7x30
|
||
|
|
|
||
|
|
rts
|
||
|
|
|
||
|
|
|
||
|
|
.include "sprites/peasant_sprite.inc"
|