360 shooter.... scrolling background

The forum is locked. These are the original blitzbasic.com forums, kept so they can still be read. No new topics, replies or edits can be made here. To join in, head over to the Blitz3D+ forums.

Yahfree

Sorry for the late reply, but this still isn't working properly, I've tried a different approach:


Const radarScale:Int = 40 '8000/200
Const radarRadius:Int = 100 'Radius of Radar

Function PointsToDistance#(x1#,y1#,x2#,y2#)
	Return Sqr(((x1-x2)*(x1-x2))+((y1-y2)*(y1-y2)))
End Function

	'Radar(replace w/ image later)
	SetColor 0,150,0
	DrawOval 824,568,200,200
	SetColor 255,255,255

	'plot a pixel at the enemies locations on the radar
	For Local e:TEnemy = EachIn EnemyList
		RadPx = ((e.x-px)/radarScale+(px/radarScale)) + 919
		RadPy = ((e.y-py)/radarScale+(py/radarScale)) + 663
		If PointsToDistance(919,663,RadPx,RadPy) < radarOffset
			Plot(RadPx,RadPy)
		End If
	Next
	
	'draw a white oval at the center of the radar, this represents the player.
	DrawOval 919, 663, 5, 5

When you first start the game it works perfectly, until you move the player, then the place where the dots close in on the big dot(the player) moves off a bit..