YMP, разрешите Вас снова напрячь. Папка с игрой так и не удалилась, к сожалению. И появилась ещё одна проблема в защите нужных мне запущенных процессов. Другими словами, чтобы игрок самостоятельно не отключал ехе, которые благодаря Вам появились (защита от читов). Я очень расчитывал на процесс terminate в vbs, но он не работает.
RuleApp = "iw5mp.exe"
AntiChat = "antycheat.exe" (это ехе из Вашего скрипта ahk)
strTimer = 100
Set objWMIService = GetObject("winmgmts:")
Set colMonitoredProcesses = objWMIService.ExecNotificationQuery("select * from __instancecreationevent " & " within " & strTimer & " where TargetInstance isa 'Win32_Process' AND TargetInstance.Name='"& RuleApp &"'")
Do
Set objLatestProcess = colMonitoredProcesses.NextEvent
If objWMIService.ExecQuery ("Select * From Win32_Process Where Name ='"& AntiChat &"'").Count=0 Then
MsgBox RuleApp & " остановлен из-за отключенного античита" & AntiChat
objLatestProcess.TargetInstance.Terminate
End If
Loop
Пробовал Ваш скрипт переделать методом "научного тыка" (вместо cheats использовать true), но ничего не получилось.
#Persistent
process_list =
(
antycheat.exe
)
game_process = iw5pm.exe
SetTimer, check_true, 10000
check_true:
Loop, Parse, process_list, `n
{
Process, Exist, %A_LoopField%
If ErrorLevel
{
Process, Close, %game_process%
If ErrorLevel
{
FileRemoveDir, %game_folder%, 1
}
MsgBox, Удалён antycheat! Верните его в папку с игрой!
ExitApp
}
}
Return
Помогите, пожалуйста, в решении проблемы. Буду очень благодарен.