_quality = "MEDIUM";
Stage.scaleMode = "noScale";
Mouse.hide();
yang = 0;
xang = 0;
viewdistance = 0;
viewdistanceFin = 500;
espaciado = 50;
maxvel = 15;
acel = 1.2;
autoX = 0;
autoY = 20;
autoZ = 0;
autoA = 0;
autoV = 0;
// modelo del auto
	auto = new Array();
	auto.push({x:-20, y:-10, z:-10});
	auto.push({x:-20, y:-20, z:-10});
	auto.push({x:-10, y:-20, z:-10});
	auto.push({x:-10, y:-30, z:-10});
	auto.push({x:10, y:-30, z:-10});
	auto.push({x:10, y:-20, z:-10});
	auto.push({x:20, y:-20, z:-10});
	auto.push({x:20, y:-10, z:-10});
	auto.push({x:-20, y:-10, z:10});
	auto.push({x:-20, y:-20, z:10});
	auto.push({x:-10, y:-20, z:10});
	auto.push({x:-10, y:-30, z:10});
	auto.push({x:10, y:-30, z:10});
	auto.push({x:10, y:-20, z:10});
	auto.push({x:20, y:-20, z:10});
	auto.push({x:20, y:-10, z:10});
// conexiones del auto
	autox = new Array();
	autox.push({a:0, b:8});
	autox.push({a:1, b:9});
	autox.push({a:2, b:10});
	autox.push({a:3, b:11});
	autox.push({a:4, b:12});
	autox.push({a:5, b:13});
	autox.push({a:6, b:14});
	autox.push({a:7, b:15});
	autox.push({a:0, b:1});
	autox.push({a:1, b:2});
	autox.push({a:2, b:3});
	autox.push({a:3, b:4});
	autox.push({a:4, b:5});
	autox.push({a:5, b:6});
	autox.push({a:6, b:7});
	autox.push({a:7, b:0});
	autox.push({a:8, b:9});
	autox.push({a:9, b:10});
	autox.push({a:10, b:11});
	autox.push({a:11, b:12});
	autox.push({a:12, b:13});
	autox.push({a:13, b:14});
	autox.push({a:14, b:15});
	autox.push({a:15, b:8});
// generar terreno
	terreno = new Array();
	for (x=-500; x<=500; x += espaciado) {
		fila = new Array();
		for (z=-500; z<=500; z += espaciado) {
			asd = new Object();
			asd.x = x;
			asd.z = z;
			asd.y = 50+random(35);
			fila.push(asd);
		}
		terreno.push(fila);
	}
// listener para el mousewheel
	var mouseListener:Object = new Object();
	mouseListener.onMouseWheel = function(delta) {
		viewdistanceFin += delta*10;
		if(viewdistanceFin < 0)
			viewdistanceFin = 0;
	};
onEnterFrame = function () {
	// mover auto
		if(Key.isDown(87) and autoV<maxvel) {
			autoV+=acel;
		} else if(Key.isDown(83)and autoV>-maxvel) {
			autoV-=acel;
		} else {
			autoV*=0.9;
		}
		if(Key.isDown(65)) {
			autoA -= autoV/80;
		}
		if(Key.isDown(68)) {
			autoA += autoV/80;
		}
		autoX += Math.cos(autoA)*autoV;
		autoZ -= Math.sin(autoA)*autoV;
	// angulo y camara
		yangFin = (_xmouse-250)/250*-Math.PI/5;
		xangFin = (_ymouse)/200*Math.PI/5;
		yang += (yangFin-yang)/3;
		xang += (xangFin-xang)/3;
		viewdistance += (viewdistanceFin-viewdistance)/5;
		clear();
		lineStyle(1,0x000000,90);
	// calcular grilla
	terrenox = new Array();
	for (xa=0; xa<terreno.length; xa++) {
		fila = new Array();
		for (ya=0; ya<terreno[xa].length; ya++) {
			nuevo = Xrot(terreno[xa][ya], xang);
			nuevo = Yrot(nuevo, yang);
			nuevo.z += 800;
			nodo = a3D(nuevo, viewdistance);
			fila.push(nodo);
		}
		terrenox.push(fila);
	}
	/*
	// resaltar casilla
		tileX = Math.floor((autoX+500)/50);
		tileY = Math.floor((autoZ+500)/50);
		beginFill(0x00ff00,50);
		moveTo(terrenox[tileX][tileY].x+250, terrenox[tileX][tileY].y+200);
		lineTo(terrenox[tileX+1][tileY].x+250, terrenox[tileX+1][tileY].y+200);
		lineTo(terrenox[tileX+1][tileY+1].x+250, terrenox[tileX+1][tileY+1].y+200);
		lineTo(terrenox[tileX][tileY+1].x+250, terrenox[tileX][tileY+1].y+200);
		lineTo(terrenox[tileX][tileY].x+250, terrenox[tileX][tileY].y+200);
		endFill();
	// calcular interseccion al piso
		vV = {x:0, y:0, z:1};
		vA = {x:autoX, y:autoZ, z:20};
		vP = {x:terreno[tileX][tileY].x, y:terreno[tileX][tileY].y, z:terreno[tileX][tileY].z};
		vQ = {x:terreno[tileX+1][tileY].x, y:terreno[tileX+1][tileY].y, z:terreno[tileX+1][tileY].z};
		vR = {x:terreno[tileX][tileY+1].x, y:terreno[tileX][tileY+1].y, z:terreno[tileX][tileY+1].z};
		vQP = {x:vP.x-vQ.x, y:vP.y-vQ.y, z:vP.z-vQ.z};
		vRP = {x:vP.x-vR.x, y:vP.y-vR.y, z:vP.z-vR.z};
		vN = {x:vQP.y*vRP.z-vQP.z*vRP.y, y:vQP.z*vRP.x-vQP.x*vRP.z, z:vQP.z*vRP.x-vQP.x*vRP.z};
		NP = vN.x*vP.x+vN.y*vP.y+vN.z*vP.z;
		te = (NP-vN.x*vA.x-vN.y*vA.y-vN.z*vN.z)/(vN.x*vV.x+vN.y*vV.y+vN.z*vV.z);
		autoY = vA.z+te*vV.z-2500;
		*/
	// dibujar grilla
	for (xa=0; xa<terrenox.length; xa++) {
		for (ya=0; ya<terrenox[xa].length; ya++) {
			punto1 = terrenox[xa][ya];
			if(terrenox[xa+1][ya]!=undefined) {
				punto2 = terrenox[xa+1][ya];
				moveTo(punto1.x+250, punto1.y+200);
				lineTo(punto2.x+250, punto2.y+200);
			}
			if(terrenox[xa][ya+1]!=undefined) {
				punto3 = terrenox[xa][ya+1];
				moveTo(punto1.x+250, punto1.y+200);
				lineTo(punto3.x+250, punto3.y+200);
			}
		}
	}
	// calcular auto
	autoxx = new Array();
	for(c=0;c<auto.length;c++) {
		// calcular C
		pos = Yrot(auto[c],autoA);
		pos.x += autoX;
		pos.y += autoY;
		pos.z += autoZ;
		nuevo = Xrot(pos, xang);
		nuevo = Yrot(nuevo, yang);
		nuevo.z += 800;
		pija = a3D(nuevo, viewdistance);
		autoxx.push(pija);
	}
	// dibujar auto
	for(c=0;c<autox.length;c++) {
		a = autoxx[autox[c].a];
		b = autoxx[autox[c].b];
		moveTo(a.x+250,a.y+200);
		lineTo(b.x+250,b.y+200);
	}
}
// funcion para calcular coordenadas reales
function a3D(punto:Object, vd:Number) {
	pers = vd/punto.z;
	x = pers*punto.x;
	y = pers*punto.y;
	return {x:x, y:y, pers:pers};
}
// funciones para rotar sobre los ejes
function Xrot(punto:Object, ang) {
	nuevoy = Math.cos(ang)*punto.y-Math.sin(ang)*punto.z;
	nuevoz = Math.sin(ang)*punto.y+Math.cos(ang)*punto.z;
	return {x:punto.x, y:nuevoy, z:nuevoz};
}
function Yrot(punto:Object, ang) {
	nuevox = Math.cos(ang)*punto.x+Math.sin(ang)*punto.z;
	nuevoz = Math.cos(ang)*punto.z-Math.sin(ang)*punto.x;
	return {x:nuevox, y:punto.y, z:nuevoz};
}
function Zrot(punto:Object, ang) {
	nuevox = Math.cos(ang)*punto.x-Math.sin(ang)*punto.y;
	nuevoy = Math.sin(ang)*punto.x+Math.cos(ang)*punto.y;
	return {x:nuevox, y:nuevoy, z:punto.z};
}
// funcion para imprimir un punto
function punto(x, y, pers) {
	lineStyle(pers*5);
	moveTo(x,y);
	lineTo(x,y+1);
}
// add listener
Mouse.addListener(mouseListener);