pragma solidity ^0.4.15;

contract ERC20 {
  uint public totalSupply;
  function balanceOf(address who) constant returns (uint);
  function allowance(address owner, address spender) constant returns (uint);

  function transfer(address to, uint value) returns (bool ok);
  function transferFrom(address from, address to, uint value) returns (bool ok);
  function approve(address spender, uint value) returns (bool ok);
  event Transfer(address indexed from, address indexed to, uint value);
  event Approval(address indexed owner, address indexed spender, uint value);
}

/**
 * Math operations with safety checks
 */
contract SafeMath {
  function safeMul(uint a, uint b) internal returns (uint) {
    uint c = a * b;
    assert(a == 0 || c / a == b);
    return c;
  }

  function safeDiv(uint a, uint b) internal returns (uint) {
    assert(b > 0);
    uint c = a / b;
    assert(a == b * c + a % b);
    return c;
  }

  function safeSub(uint a, uint b) internal returns (uint) {
    assert(b <= a);
    return a - b;
  }

  function safeAdd(uint a, uint b) internal returns (uint) {
    uint c = a + b;
    assert(c>=a && c>=b);
    return c;
  }

  function max64(uint64 a, uint64 b) internal constant returns (uint64) {
    return a >= b ? a : b;
  }

  function min64(uint64 a, uint64 b) internal constant returns (uint64) {
    return a < b ? a : b;
  }

  function max256(uint256 a, uint256 b) internal constant returns (uint256) {
    return a >= b ? a : b;
  }

  function min256(uint256 a, uint256 b) internal constant returns (uint256) {
    return a < b ? a : b;
  }

}

contract StandardToken is ERC20, SafeMath {

  /* Token supply got increased and a new owner received these tokens */
  event Minted(address receiver, uint amount);

  /* Actual balances of token holders */
  mapping(address => uint) balances;

  /* approve() allowances */
  mapping (address => mapping (address => uint)) allowed;

  /* Interface declaration */
  function isToken() public constant returns (bool weAre) {
    return true;
  }

  function transfer(address _to, uint _value) returns (bool success) {
    balances[msg.sender] = safeSub(balances[msg.sender], _value);
    balances[_to] = safeAdd(balances[_to], _value);
    Transfer(msg.sender, _to, _value);
    return true;
  }

  function transferFrom(address _from, address _to, uint _value) returns (bool success) {
    uint _allowance = allowed[_from][msg.sender];

    balances[_to] = safeAdd(balances[_to], _value);
    balances[_from] = safeSub(balances[_from], _value);
    allowed[_from][msg.sender] = safeSub(_allowance, _value);
    Transfer(_from, _to, _value);
    return true;
  }

  function balanceOf(address _owner) constant returns (uint balance) {
    return balances[_owner];
  }

  function approve(address _spender, uint _value) returns (bool success) {

    // To change the approve amount you first have to reduce the addresses`
    //  allowance to zero by calling `approve(_spender, 0)` if it is not
    //  already 0 to mitigate the race condition described here:
    //  https://github.com/ethereum/EIPs/issues/20#issuecomment-263524729
    require((_value == 0) || (allowed[msg.sender][_spender] == 0));

    allowed[msg.sender][_spender] = _value;
    Approval(msg.sender, _spender, _value);
    return true;
  }

  function allowance(address _owner, address _spender) constant returns (uint remaining) {
    return allowed[_owner][_spender];
  }

}

contract QVT is StandardToken {

    string public name = "Hopr Protocol";
    string public symbol = "HOPR";
    uint public decimals = 18;
    uint public multiplier = 1000000000000000000; // two decimals to the left

    /**
     * Boolean contract states
     */
    bool public halted = false; //the founder address can set this to true to halt the crowdsale due to emergency
    bool public freeze = true; //Freeze state

    uint public roundCount = 1; //Round state
    bool public isDayFirst = false; //Pre-ico state
    bool public isDaySecond = false; //Pre-ico state
    bool public isDayThird = false; //Pre-ico state
    bool public isPreSale = false; // Pre-sale bonus

    /**
     * Initial founder address (set in constructor)
     * All deposited ETH will be forwarded to this address.
     * Address is a multisig wallet.
     */
    address public founder = 0xa55060935Dc112207776F7c9753E4Ef36f81361A;
    address public owner = 0xa55060935Dc112207776F7c9753E4Ef36f81361A;

    /**
     * Token count
     */
    uint public totalTokens = 8520000;
    uint public team = 3420000;
    uint public bounty = 180000 * multiplier; // Bounty count
    uint public preIcoSold = 0;

    /**
     * Ico and pre-ico cap
     */
    uint public icoCap = 18000000; // Max amount raised during crowdsale 18000 ether

    /**
     * Statistic values
     */
    uint public presaleTokenSupply = 0; // This will keep track of the token supply created during the crowdsale
    uint public presaleEtherRaised = 0; // This will keep track of the Ether raised during the crowdsale

    event Buy(address indexed sender, uint eth, uint fbt);

    /* This generates a public event on the blockchain that will notify clients */
    event TokensSent(address indexed to, uint256 value);
    event ContributionReceived(address indexed to, uint256 value);
    event Burn(address indexed from, uint256 value);

    function QVT(address _founder) payable {
        owner = msg.sender;
        founder = _founder;

        team = safeMul(team, multiplier);

        // Total supply is 18000000
        totalSupply = safeMul(totalTokens, multiplier);
        balances[owner] = safeSub(totalSupply, team);

        // Move team token pool to founder balance
        balances[founder] = team;

        TokensSent(founder, team);
        Transfer(owner, founder, team);
    }

    /**
     * 1 QVT = 1 FINNEY
     * Rrice is 1000 Qvolta for 1 ETH
     */
    function price() constant returns (uint){
        return 1 finney;
    }

    /**
      * The basic entry point to participate the crowdsale process.
      *
      * Pay for funding, get invested tokens back in the sender address.
      */
    function buy() public payable returns(bool) {
        processBuy(msg.sender, msg.value);

        return true;
    }

    function processBuy(address _to, uint256 _value) internal returns(bool) {
        // Buy allowed if contract is not on halt
        require(!halted);
        // Amount of wei should be more that 0
        require(_value>0);

        // Count expected tokens price
        uint tokens = _value / price();

        // Total tokens should be more than user want's to buy
        require(balances[owner]>safeMul(tokens, multiplier));

        // Gave pre-sale bonus
        if (isPreSale) {
            tokens = tokens + (tokens / 2);
        }

        // Gave +30% of tokents on first day
        if (isDayFirst) {
            tokens = tokens + safeMul(safeDiv(tokens, 10), 3);
        }

        // Gave +20% of tokents on second day
        if (isDaySecond) {
            tokens = tokens + safeDiv(tokens, 5);
        }

        // Gave +10% of tokents on third day
        if (isDayThird) {
            tokens = tokens + safeDiv(tokens, 10);
        }

        // Check that required tokens count are less than tokens already sold on ico sub pre-ico
        require(safeAdd(presaleTokenSupply, tokens) < icoCap);

        // Send wei to founder address
        founder.transfer(_value);

        // Add tokens to user balance and remove from totalSupply
        balances[_to] = safeAdd(balances[_to], safeMul(tokens, multiplier));
        // Remove sold tokens from total supply count
        balances[owner] = safeSub(balances[owner], safeMul(tokens, multiplier));

        presaleTokenSupply = safeAdd(presaleTokenSupply, tokens);
        presaleEtherRaised = safeAdd(presaleEtherRaised, _value);

        // /* Emit log events */
        Buy(_to, _value, safeMul(tokens, multiplier));
        TokensSent(_to, safeMul(tokens, multiplier));
        ContributionReceived(_to, _value);
        Transfer(owner, _to, safeMul(tokens, multiplier));

        return true;
    }

    /**
     * Emit log events
     */
    function sendEvents(address to, uint256 value, uint tokens) internal {
        // Send buy Qvolta token action
        Buy(to, value, safeMul(tokens, multiplier));
        TokensSent(to, safeMul(tokens, multiplier));
        ContributionReceived(to, value);
        Transfer(owner, to, safeMul(tokens, multiplier));
    }

    /**
     * Run mass transfers with pre-ico *2 bonus
     */
    function proceedPreIcoTransactions(address[] toArray, uint[] valueArray) onlyOwner() {
        uint tokens = 0;
        address to = 0x0;
        uint value = 0;

        for (uint i = 0; i < toArray.length; i++) {
            to = toArray[i];
            value = valueArray[i];
            tokens = value / price();
            tokens = tokens + tokens;
            balances[to] = safeAdd(balances[to], safeMul(tokens, multiplier));
            balances[owner] = safeSub(balances[owner], safeMul(tokens, multiplier));
            preIcoSold = safeAdd(preIcoSold, tokens);
            sendEvents(to, value, tokens);
        }
    }

    /**
     * Emergency Stop ICO.
     */
    function halt() onlyOwner() {
        halted = true;
    }

    function unHalt() onlyOwner() {
        halted = false;
    }

    /**
     * Transfer team tokens to target address
     */
    function sendBounty(address _to, uint256 _value) onlyOwner() {
        require(bounty > _value);

        bounty = safeSub(bounty, _value);
        balances[_to] = safeAdd(balances[_to], safeMul(_value, multiplier));
        // /* Emit log events */
        TokensSent(_to, safeMul(_value, multiplier));
        Transfer(owner, _to, safeMul(_value, multiplier));
    }

    /**
     * Transfer bounty to target address from bounty pool
     */
    function sendSupplyTokens(address _to, uint256 _value) onlyOwner() {
        balances[owner] = safeSub(balances[owner], safeMul(_value, multiplier));
        balances[_to] = safeAdd(balances[_to], safeMul(_value, multiplier));

        // /* Emit log events */
        TokensSent(_to, safeMul(_value, multiplier));
        Transfer(owner, _to, safeMul(_value, multiplier));
    }

    /**
     * ERC 20 Standard Token interface transfer function
     *
     * Prevent transfers until halt period is over.
     */
    function transfer(address _to, uint256 _value) isAvailable() returns (bool success) {
        return super.transfer(_to, _value);
    }

    /**
     * ERC 20 Standard Token interface transfer function
     *
     * Prevent transfers until halt period is over.
     */
    function transferFrom(address _from, address _to, uint256 _value) isAvailable() returns (bool success) {
        return super.transferFrom(_from, _to, _value);
    }

    /**
     * Burn all tokens from a balance.
     */
    function burnRemainingTokens() isAvailable() onlyOwner() {
        Burn(owner, balances[owner]);
        balances[owner] = 0;
    }

    /**
     * Set day first bonus
     */
    function setDayFirst() onlyOwner() {
        isDayFirst = true;
        isDaySecond = false;
        isDayThird = false;
    }

    /**
     * Set day second bonus
     */
    function setDaySecond() onlyOwner() {
        isDayFirst = false;
        isDaySecond = true;
        isDayThird = false;
    }

    /**
     * Set day first bonus
     */
    function setDayThird() onlyOwner() {
        isDayFirst = false;
        isDaySecond = false;
        isDayThird = true;
    }

    /**
     * Set day first bonus
     */
    function setBonusOff() onlyOwner() {
        isDayFirst = false;
        isDaySecond = false;
        isDayThird = false;
    }

   /**
    * Set pre-sale bonus
    */
   function setPreSaleOn() onlyOwner() {
       isPreSale = true;
   }

   /**
    * Set pre-sale bonus off
    */
   function setPreSaleOff() onlyOwner() {
       isPreSale = false;
   }

    /**
     * Start new investment round
     */
    function startNewRound() onlyOwner() {
        require(roundCount < 5);
        roundCount = roundCount + 1;

        balances[owner] = safeAdd(balances[owner], safeMul(icoCap, multiplier));
    }

    modifier onlyOwner() {
        require(msg.sender == owner);
        _;
    }

    modifier isAvailable() {
        require(!halted && !freeze);
        _;
    }

    /**
     * Just being sent some cash? Let's buy tokens
     */
    function() payable {
        buy();
    }

    /**
     * Freeze and unfreeze ICO.
     */
    function freeze() onlyOwner() {
         freeze = true;
    }

     function unFreeze() onlyOwner() {
         freeze = false;
     }

    /**
     * Replaces an owner
     */
    function changeOwner(address _to) onlyOwner() {
        balances[_to] = balances[owner];
        balances[owner] = 0;
        owner = _to;
    }

    /**
     * Replaces a founder, transfer team pool to new founder balance
     */
    function changeFounder(address _to) onlyOwner() {
        balances[_to] = balances[founder];
        balances[founder] = 0;
        founder = _to;
    }
}