fix Laser 128 support

This commit is contained in:
Peter Ferrie 2020-02-05 08:20:54 -08:00
parent 12ed52da67
commit 96c5bd74a8

View File

@ -329,12 +329,15 @@ setspeed_y=*+1
tya tya
bcs setnorm bcs setnorm
ora iobase,x ora iobase,x
ldy #$96
bne setsta ; always branches bne setsta ; always branches
setnorm setnorm
eor #$FF eor #$FF
and iobase,x and iobase,x
ldy #$56
setsta setsta
sta iobase,x sta iobase,x
sty $7FE ; Laser checks it
rts rts
end_setspeed end_setspeed