#include <iostream>
#include <cstdlib>
#include <vector>

using namespace std;

void toBinary(int integer, vector<int>* vector)
{    
    integer = abs(integer);
    for (int i = 0; integer > 0; i++)
    {
        vector->insert(vector->begin(), integer % 2);
        integer /= 2;
    }
}

int toInt(vector<int>* vec)
{
    int result = 0;
    for (int i = vec->size()-1; i >=0; i--)
    {
        if (vec->at(vec->size()-1-i))
        {
            result += pow(2, i);
        }
    }
    return result;
}

double toDouble(vector<int>* vec)
{
    double result=0;
    for (int i = vec->size()-1; i >= 0; i--)
    {
        result += vec->at(i);
        result /= 2;
    }
    return result;
}

double Binary80ToDouble(vector<int> vec)
{
    vector<int> integerPart;
    vector<int> doublePart;
    vector<int> exponenta(15);
    int exp = 0;

    for (int i = 0; i < 15; i++)
    {
        exponenta[i] = vec[i + 1];
    }

    exp = toInt(&exponenta);
    exp -= 16383;

    vector<int> temp(64);
    int n = 0;
    for (int i = 0; i < 63; i++)
    {
        n++;
        temp[i] = vec[i + 17];
    }

    integerPart.push_back(1);
    for (int i = 0; i < exp; i++)
    {
        integerPart.push_back(temp[i]);
    }

    for (int i = integerPart.size()-1; i < temp.size(); i++)
    {
        doublePart.push_back(temp[i]);
    }

    int integer = toInt(&integerPart);
    double fl = toDouble(&doublePart);

    //cout << endl << "integer part: " << integer << endl << "double part: " << fl << endl;

    fl += integer;

    //cout << "full number: " << fl << endl;
    if (vec[0] == 1)
    {
        fl *= -1;
    }
    return fl;
}

vector<int> doubleToBinary80(double number)
{
    int integer = (int)number;
    int exp;
    double fl = number - integer;
    vector<int> integerPart;
    vector<int> doublePart;
    vector<int> exponenta;
    vector<int> fullBinaryNumber(80);

    toBinary(integer, &integerPart);

    if (integerPart.size() > 1)
    {
        exp = integerPart.size() - 1;
    }

    exp += 16383;

    integer = abs(integer);
    fl = abs(fl);

    toBinary(exp, &exponenta);

    for (int i = 0; i < 80 - 16 - integerPart.size(); i++)
    {
        fl *= 2;
        if (fl >= 1)
        {
            doublePart.push_back(1);
            fl -= 1;
        }
        else
        {
            doublePart.push_back(0);
        }
        if (fl == 0) break;
    }

    if (number > 0)
    {
        fullBinaryNumber[0] = 0;
    }
    else
    {
        fullBinaryNumber[0] = 1;
    }

    for (int i = 0; i < exponenta.size(); i++)
    {
        fullBinaryNumber[i + 1] = exponenta[i];
    }
    fullBinaryNumber[17] = 1;
    for (int i = 0; i < integerPart.size(); i++)
    {
        fullBinaryNumber[i + 16] = integerPart[i];
    }

    for (int i = 0; i < doublePart.size(); i++)
    {
        int temp = 16 + integerPart.size() + i;
        fullBinaryNumber[temp] = doublePart[i];
    }

    for each(auto var in integerPart)
    {
        cout << var;
    }
    cout << endl;
    for each(auto var in doublePart)
    {
        cout << var;
    }
    cout << endl;

    return fullBinaryNumber;
}

int main()
{

    vector<int> fullBinaryNumber = doubleToBinary80(-17.27800688);
    int del = 0;
    for each (int var in fullBinaryNumber)
    {
        if (del % 4 == 0) cout << " ";
        del++;
        cout << var;
    }
    cout << endl;
    double number = Binary80ToDouble(fullBinaryNumber);
    cout << number;


    /*double fl = 4;
    int in = 3;
    __asm {
            fld fl
            fild in
            fdiv st(0), st(1)
            fst fl
    }

    cout << fl;*/


    system("pause>>void");
}