; @com.wudsn.ide.asm.mainsourcefile=PACMAN.ASM

OLDDIR =$59

 CMP OLDDIR
 BEQ PMSAME
 STA OLDDIR
 CMP PMODIR
 BEQ PMSAME
 LDA PMODIR
 CMP #$04
 BPL L5988

L5979 LDA OLDDIR
 AND #$03
 BEQ L5988
 EOR PMODIR
 BEQ L5988
 EOR PMODIR
 JMP L5994

L5988 LDA OLDDIR
 AND #$0C
 BEQ L5979
 EOR PMODIR
 BEQ L5979
 EOR PMODIR
L5994 STA ATRACT
