You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

119 lines
2.0 KiB

/** @file steer1.c
@author M.P. Hayes
@date 28 Aug 2008
@defgroup steer1 Simple steering program using navswitchs
*/
#include "system.h"
#include "navswitch.h"
#include "tinygl.h"
#include "pacer.h"
#include "pio.h"
#include "../fonts/font3x5_1.h"
/* Define polling rate in Hz. */
#define LOOP_RATE 300
#define SIZE 35
static tinygl_point_t buffer[SIZE];
static int in = 0;
static int out = 0;
void point_add (tinygl_point_t pos)
{
int old = in;
tinygl_draw_point (pos, 1);
buffer[in] = pos;
in++;
if (in >= SIZE)
in = 0;
if (in == out)
in = old;
}
void point_remove (void)
{
if (in == out)
return;
tinygl_draw_point (buffer[out], 0);
out++;
if (out >= SIZE)
out = 0;
}
int main (void)
{
uint16_t tick = 0;
tinygl_point_t pos = tinygl_point (2, 3);
system_init ();
pio_config_set (LED1_PIO, PIO_OUTPUT_HIGH);
tinygl_init (LOOP_RATE);
tinygl_font_set (&font3x5_1);
navswitch_init ();
pacer_init (LOOP_RATE);
point_add (pos);
/* Paced loop. */
while (1)
{
bool push = 0;
/* Wait for next tick. */
pacer_wait ();
tick++;
if (tick > LOOP_RATE / 2)
{
tick = 0;
pio_output_toggle (LED1_PIO);
point_remove ();
}
navswitch_update ();
if (navswitch_push_event_p (2) && pos.x < TINYGL_WIDTH)
{
pos.x++;
push = 1;
}
if (navswitch_push_event_p (3) && pos.x > 0)
{
pos.x--;
push = 1;
}
if (navswitch_push_event_p (NAVSWITCH_EAST) && pos.y < TINYGL_HEIGHT)
{
pos.y++;
push = 1;
}
if (navswitch_push_event_p (4) && pos.y > 0)
{
pos.y--;
push = 1;
}
if (push)
{
push = 0;
point_add (pos);
}
tinygl_update ();
}
return 0;
}