Показать сообщение отдельно
Старый 24.02.2006, 07:46   #1
Conan Fedr
Нуждающийся
 
Регистрация: 08.02.2006
Сообщений: 75
Написано 0 полезных сообщений
(для 0 пользователей)
Вообщем я файл состоит из записей в которых хранится угол и координаты камеры я подгружаю и все это в кучу слепливается . Координаты вроде подгружаются проверял RuntimeError'ом . Возможно я что-то нетак с типами делаю ...

Вот скрин :


Вот кусок код
; ------------ Функция подгрузки из cam'а
Function ReadCam(filename$)
	Local SizFile%
	camFile = OpenFile(filename)
	SizFile = FileSize(filename)
	
	For i = 1 To SizFile / 36
 *CamNode.TCamNode = New TCamNode
 *CamNode\Rot.Rotation = New Rotation
 *Quatr.Quat = New Quat
 *CamNode\Id = IRead()
 *CamNode\Hz = IRead()
 *CamNode\PosX = FRead()
 *CamNode\PosY = FRead()
 *CamNode\PosZ = FRead()
 *Quatr\x = FRead()
 *Quatr\y = FRead()
 *Quatr\z = FRead()
 *Quatr\w = FRead()

 *CamNode\CamMarker = CopyEntity(CameraMarker)
 *PositionEntity CamNode\CamMarker,CamNode\PosX/10,CamNode\PosY/10,CamNode\PosZ/10
 *QuatToEuler(CamNode\Rot,Quatr)
 *RotateEntity CamNode\CamMarker,CamNode\Rot\Pitch,CamNode\Rot\yaw,CamNode\Rot\roll
 *Delete Quatr
 *Delete CamNode
	Next
End Function
Фнукции FRead() и IRead() Читают из файла Float и Int соответственно . Памагити :o''
(Offline)
 
Ответить с цитированием