Auto Carry Plugin - Ziggs Edition - v1.08

--[[

        Auto Carry Plugin - Ziggs Edition
        Author: Kain
        Version: 1.08
        Copyright 2013

        Dependency: Sida's Auto Carry: Revamped

        How to install:
            Make sure you already have AutoCarry installed.
            Name the script EXACTLY "SidasAutoCarryPlugin - Ziggs.lua" without the quotes.
            Place the plugin in BoL/Scripts/Common folder.

        Version History:
            Version: 1.08: http://pastebin.com/ebB89AnC
            Version: 1.07: http://pastebin.com/Mj7i5k9X
                Added text on screen when Killsteal occurs to make it more noticeable.
                Added slider variable to set Killsteal hitchance/sensitivity.
            Version: 1.06: http://pastebin.com/5j9W654G (7/23/2013)
                Fixed Karthus / Kog'maw, etc. bug where script would try to kill their 'ghost' after they were dead, but still present nearby.
                Added toggle for auto harass.
                Change range color indicators.
            Version: 1.05: http://pastebin.com/CcgW9n27
                Added Satchel Jump.
                Improved "Ultimate Mega Killsteal" calculation. Now operates on a hitchance curve. The further away the target is, the higher the hitchance required to throw the Bomb. Should reduce the number of cross-map misses. Will experiment with the settings after more feedback.
                Removed Satchel from normal combo.
                Added a secondary Full Combo option.
            Version: 1.04: http://pastebin.com/z4nTWmkr
                Fixed Bouncing Bomb for full range prediction. Requires SAC 4.9 or later.
            Version: 1.03 Beta: http://pastebin.com/kZED9bqV
            Version: 1.02 Beta: http://pastebin.com/5CzSRtdL
            Version: 1.01 Beta: http://pastebin.com/hx2RYDaQ
            Version: 1.0 Beta: http://pastebin.com/bGa23bFR
--]]

if myHero.charName ~= "Ziggs" then return end

local Target

-- Prediction
local QRange = 850
local QMaxRange = 1400
local WRange = 1000
local ERange = 900
local RRange = 5300

local QSpeed = 1.722 -- Old: 1.2
local WSpeed = 1.727 -- Old: 1.5
local ESpeed = 2.694 -- Old: 1.45
local RSpeed = 1.856 -- Old: 1.5

local QWidth = 150
local WWidth = 225
local EWidth = 250
local RWidth = 550

local QDelay = 218
local WDelay = 249
local EDelay = 125
local RDelay = 1014

local SkillQ = {spellKey = _Q, range = QMaxRange, speed = QSpeed, delay = QDelay, width = QWidth, configName = "bouncingbomb", displayName = "Q (Bouncing Bomb)", enabled = true, skillShot = true, minions = false, reset = false, reqTarget = true }
local SkillW = {spellKey = _W, range = WRange, speed = WSpeed, delay = WDelay, width = WWidth, configName = "satchelcharge", displayName = "W (Satchel Charge)", enabled = true, skillShot = true, minions = false, reset = false, reqTarget = false }
local SkillE = {spellKey = _E, range = ERange, speed = ESpeed, delay = EDelay, width = EWidth, configName = "hexplosiveminefield", displayName = "E (Hexplosive Minefield)", enabled = true, skillShot = true, minions = false, reset = false, reqTarget = false }
local SkillR = {spellKey = _R, range = RRange, speed = RSpeed, delay = RDelay, width = RWidth, configName = "megainfernobomb", displayName = "R (Mega Inferno Bomb)", enabled = true, skillShot = true, minions = false, reset = false, reqTarget = true }
local SkillR = {spellKey = _R, range = RRange, speed = RSpeed, delay = RDelay, width = RWidth, configName = "megainfernobomb", displayName = "R (Mega Inferno Bomb)", enabled = true, skillShot = true, minions = false, reset = false, reqTarget = true }

local KeyQ = string.byte("Q")
local KeyW = string.byte("W")
local KeyE = string.byte("E")
local KeyR = string.byte("R")

local tick = nil
local doUlt = false

-- Draw
local waittxt = {}
local calculationenemy = 1
local floattext = {"Skills not available", "Able to fight", "Killable", "Murder him!"}
local killable = {}

local ignite = nil
local DFGSlot, HXGSlot, BWCSlot, SheenSlot, TrinitySlot, LichBaneSlot = nil, nil, nil, nil, nil, nil
local QReady, WReady, EReady, RReady, DFGReady, HXGReady, BWCReady, IReady = false, false, false, false, false, false, false, false

local satchelChargeExists = false
local pendingSatchelChargeActivation = nil
local debugMode = false

-- Main

function Menu()
    AutoCarry.PluginMenu:addParam("ZiggsCombo", "Combo", SCRIPT_PARAM_ONKEYDOWN, false, 32)
    AutoCarry.PluginMenu:addParam("FullCombo", "Full Combo", SCRIPT_PARAM_ONKEYDOWN, false, string.byte("Z"))
    AutoCarry.PluginMenu:addParam("Harass", "Harass", SCRIPT_PARAM_ONKEYDOWN, false, string.byte("A"))
    AutoCarry.PluginMenu:addParam("SatchelJump", "Satchel Jump", SCRIPT_PARAM_ONKEYDOWN, false, string.byte("T"))
    AutoCarry.PluginMenu:addParam("AutoHarass", "Auto Harass (Mana Intensive)", SCRIPT_PARAM_ONOFF, false)
    AutoCarry.PluginMenu:addParam("Ultimate", "Use Ultimate with Combo", SCRIPT_PARAM_ONOFF, true)
    AutoCarry.PluginMenu:addParam("Killsteal", "Ultimate Mega Killsteal", SCRIPT_PARAM_ONOFF, true)
    AutoCarry.PluginMenu:addParam("KillstealMinHitchance", "Killsteal Min. Req. Hitchance", SCRIPT_PARAM_SLICE, 60, 0, 90, 0)
    AutoCarry.PluginMenu:addParam("DrawKillablEenemy", "Draw Killable Enemy", SCRIPT_PARAM_ONOFF, true)
    AutoCarry.PluginMenu:addParam("DrawText", "Draw Text", SCRIPT_PARAM_ONOFF, true)
    AutoCarry.PluginMenu:addParam("DrawPrediction", "Draw Prediction", SCRIPT_PARAM_ONOFF, true)
    AutoCarry.PluginMenu:addParam("Draw", "Draw range circles", SCRIPT_PARAM_ONOFF, true)
    AutoCarry.PluginMenu:addParam("DrawUlt", "Draw Ult range circle", SCRIPT_PARAM_ONOFF, true)
end

function PluginOnLoad()
    Menu()

    AutoCarry.SkillsCrosshair.range = QMaxRange

    if myHero:GetSpellData(SUMMONER_1).name:find("SummonerDot") then ignite = SUMMONER_1
    elseif myHero:GetSpellData(SUMMONER_2).name:find("SummonerDot") then ignite = SUMMONER_2 end
    for i=1, heroManager.iCount do waittxt[i] = i*3 end
end

function PluginOnTick()
    Target = AutoCarry.GetAttackTarget(true)

    SpellCheck()

    if tick == nil or GetTickCount()-tick >= 200 then
        tick = GetTickCount()
        CalculateDamage()
    end

    if AutoCarry.PluginMenu.SatchelJump then
        SatchelJump()
    end

    if (AutoCarry.MainMenu.AutoCarry or AutoCarry.MainMenu.MixedMode) then
        Combo()
    end

    if AutoCarry.PluginMenu.FullCombo then
        FullCombo()
    end

    if AutoCarry.PluginMenu.Harass then
        Harass()
    end

    if AutoCarry.PluginMenu.Killsteal then
        KillSteal()
    end
end

function PluginOnCreateObj(obj)
    if obj.name == "ZiggsW_mis_ground.troy" then
        satchelChargeExists = true
        CastWActivate()
    end
end

function PluginOnDeleteObj(obj)
    if obj.name == "ZiggsW_mis_ground.troy" then
        satchelChargeExists = false
        pendingSatchelChargeActivation = nil
    end
end

function OnAttacked()
    -- AA > Q > AA
    if AutoCarry.PluginMenu.AutoHarass then
        CastQ()
    end
end

function SpellCheck()
    DFGSlot, HXGSlot, BWCSlot, SheenSlot, TrinitySlot, LichBaneSlot = GetInventorySlotItem(3128),
    GetInventorySlotItem(3146), GetInventorySlotItem(3144), GetInventorySlotItem(3057),
    GetInventorySlotItem(3078), GetInventorySlotItem(3100)

    QReady = (myHero:CanUseSpell(SkillQ.spellKey) == READY)
    WReady = (myHero:CanUseSpell(SkillW.spellKey) == READY)
    EReady = (myHero:CanUseSpell(SkillE.spellKey) == READY)
    RReady = (myHero:CanUseSpell(SkillR.spellKey) == READY)

    DFGReady = (DFGSlot ~= nil and myHero:CanUseSpell(DFGSlot) == READY)
    HXGReady = (HXGSlot ~= nil and myHero:CanUseSpell(HXGSlot) == READY)
    BWCReady = (BWCSlot ~= nil and myHero:CanUseSpell(BWCSlot) == READY)
    IReady = (ignite ~= nil and myHero:CanUseSpell(ignite) == READY)
end

-- Handle SBTW Skill Shots

function Combo()
    CastSlots()
    CastE()
    CastQ()
    if AutoCarry.PluginMenu.Ultimate and doUlt then
        CastR()
    end
end

function FullCombo()
    CastSlots()
    CastE()
    CastQ()
    CastW()
    CastWActivate()
    if AutoCarry.PluginMenu.Ultimate and doUlt then
        CastR()
    end
end

function CastSlots()
    if Target ~= nil and not Target.dead then
        if GetDistance(Target) <= QMaxRange then
            if DFGReady then CastSpell(DFGSlot, Target) end
            if HXGReady then CastSpell(HXGSlot, Target) end
            if BWCReady then CastSpell(BWCSlot, Target) end
        end
    end
end

function Harass()
    CastQ()
end

function CastQ()
    if Target ~= nil and not Target.dead then
        if QReady and ValidTarget(Target, QRange) then
            AutoCarry.CastSkillshot(SkillQ, Target)
        elseif QReady and ValidTarget(Target, QMaxRange) then
            -- Full Bouncing Bomb three bounce range
            local PredictedPos = AutoCarry.GetPrediction(SkillQ, Target)

            if PredictedPos and AutoCarry.IsValidHitChance(SkillQ, Target) then
                local MyPos = Vector(myHero.x, myHero.y, myHero.z)
                local EnemyPos = Vector(PredictedPos.x, PredictedPos.y, PredictedPos.z)
                local CastPos = MyPos - (MyPos - EnemyPos):normalized() * QRange
                if CastPos then CastSpell(SkillQ.spellKey, CastPos.x, CastPos.z) end
            end
        end
    end
end

function CastW(noTarget)
    if noTarget and WReady then
        AutoCarry.CastSkillshot(SkillW, myHero)
    elseif Target ~= nil and ValidTarget(Target, WRange) and not Target.dead then
        if WReady and GetDistance(Target) <= WRange then
            AutoCarry.CastSkillshot(SkillW, Target)
        end
    end
end

function CastWActivate()
    if satchelChargeExists and pendingSatchelChargeActivation ~= nil then
        if pendingSatchelChargeActivation == "satcheljump" then
            local delayTime = 75
            local endClockTime = GetTickCount() + delayTime
            while (GetTickCount() < endClockTime) do
                -- Sleep
            end

            CastSpell(SkillW.spellKey)
            CastE()
            pendingSatchelChargeActivation = nil
        end
    end
end

function CastE()
    if Target ~= nil and ValidTarget(Target, ERange) and not Target.dead then
        if EReady and GetDistance(Target) <= ERange then
            AutoCarry.CastSkillshot(SkillE, Target)
        end
    end
end

function CastR()
    if Target ~= nil and ValidTarget(Target, RRange) and not Target.dead then
        if RReady and GetDistance(Target) <= RRange then
            AutoCarry.CastSkillshot(SkillR, Target)
        end
    end
end

function KillSteal()
    for _, enemy in pairs(AutoCarry.EnemyTable) do
        if ValidTarget(enemy, RRange) and not enemy.dead then
            if (enemy.health + 20) < getDmg("R", enemy, myHero) and IsValidHitChanceCustom(SkillR, enemy) then
                if RReady then
                    Message.AddMessage("Killsteal!", ColorARGB.Green, myHero)
                    if debugMode then PrintChat("Killsteal") end
                    AutoCarry.CastSkillshot(SkillR, enemy)
                end
            end
        end
    end
end

function SatchelJump()
    -- E is cast before and after jump to insure that a target near either location can be hit.
    pendingSatchelChargeActivation = "satcheljump"
    CastW(true)
    CastE()
end

-- Sliding scale hitchance based on target distance.
function getScalingHitChanceFromDistance(SkillRange, Target)
    local minHitChance = AutoCarry.PluginMenu.KillstealMinHitchance
    local maxHitChance = 95

    hitChance = minHitChance + ((1 - (SkillRange - GetDistance(Target)) / (SkillRange - 0))) * (maxHitChance - minHitChance)
    if debugMode then PrintChat("HitChance Info: skillrange="..SkillRange..", targetdistance="..GetDistance(Target)..", hitchance:"..hitChance) end
    return hitChance
end

function IsValidHitChanceCustom(skill, target)
    if VIP_USER then
        pred = TargetPredictionVIP(skill.range, skill.speed*1000, skill.delay/1000, skill.width)
        return pred:GetHitChance(target) > getScalingHitChanceFromDistance(skill.range, target)/100 and true or false
    elseif not VIP_USER then
        local nonVIPMaxHitChance = 70
        return getScalingHitChanceFromDistance(skill.range, target) < nonVIPMaxHitChance and true or false
    end
end

--[[
function satchelChargeExistsDelete()
    for i=1, objManager.maxObjects do
        local obj = objManager:getObject(i)

        if obj ~= nil and obj.name:find("Satchel Charge") then
            return true
        end
    end
    return false
end
--]]

-- Handle Manual Skill Shots

function PluginOnWndMsg(msg,key)
    Target = AutoCarry.GetAttackTarget()
    if Target ~= nil then
        if msg == KEY_DOWN and key == KeyQ then CastQ() end
        if msg == KEY_DOWN and key == KeyW then CastW() end
        if msg == KEY_DOWN and key == KeyE then CastE() end
        if msg == KEY_DOWN and key == KeyR then CastR() end
    end
end

-- Drawing

function PluginOnDraw()
    if AutoCarry.PluginMenu.Draw then
        DrawCircle(myHero.x, myHero.y, myHero.z, AutoCarry.SkillsCrosshair.range, 0x808080) -- Gray

        if myHero:CanUseSpell(SkillQ.spellKey) then
            DrawCircle(myHero.x, myHero.y, myHero.z, QRange, 0x0099CC) -- Blue
        end

        if myHero:CanUseSpell(SkillW.spellKey) then
            DrawCircle(myHero.x, myHero.y, myHero.z, WRange, 0xFFFF00) -- Yellow
        end

        if myHero:CanUseSpell(SkillE.spellKey) then
            DrawCircle(myHero.x, myHero.y, myHero.z, ERange, 0x00FF00) -- Green
        end

        if AutoCarry.PluginMenu.DrawUlt then
            if myHero:CanUseSpell(SkillR.spellKey) then
                DrawCircle(myHero.x, myHero.y, myHero.z, RRange, 0xFF0000) -- Red
            end
        end

        Target = AutoCarry.GetAttackTarget()
        if Target ~= nil then
            for j=0, 10 do
                DrawCircle(Target.x, Target.y, Target.z, 40 + j*1.5, 0x00FF00) -- Green
            end
        end
    end

    DrawKillable()
end

function CalculateDamage()
        if ValidTarget(Target) then
                local dfgdamage, hxgdamage, bwcdamage, ignitedamage, Sheendamage, Trinitydamage, LichBanedamage  = 0, 0, 0, 0, 0, 0, 0
                local pdamage = getDmg("P",Target,myHero)
                local qdamage = getDmg("Q",Target,myHero)
                local wdamage = getDmg("W",Target,myHero)
                local edamage = getDmg("E",Target,myHero)
                local rdamage = getDmg("R",Target,myHero)
                local hitdamage = getDmg("AD",Target,myHero)
                local dfgdamage = (DFGSlot and getDmg("DFG",Target,myHero) or 0)
                local hxgdamage = (HXGSlot and getDmg("HXG",Target,myHero) or 0)
                local bwcdamage = (BWCSlot and getDmg("BWC",Target,myHero) or 0)
                local ignitedamage = (ignite and getDmg("IGNITE",Target,myHero) or 0)
                local Sheendamage = (SheenSlot and getDmg("SHEEN",Target,myHero) or 0)
                local Trinitydamage = (TrinitySlot and getDmg("TRINITY",Target,myHero) or 0)
                local LichBanedamage = (LichBaneSlot and getDmg("LICHBANE",Target,myHero) or 0)
                local combo1 = hitdamage + qdamage + wdamage + edamage + rdamage + Sheendamage + Trinitydamage + LichBanedamage --0 cd
                local combo2 = hitdamage + Sheendamage + Trinitydamage + LichBanedamage
                local combo3 = hitdamage + Sheendamage + Trinitydamage + LichBanedamage
                local combo4 = 0

                if QREADY then
                        combo2 = combo2 + qdamage
                        combo3 = combo3 + qdamage
                        --combo4 = combo4 + qdamage
                end
                if WREADY then
                        combo2 = combo2 + wdamage
                        combo3 = combo3 + wdamage
                end
                if EREADY then
                        combo2 = combo2 + edamage
                        combo3 = combo3 + edamage
                        --combo4 = combo4 + edamage
                end
                if RREADY then
                        combo2 = combo2 + rdamage
                        combo3 = combo3 + rdamage
                        combo4 = combo4 + rdamage
                end
                if DFGREADY then
                        combo1 = combo1 + dfgdamage
                        combo2 = combo2 + dfgdamage
                        combo3 = combo3 + dfgdamage
                        --combo4 = combo4 + dfgdamage
                end
                if HXGREADY then
                        combo1 = combo1 + hxgdamage
                        combo2 = combo2 + hxgdamage
                        combo3 = combo3 + hxgdamage
                        --combo4 = combo4 + hxgdamage
                end
                if BWCREADY then
                        combo1 = combo1 + bwcdamage
                        combo2 = combo2 + bwcdamage
                        combo3 = combo3 + bwcdamage
                        combo4 = combo4 + bwcdamage
                end
                if IREADY then
                        combo1 = combo1 + ignitedamage
                        combo2 = combo2 + ignitedamage
                        combo3 = combo3 + ignitedamage
                end
                if combo4 >= Target.health then killable[calculationenemy] = 4 doUlt = true
                elseif combo3 >= Target.health then killable[calculationenemy] = 3 doUlt = false
                elseif combo2 >= Target.health then killable[calculationenemy] = 2 doUlt = false
                elseif combo1 >= Target.health then killable[calculationenemy] = 1  doCombo = true doUlt = false
                else killable[calculationenemy] = 0 doCombo = false doUlt = false end
        end
        if calculationenemy == 1 then calculationenemy = heroManager.iCount
        else calculationenemy = calculationenemy-1 end
end

function DrawKillable()
    if 1 == 2 and Target ~= nil and AutoCarry.PluginMenu.DrawPrediction then
        if VIP_USER then
            pred = TargetPredictionVIP(SkillQ.range, SkillQ.speed*1000, SkillQ.delay/1000, SkillQ.width)
        elseif not VIP_USER then
            pred = TargetPrediction(SkillQ.range, SkillQ.speed, SkillQ.delay, SkillQ.width)
        end
        predPos = pred:GetPrediction(Target)
        DrawCircle(predPos.x, Target.y, predPos.z, 200, 0x0000FF)
    end
    for i=1, heroManager.iCount do
        local enemydraw = heroManager:GetHero(i)
        if ValidTarget(enemydraw) then
            if AutoCarry.PluginMenu.DrawKillablEenemy then
                if killable[i] == 1 then
                    for j=0, 20 do
                        DrawCircle(enemydraw.x, enemydraw.y, enemydraw.z, 80 + j*1.5, 0x0000FF)
                    end
                elseif killable[i] == 2 then
                    for j=0, 10 do
                        DrawCircle(enemydraw.x, enemydraw.y, enemydraw.z, 80 + j*1.5, 0xFF0000)
                    end
                elseif killable[i] == 3 then
                    for j=0, 10 do
                        DrawCircle(enemydraw.x, enemydraw.y, enemydraw.z, 80 + j*1.5, 0xFF0000)
                        DrawCircle(enemydraw.x, enemydraw.y, enemydraw.z, 110 + j*1.5, 0xFF0000)
                    end
                elseif killable[i] == 4 then
                    for j=0, 10 do
                        DrawCircle(enemydraw.x, enemydraw.y, enemydraw.z, 80 + j*1.5, 0xFF0000)
                        DrawCircle(enemydraw.x, enemydraw.y, enemydraw.z, 110 + j*1.5, 0xFF0000)
                        DrawCircle(enemydraw.x, enemydraw.y, enemydraw.z, 140 + j*1.5, 0xFF0000)
                    end
                end
            end
            if AutoCarry.PluginMenu.DrawText and waittxt ~= nil and waittxt[i] == 1 and killable ~= nil and killable[i] ~= 0 then
                    PrintFloatText(enemydraw,0,floattext[killable[i]])
            end
        end
        if waittxt ~= nil then
            if waittxt[i] == 1 then waittxt[i] = 30
            else waittxt[i] = waittxt[i]-1 end
        end
    end
end

class 'ColorARGB' -- {

    function ColorARGB:__init(red, green, blue, alpha)
        self.R = red or 255
        self.G = green or 255
        self.B = blue or 255
        self.A = alpha or 255
    end

    function ColorARGB.FromArgb(red, green, blue, alpha)
        return Color(red,green,blue, alpha)
    end

    function ColorARGB:ToARGB()
        return ARGB(self.A, self.R, self.G, self.B)
    end

    ColorARGB.Red = ColorARGB(255, 0, 0, 255)
    ColorARGB.Yellow = ColorARGB(255, 255, 0, 255)
    ColorARGB.Green = ColorARGB(0, 255, 0, 255)
    ColorARGB.Aqua = ColorARGB(0, 255, 255, 255)
    ColorARGB.Blue = ColorARGB(0, 0, 255, 255)
    ColorARGB.Fuchsia = ColorARGB(255, 0, 255, 255)
    ColorARGB.Black = ColorARGB(0, 0, 0, 255)
    ColorARGB.White = ColorARGB(255, 255, 255, 255)
-- }

--Notification class
class 'Message' -- {

    Message.instance = ""

    function Message:__init()
        self.notifys = {}

        AddDrawCallback(function(obj) self:OnDraw() end)
    end

    function Message.Instance()
        if Message.instance == "" then Message.instance = Message() end return Message.instance
    end

    function Message.AddMessage(text, color, target)
        return Message.Instance():PAddMessage(text, color, target)
    end

    function Message:PAddMessage(text, color, target)
        local x = 0
        local y = 200
        local tempName = "Screen"
        local tempcolor = color or ColorARGB.Red

        if target then
            tempName = target.networkID
        end

        self.notifys[tempName] = { text = text, color = tempcolor, duration = GetGameTimer() + 2, object = target}
    end

    function Message:OnDraw()
        for i, notify in pairs(self.notifys) do
            if notify.duration < GetGameTimer() then notify = nil
            else
                notify.color.A = math.floor((255/2)*(notify.duration - GetGameTimer()))

                if i == "Screen" then
                    local x = 0
                    local y = 200
                    local gameSettings = GetGameSettings()
                    if gameSettings and gameSettings.General then
                        if gameSettings.General.Width then x = gameSettings.General.Width/2 end
                        if gameSettings.General.Height then y = gameSettings.General.Height/4 - 100 end
                    end
                    --PrintChat(tostring(notify.color))
                    local p = GetTextArea(notify.text, 40).x
                    self:DrawTextWithBorder(notify.text, 40, x - p/2, y, notify.color:ToARGB(), ARGB(notify.color.A, 0, 0, 0))
                else
                    local pos = WorldToScreen(D3DXVECTOR3(notify.object.x, notify.object.y, notify.object.z))
                    local x = pos.x
                    local y = pos.y - 25
                    local p = GetTextArea(notify.text, 40).x

                    self:DrawTextWithBorder(notify.text, 30, x- p/2, y, notify.color:ToARGB(), ARGB(notify.color.A, 0, 0, 0))
                end
            end
        end
    end

    function Message:DrawTextWithBorder(textToDraw, textSize, x, y, textColor, backgroundColor)
        DrawText(textToDraw, textSize, x + 1, y, backgroundColor)
        DrawText(textToDraw, textSize, x - 1, y, backgroundColor)
        DrawText(textToDraw, textSize, x, y - 1, backgroundColor)
        DrawText(textToDraw, textSize, x, y + 1, backgroundColor)
        DrawText(textToDraw, textSize, x , y, textColor)
    end
-- }