[TC] ошибка скриптов регулировки громкости
Здравствуйте, Дискуссионный.
Решил выдернуть скрипты из jaws 17, на регулировку горячими клавишами
системной громкости, но в jaws 18 они не приживаются, точнее ползунок
в обе стороны двигают, но с компеляцией проблема, текст ошибки и сами
скрипты ниже:
Error: Ignoring previous definition of
DecreaseSystemVolume()
Script DecreaseSystemVolume()
var
int volume = GetSystemVolume()
if volume <= 0x0800
SetSystemVolume(0)
else
ChangeSystemVolume(V_DOWN,0x0800)
endIf
volume = GetSystemVolume()
if volume
Say(FormatString(cmsgPercentage,IntToString((volume*100)/0xffff)),ot_status)
endIf
EndScript
Script IncreaseSystemVolume()
var
int volume = GetSystemVolume()
if volume >= 0xf800
SetSystemVolume(0xffff)
else
ChangeSystemVolume(V_UP,0x0800)
endIf
volume = GetSystemVolume()
Say(FormatString(cmsgPercentage,IntToString((volume*100)/0xffff)),ot_status)
EndScript
