[madmasles]

rustsss,
1. Порт у Вас всегда 27016?
2. Проверку наличия интернета надо делать?

[rustsss]

madmasles, вообще сервера два у одного порт 27016 у другого 1800, желательно для обоих, проверку можно не делать

[madmasles]

rustsss,
У меня так получилось

порт 27016

Код:

#include <WinAPIEx.au3>
#include <Misc.au3>

Opt("TrayMenuMode", 1)
TraySetState(4)
$port = "27016"
If _Singleton(@ScriptName, 1) = 0 Then
    TrayTip("Подключение порт " & $port, "Уже работаем!", 0, 1)
    Sleep(3000)
    Exit
EndIf

If _WinAPI_IsNetworkAlive() = 0 Then
    TrayTip("Подключение порт " & $port, "Отсутствует подключение к интернету", 0, 1)
    Sleep(3000)
    Exit
EndIf

If Not FileExists(@ScriptDir & "\Launcher_CSS.exe") Then
    TrayTip("Подключение порт " & $port, "В этой папке отсутствует файл Launcher_CSS.exe", 0, 1)
    Sleep(3000)
    Exit
EndIf
TCPStartup()
$IP = TCPNameToIP("316774-local.dyn.ufanet.ru")
RunWait(@ComSpec & " /c start Launcher_CSS.exe -console +connect " & $IP & ":" & $port, "", @SW_HIDE)
$socket = TCPConnect($IP, $port)
If $socket <> -1 Then
    TrayTip("Подключение порт " & $port, "Подключение установлено.", 0, 1)
    Sleep(3000)
    Exit
Else
    TrayTip("Подключение порт " & $port, "Произошла ошибка подключения. Попробуйте еще раз.", 0, 1)
    Sleep(3000)
    Exit
EndIf

порт 1800

Код:

#include <WinAPIEx.au3>
#include <Misc.au3>

Opt("TrayMenuMode", 1)
TraySetState(4)
$port = "1800"
If _Singleton(@ScriptName, 1) = 0 Then
    TrayTip("Подключение порт " & $port, "Уже работаем!", 0, 1)
    Sleep(3000)
    Exit
EndIf

If _WinAPI_IsNetworkAlive() = 0 Then
    TrayTip("Подключение порт " & $port, "Отсутствует подключение к интернету", 0, 1)
    Sleep(3000)
    Exit
EndIf

If Not FileExists(@ScriptDir & "\Launcher_CSS.exe") Then
    TrayTip("Подключение порт " & $port, "В этой папке отсутствует файл Launcher_CSS.exe", 0, 1)
    Sleep(3000)
    Exit
EndIf
TCPStartup()
$IP = TCPNameToIP("316774-local.dyn.ufanet.ru")
RunWait(@ComSpec & " /c start Launcher_CSS.exe -console +connect " & $IP & ":" & $port, "", @SW_HIDE)
$socket = TCPConnect($IP, $port)
If $socket <> -1 Then
    TrayTip("Подключение порт " & $port, "Подключение установлено.", 0, 1)
    Sleep(3000)
    Exit
Else
    TrayTip("Подключение порт " & $port, "Произошла ошибка подключения. Попробуйте еще раз.", 0, 1)
    Sleep(3000)
    Exit
EndIf

В прикрепленном архиве скомпилированные скрипты. Их надо положить в ту папку, в которой лежит Launcher_CSS.exe.

PS
По идее надо как-то проверку соединения организовать, но так как у меня всего этого нет, то не знаю как.

PPS
Может быть проверить вот так?

Код:

$socket = TCPConnect($IP, $port)
If $socket <> -1 Then
    TrayTip("Подключение", "Подключение установлено.", 0, 1)
    Sleep(3000)
    Exit
Else
    TrayTip("Подключение", "Произошла ошибка подключения. Попробуйте еще раз.", 0, 1)
    Sleep(3000)
    Exit
EndIf

[rustsss]

madmasles, Попробовал , сама CS:Source запускается но вот соединения с этим адресом и портом в игре не происходит, все проходит без ошибок. Спасибо что пытаетесь помочь!
А нельзя сделать по такой схеме 1) сначала узнается Ip 2) к нему прибавляется порт-получается готовая строка для консоли connect ip:port все это копируется в буфер 3) запускается CS с консолью и в эту консоль вставляется connect ip:port и эмулируется нажатие клавиши Энтер. Вот как то так или это из области научной фантастики?

[madmasles]

rustsss,
То есть Вам надо, чтобы в командной строке было выполнено следующее:

Код:

start Launcher_CSS.exe connect ip:port

Я правильно понял?

И еще, для того, чтобы сделать проверку соединения, прикрепите, пожалуйста, скриншот окна ком.строки.

[rustsss]

madmasles,
Даже не знаю как объяснить, скажем если создать такой батник:

Код:

set commandline=-console +connect 172.27.21.85:1800 
set execute=Launcher_CSS.exe 
start %execute% %commandline%

то запустится CS с консолью и сразу же пойдет подключение к этому ip но поскольку ip динамический, а наш провайдер раз в сутки делает дисконнект то ip меняется, поэтому и нужно брать ip с DNS вставлять его между connect и:1800 и запускать игру с авто подключением.

а что именно должно быть отображено на скриншоте?

[madmasles]

rustsss,
То есть должно быть так?

Код:

start Launcher_CSS.exe -console +connect 172.27.21.85:1800

Или нет? Вы сделайте батник, который точно подключает. Последней строкой напишите pause? запустите его и, не нажимая любую кнопку, сделайте скриншот окна.

[rustsss]

madmasles, Да должно быть так тока ip из должен браться от 316774-local.dyn.ufanet.ru

скриншот батника

если его запустить то CS запускается и происходит подключение к серверу по данному ip

[madmasles]

rustsss,
Я в 4-ом посте код и вложения поменял. Попробуйте. А скриншот мне был нужен, так как я думал, что в консоли какой-то ответ будет, а его нет.