Unstoppable Grid Trading

							    EnableHighSpeedUpdates(true)
    HideOrderSettings()
    HideTradeAmountSettings()
     
    --===================================================================
    -- == Miscellaneous Usefulness
            
        -- deep clone an object
        function clone(original)
            local copy = {}
            for k, v in pairs(original) do
                if GetType(v) == ArrayDataType then
                    v = clone(v)
                end
                copy[k] = v
            end
            return copy
        end
     
    --===================================================================
    -- == Logger
        local LoggerLevels = {
            ErrorsOnly = 'Errors Only',
            ErrorsAndWarnings = 'Erorrs & Warnings',
            All = 'All'
        }
     
        local Logger = {
            _level = InputOptions('DEBUG Level',
                    LoggerLevels.All,
                    LoggerLevels,
                    {group = '     DEBUG'}),
            _in = 'Main',
            _prevIn = {},
            _log = Log,
            _warn = LogWarning,
            _error = LogError
        }
     
        function Logger:level()
            if Logger._level == LoggerLevels.ErrorsOnly then
                return 0
            elseif Logger._level == LoggerLevels.ErrorsAndWarnings then
                return 1
            elseif Logger._level == LoggerLevels.All then
                return 2
            end
     
            LogError('Logger level undefined: "' .. Logger._level .. '"')
        end
     
        function Logger:where()
            local ret = ''
            local prevs = self._prevIn
            if #prevs > 0 then
                for i = 1, #prevs do
                    if prevs[i] != '' and #prevs[i] > 0 then
                        ret = ret .. prevs[i] .. '::'
                    end
                end
            end
            return ret .. self._in
        end
     
        function Logger:enter(to)
            self._prevIn = ArrayAdd(self._prevIn, self._in)
            self._in = to
        end
     
        function Logger:exit()
            self._in = ArrayLast(self._prevIn)
            self._prevIn = ArrayPop(self._prevIn)
        end
     
        function Logger:log(msg, color)
            if self:level() >= 2 then
                if not color then
                    color = ''
                end
     
                local _in = Logger:where()
                self._log('['.._in..'] '..msg, color)
            end
        end
     
        function Logger:warn(msg)
            if self:level() >= 1 then
                local _in = Logger:where()
                self._warn('['.._in..'] '..msg)
            end
        end
     
        function Logger:error(msg)
            local _in = Logger:where()
            self._error('['.._in..'] '..msg)
            DeactivateBot('FCB Deactivation on Error')
        end
     
    --===================================================================
    --===================================================================
     
     
    --===================================================================
    -- == Options for inputs
        local options = {
            SpreadTypes = {
                Fixed = 'Fixed Amount',
                Percentage = 'Percentage',
                PercentageBoost = 'Percentage With Boost',
                Exponential = 'Exponential'
            },
     
            StartControlTypes = {
                AbovePrice = 'Above Price',
                BelowPrice = 'Below Price'
            },
     
            Currencies = {
                Base = 'Base',
                Quote = 'Quote'
            },