--------------------------------------------------------------------------------------- ------------- Small and Dirty AOB Scan ----------------------------------------------- --------------------------------------------------------------------------------------- --[[ print(tostring(cheatEngineIs64Bit())) print(md5file(getCheatEngineDir().."cheatengine-x86_64.exe")) Broken = {} Broken[1] = "e1a8b38bb6a55430b0d1617e001503a0" --- Latest DB Release Works = {} Works[1] = "87e349d4f5c2ea7f21a29d711206402f" Works[2] = "a8d52cf152ef019583b63f2a811cbb71" --- Monitor Test mgr print(AceBoxList_High_Add) print(AceBoxList_Norm_Add) print(Check_Active_Color_xcv) print(Check_Active_High_Color_xcv) print(Base_Selection_Color_xcv) print(Double_Selection_Color_xcv) ]] function Only_IF_64_CE_xcv() function Scan_Partial_CE_CODE() Find = {} ScanPlace = "005b0000" --Find = readBytesLocal("005b0000",200000, true) Find = readBytesLocal(ScanPlace,100000, true) Find[0] = 25 for x=0,#Find do --yep = yep..Find[x] Find[x] = string.format ("%X",Find[x]) if string.len(Find[x]) == 1 -- add a fucking zero then Find[x] = "0"..Find[x] end end Find[1] = 240 oh = table.concat(Find) end Scan_Partial_CE_CODE() ------------------------------------------------------------------- ---------- find First then Change Then Runa Again ---------------- ------------------------------------------------------------------- --------- High Light BOX ---------------------------------------- ------------------------------------------------------------------- AOBBOX = "488B8800010000BA08000080E8" FindBOX = (string.find(oh,AOBBOX)) FindBOX = (FindBOX+16)/2-1+5963776 AceBoxList_High_Add = string.format("%X",FindBOX) ---- temp set writeIntegerLocal(AceBoxList_High_Add,"0x80000007") --- Write for last find ----------------------------------------------------------------- --------- Red X AOB ------------------------------------------- ----------------------------------------------------------------- AOBRED = "488B8520FFFFFF488B9060050000488B8A00010000BAFF000000" FindRedX = (string.find(oh,AOBRED)) FindRedX = (FindRedX+16)/2-1+5963776+14 Check_Active_Color_xcv = string.format("%X",FindRedX) AOBRED = nil FindRedX = nil ----------------------------------------------------------------- --------- Black X AOB ------------------------------------------- ----------------------------------------------------------------- AOBBlack = "488B8520FFFFFF488B9060050000488B8A00010000BA00000000" FindBlackX = (string.find(oh,AOBBlack)) FindBlackX = (FindBlackX+16)/2-1+5963776+14 Check_Active_High_Color_xcv = string.format("%X",FindBlackX) AOBBlack = nil FindBlackX = nil ----------------------------------------------------------------- --------- Selection Single AOB ------------------------------------------- ----------------------------------------------------------------- AOBSingle = "488B8520FFFFFF488B9060050000488B8A10010000BA0D000080" FindSingle = (string.find(oh,AOBSingle)) FindSingle = (FindSingle+16)/2-1+5963776+14 Base_Selection_Color_xcv = string.format("%X",FindSingle) AOBSingle = nil FindSingle = nil ----------------------------------------------------------------- --------- Selection Double AOB -------------------------------- ----------------------------------------------------------------- AOBDouble = "488B8520FFFFFF488B9060050000488B8A10010000BA02000080" FindDouble = (string.find(oh,AOBDouble)) FindDouble = (FindDouble+16)/2-1+5963776+14 Double_Selection_Color_xcv = string.format("%X",FindDouble) AOBDouble = nil FindDouble = nil ---------------------------------------------------------------------- ----- Must be Last ------------------- Scan for Second Box ---------- ---------------------------------------------------------------------- Scan_Partial_CE_CODE() -- Re Call Scan FindBOX2 = (string.find(oh,AOBBOX)) --- Use AOB og FindBOX2 = (FindBOX2+16)/2-1+5963776 AceBoxList_Norm_Add = string.format("%X",FindBOX2) writeIntegerLocal(AceBoxList_High_Add,"0x80000008") ---- Fix Entry FindBOX2 = nil --- from first AOBBOX = nil FindBOX = nil Find = nil ScanPlace = nil oh = nil -- END AOB AOB AOB END ------------------------------------------------- --------------------------------------------------------------------------- -------------------------------------------------------------------------------- -------------- Gui Stuff and functions ---------------------------------------- -------------------------------------------------------------------------------- function Call_Windows_Color_Pick_xcv() Windows_Pick_xcv = getMainForm().findComponentByName("ColorDialog1") Windows_Pick_xcv.Execute() end -------------------------------------------------------------------------------- -------------- Extra Dfines --------------------------------------------------- -------------------------------------------------------------------------------- --[[ -- Dark Byte Changed something in List on Last Release so AOB scan for everything instead of pointers Base_Selection_Color_xcv = tonumber(AceBoxList_Norm_Add, 16) -355 Base_Selection_Color_xcv = string.format("%X",Base_Selection_Color_xcv) --print(Base_Selection_Color_xcv) Double_Selection_Color_xcv = string.format("%X",tonumber(AceBoxList_Norm_Add, 16) -355+33) --print(Double_Selection_Color_xcv) Check_Active_Color_xcv = string.format("%X",tonumber(AceBoxList_Norm_Add, 16)+588 ) --print(Check_Active_Color_xcv) Check_Active_High_Color_xcv = string.format("%X",tonumber(AceBoxList_Norm_Add, 16)+555 ) --print(Check_Active_High_Color_xcv) ]] Form_For_List_Color = createForm(nil) Form_For_List_Color.Caption = "Address List Companion" Form_For_List_Color.Position = poMainFormCenter --Form_For_List_Color.Show() Form_For_List_Color.Position = poMainFormCenter --Form_For_List_Color.FormStyle = "fsStayOnTop" Form_For_List_Color.Height = 289 Form_For_List_Color.Width = 291 Form_For_List_Color.BorderIcons = "[biSystemMenu]" Form_For_List_Color.OnClose = function() Form_For_List_Color.Hide() Grab_Entry_Color_Timer_xcv.Enabled = false end Form_For_List_Color_Panel = createPanel(Form_For_List_Color) Form_For_List_Color_Panel.Left = 1 Form_For_List_Color_Panel.Top = 1 Form_For_List_Color_Panel.Width = Form_For_List_Color.Width -2 Form_For_List_Color_Panel.Height = Form_For_List_Color.Height -2 Form_For_List_Color_Panel.BorderStyle = bsSingle Form_For_List_Color_Panel.BevelOuter = bvNone Form_For_List_Color_Panel.Color = "0x00f9f9f9" Select_Box_Label_xcv0 = createLabel(Form_For_List_Color_Panel) Select_Box_Label_xcv0.Left = 230-2 Select_Box_Label_xcv0.Top = 10+10+2 Select_Box_Label_xcv0.Caption = "Secondary:" Select_Box_Label_xcv0.Font.Size = 7 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- Select_Box_Label_xcv1 = createLabel(Form_For_List_Color_Panel) Select_Box_Label_xcv1.Left = 13 Select_Box_Label_xcv1.Top = 32+10 Select_Box_Label_xcv1.Caption = "Check Box Color :" function Set_Add_List_Color_xcv1() Call_Windows_Color_Pick_xcv() writeIntegerLocal(AceBoxList_High_Add,Windows_Pick_xcv.Color) Select_Box_xcv1_Panel.Color = readIntegerLocal(AceBoxList_High_Add) end Select_Box_xcv1_Panel = createPanel(Form_For_List_Color_Panel) Select_Box_xcv1_Panel.Left = 222 Select_Box_xcv1_Panel.Width = 50 Select_Box_xcv1_Panel.Height = 20 Select_Box_xcv1_Panel.Top = 26+10 Select_Box_xcv1_Panel.BevelOuter = bvNone Select_Box_xcv1_Panel.Borderstyle = bsSingle Select_Box_xcv1_Panel.OnClick = Set_Add_List_Color_xcv1 function Set_Add_List_Color_xcv2() Call_Windows_Color_Pick_xcv() writeIntegerLocal(AceBoxList_Norm_Add,Windows_Pick_xcv.Color) Select_Box_xcv2_Panel.Color = readIntegerLocal(AceBoxList_Norm_Add) end Select_Box_xcv2_Panel = createPanel(Form_For_List_Color_Panel) Select_Box_xcv2_Panel.Left = 138 Select_Box_xcv2_Panel.Width = 50 Select_Box_xcv2_Panel.Height = 20 Select_Box_xcv2_Panel.Top = 26+10 Select_Box_xcv2_Panel.BevelOuter = bvNone Select_Box_xcv2_Panel.Borderstyle = bsSingle Select_Box_xcv2_Panel.OnClick = Set_Add_List_Color_xcv2 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- Select_Box_Label_xcv2 = createLabel(Form_For_List_Color_Panel) Select_Box_Label_xcv2.Left = 13 Select_Box_Label_xcv2.Top = 32+10+32 Select_Box_Label_xcv2.Caption = "Check Active Color :" function Set_Add_List_Color_xcv3() Call_Windows_Color_Pick_xcv() writeIntegerLocal(Check_Active_Color_xcv,Windows_Pick_xcv.Color) Select_Box_xcv3_Panel.Color = readIntegerLocal(Check_Active_Color_xcv) end Select_Box_xcv3_Panel = createPanel(Form_For_List_Color_Panel) Select_Box_xcv3_Panel.Left = 138 Select_Box_xcv3_Panel.Width = 50 Select_Box_xcv3_Panel.Height = 20 Select_Box_xcv3_Panel.Top = 26+10+32 Select_Box_xcv3_Panel.BevelOuter = bvNone Select_Box_xcv3_Panel.Borderstyle = bsSingle Select_Box_xcv3_Panel.OnClick = Set_Add_List_Color_xcv3 function Set_Add_List_Color_xcv4() Call_Windows_Color_Pick_xcv() writeIntegerLocal(Check_Active_High_Color_xcv,Windows_Pick_xcv.Color) Select_Box_xcv4_Panel.Color = readIntegerLocal(Check_Active_High_Color_xcv) end Select_Box_xcv4_Panel = createPanel(Form_For_List_Color_Panel) Select_Box_xcv4_Panel.Left = 222 Select_Box_xcv4_Panel.Width = 50 Select_Box_xcv4_Panel.Height = 20 Select_Box_xcv4_Panel.Top = 26+10+32 Select_Box_xcv4_Panel.BevelOuter = bvNone Select_Box_xcv4_Panel.Borderstyle = bsSingle Select_Box_xcv4_Panel.OnClick = Set_Add_List_Color_xcv4 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- Select_Box_Label_xcv3 = createLabel(Form_For_List_Color_Panel) Select_Box_Label_xcv3.Left = 13 Select_Box_Label_xcv3.Top = 32+10+32+32 Select_Box_Label_xcv3.Caption = "Selection Color :" function Set_Add_List_Color_xcv5() Call_Windows_Color_Pick_xcv() writeIntegerLocal(Base_Selection_Color_xcv,Windows_Pick_xcv.Color) Select_Box_xcv5_Panel.Color = readIntegerLocal(Base_Selection_Color_xcv) end Select_Box_xcv5_Panel = createPanel(Form_For_List_Color_Panel) Select_Box_xcv5_Panel.Left = 138 Select_Box_xcv5_Panel.Width = 50 Select_Box_xcv5_Panel.Height = 20 Select_Box_xcv5_Panel.Top = 26+10+32+32 Select_Box_xcv5_Panel.BevelOuter = bvNone Select_Box_xcv5_Panel.Borderstyle = bsSingle Select_Box_xcv5_Panel.OnClick = Set_Add_List_Color_xcv5 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- function Set_Add_List_Color_xcv6() Call_Windows_Color_Pick_xcv() writeIntegerLocal(Double_Selection_Color_xcv,Windows_Pick_xcv.Color) Select_Box_xcv6_Panel.Color = readIntegerLocal(Double_Selection_Color_xcv) end Select_Box_xcv6_Panel = createPanel(Form_For_List_Color_Panel) Select_Box_xcv6_Panel.Left = 222 Select_Box_xcv6_Panel.Width = 50 Select_Box_xcv6_Panel.Height = 20 Select_Box_xcv6_Panel.Top = 26+10+32+32 Select_Box_xcv6_Panel.BevelOuter = bvNone Select_Box_xcv6_Panel.Borderstyle = bsSingle Select_Box_xcv6_Panel.OnClick = Set_Add_List_Color_xcv6 -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- function Set_Add_List_Color_xcv() Call_Windows_Color_Pick_xcv() getAddressList().Component[0].BackgroundColor = Windows_Pick_xcv.Color getAddressList().Component[0].Color = Windows_Pick_xcv.Color Select_Box_xcv7_Panel.Color = getAddressList().Component[0].Color end Select_Box_Label_xcv4 = createLabel(Form_For_List_Color_Panel) Select_Box_Label_xcv4.Left = 13 Select_Box_Label_xcv4.Top = 32+10+32+32+32 Select_Box_Label_xcv4.Caption = "Address List :" Select_Box_xcv7_Panel = createPanel(Form_For_List_Color_Panel) Select_Box_xcv7_Panel.Left = 138 Select_Box_xcv7_Panel.Width = 50 Select_Box_xcv7_Panel.Height = 20 Select_Box_xcv7_Panel.Top = 26+10+32+32+32 Select_Box_xcv7_Panel.OnClick = Set_Add_List_Color_xcv Select_Box_xcv7_Panel.BevelOuter = bvNone Select_Box_xcv7_Panel.Borderstyle = bsSingle -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- Batch_Swapper_xcv_Label = createLabel(Form_For_List_Color_Panel) Batch_Swapper_xcv_Label.Caption = " Selected Entry Batch Color Swap: \n\n\n\n " Batch_Swapper_xcv_Label.Color = "0x00323239" Batch_Swapper_xcv_Label.Font.Color = "0x00ffb0b0" Batch_Swapper_xcv_Label.Font.Size = 10 Batch_Swapper_xcv_Label.Top = 26+10+32+32+32+32+32+5 function Grab_Entry_Color_Selected_xcv() if getAddressList().SelectedRecord == nil then Select_Box_xcv8_Panel.Color = 0x00FF00FF else Select_Box_xcv8_Panel.Color = getAddressList().SelectedRecord.Color end collectgarbage() end Grab_Entry_Color_Timer_xcv = createTimer(Form_For_List_Color_Panel) Grab_Entry_Color_Timer_xcv.Interval = 100 Grab_Entry_Color_Timer_xcv.Enabled = false Grab_Entry_Color_Timer_xcv.OnTimer = Grab_Entry_Color_Selected_xcv Select_Box_xcv8_Panel = createPanel(Form_For_List_Color_Panel) Select_Box_xcv8_Panel.Left = 80-20-10 Select_Box_xcv8_Panel.Width = 50 Select_Box_xcv8_Panel.Height = 50 Select_Box_xcv8_Panel.Top = 26+10+32+32+32+48+40+3 Select_Box_xcv8_Panel.Color = 0x00FF00FF Select_Box_xcv8_Panel.OnClick = Set_Add_List_Color_xcv Select_Box_xcv8_Panel.BevelOuter = bvNone Select_Box_xcv8_Panel.Borderstyle = bsSingle function Batch_Swap_Colors_xcv() Call_Windows_Color_Pick_xcv() for j=0,getAddressList().Count-1 do if getAddressList().getMemoryRecord(j).Color == Select_Box_xcv8_Panel.Color then getAddressList().getMemoryRecord(j).Color = Windows_Pick_xcv.Color Select_Box_xcv9_Panel.Color = Windows_Pick_xcv.Color end end end Select_Box_xcv9_Panel = createPanel(Form_For_List_Color_Panel) Select_Box_xcv9_Panel.Left = 80-20-10+100+45 Select_Box_xcv9_Panel.Width = 50 Select_Box_xcv9_Panel.Height = 50 Select_Box_xcv9_Panel.Top = 26+10+32+32+32+48+40+3 Select_Box_xcv9_Panel.Color = "0x80000008" Select_Box_xcv9_Panel.OnClick = Set_Add_List_Color_xcv Select_Box_xcv9_Panel.BevelOuter = bvNone Select_Box_xcv9_Panel.Borderstyle = bsSingle Select_Box_xcv9_Panel.OnClick = Batch_Swap_Colors_xcv ------------------------------------------------------------------------------------------------------------ ----------- Addlist PopUp Menu ---------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------ function Add_List_Compact_xcv() if switch_xcv == true then switch_xcv = false Com_xcv.Caption= "Full Mode" else switch_xcv = true Com_xcv.Caption= "Compact Mode" end getMainForm().Splitter1.Visible = switch_xcv getMainForm().Panel4.Visible = switch_xcv getMainForm().Panel5.Visible = switch_xcv end ------------------------------------------------------------ ------ Popo Up Entries ----------------------------------------------------------- List_Popup_xcv = getMainForm().findComponentByName("PopupMenu2") for x = 1,List_Popup_xcv.Items.Count-1 do -- Fuck it do it this way if List_Popup_xcv.Items[x].Name == "N1" then Entry_Space_xcv = x end end ----- Seperate Sep_xcv = createMenuItem(List_Popup_xcv) ---- Last Seperate Sep_xcv.Caption= "-" Sep_xcv.Name = "Seperator_xcv" List_Popup_xcv.Items.insert(Entry_Space_xcv+1,Sep_xcv) --- uses default Divider switch_xcv = true ---- Set to true from jump Com_xcv = createMenuItem(List_Popup_xcv) ---- Compact Mode Com_xcv.Caption= "Compact Mode" Com_xcv.OnClick = Add_List_Compact_xcv Com_xcv.Name = "Compact_Toggle" List_Popup_xcv.Items.insert(Entry_Space_xcv+1,Com_xcv) --- uses default Divider function Check_Form_Build_List_Color_XCV() Form_For_List_Color.Show() Grab_Entry_Color_Timer_xcv.Enabled = true --- Find Colors -- Select_Box_xcv1_Panel.Color = readIntegerLocal(AceBoxList_High_Add) Select_Box_xcv2_Panel.Color = readIntegerLocal(AceBoxList_Norm_Add) Select_Box_xcv3_Panel.Color = readIntegerLocal(Check_Active_Color_xcv) Select_Box_xcv4_Panel.Color = readIntegerLocal(Check_Active_High_Color_xcv) Select_Box_xcv5_Panel.Color = readIntegerLocal(Base_Selection_Color_xcv) Select_Box_xcv6_Panel.Color = readIntegerLocal(Double_Selection_Color_xcv) Select_Box_xcv7_Panel.Color = getAddressList().Component[0].Color end Pick_xcv = createMenuItem(List_Popup_xcv) --- Set List Colors Pick_xcv.Caption= "List Companion" Pick_xcv.OnClick = Check_Form_Build_List_Color_XCV Pick_xcv.Name = "Choose_List_Colors" List_Popup_xcv.Items.insert(Entry_Space_xcv+1,Pick_xcv) --- uses default Divider Entry_Space_xcv = nil -------------------------------------------------------------------------------------------- --------------- Load Saved Default Colors ------------------------------------------------- -------------------------------------------------------------------------------------------- function Load_ACE_XCV_COLORS() Load_Colors_To_File_xcv = io.open(getCheatEngineDir().."autorun\\Color_Defaults.ini","r") if Load_Colors_To_File_xcv~=nil then VE = 1 Colors_Delete_xcv = {} for line in Load_Colors_To_File_xcv:lines() do -- print(line) Colors_Delete_xcv[VE] = line VE = VE+1 end writeIntegerLocal(AceBoxList_Norm_Add,Colors_Delete_xcv[1]) writeIntegerLocal(AceBoxList_High_Add,Colors_Delete_xcv[2]) writeIntegerLocal(Base_Selection_Color_xcv,Colors_Delete_xcv[3]) writeIntegerLocal(Double_Selection_Color_xcv,Colors_Delete_xcv[4]) writeIntegerLocal(Check_Active_Color_xcv,Colors_Delete_xcv[5]) writeIntegerLocal(Check_Active_High_Color_xcv,Colors_Delete_xcv[6]) getAddressList().Component[0].Color = Colors_Delete_xcv[7] getAddressList().Component[0].BackgroundColor = Colors_Delete_xcv[7] Load_Colors_To_File_xcv:close() Colors_Delete_xcv = nil VE= nil --- Find Colors -- Select_Box_xcv1_Panel.Color = readIntegerLocal(AceBoxList_High_Add) Select_Box_xcv2_Panel.Color = readIntegerLocal(AceBoxList_Norm_Add) Select_Box_xcv3_Panel.Color = readIntegerLocal(Check_Active_Color_xcv) Select_Box_xcv4_Panel.Color = readIntegerLocal(Check_Active_High_Color_xcv) Select_Box_xcv5_Panel.Color = readIntegerLocal(Base_Selection_Color_xcv) Select_Box_xcv6_Panel.Color = readIntegerLocal(Double_Selection_Color_xcv) Select_Box_xcv7_Panel.Color = getAddressList().Component[0].Color end end -------------------------------------------------------------------------------------- -------------------------------------------------------------------------------------- function Save_Color_Defaults_Start_xcv() Save_Colors_To_File_xcv = io.open(getCheatEngineDir().."autorun\\Color_Defaults.ini","w") Save_Colors_To_File_xcv:write(readIntegerLocal(AceBoxList_Norm_Add)..'\n') Save_Colors_To_File_xcv:write(readIntegerLocal(AceBoxList_High_Add)..'\n') Save_Colors_To_File_xcv:write(readIntegerLocal(Base_Selection_Color_xcv)..'\n') Save_Colors_To_File_xcv:write(readIntegerLocal(Double_Selection_Color_xcv)..'\n') Save_Colors_To_File_xcv:write(readIntegerLocal(Check_Active_Color_xcv)..'\n') Save_Colors_To_File_xcv:write(readIntegerLocal(Check_Active_High_Color_xcv)..'\n') Save_Colors_To_File_xcv:write(getAddressList().Component[0].Color) Save_Colors_To_File_xcv:close() end Save_Xcv__Defaults_Button = createButton(Form_For_List_Color) Save_Xcv__Defaults_Button.Left = 222 - 55 - 10 Save_Xcv__Defaults_Button.Width = 50+5 Save_Xcv__Defaults_Button.Height = 20 Save_Xcv__Defaults_Button.top = 175 Save_Xcv__Defaults_Button.Caption = "Save" Save_Xcv__Defaults_Button.OnClick = Save_Color_Defaults_Start_xcv Load_Xcv__Defaults_Button = createButton(Form_For_List_Color) Load_Xcv__Defaults_Button.Left = 222 Load_Xcv__Defaults_Button.Width = 50+5 Load_Xcv__Defaults_Button.Height = 20 Load_Xcv__Defaults_Button.Top = 170+5 Load_Xcv__Defaults_Button.Caption = "Load" Load_Xcv__Defaults_Button.OnClick = Load_ACE_XCV_COLORS function AutoLoad_Xcv_ColorsFile_xcv() Auto_Write_Save_Xcv__xcv = io.open(getCheatEngineDir().."autorun\\Color_Defaults_Auto.ini","w") Auto_Write_Save_Xcv__xcv:write(tostring(Auto_Load_Xcv__OnStart_Up.Checked)) Auto_Write_Save_Xcv__xcv:close() end Auto_Load_Xcv__OnStart_Up = createCheckBox(Form_For_List_Color) Auto_Load_Xcv__OnStart_Up.Left = 13 Auto_Load_Xcv__OnStart_Up.Top = 170+5+2 Auto_Load_Xcv__OnStart_Up.Caption = "Auto Load OnStartup" Auto_Load_Xcv__OnStart_Up.OnChange = AutoLoad_Xcv_ColorsFile_xcv Auto_Load_Xcv__OnStart_Up.Color = "0x0045ff45" Auto_Write_Load_Xcv__xcv = io.open(getCheatEngineDir().."autorun\\Color_Defaults_Auto.ini","r") if Auto_Write_Load_Xcv__xcv~=nil then for line in Auto_Write_Load_Xcv__xcv:lines() do if line == "true" then -- print('Auto Load_Xcv_ Active') Auto_Load_Xcv__OnStart_Up.Checked = true Load_ACE_XCV_COLORS() --- LOad Colors end -- if true end -- line read Auto_Write_Load_Xcv__xcv:close() end --------------------------------------------------------------------------------------------------------------------------- ---------------- Web Check ---------------------------------------------------------------------------------------------- --------------------------------------------------------------------------------------------------------------------------- function Web_Check_ADD_List_Companion() --Web_Check_ADD_List_Companion_timer.Enabled = false -- 12 seconds sleep(10000) ---- 10 seconds --print("ACtive NOw") grabinternet=getInternet() ADD_Companion_xcv = grabinternet.getURL("https://www.dropbox.com/s/tur8hv61z5af98j/AddressListCompanion_Version.txt?dl=1") ADD_Companion_xcv_Update = grabinternet.getURL("https://www.dropbox.com/s/nz84o9rq90vb2lj/AddressListCompanion_Updates.txt?dl=1") grabinternet.destroy() if ADD_Companion_xcv~= nil then if ADD_Companion_xcv ~= "Version 1.0.1" then --print('Needs Update') --print(ADD_Companion_xcv_Update) local yoyo = messageDialog("New Address List Companion Available : "..ADD_Companion_xcv.."\n\n"..ADD_Companion_xcv_Update.."\n\nDo you wish to visit the forum Post",2,0,1) --print(yo) if yoyo==6 then shellExecute("http://forum.cheatengine.org/viewtopic.php?p=5683526#5683526") end end else --print('no internet') end -- file check weby = nil --- I refuse to local end --Web_Check_ADD_List_Companion_timer = createTimer() --Web_Check_ADD_List_Companion_timer.Interval = 20000 -- 12 seconds --Web_Check_ADD_List_Companion_timer.OnTimer = Web_Check_ADD_List_Companion weby = createNativeThread(Web_Check_ADD_List_Companion) end if cheatEngineIs64Bit() == true then Only_IF_64_CE_xcv() end