Показать сообщение отдельно
Старый 19.04.2011, 23:58   #1
voron
Нуждающийся
 
Регистрация: 10.09.2006
Сообщений: 77
Написано 3 полезных сообщений
(для 3 пользователей)
Проблемы с освещением

Доброго времени суток.
Не могу никак сделать, чтобы хотя бы видно было так же хорошо, как в 3DS MAX или хотя бы просто было видно? Заранее благодарен

Blitz


3DS


Код освещение и настройки камеры
Function Create_World()             
            
; Освещение
AmbientLight 255,255,255
lit=CreateLight()

End Function

;-------------------------- Функции работы с камерой -----------------------------
Function Create_Camera(cam_range#);                    - Создание камеры и установки видимости  

; Принимает
; - cam_range# - длина видимости камеры
; Возвращает
; - camera - указатель на камеру
; - pivot - указатель пивота для камеры

; Создание пивота для камеры
pivot=CreatePivot()                       

; Создание камеры, установка расстояния зрения камеры
camera=CreateCamera(pivot)      
CameraRange camera,1,cam_range#

; Цвет фона
CameraClsColor camera,30,15,15

; Туман
CameraFogMode camera,1
CameraFogRange camera,cam_range#-500,cam_range#
CameraFogColor camera,125,125,125

End Function
(Offline)
 
Ответить с цитированием