2022-02-03 22:31:11 +01:00
|
|
|
|
Public Class WallModel
|
2022-02-03 22:18:04 +01:00
|
|
|
|
|
|
|
|
|
Inherits BaseModel
|
|
|
|
|
|
|
|
|
|
Public Sub New()
|
2022-02-03 22:31:11 +01:00
|
|
|
|
Me.ID = 20
|
2022-02-03 22:18:04 +01:00
|
|
|
|
|
|
|
|
|
Dim vertexData = New VertexPositionNormalTexture() {
|
2022-02-03 22:31:11 +01:00
|
|
|
|
New VertexPositionNormalTexture(New Vector3(-0.5, -0.5, 0.5), Vector3.Backward, New Vector2(0, 1)),
|
|
|
|
|
New VertexPositionNormalTexture(New Vector3(-0.5, 0.5, 0.5), Vector3.Backward, New Vector2(0, 0)),
|
|
|
|
|
New VertexPositionNormalTexture(New Vector3(0.5, 0.5, 0.5), Vector3.Backward, New Vector2(1, 0)),
|
|
|
|
|
New VertexPositionNormalTexture(New Vector3(0.5, 0.5, 0.5), Vector3.Backward, New Vector2(1, 0)),
|
|
|
|
|
New VertexPositionNormalTexture(New Vector3(0.5, -0.5, 0.5), Vector3.Backward, New Vector2(1, 1)),
|
|
|
|
|
New VertexPositionNormalTexture(New Vector3(-0.5, -0.5, 0.5), Vector3.Backward, New Vector2(0, 1))
|
2022-02-03 22:18:04 +01:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
Setup(vertexData)
|
|
|
|
|
End Sub
|
|
|
|
|
|
|
|
|
|
End Class
|