Sorry your browser is not supported!

		game.arrow.angle=atanfull(ScreenToWorldX(getpointerx())-GetSpriteXByOffset(game.arrow.sprid),ScreenToWorldY(getpointery())-GetSpriteYByOffset(game.arrow.sprid)) //need to calculate edge of the //map(not screen) from the character then character from mousepoint // you may want to play with this as it specific to what I was working on
		SetSpriteAngle(game.arrow.sprID,game.arrow.angle-90) // the offset // this will be dependent on your sprite you may not need it - my sprite was facing the PC so I needed to turn it around
		game.arrow.velocity = CalculateVelocity(game.arrow.speed, getspriteangle(game.arrow.sprid)) //speed is set either with a constant or somewhere else 
function CalculateVelocity(speed as float, angle as float) // this is example code from one of the tutorials I think its in the main AGK tut book
	result as VelocityType
	result.velx = cos(angle)*speed //speed is a constant
	result.vely = sin(angle)*speed *(GetDeviceWidth()*1.0/GetDeviceHeight()) //sorry I do not remember why I did this or it just was in the book like this!
endfunction result

SetSpriteXByOffset( SprID, ScreenToWorldX(getpointerx()) ) //only if youre offsetting otherwise just use getpointer x
SetSpriteYByOffset( SprID, ScreenToWorldY(getpointerY()) ) //only if youre offsetting otherwise just use getpointer y

SetWindowSize ( 1024, 768, 0 )
SetVirtualResolution ( 1024, 768 )


type Vec2DType
	x as float
	y as float
endtype

global vec as Vec2DType


global car as integer
car = createsprite ( loadimage ( "car.png" ) )
SetSpritePositionByOffset ( car, 512, 384 )


do
	if GetRawMouseLeftState() = 1 then MoveCar()

    Print ( str ( vec.x ) )
    Print ( str ( vec.y ) )
    Sync()
loop





function MoveCar()
	
	local cx as float
	local cy as float
	
	slowdown = 50.0
	
	mx = GetRawMouseX()
	my = GetRawMouseY()
	cx = GetSpriteXByOffset ( car )
	cy = GetSpriteYByOffset ( car )
	vec.x = ( mx - cx ) / slowdown								// calculate x vector and apply slowdown
	vec.y = ( my - cy ) / slowdown								// calculate y vector and apply slowdown
	angle = atan2 ( vec.y , vec.x ) + 90.0 						// align car with mouse position
	SetSpriteAngle ( car, angle )
	SetSpritePositionByOffset ( car, cx + vec.x, cy + vec.y )	// move car
	
endfunction

SetPhysicsGravity( 0.0, 0.0 )


CreateSprite( 1, 0 )
SetSpriteSize( 1, 25, 25 )
SetSpritePhysicsOn( 1, 2 )



do
    
    dx# = GetPointerX() - GetSpriteXByOffset( 1 )
    dy# = GetPointerY() - GetSpriteYByOffset( 1 )
    
    
    SetSpritePhysicsForce( 1, GetSpriteXByOffset( 1 ), GetSpriteYByOffset( 1 ), dx# * GetSpritePhysicsMass( 1 ), dy# * GetSpritePhysicsMass( 1 ) )
    
    Sync()
loop

function MoveCar()
    
    mx# = GetRawMouseX()
    my# = GetRawMouseY()
    cx# = GetSpriteX( RED_VEHICLE )
    cy# = GetSpriteY( RED_VEHICLE )

   
    XDistance# = abs(mx# - cx#)  // How far in the X i want it to move.
    YDistance# = abs(my# - cy#)  // How far in the Y i want it to move
    
    TotalDistance# = Sqrt((XDistance# * 2) + (YDistance# * 2)) // Does Pathag's Therom for the Hypotinuse. Tells me the total distance I need to move.
    
    X_Step# =     (XDistance#/TotalDistance#) // Makes a decimal I use as a percentage, it will make it step a certain distance in the x.
    Y_Step# =     (YDistance#/TotalDistance#)   //  Makes a decimal I use as a percentage, it will make it step a certain distance in the y.
    
    
repeat  // does all the calculations without updateing the distance from the mouse pointer.

   SetSpritePosition( RED_VEHICLE, abs(cx# - X_Step#), abs(cy# -Y_Step#))   // moves sprite a set amount in the X and Y toward the mouse X and Y
   cx# = GetSpriteX( RED_VEHICLE )  // updates the Sprite X
  cy# = GetSpriteY( RED_VEHICLE ) // updates the sprite Y
  sync()

until abs(mx# - cx#) < 1  // once the sprite moves to the Mouse X and is less than 1 it should stop updating the setspriteposition????????????????????????????????????


endfunction

SetWindowSize ( 1024, 768, 0 )
SetVirtualResolution ( 1024, 768 )



type Vec2DType
	x as float	// x component of 2D vector
	y as float	// y component of 2D vector
	l as float	// length of 2D vector
endtype

global vec as Vec2DType


global car as integer
car = createsprite ( loadimage ( "car.png" ) )
SetSpritePositionByOffset ( car, 512, 384 )


do
	if GetRawMouseLeftState() = 1 then MoveCar()

    Print ( str ( vec.x ) )
    Print ( str ( vec.y ) )
    Sync()
loop




function MoveCar()
	
	local cx as float
	local cy as float
	
	speed 			= 10.0
	stop_distance 	= 10.0
	
	mx = GetRawMouseX()
	my = GetRawMouseY()
	cx = GetSpriteXByOffset ( car )
	cy = GetSpriteYByOffset ( car )
	vec.x = ( mx - cx )
	vec.y = ( my - cy )
	
	if abs ( vec.x ) + abs ( vec.y ) > stop_distance				// car not too close to mouse position?
		
		vec.l = sqrt ( vec.x * vec.x + vec.y * vec.y )				// calculate the length of the distance vector using simple Pythagoras
		vec.x = vec.x / vec.l * speed								// normalize the vector and give it some more speed
		vec.y = vec.y / vec.l * speed
		angle = ATan2 ( vec.y , vec.x ) + 90.0 						// align car with mouse position
		SetSpriteAngle ( car, angle )
		SetSpritePositionByOffset ( car, cx + vec.x, cy + vec.y )	// move car
		
	endif	
	
endfunction