Освещение (7.5 мин)
Ранее на экране отображались только серые многоугольники. Пришло время добавить немного реализма в трехмерную сцену: создать источник освещения. Это можно сделать с помощью команды:
a = CREATELIGHT([тип][,род])
Пока мы будем использовать тип 1, который задается по умолчанию - направленный свет. Добавим строки для создания и поворота светового источника в программу:
GRAPHICS3D 640, 480, 32
cam = CREATECAMERA()
l = CREATELIGHT()
ROTATEENTITY l, 90, 0, 0
cone = CREATECONE(20)
POSITIONENTITY cone, 0, 0, 5
ROTATEENTITY cone, 0, 0, 90
RENDERWORLD
FLIP
WAITKEY
