getkeystate , как отследить прокрутку ролика мыши?

external(INT, "hook_WH_MOUSE_LL", "hook_WH_MOUSE_LL", pathfolder()+"Hook.dll");
external(INT, "scroll_exist", "scroll_exist", pathfolder()+"Hook.dll");


int wheel_delta=0;
hook_WH_MOUSE_LL(); // вызов функции, которая ждёт скролла мыши


loop()
{
if(scroll_exist(address(#wheel_delta))) // если был сделан скролл, то функция scroll_exist вернёт 1
{
messagebox("Скролл:^r^n"+format(hiword(wheel_delta)));
// если wheel_delta больше 0, то скролл вверх, меньше 0 вниз

// какие-то действия

// снова запускаем проверку
hook_WH_MOUSE_LL();
}
sleep(10);
}

external(INT, "hook_WH_KEYBOARD_LL", "hook_WH_KEYBOARD_LL", pathfolder()+"Hook.dll");
external(INT, "key_exist", "key_exist", pathfolder()+"Hook.dll");


int vk_code=0;
hook_WH_KEYBOARD_LL(); // вызов функции, которая следит за нажатиями клавиш


loop()
{
if(key_exist(address(#vk_code))) // если была нажата клавиша, то функция key_exist вернёт 1
{
textout(0, 200, 500, "Код нажатой клавиши: "+format(vk_code), 1);

if(vk_code == formatci('Z')) // если нажата клавиша Z
{
messagebox("Нажата клавиша Z");
}

// снова запускаем слежение
hook_WH_KEYBOARD_LL();
}
textout(1, 200, 480, "Нажмите любую клавишу", 1);
sleep(10);
}

#define TRUE 1
#define FALSE 0
external(INT, "block_keyboard", "block_keyboard", pathfolder()+"Hook.dll");
external(INT, "block_mouse", "block_mouse", pathfolder()+"Hook.dll");


block_keyboard(TRUE); // заблокировать клавиатуру
block_mouse(TRUE); // заблокировать мышь
pause(5000);
block_keyboard(FALSE); // разблокировать клавиатуру
block_mouse(FALSE); // разблокировать мышь