mirror of
https://github.com/dschmenk/PLASMA.git
synced 2024-07-19 21:29:56 +00:00
fix addres of int counters
This commit is contained in:
parent
3db676c5dd
commit
78a068e6d2
@ -159,6 +159,7 @@ end
|
|||||||
for rom = $C100 to $C700 step $0100
|
for rom = $C100 to $C700 step $0100
|
||||||
if rom->5 == $38 and rom->7 == $18 and rom->11 == $01 and rom->12 == $20
|
if rom->5 == $38 and rom->7 == $18 and rom->11 == $01 and rom->12 == $20
|
||||||
puts("Found Mouse in slot #"); putc('0' + ((rom >> 8) & $07)); putln
|
puts("Found Mouse in slot #"); putc('0' + ((rom >> 8) & $07)); putln
|
||||||
|
puts("Service IRQ: $"); puth(@serviceMouse); putln
|
||||||
//
|
//
|
||||||
// Hook mouse IRQ handler into ProDOS IRQ chain
|
// Hook mouse IRQ handler into ProDOS IRQ chain
|
||||||
//
|
//
|
||||||
@ -178,8 +179,8 @@ for rom = $C100 to $C700 step $0100
|
|||||||
//
|
//
|
||||||
serviceMouse:2 = rom + rom->$13 // serveMouseFW
|
serviceMouse:2 = rom + rom->$13 // serveMouseFW
|
||||||
serviceMouse:7 = $0778+index
|
serviceMouse:7 = $0778+index
|
||||||
vblEvent.1 = @vblInt
|
vblEvent:1 = @vblInt
|
||||||
mouseEvent.1 = @mouInt
|
mouseEvent:1 = @mouInt
|
||||||
updateMouse.1 = slot
|
updateMouse.1 = slot
|
||||||
updateMouse.3 = page
|
updateMouse.3 = page
|
||||||
updateMouse:5 = rom + rom->$14 // readMouseFW
|
updateMouse:5 = rom + rom->$14 // readMouseFW
|
||||||
|
@ -3,9 +3,9 @@ include "inc/mouse.plh"
|
|||||||
|
|
||||||
var count
|
var count
|
||||||
|
|
||||||
mouse:setmouse(VBL_INT_ENABLE)
|
Mouse:setMouse(VBL_INT_ENABLE)
|
||||||
while count < 100
|
while count < 100 and ^$C000 < 128
|
||||||
count = count + mouse:chkVBL()
|
count = count + Mouse:chkVBL()
|
||||||
puti(count); putln
|
puti(count); putln
|
||||||
loop
|
loop
|
||||||
done
|
done
|
||||||
|
Loading…
Reference in New Issue
Block a user