Bug #637
openAmiga coordinates reading Y Mouse using Print ym
0%
Description
Currently, there seams to be a change which has effected the display output of reading the mouse using
Print ym in Amiga mode. PC mode seams to work ok using same routine. Default Amiga/AOZ.
In Amiga mode regardless of #useHardwareCoordinates:False or #useHardwareCoordinates:True or
//#useHardwareCoordinates tag not in use at all, it only happily displays Print xm at 120 on the
left edge. The ym or Print ym displays always 400 start top, it should if working correctly
as with the PC mode display 40 top edge without the #useHardwareCoordinates tag to be logical.
Without this, in Amiga mode currently, the vertical start jumps from 400-999 10 pixels at a time then
starts or gets to at showing under that or the 999th pixel, a 100 pixel position vertically from there
changing to at 1 pixel at a time which it should then to the end of the canvas. Not workable.
But again it should be 40 at the top always for Amiga people.
Note: You can get around this by using, Print Using "####";ym but there must be something
different or not right default in the Amiga mode if in the PC mode the same code works as it should X or Y
or displays properly 120 X and 40 Y start using just Print y Mouse or Print x Mouse in conjunction with
#useHardwareCoordinates:False. Ok If the Amiga mode is not using the #useHardwareCoordinates its not working
as then it should be 40 default vert top. Something is amiss.
Note: I also think that the #useHardwareCoordinates:False tag should work or be active in Amiga mode
so people know what's going on either way if not.
1) //(aoz)
#manifest:"pc"
#speed:"fair"
#tvStandard:"pal"
#useHardwareCoordinates:False
do
screen 0
xm=X Mouse
ym=Y Mouse
//screen 1
locate 2,2:Print xm
locate 2,3:Print ym
loop
do
screen 0
xm=X Mouse
ym=Y Mouse
//screen 1
locate 2,2:Print xm
locate 2,3:Print ym
loop
//-----------------*
2) (Amiga)
#manifest:"amiga"
#speed:"fair"
#tvStandard:"pal"
//#useHardwareCoordinates:False
do
screen 0
xm=X Mouse
ym=Y Mouse
//screen 1
locate 2,2:Print xm
locate 2,3:Print ym
loop