<?xml version="1.0" encoding="utf-8"?>
<feed xmlns="http://www.w3.org/2005/Atom">
	<title type="html"><![CDATA[Серый форум &mdash; AHK: Скрипт для использования плеера Hokrain с пульта ДУ]]></title>
	<link rel="self" href="https://forum.script-coding.com/extern.php?action=feed&amp;tid=8781&amp;type=atom" />
	<updated>2013-10-18T08:51:43Z</updated>
	<generator>PunBB</generator>
	<id>https://forum.script-coding.com/viewtopic.php?id=8781</id>
		<entry>
			<title type="html"><![CDATA[AHK: Скрипт для использования плеера Hokrain с пульта ДУ]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=76111#p76111" />
			<content type="html"><![CDATA[<p>Превращает Hokrain (<a href="http://hokrain.ru/index_ru.html">http://hokrain.ru/index_ru.html</a>) в лучшую в своем роде примочку для прослушивания музыки с дивана. (Двухпанельный фаровский интерфейс, свободное перемещения по папкам, простое изменение плейлиста по F5/F6)<br />Скрипт обходит отсутствие настройки размера шрифта и растягивает окно на весь экран.<br />Должен запускаться из папки программы.</p><div class="codebox"><pre><code>#NoEnv 
SendMode Input 
SetWorkingDir %A_ScriptDir%
SetTitleMatchMode, RegEx
SetTitleMatchMode, Slow

;-----------------------------------------
z:=22 ; - число шагов увеличения шрифта
;-----------------------------------------

Run Hokrain.exe
WinWaitActive ahk_class Hokrain
WinRestore
WinGetPos,,,,h
    If (h&lt;60)
    {
        Send #{sc29}
        Sleep 200
    }
SysGet M, Monitor
WinMove Hokrain, , 0, 0,% MRight,% MBottom
MouseClick Left, 100, 100
Loop % z*2
{
    Send {Ctrl down}{WheelUp}{Ctrl up}
    Send {Tab}
}
ExitApp</code></pre></div>]]></content>
			<author>
				<name><![CDATA[Krot66]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=30687</uri>
			</author>
			<updated>2013-10-18T08:51:43Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=76111#p76111</id>
		</entry>
</feed>
