main:
LDA $77
AND #%00000001
BEQ .right
AND #%00000010
BEQ .left
AND #%00000100
BEQ .down
AND #%00001000
BEQ .up
RTL
.right
LDA #$2F
STA $7B
RTL
.left
LDA #$D0
STA $7B
RTL
.down
LDA #$D0
STA $7D
RTL
.up
LDA #$2F
STA $7D
RTL

back to listings