unsigned char sprite1[] =
{0x3C,0x7E,0xFF,0xFF,0xFF,0xFF,0x7E,0x3C};

inline void draw(int x, int y) {
  Sprite8(x, y, SPRITE_HEIGHT, sprite1, LCD_MEM, SPRT_XOR);
}
void _main(void)
{
  int x=78,y=85,key;
  clrscr();
  draw(x,y);
  printf_xy (0, 0, "%d", x);
  printf_xy (20, 0, "%d", y);
  while ((key = ngetchx()) != KEY_ESC) {
    clrscr();
    
    if(x==15 && y!=1)
    {
      x+=7;
    }
    else if(x==148 && y!=1)
    {
      x-=7;
    }
    else if(y==1 && x!=15)
    {
      y+=7;
    }
    y-=7;
    x+=7;
    printf_xy (0, 0, "%d", x);
    printf_xy (20, 0, "%d", y);
    draw(x,y);
  }
}

#include <tigcclib.h>

unsigned char sprite1[] =
{0x3C,0x7E,0xFF,0xFF,0xFF,0xFF,0x7E,0x3C};

unsigned char sprite[] =
{0x20,0x70,0xF8,0xF8,0xF8,0xF8,0x70,0x20};

void draw(int x, int y) {
  Sprite8(x, y, 8, sprite1, LCD_MEM, SPRT_XOR);
}
void erase(int x, int y) {
  Sprite8(x, y, 8, sprite1, LCD_MEM, SPRT_OR);
}
short ran(void)
{
  short r=random (2);
  if (r==0) r=-1;
  return r;
}
void _main(void)
{
  int x=(LCD_WIDTH-1)/2,y=(LCD_HEIGHT-1)/2,F=0;
  short var_hor = ran(), var_ver = ran(),i=0,t=10000;
  INT_HANDLER Intrs [AUTO_INT_COUNT];
  for (F = FIRST_AUTO_INT; F <= LAST_AUTO_INT; F++)
  {
    Intrs [F - FIRST_AUTO_INT] = GetIntVec (AUTO_INT (F));
    SetIntVec (AUTO_INT (F), DUMMY_HANDLER);
  }
  ClrScr ();
  erase(x ,y);
  while (!_keytest (RR_ESC))
  {
    draw(x, y);
    
    x+=var_hor ; y+=var_ver;

    if(x+8 > LCD_WIDTH-1)
    var_hor = -1;
    if(y+8 > LCD_HEIGHT-1)
    var_ver = -1;
    if(x < 0)
    var_hor = 1;
    if(y < 0)
    {
      var_ver = 1;
      Sprite8(x, y, 8, sprite, LCD_MEM, SPRT_XOR);
    }

    if(_keytest (RR_UP))
    t-=100;
    if(_keytest (RR_DOWN))
    t+=100;

    erase(x ,y);
    for (i=0; i<t; i++);
  }
for (F = FIRST_AUTO_INT; F <= LAST_AUTO_INT; F++)
SetIntVec (AUTO_INT (F), Intrs [F - FIRST_AUTO_INT]);
}

if(x+8 > LCD_WIDTH-1)
  var_hor = -1;
if(y+8 > LCD_HEIGHT-1)
  var_ver = -1;
if(x < 0)
  var_hor = 1;
if(y < 0)
{
  var_ver = 1;
  Sprite8(x, y, 8, sprite, LCD_MEM, SPRT_XOR);
}