#include "wings.h"
#include "maths.h"

#include "display.h" // bopti.h => images // tales.h => fonts
#include "keyboard.h"
#include "timer.h"
#include "gray.h"

#include "stdio.h"
#include "stdlib.h"

#define SIZE_MAP_X 256
#define SIZE_MAP_Y 256

#define MAX_PLANES 3

Plane planes[MAX_PLANES]; // number of planes in the map (with us)
//others planes are controlled by the AI

extern image_t plane;
extern image_t img_menu;
extern image_t cloud;
extern image_t missiles;

int main()
{
    menu();
    return 1;
}

void init()
{
    unsigned char i,j;

    for(i = 0; i < MAX_PLANES; i++)
    {
        planes[i].x = 56 + 16 * i;
        planes[i].y = 24 + i;
        planes[i].dir = i;
        planes[i].life = 100;
        planes[i].reload = 6;

        for(j = 0; j < MAX_MISSILES; j++)
        {
            planes[i].missiles[j].distance = 0;
            planes[i].missiles[j].dir = planes[i].dir;
            planes[i].missiles[j].type = 0;
        }
    }
}

void AI() // iA start
{
    unsigned char i;

    for(i = 1; i < MAX_PLANES; i++)
    {

    }
}

int menu()
{
    unsigned char menu = 0;
    unsigned int key = 0;

    while(1)
    {
        dclear();

        dimage(0, 0, &img_menu);
        drect(67 + menu * 19, 10 + menu * 27, 100 + menu * 19, 25 + menu * 27, color_invert);

        dupdate();

        key = getkey();

        switch (key)
        {
            case KEY_UP : case KEY_DOWN : menu = !menu; break;
            case KEY_EXE :
                {
                    if (!menu)
                        {
                            game(); break;
                        }
                    else return 1;
                }
            case KEY_EXIT : return 1;
        }
    }
}

void *update_frame()
{
    static unsigned char i,j;
    static short decalx = 0;
    static short decaly = 0;

    dclear();

        switch(planes[0].dir)
        {
            case 0 : decalx--; break;
            case 1 : decalx--; decaly++; break;
            case 2 : decaly++; break;
            case 3 : decalx++; decaly++; break;
            case 4 : decalx++; break;
            case 5 : decalx++; decaly--; break;
            case 6 : decaly--; break;
            case 7 : decalx--; decaly--; break;
        }



    dimage_part(planes[0].x, planes[0].y, &plane, 16*planes[0].dir, 0, 16, 16);

    for(i = 1; i < MAX_PLANES; i++)
    {
    //    dimage_part(planes[i].x + decalx, planes[i].y + decaly, &plane, 16*planes[i].dir, 0, 16, 16);
        dimage(planes[i].x + decalx, planes[i].y + decaly, &plane);
    }

    dimage(10 + decalx, 10 + decaly, &cloud);

    for (i = 0; i < MAX_PLANES; i++)
    {
        for(j = 0; j < MAX_MISSILES; j++)
        {
        dimage_part(planes[i].x + 4 + (planes[i].missiles[j].distance + 15) * fcos(planes[i].missiles[j].dir),
                    planes[i].y + 4 - (planes[i].missiles[j].distance + 15) * fsin(planes[i].missiles[j].dir),
                    &missiles, 8 * planes[i].missiles[j].dir, 0, 8, 8);

        planes[i].missiles[j].distance++;
        }
    }

    dupdate();
}

int game()
{
    unsigned char fire = 0; // fire disable
    unsigned char sum = 0;

    int keys[3];

    unsigned char i;
    unsigned char j;

    j = 0;

    init(); // initialisation

    timer_t *timer = NULL;

    timer = timer_create(40, 0);
    timer_attach(timer, &update_frame, NULL);
    timer_start(timer);



    while(1)
    {
        multigetkey(keys, 3, 0);

        sum = 0;

        for(i = 0; i < 3; i++)
        {
            switch(keys[i])
            {
                case KEY_UP : case KEY_DOWN : case KEY_LEFT : case KEY_RIGHT :
                {
                    sum += keys[i]; // to know which replay keys pressed
                    break;
                }

                case KEY_SHIFT : fire = 1; break; // fire enable
                case KEY_EXIT :
                {
                    timer_stop(timer); // virtual timer stopped
                    return 1; // good bye, see you soon
                }
            }
        }

// we determine the direction of the plane

        switch(sum)
        {
            case KEY_RIGHT :
            {
                planes[0].dir = 0;
                break;
            }
            case KEY_UP + KEY_RIGHT :
            {
                planes[0].dir = 1;
                break;
            }
            case KEY_UP :
            {
                planes[0].dir = 2;
                break;
            }
            case KEY_UP + KEY_LEFT :
            {
                planes[0].dir = 3;
                break;
            }
            case KEY_LEFT :
            {
                planes[0].dir = 4;
                break;
            }
            case KEY_DOWN + KEY_LEFT :
            {
                planes[0].dir = 5;
                break;
            }
            case KEY_DOWN :
            {
                planes[0].dir = 6;
                break;
            }
            case KEY_DOWN + KEY_RIGHT :
            {
                planes[0].dir = 7;
                break;
            }
        }

        if(fire) // put the screen on fire !
        {
            planes[0].missiles[j].dir = planes[0].dir; // the missile take the direction of the plane
            planes[0].missiles[j].distance = 0; // fire unlimited (nearly)

            j = j + 1;

            if(j >= MAX_MISSILES)
            {
                j = 0;
            }

            fire = 0; // fire disable, shoot one by one // this code line will depend if we shoot in continue
        }
    }
}