function move_car(new_car,lane)
{
	car_speed = random(.4) + min_speed;
	move_car_pan = new_car;
	while(move_car_pan.visible == ON)
	{
		if(lane <= 3){move_car_pan.pos_x -= car_speed;}
		else{move_car_pan.pos_x += car_speed;}
		if(move_car_pan.pos_x < 0){move_car_pan.visible = OFF;}
		if(move_car_pan.pos_x > 800){move_car_pan.visible = OFF;}
		wait(1);
	}
}

function create_car(lane)
{
	car_pos.y = lane*50 + 50;
	if(lane <= 3){car_pos.x = 800;}
	else{car_pos.x = 0;}
	new_car = pan_create("bmap = car; flags = visible, refresh,overlay;",3);
	new_car.pos_x = car_pos.x;
	new_car.pos_y = car_pos.y;
	move_car(new_car,lane);
	wait(1);
}

var myPanels[50];

panel* temp_pan;

var cars_max = 50;
var car_panel[50];

var max_MoveSpeed = 10;
var car_MoveSpeed[50]; // individual move speed per car

var max_DelayTime = 20; // 20 seconds
var car_DelayTime[50];

var lanes_max = 10;
var lane_offset = 20;
var lane_size = 40;

panel* move_pan;
panel* setLane_pan;

var status_Cars = 0;


function set_RandomLane(_nr)
{
	var new_lane;
	
	new_lane = int(random(lanes_max));
	
	setLane_pan = car_panel[_nr];
	
	setLane_pan.pos_y = new_lane * lane_size + lane_offset;
}


function draw_CarPanels()
{
	var i;
	while(status_Cars)
	{
		i = 0;
		while(i < cars_max)
		{
			temp_pan = car_panel[i];
			
			if(total_secs >= car_DelayTime[i])
			{
				temp_pan.pos_x -= car_MoveSpeed * time_step;
			
				if(temp_pan.pos_x < -bmap_width(temp_pan.bmap))
				{
					temp_pan.pos_x = screen_size.x + 10;
					set_RandomLane(i);
				}
			}
			
			i += 1;
		}
		
		wait(1);
	}
}


function init_Cars()
{
	var i;
	i = 0;
	while(i < cars_max)
	{
		car_panel[i] = pan_create("bmap = car; flags = visible, refresh,overlay;",3);
		car_MoveSpeed[i] = int(random(max_MoveSpeed)) + 1;
		car_DelayTime[i] = int(random(max_DelayTime)) + total_secs;
		
		set_RandomLane(i);
		i += 1;
	}
	
	status_Cars = 1;
	draw_CarPanels();
}