createThread(
    function()
        sleep(150)
        synchronize(
            function()
                if mfb then destroy()
                else
                end
                local mf = getMainForm()
                local mfb = createImage(mf)
                local p5= mf.Panel5
                mfb.Left = p5.Left
                mfb.Top = p5.Top
                mfb.Width = mf.Width
                mfb.Height = mf.Height
                mfb.Anchors = "[akLeft, akTop, akRight]"
                mfb.Alignment = "1"
                mfb.Stretch = true
                mfb.Picture.loadFromStream(findTableFile('oblivion.jpg').Stream)


                if img1 then destroy()
                else
                end
                local fl = mf.FoundList3
                local flpn = mf.Panel5
                local img1 = createImage(flpn)
                fl.setLayeredAttributes(0x0000FE, 185, 0x3)
                img1.Anchors = "[akLeft, akTop, akBottom, akRight]"
                img1.Height = fl.Height
                img1.Width = fl.Width
                img1.Left = fl.Left
                img1.Top = fl.Top
                img1.Alignment = "1"
                img1.Stretch = true
                mf.Foundlist3.Color = 0x010101
                img1.Picture.loadFromStream(findTableFile('obr.jpg').Stream)


                if img2 then destroy()
                else
                end
                local al = getAddressList()
                local adl = getAddressList().List
                local adp = mf.Panel1
                local img2 = createImage(adp)
                al.setLayeredAttributes(0x0000FE, 185, 0x3)
                img2.Anchors = "[akLeft, akTop, akBottom, akRight]"
                img2.Height = al.Height
                img2.Width = al.Width
                img2.Left = al.Left
                img2.Top = al.Top
                img2.Stretch = true
                al.Control[0].BackgroundColor = 0x010101
                img2.Picture.loadFromStream(findTableFile("oblivionbg.jpg").Stream)


                if img then destroy()
                else
                end
                local logop = mf.LogoPanel
                local img = mf.Logo
                img.Width = 145
                img.Height = 135
                img.Left = -10
                img.Top = 0
                mf.SettingsButton.Width = 150
                img.Picture.loadFromStream(findTableFile("Oblivionlogo.png").Stream)
            end
        )
    end
)

local mf = getMainForm()
local al = getAddressList()
local sf = getSettingsForm()
local app = getApplication()

if Bit then destroy()
else
end
local Pic = createPicture()
Pic.loadFromStream(findTableFile("Oblivionlogo.png").Stream)
local Bit = Pic.getBitmap()
app.Icon = Bit

function onTableLoad(before)
  getApplication().Title = mf.OpenDialog1.FileName
  mf.Caption = mf.SaveDialog1.FileName
end
function MainForm.OnProcessOpened()
  getApplication().Title = mf.OpenDialog1.FileName
  mf.Caption = mf.SaveDialog1.FileName
end

mf.pnlScanValueOptions .Font.Color = 0x2a36ff
sf.tsLua.Font.Color = 0x2a36ff
sf.GeneralSettings.Color = 0x000001
sf.Font.Color = 0x2a36ff
sf.AboutLabel.Font.Color = 0x2a36ff
mf.Foundlist3.Font.Color = 0x000099
mf.lblSigned.Font.Color = 0x0000ff
mf.Splitter1.Color = 0x2a36ff
mf.Label54.Font.Color = 0x2a36ff
mf.editSH2.Font.Color = 0x2a36ff
mf.lblSH0.Font.Color = 0x2a36ff
mf.lblSH20.Font.Color = 0x2a36ff
mf.advancedbutton.Font.Color = 0x2a36ff
mf.CommentButton.Font.Color = 0x2a36ff
mf.Label6.Font.Color = 0x2a36ff
mf.ScanText.Font.Color = 0x2a36ff
mf.ScanType.Font.Color = 0x2a36ff
mf.VarType.Font.Color = 0x2a36ff
mf.lblScanType.Font.Color = 0x2a36ff
mf.lblValueType.Font.Color = 0x2a36ff
mf.Panel5.Font.Color = 0x2a36ff
al.SelectedBackgroundColor = 0x2a36ff
al.SelectedSecondaryBackgroundColor = 0x550000
al.CheckboxColor = 0x97ff35
al.CheckboxActiveSelectedColor = 0x550000
al.CheckboxActiveColor = 0x2a36ff
al.CheckboxSelectedColor = 0x55ddf0