niceice пишет:Скомпилировать .bat в .exe. да и кто будет знать или пробывать открыть системные папки? Может у вас будут други варинты?
Я бы попробовал. Откуда вообще в папке с игрой скрытая системная папка? Ясно же, что дело нечисто!
Вариантов пока нет, я никогда таким не озадачивался.
niceice, геймеры - они такие. В первую очередь придут сюда и найдут эту тему. Если будет лень искать - создадут новую тему с вопросом "как обойти защиту". 
k.ahk
GameName := "1.txt - Notepad"
GamePath := "C:\Users\Malcev\Desktop\1.txt"
script1Name := "C:\Users\Malcev\Desktop\k.ahk - AutoHotkey v1.1.15.04"
script1Path := "C:\Users\Malcev\Desktop\k.ahk"
script2Name := "C:\Users\Malcev\Desktop\k1.ahk - AutoHotkey v1.1.15.04"
script2Path := "C:\Users\Malcev\Desktop\k1.ahk"
bat1Path := "C:\Users\Malcev\Desktop\run1.bat"
StatisticExt := "lic"
StatisticFolderPath := "C:\Test"
iniPath := "C:\test\exe\exe\1.exe"
#SingleInstance force
DetectHiddenWindows, on
SetTimer, Check, 50
File1 := FileOpen(script1Path, "r -w -d")
File2 := FileOpen(script2Path, "r -w -d")
IfNotExist, %iniPath%
{
WinWait, %GameName%
loop
{
WinClose, %GameName%
WinWaitClose, %GameName%
FileSetAttrib, -R, %StatisticFolderPath%\*.%StatisticExt%
FileDelete, %StatisticFolderPath%\*.%StatisticExt%
Run, %GamePath%
loop
{
loop, %StatisticFolderPath%\*.%StatisticExt%
{
if (A_Index = 1) and WinActive(GameName)
{
StatPath := A_LoopFileFullPath
break 3
}
if (A_Index = 1) and !WinActive(GameName)
continue 3
}
}
}
IniWrite, %StatPath%, %iniPath%, Game, StatPath
}
IniRead, StatPath, %iniPath%, Game, StatPath
File3 := FileOpen(iniPath, "r -w -d")
loop
{
WinWaitClose, %GameName%
File4 := FileOpen(StatPath, "r -w -d")
WinWait, %GameName%
File4.Close()
}
Check:
IfWinNotExist, %script2Name%
{
FileDelete, %bat1Path%
FileAppend, start %script2Path%, %bat1Path%
Run, %bat1Path%
WinWait, %script2Name%
FileDelete, %bat1Path%
}
returnk1.ahk
script1Name := "C:\Users\Malcev\Desktop\k.ahk - AutoHotkey v1.1.15.04"
script1Path := "C:\Users\Malcev\Desktop\k.ahk"
bat2Path := "C:\Users\Malcev\Desktop\run2.bat"
#Persistent
#SingleInstance force
DetectHiddenWindows, on
SetTimer, Check, 50
return
Check:
IfWinNotExist, %script1Name%
{
FileDelete, %bat2Path%
FileAppend, start %script1Path%, %bat2Path%
Run, %bat2Path%
WinWait, %script1Name%
FileDelete, %bat2Path%
}
returnC:\Call of Duty Modern Warfare 3\dw
Образец файла статистики iw5_m2d02ef8d_1100001b75cf1e8.stat
Данные из корневой папки игры, где хранится ini файл
C:\Call of Duty Modern Warfare 3
Файл называется teknogods.ini
В нём хранится только часть файла статистики (последние 8 цифр и букв, то есть b75cf1e8, или если более точно, то строка в этом файле выглядит так ID=b75cf1e8).
]]>Есть главная проблемища - при первом пуске игра создаёт файл статистики генератором файлов и у каждого он разный, потому что два игрока не могут быть на сервере с одинаковым файлом статистики. Поэтому их файлы статистики я не могу знать до раздачи игры.
А разве эти файлы на сервере находятся?
]]>File := FileOpen("c:\1.txt", "r -r -w -d")
sleep 10000
File.Close()Шифровать файл ИМХО неверный путь.
Так как при внезапной перезагрузке компьютера вся статистика пропадет.
Лучше создавать 2 процесса следящих друг за другом, которые будут запрещать доступ к файлу статистики при неактивном окне игры и запускать их вместе с загрузкой системы.
Например так:
k.ahk
DetectHiddenWindows, on
File := FileOpen("c:\1.txt", "r -r -w -d")
File1 := FileOpen("C:\Users\Malcev\Desktop\k.ahk", "r -w -d")
File2 := FileOpen("C:\Users\Malcev\Desktop\k1.ahk", "r -w -d")
loop
{
WinWaitClose, C:\Users\Malcev\Desktop\k1.ahk - AutoHotkey v1.1.15.04
Run, C:\Users\Malcev\Desktop\k1.ahk
sleep, 100
}k1.ahk
DetectHiddenWindows, on
loop
{
WinWaitClose, C:\Users\Malcev\Desktop\k.ahk - AutoHotkey v1.1.15.04
Run, C:\Users\Malcev\Desktop\k.ahk
sleep, 100
}