Computer Science Canada

ButtonChoose

Author:  Tank [ Thu Mar 20, 2003 7:25 pm ]
Post subject:  ButtonChoose

I cant get the buttonchoose function to work properly.
I have used the example codes once and i still dont understand...

I was wondering if anyone could help me by responding with a messege that could help me in anyway.

thx

Author:  Asok [ Thu Mar 20, 2003 9:05 pm ]
Post subject: 

giving us the code for the function will help. Rolling Eyes

Author:  Delta [ Thu Mar 20, 2003 10:52 pm ]
Post subject:  Hmmmmmm....

Here maybe this piece of code I just wrote will help you. Smile

code:

% Allows use of Left, Middle, & Right Mouse Buttons
Mouse.ButtonChoose ("multibutton")

var mouseX, mouseY, mouseClick : int

loop
    Mouse.Where (mouseX, mouseY, mouseClick)
    if mouseClick = 1 then % Left Click
        drawfilloval (mouseX, mouseY, 10, 10, 2)
    elsif mouseClick = 10 then % Middle Click
        drawbox (mouseX - 5, mouseY - 5, mouseX + 5, mouseY + 5, 12)
    elsif mouseClick = 100 then % Right Click
        drawfillstar (mouseX - 5, mouseY - 5, mouseX + 5, mouseY + 5, 14)
    end if
end loop


Mod Edit: Delta has been awarded 7 bits. -Asok


: