Знающий
Регистрация: 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
|
В общем прошу помочь. К сожалению самостоятельно соображать не могу, мешает один ворвавшийся в дом человек.
Заранее благодарю.
|