DECLARE FUNCTION MouseReady% () DECLARE SUB MouseBorder (row1%, col1%, row2%, col2%) DECLARE SUB MouseDriver (M0%, M1%, M3%, M4%) DECLARE SUB MouseLocate (row%, col%) DECLARE SUB MouseMode (Func%) DECLARE SUB MouseHide () DECLARE SUB MouseInit () DECLARE SUB MousePoll (row%, col%, lbutton%, rbutton%) DECLARE SUB MousePush (button%, row%, col%, lbutton%, rbutton%) DECLARE SUB MouseRelease (button%, row%, col%, lbutton%, rbutton%) DECLARE SUB MouseShow () DECLARE SUB SetMouseEvent (Mode%)