Added OutsideStepModel

This commit is contained in:
JappaWakka 2021-09-27 22:51:48 +02:00
parent 45edf9a057
commit a285710f5b
3 changed files with 30 additions and 0 deletions

View File

@ -30667,6 +30667,7 @@
<Compile Include="Resources\Models\Cliffs\CliffModel.vb" /> <Compile Include="Resources\Models\Cliffs\CliffModel.vb" />
<Compile Include="Resources\Models\Other\SignModel.vb" /> <Compile Include="Resources\Models\Other\SignModel.vb" />
<Compile Include="Resources\Models\Steps\InsideStepModel.vb" /> <Compile Include="Resources\Models\Steps\InsideStepModel.vb" />
<Compile Include="Resources\Models\Steps\OutsideStepModel.vb" />
<Compile Include="Resources\Models\Steps\StepModel.vb" /> <Compile Include="Resources\Models\Steps\StepModel.vb" />
<Compile Include="Resources\Sound\MusicManager.vb" /> <Compile Include="Resources\Sound\MusicManager.vb" />
<Compile Include="Resources\Sound\SoundContainer.vb" /> <Compile Include="Resources\Sound\SoundContainer.vb" />

View File

@ -97,6 +97,7 @@
Public Shared StairsModel As StairsModel = New StairsModel() Public Shared StairsModel As StairsModel = New StairsModel()
Public Shared DiagonalWallModel As DiagonalWallModel = New DiagonalWallModel() Public Shared DiagonalWallModel As DiagonalWallModel = New DiagonalWallModel()
Public Shared HalfDiagonalWallModel As HalfDiagonalWallModel = New HalfDiagonalWallModel() Public Shared HalfDiagonalWallModel As HalfDiagonalWallModel = New HalfDiagonalWallModel()
Public Shared OutsideStepModel As OutsideStepModel = New OutsideStepModel()
Public Shared Function getModelbyID(ByVal ID As Integer) As BaseModel Public Shared Function getModelbyID(ByVal ID As Integer) As BaseModel
Select Case ID Select Case ID
@ -138,6 +139,8 @@
Return DiagonalWallModel Return DiagonalWallModel
Case 18 Case 18
Return HalfDiagonalWallModel Return HalfDiagonalWallModel
Case 19
Return OutsideStepModel
Case Else Case Else
Return BlockModel Return BlockModel
End Select End Select

View File

@ -0,0 +1,26 @@
Public Class OutsideStepModel
Inherits BaseModel
Public Sub New()
Me.ID = 19
Dim vertexData = New VertexPositionNormalTexture() {
New VertexPositionNormalTexture(New Vector3(-0.5, -0.25, 0.5), New Vector3(-1, 0, 0), New Vector2(1.0, 0.0)), 'e
New VertexPositionNormalTexture(New Vector3(-0.5, -0.5, 0.5), New Vector3(-1, 0, 0), New Vector2(1.0, 1.0)), 'h
New VertexPositionNormalTexture(New Vector3(-0.5, -0.5, -0.5), New Vector3(-1, 0, 0), New Vector2(0.0, 1.0)), 'a
New VertexPositionNormalTexture(New Vector3(-0.5, -0.5, 0.5), New Vector3(0, 0, 1), New Vector2(0.0, 1.0)), 'h
New VertexPositionNormalTexture(New Vector3(-0.5, -0.25, 0.5), New Vector3(0, 0, 1), New Vector2(0.0, 0.0)), 'e
New VertexPositionNormalTexture(New Vector3(0.5, -0.5, 0.5), New Vector3(0, 0, 1), New Vector2(1.0, 1.0)), 'c
New VertexPositionNormalTexture(New Vector3(0.5, -0.5, -0.5), New Vector3(1, 0, 0), New Vector2(1.0, 1.0)), 'b
New VertexPositionNormalTexture(New Vector3(0.5, -0.5, 0.5), New Vector3(1, 0, 0), New Vector2(0.0, 1.0)), 'c
New VertexPositionNormalTexture(New Vector3(-0.5, -0.25, 0.5), New Vector3(1, 0, 0), New Vector2(0.0, 0.0)), 'e
New VertexPositionNormalTexture(New Vector3(-0.5, -0.25, 0.5), New Vector3(0, 0, -1), New Vector2(1.0, 0.0)), 'e
New VertexPositionNormalTexture(New Vector3(-0.5, -0.5, -0.5), New Vector3(0, 0, -1), New Vector2(1.0, 1.0)), 'a
New VertexPositionNormalTexture(New Vector3(0.5, -0.5, -0.5), New Vector3(0, 0, -1), New Vector2(0.0, 1.0)) 'b
}
Setup(vertexData)
End Sub
End Class