Widescreen Gaming Forum

require(GlobalDependencys:GetDependency("StandardBase"):GetPackageName())

--ControlVars
bFixEnabled = true
bAspectFix = true

--PROCESS VARS
Process_FriendlyName = Module:GetFriendlyName()
Process_WindowName = "DOOMx64;DOOMx64vk"
Process_ClassName = "Zion"
Process_EXEName = "*"

--INJECTION BEHAVIOUR
InjectDelay = 1500
WriteInterval = 100
SearchInterval = 500
SuspendThread = true

--Name                         Manual/Auto/Hybrid        Steam/Origin/Any                IncludeFile:Configure;Enable;Periodic;Disable;
SupportedVersions = {       
{"Automatically Detect",       "Hybrid",           "Any",                            "Configure_SignatureScan;Enable_Inject;Periodic;Disable_Inject;"},
}

function Init_Controls()
   DefaultControls.AddHeader("Header_FixesEnableDisable","Individual Fixes",245,70,210,17)
   DefaultControls.AddFixToggle("CKAspectFix_Enable","Aspect Fix","CKAspectFix_Changed",255,101,180,14)
end


function Configure_SignatureScan()

   local tAddress = HackTool:AddAddress("AspectFix")
   if HackTool:SignatureScan("F3 0F ?? ?? ?? ?? ?? ?? F3 0F ?? ?? ?? ?? ?? ?? F3 0F ?? ?? ?? ?? ?? ?? 0F 28 ?? E8 ?? ?? ?? ?? F3 0F ?? ?? E8 ?? ?? ?? ??",tAddress,PAGE_EXECUTE_READ,0x10,Process_EXEName) == 0 then   
      return ErrorOccurred(string.format(SigScanError,tAddress:GetName()))
   else
      print( tAddress:GetInfo(TYPE_ADDRESS) )
      
      local AspectLimit = HackTool:AddAddress("AspectLimit",tAddress)
      AspectLimit:AcquireAddress(0x4)
      print( AspectLimit:GetInfo(TYPE_FLOAT) )
   end   
   
   return true

end



function Enable_Inject()

   local Variables = HackTool:AllocateMemory("Variables",0)
   Variables:PushFloat("AspectLimit")
   
   Variables:Allocate()
   
   ResolutionChanged()

   local asm = [[   

      (codecave)AspectFix,AspectFix_cc:
         $$0 $$1, [(allocation)Variables->AspectLimit]
         %end%
   ]]
   
   if HackTool:CompileAssembly(asm,"Fixes") == nil then
      return ErrorOccurred("Assembly compilation failed...")
   else
      Toggle_CodeCave("AspectFix_cc",bAspectFix)
   end      

end

function Periodic()

   local AspectLimit = HackTool:GetAddress("AspectLimit")
   local Variables = HackTool:GetAllocation("Variables")
   
   if AspectLimit and Variables then
   
      if bAspectFix then
         PluginViewport:AppendStatusMessage( string.format("\r\n     (AspectLimit) Default=%.2f, New=%.2f", AspectLimit:ReadFloat(),Variables["AspectLimit"]:ReadFloat()) )      
      end

   end

end

function Disable_Inject()

   CleanUp()

end


function ResolutionChanged()

   local Variables = HackTool:GetAllocation("Variables")
   if Variables then
      Variables["AspectLimit"]:WriteFloat( DisplayInfo:GetAspectRatio() )
   end

end

function CKAspectFix_Changed(Sender)

   bAspectFix = Toggle_CheckFix(Sender)
   Toggle_CodeCave("AspectFix_cc",bAspectFix)
   ForceUpdate()      
   
end

function Init()   
   Init_BaseControls()
   Init_Controls()
end

function DeInit()
   DisableFix()
end