Показать сообщение отдельно
Старый 07.06.2010, 02:52   #8
Dream
быдло
 
Регистрация: 05.08.2007
Сообщений: 1,435
Написано 614 полезных сообщений
(для 1,489 пользователей)
Ответ: Скайбокс на 6 граней

О_О начнём сначала.

функцией

Function MakeSkyBoxfile$ )

    
m=CreateMesh()
;
front face
    b
=LoadBrushfile$+"_FR.bmp",49 )
    
s=CreateSurfacem,)
    
AddVertex s,-1,+1,-1,0,0:AddVertex s,+1,+1,-1,1,0
    AddVertex s
,+1,-1,-1,1,1:AddVertex s,-1,-1,-1,0,1
    AddTriangle s
,0,1,2:AddTriangle s,0,2,3
    FreeBrush b
;right face
    b
=LoadBrushfile$+"_LF.bmp",49 )
    
s=CreateSurfacem,)
    
AddVertex s,+1,+1,-1,0,0:AddVertex s,+1,+1,+1,1,0
    AddVertex s
,+1,-1,+1,1,1:AddVertex s,+1,-1,-1,0,1
    AddTriangle s
,0,1,2:AddTriangle s,0,2,3
    FreeBrush b
;back face
    b
=LoadBrushfile$+"_BK.bmp",49 )
    
s=CreateSurfacem,)
    
AddVertex s,+1,+1,+1,0,0:AddVertex s,-1,+1,+1,1,0
    AddVertex s
,-1,-1,+1,1,1:AddVertex s,+1,-1,+1,0,1
    AddTriangle s
,0,1,2:AddTriangle s,0,2,3
    FreeBrush b
;left face
    b
=LoadBrushfile$+"_RT.bmp",49 )
    
s=CreateSurfacem,)
    
AddVertex s,-1,+1,+1,0,0:AddVertex s,-1,+1,-1,1,0
    AddVertex s
,-1,-1,-1,1,1:AddVertex s,-1,-1,+1,0,1
    AddTriangle s
,0,1,2:AddTriangle s,0,2,3
    FreeBrush b
;top face
    b
=LoadBrushfile$+"_UP.bmp",49 )
    
s=CreateSurfacem,)
    
AddVertex s,-1,+1,+1,0,1:AddVertex s,+1,+1,+1,0,0
    AddVertex s
,+1,+1,-1,1,0:AddVertex s,-1,+1,-1,1,1
    AddTriangle s
,0,1,2:AddTriangle s,0,2,3
    FreeBrush b
;down face 
           b
=LoadBrushfile$+"_DOWN.bmp",49 
           
s=CreateSurfacem,
           
AddVertex s,-1,-1,+1,0,1:AddVertex s,+1,-1,+1,0,
           AddVertex s
,+1,-1,-1,1,0:AddVertex s,-1,-1,-1,1,
           AddTriangle s
,0,1,2:AddTriangle s,0,2,
           FreeBrush b 

    ScaleMesh m
,100,100,100
    FlipMesh m
    EntityFX m
,9
    EntityOrder m
,10
    
Return m
    
End 
Function 
создаётся куб, размером 1х1х1 который рисуется позади всех остальных объектов. на рисунук показано почему именно эти точки. порядок соединения точек - http://blitzetc.blitzmax.ru/index.ph...ик:AddTriangle.
после этого, стоит немного растянуть этот куб и всё, есть скай бокс, что не понятно?
Миниатюры
Нажмите на изображение для увеличения
Название: Cube.PNG
Просмотров: 3079
Размер:	17.0 Кб
ID:	10281  
(Offline)
 
Ответить с цитированием