Показать сообщение отдельно
Старый 10.06.2011, 13:53   #1
Leowey
Знающий
 
Аватар для Leowey
 
Регистрация: 08.11.2010
Адрес: Москва
Сообщений: 285
Написано 78 полезных сообщений
(для 182 пользователей)
Проблема пика линий

Здравствуйте. Возникла следующая проблема: требуется пикнуть линию нарисованную с помощью FatImage. Cкрин:



Кусок кода:



Function DrawMove(Entity%, size# = 5)



x = EntityX(Entity%)

y = EntityY(Entity%)

z = EntityZ(Entity%)

dist# = EntityDistance(Entity%, EditorCam)/size#

	SetColor 0, 255, 0
			Line3d(editorcam% , x, y, z, 0, dist#, z)
				SetColor 0, 0, 0
					DrawText("Y", ProjectedX#(), ProjectedY#())
	SetColor 255, 0, 0
			Line3d(editorcam% , x, y, z, dist#, y, z)
				SetColor 0, 0, 0
					DrawText("X", ProjectedX#(), ProjectedY#())
	SetColor 0, 0, 255
			Line3d(editorcam% , x, y, z, x, y, dist#)
				SetColor 0, 0, 0
					DrawText("Z", ProjectedX#(), ProjectedY#())
			
			

			
			
			
			
	
End Function









Function Line3d(cam% , x#, y#, z#, xw#, yw#, zw#)
CameraProject cam,x#,y#,z#
Gx = ProjectedX#()
Gy = ProjectedY#()
CameraProject cam,xw#,yw#,zw#
Gxw = ProjectedX#()
Gwy = ProjectedY#()

DrawLine Gx, Gy, Gxw, Gwy
End Function










В общем прошу помочь. К сожалению самостоятельно соображать не могу, мешает один ворвавшийся в дом человек.

Заранее благодарю.
(Offline)
 
Ответить с цитированием