MouseZSpeed()

Параметры

Нет.

Описание

MouseZSpeed возвращает -1 если колёсико мыши крутится к пользователю, 0 если оно не крутится, и 1 если крутится вперёд.

Пример

Graphics 640, 480, 0, 2
SetBuffer BackBuffer ()

Repeat

Cls

Select MouseZSpeed ()
Case -1
result$ = "Назад"
Case 0
; result$ = "Нет движения"
Case 1
result$ = "Вперёд"
End Select

Text 20, 10, "Замечание: MouseZSpeed () = 0 также если колёсика нет!"
Text 20, 40, result$
Flip

Until KeyHit (1)

End

Главная страница

Нажмите сюда, чтобы увидеть последнюю версию этой страницы в Интернете