///////////////////////////////
#include <acknex.h>
#include <default.c>

///////////////////////////////
////////////////////// ---- my folders 
#define PRAGMA_PATH "..\\Models";
#define PRAGMA_PATH "..\\des_tga";
#define PRAGMA_PATH "..\\des_pcx";
#define PRAGMA_PATH "..\\panels";

//

// Global variables

BMAP* clr_strip = "yourbmap.pcx"; // make a bitmap that's 596x76 
var compass_x = 0; // horizontal 
var compass_y = 0; // vertical 

// Panels

PANEL* SANTE = {
	// bitmap clr_strip is 596x76
	// the window must be smaller than the bitmap clr_strip
	// The visible part is  180 x 60
	// the function show_panel modifies the values of compass_x or _y : this creates the movement
	//
	// 
	pos_x = 100;
	pos_y = 375;
	layer = 2;
	window (15,14,180,60,clr_strip,compass_x,compass_y); 
	digits (-60,-10, "compass_x = %.0f",*,1, compass_x); // to follow the values ... to be removed after testing
	flags = SHOW; //| OVERLAY not needed here
}

// functions

function show_panel ()
{
	var up = 0;
	var down = 100;
	compass_x = 0;
	// move the bmap from left to right.....
	while (1)
	{
		if (compass_x >= 100)
		{
			down = 100;
			// up becomes down 
			while (down != 0)
			{
				compass_x -= 5 ;
				down -= 1;
				wait (1)  	;
			}
		}
		if (compass_x <= 0)
		{
			up = 0 ;	
			// down becomes up
			while (up <= 99)
			{
				compass_x += 5 ;
				up  += 1;
				wait (1)  	;
			}
		}
		wait (1)	;
	}
}
//--------------------------- 

function main()
{
  vec_set(screen_size,vector(800,600,0));
  vec_set(screen_color,vector(50,1,1)); // dark blue
  vec_set(sky_color,vector(50,1,1)); // dark blue

  video_window(NULL,NULL,0,"My New Game");
  
  level_load("");

	show_panel ();
}