maxi10027

Парень, ты уходишь от ответов и бесишь меня. Ответ на глупый вопрос ты уже получил. Тему можно закрывать.

А в СЕ можно сделать так что-бы сай открывался не в браузере, а в самой форме?

В общем как выяснилось, никакого взлома ты не сделал, скрипты нам не предоставил, следовательно нам говорить не о чем, как я и говорил не люблю таких людей, которые любят рассказывать какие они крутые, а на деле полный ноль.

Касательно тему ты получил все интересующие тебя ответы.

Можно ли с помощью AutoPlay Media Studio сделать трейнер? Ответ - нет

Можно ли защитить трейнер CE? Ответ - да, но зачем, если его и так никто ломать не будет?

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

Оказалось это не простой трейнер, все раскидано в разные стороны. Когда все соберу и выложу сюды.

Вот скрипт! создаешь форму свою какую хочешь и подтачиваешь под свой лад!

AboutClick(sender)
end
form_show(UDF1)
dragTimer = nil
function OnTimerDrag()
mx,my = getMousePos()
control_setPosition(UDF1, mx+dx, my+dy)
end
-- By Armando.function CEImage1Click(sender)
if dragTimer == nil then
return
end
if timer_getEnabled(dragTimer) then
timer_setEnabled(dragTimer, false)
object_destroy(dragTimer)
dragTimer = nil
end
end
function CEImage1MouseDown(sender, button, x, y)
if dragTimer == nil then
dragTimer = createTimer(UDF1, false)
timer_setInterval(dragTimer, 10)
timer_onTimer(dragTimer, OnTimerDrag)
mx,my = getMousePos()
x, y = control_getPosition(UDF1)
dx = x - mx
dy = y - my
timer_setEnabled(dragTimer, true)
return
end
if not timer_getEnabled(dragTimer) then
mx,my = getMousePos()
x, y = control_getPosition(UDF1)
dx = x - mx
dy = y - my
timer_setEnabled(dragTimer, true)
end
end
function CEImage2Click(sender)
closeCE()
return caFree
end
--Is running or not --
--function onOpenProcess(processid)
control_setCaption(UDF1_someLabel, 'Max Payne 3 is Running!')
--end
listAAProcess = getAutoAttachList()
strings_add(listAAProcess, 'MaxPayne3.exe')
control_setCaption(UDF1_someLabel, 'Max Payne 3 is Not Found...')
form_show(UDF1)
function CloseClick()
closeCE()
return caFree --onClick doesn't care, but onClose would like a result
end
--
--XMFILE=findTableFile('TRAINERXM')
--xmplayer_playXM(XMFILE)
--
--function onOpenProcess(processid)
-- xmplayer_stop()
--end
--
musicName = 'strange_land.xm'
XMFILE=findTableFile('TRAINERXM')
if (XMFILE==nil) then
print('Er.: File '..musicName..' is not found!')
setProperty(CELabel1, "Caption", "Er.")
else
xmplayer_playXM(XMFILE)
control_setCaption(UDF1_CELabel1, 'Music On')
--setProperty(CEPanel1, "Caption", "Music On")
end
function onOpenProcess(processid)
xmplayer_stop()
control_setCaption(UDF1_CELabel1, 'Music Off')
control_setCaption(UDF1_someLabel, 'Max Payne 3 is Running!')
end
function CELabel1Click(sender)
if xmplayer_isPlaying() then
xmplayer_pause()
control_setCaption(UDF1_CELabel1, 'Music Off')
else
xmplayer_playXM(XMFILE)
control_setCaption(UDF1_CELabel1, 'Music On')
end
end
musicName = 'strange_land.xm'
XMFILE=findTableFile('TRAINERXM')
if (XMFILE==nil) then
print('Er.: File '..musicName..' is not found!')
setProperty(CELabel1, "Caption", "Er.")
else
xmplayer_playXM(XMFILE)
control_setCaption(UDF1_CELabel1, 'Music On')
--setProperty(CEPanel1, "Caption", "Music On")
end
function onOpenProcess(processid)
xmplayer_stop()
control_setCaption(UDF1_CELabel1, 'Music Off')
control_setCaption(UDF1_someLabel, 'Max Payne 3 is Running!')
end
function CELabel1Click(sender)
if xmplayer_isPlaying() then
xmplayer_pause()
control_setCaption(UDF1_CELabel1, 'Music Off')
else
xmplayer_playXM(XMFILE)
control_setCaption(UDF1_CELabel1, 'Music On')
end
end
--TRAINERGENERATORSTART--
--This is autogenerated code
Changing code in this block will
--get erased and rewritten if you regenerate the trainer code
--Uncomment the following line if this is a Cheat Table format trainer and you don't want CE to show (Tip, save as .CETRAINER alternatively)
--hideAllCEWindows()
RequiredCEVersion=6.2
if (getCEVersion==nil) or (getCEVersion()<RequiredCEVersion) then
messageDialog('Please install Cheat Engine '..RequiredCEVersion, mtError, mbOK)
closeCE()
end
strings_add(getAutoAttachList(), "MaxPayne3.exe")
gBeepOnAction=true.form_show(UDF1).function AboutClick()
showMessage(gAboutText)
end
gAboutText=[[Coder---------Armando
Game---------Max Payne 3
Version-------v1.0.0.28 (RELOADED)
Date----------29.06.2012.Chiptune-----by Graff
Contact------Skype Armando
''''""""""""""""""""""""""""""""""""""""""""""""
Information
Numpad 1---------------Infinite Health
Numpad 2---------------Infinite Ammo
Numpad 3---------------No Reload
Numpad 4---------------Infinite Bullet-Time
Numpad 5---------------Infinite Painkillers
Numpad 6---------------One Hit Kill
Numpad 7---------------Disarm Enemies
INSERT ----------------Enable Teleporter
Numpad 8---------------Save Position
Numpad 9---------------Load Position
Numpad 0---------------Undo Position
""""""""""""""""""""""""""""""""""""""""""""""""""""'
© All Rights Reserved (Since 2011)]]
function CloseClick()
closeCE()
return caFree --onClick doesn't care, but onClose would like a result
end
--TREINERGENERATORSTOP--

Спойлер посмотри!

Но я ниразу не видал протекторов для СЕ и вроде его трейнера нельзя запротектерить.

Такчто вот такчто, походу ни кто не поможет с защитой да? Или всетаки кто-то знает как защитить СЕ-й трейнер?

end
form_show(UDF1)
dragTimer = nil
function OnTimerDrag()
mx,my = getMousePos()
control_setPosition(UDF1, mx+dx, my+dy)
end
-- By Armando.function CEImage1Click(sender)
if dragTimer == nil then
return
end
if timer_getEnabled(dragTimer) then
timer_setEnabled(dragTimer, false)
object_destroy(dragTimer)
dragTimer = nil
end
end
function CEImage1MouseDown(sender, button, x, y)
if dragTimer == nil then
dragTimer = createTimer(UDF1, false). timer_setInterval(dragTimer, 10). timer_onTimer(dragTimer, OnTimerDrag).. mx,my = getMousePos(). x, y = control_getPosition(UDF1). dx = x - mx. dy = y - my. timer_setEnabled(dragTimer, true).. return. end.. if not timer_getEnabled(dragTimer) then. mx,my = getMousePos(). x, y = control_getPosition(UDF1). dx = x - mx. dy = y - my. timer_setEnabled(dragTimer, true). end..end..function CEImage2Click(sender).closeCE(). return caFree..end..--Is running or not --.--function onOpenProcess(processid). control_setCaption(UDF1_someLabel, 'Max Payne 3 is Running!').--end..listAAProcess = getAutoAttachList().strings_add(listAAProcess, 'MaxPayne3.exe')..control_setCaption(UDF1_someLabel, 'Max Payne 3 is Not Found...').form_show(UDF1).....function CloseClick(). closeCE(). return caFree --onClick doesn't care, but onClose would like a result.end..--.--XMFILE=findTableFile('TRAINERXM').--xmplayer_playXM(XMFILE).--.--function onOpenProcess(processid)
-- xmplayer_stop()
--end
--
musicName = 'strange_land.xm'
XMFILE=findTableFile('TRAINERXM')
if (XMFILE==nil) then
print('Er.: File '..musicName..' is not found!')
setProperty(CELabel1, "Caption", "Er.")
else
xmplayer_playXM(XMFILE)
control_setCaption(UDF1_CELabel1, 'Music On')
--setProperty(CEPanel1, "Caption", "Music On")
end
function onOpenProcess(processid)
xmplayer_stop()
control_setCaption(UDF1_CELabel1, 'Music Off')
control_setCaption(UDF1_someLabel, 'Max Payne 3 is Running!')
end
function CELabel1Click(sender)
if xmplayer_isPlaying() then
xmplayer_pause()
control_setCaption(UDF1_CELabel1, 'Music Off')
else
xmplayer_playXM(XMFILE)
control_setCaption(UDF1_CELabel1, 'Music On')
end
end
musicName = 'strange_land.xm'
XMFILE=findTableFile('TRAINERXM')
if (XMFILE==nil) then
print('Er.: File '..musicName..' is not found!')
setProperty(CELabel1, "Caption", "Er.")
else
xmplayer_playXM(XMFILE)
control_setCaption(UDF1_CELabel1, 'Music On')
--setProperty(CEPanel1, "Caption", "Music On")
end
function onOpenProcess(processid)
xmplayer_stop()
control_setCaption(UDF1_CELabel1, 'Music Off')
control_setCaption(UDF1_someLabel, 'Max Payne 3 is Running!')
end
function CELabel1Click(sender)
if xmplayer_isPlaying() then
xmplayer_pause()
control_setCaption(UDF1_CELabel1, 'Music Off')
else
xmplayer_playXM(XMFILE)
control_setCaption(UDF1_CELabel1, 'Music On')
end
end
--TRAINERGENERATORSTART--
--This is autogenerated code
Changing code in this block will
--get erased and rewritten if you regenerate the trainer code
--Uncomment the following line if this is a Cheat Table format trainer and you don't want CE to show (Tip, save as .CETRAINER alternatively)
--hideAllCEWindows()
RequiredCEVersion=6.2
if (getCEVersion==nil) or (getCEVersion()<RequiredCEVersion) then
messageDialog('Please install Cheat Engine '..RequiredCEVersion, mtError, mbOK)
closeCE()
end
strings_add(getAutoAttachList(), "MaxPayne3.exe")
gBeepOnAction=true.form_show(UDF1).function AboutClick()
showMessage(gAboutText).end.gAboutText=[[Coder---------Armando
Game---------Max Payne 3
Version-------v1.0.0.28 (RELOADED)
Date----------29.06.2012.Chiptune-----by Graff
Contact------Skype Armando
!ѕ2.¤I..„.Џ.d¦й
''''"""""""""""""""""""""""""""""""""""""""""""". Information
Numpad 1---------------Infinite Health
Numpad 2---------------Infinite Ammo
Numpad 3---------------No Reload
Numpad 4---------------Infinite Bullet-Time
Numpad 5---------------Infinite Painkillers
Numpad 6---------------One Hit Kill
Numpad 7---------------Disarm Enemies
INSERT ----------------Enable Teleporter
Numpad 8---------------Save Position
Numpad 9---------------Load Position
Numpad 0---------------Undo Position
""""""""""""""""""""""""""""""""""""""""""""""""""""'
© All Rights Reserved (Since 2011)]]
function CloseClick()
closeCE()
return caFree --onClick doesn't care, but onClose would like a result
end
--TREINERGENERATORSTOP--

AboutClick(sender)

Ну что чувак? Невозможное возможно? Открой глаза это очень банально)

В личку кинуть или сюда?

Удачи с WritePeocessMemory, сломай для нас трейнер на CE)

А во вторых, да кому это надо ломать трейнеры?

Автор, зачем тебе настолько необходима защита твоих трейнеров и на каком она должна быть уровне?

защита нужна что-бы мои трейнера под другими никами "программингов" не были.

Уровень защиты, хотяб что-бы скрипт не вытаскивали.

Просто не могу писать на чит энжине трейнера т.к. их очень просто взломать, вот и ищу что-то подобное но с большей защитой от взлома.

http://rw4pir.ucoz.com/forum/13-30-1 во

А если нельзя писать трейнера на этой программе, подскажите пожалуйста на какой программе еще можно создавать трейнера на языке Lua

Я видал темку с трейнером для GTA

Здрствуйте! Я боле мене разбираюсь в языке Lua на СЕ и думал что только в чит энжине можно писать трейнера на этом простом языке, но вчера наткнулся на программу AutoPlay Media Studio и оказалось, что язык программирования в этой проге тоже Lua. Только вот он совсем какой-то другой, я подставлял скрипты от СЕ, но они не подходили.

Объясните пожалуйста как например вот этот скрипт переделать что-бы он работал на той проге.

function On()
  results=AOBScan("?? ?? ?? ?? ?? ?? ", "*W*C+X")
  if (results~=nil) then
    count=stringlist_getCount(results)
    if (count>0) then
    for i = 0, (count-1), 1 do
	  pmAddress =stringlist_getString(results,i)
	  writeBytes(pmAddress, 0x??, 0x??, 0x??, 0x??)
	  end
    end
    object_destroy(results)
    results=nil
   end
end

Автор, ты скажи что хочешь, сделать гравитацию на майтанк и зачем тебе exe?

Мне сгенерировать для тебя раз плюнуть.

Вполне возможно, что ты неправильно указываешь имя процесса.

Вот этот код изменять нельзя он обратно перезаписывается т.ь. если сгенерировать трейнер в .exe то получим ошибку. Если переделать в коде .CETRAINER на .exe то он сгенерируется, но работать не будет т.к. после создания трейнера СЕ стирает и перезаписывает код заменяя .exe на .CETRAINER. Возникает вопрос, можно ли как нибудь сделать так, что бы эту часть кода программа не создавала ?

--TRAINERGENERATORSTART--
--Этот код сгенерирован автоматически. Изменение кода в этом блоке
--будет стерто и перезаписано если вы сгенерируете код трейнера заново
--Uncomment the following line if this is a Cheat Table format trainer and you don't want CE to show (Tip, save as .CETRAINER alternatively)
--hideAllCEWindows()
RequiredCEVersion=6.2
if (getCEVersion==nil) or (getCEVersion()<RequiredCEVersion) then
  messageDialog('Please install Cheat Engine '..RequiredCEVersion, mtError, mbOK)
  closeCE()
end
addresslist=getAddressList()
strings_add(getAutoAttachList(), "plugin-container.exe")
gBeepOnAction=false
form_show(CETrainer)
function CloseClick()
  closeCE()
  return caFree --onClick doesn't care, but onClose would like a result
end
--TRAINERGENERATORSTOP--

Дак вот именно то что он генерируется открывается, но не работает, а если сделать в виде .*CETRAINER то все отлично работает.

Дак что вы никак не поможете?

У меня се равно он меняет ЕХЕ на CETRAINER, не помогает этот способ

Трейнес ЕХЕ или CETRAINER скинуть?

Игры нет

Вот

unction CEButton1Click(sender)
------------------------------------
------------------------------------
----Debuging--------------------------
function debugger_onBreakpoint()
if (debugState ~= 3) then
debugState = 2
ONdebugger()
end
return 1
end
--------------------------------
function ONdebugger(pmAddress)
if (debugState == 0) then
debugState = 1
debugProcess()
debug_setBreakpoint(pmAddress)
end
if (debugState == 2) then
debugState = 3
debug_removeBreakpoint(pmAddress)
pause()
unpause()
adresgrav= EDI+0x58
end
end
-----------------------------------
function s2()
writeDouble(adresgrav, 1000)
end
function s3()
writeDouble(adresgrav, -1000)
end
-----------------------------------
-----------------------------------
function Obzor_AOB()
pause()
results=AOBScan("F3 0F 7E 47 58 66 0F 2E C1 76 24 8B 53 5C 8B 43 7C 8B 79 60 8D 4D D8 89 5D D8 89 55 DC 89 45 E0","+X-W-C")
unpause()
if (results~=nil) then
count=stringlist_getCount(results)
if (count==1) then
pmAddress=getAddress(stringlist_getString(results,0))
else
object_destroy(results)
results=nil
end
end
object_destroy(results)
results=nil
debugState = 0
ONdebugger(pmAddress)
end
function myattach(timer)
if getProcessIDFromProcessName("plugin-container.exe") ~= nil then
object_destroy(timer)
openProcess("plugin-container.exe")
count2=0
debugState = 0
Obzor_AOB()
else
showMessage("Процесс не найден!")
closeCE()
end
end
f=createForm(false) --create an invisible window
t=createTimer(F);
timer_setInterval(t,100) --10 might have been too fast for xp...
timer_onTimer(t,myattach)
function checkEnd(timer)
if (isKeyPressed(VK_F1)) then
s2()
end
if (isKeyPressed(VK_F2)) then
s3()
end
end
tEnd=createTimer(nil) --Блок hotkey
timer_setInterval(tEnd, 100)
timer_onTimer(tEnd, checkEnd)
timer_setEnabled(tEnd, true)
showMessage("GHOST активирован")
end
--TRAINERGENERATORSTART--
--Этот код сгенерирован автоматически. Изменение кода в этом блоке
--будет стерто и перезаписано если вы сгенерируете код трейнера заново
--Uncomment the following line if this is a Cheat Table format trainer and you don't want CE to show (Tip, save as .CETRAINER alternatively)
--hideAllCEWindows()
RequiredCEVersion=6.2
if (getCEVersion==nil) or (getCEVersion()<RequiredCEVersion) then
messageDialog('Please install Cheat Engine '..RequiredCEVersion, mtError, mbOK)
closeCE()
end
addresslist=getAddressList()
strings_add(getAutoAttachList(), "plugin-container.exe")
gBeepOnAction=false
form_show(CETrainer)
function CloseClick()
closeCE()
return caFree --onClick doesn't care, but onClose would like a result
end
--TRAINERGENERATORSTOP--

Здраствуйте! Я написал трейнер, но скомпилировать в EXE не могу, в скрипт автоматически пишется что нужно обязательно запустить СЕ 6.2 и он типа .СETRAINER , если изменить на .ЕХЕ то он серавно при создании возвращает обратно. Подскажите пожалуйста в чем может быть проблема и как ее решить?