Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- MoveObject
- right
- lda controller
- and #%00000001
- beq notRight
- lda object_dx + 1
- bmi notRight
- lda object_dx
- clc
- adc object_acc
- sta object_dx
- lda object_dx + 1
- adc #0
- sta object_dx + 1
- CLAMP_S16 object_dx, object_dx_min, object_dx_max
- jmp dxTox
- notRight
- lda object_dx + 1
- beq + ; MSB of object_dx is 0, check if LSB needs to be decreased
- lda object_dx
- sec
- sbc object_dec
- sta object_dx
- lda object_dx + 1
- sbc #0
- sta object_dx + 1
- jmp dxTox
- +
- lda object_dx
- beq left
- sec
- sbc object_dec
- bcs +
- lda #0
- +
- sta object_dx
- jmp dxTox
- left
- lda controller
- and #%00000010
- beq notLeft
- lda object_dx + 1
- beq +
- bpl notLeft
- +
- lda object_dx
- sec
- sbc object_acc
- sta object_dx
- lda object_dx + 1
- sbc #0
- sta object_dx + 1
- CLAMP_S16 object_dx, object_dx_min, object_dx_max
- jmp dxTox
- notLeft
- lda object_dx + 1
- beq +
- lda object_dx
- clc
- adc object_dec
- sta object_dx
- lda object_dx + 1
- adc #0
- sta object_dx + 1
- jmp dxTox
- +
- lda object_dx
- beq dxTox
- clc
- adc object_dec
- bcc +
- lda #0
- +
- sta object_dx
- dxTox
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement