; We need to tear apart the name to get the textures to use
            splitter1 = Instr(Name$, "GRASS_") + 6
            Splitter2 = Instr(Name$, "_", splitter1) + 1
            Splitter3 = Instr(Name$, ".", Splitter2) + 1
            gpGrassMeshName$ = Mid$(Name$, splitter1, (splitter2 - splitter1) - 1)
            meshFileType$ = Right$(Lower$(gpGrassMeshName$), 1)
            gpGrassMeshName$ = Left$(gpGrassMeshName$, Len(gpGrassMeshName$) - 1)
            ; meshTypes : 3 = .3ds; x = .x ; b = .b3d
            If meshFileType$ = "3"
                gpGrassMeshName$ = gpGrassMeshName$ + ".3ds"
            ElseIf meshFileType$ = "x"
                gpGrassMeshName$ = gpGrassMeshName$ + ".x"
            ElseIf meshFileType$ = "b"
                gpGrassMeshName$ = gpGrassMeshName$ + ".b3d"
            EndIf

            gpGrassTextureName$ = Mid$(Name$, Splitter2, (splitter3 - splitter2) - 1)
            texFileType$ = Right$(Lower$(gpGrassTextureName$), 1)
            gpGrassTextureName$ = Left$(gpGrassTextureName$, Len(gpGrassTextureName$) - 1)
            ; texTypes : j = .jpg; b = .bmp; p = .png; d = .dds; t = .tga
            If texFileType$ = "j"
                gpGrassTextureName$ = gpGrassTextureName$ + ".jpg"
            ElseIf texFileType$ = "b"
                gpGrassTextureName$ = gpGrassTextureName$ + ".bmp"
            ElseIf texFileType$ = "p"
                gpGrassTextureName$ = gpGrassTextureName$ + ".png"
            ElseIf texFileType$ = "d"
                gpGrassTextureName$ = gpGrassTextureName$ + ".dds"
            ElseIf texFileType$ = "t"
                gpGrassTextureName$ = gpGrassTextureName$ + ".tga"
            EndIf