// C Source File
// Created 01/07/2005; 14:28:27
#include <tigcclib.h>
#include "sprites.h"

// Main Function

void _main(void)
{
  INT_HANDLER oldai1=GetIntVec(AUTO_INT_1);
  SetIntVec(AUTO_INT_1,DUMMY_HANDLER);
  INT_HANDLER oldai5=GetIntVec(AUTO_INT_5);
  SetIntVec(AUTO_INT_5,DUMMY_HANDLER);
  //Score des joueurs initialement
  short scoreIA=0;
  short scoreJ=0;
  debut:
  randomize();
  clrscr();
  //définition des position initiales
  short n=0;
  short ralenti=0;
  short y=0;
  y=rand()%92;
  short x=3;
  short yIA=0;
  yIA=rand()%92;
  short xb=rand()%2;
  if (xb==0)
  xb=-1;
  short yb=rand()%2;
  if (yb==0)
  yb=-1;
  short xballe=0;
  short yballe=0;
  xballe=(rand()%60)+50;
  yballe=(rand()%40)+30;
  char buffer[10];
  do
  {
    sprintf(buffer,"%i",scoreJ);
    DrawStr (75,2,buffer,A_NORMAL);
    sprintf(buffer,"%i",scoreIA);
    DrawStr (85,2,buffer,A_NORMAL);
    //ralentissement du jeu
    for(ralenti=0 ; ralenti<7500 ; ralenti++)
      {
      }
    //Mouvement de la balle
    Sprite8(xballe,yballe,8,balle,LCD_MEM,SPRT_XOR);
    xballe=xballe+xb;
    yballe=yballe+yb;
    if(yballe==1||yballe==93)
    yb=-yb;
    //Mouvement du joueur
    if(_keytest(RR_UP) && y>1)
    {
      Sprite8(x,y,8,raq,LCD_MEM,SPRT_XOR);
      y--;  
    }
    if(_keytest(RR_DOWN) && y<91)
    {
      Sprite8(x,y,8,raq,LCD_MEM,SPRT_XOR);
      y++;
    }
    if(_keytest(RR_LEFT) && x>0)
    {
      Sprite8(x,y,8,raq,LCD_MEM,SPRT_XOR);
      x--;
    }
    if(_keytest(RR_RIGHT) && x<8)
    {
      Sprite8(x,y,8,raq,LCD_MEM,SPRT_XOR);
      x++;
    }
    //Mouvement de l'IA
    if(xballe>100)
    {
      if(yIA<yballe)
      {
        Sprite8(148,yIA,8,raq,LCD_MEM,SPRT_XOR);
        yIA++;
      }
      if(yIA>yballe)
      {
        Sprite8(148,yIA,8,raq,LCD_MEM,SPRT_XOR);
        yIA--;
      }
    }
    //sprite balle et raquette
    Sprite8(xballe,yballe,8,balle,LCD_MEM,SPRT_OR);
    Sprite8(x,y,8,raq,LCD_MEM,SPRT_OR);
    Sprite8(148,yIA,8,raq,LCD_MEM,SPRT_OR);
    //rebondissement de la balle sur les raquettes
    if(xballe+1>x+3 && xballe<x+7)
    {
       if(yballe>y-5 && yballe<y+13)
       xb=-xb;
    }
    if(xballe+7<151 && xballe>142)
    {
       if(yballe>yIA-5 && yballe<yIA+13)
       xb=-xb;
    }
    //detection de la mort distribution des scores
    if(xballe<-3)
    {
      scoreIA++;
      goto debut;
    }
    if(xballe>159)
    {
      scoreJ++;
      goto debut;
    }
  }while (!_keytest(RR_ESC));
  SetIntVec(AUTO_INT_1,oldai1);
  SetIntVec(AUTO_INT_5,oldai5);
}

  short xb=((rand()%2)<<1)-1;

  short xb=rand()%2;
  if (xb==0)
  xb=-1;

short xb = (rand() & 2) - 1