Если не ошибаюсь в main:
Code
begin
if $full == nil
$showm = Win32API.new 'user32', 'keybd_event', %w(l l l l), ''
$showm.call(18,0,0,0)
$showm.call(13,0,0,0)
$showm.call(13,0,2,0)
$showm.call(18,0,2,0)
$full = 1
end
end
Сам скрипт на моем компе не тестился, по этому не могу знать наверняка.
Источник находки, ГДСА.