if (speed > -1) speed = min(-1,speed-0.4)

var maxspeed;
if keyboard_check(vk_shift) maxspeed = 3 else maxspeed = 1.5;
if (speed < maxspeed) speed = min(maxspeed,speed+0.4);

global.camx = x
global.camy = y
global.camsin = sin(direction*pi/180)
global.camcos = cos(direction*pi/180)

var xy,yn;
xn = x - sin(direction*pi/180)
yn = y - cos(direction*pi/180)
x = xn; y = yn;

var xn,yn;
xn = x + sin(direction*pi/180)
yn = y + cos(direction*pi/180)
x = xn; y = yn;

direction -= (display_mouse_get_x() -display_get_width()/2)/10
pitch += (display_mouse_get_y() -display_get_height()/2)/400
display_mouse_set(display_get_width()/2,display_get_height()/2)
pitch = max(min(pitch,89),-89)

d3d_start()
d3d_set_hidden(true)
d3d_set_lighting(false)
d3d_set_culling(false)
texture_set_interpolation(false)
friction = 0.2
z = 0
height = 8
pitch = 0
global.camx = x
global.camy = y
global.camsin = sin(direction*pi/180)
global.camcos = cos(direction*pi/180)