on knob Example10 ON KNOB 1 GOSUB Here
20 CLEAR SCREEN
30 FOR Loop=1 TO 10
40 WAIT 1 !Move the mouse when the program is run.
50 NEXT Loop
60 STOP
70 Here: PRINT KNOBX,KNOBY !Indicates the amount the mouse moved in the x-y plane.
80 RETURN
90 END
|