Üye
Can anyone make or share a cheat engine scripts for pubgm 1.9 gameloop.
Features
No recoil
Small Crosshair
and Instant hit
Or update OLD SCRIPTS
<?xml version="1.0" encoding="utf-8"?>
<CheatTable CheatEngineTableVersion="38">
<CheatEntries/>
<UserdefinedSymbols/>
<LuaScript>--/\/\/\/\/\--Features--/\/\/\/\/\--
--Author 0xPrince
------PUBGM V1.8------
--IPAD VIEW
--NO RECOIL
--INSTANT HIT
--SMALL CROSSHAIR
--NO HEADSHOTS
--/\/\/\/\/\--Features--/\/\/\/\/\--
dbk_initialize()
dbk_useKernelmodeOpenProcess()
dbk_useKernelmodeProcessMemoryAccess()
if getOpenedProcessID() then openProcess(getOpenedProcessID()) end
dbk_writesIgnoreWriteProtection(true)
local isEmuVbox = false
local startRange = 0
local endRange = 0x7ffffffff
-----------/\/\/\/\/\/\/\/\/\/-----------
-----------------Helper------------------
-----------/\/\/\/\/\/\/\/\/\/-----------
--Stop Copy and paste
function UpdateStatus(Upstatus,bLog,bSpeak)
StatusText.Caption = "Status: "..Upstatus
if (bSpeak==true) then
speak(Upstatus)
end
if (bLog == true) then
print("Log: "..Upstatus)
end
end
--------------------------------------------
function ClearOutput()
GetLuaEngine().MenuItem5.doClick()
end
--------------------------------------------
function StrToByte(strbytes)
local retbyte = {}
for hex in string.gmatch(strbytes, "%S+") do
local size = #retbyte + 1
retbyte[size] = tonumber(hex, 16)
end
return retbyte
end
--------------------------------------------
function AOBScanAA(script, symbol)
local success,disableInfo = autoAssemble(script)
if not success then return nil, disableInfo end
local addr = getAddress(symbol)
autoAssemble(script, disableInfo)
return addr
end
function AOBScanRegion(start, stop,bytestr)
local script = ([[
[ENABLE]
aobscanregion(luaAOBScanRegionSymbol,%X,%X,%s)
registersymbol(luaAOBScanRegionSymbol)
[DISABLE]
unregistersymbol(luaAOBScanRegionSymbol)
]]):format(getAddress(start), getAddress(stop), bytestr)
return AOBScanAA(script, 'luaAOBScanRegionSymbol')
end
function RepAob(search, replace)
local aob = AOBScan(search)
if aob then
for i=0,aob.Count-1 do
autoAssemble(aob..':\ndb '..replace)
end
aob.Destroy()
return true
else
return false
end
end
--------------------------------------------
LIBUE4Header = nil
function GetUeBaseAddr()
if(isEmuVbox ==true)then
return 1
end
if (LIBUE4Header == nil) then
UpdateStatus("Initializing",false,false)
LIBUE4Header = AOBScanRegion(startRange, endRange,"7F 45 4C 46 01 01 01 00 00 00 00 00 00 00 00 00 03 00 28 00 01 00 00 00 00 00 00 00 34 00 00 00 24 16 5A")
end
if (LIBUE4Header == nil) then
messageDialog("LibUE Base not found!", mtError, mbOK)
os.exit()
closeCE()
else
return LIBUE4Header
end
end
--------------------------------------------
function MemoryManager(Offset,FeatureName,OrgBytes, RepBytes,bEnable)
local Uebaseaddr =GetUeBaseAddr()
if bEnable == true then
UpdateStatus("Activating "..FeatureName)
if(isEmuVbox == true) then
if(RepAob(OrgBytes,RepBytes) ==false) then
UpdateStatus(FeatureName.." Pattern Not Found")
return
end
else
writeBytes(Uebaseaddr+Offset, StrToByte(RepBytes))
end
UpdateStatus(FeatureName .." Activated")
else
UpdateStatus("Deactivating "..FeatureName)
if(isEmuVbox == true) then
stat = RepAob(RepBytes,OrgBytes)
else
writeBytes(Uebaseaddr+Offset, StrToByte(OrgBytes))
end
UpdateStatus(FeatureName .." Deactivated")
end
end
function StartProcess(sender)
local ProcName = getRef(sender.Tag).EmuProcName
isEmuVbox = getRef(sender.Tag).Vbox
startRange =getRef(sender.Tag).StartRange
endRange =getRef(sender.Tag).EndRange
local p = io.popen('tasklist /fi "IMAGENAME eq '..ProcName..'.exe" /fi "MEMUSAGE gt 200000" /nh', 'r');
local procInfo = p:read('*a');
p:close();
local pid = procInfo:match('%d+');
pid = tonumber(pid);
if(pid == nil)then
messageDialog("Game Must Be Running!!", mtError, mbOK)
else
openProcess(pid)
EmuSelection.hide()
ShowMainForm()
EmuSelection.close()
end
end
-----------/\/\/\/\/\/\/\/\/\/-----------
-----------------Helper------------------
-----------/\/\/\/\/\/\/\/\/\/-----------
-----------/\/\/\/\/\/\/\/\/\/-----------
--------------Main Function--------------
-----------/\/\/\/\/\/\/\/\/\/-----------
function ecnirp(sender)
ClearOutput()
local BEnable = getRef(sender.Tag).Param
--Stop Copy and paste
-----IPad View--------
if checkbox_getState(IpadChk)== 1 then
MemoryManager(0x3C24C14,"IPad View",'00 00 B4 43 3C 1E 8F 03 30 BE 71 03 30 48','00 00 82 43 3C 1E 8F 03 30 BE 71 03 30 48',BEnable)
end
-----No Recoil--------
if checkbox_getState(NoRecChk)== 1 then
MemoryManager(0x13B34DC,"No Recoil",'70 4C 2D E9 10 B0 8D E2 20 D0 4D E2 00 40 A0 E1 01 50 A0 E3','00 00 A0 E3 1E FF 2F E1 20 D0 4D E2 00 40 A0 E1 01 50 A0 E3',BEnable)
end
-----Instant Hit--------
if checkbox_getState(InshtChk)== 1 then
MemoryManager(0x3CBD1F0,"Instant Hit",'4E 8A 38 EE E0 00 DD E5 01 00 10 E3 23 00 00','00 00 00 00 E0 00 DD E5 01 00 10 E3 23 00 00',BEnable)
end
-----Small Crosshair--------
if checkbox_getState(SMLCrosChk)== 1 then
MemoryManager(0x1DF2868,"Small Crosshair",'00 0A 90 1D 10 0A 10 EE 1E FF 2F E1 40 1B 90 E5 00 00 A0 E3','01 00 00 00 10 0A 10 EE 1E FF 2F E1 40 1B 90 E5 00 00 A0 E3',BEnable)
end
-----No Headshot--------
if checkbox_getState(NoHsChk)== 1 then
MemoryManager(0x405F920,"No Headshot",'CD CC CC 3D 00 00 00 00 E8 D9 78 03 DC D9 78 03 D0 D9 78 03','00 00 20 42 00 00 00 00 E8 D9 78 03 DC D9 78 03 D0 D9 78 03',BEnable)
end
return true
end
-----------/\/\/\/\/\/\/\/\/\/-----------
--------------Main Function--------------
-----------/\/\/\/\/\/\/\/\/\/-----------
--------------/\/\/\/\/\/\/\/\/\/-------------
---------Emulator Selection Controls----------
--------------/\/\/\/\/\/\/\/\/\/-------------
EmuSelection = createForm(true)
EmuSelection.Caption = 'PUBGM HACK SCRIPT 1.8'
EmuSelection.Width = 360
EmuSelection.Height = 200
GameloopSel = createButton(EmuSelection)
GameloopParamData={}
GameloopParamData.EmuProcName = "aow_exe"
GameloopParamData.Vbox = false
GameloopParamData.StartRange = 0x26000000
GameloopParamData.EndRange = 0x60000000
GameloopSel.Tag=createRef(GameloopParamData)
GameloopSel.Left = 12
GameloopSel.Top = 17
GameloopSel.Width = 331
GameloopSel.Height = 33
GameloopSel.onClick = StartProcess
GameloopSel.Caption = 'Gameloop'
SmartGaGaSel = createButton(EmuSelection)
SmartGaGaParamData={}
SmartGaGaParamData.EmuProcName = "AndroidProcess"
SmartGaGaParamData.Vbox = false
SmartGaGaParamData.StartRange = 0x70000000
SmartGaGaParamData.EndRange = 0x90000000
SmartGaGaSel.Tag=createRef(SmartGaGaParamData)
SmartGaGaSel.Left = 12
SmartGaGaSel.Top = 61
SmartGaGaSel.Width = 331
SmartGaGaSel.Height = 33
SmartGaGaSel.onClick = StartProcess
SmartGaGaSel.Caption = 'SmartGaGa'
LdPlayerSel = createButton(EmuSelection)
LdPlayerParamData={}
LdPlayerParamData.EmuProcName = "LdVBoxHeadless"
LdPlayerParamData.Vbox = true
LdPlayerParamData.StartRange = 0x0
LdPlayerParamData.EndRange = 0x7ffffffff
LdPlayerSel.Tag=createRef(LdPlayerParamData)
LdPlayerSel .Left = 12
LdPlayerSel .Top = 105
LdPlayerSel .Width = 331
LdPlayerSel .Height = 33
LdPlayerSel .onClick = StartProcess
LdPlayerSel .Caption = 'Ld Player'
MemuSel = createButton(EmuSelection)
MemuParamData={}
MemuParamData.EmuProcName = "MEmuHeadless"
MemuParamData.Vbox = true
MemuParamData.StartRange = 0x0
MemuParamData.EndRange = 0x7ffffffff
MemuSel.Tag=createRef(LdPlayerParamData)
MemuSel .Left = 12
MemuSel .Top = 149
MemuSel .Width = 331
MemuSel .Height = 33
MemuSel .onClick = StartProcess
MemuSel .Caption = 'Memu'
--------------/\/\/\/\/\/\/\/\/\/-------------
---------Emulator Selection Controls----------
--------------/\/\/\/\/\/\/\/\/\/-------------
--------------/\/\/\/\/\/\/\/\/\/-------------
--------------Main Form Controls--------------
--------------/\/\/\/\/\/\/\/\/\/-------------
function ShowMainForm()
--MAINFORM
MainForm = createForm(true)
MainForm.Caption = ''
MainForm.Width = 427
MainForm.Height = 228
MainForm.Color = 0x242422
MainTitle = createLabel(MainForm)
MainTitle.Caption = 'PUBGM HACK SCRIPT 1.8'
MainTitle.Left = 75
MainTitle.Top = 10
MainTitle.Font.Color = 0xffFF
MainTitle.Font.Size = 17
--IPADVIEW CHECKBOX
IpadChk = createCheckBox( MainForm );
IpadChk.Left = 80
IpadChk.Top = 60
IpadChk.Focused = false
IpadChk.focus = false
Ipadlb = createLabel(MainForm)
Ipadlb.Caption = 'IPad View'
Ipadlb.Left = 99
Ipadlb.Top = 62
Ipadlb.Font.Color = 0xffffff
--NO-RECOIL CHECKBOX
NoRecChk = createCheckBox( MainForm );
NoRecChk.Caption = ''
NoRecChk.Left = 165
NoRecChk.Top = 60
NoReclb = createLabel(MainForm)
NoReclb.Caption = 'No Recoil'
NoReclb.Left = 184
NoReclb.Top = 62
NoReclb.Font.Color = 0xffffff
--INSTANT HIT CHECKBOX
InshtChk = createCheckBox( MainForm );
InshtChk.Caption = ''
InshtChk.Left = 245
InshtChk.Top = 60
Inshtlb = createLabel(MainForm)
Inshtlb.Caption = 'Instant Hit'
Inshtlb.Left = 264
Inshtlb.Top = 62
Inshtlb.Font.Color = 0xffffff
--SMALL CROSSHAIR CHECKBOX
SMLCrosChk = createCheckBox( MainForm );
SMLCrosChk.Caption = ''
SMLCrosChk.Color = 0xfff
SMLCrosChk.Left = 95
SMLCrosChk.Top = 80
SMLCroslb = createLabel(MainForm)
SMLCroslb.Caption = 'Small Crosshair'
SMLCroslb.Left = 114
SMLCroslb.Top = 82
SMLCroslb.Font.Color = 0xffffff
--NO HEADSHOT CHECKBOX
NoHsChk = createCheckBox( MainForm );
NoHsChk.Caption = ''
NoHslb = createLabel(MainForm)
NoHslb.Caption = 'No Headshot'
NoHsChk.Color = 0xfff
NoHsChk.Left = 210
NoHsChk.Top = 80
NoHslb.Left = 229
NoHslb.Top = 82
NoHslb.Font.Color = 0xffffff
-----Activate Btn-----
activatebtn = createButton(MainForm)
ActBtnParamData={}
ActBtnParamData.Param = true
activatebtn.Tag= createRef(ActBtnParamData)
activatebtn.Font.Color = 0x9b9b9b
activatebtn.Left = 15
activatebtn.Top = 120
activatebtn.Width = 395
activatebtn.Height = 37
activatebtn.onClick = ecnirp
activatebtn.Caption = 'Activate'
-----Deactivate Btn-----
Deactivatebtn = createButton(MainForm)
DeactBtnParamData={}
DeactBtnParamData.Param = false
Deactivatebtn.Tag=createRef(DeactBtnParamData)
Deactivatebtn.Left = 15
Deactivatebtn.Top = 160
Deactivatebtn.Width = 395
Deactivatebtn.Height = 37
Deactivatebtn.onClick = ecnirp
Deactivatebtn.Caption = 'Deactivate'
Deactivatebtn.Font.Color = 0xfffff
StatusText = createLabel(MainForm)
StatusText.Caption = 'Status: Ready'
StatusText.Left = 15
StatusText.Top = 203
StatusText.Font.Color = 0xffFFff
StatusText.Font.Size = 10
lbac = createLabel(MainForm)
lbac.Caption = '0xPrince'
lbac.Left = 370
lbac.Top = 203
lbac.Font.Color = 0xffF
lbac.Font.Size = 9
end
--------------/\/\/\/\/\/\/\/\/\/-------------
--------------Main Form Controls--------------
--------------/\/\/\/\/\/\/\/\/\/-------------
</LuaScript>
</CheatTable>
Features
No recoil
Small Crosshair
and Instant hit
Or update OLD SCRIPTS
<?xml version="1.0" encoding="utf-8"?>
<CheatTable CheatEngineTableVersion="38">
<CheatEntries/>
<UserdefinedSymbols/>
<LuaScript>--/\/\/\/\/\--Features--/\/\/\/\/\--
--Author 0xPrince
------PUBGM V1.8------
--IPAD VIEW
--NO RECOIL
--INSTANT HIT
--SMALL CROSSHAIR
--NO HEADSHOTS
--/\/\/\/\/\--Features--/\/\/\/\/\--
dbk_initialize()
dbk_useKernelmodeOpenProcess()
dbk_useKernelmodeProcessMemoryAccess()
if getOpenedProcessID() then openProcess(getOpenedProcessID()) end
dbk_writesIgnoreWriteProtection(true)
local isEmuVbox = false
local startRange = 0
local endRange = 0x7ffffffff
-----------/\/\/\/\/\/\/\/\/\/-----------
-----------------Helper------------------
-----------/\/\/\/\/\/\/\/\/\/-----------
--Stop Copy and paste
function UpdateStatus(Upstatus,bLog,bSpeak)
StatusText.Caption = "Status: "..Upstatus
if (bSpeak==true) then
speak(Upstatus)
end
if (bLog == true) then
print("Log: "..Upstatus)
end
end
--------------------------------------------
function ClearOutput()
GetLuaEngine().MenuItem5.doClick()
end
--------------------------------------------
function StrToByte(strbytes)
local retbyte = {}
for hex in string.gmatch(strbytes, "%S+") do
local size = #retbyte + 1
retbyte[size] = tonumber(hex, 16)
end
return retbyte
end
--------------------------------------------
function AOBScanAA(script, symbol)
local success,disableInfo = autoAssemble(script)
if not success then return nil, disableInfo end
local addr = getAddress(symbol)
autoAssemble(script, disableInfo)
return addr
end
function AOBScanRegion(start, stop,bytestr)
local script = ([[
[ENABLE]
aobscanregion(luaAOBScanRegionSymbol,%X,%X,%s)
registersymbol(luaAOBScanRegionSymbol)
[DISABLE]
unregistersymbol(luaAOBScanRegionSymbol)
]]):format(getAddress(start), getAddress(stop), bytestr)
return AOBScanAA(script, 'luaAOBScanRegionSymbol')
end
function RepAob(search, replace)
local aob = AOBScan(search)
if aob then
for i=0,aob.Count-1 do
autoAssemble(aob..':\ndb '..replace)
end
aob.Destroy()
return true
else
return false
end
end
--------------------------------------------
LIBUE4Header = nil
function GetUeBaseAddr()
if(isEmuVbox ==true)then
return 1
end
if (LIBUE4Header == nil) then
UpdateStatus("Initializing",false,false)
LIBUE4Header = AOBScanRegion(startRange, endRange,"7F 45 4C 46 01 01 01 00 00 00 00 00 00 00 00 00 03 00 28 00 01 00 00 00 00 00 00 00 34 00 00 00 24 16 5A")
end
if (LIBUE4Header == nil) then
messageDialog("LibUE Base not found!", mtError, mbOK)
os.exit()
closeCE()
else
return LIBUE4Header
end
end
--------------------------------------------
function MemoryManager(Offset,FeatureName,OrgBytes, RepBytes,bEnable)
local Uebaseaddr =GetUeBaseAddr()
if bEnable == true then
UpdateStatus("Activating "..FeatureName)
if(isEmuVbox == true) then
if(RepAob(OrgBytes,RepBytes) ==false) then
UpdateStatus(FeatureName.." Pattern Not Found")
return
end
else
writeBytes(Uebaseaddr+Offset, StrToByte(RepBytes))
end
UpdateStatus(FeatureName .." Activated")
else
UpdateStatus("Deactivating "..FeatureName)
if(isEmuVbox == true) then
stat = RepAob(RepBytes,OrgBytes)
else
writeBytes(Uebaseaddr+Offset, StrToByte(OrgBytes))
end
UpdateStatus(FeatureName .." Deactivated")
end
end
function StartProcess(sender)
local ProcName = getRef(sender.Tag).EmuProcName
isEmuVbox = getRef(sender.Tag).Vbox
startRange =getRef(sender.Tag).StartRange
endRange =getRef(sender.Tag).EndRange
local p = io.popen('tasklist /fi "IMAGENAME eq '..ProcName..'.exe" /fi "MEMUSAGE gt 200000" /nh', 'r');
local procInfo = p:read('*a');
p:close();
local pid = procInfo:match('%d+');
pid = tonumber(pid);
if(pid == nil)then
messageDialog("Game Must Be Running!!", mtError, mbOK)
else
openProcess(pid)
EmuSelection.hide()
ShowMainForm()
EmuSelection.close()
end
end
-----------/\/\/\/\/\/\/\/\/\/-----------
-----------------Helper------------------
-----------/\/\/\/\/\/\/\/\/\/-----------
-----------/\/\/\/\/\/\/\/\/\/-----------
--------------Main Function--------------
-----------/\/\/\/\/\/\/\/\/\/-----------
function ecnirp(sender)
ClearOutput()
local BEnable = getRef(sender.Tag).Param
--Stop Copy and paste
-----IPad View--------
if checkbox_getState(IpadChk)== 1 then
MemoryManager(0x3C24C14,"IPad View",'00 00 B4 43 3C 1E 8F 03 30 BE 71 03 30 48','00 00 82 43 3C 1E 8F 03 30 BE 71 03 30 48',BEnable)
end
-----No Recoil--------
if checkbox_getState(NoRecChk)== 1 then
MemoryManager(0x13B34DC,"No Recoil",'70 4C 2D E9 10 B0 8D E2 20 D0 4D E2 00 40 A0 E1 01 50 A0 E3','00 00 A0 E3 1E FF 2F E1 20 D0 4D E2 00 40 A0 E1 01 50 A0 E3',BEnable)
end
-----Instant Hit--------
if checkbox_getState(InshtChk)== 1 then
MemoryManager(0x3CBD1F0,"Instant Hit",'4E 8A 38 EE E0 00 DD E5 01 00 10 E3 23 00 00','00 00 00 00 E0 00 DD E5 01 00 10 E3 23 00 00',BEnable)
end
-----Small Crosshair--------
if checkbox_getState(SMLCrosChk)== 1 then
MemoryManager(0x1DF2868,"Small Crosshair",'00 0A 90 1D 10 0A 10 EE 1E FF 2F E1 40 1B 90 E5 00 00 A0 E3','01 00 00 00 10 0A 10 EE 1E FF 2F E1 40 1B 90 E5 00 00 A0 E3',BEnable)
end
-----No Headshot--------
if checkbox_getState(NoHsChk)== 1 then
MemoryManager(0x405F920,"No Headshot",'CD CC CC 3D 00 00 00 00 E8 D9 78 03 DC D9 78 03 D0 D9 78 03','00 00 20 42 00 00 00 00 E8 D9 78 03 DC D9 78 03 D0 D9 78 03',BEnable)
end
return true
end
-----------/\/\/\/\/\/\/\/\/\/-----------
--------------Main Function--------------
-----------/\/\/\/\/\/\/\/\/\/-----------
--------------/\/\/\/\/\/\/\/\/\/-------------
---------Emulator Selection Controls----------
--------------/\/\/\/\/\/\/\/\/\/-------------
EmuSelection = createForm(true)
EmuSelection.Caption = 'PUBGM HACK SCRIPT 1.8'
EmuSelection.Width = 360
EmuSelection.Height = 200
GameloopSel = createButton(EmuSelection)
GameloopParamData={}
GameloopParamData.EmuProcName = "aow_exe"
GameloopParamData.Vbox = false
GameloopParamData.StartRange = 0x26000000
GameloopParamData.EndRange = 0x60000000
GameloopSel.Tag=createRef(GameloopParamData)
GameloopSel.Left = 12
GameloopSel.Top = 17
GameloopSel.Width = 331
GameloopSel.Height = 33
GameloopSel.onClick = StartProcess
GameloopSel.Caption = 'Gameloop'
SmartGaGaSel = createButton(EmuSelection)
SmartGaGaParamData={}
SmartGaGaParamData.EmuProcName = "AndroidProcess"
SmartGaGaParamData.Vbox = false
SmartGaGaParamData.StartRange = 0x70000000
SmartGaGaParamData.EndRange = 0x90000000
SmartGaGaSel.Tag=createRef(SmartGaGaParamData)
SmartGaGaSel.Left = 12
SmartGaGaSel.Top = 61
SmartGaGaSel.Width = 331
SmartGaGaSel.Height = 33
SmartGaGaSel.onClick = StartProcess
SmartGaGaSel.Caption = 'SmartGaGa'
LdPlayerSel = createButton(EmuSelection)
LdPlayerParamData={}
LdPlayerParamData.EmuProcName = "LdVBoxHeadless"
LdPlayerParamData.Vbox = true
LdPlayerParamData.StartRange = 0x0
LdPlayerParamData.EndRange = 0x7ffffffff
LdPlayerSel.Tag=createRef(LdPlayerParamData)
LdPlayerSel .Left = 12
LdPlayerSel .Top = 105
LdPlayerSel .Width = 331
LdPlayerSel .Height = 33
LdPlayerSel .onClick = StartProcess
LdPlayerSel .Caption = 'Ld Player'
MemuSel = createButton(EmuSelection)
MemuParamData={}
MemuParamData.EmuProcName = "MEmuHeadless"
MemuParamData.Vbox = true
MemuParamData.StartRange = 0x0
MemuParamData.EndRange = 0x7ffffffff
MemuSel.Tag=createRef(LdPlayerParamData)
MemuSel .Left = 12
MemuSel .Top = 149
MemuSel .Width = 331
MemuSel .Height = 33
MemuSel .onClick = StartProcess
MemuSel .Caption = 'Memu'
--------------/\/\/\/\/\/\/\/\/\/-------------
---------Emulator Selection Controls----------
--------------/\/\/\/\/\/\/\/\/\/-------------
--------------/\/\/\/\/\/\/\/\/\/-------------
--------------Main Form Controls--------------
--------------/\/\/\/\/\/\/\/\/\/-------------
function ShowMainForm()
--MAINFORM
MainForm = createForm(true)
MainForm.Caption = ''
MainForm.Width = 427
MainForm.Height = 228
MainForm.Color = 0x242422
MainTitle = createLabel(MainForm)
MainTitle.Caption = 'PUBGM HACK SCRIPT 1.8'
MainTitle.Left = 75
MainTitle.Top = 10
MainTitle.Font.Color = 0xffFF
MainTitle.Font.Size = 17
--IPADVIEW CHECKBOX
IpadChk = createCheckBox( MainForm );
IpadChk.Left = 80
IpadChk.Top = 60
IpadChk.Focused = false
IpadChk.focus = false
Ipadlb = createLabel(MainForm)
Ipadlb.Caption = 'IPad View'
Ipadlb.Left = 99
Ipadlb.Top = 62
Ipadlb.Font.Color = 0xffffff
--NO-RECOIL CHECKBOX
NoRecChk = createCheckBox( MainForm );
NoRecChk.Caption = ''
NoRecChk.Left = 165
NoRecChk.Top = 60
NoReclb = createLabel(MainForm)
NoReclb.Caption = 'No Recoil'
NoReclb.Left = 184
NoReclb.Top = 62
NoReclb.Font.Color = 0xffffff
--INSTANT HIT CHECKBOX
InshtChk = createCheckBox( MainForm );
InshtChk.Caption = ''
InshtChk.Left = 245
InshtChk.Top = 60
Inshtlb = createLabel(MainForm)
Inshtlb.Caption = 'Instant Hit'
Inshtlb.Left = 264
Inshtlb.Top = 62
Inshtlb.Font.Color = 0xffffff
--SMALL CROSSHAIR CHECKBOX
SMLCrosChk = createCheckBox( MainForm );
SMLCrosChk.Caption = ''
SMLCrosChk.Color = 0xfff
SMLCrosChk.Left = 95
SMLCrosChk.Top = 80
SMLCroslb = createLabel(MainForm)
SMLCroslb.Caption = 'Small Crosshair'
SMLCroslb.Left = 114
SMLCroslb.Top = 82
SMLCroslb.Font.Color = 0xffffff
--NO HEADSHOT CHECKBOX
NoHsChk = createCheckBox( MainForm );
NoHsChk.Caption = ''
NoHslb = createLabel(MainForm)
NoHslb.Caption = 'No Headshot'
NoHsChk.Color = 0xfff
NoHsChk.Left = 210
NoHsChk.Top = 80
NoHslb.Left = 229
NoHslb.Top = 82
NoHslb.Font.Color = 0xffffff
-----Activate Btn-----
activatebtn = createButton(MainForm)
ActBtnParamData={}
ActBtnParamData.Param = true
activatebtn.Tag= createRef(ActBtnParamData)
activatebtn.Font.Color = 0x9b9b9b
activatebtn.Left = 15
activatebtn.Top = 120
activatebtn.Width = 395
activatebtn.Height = 37
activatebtn.onClick = ecnirp
activatebtn.Caption = 'Activate'
-----Deactivate Btn-----
Deactivatebtn = createButton(MainForm)
DeactBtnParamData={}
DeactBtnParamData.Param = false
Deactivatebtn.Tag=createRef(DeactBtnParamData)
Deactivatebtn.Left = 15
Deactivatebtn.Top = 160
Deactivatebtn.Width = 395
Deactivatebtn.Height = 37
Deactivatebtn.onClick = ecnirp
Deactivatebtn.Caption = 'Deactivate'
Deactivatebtn.Font.Color = 0xfffff
StatusText = createLabel(MainForm)
StatusText.Caption = 'Status: Ready'
StatusText.Left = 15
StatusText.Top = 203
StatusText.Font.Color = 0xffFFff
StatusText.Font.Size = 10
lbac = createLabel(MainForm)
lbac.Caption = '0xPrince'
lbac.Left = 370
lbac.Top = 203
lbac.Font.Color = 0xffF
lbac.Font.Size = 9
end
--------------/\/\/\/\/\/\/\/\/\/-------------
--------------Main Form Controls--------------
--------------/\/\/\/\/\/\/\/\/\/-------------
</LuaScript>
</CheatTable>
