///////////////////////////////
#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 ();
}