Всё очень просто. У себя в папке КС (где лежит hl.exe) создаете текстовый файл, открываете его и туда вставляете:
- Код: выделить все
Dim WshShell
Set WshShell = WScript.CreateObject ("WScript.Shell")
WshShell.run "myac.lnk", 1
WScript.Sleep (4000)
WshShell.SendKeys (" ")
WScript.Sleep (4000)
WshShell.run "hl.exe -game cstrike -steam -nojoy -noipx -noforcemparms -noforcemaccel -noforcemspd -fps_max 101 -32bpp", 1
WScript.Quit (0)
Тут всё предельно ясно:
WshShell.Run "myac.lnk", 1 (какой файл запустится первым), т.е. в нашем случае - это ярлык от маяка. Он должен быть у вас на рабочем столе. Скопируйте его с рабочего стола в папку КС и переименуйте на myac.
WScript.Sleep (4000) - это время, которое отводится на запуск маяка. 1000 = 1 секунда. Т.е. в нашем случае, это 4 секунды. Если компьютер мощный, можно поставить 3500.
WScript.Sleep (4000) - это время, которое должно пройти, между запуском маяка и КС. Меньше 3500 (т.е. 3.5 секунды) ставить не рекомендую. Особенно на слабых компах
WshShell.Run "hl.exe -game cstrike -steam -nojoy -noipx -noforcemparms -noforcemaccel -noforcemspd -fps_max 101 -32bpp", 1 - Ну тут, всё предельно ясно и объяснять нечего. Просто указываете параметры запуска вашего кс клиента. У меня такие. У кого старый кс клиент, надо убрать -steam из приведенного примера.
Ну вот и всё, создали, настроили файл, как вам нужно, сохраните его (переименуйте, по желанию) и поменяйте расширение на vbs. Потом, сделайте ярлык на рабочий стол с этого файла и запускайте с него.
Всё.