I don't know if its the same as B3d, but in B3d MouseHit is only stored once, so you have to flush it like so:
While not Keyhit(1)
Cursorhit1=MouseHit(1)
If(MouseX()>x)And(MouseX()<(x+width))And(MouseY()>y)And(MouseY()<(y+height))
mover=True
If(CursorHit1)Then
selected=True
EndIf
Else
....
?