#define move_speed skill1
VECTOR move_vec;

function update_movement()
{
   move_vec.x = key_force.y * (time_step * my.move_speed);
   move_vec.y = -key_force.x * (time_step * my.move_speed);
}

//uses: move_speed
action player_move()
{
   player = me;
   //my.temptilt = 0;
   c_setminmax(my);
   camera.genius = player;
   vec_for_min(feet_bottom,me);
   while(me != NULL)
   {
      //update_gravity();
	update_movement();
      //handle_jumping();
	c_move(my,move_vec,fall_dist,GLIDE);
      //update_camera();
	wait(1);
   }
}

void main()
{
   time_smooth = 0.666;
   video_mode = 9;
 //video_screen = 1;
   level_load ("******.WMB");
   wait(2);	
}

function update_gravity()
{
   ground_dist = c_trace(my.x,vector(my.x, my.y, my.z -1000),USE_BOX)-feet_bottom;
   if(ground_dist > 0)
   {
      fall_dist.z = -30 * time_step;
   }
}

/////////////////////////////////////////////////////
////  Default Gamestudio Key and Debug functions  ///
//// ToDo:  Replace with Personalized functions  ////
#include <default.c>;

/////////////////////////////////////////////////////
////  Personal Resource file Locations   ////////////
#include "Resources\Includes\resources.h";

/////////////////////////////////////////////////////
////  Included Scripts   ////////////////////////////
#include "Resources\Scripts\Player.c";

////////////////////////////////////////////////////
////   Main Starting Function   ////////////////////
void main()
{
   time_smooth = 0.666;
// video_set(sys_metrics(0), sys_metrics(1), 32, 1); // detect and use the best screen resolution
   video_mode = 9;
// video_screen = 1;
   level_load ("newshit.WMB");
   wait(2);	
}

/////////////////////////////////////////////////////////////////////
//// Main resource locations and files   ////////////////////////////

#define PRAGMA_PATH "Resources\Entities";
#define PRAGMA_PATH "Resources\Sounds";
#define PRAGMA_PATH "Resources\Textures";
#define PRAGMA_PATH "Resources\Scripts";

//////////////////////////////////////////////////////////////////////
//  Player movement and interaction  /////////////////////////////////
//////////////////////////////////////////////////////////////////////
#define move_speed skill1
#define turn_speed skill2

//////////////////////////////////////////////////////////////////////
//  Player_move defines  /////////////////////////////////////////////

VECTOR move_vec; // player movement forces
VECTOR fall_dist; 

//////////////////////////////////////////////////////////////////////
//  Gravity related defines  /////////////////////////////////////////////
var ground_dist;
var feet_bottom; 

//////////////////////////////////////////////////////////////////////
//  Camera variables  ///////////////////////////////////////////
var temptilt; // camera tilt angle
var eye_height = 30; 

//////////////////////////////////////////////////////////////////////
//  Gravity  /////////////////////////////////////////////////////////
function update_gravity()
{
    ground_dist = c_trace(my.x,vector(my.x, my.y, my.z -1000),USE_BOX)-feet_bottom;
    if(ground_dist > 0)
    {
	fall_dist.z = -30 * time_step;
    }
}

//////////////////////////////////////////////////////////////////////
//   Jumping function    /////////////////////////////////////////////

function handle_jumping ()
{
   wait(1);
}

//////////////////////////////////////////////////////////////////////
//   Movement function    ////////////////////////////////////////////

function update_movement()
{
    move_vec.x = key_force.y * (time_step * my.move_speed); 
    move_vec.y = -key_force.x * (time_step * my.move_speed);
}


//////////////////////////////////////////////////////////////////////
//  Camera function  /////////////////////////////////////////////////

function update_camera()
{	
    vec_set(camera.x,vector(-100,0,20)); // to see what player is doing
//  vec_set(camera.x,player.x); // go back to first person
    camera.z += eye_height;
    camera.pan = player.pan;
    temptilt += (mouse_force.y * 3) * 4 * time_step;
    my.pan -= (mouse_force.x * 8) * time_step;
    camera.tilt = 0 + temptilt;
    temptilt = clamp(temptilt,-75,75);	
}


//////////////////////////////////////////////////////////////////////
//  Main player action  //////////////////////////////////////////////

//uses: move_speed
action player_move()
{
    player = me;
  //my.temptilt = 0;
    c_setminmax(my);
    camera.genius = player;
    vec_for_min(feet_bottom,me);
    while(me != NULL)
    {
//	update_gravity();
	update_movement();
//	handle_jumping();
	c_move(my,move_vec,fall_dist,GLIDE);
//	update_camera();
	wait(1);
    }
}