Что нового

Исходник обхода для одной игры, прошу объяснить что тут к чему и помочь модифиц.

Статус
Закрыто для дальнейших ответов.

System1

Новичок
Сообщения
8
Репутация
0
Здравствуйте! Хотелось бы попросить помощи , суть проблемы такова , есть исходник старый обход XTrap -a, если не сложно хотелось бы чтобы вы посмотрели на данные исходники и подсказали как их модифицировать :-[


Добавлено:
Сообщение автоматически объединено:

1. Bypass.exe
[[hide]]
Код:
[/hide]NoTrayIcon
IF FILEEXISTS(@SCRIPTDIR&"\CF_G4box.exe")THEN
ELSE
IF NOT ISDECLARED("iMsgBoxAnswer")THEN LOCAL $IMSGBOXANSWER
$IMSGBOXANSWER=MSGBOX(16,"ByPass - _Mr.A_","ByPass  runs only in the installed Crossfire folder",3)
SELECT
CASE $IMSGBOXANSWER=-1
CASE ELSE
ENDSELECT
EXIT
ENDIF
IF FILEEXISTS(@SCRIPTDIR&"\HGWC.exe")THEN
ELSE
IF NOT ISDECLARED("iMsgBoxAnswer")THEN LOCAL $IMSGBOXANSWER
$IMSGBOXANSWER=MSGBOX(16,"ByPass - _Mr.A_","ByPass  runs only in the installed Crossfire folder",3)
SELECT
CASE $IMSGBOXANSWER=-1
CASE ELSE
ENDSELECT
EXIT
ENDIF
IF FILEEXISTS(@SCRIPTDIR&"\XPva03.dll")THEN
ELSE
IF NOT ISDECLARED("iMsgBoxAnswer")THEN LOCAL $IMSGBOXANSWER
$IMSGBOXANSWER=MSGBOX(16,"ByPass - _Mr.A_","ByPass  runs only in the installed Crossfire folder",3)
SELECT
CASE $IMSGBOXANSWER=-1
CASE ELSE
ENDSELECT
EXIT
ENDIF
IF FILEEXISTS(@SCRIPTDIR&"\selfupdate_cf.exe")THEN
ELSE
IF NOT ISDECLARED("iMsgBoxAnswer")THEN LOCAL $IMSGBOXANSWER
$IMSGBOXANSWER=MSGBOX(16,"ByPass - _Mr.A_","ByPass  runs only in the installed Crossfire folder",3)
SELECT
CASE $IMSGBOXANSWER=-1
CASE ELSE
ENDSELECT
EXIT
ENDIF
IF FILEEXISTS(@SCRIPTDIR&"\patcher_cf.exe")THEN
ELSE
IF NOT ISDECLARED("iMsgBoxAnswer")THEN LOCAL $IMSGBOXANSWER
$IMSGBOXANSWER=MSGBOX(16,"ByPass - _Mr.A_","ByPass  runs only in the installed Crossfire folder",3)
SELECT
CASE $IMSGBOXANSWER=-1
CASE ELSE
ENDSELECT
EXIT
ENDIF
PROCESSCLOSE("HGWC.exe")
PROCESSCLOSE("Crossfire.exe")
PROCESSCLOSE("XTrap.xt")
FILECOPY("HGWC.exe",@SYSTEMDIR&"\HGWC.bak")
FILEINSTALL("HGWC.exe","HGWC.exe",1)
RUN("patcher_cf.exe")
PROCESSWAIT("Crossfire.exe")
_PROCESSSUSPEND("Crossfire.exe")
_PROCESSSUSPEND("HGWC.exe")
FILEINSTALL("XTrapVa.dll","XTrap\XTrapVa.dll",1)
_PROCESSRESUME("Crossfire.exe")
PROCESSWAIT("XTrap.xt")
_PROCESSSUSPEND("Crossfire.exe")
_PROCESSSUSPEND("Xtrap.xt")
FILEINSTALL("GetTID.exe",@SYSTEMDIR&"\GetTID.exe",1)
FILEINSTALL("HackCf.dll",@SYSTEMDIR&"\\HackCf.dll",1)
RUN(@SYSTEMDIR&"\GetTID.exe")
PROCESSWAITCLOSE("GetTID.exe")
SLEEP(2000)
FILEDELETE(@SYSTEMDIR&"\GetTID.exe")
FILEDELETE(@SYSTEMDIR&"\HackCf.dll")
PROCESSWAITCLOSE("Crossfire.exe")
PROCESSCLOSE("HGWC.exe")
PROCESSCLOSE("Xtrap.xt")
SLEEP(3000)
FILEINSTALL("XTrapVas.dll","XTrap\XTrapVa.dll",1)
FILECOPY(@SYSTEMDIR&"\HGWC.bak",@SCRIPTDIR&"\HGWC.exe")
SLEEP(1000)
FILEDELETE(@SYSTEMDIR&"\HGWC.bak")
EXIT
FUNC _PROCESSSUSPEND($PROCESS)
$PROCESSID=PROCESSEXISTS($PROCESS)
IF $PROCESSID THEN
$AI_HANDLE=DLLCALL("kernel32.dll","int","OpenProcess","int",2035711,"int",FALSE ,"int",$PROCESSID)
$I_SUCESS=DLLCALL("ntdll.dll","int","NtSuspendProcess","int",$AI_HANDLE[0])
DLLCALL("kernel32.dll","ptr","CloseHandle","ptr",$AI_HANDLE)
IF ISARRAY($I_SUCESS)THEN
RETURN 1
ELSE
SETERROR(1)
RETURN 0
ENDIF
ELSE
SETERROR(2)
RETURN 0
ENDIF
ENDFUNC
FUNC _PROCESSRESUME($PROCESS)
$PROCESSID=PROCESSEXISTS($PROCESS)
IF $PROCESSID THEN
$AI_HANDLE=DLLCALL("kernel32.dll","int","OpenProcess","int",2035711,"int",FALSE ,"int",$PROCESSID)
$I_SUCESS=DLLCALL("ntdll.dll","int","NtResumeProcess","int",$AI_HANDLE[0])
DLLCALL("kernel32.dll","ptr","CloseHandle","ptr",$AI_HANDLE)
IF ISARRAY($I_SUCESS)THEN
RETURN 1
ELSE
SETERROR(1)
RETURN 0
ENDIF
ELSE
SETERROR(2)
RETURN 0
ENDIF
ENDFUNC
[/[hide]]Удалено.[[/hide]spoiler]


Добавлено:
Сообщение автоматически объединено:

2ой исходник HGWC.exe увы тут не помещается :wacko: Сейчас выложу ссылка .au3

[[hide]]http://zalil.ru/31189499[/#]Удалено[[/hide]s].


Добавлено:
Сообщение автоматически объединено:

3ий GetTID увы тоже не поместился ...

[[hide]]http://zalil.ru/31189507[/#]Удалено[[/hide]s].
[/hide]
 

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8,671
Репутация
2,481
У нас на форуме не приветствуется подобная деятельность.
К тому же исходник по всей видимости добыт незаконным путём, поэтому код удалён (вместе с ссылками), а тема закрыта, дальшнейшие попытки обсуждения данной темы на форуме будут караться полным баном.
 
Статус
Закрыто для дальнейших ответов.
Верх