Создание скрипта на vbs

попросили сделать скрипт на вбс,
чтобы при нажатии на Ctrl и клавишу q было 10 нажатий q в секунду, и при нажатии f12 был выход из скрипта.

сделал

Set s = CreateObject("Wscript.Shell")
do
wscript.sleep 80
s.sendkeys"{q}"
wscript.sleep 80
loop
pause

пока просто нажимает q, как обернуть в условие?